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

Annotation of src/usr.bin/mandoc/man_term.c, Revision 1.148

1.148   ! schwarze    1: /*     $OpenBSD: man_term.c,v 1.147 2017/05/04 22:07:44 schwarze Exp $ */
1.1       kristaps    2: /*
1.84      schwarze    3:  * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv>
1.142     schwarze    4:  * Copyright (c) 2010-2015, 2017 Ingo Schwarze <schwarze@openbsd.org>
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.124     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.124     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.1       kristaps   17:  */
1.13      schwarze   18: #include <sys/types.h>
                     19:
1.1       kristaps   20: #include <assert.h>
1.11      schwarze   21: #include <ctype.h>
1.117     schwarze   22: #include <limits.h>
1.1       kristaps   23: #include <stdio.h>
                     24: #include <stdlib.h>
                     25: #include <string.h>
                     26:
1.124     schwarze   27: #include "mandoc_aux.h"
1.37      schwarze   28: #include "mandoc.h"
1.124     schwarze   29: #include "roff.h"
                     30: #include "man.h"
1.18      schwarze   31: #include "out.h"
1.1       kristaps   32: #include "term.h"
1.18      schwarze   33: #include "main.h"
1.10      schwarze   34:
1.70      schwarze   35: #define        MAXMARGINS        64 /* maximum number of indented scopes */
1.1       kristaps   36:
1.11      schwarze   37: struct mtermp {
                     38:        int               fl;
                     39: #define        MANT_LITERAL     (1 << 0)
1.116     schwarze   40:        int               lmargin[MAXMARGINS]; /* margins (incl. vis. page) */
1.70      schwarze   41:        int               lmargincur; /* index of current margin */
                     42:        int               lmarginsz; /* actual number of nested margins */
                     43:        size_t            offset; /* default offset to visible page */
1.88      schwarze   44:        int               pardist; /* vert. space before par., unit: [v] */
1.11      schwarze   45: };
                     46:
1.100     schwarze   47: #define        DECL_ARGS         struct termp *p, \
1.11      schwarze   48:                          struct mtermp *mt, \
1.125     schwarze   49:                          struct roff_node *n, \
1.126     schwarze   50:                          const struct roff_meta *meta
1.1       kristaps   51:
                     52: struct termact {
                     53:        int             (*pre)(DECL_ARGS);
                     54:        void            (*post)(DECL_ARGS);
1.26      schwarze   55:        int               flags;
                     56: #define        MAN_NOTEXT       (1 << 0) /* Never has text children. */
1.1       kristaps   57: };
                     58:
1.21      schwarze   59: static void              print_man_nodelist(DECL_ARGS);
1.19      schwarze   60: static void              print_man_node(DECL_ARGS);
1.126     schwarze   61: static void              print_man_head(struct termp *,
                     62:                                const struct roff_meta *);
                     63: static void              print_man_foot(struct termp *,
                     64:                                const struct roff_meta *);
1.100     schwarze   65: static void              print_bvspace(struct termp *,
1.125     schwarze   66:                                const struct roff_node *, int);
1.18      schwarze   67:
1.1       kristaps   68: static int               pre_B(DECL_ARGS);
1.11      schwarze   69: static int               pre_HP(DECL_ARGS);
1.1       kristaps   70: static int               pre_I(DECL_ARGS);
                     71: static int               pre_IP(DECL_ARGS);
1.82      schwarze   72: static int               pre_OP(DECL_ARGS);
1.88      schwarze   73: static int               pre_PD(DECL_ARGS);
1.1       kristaps   74: static int               pre_PP(DECL_ARGS);
1.13      schwarze   75: static int               pre_RS(DECL_ARGS);
1.1       kristaps   76: static int               pre_SH(DECL_ARGS);
                     77: static int               pre_SS(DECL_ARGS);
                     78: static int               pre_TP(DECL_ARGS);
1.91      schwarze   79: static int               pre_UR(DECL_ARGS);
1.82      schwarze   80: static int               pre_alternate(DECL_ARGS);
1.14      schwarze   81: static int               pre_ign(DECL_ARGS);
1.45      schwarze   82: static int               pre_in(DECL_ARGS);
                     83: static int               pre_literal(DECL_ARGS);
1.97      schwarze   84: static int               pre_ll(DECL_ARGS);
1.11      schwarze   85: static int               pre_sp(DECL_ARGS);
1.1       kristaps   86:
1.11      schwarze   87: static void              post_IP(DECL_ARGS);
                     88: static void              post_HP(DECL_ARGS);
1.13      schwarze   89: static void              post_RS(DECL_ARGS);
1.1       kristaps   90: static void              post_SH(DECL_ARGS);
                     91: static void              post_SS(DECL_ARGS);
