version 1.20, 2009/04/02 16:37:40 |
version 1.26, 2009/06/10 20:18:43 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@openbsd.org> |
* Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se> |
* |
* |
* Permission to use, copy, modify, and distribute this software for any |
* Permission to use, copy, modify, and distribute this software for any |
* purpose with or without fee is hereby granted, provided that the |
* purpose with or without fee is hereby granted, provided that the above |
* above copyright notice and this permission notice appear in all |
* copyright notice and this permission notice appear in all copies. |
* copies. |
|
* |
* |
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL |
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES |
* WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED |
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
* WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE |
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR |
* AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL |
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
* DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR |
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN |
* PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
* PERFORMANCE OF THIS SOFTWARE. |
|
*/ |
*/ |
#include <sys/stat.h> |
#include <sys/stat.h> |
|
|
Line 42 extern int getsubopt(char **, char * const *, char |
|
Line 40 extern int getsubopt(char **, char * const *, char |
|
# endif |
# endif |
#endif |
#endif |
|
|
|
typedef int (*out_mdoc)(void *, const struct mdoc *); |
|
typedef int (*out_man)(void *, const struct man *); |
|
typedef void (*out_free)(void *); |
|
|
struct buf { |
struct buf { |
char *buf; |
char *buf; |
size_t sz; |
size_t sz; |
|
|
}; |
}; |
|
|
struct curparse { |
struct curparse { |
const char *file; |
const char *file; /* Current parse. */ |
int fd; |
int fd; /* Current parse. */ |
int wflags; |
int wflags; |
#define WARN_WALL 0x03 /* All-warnings mask. */ |
#define WARN_WALL 0x03 /* All-warnings mask. */ |
#define WARN_WCOMPAT (1 << 0) /* Compatibility warnings. */ |
#define WARN_WCOMPAT (1 << 0) /* Compatibility warnings. */ |
#define WARN_WSYNTAX (1 << 1) /* Syntax warnings. */ |
#define WARN_WSYNTAX (1 << 1) /* Syntax warnings. */ |
#define WARN_WERR (1 << 2) /* Warnings->errors. */ |
#define WARN_WERR (1 << 2) /* Warnings->errors. */ |
int fflags; |
int fflags; |
enum intt inttype; |
#define IGN_SCOPE (1 << 0) /* Ignore scope errors. */ |
|
#define NO_IGN_ESCAPE (1 << 1) /* Don't ignore bad escapes. */ |
|
#define NO_IGN_MACRO (1 << 2) /* Don't ignore bad macros. */ |
|
#define NO_IGN_CHARS (1 << 3) /* Don't ignore bad chars. */ |
|
enum intt inttype; /* Input parsers. */ |
struct man *man; |
struct man *man; |
|
struct man *lastman; |
struct mdoc *mdoc; |
struct mdoc *mdoc; |
|
struct mdoc *lastmdoc; |
|
enum outt outtype; /* Output devices. */ |
|
out_mdoc outmdoc; |
|
out_man outman; |
|
out_free outfree; |
|
void *outdata; |
}; |
}; |
|
|
#define IGN_SCOPE (1 << 0) /* Ignore scope errors. */ |
|
#define IGN_ESCAPE (1 << 1) /* Ignore bad escapes. */ |
|
#define IGN_MACRO (1 << 2) /* Ignore unknown macros. */ |
|
#define NO_IGN_MACRO (1 << 3) |
|
|
|
typedef int (*out_run)(void *, const struct man *, |
|
const struct mdoc *); |
|
typedef void (*out_free)(void *); |
|
|
|
extern char *__progname; |
|
|
|
extern void *ascii_alloc(void); |
extern void *ascii_alloc(void); |
extern int terminal_run(void *, const struct man *, |
extern int tree_mdoc(void *, const struct mdoc *); |
const struct mdoc *); |
extern int tree_man(void *, const struct man *); |
extern int tree_run(void *, const struct man *, |
extern int terminal_mdoc(void *, const struct mdoc *); |
const struct mdoc *); |
extern int terminal_man(void *, const struct man *); |
extern void terminal_free(void *); |
extern void terminal_free(void *); |
|
|
static int foptions(int *, char *); |
static int foptions(int *, char *); |
Line 105 static int ffile(struct buf *, struct buf *, |
|
Line 107 static int ffile(struct buf *, struct buf *, |
|
const char *, struct curparse *); |
const char *, struct curparse *); |
static int fdesc(struct buf *, struct buf *, |
static int fdesc(struct buf *, struct buf *, |
struct curparse *); |
struct curparse *); |
static int pset(const char *, size_t, struct curparse *, |
static int pset(const char *, int, struct curparse *, |
struct man **, struct mdoc **); |
struct man **, struct mdoc **); |
static struct man *man_init(struct curparse *); |
static struct man *man_init(struct curparse *); |
static struct mdoc *mdoc_init(struct curparse *); |
static struct mdoc *mdoc_init(struct curparse *); |
__dead static void version(void); |
__dead static void version(void); |
__dead static void usage(void); |
__dead static void usage(void); |
|
|
|
extern char *__progname; |
|
|
|
|
int |
int |
main(int argc, char *argv[]) |
main(int argc, char *argv[]) |
{ |
{ |
int c, rc; |
int c, rc; |
void *outdata; |
|
enum outt outtype; |
|
struct buf ln, blk; |
struct buf ln, blk; |
out_run outrun; |
|
out_free outfree; |
|
struct curparse curp; |
struct curparse curp; |
|
|
outtype = OUTT_ASCII; |
|
|
|
bzero(&curp, sizeof(struct curparse)); |
bzero(&curp, sizeof(struct curparse)); |
|
|
curp.inttype = INTT_AUTO; |
curp.inttype = INTT_AUTO; |
|
curp.outtype = OUTT_ASCII; |
|
|
/* LINTED */ |
/* LINTED */ |
while (-1 != (c = getopt(argc, argv, "f:m:VW:T:"))) |
while (-1 != (c = getopt(argc, argv, "f:m:VW:T:"))) |
Line 142 main(int argc, char *argv[]) |
|
Line 141 main(int argc, char *argv[]) |
|
return(0); |
return(0); |
break; |
break; |
case ('T'): |
case ('T'): |
if ( ! toptions(&outtype, optarg)) |
if ( ! toptions(&curp.outtype, optarg)) |
return(0); |
return(0); |
break; |
break; |
case ('W'): |
case ('W'): |
Line 160 main(int argc, char *argv[]) |
|
Line 159 main(int argc, char *argv[]) |
|
argc -= optind; |
argc -= optind; |
argv += optind; |
argv += optind; |
|
|
/* |
|
* Allocate the appropriate front-end. Note that utf8, latin1 |
|
* (both not yet implemented) and ascii all resolve to the |
|
* terminal front-end with different encodings (see terminal.c). |
|
* Not all frontends have cleanup or alloc routines. |
|
*/ |
|
|
|
switch (outtype) { |
|
case (OUTT_TREE): |
|
outdata = NULL; |
|
outrun = tree_run; |
|
outfree = NULL; |
|
break; |
|
case (OUTT_LINT): |
|
outdata = NULL; |
|
outrun = NULL; |
|
outfree = NULL; |
|
break; |
|
default: |
|
outdata = ascii_alloc(); |
|
outrun = terminal_run; |
|
outfree = terminal_free; |
|
break; |
|
} |
|
|
|
/* Configure buffers. */ |
/* Configure buffers. */ |
|
|
bzero(&ln, sizeof(struct buf)); |
bzero(&ln, sizeof(struct buf)); |
bzero(&blk, sizeof(struct buf)); |
bzero(&blk, sizeof(struct buf)); |
|
|
/* |
rc = 1; |
* Main loop around available files. |
|
*/ |
|
|
|
if (NULL == *argv) { |
if (NULL == *argv) |
rc = 0; |
if ( ! fstdin(&blk, &ln, &curp)) |
c = fstdin(&blk, &ln, &curp); |
rc = 0; |
|
|
if (c && NULL == outrun) |
while (rc && *argv) { |
rc = 1; |
if ( ! ffile(&blk, &ln, *argv, &curp)) |
/*else if (c && outrun && (*outrun)(outdata, curp.man, curp.mdoc)) |
rc = 0; |
rc = 1;*/ |
argv++; |
} else { |
if (*argv && rc) { |
while (*argv) { |
if (curp.lastman) |
c = ffile(&blk, &ln, *argv, &curp); |
if ( ! man_reset(curp.lastman)) |
if ( ! c) |
rc = 0; |
break; |
if (curp.lastmdoc) |
/*if (outrun && ! (*outrun)(outdata, curp.man, curp.mdoc)) |
if ( ! mdoc_reset(curp.lastmdoc)) |
break;*/ |
rc = 0; |
if (curp.man) |
curp.lastman = NULL; |
man_reset(curp.man); |
curp.lastmdoc = NULL; |
if (curp.mdoc && ! mdoc_reset(curp.mdoc)) { |
|
warnx("memory exhausted"); |
|
break; |
|
} |
|
argv++; |
|
} |
} |
rc = NULL == *argv; |
|
} |
} |
|
|
if (blk.buf) |
if (blk.buf) |
free(blk.buf); |
free(blk.buf); |
if (ln.buf) |
if (ln.buf) |
free(ln.buf); |
free(ln.buf); |
if (outfree) |
if (curp.outfree) |
(*outfree)(outdata); |
(*curp.outfree)(curp.outdata); |
if (curp.mdoc) |
if (curp.mdoc) |
mdoc_free(curp.mdoc); |
mdoc_free(curp.mdoc); |
if (curp.man) |
if (curp.man) |
Line 265 man_init(struct curparse *curp) |
|
Line 231 man_init(struct curparse *curp) |
|
mancb.man_err = merr; |
mancb.man_err = merr; |
mancb.man_warn = manwarn; |
mancb.man_warn = manwarn; |
|
|
/* Set command defaults. */ |
pflags = MAN_IGN_MACRO; /* XXX */ |
pflags = MAN_IGN_MACRO; |
|
|
|
if (curp->fflags & IGN_MACRO) |
|
pflags |= MAN_IGN_MACRO; |
|
if (curp->fflags & NO_IGN_MACRO) |
if (curp->fflags & NO_IGN_MACRO) |
pflags &= ~MAN_IGN_MACRO; |
pflags &= ~MAN_IGN_MACRO; |
|
|
Line 291 mdoc_init(struct curparse *curp) |
|
Line 254 mdoc_init(struct curparse *curp) |
|
mdoccb.mdoc_err = merr; |
mdoccb.mdoc_err = merr; |
mdoccb.mdoc_warn = mdocwarn; |
mdoccb.mdoc_warn = mdocwarn; |
|
|
pflags = 0; |
pflags = MDOC_IGN_MACRO | MDOC_IGN_ESCAPE | MDOC_IGN_CHARS; |
|
|
if (curp->fflags & IGN_SCOPE) |
if (curp->fflags & IGN_SCOPE) |
pflags |= MDOC_IGN_SCOPE; |
pflags |= MDOC_IGN_SCOPE; |
if (curp->fflags & IGN_ESCAPE) |
if (curp->fflags & NO_IGN_ESCAPE) |
pflags |= MDOC_IGN_ESCAPE; |
pflags &= ~MDOC_IGN_ESCAPE; |
if (curp->fflags & IGN_MACRO) |
if (curp->fflags & NO_IGN_MACRO) |
pflags |= MDOC_IGN_MACRO; |
pflags &= ~MDOC_IGN_MACRO; |
|
if (curp->fflags & NO_IGN_CHARS) |
|
pflags &= ~MDOC_IGN_CHARS; |
|
|
if (NULL == (mdoc = mdoc_alloc(curp, pflags, &mdoccb))) |
if (NULL == (mdoc = mdoc_alloc(curp, pflags, &mdoccb))) |
warnx("memory allocated"); |
warnx("memory exhausted"); |
|
|
return(mdoc); |
return(mdoc); |
} |
} |
Line 437 fdesc(struct buf *blk, struct buf *ln, struct curparse |
|
Line 402 fdesc(struct buf *blk, struct buf *ln, struct curparse |
|
|
|
/* Note that a parser may not have been assigned, yet. */ |
/* Note that a parser may not have been assigned, yet. */ |
|
|
if (mdoc) |
if ( ! (man || mdoc)) { |
return(mdoc_endparse(mdoc)); |
warnx("%s: not a manual", curp->file); |
if (man) |
return(0); |
return(man_endparse(man)); |
} |
|
|
warnx("%s: not a manual", curp->file); |
if (mdoc && ! mdoc_endparse(mdoc)) |
return(0); |
return(0); |
|
if (man && ! man_endparse(man)) |
|
return(0); |
|
|
|
/* |
|
* If an output device hasn't been allocated, see if we should |
|
* do so now. Note that not all outtypes have functions, so |
|
* this switch statement may be superfluous, but it's |
|
* low-overhead enough not to matter very much. |
|
*/ |
|
|
|
if ( ! (curp->outman && curp->outmdoc)) { |
|
switch (curp->outtype) { |
|
case (OUTT_TREE): |
|
curp->outman = tree_man; |
|
curp->outmdoc = tree_mdoc; |
|
break; |
|
case (OUTT_LINT): |
|
break; |
|
default: |
|
curp->outdata = ascii_alloc(); |
|
curp->outman = terminal_man; |
|
curp->outmdoc = terminal_mdoc; |
|
curp->outfree = terminal_free; |
|
break; |
|
} |
|
} |
|
|
|
/* Execute the out device, if it exists. */ |
|
|
|
if (man && curp->outman) |
|
if ( ! (*curp->outman)(curp->outdata, man)) |
|
return(0); |
|
if (mdoc && curp->outmdoc) |
|
if ( ! (*curp->outmdoc)(curp->outdata, mdoc)) |
|
return(0); |
|
|
|
return(1); |
} |
} |
|
|
|
|
static int |
static int |
pset(const char *buf, size_t pos, struct curparse *curp, |
pset(const char *buf, int pos, struct curparse *curp, |
struct man **man, struct mdoc **mdoc) |
struct man **man, struct mdoc **mdoc) |
{ |
{ |
|
|
Line 469 pset(const char *buf, size_t pos, struct curparse *cur |
|
Line 471 pset(const char *buf, size_t pos, struct curparse *cur |
|
curp->mdoc = mdoc_init(curp); |
curp->mdoc = mdoc_init(curp); |
if (NULL == (*mdoc = curp->mdoc)) |
if (NULL == (*mdoc = curp->mdoc)) |
return(0); |
return(0); |
warnx("inheriting -mdoc parser"); |
curp->lastmdoc = *mdoc; |
return(1); |
return(1); |
case (INTT_MAN): |
case (INTT_MAN): |
if (NULL == curp->man) |
if (NULL == curp->man) |
curp->man = man_init(curp); |
curp->man = man_init(curp); |
if (NULL == (*man = curp->man)) |
if (NULL == (*man = curp->man)) |
return(0); |
return(0); |
warnx("inheriting -man parser"); |
curp->lastman = *man; |
return(1); |
return(1); |
default: |
default: |
break; |
break; |
Line 487 pset(const char *buf, size_t pos, struct curparse *cur |
|
Line 489 pset(const char *buf, size_t pos, struct curparse *cur |
|
curp->mdoc = mdoc_init(curp); |
curp->mdoc = mdoc_init(curp); |
if (NULL == (*mdoc = curp->mdoc)) |
if (NULL == (*mdoc = curp->mdoc)) |
return(0); |
return(0); |
|
curp->lastmdoc = *mdoc; |
return(1); |
return(1); |
} |
} |
|
|
Line 494 pset(const char *buf, size_t pos, struct curparse *cur |
|
Line 497 pset(const char *buf, size_t pos, struct curparse *cur |
|
curp->man = man_init(curp); |
curp->man = man_init(curp); |
if (NULL == (*man = curp->man)) |
if (NULL == (*man = curp->man)) |
return(0); |
return(0); |
|
curp->lastman = *man; |
return(1); |
return(1); |
} |
} |
|
|
|
|
foptions(int *fflags, char *arg) |
foptions(int *fflags, char *arg) |
{ |
{ |
char *v; |
char *v; |
char *toks[5]; |
char *toks[6]; |
|
|
toks[0] = "ign-scope"; |
toks[0] = "ign-scope"; |
toks[1] = "ign-escape"; |
toks[1] = "no-ign-escape"; |
toks[2] = "ign-macro"; |
toks[2] = "no-ign-macro"; |
toks[4] = "no-ign-macro"; |
toks[3] = "no-ign-chars"; |
|
toks[4] = "strict"; |
toks[5] = NULL; |
toks[5] = NULL; |
|
|
while (*arg) |
while (*arg) |
Line 558 foptions(int *fflags, char *arg) |
|
Line 563 foptions(int *fflags, char *arg) |
|
*fflags |= IGN_SCOPE; |
*fflags |= IGN_SCOPE; |
break; |
break; |
case (1): |
case (1): |
*fflags |= IGN_ESCAPE; |
*fflags |= NO_IGN_ESCAPE; |
break; |
break; |
case (2): |
case (2): |
*fflags |= IGN_MACRO; |
*fflags |= NO_IGN_MACRO; |
break; |
break; |
case (3): |
case (3): |
*fflags |= NO_IGN_MACRO; |
*fflags |= NO_IGN_CHARS; |
|
break; |
|
case (4): |
|
*fflags |= NO_IGN_ESCAPE | |
|
NO_IGN_MACRO | NO_IGN_CHARS; |
break; |
break; |
default: |
default: |
warnx("bad argument: -f%s", arg); |
warnx("bad argument: -f%s", arg); |