[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.225 and 1.229

version 1.225, 2014/07/04 01:50:07 version 1.229, 2014/07/06 19:09:00
Line 84  static int  ewarn_le1(POST_ARGS);
Line 84  static int  ewarn_le1(POST_ARGS);
 static  int      hwarn_eq0(POST_ARGS);  static  int      hwarn_eq0(POST_ARGS);
 static  int      hwarn_eq1(POST_ARGS);  static  int      hwarn_eq1(POST_ARGS);
 static  int      hwarn_ge1(POST_ARGS);  static  int      hwarn_ge1(POST_ARGS);
 static  int      hwarn_le1(POST_ARGS);  
   
 static  int      post_an(POST_ARGS);  static  int      post_an(POST_ARGS);
 static  int      post_at(POST_ARGS);  static  int      post_at(POST_ARGS);
Line 137  static int  pre_std(PRE_ARGS);
Line 136  static int  pre_std(PRE_ARGS);
 static  v_post   posts_an[] = { post_an, NULL };  static  v_post   posts_an[] = { post_an, NULL };
 static  v_post   posts_at[] = { post_at, post_defaults, NULL };  static  v_post   posts_at[] = { post_at, post_defaults, NULL };
 static  v_post   posts_bd[] = { post_literal, hwarn_eq0, bwarn_ge1, NULL };  static  v_post   posts_bd[] = { post_literal, hwarn_eq0, bwarn_ge1, NULL };
 static  v_post   posts_bf[] = { hwarn_le1, post_bf, NULL };  static  v_post   posts_bf[] = { post_bf, NULL };
 static  v_post   posts_bk[] = { hwarn_eq0, bwarn_ge1, NULL };  static  v_post   posts_bk[] = { hwarn_eq0, bwarn_ge1, NULL };
 static  v_post   posts_bl[] = { bwarn_ge1, post_bl, NULL };  static  v_post   posts_bl[] = { bwarn_ge1, post_bl, NULL };
 static  v_post   posts_bx[] = { post_bx, NULL };  static  v_post   posts_bx[] = { post_bx, NULL };
Line 515  hwarn_ge1(POST_ARGS)
Line 514  hwarn_ge1(POST_ARGS)
         return(check_count(mdoc, MDOC_HEAD, CHECK_WARN, CHECK_GT, 0));          return(check_count(mdoc, MDOC_HEAD, CHECK_WARN, CHECK_GT, 0));
 }  }
   
 static int  
 hwarn_le1(POST_ARGS)  
 {  
         return(check_count(mdoc, MDOC_HEAD, CHECK_WARN, CHECK_LT, 2));  
 }  
   
 static void  static void
 check_args(struct mdoc *mdoc, struct mdoc_node *n)  check_args(struct mdoc *mdoc, struct mdoc_node *n)
 {  {
Line 558  check_text(struct mdoc *mdoc, int ln, int pos, char *p
Line 551  check_text(struct mdoc *mdoc, int ln, int pos, char *p
                 return;                  return;
   
         for (cp = p; NULL != (p = strchr(p, '\t')); p++)          for (cp = p; NULL != (p = strchr(p, '\t')); p++)
                 mdoc_pmsg(mdoc, ln, pos + (int)(p - cp), MANDOCERR_BADTAB);                  mandoc_msg(MANDOCERR_FI_TAB, mdoc->parse,
                       ln, pos + (int)(p - cp), NULL);
 }  }
   
 static int  static int
Line 601  pre_display(PRE_ARGS)
Line 595  pre_display(PRE_ARGS)
 static int  static int
 pre_bl(PRE_ARGS)  pre_bl(PRE_ARGS)
 {  {
         int               i, comp, dup;  
         const char       *offs, *width;  
         enum mdoc_list    lt;  
         struct mdoc_node *np;          struct mdoc_node *np;
           struct mdoc_argv *argv;
           int               i;
           enum mdoc_list    lt;
   
         if (MDOC_BLOCK != n->type) {          if (MDOC_BLOCK != n->type) {
                 if (ENDBODY_NOT != n->end) {                  if (ENDBODY_NOT != n->end) {
Line 626  pre_bl(PRE_ARGS)
Line 620  pre_bl(PRE_ARGS)
          */           */
   
         for (i = 0; n->args && i < (int)n->args->argc; i++) {          for (i = 0; n->args && i < (int)n->args->argc; i++) {
                   argv = n->args->argv + i;
                 lt = LIST__NONE;                  lt = LIST__NONE;
                 dup = comp = 0;                  switch (argv->arg) {
                 width = offs = NULL;  
                 switch (n->args->argv[i].arg) {  
                 /* Set list types. */                  /* Set list types. */
                 case MDOC_Bullet:                  case MDOC_Bullet:
                         lt = LIST_bullet;                          lt = LIST_bullet;
Line 666  pre_bl(PRE_ARGS)
Line 659  pre_bl(PRE_ARGS)
                         break;                          break;
                 /* Set list arguments. */                  /* Set list arguments. */
                 case MDOC_Compact:                  case MDOC_Compact:
                         dup = n->norm->Bl.comp;                          if (n->norm->Bl.comp)
                         comp = 1;                                  mandoc_msg(MANDOCERR_ARG_REP,
                                       mdoc->parse, argv->line,
                                       argv->pos, "Bl -compact");
                           n->norm->Bl.comp = 1;
                         break;                          break;
                 case MDOC_Width:                  case MDOC_Width:
                         /* NB: this can be empty! */                          if (0 == argv->sz) {
                         if (n->args->argv[i].sz) {                                  mandoc_msg(MANDOCERR_ARG_EMPTY,
                                 width = n->args->argv[i].value[0];                                      mdoc->parse, argv->line,
                                 dup = (NULL != n->norm->Bl.width);                                      argv->pos, "Bl -width");
                                   n->norm->Bl.width = "0n";
                                 break;                                  break;
                         }                          }
                         mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);                          if (NULL != n->norm->Bl.width)
                                   mandoc_vmsg(MANDOCERR_ARG_REP,
                                       mdoc->parse, argv->line,
                                       argv->pos, "Bl -width %s",
                                       argv->value[0]);
                           n->norm->Bl.width = argv->value[0];
                         break;                          break;
                 case MDOC_Offset:                  case MDOC_Offset:
                         /* NB: this can be empty! */                          if (0 == argv->sz) {
                         if (n->args->argv[i].sz) {                                  mandoc_msg(MANDOCERR_ARG_EMPTY,
                                 offs = n->args->argv[i].value[0];                                      mdoc->parse, argv->line,
                                 dup = (NULL != n->norm->Bl.offs);                                      argv->pos, "Bl -offset");
                                 break;                                  break;
                         }                          }
                         mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);                          if (NULL != n->norm->Bl.offs)
                                   mandoc_vmsg(MANDOCERR_ARG_REP,
                                       mdoc->parse, argv->line,
                                       argv->pos, "Bl -offset %s",
                                       argv->value[0]);
                           n->norm->Bl.offs = argv->value[0];
                         break;                          break;
                 default:                  default:
                         continue;                          continue;
                 }                  }
                   if (LIST__NONE == lt)
                           continue;
   
                 /* Check: duplicate auxiliary arguments. */  
   
                 if (dup)  
                         mdoc_nmsg(mdoc, n, MANDOCERR_ARGVREP);  
   
                 if (comp && ! dup)  
                         n->norm->Bl.comp = comp;  
                 if (offs && ! dup)  
                         n->norm->Bl.offs = offs;  
                 if (width && ! dup)  
                         n->norm->Bl.width = width;  
   
                 /* Check: multiple list types. */                  /* Check: multiple list types. */
   
                 if (LIST__NONE != lt && n->norm->Bl.type != LIST__NONE)                  if (LIST__NONE != n->norm->Bl.type) {
                         mdoc_nmsg(mdoc, n, MANDOCERR_LISTREP);                          mandoc_msg(MANDOCERR_BL_REP,
                               mdoc->parse, n->line, n->pos,
                 /* Assign list type. */                              mdoc_argnames[argv->arg]);
                           continue;
                 if (LIST__NONE != lt && n->norm->Bl.type == LIST__NONE) {  
                         n->norm->Bl.type = lt;  
                         /* Set column information, too. */  
                         if (LIST_column == lt) {  
                                 n->norm->Bl.ncols =  
                                     n->args->argv[i].sz;  
                                 n->norm->Bl.cols = (void *)  
                                     n->args->argv[i].value;  
                         }  
                 }                  }
   
                 /* The list type should come first. */                  /* The list type should come first. */
   
                 if (n->norm->Bl.type == LIST__NONE)                  if (n->norm->Bl.width ||
                         if (n->norm->Bl.width ||                      n->norm->Bl.offs ||
                             n->norm->Bl.offs ||                      n->norm->Bl.comp)
                             n->norm->Bl.comp)                          mandoc_msg(MANDOCERR_BL_LATETYPE,
                                 mandoc_msg(MANDOCERR_BL_LATETYPE,                              mdoc->parse, n->line, n->pos,
                                     mdoc->parse, n->line, n->pos,                              mdoc_argnames[n->args->argv[0].arg]);
                                     mdoc_argnames[n->args->argv[0].arg]);  
                 continue;                  n->norm->Bl.type = lt;
                   if (LIST_column == lt) {
                           n->norm->Bl.ncols = argv->sz;
                           n->norm->Bl.cols = (void *)argv->value;
                   }
         }          }
   
         /* Allow lists to default to LIST_item. */          /* Allow lists to default to LIST_item. */
Line 750  pre_bl(PRE_ARGS)
Line 742  pre_bl(PRE_ARGS)
         switch (n->norm->Bl.type) {          switch (n->norm->Bl.type) {
         case LIST_tag:          case LIST_tag:
                 if (NULL == n->norm->Bl.width)                  if (NULL == n->norm->Bl.width)
                         mdoc_nmsg(mdoc, n, MANDOCERR_BL_WIDTH);                          mdoc_nmsg(mdoc, n, MANDOCERR_BL_NOWIDTH);
                 break;                  break;
         case LIST_column:          case LIST_column:
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
Line 786  pre_bl(PRE_ARGS)
Line 778  pre_bl(PRE_ARGS)
 static int  static int
 pre_bd(PRE_ARGS)  pre_bd(PRE_ARGS)
 {  {
         int               i, dup, comp;  
         enum mdoc_disp    dt;  
         const char       *offs;  
         struct mdoc_node *np;          struct mdoc_node *np;
           struct mdoc_argv *argv;
           int               i;
           enum mdoc_disp    dt;
   
         if (MDOC_BLOCK != n->type) {          if (MDOC_BLOCK != n->type) {
                 if (ENDBODY_NOT != n->end) {                  if (ENDBODY_NOT != n->end) {
Line 805  pre_bd(PRE_ARGS)
Line 797  pre_bd(PRE_ARGS)
         }          }
   
         for (i = 0; n->args && i < (int)n->args->argc; i++) {          for (i = 0; n->args && i < (int)n->args->argc; i++) {
                   argv = n->args->argv + i;
                 dt = DISP__NONE;                  dt = DISP__NONE;
                 dup = comp = 0;  
                 offs = NULL;  
   
                 switch (n->args->argv[i].arg) {                  switch (argv->arg) {
                 case MDOC_Centred:                  case MDOC_Centred:
                         dt = DISP_centred;                          dt = DISP_centred;
                         break;                          break;
Line 829  pre_bd(PRE_ARGS)
Line 820  pre_bd(PRE_ARGS)
                         mdoc_nmsg(mdoc, n, MANDOCERR_BADDISP);                          mdoc_nmsg(mdoc, n, MANDOCERR_BADDISP);
                         return(0);                          return(0);
                 case MDOC_Offset:                  case MDOC_Offset:
                         /* NB: this can be empty! */                          if (0 == argv->sz) {
                         if (n->args->argv[i].sz) {                                  mandoc_msg(MANDOCERR_ARG_EMPTY,
                                 offs = n->args->argv[i].value[0];                                      mdoc->parse, argv->line,
                                 dup = (NULL != n->norm->Bd.offs);                                      argv->pos, "Bd -offset");
                                 break;                                  break;
                         }                          }
                         mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);                          if (NULL != n->norm->Bd.offs)
                                   mandoc_vmsg(MANDOCERR_ARG_REP,
                                       mdoc->parse, argv->line,
                                       argv->pos, "Bd -offset %s",
                                       argv->value[0]);
                           n->norm->Bd.offs = argv->value[0];
                         break;                          break;
                 case MDOC_Compact:                  case MDOC_Compact:
                         comp = 1;                          if (n->norm->Bd.comp)
                         dup = n->norm->Bd.comp;                                  mandoc_msg(MANDOCERR_ARG_REP,
                                       mdoc->parse, argv->line,
                                       argv->pos, "Bd -compact");
                           n->norm->Bd.comp = 1;
                         break;                          break;
                 default:                  default:
                         abort();                          abort();
                         /* NOTREACHED */                          /* NOTREACHED */
                 }                  }
                   if (DISP__NONE == dt)
                           continue;
   
                 /* Check whether we have duplicates. */                  if (DISP__NONE == n->norm->Bd.type)
   
                 if (dup)  
                         mdoc_nmsg(mdoc, n, MANDOCERR_ARGVREP);  
   
                 /* Make our auxiliary assignments. */  
   
                 if (offs && ! dup)  
                         n->norm->Bd.offs = offs;  
                 if (comp && ! dup)  
                         n->norm->Bd.comp = comp;  
   
                 /* Check whether a type has already been assigned. */  
   
                 if (DISP__NONE != dt && n->norm->Bd.type != DISP__NONE)  
                         mdoc_nmsg(mdoc, n, MANDOCERR_DISPREP);  
   
                 /* Make our type assignment. */  
   
                 if (DISP__NONE != dt && n->norm->Bd.type == DISP__NONE)  
                         n->norm->Bd.type = dt;                          n->norm->Bd.type = dt;
                   else
                           mandoc_msg(MANDOCERR_BD_REP,
                               mdoc->parse, n->line, n->pos,
                               mdoc_argnames[argv->arg]);
         }          }
   
         if (DISP__NONE == n->norm->Bd.type) {          if (DISP__NONE == n->norm->Bd.type) {
Line 998  pre_dd(PRE_ARGS)
Line 984  pre_dd(PRE_ARGS)
 static int  static int
 post_bf(POST_ARGS)  post_bf(POST_ARGS)
 {  {
         struct mdoc_node *np;          struct mdoc_node *np, *nch;
         enum mdocargt     arg;          enum mdocargt     arg;
   
         /*          /*
Line 1025  post_bf(POST_ARGS)
Line 1011  post_bf(POST_ARGS)
         assert(MDOC_BLOCK == np->parent->type);          assert(MDOC_BLOCK == np->parent->type);
         assert(MDOC_Bf == np->parent->tok);          assert(MDOC_Bf == np->parent->tok);
   
         /*          /* Check the number of arguments. */
          * Cannot have both argument and parameter.  
          * If neither is specified, let it through with a warning.  
          */  
   
         if (np->parent->args && np->child) {          nch = np->child;
                 mdoc_nmsg(mdoc, np, MANDOCERR_SYNTARGVCOUNT);          if (NULL == np->parent->args) {
                 return(0);                  if (NULL == nch) {
         } else if (NULL == np->parent->args && NULL == np->child) {                          mdoc_nmsg(mdoc, np, MANDOCERR_BF_NOFONT);
                 mdoc_nmsg(mdoc, np, MANDOCERR_FONTTYPE);                          return(1);
                 return(1);                  }
                   nch = nch->next;
         }          }
           if (NULL != nch)
                   mandoc_vmsg(MANDOCERR_ARG_EXCESS, mdoc->parse,
                       nch->line, nch->pos, "Bf ... %s", nch->string);
   
         /* Extract argument into data. */          /* Extract argument into data. */
   
Line 1062  post_bf(POST_ARGS)
Line 1049  post_bf(POST_ARGS)
         else if (0 == strcmp(np->child->string, "Sy"))          else if (0 == strcmp(np->child->string, "Sy"))
                 np->norm->Bf.font = FONT_Sy;                  np->norm->Bf.font = FONT_Sy;
         else          else
                 mdoc_nmsg(mdoc, np, MANDOCERR_FONTTYPE);                  mandoc_vmsg(MANDOCERR_BF_BADFONT, mdoc->parse,
                       np->child->line, np->child->pos,
                       "Bf %s", np->child->string);
   
         return(1);          return(1);
 }  }
Line 1095  post_lb(POST_ARGS)
Line 1084  post_lb(POST_ARGS)
 static int  static int
 post_eoln(POST_ARGS)  post_eoln(POST_ARGS)
 {  {
           const struct mdoc_node *n;
   
         if (mdoc->last->child)          n = mdoc->last;
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_ARGSLOST);          if (n->child)
                   mandoc_vmsg(MANDOCERR_ARG_SKIP,
                       mdoc->parse, n->line, n->pos,
                       "%s %s", mdoc_macronames[n->tok],
                       n->child->string);
         return(1);          return(1);
 }  }
   
Line 1225  post_at(POST_ARGS)
Line 1219  post_at(POST_ARGS)
   
         assert(MDOC_TEXT == n->type);          assert(MDOC_TEXT == n->type);
         if (NULL == (std_att = mdoc_a2att(n->string))) {          if (NULL == (std_att = mdoc_a2att(n->string))) {
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_BADATT);                  mandoc_msg(MANDOCERR_AT_BAD, mdoc->parse,
                       n->line, n->pos, n->string);
                 mandoc_asprintf(&att, "AT&T UNIX %s", n->string);                  mandoc_asprintf(&att, "AT&T UNIX %s", n->string);
         } else          } else
                 att = mandoc_strdup(std_att);                  att = mandoc_strdup(std_att);
Line 1311  post_it(POST_ARGS)
Line 1306  post_it(POST_ARGS)
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case LIST_item:          case LIST_item:
                 if (NULL != nit->head->child)                  if (NULL != nit->head->child)
                         mdoc_nmsg(mdoc, nit, MANDOCERR_ARGSLOST);                          mandoc_vmsg(MANDOCERR_ARG_SKIP,
                               mdoc->parse, nit->line, nit->pos,
                               "It %s", nit->head->child->string);
                 break;                  break;
         case LIST_column:          case LIST_column:
                 cols = (int)nbl->norm->Bl.ncols;                  cols = (int)nbl->norm->Bl.ncols;
Line 1426  post_bl_block_width(POST_ARGS)
Line 1423  post_bl_block_width(POST_ARGS)
                 width = 6;                  width = 6;
         else if (MDOC_MAX == (tok = mdoc_hash_find(n->norm->Bl.width)))          else if (MDOC_MAX == (tok = mdoc_hash_find(n->norm->Bl.width)))
                 return(1);                  return(1);
         else if (0 == (width = macro2len(tok)))  {          else
                 mdoc_nmsg(mdoc, n, MANDOCERR_BADWIDTH);                  width = macro2len(tok);
                 return(1);  
         }  
   
         /* The value already exists: free and reallocate it. */          /* The value already exists: free and reallocate it. */
   
Line 1660  post_bl(POST_ARGS)
Line 1655  post_bl(POST_ARGS)
 static int  static int
 ebool(struct mdoc *mdoc)  ebool(struct mdoc *mdoc)
 {  {
           struct mdoc_node        *nch;
           enum mdoct               tok;
   
         if (NULL == mdoc->last->child) {          tok = mdoc->last->tok;
                 if (MDOC_Sm == mdoc->last->tok)          nch = mdoc->last->child;
   
           if (NULL == nch) {
                   if (MDOC_Sm == tok)
                         mdoc->flags ^= MDOC_SMOFF;                          mdoc->flags ^= MDOC_SMOFF;
                 return(1);                  return(1);
         }          }
   
         check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_LT, 2);          check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_LT, 2);
   
         assert(MDOC_TEXT == mdoc->last->child->type);          assert(MDOC_TEXT == nch->type);
   
         if (0 == strcmp(mdoc->last->child->string, "on")) {          if (0 == strcmp(nch->string, "on")) {
                 if (MDOC_Sm == mdoc->last->tok)                  if (MDOC_Sm == tok)
                         mdoc->flags &= ~MDOC_SMOFF;                          mdoc->flags &= ~MDOC_SMOFF;
                 return(1);                  return(1);
         }          }
         if (0 == strcmp(mdoc->last->child->string, "off")) {          if (0 == strcmp(nch->string, "off")) {
                 if (MDOC_Sm == mdoc->last->tok)                  if (MDOC_Sm == tok)
                         mdoc->flags |= MDOC_SMOFF;                          mdoc->flags |= MDOC_SMOFF;
                 return(1);                  return(1);
         }          }
   
         mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_BADBOOL);          mandoc_vmsg(MANDOCERR_SM_BAD,
         return(1);              mdoc->parse, nch->line, nch->pos,
               "%s %s", mdoc_macronames[tok], nch->string);
           return(mdoc_node_relink(mdoc, nch));
 }  }
   
 static int  static int
Line 1719  post_root(POST_ARGS)
Line 1721  post_root(POST_ARGS)
 static int  static int
 post_st(POST_ARGS)  post_st(POST_ARGS)
 {  {
         struct mdoc_node         *ch;          struct mdoc_node         *n, *nch;
         const char               *p;          const char               *p;
   
         if (NULL == (ch = mdoc->last->child)) {          n = mdoc->last;
           nch = n->child;
   
           if (NULL == nch) {
                 mandoc_msg(MANDOCERR_MACRO_EMPTY, mdoc->parse,                  mandoc_msg(MANDOCERR_MACRO_EMPTY, mdoc->parse,
                     mdoc->last->line, mdoc->last->pos,                      n->line, n->pos, mdoc_macronames[n->tok]);
                     mdoc_macronames[mdoc->last->tok]);                  mdoc_node_delete(mdoc, n);
                 mdoc_node_delete(mdoc, mdoc->last);  
                 return(1);                  return(1);
         }          }
   
         assert(MDOC_TEXT == ch->type);          assert(MDOC_TEXT == nch->type);
   
         if (NULL == (p = mdoc_a2st(ch->string))) {          if (NULL == (p = mdoc_a2st(nch->string))) {
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_BADSTANDARD);                  mandoc_msg(MANDOCERR_ST_BAD, mdoc->parse,
                 mdoc_node_delete(mdoc, mdoc->last);                      nch->line, nch->pos, nch->string);
                   mdoc_node_delete(mdoc, n);
         } else {          } else {
                 free(ch->string);                  free(nch->string);
                 ch->string = mandoc_strdup(p);                  nch->string = mandoc_strdup(p);
         }          }
   
         return(1);          return(1);
Legend:
Removed from v.1.225  
changed lines
  Added in v.1.229
CVSweb