/*
 * Copyright notice from original mutt:
 * Copyright (C) 1996-2002 Michael R. Elkins <me@mutt.org>
 * Copyright (C) 1999-2002 Thomas Roessler <roessler@does-not-exist.org>
 * Copyright (C) 2004 g10 Code GmbH
 *
 * Parts written/modified by:
 * Nico Golde <nion@muttng.org>
 * Andreas Krennmair <ak@synflood.at>
 *
 * This file is part of mutt-ng, see http://www.muttng.org/.
 * It's licensed under the GNU General Public License,
 * please see the file GPL in the top level source directory.
 */

#define MAIN_C 1

#if HAVE_CONFIG_H
# include "config.h"
#endif

#include "mutt.h"
#include "mutt_curses.h"
#include "keymap.h"
#include "url.h"
#include "mutt_crypt.h"
#include "mutt_idna.h"
#include "xterm.h"

#include "lib/mem.h"
#include "lib/intl.h"
#include "lib/str.h"
#include "lib/debug.h"

#include <string.h>
#include <stdlib.h>
#include <locale.h>
#include <unistd.h>
#include <errno.h>
#include <sys/stat.h>
#include <sys/utsname.h>

#ifdef HAVE_GETOPT_H
#include <getopt.h>
#endif

#ifdef HAVE_LIBIDN
#include <stringprep.h>
#endif

#ifdef USE_NNTP
#include "nntp/nntp.h"
#endif

#ifdef USE_LIBESMTP
#include <libesmtp.h>
#endif

#if USE_HCACHE
#if HAVE_QDBM
#include <depot.h>
#elif HAVE_GDBM
#include <gdbm.h>
#elif HAVE_DB4
#include <db.h>
#endif
#endif

#ifdef USE_GNUTLS
#include <gnutls/gnutls.h>
#endif

#ifdef CRYPT_BACKEND_GPGME
#include <gpgme.h>
#endif

#ifdef USE_SSL
#include <openssl/opensslv.h>
#endif

static const char *ReachingUs = N_("\
To contact the developers, please mail to <mutt-ng-devel@lists.berlios.de>.\n\
To visit the Mutt-ng homepage go to http://www.muttng.org.\n\
To report a bug, please use the fleang(1) utility.\n");

static const char *Notice = N_("\
Copyright (C) 1996-2002 Michael R. Elkins and others.\n\
Mutt-ng comes with ABSOLUTELY NO WARRANTY; for details type `muttng -vv'.\n\
Mutt is free software, and you are welcome to redistribute it\n\
under certain conditions; type `muttng -vv' for details.\n");

static const char *Copyright_Mutt = N_("\
Copyright (C) 1996-2004 Michael R. Elkins <me@mutt.org>\n\
Copyright (C) 1996-2002 Brandon Long <blong@fiction.net>\n\
Copyright (C) 1997-2005 Thomas Roessler <roessler@does-not-exist.org>\n\
Copyright (C) 1998-2005 Werner Koch <wk@isil.d.shuttle.de>\n\
Copyright (C) 1999-2005 Brendan Cully <brendan@kublai.com>\n\
Copyright (C) 1999-2002 Tommi Komulainen <Tommi.Komulainen@iki.fi>\n\
Copyright (C) 2000-2002 Edmund Grimley Evans <edmundo@rano.org>\n");

static const char *Copyright_Mutt_NG = N_("\
Copyright (C) 2005:\n\
  Parts were written/modified by:\n\
     Andreas Krennmair <ak@synflood.at>\n\
     Nico Golde <nico@ngolde.de>\n\
     Rocco Rutte <pdmef@cs.tu-berlin.de>\n\
\n\
Lots of others not mentioned here contributed lots of code,\n\
fixes, and suggestions.");

static const char* Copyright_GPL_1 = N_("\
\n\
    This program is free software; you can redistribute it and/or modify\n\
    it under the terms of the GNU General Public License as published by\n\
    the Free Software Foundation; either version 2 of the License, or\n\
    (at your option) any later version.\n");

