[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.127

1.127   ! schwarze    1: /* $OpenBSD: man_validate.c,v 1.126 2021/08/10 12:36:42 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.44      schwarze   35: #include "man.h"
1.85      schwarze   36: #include "libmandoc.h"
1.89      schwarze   37: #include "roff_int.h"
1.1       kristaps   38: #include "libman.h"
1.123     schwarze   39: #include "tag.h"
1.1       kristaps   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:
1.126     schwarze  240:                        case ESCAPE_FONTCR:
                    241:                        case ESCAPE_FONTCB:
                    242:                        case ESCAPE_FONTCI:
1.121     schwarze  243:                        case ESCAPE_FONTPREV:
                    244:                        case ESCAPE_IGNORE:
                    245:                                break;
                    246:                        case ESCAPE_SPECIAL:
                    247:                                if (sz != 1)
                    248:                                        return;
                    249:                                switch (*arg) {
                    250:                                case '-':
                    251:                                case 'e':
                    252:                                        break;
                    253:                                default:
                    254:                                        return;
                    255:                                }
                    256:                                break;
                    257:                        default:
                    258:                                return;
                    259:                        }
                    260:                        break;
                    261:                default:
                    262:                        if (isalpha((unsigned char)*cp))
                    263:                                tag_put(cp, prio, n);
                    264:                        return;
                    265:                }
                    266:        }
                    267: }
                    268:
1.109     schwarze  269: static void
1.47      schwarze  270: check_text(CHKARGS)
1.4       schwarze  271: {
1.47      schwarze  272:        char            *cp, *p;
                    273:
1.115     schwarze  274:        if (n->flags & NODE_NOFILL)
1.78      schwarze  275:                return;
1.48      schwarze  276:
                    277:        cp = n->string;
                    278:        for (p = cp; NULL != (p = strchr(p, '\t')); p++)
1.112     schwarze  279:                mandoc_msg(MANDOCERR_FI_TAB,
                    280:                    n->line, n->pos + (int)(p - cp), NULL);
1.115     schwarze  281: }
                    282:
                    283: static void
                    284: post_EE(CHKARGS)
                    285: {
                    286:        if ((n->flags & NODE_NOFILL) == 0)
                    287:                mandoc_msg(MANDOCERR_FI_SKIP, n->line, n->pos, "EE");
                    288: }
                    289:
                    290: static void
                    291: post_EX(CHKARGS)
                    292: {
                    293:        if (n->flags & NODE_NOFILL)
                    294:                mandoc_msg(MANDOCERR_NF_SKIP, n->line, n->pos, "EX");
1.1       kristaps  295: }
                    296:
1.84      schwarze  297: static void
                    298: post_OP(CHKARGS)
                    299: {
                    300:
1.93      schwarze  301:        if (n->child == NULL)
1.112     schwarze  302:                mandoc_msg(MANDOCERR_OP_EMPTY, n->line, n->pos, "OP");
1.93      schwarze  303:        else if (n->child->next != NULL && n->child->next->next != NULL) {
1.84      schwarze  304:                n = n->child->next->next;
1.112     schwarze  305:                mandoc_msg(MANDOCERR_ARG_EXCESS,
1.84      schwarze  306:                    n->line, n->pos, "OP ... %s", n->string);
                    307:        }
1.1       kristaps  308: }
                    309:
1.78      schwarze  310: static void
1.110     schwarze  311: post_SH(CHKARGS)
                    312: {
                    313:        struct roff_node        *nc;
1.122     schwarze  314:        char                    *cp, *tag;
1.110     schwarze  315:
1.122     schwarze  316:        nc = n->child;
                    317:        switch (n->type) {
                    318:        case ROFFT_HEAD:
                    319:                tag = NULL;
                    320:                deroff(&tag, n);
                    321:                if (tag != NULL) {
                    322:                        for (cp = tag; *cp != '\0'; cp++)
                    323:                                if (*cp == ' ')
                    324:                                        *cp = '_';
                    325:                        if (nc != NULL && nc->type == ROFFT_TEXT &&
                    326:                            strcmp(nc->string, tag) == 0)
1.125     schwarze  327:                                tag_put(NULL, TAG_STRONG, n);
1.122     schwarze  328:                        else
                    329:                                tag_put(tag, TAG_FALLBACK, n);
                    330:                        free(tag);
                    331:                }
                    332:                return;
                    333:        case ROFFT_BODY:
                    334:                if (nc != NULL)
                    335:                        break;
1.110     schwarze  336:                return;
1.122     schwarze  337:        default:
                    338:                return;
                    339:        }
1.110     schwarze  340:
                    341:        if (nc->tok == MAN_PP && nc->body->child != NULL) {
                    342:                while (nc->body->last != NULL) {
                    343:                        man->next = ROFF_NEXT_CHILD;
                    344:                        roff_node_relink(man, nc->body->last);
                    345:                        man->last = n;
                    346:                }
                    347:        }
                    348:
                    349:        if (nc->tok == MAN_PP || nc->tok == ROFF_sp || nc->tok == ROFF_br) {
1.112     schwarze  350:                mandoc_msg(MANDOCERR_PAR_SKIP, nc->line, nc->pos,
                    351:                    "%s after %s", roff_name[nc->tok], roff_name[n->tok]);
1.110     schwarze  352:                roff_node_delete(man, nc);
                    353:        }
                    354:
                    355:        /*
                    356:         * Trailing PP is empty, so it is deleted by check_par().
                    357:         * Trailing sp is significant.
                    358:         */
                    359:
                    360:        if ((nc = n->last) != NULL && nc->tok == ROFF_br) {
1.112     schwarze  361:                mandoc_msg(MANDOCERR_PAR_SKIP,
1.110     schwarze  362:                    nc->line, nc->pos, "%s at the end of %s",
                    363:                    roff_name[nc->tok], roff_name[n->tok]);
                    364:                roff_node_delete(man, nc);
                    365:        }
                    366: }
                    367:
                    368: static void