1.11      schwarze   92: static void              post_TP(DECL_ARGS);
1.91      schwarze   93: static void              post_UR(DECL_ARGS);
1.1       kristaps   94:
1.145     schwarze   95: static const struct termact __termacts[MAN_MAX - MAN_TH] = {
1.26      schwarze   96:        { NULL, NULL, 0 }, /* TH */
                     97:        { pre_SH, post_SH, 0 }, /* SH */
                     98:        { pre_SS, post_SS, 0 }, /* SS */
                     99:        { pre_TP, post_TP, 0 }, /* TP */
                    100:        { pre_PP, NULL, 0 }, /* LP */
                    101:        { pre_PP, NULL, 0 }, /* PP */
                    102:        { pre_PP, NULL, 0 }, /* P */
                    103:        { pre_IP, post_IP, 0 }, /* IP */
1.100     schwarze  104:        { pre_HP, post_HP, 0 }, /* HP */
1.26      schwarze  105:        { NULL, NULL, 0 }, /* SM */
                    106:        { pre_B, NULL, 0 }, /* SB */
1.51      schwarze  107:        { pre_alternate, NULL, 0 }, /* BI */
                    108:        { pre_alternate, NULL, 0 }, /* IB */
                    109:        { pre_alternate, NULL, 0 }, /* BR */
                    110:        { pre_alternate, NULL, 0 }, /* RB */
1.26      schwarze  111:        { NULL, NULL, 0 }, /* R */
                    112:        { pre_B, NULL, 0 }, /* B */
                    113:        { pre_I, NULL, 0 }, /* I */
1.51      schwarze  114:        { pre_alternate, NULL, 0 }, /* IR */
                    115:        { pre_alternate, NULL, 0 }, /* RI */
1.26      schwarze  116:        { pre_sp, NULL, MAN_NOTEXT }, /* sp */
1.45      schwarze  117:        { pre_literal, NULL, 0 }, /* nf */
                    118:        { pre_literal, NULL, 0 }, /* fi */
1.26      schwarze  119:        { NULL, NULL, 0 }, /* RE */
                    120:        { pre_RS, post_RS, 0 }, /* RS */
                    121:        { pre_ign, NULL, 0 }, /* DT */
1.111     schwarze  122:        { pre_ign, NULL, MAN_NOTEXT }, /* UC */
1.88      schwarze  123:        { pre_PD, NULL, MAN_NOTEXT }, /* PD */
1.36      schwarze  124:        { pre_ign, NULL, 0 }, /* AT */
1.45      schwarze  125:        { pre_in, NULL, MAN_NOTEXT }, /* in */
1.82      schwarze  126:        { pre_OP, NULL, 0 }, /* OP */
1.83      schwarze  127:        { pre_literal, NULL, 0 }, /* EX */
                    128:        { pre_literal, NULL, 0 }, /* EE */
1.91      schwarze  129:        { pre_UR, post_UR, 0 }, /* UR */
                    130:        { NULL, NULL, 0 }, /* UE */
1.97      schwarze  131:        { pre_ll, NULL, MAN_NOTEXT }, /* ll */
1.1       kristaps  132: };
1.145     schwarze  133: static const struct termact *termacts = __termacts - MAN_TH;
1.11      schwarze  134:
1.1       kristaps  135:
1.16      schwarze  136: void
1.133     schwarze  137: terminal_man(void *arg, const struct roff_man *man)
1.1       kristaps  138: {
1.18      schwarze  139:        struct termp            *p;
1.125     schwarze  140:        struct roff_node        *n;
1.18      schwarze  141:        struct mtermp            mt;
1.142     schwarze  142:        size_t                   save_defindent;
1.18      schwarze  143:
                    144:        p = (struct termp *)arg;
1.39      schwarze  145:        p->overstep = 0;
1.104     schwarze  146:        p->rmargin = p->maxrmargin = p->defrmargin;
1.42      schwarze  147:        p->tabwidth = term_len(p, 5);
1.18      schwarze  148:
1.70      schwarze  149:        memset(&mt, 0, sizeof(struct mtermp));
1.77      schwarze  150:        mt.lmargin[mt.lmargincur] = term_len(p, p->defindent);
                    151:        mt.offset = term_len(p, p->defindent);
1.88      schwarze  152:        mt.pardist = 1;
1.11      schwarze  153:
1.134     schwarze  154:        n = man->first->child;
1.104     schwarze  155:        if (p->synopsisonly) {
                    156:                while (n != NULL) {
                    157:                        if (n->tok == MAN_SH &&
1.124     schwarze  158:                            n->child->child->type == ROFFT_TEXT &&
1.104     schwarze  159:                            !strcmp(n->child->child->string, "SYNOPSIS")) {
                    160:                                if (n->child->next->child != NULL)
                    161:                                        print_man_nodelist(p, &mt,
1.134     schwarze  162:                                            n->child->next->child,
                    163:                                            &man->meta);
1.104     schwarze  164:                                term_newln(p);
                    165:                                break;
                    166:                        }
                    167:                        n = n->next;
                    168:                }
                    169:        } else {
1.142     schwarze  170:                save_defindent = p->defindent;
1.104     schwarze  171:                if (p->defindent == 0)
                    172:                        p->defindent = 7;
1.134     schwarze  173:                term_begin(p, print_man_head, print_man_foot, &man->meta);
1.104     schwarze  174:                p->flags |= TERMP_NOSPACE;
                    175:                if (n != NULL)
1.134     schwarze  176:                        print_man_nodelist(p, &mt, n, &man->meta);
1.104     schwarze  177:                term_end(p);
1.142     schwarze  178:                p->defindent = save_defindent;
1.104     schwarze  179:        }
1.1       kristaps  180: }
                    181:
1.69      schwarze  182: /*
                    183:  * Printing leading vertical space before a block.
                    184:  * This is used for the paragraph macros.
                    185:  * The rules are pretty simple, since there's very little nesting going
                    186:  * on here.  Basically, if we're the first within another block (SS/SH),
                    187:  * then don't emit vertical space.  If we are (RS), then do.  If not the
                    188:  * first, print it.
                    189:  */
1.18      schwarze  190: static void
1.125     schwarze  191: print_bvspace(struct termp *p, const struct roff_node *n, int pardist)
1.18      schwarze  192: {
1.88      schwarze  193:        int      i;
1.69      schwarze  194:
1.18      schwarze  195:        term_newln(p);
1.64      schwarze  196:
1.69      schwarze  197:        if (n->body && n->body->child)
1.124     schwarze  198:                if (n->body->child->type == ROFFT_TBL)
1.69      schwarze  199:                        return;
1.11      schwarze  200:
1.124     schwarze  201:        if (n->parent->type == ROFFT_ROOT || n->parent->tok != MAN_RS)
1.69      schwarze  202:                if (NULL == n->prev)
                    203:                        return;
1.11      schwarze  204:
1.88      schwarze  205:        for (i = 0; i < pardist; i++)
                    206:                term_vspace(p);
1.14      schwarze  207: }
                    208:
1.100     schwarze  209:
1.14      schwarze  210: static int
                    211: pre_ign(DECL_ARGS)
                    212: {
                    213:
1.138     schwarze  214:        return 0;
1.97      schwarze  215: }
                    216:
                    217: static int
                    218: pre_ll(DECL_ARGS)
                    219: {
                    220:
1.140     schwarze  221:        term_setwidth(p, n->child != NULL ? n->child->string : NULL);
1.138     schwarze  222:        return 0;
1.11      schwarze  223: }
                    224:
1.1       kristaps  225: static int
                    226: pre_I(DECL_ARGS)
                    227: {
                    228:
1.21      schwarze  229:        term_fontrepl(p, TERMFONT_UNDER);
1.138     schwarze  230:        return 1;
1.1       kristaps  231: }
                    232:
1.11      schwarze  233: static int
1.45      schwarze  234: pre_literal(DECL_ARGS)
1.11      schwarze  235: {
                    236:
1.45      schwarze  237:        term_newln(p);
1.53      schwarze  238:
1.83      schwarze  239:        if (MAN_nf == n->tok || MAN_EX == n->tok)
1.45      schwarze  240:                mt->fl |= MANT_LITERAL;
1.53      schwarze  241:        else
1.45      schwarze  242:                mt->fl &= ~MANT_LITERAL;
                    243:
1.72      schwarze  244:        /*
                    245:         * Unlike .IP and .TP, .HP does not have a HEAD.
                    246:         * So in case a second call to term_flushln() is needed,
                    247:         * indentation has to be set up explicitly.
                    248:         */
                    249:        if (MAN_HP == n->parent->tok && p->rmargin < p->maxrmargin) {
1.76      schwarze  250:                p->offset = p->rmargin;
1.72      schwarze  251:                p->rmargin = p->maxrmargin;
1.93      schwarze  252:                p->trailspace = 0;
1.99      schwarze  253:                p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
1.72      schwarze  254:                p->flags |= TERMP_NOSPACE;
                    255:        }
                    256:
1.138     schwarze  257:        return 0;
1.11      schwarze  258: }
                    259:
                    260: static int