static const char* Copyright_GPL_2 = N_("\
    This program is distributed in the hope that it will be useful,\n\
    but WITHOUT ANY WARRANTY; without even the implied warranty of\n\
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\n\
    GNU General Public License for more details.\n");

static const char* Copyright_GPL_3 = N_("\
    You should have received a copy of the GNU General Public License\n\
    along with this program; if not, write to the Free Software\n\
    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.\n\
");

void mutt_exit (int code)
{
  mutt_endwin (NULL);
  exit (code);
}

static void mutt_usage (void)
{
  puts (mutt_make_version (1));

  puts
    _("usage: muttng [ -nRyzZ ] [ -e <cmd> ] [ -F <file> ] [ -m <type> ] [ -f <file> ]\n\
       muttng [ -nR ] [ -e <cmd> ] [ -F <file> ] -Q <query> [ -Q <query> ] [...]\n\
       muttng [ -nR ] [ -e <cmd> ] [ -F <file> ] -A <alias> [ -A <alias> ] [...]\n\
       muttng [ -nR ] [ -e <cmd> ] [ -F <file> ] -t");
  puts
    _("\
       muttng [ -nR ] [ -e <cmd> ] [ -F <file> ] -T\n\
       muttng [ -nx ] [ -e <cmd> ] [ -a <file> ] [ -F <file> ] [ -H <file> ] [ -i <file> ] [ -s <subj> ] [ -b <addr> ] [ -c <addr> ] <addr> [ ... ]\n\
       muttng [ -n ] [ -e <cmd> ] [ -F <file> ] -p\n\
       muttng -v[v]\n\
\n\
options:\n\
  -A <alias>\texpand the given alias\n\
  -a <file>\tattach a file to the message\n\
  -b <address>\tspecify a blind carbon-copy (BCC) address\n\
  -c <address>\tspecify a carbon-copy (CC) address");
#if DEBUG
  puts _("  -d <level>\tlog debugging output to ~/.muttngdebug0");
#endif
  puts _("\
  -e <command>\tspecify a command to be executed after initialization\n\
  -f <file>\tspecify which mailbox to read\n\
  -F <file>\tspecify an alternate muttrngc file\n\
  -g <server>\tspecify a newsserver (if compiled with NNTP)\n\
  -G\t\tselect a newsgroup (if compiled with NNTP)\n\
  -H <file>\tspecify a draft file to read header and body from\n\
  -i <file>\tspecify a file which Mutt-ng should include in the body");
  puts _("\
  -d <level>\t specify debugging level of Mutt-ng\n\
  -m <type>\tspecify a default mailbox type\n\
  -n\t\tcauses Mutt-ng not to read the system Muttngrc\n\
  -p\t\trecall a postponed message\n\
  -Q <variable>\tquery a configuration variable\n\
  -R\t\topen mailbox in read-only mode\n\
  -s <subj>\tspecify a subject (must be in quotes if it has spaces)");
  puts _("\
  -t\t\tprint the value of all variables to stdout\n\
  -T\t\tprint the value of all changed variables to stdout\n\
  -v\t\tshow version and compile-time definitions\n\
  -x\t\tsimulate the mailx send mode\n\
  -y\t\tselect a mailbox specified in your `mailboxes' list\n\
  -z\t\texit immediately if there are no messages in the mailbox\n\
  -Z\t\topen the first folder with new message, exit immediately if none\n\
  -h\t\tthis help message");

  exit (0);
}

