Fix uip/whom.c for C89 compatibility
[mmh] / uip / mhpath.c
index 918371a..31e0722 100644 (file)
-
 /*
- * mhpath.c -- print full pathnames of nmh messages and folders
- *
- * $Id$
- */
+** mhpath.c -- print full pathnames of nmh messages and folders
+**
+** This code is Copyright (c) 2002, by the authors of nmh.  See the
+** COPYRIGHT file in the root directory of the nmh distribution for
+** complete copyright information.
+*/
 
 #include <h/mh.h>
+#include <h/utils.h>
+#include <unistd.h>
+#include <locale.h>
+#include <sysexits.h>
 
 static struct swit switches[] = {
 #define VERSIONSW 0
-    { "version", 0 },
-#define        HELPSW  1
-    { "help", 4 },
-    { NULL, 0 }
+       { "Version", 0 },
+#define HELPSW  1
+       { "help", 0 },
+       { NULL, 0 }
 };
 
-/*
- * Add space for message/sequence names
- * by MAXMSGS at a time.
- */
-#define MAXMSGS 256
-
+char *version=VERSION;
 
 int
 main(int argc, char **argv)
 {
-    int i, maxmsgs, nummsgs;
-    char *cp, *maildir, *folder = NULL;
-    char **argp, **msgs;
-    char **arguments, buf[BUFSIZ];
-    struct msgs *mp;
-
-#ifdef LOCALE
-    setlocale(LC_ALL, "");
-#endif
-    invo_name = r1bindex (argv[0], '/');
-
-    /* read user profile/context */
-    context_read();
-
-    arguments = getarguments (invo_name, argc, argv, 1);
-    argp = arguments;
-
-    /*
-     * Allocate initial space to record message
-     * and sequence names
-     */
-    nummsgs = 0;
-    maxmsgs = MAXMSGS;
-    if (!(msgs = (char **) malloc ((size_t) (maxmsgs * sizeof(*msgs)))))
-       adios (NULL, "unable to allocate storage");
-
-    /*
-     * Parse arguments
-     */
-    while ((cp = *argp++)) {
-       if (*cp == '-') {
-           switch (smatch (++cp, switches)) {
-               case AMBIGSW: 
-                   ambigsw (cp, switches);
-                   done (1);
-               case UNKWNSW: 
-                   adios (NULL, "-%s unknown", cp);
-
-               case HELPSW: 
-                   snprintf (buf, sizeof(buf), "%s [+folder] [msgs] [switches]",
-                       invo_name);
-                   print_help (buf, switches, 1);
-                   done (1);
-               case VERSIONSW:
-                   print_version(invo_name);
-                   done (1);
-           }
+       int i;
+       char *cp, *maildir, *folder = NULL;
+       char **argp;
+       char **arguments, buf[BUFSIZ];
+       struct msgs_array msgs = { 0, 0, NULL };
+       struct msgs *mp;
+
+       setlocale(LC_ALL, "");
+       invo_name = mhbasename(argv[0]);
+
+       /* read user profile/context */
+       context_read();
+
+       arguments = getarguments(invo_name, argc, argv, 1);
+       argp = arguments;
+
+       /*
+       ** Parse arguments
+       */
+       while ((cp = *argp++)) {
+               if (*cp == '-') {
+                       switch (smatch(++cp, switches)) {
+                       case AMBIGSW:
+                               ambigsw(cp, switches);
+                               exit(EX_USAGE);
+                       case UNKWNSW:
+                               adios(EX_USAGE, NULL, "-%s unknown", cp);
+
+                       case HELPSW:
+                               snprintf(buf, sizeof(buf), "%s [+folder] [msgs] [switches]", invo_name);
+                               print_help(buf, switches, 1);
+                               exit(argc == 2 ? EX_OK : EX_USAGE);
+                       case VERSIONSW:
+                               print_version(invo_name);
+                               exit(argc == 2 ? EX_OK : EX_USAGE);
+                       }
+               }
+               if (*cp == '+' || *cp == '@') {
+                       if (folder) {
+                               adios(EX_USAGE, NULL, "only one folder at a time!");
+                       } else {
+                               folder = mh_xstrdup(expandfol(cp));
+                       }
+               } else {
+                       app_msgarg(&msgs, cp);
+               }
        }
-       if (*cp == '+' || *cp == '@') {
-           if (folder)
-               adios (NULL, "only one folder at a time!");
-           else
-               folder = path (cp + 1, *cp == '+' ? TFOLDER : TSUBCWF);
-       } else {
-           /*
-            * if necessary, reallocate space for
-            * message/sequence names
-            */
-           if (nummsgs >= maxmsgs) {
-               maxmsgs += MAXMSGS;
-               if (!(msgs = (char **) realloc (msgs,
-                       (size_t) (maxmsgs * sizeof(*msgs)))))
-                   adios (NULL, "unable to reallocate msgs storage ");
-           }
-           msgs[nummsgs++] = cp;
+
+       if (!folder)
+               folder = getcurfol();
+       maildir = toabsdir(folder);
+
+       /* If no messages are given, print folder pathname */
+       if (!msgs.size) {
+               printf("%s\n", maildir);
+               exit(EX_OK);
        }
-    }
-
-    if (!context_find ("path"))
-       free (path ("./", TFOLDER));
-
-    if (!folder)
-       folder = getfolder (1);
-    maildir = m_maildir (folder);
-
-    /* If no messages are given, print folder pathname */
-    if (!nummsgs) {
-       printf ("%s\n", maildir);
-       done (0);
-    }
-
-    if (chdir (maildir) == NOTOK)
-       adios (maildir, "unable to change directory to");
-
-    /* read folder and create message structure */
-    if (!(mp = folder_read (folder)))
-       adios (NULL, "unable to read folder %s", folder);
-
-    /*
-     * We need to make sure there is message status space
-     * for all the message numbers from 1 to "new" since
-     * mhpath can select empty slots.  If we are adding
-     * space at the end, we go ahead and add 10 slots.
-     */
-    if (mp->hghmsg >= mp->hghoff) {
-       if (!(mp = folder_realloc (mp, 1, mp->hghmsg + 10)))
-           adios (NULL, "unable to allocate folder storage");
-    } else if (mp->lowoff > 1) {
-       if (!(mp = folder_realloc (mp, 1, mp->hghoff)))
-           adios (NULL, "unable to allocate folder storage");
-    }
-
-    mp->msgflags |= ALLOW_NEW; /* allow the "new" sequence */
-
-    /* parse all the message ranges/sequences and set SELECTED */
-    for (i = 0; i < nummsgs; i++)
-       if (!m_convert (mp, msgs[i]))
-           done (1);
-
-    seq_setprev (mp);  /* set the previous-sequence */
-
-    /* print the path of all selected messages */
-    for (i = mp->lowsel; i <= mp->hghsel; i++)
-       if (is_selected (mp, i))
-           printf ("%s/%s\n", mp->foldpath, m_name (i));
-
-    seq_save (mp);     /* synchronize message sequences */
-    context_save ();   /* save the context file         */
-    folder_free (mp);  /* free folder/message structure */
-    return done (0);
+
+       if (chdir(maildir) == NOTOK)
+               adios(EX_OSERR, maildir, "unable to change directory to");
+
+       /* read folder and create message structure */
+       if (!(mp = folder_read(folder)))
+               adios(EX_IOERR, NULL, "unable to read folder %s", folder);
+
+       /*
+       ** We need to make sure there is message status space
+       ** for all the message numbers from 1 to one beyond last since
+       ** mhpath can select empty slots.  If we are adding
+       ** space at the end, we go ahead and add 10 slots.
+       */
+       if (mp->hghmsg >= mp->hghoff) {
+               if (!(mp = folder_realloc(mp, 1, mp->hghmsg + 10))) {
+                       adios(EX_OSERR, NULL, "unable to allocate folder storage");
+               }
+       } else if (mp->lowoff > 1) {
+               if (!(mp = folder_realloc(mp, 1, mp->hghoff))) {
+                       adios(EX_OSERR, NULL, "unable to allocate folder storage");
+               }
+       }
+       /*
+       ** TODO: As folder_realloc() checks itself if the realloc
+       ** really is necessary, why don't we then:
+       **    if (!(mp = folder_realloc (mp, 1, mp->hghmsg+1)))
+       **        adios (NULL, "unable to allocate folder storage");
+       ** ? This at least appears most clear to me. -- meillo
+       */
+
+
+       mp->msgflags |= ALLOW_BEYOND;  /* allow the beyond sequence */
+
+       /* parse all the message ranges/sequences and set SELECTED */
+       for (i = 0; i < msgs.size; i++) {
+               if (!m_convert(mp, msgs.msgs[i])) {
+                       exit(EX_SOFTWARE);
+               }
+       }
+
+       seq_setprev(mp);  /* set the previous-sequence */
+
+       /* print the path of all selected messages */
+       for (i = mp->lowsel; i <= mp->hghsel; i++)
+               if (is_selected(mp, i))
+                       printf("%s/%s\n", mp->foldpath, m_name(i));
+
+       seq_save(mp);  /* synchronize message sequences */
+       context_save();  /* save the context file */
+       folder_free(mp);  /* free folder/message structure */
+       return EX_OK;
 }