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

Annotation of src/usr.bin/mandoc/mdoc_man.c, Revision 1.88

1.88    ! schwarze    1: /*     $OpenBSD: mdoc_man.c,v 1.87 2015/04/02 21:03:18 schwarze Exp $ */
1.1       schwarze    2: /*
1.80      schwarze    3:  * Copyright (c) 2011-2015 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.69      schwarze   17: #include <sys/types.h>
                     18:
1.9       schwarze   19: #include <assert.h>
1.1       schwarze   20: #include <stdio.h>
                     21: #include <string.h>
                     22:
1.87      schwarze   23: #include "mandoc_aux.h"
1.1       schwarze   24: #include "mandoc.h"
1.87      schwarze   25: #include "roff.h"
                     26: #include "mdoc.h"
                     27: #include "man.h"
1.8       schwarze   28: #include "out.h"
1.1       schwarze   29: #include "main.h"
                     30:
1.88    ! schwarze   31: #define        DECL_ARGS const struct mdoc_meta *meta, struct roff_node *n
1.1       schwarze   32:
                     33: struct manact {
1.4       schwarze   34:        int             (*cond)(DECL_ARGS); /* DON'T run actions */
                     35:        int             (*pre)(DECL_ARGS); /* pre-node action */
                     36:        void            (*post)(DECL_ARGS); /* post-node action */
                     37:        const char       *prefix; /* pre-node string constant */
                     38:        const char       *suffix; /* post-node string constant */
1.1       schwarze   39: };
                     40:
1.4       schwarze   41: static int       cond_body(DECL_ARGS);
1.1       schwarze   42: static int       cond_head(DECL_ARGS);
1.24      schwarze   43: static  void     font_push(char);
                     44: static void      font_pop(void);
1.46      schwarze   45: static void      mid_it(void);
1.32      schwarze   46: static void      post__t(DECL_ARGS);
1.72      schwarze   47: static void      post_aq(DECL_ARGS);
1.4       schwarze   48: static void      post_bd(DECL_ARGS);
1.25      schwarze   49: static void      post_bf(DECL_ARGS);
1.10      schwarze   50: static void      post_bk(DECL_ARGS);
1.28      schwarze   51: static void      post_bl(DECL_ARGS);
1.4       schwarze   52: static void      post_dl(DECL_ARGS);
1.63      schwarze   53: static void      post_en(DECL_ARGS);
1.1       schwarze   54: static void      post_enc(DECL_ARGS);
1.26      schwarze   55: static void      post_eo(DECL_ARGS);
1.14      schwarze   56: static void      post_fa(DECL_ARGS);
1.27      schwarze   57: static void      post_fd(DECL_ARGS);
1.24      schwarze   58: static void      post_fl(DECL_ARGS);
1.13      schwarze   59: static void      post_fn(DECL_ARGS);
1.14      schwarze   60: static void      post_fo(DECL_ARGS);
1.24      schwarze   61: static void      post_font(DECL_ARGS);
1.12      schwarze   62: static void      post_in(DECL_ARGS);
1.28      schwarze   63: static void      post_it(DECL_ARGS);
1.11      schwarze   64: static void      post_lb(DECL_ARGS);
1.4       schwarze   65: static void      post_nm(DECL_ARGS);
1.1       schwarze   66: static void      post_percent(DECL_ARGS);
1.4       schwarze   67: static void      post_pf(DECL_ARGS);
1.3       schwarze   68: static void      post_sect(DECL_ARGS);
1.4       schwarze   69: static void      post_sp(DECL_ARGS);
1.15      schwarze   70: static void      post_vt(DECL_ARGS);
1.32      schwarze   71: static int       pre__t(DECL_ARGS);
1.20      schwarze   72: static int       pre_an(DECL_ARGS);
1.3       schwarze   73: static int       pre_ap(DECL_ARGS);
1.72      schwarze   74: static int       pre_aq(DECL_ARGS);
1.3       schwarze   75: static int       pre_bd(DECL_ARGS);
1.25      schwarze   76: static int       pre_bf(DECL_ARGS);
1.10      schwarze   77: static int       pre_bk(DECL_ARGS);
1.28      schwarze   78: static int       pre_bl(DECL_ARGS);
1.3       schwarze   79: static int       pre_br(DECL_ARGS);
1.5       schwarze   80: static int       pre_bx(DECL_ARGS);
1.1       schwarze   81: static int       pre_dl(DECL_ARGS);
1.63      schwarze   82: static int       pre_en(DECL_ARGS);
1.4       schwarze   83: static int       pre_enc(DECL_ARGS);
1.24      schwarze   84: static int       pre_em(DECL_ARGS);
1.73      schwarze   85: static int       pre_skip(DECL_ARGS);
1.74      schwarze   86: static int       pre_eo(DECL_ARGS);
1.66      schwarze   87: static int       pre_ex(DECL_ARGS);
1.14      schwarze   88: static int       pre_fa(DECL_ARGS);
1.27      schwarze   89: static int       pre_fd(DECL_ARGS);
1.24      schwarze   90: static int       pre_fl(DECL_ARGS);
1.13      schwarze   91: static int       pre_fn(DECL_ARGS);
1.14      schwarze   92: static int       pre_fo(DECL_ARGS);
1.21      schwarze   93: static int       pre_ft(DECL_ARGS);
1.12      schwarze   94: static int       pre_in(DECL_ARGS);
1.1       schwarze   95: static int       pre_it(DECL_ARGS);
1.22      schwarze   96: static int       pre_lk(DECL_ARGS);
1.24      schwarze   97: static int       pre_li(DECL_ARGS);
1.60      schwarze   98: static int       pre_ll(DECL_ARGS);
1.1       schwarze   99: static int       pre_nm(DECL_ARGS);
1.23      schwarze  100: static int       pre_no(DECL_ARGS);
1.1       schwarze  101: static int       pre_ns(DECL_ARGS);
                    102: static int       pre_pp(DECL_ARGS);
1.32      schwarze  103: static int       pre_rs(DECL_ARGS);
1.66      schwarze  104: static int       pre_rv(DECL_ARGS);
1.9       schwarze  105: static int       pre_sm(DECL_ARGS);
1.3       schwarze  106: static int       pre_sp(DECL_ARGS);
1.4       schwarze  107: static int       pre_sect(DECL_ARGS);
1.24      schwarze  108: static int       pre_sy(DECL_ARGS);
1.88    ! schwarze  109: static void      pre_syn(const struct roff_node *);
1.15      schwarze  110: static int       pre_vt(DECL_ARGS);
1.5       schwarze  111: static int       pre_ux(DECL_ARGS);
1.1       schwarze  112: static int       pre_xr(DECL_ARGS);
1.18      schwarze  113: static void      print_word(const char *);
1.34      schwarze  114: static void      print_line(const char *, int);
                    115: static void      print_block(const char *, int);
