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

Annotation of mandoc/main.c, Revision 1.339

1.339   ! schwarze    1: /*     $Id: main.c,v 1.338 2019/07/28 18:23:17 schwarze Exp $ */
1.1       kristaps    2: /*
1.183     schwarze    3:  * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv>
1.317     schwarze    4:  * Copyright (c) 2010-2012, 2014-2019 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.229     schwarze   11:  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHORS DISCLAIM ALL WARRANTIES
1.25      kristaps   12:  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
1.229     schwarze   13:  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR
1.25      kristaps   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.304     schwarze   22: #include <sys/ioctl.h>
1.216     schwarze   23: #include <sys/param.h> /* MACHINE */
1.326     schwarze   24: #include <sys/stat.h>
1.224     schwarze   25: #include <sys/wait.h>
1.58      kristaps   26:
1.1       kristaps   27: #include <assert.h>
1.185     schwarze   28: #include <ctype.h>
1.256     schwarze   29: #if HAVE_ERR
1.247     schwarze   30: #include <err.h>
1.256     schwarze   31: #endif
1.258     schwarze   32: #include <errno.h>
1.186     schwarze   33: #include <fcntl.h>
1.222     schwarze   34: #include <glob.h>
1.269     kristaps   35: #if HAVE_SANDBOX_INIT
                     36: #include <sandbox.h>
                     37: #endif
1.226     schwarze   38: #include <signal.h>
1.1       kristaps   39: #include <stdio.h>
1.45      kristaps   40: #include <stdint.h>
1.1       kristaps   41: #include <stdlib.h>
                     42: #include <string.h>
1.321     schwarze   43: #include <termios.h>
1.265     schwarze   44: #include <time.h>
1.1       kristaps   45: #include <unistd.h>
                     46:
1.231     schwarze   47: #include "mandoc_aux.h"
1.71      kristaps   48: #include "mandoc.h"
1.294     schwarze   49: #include "mandoc_xr.h"
1.231     schwarze   50: #include "roff.h"
1.1       kristaps   51: #include "mdoc.h"
1.10      kristaps   52: #include "man.h"
1.311     schwarze   53: #include "mandoc_parse.h"
1.239     schwarze   54: #include "tag.h"
1.231     schwarze   55: #include "main.h"
1.229     schwarze   56: #include "manconf.h"
1.180     schwarze   57: #include "mansearch.h"
1.16      kristaps   58:
1.181     schwarze   59: enum   outmode {
                     60:        OUTMODE_DEF = 0,
                     61:        OUTMODE_FLN,
                     62:        OUTMODE_LST,
                     63:        OUTMODE_ALL,
                     64:        OUTMODE_ONE
                     65: };
                     66:
1.19      kristaps   67: enum   outt {
1.154     kristaps   68:        OUTT_ASCII = 0, /* -Tascii */
1.162     kristaps   69:        OUTT_LOCALE,    /* -Tlocale */
1.163     kristaps   70:        OUTT_UTF8,      /* -Tutf8 */
1.154     kristaps   71:        OUTT_TREE,      /* -Ttree */
1.164     schwarze   72:        OUTT_MAN,       /* -Tman */
1.154     kristaps   73:        OUTT_HTML,      /* -Thtml */
1.285     schwarze   74:        OUTT_MARKDOWN,  /* -Tmarkdown */
1.154     kristaps   75:        OUTT_LINT,      /* -Tlint */
                     76:        OUTT_PS,        /* -Tps */
                     77:        OUTT_PDF        /* -Tpdf */
1.19      kristaps   78: };
                     79:
1.335     schwarze   80: struct outstate {
1.336     schwarze   81:        struct tag_files *tag_files;    /* Tagging state variables. */
1.293     schwarze   82:        void             *outdata;      /* data for output */
1.336     schwarze   83:        int               use_pager;
1.148     kristaps   84:        int               wstop;        /* stop after a file with a warning */
1.337     schwarze   85:        int               had_output;   /* Some output was generated. */
1.173     schwarze   86:        enum outt         outtype;      /* which output to use */
1.79      kristaps   87: };
1.270     schwarze   88:
                     89:
                     90: int                      mandocdb(int, char *[]);
1.79      kristaps   91:
1.312     schwarze   92: static void              check_xr(void);
1.213     schwarze   93: static int               fs_lookup(const struct manpaths *,
                     94:                                size_t ipath, const char *,
                     95:                                const char *, const char *,
                     96:                                struct manpage **, size_t *);
1.295     schwarze   97: static int               fs_search(const struct mansearch *,
1.213     schwarze   98:                                const struct manpaths *, int, char**,
                     99:                                struct manpage **, size_t *);
1.335     schwarze  100: static void              outdata_alloc(struct outstate *, struct manoutput *);
1.334     schwarze  101: static void              parse(struct mparse *, int, const char *,
1.335     schwarze  102:                                struct outstate *, struct manoutput *);
1.329     schwarze  103: static void              passthrough(int, int);
1.337     schwarze  104: static void              process_onefile(struct mparse *, struct manpage *,
                    105:                                int, struct outstate *, struct manconf *);
1.333     schwarze  106: static void              run_pager(struct tag_files *);
1.244     schwarze  107: static pid_t             spawn_pager(struct tag_files *);
1.283     schwarze  108: static void              usage(enum argmode) __attribute__((__noreturn__));
1.334     schwarze  109: static int               woptions(char *, enum mandoc_os *, int *);
1.1       kristaps  110:
1.182     schwarze  111: static const int sec_prios[] = {1, 4, 5, 8, 6, 3, 7, 2, 9};
1.202     schwarze  112: static char              help_arg[] = "help";
                    113: static char             *help_argv[] = {help_arg, NULL};
