Return to main.c CVS log | Up to [cvsweb.bsd.lv] / mandoc |
version 1.306, 2018/05/14 14:10:23 | version 1.347, 2020/03/28 16:18:43 | ||
---|---|---|---|
|
|
||
/* $Id$ */ | /* $Id$ */ | ||
/* | /* | ||
* Copyright (c) 2010-2012, 2014-2020 Ingo Schwarze <schwarze@openbsd.org> | |||
* Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv> | * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv> | ||
* Copyright (c) 2010-2012, 2014-2018 Ingo Schwarze <schwarze@openbsd.org> | |||
* Copyright (c) 2010 Joerg Sonnenberger <joerg@netbsd.org> | * Copyright (c) 2010 Joerg Sonnenberger <joerg@netbsd.org> | ||
* | * | ||
* Permission to use, copy, modify, and distribute this software for any | * Permission to use, copy, modify, and distribute this software for any | ||
|
|
||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | ||
* 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. | ||
* | |||
* Main program for mandoc(1), man(1), apropos(1), whatis(1), and help(1). | |||
*/ | */ | ||
#include "config.h" | #include "config.h" | ||
#include <sys/types.h> | #include <sys/types.h> | ||
#include <sys/ioctl.h> | #include <sys/ioctl.h> | ||
#include <sys/param.h> /* MACHINE */ | #include <sys/param.h> /* MACHINE */ | ||
#include <sys/termios.h> | #include <sys/stat.h> | ||
#include <sys/wait.h> | #include <sys/wait.h> | ||
#include <assert.h> | #include <assert.h> | ||
|
|
||
#include <errno.h> | #include <errno.h> | ||
#include <fcntl.h> | #include <fcntl.h> | ||
#include <glob.h> | #include <glob.h> | ||
#include <limits.h> | |||
#if HAVE_SANDBOX_INIT | #if HAVE_SANDBOX_INIT | ||
#include <sandbox.h> | #include <sandbox.h> | ||
#endif | #endif | ||
|
|
||
#include <stdint.h> | #include <stdint.h> | ||
#include <stdlib.h> | #include <stdlib.h> | ||
#include <string.h> | #include <string.h> | ||
#include <termios.h> | |||
#include <time.h> | #include <time.h> | ||
#include <unistd.h> | #include <unistd.h> | ||
|
|
||
#include "roff.h" | #include "roff.h" | ||
#include "mdoc.h" | #include "mdoc.h" | ||
#include "man.h" | #include "man.h" | ||
#include "tag.h" | #include "mandoc_parse.h" | ||
#include "term_tag.h" | |||
#include "main.h" | #include "main.h" | ||
#include "manconf.h" | #include "manconf.h" | ||
#include "mansearch.h" | #include "mansearch.h" | ||
|
|
||
OUTT_PDF /* -Tpdf */ | OUTT_PDF /* -Tpdf */ | ||
}; | }; | ||
struct curparse { | struct outstate { | ||
struct mparse *mp; | struct tag_files *tag_files; /* Tagging state variables. */ | ||
struct manoutput *outopts; /* output options */ | |||
void *outdata; /* data for output */ | void *outdata; /* data for output */ | ||
char *os_s; /* operating system for display */ | int use_pager; | ||
int wstop; /* stop after a file with a warning */ | int wstop; /* stop after a file with a warning */ | ||
enum mandocerr mmin; /* ignore messages below this */ | int had_output; /* Some output was generated. */ | ||
enum mandoc_os os_e; /* check base system conventions */ | |||
enum outt outtype; /* which output to use */ | enum outt outtype; /* which output to use */ | ||
}; | }; | ||
int mandocdb(int, char *[]); | int mandocdb(int, char *[]); | ||
static void check_xr(const char *); | static void check_xr(void); | ||
static int fs_lookup(const struct manpaths *, | static int fs_lookup(const struct manpaths *, | ||
size_t ipath, const char *, | size_t ipath, const char *, | ||
const char *, const char *, | const char *, const char *, | ||
struct manpage **, size_t *); | struct manpage **, size_t *); | ||
static int fs_search(const struct mansearch *, | static int fs_search(const struct mansearch *, | ||
const struct manpaths *, int, char**, | const struct manpaths *, const char *, | ||
struct manpage **, size_t *); | struct manpage **, size_t *); | ||
static int koptions(int *, char *); | static void glob_esc(char **, const char *, const char *); | ||
static void moptions(int *, char *); | static void outdata_alloc(struct outstate *, struct manoutput *); | ||
static void mmsg(enum mandocerr, enum mandoclevel, | static void parse(struct mparse *, int, const char *, | ||
const char *, int, int, const char *); | struct outstate *, struct manoutput *); | ||
static void outdata_alloc(struct curparse *); | static void passthrough(int, int); | ||
static void parse(struct curparse *, int, const char *); | static void process_onefile(struct mparse *, struct manpage *, | ||
static void passthrough(const char *, int, int); | int, struct outstate *, struct manconf *); | ||
static void run_pager(struct tag_files *); | |||
static pid_t spawn_pager(struct tag_files *); | static pid_t spawn_pager(struct tag_files *); | ||
static int toptions(struct curparse *, char *); | |||
static void usage(enum argmode) __attribute__((__noreturn__)); | static void usage(enum argmode) __attribute__((__noreturn__)); | ||
static int woptions(struct curparse *, char *); | static int woptions(char *, enum mandoc_os *, int *); | ||
static const int sec_prios[] = {1, 4, 5, 8, 6, 3, 7, 2, 9}; | static const int sec_prios[] = {1, 4, 5, 8, 6, 3, 7, 2, 9}; | ||
static char help_arg[] = "help"; | static char help_arg[] = "help"; | ||
static char *help_argv[] = {help_arg, NULL}; | static char *help_argv[] = {help_arg, NULL}; | ||
static enum mandoclevel rc; | |||
static FILE *mmsg_stream; | |||
int | int | ||
main(int argc, char *argv[]) | main(int argc, char *argv[]) | ||
{ | { | ||
struct manconf conf; | struct manconf conf; /* Manpaths and output options. */ | ||
struct mansearch search; | struct outstate outst; /* Output state. */ | ||
struct curparse curp; | struct winsize ws; /* Result of ioctl(TIOCGWINSZ). */ | ||
struct winsize ws; | struct mansearch search; /* Search options. */ | ||
struct tag_files *tag_files; | struct manpage *res; /* Complete list of search results. */ | ||
struct manpage *res, *resp; | struct manpage *resn; /* Search results for one name. */ | ||
const char *progname, *sec, *thisarg; | struct mparse *mp; /* Opaque parser object. */ | ||
char *conf_file, *defpaths, *auxpaths; | const char *conf_file; /* -C: alternate config file. */ | ||
char *oarg; | const char *os_s; /* -I: Operating system for display. */ | ||
const char *progname, *sec; | |||
char *defpaths; /* -M: override manpaths. */ | |||
char *auxpaths; /* -m: additional manpaths. */ | |||
char *oarg; /* -O: output option string. */ | |||
char *tagarg; /* -O tag: default value. */ | |||
unsigned char *uc; | unsigned char *uc; | ||
size_t i, sz; | size_t ressz; /* Number of elements in res[]. */ | ||
size_t resnsz; /* Number of elements in resn[]. */ | |||
size_t i, ib, ssz; | |||
int options; /* Parser options. */ | |||
int show_usage; /* Invalid argument: give up. */ | |||
int prio, best_prio; | int prio, best_prio; | ||
enum outmode outmode; | int startdir; | ||
int fd, startdir; | |||
int show_usage; | |||
int options; | |||
int use_pager; | |||
int status, signum; | |||
int c; | int c; | ||
pid_t pager_pid, tc_pgid, man_pgid, pid; | enum mandoc_os os_e; /* Check base system conventions. */ | ||
enum outmode outmode; /* According to command line. */ | |||
#if HAVE_PROGNAME | #if HAVE_PROGNAME | ||
progname = getprogname(); | progname = getprogname(); | ||
|
|
||
setprogname(progname); | setprogname(progname); | ||
#endif | #endif | ||
mandoc_msg_setoutfile(stderr); | |||
if (strncmp(progname, "mandocdb", 8) == 0 || | if (strncmp(progname, "mandocdb", 8) == 0 || | ||
strcmp(progname, BINM_MAKEWHATIS) == 0) | strcmp(progname, BINM_MAKEWHATIS) == 0) | ||
return mandocdb(argc, argv); | return mandocdb(argc, argv); | ||
#if HAVE_PLEDGE | #if HAVE_PLEDGE | ||
if (pledge("stdio rpath tmppath tty proc exec", NULL) == -1) | if (pledge("stdio rpath tmppath tty proc exec", NULL) == -1) { | ||
err((int)MANDOCLEVEL_SYSERR, "pledge"); | mandoc_msg(MANDOCERR_PLEDGE, 0, 0, "%s", strerror(errno)); | ||
return mandoc_msg_getrc(); | |||
} | |||
#endif | #endif | ||
#if HAVE_SANDBOX_INIT | #if HAVE_SANDBOX_INIT | ||
if (sandbox_init(kSBXProfileNoInternet, SANDBOX_NAMED, NULL) == -1) | if (sandbox_init(kSBXProfileNoInternet, SANDBOX_NAMED, NULL) == -1) | ||
errx((int)MANDOCLEVEL_SYSERR, "sandbox_init"); | errx((int)MANDOCLEVEL_SYSERR, "sandbox_init"); | ||
|
|
||
/* Search options. */ | /* Search options. */ | ||
memset(&conf, 0, sizeof(conf)); | memset(&conf, 0, sizeof(conf)); | ||
conf_file = defpaths = NULL; | conf_file = NULL; | ||
auxpaths = NULL; | defpaths = auxpaths = NULL; | ||
memset(&search, 0, sizeof(struct mansearch)); | memset(&search, 0, sizeof(struct mansearch)); | ||
search.outkey = "Nd"; | search.outkey = "Nd"; | ||
|
|
||
else | else | ||
search.argmode = ARG_FILE; | search.argmode = ARG_FILE; | ||
/* Parser and formatter options. */ | /* Parser options. */ | ||
memset(&curp, 0, sizeof(struct curparse)); | |||
curp.outtype = OUTT_LOCALE; | |||
curp.mmin = MANDOCERR_MAX; | |||
curp.outopts = &conf.output; | |||
options = MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1; | options = MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1; | ||
mmsg_stream = stderr; | os_e = MANDOC_OS_OTHER; | ||
os_s = NULL; | |||
use_pager = 1; | /* Formatter options. */ | ||
tag_files = NULL; | |||
memset(&outst, 0, sizeof(outst)); | |||
outst.tag_files = NULL; | |||
outst.outtype = OUTT_LOCALE; | |||
outst.use_pager = 1; | |||
show_usage = 0; | show_usage = 0; | ||
outmode = OUTMODE_DEF; | outmode = OUTMODE_DEF; | ||
|
|
||
conf_file = optarg; | conf_file = optarg; | ||
break; | break; | ||
case 'c': | case 'c': | ||
use_pager = 0; | outst.use_pager = 0; | ||
break; | break; | ||
case 'f': | case 'f': | ||
search.argmode = ARG_WORD; | search.argmode = ARG_WORD; | ||
break; | break; | ||
case 'h': | case 'h': | ||
conf.output.synopsisonly = 1; | conf.output.synopsisonly = 1; | ||
use_pager = 0; | outst.use_pager = 0; | ||
outmode = OUTMODE_ALL; | outmode = OUTMODE_ALL; | ||
break; | break; | ||
case 'I': | case 'I': | ||
if (strncmp(optarg, "os=", 3)) { | if (strncmp(optarg, "os=", 3) != 0) { | ||
warnx("-I %s: Bad argument", optarg); | mandoc_msg(MANDOCERR_BADARG_BAD, 0, 0, | ||
return (int)MANDOCLEVEL_BADARG; | "-I %s", optarg); | ||
return mandoc_msg_getrc(); | |||
} | } | ||
if (curp.os_s != NULL) { | if (os_s != NULL) { | ||
warnx("-I %s: Duplicate argument", optarg); | mandoc_msg(MANDOCERR_BADARG_DUPE, 0, 0, | ||
return (int)MANDOCLEVEL_BADARG; | "-I %s", optarg); | ||
return mandoc_msg_getrc(); | |||
} | } | ||
curp.os_s = mandoc_strdup(optarg + 3); | os_s = optarg + 3; | ||
break; | break; | ||
case 'K': | case 'K': | ||
if ( ! koptions(&options, optarg)) | options &= ~(MPARSE_UTF8 | MPARSE_LATIN1); | ||
return (int)MANDOCLEVEL_BADARG; | if (strcmp(optarg, "utf-8") == 0) | ||
options |= MPARSE_UTF8; | |||
else if (strcmp(optarg, "iso-8859-1") == 0) | |||
options |= MPARSE_LATIN1; | |||
else if (strcmp(optarg, "us-ascii") != 0) { | |||
mandoc_msg(MANDOCERR_BADARG_BAD, 0, 0, | |||
"-K %s", optarg); | |||
return mandoc_msg_getrc(); | |||
} | |||
break; | break; | ||
case 'k': | case 'k': | ||
search.argmode = ARG_EXPR; | search.argmode = ARG_EXPR; | ||
|
|
||
search.sec = optarg; | search.sec = optarg; | ||
break; | break; | ||
case 'T': | case 'T': | ||
if ( ! toptions(&curp, optarg)) | if (strcmp(optarg, "ascii") == 0) | ||
return (int)MANDOCLEVEL_BADARG; | outst.outtype = OUTT_ASCII; | ||
else if (strcmp(optarg, "lint") == 0) { | |||
outst.outtype = OUTT_LINT; | |||
mandoc_msg_setoutfile(stdout); | |||
mandoc_msg_setmin(MANDOCERR_BASE); | |||
} else if (strcmp(optarg, "tree") == 0) | |||
outst.outtype = OUTT_TREE; | |||
else if (strcmp(optarg, "man") == 0) | |||
outst.outtype = OUTT_MAN; | |||
else if (strcmp(optarg, "html") == 0) | |||
outst.outtype = OUTT_HTML; | |||
else if (strcmp(optarg, "markdown") == 0) | |||
outst.outtype = OUTT_MARKDOWN; | |||
else if (strcmp(optarg, "utf8") == 0) | |||
outst.outtype = OUTT_UTF8; | |||
else if (strcmp(optarg, "locale") == 0) | |||
outst.outtype = OUTT_LOCALE; | |||
else if (strcmp(optarg, "ps") == 0) | |||
outst.outtype = OUTT_PS; | |||
else if (strcmp(optarg, "pdf") == 0) | |||
outst.outtype = OUTT_PDF; | |||
else { | |||
mandoc_msg(MANDOCERR_BADARG_BAD, 0, 0, | |||
"-T %s", optarg); | |||
return mandoc_msg_getrc(); | |||
} | |||
break; | break; | ||
case 'W': | case 'W': | ||
if ( ! woptions(&curp, optarg)) | if (woptions(optarg, &os_e, &outst.wstop) == -1) | ||
return (int)MANDOCLEVEL_BADARG; | return mandoc_msg_getrc(); | ||
break; | break; | ||
case 'w': | case 'w': | ||
outmode = OUTMODE_FLN; | outmode = OUTMODE_FLN; | ||
|
|
||
/* Postprocess options. */ | /* Postprocess options. */ | ||
if (outmode == OUTMODE_DEF) { | switch (outmode) { | ||
case OUTMODE_DEF: | |||
switch (search.argmode) { | switch (search.argmode) { | ||
case ARG_FILE: | case ARG_FILE: | ||
outmode = OUTMODE_ALL; | outmode = OUTMODE_ALL; | ||
use_pager = 0; | outst.use_pager = 0; | ||
break; | break; | ||
case ARG_NAME: | case ARG_NAME: | ||
outmode = OUTMODE_ONE; | outmode = OUTMODE_ONE; | ||
|
|
||
outmode = OUTMODE_LST; | outmode = OUTMODE_LST; | ||
break; | break; | ||
} | } | ||
break; | |||
case OUTMODE_FLN: | |||
if (search.argmode == ARG_FILE) | |||
outmode = OUTMODE_ALL; | |||
break; | |||
case OUTMODE_ALL: | |||
break; | |||
case OUTMODE_LST: | |||
case OUTMODE_ONE: | |||
abort(); | |||
} | } | ||
if (oarg != NULL) { | if (oarg != NULL) { | ||
|
|
||
search.outkey = oarg; | search.outkey = oarg; | ||
else { | else { | ||
while (oarg != NULL) { | while (oarg != NULL) { | ||
thisarg = oarg; | |||
if (manconf_output(&conf.output, | if (manconf_output(&conf.output, | ||
strsep(&oarg, ","), 0) == 0) | strsep(&oarg, ","), 0) == -1) | ||
continue; | return mandoc_msg_getrc(); | ||
warnx("-O %s: Bad argument", thisarg); | |||
return (int)MANDOCLEVEL_BADARG; | |||
} | } | ||
} | } | ||
} | } | ||
if (outst.outtype != OUTT_TREE || conf.output.noval == 0) | |||
options |= MPARSE_VALIDATE; | |||
if (outmode == OUTMODE_FLN || | if (outmode == OUTMODE_FLN || | ||
outmode == OUTMODE_LST || | outmode == OUTMODE_LST || | ||
!isatty(STDOUT_FILENO)) | !isatty(STDOUT_FILENO)) | ||
use_pager = 0; | outst.use_pager = 0; | ||
if (use_pager && | if (outst.use_pager && | ||
(conf.output.width == 0 || conf.output.indent == 0) && | (conf.output.width == 0 || conf.output.indent == 0) && | ||
ioctl(STDOUT_FILENO, TIOCGWINSZ, &ws) != -1 && | ioctl(STDOUT_FILENO, TIOCGWINSZ, &ws) != -1 && | ||
ws.ws_col > 1) { | ws.ws_col > 1) { | ||
|
|
||
} | } | ||
#if HAVE_PLEDGE | #if HAVE_PLEDGE | ||
if (!use_pager) | if (outst.use_pager == 0) { | ||
if (pledge("stdio rpath", NULL) == -1) | if (pledge("stdio rpath", NULL) == -1) { | ||
err((int)MANDOCLEVEL_SYSERR, "pledge"); | mandoc_msg(MANDOCERR_PLEDGE, 0, 0, | ||
"%s", strerror(errno)); | |||
return mandoc_msg_getrc(); | |||
} | |||
} | |||
#endif | #endif | ||
/* Parse arguments. */ | /* Parse arguments. */ | ||
|
|
||
argc -= optind; | argc -= optind; | ||
argv += optind; | argv += optind; | ||
} | } | ||
resp = NULL; | |||
/* | /* | ||
* Quirks for help(1) | * Quirks for help(1) and man(1), | ||
* and for a man(1) section argument without -s. | * in particular for a section argument without -s. | ||
*/ | */ | ||
if (search.argmode == ARG_NAME) { | if (search.argmode == ARG_NAME) { | ||
|
|
||
} else if (argc > 1 && | } else if (argc > 1 && | ||
((uc = (unsigned char *)argv[0]) != NULL) && | ((uc = (unsigned char *)argv[0]) != NULL) && | ||
((isdigit(uc[0]) && (uc[1] == '\0' || | ((isdigit(uc[0]) && (uc[1] == '\0' || | ||
(isalpha(uc[1]) && uc[2] == '\0'))) || | isalpha(uc[1]))) || | ||
(uc[0] == 'n' && uc[1] == '\0'))) { | (uc[0] == 'n' && uc[1] == '\0'))) { | ||
search.sec = (char *)uc; | search.sec = (char *)uc; | ||
argv++; | argv++; | ||
|
|
||
if (search.arch == NULL) | if (search.arch == NULL) | ||
search.arch = MACHINE; | search.arch = MACHINE; | ||
#endif | #endif | ||
if (outmode == OUTMODE_ONE) | |||
search.firstmatch = 1; | |||
} | } | ||
rc = MANDOCLEVEL_OK; | /* | ||
* Use the first argument for -O tag in addition to | |||
* using it as a search term for man(1) or apropos(1). | |||
*/ | |||
/* man(1), whatis(1), apropos(1) */ | if (conf.output.tag != NULL && *conf.output.tag == '\0') { | ||
tagarg = argc > 0 && search.argmode == ARG_EXPR ? | |||
strchr(*argv, '=') : NULL; | |||
conf.output.tag = tagarg == NULL ? *argv : tagarg + 1; | |||
} | |||
if (search.argmode != ARG_FILE) { | /* Read the configuration file. */ | ||
if (search.argmode == ARG_NAME && | |||
outmode == OUTMODE_ONE) | |||
search.firstmatch = 1; | |||
/* Access the mandoc database. */ | if (search.argmode != ARG_FILE) | ||
manconf_parse(&conf, conf_file, defpaths, auxpaths); | manconf_parse(&conf, conf_file, defpaths, auxpaths); | ||
if ( ! mansearch(&search, &conf.manpath, | |||
argc, argv, &res, &sz)) | |||
usage(search.argmode); | |||
if (sz == 0 && search.argmode == ARG_NAME) | /* man(1): Resolve each name individually. */ | ||
fs_search(&search, &conf.manpath, | |||
argc, argv, &res, &sz); | |||
if (search.argmode == ARG_NAME) { | if (search.argmode == ARG_NAME) { | ||
for (c = 0; c < argc; c++) { | if (argc < 1) { | ||
if (strchr(argv[c], '/') == NULL) | if (outmode != OUTMODE_FLN) | ||
usage(ARG_NAME); | |||
if (conf.manpath.sz == 0) { | |||
warnx("The manpath is empty."); | |||
mandoc_msg_setrc(MANDOCLEVEL_BADARG); | |||
} else { | |||
for (i = 0; i + 1 < conf.manpath.sz; i++) | |||
printf("%s:", conf.manpath.paths[i]); | |||
printf("%s\n", conf.manpath.paths[i]); | |||
} | |||
manconf_free(&conf); | |||
return (int)mandoc_msg_getrc(); | |||
} | |||
for (res = NULL, ressz = 0; argc > 0; argc--, argv++) { | |||
(void)mansearch(&search, &conf.manpath, | |||
1, argv, &resn, &resnsz); | |||
if (resnsz == 0) | |||
(void)fs_search(&search, &conf.manpath, | |||
*argv, &resn, &resnsz); | |||
if (resnsz == 0 && strchr(*argv, '/') == NULL) { | |||
if (search.arch != NULL && | |||
arch_valid(search.arch, OSENUM) == 0) | |||
warnx("Unknown architecture \"%s\".", | |||
search.arch); | |||
else if (search.sec != NULL) | |||
warnx("No entry for %s in " | |||
"section %s of the manual.", | |||
*argv, search.sec); | |||
else | |||
warnx("No entry for %s in " | |||
"the manual.", *argv); | |||
mandoc_msg_setrc(MANDOCLEVEL_BADARG); | |||
continue; | |||
} | |||
if (resnsz == 0) { | |||
if (access(*argv, R_OK) == -1) { | |||
mandoc_msg_setinfilename(*argv); | |||
mandoc_msg(MANDOCERR_BADARG_BAD, | |||
0, 0, "%s", strerror(errno)); | |||
mandoc_msg_setinfilename(NULL); | |||
continue; | continue; | ||
if (access(argv[c], R_OK) == -1) { | |||
warn("%s", argv[c]); | |||
continue; | |||
} | } | ||
resnsz = 1; | |||
resn = mandoc_calloc(resnsz, sizeof(*res)); | |||
resn->file = mandoc_strdup(*argv); | |||
resn->ipath = SIZE_MAX; | |||
resn->form = FORM_SRC; | |||
} | |||
if (outmode != OUTMODE_ONE || resnsz == 1) { | |||
res = mandoc_reallocarray(res, | res = mandoc_reallocarray(res, | ||
sz + 1, sizeof(*res)); | ressz + resnsz, sizeof(*res)); | ||
res[sz].file = mandoc_strdup(argv[c]); | memcpy(res + ressz, resn, | ||
res[sz].names = NULL; | sizeof(*resn) * resnsz); | ||
res[sz].output = NULL; | ressz += resnsz; | ||
res[sz].ipath = SIZE_MAX; | continue; | ||
res[sz].bits = 0; | |||
res[sz].sec = 10; | |||
res[sz].form = FORM_SRC; | |||
sz++; | |||
} | } | ||
} | |||
if (sz == 0) { | /* Search for the best section. */ | ||
if (search.argmode != ARG_NAME) | |||
warnx("nothing appropriate"); | |||
rc = MANDOCLEVEL_BADARG; | |||
goto out; | |||
} | |||
/* | best_prio = 40; | ||
* For standard man(1) and -a output mode, | for (ib = i = 0; i < resnsz; i++) { | ||
* prepare for copying filename pointers | sec = resn[i].file; | ||
* into the program parameter array. | |||
*/ | |||
if (outmode == OUTMODE_ONE) { | |||
argc = 1; | |||
best_prio = 20; | |||
} else if (outmode == OUTMODE_ALL) | |||
argc = (int)sz; | |||
/* Iterate all matching manuals. */ | |||
resp = res; | |||
for (i = 0; i < sz; i++) { | |||
if (outmode == OUTMODE_FLN) | |||
puts(res[i].file); | |||
else if (outmode == OUTMODE_LST) | |||
printf("%s - %s\n", res[i].names, | |||
res[i].output == NULL ? "" : | |||
res[i].output); | |||
else if (outmode == OUTMODE_ONE) { | |||
/* Search for the best section. */ | |||
sec = res[i].file; | |||
sec += strcspn(sec, "123456789"); | sec += strcspn(sec, "123456789"); | ||
if (sec[0] == '\0') | if (sec[0] == '\0') | ||
continue; | continue; /* No section at all. */ | ||
prio = sec_prios[sec[0] - '1']; | prio = sec_prios[sec[0] - '1']; | ||
if (sec[1] != '/') | if (search.sec != NULL) { | ||
prio += 10; | ssz = strlen(search.sec); | ||
if (strncmp(sec, search.sec, ssz) == 0) | |||
sec += ssz; | |||
} else | |||
sec++; /* Prefer without suffix. */ | |||
if (*sec != '/') | |||
prio += 10; /* Wrong dir name. */ | |||
if (search.sec != NULL && | |||
(strlen(sec) <= ssz + 3 || | |||
strcmp(sec + strlen(sec) - ssz, | |||
search.sec) != 0)) | |||
prio += 20; /* Wrong file ext. */ | |||
if (prio >= best_prio) | if (prio >= best_prio) | ||
continue; | continue; | ||
best_prio = prio; | best_prio = prio; | ||
resp = res + i; | ib = i; | ||
} | } | ||
res = mandoc_reallocarray(res, ressz + 1, | |||
sizeof(*res)); | |||
memcpy(res + ressz++, resn + ib, sizeof(*resn)); | |||
} | } | ||
/* | /* apropos(1), whatis(1): Process the full search expression. */ | ||
* For man(1), -a and -i output mode, fall through | |||
* to the main mandoc(1) code iterating files | |||
* and running the parsers on each of them. | |||
*/ | |||
if (outmode == OUTMODE_FLN || outmode == OUTMODE_LST) | } else if (search.argmode != ARG_FILE) { | ||
if (mansearch(&search, &conf.manpath, | |||
argc, argv, &res, &ressz) == 0) | |||
usage(search.argmode); | |||
if (ressz == 0) { | |||
warnx("nothing appropriate"); | |||
mandoc_msg_setrc(MANDOCLEVEL_BADARG); | |||
goto out; | goto out; | ||
} | } | ||
/* mandoc(1) */ | /* mandoc(1): Take command line arguments as file names. */ | ||
#if HAVE_PLEDGE | |||
if (use_pager) { | |||
if (pledge("stdio rpath tmppath tty proc exec", NULL) == -1) | |||
err((int)MANDOCLEVEL_SYSERR, "pledge"); | |||
} else { | } else { | ||
if (pledge("stdio rpath", NULL) == -1) | ressz = argc > 0 ? argc : 1; | ||
err((int)MANDOCLEVEL_SYSERR, "pledge"); | res = mandoc_calloc(ressz, sizeof(*res)); | ||
for (i = 0; i < ressz; i++) { | |||
if (argc > 0) | |||
res[i].file = mandoc_strdup(argv[i]); | |||
res[i].ipath = SIZE_MAX; | |||
res[i].form = FORM_SRC; | |||
} | |||
} | } | ||
#endif | |||
if (search.argmode == ARG_FILE) | switch (outmode) { | ||
moptions(&options, auxpaths); | case OUTMODE_FLN: | ||
for (i = 0; i < ressz; i++) | |||
puts(res[i].file); | |||
goto out; | |||
case OUTMODE_LST: | |||
for (i = 0; i < ressz; i++) | |||
printf("%s - %s\n", res[i].names, | |||
res[i].output == NULL ? "" : | |||
res[i].output); | |||
goto out; | |||
default: | |||
break; | |||
} | |||
if (search.argmode == ARG_FILE && auxpaths != NULL) { | |||
if (strcmp(auxpaths, "doc") == 0) | |||
options |= MPARSE_MDOC; | |||
else if (strcmp(auxpaths, "an") == 0) | |||
options |= MPARSE_MAN; | |||
} | |||
mchars_alloc(); | mchars_alloc(); | ||
curp.mp = mparse_alloc(options, curp.mmin, mmsg, | mp = mparse_alloc(options, os_e, os_s); | ||
curp.os_e, curp.os_s); | |||
/* | /* | ||
* Conditionally start up the lookaside buffer before parsing. | |||
*/ | |||
if (OUTT_MAN == curp.outtype) | |||
mparse_keep(curp.mp); | |||
if (argc < 1) { | |||
if (use_pager) | |||
tag_files = tag_init(); | |||
parse(&curp, STDIN_FILENO, "<stdin>"); | |||
} | |||
/* | |||
* Remember the original working directory, if possible. | * Remember the original working directory, if possible. | ||
* This will be needed if some names on the command line | * This will be needed if some names on the command line | ||
* are page names and some are relative file names. | * are page names and some are relative file names. | ||
|
|
||
* readable: Maybe it won't be needed after all. | * readable: Maybe it won't be needed after all. | ||
*/ | */ | ||
startdir = open(".", O_RDONLY | O_DIRECTORY); | startdir = open(".", O_RDONLY | O_DIRECTORY); | ||
for (i = 0; i < ressz; i++) { | |||
while (argc > 0) { | process_onefile(mp, res + i, startdir, &outst, &conf); | ||
if (outst.wstop && mandoc_msg_getrc() != MANDOCLEVEL_OK) | |||
/* | |||
* Changing directories is not needed in ARG_FILE mode. | |||
* Do it on a best-effort basis. Even in case of | |||
* failure, some functionality may still work. | |||
*/ | |||
if (resp != NULL) { | |||
if (resp->ipath != SIZE_MAX) | |||
(void)chdir(conf.manpath.paths[resp->ipath]); | |||
else if (startdir != -1) | |||
(void)fchdir(startdir); | |||
} | |||
fd = mparse_open(curp.mp, resp != NULL ? resp->file : *argv); | |||
if (fd != -1) { | |||
if (use_pager) { | |||
tag_files = tag_init(); | |||
use_pager = 0; | |||
} | |||
if (resp == NULL) | |||
parse(&curp, fd, *argv); | |||
else if (resp->form == FORM_SRC) | |||
parse(&curp, fd, resp->file); | |||
else | |||
passthrough(resp->file, fd, | |||
conf.output.synopsisonly); | |||
if (ferror(stdout)) { | |||
if (tag_files != NULL) { | |||
warn("%s", tag_files->ofn); | |||
tag_unlink(); | |||
tag_files = NULL; | |||
} else | |||
warn("stdout"); | |||
rc = MANDOCLEVEL_SYSERR; | |||
break; | |||
} | |||
if (argc > 1 && curp.outtype <= OUTT_UTF8) { | |||
if (curp.outdata == NULL) | |||
outdata_alloc(&curp); | |||
terminal_sepline(curp.outdata); | |||
} | |||
} else if (rc < MANDOCLEVEL_ERROR) | |||
rc = MANDOCLEVEL_ERROR; | |||
if (MANDOCLEVEL_OK != rc && curp.wstop) | |||
break; | break; | ||
if (resp != NULL) | |||
resp++; | |||
else | |||
argv++; | |||
if (--argc) | |||
mparse_reset(curp.mp); | |||
} | } | ||
if (startdir != -1) { | if (startdir != -1) { | ||
(void)fchdir(startdir); | (void)fchdir(startdir); | ||
close(startdir); | close(startdir); | ||
} | } | ||
term_tag_finish(); | |||
if (curp.outdata != NULL) { | if (outst.outdata != NULL) { | ||
switch (curp.outtype) { | switch (outst.outtype) { | ||
case OUTT_HTML: | case OUTT_HTML: | ||
html_free(curp.outdata); | html_free(outst.outdata); | ||
break; | break; | ||
case OUTT_UTF8: | case OUTT_UTF8: | ||
case OUTT_LOCALE: | case OUTT_LOCALE: | ||
case OUTT_ASCII: | case OUTT_ASCII: | ||
ascii_free(curp.outdata); | ascii_free(outst.outdata); | ||
break; | break; | ||
case OUTT_PDF: | case OUTT_PDF: | ||
case OUTT_PS: | case OUTT_PS: | ||
pspdf_free(curp.outdata); | pspdf_free(outst.outdata); | ||
break; | break; | ||
default: | default: | ||
break; | break; | ||
} | } | ||
} | } | ||
mandoc_xr_free(); | mandoc_xr_free(); | ||
mparse_free(curp.mp); | mparse_free(mp); | ||
mchars_free(); | mchars_free(); | ||
out: | out: | ||
if (search.argmode != ARG_FILE) { | mansearch_free(res, ressz); | ||
if (search.argmode != ARG_FILE) | |||
manconf_free(&conf); | manconf_free(&conf); | ||
mansearch_free(res, sz); | |||
} | |||
free(curp.os_s); | if (outst.tag_files != NULL) { | ||
/* | |||
* When using a pager, finish writing both temporary files, | |||
* fork it, wait for the user to close it, and clean up. | |||
*/ | |||
if (tag_files != NULL) { | |||
fclose(stdout); | fclose(stdout); | ||
tag_write(); | run_pager(outst.tag_files); | ||
man_pgid = getpgid(0); | term_tag_unlink(); | ||
tag_files->tcpgid = man_pgid == getpid() ? | } else if (outst.had_output && outst.outtype != OUTT_LINT) | ||
getpgid(getppid()) : man_pgid; | mandoc_msg_summary(); | ||
pager_pid = 0; | |||
signum = SIGSTOP; | |||
for (;;) { | |||
/* Stop here until moved to the foreground. */ | return (int)mandoc_msg_getrc(); | ||
tc_pgid = tcgetpgrp(tag_files->ofd); | |||
if (tc_pgid != man_pgid) { | |||
if (tc_pgid == pager_pid) { | |||
(void)tcsetpgrp(tag_files->ofd, | |||
man_pgid); | |||
if (signum == SIGTTIN) | |||
continue; | |||
} else | |||
tag_files->tcpgid = tc_pgid; | |||
kill(0, signum); | |||
continue; | |||
} | |||
/* Once in the foreground, activate the pager. */ | |||
if (pager_pid) { | |||
(void)tcsetpgrp(tag_files->ofd, pager_pid); | |||
kill(pager_pid, SIGCONT); | |||
} else | |||
pager_pid = spawn_pager(tag_files); | |||
/* Wait for the pager to stop or exit. */ | |||
while ((pid = waitpid(pager_pid, &status, | |||
WUNTRACED)) == -1 && errno == EINTR) | |||
continue; | |||
if (pid == -1) { | |||
warn("wait"); | |||
rc = MANDOCLEVEL_SYSERR; | |||
break; | |||
} | |||
if (!WIFSTOPPED(status)) | |||
break; | |||
signum = WSTOPSIG(status); | |||
} | |||
tag_unlink(); | |||
} | |||
return (int)rc; | |||
} | } | ||
static void | static void | ||
usage(enum argmode argmode) | usage(enum argmode argmode) | ||
{ | { | ||
switch (argmode) { | switch (argmode) { | ||
case ARG_FILE: | case ARG_FILE: | ||
fputs("usage: mandoc [-ac] [-I os=name] " | fputs("usage: mandoc [-ac] [-I os=name] " | ||
|
|
||
exit((int)MANDOCLEVEL_BADARG); | exit((int)MANDOCLEVEL_BADARG); | ||
} | } | ||
static void | |||
glob_esc(char **dst, const char *src, const char *suffix) | |||
{ | |||
while (*src != '\0') { | |||
if (strchr("*?[", *src) != NULL) | |||
*(*dst)++ = '\\'; | |||
*(*dst)++ = *src++; | |||
} | |||
while (*suffix != '\0') | |||
*(*dst)++ = *suffix++; | |||
} | |||
static int | static int | ||
fs_lookup(const struct manpaths *paths, size_t ipath, | fs_lookup(const struct manpaths *paths, size_t ipath, | ||
const char *sec, const char *arch, const char *name, | const char *sec, const char *arch, const char *name, | ||
struct manpage **res, size_t *ressz) | struct manpage **res, size_t *ressz) | ||
{ | { | ||
struct stat sb; | |||
glob_t globinfo; | glob_t globinfo; | ||
struct manpage *page; | struct manpage *page; | ||
char *file; | char *file, *cp; | ||
int globres; | int globres; | ||
enum form form; | enum form form; | ||
const char *const slman = "/man"; | |||
const char *const slash = "/"; | |||
const char *const sglob = ".[01-9]*"; | |||
form = FORM_SRC; | form = FORM_SRC; | ||
mandoc_asprintf(&file, "%s/man%s/%s.%s", | mandoc_asprintf(&file, "%s/man%s/%s.%s", | ||
paths->paths[ipath], sec, name, sec); | paths->paths[ipath], sec, name, sec); | ||
if (access(file, R_OK) != -1) | if (stat(file, &sb) != -1) | ||
goto found; | goto found; | ||
free(file); | free(file); | ||
mandoc_asprintf(&file, "%s/cat%s/%s.0", | mandoc_asprintf(&file, "%s/cat%s/%s.0", | ||
paths->paths[ipath], sec, name); | paths->paths[ipath], sec, name); | ||
if (access(file, R_OK) != -1) { | if (stat(file, &sb) != -1) { | ||
form = FORM_CAT; | form = FORM_CAT; | ||
goto found; | goto found; | ||
} | } | ||
|
|
||
if (arch != NULL) { | if (arch != NULL) { | ||
mandoc_asprintf(&file, "%s/man%s/%s/%s.%s", | mandoc_asprintf(&file, "%s/man%s/%s/%s.%s", | ||
paths->paths[ipath], sec, arch, name, sec); | paths->paths[ipath], sec, arch, name, sec); | ||
if (access(file, R_OK) != -1) | if (stat(file, &sb) != -1) | ||
goto found; | goto found; | ||
free(file); | free(file); | ||
} | } | ||
mandoc_asprintf(&file, "%s/man%s/%s.[01-9]*", | cp = file = mandoc_malloc(strlen(paths->paths[ipath]) * 2 + | ||
paths->paths[ipath], sec, name); | strlen(slman) + strlen(sec) * 2 + strlen(slash) + | ||
strlen(name) * 2 + strlen(sglob) + 1); | |||
glob_esc(&cp, paths->paths[ipath], slman); | |||
glob_esc(&cp, sec, slash); | |||
glob_esc(&cp, name, sglob); | |||
*cp = '\0'; | |||
globres = glob(file, 0, NULL, &globinfo); | globres = glob(file, 0, NULL, &globinfo); | ||
if (globres != 0 && globres != GLOB_NOMATCH) | if (globres != 0 && globres != GLOB_NOMATCH) | ||
warn("%s: glob", file); | mandoc_msg(MANDOCERR_GLOB, 0, 0, | ||
"%s: %s", file, strerror(errno)); | |||
free(file); | free(file); | ||
if (globres == 0) | if (globres == 0) | ||
file = mandoc_strdup(*globinfo.gl_pathv); | file = mandoc_strdup(*globinfo.gl_pathv); | ||
globfree(&globinfo); | globfree(&globinfo); | ||
if (globres == 0) | if (globres == 0) { | ||
goto found; | if (stat(file, &sb) != -1) | ||
goto found; | |||
free(file); | |||
} | |||
if (res != NULL || ipath + 1 != paths->sz) | if (res != NULL || ipath + 1 != paths->sz) | ||
return 0; | return -1; | ||
mandoc_asprintf(&file, "%s.%s", name, sec); | mandoc_asprintf(&file, "%s.%s", name, sec); | ||
globres = access(file, R_OK); | globres = stat(file, &sb); | ||
free(file); | free(file); | ||
return globres != -1; | return globres; | ||
found: | found: | ||
warnx("outdated mandoc.db lacks %s(%s) entry, run %s %s", | warnx("outdated mandoc.db lacks %s(%s) entry, run %s %s", | ||
name, sec, BINM_MAKEWHATIS, paths->paths[ipath]); | name, sec, BINM_MAKEWHATIS, paths->paths[ipath]); | ||
if (res == NULL) { | if (res == NULL) { | ||
free(file); | free(file); | ||
return 1; | return 0; | ||
} | } | ||
*res = mandoc_reallocarray(*res, ++*ressz, sizeof(struct manpage)); | *res = mandoc_reallocarray(*res, ++*ressz, sizeof(**res)); | ||
page = *res + (*ressz - 1); | page = *res + (*ressz - 1); | ||
page->file = file; | page->file = file; | ||
page->names = NULL; | page->names = NULL; | ||
page->output = NULL; | page->output = NULL; | ||
page->ipath = ipath; | |||
page->bits = NAME_FILE & NAME_MASK; | page->bits = NAME_FILE & NAME_MASK; | ||
page->ipath = ipath; | |||
page->sec = (*sec >= '1' && *sec <= '9') ? *sec - '1' + 1 : 10; | page->sec = (*sec >= '1' && *sec <= '9') ? *sec - '1' + 1 : 10; | ||
page->form = form; | page->form = form; | ||
return 1; | return 0; | ||
} | } | ||
static int | static int | ||
fs_search(const struct mansearch *cfg, const struct manpaths *paths, | fs_search(const struct mansearch *cfg, const struct manpaths *paths, | ||
int argc, char **argv, struct manpage **res, size_t *ressz) | const char *name, struct manpage **res, size_t *ressz) | ||
{ | { | ||
const char *const sections[] = | const char *const sections[] = | ||
{"1", "8", "6", "2", "3", "5", "7", "4", "9", "3p"}; | {"1", "8", "6", "2", "3", "5", "7", "4", "9", "3p"}; | ||
const size_t nsec = sizeof(sections)/sizeof(sections[0]); | const size_t nsec = sizeof(sections)/sizeof(sections[0]); | ||
size_t ipath, isec, lastsz; | size_t ipath, isec; | ||
assert(cfg->argmode == ARG_NAME); | assert(cfg->argmode == ARG_NAME); | ||
if (res != NULL) | if (res != NULL) | ||
*res = NULL; | *res = NULL; | ||
*ressz = lastsz = 0; | *ressz = 0; | ||
while (argc) { | for (ipath = 0; ipath < paths->sz; ipath++) { | ||
for (ipath = 0; ipath < paths->sz; ipath++) { | if (cfg->sec != NULL) { | ||
if (cfg->sec != NULL) { | if (fs_lookup(paths, ipath, cfg->sec, cfg->arch, | ||
if (fs_lookup(paths, ipath, cfg->sec, | name, res, ressz) != -1 && cfg->firstmatch) | ||
cfg->arch, *argv, res, ressz) && | return 0; | ||
cfg->firstmatch) | } else { | ||
return 1; | for (isec = 0; isec < nsec; isec++) | ||
} else for (isec = 0; isec < nsec; isec++) | |||
if (fs_lookup(paths, ipath, sections[isec], | if (fs_lookup(paths, ipath, sections[isec], | ||
cfg->arch, *argv, res, ressz) && | cfg->arch, name, res, ressz) != -1 && | ||
cfg->firstmatch) | cfg->firstmatch) | ||
return 1; | return 0; | ||
} | } | ||
if (res != NULL && *ressz == lastsz && | |||
strchr(*argv, '/') == NULL) | |||
warnx("No entry for %s in the manual.", *argv); | |||
lastsz = *ressz; | |||
argv++; | |||
argc--; | |||
} | } | ||
return 0; | return -1; | ||
} | } | ||
static void | static void | ||
parse(struct curparse *curp, int fd, const char *file) | process_onefile(struct mparse *mp, struct manpage *resp, int startdir, | ||
struct outstate *outst, struct manconf *conf) | |||
{ | { | ||
enum mandoclevel rctmp; | int fd; | ||
struct roff_man *man; | |||
/* Begin by parsing the file itself. */ | /* | ||
* Changing directories is not needed in ARG_FILE mode. | |||
* Do it on a best-effort basis. Even in case of | |||
* failure, some functionality may still work. | |||
*/ | |||
if (resp->ipath != SIZE_MAX) | |||
(void)chdir(conf->manpath.paths[resp->ipath]); | |||
else if (startdir != -1) | |||
(void)fchdir(startdir); | |||
assert(file); | mandoc_msg_setinfilename(resp->file); | ||
if (resp->file != NULL) { | |||
if ((fd = mparse_open(mp, resp->file)) == -1) { | |||
mandoc_msg(resp->ipath == SIZE_MAX ? | |||
MANDOCERR_BADARG_BAD : MANDOCERR_OPEN, | |||
0, 0, "%s", strerror(errno)); | |||
mandoc_msg_setinfilename(NULL); | |||
return; | |||
} | |||
} else | |||
fd = STDIN_FILENO; | |||
if (outst->use_pager) { | |||
outst->use_pager = 0; | |||
outst->tag_files = term_tag_init(conf->output.tag); | |||
} | |||
if (outst->had_output && outst->outtype <= OUTT_UTF8) { | |||
if (outst->outdata == NULL) | |||
outdata_alloc(outst, &conf->output); | |||
terminal_sepline(outst->outdata); | |||
} | |||
if (resp->form == FORM_SRC) | |||
parse(mp, fd, resp->file, outst, &conf->output); | |||
else { | |||
passthrough(fd, conf->output.synopsisonly); | |||
outst->had_output = 1; | |||
} | |||
if (ferror(stdout)) { | |||
if (outst->tag_files != NULL) { | |||
mandoc_msg(MANDOCERR_WRITE, 0, 0, "%s: %s", | |||
outst->tag_files->ofn, strerror(errno)); | |||
term_tag_unlink(); | |||
outst->tag_files = NULL; | |||
} else | |||
mandoc_msg(MANDOCERR_WRITE, 0, 0, "%s", | |||
strerror(errno)); | |||
} | |||
mandoc_msg_setinfilename(NULL); | |||
} | |||
static void | |||
parse(struct mparse *mp, int fd, const char *file, | |||
struct outstate *outst, struct manoutput *outconf) | |||
{ | |||
static int previous; | |||
struct roff_meta *meta; | |||
assert(fd >= 0); | assert(fd >= 0); | ||
if (file == NULL) | |||
file = "<stdin>"; | |||
rctmp = mparse_readfd(curp->mp, fd, file); | if (previous) | ||
mparse_reset(mp); | |||
else | |||
previous = 1; | |||
mparse_readfd(mp, fd, file); | |||
if (fd != STDIN_FILENO) | if (fd != STDIN_FILENO) | ||
close(fd); | close(fd); | ||
if (rc < rctmp) | |||
rc = rctmp; | |||
/* | /* | ||
* With -Wstop and warnings or errors of at least the requested | * With -Wstop and warnings or errors of at least the requested | ||
* level, do not produce output. | * level, do not produce output. | ||
*/ | */ | ||
if (rctmp != MANDOCLEVEL_OK && curp->wstop) | if (outst->wstop && mandoc_msg_getrc() != MANDOCLEVEL_OK) | ||
return; | return; | ||
if (curp->outdata == NULL) | if (outst->outdata == NULL) | ||
outdata_alloc(curp); | outdata_alloc(outst, outconf); | ||
else if (outst->outtype == OUTT_HTML) | |||
html_reset(outst); | |||
mparse_result(curp->mp, &man, NULL); | mandoc_xr_reset(); | ||
meta = mparse_result(mp); | |||
/* Execute the out device, if it exists. */ | /* Execute the out device, if it exists. */ | ||
if (man == NULL) | outst->had_output = 1; | ||
return; | if (meta->macroset == MACROSET_MDOC) { | ||
mandoc_xr_reset(); | switch (outst->outtype) { | ||
if (man->macroset == MACROSET_MDOC) { | |||
if (curp->outtype != OUTT_TREE || !curp->outopts->noval) | |||
mdoc_validate(man); | |||
switch (curp->outtype) { | |||
case OUTT_HTML: | case OUTT_HTML: | ||
html_mdoc(curp->outdata, man); | html_mdoc(outst->outdata, meta); | ||
break; | break; | ||
case OUTT_TREE: | case OUTT_TREE: | ||
tree_mdoc(curp->outdata, man); | tree_mdoc(outst->outdata, meta); | ||
break; | break; | ||
case OUTT_MAN: | case OUTT_MAN: | ||
man_mdoc(curp->outdata, man); | man_mdoc(outst->outdata, meta); | ||
break; | break; | ||
case OUTT_PDF: | case OUTT_PDF: | ||
case OUTT_ASCII: | case OUTT_ASCII: | ||
case OUTT_UTF8: | case OUTT_UTF8: | ||
case OUTT_LOCALE: | case OUTT_LOCALE: | ||
case OUTT_PS: | case OUTT_PS: | ||
terminal_mdoc(curp->outdata, man); | terminal_mdoc(outst->outdata, meta); | ||
break; | break; | ||
case OUTT_MARKDOWN: | case OUTT_MARKDOWN: | ||
markdown_mdoc(curp->outdata, man); | markdown_mdoc(outst->outdata, meta); | ||
break; | break; | ||
default: | default: | ||
break; | break; | ||
} | } | ||
} | } | ||
if (man->macroset == MACROSET_MAN) { | if (meta->macroset == MACROSET_MAN) { | ||
if (curp->outtype != OUTT_TREE || !curp->outopts->noval) | switch (outst->outtype) { | ||
man_validate(man); | |||
switch (curp->outtype) { | |||
case OUTT_HTML: | case OUTT_HTML: | ||
html_man(curp->outdata, man); | html_man(outst->outdata, meta); | ||
break; | break; | ||
case OUTT_TREE: | case OUTT_TREE: | ||
tree_man(curp->outdata, man); | tree_man(outst->outdata, meta); | ||
break; | break; | ||
case OUTT_MAN: | case OUTT_MAN: | ||
man_man(curp->outdata, man); | mparse_copy(mp); | ||
break; | break; | ||
case OUTT_PDF: | case OUTT_PDF: | ||
case OUTT_ASCII: | case OUTT_ASCII: | ||
case OUTT_UTF8: | case OUTT_UTF8: | ||
case OUTT_LOCALE: | case OUTT_LOCALE: | ||
case OUTT_PS: | case OUTT_PS: | ||
terminal_man(curp->outdata, man); | terminal_man(outst->outdata, meta); | ||
break; | break; | ||
default: | default: | ||
break; | break; | ||
} | } | ||
} | } | ||
if (curp->mmin < MANDOCERR_STYLE) | if (mandoc_msg_getmin() < MANDOCERR_STYLE) | ||
check_xr(file); | check_xr(); | ||
mparse_updaterc(curp->mp, &rc); | |||
} | } | ||
static void | static void | ||
check_xr(const char *file) | check_xr(void) | ||
{ | { | ||
static struct manpaths paths; | static struct manpaths paths; | ||
struct mansearch search; | struct mansearch search; | ||
struct mandoc_xr *xr; | struct mandoc_xr *xr; | ||
char *cp; | |||
size_t sz; | size_t sz; | ||
if (paths.sz == 0) | if (paths.sz == 0) | ||
|
|
||
search.firstmatch = 1; | search.firstmatch = 1; | ||
if (mansearch(&search, &paths, 1, &xr->name, NULL, &sz)) | if (mansearch(&search, &paths, 1, &xr->name, NULL, &sz)) | ||
continue; | continue; | ||
if (fs_search(&search, &paths, 1, &xr->name, NULL, &sz)) | if (fs_search(&search, &paths, xr->name, NULL, &sz) != -1) | ||
continue; | continue; | ||
if (xr->count == 1) | if (xr->count == 1) | ||
mandoc_asprintf(&cp, "Xr %s %s", xr->name, xr->sec); | mandoc_msg(MANDOCERR_XR_BAD, xr->line, | ||
xr->pos + 1, "Xr %s %s", xr->name, xr->sec); | |||
else | else | ||
mandoc_asprintf(&cp, "Xr %s %s (%d times)", | mandoc_msg(MANDOCERR_XR_BAD, xr->line, | ||
xr->pos + 1, "Xr %s %s (%d times)", | |||
xr->name, xr->sec, xr->count); | xr->name, xr->sec, xr->count); | ||
mmsg(MANDOCERR_XR_BAD, MANDOCLEVEL_STYLE, | |||
file, xr->line, xr->pos + 1, cp); | |||
free(cp); | |||
} | } | ||
} | } | ||
static void | static void | ||
outdata_alloc(struct curparse *curp) | outdata_alloc(struct outstate *outst, struct manoutput *outconf) | ||
{ | { | ||
switch (curp->outtype) { | switch (outst->outtype) { | ||
case OUTT_HTML: | case OUTT_HTML: | ||
curp->outdata = html_alloc(curp->outopts); | outst->outdata = html_alloc(outconf); | ||
break; | break; | ||
case OUTT_UTF8: | case OUTT_UTF8: | ||
curp->outdata = utf8_alloc(curp->outopts); | outst->outdata = utf8_alloc(outconf); | ||
break; | break; | ||
case OUTT_LOCALE: | case OUTT_LOCALE: | ||
curp->outdata = locale_alloc(curp->outopts); | outst->outdata = locale_alloc(outconf); | ||
break; | break; | ||
case OUTT_ASCII: | case OUTT_ASCII: | ||
curp->outdata = ascii_alloc(curp->outopts); | outst->outdata = ascii_alloc(outconf); | ||
break; | break; | ||
case OUTT_PDF: | case OUTT_PDF: | ||
curp->outdata = pdf_alloc(curp->outopts); | outst->outdata = pdf_alloc(outconf); | ||
break; | break; | ||
case OUTT_PS: | case OUTT_PS: | ||
curp->outdata = ps_alloc(curp->outopts); | outst->outdata = ps_alloc(outconf); | ||
break; | break; | ||
default: | default: | ||
break; | break; | ||
|
|
||
} | } | ||
static void | static void | ||
passthrough(const char *file, int fd, int synopsis_only) | passthrough(int fd, int synopsis_only) | ||
{ | { | ||
const char synb[] = "S\bSY\bYN\bNO\bOP\bPS\bSI\bIS\bS"; | const char synb[] = "S\bSY\bYN\bNO\bOP\bPS\bSI\bIS\bS"; | ||
const char synr[] = "SYNOPSIS"; | const char synr[] = "SYNOPSIS"; | ||
FILE *stream; | FILE *stream; | ||
const char *syscall; | |||
char *line, *cp; | char *line, *cp; | ||
size_t linesz; | size_t linesz; | ||
ssize_t len, written; | ssize_t len, written; | ||
int print; | int lno, print; | ||
stream = NULL; | |||
line = NULL; | line = NULL; | ||
linesz = 0; | linesz = 0; | ||
if (fflush(stdout) == EOF) { | if (fflush(stdout) == EOF) { | ||
syscall = "fflush"; | mandoc_msg(MANDOCERR_FFLUSH, 0, 0, "%s", strerror(errno)); | ||
goto fail; | goto done; | ||
} | } | ||
if ((stream = fdopen(fd, "r")) == NULL) { | if ((stream = fdopen(fd, "r")) == NULL) { | ||
close(fd); | close(fd); | ||
syscall = "fdopen"; | mandoc_msg(MANDOCERR_FDOPEN, 0, 0, "%s", strerror(errno)); | ||
goto fail; | goto done; | ||
} | } | ||
print = 0; | lno = print = 0; | ||
while ((len = getline(&line, &linesz, stream)) != -1) { | while ((len = getline(&line, &linesz, stream)) != -1) { | ||
lno++; | |||
cp = line; | cp = line; | ||
if (synopsis_only) { | if (synopsis_only) { | ||
if (print) { | if (print) { | ||
|
|
||
} | } | ||
} | } | ||
for (; len > 0; len -= written) { | for (; len > 0; len -= written) { | ||
if ((written = write(STDOUT_FILENO, cp, len)) != -1) | if ((written = write(STDOUT_FILENO, cp, len)) == -1) { | ||
continue; | mandoc_msg(MANDOCERR_WRITE, 0, 0, | ||
fclose(stream); | "%s", strerror(errno)); | ||
syscall = "write"; | goto done; | ||
goto fail; | } | ||
} | } | ||
} | } | ||
if (ferror(stream)) | |||
mandoc_msg(MANDOCERR_GETLINE, lno, 0, "%s", strerror(errno)); | |||
if (ferror(stream)) { | |||
fclose(stream); | |||
syscall = "getline"; | |||
goto fail; | |||
} | |||
done: | done: | ||
free(line); | free(line); | ||
fclose(stream); | if (stream != NULL) | ||
return; | fclose(stream); | ||
fail: | |||
free(line); | |||
warn("%s: SYSERR: %s", file, syscall); | |||
if (rc < MANDOCLEVEL_SYSERR) | |||
rc = MANDOCLEVEL_SYSERR; | |||
} | } | ||
static int | static int | ||
koptions(int *options, char *arg) | woptions(char *arg, enum mandoc_os *os_e, int *wstop) | ||
{ | { | ||
if ( ! strcmp(arg, "utf-8")) { | |||
*options |= MPARSE_UTF8; | |||
*options &= ~MPARSE_LATIN1; | |||
} else if ( ! strcmp(arg, "iso-8859-1")) { | |||
*options |= MPARSE_LATIN1; | |||
*options &= ~MPARSE_UTF8; | |||
} else if ( ! strcmp(arg, "us-ascii")) { | |||
*options &= ~(MPARSE_UTF8 | MPARSE_LATIN1); | |||
} else { | |||
warnx("-K %s: Bad argument", arg); | |||
return 0; | |||
} | |||
return 1; | |||
} | |||
static void | |||
moptions(int *options, char *arg) | |||
{ | |||
if (arg == NULL) | |||
return; | |||
if (strcmp(arg, "doc") == 0) | |||
*options |= MPARSE_MDOC; | |||
else if (strcmp(arg, "an") == 0) | |||
*options |= MPARSE_MAN; | |||
} | |||
static int | |||
toptions(struct curparse *curp, char *arg) | |||
{ | |||
if (0 == strcmp(arg, "ascii")) | |||
curp->outtype = OUTT_ASCII; | |||
else if (0 == strcmp(arg, "lint")) { | |||
curp->outtype = OUTT_LINT; | |||
curp->mmin = MANDOCERR_BASE; | |||
mmsg_stream = stdout; | |||
} else if (0 == strcmp(arg, "tree")) | |||
curp->outtype = OUTT_TREE; | |||
else if (0 == strcmp(arg, "man")) | |||
curp->outtype = OUTT_MAN; | |||
else if (0 == strcmp(arg, "html")) | |||
curp->outtype = OUTT_HTML; | |||
else if (0 == strcmp(arg, "markdown")) | |||
curp->outtype = OUTT_MARKDOWN; | |||
else if (0 == strcmp(arg, "utf8")) | |||
curp->outtype = OUTT_UTF8; | |||
else if (0 == strcmp(arg, "locale")) | |||
curp->outtype = OUTT_LOCALE; | |||
else if (0 == strcmp(arg, "ps")) | |||
curp->outtype = OUTT_PS; | |||
else if (0 == strcmp(arg, "pdf")) | |||
curp->outtype = OUTT_PDF; | |||
else { | |||
warnx("-T %s: Bad argument", arg); | |||
return 0; | |||
} | |||
return 1; | |||
} | |||
static int | |||
woptions(struct curparse *curp, char *arg) | |||
{ | |||
char *v, *o; | char *v, *o; | ||
const char *toks[11]; | const char *toks[11]; | ||
|
|
||
o = arg; | o = arg; | ||
switch (getsubopt(&arg, (char * const *)toks, &v)) { | switch (getsubopt(&arg, (char * const *)toks, &v)) { | ||
case 0: | case 0: | ||
curp->wstop = 1; | *wstop = 1; | ||
break; | break; | ||
case 1: | case 1: | ||
case 2: | case 2: | ||
curp->mmin = MANDOCERR_BASE; | mandoc_msg_setmin(MANDOCERR_BASE); | ||
break; | break; | ||
case 3: | case 3: | ||
curp->mmin = MANDOCERR_STYLE; | mandoc_msg_setmin(MANDOCERR_STYLE); | ||
break; | break; | ||
case 4: | case 4: | ||
curp->mmin = MANDOCERR_WARNING; | mandoc_msg_setmin(MANDOCERR_WARNING); | ||
break; | break; | ||
case 5: | case 5: | ||
curp->mmin = MANDOCERR_ERROR; | mandoc_msg_setmin(MANDOCERR_ERROR); | ||
break; | break; | ||
case 6: | case 6: | ||
curp->mmin = MANDOCERR_UNSUPP; | mandoc_msg_setmin(MANDOCERR_UNSUPP); | ||
break; | break; | ||
case 7: | case 7: | ||
curp->mmin = MANDOCERR_MAX; | mandoc_msg_setmin(MANDOCERR_BADARG); | ||
break; | break; | ||
case 8: | case 8: | ||
curp->mmin = MANDOCERR_BASE; | mandoc_msg_setmin(MANDOCERR_BASE); | ||
curp->os_e = MANDOC_OS_OPENBSD; | *os_e = MANDOC_OS_OPENBSD; | ||
break; | break; | ||
case 9: | case 9: | ||
curp->mmin = MANDOCERR_BASE; | mandoc_msg_setmin(MANDOCERR_BASE); | ||
curp->os_e = MANDOC_OS_NETBSD; | *os_e = MANDOC_OS_NETBSD; | ||
break; | break; | ||
default: | default: | ||
warnx("-W %s: Bad argument", o); | mandoc_msg(MANDOCERR_BADARG_BAD, 0, 0, "-W %s", o); | ||
return 0; | return -1; | ||
} | } | ||
} | } | ||
return 1; | return 0; | ||
} | } | ||
/* | |||
* Wait until moved to the foreground, | |||
* then fork the pager and wait for the user to close it. | |||
*/ | |||
static void | static void | ||
mmsg(enum mandocerr t, enum mandoclevel lvl, | run_pager(struct tag_files *tag_files) | ||
const char *file, int line, int col, const char *msg) | |||
{ | { | ||
const char *mparse_msg; | int signum, status; | ||
pid_t man_pgid, tc_pgid; | |||
pid_t pager_pid, wait_pid; | |||
fprintf(mmsg_stream, "%s: %s:", getprogname(), | man_pgid = getpgid(0); | ||
file == NULL ? "<stdin>" : file); | tag_files->tcpgid = man_pgid == getpid() ? getpgid(getppid()) : | ||
man_pgid; | |||
pager_pid = 0; | |||
signum = SIGSTOP; | |||
if (line) | for (;;) { | ||
fprintf(mmsg_stream, "%d:%d:", line, col + 1); | /* Stop here until moved to the foreground. */ | ||
fprintf(mmsg_stream, " %s", mparse_strlevel(lvl)); | tc_pgid = tcgetpgrp(tag_files->ofd); | ||
if (tc_pgid != man_pgid) { | |||
if (tc_pgid == pager_pid) { | |||
(void)tcsetpgrp(tag_files->ofd, man_pgid); | |||
if (signum == SIGTTIN) | |||
continue; | |||
} else | |||
tag_files->tcpgid = tc_pgid; | |||
kill(0, signum); | |||
continue; | |||
} | |||
if ((mparse_msg = mparse_strerror(t)) != NULL) | /* Once in the foreground, activate the pager. */ | ||
fprintf(mmsg_stream, ": %s", mparse_msg); | |||
if (msg) | if (pager_pid) { | ||
fprintf(mmsg_stream, ": %s", msg); | (void)tcsetpgrp(tag_files->ofd, pager_pid); | ||
kill(pager_pid, SIGCONT); | |||
} else | |||
pager_pid = spawn_pager(tag_files); | |||
fputc('\n', mmsg_stream); | /* Wait for the pager to stop or exit. */ | ||
while ((wait_pid = waitpid(pager_pid, &status, | |||
WUNTRACED)) == -1 && errno == EINTR) | |||
continue; | |||
if (wait_pid == -1) { | |||
mandoc_msg(MANDOCERR_WAIT, 0, 0, | |||
"%s", strerror(errno)); | |||
break; | |||
} | |||
if (!WIFSTOPPED(status)) | |||
break; | |||
signum = WSTOPSIG(status); | |||
} | |||
} | } | ||
static pid_t | static pid_t | ||
|
|
||
char *argv[MAX_PAGER_ARGS]; | char *argv[MAX_PAGER_ARGS]; | ||
const char *pager; | const char *pager; | ||
char *cp; | char *cp; | ||
#if HAVE_LESS_T | |||
size_t cmdlen; | size_t cmdlen; | ||
int argc; | #endif | ||
int argc, use_ofn; | |||
pid_t pager_pid; | pid_t pager_pid; | ||
pager = getenv("MANPAGER"); | pager = getenv("MANPAGER"); | ||
|
|
||
*/ | */ | ||
argc = 0; | argc = 0; | ||
while (argc + 4 < MAX_PAGER_ARGS) { | while (argc + 5 < MAX_PAGER_ARGS) { | ||
argv[argc++] = cp; | argv[argc++] = cp; | ||
cp = strchr(cp, ' '); | cp = strchr(cp, ' '); | ||
if (cp == NULL) | if (cp == NULL) | ||
|
|
||
/* For less(1), use the tag file. */ | /* For less(1), use the tag file. */ | ||
if ((cmdlen = strlen(argv[0])) >= 4) { | use_ofn = 1; | ||
#if HAVE_LESS_T | |||
if (*tag_files->tfn != '\0' && (cmdlen = strlen(argv[0])) >= 4) { | |||
cp = argv[0] + cmdlen - 4; | cp = argv[0] + cmdlen - 4; | ||
if (strcmp(cp, "less") == 0) { | if (strcmp(cp, "less") == 0) { | ||
argv[argc++] = mandoc_strdup("-T"); | argv[argc++] = mandoc_strdup("-T"); | ||
argv[argc++] = tag_files->tfn; | argv[argc++] = tag_files->tfn; | ||
if (tag_files->tagname != NULL) { | |||
argv[argc++] = mandoc_strdup("-t"); | |||
argv[argc++] = tag_files->tagname; | |||
use_ofn = 0; | |||
} | |||
} | } | ||
} | } | ||
argv[argc++] = tag_files->ofn; | #endif | ||
if (use_ofn) | |||
argv[argc++] = tag_files->ofn; | |||
argv[argc] = NULL; | argv[argc] = NULL; | ||
switch (pager_pid = fork()) { | switch (pager_pid = fork()) { | ||
case -1: | case -1: | ||
err((int)MANDOCLEVEL_SYSERR, "fork"); | mandoc_msg(MANDOCERR_FORK, 0, 0, "%s", strerror(errno)); | ||
exit(mandoc_msg_getrc()); | |||
case 0: | case 0: | ||
break; | break; | ||
default: | default: | ||
(void)setpgid(pager_pid, 0); | (void)setpgid(pager_pid, 0); | ||
(void)tcsetpgrp(tag_files->ofd, pager_pid); | (void)tcsetpgrp(tag_files->ofd, pager_pid); | ||
#if HAVE_PLEDGE | #if HAVE_PLEDGE | ||
if (pledge("stdio rpath tmppath tty proc", NULL) == -1) | if (pledge("stdio rpath tmppath tty proc", NULL) == -1) { | ||
err((int)MANDOCLEVEL_SYSERR, "pledge"); | mandoc_msg(MANDOCERR_PLEDGE, 0, 0, | ||
"%s", strerror(errno)); | |||
exit(mandoc_msg_getrc()); | |||
} | |||
#endif | #endif | ||
tag_files->pager_pid = pager_pid; | tag_files->pager_pid = pager_pid; | ||
return pager_pid; | return pager_pid; | ||
|
|
||
/* The child process becomes the pager. */ | /* The child process becomes the pager. */ | ||
if (dup2(tag_files->ofd, STDOUT_FILENO) == -1) | if (dup2(tag_files->ofd, STDOUT_FILENO) == -1) { | ||
err((int)MANDOCLEVEL_SYSERR, "pager stdout"); | mandoc_msg(MANDOCERR_DUP, 0, 0, "%s", strerror(errno)); | ||
_exit(mandoc_msg_getrc()); | |||
} | |||
close(tag_files->ofd); | close(tag_files->ofd); | ||
assert(tag_files->tfd == -1); | assert(tag_files->tfs == NULL); | ||
/* Do not start the pager before controlling the terminal. */ | /* Do not start the pager before controlling the terminal. */ | ||
|
|
||
nanosleep(&timeout, NULL); | nanosleep(&timeout, NULL); | ||
execvp(argv[0], argv); | execvp(argv[0], argv); | ||
err((int)MANDOCLEVEL_SYSERR, "exec %s", argv[0]); | mandoc_msg(MANDOCERR_EXEC, 0, 0, "%s: %s", argv[0], strerror(errno)); | ||
_exit(mandoc_msg_getrc()); | |||
} | } |