[BACK]Return to mdoc_man.c CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / mandoc

Annotation of mandoc/mdoc_man.c, Revision 1.34

1.34    ! schwarze    1: /*     $Id: mdoc_man.c,v 1.33 2012/07/11 16:19:08 schwarze Exp $ */
1.1       schwarze    2: /*
1.11      schwarze    3:  * Copyright (c) 2011, 2012 Ingo Schwarze <schwarze@openbsd.org>
1.1       schwarze    4:  *
                      5:  * Permission to use, copy, modify, and distribute this software for any
                      6:  * purpose with or without fee is hereby granted, provided that the above
                      7:  * copyright notice and this permission notice appear in all copies.
                      8:  *
                      9:  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
                     10:  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
                     11:  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
                     12:  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
                     13:  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
                     14:  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
                     15:  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
                     16:  */
1.7       kristaps   17: #ifdef HAVE_CONFIG_H
                     18: #include "config.h"
                     19: #endif
                     20:
1.12      schwarze   21: #include <assert.h>
1.1       schwarze   22: #include <stdio.h>
                     23: #include <string.h>
                     24:
                     25: #include "mandoc.h"
1.11      schwarze   26: #include "out.h"
1.4       kristaps   27: #include "man.h"
1.1       schwarze   28: #include "mdoc.h"
                     29: #include "main.h"
                     30:
1.5       kristaps   31: #define        DECL_ARGS const struct mdoc_meta *m, \
1.20      schwarze   32:                  const struct mdoc_node *n
1.1       schwarze   33:
                     34: struct manact {
1.5       kristaps   35:        int             (*cond)(DECL_ARGS); /* DON'T run actions */
                     36:        int             (*pre)(DECL_ARGS); /* pre-node action */
                     37:        void            (*post)(DECL_ARGS); /* post-node action */
                     38:        const char       *prefix; /* pre-node string constant */
                     39:        const char       *suffix; /* post-node string constant */
1.1       schwarze   40: };
                     41:
1.5       kristaps   42: static int       cond_body(DECL_ARGS);
1.1       schwarze   43: static int       cond_head(DECL_ARGS);
1.26      schwarze   44: static  void     font_push(char);
                     45: static void      font_pop(void);
1.34    ! schwarze   46: static void      post__t(DECL_ARGS);
1.5       kristaps   47: static void      post_bd(DECL_ARGS);
1.27      schwarze   48: static void      post_bf(DECL_ARGS);
1.13      schwarze   49: static void      post_bk(DECL_ARGS);
1.30      schwarze   50: static void      post_bl(DECL_ARGS);
1.5       kristaps   51: static void      post_dl(DECL_ARGS);
1.1       schwarze   52: static void      post_enc(DECL_ARGS);
1.28      schwarze   53: static void      post_eo(DECL_ARGS);
1.17      schwarze   54: static void      post_fa(DECL_ARGS);
1.29      schwarze   55: static void      post_fd(DECL_ARGS);
1.26      schwarze   56: static void      post_fl(DECL_ARGS);
1.16      schwarze   57: static void      post_fn(DECL_ARGS);
1.17      schwarze   58: static void      post_fo(DECL_ARGS);
1.26      schwarze   59: static void      post_font(DECL_ARGS);
1.15      schwarze   60: static void      post_in(DECL_ARGS);
1.30      schwarze   61: static void      post_it(DECL_ARGS);
1.14      schwarze   62: static void      post_lb(DECL_ARGS);
1.5       kristaps   63: static void      post_nm(DECL_ARGS);
1.1       schwarze   64: static void      post_percent(DECL_ARGS);
1.5       kristaps   65: static void      post_pf(DECL_ARGS);
1.3       schwarze   66: static void      post_sect(DECL_ARGS);
1.5       kristaps   67: static void      post_sp(DECL_ARGS);
1.18      schwarze   68: static void      post_vt(DECL_ARGS);
1.34    ! schwarze   69: static int       pre__t(DECL_ARGS);
1.22      schwarze   70: static int       pre_an(DECL_ARGS);
1.3       schwarze   71: static int       pre_ap(DECL_ARGS);
                     72: static int       pre_bd(DECL_ARGS);
1.27      schwarze   73: static int       pre_bf(DECL_ARGS);
1.13      schwarze   74: static int       pre_bk(DECL_ARGS);
1.30      schwarze   75: static int       pre_bl(DECL_ARGS);
1.3       schwarze   76: static int       pre_br(DECL_ARGS);
1.8       schwarze   77: static int       pre_bx(DECL_ARGS);
1.1       schwarze   78: static int       pre_dl(DECL_ARGS);
1.5       kristaps   79: static int       pre_enc(DECL_ARGS);
1.26      schwarze   80: static int       pre_em(DECL_ARGS);
1.17      schwarze   81: static int       pre_fa(DECL_ARGS);
1.29      schwarze   82: static int       pre_fd(DECL_ARGS);
1.26      schwarze   83: static int       pre_fl(DECL_ARGS);
1.16      schwarze   84: static int       pre_fn(DECL_ARGS);
1.17      schwarze   85: static int       pre_fo(DECL_ARGS);
1.23      schwarze   86: static int       pre_ft(DECL_ARGS);
1.15      schwarze   87: static int       pre_in(DECL_ARGS);
1.1       schwarze   88: static int       pre_it(DECL_ARGS);
1.24      schwarze   89: static int       pre_lk(DECL_ARGS);
1.26      schwarze   90: static int       pre_li(DECL_ARGS);
1.1       schwarze   91: static int       pre_nm(DECL_ARGS);
1.25      schwarze   92: static int       pre_no(DECL_ARGS);
1.1       schwarze   93: static int       pre_ns(DECL_ARGS);
                     94: static int       pre_pp(DECL_ARGS);
1.34    ! schwarze   95: static int       pre_rs(DECL_ARGS);
1.12      schwarze   96: static int       pre_sm(DECL_ARGS);
1.3       schwarze   97: static int       pre_sp(DECL_ARGS);
1.5       kristaps   98: static int       pre_sect(DECL_ARGS);
1.26      schwarze   99: static int       pre_sy(DECL_ARGS);
1.23      schwarze  100: static void      pre_syn(const struct mdoc_node *);
1.18      schwarze  101: static int       pre_vt(DECL_ARGS);
1.8       schwarze  102: static int       pre_ux(DECL_ARGS);
1.1       schwarze  103: static int       pre_xr(DECL_ARGS);
1.20      schwarze  104: static void      print_word(const char *);
                    105: static void      print_offs(const char *);
