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

Diff for /mandoc/mdoc_term.c between version 1.268 and 1.289

version 1.268, 2014/07/02 03:48:07 version 1.289, 2014/11/10 21:56:43
Line 16 
Line 16 
  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF   * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.   * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  */   */
 #ifdef HAVE_CONFIG_H  
 #include "config.h"  #include "config.h"
 #endif  
   
 #include <sys/types.h>  #include <sys/types.h>
   
Line 53  struct termact {
Line 51  struct termact {
   
 static  size_t    a2width(const struct termp *, const char *);  static  size_t    a2width(const struct termp *, const char *);
 static  size_t    a2height(const struct termp *, const char *);  static  size_t    a2height(const struct termp *, const char *);
 static  size_t    a2offs(const struct termp *, const char *);  
   
 static  void      print_bvspace(struct termp *,  static  void      print_bvspace(struct termp *,
                         const struct mdoc_node *,                          const struct mdoc_node *,
Line 67  static void   synopsis_pre(struct termp *,
Line 64  static void   synopsis_pre(struct termp *,
   
 static  void      termp____post(DECL_ARGS);  static  void      termp____post(DECL_ARGS);
 static  void      termp__t_post(DECL_ARGS);  static  void      termp__t_post(DECL_ARGS);
 static  void      termp_an_post(DECL_ARGS);  
 static  void      termp_bd_post(DECL_ARGS);  static  void      termp_bd_post(DECL_ARGS);
 static  void      termp_bk_post(DECL_ARGS);  static  void      termp_bk_post(DECL_ARGS);
 static  void      termp_bl_post(DECL_ARGS);  static  void      termp_bl_post(DECL_ARGS);
Line 140  static const struct termact termacts[MDOC_MAX] = {
Line 136  static const struct termact termacts[MDOC_MAX] = {
         { NULL, NULL }, /* El */          { NULL, NULL }, /* El */
         { termp_it_pre, termp_it_post }, /* It */          { termp_it_pre, termp_it_post }, /* It */
         { termp_under_pre, NULL }, /* Ad */          { termp_under_pre, NULL }, /* Ad */
         { termp_an_pre, termp_an_post }, /* An */          { termp_an_pre, NULL }, /* An */
         { termp_under_pre, NULL }, /* Ar */          { termp_under_pre, NULL }, /* Ar */
         { termp_cd_pre, NULL }, /* Cd */          { termp_cd_pre, NULL }, /* Cd */
         { termp_bold_pre, NULL }, /* Cm */          { termp_bold_pre, NULL }, /* Cm */
Line 254  static const struct termact termacts[MDOC_MAX] = {
Line 250  static const struct termact termacts[MDOC_MAX] = {
 void  void
 terminal_mdoc(void *arg, const struct mdoc *mdoc)  terminal_mdoc(void *arg, const struct mdoc *mdoc)
 {  {
         const struct mdoc_node  *n;  
         const struct mdoc_meta  *meta;          const struct mdoc_meta  *meta;
           struct mdoc_node        *n;
         struct termp            *p;          struct termp            *p;
   
         p = (struct termp *)arg;          p = (struct termp *)arg;
   
         if (0 == p->defindent)  
                 p->defindent = 5;  
   
         p->overstep = 0;          p->overstep = 0;
         p->maxrmargin = p->defrmargin;          p->rmargin = p->maxrmargin = p->defrmargin;
         p->tabwidth = term_len(p, 5);          p->tabwidth = term_len(p, 5);
   
         if (NULL == p->symtab)          n = mdoc_node(mdoc)->child;
                 p->symtab = mchars_alloc();  
   
         n = mdoc_node(mdoc);  
         meta = mdoc_meta(mdoc);          meta = mdoc_meta(mdoc);
   
         term_begin(p, print_mdoc_head, print_mdoc_foot, meta);          if (p->synopsisonly) {
                   while (n != NULL) {
         if (n->child)                          if (n->tok == MDOC_Sh && n->sec == SEC_SYNOPSIS) {
                 print_mdoc_nodelist(p, NULL, meta, n->child);                                  if (n->child->next->child != NULL)
                                           print_mdoc_nodelist(p, NULL,
         term_end(p);                                              meta, n->child->next->child);
                                   term_newln(p);
                                   break;
                           }
                           n = n->next;
                   }
           } else {
                   if (p->defindent == 0)
                           p->defindent = 5;
                   term_begin(p, print_mdoc_head, print_mdoc_foot, meta);
                   if (n != NULL) {
                           if (n->tok != MDOC_Sh)
                                   term_vspace(p);
                           print_mdoc_nodelist(p, NULL, meta, n);
                   }
                   term_end(p);
           }
 }  }
   
 static void  static void
Line 334  print_mdoc_node(DECL_ARGS)
Line 340  print_mdoc_node(DECL_ARGS)
                         p->flags |= TERMP_NOSPACE;                          p->flags |= TERMP_NOSPACE;
                 break;                  break;
         case MDOC_EQN:          case MDOC_EQN:
                   if ( ! (n->flags & MDOC_LINE))
                           p->flags |= TERMP_NOSPACE;
                 term_eqn(p, n->eqn);                  term_eqn(p, n->eqn);
                   if (n->next != NULL && ! (n->next->flags & MDOC_LINE))
                           p->flags |= TERMP_NOSPACE;
                 break;                  break;
         case MDOC_TBL:          case MDOC_TBL:
                 term_tbl(p, n->span);                  term_tbl(p, n->span);
Line 462  print_mdoc_head(struct termp *p, const void *arg)
Line 472  print_mdoc_head(struct termp *p, const void *arg)
          * switches on the manual section.           * switches on the manual section.
          */           */
   
         p->offset = 0;  
         p->rmargin = p->maxrmargin;  
   
         assert(meta->vol);          assert(meta->vol);
         if (NULL == meta->arch)          if (NULL == meta->arch)
                 volume = mandoc_strdup(meta->vol);                  volume = mandoc_strdup(meta->vol);
Line 473  print_mdoc_head(struct termp *p, const void *arg)
Line 480  print_mdoc_head(struct termp *p, const void *arg)
                     meta->vol, meta->arch);                      meta->vol, meta->arch);
         vollen = term_strlen(p, volume);          vollen = term_strlen(p, volume);
   
         mandoc_asprintf(&title, "%s(%s)", meta->title, meta->msec);          if (NULL == meta->msec)
                   title = mandoc_strdup(meta->title);
           else
                   mandoc_asprintf(&title, "%s(%s)",
                       meta->title, meta->msec);
         titlen = term_strlen(p, title);          titlen = term_strlen(p, title);
   
         p->flags |= TERMP_NOBREAK | TERMP_NOSPACE;          p->flags |= TERMP_NOBREAK | TERMP_NOSPACE;
Line 530  a2width(const struct termp *p, const char *v)
Line 541  a2width(const struct termp *p, const char *v)
         struct roffsu    su;          struct roffsu    su;
   
         assert(v);          assert(v);
         if ( ! a2roffsu(v, &su, SCALE_MAX))          if ( ! a2roffsu(v, &su, SCALE_MAX)) {
                 SCALE_HS_INIT(&su, term_strlen(p, v));                  SCALE_HS_INIT(&su, term_strlen(p, v));
                   su.scale /= term_strlen(p, "0");
           }
   
         return(term_hspan(p, &su));          return(term_hspan(p, &su));
 }  }
   
 static size_t  
 a2offs(const struct termp *p, const char *v)  
 {  
         struct roffsu    su;  
   
         if ('\0' == *v)  
                 return(0);  
         else if (0 == strcmp(v, "left"))  
                 return(0);  
         else if (0 == strcmp(v, "indent"))  
                 return(term_len(p, p->defindent + 1));  
         else if (0 == strcmp(v, "indent-two"))  
                 return(term_len(p, (p->defindent + 1) * 2));  
         else if ( ! a2roffsu(v, &su, SCALE_MAX))  
                 SCALE_HS_INIT(&su, term_strlen(p, v));  
   
         return(term_hspan(p, &su));  
 }  
   
 /*  /*
  * Determine how much space to print out before block elements of `It'   * Determine how much space to print out before block elements of `It'
  * (and thus `Bl') and `Bd'.  And then go ahead and print that space,   * (and thus `Bl') and `Bd'.  And then go ahead and print that space,
Line 578  print_bvspace(struct termp *p,
Line 572  print_bvspace(struct termp *p,
   
         /* Do not vspace directly after Ss/Sh. */          /* Do not vspace directly after Ss/Sh. */
   
         for (nn = n; nn; nn = nn->parent) {          nn = n;
                 if (MDOC_BLOCK != nn->type)          while (nn->prev == NULL) {
                         continue;                  do {
                 if (MDOC_Ss == nn->tok)                          nn = nn->parent;
                           if (nn->type == MDOC_ROOT)
                                   return;
                   } while (nn->type != MDOC_BLOCK);
                   if (nn->tok == MDOC_Sh || nn->tok == MDOC_Ss)
                         return;                          return;
                 if (MDOC_Sh == nn->tok)                  if (nn->tok == MDOC_It &&
                         return;                      nn->parent->parent->norm->Bl.type != LIST_item)
                 if (NULL == nn->prev)                          break;
                         continue;  
                 break;  
         }          }
   
         /* A `-column' does not assert vspace within the list. */          /* A `-column' does not assert vspace within the list. */
Line 643  termp_it_pre(DECL_ARGS)
Line 639  termp_it_pre(DECL_ARGS)
         width = offset = 0;          width = offset = 0;
   
         if (bl->norm->Bl.offs)          if (bl->norm->Bl.offs)
                 offset = a2offs(p, bl->norm->Bl.offs);                  offset = a2width(p, bl->norm->Bl.offs);
   
         switch (type) {          switch (type) {
         case LIST_column:          case LIST_column:
Line 747  termp_it_pre(DECL_ARGS)
Line 743  termp_it_pre(DECL_ARGS)
                         term_word(p, "\\ \\ ");                          term_word(p, "\\ \\ ");
                 break;                  break;
         case LIST_inset:          case LIST_inset:
                 if (MDOC_BODY == n->type)                  if (MDOC_BODY == n->type && n->parent->head->nchild)
                         term_word(p, "\\ ");                          term_word(p, "\\ ");
                 break;                  break;
         default:          default:
Line 801  termp_it_pre(DECL_ARGS)
Line 797  termp_it_pre(DECL_ARGS)
                  * the "overstep" effect in term_flushln() and treat                   * the "overstep" effect in term_flushln() and treat
                  * this as a `-ohang' list instead.                   * this as a `-ohang' list instead.
                  */                   */
                 if (n->next->child &&                  if (NULL != n->next &&
                       NULL != n->next->child &&
                     (MDOC_Bl == n->next->child->tok ||                      (MDOC_Bl == n->next->child->tok ||
                      MDOC_Bd == n->next->child->tok))                       MDOC_Bd == n->next->child->tok))
                         break;                          break;
Line 857  termp_it_pre(DECL_ARGS)
Line 854  termp_it_pre(DECL_ARGS)
                  * don't want to recalculate rmargin and offsets when                   * don't want to recalculate rmargin and offsets when
                  * using `Bd' or `Bl' within `-hang' overstep lists.                   * using `Bd' or `Bl' within `-hang' overstep lists.
                  */                   */
                 if (MDOC_HEAD == n->type && n->next->child &&                  if (MDOC_HEAD == n->type &&
                       NULL != n->next &&
                       NULL != n->next->child &&
                     (MDOC_Bl == n->next->child->tok ||                      (MDOC_Bl == n->next->child->tok ||
                      MDOC_Bd == n->next->child->tok))                       MDOC_Bd == n->next->child->tok))
                         break;                          break;
Line 1022  termp_nm_pre(DECL_ARGS)
Line 1021  termp_nm_pre(DECL_ARGS)
         if (MDOC_HEAD == n->type)          if (MDOC_HEAD == n->type)
                 synopsis_pre(p, n->parent);                  synopsis_pre(p, n->parent);
   
         if (MDOC_HEAD == n->type && n->next->child) {          if (MDOC_HEAD == n->type &&
               NULL != n->next && NULL != n->next->child) {
                 p->flags |= TERMP_NOSPACE | TERMP_NOBREAK | TERMP_BRIND;                  p->flags |= TERMP_NOSPACE | TERMP_NOBREAK | TERMP_BRIND;
                 p->trailspace = 1;                  p->trailspace = 1;
                 p->rmargin = p->offset + term_len(p, 1);                  p->rmargin = p->offset + term_len(p, 1);
Line 1050  termp_nm_post(DECL_ARGS)
Line 1050  termp_nm_post(DECL_ARGS)
   
         if (MDOC_BLOCK == n->type) {          if (MDOC_BLOCK == n->type) {
                 p->flags &= ~(TERMP_KEEP | TERMP_PREKEEP);                  p->flags &= ~(TERMP_KEEP | TERMP_PREKEEP);
         } else if (MDOC_HEAD == n->type && n->next->child) {          } else if (MDOC_HEAD == n->type &&
               NULL != n->next && NULL != n->next->child) {
                 term_flushln(p);                  term_flushln(p);
                 p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND | TERMP_HANG);                  p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND | TERMP_HANG);
                 p->trailspace = 0;                  p->trailspace = 0;
Line 1065  termp_fl_pre(DECL_ARGS)
Line 1066  termp_fl_pre(DECL_ARGS)
         term_fontpush(p, TERMFONT_BOLD);          term_fontpush(p, TERMFONT_BOLD);
         term_word(p, "\\-");          term_word(p, "\\-");
   
         if (n->child)          if ( ! (n->nchild == 0 &&
               (n->next == NULL ||
                n->next->type == MDOC_TEXT ||
                n->next->flags & MDOC_LINE)))
                 p->flags |= TERMP_NOSPACE;                  p->flags |= TERMP_NOSPACE;
         else if (n->next && n->next->line == n->line)  
                 p->flags |= TERMP_NOSPACE;  
   
         return(1);          return(1);
 }  }
Line 1088  static int
Line 1090  static int
 termp_an_pre(DECL_ARGS)  termp_an_pre(DECL_ARGS)
 {  {
   
         if (NULL == n->child)          if (n->norm->An.auth == AUTH_split) {
                 return(1);                  p->flags &= ~TERMP_NOSPLIT;
                   p->flags |= TERMP_SPLIT;
                   return(0);
           }
           if (n->norm->An.auth == AUTH_nosplit) {
                   p->flags &= ~TERMP_SPLIT;
                   p->flags |= TERMP_NOSPLIT;
                   return(0);
           }
   
         /*          if (n->child == NULL)
          * If not in the AUTHORS section, `An -split' will cause                  return(0);
          * newlines to occur before the author name.  If in the AUTHORS  
          * section, by default, the first `An' invocation is nosplit,  
          * then all subsequent ones, regardless of whether interspersed  
          * with other macros/text, are split.  -split, in this case,  
          * will override the condition of the implied first -nosplit.  
          */  
   
         if (n->sec == SEC_AUTHORS) {          if (p->flags & TERMP_SPLIT)
                 if ( ! (TERMP_ANPREC & p->flags)) {  
                         if (TERMP_SPLIT & p->flags)  
                                 term_newln(p);  
                         return(1);  
                 }  
                 if (TERMP_NOSPLIT & p->flags)  
                         return(1);  
                 term_newln(p);                  term_newln(p);
                 return(1);  
         }  
   
         if (TERMP_SPLIT & p->flags)          if (n->sec == SEC_AUTHORS && ! (p->flags & TERMP_NOSPLIT))
                 term_newln(p);                  p->flags |= TERMP_SPLIT;
   
         return(1);          return(1);
 }  }
   
 static void  
 termp_an_post(DECL_ARGS)  
 {  
   
         if (n->child) {  
                 if (SEC_AUTHORS == n->sec)  
                         p->flags |= TERMP_ANPREC;  
                 return;  
         }  
   
         if (AUTH_split == n->norm->An.auth) {  
                 p->flags &= ~TERMP_NOSPLIT;  
                 p->flags |= TERMP_SPLIT;  
         } else if (AUTH_nosplit == n->norm->An.auth) {  
                 p->flags &= ~TERMP_SPLIT;  
                 p->flags |= TERMP_NOSPLIT;  
         }  
   
 }  
   
 static int  static int
 termp_ns_pre(DECL_ARGS)  termp_ns_pre(DECL_ARGS)
 {  {
Line 1164  termp_rv_pre(DECL_ARGS)
Line 1139  termp_rv_pre(DECL_ARGS)
         int              nchild;          int              nchild;
   
         term_newln(p);          term_newln(p);
         term_word(p, "The");  
   
         nchild = n->nchild;          nchild = n->nchild;
         for (n = n->child; n; n = n->next) {          if (nchild > 0) {
                 term_fontpush(p, TERMFONT_BOLD);                  term_word(p, "The");
                 term_word(p, n->string);  
                 term_fontpop(p);  
   
                 p->flags |= TERMP_NOSPACE;                  for (n = n->child; n; n = n->next) {
                 term_word(p, "()");                          term_fontpush(p, TERMFONT_BOLD);
                           term_word(p, n->string);
                           term_fontpop(p);
   
                 if (nchild > 2 && n->next) {  
                         p->flags |= TERMP_NOSPACE;                          p->flags |= TERMP_NOSPACE;
                         term_word(p, ",");                          term_word(p, "()");
   
                           if (n->next == NULL)
                                   continue;
   
                           if (nchild > 2) {
                                   p->flags |= TERMP_NOSPACE;
                                   term_word(p, ",");
                           }
                           if (n->next->next == NULL)
                                   term_word(p, "and");
                 }                  }
   
                 if (n->next && NULL == n->next->next)                  if (nchild > 1)
                         term_word(p, "and");                          term_word(p, "functions return");
         }                  else
                           term_word(p, "function returns");
   
         if (nchild > 1)                  term_word(p, "the value\\~0 if successful;");
                 term_word(p, "functions return");          } else
         else                  term_word(p, "Upon successful completion,"
                 term_word(p, "function returns");                      " the value\\~0 is returned;");
   
         term_word(p, "the value 0 if successful; otherwise the "          term_word(p, "otherwise the value\\~\\-1 is returned"
             "value -1 is returned and the global variable");              " and the global variable");
   
         term_fontpush(p, TERMFONT_UNDER);          term_fontpush(p, TERMFONT_UNDER);
         term_word(p, "errno");          term_word(p, "errno");
Line 1226  termp_ex_pre(DECL_ARGS)
Line 1210  termp_ex_pre(DECL_ARGS)
         }          }
   
         if (nchild > 1)          if (nchild > 1)
                 term_word(p, "utilities exit");                  term_word(p, "utilities exit\\~0");
         else          else
                 term_word(p, "utility exits");                  term_word(p, "utility exits\\~0");
   
         term_word(p, "0 on success, and >0 if an error occurs.");          term_word(p, "on success, and\\~>0 if an error occurs.");
   
         p->flags |= TERMP_SENTENCE;          p->flags |= TERMP_SENTENCE;
         return(0);          return(0);
Line 1568  termp_fa_pre(DECL_ARGS)
Line 1552  termp_fa_pre(DECL_ARGS)
 static int  static int
 termp_bd_pre(DECL_ARGS)  termp_bd_pre(DECL_ARGS)
 {  {
         size_t                   tabwidth, rm, rmax;          size_t                   tabwidth, lm, len, rm, rmax;
         struct mdoc_node        *nn;          struct mdoc_node        *nn;
   
         if (MDOC_BLOCK == n->type) {          if (MDOC_BLOCK == n->type) {
Line 1577  termp_bd_pre(DECL_ARGS)
Line 1561  termp_bd_pre(DECL_ARGS)
         } else if (MDOC_HEAD == n->type)          } else if (MDOC_HEAD == n->type)
                 return(0);                  return(0);
   
         if (n->norm->Bd.offs)          /* Handle the -offset argument. */
                 p->offset += a2offs(p, n->norm->Bd.offs);  
   
           if (n->norm->Bd.offs == NULL ||
               ! strcmp(n->norm->Bd.offs, "left"))
                   /* nothing */;
           else if ( ! strcmp(n->norm->Bd.offs, "indent"))
                   p->offset += term_len(p, p->defindent + 1);
           else if ( ! strcmp(n->norm->Bd.offs, "indent-two"))
                   p->offset += term_len(p, (p->defindent + 1) * 2);
           else
                   p->offset += a2width(p, n->norm->Bd.offs);
   
         /*          /*
          * If -ragged or -filled are specified, the block does nothing           * If -ragged or -filled are specified, the block does nothing
          * but change the indentation.  If -unfilled or -literal are           * but change the indentation.  If -unfilled or -literal are
Line 1589  termp_bd_pre(DECL_ARGS)
Line 1582  termp_bd_pre(DECL_ARGS)
          */           */
   
         if (DISP_literal != n->norm->Bd.type &&          if (DISP_literal != n->norm->Bd.type &&
             DISP_unfilled != n->norm->Bd.type)              DISP_unfilled != n->norm->Bd.type &&
               DISP_centered != n->norm->Bd.type)
                 return(1);                  return(1);
   
         tabwidth = p->tabwidth;          tabwidth = p->tabwidth;
         if (DISP_literal == n->norm->Bd.type)          if (DISP_literal == n->norm->Bd.type)
                 p->tabwidth = term_len(p, 8);                  p->tabwidth = term_len(p, 8);
   
           lm = p->offset;
         rm = p->rmargin;          rm = p->rmargin;
         rmax = p->maxrmargin;          rmax = p->maxrmargin;
         p->rmargin = p->maxrmargin = TERM_MAXMARGIN;          p->rmargin = p->maxrmargin = TERM_MAXMARGIN;
   
         for (nn = n->child; nn; nn = nn->next) {          for (nn = n->child; nn; nn = nn->next) {
                   if (DISP_centered == n->norm->Bd.type) {
                           if (MDOC_TEXT == nn->type) {
                                   len = term_strlen(p, nn->string);
                                   p->offset = len >= rm ? 0 :
                                       lm + len >= rm ? rm - len :
                                       (lm + rm - len) / 2;
                           } else
                                   p->offset = lm;
                   }
                 print_mdoc_node(p, pair, meta, nn);                  print_mdoc_node(p, pair, meta, nn);
                 /*                  /*
                  * If the printed node flushes its own line, then we                   * If the printed node flushes its own line, then we
Line 1747  termp_ss_pre(DECL_ARGS)
Line 1751  termp_ss_pre(DECL_ARGS)
                 term_fontpush(p, TERMFONT_BOLD);                  term_fontpush(p, TERMFONT_BOLD);
                 p->offset = term_len(p, (p->defindent+1)/2);                  p->offset = term_len(p, (p->defindent+1)/2);
                 break;                  break;
           case MDOC_BODY:
                   p->offset = term_len(p, p->defindent);
                   break;
         default:          default:
                 break;                  break;
         }          }
Line 1758  static void
Line 1765  static void
 termp_ss_post(DECL_ARGS)  termp_ss_post(DECL_ARGS)
 {  {
   
         if (MDOC_HEAD == n->type)          if (n->type == MDOC_HEAD || n->type == MDOC_BODY)
                 term_newln(p);                  term_newln(p);
 }  }
   
Line 2056  static int
Line 2063  static int
 termp_sm_pre(DECL_ARGS)  termp_sm_pre(DECL_ARGS)
 {  {
   
         assert(n->child && MDOC_TEXT == n->child->type);          if (NULL == n->child)
         if (0 == strcmp("on", n->child->string)) {                  p->flags ^= TERMP_NONOSPACE;
                 if (p->col)          else if (0 == strcmp("on", n->child->string))
                         p->flags &= ~TERMP_NOSPACE;  
                 p->flags &= ~TERMP_NONOSPACE;                  p->flags &= ~TERMP_NONOSPACE;
         } else          else
                 p->flags |= TERMP_NONOSPACE;                  p->flags |= TERMP_NONOSPACE;
   
           if (p->col && ! (TERMP_NONOSPACE & p->flags))
                   p->flags &= ~TERMP_NOSPACE;
   
         return(0);          return(0);
 }  }
Legend:
Removed from v.1.268  
changed lines
  Added in v.1.289
CVSweb