![[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] / 43BSDReno / contrib / mh / uip|
Return to show.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / 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: vec[vecp++] = --cp; ! 140: if (!(cp = *argp++) || *cp == '-') ! 141: adios (NULLCP, "missing argument to %s", argp[-2]); ! 142: vec[vecp++] = getcpy (libpath(cp)); ! 143: continue; ! 144: ! 145: case PROGSW: ! 146: case LENSW: ! 147: case WIDSW: ! 148: vec[vecp++] = --cp; ! 149: if (!(cp = *argp++) || *cp == '-') ! 150: adios (NULLCP, "missing argument to %s", argp[-2]); ! 151: vec[vecp++] = cp; ! 152: continue; ! 153: ! 154: case SHOWSW: ! 155: if (!(showproc = *argp++) || *showproc == '-') ! 156: adios (NULLCP, "missing argument to %s", argp[-2]); ! 157: nshow = 0; ! 158: continue; ! 159: case NSHOWSW: ! 160: nshow++; ! 161: continue; ! 162: } ! 163: if (*cp == '+' || *cp == '@') { ! 164: if (folder) ! 165: adios (NULLCP, "only one folder at a time!"); ! 166: else ! 167: folder = path (cp + 1, *cp == '+' ? TFOLDER : TSUBCWF); ! 168: } ! 169: else ! 170: if (mode != SHOW) ! 171: goto usage; ! 172: else ! 173: msgs[msgp++] = cp; ! 174: } ! 175: procp = vecp; ! 176: ! 177: /* */ ! 178: ! 179: if (!m_find ("path")) ! 180: free (path ("./", TFOLDER)); ! 181: ! 182: if (draftsw || file) { ! 183: if (msgp > 1) ! 184: adios (NULLCP, "only one file at a time!"); ! 185: vec[vecp++] = draftsw ! 186: ? getcpy (m_draft (folder, msgp ? msgs[0] : NULL, 1, &isdf)) ! 187: : file; ! 188: goto go_to_it; ! 189: } ! 190: ! 191: #ifdef WHATNOW ! 192: if (!msgp && mode == SHOW && (cp = getenv ("mhdraft")) && *cp) { ! 193: draftsw++; ! 194: vec[vecp++] = cp; ! 195: goto go_to_it; ! 196: } ! 197: #endif WHATNOW ! 198: ! 199: if (!msgp) ! 200: msgs[msgp++] = mode == NEXT ? "next" : mode == PREV ? "prev" : "cur"; ! 201: if (!folder) ! 202: folder = m_getfolder (); ! 203: maildir = m_maildir (folder); ! 204: ! 205: if (chdir (maildir) == NOTOK) ! 206: adios (maildir, "unable to change directory to"); ! 207: if (!(mp = m_gmsg (folder))) ! 208: adios (NULLCP, "unable to read folder %s", folder); ! 209: if (mp -> hghmsg == 0) ! 210: adios (NULLCP, "no messages in %s", folder); ! 211: ! 212: for (msgnum = 0; msgnum < msgp; msgnum++) ! 213: if (!m_convert (mp, msgs[msgnum])) ! 214: done (1); ! 215: for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++) ! 216: if (mp -> msgstats[msgnum] & SELECTED) ! 217: mp -> msgstats[msgnum] |= UNSEEN; ! 218: m_setseq (mp); ! 219: m_setvis (mp, 1); ! 220: ! 221: if (mp -> numsel > MAXARGS - 2) ! 222: adios (NULLCP, "more than %d messages for show exec", MAXARGS - 2); ! 223: for (msgnum = mp -> lowsel; msgnum <= mp -> hghsel; msgnum++) ! 224: if (mp -> msgstats[msgnum] & SELECTED) ! 225: vec[vecp++] = getcpy (m_name (msgnum)); ! 226: ! 227: m_replace (pfolder, folder); ! 228: if (mp -> hghsel != mp -> curmsg) ! 229: m_setcur (mp, mp -> hghsel); ! 230: m_sync (mp); ! 231: m_update (); ! 232: ! 233: if (vecp == 2 && headersw) ! 234: printf ("(Message %s:%s)\n", folder, vec[1]); ! 235: ! 236: /* */ ! 237: ! 238: go_to_it: ; ! 239: (void) fflush (stdout); ! 240: ! 241: vec[vecp] = NULL; ! 242: ! 243: if (nshow) ! 244: proc = "/bin/cat"; ! 245: else { ! 246: (void) putenv ("mhfolder", folder); ! 247: if (strcmp (r1bindex (showproc, '/'), "mhl") == 0) { ! 248: vec[0] = "mhl"; ! 249: (void) mhl (vecp, vec); ! 250: done (0); ! 251: } ! 252: proc = showproc; ! 253: } ! 254: ! 255: if (!draftsw ! 256: && !file ! 257: && chdir (maildir = concat (m_maildir (""), "/", NULLCP)) ! 258: != NOTOK) { ! 259: mp -> foldpath = concat (mp -> foldpath, "/", NULLCP); ! 260: cp = ssequal (maildir, mp -> foldpath) ! 261: ? mp -> foldpath + strlen (maildir) ! 262: : mp -> foldpath; ! 263: for (msgnum = procp; msgnum < vecp; msgnum++) ! 264: vec[msgnum] = concat (cp, vec[msgnum], NULLCP); ! 265: } ! 266: ! 267: vec[0] = r1bindex (proc, '/'); ! 268: execvp (proc, vec); ! 269: adios (proc, "unable to exec"); ! 270: } ! 271: ! 272: /* */ ! 273: ! 274: /* Cheat: we are loaded with adrparse, which wants a routine called ! 275: OfficialName(). We call adrparse:getm() with the correct arguments ! 276: to prevent OfficialName() from being called. Hence, the following ! 277: is to keep the loader happy. ! 278: */ ! 279: ! 280: char *OfficialName (name) ! 281: register char *name; ! 282: { ! 283: return name; ! 284: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.