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

Diff for /mandoc/mdoc_validate.c between version 1.144 and 1.145

version 1.144, 2010/12/16 17:14:48 version 1.145, 2010/12/22 11:15:16
Line 41 
Line 41 
 #define PRE_ARGS  struct mdoc *mdoc, struct mdoc_node *n  #define PRE_ARGS  struct mdoc *mdoc, struct mdoc_node *n
 #define POST_ARGS struct mdoc *mdoc  #define POST_ARGS struct mdoc *mdoc
   
   #define NORM_BUMP(dst, src) do { \
                   (dst)->norm = (src)->norm; \
                   ((dst)->norm->refcnt)++; \
           } while (/* CONSTCOND */ 0)
   #define NORM_ALLOC(dst) do { \
                   (dst)->norm = \
                           mandoc_calloc(1, sizeof(struct mdoc_norm)); \
                   (dst)->norm->refcnt = 1; \
           } while (/* CONSTCOND */ 0)
   
 #define NUMSIZ    32  #define NUMSIZ    32
 #define DATESIZE  32  #define DATESIZE  32
   
Line 609  pre_bl(PRE_ARGS)
Line 619  pre_bl(PRE_ARGS)
                 assert(np);                  assert(np);
                 assert(MDOC_BLOCK == np->type);                  assert(MDOC_BLOCK == np->type);
                 assert(MDOC_Bl == np->tok);                  assert(MDOC_Bl == np->tok);
                 assert(np->data.Bl);                  NORM_BUMP(n, np);
                 n->data.Bl = np->data.Bl;  
                 return(1);                  return(1);
         }          }
   
           NORM_ALLOC(n);
   
         /*          /*
          * First figure out which kind of list to use: bind ourselves to           * First figure out which kind of list to use: bind ourselves to
          * the first mentioned list type and warn about any remaining           * the first mentioned list type and warn about any remaining
          * ones.  If we find no list type, we default to LIST_item.           * ones.  If we find no list type, we default to LIST_item.
          */           */
   
         assert(NULL == n->data.Bl);  
         n->data.Bl = mandoc_calloc(1, sizeof(struct mdoc_bl));  
   
         /* LINTED */          /* LINTED */
         for (i = 0; n->args && i < (int)n->args->argc; i++) {          for (i = 0; n->args && i < (int)n->args->argc; i++) {
                 lt = LIST__NONE;                  lt = LIST__NONE;
Line 665  pre_bl(PRE_ARGS)
Line 673  pre_bl(PRE_ARGS)
                         break;                          break;
                 /* Set list arguments. */                  /* Set list arguments. */
                 case (MDOC_Compact):                  case (MDOC_Compact):
                         dup = n->data.Bl->comp;                          dup = n->norm->d.Bl.comp;
                         comp = 1;                          comp = 1;
                         break;                          break;
                 case (MDOC_Width):                  case (MDOC_Width):
                         dup = (NULL != n->data.Bl->width);                          dup = (NULL != n->norm->d.Bl.width);
                         width = n->args->argv[i].value[0];                          width = n->args->argv[i].value[0];
                         break;                          break;
                 case (MDOC_Offset):                  case (MDOC_Offset):
                         /* NB: this can be empty! */                          /* NB: this can be empty! */
                         if (n->args->argv[i].sz) {                          if (n->args->argv[i].sz) {
                                 offs = n->args->argv[i].value[0];                                  offs = n->args->argv[i].value[0];
                                 dup = (NULL != n->data.Bl->offs);                                  dup = (NULL != n->norm->d.Bl.offs);
                                 break;                                  break;
                         }                          }
                         mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);                          mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
Line 691  pre_bl(PRE_ARGS)
Line 699  pre_bl(PRE_ARGS)
                         mdoc_nmsg(mdoc, n, MANDOCERR_ARGVREP);                          mdoc_nmsg(mdoc, n, MANDOCERR_ARGVREP);
   
                 if (comp && ! dup)                  if (comp && ! dup)
                         n->data.Bl->comp = comp;                          n->norm->d.Bl.comp = comp;
                 if (offs && ! dup)                  if (offs && ! dup)
                         n->data.Bl->offs = offs;                          n->norm->d.Bl.offs = offs;
                 if (width && ! dup)                  if (width && ! dup)
                         n->data.Bl->width = width;                          n->norm->d.Bl.width = width;
   
                 /* Check: multiple list types. */                  /* Check: multiple list types. */
   
                 if (LIST__NONE != lt && n->data.Bl->type != LIST__NONE)                  if (LIST__NONE != lt && n->norm->d.Bl.type != LIST__NONE)
                         mdoc_nmsg(mdoc, n, MANDOCERR_LISTREP);                          mdoc_nmsg(mdoc, n, MANDOCERR_LISTREP);
   
                 /* Assign list type. */                  /* Assign list type. */
   
                 if (LIST__NONE != lt && n->data.Bl->type == LIST__NONE) {                  if (LIST__NONE != lt && n->norm->d.Bl.type == LIST__NONE) {
                         n->data.Bl->type = lt;                          n->norm->d.Bl.type = lt;
                         /* Set column information, too. */                          /* Set column information, too. */
                         if (LIST_column == lt) {                          if (LIST_column == lt) {
                                 n->data.Bl->ncols =                                  n->norm->d.Bl.ncols =
                                         n->args->argv[i].sz;                                          n->args->argv[i].sz;
                                 n->data.Bl->cols = (const char **)                                  n->norm->d.Bl.cols = (const char **)
                                         n->args->argv[i].value;                                          n->args->argv[i].value;
                         }                          }
                 }                  }
   
                 /* The list type should come first. */                  /* The list type should come first. */
   
                 if (n->data.Bl->type == LIST__NONE)                  if (n->norm->d.Bl.type == LIST__NONE)
                         if (n->data.Bl->width ||                          if (n->norm->d.Bl.width ||
                                         n->data.Bl->offs ||                                          n->norm->d.Bl.offs ||
                                         n->data.Bl->comp)                                          n->norm->d.Bl.comp)
                                 mdoc_nmsg(mdoc, n, MANDOCERR_LISTFIRST);                                  mdoc_nmsg(mdoc, n, MANDOCERR_LISTFIRST);
   
                 continue;                  continue;
Line 728  pre_bl(PRE_ARGS)
Line 736  pre_bl(PRE_ARGS)
   
         /* Allow lists to default to LIST_item. */          /* Allow lists to default to LIST_item. */
   
         if (LIST__NONE == n->data.Bl->type) {          if (LIST__NONE == n->norm->d.Bl.type) {
                 mdoc_nmsg(mdoc, n, MANDOCERR_LISTTYPE);                  mdoc_nmsg(mdoc, n, MANDOCERR_LISTTYPE);
                 n->data.Bl->type = LIST_item;                  n->norm->d.Bl.type = LIST_item;
         }          }
   
         /*          /*
Line 739  pre_bl(PRE_ARGS)
Line 747  pre_bl(PRE_ARGS)
          * and must also be warned.           * and must also be warned.
          */           */
   
         switch (n->data.Bl->type) {          switch (n->norm->d.Bl.type) {
         case (LIST_tag):          case (LIST_tag):
                 if (n->data.Bl->width)                  if (n->norm->d.Bl.width)
                         break;                          break;
                 mdoc_nmsg(mdoc, n, MANDOCERR_NOWIDTHARG);                  mdoc_nmsg(mdoc, n, MANDOCERR_NOWIDTHARG);
                 break;                  break;
Line 754  pre_bl(PRE_ARGS)
Line 762  pre_bl(PRE_ARGS)
         case (LIST_inset):          case (LIST_inset):
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case (LIST_item):          case (LIST_item):
                 if (n->data.Bl->width)                  if (n->norm->d.Bl.width)
                         mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);                          mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                 break;                  break;
         default:          default:
Line 783  pre_bd(PRE_ARGS)
Line 791  pre_bd(PRE_ARGS)
                 assert(np);                  assert(np);
                 assert(MDOC_BLOCK == np->type);                  assert(MDOC_BLOCK == np->type);
                 assert(MDOC_Bd == np->tok);                  assert(MDOC_Bd == np->tok);
                 assert(np->data.Bd);                  NORM_BUMP(n, np);
                 n->data.Bd = np->data.Bd;  
                 return(1);                  return(1);
         }          }
   
         assert(NULL == n->data.Bd);          NORM_ALLOC(n);
         n->data.Bd = mandoc_calloc(1, sizeof(struct mdoc_bd));  
   
         /* LINTED */          /* LINTED */
         for (i = 0; n->args && i < (int)n->args->argc; i++) {          for (i = 0; n->args && i < (int)n->args->argc; i++) {
Line 820  pre_bd(PRE_ARGS)
Line 826  pre_bd(PRE_ARGS)
                         /* NB: this can be empty! */                          /* NB: this can be empty! */
                         if (n->args->argv[i].sz) {                          if (n->args->argv[i].sz) {
                                 offs = n->args->argv[i].value[0];                                  offs = n->args->argv[i].value[0];
                                 dup = (NULL != n->data.Bd->offs);                                  dup = (NULL != n->norm->d.Bd.offs);
                                 break;                                  break;
                         }                          }
                         mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);                          mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                         break;                          break;
                 case (MDOC_Compact):                  case (MDOC_Compact):
                         comp = 1;                          comp = 1;
                         dup = n->data.Bd->comp;                          dup = n->norm->d.Bd.comp;
                         break;                          break;
                 default:                  default:
                         abort();                          abort();
Line 842  pre_bd(PRE_ARGS)
Line 848  pre_bd(PRE_ARGS)
                 /* Make our auxiliary assignments. */                  /* Make our auxiliary assignments. */
   
                 if (offs && ! dup)                  if (offs && ! dup)
                         n->data.Bd->offs = offs;                          n->norm->d.Bd.offs = offs;
                 if (comp && ! dup)                  if (comp && ! dup)
                         n->data.Bd->comp = comp;                          n->norm->d.Bd.comp = comp;
   
                 /* Check whether a type has already been assigned. */                  /* Check whether a type has already been assigned. */
   
                 if (DISP__NONE != dt && n->data.Bd->type != DISP__NONE)                  if (DISP__NONE != dt && n->norm->d.Bd.type != DISP__NONE)
                         mdoc_nmsg(mdoc, n, MANDOCERR_DISPREP);                          mdoc_nmsg(mdoc, n, MANDOCERR_DISPREP);
   
                 /* Make our type assignment. */                  /* Make our type assignment. */
   
                 if (DISP__NONE != dt && n->data.Bd->type == DISP__NONE)                  if (DISP__NONE != dt && n->norm->d.Bd.type == DISP__NONE)
                         n->data.Bd->type = dt;                          n->norm->d.Bd.type = dt;
         }          }
   
         if (DISP__NONE == n->data.Bd->type) {          if (DISP__NONE == n->norm->d.Bd.type) {
                 mdoc_nmsg(mdoc, n, MANDOCERR_DISPTYPE);                  mdoc_nmsg(mdoc, n, MANDOCERR_DISPTYPE);
                 n->data.Bd->type = DISP_ragged;                  n->norm->d.Bd.type = DISP_ragged;
         }          }
   
         return(1);          return(1);