1.88      schwarze  261: pre_PD(DECL_ARGS)
                    262: {
1.113     schwarze  263:        struct roffsu    su;
1.88      schwarze  264:
                    265:        n = n->child;
1.113     schwarze  266:        if (n == NULL) {
1.88      schwarze  267:                mt->pardist = 1;
1.138     schwarze  268:                return 0;
1.88      schwarze  269:        }
1.124     schwarze  270:        assert(n->type == ROFFT_TEXT);
1.113     schwarze  271:        if (a2roffsu(n->string, &su, SCALE_VS))
                    272:                mt->pardist = term_vspan(p, &su);
1.138     schwarze  273:        return 0;
1.88      schwarze  274: }
                    275:
                    276: static int
1.51      schwarze  277: pre_alternate(DECL_ARGS)
1.1       kristaps  278: {
1.51      schwarze  279:        enum termfont            font[2];
1.125     schwarze  280:        struct roff_node        *nn;
1.51      schwarze  281:        int                      savelit, i;
1.1       kristaps  282:
1.51      schwarze  283:        switch (n->tok) {
1.100     schwarze  284:        case MAN_RB:
1.51      schwarze  285:                font[0] = TERMFONT_NONE;
                    286:                font[1] = TERMFONT_BOLD;
                    287:                break;
1.100     schwarze  288:        case MAN_RI:
1.51      schwarze  289:                font[0] = TERMFONT_NONE;
                    290:                font[1] = TERMFONT_UNDER;
                    291:                break;
1.100     schwarze  292:        case MAN_BR:
1.51      schwarze  293:                font[0] = TERMFONT_BOLD;
                    294:                font[1] = TERMFONT_NONE;
                    295:                break;
1.100     schwarze  296:        case MAN_BI:
1.51      schwarze  297:                font[0] = TERMFONT_BOLD;
                    298:                font[1] = TERMFONT_UNDER;
                    299:                break;
1.100     schwarze  300:        case MAN_IR:
1.51      schwarze  301:                font[0] = TERMFONT_UNDER;
                    302:                font[1] = TERMFONT_NONE;
                    303:                break;
1.100     schwarze  304:        case MAN_IB:
1.51      schwarze  305:                font[0] = TERMFONT_UNDER;
                    306:                font[1] = TERMFONT_BOLD;
                    307:                break;
                    308:        default:
                    309:                abort();
                    310:        }
1.17      schwarze  311:
1.51      schwarze  312:        savelit = MANT_LITERAL & mt->fl;
                    313:        mt->fl &= ~MANT_LITERAL;
1.17      schwarze  314:
1.51      schwarze  315:        for (i = 0, nn = n->child; nn; nn = nn->next, i = 1 - i) {
                    316:                term_fontrepl(p, font[i]);
                    317:                if (savelit && NULL == nn->next)
                    318:                        mt->fl |= MANT_LITERAL;
1.132     schwarze  319:                assert(nn->type == ROFFT_TEXT);
                    320:                term_word(p, nn->string);
1.141     schwarze  321:                if (nn->flags & NODE_EOS)
1.132     schwarze  322:                        p->flags |= TERMP_SENTENCE;
1.51      schwarze  323:                if (nn->next)
1.1       kristaps  324:                        p->flags |= TERMP_NOSPACE;
                    325:        }
1.17      schwarze  326:
1.138     schwarze  327:        return 0;
1.1       kristaps  328: }
                    329:
                    330: static int
                    331: pre_B(DECL_ARGS)
                    332: {
                    333:
1.21      schwarze  334:        term_fontrepl(p, TERMFONT_BOLD);
1.138     schwarze  335:        return 1;
1.82      schwarze  336: }
                    337:
                    338: static int
                    339: pre_OP(DECL_ARGS)
                    340: {
                    341:
                    342:        term_word(p, "[");
                    343:        p->flags |= TERMP_NOSPACE;
                    344:
                    345:        if (NULL != (n = n->child)) {
                    346:                term_fontrepl(p, TERMFONT_BOLD);
                    347:                term_word(p, n->string);
                    348:        }
                    349:        if (NULL != n && NULL != n->next) {
                    350:                term_fontrepl(p, TERMFONT_UNDER);
                    351:                term_word(p, n->next->string);
                    352:        }
                    353:
                    354:        term_fontrepl(p, TERMFONT_NONE);
                    355:        p->flags |= TERMP_NOSPACE;
                    356:        term_word(p, "]");
1.138     schwarze  357:        return 0;
1.1       kristaps  358: }
                    359:
                    360: static int
1.45      schwarze  361: pre_in(DECL_ARGS)
1.11      schwarze  362: {
1.116     schwarze  363:        struct roffsu    su;
                    364:        const char      *cp;
1.45      schwarze  365:        size_t           v;
1.116     schwarze  366:        int              less;
1.45      schwarze  367:
                    368:        term_newln(p);
                    369:
                    370:        if (NULL == n->child) {
                    371:                p->offset = mt->offset;
1.138     schwarze  372:                return 0;
1.45      schwarze  373:        }
1.11      schwarze  374:
1.45      schwarze  375:        cp = n->child->string;
                    376:        less = 0;
1.11      schwarze  377:
1.45      schwarze  378:        if ('-' == *cp)
                    379:                less = -1;
                    380:        else if ('+' == *cp)
                    381:                less = 1;
                    382:        else
                    383:                cp--;
                    384:
1.116     schwarze  385:        if ( ! a2roffsu(++cp, &su, SCALE_EN))
1.138     schwarze  386:                return 0;
1.45      schwarze  387:
1.128     schwarze  388:        v = (term_hspan(p, &su) + 11) / 24;
1.45      schwarze  389:
                    390:        if (less < 0)
                    391:                p->offset -= p->offset > v ? v : p->offset;
                    392:        else if (less > 0)
                    393:                p->offset += v;
1.100     schwarze  394:        else
1.45      schwarze  395:                p->offset = v;
1.117     schwarze  396:        if (p->offset > SHRT_MAX)
                    397:                p->offset = term_len(p, p->defindent);
1.59      schwarze  398:
1.138     schwarze  399:        return 0;
1.11      schwarze  400: }
                    401:
                    402: static int
