#define UNLINKSW 0
{ "unlink", 0 },
#define NUNLINKSW 1
- { "nounlink", 0 },
+ { "nounlink", 2 },
#define VERSIONSW 2
- { "version", 0 },
+ { "Version", 0 },
#define HELPSW 3
{ "help", 0 },
{ NULL, 0 }
int
main(int argc, char **argv)
{
- int msgnum, unlink_msgs = 0;
- char *cp, *maildir, *folder = NULL;
+ int msgnum, unlink_msgs = 0, vecp = 0;
+ char *cp, *maildir, *folder = NULL, **vec;
char buf[BUFSIZ], **argp;
char **arguments;
struct msgs_array msgs = { 0, 0, NULL };
struct msgs *mp;
+ pid_t pid;
-#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);
}
}
if (*cp == '+' || *cp == '@') {
- if (folder)
+ if (folder) {
adios(NULL, "only one folder at a time!");
- else
- folder = pluspath(cp);
- } else
+ } else {
+ folder = getcpy(expandfol(cp));
+ }
+ } else {
app_msgarg(&msgs, cp);
+ }
}
- if (!context_find("path"))
- free(path("./", TFOLDER));
- if (!msgs.size)
- app_msgarg(&msgs, "cur");
- if (!folder)
- folder = getfolder(1);
- maildir = m_maildir(folder);
+ if (!msgs.size) {
+ app_msgarg(&msgs, seq_cur);
+ }
+ if (!folder) {
+ folder = getcurfol();
+ }
+ maildir = toabsdir(folder);
- if (chdir(maildir) == NOTOK)
+ if (chdir(maildir) == NOTOK) {
adios(maildir, "unable to change directory to");
+ }
/* read folder and create message structure */
- if (!(mp = folder_read(folder)))
+ if (!(mp = folder_read(folder))) {
adios(NULL, "unable to read folder %s", folder);
-
- /* check for empty folder */
- if (mp->nummsg == 0)
+ }
+ if (mp->nummsg == 0) {
adios(NULL, "no messages in %s", folder);
-
- /* parse all the message ranges/sequences 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 */
-
+ }
/*
- ** This is hackish. If we are using a external rmmproc,
- ** then we need to update the current folder in the
- ** context so the external rmmproc will remove files
- ** from the correct directory. This should be moved to
- ** folder_delmsgs().
+ ** parse all the message ranges/sequences and set SELECTED
+ ** (We do this for the refiling case as well, to complain
+ ** about invalid msg arguments in rmm, before we call refile.)
*/
- if (rmmproc) {
- context_replace(pfolder, folder);
- context_save();
- fflush(stdout);
+ for (msgnum = 0; msgnum < msgs.size; msgnum++) {
+ if (!m_convert(mp, msgs.msgs[msgnum])) {
+ done(1);
+ }
+ }
+
+ context_replace(curfolder, folder);
+ context_save();
+
+ if (unlink_msgs) {
+ /* "remove" the SELECTED messages */
+ folder_delmsgs(mp, 1);
+ seq_setprev(mp);
+ seq_save(mp);
+ folder_free(mp);
+ done(0);
+ return 1;
}
- /* "remove" the SELECTED messages */
- folder_delmsgs(mp, unlink_msgs, 0);
+ /* remove by refiling. */
+
+ folder_free(mp);
+ fflush(stdout);
+
+ if (msgs.size+6 > MAXARGS) {
+ adios(NULL, "more than %d messages for refile exec",
+ MAXARGS - 6);
+ }
+ vec = (char **)mh_xmalloc((size_t)(msgs.size + 6) * sizeof(*vec));
+ vec[vecp++] = "refile";
+ vec[vecp++] = "-src";
+ vec[vecp++] = concat("+", folder, NULL);
+ vec[vecp++] = "-nolink";
+ vec[vecp++] = concat("+", trashfolder, NULL);
+ for (msgnum = 0; msgnum < msgs.size; msgnum++) {
+ vec[vecp++] = msgs.msgs[msgnum];
+ }
+ vec[vecp] = NULL;
+
+ fflush(stdout);
+ switch (pid = fork()) {
+ case -1:
+ adios("fork", "unable to");
+
+ case 0:
+ execvp(*vec, vec);
+ fprintf(stderr, "unable to exec ");
+ perror(*vec);
+ _exit(-1);
+
+ default:
+ pidwait(pid, -1);
+ }
- 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;
}