mandoc/main.c - diff

Return to main.c CVS log

Up to [cvsweb.bsd.lv] / mandoc

Diff for /mandoc/main.c between version 1.256 and 1.329

version 1.256, 2015/11/07 14:22:29

version 1.329, 2019/07/10 19:39:01

Line 1

/* $Id$ */

* Permission to use, copy, modify, and distribute this software for any

Line 19

#include "config.h"

#include <sys/types.h>

#include <sys/ioctl.h>

#include <sys/param.h> /* MACHINE */

#include <sys/stat.h>

#include <sys/wait.h>

#include <assert.h>

Line 27

Line 29

#if HAVE_ERR

#include <err.h>

#endif

#include <errno.h>

#include <fcntl.h>

#include <glob.h>

#if HAVE_SANDBOX_INIT

#include <sandbox.h>

#endif

#include <signal.h>

#include <stdio.h>

#include <stdint.h>

#include <stdlib.h>

#include <string.h>

#include <termios.h>

#include <time.h>

#include <unistd.h>

#include "mandoc_aux.h"

#include "mandoc.h"

#include "mandoc_xr.h"

#include "roff.h"

#include "mdoc.h"

#include "man.h"

#include "mandoc_parse.h"

#include "tag.h"

#include "main.h"

#include "manconf.h"

#include "mansearch.h"

#if !defined(__GNUC__) || (__GNUC__ < 2)

# if !defined(lint)

# define __attribute__(x)

# endif

#endif /* !defined(__GNUC__) || (__GNUC__ < 2) */

enum outmode {

OUTMODE_DEF = 0,

OUTMODE_FLN,

OUTMODE_LST,

OUTMODE_ALL,

OUTMODE_INT,

OUTMODE_ONE

};