Line 904  pre_an(PRE_ARGS)
Line 910  pre_an(PRE_ARGS)
 {  {
         int              i;          int              i;
   
         assert(NULL == n->data.An);          NORM_ALLOC(n);
         n->data.An = mandoc_calloc(1, sizeof(struct mdoc_an));  
   
         if (NULL == n->args)          if (NULL == n->args)
                 return(1);                  return(1);
Line 915  pre_an(PRE_ARGS)
Line 920  pre_an(PRE_ARGS)
                         n->args->argv[i].pos, MANDOCERR_IGNARGV);                          n->args->argv[i].pos, MANDOCERR_IGNARGV);
   
         if (MDOC_Split == n->args->argv[0].arg)          if (MDOC_Split == n->args->argv[0].arg)
                 n->data.An->auth = AUTH_split;                  n->norm->d.An.auth = AUTH_split;
         else if (MDOC_Nosplit == n->args->argv[0].arg)          else if (MDOC_Nosplit == n->args->argv[0].arg)
                 n->data.An->auth = AUTH_nosplit;                  n->norm->d.An.auth = AUTH_nosplit;
         else          else
                 abort();                  abort();
   
Line 999  post_bf(POST_ARGS)
Line 1004  post_bf(POST_ARGS)
                 assert(np);                  assert(np);
                 assert(MDOC_HEAD == np->type);                  assert(MDOC_HEAD == np->type);
                 assert(MDOC_Bf == np->tok);                  assert(MDOC_Bf == np->tok);
                 assert(np->data.Bf);                  NORM_BUMP(mdoc->last, np);
                 mdoc->last->data.Bf = np->data.Bf;  
                 return(1);                  return(1);
         }          }
   
         np = mdoc->last;          np = mdoc->last;
         assert(MDOC_BLOCK == np->parent->type);          assert(MDOC_BLOCK == np->parent->type);
         assert(MDOC_Bf == np->parent->tok);          assert(MDOC_Bf == np->parent->tok);
         np->data.Bf = mandoc_calloc(1, sizeof(struct mdoc_bf));          NORM_ALLOC(np);
   
         /*          /*
          * Cannot have both argument and parameter.           * Cannot have both argument and parameter.
Line 1027  post_bf(POST_ARGS)
Line 1031  post_bf(POST_ARGS)
         if (np->parent->args) {          if (np->parent->args) {
                 arg = np->parent->args->argv[0].arg;                  arg = np->parent->args->argv[0].arg;
                 if (MDOC_Emphasis == arg)                  if (MDOC_Emphasis == arg)
                         np->data.Bf->font = FONT_Em;                          np->norm->d.Bf.font = FONT_Em;
                 else if (MDOC_Literal == arg)                  else if (MDOC_Literal == arg)
                         np->data.Bf->font = FONT_Li;                          np->norm->d.Bf.font = FONT_Li;
                 else if (MDOC_Symbolic == arg)                  else if (MDOC_Symbolic == arg)
                         np->data.Bf->font = FONT_Sy;                          np->norm->d.Bf.font = FONT_Sy;
                 else                  else
                         abort();                          abort();
                 return(1);                  return(1);
Line 1040  post_bf(POST_ARGS)
Line 1044  post_bf(POST_ARGS)
         /* Extract parameter into data. */          /* Extract parameter into data. */
   
         if (0 == strcmp(np->child->string, "Em"))          if (0 == strcmp(np->child->string, "Em"))
                 np->data.Bf->font = FONT_Em;                  np->norm->d.Bf.font = FONT_Em;
         else if (0 == strcmp(np->child->string, "Li"))          else if (0 == strcmp(np->child->string, "Li"))
                 np->data.Bf->font = FONT_Li;                  np->norm->d.Bf.font = FONT_Li;
         else if (0 == strcmp(np->child->string, "Sy"))          else if (0 == strcmp(np->child->string, "Sy"))
                 np->data.Bf->font = FONT_Sy;                  np->norm->d.Bf.font = FONT_Sy;
         else          else
                 mdoc_nmsg(mdoc, np, MANDOCERR_FONTTYPE);                  mdoc_nmsg(mdoc, np, MANDOCERR_FONTTYPE);
   
