![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to mark.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / contrib / mh / uip|
Return to mark.c CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / mh / uip |
1.1 ! root 1: /* mark.c - mark messages */ ! 2: ! 3: #include "../h/mh.h" ! 4: #include <stdio.h> ! 5: ! 6: /* */ ! 7: ! 8: static struct swit switches[] = { ! 9: #define ADDSW 0 ! 10: "add", 0, ! 11: #define DELSW 1 ! 12: "delete", 0, ! 13: #define LSTSW 2 ! 14: "list", 0, ! 15: ! 16: #define SEQSW 3 ! 17: "sequence name", 0, ! 18: ! 19: #define PUBLSW 4 ! 20: "public", 0, ! 21: #define NPUBLSW 5 ! 22: "nopublic", 0, ! 23: ! 24: #define ZEROSW 6 ! 25: "zero", 0, ! 26: #define NZEROSW 7 ! 27: "nozero", 0, ! 28: ! 29: #define HELPSW 8 ! 30: "help", 4, ! 31: ! 32: #define DEBUGSW 9 ! 33: "debug", -5, ! 34: ! 35: NULL, NULL ! 36: }; ! 37: ! 38: /* */ ! 39: ! 40: /* ARGSUSED */ ! 41: ! 42: main (argc, argv) ! 43: int argc; ! 44: char **argv; ! 45: { ! 46: int addsw = 0, ! 47: deletesw = 0, ! 48: debugsw = 0, ! 49: listsw = 0, ! 50: publicsw = -1, ! 51: zerosw = 0, ! 52: seqp = 0, ! 53: msgp = 0, ! 54: i, ! 55: msgnum; ! 56: char *cp, ! 57: *maildir, ! 58: *folder = NULL, ! 59: buf[100], ! 60: **ap, ! 61: **argp, ! 62: *arguments[MAXARGS], ! 63: *seqs[NATTRS + 1], ! 64: *msgs[MAXARGS]; ! 65: struct msgs *mp; ! 66: ! 67: invo_name = r1bindex (argv[0], '/'); ! 68: if ((cp = m_find (invo_name)) != NULL) { ! 69: ap = brkstring (cp = getcpy (cp), " ", "\n"); ! 70: ap = copyip (ap, arguments); ! 71: } ! 72: else ! 73: ap = arguments; ! 74: (void) copyip (argv + 1, ap); ! 75: argp = arguments; ! 76: ! 77: /* */ ! 78: ! 79: while (cp = *argp++) { ! 80: if (*cp == '-') ! 81: switch (smatch (++cp, switches)) { ! 82: case AMBIGSW: ! 83: ambigsw (cp, switches); ! 84: done (1); ! 85: case UNKWNSW: ! 86: adios (NULLCP, "-%s unknown\n", cp); ! 87: case HELPSW: ! 88: (void) sprintf (buf, "%s [+folder] [msgs] [switches]", ! 89: invo_name); ! 90: help (buf, switches); ! 91: done (1); ! 92: ! 93: case ADDSW: ! 94: addsw++; ! 95: deletesw = listsw = 0; ! 96: continue; ! 97: case DELSW: ! 98: deletesw++; ! 99: addsw = listsw = 0; ! 100: continue; ! 101: case LSTSW: ! 102: listsw++; ! 103: addsw = deletesw = 0; ! 104: continue; ! 105: ! 106: case SEQSW: ! 107: if (!(cp = *argp++) || *cp == '-') ! 108: adios (NULLCP, "missing argument to %s", argp[-2]); ! 109: if (seqp < NATTRS) ! 110: seqs[seqp++] = cp; ! 111: else ! 112: adios (NULLCP, "only %d sequences allowed!", NATTRS); ! 113: continue; ! 114: ! 115: case PUBLSW: ! 116: publicsw = 1; ! 117: continue; ! 118: case NPUBLSW: ! 119: publicsw = 0; ! 120: continue; ! 121: ! 122: case DEBUGSW: ! 123: debugsw++; ! 124: continue; ! 125: ! 126: case ZEROSW: ! 127: zerosw++; ! 128: continue; ! 129: case NZEROSW: ! 130: zerosw = 0; ! 131: continue; ! 132: } ! 133: if (*cp == '+' || *cp == '@') { ! 134: if (folder) ! 135: adios (NULLCP, "only one folder at a time!"); ! 136: else ! 137: folder = path (cp + 1, *cp == '+' ? TFOLDER : TSUBCWF); ! 138: } ! 139: else ! 140: msgs[msgp++] = cp; ! 141: } ! 142: ! 143: /* */ ! 144: ! 145: if (!addsw && !deletesw && !listsw) ! 146: if (seqp) ! 147: addsw++; ! 148: else ! 149: listsw++; ! 150: ! 151: if (!m_find ("path")) ! 152: free (path ("./", TFOLDER)); ! 153: if (!msgp) ! 154: msgs[msgp++] = listsw ? "all" :"cur"; ! 155: if (!folder) ! 156: folder = m_getfolder (); ! 157: maildir = m_maildir (folder); ! 158: ! 159: if (chdir (maildir) == NOTOK) ! 160: adios (maildir, "unable to change directory to"); ! 161: if (!(mp = m_gmsg (folder))) ! 162: adios (NULLCP, "unable to read folder %s", folder); ! 163: if (mp -> hghmsg == 0) ! 164: adios (NULLCP, "no messages in %s", folder); ! 165: ! 166: for (msgnum = 0; msgnum < msgp; msgnum++) ! 167: if (!m_convert (mp, msgs[msgnum])) ! 168: done (1); ! 169: ! 170: if (publicsw == -1) ! 171: publicsw = mp -> msgflags & READONLY ? 0 : 1; ! 172: if (publicsw && (mp -> msgflags & READONLY)) ! 173: adios (NULLCP, "folder %s is read-only, so -public not allowed", ! 174: folder); ! 175: ! 176: /* */ ! 177: ! 178: if (debugsw) { ! 179: printf ("invo_name=%s mypath=%s defpath=%s\n", ! 180: invo_name, mypath, defpath); ! 181: printf ("ctxpath=%s context flags=%s\n", ! 182: ctxpath, sprintb (buf, (unsigned) ctxflags, DBITS)); ! 183: printf ("foldpath=%s flags=%s\n", ! 184: mp -> foldpath, ! 185: sprintb (buf, (unsigned) mp -> msgflags, FBITS)); ! 186: printf ("lowmsg=%d hghmsg=%d nummsg=%d curmsg=%d\n", ! 187: mp -> lowmsg, mp -> hghmsg, mp -> nummsg, mp -> curmsg); ! 188: printf ("lowsel=%d hghsel=%d numsel=%d\n", ! 189: mp -> lowsel, mp -> hghsel, mp -> numsel); ! 190: #ifndef MTR ! 191: printf ("lowoff=%d hghoff=%d\n", ! 192: mp -> lowoff, mp -> hghoff); ! 193: #else MTR ! 194: printf ("lowoff=%d hghoff=%d msgbase=0x%x msgstats=0x%x\n", ! 195: mp -> lowoff, mp -> hghoff, mp -> msgbase, mp -> msgstats); ! 196: #endif MTR ! 197: } ! 198: ! 199: if (seqp == 0 && (addsw || deletesw)) ! 200: adios (NULLCP, "-%s requires at least one -sequence argument", ! 201: addsw ? "add" : "delete"); ! 202: seqs[seqp] = NULL; ! 203: ! 204: if (addsw) ! 205: for (seqp = 0; seqs[seqp]; seqp++) { ! 206: if (zerosw && !m_seqnew (mp, seqs[seqp], publicsw)) ! 207: done (1); ! 208: for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++) ! 209: if (mp -> msgstats[msgnum] & SELECTED) ! 210: if (!m_seqadd (mp, seqs[seqp], msgnum, publicsw)) ! 211: done (1); ! 212: } ! 213: ! 214: if (deletesw) ! 215: for (seqp = 0; seqs[seqp]; seqp++) { ! 216: if (zerosw) ! 217: for (msgnum = mp -> lowmsg; msgnum <= mp -> hghmsg; msgnum++) ! 218: if (mp -> msgstats[msgnum] & EXISTS) ! 219: if (!m_seqadd (mp, seqs[seqp], msgnum, publicsw)) ! 220: done (1); ! 221: for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++) ! 222: if (mp -> msgstats[msgnum] & SELECTED) ! 223: if (!m_seqdel (mp, seqs[seqp], msgnum)) ! 224: done (1); ! 225: } ! 226: ! 227: if (listsw) { ! 228: int bits = FFATTRSLOT; ! 229: ! 230: if (seqp == 0) ! 231: for (i = 0; mp -> msgattrs[i]; i++) ! 232: printf ("%s%s: %s\n", mp -> msgattrs[i], ! 233: mp -> attrstats & (1 << (bits + i)) ! 234: ? " (private)" : "", ! 235: m_seq (mp, mp -> msgattrs[i])); ! 236: else ! 237: for (seqp = 0; seqs[seqp]; seqp++) ! 238: printf ("%s: %s\n", seqs[seqp], m_seq (mp, seqs[seqp])); ! 239: ! 240: if (debugsw) ! 241: for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++) ! 242: if (mp -> msgstats[msgnum] & SELECTED) ! 243: printf ("%*d: %s\n", DMAXFOLDER, msgnum, ! 244: sprintb (buf, (unsigned) mp -> msgstats[msgnum], ! 245: m_seqbits (mp))); ! 246: } ! 247: ! 248: m_replace (pfolder, folder); ! 249: m_sync (mp); ! 250: m_update (); ! 251: ! 252: done (0); ! 253: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.