]> git.cameronkatri.com Git - mandoc.git/blobdiff - mandocdb.c
For some options that are rarely needed in apropos(1) and man(1),
[mandoc.git] / mandocdb.c
index 7e7ccd90076ca9cdf1a270cf134e9e8aad7857d5..3a1be8000c871ac4d75108373874656a962dd904 100644 (file)
@@ -1,7 +1,7 @@
-/*     $Id: mandocdb.c,v 1.231 2016/10/18 14:15:33 schwarze Exp $ */
+/*     $Id: mandocdb.c,v 1.245 2017/03/03 13:41:42 schwarze Exp $ */
 /*
  * Copyright (c) 2011, 2012 Kristaps Dzonsons <kristaps@bsd.lv>
- * Copyright (c) 2011-2016 Ingo Schwarze <schwarze@openbsd.org>
+ * Copyright (c) 2011-2017 Ingo Schwarze <schwarze@openbsd.org>
  * Copyright (c) 2016 Ed Maste <emaste@freebsd.org>
  *
  * Permission to use, copy, modify, and distribute this software for any
@@ -110,6 +110,7 @@ typedef     int (*mdoc_fp)(struct mpage *, const struct roff_meta *,
 struct mdoc_handler {
        mdoc_fp          fp; /* optional handler */
        uint64_t         mask;  /* set unless handler returns 0 */
+       int              taboo;  /* node flags that must not be set */
 };
 
 
@@ -120,7 +121,11 @@ static     void     dbadd_mlink(const struct mlink *mlink);
 static void     dbprune(struct dba *);
 static void     dbwrite(struct dba *);
 static void     filescan(const char *);
+#if HAVE_FTS_COMPARE_CONST
+static int      fts_compare(const FTSENT *const *, const FTSENT *const *);
+#else
 static int      fts_compare(const FTSENT **, const FTSENT **);
+#endif
 static void     mlink_add(struct mlink *, const struct stat *);
 static void     mlink_check(struct mpage *, struct mlink *);
 static void     mlink_free(struct mlink *);
@@ -154,10 +159,10 @@ static    int      parse_mdoc_Xr(struct mpage *, const struct roff_meta *,
 static void     putkey(const struct mpage *, char *, uint64_t);
 static void     putkeys(const struct mpage *, char *, size_t, uint64_t);
 static void     putmdockey(const struct mpage *,
-                       const struct roff_node *, uint64_t);
+                       const struct roff_node *, uint64_t, int);
 static int      render_string(char **, size_t *);
 static void     say(const char *, const char *, ...)
-                       __attribute__((__format__ (printf, 2, 3)));
+                       __attribute__((__format__ (__printf__, 2, 3)));
 static int      set_basedir(const char *, int);
 static int      treescan(void);
 static size_t   utf8(unsigned int, char [7]);