1.76      schwarze  369: post_UR(CHKARGS)
1.58      schwarze  370: {
1.85      schwarze  371:        if (n->type == ROFFT_HEAD && n->child == NULL)
1.112     schwarze  372:                mandoc_msg(MANDOCERR_UR_NOHEAD, n->line, n->pos,
                    373:                    "%s", roff_name[n->tok]);
1.32      schwarze  374: }
1.7       schwarze  375:
1.78      schwarze  376: static void
1.8       schwarze  377: check_part(CHKARGS)
                    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.124     schwarze  511:        if (n != NULL && n->string != NULL) {
1.57      schwarze  512:                man->meta.msec = mandoc_strdup(n->string);
1.124     schwarze  513:                if (man->filesec != '\0' &&
                    514:                    man->filesec != *n->string &&
                    515:                    *n->string >= '1' && *n->string <= '9')
                    516:                        mandoc_msg(MANDOCERR_MSEC_FILE, n->line, n->pos,
                    517:                            "*.%c vs TH ... %c", man->filesec, *n->string);
                    518:        } else {
1.57      schwarze  519:                man->meta.msec = mandoc_strdup("");
1.112     schwarze  520:                mandoc_msg(MANDOCERR_MSEC_MISSING,
1.77      schwarze  521:                    nb->line, nb->pos, "TH %s", man->meta.title);
                    522:        }
1.34      schwarze  523:
1.87      schwarze  524:        /* TITLE MSEC ->DATE<- OS VOL */
1.34      schwarze  525:
1.119     schwarze  526:        if (n != NULL)
1.40      schwarze  527:                n = n->next;
1.120     schwarze  528:        if (man->quick && n != NULL)
1.57      schwarze  529:                man->meta.date = mandoc_strdup("");
1.120     schwarze  530:        else
                    531:                man->meta.date = mandoc_normdate(n, nb);
1.34      schwarze  532:
1.87      schwarze  533:        /* TITLE MSEC DATE ->OS<- VOL */
1.34      schwarze  534:
                    535:        if (n && (n = n->next))
1.87      schwarze  536:                man->meta.os = mandoc_strdup(n->string);
1.102     schwarze  537:        else if (man->os_s != NULL)
                    538:                man->meta.os = mandoc_strdup(man->os_s);
                    539:        if (man->meta.os_e == MANDOC_OS_OTHER && man->meta.os != NULL) {
                    540:                if (strstr(man->meta.os, "OpenBSD") != NULL)
                    541:                        man->meta.os_e = MANDOC_OS_OPENBSD;
                    542:                else if (strstr(man->meta.os, "NetBSD") != NULL)
                    543:                        man->meta.os_e = MANDOC_OS_NETBSD;
                    544:        }
1.34      schwarze  545:
1.87      schwarze  546:        /* TITLE MSEC DATE OS ->VOL<- */
1.51      schwarze  547:        /* If missing, use the default VOL name for MSEC. */
1.34      schwarze  548:
                    549:        if (n && (n = n->next))
