[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.128 and 1.146

version 1.128, 2012/05/27 17:39:28 version 1.146, 2014/04/20 16:46:04
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2008-2012 Kristaps Dzonsons <kristaps@bsd.lv>
  * Copyright (c) 2010, 2011 Ingo Schwarze <schwarze@openbsd.org>   * Copyright (c) 2010-2014 Ingo Schwarze <schwarze@openbsd.org>
  *   *
  * Permission to use, copy, modify, and distribute this software for any   * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above   * purpose with or without fee is hereby granted, provided that the above
Line 35 
Line 35 
   
 #define MAXMARGINS        64 /* maximum number of indented scopes */  #define MAXMARGINS        64 /* maximum number of indented scopes */
   
 /* FIXME: have PD set the default vspace width. */  
   
 struct  mtermp {  struct  mtermp {
         int               fl;          int               fl;
 #define MANT_LITERAL     (1 << 0)  #define MANT_LITERAL     (1 << 0)
Line 44  struct mtermp {
Line 42  struct mtermp {
         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 */
           int               pardist; /* vert. space before par., unit: [v] */
 };  };
   
 #define DECL_ARGS         struct termp *p, \  #define DECL_ARGS         struct termp *p, \
                           struct mtermp *mt, \                            struct mtermp *mt, \
                           const struct man_node *n, \                            const struct man_node *n, \
                           const struct man_meta *m                            const struct man_meta *meta
   
 struct  termact {  struct  termact {
         int             (*pre)(DECL_ARGS);          int             (*pre)(DECL_ARGS);
Line 65  static void    print_man_nodelist(DECL_ARGS);
Line 64  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 *);
 static  void              print_man_foot(struct termp *, const void *);  static  void              print_man_foot(struct termp *, const void *);
 static  void              print_bvspace(struct termp *,  static  void              print_bvspace(struct termp *,
                                 const struct man_node *);                                  const struct man_node *, int);
   
 static  int               pre_B(DECL_ARGS);  static  int               pre_B(DECL_ARGS);
 static  int               pre_HP(DECL_ARGS);  static  int               pre_HP(DECL_ARGS);
 static  int               pre_I(DECL_ARGS);  static  int               pre_I(DECL_ARGS);
 static  int               pre_IP(DECL_ARGS);  static  int               pre_IP(DECL_ARGS);
 static  int               pre_OP(DECL_ARGS);  static  int               pre_OP(DECL_ARGS);
   static  int               pre_PD(DECL_ARGS);
 static  int               pre_PP(DECL_ARGS);  static  int               pre_PP(DECL_ARGS);
 static  int               pre_RS(DECL_ARGS);  static  int               pre_RS(DECL_ARGS);
 static  int               pre_SH(DECL_ARGS);  static  int               pre_SH(DECL_ARGS);
 static  int               pre_SS(DECL_ARGS);  static  int               pre_SS(DECL_ARGS);
 static  int               pre_TP(DECL_ARGS);  static  int               pre_TP(DECL_ARGS);
   static  int               pre_UR(DECL_ARGS);
 static  int               pre_alternate(DECL_ARGS);  static  int               pre_alternate(DECL_ARGS);
 static  int               pre_ft(DECL_ARGS);  static  int               pre_ft(DECL_ARGS);
 static  int               pre_ign(DECL_ARGS);  static  int               pre_ign(DECL_ARGS);
 static  int               pre_in(DECL_ARGS);  static  int               pre_in(DECL_ARGS);
 static  int               pre_literal(DECL_ARGS);  static  int               pre_literal(DECL_ARGS);
   static  int               pre_ll(DECL_ARGS);
 static  int               pre_sp(DECL_ARGS);  static  int               pre_sp(DECL_ARGS);
   
 static  void              post_IP(DECL_ARGS);  static  void              post_IP(DECL_ARGS);
Line 91  static void    post_RS(DECL_ARGS);
Line 93  static void    post_RS(DECL_ARGS);
 static  void              post_SH(DECL_ARGS);  static  void              post_SH(DECL_ARGS);
 static  void              post_SS(DECL_ARGS);  static  void              post_SS(DECL_ARGS);
 static  void              post_TP(DECL_ARGS);  static  void              post_TP(DECL_ARGS);
   static  void              post_UR(DECL_ARGS);
   
 static  const struct termact termacts[MAN_MAX] = {  static  const struct termact termacts[MAN_MAX] = {
         { pre_sp, NULL, MAN_NOTEXT }, /* br */          { pre_sp, NULL, MAN_NOTEXT }, /* br */
Line 102  static const struct termact termacts[MAN_MAX] = {
Line 105  static const struct termact termacts[MAN_MAX] = {
         { pre_PP, NULL, 0 }, /* PP */          { pre_PP, NULL, 0 }, /* PP */
         { pre_PP, NULL, 0 }, /* P */          { pre_PP, NULL, 0 }, /* P */
         { pre_IP, post_IP, 0 }, /* IP */          { pre_IP, post_IP, 0 }, /* IP */
         { pre_HP, post_HP, 0 }, /* HP */          { pre_HP, post_HP, 0 }, /* HP */
         { NULL, NULL, 0 }, /* SM */          { NULL, NULL, 0 }, /* SM */
         { pre_B, NULL, 0 }, /* SB */          { pre_B, NULL, 0 }, /* SB */
         { pre_alternate, NULL, 0 }, /* BI */          { pre_alternate, NULL, 0 }, /* BI */
Line 122  static const struct termact termacts[MAN_MAX] = {
Line 125  static const struct termact termacts[MAN_MAX] = {
         { 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, 0 }, /* UC */
         { pre_ign, NULL, 0 }, /* 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 */
         { pre_ft, NULL, MAN_NOTEXT }, /* ft */          { pre_ft, NULL, MAN_NOTEXT }, /* ft */
         { pre_OP, NULL, 0 }, /* OP */          { pre_OP, NULL, 0 }, /* OP */
           { pre_literal, NULL, 0 }, /* EX */
           { pre_literal, NULL, 0 }, /* EE */
           { pre_UR, post_UR, 0 }, /* UR */
           { NULL, NULL, 0 }, /* UE */
           { pre_ll, NULL, MAN_NOTEXT }, /* ll */
 };  };
   
   
   
 void  void
 terminal_man(void *arg, const struct man *man)  terminal_man(void *arg, const struct man *man)
 {  {
         struct termp            *p;          struct termp            *p;
         const struct man_node   *n;          const struct man_node   *n;
         const struct man_meta   *m;          const struct man_meta   *meta;
         struct mtermp            mt;          struct mtermp            mt;
   
         p = (struct termp *)arg;          p = (struct termp *)arg;
Line 152  terminal_man(void *arg, const struct man *man)
Line 159  terminal_man(void *arg, const struct man *man)
                 p->symtab = mchars_alloc();                  p->symtab = mchars_alloc();
   
         n = man_node(man);          n = man_node(man);
         m = man_meta(man);          meta = man_meta(man);
   
         term_begin(p, print_man_head, print_man_foot, m);          term_begin(p, print_man_head, print_man_foot, meta);
         p->flags |= TERMP_NOSPACE;          p->flags |= TERMP_NOSPACE;
   
         memset(&mt, 0, sizeof(struct mtermp));          memset(&mt, 0, sizeof(struct mtermp));
   
         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);
           mt.pardist = 1;
   
         if (n->child)          if (n->child)
                 print_man_nodelist(p, &mt, n->child, m);                  print_man_nodelist(p, &mt, n->child, meta);
   
         term_end(p);          term_end(p);
 }  }
Line 180  a2height(const struct termp *p, const char *cp)
Line 188  a2height(const struct termp *p, const char *cp)
         return(term_vspan(p, &su));          return(term_vspan(p, &su));
 }  }
   
   
 static int  static int
 a2width(const struct termp *p, const char *cp)  a2width(const struct termp *p, const char *cp)
 {  {
Line 201  a2width(const struct termp *p, const char *cp)
Line 208  a2width(const struct termp *p, const char *cp)
  * first, print it.   * first, print it.
  */   */
 static void  static void
 print_bvspace(struct termp *p, const struct man_node *n)  print_bvspace(struct termp *p, const struct man_node *n, int pardist)
 {  {
           int      i;
   
         term_newln(p);          term_newln(p);
   
Line 214  print_bvspace(struct termp *p, const struct man_node *
Line 222  print_bvspace(struct termp *p, const struct man_node *
                 if (NULL == n->prev)                  if (NULL == n->prev)
                         return;                          return;
   
         term_vspace(p);          for (i = 0; i < pardist; i++)
                   term_vspace(p);
 }  }
   
 /* ARGSUSED */  
 static int  static int
 pre_ign(DECL_ARGS)  pre_ign(DECL_ARGS)
 {  {
Line 225  pre_ign(DECL_ARGS)
Line 234  pre_ign(DECL_ARGS)
         return(0);          return(0);
 }  }
   
   static int
   pre_ll(DECL_ARGS)
   {
   
 /* ARGSUSED */          term_setwidth(p, n->nchild ? n->child->string : NULL);
           return(0);
   }
   
 static int  static int
 pre_I(DECL_ARGS)  pre_I(DECL_ARGS)
 {  {
Line 235  pre_I(DECL_ARGS)
Line 250  pre_I(DECL_ARGS)
         return(1);          return(1);
 }  }
   
   
 /* ARGSUSED */  
 static int  static int
 pre_literal(DECL_ARGS)  pre_literal(DECL_ARGS)
 {  {
   
         term_newln(p);          term_newln(p);
   
         if (MAN_nf == n->tok)          if (MAN_nf == n->tok || MAN_EX == n->tok)
                 mt->fl |= MANT_LITERAL;                  mt->fl |= MANT_LITERAL;
         else          else
                 mt->fl &= ~MANT_LITERAL;                  mt->fl &= ~MANT_LITERAL;
Line 256  pre_literal(DECL_ARGS)
Line 269  pre_literal(DECL_ARGS)
         if (MAN_HP == n->parent->tok && p->rmargin < p->maxrmargin) {          if (MAN_HP == n->parent->tok && p->rmargin < p->maxrmargin) {
                 p->offset = p->rmargin;                  p->offset = p->rmargin;
                 p->rmargin = p->maxrmargin;                  p->rmargin = p->maxrmargin;
                 p->flags &= ~(TERMP_NOBREAK | TERMP_TWOSPACE);                  p->trailspace = 0;
                   p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
                 p->flags |= TERMP_NOSPACE;                  p->flags |= TERMP_NOSPACE;
         }          }
   
         return(0);          return(0);
 }  }
   
 /* ARGSUSED */  
 static int  static int
   pre_PD(DECL_ARGS)
   {
   
           n = n->child;
           if (0 == n) {
                   mt->pardist = 1;
                   return(0);
           }
           assert(MAN_TEXT == n->type);
           mt->pardist = atoi(n->string);
           return(0);
   }
   
   static int
 pre_alternate(DECL_ARGS)  pre_alternate(DECL_ARGS)
 {  {
         enum termfont            font[2];          enum termfont            font[2];
Line 272  pre_alternate(DECL_ARGS)
Line 299  pre_alternate(DECL_ARGS)
         int                      savelit, i;          int                      savelit, i;
   
         switch (n->tok) {          switch (n->tok) {
         case (MAN_RB):          case MAN_RB:
                 font[0] = TERMFONT_NONE;                  font[0] = TERMFONT_NONE;
                 font[1] = TERMFONT_BOLD;                  font[1] = TERMFONT_BOLD;
                 break;                  break;
         case (MAN_RI):          case MAN_RI:
                 font[0] = TERMFONT_NONE;                  font[0] = TERMFONT_NONE;
                 font[1] = TERMFONT_UNDER;                  font[1] = TERMFONT_UNDER;
                 break;                  break;
         case (MAN_BR):          case MAN_BR:
                 font[0] = TERMFONT_BOLD;                  font[0] = TERMFONT_BOLD;
                 font[1] = TERMFONT_NONE;                  font[1] = TERMFONT_NONE;
                 break;                  break;
         case (MAN_BI):          case MAN_BI:
                 font[0] = TERMFONT_BOLD;                  font[0] = TERMFONT_BOLD;
                 font[1] = TERMFONT_UNDER;                  font[1] = TERMFONT_UNDER;
                 break;                  break;
         case (MAN_IR):          case MAN_IR:
                 font[0] = TERMFONT_UNDER;                  font[0] = TERMFONT_UNDER;
                 font[1] = TERMFONT_NONE;                  font[1] = TERMFONT_NONE;
                 break;                  break;
         case (MAN_IB):          case MAN_IB:
                 font[0] = TERMFONT_UNDER;                  font[0] = TERMFONT_UNDER;
                 font[1] = TERMFONT_BOLD;                  font[1] = TERMFONT_BOLD;
                 break;                  break;
Line 307  pre_alternate(DECL_ARGS)
Line 334  pre_alternate(DECL_ARGS)
                 term_fontrepl(p, font[i]);                  term_fontrepl(p, font[i]);
                 if (savelit && NULL == nn->next)                  if (savelit && NULL == nn->next)
                         mt->fl |= MANT_LITERAL;                          mt->fl |= MANT_LITERAL;
                 print_man_node(p, mt, nn, m);                  print_man_node(p, mt, nn, meta);
                 if (nn->next)                  if (nn->next)
                         p->flags |= TERMP_NOSPACE;                          p->flags |= TERMP_NOSPACE;
         }          }
Line 315  pre_alternate(DECL_ARGS)
Line 342  pre_alternate(DECL_ARGS)
         return(0);          return(0);
 }  }
   
 /* ARGSUSED */  
 static int  static int
 pre_B(DECL_ARGS)  pre_B(DECL_ARGS)
 {  {
Line 324  pre_B(DECL_ARGS)
Line 350  pre_B(DECL_ARGS)
         return(1);          return(1);
 }  }
   
 /* ARGSUSED */  
 static int  static int
 pre_OP(DECL_ARGS)  pre_OP(DECL_ARGS)
 {  {
Line 347  pre_OP(DECL_ARGS)
Line 372  pre_OP(DECL_ARGS)
         return(0);          return(0);
 }  }
   
 /* ARGSUSED */  
 static int  static int
 pre_ft(DECL_ARGS)  pre_ft(DECL_ARGS)
 {  {
Line 360  pre_ft(DECL_ARGS)
Line 384  pre_ft(DECL_ARGS)
   
         cp = n->child->string;          cp = n->child->string;
         switch (*cp) {          switch (*cp) {
         case ('4'):          case '4':
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case ('3'):          case '3':
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case ('B'):          case 'B':
                 term_fontrepl(p, TERMFONT_BOLD);                  term_fontrepl(p, TERMFONT_BOLD);
                 break;                  break;
         case ('2'):          case '2':
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case ('I'):          case 'I':
                 term_fontrepl(p, TERMFONT_UNDER);                  term_fontrepl(p, TERMFONT_UNDER);
                 break;                  break;
         case ('P'):          case 'P':
                 term_fontlast(p);                  term_fontlast(p);
                 break;                  break;
         case ('1'):          case '1':
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case ('C'):          case 'C':
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case ('R'):          case 'R':
                 term_fontrepl(p, TERMFONT_NONE);                  term_fontrepl(p, TERMFONT_NONE);
                 break;                  break;
         default:          default:
Line 388  pre_ft(DECL_ARGS)
Line 412  pre_ft(DECL_ARGS)
         return(0);          return(0);
 }  }
   
 /* ARGSUSED */  
 static int  static int
 pre_in(DECL_ARGS)  pre_in(DECL_ARGS)
 {  {
Line 422  pre_in(DECL_ARGS)
Line 445  pre_in(DECL_ARGS)
                 p->offset -= p->offset > v ? v : p->offset;                  p->offset -= p->offset > v ? v : p->offset;
         else if (less > 0)          else if (less > 0)
                 p->offset += v;                  p->offset += v;
         else          else
                 p->offset = v;                  p->offset = v;
   
         /* Don't let this creep beyond the right margin. */          /* Don't let this creep beyond the right margin. */
Line 433  pre_in(DECL_ARGS)
Line 456  pre_in(DECL_ARGS)
         return(0);          return(0);
 }  }
   
   
 /* ARGSUSED */  
 static int  static int
 pre_sp(DECL_ARGS)  pre_sp(DECL_ARGS)
 {  {
           char            *s;
         size_t           i, len;          size_t           i, len;
           int              neg;
   
         if ((NULL == n->prev && n->parent)) {          if ((NULL == n->prev && n->parent)) {
                 if (MAN_SS == n->parent->tok)                  switch (n->parent->tok) {
                   case MAN_SH:
                           /* FALLTHROUGH */
                   case MAN_SS:
                           /* FALLTHROUGH */
                   case MAN_PP:
                           /* FALLTHROUGH */
                   case MAN_LP:
                           /* FALLTHROUGH */
                   case MAN_P:
                           /* FALLTHROUGH */
                         return(0);                          return(0);
                 if (MAN_SH == n->parent->tok)                  default:
                         return(0);                          break;
                   }
         }          }
   
           neg = 0;
         switch (n->tok) {          switch (n->tok) {
         case (MAN_br):          case MAN_br:
                 len = 0;                  len = 0;
                 break;                  break;
         default:          default:
                 len = n->child ? a2height(p, n->child->string) : 1;                  if (NULL == n->child) {
                           len = 1;
                           break;
                   }
                   s = n->child->string;
                   if ('-' == *s) {
                           neg = 1;
                           s++;
                   }
                   len = a2height(p, s);
                 break;                  break;
         }          }
   
         if (0 == len)          if (0 == len)
                 term_newln(p);                  term_newln(p);
         for (i = 0; i < len; i++)          else if (neg)
                 term_vspace(p);                  p->skipvsp += len;
           else
                   for (i = 0; i < len; i++)
                           term_vspace(p);
   
         return(0);          return(0);
 }  }
   
   
 /* ARGSUSED */  
 static int  static int
 pre_HP(DECL_ARGS)  pre_HP(DECL_ARGS)
 {  {
Line 474  pre_HP(DECL_ARGS)
Line 519  pre_HP(DECL_ARGS)
         const struct man_node   *nn;          const struct man_node   *nn;
   
         switch (n->type) {          switch (n->type) {
         case (MAN_BLOCK):          case MAN_BLOCK:
                 print_bvspace(p, n);                  print_bvspace(p, n, mt->pardist);
                 return(1);                  return(1);
         case (MAN_BODY):          case MAN_BODY:
                 p->flags |= TERMP_NOBREAK;  
                 p->flags |= TERMP_TWOSPACE;  
                 break;                  break;
         default:          default:
                 return(0);                  return(0);
         }          }
   
           if ( ! (MANT_LITERAL & mt->fl)) {
                   p->flags |= TERMP_NOBREAK | TERMP_BRIND;
                   p->trailspace = 2;
           }
   
         len = mt->lmargin[mt->lmargincur];          len = mt->lmargin[mt->lmargincur];
         ival = -1;          ival = -1;
   
Line 507  pre_HP(DECL_ARGS)
Line 555  pre_HP(DECL_ARGS)
         return(1);          return(1);
 }  }
   
   
 /* ARGSUSED */  
 static void  static void
 post_HP(DECL_ARGS)  post_HP(DECL_ARGS)
 {  {
   
         switch (n->type) {          switch (n->type) {
         case (MAN_BLOCK):          case MAN_BODY:
                 term_flushln(p);                  term_newln(p);
                 break;                  p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND);
         case (MAN_BODY):                  p->trailspace = 0;
                 term_flushln(p);  
                 p->flags &= ~TERMP_NOBREAK;  
                 p->flags &= ~TERMP_TWOSPACE;  
                 p->offset = mt->offset;                  p->offset = mt->offset;
                 p->rmargin = p->maxrmargin;                  p->rmargin = p->maxrmargin;
                 break;                  break;
Line 529  post_HP(DECL_ARGS)
Line 572  post_HP(DECL_ARGS)
         }          }
 }  }
   
   
 /* ARGSUSED */  
 static int  static int
 pre_PP(DECL_ARGS)  pre_PP(DECL_ARGS)
 {  {
   
         switch (n->type) {          switch (n->type) {
         case (MAN_BLOCK):          case MAN_BLOCK:
                 mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);                  mt->lmargin[mt->lmargincur] = term_len(p, p->defindent);
                 print_bvspace(p, n);                  print_bvspace(p, n, mt->pardist);
                 break;                  break;
         default:          default:
                 p->offset = mt->offset;                  p->offset = mt->offset;
Line 548  pre_PP(DECL_ARGS)
Line 589  pre_PP(DECL_ARGS)
         return(MAN_HEAD != n->type);          return(MAN_HEAD != n->type);
 }  }
   
   
 /* ARGSUSED */  
 static int  static int
 pre_IP(DECL_ARGS)  pre_IP(DECL_ARGS)
 {  {
Line 558  pre_IP(DECL_ARGS)
Line 597  pre_IP(DECL_ARGS)
         int                      savelit, ival;          int                      savelit, ival;
   
         switch (n->type) {          switch (n->type) {
         case (MAN_BODY):          case MAN_BODY:
                 p->flags |= TERMP_NOSPACE;                  p->flags |= TERMP_NOSPACE;
                 break;                  break;
         case (MAN_HEAD):          case MAN_HEAD:
                 p->flags |= TERMP_NOBREAK;                  p->flags |= TERMP_NOBREAK;
                   p->trailspace = 1;
                 break;                  break;
         case (MAN_BLOCK):          case MAN_BLOCK:
                 print_bvspace(p, n);                  print_bvspace(p, n, mt->pardist);
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         default:          default:
                 return(1);                  return(1);
Line 581  pre_IP(DECL_ARGS)
Line 621  pre_IP(DECL_ARGS)
                                 len = (size_t)ival;                                  len = (size_t)ival;
   
         switch (n->type) {          switch (n->type) {
         case (MAN_HEAD):          case MAN_HEAD:
                 /* Handle zero-width lengths. */                  /* Handle zero-width lengths. */
                 if (0 == len)                  if (0 == len)
                         len = term_len(p, 1);                          len = term_len(p, 1);
Line 598  pre_IP(DECL_ARGS)
Line 638  pre_IP(DECL_ARGS)
                 mt->fl &= ~MANT_LITERAL;                  mt->fl &= ~MANT_LITERAL;
   
                 if (n->child)                  if (n->child)
                         print_man_node(p, mt, n->child, m);                          print_man_node(p, mt, n->child, meta);
   
                 if (savelit)                  if (savelit)
                         mt->fl |= MANT_LITERAL;                          mt->fl |= MANT_LITERAL;
   
                 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->rmargin = p->maxrmargin > p->offset ?
                       p->maxrmargin : p->offset;
                 break;                  break;
         default:          default:
                 break;                  break;
Line 615  pre_IP(DECL_ARGS)
Line 656  pre_IP(DECL_ARGS)
         return(1);          return(1);
 }  }
   
   
 /* ARGSUSED */  
 static void  static void
 post_IP(DECL_ARGS)  post_IP(DECL_ARGS)
 {  {
   
         switch (n->type) {          switch (n->type) {
         case (MAN_HEAD):          case MAN_HEAD:
                 term_flushln(p);                  term_flushln(p);
                 p->flags &= ~TERMP_NOBREAK;                  p->flags &= ~TERMP_NOBREAK;
                   p->trailspace = 0;
                 p->rmargin = p->maxrmargin;                  p->rmargin = p->maxrmargin;
                 break;                  break;
         case (MAN_BODY):          case MAN_BODY:
                 term_newln(p);                  term_newln(p);
                   p->offset = mt->offset;
                 break;                  break;
         default:          default:
                 break;                  break;
         }          }
 }  }
   
   
 /* ARGSUSED */  
 static int  static int
 pre_TP(DECL_ARGS)  pre_TP(DECL_ARGS)
 {  {
Line 645  pre_TP(DECL_ARGS)
Line 684  pre_TP(DECL_ARGS)
         int                      savelit, ival;          int                      savelit, ival;
   
         switch (n->type) {          switch (n->type) {
         case (MAN_HEAD):          case MAN_HEAD:
                 p->flags |= TERMP_NOBREAK;                  p->flags |= TERMP_NOBREAK;
                   p->trailspace = 1;
                 break;                  break;
         case (MAN_BODY):          case MAN_BODY:
                 p->flags |= TERMP_NOSPACE;                  p->flags |= TERMP_NOSPACE;
                 break;                  break;
         case (MAN_BLOCK):          case MAN_BLOCK:
                 print_bvspace(p, n);                  print_bvspace(p, n, mt->pardist);
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         default:          default:
                 return(1);                  return(1);
Line 664  pre_TP(DECL_ARGS)
Line 704  pre_TP(DECL_ARGS)
         /* Calculate offset. */          /* Calculate offset. */
   
         if (NULL != (nn = n->parent->head->child))          if (NULL != (nn = n->parent->head->child))
                 if (nn->string && nn->parent->line == nn->line)                  if (nn->string && 0 == (MAN_LINE & nn->flags))
                         if ((ival = a2width(p, nn->string)) >= 0)                          if ((ival = a2width(p, nn->string)) >= 0)
                                 len = (size_t)ival;                                  len = (size_t)ival;
   
         switch (n->type) {          switch (n->type) {
         case (MAN_HEAD):          case MAN_HEAD:
                 /* Handle zero-length properly. */                  /* Handle zero-length properly. */
                 if (0 == len)                  if (0 == len)
                         len = term_len(p, 1);                          len = term_len(p, 1);
Line 681  pre_TP(DECL_ARGS)
Line 721  pre_TP(DECL_ARGS)
                 mt->fl &= ~MANT_LITERAL;                  mt->fl &= ~MANT_LITERAL;
   
                 /* Don't print same-line elements. */                  /* Don't print same-line elements. */
                 for (nn = n->child; nn; nn = nn->next)                  nn = n->child;
                         if (nn->line > n->line)                  while (NULL != nn && 0 == (MAN_LINE & nn->flags))
                                 print_man_node(p, mt, nn, m);                          nn = nn->next;
   
                   while (NULL != nn) {
                           print_man_node(p, mt, nn, meta);
                           nn = nn->next;
                   }
   
                 if (savelit)                  if (savelit)
                         mt->fl |= MANT_LITERAL;                          mt->fl |= MANT_LITERAL;
                 if (ival >= 0)                  if (ival >= 0)
                         mt->lmargin[mt->lmargincur] = (size_t)ival;                          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->rmargin = p->maxrmargin > p->offset ?
                       p->maxrmargin : p->offset;
                   p->trailspace = 0;
                   p->flags &= ~TERMP_NOBREAK;
                 break;                  break;
         default:          default:
                 break;                  break;
Line 702  pre_TP(DECL_ARGS)
Line 750  pre_TP(DECL_ARGS)
         return(1);          return(1);
 }  }
   
   
 /* ARGSUSED */  
 static void  static void
 post_TP(DECL_ARGS)  post_TP(DECL_ARGS)
 {  {
   
         switch (n->type) {          switch (n->type) {
         case (MAN_HEAD):          case MAN_HEAD:
                 term_flushln(p);                  term_flushln(p);
                 p->flags &= ~TERMP_NOBREAK;  
                 p->flags &= ~TERMP_TWOSPACE;  
                 p->rmargin = p->maxrmargin;  
                 break;                  break;
         case (MAN_BODY):          case MAN_BODY:
                 term_newln(p);                  term_newln(p);
                   p->offset = mt->offset;
                 break;                  break;
         default:          default:
                 break;                  break;
         }          }
 }  }
   
   
 /* ARGSUSED */  
 static int  static int
 pre_SS(DECL_ARGS)  pre_SS(DECL_ARGS)
 {  {
           int      i;
   
         switch (n->type) {          switch (n->type) {
         case (MAN_BLOCK):          case MAN_BLOCK:
                 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);
Line 740  pre_SS(DECL_ARGS)
Line 783  pre_SS(DECL_ARGS)
                                 break;                                  break;
                 if (NULL == n->prev)                  if (NULL == n->prev)
                         break;                          break;
                 term_vspace(p);                  for (i = 0; i < mt->pardist; i++)
                           term_vspace(p);
                 break;                  break;
         case (MAN_HEAD):          case MAN_HEAD:
                 term_fontrepl(p, TERMFONT_BOLD);                  term_fontrepl(p, TERMFONT_BOLD);
                 p->offset = term_len(p, p->defindent/2);                  p->offset = term_len(p, 3);
                 break;                  break;
         case (MAN_BODY):          case MAN_BODY:
                 p->offset = mt->offset;                  p->offset = mt->offset;
                 break;                  break;
         default:          default:
Line 756  pre_SS(DECL_ARGS)
Line 800  pre_SS(DECL_ARGS)
         return(1);          return(1);
 }  }
   
   
 /* ARGSUSED */  
 static void  static void
 post_SS(DECL_ARGS)  post_SS(DECL_ARGS)
 {  {
   
         switch (n->type) {          switch (n->type) {
         case (MAN_HEAD):          case MAN_HEAD:
                 term_newln(p);                  term_newln(p);
                 break;                  break;
         case (MAN_BODY):          case MAN_BODY:
                 term_newln(p);                  term_newln(p);
                 break;                  break;
         default:          default:
Line 774  post_SS(DECL_ARGS)
Line 816  post_SS(DECL_ARGS)
         }          }
 }  }
   
   
 /* ARGSUSED */  
 static int  static int
 pre_SH(DECL_ARGS)  pre_SH(DECL_ARGS)
 {  {
           int      i;
   
         switch (n->type) {          switch (n->type) {
         case (MAN_BLOCK):          case MAN_BLOCK:
                 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);
Line 792  pre_SH(DECL_ARGS)
Line 833  pre_SH(DECL_ARGS)
                 /* If the first macro, no vspae. */                  /* If the first macro, no vspae. */
                 if (NULL == n->prev)                  if (NULL == n->prev)
                         break;                          break;
                 term_vspace(p);                  for (i = 0; i < mt->pardist; i++)
                           term_vspace(p);
                 break;                  break;
         case (MAN_HEAD):          case MAN_HEAD:
                 term_fontrepl(p, TERMFONT_BOLD);                  term_fontrepl(p, TERMFONT_BOLD);
                 p->offset = 0;                  p->offset = 0;
                 break;                  break;
         case (MAN_BODY):          case MAN_BODY:
                 p->offset = mt->offset;                  p->offset = mt->offset;
                 break;                  break;
         default:          default:
Line 808  pre_SH(DECL_ARGS)
Line 850  pre_SH(DECL_ARGS)
         return(1);          return(1);
 }  }
   
   
 /* ARGSUSED */  
 static void  static void
 post_SH(DECL_ARGS)  post_SH(DECL_ARGS)
 {  {
   
         switch (n->type) {          switch (n->type) {
         case (MAN_HEAD):          case MAN_HEAD:
                 term_newln(p);                  term_newln(p);
                 break;                  break;
         case (MAN_BODY):          case MAN_BODY:
                 term_newln(p);                  term_newln(p);
                 break;                  break;
         default:          default:
Line 826  post_SH(DECL_ARGS)
Line 866  post_SH(DECL_ARGS)
         }          }
 }  }
   
 /* ARGSUSED */  
 static int  static int
 pre_RS(DECL_ARGS)  pre_RS(DECL_ARGS)
 {  {
Line 834  pre_RS(DECL_ARGS)
Line 873  pre_RS(DECL_ARGS)
         size_t           sz;          size_t           sz;
   
         switch (n->type) {          switch (n->type) {
         case (MAN_BLOCK):          case MAN_BLOCK:
                 term_newln(p);                  term_newln(p);
                 return(1);                  return(1);
         case (MAN_HEAD):          case MAN_HEAD:
                 return(0);                  return(0);
         default:          default:
                 break;                  break;
Line 846  pre_RS(DECL_ARGS)
Line 885  pre_RS(DECL_ARGS)
         sz = term_len(p, p->defindent);          sz = term_len(p, p->defindent);
   
         if (NULL != (n = n->parent->head->child))          if (NULL != (n = n->parent->head->child))
                 if ((ival = a2width(p, n->string)) >= 0)                  if ((ival = a2width(p, n->string)) >= 0)
                         sz = (size_t)ival;                          sz = (size_t)ival;
   
         mt->offset += sz;          mt->offset += sz;
         p->rmargin = p->maxrmargin;          p->offset = mt->offset;
         p->offset = mt->offset < p->rmargin ? mt->offset : p->rmargin;          p->rmargin = p->maxrmargin > p->offset ?
               p->maxrmargin : p->offset;
   
         if (++mt->lmarginsz < MAXMARGINS)          if (++mt->lmarginsz < MAXMARGINS)
                 mt->lmargincur = mt->lmarginsz;                  mt->lmargincur = mt->lmarginsz;
Line 860  pre_RS(DECL_ARGS)
Line 900  pre_RS(DECL_ARGS)
         return(1);          return(1);
 }  }
   
 /* ARGSUSED */  
 static void  static void
 post_RS(DECL_ARGS)  post_RS(DECL_ARGS)
 {  {
Line 868  post_RS(DECL_ARGS)
Line 907  post_RS(DECL_ARGS)
         size_t           sz;          size_t           sz;
   
         switch (n->type) {          switch (n->type) {
         case (MAN_BLOCK):          case MAN_BLOCK:
                 return;                  return;
         case (MAN_HEAD):          case MAN_HEAD:
                 return;                  return;
         default:          default:
                 term_newln(p);                  term_newln(p);
Line 879  post_RS(DECL_ARGS)
Line 918  post_RS(DECL_ARGS)
   
         sz = term_len(p, p->defindent);          sz = term_len(p, p->defindent);
   
         if (NULL != (n = n->parent->head->child))          if (NULL != (n = n->parent->head->child))
                 if ((ival = a2width(p, n->string)) >= 0)                  if ((ival = a2width(p, n->string)) >= 0)
                         sz = (size_t)ival;                          sz = (size_t)ival;
   
         mt->offset = mt->offset < sz ?  0 : mt->offset - sz;          mt->offset = mt->offset < sz ?  0 : mt->offset - sz;
Line 890  post_RS(DECL_ARGS)
Line 929  post_RS(DECL_ARGS)
                 mt->lmargincur = mt->lmarginsz;                  mt->lmargincur = mt->lmarginsz;
 }  }
   
   static int
   pre_UR(DECL_ARGS)
   {
   
           return (MAN_HEAD != n->type);
   }
   
 static void  static void
   post_UR(DECL_ARGS)
   {
   
           if (MAN_BLOCK != n->type)
                   return;
   
           term_word(p, "<");
           p->flags |= TERMP_NOSPACE;
   
           if (NULL != n->child->child)
                   print_man_node(p, mt, n->child->child, meta);
   
           p->flags |= TERMP_NOSPACE;
           term_word(p, ">");
   }
   
   static void
 print_man_node(DECL_ARGS)  print_man_node(DECL_ARGS)
 {  {
         size_t           rm, rmax;          size_t           rm, rmax;
         int              c;          int              c;
   
         switch (n->type) {          switch (n->type) {
         case(MAN_TEXT):          case MAN_TEXT:
                 /*                  /*
                  * If we have a blank line, output a vertical space.                   * If we have a blank line, output a vertical space.
                  * If we have a space as the first character, break                   * If we have a space as the first character, break
Line 910  print_man_node(DECL_ARGS)
Line 973  print_man_node(DECL_ARGS)
                         term_newln(p);                          term_newln(p);
   
                 term_word(p, n->string);                  term_word(p, n->string);
                   goto out;
   
                 /*          case MAN_EQN:
                  * If we're in a literal context, make sure that words  
                  * togehter on the same line stay together.  This is a  
                  * POST-printing call, so we check the NEXT word.  Since  
                  * -man doesn't have nested macros, we don't need to be  
                  * more specific than this.  
                  */  
                 if (MANT_LITERAL & mt->fl && ! (TERMP_NOBREAK & p->flags) &&  
                                 (NULL == n->next ||  
                                  n->next->line > n->line)) {  
                         rm = p->rmargin;  
                         rmax = p->maxrmargin;  
                         p->rmargin = p->maxrmargin = TERM_MAXMARGIN;  
                         p->flags |= TERMP_NOSPACE;  
                         term_flushln(p);  
                         p->rmargin = rm;  
                         p->maxrmargin = rmax;  
                 }  
   
                 if (MAN_EOS & n->flags)  
                         p->flags |= TERMP_SENTENCE;  
                 return;  
         case (MAN_EQN):  
                 term_eqn(p, n->eqn);                  term_eqn(p, n->eqn);
                 return;                  return;
         case (MAN_TBL):          case MAN_TBL:
                 /*                  /*
                  * Tables are preceded by a newline.  Then process a                   * Tables are preceded by a newline.  Then process a
                  * table line, which will cause line termination,                   * table line, which will cause line termination,
                  */                   */
                 if (TBL_SPAN_FIRST & n->span->flags)                  if (TBL_SPAN_FIRST & n->span->flags)
                         term_newln(p);                          term_newln(p);
                 term_tbl(p, n->span);                  term_tbl(p, n->span);
                 return;                  return;
Line 954  print_man_node(DECL_ARGS)
Line 996  print_man_node(DECL_ARGS)
   
         c = 1;          c = 1;
         if (termacts[n->tok].pre)          if (termacts[n->tok].pre)
                 c = (*termacts[n->tok].pre)(p, mt, n, m);                  c = (*termacts[n->tok].pre)(p, mt, n, meta);
   
         if (c && n->child)          if (c && n->child)
                 print_man_nodelist(p, mt, n->child, m);                  print_man_nodelist(p, mt, n->child, meta);
   
         if (termacts[n->tok].post)          if (termacts[n->tok].post)
                 (*termacts[n->tok].post)(p, mt, n, m);                  (*termacts[n->tok].post)(p, mt, n, meta);
         if ( ! (MAN_NOTEXT & termacts[n->tok].flags))          if ( ! (MAN_NOTEXT & termacts[n->tok].flags))
                 term_fontrepl(p, TERMFONT_NONE);                  term_fontrepl(p, TERMFONT_NONE);
   
   out:
           /*
            * If we're in a literal context, make sure that words
            * together on the same line stay together.  This is a
            * POST-printing call, so we check the NEXT word.  Since
            * -man doesn't have nested macros, we don't need to be
            * more specific than this.
            */
           if (MANT_LITERAL & mt->fl && ! (TERMP_NOBREAK & p->flags) &&
               (NULL == n->next || MAN_LINE & n->next->flags)) {
                   rm = p->rmargin;
                   rmax = p->maxrmargin;
                   p->rmargin = p->maxrmargin = TERM_MAXMARGIN;
                   p->flags |= TERMP_NOSPACE;
                   if (NULL != n->string && '\0' != *n->string)
                           term_flushln(p);
                   else
                           term_newln(p);
                   if (rm < rmax && n->parent->tok == MAN_HP) {
                           p->offset = rm;
                           p->rmargin = rmax;
                   } else
                           p->rmargin = rm;
                   p->maxrmargin = rmax;
           }
         if (MAN_EOS & n->flags)          if (MAN_EOS & n->flags)
                 p->flags |= TERMP_SENTENCE;                  p->flags |= TERMP_SENTENCE;
 }  }
Line 973  static void
Line 1040  static void
 print_man_nodelist(DECL_ARGS)  print_man_nodelist(DECL_ARGS)
 {  {
   
         print_man_node(p, mt, n, m);          print_man_node(p, mt, n, meta);
         if ( ! n->next)          if ( ! n->next)
                 return;                  return;
         print_man_nodelist(p, mt, n->next, m);          print_man_nodelist(p, mt, n->next, meta);
 }  }
   
   
 static void  static void
 print_man_foot(struct termp *p, const void *arg)  print_man_foot(struct termp *p, const void *arg)
 {  {
Line 1016  print_man_foot(struct termp *p, const void *arg)
Line 1082  print_man_foot(struct termp *p, const void *arg)
         /* Bottom left corner: manual source. */          /* Bottom left corner: manual source. */
   
         p->flags |= TERMP_NOSPACE | TERMP_NOBREAK;          p->flags |= TERMP_NOSPACE | TERMP_NOBREAK;
           p->trailspace = 1;
         p->offset = 0;          p->offset = 0;
         p->rmargin = (p->maxrmargin - datelen + term_len(p, 1)) / 2;          p->rmargin = (p->maxrmargin - datelen + term_len(p, 1)) / 2;
   
Line 1038  print_man_foot(struct termp *p, const void *arg)
Line 1105  print_man_foot(struct termp *p, const void *arg)
   
         p->flags &= ~TERMP_NOBREAK;          p->flags &= ~TERMP_NOBREAK;
         p->flags |= TERMP_NOSPACE;          p->flags |= TERMP_NOSPACE;
           p->trailspace = 0;
         p->offset = p->rmargin;          p->offset = p->rmargin;
         p->rmargin = p->maxrmargin;          p->rmargin = p->maxrmargin;
   
Line 1045  print_man_foot(struct termp *p, const void *arg)
Line 1113  print_man_foot(struct termp *p, const void *arg)
         term_flushln(p);          term_flushln(p);
 }  }
   
   
 static void  static void
 print_man_head(struct termp *p, const void *arg)  print_man_head(struct termp *p, const void *arg)
 {  {
         char            buf[BUFSIZ], title[BUFSIZ];          char            buf[BUFSIZ], title[BUFSIZ];
         size_t          buflen, titlen;          size_t          buflen, titlen;
         const struct man_meta *m;          const struct man_meta *meta;
   
         m = (const struct man_meta *)arg;          meta = (const struct man_meta *)arg;
         assert(m->title);          assert(meta->title);
         assert(m->msec);          assert(meta->msec);
   
         if (m->vol)          if (meta->vol)
                 strlcpy(buf, m->vol, BUFSIZ);                  strlcpy(buf, meta->vol, BUFSIZ);
         else          else
                 buf[0] = '\0';                  buf[0] = '\0';
         buflen = term_strlen(p, buf);          buflen = term_strlen(p, buf);
   
         /* Top left corner: manual title and section. */          /* Top left corner: manual title and section. */
   
         snprintf(title, BUFSIZ, "%s(%s)", m->title, m->msec);          snprintf(title, BUFSIZ, "%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;
           p->trailspace = 1;
         p->offset = 0;          p->offset = 0;
         p->rmargin = 2 * (titlen+1) + buflen < p->maxrmargin ?          p->rmargin = 2 * (titlen+1) + buflen < p->maxrmargin ?
             (p->maxrmargin -              (p->maxrmargin -
              term_strlen(p, buf) + term_len(p, 1)) / 2 :               term_strlen(p, buf) + term_len(p, 1)) / 2 :
             p->maxrmargin - buflen;              p->maxrmargin - buflen;
   
Line 1091  print_man_head(struct termp *p, const void *arg)
Line 1159  print_man_head(struct termp *p, const void *arg)
         /* Top right corner: title and section, again. */          /* Top right corner: title and section, again. */
   
         p->flags &= ~TERMP_NOBREAK;          p->flags &= ~TERMP_NOBREAK;
           p->trailspace = 0;
         if (p->rmargin + titlen <= p->maxrmargin) {          if (p->rmargin + titlen <= p->maxrmargin) {
                 p->flags |= TERMP_NOSPACE;                  p->flags |= TERMP_NOSPACE;
                 p->offset = p->rmargin;                  p->offset = p->rmargin;
Line 1103  print_man_head(struct termp *p, const void *arg)
Line 1172  print_man_head(struct termp *p, const void *arg)
         p->offset = 0;          p->offset = 0;
         p->rmargin = p->maxrmargin;          p->rmargin = p->maxrmargin;
   
         /*          /*
          * Groff prints three blank lines before the content.           * Groff prints three blank lines before the content.
          * Do the same, except in the temporary, undocumented           * Do the same, except in the temporary, undocumented
          * mode imitating mdoc(7) output.           * mode imitating mdoc(7) output.
Legend:
Removed from v.1.128  
changed lines
  Added in v.1.146
CVSweb