@@ -179,129 +184,129 @@ static  struct ohash     strings; /* table of all strings */
 static uint64_t         name_mask;
 
 static const struct mdoc_handler mdocs[MDOC_MAX] = {
-       { NULL, 0 },  /* Ap */
-       { NULL, 0 },  /* Dd */
-       { NULL, 0 },  /* Dt */
-       { NULL, 0 },  /* Os */
-       { parse_mdoc_Sh, TYPE_Sh }, /* Sh */
-       { parse_mdoc_head, TYPE_Ss }, /* Ss */
-       { NULL, 0 },  /* Pp */
-       { NULL, 0 },  /* D1 */
-       { NULL, 0 },  /* Dl */
-       { NULL, 0 },  /* Bd */
-       { NULL, 0 },  /* Ed */
-       { NULL, 0 },  /* Bl */
-       { NULL, 0 },  /* El */
-       { NULL, 0 },  /* It */
-       { NULL, 0 },  /* Ad */
-       { NULL, TYPE_An },  /* An */
-       { NULL, TYPE_Ar },  /* Ar */
-       { NULL, TYPE_Cd },  /* Cd */
-       { NULL, TYPE_Cm },  /* Cm */
-       { NULL, TYPE_Dv },  /* Dv */
-       { NULL, TYPE_Er },  /* Er */
-       { NULL, TYPE_Ev },  /* Ev */
-       { NULL, 0 },  /* Ex */
-       { NULL, TYPE_Fa },  /* Fa */
-       { parse_mdoc_Fd, 0 },  /* Fd */
-       { NULL, TYPE_Fl },  /* Fl */
-       { parse_mdoc_Fn, 0 },  /* Fn */
-       { NULL, TYPE_Ft },  /* Ft */
-       { NULL, TYPE_Ic },  /* Ic */
-       { NULL, TYPE_In },  /* In */
-       { NULL, TYPE_Li },  /* Li */
-       { parse_mdoc_Nd, 0 },  /* Nd */
-       { parse_mdoc_Nm, 0 },  /* Nm */
-       { NULL, 0 },  /* Op */
-       { NULL, 0 },  /* Ot */
-       { NULL, TYPE_Pa },  /* Pa */
-       { NULL, 0 },  /* Rv */
-       { NULL, TYPE_St },  /* St */
-       { parse_mdoc_Va, TYPE_Va },  /* Va */
-       { parse_mdoc_Va, TYPE_Vt },  /* Vt */
-       { parse_mdoc_Xr, 0 },  /* Xr */
-       { NULL, 0 },  /* %A */
-       { NULL, 0 },  /* %B */
-       { NULL, 0 },  /* %D */
-       { NULL, 0 },  /* %I */
-       { NULL, 0 },  /* %J */
-       { NULL, 0 },  /* %N */
-       { NULL, 0 },  /* %O */
-       { NULL, 0 },  /* %P */
-       { NULL, 0 },  /* %R */
-       { NULL, 0 },  /* %T */
-       { NULL, 0 },  /* %V */
-       { NULL, 0 },  /* Ac */
-       { NULL, 0 },  /* Ao */
-       { NULL, 0 },  /* Aq */
-       { NULL, TYPE_At },  /* At */
-       { NULL, 0 },  /* Bc */
-       { NULL, 0 },  /* Bf */
-       { NULL, 0 },  /* Bo */
-       { NULL, 0 },  /* Bq */
-       { NULL, TYPE_Bsx },  /* Bsx */
-       { NULL, TYPE_Bx },  /* Bx */
-       { NULL, 0 },  /* Db */
-       { NULL, 0 },  /* Dc */
-       { NULL, 0 },  /* Do */
-       { NULL, 0 },  /* Dq */
-       { NULL, 0 },  /* Ec */
-       { NULL, 0 },  /* Ef */
-       { NULL, TYPE_Em },  /* Em */
-       { NULL, 0 },  /* Eo */
-       { NULL, TYPE_Fx },  /* Fx */
-       { NULL, TYPE_Ms },  /* Ms */
-       { NULL, 0 },  /* No */
-       { NULL, 0 },  /* Ns */
-       { NULL, TYPE_Nx },  /* Nx */
-       { NULL, TYPE_Ox },  /* Ox */
-       { NULL, 0 },  /* Pc */
-       { NULL, 0 },  /* Pf */
-       { NULL, 0 },  /* Po */
-       { NULL, 0 },  /* Pq */
-       { NULL, 0 },  /* Qc */
-       { NULL, 0 },  /* Ql */
-       { NULL, 0 },  /* Qo */
-       { NULL, 0 },  /* Qq */
-       { NULL, 0 },  /* Re */
-       { NULL, 0 },  /* Rs */
-       { NULL, 0 },  /* Sc */
-       { NULL, 0 },  /* So */
-       { NULL, 0 },  /* Sq */
-       { NULL, 0 },  /* Sm */
-       { NULL, 0 },  /* Sx */
-       { NULL, TYPE_Sy },  /* Sy */
-       { NULL, TYPE_Tn },  /* Tn */
-       { NULL, 0 },  /* Ux */
-       { NULL, 0 },  /* Xc */
-       { NULL, 0 },  /* Xo */
-       { parse_mdoc_Fo, 0 },  /* Fo */
-       { NULL, 0 },  /* Fc */
-       { NULL, 0 },  /* Oo */
-       { NULL, 0 },  /* Oc */
-       { NULL, 0 },  /* Bk */
-       { NULL, 0 },  /* Ek */
-       { NULL, 0 },  /* Bt */
-       { NULL, 0 },  /* Hf */
-       { NULL, 0 },  /* Fr */
-       { NULL, 0 },  /* Ud */
-       { NULL, TYPE_Lb },  /* Lb */
-       { NULL, 0 },  /* Lp */
-       { NULL, TYPE_Lk },  /* Lk */
-       { NULL, TYPE_Mt },  /* Mt */
-       { NULL, 0 },  /* Brq */
-       { NULL, 0 },  /* Bro */
-       { NULL, 0 },  /* Brc */
-       { NULL, 0 },  /* %C */
-       { NULL, 0 },  /* Es */
-       { NULL, 0 },  /* En */
-       { NULL, TYPE_Dx },  /* Dx */
-       { NULL, 0 },  /* %Q */
-       { NULL, 0 },  /* br */
-       { NULL, 0 },  /* sp */
-       { NULL, 0 },  /* %U */
-       { NULL, 0 },  /* Ta */
-       { NULL, 0 },  /* ll */
+       { NULL, 0, 0 },  /* Ap */
+       { NULL, 0, NODE_NOPRT },  /* Dd */
+       { NULL, 0, NODE_NOPRT },  /* Dt */
+       { NULL, 0, NODE_NOPRT },  /* Os */
+       { parse_mdoc_Sh, TYPE_Sh, 0 }, /* Sh */
+       { parse_mdoc_head, TYPE_Ss, 0 }, /* 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, 0 },  /* An */
+       { NULL, TYPE_Ar, 0 },  /* Ar */
+       { NULL, TYPE_Cd, 0 },  /* Cd */
+       { NULL, TYPE_Cm, 0 },  /* Cm */
+       { NULL, TYPE_Dv, 0 },  /* Dv */
+       { NULL, TYPE_Er, 0 },  /* Er */
+       { NULL, TYPE_Ev, 0 },  /* Ev */
+       { NULL, 0, 0 },  /* Ex */
+       { NULL, TYPE_Fa, 0 },  /* Fa */
+       { parse_mdoc_Fd, 0, 0 },  /* Fd */
+       { NULL, TYPE_Fl, 0 },  /* Fl */
+       { parse_mdoc_Fn, 0, 0 },  /* Fn */
+       { NULL, TYPE_Ft, 0 },  /* Ft */
+       { NULL, TYPE_Ic, 0 },  /* Ic */
+       { NULL, TYPE_In, 0 },  /* In */
+       { NULL, TYPE_Li, 0 },  /* Li */
+       { parse_mdoc_Nd, 0, 0 },  /* Nd */
+       { parse_mdoc_Nm, 0, 0 },  /* Nm */
+       { NULL, 0, 0 },  /* Op */
+       { NULL, 0, 0 },  /* Ot */
+       { NULL, TYPE_Pa, NODE_NOSRC },  /* Pa */
+       { NULL, 0, 0 },  /* Rv */
+       { NULL, TYPE_St, 0 },  /* St */
+       { parse_mdoc_Va, TYPE_Va, 0 },  /* Va */
+       { parse_mdoc_Va, TYPE_Vt, 0 },  /* Vt */
+       { parse_mdoc_Xr, 0, 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, 0 },  /* At */
+       { NULL, 0, 0 },  /* Bc */
+       { NULL, 0, 0 },  /* Bf */
+       { NULL, 0, 0 },  /* Bo */
+       { NULL, 0, 0 },  /* Bq */
+       { NULL, TYPE_Bsx, NODE_NOSRC },  /* Bsx */
+       { NULL, TYPE_Bx, NODE_NOSRC },  /* 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, 0 },  /* Em */
+       { NULL, 0, 0 },  /* Eo */
+       { NULL, TYPE_Fx, NODE_NOSRC },  /* Fx */
+       { NULL, TYPE_Ms, 0 },  /* Ms */
+       { NULL, 0, 0 },  /* No */
+       { NULL, 0, 0 },  /* Ns */
+       { NULL, TYPE_Nx, NODE_NOSRC },  /* Nx */
+       { NULL, TYPE_Ox, NODE_NOSRC },  /* 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, 0 },  /* Sy */
+       { NULL, TYPE_Tn, 0 },  /* Tn */
+       { NULL, 0, NODE_NOSRC },  /* Ux */
+       { NULL, 0, 0 },  /* Xc */
+       { NULL, 0, 0 },  /* Xo */
+       { parse_mdoc_Fo, 0, 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, NODE_NOSRC },  /* Lb */
+       { NULL, 0, 0 },  /* Lp */
+       { NULL, TYPE_Lk, 0 },  /* Lk */
+       { NULL, TYPE_Mt, NODE_NOSRC },  /* 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, NODE_NOSRC },  /* Dx */
+       { NULL, 0, 0 },  /* %Q */
+       { NULL, 0, 0 },  /* br */
+       { NULL, 0, 0 },  /* sp */
+       { NULL, 0, 0 },  /* %U */
+       { NULL, 0, 0 },  /* Ta */
+       { NULL, 0, 0 },  /* ll */
 };
 
 
