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

Diff for /mandoc/mdoc_man.c between version 1.90 and 1.138

version 1.90, 2015/04/02 22:48:17 version 1.138, 2023/04/28 19:11:04
Line 1 
Line 1 
 /*      $Id$ */  /* $Id$ */
 /*  /*
  * Copyright (c) 2011-2015 Ingo Schwarze <schwarze@openbsd.org>   * Copyright (c) 2011-2021 Ingo Schwarze <schwarze@openbsd.org>
  *   *
  * Permission to use, copy, modify, and distribute this software for any   * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above   * purpose with or without fee is hereby granted, provided that the above
Line 20 
Line 20 
   
 #include <assert.h>  #include <assert.h>
 #include <stdio.h>  #include <stdio.h>
   #include <stdlib.h>
 #include <string.h>  #include <string.h>
   
 #include "mandoc_aux.h"  #include "mandoc_aux.h"
Line 30 
Line 31 
 #include "out.h"  #include "out.h"
 #include "main.h"  #include "main.h"
   
 #define DECL_ARGS const struct mdoc_meta *meta, struct roff_node *n  #define DECL_ARGS const struct roff_meta *meta, struct roff_node *n
   
 struct  manact {  typedef int     (*int_fp)(DECL_ARGS);
         int             (*cond)(DECL_ARGS); /* DON'T run actions */  typedef void    (*void_fp)(DECL_ARGS);
         int             (*pre)(DECL_ARGS); /* pre-node action */  
         void            (*post)(DECL_ARGS); /* post-node action */  struct  mdoc_man_act {
           int_fp            cond; /* DON'T run actions */
           int_fp            pre; /* pre-node action */
           void_fp           post; /* post-node action */
         const char       *prefix; /* pre-node string constant */          const char       *prefix; /* pre-node string constant */
         const char       *suffix; /* post-node string constant */          const char       *suffix; /* post-node string constant */
 };  };
Line 44  static int   cond_body(DECL_ARGS);
Line 48  static int   cond_body(DECL_ARGS);
 static  int       cond_head(DECL_ARGS);  static  int       cond_head(DECL_ARGS);
 static  void      font_push(char);  static  void      font_push(char);
 static  void      font_pop(void);  static  void      font_pop(void);
   static  int       man_strlen(const char *);
 static  void      mid_it(void);  static  void      mid_it(void);
 static  void      post__t(DECL_ARGS);  static  void      post__t(DECL_ARGS);
 static  void      post_aq(DECL_ARGS);  static  void      post_aq(DECL_ARGS);
Line 68  static void   post_nm(DECL_ARGS);
Line 73  static void   post_nm(DECL_ARGS);
 static  void      post_percent(DECL_ARGS);  static  void      post_percent(DECL_ARGS);
 static  void      post_pf(DECL_ARGS);  static  void      post_pf(DECL_ARGS);
 static  void      post_sect(DECL_ARGS);  static  void      post_sect(DECL_ARGS);
 static  void      post_sp(DECL_ARGS);  
 static  void      post_vt(DECL_ARGS);  static  void      post_vt(DECL_ARGS);
 static  int       pre__t(DECL_ARGS);  static  int       pre__t(DECL_ARGS);
   static  int       pre_abort(DECL_ARGS);
 static  int       pre_an(DECL_ARGS);  static  int       pre_an(DECL_ARGS);
 static  int       pre_ap(DECL_ARGS);  static  int       pre_ap(DECL_ARGS);
 static  int       pre_aq(DECL_ARGS);  static  int       pre_aq(DECL_ARGS);
Line 78  static int   pre_bd(DECL_ARGS);
Line 83  static int   pre_bd(DECL_ARGS);
 static  int       pre_bf(DECL_ARGS);  static  int       pre_bf(DECL_ARGS);
 static  int       pre_bk(DECL_ARGS);  static  int       pre_bk(DECL_ARGS);
 static  int       pre_bl(DECL_ARGS);  static  int       pre_bl(DECL_ARGS);
 static  int       pre_br(DECL_ARGS);  static  void      pre_br(DECL_ARGS);
 static  int       pre_bx(DECL_ARGS);  
 static  int       pre_dl(DECL_ARGS);  static  int       pre_dl(DECL_ARGS);
 static  int       pre_en(DECL_ARGS);  static  int       pre_en(DECL_ARGS);
 static  int       pre_enc(DECL_ARGS);  static  int       pre_enc(DECL_ARGS);
Line 92  static int   pre_fd(DECL_ARGS);
Line 96  static int   pre_fd(DECL_ARGS);
 static  int       pre_fl(DECL_ARGS);  static  int       pre_fl(DECL_ARGS);
 static  int       pre_fn(DECL_ARGS);  static  int       pre_fn(DECL_ARGS);
 static  int       pre_fo(DECL_ARGS);  static  int       pre_fo(DECL_ARGS);
 static  int       pre_ft(DECL_ARGS);  static  void      pre_ft(DECL_ARGS);
   static  int       pre_Ft(DECL_ARGS);
 static  int       pre_in(DECL_ARGS);  static  int       pre_in(DECL_ARGS);
 static  int       pre_it(DECL_ARGS);  static  int       pre_it(DECL_ARGS);
 static  int       pre_lk(DECL_ARGS);  static  int       pre_lk(DECL_ARGS);
 static  int       pre_li(DECL_ARGS);  static  int       pre_li(DECL_ARGS);
 static  int       pre_ll(DECL_ARGS);  
 static  int       pre_nm(DECL_ARGS);  static  int       pre_nm(DECL_ARGS);
 static  int       pre_no(DECL_ARGS);  static  int       pre_no(DECL_ARGS);
   static  void      pre_noarg(DECL_ARGS);
 static  int       pre_ns(DECL_ARGS);  static  int       pre_ns(DECL_ARGS);
   static  void      pre_onearg(DECL_ARGS);
 static  int       pre_pp(DECL_ARGS);  static  int       pre_pp(DECL_ARGS);
 static  int       pre_rs(DECL_ARGS);  static  int       pre_rs(DECL_ARGS);
 static  int       pre_rv(DECL_ARGS);  
 static  int       pre_sm(DECL_ARGS);  static  int       pre_sm(DECL_ARGS);
 static  int       pre_sp(DECL_ARGS);  static  void      pre_sp(DECL_ARGS);
 static  int       pre_sect(DECL_ARGS);  static  int       pre_sect(DECL_ARGS);
 static  int       pre_sy(DECL_ARGS);  static  int       pre_sy(DECL_ARGS);
 static  void      pre_syn(const struct roff_node *);  static  void      pre_syn(struct roff_node *);
   static  void      pre_ta(DECL_ARGS);
 static  int       pre_vt(DECL_ARGS);  static  int       pre_vt(DECL_ARGS);
 static  int       pre_ux(DECL_ARGS);  
 static  int       pre_xr(DECL_ARGS);  static  int       pre_xr(DECL_ARGS);
 static  void      print_word(const char *);  static  void      print_word(const char *);
 static  void      print_line(const char *, int);  static  void      print_line(const char *, int);
