![]() ![]() | ![]() |
version 1.262, 2016/01/08 02:53:13 | version 1.334, 2019/07/26 21:03:19 | ||
---|---|---|---|
|
|
||
/* $Id$ */ | /* $Id$ */ | ||
/* | /* | ||
* Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv> | * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv> | ||
* Copyright (c) 2010-2012, 2014-2016 Ingo Schwarze <schwarze@openbsd.org> | * Copyright (c) 2010-2012, 2014-2019 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 | ||
|
|
||
#include "config.h" | #include "config.h" | ||
#include <sys/types.h> | #include <sys/types.h> | ||
#include <sys/ioctl.h> | |||
#include <sys/param.h> /* MACHINE */ | #include <sys/param.h> /* MACHINE */ | ||
#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> | ||
#if HAVE_SANDBOX_INIT | |||
#include <sandbox.h> | |||
#endif | |||
#include <signal.h> | #include <signal.h> | ||
#include <stdio.h> | #include <stdio.h> | ||
#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 <unistd.h> | #include <unistd.h> | ||
#include "mandoc_aux.h" | #include "mandoc_aux.h" | ||
#include "mandoc.h" | #include "mandoc.h" | ||
#include "mandoc_xr.h" | |||
#include "roff.h" | #include "roff.h" | ||
#include "mdoc.h" | #include "mdoc.h" | ||
#include "man.h" | #include "man.h" | ||
#include "mandoc_parse.h" | |||
#include "tag.h" | #include "tag.h" | ||
#include "main.h" | #include "main.h" | ||
#include "manconf.h" | #include "manconf.h" | ||
#include "mansearch.h" | #include "mansearch.h" | ||
#if !defined(__GNUC__) || (__GNUC__ < 2) | |||
# if !defined(lint) | |||
# define __attribute__(x) | |||
# endif | |||
#endif /* !defined(__GNUC__) || (__GNUC__ < 2) */ | |||
enum outmode { | enum outmode { | ||
OUTMODE_DEF = 0, | OUTMODE_DEF = 0, | ||
OUTMODE_FLN, | OUTMODE_FLN, | ||
OUTMODE_LST, | OUTMODE_LST, | ||
OUTMODE_ALL, | OUTMODE_ALL, | ||
OUTMODE_INT, | |||
OUTMODE_ONE | OUTMODE_ONE | ||
}; | }; | ||
|
|
||
OUTT_TREE, /* -Ttree */ | OUTT_TREE, /* -Ttree */ | ||
OUTT_MAN, /* -Tman */ | OUTT_MAN, /* -Tman */ | ||
OUTT_HTML, /* -Thtml */ | OUTT_HTML, /* -Thtml */ | ||
OUTT_MARKDOWN, /* -Tmarkdown */ | |||
OUTT_LINT, /* -Tlint */ | OUTT_LINT, /* -Tlint */ | ||
OUTT_PS, /* -Tps */ | OUTT_PS, /* -Tps */ | ||
OUTT_PDF /* -Tpdf */ | OUTT_PDF /* -Tpdf */ | ||
}; | }; | ||
struct curparse { | struct curparse { | ||
struct mparse *mp; | struct manoutput *outopts; /* output options */ | ||
enum mandoclevel wlevel; /* ignore messages below this */ | void *outdata; /* data for output */ | ||
int wstop; /* stop after a file with a warning */ | int wstop; /* stop after a file with a warning */ | ||
enum outt outtype; /* which output to use */ | enum outt outtype; /* which output to use */ | ||
void *outdata; /* data for output */ | |||
struct manoutput *outopts; /* output options */ | |||
}; | }; | ||
int mandocdb(int, 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 void fs_search(const struct mansearch *, | static int fs_search(const struct mansearch *, | ||
const struct manpaths *, int, char**, | const struct manpaths *, int, char**, | ||
struct manpage **, size_t *); | struct manpage **, size_t *); | ||
static int koptions(int *, char *); | static void outdata_alloc(struct curparse *); | ||
#if HAVE_SQLITE3 | static void parse(struct mparse *, int, const char *, | ||
int mandocdb(int, char**); | struct curparse *); | ||
#endif | static void passthrough(int, int); | ||
static int moptions(int *, char *); | static void run_pager(struct tag_files *); | ||
static void mmsg(enum mandocerr, enum mandoclevel, | |||
const char *, int, int, const char *); | |||
static void parse(struct curparse *, int, const char *); | |||
static void passthrough(const char *, int, int); | |||
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(char *, enum mandoc_os *, int *); | ||
static int woptions(struct curparse *, char *); | |||
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; | |||
int | int | ||
main(int argc, char *argv[]) | main(int argc, char *argv[]) | ||
{ | { | ||
struct manconf conf; | struct manconf conf; /* Manpaths and output options. */ | ||
struct curparse curp; | struct curparse curp; | ||
struct mansearch search; | struct winsize ws; /* Result of ioctl(TIOCGWINSZ). */ | ||
struct tag_files *tag_files; | struct mansearch search; /* Search options. */ | ||
const char *progname; | struct manpage *res, *resp; /* Search results. */ | ||
char *auxpaths; | struct mparse *mp; /* Opaque parser object. */ | ||
char *defos; | struct tag_files *tag_files; /* Tagging state variables. */ | ||
const char *conf_file; /* -C: alternate config file. */ | |||
const char *os_s; /* -I: Operating system for display. */ | |||
const char *progname, *sec, *thisarg; | |||
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; | ||
struct manpage *res, *resp; | size_t sz; /* Number of elements in res[]. */ | ||
char *conf_file, *defpaths; | size_t i, ssz; | ||
size_t isec, i, sz; | int options; /* Parser options. */ | ||
int show_usage; /* Invalid argument: give up. */ | |||
int use_pager; /* According to command line. */ | |||
int prio, best_prio; | int prio, best_prio; | ||
char sec; | int fd, startdir; | ||
enum outmode outmode; | |||
int fd; | |||
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 | ||
#if HAVE_SQLITE3 | 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); | ||
#endif | |||
#if HAVE_PLEDGE | #if HAVE_PLEDGE | ||
if (pledge("stdio rpath tmppath tty proc exec flock", 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 (sandbox_init(kSBXProfileNoInternet, SANDBOX_NAMED, NULL) == -1) | |||
errx((int)MANDOCLEVEL_SYSERR, "sandbox_init"); | |||
#endif | |||
/* 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"; | ||
oarg = NULL; | |||
if (strcmp(progname, BINM_MAN) == 0) | if (strcmp(progname, BINM_MAN) == 0) | ||
search.argmode = ARG_NAME; | search.argmode = ARG_NAME; | ||
|
|
||
/* Parser and formatter options. */ | /* Parser and formatter options. */ | ||
os_e = MANDOC_OS_OTHER; | |||
os_s = NULL; | |||
memset(&curp, 0, sizeof(struct curparse)); | memset(&curp, 0, sizeof(struct curparse)); | ||
curp.outtype = OUTT_LOCALE; | curp.outtype = OUTT_LOCALE; | ||
curp.wlevel = MANDOCLEVEL_BADARG; | |||
curp.outopts = &conf.output; | curp.outopts = &conf.output; | ||
options = MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1; | options = MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1; | ||
defos = NULL; | |||
use_pager = 1; | use_pager = 1; | ||
tag_files = NULL; | tag_files = NULL; | ||
show_usage = 0; | show_usage = 0; | ||
outmode = OUTMODE_DEF; | outmode = OUTMODE_DEF; | ||
while (-1 != (c = getopt(argc, argv, | while ((c = getopt(argc, argv, | ||
"aC:cfhI:iK:klM:m:O:S:s:T:VW:w"))) { | "aC:cfhI:iK:klM:m:O:S:s:T:VW:w")) != -1) { | ||
if (c == 'i' && search.argmode == ARG_EXPR) { | |||
optind--; | |||
break; | |||
} | |||
switch (c) { | switch (c) { | ||
case 'a': | case 'a': | ||
outmode = OUTMODE_ALL; | outmode = OUTMODE_ALL; | ||
|
|
||
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 (defos) { | 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(); | |||
} | } | ||
defos = mandoc_strdup(optarg + 3); | os_s = optarg + 3; | ||
break; | break; | ||
case 'i': | |||
outmode = OUTMODE_INT; | |||
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; | ||
|
|
||
auxpaths = optarg; | auxpaths = optarg; | ||
break; | break; | ||
case 'O': | case 'O': | ||
search.outkey = optarg; | oarg = optarg; | ||
while (optarg != NULL) | |||
manconf_output(&conf.output, | |||
strsep(&optarg, ",")); | |||
break; | break; | ||
case 'S': | case 'S': | ||
search.arch = optarg; | search.arch = optarg; | ||
|
|
||
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; | curp.outtype = OUTT_ASCII; | ||
else if (strcmp(optarg, "lint") == 0) { | |||
curp.outtype = OUTT_LINT; | |||
mandoc_msg_setoutfile(stdout); | |||
mandoc_msg_setmin(MANDOCERR_BASE); | |||
} else if (strcmp(optarg, "tree") == 0) | |||
curp.outtype = OUTT_TREE; | |||
else if (strcmp(optarg, "man") == 0) | |||
curp.outtype = OUTT_MAN; | |||
else if (strcmp(optarg, "html") == 0) | |||
curp.outtype = OUTT_HTML; | |||
else if (strcmp(optarg, "markdown") == 0) | |||
curp.outtype = OUTT_MARKDOWN; | |||
else if (strcmp(optarg, "utf8") == 0) | |||
curp.outtype = OUTT_UTF8; | |||
else if (strcmp(optarg, "locale") == 0) | |||
curp.outtype = OUTT_LOCALE; | |||
else if (strcmp(optarg, "ps") == 0) | |||
curp.outtype = OUTT_PS; | |||
else if (strcmp(optarg, "pdf") == 0) | |||
curp.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, &curp.wstop) == -1) | ||
return (int)MANDOCLEVEL_BADARG; | return mandoc_msg_getrc(); | ||
break; | break; | ||
case 'w': | case 'w': | ||
outmode = OUTMODE_FLN; | outmode = OUTMODE_FLN; | ||
|
|
||
} | } | ||
} | } | ||
if (oarg != NULL) { | |||
if (outmode == OUTMODE_LST) | |||
search.outkey = oarg; | |||
else { | |||
while (oarg != NULL) { | |||
if (manconf_output(&conf.output, | |||
strsep(&oarg, ","), 0) == -1) | |||
return mandoc_msg_getrc(); | |||
} | |||
} | |||
} | |||
if (curp.outtype != OUTT_TREE || !curp.outopts->noval) | |||
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; | use_pager = 0; | ||
if (use_pager && | |||
(conf.output.width == 0 || conf.output.indent == 0) && | |||
ioctl(STDOUT_FILENO, TIOCGWINSZ, &ws) != -1 && | |||
ws.ws_col > 1) { | |||
if (conf.output.width == 0 && ws.ws_col < 79) | |||
conf.output.width = ws.ws_col - 1; | |||
if (conf.output.indent == 0 && ws.ws_col < 66) | |||
conf.output.indent = 3; | |||
} | |||
#if HAVE_PLEDGE | #if HAVE_PLEDGE | ||
if (!use_pager) | if (use_pager == 0) { | ||
if (pledge("stdio rpath flock", 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. */ | ||
|
|
||
} 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++; | ||
|
|
||
#endif | #endif | ||
} | } | ||
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). | |||
*/ | |||
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; | |||
} | |||
/* man(1), whatis(1), apropos(1) */ | /* man(1), whatis(1), apropos(1) */ | ||
if (search.argmode != ARG_FILE) { | if (search.argmode != ARG_FILE) { | ||
if (argc == 0) | |||
usage(search.argmode); | |||
if (search.argmode == ARG_NAME && | if (search.argmode == ARG_NAME && | ||
outmode == OUTMODE_ONE) | outmode == OUTMODE_ONE) | ||
search.firstmatch = 1; | search.firstmatch = 1; | ||
|
|
||
/* Access the mandoc database. */ | /* Access the mandoc database. */ | ||
manconf_parse(&conf, conf_file, defpaths, auxpaths); | manconf_parse(&conf, conf_file, defpaths, auxpaths); | ||
#if HAVE_SQLITE3 | |||
mansearch_setup(1); | |||
if ( ! mansearch(&search, &conf.manpath, | if ( ! mansearch(&search, &conf.manpath, | ||
argc, argv, &res, &sz)) | argc, argv, &res, &sz)) | ||
usage(search.argmode); | usage(search.argmode); | ||
#else | |||
if (search.argmode != ARG_NAME) { | |||
fputs("mandoc: database support not compiled in\n", | |||
stderr); | |||
return (int)MANDOCLEVEL_BADARG; | |||
} | |||
sz = 0; | |||
#endif | |||
if (sz == 0) { | if (sz == 0 && search.argmode == ARG_NAME) | ||
if (search.argmode == ARG_NAME) | (void)fs_search(&search, &conf.manpath, | ||
fs_search(&search, &conf.manpath, | argc, argv, &res, &sz); | ||
argc, argv, &res, &sz); | |||
else | if (search.argmode == ARG_NAME) { | ||
warnx("nothing appropriate"); | for (c = 0; c < argc; c++) { | ||
if (strchr(argv[c], '/') == NULL) | |||
continue; | |||
if (access(argv[c], R_OK) == -1) { | |||
mandoc_msg_setinfilename(argv[c]); | |||
mandoc_msg(MANDOCERR_BADARG_BAD, | |||
0, 0, "%s", strerror(errno)); | |||
mandoc_msg_setinfilename(NULL); | |||
continue; | |||
} | |||
res = mandoc_reallocarray(res, | |||
sz + 1, sizeof(*res)); | |||
res[sz].file = mandoc_strdup(argv[c]); | |||
res[sz].names = NULL; | |||
res[sz].output = NULL; | |||
res[sz].bits = 0; | |||
res[sz].ipath = SIZE_MAX; | |||
res[sz].sec = 10; | |||
res[sz].form = FORM_SRC; | |||
sz++; | |||
} | |||
} | } | ||
if (sz == 0) { | if (sz == 0) { | ||
rc = MANDOCLEVEL_BADARG; | if (search.argmode != ARG_NAME) | ||
warnx("nothing appropriate"); | |||
mandoc_msg_setrc(MANDOCLEVEL_BADARG); | |||
goto out; | goto out; | ||
} | } | ||
|
|
||
if (outmode == OUTMODE_ONE) { | if (outmode == OUTMODE_ONE) { | ||
argc = 1; | argc = 1; | ||
best_prio = 10; | best_prio = 40; | ||
} else if (outmode == OUTMODE_ALL) | } else if (outmode == OUTMODE_ALL) | ||
argc = (int)sz; | argc = (int)sz; | ||
|
|
||
res[i].output); | res[i].output); | ||
else if (outmode == OUTMODE_ONE) { | else if (outmode == OUTMODE_ONE) { | ||
/* Search for the best section. */ | /* Search for the best section. */ | ||
isec = strcspn(res[i].file, "123456789"); | sec = res[i].file; | ||
sec = res[i].file[isec]; | sec += strcspn(sec, "123456789"); | ||
if ('\0' == sec) | if (sec[0] == '\0') | ||
continue; | continue; /* No section at all. */ | ||
prio = sec_prios[sec - '1']; | prio = sec_prios[sec[0] - '1']; | ||
if (search.sec != NULL) { | |||
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; | ||
|
|
||
#if HAVE_PLEDGE | #if HAVE_PLEDGE | ||
if (use_pager) { | if (use_pager) { | ||
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(); | |||
} | |||
} else { | } else { | ||
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 | ||
if (search.argmode == ARG_FILE && ! moptions(&options, auxpaths)) | if (search.argmode == ARG_FILE && auxpaths != NULL) { | ||
return (int)MANDOCLEVEL_BADARG; | 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.wlevel, mmsg, defos); | mp = mparse_alloc(options, os_e, os_s); | ||
/* | |||
* Conditionally start up the lookaside buffer before parsing. | |||
*/ | |||
if (OUTT_MAN == curp.outtype) | |||
mparse_keep(curp.mp); | |||
if (argc < 1) { | if (argc < 1) { | ||
if (use_pager) | if (use_pager) { | ||
tag_files = tag_init(); | tag_files = tag_init(); | ||
parse(&curp, STDIN_FILENO, "<stdin>"); | if (tag_files != NULL) | ||
tag_files->tagname = conf.output.tag; | |||
} | |||
thisarg = "<stdin>"; | |||
mandoc_msg_setinfilename(thisarg); | |||
parse(mp, STDIN_FILENO, thisarg, &curp); | |||
mandoc_msg_setinfilename(NULL); | |||
} | } | ||
/* | |||
* Remember the original working directory, if possible. | |||
* This will be needed if some names on the command line | |||
* are page names and some are relative file names. | |||
* Do not error out if the current directory is not | |||
* readable: Maybe it won't be needed after all. | |||
*/ | |||
startdir = open(".", O_RDONLY | O_DIRECTORY); | |||
while (argc > 0) { | while (argc > 0) { | ||
fd = mparse_open(curp.mp, resp != NULL ? resp->file : *argv); | |||
/* | |||
* 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); | |||
thisarg = resp->file; | |||
} else | |||
thisarg = *argv; | |||
mandoc_msg_setinfilename(thisarg); | |||
fd = mparse_open(mp, thisarg); | |||
if (fd != -1) { | if (fd != -1) { | ||
if (use_pager) { | if (use_pager) { | ||
tag_files = tag_init(); | |||
use_pager = 0; | use_pager = 0; | ||
tag_files = tag_init(); | |||
if (tag_files != NULL) | |||
tag_files->tagname = conf.output.tag; | |||
} | } | ||
if (resp == NULL) | if (resp == NULL || resp->form == FORM_SRC) | ||
parse(&curp, fd, *argv); | parse(mp, fd, thisarg, &curp); | ||
else if (resp->form & FORM_SRC) { | else | ||
/* For .so only; ignore failure. */ | passthrough(fd, conf.output.synopsisonly); | ||
chdir(conf.manpath.paths[resp->ipath]); | |||
parse(&curp, fd, resp->file); | |||
} else | |||
passthrough(resp->file, fd, | |||
conf.output.synopsisonly); | |||
if (argc > 1 && curp.outtype <= OUTT_UTF8) | if (ferror(stdout)) { | ||
ascii_sepline(curp.outdata); | if (tag_files != NULL) { | ||
} else if (rc < MANDOCLEVEL_ERROR) | mandoc_msg(MANDOCERR_WRITE, 0, 0, | ||
rc = MANDOCLEVEL_ERROR; | "%s: %s", tag_files->ofn, | ||
strerror(errno)); | |||
tag_unlink(); | |||
tag_files = NULL; | |||
} else | |||
mandoc_msg(MANDOCERR_WRITE, 0, 0, | |||
"%s", strerror(errno)); | |||
break; | |||
} | |||
if (MANDOCLEVEL_OK != rc && curp.wstop) | if (argc > 1 && curp.outtype <= OUTT_UTF8) { | ||
if (curp.outdata == NULL) | |||
outdata_alloc(&curp); | |||
terminal_sepline(curp.outdata); | |||
} | |||
} else | |||
mandoc_msg(resp == NULL ? MANDOCERR_BADARG_BAD : | |||
MANDOCERR_OPEN, 0, 0, "%s", strerror(errno)); | |||
mandoc_msg_setinfilename(NULL); | |||
if (curp.wstop && mandoc_msg_getrc() != MANDOCLEVEL_OK) | |||
break; | break; | ||
if (resp != NULL) | if (resp != NULL) | ||
|
|
||
else | else | ||
argv++; | argv++; | ||
if (--argc) | if (--argc) | ||
mparse_reset(curp.mp); | mparse_reset(mp); | ||
} | } | ||
if (startdir != -1) { | |||
(void)fchdir(startdir); | |||
close(startdir); | |||
} | |||
if (curp.outdata != NULL) { | if (curp.outdata != NULL) { | ||
switch (curp.outtype) { | switch (curp.outtype) { | ||
|
|
||
break; | break; | ||
} | } | ||
} | } | ||
mparse_free(curp.mp); | mandoc_xr_free(); | ||
mparse_free(mp); | |||
mchars_free(); | mchars_free(); | ||
out: | out: | ||
if (search.argmode != ARG_FILE) { | if (search.argmode != ARG_FILE) { | ||
manconf_free(&conf); | manconf_free(&conf); | ||
#if HAVE_SQLITE3 | |||
mansearch_free(res, sz); | mansearch_free(res, sz); | ||
mansearch_setup(0); | |||
#endif | |||
} | } | ||
free(defos); | |||
/* | |||
* 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) { | if (tag_files != NULL) { | ||
fclose(stdout); | fclose(stdout); | ||
tag_write(); | tag_write(); | ||
man_pgid = getpgid(0); | run_pager(tag_files); | ||
tag_files->tcpgid = man_pgid == getpid() ? | |||
getpgid(getppid()) : man_pgid; | |||
pager_pid = 0; | |||
signum = SIGSTOP; | |||
for (;;) { | |||
/* Stop here until moved to the foreground. */ | |||
tc_pgid = tcgetpgrp(STDIN_FILENO); | |||
if (tc_pgid != man_pgid) { | |||
if (tc_pgid == pager_pid) { | |||
(void)tcsetpgrp(STDIN_FILENO, | |||
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(STDIN_FILENO, 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(); | tag_unlink(); | ||
} | } else if (curp.outtype != OUTT_LINT && | ||
(search.argmode == ARG_FILE || sz > 0)) | |||
mandoc_msg_summary(); | |||
return (int)rc; | return (int)mandoc_msg_getrc(); | ||
} | } | ||
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 [-acfhkl] [-I os=name] " | fputs("usage: mandoc [-ac] [-I os=name] " | ||
"[-K encoding] [-mformat] [-O option]\n" | "[-K encoding] [-mdoc | -man] [-O options]\n" | ||
"\t [-T output] [-W level] [file ...]\n", stderr); | "\t [-T output] [-W level] [file ...]\n", stderr); | ||
break; | break; | ||
case ARG_NAME: | case ARG_NAME: | ||
fputs("usage: man [-acfhklw] [-C file] [-I os=name] " | fputs("usage: man [-acfhklw] [-C file] [-M path] " | ||
"[-K encoding] [-M path] [-m path]\n" | "[-m path] [-S subsection]\n" | ||
"\t [-O option=value] [-S subsection] [-s section] " | "\t [[-s] section] name ...\n", stderr); | ||
"[-T output] [-W level]\n" | |||
"\t [section] name ...\n", stderr); | |||
break; | break; | ||
case ARG_WORD: | case ARG_WORD: | ||
fputs("usage: whatis [-acfhklw] [-C file] " | fputs("usage: whatis [-afk] [-C file] " | ||
"[-M path] [-m path] [-O outkey] [-S arch]\n" | "[-M path] [-m path] [-O outkey] [-S arch]\n" | ||
"\t [-s section] name ...\n", stderr); | "\t [-s section] name ...\n", stderr); | ||
break; | break; | ||
case ARG_EXPR: | case ARG_EXPR: | ||
fputs("usage: apropos [-acfhklw] [-C file] " | fputs("usage: apropos [-afk] [-C file] " | ||
"[-M path] [-m path] [-O outkey] [-S arch]\n" | "[-M path] [-m path] [-O outkey] [-S arch]\n" | ||
"\t [-s section] expression ...\n", stderr); | "\t [-s section] expression ...\n", stderr); | ||
break; | break; | ||
|
|
||
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; | ||
int form, globres; | int globres; | ||
enum form form; | |||
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); | ||
} | } | ||
|
|
||
paths->paths[ipath], sec, name); | paths->paths[ipath], sec, name); | ||
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) { | ||
return 0; | if (stat(file, &sb) != -1) | ||
goto found; | |||
free(file); | |||
} | |||
if (res != NULL || ipath + 1 != paths->sz) | |||
return -1; | |||
mandoc_asprintf(&file, "%s.%s", name, sec); | |||
globres = stat(file, &sb); | |||
free(file); | |||
return globres; | |||
found: | found: | ||
#if HAVE_SQLITE3 | warnx("outdated mandoc.db lacks %s(%s) entry, run %s %s", | ||
warnx("outdated mandoc.db lacks %s(%s) entry, run makewhatis %s", | name, sec, BINM_MAKEWHATIS, paths->paths[ipath]); | ||
name, sec, paths->paths[ipath]); | if (res == NULL) { | ||
#endif | free(file); | ||
*res = mandoc_reallocarray(*res, ++*ressz, sizeof(struct manpage)); | return 0; | ||
} | |||
*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 void | 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) | int argc, char **argv, struct manpage **res, size_t *ressz) | ||
{ | { | ||
const char *const sections[] = | const char *const sections[] = | ||
{"1", "8", "6", "2", "3", "3p", "5", "7", "4", "9"}; | {"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, lastsz; | ||
assert(cfg->argmode == ARG_NAME); | assert(cfg->argmode == ARG_NAME); | ||
*res = NULL; | if (res != NULL) | ||
*res = NULL; | |||
*ressz = lastsz = 0; | *ressz = lastsz = 0; | ||
while (argc) { | 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, | if (fs_lookup(paths, ipath, cfg->sec, | ||
cfg->arch, *argv, res, ressz) && | cfg->arch, *argv, res, ressz) != -1 && | ||
cfg->firstmatch) | cfg->firstmatch) | ||
return; | return 0; | ||
} else 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, *argv, res, ressz) != -1 && | ||
cfg->firstmatch) | cfg->firstmatch) | ||
return; | return 0; | ||
} | } | ||
if (*ressz == lastsz) | if (res != NULL && *ressz == lastsz && | ||
warnx("No entry for %s in the manual.", *argv); | strchr(*argv, '/') == NULL) { | ||
if (cfg->arch != NULL && | |||
arch_valid(cfg->arch, OSENUM) == 0) | |||
warnx("Unknown architecture \"%s\".", | |||
cfg->arch); | |||
else if (cfg->sec == NULL) | |||
warnx("No entry for %s in the manual.", | |||
*argv); | |||
else | |||
warnx("No entry for %s in section %s " | |||
"of the manual.", *argv, cfg->sec); | |||
} | |||
lastsz = *ressz; | lastsz = *ressz; | ||
argv++; | argv++; | ||
argc--; | argc--; | ||
} | } | ||
return -1; | |||
} | } | ||
static void | static void | ||
parse(struct curparse *curp, int fd, const char *file) | parse(struct mparse *mp, int fd, const char *file, struct curparse *curp) | ||
{ | { | ||
enum mandoclevel rctmp; | struct roff_meta *meta; | ||
struct roff_man *man; | |||
/* Begin by parsing the file itself. */ | /* Begin by parsing the file itself. */ | ||
assert(file); | assert(file); | ||
assert(fd > 0); | assert(fd >= 0); | ||
rctmp = mparse_readfd(curp->mp, fd, file); | 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 (curp->wstop && mandoc_msg_getrc() != MANDOCLEVEL_OK) | ||
return; | return; | ||
/* If unset, allocate output dev now (if applicable). */ | if (curp->outdata == NULL) | ||
outdata_alloc(curp); | |||
else if (curp->outtype == OUTT_HTML) | |||
html_reset(curp); | |||
if (curp->outdata == NULL) { | mandoc_xr_reset(); | ||
switch (curp->outtype) { | meta = mparse_result(mp); | ||
case OUTT_HTML: | |||
curp->outdata = html_alloc(curp->outopts); | |||
break; | |||
case OUTT_UTF8: | |||
curp->outdata = utf8_alloc(curp->outopts); | |||
break; | |||
case OUTT_LOCALE: | |||
curp->outdata = locale_alloc(curp->outopts); | |||
break; | |||
case OUTT_ASCII: | |||
curp->outdata = ascii_alloc(curp->outopts); | |||
break; | |||
case OUTT_PDF: | |||
curp->outdata = pdf_alloc(curp->outopts); | |||
break; | |||
case OUTT_PS: | |||
curp->outdata = ps_alloc(curp->outopts); | |||
break; | |||
default: | |||
break; | |||
} | |||
} | |||
mparse_result(curp->mp, &man, NULL); | |||
/* Execute the out device, if it exists. */ | /* Execute the out device, if it exists. */ | ||
if (man == NULL) | if (meta->macroset == MACROSET_MDOC) { | ||
return; | |||
if (man->macroset == MACROSET_MDOC) { | |||
mdoc_validate(man); | |||
switch (curp->outtype) { | switch (curp->outtype) { | ||
case OUTT_HTML: | case OUTT_HTML: | ||
html_mdoc(curp->outdata, man); | html_mdoc(curp->outdata, meta); | ||
break; | break; | ||
case OUTT_TREE: | case OUTT_TREE: | ||
tree_mdoc(curp->outdata, man); | tree_mdoc(curp->outdata, meta); | ||
break; | break; | ||
case OUTT_MAN: | case OUTT_MAN: | ||
man_mdoc(curp->outdata, man); | man_mdoc(curp->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(curp->outdata, meta); | ||
break; | break; | ||
case OUTT_MARKDOWN: | |||
markdown_mdoc(curp->outdata, meta); | |||
break; | |||
default: | default: | ||
break; | break; | ||
} | } | ||
} | } | ||
if (man->macroset == MACROSET_MAN) { | if (meta->macroset == MACROSET_MAN) { | ||
man_validate(man); | |||
switch (curp->outtype) { | switch (curp->outtype) { | ||
case OUTT_HTML: | case OUTT_HTML: | ||
html_man(curp->outdata, man); | html_man(curp->outdata, meta); | ||
break; | break; | ||
case OUTT_TREE: | case OUTT_TREE: | ||
tree_man(curp->outdata, man); | tree_man(curp->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(curp->outdata, meta); | ||
break; | break; | ||
default: | default: | ||
break; | break; | ||
} | } | ||
} | } | ||
if (mandoc_msg_getmin() < MANDOCERR_STYLE) | |||
check_xr(); | |||
} | } | ||
static void | static void | ||
passthrough(const char *file, int fd, int synopsis_only) | check_xr(void) | ||
{ | { | ||
static struct manpaths paths; | |||
struct mansearch search; | |||
struct mandoc_xr *xr; | |||
size_t sz; | |||
if (paths.sz == 0) | |||
manpath_base(&paths); | |||
for (xr = mandoc_xr_get(); xr != NULL; xr = xr->next) { | |||
if (xr->line == -1) | |||
continue; | |||
search.arch = NULL; | |||
search.sec = xr->sec; | |||
search.outkey = NULL; | |||
search.argmode = ARG_NAME; | |||
search.firstmatch = 1; | |||
if (mansearch(&search, &paths, 1, &xr->name, NULL, &sz)) | |||
continue; | |||
if (fs_search(&search, &paths, 1, &xr->name, NULL, &sz) != -1) | |||
continue; | |||
if (xr->count == 1) | |||
mandoc_msg(MANDOCERR_XR_BAD, xr->line, | |||
xr->pos + 1, "Xr %s %s", xr->name, xr->sec); | |||
else | |||
mandoc_msg(MANDOCERR_XR_BAD, xr->line, | |||
xr->pos + 1, "Xr %s %s (%d times)", | |||
xr->name, xr->sec, xr->count); | |||
} | |||
} | |||
static void | |||
outdata_alloc(struct curparse *curp) | |||
{ | |||
switch (curp->outtype) { | |||
case OUTT_HTML: | |||
curp->outdata = html_alloc(curp->outopts); | |||
break; | |||
case OUTT_UTF8: | |||
curp->outdata = utf8_alloc(curp->outopts); | |||
break; | |||
case OUTT_LOCALE: | |||
curp->outdata = locale_alloc(curp->outopts); | |||
break; | |||
case OUTT_ASCII: | |||
curp->outdata = ascii_alloc(curp->outopts); | |||
break; | |||
case OUTT_PDF: | |||
curp->outdata = pdf_alloc(curp->outopts); | |||
break; | |||
case OUTT_PS: | |||
curp->outdata = ps_alloc(curp->outopts); | |||
break; | |||
default: | |||
break; | |||
} | |||
} | |||
static void | |||
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; | ||
int print; | ssize_t len, written; | ||
int lno, print; | |||
stream = NULL; | |||
line = NULL; | line = NULL; | ||
linesz = 0; | linesz = 0; | ||
if (fflush(stdout) == EOF) { | |||
mandoc_msg(MANDOCERR_FFLUSH, 0, 0, "%s", strerror(errno)); | |||
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 (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) { | ||
if ( ! isspace((unsigned char)*cp)) | if ( ! isspace((unsigned char)*cp)) | ||
goto done; | goto done; | ||
while (isspace((unsigned char)*cp)) | while (isspace((unsigned char)*cp)) { | ||
cp++; | cp++; | ||
len--; | |||
} | |||
} else { | } else { | ||
if (strcmp(cp, synb) == 0 || | if (strcmp(cp, synb) == 0 || | ||
strcmp(cp, synr) == 0) | strcmp(cp, synr) == 0) | ||
|
|
||
continue; | continue; | ||
} | } | ||
} | } | ||
if (fputs(cp, stdout)) { | for (; len > 0; len -= written) { | ||
fclose(stream); | if ((written = write(STDOUT_FILENO, cp, len)) == -1) { | ||
syscall = "fputs"; | mandoc_msg(MANDOCERR_WRITE, 0, 0, | ||
goto fail; | "%s", strerror(errno)); | ||
goto done; | |||
} | |||
} | } | ||
} | } | ||
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 int | |||
moptions(int *options, char *arg) | |||
{ | |||
if (arg == NULL) | |||
/* nothing to do */; | |||
else if (0 == strcmp(arg, "doc")) | |||
*options |= MPARSE_MDOC; | |||
else if (0 == strcmp(arg, "andoc")) | |||
/* nothing to do */; | |||
else if (0 == strcmp(arg, "an")) | |||
*options |= MPARSE_MAN; | |||
else { | |||
warnx("-m %s: Bad argument", arg); | |||
return 0; | |||
} | |||
return 1; | |||
} | |||
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->wlevel = MANDOCLEVEL_WARNING; | |||
} 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, "utf8")) | |||
curp->outtype = OUTT_UTF8; | |||
else if (0 == strcmp(arg, "locale")) | |||
curp->outtype = OUTT_LOCALE; | |||
else if (0 == strcmp(arg, "xhtml")) | |||
curp->outtype = OUTT_HTML; | |||
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[7]; | const char *toks[11]; | ||
toks[0] = "stop"; | toks[0] = "stop"; | ||
toks[1] = "all"; | toks[1] = "all"; | ||
toks[2] = "warning"; | toks[2] = "base"; | ||
toks[3] = "error"; | toks[3] = "style"; | ||
toks[4] = "unsupp"; | toks[4] = "warning"; | ||
toks[5] = "fatal"; | toks[5] = "error"; | ||
toks[6] = NULL; | toks[6] = "unsupp"; | ||
toks[7] = "fatal"; | |||
toks[8] = "openbsd"; | |||
toks[9] = "netbsd"; | |||
toks[10] = NULL; | |||
while (*arg) { | while (*arg) { | ||
o = arg; | o = arg; | ||
switch (getsubopt(&arg, UNCONST(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->wlevel = MANDOCLEVEL_WARNING; | mandoc_msg_setmin(MANDOCERR_BASE); | ||
break; | break; | ||
case 3: | case 3: | ||
curp->wlevel = MANDOCLEVEL_ERROR; | mandoc_msg_setmin(MANDOCERR_STYLE); | ||
break; | break; | ||
case 4: | case 4: | ||
curp->wlevel = MANDOCLEVEL_UNSUPP; | mandoc_msg_setmin(MANDOCERR_WARNING); | ||
break; | break; | ||
case 5: | case 5: | ||
curp->wlevel = MANDOCLEVEL_BADARG; | mandoc_msg_setmin(MANDOCERR_ERROR); | ||
break; | break; | ||
case 6: | |||
mandoc_msg_setmin(MANDOCERR_UNSUPP); | |||
break; | |||
case 7: | |||
mandoc_msg_setmin(MANDOCERR_BADARG); | |||
break; | |||
case 8: | |||
mandoc_msg_setmin(MANDOCERR_BASE); | |||
*os_e = MANDOC_OS_OPENBSD; | |||
break; | |||
case 9: | |||
mandoc_msg_setmin(MANDOCERR_BASE); | |||
*os_e = MANDOC_OS_NETBSD; | |||
break; | |||
default: | default: | ||
warnx("-W %s: Bad argument", o); | mandoc_msg(MANDOCERR_BADARG_BAD, 0, 0, "-W %s", o); | ||
return 0; | return -1; | ||
} | } | ||
} | } | ||
return 0; | |||
return 1; | |||
} | } | ||
/* | |||
* 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(stderr, "%s: %s:", getprogname(), file); | man_pgid = getpgid(0); | ||
tag_files->tcpgid = man_pgid == getpid() ? getpgid(getppid()) : | |||
man_pgid; | |||
pager_pid = 0; | |||
signum = SIGSTOP; | |||
if (line) | for (;;) { | ||
fprintf(stderr, "%d:%d:", line, col + 1); | /* Stop here until moved to the foreground. */ | ||
fprintf(stderr, " %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 (NULL != (mparse_msg = mparse_strerror(t))) | /* Once in the foreground, activate the pager. */ | ||
fprintf(stderr, ": %s", mparse_msg); | |||
if (msg) | if (pager_pid) { | ||
fprintf(stderr, ": %s", msg); | (void)tcsetpgrp(tag_files->ofd, pager_pid); | ||
kill(pager_pid, SIGCONT); | |||
} else | |||
pager_pid = spawn_pager(tag_files); | |||
fputc('\n', stderr); | /* 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 | ||
spawn_pager(struct tag_files *tag_files) | spawn_pager(struct tag_files *tag_files) | ||
{ | { | ||
const struct timespec timeout = { 0, 100000000 }; /* 0.1s */ | |||
#define MAX_PAGER_ARGS 16 | #define MAX_PAGER_ARGS 16 | ||
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) | ||
|
|
||
break; | break; | ||
} | } | ||
/* For more(1) and 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 || strcmp(cp, "more") == 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: | ||
/* Set pgrp in both parent and child to avoid racing exec. */ | |||
(void)setpgid(0, 0); | |||
break; | break; | ||
default: | default: | ||
(void)setpgid(pager_pid, 0); | (void)setpgid(pager_pid, 0); | ||
(void)tcsetpgrp(STDIN_FILENO, 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); | ||
close(tag_files->tfd); | assert(tag_files->tfd == -1); | ||
/* Do not start the pager before controlling the terminal. */ | |||
while (tcgetpgrp(STDOUT_FILENO) != getpid()) | |||
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()); | |||
} | } |