@@ -547,7 +552,11 @@ usage:
  * at the beginning, process directory entries in reverse alpha order.
  */
 static int
+#if HAVE_FTS_COMPARE_CONST
+fts_compare(const FTSENT *const *a, const FTSENT *const *b)
+#else
 fts_compare(const FTSENT **a, const FTSENT **b)
+#endif
 {
        return -strcmp((*a)->fts_name, (*b)->fts_name);
 }
@@ -580,7 +589,7 @@ treescan(void)
        const char      *argv[2];
 
        argv[0] = ".";
-       argv[1] = (char *)NULL;
+       argv[1] = NULL;
 
        f = fts_open((char * const *)argv, FTS_PHYSICAL | FTS_NOCHDIR,
            fts_compare);
@@ -862,6 +871,20 @@ filescan(const char *file)
                return;
        }
 
+       /*
+        * In test mode or when the original name is absolute
+        * but outside our tree, guess the base directory.
+        */
+
+       if (op == OP_TEST || (start == buf && *start == '/')) {
+               if (strncmp(buf, "man/", 4) == 0)
+                       start = buf + 4;
+               else if ((start = strstr(buf, "/man/")) != NULL)
+                       start += 5;
+               else
+                       start = buf;
+       }
+
        /*
         * First try to guess our directory structure.
         * If we find a separator, try to look for man* or cat*.
@@ -1130,6 +1153,7 @@ mpages_merge(struct dba *dba, struct mparse *mp)
                if (mlink->dform != FORM_CAT || mlink->fform != FORM_CAT) {
                        mparse_readfd(mp, fd, mlink->file);
                        close(fd);
+                       fd = -1;
                        mparse_result(mp, &man, &sodest);
                }
 
@@ -1186,34 +1210,43 @@ mpages_merge(struct dba *dba, struct mparse *mp)
                        mpage->title = mandoc_strdup(man->meta.title);
                } else if (man != NULL && man->macroset == MACROSET_MAN) {
                        man_validate(man);
-                       mpage->form = FORM_SRC;
-                       mpage->sec = mandoc_strdup(man->meta.msec);
-                       mpage->arch = mandoc_strdup(mlink->arch);
-                       mpage->title = mandoc_strdup(man->meta.title);
-               } else {
+                       if (*man->meta.msec != '\0' ||
+                           *man->meta.title != '\0') {
+                               mpage->form = FORM_SRC;
+                               mpage->sec = mandoc_strdup(man->meta.msec);
+                               mpage->arch = mandoc_strdup(mlink->arch);
+                               mpage->title = mandoc_strdup(man->meta.title);
+                       } else
+                               man = NULL;
+               }
+
+               assert(mpage->desc == NULL);
+               if (man == NULL) {
                        mpage->form = FORM_CAT;
                        mpage->sec = mandoc_strdup(mlink->dsec);
                        mpage->arch = mandoc_strdup(mlink->arch);
                        mpage->title = mandoc_strdup(mlink->name);
-               }
-
-               assert(mpage->desc == NULL);
-               if (man != NULL && man->macroset == MACROSET_MDOC)
+                       parse_cat(mpage, fd);
+               } else if (man->macroset == MACROSET_MDOC)
                        parse_mdoc(mpage, &man->meta, man->first);
-               else if (man != NULL)
-                       parse_man(mpage, &man->meta, man->first);
                else
-                       parse_cat(mpage, fd);
-               if (mpage->desc == NULL)
-                       mpage->desc = mandoc_strdup(mpage->mlinks->name);
+                       parse_man(mpage, &man->meta, man->first);
+               if (mpage->desc == NULL) {
+                       mpage->desc = mandoc_strdup(mlink->name);
+                       if (warnings)
+                               say(mlink->file, "No one-line description, "
+                                   "using filename \"%s\"", mlink->name);
+               }
 
-               if (warnings && !use_all)
-                       for (mlink = mpage->mlinks; mlink;
-                            mlink = mlink->next)
+               for (mlink = mpage->mlinks;
+                    mlink != NULL;
+                    mlink = mlink->next) {
+                       putkey(mpage, mlink->name, NAME_FILE);
+                       if (warnings && !use_all)
                                mlink_check(mpage, mlink);
+               }
 
                dbadd(dba, mpage);
-               mlink = mpage->mlinks;
 
 nextpage:
                ohash_delete(&strings);
@@ -1225,29 +1258,48 @@ static void
 parse_cat(struct mpage *mpage, int fd)
 {
        FILE            *stream;
-       char            *line, *p, *title;
+       struct mlink    *mlink;
+       char            *line, *p, *title, *sec;
        size_t           linesz, plen, titlesz;
        ssize_t          len;
        int              offs;
 
-       stream = (-1 == fd) ?
-           fopen(mpage->mlinks->file, "r") :
-           fdopen(fd, "r");
-       if (NULL == stream) {
-               if (-1 != fd)
+       mlink = mpage->mlinks;
+       stream = fd == -1 ? fopen(mlink->file, "r") : fdopen(fd, "r");
+       if (stream == NULL) {
+               if (fd != -1)
                        close(fd);
                if (warnings)
-                       say(mpage->mlinks->file, "&fopen");
+                       say(mlink->file, "&fopen");
                return;
        }
 
        line = NULL;
        linesz = 0;
 
-       /* Skip to first blank line. */
+       /* Parse the section number from the header line. */
 
