[BACK]Return to man_validate.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / mandoc

Annotation of src/usr.bin/mandoc/man_validate.c, Revision 1.122

1.122   ! schwarze    1: /* $OpenBSD: man_validate.c,v 1.121 2020/03/13 00:31:05 schwarze Exp $ */
1.1       kristaps    2: /*
1.121     schwarze    3:  * Copyright (c) 2010, 2012-2020 Ingo Schwarze <schwarze@openbsd.org>
1.38      schwarze    4:  * Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
1.1       kristaps    5:  *
                      6:  * Permission to use, copy, modify, and distribute this software for any
1.2       schwarze    7:  * purpose with or without fee is hereby granted, provided that the above
                      8:  * copyright notice and this permission notice appear in all copies.
1.1       kristaps    9:  *
1.85      schwarze   10:  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHORS DISCLAIM ALL WARRANTIES
1.2       schwarze   11:  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
1.85      schwarze   12:  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR
1.2       schwarze   13:  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
                     14:  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
                     15:  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
                     16:  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
1.121     schwarze   17:  *
                     18:  * Validation module for man(7) syntax trees used by mandoc(1).
1.1       kristaps   19:  */
                     20: #include <sys/types.h>
                     21:
                     22: #include <assert.h>
                     23: #include <ctype.h>
1.6       schwarze   24: #include <errno.h>
                     25: #include <limits.h>
1.1       kristaps   26: #include <stdarg.h>
1.111     schwarze   27: #include <stdio.h>
1.1       kristaps   28: #include <stdlib.h>
1.28      schwarze   29: #include <string.h>
1.36      schwarze   30: #include <time.h>
1.1       kristaps   31:
1.85      schwarze   32: #include "mandoc_aux.h"
                     33: #include "mandoc.h"
                     34: #include "roff.h"
1.121     schwarze   35: #include "tag.h"
1.44      schwarze   36: #include "man.h"
1.85      schwarze   37: #include "libmandoc.h"
1.89      schwarze   38: #include "roff_int.h"
1.1       kristaps   39: #include "libman.h"
                     40:
1.88      schwarze   41: #define        CHKARGS   struct roff_man *man, struct roff_node *n
1.1       kristaps   42:
1.78      schwarze   43: typedef        void    (*v_check)(CHKARGS);
1.1       kristaps   44:
1.118     schwarze   45: static void      check_abort(CHKARGS) __attribute__((__noreturn__));
1.78      schwarze   46: static void      check_par(CHKARGS);
                     47: static void      check_part(CHKARGS);
                     48: static void      check_root(CHKARGS);
1.121     schwarze   49: static void      check_tag(struct roff_node *, struct roff_node *);
1.78      schwarze   50: static void      check_text(CHKARGS);
                     51:
                     52: static void      post_AT(CHKARGS);
1.115     schwarze   53: static void      post_EE(CHKARGS);
                     54: static void      post_EX(CHKARGS);
1.78      schwarze   55: static void      post_IP(CHKARGS);
1.84      schwarze   56: static void      post_OP(CHKARGS);
1.110     schwarze   57: static void      post_SH(CHKARGS);
1.78      schwarze   58: static void      post_TH(CHKARGS);
1.121     schwarze   59: static void      post_TP(CHKARGS);
1.78      schwarze   60: static void      post_UC(CHKARGS);
                     61: static void      post_UR(CHKARGS);
