[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.36 and 1.42

version 1.36, 2012/07/13 14:19:49 version 1.42, 2012/11/17 00:26:33
Line 28 
Line 28 
 #include "mdoc.h"  #include "mdoc.h"
 #include "main.h"  #include "main.h"
   
 #define DECL_ARGS const struct mdoc_meta *m, \  #define DECL_ARGS const struct mdoc_meta *meta, \
                   const struct mdoc_node *n                    const struct mdoc_node *n
   
 struct  manact {  struct  manact {
Line 254  static int  outflags;
Line 254  static int  outflags;
 #define MMAN_An_split   (1 << 8)  /* author mode is "split" */  #define MMAN_An_split   (1 << 8)  /* author mode is "split" */
 #define MMAN_An_nosplit (1 << 9)  /* author mode is "nosplit" */  #define MMAN_An_nosplit (1 << 9)  /* author mode is "nosplit" */
   
   static  int             TPremain;  /* characters before tag is full */
   
 static  struct {  static  struct {
         char    *head;          char    *head;
         char    *tail;          char    *tail;
Line 270  font_push(char newfont)
Line 272  font_push(char newfont)
                                 fontqueue.size);                                  fontqueue.size);
         }          }
         *fontqueue.tail = newfont;          *fontqueue.tail = newfont;
         print_word("\\f");          print_word("");
           printf("\\f");
         putchar(newfont);          putchar(newfont);
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
 }  }
Line 282  font_pop(void)
Line 285  font_pop(void)
         if (fontqueue.tail > fontqueue.head)          if (fontqueue.tail > fontqueue.head)
                 fontqueue.tail--;                  fontqueue.tail--;
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         print_word("\\f");          print_word("");
           printf("\\f");
         putchar(*fontqueue.tail);          putchar(*fontqueue.tail);
 }  }
   
Line 305  print_word(const char *s)
Line 309  print_word(const char *s)
                 else if (MMAN_nl & outflags)                  else if (MMAN_nl & outflags)
                         putchar('\n');                          putchar('\n');
                 outflags &= ~(MMAN_PP|MMAN_sp|MMAN_br|MMAN_nl|MMAN_spc);                  outflags &= ~(MMAN_PP|MMAN_sp|MMAN_br|MMAN_nl|MMAN_spc);
         } else if (MMAN_spc & outflags && '\0' != s[0])                  if (1 == TPremain)
                           printf(".br\n");
                   TPremain = 0;
           } else if (MMAN_spc & outflags) {
                 /*                  /*
                  * If we need a space, only print it if                   * If we need a space, only print it if
                  * (1) it is forced by `No' or                   * (1) it is forced by `No' or
                  * (2) what follows is not terminating punctuation or                   * (2) what follows is not terminating punctuation or
                  * (3) what follows is longer than one character.                   * (3) what follows is longer than one character.
                  */                   */
                 if (MMAN_spc_force & outflags ||                  if (MMAN_spc_force & outflags || '\0' == s[0] ||
                     NULL == strchr(".,:;)]?!", s[0]) || '\0' != s[1]) {                      NULL == strchr(".,:;)]?!", s[0]) || '\0' != s[1]) {
                         if (MMAN_Bk & outflags) {                          if (MMAN_Bk & outflags) {
                                 putchar('\\');                                  putchar('\\');
                                 putchar('~');                                  putchar('~');
                         } else                          } else
                                 putchar(' ');                                  putchar(' ');
                           if (TPremain)
                                   TPremain--;
                 }                  }
           }
   
         /*          /*
          * Reassign needing space if we're not following opening           * Reassign needing space if we're not following opening
          * punctuation.           * punctuation.
          */           */
         if (MMAN_Sm & outflags &&          if (MMAN_Sm & outflags && ('\0' == s[0] ||
             (('(' != s[0] && '[' != s[0]) || '\0' != s[1]))              (('(' != s[0] && '[' != s[0]) || '\0' != s[1])))
                 outflags |= MMAN_spc;                  outflags |= MMAN_spc;
         else          else
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
Line 344  print_word(const char *s)
Line 354  print_word(const char *s)
                         putchar((unsigned char)*s);                          putchar((unsigned char)*s);
                         break;                          break;
                 }                  }
                   if (TPremain)
                           TPremain--;
         }          }
 }  }
   