1.1       kristaps  114:
1.173     schwarze  115:
1.1       kristaps  116: int
                    117: main(int argc, char *argv[])
                    118: {
1.334     schwarze  119:        struct manconf   conf;          /* Manpaths and output options. */
1.335     schwarze  120:        struct outstate  outst;         /* Output state. */
1.334     schwarze  121:        struct winsize   ws;            /* Result of ioctl(TIOCGWINSZ). */
                    122:        struct mansearch search;        /* Search options. */
1.338     schwarze  123:        struct manpage  *res;           /* Complete list of search results. */
                    124:        struct manpage  *resn;          /* Search results for one name. */
1.334     schwarze  125:        struct mparse   *mp;            /* Opaque parser object. */
                    126:        const char      *conf_file;     /* -C: alternate config file. */
                    127:        const char      *os_s;          /* -I: Operating system for display. */
1.337     schwarze  128:        const char      *progname, *sec;
1.334     schwarze  129:        char            *defpaths;      /* -M: override manpaths. */
                    130:        char            *auxpaths;      /* -m: additional manpaths. */
                    131:        char            *oarg;          /* -O: output option string. */
                    132:        char            *tagarg;        /* -O tag: default value. */
1.207     schwarze  133:        unsigned char   *uc;
1.338     schwarze  134:        size_t           ressz;         /* Number of elements in res[]. */
                    135:        size_t           resnsz;        /* Number of elements in resn[]. */
                    136:        size_t           i, ib, ssz;
1.334     schwarze  137:        int              options;       /* Parser options. */
                    138:        int              show_usage;    /* Invalid argument: give up. */
1.230     schwarze  139:        int              prio, best_prio;
1.337     schwarze  140:        int              startdir;
1.180     schwarze  141:        int              c;
1.334     schwarze  142:        enum mandoc_os   os_e;          /* Check base system conventions. */
                    143:        enum outmode     outmode;       /* According to command line. */
1.1       kristaps  144:
1.254     schwarze  145: #if HAVE_PROGNAME
                    146:        progname = getprogname();
                    147: #else
1.219     schwarze  148:        if (argc < 1)
1.254     schwarze  149:                progname = mandoc_strdup("mandoc");
                    150:        else if ((progname = strrchr(argv[0], '/')) == NULL)
                    151:                progname = argv[0];
1.54      kristaps  152:        else
1.254     schwarze  153:                ++progname;
                    154:        setprogname(progname);
1.247     schwarze  155: #endif
1.203     schwarze  156:
1.317     schwarze  157:        mandoc_msg_setoutfile(stderr);
1.254     schwarze  158:        if (strncmp(progname, "mandocdb", 8) == 0 ||
                    159:            strcmp(progname, BINM_MAKEWHATIS) == 0)
1.245     schwarze  160:                return mandocdb(argc, argv);
1.179     schwarze  161:
1.255     schwarze  162: #if HAVE_PLEDGE
1.329     schwarze  163:        if (pledge("stdio rpath tmppath tty proc exec", NULL) == -1) {
                    164:                mandoc_msg(MANDOCERR_PLEDGE, 0, 0, "%s", strerror(errno));
                    165:                return mandoc_msg_getrc();
                    166:        }
1.269     kristaps  167: #endif
                    168: #if HAVE_SANDBOX_INIT
                    169:        if (sandbox_init(kSBXProfileNoInternet, SANDBOX_NAMED, NULL) == -1)
                    170:                errx((int)MANDOCLEVEL_SYSERR, "sandbox_init");
1.255     schwarze  171: #endif
                    172:
1.180     schwarze  173:        /* Search options. */
                    174:
1.229     schwarze  175:        memset(&conf, 0, sizeof(conf));
1.334     schwarze  176:        conf_file = NULL;
                    177:        defpaths = auxpaths = NULL;
1.180     schwarze  178:
                    179:        memset(&search, 0, sizeof(struct mansearch));
                    180:        search.outkey = "Nd";
1.282     schwarze  181:        oarg = NULL;
1.180     schwarze  182:
1.254     schwarze  183:        if (strcmp(progname, BINM_MAN) == 0)
1.180     schwarze  184:                search.argmode = ARG_NAME;
1.254     schwarze  185:        else if (strcmp(progname, BINM_APROPOS) == 0)
1.180     schwarze  186:                search.argmode = ARG_EXPR;
1.254     schwarze  187:        else if (strcmp(progname, BINM_WHATIS) == 0)
1.180     schwarze  188:                search.argmode = ARG_WORD;
1.254     schwarze  189:        else if (strncmp(progname, "help", 4) == 0)
1.202     schwarze  190:                search.argmode = ARG_NAME;
1.180     schwarze  191:        else
                    192:                search.argmode = ARG_FILE;
                    193:
1.335     schwarze  194:        /* Parser options. */
1.54      kristaps  195:
1.335     schwarze  196:        options = MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1;
1.334     schwarze  197:        os_e = MANDOC_OS_OTHER;
                    198:        os_s = NULL;
1.335     schwarze  199:
                    200:        /* Formatter options. */
                    201:
                    202:        memset(&outst, 0, sizeof(outst));
1.336     schwarze  203:        outst.tag_files = NULL;
1.335     schwarze  204:        outst.outtype = OUTT_LOCALE;
1.336     schwarze  205:        outst.use_pager = 1;
1.19      kristaps  206:
1.180     schwarze  207:        show_usage = 0;
1.181     schwarze  208:        outmode = OUTMODE_DEF;
1.183     schwarze  209:
1.289     schwarze  210:        while ((c = getopt(argc, argv,
                    211:            "aC:cfhI:iK:klM:m:O:S:s:T:VW:w")) != -1) {
                    212:                if (c == 'i' && search.argmode == ARG_EXPR) {
                    213:                        optind--;
                    214:                        break;
                    215:                }
1.1       kristaps  216:                switch (c) {
1.181     schwarze  217:                case 'a':
                    218:                        outmode = OUTMODE_ALL;
                    219:                        break;
1.180     schwarze  220:                case 'C':
                    221:                        conf_file = optarg;
                    222:                        break;
1.183     schwarze  223:                case 'c':
1.336     schwarze  224:                        outst.use_pager = 0;
1.183     schwarze  225:                        break;
1.180     schwarze  226:                case 'f':
                    227:                        search.argmode = ARG_WORD;
                    228:                        break;
1.190     schwarze  229:                case 'h':
1.230     schwarze  230:                        conf.output.synopsisonly = 1;
1.336     schwarze  231:                        outst.use_pager = 0;
1.190     schwarze  232:                        outmode = OUTMODE_ALL;
                    233:                        break;
1.173     schwarze  234:                case 'I':
1.329     schwarze  235:                        if (strncmp(optarg, "os=", 3) != 0) {
                    236:                                mandoc_msg(MANDOCERR_BADARG_BAD, 0, 0,
                    237:                                    "-I %s", optarg);
                    238:                                return mandoc_msg_getrc();
1.166     schwarze  239:                        }
1.334     schwarze  240:                        if (os_s != NULL) {
1.329     schwarze  241:                                mandoc_msg(MANDOCERR_BADARG_DUPE, 0, 0,
                    242:                                    "-I %s", optarg);
                    243:                                return mandoc_msg_getrc();
1.166     schwarze  244:                        }
1.334     schwarze  245:                        os_s = optarg + 3;
1.181     schwarze  246:                        break;
1.194     schwarze  247:                case 'K':
1.329     schwarze  248:                        options &= ~(MPARSE_UTF8 | MPARSE_LATIN1);
                    249:                        if (strcmp(optarg, "utf-8") == 0)
                    250:                                options |=  MPARSE_UTF8;
                    251:                        else if (strcmp(optarg, "iso-8859-1") == 0)
                    252:                                options |=  MPARSE_LATIN1;
                    253:                        else if (strcmp(optarg, "us-ascii") != 0) {
                    254:                                mandoc_msg(MANDOCERR_BADARG_BAD, 0, 0,
                    255:                                    "-K %s", optarg);
                    256:                                return mandoc_msg_getrc();
                    257:                        }
1.194     schwarze  258:                        break;
1.180     schwarze  259:                case 'k':
                    260:                        search.argmode = ARG_EXPR;
                    261:                        break;
1.188     schwarze  262:                case 'l':
                    263:                        search.argmode = ARG_FILE;
                    264:                        outmode = OUTMODE_ALL;
                    265:                        break;
1.180     schwarze  266:                case 'M':
                    267:                        defpaths = optarg;
                    268:                        break;
1.173     schwarze  269:                case 'm':
1.180     schwarze  270:                        auxpaths = optarg;
1.10      kristaps  271:                        break;
1.173     schwarze  272:                case 'O':
1.282     schwarze  273:                        oarg = optarg;
1.44      kristaps  274:                        break;
1.180     schwarze  275:                case 'S':
                    276:                        search.arch = optarg;
                    277:                        break;
                    278:                case 's':
                    279:                        search.sec = optarg;
                    280:                        break;
1.173     schwarze  281:                case 'T':
1.329     schwarze  282:                        if (strcmp(optarg, "ascii") == 0)
1.335     schwarze  283:                                outst.outtype = OUTT_ASCII;
1.329     schwarze  284:                        else if (strcmp(optarg, "lint") == 0) {
1.335     schwarze  285:                                outst.outtype = OUTT_LINT;
1.329     schwarze  286:                                mandoc_msg_setoutfile(stdout);
                    287:                                mandoc_msg_setmin(MANDOCERR_BASE);
                    288:                        } else if (strcmp(optarg, "tree") == 0)
1.335     schwarze  289:                                outst.outtype = OUTT_TREE;
1.329     schwarze  290:                        else if (strcmp(optarg, "man") == 0)
1.335     schwarze  291:                                outst.outtype = OUTT_MAN;
1.329     schwarze  292:                        else if (strcmp(optarg, "html") == 0)
1.335     schwarze  293:                                outst.outtype = OUTT_HTML;
1.329     schwarze  294:                        else if (strcmp(optarg, "markdown") == 0)
1.335     schwarze  295:                                outst.outtype = OUTT_MARKDOWN;
1.329     schwarze  296:                        else if (strcmp(optarg, "utf8") == 0)
1.335     schwarze  297:                                outst.outtype = OUTT_UTF8;
1.329     schwarze  298:                        else if (strcmp(optarg, "locale") == 0)
1.335     schwarze  299:                                outst.outtype = OUTT_LOCALE;
1.329     schwarze  300:                        else if (strcmp(optarg, "ps") == 0)
1.335     schwarze  301:                                outst.outtype = OUTT_PS;
1.329     schwarze  302:                        else if (strcmp(optarg, "pdf") == 0)
1.335     schwarze  303:                                outst.outtype = OUTT_PDF;
1.329     schwarze  304:                        else {
                    305:                                mandoc_msg(MANDOCERR_BADARG_BAD, 0, 0,
                    306:                                    "-T %s", optarg);
                    307:                                return mandoc_msg_getrc();
                    308:                        }
1.1       kristaps  309:                        break;
1.173     schwarze  310:                case 'W':
1.335     schwarze  311:                        if (woptions(optarg, &os_e, &outst.wstop) == -1)
1.329     schwarze  312:                                return mandoc_msg_getrc();
1.1       kristaps  313:                        break;
1.181     schwarze  314:                case 'w':
                    315:                        outmode = OUTMODE_FLN;
                    316:                        break;
1.1       kristaps  317:                default:
1.180     schwarze  318:                        show_usage = 1;
                    319:                        break;
1.1       kristaps  320:                }
1.180     schwarze  321:        }
                    322:
                    323:        if (show_usage)
                    324:                usage(search.argmode);
                    325:
1.185     schwarze  326:        /* Postprocess options. */
                    327:
1.181     schwarze  328:        if (outmode == OUTMODE_DEF) {
                    329:                switch (search.argmode) {
                    330:                case ARG_FILE:
                    331:                        outmode = OUTMODE_ALL;
1.336     schwarze  332:                        outst.use_pager = 0;
1.181     schwarze  333:                        break;
                    334:                case ARG_NAME:
                    335:                        outmode = OUTMODE_ONE;
                    336:                        break;
                    337:                default:
                    338:                        outmode = OUTMODE_LST;
                    339:                        break;
1.282     schwarze  340:                }
                    341:        }
                    342:
                    343:        if (oarg != NULL) {
                    344:                if (outmode == OUTMODE_LST)
                    345:                        search.outkey = oarg;
                    346:                else {
                    347:                        while (oarg != NULL) {
                    348:                                if (manconf_output(&conf.output,
1.327     schwarze  349:                                    strsep(&oarg, ","), 0) == -1)
1.329     schwarze  350:                                        return mandoc_msg_getrc();
1.282     schwarze  351:                        }
1.181     schwarze  352:                }
                    353:        }
                    354:
1.335     schwarze  355:        if (outst.outtype != OUTT_TREE || conf.output.noval == 0)
1.315     schwarze  356:                options |= MPARSE_VALIDATE;
                    357:
1.246     schwarze  358:        if (outmode == OUTMODE_FLN ||
                    359:            outmode == OUTMODE_LST ||
                    360:            !isatty(STDOUT_FILENO))
1.336     schwarze  361:                outst.use_pager = 0;
1.304     schwarze  362:
1.336     schwarze  363:        if (outst.use_pager &&
1.304     schwarze  364:            (conf.output.width == 0 || conf.output.indent == 0) &&
1.306     schwarze  365:            ioctl(STDOUT_FILENO, TIOCGWINSZ, &ws) != -1 &&
                    366:            ws.ws_col > 1) {
1.304     schwarze  367:                if (conf.output.width == 0 && ws.ws_col < 79)
                    368:                        conf.output.width = ws.ws_col - 1;
                    369:                if (conf.output.indent == 0 && ws.ws_col < 66)
                    370:                        conf.output.indent = 3;
                    371:        }
1.246     schwarze  372:
1.255     schwarze  373: #if HAVE_PLEDGE
1.336     schwarze  374:        if (outst.use_pager == 0) {
1.329     schwarze  375:                if (pledge("stdio rpath", NULL) == -1) {
                    376:                        mandoc_msg(MANDOCERR_PLEDGE, 0, 0,
                    377:                            "%s", strerror(errno));
                    378:                        return mandoc_msg_getrc();
                    379:                }
                    380:        }
1.255     schwarze  381: #endif
                    382:
1.185     schwarze  383:        /* Parse arguments. */
                    384:
1.219     schwarze  385:        if (argc > 0) {
                    386:                argc -= optind;
                    387:                argv += optind;
                    388:        }
1.185     schwarze  389:
1.202     schwarze  390:        /*
1.338     schwarze  391:         * Quirks for help(1) and man(1),
                    392:         * in particular for a section argument without -s.
1.202     schwarze  393:         */
                    394:
                    395:        if (search.argmode == ARG_NAME) {
1.254     schwarze  396:                if (*progname == 'h') {
1.202     schwarze  397:                        if (argc == 0) {
                    398:                                argv = help_argv;
                    399:                                argc = 1;
                    400:                        }
1.211     schwarze  401:                } else if (argc > 1 &&
1.223     kristaps  402:                    ((uc = (unsigned char *)argv[0]) != NULL) &&
1.207     schwarze  403:                    ((isdigit(uc[0]) && (uc[1] == '\0' ||
1.324     schwarze  404:                      isalpha(uc[1]))) ||
1.207     schwarze  405:                     (uc[0] == 'n' && uc[1] == '\0'))) {
1.223     kristaps  406:                        search.sec = (char *)uc;
1.202     schwarze  407:                        argv++;
                    408:                        argc--;
                    409:                }
1.216     schwarze  410:                if (search.arch == NULL)
                    411:                        search.arch = getenv("MACHINE");
1.223     kristaps  412: #ifdef MACHINE
1.216     schwarze  413:                if (search.arch == NULL)
                    414:                        search.arch = MACHINE;
1.223     kristaps  415: #endif
1.338     schwarze  416:                if (outmode == OUTMODE_ONE)
                    417:                        search.firstmatch = 1;
1.185     schwarze  418:        }
1.182     schwarze  419:
1.316     schwarze  420:        /*
                    421:         * Use the first argument for -O tag in addition to
                    422:         * using it as a search term for man(1) or apropos(1).
                    423:         */
                    424:
                    425:        if (conf.output.tag != NULL && *conf.output.tag == '\0') {
                    426:                tagarg = argc > 0 && search.argmode == ARG_EXPR ?
                    427:                    strchr(*argv, '=') : NULL;
                    428:                conf.output.tag = tagarg == NULL ? *argv : tagarg + 1;
                    429:        }
                    430:
1.338     schwarze  431:        /* Read the configuration file. */
1.180     schwarze  432:
1.338     schwarze  433:        if (search.argmode != ARG_FILE)
                    434:                manconf_parse(&conf, conf_file, defpaths, auxpaths);
1.182     schwarze  435:
1.338     schwarze  436:        /* man(1): Resolve each name individually. */
1.182     schwarze  437:
1.338     schwarze  438:        if (search.argmode == ARG_NAME) {
                    439:                if (argc < 1)
                    440:                        usage(ARG_NAME);
                    441:                for (res = NULL, ressz = 0; argc > 0; argc--, argv++) {
                    442:                        (void)mansearch(&search, &conf.manpath,
                    443:                            1, argv, &resn, &resnsz);
                    444:                        if (resnsz == 0)
                    445:                                (void)fs_search(&search, &conf.manpath,
                    446:                                    1, argv, &resn, &resnsz);
                    447:                        if (resnsz == 0) {
                    448:                                if (strchr(*argv, '/') == NULL) {
                    449:                                        mandoc_msg_setrc(MANDOCLEVEL_BADARG);
1.305     schwarze  450:                                        continue;
1.338     schwarze  451:                                }
                    452:                                if (access(*argv, R_OK) == -1) {
                    453:                                        mandoc_msg_setinfilename(*argv);
1.329     schwarze  454:                                        mandoc_msg(MANDOCERR_BADARG_BAD,
                    455:                                            0, 0, "%s", strerror(errno));
                    456:                                        mandoc_msg_setinfilename(NULL);
1.305     schwarze  457:                                        continue;
                    458:                                }
1.338     schwarze  459:                                resnsz = 1;
                    460:                                resn = mandoc_calloc(resnsz, sizeof(*res));
                    461:                                resn->file = mandoc_strdup(*argv);
                    462:                                resn->ipath = SIZE_MAX;
                    463:                                resn->form = FORM_SRC;
                    464:                        }
                    465:                        if (outmode != OUTMODE_ONE || resnsz == 1) {
1.305     schwarze  466:                                res = mandoc_reallocarray(res,
1.338     schwarze  467:                                    ressz + resnsz, sizeof(*res));
                    468:                                memcpy(res + ressz, resn,
                    469:                                    sizeof(*resn) * resnsz);
                    470:                                ressz += resnsz;
                    471:                                continue;
1.305     schwarze  472:                        }
1.187     schwarze  473:
1.338     schwarze  474:                        /* Search for the best section. */
1.182     schwarze  475:
1.325     schwarze  476:                        best_prio = 40;
1.338     schwarze  477:                        for (ib = i = 0; i < resnsz; i++) {
                    478:                                sec = resn[i].file;
1.264     schwarze  479:                                sec += strcspn(sec, "123456789");
                    480:                                if (sec[0] == '\0')
1.325     schwarze  481:                                        continue; /* No section at all. */
1.264     schwarze  482:                                prio = sec_prios[sec[0] - '1'];
1.325     schwarze  483:                                if (search.sec != NULL) {
                    484:                                        ssz = strlen(search.sec);
                    485:                                        if (strncmp(sec, search.sec, ssz) == 0)
                    486:                                                sec += ssz;
                    487:                                } else
                    488:                                        sec++; /* Prefer without suffix. */
                    489:                                if (*sec != '/')
                    490:                                        prio += 10; /* Wrong dir name. */
                    491:                                if (search.sec != NULL &&
                    492:                                    (strlen(sec) <= ssz  + 3 ||
                    493:                                     strcmp(sec + strlen(sec) - ssz,
                    494:                                      search.sec) != 0))
                    495:                                        prio += 20; /* Wrong file ext. */
1.182     schwarze  496:                                if (prio >= best_prio)
                    497:                                        continue;
                    498:                                best_prio = prio;
1.338     schwarze  499:                                ib = i;
1.182     schwarze  500:                        }
1.338     schwarze  501:                        res = mandoc_reallocarray(res, ressz + 1,
                    502:                            sizeof(*res));
                    503:                        memcpy(res + ressz++, resn + ib, sizeof(*resn));
1.181     schwarze  504:                }
1.182     schwarze  505:
1.338     schwarze  506:        /* apropos(1), whatis(1): Process the full search expression. */
                    507:
                    508:        } else if (search.argmode != ARG_FILE) {
                    509:                if (mansearch(&search, &conf.manpath,
                    510:                    argc, argv, &res, &ressz) == 0)
                    511:                        usage(search.argmode);
1.182     schwarze  512:
1.338     schwarze  513:                if (ressz == 0) {
                    514:                        warnx("nothing appropriate");
                    515:                        mandoc_msg_setrc(MANDOCLEVEL_BADARG);
1.182     schwarze  516:                        goto out;
1.338     schwarze  517:                }
                    518:
                    519:        /* mandoc(1): Take command line arguments as file names. */
                    520:
1.337     schwarze  521:        } else {
1.338     schwarze  522:                ressz = argc > 0 ? argc : 1;
                    523:                res = mandoc_calloc(ressz, sizeof(*res));
                    524:                for (i = 0; i < ressz; i++) {
1.337     schwarze  525:                        if (argc > 0)
                    526:                                res[i].file = mandoc_strdup(argv[i]);
                    527:                        res[i].ipath = SIZE_MAX;
                    528:                        res[i].form = FORM_SRC;
                    529:                }
1.180     schwarze  530:        }
                    531:
1.338     schwarze  532:        switch (outmode) {
                    533:        case OUTMODE_FLN:
                    534:                for (i = 0; i < ressz; i++)
                    535:                        puts(res[i].file);
                    536:                goto out;
                    537:        case OUTMODE_LST:
                    538:                for (i = 0; i < ressz; i++)
                    539:                        printf("%s - %s\n", res[i].names,
                    540:                            res[i].output == NULL ? "" :
                    541:                            res[i].output);
                    542:                goto out;
                    543:        default:
                    544:                break;
                    545:        }
1.255     schwarze  546:
1.329     schwarze  547:        if (search.argmode == ARG_FILE && auxpaths != NULL) {
                    548:                if (strcmp(auxpaths, "doc") == 0)
                    549:                        options |= MPARSE_MDOC;
                    550:                else if (strcmp(auxpaths, "an") == 0)
                    551:                        options |= MPARSE_MAN;
                    552:        }
1.241     schwarze  553:
1.249     schwarze  554:        mchars_alloc();
1.334     schwarze  555:        mp = mparse_alloc(options, os_e, os_s);
1.154     kristaps  556:
1.305     schwarze  557:        /*
                    558:         * Remember the original working directory, if possible.
                    559:         * This will be needed if some names on the command line
                    560:         * are page names and some are relative file names.
                    561:         * Do not error out if the current directory is not
                    562:         * readable: Maybe it won't be needed after all.
                    563:         */
                    564:        startdir = open(".", O_RDONLY | O_DIRECTORY);
                    565:
1.338     schwarze  566:        for (i = 0; i < ressz; i++) {
                    567:                process_onefile(mp, res + i, startdir, &outst, &conf);
1.335     schwarze  568:                if (outst.wstop && mandoc_msg_getrc() != MANDOCLEVEL_OK)
1.64      kristaps  569:                        break;
1.1       kristaps  570:        }
1.305     schwarze  571:        if (startdir != -1) {
                    572:                (void)fchdir(startdir);
                    573:                close(startdir);
                    574:        }
1.1       kristaps  575:
1.335     schwarze  576:        if (outst.outdata != NULL) {
                    577:                switch (outst.outtype) {
1.252     schwarze  578:                case OUTT_HTML:
1.335     schwarze  579:                        html_free(outst.outdata);
1.252     schwarze  580:                        break;
                    581:                case OUTT_UTF8:
                    582:                case OUTT_LOCALE:
                    583:                case OUTT_ASCII:
1.335     schwarze  584:                        ascii_free(outst.outdata);
1.252     schwarze  585:                        break;
                    586:                case OUTT_PDF:
                    587:                case OUTT_PS:
1.335     schwarze  588:                        pspdf_free(outst.outdata);
1.252     schwarze  589:                        break;
                    590:                default:
                    591:                        break;
                    592:                }
1.250     schwarze  593:        }
1.294     schwarze  594:        mandoc_xr_free();
1.334     schwarze  595:        mparse_free(mp);
1.249     schwarze  596:        mchars_free();
1.182     schwarze  597:
                    598: out:
1.338     schwarze  599:        mansearch_free(res, ressz);
1.337     schwarze  600:        if (search.argmode != ARG_FILE)
1.229     schwarze  601:                manconf_free(&conf);
1.1       kristaps  602:
1.336     schwarze  603:        if (outst.tag_files != NULL) {
1.225     schwarze  604:                fclose(stdout);
1.239     schwarze  605:                tag_write();
1.336     schwarze  606:                run_pager(outst.tag_files);
1.239     schwarze  607:                tag_unlink();
1.337     schwarze  608:        } else if (outst.had_output && outst.outtype != OUTT_LINT)
1.330     schwarze  609:                mandoc_msg_summary();
                    610:
1.312     schwarze  611:        return (int)mandoc_msg_getrc();
1.1       kristaps  612: }
                    613:
1.55      kristaps  614: static void
1.180     schwarze  615: usage(enum argmode argmode)
1.1       kristaps  616: {
1.180     schwarze  617:        switch (argmode) {
                    618:        case ARG_FILE:
1.287     schwarze  619:                fputs("usage: mandoc [-ac] [-I os=name] "
                    620:                    "[-K encoding] [-mdoc | -man] [-O options]\n"
1.228     schwarze  621:                    "\t      [-T output] [-W level] [file ...]\n", stderr);
1.180     schwarze  622:                break;
                    623:        case ARG_NAME:
1.287     schwarze  624:                fputs("usage: man [-acfhklw] [-C file] [-M path] "
                    625:                    "[-m path] [-S subsection]\n"
                    626:                    "\t   [[-s] section] name ...\n", stderr);
1.180     schwarze  627:                break;
                    628:        case ARG_WORD:
1.287     schwarze  629:                fputs("usage: whatis [-afk] [-C file] "
1.188     schwarze  630:                    "[-M path] [-m path] [-O outkey] [-S arch]\n"
                    631:                    "\t      [-s section] name ...\n", stderr);
1.180     schwarze  632:                break;
                    633:        case ARG_EXPR:
1.287     schwarze  634:                fputs("usage: apropos [-afk] [-C file] "
1.188     schwarze  635:                    "[-M path] [-m path] [-O outkey] [-S arch]\n"
1.180     schwarze  636:                    "\t       [-s section] expression ...\n", stderr);
                    637:                break;
                    638:        }
1.105     kristaps  639:        exit((int)MANDOCLEVEL_BADARG);
1.68      joerg     640: }
1.213     schwarze  641:
                    642: static int
                    643: fs_lookup(const struct manpaths *paths, size_t ipath,
                    644:        const char *sec, const char *arch, const char *name,
                    645:        struct manpage **res, size_t *ressz)
                    646: {
1.326     schwarze  647:        struct stat      sb;
1.222     schwarze  648:        glob_t           globinfo;
1.213     schwarze  649:        struct manpage  *page;
                    650:        char            *file;
1.274     schwarze  651:        int              globres;
                    652:        enum form        form;
1.213     schwarze  653:
1.222     schwarze  654:        form = FORM_SRC;
1.213     schwarze  655:        mandoc_asprintf(&file, "%s/man%s/%s.%s",
                    656:            paths->paths[ipath], sec, name, sec);
1.326     schwarze  657:        if (stat(file, &sb) != -1)
1.213     schwarze  658:                goto found;
                    659:        free(file);
                    660:
                    661:        mandoc_asprintf(&file, "%s/cat%s/%s.0",
                    662:            paths->paths[ipath], sec, name);
1.326     schwarze  663:        if (stat(file, &sb) != -1) {
1.213     schwarze  664:                form = FORM_CAT;
                    665:                goto found;
                    666:        }
                    667:        free(file);
                    668:
                    669:        if (arch != NULL) {
                    670:                mandoc_asprintf(&file, "%s/man%s/%s/%s.%s",
                    671:                    paths->paths[ipath], sec, arch, name, sec);
1.326     schwarze  672:                if (stat(file, &sb) != -1)
1.213     schwarze  673:                        goto found;
                    674:                free(file);
                    675:        }
1.222     schwarze  676:
1.240     schwarze  677:        mandoc_asprintf(&file, "%s/man%s/%s.[01-9]*",
1.222     schwarze  678:            paths->paths[ipath], sec, name);
                    679:        globres = glob(file, 0, NULL, &globinfo);
                    680:        if (globres != 0 && globres != GLOB_NOMATCH)
1.329     schwarze  681:                mandoc_msg(MANDOCERR_GLOB, 0, 0,
                    682:                    "%s: %s", file, strerror(errno));
1.222     schwarze  683:        free(file);
                    684:        if (globres == 0)
                    685:                file = mandoc_strdup(*globinfo.gl_pathv);
                    686:        globfree(&globinfo);
1.326     schwarze  687:        if (globres == 0) {
                    688:                if (stat(file, &sb) != -1)
                    689:                        goto found;
                    690:                free(file);
                    691:        }
1.296     schwarze  692:        if (res != NULL || ipath + 1 != paths->sz)
1.329     schwarze  693:                return -1;
1.213     schwarze  694:
1.296     schwarze  695:        mandoc_asprintf(&file, "%s.%s", name, sec);
1.326     schwarze  696:        globres = stat(file, &sb);
1.296     schwarze  697:        free(file);
1.329     schwarze  698:        return globres;
1.296     schwarze  699:
1.213     schwarze  700: found:
1.266     schwarze  701:        warnx("outdated mandoc.db lacks %s(%s) entry, run %s %s",
                    702:            name, sec, BINM_MAKEWHATIS, paths->paths[ipath]);
1.296     schwarze  703:        if (res == NULL) {
                    704:                free(file);
1.329     schwarze  705:                return 0;
1.296     schwarze  706:        }
1.329     schwarze  707:        *res = mandoc_reallocarray(*res, ++*ressz, sizeof(**res));
1.213     schwarze  708:        page = *res + (*ressz - 1);
                    709:        page->file = file;
                    710:        page->names = NULL;
                    711:        page->output = NULL;
1.323     schwarze  712:        page->bits = NAME_FILE & NAME_MASK;
1.213     schwarze  713:        page->ipath = ipath;
                    714:        page->sec = (*sec >= '1' && *sec <= '9') ? *sec - '1' + 1 : 10;
                    715:        page->form = form;
1.329     schwarze  716:        return 0;
1.213     schwarze  717: }
                    718:
1.295     schwarze  719: static int
1.213     schwarze  720: fs_search(const struct mansearch *cfg, const struct manpaths *paths,
                    721:        int argc, char **argv, struct manpage **res, size_t *ressz)
                    722: {
                    723:        const char *const sections[] =
1.264     schwarze  724:            {"1", "8", "6", "2", "3", "5", "7", "4", "9", "3p"};
1.213     schwarze  725:        const size_t nsec = sizeof(sections)/sizeof(sections[0]);
                    726:
                    727:        size_t           ipath, isec, lastsz;
                    728:
                    729:        assert(cfg->argmode == ARG_NAME);
                    730:
1.295     schwarze  731:        if (res != NULL)
                    732:                *res = NULL;
1.213     schwarze  733:        *ressz = lastsz = 0;
                    734:        while (argc) {
                    735:                for (ipath = 0; ipath < paths->sz; ipath++) {
                    736:                        if (cfg->sec != NULL) {
                    737:                                if (fs_lookup(paths, ipath, cfg->sec,
1.329     schwarze  738:                                    cfg->arch, *argv, res, ressz) != -1 &&
1.213     schwarze  739:                                    cfg->firstmatch)
1.329     schwarze  740:                                        return 0;
1.213     schwarze  741:                        } else for (isec = 0; isec < nsec; isec++)
                    742:                                if (fs_lookup(paths, ipath, sections[isec],
1.329     schwarze  743:                                    cfg->arch, *argv, res, ressz) != -1 &&
1.213     schwarze  744:                                    cfg->firstmatch)
1.329     schwarze  745:                                        return 0;
1.213     schwarze  746:                }
1.305     schwarze  747:                if (res != NULL && *ressz == lastsz &&
1.307     schwarze  748:                    strchr(*argv, '/') == NULL) {
1.320     schwarze  749:                        if (cfg->arch != NULL &&
                    750:                            arch_valid(cfg->arch, OSENUM) == 0)
                    751:                                warnx("Unknown architecture \"%s\".",
                    752:                                    cfg->arch);
                    753:                        else if (cfg->sec == NULL)
1.307     schwarze  754:                                warnx("No entry for %s in the manual.",
                    755:                                    *argv);
                    756:                        else
                    757:                                warnx("No entry for %s in section %s "
                    758:                                    "of the manual.", *argv, cfg->sec);
                    759:                }
1.213     schwarze  760:                lastsz = *ressz;
                    761:                argv++;
                    762:                argc--;
                    763:        }
1.329     schwarze  764:        return -1;
1.213     schwarze  765: }
1.68      joerg     766:
1.64      kristaps  767: static void
1.337     schwarze  768: process_onefile(struct mparse *mp, struct manpage *resp, int startdir,
                    769:     struct outstate *outst, struct manconf *conf)
                    770: {
                    771:        int      fd;
                    772:
                    773:        /*
                    774:         * Changing directories is not needed in ARG_FILE mode.
                    775:         * Do it on a best-effort basis.  Even in case of
                    776:         * failure, some functionality may still work.
                    777:         */
                    778:        if (resp->ipath != SIZE_MAX)
                    779:                (void)chdir(conf->manpath.paths[resp->ipath]);
                    780:        else if (startdir != -1)
                    781:                (void)fchdir(startdir);
                    782:
                    783:        mandoc_msg_setinfilename(resp->file);
                    784:        if (resp->file != NULL) {
                    785:                if ((fd = mparse_open(mp, resp->file)) == -1) {
                    786:                        mandoc_msg(resp->ipath == SIZE_MAX ?
                    787:                            MANDOCERR_BADARG_BAD : MANDOCERR_OPEN,
                    788:                            0, 0, "%s", strerror(errno));
                    789:                        mandoc_msg_setinfilename(NULL);
                    790:                        return;
                    791:                }
                    792:        } else
                    793:                fd = STDIN_FILENO;
                    794:
                    795:        if (outst->use_pager) {
                    796:                outst->use_pager = 0;
                    797:                outst->tag_files = tag_init(conf->output.tag);
                    798:        }
                    799:
                    800:        if (outst->had_output && outst->outtype <= OUTT_UTF8) {
                    801:                if (outst->outdata == NULL)
                    802:                        outdata_alloc(outst, &conf->output);
                    803:                terminal_sepline(outst->outdata);
                    804:        }
                    805:
                    806:        if (resp->form == FORM_SRC)
                    807:                parse(mp, fd, resp->file, outst, &conf->output);
                    808:        else {
                    809:                passthrough(fd, conf->output.synopsisonly);
                    810:                outst->had_output = 1;
                    811:        }
                    812:
                    813:        if (ferror(stdout)) {
                    814:                if (outst->tag_files != NULL) {
                    815:                        mandoc_msg(MANDOCERR_WRITE, 0, 0, "%s: %s",
                    816:                            outst->tag_files->ofn, strerror(errno));
                    817:                        tag_unlink();
                    818:                        outst->tag_files = NULL;
                    819:                } else
                    820:                        mandoc_msg(MANDOCERR_WRITE, 0, 0, "%s",
                    821:                            strerror(errno));
                    822:        }
                    823:        mandoc_msg_setinfilename(NULL);
                    824: }
                    825:
                    826: static void
