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

Diff for /mandoc/roff.c between version 1.354 and 1.355

version 1.354, 2018/12/20 03:41:54 version 1.355, 2018/12/21 17:15:19
Line 38 
Line 38 
 #include "tbl_parse.h"  #include "tbl_parse.h"
 #include "eqn_parse.h"  #include "eqn_parse.h"
   
   /*
    * ASCII_ESC is used to signal from roff_getarg() to roff_expand()
    * that an escape sequence resulted from copy-in processing and
    * needs to be checked or interpolated.  As it is used nowhere
    * else, it is defined here rather than in a header file.
    */
   #define ASCII_ESC       27
   
 /* Maximum number of string expansions per line, to break infinite loops. */  /* Maximum number of string expansions per line, to break infinite loops. */
 #define EXPAND_LIMIT    1000  #define EXPAND_LIMIT    1000
   
Line 191  static int   roff_evalnum(struct roff *, int,
Line 199  static int   roff_evalnum(struct roff *, int,
 static  int              roff_evalpar(struct roff *, int,  static  int              roff_evalpar(struct roff *, int,
                                 const char *, int *, int *, int);                                  const char *, int *, int *, int);
 static  int              roff_evalstrcond(const char *, int *);  static  int              roff_evalstrcond(const char *, int *);
   static  int              roff_expand(struct roff *, struct buf *,
                                   int, int, char);
 static  void             roff_free1(struct roff *);  static  void             roff_free1(struct roff *);
 static  void             roff_freereg(struct roffreg *);  static  void             roff_freereg(struct roffreg *);
 static  void             roff_freestr(struct roffkv *);  static  void             roff_freestr(struct roffkv *);
Line 219  static enum roff_tok  roff_parse(struct roff *, char *
Line 229  static enum roff_tok  roff_parse(struct roff *, char *
 static  int              roff_parsetext(struct roff *, struct buf *,  static  int              roff_parsetext(struct roff *, struct buf *,
                                 int, int *);                                  int, int *);
 static  int              roff_renamed(ROFF_ARGS);  static  int              roff_renamed(ROFF_ARGS);
 static  int              roff_res(struct roff *, struct buf *, int, int);  
 static  int              roff_return(ROFF_ARGS);  static  int              roff_return(ROFF_ARGS);
 static  int              roff_rm(ROFF_ARGS);  static  int              roff_rm(ROFF_ARGS);
 static  int              roff_rn(ROFF_ARGS);  static  int              roff_rn(ROFF_ARGS);
Line 1142  deroff(char **dest, const struct roff_node *n)
Line 1151  deroff(char **dest, const struct roff_node *n)
 /* --- main functions of the roff parser ---------------------------------- */  /* --- main functions of the roff parser ---------------------------------- */
   
 /*  /*
  * In the current line, expand escape sequences that tend to get   * In the current line, expand escape sequences that produce parsable
  * used in numerical expressions and conditional requests.   * input text.  Also check the syntax of the remaining escape sequences,
  * Also check the syntax of the remaining escape sequences.   * which typically produce output glyphs or change formatter state.
  */   */
 static int  static int
 roff_res(struct roff *r, struct buf *buf, int ln, int pos)  roff_expand(struct roff *r, struct buf *buf, int ln, int pos, char newesc)
 {  {
         struct mctx     *ctx;   /* current macro call context */          struct mctx     *ctx;   /* current macro call context */
         char             ubuf[24]; /* buffer to print the number */          char             ubuf[24]; /* buffer to print the number */
Line 1181  roff_res(struct roff *r, struct buf *buf, int ln, int 
Line 1190  roff_res(struct roff *r, struct buf *buf, int ln, int 
         done = 0;          done = 0;
         start = buf->buf + pos;          start = buf->buf + pos;
         for (stesc = buf->buf + pos; *stesc != '\0'; stesc++) {          for (stesc = buf->buf + pos; *stesc != '\0'; stesc++) {
                 if (stesc[0] != r->escape || stesc[1] == '\0')                  if (stesc[0] != newesc || stesc[1] == '\0')
                         continue;                          continue;
                 stesc++;                  stesc++;
                 if (*stesc != '"' && *stesc != '#')                  if (*stesc != '"' && *stesc != '#')
Line 1223  roff_res(struct roff *r, struct buf *buf, int ln, int 
Line 1232  roff_res(struct roff *r, struct buf *buf, int ln, int 
                  * in the syntax tree.                   * in the syntax tree.
                  */                   */
   
                 if (r->format == 0) {                  if (newesc != ASCII_ESC && r->format == 0) {
                         while (*ep == ' ' || *ep == '\t')                          while (*ep == ' ' || *ep == '\t')
                                 ep--;                                  ep--;
                         ep[1] = '\0';                          ep[1] = '\0';
Line 1264  roff_res(struct roff *r, struct buf *buf, int ln, int 
Line 1273  roff_res(struct roff *r, struct buf *buf, int ln, int 
   
         expand_count = 0;          expand_count = 0;
         while (stesc >= start) {          while (stesc >= start) {
                   if (*stesc != newesc) {
   
                 /* Search backwards for the next backslash. */                          /*
                            * If we have a non-standard escape character,
                            * escape literal backslashes because all
                            * processing in subsequent functions uses
                            * the standard escaping rules.
                            */
   
                 if (*stesc != r->escape) {                          if (newesc != ASCII_ESC && *stesc == '\\') {
                         if (*stesc == '\\') {  
                                 *stesc = '\0';                                  *stesc = '\0';
                                 buf->sz = mandoc_asprintf(&nbuf, "%s\\e%s",                                  buf->sz = mandoc_asprintf(&nbuf, "%s\\e%s",
                                     buf->buf, stesc + 1) + 1;                                      buf->buf, stesc + 1) + 1;
Line 1277  roff_res(struct roff *r, struct buf *buf, int ln, int 
Line 1291  roff_res(struct roff *r, struct buf *buf, int ln, int 
                                 free(buf->buf);                                  free(buf->buf);
                                 buf->buf = nbuf;                                  buf->buf = nbuf;
                         }                          }
   
                           /* Search backwards for the next escape. */
   
                         stesc--;                          stesc--;
                         continue;                          continue;
                 }                  }
Line 1556  roff_res(struct roff *r, struct buf *buf, int ln, int 
Line 1573  roff_res(struct roff *r, struct buf *buf, int ln, int 
  * or to the NUL byte terminating the argument line.   * or to the NUL byte terminating the argument line.
  */   */
 char *  char *
 mandoc_getarg(char **cpp, int ln, int *pos)  roff_getarg(struct roff *r, char **cpp, int ln, int *pos)
 {  {
         char     *start, *cp;          struct buf       buf;
         int       quoted, pairs, white;          char            *cp, *start;
           int              newesc, pairs, quoted, white;
   
         /* Quoting can only start with a new word. */          /* Quoting can only start with a new word. */
         start = *cpp;          start = *cpp;
Line 1569  mandoc_getarg(char **cpp, int ln, int *pos)
Line 1587  mandoc_getarg(char **cpp, int ln, int *pos)
                 start++;                  start++;
         }          }
   
         pairs = 0;          newesc = pairs = white = 0;
         white = 0;  
         for (cp = start; '\0' != *cp; cp++) {          for (cp = start; '\0' != *cp; cp++) {
   
                 /*                  /*
Line 1589  mandoc_getarg(char **cpp, int ln, int *pos)
Line 1606  mandoc_getarg(char **cpp, int ln, int *pos)
                         case 'a':                          case 'a':
                         case 't':                          case 't':
                                 cp[-pairs] = '\t';                                  cp[-pairs] = '\t';
                                 /* FALLTHROUGH */                                  pairs++;
                                   cp++;
                                   break;
                         case '\\':                          case '\\':
                                   newesc = 1;
                                   cp[-pairs] = ASCII_ESC;
                                 pairs++;                                  pairs++;
                                 cp++;                                  cp++;
                                 break;                                  break;
Line 1639  mandoc_getarg(char **cpp, int ln, int *pos)
Line 1660  mandoc_getarg(char **cpp, int ln, int *pos)
         if ('\0' == *cp && (white || ' ' == cp[-1]))          if ('\0' == *cp && (white || ' ' == cp[-1]))
                 mandoc_msg(MANDOCERR_SPACE_EOL, ln, *pos, NULL);                  mandoc_msg(MANDOCERR_SPACE_EOL, ln, *pos, NULL);
   
         return start;          start = mandoc_strdup(start);
           if (newesc == 0)
                   return start;
   
           buf.buf = start;
           buf.sz = strlen(start) + 1;
           buf.next = NULL;
           if (roff_expand(r, &buf, ln, 0, ASCII_ESC) & ROFF_IGN) {
                   free(buf.buf);
                   buf.buf = mandoc_strdup("");
           }
           return buf.buf;
 }  }
   
   
Line 1737  roff_parseln(struct roff *r, int ln, struct buf *buf, 
Line 1769  roff_parseln(struct roff *r, int ln, struct buf *buf, 
   
         /* Expand some escape sequences. */          /* Expand some escape sequences. */
   
         e = roff_res(r, buf, ln, pos);          e = roff_expand(r, buf, ln, pos, r->escape);
         if ((e & ROFF_MASK) == ROFF_IGN)          if ((e & ROFF_MASK) == ROFF_IGN)
                 return e;                  return e;
         assert(e == ROFF_CONT);          assert(e == ROFF_CONT);
Line 3771  roff_userdef(ROFF_ARGS)
Line 3803  roff_userdef(ROFF_ARGS)
                         ctx->argv = mandoc_reallocarray(ctx->argv,                          ctx->argv = mandoc_reallocarray(ctx->argv,
                             ctx->argsz, sizeof(*ctx->argv));                              ctx->argsz, sizeof(*ctx->argv));
                 }                  }
                 arg = mandoc_getarg(&src, ln, &pos);                  arg = roff_getarg(r, &src, ln, &pos);
                 sz = 1;  /* For the terminating NUL. */                  sz = 1;  /* For the terminating NUL. */
                 for (ap = arg; *ap != '\0'; ap++)                  for (ap = arg; *ap != '\0'; ap++)
                         sz += *ap == '"' ? 4 : 1;                          sz += *ap == '"' ? 4 : 1;
Line 3784  roff_userdef(ROFF_ARGS)
Line 3816  roff_userdef(ROFF_ARGS)
                                 *dst++ = *ap;                                  *dst++ = *ap;
                 }                  }
                 *dst = '\0';                  *dst = '\0';
                   free(arg);
         }          }
   
         /* Replace the macro invocation by the macro definition. */          /* Replace the macro invocation by the macro definition. */
Line 4133  roff_strdup(const struct roff *r, const char *p)
Line 4166  roff_strdup(const struct roff *r, const char *p)
                 /*                  /*
                  * We bail out on bad escapes.                   * We bail out on bad escapes.
                  * No need to warn: we already did so when                   * No need to warn: we already did so when
                  * roff_res() was called.                   * roff_expand() was called.
                  */                   */
                 sz = (int)(p - pp);                  sz = (int)(p - pp);
                 res = mandoc_realloc(res, ssz + sz + 1);                  res = mandoc_realloc(res, ssz + sz + 1);

Legend:
Removed from v.1.354  
changed lines
  Added in v.1.355

CVSweb