1.45      schwarze  403: pre_sp(DECL_ARGS)
1.8       schwarze  404: {
1.115     schwarze  405:        struct roffsu    su;
1.116     schwarze  406:        int              i, len;
1.45      schwarze  407:
1.69      schwarze  408:        if ((NULL == n->prev && n->parent)) {
1.86      schwarze  409:                switch (n->parent->tok) {
1.100     schwarze  410:                case MAN_SH:
                    411:                case MAN_SS:
                    412:                case MAN_PP:
                    413:                case MAN_LP:
                    414:                case MAN_P:
1.138     schwarze  415:                        return 0;
1.86      schwarze  416:                default:
                    417:                        break;
                    418:                }
1.69      schwarze  419:        }
                    420:
1.147     schwarze  421:        if (n->child == NULL)
1.116     schwarze  422:                len = 1;
                    423:        else {
                    424:                if ( ! a2roffsu(n->child->string, &su, SCALE_VS))
1.115     schwarze  425:                        su.scale = 1.0;
                    426:                len = term_vspan(p, &su);
1.45      schwarze  427:        }
                    428:
1.116     schwarze  429:        if (len == 0)
1.45      schwarze  430:                term_newln(p);
1.116     schwarze  431:        else if (len < 0)
                    432:                p->skipvsp -= len;
1.85      schwarze  433:        else
                    434:                for (i = 0; i < len; i++)
                    435:                        term_vspace(p);
1.136     schwarze  436:
                    437:        /*
                    438:         * Handle an explicit break request in the same way
                    439:         * as an overflowing line.
                    440:         */
                    441:
                    442:        if (p->flags & TERMP_BRIND) {
                    443:                p->offset = p->rmargin;
                    444:                p->rmargin = p->maxrmargin;
                    445:                p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
                    446:        }
1.8       schwarze  447:
1.138     schwarze  448:        return 0;
1.8       schwarze  449: }
                    450:
                    451: static int
1.11      schwarze  452: pre_HP(DECL_ARGS)
                    453: {
1.116     schwarze  454:        struct roffsu            su;
1.125     schwarze  455:        const struct roff_node  *nn;
1.116     schwarze  456:        int                      len;
1.11      schwarze  457:
                    458:        switch (n->type) {
1.124     schwarze  459:        case ROFFT_BLOCK:
1.88      schwarze  460:                print_bvspace(p, n, mt->pardist);
1.138     schwarze  461:                return 1;
1.124     schwarze  462:        case ROFFT_BODY:
1.11      schwarze  463:                break;
                    464:        default:
1.138     schwarze  465:                return 0;
1.11      schwarze  466:        }
                    467:
1.84      schwarze  468:        if ( ! (MANT_LITERAL & mt->fl)) {
1.99      schwarze  469:                p->flags |= TERMP_NOBREAK | TERMP_BRIND;
1.93      schwarze  470:                p->trailspace = 2;
1.84      schwarze  471:        }
                    472:
1.11      schwarze  473:        /* Calculate offset. */
                    474:
1.116     schwarze  475:        if ((nn = n->parent->head->child) != NULL &&
                    476:            a2roffsu(nn->string, &su, SCALE_EN)) {
1.128     schwarze  477:                len = term_hspan(p, &su) / 24;
1.117     schwarze  478:                if (len < 0 && (size_t)(-len) > mt->offset)
                    479:                        len = -mt->offset;
                    480:                else if (len > SHRT_MAX)
                    481:                        len = term_len(p, p->defindent);
1.116     schwarze  482:                mt->lmargin[mt->lmargincur] = len;
                    483:        } else
                    484:                len = mt->lmargin[mt->lmargincur];
1.11      schwarze  485:
1.13      schwarze  486:        p->offset = mt->offset;
1.117     schwarze  487:        p->rmargin = mt->offset + len;
1.138     schwarze  488:        return 1;
1.11      schwarze  489: }
                    490:
                    491: static void
                    492: post_HP(DECL_ARGS)
                    493: {
                    494:
                    495:        switch (n->type) {
1.124     schwarze  496:        case ROFFT_BODY:
1.90      schwarze  497:                term_newln(p);
1.127     schwarze  498:
                    499:                /*
                    500:                 * Compatibility with a groff bug.
                    501:                 * The .HP macro uses the undocumented .tag request
                    502:                 * which causes a line break and cancels no-space
                    503:                 * mode even if there isn't any output.
                    504:                 */
                    505:
                    506:                if (n->child == NULL)
                    507:                        term_vspace(p);
                    508:
1.99      schwarze  509:                p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
1.93      schwarze  510:                p->trailspace = 0;
1.13      schwarze  511:                p->offset = mt->offset;
1.11      schwarze  512:                p->rmargin = p->maxrmargin;
                    513:                break;
                    514:        default:
                    515:                break;
                    516:        }
                    517: }
                    518:
                    519: static int