1.335     schwarze  827: parse(struct mparse *mp, int fd, const char *file,
                    828:     struct outstate *outst, struct manoutput *outconf)
1.1       kristaps  829: {
1.337     schwarze  830:        static int               previous;
                    831:        struct roff_meta        *meta;
1.112     kristaps  832:
1.337     schwarze  833:        assert(fd >= 0);
                    834:        if (file == NULL)
                    835:                file = "<stdin>";
1.112     kristaps  836:
1.337     schwarze  837:        if (previous)
                    838:                mparse_reset(mp);
                    839:        else
                    840:                previous = 1;
1.112     kristaps  841:
1.334     schwarze  842:        mparse_readfd(mp, fd, file);
1.261     schwarze  843:        if (fd != STDIN_FILENO)
                    844:                close(fd);
1.112     kristaps  845:
1.1       kristaps  846:        /*
1.154     kristaps  847:         * With -Wstop and warnings or errors of at least the requested
                    848:         * level, do not produce output.
1.1       kristaps  849:         */
                    850:
1.335     schwarze  851:        if (outst->wstop && mandoc_msg_getrc() != MANDOCLEVEL_OK)
1.227     schwarze  852:                return;
1.111     kristaps  853:
1.335     schwarze  854:        if (outst->outdata == NULL)
                    855:                outdata_alloc(outst, outconf);
                    856:        else if (outst->outtype == OUTT_HTML)
                    857:                html_reset(outst);
1.111     kristaps  858:
1.315     schwarze  859:        mandoc_xr_reset();
1.334     schwarze  860:        meta = mparse_result(mp);
1.250     schwarze  861:
                    862:        /* Execute the out device, if it exists. */
                    863:
1.337     schwarze  864:        outst->had_output = 1;
1.315     schwarze  865:        if (meta->macroset == MACROSET_MDOC) {
1.335     schwarze  866:                switch (outst->outtype) {
1.173     schwarze  867:                case OUTT_HTML:
1.335     schwarze  868:                        html_mdoc(outst->outdata, meta);
1.111     kristaps  869:                        break;
1.173     schwarze  870:                case OUTT_TREE:
1.335     schwarze  871:                        tree_mdoc(outst->outdata, meta);
1.111     kristaps  872:                        break;
1.173     schwarze  873:                case OUTT_MAN:
1.335     schwarze  874:                        man_mdoc(outst->outdata, meta);
1.164     schwarze  875:                        break;
1.173     schwarze  876:                case OUTT_PDF:
                    877:                case OUTT_ASCII:
                    878:                case OUTT_UTF8:
                    879:                case OUTT_LOCALE:
                    880:                case OUTT_PS:
1.335     schwarze  881:                        terminal_mdoc(outst->outdata, meta);
1.250     schwarze  882:                        break;
1.285     schwarze  883:                case OUTT_MARKDOWN:
1.335     schwarze  884:                        markdown_mdoc(outst->outdata, meta);
1.285     schwarze  885:                        break;
1.250     schwarze  886:                default:
                    887:                        break;
                    888:                }
                    889:        }
1.315     schwarze  890:        if (meta->macroset == MACROSET_MAN) {
1.335     schwarze  891:                switch (outst->outtype) {
1.250     schwarze  892:                case OUTT_HTML:
1.335     schwarze  893:                        html_man(outst->outdata, meta);
1.250     schwarze  894:                        break;
                    895:                case OUTT_TREE:
1.335     schwarze  896:                        tree_man(outst->outdata, meta);
1.250     schwarze  897:                        break;
                    898:                case OUTT_MAN:
1.334     schwarze  899:                        mparse_copy(mp);
1.250     schwarze  900:                        break;
                    901:                case OUTT_PDF:
                    902:                case OUTT_ASCII:
                    903:                case OUTT_UTF8:
                    904:                case OUTT_LOCALE:
                    905:                case OUTT_PS:
1.335     schwarze  906:                        terminal_man(outst->outdata, meta);
1.111     kristaps  907:                        break;
                    908:                default:
                    909:                        break;
                    910:                }
1.276     schwarze  911:        }
1.312     schwarze  912:        if (mandoc_msg_getmin() < MANDOCERR_STYLE)
                    913:                check_xr();
1.294     schwarze  914: }
                    915:
                    916: static void