1.31      schwarze  106: static void      print_width(const char *, const struct mdoc_node *);
1.30      schwarze  107: static void      print_count(int *);
1.5       kristaps  108: static void      print_node(DECL_ARGS);
1.1       schwarze  109:
1.3       schwarze  110: static const struct manact manacts[MDOC_MAX + 1] = {
                    111:        { NULL, pre_ap, NULL, NULL, NULL }, /* Ap */
                    112:        { NULL, NULL, NULL, NULL, NULL }, /* Dd */
                    113:        { NULL, NULL, NULL, NULL, NULL }, /* Dt */
1.8       schwarze  114:        { NULL, NULL, NULL, NULL, NULL }, /* Os */
1.3       schwarze  115:        { NULL, pre_sect, post_sect, ".SH", NULL }, /* Sh */
                    116:        { NULL, pre_sect, post_sect, ".SS", NULL }, /* Ss */
1.1       schwarze  117:        { NULL, pre_pp, NULL, NULL, NULL }, /* Pp */
1.3       schwarze  118:        { cond_body, pre_dl, post_dl, NULL, NULL }, /* D1 */
1.1       schwarze  119:        { cond_body, pre_dl, post_dl, NULL, NULL }, /* Dl */
1.3       schwarze  120:        { cond_body, pre_bd, post_bd, NULL, NULL }, /* Bd */
                    121:        { NULL, NULL, NULL, NULL, NULL }, /* Ed */
1.30      schwarze  122:        { cond_body, pre_bl, post_bl, NULL, NULL }, /* Bl */
1.3       schwarze  123:        { NULL, NULL, NULL, NULL, NULL }, /* El */
1.30      schwarze  124:        { NULL, pre_it, post_it, NULL, NULL }, /* It */
1.26      schwarze  125:        { NULL, pre_em, post_font, NULL, NULL }, /* Ad */
1.22      schwarze  126:        { NULL, pre_an, NULL, NULL, NULL }, /* An */
1.26      schwarze  127:        { NULL, pre_em, post_font, NULL, NULL }, /* Ar */
                    128:        { NULL, pre_sy, post_font, NULL, NULL }, /* Cd */
                    129:        { NULL, pre_sy, post_font, NULL, NULL }, /* Cm */
                    130:        { NULL, pre_li, post_font, NULL, NULL }, /* Dv */
                    131:        { NULL, pre_li, post_font, NULL, NULL }, /* Er */
                    132:        { NULL, pre_li, post_font, NULL, NULL }, /* Ev */
1.1       schwarze  133:        { NULL, pre_enc, post_enc, "The \\fB",
                    134:            "\\fP\nutility exits 0 on success, and >0 if an error occurs."
                    135:            }, /* Ex */
1.17      schwarze  136:        { NULL, pre_fa, post_fa, NULL, NULL }, /* Fa */
1.29      schwarze  137:        { NULL, pre_fd, post_fd, NULL, NULL }, /* Fd */
1.26      schwarze  138:        { NULL, pre_fl, post_fl, NULL, NULL }, /* Fl */
1.16      schwarze  139:        { NULL, pre_fn, post_fn, NULL, NULL }, /* Fn */
1.26      schwarze  140:        { NULL, pre_ft, post_font, NULL, NULL }, /* Ft */
                    141:        { NULL, pre_sy, post_font, NULL, NULL }, /* Ic */
1.15      schwarze  142:        { NULL, pre_in, post_in, NULL, NULL }, /* In */
1.26      schwarze  143:        { NULL, pre_li, post_font, NULL, NULL }, /* Li */
1.1       schwarze  144:        { cond_head, pre_enc, NULL, "\\- ", NULL }, /* Nd */
                    145:        { NULL, pre_nm, post_nm, NULL, NULL }, /* Nm */
                    146:        { cond_body, pre_enc, post_enc, "[", "]" }, /* Op */
1.8       schwarze  147:        { NULL, NULL, NULL, NULL, NULL }, /* Ot */
1.26      schwarze  148:        { NULL, pre_em, post_font, NULL, NULL }, /* Pa */
1.6       kristaps  149:        { NULL, pre_enc, post_enc, "The \\fB",
                    150:                "\\fP\nfunction returns the value 0 if successful;\n"
                    151:                "otherwise the value -1 is returned and the global\n"
                    152:                "variable \\fIerrno\\fP is set to indicate the error."
                    153:                }, /* Rv */
1.8       schwarze  154:        { NULL, NULL, NULL, NULL, NULL }, /* St */
1.26      schwarze  155:        { NULL, pre_em, post_font, NULL, NULL }, /* Va */
1.18      schwarze  156:        { NULL, pre_vt, post_vt, NULL, NULL }, /* Vt */
1.8       schwarze  157:        { NULL, pre_xr, NULL, NULL, NULL }, /* Xr */
1.34    ! schwarze  158:        { NULL, NULL, post_percent, NULL, NULL }, /* %A */
        !           159:        { NULL, pre_em, post_percent, NULL, NULL }, /* %B */
        !           160:        { NULL, NULL, post_percent, NULL, NULL }, /* %D */
        !           161:        { NULL, pre_em, post_percent, NULL, NULL }, /* %I */
        !           162:        { NULL, pre_em, post_percent, NULL, NULL }, /* %J */
        !           163:        { NULL, NULL, post_percent, NULL, NULL }, /* %N */
        !           164:        { NULL, NULL, post_percent, NULL, NULL }, /* %O */
        !           165:        { NULL, NULL, post_percent, NULL, NULL }, /* %P */
        !           166:        { NULL, NULL, post_percent, NULL, NULL }, /* %R */
        !           167:        { NULL, pre__t, post__t, NULL, NULL }, /* %T */
        !           168:        { NULL, NULL, post_percent, NULL, NULL }, /* %V */
1.9       schwarze  169:        { NULL, NULL, NULL, NULL, NULL }, /* Ac */
                    170:        { cond_body, pre_enc, post_enc, "<", ">" }, /* Ao */
1.1       schwarze  171:        { cond_body, pre_enc, post_enc, "<", ">" }, /* Aq */
1.8       schwarze  172:        { NULL, NULL, NULL, NULL, NULL }, /* At */
1.3       schwarze  173:        { NULL, NULL, NULL, NULL, NULL }, /* Bc */
1.27      schwarze  174:        { NULL, pre_bf, post_bf, NULL, NULL }, /* Bf */
1.3       schwarze  175:        { cond_body, pre_enc, post_enc, "[", "]" }, /* Bo */
                    176:        { cond_body, pre_enc, post_enc, "[", "]" }, /* Bq */
1.8       schwarze  177:        { NULL, pre_ux, NULL, "BSD/OS", NULL }, /* Bsx */
                    178:        { NULL, pre_bx, NULL, NULL, NULL }, /* Bx */
                    179:        { NULL, NULL, NULL, NULL, NULL }, /* Db */
1.9       schwarze  180:        { NULL, NULL, NULL, NULL, NULL }, /* Dc */
                    181:        { cond_body, pre_enc, post_enc, "``", "''" }, /* Do */
1.1       schwarze  182:        { cond_body, pre_enc, post_enc, "``", "''" }, /* Dq */
1.28      schwarze  183:        { NULL, NULL, NULL, NULL, NULL }, /* Ec */
                    184:        { NULL, NULL, NULL, NULL, NULL }, /* Ef */
1.26      schwarze  185:        { NULL, pre_em, post_font, NULL, NULL }, /* Em */
1.28      schwarze  186:        { NULL, NULL, post_eo, NULL, NULL }, /* Eo */
1.8       schwarze  187:        { NULL, pre_ux, NULL, "FreeBSD", NULL }, /* Fx */
1.26      schwarze  188:        { NULL, pre_sy, post_font, NULL, NULL }, /* Ms */
1.25      schwarze  189:        { NULL, pre_no, NULL, NULL, NULL }, /* No */
1.1       schwarze  190:        { NULL, pre_ns, NULL, NULL, NULL }, /* Ns */
1.8       schwarze  191:        { NULL, pre_ux, NULL, "NetBSD", NULL }, /* Nx */
                    192:        { NULL, pre_ux, NULL, "OpenBSD", NULL }, /* Ox */
1.3       schwarze  193:        { NULL, NULL, NULL, NULL, NULL }, /* Pc */
                    194:        { NULL, NULL, post_pf, NULL, NULL }, /* Pf */
                    195:        { cond_body, pre_enc, post_enc, "(", ")" }, /* Po */
                    196:        { cond_body, pre_enc, post_enc, "(", ")" }, /* Pq */
1.9       schwarze  197:        { NULL, NULL, NULL, NULL, NULL }, /* Qc */
1.1       schwarze  198:        { cond_body, pre_enc, post_enc, "`", "'" }, /* Ql */
1.9       schwarze  199:        { cond_body, pre_enc, post_enc, "\"", "\"" }, /* Qo */
                    200:        { cond_body, pre_enc, post_enc, "\"", "\"" }, /* Qq */
                    201:        { NULL, NULL, NULL, NULL, NULL }, /* Re */
1.34    ! schwarze  202:        { cond_body, pre_rs, NULL, NULL, NULL }, /* Rs */
1.9       schwarze  203:        { NULL, NULL, NULL, NULL, NULL }, /* Sc */
                    204:        { cond_body, pre_enc, post_enc, "`", "'" }, /* So */
1.1       schwarze  205:        { cond_body, pre_enc, post_enc, "`", "'" }, /* Sq */
1.12      schwarze  206:        { NULL, pre_sm, NULL, NULL, NULL }, /* Sm */
1.26      schwarze  207:        { NULL, pre_em, post_font, NULL, NULL }, /* Sx */
                    208:        { NULL, pre_sy, post_font, NULL, NULL }, /* Sy */
                    209:        { NULL, pre_li, post_font, NULL, NULL }, /* Tn */
1.8       schwarze  210:        { NULL, pre_ux, NULL, "UNIX", NULL }, /* Ux */
1.34    ! schwarze  211:        { NULL, NULL, NULL, NULL, NULL }, /* Xc */
        !           212:        { NULL, NULL, NULL, NULL, NULL }, /* Xo */
1.17      schwarze  213:        { NULL, pre_fo, post_fo, NULL, NULL }, /* Fo */
                    214:        { NULL, NULL, NULL, NULL, NULL }, /* Fc */
1.3       schwarze  215:        { cond_body, pre_enc, post_enc, "[", "]" }, /* Oo */
1.9       schwarze  216:        { NULL, NULL, NULL, NULL, NULL }, /* Oc */
1.13      schwarze  217:        { NULL, pre_bk, post_bk, NULL, NULL }, /* Bk */
                    218:        { NULL, NULL, NULL, NULL, NULL }, /* Ek */
1.8       schwarze  219:        { NULL, pre_ux, NULL, "is currently in beta test.", NULL }, /* Bt */
                    220:        { NULL, NULL, NULL, NULL, NULL }, /* Hf */
                    221:        { NULL, NULL, NULL, NULL, NULL }, /* Fr */
                    222:        { NULL, pre_ux, NULL, "currently under development.", NULL }, /* Ud */
1.14      schwarze  223:        { NULL, NULL, post_lb, NULL, NULL }, /* Lb */
1.3       schwarze  224:        { NULL, pre_pp, NULL, NULL, NULL }, /* Lp */
1.24      schwarze  225:        { NULL, pre_lk, NULL, NULL, NULL }, /* Lk */
1.26      schwarze  226:        { NULL, pre_em, post_font, NULL, NULL }, /* Mt */
1.9       schwarze  227:        { cond_body, pre_enc, post_enc, "{", "}" }, /* Brq */
                    228:        { cond_body, pre_enc, post_enc, "{", "}" }, /* Bro */
                    229:        { NULL, NULL, NULL, NULL, NULL }, /* Brc */
1.34    ! schwarze  230:        { NULL, NULL, post_percent, NULL, NULL }, /* %C */
1.29      schwarze  231:        { NULL, NULL, NULL, NULL, NULL }, /* Es */
                    232:        { NULL, NULL, NULL, NULL, NULL }, /* En */
1.8       schwarze  233:        { NULL, pre_ux, NULL, "DragonFly", NULL }, /* Dx */
1.34    ! schwarze  234:        { NULL, NULL, post_percent, NULL, NULL }, /* %Q */
1.3       schwarze  235:        { NULL, pre_br, NULL, NULL, NULL }, /* br */
                    236:        { NULL, pre_sp, post_sp, NULL, NULL }, /* sp */
1.34    ! schwarze  237:        { NULL, NULL, post_percent, NULL, NULL }, /* %U */
        !           238:        { NULL, NULL, NULL, NULL, NULL }, /* Ta */
1.3       schwarze  239:        { NULL, NULL, NULL, NULL, NULL }, /* ROOT */
1.1       schwarze  240: };
                    241:
1.20      schwarze  242: static int             outflags;
                    243: #define        MMAN_spc        (1 << 0)
1.25      schwarze  244: #define        MMAN_spc_force  (1 << 1)
                    245: #define        MMAN_nl         (1 << 2)
                    246: #define        MMAN_br         (1 << 3)
                    247: #define        MMAN_sp         (1 << 4)
                    248: #define        MMAN_Sm         (1 << 5)
                    249: #define        MMAN_Bk         (1 << 6)
                    250: #define        MMAN_An_split   (1 << 7)
                    251: #define        MMAN_An_nosplit (1 << 8)
1.20      schwarze  252:
1.26      schwarze  253: static struct {
                    254:        char    *head;
                    255:        char    *tail;
                    256:        size_t   size;
                    257: }      fontqueue;
                    258:
                    259: static void
                    260: font_push(char newfont)
                    261: {
                    262:
                    263:        if (fontqueue.head + fontqueue.size <= ++fontqueue.tail) {
                    264:                fontqueue.size += 8;
                    265:                fontqueue.head = mandoc_realloc(fontqueue.head,
                    266:                                fontqueue.size);
                    267:        }
                    268:        *fontqueue.tail = newfont;
                    269:        print_word("\\f");
                    270:        putchar(newfont);
                    271:        outflags &= ~MMAN_spc;
                    272: }
                    273:
                    274: static void
                    275: font_pop(void)
                    276: {
                    277:
                    278:        if (fontqueue.tail > fontqueue.head)
                    279:                fontqueue.tail--;
                    280:        outflags &= ~MMAN_spc;
                    281:        print_word("\\f");
                    282:        putchar(*fontqueue.tail);
                    283: }
                    284:
1.1       schwarze  285: static void
1.20      schwarze  286: print_word(const char *s)
1.1       schwarze  287: {
1.5       kristaps  288:
1.21      schwarze  289:        if ((MMAN_sp | MMAN_br | MMAN_nl) & outflags) {
1.5       kristaps  290:                /*
                    291:                 * If we need a newline, print it now and start afresh.
                    292:                 */
1.21      schwarze  293:                if (MMAN_sp & outflags)
                    294:                        printf("\n.sp\n");
                    295:                else if (MMAN_br & outflags)
                    296:                        printf("\n.br\n");
                    297:                else if (MMAN_nl & outflags)
                    298:                        putchar('\n');
                    299:                outflags &= ~(MMAN_sp|MMAN_br|MMAN_nl|MMAN_spc);
1.20      schwarze  300:        } else if (MMAN_spc & outflags && '\0' != s[0])
1.5       kristaps  301:                /*
1.25      schwarze  302:                 * If we need a space, only print it if
                    303:                 * (1) it is forced by `No' or
                    304:                 * (2) what follows is not terminating punctuation or
                    305:                 * (3) what follows is longer than one character.
1.5       kristaps  306:                 */
1.25      schwarze  307:                if (MMAN_spc_force & outflags ||
                    308:                    NULL == strchr(".,:;)]?!", s[0]) || '\0' != s[1]) {
1.20      schwarze  309:                        if (MMAN_Bk & outflags) {
1.13      schwarze  310:                                putchar('\\');
                    311:                                putchar('~');
                    312:                        } else
                    313:                                putchar(' ');
                    314:                }
1.5       kristaps  315:
                    316:        /*
                    317:         * Reassign needing space if we're not following opening
                    318:         * punctuation.
                    319:         */
1.20      schwarze  320:        if (MMAN_Sm & outflags &&
                    321:            (('(' != s[0] && '[' != s[0]) || '\0' != s[1]))
                    322:                outflags |= MMAN_spc;
                    323:        else
                    324:                outflags &= ~MMAN_spc;
1.25      schwarze  325:        outflags &= ~MMAN_spc_force;
1.5       kristaps  326:
1.1       schwarze  327:        for ( ; *s; s++) {
                    328:                switch (*s) {
                    329:                case (ASCII_NBRSP):
                    330:                        printf("\\~");
                    331:                        break;
                    332:                case (ASCII_HYPH):
                    333:                        putchar('-');
                    334:                        break;
                    335:                default:
1.5       kristaps  336:                        putchar((unsigned char)*s);
1.1       schwarze  337:                        break;
                    338:                }
                    339:        }
1.4       kristaps  340: }
                    341:
1.11      schwarze  342: static void
1.20      schwarze  343: print_offs(const char *v)
1.11      schwarze  344: {
                    345:        char              buf[24];
                    346:        struct roffsu     su;
                    347:        size_t            sz;
                    348:
                    349:        if (NULL == v || '\0' == *v || 0 == strcmp(v, "left"))
                    350:                sz = 0;
                    351:        else if (0 == strcmp(v, "indent"))
                    352:                sz = 6;
                    353:        else if (0 == strcmp(v, "indent-two"))
                    354:                sz = 12;
                    355:        else if (a2roffsu(v, &su, SCALE_MAX)) {
1.20      schwarze  356:                print_word(v);
1.11      schwarze  357:                return;
                    358:        } else
                    359:                sz = strlen(v);
                    360:
                    361:        snprintf(buf, sizeof(buf), "%ldn", sz);
1.20      schwarze  362:        print_word(buf);
1.11      schwarze  363: }
                    364:
1.4       kristaps  365: void
1.31      schwarze  366: print_width(const char *v, const struct mdoc_node *child)
1.30      schwarze  367: {
                    368:        char              buf[24];
                    369:        struct roffsu     su;
1.31      schwarze  370:        size_t            sz, chsz;
                    371:
                    372:        /* XXX Rough estimation, might have multiple parts. */
                    373:        chsz = (NULL != child && MDOC_TEXT == child->type) ?
                    374:                        strlen(child->string) : 0;
1.30      schwarze  375:
                    376:        if (a2roffsu(v, &su, SCALE_MAX)) {
                    377:                if (SCALE_EN == su.unit)
                    378:                        sz = su.scale;
                    379:                else {
1.31      schwarze  380:                        if (chsz)
                    381:                                print_word(".HP");
                    382:                        else
                    383:                                print_word(".TP");
1.30      schwarze  384:                        print_word(v);
                    385:                        return;
                    386:                }
                    387:        } else
                    388:                sz = strlen(v);
                    389:
1.31      schwarze  390:        if (chsz > sz)
                    391:                print_word(".HP");
                    392:        else
                    393:                print_word(".TP");
1.30      schwarze  394:        snprintf(buf, sizeof(buf), "%ldn", sz + 2);
                    395:        print_word(buf);
                    396: }
                    397:
                    398: void
                    399: print_count(int *count)
                    400: {
                    401:        char              buf[12];
                    402:
                    403:        snprintf(buf, sizeof(buf), "%d.", ++*count);
                    404:        print_word(buf);
                    405: }
                    406:
                    407: void
1.4       kristaps  408: man_man(void *arg, const struct man *man)
                    409: {
                    410:
1.5       kristaps  411:        /*
                    412:         * Dump the keep buffer.
                    413:         * We're guaranteed by now that this exists (is non-NULL).
                    414:         * Flush stdout afterward, just in case.
                    415:         */
1.4       kristaps  416:        fputs(mparse_getkeep(man_mparse(man)), stdout);
1.5       kristaps  417:        fflush(stdout);
1.1       schwarze  418: }
                    419:
                    420: void
                    421: man_mdoc(void *arg, const struct mdoc *mdoc)
                    422: {
                    423:        const struct mdoc_meta *m;
                    424:        const struct mdoc_node *n;
                    425:
                    426:        m = mdoc_meta(mdoc);
                    427:        n = mdoc_node(mdoc);
                    428:
1.3       schwarze  429:        printf(".TH \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"",
1.5       kristaps  430:                        m->title, m->msec, m->date, m->os, m->vol);
1.1       schwarze  431:
1.20      schwarze  432:        outflags = MMAN_nl | MMAN_Sm;
1.26      schwarze  433:        if (0 == fontqueue.size) {
                    434:                fontqueue.size = 8;
                    435:                fontqueue.head = fontqueue.tail = mandoc_malloc(8);
                    436:                *fontqueue.tail = 'R';
                    437:        }
1.20      schwarze  438:        print_node(m, n);
1.3       schwarze  439:        putchar('\n');
1.1       schwarze  440: }
                    441:
                    442: static void
                    443: print_node(DECL_ARGS)
                    444: {
                    445:        const struct mdoc_node  *prev, *sub;
1.5       kristaps  446:        const struct manact     *act;
1.1       schwarze  447:        int                      cond, do_sub;
1.5       kristaps  448:
                    449:        /*
                    450:         * Break the line if we were parsed subsequent the current node.
                    451:         * This makes the page structure be more consistent.
                    452:         */
1.1       schwarze  453:        prev = n->prev ? n->prev : n->parent;
1.27      schwarze  454:        if (MMAN_spc & outflags && prev && prev->line < n->line)
1.20      schwarze  455:                outflags |= MMAN_nl;
1.1       schwarze  456:
1.5       kristaps  457:        act = NULL;
1.1       schwarze  458:        cond = 0;
                    459:        do_sub = 1;
1.5       kristaps  460:
1.1       schwarze  461:        if (MDOC_TEXT == n->type) {
1.5       kristaps  462:                /*
                    463:                 * Make sure that we don't happen to start with a
                    464:                 * control character at the start of a line.
                    465:                 */
1.20      schwarze  466:                if (MMAN_nl & outflags && ('.' == *n->string ||
1.5       kristaps  467:                                        '\'' == *n->string)) {
1.20      schwarze  468:                        print_word("\\&");
                    469:                        outflags &= ~MMAN_spc;
1.3       schwarze  470:                }
1.20      schwarze  471:                print_word(n->string);
1.1       schwarze  472:        } else {
1.5       kristaps  473:                /*
                    474:                 * Conditionally run the pre-node action handler for a
                    475:                 * node.
                    476:                 */
1.1       schwarze  477:                act = manacts + n->tok;
1.20      schwarze  478:                cond = NULL == act->cond || (*act->cond)(m, n);
1.1       schwarze  479:                if (cond && act->pre)
1.20      schwarze  480:                        do_sub = (*act->pre)(m, n);
1.1       schwarze  481:        }
                    482:
1.5       kristaps  483:        /*
                    484:         * Conditionally run all child nodes.
                    485:         * Note that this iterates over children instead of using
                    486:         * recursion.  This prevents unnecessary depth in the stack.
                    487:         */
1.1       schwarze  488:        if (do_sub)
                    489:                for (sub = n->child; sub; sub = sub->next)
1.20      schwarze  490:                        print_node(m, sub);
1.1       schwarze  491:
1.5       kristaps  492:        /*
                    493:         * Lastly, conditionally run the post-node handler.
                    494:         */
1.1       schwarze  495:        if (cond && act->post)
1.20      schwarze  496:                (*act->post)(m, n);
1.1       schwarze  497: }
                    498:
                    499: static int
                    500: cond_head(DECL_ARGS)
                    501: {
1.5       kristaps  502:
1.1       schwarze  503:        return(MDOC_HEAD == n->type);
                    504: }
                    505:
                    506: static int
                    507: cond_body(DECL_ARGS)
                    508: {
1.5       kristaps  509:
1.1       schwarze  510:        return(MDOC_BODY == n->type);
                    511: }
                    512:
                    513: static int
                    514: pre_enc(DECL_ARGS)
                    515: {
1.5       kristaps  516:        const char      *prefix;
1.1       schwarze  517:
                    518:        prefix = manacts[n->tok].prefix;
                    519:        if (NULL == prefix)
                    520:                return(1);
1.20      schwarze  521:        print_word(prefix);
                    522:        outflags &= ~MMAN_spc;
1.1       schwarze  523:        return(1);
                    524: }
                    525:
                    526: static void
                    527: post_enc(DECL_ARGS)
                    528: {
                    529:        const char *suffix;
                    530:
                    531:        suffix = manacts[n->tok].suffix;
                    532:        if (NULL == suffix)
                    533:                return;
1.20      schwarze  534:        outflags &= ~MMAN_spc;
                    535:        print_word(suffix);
1.26      schwarze  536: }
                    537:
                    538: static void
                    539: post_font(DECL_ARGS)
                    540: {
                    541:
                    542:        font_pop();
1.1       schwarze  543: }
                    544:
                    545: static void
                    546: post_percent(DECL_ARGS)
                    547: {
                    548:
1.34    ! schwarze  549:        if (pre_em == manacts[n->tok].pre)
        !           550:                font_pop();
        !           551:        if (n->next) {
1.20      schwarze  552:                print_word(",");
1.34    ! schwarze  553:                if (n->prev &&  n->prev->tok == n->tok &&
        !           554:                                n->next->tok == n->tok)
        !           555:                        print_word("and");
        !           556:        } else {
1.20      schwarze  557:                print_word(".");
                    558:                outflags |= MMAN_nl;
1.1       schwarze  559:        }
                    560: }
                    561:
1.34    ! schwarze  562: static int
        !           563: pre__t(DECL_ARGS)
        !           564: {
        !           565:
        !           566:         if (n->parent && MDOC_Rs == n->parent->tok &&
        !           567:                         n->parent->norm->Rs.quote_T) {
        !           568:                print_word("\"");
        !           569:                outflags &= ~MMAN_spc;
        !           570:        } else
        !           571:                font_push('I');
        !           572:        return(1);
        !           573: }
        !           574:
        !           575: static void
        !           576: post__t(DECL_ARGS)
        !           577: {
        !           578:
        !           579:         if (n->parent && MDOC_Rs == n->parent->tok &&
        !           580:                         n->parent->norm->Rs.quote_T) {
        !           581:                outflags &= ~MMAN_spc;
        !           582:                print_word("\"");
        !           583:        } else
        !           584:                font_pop();
        !           585:        post_percent(m, n);
        !           586: }
        !           587:
1.5       kristaps  588: /*
                    589:  * Print before a section header.
                    590:  */
1.1       schwarze  591: static int
1.3       schwarze  592: pre_sect(DECL_ARGS)
                    593: {
                    594:
                    595:        if (MDOC_HEAD != n->type)
                    596:                return(1);
1.20      schwarze  597:        outflags |= MMAN_nl;
                    598:        print_word(manacts[n->tok].prefix);
                    599:        print_word("\"");
                    600:        outflags &= ~MMAN_spc;
1.3       schwarze  601:        return(1);
                    602: }
                    603:
1.5       kristaps  604: /*
                    605:  * Print subsequent a section header.
                    606:  */
1.3       schwarze  607: static void
                    608: post_sect(DECL_ARGS)
                    609: {
                    610:
                    611:        if (MDOC_HEAD != n->type)
                    612:                return;
1.20      schwarze  613:        outflags &= ~MMAN_spc;
                    614:        print_word("\"");
                    615:        outflags |= MMAN_nl;
1.22      schwarze  616:        if (MDOC_Sh == n->tok && SEC_AUTHORS == n->sec)
                    617:                outflags &= ~(MMAN_An_split | MMAN_An_nosplit);
                    618: }
                    619:
1.23      schwarze  620: /* See mdoc_term.c, synopsis_pre() for comments. */
                    621: static void
                    622: pre_syn(const struct mdoc_node *n)
                    623: {
                    624:
                    625:        if (NULL == n->prev || ! (MDOC_SYNPRETTY & n->flags))
                    626:                return;
                    627:
                    628:        if (n->prev->tok == n->tok &&
                    629:                        MDOC_Ft != n->tok &&
                    630:                        MDOC_Fo != n->tok &&
                    631:                        MDOC_Fn != n->tok) {
                    632:                outflags |= MMAN_br;
                    633:                return;
                    634:        }
                    635:
                    636:        switch (n->prev->tok) {
                    637:        case (MDOC_Fd):
                    638:                /* FALLTHROUGH */
                    639:        case (MDOC_Fn):
                    640:                /* FALLTHROUGH */
                    641:        case (MDOC_Fo):
                    642:                /* FALLTHROUGH */
                    643:        case (MDOC_In):
                    644:                /* FALLTHROUGH */
                    645:        case (MDOC_Vt):
                    646:                outflags |= MMAN_sp;
                    647:                break;
                    648:        case (MDOC_Ft):
                    649:                if (MDOC_Fn != n->tok && MDOC_Fo != n->tok) {
                    650:                        outflags |= MMAN_sp;
                    651:                        break;
                    652:                }
                    653:                /* FALLTHROUGH */
                    654:        default:
                    655:                outflags |= MMAN_br;
                    656:                break;
                    657:        }
                    658: }
                    659:
1.22      schwarze  660: static int
                    661: pre_an(DECL_ARGS)
                    662: {
                    663:
                    664:        switch (n->norm->An.auth) {
                    665:        case (AUTH_split):
                    666:                outflags &= ~MMAN_An_nosplit;
                    667:                outflags |= MMAN_An_split;
                    668:                return(0);
                    669:        case (AUTH_nosplit):
                    670:                outflags &= ~MMAN_An_split;
                    671:                outflags |= MMAN_An_nosplit;
                    672:                return(0);
                    673:        default:
                    674:                if (MMAN_An_split & outflags)
                    675:                        outflags |= MMAN_br;
                    676:                else if (SEC_AUTHORS == n->sec &&
                    677:                    ! (MMAN_An_nosplit & outflags))
                    678:                        outflags |= MMAN_An_split;
                    679:                return(1);
                    680:        }
1.3       schwarze  681: }
                    682:
                    683: static int
                    684: pre_ap(DECL_ARGS)
                    685: {
                    686:
1.20      schwarze  687:        outflags &= ~MMAN_spc;
                    688:        print_word("'");
                    689:        outflags &= ~MMAN_spc;
1.3       schwarze  690:        return(0);
                    691: }
                    692:
                    693: static int
                    694: pre_bd(DECL_ARGS)
                    695: {
                    696:
1.21      schwarze  697:        if (0 == n->norm->Bd.comp)
                    698:                outflags |= MMAN_sp;
1.3       schwarze  699:        if (DISP_unfilled == n->norm->Bd.type ||
                    700:            DISP_literal  == n->norm->Bd.type) {
1.20      schwarze  701:                outflags |= MMAN_nl;
                    702:                print_word(".nf");
1.3       schwarze  703:        }
1.20      schwarze  704:        outflags |= MMAN_nl;
                    705:        print_word(".RS");
                    706:        print_offs(n->norm->Bd.offs);
                    707:        outflags |= MMAN_nl;
1.3       schwarze  708:        return(1);
                    709: }
                    710:
                    711: static void
                    712: post_bd(DECL_ARGS)
                    713: {
                    714:
1.20      schwarze  715:        outflags |= MMAN_nl;
                    716:        print_word(".RE");
1.3       schwarze  717:        if (DISP_unfilled == n->norm->Bd.type ||
                    718:            DISP_literal  == n->norm->Bd.type) {
1.20      schwarze  719:                outflags |= MMAN_nl;
                    720:                print_word(".fi");
1.3       schwarze  721:        }
1.20      schwarze  722:        outflags |= MMAN_nl;
1.13      schwarze  723: }
                    724:
                    725: static int
