1 /*-
2 * Copyright (c) 1980, 1993
3 * The Regents of the University of California. 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. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 *
29 * @(#)cmd1.c 8.2 (Berkeley) 4/20/95
30 * $FreeBSD: src/usr.bin/mail/cmd1.c,v 1.3.6.3 2003/01/06 05:46:03 mikeh Exp $
31 */
32
33 #include "rcv.h"
34 #include "extern.h"
35
36 /*
37 * Mail -- a mail program
38 *
39 * User commands.
40 */
41
42 extern const struct cmd cmdtab[];
43
44 /*
45 * Print the current active headings.
46 * Don't change dot if invoker didn't give an argument.
47 */
48
49 static int screen;
50
51 int
headers(int * msgvec)52 headers(int *msgvec)
53 {
54 int n, mesg, flag, size;
55 struct message *mp;
56
57 size = screensize();
58 n = msgvec[0];
59 if (n != 0)
60 screen = (n-1)/size;
61 if (screen < 0)
62 screen = 0;
63 mp = &message[screen * size];
64 if (mp >= &message[msgCount])
65 mp = &message[msgCount - size];
66 if (mp < &message[0])
67 mp = &message[0];
68 flag = 0;
69 mesg = mp - &message[0];
70 if (dot != &message[n-1])
71 dot = mp;
72 for (; mp < &message[msgCount]; mp++) {
73 mesg++;
74 if (mp->m_flag & MDELETED)
75 continue;
76 if (flag++ >= size)
77 break;
78 printhead(mesg);
79 }
80 if (flag == 0) {
81 printf("No more mail.\n");
82 return (1);
83 }
84 return (0);
85 }
86
87 /*
88 * Scroll to the next/previous screen
89 */
90 int
scroll(char * arg)91 scroll(char *arg)
92 {
93 int s, size;
94 int cur[1];
95
96 cur[0] = 0;
97 size = screensize();
98 s = screen;
99 switch (*arg) {
100 case 0:
101 case '+':
102 s++;
103 if (s * size >= msgCount) {
104 printf("On last screenful of messages\n");
105 return (0);
106 }
107 screen = s;
108 break;
109
110 case '-':
111 if (--s < 0) {
112 printf("On first screenful of messages\n");
113 return (0);
114 }
115 screen = s;
116 break;
117
118 default:
119 printf("Unrecognized scrolling command \"%s\"\n", arg);
120 return (1);
121 }
122 return (headers(cur));
123 }
124
125 /*
126 * Compute screen size.
127 */
128 int
screensize(void)129 screensize(void)
130 {
131 int s;
132 char *cp;
133
134 if ((cp = value("screen")) != NULL && (s = atoi(cp)) > 0)
135 return (s);
136 return (screenheight - 4);
137 }
138
139 /*
140 * Print out the headlines for each message
141 * in the passed message list.
142 */
143 int
from(int * msgvec)144 from(int *msgvec)
145 {
146 int *ip;
147
148 for (ip = msgvec; *ip != 0; ip++)
149 printhead(*ip);
150 if (--ip >= msgvec)
151 dot = &message[*ip - 1];
152 return (0);
153 }
154
155 /*
156 * Print out the header of a specific message.
157 * This is a slight improvement to the standard one.
158 */
159 void
printhead(int mesg)160 printhead(int mesg)
161 {
162 struct message *mp;
163 char headline[LINESIZE], wcount[LINESIZE], *subjline, dispc, curind;
164 char pbuf[BUFSIZ];
165 struct headline hl;
166 int subjlen;
167 char *name;
168
169 mp = &message[mesg-1];
170 readline(setinput(mp), headline, LINESIZE);
171 if ((subjline = hfield("subject", mp)) == NULL)
172 subjline = hfield("subj", mp);
173 /*
174 * Bletch!
175 */
176 curind = dot == mp ? '>' : ' ';
177 dispc = ' ';
178 if (mp->m_flag & MSAVED)
179 dispc = '*';
180 if (mp->m_flag & MPRESERVE)
181 dispc = 'P';
182 if ((mp->m_flag & (MREAD|MNEW)) == MNEW)
183 dispc = 'N';
184 if ((mp->m_flag & (MREAD|MNEW)) == 0)
185 dispc = 'U';
186 if (mp->m_flag & MBOX)
187 dispc = 'M';
188 parse(headline, &hl, pbuf);
189 sprintf(wcount, "%3ld/%-5ld", mp->m_lines, mp->m_size);
190 subjlen = screenwidth - 50 - strlen(wcount);
191 name = value("show-rcpt") != NULL ?
192 skin(hfield("to", mp)) : nameof(mp, 0);
193 if (subjline == NULL || subjlen < 0) /* pretty pathetic */
194 printf("%c%c%3d %-20.20s %16.16s %s\n",
195 curind, dispc, mesg, name, hl.l_date, wcount);
196 else
197 printf("%c%c%3d %-20.20s %16.16s %s \"%.*s\"\n",
198 curind, dispc, mesg, name, hl.l_date, wcount,
199 subjlen, subjline);
200 }
201
202 /*
203 * Print out the value of dot.
204 */
205 int
pdot(void)206 pdot(void)
207 {
208 printf("%td\n", dot - &message[0] + 1);
209 return (0);
210 }
211
212 /*
213 * Print out all the possible commands.
214 */
215 int
pcmdlist(void)216 pcmdlist(void)
217 {
218 const struct cmd *cp;
219 int cc;
220
221 printf("Commands are:\n");
222 for (cc = 0, cp = cmdtab; cp->c_name != NULL; cp++) {
223 cc += strlen(cp->c_name) + 2;
224 if (cc > 72) {
225 printf("\n");
226 cc = strlen(cp->c_name) + 2;
227 }
228 if ((cp+1)->c_name != NULL)
229 printf("%s, ", cp->c_name);
230 else
231 printf("%s\n", cp->c_name);
232 }
233 return (0);
234 }
235
236 /*
237 * Paginate messages, honor ignored fields.
238 */
239 int
more(int * msgvec)240 more(int *msgvec)
241 {
242 return (type1(msgvec, 1, 1));
243 }
244
245 /*
246 * Paginate messages, even printing ignored fields.
247 */
248 int
More(int * msgvec)249 More(int *msgvec)
250 {
251 return (type1(msgvec, 0, 1));
252 }
253
254 /*
255 * Type out messages, honor ignored fields.
256 */
257 int
type(int * msgvec)258 type(int *msgvec)
259 {
260 return (type1(msgvec, 1, 0));
261 }
262
263 /*
264 * Type out messages, even printing ignored fields.
265 */
266 int
Type(int * msgvec)267 Type(int *msgvec)
268 {
269 return (type1(msgvec, 0, 0));
270 }
271
272 /*
273 * Type out the messages requested.
274 */
275 jmp_buf pipestop;
276 int
type1(int * msgvec,int doign,int page)277 type1(int *msgvec, int doign, int page)
278 {
279 int nlines, *ip;
280 struct message *mp;
281 char *cp;
282 FILE *obuf;
283
284 obuf = stdout;
285 if (setjmp(pipestop))
286 goto close_pipe;
287 if (value("interactive") != NULL &&
288 (page || (cp = value("crt")) != NULL)) {
289 nlines = 0;
290 if (!page) {
291 for (ip = msgvec; *ip && ip-msgvec < msgCount; ip++)
292 nlines += message[*ip - 1].m_lines;
293 }
294 if (page || nlines > (*cp ? atoi(cp) : realscreenheight)) {
295 cp = value("PAGER");
296 if (cp == NULL || *cp == '\0')
297 cp = _PATH_MORE;
298 obuf = Popen(cp, "w");
299 if (obuf == NULL) {
300 warnx("%s", cp);
301 obuf = stdout;
302 } else
303 signal(SIGPIPE, brokpipe);
304 }
305 }
306
307 /*
308 * Send messages to the output.
309 *
310 */
311 for (ip = msgvec; *ip && ip - msgvec < msgCount; ip++) {
312 mp = &message[*ip - 1];
313 touch(mp);
314 dot = mp;
315 if (value("quiet") == NULL)
316 fprintf(obuf, "Message %d:\n", *ip);
317 sendmessage(mp, obuf, doign ? ignore : 0, NULL);
318 }
319
320 close_pipe:
321 if (obuf != stdout) {
322 /*
323 * Ignore SIGPIPE so it can't cause a duplicate close.
324 */
325 signal(SIGPIPE, SIG_IGN);
326 Pclose(obuf);
327 signal(SIGPIPE, SIG_DFL);
328 }
329 return (0);
330 }
331
332 /*
333 * Respond to a broken pipe signal --
334 * probably caused by quitting more.
335 */
336 /*ARGSUSED*/
337 void
brokpipe(int signo)338 brokpipe(int signo)
339 {
340 longjmp(pipestop, 1);
341 }
342
343 /*
344 * Print the top so many lines of each desired message.
345 * The number of lines is taken from the variable "toplines"
346 * and defaults to 5.
347 */
348 int
top(int * msgvec)349 top(int *msgvec)
350 {
351 int *ip;
352 struct message *mp;
353 int c, topl, lines, lineb;
354 char *valtop, linebuf[LINESIZE];
355 FILE *ibuf;
356
357 topl = 5;
358 valtop = value("toplines");
359 if (valtop != NULL) {
360 topl = atoi(valtop);
361 if (topl < 0 || topl > 10000)
362 topl = 5;
363 }
364 lineb = 1;
365 for (ip = msgvec; *ip && ip-msgvec < msgCount; ip++) {
366 mp = &message[*ip - 1];
367 touch(mp);
368 dot = mp;
369 if (value("quiet") == NULL)
370 printf("Message %d:\n", *ip);
371 ibuf = setinput(mp);
372 c = mp->m_lines;
373 if (!lineb)
374 printf("\n");
375 for (lines = 0; lines < c && lines <= topl; lines++) {
376 if (readline(ibuf, linebuf, sizeof(linebuf)) < 0)
377 break;
378 puts(linebuf);
379 lineb = strspn(linebuf, " \t") == strlen(linebuf);
380 }
381 }
382 return (0);
383 }
384
385 /*
386 * Touch all the given messages so that they will
387 * get mboxed.
388 */
389 int
stouch(int * msgvec)390 stouch(int *msgvec)
391 {
392 int *ip;
393
394 for (ip = msgvec; *ip != 0; ip++) {
395 dot = &message[*ip-1];
396 dot->m_flag |= MTOUCH;
397 dot->m_flag &= ~MPRESERVE;
398 }
399 return (0);
400 }
401
402 /*
403 * Make sure all passed messages get mboxed.
404 */
405 int
mboxit(int * msgvec)406 mboxit(int *msgvec)
407 {
408 int *ip;
409
410 for (ip = msgvec; *ip != 0; ip++) {
411 dot = &message[*ip-1];
412 dot->m_flag |= MTOUCH|MBOX;
413 dot->m_flag &= ~MPRESERVE;
414 }
415 return (0);
416 }
417
418 /*
419 * List the folders the user currently has.
420 */
421 int
folders(void)422 folders(void)
423 {
424 char dirname[PATHSIZE];
425 char *cmd;
426
427 if (getfold(dirname, sizeof(dirname)) < 0) {
428 printf("No value set for \"folder\"\n");
429 return (1);
430 }
431 if ((cmd = value("LISTER")) == NULL)
432 cmd = "ls";
433 run_command(cmd, 0, -1, -1, dirname, NULL, NULL);
434 return (0);
435 }
436
437 /*
438 * Update the mail file with any new messages that have
439 * come in since we started reading mail.
440 */
441 int
inc(void * v)442 inc(void *v)
443 {
444 int nmsg, mdot;
445
446 nmsg = incfile();
447
448 if (nmsg == 0)
449 printf("No new mail.\n");
450 else if (nmsg > 0) {
451 mdot = newfileinfo(msgCount - nmsg);
452 dot = &message[mdot - 1];
453 } else
454 printf("\"inc\" command failed...\n");
455
456 return (0);
457 }
458