1.1       kristaps  520: pre_PP(DECL_ARGS)
                    521: {
                    522:
1.11      schwarze  523:        switch (n->type) {
1.124     schwarze  524:        case ROFFT_BLOCK:
1.77      schwarze  525:                mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
1.88      schwarze  526:                print_bvspace(p, n, mt->pardist);
1.11      schwarze  527:                break;
                    528:        default:
1.13      schwarze  529:                p->offset = mt->offset;
1.11      schwarze  530:                break;
                    531:        }
                    532:
1.138     schwarze  533:        return n->type != ROFFT_HEAD;
1.1       kristaps  534: }
                    535:
                    536: static int
                    537: pre_IP(DECL_ARGS)
                    538: {
1.116     schwarze  539:        struct roffsu            su;
1.125     schwarze  540:        const struct roff_node  *nn;
1.116     schwarze  541:        int                      len, savelit;
1.11      schwarze  542:
                    543:        switch (n->type) {
1.124     schwarze  544:        case ROFFT_BODY:
1.11      schwarze  545:                p->flags |= TERMP_NOSPACE;
                    546:                break;
1.124     schwarze  547:        case ROFFT_HEAD:
1.11      schwarze  548:                p->flags |= TERMP_NOBREAK;
1.93      schwarze  549:                p->trailspace = 1;
1.11      schwarze  550:                break;
1.124     schwarze  551:        case ROFFT_BLOCK:
1.88      schwarze  552:                print_bvspace(p, n, mt->pardist);
1.11      schwarze  553:                /* FALLTHROUGH */
                    554:        default:
1.138     schwarze  555:                return 1;
1.11      schwarze  556:        }
                    557:
1.57      schwarze  558:        /* Calculate the offset from the optional second argument. */
1.116     schwarze  559:        if ((nn = n->parent->head->child) != NULL &&
                    560:            (nn = nn->next) != NULL &&
                    561:            a2roffsu(nn->string, &su, SCALE_EN)) {
1.128     schwarze  562:                len = term_hspan(p, &su) / 24;
1.116     schwarze  563:                if (len < 0 && (size_t)(-len) > mt->offset)
                    564:                        len = -mt->offset;
1.117     schwarze  565:                else if (len > SHRT_MAX)
                    566:                        len = term_len(p, p->defindent);
                    567:                mt->lmargin[mt->lmargincur] = len;
1.116     schwarze  568:        } else
                    569:                len = mt->lmargin[mt->lmargincur];
1.11      schwarze  570:
                    571:        switch (n->type) {
1.124     schwarze  572:        case ROFFT_HEAD:
1.13      schwarze  573:                p->offset = mt->offset;
                    574:                p->rmargin = mt->offset + len;
1.11      schwarze  575:
1.57      schwarze  576:                savelit = MANT_LITERAL & mt->fl;
                    577:                mt->fl &= ~MANT_LITERAL;
                    578:
                    579:                if (n->child)
1.89      schwarze  580:                        print_man_node(p, mt, n->child, meta);
1.57      schwarze  581:
                    582:                if (savelit)
                    583:                        mt->fl |= MANT_LITERAL;
                    584:
1.138     schwarze  585:                return 0;
1.124     schwarze  586:        case ROFFT_BODY:
1.13      schwarze  587:                p->offset = mt->offset + len;
1.109     schwarze  588:                p->rmargin = p->maxrmargin;
1.11      schwarze  589:                break;
                    590:        default:
                    591:                break;
                    592:        }
1.1       kristaps  593:
1.138     schwarze  594:        return 1;
1.11      schwarze  595: }
1.1       kristaps  596:
1.11      schwarze  597: static void
                    598: post_IP(DECL_ARGS)
                    599: {
1.4       schwarze  600:
1.11      schwarze  601:        switch (n->type) {
1.124     schwarze  602:        case ROFFT_HEAD:
1.11      schwarze  603:                term_flushln(p);
                    604:                p->flags &= ~TERMP_NOBREAK;
1.93      schwarze  605:                p->trailspace = 0;
1.11      schwarze  606:                p->rmargin = p->maxrmargin;
                    607:                break;
1.124     schwarze  608:        case ROFFT_BODY:
1.57      schwarze  609:                term_newln(p);
1.92      schwarze  610:                p->offset = mt->offset;
1.11      schwarze  611:                break;
                    612:        default:
                    613:                break;
                    614:        }
1.1       kristaps  615: }
                    616:
                    617: static int
                    618: pre_TP(DECL_ARGS)
                    619: {
1.116     schwarze  620:        struct roffsu            su;
1.125     schwarze  621:        struct roff_node        *nn;
1.116     schwarze  622:        int                      len, savelit;
1.11      schwarze  623:
                    624:        switch (n->type) {
1.124     schwarze  625:        case ROFFT_HEAD:
1.137     schwarze  626:                p->flags |= TERMP_NOBREAK | TERMP_BRTRSP;
1.93      schwarze  627:                p->trailspace = 1;
1.11      schwarze  628:                break;
1.124     schwarze  629:        case ROFFT_BODY:
1.11      schwarze  630:                p->flags |= TERMP_NOSPACE;
                    631:                break;
1.124     schwarze  632:        case ROFFT_BLOCK:
1.88      schwarze  633:                print_bvspace(p, n, mt->pardist);
1.11      schwarze  634:                /* FALLTHROUGH */
                    635:        default:
1.138     schwarze  636:                return 1;
1.11      schwarze  637:        }
                    638:
                    639:        /* Calculate offset. */
1.1       kristaps  640:
1.116     schwarze  641:        if ((nn = n->parent->head->child) != NULL &&
1.141     schwarze  642:            nn->string != NULL && ! (NODE_LINE & nn->flags) &&
1.116     schwarze  643:            a2roffsu(nn->string, &su, SCALE_EN)) {
1.128     schwarze  644:                len = term_hspan(p, &su) / 24;
1.116     schwarze  645:                if (len < 0 && (size_t)(-len) > mt->offset)
                    646:                        len = -mt->offset;
1.117     schwarze  647:                else if (len > SHRT_MAX)
                    648:                        len = term_len(p, p->defindent);
                    649:                mt->lmargin[mt->lmargincur] = len;
1.116     schwarze  650:        } else
                    651:                len = mt->lmargin[mt->lmargincur];
1.8       schwarze  652:
1.11      schwarze  653:        switch (n->type) {
1.124     schwarze  654:        case ROFFT_HEAD:
1.13      schwarze  655:                p->offset = mt->offset;
                    656:                p->rmargin = mt->offset + len;
1.11      schwarze  657:
1.57      schwarze  658:                savelit = MANT_LITERAL & mt->fl;
                    659:                mt->fl &= ~MANT_LITERAL;
                    660:
1.11      schwarze  661:                /* Don't print same-line elements. */
1.95      schwarze  662:                nn = n->child;
1.141     schwarze  663:                while (NULL != nn && 0 == (NODE_LINE & nn->flags))
1.95      schwarze  664:                        nn = nn->next;
                    665:
                    666:                while (NULL != nn) {
                    667:                        print_man_node(p, mt, nn, meta);
                    668:                        nn = nn->next;
                    669:                }
1.11      schwarze  670:
1.57      schwarze  671:                if (savelit)
                    672:                        mt->fl |= MANT_LITERAL;
1.138     schwarze  673:                return 0;
1.124     schwarze  674:        case ROFFT_BODY:
1.13      schwarze  675:                p->offset = mt->offset + len;
1.109     schwarze  676:                p->rmargin = p->maxrmargin;
1.93      schwarze  677:                p->trailspace = 0;
1.137     schwarze  678:                p->flags &= ~(TERMP_NOBREAK | TERMP_BRTRSP);
1.11      schwarze  679:                break;
                    680:        default:
                    681:                break;
                    682:        }
1.1       kristaps  683:
1.138     schwarze  684:        return 1;
1.11      schwarze  685: }
1.1       kristaps  686:
1.11      schwarze  687: static void
                    688: post_TP(DECL_ARGS)
                    689: {
1.1       kristaps  690:
1.11      schwarze  691:        switch (n->type) {
1.124     schwarze  692:        case ROFFT_HEAD:
1.11      schwarze  693:                term_flushln(p);
                    694:                break;
1.124     schwarze  695:        case ROFFT_BODY:
1.57      schwarze  696:                term_newln(p);
1.92      schwarze  697:                p->offset = mt->offset;
1.11      schwarze  698:                break;
                    699:        default:
                    700:                break;
                    701:        }
1.1       kristaps  702: }
                    703:
                    704: static int
                    705: pre_SS(DECL_ARGS)
                    706: {
1.88      schwarze  707:        int      i;
1.1       kristaps  708:
1.11      schwarze  709:        switch (n->type) {
1.124     schwarze  710:        case ROFFT_BLOCK:
1.69      schwarze  711:                mt->fl &= ~MANT_LITERAL;
1.77      schwarze  712:                mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
                    713:                mt->offset = term_len(p, p->defindent);
1.111     schwarze  714:
                    715:                /*
                    716:                 * No vertical space before the first subsection
                    717:                 * and after an empty subsection.
                    718:                 */
                    719:
                    720:                do {
                    721:                        n = n->prev;
1.135     schwarze  722:                } while (n != NULL && n->tok != TOKEN_NONE &&
1.123     schwarze  723:                    termacts[n->tok].flags & MAN_NOTEXT);
1.111     schwarze  724:                if (n == NULL || (n->tok == MAN_SS && n->body->child == NULL))
1.11      schwarze  725:                        break;
1.111     schwarze  726:
1.88      schwarze  727:                for (i = 0; i < mt->pardist; i++)
                    728:                        term_vspace(p);
1.11      schwarze  729:                break;
1.124     schwarze  730:        case ROFFT_HEAD:
1.21      schwarze  731:                term_fontrepl(p, TERMFONT_BOLD);
1.87      schwarze  732:                p->offset = term_len(p, 3);
1.129     schwarze  733:                p->rmargin = mt->offset;
                    734:                p->trailspace = mt->offset;
                    735:                p->flags |= TERMP_NOBREAK | TERMP_BRIND;
1.11      schwarze  736:                break;
1.124     schwarze  737:        case ROFFT_BODY:
1.13      schwarze  738:                p->offset = mt->offset;
1.129     schwarze  739:                p->rmargin = p->maxrmargin;
                    740:                p->trailspace = 0;
                    741:                p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
1.11      schwarze  742:                break;
                    743:        default:
                    744:                break;
                    745:        }
                    746:
1.138     schwarze  747:        return 1;
1.1       kristaps  748: }
                    749:
                    750: static void
                    751: post_SS(DECL_ARGS)
                    752: {
1.100     schwarze  753:
1.11      schwarze  754:        switch (n->type) {
1.124     schwarze  755:        case ROFFT_HEAD:
1.11      schwarze  756:                term_newln(p);
                    757:                break;
1.124     schwarze  758:        case ROFFT_BODY:
1.11      schwarze  759:                term_newln(p);
                    760:                break;
                    761:        default:
                    762:                break;
                    763:        }
1.1       kristaps  764: }
                    765:
                    766: static int
                    767: pre_SH(DECL_ARGS)
                    768: {
1.88      schwarze  769:        int      i;
1.1       kristaps  770:
1.11      schwarze  771:        switch (n->type) {
1.124     schwarze  772:        case ROFFT_BLOCK:
1.69      schwarze  773:                mt->fl &= ~MANT_LITERAL;
1.77      schwarze  774:                mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
                    775:                mt->offset = term_len(p, p->defindent);
1.111     schwarze  776:
                    777:                /*
                    778:                 * No vertical space before the first section
                    779:                 * and after an empty section.
                    780:                 */
                    781:
                    782:                do {
                    783:                        n = n->prev;
1.144     schwarze  784:                } while (n != NULL && n->tok != TOKEN_NONE &&
1.143     schwarze  785:                    termacts[n->tok].flags & MAN_NOTEXT);
1.111     schwarze  786:                if (n == NULL || (n->tok == MAN_SH && n->body->child == NULL))
1.29      schwarze  787:                        break;
1.111     schwarze  788:
1.88      schwarze  789:                for (i = 0; i < mt->pardist; i++)
                    790:                        term_vspace(p);
1.11      schwarze  791:                break;
1.124     schwarze  792:        case ROFFT_HEAD:
1.21      schwarze  793:                term_fontrepl(p, TERMFONT_BOLD);
1.11      schwarze  794:                p->offset = 0;
1.129     schwarze  795:                p->rmargin = mt->offset;
                    796:                p->trailspace = mt->offset;
                    797:                p->flags |= TERMP_NOBREAK | TERMP_BRIND;
1.11      schwarze  798:                break;
1.124     schwarze  799:        case ROFFT_BODY:
1.13      schwarze  800:                p->offset = mt->offset;
1.129     schwarze  801:                p->rmargin = p->maxrmargin;
                    802:                p->trailspace = 0;
                    803:                p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
1.11      schwarze  804:                break;
                    805:        default:
                    806:                break;
                    807:        }
                    808:
1.138     schwarze  809:        return 1;
1.1       kristaps  810: }
                    811:
                    812: static void
                    813: post_SH(DECL_ARGS)
                    814: {
1.100     schwarze  815:
1.11      schwarze  816:        switch (n->type) {
1.124     schwarze  817:        case ROFFT_HEAD:
1.11      schwarze  818:                term_newln(p);
                    819:                break;
1.124     schwarze  820:        case ROFFT_BODY:
1.11      schwarze  821:                term_newln(p);
                    822:                break;
                    823:        default:
1.13      schwarze  824:                break;
                    825:        }
                    826: }
                    827:
                    828: static int
                    829: pre_RS(DECL_ARGS)
                    830: {
1.116     schwarze  831:        struct roffsu    su;
1.13      schwarze  832:
                    833:        switch (n->type) {
1.124     schwarze  834:        case ROFFT_BLOCK:
1.13      schwarze  835:                term_newln(p);
1.138     schwarze  836:                return 1;
1.124     schwarze  837:        case ROFFT_HEAD:
1.138     schwarze  838:                return 0;
1.13      schwarze  839:        default:
                    840:                break;
                    841:        }
                    842:
1.118     schwarze  843:        n = n->parent->head;
                    844:        n->aux = SHRT_MAX + 1;
1.130     schwarze  845:        if (n->child == NULL)
                    846:                n->aux = mt->lmargin[mt->lmargincur];
                    847:        else if (a2roffsu(n->child->string, &su, SCALE_EN))
1.128     schwarze  848:                n->aux = term_hspan(p, &su) / 24;
1.118     schwarze  849:        if (n->aux < 0 && (size_t)(-n->aux) > mt->offset)
                    850:                n->aux = -mt->offset;
                    851:        else if (n->aux > SHRT_MAX)
                    852:                n->aux = term_len(p, p->defindent);
1.13      schwarze  853:
1.118     schwarze  854:        mt->offset += n->aux;
1.94      schwarze  855:        p->offset = mt->offset;
1.109     schwarze  856:        p->rmargin = p->maxrmargin;
1.13      schwarze  857:
1.70      schwarze  858:        if (++mt->lmarginsz < MAXMARGINS)
                    859:                mt->lmargincur = mt->lmarginsz;
                    860:
1.131     schwarze  861:        mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
1.138     schwarze  862:        return 1;
1.13      schwarze  863: }
                    864:
                    865: static void
                    866: post_RS(DECL_ARGS)
                    867: {
                    868:
                    869:        switch (n->type) {
1.124     schwarze  870:        case ROFFT_BLOCK:
1.69      schwarze  871:                return;
1.124     schwarze  872:        case ROFFT_HEAD:
1.69      schwarze  873:                return;
1.13      schwarze  874:        default:
                    875:                term_newln(p);
1.11      schwarze  876:                break;
                    877:        }
1.69      schwarze  878:
1.118     schwarze  879:        mt->offset -= n->parent->head->aux;
1.69      schwarze  880:        p->offset = mt->offset;
1.70      schwarze  881:
                    882:        if (--mt->lmarginsz < MAXMARGINS)
                    883:                mt->lmargincur = mt->lmarginsz;
1.91      schwarze  884: }
                    885:
                    886: static int
                    887: pre_UR(DECL_ARGS)
                    888: {
                    889:
1.138     schwarze  890:        return n->type != ROFFT_HEAD;
1.91      schwarze  891: }
                    892:
                    893: static void
                    894: post_UR(DECL_ARGS)
                    895: {
                    896:
1.124     schwarze  897:        if (n->type != ROFFT_BLOCK)
1.91      schwarze  898:                return;
                    899:
                    900:        term_word(p, "<");
                    901:        p->flags |= TERMP_NOSPACE;
                    902:
                    903:        if (NULL != n->child->child)
                    904:                print_man_node(p, mt, n->child->child, meta);
                    905:
                    906:        p->flags |= TERMP_NOSPACE;
                    907:        term_word(p, ">");
1.47      schwarze  908: }
                    909:
