]> git.cameronkatri.com Git - mandoc.git/blobdiff - main.c
unify names of AST node flags; no change of cpp output
[mandoc.git] / main.c
diff --git a/main.c b/main.c
index 2bfa6254c3f5bc7d5d66a91acd51529bdc983eb8..b64b3be115017ee869aa5dd6c5525e974f9019d5 100644 (file)
--- a/main.c
+++ b/main.c
@@ -1,16 +1,16 @@
-/*     $Id: main.c,v 1.219 2015/02/07 06:28:08 schwarze Exp $ */
+/*     $Id: main.c,v 1.279 2017/01/09 17:49:57 schwarze Exp $ */
 /*
  * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv>
- * Copyright (c) 2010-2012, 2014, 2015 Ingo Schwarze <schwarze@openbsd.org>
+ * Copyright (c) 2010-2012, 2014-2017 Ingo Schwarze <schwarze@openbsd.org>
  * Copyright (c) 2010 Joerg Sonnenberger <joerg@netbsd.org>
  *
  * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above
  * copyright notice and this permission notice appear in all copies.
  *
- * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHORS DISCLAIM ALL WARRANTIES
  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
- * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR
  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 
 #include <sys/types.h>
 #include <sys/param.h> /* MACHINE */
+#include <sys/wait.h>
 
 #include <assert.h>
 #include <ctype.h>
+#if HAVE_ERR
+#include <err.h>
+#endif
 #include <errno.h>
 #include <fcntl.h>
+#include <glob.h>
+#if HAVE_SANDBOX_INIT
+#include <sandbox.h>
+#endif
+#include <signal.h>
 #include <stdio.h>
 #include <stdint.h>
 #include <stdlib.h>
 #include <string.h>
+#include <time.h>
 #include <unistd.h>
 
-#include "mandoc.h"
 #include "mandoc_aux.h"
-#include "main.h"
+#include "mandoc.h"
+#include "roff.h"
 #include "mdoc.h"
 #include "man.h"
-#include "manpath.h"
+#include "tag.h"
+#include "main.h"
+#include "manconf.h"
 #include "mansearch.h"
 