Line 68 enum outt {

Line 71 enum outt {

OUTT_TREE, /* -Ttree */

OUTT_MAN, /* -Tman */

OUTT_HTML, /* -Thtml */

OUTT_MARKDOWN, /* -Tmarkdown */

OUTT_LINT, /* -Tlint */

OUTT_PS, /* -Tps */

OUTT_PDF /* -Tpdf */

Line 75 enum outt {

Line 79 enum outt {

struct curparse {

struct mparse *mp;

enum mandoclevel wlevel; /* ignore messages below this */

struct manoutput *outopts; /* output options */

void *outdata; /* data for output */

char *os_s; /* operating system for display */

int wstop; /* stop after a file with a warning */

enum mandoc_os os_e; /* check base system conventions */

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 *,

size_t ipath, const char *,

const char *, const char *,

struct manpage **, size_t *);

static void fs_search(const struct mansearch *,

static int fs_search(const struct mansearch *,

const struct manpaths *, int, char**,

struct manpage **, size_t *);

static int koptions(int *, char *);

static void outdata_alloc(struct curparse *);

#if HAVE_SQLITE3

int mandocdb(int, char**);

#endif

static int moptions(int *, char *);

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 void passthrough(int, int);

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 const int sec_prios[] = {1, 4, 5, 8, 6, 3, 7, 2, 9};

static char help_arg[] = "help";

static char *help_argv[] = {help_arg, NULL};

static enum mandoclevel rc;

int

main(int argc, char *argv[])

{

struct manconf conf;

struct curparse curp;

struct mansearch search;

struct curparse curp;

struct winsize ws;

struct tag_files *tag_files;

const char *progname;

char *auxpaths;

char *defos;

unsigned char *uc;

struct manpage *res, *resp;

char *conf_file, *defpaths;

const char *progname, *sec, *thisarg;

size_t isec, i, sz;

char *conf_file, *defpaths, *auxpaths;

char *oarg, *tagarg;

unsigned char *uc;

size_t i, sz, ssz;

int prio, best_prio;

char sec;

enum mandoclevel rctmp;

enum outmode outmode;

int fd;

int fd, startdir;

int show_usage;

int options;

int use_pager;

int status, signum;

int c;

pid_t pager_pid, tc_pgid, man_pgid, pid;

#if HAVE_PROGNAME

progname = getprogname();

Line 145 main(int argc, char *argv[])

Line 146 main(int argc, char *argv[])

setprogname(progname);

#endif

#if HAVE_SQLITE3

mandoc_msg_setoutfile(stderr);

if (strncmp(progname, "mandocdb", 8) == 0 ||

strcmp(progname, BINM_MAKEWHATIS) == 0)

return mandocdb(argc, argv);

#endif

#if HAVE_PLEDGE

if (pledge("stdio rpath tmppath 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

#if HAVE_SANDBOX_INIT

if (sandbox_init(kSBXProfileNoInternet, SANDBOX_NAMED, NULL) == -1)

errx((int)MANDOCLEVEL_SYSERR, "sandbox_init");

#endif

/* Search options. */

Line 164 main(int argc, char *argv[])

Line 170 main(int argc, char *argv[])

memset(&search, 0, sizeof(struct mansearch));

search.outkey = "Nd";

oarg = NULL;

if (strcmp(progname, BINM_MAN) == 0)

search.argmode = ARG_NAME;

Line 180 main(int argc, char *argv[])

Line 187 main(int argc, char *argv[])

memset(&curp, 0, sizeof(struct curparse));

curp.outtype = OUTT_LOCALE;

curp.wlevel = MANDOCLEVEL_BADARG;

curp.outopts = &conf.output;

options = MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1;

defos = NULL;

use_pager = 1;

tag_files = NULL;

show_usage = 0;

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) {

case 'a':

outmode = OUTMODE_ALL;

Line 211 main(int argc, char *argv[])

Line 220 main(int argc, char *argv[])

outmode = OUTMODE_ALL;

break;

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 (curp.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);

curp.os_s = mandoc_strdup(optarg + 3);

break;

case 'i':

outmode = OUTMODE_INT;

break;

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;

case 'k':

search.argmode = ARG_EXPR;

Line 242 main(int argc, char *argv[])

Line 258 main(int argc, char *argv[])

auxpaths = optarg;

break;

case 'O':

search.outkey = optarg;

oarg = optarg;

while (optarg != NULL)

manconf_output(&conf.output,

strsep(&optarg, ","));

break;

case 'S':

search.arch = optarg;

Line 254 main(int argc, char *argv[])

Line 267 main(int argc, char *argv[])

search.sec = optarg;

break;

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;

case 'W':

if ( ! woptions(&curp, optarg))

if (woptions(&curp, optarg) == -1)

return (int)MANDOCLEVEL_BADARG;

return mandoc_msg_getrc();

break;

case 'w':

outmode = OUTMODE_FLN;

Line 290 main(int argc, char *argv[])

Line 328 main(int argc, char *argv[])

}

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 ||

outmode == OUTMODE_LST ||

!isatty(STDOUT_FILENO))

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 (!use_pager && pledge("stdio rpath flock", NULL) == -1)

if (use_pager == 0) {

err((int)MANDOCLEVEL_SYSERR, "pledge");

if (pledge("stdio rpath", NULL) == -1) {

mandoc_msg(MANDOCERR_PLEDGE, 0, 0,

"%s", strerror(errno));

return mandoc_msg_getrc();

}

#endif

/* Parse arguments. */

Line 322 main(int argc, char *argv[])

Line 390 main(int argc, char *argv[])

} else if (argc > 1 &&

((uc = (unsigned char *)argv[0]) != NULL) &&

((isdigit(uc[0]) && (uc[1] == '\0' ||

(isalpha(uc[1]) && uc[2] == '\0'))) ||

isalpha(uc[1]))) ||

(uc[0] == 'n' && uc[1] == '\0'))) {

search.sec = (char *)uc;

argv++;

Line 336 main(int argc, char *argv[])

Line 404 main(int argc, char *argv[])

#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) */

if (search.argmode != ARG_FILE) {

if (argc == 0)

usage(search.argmode);

if (search.argmode == ARG_NAME &&

outmode == OUTMODE_ONE)

search.firstmatch = 1;

Line 351 main(int argc, char *argv[])

Line 425 main(int argc, char *argv[])

/* Access the mandoc database. */

manconf_parse(&conf, conf_file, defpaths, auxpaths);

#if HAVE_SQLITE3

mansearch_setup(1);

if ( ! mansearch(&search, &conf.manpath,

argc, argv, &res, &sz))

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);

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) {

rc = MANDOCLEVEL_BADARG;

if (search.argmode != ARG_NAME)

warnx("nothing appropriate");

mandoc_msg_setrc(MANDOCLEVEL_BADARG);

goto out;

}

Line 386 main(int argc, char *argv[])

Line 472 main(int argc, char *argv[])

if (outmode == OUTMODE_ONE) {

argc = 1;

best_prio = 10;

best_prio = 40;

} else if (outmode == OUTMODE_ALL)

argc = (int)sz;

Line 402 main(int argc, char *argv[])

Line 488 main(int argc, char *argv[])

res[i].output);

else if (outmode == OUTMODE_ONE) {

/* 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)

continue;

best_prio = prio;

Line 427 main(int argc, char *argv[])

Line 526 main(int argc, char *argv[])

/* mandoc(1) */

#if HAVE_PLEDGE

if (pledge(use_pager ? "stdio rpath tmppath proc exec" :

if (use_pager) {

"stdio rpath", 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 {

if (pledge("stdio rpath", NULL) == -1) {

mandoc_msg(MANDOCERR_PLEDGE, 0, 0,

"%s", strerror(errno));

return mandoc_msg_getrc();

}

#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();

curp.mp = mparse_alloc(options, curp.wlevel, mmsg, defos);

curp.mp = mparse_alloc(options, 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)

if (use_pager) {

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(&curp, STDIN_FILENO, thisarg);

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) {

rctmp = mparse_open(curp.mp, &fd,

resp != NULL ? resp->file : *argv);

if (rc < rctmp)

rc = rctmp;

* 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(curp.mp, thisarg);

if (fd != -1) {

if (use_pager) {

tag_files = tag_init();

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(&curp, fd, thisarg);

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) {

}

mandoc_msg(MANDOCERR_WRITE, 0, 0,

"%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;

if (resp != NULL)

Line 486 main(int argc, char *argv[])

Line 637 main(int argc, char *argv[])

if (--argc)

mparse_reset(curp.mp);

}

if (startdir != -1) {

(void)fchdir(startdir);

close(startdir);

}

if (curp.outdata != NULL) {

switch (curp.outtype) {

Line 505 main(int argc, char *argv[])

Line 660 main(int argc, char *argv[])

break;

}

mandoc_xr_free();

mparse_free(curp.mp);

mchars_free();

out:

if (search.argmode != ARG_FILE) {

manconf_free(&conf);

#if HAVE_SQLITE3

mansearch_free(res, sz);

mansearch_setup(0);

#endif

}

free(defos);

free(curp.os_s);

* When using a pager, finish writing both temporary files,

Line 527 out:

Line 680 out:

if (tag_files != NULL) {

fclose(stdout);

tag_write();

waitpid(spawn_pager(tag_files), NULL, 0);

man_pgid = getpgid(0);

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(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) {

mandoc_msg(MANDOCERR_WAIT, 0, 0,

"%s", strerror(errno));

break;

}

if (!WIFSTOPPED(status))

break;

signum = WSTOPSIG(status);

}

tag_unlink();

}

return (int)mandoc_msg_getrc();

return (int)rc;

}

static void

usage(enum argmode argmode)

{

switch (argmode) {

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);

break;

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;

case ARG_WORD:

fputs("usage: whatis [-acfhklw] [-C file] "

fputs("usage: whatis [-afk] [-C file] "

"[-M path] [-m path] [-O outkey] [-S arch]\n"

"\t [-s section] name ...\n", stderr);

break;

case ARG_EXPR:

fputs("usage: apropos [-acfhklw] [-C file] "

fputs("usage: apropos [-afk] [-C file] "

"[-M path] [-m path] [-O outkey] [-S arch]\n"

"\t [-s section] expression ...\n", stderr);

break;

Line 570 fs_lookup(const struct manpaths *paths, size_t ipath,

Line 764 fs_lookup(const struct manpaths *paths, size_t ipath,

const char *sec, const char *arch, const char *name,

struct manpage **res, size_t *ressz)

{

struct stat sb;

glob_t globinfo;

struct manpage *page;

char *file;

int form, globres;

int globres;

enum form form;

form = FORM_SRC;

mandoc_asprintf(&file, "%s/man%s/%s.%s",

paths->paths[ipath], sec, name, sec);

if (access(file, R_OK) != -1)

if (stat(file, &sb) != -1)

goto found;

free(file);

mandoc_asprintf(&file, "%s/cat%s/%s.0",

paths->paths[ipath], sec, name);

if (access(file, R_OK) != -1) {

if (stat(file, &sb) != -1) {

form = FORM_CAT;

goto found;

}

Line 593 fs_lookup(const struct manpaths *paths, size_t ipath,

Line 789 fs_lookup(const struct manpaths *paths, size_t ipath,

if (arch != NULL) {

mandoc_asprintf(&file, "%s/man%s/%s/%s.%s",

paths->paths[ipath], sec, arch, name, sec);

if (access(file, R_OK) != -1)

if (stat(file, &sb) != -1)

goto found;

free(file);

}

Line 602 fs_lookup(const struct manpaths *paths, size_t ipath,

Line 798 fs_lookup(const struct manpaths *paths, size_t ipath,

paths->paths[ipath], sec, name);

globres = glob(file, 0, NULL, &globinfo);

if (globres != 0 && globres != GLOB_NOMATCH)

warn("%s: glob", file);

mandoc_msg(MANDOCERR_GLOB, 0, 0,

"%s: %s", file, strerror(errno));

free(file);

if (globres == 0)

file = mandoc_strdup(*globinfo.gl_pathv);

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:

#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->file = file;

page->names = NULL;

page->output = NULL;

page->ipath = ipath;

page->bits = NAME_FILE & NAME_MASK;

page->ipath = ipath;

page->sec = (*sec >= '1' && *sec <= '9') ? *sec - '1' + 1 : 10;

page->form = form;

return 1;

return 0;

}

static void

static int

fs_search(const struct mansearch *cfg, const struct manpaths *paths,

int argc, char **argv, struct manpage **res, size_t *ressz)

{

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]);

size_t ipath, isec, lastsz;

assert(cfg->argmode == ARG_NAME);

*res = NULL;

if (res != NULL)

*res = NULL;

*ressz = lastsz = 0;

while (argc) {

for (ipath = 0; ipath < paths->sz; ipath++) {

if (cfg->sec != NULL) {

if (fs_lookup(paths, ipath, cfg->sec,

cfg->arch, *argv, res, ressz) &&

cfg->arch, *argv, res, ressz) != -1 &&

cfg->firstmatch)

return;

return 0;

} else for (isec = 0; isec < nsec; isec++)

if (fs_lookup(paths, ipath, sections[isec],

cfg->arch, *argv, res, ressz) &&

cfg->arch, *argv, res, ressz) != -1 &&

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;

argv++;

argc--;

}

return -1;

}

static void

parse(struct curparse *curp, int fd, const char *file)

{

enum mandoclevel rctmp;

struct roff_meta *meta;

struct roff_man *man;

/* Begin by parsing the file itself. */

assert(file);

assert(fd >= -1);

assert(fd >= 0);

rctmp = mparse_readfd(curp->mp, fd, file);

mparse_readfd(curp->mp, fd, file);

if (rc < rctmp)

if (fd != STDIN_FILENO)

rc = rctmp;

close(fd);

* With -Wstop and warnings or errors of at least the requested

* level, do not produce output.

if (rctmp != MANDOCLEVEL_OK && curp->wstop)

if (curp->wstop && mandoc_msg_getrc() != MANDOCLEVEL_OK)

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(curp->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. */

if (man == NULL)

if (meta->macroset == MACROSET_MDOC) {

return;

if (man->macroset == MACROSET_MDOC) {

mdoc_validate(man);

switch (curp->outtype) {

case OUTT_HTML:

html_mdoc(curp->outdata, man);

html_mdoc(curp->outdata, meta);

break;

case OUTT_TREE:

tree_mdoc(curp->outdata, man);

tree_mdoc(curp->outdata, meta);

break;

case OUTT_MAN:

man_mdoc(curp->outdata, man);

man_mdoc(curp->outdata, meta);

break;

case OUTT_PDF:

case OUTT_ASCII:

case OUTT_UTF8:

case OUTT_LOCALE:

case OUTT_PS:

terminal_mdoc(curp->outdata, man);

terminal_mdoc(curp->outdata, meta);

break;

case OUTT_MARKDOWN:

markdown_mdoc(curp->outdata, meta);

break;

default:

break;

}

if (man->macroset == MACROSET_MAN) {

if (meta->macroset == MACROSET_MAN) {

man_validate(man);

switch (curp->outtype) {

case OUTT_HTML:

html_man(curp->outdata, man);

html_man(curp->outdata, meta);

break;

case OUTT_TREE:

tree_man(curp->outdata, man);

tree_man(curp->outdata, meta);

break;

case OUTT_MAN:

man_man(curp->outdata, man);

mparse_copy(curp->mp);

break;

case OUTT_PDF:

case OUTT_ASCII:

case OUTT_UTF8:

case OUTT_LOCALE:

case OUTT_PS:

terminal_man(curp->outdata, man);

terminal_man(curp->outdata, meta);

break;

default:

break;

}

if (mandoc_msg_getmin() < MANDOCERR_STYLE)

check_xr();

}

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 synr[] = "SYNOPSIS";

FILE *stream;

const char *syscall;

char *line, *cp;

char *line;

size_t linesz;

size_t len, off;

ssize_t len, written;

ssize_t nw;

int lno, print;

int print;

fflush(stdout);

stream = NULL;

line = NULL;

linesz = 0;

if (fflush(stdout) == EOF) {

mandoc_msg(MANDOCERR_FFLUSH, 0, 0, "%s", strerror(errno));

goto done;

}

if ((stream = fdopen(fd, "r")) == NULL) {

close(fd);

syscall = "fdopen";

mandoc_msg(MANDOCERR_FDOPEN, 0, 0, "%s", strerror(errno));

goto fail;

goto done;

}

print = 0;

lno = print = 0;

while ((line = fgetln(stream, &len)) != NULL) {

while ((len = getline(&line, &linesz, stream)) != -1) {

lno++;

cp = line;

if (synopsis_only) {

if (print) {

if ( ! isspace((unsigned char)*line))

if ( ! isspace((unsigned char)*cp))

goto done;

while (len &&

while (isspace((unsigned char)*cp)) {

isspace((unsigned char)*line)) {

cp++;

line++;

len--;

}

} else {

if ((len == sizeof(synb) &&

if (strcmp(cp, synb) == 0 ||

! strncmp(line, synb, len - 1)) ||

strcmp(cp, synr) == 0)

(len == sizeof(synr) &&

! strncmp(line, synr, len - 1)))

print = 1;

continue;

}

for (off = 0; off < len; off += nw)

for (; len > 0; len -= written) {

if ((nw = write(STDOUT_FILENO, line + off,

if ((written = write(STDOUT_FILENO, cp, len)) == -1) {

len - off)) == -1 || nw == 0) {

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 = "fgetln";

goto fail;

}

done:

fclose(stream);

free(line);

return;

if (stream != NULL)

fclose(stream);

fail:

warn("%s: SYSERR: %s", file, syscall);

if (rc < MANDOCLEVEL_SYSERR)

rc = MANDOCLEVEL_SYSERR;

}

static int

koptions(int *options, char *arg)

{

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;

const char *toks[7];

const char *toks[11];

toks[0] = "stop";

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) {

o = arg;

switch (getsubopt(&arg, UNCONST(toks), &v)) {

switch (getsubopt(&arg, (char * const *)toks, &v)) {

case 0:

curp->wstop = 1;

break;

case 1:

case 2:

curp->wlevel = MANDOCLEVEL_WARNING;

mandoc_msg_setmin(MANDOCERR_BASE);

break;

case 3:

curp->wlevel = MANDOCLEVEL_ERROR;

mandoc_msg_setmin(MANDOCERR_STYLE);

break;

case 4:

curp->wlevel = MANDOCLEVEL_UNSUPP;

mandoc_msg_setmin(MANDOCERR_WARNING);

break;

case 5:

curp->wlevel = MANDOCLEVEL_BADARG;

mandoc_msg_setmin(MANDOCERR_ERROR);

break;

case 6:

mandoc_msg_setmin(MANDOCERR_UNSUPP);

break;

case 7:

mandoc_msg_setmin(MANDOCERR_BADARG);

break;

case 8:

mandoc_msg_setmin(MANDOCERR_BASE);

curp->os_e = MANDOC_OS_OPENBSD;

break;

case 9:

mandoc_msg_setmin(MANDOCERR_BASE);

curp->os_e = MANDOC_OS_NETBSD;

break;

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;

}

static void

mmsg(enum mandocerr t, enum mandoclevel lvl,

const char *file, int line, int col, const char *msg)

{

const char *mparse_msg;

fprintf(stderr, "%s: %s:", getprogname(), file);

if (line)

fprintf(stderr, "%d:%d:", line, col + 1);

fprintf(stderr, " %s", mparse_strlevel(lvl));

if (NULL != (mparse_msg = mparse_strerror(t)))

fprintf(stderr, ": %s", mparse_msg);

if (msg)

fprintf(stderr, ": %s", msg);

fputc('\n', stderr);

}

static pid_t

spawn_pager(struct tag_files *tag_files)

{

const struct timespec timeout = { 0, 100000000 }; /* 0.1s */

#define MAX_PAGER_ARGS 16

char *argv[MAX_PAGER_ARGS];

const char *pager;

char *cp;

#if HAVE_LESS_T

size_t cmdlen;

int argc;

#endif

int argc, use_ofn;

pid_t pager_pid;

pager = getenv("MANPAGER");

Line 992 spawn_pager(struct tag_files *tag_files)

Line 1175 spawn_pager(struct tag_files *tag_files)

argc = 0;

while (argc + 4 < MAX_PAGER_ARGS) {

while (argc + 5 < MAX_PAGER_ARGS) {

argv[argc++] = cp;

cp = strchr(cp, ' ');

if (cp == NULL)

Line 1004 spawn_pager(struct tag_files *tag_files)

Line 1187 spawn_pager(struct tag_files *tag_files)

break;

}

/* For more(1) and less(1), use the tag file. */

/* For less(1), use the tag file. */

use_ofn = 1;

#if HAVE_LESS_T

if ((cmdlen = strlen(argv[0])) >= 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++] = 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;

switch (pager_pid = fork()) {

case -1:

err((int)MANDOCLEVEL_SYSERR, "fork");

mandoc_msg(MANDOCERR_FORK, 0, 0, "%s", strerror(errno));

exit(mandoc_msg_getrc());

case 0:

break;

default:

(void)setpgid(pager_pid, 0);

(void)tcsetpgrp(tag_files->ofd, pager_pid);

#if HAVE_PLEDGE

if (pledge("stdio rpath tmppath", 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

tag_files->pager_pid = pager_pid;

return pager_pid;

}

/* 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->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);

err((int)MANDOCLEVEL_SYSERR, "exec %s", argv[0]);

mandoc_msg(MANDOCERR_EXEC, 0, 0, "%s: %s", argv[0], strerror(errno));

_exit(mandoc_msg_getrc());

}

CVSweb