Line 1250  post_an(POST_ARGS)
Line 1254  post_an(POST_ARGS)
         struct mdoc_node *np;          struct mdoc_node *np;
   
         np = mdoc->last;          np = mdoc->last;
         if (AUTH__NONE != np->data.An->auth && np->child)          if (AUTH__NONE != np->norm->d.An.auth && np->child)
                 return(eerr_eq0(mdoc));                  return(eerr_eq0(mdoc));
   
         /*          /*
          * FIXME: make this ewarn and make sure that the front-ends           * FIXME: make this ewarn and make sure that the front-ends
          * don't print the arguments.           * don't print the arguments.
          */           */
         if (AUTH__NONE != np->data.An->auth || np->child)          if (AUTH__NONE != np->norm->d.An.auth || np->child)
                 return(1);                  return(1);
   
         mdoc_nmsg(mdoc, np, MANDOCERR_NOARGS);          mdoc_nmsg(mdoc, np, MANDOCERR_NOARGS);
Line 1277  post_it(POST_ARGS)
Line 1281  post_it(POST_ARGS)
                 return(1);                  return(1);
   
         n = mdoc->last->parent->parent;          n = mdoc->last->parent->parent;
         assert(n->data.Bl);          lt = n->norm->d.Bl.type;
         lt = n->data.Bl->type;  
   
         if (LIST__NONE == lt) {          if (LIST__NONE == lt) {
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_LISTTYPE);                  mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_LISTTYPE);
Line 1317  post_it(POST_ARGS)
Line 1320  post_it(POST_ARGS)
                         mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_ARGSLOST);                          mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_ARGSLOST);
                 break;                  break;
         case (LIST_column):          case (LIST_column):
                 cols = (int)n->data.Bl->ncols;                  cols = (int)n->norm->d.Bl.ncols;
   
                 assert(NULL == mdoc->last->head->child);                  assert(NULL == mdoc->last->head->child);
   