1.100     schwarze   62: static void      post_in(CHKARGS);
1.34      schwarze   63:
1.106     schwarze   64: static const v_check man_valids[MAN_MAX - MAN_TH] = {
1.76      schwarze   65:        post_TH,    /* TH */
1.110     schwarze   66:        post_SH,    /* SH */
                     67:        post_SH,    /* SS */
1.121     schwarze   68:        post_TP,    /* TP */
                     69:        post_TP,    /* TQ */
1.109     schwarze   70:        check_abort,/* LP */
1.76      schwarze   71:        check_par,  /* PP */
1.109     schwarze   72:        check_abort,/* P */
1.76      schwarze   73:        post_IP,    /* IP */
                     74:        NULL,       /* HP */
                     75:        NULL,       /* SM */
                     76:        NULL,       /* SB */
                     77:        NULL,       /* BI */
                     78:        NULL,       /* IB */
                     79:        NULL,       /* BR */
                     80:        NULL,       /* RB */
                     81:        NULL,       /* R */
                     82:        NULL,       /* B */
                     83:        NULL,       /* I */
                     84:        NULL,       /* IR */
                     85:        NULL,       /* RI */
                     86:        NULL,       /* RE */
                     87:        check_part, /* RS */
                     88:        NULL,       /* DT */
                     89:        post_UC,    /* UC */
1.83      schwarze   90:        NULL,       /* PD */
1.76      schwarze   91:        post_AT,    /* AT */
1.100     schwarze   92:        post_in,    /* in */
1.108     schwarze   93:        NULL,       /* SY */
                     94:        NULL,       /* YS */
1.84      schwarze   95:        post_OP,    /* OP */
1.115     schwarze   96:        post_EX,    /* EX */
                     97:        post_EE,    /* EE */
1.76      schwarze   98:        post_UR,    /* UR */
                     99:        NULL,       /* UE */
1.103     bentley   100:        post_UR,    /* MT */
                    101:        NULL,       /* ME */
1.1       kristaps  102: };
                    103:
                    104:
1.109     schwarze  105: /* Validate the subtree rooted at man->last. */
1.78      schwarze  106: void
1.113     schwarze  107: man_validate(struct roff_man *man)
1.1       kristaps  108: {
1.86      schwarze  109:        struct roff_node *n;
1.94      schwarze  110:        const v_check    *cp;
1.1       kristaps  111:
1.109     schwarze  112:        /*
                    113:         * Translate obsolete macros such that later code
                    114:         * does not need to look for them.
                    115:         */
                    116:
1.76      schwarze  117:        n = man->last;
1.109     schwarze  118:        switch (n->tok) {
                    119:        case MAN_LP:
                    120:        case MAN_P:
                    121:                n->tok = MAN_PP;
                    122:                break;
                    123:        default:
                    124:                break;
                    125:        }
                    126:
                    127:        /*
                    128:         * Iterate over all children, recursing into each one
                    129:         * in turn, depth-first.
                    130:         */
                    131:
1.92      schwarze  132:        man->last = man->last->child;
                    133:        while (man->last != NULL) {
1.113     schwarze  134:                man_validate(man);
1.92      schwarze  135:                if (man->last == n)
                    136:                        man->last = man->last->child;
                    137:                else
                    138:                        man->last = man->last->next;
                    139:        }
1.1       kristaps  140:
1.109     schwarze  141:        /* Finally validate the macro itself. */
                    142:
1.92      schwarze  143:        man->last = n;
                    144:        man->next = ROFF_NEXT_SIBLING;
1.76      schwarze  145:        switch (n->type) {
1.85      schwarze  146:        case ROFFT_TEXT:
1.78      schwarze  147:                check_text(man, n);
                    148:                break;
1.85      schwarze  149:        case ROFFT_ROOT:
1.78      schwarze  150:                check_root(man, n);
                    151:                break;
1.105     schwarze  152:        case ROFFT_COMMENT:
1.85      schwarze  153:        case ROFFT_EQN:
                    154:        case ROFFT_TBL:
1.78      schwarze  155:                break;
1.1       kristaps  156:        default:
1.95      schwarze  157:                if (n->tok < ROFF_MAX) {
1.110     schwarze  158:                        roff_validate(man);
1.95      schwarze  159:                        break;
                    160:                }
                    161:                assert(n->tok >= MAN_TH && n->tok < MAN_MAX);
1.106     schwarze  162:                cp = man_valids + (n->tok - MAN_TH);
1.78      schwarze  163:                if (*cp)
                    164:                        (*cp)(man, n);
1.92      schwarze  165:                if (man->last == n)
1.116     schwarze  166:                        n->flags |= NODE_VALID;
1.78      schwarze  167:                break;
1.1       kristaps  168:        }
                    169: }
                    170:
1.78      schwarze  171: static void
1.63      schwarze  172: check_root(CHKARGS)
1.4       schwarze  173: {
1.73      schwarze  174:        assert((man->flags & (MAN_BLINE | MAN_ELINE)) == 0);
1.7       schwarze  175:
1.105     schwarze  176:        if (n->last == NULL || n->last->type == ROFFT_COMMENT)
1.112     schwarze  177:                mandoc_msg(MANDOCERR_DOC_EMPTY, n->line, n->pos, NULL);
1.65      schwarze  178:        else
                    179:                man->meta.hasbody = 1;
                    180:
                    181:        if (NULL == man->meta.title) {
1.112     schwarze  182:                mandoc_msg(MANDOCERR_TH_NOTITLE, n->line, n->pos, NULL);
1.35      schwarze  183:
1.18      schwarze  184:                /*
                    185:                 * If a title hasn't been set, do so now (by
                    186:                 * implication, date and section also aren't set).
                    187:                 */
1.35      schwarze  188:
1.77      schwarze  189:                man->meta.title = mandoc_strdup("");
                    190:                man->meta.msec = mandoc_strdup("");
1.120     schwarze  191:                man->meta.date = mandoc_normdate(NULL, NULL);
1.17      schwarze  192:        }
1.101     schwarze  193:
                    194:        if (man->meta.os_e &&
                    195:            (man->meta.rcsids & (1 << man->meta.os_e)) == 0)
1.112     schwarze  196:                mandoc_msg(MANDOCERR_RCS_MISSING, 0, 0,
1.102     schwarze  197:                    man->meta.os_e == MANDOC_OS_OPENBSD ?
                    198:                    "(OpenBSD)" : "(NetBSD)");
1.15      schwarze  199: }
                    200:
1.118     schwarze  201: static void
1.109     schwarze  202: check_abort(CHKARGS)
                    203: {
                    204:        abort();
                    205: }
                    206:
1.121     schwarze  207: /*
                    208:  * Skip leading whitespace, dashes, backslashes, and font escapes,
                    209:  * then create a tag if the first following byte is a letter.
                    210:  * Priority is high unless whitespace is present.
                    211:  */
                    212: static void
                    213: check_tag(struct roff_node *n, struct roff_node *nt)
                    214: {
                    215:        const char      *cp, *arg;
                    216:        int              prio, sz;
                    217:
                    218:        if (nt == NULL || nt->type != ROFFT_TEXT)
                    219:                return;
                    220:
                    221:        cp = nt->string;
                    222:        prio = TAG_STRONG;
                    223:        for (;;) {
                    224:                switch (*cp) {
                    225:                case ' ':
                    226:                case '\t':
                    227:                        prio = TAG_WEAK;
                    228:                        /* FALLTHROUGH */
                    229:                case '-':
                    230:                        cp++;
                    231:                        break;
                    232:                case '\\':
                    233:                        cp++;
                    234:                        switch (mandoc_escape(&cp, &arg, &sz)) {
                    235:                        case ESCAPE_FONT:
                    236:                        case ESCAPE_FONTBOLD:
                    237:                        case ESCAPE_FONTITALIC:
                    238:                        case ESCAPE_FONTBI:
                    239:                        case ESCAPE_FONTROMAN:
                    240:                        case ESCAPE_FONTCW:
                    241:                        case ESCAPE_FONTPREV:
                    242:                        case ESCAPE_IGNORE:
                    243:                                break;
                    244:                        case ESCAPE_SPECIAL:
                    245:                                if (sz != 1)
                    246:                                        return;
                    247:                                switch (*arg) {
                    248:                                case '-':
                    249:                                case 'e':
                    250:                                        break;
                    251:                                default:
                    252:                                        return;
                    253:                                }
                    254:                                break;
                    255:                        default:
                    256:                                return;
                    257:                        }
                    258:                        break;
                    259:                default:
                    260:                        if (isalpha((unsigned char)*cp))
                    261:                                tag_put(cp, prio, n);
                    262:                        return;
                    263:                }
                    264:        }
                    265: }
                    266:
1.109     schwarze  267: static void
1.47      schwarze  268: check_text(CHKARGS)
1.4       schwarze  269: {
1.47      schwarze  270:        char            *cp, *p;
                    271:
1.115     schwarze  272:        if (n->flags & NODE_NOFILL)
1.78      schwarze  273:                return;
1.48      schwarze  274:
                    275:        cp = n->string;
                    276:        for (p = cp; NULL != (p = strchr(p, '\t')); p++)
1.112     schwarze  277:                mandoc_msg(MANDOCERR_FI_TAB,
                    278:                    n->line, n->pos + (int)(p - cp), NULL);
1.115     schwarze  279: }
                    280:
                    281: static void
                    282: post_EE(CHKARGS)
                    283: {
                    284:        if ((n->flags & NODE_NOFILL) == 0)
                    285:                mandoc_msg(MANDOCERR_FI_SKIP, n->line, n->pos, "EE");
                    286: }
                    287:
                    288: static void
                    289: post_EX(CHKARGS)
                    290: {
                    291:        if (n->flags & NODE_NOFILL)
                    292:                mandoc_msg(MANDOCERR_NF_SKIP, n->line, n->pos, "EX");
1.1       kristaps  293: }
                    294:
1.84      schwarze  295: static void
                    296: post_OP(CHKARGS)
                    297: {
                    298:
1.93      schwarze  299:        if (n->child == NULL)
1.112     schwarze  300:                mandoc_msg(MANDOCERR_OP_EMPTY, n->line, n->pos, "OP");
1.93      schwarze  301:        else if (n->child->next != NULL && n->child->next->next != NULL) {
1.84      schwarze  302:                n = n->child->next->next;
1.112     schwarze  303:                mandoc_msg(MANDOCERR_ARG_EXCESS,
1.84      schwarze  304:                    n->line, n->pos, "OP ... %s", n->string);
                    305:        }
1.1       kristaps  306: }
                    307:
1.78      schwarze  308: static void
1.110     schwarze  309: post_SH(CHKARGS)
                    310: {
                    311:        struct roff_node        *nc;
1.122   ! schwarze  312:        char                    *cp, *tag;
1.110     schwarze  313:
1.122   ! schwarze  314:        nc = n->child;
        !           315:        switch (n->type) {
        !           316:        case ROFFT_HEAD:
        !           317:                tag = NULL;
        !           318:                deroff(&tag, n);
        !           319:                if (tag != NULL) {
        !           320:                        for (cp = tag; *cp != '\0'; cp++)
        !           321:                                if (*cp == ' ')
        !           322:                                        *cp = '_';
        !           323:                        if (nc != NULL && nc->type == ROFFT_TEXT &&
        !           324:                            strcmp(nc->string, tag) == 0)
        !           325:                                tag_put(NULL, TAG_WEAK, n);
        !           326:                        else
        !           327:                                tag_put(tag, TAG_FALLBACK, n);
        !           328:                        free(tag);
        !           329:                }
        !           330:                return;
        !           331:        case ROFFT_BODY:
        !           332:                if (nc != NULL)
        !           333:                        break;
1.110     schwarze  334:                return;
1.122   ! schwarze  335:        default:
        !           336:                return;
        !           337:        }
1.110     schwarze  338:
                    339:        if (nc->tok == MAN_PP && nc->body->child != NULL) {
                    340:                while (nc->body->last != NULL) {
                    341:                        man->next = ROFF_NEXT_CHILD;
                    342:                        roff_node_relink(man, nc->body->last);
                    343:                        man->last = n;
                    344:                }
                    345:        }
                    346:
                    347:        if (nc->tok == MAN_PP || nc->tok == ROFF_sp || nc->tok == ROFF_br) {
1.112     schwarze  348:                mandoc_msg(MANDOCERR_PAR_SKIP, nc->line, nc->pos,
                    349:                    "%s after %s", roff_name[nc->tok], roff_name[n->tok]);
1.110     schwarze  350:                roff_node_delete(man, nc);
                    351:        }
                    352:
                    353:        /*
                    354:         * Trailing PP is empty, so it is deleted by check_par().
                    355:         * Trailing sp is significant.
                    356:         */
                    357:
                    358:        if ((nc = n->last) != NULL && nc->tok == ROFF_br) {
1.112     schwarze  359:                mandoc_msg(MANDOCERR_PAR_SKIP,
1.110     schwarze  360:                    nc->line, nc->pos, "%s at the end of %s",
                    361:                    roff_name[nc->tok], roff_name[n->tok]);
                    362:                roff_node_delete(man, nc);
                    363:        }
                    364: }
                    365:
                    366: static void
1.76      schwarze  367: post_UR(CHKARGS)
1.58      schwarze  368: {
1.85      schwarze  369:        if (n->type == ROFFT_HEAD && n->child == NULL)
1.112     schwarze  370:                mandoc_msg(MANDOCERR_UR_NOHEAD, n->line, n->pos,
                    371:                    "%s", roff_name[n->tok]);
1.78      schwarze  372:        check_part(man, n);
1.32      schwarze  373: }
1.7       schwarze  374:
1.78      schwarze  375: static void
1.8       schwarze  376: check_part(CHKARGS)
                    377: {
                    378:
1.85      schwarze  379:        if (n->type == ROFFT_BODY && n->child == NULL)
1.112     schwarze  380:                mandoc_msg(MANDOCERR_BLK_EMPTY, n->line, n->pos,
                    381:                    "%s", roff_name[n->tok]);
1.8       schwarze  382: }
                    383:
1.78      schwarze  384: static void
1.36      schwarze  385: check_par(CHKARGS)
                    386: {
                    387:
1.39      schwarze  388:        switch (n->type) {
1.85      schwarze  389:        case ROFFT_BLOCK:
1.93      schwarze  390:                if (n->body->child == NULL)
1.89      schwarze  391:                        roff_node_delete(man, n);
1.39      schwarze  392:                break;
1.85      schwarze  393:        case ROFFT_BODY:
1.110     schwarze  394:                if (n->child != NULL &&
                    395:                    (n->child->tok == ROFF_sp || n->child->tok == ROFF_br)) {
1.112     schwarze  396:                        mandoc_msg(MANDOCERR_PAR_SKIP,
                    397:                            n->child->line, n->child->pos,
1.110     schwarze  398:                            "%s after %s", roff_name[n->child->tok],
                    399:                            roff_name[n->tok]);
                    400:                        roff_node_delete(man, n->child);
                    401:                }
1.93      schwarze  402:                if (n->child == NULL)
1.112     schwarze  403:                        mandoc_msg(MANDOCERR_PAR_SKIP, n->line, n->pos,
1.94      schwarze  404:                            "%s empty", roff_name[n->tok]);
1.39      schwarze  405:                break;
1.85      schwarze  406:        case ROFFT_HEAD:
1.93      schwarze  407:                if (n->child != NULL)
1.112     schwarze  408:                        mandoc_msg(MANDOCERR_ARG_SKIP,
                    409:                            n->line, n->pos, "%s %s%s",
1.94      schwarze  410:                            roff_name[n->tok], n->child->string,
1.93      schwarze  411:                            n->child->next != NULL ? " ..." : "");
1.39      schwarze  412:                break;
                    413:        default:
                    414:                break;
                    415:        }
1.36      schwarze  416: }
                    417:
1.78      schwarze  418: static void
1.55      schwarze  419: post_IP(CHKARGS)
                    420: {
                    421:        switch (n->type) {
1.85      schwarze  422:        case ROFFT_BLOCK:
1.93      schwarze  423:                if (n->head->child == NULL && n->body->child == NULL)
1.89      schwarze  424:                        roff_node_delete(man, n);
1.55      schwarze  425:                break;
1.121     schwarze  426:        case ROFFT_HEAD:
                    427:                check_tag(n, n->child);
                    428:                break;
1.85      schwarze  429:        case ROFFT_BODY:
1.93      schwarze  430:                if (n->parent->head->child == NULL && n->child == NULL)
1.112     schwarze  431:                        mandoc_msg(MANDOCERR_PAR_SKIP, n->line, n->pos,
1.94      schwarze  432:                            "%s empty", roff_name[n->tok]);
1.55      schwarze  433:                break;
                    434:        default:
                    435:                break;
                    436:        }
1.121     schwarze  437: }
                    438:
                    439: /*
                    440:  * The first next-line element in the head is the tag.
                    441:  * If that's a font macro, use its first child instead.
                    442:  */
                    443: static void
                    444: post_TP(CHKARGS)
                    445: {
                    446:        struct roff_node *nt;
                    447:
                    448:        if (n->type != ROFFT_HEAD || (nt = n->child) == NULL)
                    449:                return;
                    450:
                    451:        while ((nt->flags & NODE_LINE) == 0)
                    452:                if ((nt = nt->next) == NULL)
                    453:                        return;
                    454:
                    455:        switch (nt->tok) {
                    456:        case MAN_B:
                    457:        case MAN_BI:
                    458:        case MAN_BR:
                    459:        case MAN_I:
                    460:        case MAN_IB:
                    461:        case MAN_IR:
                    462:                nt = nt->child;
                    463:                break;
                    464:        default:
                    465:                break;
                    466:        }
                    467:        check_tag(n, nt);
1.55      schwarze  468: }
1.36      schwarze  469:
1.78      schwarze  470: static void
1.34      schwarze  471: post_TH(CHKARGS)
                    472: {
1.86      schwarze  473:        struct roff_node *nb;
1.40      schwarze  474:        const char      *p;
1.34      schwarze  475:
1.57      schwarze  476:        free(man->meta.title);
                    477:        free(man->meta.vol);
1.87      schwarze  478:        free(man->meta.os);
1.57      schwarze  479:        free(man->meta.msec);
                    480:        free(man->meta.date);
1.34      schwarze  481:
1.57      schwarze  482:        man->meta.title = man->meta.vol = man->meta.date =
1.87      schwarze  483:            man->meta.msec = man->meta.os = NULL;
1.34      schwarze  484:
1.64      schwarze  485:        nb = n;
                    486:
1.87      schwarze  487:        /* ->TITLE<- MSEC DATE OS VOL */
1.34      schwarze  488:
                    489:        n = n->child;
1.119     schwarze  490:        if (n != NULL && n->string != NULL) {
                    491:                for (p = n->string; *p != '\0'; p++) {
1.40      schwarze  492:                        /* Only warn about this once... */
1.63      schwarze  493:                        if (isalpha((unsigned char)*p) &&
                    494:                            ! isupper((unsigned char)*p)) {
1.112     schwarze  495:                                mandoc_msg(MANDOCERR_TITLE_CASE, n->line,
                    496:                                    n->pos + (int)(p - n->string),
1.74      schwarze  497:                                    "TH %s", n->string);
1.40      schwarze  498:                                break;
                    499:                        }
                    500:                }
1.57      schwarze  501:                man->meta.title = mandoc_strdup(n->string);
1.77      schwarze  502:        } else {
1.57      schwarze  503:                man->meta.title = mandoc_strdup("");
1.112     schwarze  504:                mandoc_msg(MANDOCERR_TH_NOTITLE, nb->line, nb->pos, "TH");
1.77      schwarze  505:        }
1.34      schwarze  506:
1.87      schwarze  507:        /* TITLE ->MSEC<- DATE OS VOL */
1.34      schwarze  508:
1.119     schwarze  509:        if (n != NULL)
1.40      schwarze  510:                n = n->next;
1.119     schwarze  511:        if (n != NULL && n->string != NULL)
1.57      schwarze  512:                man->meta.msec = mandoc_strdup(n->string);
1.77      schwarze  513:        else {
1.57      schwarze  514:                man->meta.msec = mandoc_strdup("");
1.112     schwarze  515:                mandoc_msg(MANDOCERR_MSEC_MISSING,
1.77      schwarze  516:                    nb->line, nb->pos, "TH %s", man->meta.title);
                    517:        }
1.34      schwarze  518:
1.87      schwarze  519:        /* TITLE MSEC ->DATE<- OS VOL */
1.34      schwarze  520:
1.119     schwarze  521:        if (n != NULL)
1.40      schwarze  522:                n = n->next;
1.120     schwarze  523:        if (man->quick && n != NULL)
1.57      schwarze  524:                man->meta.date = mandoc_strdup("");
1.120     schwarze  525:        else
                    526:                man->meta.date = mandoc_normdate(n, nb);
1.34      schwarze  527:
1.87      schwarze  528:        /* TITLE MSEC DATE ->OS<- VOL */
1.34      schwarze  529:
                    530:        if (n && (n = n->next))
1.87      schwarze  531:                man->meta.os = mandoc_strdup(n->string);
1.102     schwarze  532:        else if (man->os_s != NULL)
                    533:                man->meta.os = mandoc_strdup(man->os_s);
                    534:        if (man->meta.os_e == MANDOC_OS_OTHER && man->meta.os != NULL) {
                    535:                if (strstr(man->meta.os, "OpenBSD") != NULL)
                    536:                        man->meta.os_e = MANDOC_OS_OPENBSD;
                    537:                else if (strstr(man->meta.os, "NetBSD") != NULL)
                    538:                        man->meta.os_e = MANDOC_OS_NETBSD;
                    539:        }
1.34      schwarze  540:
1.87      schwarze  541:        /* TITLE MSEC DATE OS ->VOL<- */
1.51      schwarze  542:        /* If missing, use the default VOL name for MSEC. */
1.34      schwarze  543:
                    544:        if (n && (n = n->next))
1.57      schwarze  545:                man->meta.vol = mandoc_strdup(n->string);
                    546:        else if ('\0' != man->meta.msec[0] &&
                    547:            (NULL != (p = mandoc_a2msec(man->meta.msec))))
                    548:                man->meta.vol = mandoc_strdup(p);
1.84      schwarze  549:
                    550:        if (n != NULL && (n = n->next) != NULL)
1.112     schwarze  551:                mandoc_msg(MANDOCERR_ARG_EXCESS,
1.84      schwarze  552:                    n->line, n->pos, "TH ... %s", n->string);
1.34      schwarze  553:
                    554:        /*
                    555:         * Remove the `TH' node after we've processed it for our
                    556:         * meta-data.
                    557:         */
1.89      schwarze  558:        roff_node_delete(man, man->last);
1.34      schwarze  559: }
                    560:
1.78      schwarze  561: static void
1.34      schwarze  562: post_UC(CHKARGS)
                    563: {
                    564:        static const char * const bsd_versions[] = {
                    565:            "3rd Berkeley Distribution",
                    566:            "4th Berkeley Distribution",
                    567:            "4.2 Berkeley Distribution",
                    568:            "4.3 Berkeley Distribution",
                    569:            "4.4 Berkeley Distribution",
                    570:        };
                    571:
                    572:        const char      *p, *s;
                    573:
                    574:        n = n->child;
                    575:
1.85      schwarze  576:        if (n == NULL || n->type != ROFFT_TEXT)
1.34      schwarze  577:                p = bsd_versions[0];
                    578:        else {
                    579:                s = n->string;
                    580:                if (0 == strcmp(s, "3"))
                    581:                        p = bsd_versions[0];
                    582:                else if (0 == strcmp(s, "4"))
                    583:                        p = bsd_versions[1];
                    584:                else if (0 == strcmp(s, "5"))
                    585:                        p = bsd_versions[2];
                    586:                else if (0 == strcmp(s, "6"))
                    587:                        p = bsd_versions[3];
                    588:                else if (0 == strcmp(s, "7"))
                    589:                        p = bsd_versions[4];
                    590:                else
                    591:                        p = bsd_versions[0];
                    592:        }
                    593:
1.87      schwarze  594:        free(man->meta.os);
                    595:        man->meta.os = mandoc_strdup(p);
1.34      schwarze  596: }
                    597:
1.78      schwarze  598: static void
1.34      schwarze  599: post_AT(CHKARGS)
                    600: {
                    601:        static const char * const unix_versions[] = {
                    602:            "7th Edition",
                    603:            "System III",
                    604:            "System V",
                    605:            "System V Release 2",
                    606:        };
                    607:
1.86      schwarze  608:        struct roff_node *nn;
1.34      schwarze  609:        const char      *p, *s;
                    610:
                    611:        n = n->child;
                    612:
1.85      schwarze  613:        if (n == NULL || n->type != ROFFT_TEXT)
1.34      schwarze  614:                p = unix_versions[0];
                    615:        else {
                    616:                s = n->string;
                    617:                if (0 == strcmp(s, "3"))
                    618:                        p = unix_versions[0];
                    619:                else if (0 == strcmp(s, "4"))
                    620:                        p = unix_versions[1];
                    621:                else if (0 == strcmp(s, "5")) {
                    622:                        nn = n->next;
1.85      schwarze  623:                        if (nn != NULL &&
                    624:                            nn->type == ROFFT_TEXT &&
                    625:                            nn->string[0] != '\0')
1.34      schwarze  626:                                p = unix_versions[3];
                    627:                        else
                    628:                                p = unix_versions[2];
                    629:                } else
                    630:                        p = unix_versions[0];
                    631:        }
                    632:
1.87      schwarze  633:        free(man->meta.os);
                    634:        man->meta.os = mandoc_strdup(p);
1.100     schwarze  635: }
                    636:
                    637: static void
                    638: post_in(CHKARGS)
                    639: {
                    640:        char    *s;
                    641:
                    642:        if (n->parent->tok != MAN_TP ||
                    643:            n->parent->type != ROFFT_HEAD ||
                    644:            n->child == NULL ||
                    645:            *n->child->string == '+' ||
                    646:            *n->child->string == '-')
                    647:                return;
                    648:        mandoc_asprintf(&s, "+%s", n->child->string);
                    649:        free(n->child->string);
                    650:        n->child->string = s;
1.34      schwarze  651: }