Line 400  print_width(const char *v, const struct mdoc_node *chi
Line 412  print_width(const char *v, const struct mdoc_node *chi
         char              buf[24];          char              buf[24];
         struct roffsu     su;          struct roffsu     su;
         size_t            sz, chsz;          size_t            sz, chsz;
           int               numeric, remain;
   
         /* XXX Rough estimation, might have multiple parts. */          numeric = 1;
         chsz = (NULL != child && MDOC_TEXT == child->type) ?          remain = 0;
                         strlen(child->string) : 0;  
   
         if (NULL == v)          if (NULL == v)
                 sz = defsz;                  sz = defsz;
         else if (a2roffsu(v, &su, SCALE_MAX)) {          else if (a2roffsu(v, &su, SCALE_MAX)) {
                 if (SCALE_EN == su.unit)                  if (SCALE_EN == su.unit)
                         sz = su.scale;                          sz = su.scale;
                 else {                  else {
                         if (chsz)                          sz = 0;
                                 print_block(".HP", 0);                          numeric = 0;
                         else  
                                 print_block(".TP", 0);  
                         print_word(v);  
                         return;  
                 }                  }
         } else          } else
                 sz = strlen(v);                  sz = strlen(v);
   
         if (chsz > sz)          /* XXX Rough estimation, might have multiple parts. */
           chsz = (NULL != child && MDOC_TEXT == child->type) ?
                           strlen(child->string) : 0;
   
           if (defsz && chsz > sz)
                 print_block(".HP", 0);                  print_block(".HP", 0);
         else          else {
                 print_block(".TP", 0);                  print_block(".TP", 0);
         snprintf(buf, sizeof(buf), "%ldn", sz + 2);                  remain = sz + 2;
         print_word(buf);          }
           if (numeric) {
                   snprintf(buf, sizeof(buf), "%ldn", sz + 2);
                   print_word(buf);
           } else
                   print_word(v);
           TPremain = remain;
 }  }
   
 void  void
Line 454  man_man(void *arg, const struct man *man)
Line 471  man_man(void *arg, const struct man *man)
 void  void
 man_mdoc(void *arg, const struct mdoc *mdoc)  man_mdoc(void *arg, const struct mdoc *mdoc)
 {  {
         const struct mdoc_meta *m;          const struct mdoc_meta *meta;
         const struct mdoc_node *n;          const struct mdoc_node *n;
   
         m = mdoc_meta(mdoc);          meta = mdoc_meta(mdoc);
         n = mdoc_node(mdoc);          n = mdoc_node(mdoc);
   
         printf(".TH \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"",          printf(".TH \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"",
                         m->title, m->msec, m->date, m->os, m->vol);                          meta->title, meta->msec, meta->date,
                           meta->os, meta->vol);
   
         outflags = MMAN_nl | MMAN_Sm;          outflags = MMAN_nl | MMAN_Sm;
         if (0 == fontqueue.size) {          if (0 == fontqueue.size) {
Line 469  man_mdoc(void *arg, const struct mdoc *mdoc)
Line 487  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';
         }          }
         print_node(m, n);          print_node(meta, n);
         putchar('\n');          putchar('\n');
 }  }
   
Line 499  print_node(DECL_ARGS)
Line 517  print_node(DECL_ARGS)
                  */                   */
                 if (MMAN_nl & outflags && ('.' == *n->string ||                  if (MMAN_nl & outflags && ('.' == *n->string ||
                                         '\'' == *n->string)) {                                          '\'' == *n->string)) {
                         print_word("\\&");                          print_word("");
                           printf("\\&");
                         outflags &= ~MMAN_spc;                          outflags &= ~MMAN_spc;
                 }                  }
                 print_word(n->string);                  print_word(n->string);