static void show_version (void)
{
  struct utsname uts;
#ifdef USE_LIBESMTP
  char buf[STRING];
#endif

  puts (mutt_make_version (1));
  puts (_(Notice));

  uname (&uts);

#ifdef _AIX
  printf ("System:\n  %s %s.%s", uts.sysname, uts.version, uts.release);
#elif defined (SCO)
  printf ("System:\n  SCO %s", uts.release);
#else
  printf ("System:\n  %s %s", uts.sysname, uts.release);
#endif

  printf (" (%s)\nExternal Libraries:\n", uts.machine);

#ifdef NCURSES_VERSION
  printf ("  ncurses %s\n", NCURSES_VERSION);
#elif defined(USE_SLANG_CURSES)
  printf ("  slang %d\n", SLANG_VERSION);
#endif

#ifdef _LIBICONV_VERSION
  printf ("  libiconv %d.%d\n", _LIBICONV_VERSION >> 8,
          _LIBICONV_VERSION & 0xff);
#endif

#ifdef HAVE_LIBIDN
  printf ("  libidn %s (compiled with %s)\n",
          stringprep_check_version (NULL), STRINGPREP_VERSION);
#endif

#ifdef USE_LIBESMTP
  smtp_version (buf, sizeof (buf), 0);
  printf ("  libESMTP %s\n", buf);
#endif

#if USE_HCACHE
#if HAVE_QDBM
  printf ("  qdbm %s\n", dpversion);
#elif HAVE_GDBM
  printf ("  gdbm %s\n", gdbm_version);
#elif HAVE_DB4
  printf ("  DB4 %d.%d.%d\n", DB_VERSION_MAJOR, DB_VERSION_MINOR,
          DB_VERSION_PATCH);
#endif
#endif

#ifdef USE_GNUTLS
  printf ("  gnutls %s\n", LIBGNUTLS_VERSION);
#endif

#ifdef USE_SSL
  printf ("  %s\n",OPENSSL_VERSION_TEXT);
#endif

#ifdef CRYPT_BACKEND_GPGME
  printf ("  gpgme %s\n", GPGME_VERSION);
#endif

  puts (_("Compile Options:"));

#ifdef DEBUG
  puts ("  +DEBUG");
#else
  puts ("  -DEBUG");
#endif

  puts (
#ifdef HOMESPOOL
         "  +HOMESPOOL  "
#else
         "  -HOMESPOOL  "
#endif
#ifdef USE_SETGID
         "+USE_SETGID  "
#else
         "-USE_SETGID  "
#endif
#ifdef USE_DOTLOCK
         "+USE_DOTLOCK  "
#else
         "-USE_DOTLOCK  "
#endif
#ifdef DL_STANDALONE
         "+DL_STANDALONE  "
#else
         "-DL_STANDALONE  "
#endif
         "\n  "
#ifdef USE_FCNTL
         "+USE_FCNTL  "
#else
         "-USE_FCNTL  "
#endif
#ifdef USE_FLOCK
         "+USE_FLOCK   "
#else
         "-USE_FLOCK   "
#endif
#ifdef USE_INODESORT
         "+USE_INODESORT   "
#else
         "-USE_INODESORT   "
#endif
#if USE_HCACHE
         "+USE_HCACHE  "
#else
         "-USE_HCACHE  "
#endif
    );
  puts (
#ifdef USE_POP
         "  +USE_POP  "
#else
         "  -USE_POP  "
#endif
#ifdef USE_NNTP
         "+USE_NNTP  "
#else
         "-USE_NNTP  "
#endif
#ifdef USE_IMAP
         "+USE_IMAP  "
#else
         "-USE_IMAP  "
#endif
#ifdef USE_GSS
         "+USE_GSS  "
#else
         "-USE_GSS  "
#endif
#ifdef USE_SSL
         "+USE_SSL  "
#else
         "-USE_SSL  "
#endif
#ifdef USE_GNUTLS
         "+USE_GNUTLS  "
#else
         "-USE_GNUTLS  "
#endif
#ifdef USE_SASL
         "+USE_SASL  "
#else
         "-USE_SASL  "
#endif
#ifdef USE_LIBESMTP
         "+USE_LIBESMTP  "
#else
         "-USE_LIBESMTP  "
#endif
         "\n  "
#ifdef HAVE_REGCOMP
         "+HAVE_REGCOMP  "
#else
         "-HAVE_REGCOMP  "
#endif
#ifdef USE_GNU_REGEX
         "+USE_GNU_REGEX  "
#else
         "-USE_GNU_REGEX  "
#endif
#ifdef USE_COMPRESSED
         "+COMPRESSED  "
#else
         "-COMPRESSED  "
#endif
         "\n  "
#ifdef HAVE_COLOR
         "+HAVE_COLOR  "
#else
         "-HAVE_COLOR  "
#endif
#ifdef HAVE_START_COLOR
         "+HAVE_START_COLOR  "
#else
         "-HAVE_START_COLOR  "
#endif
#ifdef HAVE_TYPEAHEAD
         "+HAVE_TYPEAHEAD  "
#else
         "-HAVE_TYPEAHEAD  "
#endif
#ifdef HAVE_BKGDSET
         "+HAVE_BKGDSET  "
#else
         "-HAVE_BKGDSET  "
#endif
         "\n  "
#ifdef HAVE_CURS_SET
         "+HAVE_CURS_SET  "
#else
         "-HAVE_CURS_SET  "
#endif
#ifdef HAVE_META
         "+HAVE_META  "
#else
         "-HAVE_META  "
#endif
#ifdef HAVE_RESIZETERM
         "+HAVE_RESIZETERM  "
#else
         "-HAVE_RESIZETERM  "
#endif
    );

  puts (
#ifdef CRYPT_BACKEND_CLASSIC_PGP
         "  +CRYPT_BACKEND_CLASSIC_PGP  "
#else
         "  -CRYPT_BACKEND_CLASSIC_PGP  "
#endif
#ifdef CRYPT_BACKEND_CLASSIC_SMIME
         "+CRYPT_BACKEND_CLASSIC_SMIME  "
#else
         "-CRYPT_BACKEND_CLASSIC_SMIME  "
#endif
#ifdef CRYPT_BACKEND_GPGME
         "+CRYPT_BACKEND_GPGME  "
#else
         "-CRYPT_BACKEND_GPGME  "
#endif
#ifdef BUFFY_SIZE
         "+BUFFY_SIZE "
#else
         "-BUFFY_SIZE "
#endif
#ifdef SUN_ATTACHMENT
         "+SUN_ATTACHMENT  "
#else
         "-SUN_ATTACHMENT  "
#endif
         "\n  "
#ifdef ENABLE_NLS
         "+ENABLE_NLS  "
#else
         "-ENABLE_NLS  "
#endif
#ifdef LOCALES_HACK
         "+LOCALES_HACK  "
#else
         "-LOCALES_HACK  "
#endif
#ifdef HAVE_WC_FUNCS
         "+HAVE_WC_FUNCS  "
#else
         "-HAVE_WC_FUNCS  "
#endif
#ifdef HAVE_LANGINFO_CODESET
         "+HAVE_LANGINFO_CODESET  "
#else
         "-HAVE_LANGINFO_CODESET  "
#endif
#ifdef HAVE_LANGINFO_YESEXPR
         "+HAVE_LANGINFO_YESEXPR  "
#else
         "-HAVE_LANGINFO_YESEXPR  "
#endif
         "\n  "
#if HAVE_ICONV
         "+HAVE_ICONV  "
#else
         "-HAVE_ICONV  "
#endif
#if ICONV_NONTRANS
         "+ICONV_NONTRANS  "
#else
         "-ICONV_NONTRANS  "
#endif
#if HAVE_LIBIDN
         "+HAVE_LIBIDN  "
#else
         "-HAVE_LIBIDN  "
#endif
#if HAVE_GETSID
         "+HAVE_GETSID  "
#else
         "-HAVE_GETSID  "
#endif
#if HAVE_GETADDRINFO
         "+HAVE_GETADDRINFO  "
#else
         "-HAVE_GETADDRINFO  "
#endif
    );

  puts (_("Built-In Defaults:"));

#ifdef DOMAIN
  printf ("  +DOMAIN=\"%s\"\n", DOMAIN);
#else
  puts ("  -DOMAIN");
#endif

#ifdef ISPELL
  printf ("  +ISPELL=\"%s\"\n", ISPELL);
#else
  puts ("  -ISPELL");
#endif

  printf ("  +SENDMAIL=\"%s\"\n", SENDMAIL);
  printf ("  +MAILPATH=\"%s\"\n", MAILPATH);
  printf ("  +PKGDATADIR=\"%s\"\n", PKGDATADIR);
  printf ("  +PKGDOCDIR=\"%s\"\n", PKGDOCDIR);
  printf ("  +SYSCONFDIR=\"%s\"\n", SYSCONFDIR);
  printf ("  +EXECSHELL=\"%s\"\n", EXECSHELL);
#ifdef MIXMASTER
  printf ("  +MIXMASTER=\"%s\"\n\n", MIXMASTER);
#else
  puts ("  -MIXMASTER\n");
#endif

  puts (_(ReachingUs));

  puts (_("Mutt-ng is based on the following patches written for mutt:\n"));
  mutt_print_patchlist ();

  exit (0);
}