1.57      schwarze  550:                man->meta.vol = mandoc_strdup(n->string);
                    551:        else if ('\0' != man->meta.msec[0] &&
                    552:            (NULL != (p = mandoc_a2msec(man->meta.msec))))
                    553:                man->meta.vol = mandoc_strdup(p);
1.84      schwarze  554:
                    555:        if (n != NULL && (n = n->next) != NULL)
1.112     schwarze  556:                mandoc_msg(MANDOCERR_ARG_EXCESS,
1.84      schwarze  557:                    n->line, n->pos, "TH ... %s", n->string);
1.34      schwarze  558:
                    559:        /*
                    560:         * Remove the `TH' node after we've processed it for our
                    561:         * meta-data.
                    562:         */
1.89      schwarze  563:        roff_node_delete(man, man->last);
1.34      schwarze  564: }
                    565:
1.78      schwarze  566: static void
1.34      schwarze  567: post_UC(CHKARGS)
                    568: {
                    569:        static const char * const bsd_versions[] = {
                    570:            "3rd Berkeley Distribution",
                    571:            "4th Berkeley Distribution",
                    572:            "4.2 Berkeley Distribution",
                    573:            "4.3 Berkeley Distribution",
                    574:            "4.4 Berkeley Distribution",
                    575:        };
                    576:
                    577:        const char      *p, *s;
                    578:
                    579:        n = n->child;
                    580:
1.85      schwarze  581:        if (n == NULL || n->type != ROFFT_TEXT)
1.34      schwarze  582:                p = bsd_versions[0];
                    583:        else {
                    584:                s = n->string;
                    585:                if (0 == strcmp(s, "3"))
                    586:                        p = bsd_versions[0];
                    587:                else if (0 == strcmp(s, "4"))
                    588:                        p = bsd_versions[1];
                    589:                else if (0 == strcmp(s, "5"))
                    590:                        p = bsd_versions[2];
                    591:                else if (0 == strcmp(s, "6"))
                    592:                        p = bsd_versions[3];
                    593:                else if (0 == strcmp(s, "7"))
                    594:                        p = bsd_versions[4];
                    595:                else
                    596:                        p = bsd_versions[0];
                    597:        }
                    598:
1.87      schwarze  599:        free(man->meta.os);
                    600:        man->meta.os = mandoc_strdup(p);
1.34      schwarze  601: }
                    602:
1.78      schwarze  603: static void
1.34      schwarze  604: post_AT(CHKARGS)
                    605: {
                    606:        static const char * const unix_versions[] = {
                    607:            "7th Edition",
                    608:            "System III",
                    609:            "System V",
                    610:            "System V Release 2",
                    611:        };
                    612:
1.86      schwarze  613:        struct roff_node *nn;
1.34      schwarze  614:        const char      *p, *s;
                    615:
                    616:        n = n->child;
                    617:
1.85      schwarze  618:        if (n == NULL || n->type != ROFFT_TEXT)
1.34      schwarze  619:                p = unix_versions[0];
                    620:        else {
                    621:                s = n->string;
                    622:                if (0 == strcmp(s, "3"))
                    623:                        p = unix_versions[0];
                    624:                else if (0 == strcmp(s, "4"))
                    625:                        p = unix_versions[1];
                    626:                else if (0 == strcmp(s, "5")) {
                    627:                        nn = n->next;
1.85      schwarze  628:                        if (nn != NULL &&
                    629:                            nn->type == ROFFT_TEXT &&
                    630:                            nn->string[0] != '\0')
1.34      schwarze  631:                                p = unix_versions[3];
                    632:                        else
                    633:                                p = unix_versions[2];
                    634:                } else
                    635:                        p = unix_versions[0];
                    636:        }
                    637:
1.87      schwarze  638:        free(man->meta.os);
                    639:        man->meta.os = mandoc_strdup(p);
1.100     schwarze  640: }
                    641:
                    642: static void
                    643: post_in(CHKARGS)
                    644: {
                    645:        char    *s;
                    646:
                    647:        if (n->parent->tok != MAN_TP ||
                    648:            n->parent->type != ROFFT_HEAD ||
                    649:            n->child == NULL ||
                    650:            *n->child->string == '+' ||
                    651:            *n->child->string == '-')
                    652:                return;
                    653:        mandoc_asprintf(&s, "+%s", n->child->string);
                    654:        free(n->child->string);
                    655:        n->child->string = s;
1.34      schwarze  656: }