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

Annotation of mandoc/mdoc_man.c, Revision 1.33

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

CVSweb