Line 1361  post_bl_block(POST_ARGS) 
Line 1364  post_bl_block(POST_ARGS) 
   
         n = mdoc->last;          n = mdoc->last;
   
         if (LIST_tag == n->data.Bl->type &&          if (LIST_tag == n->norm->d.Bl.type &&
                         NULL == n->data.Bl->width) {                          NULL == n->norm->d.Bl.width) {
                 if ( ! post_bl_block_tag(mdoc))                  if ( ! post_bl_block_tag(mdoc))
                         return(0);                          return(0);
         } else if (NULL != n->data.Bl->width) {          } else if (NULL != n->norm->d.Bl.width) {
                 if ( ! post_bl_block_width(mdoc))                  if ( ! post_bl_block_width(mdoc))
                         return(0);                          return(0);
         } else          } else
                 return(1);                  return(1);
   
         assert(n->data.Bl->width);          assert(n->norm->d.Bl.width);
         return(1);          return(1);
 }  }
   
Line 1395  post_bl_block_width(POST_ARGS)
Line 1398  post_bl_block_width(POST_ARGS)
          * the macro's width as set in share/tmac/mdoc/doc-common.           * the macro's width as set in share/tmac/mdoc/doc-common.
          */           */
   
         if (0 == strcmp(n->data.Bl->width, "Ds"))          if (0 == strcmp(n->norm->d.Bl.width, "Ds"))
                 width = 6;                  width = 6;
         else if (MDOC_MAX == (tok = mdoc_hash_find(n->data.Bl->width)))          else if (MDOC_MAX == (tok = mdoc_hash_find(n->norm->d.Bl.width)))
                 return(1);                  return(1);
         else if (0 == (width = mdoc_macro2len(tok)))  {          else if (0 == (width = mdoc_macro2len(tok)))  {
                 mdoc_nmsg(mdoc, n, MANDOCERR_BADWIDTH);                  mdoc_nmsg(mdoc, n, MANDOCERR_BADWIDTH);
Line 1419  post_bl_block_width(POST_ARGS)
Line 1422  post_bl_block_width(POST_ARGS)
         n->args->argv[i].value[0] = mandoc_strdup(buf);          n->args->argv[i].value[0] = mandoc_strdup(buf);
   
         /* Set our width! */          /* Set our width! */
         n->data.Bl->width = n->args->argv[i].value[0];          n->norm->d.Bl.width = n->args->argv[i].value[0];
         return(1);          return(1);
 }  }
   
