[BACK]Return to main.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / mandoc

Annotation of src/usr.bin/mandoc/main.c, Revision 1.104

1.104   ! jmc         1: /*     $OpenBSD: main.c,v 1.103 2014/10/30 00:05:02 schwarze Exp $ */
1.1       kristaps    2: /*
1.95      schwarze    3:  * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv>
1.87      schwarze    4:  * Copyright (c) 2010, 2011, 2012, 2014 Ingo Schwarze <schwarze@openbsd.org>
1.86      schwarze    5:  * Copyright (c) 2010 Joerg Sonnenberger <joerg@netbsd.org>
1.1       kristaps    6:  *
                      7:  * Permission to use, copy, modify, and distribute this software for any
1.2       schwarze    8:  * purpose with or without fee is hereby granted, provided that the above
                      9:  * copyright notice and this permission notice appear in all copies.
1.1       kristaps   10:  *
1.2       schwarze   11:  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
                     12:  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
                     13:  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
                     14:  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
                     15:  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
                     16:  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
                     17:  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
1.1       kristaps   18:  */
                     19:
1.95      schwarze   20: #include <sys/types.h>
                     21:
1.1       kristaps   22: #include <assert.h>
1.95      schwarze   23: #include <ctype.h>
                     24: #include <errno.h>
                     25: #include <fcntl.h>
1.1       kristaps   26: #include <stdio.h>
1.17      schwarze   27: #include <stdint.h>
1.1       kristaps   28: #include <stdlib.h>
                     29: #include <string.h>
                     30: #include <unistd.h>
                     31:
1.30      schwarze   32: #include "mandoc.h"
1.89      schwarze   33: #include "mandoc_aux.h"
1.38      schwarze   34: #include "main.h"
1.1       kristaps   35: #include "mdoc.h"
                     36: #include "man.h"
1.95      schwarze   37: #include "manpath.h"
                     38: #include "mansearch.h"
                     39:
                     40: enum   outmode {
                     41:        OUTMODE_DEF = 0,
                     42:        OUTMODE_FLN,
                     43:        OUTMODE_LST,
                     44:        OUTMODE_ALL,
                     45:        OUTMODE_INT,
                     46:        OUTMODE_ONE
                     47: };
1.1       kristaps   48:
1.16      schwarze   49: typedef        void            (*out_mdoc)(void *, const struct mdoc *);
                     50: typedef        void            (*out_man)(void *, const struct man *);
1.1       kristaps   51: typedef        void            (*out_free)(void *);
                     52:
                     53: enum   outt {
1.76      schwarze   54:        OUTT_ASCII = 0, /* -Tascii */
1.77      schwarze   55:        OUTT_LOCALE,    /* -Tlocale */
                     56:        OUTT_UTF8,      /* -Tutf8 */
1.76      schwarze   57:        OUTT_TREE,      /* -Ttree */
1.78      schwarze   58:        OUTT_MAN,       /* -Tman */
1.76      schwarze   59:        OUTT_HTML,      /* -Thtml */
                     60:        OUTT_LINT,      /* -Tlint */
                     61:        OUTT_PS,        /* -Tps */
                     62:        OUTT_PDF        /* -Tpdf */
1.1       kristaps   63: };
                     64:
                     65: struct curparse {
1.76      schwarze   66:        struct mparse    *mp;
1.102     schwarze   67:        struct mchars    *mchars;       /* character table */
1.75      schwarze   68:        enum mandoclevel  wlevel;       /* ignore messages below this */
                     69:        int               wstop;        /* stop after a file with a warning */
1.90      schwarze   70:        enum outt         outtype;      /* which output to use */
1.33      schwarze   71:        out_mdoc          outmdoc;      /* mdoc output ptr */
1.90      schwarze   72:        out_man           outman;       /* man output ptr */
1.33      schwarze   73:        out_free          outfree;      /* free output ptr */
                     74:        void             *outdata;      /* data for output */
                     75:        char              outopts[BUFSIZ]; /* buf of output opts */
                     76: };
                     77:
1.103     schwarze   78: static int               koptions(int *, char *);
1.79      schwarze   79: int                      mandocdb(int, char**);
1.87      schwarze   80: static int               moptions(int *, char *);
1.76      schwarze   81: static void              mmsg(enum mandocerr, enum mandoclevel,
                     82:                                const char *, int, int, const char *);