1.69      schwarze  116: static void      print_offs(const char *, int);
1.79      schwarze  117: static void      print_width(const struct mdoc_bl *,
1.88    ! schwarze  118:                        const struct roff_node *);
1.28      schwarze  119: static void      print_count(int *);
1.4       schwarze  120: static void      print_node(DECL_ARGS);
1.1       schwarze  121:
1.3       schwarze  122: static const struct manact manacts[MDOC_MAX + 1] = {
                    123:        { NULL, pre_ap, NULL, NULL, NULL }, /* Ap */
                    124:        { NULL, NULL, NULL, NULL, NULL }, /* Dd */
                    125:        { NULL, NULL, NULL, NULL, NULL }, /* Dt */
1.5       schwarze  126:        { NULL, NULL, NULL, NULL, NULL }, /* Os */
1.3       schwarze  127:        { NULL, pre_sect, post_sect, ".SH", NULL }, /* Sh */
                    128:        { NULL, pre_sect, post_sect, ".SS", NULL }, /* Ss */
1.1       schwarze  129:        { NULL, pre_pp, NULL, NULL, NULL }, /* Pp */
1.3       schwarze  130:        { cond_body, pre_dl, post_dl, NULL, NULL }, /* D1 */
1.1       schwarze  131:        { cond_body, pre_dl, post_dl, NULL, NULL }, /* Dl */
1.3       schwarze  132:        { cond_body, pre_bd, post_bd, NULL, NULL }, /* Bd */
                    133:        { NULL, NULL, NULL, NULL, NULL }, /* Ed */
1.28      schwarze  134:        { cond_body, pre_bl, post_bl, NULL, NULL }, /* Bl */
1.3       schwarze  135:        { NULL, NULL, NULL, NULL, NULL }, /* El */
1.28      schwarze  136:        { NULL, pre_it, post_it, NULL, NULL }, /* It */
1.24      schwarze  137:        { NULL, pre_em, post_font, NULL, NULL }, /* Ad */
1.20      schwarze  138:        { NULL, pre_an, NULL, NULL, NULL }, /* An */
1.24      schwarze  139:        { NULL, pre_em, post_font, NULL, NULL }, /* Ar */
                    140:        { NULL, pre_sy, post_font, NULL, NULL }, /* Cd */
                    141:        { NULL, pre_sy, post_font, NULL, NULL }, /* Cm */
                    142:        { NULL, pre_li, post_font, NULL, NULL }, /* Dv */
                    143:        { NULL, pre_li, post_font, NULL, NULL }, /* Er */
                    144:        { NULL, pre_li, post_font, NULL, NULL }, /* Ev */
1.66      schwarze  145:        { NULL, pre_ex, NULL, NULL, NULL }, /* Ex */
1.14      schwarze  146:        { NULL, pre_fa, post_fa, NULL, NULL }, /* Fa */
1.27      schwarze  147:        { NULL, pre_fd, post_fd, NULL, NULL }, /* Fd */
1.24      schwarze  148:        { NULL, pre_fl, post_fl, NULL, NULL }, /* Fl */
1.13      schwarze  149:        { NULL, pre_fn, post_fn, NULL, NULL }, /* Fn */
1.24      schwarze  150:        { NULL, pre_ft, post_font, NULL, NULL }, /* Ft */
                    151:        { NULL, pre_sy, post_font, NULL, NULL }, /* Ic */
1.12      schwarze  152:        { NULL, pre_in, post_in, NULL, NULL }, /* In */
1.24      schwarze  153:        { NULL, pre_li, post_font, NULL, NULL }, /* Li */
1.1       schwarze  154:        { cond_head, pre_enc, NULL, "\\- ", NULL }, /* Nd */
                    155:        { NULL, pre_nm, post_nm, NULL, NULL }, /* Nm */
                    156:        { cond_body, pre_enc, post_enc, "[", "]" }, /* Op */
1.63      schwarze  157:        { NULL, pre_ft, post_font, NULL, NULL }, /* Ot */
1.24      schwarze  158:        { NULL, pre_em, post_font, NULL, NULL }, /* Pa */
1.66      schwarze  159:        { NULL, pre_rv, NULL, NULL, NULL }, /* Rv */
1.5       schwarze  160:        { NULL, NULL, NULL, NULL, NULL }, /* St */
1.24      schwarze  161:        { NULL, pre_em, post_font, NULL, NULL }, /* Va */
1.15      schwarze  162:        { NULL, pre_vt, post_vt, NULL, NULL }, /* Vt */
1.5       schwarze  163:        { NULL, pre_xr, NULL, NULL, NULL }, /* Xr */
1.32      schwarze  164:        { NULL, NULL, post_percent, NULL, NULL }, /* %A */
                    165:        { NULL, pre_em, post_percent, NULL, NULL }, /* %B */
                    166:        { NULL, NULL, post_percent, NULL, NULL }, /* %D */
                    167:        { NULL, pre_em, post_percent, NULL, NULL }, /* %I */
                    168:        { NULL, pre_em, post_percent, NULL, NULL }, /* %J */
                    169:        { NULL, NULL, post_percent, NULL, NULL }, /* %N */
                    170:        { NULL, NULL, post_percent, NULL, NULL }, /* %O */
                    171:        { NULL, NULL, post_percent, NULL, NULL }, /* %P */
                    172:        { NULL, NULL, post_percent, NULL, NULL }, /* %R */
                    173:        { NULL, pre__t, post__t, NULL, NULL }, /* %T */
                    174:        { NULL, NULL, post_percent, NULL, NULL }, /* %V */
1.6       schwarze  175:        { NULL, NULL, NULL, NULL, NULL }, /* Ac */
1.72      schwarze  176:        { cond_body, pre_aq, post_aq, NULL, NULL }, /* Ao */
                    177:        { cond_body, pre_aq, post_aq, NULL, NULL }, /* Aq */
1.5       schwarze  178:        { NULL, NULL, NULL, NULL, NULL }, /* At */
1.3       schwarze  179:        { NULL, NULL, NULL, NULL, NULL }, /* Bc */
1.25      schwarze  180:        { NULL, pre_bf, post_bf, NULL, NULL }, /* Bf */
1.3       schwarze  181:        { cond_body, pre_enc, post_enc, "[", "]" }, /* Bo */
                    182:        { cond_body, pre_enc, post_enc, "[", "]" }, /* Bq */
1.5       schwarze  183:        { NULL, pre_ux, NULL, "BSD/OS", NULL }, /* Bsx */
                    184:        { NULL, pre_bx, NULL, NULL, NULL }, /* Bx */
1.73      schwarze  185:        { NULL, pre_skip, NULL, NULL, NULL }, /* Db */
1.6       schwarze  186:        { NULL, NULL, NULL, NULL, NULL }, /* Dc */
1.86      schwarze  187:        { cond_body, pre_enc, post_enc, "\\(Lq", "\\(Rq" }, /* Do */
                    188:        { cond_body, pre_enc, post_enc, "\\(Lq", "\\(Rq" }, /* Dq */
1.26      schwarze  189:        { NULL, NULL, NULL, NULL, NULL }, /* Ec */
                    190:        { NULL, NULL, NULL, NULL, NULL }, /* Ef */
1.24      schwarze  191:        { NULL, pre_em, post_font, NULL, NULL }, /* Em */
1.74      schwarze  192:        { cond_body, pre_eo, post_eo, NULL, NULL }, /* Eo */
1.5       schwarze  193:        { NULL, pre_ux, NULL, "FreeBSD", NULL }, /* Fx */
1.24      schwarze  194:        { NULL, pre_sy, post_font, NULL, NULL }, /* Ms */
1.23      schwarze  195:        { NULL, pre_no, NULL, NULL, NULL }, /* No */
1.1       schwarze  196:        { NULL, pre_ns, NULL, NULL, NULL }, /* Ns */
1.5       schwarze  197:        { NULL, pre_ux, NULL, "NetBSD", NULL }, /* Nx */
                    198:        { NULL, pre_ux, NULL, "OpenBSD", NULL }, /* Ox */
1.3       schwarze  199:        { NULL, NULL, NULL, NULL, NULL }, /* Pc */
                    200:        { NULL, NULL, post_pf, NULL, NULL }, /* Pf */
                    201:        { cond_body, pre_enc, post_enc, "(", ")" }, /* Po */
                    202:        { cond_body, pre_enc, post_enc, "(", ")" }, /* Pq */
1.6       schwarze  203:        { NULL, NULL, NULL, NULL, NULL }, /* Qc */
1.50      schwarze  204:        { cond_body, pre_enc, post_enc, "\\(oq", "\\(cq" }, /* Ql */
1.6       schwarze  205:        { cond_body, pre_enc, post_enc, "\"", "\"" }, /* Qo */
                    206:        { cond_body, pre_enc, post_enc, "\"", "\"" }, /* Qq */
                    207:        { NULL, NULL, NULL, NULL, NULL }, /* Re */
1.32      schwarze  208:        { cond_body, pre_rs, NULL, NULL, NULL }, /* Rs */
1.6       schwarze  209:        { NULL, NULL, NULL, NULL, NULL }, /* Sc */
1.50      schwarze  210:        { cond_body, pre_enc, post_enc, "\\(oq", "\\(cq" }, /* So */
                    211:        { cond_body, pre_enc, post_enc, "\\(oq", "\\(cq" }, /* Sq */
1.9       schwarze  212:        { NULL, pre_sm, NULL, NULL, NULL }, /* Sm */
1.24      schwarze  213:        { NULL, pre_em, post_font, NULL, NULL }, /* Sx */
                    214:        { NULL, pre_sy, post_font, NULL, NULL }, /* Sy */
                    215:        { NULL, pre_li, post_font, NULL, NULL }, /* Tn */
1.5       schwarze  216:        { NULL, pre_ux, NULL, "UNIX", NULL }, /* Ux */
1.32      schwarze  217:        { NULL, NULL, NULL, NULL, NULL }, /* Xc */
                    218:        { NULL, NULL, NULL, NULL, NULL }, /* Xo */
1.14      schwarze  219:        { NULL, pre_fo, post_fo, NULL, NULL }, /* Fo */
                    220:        { NULL, NULL, NULL, NULL, NULL }, /* Fc */
1.3       schwarze  221:        { cond_body, pre_enc, post_enc, "[", "]" }, /* Oo */
1.6       schwarze  222:        { NULL, NULL, NULL, NULL, NULL }, /* Oc */
1.10      schwarze  223:        { NULL, pre_bk, post_bk, NULL, NULL }, /* Bk */
                    224:        { NULL, NULL, NULL, NULL, NULL }, /* Ek */
1.5       schwarze  225:        { NULL, pre_ux, NULL, "is currently in beta test.", NULL }, /* Bt */
                    226:        { NULL, NULL, NULL, NULL, NULL }, /* Hf */
1.63      schwarze  227:        { NULL, pre_em, post_font, NULL, NULL }, /* Fr */
1.5       schwarze  228:        { NULL, pre_ux, NULL, "currently under development.", NULL }, /* Ud */
1.11      schwarze  229:        { NULL, NULL, post_lb, NULL, NULL }, /* Lb */
1.3       schwarze  230:        { NULL, pre_pp, NULL, NULL, NULL }, /* Lp */
1.22      schwarze  231:        { NULL, pre_lk, NULL, NULL, NULL }, /* Lk */
1.24      schwarze  232:        { NULL, pre_em, post_font, NULL, NULL }, /* Mt */
1.6       schwarze  233:        { cond_body, pre_enc, post_enc, "{", "}" }, /* Brq */
                    234:        { cond_body, pre_enc, post_enc, "{", "}" }, /* Bro */
                    235:        { NULL, NULL, NULL, NULL, NULL }, /* Brc */
1.32      schwarze  236:        { NULL, NULL, post_percent, NULL, NULL }, /* %C */
1.73      schwarze  237:        { NULL, pre_skip, NULL, NULL, NULL }, /* Es */
1.63      schwarze  238:        { cond_body, pre_en, post_en, NULL, NULL }, /* En */
1.5       schwarze  239:        { NULL, pre_ux, NULL, "DragonFly", NULL }, /* Dx */
1.32      schwarze  240:        { NULL, NULL, post_percent, NULL, NULL }, /* %Q */
1.3       schwarze  241:        { NULL, pre_br, NULL, NULL, NULL }, /* br */
                    242:        { NULL, pre_sp, post_sp, NULL, NULL }, /* sp */
1.32      schwarze  243:        { NULL, NULL, post_percent, NULL, NULL }, /* %U */
                    244:        { NULL, NULL, NULL, NULL, NULL }, /* Ta */
1.60      schwarze  245:        { NULL, pre_ll, post_sp, NULL, NULL }, /* ll */
1.3       schwarze  246:        { NULL, NULL, NULL, NULL, NULL }, /* ROOT */
1.1       schwarze  247: };
                    248:
1.18      schwarze  249: static int             outflags;
1.34      schwarze  250: #define        MMAN_spc        (1 << 0)  /* blank character before next word */
                    251: #define        MMAN_spc_force  (1 << 1)  /* even before trailing punctuation */
                    252: #define        MMAN_nl         (1 << 2)  /* break man(7) code line */
                    253: #define        MMAN_br         (1 << 3)  /* break output line */
                    254: #define        MMAN_sp         (1 << 4)  /* insert a blank output line */
                    255: #define        MMAN_PP         (1 << 5)  /* reset indentation etc. */
                    256: #define        MMAN_Sm         (1 << 6)  /* horizontal spacing mode */
                    257: #define        MMAN_Bk         (1 << 7)  /* word keep mode */
1.45      schwarze  258: #define        MMAN_Bk_susp    (1 << 8)  /* suspend this (after a macro) */
                    259: #define        MMAN_An_split   (1 << 9)  /* author mode is "split" */
                    260: #define        MMAN_An_nosplit (1 << 10) /* author mode is "nosplit" */
                    261: #define        MMAN_PD         (1 << 11) /* inter-paragraph spacing disabled */
1.55      schwarze  262: #define        MMAN_nbrword    (1 << 12) /* do not break the next word */
1.18      schwarze  263:
1.43      schwarze  264: #define        BL_STACK_MAX    32
                    265:
1.79      schwarze  266: static int             Bl_stack[BL_STACK_MAX];  /* offsets [chars] */
1.43      schwarze  267: static int             Bl_stack_post[BL_STACK_MAX];  /* add final .RE */
                    268: static int             Bl_stack_len;  /* number of nested Bl blocks */
