[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.34 and 1.39

version 1.34, 2012/07/11 23:46:37 version 1.39, 2012/07/14 09:07:18
Line 102  static int   pre_vt(DECL_ARGS);
Line 102  static int   pre_vt(DECL_ARGS);
 static  int       pre_ux(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_block(const char *, int);
 static  void      print_offs(const char *);  static  void      print_offs(const char *);
 static  void      print_width(const char *, const struct mdoc_node *);  static  void      print_width(const char *,
                                   const struct mdoc_node *, size_t);
 static  void      print_count(int *);  static  void      print_count(int *);
 static  void      print_node(DECL_ARGS);  static  void      print_node(DECL_ARGS);
   
Line 240  static const struct manact manacts[MDOC_MAX + 1] = {
Line 243  static const struct manact manacts[MDOC_MAX + 1] = {
 };  };
   
 static  int             outflags;  static  int             outflags;
 #define MMAN_spc        (1 << 0)  #define MMAN_spc        (1 << 0)  /* blank character before next word */
 #define MMAN_spc_force  (1 << 1)  #define MMAN_spc_force  (1 << 1)  /* even before trailing punctuation */
 #define MMAN_nl         (1 << 2)  #define MMAN_nl         (1 << 2)  /* break man(7) code line */
 #define MMAN_br         (1 << 3)  #define MMAN_br         (1 << 3)  /* break output line */
 #define MMAN_sp         (1 << 4)  #define MMAN_sp         (1 << 4)  /* insert a blank output line */
 #define MMAN_Sm         (1 << 5)  #define MMAN_PP         (1 << 5)  /* reset indentation etc. */
 #define MMAN_Bk         (1 << 6)  #define MMAN_Sm         (1 << 6)  /* horizontal spacing mode */
 #define MMAN_An_split   (1 << 7)  #define MMAN_Bk         (1 << 7)  /* word keep mode */
 #define MMAN_An_nosplit (1 << 8)  #define MMAN_An_split   (1 << 8)  /* author mode is "split" */
   #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 266  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 278  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 286  static void
Line 294  static void
 print_word(const char *s)  print_word(const char *s)
 {  {
   
         if ((MMAN_sp | MMAN_br | MMAN_nl) & outflags) {          if ((MMAN_PP | MMAN_sp | MMAN_br | MMAN_nl) & outflags) {
                 /*                  /*
                  * If we need a newline, print it now and start afresh.                   * If we need a newline, print it now and start afresh.
                  */                   */
                 if (MMAN_sp & outflags)                  if (MMAN_PP & outflags) {
                           if ( ! (MMAN_sp & outflags))
                                   printf("\n.sp -1v");
                           printf("\n.PP\n");
                   } else if (MMAN_sp & outflags)
                         printf("\n.sp\n");                          printf("\n.sp\n");
                 else if (MMAN_br & outflags)                  else if (MMAN_br & outflags)
                         printf("\n.br\n");                          printf("\n.br\n");
                 else if (MMAN_nl & outflags)                  else if (MMAN_nl & outflags)
                         putchar('\n');                          putchar('\n');
                 outflags &= ~(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 336  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--;
         }          }
 }  }
   
 static void  static void
   print_line(const char *s, int newflags)
   {
   
           outflags &= ~MMAN_br;
           outflags |= MMAN_nl;
           print_word(s);
           outflags |= newflags;
   }
   
   static void
   print_block(const char *s, int newflags)
   {
   
           outflags &= ~MMAN_PP;
           if (MMAN_sp & outflags)
                   outflags &= ~(MMAN_sp | MMAN_br);
           else
                   print_line(".sp -1v", 0);
           outflags |= MMAN_nl;
           print_word(s);
           outflags |= newflags;
   }
   
   static void
 print_offs(const char *v)  print_offs(const char *v)
 {  {
         char              buf[24];          char              buf[24];
Line 363  print_offs(const char *v)
Line 407  print_offs(const char *v)
 }  }
   
 void  void
 print_width(const char *v, const struct mdoc_node *child)  print_width(const char *v, const struct mdoc_node *child, size_t defsz)
 {  {
         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)
                   sz = defsz;
         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_word(".HP");                          numeric = 0;
                         else  
                                 print_word(".TP");  
                         print_word(v);  
                         return;  
                 }                  }
         } else          } else
                 sz = strlen(v);                  sz = strlen(v);
   
         if (chsz > sz)          /* XXX Rough estimation, might have multiple parts. */
                 print_word(".HP");          chsz = (NULL != child && MDOC_TEXT == child->type) ?
         else                          strlen(child->string) : 0;
                 print_word(".TP");  
         snprintf(buf, sizeof(buf), "%ldn", sz + 2);          if (defsz && chsz > sz)
         print_word(buf);                  print_block(".HP", 0);
           else {
                   print_block(".TP", 0);
                   remain = sz + 2;
           }
           if (numeric) {
                   snprintf(buf, sizeof(buf), "%ldn", sz + 2);
                   print_word(buf);
           } else
                   print_word(v);
           TPremain = remain;
 }  }
   
 void  void