1.90      schwarze   83: static void              parse(struct curparse *, int,
1.76      schwarze   84:                                const char *, enum mandoclevel *);
1.100     schwarze   85: static enum mandoclevel  passthrough(const char *, int);
1.95      schwarze   86: static void              spawn_pager(void);
1.27      schwarze   87: static int               toptions(struct curparse *, char *);
1.95      schwarze   88: static void              usage(enum argmode) __attribute__((noreturn));
1.20      schwarze   89: static void              version(void) __attribute__((noreturn));
1.45      schwarze   90: static int               woptions(struct curparse *, char *);
1.1       kristaps   91:
1.95      schwarze   92: static const int sec_prios[] = {1, 4, 5, 8, 6, 3, 7, 2, 9};
1.19      schwarze   93: static const char       *progname;
1.1       kristaps   94:
1.90      schwarze   95:
1.1       kristaps   96: int
                     97: main(int argc, char *argv[])
                     98: {
                     99:        struct curparse  curp;
1.95      schwarze  100:        struct mansearch search;
                    101:        struct manpaths  paths;
                    102:        char            *conf_file, *defpaths, *auxpaths;
                    103:        char            *defos;
                    104:        struct manpage  *res, *resp;
                    105:        size_t           isec, i, sz;
                    106:        int              prio, best_prio;
                    107:        char             sec;
                    108:        enum mandoclevel rc;
                    109:        enum outmode     outmode;
1.100     schwarze  110:        pid_t            child_pid;
                    111:        int              fd;
1.95      schwarze  112:        int              show_usage;
                    113:        int              use_pager;
1.87      schwarze  114:        int              options;
1.95      schwarze  115:        int              c;
1.1       kristaps  116:
1.19      schwarze  117:        progname = strrchr(argv[0], '/');
                    118:        if (progname == NULL)
                    119:                progname = argv[0];
                    120:        else
                    121:                ++progname;
1.79      schwarze  122:
1.82      schwarze  123:        if (0 == strncmp(progname, "mandocdb", 8) ||
                    124:            0 == strncmp(progname, "makewhatis", 10))
1.79      schwarze  125:                return(mandocdb(argc, argv));
1.19      schwarze  126:
1.95      schwarze  127:        /* Search options. */
                    128:
                    129:        memset(&paths, 0, sizeof(struct manpaths));
                    130:        conf_file = defpaths = auxpaths = NULL;
                    131:
                    132:        memset(&search, 0, sizeof(struct mansearch));
                    133:        search.outkey = "Nd";
                    134:
                    135:        if (strcmp(progname, "man") == 0)
                    136:                search.argmode = ARG_NAME;
                    137:        else if (strncmp(progname, "apropos", 7) == 0)
                    138:                search.argmode = ARG_EXPR;
                    139:        else if (strncmp(progname, "whatis", 6) == 0)
                    140:                search.argmode = ARG_WORD;
                    141:        else
                    142:                search.argmode = ARG_FILE;
                    143:
                    144:        /* Parser and formatter options. */
                    145:
1.19      schwarze  146:        memset(&curp, 0, sizeof(struct curparse));
1.1       kristaps  147:        curp.outtype = OUTT_ASCII;
1.45      schwarze  148:        curp.wlevel  = MANDOCLEVEL_FATAL;
1.103     schwarze  149:        options = MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1;
1.83      schwarze  150:        defos = NULL;
1.1       kristaps  151:
1.95      schwarze  152:        use_pager = 1;
                    153:        show_usage = 0;
                    154:        outmode = OUTMODE_DEF;
                    155:
1.103     schwarze  156:        while (-1 != (c = getopt(argc, argv,
                    157:                        "aC:cfhI:iK:klM:m:O:S:s:T:VW:w"))) {
1.1       kristaps  158:                switch (c) {
1.95      schwarze  159:                case 'a':
                    160:                        outmode = OUTMODE_ALL;
                    161:                        break;
                    162:                case 'C':
                    163:                        conf_file = optarg;
                    164:                        break;
                    165:                case 'c':
                    166:                        use_pager = 0;
                    167:                        break;
                    168:                case 'f':
                    169:                        search.argmode = ARG_WORD;
                    170:                        break;
1.98      schwarze  171:                case 'h':
                    172:                        (void)strlcat(curp.outopts, "synopsis,", BUFSIZ);
                    173:                        outmode = OUTMODE_ALL;
                    174:                        break;
1.90      schwarze  175:                case 'I':
1.83      schwarze  176:                        if (strncmp(optarg, "os=", 3)) {
1.90      schwarze  177:                                fprintf(stderr,
1.93      schwarze  178:                                    "%s: -I%s: Bad argument\n",
                    179:                                    progname, optarg);
1.83      schwarze  180:                                return((int)MANDOCLEVEL_BADARG);
                    181:                        }
                    182:                        if (defos) {
1.90      schwarze  183:                                fprintf(stderr,
1.93      schwarze  184:                                    "%s: -I%s: Duplicate argument\n",
                    185:                                    progname, optarg);
1.83      schwarze  186:                                return((int)MANDOCLEVEL_BADARG);
                    187:                        }
                    188:                        defos = mandoc_strdup(optarg + 3);
                    189:                        break;
1.95      schwarze  190:                case 'i':
                    191:                        outmode = OUTMODE_INT;
                    192:                        break;
1.103     schwarze  193:                case 'K':
                    194:                        if ( ! koptions(&options, optarg))
                    195:                                return((int)MANDOCLEVEL_BADARG);
                    196:                        break;
1.95      schwarze  197:                case 'k':
                    198:                        search.argmode = ARG_EXPR;
                    199:                        break;
1.96      schwarze  200:                case 'l':
                    201:                        search.argmode = ARG_FILE;
                    202:                        outmode = OUTMODE_ALL;
                    203:                        break;
1.95      schwarze  204:                case 'M':
                    205:                        defpaths = optarg;
                    206:                        break;
1.90      schwarze  207:                case 'm':
1.95      schwarze  208:                        auxpaths = optarg;
1.1       kristaps  209:                        break;
1.90      schwarze  210:                case 'O':
1.95      schwarze  211:                        search.outkey = optarg;
1.18      schwarze  212:                        (void)strlcat(curp.outopts, optarg, BUFSIZ);
                    213:                        (void)strlcat(curp.outopts, ",", BUFSIZ);
1.17      schwarze  214:                        break;
1.95      schwarze  215:                case 'S':
                    216:                        search.arch = optarg;
                    217:                        break;
                    218:                case 's':
                    219:                        search.sec = optarg;
                    220:                        break;
1.90      schwarze  221:                case 'T':
1.22      schwarze  222:                        if ( ! toptions(&curp, optarg))
1.47      schwarze  223:                                return((int)MANDOCLEVEL_BADARG);
1.1       kristaps  224:                        break;
1.90      schwarze  225:                case 'W':
1.45      schwarze  226:                        if ( ! woptions(&curp, optarg))
1.47      schwarze  227:                                return((int)MANDOCLEVEL_BADARG);
1.1       kristaps  228:                        break;
1.95      schwarze  229:                case 'w':
                    230:                        outmode = OUTMODE_FLN;
                    231:                        break;
1.90      schwarze  232:                case 'V':
1.3       schwarze  233:                        version();
                    234:                        /* NOTREACHED */
1.1       kristaps  235:                default:
1.95      schwarze  236:                        show_usage = 1;
                    237:                        break;
                    238:                }
                    239:        }
                    240:
                    241:        if (show_usage)
                    242:                usage(search.argmode);
                    243:
                    244:        /* Postprocess options. */
                    245:
                    246:        if (outmode == OUTMODE_DEF) {
                    247:                switch (search.argmode) {
                    248:                case ARG_FILE:
                    249:                        outmode = OUTMODE_ALL;
                    250:                        use_pager = 0;
                    251:                        break;
                    252:                case ARG_NAME:
                    253:                        outmode = OUTMODE_ONE;
                    254:                        break;
                    255:                default:
                    256:                        outmode = OUTMODE_LST;
                    257:                        break;
                    258:                }
                    259:        }
                    260:
                    261:        /* Parse arguments. */
                    262:
                    263:        argc -= optind;
                    264:        argv += optind;
                    265:        resp = NULL;
                    266:
                    267:        /* Quirk for a man(1) section argument without -s. */
                    268:
                    269:        if (search.argmode == ARG_NAME &&
                    270:            argv[0] != NULL &&
                    271:            isdigit((unsigned char)argv[0][0]) &&
                    272:            (argv[0][1] == '\0' || !strcmp(argv[0], "3p"))) {
                    273:                search.sec = argv[0];
                    274:                argv++;
                    275:                argc--;
                    276:        }
                    277:
                    278:        rc = MANDOCLEVEL_OK;
                    279:
                    280:        /* man(1), whatis(1), apropos(1) */
                    281:
                    282:        if (search.argmode != ARG_FILE) {
                    283:                if (argc == 0)
                    284:                        usage(search.argmode);
                    285:
                    286:                /* Access the mandoc database. */
                    287:
                    288:                manpath_parse(&paths, conf_file, defpaths, auxpaths);
                    289:                mansearch_setup(1);
                    290:                if( ! mansearch(&search, &paths, argc, argv, &res, &sz))
                    291:                        usage(search.argmode);
                    292:                resp = res;
                    293:
                    294:                if (sz == 0) {
                    295:                        if (search.argmode == ARG_NAME)
                    296:                                fprintf(stderr, "%s: No entry for %s "
                    297:                                    "in the manual.\n", progname, argv[0]);
                    298:                        rc = MANDOCLEVEL_BADARG;
                    299:                        goto out;
                    300:                }
                    301:
                    302:                /*
                    303:                 * For standard man(1) and -a output mode,
                    304:                 * prepare for copying filename pointers
                    305:                 * into the program parameter array.
                    306:                 */
                    307:
                    308:                if (outmode == OUTMODE_ONE) {
                    309:                        argc = 1;
                    310:                        best_prio = 10;
                    311:                } else if (outmode == OUTMODE_ALL)
                    312:                        argc = (int)sz;
                    313:
                    314:                /* Iterate all matching manuals. */
                    315:
                    316:                for (i = 0; i < sz; i++) {
                    317:                        if (outmode == OUTMODE_FLN)
                    318:                                puts(res[i].file);
                    319:                        else if (outmode == OUTMODE_LST)
                    320:                                printf("%s - %s\n", res[i].names,
                    321:                                    res[i].output == NULL ? "" :
                    322:                                    res[i].output);
                    323:                        else if (outmode == OUTMODE_ONE) {
                    324:                                /* Search for the best section. */
                    325:                                isec = strcspn(res[i].file, "123456789");
                    326:                                sec = res[i].file[isec];
                    327:                                if ('\0' == sec)
                    328:                                        continue;
                    329:                                prio = sec_prios[sec - '1'];
                    330:                                if (prio >= best_prio)
                    331:                                        continue;
                    332:                                best_prio = prio;
                    333:                                resp = res + i;
                    334:                        }
1.1       kristaps  335:                }
                    336:
1.95      schwarze  337:                /*
                    338:                 * For man(1), -a and -i output mode, fall through
                    339:                 * to the main mandoc(1) code iterating files
                    340:                 * and running the parsers on each of them.
                    341:                 */
                    342:
                    343:                if (outmode == OUTMODE_FLN || outmode == OUTMODE_LST)
                    344:                        goto out;
                    345:        }
                    346:
                    347:        /* mandoc(1) */
                    348:
                    349:        if ( ! moptions(&options, auxpaths))
                    350:                return((int)MANDOCLEVEL_BADARG);
                    351:
                    352:        if (use_pager && isatty(STDOUT_FILENO))
                    353:                spawn_pager();
                    354:
1.102     schwarze  355:        curp.mchars = mchars_alloc();
                    356:        curp.mp = mparse_alloc(options, curp.wlevel, mmsg,
                    357:            curp.mchars, defos);
1.76      schwarze  358:
1.80      schwarze  359:        /*
                    360:         * Conditionally start up the lookaside buffer before parsing.
                    361:         */
                    362:        if (OUTT_MAN == curp.outtype)
                    363:                mparse_keep(curp.mp);
                    364:
1.95      schwarze  365:        if (argc == 0)
1.76      schwarze  366:                parse(&curp, STDIN_FILENO, "<stdin>", &rc);
1.27      schwarze  367:
1.95      schwarze  368:        while (argc) {
                    369:                if (resp != NULL) {
1.100     schwarze  370:                        rc = mparse_open(curp.mp, &fd, resp->file,
                    371:                            &child_pid);
                    372:                        if (fd == -1)
                    373:                                /* nothing */;
                    374:                        else if (resp->form & FORM_SRC) {
1.97      schwarze  375:                                /* For .so only; ignore failure. */
                    376:                                chdir(paths.paths[resp->ipath]);
1.100     schwarze  377:                                parse(&curp, fd, resp->file, &rc);
1.97      schwarze  378:                        } else
1.100     schwarze  379:                                rc = passthrough(resp->file, fd);
1.95      schwarze  380:                        resp++;
1.100     schwarze  381:                } else {
                    382:                        rc = mparse_open(curp.mp, &fd, *argv++,
                    383:                            &child_pid);
                    384:                        if (fd != -1)
                    385:                                parse(&curp, fd, argv[-1], &rc);
                    386:                }
                    387:
                    388:                if (child_pid &&
                    389:                    mparse_wait(curp.mp, child_pid) != MANDOCLEVEL_OK)
                    390:                        rc = MANDOCLEVEL_SYSERR;
                    391:
1.76      schwarze  392:                if (MANDOCLEVEL_OK != rc && curp.wstop)
1.27      schwarze  393:                        break;
1.95      schwarze  394:                argc--;
1.1       kristaps  395:        }
                    396:
                    397:        if (curp.outfree)
                    398:                (*curp.outfree)(curp.outdata);
1.102     schwarze  399:        mparse_free(curp.mp);
                    400:        mchars_free(curp.mchars);
1.95      schwarze  401:
                    402: out:
                    403:        if (search.argmode != ARG_FILE) {
1.97      schwarze  404:                manpath_free(&paths);
1.95      schwarze  405:                mansearch_free(res, sz);
                    406:                mansearch_setup(0);
                    407:        }
                    408:
1.83      schwarze  409:        free(defos);
1.1       kristaps  410:
1.76      schwarze  411:        return((int)rc);
1.1       kristaps  412: }
                    413:
1.20      schwarze  414: static void
1.3       schwarze  415: version(void)
                    416: {
                    417:
1.95      schwarze  418:        printf("mandoc %s\n", VERSION);
1.47      schwarze  419:        exit((int)MANDOCLEVEL_OK);
1.3       schwarze  420: }
                    421:
1.20      schwarze  422: static void
1.95      schwarze  423: usage(enum argmode argmode)
1.1       kristaps  424: {
                    425:
1.95      schwarze  426:        switch (argmode) {
                    427:        case ARG_FILE:
1.98      schwarze  428:                fputs("usage: mandoc [-acfhklV] [-Ios=name] "
1.104   ! jmc       429:                    "[-Kencoding] [-mformat] [-Ooption]\n"
        !           430:                    "\t      [-Toutput] [-Wlevel] [file ...]\n", stderr);
1.95      schwarze  431:                break;
                    432:        case ARG_NAME:
1.96      schwarze  433:                fputs("usage: man [-acfhklVw] [-C file] "
1.95      schwarze  434:                    "[-M path] [-m path] [-S arch] [-s section]\n"
                    435:                    "\t   [section] name ...\n", stderr);
                    436:                break;
                    437:        case ARG_WORD:
1.98      schwarze  438:                fputs("usage: whatis [-acfhklVw] [-C file] "
1.96      schwarze  439:                    "[-M path] [-m path] [-O outkey] [-S arch]\n"
                    440:                    "\t      [-s section] name ...\n", stderr);
1.95      schwarze  441:                break;
                    442:        case ARG_EXPR:
1.98      schwarze  443:                fputs("usage: apropos [-acfhklVw] [-C file] "
1.96      schwarze  444:                    "[-M path] [-m path] [-O outkey] [-S arch]\n"
1.95      schwarze  445:                    "\t       [-s section] expression ...\n", stderr);
                    446:                break;
                    447:        }
1.47      schwarze  448:        exit((int)MANDOCLEVEL_BADARG);
1.1       kristaps  449: }
                    450:
1.27      schwarze  451: static void
1.90      schwarze  452: parse(struct curparse *curp, int fd, const char *file,
                    453:        enum mandoclevel *level)
1.52      schwarze  454: {
1.76      schwarze  455:        enum mandoclevel  rc;
                    456:        struct mdoc      *mdoc;
                    457:        struct man       *man;
1.52      schwarze  458:
1.76      schwarze  459:        /* Begin by parsing the file itself. */
1.52      schwarze  460:
1.76      schwarze  461:        assert(file);
                    462:        assert(fd >= -1);
1.52      schwarze  463:
1.76      schwarze  464:        rc = mparse_readfd(curp->mp, fd, file);
1.1       kristaps  465:
1.76      schwarze  466:        /* Stop immediately if the parse has failed. */
1.1       kristaps  467:
1.76      schwarze  468:        if (MANDOCLEVEL_FATAL <= rc)
1.51      schwarze  469:                goto cleanup;
                    470:
                    471:        /*
1.76      schwarze  472:         * With -Wstop and warnings or errors of at least the requested
                    473:         * level, do not produce output.
1.51      schwarze  474:         */
                    475:
1.76      schwarze  476:        if (MANDOCLEVEL_OK != rc && curp->wstop)
1.51      schwarze  477:                goto cleanup;
                    478:
                    479:        /* If unset, allocate output dev now (if applicable). */
                    480:
                    481:        if ( ! (curp->outman && curp->outmdoc)) {
                    482:                switch (curp->outtype) {
1.90      schwarze  483:                case OUTT_HTML:
1.102     schwarze  484:                        curp->outdata = html_alloc(curp->mchars,
                    485:                            curp->outopts);
1.77      schwarze  486:                        curp->outfree = html_free;
                    487:                        break;
1.90      schwarze  488:                case OUTT_UTF8:
1.102     schwarze  489:                        curp->outdata = utf8_alloc(curp->mchars,
                    490:                            curp->outopts);
1.77      schwarze  491:                        curp->outfree = ascii_free;
                    492:                        break;
1.90      schwarze  493:                case OUTT_LOCALE:
1.102     schwarze  494:                        curp->outdata = locale_alloc(curp->mchars,
                    495:                            curp->outopts);
1.77      schwarze  496:                        curp->outfree = ascii_free;
1.51      schwarze  497:                        break;
1.90      schwarze  498:                case OUTT_ASCII:
1.102     schwarze  499:                        curp->outdata = ascii_alloc(curp->mchars,
                    500:                            curp->outopts);
1.51      schwarze  501:                        curp->outfree = ascii_free;
                    502:                        break;
1.90      schwarze  503:                case OUTT_PDF:
1.102     schwarze  504:                        curp->outdata = pdf_alloc(curp->mchars,
                    505:                            curp->outopts);
1.51      schwarze  506:                        curp->outfree = pspdf_free;
                    507:                        break;
1.90      schwarze  508:                case OUTT_PS:
1.102     schwarze  509:                        curp->outdata = ps_alloc(curp->mchars,
                    510:                            curp->outopts);
1.51      schwarze  511:                        curp->outfree = pspdf_free;
                    512:                        break;
                    513:                default:
                    514:                        break;
                    515:                }
                    516:
                    517:                switch (curp->outtype) {
1.90      schwarze  518:                case OUTT_HTML:
1.51      schwarze  519:                        curp->outman = html_man;
                    520:                        curp->outmdoc = html_mdoc;
                    521:                        break;
1.90      schwarze  522:                case OUTT_TREE:
1.51      schwarze  523:                        curp->outman = tree_man;
                    524:                        curp->outmdoc = tree_mdoc;
                    525:                        break;
1.90      schwarze  526:                case OUTT_MAN:
1.78      schwarze  527:                        curp->outmdoc = man_mdoc;
1.80      schwarze  528:                        curp->outman = man_man;
1.78      schwarze  529:                        break;
1.90      schwarze  530:                case OUTT_PDF:
1.51      schwarze  531:                        /* FALLTHROUGH */
1.90      schwarze  532:                case OUTT_ASCII:
1.51      schwarze  533:                        /* FALLTHROUGH */
1.90      schwarze  534:                case OUTT_UTF8:
1.77      schwarze  535:                        /* FALLTHROUGH */
1.90      schwarze  536:                case OUTT_LOCALE:
1.77      schwarze  537:                        /* FALLTHROUGH */
1.90      schwarze  538:                case OUTT_PS:
1.51      schwarze  539:                        curp->outman = terminal_man;
                    540:                        curp->outmdoc = terminal_mdoc;
                    541:                        break;
                    542:                default:
                    543:                        break;
                    544:                }
                    545:        }
                    546:
1.88      schwarze  547:        mparse_result(curp->mp, &mdoc, &man, NULL);
1.76      schwarze  548:
1.51      schwarze  549:        /* Execute the out device, if it exists. */
                    550:
1.76      schwarze  551:        if (man && curp->outman)
                    552:                (*curp->outman)(curp->outdata, man);
                    553:        if (mdoc && curp->outmdoc)
                    554:                (*curp->outmdoc)(curp->outdata, mdoc);
1.51      schwarze  555:
                    556:  cleanup:
1.59      schwarze  557:
1.76      schwarze  558:        mparse_reset(curp->mp);
1.59      schwarze  559:
1.76      schwarze  560:        if (*level < rc)
                    561:                *level = rc;
1.1       kristaps  562: }
                    563:
1.95      schwarze  564: static enum mandoclevel
1.100     schwarze  565: passthrough(const char *file, int fd)
1.95      schwarze  566: {
                    567:        char             buf[BUFSIZ];
                    568:        const char      *syscall;
                    569:        ssize_t          nr, nw, off;
                    570:
                    571:        while ((nr = read(fd, buf, BUFSIZ)) != -1 && nr != 0)
                    572:                for (off = 0; off < nr; off += nw)
                    573:                        if ((nw = write(STDOUT_FILENO, buf + off,
                    574:                            (size_t)(nr - off))) == -1 || nw == 0) {
1.101     schwarze  575:                                close(fd);
1.95      schwarze  576:                                syscall = "write";
                    577:                                goto fail;
                    578:                        }
                    579:
1.101     schwarze  580:        close(fd);
                    581:
                    582:        if (nr == 0)
1.95      schwarze  583:                return(MANDOCLEVEL_OK);
                    584:
                    585:        syscall = "read";
                    586: fail:
                    587:        fprintf(stderr, "%s: %s: SYSERR: %s: %s",
                    588:            progname, file, syscall, strerror(errno));
                    589:        return(MANDOCLEVEL_SYSERR);
1.103     schwarze  590: }
                    591:
                    592: static int
                    593: koptions(int *options, char *arg)
                    594: {
                    595:
                    596:        if ( ! strcmp(arg, "utf-8")) {
                    597:                *options |=  MPARSE_UTF8;
                    598:                *options &= ~MPARSE_LATIN1;
                    599:        } else if ( ! strcmp(arg, "iso-8859-1")) {
                    600:                *options |=  MPARSE_LATIN1;
                    601:                *options &= ~MPARSE_UTF8;
                    602:        } else if ( ! strcmp(arg, "us-ascii")) {
                    603:                *options &= ~(MPARSE_UTF8 | MPARSE_LATIN1);
                    604:        } else {
                    605:                fprintf(stderr, "%s: -K%s: Bad argument\n",
                    606:                    progname, arg);
                    607:                return(0);
                    608:        }
                    609:        return(1);
1.95      schwarze  610: }
                    611:
1.1       kristaps  612: static int
1.87      schwarze  613: moptions(int *options, char *arg)
1.1       kristaps  614: {
                    615:
1.95      schwarze  616:        if (arg == NULL)
                    617:                /* nothing to do */;
                    618:        else if (0 == strcmp(arg, "doc"))
1.87      schwarze  619:                *options |= MPARSE_MDOC;
1.1       kristaps  620:        else if (0 == strcmp(arg, "andoc"))
1.87      schwarze  621:                /* nothing to do */;
1.1       kristaps  622:        else if (0 == strcmp(arg, "an"))
1.87      schwarze  623:                *options |= MPARSE_MAN;
1.1       kristaps  624:        else {
1.93      schwarze  625:                fprintf(stderr, "%s: -m%s: Bad argument\n",
                    626:                    progname, arg);
1.1       kristaps  627:                return(0);
                    628:        }
                    629:
                    630:        return(1);
                    631: }
                    632:
                    633: static int
1.22      schwarze  634: toptions(struct curparse *curp, char *arg)
1.1       kristaps  635: {
                    636:
                    637:        if (0 == strcmp(arg, "ascii"))
1.22      schwarze  638:                curp->outtype = OUTT_ASCII;
                    639:        else if (0 == strcmp(arg, "lint")) {
                    640:                curp->outtype = OUTT_LINT;
1.45      schwarze  641:                curp->wlevel  = MANDOCLEVEL_WARNING;
1.76      schwarze  642:        } else if (0 == strcmp(arg, "tree"))
1.22      schwarze  643:                curp->outtype = OUTT_TREE;
1.78      schwarze  644:        else if (0 == strcmp(arg, "man"))
                    645:                curp->outtype = OUTT_MAN;
1.17      schwarze  646:        else if (0 == strcmp(arg, "html"))
1.22      schwarze  647:                curp->outtype = OUTT_HTML;
1.77      schwarze  648:        else if (0 == strcmp(arg, "utf8"))
                    649:                curp->outtype = OUTT_UTF8;
                    650:        else if (0 == strcmp(arg, "locale"))
                    651:                curp->outtype = OUTT_LOCALE;
1.21      schwarze  652:        else if (0 == strcmp(arg, "xhtml"))
1.102     schwarze  653:                curp->outtype = OUTT_HTML;
1.36      schwarze  654:        else if (0 == strcmp(arg, "ps"))
                    655:                curp->outtype = OUTT_PS;
1.43      schwarze  656:        else if (0 == strcmp(arg, "pdf"))
                    657:                curp->outtype = OUTT_PDF;
1.1       kristaps  658:        else {
1.93      schwarze  659:                fprintf(stderr, "%s: -T%s: Bad argument\n",
                    660:                    progname, arg);
1.1       kristaps  661:                return(0);
                    662:        }
                    663:
                    664:        return(1);
                    665: }
                    666:
                    667: static int