Line 1485  post_bl_block_tag(POST_ARGS)
Line 1488  post_bl_block_tag(POST_ARGS)
         n->args->argv[i].value[0] = mandoc_strdup(buf);          n->args->argv[i].value[0] = mandoc_strdup(buf);
   
         /* Set our width! */          /* Set our width! */
         n->data.Bl->width = n->args->argv[i].value[0];          n->norm->d.Bl.width = n->args->argv[i].value[0];
         return(1);          return(1);
 }  }
   
Line 1496  post_bl_head(POST_ARGS) 
Line 1499  post_bl_head(POST_ARGS) 
         struct mdoc_node *np, *nn, *nnp;          struct mdoc_node *np, *nn, *nnp;
         int               i, j;          int               i, j;
   
         if (LIST_column != mdoc->last->data.Bl->type)          if (LIST_column != mdoc->last->norm->d.Bl.type)
                 /* FIXME: this should be ERROR class... */                  /* FIXME: this should be ERROR class... */
                 return(hwarn_eq0(mdoc));                  return(hwarn_eq0(mdoc));
   
Line 1513  post_bl_head(POST_ARGS) 
Line 1516  post_bl_head(POST_ARGS) 
          * lists, but I'll leave that for another day.           * lists, but I'll leave that for another day.
          */           */
   
         if (mdoc->last->data.Bl->ncols && mdoc->last->nchild) {          if (mdoc->last->norm->d.Bl.ncols && mdoc->last->nchild) {
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_COLUMNS);                  mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_COLUMNS);
                 return(0);                  return(0);
         } else if (NULL == mdoc->last->child)          } else if (NULL == mdoc->last->child)