Line 509  print_node(DECL_ARGS)
Line 528  print_node(DECL_ARGS)
                  * node.                   * node.
                  */                   */
                 act = manacts + n->tok;                  act = manacts + n->tok;
                 cond = NULL == act->cond || (*act->cond)(m, n);                  cond = NULL == act->cond || (*act->cond)(meta, n);
                 if (cond && act->pre)                  if (cond && act->pre)
                         do_sub = (*act->pre)(m, n);                          do_sub = (*act->pre)(meta, n);
         }          }
   
         /*          /*
Line 521  print_node(DECL_ARGS)
Line 540  print_node(DECL_ARGS)
          */           */
         if (do_sub)          if (do_sub)
                 for (sub = n->child; sub; sub = sub->next)                  for (sub = n->child; sub; sub = sub->next)
                         print_node(m, sub);                          print_node(meta, sub);
   
         /*          /*
          * Lastly, conditionally run the post-node handler.           * Lastly, conditionally run the post-node handler.
          */           */
         if (cond && act->post)          if (cond && act->post)
                 (*act->post)(m, n);                  (*act->post)(meta, n);
 }  }
   
 static int  static int
Line 599  pre__t(DECL_ARGS)
Line 618  pre__t(DECL_ARGS)
   
         if (n->parent && MDOC_Rs == n->parent->tok &&          if (n->parent && MDOC_Rs == n->parent->tok &&
                         n->parent->norm->Rs.quote_T) {                          n->parent->norm->Rs.quote_T) {
                 print_word("\"");                  print_word("");
                   putchar('\"');
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
         } else          } else
                 font_push('I');                  font_push('I');
Line 613  post__t(DECL_ARGS)
Line 633  post__t(DECL_ARGS)
         if (n->parent && MDOC_Rs == n->parent->tok &&          if (n->parent && MDOC_Rs == n->parent->tok &&
                         n->parent->norm->Rs.quote_T) {                          n->parent->norm->Rs.quote_T) {
                 outflags &= ~MMAN_spc;                  outflags &= ~MMAN_spc;
                 print_word("\"");                  print_word("");
                   putchar('\"');
         } else          } else
                 font_pop();                  font_pop();
         post_percent(m, n);          post_percent(meta, n);
 }  }
   
 /*  /*
Line 630  pre_sect(DECL_ARGS)
Line 651  pre_sect(DECL_ARGS)
                 return(1);                  return(1);
         outflags |= MMAN_sp;          outflags |= MMAN_sp;
         print_block(manacts[n->tok].prefix, 0);          print_block(manacts[n->tok].prefix, 0);
         print_word("\"");          print_word("");
           putchar('\"');
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         return(1);          return(1);
 }  }
Line 645  post_sect(DECL_ARGS)
Line 667  post_sect(DECL_ARGS)
         if (MDOC_HEAD != n->type)          if (MDOC_HEAD != n->type)
                 return;                  return;
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         print_word("\"");          print_word("");
           putchar('\"');
         outflags |= MMAN_nl;          outflags |= MMAN_nl;
         if (MDOC_Sh == n->tok && SEC_AUTHORS == n->sec)          if (MDOC_Sh == n->tok && SEC_AUTHORS == n->sec)
                 outflags &= ~(MMAN_An_split | MMAN_An_nosplit);                  outflags &= ~(MMAN_An_split | MMAN_An_nosplit);
Line 917  pre_fa(DECL_ARGS)
Line 940  pre_fa(DECL_ARGS)
   
         while (NULL != n) {          while (NULL != n) {
                 font_push('I');                  font_push('I');
                 print_node(m, n);                  print_node(meta, n);
                 font_pop();                  font_pop();
                 if (NULL != (n = n->next))                  if (NULL != (n = n->next))
                         print_word(",");                          print_word(",");
Line 981  pre_fn(DECL_ARGS)
Line 1004  pre_fn(DECL_ARGS)
                 return(0);                  return(0);
   
         font_push('B');          font_push('B');
         print_node(m, n);          print_node(meta, n);
         font_pop();          font_pop();
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         print_word("(");          print_word("(");
Line 989  pre_fn(DECL_ARGS)
Line 1012  pre_fn(DECL_ARGS)
   
         n = n->next;          n = n->next;
         if (NULL != n)          if (NULL != n)
                 pre_fa(m, n);                  pre_fa(meta, n);
         return(0);          return(0);
 }  }
   
Line 1035  post_fo(DECL_ARGS)
Line 1058  post_fo(DECL_ARGS)
                 font_pop();                  font_pop();
                 break;                  break;
         case (MDOC_BODY):          case (MDOC_BODY):
                 post_fn(m, n);                  post_fn(meta, n);
                 break;                  break;
         default:          default:
                 break;                  break;
Line 1094  pre_it(DECL_ARGS)
Line 1117  pre_it(DECL_ARGS)
                 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 (0 == bln->norm->Bl.comp ||
                     NULL == bln->parent->prev)                      (NULL == n->parent->prev &&
                        NULL == bln->parent->prev))
                         outflags |= MMAN_sp;                          outflags |= MMAN_sp;
                 outflags &= ~MMAN_br;                  outflags &= ~MMAN_br;
                 switch (bln->norm->Bl.type) {                  switch (bln->norm->Bl.type) {
Line 1117  pre_it(DECL_ARGS)
Line 1141  pre_it(DECL_ARGS)
                         /* FALLTHROUGH */                          /* FALLTHROUGH */
                 case (LIST_hyphen):                  case (LIST_hyphen):
                         print_width(bln->norm->Bl.width, NULL, 0);                          print_width(bln->norm->Bl.width, NULL, 0);
                           TPremain = 0;
                         outflags |= MMAN_nl;                          outflags |= MMAN_nl;
                         font_push('B');                          font_push('B');
                         if (LIST_bullet == bln->norm->Bl.type)                          if (LIST_bullet == bln->norm->Bl.type)
