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