static void start_curses (void)
{
  km_init ();                   /* must come before mutt_init */

#ifdef USE_SLANG_CURSES
  SLtt_Ignore_Beep = 1;         /* don't do that #*$@^! annoying visual beep! */
  SLsmg_Display_Eight_Bit = 128;        /* characters above this are printable */
  SLtt_set_color (0, NULL, "default", "default");
#else
  /* should come before initscr() so that ncurses 4.2 doesn't try to install
     its own SIGWINCH handler */
  mutt_signal_init ();
#endif
  if (initscr () == NULL) {
    puts _("Error initializing terminal.");

    exit (1);
  }
#if 1                           /* USE_SLANG_CURSES  - commenting out suggested in #455. */
  /* slang requires the signal handlers to be set after initializing */
  mutt_signal_init ();
#endif
  ci_start_color ();
  keypad (stdscr, TRUE);
  cbreak ();
  noecho ();
#if HAVE_TYPEAHEAD
  typeahead (-1);               /* simulate smooth scrolling */
#endif
#if HAVE_META
  meta (stdscr, TRUE);
#endif
}

#define M_IGNORE  (1<<0)        /* -z */
#define M_BUFFY   (1<<1)        /* -Z */
#define M_NOSYSRC (1<<2)        /* -n */
#define M_RO      (1<<3)        /* -R */
#define M_SELECT  (1<<4)        /* -y */
#ifdef USE_NNTP
#define M_NEWS    (1<<5)        /* -g and -G */
#endif

