[BACK]Return to main.c CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / mandoc

Annotation of mandoc/main.c, Revision 1.196

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

CVSweb