1.45      schwarze  668: woptions(struct curparse *curp, char *arg)
1.1       kristaps  669: {
1.10      schwarze  670:        char            *v, *o;
1.90      schwarze  671:        const char      *toks[6];
1.1       kristaps  672:
1.45      schwarze  673:        toks[0] = "stop";
                    674:        toks[1] = "all";
                    675:        toks[2] = "warning";
                    676:        toks[3] = "error";
                    677:        toks[4] = "fatal";
                    678:        toks[5] = NULL;
1.1       kristaps  679:
1.10      schwarze  680:        while (*arg) {
                    681:                o = arg;
1.17      schwarze  682:                switch (getsubopt(&arg, UNCONST(toks), &v)) {
1.90      schwarze  683:                case 0:
1.45      schwarze  684:                        curp->wstop = 1;
1.1       kristaps  685:                        break;
1.90      schwarze  686:                case 1:
1.45      schwarze  687:                        /* FALLTHROUGH */
1.90      schwarze  688:                case 2:
1.45      schwarze  689:                        curp->wlevel = MANDOCLEVEL_WARNING;
1.1       kristaps  690:                        break;
1.90      schwarze  691:                case 3:
1.45      schwarze  692:                        curp->wlevel = MANDOCLEVEL_ERROR;
1.1       kristaps  693:                        break;
1.90      schwarze  694:                case 4:
1.45      schwarze  695:                        curp->wlevel = MANDOCLEVEL_FATAL;
1.19      schwarze  696:                        break;
1.1       kristaps  697:                default:
1.93      schwarze  698:                        fprintf(stderr, "%s: -W%s: Bad argument\n",
                    699:                            progname, o);
1.1       kristaps  700:                        return(0);
                    701:                }
1.10      schwarze  702:        }
1.1       kristaps  703:
                    704:        return(1);
                    705: }
                    706:
