main.c

   1 /*
   2  * Copyright notice from original mutt:
   3  * Copyright (C) 1996-2002 Michael R. Elkins <me@mutt.org>
   4  * Copyright (C) 1999-2002 Thomas Roessler <roessler@does-not-exist.org>
   5  * Copyright (C) 2004 g10 Code GmbH
   6  *
   7  * Parts written/modified by:
   8  * Nico Golde <nion@muttng.org>
   9  * Andreas Krennmair <ak@synflood.at>
  10  *
  11  * This file is part of mutt-ng, see http://www.muttng.org/.
  12  * It's licensed under the GNU General Public License,
  13  * please see the file GPL in the top level source directory.
  14  */
  15
  16 #define MAIN_C 1
  17
  18 #if HAVE_CONFIG_H
  19 # include "config.h"
  20 #endif
  21
  22 #include <lib-lib/mem.h>
  23 #include <lib-lib/str.h>
  24 #include <lib-lib/macros.h>
  25 #include <lib-lib/file.h>
  26
  27 #include "mutt.h"
  28 #include "mx.h"
  29 #include "buffy.h"
  30 #include "sort.h"
  31 #include "mutt_crypt.h"
  32 #include "mutt_curses.h"
  33 #include "keymap.h"
  34 #include "url.h"
  35 #include "mutt_idna.h"
  36 #include "xterm.h"
  37
  38 #include "lib/debug.h"
  39
  40 #include <string.h>
  41 #include <stdlib.h>
  42 #include <locale.h>
  43 #include <unistd.h>
  44 #include <errno.h>
  45 #include <sys/stat.h>
  46 #include <sys/utsname.h>
  47
  48 #ifdef HAVE_GETOPT_H
  49 #include <getopt.h>
  50 #else
  51 extern char *optarg;
  52 extern int optind;
  53 #endif
  54
  55 #ifdef HAVE_LIBIDN
  56 #include <stringprep.h>
  57 #endif
  58
  59 #ifdef USE_NNTP
  60 #include "nntp/nntp.h"
  61 #endif
  62
  63 #ifdef USE_LIBESMTP
  64 #include <libesmtp.h>
  65 #endif
  66
  67 #ifdef USE_HCACHE
  68 #if HAVE_QDBM
  69 #include <depot.h>
  70 #elif HAVE_GDBM
  71 #include <gdbm.h>
  72 #elif HAVE_DB4
  73 #include <db.h>
  74 #endif
  75 #endif
  76
  77 #ifdef USE_GNUTLS
  78 #include <gnutls/gnutls.h>
  79 #endif
  80
  81 #ifdef CRYPT_BACKEND_GPGME
  82 #include <gpgme.h>
  83 #endif
  84
  85 #ifdef USE_SSL
  86 #include <openssl/opensslv.h>
  87 #endif
  88
  89 static const char *ReachingUs = N_("\
  90 To contact the developers, please mail to <mutt-ng-devel@lists.berlios.de>.\n\
  91 To visit the Mutt-ng homepage go to http://www.muttng.org.\n\
  92 To report a bug, please use the fleang(1) utility.\n");
  93
  94 static const char *Notice = N_("\
  95 Copyright (C) 1996-2002 Michael R. Elkins and others.\n\
  96 Mutt-ng comes with ABSOLUTELY NO WARRANTY; for details type `muttng -vv'.\n\
  97 Mutt is free software, and you are welcome to redistribute it\n\
  98 under certain conditions; type `muttng -vv' for details.\n");
  99
 100 static const char *Copyright_Mutt = N_("\
 101 Copyright (C) 1996-2004 Michael R. Elkins <me@mutt.org>\n\
 102 Copyright (C) 1996-2002 Brandon Long <blong@fiction.net>\n\
 103 Copyright (C) 1997-2005 Thomas Roessler <roessler@does-not-exist.org>\n\
 104 Copyright (C) 1998-2005 Werner Koch <wk@isil.d.shuttle.de>\n\
 105 Copyright (C) 1999-2005 Brendan Cully <brendan@kublai.com>\n\
 106 Copyright (C) 1999-2002 Tommi Komulainen <Tommi.Komulainen@iki.fi>\n\
 107 Copyright (C) 2000-2002 Edmund Grimley Evans <edmundo@rano.org>\n");
 108
 109 static const char *Copyright_Mutt_NG = N_("\
 110 Copyright (C) 2005:\n\
 111   Parts were written/modified by:\n\
 112      Andreas Krennmair <ak@synflood.at>\n\
 113      Nico Golde <nico@ngolde.de>\n\
 114      Rocco Rutte <pdmef@cs.tu-berlin.de>\n\
 115 \n\
 116 Lots of others not mentioned here contributed lots of code,\n\
 117 fixes, and suggestions.");
 118
 119 static const char* Copyright_GPL_1 = N_("\
 120 \n\
 121     This program is free software; you can redistribute it and/or modify\n\
 122     it under the terms of the GNU General Public License as published by\n\
 123     the Free Software Foundation; either version 2 of the License, or\n\
 124     (at your option) any later version.\n");
 125
 126 static const char* Copyright_GPL_2 = N_("\
 127     This program is distributed in the hope that it will be useful,\n\
 128     but WITHOUT ANY WARRANTY; without even the implied warranty of\n\
 129     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\n\
 130     GNU General Public License for more details.\n");
 131
 132 static const char* Copyright_GPL_3 = N_("\
 133     You should have received a copy of the GNU General Public License\n\
 134     along with this program; if not, write to the Free Software\n\
 135     Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.\n\
 136 ");
 137
 138 void mutt_exit (int code)
 139 {
 140   mutt_endwin (NULL);
 141   exit (code);
 142 }
 143
 144 static void mutt_usage (void)
 145 {
 146   puts (mutt_make_version (1));
 147
 148   puts
 149     _("usage: muttng [ -nRyzZ ] [ -e <cmd> ] [ -F <file> ] [ -m <type> ] [ -f <file> ]\n\
 150        muttng [ -nR ] [ -e <cmd> ] [ -F <file> ] -Q <query> [ -Q <query> ] [...]\n\
 151        muttng [ -nR ] [ -e <cmd> ] [ -F <file> ] -A <alias> [ -A <alias> ] [...]\n\
 152        muttng [ -nR ] [ -e <cmd> ] [ -F <file> ] -t");
 153   puts
 154     _("\
 155        muttng [ -nR ] [ -e <cmd> ] [ -F <file> ] -T\n\
 156        muttng [ -nx ] [ -e <cmd> ] [ -a <file> ] [ -F <file> ] [ -H <file> ] [ -i <file> ] [ -s <subj> ] [ -b <addr> ] [ -c <addr> ] <addr> [ ... ]\n\
 157        muttng [ -n ] [ -e <cmd> ] [ -F <file> ] -p\n\
 158        muttng -v[v]\n\
 159 \n\
 160 options:\n\
 161   -A <alias>\texpand the given alias\n\
 162   -a <file>\tattach a file to the message\n\
 163   -b <address>\tspecify a blind carbon-copy (BCC) address\n\
 164   -c <address>\tspecify a carbon-copy (CC) address");
 165 #if DEBUG
 166   puts _("  -d <level>\tlog debugging output to ~/.muttngdebug0");
 167 #endif
 168   puts _("\
 169   -e <command>\tspecify a command to be executed after initialization\n\
 170   -f <file>\tspecify which mailbox to read\n\
 171   -F <file>\tspecify an alternate muttrngc file\n\
 172   -g <server>\tspecify a newsserver (if compiled with NNTP)\n\
 173   -G\t\tselect a newsgroup (if compiled with NNTP)\n\
 174   -H <file>\tspecify a draft file to read header and body from\n\
 175   -i <file>\tspecify a file which Mutt-ng should include in the body");
 176   puts _("\
 177   -d <level>\t specify debugging level of Mutt-ng\n\
 178   -m <type>\tspecify a default mailbox type\n\
 179   -n\t\tcauses Mutt-ng not to read the system Muttngrc\n\
 180   -p\t\trecall a postponed message\n\
 181   -Q <variable>\tquery a configuration variable\n\
 182   -R\t\topen mailbox in read-only mode\n\
 183   -s <subj>\tspecify a subject (must be in quotes if it has spaces)");
 184   puts _("\
 185   -t\t\tprint the value of all variables to stdout\n\
 186   -T\t\tprint the value of all changed variables to stdout\n\
 187   -v\t\tshow version and compile-time definitions\n\
 188   -x\t\tsimulate the mailx send mode\n\
 189   -y\t\tselect a mailbox specified in your `mailboxes' list\n\
 190   -z\t\texit immediately if there are no messages in the mailbox\n\
 191   -Z\t\topen the first folder with new message, exit immediately if none\n\
 192   -h\t\tthis help message");
 193
 194   exit (0);
 195 }
 196
 197 static void show_version (void)
 198 {
 199   struct utsname uts;
 200 #ifdef USE_LIBESMTP
 201   char buf[STRING];
 202 #endif
 203
 204   puts (mutt_make_version (1));
 205   puts (_(Notice));
 206
 207   uname (&uts);
 208
 209 #ifdef _AIX
 210   printf ("System:\n  %s %s.%s", uts.sysname, uts.version, uts.release);
 211 #elif defined (SCO)
 212   printf ("System:\n  SCO %s", uts.release);
 213 #else
 214   printf ("System:\n  %s %s", uts.sysname, uts.release);
 215 #endif
 216
 217   printf (" (%s)\nExternal Libraries:\n", uts.machine);
 218
 219 #ifdef NCURSES_VERSION
 220   printf ("  ncurses %s\n", NCURSES_VERSION);
 221 #elif defined(USE_SLANG_CURSES)
 222   printf ("  slang %d\n", SLANG_VERSION);
 223 #endif
 224
 225 #ifdef _LIBICONV_VERSION
 226   printf ("  libiconv %d.%d\n", _LIBICONV_VERSION >> 8,
 227           _LIBICONV_VERSION & 0xff);
 228 #endif
 229
 230 #ifdef HAVE_LIBIDN
 231   printf ("  libidn %s (compiled with %s)\n",
 232           stringprep_check_version (NULL), STRINGPREP_VERSION);
 233 #endif
 234
 235 #ifdef USE_LIBESMTP
 236   smtp_version (buf, sizeof (buf), 0);
 237   printf ("  libESMTP %s\n", buf);
 238 #endif
 239
 240 #ifdef USE_HCACHE
 241 #if HAVE_QDBM
 242   printf ("  qdbm %s\n", dpversion);
 243 #elif HAVE_GDBM
 244   printf ("  gdbm %s\n", gdbm_version);
 245 #elif HAVE_DB4
 246   printf ("  DB4 %d.%d.%d\n", DB_VERSION_MAJOR, DB_VERSION_MINOR,
 247           DB_VERSION_PATCH);
 248 #endif
 249 #endif
 250
 251 #ifdef USE_GNUTLS
 252   printf ("  gnutls %s\n", LIBGNUTLS_VERSION);
 253 #endif
 254
 255 #ifdef USE_SSL
 256   printf ("  %s\n",OPENSSL_VERSION_TEXT);
 257 #endif
 258
 259 #ifdef CRYPT_BACKEND_GPGME
 260   printf ("  gpgme %s\n", GPGME_VERSION);
 261 #endif
 262
 263   puts (_("Compile Options:"));
 264
 265 #ifdef DEBUG
 266   puts ("  +DEBUG");
 267 #else
 268   puts ("  -DEBUG");
 269 #endif
 270
 271   puts (
 272 #ifdef HOMESPOOL
 273          "  +HOMESPOOL  "
 274 #else
 275          "  -HOMESPOOL  "
 276 #endif
 277 #ifdef USE_SETGID
 278          "+USE_SETGID  "
 279 #else
 280          "-USE_SETGID  "
 281 #endif
 282 #ifdef USE_DOTLOCK
 283          "+USE_DOTLOCK  "
 284 #else
 285          "-USE_DOTLOCK  "
 286 #endif
 287 #ifdef USE_FCNTL
 288          "+USE_FCNTL  "
 289 #else
 290          "-USE_FCNTL  "
 291 #endif
 292 #ifdef USE_FLOCK
 293          "+USE_FLOCK   "
 294 #else
 295          "-USE_FLOCK   "
 296 #endif
 297 #ifdef USE_INODESORT
 298          "+USE_INODESORT   "
 299 #else
 300          "-USE_INODESORT   "
 301 #endif
 302 #ifdef USE_HCACHE
 303          "+USE_HCACHE  "
 304 #else
 305          "-USE_HCACHE  "
 306 #endif
 307     );
 308   puts (
 309 #ifdef USE_POP
 310          "  +USE_POP  "
 311 #else
 312          "  -USE_POP  "
 313 #endif
 314 #ifdef USE_NNTP
 315          "+USE_NNTP  "
 316 #else
 317          "-USE_NNTP  "
 318 #endif
 319 #ifdef USE_IMAP
 320          "+USE_IMAP  "
 321 #else
 322          "-USE_IMAP  "
 323 #endif
 324 #ifdef USE_GSS
 325          "+USE_GSS  "
 326 #else
 327          "-USE_GSS  "
 328 #endif
 329 #ifdef USE_SSL
 330          "+USE_SSL  "
 331 #else
 332          "-USE_SSL  "
 333 #endif
 334 #ifdef USE_GNUTLS
 335          "+USE_GNUTLS  "
 336 #else
 337          "-USE_GNUTLS  "
 338 #endif
 339 #ifdef USE_SASL
 340          "+USE_SASL  "
 341 #else
 342          "-USE_SASL  "
 343 #endif
 344 #ifdef USE_LIBESMTP
 345          "+USE_LIBESMTP  "
 346 #else
 347          "-USE_LIBESMTP  "
 348 #endif
 349          "\n  "
 350 #ifdef HAVE_REGCOMP
 351          "+HAVE_REGCOMP  "
 352 #else
 353          "-HAVE_REGCOMP  "
 354 #endif
 355 #ifdef USE_GNU_REGEX
 356          "+USE_GNU_REGEX  "
 357 #else
 358          "-USE_GNU_REGEX  "
 359 #endif
 360 #ifdef USE_COMPRESSED
 361          "+COMPRESSED  "
 362 #else
 363          "-COMPRESSED  "
 364 #endif
 365          "\n  "
 366 #ifdef HAVE_COLOR
 367          "+HAVE_COLOR  "
 368 #else
 369          "-HAVE_COLOR  "
 370 #endif
 371 #ifdef HAVE_START_COLOR
 372          "+HAVE_START_COLOR  "
 373 #else
 374          "-HAVE_START_COLOR  "
 375 #endif
 376 #ifdef HAVE_TYPEAHEAD
 377          "+HAVE_TYPEAHEAD  "
 378 #else
 379          "-HAVE_TYPEAHEAD  "
 380 #endif
 381 #ifdef HAVE_BKGDSET
 382          "+HAVE_BKGDSET  "
 383 #else
 384          "-HAVE_BKGDSET  "
 385 #endif
 386          "\n  "
 387 #ifdef HAVE_CURS_SET
 388          "+HAVE_CURS_SET  "
 389 #else
 390          "-HAVE_CURS_SET  "
 391 #endif
 392 #ifdef HAVE_META
 393          "+HAVE_META  "
 394 #else
 395          "-HAVE_META  "
 396 #endif
 397 #ifdef HAVE_RESIZETERM
 398          "+HAVE_RESIZETERM  "
 399 #else
 400          "-HAVE_RESIZETERM  "
 401 #endif
 402     );
 403
 404   puts (
 405 #ifdef CRYPT_BACKEND_CLASSIC_PGP
 406          "  +CRYPT_BACKEND_CLASSIC_PGP  "
 407 #else
 408          "  -CRYPT_BACKEND_CLASSIC_PGP  "
 409 #endif
 410 #ifdef CRYPT_BACKEND_CLASSIC_SMIME
 411          "+CRYPT_BACKEND_CLASSIC_SMIME  "
 412 #else
 413          "-CRYPT_BACKEND_CLASSIC_SMIME  "
 414 #endif
 415 #ifdef CRYPT_BACKEND_GPGME
 416          "+CRYPT_BACKEND_GPGME  "
 417 #else
 418          "-CRYPT_BACKEND_GPGME  "
 419 #endif
 420 #ifdef BUFFY_SIZE
 421          "+BUFFY_SIZE "
 422 #else
 423          "-BUFFY_SIZE "
 424 #endif
 425 #ifdef SUN_ATTACHMENT
 426          "+SUN_ATTACHMENT  "
 427 #else
 428          "-SUN_ATTACHMENT  "
 429 #endif
 430          "\n  "
 431 #ifdef ENABLE_NLS
 432          "+ENABLE_NLS  "
 433 #else
 434          "-ENABLE_NLS  "
 435 #endif
 436 #ifdef LOCALES_HACK
 437          "+LOCALES_HACK  "
 438 #else
 439          "-LOCALES_HACK  "
 440 #endif
 441 #ifdef HAVE_WC_FUNCS
 442          "+HAVE_WC_FUNCS  "
 443 #else
 444          "-HAVE_WC_FUNCS  "
 445 #endif
 446 #ifdef HAVE_LANGINFO_CODESET
 447          "+HAVE_LANGINFO_CODESET  "
 448 #else
 449          "-HAVE_LANGINFO_CODESET  "
 450 #endif
 451 #ifdef HAVE_LANGINFO_YESEXPR
 452          "+HAVE_LANGINFO_YESEXPR  "
 453 #else
 454          "-HAVE_LANGINFO_YESEXPR  "
 455 #endif
 456          "\n  "
 457 #if HAVE_ICONV
 458          "+HAVE_ICONV  "
 459 #else
 460          "-HAVE_ICONV  "
 461 #endif
 462 #if ICONV_NONTRANS
 463          "+ICONV_NONTRANS  "
 464 #else
 465          "-ICONV_NONTRANS  "
 466 #endif
 467 #if HAVE_LIBIDN
 468          "+HAVE_LIBIDN  "
 469 #else
 470          "-HAVE_LIBIDN  "
 471 #endif
 472 #if HAVE_GETSID
 473          "+HAVE_GETSID  "
 474 #else
 475          "-HAVE_GETSID  "
 476 #endif
 477 #if HAVE_GETADDRINFO
 478          "+HAVE_GETADDRINFO  "
 479 #else
 480          "-HAVE_GETADDRINFO  "
 481 #endif
 482     );
 483
 484   puts (_("Built-In Defaults:"));
 485
 486 #ifdef DOMAIN
 487   printf ("  +DOMAIN=\"%s\"\n", DOMAIN);
 488 #else
 489   puts ("  -DOMAIN");
 490 #endif
 491
 492 #ifdef ISPELL
 493   printf ("  +ISPELL=\"%s\"\n", ISPELL);
 494 #else
 495   puts ("  -ISPELL");
 496 #endif
 497
 498   printf ("  +SENDMAIL=\"%s\"\n", SENDMAIL);
 499   printf ("  +MAILPATH=\"%s\"\n", MAILPATH);
 500   printf ("  +PKGDATADIR=\"%s\"\n", PKGDATADIR);
 501   printf ("  +PKGDOCDIR=\"%s\"\n", PKGDOCDIR);
 502   printf ("  +SYSCONFDIR=\"%s\"\n", SYSCONFDIR);
 503   printf ("  +EXECSHELL=\"%s\"\n", EXECSHELL);
 504 #ifdef MIXMASTER
 505   printf ("  +MIXMASTER=\"%s\"\n\n", MIXMASTER);
 506 #else
 507   puts ("  -MIXMASTER\n");
 508 #endif
 509
 510   puts (_(ReachingUs));
 511
 512   puts (_("MadMutt is based on Mutt-ng wich was based on Mutt before\n"));
 513
 514   exit (0);
 515 }
 516
 517 static void start_curses (void)
 518 {
 519   km_init ();                   /* must come before mutt_init */
 520
 521 #ifdef USE_SLANG_CURSES
 522   SLtt_Ignore_Beep = 1;         /* don't do that #*$@^! annoying visual beep! */
 523   SLsmg_Display_Eight_Bit = 128;        /* characters above this are printable */
 524   SLtt_set_color (0, NULL, "default", "default");
 525 #else
 526   /* should come before initscr() so that ncurses 4.2 doesn't try to install
 527      its own SIGWINCH handler */
 528   mutt_signal_init ();
 529 #endif
 530   if (initscr () == NULL) {
 531     puts _("Error initializing terminal.");
 532
 533     exit (1);
 534   }
 535 #if 1                           /* USE_SLANG_CURSES  - commenting out suggested in #455. */
 536   /* slang requires the signal handlers to be set after initializing */
 537   mutt_signal_init ();
 538 #endif
 539   ci_start_color ();
 540   keypad (stdscr, TRUE);
 541   cbreak ();
 542   noecho ();
 543 #if HAVE_TYPEAHEAD
 544   typeahead (-1);               /* simulate smooth scrolling */
 545 #endif
 546 #if HAVE_META
 547   meta (stdscr, TRUE);
 548 #endif
 549 }
 550
 551 #define M_IGNORE  (1<<0)        /* -z */
 552 #define M_BUFFY   (1<<1)        /* -Z */
 553 #define M_NOSYSRC (1<<2)        /* -n */
 554 #define M_RO      (1<<3)        /* -R */
 555 #define M_SELECT  (1<<4)        /* -y */
 556 #ifdef USE_NNTP
 557 #define M_NEWS    (1<<5)        /* -g and -G */
 558 #endif
 559
 560 int main (int argc, char **argv)
 561 {
 562   char folder[_POSIX_PATH_MAX] = "";
 563   char *subject = NULL;
 564   char *includeFile = NULL;
 565   char *draftFile = NULL;
 566   char *newMagic = NULL;
 567   HEADER *msg = NULL;
 568   LIST *attach = NULL;
 569   LIST *commands = NULL;
 570   LIST *queries = NULL;
 571   LIST *alias_queries = NULL;
 572   int sendflags = 0;
 573   int flags = 0;
 574   int version = 0;
 575   int i;
 576   int explicit_folder = 0;
 577   int dump_variables = -1;
 578
 579   /* initialize random number for tmp file creation */
 580   srand ((unsigned int) time (NULL));
 581
 582   /* sanity check against stupid administrators */
 583
 584   if (getegid () != getgid ()) {
 585     fprintf (stderr, "%s: I don't want to run with privileges!\n", argv[0]);
 586     exit (1);
 587   }
 588
 589 #ifdef ENABLE_NLS
 590   /* FIXME what about init.c:1439 ? */
 591   setlocale (LC_ALL, "");
 592   bindtextdomain (PACKAGE, MUTTLOCALEDIR);
 593   textdomain (PACKAGE);
 594 #endif
 595
 596   setlocale (LC_CTYPE, "");
 597
 598   mutt_error = mutt_nocurses_error;
 599   mutt_message = mutt_nocurses_error;
 600   SRAND (time (NULL));
 601   umask (077);
 602
 603   p_clear(Options, sizeof(Options));
 604   p_clear(QuadOptions, sizeof(QuadOptions));
 605
 606 #ifdef USE_NNTP
 607   while ((i =
 608           getopt (argc, argv,
 609                   "A:a:b:F:f:c:d:e:g:GH:s:i:hm:npQ:RTtvxyzZ")) != EOF)
 610 #else
 611   while ((i =
 612           getopt (argc, argv, "A:a:b:F:f:c:d:e:H:s:i:hm:npQ:RTtvxyzZ")) != EOF)
 613 #endif
 614     switch (i) {
 615     case 'A':
 616       alias_queries = mutt_add_list (alias_queries, optarg);
 617       break;
 618     case 'a':
 619       if (strlen(optarg)<=512)
 620         attach = mutt_add_list (attach, optarg);
 621       else{
 622         printf("too long arguments. exiting ...\n");
 623         exit(1);
 624       }
 625       break;
 626
 627     case 'F':
 628       m_strreplace(&Muttrc, optarg);
 629       break;
 630
 631     case 'f':
 632       m_strcpy(folder, sizeof(folder), optarg);
 633       explicit_folder = 1;
 634       break;
 635
 636     case 'b':
 637     case 'c':
 638       if (!msg)
 639         msg = mutt_new_header ();
 640       if (!msg->env)
 641         msg->env = mutt_new_envelope ();
 642       if (i == 'b')
 643         msg->env->bcc = rfc822_parse_adrlist (msg->env->bcc, optarg);
 644       else
 645         msg->env->cc = rfc822_parse_adrlist (msg->env->cc, optarg);
 646       break;
 647
 648     case 'd':
 649       {
 650         char buf[LONG_STRING];
 651         int level = atoi (optarg);
 652
 653         snprintf (buf, sizeof (buf), "set debug_level=%d", level);
 654         commands = mutt_add_list (commands, buf);
 655         debug_setlevel (level);
 656       }
 657       break;
 658
 659     case 't':
 660       dump_variables = 2;
 661       break;
 662
 663     case 'T':
 664       dump_variables = 1;
 665       break;
 666
 667     case 'e':
 668       commands = mutt_add_list (commands, optarg);
 669       break;
 670
 671     case 'H':
 672       draftFile = optarg;
 673       break;
 674
 675     case 'i':
 676       includeFile = optarg;
 677       break;
 678
 679     case 'm':
 680       /* should take precedence over .muttrc setting, so save it for later */
 681       newMagic = optarg;
 682       break;
 683
 684     case 'n':
 685       flags |= M_NOSYSRC;
 686       break;
 687
 688     case 'p':
 689       sendflags |= SENDPOSTPONED;
 690       break;
 691
 692     case 'Q':
 693       queries = mutt_add_list (queries, optarg);
 694       break;
 695
 696     case 'R':
 697       flags |= M_RO;            /* read-only mode */
 698       break;
 699
 700     case 's':
 701       subject = optarg;
 702       break;
 703
 704     case 'v':
 705       version++;
 706       break;
 707
 708     case 'x':                  /* mailx compatible send mode */
 709       sendflags |= SENDMAILX;
 710       break;
 711
 712     case 'y':                  /* My special hack mode */
 713       flags |= M_SELECT;
 714       break;
 715
 716 #ifdef USE_NNTP
 717     case 'g':                  /* Specify a newsserver */
 718       {
 719         char buf[LONG_STRING];
 720
 721         snprintf (buf, sizeof (buf), "set nntp_host=%s", optarg);
 722         commands = mutt_add_list (commands, buf);
 723       }
 724
 725     case 'G':                  /* List of newsgroups */
 726       flags |= M_SELECT | M_NEWS;
 727       break;
 728 #endif
 729
 730     case 'z':
 731       flags |= M_IGNORE;
 732       break;
 733
 734     case 'Z':
 735       flags |= M_BUFFY | M_IGNORE;
 736       break;
 737
 738     default:
 739       mutt_usage ();
 740     }
 741
 742   switch (version) {
 743   case 0:
 744     break;
 745   case 1:
 746     show_version ();
 747     break;
 748   default:
 749     puts (mutt_make_version (1));
 750     puts (_(Copyright_Mutt));
 751     puts (_(Copyright_Mutt_NG));
 752     puts (_(Copyright_GPL_1));
 753     puts (_(Copyright_GPL_2));
 754     puts (_(Copyright_GPL_3));
 755     puts (_(ReachingUs));
 756     exit (0);
 757   }
 758
 759   /* Check for a batch send. */
 760   if (!isatty (0) || queries || alias_queries || dump_variables > 0) {
 761     set_option (OPTNOCURSES);
 762     sendflags = SENDBATCH;
 763   }
 764
 765   /* This must come before mutt_init() because curses needs to be started
 766      before calling the init_pair() function to set the color scheme.  */
 767   if (!option (OPTNOCURSES))
 768     start_curses ();
 769
 770   /* set defaults and read init files */
 771   mx_init ();
 772   mutt_init (flags & M_NOSYSRC, commands);
 773   mutt_free_list (&commands);
 774
 775   /* Initialize crypto */
 776   crypt_init ();
 777
 778   if (queries)
 779     return mutt_query_variables (queries);
 780   if (dump_variables > 0)
 781     return (mutt_dump_variables (dump_variables-1));
 782
 783   if (alias_queries) {
 784     int rv = 0;
 785     address_t *a;
 786
 787     for (; alias_queries; alias_queries = alias_queries->next) {
 788       if ((a = mutt_lookup_alias (alias_queries->data))) {
 789         /* output in machine-readable form */
 790         mutt_addrlist_to_idna (a, NULL);
 791         mutt_write_address_list (a, stdout, 0, 0);
 792       }
 793       else {
 794         rv = 1;
 795         printf ("%s\n", alias_queries->data);
 796       }
 797     }
 798     return rv;
 799   }
 800
 801   if (newMagic)
 802     mx_set_magic (newMagic);
 803
 804   if (!option (OPTNOCURSES)) {
 805     SETCOLOR (MT_COLOR_NORMAL);
 806     clear ();
 807     mutt_error = mutt_curses_error;
 808     mutt_message = mutt_curses_message;
 809   }
 810
 811   /* Create the Maildir directory if it doesn't exist. */
 812   if (!option (OPTNOCURSES) && Maildir) {
 813     struct stat sb;
 814     char fpath[_POSIX_PATH_MAX];
 815     char msg[STRING];
 816
 817     m_strcpy(fpath, sizeof(fpath), Maildir);
 818     mutt_expand_path (fpath, sizeof (fpath));
 819 #ifdef USE_IMAP
 820     /* we're not connected yet - skip mail folder creation */
 821     if (mx_get_magic (fpath) != M_IMAP)
 822 #endif
 823       if (stat (fpath, &sb) == -1 && errno == ENOENT) {
 824         snprintf (msg, sizeof (msg), _("%s does not exist. Create it?"),
 825                   Maildir);
 826         if (mutt_yesorno (msg, M_YES) == M_YES) {
 827           if (mkdir (fpath, 0700) == -1 && errno != EEXIST)
 828             mutt_error (_("Can't create %s: %s."), Maildir, strerror (errno));
 829         }
 830       }
 831   }
 832
 833   if (sendflags & SENDPOSTPONED) {
 834     if (!option (OPTNOCURSES))
 835       mutt_flushinp ();
 836     ci_send_message (SENDPOSTPONED, NULL, NULL, NULL, NULL);
 837     mutt_endwin (NULL);
 838   }
 839   else if (subject || msg || sendflags || draftFile || includeFile || attach
 840            || optind < argc) {
 841     FILE *fin = NULL;
 842     char buf[LONG_STRING];
 843     char *tempfile = NULL, *infile = NULL;
 844     char *bodytext = NULL;
 845
 846     if (!option (OPTNOCURSES))
 847       mutt_flushinp ();
 848
 849     if (!msg)
 850       msg = mutt_new_header ();
 851
 852     if (draftFile)
 853       infile = draftFile;
 854     else {
 855       if (!msg->env)
 856         msg->env = mutt_new_envelope ();
 857
 858       for (i = optind; i < argc; i++) {
 859         if (url_check_scheme (argv[i]) == U_MAILTO)
 860           url_parse_mailto (msg->env, &bodytext, argv[i]);
 861         else
 862           msg->env->to = rfc822_parse_adrlist (msg->env->to, argv[i]);
 863       }
 864
 865       if (option (OPTAUTOEDIT) && !msg->env->to && !msg->env->cc) {
 866         if (!option (OPTNOCURSES))
 867           mutt_endwin (NULL);
 868         fputs (_("No recipients specified.\n"), stderr);
 869         exit (1);
 870       }
 871
 872       if (subject)
 873         msg->env->subject = m_strdup(subject);
 874
 875       if (includeFile)
 876         infile = includeFile;
 877     }
 878
 879     if (infile || bodytext) {
 880       if (infile) {
 881         if (m_strcmp("-", infile) == 0)
 882           fin = stdin;
 883         else {
 884           char path[_POSIX_PATH_MAX];
 885
 886           m_strcpy(path, sizeof(path), infile);
 887           mutt_expand_path (path, sizeof (path));
 888           if ((fin = fopen (path, "r")) == NULL) {
 889             if (!option (OPTNOCURSES))
 890               mutt_endwin (NULL);
 891             perror (path);
 892             exit (1);
 893           }
 894         }
 895       }
 896       else
 897         fin = NULL;
 898
 899       mutt_mktemp (buf);
 900       tempfile = m_strdup(buf);
 901
 902       if (draftFile)
 903         msg->env = mutt_read_rfc822_header (fin, NULL, 1, 0);
 904
 905       /* is the following if still needed? */
 906
 907       if (tempfile) {
 908         FILE *fout;
 909
 910         if ((fout = safe_fopen (tempfile, "w")) == NULL) {
 911           if (!option (OPTNOCURSES))
 912             mutt_endwin (NULL);
 913           perror (tempfile);
 914           fclose (fin);
 915           p_delete(&tempfile);
 916           exit (1);
 917         }
 918         if (fin)
 919           mutt_copy_stream (fin, fout);
 920         else if (bodytext)
 921           fputs (bodytext, fout);
 922         fclose (fout);
 923         if (fin && fin != stdin)
 924           fclose (fin);
 925       }
 926     }
 927
 928     p_delete(&bodytext);
 929
 930     if (attach) {
 931       LIST *t = attach;
 932       BODY *a = NULL;
 933
 934       while (t) {
 935         if (a) {
 936           a->next = mutt_make_file_attach (t->data);
 937           a = a->next;
 938         }
 939         else
 940           msg->content = a = mutt_make_file_attach (t->data);
 941         if (!a) {
 942           if (!option (OPTNOCURSES))
 943             mutt_endwin (NULL);
 944           fprintf (stderr, _("%s: unable to attach file.\n"), t->data);
 945           mutt_free_list (&attach);
 946           exit (1);
 947         }
 948         t = t->next;
 949       }
 950       mutt_free_list (&attach);
 951     }
 952
 953     ci_send_message (sendflags, msg, tempfile, NULL, NULL);
 954
 955     if (!option (OPTNOCURSES))
 956       mutt_endwin (NULL);
 957   }
 958   else {
 959     if (flags & M_BUFFY) {
 960       if (!buffy_check (0)) {
 961         mutt_endwin _("No mailbox with new mail.");
 962
 963         exit (1);
 964       }
 965       folder[0] = 0;
 966       buffy_next (folder, sizeof (folder));
 967     }
 968     else if (flags & M_SELECT) {
 969 #ifdef USE_NNTP
 970       if (flags & M_NEWS) {
 971         set_option (OPTNEWS);
 972         if (!(CurrentNewsSrv = mutt_select_newsserver (NewsServer))) {
 973           mutt_endwin (Errorbuf);
 974           exit (1);
 975         }
 976       }
 977       else
 978 #endif
 979       if (!Incoming) {
 980         mutt_endwin _("No incoming mailboxes defined.");
 981
 982         exit (1);
 983       }
 984       folder[0] = 0;
 985       mutt_select_file (folder, sizeof (folder), M_SEL_FOLDER | M_SEL_BUFFY);
 986       if (!folder[0]) {
 987         mutt_endwin (NULL);
 988         exit (0);
 989       }
 990     }
 991
 992     if (!folder[0])
 993       m_strcpy(folder, sizeof(folder), NONULL(Spoolfile));
 994
 995 #ifdef USE_NNTP
 996     if (option (OPTNEWS)) {
 997       unset_option (OPTNEWS);
 998       nntp_expand_path (folder, sizeof (folder),
 999                         &CurrentNewsSrv->conn->account);
1000     }
1001     else
1002 #endif
1003       mutt_expand_path (folder, sizeof (folder));
1004
1005     m_strreplace(&CurrentFolder, folder);
1006     m_strreplace(&LastFolder, folder);
1007
1008     if (flags & M_IGNORE) {
1009       /* check to see if there are any messages in the folder */
1010       switch (mx_check_empty (folder)) {
1011       case -1:
1012         mutt_endwin (strerror (errno));
1013         exit (1);
1014       case 1:
1015         mutt_endwin _("Mailbox is empty.");
1016         exit (1);
1017       }
1018     }
1019
1020     mutt_folder_hook (folder);
1021
1022     if ((Context = mx_open_mailbox (folder, ((flags & M_RO)
1023                                              || option (OPTREADONLY)) ?
1024                                     M_READONLY : 0, NULL))
1025         || !explicit_folder) {
1026       mutt_index_menu ();
1027       if (option (OPTXTERMSETTITLES))
1028         mutt_xterm_set_title (NONULL (XtermLeave));
1029       if (Context)
1030         p_delete(&Context);
1031     }
1032     mutt_endwin (Errorbuf);
1033   }
1034
1035   exit (0);
1036 }