lock_file.c: close(2) file descriptor on failure, avoiding leak.

[nmh] / uip / whatnowsbr.c

diff --git a/uip/whatnowsbr.c b/uip/whatnowsbr.c
index c9cbf50384096b5e6fe556d18cf893db8f7db2e7..72b315f41be2b7c24b724a112e4c263fa46ea0bc 100644 (file)
--- a/uip/whatnowsbr.c
+++ b/uip/whatnowsbr.c
@@ -1,6 +1,4 @@
-
-/*
- * whatnowsbr.c -- the WhatNow shell
+/* whatnowsbr.c -- the WhatNow shell

  *
  * This code is Copyright (c) 2002, by the authors of nmh.  See the
  * COPYRIGHT file in the root directory of the nmh distribution for
  *
  * This code is Copyright (c) 2002, by the authors of nmh.  See the
  * COPYRIGHT file in the root directory of the nmh distribution for


@@ -26,8 +24,9 @@
  *                             pwd command and exists to allow the user
  *                             to verify the directory.
  *
  *                             pwd command and exists to allow the user
  *                             to verify the directory.
  *

- *     attach files            This option attaches the named files to
- *                             the draft.
+ *     attach [-v] files       This option attaches the named files to
+ *                             the draft.  -v displays the mhbuild
+ *                             directive that send(1) will use.

  *
  *     alist [-ln]             This option lists the attachments on the
  *                             draft.  -l gets long listings, -n gets
  *
  *     alist [-ln]             This option lists the attachments on the
  *                             draft.  -l gets long listings, -n gets


@@ -40,9 +39,14 @@
 
 #include <h/mh.h>
 #include <fcntl.h>
 
 #include <h/mh.h>
 #include <fcntl.h>

-#include <signal.h>

 #include <h/mime.h>
 #include <h/utils.h>
 #include <h/mime.h>
 #include <h/utils.h>

+#ifdef OAUTH_SUPPORT
+# include <h/oauth.h>
+#endif
+#include "sbr/m_maildir.h"
+#include "sbr/m_mktemp.h"
+#include "sbr/mime_type.h"

 
 #define WHATNOW_SWITCHES \
     X("draftfolder +folder", 0, DFOLDSW) \
 
 #define WHATNOW_SWITCHES \
     X("draftfolder +folder", 0, DFOLDSW) \


@@ -53,8 +57,7 @@
     X("prompt string", 4, PRMPTSW) \
     X("version", 0, VERSIONSW) \
     X("help", 0, HELPSW) \
     X("prompt string", 4, PRMPTSW) \
     X("version", 0, VERSIONSW) \
     X("help", 0, HELPSW) \

-    X("attach header-field-name", 0, ATTACHSW) \
-    X("noattach", 0, NOATTACHSW) \
+

 
 #define X(sw, minchars, id) id,
 DEFINE_SWITCH_ENUM(WHATNOW);
 
 #define X(sw, minchars, id) id,
 DEFINE_SWITCH_ENUM(WHATNOW);


@@ -81,8 +84,8 @@ DEFINE_SWITCH_ARRAY(WHATNOW, whatnowswitches);
     X("cd [directory]", 0, CDCMDSW) \
     X("pwd", 0, PWDCMDSW) \
     X("ls", 2, LSCMDSW) \
     X("cd [directory]", 0, CDCMDSW) \
     X("pwd", 0, PWDCMDSW) \
     X("ls", 2, LSCMDSW) \

-    X("attach", 0, ATTACHCMDSW) \
-    X("detach [-n]", 2, DETACHCMDSW) \
+    X("attach [-v]", 0, ATTACHCMDSW) \
+    X("detach [-n]", 0, DETACHCMDSW) \

     X("alist [-ln] ", 2, ALISTCMDSW) \
 
 #define X(sw, minchars, id) id,
     X("alist [-ln] ", 2, ALISTCMDSW) \
 
 #define X(sw, minchars, id) id,


@@ -103,18 +106,14 @@ static int editfile (char **, char **, char *, int, struct msgs *,
 static int sendfile (char **, char *, int);
 static void sendit (char *, char **, char *, int);
 static int buildfile (char **, char *);
 static int sendfile (char **, char *, int);
 static void sendit (char *, char **, char *, int);
 static int buildfile (char **, char *);

-static int check_draft (char *);

 static int whomfile (char **, char *);
 static int removefile (char *);
 static int whomfile (char **, char *);
 static int removefile (char *);

+static int checkmimeheader (char *);

 static void writelscmd(char *, int, char *, char **);
 static void writesomecmd(char *buf, int bufsz, char *cmd, char *trailcmd, char **argp);
 static FILE* popen_in_dir(const char *dir, const char *cmd, const char *type);
 static int system_in_dir(const char *dir, const char *cmd);
 static void writelscmd(char *, int, char *, char **);
 static void writesomecmd(char *buf, int bufsz, char *cmd, char *trailcmd, char **argp);
 static FILE* popen_in_dir(const char *dir, const char *cmd, const char *type);
 static int system_in_dir(const char *dir, const char *cmd);

-
-
-#ifdef HAVE_LSTAT

 static int copyf (char *, char *);
 static int copyf (char *, char *);

-#endif

 
 
 int
 
 
 int


@@ -126,7 +125,6 @@ WhatNow (int argc, char **argv)
     char buf[BUFSIZ], prompt[BUFSIZ];
     char **argp, **arguments;
     struct stat st;
     char buf[BUFSIZ], prompt[BUFSIZ];
     char **argp, **arguments;
     struct stat st;

-    char       *attach = NMH_ATTACH_HEADER;/* attachment header field name */

     char       cwd[PATH_MAX + 1];      /* current working directory */
     char       file[PATH_MAX + 1];     /* file name buffer */
     char       shell[PATH_MAX + 1];    /* shell response buffer */
     char       cwd[PATH_MAX + 1];      /* current working directory */
     char       file[PATH_MAX + 1];     /* file name buffer */
     char       shell[PATH_MAX + 1];    /* shell response buffer */


@@ -134,11 +132,9 @@ WhatNow (int argc, char **argv)
     char       *l;                     /* set on -l to alist  command */
     int                n;                      /* set on -n to alist command */
 
     char       *l;                     /* set on -l to alist  command */
     int                n;                      /* set on -n to alist command */
 

+    /* Need this if called from what_now(). */

     invo_name = r1bindex (argv[0], '/');
 
     invo_name = r1bindex (argv[0], '/');
 

-    /* read user profile/context */
-    context_read();
-

     arguments = getarguments (invo_name, argc, argv, 1);
     argp = arguments;
 
     arguments = getarguments (invo_name, argc, argv, 1);
     argp = arguments;
 