Line 465  print_node(DECL_ARGS)
Line 516  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 565  pre__t(DECL_ARGS)
Line 617  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 579  post__t(DECL_ARGS)
Line 632  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(m, n);
Line 594  pre_sect(DECL_ARGS)
Line 648  pre_sect(DECL_ARGS)
   
         if (MDOC_HEAD != n->type)          if (MDOC_HEAD != n->type)
                 return(1);                  return(1);
         outflags |= MMAN_nl;          outflags |= MMAN_sp;
         print_word(manacts[n->tok].prefix);          print_block(manacts[n->tok].prefix, 0);
         print_word("\"");          print_word("");
           putchar('\"');
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         return(1);          return(1);
 }  }
Line 611  post_sect(DECL_ARGS)
Line 666  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 694  static int
Line 750  static int
 pre_bd(DECL_ARGS)  pre_bd(DECL_ARGS)
 {  {
   
         if (0 == n->norm->Bd.comp)          outflags &= ~(MMAN_PP | MMAN_sp | MMAN_br);
                 outflags |= MMAN_sp;  
         if (DISP_unfilled == n->norm->Bd.type ||          if (DISP_unfilled == n->norm->Bd.type ||
             DISP_literal  == n->norm->Bd.type) {              DISP_literal  == n->norm->Bd.type)
                 outflags |= MMAN_nl;                  print_line(".nf", 0);
                 print_word(".nf");          if (0 == n->norm->Bd.comp && NULL != n->parent->prev)
         }                  outflags |= MMAN_sp;
         outflags |= MMAN_nl;          print_line(".RS", 0);
         print_word(".RS");  
         print_offs(n->norm->Bd.offs);          print_offs(n->norm->Bd.offs);
         outflags |= MMAN_nl;          outflags |= MMAN_nl;
         return(1);          return(1);
Line 712  static void
Line 767  static void
 post_bd(DECL_ARGS)  post_bd(DECL_ARGS)
 {  {
   
         outflags |= MMAN_nl;          print_line(".RE", MMAN_nl);
         print_word(".RE");  
         if (DISP_unfilled == n->norm->Bd.type ||          if (DISP_unfilled == n->norm->Bd.type ||
             DISP_literal  == n->norm->Bd.type) {              DISP_literal  == n->norm->Bd.type)
                 outflags |= MMAN_nl;                  print_line(".fi", MMAN_nl);
                 print_word(".fi");  
         }  
         outflags |= MMAN_nl;  
 }  }
   
 static int  static int
Line 794  pre_bl(DECL_ARGS)
Line 845  pre_bl(DECL_ARGS)
                 return(1);                  return(1);
         }          }
   
         outflags |= MMAN_nl;          print_line(".TS", MMAN_nl);
         print_word(".TS");  
         outflags |= 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;
         return(1);          return(1);
 }  }
   
Line 808  post_bl(DECL_ARGS)
Line 858  post_bl(DECL_ARGS)
 {  {
   
         switch (n->norm->Bl.type) {          switch (n->norm->Bl.type) {
           case (LIST_column):
                   print_line(".TE", 0);
                   break;
         case (LIST_enum):          case (LIST_enum):
                 n->norm->Bl.count = 0;                  n->norm->Bl.count = 0;
                 break;                  break;
         case (LIST_column):  
                 outflags |= MMAN_nl;  
                 print_word(".TE");  
                 break;  
         default:          default:
                 break;                  break;
         }          }
         outflags |= MMAN_br;          outflags |= MMAN_PP | MMAN_nl;
           outflags &= ~(MMAN_sp | MMAN_br);
 }  }
   
 static int  static int
Line 853  static int
Line 903  static int
 pre_dl(DECL_ARGS)  pre_dl(DECL_ARGS)
 {  {
   
         outflags |= MMAN_nl;          print_line(".RS 6n", MMAN_nl);
         print_word(".RS 6n");  
         outflags |= MMAN_nl;  
         return(1);          return(1);
 }  }
   
Line 863  static void
Line 911  static void
 post_dl(DECL_ARGS)  post_dl(DECL_ARGS)
 {  {
   
         outflags |= MMAN_nl;          print_line(".RE", MMAN_nl);
         print_word(".RE");  
         outflags |= MMAN_nl;  
 }  }
   
 static int  static int
