Alter HasSuffixC()'s char * to be const.

[nmh] / uip / refile.c

diff --git a/uip/refile.c b/uip/refile.c
index 8dd04fb92a46355de6c6ae280f243f9d03eaf31f..ce56c51e8d3b53e344282ae164b219114564a42d 100644 (file)
--- a/uip/refile.c
+++ b/uip/refile.c
@@ -11,7 +11,6 @@
 #include <h/mh.h>
 #include <h/utils.h>
 #include <fcntl.h>
 #include <h/mh.h>
 #include <h/utils.h>
 #include <fcntl.h>

-#include <errno.h>

 
 #define REFILE_SWITCHES \
     X("draft", 0, DRAFTSW) \
 
 #define REFILE_SWITCHES \
     X("draft", 0, DRAFTSW) \


@@ -19,6 +18,8 @@
     X("nolink", 0, NLINKSW) \
     X("preserve", 0, PRESSW) \
     X("nopreserve", 0, NPRESSW) \
     X("nolink", 0, NLINKSW) \
     X("preserve", 0, PRESSW) \
     X("nopreserve", 0, NPRESSW) \

+    X("retainsequences", 0, RETAINSEQSSW) \
+    X("noretainsequences", 0, NRETAINSEQSSW) \

     X("unlink", 0, UNLINKSW) \
     X("nounlink", 0, NUNLINKSW) \
     X("src +folder", 0, SRCSW) \
     X("unlink", 0, UNLINKSW) \
     X("nounlink", 0, NUNLINKSW) \
     X("src +folder", 0, SRCSW) \