1.312     schwarze  917: check_xr(void)
1.294     schwarze  918: {
                    919:        static struct manpaths   paths;
                    920:        struct mansearch         search;
                    921:        struct mandoc_xr        *xr;
                    922:        size_t                   sz;
                    923:
                    924:        if (paths.sz == 0)
                    925:                manpath_base(&paths);
                    926:
                    927:        for (xr = mandoc_xr_get(); xr != NULL; xr = xr->next) {
1.297     schwarze  928:                if (xr->line == -1)
                    929:                        continue;
1.294     schwarze  930:                search.arch = NULL;
                    931:                search.sec = xr->sec;
                    932:                search.outkey = NULL;
                    933:                search.argmode = ARG_NAME;
                    934:                search.firstmatch = 1;
                    935:                if (mansearch(&search, &paths, 1, &xr->name, NULL, &sz))
1.295     schwarze  936:                        continue;
1.329     schwarze  937:                if (fs_search(&search, &paths, 1, &xr->name, NULL, &sz) != -1)
1.294     schwarze  938:                        continue;
1.298     schwarze  939:                if (xr->count == 1)
1.313     schwarze  940:                        mandoc_msg(MANDOCERR_XR_BAD, xr->line,
                    941:                            xr->pos + 1, "Xr %s %s", xr->name, xr->sec);
1.298     schwarze  942:                else
1.313     schwarze  943:                        mandoc_msg(MANDOCERR_XR_BAD, xr->line,
                    944:                            xr->pos + 1, "Xr %s %s (%d times)",
1.298     schwarze  945:                            xr->name, xr->sec, xr->count);
1.294     schwarze  946:        }
1.276     schwarze  947: }
                    948:
                    949: static void
