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

Diff for /mandoc/man_term.c between version 1.155 and 1.164

version 1.155, 2014/10/28 17:36:19 version 1.164, 2014/12/24 09:58:35
Line 21 
Line 21 
   
 #include <assert.h>  #include <assert.h>
 #include <ctype.h>  #include <ctype.h>
   #include <limits.h>
 #include <stdio.h>  #include <stdio.h>
 #include <stdlib.h>  #include <stdlib.h>
 #include <string.h>  #include <string.h>
Line 37 
Line 38 
 struct  mtermp {  struct  mtermp {
         int               fl;          int               fl;
 #define MANT_LITERAL     (1 << 0)  #define MANT_LITERAL     (1 << 0)
         size_t            lmargin[MAXMARGINS]; /* margins (incl. visible page) */          int               lmargin[MAXMARGINS]; /* margins (incl. vis. page) */
         int               lmargincur; /* index of current margin */          int               lmargincur; /* index of current margin */
         int               lmarginsz; /* actual number of nested margins */          int               lmarginsz; /* actual number of nested margins */
         size_t            offset; /* default offset to visible page */          size_t            offset; /* default offset to visible page */
Line 56  struct termact {
Line 57  struct termact {
 #define MAN_NOTEXT       (1 << 0) /* Never has text children. */  #define MAN_NOTEXT       (1 << 0) /* Never has text children. */
 };  };
   
 static  int               a2width(const struct termp *, const char *);  
 static  size_t            a2height(const struct termp *, const char *);  
   
 static  void              print_man_nodelist(DECL_ARGS);  static  void              print_man_nodelist(DECL_ARGS);
 static  void              print_man_node(DECL_ARGS);  static  void              print_man_node(DECL_ARGS);
 static  void              print_man_head(struct termp *, const void *);  static  void              print_man_head(struct termp *, const void *);
Line 123  static const struct termact termacts[MAN_MAX] = {
Line 121  static const struct termact termacts[MAN_MAX] = {
         { NULL, NULL, 0 }, /* RE */          { NULL, NULL, 0 }, /* RE */
         { pre_RS, post_RS, 0 }, /* RS */          { pre_RS, post_RS, 0 }, /* RS */
         { pre_ign, NULL, 0 }, /* DT */          { pre_ign, NULL, 0 }, /* DT */
         { pre_ign, NULL, 0 }, /* UC */          { pre_ign, NULL, MAN_NOTEXT }, /* UC */
         { pre_PD, NULL, MAN_NOTEXT }, /* PD */          { pre_PD, NULL, MAN_NOTEXT }, /* PD */
         { pre_ign, NULL, 0 }, /* AT */          { pre_ign, NULL, 0 }, /* AT */
         { pre_in, NULL, MAN_NOTEXT }, /* in */          { pre_in, NULL, MAN_NOTEXT }, /* in */
Line 184  terminal_man(void *arg, const struct man *man)
Line 182  terminal_man(void *arg, const struct man *man)
         }          }
 }  }
   
   
 static size_t  
 a2height(const struct termp *p, const char *cp)  
 {  
         struct roffsu    su;  
   
         if ( ! a2roffsu(cp, &su, SCALE_VS))  
                 SCALE_VS_INIT(&su, atoi(cp));  
   
         return(term_vspan(p, &su));  
 }  
   
 static int  
 a2width(const struct termp *p, const char *cp)  
 {  
         struct roffsu    su;  
   
         if ( ! a2roffsu(cp, &su, SCALE_BU))  
                 return(-1);  
   
         return((int)term_hspan(p, &su));  
 }  
   
 /*  /*
  * Printing leading vertical space before a block.   * Printing leading vertical space before a block.
  * This is used for the paragraph macros.   * This is used for the paragraph macros.
Line 288  pre_literal(DECL_ARGS)
Line 263  pre_literal(DECL_ARGS)
 static int  static int
 pre_PD(DECL_ARGS)  pre_PD(DECL_ARGS)
 {  {
           struct roffsu    su;
   
         n = n->child;          n = n->child;
         if (0 == n) {          if (n == NULL) {
                 mt->pardist = 1;                  mt->pardist = 1;
                 return(0);                  return(0);
         }          }
         assert(MAN_TEXT == n->type);          assert(MAN_TEXT == n->type);
         mt->pardist = atoi(n->string);          if (a2roffsu(n->string, &su, SCALE_VS))
                   mt->pardist = term_vspan(p, &su);
         return(0);          return(0);
 }  }
   
Line 423  pre_ft(DECL_ARGS)
Line 400  pre_ft(DECL_ARGS)
 static int  static int
 pre_in(DECL_ARGS)  pre_in(DECL_ARGS)
 {  {
         int              len, less;          struct roffsu    su;
         size_t           v;  
         const char      *cp;          const char      *cp;
           size_t           v;
           int              less;
   
         term_newln(p);          term_newln(p);
   
Line 444  pre_in(DECL_ARGS)
Line 422  pre_in(DECL_ARGS)
         else          else
                 cp--;                  cp--;
   
         if ((len = a2width(p, ++cp)) < 0)          if ( ! a2roffsu(++cp, &su, SCALE_EN))
                 return(0);                  return(0);
   
         v = (size_t)len;          v = term_hspan(p, &su);
   
         if (less < 0)          if (less < 0)
                 p->offset -= p->offset > v ? v : p->offset;                  p->offset -= p->offset > v ? v : p->offset;
Line 455  pre_in(DECL_ARGS)
Line 433  pre_in(DECL_ARGS)
                 p->offset += v;                  p->offset += v;
         else          else
                 p->offset = v;                  p->offset = v;
           if (p->offset > SHRT_MAX)
                   p->offset = term_len(p, p->defindent);
   
         /* Don't let this creep beyond the right margin. */  
   
         if (p->offset > p->rmargin)  
                 p->offset = p->rmargin;  
   
         return(0);          return(0);
 }  }
   
 static int  static int
 pre_sp(DECL_ARGS)  pre_sp(DECL_ARGS)
 {  {
         char            *s;          struct roffsu    su;
         size_t           i, len;          int              i, len;
         int              neg;  
   
         if ((NULL == n->prev && n->parent)) {          if ((NULL == n->prev && n->parent)) {
                 switch (n->parent->tok) {                  switch (n->parent->tok) {
Line 489  pre_sp(DECL_ARGS)
Line 463  pre_sp(DECL_ARGS)
                 }                  }
         }          }
   
         neg = 0;          if (n->tok == MAN_br)
         switch (n->tok) {  
         case MAN_br:  
                 len = 0;                  len = 0;
                 break;          else if (n->child == NULL)
         default:                  len = 1;
                 if (NULL == n->child) {          else {
                         len = 1;                  if ( ! a2roffsu(n->child->string, &su, SCALE_VS))
                         break;                          su.scale = 1.0;
                 }                  len = term_vspan(p, &su);
                 s = n->child->string;  
                 if ('-' == *s) {  
                         neg = 1;  
                         s++;  
                 }  
                 len = a2height(p, s);  
                 break;  
         }          }
   
         if (0 == len)          if (len == 0)
                 term_newln(p);                  term_newln(p);
         else if (neg)          else if (len < 0)
                 p->skipvsp += len;                  p->skipvsp -= len;
         else          else
                 for (i = 0; i < len; i++)                  for (i = 0; i < len; i++)
                         term_vspace(p);                          term_vspace(p);
Line 522  pre_sp(DECL_ARGS)
Line 487  pre_sp(DECL_ARGS)
 static int  static int
 pre_HP(DECL_ARGS)  pre_HP(DECL_ARGS)
 {  {
         size_t                   len, one;          struct roffsu            su;
         int                      ival;  
         const struct man_node   *nn;          const struct man_node   *nn;
           int                      len;
   
         switch (n->type) {          switch (n->type) {
         case MAN_BLOCK:          case MAN_BLOCK:
Line 541  pre_HP(DECL_ARGS)
Line 506  pre_HP(DECL_ARGS)
                 p->trailspace = 2;                  p->trailspace = 2;
         }          }
   
         len = mt->lmargin[mt->lmargincur];  
         ival = -1;  
   
         /* Calculate offset. */          /* Calculate offset. */
   
         if (NULL != (nn = n->parent->head->child))          if ((nn = n->parent->head->child) != NULL &&
                 if ((ival = a2width(p, nn->string)) >= 0)              a2roffsu(nn->string, &su, SCALE_EN)) {
                         len = (size_t)ival;                  len = term_hspan(p, &su);
                   if (len < 0 && (size_t)(-len) > mt->offset)
                           len = -mt->offset;
                   else if (len > SHRT_MAX)
                           len = term_len(p, p->defindent);
                   mt->lmargin[mt->lmargincur] = len;
           } else
                   len = mt->lmargin[mt->lmargincur];
   
         one = term_len(p, 1);  
         if (len < one)  
                 len = one;  
   
         p->offset = mt->offset;          p->offset = mt->offset;
         p->rmargin = mt->offset + len;          p->rmargin = mt->offset + len;
   
         if (ival >= 0)  
                 mt->lmargin[mt->lmargincur] = (size_t)ival;  
   
         return(1);          return(1);
 }  }
   
Line 600  pre_PP(DECL_ARGS)
Line 561  pre_PP(DECL_ARGS)
 static int  static int
 pre_IP(DECL_ARGS)  pre_IP(DECL_ARGS)
 {  {
           struct roffsu            su;
         const struct man_node   *nn;          const struct man_node   *nn;
         size_t                   len;          int                      len, savelit;
         int                      savelit, ival;  
   
         switch (n->type) {          switch (n->type) {
         case MAN_BODY:          case MAN_BODY:
Line 619  pre_IP(DECL_ARGS)
Line 580  pre_IP(DECL_ARGS)
                 return(1);                  return(1);
         }          }
   
         len = mt->lmargin[mt->lmargincur];  
         ival = -1;  
   
         /* Calculate the offset from the optional second argument. */          /* Calculate the offset from the optional second argument. */
         if (NULL != (nn = n->parent->head->child))          if ((nn = n->parent->head->child) != NULL &&
                 if (NULL != (nn = nn->next))              (nn = nn->next) != NULL &&
                         if ((ival = a2width(p, nn->string)) >= 0)              a2roffsu(nn->string, &su, SCALE_EN)) {
                                 len = (size_t)ival;                  len = term_hspan(p, &su);
                   if (len < 0 && (size_t)(-len) > mt->offset)
                           len = -mt->offset;
                   else if (len > SHRT_MAX)
                           len = term_len(p, p->defindent);
                   mt->lmargin[mt->lmargincur] = len;
           } else
                   len = mt->lmargin[mt->lmargincur];
   
         switch (n->type) {          switch (n->type) {
         case MAN_HEAD:          case MAN_HEAD:
                 /* Handle zero-width lengths. */  
                 if (0 == len)  
                         len = term_len(p, 1);  
   
                 p->offset = mt->offset;                  p->offset = mt->offset;
                 p->rmargin = mt->offset + len;                  p->rmargin = mt->offset + len;
                 if (ival < 0)  
                         break;  
   
                 /* Set the saved left-margin. */  
                 mt->lmargin[mt->lmargincur] = (size_t)ival;  
   
                 savelit = MANT_LITERAL & mt->fl;                  savelit = MANT_LITERAL & mt->fl;
                 mt->fl &= ~MANT_LITERAL;                  mt->fl &= ~MANT_LITERAL;
   
Line 654  pre_IP(DECL_ARGS)
Line 610  pre_IP(DECL_ARGS)
                 return(0);                  return(0);
         case MAN_BODY:          case MAN_BODY:
                 p->offset = mt->offset + len;                  p->offset = mt->offset + len;
                 p->rmargin = p->maxrmargin > p->offset ?                  p->rmargin = p->maxrmargin;
                     p->maxrmargin : p->offset;  
                 break;                  break;
         default:          default:
                 break;                  break;
Line 687  post_IP(DECL_ARGS)
Line 642  post_IP(DECL_ARGS)
 static int  static int
 pre_TP(DECL_ARGS)  pre_TP(DECL_ARGS)
 {  {
           struct roffsu            su;
         const struct man_node   *nn;          const struct man_node   *nn;
         size_t                   len;          int                      len, savelit;
         int                      savelit, ival;  
   
         switch (n->type) {          switch (n->type) {
         case MAN_HEAD:          case MAN_HEAD:
Line 706  pre_TP(DECL_ARGS)
Line 661  pre_TP(DECL_ARGS)
                 return(1);                  return(1);
         }          }
   
         len = (size_t)mt->lmargin[mt->lmargincur];  
         ival = -1;  
   
         /* Calculate offset. */          /* Calculate offset. */
   
         if (NULL != (nn = n->parent->head->child))          if ((nn = n->parent->head->child) != NULL &&
                 if (nn->string && 0 == (MAN_LINE & nn->flags))              nn->string != NULL && ! (MAN_LINE & nn->flags) &&
                         if ((ival = a2width(p, nn->string)) >= 0)              a2roffsu(nn->string, &su, SCALE_EN)) {
                                 len = (size_t)ival;                  len = term_hspan(p, &su);
                   if (len < 0 && (size_t)(-len) > mt->offset)
                           len = -mt->offset;
                   else if (len > SHRT_MAX)
                           len = term_len(p, p->defindent);
                   mt->lmargin[mt->lmargincur] = len;
           } else
                   len = mt->lmargin[mt->lmargincur];
   
         switch (n->type) {          switch (n->type) {
         case MAN_HEAD:          case MAN_HEAD:
                 /* Handle zero-length properly. */  
                 if (0 == len)  
                         len = term_len(p, 1);  
   
                 p->offset = mt->offset;                  p->offset = mt->offset;
                 p->rmargin = mt->offset + len;                  p->rmargin = mt->offset + len;
   
Line 740  pre_TP(DECL_ARGS)
Line 695  pre_TP(DECL_ARGS)
   
                 if (savelit)                  if (savelit)
                         mt->fl |= MANT_LITERAL;                          mt->fl |= MANT_LITERAL;
                 if (ival >= 0)  
                         mt->lmargin[mt->lmargincur] = (size_t)ival;  
   
                 return(0);                  return(0);
         case MAN_BODY:          case MAN_BODY:
                 p->offset = mt->offset + len;                  p->offset = mt->offset + len;
                 p->rmargin = p->maxrmargin > p->offset ?                  p->rmargin = p->maxrmargin;
                     p->maxrmargin : p->offset;  
                 p->trailspace = 0;                  p->trailspace = 0;
                 p->flags &= ~TERMP_NOBREAK;                  p->flags &= ~TERMP_NOBREAK;
                 break;                  break;
Line 785  pre_SS(DECL_ARGS)
Line 736  pre_SS(DECL_ARGS)
                 mt->fl &= ~MANT_LITERAL;                  mt->fl &= ~MANT_LITERAL;
                 mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);                  mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
                 mt->offset = term_len(p, p->defindent);                  mt->offset = term_len(p, p->defindent);
                 /* If following a prior empty `SS', no vspace. */  
                 if (n->prev && MAN_SS == n->prev->tok)                  /*
                         if (NULL == n->prev->body->child)                   * No vertical space before the first subsection
                                 break;                   * and after an empty subsection.
                 if (NULL == n->prev)                   */
   
                   do {
                           n = n->prev;
                   } while (n != NULL && termacts[n->tok].flags & MAN_NOTEXT);
                   if (n == NULL || (n->tok == MAN_SS && n->body->child == NULL))
                         break;                          break;
   
                 for (i = 0; i < mt->pardist; i++)                  for (i = 0; i < mt->pardist; i++)
                         term_vspace(p);                          term_vspace(p);
                 break;                  break;
Line 834  pre_SH(DECL_ARGS)
Line 791  pre_SH(DECL_ARGS)
                 mt->fl &= ~MANT_LITERAL;                  mt->fl &= ~MANT_LITERAL;
                 mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);                  mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
                 mt->offset = term_len(p, p->defindent);                  mt->offset = term_len(p, p->defindent);
                 /* If following a prior empty `SH', no vspace. */  
                 if (n->prev && MAN_SH == n->prev->tok)                  /*
                         if (NULL == n->prev->body->child)                   * No vertical space before the first section
                                 break;                   * and after an empty section.
                 /* If the first macro, no vspae. */                   */
                 if (NULL == n->prev)  
                   do {
                           n = n->prev;
                   } while (n != NULL && termacts[n->tok].flags & MAN_NOTEXT);
                   if (n == NULL || (n->tok == MAN_SH && n->body->child == NULL))
                         break;                          break;
   
                 for (i = 0; i < mt->pardist; i++)                  for (i = 0; i < mt->pardist; i++)
                         term_vspace(p);                          term_vspace(p);
                 break;                  break;
Line 877  post_SH(DECL_ARGS)
Line 839  post_SH(DECL_ARGS)
 static int  static int
 pre_RS(DECL_ARGS)  pre_RS(DECL_ARGS)
 {  {
         int              ival;          struct roffsu    su;
         size_t           sz;          int              len;
   
         switch (n->type) {          switch (n->type) {
         case MAN_BLOCK:          case MAN_BLOCK:
Line 890  pre_RS(DECL_ARGS)
Line 852  pre_RS(DECL_ARGS)
                 break;                  break;
         }          }
   
         sz = term_len(p, p->defindent);          len = SHRT_MAX + 1;
           if ((n = n->parent->head->child) != NULL &&
               a2roffsu(n->string, &su, SCALE_EN))
                   len = term_hspan(p, &su);
           if (len > SHRT_MAX)
                   len = term_len(p, p->defindent);
   
         if (NULL != (n = n->parent->head->child))          if (len > 0 || (size_t)(-len) < mt->offset)
                 if ((ival = a2width(p, n->string)) >= 0)                  mt->offset += len;
                         sz = (size_t)ival;          else
                   mt->offset = 0;
         mt->offset += sz;  
         p->offset = mt->offset;          p->offset = mt->offset;
         p->rmargin = p->maxrmargin > p->offset ?          p->rmargin = p->maxrmargin;
             p->maxrmargin : p->offset;  
   
         if (++mt->lmarginsz < MAXMARGINS)          if (++mt->lmarginsz < MAXMARGINS)
                 mt->lmargincur = mt->lmarginsz;                  mt->lmargincur = mt->lmarginsz;
Line 911  pre_RS(DECL_ARGS)
Line 876  pre_RS(DECL_ARGS)
 static void  static void
 post_RS(DECL_ARGS)  post_RS(DECL_ARGS)
 {  {
         int              ival;          struct roffsu    su;
         size_t           sz;          int              len;
   
         switch (n->type) {          switch (n->type) {
         case MAN_BLOCK:          case MAN_BLOCK:
Line 924  post_RS(DECL_ARGS)
Line 889  post_RS(DECL_ARGS)
                 break;                  break;
         }          }
   
         sz = term_len(p, p->defindent);          len = SHRT_MAX + 1;
           if ((n = n->parent->head->child) != NULL &&
               a2roffsu(n->string, &su, SCALE_EN))
                   len = term_hspan(p, &su);
           if (len > SHRT_MAX)
                   len = term_len(p, p->defindent);
   
         if (NULL != (n = n->parent->head->child))          if (len < 0 || (size_t)len < mt->offset)
                 if ((ival = a2width(p, n->string)) >= 0)                  mt->offset -= len;
                         sz = (size_t)ival;          else
                   mt->offset = 0;
         mt->offset = mt->offset < sz ?  0 : mt->offset - sz;  
         p->offset = mt->offset;          p->offset = mt->offset;
   
         if (--mt->lmarginsz < MAXMARGINS)          if (--mt->lmarginsz < MAXMARGINS)
Line 1026  out:
Line 995  out:
          * -man doesn't have nested macros, we don't need to be           * -man doesn't have nested macros, we don't need to be
          * more specific than this.           * more specific than this.
          */           */
         if (MANT_LITERAL & mt->fl && ! (TERMP_NOBREAK & p->flags) &&          if (mt->fl & MANT_LITERAL &&
             (NULL == n->next || MAN_LINE & n->next->flags)) {              ! (p->flags & (TERMP_NOBREAK | TERMP_NONEWLINE)) &&
               (n->next == NULL || n->next->flags & MAN_LINE)) {
                 rm = p->rmargin;                  rm = p->rmargin;
                 rmax = p->maxrmargin;                  rmax = p->maxrmargin;
                 p->rmargin = p->maxrmargin = TERM_MAXMARGIN;                  p->rmargin = p->maxrmargin = TERM_MAXMARGIN;
                 p->flags |= TERMP_NOSPACE;                  p->flags |= TERMP_NOSPACE;
                 if (NULL != n->string && '\0' != *n->string)                  if (n->string != NULL && *n->string != '\0')
                         term_flushln(p);                          term_flushln(p);
                 else                  else
                         term_newln(p);                          term_newln(p);
Line 1063  print_man_foot(struct termp *p, const void *arg)
Line 1033  print_man_foot(struct termp *p, const void *arg)
 {  {
         const struct man_meta   *meta;          const struct man_meta   *meta;
         char                    *title;          char                    *title;
         size_t                   datelen;          size_t                   datelen, titlen;
   
         meta = (const struct man_meta *)arg;          meta = (const struct man_meta *)arg;
         assert(meta->title);          assert(meta->title);
Line 1100  print_man_foot(struct termp *p, const void *arg)
Line 1070  print_man_foot(struct termp *p, const void *arg)
         p->flags |= TERMP_NOSPACE | TERMP_NOBREAK;          p->flags |= TERMP_NOSPACE | TERMP_NOBREAK;
         p->trailspace = 1;          p->trailspace = 1;
         p->offset = 0;          p->offset = 0;
         p->rmargin = (p->maxrmargin - datelen + term_len(p, 1)) / 2;          p->rmargin = p->maxrmargin > datelen ?
               (p->maxrmargin + term_len(p, 1) - datelen) / 2 : 0;
   
         if (meta->source)          if (meta->source)
                 term_word(p, meta->source);                  term_word(p, meta->source);
Line 1108  print_man_foot(struct termp *p, const void *arg)
Line 1079  print_man_foot(struct termp *p, const void *arg)
   
         /* At the bottom in the middle: manual date. */          /* At the bottom in the middle: manual date. */
   
         p->flags |= TERMP_NOSPACE;  
         p->offset = p->rmargin;          p->offset = p->rmargin;
         p->rmargin = p->maxrmargin - term_strlen(p, title);          titlen = term_strlen(p, title);
         if (p->offset + datelen >= p->rmargin)          p->rmargin = p->maxrmargin > titlen ? p->maxrmargin - titlen : 0;
                 p->rmargin = p->offset + datelen;          p->flags |= TERMP_NOSPACE;
   
         term_word(p, meta->date);          term_word(p, meta->date);
         term_flushln(p);          term_flushln(p);
Line 1155  print_man_head(struct termp *p, const void *arg)
Line 1125  print_man_head(struct termp *p, const void *arg)
         p->offset = 0;          p->offset = 0;
         p->rmargin = 2 * (titlen+1) + vollen < p->maxrmargin ?          p->rmargin = 2 * (titlen+1) + vollen < p->maxrmargin ?
             (p->maxrmargin - vollen + term_len(p, 1)) / 2 :              (p->maxrmargin - vollen + term_len(p, 1)) / 2 :
             p->maxrmargin - vollen;              vollen < p->maxrmargin ? p->maxrmargin - vollen : 0;
   
         term_word(p, title);          term_word(p, title);
         term_flushln(p);          term_flushln(p);
Legend:
Removed from v.1.155  
changed lines
  Added in v.1.164
CVSweb