1.27      schwarze  726: pre_bf(DECL_ARGS)
                    727: {
                    728:
                    729:        switch (n->type) {
                    730:        case (MDOC_BLOCK):
                    731:                return(1);
                    732:        case (MDOC_BODY):
                    733:                break;
                    734:        default:
                    735:                return(0);
                    736:        }
                    737:        switch (n->norm->Bf.font) {
                    738:        case (FONT_Em):
                    739:                font_push('I');
                    740:                break;
                    741:        case (FONT_Sy):
                    742:                font_push('B');
                    743:                break;
                    744:        default:
                    745:                font_push('R');
                    746:                break;
                    747:        }
                    748:        return(1);
                    749: }
                    750:
                    751: static void
                    752: post_bf(DECL_ARGS)
                    753: {
                    754:
                    755:        if (MDOC_BODY == n->type)
                    756:                font_pop();
                    757: }
                    758:
                    759: static int
1.13      schwarze  760: pre_bk(DECL_ARGS)
                    761: {
                    762:
                    763:        switch (n->type) {
                    764:        case (MDOC_BLOCK):
                    765:                return(1);
                    766:        case (MDOC_BODY):
1.20      schwarze  767:                outflags |= MMAN_Bk;
1.13      schwarze  768:                return(1);
                    769:        default:
                    770:                return(0);
                    771:        }
                    772: }
                    773:
                    774: static void
                    775: post_bk(DECL_ARGS)
                    776: {
                    777:
                    778:        if (MDOC_BODY == n->type)
1.20      schwarze  779:                outflags &= ~MMAN_Bk;
1.3       schwarze  780: }
                    781:
                    782: static int
1.30      schwarze  783: pre_bl(DECL_ARGS)
                    784: {
1.33      schwarze  785:        size_t           icol;
1.30      schwarze  786:
1.33      schwarze  787:        switch (n->norm->Bl.type) {
                    788:        case (LIST_enum):
1.30      schwarze  789:                n->norm->Bl.count = 0;
1.33      schwarze  790:                return(1);
                    791:        case (LIST_column):
                    792:                break;
                    793:        default:
                    794:                return(1);
                    795:        }
                    796:
                    797:        outflags |= MMAN_nl;
                    798:        print_word(".TS");
                    799:        outflags |= MMAN_nl;
                    800:        for (icol = 0; icol < n->norm->Bl.ncols; icol++)
                    801:                print_word("l");
                    802:        print_word(".");
1.30      schwarze  803:        return(1);
                    804: }
                    805:
                    806: static void
                    807: post_bl(DECL_ARGS)
                    808: {
                    809:
1.33      schwarze  810:        switch (n->norm->Bl.type) {
                    811:        case (LIST_enum):
                    812:                n->norm->Bl.count = 0;
                    813:                break;
                    814:        case (LIST_column):
                    815:                outflags |= MMAN_nl;
                    816:                print_word(".TE");
                    817:                break;
                    818:        default:
                    819:                break;
                    820:        }
1.32      schwarze  821:        outflags |= MMAN_br;
1.30      schwarze  822: }
                    823:
                    824: static int
1.3       schwarze  825: pre_br(DECL_ARGS)
                    826: {
                    827:
1.21      schwarze  828:        outflags |= MMAN_br;
1.3       schwarze  829:        return(0);
                    830: }
                    831:
                    832: static int
1.8       schwarze  833: pre_bx(DECL_ARGS)
                    834: {
                    835:
                    836:        n = n->child;
                    837:        if (n) {
1.20      schwarze  838:                print_word(n->string);
                    839:                outflags &= ~MMAN_spc;
1.8       schwarze  840:                n = n->next;
                    841:        }
1.20      schwarze  842:        print_word("BSD");
1.8       schwarze  843:        if (NULL == n)
                    844:                return(0);
1.20      schwarze  845:        outflags &= ~MMAN_spc;
                    846:        print_word("-");
                    847:        outflags &= ~MMAN_spc;
                    848:        print_word(n->string);
1.8       schwarze  849:        return(0);
                    850: }
                    851:
                    852: static int
1.1       schwarze  853: pre_dl(DECL_ARGS)
                    854: {
                    855:
1.20      schwarze  856:        outflags |= MMAN_nl;
                    857:        print_word(".RS 6n");
                    858:        outflags |= MMAN_nl;
1.1       schwarze  859:        return(1);
                    860: }
                    861:
                    862: static void
                    863: post_dl(DECL_ARGS)
                    864: {
                    865:
1.20      schwarze  866:        outflags |= MMAN_nl;
                    867:        print_word(".RE");
                    868:        outflags |= MMAN_nl;
1.16      schwarze  869: }
                    870:
                    871: static int
1.26      schwarze  872: pre_em(DECL_ARGS)
                    873: {
                    874:
                    875:        font_push('I');
                    876:        return(1);
1.28      schwarze  877: }
                    878:
                    879: static void
                    880: post_eo(DECL_ARGS)
                    881: {
                    882:
                    883:        if (MDOC_HEAD == n->type || MDOC_BODY == n->type)
                    884:                outflags &= ~MMAN_spc;
1.26      schwarze  885: }
                    886:
                    887: static int
1.17      schwarze  888: pre_fa(DECL_ARGS)
                    889: {
                    890:
                    891:        if (MDOC_Fa == n->tok)
                    892:                n = n->child;
                    893:
                    894:        while (NULL != n) {
1.26      schwarze  895:                font_push('I');
1.20      schwarze  896:                print_node(m, n);
1.26      schwarze  897:                font_pop();
1.17      schwarze  898:                if (NULL != (n = n->next))
1.20      schwarze  899:                        print_word(",");
1.17      schwarze  900:        }
                    901:        return(0);
                    902: }
                    903:
                    904: static void
                    905: post_fa(DECL_ARGS)
                    906: {
                    907:
                    908:        if (NULL != n->next && MDOC_Fa == n->next->tok)
1.20      schwarze  909:                print_word(",");
1.29      schwarze  910: }
                    911:
                    912: static int
                    913: pre_fd(DECL_ARGS)
                    914: {
                    915:
                    916:        pre_syn(n);
                    917:        font_push('B');
                    918:        return(1);
                    919: }
                    920:
                    921: static void
                    922: post_fd(DECL_ARGS)
                    923: {
                    924:
                    925:        font_pop();
                    926:        outflags |= MMAN_br;
1.17      schwarze  927: }
                    928:
                    929: static int
1.26      schwarze  930: pre_fl(DECL_ARGS)
                    931: {
                    932:
                    933:        font_push('B');
                    934:        print_word("-");
                    935:        outflags &= ~MMAN_spc;
                    936:        return(1);
                    937: }
                    938:
                    939: static void
                    940: post_fl(DECL_ARGS)
                    941: {
                    942:
                    943:        font_pop();
1.27      schwarze  944:        if (0 == n->nchild && NULL != n->next &&
                    945:                        n->next->line == n->line)
1.26      schwarze  946:                outflags &= ~MMAN_spc;
                    947: }
                    948:
                    949: static int