Line 121  static void   print_width(const struct mdoc_bl *,
Line 126  static void   print_width(const struct mdoc_bl *,
 static  void      print_count(int *);  static  void      print_count(int *);
 static  void      print_node(DECL_ARGS);  static  void      print_node(DECL_ARGS);
   
 static  const struct manact manacts[MDOC_MAX + 1] = {  static const void_fp roff_man_acts[ROFF_MAX] = {
         { NULL, pre_ap, NULL, NULL, NULL }, /* Ap */          pre_br,         /* br */
           pre_onearg,     /* ce */
           pre_noarg,      /* fi */
           pre_ft,         /* ft */
           pre_onearg,     /* ll */
           pre_onearg,     /* mc */
           pre_noarg,      /* nf */
           pre_onearg,     /* po */
           pre_onearg,     /* rj */
           pre_sp,         /* sp */
           pre_ta,         /* ta */
           pre_onearg,     /* ti */
   };
   
   static const struct mdoc_man_act mdoc_man_acts[MDOC_MAX - MDOC_Dd] = {
         { NULL, NULL, NULL, NULL, NULL }, /* Dd */          { NULL, NULL, NULL, NULL, NULL }, /* Dd */
         { NULL, NULL, NULL, NULL, NULL }, /* Dt */          { NULL, NULL, NULL, NULL, NULL }, /* Dt */
         { NULL, NULL, NULL, NULL, NULL }, /* Os */          { NULL, NULL, NULL, NULL, NULL }, /* Os */
Line 138  static const struct manact manacts[MDOC_MAX + 1] = {
Line 157  static const struct manact manacts[MDOC_MAX + 1] = {
         { NULL, pre_it, post_it, NULL, NULL }, /* It */          { NULL, pre_it, post_it, NULL, NULL }, /* It */
         { NULL, pre_em, post_font, NULL, NULL }, /* Ad */          { NULL, pre_em, post_font, NULL, NULL }, /* Ad */
         { NULL, pre_an, NULL, NULL, NULL }, /* An */          { NULL, pre_an, NULL, NULL, NULL }, /* An */
           { NULL, pre_ap, NULL, NULL, NULL }, /* Ap */
         { NULL, pre_em, post_font, NULL, NULL }, /* Ar */          { NULL, pre_em, post_font, NULL, NULL }, /* Ar */
         { NULL, pre_sy, post_font, NULL, NULL }, /* Cd */          { NULL, pre_sy, post_font, NULL, NULL }, /* Cd */
         { NULL, pre_sy, post_font, NULL, NULL }, /* Cm */          { NULL, pre_sy, post_font, NULL, NULL }, /* Cm */
Line 149  static const struct manact manacts[MDOC_MAX + 1] = {
Line 169  static const struct manact manacts[MDOC_MAX + 1] = {
         { NULL, pre_fd, post_fd, NULL, NULL }, /* Fd */          { NULL, pre_fd, post_fd, NULL, NULL }, /* Fd */
         { NULL, pre_fl, post_fl, NULL, NULL }, /* Fl */          { NULL, pre_fl, post_fl, NULL, NULL }, /* Fl */
         { NULL, pre_fn, post_fn, NULL, NULL }, /* Fn */          { NULL, pre_fn, post_fn, NULL, NULL }, /* Fn */
         { NULL, pre_ft, post_font, NULL, NULL }, /* Ft */          { NULL, pre_Ft, post_font, NULL, NULL }, /* Ft */
         { NULL, pre_sy, post_font, NULL, NULL }, /* Ic */          { NULL, pre_sy, post_font, NULL, NULL }, /* Ic */
         { NULL, pre_in, post_in, NULL, NULL }, /* In */          { NULL, pre_in, post_in, NULL, NULL }, /* In */
         { NULL, pre_li, post_font, NULL, NULL }, /* Li */          { NULL, pre_li, post_font, NULL, NULL }, /* Li */
         { cond_head, pre_enc, NULL, "\\- ", NULL }, /* Nd */          { cond_head, pre_enc, NULL, "\\- ", NULL }, /* Nd */
         { NULL, pre_nm, post_nm, NULL, NULL }, /* Nm */          { NULL, pre_nm, post_nm, NULL, NULL }, /* Nm */
         { cond_body, pre_enc, post_enc, "[", "]" }, /* Op */          { cond_body, pre_enc, post_enc, "[", "]" }, /* Op */
         { NULL, pre_ft, post_font, NULL, NULL }, /* Ot */          { NULL, pre_abort, NULL, NULL, NULL }, /* Ot */
         { NULL, pre_em, post_font, NULL, NULL }, /* Pa */          { NULL, pre_em, post_font, NULL, NULL }, /* Pa */
         { NULL, pre_rv, NULL, NULL, NULL }, /* Rv */          { NULL, pre_ex, NULL, NULL, NULL }, /* Rv */
         { NULL, NULL, NULL, NULL, NULL }, /* St */          { NULL, NULL, NULL, NULL, NULL }, /* St */
         { NULL, pre_em, post_font, NULL, NULL }, /* Va */          { NULL, pre_em, post_font, NULL, NULL }, /* Va */
         { NULL, pre_vt, post_vt, NULL, NULL }, /* Vt */          { NULL, pre_vt, post_vt, NULL, NULL }, /* Vt */
Line 182  static const struct manact manacts[MDOC_MAX + 1] = {
Line 202  static const struct manact manacts[MDOC_MAX + 1] = {
         { NULL, pre_bf, post_bf, NULL, NULL }, /* Bf */          { NULL, pre_bf, post_bf, NULL, NULL }, /* Bf */
         { cond_body, pre_enc, post_enc, "[", "]" }, /* Bo */          { cond_body, pre_enc, post_enc, "[", "]" }, /* Bo */
         { cond_body, pre_enc, post_enc, "[", "]" }, /* Bq */          { cond_body, pre_enc, post_enc, "[", "]" }, /* Bq */
         { NULL, pre_ux, NULL, "BSD/OS", NULL }, /* Bsx */          { NULL, pre_bk, post_bk, NULL, NULL }, /* Bsx */
         { NULL, pre_bx, NULL, NULL, NULL }, /* Bx */          { NULL, pre_bk, post_bk, NULL, NULL }, /* Bx */
         { NULL, pre_skip, NULL, NULL, NULL }, /* Db */          { NULL, pre_skip, NULL, NULL, NULL }, /* Db */
         { NULL, NULL, NULL, NULL, NULL }, /* Dc */          { NULL, NULL, NULL, NULL, NULL }, /* Dc */
         { cond_body, pre_enc, post_enc, "\\(Lq", "\\(Rq" }, /* Do */          { cond_body, pre_enc, post_enc, "\\(lq", "\\(rq" }, /* Do */
         { cond_body, pre_enc, post_enc, "\\(Lq", "\\(Rq" }, /* Dq */          { cond_body, pre_enc, post_enc, "\\(lq", "\\(rq" }, /* Dq */
         { NULL, NULL, NULL, NULL, NULL }, /* Ec */          { NULL, NULL, NULL, NULL, NULL }, /* Ec */
         { NULL, NULL, NULL, NULL, NULL }, /* Ef */          { NULL, NULL, NULL, NULL, NULL }, /* Ef */
         { NULL, pre_em, post_font, NULL, NULL }, /* Em */          { NULL, pre_em, post_font, NULL, NULL }, /* Em */
         { cond_body, pre_eo, post_eo, NULL, NULL }, /* Eo */          { cond_body, pre_eo, post_eo, NULL, NULL }, /* Eo */
         { NULL, pre_ux, NULL, "FreeBSD", NULL }, /* Fx */          { NULL, pre_bk, post_bk, NULL, NULL }, /* Fx */
         { NULL, pre_sy, post_font, NULL, NULL }, /* Ms */          { NULL, pre_sy, post_font, NULL, NULL }, /* Ms */
         { NULL, pre_no, NULL, NULL, NULL }, /* No */          { NULL, pre_no, NULL, NULL, NULL }, /* No */
         { NULL, pre_ns, NULL, NULL, NULL }, /* Ns */          { NULL, pre_ns, NULL, NULL, NULL }, /* Ns */
         { NULL, pre_ux, NULL, "NetBSD", NULL }, /* Nx */          { NULL, pre_bk, post_bk, NULL, NULL }, /* Nx */
         { NULL, pre_ux, NULL, "OpenBSD", NULL }, /* Ox */          { NULL, pre_bk, post_bk, NULL, NULL }, /* Ox */
         { NULL, NULL, NULL, NULL, NULL }, /* Pc */          { NULL, NULL, NULL, NULL, NULL }, /* Pc */
         { NULL, NULL, post_pf, NULL, NULL }, /* Pf */          { NULL, NULL, post_pf, NULL, NULL }, /* Pf */
         { cond_body, pre_enc, post_enc, "(", ")" }, /* Po */          { cond_body, pre_enc, post_enc, "(", ")" }, /* Po */
Line 215  static const struct manact manacts[MDOC_MAX + 1] = {
Line 235  static const struct manact manacts[MDOC_MAX + 1] = {
         { NULL, pre_em, post_font, NULL, NULL }, /* Sx */          { NULL, pre_em, post_font, NULL, NULL }, /* Sx */
         { NULL, pre_sy, post_font, NULL, NULL }, /* Sy */          { NULL, pre_sy, post_font, NULL, NULL }, /* Sy */
         { NULL, pre_li, post_font, NULL, NULL }, /* Tn */          { NULL, pre_li, post_font, NULL, NULL }, /* Tn */
         { NULL, pre_ux, NULL, "UNIX", NULL }, /* Ux */          { NULL, NULL, NULL, NULL, NULL }, /* Ux */
         { NULL, NULL, NULL, NULL, NULL }, /* Xc */          { NULL, NULL, NULL, NULL, NULL }, /* Xc */
         { NULL, NULL, NULL, NULL, NULL }, /* Xo */          { NULL, NULL, NULL, NULL, NULL }, /* Xo */
         { NULL, pre_fo, post_fo, NULL, NULL }, /* Fo */          { NULL, pre_fo, post_fo, NULL, NULL }, /* Fo */
Line 224  static const struct manact manacts[MDOC_MAX + 1] = {
Line 244  static const struct manact manacts[MDOC_MAX + 1] = {
         { NULL, NULL, NULL, NULL, NULL }, /* Oc */          { NULL, NULL, NULL, NULL, NULL }, /* Oc */
         { NULL, pre_bk, post_bk, NULL, NULL }, /* Bk */          { NULL, pre_bk, post_bk, NULL, NULL }, /* Bk */
         { NULL, NULL, NULL, NULL, NULL }, /* Ek */          { NULL, NULL, NULL, NULL, NULL }, /* Ek */
         { NULL, pre_ux, NULL, "is currently in beta test.", NULL }, /* Bt */          { NULL, NULL, NULL, NULL, NULL }, /* Bt */
         { NULL, NULL, NULL, NULL, NULL }, /* Hf */          { NULL, NULL, NULL, NULL, NULL }, /* Hf */
         { NULL, pre_em, post_font, NULL, NULL }, /* Fr */          { NULL, pre_em, post_font, NULL, NULL }, /* Fr */
         { NULL, pre_ux, NULL, "currently under development.", NULL }, /* Ud */          { NULL, NULL, NULL, NULL, NULL }, /* Ud */
         { NULL, NULL, post_lb, NULL, NULL }, /* Lb */          { NULL, NULL, post_lb, NULL, NULL }, /* Lb */
         { NULL, pre_pp, NULL, NULL, NULL }, /* Lp */          { NULL, pre_abort, NULL, NULL, NULL }, /* Lp */
         { NULL, pre_lk, NULL, NULL, NULL }, /* Lk */          { NULL, pre_lk, NULL, NULL, NULL }, /* Lk */
         { NULL, pre_em, post_font, NULL, NULL }, /* Mt */          { NULL, pre_em, post_font, NULL, NULL }, /* Mt */
         { cond_body, pre_enc, post_enc, "{", "}" }, /* Brq */          { cond_body, pre_enc, post_enc, "{", "}" }, /* Brq */
Line 238  static const struct manact manacts[MDOC_MAX + 1] = {
Line 258  static const struct manact manacts[MDOC_MAX + 1] = {
         { NULL, NULL, post_percent, NULL, NULL }, /* %C */          { NULL, NULL, post_percent, NULL, NULL }, /* %C */
         { NULL, pre_skip, NULL, NULL, NULL }, /* Es */          { NULL, pre_skip, NULL, NULL, NULL }, /* Es */
         { cond_body, pre_en, post_en, NULL, NULL }, /* En */          { cond_body, pre_en, post_en, NULL, NULL }, /* En */
         { NULL, pre_ux, NULL, "DragonFly", NULL }, /* Dx */          { NULL, pre_bk, post_bk, NULL, NULL }, /* Dx */
         { NULL, NULL, post_percent, NULL, NULL }, /* %Q */          { NULL, NULL, post_percent, NULL, NULL }, /* %Q */
         { NULL, pre_br, NULL, NULL, NULL }, /* br */  
         { NULL, pre_sp, post_sp, NULL, NULL }, /* sp */  
         { NULL, NULL, post_percent, NULL, NULL }, /* %U */          { NULL, NULL, post_percent, NULL, NULL }, /* %U */
         { NULL, NULL, NULL, NULL, NULL }, /* Ta */          { NULL, NULL, NULL, NULL, NULL }, /* Ta */
         { NULL, pre_ll, post_sp, NULL, NULL }, /* ll */          { NULL, pre_skip, NULL, NULL, NULL }, /* Tg */
         { NULL, NULL, NULL, NULL, NULL }, /* ROOT */  
 };  };
   static const struct mdoc_man_act *mdoc_man_act(enum roff_tok);
   
 static  int             outflags;  static  int             outflags;
 #define MMAN_spc        (1 << 0)  /* blank character before next word */  #define MMAN_spc        (1 << 0)  /* blank character before next word */
Line 277  static struct {
Line 295  static struct {
 }       fontqueue;  }       fontqueue;
   
   
   static const struct mdoc_man_act *
   mdoc_man_act(enum roff_tok tok)
   {
           assert(tok >= MDOC_Dd && tok <= MDOC_MAX);
           return mdoc_man_acts + (tok - MDOC_Dd);
   }
   
   static int
   man_strlen(const char *cp)
   {
           size_t   rsz;
           int      skip, sz;
   
           sz = 0;
           skip = 0;
           for (;;) {
                   rsz = strcspn(cp, "\\");
                   if (rsz) {
                           cp += rsz;
                           if (skip) {
                                   skip = 0;
                                   rsz--;
                           }
                           sz += rsz;
                   }
                   if ('\0' == *cp)
                           break;
                   cp++;
                   switch (mandoc_escape(&cp, NULL, NULL)) {
                   case ESCAPE_ERROR:
                           return sz;
                   case ESCAPE_UNICODE:
                   case ESCAPE_NUMBERED:
                   case ESCAPE_SPECIAL:
                   case ESCAPE_UNDEF:
                   case ESCAPE_OVERSTRIKE:
                           if (skip)
                                   skip = 0;
                           else
                                   sz++;
                           break;
                   case ESCAPE_SKIPCHAR:
                           skip = 1;
                           break;
                   default:
                           break;
                   }
           }
           return sz;
   }
   
 static void  static void
 font_push(char newfont)  font_push(char newfont)
 {  {
Line 394  static void
Line 463  static void
 print_line(const char *s, int newflags)  print_line(const char *s, int newflags)
 {  {
   
         outflags &= ~MMAN_br;  
         outflags |= MMAN_nl;          outflags |= MMAN_nl;
         print_word(s);          print_word(s);
         outflags |= newflags;          outflags |= newflags;
Line 423  print_offs(const char *v, int keywords)
Line 491  print_offs(const char *v, int keywords)
 {  {
         char              buf[24];          char              buf[24];
         struct roffsu     su;          struct roffsu     su;
           const char       *end;
         int               sz;          int               sz;
   
         print_line(".RS", MMAN_Bk_susp);          print_line(".RS", MMAN_Bk_susp);
Line 434  print_offs(const char *v, int keywords)
Line 503  print_offs(const char *v, int keywords)
                 sz = 6;                  sz = 6;
         else if (keywords && !strcmp(v, "indent-two"))          else if (keywords && !strcmp(v, "indent-two"))
                 sz = 12;                  sz = 12;
         else if (a2roffsu(v, &su, SCALE_EN) > 1) {          else {
                 if (SCALE_EN == su.unit)                  end = a2roffsu(v, &su, SCALE_EN);
                   if (end == NULL || *end != '\0')
                           sz = man_strlen(v);
                   else if (SCALE_EN == su.unit)
                         sz = su.scale;                          sz = su.scale;
                 else {                  else {
                         /*                          /*
Line 449  print_offs(const char *v, int keywords)
Line 521  print_offs(const char *v, int keywords)
                         outflags |= MMAN_nl;                          outflags |= MMAN_nl;
                         return;                          return;
                 }                  }
         } else          }
                 sz = strlen(v);  
   
         /*          /*
          * We are inside an enclosing list.           * We are inside an enclosing list.
Line 472  print_width(const struct mdoc_bl *bl, const struct rof
Line 543  print_width(const struct mdoc_bl *bl, const struct rof
 {  {
         char              buf[24];          char              buf[24];
         struct roffsu     su;          struct roffsu     su;
           const char       *end;
         int               numeric, remain, sz, chsz;          int               numeric, remain, sz, chsz;
   
         numeric = 1;          numeric = 1;
Line 480  print_width(const struct mdoc_bl *bl, const struct rof
Line 552  print_width(const struct mdoc_bl *bl, const struct rof
         /* Convert the width into a number (of characters). */          /* Convert the width into a number (of characters). */
         if (bl->width == NULL)          if (bl->width == NULL)
                 sz = (bl->type == LIST_hang) ? 6 : 0;                  sz = (bl->type == LIST_hang) ? 6 : 0;
         else if (a2roffsu(bl->width, &su, SCALE_MAX) > 1) {          else {
                 if (SCALE_EN == su.unit)                  end = a2roffsu(bl->width, &su, SCALE_MAX);
                   if (end == NULL || *end != '\0')
                           sz = man_strlen(bl->width);
                   else if (SCALE_EN == su.unit)
                         sz = su.scale;                          sz = su.scale;
                 else {                  else {
                         sz = 0;                          sz = 0;
                         numeric = 0;                          numeric = 0;
                 }                  }
         } else          }
                 sz = strlen(bl->width);  
   
         /* XXX Rough estimation, might have multiple parts. */          /* XXX Rough estimation, might have multiple parts. */
         if (bl->type == LIST_enum)          if (bl->type == LIST_enum)
                 chsz = (bl->count > 8) + 1;                  chsz = (bl->count > 8) + 1;
         else if (child != NULL && child->type == ROFFT_TEXT)          else if (child != NULL && child->type == ROFFT_TEXT)
                 chsz = strlen(child->string);                  chsz = man_strlen(child->string);
         else          else
                 chsz = 0;                  chsz = 0;
   
Line 509  print_width(const struct mdoc_bl *bl, const struct rof
Line 583  print_width(const struct mdoc_bl *bl, const struct rof
   
         /* Set up the current list. */          /* Set up the current list. */
         if (chsz > sz && bl->type != LIST_tag)          if (chsz > sz && bl->type != LIST_tag)
                 print_block(".HP", 0);                  print_block(".HP", MMAN_spc);
         else {          else {
                 print_block(".TP", 0);                  print_block(".TP", MMAN_spc);
                 remain = sz + 2;                  remain = sz + 2;
         }          }
         if (numeric) {          if (numeric) {
Line 532  print_count(int *count)
Line 606  print_count(int *count)
 }  }
   
 void  void
 man_man(void *arg, const struct man *man)  man_mdoc(void *arg, const struct roff_meta *mdoc)
 {  {
   
         /*  
          * Dump the keep buffer.  
          * We're guaranteed by now that this exists (is non-NULL).  
          * Flush stdout afterward, just in case.  
          */  
         fputs(mparse_getkeep(man_mparse(man)), stdout);  
         fflush(stdout);  
 }  
   
 void  
 man_mdoc(void *arg, const struct mdoc *mdoc)  
 {  
         const struct mdoc_meta *meta;  
         struct roff_node *n;          struct roff_node *n;
   
         meta = mdoc_meta(mdoc);          printf(".\\\" Automatically generated from an mdoc input file."
         n = mdoc_node(mdoc)->child;              "  Do not edit.\n");
           for (n = mdoc->first->child; n != NULL; n = n->next) {
                   if (n->type != ROFFT_COMMENT)
                           break;
                   printf(".\\\"%s\n", n->string);
           }
   
         printf(".TH \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"\n",          printf(".TH \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"\n",
             meta->title,              mdoc->title, (mdoc->msec == NULL ? "" : mdoc->msec),
             (meta->msec == NULL ? "" : meta->msec),              mdoc->date, mdoc->os, mdoc->vol);
             meta->date, meta->os, meta->vol);  
   
         /* Disable hyphenation and if nroff, disable justification. */          /* Disable hyphenation and if nroff, disable justification. */
         printf(".nh\n.if n .ad l");          printf(".nh\n.if n .ad l");
Line 567  man_mdoc(void *arg, const struct mdoc *mdoc)
Line 631  man_mdoc(void *arg, const struct mdoc *mdoc)
                 fontqueue.head = fontqueue.tail = mandoc_malloc(8);                  fontqueue.head = fontqueue.tail = mandoc_malloc(8);
                 *fontqueue.tail = 'R';                  *fontqueue.tail = 'R';
         }          }
         while (n != NULL) {          for (; n != NULL; n = n->next)
                 print_node(meta, n);                  print_node(mdoc, n);
                 n = n->next;  
         }  
         putchar('\n');          putchar('\n');
 }  }
   
 static void  static void
 print_node(DECL_ARGS)  print_node(DECL_ARGS)
 {  {
         const struct manact     *act;          const struct mdoc_man_act       *act;
         struct roff_node        *sub;          struct roff_node                *sub;
         int                      cond, do_sub;          int                              cond, do_sub;
   
           if (n->flags & NODE_NOPRT)
                   return;
   
         /*          /*
          * Break the line if we were parsed subsequent the current node.           * Break the line if we were parsed subsequent the current node.
          * This makes the page structure be more consistent.           * This makes the page structure be more consistent.
          */           */
         if (MMAN_spc & outflags && MDOC_LINE & n->flags)          if (outflags & MMAN_spc &&
               n->flags & NODE_LINE &&
               !roff_node_transparent(n))
                 outflags |= MMAN_nl;                  outflags |= MMAN_nl;
   
         act = NULL;          act = NULL;
         cond = 0;          cond = 0;
         do_sub = 1;          do_sub = 1;
         n->flags &= ~MDOC_ENDED;          n->flags &= ~NODE_ENDED;
   
         if (n->type == ROFFT_TEXT) {          switch (n->type) {
           case ROFFT_EQN:
           case ROFFT_TBL:
                   mandoc_msg(n->type == ROFFT_EQN ? MANDOCERR_EQN_TMAN :
                       MANDOCERR_TBL_TMAN, n->line, n->pos, NULL);
                   outflags |= MMAN_PP | MMAN_sp | MMAN_nl;
                   print_word("The");
                   print_line(".B \\-T man", MMAN_nl);
                   print_word("output mode does not support");
                   print_word(n->type == ROFFT_EQN ? "eqn(7)" : "tbl(7)");
                   print_word("input.");
                   outflags |= MMAN_PP | MMAN_sp | MMAN_nl;
                   return;
           case ROFFT_TEXT:
                 /*                  /*
                  * Make sure that we don't happen to start with a                   * Make sure that we don't happen to start with a
                  * control character at the start of a line.                   * control character at the start of a line.
Line 604  print_node(DECL_ARGS)
Line 684  print_node(DECL_ARGS)
                         printf("\\&");                          printf("\\&");
                         outflags &= ~MMAN_spc;                          outflags &= ~MMAN_spc;
                 }                  }
                 if (outflags & MMAN_Sm && ! (n->flags & MDOC_DELIMC))                  if (n->flags & NODE_DELIMC)
                           outflags &= ~(MMAN_spc | MMAN_spc_force);
                   else if (outflags & MMAN_Sm)
                         outflags |= MMAN_spc_force;                          outflags |= MMAN_spc_force;
                 print_word(n->string);                  print_word(n->string);
                 if (outflags & MMAN_Sm && ! (n->flags & MDOC_DELIMO))                  if (n->flags & NODE_DELIMO)
                           outflags &= ~(MMAN_spc | MMAN_spc_force);
                   else if (outflags & MMAN_Sm)
                         outflags |= MMAN_spc;                          outflags |= MMAN_spc;
         } else {                  break;
                 /*          default:
                  * Conditionally run the pre-node action handler for a                  if (n->tok < ROFF_MAX) {
                  * node.                          (*roff_man_acts[n->tok])(meta, n);
                  */                          return;
                 act = manacts + n->tok;                  }
                   act = mdoc_man_act(n->tok);
                 cond = act->cond == NULL || (*act->cond)(meta, n);                  cond = act->cond == NULL || (*act->cond)(meta, n);
                 if (cond && act->pre && (n->end == ENDBODY_NOT || n->nchild))                  if (cond && act->pre != NULL &&
                       (n->end == ENDBODY_NOT || n->child != NULL))
                         do_sub = (*act->pre)(meta, n);                          do_sub = (*act->pre)(meta, n);
                   break;
         }          }
   
         /*          /*
Line 632  print_node(DECL_ARGS)
Line 719  print_node(DECL_ARGS)
         /*          /*
          * Lastly, conditionally run the post-node handler.           * Lastly, conditionally run the post-node handler.
          */           */
         if (MDOC_ENDED & n->flags)          if (NODE_ENDED & n->flags)
                 return;                  return;
   
         if (cond && act->post)          if (cond && act->post)
                 (*act->post)(meta, n);                  (*act->post)(meta, n);
   
         if (ENDBODY_NOT != n->end)          if (ENDBODY_NOT != n->end)
                 n->body->flags |= MDOC_ENDED;                  n->body->flags |= NODE_ENDED;
   
         if (ENDBODY_NOSPACE == n->end)  
                 outflags &= ~(MMAN_spc | MMAN_nl);  
 }  }
   
 static int  static int
 cond_head(DECL_ARGS)  cond_head(DECL_ARGS)
 {  {
   
         return(n->type == ROFFT_HEAD);          return n->type == ROFFT_HEAD;
 }  }
   
 static int  static int
 cond_body(DECL_ARGS)  cond_body(DECL_ARGS)
 {  {
   
         return(n->type == ROFFT_BODY);          return n->type == ROFFT_BODY;
 }  }
   
 static int  static int
   pre_abort(DECL_ARGS)
   {
           abort();
   }
   
   static int
 pre_enc(DECL_ARGS)  pre_enc(DECL_ARGS)
 {  {
         const char      *prefix;          const char      *prefix;
   
         prefix = manacts[n->tok].prefix;          prefix = mdoc_man_act(n->tok)->prefix;
         if (NULL == prefix)          if (NULL == prefix)
                 return(1);                  return 1;
         print_word(prefix);          print_word(prefix);
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         return(1);          return 1;
 }  }
   
 static void  static void
Line 677  post_enc(DECL_ARGS)
Line 767  post_enc(DECL_ARGS)
 {  {
         const char *suffix;          const char *suffix;
   
         suffix = manacts[n->tok].suffix;          suffix = mdoc_man_act(n->tok)->suffix;
         if (NULL == suffix)          if (NULL == suffix)
                 return;                  return;
         outflags &= ~(MMAN_spc | MMAN_nl);          outflags &= ~(MMAN_spc | MMAN_nl);
Line 687  post_enc(DECL_ARGS)
Line 777  post_enc(DECL_ARGS)
 static int  static int
 pre_ex(DECL_ARGS)  pre_ex(DECL_ARGS)
 {  {
         int      nchild;  
   
         outflags |= MMAN_br | MMAN_nl;          outflags |= MMAN_br | MMAN_nl;
           return 1;
         print_word("The");  
   
         nchild = n->nchild;  
         for (n = n->child; n; n = n->next) {  
                 font_push('B');  
                 print_word(n->string);  
                 font_pop();  
   
                 if (n->next == NULL)  
                         continue;  
   
                 if (nchild > 2) {  
                         outflags &= ~MMAN_spc;  
                         print_word(",");  
                 }  
                 if (n->next->next == NULL)  
                         print_word("and");  
         }  
   
         if (nchild > 1)  
                 print_word("utilities exit\\~0");  
         else  
                 print_word("utility exits\\~0");  
   
         print_word("on success, and\\~>0 if an error occurs.");  
         outflags |= MMAN_nl;  
         return(0);  
 }  }
   
 static void  static void
Line 730  post_font(DECL_ARGS)
Line 791  post_font(DECL_ARGS)
 static void  static void
 post_percent(DECL_ARGS)  post_percent(DECL_ARGS)
 {  {
           struct roff_node *np, *nn, *nnn;
   
         if (pre_em == manacts[n->tok].pre)          if (mdoc_man_act(n->tok)->pre == pre_em)
                 font_pop();                  font_pop();
         if (n->next) {  
                 print_word(",");          if ((nn = roff_node_next(n)) != NULL) {
                 if (n->prev &&  n->prev->tok == n->tok &&                  np = roff_node_prev(n);
                                 n->next->tok == n->tok)                  nnn = nn == NULL ? NULL : roff_node_next(nn);
                   if (nn->tok != n->tok ||
                       (np != NULL && np->tok == n->tok) ||
                       (nnn != NULL && nnn->tok == n->tok))
                           print_word(",");
                   if (nn->tok == n->tok &&
                       (nnn == NULL || nnn->tok != n->tok))
                         print_word("and");                          print_word("and");
         } else {          } else {
                 print_word(".");                  print_word(".");
Line 748  static int
Line 816  static int
 pre__t(DECL_ARGS)  pre__t(DECL_ARGS)
 {  {
   
         if (n->parent && MDOC_Rs == n->parent->tok &&          if (n->parent->tok == MDOC_Rs && n->parent->norm->Rs.quote_T) {
             n->parent->norm->Rs.quote_T) {                  print_word("\\(lq");
                 print_word("");  
                 putchar('\"');  
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
         } else          } else
                 font_push('I');                  font_push('I');
         return(1);          return 1;
 }  }
   
 static void  static void
 post__t(DECL_ARGS)  post__t(DECL_ARGS)
 {  {
   
         if (n->parent && MDOC_Rs == n->parent->tok &&          if (n->parent->tok  == MDOC_Rs && n->parent->norm->Rs.quote_T) {
             n->parent->norm->Rs.quote_T) {  
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
                 print_word("");                  print_word("\\(rq");
                 putchar('\"');  
         } else          } else
                 font_pop();                  font_pop();
         post_percent(meta, n);          post_percent(meta, n);
Line 781  pre_sect(DECL_ARGS)
Line 845  pre_sect(DECL_ARGS)
   
         if (n->type == ROFFT_HEAD) {          if (n->type == ROFFT_HEAD) {
                 outflags |= MMAN_sp;                  outflags |= MMAN_sp;
                 print_block(manacts[n->tok].prefix, 0);                  print_block(mdoc_man_act(n->tok)->prefix, 0);
                 print_word("");                  print_word("");
                 putchar('\"');                  putchar('\"');
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
         }          }
         return(1);          return 1;
 }  }
   
 /*  /*
Line 808  post_sect(DECL_ARGS)
Line 872  post_sect(DECL_ARGS)
   
 /* See mdoc_term.c, synopsis_pre() for comments. */  /* See mdoc_term.c, synopsis_pre() for comments. */
 static void  static void
 pre_syn(const struct roff_node *n)  pre_syn(struct roff_node *n)
 {  {
           struct roff_node *np;
   
         if (NULL == n->prev || ! (MDOC_SYNPRETTY & n->flags))          if ((n->flags & NODE_SYNPRETTY) == 0 ||
               (np = roff_node_prev(n)) == NULL)
                 return;                  return;
   
         if (n->prev->tok == n->tok &&          if (np->tok == n->tok &&
             MDOC_Ft != n->tok &&              MDOC_Ft != n->tok &&
             MDOC_Fo != n->tok &&              MDOC_Fo != n->tok &&
             MDOC_Fn != n->tok) {              MDOC_Fn != n->tok) {
Line 822  pre_syn(const struct roff_node *n)
Line 888  pre_syn(const struct roff_node *n)
                 return;                  return;
         }          }
   
         switch (n->prev->tok) {          switch (np->tok) {
         case MDOC_Fd:          case MDOC_Fd:
                 /* FALLTHROUGH */  
         case MDOC_Fn:          case MDOC_Fn:
                 /* FALLTHROUGH */  
         case MDOC_Fo:          case MDOC_Fo:
                 /* FALLTHROUGH */  
         case MDOC_In:          case MDOC_In:
                 /* FALLTHROUGH */  
         case MDOC_Vt:          case MDOC_Vt:
                 outflags |= MMAN_sp;                  outflags |= MMAN_sp;
                 break;                  break;
Line 854  pre_an(DECL_ARGS)
Line 916  pre_an(DECL_ARGS)
         case AUTH_split:          case AUTH_split:
                 outflags &= ~MMAN_An_nosplit;                  outflags &= ~MMAN_An_nosplit;
                 outflags |= MMAN_An_split;                  outflags |= MMAN_An_split;
                 return(0);                  return 0;
         case AUTH_nosplit:          case AUTH_nosplit:
                 outflags &= ~MMAN_An_split;                  outflags &= ~MMAN_An_split;
                 outflags |= MMAN_An_nosplit;                  outflags |= MMAN_An_nosplit;
                 return(0);                  return 0;
         default:          default:
                 if (MMAN_An_split & outflags)                  if (MMAN_An_split & outflags)
                         outflags |= MMAN_br;                          outflags |= MMAN_br;
                 else if (SEC_AUTHORS == n->sec &&                  else if (SEC_AUTHORS == n->sec &&
                     ! (MMAN_An_nosplit & outflags))                      ! (MMAN_An_nosplit & outflags))
                         outflags |= MMAN_An_split;                          outflags |= MMAN_An_split;
                 return(1);                  return 1;
         }          }
 }  }
   
Line 876  pre_ap(DECL_ARGS)
Line 938  pre_ap(DECL_ARGS)
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         print_word("'");          print_word("'");
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         return(0);          return 0;
 }  }
   
 static int  static int
 pre_aq(DECL_ARGS)  pre_aq(DECL_ARGS)
 {  {
   
         print_word(n->nchild == 1 &&          print_word(n->child != NULL && n->child->next == NULL &&
             n->child->tok == MDOC_Mt ?  "<" : "\\(la");              n->child->tok == MDOC_Mt ?  "<" : "\\(la");
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         return(1);          return 1;
 }  }
   
 static void  static void
Line 894  post_aq(DECL_ARGS)
Line 956  post_aq(DECL_ARGS)
 {  {
   
         outflags &= ~(MMAN_spc | MMAN_nl);          outflags &= ~(MMAN_spc | MMAN_nl);
         print_word(n->nchild == 1 &&          print_word(n->child != NULL && n->child->next == NULL &&
             n->child->tok == MDOC_Mt ?  ">" : "\\(ra");              n->child->tok == MDOC_Mt ?  ">" : "\\(ra");
 }  }
   
 static int  static int
 pre_bd(DECL_ARGS)  pre_bd(DECL_ARGS)
 {  {
   
         outflags &= ~(MMAN_PP | MMAN_sp | MMAN_br);          outflags &= ~(MMAN_PP | MMAN_sp | MMAN_br);
           if (n->norm->Bd.type == DISP_unfilled ||
         if (DISP_unfilled == n->norm->Bd.type ||              n->norm->Bd.type == DISP_literal)
             DISP_literal  == n->norm->Bd.type)  
                 print_line(".nf", 0);                  print_line(".nf", 0);
         if (0 == n->norm->Bd.comp && NULL != n->parent->prev)          if (n->norm->Bd.comp == 0 && roff_node_prev(n->parent) != NULL)
                 outflags |= MMAN_sp;                  outflags |= MMAN_sp;
         print_offs(n->norm->Bd.offs, 1);          print_offs(n->norm->Bd.offs, 1);
         return(1);          return 1;
 }  }
   
 static void  static void
 post_bd(DECL_ARGS)  post_bd(DECL_ARGS)
 {  {
           enum roff_tok    bef, now;
   
         /* Close out this display. */          /* Close out this display. */
         print_line(".RE", MMAN_nl);          print_line(".RE", MMAN_nl);
         if (DISP_unfilled == n->norm->Bd.type ||          bef = n->flags & NODE_NOFILL ? ROFF_nf : ROFF_fi;
             DISP_literal  == n->norm->Bd.type)          if (n->last == NULL)
                 print_line(".fi", MMAN_nl);                  now = n->norm->Bd.type == DISP_unfilled ||
                       n->norm->Bd.type == DISP_literal ? ROFF_nf : ROFF_fi;
           else if (n->last->tok == ROFF_nf)
                   now = ROFF_nf;
           else if (n->last->tok == ROFF_fi)
                   now = ROFF_fi;
           else
                   now = n->last->flags & NODE_NOFILL ? ROFF_nf : ROFF_fi;
           if (bef != now) {
                   outflags |= MMAN_nl;
                   print_word(".");
                   outflags &= ~MMAN_spc;
                   print_word(roff_name[bef]);
                   outflags |= MMAN_nl;
           }
   
         /* Maybe we are inside an enclosing list? */          /* Maybe we are inside an enclosing list? */
         if (NULL != n->parent->next)          if (roff_node_next(n->parent) != NULL)
                 mid_it();                  mid_it();
 }  }
   
Line 934  pre_bf(DECL_ARGS)
Line 1009  pre_bf(DECL_ARGS)
   
         switch (n->type) {          switch (n->type) {
         case ROFFT_BLOCK:          case ROFFT_BLOCK:
                 return(1);                  return 1;
         case ROFFT_BODY:          case ROFFT_BODY:
                 break;                  break;
         default:          default:
                 return(0);                  return 0;
         }          }
         switch (n->norm->Bf.font) {          switch (n->norm->Bf.font) {
         case FONT_Em:          case FONT_Em:
Line 951  pre_bf(DECL_ARGS)
Line 1026  pre_bf(DECL_ARGS)
                 font_push('R');                  font_push('R');
                 break;                  break;
         }          }
         return(1);          return 1;
 }  }
   
 static void  static void
Line 965  post_bf(DECL_ARGS)
Line 1040  post_bf(DECL_ARGS)
 static int  static int
 pre_bk(DECL_ARGS)  pre_bk(DECL_ARGS)
 {  {
   
         switch (n->type) {          switch (n->type) {
         case ROFFT_BLOCK:          case ROFFT_BLOCK:
                 return(1);                  return 1;
         case ROFFT_BODY:          case ROFFT_BODY:
           case ROFFT_ELEM:
                 outflags |= MMAN_Bk;                  outflags |= MMAN_Bk;
                 return(1);                  return 1;
         default:          default:
                 return(0);                  return 0;
         }          }
 }  }
   
 static void  static void
 post_bk(DECL_ARGS)  post_bk(DECL_ARGS)
 {  {
           switch (n->type) {
         if (n->type == ROFFT_BODY)          case ROFFT_ELEM:
                   while ((n = n->parent) != NULL)
                            if (n->tok == MDOC_Bk)
                                   return;
                   /* FALLTHROUGH */
           case ROFFT_BODY:
                 outflags &= ~MMAN_Bk;                  outflags &= ~MMAN_Bk;
                   break;
           default:
                   break;
           }
 }  }
   
 static int  static int
Line 1003  pre_bl(DECL_ARGS)
Line 1087  pre_bl(DECL_ARGS)
         switch (n->norm->Bl.type) {          switch (n->norm->Bl.type) {
         case LIST_enum:          case LIST_enum:
                 n->norm->Bl.count = 0;                  n->norm->Bl.count = 0;
                 return(1);                  return 1;
         case LIST_column:          case LIST_column:
                 break;                  break;
         default:          default:
                 return(1);                  return 1;
         }          }
   
         if (n->nchild) {          if (n->child != NULL) {
                 print_line(".TS", MMAN_nl);                  print_line(".TS", MMAN_nl);
                 for (icol = 0; icol < n->norm->Bl.ncols; icol++)                  for (icol = 0; icol < n->norm->Bl.ncols; icol++)
                         print_word("l");                          print_word("l");
                 print_word(".");                  print_word(".");
         }          }
         outflags |= MMAN_nl;          outflags |= MMAN_nl;
         return(1);          return 1;
 }  }
   
 static void  static void
Line 1026  post_bl(DECL_ARGS)
Line 1110  post_bl(DECL_ARGS)
   
         switch (n->norm->Bl.type) {          switch (n->norm->Bl.type) {
         case LIST_column:          case LIST_column:
                 if (n->nchild)                  if (n->child != NULL)
                         print_line(".TE", 0);                          print_line(".TE", 0);
                 break;                  break;
         case LIST_enum:          case LIST_enum:
Line 1040  post_bl(DECL_ARGS)
Line 1124  post_bl(DECL_ARGS)
                 print_line(".RE", MMAN_nl);                  print_line(".RE", MMAN_nl);
                 assert(Bl_stack_len);                  assert(Bl_stack_len);
                 Bl_stack_len--;                  Bl_stack_len--;
                 assert(0 == Bl_stack[Bl_stack_len]);                  assert(Bl_stack[Bl_stack_len] == 0);
         } else {          } else {
                 outflags |= MMAN_PP | MMAN_nl;                  outflags |= MMAN_PP | MMAN_nl;
                 outflags &= ~(MMAN_sp | MMAN_br);                  outflags &= ~(MMAN_sp | MMAN_br);
         }          }
   
         /* Maybe we are inside an enclosing list? */          /* Maybe we are inside an enclosing list? */
         if (NULL != n->parent->next)          if (roff_node_next(n->parent) != NULL)
                 mid_it();                  mid_it();
   
 }  }
   
 static int  static void
 pre_br(DECL_ARGS)  pre_br(DECL_ARGS)
 {  {
   
         outflags |= MMAN_br;          outflags |= MMAN_br;
         return(0);  
 }  }
   
 static int  static int
 pre_bx(DECL_ARGS)  
 {  
   
         n = n->child;  
         if (n) {  
                 print_word(n->string);  
                 outflags &= ~MMAN_spc;  
                 n = n->next;  
         }  
         print_word("BSD");  
         if (NULL == n)  
                 return(0);  
         outflags &= ~MMAN_spc;  
         print_word("-");  
         outflags &= ~MMAN_spc;  
         print_word(n->string);  
         return(0);  
 }  
   
 static int  
 pre_dl(DECL_ARGS)  pre_dl(DECL_ARGS)
 {  {
   
         print_offs("6n", 0);          print_offs("6n", 0);
         return(1);          return 1;
 }  }
   
 static void  static void
 post_dl(DECL_ARGS)  post_dl(DECL_ARGS)
 {  {
   
         print_line(".RE", MMAN_nl);          print_line(".RE", MMAN_nl);
   
         /* Maybe we are inside an enclosing list? */          /* Maybe we are inside an enclosing list? */
         if (NULL != n->parent->next)          if (roff_node_next(n->parent) != NULL)
                 mid_it();                  mid_it();
 }  }
   
Line 1104  pre_em(DECL_ARGS)
Line 1163  pre_em(DECL_ARGS)
 {  {
   
         font_push('I');          font_push('I');
         return(1);          return 1;
 }  }
   
 static int  static int
Line 1113  pre_en(DECL_ARGS)
Line 1172  pre_en(DECL_ARGS)
   
         if (NULL == n->norm->Es ||          if (NULL == n->norm->Es ||
             NULL == n->norm->Es->child)              NULL == n->norm->Es->child)
                 return(1);                  return 1;
   
         print_word(n->norm->Es->child->string);          print_word(n->norm->Es->child->string);
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         return(1);          return 1;
 }  }
   
 static void  static void
Line 1147  pre_eo(DECL_ARGS)
Line 1206  pre_eo(DECL_ARGS)
             n->parent->head->child != NULL && (n->child != NULL ||              n->parent->head->child != NULL && (n->child != NULL ||
             (n->parent->tail != NULL && n->parent->tail->child != NULL)))              (n->parent->tail != NULL && n->parent->tail->child != NULL)))
                 outflags &= ~(MMAN_spc | MMAN_nl);                  outflags &= ~(MMAN_spc | MMAN_nl);
         return(1);          return 1;
 }  }
   
 static void  static void
Line 1183  pre_fa(DECL_ARGS)
Line 1242  pre_fa(DECL_ARGS)
   
         while (NULL != n) {          while (NULL != n) {
                 font_push('I');                  font_push('I');
                 if (am_Fa || MDOC_SYNPRETTY & n->flags)                  if (am_Fa || NODE_SYNPRETTY & n->flags)
                         outflags |= MMAN_nbrword;                          outflags |= MMAN_nbrword;
                 print_node(meta, n);                  print_node(meta, n);
                 font_pop();                  font_pop();
                 if (NULL != (n = n->next))                  if (NULL != (n = n->next))
                         print_word(",");                          print_word(",");
         }          }
         return(0);          return 0;
 }  }
   
 static void  static void
 post_fa(DECL_ARGS)  post_fa(DECL_ARGS)
 {  {
           struct roff_node *nn;
   
         if (NULL != n->next && MDOC_Fa == n->next->tok)          if ((nn = roff_node_next(n)) != NULL && nn->tok == MDOC_Fa)
                 print_word(",");                  print_word(",");
 }  }
   
 static int  static int
 pre_fd(DECL_ARGS)  pre_fd(DECL_ARGS)
 {  {
   
         pre_syn(n);          pre_syn(n);
         font_push('B');          font_push('B');
         return(1);          return 1;
 }  }
   
 static void  static void
 post_fd(DECL_ARGS)  post_fd(DECL_ARGS)
 {  {
   
         font_pop();          font_pop();
         outflags |= MMAN_br;          outflags |= MMAN_br;
 }  }
Line 1221  post_fd(DECL_ARGS)
Line 1279  post_fd(DECL_ARGS)
 static int  static int
 pre_fl(DECL_ARGS)  pre_fl(DECL_ARGS)
 {  {
   
         font_push('B');          font_push('B');
         print_word("\\-");          print_word("\\-");
         if (n->nchild)          if (n->child != NULL)
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
         return(1);          return 1;
 }  }
   
 static void  static void
 post_fl(DECL_ARGS)  post_fl(DECL_ARGS)
 {  {
           struct roff_node *nn;
   
         font_pop();          font_pop();
         if ( ! (n->nchild ||          if (n->child == NULL &&
             n->next == NULL ||              ((nn = roff_node_next(n)) != NULL &&
             n->next->type == ROFFT_TEXT ||              nn->type != ROFFT_TEXT &&
             n->next->flags & MDOC_LINE))              (nn->flags & NODE_LINE) == 0))
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
 }  }
   
Line 1249  pre_fn(DECL_ARGS)
Line 1307  pre_fn(DECL_ARGS)
   
         n = n->child;          n = n->child;
         if (NULL == n)          if (NULL == n)
                 return(0);                  return 0;
   
         if (MDOC_SYNPRETTY & n->flags)          if (NODE_SYNPRETTY & n->flags)
                 print_block(".HP 4n", MMAN_nl);                  print_block(".HP 4n", MMAN_nl);
   
         font_push('B');          font_push('B');
Line 1264  pre_fn(DECL_ARGS)
Line 1322  pre_fn(DECL_ARGS)
         n = n->next;          n = n->next;
         if (NULL != n)          if (NULL != n)
                 pre_fa(meta, n);                  pre_fa(meta, n);
         return(0);          return 0;
 }  }
   
 static void  static void
Line 1272  post_fn(DECL_ARGS)
Line 1330  post_fn(DECL_ARGS)
 {  {
   
         print_word(")");          print_word(")");
         if (MDOC_SYNPRETTY & n->flags) {          if (NODE_SYNPRETTY & n->flags) {
                 print_word(";");                  print_word(";");
                 outflags |= MMAN_PP;                  outflags |= MMAN_PP;
         }          }
Line 1288  pre_fo(DECL_ARGS)
Line 1346  pre_fo(DECL_ARGS)
                 break;                  break;
         case ROFFT_HEAD:          case ROFFT_HEAD:
                 if (n->child == NULL)                  if (n->child == NULL)
                         return(0);                          return 0;
                 if (MDOC_SYNPRETTY & n->flags)                  if (NODE_SYNPRETTY & n->flags)
                         print_block(".HP 4n", MMAN_nl);                          print_block(".HP 4n", MMAN_nl);
                 font_push('B');                  font_push('B');
                 break;                  break;
Line 1301  pre_fo(DECL_ARGS)
Line 1359  pre_fo(DECL_ARGS)
         default:          default:
                 break;                  break;
         }          }
         return(1);          return 1;
 }  }
   
 static void  static void
Line 1322  post_fo(DECL_ARGS)
Line 1380  post_fo(DECL_ARGS)
 }  }
   
 static int  static int
 pre_ft(DECL_ARGS)  pre_Ft(DECL_ARGS)
 {  {
   
         pre_syn(n);          pre_syn(n);
         font_push('I');          font_push('I');
         return(1);          return 1;
 }  }
   
   static void
   pre_ft(DECL_ARGS)
   {
           print_line(".ft", 0);
           print_word(n->child->string);
           outflags |= MMAN_nl;
   }
   
 static int  static int
 pre_in(DECL_ARGS)  pre_in(DECL_ARGS)
 {  {
   
         if (MDOC_SYNPRETTY & n->flags) {          if (NODE_SYNPRETTY & n->flags) {
                 pre_syn(n);                  pre_syn(n);
                 font_push('B');                  font_push('B');
                 print_word("#include <");                  print_word("#include <");
Line 1344  pre_in(DECL_ARGS)
Line 1410  pre_in(DECL_ARGS)
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
                 font_push('I');                  font_push('I');
         }          }
         return(1);          return 1;
 }  }
   
 static void  static void
 post_in(DECL_ARGS)  post_in(DECL_ARGS)
 {  {
   
         if (MDOC_SYNPRETTY & n->flags) {          if (NODE_SYNPRETTY & n->flags) {
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
                 print_word(">");                  print_word(">");
                 font_pop();                  font_pop();
Line 1372  pre_it(DECL_ARGS)
Line 1438  pre_it(DECL_ARGS)
         case ROFFT_HEAD:          case ROFFT_HEAD:
                 outflags |= MMAN_PP | MMAN_nl;                  outflags |= MMAN_PP | MMAN_nl;
                 bln = n->parent->parent;                  bln = n->parent->parent;
                 if (0 == bln->norm->Bl.comp ||                  if (bln->norm->Bl.comp == 0 ||
                     (NULL == n->parent->prev &&                      (n->parent->prev == NULL &&
                      NULL == bln->parent->prev))                       roff_node_prev(bln->parent) == NULL))
                         outflags |= MMAN_sp;                          outflags |= MMAN_sp;
                 outflags &= ~MMAN_br;                  outflags &= ~MMAN_br;
                 switch (bln->norm->Bl.type) {                  switch (bln->norm->Bl.type) {
                 case LIST_item:                  case LIST_item:
                         return(0);                          return 0;
                 case LIST_inset:                  case LIST_inset:
                         /* FALLTHROUGH */  
                 case LIST_diag:                  case LIST_diag:
                         /* FALLTHROUGH */  
                 case LIST_ohang:                  case LIST_ohang:
                         if (bln->norm->Bl.type == LIST_diag)                          if (bln->norm->Bl.type == LIST_diag)
                                 print_line(".B \"", 0);                                  print_line(".B \"", 0);
                         else                          else
                                 print_line(".R \"", 0);                                  print_line(".BR \\& \"", 0);
                         outflags &= ~MMAN_spc;                          outflags &= ~MMAN_spc;
                         return(1);                          return 1;
                 case LIST_bullet:                  case LIST_bullet:
                         /* FALLTHROUGH */  
                 case LIST_dash:                  case LIST_dash:
                         /* FALLTHROUGH */  
                 case LIST_hyphen:                  case LIST_hyphen:
                         print_width(&bln->norm->Bl, NULL);                          print_width(&bln->norm->Bl, NULL);
                         TPremain = 0;                          TPremain = 0;
Line 1406  pre_it(DECL_ARGS)
Line 1468  pre_it(DECL_ARGS)
                                 print_word("-");                                  print_word("-");
                         font_pop();                          font_pop();
                         outflags |= MMAN_nl;                          outflags |= MMAN_nl;
                         return(0);                          return 0;
                 case LIST_enum:                  case LIST_enum:
                         print_width(&bln->norm->Bl, NULL);                          print_width(&bln->norm->Bl, NULL);
                         TPremain = 0;                          TPremain = 0;
                         outflags |= MMAN_nl;                          outflags |= MMAN_nl;
                         print_count(&bln->norm->Bl.count);                          print_count(&bln->norm->Bl.count);
                         outflags |= MMAN_nl;                          outflags |= MMAN_nl;
                         return(0);                          return 0;
                 case LIST_hang:                  case LIST_hang:
                         print_width(&bln->norm->Bl, n->child);                          print_width(&bln->norm->Bl, n->child);
                         TPremain = 0;                          TPremain = 0;
                         outflags |= MMAN_nl;                          outflags |= MMAN_nl;
                         return(1);                          return 1;
                 case LIST_tag:                  case LIST_tag:
                         print_width(&bln->norm->Bl, n->child);                          print_width(&bln->norm->Bl, n->child);
                         putchar('\n');                          putchar('\n');
                         outflags &= ~MMAN_spc;                          outflags &= ~MMAN_spc;
                         return(1);                          return 1;
                 default:                  default:
                         return(1);                          return 1;
                 }                  }
         default:          default:
                 break;                  break;
         }          }
         return(1);          return 1;
 }  }
   
 /*  /*
Line 1456  mid_it(void)
Line 1518  mid_it(void)
             Bl_stack[Bl_stack_len - 1]);              Bl_stack[Bl_stack_len - 1]);
         print_word(buf);          print_word(buf);
   
         /* Remeber to close out this .RS block later. */          /* Remember to close out this .RS block later. */
         Bl_stack_post[Bl_stack_len - 1] = 1;          Bl_stack_post[Bl_stack_len - 1] = 1;
 }  }
   
Line 1484  post_it(DECL_ARGS)
Line 1546  post_it(DECL_ARGS)
         case ROFFT_BODY:          case ROFFT_BODY:
                 switch (bln->norm->Bl.type) {                  switch (bln->norm->Bl.type) {
                 case LIST_bullet:                  case LIST_bullet:
                         /* FALLTHROUGH */  
                 case LIST_dash:                  case LIST_dash:
                         /* FALLTHROUGH */  
                 case LIST_hyphen:                  case LIST_hyphen:
                         /* FALLTHROUGH */  
                 case LIST_enum:                  case LIST_enum:
                         /* FALLTHROUGH */  
                 case LIST_hang:                  case LIST_hang:
                         /* FALLTHROUGH */  
                 case LIST_tag:                  case LIST_tag:
                         assert(Bl_stack_len);                          assert(Bl_stack_len);
                         Bl_stack[--Bl_stack_len] = 0;                          Bl_stack[--Bl_stack_len] = 0;
Line 1533  post_lb(DECL_ARGS)
Line 1590  post_lb(DECL_ARGS)
 static int  static int
 pre_lk(DECL_ARGS)  pre_lk(DECL_ARGS)
 {  {
         const struct roff_node *link, *descr;          const struct roff_node *link, *descr, *punct;
   
         if (NULL == (link = n->child))          if ((link = n->child) == NULL)
                 return(0);                  return 0;
   
         if (NULL != (descr = link->next)) {          /* Find beginning of trailing punctuation. */
           punct = n->last;
           while (punct != link && punct->flags & NODE_DELIMC)
                   punct = punct->prev;
           punct = punct->next;
   
           /* Link text. */
           if ((descr = link->next) != NULL && descr != punct) {
                 font_push('I');                  font_push('I');
                 while (NULL != descr) {                  while (descr != punct) {
                         print_word(descr->string);                          print_word(descr->string);
                         descr = descr->next;                          descr = descr->next;
                 }                  }
                 print_word(":");  
                 font_pop();                  font_pop();
                   print_word(":");
         }          }
   
           /* Link target. */
         font_push('B');          font_push('B');
         print_word(link->string);          print_word(link->string);
         font_pop();          font_pop();
         return(0);  
           /* Trailing punctuation. */
           while (punct != NULL) {
                   print_word(punct->string);
                   punct = punct->next;
           }
           return 0;
 }  }
   
 static int  static void
 pre_ll(DECL_ARGS)  pre_onearg(DECL_ARGS)
 {  {
           outflags |= MMAN_nl;
         print_line(".ll", 0);          print_word(".");
         return(1);          outflags &= ~MMAN_spc;
           print_word(roff_name[n->tok]);
           if (n->child != NULL)
                   print_word(n->child->string);
           outflags |= MMAN_nl;
           if (n->tok == ROFF_ce)
                   for (n = n->child->next; n != NULL; n = n->next)
                           print_node(meta, n);
 }  }
   
 static int  static int
 pre_li(DECL_ARGS)  pre_li(DECL_ARGS)
 {  {
   
         font_push('R');          font_push('R');
         return(1);          return 1;
 }  }
   
 static int  static int
Line 1575  pre_nm(DECL_ARGS)
Line 1652  pre_nm(DECL_ARGS)
 {  {
         char    *name;          char    *name;
   
         if (n->type == ROFFT_BLOCK) {          switch (n->type) {
           case ROFFT_BLOCK:
                 outflags |= MMAN_Bk;                  outflags |= MMAN_Bk;
                 pre_syn(n);                  pre_syn(n);
                   return 1;
           case ROFFT_HEAD:
           case ROFFT_ELEM:
                   break;
           default:
                   return 1;
         }          }
         if (n->type != ROFFT_ELEM && n->type != ROFFT_HEAD)          name = n->child == NULL ? NULL : n->child->string;
                 return(1);          if (name == NULL)
         name = n->child ? n->child->string : meta->name;                  return 0;
         if (NULL == name)  
                 return(0);  
         if (n->type == ROFFT_HEAD) {          if (n->type == ROFFT_HEAD) {
                 if (NULL == n->parent->prev)                  if (roff_node_prev(n->parent) == NULL)
                         outflags |= MMAN_sp;                          outflags |= MMAN_sp;
                 print_block(".HP", 0);                  print_block(".HP", 0);
                 printf(" %zun", strlen(name) + 1);                  printf(" %dn", man_strlen(name) + 1);
                 outflags |= MMAN_nl;                  outflags |= MMAN_nl;
         }          }
         font_push('B');          font_push('B');
         if (NULL == n->child)          return 1;
                 print_word(meta->name);  
         return(1);  
 }  }
   
 static void  static void
 post_nm(DECL_ARGS)  post_nm(DECL_ARGS)
 {  {
   
         switch (n->type) {          switch (n->type) {
         case ROFFT_BLOCK:          case ROFFT_BLOCK:
                 outflags &= ~MMAN_Bk;                  outflags &= ~MMAN_Bk;
                 break;                  break;
         case ROFFT_HEAD:          case ROFFT_HEAD:
                 /* FALLTHROUGH */  
         case ROFFT_ELEM:          case ROFFT_ELEM:
                 if (n->child != NULL || meta->name != NULL)                  if (n->child != NULL && n->child->string != NULL)
                         font_pop();                          font_pop();
                 break;                  break;
         default:          default:
Line 1619  post_nm(DECL_ARGS)
Line 1697  post_nm(DECL_ARGS)
 static int  static int
 pre_no(DECL_ARGS)  pre_no(DECL_ARGS)
 {  {
   
         outflags |= MMAN_spc_force;          outflags |= MMAN_spc_force;
         return(1);          return 1;
 }  }
   
   static void
   pre_noarg(DECL_ARGS)
   {
           outflags |= MMAN_nl;
           print_word(".");
           outflags &= ~MMAN_spc;
           print_word(roff_name[n->tok]);
           outflags |= MMAN_nl;
   }
   
 static int  static int
 pre_ns(DECL_ARGS)  pre_ns(DECL_ARGS)
 {  {
   
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         return(0);          return 0;
 }  }
   
 static void  static void
 post_pf(DECL_ARGS)  post_pf(DECL_ARGS)
 {  {
   
         if ( ! (n->next == NULL || n->next->flags & MDOC_LINE))          if ( ! (n->next == NULL || n->next->flags & NODE_LINE))
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
 }  }
   
Line 1648  pre_pp(DECL_ARGS)
Line 1734  pre_pp(DECL_ARGS)
                 outflags |= MMAN_PP;                  outflags |= MMAN_PP;
         outflags |= MMAN_sp | MMAN_nl;          outflags |= MMAN_sp | MMAN_nl;
         outflags &= ~MMAN_br;          outflags &= ~MMAN_br;
         return(0);          return 0;
 }  }
   
 static int  static int
Line 1659  pre_rs(DECL_ARGS)
Line 1745  pre_rs(DECL_ARGS)
                 outflags |= MMAN_PP | MMAN_sp | MMAN_nl;                  outflags |= MMAN_PP | MMAN_sp | MMAN_nl;
                 outflags &= ~MMAN_br;                  outflags &= ~MMAN_br;
         }          }
         return(1);          return 1;
 }  }
   
 static int  static int
 pre_rv(DECL_ARGS)  
 {  
         int      nchild;  
   
         outflags |= MMAN_br | MMAN_nl;  
   
         nchild = n->nchild;  
         if (nchild > 0) {  
                 print_word("The");  
   
                 for (n = n->child; n; n = n->next) {  
                         font_push('B');  
                         print_word(n->string);  
                         font_pop();  
   
                         outflags &= ~MMAN_spc;  
                         print_word("()");  
   
                         if (n->next == NULL)  
                                 continue;  
   
                         if (nchild > 2) {  
                                 outflags &= ~MMAN_spc;  
                                 print_word(",");  
                         }  
                         if (n->next->next == NULL)  
                                 print_word("and");  
                 }  
   
                 if (nchild > 1)  
                         print_word("functions return");  
                 else  
                         print_word("function returns");  
   
                 print_word("the value\\~0 if successful;");  
         } else  
                 print_word("Upon successful completion, "  
                     "the value\\~0 is returned;");  
   
         print_word("otherwise the value\\~\\-1 is returned"  
             " and the global variable");  
   
         font_push('I');  
         print_word("errno");  
         font_pop();  
   
         print_word("is set to indicate the error.");  
         outflags |= MMAN_nl;  
         return(0);  
 }  
   
 static int  
 pre_skip(DECL_ARGS)  pre_skip(DECL_ARGS)
 {  {
   
         return(0);          return 0;
 }  }
   
 static int  static int
Line 1735  pre_sm(DECL_ARGS)
Line 1769  pre_sm(DECL_ARGS)
         if (MMAN_Sm & outflags)          if (MMAN_Sm & outflags)
                 outflags |= MMAN_spc;                  outflags |= MMAN_spc;
   
         return(0);          return 0;
 }  }
   
 static int  static void
 pre_sp(DECL_ARGS)  pre_sp(DECL_ARGS)
 {  {
           if (outflags & MMAN_PP) {
         if (MMAN_PP & outflags) {  
                 outflags &= ~MMAN_PP;                  outflags &= ~MMAN_PP;
                 print_line(".PP", 0);                  print_line(".PP", 0);
         } else          } else {
                 print_line(".sp", 0);                  print_line(".sp", 0);
         return(1);                  if (n->child != NULL)
 }                          print_word(n->child->string);
           }
 static void  
 post_sp(DECL_ARGS)  
 {  
   
         outflags |= MMAN_nl;          outflags |= MMAN_nl;
 }  }
   
Line 1762  pre_sy(DECL_ARGS)
Line 1791  pre_sy(DECL_ARGS)
 {  {
   
         font_push('B');          font_push('B');
         return(1);          return 1;
 }  }
   
   static void
   pre_ta(DECL_ARGS)
   {
           print_line(".ta", 0);
           for (n = n->child; n != NULL; n = n->next)
                   print_word(n->string);
           outflags |= MMAN_nl;
   }
   
 static int  static int
 pre_vt(DECL_ARGS)  pre_vt(DECL_ARGS)
 {  {
   
         if (MDOC_SYNPRETTY & n->flags) {          if (NODE_SYNPRETTY & n->flags) {
                 switch (n->type) {                  switch (n->type) {
                 case ROFFT_BLOCK:                  case ROFFT_BLOCK:
                         pre_syn(n);                          pre_syn(n);
                         return(1);                          return 1;
                 case ROFFT_BODY:                  case ROFFT_BODY:
                         break;                          break;
                 default:                  default:
                         return(0);                          return 0;
                 }                  }
         }          }
         font_push('I');          font_push('I');
         return(1);          return 1;
 }  }
   
 static void  static void
 post_vt(DECL_ARGS)  post_vt(DECL_ARGS)
 {  {
   
         if (n->flags & MDOC_SYNPRETTY && n->type != ROFFT_BODY)          if (n->flags & NODE_SYNPRETTY && n->type != ROFFT_BODY)
                 return;                  return;
         font_pop();          font_pop();
 }  }
Line 1799  pre_xr(DECL_ARGS)
Line 1837  pre_xr(DECL_ARGS)
   
         n = n->child;          n = n->child;
         if (NULL == n)          if (NULL == n)
                 return(0);                  return 0;
         print_node(meta, n);          print_node(meta, n);
         n = n->next;          n = n->next;
         if (NULL == n)          if (NULL == n)
                 return(0);                  return 0;
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         print_word("(");          print_word("(");
         print_node(meta, n);          print_node(meta, n);
         print_word(")");          print_word(")");
         return(0);          return 0;
 }  
   
 static int  
 pre_ux(DECL_ARGS)  
 {  
   
         print_word(manacts[n->tok].prefix);  
         if (NULL == n->child)  
                 return(0);  
         outflags &= ~MMAN_spc;  
         print_word("\\ ");  
         outflags &= ~MMAN_spc;  
         return(1);  
 }  }
Legend:
Removed from v.1.90  
changed lines
  Added in v.1.138
CVSweb