Initial revision
git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@3 ec53bebd-3082-4978-b11e-865c3cabbd6b
This commit is contained in:
Björn Groenvall
161
appl/popper/pop_dropcopy.c
Normal file
161
appl/popper/pop_dropcopy.c
Normal file
@@ -0,0 +1,161 @@
|
|||||||
|
/*
|
||||||
|
* Copyright (c) 1989 Regents of the University of California.
|
||||||
|
* All rights reserved. The Berkeley software License Agreement
|
||||||
|
* specifies the terms and conditions for redistribution.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#ifndef lint
|
||||||
|
static char copyright[] = "Copyright (c) 1990 Regents of the University of California.\nAll rights reserved.\n";
|
||||||
|
static char SccsId[] = "@(#)@(#)pop_dropcopy.c 2.6 2.6 4/3/91";
|
||||||
|
#endif not lint
|
||||||
|
|
||||||
|
#include <errno.h>
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <sys/types.h>
|
||||||
|
#include <strings.h>
|
||||||
|
#include <sys/stat.h>
|
||||||
|
#include <sys/file.h>
|
||||||
|
#include <pwd.h>
|
||||||
|
#include "popper.h"
|
||||||
|
|
||||||
|
extern int errno;
|
||||||
|
extern int sys_nerr;
|
||||||
|
extern char *sys_errlist[];
|
||||||
|
|
||||||
|
/*
|
||||||
|
* dropcopy: Make a temporary copy of the user's mail drop and
|
||||||
|
* save a stream pointer for it.
|
||||||
|
*/
|
||||||
|
|
||||||
|
pop_dropcopy(p,pwp)
|
||||||
|
POP * p;
|
||||||
|
struct passwd * pwp;
|
||||||
|
{
|
||||||
|
int mfd; /* File descriptor for
|
||||||
|
the user's maildrop */
|
||||||
|
int dfd; /* File descriptor for
|
||||||
|
the SERVER maildrop */
|
||||||
|
FILE *tf; /* The temp file */
|
||||||
|
char template[POP_TMPSIZE]; /* Temp name holder */
|
||||||
|
char buffer[BUFSIZ]; /* Read buffer */
|
||||||
|
long offset; /* Old/New boundary */
|
||||||
|
int nchar; /* Bytes written/read */
|
||||||
|
struct stat mybuf; /* For lstat() */
|
||||||
|
|
||||||
|
/* Create a temporary maildrop into which to copy the updated maildrop */
|
||||||
|
(void)sprintf(p->temp_drop,POP_DROP,p->user);
|
||||||
|
|
||||||
|
#ifdef DEBUG
|
||||||
|
if(p->debug)
|
||||||
|
pop_log(p,POP_DEBUG,"Creating temporary maildrop '%s'",
|
||||||
|
p->temp_drop);
|
||||||
|
#endif DEBUG
|
||||||
|
|
||||||
|
/* Here we work to make sure the user doesn't cause us to remove or
|
||||||
|
* write over existing files by limiting how much work we do while
|
||||||
|
* running as root.
|
||||||
|
*/
|
||||||
|
|
||||||
|
/* First create a unique file. Would prefer mkstemp, but Ultrix...*/
|
||||||
|
strcpy(template,POP_TMPDROP);
|
||||||
|
(void) mktemp(template);
|
||||||
|
if ( (tf=fopen(template,"w+")) == NULL ) { /* failure, bail out */
|
||||||
|
pop_log(p,POP_PRIORITY,
|
||||||
|
"Unable to create temporary temporary maildrop '%s': %s",template,
|
||||||
|
(errno < sys_nerr) ? sys_errlist[errno] : "") ;
|
||||||
|
return pop_msg(p,POP_FAILURE,
|
||||||
|
"System error, can't create temporary file.");
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Now give this file to the user */
|
||||||
|
(void) chown(template,pwp->pw_uid, pwp->pw_gid);
|
||||||
|
(void) chmod(template,0600);
|
||||||
|
|
||||||
|
/* Now link this file to the temporary maildrop. If this fails it
|
||||||
|
* is probably because the temporary maildrop already exists. If so,
|
||||||
|
* this is ok. We can just go on our way, because by the time we try
|
||||||
|
* to write into the file we will be running as the user.
|
||||||
|
*/
|
||||||
|
(void) link(template,p->temp_drop);
|
||||||
|
(void) fclose(tf);
|
||||||
|
(void) unlink(template);
|
||||||
|
|
||||||
|
/* Now we run as the user. */
|
||||||
|
(void) setuid(pwp->pw_uid);
|
||||||
|
(void) setgid(pwp->pw_gid);
|
||||||
|
|
||||||
|
#ifdef DEBUG
|
||||||
|
if(p->debug)pop_log(p,POP_DEBUG,"uid = %d, gid = %d",getuid(),getgid());
|
||||||
|
#endif DEBUG
|
||||||
|
|
||||||
|
/* Open for append, this solves the crash recovery problem */
|
||||||
|
if ((dfd = open(p->temp_drop,O_RDWR|O_APPEND|O_CREAT,0600)) == -1){
|
||||||
|
pop_log(p,POP_PRIORITY,
|
||||||
|
"Unable to open temporary maildrop '%s': %s",p->temp_drop,
|
||||||
|
(errno < sys_nerr) ? sys_errlist[errno] : "") ;
|
||||||
|
return pop_msg(p,POP_FAILURE,
|
||||||
|
"System error, can't open temporary file, do you own it?");
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Lock the temporary maildrop */
|
||||||
|
if ( flock (dfd, LOCK_EX|LOCK_NB) == -1 )
|
||||||
|
switch(errno) {
|
||||||
|
case EWOULDBLOCK:
|
||||||
|
return pop_msg(p,POP_FAILURE,
|
||||||
|
"Maildrop lock busy! Is another session active?");
|
||||||
|
/* NOTREACHED */
|
||||||
|
default:
|
||||||
|
return pop_msg(p,POP_FAILURE,"flock: '%s': %s", p->temp_drop,
|
||||||
|
(errno < sys_nerr) ? sys_errlist[errno] : "");
|
||||||
|
/* NOTREACHED */
|
||||||
|
}
|
||||||
|
|
||||||
|
/* May have grown or shrunk between open and lock! */
|
||||||
|
offset = lseek(dfd,0,L_XTND);
|
||||||
|
|
||||||
|
/* Open the user's maildrop, If this fails, no harm in assuming empty */
|
||||||
|
if ((mfd = open(p->drop_name,O_RDWR)) > 0) {
|
||||||
|
|
||||||
|
/* Lock the maildrop */
|
||||||
|
if (flock (mfd,LOCK_EX) == -1) {
|
||||||
|
(void)close(mfd) ;
|
||||||
|
return pop_msg(p,POP_FAILURE, "flock: '%s': %s", p->temp_drop,
|
||||||
|
(errno < sys_nerr) ? sys_errlist[errno] : "");
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Copy the actual mail drop into the temporary mail drop */
|
||||||
|
while ( (nchar=read(mfd,buffer,BUFSIZ)) > 0 )
|
||||||
|
if ( nchar != write(dfd,buffer,nchar) ) {
|
||||||
|
nchar = -1 ;
|
||||||
|
break ;
|
||||||
|
}
|
||||||
|
|
||||||
|
if ( nchar != 0 ) {
|
||||||
|
/* Error adding new mail. Truncate to original size,
|
||||||
|
and leave the maildrop as is. The user will not
|
||||||
|
see the new mail until the error goes away.
|
||||||
|
Should let them process the current backlog, in case
|
||||||
|
the error is a quota problem requiring deletions! */
|
||||||
|
(void)ftruncate(dfd,(int)offset) ;
|
||||||
|
} else {
|
||||||
|
/* Mail transferred! Zero the mail drop NOW, that we
|
||||||
|
do not have to do gymnastics to figure out what's new
|
||||||
|
and what is old later */
|
||||||
|
(void)ftruncate(mfd,0) ;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Close the actual mail drop */
|
||||||
|
(void)close (mfd);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Acquire a stream pointer for the temporary maildrop */
|
||||||
|
if ( (p->drop = fdopen(dfd,"a+")) == NULL ) {
|
||||||
|
(void)close(dfd) ;
|
||||||
|
return pop_msg(p,POP_FAILURE,"Cannot assign stream for %s",
|
||||||
|
p->temp_drop);
|
||||||
|
}
|
||||||
|
|
||||||
|
rewind (p->drop);
|
||||||
|
|
||||||
|
return(POP_SUCCESS);
|
||||||
|
}
|
||||||
188
appl/popper/pop_init.c
Normal file
188
appl/popper/pop_init.c
Normal file
@@ -0,0 +1,188 @@
|
|||||||
|
/*
|
||||||
|
* Copyright (c) 1989 Regents of the University of California.
|
||||||
|
* All rights reserved. The Berkeley software License Agreement
|
||||||
|
* specifies the terms and conditions for redistribution.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#ifndef lint
|
||||||
|
static char copyright[] = "Copyright (c) 1990 Regents of the University of California.\nAll rights reserved.\n";
|
||||||
|
static char SccsId[] = "@(#)@(#)pop_init.c 2.1 2.1 3/18/91";
|
||||||
|
#endif not lint
|
||||||
|
|
||||||
|
#include <errno.h>
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <sys/types.h>
|
||||||
|
#include <sys/socket.h>
|
||||||
|
#include <netinet/in.h>
|
||||||
|
#include <netdb.h>
|
||||||
|
#include <arpa/inet.h>
|
||||||
|
#include "popper.h"
|
||||||
|
|
||||||
|
extern int errno;
|
||||||
|
|
||||||
|
/*
|
||||||
|
* init: Start a Post Office Protocol session
|
||||||
|
*/
|
||||||
|
|
||||||
|
pop_init(p,argcount,argmessage)
|
||||||
|
POP * p;
|
||||||
|
int argcount;
|
||||||
|
char ** argmessage;
|
||||||
|
{
|
||||||
|
|
||||||
|
struct sockaddr_in cs; /* Communication parameters */
|
||||||
|
struct hostent * ch; /* Client host information */
|
||||||
|
int errflag = 0;
|
||||||
|
int c;
|
||||||
|
int len;
|
||||||
|
extern char * optarg;
|
||||||
|
int options = 0;
|
||||||
|
int sp = 0; /* Socket pointer */
|
||||||
|
char * trace_file_name;
|
||||||
|
|
||||||
|
/* Initialize the POP parameter block */
|
||||||
|
bzero ((char *)p,(int)sizeof(POP));
|
||||||
|
|
||||||
|
/* Save my name in a global variable */
|
||||||
|
p->myname = argmessage[0];
|
||||||
|
|
||||||
|
/* Get the name of our host */
|
||||||
|
(void)gethostname(p->myhost,MAXHOSTNAMELEN);
|
||||||
|
|
||||||
|
/* Open the log file */
|
||||||
|
#ifdef SYSLOG42
|
||||||
|
(void)openlog(p->myname,0);
|
||||||
|
#else
|
||||||
|
(void)openlog(p->myname,POP_LOGOPTS,POP_FACILITY);
|
||||||
|
#endif
|
||||||
|
|
||||||
|
/* Process command line arguments */
|
||||||
|
while ((c = getopt(argcount,argmessage,"dt:")) != EOF)
|
||||||
|
switch (c) {
|
||||||
|
|
||||||
|
/* Debugging requested */
|
||||||
|
case 'd':
|
||||||
|
p->debug++;
|
||||||
|
options |= SO_DEBUG;
|
||||||
|
break;
|
||||||
|
|
||||||
|
/* Debugging trace file specified */
|
||||||
|
case 't':
|
||||||
|
p->debug++;
|
||||||
|
if ((p->trace = fopen(optarg,"a+")) == NULL) {
|
||||||
|
pop_log(p,POP_PRIORITY,
|
||||||
|
"Unable to open trace file \"%s\", err = %d",
|
||||||
|
optarg,errno);
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
trace_file_name = optarg;
|
||||||
|
break;
|
||||||
|
|
||||||
|
/* Unknown option received */
|
||||||
|
default:
|
||||||
|
errflag++;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Exit if bad options specified */
|
||||||
|
if (errflag) {
|
||||||
|
(void)fprintf(stderr,"Usage: %s [-d]\n",argmessage[0]);
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Get the address and socket of the client to whom I am speaking */
|
||||||
|
len = sizeof(cs);
|
||||||
|
if (getpeername(sp,(struct sockaddr *)&cs,&len) < 0){
|
||||||
|
pop_log(p,POP_PRIORITY,
|
||||||
|
"Unable to obtain socket and address of client, err = %d",errno);
|
||||||
|
exit(-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Save the dotted decimal form of the client's IP address
|
||||||
|
in the POP parameter block */
|
||||||
|
p->ipaddr = inet_ntoa(cs.sin_addr);
|
||||||
|
|
||||||
|
/* Save the client's port */
|
||||||
|
p->ipport = ntohs(cs.sin_port);
|
||||||
|
|
||||||
|
/* Get the canonical name of the host to whom I am speaking */
|
||||||
|
ch = gethostbyaddr((char *) &cs.sin_addr, sizeof(cs.sin_addr), AF_INET);
|
||||||
|
if (ch == NULL){
|
||||||
|
pop_log(p,POP_PRIORITY,
|
||||||
|
"Unable to get canonical name of client, err = %d",errno);
|
||||||
|
p->client = p->ipaddr;
|
||||||
|
}
|
||||||
|
/* Save the cannonical name of the client host in
|
||||||
|
the POP parameter block */
|
||||||
|
else {
|
||||||
|
|
||||||
|
#ifndef BIND43
|
||||||
|
p->client = ch->h_name;
|
||||||
|
#else
|
||||||
|
# include <arpa/nameser.h>
|
||||||
|
# include <resolv.h>
|
||||||
|
|
||||||
|
/* Distrust distant nameservers */
|
||||||
|
extern struct state _res;
|
||||||
|
struct hostent * ch_again;
|
||||||
|
char * * addrp;
|
||||||
|
|
||||||
|
/* We already have a fully-qualified name */
|
||||||
|
_res.options &= ~RES_DEFNAMES;
|
||||||
|
|
||||||
|
/* See if the name obtained for the client's IP
|
||||||
|
address returns an address */
|
||||||
|
if ((ch_again = gethostbyname(ch->h_name)) == NULL) {
|
||||||
|
pop_log(p,POP_PRIORITY,
|
||||||
|
"Client at \"%s\" resolves to an unknown host name \"%s\"",
|
||||||
|
p->ipaddr,ch->h_name);
|
||||||
|
p->client = p->ipaddr;
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
/* Save the host name (the previous value was
|
||||||
|
destroyed by gethostbyname) */
|
||||||
|
p->client = ch_again->h_name;
|
||||||
|
|
||||||
|
/* Look for the client's IP address in the list returned
|
||||||
|
for its name */
|
||||||
|
for (addrp=ch_again->h_addr_list; *addrp; ++addrp)
|
||||||
|
if (bcmp(*addrp,&(cs.sin_addr),sizeof(cs.sin_addr)) == 0) break;
|
||||||
|
|
||||||
|
if (!*addrp) {
|
||||||
|
pop_log (p,POP_PRIORITY,
|
||||||
|
"Client address \"%s\" not listed for its host name \"%s\"",
|
||||||
|
p->ipaddr,ch->h_name);
|
||||||
|
p->client = p->ipaddr;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
#endif BIND43
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Create input file stream for TCP/IP communication */
|
||||||
|
if ((p->input = fdopen(sp,"r")) == NULL){
|
||||||
|
pop_log(p,POP_PRIORITY,
|
||||||
|
"Unable to open communication stream for input, err = %d",errno);
|
||||||
|
exit (-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Create output file stream for TCP/IP communication */
|
||||||
|
if ((p->output = fdopen(sp,"w")) == NULL){
|
||||||
|
pop_log(p,POP_PRIORITY,
|
||||||
|
"Unable to open communication stream for output, err = %d",errno);
|
||||||
|
exit (-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
pop_log(p,POP_PRIORITY,
|
||||||
|
"(v%s) Servicing request from \"%s\" at %s\n",
|
||||||
|
VERSION,p->client,p->ipaddr);
|
||||||
|
|
||||||
|
#ifdef DEBUG
|
||||||
|
if (p->trace)
|
||||||
|
pop_log(p,POP_PRIORITY,
|
||||||
|
"Tracing session and debugging information in file \"%s\"",
|
||||||
|
trace_file_name);
|
||||||
|
else if (p->debug)
|
||||||
|
pop_log(p,POP_PRIORITY,"Debugging turned on");
|
||||||
|
#endif DEBUG
|
||||||
|
|
||||||
|
return(POP_SUCCESS);
|
||||||
|
}
|
||||||
29
appl/popper/pop_user.c
Normal file
29
appl/popper/pop_user.c
Normal file
@@ -0,0 +1,29 @@
|
|||||||
|
/*
|
||||||
|
* Copyright (c) 1989 Regents of the University of California.
|
||||||
|
* All rights reserved. The Berkeley software License Agreement
|
||||||
|
* specifies the terms and conditions for redistribution.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#ifndef lint
|
||||||
|
static char copyright[] = "Copyright (c) 1990 Regents of the University of California.\nAll rights reserved.\n";
|
||||||
|
static char SccsId[] = "@(#)@(#)pop_user.c 2.1 2.1 3/18/91";
|
||||||
|
#endif not lint
|
||||||
|
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <sys/types.h>
|
||||||
|
#include <strings.h>
|
||||||
|
#include "popper.h"
|
||||||
|
|
||||||
|
/*
|
||||||
|
* user: Prompt for the user name at the start of a POP session
|
||||||
|
*/
|
||||||
|
|
||||||
|
int pop_user (p)
|
||||||
|
POP * p;
|
||||||
|
{
|
||||||
|
/* Save the user name */
|
||||||
|
(void)strcpy(p->user, p->pop_parm[1]);
|
||||||
|
|
||||||
|
/* Tell the user that the password is required */
|
||||||
|
return (pop_msg(p,POP_SUCCESS,"Password required for %s.",p->user));
|
||||||
|
}
|
||||||
Reference in New Issue
Block a user