Line 1127  pre_it(DECL_ARGS)
Line 1152  pre_it(DECL_ARGS)
                         break;                          break;
                 case (LIST_enum):                  case (LIST_enum):
                         print_width(bln->norm->Bl.width, NULL, 0);                          print_width(bln->norm->Bl.width, NULL, 0);
                           TPremain = 0;
                         outflags |= MMAN_nl;                          outflags |= MMAN_nl;
                         print_count(&bln->norm->Bl.count);                          print_count(&bln->norm->Bl.count);
                         break;                          break;
                 case (LIST_hang):                  case (LIST_hang):
                         print_width(bln->norm->Bl.width, n->child, 6);                          print_width(bln->norm->Bl.width, n->child, 6);
                           TPremain = 0;
                         break;                          break;
                 case (LIST_tag):                  case (LIST_tag):
                         print_width(bln->norm->Bl.width, NULL, 8);                          print_width(bln->norm->Bl.width, n->child, 0);
                         break;                          putchar('\n');
                           outflags &= ~MMAN_spc;
                           return(1);
                 default:                  default:
                         return(1);                          return(1);
                 }                  }
Line 1222  pre_li(DECL_ARGS)
Line 1251  pre_li(DECL_ARGS)
 static int  static int
 pre_nm(DECL_ARGS)  pre_nm(DECL_ARGS)
 {  {
           char    *name;
   
         if (MDOC_BLOCK == n->type)          if (MDOC_BLOCK == n->type)
                 pre_syn(n);                  pre_syn(n);
         if (MDOC_ELEM != n->type && MDOC_HEAD != n->type)          if (MDOC_ELEM != n->type && MDOC_HEAD != n->type)
                 return(1);                  return(1);
         if (NULL == n->child && NULL == m->name)          name = n->child ? n->child->string : meta->name;
           if (NULL == name)
                 return(0);                  return(0);
           if (MDOC_HEAD == n->type) {
                   if (NULL == n->parent->prev)
                           outflags |= MMAN_sp;
                   print_block(".HP", 0);
                   printf(" %ldn", strlen(name) + 1);
                   outflags |= MMAN_nl;
           }
         font_push('B');          font_push('B');
         if (NULL == n->child)          if (NULL == n->child)
                 print_word(m->name);                  print_word(meta->name);
         return(1);          return(1);
 }  }
   
Line 1305  static int
Line 1343  static int
 pre_sp(DECL_ARGS)  pre_sp(DECL_ARGS)
 {  {
   
         print_line(".sp", MMAN_nl);          if (MMAN_PP & outflags) {
                   outflags &= ~MMAN_PP;
                   print_line(".PP", 0);
           } else
                   print_line(".sp", 0);
         return(1);          return(1);
 }  }
   
Line 1359  pre_xr(DECL_ARGS)
Line 1401  pre_xr(DECL_ARGS)
         n = n->child;          n = n->child;
         if (NULL == n)          if (NULL == n)
                 return(0);                  return(0);
         print_node(m, 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(m, n);          print_node(meta, n);
         print_word(")");          print_word(")");
         return(0);          return(0);
 }  }
Legend:
Removed from v.1.36  
changed lines
  Added in v.1.42
CVSweb