-#if !defined(__GNUC__) || (__GNUC__ < 2)
-# if !defined(lint)
-#  define __attribute__(x)
-# endif
-#endif /* !defined(__GNUC__) || (__GNUC__ < 2) */
-
 enum   outmode {
        OUTMODE_DEF = 0,
        OUTMODE_FLN,
@@ -54,10 +60,6 @@ enum outmode {
        OUTMODE_ONE
 };
 
-typedef        void            (*out_mdoc)(void *, const struct mdoc *);
-typedef        void            (*out_man)(void *, const struct man *);
-typedef        void            (*out_free)(void *);
-
 enum   outt {
        OUTT_ASCII = 0, /* -Tascii */
        OUTT_LOCALE,    /* -Tlocale */
@@ -72,17 +74,16 @@ enum        outt {
 
 struct curparse {
        struct mparse    *mp;
-       struct mchars    *mchars;       /* character table */
        enum mandoclevel  wlevel;       /* ignore messages below this */
        int               wstop;        /* stop after a file with a warning */
        enum outt         outtype;      /* which output to use */
-       out_mdoc          outmdoc;      /* mdoc output ptr */
-       out_man           outman;       /* man output ptr */
-       out_free          outfree;      /* free output ptr */
        void             *outdata;      /* data for output */
-       char              outopts[BUFSIZ]; /* buf of output opts */
+       struct manoutput *outopts;      /* output options */
 };
 
+
+int                      mandocdb(int, char *[]);
+
 static int               fs_lookup(const struct manpaths *,
                                size_t ipath, const char *,
                                const char *, const char *,
@@ -91,64 +92,77 @@ static      void              fs_search(const struct mansearch *,
                                const struct manpaths *, int, char**,
                                struct manpage **, size_t *);
 static int               koptions(int *, char *);
-#if HAVE_SQLITE3
-int                      mandocdb(int, char**);
-#endif
 static int               moptions(int *, char *);
 static void              mmsg(enum mandocerr, enum mandoclevel,
                                const char *, int, int, const char *);
-static void              parse(struct curparse *, int,
-                               const char *, enum mandoclevel *);
-static enum mandoclevel  passthrough(const char *, int, int);
-static void              spawn_pager(void);
+static void              outdata_alloc(struct curparse *);
+static void              parse(struct curparse *, int, const char *);
+static void              passthrough(const char *, int, int);
+static pid_t             spawn_pager(struct tag_files *);
 static int               toptions(struct curparse *, char *);
 static void              usage(enum argmode) __attribute__((noreturn));
-static void              version(void) __attribute__((noreturn));
 static int               woptions(struct curparse *, char *);
 
 static const int sec_prios[] = {1, 4, 5, 8, 6, 3, 7, 2, 9};
 static char              help_arg[] = "help";
 static char             *help_argv[] = {help_arg, NULL};
-static const char       *progname;
+static enum mandoclevel  rc;
 
 
 int
 main(int argc, char *argv[])
 {
+       struct manconf   conf;
        struct curparse  curp;
        struct mansearch search;
-       struct manpaths  paths;
+       struct tag_files *tag_files;
+       const char      *progname;
        char            *auxpaths;
        char            *defos;
        unsigned char   *uc;
        struct manpage  *res, *resp;
        char            *conf_file, *defpaths;
-       size_t           isec, i, sz;
-       int              prio, best_prio, synopsis_only;
-       char             sec;
-       enum mandoclevel rc, rctmp;
+       const char      *sec;
+       size_t           i, sz;
+       int              prio, best_prio;
        enum outmode     outmode;
        int              fd;
        int              show_usage;
-       int              use_pager;
        int              options;
+       int              use_pager;
+       int              status, signum;
        int              c;
+       pid_t            pager_pid, tc_pgid, man_pgid, pid;
 
+#if HAVE_PROGNAME
+       progname = getprogname();
+#else
        if (argc < 1)
-               progname = "mandoc";
+               progname = mandoc_strdup("mandoc");
        else if ((progname = strrchr(argv[0], '/')) == NULL)
                progname = argv[0];
        else
                ++progname;
+       setprogname(progname);
+#endif
 
-#if HAVE_SQLITE3
-       if (strcmp(progname, BINM_MAKEWHATIS) == 0)
-               return(mandocdb(argc, argv));
+       if (strncmp(progname, "mandocdb", 8) == 0 ||
+           strcmp(progname, BINM_MAKEWHATIS) == 0)
+               return mandocdb(argc, argv);
+
+#if HAVE_PLEDGE
+       if (pledge("stdio rpath tmppath tty proc exec flock", NULL) == -1)
+               err((int)MANDOCLEVEL_SYSERR, "pledge");
+#endif
+
+#if HAVE_SANDBOX_INIT
+       if (sandbox_init(kSBXProfileNoInternet, SANDBOX_NAMED, NULL) == -1)
+               errx((int)MANDOCLEVEL_SYSERR, "sandbox_init");
 #endif
 
        /* Search options. */
 
-       memset(&paths, 0, sizeof(struct manpaths));
+       memset(&conf, 0, sizeof(conf));
        conf_file = defpaths = NULL;
        auxpaths = NULL;
 
@@ -171,12 +185,13 @@ main(int argc, char *argv[])
        memset(&curp, 0, sizeof(struct curparse));
        curp.outtype = OUTT_LOCALE;
        curp.wlevel  = MANDOCLEVEL_BADARG;
+       curp.outopts = &conf.output;
        options = MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1;
        defos = NULL;
 
        use_pager = 1;
+       tag_files = NULL;
        show_usage = 0;
-       synopsis_only = 0;
        outmode = OUTMODE_DEF;
 
        while (-1 != (c = getopt(argc, argv,
@@ -195,23 +210,18 @@ main(int argc, char *argv[])
                        search.argmode = ARG_WORD;
                        break;
                case 'h':
-                       (void)strlcat(curp.outopts, "synopsis,", BUFSIZ);
-                       synopsis_only = 1;
+                       conf.output.synopsisonly = 1;
                        use_pager = 0;
                        outmode = OUTMODE_ALL;
                        break;
                case 'I':
                        if (strncmp(optarg, "os=", 3)) {
-                               fprintf(stderr,
-                                   "%s: -I %s: Bad argument\n",
-                                   progname, optarg);
-                               return((int)MANDOCLEVEL_BADARG);
+                               warnx("-I %s: Bad argument", optarg);
+                               return (int)MANDOCLEVEL_BADARG;
                        }
                        if (defos) {
-                               fprintf(stderr,
-                                   "%s: -I %s: Duplicate argument\n",
-                                   progname, optarg);
-                               return((int)MANDOCLEVEL_BADARG);
+                               warnx("-I %s: Duplicate argument", optarg);
+                               return (int)MANDOCLEVEL_BADARG;
                        }
                        defos = mandoc_strdup(optarg + 3);
                        break;
@@ -220,7 +230,7 @@ main(int argc, char *argv[])
                        break;
                case 'K':
                        if ( ! koptions(&options, optarg))
-                               return((int)MANDOCLEVEL_BADARG);
+                               return (int)MANDOCLEVEL_BADARG;
                        break;
                case 'k':
                        search.argmode = ARG_EXPR;
@@ -237,8 +247,9 @@ main(int argc, char *argv[])
                        break;
                case 'O':
                        search.outkey = optarg;
-                       (void)strlcat(curp.outopts, optarg, BUFSIZ);
-                       (void)strlcat(curp.outopts, ",", BUFSIZ);
+                       while (optarg != NULL)
+                               manconf_output(&conf.output,
+                                   strsep(&optarg, ","));
                        break;
                case 'S':
                        search.arch = optarg;
@@ -248,18 +259,15 @@ main(int argc, char *argv[])
                        break;
                case 'T':
                        if ( ! toptions(&curp, optarg))
-                               return((int)MANDOCLEVEL_BADARG);
+                               return (int)MANDOCLEVEL_BADARG;
                        break;
                case 'W':
                        if ( ! woptions(&curp, optarg))
-                               return((int)MANDOCLEVEL_BADARG);
+                               return (int)MANDOCLEVEL_BADARG;
                        break;
                case 'w':
                        outmode = OUTMODE_FLN;
                        break;
-               case 'V':
-                       version();
-                       /* NOTREACHED */
                default:
                        show_usage = 1;
                        break;
@@ -286,6 +294,17 @@ main(int argc, char *argv[])
                }
        }
 
+       if (outmode == OUTMODE_FLN ||
+           outmode == OUTMODE_LST ||
+           !isatty(STDOUT_FILENO))
+               use_pager = 0;
+
+#if HAVE_PLEDGE
+       if (!use_pager)
+               if (pledge("stdio rpath flock", NULL) == -1)
+                       err((int)MANDOCLEVEL_SYSERR, "pledge");
+#endif
+
        /* Parse arguments. */
 
        if (argc > 0) {
@@ -306,18 +325,20 @@ main(int argc, char *argv[])
                                argc = 1;
                        }
                } else if (argc > 1 &&
-                   ((uc = argv[0]) != NULL) &&
+                   ((uc = (unsigned char *)argv[0]) != NULL) &&
                    ((isdigit(uc[0]) && (uc[1] == '\0' ||
                      (isalpha(uc[1]) && uc[2] == '\0'))) ||
                     (uc[0] == 'n' && uc[1] == '\0'))) {
-                       search.sec = uc;
+                       search.sec = (char *)uc;
                        argv++;
                        argc--;
                }
                if (search.arch == NULL)
                        search.arch = getenv("MACHINE");
+#ifdef MACHINE
                if (search.arch == NULL)
                        search.arch = MACHINE;
+#endif
        }
 
        rc = MANDOCLEVEL_OK;
@@ -325,31 +346,24 @@ main(int argc, char *argv[])
        /* man(1), whatis(1), apropos(1) */
 
        if (search.argmode != ARG_FILE) {
-               if (argc == 0)
-                       usage(search.argmode);
-
                if (search.argmode == ARG_NAME &&
                    outmode == OUTMODE_ONE)
                        search.firstmatch = 1;
 
                /* Access the mandoc database. */
 
-               manpath_parse(&paths, conf_file, defpaths, auxpaths);
-#if HAVE_SQLITE3
-               mansearch_setup(1);
-               if( ! mansearch(&search, &paths, argc, argv, &res, &sz))
+               manconf_parse(&conf, conf_file, defpaths, auxpaths);
+               if ( ! mansearch(&search, &conf.manpath,
+                   argc, argv, &res, &sz))
                        usage(search.argmode);
-#else
-               if (search.argmode != ARG_NAME) {
-                       fputs("mandoc: database support not compiled in\n",
-                           stderr);
-                       return((int)MANDOCLEVEL_BADARG);
-               }
-               sz = 0;
-#endif
 
-               if (sz == 0 && search.argmode == ARG_NAME)
-                       fs_search(&search, &paths, argc, argv, &res, &sz);
+               if (sz == 0) {
+                       if (search.argmode == ARG_NAME)
+                               fs_search(&search, &conf.manpath,
+                                   argc, argv, &res, &sz);
+                       else
+                               warnx("nothing appropriate");
+               }
 
                if (sz == 0) {
                        rc = MANDOCLEVEL_BADARG;
@@ -364,7 +378,7 @@ main(int argc, char *argv[])
 
                if (outmode == OUTMODE_ONE) {
                        argc = 1;
-                       best_prio = 10;
+                       best_prio = 20;
                } else if (outmode == OUTMODE_ALL)
                        argc = (int)sz;
 
@@ -380,11 +394,13 @@ main(int argc, char *argv[])
                                    res[i].output);
                        else if (outmode == OUTMODE_ONE) {
                                /* Search for the best section. */
-                               isec = strcspn(res[i].file, "123456789");
-                               sec = res[i].file[isec];
-                               if ('\0' == sec)
+                               sec = res[i].file;
+                               sec += strcspn(sec, "123456789");
+                               if (sec[0] == '\0')
                                        continue;
-                               prio = sec_prios[sec - '1'];
+                               prio = sec_prios[sec[0] - '1'];
+                               if (sec[1] != '/')
+                                       prio += 10;
                                if (prio >= best_prio)
                                        continue;
                                best_prio = prio;
@@ -404,12 +420,21 @@ main(int argc, char *argv[])
 
        /* mandoc(1) */
 
+#if HAVE_PLEDGE
+       if (use_pager) {
+               if (pledge("stdio rpath tmppath tty proc exec", NULL) == -1)
+                       err((int)MANDOCLEVEL_SYSERR, "pledge");
+       } else {
+               if (pledge("stdio rpath", NULL) == -1)
+                       err((int)MANDOCLEVEL_SYSERR, "pledge");
+       }
+#endif
+
        if (search.argmode == ARG_FILE && ! moptions(&options, auxpaths))
-               return((int)MANDOCLEVEL_BADARG);
+               return (int)MANDOCLEVEL_BADARG;
 
-       curp.mchars = mchars_alloc();
-       curp.mp = mparse_alloc(options, curp.wlevel, mmsg,
-           curp.mchars, defos);
+       mchars_alloc();
+       curp.mp = mparse_alloc(options, curp.wlevel, mmsg, defos);
 
        /*
         * Conditionally start up the lookaside buffer before parsing.
@@ -418,42 +443,36 @@ main(int argc, char *argv[])
                mparse_keep(curp.mp);
 
        if (argc < 1) {
-               if (use_pager && isatty(STDOUT_FILENO))
-                       spawn_pager();
-               parse(&curp, STDIN_FILENO, "<stdin>", &rc);
+               if (use_pager)
+                       tag_files = tag_init();
+               parse(&curp, STDIN_FILENO, "<stdin>");
        }
 
        while (argc > 0) {
-               rctmp = mparse_open(curp.mp, &fd,
-                   resp != NULL ? resp->file : *argv);
-               if (rc < rctmp)
-                       rc = rctmp;
-
+               fd = mparse_open(curp.mp, resp != NULL ? resp->file : *argv);
                if (fd != -1) {
-                       if (use_pager && isatty(STDOUT_FILENO))
-                               spawn_pager();
-                       use_pager = 0;
+                       if (use_pager) {
+                               tag_files = tag_init();
+                               use_pager = 0;
+                       }
 
                        if (resp == NULL)
-                               parse(&curp, fd, *argv, &rc);
-                       else if (resp->form & FORM_SRC) {
+                               parse(&curp, fd, *argv);
+                       else if (resp->form == FORM_SRC) {
                                /* For .so only; ignore failure. */
-                               chdir(paths.paths[resp->ipath]);
-                               parse(&curp, fd, resp->file, &rc);
-                       } else {
-                               rctmp = passthrough(resp->file, fd,
-                                   synopsis_only);
-                               if (rc < rctmp)
-                                       rc = rctmp;
+                               chdir(conf.manpath.paths[resp->ipath]);
+                               parse(&curp, fd, resp->file);
+                       } else
+                               passthrough(resp->file, fd,
+                                   conf.output.synopsisonly);
+
+                       if (argc > 1 && curp.outtype <= OUTT_UTF8) {
+                               if (curp.outdata == NULL)
+                                       outdata_alloc(&curp);
+                               terminal_sepline(curp.outdata);
                        }
-
-                       rctmp = mparse_wait(curp.mp);
-                       if (rc < rctmp)
-                               rc = rctmp;
-
-                       if (argc > 1 && curp.outtype <= OUTT_UTF8)
-                               ascii_sepline(curp.outdata);
-               }
+               } else if (rc < MANDOCLEVEL_ERROR)
+                       rc = MANDOCLEVEL_ERROR;
 
                if (MANDOCLEVEL_OK != rc && curp.wstop)
                        break;
@@ -466,31 +485,93 @@ main(int argc, char *argv[])
                        mparse_reset(curp.mp);
        }
 
-       if (curp.outfree)
-               (*curp.outfree)(curp.outdata);
+       if (curp.outdata != NULL) {
+               switch (curp.outtype) {
+               case OUTT_HTML:
+                       html_free(curp.outdata);
+                       break;
+               case OUTT_UTF8:
+               case OUTT_LOCALE:
+               case OUTT_ASCII:
+                       ascii_free(curp.outdata);
+                       break;
+               case OUTT_PDF:
+               case OUTT_PS:
+                       pspdf_free(curp.outdata);
+                       break;
+               default:
+                       break;
+               }
+       }
        mparse_free(curp.mp);
-       mchars_free(curp.mchars);
+       mchars_free();
 
 out:
        if (search.argmode != ARG_FILE) {
-               manpath_free(&paths);
-#if HAVE_SQLITE3
+               manconf_free(&conf);
                mansearch_free(res, sz);
-               mansearch_setup(0);
-#endif
        }
 
        free(defos);
 
-       return((int)rc);
-}
+       /*
+        * When using a pager, finish writing both temporary files,
+        * fork it, wait for the user to close it, and clean up.
+        */
 
-static void
-version(void)
-{
+       if (tag_files != NULL) {
+               fclose(stdout);
+               tag_write();
+               man_pgid = getpgid(0);
+               tag_files->tcpgid = man_pgid == getpid() ?
+                   getpgid(getppid()) : man_pgid;
+               pager_pid = 0;
+               signum = SIGSTOP;
+               for (;;) {
+
+                       /* Stop here until moved to the foreground. */
+
+                       tc_pgid = tcgetpgrp(tag_files->ofd);
+                       if (tc_pgid != man_pgid) {
+                               if (tc_pgid == pager_pid) {
+                                       (void)tcsetpgrp(tag_files->ofd,
+                                           man_pgid);
+                                       if (signum == SIGTTIN)
+                                               continue;
+                               } else
+                                       tag_files->tcpgid = tc_pgid;
+                               kill(0, signum);
+                               continue;
+                       }
+
+                       /* Once in the foreground, activate the pager. */
+
+                       if (pager_pid) {
+                               (void)tcsetpgrp(tag_files->ofd, pager_pid);
+                               kill(pager_pid, SIGCONT);
+                       } else
+                               pager_pid = spawn_pager(tag_files);
+
+                       /* Wait for the pager to stop or exit. */
+
+                       while ((pid = waitpid(pager_pid, &status,
+                           WUNTRACED)) == -1 && errno == EINTR)
+                               continue;
+
+                       if (pid == -1) {
+                               warn("wait");
+                               rc = MANDOCLEVEL_SYSERR;
+                               break;
+                       }
+                       if (!WIFSTOPPED(status))
+                               break;
 
-       printf("mandoc %s\n", VERSION);
-       exit((int)MANDOCLEVEL_OK);
+                       signum = WSTOPSIG(status);
+               }
+               tag_unlink();
+       }
+
+       return (int)rc;
 }
 
 static void
@@ -499,24 +580,24 @@ usage(enum argmode argmode)
 
        switch (argmode) {
        case ARG_FILE:
-               fputs("usage: mandoc [-acfhklV] [-Ios=name] "
-                   "[-Kencoding] [-mformat] [-Ooption]\n"
-                   "\t      [-Toutput] [-Wlevel] [file ...]\n", stderr);
+               fputs("usage: mandoc [-acfhkl] [-I os=name] "
+                   "[-K encoding] [-mformat] [-O option]\n"
+                   "\t      [-T output] [-W level] [file ...]\n", stderr);
                break;
        case ARG_NAME:
-               fputs("usage: man [-acfhklVw] [-C file] [-I os=name] "
+               fputs("usage: man [-acfhklw] [-C file] [-I os=name] "
                    "[-K encoding] [-M path] [-m path]\n"
                    "\t   [-O option=value] [-S subsection] [-s section] "
                    "[-T output] [-W level]\n"
                    "\t   [section] name ...\n", stderr);
                break;
        case ARG_WORD:
-               fputs("usage: whatis [-acfhklVw] [-C file] "
+               fputs("usage: whatis [-acfhklw] [-C file] "
                    "[-M path] [-m path] [-O outkey] [-S arch]\n"
                    "\t      [-s section] name ...\n", stderr);
                break;
        case ARG_EXPR:
-               fputs("usage: apropos [-acfhklVw] [-C file] "
+               fputs("usage: apropos [-acfhklw] [-C file] "
                    "[-M path] [-m path] [-O outkey] [-S arch]\n"
                    "\t       [-s section] expression ...\n", stderr);
                break;
@@ -529,16 +610,17 @@ fs_lookup(const struct manpaths *paths, size_t ipath,
        const char *sec, const char *arch, const char *name,
        struct manpage **res, size_t *ressz)
 {
+       glob_t           globinfo;
        struct manpage  *page;
        char            *file;
-       int              form;
+       int              globres;
+       enum form        form;
 
+       form = FORM_SRC;
        mandoc_asprintf(&file, "%s/man%s/%s.%s",
            paths->paths[ipath], sec, name, sec);
-       if (access(file, R_OK) != -1) {
-               form = FORM_SRC;
+       if (access(file, R_OK) != -1)
                goto found;
-       }
        free(file);
 
        mandoc_asprintf(&file, "%s/cat%s/%s.0",
@@ -552,21 +634,26 @@ fs_lookup(const struct manpaths *paths, size_t ipath,
        if (arch != NULL) {
                mandoc_asprintf(&file, "%s/man%s/%s/%s.%s",
                    paths->paths[ipath], sec, arch, name, sec);
-               if (access(file, R_OK) != -1) {
-                       form = FORM_SRC;
+               if (access(file, R_OK) != -1)
                        goto found;
-               }
                free(file);
        }
-       return(0);
+
+       mandoc_asprintf(&file, "%s/man%s/%s.[01-9]*",
+           paths->paths[ipath], sec, name);
+       globres = glob(file, 0, NULL, &globinfo);
+       if (globres != 0 && globres != GLOB_NOMATCH)
+               warn("%s: glob", file);
+       free(file);
+       if (globres == 0)
+               file = mandoc_strdup(*globinfo.gl_pathv);
+       globfree(&globinfo);
+       if (globres != 0)
+               return 0;
 
 found:
-#if HAVE_SQLITE3
-       fprintf(stderr, "%s: outdated mandoc.db lacks %s(%s) entry,\n"
-           "     consider running  # makewhatis %s\n",
-           progname, name, sec, paths->paths[ipath]);
-#endif
-       
+       warnx("outdated mandoc.db lacks %s(%s) entry, run %s %s",
+           name, sec, BINM_MAKEWHATIS, paths->paths[ipath]);
        *res = mandoc_reallocarray(*res, ++*ressz, sizeof(struct manpage));
        page = *res + (*ressz - 1);
        page->file = file;
@@ -576,7 +663,7 @@ found:
        page->bits = NAME_FILE & NAME_MASK;
        page->sec = (*sec >= '1' && *sec <= '9') ? *sec - '1' + 1 : 10;
        page->form = form;
-       return(1);
+       return 1;
 }
 
 static void
@@ -584,7 +671,7 @@ fs_search(const struct mansearch *cfg, const struct manpaths *paths,
        int argc, char **argv, struct manpage **res, size_t *ressz)
 {
        const char *const sections[] =
-           {"1", "8", "6", "2", "3", "3p", "5", "7", "4", "9"};
+           {"1", "8", "6", "2", "3", "5", "7", "4", "9", "3p"};
        const size_t nsec = sizeof(sections)/sizeof(sections[0]);
 
        size_t           ipath, isec, lastsz;
@@ -607,9 +694,7 @@ fs_search(const struct mansearch *cfg, const struct manpaths *paths,
                                        return;
                }
                if (*ressz == lastsz)
-                       fprintf(stderr,
-                           "%s: No entry for %s in the manual.\n",
-                           progname, *argv);
+                       warnx("No entry for %s in the manual.", *argv);
                lastsz = *ressz;
                argv++;
                argc--;
@@ -617,111 +702,116 @@ fs_search(const struct mansearch *cfg, const struct manpaths *paths,
 }
 
 static void
-parse(struct curparse *curp, int fd, const char *file,
-       enum mandoclevel *level)
+parse(struct curparse *curp, int fd, const char *file)
 {
-       enum mandoclevel  rc;
-       struct mdoc      *mdoc;
-       struct man       *man;
+       enum mandoclevel  rctmp;
+       struct roff_man  *man;
 
        /* Begin by parsing the file itself. */
 
        assert(file);
-       assert(fd >= -1);
+       assert(fd >= 0);
 
-       rc = mparse_readfd(curp->mp, fd, file);
+       rctmp = mparse_readfd(curp->mp, fd, file);
+       if (fd != STDIN_FILENO)
+               close(fd);
+       if (rc < rctmp)
+               rc = rctmp;
 
        /*
         * With -Wstop and warnings or errors of at least the requested
         * level, do not produce output.
         */
 
-       if (MANDOCLEVEL_OK != rc && curp->wstop)
-               goto cleanup;
+       if (rctmp != MANDOCLEVEL_OK && curp->wstop)
+               return;
+
+       if (curp->outdata == NULL)
+               outdata_alloc(curp);
 
-       /* If unset, allocate output dev now (if applicable). */
+       mparse_result(curp->mp, &man, NULL);
 
-       if ( ! (curp->outman && curp->outmdoc)) {
+       /* Execute the out device, if it exists. */
+
+       if (man == NULL)
+               return;
+       if (man->macroset == MACROSET_MDOC) {
+               mdoc_validate(man);
                switch (curp->outtype) {
                case OUTT_HTML:
-                       curp->outdata = html_alloc(curp->mchars,
-                           curp->outopts);
-                       curp->outfree = html_free;
+                       html_mdoc(curp->outdata, man);
                        break;
-               case OUTT_UTF8:
-                       curp->outdata = utf8_alloc(curp->mchars,
-                           curp->outopts);
-                       curp->outfree = ascii_free;
-                       break;
-               case OUTT_LOCALE:
-                       curp->outdata = locale_alloc(curp->mchars,
-                           curp->outopts);
-                       curp->outfree = ascii_free;
+               case OUTT_TREE:
+                       tree_mdoc(curp->outdata, man);
                        break;
-               case OUTT_ASCII:
-                       curp->outdata = ascii_alloc(curp->mchars,
-                           curp->outopts);
-                       curp->outfree = ascii_free;
+               case OUTT_MAN:
+                       man_mdoc(curp->outdata, man);
                        break;
                case OUTT_PDF:
-                       curp->outdata = pdf_alloc(curp->mchars,
-                           curp->outopts);
-                       curp->outfree = pspdf_free;
-                       break;
+               case OUTT_ASCII:
+               case OUTT_UTF8:
+               case OUTT_LOCALE:
                case OUTT_PS:
-                       curp->outdata = ps_alloc(curp->mchars,
-                           curp->outopts);
-                       curp->outfree = pspdf_free;
+                       terminal_mdoc(curp->outdata, man);
                        break;
                default:
                        break;
                }
-
+       }
+       if (man->macroset == MACROSET_MAN) {
+               man_validate(man);
                switch (curp->outtype) {
                case OUTT_HTML:
-                       curp->outman = html_man;
-                       curp->outmdoc = html_mdoc;
+                       html_man(curp->outdata, man);
                        break;
                case OUTT_TREE:
-                       curp->outman = tree_man;
-                       curp->outmdoc = tree_mdoc;
+                       tree_man(curp->outdata, man);
                        break;
                case OUTT_MAN:
-                       curp->outmdoc = man_mdoc;
-                       curp->outman = man_man;
+                       man_man(curp->outdata, man);
                        break;
                case OUTT_PDF:
-                       /* FALLTHROUGH */
                case OUTT_ASCII:
-                       /* FALLTHROUGH */
                case OUTT_UTF8:
-                       /* FALLTHROUGH */
                case OUTT_LOCALE:
-                       /* FALLTHROUGH */
                case OUTT_PS:
-                       curp->outman = terminal_man;
-                       curp->outmdoc = terminal_mdoc;
+                       terminal_man(curp->outdata, man);
                        break;
                default:
                        break;
                }
        }
+       mparse_updaterc(curp->mp, &rc);
+}
 
-       mparse_result(curp->mp, &mdoc, &man, NULL);
-
-       /* Execute the out device, if it exists. */
-
-       if (man && curp->outman)
-               (*curp->outman)(curp->outdata, man);
-       if (mdoc && curp->outmdoc)
-               (*curp->outmdoc)(curp->outdata, mdoc);
-
-cleanup:
-       if (*level < rc)
-               *level = rc;
+static void
+outdata_alloc(struct curparse *curp)
+{
+       switch (curp->outtype) {
+       case OUTT_HTML:
+               curp->outdata = html_alloc(curp->outopts);
+               break;
+       case OUTT_UTF8:
+               curp->outdata = utf8_alloc(curp->outopts);
+               break;
+       case OUTT_LOCALE:
+               curp->outdata = locale_alloc(curp->outopts);
+               break;
+       case OUTT_ASCII:
+               curp->outdata = ascii_alloc(curp->outopts);
+               break;
+       case OUTT_PDF:
+               curp->outdata = pdf_alloc(curp->outopts);
+               break;
+       case OUTT_PS:
+               curp->outdata = ps_alloc(curp->outopts);
+               break;
+       default:
+               break;
+       }
 }
 
-static enum mandoclevel
+static void
 passthrough(const char *file, int fd, int synopsis_only)
 {
        const char       synb[] = "S\bSY\bYN\bNO\bOP\bPS\bSI\bIS\bS";
@@ -729,12 +819,18 @@ passthrough(const char *file, int fd, int synopsis_only)
 
        FILE            *stream;
        const char      *syscall;
-       char            *line;
-       size_t           len, off;
-       ssize_t          nw;
+       char            *line, *cp;
+       size_t           linesz;
+       ssize_t          len, written;
        int              print;
 
-       fflush(stdout);
+       line = NULL;
+       linesz = 0;
+
+       if (fflush(stdout) == EOF) {
+               syscall = "fflush";
+               goto fail;
+       }
 
        if ((stream = fdopen(fd, "r")) == NULL) {
                close(fd);
@@ -743,48 +839,48 @@ passthrough(const char *file, int fd, int synopsis_only)
        }
 
        print = 0;
-       while ((line = fgetln(stream, &len)) != NULL) {
+       while ((len = getline(&line, &linesz, stream)) != -1) {
+               cp = line;
                if (synopsis_only) {
                        if (print) {
-                               if ( ! isspace((unsigned char)*line))
+                               if ( ! isspace((unsigned char)*cp))
                                        goto done;
-                               while (len &&
-                                   isspace((unsigned char)*line)) {
-                                       line++;
+                               while (isspace((unsigned char)*cp)) {
+                                       cp++;
                                        len--;
                                }
                        } else {
-                               if ((len == sizeof(synb) &&
-                                    ! strncmp(line, synb, len - 1)) ||
-                                   (len == sizeof(synr) &&
-                                    ! strncmp(line, synr, len - 1)))
+                               if (strcmp(cp, synb) == 0 ||
+                                   strcmp(cp, synr) == 0)
                                        print = 1;
                                continue;
                        }
                }
-               for (off = 0; off < len; off += nw)
-                       if ((nw = write(STDOUT_FILENO, line + off,
-                           len - off)) == -1 || nw == 0) {
-                               fclose(stream);
-                               syscall = "write";
-                               goto fail;
-                       }
+               for (; len > 0; len -= written) {
+                       if ((written = write(STDOUT_FILENO, cp, len)) != -1)
+                               continue;
+                       fclose(stream);
+                       syscall = "write";
+                       goto fail;
+               }
        }
 
        if (ferror(stream)) {
                fclose(stream);
-               syscall = "fgetln";
+               syscall = "getline";
                goto fail;
        }
 
 done:
+       free(line);
        fclose(stream);
-       return(MANDOCLEVEL_OK);
+       return;
 
 fail:
-       fprintf(stderr, "%s: %s: SYSERR: %s: %s",
-           progname, file, syscall, strerror(errno));
-       return(MANDOCLEVEL_SYSERR);
+       free(line);
+       warn("%s: SYSERR: %s", file, syscall);
+       if (rc < MANDOCLEVEL_SYSERR)
+               rc = MANDOCLEVEL_SYSERR;
 }
 
 static int
@@ -800,11 +896,10 @@ koptions(int *options, char *arg)
        } else if ( ! strcmp(arg, "us-ascii")) {
                *options &= ~(MPARSE_UTF8 | MPARSE_LATIN1);
        } else {
-               fprintf(stderr, "%s: -K %s: Bad argument\n",
-                   progname, arg);
-               return(0);
+               warnx("-K %s: Bad argument", arg);
+               return 0;
        }
-       return(1);
+       return 1;
 }
 
 static int
@@ -820,12 +915,11 @@ moptions(int *options, char *arg)
        else if (0 == strcmp(arg, "an"))
                *options |= MPARSE_MAN;
        else {
-               fprintf(stderr, "%s: -m %s: Bad argument\n",
-                   progname, arg);
-               return(0);
+               warnx("-m %s: Bad argument", arg);
+               return 0;
        }
 
-       return(1);
+       return 1;
 }
 
 static int
@@ -854,12 +948,11 @@ toptions(struct curparse *curp, char *arg)
        else if (0 == strcmp(arg, "pdf"))
                curp->outtype = OUTT_PDF;
        else {
-               fprintf(stderr, "%s: -T %s: Bad argument\n",
-                   progname, arg);
-               return(0);
+               warnx("-T %s: Bad argument", arg);
+               return 0;
        }
 
-       return(1);
+       return 1;
 }
 
 static int
@@ -878,12 +971,11 @@ woptions(struct curparse *curp, char *arg)
 
        while (*arg) {
                o = arg;
-               switch (getsubopt(&arg, UNCONST(toks), &v)) {
+               switch (getsubopt(&arg, (char * const *)toks, &v)) {
                case 0:
                        curp->wstop = 1;
                        break;
                case 1:
-                       /* FALLTHROUGH */
                case 2:
                        curp->wlevel = MANDOCLEVEL_WARNING;
                        break;
@@ -897,13 +989,12 @@ woptions(struct curparse *curp, char *arg)
                        curp->wlevel = MANDOCLEVEL_BADARG;
                        break;
                default:
-                       fprintf(stderr, "%s: -W %s: Bad argument\n",
-                           progname, o);
-                       return(0);
+                       warnx("-W %s: Bad argument", o);
+                       return 0;
                }
        }
 
-       return(1);
+       return 1;
 }
 
 static void
@@ -912,7 +1003,8 @@ mmsg(enum mandocerr t, enum mandoclevel lvl,
 {
        const char      *mparse_msg;
 
-       fprintf(stderr, "%s: %s:", progname, file);
+       fprintf(stderr, "%s: %s:", getprogname(),
+           file == NULL ? "<stdin>" : file);
 
        if (line)
                fprintf(stderr, "%d:%d:", line, col + 1);
@@ -928,53 +1020,23 @@ mmsg(enum mandocerr t, enum mandoclevel lvl,
        fputc('\n', stderr);
 }
 
-static void
-spawn_pager(void)
+static pid_t
+spawn_pager(struct tag_files *tag_files)
 {
+       const struct timespec timeout = { 0, 100000000 };  /* 0.1s */
 #define MAX_PAGER_ARGS 16
        char            *argv[MAX_PAGER_ARGS];
        const char      *pager;
        char            *cp;
-       int              fildes[2];
+       size_t           cmdlen;
        int              argc;
-
-       if (pipe(fildes) == -1) {
-               fprintf(stderr, "%s: pipe: %s\n",
-                   progname, strerror(errno));
-               return;
-       }
-
-       switch (fork()) {
-       case -1:
-               fprintf(stderr, "%s: fork: %s\n",
-                   progname, strerror(errno));
-               exit((int)MANDOCLEVEL_SYSERR);
-       case 0:
-               close(fildes[0]);
-               if (dup2(fildes[1], STDOUT_FILENO) == -1) {
-                       fprintf(stderr, "%s: dup output: %s\n",
-                           progname, strerror(errno));
-                       exit((int)MANDOCLEVEL_SYSERR);
-               }
-               return;
-       default:
-               break;
-       }
-
-       /* The original process becomes the pager. */
-
-       close(fildes[1]);
-       if (dup2(fildes[0], STDIN_FILENO) == -1) {
-               fprintf(stderr, "%s: dup input: %s\n",
-                   progname, strerror(errno));
-               exit((int)MANDOCLEVEL_SYSERR);
-       }
+       pid_t            pager_pid;
 
        pager = getenv("MANPAGER");
        if (pager == NULL || *pager == '\0')
                pager = getenv("PAGER");
        if (pager == NULL || *pager == '\0')
-               pager = "/usr/bin/more -s";
+               pager = "more -s";
        cp = mandoc_strdup(pager);
 
        /*
@@ -983,7 +1045,7 @@ spawn_pager(void)
         */
 
        argc = 0;
-       while (argc + 1 < MAX_PAGER_ARGS) {
+       while (argc + 4 < MAX_PAGER_ARGS) {
                argv[argc++] = cp;
                cp = strchr(cp, ' ');
                if (cp == NULL)
@@ -994,12 +1056,47 @@ spawn_pager(void)
                if (*cp == '\0')
                        break;
        }
+
+       /* For less(1), use the tag file. */
+
+       if ((cmdlen = strlen(argv[0])) >= 4) {
+               cp = argv[0] + cmdlen - 4;
+               if (strcmp(cp, "less") == 0) {
+                       argv[argc++] = mandoc_strdup("-T");
+                       argv[argc++] = tag_files->tfn;
+               }
+       }
+       argv[argc++] = tag_files->ofn;
        argv[argc] = NULL;
 
-       /* Hand over to the pager. */
+       switch (pager_pid = fork()) {
+       case -1:
+               err((int)MANDOCLEVEL_SYSERR, "fork");
+       case 0:
+               break;
+       default:
+               (void)setpgid(pager_pid, 0);
+               (void)tcsetpgrp(tag_files->ofd, pager_pid);
+#if HAVE_PLEDGE
+               if (pledge("stdio rpath tmppath tty proc", NULL) == -1)
+                       err((int)MANDOCLEVEL_SYSERR, "pledge");
+#endif
+               tag_files->pager_pid = pager_pid;
+               return pager_pid;
+       }
+
+       /* The child process becomes the pager. */
+
+       if (dup2(tag_files->ofd, STDOUT_FILENO) == -1)
+               err((int)MANDOCLEVEL_SYSERR, "pager stdout");
+       close(tag_files->ofd);
+       close(tag_files->tfd);
+
+       /* Do not start the pager before controlling the terminal. */
+
+       while (tcgetpgrp(STDOUT_FILENO) != getpid())
+               nanosleep(&timeout, NULL);
 
        execvp(argv[0], argv);
-       fprintf(stderr, "%s: exec: %s\n",
-           progname, strerror(errno));
-       exit((int)MANDOCLEVEL_SYSERR);
+       err((int)MANDOCLEVEL_SYSERR, "exec %s", argv[0]);
 }