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

Diff for /mandoc/roff.c between version 1.239 and 1.246

version 1.239, 2014/11/19 01:20:25 version 1.246, 2014/12/28 14:16:26
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 650  roff_res(struct roff *r, struct buf *buf, int ln, int 
Line 651  roff_res(struct roff *r, struct buf *buf, int ln, int 
                             r->parse, ln, (int)(stesc - buf->buf),                              r->parse, ln, (int)(stesc - buf->buf),
                             "%.*s", (int)naml, stnam);                              "%.*s", (int)naml, stnam);
                         res = "";                          res = "";
                   } else if (buf->sz + strlen(res) > SHRT_MAX) {
                           mandoc_msg(MANDOCERR_ROFFLOOP, r->parse,
                               ln, (int)(stesc - buf->buf), NULL);
                           return(ROFF_IGN);
                 }                  }
   
                 /* Replace the escape sequence by the string. */                  /* Replace the escape sequence by the string. */
Line 730  roff_parseln(struct roff *r, int ln, struct buf *buf, 
Line 735  roff_parseln(struct roff *r, int ln, struct buf *buf, 
         enum rofft       t;          enum rofft       t;
         enum rofferr     e;          enum rofferr     e;
         int              pos;   /* parse point */          int              pos;   /* parse point */
           int              spos;  /* saved parse point for messages */
         int              ppos;  /* original offset in buf->buf */          int              ppos;  /* original offset in buf->buf */
         int              ctl;   /* macro line (boolean) */          int              ctl;   /* macro line (boolean) */
   
Line 800  roff_parseln(struct roff *r, int ln, struct buf *buf, 
Line 806  roff_parseln(struct roff *r, int ln, struct buf *buf, 
                 return((*roffs[t].sub)(r, t, buf, ln, ppos, pos, offs));                  return((*roffs[t].sub)(r, t, buf, ln, ppos, pos, offs));
         }          }
   
           /* No scope is open.  This is a new request or macro. */
   
           spos = pos;
           t = roff_parse(r, buf->buf, &pos, ln, ppos);
   
           /* Tables ignore most macros. */
   
           if (r->tbl != NULL && (t == ROFF_MAX || t == ROFF_TS)) {
                   mandoc_msg(MANDOCERR_TBLMACRO, r->parse,
                       ln, pos, buf->buf + spos);
                   return(ROFF_IGN);
           }
   
         /*          /*
          * Lastly, as we've no scope open, try to look up and execute           * This is neither a roff request nor a user-defined macro.
          * the new macro.  If no macro is found, simply return and let           * Let the standard macro set parsers handle it.
          * the compilers handle it.  
          */           */
   
         if ((t = roff_parse(r, buf->buf, &pos, ln, ppos)) == ROFF_MAX)          if (t == ROFF_MAX)
                 return(ROFF_CONT);                  return(ROFF_CONT);
   
           /* Execute a roff request or a user defined macro. */
   
         assert(roffs[t].proc);          assert(roffs[t].proc);
         return((*roffs[t].proc)(r, t, buf, ln, ppos, pos, offs));          return((*roffs[t].proc)(r, t, buf, ln, ppos, pos, offs));
 }  }
Line 1236  roff_evalstrcond(const char *v, int *pos)
Line 1256  roff_evalstrcond(const char *v, int *pos)
 out:  out:
         if (NULL == s3)          if (NULL == s3)
                 s3 = strchr(s2, '\0');                  s3 = strchr(s2, '\0');
         else          else if (*s3 != '\0')
                 s3++;                  s3++;
         *pos = s3 - v;          *pos = s3 - v;
         return(match);          return(match);
Line 1249  out:
Line 1269  out:
 static int  static int
 roff_evalcond(struct roff *r, int ln, const char *v, int *pos)  roff_evalcond(struct roff *r, int ln, const char *v, int *pos)
 {  {
         int      wanttrue, number;          int      number, savepos, wanttrue;
   
         if ('!' == v[*pos]) {          if ('!' == v[*pos]) {
                 wanttrue = 0;                  wanttrue = 0;
Line 1258  roff_evalcond(struct roff *r, int ln, const char *v, i
Line 1278  roff_evalcond(struct roff *r, int ln, const char *v, i
                 wanttrue = 1;                  wanttrue = 1;
   
         switch (v[*pos]) {          switch (v[*pos]) {
           case '\0':
                   return(0);
         case 'n':          case 'n':
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case 'o':          case 'o':
Line 1280  roff_evalcond(struct roff *r, int ln, const char *v, i
Line 1302  roff_evalcond(struct roff *r, int ln, const char *v, i
                 break;                  break;
         }          }
   
           savepos = *pos;
         if (roff_evalnum(r, ln, v, pos, &number, 0))          if (roff_evalnum(r, ln, v, pos, &number, 0))
                 return((number > 0) == wanttrue);                  return((number > 0) == wanttrue);
         else          else if (*pos == savepos)
                 return(roff_evalstrcond(v, pos) == wanttrue);                  return(roff_evalstrcond(v, pos) == wanttrue);
           else
                   return (0);
 }  }
   
 static enum rofferr  static enum rofferr
Line 1556  roff_evalnum(struct roff *r, int ln, const char *v,
Line 1581  roff_evalnum(struct roff *r, int ln, const char *v,
                         *res *= operand2;                          *res *= operand2;
                         break;                          break;
                 case '/':                  case '/':
                         if (0 == operand2) {                          if (operand2 == 0) {
                                 mandoc_msg(MANDOCERR_DIVZERO,                                  mandoc_msg(MANDOCERR_DIVZERO,
                                         r->parse, ln, *pos, v);                                          r->parse, ln, *pos, v);
                                 *res = 0;                                  *res = 0;
Line 1565  roff_evalnum(struct roff *r, int ln, const char *v,
Line 1590  roff_evalnum(struct roff *r, int ln, const char *v,
                         *res /= operand2;                          *res /= operand2;
                         break;                          break;
                 case '%':                  case '%':
                           if (operand2 == 0) {
                                   mandoc_msg(MANDOCERR_DIVZERO,
                                           r->parse, ln, *pos, v);
                                   *res = 0;
                                   break;
                           }
                         *res %= operand2;                          *res %= operand2;
                         break;                          break;
                 case '<':                  case '<':
Legend:
Removed from v.1.239  
changed lines
  Added in v.1.246
CVSweb