1 /*- 2 * SPDX-License-Identifier: BSD-3-Clause 3 * 4 * Copyright (c) 1980, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. Neither the name of the University nor the names of its contributors 16 * may be used to endorse or promote products derived from this software 17 * without specific prior written permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 * SUCH DAMAGE. 30 */ 31 32 #ifndef lint 33 static const char copyright[] = 34 "@(#) Copyright (c) 1980, 1993\n\ 35 The Regents of the University of California. All rights reserved.\n"; 36 #endif /* not lint */ 37 38 #ifndef lint 39 #if 0 40 static char sccsid[] = "@(#)main.c 8.2 (Berkeley) 4/20/95"; 41 #endif 42 #endif /* not lint */ 43 #include <sys/cdefs.h> 44 __FBSDID("$FreeBSD$"); 45 46 #include "rcv.h" 47 #include <fcntl.h> 48 #include "extern.h" 49 50 /* 51 * Mail -- a mail program 52 * 53 * Startup -- interface with user. 54 */ 55 int msgCount; 56 int rcvmode; 57 int sawcom; 58 char *Tflag; 59 int senderr; 60 int edit; 61 int readonly; 62 int noreset; 63 int sourcing; 64 int loading; 65 int cond; 66 FILE *itf; 67 FILE *otf; 68 int image; 69 FILE *input; 70 char mailname[PATHSIZE]; 71 char prevfile[PATHSIZE]; 72 char *homedir; 73 char *myname; 74 off_t mailsize; 75 int lexnumber; 76 char lexstring[STRINGLEN]; 77 int regretp; 78 int regretstack[REGDEP]; 79 char *string_stack[REGDEP]; 80 int numberstack[REGDEP]; 81 struct message *dot; 82 struct message *message; 83 struct var *variables[HSHSIZE]; 84 struct grouphead *groups[HSHSIZE]; 85 struct ignoretab ignore[2]; 86 87 struct ignoretab saveignore[2]; 88 89 struct ignoretab ignoreall[2]; 90 char **altnames; 91 int debug; 92 int screenwidth; 93 int screenheight; 94 95 int realscreenheight; 96 97 jmp_buf srbuf; 98 99 static jmp_buf hdrjmp; 100 101 extern const char *version; 102 103 int 104 main(int argc, char *argv[]) 105 { 106 int i; 107 struct name *to, *cc, *bcc, *smopts; 108 char *subject, *replyto; 109 char *ef, *rc; 110 char nosrc = 0; 111 sig_t prevint; 112 113 /* 114 * Set up a reasonable environment. 115 * Figure out whether we are being run interactively, 116 * start the SIGCHLD catcher, and so forth. 117 */ 118 (void)signal(SIGCHLD, sigchild); 119 if (isatty(0)) 120 assign("interactive", ""); 121 image = -1; 122 /* 123 * Now, determine how we are being used. 124 * We successively pick off - flags. 125 * If there is anything left, it is the base of the list 126 * of users to mail to. Argp will be set to point to the 127 * first of these users. 128 */ 129 ef = NULL; 130 to = NULL; 131 cc = NULL; 132 bcc = NULL; 133 smopts = NULL; 134 subject = NULL; 135 while ((i = getopt(argc, argv, "FEHINT:b:c:edfins:u:v")) != -1) { 136 switch (i) { 137 case 'T': 138 /* 139 * Next argument is temp file to write which 140 * articles have been read/deleted for netnews. 141 */ 142 Tflag = optarg; 143 if ((i = open(Tflag, O_CREAT | O_TRUNC | O_WRONLY, 144 0600)) < 0) 145 err(1, "%s", Tflag); 146 (void)close(i); 147 break; 148 case 'u': 149 /* 150 * Next argument is person to pretend to be. 151 */ 152 myname = optarg; 153 unsetenv("MAIL"); 154 break; 155 case 'i': 156 /* 157 * User wants to ignore interrupts. 158 * Set the variable "ignore" 159 */ 160 assign("ignore", ""); 161 break; 162 case 'd': 163 debug++; 164 break; 165 case 'e': 166 /* 167 * User wants to check mail and exit. 168 */ 169 assign("checkmode", ""); 170 break; 171 case 'H': 172 /* 173 * User wants a header summary only. 174 */ 175 assign("headersummary", ""); 176 break; 177 case 'F': 178 /* 179 * User wants to record messages to files 180 * named after first recipient username. 181 */ 182 assign("recordrecip", ""); 183 break; 184 case 's': 185 /* 186 * Give a subject field for sending from 187 * non terminal 188 */ 189 subject = optarg; 190 break; 191 case 'f': 192 /* 193 * User is specifying file to "edit" with Mail, 194 * as opposed to reading system mailbox. 195 * If no argument is given after -f, we read his 196 * mbox file. 197 * 198 * getopt() can't handle optional arguments, so here 199 * is an ugly hack to get around it. 200 */ 201 if ((argv[optind] != NULL) && (argv[optind][0] != '-')) 202 ef = argv[optind++]; 203 else 204 ef = "&"; 205 break; 206 case 'n': 207 /* 208 * User doesn't want to source /usr/lib/Mail.rc 209 */ 210 nosrc++; 211 break; 212 case 'N': 213 /* 214 * Avoid initial header printing. 215 */ 216 assign("noheader", ""); 217 break; 218 case 'v': 219 /* 220 * Send mailer verbose flag 221 */ 222 assign("verbose", ""); 223 break; 224 case 'I': 225 /* 226 * We're interactive 227 */ 228 assign("interactive", ""); 229 break; 230 case 'c': 231 /* 232 * Get Carbon Copy Recipient list 233 */ 234 cc = cat(cc, nalloc(optarg, GCC)); 235 break; 236 case 'b': 237 /* 238 * Get Blind Carbon Copy Recipient list 239 */ 240 bcc = cat(bcc, nalloc(optarg, GBCC)); 241 break; 242 case 'E': 243 /* 244 * Don't send empty files. 245 */ 246 assign("dontsendempty", ""); 247 break; 248 case '?': 249 fprintf(stderr, "\ 250 Usage: %s [-dEiInv] [-s subject] [-c cc-addr] [-b bcc-addr] [-F] to-addr ...\n\ 251 %*s [-sendmail-option ...]\n\ 252 %s [-dEHiInNv] [-F] -f [name]\n\ 253 %s [-dEHiInNv] [-F] [-u user]\n\ 254 %s [-d] -e [-f name]\n", __progname, (int)strlen(__progname), "", 255 __progname, __progname, __progname); 256 exit(1); 257 } 258 } 259 for (i = optind; (argv[i] != NULL) && (*argv[i] != '-'); i++) 260 to = cat(to, nalloc(argv[i], GTO)); 261 for (; argv[i] != NULL; i++) 262 smopts = cat(smopts, nalloc(argv[i], 0)); 263 /* 264 * Check for inconsistent arguments. 265 */ 266 if (to == NULL && (subject != NULL || cc != NULL || bcc != NULL)) 267 errx(1, "You must specify direct recipients with -s, -c, or -b."); 268 if (ef != NULL && to != NULL) 269 errx(1, "Cannot give -f and people to send to."); 270 tinit(); 271 setscreensize(); 272 input = stdin; 273 rcvmode = !to; 274 spreserve(); 275 if (!nosrc) { 276 char *s, *path_rc; 277 278 if ((path_rc = malloc(sizeof(_PATH_MASTER_RC))) == NULL) 279 err(1, "malloc(path_rc) failed"); 280 281 strcpy(path_rc, _PATH_MASTER_RC); 282 while ((s = strsep(&path_rc, ":")) != NULL) 283 if (*s != '\0') 284 load(s); 285 } 286 /* 287 * Expand returns a savestr, but load only uses the file name 288 * for fopen, so it's safe to do this. 289 */ 290 if ((rc = getenv("MAILRC")) == NULL) 291 rc = "~/.mailrc"; 292 load(expand(rc)); 293 294 replyto = value("REPLYTO"); 295 if (!rcvmode) { 296 mail(to, cc, bcc, smopts, subject, replyto); 297 /* 298 * why wait? 299 */ 300 exit(senderr); 301 } 302 303 if(value("checkmode") != NULL) { 304 if (ef == NULL) 305 ef = "%"; 306 if (setfile(ef) <= 0) 307 /* Either an error has occurred, or no mail */ 308 exit(1); 309 else 310 exit(0); 311 /* NOTREACHED */ 312 } 313 314 /* 315 * Ok, we are reading mail. 316 * Decide whether we are editing a mailbox or reading 317 * the system mailbox, and open up the right stuff. 318 */ 319 if (ef == NULL) 320 ef = "%"; 321 if (setfile(ef) < 0) 322 exit(1); /* error already reported */ 323 if (setjmp(hdrjmp) == 0) { 324 if ((prevint = signal(SIGINT, SIG_IGN)) != SIG_IGN) 325 (void)signal(SIGINT, hdrstop); 326 if (value("quiet") == NULL) 327 printf("Mail version %s. Type ? for help.\n", 328 version); 329 announce(); 330 (void)fflush(stdout); 331 (void)signal(SIGINT, prevint); 332 } 333 334 /* If we were in header summary mode, it's time to exit. */ 335 if (value("headersummary") != NULL) 336 exit(0); 337 338 commands(); 339 (void)signal(SIGHUP, SIG_IGN); 340 (void)signal(SIGINT, SIG_IGN); 341 (void)signal(SIGQUIT, SIG_IGN); 342 quit(); 343 exit(0); 344 } 345 346 /* 347 * Interrupt printing of the headers. 348 */ 349 /*ARGSUSED*/ 350 void 351 hdrstop(int signo __unused) 352 { 353 354 (void)fflush(stdout); 355 fprintf(stderr, "\nInterrupt\n"); 356 longjmp(hdrjmp, 1); 357 } 358 359 /* 360 * Compute what the screen size for printing headers should be. 361 * We use the following algorithm for the height: 362 * If baud rate < 1200, use 9 363 * If baud rate = 1200, use 14 364 * If baud rate > 1200, use 24 or ws_row 365 * Width is either 80 or ws_col; 366 */ 367 void 368 setscreensize(void) 369 { 370 struct termios tbuf; 371 struct winsize ws; 372 speed_t speed; 373 374 if (ioctl(1, TIOCGWINSZ, (char *)&ws) < 0) 375 ws.ws_col = ws.ws_row = 0; 376 if (tcgetattr(1, &tbuf) < 0) 377 speed = B9600; 378 else 379 speed = cfgetospeed(&tbuf); 380 if (speed < B1200) 381 screenheight = 9; 382 else if (speed == B1200) 383 screenheight = 14; 384 else if (ws.ws_row != 0) 385 screenheight = ws.ws_row; 386 else 387 screenheight = 24; 388 if ((realscreenheight = ws.ws_row) == 0) 389 realscreenheight = 24; 390 if ((screenwidth = ws.ws_col) == 0) 391 screenwidth = 80; 392 } 393