WEB邮件程序

开发平台：
C/C++

pref.c：源码内容
							/*
** Copyright 1998 - 1999 Double Precision, Inc.  See COPYING for
** distribution information.
*/
/*
** $Id: pref.c,v 1.12 2000/06/03 05:40:27 mrsam Exp $
*/
#include	"pref.h"
#include	"config.h"
#include	"sqwebmail.h"
#include	"sqconfig.h"
#include	"cgi/cgi.h"
#include	<stdio.h>
#include	<string.h>
#include	<stdlib.h>
#define	OLDEST1ST	"OLDEST1ST"
#define	FULLHEADERS	"FULLHEADERS"
#define	SORTORDER	"SORT"
#define	PAGESIZE	"PAGESIZE"
#define	AUTOPURGE_V	"AUTOPURGE"
#define	NOHTML		"NOHTML"
#define	FROM		"FROM"
#define	LDAP		"LDAP"
#define	OLDEST1ST_PREF	"oldest1st"
#define	FULLHEADERS_PREF "fullheaders"
#define	HTML_PREF "doshowhtml"
int pref_flagisoldest1st, pref_flagfullheaders;
int pref_showhtml;
int pref_flagsortorder;
int pref_flagpagesize;
int pref_autopurge;
char *pref_from=0;
char *pref_ldap=0;
extern char form_args[];
static char *lab_passworderr;
static char *lab_date;
static char *lab_sender;
static char *lab_subject;
#if ENABLE_WEBPASS
extern int check_sqwebpass(const char *);
extern void set_sqwebpass(const char *);
#endif
extern void output_attrencoded_oknl(const char *);
static const char hex[]="0123456789ABCDEF";
static int nybble(char c)
{
char	*p=strchr(hex, c);
	if (p)	return (p-hex);
	return (0);
}
static void decode(char *t)
{
char *s;
	for (s=t; *s; s++)
	{
		if (*s != '+')
		{
			*t++ = *s;
			continue;
		}
		if (s[1] == 0 || s[2] == 0)
			continue;
		*t++ = nybble(s[1]) * 16 + nybble(s[2]);
		s += 2;
	}
	*t=0;
}
void pref_init()
{
const	char *p;
char	*q, *r;
	p=read_sqconfig(".", CONFIGFILE, 0);
	pref_flagisoldest1st=0;
	pref_flagfullheaders=0;
	pref_flagsortorder=0;
	pref_flagpagesize=10;
	pref_autopurge=AUTOPURGE;
	pref_showhtml=1;
	if(pref_from) {
		free(pref_from);
		pref_from=0;
		}
	if(pref_ldap) {
		free(pref_ldap);
		pref_ldap=0;
		}
	if (p)
	{
		q=strdup(p);
		if (!q)	enomem();
		for (r=q; (r=strtok(r, " ")) != 0; r=0)
		{
			if (strcmp(r, OLDEST1ST) == 0)
				pref_flagisoldest1st=1;
			if (strcmp(r, FULLHEADERS) == 0)
				pref_flagfullheaders=1;
			if (strcmp(r, NOHTML) == 0)
				pref_showhtml=0;
			if (strncmp(r, SORTORDER, sizeof(SORTORDER)-1) == 0
				&& r[sizeof(SORTORDER)-1] == '=')
				pref_flagsortorder=r[sizeof(SORTORDER)];
			if (strncmp(r, PAGESIZE, sizeof(PAGESIZE)-1) == 0
				&& r[sizeof(PAGESIZE)-1] == '=')
				pref_flagpagesize=atoi(r+sizeof(PAGESIZE));
			if (strncmp(r, AUTOPURGE_V, sizeof(AUTOPURGE_V)-1) == 0
				&& r[sizeof(AUTOPURGE_V)-1] == '=')
				pref_autopurge=atoi(r+sizeof(AUTOPURGE_V));
			if (strncmp(r, FROM, sizeof(FROM)-1) == 0
				&& r[sizeof(FROM)-1] == '=')
			{
				if (pref_from)	free(pref_from);
				if ((pref_from=strdup(r+sizeof(FROM))) == 0)
					enomem();
				decode(pref_from);
			}
			if (strncmp(r, LDAP, sizeof(LDAP)-1) == 0
				&& r[sizeof(LDAP)-1] == '=')
			{
				if (pref_ldap)	free(pref_ldap);
				if ((pref_ldap=strdup(r+sizeof(LDAP))) == 0)
					enomem();
				decode(pref_ldap);
			}
		}
		free(q);
	}
	switch (pref_flagpagesize)	{
	case 20:
	case 50:
		break;
	default:
		pref_flagpagesize=10;
		break;
	}
	if (pref_autopurge < 1)	pref_autopurge=1;
	if (pref_autopurge > MAXPURGE)	pref_autopurge=MAXPURGE;
	switch (pref_flagsortorder)	{
	case 'F':
	case 'S':
		break;
	default:
		pref_flagsortorder='D';
		break;
	}
}
#if ENABLE_WEBPASS
static int goodpass(const char *p)
{
	for ( ; *p; p++)
		if (*p < ' ')	return (0);
	return (1);
}
#endif
static char *append_str(const char *prefs, const char *label,
	const char *value)
{
int	l=strlen(prefs) + sizeof(" =") +
	strlen(label)+ (value ? strlen(value):0);
int	i;
char	*p;
const char *q;
	for (i=0; value && value[i]; i++)
		if (value[i] <= ' ' || value[i] >= 127
			|| value[i] == '+')
			l += 2;
	p=malloc(l);
	if (!p)	enomem();
	strcpy(p, prefs);
	if (!value || !*value)	return (p);
	strcat(strcat(strcat(p, " "), label), "=");
	i=strlen(p);
	for (q=value; *q; q++)
	{
		if (*q <= ' ' || *q >= 127 || *q == '+')
		{
			sprintf(p+i, "+%02X", (int)(unsigned char)*q);
			i += 3;
			continue;
		}
		p[i++]= *q;
	}
	p[i]=0;
	return (p);
}
void pref_update()
{
char	buf[200];
char	*p;
char	*q;
	sprintf(buf, SORTORDER "=%c " PAGESIZE "=%d " AUTOPURGE_V "=%d",
		pref_flagsortorder, pref_flagpagesize, pref_autopurge);
	if (pref_flagisoldest1st)
		strcat(buf, " " OLDEST1ST);
	if (pref_flagfullheaders)
		strcat(buf, " " FULLHEADERS);
	if (!pref_showhtml)
		strcat(buf, " " NOHTML);
	p=append_str(buf, FROM, pref_from);
	q=append_str(p, LDAP, pref_ldap);
	write_sqconfig(".", CONFIGFILE, q);
	free(q);
	free(p);
}
void pref_setfrom(const char *p)
{
	if (pref_from)	free(pref_from);
	pref_from=strdup(p);
	if (!pref_from)	enomem();
	pref_update();
}
void pref_setldap(const char *p)
{
	if (pref_ldap && strcmp(p, pref_ldap) == 0)
		return;
	if (pref_ldap)	free(pref_ldap);
	pref_ldap=strdup(p);
	if (!pref_ldap)	enomem();
	pref_update();
}
void pref_setprefs()
{
	if (*cgi("do.changeprefs"))
	{
	char	buf[200];
	FILE	*fp;
	char	*p;
	char	*q;
		sprintf(buf, SORTORDER "=%c " PAGESIZE "=%s " AUTOPURGE_V "=%s",
			*cgi("sortorder"), cgi("pagesize"),
			cgi("autopurge"));
		if (*cgi(OLDEST1ST_PREF))
			strcat(buf, " " OLDEST1ST);
		if (*cgi(FULLHEADERS_PREF))
			strcat(buf, " " FULLHEADERS);
		if (!*cgi(HTML_PREF))
			strcat(buf, " " NOHTML);
		p=append_str(buf, FROM, pref_from);
		q=append_str(p, LDAP, pref_ldap);
		write_sqconfig(".", CONFIGFILE, q);
		free(p);
		free(q);
		pref_init();
		if ((fp=fopen(SIGNATURE, "w")) != NULL)
		{
			fprintf(fp, "%s", cgi("signature"));
			fclose(fp);
		}
	}
	lab_passworderr=strtok(form_args, "|");
	lab_date=strtok(0, "|");
	lab_sender=strtok(0, "|");
	lab_subject=strtok(0, "|");
	if (!lab_passworderr)	lab_passworderr="";
	if (!lab_date)		lab_date="";
	if (!lab_sender)	lab_sender="";
	if (!lab_subject)	lab_subject="";
#if ENABLE_WEBPASS
	if (*cgi("do.changepwd"))
	{
	const	char *p;
		if (check_sqwebpass(cgi("oldpass")) == 0 &&
			*(p=cgi("newpass")) &&
			goodpass(p) &&
			strcmp(p, cgi("newpass2")) == 0)
		{
			set_sqwebpass(p);
		}
		else
		{
			printf("%sn", lab_passworderr);
		}
	}
#endif
}
void pref_isoldest1st()
{
	printf("<INPUT TYPE=CHECKBOX NAME="%s"%s>",
		OLDEST1ST_PREF, pref_flagisoldest1st ? " CHECKED":"");
}
void pref_isdisplayfullmsg()
{
	printf("<INPUT TYPE=CHECKBOX NAME="%s"%s>",
		FULLHEADERS_PREF, pref_flagfullheaders ? " CHECKED":"");
}
void pref_displayhtml()
{
	printf("<INPUT TYPE=CHECKBOX NAME="%s"%s>",
		HTML_PREF, pref_showhtml ? " CHECKED":"");
}
void pref_displayautopurge()
{
	printf("<INPUT TYPE=TEXT NAME="autopurge" VALUE="%d" SIZE=2 MAXLENGTH=2>",
		pref_autopurge);
}
void pref_sortorder()
{
static const char selected[]=" SELECTED";
	printf("<SELECT NAME=sortorder>");
	printf("<OPTION VALUE=DATE%s>%sn",
		pref_flagsortorder == 'D' ? selected:"",
		lab_date);
	printf("<OPTION VALUE=FROM%s>%sn",
		pref_flagsortorder == 'F' ? selected:"",
		lab_sender);
	printf("<OPTION VALUE=SUBJECT%s>%sn",
		pref_flagsortorder == 'S' ? selected:"",
		lab_subject);
	printf("</SELECT>n");
}
void pref_pagesize()
{
static const char selected[]=" SELECTED";
	printf("<SELECT NAME=pagesize>");
	printf("<OPTION VALUE=10%s>10n",
		pref_flagpagesize == 10 ? selected:"");
	printf("<OPTION VALUE=20%s>20n",
		pref_flagpagesize == 20 ? selected:"");
	printf("<OPTION VALUE=50%s>50n",
		pref_flagpagesize == 50 ? selected:"");
	printf("</SELECT>n");
}
void pref_signature()
{
FILE	*fp;
char	buf[256];
int	n;
	printf("<textarea cols=40 rows=4 name="signature" wrap="off">");
	if ((fp=fopen(SIGNATURE, "r")) != NULL)
	{
		while ((n=fread(buf, 1, sizeof(buf)-1, fp)) > 0)
		{
			buf[n]=0;
			output_attrencoded_oknl(buf);
		}
		fclose(fp);
	}
	printf("</textarea>");
}

						