main.c

   1 /*@ S-nail - a mail user agent derived from Berkeley Mail.
   2  *@ Startup and initialization.
   3  *@ This file is also used to materialize externals.
   4  *
   5  * Copyright (c) 2000-2004 Gunnar Ritter, Freiburg i. Br., Germany.
   6  * Copyright (c) 2012 - 2017 Steffen (Daode) Nurpmeso <steffen@sdaoden.eu>.
   7  */
   8 /*
   9  * Copyright (c) 1980, 1993
  10  *      The Regents of the University of California.  All rights reserved.
  11  *
  12  * Redistribution and use in source and binary forms, with or without
  13  * modification, are permitted provided that the following conditions
  14  * are met:
  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.
  23  *
  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
  34  * SUCH DAMAGE.
  35  */
  36 #undef n_FILE
  37 #define n_FILE main
  38 #define n_MAIN_SOURCE
  39
  40 #include "nail.h"
  41
  42 #include <sys/ioctl.h>
  43
  44 #include <pwd.h>
  45
  46 #ifdef HAVE_NL_LANGINFO
  47 # include <langinfo.h>
  48 #endif
  49 #ifdef HAVE_SETLOCALE
  50 # include <locale.h>
  51 #endif
  52
  53 struct a_arg{
  54    struct a_arg *aa_next;
  55    char const *aa_file;
  56 };
  57
  58 /* (extern, but not with amalgamation, so define here) */
  59 VL char const n_weekday_names[7 + 1][4] = {
  60    "Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat", ""
  61 };
  62 VL char const n_month_names[12 + 1][4] = {
  63    "Jan", "Feb", "Mar", "Apr", "May", "Jun",
  64    "Jul", "Aug", "Sep", "Oct", "Nov", "Dec", ""
  65 };
  66 VL char const n_uagent[sizeof VAL_UAGENT] = VAL_UAGENT;
  67 VL char const n_error[sizeof n_ERROR] = N_(n_ERROR);
  68 VL char const n_unirepl[sizeof n_UNIREPL] = n_UNIREPL;
  69 VL char const n_empty[1] = "";
  70 VL char const n_0[2] = "0";
  71 VL char const n_1[2] = "1";
  72 VL char const n_m1[3] = "-1";
  73 VL ui16_t const n_class_char[1 + 0x7F] = {
  74 #define a_BC C_BLANK | C_CNTRL
  75 #define a_SC C_SPACE | C_CNTRL
  76 #define a_WC C_WHITE | C_CNTRL
  77 /* 000 nul  001 soh  002 stx  003 etx  004 eot  005 enq  006 ack  007 bel */
  78    C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL,
  79 /* 010 bs   011 ht   012 nl   013 vt   014 np   015 cr   016 so   017 si */
  80    C_CNTRL, a_BC,    a_WC,    a_SC,    a_SC,    a_SC,    C_CNTRL, C_CNTRL,
  81 /* 020 dle  021 dc1  022 dc2  023 dc3  024 dc4  025 nak  026 syn  027 etb */
  82    C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL,
  83 /* 030 can  031 em   032 sub  033 esc  034 fs   035 gs   036 rs   037 us */
  84    C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL, C_CNTRL,
  85 #undef a_WC
  86 #undef a_SC
  87 #undef a_BC
  88 /* 040 sp   041  !   042  "   043  #   044  $   045  %   046  &   047  ' */
  89    C_BLANK, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT,
  90 /* 050  (   051  )   052  *   053  +   054  ,    055  -   056  .   057  / */
  91    C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT,
  92 /* 060  0   061  1   062  2   063  3   064  4   065  5   066  6   067  7 */
  93    C_OCTAL, C_OCTAL, C_OCTAL, C_OCTAL, C_OCTAL, C_OCTAL, C_OCTAL, C_OCTAL,
  94 /* 070  8   071  9   072  :   073  ;   074  <   075  =   076  >   077  ? */
  95    C_DIGIT, C_DIGIT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT,
  96 /* 100  @   101  A   102  B   103  C   104  D   105  E   106  F   107  G */
  97    C_PUNCT, C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER,
  98 /* 110  H   111  I   112  J   113  K   114  L   115  M   116  N   117  O */
  99    C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER,
 100 /* 120  P   121  Q   122  R   123  S   124  T   125  U   126  V   127  W */
 101    C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER, C_UPPER,
 102 /* 130  X   131  Y   132  Z   133  [   134  \   135  ]   136  ^   137  _ */
 103    C_UPPER, C_UPPER, C_UPPER, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT,
 104 /* 140  `   141  a   142  b   143  c   144  d   145  e   146  f   147  g */
 105    C_PUNCT, C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER,
 106 /* 150  h   151  i   152  j   153  k   154  l   155  m   156  n   157  o */
 107    C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER,
 108 /* 160  p   161  q   162  r   163  s   164  t   165  u   166  v   167  w */
 109    C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER, C_LOWER,
 110 /* 170  x   171  y   172  z   173  {   174  |   175  }   176  ~   177 del */
 111    C_LOWER, C_LOWER, C_LOWER, C_PUNCT, C_PUNCT, C_PUNCT, C_PUNCT, C_CNTRL
 112 };
 113
 114 /* Our own little getopt(3) */
 115 static char const *a_main_oarg;
 116 static int a_main_oind, /*_oerr,*/ a_main_oopt;
 117
 118 /* Our own little getopt(3); note --help is special-treated as 'h' */
 119 static int a_main_getopt(int argc, char * const argv[], char const *optstring);
 120
 121 /* Perform basic startup initialization */
 122 static void a_main_startup(void);
 123
 124 /* Grow a char** */
 125 static size_t a_main_grow_cpp(char const ***cpp, size_t newsize, size_t oldcnt);
 126
 127 /* Setup some variables which we require to be valid / verified */
 128 static void a_main_setup_vars(void);
 129
 130 /* We're in an interactive session - compute what the screen size for printing
 131  * headers etc. should be; notify tty upon resize if *is_sighdl* is not 0.
 132  * We use the following algorithm for the height:
 133  * If baud rate < 1200, use  9
 134  * If baud rate = 1200, use 14
 135  * If baud rate > 1200, use 24 or ws_row
 136  * Width is either 80 or ws_col */
 137 static void a_main_setscreensize(int is_sighdl);
 138
 139 /* Ok, we are reading mail.  Decide whether we are editing a mailbox or reading
 140  * the system mailbox, and open up the right stuff */
 141 static int a_main_rcv_mode(char const *folder, char const *Larg);
 142
 143 /* Interrupt printing of the headers */
 144 static void a_main_hdrstop(int signo);
 145
 146 static int
 147 a_main_getopt(int argc, char * const argv[], char const *optstring){
 148    static char const *lastp;
 149
 150    char const *curp;
 151    int rv/*, colon*/;
 152    NYD_ENTER;
 153
 154    a_main_oarg = NULL;
 155    rv = -1;
 156
 157    /*if((colon = (optstring[0] == ':')))
 158       ++optstring;*/
 159
 160    if(lastp != NULL){
 161       curp = lastp;
 162       lastp = NULL;
 163    }else{
 164       if(a_main_oind >= argc || argv[a_main_oind] == NULL ||
 165             argv[a_main_oind][0] != '-' || argv[a_main_oind][1] == '\0')
 166          goto jleave;
 167       if(argv[a_main_oind][1] == '-' && argv[a_main_oind][2] == '\0'){
 168          /* We need this in for MTA arg detection (easier) ++a_main_oind;*/
 169          goto jleave;
 170       }
 171       curp = &argv[a_main_oind][1];
 172    }
 173
 174    for(a_main_oopt = curp[0]; optstring[0] != '\0';){
 175       if(optstring[0] != a_main_oopt){
 176          optstring += 1 + (optstring[1] == ':');
 177          continue;
 178       }
 179
 180       if(optstring[1] == ':'){
 181          if(curp[1] != '\0'){
 182             a_main_oarg = n_UNCONST(curp + 1);
 183             ++a_main_oind;
 184          }else{
 185             if((a_main_oind += 2) > argc){
 186                /*if(!colon *//*&& _oerr*//*)*/{
 187                   n_err(_("%s: option requires an argument -- %c\n"),
 188                      argv[0], (char)a_main_oopt);
 189                }
 190                rv = (/*colon ? ':' :*/ '?');
 191                goto jleave;
 192             }
 193             a_main_oarg = argv[a_main_oind - 1];
 194          }
 195       }else{
 196          if(curp[1] != '\0')
 197             lastp = curp + 1;
 198          else
 199             ++a_main_oind;
 200       }
 201       rv = a_main_oopt;
 202       goto jleave;
 203    }
 204
 205    /* Special support for --help, which is quite common */
 206    if(a_main_oopt == '-' && !strcmp(curp, "-help") &&
 207          &curp[-1] == argv[a_main_oind]){
 208       ++a_main_oind;
 209       rv = 'h';
 210       goto jleave;
 211    }
 212
 213    /* Definitive error */
 214    /*if(!colon *//*&& opterr*//*)*/
 215       n_err(_("%s: invalid option -- %c\n"), argv[0], a_main_oopt);
 216    if(curp[1] != '\0')
 217       lastp = curp + 1;
 218    else
 219       ++a_main_oind;
 220    a_main_oarg = NULL;
 221    rv = '?';
 222 jleave:
 223    NYD_LEAVE;
 224    return rv;
 225 }
 226
 227 static void
 228 a_main_startup(void){
 229    char *cp;
 230    NYD_ENTER;
 231
 232    n_stdin = stdin;
 233    n_stdout = stdout;
 234    n_stderr = stderr;
 235    image = -1;
 236    dflpipe = SIG_DFL;
 237    a_main_oind = /*_oerr =*/ 1;
 238
 239    if((cp = strrchr(n_progname, '/')) != NULL)
 240       n_progname = ++cp;
 241
 242    /* Set up a reasonable environment */
 243
 244 #ifdef HAVE_NYD
 245    safe_signal(SIGABRT, &_nyd_oncrash);
 246 # ifdef SIGBUS
 247    safe_signal(SIGBUS, &_nyd_oncrash);
 248 # endif
 249    safe_signal(SIGFPE, &_nyd_oncrash);
 250    safe_signal(SIGILL, &_nyd_oncrash);
 251    safe_signal(SIGSEGV, &_nyd_oncrash);
 252 #endif
 253    command_manager_start();
 254
 255    /* TODO This is wrong: interactive is STDIN/STDERR for a POSIX sh(1).
 256     * TODO For now we get this wrong, all over the place, as this software
 257     * TODO has always been developed with stdout as an output channel.
 258     * TODO Start doing it right for at least explicit terminal-related things,
 259     * TODO but v15 should use ONLY this, also for terminal input! */
 260    if(isatty(STDIN_FILENO)){
 261       n_psonce |= n_PSO_TTYIN;
 262 #if defined HAVE_MLE || defined HAVE_TERMCAP
 263       n_tty_fp = fdopen(fileno(n_stdin), "w");
 264       setvbuf(n_tty_fp, NULL, _IOLBF, 0);
 265 #endif
 266    }
 267    if(isatty(STDOUT_FILENO))
 268       n_psonce |= n_PSO_TTYOUT;
 269    if((n_psonce & (n_PSO_TTYIN | n_PSO_TTYOUT)) ==
 270          (n_PSO_TTYIN | n_PSO_TTYOUT)){
 271       n_psonce |= n_PSO_INTERACTIVE;
 272       safe_signal(SIGPIPE, dflpipe = SIG_IGN);
 273    }
 274
 275    /* STDOUT is always line buffered from our point of view */
 276    setvbuf(n_stdout, NULL, _IOLBF, 0);
 277    if(n_tty_fp == NULL)
 278       n_tty_fp = n_stdout;
 279
 280    /*  --  >8  --  8<  --  */
 281
 282 #ifndef HAVE_SETLOCALE
 283    n_mb_cur_max = 1;
 284 #else
 285    setlocale(LC_ALL, n_empty);
 286    n_mb_cur_max = MB_CUR_MAX;
 287 # ifdef HAVE_NL_LANGINFO
 288    if((cp = nl_langinfo(CODESET)) != NULL)
 289       ok_vset(ttycharset, cp);
 290 # endif
 291
 292 # ifdef HAVE_C90AMEND1
 293    if(n_mb_cur_max > 1){
 294 #  ifdef HAVE_ALWAYS_UNICODE_LOCALE
 295       n_psonce |= n_PSO_UNICODE;
 296 #  else
 297       wchar_t wc;
 298       if(mbtowc(&wc, "\303\266", 2) == 2 && wc == 0xF6 &&
 299             mbtowc(&wc, "\342\202\254", 3) == 3 && wc == 0x20AC)
 300          n_psonce |= n_PSO_UNICODE;
 301       /* Reset possibly messed up state; luckily this also gives us an
 302        * indication whether the encoding has locking shift state sequences */
 303       if(mbtowc(&wc, NULL, n_mb_cur_max))
 304          n_psonce |= n_PSO_ENC_MBSTATE;
 305 #  endif
 306    }
 307 # endif
 308 #endif
 309
 310 #ifdef HAVE_ICONV
 311    iconvd = (iconv_t)-1;
 312 #endif
 313    NYD_LEAVE;
 314 }
 315
 316 static size_t
 317 a_main_grow_cpp(char const ***cpp, size_t newsize, size_t oldcnt){
 318    /* Just use auto-reclaimed storage, it will be preserved */
 319    char const **newcpp;
 320    NYD_ENTER;
 321
 322    newcpp = salloc(sizeof(char*) * newsize);
 323
 324    if(oldcnt > 0)
 325       memcpy(newcpp, *cpp, oldcnt * sizeof(char*));
 326    *cpp = newcpp;
 327    NYD_LEAVE;
 328    return newsize;
 329 }
 330
 331 static void
 332 a_main_setup_vars(void){
 333    struct passwd *pwuid;
 334    char const *cp;
 335    NYD_ENTER;
 336
 337    n_group_id = getgid();
 338    if((pwuid = getpwuid(n_user_id = getuid())) == NULL)
 339       n_panic(_("Cannot associate a name with uid %lu"), (ul_i)n_user_id);
 340
 341    /* C99 */{
 342       char const *ep;
 343       bool_t doenv;
 344
 345       if(!(doenv = (ep = ok_vlook(LOGNAME)) == NULL) &&
 346             (doenv = strcmp(pwuid->pw_name, ep)))
 347          n_err(_("Warning: $LOGNAME (%s) not identical to user (%s)!\n"),
 348             ep, pwuid->pw_name);
 349       if(doenv){
 350          n_pstate |= n_PS_ROOT;
 351          ok_vset(LOGNAME, pwuid->pw_name);
 352          n_pstate &= ~n_PS_ROOT;
 353       }
 354
 355       if((ep = ok_vlook(USER)) != NULL && strcmp(pwuid->pw_name, ep)){
 356          n_err(_("Warning: $USER (%s) not identical to user (%s)!\n"),
 357             ep, pwuid->pw_name);
 358          n_pstate |= n_PS_ROOT;
 359          ok_vset(USER, pwuid->pw_name);
 360          n_pstate &= ~n_PS_ROOT;
 361       }
 362    }
 363
 364    /* XXX myfullname = pw->pw_gecos[OPTIONAL!] -> GUT THAT; TODO pw_shell */
 365
 366    /* */
 367    if((cp = ok_vlook(HOME)) == NULL ||
 368          !is_dir(cp) || access(cp, R_OK | W_OK | X_OK)){
 369       cp = pwuid->pw_dir;
 370       n_pstate |= n_PS_ROOT;
 371       ok_vset(HOME, cp);
 372       n_pstate &= ~n_PS_ROOT;
 373    }
 374
 375    cp = ok_vlook(TMPDIR);
 376    assert(cp != NULL);
 377    if(!is_dir(cp) || access(cp, R_OK | W_OK | X_OK)){
 378       n_err(_("$TMPDIR is not a directory or not accessible: %s\n"),
 379          n_shexp_quote_cp(cp, FAL0));
 380       ok_vclear(TMPDIR);
 381    }
 382
 383    /* Ensure some variables get loaded */
 384    (void)ok_blook(POSIXLY_CORRECT);
 385    NYD_LEAVE;
 386 }
 387
 388 static void
 389 a_main_setscreensize(int is_sighdl){/* TODO globl policy; int wraps; minvals! */
 390    struct termios tbuf;
 391 #ifdef TIOCGWINSZ
 392    struct winsize ws;
 393 #elif defined TIOCGSIZE
 394    struct ttysize ts;
 395 #endif
 396    NYD_ENTER;
 397
 398    n_scrnheight = n_realscreenheight = n_scrnwidth = 0;
 399
 400    /* (Also) POSIX: LINES and COLUMNS always override.  Adjust this
 401     * a little bit to be able to honour resizes during our lifetime and
 402     * only honour it upon first run; abuse *is_sighdl* as an indicator */
 403    if(!is_sighdl){
 404       char const *cp;
 405
 406       /* We manage those variables for our child processes, so ensure they
 407        * are up to date, always */
 408       if(n_psonce & n_PSO_INTERACTIVE)
 409          n_pstate |= n_PS_SIGWINCH_PEND;
 410
 411       if((cp = ok_vlook(LINES)) != NULL){
 412          n_idec_ui32_cp(&n_scrnheight, cp, 0, NULL);
 413          n_realscreenheight = n_scrnheight;
 414       }
 415       if((cp = ok_vlook(COLUMNS)) != NULL)
 416          n_idec_ui32_cp(&n_scrnwidth, cp, 0, NULL);
 417
 418       if(n_scrnwidth != 0 && n_scrnheight != 0)
 419          goto jleave;
 420    }
 421
 422 #ifdef TIOCGWINSZ
 423    if(ioctl(STDOUT_FILENO, TIOCGWINSZ, &ws) == -1)
 424       ws.ws_col = ws.ws_row = 0;
 425 #elif defined TIOCGSIZE
 426    if(ioctl(STDOUT_FILENO, TIOCGSIZE, &ws) == -1)
 427       ts.ts_lines = ts.ts_cols = 0;
 428 #endif
 429
 430    if(n_scrnheight == 0){
 431       speed_t ospeed;
 432
 433       ospeed = ((tcgetattr(fileno(n_tty_fp), &tbuf) == -1)
 434             ? B9600 : cfgetospeed(&tbuf));
 435
 436       if(ospeed < B1200)
 437          n_scrnheight = 9;
 438       else if(ospeed == B1200)
 439          n_scrnheight = 14;
 440 #ifdef TIOCGWINSZ
 441       else if(ws.ws_row != 0)
 442          n_scrnheight = ws.ws_row;
 443 #elif defined TIOCGSIZE
 444       else if(ts.ts_lines != 0)
 445          n_scrnheight = ts.ts_lines;
 446 #endif
 447       else
 448          n_scrnheight = 24;
 449
 450 #if defined TIOCGWINSZ || defined TIOCGSIZE
 451       if(0 ==
 452 # ifdef TIOCGWINSZ
 453             (n_realscreenheight = ws.ws_row)
 454 # else
 455             (n_realscreenheight = ts.ts_lines)
 456 # endif
 457       )
 458          n_realscreenheight = 24;
 459 #endif
 460    }
 461
 462    if(n_scrnwidth == 0 && 0 ==
 463 #ifdef TIOCGWINSZ
 464          (n_scrnwidth = ws.ws_col)
 465 #elif defined TIOCGSIZE
 466          (n_scrnwidth = ts.ts_cols)
 467 #endif
 468    )
 469       n_scrnwidth = 80;
 470
 471 jleave:
 472 #ifdef SIGWINCH
 473    if(is_sighdl){
 474       n_pstate |= n_PS_SIGWINCH_PEND; /* XXX Not atomic */
 475       if(n_psonce & n_PSO_INTERACTIVE)
 476          n_tty_signal(SIGWINCH);
 477    }
 478 #endif
 479    NYD_LEAVE;
 480 }
 481
 482 static sigjmp_buf a_main__hdrjmp; /* XXX */
 483
 484 static int
 485 a_main_rcv_mode(char const *folder, char const *Larg){
 486    int i;
 487    sighandler_type prevint;
 488    NYD_ENTER;
 489
 490    if(folder == NULL)
 491       folder = "%";
 492
 493    i = (n_poption & n_PO_QUICKRUN_MASK) ? FEDIT_RDONLY : FEDIT_NONE;
 494    i = setfile(folder, i);
 495    if(i < 0){
 496       n_exit_status = n_EXIT_ERR; /* error already reported */
 497       goto jquit;
 498    }
 499    if(n_poption & n_PO_QUICKRUN_MASK){
 500       n_exit_status = i;
 501       if(i == n_EXIT_OK && (!(n_poption & n_PO_EXISTONLY) ||
 502             (n_poption & n_PO_HEADERLIST)))
 503          print_header_summary(Larg);
 504       goto jquit;
 505    }
 506    temporary_folder_hook_check(FAL0);
 507
 508    if(i > 0 && !ok_blook(emptystart)){
 509       n_exit_status = n_EXIT_ERR;
 510       goto jleave;
 511    }
 512
 513    if(sigsetjmp(a_main__hdrjmp, 1) == 0){
 514       if((prevint = safe_signal(SIGINT, SIG_IGN)) != SIG_IGN)
 515          safe_signal(SIGINT, &a_main_hdrstop);
 516       if(!(n_poption & n_PO_N_FLAG)){
 517          if(!ok_blook(quiet))
 518             fprintf(n_stdout, _("%s version %s.  Type `?' for help\n"),
 519                (ok_blook(bsdcompat) ? "Mail" : n_uagent), ok_vlook(version));
 520          announce(1);
 521          fflush(n_stdout);
 522       }
 523       safe_signal(SIGINT, prevint);
 524    }
 525
 526    /* Enter the command loop */
 527    if(n_psonce & n_PSO_INTERACTIVE)
 528       n_tty_init();
 529    n_commands();
 530    if(n_psonce & n_PSO_INTERACTIVE)
 531       n_tty_destroy();
 532
 533    if(mb.mb_type == MB_FILE || mb.mb_type == MB_MAILDIR){
 534       safe_signal(SIGHUP, SIG_IGN);
 535       safe_signal(SIGINT, SIG_IGN);
 536       safe_signal(SIGQUIT, SIG_IGN);
 537    }
 538 jquit:
 539    save_mbox_for_possible_quitstuff();
 540    quit(FAL0);
 541 jleave:
 542    NYD_LEAVE;
 543    return n_exit_status;
 544 }
 545
 546 static void
 547 a_main_hdrstop(int signo){
 548    NYD_X; /* Signal handler */
 549    n_UNUSED(signo);
 550
 551    fflush(n_stdout);
 552    n_err_sighdl(_("\nInterrupt\n"));
 553    siglongjmp(a_main__hdrjmp, 1);
 554 }
 555
 556 int
 557 main(int argc, char *argv[]){
 558    /* Keep in SYNC: ./nail.1:"SYNOPSIS, main() */
 559    static char const
 560       optstr[] = "A:a:Bb:c:dEeFfHhiL:M:m:NnO:q:Rr:S:s:tu:VvX:::~#.",
 561       usagestr[] = N_(
 562          "Synopsis:\n"
 563          "  %s -h\n"
 564
 565          "  %s [-BdEFintv~] [-: spec] [-A account]\n"
 566          "\t [-a attachment] [-b bcc-addr] [-c cc-addr]\n"
 567          "\t [-M type | -m file | -q file | -t]\n"
 568          "\t [-r from-addr] [-S var[=value]..]\n"
 569          "\t [-s subject] [-X cmd] [-.] to-addr.. [-- mta-option..]\n"
 570
 571          "  %s [-BdEeHiNnRv~] [-: spec] [-A account]\n"
 572          "\t [-L spec-list] [-r from-addr] [-S var[=value]..]\n"
 573          "\t [-u user] [-X cmd] [-- mta-option..]\n"
 574
 575          "  %s [-BdEeHiNnRv~#] [-: spec] [-A account] -f\n"
 576          "\t [-L spec-list] [-r from-addr] [-S var[=value]..]\n"
 577          "\t [-X cmd] [file] [-- mta-option..]\n"
 578       );
 579 #define _USAGE_ARGS , n_progname, n_progname, n_progname, n_progname
 580
 581    int i;
 582    char *cp;
 583    enum{
 584       a_RF_NONE = 0,
 585       a_RF_SET = 1<<0,
 586       a_RF_SYSTEM = 1<<1,
 587       a_RF_USER = 1<<2,
 588       a_RF_ALL = a_RF_SYSTEM | a_RF_USER
 589    } resfiles;
 590    size_t oargs_size, oargs_cnt, Xargs_size, Xargs_cnt, smopts_size;
 591    char const *Aarg, *emsg, *folder, *Larg, *okey, **oargs, *qf,
 592       *subject, *uarg, **Xargs;
 593    struct attachment *attach;
 594    struct name *to, *cc, *bcc;
 595    struct a_arg *a_head, *a_curr;
 596    NYD_ENTER;
 597
 598    a_head = NULL;
 599    n_UNINIT(a_curr, NULL);
 600    to = cc = bcc = NULL;
 601    attach = NULL;
 602    Aarg = emsg = folder = Larg = okey = qf = subject = uarg = NULL;
 603    oargs = Xargs = NULL;
 604    oargs_size = oargs_cnt = Xargs_size = Xargs_cnt = smopts_size = 0;
 605    resfiles = a_RF_ALL;
 606
 607    /*
 608     * Start our lengthy setup, finalize by setting n_PSO_STARTED
 609     */
 610
 611    n_progname = argv[0];
 612    a_main_startup();
 613
 614    /* Command line parsing
 615     * Variable settings need to be done twice, since the user surely wants the
 616     * setting to take effect immediately, but also doesn't want it to be
 617     * overwritten from within resource files */
 618    while((i = a_main_getopt(argc, argv, optstr)) >= 0){
 619       switch(i){
 620       case 'A':
 621          /* Execute an account command later on */
 622          Aarg = a_main_oarg;
 623          break;
 624       case 'a':{
 625          struct a_arg *nap;
 626
 627          n_psonce |= n_PSO_SENDMODE;
 628          nap = salloc(sizeof(struct a_arg));
 629          if(a_head == NULL)
 630             a_head = nap;
 631          else
 632             a_curr->aa_next = nap;
 633          nap->aa_next = NULL;
 634          nap->aa_file = a_main_oarg;
 635          a_curr = nap;
 636       }  break;
 637       case 'B':
 638          n_OBSOLETE(_("-B is obsolete, please use -# as necessary"));
 639          break;
 640       case 'b':
 641          /* Get Blind Carbon Copy Recipient list */
 642          n_psonce |= n_PSO_SENDMODE;
 643          bcc = cat(bcc, lextract(a_main_oarg, GBCC | GFULL));
 644          break;
 645       case 'c':
 646          /* Get Carbon Copy Recipient list */
 647          n_psonce |= n_PSO_SENDMODE;
 648          cc = cat(cc, lextract(a_main_oarg, GCC | GFULL));
 649          break;
 650       case 'd':
 651          ok_bset(debug);
 652          okey = "debug";
 653          goto joarg;
 654       case 'E':
 655          n_OBSOLETE(_("-E will be removed, please use \"-Sskipemptybody\""));
 656          ok_bset(skipemptybody);
 657          okey = "skipemptybody";
 658          goto joarg;
 659       case 'e':
 660          n_poption |= n_PO_EXISTONLY;
 661          break;
 662       case 'F':
 663          n_poption |= n_PO_F_FLAG;
 664          n_psonce |= n_PSO_SENDMODE;
 665          break;
 666       case 'f':
 667          /* User is specifying file to "edit" with Mail, as opposed to reading
 668           * system mailbox.  If no argument is given, we read his mbox file.
 669           * Check for remaining arguments later */
 670          folder = "&";
 671          break;
 672       case 'H':
 673          n_poption |= n_PO_HEADERSONLY;
 674          break;
 675       case 'h':
 676          n_err(V_(usagestr) _USAGE_ARGS);
 677          goto j_leave;
 678       case 'i':
 679          /* Ignore interrupts */
 680          ok_bset(ignore);
 681          okey = "ignore";
 682          goto joarg;
 683       case 'L':
 684          Larg = a_main_oarg;
 685          n_poption |= n_PO_HEADERLIST;
 686          if(*Larg == '"' || *Larg == '\''){ /* TODO list.c:listspec_check() */
 687             size_t j;
 688
 689             j = strlen(++Larg);
 690             if(j > 0){
 691                cp = savestrbuf(Larg, --j);
 692                Larg = cp;
 693             }
 694          }
 695          break;
 696       case 'M':
 697          if(qf != NULL && (!(n_poption & n_PO_Mm_FLAG) || qf != (char*)-1))
 698             goto jeMmq;
 699          n_poption_arg_Mm = a_main_oarg;
 700          qf = (char*)-1;
 701          if(0){
 702             /* FALLTHRU*/
 703       case 'm':
 704             if(qf != NULL && (!(n_poption & n_PO_Mm_FLAG) || qf == (char*)-1))
 705                goto jeMmq;
 706             qf = a_main_oarg;
 707          }
 708          n_poption |= n_PO_Mm_FLAG;
 709          n_psonce |= n_PSO_SENDMODE;
 710          break;
 711       case 'N':
 712          /* Avoid initial header printing */
 713          ok_bclear(header);
 714          okey = "noheader";
 715          goto joarg;
 716       case 'n':
 717          /* Don't source "unspecified system start-up file" */
 718          if(resfiles & a_RF_SET){
 719             emsg = N_("-n cannot be used in conjunction with -:");
 720             goto jusage;
 721          }
 722          resfiles = a_RF_USER;
 723          break;
 724       case 'O':
 725          /* Additional options to pass-through to MTA TODO v15-compat legacy */
 726          if(n_smopts_cnt == smopts_size)
 727             smopts_size = a_main_grow_cpp(&n_smopts, smopts_size + 8,
 728                   n_smopts_cnt);
 729          n_smopts[n_smopts_cnt++] = a_main_oarg;
 730          break;
 731       case 'q':
 732          if(qf != NULL && (n_poption & n_PO_Mm_FLAG)){
 733 jeMmq:
 734             emsg = N_("Only one of -M, -m or -q may be given");
 735             goto jusage;
 736          }
 737          /* Quote file TODO drop? -Q with real quote?? what ? */
 738          n_psonce |= n_PSO_SENDMODE;
 739          /* Allow for now, we have to special check validity of -q- later on! */
 740          qf = (a_main_oarg[0] == '-' && a_main_oarg[1] == '\0')
 741                ? (char*)-1 : a_main_oarg;
 742          break;
 743       case 'R':
 744          /* Open folders read-only */
 745          n_poption |= n_PO_R_FLAG;
 746          break;
 747       case 'r':
 748          /* Set From address. */
 749          n_poption |= n_PO_r_FLAG;
 750          if(a_main_oarg[0] != '\0'){
 751             struct name *fa;
 752
 753             fa = nalloc(a_main_oarg, GSKIN | GFULL | GFULLEXTRA);
 754             if(is_addr_invalid(fa, EACM_STRICT | EACM_NOLOG)){
 755                emsg = N_("Invalid address argument with -r");
 756                goto jusage;
 757             }
 758             n_poption_arg_r = fa;
 759             /* TODO -r options is set in n_smopts, but may
 760              * TODO be overwritten by setting from= in
 761              * TODO an interactive session!
 762              * TODO Maybe disable setting of from?
 763              * TODO Warn user?  Update manual!! */
 764             okey = savecat("from=", fa->n_fullname);
 765             goto joarg;
 766          }
 767          break;
 768       case 'S':
 769          /* Set variable (TODO twice [only if successful]) */
 770          {  char const *a[2];
 771             bool_t b;
 772
 773             okey = a[0] = a_main_oarg;
 774             a[1] = NULL;
 775             n_pstate |= n_PS_ROBOT;
 776             b = (c_set(a) == 0);
 777             n_pstate &= ~n_PS_ROBOT;
 778             if(!b)
 779                break;
 780          }
 781 joarg:
 782          if(oargs_cnt == oargs_size)
 783             oargs_size = a_main_grow_cpp(&oargs, oargs_size + 8, oargs_cnt);
 784          oargs[oargs_cnt++] = okey;
 785          break;
 786       case 's':
 787          /* Subject:; take care for Debian #419840 and strip any \r and \n */
 788          if(n_anyof_cp("\n\r", subject = a_main_oarg)){
 789             n_err(_("-s: normalizing away invalid ASCII NL / CR bytes\n"));
 790             for(subject = cp = savestr(a_main_oarg); *cp != '\0'; ++cp)
 791                if(*cp == '\n' || *cp == '\r')
 792                   *cp = ' ';
 793          }
 794          n_psonce |= n_PSO_SENDMODE;
 795          break;
 796       case 't':
 797          /* Read defined set of headers from mail to be sent */
 798          n_poption |= n_PO_t_FLAG;
 799          n_psonce |= n_PSO_SENDMODE;
 800          break;
 801       case 'u':
 802          uarg = savecat("%", a_main_oarg);
 803          break;
 804       case 'V':
 805          fprintf(n_stdout, _("%s version %s\n"), n_uagent, ok_vlook(version));
 806          n_exit_status = n_EXIT_OK;
 807          goto j_leave;
 808       case 'v':
 809          /* Be verbose */
 810          ok_bset(verbose);
 811          okey = "verbose";
 812          goto joarg;
 813       case 'X':
 814          /* Add to list of commands to exec before entering normal operation */
 815          if(Xargs_cnt == Xargs_size)
 816             Xargs_size = a_main_grow_cpp(&Xargs, Xargs_size + 8, Xargs_cnt);
 817          Xargs[Xargs_cnt++] = a_main_oarg;
 818          break;
 819       case ':':
 820          /* Control which resource files shall be loaded */
 821          if(!(resfiles & (a_RF_SET | a_RF_SYSTEM))){
 822             emsg = N_("-n cannot be used in conjunction with -:");
 823             goto jusage;
 824          }
 825          resfiles = a_RF_SET;
 826          while((i = *a_main_oarg++) != '\0')
 827             switch(i){
 828             case 'S': case 's': resfiles |= a_RF_SYSTEM; break;
 829             case 'U': case 'u': resfiles |= a_RF_USER; break;
 830             case ':': case '/': resfiles &= ~a_RF_ALL; break;
 831             default:
 832                emsg = N_("Invalid argument of -:");
 833                goto jusage;
 834             }
 835          break;
 836       case '~':
 837          /* Enable command escapes even in non-interactive mode */
 838          n_poption |= n_PO_TILDE_FLAG;
 839          break;
 840       case '#':
 841          /* Work in batch mode, even if non-interactive */
 842          if(!(n_psonce & n_PSO_INTERACTIVE))
 843             setvbuf(n_stdin, NULL, _IOLBF, 0);
 844          n_poption |= n_PO_TILDE_FLAG | n_PO_BATCH_FLAG;
 845          if (oargs_cnt + 8 >= oargs_size)
 846             oargs_size = a_main_grow_cpp(&oargs, oargs_size + 9, oargs_cnt);
 847          folder = "/dev/null";
 848          ok_vset(MAIL, folder);
 849          ok_vset(MBOX, folder);
 850          ok_bset(emptystart);
 851          ok_bclear(header);
 852          ok_vset(inbox, folder);
 853          ok_bset(quiet);
 854          ok_bset(sendwait);
 855          ok_bset(typescript_mode);
 856          oargs[oargs_cnt + 0] = "MAIL=/dev/null";
 857          oargs[oargs_cnt + 1] = "MBOX=/dev/null";
 858          oargs[oargs_cnt + 2] = "emptystart";
 859          oargs[oargs_cnt + 3] = "noheader";
 860          oargs[oargs_cnt + 4] = "inbox=/dev/null";
 861          oargs[oargs_cnt + 5] = "quiet";
 862          oargs[oargs_cnt + 6] = "sendwait";
 863          oargs[oargs_cnt + 7] = "typescript-mode";
 864          oargs_cnt += 8;
 865          break;
 866       case '.':
 867          n_psonce |= n_PSO_SENDMODE;
 868          goto jgetopt_done;
 869       case '?':
 870 jusage:
 871          if(emsg != NULL)
 872             n_err("%s\n", V_(emsg));
 873          n_err(V_(usagestr) _USAGE_ARGS);
 874 #undef _USAGE_ARGS
 875          n_exit_status = n_EXIT_USE;
 876          goto j_leave;
 877       }
 878    }
 879 jgetopt_done:
 880    ;
 881
 882    /* The normal arguments may be followed by MTA arguments after a "--";
 883     * however, -f may take off an argument, too, and before that.
 884     * Since MTA arguments after "--" require *expandargv*, delay parsing off
 885     * those options until after the resource files are loaded... */
 886    if((cp = argv[i = a_main_oind]) == NULL)
 887       ;
 888    else if(cp[0] == '-' && cp[1] == '-' && cp[2] == '\0')
 889       ++i;
 890    /* n_PO_BATCH_FLAG sets to /dev/null, but -f can still be used and sets & */
 891    else if(folder != NULL && /*folder[0] == '&' &&*/ folder[1] == '\0'){
 892       folder = cp;
 893       if((cp = argv[++i]) != NULL){
 894          if(cp[0] != '-' || cp[1] != '-' || cp[2] != '\0'){
 895             emsg = N_("More than one file given with -f");
 896             goto jusage;
 897          }
 898          ++i;
 899       }
 900    }else{
 901       n_psonce |= n_PSO_SENDMODE;
 902       for(;;){
 903          to = cat(to, lextract(cp, GTO | GFULL));
 904          if((cp = argv[++i]) == NULL)
 905             break;
 906          if(cp[0] == '-' && cp[1] == '-' && cp[2] == '\0'){
 907             ++i;
 908             break;
 909          }
 910       }
 911    }
 912    a_main_oind = i;
 913
 914    /* ...BUT, since we use salloc() for the MTA n_smopts storage we need to
 915     * allocate the necessary space for them before we fixate that storage! */
 916    while(argv[i] != NULL)
 917       ++i;
 918    if(n_smopts_cnt + i > smopts_size)
 919       DBG(smopts_size =)
 920       a_main_grow_cpp(&n_smopts, n_smopts_cnt + i + 1, n_smopts_cnt);
 921
 922    /* Check for inconsistent arguments, fix some temporaries */
 923    if(n_psonce & n_PSO_SENDMODE){
 924       /* XXX This is only because BATCH_FLAG sets *folder*=/dev/null
 925        * XXX in order to function.  Ideally that would not be needed */
 926       if(folder != NULL && !(n_poption & n_PO_BATCH_FLAG)){
 927          emsg = N_("Cannot give -f and people to send to.");
 928          goto jusage;
 929       }
 930       if(uarg != NULL){
 931          emsg = N_("The -u option cannot be used in send mode");
 932          goto jusage;
 933       }
 934       if(!(n_poption & n_PO_t_FLAG) && to == NULL){
 935          emsg = N_("Send options without primary recipient specified.");
 936          goto jusage;
 937       }
 938       if((n_poption & n_PO_t_FLAG) && qf != NULL){
 939          emsg = N_("The -M, -m, -q and -t options are mutual exclusive.");
 940          goto jusage;
 941       }
 942       if(n_poption & (n_PO_EXISTONLY | n_PO_HEADERSONLY | n_PO_HEADERLIST)){
 943          emsg = N_("The -e, -H and -L options cannot be used in send mode.");
 944          goto jusage;
 945       }
 946       if(n_poption & n_PO_R_FLAG){
 947          emsg = N_("The -R option is meaningless in send mode.");
 948          goto jusage;
 949       }
 950
 951       if(n_psonce & n_PSO_INTERACTIVE){
 952          if(qf == (char*)-1){
 953             if(!(n_poption & n_PO_Mm_FLAG))
 954                emsg = N_("-q can't use standard input when interactive.\n");
 955             goto jusage;
 956          }
 957       }
 958    }else{
 959       if(uarg != NULL && folder != NULL){
 960          emsg = N_("The options -u and -f (and -#) are mutually exclusive");
 961          goto jusage;
 962       }
 963       if((n_poption & (n_PO_EXISTONLY | n_PO_HEADERSONLY)) ==
 964             (n_PO_EXISTONLY | n_PO_HEADERSONLY)){
 965          emsg = N_("The options -e and -H are mutual exclusive");
 966          goto jusage;
 967       }
 968       if((n_poption & (n_PO_HEADERSONLY | n_PO_HEADERLIST) /* TODO OBSOLETE */
 969             ) == (n_PO_HEADERSONLY | n_PO_HEADERLIST))
 970          n_OBSOLETE(_("please use \"-e -L xy\" instead of \"-H -L xy\""));
 971
 972       if(uarg != NULL)
 973          folder = uarg;
 974    }
 975
 976    /*
 977     * Likely to go, perform more setup
 978     */
 979
 980    a_main_setup_vars();
 981
 982    if(n_psonce & n_PSO_INTERACTIVE){
 983       a_main_setscreensize(0);
 984 #ifdef SIGWINCH
 985 # ifndef TTY_WANTS_SIGWINCH
 986       if(safe_signal(SIGWINCH, SIG_IGN) != SIG_IGN)
 987 # endif
 988          safe_signal(SIGWINCH, &a_main_setscreensize);
 989 #endif
 990    }else
 991       n_scrnheight = n_realscreenheight = 24, n_scrnwidth = 80;
 992
 993    /* Fixate the current snapshot of our global auto-reclaimed storage instance.
 994     * Memory is auto-reclaimed from now on */
 995    n_memory_autorec_fixate();
 996
 997    /* load() any resource files */
 998    if(resfiles & a_RF_ALL){
 999       /* *expand() returns a savestr(), but load only uses the file name for
1000        * fopen(), so it's safe to do this */
1001       if(resfiles & a_RF_SYSTEM){
1002          bool_t nload;
1003
1004          if((nload = ok_blook(NAIL_NO_SYSTEM_RC)))
1005             n_OBSOLETE(_("Please use $MAILX_NO_SYSTEM_RC instead of "
1006                "$NAIL_NO_SYSTEM_RC"));
1007          if(!nload && !ok_blook(MAILX_NO_SYSTEM_RC))
1008             n_load(VAL_SYSCONFDIR "/" VAL_SYSCONFRC);
1009       }
1010
1011       if(resfiles & a_RF_USER)
1012          n_load(fexpand(ok_vlook(MAILRC), FEXP_LOCAL | FEXP_NOPROTO));
1013
1014       if((cp = ok_vlook(NAIL_EXTRA_RC)) != NULL)
1015          n_OBSOLETE(_("Please use *mailx-extra-rc*, not *NAIL_EXTRA_RC*"));
1016       if(cp != NULL || (cp = ok_vlook(mailx_extra_rc)) != NULL)
1017          n_load(fexpand(cp, FEXP_LOCAL | FEXP_NOPROTO));
1018    }
1019
1020    /* Ensure the -S and other command line options take precedence over
1021     * anything that may have been placed in resource files.
1022     * Our "ternary binary" option *verbose* needs special treament */
1023    if((n_poption & (n_PO_VERB | n_PO_VERBVERB)) == n_PO_VERB)
1024       n_poption &= ~n_PO_VERB;
1025    /* ..and be silent when unsetting an undefined variable */
1026    n_pstate |= n_PS_ROBOT;
1027    for(i = 0; UICMP(z, i, <, oargs_cnt); ++i){
1028       char const *a[2];
1029
1030       a[0] = oargs[i];
1031       a[1] = NULL;
1032       c_set(a);
1033    }
1034    n_pstate &= ~n_PS_ROBOT;
1035
1036    /* Cause possible umask(2), now that any setting is established, and before
1037     * we change accounts, evaluate commands etc. */
1038    (void)ok_vlook(umask);
1039
1040    /* Additional options to pass-through to MTA, and allowed to do so? */
1041    if((cp = ok_vlook(expandargv)) != NULL){
1042       bool_t isfail, isrestrict;
1043
1044       isfail = !asccasecmp(cp, "fail");
1045       isrestrict = (!isfail && !asccasecmp(cp, "restrict"));
1046
1047       if((n_poption & n_PO_D_V) && !isfail && !isrestrict && *cp != '\0')
1048          n_err(_("Unknown *expandargv* value: %s\n"), cp);
1049
1050       if((cp = argv[i = a_main_oind]) != NULL){
1051          if(isfail || (isrestrict && (!(n_poption & n_PO_TILDE_FLAG) ||
1052                   !(n_psonce & n_PSO_INTERACTIVE)))){
1053             n_err(_("*expandargv* doesn't allow MTA arguments; consider "
1054                "using *sendmail-arguments*\n"));
1055             n_exit_status = n_EXIT_USE | n_EXIT_SEND_ERROR;
1056             goto jleave;
1057          }
1058          do{
1059             assert(n_smopts_cnt + 1 <= smopts_size);
1060             n_smopts[n_smopts_cnt++] = cp;
1061          }while((cp = argv[++i]) != NULL);
1062       }
1063    }
1064
1065    /* We had to wait until the resource files are loaded and any command line
1066     * setting has been restored, but get the termcap up and going before we
1067     * switch account or running commands */
1068 #ifdef n_HAVE_TCAP
1069    if((n_psonce & n_PSO_INTERACTIVE) && !(n_poption & n_PO_QUICKRUN_MASK))
1070       n_termcap_init();
1071 #endif
1072
1073    /* Now we can set the account */
1074    if(Aarg != NULL){
1075       char const *a[2];
1076
1077       a[0] = Aarg;
1078       a[1] = NULL;
1079       c_account(a);
1080    }
1081
1082    /* "load()" commands given on command line */
1083    if(Xargs_cnt > 0)
1084       n_load_Xargs(Xargs, Xargs_cnt);
1085
1086    /* Final tests */
1087    if(n_poption & n_PO_Mm_FLAG){
1088       if(qf == (char*)-1){
1089          if(!mime_type_check_mtname(n_poption_arg_Mm)){
1090             n_err(_("Could not find `mimetype' for -M argument: %s\n"),
1091                n_poption_arg_Mm);
1092             n_exit_status = n_EXIT_ERR;
1093             goto jleave;
1094          }
1095       }else if((n_poption_arg_Mm = mime_type_classify_filename(qf)) == NULL){
1096          n_err(_("Could not `mimetype'-classify -m argument: %s\n"),
1097             n_shexp_quote_cp(qf, FAL0));
1098          n_exit_status = n_EXIT_ERR;
1099          goto jleave;
1100       }else if(!asccasecmp(n_poption_arg_Mm, "text/plain")) /* TODO no: magic */
1101          n_poption_arg_Mm = NULL;
1102    }
1103
1104    /*
1105     * We're finally completely setup and ready to go
1106     */
1107    n_psonce |= n_PSO_STARTED;
1108
1109    if(!(n_psonce & n_PSO_SENDMODE)){
1110       n_exit_status = a_main_rcv_mode(folder, Larg);
1111       goto jleave;
1112    }
1113
1114    /* Now that full mailx(1)-style file expansion is possible handle the
1115     * attachments which we had delayed due to this.
1116     * This may use savestr(), but since we won't enter the command loop we
1117     * don't need to care about that */
1118    for(; a_head != NULL; a_head = a_head->aa_next){
1119       enum n_attach_error aerr;
1120
1121       attach = n_attachment_append(attach, a_head->aa_file, &aerr, NULL);
1122       if(aerr != n_ATTACH_ERR_NONE){
1123          n_exit_status = n_EXIT_ERR;
1124          goto jleave;
1125       }
1126    }
1127
1128    if(n_psonce & n_PSO_INTERACTIVE)
1129       n_tty_init();
1130    mail(to, cc, bcc, subject, attach, qf, ((n_poption & n_PO_F_FLAG) != 0));
1131    if(n_psonce & n_PSO_INTERACTIVE)
1132       n_tty_destroy();
1133
1134 jleave:
1135   /* Be aware of identical code for `exit' command! */
1136 #ifdef n_HAVE_TCAP
1137    if((n_psonce & n_PSO_INTERACTIVE) && !(n_poption & n_PO_QUICKRUN_MASK))
1138       n_termcap_destroy();
1139 #endif
1140
1141 j_leave:
1142 #ifdef HAVE_MEMORY_DEBUG
1143    n_memory_autorec_pop(NULL);
1144 #endif
1145 #if (defined HAVE_DEBUG || defined HAVE_DEVEL)
1146    n_memory_reset();
1147 #endif
1148    NYD_LEAVE;
1149    return n_exit_status;
1150 }
1151
1152 /* Source the others in that case! */
1153 #ifdef HAVE_AMALGAMATION
1154 # include "config.h"
1155 #endif
1156
1157 /* s-it-mode */