Annotation of mandoc/demandoc.c, Revision 1.31
1.31 ! schwarze 1: /* $Id: demandoc.c,v 1.30 2018/12/13 11:55:46 schwarze Exp $ */
1.1 kristaps 2: /*
3: * Copyright (c) 2011 Kristaps Dzonsons <kristaps@bsd.lv>
4: *
5: * Permission to use, copy, modify, and distribute this software for any
6: * purpose with or without fee is hereby granted, provided that the above
7: * copyright notice and this permission notice appear in all copies.
8: *
9: * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10: * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11: * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12: * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13: * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14: * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15: * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16: */
17: #include "config.h"
1.11 schwarze 18:
19: #include <sys/types.h>
1.1 kristaps 20:
21: #include <assert.h>
1.4 kristaps 22: #include <ctype.h>
1.1 kristaps 23: #include <stdio.h>
24: #include <stdlib.h>
25: #include <string.h>
1.2 kristaps 26: #include <unistd.h>
1.1 kristaps 27:
1.29 schwarze 28: #include "mandoc.h"
1.16 schwarze 29: #include "roff.h"
1.1 kristaps 30: #include "man.h"
31: #include "mdoc.h"
1.30 schwarze 32: #include "mandoc_parse.h"
1.1 kristaps 33:
1.4 kristaps 34: static void pline(int, int *, int *, int);
1.17 schwarze 35: static void pman(const struct roff_node *, int *, int *, int);
1.4 kristaps 36: static void pmandoc(struct mparse *, int, const char *, int);
1.17 schwarze 37: static void pmdoc(const struct roff_node *, int *, int *, int);
1.4 kristaps 38: static void pstring(const char *, int, int *, int);
1.1 kristaps 39: static void usage(void);
40:
41: static const char *progname;
42:
43: int
44: main(int argc, char *argv[])
45: {
46: struct mparse *mp;
1.13 schwarze 47: int ch, fd, i, list;
1.1 kristaps 48: extern int optind;
49:
1.14 schwarze 50: if (argc < 1)
51: progname = "demandoc";
52: else if ((progname = strrchr(argv[0], '/')) == NULL)
1.1 kristaps 53: progname = argv[0];
54: else
55: ++progname;
56:
57: mp = NULL;
1.4 kristaps 58: list = 0;
1.1 kristaps 59:
1.4 kristaps 60: while (-1 != (ch = getopt(argc, argv, "ikm:pw")))
1.1 kristaps 61: switch (ch) {
1.4 kristaps 62: case ('i'):
63: /* FALLTHROUGH */
64: case ('k'):
65: /* FALLTHROUGH */
66: case ('m'):
67: /* FALLTHROUGH */
68: case ('p'):
69: break;
70: case ('w'):
71: list = 1;
72: break;
1.1 kristaps 73: default:
74: usage();
1.21 schwarze 75: return (int)MANDOCLEVEL_BADARG;
1.1 kristaps 76: }
77:
78: argc -= optind;
79: argv += optind;
80:
1.22 schwarze 81: mchars_alloc();
1.31 ! schwarze 82: mp = mparse_alloc(MPARSE_SO, MANDOC_OS_OTHER, NULL);
1.1 kristaps 83: assert(mp);
84:
1.14 schwarze 85: if (argc < 1)
1.4 kristaps 86: pmandoc(mp, STDIN_FILENO, "<stdin>", list);
1.1 kristaps 87:
88: for (i = 0; i < argc; i++) {
89: mparse_reset(mp);
1.26 schwarze 90: if ((fd = mparse_open(mp, argv[i])) == -1) {
1.13 schwarze 91: perror(argv[i]);
92: continue;
93: }
94: pmandoc(mp, fd, argv[i], list);
1.1 kristaps 95: }
96:
97: mparse_free(mp);
1.22 schwarze 98: mchars_free();
1.21 schwarze 99: return (int)MANDOCLEVEL_OK;
1.1 kristaps 100: }
101:
102: static void
103: usage(void)
104: {
105:
1.4 kristaps 106: fprintf(stderr, "usage: %s [-w] [files...]\n", progname);
1.1 kristaps 107: }
108:
109: static void
1.4 kristaps 110: pmandoc(struct mparse *mp, int fd, const char *fn, int list)
1.1 kristaps 111: {
1.18 schwarze 112: struct roff_man *man;
1.1 kristaps 113: int line, col;
114:
1.13 schwarze 115: mparse_readfd(mp, fd, fn);
1.25 schwarze 116: close(fd);
1.19 schwarze 117: mparse_result(mp, &man, NULL);
1.1 kristaps 118: line = 1;
119: col = 0;
120:
1.19 schwarze 121: if (man == NULL)
122: return;
1.23 schwarze 123: if (man->macroset == MACROSET_MDOC) {
124: mdoc_validate(man);
1.20 schwarze 125: pmdoc(man->first->child, &line, &col, list);
1.24 schwarze 126: } else {
127: man_validate(man);
1.20 schwarze 128: pman(man->first->child, &line, &col, list);
1.24 schwarze 129: }
1.1 kristaps 130:
1.5 kristaps 131: if ( ! list)
132: putchar('\n');
1.1 kristaps 133: }
134:
135: /*
136: * Strip the escapes out of a string, emitting the results.
137: */
138: static void
1.4 kristaps 139: ps