@@ -146,7 +142,7 @@ WhatNow (int argc, char **argv)
      * Get the initial current working directory.
      */
 
      * Get the initial current working directory.
      */
 

-    if (getcwd(cwd, sizeof (cwd)) == (char *)0) {
+    if (getcwd(cwd, sizeof (cwd)) == NULL) {

        adios("getcwd", "could not get working directory");
     }
 
        adios("getcwd", "could not get working directory");
     }
 


@@ -199,27 +195,17 @@ WhatNow (int argc, char **argv)
                if (!(myprompt = *argp++) || *myprompt == '-')
                    adios (NULL, "missing argument to %s", argp[-2]);
                continue;
                if (!(myprompt = *argp++) || *myprompt == '-')
                    adios (NULL, "missing argument to %s", argp[-2]);
                continue;

-
-           case ATTACHSW:
-               if (!(attach = *argp++) || *attach == '-')
-                   adios (NULL, "missing argument to %s", argp[-2]);
-               continue;
-
-           case NOATTACHSW:
-               attach = NULL;
-               continue;

            }
        }
        if (drft)
            adios (NULL, "only one draft at a time!");
            }
        }
        if (drft)
            adios (NULL, "only one draft at a time!");

-       else
-           drft = cp;
+        drft = cp;

     }
 
     if ((drft == NULL && (drft = getenv ("mhdraft")) == NULL) || *drft == 0)
        drft = getcpy (m_draft (dfolder, dmsg, 1, &isdf));
 
     }
 
     if ((drft == NULL && (drft = getenv ("mhdraft")) == NULL) || *drft == 0)
        drft = getcpy (m_draft (dfolder, dmsg, 1, &isdf));
 

-    msgnam = (cp = getenv ("mhaltmsg")) && *cp ? getcpy (cp) : NULL;
+    msgnam = (cp = getenv ("mhaltmsg")) && *cp ? mh_xstrdup(cp) : NULL;

 
     if ((cp = getenv ("mhatfile")) && *cp)
        atfile = atoi(cp);
 
     if ((cp = getenv ("mhatfile")) && *cp)
        atfile = atoi(cp);


