1 /*@ S-nail - a mail user agent derived from Berkeley Mail.
2 *@ Startup -- interface with user.
4 * Copyright (c) 2000-2004 Gunnar Ritter, Freiburg i. Br., Germany.
5 * Copyright (c) 2012 - 2014 Steffen "Daode" Nurpmeso <sdaoden@users.sf.net>.
8 * Copyright (c) 1980, 1993
9 * The Regents of the University of California. All rights reserved.
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. All advertising materials mentioning features or use of this software
20 * must display the following acknowledgement:
21 * This product includes software developed by the University of
22 * California, Berkeley and its contributors.
23 * 4. Neither the name of the University nor the names of its contributors
24 * may be used to endorse or promote products derived from this software
25 * without specific prior written permission.
27 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
28 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
31 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
33 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
35 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
36 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
41 * Most strcpy/sprintf functions have been changed to strncpy/snprintf to
42 * correct several buffer overruns (at least one ot them was exploitable).
43 * Sat Jun 20 04:58:09 CEST 1998 Alvaro Martinez Echevarria <alvaro@lander.es>
45 * Note: We set egid to realgid ... and only if we need the egid we will
46 * switch back temporary. Nevertheless, I do not like seg faults.
47 * Werner Fink, <werner@suse.de>
50 #ifndef HAVE_AMALGAMATION
55 #include <sys/ioctl.h>
60 #ifdef HAVE_NL_LANGINFO
61 # include <langinfo.h>
70 struct a_arg
*aa_next
;
74 /* (extern, but not with amalgamation, so define here) */
75 VL
char const weekday_names
[7 + 1][4] = {
76 "Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat", ""
78 VL
char const month_names
[12 + 1][4] = {
79 "Jan", "Feb", "Mar", "Apr", "May", "Jun",
80 "Jul", "Aug", "Sep", "Oct", "Nov", "Dec", ""
82 VL
char const uagent
[] = UAGENT
;
83 VL
char const version
[] = VERSION
;
84 /*VL char const features[]; The "feature string" comes from config.h */
85 VL uc_it
const class_char
[] = {
86 /* 000 nul 001 soh 002 stx 003 etx 004 eot 005 enq 006 ack 007 bel */
87 C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
,
88 /* 010 bs 011 ht 012 nl 013 vt 014 np 015 cr 016 so 017 si */
89 C_CNTRL
, C_BLANK
, C_WHITE
, C_SPACE
, C_SPACE
, C_SPACE
, C_CNTRL
, C_CNTRL
,
90 /* 020 dle 021 dc1 022 dc2 023 dc3 024 dc4 025 nak 026 syn 027 etb */
91 C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
,
92 /* 030 can 031 em 032 sub 033 esc 034 fs 035 gs 036 rs 037 us */
93 C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
, C_CNTRL
,
94 /* 040 sp 041 ! 042 " 043 # 044 $ 045 % 046 & 047 ' */
95 C_BLANK
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
,
96 /* 050 ( 051 ) 052 * 053 + 054 , 055 - 056 . 057 / */
97 C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
,
98 /* 060 0 061 1 062 2 063 3 064 4 065 5 066 6 067 7 */
99 C_OCTAL
, C_OCTAL
, C_OCTAL
, C_OCTAL
, C_OCTAL
, C_OCTAL
, C_OCTAL
, C_OCTAL
,
100 /* 070 8 071 9 072 : 073 ; 074 < 075 = 076 > 077 ? */
101 C_DIGIT
, C_DIGIT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
,
102 /* 100 @ 101 A 102 B 103 C 104 D 105 E 106 F 107 G */
103 C_PUNCT
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
,
104 /* 110 H 111 I 112 J 113 K 114 L 115 M 116 N 117 O */
105 C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
,
106 /* 120 P 121 Q 122 R 123 S 124 T 125 U 126 V 127 W */
107 C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
, C_UPPER
,
108 /* 130 X 131 Y 132 Z 133 [ 134 \ 135 ] 136 ^ 137 _ */
109 C_UPPER
, C_UPPER
, C_UPPER
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
,
110 /* 140 ` 141 a 142 b 143 c 144 d 145 e 146 f 147 g */
111 C_PUNCT
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
,
112 /* 150 h 151 i 152 j 153 k 154 l 155 m 156 n 157 o */
113 C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
,
114 /* 160 p 161 q 162 r 163 s 164 t 165 u 166 v 167 w */
115 C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
, C_LOWER
,
116 /* 170 x 171 y 172 z 173 { 174 | 175 } 176 ~ 177 del */
117 C_LOWER
, C_LOWER
, C_LOWER
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_PUNCT
, C_CNTRL
120 /* getopt(3) fallback implementation */
122 # define _oarg optarg
123 # define _oind optind
124 /*# define _oerr opterr*/
125 # define _oopt optopt
128 static int _oind
, /*_oerr,*/ _oopt
;
131 /* getopt(3) fallback implementation */
133 # define _getopt getopt
135 static int _getopt(int argc
, char *const argv
[], char const *optstring
);
138 /* Perform basic startup initialization */
139 static void _startup(void);
142 static size_t _grow_cpp(char const ***cpp
, size_t newsize
, size_t oldcnt
);
144 /* Initialize *tempdir*, *myname*, *homedir* */
145 static void _setup_vars(void);
147 /* We're in an interactive session - compute what the screen size for printing
148 * headers etc. should be; notify tty upon resize if *is_sighdl* is not 0.
149 * We use the following algorithm for the height:
150 * If baud rate < 1200, use 9
151 * If baud rate = 1200, use 14
152 * If baud rate > 1200, use 24 or ws_row
153 * Width is either 80 or ws_col */
154 static void _setscreensize(int is_sighdl
);
156 /* Ok, we are reading mail. Decide whether we are editing a mailbox or reading
157 * the system mailbox, and open up the right stuff */
158 static int _rcv_mode(char const *folder
);
160 /* Interrupt printing of the headers */
161 static void _hdrstop(int signo
);
165 _getopt(int argc
, char * const argv
[], char const *optstring
)
167 static char const *lastp
;
172 if ((colon
= (optstring
[0] == ':')))
178 if (_oind
>= argc
|| argv
[_oind
] == 0 || argv
[_oind
][0] != '-' ||
179 argv
[_oind
][1] == '\0')
181 if (argv
[_oind
][1] == '-' && argv
[_oind
][2] == '\0') {
185 curp
= &argv
[_oind
][1];
189 while (optstring
[0] != '\0') {
190 if (optstring
[0] == ':' || optstring
[0] != _oopt
) {
194 if (optstring
[1] == ':') {
195 if (curp
[1] != '\0') {
196 _oarg
= UNCONST(&curp
[1]);
199 if ((_oind
+= 2) > argc
) {
200 if (!colon
/*&& _oerr*/) {
202 tr(79, "%s: option requires an argument -- %c\n"),
203 argv
[0], (char)_oopt
);
205 rv
= (colon
? ':' : '?');
208 _oarg
= argv
[_oind
- 1];
221 if (!colon
/*&& opterr*/)
222 fprintf(stderr
, tr(78, "%s: illegal option -- %c\n"), argv
[0], _oopt
);
233 #endif /* !HAVE_GETOPT */
241 /* Absolutely the first thing we do is save our egid and set it to the rgid,
242 * so that we can safely run setgid. We use the sgid (saved set-gid) to
243 * allow ourselves to revert to the egid if we want (temporarily) to become
244 * privileged XXX (s-nail-)*dotlock(-program)* [maybe forked<->Unix IPC?] */
245 effectivegid
= getegid();
247 if (setgid(realgid
) < 0) {
255 _oind
= /*_oerr =*/ 1;
258 if ((cp
= strrchr(progname
, '/')) != NULL
)
261 /* Set up a reasonable environment.
262 * Figure out whether we are being run interactively,
263 * start the SIGCHLD catcher, and so forth */
264 safe_signal(SIGCHLD
, &sigchild
);
266 safe_signal(SIGABRT
, &_nyd_oncrash
);
268 safe_signal(SIGBUS
, &_nyd_oncrash
);
270 safe_signal(SIGFPE
, &_nyd_oncrash
);
271 safe_signal(SIGILL
, &_nyd_oncrash
);
272 safe_signal(SIGSEGV
, &_nyd_oncrash
);
275 if (isatty(STDIN_FILENO
)) /* TODO should be isatty(0) && isatty(2)?? */
276 options
|= OPT_TTYIN
| OPT_INTERACTIVE
;
277 if (isatty(STDOUT_FILENO
))
278 options
|= OPT_TTYOUT
;
279 if (IS_TTY_SESSION())
280 safe_signal(SIGPIPE
, dflpipe
= SIG_IGN
);
282 /* Define defaults for internal variables, based on POSIX 2008/Cor 1-2013 */
285 ok_bset(asksub
, TRU1
);
294 /* ok_vset(escape, ESCAPE *"~"*); TODO non-compliant */
297 ok_bset(header
, TRU1
);
304 /* noonehop -- Note: we ignore this one */
307 ok_vset(prompt
, "\\& "); /* POSIX "? " unless *bsdcompat*, then "& " */
315 /* ok_vset(toplines, "5"); XXX somewhat hmm */
317 #ifdef HAVE_SETLOCALE
318 setlocale(LC_ALL
, "");
319 mb_cur_max
= MB_CUR_MAX
;
320 # ifdef HAVE_NL_LANGINFO
321 if (ok_vlook(ttycharset
) == NULL
&& (cp
= nl_langinfo(CODESET
)) != NULL
)
322 ok_vset(ttycharset
, cp
);
325 # ifdef HAVE_C90AMEND1
326 if (mb_cur_max
> 1) {
328 if (mbtowc(&wc
, "\303\266", 2) == 2 && wc
== 0xF6 &&
329 mbtowc(&wc
, "\342\202\254", 3) == 3 && wc
== 0x20AC)
331 /* Reset possibly messed up state; luckily this also gives us an
332 * indication wether the encoding has locking shift state sequences */
333 /* TODO temporary - use option bits! */
334 enc_has_state
= mbtowc(&wc
, NULL
, mb_cur_max
);
342 # ifdef NL_CAT_LOCALE
343 catd
= catopen(CATNAME
, NL_CAT_LOCALE
);
345 catd
= catopen(CATNAME
, 0);
350 iconvd
= (iconv_t
)-1;
356 _grow_cpp(char const ***cpp
, size_t newsize
, size_t oldcnt
)
358 /* Before spreserve(): use our string pool instead of LibC heap */
362 newcpp
= salloc(sizeof(char*) * newsize
);
365 memcpy(newcpp
, *cpp
, oldcnt
* sizeof(char*));
374 /* Before spreserve(): use our string pool instead of LibC heap */
375 /* XXX further check paths? */
378 struct passwd
*pwuid
, *pw
;
381 tempdir
= ((cp
= getenv("TMPDIR")) != NULL
) ? savestr(cp
) : TMPDIR_FALLBACK
;
383 cp
= (myname
== NULL
) ? getenv("USER") : myname
;
385 if ((pwuid
= getpwuid(uid
)) == NULL
)
386 panic(tr(201, "Cannot associate a name with uid %lu"), (ul_it
)uid
);
388 myname
= pwuid
->pw_name
;
389 else if ((pw
= getpwnam(cp
)) == NULL
)
390 panic(tr(236, "`%s' is not a user of this system"), cp
);
392 myname
= pw
->pw_name
;
393 if (pw
->pw_uid
!= uid
)
394 options
|= OPT_u_FLAG
;
396 myname
= savestr(myname
);
397 /* XXX myfullname = pw->pw_gecos[OPTIONAL!] -> GUT THAT; TODO pw_shell */
399 if ((cp
= getenv("HOME")) == NULL
)
400 cp
= "."; /* XXX User and Login objects; Login: pw->pw_dir */
401 homedir
= savestr(cp
);
406 _setscreensize(int is_sighdl
)
411 #elif defined TIOCGSIZE
416 scrnheight
= realscreenheight
= scrnwidth
= 0;
418 /* (Also) POSIX: LINES and COLUMNS always override. Adjust this
419 * a little bit to be able to honour resizes during our lifetime and
420 * only honour it upon first run; abuse *is_sighdl* as an indicator */
425 if ((cp
= getenv("LINES")) != NULL
&& (i
= strtol(cp
, NULL
, 10)) > 0)
426 scrnheight
= realscreenheight
= (int)i
;
427 if ((cp
= getenv("COLUMNS")) != NULL
&& (i
= strtol(cp
, NULL
, 10)) > 0)
430 if (scrnwidth
!= 0 && scrnheight
!= 0)
435 if (ioctl(STDOUT_FILENO
, TIOCGWINSZ
, &ws
) < 0)
436 ws
.ws_col
= ws
.ws_row
= 0;
437 #elif defined TIOCGSIZE
438 if (ioctl(STDOUT_FILENO
, TIOCGSIZE
, &ws
) < 0)
439 ts
.ts_lines
= ts
.ts_cols
= 0;
442 if (scrnheight
== 0) {
443 speed_t ospeed
= ((tcgetattr(STDOUT_FILENO
, &tbuf
) < 0)
444 ? B9600
: cfgetospeed(&tbuf
));
448 else if (ospeed
== B1200
)
451 else if (ws
.ws_row
!= 0)
452 scrnheight
= ws
.ws_row
;
453 #elif defined TIOCGSIZE
454 else if (ts
.ts_lines
!= 0)
455 scrnheight
= ts
.ts_lines
;
460 #if defined TIOCGWINSZ || defined TIOCGSIZE
463 (realscreenheight
= ws
.ws_row
)
465 (realscreenheight
= ts
.ts_lines
)
468 realscreenheight
= 24;
472 if (scrnwidth
== 0 && 0 ==
474 (scrnwidth
= ws
.ws_col
)
475 #elif defined TIOCGSIZE
476 (scrnwidth
= ts
.ts_cols
)
483 if (is_sighdl
&& IS_TTY_SESSION())
484 tty_signal(SIGWINCH
);
489 static sigjmp_buf __hdrjmp
; /* XXX */
492 _rcv_mode(char const *folder
)
496 sighandler_type prevint
;
501 else if (*folder
== '@') {
502 /* This must be treated specially to make possible invocation like
503 * -A imap -f @mailbox */
504 if ((cp
= ok_vlook(folder
)) != NULL
&& which_protocol(cp
) == PROTO_IMAP
)
505 n_strlcpy(mailname
, cp
, PATH_MAX
);
508 i
= setfile(folder
, 0);
510 exit(1); /* error already reported */
511 if (options
& OPT_EXISTONLY
)
514 if (options
& OPT_HEADERSONLY
) {
515 print_headers(1, msgCount
);
519 callhook(mailname
, 0);
520 if (i
> 0 && !ok_blook(emptystart
))
523 if (sigsetjmp(__hdrjmp
, 1) == 0) {
524 if ((prevint
= safe_signal(SIGINT
, SIG_IGN
)) != SIG_IGN
)
525 safe_signal(SIGINT
, _hdrstop
);
526 if (!(options
& OPT_N_FLAG
)) {
527 if (!ok_blook(quiet
))
528 printf(tr(140, "%s version %s. Type ? for help.\n"),
529 (ok_blook(bsdcompat
) ? "Mail" : uagent
), version
);
533 safe_signal(SIGINT
, prevint
);
536 /* Enter the command loop */
537 if (options
& OPT_INTERACTIVE
)
540 if (options
& OPT_INTERACTIVE
)
543 if (mb
.mb_type
== MB_FILE
|| mb
.mb_type
== MB_MAILDIR
) {
544 safe_signal(SIGHUP
, SIG_IGN
);
545 safe_signal(SIGINT
, SIG_IGN
);
546 safe_signal(SIGQUIT
, SIG_IGN
);
548 save_mbox_for_possible_quitstuff();
560 fprintf(stderr
, tr(141, "\nInterrupt\n"));
561 siglongjmp(__hdrjmp
, 1);
565 main(int argc
, char *argv
[])
567 static char const optstr
[] = "A:a:Bb:c:DdEeFfHiNnO:q:Rr:S:s:tu:Vv~#",
570 " %s [-BDdEFintv~] [-A acc] [-a attachment] "
571 "[-b bcc-addr] [-c cc-addr]\n"
572 "\t [-O mtaopt [-O mtaopt-arg]] [-q file] [-r from-addr] "
574 "\t [-s subject] to-addr...\n"
575 " %s [-BDdEeHiNnRv~#] [-A acct] "
576 "[-S var[=value]] -f [file]\n"
577 " %s [-BDdEeiNnRv~#] [-A acc] [-S var[=value]] [-u user]\n";
579 struct a_arg
*a_head
= NULL
, *a_curr
= /* silence CC */ NULL
;
580 struct name
*to
= NULL
, *cc
= NULL
, *bcc
= NULL
;
581 struct attachment
*attach
= NULL
;
582 char *cp
= NULL
, *subject
= NULL
, *qf
= NULL
, *Aflag
= NULL
;
583 char const *okey
, **oargs
= NULL
, *folder
= NULL
;
584 size_t oargs_size
= 0, oargs_count
= 0, smopts_size
= 0;
589 * Start our lengthy setup
593 var_clear_allow_undefined
= TRU1
;
598 /* Command line parsing */
599 while ((i
= _getopt(argc
, argv
, optstr
)) >= 0) {
602 /* Execute an account command later on */
606 { struct a_arg
*nap
= ac_alloc(sizeof(struct a_arg
));
610 a_curr
->aa_next
= nap
;
612 nap
->aa_file
= _oarg
;
615 options
|= OPT_SENDMODE
;
618 /* Make 0/1 line buffered */
619 setvbuf(stdin
, NULL
, _IOLBF
, 0);
620 setvbuf(stdout
, NULL
, _IOLBF
, 0);
623 /* Get Blind Carbon Copy Recipient list */
624 bcc
= cat(bcc
, checkaddrs(lextract(_oarg
, GBCC
| GFULL
)));
625 options
|= OPT_SENDMODE
;
628 /* Get Carbon Copy Recipient list */
629 cc
= cat(cc
, checkaddrs(lextract(_oarg
, GCC
| GFULL
)));
630 options
|= OPT_SENDMODE
;
634 okey
= "disconnected";
642 ok_bset(debug
, TRU1
);
646 okey
= "skipemptybody";
649 options
|= OPT_EXISTONLY
;
652 options
|= OPT_F_FLAG
| OPT_SENDMODE
;
655 /* User is specifying file to "edit" with Mail, as opposed to reading
656 * system mailbox. If no argument is given, we read his mbox file.
657 * Check for remaining arguments later */
661 options
|= OPT_HEADERSONLY
;
664 /* Ignore interrupts */
668 /* Avoid initial header printing */
672 /* Don't source "unspecified system start-up file" */
673 options
|= OPT_NOSRC
;
676 /* Additional options to pass-through to MTA */
677 if (smopts_count
== (size_t)smopts_size
)
678 smopts_size
= _grow_cpp(&smopts
, smopts_size
+ 8, smopts_count
);
679 smopts
[smopts_count
++] = skin(_oarg
);
682 /* Quote file TODO drop? -Q with real quote?? what ? */
685 options
|= OPT_SENDMODE
;
688 /* Open folders read-only */
689 options
|= OPT_R_FLAG
;
692 /* Set From address. */
693 options
|= OPT_r_FLAG
;
694 if ((option_r_arg
= _oarg
)[0] != '\0') {
695 struct name
*fa
= nalloc(_oarg
, GFULL
);
697 if (is_addr_invalid(fa
, 1) || is_fileorpipe_addr(fa
)) {
698 fprintf(stderr
, tr(271, "Invalid address argument with -r\n"));
701 option_r_arg
= fa
->n_name
;
702 /* TODO -r options is set in smopts, but may
703 * TODO be overwritten by setting from= in
704 * TODO an interactive session!
705 * TODO Maybe disable setting of from?
706 * TODO Warn user? Update manual!! */
707 okey
= savecat("from=", fa
->n_fullname
);
709 /* ..and fa goes even though it is ready :/ */
713 /* Set variable. We need to do this twice, since the user surely
714 * wants the setting to take effect immediately, but also doesn't want
715 * it to be overwritten from within resource files */
722 if (oargs_count
== oargs_size
)
723 oargs_size
= _grow_cpp(&oargs
, oargs_size
+ 8, oargs_count
);
724 oargs
[oargs_count
++] = okey
;
729 options
|= OPT_SENDMODE
;
732 /* Read defined set of headers from mail to be send */
733 options
|= OPT_SENDMODE
| OPT_t_FLAG
;
736 /* Set user name to pretend to be; don't set OPT_u_FLAG yet, this is
737 * done as necessary in _setup_vars() above */
748 ok_bset(verbose
, TRU1
);
752 /* Enable tilde escapes even in non-interactive mode */
753 options
|= OPT_TILDE_FLAG
;
756 /* Work in batch mode, even if non-interactive */
757 if (oargs_count
+ 6 >= oargs_size
)
758 oargs_size
= _grow_cpp(&oargs
, oargs_size
+ 8, oargs_count
);
759 oargs
[oargs_count
+ 0] = "dot";
760 oargs
[oargs_count
+ 1] = "emptystart";
761 oargs
[oargs_count
+ 2] = "noheader";
762 oargs
[oargs_count
+ 3] = "quiet";
763 oargs
[oargs_count
+ 4] = "sendwait";
764 oargs
[oargs_count
+ 5] = "MBOX=/dev/null";
766 options
|= OPT_TILDE_FLAG
| OPT_BATCH_FLAG
;
770 fprintf(stderr
, tr(135, usagestr
), progname
, progname
, progname
);
775 if (folder
!= NULL
) {
777 if (_oind
+ 1 < argc
) {
778 fprintf(stderr
, tr(205, "More than one file given with -f\n"));
781 folder
= argv
[_oind
];
784 for (i
= _oind
; argv
[i
]; ++i
)
785 to
= cat(to
, checkaddrs(lextract(argv
[i
], GTO
| GFULL
)));
787 options
|= OPT_SENDMODE
;
790 /* Check for inconsistent arguments */
791 if (folder
!= NULL
&& to
!= NULL
) {
792 fprintf(stderr
, tr(137, "Cannot give -f and people to send to.\n"));
795 if ((options
& (OPT_SENDMODE
| OPT_t_FLAG
)) == OPT_SENDMODE
&& to
== NULL
) {
796 fprintf(stderr
, tr(138,
797 "Send options without primary recipient specified.\n"));
800 if ((options
& OPT_R_FLAG
) && to
!= NULL
) {
801 fprintf(stderr
, tr(235, "The -R option is meaningless in send mode.\n"));
806 * Likely to go, perform more setup
811 if (options
& OPT_INTERACTIVE
) {
814 # ifndef TTY_WANTS_SIGWINCH
815 if (safe_signal(SIGWINCH
, SIG_IGN
) != SIG_IGN
)
817 safe_signal(SIGWINCH
, _setscreensize
);
820 scrnheight
= realscreenheight
= 24, scrnwidth
= 80;
822 /* Snapshot our string pools. Memory is auto-reclaimed from now on */
825 if (!(options
& OPT_NOSRC
) && getenv("NAIL_NO_SYSTEM_RC") == NULL
)
827 /* *expand() returns a savestr(), but load only uses the file name for
828 * fopen(), so it's safe to do this */
829 if ((cp
= getenv("MAILRC")) == NULL
&& (cp
= getenv("NAILRC")) == NULL
)
830 cp
= UNCONST(MAILRC
);
831 load(file_expand(cp
));
832 if (getenv("NAIL_EXTRA_RC") == NULL
&&
833 (cp
= ok_vlook(NAIL_EXTRA_RC
)) != NULL
)
834 load(file_expand(cp
));
836 /* Now we can set the account */
844 /* Ensure the -S and other command line options take precedence over
845 * anything that may have been placed in resource files */
846 for (i
= 0; UICMP(z
, i
, <, oargs_count
); ++i
) {
854 * We're finally completely setup and ready to go
858 var_clear_allow_undefined
= FAL0
;
860 if (options
& OPT_DEBUG
)
861 fprintf(stderr
, tr(199, "user = %s, homedir = %s\n"), myname
, homedir
);
863 if (!(options
& OPT_SENDMODE
)) {
864 exit_status
= _rcv_mode(folder
);
868 /* Now that full mailx(1)-style file expansion is possible handle the
869 * attachments which we had delayed due to this.
870 * This may use savestr(), but since we won't enter the command loop we
871 * don't need to care about that */
872 while (a_head
!= NULL
) {
873 attach
= add_attachment(attach
, a_head
->aa_file
, NULL
);
874 if (attach
!= NULL
) {
876 a_head
= a_head
->aa_next
;
879 perror(a_head
->aa_file
);
884 /* xxx exit_status = EXIT_OK; */
885 if (options
& OPT_INTERACTIVE
)
887 mail(to
, cc
, bcc
, subject
, attach
, qf
, ((options
& OPT_F_FLAG
) != 0));
888 if (options
& OPT_INTERACTIVE
)
895 /* vim:set fenc=utf-8:s-it-mode */