version 1.6, 2011/09/01 22:25:53 |
version 1.26, 2016/01/08 02:53:13 |
|
|
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
*/ |
*/ |
#ifdef HAVE_CONFIG_H |
|
#include "config.h" |
#include "config.h" |
#endif |
|
|
|
|
#include <sys/types.h> |
|
|
#include <assert.h> |
#include <assert.h> |
#include <ctype.h> |
#include <ctype.h> |
#include <getopt.h> |
#include <getopt.h> |
|
|
#include <string.h> |
#include <string.h> |
#include <unistd.h> |
#include <unistd.h> |
|
|
|
#include "roff.h" |
#include "man.h" |
#include "man.h" |
#include "mdoc.h" |
#include "mdoc.h" |
#include "mandoc.h" |
#include "mandoc.h" |
|
|
static void pline(int, int *, int *, int); |
static void pline(int, int *, int *, int); |
static void pman(const struct man_node *, int *, int *, int); |
static void pman(const struct roff_node *, int *, int *, int); |
static void pmandoc(struct mparse *, int, const char *, int); |
static void pmandoc(struct mparse *, int, const char *, int); |
static void pmdoc(const struct mdoc_node *, int *, int *, int); |
static void pmdoc(const struct roff_node *, int *, int *, int); |
static void pstring(const char *, int, int *, int); |
static void pstring(const char *, int, int *, int); |
static void usage(void); |
static void usage(void); |
|
|
|
|
main(int argc, char *argv[]) |
main(int argc, char *argv[]) |
{ |
{ |
struct mparse *mp; |
struct mparse *mp; |
int ch, i, list; |
int ch, fd, i, list; |
extern int optind; |
extern int optind; |
|
|
progname = strrchr(argv[0], '/'); |
if (argc < 1) |
if (progname == NULL) |
progname = "demandoc"; |
|
else if ((progname = strrchr(argv[0], '/')) == NULL) |
progname = argv[0]; |
progname = argv[0]; |
else |
else |
++progname; |
++progname; |
Line 70 main(int argc, char *argv[]) |
|
Line 72 main(int argc, char *argv[]) |
|
break; |
break; |
default: |
default: |
usage(); |
usage(); |
return((int)MANDOCLEVEL_BADARG); |
return (int)MANDOCLEVEL_BADARG; |
} |
} |
|
|
argc -= optind; |
argc -= optind; |
argv += optind; |
argv += optind; |
|
|
mp = mparse_alloc(MPARSE_AUTO, MANDOCLEVEL_FATAL, NULL, NULL); |
mchars_alloc(); |
|
mp = mparse_alloc(MPARSE_SO, MANDOCLEVEL_BADARG, NULL, NULL); |
assert(mp); |
assert(mp); |
|
|
if (0 == argc) |
if (argc < 1) |
pmandoc(mp, STDIN_FILENO, "<stdin>", list); |
pmandoc(mp, STDIN_FILENO, "<stdin>", list); |
|
|
for (i = 0; i < argc; i++) { |
for (i = 0; i < argc; i++) { |
mparse_reset(mp); |
mparse_reset(mp); |
pmandoc(mp, -1, argv[i], list); |
if ((fd = mparse_open(mp, argv[i])) == -1) { |
|
perror(argv[i]); |
|
continue; |
|
} |
|
pmandoc(mp, fd, argv[i], list); |
} |
} |
|
|
mparse_free(mp); |
mparse_free(mp); |
return((int)MANDOCLEVEL_OK); |
mchars_free(); |
|
return (int)MANDOCLEVEL_OK; |
} |
} |
|
|
static void |
static void |
|
|
static void |
static void |
pmandoc(struct mparse *mp, int fd, const char *fn, int list) |
pmandoc(struct mparse *mp, int fd, const char *fn, int list) |
{ |
{ |
struct mdoc *mdoc; |
struct roff_man *man; |
struct man *man; |
|
int line, col; |
int line, col; |
|
|
if (mparse_readfd(mp, fd, fn) >= MANDOCLEVEL_FATAL) { |
mparse_readfd(mp, fd, fn); |
fprintf(stderr, "%s: Parse failure\n", fn); |
close(fd); |
return; |
mparse_result(mp, &man, NULL); |
} |
|
|
|
mparse_result(mp, &mdoc, &man); |
|
line = 1; |
line = 1; |
col = 0; |
col = 0; |
|
|
if (mdoc) |
if (man == NULL) |
pmdoc(mdoc_node(mdoc), &line, &col, list); |
|
else if (man) |
|
pman(man_node(man), &line, &col, list); |
|
else |
|
return; |
return; |
|
if (man->macroset == MACROSET_MDOC) { |
|
mdoc_validate(man); |
|
pmdoc(man->first->child, &line, &col, list); |
|
} else { |
|
man_validate(man); |
|
pman(man->first->child, &line, &col, list); |
|
} |
|
|
if ( ! list) |
if ( ! list) |
putchar('\n'); |
putchar('\n'); |
|
|
end = p - 1; |
end = p - 1; |
|
|
while (end > start) |
while (end > start) |
if ('.' == *end || ',' == *end || |
if ('.' == *end || ',' == *end || |
'\'' == *end || '"' == *end || |
'\'' == *end || '"' == *end || |
')' == *end || '!' == *end || |
')' == *end || '!' == *end || |
'?' == *end || ':' == *end || |
'?' == *end || ':' == *end || |
|
|
/* |
/* |
* Print the input word, skipping any special characters. |
* Print the input word, skipping any special characters. |
*/ |
*/ |
while ('\0' != *p) |
while ('\0' != *p) |
if ('\\' == *p) { |
if ('\\' == *p) { |
p++; |
p++; |
esc = mandoc_escape(&p, NULL, NULL); |
esc = mandoc_escape(&p, NULL, NULL); |
Line 217 pline(int line, int *linep, int *col, int list) |
|
Line 224 pline(int line, int *linep, int *col, int list) |
|
|
|
/* |
/* |
* Print out as many lines as needed to reach parity with the |
* Print out as many lines as needed to reach parity with the |
* original input. |
* original input. |
*/ |
*/ |
|
|
while (*linep < line) { |
while (*linep < line) { |
Line 229 pline(int line, int *linep, int *col, int list) |
|
Line 236 pline(int line, int *linep, int *col, int list) |
|
} |
} |
|
|
static void |
static void |
pmdoc(const struct mdoc_node *p, int *line, int *col, int list) |
pmdoc(const struct roff_node *p, int *line, int *col, int list) |
{ |
{ |
|
|
for ( ; p; p = p->next) { |
for ( ; p; p = p->next) { |
if (MDOC_LINE & p->flags) |
if (MDOC_LINE & p->flags) |
pline(p->line, line, col, list); |
pline(p->line, line, col, list); |
if (MDOC_TEXT == p->type) |
if (ROFFT_TEXT == p->type) |
pstring(p->string, p->pos, col, list); |
pstring(p->string, p->pos, col, list); |
if (p->child) |
if (p->child) |
pmdoc(p->child, line, col, list); |
pmdoc(p->child, line, col, list); |
} |
} |
} |
} |
|
|
static void |
static void |
pman(const struct man_node *p, int *line, int *col, int list) |
pman(const struct roff_node *p, int *line, int *col, int list) |
{ |
{ |
|
|
for ( ; p; p = p->next) { |
for ( ; p; p = p->next) { |
if (MAN_LINE & p->flags) |
if (MAN_LINE & p->flags) |
pline(p->line, line, col, list); |
pline(p->line, line, col, list); |
if (MAN_TEXT == p->type) |
if (ROFFT_TEXT == p->type) |
pstring(p->string, p->pos, col, list); |
pstring(p->string, p->pos, col, list); |
if (p->child) |
if (p->child) |
pman(p->child, line, col, list); |
pman(p->child, line, col, list); |
} |
} |
} |
} |