1.35      schwarze  269: static int             TPremain;  /* characters before tag is full */
                    270:
1.24      schwarze  271: static struct {
                    272:        char    *head;
                    273:        char    *tail;
                    274:        size_t   size;
                    275: }      fontqueue;
                    276:
1.61      schwarze  277:
1.24      schwarze  278: static void
                    279: font_push(char newfont)
                    280: {
                    281:
                    282:        if (fontqueue.head + fontqueue.size <= ++fontqueue.tail) {
                    283:                fontqueue.size += 8;
                    284:                fontqueue.head = mandoc_realloc(fontqueue.head,
1.61      schwarze  285:                    fontqueue.size);
1.24      schwarze  286:        }
                    287:        *fontqueue.tail = newfont;
1.35      schwarze  288:        print_word("");
                    289:        printf("\\f");
1.24      schwarze  290:        putchar(newfont);
                    291:        outflags &= ~MMAN_spc;
                    292: }
                    293:
                    294: static void
                    295: font_pop(void)
                    296: {
                    297:
                    298:        if (fontqueue.tail > fontqueue.head)
                    299:                fontqueue.tail--;
                    300:        outflags &= ~MMAN_spc;
1.35      schwarze  301:        print_word("");
                    302:        printf("\\f");
1.24      schwarze  303:        putchar(*fontqueue.tail);
                    304: }
                    305:
1.1       schwarze  306: static void
1.18      schwarze  307: print_word(const char *s)
1.1       schwarze  308: {
1.4       schwarze  309:
1.34      schwarze  310:        if ((MMAN_PP | MMAN_sp | MMAN_br | MMAN_nl) & outflags) {
1.61      schwarze  311:                /*
1.4       schwarze  312:                 * If we need a newline, print it now and start afresh.
                    313:                 */
1.34      schwarze  314:                if (MMAN_PP & outflags) {
1.44      schwarze  315:                        if (MMAN_sp & outflags) {
                    316:                                if (MMAN_PD & outflags) {
                    317:                                        printf("\n.PD");
                    318:                                        outflags &= ~MMAN_PD;
                    319:                                }
                    320:                        } else if ( ! (MMAN_PD & outflags)) {
                    321:                                printf("\n.PD 0");
                    322:                                outflags |= MMAN_PD;
                    323:                        }
1.34      schwarze  324:                        printf("\n.PP\n");
                    325:                } else if (MMAN_sp & outflags)
1.19      schwarze  326:                        printf("\n.sp\n");
                    327:                else if (MMAN_br & outflags)
                    328:                        printf("\n.br\n");
                    329:                else if (MMAN_nl & outflags)
                    330:                        putchar('\n');
1.34      schwarze  331:                outflags &= ~(MMAN_PP|MMAN_sp|MMAN_br|MMAN_nl|MMAN_spc);
1.35      schwarze  332:                if (1 == TPremain)
                    333:                        printf(".br\n");
                    334:                TPremain = 0;
                    335:        } else if (MMAN_spc & outflags) {
1.4       schwarze  336:                /*
1.23      schwarze  337:                 * If we need a space, only print it if
                    338:                 * (1) it is forced by `No' or
                    339:                 * (2) what follows is not terminating punctuation or
                    340:                 * (3) what follows is longer than one character.
1.4       schwarze  341:                 */
1.35      schwarze  342:                if (MMAN_spc_force & outflags || '\0' == s[0] ||
1.23      schwarze  343:                    NULL == strchr(".,:;)]?!", s[0]) || '\0' != s[1]) {
1.45      schwarze  344:                        if (MMAN_Bk & outflags &&
                    345:                            ! (MMAN_Bk_susp & outflags))
1.10      schwarze  346:                                putchar('\\');
1.39      millert   347:                        putchar(' ');
1.35      schwarze  348:                        if (TPremain)
                    349:                                TPremain--;
1.10      schwarze  350:                }
1.35      schwarze  351:        }
1.4       schwarze  352:
                    353:        /*
                    354:         * Reassign needing space if we're not following opening
                    355:         * punctuation.
                    356:         */
1.35      schwarze  357:        if (MMAN_Sm & outflags && ('\0' == s[0] ||
                    358:            (('(' != s[0] && '[' != s[0]) || '\0' != s[1])))
1.18      schwarze  359:                outflags |= MMAN_spc;
                    360:        else
                    361:                outflags &= ~MMAN_spc;
1.45      schwarze  362:        outflags &= ~(MMAN_spc_force | MMAN_Bk_susp);
1.4       schwarze  363:
1.1       schwarze  364:        for ( ; *s; s++) {
                    365:                switch (*s) {
1.61      schwarze  366:                case ASCII_NBRSP:
1.39      millert   367:                        printf("\\ ");
1.1       schwarze  368:                        break;
1.61      schwarze  369:                case ASCII_HYPH:
1.1       schwarze  370:                        putchar('-');
1.57      schwarze  371:                        break;
1.61      schwarze  372:                case ASCII_BREAK:
1.57      schwarze  373:                        printf("\\:");
1.1       schwarze  374:                        break;
1.61      schwarze  375:                case ' ':
1.55      schwarze  376:                        if (MMAN_nbrword & outflags) {
                    377:                                printf("\\ ");
                    378:                                break;
                    379:                        }
                    380:                        /* FALLTHROUGH */
1.1       schwarze  381:                default:
1.4       schwarze  382:                        putchar((unsigned char)*s);
1.1       schwarze  383:                        break;
                    384:                }
1.35      schwarze  385:                if (TPremain)
                    386:                        TPremain--;
1.1       schwarze  387:        }
1.55      schwarze  388:        outflags &= ~MMAN_nbrword;
1.1       schwarze  389: }
                    390:
1.8       schwarze  391: static void
1.34      schwarze  392: print_line(const char *s, int newflags)
                    393: {
                    394:
                    395:        outflags &= ~MMAN_br;
                    396:        outflags |= MMAN_nl;
                    397:        print_word(s);
                    398:        outflags |= newflags;
                    399: }
                    400:
                    401: static void
                    402: print_block(const char *s, int newflags)
                    403: {
                    404:
                    405:        outflags &= ~MMAN_PP;
1.44      schwarze  406:        if (MMAN_sp & outflags) {
1.34      schwarze  407:                outflags &= ~(MMAN_sp | MMAN_br);
1.44      schwarze  408:                if (MMAN_PD & outflags) {
                    409:                        print_line(".PD", 0);
                    410:                        outflags &= ~MMAN_PD;
                    411:                }
1.45      schwarze  412:        } else if (! (MMAN_PD & outflags))
                    413:                print_line(".PD 0", MMAN_PD);
1.34      schwarze  414:        outflags |= MMAN_nl;
                    415:        print_word(s);
1.45      schwarze  416:        outflags |= MMAN_Bk_susp | newflags;
1.34      schwarze  417: }
                    418:
                    419: static void
1.69      schwarze  420: print_offs(const char *v, int keywords)
1.8       schwarze  421: {
                    422:        char              buf[24];
                    423:        struct roffsu     su;
1.79      schwarze  424:        int               sz;
1.8       schwarze  425:
1.47      schwarze  426:        print_line(".RS", MMAN_Bk_susp);
                    427:
1.43      schwarze  428:        /* Convert v into a number (of characters). */
1.69      schwarze  429:        if (NULL == v || '\0' == *v || (keywords && !strcmp(v, "left")))
1.8       schwarze  430:                sz = 0;
1.69      schwarze  431:        else if (keywords && !strcmp(v, "indent"))
1.8       schwarze  432:                sz = 6;
1.69      schwarze  433:        else if (keywords && !strcmp(v, "indent-two"))
1.8       schwarze  434:                sz = 12;
1.77      schwarze  435:        else if (a2roffsu(v, &su, SCALE_EN) > 1) {
1.43      schwarze  436:                if (SCALE_EN == su.unit)
                    437:                        sz = su.scale;
                    438:                else {
                    439:                        /*
                    440:                         * XXX
                    441:                         * If we are inside an enclosing list,
                    442:                         * there is no easy way to add the two
                    443:                         * indentations because they are provided
                    444:                         * in terms of different units.
                    445:                         */
                    446:                        print_word(v);
1.47      schwarze  447:                        outflags |= MMAN_nl;
1.43      schwarze  448:                        return;
                    449:                }
1.8       schwarze  450:        } else
                    451:                sz = strlen(v);
                    452:
1.43      schwarze  453:        /*
                    454:         * We are inside an enclosing list.
                    455:         * Add the two indentations.
                    456:         */
                    457:        if (Bl_stack_len)
                    458:                sz += Bl_stack[Bl_stack_len - 1];
                    459:
1.79      schwarze  460:        (void)snprintf(buf, sizeof(buf), "%dn", sz);
1.18      schwarze  461:        print_word(buf);
1.47      schwarze  462:        outflags |= MMAN_nl;
1.8       schwarze  463: }
                    464:
1.46      schwarze  465: /*
                    466:  * Set up the indentation for a list item; used from pre_it().
                    467:  */
1.59      schwarze  468: static void
1.88    ! schwarze  469: print_width(const struct mdoc_bl *bl, const struct roff_node *child)
1.28      schwarze  470: {
                    471:        char              buf[24];
                    472:        struct roffsu     su;
1.79      schwarze  473:        int               numeric, remain, sz, chsz;
1.29      schwarze  474:
1.35      schwarze  475:        numeric = 1;
                    476:        remain = 0;
1.43      schwarze  477:
1.79      schwarze  478:        /* Convert the width into a number (of characters). */
                    479:        if (bl->width == NULL)
                    480:                sz = (bl->type == LIST_hang) ? 6 : 0;
                    481:        else if (a2roffsu(bl->width, &su, SCALE_MAX) > 1) {
1.28      schwarze  482:                if (SCALE_EN == su.unit)
                    483:                        sz = su.scale;
                    484:                else {
1.35      schwarze  485:                        sz = 0;
                    486:                        numeric = 0;
1.28      schwarze  487:                }
                    488:        } else
1.79      schwarze  489:                sz = strlen(bl->width);
1.28      schwarze  490:
1.35      schwarze  491:        /* XXX Rough estimation, might have multiple parts. */
1.79      schwarze  492:        if (bl->type == LIST_enum)
                    493:                chsz = (bl->count > 8) + 1;
1.87      schwarze  494:        else if (child != NULL && child->type == ROFFT_TEXT)
1.79      schwarze  495:                chsz = strlen(child->string);
                    496:        else
                    497:                chsz = 0;
1.35      schwarze  498:
1.46      schwarze  499:        /* Maybe we are inside an enclosing list? */
                    500:        mid_it();
1.43      schwarze  501:
                    502:        /*
                    503:         * Save our own indentation,
                    504:         * such that child lists can use it.
                    505:         */
                    506:        Bl_stack[Bl_stack_len++] = sz + 2;
                    507:
                    508:        /* Set up the current list. */
1.79      schwarze  509:        if (chsz > sz && bl->type != LIST_tag)
1.34      schwarze  510:                print_block(".HP", 0);
1.35      schwarze  511:        else {
1.34      schwarze  512:                print_block(".TP", 0);
1.35      schwarze  513:                remain = sz + 2;
                    514:        }
                    515:        if (numeric) {
1.79      schwarze  516:                (void)snprintf(buf, sizeof(buf), "%dn", sz + 2);
1.35      schwarze  517:                print_word(buf);
                    518:        } else
1.79      schwarze  519:                print_word(bl->width);
1.35      schwarze  520:        TPremain = remain;
1.28      schwarze  521: }
                    522:
1.59      schwarze  523: static void
1.28      schwarze  524: print_count(int *count)
                    525: {
1.62      schwarze  526:        char              buf[24];
1.28      schwarze  527:
1.79      schwarze  528:        (void)snprintf(buf, sizeof(buf), "%d.\\&", ++*count);
1.28      schwarze  529:        print_word(buf);
                    530: }
                    531:
                    532: void
1.4       schwarze  533: man_man(void *arg, const struct man *man)
                    534: {
                    535:
                    536:        /*
                    537:         * Dump the keep buffer.
                    538:         * We're guaranteed by now that this exists (is non-NULL).
                    539:         * Flush stdout afterward, just in case.
                    540:         */
                    541:        fputs(mparse_getkeep(man_mparse(man)), stdout);
                    542:        fflush(stdout);
                    543: }
                    544:
                    545: void
1.1       schwarze  546: man_mdoc(void *arg, const struct mdoc *mdoc)
                    547: {
1.42      schwarze  548:        const struct mdoc_meta *meta;
1.88    ! schwarze  549:        struct roff_node *n;
1.1       schwarze  550:
1.42      schwarze  551:        meta = mdoc_meta(mdoc);
1.85      schwarze  552:        n = mdoc_node(mdoc)->child;
1.1       schwarze  553:
1.41      millert   554:        printf(".TH \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"\n",
1.67      schwarze  555:            meta->title,
                    556:            (meta->msec == NULL ? "" : meta->msec),
                    557:            meta->date, meta->os, meta->vol);
1.41      millert   558:
                    559:        /* Disable hyphenation and if nroff, disable justification. */
                    560:        printf(".nh\n.if n .ad l");
1.1       schwarze  561:
1.18      schwarze  562:        outflags = MMAN_nl | MMAN_Sm;
1.24      schwarze  563:        if (0 == fontqueue.size) {
                    564:                fontqueue.size = 8;
                    565:                fontqueue.head = fontqueue.tail = mandoc_malloc(8);
                    566:                *fontqueue.tail = 'R';
                    567:        }
1.85      schwarze  568:        while (n != NULL) {
                    569:                print_node(meta, n);
                    570:                n = n->next;
                    571:        }
1.3       schwarze  572:        putchar('\n');
1.1       schwarze  573: }
                    574:
                    575: static void
                    576: print_node(DECL_ARGS)
                    577: {
1.4       schwarze  578:        const struct manact     *act;
1.88    ! schwarze  579:        struct roff_node        *sub;
1.1       schwarze  580:        int                      cond, do_sub;
1.45      schwarze  581:
1.4       schwarze  582:        /*
                    583:         * Break the line if we were parsed subsequent the current node.
                    584:         * This makes the page structure be more consistent.
                    585:         */
1.51      schwarze  586:        if (MMAN_spc & outflags && MDOC_LINE & n->flags)
1.18      schwarze  587:                outflags |= MMAN_nl;
1.1       schwarze  588:
1.4       schwarze  589:        act = NULL;
1.1       schwarze  590:        cond = 0;
                    591:        do_sub = 1;
1.85      schwarze  592:        n->flags &= ~MDOC_ENDED;
1.4       schwarze  593:
1.87      schwarze  594:        if (n->type == ROFFT_TEXT) {
1.4       schwarze  595:                /*
                    596:                 * Make sure that we don't happen to start with a
                    597:                 * control character at the start of a line.
                    598:                 */
1.61      schwarze  599:                if (MMAN_nl & outflags &&
                    600:                    ('.' == *n->string || '\'' == *n->string)) {
1.35      schwarze  601:                        print_word("");
                    602:                        printf("\\&");
1.18      schwarze  603:                        outflags &= ~MMAN_spc;
1.3       schwarze  604:                }
1.71      schwarze  605:                if (outflags & MMAN_Sm && ! (n->flags & MDOC_DELIMC))
                    606:                        outflags |= MMAN_spc_force;
1.18      schwarze  607:                print_word(n->string);
1.71      schwarze  608:                if (outflags & MMAN_Sm && ! (n->flags & MDOC_DELIMO))
                    609:                        outflags |= MMAN_spc;
1.1       schwarze  610:        } else {
1.4       schwarze  611:                /*
                    612:                 * Conditionally run the pre-node action handler for a
                    613:                 * node.
                    614:                 */
1.1       schwarze  615:                act = manacts + n->tok;
1.74      schwarze  616:                cond = act->cond == NULL || (*act->cond)(meta, n);
                    617:                if (cond && act->pre && (n->end == ENDBODY_NOT || n->nchild))
1.42      schwarze  618:                        do_sub = (*act->pre)(meta, n);
1.1       schwarze  619:        }
                    620:
1.61      schwarze  621:        /*
1.4       schwarze  622:         * Conditionally run all child nodes.
                    623:         * Note that this iterates over children instead of using
                    624:         * recursion.  This prevents unnecessary depth in the stack.
                    625:         */
1.1       schwarze  626:        if (do_sub)
                    627:                for (sub = n->child; sub; sub = sub->next)
1.42      schwarze  628:                        print_node(meta, sub);
1.1       schwarze  629:
1.4       schwarze  630:        /*
                    631:         * Lastly, conditionally run the post-node handler.
                    632:         */
1.58      schwarze  633:        if (MDOC_ENDED & n->flags)
                    634:                return;
                    635:
1.1       schwarze  636:        if (cond && act->post)
1.42      schwarze  637:                (*act->post)(meta, n);
1.58      schwarze  638:
                    639:        if (ENDBODY_NOT != n->end)
1.85      schwarze  640:                n->body->flags |= MDOC_ENDED;
1.58      schwarze  641:
                    642:        if (ENDBODY_NOSPACE == n->end)
                    643:                outflags &= ~(MMAN_spc | MMAN_nl);
1.1       schwarze  644: }
                    645:
                    646: static int
                    647: cond_head(DECL_ARGS)
                    648: {
1.4       schwarze  649:
1.87      schwarze  650:        return(n->type == ROFFT_HEAD);
1.1       schwarze  651: }
                    652:
                    653: static int
                    654: cond_body(DECL_ARGS)
                    655: {
1.4       schwarze  656:
1.87      schwarze  657:        return(n->type == ROFFT_BODY);
1.1       schwarze  658: }
                    659:
                    660: static int
                    661: pre_enc(DECL_ARGS)
                    662: {
1.4       schwarze  663:        const char      *prefix;
1.1       schwarze  664:
                    665:        prefix = manacts[n->tok].prefix;
                    666:        if (NULL == prefix)
                    667:                return(1);
1.18      schwarze  668:        print_word(prefix);
                    669:        outflags &= ~MMAN_spc;
1.1       schwarze  670:        return(1);
                    671: }
                    672:
                    673: static void
                    674: post_enc(DECL_ARGS)
                    675: {
                    676:        const char *suffix;
                    677:
                    678:        suffix = manacts[n->tok].suffix;
                    679:        if (NULL == suffix)
                    680:                return;
1.58      schwarze  681:        outflags &= ~(MMAN_spc | MMAN_nl);
1.18      schwarze  682:        print_word(suffix);
1.24      schwarze  683: }
                    684:
1.66      schwarze  685: static int
                    686: pre_ex(DECL_ARGS)
                    687: {
                    688:        int      nchild;
                    689:
                    690:        outflags |= MMAN_br | MMAN_nl;
                    691:
                    692:        print_word("The");
                    693:
                    694:        nchild = n->nchild;
                    695:        for (n = n->child; n; n = n->next) {
                    696:                font_push('B');
                    697:                print_word(n->string);
                    698:                font_pop();
                    699:
                    700:                if (n->next == NULL)
                    701:                        continue;
                    702:
                    703:                if (nchild > 2) {
                    704:                        outflags &= ~MMAN_spc;
                    705:                        print_word(",");
                    706:                }
                    707:                if (n->next->next == NULL)
                    708:                        print_word("and");
                    709:        }
                    710:
                    711:        if (nchild > 1)
                    712:                print_word("utilities exit\\~0");
                    713:        else
                    714:                print_word("utility exits\\~0");
                    715:
                    716:        print_word("on success, and\\~>0 if an error occurs.");
                    717:        outflags |= MMAN_nl;
                    718:        return(0);
                    719: }
                    720:
1.24      schwarze  721: static void
                    722: post_font(DECL_ARGS)
                    723: {
                    724:
                    725:        font_pop();
1.1       schwarze  726: }
                    727:
                    728: static void
                    729: post_percent(DECL_ARGS)
                    730: {
                    731:
1.32      schwarze  732:        if (pre_em == manacts[n->tok].pre)
                    733:                font_pop();
                    734:        if (n->next) {
1.18      schwarze  735:                print_word(",");
1.32      schwarze  736:                if (n->prev &&  n->prev->tok == n->tok &&
                    737:                                n->next->tok == n->tok)
                    738:                        print_word("and");
                    739:        } else {
1.18      schwarze  740:                print_word(".");
                    741:                outflags |= MMAN_nl;
1.1       schwarze  742:        }
                    743: }
                    744:
1.32      schwarze  745: static int
                    746: pre__t(DECL_ARGS)
                    747: {
                    748:
1.61      schwarze  749:        if (n->parent && MDOC_Rs == n->parent->tok &&
                    750:            n->parent->norm->Rs.quote_T) {
1.35      schwarze  751:                print_word("");
                    752:                putchar('\"');
1.32      schwarze  753:                outflags &= ~MMAN_spc;
                    754:        } else
                    755:                font_push('I');
                    756:        return(1);
                    757: }
                    758:
                    759: static void
                    760: post__t(DECL_ARGS)
                    761: {
                    762:
1.61      schwarze  763:        if (n->parent && MDOC_Rs == n->parent->tok &&
                    764:            n->parent->norm->Rs.quote_T) {
1.32      schwarze  765:                outflags &= ~MMAN_spc;
1.35      schwarze  766:                print_word("");
                    767:                putchar('\"');
1.32      schwarze  768:        } else
                    769:                font_pop();
1.42      schwarze  770:        post_percent(meta, n);
1.32      schwarze  771: }
                    772:
1.4       schwarze  773: /*
                    774:  * Print before a section header.
                    775:  */
1.1       schwarze  776: static int
1.3       schwarze  777: pre_sect(DECL_ARGS)
                    778: {
                    779:
1.87      schwarze  780:        if (n->type == ROFFT_HEAD) {
1.45      schwarze  781:                outflags |= MMAN_sp;
                    782:                print_block(manacts[n->tok].prefix, 0);
                    783:                print_word("");
                    784:                putchar('\"');
                    785:                outflags &= ~MMAN_spc;
                    786:        }
1.3       schwarze  787:        return(1);
                    788: }
                    789:
1.4       schwarze  790: /*
                    791:  * Print subsequent a section header.
                    792:  */
1.3       schwarze  793: static void
                    794: post_sect(DECL_ARGS)
                    795: {
                    796:
1.87      schwarze  797:        if (n->type != ROFFT_HEAD)
1.3       schwarze  798:                return;
1.18      schwarze  799:        outflags &= ~MMAN_spc;
1.35      schwarze  800:        print_word("");
                    801:        putchar('\"');
1.18      schwarze  802:        outflags |= MMAN_nl;
1.20      schwarze  803:        if (MDOC_Sh == n->tok && SEC_AUTHORS == n->sec)
                    804:                outflags &= ~(MMAN_An_split | MMAN_An_nosplit);
                    805: }
                    806:
1.21      schwarze  807: /* See mdoc_term.c, synopsis_pre() for comments. */
                    808: static void
1.88    ! schwarze  809: pre_syn(const struct roff_node *n)
1.21      schwarze  810: {
                    811:
                    812:        if (NULL == n->prev || ! (MDOC_SYNPRETTY & n->flags))
                    813:                return;
                    814:
                    815:        if (n->prev->tok == n->tok &&
1.61      schwarze  816:            MDOC_Ft != n->tok &&
                    817:            MDOC_Fo != n->tok &&
                    818:            MDOC_Fn != n->tok) {
1.21      schwarze  819:                outflags |= MMAN_br;
                    820:                return;
                    821:        }
                    822:
                    823:        switch (n->prev->tok) {
1.61      schwarze  824:        case MDOC_Fd:
1.21      schwarze  825:                /* FALLTHROUGH */
1.61      schwarze  826:        case MDOC_Fn:
1.21      schwarze  827:                /* FALLTHROUGH */
1.61      schwarze  828:        case MDOC_Fo:
1.21      schwarze  829:                /* FALLTHROUGH */
1.61      schwarze  830:        case MDOC_In:
1.21      schwarze  831:                /* FALLTHROUGH */
1.61      schwarze  832:        case MDOC_Vt:
1.21      schwarze  833:                outflags |= MMAN_sp;
                    834:                break;
1.61      schwarze  835:        case MDOC_Ft:
1.21      schwarze  836:                if (MDOC_Fn != n->tok && MDOC_Fo != n->tok) {
                    837:                        outflags |= MMAN_sp;
                    838:                        break;
                    839:                }
                    840:                /* FALLTHROUGH */
                    841:        default:
                    842:                outflags |= MMAN_br;
                    843:                break;
                    844:        }
                    845: }
                    846:
1.20      schwarze  847: static int
                    848: pre_an(DECL_ARGS)
                    849: {
                    850:
                    851:        switch (n->norm->An.auth) {
1.61      schwarze  852:        case AUTH_split:
1.20      schwarze  853:                outflags &= ~MMAN_An_nosplit;
                    854:                outflags |= MMAN_An_split;
                    855:                return(0);
1.61      schwarze  856:        case AUTH_nosplit:
1.20      schwarze  857:                outflags &= ~MMAN_An_split;
                    858:                outflags |= MMAN_An_nosplit;
                    859:                return(0);
                    860:        default:
                    861:                if (MMAN_An_split & outflags)
                    862:                        outflags |= MMAN_br;
                    863:                else if (SEC_AUTHORS == n->sec &&
                    864:                    ! (MMAN_An_nosplit & outflags))
                    865:                        outflags |= MMAN_An_split;
                    866:                return(1);
                    867:        }
1.3       schwarze  868: }
                    869:
                    870: static int
                    871: pre_ap(DECL_ARGS)
                    872: {
                    873:
1.18      schwarze  874:        outflags &= ~MMAN_spc;
                    875:        print_word("'");
                    876:        outflags &= ~MMAN_spc;
1.3       schwarze  877:        return(0);
1.72      schwarze  878: }
                    879:
                    880: static int
                    881: pre_aq(DECL_ARGS)
                    882: {
                    883:
1.80      schwarze  884:        print_word(n->nchild == 1 &&
                    885:            n->child->tok == MDOC_Mt ?  "<" : "\\(la");
1.72      schwarze  886:        outflags &= ~MMAN_spc;
                    887:        return(1);
                    888: }
                    889:
                    890: static void
                    891: post_aq(DECL_ARGS)
                    892: {
                    893:
                    894:        outflags &= ~(MMAN_spc | MMAN_nl);
1.80      schwarze  895:        print_word(n->nchild == 1 &&
                    896:            n->child->tok == MDOC_Mt ?  ">" : "\\(ra");
1.3       schwarze  897: }
                    898:
                    899: static int
                    900: pre_bd(DECL_ARGS)
                    901: {
                    902:
1.34      schwarze  903:        outflags &= ~(MMAN_PP | MMAN_sp | MMAN_br);
                    904:
                    905:        if (DISP_unfilled == n->norm->Bd.type ||
                    906:            DISP_literal  == n->norm->Bd.type)
                    907:                print_line(".nf", 0);
                    908:        if (0 == n->norm->Bd.comp && NULL != n->parent->prev)
1.19      schwarze  909:                outflags |= MMAN_sp;
1.69      schwarze  910:        print_offs(n->norm->Bd.offs, 1);
1.3       schwarze  911:        return(1);
                    912: }
                    913:
                    914: static void
                    915: post_bd(DECL_ARGS)
                    916: {
                    917:
1.43      schwarze  918:        /* Close out this display. */
1.34      schwarze  919:        print_line(".RE", MMAN_nl);
1.3       schwarze  920:        if (DISP_unfilled == n->norm->Bd.type ||
1.34      schwarze  921:            DISP_literal  == n->norm->Bd.type)
                    922:                print_line(".fi", MMAN_nl);
1.43      schwarze  923:
1.46      schwarze  924:        /* Maybe we are inside an enclosing list? */
                    925:        if (NULL != n->parent->next)
                    926:                mid_it();
1.10      schwarze  927: }
                    928:
                    929: static int
1.25      schwarze  930: pre_bf(DECL_ARGS)
                    931: {
                    932:
                    933:        switch (n->type) {
1.87      schwarze  934:        case ROFFT_BLOCK:
1.25      schwarze  935:                return(1);
1.87      schwarze  936:        case ROFFT_BODY:
1.25      schwarze  937:                break;
                    938:        default:
                    939:                return(0);
                    940:        }
                    941:        switch (n->norm->Bf.font) {
1.61      schwarze  942:        case FONT_Em:
1.25      schwarze  943:                font_push('I');
                    944:                break;
1.61      schwarze  945:        case FONT_Sy:
1.25      schwarze  946:                font_push('B');
                    947:                break;
                    948:        default:
                    949:                font_push('R');
                    950:                break;
                    951:        }
                    952:        return(1);
                    953: }
                    954:
                    955: static void
                    956: post_bf(DECL_ARGS)
                    957: {
                    958:
1.87      schwarze  959:        if (n->type == ROFFT_BODY)
1.25      schwarze  960:                font_pop();
                    961: }
                    962:
                    963: static int
1.10      schwarze  964: pre_bk(DECL_ARGS)
                    965: {
                    966:
                    967:        switch (n->type) {
1.87      schwarze  968:        case ROFFT_BLOCK:
1.10      schwarze  969:                return(1);
1.87      schwarze  970:        case ROFFT_BODY:
1.18      schwarze  971:                outflags |= MMAN_Bk;
1.10      schwarze  972:                return(1);
                    973:        default:
                    974:                return(0);
                    975:        }
                    976: }
                    977:
                    978: static void
                    979: post_bk(DECL_ARGS)
                    980: {
                    981:
1.87      schwarze  982:        if (n->type == ROFFT_BODY)
1.18      schwarze  983:                outflags &= ~MMAN_Bk;
1.3       schwarze  984: }
                    985:
                    986: static int
1.28      schwarze  987: pre_bl(DECL_ARGS)
                    988: {
1.31      schwarze  989:        size_t           icol;
1.28      schwarze  990:
1.48      schwarze  991:        /*
                    992:         * print_offs() will increase the -offset to account for
                    993:         * a possible enclosing .It, but any enclosed .It blocks
                    994:         * just nest and do not add up their indentation.
                    995:         */
                    996:        if (n->norm->Bl.offs) {
1.69      schwarze  997:                print_offs(n->norm->Bl.offs, 0);
1.48      schwarze  998:                Bl_stack[Bl_stack_len++] = 0;
                    999:        }
                   1000:
1.31      schwarze 1001:        switch (n->norm->Bl.type) {
1.61      schwarze 1002:        case LIST_enum:
1.28      schwarze 1003:                n->norm->Bl.count = 0;
1.31      schwarze 1004:                return(1);
1.61      schwarze 1005:        case LIST_column:
1.31      schwarze 1006:                break;
                   1007:        default:
                   1008:                return(1);
                   1009:        }
                   1010:
1.81      schwarze 1011:        if (n->nchild) {
                   1012:                print_line(".TS", MMAN_nl);
                   1013:                for (icol = 0; icol < n->norm->Bl.ncols; icol++)
                   1014:                        print_word("l");
                   1015:                print_word(".");
                   1016:        }
1.34      schwarze 1017:        outflags |= MMAN_nl;
1.28      schwarze 1018:        return(1);
                   1019: }
                   1020:
                   1021: static void
                   1022: post_bl(DECL_ARGS)
                   1023: {
                   1024:
1.31      schwarze 1025:        switch (n->norm->Bl.type) {
1.61      schwarze 1026:        case LIST_column:
1.81      schwarze 1027:                if (n->nchild)
                   1028:                        print_line(".TE", 0);
1.34      schwarze 1029:                break;
1.61      schwarze 1030:        case LIST_enum:
1.31      schwarze 1031:                n->norm->Bl.count = 0;
                   1032:                break;
                   1033:        default:
                   1034:                break;
                   1035:        }
1.48      schwarze 1036:
                   1037:        if (n->norm->Bl.offs) {
                   1038:                print_line(".RE", MMAN_nl);
                   1039:                assert(Bl_stack_len);
                   1040:                Bl_stack_len--;
                   1041:                assert(0 == Bl_stack[Bl_stack_len]);
                   1042:        } else {
                   1043:                outflags |= MMAN_PP | MMAN_nl;
                   1044:                outflags &= ~(MMAN_sp | MMAN_br);
                   1045:        }
1.46      schwarze 1046:
                   1047:        /* Maybe we are inside an enclosing list? */
                   1048:        if (NULL != n->parent->next)
                   1049:                mid_it();
                   1050:
1.28      schwarze 1051: }
                   1052:
                   1053: static int
