]> git.cameronkatri.com Git - mandoc.git/blobdiff - main.c
add missing HISTORY information
[mandoc.git] / main.c
diff --git a/main.c b/main.c
index 8417f8cdfdb0a72787d6ac003182bf4d95d0579a..1b1b5b73a11a8c1b16a85cf709affcd88c35927c 100644 (file)
--- a/main.c
+++ b/main.c
@@ -1,7 +1,7 @@
-/*     $Id: main.c,v 1.234 2015/04/18 16:06:40 schwarze Exp $ */
+/*     $Id: main.c,v 1.280 2017/01/27 13:47:10 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
 
 #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_aux.h"
 #include "roff.h"
 #include "mdoc.h"
 #include "man.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,
@@ -58,10 +60,6 @@ enum outmode {
        OUTMODE_ONE
 };
 
-typedef        void            (*out_mdoc)(void *, const struct roff_man *);
-typedef        void            (*out_man)(void *, const struct roff_man *);
-typedef        void            (*out_free)(void *);
-
 enum   outt {
        OUTT_ASCII = 0, /* -Tascii */
        OUTT_LOCALE,    /* -Tlocale */
@@ -76,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 */
        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 *,
@@ -94,17 +91,14 @@ static      int               fs_lookup(const struct manpaths *,
 static void              fs_search(const struct mansearch *,
                                const struct manpaths *, int, char**,
                                struct manpage **, size_t *);
-static void              handle_sigpipe(int);
 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              outdata_alloc(struct curparse *);
 static void              parse(struct curparse *, int, const char *);
 static void              passthrough(const char *, int, int);
-static pid_t             spawn_pager(void);
+static pid_t             spawn_pager(struct tag_files *);
 static int               toptions(struct curparse *, char *);
 static void              usage(enum argmode) __attribute__((noreturn));
 static int               woptions(struct curparse *, char *);
@@ -112,7 +106,6 @@ 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;
 
 
@@ -122,32 +115,50 @@ main(int argc, char *argv[])
        struct manconf   conf;
        struct curparse  curp;
        struct mansearch search;
+       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;
+       const char      *sec;
+       const char      *thisarg;
+       size_t           i, sz;
        int              prio, best_prio;
-       char             sec;
-       enum mandoclevel rctmp;
        enum outmode     outmode;
        int              fd;
        int              show_usage;
        int              options;
+       int              use_pager;
+       int              status, signum;
        int              c;
-       pid_t            pager_pid;  /* 0: don't use; 1: not yet spawned. */
+       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. */
@@ -179,7 +190,8 @@ main(int argc, char *argv[])
        options = MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1;
        defos = NULL;
 
-       pager_pid = 1;
+       use_pager = 1;
+       tag_files = NULL;
        show_usage = 0;
        outmode = OUTMODE_DEF;
 
@@ -193,28 +205,24 @@ main(int argc, char *argv[])
                        conf_file = optarg;
                        break;
                case 'c':
-                       pager_pid = 0;
+                       use_pager = 0;
                        break;
                case 'f':
                        search.argmode = ARG_WORD;
                        break;
                case 'h':
                        conf.output.synopsisonly = 1;
-                       pager_pid = 0;
+                       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;
@@ -223,7 +231,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;
@@ -240,9 +248,14 @@ main(int argc, char *argv[])
                        break;
                case 'O':
                        search.outkey = optarg;
-                       while (optarg != NULL)
-                               manconf_output(&conf.output,
-                                   strsep(&optarg, ","));
+                       while (optarg != NULL) {
+                               thisarg = optarg;
+                               if (manconf_output(&conf.output,
+                                   strsep(&optarg, ","), 0) == 0)
+                                       continue;
+                               warnx("-O %s: Bad argument", thisarg);
+                               return (int)MANDOCLEVEL_BADARG;
+                       }
                        break;
                case 'S':
                        search.arch = optarg;
@@ -252,11 +265,11 @@ 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;
@@ -276,7 +289,7 @@ main(int argc, char *argv[])
                switch (search.argmode) {
                case ARG_FILE:
                        outmode = OUTMODE_ALL;
-                       pager_pid = 0;
+                       use_pager = 0;
                        break;
                case ARG_NAME:
                        outmode = OUTMODE_ONE;
@@ -287,6 +300,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) {
@@ -328,9 +352,6 @@ 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;
@@ -338,23 +359,17 @@ main(int argc, char *argv[])
                /* Access the mandoc database. */
 
                manconf_parse(&conf, conf_file, defpaths, auxpaths);
-#if HAVE_SQLITE3
-               mansearch_setup(1);
                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, &conf.manpath,
-                           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;
@@ -369,7 +384,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;
 
@@ -385,11 +400,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;
@@ -409,12 +426,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.
@@ -423,24 +449,22 @@ main(int argc, char *argv[])
                mparse_keep(curp.mp);
 
        if (argc < 1) {
-               if (pager_pid == 1 && isatty(STDOUT_FILENO))
-                       pager_pid = spawn_pager();
+               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 (pager_pid == 1 && isatty(STDOUT_FILENO))
-                               pager_pid = spawn_pager();
+                       if (use_pager) {
+                               tag_files = tag_init();
+                               use_pager = 0;
+                       }
 
                        if (resp == NULL)
                                parse(&curp, fd, *argv);
-                       else if (resp->form & FORM_SRC) {
+                       else if (resp->form == FORM_SRC) {
                                /* For .so only; ignore failure. */
                                chdir(conf.manpath.paths[resp->ipath]);
                                parse(&curp, fd, resp->file);
@@ -448,13 +472,13 @@ main(int argc, char *argv[])
                                passthrough(resp->file, fd,
                                    conf.output.synopsisonly);
 
-                       rctmp = mparse_wait(curp.mp);
-                       if (rc < rctmp)
-                               rc = rctmp;
-
-                       if (argc > 1 && curp.outtype <= OUTT_UTF8)
-                               ascii_sepline(curp.outdata);
-               }
+                       if (argc > 1 && curp.outtype <= OUTT_UTF8) {
+                               if (curp.outdata == NULL)
+                                       outdata_alloc(&curp);
+                               terminal_sepline(curp.outdata);
+                       }
+               } else if (rc < MANDOCLEVEL_ERROR)
+                       rc = MANDOCLEVEL_ERROR;
 
                if (MANDOCLEVEL_OK != rc && curp.wstop)
                        break;
@@ -467,34 +491,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) {
                manconf_free(&conf);
-#if HAVE_SQLITE3
                mansearch_free(res, sz);
-               mansearch_setup(0);
-#endif
        }
 
        free(defos);
 
        /*
-        * If a pager is attached, flush the pipe leading to it
-        * and signal end of file such that the user can browse
-        * to the end.  Then wait for the user to close the pager.
+        * When using a pager, finish writing both temporary files,
+        * fork it, wait for the user to close it, and clean up.
         */
 
-       if (pager_pid != 0 && pager_pid != 1) {
+       if (tag_files != NULL) {
                fclose(stdout);
-               waitpid(pager_pid, NULL, 0);
+               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;
+
+                       signum = WSTOPSIG(status);
+               }
+               tag_unlink();
        }
 
-       return((int)rc);
+       return (int)rc;
 }
 
 static void
@@ -536,7 +619,8 @@ fs_lookup(const struct manpaths *paths, size_t ipath,
        glob_t           globinfo;
        struct manpage  *page;
        char            *file;
-       int              form, globres;
+       int              globres;
+       enum form        form;
 
        form = FORM_SRC;
        mandoc_asprintf(&file, "%s/man%s/%s.%s",
@@ -561,24 +645,21 @@ fs_lookup(const struct manpaths *paths, size_t ipath,
                free(file);
        }
 
-       mandoc_asprintf(&file, "%s/man%s/%s.*",
+       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)
-               fprintf(stderr, "%s: %s: glob: %s\n",
-                   progname, file, strerror(errno));
+               warn("%s: glob", file);
        free(file);
        if (globres == 0)
                file = mandoc_strdup(*globinfo.gl_pathv);
        globfree(&globinfo);
        if (globres != 0)
-               return(0);
+               return 0;
 
 found:
-#if HAVE_SQLITE3
-       fprintf(stderr, "%s: outdated mandoc.db lacks %s(%s) entry, run "
-           "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;
@@ -588,7 +669,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
@@ -596,7 +677,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;
@@ -619,9 +700,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--;
@@ -632,15 +711,16 @@ static void
 parse(struct curparse *curp, int fd, const char *file)
 {
        enum mandoclevel  rctmp;
-       struct roff_man  *mdoc;
        struct roff_man  *man;
 
        /* Begin by parsing the file itself. */
 
        assert(file);
-       assert(fd >= -1);
+       assert(fd >= 0);
 
        rctmp = mparse_readfd(curp->mp, fd, file);
+       if (fd != STDIN_FILENO)
+               close(fd);
        if (rc < rctmp)
                rc = rctmp;
 
@@ -652,82 +732,89 @@ parse(struct curparse *curp, int fd, const char *file)
        if (rctmp != MANDOCLEVEL_OK && curp->wstop)
                return;
 
-       /* If unset, allocate output dev now (if applicable). */
+       if (curp->outdata == NULL)
+               outdata_alloc(curp);
+
+       mparse_result(curp->mp, &man, NULL);
+
+       /* Execute the out device, if it exists. */
 
-       if ( ! (curp->outman && curp->outmdoc)) {
+       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;
-                       break;
-               case OUTT_UTF8:
-                       curp->outdata = utf8_alloc(curp->mchars,
-                           curp->outopts);
-                       curp->outfree = ascii_free;
+                       html_mdoc(curp->outdata, man);
                        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);
+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 void
@@ -738,12 +825,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);
@@ -752,47 +845,46 @@ 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;
 
 fail:
-       fprintf(stderr, "%s: %s: SYSERR: %s: %s",
-           progname, file, syscall, strerror(errno));
+       free(line);
+       warn("%s: SYSERR: %s", file, syscall);
        if (rc < MANDOCLEVEL_SYSERR)
                rc = MANDOCLEVEL_SYSERR;
 }
@@ -810,11 +902,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
@@ -830,12 +921,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
@@ -864,12 +954,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
@@ -888,12 +977,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;
@@ -907,13 +995,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
@@ -922,7 +1009,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);
@@ -938,59 +1026,18 @@ mmsg(enum mandocerr t, enum mandoclevel lvl,
        fputc('\n', stderr);
 }
 
-static void
-handle_sigpipe(int signum)
-{
-
-       exit((int)rc);
-}
-
 static pid_t
-spawn_pager(void)
+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;
        pid_t            pager_pid;
 
-       if (pipe(fildes) == -1) {
-               fprintf(stderr, "%s: pipe: %s\n",
-                   progname, strerror(errno));
-               return(0);
-       }
-
-       switch (pager_pid = fork()) {
-       case -1:
-               fprintf(stderr, "%s: fork: %s\n",
-                   progname, strerror(errno));
-               exit((int)MANDOCLEVEL_SYSERR);
-       case 0:
-               break;
-       default:
-               close(fildes[0]);
-               if (dup2(fildes[1], STDOUT_FILENO) == -1) {
-                       fprintf(stderr, "%s: dup output: %s\n",
-                           progname, strerror(errno));
-                       exit((int)MANDOCLEVEL_SYSERR);
-               }
-               close(fildes[1]);
-               signal(SIGPIPE, handle_sigpipe);
-               return(pager_pid);
-       }
-
-       /* The child 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);
-       }
-       close(fildes[0]);
-
        pager = getenv("MANPAGER");
        if (pager == NULL || *pager == '\0')
                pager = getenv("PAGER");
@@ -1004,7 +1051,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)
@@ -1015,12 +1062,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]);
 }