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