version 1.18, 2009/10/27 21:40:07 |
version 1.19, 2009/12/22 23:58:00 |
|
|
#include <sys/stat.h> |
#include <sys/stat.h> |
|
|
#include <assert.h> |
#include <assert.h> |
#include <err.h> |
|
#include <fcntl.h> |
#include <fcntl.h> |
#include <stdio.h> |
#include <stdio.h> |
#include <stdint.h> |
#include <stdint.h> |
|
|
__dead static void version(void); |
__dead static void version(void); |
__dead static void usage(void); |
__dead static void usage(void); |
|
|
extern char *__progname; |
static const char *progname; |
|
|
|
|
int |
int |
|
|
struct buf ln, blk; |
struct buf ln, blk; |
struct curparse curp; |
struct curparse curp; |
|
|
bzero(&curp, sizeof(struct curparse)); |
progname = strrchr(argv[0], '/'); |
|
if (progname == NULL) |
|
progname = argv[0]; |
|
else |
|
++progname; |
|
|
|
memset(&curp, 0, sizeof(struct curparse)); |
|
|
curp.inttype = INTT_AUTO; |
curp.inttype = INTT_AUTO; |
curp.outtype = OUTT_ASCII; |
curp.outtype = OUTT_ASCII; |
|
|
|
|
argc -= optind; |
argc -= optind; |
argv += optind; |
argv += optind; |
|
|
bzero(&ln, sizeof(struct buf)); |
memset(&ln, 0, sizeof(struct buf)); |
bzero(&blk, sizeof(struct buf)); |
memset(&blk, 0, sizeof(struct buf)); |
|
|
rc = 1; |
rc = 1; |
|
|
|
|
argv++; |
argv++; |
if (*argv && rc) { |
if (*argv && rc) { |
if (curp.lastman) |
if (curp.lastman) |
if ( ! man_reset(curp.lastman)) |
man_reset(curp.lastman); |
rc = 0; |
|
if (curp.lastmdoc) |
if (curp.lastmdoc) |
if ( ! mdoc_reset(curp.lastmdoc)) |
mdoc_reset(curp.lastmdoc); |
rc = 0; |
|
curp.lastman = NULL; |
curp.lastman = NULL; |
curp.lastmdoc = NULL; |
curp.lastmdoc = NULL; |
} |
} |
|
|
version(void) |
version(void) |
{ |
{ |
|
|
(void)printf("%s %s\n", __progname, VERSION); |
(void)printf("%s %s\n", progname, VERSION); |
exit(EXIT_SUCCESS); |
exit(EXIT_SUCCESS); |
} |
} |
|
|
|
|
|
|
(void)fprintf(stderr, "usage: %s [-V] [-foption...] " |
(void)fprintf(stderr, "usage: %s [-V] [-foption...] " |
"[-mformat] [-Ooption] [-Toutput] " |
"[-mformat] [-Ooption] [-Toutput] " |
"[-Werr...]\n", __progname); |
"[-Werr...]\n", progname); |
exit(EXIT_FAILURE); |
exit(EXIT_FAILURE); |
} |
} |
|
|
|
|
man_init(struct curparse *curp) |
man_init(struct curparse *curp) |
{ |
{ |
int pflags; |
int pflags; |
struct man *man; |
|
struct man_cb mancb; |
struct man_cb mancb; |
|
|
mancb.man_err = merr; |
mancb.man_err = merr; |
|
|
if (curp->fflags & NO_IGN_ESCAPE) |
if (curp->fflags & NO_IGN_ESCAPE) |
pflags &= ~MAN_IGN_ESCAPE; |
pflags &= ~MAN_IGN_ESCAPE; |
|
|
if (NULL == (man = man_alloc(curp, pflags, &mancb))) |
return(man_alloc(curp, pflags, &mancb)); |
warnx("memory exhausted"); |
|
|
|
return(man); |
|
} |
} |
|
|
|
|
|
|
mdoc_init(struct curparse *curp) |
mdoc_init(struct curparse *curp) |
{ |
{ |
int pflags; |
int pflags; |
struct mdoc *mdoc; |
|
struct mdoc_cb mdoccb; |
struct mdoc_cb mdoccb; |
|
|
mdoccb.mdoc_err = merr; |
mdoccb.mdoc_err = merr; |
|
|
if (curp->fflags & NO_IGN_CHARS) |
if (curp->fflags & NO_IGN_CHARS) |
pflags &= ~MDOC_IGN_CHARS; |
pflags &= ~MDOC_IGN_CHARS; |
|
|
if (NULL == (mdoc = mdoc_alloc(curp, pflags, &mdoccb))) |
return(mdoc_alloc(curp, pflags, &mdoccb)); |
warnx("memory exhausted"); |
|
|
|
return(mdoc); |
|
} |
} |
|
|
|
|
|
|
|
|
curp->file = file; |
curp->file = file; |
if (-1 == (curp->fd = open(curp->file, O_RDONLY, 0))) { |
if (-1 == (curp->fd = open(curp->file, O_RDONLY, 0))) { |
warn("%s", curp->file); |
perror(curp->file); |
return(-1); |
return(-1); |
} |
} |
|
|
c = fdesc(blk, ln, curp); |
c = fdesc(blk, ln, curp); |
|
|
if (-1 == close(curp->fd)) |
if (-1 == close(curp->fd)) |
warn("%s", curp->file); |
perror(curp->file); |
|
|
return(c); |
return(c); |
} |
} |
|
|
*/ |
*/ |
|
|
if (-1 == fstat(curp->fd, &st)) |
if (-1 == fstat(curp->fd, &st)) |
warn("%s", curp->file); |
perror(curp->file); |
else if ((size_t)st.st_blksize > sz) |
else if ((size_t)st.st_blksize > sz) |
sz = st.st_blksize; |
sz = st.st_blksize; |
|
|
if (sz > blk->sz) { |
if (sz > blk->sz) { |
blk->buf = realloc(blk->buf, sz); |
blk->buf = realloc(blk->buf, sz); |
if (NULL == blk->buf) { |
if (NULL == blk->buf) { |
warn("realloc"); |
perror(NULL); |
return(-1); |
exit(EXIT_FAILURE); |
} |
} |
blk->sz = sz; |
blk->sz = sz; |
} |
} |
|
|
|
|
for (lnn = pos = comment = 0; ; ) { |
for (lnn = pos = comment = 0; ; ) { |
if (-1 == (ssz = read(curp->fd, blk->buf, sz))) { |
if (-1 == (ssz = read(curp->fd, blk->buf, sz))) { |
warn("%s", curp->file); |
perror(curp->file); |
return(-1); |
return(-1); |
} else if (0 == ssz) |
} else if (0 == ssz) |
break; |
break; |
|
|
ln->sz += 256; /* Step-size. */ |
ln->sz += 256; /* Step-size. */ |
ln->buf = realloc(ln->buf, ln->sz); |
ln->buf = realloc(ln->buf, ln->sz); |
if (NULL == ln->buf) { |
if (NULL == ln->buf) { |
warn("realloc"); |
perror(NULL); |
return(-1); |
return(EXIT_FAILURE); |
} |
} |
} |
} |
|
|
|
|
/* NOTE a parser may not have been assigned, yet. */ |
/* NOTE a parser may not have been assigned, yet. */ |
|
|
if ( ! (man || mdoc)) { |
if ( ! (man || mdoc)) { |
(void)fprintf(stderr, "%s: not a manual\n", |
fprintf(stderr, "%s: Not a manual\n", curp->file); |
curp->file); |
|
return(0); |
return(0); |
} |
} |
|
|
|
|
else if (0 == strcmp(arg, "an")) |
else if (0 == strcmp(arg, "an")) |
*tflags = INTT_MAN; |
*tflags = INTT_MAN; |
else { |
else { |
warnx("bad argument: -m%s", arg); |
fprintf(stderr, "%s: Bad argument", arg); |
return(0); |
return(0); |
} |
} |
|
|
|
|
else if (0 == strcmp(arg, "html")) |
else if (0 == strcmp(arg, "html")) |
*tflags = OUTT_HTML; |
*tflags = OUTT_HTML; |
else { |
else { |
warnx("bad argument: -T%s", arg); |
fprintf(stderr, "%s: Bad argument", arg); |
return(0); |
return(0); |
} |
} |
|
|
|
|
foptions(int *fflags, char *arg) |
foptions(int *fflags, char *arg) |
{ |
{ |
char *v, *o; |
char *v, *o; |
const char *toks[7]; |
const char *toks[8]; |
|
|
toks[0] = "ign-scope"; |
toks[0] = "ign-scope"; |
toks[1] = "no-ign-escape"; |
toks[1] = "no-ign-escape"; |
|
|
toks[3] = "no-ign-chars"; |
toks[3] = "no-ign-chars"; |
toks[4] = "ign-errors"; |
toks[4] = "ign-errors"; |
toks[5] = "strict"; |
toks[5] = "strict"; |
toks[6] = NULL; |
toks[6] = "ign-escape"; |
|
toks[7] = NULL; |
|
|
while (*arg) { |
while (*arg) { |
o = arg; |
o = arg; |
|
|
*fflags |= NO_IGN_ESCAPE | |
*fflags |= NO_IGN_ESCAPE | |
NO_IGN_MACRO | NO_IGN_CHARS; |
NO_IGN_MACRO | NO_IGN_CHARS; |
break; |
break; |
|
case (6): |
|
*fflags &= ~NO_IGN_ESCAPE; |
|
break; |
default: |
default: |
warnx("bad argument: -f%s", o); |
fprintf(stderr, "%s: Bad argument", o); |
return(0); |
return(0); |
} |
} |
} |
} |
|
|
*wflags |= WARN_WERR; |
*wflags |= WARN_WERR; |
break; |
break; |
default: |
default: |
warnx("bad argument: -W%s", o); |
fprintf(stderr, "%s: Bad argument", o); |
return(0); |
return(0); |
} |
} |
} |
} |