![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to show.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 show.c CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / mh / uip |
1.1 ! root 1: /* show.c - list messages */ ! 2: ! 3: #include "../h/mh.h" ! 4: #include <stdio.h> ! 5: ! 6: /* */ ! 7: ! 8: static struct swit switches[] = { ! 9: #define DRFTSW 0 ! 10: "draft", 5, ! 11: ! 12: #define FORMSW 1 ! 13: "form formfile", 4, ! 14: #define PROGSW 2 ! 15: "moreproc program", 4, ! 16: #define NPROGSW 3 ! 17: "nomoreproc", 3, ! 18: #define LENSW 4 ! 19: "length lines", 4, ! 20: #define WIDSW 5 ! 21: "width columns", 4, ! 22: ! 23: #define SHOWSW 6 ! 24: "showproc program", 4, ! 25: #define NSHOWSW 7 ! 26: "noshowproc", 3, ! 27: ! 28: #define HEADSW 8 ! 29: "header", 4, ! 30: #define NHEADSW 9 ! 31: "noheader", 3, ! 32: ! 33: #define FILESW 10 ! 34: "file file", -4, /* interface from showfile */ ! 35: ! 36: #define HELPSW 11 ! 37: "help", 4, ! 38: ! 39: NULL, NULL ! 40: }; ! 41: ! 42: ! 43: #define SHOW 0 ! 44: #define NEXT 1 ! 45: #define PREV 2 ! 46: ! 47: /* */ ! 48: ! 49: /* ARGSUSED */ ! 50: ! 51: main (argc, argv) ! 52: int argc; ! 53: char **argv; ! 54: { ! 55: int draftsw = 0, ! 56: headersw = 1, ! 57: nshow = 0, ! 58: msgp = 0, ! 59: vecp = 1, ! 60: procp = 1, ! 61: isdf = 0, ! 62: mode = SHOW, ! 63: msgnum; ! 64: char *cp, ! 65: *maildir, ! 66: *file = NULL, ! 67: *folder = NULL, ! 68: *proc, ! 69: buf[100], ! 70: **ap, ! 71: **argp, ! 72: *arguments[MAXARGS], ! 73: *msgs[MAXARGS], ! 74: *vec[MAXARGS]; ! 75: struct msgs *mp; ! 76: ! 77: invo_name = r1bindex (argv[0], '/'); ! 78: if (uleq (invo_name, "next")) ! 79: mode = NEXT; ! 80: else ! 81: if (uleq (invo_name, "prev")) ! 82: mode = PREV; ! 83: if ((cp = m_find (invo_name)) != NULL) { ! 84: ap = brkstring (cp = getcpy (cp), " ", "\n"); ! 85: ap = copyip (ap, arguments); ! 86: } ! 87: else ! 88: ap = arguments; ! 89: (void) copyip (argv + 1, ap); ! 90: argp = arguments; ! 91: ! 92: /* */ ! 93: ! 94: while (cp = *argp++) { ! 95: if (*cp == '-') ! 96: switch (smatch (++cp, switches)) { ! 97: case AMBIGSW: ! 98: ambigsw (cp, switches); ! 99: done (1); ! 100: case UNKWNSW: ! 101: case NPROGSW: ! 102: vec[vecp++] = --cp; ! 103: continue; ! 104: case HELPSW: ! 105: (void) sprintf (buf, ! 106: "%s [+folder] %s[switches] [switches for showproc]", ! 107: invo_name, mode == SHOW ? "[msgs] ": ""); ! 108: help (buf, switches); ! 109: done (1); ! 110: ! 111: case DRFTSW: ! 112: if (file) ! 113: adios (NULLCP, "only one file at a time!"); ! 114: draftsw++; ! 115: if (mode == SHOW) ! 116: continue; ! 117: usage: ; ! 118: adios (NULLCP, ! 119: "usage: %s [+folder] [switches] [switches for showproc]", ! 120: invo_name); ! 121: case FILESW: ! 122: if (mode != SHOW) ! 123: goto usage; ! 124: if (draftsw || file) ! 125: adios (NULLCP, "only one file at a time!"); ! 126: if (!(cp = *argp++) || *cp == '-') ! 127: adios (NULLCP, "missing argument to %s", argp[-2]); ! 128: file = path (cp, TFILE); ! 129: continue; ! 130: ! 131: case HEADSW: ! 132: headersw++; ! 133: continue; ! 134: case NHEADSW: ! 135: headersw = 0; ! 136: continue; ! 137: ! 138: case FORMSW: ! 139: case PROGSW: ! 140: case LENSW: ! 141: case WIDSW: ! 142: vec[vecp++] = --cp; ! 143: if (!(cp = *argp++) || *cp == '-') ! 144: adios (NULLCP, "missing argument to %s", argp[-2]); ! 145: vec[vecp++] = cp; ! 146: continue; ! 147: ! 148: case SHOWSW: ! 149: if (!(showproc = *argp++) || *showproc == '-') ! 150: adios (NULLCP, "missing argument to %s", argp[-2]); ! 151: nshow = 0; ! 152: continue; ! 153: case NSHOWSW: ! 154: nshow++; ! 155: continue; ! 156: } ! 157: if (*cp == '+' || *cp == '@') { ! 158: if (folder) ! 159: adios (NULLCP, "only one folder at a time!"); ! 160: else ! 161: folder = path (cp + 1, *cp == '+' ? TFOLDER : TSUBCWF); ! 162: } ! 163: else ! 164: if (mode != SHOW) ! 165: goto usage; ! 166: else ! 167: msgs[msgp++] = cp; ! 168: } ! 169: procp = vecp; ! 170: ! 171: /* */ ! 172: ! 173: if (!m_find ("path")) ! 174: free (path ("./", TFOLDER)); ! 175: ! 176: if (draftsw || file) { ! 177: if (msgp > 1) ! 178: adios (NULLCP, "only one file at a time!"); ! 179: vec[vecp++] = draftsw ! 180: ? getcpy (m_draft (folder, msgp ? msgs[0] : NULL, 1, &isdf)) ! 181: : file; ! 182: goto go_to_it; ! 183: } ! 184: ! 185: #ifdef WHATNOW ! 186: if (!msgp && mode == SHOW && (cp = getenv ("mhdraft")) && *cp) { ! 187: vec[vecp++] = cp; ! 188: goto go_to_it; ! 189: } ! 190: #endif WHATNOW ! 191: ! 192: if (!msgp) ! 193: msgs[msgp++] = mode == NEXT ? "next" : mode == PREV ? "prev" : "cur"; ! 194: if (!folder) ! 195: folder = m_getfolder (); ! 196: maildir = m_maildir (folder); ! 197: ! 198: if (chdir (maildir) == NOTOK) ! 199: adios (maildir, "unable to change directory to"); ! 200: if (!(mp = m_gmsg (folder))) ! 201: adios (NULLCP, "unable to read folder %s", folder); ! 202: if (mp -> hghmsg == 0) ! 203: adios (NULLCP, "no messages in %s", folder); ! 204: ! 205: for (msgnum = 0; msgnum < msgp; msgnum++) ! 206: if (!m_convert (mp, msgs[msgnum])) ! 207: done (1); ! 208: for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++) ! 209: if (mp -> msgstats[msgnum] & SELECTED) ! 210: mp -> msgstats[msgnum] |= UNSEEN; ! 211: m_setseq (mp); ! 212: m_setvis (mp, 1); ! 213: ! 214: if (mp -> numsel > MAXARGS - 2) ! 215: adios (NULLCP, "more than %d messages for show exec", MAXARGS - 2); ! 216: for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++) ! 217: if (mp -> msgstats[msgnum] & SELECTED) ! 218: vec[vecp++] = getcpy (m_name (msgnum)); ! 219: ! 220: m_replace (pfolder, folder); ! 221: if (mp -> hghsel != mp -> curmsg) ! 222: m_setcur (mp, mp -> hghsel); ! 223: m_sync (mp); ! 224: m_update (); ! 225: ! 226: if (vecp == 2 && headersw) ! 227: printf ("(Message %s:%s)\n", folder, vec[1]); ! 228: ! 229: /* */ ! 230: ! 231: go_to_it: ; ! 232: (void) fflush (stdout); ! 233: ! 234: if (nshow) ! 235: proc = "/bin/cat"; ! 236: else { ! 237: (void) putenv ("mhfolder", folder); ! 238: if (strcmp (r1bindex (showproc, '/'), "mhl") == 0) { ! 239: vec[0] = "mhl"; ! 240: (void) mhl (vecp, vec); ! 241: done (0); ! 242: } ! 243: proc = showproc; ! 244: } ! 245: ! 246: if (!draftsw ! 247: && chdir (maildir = concat (m_maildir (""), "/", NULLCP)) ! 248: != NOTOK) { ! 249: mp -> foldpath = concat (mp -> foldpath, "/", NULLCP); ! 250: cp = ssequal (maildir, mp -> foldpath) ! 251: ? mp -> foldpath + strlen (maildir) ! 252: : mp -> foldpath; ! 253: for (msgnum = procp; msgnum < vecp; msgnum++) ! 254: vec[msgnum] = concat (cp, vec[msgnum], NULLCP); ! 255: } ! 256: ! 257: vec[0] = r1bindex (proc, '/'); ! 258: execvp (proc, vec); ! 259: adios (proc, "unable to exec"); ! 260: } ! 261: ! 262: /* */ ! 263: ! 264: /* Cheat: we are loaded with adrparse, which wants a routine called ! 265: OfficialName(). We call adrparse:getm() with the correct arguments ! 266: to prevent OfficialName() from being called. Hence, the following ! 267: is to keep the loader happy. ! 268: */ ! 269: ! 270: char *OfficialName (name) ! 271: register char *name; ! 272: { ! 273: return name; ! 274: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.