1 /*
2 * Copyright (c) 1998-2006, 2008, 2009 Sendmail, Inc. and its suppliers.
3 * All rights reserved.
4 * Copyright (c) 1983, 1995-1997 Eric P. Allman. All rights reserved.
5 * Copyright (c) 1988, 1993
6 * The Regents of the University of California. All rights reserved.
7 *
8 * By using this file, you agree to the terms and conditions set
9 * forth in the LICENSE file which can be found at the top level of
10 * the sendmail distribution.
11 *
12 */
13
14 #include <sendmail.h>
15 #include <sm/sendmail.h>
16
17 SM_RCSID("@(#)$Id: readcf.c,v 8.674 2009/10/26 17:47:00 ca Exp $")
18
19 #if NETINET || NETINET6
20 # include <arpa/inet.h>
21 #endif /* NETINET || NETINET6 */
22
23 #define SECONDS
24 #define MINUTES * 60
25 #define HOUR * 3600
26 #define HOURS HOUR
27
28 static void fileclass __P((int, char *, char *, bool, bool, bool));
29 static char **makeargv __P((char *));
30 static void settimeout __P((char *, char *, bool));
31 static void toomany __P((int, int));
32 static char *extrquotstr __P((char *, char **, char *, bool *));
33 static void parse_class_words __P((int, char *));
34
35 /*
36 ** READCF -- read configuration file.
37 **
38 ** This routine reads the configuration file and builds the internal
39 ** form.
40 **
41 ** The file is formatted as a sequence of lines, each taken
42 ** atomically. The first character of each line describes how
43 ** the line is to be interpreted. The lines are:
44 ** Dxval Define macro x to have value val.
45 ** Cxword Put word into class x.
46 ** Fxfile [fmt] Read file for lines to put into
47 ** class x. Use scanf string 'fmt'
48 ** or "%s" if not present. Fmt should
49 ** only produce one string-valued result.
50 ** Hname: value Define header with field-name 'name'
51 ** and value as specified; this will be
52 ** macro expanded immediately before
53 ** use.
54 ** Sn Use rewriting set n.
55 ** Rlhs rhs Rewrite addresses that match lhs to
56 ** be rhs.
57 ** Mn arg=val... Define mailer. n is the internal name.
58 ** Args specify mailer parameters.
59 ** Oxvalue Set option x to value.
60 ** O option value Set option (long name) to value.
61 ** Pname=value Set precedence name to value.
62 ** Qn arg=val... Define queue groups. n is the internal name.
63 ** Args specify queue parameters.
64 ** Vversioncode[/vendorcode]
65 ** Version level/vendor name of
66 ** configuration syntax.
67 ** Kmapname mapclass arguments....
68 ** Define keyed lookup of a given class.
69 ** Arguments are class dependent.
70 ** Eenvar=value Set the environment value to the given value.
71 **
72 ** Parameters:
73 ** cfname -- configuration file name.
74 ** safe -- true if this is the system config file;
75 ** false otherwise.
76 ** e -- the main envelope.
77 **
78 ** Returns:
79 ** none.
80 **
81 ** Side Effects:
82 ** Builds several internal tables.
83 */
84
85 void
readcf(cfname,safe,e)86 readcf(cfname, safe, e)
87 char *cfname;
88 bool safe;
89 register ENVELOPE *e;
90 {
91 SM_FILE_T *cf;
92 int ruleset = -1;
93 char *q;
94 struct rewrite *rwp = NULL;
95 char *bp;
96 auto char *ep;
97 int nfuzzy;
98 char *file;
99 bool optional;
100 bool ok;
101 bool ismap;
102 int mid;
103 register char *p;
104 long sff = SFF_OPENASROOT;
105 struct stat statb;
106 char buf[MAXLINE];
107 int bufsize;
108 char exbuf[MAXLINE];
109 char pvpbuf[MAXLINE + MAXATOM];
110 static char *null_list[1] = { NULL };
111 extern unsigned char TokTypeNoC[];
112
113 FileName = cfname;
114 LineNumber = 0;
115
116 #if STARTTLS
117 Srv_SSL_Options = Clt_SSL_Options = SSL_OP_ALL;
118 #endif /* STARTTLS */
119 if (DontLockReadFiles)
120 sff |= SFF_NOLOCK;
121 cf = safefopen(cfname, O_RDONLY, 0444, sff);
122 if (cf == NULL)
123 {
124 syserr("cannot open");
125 finis(false, true, EX_OSFILE);
126 }
127
128 if (fstat(sm_io_getinfo(cf, SM_IO_WHAT_FD, NULL), &statb) < 0)
129 {
130 syserr("cannot fstat");
131 finis(false, true, EX_OSFILE);
132 }
133
134 if (!S_ISREG(statb.st_mode))
135 {
136 syserr("not a plain file");
137 finis(false, true, EX_OSFILE);
138 }
139
140 if (OpMode != MD_TEST && bitset(S_IWGRP|S_IWOTH, statb.st_mode))
141 {
142 if (OpMode == MD_DAEMON || OpMode == MD_INITALIAS || OpMode == MD_CHECKCONFIG)
143 (void) sm_io_fprintf(smioerr, SM_TIME_DEFAULT,
144 "%s: WARNING: dangerous write permissions\n",
145 FileName);
146 if (LogLevel > 0)
147 sm_syslog(LOG_CRIT, NOQID,
148 "%s: WARNING: dangerous write permissions",
149 FileName);
150 }
151
152 #if XLA
153 xla_zero();
154 #endif /* XLA */
155
156 while (bufsize = sizeof(buf),
157 (bp = fgetfolded(buf, &bufsize, cf)) != NULL)
158 {
159 char *nbp;
160
161 if (bp[0] == '#')
162 {
163 if (bp != buf)
164 sm_free(bp); /* XXX */
165 continue;
166 }
167
168 /* do macro expansion mappings */
169 nbp = translate_dollars(bp, bp, &bufsize);
170 if (nbp != bp && bp != buf)
171 sm_free(bp);
172 bp = nbp;
173
174 /* interpret this line */
175 errno = 0;
176 switch (bp[0])
177 {
178 case '\0':
179 case '#': /* comment */
180 break;
181
182 case 'R': /* rewriting rule */
183 if (ruleset < 0)
184 {
185 syserr("missing valid ruleset for \"%s\"", bp);
186 break;
187 }
188 for (p = &bp[1]; *p != '\0' && *p != '\t'; p++)
189 continue;
190
191 if (*p == '\0')
192 {
193 syserr("invalid rewrite line \"%s\" (tab expected)", bp);
194 break;
195 }
196
197 /* allocate space for the rule header */
198 if (rwp == NULL)
199 {
200 RewriteRules[ruleset] = rwp =
201 (struct rewrite *) xalloc(sizeof(*rwp));
202 }
203 else
204 {
205 rwp->r_next = (struct rewrite *) xalloc(sizeof(*rwp));
206 rwp = rwp->r_next;
207 }
208 rwp->r_next = NULL;
209
210 /* expand and save the LHS */
211 *p = '\0';
212 expand(&bp[1], exbuf, sizeof(exbuf), e);
213 rwp->r_lhs = prescan(exbuf, '\t', pvpbuf,
214 sizeof(pvpbuf), NULL,
215 ConfigLevel >= 9 ? TokTypeNoC : IntTokenTab,
216 true);
217 nfuzzy = 0;
218 if (rwp->r_lhs != NULL)
219 {
220 register char **ap;
221
222 rwp->r_lhs = copyplist(rwp->r_lhs, true, NULL);
223
224 /* count the number of fuzzy matches in LHS */
225 for (ap = rwp->r_lhs; *ap != NULL; ap++)
226 {
227 char *botch;
228
229 botch = NULL;
230 switch (ap[0][0] & 0377)
231 {
232 case MATCHZANY:
233 case MATCHANY:
234 case MATCHONE:
235 case MATCHCLASS:
236 case MATCHNCLASS:
237 nfuzzy++;
238 break;
239
240 case MATCHREPL:
241 botch = "$1-$9";
242 break;
243
244 case CANONUSER:
245 botch = "$:";
246 break;
247
248 case CALLSUBR:
249 botch = "$>";
250 break;
251
252 case CONDIF:
253 botch = "$?";
254 break;
255
256 case CONDFI:
257 botch = "$.";
258 break;
259
260 case HOSTBEGIN:
261 botch = "$[";
262 break;
263
264 case HOSTEND:
265 botch = "$]";
266 break;
267
268 case LOOKUPBEGIN:
269 botch = "$(";
270 break;
271
272 case LOOKUPEND:
273 botch = "$)";
274 break;
275 }
276 if (botch != NULL)
277 syserr("Inappropriate use of %s on LHS",
278 botch);
279 }
280 rwp->r_line = LineNumber;
281 }
282 else
283 {
284 syserr("R line: null LHS");
285 rwp->r_lhs = null_list;
286 }
287 if (nfuzzy > MAXMATCH)
288 {
289 syserr("R line: too many wildcards");
290 rwp->r_lhs = null_list;
291 }
292
293 /* expand and save the RHS */
294 while (*++p == '\t')
295 continue;
296 q = p;
297 while (*p != '\0' && *p != '\t')
298 p++;
299 *p = '\0';
300 expand(q, exbuf, sizeof(exbuf), e);
301 rwp->r_rhs = prescan(exbuf, '\t', pvpbuf,
302 sizeof(pvpbuf), NULL,
303 ConfigLevel >= 9 ? TokTypeNoC : IntTokenTab,
304 true);
305 if (rwp->r_rhs != NULL)
306 {
307 register char **ap;
308 int args, endtoken;
309 #if _FFR_EXTRA_MAP_CHECK
310 int nexttoken;
311 #endif /* _FFR_EXTRA_MAP_CHECK */
312 bool inmap;
313
314 rwp->r_rhs = copyplist(rwp->r_rhs, true, NULL);
315
316 /* check no out-of-bounds replacements */
317 nfuzzy += '0';
318 inmap = false;
319 args = 0;
320 endtoken = 0;
321 for (ap = rwp->r_rhs; *ap != NULL; ap++)
322 {
323 char *botch;
324
325 botch = NULL;
326 switch (ap[0][0] & 0377)
327 {
328 case MATCHREPL:
329 if (ap[0][1] <= '0' ||
330 ap[0][1] > nfuzzy)
331 {
332 syserr("replacement $%c out of bounds",
333 ap[0][1]);
334 }
335 break;
336
337 case MATCHZANY:
338 botch = "$*";
339 break;
340
341 case MATCHANY:
342 botch = "$+";
343 break;
344
345 case MATCHONE:
346 botch = "$-";
347 break;
348
349 case MATCHCLASS:
350 botch = "$=";
351 break;
352
353 case MATCHNCLASS:
354 botch = "$~";
355 break;
356
357 case CANONHOST:
358 if (!inmap)
359 break;
360 if (++args >= MAX_MAP_ARGS)
361 syserr("too many arguments for map lookup");
362 break;
363
364 case HOSTBEGIN:
365 endtoken = HOSTEND;
366 /* FALLTHROUGH */
367 case LOOKUPBEGIN:
368 /* see above... */
369 if ((ap[0][0] & 0377) == LOOKUPBEGIN)
370 endtoken = LOOKUPEND;
371 if (inmap)
372 syserr("cannot nest map lookups");
373 inmap = true;
374 args = 0;
375 #if _FFR_EXTRA_MAP_CHECK
376 if (ap[1] == NULL)
377 {
378 syserr("syntax error in map lookup");
379 break;
380 }
381 nexttoken = ap[1][0] & 0377;
382 if (nexttoken == CANONHOST ||
383 nexttoken == CANONUSER ||
384 nexttoken == endtoken))
385 {
386 syserr("missing map name for lookup");
387 break;
388 }
389 if (ap[2] == NULL)
390 {
391 syserr("syntax error in map lookup");
392 break;
393 }
394 if (ap[0][0] == HOSTBEGIN)
395 break;
396 nexttoken = ap[2][0] & 0377;
397 if (nexttoken == CANONHOST ||
398 nexttoken == CANONUSER ||
399 nexttoken == endtoken)
400 {
401 syserr("missing key name for lookup");
402 break;
403 }
404 #endif /* _FFR_EXTRA_MAP_CHECK */
405 break;
406
407 case HOSTEND:
408 case LOOKUPEND:
409 if ((ap[0][0] & 0377) != endtoken)
410 break;
411 inmap = false;
412 endtoken = 0;
413 break;
414
415
416 #if 0
417 /*
418 ** This doesn't work yet as there are maps defined *after* the cf
419 ** is read such as host, user, and alias. So for now, it's removed.
420 ** When it comes back, the RELEASE_NOTES entry will be:
421 ** Emit warnings for unknown maps when reading the .cf file. Based on
422 ** patch from Robert Harker of Harker Systems.
423 */
424
425 case LOOKUPBEGIN:
426 /*
427 ** Got a database lookup,
428 ** check if map is defined.
429 */
430
431 ep = ap[1];
432 if ((ep[0] & 0377) != MACRODEXPAND &&
433 stab(ep, ST_MAP, ST_FIND) == NULL)
434 {
435 (void) sm_io_fprintf(smioout,
436 SM_TIME_DEFAULT,
437 "Warning: %s: line %d: map %s not found\n",
438 FileName,
439 LineNumber,
440 ep);
441 }
442 break;
443 #endif /* 0 */
444 }
445 if (botch != NULL)
446 syserr("Inappropriate use of %s on RHS",
447 botch);
448 }
449 if (inmap)
450 syserr("missing map closing token");
451 }
452 else
453 {
454 syserr("R line: null RHS");
455 rwp->r_rhs = null_list;
456 }
457 break;
458
459 case 'S': /* select rewriting set */
460 expand(&bp[1], exbuf, sizeof(exbuf), e);
461 ruleset = strtorwset(exbuf, NULL, ST_ENTER);
462 if (ruleset < 0)
463 break;
464
465 rwp = RewriteRules[ruleset];
466 if (rwp != NULL)
467 {
468 if (OpMode == MD_TEST || OpMode == MD_CHECKCONFIG)
469 (void) sm_io_fprintf(smioout,
470 SM_TIME_DEFAULT,
471 "WARNING: Ruleset %s has multiple definitions\n",
472 &bp[1]);
473 if (tTd(37, 1))
474 sm_dprintf("WARNING: Ruleset %s has multiple definitions\n",
475 &bp[1]);
476 while (rwp->r_next != NULL)
477 rwp = rwp->r_next;
478 }
479 break;
480
481 case 'D': /* macro definition */
482 mid = macid_parse(&bp[1], &ep);
483 if (mid == 0)
484 break;
485 p = munchstring(ep, NULL, '\0');
486 macdefine(&e->e_macro, A_TEMP, mid, p);
487 break;
488
489 case 'H': /* required header line */
490 (void) chompheader(&bp[1], CHHDR_DEF, NULL, e);
491 break;
492
493 case 'C': /* word class */
494 case 'T': /* trusted user (set class `t') */
495 if (bp[0] == 'C')
496 {
497 mid = macid_parse(&bp[1], &ep);
498 if (mid == 0)
499 break;
500 expand(ep, exbuf, sizeof(exbuf), e);
501 p = exbuf;
502 }
503 else
504 {
505 mid = 't';
506 p = &bp[1];
507 }
508 while (*p != '\0')
509 {
510 register char *wd;
511 char delim;
512
513 while (*p != '\0' && isascii(*p) && isspace(*p))
514 p++;
515 wd = p;
516 while (*p != '\0' && !(isascii(*p) && isspace(*p)))
517 p++;
518 delim = *p;
519 *p = '\0';
520 if (wd[0] != '\0')
521 setclass(mid, wd);
522 *p = delim;
523 }
524 break;
525
526 case 'F': /* word class from file */
527 mid = macid_parse(&bp[1], &ep);
528 if (mid == 0)
529 break;
530 for (p = ep; isascii(*p) && isspace(*p); )
531 p++;
532 if (p[0] == '-' && p[1] == 'o')
533 {
534 optional = true;
535 while (*p != '\0' &&
536 !(isascii(*p) && isspace(*p)))
537 p++;
538 while (isascii(*p) && isspace(*p))
539 p++;
540 }
541 else
542 optional = false;
543
544 /* check if [key]@map:spec */
545 ismap = false;
546 if (!SM_IS_DIR_DELIM(*p) &&
547 *p != '|' &&
548 (q = strchr(p, '@')) != NULL)
549 {
550 q++;
551
552 /* look for @LDAP or @map: in string */
553 if (strcmp(q, "LDAP") == 0 ||
554 (*q != ':' &&
555 strchr(q, ':') != NULL))
556 ismap = true;
557 }
558
559 if (ismap)
560 {
561 /* use entire spec */
562 file = p;
563 }
564 else
565 {
566 file = extrquotstr(p, &q, " ", &ok);
567 if (!ok)
568 {
569 syserr("illegal filename '%s'", p);
570 break;
571 }
572 }
573
574 if (*file == '|' || ismap)
575 p = "%s";
576 else
577 {
578 p = q;
579 if (*p == '\0')
580 p = "%s";
581 else
582 {
583 *p = '\0';
584 while (isascii(*++p) && isspace(*p))
585 continue;
586 }
587 }
588 fileclass(mid, file, p, ismap, safe, optional);
589 break;
590
591 #if XLA
592 case 'L': /* extended load average description */
593 xla_init(&bp[1]);
594 break;
595 #endif /* XLA */
596
597 #if defined(SUN_EXTENSIONS) && defined(SUN_LOOKUP_MACRO)
598 case 'L': /* lookup macro */
599 case 'G': /* lookup class */
600 /* reserved for Sun -- NIS+ database lookup */
601 if (VendorCode != VENDOR_SUN)
602 goto badline;
603 sun_lg_config_line(bp, e);
604 break;
605 #endif /* defined(SUN_EXTENSIONS) && defined(SUN_LOOKUP_MACRO) */
606
607 case 'M': /* define mailer */
608 makemailer(&bp[1]);
609 break;
610
611 case 'O': /* set option */
612 setoption(bp[1], &bp[2], safe, false, e);
613 break;
614
615 case 'P': /* set precedence */
616 if (NumPriorities >= MAXPRIORITIES)
617 {
618 toomany('P', MAXPRIORITIES);
619 break;
620 }
621 for (p = &bp[1]; *p != '\0' && *p != '='; p++)
622 continue;
623 if (*p == '\0')
624 goto badline;
625 *p = '\0';
626 Priorities[NumPriorities].pri_name = newstr(&bp[1]);
627 Priorities[NumPriorities].pri_val = atoi(++p);
628 NumPriorities++;
629 break;
630
631 case 'Q': /* define queue */
632 makequeue(&bp[1], true);
633 break;
634
635 case 'V': /* configuration syntax version */
636 for (p = &bp[1]; isascii(*p) && isspace(*p); p++)
637 continue;
638 if (!isascii(*p) || !isdigit(*p))
639 {
640 syserr("invalid argument to V line: \"%.20s\"",
641 &bp[1]);
642 break;
643 }
644 ConfigLevel = strtol(p, &ep, 10);
645
646 /*
647 ** Do heuristic tweaking for back compatibility.
648 */
649
650 if (ConfigLevel >= 5)
651 {
652 /* level 5 configs have short name in $w */
653 p = macvalue('w', e);
654 if (p != NULL && (p = strchr(p, '.')) != NULL)
655 {
656 *p = '\0';
657 macdefine(&e->e_macro, A_TEMP, 'w',
658 macvalue('w', e));
659 }
660 }
661 if (ConfigLevel >= 6)
662 {
663 ColonOkInAddr = false;
664 }
665
666 /*
667 ** Look for vendor code.
668 */
669
670 if (*ep++ == '/')
671 {
672 /* extract vendor code */
673 for (p = ep; isascii(*p) && isalpha(*p); )
674 p++;
675 *p = '\0';
676
677 if (!setvendor(ep))
678 syserr("invalid V line vendor code: \"%s\"",
679 ep);
680 }
681 break;
682
683 case 'K':
684 expand(&bp[1], exbuf, sizeof(exbuf), e);
685 (void) makemapentry(exbuf);
686 break;
687
688 case 'E':
689 p = strchr(bp, '=');
690 if (p != NULL)
691 *p++ = '\0';
692 sm_setuserenv(&bp[1], p);
693 break;
694
695 case 'X': /* mail filter */
696 #if MILTER
697 milter_setup(&bp[1]);
698 #else /* MILTER */
699 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
700 "Warning: Filter usage ('X') requires Milter support (-DMILTER)\n");
701 #endif /* MILTER */
702 break;
703
704 default:
705 badline:
706 syserr("unknown configuration line \"%s\"", bp);
707 }
708 if (bp != buf)
709 sm_free(bp); /* XXX */
710 }
711 if (sm_io_error(cf))
712 {
713 syserr("I/O read error");
714 finis(false, true, EX_OSFILE);
715 }
716 (void) sm_io_close(cf, SM_TIME_DEFAULT);
717 FileName = NULL;
718
719 /* initialize host maps from local service tables */
720 inithostmaps();
721
722 /* initialize daemon (if not defined yet) */
723 initdaemon();
724
725 /* determine if we need to do special name-server frotz */
726 {
727 int nmaps;
728 char *maptype[MAXMAPSTACK];
729 short mapreturn[MAXMAPACTIONS];
730
731 nmaps = switch_map_find("hosts", maptype, mapreturn);
732 UseNameServer = false;
733 if (nmaps > 0 && nmaps <= MAXMAPSTACK)
734 {
735 register int mapno;
736
737 for (mapno = 0; mapno < nmaps && !UseNameServer;
738 mapno++)
739 {
740 if (strcmp(maptype[mapno], "dns") == 0)
741 UseNameServer = true;
742 }
743 }
744 }
745 }
746
747 /*
748 ** TRANSLATE_DOLLARS -- convert $x into internal form
749 **
750 ** Actually does all appropriate pre-processing of a config line
751 ** to turn it into internal form.
752 **
753 ** Parameters:
754 ** ibp -- the buffer to translate.
755 ** obp -- where to put the translation; may be the same as obp
756 ** bsp -- a pointer to the size of obp; will be updated if
757 ** the buffer needs to be replaced.
758 **
759 ** Returns:
760 ** The buffer pointer; may differ from obp if the expansion
761 ** is larger then *bsp, in which case this will point to
762 ** malloc()ed memory which must be free()d by the caller.
763 */
764
765 char *
translate_dollars(ibp,obp,bsp)766 translate_dollars(ibp, obp, bsp)
767 char *ibp;
768 char *obp;
769 int *bsp;
770 {
771 register char *p;
772 auto char *ep;
773 char *bp;
774
775 if (tTd(37, 53))
776 {
777 sm_dprintf("translate_dollars(");
778 xputs(sm_debug_file(), ibp);
779 sm_dprintf(")\n");
780 }
781
782 bp = quote_internal_chars(ibp, obp, bsp);
783
784 for (p = bp; *p != '\0'; p++)
785 {
786 if (*p == '#' && p > bp && ConfigLevel >= 3)
787 {
788 register char *e;
789
790 switch (*--p & 0377)
791 {
792 case MACROEXPAND:
793 /* it's from $# -- let it go through */
794 p++;
795 break;
796
797 case '\\':
798 /* it's backslash escaped */
799 (void) sm_strlcpy(p, p + 1, strlen(p));
800 break;
801
802 default:
803 /* delete leading white space */
804 while (isascii(*p) && isspace(*p) &&
805 *p != '\n' && p > bp)
806 {
807 p--;
808 }
809 if ((e = strchr(++p, '\n')) != NULL)
810 (void) sm_strlcpy(p, e, strlen(p));
811 else
812 *p-- = '\0';
813 break;
814 }
815 continue;
816 }
817
818 if (*p != '$' || p[1] == '\0')
819 continue;
820
821 if (p[1] == '$')
822 {
823 /* actual dollar sign.... */
824 (void) sm_strlcpy(p, p + 1, strlen(p));
825 continue;
826 }
827
828 /* convert to macro expansion character */
829 *p++ = MACROEXPAND;
830
831 /* special handling for $=, $~, $&, and $? */
832 if (*p == '=' || *p == '~' || *p == '&' || *p == '?')
833 p++;
834
835 /* convert macro name to code */
836 *p = macid_parse(p, &ep);
837 if (ep != p + 1)
838 (void) sm_strlcpy(p + 1, ep, strlen(p + 1));
839 }
840
841 /* strip trailing white space from the line */
842 while (--p > bp && isascii(*p) && isspace(*p))
843 *p = '\0';
844
845 if (tTd(37, 53))
846 {
847 sm_dprintf(" translate_dollars => ");
848 xputs(sm_debug_file(), bp);
849 sm_dprintf("\n");
850 }
851
852 return bp;
853 }
854 /*
855 ** TOOMANY -- signal too many of some option
856 **
857 ** Parameters:
858 ** id -- the id of the error line
859 ** maxcnt -- the maximum possible values
860 **
861 ** Returns:
862 ** none.
863 **
864 ** Side Effects:
865 ** gives a syserr.
866 */
867
868 static void
toomany(id,maxcnt)869 toomany(id, maxcnt)
870 int id;
871 int maxcnt;
872 {
873 syserr("too many %c lines, %d max", id, maxcnt);
874 }
875 /*
876 ** FILECLASS -- read members of a class from a file
877 **
878 ** Parameters:
879 ** class -- class to define.
880 ** filename -- name of file to read.
881 ** fmt -- scanf string to use for match.
882 ** ismap -- if set, this is a map lookup.
883 ** safe -- if set, this is a safe read.
884 ** optional -- if set, it is not an error for the file to
885 ** not exist.
886 **
887 ** Returns:
888 ** none
889 **
890 ** Side Effects:
891 ** puts all lines in filename that match a scanf into
892 ** the named class.
893 */
894
895 /*
896 ** Break up the match into words and add to class.
897 */
898
899 static void
parse_class_words(class,line)900 parse_class_words(class, line)
901 int class;
902 char *line;
903 {
904 while (line != NULL && *line != '\0')
905 {
906 register char *q;
907
908 /* strip leading spaces */
909 while (isascii(*line) && isspace(*line))
910 line++;
911 if (*line == '\0')
912 break;
913
914 /* find the end of the word */
915 q = line;
916 while (*line != '\0' && !(isascii(*line) && isspace(*line)))
917 line++;
918 if (*line != '\0')
919 *line++ = '\0';
920
921 /* enter the word in the symbol table */
922 setclass(class, q);
923 }
924 }
925
926 static void
fileclass(class,filename,fmt,ismap,safe,optional)927 fileclass(class, filename, fmt, ismap, safe, optional)
928 int class;
929 char *filename;
930 char *fmt;
931 bool ismap;
932 bool safe;
933 bool optional;
934 {
935 SM_FILE_T *f;
936 long sff;
937 pid_t pid;
938 register char *p;
939 char buf[MAXLINE];
940
941 if (tTd(37, 2))
942 sm_dprintf("fileclass(%s, fmt=%s)\n", filename, fmt);
943
944 if (*filename == '\0')
945 {
946 syserr("fileclass: missing file name");
947 return;
948 }
949 else if (ismap)
950 {
951 int status = 0;
952 char *key;
953 char *mn;
954 char *cl, *spec;
955 STAB *mapclass;
956 MAP map;
957
958 mn = newstr(macname(class));
959
960 key = filename;
961
962 /* skip past key */
963 if ((p = strchr(filename, '@')) == NULL)
964 {
965 /* should not happen */
966 syserr("fileclass: bogus map specification");
967 sm_free(mn);
968 return;
969 }
970
971 /* skip past '@' */
972 *p++ = '\0';
973 cl = p;
974
975 #if LDAPMAP
976 if (strcmp(cl, "LDAP") == 0)
977 {
978 int n;
979 char *lc;
980 char jbuf[MAXHOSTNAMELEN];
981 char lcbuf[MAXLINE];
982
983 /* Get $j */
984 expand("\201j", jbuf, sizeof(jbuf), &BlankEnvelope);
985 if (jbuf[0] == '\0')
986 {
987 (void) sm_strlcpy(jbuf, "localhost",
988 sizeof(jbuf));
989 }
990
991 /* impose the default schema */
992 lc = macvalue(macid("{sendmailMTACluster}"), CurEnv);
993 if (lc == NULL)
994 lc = "";
995 else
996 {
997 expand(lc, lcbuf, sizeof(lcbuf), CurEnv);
998 lc = lcbuf;
999 }
1000
1001 cl = "ldap";
1002 n = sm_snprintf(buf, sizeof(buf),
1003 "-k (&(objectClass=sendmailMTAClass)(sendmailMTAClassName=%s)(|(sendmailMTACluster=%s)(sendmailMTAHost=%s))) -v sendmailMTAClassValue,sendmailMTAClassSearch:FILTER:sendmailMTAClass,sendmailMTAClassURL:URL:sendmailMTAClass",
1004 mn, lc, jbuf);
1005 if (n >= sizeof(buf))
1006 {
1007 syserr("fileclass: F{%s}: Default LDAP string too long",
1008 mn);
1009 sm_free(mn);
1010 return;
1011 }
1012 spec = buf;
1013 }
1014 else
1015 #endif /* LDAPMAP */
1016 {
1017 if ((spec = strchr(cl, ':')) == NULL)
1018 {
1019 syserr("fileclass: F{%s}: missing map class",
1020 mn);
1021 sm_free(mn);
1022 return;
1023 }
1024 *spec++ ='\0';
1025 }
1026
1027 /* set up map structure */
1028 mapclass = stab(cl, ST_MAPCLASS, ST_FIND);
1029 if (mapclass == NULL)
1030 {
1031 syserr("fileclass: F{%s}: class %s not available",
1032 mn, cl);
1033 sm_free(mn);
1034 return;
1035 }
1036 memset(&map, '\0', sizeof(map));
1037 map.map_class = &mapclass->s_mapclass;
1038 map.map_mname = mn;
1039 map.map_mflags |= MF_FILECLASS;
1040
1041 if (tTd(37, 5))
1042 sm_dprintf("fileclass: F{%s}: map class %s, key %s, spec %s\n",
1043 mn, cl, key, spec);
1044
1045
1046 /* parse map spec */
1047 if (!map.map_class->map_parse(&map, spec))
1048 {
1049 /* map_parse() showed the error already */
1050 sm_free(mn);
1051 return;
1052 }
1053 map.map_mflags |= MF_VALID;
1054
1055 /* open map */
1056 if (map.map_class->map_open(&map, O_RDONLY))
1057 {
1058 map.map_mflags |= MF_OPEN;
1059 map.map_pid = getpid();
1060 }
1061 else
1062 {
1063 if (!optional &&
1064 !bitset(MF_OPTIONAL, map.map_mflags))
1065 syserr("fileclass: F{%s}: map open failed",
1066 mn);
1067 sm_free(mn);
1068 return;
1069 }
1070
1071 /* lookup */
1072 p = (*map.map_class->map_lookup)(&map, key, NULL, &status);
1073 if (status != EX_OK && status != EX_NOTFOUND)
1074 {
1075 if (!optional)
1076 syserr("fileclass: F{%s}: map lookup failed",
1077 mn);
1078 p = NULL;
1079 }
1080
1081 /* use the results */
1082 if (p != NULL)
1083 parse_class_words(class, p);
1084
1085 /* close map */
1086 map.map_mflags |= MF_CLOSING;
1087 map.map_class->map_close(&map);
1088 map.map_mflags &= ~(MF_OPEN|MF_WRITABLE|MF_CLOSING);
1089 sm_free(mn);
1090 return;
1091 }
1092 else if (filename[0] == '|')
1093 {
1094 auto int fd;
1095 int i;
1096 char *argv[MAXPV + 1];
1097
1098 i = 0;
1099 for (p = strtok(&filename[1], " \t");
1100 p != NULL && i < MAXPV;
1101 p = strtok(NULL, " \t"))
1102 argv[i++] = p;
1103 argv[i] = NULL;
1104 pid = prog_open(argv, &fd, CurEnv);
1105 if (pid < 0)
1106 f = NULL;
1107 else
1108 f = sm_io_open(SmFtStdiofd, SM_TIME_DEFAULT,
1109 (void *) &fd, SM_IO_RDONLY, NULL);
1110 }
1111 else
1112 {
1113 pid = -1;
1114 sff = SFF_REGONLY;
1115 if (!bitnset(DBS_CLASSFILEINUNSAFEDIRPATH, DontBlameSendmail))
1116 sff |= SFF_SAFEDIRPATH;
1117 if (!bitnset(DBS_LINKEDCLASSFILEINWRITABLEDIR,
1118 DontBlameSendmail))
1119 sff |= SFF_NOWLINK;
1120 if (safe)
1121 sff |= SFF_OPENASROOT;
1122 else if (RealUid == 0)
1123 sff |= SFF_ROOTOK;
1124 if (DontLockReadFiles)
1125 sff |= SFF_NOLOCK;
1126 f = safefopen(filename, O_RDONLY, 0, sff);
1127 }
1128 if (f == NULL)
1129 {
1130 if (!optional)
1131 syserr("fileclass: cannot open '%s'", filename);
1132 return;
1133 }
1134
1135 while (sm_io_fgets(f, SM_TIME_DEFAULT, buf, sizeof(buf)) != NULL)
1136 {
1137 #if SCANF
1138 char wordbuf[MAXLINE + 1];
1139 #endif /* SCANF */
1140
1141 if (buf[0] == '#')
1142 continue;
1143 #if SCANF
1144 if (sm_io_sscanf(buf, fmt, wordbuf) != 1)
1145 continue;
1146 p = wordbuf;
1147 #else /* SCANF */
1148 p = buf;
1149 #endif /* SCANF */
1150
1151 parse_class_words(class, p);
1152
1153 /*
1154 ** If anything else is added here,
1155 ** check if the '@' map case above
1156 ** needs the code as well.
1157 */
1158 }
1159
1160 (void) sm_io_close(f, SM_TIME_DEFAULT);
1161 if (pid > 0)
1162 (void) waitfor(pid);
1163 }
1164 /*
1165 ** MAKEMAILER -- define a new mailer.
1166 **
1167 ** Parameters:
1168 ** line -- description of mailer. This is in labeled
1169 ** fields. The fields are:
1170 ** A -- the argv for this mailer
1171 ** C -- the character set for MIME conversions
1172 ** D -- the directory to run in
1173 ** E -- the eol string
1174 ** F -- the flags associated with the mailer
1175 ** L -- the maximum line length
1176 ** M -- the maximum message size
1177 ** N -- the niceness at which to run
1178 ** P -- the path to the mailer
1179 ** Q -- the queue group for the mailer
1180 ** R -- the recipient rewriting set
1181 ** S -- the sender rewriting set
1182 ** T -- the mailer type (for DSNs)
1183 ** U -- the uid to run as
1184 ** W -- the time to wait at the end
1185 ** m -- maximum messages per connection
1186 ** r -- maximum number of recipients per message
1187 ** / -- new root directory
1188 ** The first word is the canonical name of the mailer.
1189 **
1190 ** Returns:
1191 ** none.
1192 **
1193 ** Side Effects:
1194 ** enters the mailer into the mailer table.
1195 */
1196
1197 void
makemailer(line)1198 makemailer(line)
1199 char *line;
1200 {
1201 register char *p;
1202 register struct mailer *m;
1203 register STAB *s;
1204 int i;
1205 char fcode;
1206 auto char *endp;
1207 static int nextmailer = 0; /* "free" index into Mailer struct */
1208
1209 /* allocate a mailer and set up defaults */
1210 m = (struct mailer *) xalloc(sizeof(*m));
1211 memset((char *) m, '\0', sizeof(*m));
1212 errno = 0; /* avoid bogus error text */
1213
1214 /* collect the mailer name */
1215 for (p = line;
1216 *p != '\0' && *p != ',' && !(isascii(*p) && isspace(*p));
1217 p++)
1218 continue;
1219 if (*p != '\0')
1220 *p++ = '\0';
1221 if (line[0] == '\0')
1222 {
1223 syserr("name required for mailer");
1224 return;
1225 }
1226 m->m_name = newstr(line);
1227 m->m_qgrp = NOQGRP;
1228 m->m_uid = NO_UID;
1229 m->m_gid = NO_GID;
1230
1231 /* now scan through and assign info from the fields */
1232 while (*p != '\0')
1233 {
1234 auto char *delimptr;
1235
1236 while (*p != '\0' &&
1237 (*p == ',' || (isascii(*p) && isspace(*p))))
1238 p++;
1239
1240 /* p now points to field code */
1241 fcode = *p;
1242 while (*p != '\0' && *p != '=' && *p != ',')
1243 p++;
1244 if (*p++ != '=')
1245 {
1246 syserr("mailer %s: `=' expected", m->m_name);
1247 return;
1248 }
1249 while (isascii(*p) && isspace(*p))
1250 p++;
1251
1252 /* p now points to the field body */
1253 p = munchstring(p, &delimptr, ',');
1254
1255 /* install the field into the mailer struct */
1256 switch (fcode)
1257 {
1258 case 'P': /* pathname */
1259 if (*p != '\0') /* error is issued below */
1260 m->m_mailer = newstr(p);
1261 break;
1262
1263 case 'F': /* flags */
1264 for (; *p != '\0'; p++)
1265 {
1266 if (!(isascii(*p) && isspace(*p)))
1267 {
1268 #if _FFR_DEPRECATE_MAILER_FLAG_I
1269 if (*p == M_INTERNAL)
1270 sm_syslog(LOG_WARNING, NOQID,
1271 "WARNING: mailer=%s, flag=%c deprecated",
1272 m->m_name, *p);
1273 #endif /* _FFR_DEPRECATE_MAILER_FLAG_I */
1274 setbitn(bitidx(*p), m->m_flags);
1275 }
1276 }
1277 break;
1278
1279 case 'S': /* sender rewriting ruleset */
1280 case 'R': /* recipient rewriting ruleset */
1281 i = strtorwset(p, &endp, ST_ENTER);
1282 if (i < 0)
1283 return;
1284 if (fcode == 'S')
1285 m->m_sh_rwset = m->m_se_rwset = i;
1286 else
1287 m->m_rh_rwset = m->m_re_rwset = i;
1288
1289 p = endp;
1290 if (*p++ == '/')
1291 {
1292 i = strtorwset(p, NULL, ST_ENTER);
1293 if (i < 0)
1294 return;
1295 if (fcode == 'S')
1296 m->m_sh_rwset = i;
1297 else
1298 m->m_rh_rwset = i;
1299 }
1300 break;
1301
1302 case 'E': /* end of line string */
1303 if (*p == '\0')
1304 syserr("mailer %s: null end-of-line string",
1305 m->m_name);
1306 else
1307 m->m_eol = newstr(p);
1308 break;
1309
1310 case 'A': /* argument vector */
1311 if (*p != '\0') /* error is issued below */
1312 m->m_argv = makeargv(p);
1313 break;
1314
1315 case 'M': /* maximum message size */
1316 m->m_maxsize = atol(p);
1317 break;
1318
1319 case 'm': /* maximum messages per connection */
1320 m->m_maxdeliveries = atoi(p);
1321 break;
1322
1323 case 'r': /* max recipient per envelope */
1324 m->m_maxrcpt = atoi(p);
1325 break;
1326
1327 case 'L': /* maximum line length */
1328 m->m_linelimit = atoi(p);
1329 if (m->m_linelimit < 0)
1330 m->m_linelimit = 0;
1331 break;
1332
1333 case 'N': /* run niceness */
1334 m->m_nice = atoi(p);
1335 break;
1336
1337 case 'D': /* working directory */
1338 if (*p == '\0')
1339 syserr("mailer %s: null working directory",
1340 m->m_name);
1341 else
1342 m->m_execdir = newstr(p);
1343 break;
1344
1345 case 'C': /* default charset */
1346 if (*p == '\0')
1347 syserr("mailer %s: null charset", m->m_name);
1348 else
1349 m->m_defcharset = newstr(p);
1350 break;
1351
1352 case 'Q': /* queue for this mailer */
1353 if (*p == '\0')
1354 {
1355 syserr("mailer %s: null queue", m->m_name);
1356 break;
1357 }
1358 s = stab(p, ST_QUEUE, ST_FIND);
1359 if (s == NULL)
1360 syserr("mailer %s: unknown queue %s",
1361 m->m_name, p);
1362 else
1363 m->m_qgrp = s->s_quegrp->qg_index;
1364 break;
1365
1366 case 'T': /* MTA-Name/Address/Diagnostic types */
1367 /* extract MTA name type; default to "dns" */
1368 m->m_mtatype = newstr(p);
1369 p = strchr(m->m_mtatype, '/');
1370 if (p != NULL)
1371 {
1372 *p++ = '\0';
1373 if (*p == '\0')
1374 p = NULL;
1375 }
1376 if (*m->m_mtatype == '\0')
1377 m->m_mtatype = "dns";
1378
1379 /* extract address type; default to "rfc822" */
1380 m->m_addrtype = p;
1381 if (p != NULL)
1382 p = strchr(p, '/');
1383 if (p != NULL)
1384 {
1385 *p++ = '\0';
1386 if (*p == '\0')
1387 p = NULL;
1388 }
1389 if (m->m_addrtype == NULL || *m->m_addrtype == '\0')
1390 m->m_addrtype = "rfc822";
1391
1392 /* extract diagnostic type; default to "smtp" */
1393 m->m_diagtype = p;
1394 if (m->m_diagtype == NULL || *m->m_diagtype == '\0')
1395 m->m_diagtype = "smtp";
1396 break;
1397
1398 case 'U': /* user id */
1399 if (isascii(*p) && !isdigit(*p))
1400 {
1401 char *q = p;
1402 struct passwd *pw;
1403
1404 while (*p != '\0' && isascii(*p) &&
1405 (isalnum(*p) || strchr("-_", *p) != NULL))
1406 p++;
1407 while (isascii(*p) && isspace(*p))
1408 *p++ = '\0';
1409 if (*p != '\0')
1410 *p++ = '\0';
1411 if (*q == '\0')
1412 {
1413 syserr("mailer %s: null user name",
1414 m->m_name);
1415 break;
1416 }
1417 pw = sm_getpwnam(q);
1418 if (pw == NULL)
1419 {
1420 syserr("readcf: mailer U= flag: unknown user %s", q);
1421 break;
1422 }
1423 else
1424 {
1425 m->m_uid = pw->pw_uid;
1426 m->m_gid = pw->pw_gid;
1427 }
1428 }
1429 else
1430 {
1431 auto char *q;
1432
1433 m->m_uid = strtol(p, &q, 0);
1434 p = q;
1435 while (isascii(*p) && isspace(*p))
1436 p++;
1437 if (*p != '\0')
1438 p++;
1439 }
1440 while (isascii(*p) && isspace(*p))
1441 p++;
1442 if (*p == '\0')
1443 break;
1444 if (isascii(*p) && !isdigit(*p))
1445 {
1446 char *q = p;
1447 struct group *gr;
1448
1449 while (isascii(*p) && isalnum(*p))
1450 p++;
1451 *p++ = '\0';
1452 if (*q == '\0')
1453 {
1454 syserr("mailer %s: null group name",
1455 m->m_name);
1456 break;
1457 }
1458 gr = getgrnam(q);
1459 if (gr == NULL)
1460 {
1461 syserr("readcf: mailer U= flag: unknown group %s", q);
1462 break;
1463 }
1464 else
1465 m->m_gid = gr->gr_gid;
1466 }
1467 else
1468 {
1469 m->m_gid = strtol(p, NULL, 0);
1470 }
1471 break;
1472
1473 case 'W': /* wait timeout */
1474 m->m_wait = convtime(p, 's');
1475 break;
1476
1477 case '/': /* new root directory */
1478 if (*p == '\0')
1479 syserr("mailer %s: null root directory",
1480 m->m_name);
1481 else
1482 m->m_rootdir = newstr(p);
1483 break;
1484
1485 default:
1486 syserr("M%s: unknown mailer equate %c=",
1487 m->m_name, fcode);
1488 break;
1489 }
1490
1491 p = delimptr;
1492 }
1493
1494 #if !HASRRESVPORT
1495 if (bitnset(M_SECURE_PORT, m->m_flags))
1496 {
1497 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
1498 "M%s: Warning: F=%c set on system that doesn't support rresvport()\n",
1499 m->m_name, M_SECURE_PORT);
1500 }
1501 #endif /* !HASRRESVPORT */
1502
1503 #if !HASNICE
1504 if (m->m_nice != 0)
1505 {
1506 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
1507 "M%s: Warning: N= set on system that doesn't support nice()\n",
1508 m->m_name);
1509 }
1510 #endif /* !HASNICE */
1511
1512 /* do some rationality checking */
1513 if (m->m_argv == NULL)
1514 {
1515 syserr("M%s: A= argument required", m->m_name);
1516 return;
1517 }
1518 if (m->m_mailer == NULL)
1519 {
1520 syserr("M%s: P= argument required", m->m_name);
1521 return;
1522 }
1523
1524 if (nextmailer >= MAXMAILERS)
1525 {
1526 syserr("too many mailers defined (%d max)", MAXMAILERS);
1527 return;
1528 }
1529
1530 if (m->m_maxrcpt <= 0)
1531 m->m_maxrcpt = DEFAULT_MAX_RCPT;
1532
1533 /* do some heuristic cleanup for back compatibility */
1534 if (bitnset(M_LIMITS, m->m_flags))
1535 {
1536 if (m->m_linelimit == 0)
1537 m->m_linelimit = SMTPLINELIM;
1538 if (ConfigLevel < 2)
1539 setbitn(M_7BITS, m->m_flags);
1540 }
1541
1542 if (strcmp(m->m_mailer, "[TCP]") == 0)
1543 {
1544 syserr("M%s: P=[TCP] must be replaced by P=[IPC]", m->m_name);
1545 return;
1546 }
1547
1548 if (strcmp(m->m_mailer, "[IPC]") == 0)
1549 {
1550 /* Use the second argument for host or path to socket */
1551 if (m->m_argv[0] == NULL || m->m_argv[1] == NULL ||
1552 m->m_argv[1][0] == '\0')
1553 {
1554 syserr("M%s: too few parameters for %s mailer",
1555 m->m_name, m->m_mailer);
1556 return;
1557 }
1558 if (strcmp(m->m_argv[0], "TCP") != 0
1559 #if NETUNIX
1560 && strcmp(m->m_argv[0], "FILE") != 0
1561 #endif /* NETUNIX */
1562 )
1563 {
1564 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
1565 "M%s: Warning: first argument in %s mailer must be %s\n",
1566 m->m_name, m->m_mailer,
1567 #if NETUNIX
1568 "TCP or FILE"
1569 #else /* NETUNIX */
1570 "TCP"
1571 #endif /* NETUNIX */
1572 );
1573 }
1574 if (m->m_mtatype == NULL)
1575 m->m_mtatype = "dns";
1576 if (m->m_addrtype == NULL)
1577 m->m_addrtype = "rfc822";
1578 if (m->m_diagtype == NULL)
1579 {
1580 if (m->m_argv[0] != NULL &&
1581 strcmp(m->m_argv[0], "FILE") == 0)
1582 m->m_diagtype = "x-unix";
1583 else
1584 m->m_diagtype = "smtp";
1585 }
1586 }
1587 else if (strcmp(m->m_mailer, "[FILE]") == 0)
1588 {
1589 /* Use the second argument for filename */
1590 if (m->m_argv[0] == NULL || m->m_argv[1] == NULL ||
1591 m->m_argv[2] != NULL)
1592 {
1593 syserr("M%s: too %s parameters for [FILE] mailer",
1594 m->m_name,
1595 (m->m_argv[0] == NULL ||
1596 m->m_argv[1] == NULL) ? "few" : "many");
1597 return;
1598 }
1599 else if (strcmp(m->m_argv[0], "FILE") != 0)
1600 {
1601 syserr("M%s: first argument in [FILE] mailer must be FILE",
1602 m->m_name);
1603 return;
1604 }
1605 }
1606
1607 if (m->m_eol == NULL)
1608 {
1609 char **pp;
1610
1611 /* default for SMTP is \r\n; use \n for local delivery */
1612 for (pp = m->m_argv; *pp != NULL; pp++)
1613 {
1614 for (p = *pp; *p != '\0'; )
1615 {
1616 if ((*p++ & 0377) == MACROEXPAND && *p == 'u')
1617 break;
1618 }
1619 if (*p != '\0')
1620 break;
1621 }
1622 if (*pp == NULL)
1623 m->m_eol = "\r\n";
1624 else
1625 m->m_eol = "\n";
1626 }
1627
1628 /* enter the mailer into the symbol table */
1629 s = stab(m->m_name, ST_MAILER, ST_ENTER);
1630 if (s->s_mailer != NULL)
1631 {
1632 i = s->s_mailer->m_mno;
1633 sm_free(s->s_mailer); /* XXX */
1634 }
1635 else
1636 {
1637 i = nextmailer++;
1638 }
1639 Mailer[i] = s->s_mailer = m;
1640 m->m_mno = i;
1641 }
1642 /*
1643 ** MUNCHSTRING -- translate a string into internal form.
1644 **
1645 ** Parameters:
1646 ** p -- the string to munch.
1647 ** delimptr -- if non-NULL, set to the pointer of the
1648 ** field delimiter character.
1649 ** delim -- the delimiter for the field.
1650 **
1651 ** Returns:
1652 ** the munched string.
1653 **
1654 ** Side Effects:
1655 ** the munched string is a local static buffer.
1656 ** it must be copied before the function is called again.
1657 */
1658
1659 char *
munchstring(p,delimptr,delim)1660 munchstring(p, delimptr, delim)
1661 register char *p;
1662 char **delimptr;
1663 int delim;
1664 {
1665 register char *q;
1666 bool backslash = false;
1667 bool quotemode = false;
1668 static char buf[MAXLINE];
1669
1670 for (q = buf; *p != '\0' && q < &buf[sizeof(buf) - 1]; p++)
1671 {
1672 if (backslash)
1673 {
1674 /* everything is roughly literal */
1675 backslash = false;
1676 switch (*p)
1677 {
1678 case 'r': /* carriage return */
1679 *q++ = '\r';
1680 continue;
1681
1682 case 'n': /* newline */
1683 *q++ = '\n';
1684 continue;
1685
1686 case 'f': /* form feed */
1687 *q++ = '\f';
1688 continue;
1689
1690 case 'b': /* backspace */
1691 *q++ = '\b';
1692 continue;
1693 }
1694 *q++ = *p;
1695 }
1696 else
1697 {
1698 if (*p == '\\')
1699 backslash = true;
1700 else if (*p == '"')
1701 quotemode = !quotemode;
1702 else if (quotemode || *p != delim)
1703 *q++ = *p;
1704 else
1705 break;
1706 }
1707 }
1708
1709 if (delimptr != NULL)
1710 *delimptr = p;
1711 *q++ = '\0';
1712 return buf;
1713 }
1714 /*
1715 ** EXTRQUOTSTR -- extract a (quoted) string.
1716 **
1717 ** This routine deals with quoted (") strings and escaped
1718 ** spaces (\\ ).
1719 **
1720 ** Parameters:
1721 ** p -- source string.
1722 ** delimptr -- if non-NULL, set to the pointer of the
1723 ** field delimiter character.
1724 ** delimbuf -- delimiters for the field.
1725 ** st -- if non-NULL, store the return value (whether the
1726 ** string was correctly quoted) here.
1727 **
1728 ** Returns:
1729 ** the extracted string.
1730 **
1731 ** Side Effects:
1732 ** the returned string is a local static buffer.
1733 ** it must be copied before the function is called again.
1734 */
1735
1736 static char *
extrquotstr(p,delimptr,delimbuf,st)1737 extrquotstr(p, delimptr, delimbuf, st)
1738 register char *p;
1739 char **delimptr;
1740 char *delimbuf;
1741 bool *st;
1742 {
1743 register char *q;
1744 bool backslash = false;
1745 bool quotemode = false;
1746 static char buf[MAXLINE];
1747
1748 for (q = buf; *p != '\0' && q < &buf[sizeof(buf) - 1]; p++)
1749 {
1750 if (backslash)
1751 {
1752 backslash = false;
1753 if (*p != ' ')
1754 *q++ = '\\';
1755 }
1756 if (*p == '\\')
1757 backslash = true;
1758 else if (*p == '"')
1759 quotemode = !quotemode;
1760 else if (quotemode ||
1761 strchr(delimbuf, (int) *p) == NULL)
1762 *q++ = *p;
1763 else
1764 break;
1765 }
1766
1767 if (delimptr != NULL)
1768 *delimptr = p;
1769 *q++ = '\0';
1770 if (st != NULL)
1771 *st = !(quotemode || backslash);
1772 return buf;
1773 }
1774 /*
1775 ** MAKEARGV -- break up a string into words
1776 **
1777 ** Parameters:
1778 ** p -- the string to break up.
1779 **
1780 ** Returns:
1781 ** a char **argv (dynamically allocated)
1782 **
1783 ** Side Effects:
1784 ** munges p.
1785 */
1786
1787 static char **
makeargv(p)1788 makeargv(p)
1789 register char *p;
1790 {
1791 char *q;
1792 int i;
1793 char **avp;
1794 char *argv[MAXPV + 1];
1795
1796 /* take apart the words */
1797 i = 0;
1798 while (*p != '\0' && i < MAXPV)
1799 {
1800 q = p;
1801 while (*p != '\0' && !(isascii(*p) && isspace(*p)))
1802 p++;
1803 while (isascii(*p) && isspace(*p))
1804 *p++ = '\0';
1805 argv[i++] = newstr(q);
1806 }
1807 argv[i++] = NULL;
1808
1809 /* now make a copy of the argv */
1810 avp = (char **) xalloc(sizeof(*avp) * i);
1811 memmove((char *) avp, (char *) argv, sizeof(*avp) * i);
1812
1813 return avp;
1814 }
1815 /*
1816 ** PRINTRULES -- print rewrite rules (for debugging)
1817 **
1818 ** Parameters:
1819 ** none.
1820 **
1821 ** Returns:
1822 ** none.
1823 **
1824 ** Side Effects:
1825 ** prints rewrite rules.
1826 */
1827
1828 void
printrules()1829 printrules()
1830 {
1831 register struct rewrite *rwp;
1832 register int ruleset;
1833
1834 for (ruleset = 0; ruleset < 10; ruleset++)
1835 {
1836 if (RewriteRules[ruleset] == NULL)
1837 continue;
1838 sm_dprintf("\n----Rule Set %d:", ruleset);
1839
1840 for (rwp = RewriteRules[ruleset]; rwp != NULL; rwp = rwp->r_next)
1841 {
1842 sm_dprintf("\nLHS:");
1843 printav(sm_debug_file(), rwp->r_lhs);
1844 sm_dprintf("RHS:");
1845 printav(sm_debug_file(), rwp->r_rhs);
1846 }
1847 }
1848 }
1849 /*
1850 ** PRINTMAILER -- print mailer structure (for debugging)
1851 **
1852 ** Parameters:
1853 ** fp -- output file
1854 ** m -- the mailer to print
1855 **
1856 ** Returns:
1857 ** none.
1858 */
1859
1860 void
printmailer(fp,m)1861 printmailer(fp, m)
1862 SM_FILE_T *fp;
1863 register MAILER *m;
1864 {
1865 int j;
1866
1867 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT,
1868 "mailer %d (%s): P=%s S=", m->m_mno, m->m_name,
1869 m->m_mailer);
1870 if (RuleSetNames[m->m_se_rwset] == NULL)
1871 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, "%d/",
1872 m->m_se_rwset);
1873 else
1874 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, "%s/",
1875 RuleSetNames[m->m_se_rwset]);
1876 if (RuleSetNames[m->m_sh_rwset] == NULL)
1877 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, "%d R=",
1878 m->m_sh_rwset);
1879 else
1880 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, "%s R=",
1881 RuleSetNames[m->m_sh_rwset]);
1882 if (RuleSetNames[m->m_re_rwset] == NULL)
1883 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, "%d/",
1884 m->m_re_rwset);
1885 else
1886 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, "%s/",
1887 RuleSetNames[m->m_re_rwset]);
1888 if (RuleSetNames[m->m_rh_rwset] == NULL)
1889 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, "%d ",
1890 m->m_rh_rwset);
1891 else
1892 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, "%s ",
1893 RuleSetNames[m->m_rh_rwset]);
1894 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, "M=%ld U=%d:%d F=",
1895 m->m_maxsize, (int) m->m_uid, (int) m->m_gid);
1896 for (j = '\0'; j <= '\177'; j++)
1897 if (bitnset(j, m->m_flags))
1898 (void) sm_io_putc(fp, SM_TIME_DEFAULT, j);
1899 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, " L=%d E=",
1900 m->m_linelimit);
1901 xputs(fp, m->m_eol);
1902 if (m->m_defcharset != NULL)
1903 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, " C=%s",
1904 m->m_defcharset);
1905 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, " T=%s/%s/%s",
1906 m->m_mtatype == NULL
1907 ? "<undefined>" : m->m_mtatype,
1908 m->m_addrtype == NULL
1909 ? "<undefined>" : m->m_addrtype,
1910 m->m_diagtype == NULL
1911 ? "<undefined>" : m->m_diagtype);
1912 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, " r=%d", m->m_maxrcpt);
1913 if (m->m_argv != NULL)
1914 {
1915 char **a = m->m_argv;
1916
1917 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, " A=");
1918 while (*a != NULL)
1919 {
1920 if (a != m->m_argv)
1921 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT,
1922 " ");
1923 xputs(fp, *a++);
1924 }
1925 }
1926 (void) sm_io_fprintf(fp, SM_TIME_DEFAULT, "\n");
1927 }
1928 /*
1929 ** SETOPTION -- set global processing option
1930 **
1931 ** Parameters:
1932 ** opt -- option name.
1933 ** val -- option value (as a text string).
1934 ** safe -- set if this came from a configuration file.
1935 ** Some options (if set from the command line) will
1936 ** reset the user id to avoid security problems.
1937 ** sticky -- if set, don't let other setoptions override
1938 ** this value.
1939 ** e -- the main envelope.
1940 **
1941 ** Returns:
1942 ** none.
1943 **
1944 ** Side Effects:
1945 ** Sets options as implied by the arguments.
1946 */
1947
1948 static BITMAP256 StickyOpt; /* set if option is stuck */
1949
1950 #if NAMED_BIND
1951
1952 static struct resolverflags
1953 {
1954 char *rf_name; /* name of the flag */
1955 long rf_bits; /* bits to set/clear */
1956 } ResolverFlags[] =
1957 {
1958 { "debug", RES_DEBUG },
1959 { "aaonly", RES_AAONLY },
1960 { "usevc", RES_USEVC },
1961 { "primary", RES_PRIMARY },
1962 { "igntc", RES_IGNTC },
1963 { "recurse", RES_RECURSE },
1964 { "defnames", RES_DEFNAMES },
1965 { "stayopen", RES_STAYOPEN },
1966 { "dnsrch", RES_DNSRCH },
1967 # ifdef RES_USE_INET6
1968 { "use_inet6", RES_USE_INET6 },
1969 # endif /* RES_USE_INET6 */
1970 { "true", 0 }, /* avoid error on old syntax */
1971 { NULL, 0 }
1972 };
1973
1974 #endif /* NAMED_BIND */
1975
1976 #define OI_NONE 0 /* no special treatment */
1977 #define OI_SAFE 0x0001 /* safe for random people to use */
1978 #define OI_SUBOPT 0x0002 /* option has suboptions */
1979
1980 static struct optioninfo
1981 {
1982 char *o_name; /* long name of option */
1983 unsigned char o_code; /* short name of option */
1984 unsigned short o_flags; /* option flags */
1985 } OptionTab[] =
1986 {
1987 #if defined(SUN_EXTENSIONS) && defined(REMOTE_MODE)
1988 { "RemoteMode", '>', OI_NONE },
1989 #endif /* defined(SUN_EXTENSIONS) && defined(REMOTE_MODE) */
1990 { "SevenBitInput", '7', OI_SAFE },
1991 { "EightBitMode", '8', OI_SAFE },
1992 { "AliasFile", 'A', OI_NONE },
1993 { "AliasWait", 'a', OI_NONE },
1994 { "BlankSub", 'B', OI_NONE },
1995 { "MinFreeBlocks", 'b', OI_SAFE },
1996 { "CheckpointInterval", 'C', OI_SAFE },
1997 { "HoldExpensive", 'c', OI_NONE },
1998 { "DeliveryMode", 'd', OI_SAFE },
1999 { "ErrorHeader", 'E', OI_NONE },
2000 { "ErrorMode", 'e', OI_SAFE },
2001 { "TempFileMode", 'F', OI_NONE },
2002 { "SaveFromLine", 'f', OI_NONE },
2003 { "MatchGECOS", 'G', OI_NONE },
2004
2005 /* no long name, just here to avoid problems in setoption */
2006 { "", 'g', OI_NONE },
2007 { "HelpFile", 'H', OI_NONE },
2008 { "MaxHopCount", 'h', OI_NONE },
2009 { "ResolverOptions", 'I', OI_NONE },
2010 { "IgnoreDots", 'i', OI_SAFE },
2011 { "ForwardPath", 'J', OI_NONE },
2012 { "SendMimeErrors", 'j', OI_SAFE },
2013 { "ConnectionCacheSize", 'k', OI_NONE },
2014 { "ConnectionCacheTimeout", 'K', OI_NONE },
2015 { "UseErrorsTo", 'l', OI_NONE },
2016 { "LogLevel", 'L', OI_SAFE },
2017 { "MeToo", 'm', OI_SAFE },
2018
2019 /* no long name, just here to avoid problems in setoption */
2020 { "", 'M', OI_NONE },
2021 { "CheckAliases", 'n', OI_NONE },
2022 { "OldStyleHeaders", 'o', OI_SAFE },
2023 { "DaemonPortOptions", 'O', OI_NONE },
2024 { "PrivacyOptions", 'p', OI_SAFE },
2025 { "PostmasterCopy", 'P', OI_NONE },
2026 { "QueueFactor", 'q', OI_NONE },
2027 { "QueueDirectory", 'Q', OI_NONE },
2028 { "DontPruneRoutes", 'R', OI_NONE },
2029 { "Timeout", 'r', OI_SUBOPT },
2030 { "StatusFile", 'S', OI_NONE },
2031 { "SuperSafe", 's', OI_SAFE },
2032 { "QueueTimeout", 'T', OI_NONE },
2033 { "TimeZoneSpec", 't', OI_NONE },
2034 { "UserDatabaseSpec", 'U', OI_NONE },
2035 { "DefaultUser", 'u', OI_NONE },
2036 { "FallbackMXhost", 'V', OI_NONE },
2037 { "Verbose", 'v', OI_SAFE },
2038 { "TryNullMXList", 'w', OI_NONE },
2039 { "QueueLA", 'x', OI_NONE },
2040 { "RefuseLA", 'X', OI_NONE },
2041 { "RecipientFactor", 'y', OI_NONE },
2042 { "ForkEachJob", 'Y', OI_NONE },
2043 { "ClassFactor", 'z', OI_NONE },
2044 { "RetryFactor", 'Z', OI_NONE },
2045 #define O_QUEUESORTORD 0x81
2046 { "QueueSortOrder", O_QUEUESORTORD, OI_SAFE },
2047 #define O_HOSTSFILE 0x82
2048 { "HostsFile", O_HOSTSFILE, OI_NONE },
2049 #define O_MQA 0x83
2050 { "MinQueueAge", O_MQA, OI_SAFE },
2051 #define O_DEFCHARSET 0x85
2052 { "DefaultCharSet", O_DEFCHARSET, OI_SAFE },
2053 #define O_SSFILE 0x86
2054 { "ServiceSwitchFile", O_SSFILE, OI_NONE },
2055 #define O_DIALDELAY 0x87
2056 { "DialDelay", O_DIALDELAY, OI_SAFE },
2057 #define O_NORCPTACTION 0x88
2058 { "NoRecipientAction", O_NORCPTACTION, OI_SAFE },
2059 #define O_SAFEFILEENV 0x89
2060 { "SafeFileEnvironment", O_SAFEFILEENV, OI_NONE },
2061 #define O_MAXMSGSIZE 0x8a
2062 { "MaxMessageSize", O_MAXMSGSIZE, OI_NONE },
2063 #define O_COLONOKINADDR 0x8b
2064 { "ColonOkInAddr", O_COLONOKINADDR, OI_SAFE },
2065 #define O_MAXQUEUERUN 0x8c
2066 { "MaxQueueRunSize", O_MAXQUEUERUN, OI_SAFE },
2067 #define O_MAXCHILDREN 0x8d
2068 { "MaxDaemonChildren", O_MAXCHILDREN, OI_NONE },
2069 #define O_KEEPCNAMES 0x8e
2070 { "DontExpandCnames", O_KEEPCNAMES, OI_NONE },
2071 #define O_MUSTQUOTE 0x8f
2072 { "MustQuoteChars", O_MUSTQUOTE, OI_NONE },
2073 #define O_SMTPGREETING 0x90
2074 { "SmtpGreetingMessage", O_SMTPGREETING, OI_NONE },
2075 #define O_UNIXFROM 0x91
2076 { "UnixFromLine", O_UNIXFROM, OI_NONE },
2077 #define O_OPCHARS 0x92
2078 { "OperatorChars", O_OPCHARS, OI_NONE },
2079 #define O_DONTINITGRPS 0x93
2080 { "DontInitGroups", O_DONTINITGRPS, OI_NONE },
2081 #define O_SLFH 0x94
2082 { "SingleLineFromHeader", O_SLFH, OI_SAFE },
2083 #define O_ABH 0x95
2084 { "AllowBogusHELO", O_ABH, OI_SAFE },
2085 #define O_CONNTHROT 0x97
2086 { "ConnectionRateThrottle", O_CONNTHROT, OI_NONE },
2087 #define O_UGW 0x99
2088 { "UnsafeGroupWrites", O_UGW, OI_NONE },
2089 #define O_DBLBOUNCE 0x9a
2090 { "DoubleBounceAddress", O_DBLBOUNCE, OI_NONE },
2091 #define O_HSDIR 0x9b
2092 { "HostStatusDirectory", O_HSDIR, OI_NONE },
2093 #define O_SINGTHREAD 0x9c
2094 { "SingleThreadDelivery", O_SINGTHREAD, OI_NONE },
2095 #define O_RUNASUSER 0x9d
2096 { "RunAsUser", O_RUNASUSER, OI_NONE },
2097 #define O_DSN_RRT 0x9e
2098 { "RrtImpliesDsn", O_DSN_RRT, OI_NONE },
2099 #define O_PIDFILE 0x9f
2100 { "PidFile", O_PIDFILE, OI_NONE },
2101 #define O_DONTBLAMESENDMAIL 0xa0
2102 { "DontBlameSendmail", O_DONTBLAMESENDMAIL, OI_NONE },
2103 #define O_DPI 0xa1
2104 { "DontProbeInterfaces", O_DPI, OI_NONE },
2105 #define O_MAXRCPT 0xa2
2106 { "MaxRecipientsPerMessage", O_MAXRCPT, OI_SAFE },
2107 #define O_DEADLETTER 0xa3
2108 { "DeadLetterDrop", O_DEADLETTER, OI_NONE },
2109 #if _FFR_DONTLOCKFILESFORREAD_OPTION
2110 # define O_DONTLOCK 0xa4
2111 { "DontLockFilesForRead", O_DONTLOCK, OI_NONE },
2112 #endif /* _FFR_DONTLOCKFILESFORREAD_OPTION */
2113 #define O_MAXALIASRCSN 0xa5
2114 { "MaxAliasRecursion", O_MAXALIASRCSN, OI_NONE },
2115 #define O_CNCTONLYTO 0xa6
2116 { "ConnectOnlyTo", O_CNCTONLYTO, OI_NONE },
2117 #define O_TRUSTUSER 0xa7
2118 { "TrustedUser", O_TRUSTUSER, OI_NONE },
2119 #define O_MAXMIMEHDRLEN 0xa8
2120 { "MaxMimeHeaderLength", O_MAXMIMEHDRLEN, OI_NONE },
2121 #define O_CONTROLSOCKET 0xa9
2122 { "ControlSocketName", O_CONTROLSOCKET, OI_NONE },
2123 #define O_MAXHDRSLEN 0xaa
2124 { "MaxHeadersLength", O_MAXHDRSLEN, OI_NONE },
2125 #if _FFR_MAX_FORWARD_ENTRIES
2126 # define O_MAXFORWARD 0xab
2127 { "MaxForwardEntries", O_MAXFORWARD, OI_NONE },
2128 #endif /* _FFR_MAX_FORWARD_ENTRIES */
2129 #define O_PROCTITLEPREFIX 0xac
2130 { "ProcessTitlePrefix", O_PROCTITLEPREFIX, OI_NONE },
2131 #define O_SASLINFO 0xad
2132 #if _FFR_ALLOW_SASLINFO
2133 { "DefaultAuthInfo", O_SASLINFO, OI_SAFE },
2134 #else /* _FFR_ALLOW_SASLINFO */
2135 { "DefaultAuthInfo", O_SASLINFO, OI_NONE },
2136 #endif /* _FFR_ALLOW_SASLINFO */
2137 #define O_SASLMECH 0xae
2138 { "AuthMechanisms", O_SASLMECH, OI_NONE },
2139 #define O_CLIENTPORT 0xaf
2140 { "ClientPortOptions", O_CLIENTPORT, OI_NONE },
2141 #define O_DF_BUFSIZE 0xb0
2142 { "DataFileBufferSize", O_DF_BUFSIZE, OI_NONE },
2143 #define O_XF_BUFSIZE 0xb1
2144 { "XscriptFileBufferSize", O_XF_BUFSIZE, OI_NONE },
2145 #define O_LDAPDEFAULTSPEC 0xb2
2146 { "LDAPDefaultSpec", O_LDAPDEFAULTSPEC, OI_NONE },
2147 #define O_SRVCERTFILE 0xb4
2148 { "ServerCertFile", O_SRVCERTFILE, OI_NONE },
2149 #define O_SRVKEYFILE 0xb5
2150 { "ServerKeyFile", O_SRVKEYFILE, OI_NONE },
2151 #define O_CLTCERTFILE 0xb6
2152 { "ClientCertFile", O_CLTCERTFILE, OI_NONE },
2153 #define O_CLTKEYFILE 0xb7
2154 { "ClientKeyFile", O_CLTKEYFILE, OI_NONE },
2155 #define O_CACERTFILE 0xb8
2156 { "CACertFile", O_CACERTFILE, OI_NONE },
2157 #define O_CACERTPATH 0xb9
2158 { "CACertPath", O_CACERTPATH, OI_NONE },
2159 #define O_DHPARAMS 0xba
2160 { "DHParameters", O_DHPARAMS, OI_NONE },
2161 #define O_INPUTMILTER 0xbb
2162 { "InputMailFilters", O_INPUTMILTER, OI_NONE },
2163 #define O_MILTER 0xbc
2164 { "Milter", O_MILTER, OI_SUBOPT },
2165 #define O_SASLOPTS 0xbd
2166 { "AuthOptions", O_SASLOPTS, OI_NONE },
2167 #define O_QUEUE_FILE_MODE 0xbe
2168 { "QueueFileMode", O_QUEUE_FILE_MODE, OI_NONE },
2169 #if _FFR_TLS_1
2170 # define O_DHPARAMS5 0xbf
2171 { "DHParameters512", O_DHPARAMS5, OI_NONE },
2172 # define O_CIPHERLIST 0xc0
2173 { "CipherList", O_CIPHERLIST, OI_NONE },
2174 #endif /* _FFR_TLS_1 */
2175 #define O_RANDFILE 0xc1
2176 { "RandFile", O_RANDFILE, OI_NONE },
2177 #define O_TLS_SRV_OPTS 0xc2
2178 { "TLSSrvOptions", O_TLS_SRV_OPTS, OI_NONE },
2179 #define O_RCPTTHROT 0xc3
2180 { "BadRcptThrottle", O_RCPTTHROT, OI_SAFE },
2181 #define O_DLVR_MIN 0xc4
2182 { "DeliverByMin", O_DLVR_MIN, OI_NONE },
2183 #define O_MAXQUEUECHILDREN 0xc5
2184 { "MaxQueueChildren", O_MAXQUEUECHILDREN, OI_NONE },
2185 #define O_MAXRUNNERSPERQUEUE 0xc6
2186 { "MaxRunnersPerQueue", O_MAXRUNNERSPERQUEUE, OI_NONE },
2187 #define O_DIRECTSUBMODIFIERS 0xc7
2188 { "DirectSubmissionModifiers", O_DIRECTSUBMODIFIERS, OI_NONE },
2189 #define O_NICEQUEUERUN 0xc8
2190 { "NiceQueueRun", O_NICEQUEUERUN, OI_NONE },
2191 #define O_SHMKEY 0xc9
2192 { "SharedMemoryKey", O_SHMKEY, OI_NONE },
2193 #define O_SASLBITS 0xca
2194 { "AuthMaxBits", O_SASLBITS, OI_NONE },
2195 #define O_MBDB 0xcb
2196 { "MailboxDatabase", O_MBDB, OI_NONE },
2197 #define O_MSQ 0xcc
2198 { "UseMSP", O_MSQ, OI_NONE },
2199 #define O_DELAY_LA 0xcd
2200 { "DelayLA", O_DELAY_LA, OI_NONE },
2201 #define O_FASTSPLIT 0xce
2202 { "FastSplit", O_FASTSPLIT, OI_NONE },
2203 #define O_SOFTBOUNCE 0xcf
2204 { "SoftBounce", O_SOFTBOUNCE, OI_NONE },
2205 #define O_SHMKEYFILE 0xd0
2206 { "SharedMemoryKeyFile", O_SHMKEYFILE, OI_NONE },
2207 #define O_REJECTLOGINTERVAL 0xd1
2208 { "RejectLogInterval", O_REJECTLOGINTERVAL, OI_NONE },
2209 #define O_REQUIRES_DIR_FSYNC 0xd2
2210 { "RequiresDirfsync", O_REQUIRES_DIR_FSYNC, OI_NONE },
2211 #define O_CONNECTION_RATE_WINDOW_SIZE 0xd3
2212 { "ConnectionRateWindowSize", O_CONNECTION_RATE_WINDOW_SIZE, OI_NONE },
2213 #define O_CRLFILE 0xd4
2214 { "CRLFile", O_CRLFILE, OI_NONE },
2215 #define O_FALLBACKSMARTHOST 0xd5
2216 { "FallbackSmartHost", O_FALLBACKSMARTHOST, OI_NONE },
2217 #define O_SASLREALM 0xd6
2218 { "AuthRealm", O_SASLREALM, OI_NONE },
2219 #if _FFR_CRLPATH
2220 # define O_CRLPATH 0xd7
2221 { "CRLPath", O_CRLPATH, OI_NONE },
2222 #endif /* _FFR_CRLPATH */
2223 #define O_HELONAME 0xd8
2224 { "HeloName", O_HELONAME, OI_NONE },
2225 #if _FFR_MEMSTAT
2226 # define O_REFUSELOWMEM 0xd9
2227 { "RefuseLowMem", O_REFUSELOWMEM, OI_NONE },
2228 # define O_QUEUELOWMEM 0xda
2229 { "QueueLowMem", O_QUEUELOWMEM, OI_NONE },
2230 # define O_MEMRESOURCE 0xdb
2231 { "MemoryResource", O_MEMRESOURCE, OI_NONE },
2232 #endif /* _FFR_MEMSTAT */
2233 #define O_MAXNOOPCOMMANDS 0xdc
2234 { "MaxNOOPCommands", O_MAXNOOPCOMMANDS, OI_NONE },
2235 #if _FFR_MSG_ACCEPT
2236 # define O_MSG_ACCEPT 0xdd
2237 { "MessageAccept", O_MSG_ACCEPT, OI_NONE },
2238 #endif /* _FFR_MSG_ACCEPT */
2239 #if _FFR_QUEUE_RUN_PARANOIA
2240 # define O_CHK_Q_RUNNERS 0xde
2241 { "CheckQueueRunners", O_CHK_Q_RUNNERS, OI_NONE },
2242 #endif /* _FFR_QUEUE_RUN_PARANOIA */
2243 #if _FFR_EIGHT_BIT_ADDR_OK
2244 # if !ALLOW_255
2245 # ERROR FFR_EIGHT_BIT_ADDR_OK requires _ALLOW_255
2246 # endif /* !ALLOW_255 */
2247 # define O_EIGHT_BIT_ADDR_OK 0xdf
2248 { "EightBitAddrOK", O_EIGHT_BIT_ADDR_OK, OI_NONE },
2249 #endif /* _FFR_EIGHT_BIT_ADDR_OK */
2250 #if _FFR_ADDR_TYPE_MODES
2251 # define O_ADDR_TYPE_MODES 0xe0
2252 { "AddrTypeModes", O_ADDR_TYPE_MODES, OI_NONE },
2253 #endif /* _FFR_ADDR_TYPE_MODES */
2254 #if _FFR_BADRCPT_SHUTDOWN
2255 # define O_RCPTSHUTD 0xe1
2256 { "BadRcptShutdown", O_RCPTSHUTD, OI_SAFE },
2257 # define O_RCPTSHUTDG 0xe2
2258 { "BadRcptShutdownGood", O_RCPTSHUTDG, OI_SAFE },
2259 #endif /* _FFR_BADRCPT_SHUTDOWN */
2260 #if STARTTLS && _FFR_TLS_1
2261 # define O_SRV_SSL_OPTIONS 0xe3
2262 { "ServerSSLOptions", O_SRV_SSL_OPTIONS, OI_NONE },
2263 # define O_CLT_SSL_OPTIONS 0xe4
2264 { "ClientSSLOptions", O_CLT_SSL_OPTIONS, OI_NONE },
2265 #endif /* STARTTLS && _FFR_TLS_1 */
2266 #if _FFR_EXPDELAY
2267 # define O_MAX_QUEUE_AGE 0xe5
2268 { "MaxQueueAge", O_MAX_QUEUE_AGE, OI_NONE },
2269 #endif /* _FFR_EXPDELAY */
2270 #if _FFR_RCPTTHROTDELAY
2271 # define O_RCPTTHROTDELAY 0xe6
2272 { "BadRcptThrottleDelay", O_RCPTTHROTDELAY, OI_SAFE },
2273 #endif /* _FFR_RCPTTHROTDELAY */
2274
2275 { NULL, '\0', OI_NONE }
2276 };
2277
2278 #if STARTTLS && _FFR_TLS_1
2279 static struct ssl_options
2280 {
2281 const char *sslopt_name; /* name of the flag */
2282 long sslopt_bits; /* bits to set/clear */
2283 } SSL_Option[] =
2284 {
2285 /* these are turned on by default */
2286 #ifdef SSL_OP_MICROSOFT_SESS_ID_BUG
2287 { "SSL_OP_MICROSOFT_SESS_ID_BUG", SSL_OP_MICROSOFT_SESS_ID_BUG },
2288 #endif /* SSL_OP_MICROSOFT_SESS_ID_BUG */
2289 #ifdef SSL_OP_NETSCAPE_CHALLENGE_BUG
2290 { "SSL_OP_NETSCAPE_CHALLENGE_BUG", SSL_OP_NETSCAPE_CHALLENGE_BUG },
2291 #endif /* SSL_OP_NETSCAPE_CHALLENGE_BUG */
2292 #ifdef SSL_OP_NETSCAPE_REUSE_CIPHER_CHANGE_BUG
2293 { "SSL_OP_NETSCAPE_REUSE_CIPHER_CHANGE_BUG", SSL_OP_NETSCAPE_REUSE_CIPHER_CHANGE_BUG },
2294 #endif /* SSL_OP_NETSCAPE_REUSE_CIPHER_CHANGE_BUG */
2295 #ifdef SSL_OP_SSLREF2_REUSE_CERT_TYPE_BUG
2296 { "SSL_OP_SSLREF2_REUSE_CERT_TYPE_BUG", SSL_OP_SSLREF2_REUSE_CERT_TYPE_BUG },
2297 #endif /* SSL_OP_SSLREF2_REUSE_CERT_TYPE_BUG */
2298 #ifdef SSL_OP_MICROSOFT_BIG_SSLV3_BUFFER
2299 { "SSL_OP_MICROSOFT_BIG_SSLV3_BUFFER", SSL_OP_MICROSOFT_BIG_SSLV3_BUFFER },
2300 #endif /* SSL_OP_MICROSOFT_BIG_SSLV3_BUFFER */
2301 #ifdef SSL_OP_MSIE_SSLV2_RSA_PADDING
2302 { "SSL_OP_MSIE_SSLV2_RSA_PADDING", SSL_OP_MSIE_SSLV2_RSA_PADDING },
2303 #endif /* SSL_OP_MSIE_SSLV2_RSA_PADDING */
2304 #ifdef SSL_OP_SSLEAY_080_CLIENT_DH_BUG
2305 { "SSL_OP_SSLEAY_080_CLIENT_DH_BUG", SSL_OP_SSLEAY_080_CLIENT_DH_BUG },
2306 #endif /* SSL_OP_SSLEAY_080_CLIENT_DH_BUG */
2307 #ifdef SSL_OP_TLS_D5_BUG
2308 { "SSL_OP_TLS_D5_BUG", SSL_OP_TLS_D5_BUG },
2309 #endif /* SSL_OP_TLS_D5_BUG */
2310 #ifdef SSL_OP_TLS_BLOCK_PADDING_BUG
2311 { "SSL_OP_TLS_BLOCK_PADDING_BUG", SSL_OP_TLS_BLOCK_PADDING_BUG },
2312 #endif /* SSL_OP_TLS_BLOCK_PADDING_BUG */
2313 #ifdef SSL_OP_DONT_INSERT_EMPTY_FRAGMENTS
2314 { "SSL_OP_DONT_INSERT_EMPTY_FRAGMENTS", SSL_OP_DONT_INSERT_EMPTY_FRAGMENTS },
2315 #endif /* SSL_OP_DONT_INSERT_EMPTY_FRAGMENTS */
2316 { "SSL_OP_ALL", SSL_OP_ALL },
2317 #ifdef SSL_OP_NO_SESSION_RESUMPTION_ON_RENEGOTIATION
2318 { "SSL_OP_NO_SESSION_RESUMPTION_ON_RENEGOTIATION", SSL_OP_NO_SESSION_RESUMPTION_ON_RENEGOTIATION },
2319 #endif /* SSL_OP_NO_SESSION_RESUMPTION_ON_RENEGOTIATION */
2320 #ifdef SSL_OP_EPHEMERAL_RSA
2321 { "SSL_OP_EPHEMERAL_RSA", SSL_OP_EPHEMERAL_RSA },
2322 #endif /* SSL_OP_EPHEMERAL_RSA */
2323 #ifdef SSL_OP_CIPHER_SERVER_PREFERENCE
2324 { "SSL_OP_CIPHER_SERVER_PREFERENCE", SSL_OP_CIPHER_SERVER_PREFERENCE },
2325 #endif /* SSL_OP_CIPHER_SERVER_PREFERENCE */
2326 #ifdef SSL_OP_TLS_ROLLBACK_BUG
2327 { "SSL_OP_TLS_ROLLBACK_BUG", SSL_OP_TLS_ROLLBACK_BUG },
2328 #endif /* SSL_OP_TLS_ROLLBACK_BUG */
2329 #ifdef SSL_OP_NO_SSLv2
2330 { "SSL_OP_NO_SSLv2", SSL_OP_NO_SSLv2 },
2331 #endif /* SSL_OP_NO_SSLv2 */
2332 #ifdef SSL_OP_NO_SSLv3
2333 { "SSL_OP_NO_SSLv3", SSL_OP_NO_SSLv3 },
2334 #endif /* SSL_OP_NO_SSLv3 */
2335 #ifdef SSL_OP_NO_TLSv1
2336 { "SSL_OP_NO_TLSv1", SSL_OP_NO_TLSv1 },
2337 #endif /* SSL_OP_NO_TLSv1 */
2338 #ifdef SSL_OP_PKCS1_CHECK_1
2339 { "SSL_OP_PKCS1_CHECK_1", SSL_OP_PKCS1_CHECK_1 },
2340 #endif /* SSL_OP_PKCS1_CHECK_1 */
2341 #ifdef SSL_OP_PKCS1_CHECK_2
2342 { "SSL_OP_PKCS1_CHECK_2", SSL_OP_PKCS1_CHECK_2 },
2343 #endif /* SSL_OP_PKCS1_CHECK_2 */
2344 #ifdef SSL_OP_NETSCAPE_CA_DN_BUG
2345 { "SSL_OP_NETSCAPE_CA_DN_BUG", SSL_OP_NETSCAPE_CA_DN_BUG },
2346 #endif /* SSL_OP_NETSCAPE_CA_DN_BUG */
2347 #ifdef SSL_OP_NETSCAPE_DEMO_CIPHER_CHANGE_BUG
2348 { "SSL_OP_NETSCAPE_DEMO_CIPHER_CHANGE_BUG", SSL_OP_NETSCAPE_DEMO_CIPHER_CHANGE_BUG },
2349 #endif /* SSL_OP_NETSCAPE_DEMO_CIPHER_CHANGE_BUG */
2350 { NULL, 0 }
2351 };
2352 #endif /* STARTTLS && _FFR_TLS_1 */
2353
2354
2355 # define CANONIFY(val)
2356
2357 # define SET_OPT_DEFAULT(opt, val) opt = val
2358
2359 /* set a string option by expanding the value and assigning it */
2360 /* WARNING this belongs ONLY into a case statement! */
2361 #define SET_STRING_EXP(str) \
2362 expand(val, exbuf, sizeof(exbuf), e); \
2363 newval = sm_pstrdup_x(exbuf); \
2364 if (str != NULL) \
2365 sm_free(str); \
2366 CANONIFY(newval); \
2367 str = newval; \
2368 break
2369
2370 #define OPTNAME o->o_name == NULL ? "<unknown>" : o->o_name
2371
2372 void
setoption(opt,val,safe,sticky,e)2373 setoption(opt, val, safe, sticky, e)
2374 int opt;
2375 char *val;
2376 bool safe;
2377 bool sticky;
2378 register ENVELOPE *e;
2379 {
2380 register char *p;
2381 register struct optioninfo *o;
2382 char *subopt;
2383 int mid;
2384 bool can_setuid = RunAsUid == 0;
2385 auto char *ep;
2386 char buf[50];
2387 extern bool Warn_Q_option;
2388 #if _FFR_ALLOW_SASLINFO
2389 extern unsigned int SubmitMode;
2390 #endif /* _FFR_ALLOW_SASLINFO */
2391 #if STARTTLS || SM_CONF_SHM
2392 char *newval;
2393 char exbuf[MAXLINE];
2394 #endif /* STARTTLS || SM_CONF_SHM */
2395 #if STARTTLS && _FFR_TLS_1
2396 long *pssloptions = NULL;
2397 #endif /* STARTTLS && _FFR_TLS_1 */
2398
2399 errno = 0;
2400 if (opt == ' ')
2401 {
2402 /* full word options */
2403 struct optioninfo *sel;
2404
2405 p = strchr(val, '=');
2406 if (p == NULL)
2407 p = &val[strlen(val)];
2408 while (*--p == ' ')
2409 continue;
2410 while (*++p == ' ')
2411 *p = '\0';
2412 if (p == val)
2413 {
2414 syserr("readcf: null option name");
2415 return;
2416 }
2417 if (*p == '=')
2418 *p++ = '\0';
2419 while (*p == ' ')
2420 p++;
2421 subopt = strchr(val, '.');
2422 if (subopt != NULL)
2423 *subopt++ = '\0';
2424 sel = NULL;
2425 for (o = OptionTab; o->o_name != NULL; o++)
2426 {
2427 if (sm_strncasecmp(o->o_name, val, strlen(val)) != 0)
2428 continue;
2429 if (strlen(o->o_name) == strlen(val))
2430 {
2431 /* completely specified -- this must be it */
2432 sel = NULL;
2433 break;
2434 }
2435 if (sel != NULL)
2436 break;
2437 sel = o;
2438 }
2439 if (sel != NULL && o->o_name == NULL)
2440 o = sel;
2441 else if (o->o_name == NULL)
2442 {
2443 syserr("readcf: unknown option name %s", val);
2444 return;
2445 }
2446 else if (sel != NULL)
2447 {
2448 syserr("readcf: ambiguous option name %s (matches %s and %s)",
2449 val, sel->o_name, o->o_name);
2450 return;
2451 }
2452 if (strlen(val) != strlen(o->o_name))
2453 {
2454 int oldVerbose = Verbose;
2455
2456 Verbose = 1;
2457 message("Option %s used as abbreviation for %s",
2458 val, o->o_name);
2459 Verbose = oldVerbose;
2460 }
2461 opt = o->o_code;
2462 val = p;
2463 }
2464 else
2465 {
2466 for (o = OptionTab; o->o_name != NULL; o++)
2467 {
2468 if (o->o_code == opt)
2469 break;
2470 }
2471 if (o->o_name == NULL)
2472 {
2473 syserr("readcf: unknown option name 0x%x", opt & 0xff);
2474 return;
2475 }
2476 subopt = NULL;
2477 }
2478
2479 if (subopt != NULL && !bitset(OI_SUBOPT, o->o_flags))
2480 {
2481 if (tTd(37, 1))
2482 sm_dprintf("setoption: %s does not support suboptions, ignoring .%s\n",
2483 OPTNAME, subopt);
2484 subopt = NULL;
2485 }
2486
2487 if (tTd(37, 1))
2488 {
2489 sm_dprintf(isascii(opt) && isprint(opt) ?
2490 "setoption %s (%c)%s%s=" :
2491 "setoption %s (0x%x)%s%s=",
2492 OPTNAME, opt, subopt == NULL ? "" : ".",
2493 subopt == NULL ? "" : subopt);
2494 xputs(sm_debug_file(), val);
2495 }
2496
2497 /*
2498 ** See if this option is preset for us.
2499 */
2500
2501 if (!sticky && bitnset(opt, StickyOpt))
2502 {
2503 if (tTd(37, 1))
2504 sm_dprintf(" (ignored)\n");
2505 return;
2506 }
2507
2508 /*
2509 ** Check to see if this option can be specified by this user.
2510 */
2511
2512 if (!safe && RealUid == 0)
2513 safe = true;
2514 if (!safe && !bitset(OI_SAFE, o->o_flags))
2515 {
2516 if (opt != 'M' || (val[0] != 'r' && val[0] != 's'))
2517 {
2518 int dp;
2519
2520 if (tTd(37, 1))
2521 sm_dprintf(" (unsafe)");
2522 dp = drop_privileges(true);
2523 setstat(dp);
2524 }
2525 }
2526 if (tTd(37, 1))
2527 sm_dprintf("\n");
2528
2529 switch (opt & 0xff)
2530 {
2531 case '7': /* force seven-bit input */
2532 SevenBitInput = atobool(val);
2533 break;
2534
2535 case '8': /* handling of 8-bit input */
2536 #if MIME8TO7
2537 switch (*val)
2538 {
2539 case 'p': /* pass 8 bit, convert MIME */
2540 MimeMode = MM_CVTMIME|MM_PASS8BIT;
2541 break;
2542
2543 case 'm': /* convert 8-bit, convert MIME */
2544 MimeMode = MM_CVTMIME|MM_MIME8BIT;
2545 break;
2546
2547 case 's': /* strict adherence */
2548 MimeMode = MM_CVTMIME;
2549 break;
2550
2551 # if 0
2552 case 'r': /* reject 8-bit, don't convert MIME */
2553 MimeMode = 0;
2554 break;
2555
2556 case 'j': /* "just send 8" */
2557 MimeMode = MM_PASS8BIT;
2558 break;
2559
2560 case 'a': /* encode 8 bit if available */
2561 MimeMode = MM_MIME8BIT|MM_PASS8BIT|MM_CVTMIME;
2562 break;
2563
2564 case 'c': /* convert 8 bit to MIME, never 7 bit */
2565 MimeMode = MM_MIME8BIT;
2566 break;
2567 # endif /* 0 */
2568
2569 default:
2570 syserr("Unknown 8-bit mode %c", *val);
2571 finis(false, true, EX_USAGE);
2572 }
2573 #else /* MIME8TO7 */
2574 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
2575 "Warning: Option: %s requires MIME8TO7 support\n",
2576 OPTNAME);
2577 #endif /* MIME8TO7 */
2578 break;
2579
2580 case 'A': /* set default alias file */
2581 if (val[0] == '\0')
2582 {
2583 char *al;
2584
2585 SET_OPT_DEFAULT(al, "aliases");
2586 setalias(al);
2587 }
2588 else
2589 setalias(val);
2590 break;
2591
2592 case 'a': /* look N minutes for "@:@" in alias file */
2593 if (val[0] == '\0')
2594 SafeAlias = 5 MINUTES;
2595 else
2596 SafeAlias = convtime(val, 'm');
2597 break;
2598
2599 case 'B': /* substitution for blank character */
2600 SpaceSub = val[0];
2601 if (SpaceSub == '\0')
2602 SpaceSub = ' ';
2603 break;
2604
2605 case 'b': /* min blocks free on queue fs/max msg size */
2606 p = strchr(val, '/');
2607 if (p != NULL)
2608 {
2609 *p++ = '\0';
2610 MaxMessageSize = atol(p);
2611 }
2612 MinBlocksFree = atol(val);
2613 break;
2614
2615 case 'c': /* don't connect to "expensive" mailers */
2616 NoConnect = atobool(val);
2617 break;
2618
2619 case 'C': /* checkpoint every N addresses */
2620 if (safe || CheckpointInterval > atoi(val))
2621 CheckpointInterval = atoi(val);
2622 break;
2623
2624 case 'd': /* delivery mode */
2625 switch (*val)
2626 {
2627 case '\0':
2628 set_delivery_mode(SM_DELIVER, e);
2629 break;
2630
2631 case SM_QUEUE: /* queue only */
2632 case SM_DEFER: /* queue only and defer map lookups */
2633 case SM_DELIVER: /* do everything */
2634 case SM_FORK: /* fork after verification */
2635 #if _FFR_DM_ONE
2636 /* deliver first TA in background, then queue */
2637 case SM_DM_ONE:
2638 #endif /* _FFR_DM_ONE */
2639 set_delivery_mode(*val, e);
2640 break;
2641
2642 default:
2643 syserr("Unknown delivery mode %c", *val);
2644 finis(false, true, EX_USAGE);
2645 }
2646 break;
2647
2648 case 'E': /* error message header/header file */
2649 if (*val != '\0')
2650 ErrMsgFile = newstr(val);
2651 break;
2652
2653 case 'e': /* set error processing mode */
2654 switch (*val)
2655 {
2656 case EM_QUIET: /* be silent about it */
2657 case EM_MAIL: /* mail back */
2658 case EM_BERKNET: /* do berknet error processing */
2659 case EM_WRITE: /* write back (or mail) */
2660 case EM_PRINT: /* print errors normally (default) */
2661 e->e_errormode = *val;
2662 break;
2663 }
2664 break;
2665
2666 case 'F': /* file mode */
2667 FileMode = atooct(val) & 0777;
2668 break;
2669
2670 case 'f': /* save Unix-style From lines on front */
2671 SaveFrom = atobool(val);
2672 break;
2673
2674 case 'G': /* match recipients against GECOS field */
2675 MatchGecos = atobool(val);
2676 break;
2677
2678 case 'g': /* default gid */
2679 g_opt:
2680 if (isascii(*val) && isdigit(*val))
2681 DefGid = atoi(val);
2682 else
2683 {
2684 register struct group *gr;
2685
2686 DefGid = -1;
2687 gr = getgrnam(val);
2688 if (gr == NULL)
2689 syserr("readcf: option %c: unknown group %s",
2690 opt, val);
2691 else
2692 DefGid = gr->gr_gid;
2693 }
2694 break;
2695
2696 case 'H': /* help file */
2697 if (val[0] == '\0')
2698 {
2699 SET_OPT_DEFAULT(HelpFile, "helpfile");
2700 }
2701 else
2702 {
2703 CANONIFY(val);
2704 HelpFile = newstr(val);
2705 }
2706 break;
2707
2708 case 'h': /* maximum hop count */
2709 MaxHopCount = atoi(val);
2710 break;
2711
2712 case 'I': /* use internet domain name server */
2713 #if NAMED_BIND
2714 for (p = val; *p != 0; )
2715 {
2716 bool clearmode;
2717 char *q;
2718 struct resolverflags *rfp;
2719
2720 while (*p == ' ')
2721 p++;
2722 if (*p == '\0')
2723 break;
2724 clearmode = false;
2725 if (*p == '-')
2726 clearmode = true;
2727 else if (*p != '+')
2728 p--;
2729 p++;
2730 q = p;
2731 while (*p != '\0' && !(isascii(*p) && isspace(*p)))
2732 p++;
2733 if (*p != '\0')
2734 *p++ = '\0';
2735 if (sm_strcasecmp(q, "HasWildcardMX") == 0)
2736 {
2737 HasWildcardMX = !clearmode;
2738 continue;
2739 }
2740 if (sm_strcasecmp(q, "WorkAroundBrokenAAAA") == 0)
2741 {
2742 WorkAroundBrokenAAAA = !clearmode;
2743 continue;
2744 }
2745 for (rfp = ResolverFlags; rfp->rf_name != NULL; rfp++)
2746 {
2747 if (sm_strcasecmp(q, rfp->rf_name) == 0)
2748 break;
2749 }
2750 if (rfp->rf_name == NULL)
2751 syserr("readcf: I option value %s unrecognized", q);
2752 else if (clearmode)
2753 _res.options &= ~rfp->rf_bits;
2754 else
2755 _res.options |= rfp->rf_bits;
2756 }
2757 if (tTd(8, 2))
2758 sm_dprintf("_res.options = %x, HasWildcardMX = %d\n",
2759 (unsigned int) _res.options, HasWildcardMX);
2760 #else /* NAMED_BIND */
2761 usrerr("name server (I option) specified but BIND not compiled in");
2762 #endif /* NAMED_BIND */
2763 break;
2764
2765 case 'i': /* ignore dot lines in message */
2766 IgnrDot = atobool(val);
2767 break;
2768
2769 case 'j': /* send errors in MIME (RFC 1341) format */
2770 SendMIMEErrors = atobool(val);
2771 break;
2772
2773 case 'J': /* .forward search path */
2774 CANONIFY(val);
2775 ForwardPath = newstr(val);
2776 break;
2777
2778 case 'k': /* connection cache size */
2779 MaxMciCache = atoi(val);
2780 if (MaxMciCache < 0)
2781 MaxMciCache = 0;
2782 break;
2783
2784 case 'K': /* connection cache timeout */
2785 MciCacheTimeout = convtime(val, 'm');
2786 break;
2787
2788 case 'l': /* use Errors-To: header */
2789 UseErrorsTo = atobool(val);
2790 break;
2791
2792 case 'L': /* log level */
2793 if (safe || LogLevel < atoi(val))
2794 LogLevel = atoi(val);
2795 break;
2796
2797 case 'M': /* define macro */
2798 sticky = false;
2799 mid = macid_parse(val, &ep);
2800 if (mid == 0)
2801 break;
2802 p = newstr(ep);
2803 if (!safe)
2804 cleanstrcpy(p, p, strlen(p) + 1);
2805 macdefine(&CurEnv->e_macro, A_TEMP, mid, p);
2806 break;
2807
2808 case 'm': /* send to me too */
2809 MeToo = atobool(val);
2810 break;
2811
2812 case 'n': /* validate RHS in newaliases */
2813 CheckAliases = atobool(val);
2814 break;
2815
2816 /* 'N' available -- was "net name" */
2817
2818 case 'O': /* daemon options */
2819 if (!setdaemonoptions(val))
2820 syserr("too many daemons defined (%d max)", MAXDAEMONS);
2821 break;
2822
2823 case 'o': /* assume old style headers */
2824 if (atobool(val))
2825 CurEnv->e_flags |= EF_OLDSTYLE;
2826 else
2827 CurEnv->e_flags &= ~EF_OLDSTYLE;
2828 break;
2829
2830 case 'p': /* select privacy level */
2831 p = val;
2832 for (;;)
2833 {
2834 register struct prival *pv;
2835 extern struct prival PrivacyValues[];
2836
2837 while (isascii(*p) && (isspace(*p) || ispunct(*p)))
2838 p++;
2839 if (*p == '\0')
2840 break;
2841 val = p;
2842 while (isascii(*p) && isalnum(*p))
2843 p++;
2844 if (*p != '\0')
2845 *p++ = '\0';
2846
2847 for (pv = PrivacyValues; pv->pv_name != NULL; pv++)
2848 {
2849 if (sm_strcasecmp(val, pv->pv_name) == 0)
2850 break;
2851 }
2852 if (pv->pv_name == NULL)
2853 syserr("readcf: Op line: %s unrecognized", val);
2854 else
2855 PrivacyFlags |= pv->pv_flag;
2856 }
2857 sticky = false;
2858 break;
2859
2860 case 'P': /* postmaster copy address for returned mail */
2861 PostMasterCopy = newstr(val);
2862 break;
2863
2864 case 'q': /* slope of queue only function */
2865 QueueFactor = atoi(val);
2866 break;
2867
2868 case 'Q': /* queue directory */
2869 if (val[0] == '\0')
2870 {
2871 QueueDir = "mqueue";
2872 }
2873 else
2874 {
2875 QueueDir = newstr(val);
2876 }
2877 if (RealUid != 0 && !safe)
2878 Warn_Q_option = true;
2879 break;
2880
2881 case 'R': /* don't prune routes */
2882 DontPruneRoutes = atobool(val);
2883 break;
2884
2885 case 'r': /* read timeout */
2886 if (subopt == NULL)
2887 inittimeouts(val, sticky);
2888 else
2889 settimeout(subopt, val, sticky);
2890 break;
2891
2892 case 'S': /* status file */
2893 if (val[0] == '\0')
2894 {
2895 SET_OPT_DEFAULT(StatFile, "statistics");
2896 }
2897 else
2898 {
2899 CANONIFY(val);
2900 StatFile = newstr(val);
2901 }
2902 break;
2903
2904 case 's': /* be super safe, even if expensive */
2905 if (tolower(*val) == 'i')
2906 SuperSafe = SAFE_INTERACTIVE;
2907 else if (tolower(*val) == 'p')
2908 #if MILTER
2909 SuperSafe = SAFE_REALLY_POSTMILTER;
2910 #else /* MILTER */
2911 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
2912 "Warning: SuperSafe=PostMilter requires Milter support (-DMILTER)\n");
2913 #endif /* MILTER */
2914 else
2915 SuperSafe = atobool(val) ? SAFE_REALLY : SAFE_NO;
2916 break;
2917
2918 case 'T': /* queue timeout */
2919 p = strchr(val, '/');
2920 if (p != NULL)
2921 {
2922 *p++ = '\0';
2923 settimeout("queuewarn", p, sticky);
2924 }
2925 settimeout("queuereturn", val, sticky);
2926 break;
2927
2928 case 't': /* time zone name */
2929 TimeZoneSpec = newstr(val);
2930 break;
2931
2932 case 'U': /* location of user database */
2933 UdbSpec = newstr(val);
2934 break;
2935
2936 case 'u': /* set default uid */
2937 for (p = val; *p != '\0'; p++)
2938 {
2939 # if _FFR_DOTTED_USERNAMES
2940 if (*p == '/' || *p == ':')
2941 # else /* _FFR_DOTTED_USERNAMES */
2942 if (*p == '.' || *p == '/' || *p == ':')
2943 # endif /* _FFR_DOTTED_USERNAMES */
2944 {
2945 *p++ = '\0';
2946 break;
2947 }
2948 }
2949 if (isascii(*val) && isdigit(*val))
2950 {
2951 DefUid = atoi(val);
2952 setdefuser();
2953 }
2954 else
2955 {
2956 register struct passwd *pw;
2957
2958 DefUid = -1;
2959 pw = sm_getpwnam(val);
2960 if (pw == NULL)
2961 {
2962 syserr("readcf: option u: unknown user %s", val);
2963 break;
2964 }
2965 else
2966 {
2967 DefUid = pw->pw_uid;
2968 DefGid = pw->pw_gid;
2969 DefUser = newstr(pw->pw_name);
2970 }
2971 }
2972
2973 # ifdef UID_MAX
2974 if (DefUid > UID_MAX)
2975 {
2976 syserr("readcf: option u: uid value (%ld) > UID_MAX (%ld); ignored",
2977 (long)DefUid, (long)UID_MAX);
2978 break;
2979 }
2980 # endif /* UID_MAX */
2981
2982 /* handle the group if it is there */
2983 if (*p == '\0')
2984 break;
2985 val = p;
2986 goto g_opt;
2987
2988 case 'V': /* fallback MX host */
2989 if (val[0] != '\0')
2990 FallbackMX = newstr(val);
2991 break;
2992
2993 case 'v': /* run in verbose mode */
2994 Verbose = atobool(val) ? 1 : 0;
2995 break;
2996
2997 case 'w': /* if we are best MX, try host directly */
2998 TryNullMXList = atobool(val);
2999 break;
3000
3001 /* 'W' available -- was wizard password */
3002
3003 case 'x': /* load avg at which to auto-queue msgs */
3004 QueueLA = atoi(val);
3005 break;
3006
3007 case 'X': /* load avg at which to auto-reject connections */
3008 RefuseLA = atoi(val);
3009 break;
3010
3011 case O_DELAY_LA: /* load avg at which to delay connections */
3012 DelayLA = atoi(val);
3013 break;
3014
3015 case 'y': /* work recipient factor */
3016 WkRecipFact = atoi(val);
3017 break;
3018
3019 case 'Y': /* fork jobs during queue runs */
3020 ForkQueueRuns = atobool(val);
3021 break;
3022
3023 case 'z': /* work message class factor */
3024 WkClassFact = atoi(val);
3025 break;
3026
3027 case 'Z': /* work time factor */
3028 WkTimeFact = atoi(val);
3029 break;
3030
3031
3032 #if _FFR_QUEUE_GROUP_SORTORDER
3033 /* coordinate this with makequeue() */
3034 #endif /* _FFR_QUEUE_GROUP_SORTORDER */
3035 case O_QUEUESORTORD: /* queue sorting order */
3036 switch (*val)
3037 {
3038 case 'f': /* File Name */
3039 case 'F':
3040 QueueSortOrder = QSO_BYFILENAME;
3041 break;
3042
3043 case 'h': /* Host first */
3044 case 'H':
3045 QueueSortOrder = QSO_BYHOST;
3046 break;
3047
3048 case 'm': /* Modification time */
3049 case 'M':
3050 QueueSortOrder = QSO_BYMODTIME;
3051 break;
3052
3053 case 'p': /* Priority order */
3054 case 'P':
3055 QueueSortOrder = QSO_BYPRIORITY;
3056 break;
3057
3058 case 't': /* Submission time */
3059 case 'T':
3060 QueueSortOrder = QSO_BYTIME;
3061 break;
3062
3063 case 'r': /* Random */
3064 case 'R':
3065 QueueSortOrder = QSO_RANDOM;
3066 break;
3067
3068 #if _FFR_RHS
3069 case 's': /* Shuffled host name */
3070 case 'S':
3071 QueueSortOrder = QSO_BYSHUFFLE;
3072 break;
3073 #endif /* _FFR_RHS */
3074
3075 case 'n': /* none */
3076 case 'N':
3077 QueueSortOrder = QSO_NONE;
3078 break;
3079
3080 default:
3081 syserr("Invalid queue sort order \"%s\"", val);
3082 }
3083 break;
3084
3085 case O_HOSTSFILE: /* pathname of /etc/hosts file */
3086 CANONIFY(val);
3087 HostsFile = newstr(val);
3088 break;
3089
3090 case O_MQA: /* minimum queue age between deliveries */
3091 MinQueueAge = convtime(val, 'm');
3092 break;
3093
3094 #if _FFR_EXPDELAY
3095 case O_MAX_QUEUE_AGE:
3096 MaxQueueAge = convtime(val, 'm');
3097 break;
3098 #endif /* _FFR_EXPDELAY */
3099
3100 case O_DEFCHARSET: /* default character set for mimefying */
3101 DefaultCharSet = newstr(denlstring(val, true, true));
3102 break;
3103
3104 case O_SSFILE: /* service switch file */
3105 CANONIFY(val);
3106 ServiceSwitchFile = newstr(val);
3107 break;
3108
3109 case O_DIALDELAY: /* delay for dial-on-demand operation */
3110 DialDelay = convtime(val, 's');
3111 break;
3112
3113 case O_NORCPTACTION: /* what to do if no recipient */
3114 if (sm_strcasecmp(val, "none") == 0)
3115 NoRecipientAction = NRA_NO_ACTION;
3116 else if (sm_strcasecmp(val, "add-to") == 0)
3117 NoRecipientAction = NRA_ADD_TO;
3118 else if (sm_strcasecmp(val, "add-apparently-to") == 0)
3119 NoRecipientAction = NRA_ADD_APPARENTLY_TO;
3120 else if (sm_strcasecmp(val, "add-bcc") == 0)
3121 NoRecipientAction = NRA_ADD_BCC;
3122 else if (sm_strcasecmp(val, "add-to-undisclosed") == 0)
3123 NoRecipientAction = NRA_ADD_TO_UNDISCLOSED;
3124 else
3125 syserr("Invalid NoRecipientAction: %s", val);
3126 break;
3127
3128 case O_SAFEFILEENV: /* chroot() environ for writing to files */
3129 if (*val == '\0')
3130 break;
3131
3132 /* strip trailing slashes */
3133 p = val + strlen(val) - 1;
3134 while (p >= val && *p == '/')
3135 *p-- = '\0';
3136
3137 if (*val == '\0')
3138 break;
3139
3140 SafeFileEnv = newstr(val);
3141 break;
3142
3143 case O_MAXMSGSIZE: /* maximum message size */
3144 MaxMessageSize = atol(val);
3145 break;
3146
3147 case O_COLONOKINADDR: /* old style handling of colon addresses */
3148 ColonOkInAddr = atobool(val);
3149 break;
3150
3151 case O_MAXQUEUERUN: /* max # of jobs in a single queue run */
3152 MaxQueueRun = atoi(val);
3153 break;
3154
3155 case O_MAXCHILDREN: /* max # of children of daemon */
3156 MaxChildren = atoi(val);
3157 break;
3158
3159 case O_MAXQUEUECHILDREN: /* max # of children of daemon */
3160 MaxQueueChildren = atoi(val);
3161 break;
3162
3163 case O_MAXRUNNERSPERQUEUE: /* max # runners in a queue group */
3164 MaxRunnersPerQueue = atoi(val);
3165 break;
3166
3167 case O_NICEQUEUERUN: /* nice queue runs */
3168 #if !HASNICE
3169 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3170 "Warning: NiceQueueRun set on system that doesn't support nice()\n");
3171 #endif /* !HASNICE */
3172
3173 /* XXX do we want to check the range? > 0 ? */
3174 NiceQueueRun = atoi(val);
3175 break;
3176
3177 case O_SHMKEY: /* shared memory key */
3178 #if SM_CONF_SHM
3179 ShmKey = atol(val);
3180 #else /* SM_CONF_SHM */
3181 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3182 "Warning: Option: %s requires shared memory support (-DSM_CONF_SHM)\n",
3183 OPTNAME);
3184 #endif /* SM_CONF_SHM */
3185 break;
3186
3187 case O_SHMKEYFILE: /* shared memory key file */
3188 #if SM_CONF_SHM
3189 SET_STRING_EXP(ShmKeyFile);
3190 #else /* SM_CONF_SHM */
3191 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3192 "Warning: Option: %s requires shared memory support (-DSM_CONF_SHM)\n",
3193 OPTNAME);
3194 break;
3195 #endif /* SM_CONF_SHM */
3196
3197 #if _FFR_MAX_FORWARD_ENTRIES
3198 case O_MAXFORWARD: /* max # of forward entries */
3199 MaxForwardEntries = atoi(val);
3200 break;
3201 #endif /* _FFR_MAX_FORWARD_ENTRIES */
3202
3203 case O_KEEPCNAMES: /* don't expand CNAME records */
3204 DontExpandCnames = atobool(val);
3205 break;
3206
3207 case O_MUSTQUOTE: /* must quote these characters in phrases */
3208 (void) sm_strlcpy(buf, "@,;:\\()[]", sizeof(buf));
3209 if (strlen(val) < sizeof(buf) - 10)
3210 (void) sm_strlcat(buf, val, sizeof(buf));
3211 else
3212 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3213 "Warning: MustQuoteChars too long, ignored.\n");
3214 MustQuoteChars = newstr(buf);
3215 break;
3216
3217 case O_SMTPGREETING: /* SMTP greeting message (old $e macro) */
3218 SmtpGreeting = newstr(munchstring(val, NULL, '\0'));
3219 break;
3220
3221 case O_UNIXFROM: /* UNIX From_ line (old $l macro) */
3222 UnixFromLine = newstr(munchstring(val, NULL, '\0'));
3223 break;
3224
3225 case O_OPCHARS: /* operator characters (old $o macro) */
3226 if (OperatorChars != NULL)
3227 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3228 "Warning: OperatorChars is being redefined.\n It should only be set before ruleset definitions.\n");
3229 OperatorChars = newstr(munchstring(val, NULL, '\0'));
3230 break;
3231
3232 case O_DONTINITGRPS: /* don't call initgroups(3) */
3233 DontInitGroups = atobool(val);
3234 break;
3235
3236 case O_SLFH: /* make sure from fits on one line */
3237 SingleLineFromHeader = atobool(val);
3238 break;
3239
3240 case O_ABH: /* allow HELO commands with syntax errors */
3241 AllowBogusHELO = atobool(val);
3242 break;
3243
3244 case O_CONNTHROT: /* connection rate throttle */
3245 ConnRateThrottle = atoi(val);
3246 break;
3247
3248 case O_UGW: /* group writable files are unsafe */
3249 if (!atobool(val))
3250 {
3251 setbitn(DBS_GROUPWRITABLEFORWARDFILESAFE,
3252 DontBlameSendmail);
3253 setbitn(DBS_GROUPWRITABLEINCLUDEFILESAFE,
3254 DontBlameSendmail);
3255 }
3256 break;
3257
3258 case O_DBLBOUNCE: /* address to which to send double bounces */
3259 DoubleBounceAddr = newstr(val);
3260 break;
3261
3262 case O_HSDIR: /* persistent host status directory */
3263 if (val[0] != '\0')
3264 {
3265 CANONIFY(val);
3266 HostStatDir = newstr(val);
3267 }
3268 break;
3269
3270 case O_SINGTHREAD: /* single thread deliveries (requires hsdir) */
3271 SingleThreadDelivery = atobool(val);
3272 break;
3273
3274 case O_RUNASUSER: /* run bulk of code as this user */
3275 for (p = val; *p != '\0'; p++)
3276 {
3277 # if _FFR_DOTTED_USERNAMES
3278 if (*p == '/' || *p == ':')
3279 # else /* _FFR_DOTTED_USERNAMES */
3280 if (*p == '.' || *p == '/' || *p == ':')
3281 # endif /* _FFR_DOTTED_USERNAMES */
3282 {
3283 *p++ = '\0';
3284 break;
3285 }
3286 }
3287 if (isascii(*val) && isdigit(*val))
3288 {
3289 if (can_setuid)
3290 RunAsUid = atoi(val);
3291 }
3292 else
3293 {
3294 register struct passwd *pw;
3295
3296 pw = sm_getpwnam(val);
3297 if (pw == NULL)
3298 {
3299 syserr("readcf: option RunAsUser: unknown user %s", val);
3300 break;
3301 }
3302 else if (can_setuid)
3303 {
3304 if (*p == '\0')
3305 RunAsUserName = newstr(val);
3306 RunAsUid = pw->pw_uid;
3307 RunAsGid = pw->pw_gid;
3308 }
3309 else if (EffGid == pw->pw_gid)
3310 RunAsGid = pw->pw_gid;
3311 else if (UseMSP && *p == '\0')
3312 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3313 "WARNING: RunAsUser for MSP ignored, check group ids (egid=%d, want=%d)\n",
3314 (int) EffGid,
3315 (int) pw->pw_gid);
3316 }
3317 # ifdef UID_MAX
3318 if (RunAsUid > UID_MAX)
3319 {
3320 syserr("readcf: option RunAsUser: uid value (%ld) > UID_MAX (%ld); ignored",
3321 (long) RunAsUid, (long) UID_MAX);
3322 break;
3323 }
3324 # endif /* UID_MAX */
3325 if (*p != '\0')
3326 {
3327 if (isascii(*p) && isdigit(*p))
3328 {
3329 gid_t runasgid;
3330
3331 runasgid = (gid_t) atoi(p);
3332 if (can_setuid || EffGid == runasgid)
3333 RunAsGid = runasgid;
3334 else if (UseMSP)
3335 (void) sm_io_fprintf(smioout,
3336 SM_TIME_DEFAULT,
3337 "WARNING: RunAsUser for MSP ignored, check group ids (egid=%d, want=%d)\n",
3338 (int) EffGid,
3339 (int) runasgid);
3340 }
3341 else
3342 {
3343 register struct group *gr;
3344
3345 gr = getgrnam(p);
3346 if (gr == NULL)
3347 syserr("readcf: option RunAsUser: unknown group %s",
3348 p);
3349 else if (can_setuid || EffGid == gr->gr_gid)
3350 RunAsGid = gr->gr_gid;
3351 else if (UseMSP)
3352 (void) sm_io_fprintf(smioout,
3353 SM_TIME_DEFAULT,
3354 "WARNING: RunAsUser for MSP ignored, check group ids (egid=%d, want=%d)\n",
3355 (int) EffGid,
3356 (int) gr->gr_gid);
3357 }
3358 }
3359 if (tTd(47, 5))
3360 sm_dprintf("readcf: RunAsUser = %d:%d\n",
3361 (int) RunAsUid, (int) RunAsGid);
3362 break;
3363
3364 case O_DSN_RRT:
3365 RrtImpliesDsn = atobool(val);
3366 break;
3367
3368 case O_PIDFILE:
3369 PSTRSET(PidFile, val);
3370 break;
3371
3372 case O_DONTBLAMESENDMAIL:
3373 p = val;
3374 for (;;)
3375 {
3376 register struct dbsval *dbs;
3377 extern struct dbsval DontBlameSendmailValues[];
3378
3379 while (isascii(*p) && (isspace(*p) || ispunct(*p)))
3380 p++;
3381 if (*p == '\0')
3382 break;
3383 val = p;
3384 while (isascii(*p) && isalnum(*p))
3385 p++;
3386 if (*p != '\0')
3387 *p++ = '\0';
3388
3389 for (dbs = DontBlameSendmailValues;
3390 dbs->dbs_name != NULL; dbs++)
3391 {
3392 if (sm_strcasecmp(val, dbs->dbs_name) == 0)
3393 break;
3394 }
3395 if (dbs->dbs_name == NULL)
3396 syserr("readcf: DontBlameSendmail option: %s unrecognized", val);
3397 else if (dbs->dbs_flag == DBS_SAFE)
3398 clrbitmap(DontBlameSendmail);
3399 else
3400 setbitn(dbs->dbs_flag, DontBlameSendmail);
3401 }
3402 sticky = false;
3403 break;
3404
3405 case O_DPI:
3406 if (sm_strcasecmp(val, "loopback") == 0)
3407 DontProbeInterfaces = DPI_SKIPLOOPBACK;
3408 else if (atobool(val))
3409 DontProbeInterfaces = DPI_PROBENONE;
3410 else
3411 DontProbeInterfaces = DPI_PROBEALL;
3412 break;
3413
3414 case O_MAXRCPT:
3415 MaxRcptPerMsg = atoi(val);
3416 break;
3417
3418 case O_RCPTTHROT:
3419 BadRcptThrottle = atoi(val);
3420 break;
3421
3422 #if _FFR_RCPTTHROTDELAY
3423 case O_RCPTTHROTDELAY:
3424 BadRcptThrottleDelay = atoi(val);
3425 break;
3426 #endif /* _FFR_RCPTTHROTDELAY */
3427
3428 case O_DEADLETTER:
3429 CANONIFY(val);
3430 PSTRSET(DeadLetterDrop, val);
3431 break;
3432
3433 #if _FFR_DONTLOCKFILESFORREAD_OPTION
3434 case O_DONTLOCK:
3435 DontLockReadFiles = atobool(val);
3436 break;
3437 #endif /* _FFR_DONTLOCKFILESFORREAD_OPTION */
3438
3439 case O_MAXALIASRCSN:
3440 MaxAliasRecursion = atoi(val);
3441 break;
3442
3443 case O_CNCTONLYTO:
3444 /* XXX should probably use gethostbyname */
3445 #if NETINET || NETINET6
3446 ConnectOnlyTo.sa.sa_family = AF_UNSPEC;
3447 # if NETINET6
3448 if (anynet_pton(AF_INET6, val,
3449 &ConnectOnlyTo.sin6.sin6_addr) != 1)
3450 ConnectOnlyTo.sa.sa_family = AF_INET6;
3451 else
3452 # endif /* NETINET6 */
3453 # if NETINET
3454 {
3455 ConnectOnlyTo.sin.sin_addr.s_addr = inet_addr(val);
3456 if (ConnectOnlyTo.sin.sin_addr.s_addr != INADDR_NONE)
3457 ConnectOnlyTo.sa.sa_family = AF_INET;
3458 }
3459
3460 # endif /* NETINET */
3461 if (ConnectOnlyTo.sa.sa_family == AF_UNSPEC)
3462 {
3463 syserr("readcf: option ConnectOnlyTo: invalid IP address %s",
3464 val);
3465 break;
3466 }
3467 #endif /* NETINET || NETINET6 */
3468 break;
3469
3470 case O_TRUSTUSER:
3471 # if !HASFCHOWN && !defined(_FFR_DROP_TRUSTUSER_WARNING)
3472 if (!UseMSP)
3473 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3474 "readcf: option TrustedUser may cause problems on systems\n which do not support fchown() if UseMSP is not set.\n");
3475 # endif /* !HASFCHOWN && !defined(_FFR_DROP_TRUSTUSER_WARNING) */
3476 if (isascii(*val) && isdigit(*val))
3477 TrustedUid = atoi(val);
3478 else
3479 {
3480 register struct passwd *pw;
3481
3482 TrustedUid = 0;
3483 pw = sm_getpwnam(val);
3484 if (pw == NULL)
3485 {
3486 syserr("readcf: option TrustedUser: unknown user %s", val);
3487 break;
3488 }
3489 else
3490 TrustedUid = pw->pw_uid;
3491 }
3492
3493 # ifdef UID_MAX
3494 if (TrustedUid > UID_MAX)
3495 {
3496 syserr("readcf: option TrustedUser: uid value (%ld) > UID_MAX (%ld)",
3497 (long) TrustedUid, (long) UID_MAX);
3498 TrustedUid = 0;
3499 }
3500 # endif /* UID_MAX */
3501 break;
3502
3503 case O_MAXMIMEHDRLEN:
3504 p = strchr(val, '/');
3505 if (p != NULL)
3506 *p++ = '\0';
3507 MaxMimeHeaderLength = atoi(val);
3508 if (p != NULL && *p != '\0')
3509 MaxMimeFieldLength = atoi(p);
3510 else
3511 MaxMimeFieldLength = MaxMimeHeaderLength / 2;
3512
3513 if (MaxMimeHeaderLength <= 0)
3514 MaxMimeHeaderLength = 0;
3515 else if (MaxMimeHeaderLength < 128)
3516 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3517 "Warning: MaxMimeHeaderLength: header length limit set lower than 128\n");
3518
3519 if (MaxMimeFieldLength <= 0)
3520 MaxMimeFieldLength = 0;
3521 else if (MaxMimeFieldLength < 40)
3522 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3523 "Warning: MaxMimeHeaderLength: field length limit set lower than 40\n");
3524
3525 /*
3526 ** Headers field values now include leading space, so let's
3527 ** adjust the values to be "backward compatible".
3528 */
3529
3530 if (MaxMimeHeaderLength > 0)
3531 MaxMimeHeaderLength++;
3532 if (MaxMimeFieldLength > 0)
3533 MaxMimeFieldLength++;
3534 break;
3535
3536 case O_CONTROLSOCKET:
3537 PSTRSET(ControlSocketName, val);
3538 break;
3539
3540 case O_MAXHDRSLEN:
3541 MaxHeadersLength = atoi(val);
3542
3543 if (MaxHeadersLength > 0 &&
3544 MaxHeadersLength < (MAXHDRSLEN / 2))
3545 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3546 "Warning: MaxHeadersLength: headers length limit set lower than %d\n",
3547 (MAXHDRSLEN / 2));
3548 break;
3549
3550 case O_PROCTITLEPREFIX:
3551 PSTRSET(ProcTitlePrefix, val);
3552 break;
3553
3554 #if SASL
3555 case O_SASLINFO:
3556 # if _FFR_ALLOW_SASLINFO
3557 /*
3558 ** Allow users to select their own authinfo file
3559 ** under certain circumstances, otherwise just ignore
3560 ** the option. If the option isn't ignored, several
3561 ** commands don't work very well, e.g., mailq.
3562 ** However, this is not a "perfect" solution.
3563 ** If mail is queued, the authentication info
3564 ** will not be used in subsequent delivery attempts.
3565 ** If we really want to support this, then it has
3566 ** to be stored in the queue file.
3567 */
3568 if (!bitset(SUBMIT_MSA, SubmitMode) && RealUid != 0 &&
3569 RunAsUid != RealUid)
3570 break;
3571 # endif /* _FFR_ALLOW_SASLINFO */
3572 PSTRSET(SASLInfo, val);
3573 break;
3574
3575 case O_SASLMECH:
3576 if (AuthMechanisms != NULL)
3577 sm_free(AuthMechanisms); /* XXX */
3578 if (*val != '\0')
3579 AuthMechanisms = newstr(val);
3580 else
3581 AuthMechanisms = NULL;
3582 break;
3583
3584 case O_SASLREALM:
3585 if (AuthRealm != NULL)
3586 sm_free(AuthRealm);
3587 if (*val != '\0')
3588 AuthRealm = newstr(val);
3589 else
3590 AuthRealm = NULL;
3591 break;
3592
3593 case O_SASLOPTS:
3594 while (val != NULL && *val != '\0')
3595 {
3596 switch (*val)
3597 {
3598 case 'A':
3599 SASLOpts |= SASL_AUTH_AUTH;
3600 break;
3601
3602 case 'a':
3603 SASLOpts |= SASL_SEC_NOACTIVE;
3604 break;
3605
3606 case 'c':
3607 SASLOpts |= SASL_SEC_PASS_CREDENTIALS;
3608 break;
3609
3610 case 'd':
3611 SASLOpts |= SASL_SEC_NODICTIONARY;
3612 break;
3613
3614 case 'f':
3615 SASLOpts |= SASL_SEC_FORWARD_SECRECY;
3616 break;
3617
3618 # if SASL >= 20101
3619 case 'm':
3620 SASLOpts |= SASL_SEC_MUTUAL_AUTH;
3621 break;
3622 # endif /* SASL >= 20101 */
3623
3624 case 'p':
3625 SASLOpts |= SASL_SEC_NOPLAINTEXT;
3626 break;
3627
3628 case 'y':
3629 SASLOpts |= SASL_SEC_NOANONYMOUS;
3630 break;
3631
3632 case ' ': /* ignore */
3633 case '\t': /* ignore */
3634 case ',': /* ignore */
3635 break;
3636
3637 default:
3638 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3639 "Warning: Option: %s unknown parameter '%c'\n",
3640 OPTNAME,
3641 (isascii(*val) &&
3642 isprint(*val))
3643 ? *val : '?');
3644 break;
3645 }
3646 ++val;
3647 val = strpbrk(val, ", \t");
3648 if (val != NULL)
3649 ++val;
3650 }
3651 break;
3652
3653 case O_SASLBITS:
3654 MaxSLBits = atoi(val);
3655 break;
3656
3657 #else /* SASL */
3658 case O_SASLINFO:
3659 case O_SASLMECH:
3660 case O_SASLREALM:
3661 case O_SASLOPTS:
3662 case O_SASLBITS:
3663 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3664 "Warning: Option: %s requires SASL support (-DSASL)\n",
3665 OPTNAME);
3666 break;
3667 #endif /* SASL */
3668
3669 #if STARTTLS
3670 case O_SRVCERTFILE:
3671 SET_STRING_EXP(SrvCertFile);
3672 case O_SRVKEYFILE:
3673 SET_STRING_EXP(SrvKeyFile);
3674 case O_CLTCERTFILE:
3675 SET_STRING_EXP(CltCertFile);
3676 case O_CLTKEYFILE:
3677 SET_STRING_EXP(CltKeyFile);
3678 case O_CACERTFILE:
3679 SET_STRING_EXP(CACertFile);
3680 case O_CACERTPATH:
3681 SET_STRING_EXP(CACertPath);
3682 case O_DHPARAMS:
3683 SET_STRING_EXP(DHParams);
3684 # if _FFR_TLS_1
3685 case O_DHPARAMS5:
3686 SET_STRING_EXP(DHParams5);
3687 case O_CIPHERLIST:
3688 SET_STRING_EXP(CipherList);
3689 case O_SRV_SSL_OPTIONS:
3690 pssloptions = &Srv_SSL_Options;
3691 case O_CLT_SSL_OPTIONS:
3692 if (pssloptions == NULL)
3693 pssloptions = &Clt_SSL_Options;
3694 for (p = val; *p != 0; )
3695 {
3696 bool clearmode;
3697 char *q;
3698 struct ssl_options *sslopts;
3699
3700 while (*p == ' ')
3701 p++;
3702 if (*p == '\0')
3703 break;
3704 clearmode = false;
3705 if (*p == '-' || *p == '+')
3706 clearmode = *p++ == '-';
3707 q = p;
3708 while (*p != '\0' && !(isascii(*p) && isspace(*p)))
3709 p++;
3710 if (*p != '\0')
3711 *p++ = '\0';
3712 for (sslopts = SSL_Option;
3713 sslopts->sslopt_name != NULL; sslopts++)
3714 {
3715 if (sm_strcasecmp(q, sslopts->sslopt_name) == 0)
3716 break;
3717 }
3718 if (sslopts->sslopt_name == NULL)
3719 {
3720 errno = 0;
3721 syserr("readcf: %s option value %s unrecognized",
3722 o->o_name, q);
3723 }
3724 else if (clearmode)
3725 *pssloptions &= ~sslopts->sslopt_bits;
3726 else
3727 *pssloptions |= sslopts->sslopt_bits;
3728 }
3729 pssloptions = NULL;
3730 break;
3731
3732 # endif /* _FFR_TLS_1 */
3733
3734 case O_CRLFILE:
3735 # if OPENSSL_VERSION_NUMBER > 0x00907000L
3736 SET_STRING_EXP(CRLFile);
3737 # else /* OPENSSL_VERSION_NUMBER > 0x00907000L */
3738 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3739 "Warning: Option: %s requires at least OpenSSL 0.9.7\n",
3740 OPTNAME);
3741 break;
3742 # endif /* OPENSSL_VERSION_NUMBER > 0x00907000L */
3743
3744 # if _FFR_CRLPATH
3745 case O_CRLPATH:
3746 # if OPENSSL_VERSION_NUMBER > 0x00907000L
3747 SET_STRING_EXP(CRLPath);
3748 # else /* OPENSSL_VERSION_NUMBER > 0x00907000L */
3749 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3750 "Warning: Option: %s requires at least OpenSSL 0.9.7\n",
3751 OPTNAME);
3752 break;
3753 # endif /* OPENSSL_VERSION_NUMBER > 0x00907000L */
3754 # endif /* _FFR_CRLPATH */
3755
3756 /*
3757 ** XXX How about options per daemon/client instead of globally?
3758 ** This doesn't work well for some options, e.g., no server cert,
3759 ** but fine for others.
3760 **
3761 ** XXX Some people may want different certs per server.
3762 **
3763 ** See also srvfeatures()
3764 */
3765
3766 case O_TLS_SRV_OPTS:
3767 while (val != NULL && *val != '\0')
3768 {
3769 switch (*val)
3770 {
3771 case 'V':
3772 TLS_Srv_Opts |= TLS_I_NO_VRFY;
3773 break;
3774 # if _FFR_TLS_1
3775 /*
3776 ** Server without a cert? That works only if
3777 ** AnonDH is enabled as cipher, which is not in the
3778 ** default list. Hence the CipherList option must
3779 ** be available. Moreover: which clients support this
3780 ** besides sendmail with this setting?
3781 */
3782
3783 case 'C':
3784 TLS_Srv_Opts &= ~TLS_I_SRV_CERT;
3785 break;
3786 # endif /* _FFR_TLS_1 */
3787 case ' ': /* ignore */
3788 case '\t': /* ignore */
3789 case ',': /* ignore */
3790 break;
3791 default:
3792 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3793 "Warning: Option: %s unknown parameter '%c'\n",
3794 OPTNAME,
3795 (isascii(*val) &&
3796 isprint(*val))
3797 ? *val : '?');
3798 break;
3799 }
3800 ++val;
3801 val = strpbrk(val, ", \t");
3802 if (val != NULL)
3803 ++val;
3804 }
3805 break;
3806
3807 case O_RANDFILE:
3808 PSTRSET(RandFile, val);
3809 break;
3810
3811 #else /* STARTTLS */
3812 case O_SRVCERTFILE:
3813 case O_SRVKEYFILE:
3814 case O_CLTCERTFILE:
3815 case O_CLTKEYFILE:
3816 case O_CACERTFILE:
3817 case O_CACERTPATH:
3818 case O_DHPARAMS:
3819 # if _FFR_TLS_1
3820 case O_DHPARAMS5:
3821 case O_CIPHERLIST:
3822 # endif /* _FFR_TLS_1 */
3823 case O_CRLFILE:
3824 # if _FFR_CRLPATH
3825 case O_CRLPATH:
3826 # endif /* _FFR_CRLPATH */
3827 case O_RANDFILE:
3828 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3829 "Warning: Option: %s requires TLS support\n",
3830 OPTNAME);
3831 break;
3832
3833 #endif /* STARTTLS */
3834
3835 case O_CLIENTPORT:
3836 setclientoptions(val);
3837 break;
3838
3839 case O_DF_BUFSIZE:
3840 DataFileBufferSize = atoi(val);
3841 break;
3842
3843 case O_XF_BUFSIZE:
3844 XscriptFileBufferSize = atoi(val);
3845 break;
3846
3847 case O_LDAPDEFAULTSPEC:
3848 #if LDAPMAP
3849 ldapmap_set_defaults(val);
3850 #else /* LDAPMAP */
3851 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3852 "Warning: Option: %s requires LDAP support (-DLDAPMAP)\n",
3853 OPTNAME);
3854 #endif /* LDAPMAP */
3855 break;
3856
3857 case O_INPUTMILTER:
3858 #if MILTER
3859 InputFilterList = newstr(val);
3860 #else /* MILTER */
3861 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3862 "Warning: Option: %s requires Milter support (-DMILTER)\n",
3863 OPTNAME);
3864 #endif /* MILTER */
3865 break;
3866
3867 case O_MILTER:
3868 #if MILTER
3869 milter_set_option(subopt, val, sticky);
3870 #else /* MILTER */
3871 (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
3872 "Warning: Option: %s requires Milter support (-DMILTER)\n",
3873 OPTNAME);
3874 #endif /* MILTER */
3875 break;
3876
3877 case O_QUEUE_FILE_MODE: /* queue file mode */
3878 QueueFileMode = atooct(val) & 0777;
3879 break;
3880
3881 case O_DLVR_MIN: /* deliver by minimum time */
3882 DeliverByMin = convtime(val, 's');
3883 break;
3884
3885 /* modifiers {daemon_flags} for direct submissions */
3886 case O_DIRECTSUBMODIFIERS:
3887 {
3888 BITMAP256 m; /* ignored */
3889 extern ENVELOPE BlankEnvelope;
3890
3891 macdefine(&BlankEnvelope.e_macro, A_PERM,
3892 macid("{daemon_flags}"),
3893 getmodifiers(val, m));
3894 }
3895 break;
3896
3897 case O_FASTSPLIT:
3898 FastSplit = atoi(val);
3899 break;
3900
3901 case O_MBDB:
3902 Mbdb = newstr(val);
3903 break;
3904
3905 case O_MSQ:
3906 UseMSP = atobool(val);
3907 break;
3908
3909 case O_SOFTBOUNCE:
3910 SoftBounce = atobool(val);
3911 break;
3912
3913 case O_REJECTLOGINTERVAL: /* time btwn log msgs while refusing */
3914 RejectLogInterval = convtime(val, 'h');
3915 break;
3916
3917 case O_REQUIRES_DIR_FSYNC:
3918 #if REQUIRES_DIR_FSYNC
3919 RequiresDirfsync = atobool(val);
3920 #else /* REQUIRES_DIR_FSYNC */
3921 /* silently ignored... required for cf file option */
3922 #endif /* REQUIRES_DIR_FSYNC */
3923 break;
3924
3925 case O_CONNECTION_RATE_WINDOW_SIZE:
3926 ConnectionRateWindowSize = convtime(val, 's');
3927 break;
3928
3929 case O_FALLBACKSMARTHOST: /* fallback smart host */
3930 if (val[0] != '\0')
3931 FallbackSmartHost = newstr(val);
3932 break;
3933
3934 case O_HELONAME:
3935 HeloName = newstr(val);
3936 break;
3937
3938 #if _FFR_MEMSTAT
3939 case O_REFUSELOWMEM:
3940 RefuseLowMem = atoi(val);
3941 break;
3942 case O_QUEUELOWMEM:
3943 QueueLowMem = atoi(val);
3944 break;
3945 case O_MEMRESOURCE:
3946 MemoryResource = newstr(val);
3947 break;
3948 #endif /* _FFR_MEMSTAT */
3949
3950 case O_MAXNOOPCOMMANDS:
3951 MaxNOOPCommands = atoi(val);
3952 break;
3953
3954 #if _FFR_MSG_ACCEPT
3955 case O_MSG_ACCEPT:
3956 MessageAccept = newstr(val);
3957 break;
3958 #endif /* _FFR_MSG_ACCEPT */
3959
3960 #if _FFR_QUEUE_RUN_PARANOIA
3961 case O_CHK_Q_RUNNERS:
3962 CheckQueueRunners = atoi(val);
3963 break;
3964 #endif /* _FFR_QUEUE_RUN_PARANOIA */
3965
3966 #if _FFR_EIGHT_BIT_ADDR_OK
3967 case O_EIGHT_BIT_ADDR_OK:
3968 EightBitAddrOK = atobool(val);
3969 break;
3970 #endif /* _FFR_EIGHT_BIT_ADDR_OK */
3971
3972 #if _FFR_ADDR_TYPE_MODES
3973 case O_ADDR_TYPE_MODES:
3974 AddrTypeModes = atobool(val);
3975 break;
3976 #endif /* _FFR_ADDR_TYPE_MODES */
3977
3978 #if _FFR_BADRCPT_SHUTDOWN
3979 case O_RCPTSHUTD:
3980 BadRcptShutdown = atoi(val);
3981 break;
3982
3983 case O_RCPTSHUTDG:
3984 BadRcptShutdownGood = atoi(val);
3985 break;
3986 #endif /* _FFR_BADRCPT_SHUTDOWN */
3987
3988 default:
3989 if (tTd(37, 1))
3990 {
3991 if (isascii(opt) && isprint(opt))
3992 sm_dprintf("Warning: option %c unknown\n", opt);
3993 else
3994 sm_dprintf("Warning: option 0x%x unknown\n", opt);
3995 }
3996 break;
3997 }
3998
3999 /*
4000 ** Options with suboptions are responsible for taking care
4001 ** of sticky-ness (e.g., that a command line setting is kept
4002 ** when reading in the sendmail.cf file). This has to be done
4003 ** when the suboptions are parsed since each suboption must be
4004 ** sticky, not the root option.
4005 */
4006
4007 if (sticky && !bitset(OI_SUBOPT, o->o_flags))
4008 setbitn(opt, StickyOpt);
4009 }
4010 /*
4011 ** SETCLASS -- set a string into a class
4012 **
4013 ** Parameters:
4014 ** class -- the class to put the string in.
4015 ** str -- the string to enter
4016 **
4017 ** Returns:
4018 ** none.
4019 **
4020 ** Side Effects:
4021 ** puts the word into the symbol table.
4022 */
4023
4024 void
setclass(class,str)4025 setclass(class, str)
4026 int class;
4027 char *str;
4028 {
4029 register STAB *s;
4030
4031 if ((str[0] & 0377) == MATCHCLASS)
4032 {
4033 int mid;
4034
4035 str++;
4036 mid = macid(str);
4037 if (mid == 0)
4038 return;
4039
4040 if (tTd(37, 8))
4041 sm_dprintf("setclass(%s, $=%s)\n",
4042 macname(class), macname(mid));
4043 copy_class(mid, class);
4044 }
4045 else
4046 {
4047 if (tTd(37, 8))
4048 sm_dprintf("setclass(%s, %s)\n", macname(class), str);
4049
4050 s = stab(str, ST_CLASS, ST_ENTER);
4051 setbitn(bitidx(class), s->s_class);
4052 }
4053 }
4054 /*
4055 ** MAKEMAPENTRY -- create a map entry
4056 **
4057 ** Parameters:
4058 ** line -- the config file line
4059 **
4060 ** Returns:
4061 ** A pointer to the map that has been created.
4062 ** NULL if there was a syntax error.
4063 **
4064 ** Side Effects:
4065 ** Enters the map into the dictionary.
4066 */
4067
4068 MAP *
makemapentry(line)4069 makemapentry(line)
4070 char *line;
4071 {
4072 register char *p;
4073 char *mapname;
4074 char *classname;
4075 register STAB *s;
4076 STAB *class;
4077
4078 for (p = line; isascii(*p) && isspace(*p); p++)
4079 continue;
4080 if (!(isascii(*p) && isalnum(*p)))
4081 {
4082 syserr("readcf: config K line: no map name");
4083 return NULL;
4084 }
4085
4086 mapname = p;
4087 while ((isascii(*++p) && isalnum(*p)) || *p == '_' || *p == '.')
4088 continue;
4089 if (*p != '\0')
4090 *p++ = '\0';
4091 while (isascii(*p) && isspace(*p))
4092 p++;
4093 if (!(isascii(*p) && isalnum(*p)))
4094 {
4095 syserr("readcf: config K line, map %s: no map class", mapname);
4096 return NULL;
4097 }
4098 classname = p;
4099 while (isascii(*++p) && isalnum(*p))
4100 continue;
4101 if (*p != '\0')
4102 *p++ = '\0';
4103 while (isascii(*p) && isspace(*p))
4104 p++;
4105
4106 /* look up the class */
4107 class = stab(classname, ST_MAPCLASS, ST_FIND);
4108 if (class == NULL)
4109 {
4110 syserr("readcf: map %s: class %s not available", mapname,
4111 classname);
4112 return NULL;
4113 }
4114
4115 /* enter the map */
4116 s = stab(mapname, ST_MAP, ST_ENTER);
4117 s->s_map.map_class = &class->s_mapclass;
4118 s->s_map.map_mname = newstr(mapname);
4119
4120 if (class->s_mapclass.map_parse(&s->s_map, p))
4121 s->s_map.map_mflags |= MF_VALID;
4122
4123 if (tTd(37, 5))
4124 {
4125 sm_dprintf("map %s, class %s, flags %lx, file %s,\n",
4126 s->s_map.map_mname, s->s_map.map_class->map_cname,
4127 s->s_map.map_mflags, s->s_map.map_file);
4128 sm_dprintf("\tapp %s, domain %s, rebuild %s\n",
4129 s->s_map.map_app, s->s_map.map_domain,
4130 s->s_map.map_rebuild);
4131 }
4132 return &s->s_map;
4133 }
4134 /*
4135 ** STRTORWSET -- convert string to rewriting set number
4136 **
4137 ** Parameters:
4138 ** p -- the pointer to the string to decode.
4139 ** endp -- if set, store the trailing delimiter here.
4140 ** stabmode -- ST_ENTER to create this entry, ST_FIND if
4141 ** it must already exist.
4142 **
4143 ** Returns:
4144 ** The appropriate ruleset number.
4145 ** -1 if it is not valid (error already printed)
4146 */
4147
4148 int
strtorwset(p,endp,stabmode)4149 strtorwset(p, endp, stabmode)
4150 char *p;
4151 char **endp;
4152 int stabmode;
4153 {
4154 int ruleset;
4155 static int nextruleset = MAXRWSETS;
4156
4157 while (isascii(*p) && isspace(*p))
4158 p++;
4159 if (!isascii(*p))
4160 {
4161 syserr("invalid ruleset name: \"%.20s\"", p);
4162 return -1;
4163 }
4164 if (isdigit(*p))
4165 {
4166 ruleset = strtol(p, endp, 10);
4167 if (ruleset >= MAXRWSETS / 2 || ruleset < 0)
4168 {
4169 syserr("bad ruleset %d (%d max)",
4170 ruleset, MAXRWSETS / 2);
4171 ruleset = -1;
4172 }
4173 }
4174 else
4175 {
4176 STAB *s;
4177 char delim;
4178 char *q = NULL;
4179
4180 q = p;
4181 while (*p != '\0' && isascii(*p) && (isalnum(*p) || *p == '_'))
4182 p++;
4183 if (q == p || !(isascii(*q) && isalpha(*q)))
4184 {
4185 /* no valid characters */
4186 syserr("invalid ruleset name: \"%.20s\"", q);
4187 return -1;
4188 }
4189 while (isascii(*p) && isspace(*p))
4190 *p++ = '\0';
4191 delim = *p;
4192 if (delim != '\0')
4193 *p = '\0';
4194 s = stab(q, ST_RULESET, stabmode);
4195 if (delim != '\0')
4196 *p = delim;
4197
4198 if (s == NULL)
4199 return -1;
4200
4201 if (stabmode == ST_ENTER && delim == '=')
4202 {
4203 while (isascii(*++p) && isspace(*p))
4204 continue;
4205 if (!(isascii(*p) && isdigit(*p)))
4206 {
4207 syserr("bad ruleset definition \"%s\" (number required after `=')", q);
4208 ruleset = -1;
4209 }
4210 else
4211 {
4212 ruleset = strtol(p, endp, 10);
4213 if (ruleset >= MAXRWSETS / 2 || ruleset < 0)
4214 {
4215 syserr("bad ruleset number %d in \"%s\" (%d max)",
4216 ruleset, q, MAXRWSETS / 2);
4217 ruleset = -1;
4218 }
4219 }
4220 }
4221 else
4222 {
4223 if (endp != NULL)
4224 *endp = p;
4225 if (s->s_ruleset >= 0)
4226 ruleset = s->s_ruleset;
4227 else if ((ruleset = --nextruleset) < MAXRWSETS / 2)
4228 {
4229 syserr("%s: too many named rulesets (%d max)",
4230 q, MAXRWSETS / 2);
4231 ruleset = -1;
4232 }
4233 }
4234 if (s->s_ruleset >= 0 &&
4235 ruleset >= 0 &&
4236 ruleset != s->s_ruleset)
4237 {
4238 syserr("%s: ruleset changed value (old %d, new %d)",
4239 q, s->s_ruleset, ruleset);
4240 ruleset = s->s_ruleset;
4241 }
4242 else if (ruleset >= 0)
4243 {
4244 s->s_ruleset = ruleset;
4245 }
4246 if (stabmode == ST_ENTER && ruleset >= 0)
4247 {
4248 char *h = NULL;
4249
4250 if (RuleSetNames[ruleset] != NULL)
4251 sm_free(RuleSetNames[ruleset]); /* XXX */
4252 if (delim != '\0' && (h = strchr(q, delim)) != NULL)
4253 *h = '\0';
4254 RuleSetNames[ruleset] = newstr(q);
4255 if (delim == '/' && h != NULL)
4256 *h = delim; /* put back delim */
4257 }
4258 }
4259 return ruleset;
4260 }
4261 /*
4262 ** SETTIMEOUT -- set an individual timeout
4263 **
4264 ** Parameters:
4265 ** name -- the name of the timeout.
4266 ** val -- the value of the timeout.
4267 ** sticky -- if set, don't let other setoptions override
4268 ** this value.
4269 **
4270 ** Returns:
4271 ** none.
4272 */
4273
4274 /* set if Timeout sub-option is stuck */
4275 static BITMAP256 StickyTimeoutOpt;
4276
4277 static struct timeoutinfo
4278 {
4279 char *to_name; /* long name of timeout */
4280 unsigned char to_code; /* code for option */
4281 } TimeOutTab[] =
4282 {
4283 #define TO_INITIAL 0x01
4284 { "initial", TO_INITIAL },
4285 #define TO_MAIL 0x02
4286 { "mail", TO_MAIL },
4287 #define TO_RCPT 0x03
4288 { "rcpt", TO_RCPT },
4289 #define TO_DATAINIT 0x04
4290 { "datainit", TO_DATAINIT },
4291 #define TO_DATABLOCK 0x05
4292 { "datablock", TO_DATABLOCK },
4293 #define TO_DATAFINAL 0x06
4294 { "datafinal", TO_DATAFINAL },
4295 #define TO_COMMAND 0x07
4296 { "command", TO_COMMAND },
4297 #define TO_RSET 0x08
4298 { "rset", TO_RSET },
4299 #define TO_HELO 0x09
4300 { "helo", TO_HELO },
4301 #define TO_QUIT 0x0A
4302 { "quit", TO_QUIT },
4303 #define TO_MISC 0x0B
4304 { "misc", TO_MISC },
4305 #define TO_IDENT 0x0C
4306 { "ident", TO_IDENT },
4307 #define TO_FILEOPEN 0x0D
4308 { "fileopen", TO_FILEOPEN },
4309 #define TO_CONNECT 0x0E
4310 { "connect", TO_CONNECT },
4311 #define TO_ICONNECT 0x0F
4312 { "iconnect", TO_ICONNECT },
4313 #define TO_QUEUEWARN 0x10
4314 { "queuewarn", TO_QUEUEWARN },
4315 { "queuewarn.*", TO_QUEUEWARN },
4316 #define TO_QUEUEWARN_NORMAL 0x11
4317 { "queuewarn.normal", TO_QUEUEWARN_NORMAL },
4318 #define TO_QUEUEWARN_URGENT 0x12
4319 { "queuewarn.urgent", TO_QUEUEWARN_URGENT },
4320 #define TO_QUEUEWARN_NON_URGENT 0x13
4321 { "queuewarn.non-urgent", TO_QUEUEWARN_NON_URGENT },
4322 #define TO_QUEUERETURN 0x14
4323 { "queuereturn", TO_QUEUERETURN },
4324 { "queuereturn.*", TO_QUEUERETURN },
4325 #define TO_QUEUERETURN_NORMAL 0x15
4326 { "queuereturn.normal", TO_QUEUERETURN_NORMAL },
4327 #define TO_QUEUERETURN_URGENT 0x16
4328 { "queuereturn.urgent", TO_QUEUERETURN_URGENT },
4329 #define TO_QUEUERETURN_NON_URGENT 0x17
4330 { "queuereturn.non-urgent", TO_QUEUERETURN_NON_URGENT },
4331 #define TO_HOSTSTATUS 0x18
4332 { "hoststatus", TO_HOSTSTATUS },
4333 #define TO_RESOLVER_RETRANS 0x19
4334 { "resolver.retrans", TO_RESOLVER_RETRANS },
4335 #define TO_RESOLVER_RETRANS_NORMAL 0x1A
4336 { "resolver.retrans.normal", TO_RESOLVER_RETRANS_NORMAL },
4337 #define TO_RESOLVER_RETRANS_FIRST 0x1B
4338 { "resolver.retrans.first", TO_RESOLVER_RETRANS_FIRST },
4339 #define TO_RESOLVER_RETRY 0x1C
4340 { "resolver.retry", TO_RESOLVER_RETRY },
4341 #define TO_RESOLVER_RETRY_NORMAL 0x1D
4342 { "resolver.retry.normal", TO_RESOLVER_RETRY_NORMAL },
4343 #define TO_RESOLVER_RETRY_FIRST 0x1E
4344 { "resolver.retry.first", TO_RESOLVER_RETRY_FIRST },
4345 #define TO_CONTROL 0x1F
4346 { "control", TO_CONTROL },
4347 #define TO_LHLO 0x20
4348 { "lhlo", TO_LHLO },
4349 #define TO_AUTH 0x21
4350 { "auth", TO_AUTH },
4351 #define TO_STARTTLS 0x22
4352 { "starttls", TO_STARTTLS },
4353 #define TO_ACONNECT 0x23
4354 { "aconnect", TO_ACONNECT },
4355 #define TO_QUEUEWARN_DSN 0x24
4356 { "queuewarn.dsn", TO_QUEUEWARN_DSN },
4357 #define TO_QUEUERETURN_DSN 0x25
4358 { "queuereturn.dsn", TO_QUEUERETURN_DSN },
4359 { NULL, 0 },
4360 };
4361
4362
4363 static void
settimeout(name,val,sticky)4364 settimeout(name, val, sticky)
4365 char *name;
4366 char *val;
4367 bool sticky;
4368 {
4369 register struct timeoutinfo *to;
4370 int i, addopts;
4371 time_t toval;
4372
4373 if (tTd(37, 2))
4374 sm_dprintf("settimeout(%s = %s)", name, val);
4375
4376 for (to = TimeOutTab; to->to_name != NULL; to++)
4377 {
4378 if (sm_strcasecmp(to->to_name, name) == 0)
4379 break;
4380 }
4381
4382 if (to->to_name == NULL)
4383 {
4384 errno = 0; /* avoid bogus error text */
4385 syserr("settimeout: invalid timeout %s", name);
4386 return;
4387 }
4388
4389 /*
4390 ** See if this option is preset for us.
4391 */
4392
4393 if (!sticky && bitnset(to->to_code, StickyTimeoutOpt))
4394 {
4395 if (tTd(37, 2))
4396 sm_dprintf(" (ignored)\n");
4397 return;
4398 }
4399
4400 if (tTd(37, 2))
4401 sm_dprintf("\n");
4402
4403 toval = convtime(val, 'm');
4404 addopts = 0;
4405
4406 switch (to->to_code)
4407 {
4408 case TO_INITIAL:
4409 TimeOuts.to_initial = toval;
4410 break;
4411
4412 case TO_MAIL:
4413 TimeOuts.to_mail = toval;
4414 break;
4415
4416 case TO_RCPT:
4417 TimeOuts.to_rcpt = toval;
4418 break;
4419
4420 case TO_DATAINIT:
4421 TimeOuts.to_datainit = toval;
4422 break;
4423
4424 case TO_DATABLOCK:
4425 TimeOuts.to_datablock = toval;
4426 break;
4427
4428 case TO_DATAFINAL:
4429 TimeOuts.to_datafinal = toval;
4430 break;
4431
4432 case TO_COMMAND:
4433 TimeOuts.to_nextcommand = toval;
4434 break;
4435
4436 case TO_RSET:
4437 TimeOuts.to_rset = toval;
4438 break;
4439
4440 case TO_HELO:
4441 TimeOuts.to_helo = toval;
4442 break;
4443
4444 case TO_QUIT:
4445 TimeOuts.to_quit = toval;
4446 break;
4447
4448 case TO_MISC:
4449 TimeOuts.to_miscshort = toval;
4450 break;
4451
4452 case TO_IDENT:
4453 TimeOuts.to_ident = toval;
4454 break;
4455
4456 case TO_FILEOPEN:
4457 TimeOuts.to_fileopen = toval;
4458 break;
4459
4460 case TO_CONNECT:
4461 TimeOuts.to_connect = toval;
4462 break;
4463
4464 case TO_ICONNECT:
4465 TimeOuts.to_iconnect = toval;
4466 break;
4467
4468 case TO_ACONNECT:
4469 TimeOuts.to_aconnect = toval;
4470 break;
4471
4472 case TO_QUEUEWARN:
4473 toval = convtime(val, 'h');
4474 TimeOuts.to_q_warning[TOC_NORMAL] = toval;
4475 TimeOuts.to_q_warning[TOC_URGENT] = toval;
4476 TimeOuts.to_q_warning[TOC_NONURGENT] = toval;
4477 TimeOuts.to_q_warning[TOC_DSN] = toval;
4478 addopts = 2;
4479 break;
4480
4481 case TO_QUEUEWARN_NORMAL:
4482 toval = convtime(val, 'h');
4483 TimeOuts.to_q_warning[TOC_NORMAL] = toval;
4484 break;
4485
4486 case TO_QUEUEWARN_URGENT:
4487 toval = convtime(val, 'h');
4488 TimeOuts.to_q_warning[TOC_URGENT] = toval;
4489 break;
4490
4491 case TO_QUEUEWARN_NON_URGENT:
4492 toval = convtime(val, 'h');
4493 TimeOuts.to_q_warning[TOC_NONURGENT] = toval;
4494 break;
4495
4496 case TO_QUEUEWARN_DSN:
4497 toval = convtime(val, 'h');
4498 TimeOuts.to_q_warning[TOC_DSN] = toval;
4499 break;
4500
4501 case TO_QUEUERETURN:
4502 toval = convtime(val, 'd');
4503 TimeOuts.to_q_return[TOC_NORMAL] = toval;
4504 TimeOuts.to_q_return[TOC_URGENT] = toval;
4505 TimeOuts.to_q_return[TOC_NONURGENT] = toval;
4506 TimeOuts.to_q_return[TOC_DSN] = toval;
4507 addopts = 2;
4508 break;
4509
4510 case TO_QUEUERETURN_NORMAL:
4511 toval = convtime(val, 'd');
4512 TimeOuts.to_q_return[TOC_NORMAL] = toval;
4513 break;
4514
4515 case TO_QUEUERETURN_URGENT:
4516 toval = convtime(val, 'd');
4517 TimeOuts.to_q_return[TOC_URGENT] = toval;
4518 break;
4519
4520 case TO_QUEUERETURN_NON_URGENT:
4521 toval = convtime(val, 'd');
4522 TimeOuts.to_q_return[TOC_NONURGENT] = toval;
4523 break;
4524
4525 case TO_QUEUERETURN_DSN:
4526 toval = convtime(val, 'd');
4527 TimeOuts.to_q_return[TOC_DSN] = toval;
4528 break;
4529
4530 case TO_HOSTSTATUS:
4531 MciInfoTimeout = toval;
4532 break;
4533
4534 case TO_RESOLVER_RETRANS:
4535 toval = convtime(val, 's');
4536 TimeOuts.res_retrans[RES_TO_DEFAULT] = toval;
4537 TimeOuts.res_retrans[RES_TO_FIRST] = toval;
4538 TimeOuts.res_retrans[RES_TO_NORMAL] = toval;
4539 addopts = 2;
4540 break;
4541
4542 case TO_RESOLVER_RETRY:
4543 i = atoi(val);
4544 TimeOuts.res_retry[RES_TO_DEFAULT] = i;
4545 TimeOuts.res_retry[RES_TO_FIRST] = i;
4546 TimeOuts.res_retry[RES_TO_NORMAL] = i;
4547 addopts = 2;
4548 break;
4549
4550 case TO_RESOLVER_RETRANS_NORMAL:
4551 TimeOuts.res_retrans[RES_TO_NORMAL] = convtime(val, 's');
4552 break;
4553
4554 case TO_RESOLVER_RETRY_NORMAL:
4555 TimeOuts.res_retry[RES_TO_NORMAL] = atoi(val);
4556 break;
4557
4558 case TO_RESOLVER_RETRANS_FIRST:
4559 TimeOuts.res_retrans[RES_TO_FIRST] = convtime(val, 's');
4560 break;
4561
4562 case TO_RESOLVER_RETRY_FIRST:
4563 TimeOuts.res_retry[RES_TO_FIRST] = atoi(val);
4564 break;
4565
4566 case TO_CONTROL:
4567 TimeOuts.to_control = toval;
4568 break;
4569
4570 case TO_LHLO:
4571 TimeOuts.to_lhlo = toval;
4572 break;
4573
4574 #if SASL
4575 case TO_AUTH:
4576 TimeOuts.to_auth = toval;
4577 break;
4578 #endif /* SASL */
4579
4580 #if STARTTLS
4581 case TO_STARTTLS:
4582 TimeOuts.to_starttls = toval;
4583 break;
4584 #endif /* STARTTLS */
4585
4586 default:
4587 syserr("settimeout: invalid timeout %s", name);
4588 break;
4589 }
4590
4591 if (sticky)
4592 {
4593 for (i = 0; i <= addopts; i++)
4594 setbitn(to->to_code + i, StickyTimeoutOpt);
4595 }
4596 }
4597 /*
4598 ** INITTIMEOUTS -- parse and set timeout values
4599 **
4600 ** Parameters:
4601 ** val -- a pointer to the values. If NULL, do initial
4602 ** settings.
4603 ** sticky -- if set, don't let other setoptions override
4604 ** this suboption value.
4605 **
4606 ** Returns:
4607 ** none.
4608 **
4609 ** Side Effects:
4610 ** Initializes the TimeOuts structure
4611 */
4612
4613 void
inittimeouts(val,sticky)4614 inittimeouts(val, sticky)
4615 register char *val;
4616 bool sticky;
4617 {
4618 register char *p;
4619
4620 if (tTd(37, 2))
4621 sm_dprintf("inittimeouts(%s)\n", val == NULL ? "<NULL>" : val);
4622 if (val == NULL)
4623 {
4624 TimeOuts.to_connect = (time_t) 0 SECONDS;
4625 TimeOuts.to_aconnect = (time_t) 0 SECONDS;
4626 TimeOuts.to_iconnect = (time_t) 0 SECONDS;
4627 TimeOuts.to_initial = (time_t) 5 MINUTES;
4628 TimeOuts.to_helo = (time_t) 5 MINUTES;
4629 TimeOuts.to_mail = (time_t) 10 MINUTES;
4630 TimeOuts.to_rcpt = (time_t) 1 HOUR;
4631 TimeOuts.to_datainit = (time_t) 5 MINUTES;
4632 TimeOuts.to_datablock = (time_t) 1 HOUR;
4633 TimeOuts.to_datafinal = (time_t) 1 HOUR;
4634 TimeOuts.to_rset = (time_t) 5 MINUTES;
4635 TimeOuts.to_quit = (time_t) 2 MINUTES;
4636 TimeOuts.to_nextcommand = (time_t) 1 HOUR;
4637 TimeOuts.to_miscshort = (time_t) 2 MINUTES;
4638 #if IDENTPROTO
4639 TimeOuts.to_ident = (time_t) 5 SECONDS;
4640 #else /* IDENTPROTO */
4641 TimeOuts.to_ident = (time_t) 0 SECONDS;
4642 #endif /* IDENTPROTO */
4643 TimeOuts.to_fileopen = (time_t) 60 SECONDS;
4644 TimeOuts.to_control = (time_t) 2 MINUTES;
4645 TimeOuts.to_lhlo = (time_t) 2 MINUTES;
4646 #if SASL
4647 TimeOuts.to_auth = (time_t) 10 MINUTES;
4648 #endif /* SASL */
4649 #if STARTTLS
4650 TimeOuts.to_starttls = (time_t) 1 HOUR;
4651 #endif /* STARTTLS */
4652 if (tTd(37, 5))
4653 {
4654 sm_dprintf("Timeouts:\n");
4655 sm_dprintf(" connect = %ld\n",
4656 (long) TimeOuts.to_connect);
4657 sm_dprintf(" aconnect = %ld\n",
4658 (long) TimeOuts.to_aconnect);
4659 sm_dprintf(" initial = %ld\n",
4660 (long) TimeOuts.to_initial);
4661 sm_dprintf(" helo = %ld\n", (long) TimeOuts.to_helo);
4662 sm_dprintf(" mail = %ld\n", (long) TimeOuts.to_mail);
4663 sm_dprintf(" rcpt = %ld\n", (long) TimeOuts.to_rcpt);
4664 sm_dprintf(" datainit = %ld\n",
4665 (long) TimeOuts.to_datainit);
4666 sm_dprintf(" datablock = %ld\n",
4667 (long) TimeOuts.to_datablock);
4668 sm_dprintf(" datafinal = %ld\n",
4669 (long) TimeOuts.to_datafinal);
4670 sm_dprintf(" rset = %ld\n", (long) TimeOuts.to_rset);
4671 sm_dprintf(" quit = %ld\n", (long) TimeOuts.to_quit);
4672 sm_dprintf(" nextcommand = %ld\n",
4673 (long) TimeOuts.to_nextcommand);
4674 sm_dprintf(" miscshort = %ld\n",
4675 (long) TimeOuts.to_miscshort);
4676 sm_dprintf(" ident = %ld\n", (long) TimeOuts.to_ident);
4677 sm_dprintf(" fileopen = %ld\n",
4678 (long) TimeOuts.to_fileopen);
4679 sm_dprintf(" lhlo = %ld\n",
4680 (long) TimeOuts.to_lhlo);
4681 sm_dprintf(" control = %ld\n",
4682 (long) TimeOuts.to_control);
4683 }
4684 return;
4685 }
4686
4687 for (;; val = p)
4688 {
4689 while (isascii(*val) && isspace(*val))
4690 val++;
4691 if (*val == '\0')
4692 break;
4693 for (p = val; *p != '\0' && *p != ','; p++)
4694 continue;
4695 if (*p != '\0')
4696 *p++ = '\0';
4697
4698 if (isascii(*val) && isdigit(*val))
4699 {
4700 /* old syntax -- set everything */
4701 TimeOuts.to_mail = convtime(val, 'm');
4702 TimeOuts.to_rcpt = TimeOuts.to_mail;
4703 TimeOuts.to_datainit = TimeOuts.to_mail;
4704 TimeOuts.to_datablock = TimeOuts.to_mail;
4705 TimeOuts.to_datafinal = TimeOuts.to_mail;
4706 TimeOuts.to_nextcommand = TimeOuts.to_mail;
4707 if (sticky)
4708 {
4709 setbitn(TO_MAIL, StickyTimeoutOpt);
4710 setbitn(TO_RCPT, StickyTimeoutOpt);
4711 setbitn(TO_DATAINIT, StickyTimeoutOpt);
4712 setbitn(TO_DATABLOCK, StickyTimeoutOpt);
4713 setbitn(TO_DATAFINAL, StickyTimeoutOpt);
4714 setbitn(TO_COMMAND, StickyTimeoutOpt);
4715 }
4716 continue;
4717 }
4718 else
4719 {
4720 register char *q = strchr(val, ':');
4721
4722 if (q == NULL && (q = strchr(val, '=')) == NULL)
4723 {
4724 /* syntax error */
4725 continue;
4726 }
4727 *q++ = '\0';
4728 settimeout(val, q, sticky);
4729 }
4730 }
4731 }
4732