summaryrefslogtreecommitdiff
path: root/rmail/rmail.c
diff options
context:
space:
mode:
Diffstat (limited to 'rmail/rmail.c')
-rw-r--r--rmail/rmail.c430
1 files changed, 0 insertions, 430 deletions
diff --git a/rmail/rmail.c b/rmail/rmail.c
deleted file mode 100644
index f3f5cf6..0000000
--- a/rmail/rmail.c
+++ /dev/null
@@ -1,430 +0,0 @@
-/*
- * Copyright (c) 1998 Sendmail, Inc. All rights reserved.
- * Copyright (c) 1988, 1993
- * The Regents of the University of California. All rights reserved.
- *
- * By using this file, you agree to the terms and conditions set
- * forth in the LICENSE file which can be found at the top level of
- * the sendmail distribution.
- *
- */
-
-#ifndef lint
-static char copyright[] =
-"@(#) Copyright (c) 1988, 1993\n\
- The Regents of the University of California. All rights reserved.\n";
-#endif /* not lint */
-
-#ifndef lint
-static char sccsid[] = "@(#)rmail.c 8.18 (Berkeley) 10/23/1998";
-#endif /* not lint */
-
-/*
- * RMAIL -- UUCP mail server.
- *
- * This program reads the >From ... remote from ... lines that UUCP is so
- * fond of and turns them into something reasonable. It then execs sendmail
- * with various options built from these lines.
- *
- * The expected syntax is:
- *
- * <user> := [-a-z0-9]+
- * <date> := ctime format
- * <site> := [-a-z0-9!]+
- * <blank line> := "^\n$"
- * <from> := "From" <space> <user> <space> <date>
- * [<space> "remote from" <space> <site>]
- * <forward> := ">" <from>
- * msg := <from> <forward>* <blank-line> <body>
- *
- * The output of rmail(8) compresses the <forward> lines into a single
- * from path.
- *
- * The err(3) routine is included here deliberately to make this code
- * a bit more portable.
- */
-#include <sys/param.h>
-#include <sys/stat.h>
-#include <sys/wait.h>
-
-#include <ctype.h>
-#include <fcntl.h>
-#ifdef BSD4_4
-# define FORK vfork
-# include <paths.h>
-#else
-# define FORK fork
-# ifndef _PATH_SENDMAIL
-# define _PATH_SENDMAIL "/usr/lib/sendmail"
-# endif
-#endif
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-#ifdef EX_OK
-# undef EX_OK /* unistd.h may have another use for this */
-#endif
-#include <sysexits.h>
-
-#ifndef MAX
-# define MAX(a, b) ((a) < (b) ? (b) : (a))
-#endif
-
-#ifndef __P
-# ifdef __STDC__
-# define __P(protos) protos
-# else
-# define __P(protos) ()
-# define const
-# endif
-#endif
-
-#if defined(BSD4_4) || defined(linux) || SOLARIS >= 20600 || (SOLARIS < 10000 && SOLARIS >= 206)
-# define HASSNPRINTF 1
-#endif
-
-#if defined(IRIX64) || defined(IRIX5) || defined(IRIX6) || \
- defined(BSD4_4) || defined(__osf__) || defined(__GNU_LIBRARY__)
-# ifndef HASSTRERROR
-# define HASSTRERROR 1 /* has strerror(3) */
-# endif
-#endif
-
-#if !HASSTRERROR
-extern char *strerror __P((int));
-#endif
-
-#if defined(sun) && !defined(BSD) && !defined(SOLARIS) && !defined(__svr4__) && !defined(__SVR4)
-# define memmove(d, s, l) (bcopy((s), (d), (l)))
-#endif
-
-#if !HASSNPRINTF
-extern int snprintf __P((char *, size_t, const char *, ...));
-#endif /* !HASSNPRINTF */
-
-u_char tTdvect[100];
-
-void err __P((int, const char *, ...));
-void usage __P((void));
-char *xalloc __P((int));
-
-#define newstr(s) strcpy(xalloc(strlen(s) + 1), s)
-
-char *
-xalloc(sz)
- register int sz;
-{
- register char *p;
-
- /* some systems can't handle size zero mallocs */
- if (sz <= 0)
- sz = 1;
-
- p = malloc((unsigned) sz);
- if (p == NULL)
- err(EX_TEMPFAIL, "out of memory");
- return (p);
-}
-
-int
-main(argc, argv)
- int argc;
- char *argv[];
-{
- extern char *optarg;
- extern int errno, optind;
- FILE *fp;
- struct stat sb;
- size_t fplen = 0, fptlen = 0, len;
- off_t offset;
- int ch, debug, i, pdes[2], pid, status;
- char *addrp = NULL, *domain, *p, *t;
- char *from_path, *from_sys, *from_user;
- char *args[100], buf[2048], lbuf[2048];
-
- debug = 0;
- domain = "UUCP"; /* Default "domain". */
- while ((ch = getopt(argc, argv, "D:T")) != EOF)
- switch (ch) {
- case 'T':
- debug = 1;
- break;
- case 'D':
- domain = optarg;
- break;
- case '?':
- default:
- usage();
- }
- argc -= optind;
- argv += optind;
-
- if (argc < 1)
- usage();
-
- from_path = from_sys = from_user = NULL;
- for (offset = 0;;) {
-
- /* Get and nul-terminate the line. */
- if (fgets(lbuf, sizeof(lbuf), stdin) == NULL)
- exit (EX_DATAERR);
- if ((p = strchr(lbuf, '\n')) == NULL)
- err(EX_DATAERR, "line too long");
- *p = '\0';
-
- /* Parse lines until reach a non-"From" line. */
- if (!strncmp(lbuf, "From ", 5))
- addrp = lbuf + 5;
- else if (!strncmp(lbuf, ">From ", 6))
- addrp = lbuf + 6;
- else if (offset == 0)
- err(EX_DATAERR,
- "missing or empty From line: %s", lbuf);
- else {
- *p = '\n';
- break;
- }
-
- if (*addrp == '\0')
- err(EX_DATAERR, "corrupted From line: %s", lbuf);
-
- /* Use the "remote from" if it exists. */
- for (p = addrp; (p = strchr(p + 1, 'r')) != NULL;)
- if (!strncmp(p, "remote from ", 12)) {
- for (t = p += 12;
- *t && !(isascii(*t) && isspace(*t)); ++t);
- *t = '\0';
- if (debug)
- (void)fprintf(stderr,
- "remote from: %s\n", p);
- break;
- }
-
- /* Else use the string up to the last bang. */
- if (p == NULL) {
- if (*addrp == '!')
- err(EX_DATAERR,
- "bang starts address: %s", addrp);
- else if ((t = strrchr(addrp, '!')) != NULL) {
- *t = '\0';
- p = addrp;
- addrp = t + 1;
- if (*addrp == '\0')
- err(EX_DATAERR,
- "corrupted From line: %s", lbuf);
- if (debug)
- (void)fprintf(stderr, "bang: %s\n", p);
- }
- }
- /* 'p' now points to any system string from this line. */
- if (p != NULL) {
- /* Nul terminate it as necessary. */
- for (t = p; *t && !(isascii(*t) && isspace(*t)); ++t);
- *t = '\0';
-
- /* If the first system, copy to the from_sys string. */
- if (from_sys == NULL) {
- from_sys = newstr(p);
- if (debug)
- (void)fprintf(stderr,
- "from_sys: %s\n", from_sys);
- }
-
- /* Concatenate to the path string. */
- len = t - p;
- if (from_path == NULL) {
- fplen = 0;
- if ((from_path = malloc(fptlen = 256)) == NULL)
- err(EX_TEMPFAIL, NULL);
- }
- if (fplen + len + 2 > fptlen) {
- fptlen += MAX(fplen + len + 2, 256);
- if ((from_path =
- realloc(from_path, fptlen)) == NULL)
- err(EX_TEMPFAIL, NULL);
- }
- memmove(from_path + fplen, p, len);
- fplen += len;
- from_path[fplen++] = '!';
- from_path[fplen] = '\0';
- }
-
- /* Save off from user's address; the last one wins. */
- for (p = addrp; *p && !(isascii(*p) && isspace(*p)); ++p);
- *p = '\0';
- if (*addrp == '\0')
- addrp = "<>";
- if (from_user != NULL)
- free(from_user);
- from_user = newstr(addrp);
-
- if (debug) {
- if (from_path != NULL)
- (void)fprintf(stderr,
- "from_path: %s\n", from_path);
- (void)fprintf(stderr, "from_user: %s\n", from_user);
- }
-
- if (offset != -1)
- offset = (off_t)ftell(stdin);
- }
-
- i = 0;
- args[i++] = _PATH_SENDMAIL; /* Build sendmail's argument list. */
- args[i++] = "-oee"; /* No errors, just status. */
- args[i++] = "-odq"; /* Queue it, don't try to deliver. */
- args[i++] = "-oi"; /* Ignore '.' on a line by itself. */
-
- /* set from system and protocol used */
- if (from_sys == NULL)
- (void)snprintf(buf, sizeof(buf), "-p%s", domain);
- else if (strchr(from_sys, '.') == NULL)
- (void)snprintf(buf, sizeof(buf), "-p%s:%s.%s",
- domain, from_sys, domain);
- else
- (void)snprintf(buf, sizeof(buf), "-p%s:%s", domain, from_sys);
- args[i++] = newstr(buf);
-
- /* Set name of ``from'' person. */
- (void)snprintf(buf, sizeof(buf), "-f%s%s",
- from_path ? from_path : "", from_user);
- args[i++] = newstr(buf);
-
- /*
- * Don't copy arguments beginning with - as they will be
- * passed to sendmail and could be interpreted as flags.
- * To prevent confusion of sendmail wrap < and > around
- * the address (helps to pass addrs like @gw1,@gw2:aa@bb)
- */
- while (*argv) {
- if (**argv == '-')
- err(EX_USAGE, "dash precedes argument: %s", *argv);
- if (strchr(*argv, ',') == NULL || strchr(*argv, '<') != NULL)
- args[i++] = *argv;
- else {
- if ((args[i] = malloc(strlen(*argv) + 3)) == NULL)
- err(EX_TEMPFAIL, "Cannot malloc");
- sprintf (args [i++], "<%s>", *argv);
- }
- argv++;
- }
- args[i] = 0;
-
- if (debug) {
- (void)fprintf(stderr, "Sendmail arguments:\n");
- for (i = 0; args[i]; i++)
- (void)fprintf(stderr, "\t%s\n", args[i]);
- }
-
- /*
- * If called with a regular file as standard input, seek to the right
- * position in the file and just exec sendmail. Could probably skip
- * skip the stat, but it's not unreasonable to believe that a failed
- * seek will cause future reads to fail.
- */
- if (!fstat(STDIN_FILENO, &sb) && S_ISREG(sb.st_mode)) {
- if (lseek(STDIN_FILENO, offset, SEEK_SET) != offset)
- err(EX_TEMPFAIL, "stdin seek");
- execv(_PATH_SENDMAIL, args);
- err(EX_OSERR, "%s", _PATH_SENDMAIL);
- }
-
- if (pipe(pdes) < 0)
- err(EX_OSERR, NULL);
-
- switch (pid = FORK()) {
- case -1: /* Err. */
- err(EX_OSERR, NULL);
- case 0: /* Child. */
- if (pdes[0] != STDIN_FILENO) {
- (void)dup2(pdes[0], STDIN_FILENO);
- (void)close(pdes[0]);
- }
- (void)close(pdes[1]);
- execv(_PATH_SENDMAIL, args);
- _exit(127);
- /* NOTREACHED */
- }
-
- if ((fp = fdopen(pdes[1], "w")) == NULL)
- err(EX_OSERR, NULL);
- (void)close(pdes[0]);
-
- /* Copy the file down the pipe. */
- do {
- (void)fprintf(fp, "%s", lbuf);
- } while (fgets(lbuf, sizeof(lbuf), stdin) != NULL);
-
- if (ferror(stdin))
- err(EX_TEMPFAIL, "stdin: %s", strerror(errno));
-
- if (fclose(fp))
- err(EX_OSERR, NULL);
-
- if ((waitpid(pid, &status, 0)) == -1)
- err(EX_OSERR, "%s", _PATH_SENDMAIL);
-
- if (!WIFEXITED(status))
- err(EX_OSERR,
- "%s: did not terminate normally", _PATH_SENDMAIL);
-
- if (WEXITSTATUS(status))
- err(status, "%s: terminated with %d (non-zero) status",
- _PATH_SENDMAIL, WEXITSTATUS(status));
- exit(EX_OK);
-}
-
-void
-usage()
-{
- (void)fprintf(stderr, "usage: rmail [-T] [-D domain] user ...\n");
- exit(EX_USAGE);
-}
-
-#ifdef __STDC__
-#include <stdarg.h>
-#else
-#include <varargs.h>
-#endif
-
-void
-#ifdef __STDC__
-err(int eval, const char *fmt, ...)
-#else
-err(eval, fmt, va_alist)
- int eval;
- const char *fmt;
- va_dcl
-#endif
-{
- va_list ap;
-#if __STDC__
- va_start(ap, fmt);
-#else
- va_start(ap);
-#endif
- (void)fprintf(stderr, "rmail: ");
- (void)vfprintf(stderr, fmt, ap);
- va_end(ap);
- (void)fprintf(stderr, "\n");
- exit(eval);
-}
-
-#if !HASSTRERROR
-
-char *
-strerror(eno)
- int eno;
-{
- extern int sys_nerr;
- extern char *sys_errlist[];
- static char ebuf[60];
-
- if (eno >= 0 && eno < sys_nerr)
- return sys_errlist[eno];
- (void) sprintf(ebuf, "Error %d", eno);
- return ebuf;
-}
-
-#endif /* !HASSTRERROR */
generated by cgit v1.2.3 (git 2.39.1) at 2025-04-27 16:11:06 +0000