WEB邮件程序

开发平台：
C/C++

authdaemonlib.c：源码内容
							/*
** Copyright 2000 Double Precision, Inc.  See COPYING for
** distribution information.
*/
#include	"auth.h"
#include	"authmod.h"
#include	"authstaticlist.h"
#include	"authsasl.h"
#include	<stdio.h>
#include	<stdlib.h>
#include	<string.h>
#if	HAVE_UNISTD_H
#include	<unistd.h>
#endif
#include	<fcntl.h>
#include        <sys/types.h>
#include        <sys/socket.h>
#include        <sys/un.h>
#include        <sys/time.h>
#include        <unistd.h>
#include        <stdlib.h>
#include        <stdio.h>
#include        <errno.h>
#include	<syslog.h>
#include	"authdaemonrc.h"
#include	"numlib/numlib.h"
#define	TIMEOUT		15
static const char rcsid[]="$Id: authdaemonlib.c,v 1.1 2000/04/26 22:32:37 mrsam Exp $";
static int opensock()
{
int	s=socket(PF_UNIX, SOCK_STREAM, 0);
struct  sockaddr_un skun;
fd_set	fdr;
struct timeval tv;
int	rc;
	skun.sun_family=AF_UNIX;
	strcpy(skun.sun_path, AUTHDAEMONSOCK);
	if (s < 0)
	{
		syslog(LOG_CRIT, "authdaemon: socket() failed: %m");
		return (-1);
	}
        if (fcntl(s, F_SETFL, O_NONBLOCK) < 0)
	{
		syslog(LOG_CRIT, "authdaemon: fcntl() failed: %m");
		close(s);
		return (-1);
	}
	if ( connect(s, &skun, sizeof(skun)) == 0)
	{
		/* That was easy, we're done. */
		if (fcntl(s, F_SETFL, 0) < 0)
		{
			close(s);
			return (-1);
		}
		return (s);
	}
	if ( errno != EINPROGRESS && errno != EWOULDBLOCK)
	{
		perror("authdaemon: connect");
		close(s);
		return (-1);
	}
        /* Wait for the connection to go through, until the timeout expires */
	FD_ZERO(&fdr);
	FD_SET(s, &fdr);
	tv.tv_sec=TIMEOUT;
	tv.tv_usec=0;
	rc=select(s+1, 0, &fdr, 0, &tv);
        if (rc <= 0 || !FD_ISSET(s, &fdr))
	{
		syslog(LOG_CRIT, "authdaemon: connect timed out");
		close(s);
		return (-1);
	}
	if ( connect(s, &skun, sizeof(skun)))
        {
                if (errno != EISCONN)
		{
			syslog(LOG_CRIT, "authdaemon: connect failed: %m");
			close(s);
			return (-1);
		}
	}
        if (fcntl(s, F_SETFL, 0) < 0)
	{
		syslog(LOG_CRIT, "authdaemon: fcntl() failed: %m");
		close(s);
		return (-1);
	}
	return (s);
}
static int writeauth(int fd, const char *p, unsigned pl)
{
fd_set  fds;
struct  timeval tv;
	while (pl)
	{
	int     n;
		FD_ZERO(&fds);
		FD_SET(fd, &fds);
		tv.tv_sec=TIMEOUT;
		tv.tv_usec=0;
		if (select(fd+1, 0, &fds, 0, &tv) <= 0 || !FD_ISSET(fd, &fds))
			return (-1);
		n=write(fd, p, pl);
		if (n <= 0)     return (-1);
		p += n;
		pl -= n;
	}
	return (0);
}
static void readauth(int fd, char *p, unsigned pl)
{
time_t	end_time, curtime;
	--pl;
	time(&end_time);
	end_time += TIMEOUT;
	while (pl)
	{
	int     n;
	fd_set  fds;
	struct  timeval tv;
		time(&curtime);
		if (curtime >= end_time)
			break;
		FD_ZERO(&fds);
		FD_SET(fd, &fds);
		tv.tv_sec=end_time - curtime;
		tv.tv_usec=0;
		if (select(fd+1, &fds, 0, 0, &tv) <= 0 || !FD_ISSET(fd, &fds))
			break;
		n=read(fd, p, pl);
		if (n <= 0)
			break;
		p += n;
		pl -= n;
	}
	*p=0;
}
int authdaemondo(const char *authreq,
	int (*func)(struct authinfo *, void *), void *arg)
{
int	s=opensock();
char	buf[BUFSIZ];
char	*p, *q, *r;
struct	authinfo a;
uid_t	u;
	if (s < 0)
	{
		return (1);
	}
	if (writeauth(s, authreq, strlen(authreq)))
	{
		close(s);
		return (1);
	}
	readauth(s, buf, sizeof(buf));
	close(s);
	memset(&a, 0, sizeof(a));
	a.homedir="";
	p=buf;
	while (*p)
	{
		for (q=p; *q; q++)
			if (*q == 'n')
			{
				*q++=0;
				break;
			}
		if (strcmp(p, ".") == 0)
		{
			return ( (*func)(&a, arg));
		}
		if (strcmp(p, "FAIL") == 0)
			return (-1);
		r=strchr(p, '=');
		if (!r)
		{
			p=q;
			continue;
		}
		*r++=0;
		if (strcmp(p, "USERNAME") == 0)
			a.sysusername=r;
		else if (strcmp(p, "UID") == 0)
		{
			u=atol(r);
			a.sysuserid= &u;
		}
		else if (strcmp(p, "GID") == 0)
		{
			a.sysgroupid=atol(r);
		}
		else if (strcmp(p, "HOME") == 0)
		{
			a.homedir=r;
		}
		else if (strcmp(p, "ADDRESS") == 0)
		{
			a.address=r;
		}
		else if (strcmp(p, "NAME") == 0)
		{
			a.fullname=r;
		}
		else if (strcmp(p, "MAILDIR") == 0)
		{
			a.maildir=r;
		}
		else if (strcmp(p, "QUOTA") == 0)
		{
			a.quota=r;
		}
		else if (strcmp(p, "PASSWD") == 0)
		{
			a.passwd=r;
		}
		else if (strcmp(p, "PASSWD2") == 0)
		{
			a.clearpasswd=r;
		}
		p=q;
	}
	return (1);
}
void auth_daemon_cleanup()
{
}

						