@@ -240,11 +226,11 @@ WhatNow (int argc, char **argv)
     snprintf (prompt, sizeof(prompt), myprompt, invo_name);
     for (;;) {
 #ifdef READLINE_SUPPORT
     snprintf (prompt, sizeof(prompt), myprompt, invo_name);
     for (;;) {
 #ifdef READLINE_SUPPORT

-       if (!(argp = getans_via_readline (prompt, aleqs))) {
+       if (!(argp = read_switch_multiword_via_readline (prompt, aleqs))) {

 #else /* ! READLINE_SUPPORT */
 #else /* ! READLINE_SUPPORT */

-       if (!(argp = getans (prompt, aleqs))) {
+       if (!(argp = read_switch_multiword (prompt, aleqs))) {

 #endif /* READLINE_SUPPORT */
 #endif /* READLINE_SUPPORT */

-           unlink (LINK);
+           (void) m_unlink (LINK);

            done (1);
        }
        switch (smatch (*argp, aleqs)) {
            done (1);
        }
        switch (smatch (*argp, aleqs)) {


@@ -253,7 +239,7 @@ WhatNow (int argc, char **argv)
            if (msgnam)
                showfile (++argp, msgnam);
            else
            if (msgnam)
                showfile (++argp, msgnam);
            else

-               advise (NULL, "no alternate message to display");
+               inform("no alternate message to display");

            break;
 
        case BUILDMIMESW:
            break;
 
        case BUILDMIMESW:


@@ -287,7 +273,7 @@ WhatNow (int argc, char **argv)
                removefile (drft);
            } else {
                if (stat (drft, &st) != NOTOK)
                removefile (drft);
            } else {
                if (stat (drft, &st) != NOTOK)

-                   advise (NULL, "draft left on %s", drft);
+                   inform("draft left on %s", drft);

            }
            done (1);
 
            }
            done (1);
 


@@ -321,18 +307,17 @@ WhatNow (int argc, char **argv)
             *  is accustomed to.  Read back the absolute path.
             */
 
             *  is accustomed to.  Read back the absolute path.
             */
 

-           if (*(argp+1) == (char *)0) {
-               (void)sprintf(buf, "$SHELL -c \"cd&&pwd\"");
+           if (*(argp+1) == NULL) {
+               strcpy(buf, "$SHELL -c \"cd&&pwd\"");

            }
            else {
                writesomecmd(buf, BUFSIZ, "cd", "pwd", argp);
            }
            }
            else {
                writesomecmd(buf, BUFSIZ, "cd", "pwd", argp);
            }

-           if ((f = popen_in_dir(cwd, buf, "r")) != (FILE *)0) {
-               fgets(cwd, sizeof (cwd), f);
-
-               if (strchr(cwd, '\n') != (char *)0)
-                       *strchr(cwd, '\n') = '\0';
-
+           if ((f = popen_in_dir(cwd, buf, "r")) != NULL) {
+               if (fgets(cwd, sizeof (cwd), f) == NULL) {
+                   advise (buf, "fgets");
+               }
+                trim_suffix_c(cwd, '\n');

                pclose(f);
            }
            else {
                pclose(f);
            }
            else {


@@ -343,7 +328,7 @@ WhatNow (int argc, char **argv)
 
        case PWDCMDSW:
            /* Print the working directory for attachments */
 
        case PWDCMDSW:
            /* Print the working directory for attachments */

-           printf("%s\n", cwd);
+           puts(cwd);

            break;
 
        case LSCMDSW:
            break;
 
        case LSCMDSW:


@@ -364,15 +349,13 @@ WhatNow (int argc, char **argv)
             *   -n     numbers listing
             */
 
             *   -n     numbers listing
             */
 

-           if (attach == (char *)0) {
-               advise((char *)0, "can't list because no header field name was given.");
+           if (checkmimeheader(drft))

                break;
                break;

-           }

 
 

-           l = (char *)0;
+           l = NULL;

            n = 0;
 
            n = 0;
 

-           while (*++argp != (char *)0) {
+           while (*++argp != NULL) {

                if (strcmp(*argp, "-l") == 0)
                    l = "/";
 
                if (strcmp(*argp, "-l") == 0)
                    l = "/";
 


@@ -391,25 +374,35 @@ WhatNow (int argc, char **argv)
            }
 
            if (n == -1)
            }
 
            if (n == -1)

-               advise((char *)0, "usage is alist [-ln].");
+               inform("usage is alist [-ln].");

 
            else
 
            else

-               annolist(drft, attach, l, n);
+               annolist(drft, ATTACH_FIELD, l, n);

 
            break;
 
 
            break;
 

-       case ATTACHCMDSW:
+       case ATTACHCMDSW: {

            /*
             *  Attach files to current draft.
             */
 
            /*
             *  Attach files to current draft.
             */
 

-           if (attach == (char *)0) {
-               advise((char *)0, "can't attach because no header field name was given.");
+            int verbose = 0;
+            char **ap;
+
+           if (checkmimeheader(drft))

                break;
                break;

+
+           for (ap = argp+1; *ap; ++ap) {
+               if (strcmp(*ap, "-v") == 0) {
+                   ++argp;
+                   verbose = 1;
+               } else if (*ap[0] != '-') {
+                   break;
+               }

            }
 
            }
 

-           if (*(argp+1) == (char *)0) {
-               advise((char *)0, "attach command requires file argument(s).");
+           if (*(argp+1) == NULL) {
+               inform("attach command requires file argument(s).");

                break;
            }
 
                break;
            }
 


@@ -417,7 +410,7 @@ WhatNow (int argc, char **argv)
             *  Build a command line that causes the user's shell to list the file name
             *  arguments.  This handles and wildcard expansion, tilde expansion, etc.
             */
             *  Build a command line that causes the user's shell to list the file name
             *  arguments.  This handles and wildcard expansion, tilde expansion, etc.
             */

-           writelscmd(buf, sizeof(buf), "-d", argp);
+           writelscmd(buf, sizeof(buf), "-d --", argp);

 
            /*
             *  Read back the response from the shell, which contains a number of lines
 
            /*
             *  Read back the response from the shell, which contains a number of lines


@@ -427,15 +420,24 @@ WhatNow (int argc, char **argv)
             *  draft.
             */
 
             *  draft.
             */
 

-           if ((f = popen_in_dir(cwd, buf, "r")) != (FILE *)0) {
-               while (fgets(shell, sizeof (shell), f) != (char *)0) {
-                   *(strchr(shell, '\n')) = '\0';
+           if ((f = popen_in_dir(cwd, buf, "r")) != NULL) {
+               while (fgets(shell, sizeof (shell), f) != NULL) {
+                   char *ctype;

 
 

-                   if (*shell == '/')
-                       (void)annotate(drft, attach, shell, 1, 0, -2, 1);
-                   else {
-                       (void)sprintf(file, "%s/%s", cwd, shell);
-                       (void)annotate(drft, attach, file, 1, 0, -2, 1);
+                    trim_suffix_c(shell, '\n');
+
+                   if (*shell == '/') {
+                       strncpy(file, shell, sizeof(file));
+                       file[sizeof(file) - 1] = '\0';
+                   } else {
+                       snprintf(file, sizeof(file), "%s/%s", cwd, shell);
+                   }
+
+                   annotate(drft, ATTACH_FIELD, file, 1, 0, -2, 1);
+                   if (verbose) {
+                       ctype = mime_type(file);
+                       printf ("Attaching %s as a %s\n", file, ctype);
+                       free (ctype);

                    }
                }
 
                    }
                }
 


@@ -446,23 +448,21 @@ WhatNow (int argc, char **argv)
            }
 
            break;
            }
 
            break;

-
+       }

        case DETACHCMDSW:
            /*
             *  Detach files from current draft.
             */
 
        case DETACHCMDSW:
            /*
             *  Detach files from current draft.
             */
 

-           if (attach == (char *)0) {
-               advise((char *)0, "can't detach because no header field name was given.");
-               break;
-           }
-

            /*
             *  Scan the arguments for a -n.  Mixed file names and numbers aren't allowed,
             *  so this catches a -n anywhere in the argument list.
             */
 
            /*
             *  Scan the arguments for a -n.  Mixed file names and numbers aren't allowed,
             *  so this catches a -n anywhere in the argument list.
             */
 

-           for (n = 0, arguments = argp + 1; *arguments != (char *)0; arguments++) {
+           if (checkmimeheader(drft))
+               break;
+
+           for (n = 0, arguments = argp + 1; *arguments != NULL; arguments++) {

                if (strcmp(*arguments, "-n") == 0) {
                        n = 1;
                        break;
                if (strcmp(*arguments, "-n") == 0) {
                        n = 1;
                        break;


@@ -477,15 +477,15 @@ WhatNow (int argc, char **argv)
             */
 
            if (n == 1) {
             */
 
            if (n == 1) {

-               for (arguments = argp + 1; *arguments != (char *)0; arguments++) {
+               for (arguments = argp + 1; *arguments != NULL; arguments++) {

                    if (strcmp(*arguments, "-n") == 0)
                        continue;
 
                    if (**arguments != '\0') {
                        n = atoi(*arguments);
                    if (strcmp(*arguments, "-n") == 0)
                        continue;
 
                    if (**arguments != '\0') {
                        n = atoi(*arguments);

-                       (void)annotate(drft, attach, (char *)0, 1, 0, n, 1);
+                       annotate(drft, ATTACH_FIELD, NULL, 1, 0, n, 1);

 
 

-                       for (argp = arguments + 1; *argp != (char *)0; argp++) {
+                       for (argp = arguments + 1; *argp != NULL; argp++) {

                            if (atoi(*argp) > n) {
                                if (atoi(*argp) == 1)
                                    *argp = "";
                            if (atoi(*argp) > n) {
                                if (atoi(*argp) == 1)
                                    *argp = "";


@@ -506,11 +506,11 @@ WhatNow (int argc, char **argv)
             * We feed all the file names to the shell at once, otherwise you can't
             * provide a file name with a space in it.
             */
             * We feed all the file names to the shell at once, otherwise you can't
             * provide a file name with a space in it.
             */

-           writelscmd(buf, sizeof(buf), "-d", argp);
-           if ((f = popen_in_dir(cwd, buf, "r")) != (FILE *)0) {
-               while (fgets(shell, sizeof (shell), f) != (char *)0) {
-                   *(strchr(shell, '\n')) = '\0';
-                   (void)annotate(drft, attach, shell, 1, 0, 0, 1);
+           writelscmd(buf, sizeof(buf), "-d --", argp);
+           if ((f = popen_in_dir(cwd, buf, "r")) != NULL) {
+               while (fgets(shell, sizeof (shell), f) != NULL) {
+                    trim_suffix_c(shell, '\n');
+                   annotate(drft, ATTACH_FIELD, shell, 1, 0, 0, 1);

                }
                pclose(f);
            } else {
                }
                pclose(f);
            } else {


@@ -521,7 +521,7 @@ WhatNow (int argc, char **argv)
 
        default:
            /* Unknown command */
 
        default:
            /* Unknown command */

-           advise (NULL, "say what?");
+           inform("say what?");

            break;
        }
     }
            break;
        }
     }


@@ -551,15 +551,15 @@ writesomecmd(char *buf, int bufsz, char *cmd, char *trailcmd, char **argp)
      */
     int trailln = strlen(trailcmd) + 4;
     if (ln < 0 || ln + trailln > bufsz)
      */
     int trailln = strlen(trailcmd) + 4;
     if (ln < 0 || ln + trailln > bufsz)

-       adios((char *)0, "arguments too long");
-    
+       adios(NULL, "arguments too long");
+

     cp = buf + ln;
     cp = buf + ln;

-    
-    while (*++argp != (char *)0) {
+
+    while (*argp  &&  *++argp) {

        ln = strlen(*argp);
        /* +1 for leading space */
        if (ln + trailln + 1 > bufsz - (cp-buf))
        ln = strlen(*argp);
        /* +1 for leading space */
        if (ln + trailln + 1 > bufsz - (cp-buf))

-           adios((char *)0, "arguments too long");
+           adios(NULL, "arguments too long");

        *cp++ = ' ';
        memcpy(cp, *argp, ln+1);
        cp += ln;
        *cp++ = ' ';
        memcpy(cp, *argp, ln+1);
        cp += ln;


@@ -580,7 +580,7 @@ writesomecmd(char *buf, int bufsz, char *cmd, char *trailcmd, char **argp)
 static void
 writelscmd(char *buf, int bufsz, char *lsoptions, char **argp)
 {
 static void
 writelscmd(char *buf, int bufsz, char *lsoptions, char **argp)
 {

-  char *lscmd = concat ("ls ", lsoptions, " --", NULL);
+  char *lscmd = concat ("ls ", lsoptions, NULL);

   writesomecmd(buf, bufsz, lscmd, "", argp);
   free (lscmd);
 }
   writesomecmd(buf, bufsz, lscmd, "", argp);
   free (lscmd);
 }


@@ -618,7 +618,7 @@ popen_in_dir(const char *dir, const char *cmd, const char *type)
     /* ensure that $SHELL exists, as the cmd was written relying on
        a non-blank $SHELL... */
     setenv("SHELL","/bin/sh",0); /* don't overwrite */
     /* ensure that $SHELL exists, as the cmd was written relying on
        a non-blank $SHELL... */
     setenv("SHELL","/bin/sh",0); /* don't overwrite */

-    
+

     if (getcwd(olddir, sizeof(olddir)) == 0)
        adios("getcwd", "could not get working directory");
     if (chdir(dir) != 0)
     if (getcwd(olddir, sizeof(olddir)) == 0)
        adios("getcwd", "could not get working directory");
     if (chdir(dir) != 0)


@@ -647,12 +647,10 @@ editfile (char **ed, char **arg, char *file, int use, struct msgs *mp,
     char *cp, *prog, **vec;
     struct stat st;
 
     char *cp, *prog, **vec;
     struct stat st;
 

-#ifdef HAVE_LSTAT

     int        slinked = 0;
     int        slinked = 0;

-#endif /* HAVE_LSTAT */

 
     /* Was there a previous edit session? */
 
     /* Was there a previous edit session? */

-    if (reedit) {
+    if (reedit && (*ed || edsave)) {

        if (!*ed) {             /* no explicit editor      */
            *ed = edsave;       /* so use the previous one */
            if ((cp = r1bindex (*ed, '/')) == NULL)
        if (!*ed) {             /* no explicit editor      */
            *ed = edsave;       /* so use the previous one */
            if ((cp = r1bindex (*ed, '/')) == NULL)


@@ -680,36 +678,37 @@ editfile (char **ed, char **arg, char *file, int use, struct msgs *mp,
            snprintf (linkpath, sizeof(linkpath), "%s/%s", cwd, LINK);
 
        if (atfile) {
            snprintf (linkpath, sizeof(linkpath), "%s/%s", cwd, LINK);
 
        if (atfile) {

-           unlink (linkpath);
-#ifdef HAVE_LSTAT
+           (void) m_unlink (linkpath);

            if (link (altpath, linkpath) == NOTOK) {
            if (link (altpath, linkpath) == NOTOK) {

-               symlink (altpath, linkpath);
+               if (symlink (altpath, linkpath) < 0) {
+                   adios (linkpath, "symlink");
+               }

                slinked = 1;
            } else {
                slinked = 0;
            }
                slinked = 1;
            } else {
                slinked = 0;
            }

-#else /* not HAVE_LSTAT */
-           link (altpath, linkpath);
-#endif /* not HAVE_LSTAT */

        }
     }
 
     context_save ();   /* save the context file */
     fflush (stdout);
 
        }
     }
 
     context_save ();   /* save the context file */
     fflush (stdout);
 

-    switch (pid = vfork()) {
+    switch (pid = fork()) {

        case NOTOK:
            advise ("fork", "unable to");
            status = NOTOK;
            break;
 
        case OK:
        case NOTOK:
            advise ("fork", "unable to");
            status = NOTOK;
            break;
 
        case OK:

-           if (cwd)
-               chdir (cwd);
+           if (cwd) {
+               if (chdir (cwd) < 0) {
+                   advise (cwd, "chdir");
+               }
+           }

            if (altmsg) {
                if (mp)
            if (altmsg) {
                if (mp)

-                   m_putenv ("mhfolder", mp->foldpath);
-               m_putenv ("editalt", altpath);
+                   setenv("mhfolder", mp->foldpath, 1);
+               setenv("editalt", altpath, 1);

            }
 
            vec = argsplit(*ed, &prog, &vecp);
            }
 
            vec = argsplit(*ed, &prog, &vecp);


@@ -731,9 +730,9 @@ editfile (char **ed, char **arg, char *file, int use, struct msgs *mp,
                    && (!reedit || (status & 0x00ff))) {
                    if (!use && (status & 0xff00) &&
                            (rename (file, cp = m_backup (file)) != NOTOK)) {
                    && (!reedit || (status & 0x00ff))) {
                    if (!use && (status & 0xff00) &&
                            (rename (file, cp = m_backup (file)) != NOTOK)) {

-                       advise (NULL, "problems with edit--draft left in %s", cp);
+                       inform("problems with edit--draft left in %s", cp);

                    } else {
                    } else {

-                       advise (NULL, "problems with edit--%s preserved", file);
+                       inform("problems with edit--%s preserved", file);

                    }
                }
                status = -2;    /* maybe "reedit ? -2 : -1"? */
                    }
                }
                status = -2;    /* maybe "reedit ? -2 : -1"? */


@@ -741,7 +740,6 @@ editfile (char **ed, char **arg, char *file, int use, struct msgs *mp,
            }
 
            reedit++;
            }
 
            reedit++;

-#ifdef HAVE_LSTAT

            if (altmsg
                    && mp
                    && !is_readonly(mp)
            if (altmsg
                    && mp
                    && !is_readonly(mp)


@@ -751,19 +749,9 @@ editfile (char **ed, char **arg, char *file, int use, struct msgs *mp,
                                && copyf (linkpath, altpath) == NOTOK
                           : stat (linkpath, &st) != NOTOK
                                && st.st_nlink == 1
                                && copyf (linkpath, altpath) == NOTOK
                           : stat (linkpath, &st) != NOTOK
                                && st.st_nlink == 1

-                               && (unlink (altpath) == NOTOK
+                               && (m_unlink (altpath) == NOTOK

                                        || link (linkpath, altpath) == NOTOK)))
                advise (linkpath, "unable to update %s from", altmsg);
                                        || link (linkpath, altpath) == NOTOK)))
                advise (linkpath, "unable to update %s from", altmsg);

-#else /* HAVE_LSTAT */
-           if (altmsg
-                   && mp
-                   && !is_readonly(mp)
-                   && stat (linkpath, &st) != NOTOK
-                   && st.st_nlink == 1
-                   && (unlink (altpath) == NOTOK
-                       || link (linkpath, altpath) == NOTOK))
-               advise (linkpath, "unable to update %s from", altmsg);
-#endif /* HAVE_LSTAT */

     }
 
     /* normally, we remember which editor we used */
     }
 
     /* normally, we remember which editor we used */


@@ -772,13 +760,12 @@ editfile (char **ed, char **arg, char *file, int use, struct msgs *mp,
 
     *ed = NULL;
     if (altmsg && atfile)
 
     *ed = NULL;
     if (altmsg && atfile)

-       unlink (linkpath);
+       (void) m_unlink (linkpath);

 
     return status;
 }
 
 
 
     return status;
 }
 
 

-#ifdef HAVE_LSTAT

 static int
 copyf (char *ifile, char *ofile)
 {
 static int
 copyf (char *ifile, char *ofile)
 {


@@ -804,7 +791,6 @@ copyf (char *ifile, char *ofile)
     close (out);
     return i;
 }
     close (out);
     return i;
 }

-#endif /* HAVE_LSTAT */

 
 
 /*
 
 
 /*


@@ -815,21 +801,8 @@ static int
 sendfile (char **arg, char *file, int pushsw)
 {
     pid_t child_id;
 sendfile (char **arg, char *file, int pushsw)
 {
     pid_t child_id;

-    int i, vecp;
-    char *cp, *sp, *vec[MAXARGS];
-
-    /* Translate MIME composition file, if necessary */
-    if ((cp = context_find ("automimeproc"))
-           && (!strcmp (cp, "1"))
-           && check_draft (file)
-           && (buildfile (NULL, file) == NOTOK))
-       return 0;
-
-    /* For backwards compatibility */
-    if ((cp = context_find ("automhnproc"))
-           && check_draft (file)
-           && (i = editfile (&cp, NULL, file, NOUSE, NULL, NULL, NULL, 0, 0)))
-       return 0;
+    int vecp;
+    char *cp, *sp, **vec, *program;

 
     /*
      * If the sendproc is the nmh command `send', then we call
 
     /*
      * If the sendproc is the nmh command `send', then we call


@@ -845,14 +818,13 @@ sendfile (char **arg, char *file, int pushsw)
     context_save ();   /* save the context file */
     fflush (stdout);
 
     context_save ();   /* save the context file */
     fflush (stdout);
 

-    for (i = 0; (child_id = vfork()) == NOTOK && i < 5; i++)
-       sleep (5);
+    child_id = fork();

     switch (child_id) {
        case NOTOK:
     switch (child_id) {
        case NOTOK:

-           advise (NULL, "unable to fork, so sending directly...");
+           inform("unable to fork, so sending directly...");
+           /* FALLTHRU */

        case OK:
        case OK:

-           vecp = 0;
-           vec[vecp++] = invo_name;
+           vec = argsplit(sendproc, &program, &vecp);

            if (pushsw)
                vec[vecp++] = "-push";
            if (arg)
            if (pushsw)
                vec[vecp++] = "-push";
            if (arg)


@@ -861,7 +833,7 @@ sendfile (char **arg, char *file, int pushsw)
            vec[vecp++] = file;
            vec[vecp] = NULL;
 
            vec[vecp++] = file;
            vec[vecp] = NULL;
 

-           execvp (sendproc, vec);
+           execvp (program, vec);

            fprintf (stderr, "unable to exec ");
            perror (sendproc);
            _exit (-1);
            fprintf (stderr, "unable to exec ");
            perror (sendproc);
            _exit (-1);


@@ -914,64 +886,6 @@ buildfile (char **argp, char *file)
 }
 
 
 }
 
 

-/*
- *  Check if draft is a mhbuild composition file
- */
-
-static int
-check_draft (char *msgnam)
-{
-    int        state;
-    char buf[BUFSIZ], name[NAMESZ];
-    FILE *fp;
-    m_getfld_state_t gstate = 0;
-
-    if ((fp = fopen (msgnam, "r")) == NULL)
-       return 0;
-    for (;;) {
-       int bufsz = sizeof buf;
-       switch (state = m_getfld (&gstate, name, buf, &bufsz, fp)) {
-           case FLD:
-           case FLDPLUS:
-               /*
-                * If draft already contains any of the
-                * Content-XXX fields, then assume it already
-                * been converted.
-                */
-               if (uprf (name, XXX_FIELD_PRF)) {
-                   fclose (fp);
-                   return 0;
-               }
-               while (state == FLDPLUS) {
-                   bufsz = sizeof buf;
-                   state = m_getfld (&gstate, name, buf, &bufsz, fp);
-               }
-               break;
-
-           case BODY:
-               do {
-                   char *bp;
-
-                   for (bp = buf; *bp; bp++)
-                       if (*bp != ' ' && *bp != '\t' && *bp != '\n') {
-                           fclose (fp);
-                           return 1;
-                       }
-
-                   bufsz = sizeof buf;
-                   state = m_getfld (&gstate, name, buf, &bufsz, fp);
-               } while (state == BODY);
-               /* and fall... */
-
-           default:
-               fclose (fp);
-               return 0;
-       }
-    }
-    m_getfld_state_destroy (&gstate);
-}
-
-

 #ifndef CYRUS_SASL
 # define SASLminc(a) (a)
 #else /* CYRUS_SASL */
 #ifndef CYRUS_SASL
 # define SASLminc(a) (a)
 #else /* CYRUS_SASL */


@@ -1011,27 +925,24 @@ check_draft (char *msgnam)
     X("help", 0, SHELPSW) \
     X("dashstuffing", -12, BITSTUFFSW) \
     X("nodashstuffing", -14, NBITSTUFFSW) \
     X("help", 0, SHELPSW) \
     X("dashstuffing", -12, BITSTUFFSW) \
     X("nodashstuffing", -14, NBITSTUFFSW) \

-    X("mail", -4, MAILSW) \
-    X("saml", -4, SAMLSW) \
-    X("send", -4, SSNDSW) \
-    X("soml", -4, SOMLSW) \

     X("client host", -6, CLIESW) \
     X("server host", 6, SERVSW) \
     X("snoop", -5, SNOOPSW) \
     X("client host", -6, CLIESW) \
     X("server host", 6, SERVSW) \
     X("snoop", -5, SNOOPSW) \

-    X("draftfolder +folder", -6, SDRFSW) \
-    X("draftmessage msg", -6, SDRMSW) \
-    X("nodraftfolder", -3, SNDRFSW) \
-    X("sasl", SASLminc(-4), SASLSW) \
-    X("nosasl", SASLminc(-6), NOSASLSW) \
-    X("saslmaxssf", SASLminc(-10), SASLMXSSFSW) \
-    X("saslmech", SASLminc(-5), SASLMECHSW) \
-    X("user", SASLminc(-4), USERSW) \
-    X("attach file", 6, SNDATTACHSW) \
-    X("noattach", 0, SNDNOATTACHSW) \
-    X("attachformat", 7, SNDATTACHFORMAT) \
+    X("draftfolder +folder", 0, SDRFSW) \
+    X("draftmessage msg", 0, SDRMSW) \
+    X("nodraftfolder", 0, SNDRFSW) \
+    X("sasl", SASLminc(4), SASLSW) \
+    X("nosasl", SASLminc(6), NOSASLSW) \
+    X("saslmech", SASLminc(5), SASLMECHSW) \
+    X("authservice", SASLminc(0), AUTHSERVICESW) \
+    X("user username", SASLminc(4), USERSW) \

     X("port server-port-name/number", 4, PORTSW) \
     X("tls", TLSminc(-3), TLSSW) \
     X("port server-port-name/number", 4, PORTSW) \
     X("tls", TLSminc(-3), TLSSW) \

+    X("initialtls", TLSminc(-10), INITTLSSW) \

     X("notls", TLSminc(-5), NTLSSW) \
     X("notls", TLSminc(-5), NTLSSW) \

+    X("certverify", TLSminc(-10), CERTVERSW) \
+    X("nocertverify", TLSminc(-12), NOCERTVERSW) \
+    X("sendmail program", 0, MTSSM) \

     X("mts smtp|sendmail/smtp|sendmail/pipe", 2, MTSSW) \
     X("messageid localname|random", 2, MESSAGEIDSW) \
 
     X("mts smtp|sendmail/smtp|sendmail/pipe", 2, MTSSW) \
     X("messageid localname|random", 2, MESSAGEIDSW) \
 


@@ -1061,12 +972,12 @@ static void
 sendit (char *sp, char **arg, char *file, int pushed)
 {
     int        vecp, n = 1;
 sendit (char *sp, char **arg, char *file, int pushed)
 {
     int        vecp, n = 1;

-    char *cp, buf[BUFSIZ], **argp;
-    char **arguments, *vec[MAXARGS];
+    char *cp, buf[BUFSIZ], **argp, *program;
+    char **arguments, *savearg[MAXARGS], **vec;
+    const char *user = NULL, *saslmech = NULL;
+    char *auth_svc = NULL;
+    int snoop = 0;

     struct stat st;
     struct stat st;

-    char       *attach = NMH_ATTACH_HEADER;/* attachment header field name */
-    int                attachformat = 1;       /* mhbuild format specifier for
-                                          attachments */

 
 #ifndef        lint
     int        distsw = 0;
 
 #ifndef        lint
     int        distsw = 0;


@@ -1074,17 +985,17 @@ sendit (char *sp, char **arg, char *file, int pushed)
 
     /*
      * Make sure these are defined.  In particular, we need
 
     /*
      * Make sure these are defined.  In particular, we need

-     * vec[1] to be NULL, in case "arg" is NULL below.  It
-     * doesn't matter what is the value of vec[0], but we
+     * savearg[1] to be NULL, in case "arg" is NULL below.  It
+     * doesn't matter what is the value of savearg[0], but we

      * set it to NULL, to help catch "off-by-one" errors.
      */
      * set it to NULL, to help catch "off-by-one" errors.
      */

-    vec[0] = NULL;
-    vec[1] = NULL;
+    savearg[0] = NULL;
+    savearg[1] = NULL;

 
     /*
 
     /*

-     * Temporarily copy arg to vec, since the brkstring() call in
+     * Temporarily copy arg to savearg, since the brkstring() call in

      * getarguments() will wipe it out before it is merged in.
      * getarguments() will wipe it out before it is merged in.

-     * Also, we skip the first element of vec, since getarguments()
+     * Also, we skip the first element of savearg, since getarguments()

      * skips it.  Then we count the number of arguments
      * copied.  The value of "n" will be one greater than
      * this in order to simulate the standard argc/argv.
      * skips it.  Then we count the number of arguments
      * copied.  The value of "n" will be one greater than
      * this in order to simulate the standard argc/argv.


@@ -1092,17 +1003,17 @@ sendit (char *sp, char **arg, char *file, int pushed)
     if (arg) {
        char **bp;
 
     if (arg) {
        char **bp;
 

-       copyip (arg, vec+1, MAXARGS-1);
-       bp = vec+1;
+       copyip (arg, savearg+1, MAXARGS-1);
+       bp = savearg+1;

        while (*bp++)
            n++;
     }
 
     /*
        while (*bp++)
            n++;
     }
 
     /*

-     * Merge any arguments from command line (now in vec)
+     * Merge any arguments from command line (now in savearg)

      * and arguments from profile.
      */
      * and arguments from profile.
      */

-    arguments = getarguments (sp, n, vec, 1);
+    arguments = getarguments (sp, n, savearg, 1);

     argp = arguments;
 
     debugsw = 0;
     argp = arguments;
 
     debugsw = 0;


@@ -1114,18 +1025,29 @@ sendit (char *sp, char **arg, char *file, int pushed)
     annotext = NULL;
     distfile = NULL;
 
     annotext = NULL;
     distfile = NULL;
 

-    vecp = 1;                  /* we'll get the zero'th element later */
+    /*
+     * Get our initial arguments for postproc now
+     */
+
+    vec = argsplit(postproc, &program, &vecp);
+

     vec[vecp++] = "-library";
     vec[vecp++] = getcpy (m_maildir (""));
 
     if ((cp = context_find ("fileproc"))) {
     vec[vecp++] = "-library";
     vec[vecp++] = getcpy (m_maildir (""));
 
     if ((cp = context_find ("fileproc"))) {

-      vec[vecp++] = "-fileproc";
-      vec[vecp++] = cp;
+       vec[vecp++] = "-fileproc";
+       vec[vecp++] = cp;

     }
 
     if ((cp = context_find ("mhlproc"))) {
     }
 
     if ((cp = context_find ("mhlproc"))) {

-      vec[vecp++] = "-mhlproc";
-      vec[vecp++] = cp;
+       vec[vecp++] = "-mhlproc";
+       vec[vecp++] = cp;
+    }
+
+    if ((cp = context_find ("credentials"))) {
+       /* post doesn't read context so need to pass credentials. */
+       vec[vecp++] = "-credentials";
+       vec[vecp++] = cp;

     }
 
     while ((cp = *argp++)) {
     }
 
     while ((cp = *argp++)) {


@@ -1135,7 +1057,7 @@ sendit (char *sp, char **arg, char *file, int pushed)
                    ambigsw (cp, sendswitches);
                    return;
                case UNKWNSW:
                    ambigsw (cp, sendswitches);
                    return;
                case UNKWNSW:

-                   advise (NULL, "-%s unknown\n", cp);
+                   inform("-%s unknown\n", cp);

                    return;
 
                case SHELPSW:
                    return;
 
                case SHELPSW:


@@ -1155,7 +1077,7 @@ sendit (char *sp, char **arg, char *file, int pushed)
 
                case SPLITSW:
                    if (!(cp = *argp++) || sscanf (cp, "%d", &splitsw) != 1) {
 
                case SPLITSW:
                    if (!(cp = *argp++) || sscanf (cp, "%d", &splitsw) != 1) {

-                       advise (NULL, "missing argument to %s", argp[-2]);
+                       inform("missing argument to %s", argp[-2]);

                        return;
                    }
                    continue;
                        return;
                    }
                    continue;


@@ -1183,7 +1105,8 @@ sendit (char *sp, char **arg, char *file, int pushed)
                    continue;
 
                case DEBUGSW:
                    continue;
 
                case DEBUGSW:

-                   debugsw++;  /* fall */
+                   debugsw++;
+                   /* FALLTHRU */

                case NFILTSW:
                case FRMTSW:
                case NFRMTSW:
                case NFILTSW:
                case FRMTSW:
                case NFRMTSW:


@@ -1195,73 +1118,66 @@ sendit (char *sp, char **arg, char *file, int pushed)
                case NMSGDSW:
                case WATCSW:
                case NWATCSW:
                case NMSGDSW:
                case WATCSW:
                case NWATCSW:

-               case MAILSW:
-               case SAMLSW:
-               case SSNDSW:
-               case SOMLSW:
-               case SNOOPSW:

                case SASLSW:
                case NOSASLSW:
                case TLSSW:
                case SASLSW:
                case NOSASLSW:
                case TLSSW:

+               case INITTLSSW:

                case NTLSSW:
                case NTLSSW:

+               case CERTVERSW:
+               case NOCERTVERSW:
+                   vec[vecp++] = --cp;
+                   continue;
+
+               case SNOOPSW:
+                    snoop++;

                    vec[vecp++] = --cp;
                    continue;
 
                    vec[vecp++] = --cp;
                    continue;
 

+               case AUTHSERVICESW:
+#ifdef OAUTH_SUPPORT
+                   if (!(auth_svc = *argp++) || *auth_svc == '-')
+                       adios (NULL, "missing argument to %s", argp[-2]);
+#else
+                    NMH_UNUSED (user);
+                    NMH_UNUSED (auth_svc);
+                   adios (NULL, "not built with OAuth support");
+#endif
+                   continue;
+
+               case SASLMECHSW:
+                    saslmech = *argp;
+                   /* FALLTHRU */

                case ALIASW:
                case FILTSW:
                case WIDTHSW:
                case CLIESW:
                case SERVSW:
                case ALIASW:
                case FILTSW:
                case WIDTHSW:
                case CLIESW:
                case SERVSW:

-               case SASLMXSSFSW:
-               case SASLMECHSW:

                case USERSW:
                case PORTSW:
                case USERSW:
                case PORTSW:

+               case MTSSM:

                case MTSSW:
                case MESSAGEIDSW:
                    vec[vecp++] = --cp;
                    if (!(cp = *argp++) || *cp == '-') {
                case MTSSW:
                case MESSAGEIDSW:
                    vec[vecp++] = --cp;
                    if (!(cp = *argp++) || *cp == '-') {

-                       advise (NULL, "missing argument to %s", argp[-2]);
+                       inform("missing argument to %s", argp[-2]);

                        return;
                    }
                    vec[vecp++] = cp;
                        return;
                    }
                    vec[vecp++] = cp;

+                    user = cp;

                    continue;
 
                case SDRFSW:
                case SDRMSW:
                    if (!(cp = *argp++) || *cp == '-') {
                    continue;
 
                case SDRFSW:
                case SDRMSW:
                    if (!(cp = *argp++) || *cp == '-') {

-                       advise (NULL, "missing argument to %s", argp[-2]);
+                       inform("missing argument to %s", argp[-2]);

                        return;
                    }
                        return;
                    }

-               case SNDRFSW:

                    continue;
                    continue;

-
-               case SNDATTACHSW:
-                   if (!(attach = *argp++) || *attach == '-') {
-                       advise (NULL, "missing argument to %s", argp[-2]);
-                       return;
-                   }
-                   continue;
-               case SNDNOATTACHSW:
-                   attach = NULL;
-                   continue;
-
-               case SNDATTACHFORMAT:
-                   if (! *argp || **argp == '-')
-                       adios (NULL, "missing argument to %s", argp[-1]);
-                   else {
-                       attachformat = atoi (*argp);
-                       if (attachformat < 0 ||
-                           attachformat > ATTACHFORMATS - 1) {
-                           advise (NULL, "unsupported attachformat %d",
-                                   attachformat);
-                           continue;
-                       }
-                   }
-                   ++argp;
+               case SNDRFSW:

                    continue;
            }
        }
                    continue;
            }
        }

-       advise (NULL, "usage: %s [switches]", sp);
+       inform("usage: %s [switches]", sp);

        return;
     }
 
        return;
     }
 


@@ -1269,7 +1185,7 @@ sendit (char *sp, char **arg, char *file, int pushed)
     if ((cp = context_find ("Aliasfile"))) {
        char **ap, *dp;
 
     if ((cp = context_find ("Aliasfile"))) {
        char **ap, *dp;
 

-       dp = getcpy (cp);
+       dp = mh_xstrdup(cp);

        for (ap = brkstring (dp, " ", "\n"); ap && *ap; ap++) {
            vec[vecp++] = "-alias";
            vec[vecp++] = *ap;
        for (ap = brkstring (dp, " ", "\n"); ap && *ap; ap++) {
            vec[vecp++] = "-alias";
            vec[vecp++] = *ap;


@@ -1278,7 +1194,7 @@ sendit (char *sp, char **arg, char *file, int pushed)
 
     if ((cp = getenv ("SIGNATURE")) == NULL || *cp == 0)
        if ((cp = context_find ("signature")) && *cp)
 
     if ((cp = getenv ("SIGNATURE")) == NULL || *cp == 0)
        if ((cp = context_find ("signature")) && *cp)

-           m_putenv ("SIGNATURE", cp);
+           setenv("SIGNATURE", cp, 1);

 
     if ((annotext = getenv ("mhannotate")) == NULL || *annotext == 0)
        annotext = NULL;
 
     if ((annotext = getenv ("mhannotate")) == NULL || *annotext == 0)
        annotext = NULL;


@@ -1294,14 +1210,32 @@ sendit (char *sp, char **arg, char *file, int pushed)
 #endif /* not lint */
            && altmsg) {
        vec[vecp++] = "-dist";
 #endif /* not lint */
            && altmsg) {
        vec[vecp++] = "-dist";

-       distfile = getcpy (m_mktemp2(altmsg, invo_name, NULL, NULL));
-       unlink(distfile);
+       if ((cp = m_mktemp2(altmsg, invo_name, NULL, NULL)) == NULL) {
+           adios(NULL, "unable to create temporary file in %s",
+                 get_temp_dir());
+       }
+       distfile = mh_xstrdup(cp);
+       (void) m_unlink(distfile);

        if (link (altmsg, distfile) == NOTOK)
            adios (distfile, "unable to link %s to", altmsg);
     } else {
        distfile = NULL;
     }
 
        if (link (altmsg, distfile) == NOTOK)
            adios (distfile, "unable to link %s to", altmsg);
     } else {
        distfile = NULL;
     }
 

+#ifdef OAUTH_SUPPORT
+    if (auth_svc == NULL) {
+        if (saslmech  &&  ! strcasecmp(saslmech, "xoauth2")) {
+            adios (NULL, "must specify -authservice with -saslmech xoauth2");
+        }
+    } else {
+        if (user == NULL) {
+            adios (NULL, "must specify -user with -saslmech xoauth2");
+        }
+    }
+#else
+    NMH_UNUSED(saslmech);
+#endif /* OAUTH_SUPPORT */
+

     if (altmsg == NULL || stat (altmsg, &st) == NOTOK) {
        st.st_mtime = 0;
        st.st_dev = 0;
     if (altmsg == NULL || stat (altmsg, &st) == NOTOK) {
        st.st_mtime = 0;
        st.st_dev = 0;


@@ -1310,10 +1244,9 @@ sendit (char *sp, char **arg, char *file, int pushed)
     if ((pushsw = pushed))
        push ();
 
     if ((pushsw = pushed))
        push ();
 

-    vec[0] = r1bindex (postproc, '/');

     closefds (3);
 
     closefds (3);
 

-    if (sendsbr (vec, vecp, file, &st, 1, attach, attachformat) == OK)
+    if (sendsbr (vec, vecp, program, file, &st, 1, auth_svc) == OK)

        done (0);
 }
 
        done (0);
 }
 


@@ -1326,26 +1259,25 @@ whomfile (char **arg, char *file)
 {
     pid_t pid;
     int vecp;
 {
     pid_t pid;
     int vecp;

-    char *vec[MAXARGS];
+    char **vec, *program;

 
     context_save ();   /* save the context file */
     fflush (stdout);
 
 
     context_save ();   /* save the context file */
     fflush (stdout);
 

-    switch (pid = vfork()) {
+    switch (pid = fork()) {

        case NOTOK:
            advise ("fork", "unable to");
            return 1;
 
        case OK:
        case NOTOK:
            advise ("fork", "unable to");
            return 1;
 
        case OK:

-           vecp = 0;
-           vec[vecp++] = r1bindex (whomproc, '/');
-           vec[vecp++] = file;
+           vec = argsplit(whomproc, &program, &vecp);

            if (arg)
                while (*arg)
                    vec[vecp++] = *arg++;
            if (arg)
                while (*arg)
                    vec[vecp++] = *arg++;

+           vec[vecp++] = file;

            vec[vecp] = NULL;
 
            vec[vecp] = NULL;
 

-           execvp (whomproc, vec);
+           execvp (program, vec);

            fprintf (stderr, "unable to exec ");
            perror (whomproc);
            _exit (-1);         /* NOTREACHED */
            fprintf (stderr, "unable to exec ");
            perror (whomproc);
            _exit (-1);         /* NOTREACHED */


@@ -1363,8 +1295,51 @@ whomfile (char **arg, char *file)
 static int
 removefile (char *drft)
 {
 static int
 removefile (char *drft)
 {

-    if (unlink (drft) == NOTOK)
+    if (m_unlink (drft) == NOTOK)

        adios (drft, "unable to unlink");
 
     return OK;
 }
        adios (drft, "unable to unlink");
 
     return OK;
 }

+
+
+/*
+ * Return 1 if we already have a MIME-Version header, 0 otherwise.
+ */
+
+static int
+checkmimeheader (char *drft)
+{
+    FILE *f;
+    m_getfld_state_t gstate;
+    char buf[NMH_BUFSIZ], name[NAMESZ];
+    int state, retval = 0;
+
+    if ((f = fopen(drft, "r")) == NULL) {
+       admonish(drft, "unable to read draft");
+       return (0);
+    }
+
+    gstate = m_getfld_state_init(f);
+    for (;;) {
+       int bufsz = sizeof(buf);
+       switch (state = m_getfld2(&gstate, name, buf, &bufsz)) {
+       case FLD:
+       case FLDPLUS:
+           if (strcasecmp(name, VRSN_FIELD) == 0) {
+               inform("Cannot use attach commands with already-"
+                      "formatted MIME message \"%s\"", drft);
+               retval = 1;
+               break;
+           }
+           continue;
+       default:
+           break;
+       }
+       break;
+    }
+
+    m_getfld_state_destroy(&gstate);
+    fclose(f);
+
+    return retval;
+}