1.16      schwarze  950: pre_fn(DECL_ARGS)
                    951: {
                    952:
1.23      schwarze  953:        pre_syn(n);
                    954:
1.16      schwarze  955:        n = n->child;
                    956:        if (NULL == n)
                    957:                return(0);
                    958:
1.26      schwarze  959:        font_push('B');
1.20      schwarze  960:        print_node(m, n);
1.26      schwarze  961:        font_pop();
1.20      schwarze  962:        outflags &= ~MMAN_spc;
1.26      schwarze  963:        print_word("(");
1.20      schwarze  964:        outflags &= ~MMAN_spc;
                    965:        return(pre_fa(m, n->next));
1.16      schwarze  966: }
                    967:
                    968: static void
                    969: post_fn(DECL_ARGS)
                    970: {
                    971:
1.20      schwarze  972:        print_word(")");
1.16      schwarze  973:        if (MDOC_SYNPRETTY & n->flags) {
1.20      schwarze  974:                print_word(";");
1.21      schwarze  975:                outflags |= MMAN_br;
1.17      schwarze  976:        }
                    977: }
                    978:
                    979: static int
                    980: pre_fo(DECL_ARGS)
                    981: {
                    982:
                    983:        switch (n->type) {
1.23      schwarze  984:        case (MDOC_BLOCK):
                    985:                pre_syn(n);
                    986:                break;
1.17      schwarze  987:        case (MDOC_HEAD):
1.26      schwarze  988:                font_push('B');
1.17      schwarze  989:                break;
                    990:        case (MDOC_BODY):
1.20      schwarze  991:                outflags &= ~MMAN_spc;
                    992:                print_word("(");
                    993:                outflags &= ~MMAN_spc;
1.17      schwarze  994:                break;
                    995:        default:
                    996:                break;
                    997:        }
                    998:        return(1);
                    999: }
                   1000:
                   1001: static void
                   1002: post_fo(DECL_ARGS)
                   1003: {
                   1004:
                   1005:        switch (n->type) {
                   1006:        case (MDOC_HEAD):
1.26      schwarze 1007:                font_pop();
1.17      schwarze 1008:                break;
                   1009:        case (MDOC_BODY):
1.20      schwarze 1010:                post_fn(m, n);
1.17      schwarze 1011:                break;
                   1012:        default:
                   1013:                break;
1.16      schwarze 1014:        }
1.15      schwarze 1015: }
                   1016:
                   1017: static int
1.23      schwarze 1018: pre_ft(DECL_ARGS)
                   1019: {
                   1020:
                   1021:        pre_syn(n);
1.26      schwarze 1022:        font_push('I');
1.23      schwarze 1023:        return(1);
                   1024: }
                   1025:
                   1026: static int
1.15      schwarze 1027: pre_in(DECL_ARGS)
                   1028: {
                   1029:
                   1030:        if (MDOC_SYNPRETTY & n->flags) {
1.23      schwarze 1031:                pre_syn(n);
1.26      schwarze 1032:                font_push('B');
                   1033:                print_word("#include <");
                   1034:                outflags &= ~MMAN_spc;
                   1035:        } else {
                   1036:                print_word("<");
                   1037:                outflags &= ~MMAN_spc;
                   1038:                font_push('I');
                   1039:        }
1.15      schwarze 1040:        return(1);
                   1041: }
                   1042:
                   1043: static void
                   1044: post_in(DECL_ARGS)
                   1045: {
                   1046:
                   1047:        if (MDOC_SYNPRETTY & n->flags) {
1.26      schwarze 1048:                outflags &= ~MMAN_spc;
                   1049:                print_word(">");
                   1050:                font_pop();
1.21      schwarze 1051:                outflags |= MMAN_br;
1.26      schwarze 1052:        } else {
                   1053:                font_pop();
                   1054:                outflags &= ~MMAN_spc;
                   1055:                print_word(">");
                   1056:        }
1.1       schwarze 1057: }
                   1058:
                   1059: static int
                   1060: pre_it(DECL_ARGS)
                   1061: {
                   1062:        const struct mdoc_node *bln;
                   1063:
1.30      schwarze 1064:        switch (n->type) {
                   1065:        case (MDOC_HEAD):
1.20      schwarze 1066:                outflags |= MMAN_nl;
1.30      schwarze 1067:                bln = n->parent->parent;
1.3       schwarze 1068:                switch (bln->norm->Bl.type) {
1.30      schwarze 1069:                case (LIST_item):
                   1070:                        if (bln->norm->Bl.comp)
                   1071:                                outflags |= MMAN_br;
                   1072:                        else
                   1073:                                outflags |= MMAN_sp;
                   1074:                        return(0);
                   1075:                case (LIST_inset):
                   1076:                        /* FALLTHROUGH */
                   1077:                case (LIST_diag):
                   1078:                        /* FALLTHROUGH */
                   1079:                case (LIST_ohang):
                   1080:                        if (bln->norm->Bl.comp)
                   1081:                                outflags |= MMAN_br;
                   1082:                        else
                   1083:                                outflags |= MMAN_sp;
                   1084:                        if (bln->norm->Bl.type == LIST_diag)
                   1085:                                print_word(".B \"");
                   1086:                        else
                   1087:                                print_word(".R \"");
                   1088:                        outflags &= ~MMAN_spc;
                   1089:                        return(1);
1.3       schwarze 1090:                case (LIST_bullet):
1.30      schwarze 1091:                        /* FALLTHROUGH */
                   1092:                case (LIST_dash):
                   1093:                        /* FALLTHROUGH */
                   1094:                case (LIST_hyphen):
1.31      schwarze 1095:                        print_width(bln->norm->Bl.width, NULL);
1.30      schwarze 1096:                        outflags |= MMAN_nl;
                   1097:                        font_push('B');
                   1098:                        if (LIST_bullet == bln->norm->Bl.type)
                   1099:                                print_word("o");
                   1100:                        else
                   1101:                                print_word("-");
                   1102:                        font_pop();
                   1103:                        break;
                   1104:                case (LIST_enum):
1.31      schwarze 1105:                        print_width(bln->norm->Bl.width, NULL);
1.30      schwarze 1106:                        outflags |= MMAN_nl;
                   1107:                        print_count(&bln->norm->Bl.count);
1.3       schwarze 1108:                        break;
1.31      schwarze 1109:                case (LIST_hang):
                   1110:                        print_width(bln->norm->Bl.width, n->child);
1.32      schwarze 1111:                        break;
                   1112:                case (LIST_tag):
                   1113:                        print_width(bln->norm->Bl.width, NULL);
1.31      schwarze 1114:                        break;
1.3       schwarze 1115:                default:
1.32      schwarze 1116:                        return(1);
1.3       schwarze 1117:                }
1.20      schwarze 1118:                outflags |= MMAN_nl;
1.30      schwarze 1119:        default:
                   1120:                break;
1.1       schwarze 1121:        }
                   1122:        return(1);
1.30      schwarze 1123: }
                   1124:
                   1125: static void
                   1126: post_it(DECL_ARGS)
                   1127: {
                   1128:        const struct mdoc_node *bln;
                   1129:
1.33      schwarze 1130:        bln = n->parent->parent;
                   1131:
                   1132:        switch (n->type) {
                   1133:        case (MDOC_HEAD):
1.30      schwarze 1134:                switch (bln->norm->Bl.type) {
                   1135:                case (LIST_diag):
                   1136:                        outflags &= ~MMAN_spc;
                   1137:                        print_word("\\ ");
                   1138:                        break;
                   1139:                case (LIST_ohang):
                   1140:                        outflags |= MMAN_br;
                   1141:                        break;
                   1142:                default:
                   1143:                        break;
                   1144:                }
1.33      schwarze 1145:                break;
                   1146:        case (MDOC_BODY):
                   1147:                if (LIST_column == bln->norm->Bl.type &&
                   1148:                    NULL != n->next) {
                   1149:                        putchar('\t');
                   1150:                        outflags &= ~MMAN_spc;
                   1151:                }
                   1152:                break;
                   1153:        default:
                   1154:                break;
1.30      schwarze 1155:        }
1.14      schwarze 1156: }
                   1157:
                   1158: static void
                   1159: post_lb(DECL_ARGS)
                   1160: {
                   1161:
1.21      schwarze 1162:        if (SEC_LIBRARY == n->sec)
                   1163:                outflags |= MMAN_br;
1.24      schwarze 1164: }
                   1165:
                   1166: static int
                   1167: pre_lk(DECL_ARGS)
                   1168: {
                   1169:        const struct mdoc_node *link, *descr;
                   1170:
                   1171:        if (NULL == (link = n->child))
                   1172:                return(0);
                   1173:
                   1174:        if (NULL != (descr = link->next)) {
1.26      schwarze 1175:                font_push('I');
1.24      schwarze 1176:                while (NULL != descr) {
                   1177:                        print_word(descr->string);
                   1178:                        descr = descr->next;
                   1179:                }
                   1180:                print_word(":");
1.26      schwarze 1181:                font_pop();
1.24      schwarze 1182:        }
                   1183:
1.26      schwarze 1184:        font_push('B');
1.24      schwarze 1185:        print_word(link->string);
1.26      schwarze 1186:        font_pop();
1.24      schwarze 1187:        return(0);
1.1       schwarze 1188: }
                   1189:
                   1190: static int