-       while (getline(&line, &linesz, stream) != -1)
+       while (getline(&line, &linesz, stream) != -1) {
                if (*line == '\n')
+                       continue;
+               if ((sec = strchr(line, '(')) == NULL)
+                       break;
+               if ((p = strchr(++sec, ')')) == NULL)
+                       break;
+               free(mpage->sec);
+               mpage->sec = mandoc_strndup(sec, p - sec);
+               if (warnings && *mlink->dsec != '\0' &&
+                   strcasecmp(mpage->sec, mlink->dsec))
+                       say(mlink->file,
+                           "Section \"%s\" manual in %s directory",
+                           mpage->sec, mlink->dsec);
+               break;
+       }
+
+       /* Skip to first blank line. */
+
+       while (line == NULL || *line != '\n')
+               if (getline(&line, &linesz, stream) == -1)
                        break;
 
        /*
@@ -1293,8 +1345,7 @@ parse_cat(struct mpage *mpage, int fd)
 
        if (NULL == title || '\0' == *title) {
                if (warnings)
-                       say(mpage->mlinks->file,
-                           "Cannot find NAME section");
+                       say(mlink->file, "Cannot find NAME section");
                fclose(stream);
                free(title);
                return;
@@ -1313,8 +1364,8 @@ parse_cat(struct mpage *mpage, int fd)
                        /* Skip to next word. */ ;
        } else {
                if (warnings)
-                       say(mpage->mlinks->file,
-                           "No dash in title line");
+                       say(mlink->file, "No dash in title line, "
+                           "reusing \"%s\" as one-line description", title);
                p = title;
        }
 
