version 1.17, 2011/11/29 00:34:50 |
version 1.28, 2011/12/08 09:19:13 |
|
|
#include <string.h> |
#include <string.h> |
#include <unistd.h> |
#include <unistd.h> |
|
|
#ifdef __linux__ |
#if defined(__linux__) |
|
# include <endian.h> |
# include <db_185.h> |
# include <db_185.h> |
|
#elif defined(__APPLE__) |
|
# include <libkern/OSByteOrder.h> |
|
# include <db.h> |
#else |
#else |
# include <db.h> |
# include <db.h> |
#endif |
#endif |
Line 103 static void index_merge(const struct of *, struct m |
|
Line 107 static void index_merge(const struct of *, struct m |
|
recno_t, const recno_t *, size_t); |
recno_t, const recno_t *, size_t); |
static void index_prune(const struct of *, DB *, |
static void index_prune(const struct of *, DB *, |
const char *, DB *, const char *, |
const char *, DB *, const char *, |
recno_t *, recno_t **, size_t *); |
recno_t *, recno_t **, size_t *, |
|
size_t *); |
static void ofile_argbuild(int, char *[], struct of **); |
static void ofile_argbuild(int, char *[], struct of **); |
static int ofile_dirbuild(const char *, const char *, |
static int ofile_dirbuild(const char *, const char *, |
const char *, int, struct of **); |
const char *, int, struct of **); |
Line 112 static void pformatted(DB *, struct buf *, struct b |
|
Line 117 static void pformatted(DB *, struct buf *, struct b |
|
const struct of *); |
const struct of *); |
static int pman_node(MAN_ARGS); |
static int pman_node(MAN_ARGS); |
static void pmdoc_node(MDOC_ARGS); |
static void pmdoc_node(MDOC_ARGS); |
static void pmdoc_An(MDOC_ARGS); |
static int pmdoc_head(MDOC_ARGS); |
static void pmdoc_Cd(MDOC_ARGS); |
static int pmdoc_body(MDOC_ARGS); |
static void pmdoc_Er(MDOC_ARGS); |
static int pmdoc_Fd(MDOC_ARGS); |
static void pmdoc_Ev(MDOC_ARGS); |
static int pmdoc_In(MDOC_ARGS); |
static void pmdoc_Fd(MDOC_ARGS); |
static int pmdoc_Fn(MDOC_ARGS); |
static void pmdoc_In(MDOC_ARGS); |
static int pmdoc_Nd(MDOC_ARGS); |
static void pmdoc_Fn(MDOC_ARGS); |
static int pmdoc_Nm(MDOC_ARGS); |
static void pmdoc_Fo(MDOC_ARGS); |
static int pmdoc_Sh(MDOC_ARGS); |
static void pmdoc_Nd(MDOC_ARGS); |
static int pmdoc_St(MDOC_ARGS); |
static void pmdoc_Nm(MDOC_ARGS); |
static int pmdoc_Xr(MDOC_ARGS); |
static void pmdoc_Pa(MDOC_ARGS); |
|
static void pmdoc_St(MDOC_ARGS); |
|
static void pmdoc_Vt(MDOC_ARGS); |
|
static void pmdoc_Xr(MDOC_ARGS); |
|
static void usage(void); |
static void usage(void); |
|
|
typedef void (*pmdoc_nf)(MDOC_ARGS); |
#define MDOCF_CHILD 0x01 /* Automatically index child nodes. */ |
|
|
static const pmdoc_nf mdocs[MDOC_MAX] = { |
struct mdoc_handler { |
NULL, /* Ap */ |
int (*fp)(MDOC_ARGS); /* Optional handler. */ |
NULL, /* Dd */ |
uint64_t mask; /* Set unless handler returns 0. */ |
NULL, /* Dt */ |
int flags; /* For use by pmdoc_node. */ |
NULL, /* Os */ |
|
NULL, /* Sh */ |
|
NULL, /* Ss */ |
|
NULL, /* Pp */ |
|
NULL, /* D1 */ |
|
NULL, /* Dl */ |
|
NULL, /* Bd */ |
|
NULL, /* Ed */ |
|
NULL, /* Bl */ |
|
NULL, /* El */ |
|
NULL, /* It */ |
|
NULL, /* Ad */ |
|
pmdoc_An, /* An */ |
|
NULL, /* Ar */ |
|
pmdoc_Cd, /* Cd */ |
|
NULL, /* Cm */ |
|
NULL, /* Dv */ |
|
pmdoc_Er, /* Er */ |
|
pmdoc_Ev, /* Ev */ |
|
NULL, /* Ex */ |
|
NULL, /* Fa */ |
|
pmdoc_Fd, /* Fd */ |
|
NULL, /* Fl */ |
|
pmdoc_Fn, /* Fn */ |
|
NULL, /* Ft */ |
|
NULL, /* Ic */ |
|
pmdoc_In, /* In */ |
|
NULL, /* Li */ |
|
pmdoc_Nd, /* Nd */ |
|
pmdoc_Nm, /* Nm */ |
|
NULL, /* Op */ |
|
NULL, /* Ot */ |
|
pmdoc_Pa, /* Pa */ |
|
NULL, /* Rv */ |
|
pmdoc_St, /* St */ |
|
pmdoc_Vt, /* Va */ |
|
pmdoc_Vt, /* Vt */ |
|
pmdoc_Xr, /* Xr */ |
|
NULL, /* %A */ |
|
NULL, /* %B */ |
|
NULL, /* %D */ |
|
NULL, /* %I */ |
|
NULL, /* %J */ |
|
NULL, /* %N */ |
|
NULL, /* %O */ |
|
NULL, /* %P */ |
|
NULL, /* %R */ |
|
NULL, /* %T */ |
|
NULL, /* %V */ |
|
NULL, /* Ac */ |
|
NULL, /* Ao */ |
|
NULL, /* Aq */ |
|
NULL, /* At */ |
|
NULL, /* Bc */ |
|
NULL, /* Bf */ |
|
NULL, /* Bo */ |
|
NULL, /* Bq */ |
|
NULL, /* Bsx */ |
|
NULL, /* Bx */ |
|
NULL, /* Db */ |
|
NULL, /* Dc */ |
|
NULL, /* Do */ |
|
NULL, /* Dq */ |
|
NULL, /* Ec */ |
|
NULL, /* Ef */ |
|
NULL, /* Em */ |
|
NULL, /* Eo */ |
|
NULL, /* Fx */ |
|
NULL, /* Ms */ |
|
NULL, /* No */ |
|
NULL, /* Ns */ |
|
NULL, /* Nx */ |
|
NULL, /* Ox */ |
|
NULL, /* Pc */ |
|
NULL, /* Pf */ |
|
NULL, /* Po */ |
|
NULL, /* Pq */ |
|
NULL, /* Qc */ |
|
NULL, /* Ql */ |
|
NULL, /* Qo */ |
|
NULL, /* Qq */ |
|
NULL, /* Re */ |
|
NULL, /* Rs */ |
|
NULL, /* Sc */ |
|
NULL, /* So */ |
|
NULL, /* Sq */ |
|
NULL, /* Sm */ |
|
NULL, /* Sx */ |
|
NULL, /* Sy */ |
|
NULL, /* Tn */ |
|
NULL, /* Ux */ |
|
NULL, /* Xc */ |
|
NULL, /* Xo */ |
|
pmdoc_Fo, /* Fo */ |
|
NULL, /* Fc */ |
|
NULL, /* Oo */ |
|
NULL, /* Oc */ |
|
NULL, /* Bk */ |
|
NULL, /* Ek */ |
|
NULL, /* Bt */ |
|
NULL, /* Hf */ |
|
NULL, /* Fr */ |
|
NULL, /* Ud */ |
|
NULL, /* Lb */ |
|
NULL, /* Lp */ |
|
NULL, /* Lk */ |
|
NULL, /* Mt */ |
|
NULL, /* Brq */ |
|
NULL, /* Bro */ |
|
NULL, /* Brc */ |
|
NULL, /* %C */ |
|
NULL, /* Es */ |
|
NULL, /* En */ |
|
NULL, /* Dx */ |
|
NULL, /* %Q */ |
|
NULL, /* br */ |
|
NULL, /* sp */ |
|
NULL, /* %U */ |
|
NULL, /* Ta */ |
|
}; |
}; |
|
|
|
static const struct mdoc_handler mdocs[MDOC_MAX] = { |
|
{ NULL, 0, 0 }, /* Ap */ |
|
{ NULL, 0, 0 }, /* Dd */ |
|
{ NULL, 0, 0 }, /* Dt */ |
|
{ NULL, 0, 0 }, /* Os */ |
|
{ pmdoc_Sh, TYPE_Sh, MDOCF_CHILD }, /* Sh */ |
|
{ pmdoc_head, TYPE_Ss, MDOCF_CHILD }, /* Ss */ |
|
{ NULL, 0, 0 }, /* Pp */ |
|
{ NULL, 0, 0 }, /* D1 */ |
|
{ NULL, 0, 0 }, /* Dl */ |
|
{ NULL, 0, 0 }, /* Bd */ |
|
{ NULL, 0, 0 }, /* Ed */ |
|
{ NULL, 0, 0 }, /* Bl */ |
|
{ NULL, 0, 0 }, /* El */ |
|
{ NULL, 0, 0 }, /* It */ |
|
{ NULL, 0, 0 }, /* Ad */ |
|
{ NULL, TYPE_An, MDOCF_CHILD }, /* An */ |
|
{ NULL, TYPE_Ar, MDOCF_CHILD }, /* Ar */ |
|
{ NULL, TYPE_Cd, MDOCF_CHILD }, /* Cd */ |
|
{ NULL, TYPE_Cm, MDOCF_CHILD }, /* Cm */ |
|
{ NULL, TYPE_Dv, MDOCF_CHILD }, /* Dv */ |
|
{ NULL, TYPE_Er, MDOCF_CHILD }, /* Er */ |
|
{ NULL, TYPE_Ev, MDOCF_CHILD }, /* Ev */ |
|
{ NULL, 0, 0 }, /* Ex */ |
|
{ NULL, TYPE_Fa, MDOCF_CHILD }, /* Fa */ |
|
{ pmdoc_Fd, TYPE_In, 0 }, /* Fd */ |
|
{ NULL, TYPE_Fl, MDOCF_CHILD }, /* Fl */ |
|
{ pmdoc_Fn, 0, 0 }, /* Fn */ |
|
{ NULL, TYPE_Ft, MDOCF_CHILD }, /* Ft */ |
|
{ NULL, TYPE_Ic, MDOCF_CHILD }, /* Ic */ |
|
{ pmdoc_In, TYPE_In, 0 }, /* In */ |
|
{ NULL, TYPE_Li, MDOCF_CHILD }, /* Li */ |
|
{ pmdoc_Nd, TYPE_Nd, MDOCF_CHILD }, /* Nd */ |
|
{ pmdoc_Nm, TYPE_Nm, MDOCF_CHILD }, /* Nm */ |
|
{ NULL, 0, 0 }, /* Op */ |
|
{ NULL, 0, 0 }, /* Ot */ |
|
{ NULL, TYPE_Pa, MDOCF_CHILD }, /* Pa */ |
|
{ NULL, 0, 0 }, /* Rv */ |
|
{ pmdoc_St, TYPE_St, 0 }, /* St */ |
|
{ NULL, TYPE_Va, MDOCF_CHILD }, /* Va */ |
|
{ pmdoc_body, TYPE_Va, MDOCF_CHILD }, /* Vt */ |
|
{ pmdoc_Xr, TYPE_Xr, 0 }, /* Xr */ |
|
{ NULL, 0, 0 }, /* %A */ |
|
{ NULL, 0, 0 }, /* %B */ |
|
{ NULL, 0, 0 }, /* %D */ |
|
{ NULL, 0, 0 }, /* %I */ |
|
{ NULL, 0, 0 }, /* %J */ |
|
{ NULL, 0, 0 }, /* %N */ |
|
{ NULL, 0, 0 }, /* %O */ |
|
{ NULL, 0, 0 }, /* %P */ |
|
{ NULL, 0, 0 }, /* %R */ |
|
{ NULL, 0, 0 }, /* %T */ |
|
{ NULL, 0, 0 }, /* %V */ |
|
{ NULL, 0, 0 }, /* Ac */ |
|
{ NULL, 0, 0 }, /* Ao */ |
|
{ NULL, 0, 0 }, /* Aq */ |
|
{ NULL, TYPE_At, MDOCF_CHILD }, /* At */ |
|
{ NULL, 0, 0 }, /* Bc */ |
|
{ NULL, 0, 0 }, /* Bf */ |
|
{ NULL, 0, 0 }, /* Bo */ |
|
{ NULL, 0, 0 }, /* Bq */ |
|
{ NULL, TYPE_Bsx, MDOCF_CHILD }, /* Bsx */ |
|
{ NULL, TYPE_Bx, MDOCF_CHILD }, /* Bx */ |
|
{ NULL, 0, 0 }, /* Db */ |
|
{ NULL, 0, 0 }, /* Dc */ |
|
{ NULL, 0, 0 }, /* Do */ |
|
{ NULL, 0, 0 }, /* Dq */ |
|
{ NULL, 0, 0 }, /* Ec */ |
|
{ NULL, 0, 0 }, /* Ef */ |
|
{ NULL, TYPE_Em, MDOCF_CHILD }, /* Em */ |
|
{ NULL, 0, 0 }, /* Eo */ |
|
{ NULL, TYPE_Fx, MDOCF_CHILD }, /* Fx */ |
|
{ NULL, TYPE_Ms, MDOCF_CHILD }, /* Ms */ |
|
{ NULL, 0, 0 }, /* No */ |
|
{ NULL, 0, 0 }, /* Ns */ |
|
{ NULL, TYPE_Nx, MDOCF_CHILD }, /* Nx */ |
|
{ NULL, TYPE_Ox, MDOCF_CHILD }, /* Ox */ |
|
{ NULL, 0, 0 }, /* Pc */ |
|
{ NULL, 0, 0 }, /* Pf */ |
|
{ NULL, 0, 0 }, /* Po */ |
|
{ NULL, 0, 0 }, /* Pq */ |
|
{ NULL, 0, 0 }, /* Qc */ |
|
{ NULL, 0, 0 }, /* Ql */ |
|
{ NULL, 0, 0 }, /* Qo */ |
|
{ NULL, 0, 0 }, /* Qq */ |
|
{ NULL, 0, 0 }, /* Re */ |
|
{ NULL, 0, 0 }, /* Rs */ |
|
{ NULL, 0, 0 }, /* Sc */ |
|
{ NULL, 0, 0 }, /* So */ |
|
{ NULL, 0, 0 }, /* Sq */ |
|
{ NULL, 0, 0 }, /* Sm */ |
|
{ NULL, 0, 0 }, /* Sx */ |
|
{ NULL, TYPE_Sy, MDOCF_CHILD }, /* Sy */ |
|
{ NULL, TYPE_Tn, MDOCF_CHILD }, /* Tn */ |
|
{ NULL, 0, 0 }, /* Ux */ |
|
{ NULL, 0, 0 }, /* Xc */ |
|
{ NULL, 0, 0 }, /* Xo */ |
|
{ pmdoc_head, TYPE_Fn, 0 }, /* Fo */ |
|
{ NULL, 0, 0 }, /* Fc */ |
|
{ NULL, 0, 0 }, /* Oo */ |
|
{ NULL, 0, 0 }, /* Oc */ |
|
{ NULL, 0, 0 }, /* Bk */ |
|
{ NULL, 0, 0 }, /* Ek */ |
|
{ NULL, 0, 0 }, /* Bt */ |
|
{ NULL, 0, 0 }, /* Hf */ |
|
{ NULL, 0, 0 }, /* Fr */ |
|
{ NULL, 0, 0 }, /* Ud */ |
|
{ NULL, TYPE_Lb, MDOCF_CHILD }, /* Lb */ |
|
{ NULL, 0, 0 }, /* Lp */ |
|
{ NULL, TYPE_Lk, MDOCF_CHILD }, /* Lk */ |
|
{ NULL, TYPE_Mt, MDOCF_CHILD }, /* Mt */ |
|
{ NULL, 0, 0 }, /* Brq */ |
|
{ NULL, 0, 0 }, /* Bro */ |
|
{ NULL, 0, 0 }, /* Brc */ |
|
{ NULL, 0, 0 }, /* %C */ |
|
{ NULL, 0, 0 }, /* Es */ |
|
{ NULL, 0, 0 }, /* En */ |
|
{ NULL, TYPE_Dx, MDOCF_CHILD }, /* Dx */ |
|
{ NULL, 0, 0 }, /* %Q */ |
|
{ NULL, 0, 0 }, /* br */ |
|
{ NULL, 0, 0 }, /* sp */ |
|
{ NULL, 0, 0 }, /* %U */ |
|
{ NULL, 0, 0 }, /* Ta */ |
|
}; |
|
|
static const char *progname; |
static const char *progname; |
static int use_all; /* Use all directories and files. */ |
static int use_all; /* Use all directories and files. */ |
static int verb; /* Output verbosity level. */ |
static int verb; /* Output verbosity level. */ |
Line 266 main(int argc, char *argv[]) |
|
Line 273 main(int argc, char *argv[]) |
|
struct manpaths dirs; |
struct manpaths dirs; |
enum op op; /* current operation */ |
enum op op; /* current operation */ |
const char *dir; |
const char *dir; |
char ibuf[MAXPATHLEN], /* index fname */ |
char *cp; |
|
char pbuf[PATH_MAX], |
|
ibuf[MAXPATHLEN], /* index fname */ |
fbuf[MAXPATHLEN]; /* btree fname */ |
fbuf[MAXPATHLEN]; /* btree fname */ |
int ch, i, flags; |
int ch, i, flags; |
DB *idx, /* index database */ |
DB *idx, /* index database */ |
Line 382 main(int argc, char *argv[]) |
|
Line 391 main(int argc, char *argv[]) |
|
of = of->first; |
of = of->first; |
|
|
index_prune(of, db, fbuf, idx, ibuf, |
index_prune(of, db, fbuf, idx, ibuf, |
&maxrec, &recs, &recsz); |
&maxrec, &recs, &recsz, &reccur); |
|
|
/* |
/* |
* Go to the root of the respective manual tree |
* Go to the root of the respective manual tree |
Line 407 main(int argc, char *argv[]) |
|
Line 416 main(int argc, char *argv[]) |
|
*/ |
*/ |
|
|
if (argc > 0) { |
if (argc > 0) { |
dirs.paths = mandoc_malloc(argc * sizeof(char *)); |
dirs.paths = mandoc_calloc(argc, sizeof(char *)); |
dirs.sz = argc; |
dirs.sz = argc; |
for (i = 0; i < argc; i++) |
for (i = 0; i < argc; i++) { |
dirs.paths[i] = mandoc_strdup(argv[i]); |
if (NULL == (cp = realpath(argv[i], pbuf))) { |
|
perror(argv[i]); |
|
goto out; |
|
} |
|
dirs.paths[i] = mandoc_strdup(cp); |
|
} |
} else |
} else |
manpath_parse(&dirs, NULL, NULL); |
manpath_parse(&dirs, NULL, NULL); |
|
|
Line 626 index_merge(const struct of *of, struct mparse *mp, |
|
Line 640 index_merge(const struct of *of, struct mparse *mp, |
|
* into the database. |
* into the database. |
*/ |
*/ |
|
|
vbuf.rec = rec; |
vbuf.rec = htobe32(rec); |
seq = R_FIRST; |
seq = R_FIRST; |
while (0 == (ch = (*hash->seq)(hash, &key, &val, seq))) { |
while (0 == (ch = (*hash->seq)(hash, &key, &val, seq))) { |
seq = R_NEXT; |
seq = R_NEXT; |
|
vbuf.mask = htobe64(*(uint64_t *)val.data); |
vbuf.mask = *(uint64_t *)val.data; |
|
val.size = sizeof(struct db_val); |
val.size = sizeof(struct db_val); |
val.data = &vbuf; |
val.data = &vbuf; |
|
|
if (verb > 1) |
|
printf("%s: Added keyword: %s\n", |
|
fn, (char *)key.data); |
|
dbt_put(db, dbf, &key, &val); |
dbt_put(db, dbf, &key, &val); |
} |
} |
if (ch < 0) { |
if (ch < 0) { |
Line 661 index_merge(const struct of *of, struct mparse *mp, |
|
Line 670 index_merge(const struct of *of, struct mparse *mp, |
|
|
|
if (verb) |
if (verb) |
printf("%s: Added index\n", fn); |
printf("%s: Added index\n", fn); |
|
|
dbt_put(idx, idxf, &key, &val); |
dbt_put(idx, idxf, &key, &val); |
} |
} |
} |
} |
Line 673 index_merge(const struct of *of, struct mparse *mp, |
|
Line 683 index_merge(const struct of *of, struct mparse *mp, |
|
*/ |
*/ |
static void |
static void |
index_prune(const struct of *ofile, DB *db, const char *dbf, |
index_prune(const struct of *ofile, DB *db, const char *dbf, |
DB *idx, const char *idxf, |
DB *idx, const char *idxf, recno_t *maxrec, |
recno_t *maxrec, recno_t **recs, size_t *recsz) |
recno_t **recs, size_t *recsz, size_t *reccur) |
{ |
{ |
const struct of *of; |
const struct of *of; |
const char *fn; |
const char *fn, *cp; |
struct db_val *vbuf; |
struct db_val *vbuf; |
unsigned seq, sseq; |
unsigned seq, sseq; |
DBT key, val; |
DBT key, val; |
size_t reccur; |
|
int ch; |
int ch; |
|
|
reccur = 0; |
*reccur = 0; |
seq = R_FIRST; |
seq = R_FIRST; |
while (0 == (ch = (*idx->seq)(idx, &key, &val, seq))) { |
while (0 == (ch = (*idx->seq)(idx, &key, &val, seq))) { |
seq = R_NEXT; |
seq = R_NEXT; |
*maxrec = *(recno_t *)key.data; |
*maxrec = *(recno_t *)key.data; |
if (0 == val.size) { |
cp = val.data; |
if (reccur >= *recsz) { |
|
*recsz += MANDOC_SLOP; |
|
*recs = mandoc_realloc(*recs, |
|
*recsz * sizeof(recno_t)); |
|
} |
|
(*recs)[(int)reccur] = *maxrec; |
|
reccur++; |
|
continue; |
|
} |
|
|
|
fn = (char *)val.data; |
/* Deleted records are zero-sized. Skip them. */ |
|
|
|
if (0 == val.size) |
|
goto cont; |
|
|
|
/* |
|
* Make sure we're sane. |
|
* Read past our mdoc/man/cat type to the next string, |
|
* then make sure it's bounded by a NUL. |
|
* Failing any of these, we go into our error handler. |
|
*/ |
|
|
|
if (NULL == (fn = memchr(cp, '\0', val.size))) |
|
break; |
|
if (++fn - cp >= (int)val.size) |
|
break; |
|
if (NULL == memchr(fn, '\0', val.size - (fn - cp))) |
|
break; |
|
|
|
/* |
|
* Search for the file in those we care about. |
|
* XXX: build this into a tree. Too slow. |
|
*/ |
|
|
for (of = ofile; of; of = of->next) |
for (of = ofile; of; of = of->next) |
if (0 == strcmp(fn, of->fname)) |
if (0 == strcmp(fn, of->fname)) |
break; |
break; |
Line 708 index_prune(const struct of *ofile, DB *db, const char |
|
Line 731 index_prune(const struct of *ofile, DB *db, const char |
|
if (NULL == of) |
if (NULL == of) |
continue; |
continue; |
|
|
|
/* |
|
* Search through the keyword database, throwing out all |
|
* references to our file. |
|
*/ |
|
|
sseq = R_FIRST; |
sseq = R_FIRST; |
while (0 == (ch = (*db->seq)(db, &key, &val, sseq))) { |
while (0 == (ch = (*db->seq)(db, &key, &val, sseq))) { |
sseq = R_NEXT; |
sseq = R_NEXT; |
assert(sizeof(struct db_val) == val.size); |
if (sizeof(struct db_val) != val.size) |
|
break; |
|
|
vbuf = val.data; |
vbuf = val.data; |
if (*maxrec != vbuf->rec) |
if (*maxrec != betoh32(vbuf->rec)) |
continue; |
continue; |
if (verb) |
|
printf("%s: Deleted keyword: %s\n", |
if ((ch = (*db->del)(db, &key, R_CURSOR)) < 0) |
fn, (char *)key.data); |
|
ch = (*db->del)(db, &key, R_CURSOR); |
|
if (ch < 0) |
|
break; |
break; |
} |
} |
|
|
if (ch < 0) { |
if (ch < 0) { |
perror(dbf); |
perror(dbf); |
exit((int)MANDOCLEVEL_SYSERR); |
exit((int)MANDOCLEVEL_SYSERR); |
|
} else if (1 != ch) { |
|
fprintf(stderr, "%s: Corrupt database\n", dbf); |
|
exit((int)MANDOCLEVEL_SYSERR); |
} |
} |
|
|
if (verb) |
if (verb) |
Line 732 index_prune(const struct of *ofile, DB *db, const char |
|
Line 763 index_prune(const struct of *ofile, DB *db, const char |
|
|
|
val.size = 0; |
val.size = 0; |
ch = (*idx->put)(idx, &key, &val, R_CURSOR); |
ch = (*idx->put)(idx, &key, &val, R_CURSOR); |
if (ch < 0) { |
|
perror(idxf); |
|
exit((int)MANDOCLEVEL_SYSERR); |
|
} |
|
|
|
if (reccur >= *recsz) { |
if (ch < 0) |
|
break; |
|
cont: |
|
if (*reccur >= *recsz) { |
*recsz += MANDOC_SLOP; |
*recsz += MANDOC_SLOP; |
*recs = mandoc_realloc |
*recs = mandoc_realloc |
(*recs, *recsz * sizeof(recno_t)); |
(*recs, *recsz * sizeof(recno_t)); |
} |
} |
|
|
(*recs)[(int)reccur] = *maxrec; |
(*recs)[(int)*reccur] = *maxrec; |
reccur++; |
(*reccur)++; |
} |
} |
|
|
|
if (ch < 0) { |
|
perror(idxf); |
|
exit((int)MANDOCLEVEL_SYSERR); |
|
} else if (1 != ch) { |
|
fprintf(stderr, "%s: Corrupt index\n", idxf); |
|
exit((int)MANDOCLEVEL_SYSERR); |
|
} |
|
|
(*maxrec)++; |
(*maxrec)++; |
} |
} |
|
|
Line 814 buf_appendmdoc(struct buf *buf, const struct mdoc_node |
|
Line 853 buf_appendmdoc(struct buf *buf, const struct mdoc_node |
|
} |
} |
} |
} |
|
|
/* ARGSUSED */ |
|
static void |
static void |
pmdoc_An(MDOC_ARGS) |
|
{ |
|
|
|
if (SEC_AUTHORS != n->sec) |
|
return; |
|
|
|
buf_appendmdoc(buf, n->child, 0); |
|
hash_put(hash, buf, TYPE_An); |
|
} |
|
|
|
static void |
|
hash_reset(DB **db) |
hash_reset(DB **db) |
{ |
{ |
DB *hash; |
DB *hash; |
Line 842 hash_reset(DB **db) |
|
Line 869 hash_reset(DB **db) |
|
} |
} |
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static void |
static int |
|
pmdoc_head(MDOC_ARGS) |
|
{ |
|
|
|
return(MDOC_HEAD == n->type); |
|
} |
|
|
|
/* ARGSUSED */ |
|
static int |
|
pmdoc_body(MDOC_ARGS) |
|
{ |
|
|
|
return(MDOC_BODY == n->type); |
|
} |
|
|
|
/* ARGSUSED */ |
|
static int |
pmdoc_Fd(MDOC_ARGS) |
pmdoc_Fd(MDOC_ARGS) |
{ |
{ |
const char *start, *end; |
const char *start, *end; |
size_t sz; |
size_t sz; |
|
|
if (SEC_SYNOPSIS != n->sec) |
if (SEC_SYNOPSIS != n->sec) |
return; |
return(0); |
if (NULL == (n = n->child) || MDOC_TEXT != n->type) |
if (NULL == (n = n->child) || MDOC_TEXT != n->type) |
return; |
return(0); |
|
|
/* |
/* |
* Only consider those `Fd' macro fields that begin with an |
* Only consider those `Fd' macro fields that begin with an |
* "inclusion" token (versus, e.g., #define). |
* "inclusion" token (versus, e.g., #define). |
*/ |
*/ |
if (strcmp("#include", n->string)) |
if (strcmp("#include", n->string)) |
return; |
return(0); |
|
|
if (NULL == (n = n->next) || MDOC_TEXT != n->type) |
if (NULL == (n = n->next) || MDOC_TEXT != n->type) |
return; |
return(0); |
|
|
/* |
/* |
* Strip away the enclosing angle brackets and make sure we're |
* Strip away the enclosing angle brackets and make sure we're |
Line 873 pmdoc_Fd(MDOC_ARGS) |
|
Line 916 pmdoc_Fd(MDOC_ARGS) |
|
start++; |
start++; |
|
|
if (0 == (sz = strlen(start))) |
if (0 == (sz = strlen(start))) |
return; |
return(0); |
|
|
end = &start[(int)sz - 1]; |
end = &start[(int)sz - 1]; |
if ('>' == *end || '"' == *end) |
if ('>' == *end || '"' == *end) |
Line 883 pmdoc_Fd(MDOC_ARGS) |
|
Line 926 pmdoc_Fd(MDOC_ARGS) |
|
|
|
buf_appendb(buf, start, (size_t)(end - start + 1)); |
buf_appendb(buf, start, (size_t)(end - start + 1)); |
buf_appendb(buf, "", 1); |
buf_appendb(buf, "", 1); |
|
return(1); |
hash_put(hash, buf, TYPE_In); |
|
} |
} |
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static void |
static int |
pmdoc_Cd(MDOC_ARGS) |
|
{ |
|
|
|
if (SEC_SYNOPSIS != n->sec) |
|
return; |
|
|
|
buf_appendmdoc(buf, n->child, 0); |
|
hash_put(hash, buf, TYPE_Cd); |
|
} |
|
|
|
/* ARGSUSED */ |
|
static void |
|
pmdoc_In(MDOC_ARGS) |
pmdoc_In(MDOC_ARGS) |
{ |
{ |
|
|
if (SEC_SYNOPSIS != n->sec) |
|
return; |
|
if (NULL == n->child || MDOC_TEXT != n->child->type) |
if (NULL == n->child || MDOC_TEXT != n->child->type) |
return; |
return(0); |
|
|
buf_append(buf, n->child->string); |
buf_append(buf, n->child->string); |
hash_put(hash, buf, TYPE_In); |
return(1); |
} |
} |
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static void |
static int |
pmdoc_Fn(MDOC_ARGS) |
pmdoc_Fn(MDOC_ARGS) |
{ |
{ |
|
struct mdoc_node *nn; |
const char *cp; |
const char *cp; |
|
|
if (SEC_SYNOPSIS != n->sec) |
|
return; |
|
if (NULL == n->child || MDOC_TEXT != n->child->type) |
|
return; |
|
|
|
/* .Fn "struct type *arg" "foo" */ |
nn = n->child; |
|
|
cp = strrchr(n->child->string, ' '); |
if (NULL == nn || MDOC_TEXT != nn->type) |
|
return(0); |
|
|
|
/* .Fn "struct type *name" "char *arg" */ |
|
|
|
cp = strrchr(nn->string, ' '); |
if (NULL == cp) |
if (NULL == cp) |
cp = n->child->string; |
cp = nn->string; |
|
|
/* Strip away pointer symbol. */ |
/* Strip away pointer symbol. */ |
|
|
while ('*' == *cp) |
while ('*' == *cp) |
cp++; |
cp++; |
|
|
|
/* Store the function name. */ |
|
|
buf_append(buf, cp); |
buf_append(buf, cp); |
hash_put(hash, buf, TYPE_Fn); |
hash_put(hash, buf, TYPE_Fn); |
|
|
|
/* Store the function type. */ |
|
|
|
if (nn->string < cp) { |
|
buf->len = 0; |
|
buf_appendb(buf, nn->string, cp - nn->string); |
|
buf_appendb(buf, "", 1); |
|
hash_put(hash, buf, TYPE_Ft); |
|
} |
|
|
|
/* Store the arguments. */ |
|
|
|
for (nn = nn->next; nn; nn = nn->next) { |
|
if (MDOC_TEXT != nn->type) |
|
continue; |
|
buf->len = 0; |
|
buf_append(buf, nn->string); |
|
hash_put(hash, buf, TYPE_Fa); |
|
} |
|
|
|
return(0); |
} |
} |
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static void |
static int |
pmdoc_St(MDOC_ARGS) |
pmdoc_St(MDOC_ARGS) |
{ |
{ |
|
|
if (SEC_STANDARDS != n->sec) |
|
return; |
|
if (NULL == n->child || MDOC_TEXT != n->child->type) |
if (NULL == n->child || MDOC_TEXT != n->child->type) |
return; |
return(0); |
|
|
buf_append(buf, n->child->string); |
buf_append(buf, n->child->string); |
hash_put(hash, buf, TYPE_St); |
return(1); |
} |
} |
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static void |
static int |
pmdoc_Xr(MDOC_ARGS) |
pmdoc_Xr(MDOC_ARGS) |
{ |
{ |
|
|
if (NULL == (n = n->child)) |
if (NULL == (n = n->child)) |
return; |
return(0); |
|
|
buf_appendb(buf, n->string, strlen(n->string)); |
buf_appendb(buf, n->string, strlen(n->string)); |
|
|
Line 969 pmdoc_Xr(MDOC_ARGS) |
|
Line 1019 pmdoc_Xr(MDOC_ARGS) |
|
} else |
} else |
buf_appendb(buf, ".", 2); |
buf_appendb(buf, ".", 2); |
|
|
hash_put(hash, buf, TYPE_Xr); |
return(1); |
} |
} |
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static void |
static int |
pmdoc_Vt(MDOC_ARGS) |
|
{ |
|
const char *start; |
|
size_t sz; |
|
|
|
if (SEC_SYNOPSIS != n->sec) |
|
return; |
|
if (MDOC_Vt == n->tok && MDOC_BODY != n->type) |
|
return; |
|
if (NULL == n->last || MDOC_TEXT != n->last->type) |
|
return; |
|
|
|
/* |
|
* Strip away leading pointer symbol '*' and trailing ';'. |
|
*/ |
|
|
|
start = n->last->string; |
|
|
|
while ('*' == *start) |
|
start++; |
|
|
|
if (0 == (sz = strlen(start))) |
|
return; |
|
|
|
if (';' == start[(int)sz - 1]) |
|
sz--; |
|
|
|
if (0 == sz) |
|
return; |
|
|
|
buf_appendb(buf, start, sz); |
|
buf_appendb(buf, "", 1); |
|
hash_put(hash, buf, TYPE_Va); |
|
} |
|
|
|
/* ARGSUSED */ |
|
static void |
|
pmdoc_Fo(MDOC_ARGS) |
|
{ |
|
|
|
if (SEC_SYNOPSIS != n->sec || MDOC_HEAD != n->type) |
|
return; |
|
if (NULL == n->child || MDOC_TEXT != n->child->type) |
|
return; |
|
|
|
buf_append(buf, n->child->string); |
|
hash_put(hash, buf, TYPE_Fn); |
|
} |
|
|
|
|
|
/* ARGSUSED */ |
|
static void |
|
pmdoc_Nd(MDOC_ARGS) |
pmdoc_Nd(MDOC_ARGS) |
{ |
{ |
|
|
if (MDOC_BODY != n->type) |
if (MDOC_BODY != n->type) |
return; |
return(0); |
|
|
buf_appendmdoc(dbuf, n->child, 1); |
buf_appendmdoc(dbuf, n->child, 1); |
buf_appendmdoc(buf, n->child, 0); |
return(1); |
|
|
hash_put(hash, buf, TYPE_Nd); |
|
} |
} |
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static void |
static int |
pmdoc_Er(MDOC_ARGS) |
pmdoc_Nm(MDOC_ARGS) |
{ |
{ |
|
|
if (SEC_ERRORS != n->sec) |
if (SEC_NAME == n->sec) |
return; |
return(1); |
|
else if (SEC_SYNOPSIS != n->sec || MDOC_HEAD != n->type) |
buf_appendmdoc(buf, n->child, 0); |
return(0); |
hash_put(hash, buf, TYPE_Er); |
|
} |
|
|
|
/* ARGSUSED */ |
if (NULL == n->child) |
static void |
buf_append(buf, m->name); |
pmdoc_Ev(MDOC_ARGS) |
|
{ |
|
|
|
if (SEC_ENVIRONMENT != n->sec) |
return(1); |
return; |
|
|
|
buf_appendmdoc(buf, n->child, 0); |
|
hash_put(hash, buf, TYPE_Ev); |
|
} |
} |
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static void |
static int |
pmdoc_Pa(MDOC_ARGS) |
pmdoc_Sh(MDOC_ARGS) |
{ |
{ |
|
|
if (SEC_FILES != n->sec) |
return(SEC_CUSTOM == n->sec && MDOC_HEAD == n->type); |
return; |
|
|
|
buf_appendmdoc(buf, n->child, 0); |
|
hash_put(hash, buf, TYPE_Pa); |
|
} |
} |
|
|
/* ARGSUSED */ |
|
static void |
static void |
pmdoc_Nm(MDOC_ARGS) |
|
{ |
|
|
|
if (SEC_NAME == n->sec) { |
|
buf_appendmdoc(buf, n->child, 0); |
|
hash_put(hash, buf, TYPE_Nm); |
|
return; |
|
} else if (SEC_SYNOPSIS != n->sec || MDOC_HEAD != n->type) |
|
return; |
|
|
|
if (NULL == n->child) |
|
buf_append(buf, m->name); |
|
|
|
buf_appendmdoc(buf, n->child, 0); |
|
hash_put(hash, buf, TYPE_Nm); |
|
} |
|
|
|
static void |
|
hash_put(DB *db, const struct buf *buf, uint64_t mask) |
hash_put(DB *db, const struct buf *buf, uint64_t mask) |
{ |
{ |
DBT key, val; |
DBT key, val; |
Line 1156 pmdoc_node(MDOC_ARGS) |
|
Line 1121 pmdoc_node(MDOC_ARGS) |
|
case (MDOC_BLOCK): |
case (MDOC_BLOCK): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case (MDOC_ELEM): |
case (MDOC_ELEM): |
if (NULL == mdocs[n->tok]) |
buf->len = 0; |
|
|
|
/* |
|
* Both NULL handlers and handlers returning true |
|
* request using the data. Only skip the element |
|
* when the handler returns false. |
|
*/ |
|
|
|
if (NULL != mdocs[n->tok].fp && |
|
0 == (*mdocs[n->tok].fp)(hash, buf, dbuf, n, m)) |
break; |
break; |
|
|
buf->len = 0; |
/* |
(*mdocs[n->tok])(hash, buf, dbuf, n, m); |
* For many macros, use the text from all children. |
|
* Set zero flags for macros not needing this. |
|
* In that case, the handler must fill the buffer. |
|
*/ |
|
|
|
if (MDOCF_CHILD & mdocs[n->tok].flags) |
|
buf_appendmdoc(buf, n->child, 0); |
|
|
|
/* |
|
* Cover the most common case: |
|
* Automatically stage one string per element. |
|
* Set a zero mask for macros not needing this. |
|
* Additional staging can be done in the handler. |
|
*/ |
|
|
|
if (mdocs[n->tok].mask) |
|
hash_put(hash, buf, mdocs[n->tok].mask); |
break; |
break; |
default: |
default: |
break; |
break; |
Line 1298 pformatted(DB *hash, struct buf *buf, struct buf *dbuf |
|
Line 1288 pformatted(DB *hash, struct buf *buf, struct buf *dbuf |
|
buf_append(buf, of->title); |
buf_append(buf, of->title); |
hash_put(hash, buf, TYPE_Nm); |
hash_put(hash, buf, TYPE_Nm); |
|
|
while (NULL != (line = fgetln(stream, &len)) && '\n' != *line) |
/* Skip to first blank line. */ |
/* Skip to first blank line. */ ; |
|
|
|
while (NULL != (line = fgetln(stream, &len)) && |
while (NULL != (line = fgetln(stream, &len))) |
('\n' == *line || ' ' == *line)) |
if (len && '\n' == *line) |
/* Skip to first section header. */ ; |
break; |
|
|
|
/* |
|
* Skip to first section header. |
|
* This happens when text is flush-left. |
|
*/ |
|
|
|
while (NULL != (line = fgetln(stream, &len))) |
|
if (len && '\n' != *line && ' ' != *line) |
|
break; |
|
|
/* |
/* |
* If no page content can be found, |
* If no page content can be found or the input line is |
* reuse the page title as the page description. |
* malformed (zer-length or has no trailing newline), reuse the |
|
* page title as the page description. |
*/ |
*/ |
|
|
if (NULL == (line = fgetln(stream, &len))) { |
line = fgetln(stream, &len); |
|
if (NULL == line || len == 0 || '\n' != line[(int)len - 1]) { |
buf_appendb(dbuf, buf->cp, buf->size); |
buf_appendb(dbuf, buf->cp, buf->size); |
hash_put(hash, buf, TYPE_Nd); |
hash_put(hash, buf, TYPE_Nd); |
fclose(stream); |
fclose(stream); |
return; |
return; |
} |
} |
fclose(stream); |
|
|
|
/* |
line[(int)--len] = '\0'; |
* If there is a dash, skip to the text following it. |
|
|
/* |
|
* Skip to the last dash. |
|
* Use the remaining line as the description (no more than 70 |
|
* bytes). |
*/ |
*/ |
|
|
for (p = line, plen = len; plen; p++, plen--) |
if (NULL != (p = strrchr(line, '-'))) { |
if ('-' == *p) |
for (++p; ' ' == *p || '\b' == *p; p++) |
break; |
/* Skip to next word. */ ; |
for ( ; plen; p++, plen--) |
} else |
if ('-' != *p && ' ' != *p && 8 != *p) |
|
break; |
|
if (0 == plen) { |
|
p = line; |
p = line; |
plen = len; |
|
} |
|
|
|
/* |
if ((plen = strlen(p)) > 70) { |
* Copy the rest of the line, but no more than 70 bytes. |
|
*/ |
|
|
|
if (70 < plen) |
|
plen = 70; |
plen = 70; |
p[plen-1] = '\0'; |
p[plen] = '\0'; |
buf_appendb(dbuf, p, plen); |
} |
|
|
|
buf_appendb(dbuf, p, plen + 1); |
buf->len = 0; |
buf->len = 0; |
buf_appendb(buf, p, plen); |
buf_appendb(buf, p, plen + 1); |
hash_put(hash, buf, TYPE_Nd); |
hash_put(hash, buf, TYPE_Nd); |
|
fclose(stream); |
} |
} |
|
|
static void |
static void |
Line 1387 ofile_argbuild(int argc, char *argv[], struct of **of) |
|
Line 1384 ofile_argbuild(int argc, char *argv[], struct of **of) |
|
*p = '\0'; |
*p = '\0'; |
continue; |
continue; |
} |
} |
if (strncmp("man", p + 1, 3)) { |
if (0 == strncmp("man", p + 1, 3)) |
src_form |= MANDOC_SRC; |
src_form |= MANDOC_SRC; |
arch = p + 1; |
else if (0 == strncmp("cat", p + 1, 3)) |
} else if (strncmp("cat", p + 1, 3)) { |
|
src_form |= MANDOC_FORM; |
src_form |= MANDOC_FORM; |
|
else |
arch = p + 1; |
arch = p + 1; |
} |
|
break; |
break; |
} |
} |
if (NULL == title) |
if (NULL == title) |