1 /*@ S-nail - a mail user agent derived from Berkeley Mail.
2 *@ Startup and initialization.
3 *@ This file is also used to materialize externals.
5 * Copyright (c) 2000-2004 Gunnar Ritter, Freiburg i. Br., Germany.
6 * Copyright (c) 2012 - 2016 Steffen (Daode) Nurpmeso <steffen@sdaoden.eu>.
9 * Copyright (c) 1980, 1993
10 * The Regents of the University of California. All rights reserved.
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
42 #include <sys/ioctl.h>
46 #ifdef HAVE_NL_LANGINFO
47 # include <langinfo.h>
54 struct a_arg
*aa_next
;
58 /* (extern, but not with amalgamation, so define here) */
59 VL
char const weekday_names
[7 + 1][4] = {
60 "Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat", ""
62 VL
char const month_names
[12 + 1][4] = {
63 "Jan", "Feb", "Mar", "Apr", "May", "Jun",
64 "Jul", "Aug", "Sep", "Oct", "Nov", "Dec", ""
66 VL
char const uagent
[sizeof VAL_UAGENT
] = VAL_UAGENT
;
67 VL
char const n_error
[sizeof n_ERROR
] = N_(n_ERROR
);
68 VL
char const n_empty
[1] = "";
69 VL ui16_t
const class_char
[1 + 0x7F] = {
70 #define a_BC C_BLANK | C_CNTRL
71 #define a_SC C_SPACE | C_CNTRL
72 #define a_WC C_WHITE | C_CNTRL
73 /* 000 nul 001 soh 002 stx 003 etx 004 eot 005 enq 006 ack 007 bel */
74 C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
,
75 /* 010 bs 011 ht 012 nl 013 vt 014 np 015 cr 016 so 017 si */
76 C_CNTRL
, a_BC
, a_WC
, a_SC
, a_SC
, a_SC
, C_CNTRL
, C_CNTRL
,
77 /* 020 dle 021 dc1 022 dc2 023 dc3 024 dc4 025 nak 026 syn 027 etb */
78 C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
,
79 /* 030 can 031 em 032 sub 033 esc 034 fs 035 gs 036 rs 037 us */
80 C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
,
84 /* 040 sp 041 ! 042 " 043 # 044 $ 045 % 046 & 047 ' */
85 C_BLANK
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
,
86 /* 050 ( 051 ) 052 * 053 + 054 , 055 - 056 . 057 / */
87 C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
,
88 /* 060 0 061 1 062 2 063 3 064 4 065 5 066 6 067 7 */
89 C_OCTAL
, C_OCTAL
, C_OCTAL
, C_OCTAL
, C_OCTAL
, C_OCTAL
, C_OCTAL
, C_OCTAL
,
90 /* 070 8 071 9 072 : 073 ; 074 < 075 = 076 > 077 ? */
91 C_DIGIT
, C_DIGIT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
,
92 /* 100 @ 101 A 102 B 103 C 104 D 105 E 106 F 107 G */
93 C_PUNCT
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
,
94 /* 110 H 111 I 112 J 113 K 114 L 115 M 116 N 117 O */
95 C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
,
96 /* 120 P 121 Q 122 R 123 S 124 T 125 U 126 V 127 W */
97 C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
,
98 /* 130 X 131 Y 132 Z 133 [ 134 \ 135 ] 136 ^ 137 _ */
99 C_UPPER
, C_UPPER
, C_UPPER
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
,
100 /* 140 ` 141 a 142 b 143 c 144 d 145 e 146 f 147 g */
101 C_PUNCT
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
,
102 /* 150 h 151 i 152 j 153 k 154 l 155 m 156 n 157 o */
103 C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
,
104 /* 160 p 161 q 162 r 163 s 164 t 165 u 166 v 167 w */
105 C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
,
106 /* 170 x 171 y 172 z 173 { 174 | 175 } 176 ~ 177 del */
107 C_LOWER
, C_LOWER
, C_LOWER
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_CNTRL
110 /* Our own little getopt(3) */
112 static int _oind
, /*_oerr,*/ _oopt
;
114 /* Our own little getopt(3); note --help is special-treated as 'h' */
115 static int _getopt(int argc
, char * const argv
[], char const *optstring
);
117 /* Perform basic startup initialization */
118 static void _startup(void);
121 static size_t _grow_cpp(char const ***cpp
, size_t newsize
, size_t oldcnt
);
123 /* Setup some variables which we require to be valid / verified */
124 static void _setup_vars(void);
126 /* We're in an interactive session - compute what the screen size for printing
127 * headers etc. should be; notify tty upon resize if *is_sighdl* is not 0.
128 * We use the following algorithm for the height:
129 * If baud rate < 1200, use 9
130 * If baud rate = 1200, use 14
131 * If baud rate > 1200, use 24 or ws_row
132 * Width is either 80 or ws_col */
133 static void _setscreensize(int is_sighdl
);
135 /* Ok, we are reading mail. Decide whether we are editing a mailbox or reading
136 * the system mailbox, and open up the right stuff */
137 static int _rcv_mode(char const *folder
, char const *Larg
);
139 /* Interrupt printing of the headers */
140 static void _hdrstop(int signo
);
143 _getopt(int argc
, char * const argv
[], char const *optstring
)
145 static char const *lastp
;
147 int rv
= -1/*, colon*/;
153 /*if ((colon = (optstring[0] == ':')))
160 if (_oind
>= argc
|| argv
[_oind
] == NULL
|| argv
[_oind
][0] != '-' ||
161 argv
[_oind
][1] == '\0')
163 if (argv
[_oind
][1] == '-' && argv
[_oind
][2] == '\0') {
164 /* We need this in for MTA arg detection (easier) ++_oind;*/
167 curp
= &argv
[_oind
][1];
170 for(_oopt
= curp
[0]; optstring
[0] != '\0';){
171 if(optstring
[0] != _oopt
){
172 optstring
+= 1 + (optstring
[1] == ':');
176 if (optstring
[1] == ':') {
177 if (curp
[1] != '\0') {
178 _oarg
= n_UNCONST(curp
+ 1);
181 if ((_oind
+= 2) > argc
) {
182 /*if (!colon *//*&& _oerr*//*)*/ {
183 n_err(_("%s: option requires an argument -- %c\n"),
184 argv
[0], (char)_oopt
);
186 rv
= (/*colon ? ':' :*/ '?');
189 _oarg
= argv
[_oind
- 1];
201 /* Special support for --help, which is quite common */
202 if (_oopt
== '-' && !strcmp(curp
, "-help") && curp
- 1 == argv
[_oind
]) {
208 /* Definitive error */
209 /*if (!colon *//*&& opterr*//*)*/
210 n_err(_("%s: invalid option -- %c\n"), argv
[0], _oopt
);
230 _oind
= /*_oerr =*/ 1;
232 if ((cp
= strrchr(progname
, '/')) != NULL
)
235 /* Set up a reasonable environment */
238 safe_signal(SIGABRT
, &_nyd_oncrash
);
240 safe_signal(SIGBUS
, &_nyd_oncrash
);
242 safe_signal(SIGFPE
, &_nyd_oncrash
);
243 safe_signal(SIGILL
, &_nyd_oncrash
);
244 safe_signal(SIGSEGV
, &_nyd_oncrash
);
246 command_manager_start();
248 if (isatty(STDIN_FILENO
)) /* TODO should be isatty(0) && isatty(2)?? */
249 options
|= OPT_TTYIN
;
250 if (isatty(STDOUT_FILENO
))
251 options
|= OPT_TTYOUT
;
252 if ((options
& (OPT_TTYIN
| OPT_TTYOUT
)) == (OPT_TTYIN
| OPT_TTYOUT
)) {
253 options
|= OPT_INTERACTIVE
;
254 safe_signal(SIGPIPE
, dflpipe
= SIG_IGN
);
259 #ifndef HAVE_SETLOCALE
262 setlocale(LC_ALL
, n_empty
);
263 mb_cur_max
= MB_CUR_MAX
;
264 # ifdef HAVE_NL_LANGINFO
265 if(ok_vlook(ttycharset
) == NULL
&& (cp
= nl_langinfo(CODESET
)) != NULL
)
266 ok_vset(ttycharset
, cp
);
269 # ifdef HAVE_C90AMEND1
271 # ifdef HAVE_ALWAYS_UNICODE_LOCALE
272 options
|= OPT_UNICODE
;
275 if(mbtowc(&wc
, "\303\266", 2) == 2 && wc
== 0xF6 &&
276 mbtowc(&wc
, "\342\202\254", 3) == 3 && wc
== 0x20AC)
277 options
|= OPT_UNICODE
;
278 /* Reset possibly messed up state; luckily this also gives us an
279 * indication whether the encoding has locking shift state sequences */
280 if(mbtowc(&wc
, NULL
, mb_cur_max
))
281 options
|= OPT_ENC_MBSTATE
;
288 iconvd
= (iconv_t
)-1;
294 _grow_cpp(char const ***cpp
, size_t newsize
, size_t oldcnt
)
296 /* Just use auto-reclaimed storage, it will be preserved */
300 newcpp
= salloc(sizeof(char*) * newsize
);
303 memcpy(newcpp
, *cpp
, oldcnt
* sizeof(char*));
311 /* XXX furtherly check paths? */
312 struct passwd
*pwuid
;
317 if((pwuid
= getpwuid(user_id
= getuid())) == NULL
)
318 n_panic(_("Cannot associate a name with uid %lu"), (ul_i
)user_id
);
319 myname
= savestr(pwuid
->pw_name
); /* XXX replace uses with vlook(LOGNAME)! */
325 if(!(doenv
= (ep
= ok_vlook(LOGNAME
)) == NULL
) &&
326 (doenv
= strcmp(myname
, ep
)))
327 n_err(_("Warning: $LOGNAME (%s) not identical to user (%s)!\n"),
331 ok_vset(LOGNAME
, myname
);
335 if((ep
= ok_vlook(USER
)) != NULL
&& strcmp(myname
, ep
)){
336 n_err(_("Warning: $USER (%s) not identical to user (%s)!\n"),
339 ok_vset(USER
, myname
);
344 /* XXX myfullname = pw->pw_gecos[OPTIONAL!] -> GUT THAT; TODO pw_shell */
347 if((cp
= ok_vlook(HOME
)) == NULL
){
354 (void)ok_vlook(TMPDIR
);
359 _setscreensize(int is_sighdl
) /* TODO global policy; int wraps; minvals! */
364 #elif defined TIOCGSIZE
369 scrnheight
= realscreenheight
= scrnwidth
= 0;
371 /* (Also) POSIX: LINES and COLUMNS always override. Adjust this
372 * a little bit to be able to honour resizes during our lifetime and
373 * only honour it upon first run; abuse *is_sighdl* as an indicator */
377 /* We manage those variables for our child processes, so ensure they
378 * are up to date, always */
379 if (options
& OPT_INTERACTIVE
)
380 pstate
|= PS_SIGWINCH_PEND
;
382 if ((cp
= ok_vlook(LINES
)) != NULL
)
383 scrnheight
= realscreenheight
= (int)strtoul(cp
, NULL
, 0); /* TODO */
384 if ((cp
= ok_vlook(COLUMNS
)) != NULL
)
385 scrnwidth
= (int)strtoul(cp
, NULL
, 0); /* TODO posui32= not posnum=! */
387 if (scrnwidth
!= 0 && scrnheight
!= 0)
392 if (ioctl(STDOUT_FILENO
, TIOCGWINSZ
, &ws
) == -1)
393 ws
.ws_col
= ws
.ws_row
= 0;
394 #elif defined TIOCGSIZE
395 if (ioctl(STDOUT_FILENO
, TIOCGSIZE
, &ws
) == -1)
396 ts
.ts_lines
= ts
.ts_cols
= 0;
399 if (scrnheight
== 0) {
400 speed_t ospeed
= ((tcgetattr(STDOUT_FILENO
, &tbuf
) == -1)
401 ? B9600
: cfgetospeed(&tbuf
));
405 else if (ospeed
== B1200
)
408 else if (ws
.ws_row
!= 0)
409 scrnheight
= ws
.ws_row
;
410 #elif defined TIOCGSIZE
411 else if (ts
.ts_lines
!= 0)
412 scrnheight
= ts
.ts_lines
;
417 #if defined TIOCGWINSZ || defined TIOCGSIZE
420 (realscreenheight
= ws
.ws_row
)
422 (realscreenheight
= ts
.ts_lines
)
425 realscreenheight
= 24;
429 if (scrnwidth
== 0 && 0 ==
431 (scrnwidth
= ws
.ws_col
)
432 #elif defined TIOCGSIZE
433 (scrnwidth
= ts
.ts_cols
)
441 pstate
|= PS_SIGWINCH_PEND
; /* XXX Not atomic */
442 if (options
& OPT_INTERACTIVE
)
443 n_tty_signal(SIGWINCH
);
449 static sigjmp_buf __hdrjmp
; /* XXX */
452 _rcv_mode(char const *folder
, char const *Larg
)
455 sighandler_type prevint
;
461 if (options
& OPT_QUICKRUN_MASK
)
465 i
= setfile(folder
, i
);
467 exit_status
= EXIT_ERR
; /* error already reported */
470 if (options
& OPT_QUICKRUN_MASK
) {
472 if (i
== EXIT_OK
&& (!(options
& OPT_EXISTONLY
) ||
473 (options
& OPT_HEADERLIST
)))
474 print_header_summary(Larg
);
477 check_folder_hook(FAL0
);
479 if (i
> 0 && !ok_blook(emptystart
)) {
480 exit_status
= EXIT_ERR
;
484 if (sigsetjmp(__hdrjmp
, 1) == 0) {
485 if ((prevint
= safe_signal(SIGINT
, SIG_IGN
)) != SIG_IGN
)
486 safe_signal(SIGINT
, _hdrstop
);
487 if (!(options
& OPT_N_FLAG
)) {
488 if (!ok_blook(quiet
))
489 printf(_("%s version %s. Type `?' for help\n"),
490 (ok_blook(bsdcompat
) ? "Mail" : uagent
), ok_vlook(version
));
494 safe_signal(SIGINT
, prevint
);
497 /* Enter the command loop */
498 if (options
& OPT_INTERACTIVE
)
501 if (options
& OPT_INTERACTIVE
)
504 if (mb
.mb_type
== MB_FILE
|| mb
.mb_type
== MB_MAILDIR
) {
505 safe_signal(SIGHUP
, SIG_IGN
);
506 safe_signal(SIGINT
, SIG_IGN
);
507 safe_signal(SIGQUIT
, SIG_IGN
);
510 save_mbox_for_possible_quitstuff();
520 NYD_X
; /* Signal handler */
524 n_err_sighdl(_("\nInterrupt\n"));
525 siglongjmp(__hdrjmp
, 1);
529 main(int argc
, char *argv
[]){
530 /* Keep in SYNC: ./nail.1:"SYNOPSIS, main() */
532 optstr
[] = "A:a:Bb:c:dEeFfHhiL:M:m:NnO:q:Rr:S:s:tu:VvX:::~#.",
537 " %s [-BdEFintv~] [-: spec] [-A account]\n"
538 "\t [-a attachment] [-b bcc-addr] [-c cc-addr]\n"
539 "\t [-M type | -m file | -q file | -t]\n"
540 "\t [-r from-addr] [-S var[=value]..]\n"
541 "\t [-s subject] [-X cmd] [-.] to-addr.. [-- mta-option..]\n"
543 " %s [-BdEeHiNnRv~] [-: spec] [-A account]\n"
544 "\t [-L spec-list] [-r from-addr] [-S var[=value]..]\n"
545 "\t [-u user] [-X cmd] [-- mta-option..]\n"
547 " %s [-BdEeHiNnRv~#] [-: spec] [-A account] -f\n"
548 "\t [-L spec-list] [-r from-addr] [-S var[=value]..]\n"
549 "\t [-X cmd] [file] [-- mta-option..]\n"
551 #define _USAGE_ARGS , progname, progname, progname, progname
553 struct a_arg
*a_head
, *a_curr
;
554 struct name
*to
, *cc
, *bcc
;
555 struct attachment
*attach
;
556 char *cp
, *subject
, *qf
, *Aarg
, *Larg
;
557 char const *okey
, **oargs
, **Xargs
, *folder
, *emsg
;
558 size_t oargs_size
, oargs_cnt
, Xargs_size
, Xargs_cnt
, smopts_size
;
564 a_RF_ALL
= a_RF_SYSTEM
| a_RF_USER
570 n_UNINIT(a_curr
, NULL
);
571 to
= cc
= bcc
= NULL
;
575 oargs
= Xargs
= NULL
;
576 folder
= emsg
= NULL
;
577 oargs_size
= oargs_cnt
= Xargs_size
= Xargs_cnt
= smopts_size
= 0;
581 * Start our lengthy setup, finalize by setting PS_STARTED
587 /* Command line parsing
588 * Variable settings need to be done twice, since the user surely wants the
589 * setting to take effect immediately, but also doesn't want it to be
590 * overwritten from within resource files */
591 while ((i
= _getopt(argc
, argv
, optstr
)) >= 0) {
594 /* Execute an account command later on */
598 options
|= OPT_SENDMODE
;
599 { struct a_arg
*nap
= salloc(sizeof(struct a_arg
));
603 a_curr
->aa_next
= nap
;
605 nap
->aa_file
= _oarg
;
610 /* Make 0/1 line buffered */
611 setvbuf(stdin
, NULL
, _IOLBF
, 0);
612 setvbuf(stdout
, NULL
, _IOLBF
, 0);
615 /* Get Blind Carbon Copy Recipient list */
616 options
|= OPT_SENDMODE
;
617 bcc
= cat(bcc
, lextract(_oarg
, GBCC
| GFULL
));
620 /* Get Carbon Copy Recipient list */
621 options
|= OPT_SENDMODE
;
622 cc
= cat(cc
, lextract(_oarg
, GCC
| GFULL
));
629 ok_bset(skipemptybody
);
630 okey
= "skipemptybody";
633 options
|= OPT_EXISTONLY
;
636 options
|= OPT_F_FLAG
| OPT_SENDMODE
;
639 /* User is specifying file to "edit" with Mail, as opposed to reading
640 * system mailbox. If no argument is given, we read his mbox file.
641 * Check for remaining arguments later */
645 options
|= OPT_HEADERSONLY
;
648 n_err(V_(usagestr
) _USAGE_ARGS
);
651 /* Ignore interrupts */
657 options
|= OPT_HEADERLIST
;
658 if (*Larg
== '"' || *Larg
== '\'') { /* TODO list.c:listspec_check() */
659 size_t j
= strlen(++Larg
);
665 if(qf
!= NULL
&& (!(options
& OPT_Mm_FLAG
) || qf
!= (char*)-1))
667 option_Mm_arg
= _oarg
;
672 if(qf
!= NULL
&& (!(options
& OPT_Mm_FLAG
) || qf
== (char*)-1))
676 options
|= OPT_SENDMODE
| OPT_Mm_FLAG
;
679 /* Avoid initial header printing */
684 /* Don't source "unspecified system start-up file" */
685 if(resfiles
& a_RF_SET
){
686 emsg
= N_("-n cannot be used in conjunction with -:");
689 resfiles
= a_RF_USER
;
692 /* Additional options to pass-through to MTA TODO v15-compat legacy */
693 if (smopts_cnt
== smopts_size
)
694 smopts_size
= _grow_cpp(&smopts
, smopts_size
+ 8, smopts_cnt
);
695 smopts
[smopts_cnt
++] = _oarg
;
698 if (qf
!= NULL
&& (options
& OPT_Mm_FLAG
)) {
700 emsg
= N_("Only one of -M, -m or -q may be given");
703 /* Quote file TODO drop? -Q with real quote?? what ? */
704 options
|= OPT_SENDMODE
;
705 /* Allow for now, we have to special check validity of -q- later on! */
706 qf
= (_oarg
[0] == '-' && _oarg
[1] == '\0') ? (char*)-1 : _oarg
;
709 /* Open folders read-only */
710 options
|= OPT_R_FLAG
;
713 /* Set From address. */
714 options
|= OPT_r_FLAG
;
715 if (_oarg
[0] != '\0') {
716 struct name
*fa
= nalloc(_oarg
, GSKIN
| GFULL
| GFULLEXTRA
);
718 if (is_addr_invalid(fa
, EACM_STRICT
| EACM_NOLOG
)) {
719 emsg
= N_("Invalid address argument with -r");
723 /* TODO -r options is set in smopts, but may
724 * TODO be overwritten by setting from= in
725 * TODO an interactive session!
726 * TODO Maybe disable setting of from?
727 * TODO Warn user? Update manual!! */
728 okey
= savecat("from=", fa
->n_fullname
);
733 /* Set variable (TODO twice [only if successful]) */
746 if (oargs_cnt
== oargs_size
)
747 oargs_size
= _grow_cpp(&oargs
, oargs_size
+ 8, oargs_cnt
);
748 oargs
[oargs_cnt
++] = okey
;
753 options
|= OPT_SENDMODE
;
756 /* Read defined set of headers from mail to be sent */
757 options
|= OPT_SENDMODE
| OPT_t_FLAG
;
760 /* Temporarily set myname so that we can recognize the -u condition */
761 myname
= savecat("%", _oarg
);
764 printf(_("%s version %s\n"), uagent
, ok_vlook(version
));
765 exit_status
= EXIT_OK
;
773 /* Add to list of commands to exec before entering normal operation */
774 if (Xargs_cnt
== Xargs_size
)
775 Xargs_size
= _grow_cpp(&Xargs
, Xargs_size
+ 8, Xargs_cnt
);
776 Xargs
[Xargs_cnt
++] = _oarg
;
779 /* Control which resource files shall be loaded */
780 if(!(resfiles
& (a_RF_SET
| a_RF_SYSTEM
))){
781 emsg
= N_("-n cannot be used in conjunction with -:");
785 while((i
= *_oarg
++) != '\0')
787 case 'S': case 's': resfiles
|= a_RF_SYSTEM
; break;
788 case 'U': case 'u': resfiles
|= a_RF_USER
; break;
789 case ':': case '/': resfiles
&= ~a_RF_ALL
; break;
791 emsg
= N_("Invalid argument of -:");
796 /* Enable tilde escapes even in non-interactive mode */
797 options
|= OPT_TILDE_FLAG
;
800 /* Work in batch mode, even if non-interactive */
801 options
|= OPT_TILDE_FLAG
| OPT_BATCH_FLAG
;
802 if (oargs_cnt
+ 8 >= oargs_size
)
803 oargs_size
= _grow_cpp(&oargs
, oargs_size
+ 9, oargs_cnt
);
804 folder
= "/dev/null";
805 ok_vset(MAIL
, folder
);
806 ok_vset(MBOX
, folder
);
809 ok_vset(inbox
, folder
);
812 ok_bset(typescript_mode
);
813 oargs
[oargs_cnt
+ 0] = "MAIL=/dev/null";
814 oargs
[oargs_cnt
+ 1] = "MBOX=/dev/null";
815 oargs
[oargs_cnt
+ 2] = "emptystart";
816 oargs
[oargs_cnt
+ 3] = "noheader";
817 oargs
[oargs_cnt
+ 4] = "inbox=/dev/null";
818 oargs
[oargs_cnt
+ 5] = "quiet";
819 oargs
[oargs_cnt
+ 6] = "sendwait";
820 oargs
[oargs_cnt
+ 7] = "typescript-mode";
824 options
|= OPT_SENDMODE
;
829 n_err("%s\n", V_(emsg
));
830 n_err(V_(usagestr
) _USAGE_ARGS
);
832 exit_status
= EXIT_USE
;
839 /* The normal arguments may be followed by MTA arguments after a "--";
840 * however, -f may take off an argument, too, and before that.
841 * Since MTA arguments after "--" require *expandargv*, delay parsing off
842 * those options until after the resource files are loaded... */
843 if ((cp
= argv
[i
= _oind
]) == NULL
)
845 else if (cp
[0] == '-' && cp
[1] == '-' && cp
[2] == '\0')
847 /* OPT_BATCH_FLAG sets to /dev/null, but -f can still be used and sets & */
848 else if (folder
!= NULL
&& /*folder[0] == '&' &&*/ folder
[1] == '\0') {
850 if ((cp
= argv
[++i
]) != NULL
) {
851 if (cp
[0] != '-' || cp
[1] != '-' || cp
[2] != '\0') {
852 emsg
= N_("More than one file given with -f");
858 options
|= OPT_SENDMODE
;
860 to
= cat(to
, lextract(cp
, GTO
| GFULL
));
861 if ((cp
= argv
[++i
]) == NULL
)
863 if (cp
[0] == '-' && cp
[1] == '-' && cp
[2] == '\0') {
871 /* ...BUT, since we use salloc() for the MTA smopts storage we need to
872 * allocate the necessary space for them before we fixate that storage! */
873 while (argv
[i
] != NULL
)
875 if (smopts_cnt
+ i
> smopts_size
)
876 DBG(smopts_size
=) _grow_cpp(&smopts
, smopts_cnt
+ i
+ 1, smopts_cnt
);
878 /* Check for inconsistent arguments, fix some temporaries */
879 if (options
& OPT_SENDMODE
) {
880 /* XXX This is only because BATCH_FLAG sets *folder*=/dev/null
881 * XXX in order to function. Ideally that would not be needed */
882 if (folder
!= NULL
&& !(options
& OPT_BATCH_FLAG
)) {
883 emsg
= N_("Cannot give -f and people to send to.");
886 if (myname
!= NULL
) {
887 emsg
= N_("The -u option cannot be used in send mode");
890 if (!(options
& OPT_t_FLAG
) && to
== NULL
) {
891 emsg
= N_("Send options without primary recipient specified.");
894 if ((options
& OPT_t_FLAG
) && qf
!= NULL
) {
895 emsg
= N_("The -M, -m, -q and -t options are mutual exclusive.");
898 if (options
& (OPT_EXISTONLY
| OPT_HEADERSONLY
| OPT_HEADERLIST
)) {
899 emsg
= N_("The -e, -H and -L options cannot be used in send mode.");
902 if (options
& OPT_R_FLAG
) {
903 emsg
= N_("The -R option is meaningless in send mode.");
907 if (options
& OPT_INTERACTIVE
) {
908 if (qf
== (char*)-1) {
909 if (!(options
& OPT_Mm_FLAG
))
910 emsg
= N_("-q can't use standard input when interactive.\n");
915 if (myname
!= NULL
&& folder
!= NULL
) {
916 emsg
= N_("The options -u and -f (and -#) are mutually exclusive");
919 if ((options
& (OPT_EXISTONLY
| OPT_HEADERSONLY
)) ==
920 (OPT_EXISTONLY
| OPT_HEADERSONLY
)) {
921 emsg
= N_("The options -e and -H are mutual exclusive");
924 if ((options
& (OPT_HEADERSONLY
| OPT_HEADERLIST
)) == /* TODO OBSOLETE */
925 (OPT_HEADERSONLY
| OPT_HEADERLIST
))
926 OBSOLETE(_("please use \"-e -L xy\" instead of \"-H -L xy\""));
933 * Likely to go, perform more setup
938 if (options
& OPT_INTERACTIVE
) {
941 # ifndef TTY_WANTS_SIGWINCH
942 if (safe_signal(SIGWINCH
, SIG_IGN
) != SIG_IGN
)
944 safe_signal(SIGWINCH
, &_setscreensize
);
947 scrnheight
= realscreenheight
= 24, scrnwidth
= 80;
949 /* Fixate the current snapshot of our global auto-reclaimed storage instance.
950 * Memory is auto-reclaimed from now on */
951 n_memory_autorec_fixate();
953 /* load() any resource files */
954 if(resfiles
& a_RF_ALL
){
955 /* *expand() returns a savestr(), but load only uses the file name for
956 * fopen(), so it's safe to do this */
957 if((resfiles
& a_RF_SYSTEM
) && !ok_blook(NAIL_NO_SYSTEM_RC
))
958 n_load(VAL_SYSCONFDIR
"/" VAL_SYSCONFRC
);
959 if(resfiles
& a_RF_USER
)
960 n_load(file_expand(ok_vlook(MAILRC
)));
961 if((cp
= ok_vlook(NAIL_EXTRA_RC
)) != NULL
)
962 n_load(file_expand(cp
));
965 /* Ensure the -S and other command line options take precedence over
966 * anything that may have been placed in resource files.
967 * Our "ternary binary" option *verbose* needs special treament */
968 if ((options
& (OPT_VERB
| OPT_VERBVERB
)) == OPT_VERB
)
969 options
&= ~OPT_VERB
;
970 /* ..and be silent when unsetting an undefined variable */
972 for (i
= 0; UICMP(z
, i
, <, oargs_cnt
); ++i
) {
981 /* Cause possible umask(2), now that any setting is established, and before
982 * we change accounts, evaluate commands etc. */
983 (void)ok_vlook(umask
);
985 /* Additional options to pass-through to MTA, and allowed to do so? */
986 if ((cp
= ok_vlook(expandargv
)) != NULL
) {
987 bool_t isfail
= !asccasecmp(cp
, "fail"),
988 isrestrict
= (!isfail
&& !asccasecmp(cp
, "restrict"));
990 if ((options
& OPT_D_V
) && !isfail
&& !isrestrict
&& *cp
!= '\0')
991 n_err(_("Unknown *expandargv* value: %s\n"), cp
);
993 if ((cp
= argv
[i
= _oind
]) != NULL
) {
995 (isrestrict
&& !(options
& (OPT_INTERACTIVE
|OPT_TILDE_FLAG
)))) {
996 n_err(_("*expandargv* doesn't allow MTA arguments; consider "
997 "using *sendmail-arguments*\n"));
998 exit_status
= EXIT_USE
| EXIT_SEND_ERROR
;
1002 assert(smopts_cnt
+ 1 <= smopts_size
);
1003 smopts
[smopts_cnt
++] = cp
;
1004 } while ((cp
= argv
[++i
]) != NULL
);
1008 /* We had to wait until the resource files are loaded and any command line
1009 * setting has been restored, but get the termcap up and going before we
1010 * switch account or running commands */
1012 if((options
& (OPT_INTERACTIVE
| OPT_QUICKRUN_MASK
)) == OPT_INTERACTIVE
)
1016 /* Now we can set the account */
1024 /* "load()" commands given on command line */
1026 n_load_Xargs(Xargs
, Xargs_cnt
);
1029 if(options
& OPT_Mm_FLAG
){
1030 if(qf
== (char*)-1){
1031 if(!mime_type_check_mtname(option_Mm_arg
)){
1032 n_err(_("Could not find `mimetype' for -M argument: %s\n"),
1034 exit_status
= EXIT_ERR
;
1037 }else if((option_Mm_arg
= mime_type_classify_filename(qf
)) == NULL
){
1038 n_err(_("Could not `mimetype'-classify -m argument: %s\n"),
1039 n_shexp_quote_cp(qf
, FAL0
));
1040 exit_status
= EXIT_ERR
;
1042 }else if(!asccasecmp(option_Mm_arg
, "text/plain")) /* TODO no: magic!! */
1043 option_Mm_arg
= NULL
;
1047 * We're finally completely setup and ready to go
1049 pstate
|= PS_STARTED
;
1051 if (!(options
& OPT_SENDMODE
)) {
1052 exit_status
= _rcv_mode(folder
, Larg
);
1056 /* Now that full mailx(1)-style file expansion is possible handle the
1057 * attachments which we had delayed due to this.
1058 * This may use savestr(), but since we won't enter the command loop we
1059 * don't need to care about that */
1060 for (cp
= NULL
; a_head
!= NULL
;) {
1061 struct attachment
*nahp
, *nap
;
1063 if ((nahp
= add_attachment(n_LEXINPUT_CTX_DEFAULT
, attach
,
1064 a_head
->aa_file
, &nap
)) != NULL
) {
1066 /* Did we split a charset set name for fixation purposes? */
1068 nap
->a_conv
= AC_FIX_INCS
;
1069 nap
->a_input_charset
= cp
;
1072 a_head
= a_head
->aa_next
;
1077 /* It may not have worked because of an appended character set name, so
1078 * try to split name and charset and retry once */
1079 if (cp
== NULL
&& (cp
= strrchr(a_head
->aa_file
, '=')) != NULL
) {
1080 char *ncp
, *nfp
= savestrbuf(a_head
->aa_file
,
1081 PTR2SIZE(cp
- a_head
->aa_file
));
1083 for (ncp
= ++cp
; *ncp
!= '\0'; ++ncp
)
1084 if (!alnumchar(*ncp
) && !punctchar(*ncp
))
1087 a_head
->aa_file
= nfp
;
1092 n_perr(a_head
->aa_file
, i
);
1093 exit_status
= EXIT_ERR
;
1097 if (options
& OPT_INTERACTIVE
)
1099 mail(to
, cc
, bcc
, subject
, attach
, qf
, ((options
& OPT_F_FLAG
) != 0));
1100 if (options
& OPT_INTERACTIVE
)
1105 if((options
& (OPT_INTERACTIVE
| OPT_QUICKRUN_MASK
)) == OPT_INTERACTIVE
)
1106 n_termcap_destroy();
1109 #ifdef HAVE_MEMORY_DEBUG
1110 n_memory_autorec_pop(NULL
);
1118 c_exit(void *v
){/* TODO program state machine */
1122 if(pstate
& PS_STARTED
){
1123 if(!(pstate
& PS_SOURCING
)){
1125 if((options
& (OPT_INTERACTIVE
| OPT_QUICKRUN_MASK
)) ==
1127 n_termcap_destroy();
1137 /* Source the others in that case! */
1138 #ifdef HAVE_AMALGAMATION
1139 # include "config.h"