X-Git-Url: http://git.marmaro.de/?p=mmh;a=blobdiff_plain;f=uip%2Fpackf.c;h=23ee33543ad7b860b223392343590aa7d1fdbfec;hp=0183da65355480d8428396c3c2e8962de6a9a86c;hb=39d862d5f0ba0258707ef5a74cff63243f58e425;hpb=56a805299de35d8924969138aef4d0f1580daa6d diff --git a/uip/packf.c b/uip/packf.c index 0183da6..23ee335 100644 --- a/uip/packf.c +++ b/uip/packf.c @@ -1,13 +1,10 @@ - /* - * packf.c -- pack a nmh folder into a file - * - * $Id$ - * - * 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. - */ +** packf.c -- pack a nmh folder into a file +** +** 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 #include @@ -16,176 +13,108 @@ #include static struct swit switches[] = { -#define FILESW 0 - { "file name", 0 }, -#define MBOXSW 1 - { "mbox", 0 }, -#define MMDFSW 2 - { "mmdf", 0 }, -#define VERSIONSW 3 - { "version", 0 }, -#define HELPSW 4 - { "help", 0 }, - { NULL, 0 } +#define VERSIONSW 0 + { "version", 0 }, +#define HELPSW 1 + { "help", 0 }, + { NULL, 0 } }; -static int md = NOTOK; -static int mbx_style = MBOX_FORMAT; -static int mapping = 0; - -static int mbxclose_done(int); - -char *file = NULL; - int -main (int argc, char **argv) +main(int argc, char **argv) { - int fd, msgnum; - char *cp, *maildir, *msgnam, *folder = NULL, buf[BUFSIZ]; - char **argp, **arguments; - struct msgs_array msgs = { 0, 0, NULL }; - struct msgs *mp; - struct stat st; - - done=mbxclose_done; + int fd, msgnum; + char *cp, *maildir, *msgnam, *folder = NULL, buf[BUFSIZ]; + char **argp, **arguments; + struct msgs_array msgs = { 0, 0, NULL }; + struct msgs *mp; #ifdef LOCALE - setlocale(LC_ALL, ""); + setlocale(LC_ALL, ""); #endif - invo_name = r1bindex (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); - 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); - - case FILESW: - if (file) - adios (NULL, "only one file at a time!"); - if (!(file = *argp++) || *file == '-') - adios (NULL, "missing argument to %s", argp[-2]); - continue; - - case MBOXSW: - mbx_style = MBOX_FORMAT; - mapping = 0; - continue; - case MMDFSW: - mbx_style = MMDF_FORMAT; - mapping = 1; - continue; - } - } - if (*cp == '+' || *cp == '@') { - if (folder) - adios (NULL, "only one folder at a time!"); - folder = pluspath (cp); - } else - app_msgarg(&msgs, cp); - } - - if (!file) - file = "./msgbox"; - file = path (file, TFILE); - - /* - * Check if file to be created (or appended to) - * exists. If not, ask for confirmation. - */ - if (stat (file, &st) == NOTOK) { - if (errno != ENOENT) - adios (file, "error on file"); - cp = concat ("Create file \"", file, "\"? ", NULL); - if (!getanswer (cp)) - done (1); - free (cp); - } - - if (!context_find ("path")) - free (path ("./", TFOLDER)); - - /* default is to pack whole folder */ - if (!msgs.size) - app_msgarg(&msgs, "all"); - - if (!folder) - folder = getfolder (1); - maildir = m_maildir (folder); - - 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); - - /* check for empty folder */ - 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 */ - - /* open and lock new maildrop file */ - if ((md = mbx_open(file, mbx_style, getuid(), getgid(), m_gmprot())) == NOTOK) - adios (file, "unable to open"); - - /* copy all the SELECTED messages to the file */ - for (msgnum = mp->lowsel; msgnum <= mp->hghsel; msgnum++) - if (is_selected(mp, msgnum)) { - if ((fd = open (msgnam = m_name (msgnum), O_RDONLY)) == NOTOK) { - admonish (msgnam, "unable to read message"); - break; - } - - if (mbx_copy (file, mbx_style, md, fd, mapping, NULL, 1) == NOTOK) - adios (file, "error writing to file"); - - close (fd); + 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); + 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); + } + } + if (*cp == '+' || *cp == '@') { + if (folder) + adios(NULL, "only one folder at a time!"); + folder = getcpy(expandfol(cp)); + } else + app_msgarg(&msgs, cp); } - /* close and unlock maildrop file */ - mbx_close (file, md); - - context_replace (pfolder, folder); /* update current folder */ - if (mp->hghsel != mp->curmsg) - seq_setcur (mp, mp->lowsel); - seq_save (mp); - context_save (); /* save the context file */ - folder_free (mp); /* free folder/message structure */ - return done (0); -} - -static int -mbxclose_done (int status) -{ - mbx_close (file, md); - exit (status); - return 1; /* dead code to satisfy the compiler */ + /* default is to pack whole folder */ + if (!msgs.size) + app_msgarg(&msgs, seq_all); + + if (!folder) + folder = getcurfol(); + maildir = toabsdir(folder); + + 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); + + /* check for empty folder */ + 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 */ + + /* copy all the SELECTED messages to stdout */ + for (msgnum = mp->lowsel; msgnum <= mp->hghsel; msgnum++) { + if (is_selected(mp, msgnum)) { + if ((fd = open(msgnam = m_name(msgnum), O_RDONLY)) + == NOTOK) { + admonish(msgnam, "unable to read message"); + break; + } + if (mbox_copy(fileno(stdout), fd) == NOTOK) { + adios(NULL, "error writing to stdout"); + } + close(fd); + } + } + context_replace(curfolder, folder); + if (mp->hghsel != mp->curmsg) + seq_setcur(mp, mp->lowsel); + seq_save(mp); + context_save(); + folder_free(mp); + done(0); + return 1; }