1.3       schwarze 1054: pre_br(DECL_ARGS)
                   1055: {
                   1056:
1.19      schwarze 1057:        outflags |= MMAN_br;
1.3       schwarze 1058:        return(0);
                   1059: }
                   1060:
                   1061: static int
1.5       schwarze 1062: pre_bx(DECL_ARGS)
                   1063: {
                   1064:
                   1065:        n = n->child;
                   1066:        if (n) {
1.18      schwarze 1067:                print_word(n->string);
                   1068:                outflags &= ~MMAN_spc;
1.5       schwarze 1069:                n = n->next;
                   1070:        }
1.18      schwarze 1071:        print_word("BSD");
1.5       schwarze 1072:        if (NULL == n)
                   1073:                return(0);
1.18      schwarze 1074:        outflags &= ~MMAN_spc;
                   1075:        print_word("-");
                   1076:        outflags &= ~MMAN_spc;
                   1077:        print_word(n->string);
1.5       schwarze 1078:        return(0);
                   1079: }
                   1080:
                   1081: static int
1.1       schwarze 1082: pre_dl(DECL_ARGS)
                   1083: {
                   1084:
1.69      schwarze 1085:        print_offs("6n", 0);
1.1       schwarze 1086:        return(1);
                   1087: }
                   1088:
                   1089: static void
                   1090: post_dl(DECL_ARGS)
                   1091: {
                   1092:
1.34      schwarze 1093:        print_line(".RE", MMAN_nl);
1.46      schwarze 1094:
                   1095:        /* Maybe we are inside an enclosing list? */
                   1096:        if (NULL != n->parent->next)
                   1097:                mid_it();
1.13      schwarze 1098: }
                   1099:
                   1100: static int
1.24      schwarze 1101: pre_em(DECL_ARGS)
                   1102: {
                   1103:
                   1104:        font_push('I');
                   1105:        return(1);
1.26      schwarze 1106: }
                   1107:
1.63      schwarze 1108: static int
                   1109: pre_en(DECL_ARGS)
                   1110: {
                   1111:
                   1112:        if (NULL == n->norm->Es ||
                   1113:            NULL == n->norm->Es->child)
                   1114:                return(1);
                   1115:
                   1116:        print_word(n->norm->Es->child->string);
                   1117:        outflags &= ~MMAN_spc;
                   1118:        return(1);
                   1119: }
                   1120:
                   1121: static void
                   1122: post_en(DECL_ARGS)
                   1123: {
                   1124:
                   1125:        if (NULL == n->norm->Es ||
                   1126:            NULL == n->norm->Es->child ||
                   1127:            NULL == n->norm->Es->child->next)
                   1128:                return;
                   1129:
                   1130:        outflags &= ~MMAN_spc;
                   1131:        print_word(n->norm->Es->child->next->string);
                   1132:        return;
                   1133: }
                   1134:
1.74      schwarze 1135: static int
                   1136: pre_eo(DECL_ARGS)
                   1137: {
                   1138:
1.82      schwarze 1139:        if (n->end == ENDBODY_NOT &&
                   1140:            n->parent->head->child == NULL &&
                   1141:            n->child != NULL &&
                   1142:            n->child->end != ENDBODY_NOT)
                   1143:                print_word("\\&");
                   1144:        else if (n->end != ENDBODY_NOT ? n->child != NULL :
1.84      schwarze 1145:            n->parent->head->child != NULL && (n->child != NULL ||
                   1146:            (n->parent->tail != NULL && n->parent->tail->child != NULL)))
1.82      schwarze 1147:                outflags &= ~(MMAN_spc | MMAN_nl);
1.74      schwarze 1148:        return(1);
                   1149: }
                   1150:
1.26      schwarze 1151: static void
                   1152: post_eo(DECL_ARGS)
                   1153: {
1.82      schwarze 1154:        int      body, tail;
                   1155:
                   1156:        if (n->end != ENDBODY_NOT) {
                   1157:                outflags |= MMAN_spc;
                   1158:                return;
                   1159:        }
1.26      schwarze 1160:
1.82      schwarze 1161:        body = n->child != NULL || n->parent->head->child != NULL;
                   1162:        tail = n->parent->tail != NULL && n->parent->tail->child != NULL;
                   1163:
                   1164:        if (body && tail)
1.26      schwarze 1165:                outflags &= ~MMAN_spc;
1.82      schwarze 1166:        else if ( ! (body || tail))
                   1167:                print_word("\\&");
                   1168:        else if ( ! tail)
                   1169:                outflags |= MMAN_spc;
1.63      schwarze 1170: }
                   1171:
                   1172: static int
1.14      schwarze 1173: pre_fa(DECL_ARGS)
                   1174: {
1.56      schwarze 1175:        int      am_Fa;
1.14      schwarze 1176:
1.56      schwarze 1177:        am_Fa = MDOC_Fa == n->tok;
                   1178:
                   1179:        if (am_Fa)
1.14      schwarze 1180:                n = n->child;
                   1181:
                   1182:        while (NULL != n) {
1.24      schwarze 1183:                font_push('I');
1.56      schwarze 1184:                if (am_Fa || MDOC_SYNPRETTY & n->flags)
1.55      schwarze 1185:                        outflags |= MMAN_nbrword;
1.42      schwarze 1186:                print_node(meta, n);
1.24      schwarze 1187:                font_pop();
1.14      schwarze 1188:                if (NULL != (n = n->next))
1.18      schwarze 1189:                        print_word(",");
1.14      schwarze 1190:        }
                   1191:        return(0);
                   1192: }
                   1193:
                   1194: static void
                   1195: post_fa(DECL_ARGS)
                   1196: {
                   1197:
                   1198:        if (NULL != n->next && MDOC_Fa == n->next->tok)
1.18      schwarze 1199:                print_word(",");
1.27      schwarze 1200: }
                   1201:
                   1202: static int
                   1203: pre_fd(DECL_ARGS)
                   1204: {
                   1205:
                   1206:        pre_syn(n);
                   1207:        font_push('B');
                   1208:        return(1);
                   1209: }
                   1210:
                   1211: static void
                   1212: post_fd(DECL_ARGS)
                   1213: {
                   1214:
                   1215:        font_pop();
                   1216:        outflags |= MMAN_br;
1.14      schwarze 1217: }
                   1218:
                   1219: static int
1.24      schwarze 1220: pre_fl(DECL_ARGS)
                   1221: {
                   1222:
                   1223:        font_push('B');
1.40      millert  1224:        print_word("\\-");
1.68      schwarze 1225:        if (n->nchild)
                   1226:                outflags &= ~MMAN_spc;
1.24      schwarze 1227:        return(1);
                   1228: }
                   1229:
                   1230: static void
                   1231: post_fl(DECL_ARGS)
                   1232: {
                   1233:
                   1234:        font_pop();
1.68      schwarze 1235:        if ( ! (n->nchild ||
                   1236:            n->next == NULL ||
1.87      schwarze 1237:            n->next->type == ROFFT_TEXT ||
1.68      schwarze 1238:            n->next->flags & MDOC_LINE))
1.24      schwarze 1239:                outflags &= ~MMAN_spc;
                   1240: }
                   1241:
                   1242: static int
1.13      schwarze 1243: pre_fn(DECL_ARGS)
                   1244: {
                   1245:
1.21      schwarze 1246:        pre_syn(n);
                   1247:
1.13      schwarze 1248:        n = n->child;
                   1249:        if (NULL == n)
                   1250:                return(0);
                   1251:
1.54      schwarze 1252:        if (MDOC_SYNPRETTY & n->flags)
                   1253:                print_block(".HP 4n", MMAN_nl);
                   1254:
1.24      schwarze 1255:        font_push('B');
1.42      schwarze 1256:        print_node(meta, n);
1.24      schwarze 1257:        font_pop();
1.18      schwarze 1258:        outflags &= ~MMAN_spc;
1.24      schwarze 1259:        print_word("(");
1.18      schwarze 1260:        outflags &= ~MMAN_spc;
1.33      schwarze 1261:
                   1262:        n = n->next;
                   1263:        if (NULL != n)
1.42      schwarze 1264:                pre_fa(meta, n);
1.33      schwarze 1265:        return(0);
1.13      schwarze 1266: }
                   1267:
                   1268: static void
                   1269: post_fn(DECL_ARGS)
                   1270: {
                   1271:
1.18      schwarze 1272:        print_word(")");
1.13      schwarze 1273:        if (MDOC_SYNPRETTY & n->flags) {
1.18      schwarze 1274:                print_word(";");
1.54      schwarze 1275:                outflags |= MMAN_PP;
1.14      schwarze 1276:        }
                   1277: }
                   1278:
                   1279: static int
                   1280: pre_fo(DECL_ARGS)
                   1281: {
                   1282:
                   1283:        switch (n->type) {
1.87      schwarze 1284:        case ROFFT_BLOCK:
1.21      schwarze 1285:                pre_syn(n);
                   1286:                break;
1.87      schwarze 1287:        case ROFFT_HEAD:
1.83      schwarze 1288:                if (n->child == NULL)
                   1289:                        return(0);
1.56      schwarze 1290:                if (MDOC_SYNPRETTY & n->flags)
                   1291:                        print_block(".HP 4n", MMAN_nl);
1.24      schwarze 1292:                font_push('B');
1.14      schwarze 1293:                break;
1.87      schwarze 1294:        case ROFFT_BODY:
1.83      schwarze 1295:                outflags &= ~(MMAN_spc | MMAN_nl);
1.18      schwarze 1296:                print_word("(");
                   1297:                outflags &= ~MMAN_spc;
1.14      schwarze 1298:                break;
                   1299:        default:
                   1300:                break;
                   1301:        }
                   1302:        return(1);
                   1303: }