int main (int argc, char **argv)
{
  char folder[_POSIX_PATH_MAX] = "";
  char *subject = NULL;
  char *includeFile = NULL;
  char *draftFile = NULL;
  char *newMagic = NULL;
  HEADER *msg = NULL;
  LIST *attach = NULL;
  LIST *commands = NULL;
  LIST *queries = NULL;
  LIST *alias_queries = NULL;
  int sendflags = 0;
  int flags = 0;
  int version = 0;
  int i;
  int explicit_folder = 0;
  int dump_variables = -1;
  extern char *optarg;
  extern int optind;

  /* initialize random number for tmp file creation */ 
  srand ((unsigned int) time (NULL));
  
  /* sanity check against stupid administrators */
  
  if (getegid () != getgid ()) {
    fprintf (stderr, "%s: I don't want to run with privileges!\n", argv[0]);
    exit (1);
  }

#ifdef ENABLE_NLS
  /* FIXME what about init.c:1439 ? */
  setlocale (LC_ALL, "");
  bindtextdomain (PACKAGE, MUTTLOCALEDIR);
  textdomain (PACKAGE);
#endif

  setlocale (LC_CTYPE, "");

  mutt_error = mutt_nocurses_error;
  mutt_message = mutt_nocurses_error;
  SRAND (time (NULL));
  umask (077);

  memset (Options, 0, sizeof (Options));
  memset (QuadOptions, 0, sizeof (QuadOptions));

#ifdef USE_NNTP
  while ((i =
          getopt (argc, argv,
                  "A:a:b:F:f:c:d:e:g:GH:s:i:hm:npQ:RTtvxyzZ")) != EOF)
#else
  while ((i =
          getopt (argc, argv, "A:a:b:F:f:c:d:e:H:s:i:hm:npQ:RTtvxyzZ")) != EOF)
#endif
    switch (i) {
    case 'A':
      alias_queries = mutt_add_list (alias_queries, optarg);
      break;
    case 'a':
      if (strlen(optarg)<=512)
        attach = mutt_add_list (attach, optarg);
      else{
        printf("too long arguments. exiting ...\n");
        exit(1);
      }
      break;

    case 'F':
      str_replace (&Muttrc, optarg);
      break;

    case 'f':
      strfcpy (folder, optarg, sizeof (folder));
      explicit_folder = 1;
      break;

    case 'b':
    case 'c':
      if (!msg)
        msg = mutt_new_header ();
      if (!msg->env)
        msg->env = mutt_new_envelope ();
      if (i == 'b')
        msg->env->bcc = rfc822_parse_adrlist (msg->env->bcc, optarg);
      else
        msg->env->cc = rfc822_parse_adrlist (msg->env->cc, optarg);
      break;

    case 'd':
      {
        char buf[LONG_STRING];
        int level = atoi (optarg);

        snprintf (buf, sizeof (buf), "set debug_level=%d", level);
        commands = mutt_add_list (commands, buf);
        debug_setlevel (level);
      }
      break;

    case 't':
      dump_variables = 2;
      break;

    case 'T':
      dump_variables = 1;
      break;

    case 'e':
      commands = mutt_add_list (commands, optarg);
      break;

    case 'H':
      draftFile = optarg;
      break;

    case 'i':
      includeFile = optarg;
      break;

    case 'm':
      /* should take precedence over .muttrc setting, so save it for later */
      newMagic = optarg;
      break;

    case 'n':
      flags |= M_NOSYSRC;
      break;

    case 'p':
      sendflags |= SENDPOSTPONED;
      break;

    case 'Q':
      queries = mutt_add_list (queries, optarg);
      break;

    case 'R':
      flags |= M_RO;            /* read-only mode */
      break;

    case 's':
      subject = optarg;
      break;

    case 'v':
      version++;
      break;

    case 'x':                  /* mailx compatible send mode */
      sendflags |= SENDMAILX;
      break;

    case 'y':                  /* My special hack mode */
      flags |= M_SELECT;
      break;

#ifdef USE_NNTP
    case 'g':                  /* Specify a newsserver */
      {
        char buf[LONG_STRING];

        snprintf (buf, sizeof (buf), "set nntp_host=%s", optarg);
        commands = mutt_add_list (commands, buf);
      }

    case 'G':                  /* List of newsgroups */
      flags |= M_SELECT | M_NEWS;
      break;
#endif

    case 'z':
      flags |= M_IGNORE;
      break;

    case 'Z':
      flags |= M_BUFFY | M_IGNORE;
      break;

    default:
      mutt_usage ();
    }

  switch (version) {
  case 0:
    break;
  case 1:
    show_version ();
    break;
  default:
    puts (mutt_make_version (1));
    puts (_(Copyright_Mutt));
    puts (_(Copyright_Mutt_NG));
    puts (_(Copyright_GPL_1));
    puts (_(Copyright_GPL_2));
    puts (_(Copyright_GPL_3));
    puts (_(ReachingUs));
    exit (0);
  }

  /* Check for a batch send. */
  if (!isatty (0) || queries || alias_queries || dump_variables > 0) {
    set_option (OPTNOCURSES);
    sendflags = SENDBATCH;
  }

  /* This must come before mutt_init() because curses needs to be started
     before calling the init_pair() function to set the color scheme.  */
  if (!option (OPTNOCURSES))
    start_curses ();

  /* set defaults and read init files */
  mx_init ();
  mutt_init (flags & M_NOSYSRC, commands);
  mutt_free_list (&commands);

  /* Initialize crypto */
  crypt_init ();

  if (queries)
    return mutt_query_variables (queries);
  if (dump_variables > 0)
    return (mutt_dump_variables (dump_variables-1));

  if (alias_queries) {
    int rv = 0;
    ADDRESS *a;

    for (; alias_queries; alias_queries = alias_queries->next) {
      if ((a = mutt_lookup_alias (alias_queries->data))) {
        /* output in machine-readable form */
        mutt_addrlist_to_idna (a, NULL);
        mutt_write_address_list (a, stdout, 0, 0);
      }
      else {
        rv = 1;
        printf ("%s\n", alias_queries->data);
      }
    }
    return rv;
  }

  if (newMagic)
    mx_set_magic (newMagic);

  if (!option (OPTNOCURSES)) {
    SETCOLOR (MT_COLOR_NORMAL);
    clear ();
    mutt_error = mutt_curses_error;
    mutt_message = mutt_curses_message;
  }

  /* Create the Maildir directory if it doesn't exist. */
  if (!option (OPTNOCURSES) && Maildir) {
    struct stat sb;
    char fpath[_POSIX_PATH_MAX];
    char msg[STRING];

    strfcpy (fpath, Maildir, sizeof (fpath));
    mutt_expand_path (fpath, sizeof (fpath));
#ifdef USE_IMAP
    /* we're not connected yet - skip mail folder creation */
    if (mx_get_magic (fpath) != M_IMAP)
#endif
      if (stat (fpath, &sb) == -1 && errno == ENOENT) {
        snprintf (msg, sizeof (msg), _("%s does not exist. Create it?"),
                  Maildir);
        if (mutt_yesorno (msg, M_YES) == M_YES) {
          if (mkdir (fpath, 0700) == -1 && errno != EEXIST)
            mutt_error (_("Can't create %s: %s."), Maildir, strerror (errno));
        }
      }
  }

  if (sendflags & SENDPOSTPONED) {
    if (!option (OPTNOCURSES))
      mutt_flushinp ();
    ci_send_message (SENDPOSTPONED, NULL, NULL, NULL, NULL);
    mutt_endwin (NULL);
  }
  else if (subject || msg || sendflags || draftFile || includeFile || attach
           || optind < argc) {
    FILE *fin = NULL;
    char buf[LONG_STRING];
    char *tempfile = NULL, *infile = NULL;
    char *bodytext = NULL;

    if (!option (OPTNOCURSES))
      mutt_flushinp ();

    if (!msg)
      msg = mutt_new_header ();

    if (draftFile)
      infile = draftFile;
    else {
      if (!msg->env)
        msg->env = mutt_new_envelope ();

      for (i = optind; i < argc; i++) {
        if (url_check_scheme (argv[i]) == U_MAILTO)
          url_parse_mailto (msg->env, &bodytext, argv[i]);
        else
          msg->env->to = rfc822_parse_adrlist (msg->env->to, argv[i]);
      }

      if (option (OPTAUTOEDIT) && !msg->env->to && !msg->env->cc) {
        if (!option (OPTNOCURSES))
          mutt_endwin (NULL);
        fputs (_("No recipients specified.\n"), stderr);
        exit (1);
      }

      if (subject)
        msg->env->subject = str_dup (subject);

      if (includeFile)
        infile = includeFile;
    }

    if (infile || bodytext) {
      if (infile) {
        if (str_cmp ("-", infile) == 0)
          fin = stdin;
        else {
          char path[_POSIX_PATH_MAX];

          strfcpy (path, infile, sizeof (path));
          mutt_expand_path (path, sizeof (path));
          if ((fin = fopen (path, "r")) == NULL) {
            if (!option (OPTNOCURSES))
              mutt_endwin (NULL);
            perror (path);
            exit (1);
          }
        }
      }
      else
        fin = NULL;

      mutt_mktemp (buf);
      tempfile = str_dup (buf);

      if (draftFile)
        msg->env = mutt_read_rfc822_header (fin, NULL, 1, 0);

      /* is the following if still needed? */

      if (tempfile) {
        FILE *fout;

        if ((fout = safe_fopen (tempfile, "w")) == NULL) {
          if (!option (OPTNOCURSES))
            mutt_endwin (NULL);
          perror (tempfile);
          fclose (fin);
          mem_free (&tempfile);
          exit (1);
        }
        if (fin)
          mutt_copy_stream (fin, fout);
        else if (bodytext)
          fputs (bodytext, fout);
        fclose (fout);
        if (fin && fin != stdin)
          fclose (fin);
      }
    }

    mem_free (&bodytext);

    if (attach) {
      LIST *t = attach;
      BODY *a = NULL;

      while (t) {
        if (a) {
          a->next = mutt_make_file_attach (t->data);
          a = a->next;
        }
        else
          msg->content = a = mutt_make_file_attach (t->data);
        if (!a) {
          if (!option (OPTNOCURSES))
            mutt_endwin (NULL);
          fprintf (stderr, _("%s: unable to attach file.\n"), t->data);
          mutt_free_list (&attach);
          exit (1);
        }
        t = t->next;
      }
      mutt_free_list (&attach);
    }

    ci_send_message (sendflags, msg, tempfile, NULL, NULL);

    if (!option (OPTNOCURSES))
      mutt_endwin (NULL);
  }
  else {
    if (flags & M_BUFFY) {
      if (!buffy_check (0)) {
        mutt_endwin _("No mailbox with new mail.");

        exit (1);
      }
      folder[0] = 0;
      buffy_next (folder, sizeof (folder));
    }
    else if (flags & M_SELECT) {
#ifdef USE_NNTP
      if (flags & M_NEWS) {
        set_option (OPTNEWS);
        if (!(CurrentNewsSrv = mutt_select_newsserver (NewsServer))) {
          mutt_endwin (Errorbuf);
          exit (1);
        }
      }
      else
#endif
      if (!Incoming) {
        mutt_endwin _("No incoming mailboxes defined.");

        exit (1);
      }
      folder[0] = 0;
      mutt_select_file (folder, sizeof (folder), M_SEL_FOLDER | M_SEL_BUFFY);
      if (!folder[0]) {
        mutt_endwin (NULL);
        exit (0);
      }
    }

    if (!folder[0])
      strfcpy (folder, NONULL (Spoolfile), sizeof (folder));

#ifdef USE_NNTP
    if (option (OPTNEWS)) {
      unset_option (OPTNEWS);
      nntp_expand_path (folder, sizeof (folder),
                        &CurrentNewsSrv->conn->account);
    }
    else
#endif
      mutt_expand_path (folder, sizeof (folder));

    str_replace (&CurrentFolder, folder);
    str_replace (&LastFolder, folder);

    if (flags & M_IGNORE) {
      /* check to see if there are any messages in the folder */
      switch (mx_check_empty (folder)) {
      case -1:
        mutt_endwin (strerror (errno));
        exit (1);
      case 1:
        mutt_endwin _("Mailbox is empty.");
        exit (1);
      }
    }

    mutt_folder_hook (folder);

    if ((Context = mx_open_mailbox (folder, ((flags & M_RO)
                                             || option (OPTREADONLY)) ?
                                    M_READONLY : 0, NULL))
        || !explicit_folder) {
      mutt_index_menu ();
      if (option (OPTXTERMSETTITLES))
        mutt_xterm_set_title (NONULL (XtermLeave));
      if (Context)
        mem_free (&Context);
    }
    mutt_endwin (Errorbuf);
  }

  exit (0);
}


syntax highlighted by Code2HTML, v. 0.9.1