1.1       kristaps  910: static void
1.19      schwarze  911: print_man_node(DECL_ARGS)
1.1       kristaps  912: {
1.32      schwarze  913:        size_t           rm, rmax;
1.21      schwarze  914:        int              c;
1.1       kristaps  915:
                    916:        switch (n->type) {
1.124     schwarze  917:        case ROFFT_TEXT:
1.61      schwarze  918:                /*
                    919:                 * If we have a blank line, output a vertical space.
                    920:                 * If we have a space as the first character, break
                    921:                 * before printing the line's data.
                    922:                 */
1.60      schwarze  923:                if ('\0' == *n->string) {
1.1       kristaps  924:                        term_vspace(p);
1.61      schwarze  925:                        return;
1.141     schwarze  926:                } else if (' ' == *n->string && NODE_LINE & n->flags)
1.60      schwarze  927:                        term_newln(p);
1.21      schwarze  928:
1.1       kristaps  929:                term_word(p, n->string);
1.84      schwarze  930:                goto out;
1.21      schwarze  931:
1.124     schwarze  932:        case ROFFT_EQN:
1.141     schwarze  933:                if ( ! (n->flags & NODE_LINE))
1.105     schwarze  934:                        p->flags |= TERMP_NOSPACE;
1.71      schwarze  935:                term_eqn(p, n->eqn);
1.141     schwarze  936:                if (n->next != NULL && ! (n->next->flags & NODE_LINE))
1.106     schwarze  937:                        p->flags |= TERMP_NOSPACE;
1.61      schwarze  938:                return;
1.124     schwarze  939:        case ROFFT_TBL:
1.122     schwarze  940:                if (p->tbl.cols == NULL)
                    941:                        term_vspace(p);
1.58      schwarze  942:                term_tbl(p, n->span);
1.61      schwarze  943:                return;
1.1       kristaps  944:        default:
                    945:                break;
                    946:        }
                    947:
1.146     schwarze  948:        if (n->tok < ROFF_MAX) {
1.147     schwarze  949:                roff_term_pre(p, n);
1.146     schwarze  950:                return;
                    951:        }
                    952:
                    953:        assert(n->tok >= MAN_TH && n->tok <= MAN_MAX);
1.61      schwarze  954:        if ( ! (MAN_NOTEXT & termacts[n->tok].flags))
                    955:                term_fontrepl(p, TERMFONT_NONE);
                    956:
                    957:        c = 1;
                    958:        if (termacts[n->tok].pre)
1.89      schwarze  959:                c = (*termacts[n->tok].pre)(p, mt, n, meta);
1.61      schwarze  960:
1.1       kristaps  961:        if (c && n->child)
1.89      schwarze  962:                print_man_nodelist(p, mt, n->child, meta);
1.1       kristaps  963:
1.61      schwarze  964:        if (termacts[n->tok].post)
1.89      schwarze  965:                (*termacts[n->tok].post)(p, mt, n, meta);
1.61      schwarze  966:        if ( ! (MAN_NOTEXT & termacts[n->tok].flags))
                    967:                term_fontrepl(p, TERMFONT_NONE);
1.30      schwarze  968:
1.84      schwarze  969: out:
                    970:        /*
                    971:         * If we're in a literal context, make sure that words
                    972:         * together on the same line stay together.  This is a
                    973:         * POST-printing call, so we check the NEXT word.  Since
                    974:         * -man doesn't have nested macros, we don't need to be
                    975:         * more specific than this.
                    976:         */
1.110     schwarze  977:        if (mt->fl & MANT_LITERAL &&
                    978:            ! (p->flags & (TERMP_NOBREAK | TERMP_NONEWLINE)) &&
1.141     schwarze  979:            (n->next == NULL || n->next->flags & NODE_LINE)) {
1.84      schwarze  980:                rm = p->rmargin;
                    981:                rmax = p->maxrmargin;
                    982:                p->rmargin = p->maxrmargin = TERM_MAXMARGIN;
                    983:                p->flags |= TERMP_NOSPACE;
1.110     schwarze  984:                if (n->string != NULL && *n->string != '\0')
1.84      schwarze  985:                        term_flushln(p);
                    986:                else
                    987:                        term_newln(p);
                    988:                if (rm < rmax && n->parent->tok == MAN_HP) {
                    989:                        p->offset = rm;
                    990:                        p->rmargin = rmax;
                    991:                } else
                    992:                        p->rmargin = rm;
                    993:                p->maxrmargin = rmax;
                    994:        }
1.141     schwarze  995:        if (NODE_EOS & n->flags)
1.30      schwarze  996:                p->flags |= TERMP_SENTENCE;
1.1       kristaps  997: }
                    998:
                    999:
                   1000: static void