1.56      schwarze 1304:
1.14      schwarze 1305: static void
                   1306: post_fo(DECL_ARGS)
                   1307: {
                   1308:
                   1309:        switch (n->type) {
1.87      schwarze 1310:        case ROFFT_HEAD:
1.83      schwarze 1311:                if (n->child != NULL)
                   1312:                        font_pop();
1.14      schwarze 1313:                break;
1.87      schwarze 1314:        case ROFFT_BODY:
1.42      schwarze 1315:                post_fn(meta, n);
1.14      schwarze 1316:                break;
                   1317:        default:
                   1318:                break;
1.13      schwarze 1319:        }
1.12      schwarze 1320: }
                   1321:
                   1322: static int
1.21      schwarze 1323: pre_ft(DECL_ARGS)
                   1324: {
                   1325:
                   1326:        pre_syn(n);
1.24      schwarze 1327:        font_push('I');
1.21      schwarze 1328:        return(1);
                   1329: }
                   1330:
                   1331: static int
1.12      schwarze 1332: pre_in(DECL_ARGS)
                   1333: {
                   1334:
                   1335:        if (MDOC_SYNPRETTY & n->flags) {
1.21      schwarze 1336:                pre_syn(n);
1.24      schwarze 1337:                font_push('B');
                   1338:                print_word("#include <");
                   1339:                outflags &= ~MMAN_spc;
                   1340:        } else {
                   1341:                print_word("<");
                   1342:                outflags &= ~MMAN_spc;
                   1343:                font_push('I');
                   1344:        }
1.12      schwarze 1345:        return(1);
                   1346: }
                   1347:
                   1348: static void
                   1349: post_in(DECL_ARGS)
                   1350: {
                   1351:
                   1352:        if (MDOC_SYNPRETTY & n->flags) {
1.24      schwarze 1353:                outflags &= ~MMAN_spc;
                   1354:                print_word(">");
                   1355:                font_pop();
1.19      schwarze 1356:                outflags |= MMAN_br;
1.24      schwarze 1357:        } else {
                   1358:                font_pop();
                   1359:                outflags &= ~MMAN_spc;
                   1360:                print_word(">");
                   1361:        }
1.1       schwarze 1362: }
                   1363:
                   1364: static int
                   1365: pre_it(DECL_ARGS)
                   1366: {
1.88    ! schwarze 1367:        const struct roff_node *bln;
1.1       schwarze 1368:
1.28      schwarze 1369:        switch (n->type) {
1.87      schwarze 1370:        case ROFFT_HEAD:
1.34      schwarze 1371:                outflags |= MMAN_PP | MMAN_nl;
1.28      schwarze 1372:                bln = n->parent->parent;
1.34      schwarze 1373:                if (0 == bln->norm->Bl.comp ||
1.37      schwarze 1374:                    (NULL == n->parent->prev &&
                   1375:                     NULL == bln->parent->prev))
1.34      schwarze 1376:                        outflags |= MMAN_sp;
                   1377:                outflags &= ~MMAN_br;
1.3       schwarze 1378:                switch (bln->norm->Bl.type) {
1.61      schwarze 1379:                case LIST_item:
1.28      schwarze 1380:                        return(0);
1.61      schwarze 1381:                case LIST_inset:
1.28      schwarze 1382:                        /* FALLTHROUGH */
1.61      schwarze 1383:                case LIST_diag:
1.28      schwarze 1384:                        /* FALLTHROUGH */
1.61      schwarze 1385:                case LIST_ohang:
1.28      schwarze 1386:                        if (bln->norm->Bl.type == LIST_diag)
1.34      schwarze 1387:                                print_line(".B \"", 0);
1.28      schwarze 1388:                        else
1.34      schwarze 1389:                                print_line(".R \"", 0);
1.28      schwarze 1390:                        outflags &= ~MMAN_spc;
                   1391:                        return(1);
1.61      schwarze 1392:                case LIST_bullet:
1.28      schwarze 1393:                        /* FALLTHROUGH */
1.61      schwarze 1394:                case LIST_dash:
1.28      schwarze 1395:                        /* FALLTHROUGH */
1.61      schwarze 1396:                case LIST_hyphen:
1.79      schwarze 1397:                        print_width(&bln->norm->Bl, NULL);
1.35      schwarze 1398:                        TPremain = 0;
1.28      schwarze 1399:                        outflags |= MMAN_nl;
                   1400:                        font_push('B');
                   1401:                        if (LIST_bullet == bln->norm->Bl.type)
1.70      schwarze 1402:                                print_word("\\(bu");
1.28      schwarze 1403:                        else
                   1404:                                print_word("-");
                   1405:                        font_pop();
1.65      schwarze 1406:                        outflags |= MMAN_nl;
                   1407:                        return(0);
1.61      schwarze 1408:                case LIST_enum:
1.79      schwarze 1409:                        print_width(&bln->norm->Bl, NULL);
1.35      schwarze 1410:                        TPremain = 0;
1.28      schwarze 1411:                        outflags |= MMAN_nl;
                   1412:                        print_count(&bln->norm->Bl.count);
1.65      schwarze 1413:                        outflags |= MMAN_nl;
                   1414:                        return(0);
1.61      schwarze 1415:                case LIST_hang:
1.79      schwarze 1416:                        print_width(&bln->norm->Bl, n->child);
1.35      schwarze 1417:                        TPremain = 0;
1.65      schwarze 1418:                        outflags |= MMAN_nl;
                   1419:                        return(1);
1.61      schwarze 1420:                case LIST_tag:
1.79      schwarze 1421:                        print_width(&bln->norm->Bl, n->child);
1.35      schwarze 1422:                        putchar('\n');
                   1423:                        outflags &= ~MMAN_spc;
                   1424:                        return(1);
1.3       schwarze 1425:                default:
1.30      schwarze 1426:                        return(1);
1.3       schwarze 1427:                }
1.28      schwarze 1428:        default:
                   1429:                break;
1.1       schwarze 1430:        }
                   1431:        return(1);
1.28      schwarze 1432: }
                   1433:
1.46      schwarze 1434: /*
                   1435:  * This function is called after closing out an indented block.
                   1436:  * If we are inside an enclosing list, restore its indentation.
                   1437:  */
                   1438: static void
                   1439: mid_it(void)
                   1440: {
                   1441:        char             buf[24];
                   1442:
                   1443:        /* Nothing to do outside a list. */
                   1444:        if (0 == Bl_stack_len || 0 == Bl_stack[Bl_stack_len - 1])
                   1445:                return;
                   1446:
                   1447:        /* The indentation has already been set up. */
                   1448:        if (Bl_stack_post[Bl_stack_len - 1])
                   1449:                return;
                   1450:
                   1451:        /* Restore the indentation of the enclosing list. */
                   1452:        print_line(".RS", MMAN_Bk_susp);
1.79      schwarze 1453:        (void)snprintf(buf, sizeof(buf), "%dn",
1.62      schwarze 1454:            Bl_stack[Bl_stack_len - 1]);
1.46      schwarze 1455:        print_word(buf);
                   1456:
                   1457:        /* Remeber to close out this .RS block later. */
                   1458:        Bl_stack_post[Bl_stack_len - 1] = 1;
                   1459: }
                   1460:
1.28      schwarze 1461: static void
                   1462: post_it(DECL_ARGS)
                   1463: {
1.88    ! schwarze 1464:        const struct roff_node *bln;
1.28      schwarze 1465:
1.31      schwarze 1466:        bln = n->parent->parent;
                   1467:
                   1468:        switch (n->type) {
1.87      schwarze 1469:        case ROFFT_HEAD:
1.28      schwarze 1470:                switch (bln->norm->Bl.type) {
1.61      schwarze 1471:                case LIST_diag:
1.28      schwarze 1472:                        outflags &= ~MMAN_spc;
                   1473:                        print_word("\\ ");
                   1474:                        break;
1.61      schwarze 1475:                case LIST_ohang:
1.28      schwarze 1476:                        outflags |= MMAN_br;
                   1477:                        break;
                   1478:                default:
                   1479:                        break;
                   1480:                }
1.31      schwarze 1481:                break;
1.87      schwarze 1482:        case ROFFT_BODY:
1.43      schwarze 1483:                switch (bln->norm->Bl.type) {
1.61      schwarze 1484:                case LIST_bullet:
1.43      schwarze 1485:                        /* FALLTHROUGH */
1.61      schwarze 1486:                case LIST_dash:
1.43      schwarze 1487:                        /* FALLTHROUGH */
1.61      schwarze 1488:                case LIST_hyphen:
1.43      schwarze 1489:                        /* FALLTHROUGH */
1.61      schwarze 1490:                case LIST_enum:
1.43      schwarze 1491:                        /* FALLTHROUGH */
1.61      schwarze 1492:                case LIST_hang:
1.43      schwarze 1493:                        /* FALLTHROUGH */
1.61      schwarze 1494:                case LIST_tag:
1.43      schwarze 1495:                        assert(Bl_stack_len);
                   1496:                        Bl_stack[--Bl_stack_len] = 0;
                   1497:
                   1498:                        /*
                   1499:                         * Our indentation had to be restored
1.46      schwarze 1500:                         * after a child display or child list.
1.43      schwarze 1501:                         * Close out that indentation block now.
                   1502:                         */
                   1503:                        if (Bl_stack_post[Bl_stack_len]) {
                   1504:                                print_line(".RE", MMAN_nl);
                   1505:                                Bl_stack_post[Bl_stack_len] = 0;
                   1506:                        }
                   1507:                        break;
1.61      schwarze 1508:                case LIST_column:
1.43      schwarze 1509:                        if (NULL != n->next) {
                   1510:                                putchar('\t');
                   1511:                                outflags &= ~MMAN_spc;
                   1512:                        }
                   1513:                        break;
                   1514:                default:
                   1515:                        break;
1.31      schwarze 1516:                }
                   1517:                break;
                   1518:        default:
                   1519:                break;
1.28      schwarze 1520:        }
1.11      schwarze 1521: }
                   1522:
                   1523: static void
                   1524: post_lb(DECL_ARGS)
                   1525: {
                   1526:
1.19      schwarze 1527:        if (SEC_LIBRARY == n->sec)
                   1528:                outflags |= MMAN_br;
1.22      schwarze 1529: }
                   1530:
                   1531: static int
                   1532: pre_lk(DECL_ARGS)
                   1533: {
1.88    ! schwarze 1534:        const struct roff_node *link, *descr;
1.22      schwarze 1535:
                   1536:        if (NULL == (link = n->child))
                   1537:                return(0);
                   1538:
                   1539:        if (NULL != (descr = link->next)) {
1.24      schwarze 1540:                font_push('I');
1.22      schwarze 1541:                while (NULL != descr) {
                   1542:                        print_word(descr->string);
                   1543:                        descr = descr->next;
                   1544:                }
                   1545:                print_word(":");
1.24      schwarze 1546:                font_pop();
1.22      schwarze 1547:        }
                   1548:
1.24      schwarze 1549:        font_push('B');
1.22      schwarze 1550:        print_word(link->string);
1.24      schwarze 1551:        font_pop();
1.22      schwarze 1552:        return(0);
1.60      schwarze 1553: }
                   1554:
                   1555: static int
                   1556: pre_ll(DECL_ARGS)
                   1557: {
                   1558:
                   1559:        print_line(".ll", 0);
                   1560:        return(1);
1.1       schwarze 1561: }
                   1562:
                   1563: static int
