common/main.c

   1 /*-
   2  * Copyright (c) 1992, 1993
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * %sccs.include.redist.c%
   6  */
   7
   8 #ifndef lint
   9 static char copyright[] =
  10 "%Z% Copyright (c) 1992, 1993\n\
  11         The Regents of the University of California.  All rights reserved.\n";
  12 #endif /* not lint */
  13
  14 #ifndef lint
  15 static char sccsid[] = "$Id: main.c,v 8.56 1993/12/20 17:29:51 bostic Exp $ (Berkeley) $Date: 1993/12/20 17:29:51 $";
  16 #endif /* not lint */
  17
  18 #include <sys/param.h>
  19 #include <sys/stat.h>
  20
  21 #include <ctype.h>
  22 #include <err.h>
  23 #include <errno.h>
  24 #include <fcntl.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27 #include <termios.h>
  28 #include <unistd.h>
  29
  30 #ifdef __STDC__
  31 #include <stdarg.h>
  32 #else
  33 #include <varargs.h>
  34 #endif
  35
  36 #include "vi.h"
  37 #include "excmd.h"
  38 #include "pathnames.h"
  39 #include "tag.h"
  40
  41 static int       exrc_isok __P((SCR *, char *, int));
  42 static void      gs_end __P((GS *));
  43 static GS       *gs_init __P((void));
  44 static void      h_hup __P((int));
  45 static void      h_term __P((int));
  46 static void      h_winch __P((int));
  47 static void      obsolete __P((char *[]));
  48 static void      usage __P((int));
  49
  50 GS *__global_list;                      /* GLOBAL: List of screens. */
  51
  52 int
  53 main(argc, argv)
  54         int argc;
  55         char *argv[];
  56 {
  57         extern int optind;
  58         extern char *optarg;
  59         static int reenter;             /* STATIC: Re-entrancy check. */
  60         struct sigaction act;
  61         struct stat sb;
  62         GS *gp;
  63         FREF *frp;
  64         SCR *sp;
  65         u_int flags, saved_vi_mode;
  66         int ch, eval, flagchk, readonly, silent, snapshot;
  67         char *excmdarg, *myname, *p, *rec_f, *tag_f, *trace_f, *wsizearg;
  68         char path[MAXPATHLEN];
  69
  70         /* Stop if indirecting through a NULL pointer. */
  71         if (reenter++)
  72                 abort();
  73
  74         /* Set screen type and mode based on the program name. */
  75         readonly = 0;
  76         if ((myname = strrchr(*argv, '/')) == NULL)
  77                 myname = *argv;
  78         else
  79                 ++myname;
  80         if (!strcmp(myname, "ex") || !strcmp(myname, "nex"))
  81                 LF_INIT(S_EX);
  82         else {
  83                 /* View is readonly. */
  84                 if (!strcmp(myname, "view"))
  85                         readonly = 1;
  86                 LF_INIT(S_VI_CURSES);
  87         }
  88         saved_vi_mode = S_VI_CURSES;
  89
  90         /* Convert old-style arguments into new-style ones. */
  91         obsolete(argv);
  92
  93         /* Parse the arguments. */
  94         flagchk = '\0';
  95         excmdarg = rec_f = tag_f = trace_f = wsizearg = NULL;
  96         silent = 0;
  97         snapshot = 1;
  98         while ((ch = getopt(argc, argv, "c:eFlRr:sT:t:vw:x:")) != EOF)
  99                 switch (ch) {
 100                 case 'c':               /* Run the command. */
 101                         excmdarg = optarg;
 102                         break;
 103                 case 'e':               /* Ex mode. */
 104                         LF_CLR(S_SCREENS);
 105                         LF_SET(S_EX);
 106                         break;
 107                 case 'F':               /* No snapshot. */
 108                         snapshot = 0;
 109                         break;
 110                 case 'l':
 111                         if (flagchk != '\0' && flagchk != 'l')
 112                                 errx(1,
 113                                     "only one of -%c and -l may be specified.",
 114                                     flagchk);
 115                         flagchk = 'l';
 116                         break;
 117                 case 'R':               /* Readonly. */
 118                         readonly = 1;
 119                         break;
 120                 case 'r':               /* Recover. */
 121                         if (flagchk == 'r')
 122                                 errx(1,
 123                                     "only one recovery file may be specified.");
 124                         if (flagchk != '\0')
 125                                 errx(1,
 126                                     "only one of -%c and -r may be specified.",
 127                                     flagchk);
 128                         flagchk = 'r';
 129                         rec_f = optarg;
 130                         break;
 131                 case 's':
 132                         if (!LF_ISSET(S_EX))
 133                                 errx(1, "-s only applicable to ex.");
 134                         silent = 1;
 135                         break;
 136                 case 'T':               /* Trace. */
 137                         trace_f = optarg;
 138                         break;
 139                 case 't':               /* Tag. */
 140                         if (flagchk == 't')
 141                                 errx(1,
 142                                     "only one tag file may be specified.");
 143                         if (flagchk != '\0')
 144                                 errx(1,
 145                                     "only one of -%c and -t may be specified.",
 146                                     flagchk);
 147                         flagchk = 't';
 148                         tag_f = optarg;
 149                         break;
 150                 case 'v':               /* Vi mode. */
 151                         LF_CLR(S_SCREENS);
 152                         LF_SET(S_VI_CURSES);
 153                         break;
 154                 case 'w':
 155                         wsizearg = optarg;
 156                         break;
 157                 case 'x':
 158                         if (!strcmp(optarg, "aw")) {
 159                                 LF_CLR(S_SCREENS);
 160                                 LF_SET(S_VI_XAW);
 161                                 saved_vi_mode = S_VI_XAW;
 162                                 break;
 163                         }
 164                         /* FALLTHROUGH */
 165                 case '?':
 166                 default:
 167                         usage(LF_ISSET(S_EX));
 168                 }
 169         argc -= optind;
 170         argv += optind;
 171
 172         /* Build and initialize the GS structure. */
 173         __global_list = gp = gs_init();
 174
 175         if (snapshot)
 176                 F_SET(gp, G_SNAPSHOT);
 177
 178         /* Build and initialize the first/current screen. */
 179         if (screen_init(NULL, &sp, flags))
 180                 goto err1;
 181         sp->saved_vi_mode = saved_vi_mode;
 182         CIRCLEQ_INSERT_HEAD(&__global_list->dq, sp, q);
 183
 184         if (trace_f != NULL) {
 185 #ifdef DEBUG
 186                 if ((gp->tracefp = fopen(optarg, "w")) == NULL)
 187                         err(1, "%s", optarg);
 188                 (void)fprintf(gp->tracefp, "\n===\ntrace: open %s\n", optarg);
 189 #else
 190                 msgq(sp, M_ERR, "-T support not compiled into this version.");
 191 #endif
 192         }
 193
 194         if (set_window_size(sp, 0, 0))  /* Set the window size. */
 195                 goto err1;
 196
 197         if (opts_init(sp))              /* Options initialization. */
 198                 goto err1;
 199         if (readonly)
 200                 O_SET(sp, O_READONLY);
 201         if (silent) {
 202                 O_CLR(sp, O_AUTOPRINT);
 203                 O_CLR(sp, O_PROMPT);
 204                 O_CLR(sp, O_VERBOSE);
 205                 O_CLR(sp, O_WARN);
 206                 F_SET(sp, S_EXSILENT);
 207         }
 208         if (wsizearg != NULL) {
 209                 ARGS *av[2], a, b;
 210                 if (strtol(optarg, &p, 10) < 0 || *p)
 211                         errx(1, "illegal window size -- %s", optarg);
 212                 (void)snprintf(path, sizeof(path), "window=%s", optarg);
 213                 a.bp = path;
 214                 a.len = strlen(path);
 215                 b.bp = NULL;
 216                 b.len = 0;
 217                 av[0] = &a;
 218                 av[1] = &b;
 219                 if (opts_set(sp, av))
 220                          msgq(sp, M_ERR,
 221                              "Unable to set command line window option");
 222         }
 223
 224         /* Keymaps, special keys, must follow option initializations. */
 225         if (term_init(sp))
 226                 goto err1;
 227
 228 #ifdef  DIGRAPHS
 229         if (digraph_init(sp))           /* Digraph initialization. */
 230                 goto err1;
 231 #endif
 232
 233         /*
 234          * Source the system, environment, ~user and local .exrc values.
 235          * If the environment exists, vi historically doesn't check ~user.
 236          * This is done before the file is read in because things in the
 237          * .exrc information can set, for example, the recovery directory.
 238          */
 239         if (!silent) {
 240                 if (exrc_isok(sp, _PATH_SYSEXRC, 1))
 241                         (void)ex_cfile(sp, NULL, _PATH_SYSEXRC);
 242
 243                 /* Source the EXINIT environment variable. */
 244                 if ((p = getenv("EXINIT")) != NULL)
 245                         if ((p = strdup(p)) == NULL) {
 246                                 msgq(sp, M_SYSERR, NULL);
 247                                 goto err1;
 248                         } else {
 249                                 (void)ex_icmd(sp, NULL, p, strlen(p));
 250                                 free(p);
 251                         }
 252                 else if ((p = getenv("HOME")) != NULL && *p) {
 253                         (void)snprintf(path,
 254                             sizeof(path), "%s/%s", p, _PATH_NEXRC);
 255                         if (exrc_isok(sp, path, 0))
 256                                 (void)ex_cfile(sp, NULL, path);
 257                         else {
 258                                 (void)snprintf(path,
 259                                     sizeof(path), "%s/%s", p, _PATH_EXRC);
 260                                 if (exrc_isok(sp, path, 0))
 261                                         (void)ex_cfile(sp, NULL, path);
 262                         }
 263                 }
 264                 /*
 265                  * !!!
 266                  * According to O'Reilly ("Learning the VI Editor", Fifth
 267                  * Edition, May 1992), System V has an option, "[no]exrc"
 268                  * which "allows the execution of .exrc files that reside
 269                  * outside the user's home directory.  My expectation is
 270                  * that this is intended to make sourcing "local" .exrc files
 271                  * a bit more secure.  This isn't a reasonable fix, and it
 272                  * leaves the trojan horse door widely open.  Instead we apply
 273                  * the same tests to local .exrc files that we apply to the
 274                  * other .exrc files.
 275                  */
 276                 if (exrc_isok(sp, _PATH_EXRC, 0))
 277                         (void)ex_cfile(sp, NULL, _PATH_EXRC);
 278         }
 279
 280         /* List recovery files if -l specified. */
 281         if (flagchk == 'l')
 282                 exit(rcv_list(sp));
 283
 284         /* Use a tag file or recovery file if specified. */
 285         if (tag_f != NULL && ex_tagfirst(sp, tag_f))
 286                 goto err1;
 287         else if (rec_f != NULL && rcv_read(sp, rec_f))
 288                 goto err1;
 289
 290         /* Append any remaining arguments as file names. */
 291         if (*argv != NULL)
 292                 for (; *argv != NULL; ++argv)
 293                         if (file_add(sp, NULL, *argv, 0) == NULL)
 294                                 goto err1;
 295
 296         /*
 297          * If no recovery or tag file, get an EXF structure.
 298          * If no argv file, use a temporary file.
 299          */
 300         if (tag_f == NULL && rec_f == NULL) {
 301                 if ((frp = file_first(sp)) == NULL &&
 302                     (frp = file_add(sp, NULL, NULL, 1)) == NULL)
 303                         goto err1;
 304                 if (file_init(sp, frp, NULL, 0))
 305                         goto err1;
 306         }
 307
 308         /* Set up the argument pointer. */
 309         sp->a_frp = sp->frp;
 310
 311         /*
 312          * Initialize the signals.  Use sigaction(2), not signal(3), because
 313          * we don't want to always restart system calls on 4BSD systems.  It
 314          * would be nice in some cases to restart system calls, but SA_RESTART
 315          * is a 4BSD extension so we can't use it.
 316          *
 317          * SIGWINCH, SIGHUP, SIGTERM:
 318          *      Catch and set a global bit.
 319          */
 320         act.sa_handler = h_hup;
 321         sigemptyset(&act.sa_mask);
 322         act.sa_flags = 0;
 323         (void)sigaction(SIGHUP, &act, NULL);
 324         act.sa_handler = h_term;
 325         sigemptyset(&act.sa_mask);
 326         act.sa_flags = 0;
 327         (void)sigaction(SIGTERM, &act, NULL);
 328         act.sa_handler = h_winch;
 329         sigemptyset(&act.sa_mask);
 330         act.sa_flags = 0;
 331         (void)sigaction(SIGWINCH, &act, NULL);
 332
 333         /*
 334          * SIGQUIT:
 335          *      Always ignore.
 336          */
 337         act.sa_handler = SIG_IGN;
 338         sigemptyset(&act.sa_mask);
 339         act.sa_flags = 0;
 340         (void)sigaction(SIGQUIT, &act, NULL);
 341
 342         /*
 343          * If there's an initial command, push it on the command stack.
 344          * Historically, it was always an ex command, not vi in vi mode
 345          * or ex in ex mode.  So, make it look like an ex command to vi.
 346          */
 347         if (excmdarg != NULL)
 348                 if (IN_EX_MODE(sp)) {
 349                         if (term_push(sp, excmdarg, strlen(excmdarg), 0, 0))
 350                                 goto err1;
 351                 } else if (IN_VI_MODE(sp)) {
 352                         if (term_push(sp, "\n", 1, 0, 0))
 353                                 goto err1;
 354                         if (term_push(sp, excmdarg, strlen(excmdarg), 0, 0))
 355                                 goto err1;
 356                         if (term_push(sp, ":", 1, 0, 0))
 357                                 goto err1;
 358                 }
 359
 360         /* Vi reads from the terminal. */
 361         if (!F_ISSET(gp, G_ISFROMTTY) && !F_ISSET(sp, S_EX)) {
 362                 msgq(sp, M_ERR, "Vi's standard input must be a terminal.");
 363                 goto err1;
 364         }
 365
 366         for (;;) {
 367                 if (sp->s_edit(sp, sp->ep))
 368                         goto err2;
 369
 370                 /*
 371                  * Edit the next screen on the display queue, or, move
 372                  * a screen from the hidden queue to the display queue.
 373                  */
 374                 if ((sp = __global_list->dq.cqh_first) ==
 375                     (void *)&__global_list->dq)
 376                         if ((sp = __global_list->hq.cqh_first) !=
 377                             (void *)&__global_list->hq) {
 378                                 CIRCLEQ_REMOVE(&sp->gp->hq, sp, q);
 379                                 CIRCLEQ_INSERT_TAIL(&sp->gp->dq, sp, q);
 380                         } else
 381                                 break;
 382
 383                 /*
 384                  * The screen type may have changed -- reinitialize the
 385                  * functions in case it has.
 386                  */
 387                 switch (F_ISSET(sp, S_SCREENS)) {
 388                 case S_EX:
 389                         if (sex_screen_init(sp))
 390                                 goto err2;
 391                         break;
 392                 case S_VI_CURSES:
 393                         if (svi_screen_init(sp))
 394                                 goto err2;
 395                         break;
 396                 case S_VI_XAW:
 397                         if (xaw_screen_init(sp))
 398                                 goto err2;
 399                         break;
 400                 default:
 401                         abort();
 402                 }
 403         }
 404
 405         /*
 406          * Two error paths.  The first means that something failed before
 407          * we called a screen routine.  Swap the message pointers between
 408          * the SCR and the GS, so messages get displayed.  The second is
 409          * something failed in a screen.  NOTE: sp may be GONE when the
 410          * screen returns, so only the gp can be trusted.
 411          */
 412         eval = 0;
 413         if (0) {
 414 err1:           gp->msgq.lh_first = sp->msgq.lh_first;
 415 err2:           eval = 1;
 416         }
 417
 418         gs_end(gp);
 419
 420         /* Make absolutely sure that the modes are restored correctly. */
 421         if (F_ISSET(gp, G_ISFROMTTY) &&
 422             tcsetattr(STDIN_FILENO, TCSADRAIN, &gp->original_termios))
 423                 err(1, "tcsetattr");
 424         exit(eval);
 425 }
 426
 427 /*
 428  * gs_init --
 429  *      Build and initialize the GS structure.
 430  */
 431 static GS *
 432 gs_init()
 433 {
 434         GS *gp;
 435         int fd;
 436
 437         CALLOC_NOMSG(NULL, gp, GS *, 1, sizeof(GS));
 438         if (gp == NULL)
 439                 err(1, NULL);
 440
 441         CIRCLEQ_INIT(&gp->dq);
 442         CIRCLEQ_INIT(&gp->hq);
 443         LIST_INIT(&gp->msgq);
 444
 445         /* Structures shared by screens so stored in the GS structure. */
 446         CALLOC_NOMSG(NULL, gp->tty, IBUF *, 1, sizeof(IBUF));
 447         if (gp->tty == NULL)
 448                 err(1, NULL);
 449
 450         LIST_INIT(&gp->cutq);
 451         LIST_INIT(&gp->seqq);
 452
 453         /* Set a flag if we're reading from the tty. */
 454         if (isatty(STDIN_FILENO))
 455                 F_SET(gp, G_ISFROMTTY);
 456
 457         /*
 458          * XXX
 459          * Set a flag and don't do terminal sets/resets if the input isn't
 460          * from a tty.  Under all circumstances put reasonable things into
 461          * the original_termios field, as some routines (seq.c:seq_save()
 462          * and term.c:term_init()) want values for special characters.
 463          */
 464         if (F_ISSET(gp, G_ISFROMTTY)) {
 465                 if (tcgetattr(STDIN_FILENO, &gp->original_termios))
 466                         err(1, "tcgetattr");
 467         } else {
 468                 if ((fd = open(_PATH_TTY, O_RDONLY, 0)) == -1)
 469                         err(1, "%s", _PATH_TTY);
 470                 if (tcgetattr(fd, &gp->original_termios))
 471                         err(1, "tcgetattr");
 472                 (void)close(fd);
 473         }
 474
 475         return (gp);
 476 }
 477
 478
 479 /*
 480  * gs_end --
 481  *      End the GS structure.
 482  */
 483 static void
 484 gs_end(gp)
 485         GS *gp;
 486 {
 487         MSG *mp;
 488         SCR *sp;
 489         char *tty;
 490
 491         /* Reset anything that needs resetting. */
 492         if (gp->flags & G_SETMODE)                      /* O_MESG */
 493                 if ((tty = ttyname(STDERR_FILENO)) == NULL)
 494                         warn("ttyname");
 495                 else if (chmod(tty, gp->origmode) < 0)
 496                         warn("%s", tty);
 497
 498         /* Ring the bell if scheduled. */
 499         if (F_ISSET(gp, G_BELLSCHED))
 500                 (void)fprintf(stderr, "\07");           /* \a */
 501
 502         /* If there are any remaining screens, flush their messages. */
 503         for (sp = __global_list->dq.cqh_first;
 504             sp != (void *)&__global_list->dq; sp = sp->q.cqe_next)
 505                 for (mp = sp->msgq.lh_first;
 506                     mp != NULL && !(F_ISSET(mp, M_EMPTY)); mp = mp->q.le_next)
 507                         (void)fprintf(stderr, "%.*s\n", (int)mp->len, mp->mbuf);
 508         for (sp = __global_list->hq.cqh_first;
 509             sp != (void *)&__global_list->hq; sp = sp->q.cqe_next)
 510                 for (mp = sp->msgq.lh_first;
 511                     mp != NULL && !(F_ISSET(mp, M_EMPTY)); mp = mp->q.le_next)
 512                         (void)fprintf(stderr, "%.*s\n", (int)mp->len, mp->mbuf);
 513         /* Flush messages on the global queue. */
 514         for (mp = gp->msgq.lh_first;
 515             mp != NULL && !(F_ISSET(mp, M_EMPTY)); mp = mp->q.le_next)
 516                 (void)fprintf(stderr, "%.*s\n", (int)mp->len, mp->mbuf);
 517
 518         FREE(gp->special_key, MAX_FAST_KEY);
 519
 520         /*
 521          * DON'T FREE THE GLOBAL STRUCTURE -- WE DIDN'T TURN
 522          * OFF SIGNALS/TIMERS, SO IT MAY STILL BE REFERENCED.
 523          */
 524 }
 525
 526 /*
 527  * h_hup --
 528  *      Handle SIGHUP.
 529  */
 530 static void
 531 h_hup(signo)
 532         int signo;
 533 {
 534         F_SET(__global_list, G_SIGHUP);
 535
 536         /*
 537          * If we're asleep, just die.
 538          *
 539          * XXX
 540          * This isn't right if the windows are independent.
 541          */
 542         if (F_ISSET(__global_list, G_SLEEPING))
 543                 rcv_hup();
 544 }
 545
 546 /*
 547  * h_term --
 548  *      Handle SIGTERM.
 549  */
 550 static void
 551 h_term(signo)
 552         int signo;
 553 {
 554         F_SET(__global_list, G_SIGTERM);
 555
 556         /*
 557          * If we're asleep, just die.
 558          *
 559          * XXX
 560          * This isn't right if the windows are independent.
 561          */
 562         if (F_ISSET(__global_list, G_SLEEPING))
 563                 rcv_term();
 564 }
 565
 566 /*
 567  * h_winch --
 568  *      Handle SIGWINCH.
 569  */
 570 static void
 571 h_winch(signo)
 572         int signo;
 573 {
 574         F_SET(__global_list, G_SIGWINCH);
 575 }
 576
 577 /*
 578  * exrc_isok --
 579  *      Check a .exrc for source-ability.
 580  */
 581 static int
 582 exrc_isok(sp, path, rootok)
 583         SCR *sp;
 584         char *path;
 585         int rootok;
 586 {
 587         struct stat sb;
 588         uid_t uid;
 589
 590         /* Check for the file's existence. */
 591         if (stat(path, &sb))
 592                 return (0);
 593
 594         /*
 595          * !!!
 596          * Historically, vi did not read the .exrc files if they were owned
 597          * by someone other than the user, unless the undocumented option
 598          * sourceany was set.  We don't support the sourceany option.  We
 599          * check that the user (or root, for system files) owns the file and
 600          * require that it be unwriteable by anyone other than the owner.
 601          */
 602
 603         /* Owned by the user or root. */
 604         uid = getuid();
 605         if (rootok) {
 606                 if (sb.st_uid != uid && sb.st_uid != 0) {
 607                         msgq(sp, M_ERR,
 608                             "%s not sourced: not owned by you or root.", path);
 609                         return (0);
 610                 }
 611         } else
 612                 if (sb.st_uid != uid) {
 613                         msgq(sp, M_ERR,
 614                             "%s not sourced: not owned by you.", path);
 615                         return (0);
 616                 }
 617
 618         /* Not writeable by anyone but the owner. */
 619         if (sb.st_mode & (S_IWGRP | S_IWOTH)) {
 620                 msgq(sp, M_ERR,
 621                     "%s not sourced: writeable by a user other than the owner.",
 622                     path);
 623                 return (0);
 624         }
 625         return (1);
 626 }
 627
 628 static void
 629 obsolete(argv)
 630         char *argv[];
 631 {
 632         size_t len;
 633         char *p, *myname;
 634
 635         /*
 636          * Translate old style arguments into something getopt will like.
 637          * Make sure it's not text space memory, because ex changes the
 638          * strings.
 639          *      Change "+" into "-c$".
 640          *      Change "+<anything else>" into "-c<anything else>".
 641          *      Change "-" into "-s"
 642          *      Change "-r" into "-l"
 643          */
 644         for (myname = argv[0]; *++argv;)
 645                 if (argv[0][0] == '+') {
 646                         if (argv[0][1] == '\0') {
 647                                 MALLOC_NOMSG(NULL, argv[0], char *, 4);
 648                                 if (argv[0] == NULL)
 649                                         err(1, NULL);
 650                                 (void)strcpy(argv[0], "-c$");
 651                         } else  {
 652                                 p = argv[0];
 653                                 len = strlen(argv[0]);
 654                                 MALLOC_NOMSG(NULL, argv[0], char *, len + 2);
 655                                 if (argv[0] == NULL)
 656                                         err(1, NULL);
 657                                 argv[0][0] = '-';
 658                                 argv[0][1] = 'c';
 659                                 (void)strcpy(argv[0] + 2, p + 1);
 660                         }
 661                 } else if (argv[0][0] == '-') {
 662                         if (argv[0][1] == 'r') {
 663                                 if (argv[0][2] == '\0' && argv[1] == NULL)
 664                                         argv[0][1] = 'l';
 665                         } else if (argv[0][1] == '\0') {
 666                                 MALLOC_NOMSG(NULL, argv[0], char *, 3);
 667                                 if (argv[0] == NULL)
 668                                         err(1, NULL);
 669                                 (void)strcpy(argv[0], "-s");
 670                         }
 671                 }
 672 }
 673
 674 static void
 675 usage(is_ex)
 676         int is_ex;
 677 {
 678 #define EX_USAGE \
 679         "usage: ex [-eFlRsv] [-c command] [-r file] [-t tag] [-w size] [-x aw]"
 680 #define VI_USAGE \
 681         "usage: vi [-eFlRv] [-c command] [-r file] [-t tag] [-w size] [-x aw]"
 682
 683         (void)fprintf(stderr, "%s\n", is_ex ? EX_USAGE : VI_USAGE);
 684         exit(1);
 685 }