Line 1539  post_bl_head(POST_ARGS) 
Line 1542  post_bl_head(POST_ARGS) 
         np->args->argv[j].value = mandoc_malloc          np->args->argv[j].value = mandoc_malloc
                 ((size_t)mdoc->last->nchild * sizeof(char *));                  ((size_t)mdoc->last->nchild * sizeof(char *));
   
         mdoc->last->data.Bl->ncols = np->args->argv[j].sz;          mdoc->last->norm->d.Bl.ncols = np->args->argv[j].sz;
         mdoc->last->data.Bl->cols = (const char **)np->args->argv[j].value;          mdoc->last->norm->d.Bl.cols = (const char **)np->args->argv[j].value;
   
         for (i = 0, nn = mdoc->last->child; nn; i++) {          for (i = 0, nn = mdoc->last->child; nn; i++) {
                 np->args->argv[j].value[i] = nn->string;                  np->args->argv[j].value[i] = nn->string;
Line 1920  pre_par(PRE_ARGS)
Line 1923  pre_par(PRE_ARGS)
   
         if (MDOC_Pp != mdoc->last->tok && MDOC_Lp != mdoc->last->tok)          if (MDOC_Pp != mdoc->last->tok && MDOC_Lp != mdoc->last->tok)
                 return(1);                  return(1);
         if (MDOC_Bl == n->tok && n->data.Bl->comp)          if (MDOC_Bl == n->tok && n->norm->d.Bl.comp)
                 return(1);                  return(1);
         if (MDOC_Bd == n->tok && n->data.Bd->comp)          if (MDOC_Bd == n->tok && n->norm->d.Bd.comp)
                 return(1);                  return(1);
         if (MDOC_It == n->tok && n->parent->data.Bl->comp)          if (MDOC_It == n->tok && n->parent->norm->d.Bl.comp)
                 return(1);                  return(1);
   
         mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_IGNPAR);          mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_IGNPAR);
Line 1949  pre_literal(PRE_ARGS)
Line 1952  pre_literal(PRE_ARGS)
                 mdoc->flags |= MDOC_LITERAL;                  mdoc->flags |= MDOC_LITERAL;
                 break;                  break;
         case (MDOC_Bd):          case (MDOC_Bd):
                 assert(n->data.Bd);                  if (DISP_literal == n->norm->d.Bd.type)
                 if (DISP_literal == n->data.Bd->type)  
                         mdoc->flags |= MDOC_LITERAL;                          mdoc->flags |= MDOC_LITERAL;
                 if (DISP_unfilled == n->data.Bd->type)                  if (DISP_unfilled == n->norm->d.Bd.type)
                         mdoc->flags |= MDOC_LITERAL;                          mdoc->flags |= MDOC_LITERAL;
                 break;                  break;
         default:          default:

Legend:
Removed from v.1.144  
changed lines
  Added in v.1.145

CVSweb