version 1.9, 2012/06/08 10:32:40 |
version 1.32, 2017/01/27 13:47:10 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2011 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2011, 2014, 2015, 2017 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* |
* |
* Permission to use, copy, modify, and distribute this software for any |
* Permission to use, copy, modify, and distribute this software for any |
* purpose with or without fee is hereby granted, provided that the above |
* purpose with or without fee is hereby granted, provided that the above |
* copyright notice and this permission notice appear in all copies. |
* copyright notice and this permission notice appear in all copies. |
* |
* |
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES |
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHORS DISCLAIM ALL WARRANTIES |
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR |
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR |
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
* 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. |
*/ |
*/ |
#ifdef HAVE_CONFIG_H |
|
#include "config.h" |
#include "config.h" |
#endif |
|
|
|
#include <sys/param.h> |
#include <sys/types.h> |
|
#include <sys/stat.h> |
|
|
#include <assert.h> |
|
#include <ctype.h> |
#include <ctype.h> |
|
#if HAVE_ERR |
|
#include <err.h> |
|
#endif |
#include <limits.h> |
#include <limits.h> |
#include <stdio.h> |
#include <stdio.h> |
#include <stdlib.h> |
#include <stdlib.h> |
#include <string.h> |
#include <string.h> |
|
|
#include "mandoc.h" |
#include "mandoc_aux.h" |
#include "manpath.h" |
#include "manconf.h" |
|
|
#define MAN_CONF_FILE "/etc/man.conf" |
static void manconf_file(struct manconf *, const char *); |
#define MAN_CONF_KEY "_whatdb" |
static void manpath_add(struct manpaths *, const char *, int); |
|
static void manpath_parseline(struct manpaths *, char *, int); |
|
|
static void manpath_add(struct manpaths *, const char *); |
|
static void manpath_parseline(struct manpaths *, char *); |
|
|
|
void |
void |
manpath_parse(struct manpaths *dirs, const char *file, |
manconf_parse(struct manconf *conf, const char *file, |
char *defp, char *auxp) |
char *defp, char *auxp) |
{ |
{ |
#ifdef USE_MANPATH |
|
char cmd[(MAXPATHLEN * 3) + 20]; |
|
FILE *stream; |
|
char *buf; |
|
size_t sz, bsz; |
|
|
|
strlcpy(cmd, "manpath", sizeof(cmd)); |
|
if (file) { |
|
strlcat(cmd, " -C ", sizeof(cmd)); |
|
strlcat(cmd, file, sizeof(cmd)); |
|
} |
|
if (auxp) { |
|
strlcat(cmd, " -m ", sizeof(cmd)); |
|
strlcat(cmd, auxp, sizeof(cmd)); |
|
} |
|
if (defp) { |
|
strlcat(cmd, " -M ", sizeof(cmd)); |
|
strlcat(cmd, defp, sizeof(cmd)); |
|
} |
|
|
|
/* Open manpath(1). Ignore errors. */ |
|
|
|
stream = popen(cmd, "r"); |
|
if (NULL == stream) |
|
return; |
|
|
|
buf = NULL; |
|
bsz = 0; |
|
|
|
/* Read in as much output as we can. */ |
|
|
|
do { |
|
buf = mandoc_realloc(buf, bsz + 1024); |
|
sz = fread(buf + bsz, 1, 1024, stream); |
|
bsz += sz; |
|
} while (sz > 0); |
|
|
|
if ( ! ferror(stream) && feof(stream) && |
|
bsz && '\n' == buf[bsz - 1]) { |
|
buf[bsz - 1] = '\0'; |
|
manpath_parseline(dirs, buf); |
|
} |
|
|
|
free(buf); |
|
pclose(stream); |
|
#else |
|
char *insert; |
char *insert; |
|
|
/* Always prepend -m. */ |
/* Always prepend -m. */ |
manpath_parseline(dirs, auxp); |
manpath_parseline(&conf->manpath, auxp, 1); |
|
|
/* If -M is given, it overrides everything else. */ |
/* If -M is given, it overrides everything else. */ |
if (NULL != defp) { |
if (NULL != defp) { |
manpath_parseline(dirs, defp); |
manpath_parseline(&conf->manpath, defp, 1); |
return; |
return; |
} |
} |
|
|
Line 105 manpath_parse(struct manpaths *dirs, const char *file, |
|
Line 59 manpath_parse(struct manpaths *dirs, const char *file, |
|
|
|
/* No MANPATH; use man.conf(5) only. */ |
/* No MANPATH; use man.conf(5) only. */ |
if (NULL == defp || '\0' == defp[0]) { |
if (NULL == defp || '\0' == defp[0]) { |
manpath_manconf(dirs, file); |
manconf_file(conf, file); |
return; |
return; |
} |
} |
|
|
/* Prepend man.conf(5) to MANPATH. */ |
/* Prepend man.conf(5) to MANPATH. */ |
if (':' == defp[0]) { |
if (':' == defp[0]) { |
manpath_manconf(dirs, file); |
manconf_file(conf, file); |
manpath_parseline(dirs, defp); |
manpath_parseline(&conf->manpath, defp, 0); |
return; |
return; |
} |
} |
|
|
/* Append man.conf(5) to MANPATH. */ |
/* Append man.conf(5) to MANPATH. */ |
if (':' == defp[strlen(defp) - 1]) { |
if (':' == defp[strlen(defp) - 1]) { |
manpath_parseline(dirs, defp); |
manpath_parseline(&conf->manpath, defp, 0); |
manpath_manconf(dirs, file); |
manconf_file(conf, file); |
return; |
return; |
} |
} |
|
|
Line 127 manpath_parse(struct manpaths *dirs, const char *file, |
|
Line 81 manpath_parse(struct manpaths *dirs, const char *file, |
|
insert = strstr(defp, "::"); |
insert = strstr(defp, "::"); |
if (NULL != insert) { |
if (NULL != insert) { |
*insert++ = '\0'; |
*insert++ = '\0'; |
manpath_parseline(dirs, defp); |
manpath_parseline(&conf->manpath, defp, 0); |
manpath_manconf(dirs, file); |
manconf_file(conf, file); |
manpath_parseline(dirs, insert + 1); |
manpath_parseline(&conf->manpath, insert + 1, 0); |
return; |
return; |
} |
} |
|
|
/* MANPATH overrides man.conf(5) completely. */ |
/* MANPATH overrides man.conf(5) completely. */ |
manpath_parseline(dirs, defp); |
manpath_parseline(&conf->manpath, defp, 0); |
#endif |
|
} |
} |
|
|
/* |
/* |
* Parse a FULL pathname from a colon-separated list of arrays. |
* Parse a FULL pathname from a colon-separated list of arrays. |
*/ |
*/ |
static void |
static void |
manpath_parseline(struct manpaths *dirs, char *path) |
manpath_parseline(struct manpaths *dirs, char *path, int complain) |
{ |
{ |
char *dir; |
char *dir; |
|
|
Line 150 manpath_parseline(struct manpaths *dirs, char *path) |
|
Line 103 manpath_parseline(struct manpaths *dirs, char *path) |
|
return; |
return; |
|
|
for (dir = strtok(path, ":"); dir; dir = strtok(NULL, ":")) |
for (dir = strtok(path, ":"); dir; dir = strtok(NULL, ":")) |
manpath_add(dirs, dir); |
manpath_add(dirs, dir, complain); |
} |
} |
|
|
/* |
/* |
Line 158 manpath_parseline(struct manpaths *dirs, char *path) |
|
Line 111 manpath_parseline(struct manpaths *dirs, char *path) |
|
* Grow the array one-by-one for simplicity's sake. |
* Grow the array one-by-one for simplicity's sake. |
*/ |
*/ |
static void |
static void |
manpath_add(struct manpaths *dirs, const char *dir) |
manpath_add(struct manpaths *dirs, const char *dir, int complain) |
{ |
{ |
char buf[PATH_MAX]; |
char buf[PATH_MAX]; |
|
struct stat sb; |
char *cp; |
char *cp; |
size_t i; |
size_t i; |
|
|
if (NULL == (cp = realpath(dir, buf))) |
if (NULL == (cp = realpath(dir, buf))) { |
|
if (complain) |
|
warn("manpath: %s", dir); |
return; |
return; |
|
} |
|
|
for (i = 0; i < dirs->sz; i++) |
for (i = 0; i < dirs->sz; i++) |
if (0 == strcmp(dirs->paths[i], dir)) |
if (0 == strcmp(dirs->paths[i], dir)) |
return; |
return; |
|
|
dirs->paths = mandoc_realloc |
if (stat(cp, &sb) == -1) { |
(dirs->paths, |
if (complain) |
(dirs->sz + 1) * sizeof(char *)); |
warn("manpath: %s", dir); |
|
return; |
|
} |
|
|
|
dirs->paths = mandoc_reallocarray(dirs->paths, |
|
dirs->sz + 1, sizeof(char *)); |
|
|
dirs->paths[dirs->sz++] = mandoc_strdup(cp); |
dirs->paths[dirs->sz++] = mandoc_strdup(cp); |
} |
} |
|
|
void |
void |
manpath_free(struct manpaths *p) |
manconf_free(struct manconf *conf) |
{ |
{ |
size_t i; |
size_t i; |
|
|
for (i = 0; i < p->sz; i++) |
for (i = 0; i < conf->manpath.sz; i++) |
free(p->paths[i]); |
free(conf->manpath.paths[i]); |
|
|
free(p->paths); |
free(conf->manpath.paths); |
|
free(conf->output.includes); |
|
free(conf->output.man); |
|
free(conf->output.paper); |
|
free(conf->output.style); |
} |
} |
|
|
void |
static void |
manpath_manconf(struct manpaths *dirs, const char *file) |
manconf_file(struct manconf *conf, const char *file) |
{ |
{ |
|
const char *const toks[] = { "manpath", "output", "_whatdb" }; |
|
char manpath_default[] = MANPATH_DEFAULT; |
|
|
FILE *stream; |
FILE *stream; |
char *p, *q; |
char *line, *cp, *ep; |
size_t len, keysz; |
size_t linesz, tok, toklen; |
|
ssize_t linelen; |
|
|
keysz = strlen(MAN_CONF_KEY); |
if ((stream = fopen(file, "r")) == NULL) |
assert(keysz > 0); |
goto out; |
|
|
if (NULL == (stream = fopen(file, "r"))) |
line = NULL; |
return; |
linesz = 0; |
|
|
while (NULL != (p = fgetln(stream, &len))) { |
while ((linelen = getline(&line, &linesz, stream)) != -1) { |
if (0 == len || '\n' != p[--len]) |
cp = line; |
break; |
ep = cp + linelen - 1; |
p[len] = '\0'; |
while (ep > cp && isspace((unsigned char)*ep)) |
while (isspace((unsigned char)*p)) |
*ep-- = '\0'; |
p++; |
while (isspace((unsigned char)*cp)) |
if (strncmp(MAN_CONF_KEY, p, keysz)) |
cp++; |
|
if (cp == ep || *cp == '#') |
continue; |
continue; |
p += keysz; |
|
while (isspace(*p)) |
|
p++; |
|
if ('\0' == *p) |
|
continue; |
|
if (NULL == (q = strrchr(p, '/'))) |
|
continue; |
|
*q = '\0'; |
|
manpath_add(dirs, p); |
|
} |
|
|
|
|
for (tok = 0; tok < sizeof(toks)/sizeof(toks[0]); tok++) { |
|
toklen = strlen(toks[tok]); |
|
if (cp + toklen < ep && |
|
isspace((unsigned char)cp[toklen]) && |
|
strncmp(cp, toks[tok], toklen) == 0) { |
|
cp += toklen; |
|
while (isspace((unsigned char)*cp)) |
|
cp++; |
|
break; |
|
} |
|
} |
|
|
|
switch (tok) { |
|
case 2: /* _whatdb */ |
|
while (ep > cp && ep[-1] != '/') |
|
ep--; |
|
if (ep == cp) |
|
continue; |
|
*ep = '\0'; |
|
/* FALLTHROUGH */ |
|
case 0: /* manpath */ |
|
manpath_add(&conf->manpath, cp, 0); |
|
*manpath_default = '\0'; |
|
break; |
|
case 1: /* output */ |
|
manconf_output(&conf->output, cp, 1); |
|
break; |
|
default: |
|
break; |
|
} |
|
} |
|
free(line); |
fclose(stream); |
fclose(stream); |
|
|
|
out: |
|
if (*manpath_default != '\0') |
|
manpath_parseline(&conf->manpath, manpath_default, 0); |
|
} |
|
|
|
int |
|
manconf_output(struct manoutput *conf, const char *cp, int fromfile) |
|
{ |
|
const char *const toks[] = { |
|
"includes", "man", "paper", "style", |
|
"indent", "width", "fragment", "mdoc" |
|
}; |
|
|
|
const char *errstr; |
|
char *oldval; |
|
size_t len, tok; |
|
|
|
for (tok = 0; tok < sizeof(toks)/sizeof(toks[0]); tok++) { |
|
len = strlen(toks[tok]); |
|
if ( ! strncmp(cp, toks[tok], len) && |
|
strchr(" = ", cp[len]) != NULL) { |
|
cp += len; |
|
if (*cp == '=') |
|
cp++; |
|
while (isspace((unsigned char)*cp)) |
|
cp++; |
|
break; |
|
} |
|
} |
|
|
|
if (tok < 6 && *cp == '\0') { |
|
warnx("-O %s=?: Missing argument value", toks[tok]); |
|
return -1; |
|
} |
|
if ((tok == 6 || tok == 7) && *cp != '\0') { |
|
warnx("-O %s: Does not take a value: %s", toks[tok], cp); |
|
return -1; |
|
} |
|
|
|
switch (tok) { |
|
case 0: |
|
if (conf->includes != NULL) { |
|
oldval = mandoc_strdup(conf->includes); |
|
break; |
|
} |
|
conf->includes = mandoc_strdup(cp); |
|
return 0; |
|
case 1: |
|
if (conf->man != NULL) { |
|
oldval = mandoc_strdup(conf->man); |
|
break; |
|
} |
|
conf->man = mandoc_strdup(cp); |
|
return 0; |
|
case 2: |
|
if (conf->paper != NULL) { |
|
oldval = mandoc_strdup(conf->paper); |
|
break; |
|
} |
|
conf->paper = mandoc_strdup(cp); |
|
return 0; |
|
case 3: |
|
if (conf->style != NULL) { |
|
oldval = mandoc_strdup(conf->style); |
|
break; |
|
} |
|
conf->style = mandoc_strdup(cp); |
|
return 0; |
|
case 4: |
|
if (conf->indent) { |
|
mandoc_asprintf(&oldval, "%zu", conf->indent); |
|
break; |
|
} |
|
conf->indent = strtonum(cp, 0, 1000, &errstr); |
|
if (errstr == NULL) |
|
return 0; |
|
warnx("-O indent=%s is %s", cp, errstr); |
|
return -1; |
|
case 5: |
|
if (conf->width) { |
|
mandoc_asprintf(&oldval, "%zu", conf->width); |
|
break; |
|
} |
|
conf->width = strtonum(cp, 58, 1000, &errstr); |
|
if (errstr == NULL) |
|
return 0; |
|
warnx("-O width=%s is %s", cp, errstr); |
|
return -1; |
|
case 6: |
|
conf->fragment = 1; |
|
return 0; |
|
case 7: |
|
conf->mdoc = 1; |
|
return 0; |
|
default: |
|
if (fromfile) |
|
warnx("-O %s: Bad argument", cp); |
|
return -1; |
|
} |
|
if (fromfile == 0) |
|
warnx("-O %s=%s: Option already set to %s", |
|
toks[tok], cp, oldval); |
|
free(oldval); |
|
return -1; |
} |
} |