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

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