1.75      schwarze  707: static void
1.90      schwarze  708: mmsg(enum mandocerr t, enum mandoclevel lvl,
1.76      schwarze  709:                const char *file, int line, int col, const char *msg)
1.30      schwarze  710: {
1.94      schwarze  711:        const char      *mparse_msg;
1.45      schwarze  712:
1.92      schwarze  713:        fprintf(stderr, "%s: %s:", progname, file);
                    714:
                    715:        if (line)
                    716:                fprintf(stderr, "%d:%d:", line, col + 1);
                    717:
1.94      schwarze  718:        fprintf(stderr, " %s", mparse_strlevel(lvl));
                    719:
                    720:        if (NULL != (mparse_msg = mparse_strerror(t)))
                    721:                fprintf(stderr, ": %s", mparse_msg);
1.30      schwarze  722:
                    723:        if (msg)
                    724:                fprintf(stderr, ": %s", msg);
1.76      schwarze  725:
1.30      schwarze  726:        fputc('\n', stderr);
1.95      schwarze  727: }
                    728:
                    729: static void
                    730: spawn_pager(void)
                    731: {
                    732: #define MAX_PAGER_ARGS 16
                    733:        char            *argv[MAX_PAGER_ARGS];
                    734:        const char      *pager;
                    735:        char            *cp;
                    736:        int              fildes[2];
                    737:        int              argc;
                    738:
                    739:        if (pipe(fildes) == -1) {
                    740:                fprintf(stderr, "%s: pipe: %s\n",
                    741:                    progname, strerror(errno));
                    742:                return;
                    743:        }
                    744:
                    745:        switch (fork()) {
                    746:        case -1:
                    747:                fprintf(stderr, "%s: fork: %s\n",
                    748:                    progname, strerror(errno));
                    749:                exit((int)MANDOCLEVEL_SYSERR);
                    750:        case 0:
                    751:                close(fildes[0]);
                    752:                if (dup2(fildes[1], STDOUT_FILENO) == -1) {
                    753:                        fprintf(stderr, "%s: dup output: %s\n",
                    754:                            progname, strerror(errno));
                    755:                        exit((int)MANDOCLEVEL_SYSERR);
                    756:                }
                    757:                return;
                    758:        default:
                    759:                break;
                    760:        }
                    761:
                    762:        /* The original process becomes the pager. */
                    763:
                    764:        close(fildes[1]);
                    765:        if (dup2(fildes[0], STDIN_FILENO) == -1) {
                    766:                fprintf(stderr, "%s: dup input: %s\n",
                    767:                    progname, strerror(errno));
                    768:                exit((int)MANDOCLEVEL_SYSERR);
                    769:        }
                    770:
                    771:        pager = getenv("MANPAGER");
                    772:        if (pager == NULL || *pager == '\0')
                    773:                pager = getenv("PAGER");
                    774:        if (pager == NULL || *pager == '\0')
                    775:                pager = "/usr/bin/more -s";
                    776:        cp = mandoc_strdup(pager);
                    777:
                    778:        /*
                    779:         * Parse the pager command into words.
                    780:         * Intentionally do not do anything fancy here.
                    781:         */
                    782:
                    783:        argc = 0;
                    784:        while (argc + 1 < MAX_PAGER_ARGS) {
                    785:                argv[argc++] = cp;
                    786:                cp = strchr(cp, ' ');
                    787:                if (cp == NULL)
                    788:                        break;
                    789:                *cp++ = '\0';
                    790:                while (*cp == ' ')
                    791:                        cp++;
                    792:                if (*cp == '\0')
                    793:                        break;
                    794:        }
                    795:        argv[argc] = NULL;
                    796:
                    797:        /* Hand over to the pager. */
                    798:
                    799:        execvp(argv[0], argv);
                    800:        fprintf(stderr, "%s: exec: %s\n",
                    801:            progname, strerror(errno));
                    802:        exit((int)MANDOCLEVEL_SYSERR);
1.30      schwarze  803: }