@@ -46,16 +47,17 @@ struct st_fold {
 /*
  * static prototypes
  */
 /*
  * static prototypes
  */

-static void opnfolds (struct st_fold *, int);
+static void opnfolds (struct msgs *, struct st_fold *, int);

 static void clsfolds (struct st_fold *, int);
 static void remove_files (int, char **);
 static void clsfolds (struct st_fold *, int);
 static void remove_files (int, char **);

-static int m_file (char *, struct st_fold *, int, int, int);
+static int m_file (struct msgs *, char *, int, struct st_fold *, int, int, int);
+static void copy_seqs (struct msgs *, int, struct msgs *, int);

 
 
 int
 main (int argc, char **argv)
 {
 
 
 int
 main (int argc, char **argv)
 {

-    int        linkf = 0, preserve = 0, filep = 0;
+    int linkf = 0, preserve = 0, retainseqs = 0, filep = 0;

     int foldp = 0, isdf = 0, unlink_msgs = 0;
     int i, msgnum;
     char *cp, *folder = NULL, buf[BUFSIZ];
     int foldp = 0, isdf = 0, unlink_msgs = 0;
     int i, msgnum;
     char *cp, *folder = NULL, buf[BUFSIZ];


@@ -66,13 +68,7 @@ main (int argc, char **argv)
     struct msgs_array msgs = { 0, 0, NULL };
     struct msgs *mp;
 
     struct msgs_array msgs = { 0, 0, NULL };
     struct msgs *mp;
 

-#ifdef LOCALE
-    setlocale(LC_ALL, "");
-#endif
-    invo_name = r1bindex (argv[0], '/');
-
-    /* read user profile/context */
-    context_read();
+    if (nmh_init(argv[0], 1)) { return 1; }

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


@@ -83,13 +79,13 @@ main (int argc, char **argv)
     while ((cp = *argp++)) {
        if (*cp == '-') {
            switch (smatch (++cp, switches)) {
     while ((cp = *argp++)) {
        if (*cp == '-') {
            switch (smatch (++cp, switches)) {

-           case AMBIGSW: 
+           case AMBIGSW:

                ambigsw (cp, switches);
                done (1);
                ambigsw (cp, switches);
                done (1);

-           case UNKWNSW: 
+           case UNKWNSW:

                adios (NULL, "-%s unknown\n", cp);
 
                adios (NULL, "-%s unknown\n", cp);
 

-           case HELPSW: 
+           case HELPSW:

                snprintf (buf, sizeof(buf), "%s [msgs] [switches] +folder ...",
                          invo_name);
                print_help (buf, switches, 1);
                snprintf (buf, sizeof(buf), "%s [msgs] [switches] +folder ...",
                          invo_name);
                print_help (buf, switches, 1);


@@ -98,20 +94,27 @@ main (int argc, char **argv)
                print_version(invo_name);
                done (0);
 
                print_version(invo_name);
                done (0);
 

-           case LINKSW: 
+           case LINKSW:

                linkf++;
                continue;
                linkf++;
                continue;

-           case NLINKSW: 
+           case NLINKSW:

                linkf = 0;
                continue;
 
                linkf = 0;
                continue;
 

-           case PRESSW: 
+           case PRESSW:

                preserve++;
                continue;
                preserve++;
                continue;

-           case NPRESSW: 
+           case NPRESSW:

                preserve = 0;
                continue;
 
                preserve = 0;
                continue;
 

+           case RETAINSEQSSW:
+               retainseqs = 1;
+               continue;
+           case NRETAINSEQSSW:
+               retainseqs = 0;
+               continue;
+

            case UNLINKSW:
                unlink_msgs++;
                continue;
            case UNLINKSW:
                unlink_msgs++;
                continue;


@@ -119,7 +122,7 @@ main (int argc, char **argv)
                unlink_msgs = 0;
                continue;
 
                unlink_msgs = 0;
                continue;
 

-           case SRCSW: 
+           case SRCSW:

                if (folder)
                    adios (NULL, "only one source folder at a time!");
                if (!(cp = *argp++) || *cp == '-')
                if (folder)
                    adios (NULL, "only one source folder at a time!");
                if (!(cp = *argp++) || *cp == '-')


@@ -133,7 +136,7 @@ main (int argc, char **argv)
                isdf = 0;
                files[filep++] = getcpy (m_draft (NULL, NULL, 1, &isdf));
                continue;
                isdf = 0;
                files[filep++] = getcpy (m_draft (NULL, NULL, 1, &isdf));
                continue;

-           case FILESW: 
+           case FILESW:

                if (filep > NFOLDERS)
                    adios (NULL, "only %d files allowed!", NFOLDERS);
                if (!(cp = *argp++) || *cp == '-')
                if (filep > NFOLDERS)
                    adios (NULL, "only %d files allowed!", NFOLDERS);
                if (!(cp = *argp++) || *cp == '-')


@@ -141,11 +144,11 @@ main (int argc, char **argv)
                files[filep++] = path (cp, TFILE);
                continue;
 
                files[filep++] = path (cp, TFILE);
                continue;
 

-           case RPROCSW: 
+           case RPROCSW:

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

-           case NRPRCSW: 
+           case NRPRCSW:

                rmmproc = NULL;
                continue;
            }
                rmmproc = NULL;
                continue;
            }


@@ -164,20 +167,15 @@ main (int argc, char **argv)
     if (foldp == 0)
        adios (NULL, "no folder specified");
 
     if (foldp == 0)
        adios (NULL, "no folder specified");
 

-#ifdef WHATNOW
-    if (!msgs.size && !foldp && !filep && (cp = getenv ("mhdraft")) && *cp)
-       files[filep++] = cp;
-#endif /* WHATNOW */
-

     /*
      * We are refiling a file to the folders
      */
     if (filep > 0) {
        if (folder || msgs.size)
            adios (NULL, "use -file or some messages, not both");
     /*
      * We are refiling a file to the folders
      */
     if (filep > 0) {
        if (folder || msgs.size)
            adios (NULL, "use -file or some messages, not both");

-       opnfolds (folders, foldp);
+       opnfolds (NULL, folders, foldp);

        for (i = 0; i < filep; i++)
        for (i = 0; i < filep; i++)

-           if (m_file (files[i], folders, foldp, preserve, 0))
+           if (m_file (0, files[i], 0, folders, foldp, preserve, 0))

                done (1);
        /* If -nolink, then "remove" files */
        if (!linkf)
                done (1);
        /* If -nolink, then "remove" files */
        if (!linkf)


@@ -209,7 +207,7 @@ main (int argc, char **argv)
     seq_setprev (mp);  /* set the previous-sequence */
 
     /* create folder structures for each destination folder */
     seq_setprev (mp);  /* set the previous-sequence */
 
     /* create folder structures for each destination folder */

-    opnfolds (folders, foldp);
+    opnfolds (mp, folders, foldp);

 
     /* Link all the selected messages into destination folders.
      *
 
     /* Link all the selected messages into destination folders.
      *


@@ -219,24 +217,36 @@ main (int argc, char **argv)
      */
     for (msgnum = mp->lowsel; msgnum <= mp->hghsel; msgnum++) {
        if (is_selected (mp, msgnum)) {
      */
     for (msgnum = mp->lowsel; msgnum <= mp->hghsel; msgnum++) {
        if (is_selected (mp, msgnum)) {

-           cp = getcpy (m_name (msgnum));
-           if (m_file (cp, folders, foldp, preserve, !linkf))
+           cp = mh_xstrdup(m_name (msgnum));
+           if (m_file (mp, cp, retainseqs ? msgnum : 0, folders, foldp,
+                        preserve, !linkf))

                done (1);
            free (cp);
        }
     }
 
     /*
                done (1);
            free (cp);
        }
     }
 
     /*

-     * This is a hack.  If we are using an external rmmproc,
-     * then save the current folder to the context file,
-     * so the external rmmproc will remove files from the correct
-     * directory.  This should be moved to folder_delmsgs().
+     * Update this now, since folder_delmsgs() will save the context
+     * but doesn't have access to the folder name.

      */
      */

-    if (rmmproc) {
-       context_replace (pfolder, folder);
-       context_save ();
-       fflush (stdout);
-    }
+
+    context_replace (pfolder, folder); /* update current folder   */
+
+    /*
+     * Adjust "cur" if necessary
+     */
+
+    if (mp->hghsel != mp->curmsg
+       && (mp->numsel != mp->nummsg || linkf))
+       seq_setcur (mp, mp->hghsel);
+
+    /*
+     * Close destination folders now; if we are using private sequences
+     * we need to have all of our calls to seq_save() complete before we
+     * call context_save().
+     */
+
+    clsfolds (folders, foldp);

 
     /* If -nolink, then "remove" messages from source folder.
      *
 
     /* If -nolink, then "remove" messages from source folder.
      *


@@ -245,17 +255,11 @@ main (int argc, char **argv)
      */
     if (!linkf) {
        folder_delmsgs (mp, unlink_msgs, 1);
      */
     if (!linkf) {
        folder_delmsgs (mp, unlink_msgs, 1);

+    } else {
+       seq_save (mp);  /* synchronize message sequences */
+       context_save ();                        /* save the context file   */

     }
 
     }
 

-    clsfolds (folders, foldp);
-
-    if (mp->hghsel != mp->curmsg
-       && (mp->numsel != mp->nummsg || linkf))
-       seq_setcur (mp, mp->hghsel);
-    seq_save (mp);     /* synchronize message sequences */
-
-    context_replace (pfolder, folder); /* update current folder   */
-    context_save ();                   /* save the context file   */

     folder_free (mp);                  /* free folder structure   */
     done (0);
     return 1;
     folder_free (mp);                  /* free folder structure   */
     done (0);
     return 1;


@@ -268,27 +272,41 @@ main (int argc, char **argv)
  */
 
 static void
  */
 
 static void

-opnfolds (struct st_fold *folders, int nfolders)
+opnfolds (struct msgs *src_folder, struct st_fold *folders, int nfolders)

 {
     char nmaildir[BUFSIZ];
 {
     char nmaildir[BUFSIZ];

-    register struct st_fold *fp, *ep;
-    register struct msgs *mp;
+    struct st_fold *fp, *ep;
+    struct msgs *mp;

 
     for (fp = folders, ep = folders + nfolders; fp < ep; fp++) {
 
     for (fp = folders, ep = folders + nfolders; fp < ep; fp++) {

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

        strncpy (nmaildir, m_maildir (fp->f_name), sizeof(nmaildir));
 
        strncpy (nmaildir, m_maildir (fp->f_name), sizeof(nmaildir));
 

-    create_folder (nmaildir, 0, done);
-
-       if (chdir (nmaildir) == NOTOK)
-           adios (nmaildir, "unable to change directory to");
-       if (!(mp = folder_read (fp->f_name, 1)))
-           adios (NULL, "unable to read folder %s", fp->f_name);
-       mp->curmsg = 0;
-
-       fp->f_mp = mp;
+       /*
+        * Null src_folder indicates that we are refiling a file to
+        * the folders, in which case we don't want to short-circuit
+        * fp->f_mp to any "source folder".
+        */
+       if (! src_folder  ||  strcmp (src_folder->foldpath, nmaildir)) {
+           create_folder (nmaildir, 0, done);
+
+           if (chdir (nmaildir) == NOTOK)
+               adios (nmaildir, "unable to change directory to");
+           if (!(mp = folder_read (fp->f_name, 1)))
+               adios (NULL, "unable to read folder %s", fp->f_name);
+           mp->curmsg = 0;
+
+           fp->f_mp = mp;
+       } else {
+           /* Source and destination folders are the same. */
+           fp->f_mp = src_folder;
+       }

 
 

-       chdir (maildir);
+       if (maildir[0] != '\0'  &&  chdir (maildir) < 0) {
+           advise (maildir, "chdir");
+       }

     }
 }
 
     }
 }
 


@@ -301,8 +319,8 @@ opnfolds (struct st_fold *folders, int nfolders)
 static void
 clsfolds (struct st_fold *folders, int nfolders)
 {
 static void
 clsfolds (struct st_fold *folders, int nfolders)
 {

-    register struct st_fold *fp, *ep;
-    register struct msgs *mp;
+    struct st_fold *fp, *ep;
+    struct msgs *mp;

 
     for (fp = folders, ep = folders + nfolders; fp < ep; fp++) {
        mp = fp->f_mp;
 
     for (fp = folders, ep = folders + nfolders; fp < ep; fp++) {
        mp = fp->f_mp;


@@ -340,26 +358,61 @@ remove_files (int filep, char **files)
     /* Else just unlink the files */
     files++;   /* advance past filevec[0] */
     for (i = 0; i < filep; i++) {
     /* Else just unlink the files */
     files++;   /* advance past filevec[0] */
     for (i = 0; i < filep; i++) {

-       if (unlink (files[i]) == NOTOK)
+       if (m_unlink (files[i]) == NOTOK)

            admonish (files[i], "unable to unlink");
     }
 }
 
 
 /*
            admonish (files[i], "unable to unlink");
     }
 }
 
 
 /*

- * Link (or copy) the message into each of
- * the destination folders.
+ * Link (or copy) the message into each of the destination folders.
+ * If oldmsgnum is not 0, call copy_seqs().

  */
 
 static int
  */
 
 static int

-m_file (char *msgfile, struct st_fold *folders, int nfolders, int preserve, int refile)
+m_file (struct msgs *mp, char *msgfile, int oldmsgnum,
+       struct st_fold *folders, int nfolders, int preserve, int refile)

 {
     int msgnum;
     struct st_fold *fp, *ep;
 
     for (fp = folders, ep = folders + nfolders; fp < ep; fp++) {
 {
     int msgnum;
     struct st_fold *fp, *ep;
 
     for (fp = folders, ep = folders + nfolders; fp < ep; fp++) {

-       if ((msgnum = folder_addmsg (&fp->f_mp, msgfile, 1, 0, preserve, nfolders == 1 && refile, maildir)) == -1)
+       /*
+        * With same source and destination folder, don't indicate that
+        * the new message is selected so that 1) folder_delmsgs() doesn't
+        * delete it later and 2) it is not reflected in mp->hghsel, and
+        * therefore won't be assigned to be the current message.
+        */
+       if ((msgnum = folder_addmsg (&fp->f_mp, msgfile,
+                                    mp == fp->f_mp ? 0 : 1,
+                                    0, preserve, nfolders == 1 && refile,
+                                    maildir)) == -1)

            return 1;
            return 1;

+       if (oldmsgnum) copy_seqs (mp, oldmsgnum, fp->f_mp, msgnum);

     }
     return 0;
 }
     }
     return 0;
 }

+
+
+/*
+ * Copy sequence information for a refiled message to its
+ * new folder.  Skip the cur sequence.
+ */
+static void
+copy_seqs (struct msgs *oldmp, int oldmsgnum, struct msgs *newmp, int newmsgnum)
+{
+    char **seq;
+    size_t seqnum;
+
+    for (seq = svector_strs (oldmp->msgattrs), seqnum = 0;
+        *seq && seqnum < svector_size (oldmp->msgattrs);
+        ++seq, ++seqnum) {
+       if (strcmp (current, *seq)) {
+           assert ((int) seqnum == seq_getnum (oldmp, *seq));
+           if (in_sequence (oldmp, seqnum, oldmsgnum)) {
+               seq_addmsg (newmp, *seq, newmsgnum,
+                           is_seq_private (oldmp, seqnum) ? 0 : 1, 0);
+           }
+       }
+    }
+}