1.21      schwarze 1001: print_man_nodelist(DECL_ARGS)
1.1       kristaps 1002: {
1.11      schwarze 1003:
1.121     schwarze 1004:        while (n != NULL) {
                   1005:                print_man_node(p, mt, n, meta);
                   1006:                n = n->next;
                   1007:        }
1.1       kristaps 1008: }
                   1009:
                   1010: static void
1.126     schwarze 1011: print_man_foot(struct termp *p, const struct roff_meta *meta)
1.1       kristaps 1012: {
1.101     schwarze 1013:        char                    *title;
1.109     schwarze 1014:        size_t                   datelen, titlen;
1.41      schwarze 1015:
1.80      schwarze 1016:        assert(meta->title);
                   1017:        assert(meta->msec);
                   1018:        assert(meta->date);
1.21      schwarze 1019:
                   1020:        term_fontrepl(p, TERMFONT_NONE);
1.1       kristaps 1021:
1.103     schwarze 1022:        if (meta->hasbody)
                   1023:                term_vspace(p);
1.81      schwarze 1024:
                   1025:        /*
                   1026:         * Temporary, undocumented option to imitate mdoc(7) output.
1.126     schwarze 1027:         * In the bottom right corner, use the operating system
                   1028:         * instead of the title.
1.81      schwarze 1029:         */
                   1030:
1.79      schwarze 1031:        if ( ! p->mdocstyle) {
1.103     schwarze 1032:                if (meta->hasbody) {
                   1033:                        term_vspace(p);
                   1034:                        term_vspace(p);
                   1035:                }
1.101     schwarze 1036:                mandoc_asprintf(&title, "%s(%s)",
                   1037:                    meta->title, meta->msec);
1.126     schwarze 1038:        } else if (meta->os) {
                   1039:                title = mandoc_strdup(meta->os);
1.79      schwarze 1040:        } else {
1.101     schwarze 1041:                title = mandoc_strdup("");
1.79      schwarze 1042:        }
1.78      schwarze 1043:        datelen = term_strlen(p, meta->date);
1.1       kristaps 1044:
1.126     schwarze 1045:        /* Bottom left corner: operating system. */
1.81      schwarze 1046:
1.1       kristaps 1047:        p->flags |= TERMP_NOSPACE | TERMP_NOBREAK;
1.93      schwarze 1048:        p->trailspace = 1;
1.1       kristaps 1049:        p->offset = 0;
1.109     schwarze 1050:        p->rmargin = p->maxrmargin > datelen ?
                   1051:            (p->maxrmargin + term_len(p, 1) - datelen) / 2 : 0;
1.1       kristaps 1052:
1.126     schwarze 1053:        if (meta->os)
                   1054:                term_word(p, meta->os);
1.1       kristaps 1055:        term_flushln(p);
                   1056:
1.81      schwarze 1057:        /* At the bottom in the middle: manual date. */
                   1058:
1.109     schwarze 1059:        p->offset = p->rmargin;
                   1060:        titlen = term_strlen(p, title);
                   1061:        p->rmargin = p->maxrmargin > titlen ? p->maxrmargin - titlen : 0;
1.72      schwarze 1062:        p->flags |= TERMP_NOSPACE;
1.78      schwarze 1063:
                   1064:        term_word(p, meta->date);
                   1065:        term_flushln(p);
                   1066:
1.81      schwarze 1067:        /* Bottom right corner: manual title and section. */
                   1068:
1.78      schwarze 1069:        p->flags &= ~TERMP_NOBREAK;
                   1070:        p->flags |= TERMP_NOSPACE;
1.93      schwarze 1071:        p->trailspace = 0;
1.78      schwarze 1072:        p->offset = p->rmargin;
1.1       kristaps 1073:        p->rmargin = p->maxrmargin;
                   1074:
1.78      schwarze 1075:        term_word(p, title);
1.1       kristaps 1076:        term_flushln(p);
1.101     schwarze 1077:        free(title);
1.1       kristaps 1078: }
                   1079:
                   1080: static void
