usr.sbin/mailwrapper/mailwrapper.c

   1 /*      $OpenBSD: mailwrapper.c,v 1.6 1999/12/17 05:06:28 mickey Exp $  */
   2 /*      $NetBSD: mailwrapper.c,v 1.3 1999/05/29 18:18:15 christos Exp $ */
   3 /* $FreeBSD: src/usr.sbin/mailwrapper/mailwrapper.c,v 1.4.2.3 2001/10/01 12:52:47 dd Exp $ */
   4
   5 /*
   6  * Copyright (c) 1998
   7  *      Perry E. Metzger.  All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 3. All advertising materials mentioning features or use of this software
  18  *    must display the following acknowledgment:
  19  *      This product includes software developed for the NetBSD Project
  20  *      by Perry E. Metzger.
  21  * 4. The name of the author may not be used to endorse or promote products
  22  *    derived from this software without specific prior written permission.
  23  *
  24  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  25  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  26  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  27  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  28  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  29  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  30  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  31  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  32  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  33  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  34  */
  35
  36 #include <err.h>
  37 #include <stdio.h>
  38 #include <string.h>
  39 #include <stdlib.h>
  40 #include <unistd.h>
  41 #include <libutil.h>
  42 #include <syslog.h>
  43 #include <stdarg.h>
  44
  45 #include "pathnames.h"
  46
  47 struct arglist {
  48         size_t argc, maxc;
  49         char **argv;
  50 };
  51
  52 int main __P((int, char *[], char *[]));
  53
  54 static void initarg __P((struct arglist *));
  55 static void addarg __P((struct arglist *, const char *, int));
  56 static void freearg __P((struct arglist *, int));
  57
  58 extern const char *__progname;  /* from crt0.o */
  59
  60 static void
  61 initarg(al)
  62         struct arglist *al;
  63 {
  64         al->argc = 0;
  65         al->maxc = 10;
  66         if ((al->argv = malloc(al->maxc * sizeof(char *))) == NULL)
  67                 err(1, NULL);
  68 }
  69
  70 static void
  71 addarg(al, arg, copy)
  72         struct arglist *al;
  73         const char *arg;
  74         int copy;
  75 {
  76         char **argv2;
  77
  78         if (al->argc == al->maxc) {
  79                 al->maxc <<= 1;
  80
  81                 if ((argv2 = realloc(al->argv,
  82                     al->maxc * sizeof(char *))) == NULL) {
  83                         if (al->argv)
  84                                 free(al->argv);
  85                         al->argv = NULL;
  86                         err(1, NULL);
  87                 } else {
  88                         al->argv = argv2;
  89                 }
  90         }
  91         if (copy) {
  92                 if ((al->argv[al->argc++] = strdup(arg)) == NULL)
  93                         err(1, NULL);
  94         } else
  95                 al->argv[al->argc++] = (char *)arg;
  96 }
  97
  98 static void
  99 freearg(al, copy)
 100         struct arglist *al;
 101         int copy;
 102 {
 103         size_t i;
 104         if (copy)
 105                 for (i = 0; i < al->argc; i++)
 106                         free(al->argv[i]);
 107         free(al->argv);
 108 }
 109
 110 int
 111 main(argc, argv, envp)
 112         int argc;
 113         char *argv[];
 114         char *envp[];
 115 {
 116         FILE *config;
 117         char *line, *cp, *from, *to, *ap;
 118         size_t len, lineno = 0;
 119         struct arglist al;
 120
 121         initarg(&al);
 122         for (len = 0; len < argc; len++)
 123                 addarg(&al, argv[len], 0);
 124
 125         if ((config = fopen(_PATH_MAILERCONF, "r")) == NULL) {
 126                 addarg(&al, NULL, 0);
 127                 openlog("mailwrapper", LOG_PID, LOG_MAIL);
 128                 syslog(LOG_INFO, "can't open %s, using %s as default MTA",
 129                     _PATH_MAILERCONF, _PATH_DEFAULTMTA);
 130                 closelog();
 131                 execve(_PATH_DEFAULTMTA, al.argv, envp);
 132                 freearg(&al, 0);
 133                 err(1, "execing %s", _PATH_DEFAULTMTA);
 134                 /*NOTREACHED*/
 135         }
 136
 137         for (;;) {
 138                 if ((line = fparseln(config, &len, &lineno, NULL, 0)) == NULL) {
 139                         if (feof(config))
 140                                 errx(1, "no mapping in %s", _PATH_MAILERCONF);
 141                         err(1, "can't parse line %lu", (u_long)lineno);
 142                 }
 143
 144 #define WS      " \t\n"
 145                 cp = line;
 146
 147                 cp += strspn(cp, WS);
 148                 if (cp[0] == '\0') {
 149                         /* empty line */
 150                         free(line);
 151                         continue;
 152                 }
 153
 154                 if ((from = strsep(&cp, WS)) == NULL)
 155                         goto parse_error;
 156
 157                 cp += strspn(cp, WS);
 158
 159                 if ((to = strsep(&cp, WS)) == NULL)
 160                         goto parse_error;
 161
 162                 if (strcmp(from, __progname) == 0) {
 163                         for (ap = strsep(&cp, WS); ap != NULL;
 164                             ap = strsep(&cp, WS))
 165                             if (*ap)
 166                                     addarg(&al, ap, 0);
 167                         break;
 168                 }
 169
 170                 free(line);
 171         }
 172
 173         (void)fclose(config);
 174
 175         addarg(&al, NULL, 0);
 176         execve(to, al.argv, envp);
 177         freearg(&al, 0);
 178         warn("execing %s", to);
 179         free(line);
 180         exit(1);
 181         /*NOTREACHED*/
 182 parse_error:
 183         freearg(&al, 0);
 184         free(line);
 185         errx(1, "parse error in %s at line %lu",
 186             _PATH_MAILERCONF, (u_long)lineno);
 187         /*NOTREACHED*/
 188 }