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          "\n  "
 361 #ifdef HAVE_COLOR
 362          "+HAVE_COLOR  "
 363 #else
 364          "-HAVE_COLOR  "
 365 #endif
 366 #ifdef HAVE_START_COLOR
 367          "+HAVE_START_COLOR  "
 368 #else
 369          "-HAVE_START_COLOR  "
 370 #endif
 371 #ifdef HAVE_TYPEAHEAD
 372          "+HAVE_TYPEAHEAD  "
 373 #else
 374          "-HAVE_TYPEAHEAD  "
 375 #endif
 376 #ifdef HAVE_BKGDSET
 377          "+HAVE_BKGDSET  "
 378 #else
 379          "-HAVE_BKGDSET  "
 380 #endif
 381          "\n  "
 382 #ifdef HAVE_CURS_SET
 383          "+HAVE_CURS_SET  "
 384 #else
 385          "-HAVE_CURS_SET  "
 386 #endif
 387 #ifdef HAVE_META
 388          "+HAVE_META  "
 389 #else
 390          "-HAVE_META  "
 391 #endif
 392 #ifdef HAVE_RESIZETERM
 393          "+HAVE_RESIZETERM  "
 394 #else
 395          "-HAVE_RESIZETERM  "
 396 #endif
 397     );
 398
 399   puts (
 400 #ifdef CRYPT_BACKEND_GPGME
 401          "+CRYPT_BACKEND_GPGME  "
 402 #else
 403          "-CRYPT_BACKEND_GPGME  "
 404 #endif
 405 #ifdef BUFFY_SIZE
 406          "+BUFFY_SIZE "
 407 #else
 408          "-BUFFY_SIZE "
 409 #endif
 410          "\n  "
 411 #ifdef ENABLE_NLS
 412          "+ENABLE_NLS  "
 413 #else
 414          "-ENABLE_NLS  "
 415 #endif
 416 #ifdef LOCALES_HACK
 417          "+LOCALES_HACK  "
 418 #else
 419          "-LOCALES_HACK  "
 420 #endif
 421 #ifdef HAVE_WC_FUNCS
 422          "+HAVE_WC_FUNCS  "
 423 #else
 424          "-HAVE_WC_FUNCS  "
 425 #endif
 426 #ifdef HAVE_LANGINFO_CODESET
 427          "+HAVE_LANGINFO_CODESET  "
 428 #else
 429          "-HAVE_LANGINFO_CODESET  "
 430 #endif
 431 #ifdef HAVE_LANGINFO_YESEXPR
 432          "+HAVE_LANGINFO_YESEXPR  "
 433 #else
 434          "-HAVE_LANGINFO_YESEXPR  "
 435 #endif
 436          "\n  "
 437 #if HAVE_ICONV
 438          "+HAVE_ICONV  "
 439 #else
 440          "-HAVE_ICONV  "
 441 #endif
 442 #if ICONV_NONTRANS
 443          "+ICONV_NONTRANS  "
 444 #else
 445          "-ICONV_NONTRANS  "
 446 #endif
 447 #if HAVE_LIBIDN
 448          "+HAVE_LIBIDN  "
 449 #else
 450          "-HAVE_LIBIDN  "
 451 #endif
 452 #if HAVE_GETSID
 453          "+HAVE_GETSID  "
 454 #else
 455          "-HAVE_GETSID  "
 456 #endif
 457 #if HAVE_GETADDRINFO
 458          "+HAVE_GETADDRINFO  "
 459 #else
 460          "-HAVE_GETADDRINFO  "
 461 #endif
 462     );
 463
 464   puts (_("Built-In Defaults:"));
 465
 466 #ifdef DOMAIN
 467   printf ("  +DOMAIN=\"%s\"\n", DOMAIN);
 468 #else
 469   puts ("  -DOMAIN");
 470 #endif
 471
 472 #ifdef ISPELL
 473   printf ("  +ISPELL=\"%s\"\n", ISPELL);
 474 #else
 475   puts ("  -ISPELL");
 476 #endif
 477
 478   printf ("  +SENDMAIL=\"%s\"\n", SENDMAIL);
 479   printf ("  +MAILPATH=\"%s\"\n", MAILPATH);
 480   printf ("  +PKGDATADIR=\"%s\"\n", PKGDATADIR);
 481   printf ("  +PKGDOCDIR=\"%s\"\n", PKGDOCDIR);
 482   printf ("  +SYSCONFDIR=\"%s\"\n", SYSCONFDIR);
 483   printf ("  +EXECSHELL=\"%s\"\n", EXECSHELL);
 484 #ifdef MIXMASTER
 485   printf ("  +MIXMASTER=\"%s\"\n\n", MIXMASTER);
 486 #else
 487   puts ("  -MIXMASTER\n");
 488 #endif
 489
 490   puts (_(ReachingUs));
 491
 492   puts (_("MadMutt is based on Mutt-ng wich was based on Mutt before\n"));
 493
 494   exit (0);
 495 }
 496
 497 static void start_curses (void)
 498 {
 499   km_init ();                   /* must come before mutt_init */
 500
 501 #ifdef USE_SLANG_CURSES
 502   SLtt_Ignore_Beep = 1;         /* don't do that #*$@^! annoying visual beep! */
 503   SLsmg_Display_Eight_Bit = 128;        /* characters above this are printable */
 504   SLtt_set_color (0, NULL, "default", "default");
 505 #else
 506   /* should come before initscr() so that ncurses 4.2 doesn't try to install
 507      its own SIGWINCH handler */
 508   mutt_signal_init ();
 509 #endif
 510   if (initscr () == NULL) {
 511     puts _("Error initializing terminal.");
 512
 513     exit (1);
 514   }
 515 #if 1                           /* USE_SLANG_CURSES  - commenting out suggested in #455. */
 516   /* slang requires the signal handlers to be set after initializing */
 517   mutt_signal_init ();
 518 #endif
 519   ci_start_color ();
 520   keypad (stdscr, TRUE);
 521   cbreak ();
 522   noecho ();
 523 #if HAVE_TYPEAHEAD
 524   typeahead (-1);               /* simulate smooth scrolling */
 525 #endif
 526 #if HAVE_META
 527   meta (stdscr, TRUE);
 528 #endif
 529 }
 530
 531 #define M_IGNORE  (1<<0)        /* -z */
 532 #define M_BUFFY   (1<<1)        /* -Z */
 533 #define M_NOSYSRC (1<<2)        /* -n */
 534 #define M_RO      (1<<3)        /* -R */
 535 #define M_SELECT  (1<<4)        /* -y */
 536 #ifdef USE_NNTP
 537 #define M_NEWS    (1<<5)        /* -g and -G */
 538 #endif
 539
 540 int main (int argc, char **argv)
 541 {
 542   char folder[_POSIX_PATH_MAX] = "";
 543   char *subject = NULL;
 544   char *includeFile = NULL;
 545   char *draftFile = NULL;
 546   char *newMagic = NULL;
 547   HEADER *msg = NULL;
 548   LIST *attach = NULL;
 549   LIST *commands = NULL;
 550   LIST *queries = NULL;
 551   LIST *alias_queries = NULL;
 552   int sendflags = 0;
 553   int flags = 0;
 554   int version = 0;
 555   int i;
 556   int explicit_folder = 0;
 557   int dump_variables = -1;
 558
 559   /* initialize random number for tmp file creation */
 560   srand ((unsigned int) time (NULL));
 561
 562   /* sanity check against stupid administrators */
 563
 564   if (getegid () != getgid ()) {
 565     fprintf (stderr, "%s: I don't want to run with privileges!\n", argv[0]);
 566     exit (1);
 567   }
 568
 569 #ifdef ENABLE_NLS
 570   /* FIXME what about init.c:1439 ? */
 571   setlocale (LC_ALL, "");
 572   bindtextdomain (PACKAGE, MUTTLOCALEDIR);
 573   textdomain (PACKAGE);
 574 #endif
 575
 576   setlocale (LC_CTYPE, "");
 577
 578   mutt_error = mutt_nocurses_error;
 579   mutt_message = mutt_nocurses_error;
 580   SRAND (time (NULL));
 581   umask (077);
 582
 583   p_clear(Options, sizeof(Options));
 584   p_clear(QuadOptions, sizeof(QuadOptions));
 585
 586 #ifdef USE_NNTP
 587   while ((i =
 588           getopt (argc, argv,
 589                   "A:a:b:F:f:c:d:e:g:GH:s:i:hm:npQ:RTtvxyzZ")) != EOF)
 590 #else
 591   while ((i =
 592           getopt (argc, argv, "A:a:b:F:f:c:d:e:H:s:i:hm:npQ:RTtvxyzZ")) != EOF)
 593 #endif
 594     switch (i) {
 595     case 'A':
 596       alias_queries = mutt_add_list (alias_queries, optarg);
 597       break;
 598     case 'a':
 599       if (strlen(optarg)<=512)
 600         attach = mutt_add_list (attach, optarg);
 601       else{
 602         printf("too long arguments. exiting ...\n");
 603         exit(1);
 604       }
 605       break;
 606
 607     case 'F':
 608       m_strreplace(&Muttrc, optarg);
 609       break;
 610
 611     case 'f':
 612       m_strcpy(folder, sizeof(folder), optarg);
 613       explicit_folder = 1;
 614       break;
 615
 616     case 'b':
 617     case 'c':
 618       if (!msg)
 619         msg = mutt_new_header ();
 620       if (!msg->env)
 621         msg->env = mutt_new_envelope ();
 622       if (i == 'b')
 623         msg->env->bcc = rfc822_parse_adrlist (msg->env->bcc, optarg);
 624       else
 625         msg->env->cc = rfc822_parse_adrlist (msg->env->cc, optarg);
 626       break;
 627
 628     case 'd':
 629       {
 630         char buf[LONG_STRING];
 631         int level = atoi (optarg);
 632
 633         snprintf (buf, sizeof (buf), "set debug_level=%d", level);
 634         commands = mutt_add_list (commands, buf);
 635         debug_setlevel (level);
 636       }
 637       break;
 638
 639     case 't':
 640       dump_variables = 2;
 641       break;
 642
 643     case 'T':
 644       dump_variables = 1;
 645       break;
 646
 647     case 'e':
 648       commands = mutt_add_list (commands, optarg);
 649       break;
 650
 651     case 'H':
 652       draftFile = optarg;
 653       break;
 654
 655     case 'i':
 656       includeFile = optarg;
 657       break;
 658
 659     case 'm':
 660       /* should take precedence over .muttrc setting, so save it for later */
 661       newMagic = optarg;
 662       break;
 663
 664     case 'n':
 665       flags |= M_NOSYSRC;
 666       break;
 667
 668     case 'p':
 669       sendflags |= SENDPOSTPONED;
 670       break;
 671
 672     case 'Q':
 673       queries = mutt_add_list (queries, optarg);
 674       break;
 675
 676     case 'R':
 677       flags |= M_RO;            /* read-only mode */
 678       break;
 679
 680     case 's':
 681       subject = optarg;
 682       break;
 683
 684     case 'v':
 685       version++;
 686       break;
 687
 688     case 'x':                  /* mailx compatible send mode */
 689       sendflags |= SENDMAILX;
 690       break;
 691
 692     case 'y':                  /* My special hack mode */
 693       flags |= M_SELECT;
 694       break;
 695
 696 #ifdef USE_NNTP
 697     case 'g':                  /* Specify a newsserver */
 698       {
 699         char buf[LONG_STRING];
 700
 701         snprintf (buf, sizeof (buf), "set nntp_host=%s", optarg);
 702         commands = mutt_add_list (commands, buf);
 703       }
 704
 705     case 'G':                  /* List of newsgroups */
 706       flags |= M_SELECT | M_NEWS;
 707       break;
 708 #endif
 709
 710     case 'z':
 711       flags |= M_IGNORE;
 712       break;
 713
 714     case 'Z':
 715       flags |= M_BUFFY | M_IGNORE;
 716       break;
 717
 718     default:
 719       mutt_usage ();
 720     }
 721
 722   switch (version) {
 723   case 0:
 724     break;
 725   case 1:
 726     show_version ();
 727     break;
 728   default:
 729     puts (mutt_make_version (1));
 730     puts (_(Copyright_Mutt));
 731     puts (_(Copyright_Mutt_NG));
 732     puts (_(Copyright_GPL_1));
 733     puts (_(Copyright_GPL_2));
 734     puts (_(Copyright_GPL_3));
 735     puts (_(ReachingUs));
 736     exit (0);
 737   }
 738
 739   /* Check for a batch send. */
 740   if (!isatty (0) || queries || alias_queries || dump_variables > 0) {
 741     set_option (OPTNOCURSES);
 742     sendflags = SENDBATCH;
 743   }
 744
 745   /* This must come before mutt_init() because curses needs to be started
 746      before calling the init_pair() function to set the color scheme.  */
 747   if (!option (OPTNOCURSES))
 748     start_curses ();
 749
 750   /* set defaults and read init files */
 751   mx_init ();
 752   mutt_init (flags & M_NOSYSRC, commands);
 753   mutt_free_list (&commands);
 754
 755   /* Initialize crypto */
 756   crypt_init ();
 757
 758   if (queries)
 759     return mutt_query_variables (queries);
 760   if (dump_variables > 0)
 761     return (mutt_dump_variables (dump_variables-1));
 762
 763   if (alias_queries) {
 764     int rv = 0;
 765     address_t *a;
 766
 767     for (; alias_queries; alias_queries = alias_queries->next) {
 768       if ((a = mutt_lookup_alias (alias_queries->data))) {
 769         /* output in machine-readable form */
 770         mutt_addrlist_to_idna (a, NULL);
 771         mutt_write_address_list (a, stdout, 0, 0);
 772       }
 773       else {
 774         rv = 1;
 775         printf ("%s\n", alias_queries->data);
 776       }
 777     }
 778     return rv;
 779   }
 780
 781   if (newMagic)
 782     mx_set_magic (newMagic);
 783
 784   if (!option (OPTNOCURSES)) {
 785     SETCOLOR (MT_COLOR_NORMAL);
 786     clear ();
 787     mutt_error = mutt_curses_error;
 788     mutt_message = mutt_curses_message;
 789   }
 790
 791   /* Create the Maildir directory if it doesn't exist. */
 792   if (!option (OPTNOCURSES) && Maildir) {
 793     struct stat sb;
 794     char fpath[_POSIX_PATH_MAX];
 795     char msg[STRING];
 796
 797     m_strcpy(fpath, sizeof(fpath), Maildir);
 798     mutt_expand_path (fpath, sizeof (fpath));
 799 #ifdef USE_IMAP
 800     /* we're not connected yet - skip mail folder creation */
 801     if (mx_get_magic (fpath) != M_IMAP)
 802 #endif
 803       if (stat (fpath, &sb) == -1 && errno == ENOENT) {
 804         snprintf (msg, sizeof (msg), _("%s does not exist. Create it?"),
 805                   Maildir);
 806         if (mutt_yesorno (msg, M_YES) == M_YES) {
 807           if (mkdir (fpath, 0700) == -1 && errno != EEXIST)
 808             mutt_error (_("Can't create %s: %s."), Maildir, strerror (errno));
 809         }
 810       }
 811   }
 812
 813   if (sendflags & SENDPOSTPONED) {
 814     if (!option (OPTNOCURSES))
 815       mutt_flushinp ();
 816     ci_send_message (SENDPOSTPONED, NULL, NULL, NULL, NULL);
 817     mutt_endwin (NULL);
 818   }
 819   else if (subject || msg || sendflags || draftFile || includeFile || attach
 820            || optind < argc) {
 821     FILE *fin = NULL;
 822     char buf[LONG_STRING];
 823     char *tempfile = NULL, *infile = NULL;
 824     char *bodytext = NULL;
 825
 826     if (!option (OPTNOCURSES))
 827       mutt_flushinp ();
 828
 829     if (!msg)
 830       msg = mutt_new_header ();
 831
 832     if (draftFile)
 833       infile = draftFile;
 834     else {
 835       if (!msg->env)
 836         msg->env = mutt_new_envelope ();
 837
 838       for (i = optind; i < argc; i++) {
 839         if (url_check_scheme (argv[i]) == U_MAILTO)
 840           url_parse_mailto (msg->env, &bodytext, argv[i]);
 841         else
 842           msg->env->to = rfc822_parse_adrlist (msg->env->to, argv[i]);
 843       }
 844
 845       if (option (OPTAUTOEDIT) && !msg->env->to && !msg->env->cc) {
 846         if (!option (OPTNOCURSES))
 847           mutt_endwin (NULL);
 848         fputs (_("No recipients specified.\n"), stderr);
 849         exit (1);
 850       }
 851
 852       if (subject)
 853         msg->env->subject = m_strdup(subject);
 854
 855       if (includeFile)
 856         infile = includeFile;
 857     }
 858
 859     if (infile || bodytext) {
 860       if (infile) {
 861         if (m_strcmp("-", infile) == 0)
 862           fin = stdin;
 863         else {
 864           char path[_POSIX_PATH_MAX];
 865
 866           m_strcpy(path, sizeof(path), infile);
 867           mutt_expand_path (path, sizeof (path));
 868           if ((fin = fopen (path, "r")) == NULL) {
 869             if (!option (OPTNOCURSES))
 870               mutt_endwin (NULL);
 871             perror (path);
 872             exit (1);
 873           }
 874         }
 875       }
 876       else
 877         fin = NULL;
 878
 879       mutt_mktemp (buf);
 880       tempfile = m_strdup(buf);
 881
 882       if (draftFile)
 883         msg->env = mutt_read_rfc822_header (fin, NULL, 1, 0);
 884
 885       /* is the following if still needed? */
 886
 887       if (tempfile) {
 888         FILE *fout;
 889
 890         if ((fout = safe_fopen (tempfile, "w")) == NULL) {
 891           if (!option (OPTNOCURSES))
 892             mutt_endwin (NULL);
 893           perror (tempfile);
 894           fclose (fin);
 895           p_delete(&tempfile);
 896           exit (1);
 897         }
 898         if (fin)
 899           mutt_copy_stream (fin, fout);
 900         else if (bodytext)
 901           fputs (bodytext, fout);
 902         fclose (fout);
 903         if (fin && fin != stdin)
 904           fclose (fin);
 905       }
 906     }
 907
 908     p_delete(&bodytext);
 909
 910     if (attach) {
 911       LIST *t = attach;
 912       BODY *a = NULL;
 913
 914       while (t) {
 915         if (a) {
 916           a->next = mutt_make_file_attach (t->data);
 917           a = a->next;
 918         }
 919         else
 920           msg->content = a = mutt_make_file_attach (t->data);
 921         if (!a) {
 922           if (!option (OPTNOCURSES))
 923             mutt_endwin (NULL);
 924           fprintf (stderr, _("%s: unable to attach file.\n"), t->data);
 925           mutt_free_list (&attach);
 926           exit (1);
 927         }
 928         t = t->next;
 929       }
 930       mutt_free_list (&attach);
 931     }
 932
 933     ci_send_message (sendflags, msg, tempfile, NULL, NULL);
 934
 935     if (!option (OPTNOCURSES))
 936       mutt_endwin (NULL);
 937   }
 938   else {
 939     if (flags & M_BUFFY) {
 940       if (!buffy_check (0)) {
 941         mutt_endwin _("No mailbox with new mail.");
 942
 943         exit (1);
 944       }
 945       folder[0] = 0;
 946       buffy_next (folder, sizeof (folder));
 947     }
 948     else if (flags & M_SELECT) {
 949 #ifdef USE_NNTP
 950       if (flags & M_NEWS) {
 951         set_option (OPTNEWS);
 952         if (!(CurrentNewsSrv = mutt_select_newsserver (NewsServer))) {
 953           mutt_endwin (Errorbuf);
 954           exit (1);
 955         }
 956       }
 957       else
 958 #endif
 959       if (!Incoming) {
 960         mutt_endwin _("No incoming mailboxes defined.");
 961
 962         exit (1);
 963       }
 964       folder[0] = 0;
 965       mutt_select_file (folder, sizeof (folder), M_SEL_FOLDER | M_SEL_BUFFY);
 966       if (!folder[0]) {
 967         mutt_endwin (NULL);
 968         exit (0);
 969       }
 970     }
 971
 972     if (!folder[0])
 973       m_strcpy(folder, sizeof(folder), NONULL(Spoolfile));
 974
 975 #ifdef USE_NNTP
 976     if (option (OPTNEWS)) {
 977       unset_option (OPTNEWS);
 978       nntp_expand_path (folder, sizeof (folder),
 979                         &CurrentNewsSrv->conn->account);
 980     }
 981     else
 982 #endif
 983       mutt_expand_path (folder, sizeof (folder));
 984
 985     m_strreplace(&CurrentFolder, folder);
 986     m_strreplace(&LastFolder, folder);
 987
 988     if (flags & M_IGNORE) {
 989       /* check to see if there are any messages in the folder */
 990       switch (mx_check_empty (folder)) {
 991       case -1:
 992         mutt_endwin (strerror (errno));
 993         exit (1);
 994       case 1:
 995         mutt_endwin _("Mailbox is empty.");
 996         exit (1);
 997       }
 998     }
 999
1000     mutt_folder_hook (folder);
1001
1002     if ((Context = mx_open_mailbox (folder, ((flags & M_RO)
1003                                              || option (OPTREADONLY)) ?
1004                                     M_READONLY : 0, NULL))
1005         || !explicit_folder) {
1006       mutt_index_menu ();
1007       if (option (OPTXTERMSETTITLES))
1008         mutt_xterm_set_title (NONULL (XtermLeave));
1009       if (Context)
1010         p_delete(&Context);
1011     }
1012     mutt_endwin (Errorbuf);
1013   }
1014
1015   exit (0);
1016 }