@@ -1351,12 +1402,14 @@ putkey(const struct mpage *mpage, char *value, uint64_t type)
  */
 static void
 putmdockey(const struct mpage *mpage,
-       const struct roff_node *n, uint64_t m)
+       const struct roff_node *n, uint64_t m, int taboo)
 {
 
        for ( ; NULL != n; n = n->next) {
+               if (n->flags & taboo)
+                       continue;
                if (NULL != n->child)
-                       putmdockey(mpage, n->child, m);
+                       putmdockey(mpage, n->child, m, taboo);
                if (n->type == ROFFT_TEXT)
                        putkey(mpage, n->string, m);
        }
@@ -1494,6 +1547,8 @@ parse_mdoc(struct mpage *mpage, const struct roff_meta *meta,
 
        assert(NULL != n);
        for (n = n->child; NULL != n; n = n->next) {
+               if (n->flags & mdocs[n->tok].taboo)
+                       continue;
                switch (n->type) {
                case ROFFT_ELEM:
                case ROFFT_BLOCK:
@@ -1505,7 +1560,7 @@ parse_mdoc(struct mpage *mpage, const struct roff_meta *meta,
                                       break;
                        if (mdocs[n->tok].mask)
                                putmdockey(mpage, n->child,
-                                   mdocs[n->tok].mask);
+                                   mdocs[n->tok].mask, mdocs[n->tok].taboo);
                        break;
                default:
                        assert(n->type != ROFFT_ROOT);
@@ -1673,12 +1728,12 @@ parse_mdoc_Nm(struct mpage *mpage, const struct roff_meta *meta,
 {
 
        if (SEC_NAME == n->sec)
-               putmdockey(mpage, n->child, NAME_TITLE);
+               putmdockey(mpage, n->child, NAME_TITLE, 0);
        else if (n->sec == SEC_SYNOPSIS && n->type == ROFFT_HEAD) {
                if (n->child == NULL)
                        putkey(mpage, meta->name, NAME_SYN);
                else
-                       putmdockey(mpage, n->child, NAME_SYN);
+                       putmdockey(mpage, n->child, NAME_SYN, 0);
        }
        if ( ! (mpage->name_head_done ||
            n->child == NULL || n->child->string == NULL ||
@@ -1731,7 +1786,8 @@ putkeys(const struct mpage *mpage, char *cp, size_t sz, uint64_t v)
                        name_mask &= ~NAME_FIRST;
                if (debug > 1)
                        say(mpage->mlinks->file,
-                           "Adding name %*s, bits=0x%llu", (int)sz, cp, v);
+                           "Adding name %*s, bits=0x%llx", (int)sz, cp,
+                           (unsigned long long)v);
        } else {
                htab = &strings;
                if (debug > 1)