WEB邮件程序

开发平台：

C/C++

authuserdb.c：源码内容

							/*
** Copyright 1998 - 1999 Double Precision, Inc.  See COPYING for
** distribution information.
*/
#if	HAVE_CONFIG_H
#include	"config.h"
#endif
#include	<stdio.h>
#include	<stdlib.h>
#include	<string.h>
#include	<errno.h>
#include	<pwd.h>
#if	HAVE_UNISTD_H
#include	<unistd.h>
#endif
#include	"auth.h"
#include	"authmod.h"
static const char rcsid[]="$Id: authuserdb.c,v 1.12 2000/05/29 21:01:30 mrsam Exp $";
extern int auth_userdb_pre_common(const char *, const char *, int,
        int (*callback)(struct authinfo *, void *),
                        void *arg);
extern void auth_userdb_cleanup();
struct callback_info {
        const char *pass;
        char *userret;
	int issession;
	void (*callback_func)(struct authinfo *, void *);
	void *callback_arg;
        };
static int callback_userdb(struct authinfo *a, void *p)
{
struct callback_info *i=(struct callback_info *)p;
        if (a->passwd == 0 || authcheckpassword(i->pass, a->passwd))
                return (-1);
        if ((i->userret=strdup(a->sysusername)) == 0)
        {
                perror("malloc");
                return (1);
        }
	if (i->callback_func == 0)
	{
	static	char *prevp=0;
	const char *cp=a->maildir;
        char    *p;
		if (!cp)	cp="";
		p=malloc(sizeof("MAILDIR=")+strlen(cp));
                if (!p)
		{
			perror("malloc");
			free(i->userret);
			return (1);
		}
                strcat(strcpy(p, "MAILDIR="), cp);
                putenv(p);
		if (prevp)	free(prevp);
		prevp=p;
	}
	if (i->callback_func == 0)
	{
	static	char *prevp=0;
	const char *cp=a->quota;
        char    *p;
		if (!cp)	cp="";
		p=malloc(sizeof("MAILDIRQUOTA=")+strlen(cp));
                if (!p)
		{
			perror("malloc");
			free(i->userret);
			return (1);
		}
                strcat(strcpy(p, "MAILDIRQUOTA="), cp);
                putenv(p);
		if (prevp)	free(prevp);
		prevp=p;
		authsuccess(a->homedir, 0, a->sysuserid,
			&a->sysgroupid, a->address, a->fullname);
        }
	else
	{
		a->address=a->sysusername;
		(*i->callback_func)(a, i->callback_arg);
	}
        return (0);
}
char *auth_userdb(const char *service, const char *authtype, char *authdata,
	int issession,
	void (*callback_func)(struct authinfo *, void *), void *callback_arg)
{
const char *user, *pass;
int	rc;
struct	callback_info	ci;
	if (strcmp(authtype, AUTHTYPE_LOGIN) ||
		(user=strtok(authdata, "n")) == 0 ||
		(pass=strtok(0, "n")) == 0)
	{
		errno=EPERM;
		return (0);
	}
	ci.pass=pass;
	ci.callback_func=callback_func;
	ci.callback_arg=callback_arg;
	ci.issession=issession;
	rc=auth_userdb_pre_common(user, service, 1, &callback_userdb, &ci);
	auth_userdb_cleanup();
	if (rc < 0)
	{
		errno=EPERM;
		return (0);
	}
	if (rc > 0)
	{
		errno=EACCES;
		return (0);
	}
        return (ci.userret);
}

						