![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to whom.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 whom.c CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / mh / uip |
1.1 root 1: /* whom.c - report who a message would go to */
2:
3: #include "../h/mh.h"
4: #include <stdio.h>
5: #include <signal.h>
6:
7: /* */
8:
9: static struct swit switches[] = {
10: #define ALIASW 0
11: "alias aliasfile", 0,
12:
13: #define CHKSW 1
14: "check", 0,
15: #define NOCHKSW 2
16: "nocheck", 0,
17:
18: #define DRAFTSW 3
19: "draft", 0,
20:
21: #define DFOLDSW 4
22: "draftfolder +folder", 6,
23: #define DMSGSW 5
24: "draftmessage msg", 6,
25: #define NDFLDSW 6
26: "nodraftfolder", 0,
27:
28: #define HELPSW 7
29: "help", 4,
30:
31: #define CLIESW 8
32: "client host", -6,
33: #define SERVSW 9
34: "server host", -6,
35: #define SNOOPSW 10
36: "snoop", -5,
37:
38: NULL, NULL
39: };
40:
41: /* */
42:
43: /* ARGSUSED */
44:
45: main (argc, argv)
46: int argc;
47: char *argv[];
48: {
49: int child_id,
50: i,
51: status,
52: isdf = 0,
53: distsw = 0,
54: vecp = 0;
55: char *cp,
56: *dfolder = NULL,
57: *dmsg = NULL,
58: *msg = NULL,
59: **ap,
60: **argp,
61: backup[BUFSIZ],
62: buf[100],
63: *arguments[MAXARGS],
64: *vec[MAXARGS];
65:
66: invo_name = r1bindex (argv[0], '/');
67: if ((cp = m_find (invo_name)) != NULL) {
68: ap = brkstring (cp = getcpy (cp), " ", "\n");
69: ap = copyip (ap, arguments);
70: }
71: else
72: ap = arguments;
73: (void) copyip (argv + 1, ap);
74: argp = arguments;
75:
76: vec[vecp++] = invo_name;
77: vec[vecp++] = "-whom";
78: vec[vecp++] = "-library";
79: vec[vecp++] = getcpy (m_maildir (""));
80:
81: /* */
82:
83: while (cp = *argp++) {
84: if (*cp == '-')
85: switch (smatch (++cp, switches)) {
86: case AMBIGSW:
87: ambigsw (cp, switches);
88: done (1);
89: case UNKWNSW:
90: adios (NULLCP, "-%s unknown", cp);
91: case HELPSW:
92: (void) sprintf (buf, "%s [switches] [file]", invo_name);
93: help (buf, switches);
94: done (1);
95:
96: case CHKSW:
97: case NOCHKSW:
98: case SNOOPSW:
99: vec[vecp++] = --cp;
100: continue;
101:
102: case DRAFTSW:
103: msg = draft;
104: continue;
105:
106: case DFOLDSW:
107: if (dfolder)
108: adios (NULLCP, "only one draft folder at a time!");
109: if (!(cp = *argp++) || *cp == '-')
110: adios (NULLCP, "missing argument to %s", argp[-2]);
111: dfolder = path (*cp == '+' || *cp == '@' ? cp + 1 : cp,
112: *cp != '@' ? TFOLDER : TSUBCWF);
113: continue;
114: case DMSGSW:
115: if (dmsg)
116: adios (NULLCP, "only one draft message at a time!");
117: if (!(dmsg = *argp++) || *dmsg == '-')
118: adios (NULLCP, "missing argument to %s", argp[-2]);
119: continue;
120: case NDFLDSW:
121: dfolder = NULL;
122: isdf = NOTOK;
123: continue;
124:
125: case ALIASW:
126: case CLIESW:
127: case SERVSW:
128: vec[vecp++] = --cp;
129: if (!(cp = *argp++) || *cp == '-')
130: adios (NULLCP, "missing argument to %s", argp[-2]);
131: vec[vecp++] = cp;
132: continue;
133: }
134: if (msg)
135: adios (NULLCP, "only one draft at a time!");
136: else
137: vec[vecp++] = msg = cp;
138: }
139:
140: /* */
141:
142: if (msg == NULL) {
143: #ifdef WHATNOW
144: if ((cp = getenv ("mhdraft")) == NULL || *cp == NULL)
145: #endif WHATNOW
146: cp = getcpy (m_draft (dfolder, dmsg, 1, &isdf));
147: msg = vec[vecp++] = cp;
148: }
149: if ((cp = getenv ("mhdist"))
150: && *cp
151: && (distsw = atoi (cp))
152: && (cp = getenv ("mhaltmsg"))
153: && *cp) {
154: if (distout (msg, cp, backup) == NOTOK)
155: done (1);
156: vec[vecp++] = "-dist";
157: distsw++;
158: }
159: vec[vecp] = NULL;
160:
161: closefds (3);
162:
163: if (distsw)
164: for (i = 0; (child_id = fork ()) == NOTOK && i < 5; i++)
165: sleep (5);
166: switch (distsw ? child_id : OK) {
167: case NOTOK:
168: advise (NULLCP, "unable to fork, so checking directly...");
169: case OK:
170: execvp (postproc, vec);
171: fprintf (stderr, "unable to exec ");
172: perror (postproc);
173: _exit (-1);
174:
175: default:
176: (void) signal (SIGHUP, SIG_IGN);
177: (void) signal (SIGINT, SIG_IGN);
178: (void) signal (SIGQUIT, SIG_IGN);
179: (void) signal (SIGTERM, SIG_IGN);
180:
181: status = pidwait (child_id, OK);
182:
183: (void) unlink (msg);
184: if (rename (backup, msg) == NOTOK)
185: adios (msg, "unable to rename %s to", backup);
186: done (status);
187: }
188: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.