Line 962  pre_fn(DECL_ARGS)
Line 1008  pre_fn(DECL_ARGS)
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         print_word("(");          print_word("(");
         outflags &= ~MMAN_spc;          outflags &= ~MMAN_spc;
         return(pre_fa(m, n->next));  
           n = n->next;
           if (NULL != n)
                   pre_fa(m, n);
           return(0);
 }  }
   
 static void  static void
Line 1063  pre_it(DECL_ARGS)
Line 1113  pre_it(DECL_ARGS)
   
         switch (n->type) {          switch (n->type) {
         case (MDOC_HEAD):          case (MDOC_HEAD):
                 outflags |= MMAN_nl;                  outflags |= MMAN_PP | MMAN_nl;
                 bln = n->parent->parent;                  bln = n->parent->parent;
                   if (0 == bln->norm->Bl.comp ||
                       (NULL == n->parent->prev &&
                        NULL == bln->parent->prev))
                           outflags |= MMAN_sp;
                   outflags &= ~MMAN_br;
                 switch (bln->norm->Bl.type) {                  switch (bln->norm->Bl.type) {
                 case (LIST_item):                  case (LIST_item):
                         if (bln->norm->Bl.comp)  
                                 outflags |= MMAN_br;  
                         else  
                                 outflags |= MMAN_sp;  
                         return(0);                          return(0);
                 case (LIST_inset):                  case (LIST_inset):
                         /* FALLTHROUGH */                          /* FALLTHROUGH */
                 case (LIST_diag):                  case (LIST_diag):
                         /* FALLTHROUGH */                          /* FALLTHROUGH */
                 case (LIST_ohang):                  case (LIST_ohang):
                         if (bln->norm->Bl.comp)  
                                 outflags |= MMAN_br;  
                         else  
                                 outflags |= MMAN_sp;  
                         if (bln->norm->Bl.type == LIST_diag)                          if (bln->norm->Bl.type == LIST_diag)
                                 print_word(".B \"");                                  print_line(".B \"", 0);
                         else                          else
                                 print_word(".R \"");                                  print_line(".R \"", 0);
                         outflags &= ~MMAN_spc;                          outflags &= ~MMAN_spc;
                         return(1);                          return(1);
                 case (LIST_bullet):                  case (LIST_bullet):
Line 1092  pre_it(DECL_ARGS)
Line 1139  pre_it(DECL_ARGS)
                 case (LIST_dash):                  case (LIST_dash):
                         /* FALLTHROUGH */                          /* FALLTHROUGH */
                 case (LIST_hyphen):                  case (LIST_hyphen):
                         print_width(bln->norm->Bl.width, NULL);                          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 1102  pre_it(DECL_ARGS)
Line 1150  pre_it(DECL_ARGS)
                         font_pop();                          font_pop();
                         break;                          break;
                 case (LIST_enum):                  case (LIST_enum):
                         print_width(bln->norm->Bl.width, NULL);                          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);                          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);                          print_width(bln->norm->Bl.width, n->child, 0);
                         break;                          putchar('\n');
                           outflags &= ~MMAN_spc;
                           return(1);
                 default:                  default:
                         return(1);                          return(1);
                 }                  }
Line 1198  pre_li(DECL_ARGS)
Line 1250  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 : m->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(m->name);
Line 1247  static int
Line 1308  static int
 pre_pp(DECL_ARGS)  pre_pp(DECL_ARGS)
 {  {
   
         outflags |= MMAN_nl;          if (MDOC_It != n->parent->tok)
         if (MDOC_It == n->parent->tok)                  outflags |= MMAN_PP;
                 print_word(".sp");          outflags |= MMAN_sp | MMAN_nl;
         else          outflags &= ~MMAN_br;
                 print_word(".PP");  
         outflags |= MMAN_nl;  
         return(0);          return(0);
 }  }
   
Line 1261  pre_rs(DECL_ARGS)
Line 1320  pre_rs(DECL_ARGS)
 {  {
   
         if (SEC_SEE_ALSO == n->sec) {          if (SEC_SEE_ALSO == n->sec) {
                 outflags |= MMAN_nl;                  outflags |= MMAN_PP | MMAN_sp | MMAN_nl;
                 print_word(".PP");                  outflags &= ~MMAN_br;
                 outflags |= MMAN_nl;  
         }          }
         return(1);          return(1);
 }  }
Line 1284  static int
Line 1342  static int
 pre_sp(DECL_ARGS)  pre_sp(DECL_ARGS)
 {  {
   
         outflags |= MMAN_nl;          print_line(".sp", MMAN_nl);
         print_word(".sp");  
         return(1);          return(1);
 }  }
   
Legend:
Removed from v.1.34  
changed lines
  Added in v.1.39
CVSweb