1.126     schwarze 1081: print_man_head(struct termp *p, const struct roff_meta *meta)
1.1       kristaps 1082: {
1.102     schwarze 1083:        const char              *volume;
1.101     schwarze 1084:        char                    *title;
1.102     schwarze 1085:        size_t                   vollen, titlen;
1.41      schwarze 1086:
1.89      schwarze 1087:        assert(meta->title);
                   1088:        assert(meta->msec);
1.1       kristaps 1089:
1.102     schwarze 1090:        volume = NULL == meta->vol ? "" : meta->vol;
                   1091:        vollen = term_strlen(p, volume);
1.1       kristaps 1092:
1.81      schwarze 1093:        /* Top left corner: manual title and section. */
                   1094:
1.101     schwarze 1095:        mandoc_asprintf(&title, "%s(%s)", meta->title, meta->msec);
1.42      schwarze 1096:        titlen = term_strlen(p, title);
1.1       kristaps 1097:
1.73      schwarze 1098:        p->flags |= TERMP_NOBREAK | TERMP_NOSPACE;
1.93      schwarze 1099:        p->trailspace = 1;
1.1       kristaps 1100:        p->offset = 0;
1.102     schwarze 1101:        p->rmargin = 2 * (titlen+1) + vollen < p->maxrmargin ?
                   1102:            (p->maxrmargin - vollen + term_len(p, 1)) / 2 :
1.109     schwarze 1103:            vollen < p->maxrmargin ? p->maxrmargin - vollen : 0;
1.1       kristaps 1104:
                   1105:        term_word(p, title);
                   1106:        term_flushln(p);
                   1107:
1.81      schwarze 1108:        /* At the top in the middle: manual volume. */
                   1109:
1.72      schwarze 1110:        p->flags |= TERMP_NOSPACE;
1.1       kristaps 1111:        p->offset = p->rmargin;
1.102     schwarze 1112:        p->rmargin = p->offset + vollen + titlen < p->maxrmargin ?
1.25      schwarze 1113:            p->maxrmargin - titlen : p->maxrmargin;
1.1       kristaps 1114:
1.102     schwarze 1115:        term_word(p, volume);
1.1       kristaps 1116:        term_flushln(p);
                   1117:
1.81      schwarze 1118:        /* Top right corner: title and section, again. */
                   1119:
1.1       kristaps 1120:        p->flags &= ~TERMP_NOBREAK;
1.93      schwarze 1121:        p->trailspace = 0;
1.25      schwarze 1122:        if (p->rmargin + titlen <= p->maxrmargin) {
1.72      schwarze 1123:                p->flags |= TERMP_NOSPACE;
1.25      schwarze 1124:                p->offset = p->rmargin;
                   1125:                p->rmargin = p->maxrmargin;
                   1126:                term_word(p, title);
                   1127:                term_flushln(p);
                   1128:        }
1.1       kristaps 1129:
1.73      schwarze 1130:        p->flags &= ~TERMP_NOSPACE;
                   1131:        p->offset = 0;
1.1       kristaps 1132:        p->rmargin = p->maxrmargin;
1.29      schwarze 1133:
1.100     schwarze 1134:        /*
1.81      schwarze 1135:         * Groff prints three blank lines before the content.
                   1136:         * Do the same, except in the temporary, undocumented
                   1137:         * mode imitating mdoc(7) output.
1.29      schwarze 1138:         */
                   1139:
                   1140:        term_vspace(p);
1.79      schwarze 1141:        if ( ! p->mdocstyle) {
                   1142:                term_vspace(p);
                   1143:                term_vspace(p);
                   1144:        }
1.101     schwarze 1145:        free(title);
1.1       kristaps 1146: }