1.26      schwarze 1191: pre_li(DECL_ARGS)
                   1192: {
                   1193:
                   1194:        font_push('R');
                   1195:        return(1);
                   1196: }
                   1197:
                   1198: static int
1.1       schwarze 1199: pre_nm(DECL_ARGS)
                   1200: {
                   1201:
1.23      schwarze 1202:        if (MDOC_BLOCK == n->type)
                   1203:                pre_syn(n);
1.1       schwarze 1204:        if (MDOC_ELEM != n->type && MDOC_HEAD != n->type)
                   1205:                return(1);
1.23      schwarze 1206:        if (NULL == n->child && NULL == m->name)
                   1207:                return(0);
1.26      schwarze 1208:        font_push('B');
1.1       schwarze 1209:        if (NULL == n->child)
1.20      schwarze 1210:                print_word(m->name);
1.1       schwarze 1211:        return(1);
                   1212: }
                   1213:
                   1214: static void
                   1215: post_nm(DECL_ARGS)
                   1216: {
                   1217:
                   1218:        if (MDOC_ELEM != n->type && MDOC_HEAD != n->type)
                   1219:                return;
1.26      schwarze 1220:        font_pop();
1.25      schwarze 1221: }
                   1222:
                   1223: static int
                   1224: pre_no(DECL_ARGS)
                   1225: {
                   1226:
                   1227:        outflags |= MMAN_spc_force;
                   1228:        return(1);
1.1       schwarze 1229: }
                   1230:
                   1231: static int
                   1232: pre_ns(DECL_ARGS)
                   1233: {
                   1234:
1.20      schwarze 1235:        outflags &= ~MMAN_spc;
1.1       schwarze 1236:        return(0);
                   1237: }
                   1238:
1.3       schwarze 1239: static void
                   1240: post_pf(DECL_ARGS)
                   1241: {
                   1242:
1.20      schwarze 1243:        outflags &= ~MMAN_spc;
1.3       schwarze 1244: }
                   1245:
1.1       schwarze 1246: static int
                   1247: pre_pp(DECL_ARGS)
                   1248: {
                   1249:
1.20      schwarze 1250:        outflags |= MMAN_nl;
1.1       schwarze 1251:        if (MDOC_It == n->parent->tok)
1.20      schwarze 1252:                print_word(".sp");
1.1       schwarze 1253:        else
1.20      schwarze 1254:                print_word(".PP");
                   1255:        outflags |= MMAN_nl;
1.34    ! schwarze 1256:        return(0);
        !          1257: }
        !          1258:
        !          1259: static int
        !          1260: pre_rs(DECL_ARGS)
        !          1261: {
        !          1262:
        !          1263:        if (SEC_SEE_ALSO == n->sec) {
        !          1264:                outflags |= MMAN_nl;
        !          1265:                print_word(".PP");
        !          1266:                outflags |= MMAN_nl;
        !          1267:        }
        !          1268:        return(1);
1.12      schwarze 1269: }
                   1270:
                   1271: static int
                   1272: pre_sm(DECL_ARGS)
                   1273: {
                   1274:
                   1275:        assert(n->child && MDOC_TEXT == n->child->type);
                   1276:        if (0 == strcmp("on", n->child->string))
1.27      schwarze 1277:                outflags |= MMAN_Sm | MMAN_spc;
1.12      schwarze 1278:        else
1.20      schwarze 1279:                outflags &= ~MMAN_Sm;
1.12      schwarze 1280:        return(0);
1.1       schwarze 1281: }
                   1282:
                   1283: static int
1.3       schwarze 1284: pre_sp(DECL_ARGS)
1.1       schwarze 1285: {
                   1286:
1.20      schwarze 1287:        outflags |= MMAN_nl;
                   1288:        print_word(".sp");
1.1       schwarze 1289:        return(1);
                   1290: }
                   1291:
                   1292: static void
1.3       schwarze 1293: post_sp(DECL_ARGS)
1.1       schwarze 1294: {
                   1295:
1.20      schwarze 1296:        outflags |= MMAN_nl;
1.18      schwarze 1297: }
                   1298:
                   1299: static int
1.26      schwarze 1300: pre_sy(DECL_ARGS)
                   1301: {
                   1302:
                   1303:        font_push('B');
                   1304:        return(1);
                   1305: }
                   1306:
                   1307: static int
1.18      schwarze 1308: pre_vt(DECL_ARGS)
                   1309: {
                   1310:
                   1311:        if (MDOC_SYNPRETTY & n->flags) {
                   1312:                switch (n->type) {
                   1313:                case (MDOC_BLOCK):
1.23      schwarze 1314:                        pre_syn(n);
1.18      schwarze 1315:                        return(1);
                   1316:                case (MDOC_BODY):
                   1317:                        break;
                   1318:                default:
                   1319:                        return(0);
                   1320:                }
                   1321:        }
1.26      schwarze 1322:        font_push('I');
1.18      schwarze 1323:        return(1);
                   1324: }
                   1325:
                   1326: static void
                   1327: post_vt(DECL_ARGS)
                   1328: {
                   1329:
1.19      schwarze 1330:        if (MDOC_SYNPRETTY & n->flags && MDOC_BODY != n->type)
1.18      schwarze 1331:                return;
1.26      schwarze 1332:        font_pop();
1.1       schwarze 1333: }
                   1334:
                   1335: static int
                   1336: pre_xr(DECL_ARGS)
                   1337: {
                   1338:
                   1339:        n = n->child;
                   1340:        if (NULL == n)
                   1341:                return(0);
1.20      schwarze 1342:        print_node(m, n);
1.1       schwarze 1343:        n = n->next;
                   1344:        if (NULL == n)
                   1345:                return(0);
1.20      schwarze 1346:        outflags &= ~MMAN_spc;
                   1347:        print_word("(");
                   1348:        print_node(m, n);
                   1349:        print_word(")");
1.1       schwarze 1350:        return(0);
1.8       schwarze 1351: }
                   1352:
                   1353: static int
                   1354: pre_ux(DECL_ARGS)
                   1355: {
                   1356:
1.20      schwarze 1357:        print_word(manacts[n->tok].prefix);
1.8       schwarze 1358:        if (NULL == n->child)
                   1359:                return(0);
1.20      schwarze 1360:        outflags &= ~MMAN_spc;
                   1361:        print_word("\\~");
                   1362:        outflags &= ~MMAN_spc;
1.8       schwarze 1363:        return(1);
1.1       schwarze 1364: }

CVSweb