Commit | Line | Data |
---|---|---|
4f4122db WJ |
1 | /* |
2 | * Copyright (c) 1980 Regents of the University of California. | |
3 | * All rights reserved. | |
4 | * | |
5 | * Redistribution and use in source and binary forms, with or without | |
6 | * modification, are permitted provided that the following conditions | |
7 | * are met: | |
8 | * 1. Redistributions of source code must retain the above copyright | |
9 | * notice, this list of conditions and the following disclaimer. | |
10 | * 2. Redistributions in binary form must reproduce the above copyright | |
11 | * notice, this list of conditions and the following disclaimer in the | |
12 | * documentation and/or other materials provided with the distribution. | |
13 | * 3. All advertising materials mentioning features or use of this software | |
14 | * must display the following acknowledgement: | |
15 | * This product includes software developed by the University of | |
16 | * California, Berkeley and its contributors. | |
17 | * 4. Neither the name of the University nor the names of its contributors | |
18 | * may be used to endorse or promote products derived from this software | |
19 | * without specific prior written permission. | |
20 | * | |
21 | * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND | |
22 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
23 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
24 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE | |
25 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | |
26 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | |
27 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
28 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | |
29 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | |
30 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | |
31 | * SUCH DAMAGE. | |
32 | */ | |
33 | ||
34 | #ifndef lint | |
35 | char copyright[] = | |
36 | "@(#) Copyright (c) 1980 Regents of the University of California.\n\ | |
37 | All rights reserved.\n"; | |
38 | #endif /* not lint */ | |
39 | ||
40 | #ifndef lint | |
41 | static char sccsid[] = "@(#)main.c 5.28 (Berkeley) 4/1/91"; | |
42 | #endif /* not lint */ | |
43 | ||
44 | #include "rcv.h" | |
45 | #include <sys/stat.h> | |
46 | ||
47 | /* | |
48 | * Mail -- a mail program | |
49 | * | |
50 | * Startup -- interface with user. | |
51 | */ | |
52 | ||
53 | jmp_buf hdrjmp; | |
54 | ||
55 | main(argc, argv) | |
56 | char **argv; | |
57 | { | |
58 | register int i; | |
59 | struct name *to, *cc, *bcc, *smopts; | |
60 | char *subject; | |
61 | char *ef; | |
62 | char nosrc = 0; | |
63 | void hdrstop(); | |
64 | sig_t prevint; | |
65 | extern int getopt(), optind, opterr; | |
66 | extern char *optarg; | |
67 | void sigchild(); | |
68 | ||
69 | /* | |
70 | * Set up a reasonable environment. | |
71 | * Figure out whether we are being run interactively, | |
72 | * start the SIGCHLD catcher, and so forth. | |
73 | */ | |
74 | (void) signal(SIGCHLD, sigchild); | |
75 | if (isatty(0)) | |
76 | assign("interactive", ""); | |
77 | image = -1; | |
78 | /* | |
79 | * Now, determine how we are being used. | |
80 | * We successively pick off - flags. | |
81 | * If there is anything left, it is the base of the list | |
82 | * of users to mail to. Argp will be set to point to the | |
83 | * first of these users. | |
84 | */ | |
85 | ef = NOSTR; | |
86 | to = NIL; | |
87 | cc = NIL; | |
88 | bcc = NIL; | |
89 | smopts = NIL; | |
90 | subject = NOSTR; | |
91 | while ((i = getopt(argc, argv, "INT:b:c:dfins:u:v")) != EOF) { | |
92 | switch (i) { | |
93 | case 'T': | |
94 | /* | |
95 | * Next argument is temp file to write which | |
96 | * articles have been read/deleted for netnews. | |
97 | */ | |
98 | Tflag = optarg; | |
99 | if ((i = creat(Tflag, 0600)) < 0) { | |
100 | perror(Tflag); | |
101 | exit(1); | |
102 | } | |
103 | close(i); | |
104 | break; | |
105 | case 'u': | |
106 | /* | |
107 | * Next argument is person to pretend to be. | |
108 | */ | |
109 | myname = optarg; | |
110 | break; | |
111 | case 'i': | |
112 | /* | |
113 | * User wants to ignore interrupts. | |
114 | * Set the variable "ignore" | |
115 | */ | |
116 | assign("ignore", ""); | |
117 | break; | |
118 | case 'd': | |
119 | debug++; | |
120 | break; | |
121 | case 's': | |
122 | /* | |
123 | * Give a subject field for sending from | |
124 | * non terminal | |
125 | */ | |
126 | subject = optarg; | |
127 | break; | |
128 | case 'f': | |
129 | /* | |
130 | * User is specifying file to "edit" with Mail, | |
131 | * as opposed to reading system mailbox. | |
132 | * If no argument is given after -f, we read his | |
133 | * mbox file. | |
134 | * | |
135 | * getopt() can't handle optional arguments, so here | |
136 | * is an ugly hack to get around it. | |
137 | */ | |
138 | if ((argv[optind]) && (argv[optind][0] != '-')) | |
139 | ef = argv[optind++]; | |
140 | else | |
141 | ef = "&"; | |
142 | break; | |
143 | case 'n': | |
144 | /* | |
145 | * User doesn't want to source /usr/lib/Mail.rc | |
146 | */ | |
147 | nosrc++; | |
148 | break; | |
149 | case 'N': | |
150 | /* | |
151 | * Avoid initial header printing. | |
152 | */ | |
153 | assign("noheader", ""); | |
154 | break; | |
155 | case 'v': | |
156 | /* | |
157 | * Send mailer verbose flag | |
158 | */ | |
159 | assign("verbose", ""); | |
160 | break; | |
161 | case 'I': | |
162 | /* | |
163 | * We're interactive | |
164 | */ | |
165 | assign("interactive", ""); | |
166 | break; | |
167 | case 'c': | |
168 | /* | |
169 | * Get Carbon Copy Recipient list | |
170 | */ | |
171 | cc = cat(cc, nalloc(optarg, GCC)); | |
172 | break; | |
173 | case 'b': | |
174 | /* | |
175 | * Get Blind Carbon Copy Recipient list | |
176 | */ | |
177 | bcc = cat(bcc, nalloc(optarg, GBCC)); | |
178 | break; | |
179 | case '?': | |
180 | fputs("\ | |
181 | Usage: mail [-iInv] [-s subject] [-c cc-addr] [-b bcc-addr] to-addr ...\n\ | |
182 | [- sendmail-options ...]\n\ | |
183 | mail [-iInNv] -f [name]\n\ | |
184 | mail [-iInNv] [-u user]\n", | |
185 | stderr); | |
186 | exit(1); | |
187 | } | |
188 | } | |
189 | for (i = optind; (argv[i]) && (*argv[i] != '-'); i++) | |
190 | to = cat(to, nalloc(argv[i], GTO)); | |
191 | for (; argv[i]; i++) | |
192 | smopts = cat(smopts, nalloc(argv[i], 0)); | |
193 | /* | |
194 | * Check for inconsistent arguments. | |
195 | */ | |
196 | if (to == NIL && (subject != NOSTR || cc != NIL || bcc != NIL)) { | |
197 | fputs("You must specify direct recipients with -s, -c, or -b.\n", stderr); | |
198 | exit(1); | |
199 | } | |
200 | if (ef != NOSTR && to != NIL) { | |
201 | fprintf(stderr, "Cannot give -f and people to send to.\n"); | |
202 | exit(1); | |
203 | } | |
204 | tinit(); | |
205 | setscreensize(); | |
206 | input = stdin; | |
207 | rcvmode = !to; | |
208 | spreserve(); | |
209 | if (!nosrc) | |
210 | load(_PATH_MASTER_RC); | |
211 | /* | |
212 | * Expand returns a savestr, but load only uses the file name | |
213 | * for fopen, so it's safe to do this. | |
214 | */ | |
215 | load(expand("~/.mailrc")); | |
216 | if (!rcvmode) { | |
217 | mail(to, cc, bcc, smopts, subject); | |
218 | /* | |
219 | * why wait? | |
220 | */ | |
221 | exit(senderr); | |
222 | } | |
223 | /* | |
224 | * Ok, we are reading mail. | |
225 | * Decide whether we are editing a mailbox or reading | |
226 | * the system mailbox, and open up the right stuff. | |
227 | */ | |
228 | if (ef == NOSTR) | |
229 | ef = "%"; | |
230 | if (setfile(ef) < 0) | |
231 | exit(1); /* error already reported */ | |
232 | if (setjmp(hdrjmp) == 0) { | |
233 | extern char *version; | |
234 | ||
235 | if ((prevint = signal(SIGINT, SIG_IGN)) != SIG_IGN) | |
236 | signal(SIGINT, hdrstop); | |
237 | if (value("quiet") == NOSTR) | |
238 | printf("Mail version %s. Type ? for help.\n", | |
239 | version); | |
240 | announce(); | |
241 | fflush(stdout); | |
242 | signal(SIGINT, prevint); | |
243 | } | |
244 | commands(); | |
245 | signal(SIGHUP, SIG_IGN); | |
246 | signal(SIGINT, SIG_IGN); | |
247 | signal(SIGQUIT, SIG_IGN); | |
248 | quit(); | |
249 | exit(0); | |
250 | } | |
251 | ||
252 | /* | |
253 | * Interrupt printing of the headers. | |
254 | */ | |
255 | void | |
256 | hdrstop() | |
257 | { | |
258 | ||
259 | fflush(stdout); | |
260 | fprintf(stderr, "\nInterrupt\n"); | |
261 | longjmp(hdrjmp, 1); | |
262 | } | |
263 | ||
264 | /* | |
265 | * Compute what the screen size for printing headers should be. | |
266 | * We use the following algorithm for the height: | |
267 | * If baud rate < 1200, use 9 | |
268 | * If baud rate = 1200, use 14 | |
269 | * If baud rate > 1200, use 24 or ws_row | |
270 | * Width is either 80 or ws_col; | |
271 | */ | |
272 | setscreensize() | |
273 | { | |
274 | struct sgttyb tbuf; | |
275 | struct winsize ws; | |
276 | ||
277 | if (ioctl(1, TIOCGWINSZ, (char *) &ws) < 0) | |
278 | ws.ws_col = ws.ws_row = 0; | |
279 | if (ioctl(1, TIOCGETP, &tbuf) < 0) | |
280 | tbuf.sg_ospeed = B9600; | |
281 | if (tbuf.sg_ospeed < B1200) | |
282 | screenheight = 9; | |
283 | else if (tbuf.sg_ospeed == B1200) | |
284 | screenheight = 14; | |
285 | else if (ws.ws_row != 0) | |
286 | screenheight = ws.ws_row; | |
287 | else | |
288 | screenheight = 24; | |
289 | if ((realscreenheight = ws.ws_row) == 0) | |
290 | realscreenheight = 24; | |
291 | if ((screenwidth = ws.ws_col) == 0) | |
292 | screenwidth = 80; | |
293 | } |