X-Git-Url: http://git.marmaro.de/?p=mmh;a=blobdiff_plain;f=uip%2Frefile.c;h=682f66a5c84d7d23cb2cc9cda544e6c28bea7ad2;hp=b1c2aa98a8782206e5e531558cddfe6c8940fd1f;hb=6e9577f324bef90765a5edc02044eb111ec48072;hpb=ced6090a330d3d83d0bce709f756aa3d7d65fea4 diff --git a/uip/refile.c b/uip/refile.c index b1c2aa9..682f66a 100644 --- a/uip/refile.c +++ b/uip/refile.c @@ -11,35 +11,28 @@ #include #include #include +#include +#include +#include static struct swit switches[] = { #define LINKSW 0 { "link", 0 }, #define NLINKSW 1 - { "nolink", 0 }, -#define PRESSW 2 - { "preserve", 0 }, -#define NPRESSW 3 - { "nopreserve", 0 }, -#define UNLINKSW 4 - { "unlink", 0 }, -#define NUNLINKSW 5 - { "nounlink", 0 }, -#define SRCSW 6 + { "nolink", 2 }, +#define SRCSW 2 { "src +folder", 0 }, -#define FILESW 7 +#define FILESW 3 { "file file", 0 }, -#define RPROCSW 8 - { "rmmproc program", 0 }, -#define NRPRCSW 9 - { "normmproc", 0 }, -#define VERSIONSW 10 - { "version", 0 }, -#define HELPSW 11 +#define VERSIONSW 4 + { "Version", 0 }, +#define HELPSW 5 { "help", 0 }, { NULL, 0 } }; +char *version=VERSION; + static char maildir[BUFSIZ]; struct st_fold { @@ -50,35 +43,31 @@ struct st_fold { /* ** static prototypes */ -static void opnfolds (struct st_fold *, int); -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 void opnfolds(struct st_fold *, int); +static void clsfolds(struct st_fold *, int); +static int m_file(char *, struct st_fold *, int, int); int -main (int argc, char **argv) +main(int argc, char **argv) { - int linkf = 0, preserve = 0, filep = 0; - int foldp = 0, unlink_msgs = 0; + int linkf = 0, filep = 0; + int foldp = 0; int i, msgnum; char *cp, *folder = NULL, buf[BUFSIZ]; char **argp, **arguments; - char *filevec[NFOLDERS + 2]; - char **files = &filevec[1]; /* leave room for remove_files:vec[0] */ + char *filevec[NFOLDERS + 1]; + char **files = filevec; struct st_fold folders[NFOLDERS + 1]; struct msgs_array msgs = { 0, 0, NULL }; struct msgs *mp; -#ifdef LOCALE setlocale(LC_ALL, ""); -#endif - invo_name = r1bindex (argv[0], '/'); + invo_name = mhbasename(argv[0]); - /* read user profile/context */ context_read(); - arguments = getarguments (invo_name, argc, argv, 1); + arguments = getarguments(invo_name, argc, argv, 1); argp = arguments; /* @@ -86,20 +75,20 @@ main (int argc, char **argv) */ while ((cp = *argp++)) { if (*cp == '-') { - switch (smatch (++cp, switches)) { + switch (smatch(++cp, switches)) { case AMBIGSW: - ambigsw (cp, switches); - done (1); + ambigsw(cp, switches); + exit(EX_USAGE); case UNKWNSW: - adios (NULL, "-%s unknown\n", cp); + adios(EX_USAGE, NULL, "-%s unknown\n", cp); case HELPSW: - snprintf (buf, sizeof(buf), "%s [msgs] [switches] +folder ...", invo_name); - print_help (buf, switches, 1); - done (1); + snprintf(buf, sizeof(buf), "%s [msgs] [switches] +folder ...", invo_name); + print_help(buf, switches, 1); + exit(argc == 2 ? EX_OK : EX_USAGE); case VERSIONSW: print_version(invo_name); - done (1); + exit(argc == 2 ? EX_OK : EX_USAGE); case LINKSW: linkf++; @@ -108,161 +97,139 @@ main (int argc, char **argv) linkf = 0; continue; - case PRESSW: - preserve++; - continue; - case NPRESSW: - preserve = 0; - continue; - - case UNLINKSW: - unlink_msgs++; - continue; - case NUNLINKSW: - unlink_msgs = 0; - continue; - case SRCSW: if (folder) - adios (NULL, "only one source folder at a time!"); + adios(EX_USAGE, NULL, "only one source folder at a time!"); if (!(cp = *argp++) || *cp == '-') - adios (NULL, "missing argument to %s", argp[-2]); - folder = path (*cp == '+' || *cp == '@' ? - cp + 1 : cp, - *cp != '@' ? - TFOLDER : TSUBCWF); + adios(EX_USAGE, NULL, "missing argument to %s", + argp[-2]); + folder = mh_xstrdup(expandfol(cp)); continue; case FILESW: if (filep > NFOLDERS) - adios (NULL, "only %d files allowed!", + adios(EX_USAGE, NULL, "only %d files allowed!", NFOLDERS); if (!(cp = *argp++) || *cp == '-') - adios (NULL, "missing argument to %s", + adios(EX_USAGE, NULL, "missing argument to %s", argp[-2]); - files[filep++] = path (cp, TFILE); - continue; - - case RPROCSW: - if (!(rmmproc = *argp++) || *rmmproc == '-') - adios (NULL, "missing argument to %s", - argp[-2]); - continue; - case NRPRCSW: - rmmproc = NULL; + files[filep++] = mh_xstrdup(expanddir(cp)); continue; } } if (*cp == '+' || *cp == '@') { if (foldp > NFOLDERS) - adios (NULL, "only %d folders allowed!", + adios(EX_USAGE, NULL, "only %d folders allowed!", NFOLDERS); - folders[foldp++].f_name = - pluspath (cp); + folders[foldp++].f_name = mh_xstrdup(expandfol(cp)); } else - app_msgarg(&msgs, cp); + app_msgarg(&msgs, cp); } - if (!context_find ("path")) - free (path ("./", TFOLDER)); if (foldp == 0) - adios (NULL, "no folder specified"); + adios(EX_USAGE, NULL, "no folder specified"); -#ifdef WHATNOW - if (!msgs.size && !foldp && !filep && (cp = getenv ("mhdraft")) && *cp) - files[filep++] = cp; -#endif /* WHATNOW */ + if (filep > 0) { + /* + ** We are refiling one or more files (-file) to the folders + */ + if (msgs.size) { + adios(EX_USAGE, NULL, "use -file or msgs, not both"); + } + if (folder) { + adios(EX_USAGE, NULL, "use -file or -src, not both"); + } + opnfolds(folders, foldp); + for (i = 0; i < filep; i++) { + if (m_file(files[i], folders, foldp, 0)) { + exit(EX_IOERR); + } + } + /* If -nolink, then unlink files */ + if (!linkf) { + int i; + char **files = filevec; + + for (i = 0; i < filep; i++) { + if (unlink(files[i]) == NOTOK) { + admonish(files[i], "unable to unlink"); + } + } + } + exit(EX_OK); + } /* - ** We are refiling a file to the folders + ** We are refiling messages to the folders */ - if (filep > 0) { - if (folder || msgs.size) - adios (NULL, "use -file or some messages, not both"); - opnfolds (folders, foldp); - for (i = 0; i < filep; i++) - if (m_file (files[i], folders, foldp, preserve, 0)) - done (1); - /* If -nolink, then "remove" files */ - if (!linkf) - remove_files (filep, filevec); - done (0); + if (!msgs.size) { + app_msgarg(&msgs, seq_cur); + } + if (!folder) { + folder = getcurfol(); } - if (!msgs.size) - app_msgarg(&msgs, "cur"); - if (!folder) - folder = getfolder (1); - strncpy (maildir, m_maildir (folder), sizeof(maildir)); - - if (chdir (maildir) == NOTOK) - adios (maildir, "unable to change directory to"); + strncpy(maildir, toabsdir(folder), sizeof(maildir)); + if (chdir(maildir) == NOTOK) { + adios(EX_OSERR, maildir, "unable to change directory to"); + } /* read source folder and create message structure */ - if (!(mp = folder_read (folder))) - adios (NULL, "unable to read folder %s", folder); + if (!(mp = folder_read(folder))) { + adios(EX_IOERR, NULL, "unable to read folder %s", folder); + } - /* check for empty folder */ - if (mp->nummsg == 0) - adios (NULL, "no messages in %s", folder); + if (mp->nummsg == 0) { + adios(EX_DATAERR, NULL, "no messages in %s", folder); + } /* parse the message range/sequence/name and set SELECTED */ - for (msgnum = 0; msgnum < msgs.size; msgnum++) - if (!m_convert (mp, msgs.msgs[msgnum])) - done (1); - seq_setprev (mp); /* set the previous-sequence */ + for (msgnum = 0; msgnum < msgs.size; msgnum++) { + if (!m_convert(mp, msgs.msgs[msgnum])) { + exit(EX_SOFTWARE); + } + } + seq_setprev(mp); /* create folder structures for each destination folder */ - opnfolds (folders, foldp); + opnfolds(folders, foldp); - /* Link all the selected messages into destination folders. + /* + ** Link all the selected messages into destination folders. ** ** This causes the add hook to be run for messages that are ** linked into another folder. The refile hook is run for ** messages that are moved to another folder. */ 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)) - done (1); - free (cp); + if (is_selected(mp, msgnum)) { + cp = mh_xstrdup(m_name(msgnum)); + if (m_file(cp, folders, foldp, !linkf)) { + exit(EX_IOERR); + } + mh_free0(&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(). - */ - if (rmmproc) { - context_replace (pfolder, folder); - context_save (); - fflush (stdout); - } - - /* - ** If -nolink, then "remove" messages from source folder. + ** If -nolink, then remove (= unlink) messages from source folder. ** ** Note that folder_delmsgs does not call the delete hook ** because the message has already been handled above. */ if (!linkf) { - folder_delmsgs (mp, unlink_msgs, 1); + folder_delmsgs(mp, 0); } - clsfolds (folders, foldp); + clsfolds(folders, foldp); - if (mp->hghsel != mp->curmsg - && (mp->numsel != mp->nummsg || linkf)) - seq_setcur (mp, mp->hghsel); - seq_save (mp); /* synchronize message sequences */ + if (linkf) { + seq_setcur(mp, mp->hghsel); + } + seq_save(mp); - context_replace (pfolder, folder); /* update current folder */ - context_save (); /* save the context file */ - folder_free (mp); /* free folder structure */ - done (0); - return 1; + context_save(); + folder_free(mp); + return 0; } @@ -270,29 +237,30 @@ main (int argc, char **argv) ** Read all the destination folders and ** create folder structures for all of them. */ - static void -opnfolds (struct st_fold *folders, int nfolders) +opnfolds(struct st_fold *folders, int nfolders) { 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++) { - chdir (m_maildir ("")); - strncpy (nmaildir, m_maildir (fp->f_name), sizeof(nmaildir)); + chdir(toabsdir("+")); + strncpy(nmaildir, toabsdir(fp->f_name), sizeof(nmaildir)); - create_folder (nmaildir, 0, done); + create_folder(nmaildir, 0, exit); - if (chdir (nmaildir) == NOTOK) - adios (nmaildir, "unable to change directory to"); - if (!(mp = folder_read (fp->f_name))) - adios (NULL, "unable to read folder %s", fp->f_name); + if (chdir(nmaildir) == NOTOK) { + adios(EX_OSERR, nmaildir, "unable to change directory to"); + } + if (!(mp = folder_read(fp->f_name))) { + adios(EX_IOERR, NULL, "unable to read folder %s", fp->f_name); + } mp->curmsg = 0; fp->f_mp = mp; - chdir (maildir); + chdir(maildir); } } @@ -301,49 +269,16 @@ opnfolds (struct st_fold *folders, int nfolders) ** Set the Previous-Sequence and then sychronize the ** sequence file, for each destination folder. */ - static void -clsfolds (struct st_fold *folders, int nfolders) +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; - seq_setprev (mp); - seq_save (mp); - } -} - - -/* -** If you have a "rmmproc" defined, we called that -** to remove all the specified files. If "rmmproc" -** is not defined, then just unlink the files. -*/ - -static void -remove_files (int filep, char **files) -{ - int i; - char **vec; - - /* If rmmproc is defined, we use that */ - if (rmmproc) { - vec = files++; /* vec[0] = filevec[0] */ - files[filep] = NULL; /* NULL terminate list */ - - fflush (stdout); - vec[0] = r1bindex (rmmproc, '/'); - execvp (rmmproc, vec); - adios (rmmproc, "unable to exec"); - } - - /* Else just unlink the files */ - files++; /* advance past filevec[0] */ - for (i = 0; i < filep; i++) { - if (unlink (files[i]) == NOTOK) - admonish (files[i], "unable to unlink"); + seq_setprev(mp); + seq_save(mp); } } @@ -352,19 +287,17 @@ remove_files (int filep, char **files) ** Link (or copy) the message into each of ** the destination folders. */ - static int -m_file (char *msgfile, struct st_fold *folders, int nfolders, int preserve, - int refile) +m_file(char *msgfile, struct st_fold *folders, int nfolders, int refile) { 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) + if ((msgnum = folder_addmsg(&fp->f_mp, msgfile, 1, 0, 0, + nfolders == 1 && refile, maildir)) == -1) { return 1; + } } return 0; }