Return to rmm.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / mh / uip

Annotation of 43BSD/contrib/mh/uip/rmm.c, revision 1.1.1.1

1.1       root        1: /* rmm.c - remove a message */
                      2: 
                      3: #include "../h/mh.h"
                      4: #include <stdio.h>
                      5: 
                      6: /*  */
                      7: 
                      8: static struct swit switches[] = {
                      9: #define        HELPSW  0
                     10:     "help", 4,
                     11: 
                     12:     NULL, NULL
                     13: };
                     14: 
                     15: /*  */
                     16: 
                     17: /* ARGSUSED */
                     18: 
                     19: main (argc, argv)
                     20: int     argc;
                     21: char  **argv;
                     22: {
                     23:     int     msgp = 0,
                     24:             msgnum,
                     25:             vecp;
                     26:     char   *cp,
                     27:            *dp,
                     28:            *maildir,
                     29:            *folder = NULL,
                     30:             buf[100],
                     31:           **ap,
                     32:           **argp,
                     33:           **vec,
                     34:            *arguments[MAXARGS],
                     35:            *msgs[MAXARGS];
                     36:     struct msgs *mp;
                     37: 
                     38:     invo_name = r1bindex (argv[0], '/');
                     39:     if ((cp = m_find (invo_name)) != NULL) {
                     40:        ap = brkstring (cp = getcpy (cp), " ", "\n");
                     41:        ap = copyip (ap, arguments);
                     42:     }
                     43:     else
                     44:        ap = arguments;
                     45:     (void) copyip (argv + 1, ap);
                     46:     argp = arguments;
                     47: 
                     48: /*  */
                     49: 
                     50:     while (cp = *argp++) {
                     51:        if (*cp == '-')
                     52:            switch (smatch (++cp, switches)) {
                     53:                case AMBIGSW: 
                     54:                    ambigsw (cp, switches);
                     55:                    done (1);
                     56:                case UNKWNSW: 
                     57:                    adios (NULLCP, "-%s unknown\n", cp);
                     58:                case HELPSW: 
                     59:                    (void) sprintf (buf, "%s [+folder] [msgs] [switches]",
                     60:                            invo_name);
                     61:                    help (buf, switches);
                     62:                    done (1);
                     63:            }
                     64:        if (*cp == '+') {
                     65:            if (folder)
                     66:                adios (NULLCP, "only one folder at a time!");
                     67:            else
                     68:                folder = path (cp + 1, TFOLDER);
                     69:        }
                     70:        else
                     71:            msgs[msgp++] = cp;
                     72:     }
                     73: 
                     74: /*  */
                     75: 
                     76:     if (!m_find ("path"))
                     77:        free (path ("./", TFOLDER));
                     78:     if (!msgp)
                     79:        msgs[msgp++] = "cur";
                     80:     if (!folder)
                     81:        folder = m_getfolder ();
                     82:     maildir = m_maildir (folder);
                     83: 
                     84:     if (chdir (maildir) == NOTOK)
                     85:        adios (maildir, "unable to change directory to");
                     86:     if (!(mp = m_gmsg (folder)))
                     87:        adios (NULLCP, "unable to read folder %s", folder);
                     88:     if (mp -> hghmsg == 0)
                     89:        adios (NULLCP, "no messages in %s", folder);
                     90: 
                     91:     for (msgnum = 0; msgnum < msgp; msgnum++)
                     92:        if (!m_convert (mp, msgs[msgnum]))
                     93:            done (1);
                     94:     m_setseq (mp);
                     95: 
                     96:     for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++)
                     97:        if (mp -> msgstats[msgnum] & SELECTED) {
                     98: #ifdef notdef
                     99:            mp -> msgstats[msgnum] |= DELETED;
                    100: #endif notdef
                    101:            mp -> msgstats[msgnum] &= ~EXISTS;
                    102:        }
                    103:     mp -> msgflags |= SEQMOD;
                    104: 
                    105:     m_replace (pfolder, folder);
                    106:     m_sync (mp);
                    107:     m_update ();
                    108: 
                    109:     if (rmmproc) {
                    110:        if (mp -> numsel > MAXARGS - 2)
                    111:            adios (NULLCP, "more than %d messages for %s exec", MAXARGS - 2,
                    112:                    rmmproc);
                    113:        vec = (char **) calloc ((unsigned) (mp -> numsel + 2), sizeof *vec);
                    114:        if (vec == NULL)
                    115:            adios (NULLCP, "unable to allocate exec vector");
                    116:        vecp = 1;
                    117:        for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++)
                    118:            if (mp -> msgstats[msgnum] & SELECTED)
                    119:                vec[vecp++] = getcpy (m_name (msgnum));
                    120:        vec[vecp] = NULL;
                    121: 
                    122:        (void) fflush (stdout);
                    123:        vec[0] = r1bindex (rmmproc, '/');
                    124:        execvp (rmmproc, vec);
                    125:        adios (rmmproc, "unable to exec");
                    126:     }
                    127: 
                    128:     for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++)
                    129:        if (mp -> msgstats[msgnum] & SELECTED) {
                    130:            (void) strcpy (buf, m_backup (dp = m_name (msgnum)));
                    131:            if (rename (dp, buf) == NOTOK)
                    132:                admonish (buf, "unable to rename %s to", dp);
                    133:        }
                    134: 
                    135:     done (0);
                    136: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.