usr.bin/mail/main.c

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