1.24      schwarze 1564: pre_li(DECL_ARGS)
                   1565: {
                   1566:
                   1567:        font_push('R');
                   1568:        return(1);
                   1569: }
                   1570:
                   1571: static int
1.1       schwarze 1572: pre_nm(DECL_ARGS)
                   1573: {
1.36      schwarze 1574:        char    *name;
1.1       schwarze 1575:
1.87      schwarze 1576:        if (n->type == ROFFT_BLOCK) {
1.53      schwarze 1577:                outflags |= MMAN_Bk;
1.21      schwarze 1578:                pre_syn(n);
1.53      schwarze 1579:        }
1.87      schwarze 1580:        if (n->type != ROFFT_ELEM && n->type != ROFFT_HEAD)
1.1       schwarze 1581:                return(1);
1.42      schwarze 1582:        name = n->child ? n->child->string : meta->name;
1.36      schwarze 1583:        if (NULL == name)
1.21      schwarze 1584:                return(0);
1.87      schwarze 1585:        if (n->type == ROFFT_HEAD) {
1.36      schwarze 1586:                if (NULL == n->parent->prev)
                   1587:                        outflags |= MMAN_sp;
                   1588:                print_block(".HP", 0);
1.52      schwarze 1589:                printf(" %zun", strlen(name) + 1);
1.36      schwarze 1590:                outflags |= MMAN_nl;
                   1591:        }
1.24      schwarze 1592:        font_push('B');
1.1       schwarze 1593:        if (NULL == n->child)
1.42      schwarze 1594:                print_word(meta->name);
1.1       schwarze 1595:        return(1);
                   1596: }
                   1597:
                   1598: static void
                   1599: post_nm(DECL_ARGS)
                   1600: {
                   1601:
1.53      schwarze 1602:        switch (n->type) {
1.87      schwarze 1603:        case ROFFT_BLOCK:
1.53      schwarze 1604:                outflags &= ~MMAN_Bk;
                   1605:                break;
1.87      schwarze 1606:        case ROFFT_HEAD:
1.53      schwarze 1607:                /* FALLTHROUGH */
1.87      schwarze 1608:        case ROFFT_ELEM:
1.66      schwarze 1609:                if (n->child != NULL || meta->name != NULL)
                   1610:                        font_pop();
1.53      schwarze 1611:                break;
                   1612:        default:
                   1613:                break;
                   1614:        }
1.23      schwarze 1615: }
                   1616:
                   1617: static int
                   1618: pre_no(DECL_ARGS)
                   1619: {
                   1620:
                   1621:        outflags |= MMAN_spc_force;
                   1622:        return(1);
1.1       schwarze 1623: }
                   1624:
                   1625: static int
                   1626: pre_ns(DECL_ARGS)
                   1627: {
                   1628:
1.18      schwarze 1629:        outflags &= ~MMAN_spc;
1.1       schwarze 1630:        return(0);
                   1631: }
                   1632:
1.3       schwarze 1633: static void
                   1634: post_pf(DECL_ARGS)
                   1635: {
                   1636:
1.75      schwarze 1637:        if ( ! (n->next == NULL || n->next->flags & MDOC_LINE))
                   1638:                outflags &= ~MMAN_spc;
1.3       schwarze 1639: }
                   1640:
1.1       schwarze 1641: static int
                   1642: pre_pp(DECL_ARGS)
                   1643: {
                   1644:
1.34      schwarze 1645:        if (MDOC_It != n->parent->tok)
                   1646:                outflags |= MMAN_PP;
                   1647:        outflags |= MMAN_sp | MMAN_nl;
                   1648:        outflags &= ~MMAN_br;
1.32      schwarze 1649:        return(0);
                   1650: }
                   1651:
                   1652: static int
                   1653: pre_rs(DECL_ARGS)
                   1654: {
                   1655:
                   1656:        if (SEC_SEE_ALSO == n->sec) {
1.34      schwarze 1657:                outflags |= MMAN_PP | MMAN_sp | MMAN_nl;
                   1658:                outflags &= ~MMAN_br;
1.32      schwarze 1659:        }
                   1660:        return(1);
1.66      schwarze 1661: }
                   1662:
                   1663: static int
                   1664: pre_rv(DECL_ARGS)
                   1665: {
                   1666:        int      nchild;
                   1667:
                   1668:        outflags |= MMAN_br | MMAN_nl;
                   1669:
                   1670:        nchild = n->nchild;
                   1671:        if (nchild > 0) {
                   1672:                print_word("The");
                   1673:
                   1674:                for (n = n->child; n; n = n->next) {
                   1675:                        font_push('B');
                   1676:                        print_word(n->string);
                   1677:                        font_pop();
                   1678:
                   1679:                        outflags &= ~MMAN_spc;
                   1680:                        print_word("()");
                   1681:
                   1682:                        if (n->next == NULL)
                   1683:                                continue;
                   1684:
                   1685:                        if (nchild > 2) {
                   1686:                                outflags &= ~MMAN_spc;
                   1687:                                print_word(",");
                   1688:                        }
                   1689:                        if (n->next->next == NULL)
                   1690:                                print_word("and");
                   1691:                }
                   1692:
                   1693:                if (nchild > 1)
                   1694:                        print_word("functions return");
                   1695:                else
                   1696:                        print_word("function returns");
                   1697:
                   1698:                print_word("the value\\~0 if successful;");
                   1699:        } else
                   1700:                print_word("Upon successful completion, "
                   1701:                    "the value\\~0 is returned;");
                   1702:
                   1703:        print_word("otherwise the value\\~\\-1 is returned"
                   1704:            " and the global variable");
                   1705:
                   1706:        font_push('I');
                   1707:        print_word("errno");
                   1708:        font_pop();
                   1709:
                   1710:        print_word("is set to indicate the error.");
                   1711:        outflags |= MMAN_nl;
1.73      schwarze 1712:        return(0);
                   1713: }
                   1714:
                   1715: static int
                   1716: pre_skip(DECL_ARGS)
                   1717: {
                   1718:
1.66      schwarze 1719:        return(0);
1.9       schwarze 1720: }
                   1721:
                   1722: static int
                   1723: pre_sm(DECL_ARGS)
                   1724: {
                   1725:
1.64      schwarze 1726:        if (NULL == n->child)
                   1727:                outflags ^= MMAN_Sm;
                   1728:        else if (0 == strcmp("on", n->child->string))
                   1729:                outflags |= MMAN_Sm;
1.9       schwarze 1730:        else
1.18      schwarze 1731:                outflags &= ~MMAN_Sm;
1.64      schwarze 1732:
                   1733:        if (MMAN_Sm & outflags)
                   1734:                outflags |= MMAN_spc;
                   1735:
1.9       schwarze 1736:        return(0);
1.1       schwarze 1737: }
                   1738:
                   1739: static int
1.3       schwarze 1740: pre_sp(DECL_ARGS)
1.1       schwarze 1741: {
                   1742:
1.38      schwarze 1743:        if (MMAN_PP & outflags) {
                   1744:                outflags &= ~MMAN_PP;
                   1745:                print_line(".PP", 0);
                   1746:        } else
                   1747:                print_line(".sp", 0);
1.1       schwarze 1748:        return(1);
                   1749: }
                   1750:
                   1751: static void
1.3       schwarze 1752: post_sp(DECL_ARGS)
1.1       schwarze 1753: {
                   1754:
1.18      schwarze 1755:        outflags |= MMAN_nl;
1.15      schwarze 1756: }
                   1757:
                   1758: static int
1.24      schwarze 1759: pre_sy(DECL_ARGS)
                   1760: {
                   1761:
                   1762:        font_push('B');
                   1763:        return(1);
                   1764: }
                   1765:
                   1766: static int
1.15      schwarze 1767: pre_vt(DECL_ARGS)
                   1768: {
                   1769:
                   1770:        if (MDOC_SYNPRETTY & n->flags) {
1.16      schwarze 1771:                switch (n->type) {
1.87      schwarze 1772:                case ROFFT_BLOCK:
1.21      schwarze 1773:                        pre_syn(n);
1.16      schwarze 1774:                        return(1);
1.87      schwarze 1775:                case ROFFT_BODY:
1.16      schwarze 1776:                        break;
                   1777:                default:
                   1778:                        return(0);
                   1779:                }
1.15      schwarze 1780:        }
1.24      schwarze 1781:        font_push('I');
1.15      schwarze 1782:        return(1);
                   1783: }
                   1784:
                   1785: static void
                   1786: post_vt(DECL_ARGS)
                   1787: {
1.16      schwarze 1788:
1.87      schwarze 1789:        if (n->flags & MDOC_SYNPRETTY && n->type != ROFFT_BODY)
1.16      schwarze 1790:                return;
1.24      schwarze 1791:        font_pop();
1.1       schwarze 1792: }
                   1793:
                   1794: static int
                   1795: pre_xr(DECL_ARGS)
                   1796: {
                   1797:
                   1798:        n = n->child;
                   1799:        if (NULL == n)
                   1800:                return(0);
1.42      schwarze 1801:        print_node(meta, n);
1.1       schwarze 1802:        n = n->next;
                   1803:        if (NULL == n)
                   1804:                return(0);
1.18      schwarze 1805:        outflags &= ~MMAN_spc;
                   1806:        print_word("(");
1.42      schwarze 1807:        print_node(meta, n);
1.18      schwarze 1808:        print_word(")");
1.1       schwarze 1809:        return(0);
1.5       schwarze 1810: }
                   1811:
                   1812: static int
                   1813: pre_ux(DECL_ARGS)
                   1814: {
                   1815:
1.18      schwarze 1816:        print_word(manacts[n->tok].prefix);
1.5       schwarze 1817:        if (NULL == n->child)
                   1818:                return(0);
1.18      schwarze 1819:        outflags &= ~MMAN_spc;
1.39      millert  1820:        print_word("\\ ");
1.18      schwarze 1821:        outflags &= ~MMAN_spc;
1.5       schwarze 1822:        return(1);
1.1       schwarze 1823: }