usr.bin/mail/main.c

   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
  56 static jmp_buf  hdrjmp;
  57
  58 extern const char *version;
  59
  60 int
  61 main(int argc, char *argv[])
  62 {
  63         int i;
  64         struct name *to, *cc, *bcc, *smopts;
  65         char *subject, *replyto;
  66         char *ef, *rc;
  67         char nosrc = 0;
  68         sig_t prevint;
  69
  70         /*
  71          * Set up a reasonable environment.
  72          * Figure out whether we are being run interactively,
  73          * start the SIGCHLD catcher, and so forth.
  74          */
  75         (void)signal(SIGCHLD, sigchild);
  76         if (isatty(0))
  77                 assign("interactive", "");
  78         image = -1;
  79         /*
  80          * Now, determine how we are being used.
  81          * We successively pick off - flags.
  82          * If there is anything left, it is the base of the list
  83          * of users to mail to.  Argp will be set to point to the
  84          * first of these users.
  85          */
  86         ef = NULL;
  87         to = NULL;
  88         cc = NULL;
  89         bcc = NULL;
  90         smopts = NULL;
  91         subject = NULL;
  92         while ((i = getopt(argc, argv, "FEHINT:b:c:edfins:u:v")) != -1) {
  93                 switch (i) {
  94                 case 'T':
  95                         /*
  96                          * Next argument is temp file to write which
  97                          * articles have been read/deleted for netnews.
  98                          */
  99                         Tflag = optarg;
 100                         if ((i = open(Tflag, O_CREAT | O_TRUNC | O_WRONLY,
 101                             0600)) < 0)
 102                                 err(1, "%s", Tflag);
 103                         (void)close(i);
 104                         break;
 105                 case 'u':
 106                         /*
 107                          * Next argument is person to pretend to be.
 108                          */
 109                         myname = optarg;
 110                         unsetenv("MAIL");
 111                         break;
 112                 case 'i':
 113                         /*
 114                          * User wants to ignore interrupts.
 115                          * Set the variable "ignore"
 116                          */
 117                         assign("ignore", "");
 118                         break;
 119                 case 'd':
 120                         debug++;
 121                         break;
 122                 case 'e':
 123                         /*
 124                          * User wants to check mail and exit.
 125                          */
 126                         assign("checkmode", "");
 127                         break;
 128                 case 'H':
 129                         /*
 130                          * User wants a header summary only.
 131                          */
 132                         assign("headersummary", "");
 133                         break;
 134                 case 'F':
 135                         /*
 136                          * User wants to record messages to files
 137                          * named after first recipient username.
 138                          */
 139                         assign("recordrecip", "");
 140                         break;
 141                 case 's':
 142                         /*
 143                          * Give a subject field for sending from
 144                          * non terminal
 145                          */
 146                         subject = optarg;
 147                         break;
 148                 case 'f':
 149                         /*
 150                          * User is specifying file to "edit" with Mail,
 151                          * as opposed to reading system mailbox.
 152                          * If no argument is given after -f, we read his
 153                          * mbox file.
 154                          *
 155                          * getopt() can't handle optional arguments, so here
 156                          * is an ugly hack to get around it.
 157                          */
 158                         if ((argv[optind] != NULL) && (argv[optind][0] != '-'))
 159                                 ef = argv[optind++];
 160                         else
 161                                 ef = "&";
 162                         break;
 163                 case 'n':
 164                         /*
 165                          * User doesn't want to source /usr/lib/Mail.rc
 166                          */
 167                         nosrc++;
 168                         break;
 169                 case 'N':
 170                         /*
 171                          * Avoid initial header printing.
 172                          */
 173                         assign("noheader", "");
 174                         break;
 175                 case 'v':
 176                         /*
 177                          * Send mailer verbose flag
 178                          */
 179                         assign("verbose", "");
 180                         break;
 181                 case 'I':
 182                         /*
 183                          * We're interactive
 184                          */
 185                         assign("interactive", "");
 186                         break;
 187                 case 'c':
 188                         /*
 189                          * Get Carbon Copy Recipient list
 190                          */
 191                         cc = cat(cc, nalloc(optarg, GCC));
 192                         break;
 193                 case 'b':
 194                         /*
 195                          * Get Blind Carbon Copy Recipient list
 196                          */
 197                         bcc = cat(bcc, nalloc(optarg, GBCC));
 198                         break;
 199                 case 'E':
 200                         /*
 201                          * Don't send empty files.
 202                          */
 203                         assign("dontsendempty", "");
 204                         break;
 205                 case '?':
 206                         fprintf(stderr, "\
 207 Usage: %s [-dEiInv] [-s subject] [-c cc-addr] [-b bcc-addr] [-F] to-addr ...\n\
 208        %*s [-sendmail-option ...]\n\
 209        %s [-dEHiInNv] [-F] -f [name]\n\
 210        %s [-dEHiInNv] [-F] [-u user]\n\
 211        %s [-d] -e [-f name]\n", __progname, (int)strlen(__progname), "",
 212                                 __progname, __progname, __progname);
 213                         exit(1);
 214                 }
 215         }
 216         for (i = optind; (argv[i] != NULL) && (*argv[i] != '-'); i++)
 217                 to = cat(to, nalloc(argv[i], GTO));
 218         for (; argv[i] != NULL; i++)
 219                 smopts = cat(smopts, nalloc(argv[i], 0));
 220         /*
 221          * Check for inconsistent arguments.
 222          */
 223         if (to == NULL && (subject != NULL || cc != NULL || bcc != NULL))
 224                 errx(1, "You must specify direct recipients with -s, -c, or -b.");
 225         if (ef != NULL && to != NULL)
 226                 errx(1, "Cannot give -f and people to send to.");
 227         tinit();
 228         setscreensize();
 229         input = stdin;
 230         rcvmode = !to;
 231         spreserve();
 232         if (!nosrc) {
 233                 char *s, *path_rc;
 234
 235                 if ((path_rc = malloc(sizeof(_PATH_MASTER_RC))) == NULL)
 236                         err(1, "malloc(path_rc) failed");
 237
 238                 strcpy(path_rc, _PATH_MASTER_RC);
 239                 while ((s = strsep(&path_rc, ":")) != NULL)
 240                         if (*s != '\0')
 241                                 load(s);
 242         }
 243         /*
 244          * Expand returns a savestr, but load only uses the file name
 245          * for fopen, so it's safe to do this.
 246          */
 247         if ((rc = getenv("MAILRC")) == NULL)
 248                 rc = "~/.mailrc";
 249         load(expand(rc));
 250
 251         replyto = value("REPLYTO");
 252         if (!rcvmode) {
 253                 mail(to, cc, bcc, smopts, subject, replyto);
 254                 /*
 255                  * why wait?
 256                  */
 257                 exit(senderr);
 258         }
 259
 260         if(value("checkmode") != NULL) {
 261                 if (ef == NULL)
 262                         ef = "%";
 263                 if (setfile(ef) <= 0)
 264                         /* Either an error has occurred, or no mail */
 265                         exit(1);
 266                 else
 267                         exit(0);
 268                 /* NOTREACHED */
 269         }
 270
 271         /*
 272          * Ok, we are reading mail.
 273          * Decide whether we are editing a mailbox or reading
 274          * the system mailbox, and open up the right stuff.
 275          */
 276         if (ef == NULL)
 277                 ef = "%";
 278         if (setfile(ef) < 0)
 279                 exit(1);                /* error already reported */
 280         if (setjmp(hdrjmp) == 0) {
 281                 if ((prevint = signal(SIGINT, SIG_IGN)) != SIG_IGN)
 282                         (void)signal(SIGINT, hdrstop);
 283                 if (value("quiet") == NULL)
 284                         printf("Mail version %s.  Type ? for help.\n",
 285                                 version);
 286                 announce();
 287                 (void)fflush(stdout);
 288                 (void)signal(SIGINT, prevint);
 289         }
 290
 291         /* If we were in header summary mode, it's time to exit. */
 292         if (value("headersummary") != NULL)
 293                 exit(0);
 294
 295         commands();
 296         (void)signal(SIGHUP, SIG_IGN);
 297         (void)signal(SIGINT, SIG_IGN);
 298         (void)signal(SIGQUIT, SIG_IGN);
 299         quit();
 300         exit(0);
 301 }
 302
 303 /*
 304  * Interrupt printing of the headers.
 305  */
 306 /*ARGSUSED*/
 307 void
 308 hdrstop(int signo __unused)
 309 {
 310
 311         (void)fflush(stdout);
 312         fprintf(stderr, "\nInterrupt\n");
 313         longjmp(hdrjmp, 1);
 314 }
 315
 316 /*
 317  * Compute what the screen size for printing headers should be.
 318  * We use the following algorithm for the height:
 319  *      If baud rate < 1200, use  9
 320  *      If baud rate = 1200, use 14
 321  *      If baud rate > 1200, use 24 or ws_row
 322  * Width is either 80 or ws_col;
 323  */
 324 void
 325 setscreensize(void)
 326 {
 327         struct termios tbuf;
 328         struct winsize ws;
 329         speed_t speed;
 330
 331         if (ioctl(1, TIOCGWINSZ, (char *)&ws) < 0)
 332                 ws.ws_col = ws.ws_row = 0;
 333         if (tcgetattr(1, &tbuf) < 0)
 334                 speed = B9600;
 335         else
 336                 speed = cfgetospeed(&tbuf);
 337         if (speed < B1200)
 338                 screenheight = 9;
 339         else if (speed == B1200)
 340                 screenheight = 14;
 341         else if (ws.ws_row != 0)
 342                 screenheight = ws.ws_row;
 343         else
 344                 screenheight = 24;
 345         if ((realscreenheight = ws.ws_row) == 0)
 346                 realscreenheight = 24;
 347         if ((screenwidth = ws.ws_col) == 0)
 348                 screenwidth = 80;
 349 }