1.335     schwarze  950: outdata_alloc(struct outstate *outst, struct manoutput *outconf)
1.276     schwarze  951: {
1.335     schwarze  952:        switch (outst->outtype) {
1.276     schwarze  953:        case OUTT_HTML:
1.335     schwarze  954:                outst->outdata = html_alloc(outconf);
1.276     schwarze  955:                break;
                    956:        case OUTT_UTF8:
1.335     schwarze  957:                outst->outdata = utf8_alloc(outconf);
1.276     schwarze  958:                break;
                    959:        case OUTT_LOCALE:
1.335     schwarze  960:                outst->outdata = locale_alloc(outconf);
1.276     schwarze  961:                break;
                    962:        case OUTT_ASCII:
1.335     schwarze  963:                outst->outdata = ascii_alloc(outconf);
1.276     schwarze  964:                break;
                    965:        case OUTT_PDF:
1.335     schwarze  966:                outst->outdata = pdf_alloc(outconf);
1.276     schwarze  967:                break;
                    968:        case OUTT_PS:
1.335     schwarze  969:                outst->outdata = ps_alloc(outconf);
1.276     schwarze  970:                break;
                    971:        default:
                    972:                break;
1.111     kristaps  973:        }
1.186     schwarze  974: }
                    975:
1.227     schwarze  976: static void
1.329     schwarze  977: passthrough(int fd, int synopsis_only)
1.186     schwarze  978: {
1.197     schwarze  979:        const char       synb[] = "S\bSY\bYN\bNO\bOP\bPS\bSI\bIS\bS";
                    980:        const char       synr[] = "SYNOPSIS";
                    981:
                    982:        FILE            *stream;
1.257     schwarze  983:        char            *line, *cp;
                    984:        size_t           linesz;
1.277     schwarze  985:        ssize_t          len, written;
1.329     schwarze  986:        int              lno, print;
1.210     schwarze  987:
1.329     schwarze  988:        stream = NULL;
1.257     schwarze  989:        line = NULL;
                    990:        linesz = 0;
1.197     schwarze  991:
1.277     schwarze  992:        if (fflush(stdout) == EOF) {
1.329     schwarze  993:                mandoc_msg(MANDOCERR_FFLUSH, 0, 0, "%s", strerror(errno));
                    994:                goto done;
1.277     schwarze  995:        }
1.197     schwarze  996:        if ((stream = fdopen(fd, "r")) == NULL) {
                    997:                close(fd);
1.329     schwarze  998:                mandoc_msg(MANDOCERR_FDOPEN, 0, 0, "%s", strerror(errno));
                    999:                goto done;
1.197     schwarze 1000:        }
1.186     schwarze 1001:
1.329     schwarze 1002:        lno = print = 0;
1.277     schwarze 1003:        while ((len = getline(&line, &linesz, stream)) != -1) {
1.329     schwarze 1004:                lno++;
1.257     schwarze 1005:                cp = line;
1.197     schwarze 1006:                if (synopsis_only) {
                   1007:                        if (print) {
1.257     schwarze 1008:                                if ( ! isspace((unsigned char)*cp))
1.197     schwarze 1009:                                        goto done;
1.277     schwarze 1010:                                while (isspace((unsigned char)*cp)) {
1.257     schwarze 1011:                                        cp++;
1.277     schwarze 1012:                                        len--;
                   1013:                                }
1.197     schwarze 1014:                        } else {
1.257     schwarze 1015:                                if (strcmp(cp, synb) == 0 ||
                   1016:                                    strcmp(cp, synr) == 0)
1.197     schwarze 1017:                                        print = 1;
                   1018:                                continue;
                   1019:                        }
                   1020:                }
1.277     schwarze 1021:                for (; len > 0; len -= written) {
1.329     schwarze 1022:                        if ((written = write(STDOUT_FILENO, cp, len)) == -1) {
                   1023:                                mandoc_msg(MANDOCERR_WRITE, 0, 0,
                   1024:                                    "%s", strerror(errno));
                   1025:                                goto done;
                   1026:                        }
1.257     schwarze 1027:                }
1.197     schwarze 1028:        }
1.329     schwarze 1029:        if (ferror(stream))
                   1030:                mandoc_msg(MANDOCERR_GETLINE, lno, 0, "%s", strerror(errno));
1.193     schwarze 1031:
1.197     schwarze 1032: done:
1.257     schwarze 1033:        free(line);
1.329     schwarze 1034:        if (stream != NULL)
                   1035:                fclose(stream);
1.1       kristaps 1036: }
                   1037:
                   1038: static int
1.334     schwarze 1039: woptions(char *arg, enum mandoc_os *os_e, int *wstop)
1.1       kristaps 1040: {
1.34      kristaps 1041:        char            *v, *o;
1.293     schwarze 1042:        const char      *toks[11];
1.1       kristaps 1043:
1.103     schwarze 1044:        toks[0] = "stop";
                   1045:        toks[1] = "all";
1.293     schwarze 1046:        toks[2] = "base";
                   1047:        toks[3] = "style";
                   1048:        toks[4] = "warning";
                   1049:        toks[5] = "error";
                   1050:        toks[6] = "unsupp";
                   1051:        toks[7] = "fatal";
                   1052:        toks[8] = "openbsd";
                   1053:        toks[9] = "netbsd";
                   1054:        toks[10] = NULL;
1.1       kristaps 1055:
1.34      kristaps 1056:        while (*arg) {
                   1057:                o = arg;
1.272     schwarze 1058:                switch (getsubopt(&arg, (char * const *)toks, &v)) {
1.173     schwarze 1059:                case 0:
1.334     schwarze 1060:                        *wstop = 1;
1.1       kristaps 1061:                        break;
1.173     schwarze 1062:                case 1:
                   1063:                case 2:
1.312     schwarze 1064:                        mandoc_msg_setmin(MANDOCERR_BASE);
1.290     schwarze 1065:                        break;
                   1066:                case 3:
1.312     schwarze 1067:                        mandoc_msg_setmin(MANDOCERR_STYLE);
1.1       kristaps 1068:                        break;
1.290     schwarze 1069:                case 4:
1.312     schwarze 1070:                        mandoc_msg_setmin(MANDOCERR_WARNING);
1.24      kristaps 1071:                        break;
1.290     schwarze 1072:                case 5:
1.312     schwarze 1073:                        mandoc_msg_setmin(MANDOCERR_ERROR);
1.217     schwarze 1074:                        break;
1.290     schwarze 1075:                case 6:
1.312     schwarze 1076:                        mandoc_msg_setmin(MANDOCERR_UNSUPP);
1.293     schwarze 1077:                        break;
                   1078:                case 7:
1.329     schwarze 1079:                        mandoc_msg_setmin(MANDOCERR_BADARG);
1.293     schwarze 1080:                        break;
                   1081:                case 8:
1.312     schwarze 1082:                        mandoc_msg_setmin(MANDOCERR_BASE);
1.334     schwarze 1083:                        *os_e = MANDOC_OS_OPENBSD;
1.293     schwarze 1084:                        break;
                   1085:                case 9:
1.312     schwarze 1086:                        mandoc_msg_setmin(MANDOCERR_BASE);
1.334     schwarze 1087:                        *os_e = MANDOC_OS_NETBSD;
1.50      kristaps 1088:                        break;
1.1       kristaps 1089:                default:
1.329     schwarze 1090:                        mandoc_msg(MANDOCERR_BADARG_BAD, 0, 0, "-W %s", o);
                   1091:                        return -1;
1.1       kristaps 1092:                }
1.34      kristaps 1093:        }
1.329     schwarze 1094:        return 0;
1.333     schwarze 1095: }
                   1096:
                   1097: /*
                   1098:  * Wait until moved to the foreground,
                   1099:  * then fork the pager and wait for the user to close it.
                   1100:  */
                   1101: static void
                   1102: run_pager(struct tag_files *tag_files)
                   1103: {
                   1104:        int      signum, status;
                   1105:        pid_t    man_pgid, tc_pgid;
                   1106:        pid_t    pager_pid, wait_pid;
                   1107:
                   1108:        man_pgid = getpgid(0);
                   1109:        tag_files->tcpgid = man_pgid == getpid() ? getpgid(getppid()) :
                   1110:            man_pgid;
                   1111:        pager_pid = 0;
                   1112:        signum = SIGSTOP;
                   1113:
                   1114:        for (;;) {
                   1115:                /* Stop here until moved to the foreground. */
                   1116:
                   1117:                tc_pgid = tcgetpgrp(tag_files->ofd);
                   1118:                if (tc_pgid != man_pgid) {
                   1119:                        if (tc_pgid == pager_pid) {
                   1120:                                (void)tcsetpgrp(tag_files->ofd, man_pgid);
                   1121:                                if (signum == SIGTTIN)
                   1122:                                        continue;
                   1123:                        } else
                   1124:                                tag_files->tcpgid = tc_pgid;
                   1125:                        kill(0, signum);
                   1126:                        continue;
                   1127:                }
                   1128:
                   1129:                /* Once in the foreground, activate the pager. */
                   1130:
                   1131:                if (pager_pid) {
                   1132:                        (void)tcsetpgrp(tag_files->ofd, pager_pid);
                   1133:                        kill(pager_pid, SIGCONT);
                   1134:                } else
                   1135:                        pager_pid = spawn_pager(tag_files);
                   1136:
                   1137:                /* Wait for the pager to stop or exit. */
                   1138:
                   1139:                while ((wait_pid = waitpid(pager_pid, &status,
                   1140:                    WUNTRACED)) == -1 && errno == EINTR)
                   1141:                        continue;
                   1142:
                   1143:                if (wait_pid == -1) {
                   1144:                        mandoc_msg(MANDOCERR_WAIT, 0, 0,
                   1145:                            "%s", strerror(errno));
                   1146:                        break;
                   1147:                }
                   1148:                if (!WIFSTOPPED(status))
                   1149:                        break;
                   1150:
                   1151:                signum = WSTOPSIG(status);
                   1152:        }
1.183     schwarze 1153: }
                   1154:
1.225     schwarze 1155: static pid_t
1.244     schwarze 1156: spawn_pager(struct tag_files *tag_files)
1.183     schwarze 1157: {
1.265     schwarze 1158:        const struct timespec timeout = { 0, 100000000 };  /* 0.1s */
1.184     schwarze 1159: #define MAX_PAGER_ARGS 16
                   1160:        char            *argv[MAX_PAGER_ARGS];
                   1161:        const char      *pager;
                   1162:        char            *cp;
1.322     schwarze 1163: #if HAVE_LESS_T
1.239     schwarze 1164:        size_t           cmdlen;
1.322     schwarze 1165: #endif
1.309     schwarze 1166:        int              argc, use_ofn;
1.225     schwarze 1167:        pid_t            pager_pid;
1.183     schwarze 1168:
1.239     schwarze 1169:        pager = getenv("MANPAGER");
                   1170:        if (pager == NULL || *pager == '\0')
                   1171:                pager = getenv("PAGER");
                   1172:        if (pager == NULL || *pager == '\0')
                   1173:                pager = "more -s";
                   1174:        cp = mandoc_strdup(pager);
                   1175:
                   1176:        /*
                   1177:         * Parse the pager command into words.
                   1178:         * Intentionally do not do anything fancy here.
                   1179:         */
                   1180:
                   1181:        argc = 0;
1.309     schwarze 1182:        while (argc + 5 < MAX_PAGER_ARGS) {
1.239     schwarze 1183:                argv[argc++] = cp;
                   1184:                cp = strchr(cp, ' ');
                   1185:                if (cp == NULL)
                   1186:                        break;
                   1187:                *cp++ = '\0';
                   1188:                while (*cp == ' ')
                   1189:                        cp++;
                   1190:                if (*cp == '\0')
                   1191:                        break;
                   1192:        }
                   1193:
1.268     schwarze 1194:        /* For less(1), use the tag file. */
1.239     schwarze 1195:
1.309     schwarze 1196:        use_ofn = 1;
1.322     schwarze 1197: #if HAVE_LESS_T
1.332     schwarze 1198:        if (*tag_files->tfn != '\0' && (cmdlen = strlen(argv[0])) >= 4) {
1.239     schwarze 1199:                cp = argv[0] + cmdlen - 4;
1.268     schwarze 1200:                if (strcmp(cp, "less") == 0) {
1.244     schwarze 1201:                        argv[argc++] = mandoc_strdup("-T");
                   1202:                        argv[argc++] = tag_files->tfn;
1.309     schwarze 1203:                        if (tag_files->tagname != NULL) {
                   1204:                                argv[argc++] = mandoc_strdup("-t");
                   1205:                                argv[argc++] = tag_files->tagname;
                   1206:                                use_ofn = 0;
                   1207:                        }
1.244     schwarze 1208:                }
1.239     schwarze 1209:        }
1.322     schwarze 1210: #endif
1.309     schwarze 1211:        if (use_ofn)
                   1212:                argv[argc++] = tag_files->ofn;
1.239     schwarze 1213:        argv[argc] = NULL;
                   1214:
1.225     schwarze 1215:        switch (pager_pid = fork()) {
1.183     schwarze 1216:        case -1:
1.329     schwarze 1217:                mandoc_msg(MANDOCERR_FORK, 0, 0, "%s", strerror(errno));
                   1218:                exit(mandoc_msg_getrc());
1.183     schwarze 1219:        case 0:
1.224     schwarze 1220:                break;
                   1221:        default:
1.258     schwarze 1222:                (void)setpgid(pager_pid, 0);
1.279     schwarze 1223:                (void)tcsetpgrp(tag_files->ofd, pager_pid);
1.255     schwarze 1224: #if HAVE_PLEDGE
1.329     schwarze 1225:                if (pledge("stdio rpath tmppath tty proc", NULL) == -1) {
                   1226:                        mandoc_msg(MANDOCERR_PLEDGE, 0, 0,
                   1227:                            "%s", strerror(errno));
                   1228:                        exit(mandoc_msg_getrc());
                   1229:                }
1.255     schwarze 1230: #endif
1.259     schwarze 1231:                tag_files->pager_pid = pager_pid;
1.245     schwarze 1232:                return pager_pid;
1.184     schwarze 1233:        }
                   1234:
1.224     schwarze 1235:        /* The child process becomes the pager. */
1.184     schwarze 1236:
1.329     schwarze 1237:        if (dup2(tag_files->ofd, STDOUT_FILENO) == -1) {
                   1238:                mandoc_msg(MANDOCERR_DUP, 0, 0, "%s", strerror(errno));
                   1239:                _exit(mandoc_msg_getrc());
                   1240:        }
1.244     schwarze 1241:        close(tag_files->ofd);
1.303     schwarze 1242:        assert(tag_files->tfd == -1);
1.265     schwarze 1243:
                   1244:        /* Do not start the pager before controlling the terminal. */
                   1245:
1.279     schwarze 1246:        while (tcgetpgrp(STDOUT_FILENO) != getpid())
1.265     schwarze 1247:                nanosleep(&timeout, NULL);
                   1248:
1.184     schwarze 1249:        execvp(argv[0], argv);
1.329     schwarze 1250:        mandoc_msg(MANDOCERR_EXEC, 0, 0, "%s: %s", argv[0], strerror(errno));
                   1251:        _exit(mandoc_msg_getrc());
1.71      kristaps 1252: }

CVSweb