[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.211 and 1.226

version 1.211, 2014/04/20 19:40:13 version 1.226, 2014/07/04 16:12:08
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 98  static int  post_bx(POST_ARGS);
Line 97  static int  post_bx(POST_ARGS);
 static  int      post_defaults(POST_ARGS);  static  int      post_defaults(POST_ARGS);
 static  int      post_dd(POST_ARGS);  static  int      post_dd(POST_ARGS);
 static  int      post_dt(POST_ARGS);  static  int      post_dt(POST_ARGS);
   static  int      post_en(POST_ARGS);
   static  int      post_es(POST_ARGS);
 static  int      post_eoln(POST_ARGS);  static  int      post_eoln(POST_ARGS);
 static  int      post_hyph(POST_ARGS);  static  int      post_hyph(POST_ARGS);
 static  int      post_ignpar(POST_ARGS);  static  int      post_ignpar(POST_ARGS);
Line 125  static int  pre_display(PRE_ARGS);
Line 126  static int  pre_display(PRE_ARGS);
 static  int      pre_dt(PRE_ARGS);  static  int      pre_dt(PRE_ARGS);
 static  int      pre_it(PRE_ARGS);  static  int      pre_it(PRE_ARGS);
 static  int      pre_literal(PRE_ARGS);  static  int      pre_literal(PRE_ARGS);
   static  int      pre_obsolete(PRE_ARGS);
 static  int      pre_os(PRE_ARGS);  static  int      pre_os(PRE_ARGS);
 static  int      pre_par(PRE_ARGS);  static  int      pre_par(PRE_ARGS);
 static  int      pre_sh(PRE_ARGS);  static  int      pre_sh(PRE_ARGS);
Line 134  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 145  static v_post  posts_d1[] = { bwarn_ge1, post_hyph, NU
Line 147  static v_post  posts_d1[] = { bwarn_ge1, post_hyph, NU
 static  v_post   posts_dd[] = { post_dd, post_prol, NULL };  static  v_post   posts_dd[] = { post_dd, post_prol, NULL };
 static  v_post   posts_dl[] = { post_literal, bwarn_ge1, NULL };  static  v_post   posts_dl[] = { post_literal, bwarn_ge1, NULL };
 static  v_post   posts_dt[] = { post_dt, post_prol, NULL };  static  v_post   posts_dt[] = { post_dt, post_prol, NULL };
   static  v_post   posts_en[] = { post_en, NULL };
   static  v_post   posts_es[] = { post_es, NULL };
 static  v_post   posts_fo[] = { hwarn_eq1, bwarn_ge1, NULL };  static  v_post   posts_fo[] = { hwarn_eq1, bwarn_ge1, NULL };
 static  v_post   posts_hyph[] = { post_hyph, NULL };  static  v_post   posts_hyph[] = { post_hyph, NULL };
 static  v_post   posts_hyphtext[] = { ewarn_ge1, post_hyph, NULL };  static  v_post   posts_hyphtext[] = { ewarn_ge1, post_hyph, NULL };
Line 173  static v_pre  pres_dl[] = { pre_literal, pre_display, 
Line 177  static v_pre  pres_dl[] = { pre_literal, pre_display, 
 static  v_pre    pres_dd[] = { pre_dd, NULL };  static  v_pre    pres_dd[] = { pre_dd, NULL };
 static  v_pre    pres_dt[] = { pre_dt, NULL };  static  v_pre    pres_dt[] = { pre_dt, NULL };
 static  v_pre    pres_it[] = { pre_it, pre_par, NULL };  static  v_pre    pres_it[] = { pre_it, pre_par, NULL };
   static  v_pre    pres_obsolete[] = { pre_obsolete, NULL };
 static  v_pre    pres_os[] = { pre_os, NULL };  static  v_pre    pres_os[] = { pre_os, NULL };
 static  v_pre    pres_pp[] = { pre_par, NULL };  static  v_pre    pres_pp[] = { pre_par, NULL };
 static  v_pre    pres_sh[] = { pre_sh, NULL };  static  v_pre    pres_sh[] = { pre_sh, NULL };
Line 214  static const struct valids mdoc_valids[MDOC_MAX] = {
Line 219  static const struct valids mdoc_valids[MDOC_MAX] = {
         { NULL, posts_nd },                     /* Nd */          { NULL, posts_nd },                     /* Nd */
         { NULL, posts_nm },                     /* Nm */          { NULL, posts_nm },                     /* Nm */
         { NULL, NULL },                         /* Op */          { NULL, NULL },                         /* Op */
         { NULL, NULL },                         /* Ot */          { pres_obsolete, NULL },                /* Ot */
         { NULL, posts_defaults },               /* Pa */          { NULL, posts_defaults },               /* Pa */
         { pres_std, posts_std },                /* Rv */          { pres_std, posts_std },                /* Rv */
         { NULL, posts_st },                     /* St */          { NULL, posts_st },                     /* St */
Line 284  static const struct valids mdoc_valids[MDOC_MAX] = {
Line 289  static const struct valids mdoc_valids[MDOC_MAX] = {
         { NULL, NULL },                         /* Ek */          { NULL, NULL },                         /* Ek */
         { NULL, posts_eoln },                   /* Bt */          { NULL, posts_eoln },                   /* Bt */
         { NULL, NULL },                         /* Hf */          { NULL, NULL },                         /* Hf */
         { NULL, NULL },                         /* Fr */          { pres_obsolete, NULL },                /* Fr */
         { NULL, posts_eoln },                   /* Ud */          { NULL, posts_eoln },                   /* Ud */
         { NULL, posts_lb },                     /* Lb */          { NULL, posts_lb },                     /* Lb */
         { pres_pp, posts_pp },                  /* Lp */          { pres_pp, posts_pp },                  /* Lp */
Line 294  static const struct valids mdoc_valids[MDOC_MAX] = {
Line 299  static const struct valids mdoc_valids[MDOC_MAX] = {
         { NULL, NULL },                         /* Bro */          { NULL, NULL },                         /* Bro */
         { NULL, NULL },                         /* Brc */          { NULL, NULL },                         /* Brc */
         { NULL, posts_text },                   /* %C */          { NULL, posts_text },                   /* %C */
         { NULL, NULL },                         /* Es */          { pres_obsolete, posts_es },            /* Es */
         { NULL, NULL },                         /* En */          { pres_obsolete, posts_en },            /* En */
         { NULL, NULL },                         /* Dx */          { NULL, NULL },                         /* Dx */
         { NULL, posts_text },                   /* %Q */          { NULL, posts_text },                   /* %Q */
         { NULL, posts_pp },                     /* br */          { NULL, posts_pp },                     /* br */
Line 509  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 585  pre_display(PRE_ARGS)
Line 584  pre_display(PRE_ARGS)
                                 break;                                  break;
   
         if (node)          if (node)
                 mdoc_nmsg(mdoc, n, MANDOCERR_NESTEDDISP);                  mandoc_vmsg(MANDOCERR_BD_NEST,
                       mdoc->parse, n->line, n->pos,
                       "%s in Bd", mdoc_macronames[n->tok]);
   
         return(1);          return(1);
 }  }
Line 719  pre_bl(PRE_ARGS)
Line 720  pre_bl(PRE_ARGS)
                         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)
                                 mdoc_nmsg(mdoc, n, MANDOCERR_LISTFIRST);                                  mandoc_msg(MANDOCERR_BL_LATETYPE,
                                       mdoc->parse, n->line, n->pos,
                                       mdoc_argnames[n->args->argv[0].arg]);
                 continue;                  continue;
         }          }
   
         /* Allow lists to default to LIST_item. */          /* Allow lists to default to LIST_item. */
   
         if (LIST__NONE == n->norm->Bl.type) {          if (LIST__NONE == n->norm->Bl.type) {
                 mdoc_nmsg(mdoc, n, MANDOCERR_LISTTYPE);                  mdoc_nmsg(mdoc, n, MANDOCERR_BL_NOTYPE);
                 n->norm->Bl.type = LIST_item;                  n->norm->Bl.type = LIST_item;
         }          }
   
Line 741  pre_bl(PRE_ARGS)
Line 743  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_NOWIDTHARG);                          mdoc_nmsg(mdoc, n, MANDOCERR_BL_WIDTH);
                 break;                  break;
         case LIST_column:          case LIST_column:
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
Line 861  pre_bd(PRE_ARGS)
Line 863  pre_bd(PRE_ARGS)
         }          }
   
         if (DISP__NONE == n->norm->Bd.type) {          if (DISP__NONE == n->norm->Bd.type) {
                 mdoc_nmsg(mdoc, n, MANDOCERR_DISPTYPE);                  mdoc_nmsg(mdoc, n, MANDOCERR_BD_NOTYPE);
                 n->norm->Bd.type = DISP_ragged;                  n->norm->Bd.type = DISP_ragged;
         }          }
   
Line 926  pre_std(PRE_ARGS)
Line 928  pre_std(PRE_ARGS)
                 if (MDOC_Std == n->args->argv[0].arg)                  if (MDOC_Std == n->args->argv[0].arg)
                         return(1);                          return(1);
   
         mdoc_nmsg(mdoc, n, MANDOCERR_NOARGV);          mandoc_msg(MANDOCERR_ARG_STD, mdoc->parse,
               n->line, n->pos, mdoc_macronames[n->tok]);
         return(1);          return(1);
 }  }
   
 static int  static int
   pre_obsolete(PRE_ARGS)
   {
   
           if (MDOC_ELEM == n->type || MDOC_BLOCK == n->type)
                   mandoc_msg(MANDOCERR_MACRO_OBS, mdoc->parse,
                       n->line, n->pos, mdoc_macronames[n->tok]);
           return(1);
   }
   
   static int
 pre_dt(PRE_ARGS)  pre_dt(PRE_ARGS)
 {  {
   
         if (NULL == mdoc->meta.date || mdoc->meta.os)          if (NULL == mdoc->meta.date || mdoc->meta.os)
                 mdoc_nmsg(mdoc, n, MANDOCERR_PROLOGOOO);                  mandoc_msg(MANDOCERR_PROLOG_ORDER, mdoc->parse,
                       n->line, n->pos, "Dt");
   
         if (mdoc->meta.title)          if (mdoc->meta.title)
                 mdoc_nmsg(mdoc, n, MANDOCERR_PROLOGREP);                  mandoc_msg(MANDOCERR_PROLOG_REP, mdoc->parse,
                       n->line, n->pos, "Dt");
   
         return(1);          return(1);
 }  }
Line 948  pre_os(PRE_ARGS)
Line 963  pre_os(PRE_ARGS)
 {  {
   
         if (NULL == mdoc->meta.title || NULL == mdoc->meta.date)          if (NULL == mdoc->meta.title || NULL == mdoc->meta.date)
                 mdoc_nmsg(mdoc, n, MANDOCERR_PROLOGOOO);                  mandoc_msg(MANDOCERR_PROLOG_ORDER, mdoc->parse,
                       n->line, n->pos, "Os");
   
         if (mdoc->meta.os)          if (mdoc->meta.os)
                 mdoc_nmsg(mdoc, n, MANDOCERR_PROLOGREP);                  mandoc_msg(MANDOCERR_PROLOG_REP, mdoc->parse,
                       n->line, n->pos, "Os");
   
         return(1);          return(1);
 }  }
Line 961  pre_dd(PRE_ARGS)
Line 978  pre_dd(PRE_ARGS)
 {  {
   
         if (mdoc->meta.title || mdoc->meta.os)          if (mdoc->meta.title || mdoc->meta.os)
                 mdoc_nmsg(mdoc, n, MANDOCERR_PROLOGOOO);                  mandoc_msg(MANDOCERR_PROLOG_ORDER, mdoc->parse,
                       n->line, n->pos, "Dd");
   
         if (mdoc->meta.date)          if (mdoc->meta.date)
                 mdoc_nmsg(mdoc, n, MANDOCERR_PROLOGREP);                  mandoc_msg(MANDOCERR_PROLOG_REP, mdoc->parse,
                       n->line, n->pos, "Dd");
   
         return(1);          return(1);
 }  }
Line 972  pre_dd(PRE_ARGS)
Line 991  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 999  post_bf(POST_ARGS)
Line 1018  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 1036  post_bf(POST_ARGS)
Line 1056  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 1044  post_bf(POST_ARGS)
Line 1066  post_bf(POST_ARGS)
 static int  static int
 post_lb(POST_ARGS)  post_lb(POST_ARGS)
 {  {
         const char      *p;          struct mdoc_node        *n;
         char            *buf;          const char              *stdlibname;
         size_t           sz;          char                    *libname;
   
         check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_EQ, 1);          check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_EQ, 1);
   
         assert(mdoc->last->child);          n = mdoc->last->child;
         assert(MDOC_TEXT == mdoc->last->child->type);  
   
         p = mdoc_a2lib(mdoc->last->child->string);          assert(n);
           assert(MDOC_TEXT == n->type);
   
         /* If lookup ok, replace with table value. */          if (NULL == (stdlibname = mdoc_a2lib(n->string)))
                   mandoc_asprintf(&libname,
                       "library \\(lq%s\\(rq", n->string);
           else
                   libname = mandoc_strdup(stdlibname);
   
         if (p) {          free(n->string);
                 free(mdoc->last->child->string);          n->string = libname;
                 mdoc->last->child->string = mandoc_strdup(p);  
                 return(1);  
         }  
   
         /* If not, use "library ``xxxx''. */  
   
         sz = strlen(mdoc->last->child->string) + 2 +  
              strlen("\\(lqlibrary\\(rq");  
         buf = mandoc_malloc(sz);  
         snprintf(buf, sz, "library \\(lq%s\\(rq",  
             mdoc->last->child->string);  
         free(mdoc->last->child->string);  
         mdoc->last->child->string = buf;  
         return(1);          return(1);
 }  }
   
 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 1102  post_vt(POST_ARGS)
Line 1120  post_vt(POST_ARGS)
   
         for (n = mdoc->last->child; n; n = n->next)          for (n = mdoc->last->child; n; n = n->next)
                 if (MDOC_TEXT != n->type)                  if (MDOC_TEXT != n->type)
                         mdoc_nmsg(mdoc, n, MANDOCERR_CHILD);                          mandoc_msg(MANDOCERR_VT_CHILD, mdoc->parse,
                               n->line, n->pos, mdoc_macronames[n->tok]);
   
         return(1);          return(1);
 }  }
Line 1192  post_defaults(POST_ARGS)
Line 1211  post_defaults(POST_ARGS)
 static int  static int
 post_at(POST_ARGS)  post_at(POST_ARGS)
 {  {
         const char       *p, *q;          struct mdoc_node        *n;
         char             *buf;          const char              *std_att;
         size_t            sz;          char                    *att;
   
         /*          /*
          * If we have a child, look it up in the standard keys.  If a           * If we have a child, look it up in the standard keys.  If a
Line 1202  post_at(POST_ARGS)
Line 1221  post_at(POST_ARGS)
          * prefix "AT&T UNIX " to the existing data.           * prefix "AT&T UNIX " to the existing data.
          */           */
   
         if (NULL == mdoc->last->child)          if (NULL == (n = mdoc->last->child))
                 return(1);                  return(1);
   
         assert(MDOC_TEXT == mdoc->last->child->type);          assert(MDOC_TEXT == n->type);
         p = mdoc_a2att(mdoc->last->child->string);          if (NULL == (std_att = mdoc_a2att(n->string))) {
   
         if (p) {  
                 free(mdoc->last->child->string);  
                 mdoc->last->child->string = mandoc_strdup(p);  
         } else {  
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_BADATT);                  mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_BADATT);
                 p = "AT&T UNIX ";                  mandoc_asprintf(&att, "AT&T UNIX %s", n->string);
                 q = mdoc->last->child->string;          } else
                 sz = strlen(p) + strlen(q) + 1;                  att = mandoc_strdup(std_att);
                 buf = mandoc_malloc(sz);  
                 strlcpy(buf, p, sz);  
                 strlcat(buf, q, sz);  
                 free(mdoc->last->child->string);  
                 mdoc->last->child->string = buf;  
         }  
   
           free(n->string);
           n->string = att;
         return(1);          return(1);
 }  }
   
Line 1242  post_an(POST_ARGS)
Line 1252  post_an(POST_ARGS)
 }  }
   
 static int  static int
   post_en(POST_ARGS)
   {
   
           if (MDOC_BLOCK == mdoc->last->type)
                   mdoc->last->norm->Es = mdoc->last_es;
           return(1);
   }
   
   static int
   post_es(POST_ARGS)
   {
   
           mdoc->last_es = mdoc->last;
           return(1);
   }
   
   static int
 post_it(POST_ARGS)  post_it(POST_ARGS)
 {  {
         int               i, cols;          int               i, cols;
         enum mdoc_list    lt;          enum mdoc_list    lt;
         struct mdoc_node *n, *c;          struct mdoc_node *nbl, *nit, *nch;
         enum mandocerr    er;          enum mandocerr    er;
   
         if (MDOC_BLOCK != mdoc->last->type)          nit = mdoc->last;
           if (MDOC_BLOCK != nit->type)
                 return(1);                  return(1);
   
         n = mdoc->last->parent->parent;          nbl = nit->parent->parent;
         lt = n->norm->Bl.type;          lt = nbl->norm->Bl.type;
   
         if (LIST__NONE == lt) {  
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_LISTTYPE);  
                 return(1);  
         }  
   
         switch (lt) {          switch (lt) {
         case LIST_tag:          case LIST_tag:
                 if (mdoc->last->head->child)                  /* FALLTHROUGH */
                         break;  
                 /* FIXME: give this a dummy value. */  
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_NOARGS);  
                 break;  
         case LIST_hang:          case LIST_hang:
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case LIST_ohang:          case LIST_ohang:
Line 1274  post_it(POST_ARGS)
Line 1293  post_it(POST_ARGS)
         case LIST_inset:          case LIST_inset:
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case LIST_diag:          case LIST_diag:
                 if (NULL == mdoc->last->head->child)                  if (NULL == nit->head->child)
                         mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_NOARGS);                          mandoc_msg(MANDOCERR_IT_NOHEAD,
                               mdoc->parse, nit->line, nit->pos,
                               mdoc_argnames[nbl->args->argv[0].arg]);
                 break;                  break;
         case LIST_bullet:          case LIST_bullet:
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
Line 1284  post_it(POST_ARGS)
Line 1305  post_it(POST_ARGS)
         case LIST_enum:          case LIST_enum:
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case LIST_hyphen:          case LIST_hyphen:
                 if (NULL == mdoc->last->body->child)                  if (NULL == nit->body->child)
                         mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_NOBODY);                          mandoc_msg(MANDOCERR_IT_NOBODY,
                               mdoc->parse, nit->line, nit->pos,
                               mdoc_argnames[nbl->args->argv[0].arg]);
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case LIST_item:          case LIST_item:
                 if (mdoc->last->head->child)                  if (NULL != nit->head->child)
                         mdoc_nmsg(mdoc, mdoc->last, 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)n->norm->Bl.ncols;                  cols = (int)nbl->norm->Bl.ncols;
   
                 assert(NULL == mdoc->last->head->child);                  assert(NULL == nit->head->child);
   
                 if (NULL == mdoc->last->body->child)                  for (i = 0, nch = nit->child; nch; nch = nch->next)
                         mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_NOBODY);                          if (MDOC_BODY == nch->type)
   
                 for (i = 0, c = mdoc->last->child; c; c = c->next)  
                         if (MDOC_BODY == c->type)  
                                 i++;                                  i++;
   
                 if (i < cols)                  if (i < cols)
Line 1310  post_it(POST_ARGS)
Line 1332  post_it(POST_ARGS)
                 else                  else
                         er = MANDOCERR_SYNTARGCOUNT;                          er = MANDOCERR_SYNTARGCOUNT;
   
                 mandoc_vmsg(er, mdoc->parse,                  mandoc_vmsg(er, mdoc->parse, nit->line, nit->pos,
                     mdoc->last->line, mdoc->last->pos,  
                     "columns == %d (have %d)", cols, i);                      "columns == %d (have %d)", cols, i);
                 return(MANDOCERR_ARGCOUNT == er);                  return(MANDOCERR_ARGCOUNT == er);
         default:          default:
                 break;                  abort();
         }          }
   
         return(1);          return(1);
Line 1364  post_bl_block(POST_ARGS)
Line 1385  post_bl_block(POST_ARGS)
                                 continue;                                  continue;
                         }                          }
                         if (NULL == ni->next) {                          if (NULL == ni->next) {
                                 mdoc_nmsg(mdoc, nc, MANDOCERR_MOVEPAR);                                  mandoc_msg(MANDOCERR_PAR_MOVE,
                                       mdoc->parse, nc->line, nc->pos,
                                       mdoc_macronames[nc->tok]);
                                 if ( ! mdoc_node_relink(mdoc, nc))                                  if ( ! mdoc_node_relink(mdoc, nc))
                                         return(0);                                          return(0);
                         } else if (0 == n->norm->Bl.comp &&                          } else if (0 == n->norm->Bl.comp &&
                             LIST_column != n->norm->Bl.type) {                              LIST_column != n->norm->Bl.type) {
                                 mdoc_nmsg(mdoc, nc, MANDOCERR_IGNPAR);                                  mandoc_vmsg(MANDOCERR_PAR_SKIP,
                                       mdoc->parse, nc->line, nc->pos,
                                       "%s before It",
                                       mdoc_macronames[nc->tok]);
                                 mdoc_node_delete(mdoc, nc);                                  mdoc_node_delete(mdoc, nc);
                         } else                          } else
                                 break;                                  break;
Line 1478  post_bl_block_tag(POST_ARGS)
Line 1504  post_bl_block_tag(POST_ARGS)
         assert(n->args);          assert(n->args);
         i = (int)(n->args->argc)++;          i = (int)(n->args->argc)++;
   
         n->args->argv = mandoc_realloc(n->args->argv,          n->args->argv = mandoc_reallocarray(n->args->argv,
             n->args->argc * sizeof(struct mdoc_argv));              n->args->argc, sizeof(struct mdoc_argv));
   
         n->args->argv[i].arg = MDOC_Width;          n->args->argv[i].arg = MDOC_Width;
         n->args->argv[i].line = n->line;          n->args->argv[i].line = n->line;
Line 1539  post_bl_head(POST_ARGS)
Line 1565  post_bl_head(POST_ARGS)
          */           */
   
         np->args->argv[j].sz = (size_t)mdoc->last->nchild;          np->args->argv[j].sz = (size_t)mdoc->last->nchild;
         np->args->argv[j].value = mandoc_malloc(          np->args->argv[j].value = mandoc_reallocarray(NULL,
             (size_t)mdoc->last->nchild * sizeof(char *));              (size_t)mdoc->last->nchild, sizeof(char *));
   
         mdoc->last->norm->Bl.ncols = np->args->argv[j].sz;          mdoc->last->norm->Bl.ncols = np->args->argv[j].sz;
         mdoc->last->norm->Bl.cols = (void *)np->args->argv[j].value;          mdoc->last->norm->Bl.cols = (void *)np->args->argv[j].value;
Line 1585  post_bl(POST_ARGS)
Line 1611  post_bl(POST_ARGS)
                         continue;                          continue;
                 }                  }
   
                 mdoc_nmsg(mdoc, nchild, MANDOCERR_CHILD);                  mandoc_msg(MANDOCERR_BL_MOVE, mdoc->parse,
                       nchild->line, nchild->pos,
                       mdoc_macronames[nchild->tok]);
   
                 /*                  /*
                  * Move the node out of the Bl block.                   * Move the node out of the Bl block.
Line 1637  ebool(struct mdoc *mdoc)
Line 1665  ebool(struct mdoc *mdoc)
 {  {
   
         if (NULL == mdoc->last->child) {          if (NULL == mdoc->last->child) {
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_MACROEMPTY);                  if (MDOC_Sm == mdoc->last->tok)
                 mdoc_node_delete(mdoc, mdoc->last);                          mdoc->flags ^= MDOC_SMOFF;
                 return(1);                  return(1);
         }          }
         check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_EQ, 1);  
   
           check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_LT, 2);
   
         assert(MDOC_TEXT == mdoc->last->child->type);          assert(MDOC_TEXT == mdoc->last->child->type);
   
         if (0 == strcmp(mdoc->last->child->string, "on")) {          if (0 == strcmp(mdoc->last->child->string, "on")) {
Line 1663  ebool(struct mdoc *mdoc)
Line 1692  ebool(struct mdoc *mdoc)
 static int  static int
 post_root(POST_ARGS)  post_root(POST_ARGS)
 {  {
         int               erc;          int               ret;
         struct mdoc_node *n;          struct mdoc_node *n;
   
         erc = 0;          ret = 1;
   
         /* Check that we have a finished prologue. */          /* Check that we have a finished prologue. */
   
         if ( ! (MDOC_PBODY & mdoc->flags)) {          if ( ! (MDOC_PBODY & mdoc->flags)) {
                 erc++;                  ret = 0;
                 mdoc_nmsg(mdoc, mdoc->first, MANDOCERR_NODOCPROLOG);                  mdoc_nmsg(mdoc, mdoc->first, MANDOCERR_NODOCPROLOG);
         }          }
   
Line 1680  post_root(POST_ARGS)
Line 1709  post_root(POST_ARGS)
   
         /* Check that we begin with a proper `Sh'. */          /* Check that we begin with a proper `Sh'. */
   
         if (NULL == n->child) {          if (NULL == n->child)
                 erc++;                  mdoc_nmsg(mdoc, n, MANDOCERR_DOC_EMPTY);
                 mdoc_nmsg(mdoc, n, MANDOCERR_NODOCBODY);          else if (MDOC_Sh != n->child->tok)
         } else if (MDOC_BLOCK != n->child->type ||                  mandoc_msg(MANDOCERR_SEC_BEFORE, mdoc->parse,
             MDOC_Sh != n->child->tok) {                      n->child->line, n->child->pos,
                 erc++;                      mdoc_macronames[n->child->tok]);
                 /* Can this be lifted?  See rxdebug.1 for example. */  
                 mdoc_nmsg(mdoc, n, MANDOCERR_NODOCBODY);  
         }  
   
         return(erc ? 0 : 1);          return(ret);
 }  }
   
 static int  static int
Line 1700  post_st(POST_ARGS)
Line 1726  post_st(POST_ARGS)
         const char               *p;          const char               *p;
   
         if (NULL == (ch = mdoc->last->child)) {          if (NULL == (ch = mdoc->last->child)) {
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_MACROEMPTY);                  mandoc_msg(MANDOCERR_MACRO_EMPTY, mdoc->parse,
                       mdoc->last->line, mdoc->last->pos,
                       mdoc_macronames[mdoc->last->tok]);
                 mdoc_node_delete(mdoc, mdoc->last);                  mdoc_node_delete(mdoc, mdoc->last);
                 return(1);                  return(1);
         }          }
Line 1757  post_rs(POST_ARGS)
Line 1785  post_rs(POST_ARGS)
                 }                  }
   
                 next = nn->next;                  next = nn->next;
                 mdoc_nmsg(mdoc, nn, MANDOCERR_CHILD);                  mandoc_msg(MANDOCERR_RS_SKIP, mdoc->parse,
                       nn->line, nn->pos, mdoc_macronames[nn->tok]);
                 mdoc_node_delete(mdoc, nn);                  mdoc_node_delete(mdoc, nn);
         }          }
   
Line 1880  post_ns(POST_ARGS)
Line 1909  post_ns(POST_ARGS)
 {  {
   
         if (MDOC_LINE & mdoc->last->flags)          if (MDOC_LINE & mdoc->last->flags)
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_IGNNS);                  mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_NS_SKIP);
         return(1);          return(1);
 }  }
   
Line 1911  post_sh_body(POST_ARGS)
Line 1940  post_sh_body(POST_ARGS)
          */           */
   
         if (NULL == (n = mdoc->last->child)) {          if (NULL == (n = mdoc->last->child)) {
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_BADNAMESEC);                  mandoc_msg(MANDOCERR_NAMESEC_BAD, mdoc->parse,
                       mdoc->last->line, mdoc->last->pos, "empty");
                 return(1);                  return(1);
         }          }
   
Line 1920  post_sh_body(POST_ARGS)
Line 1950  post_sh_body(POST_ARGS)
                         continue;                          continue;
                 if (MDOC_TEXT == n->type)                  if (MDOC_TEXT == n->type)
                         continue;                          continue;
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_BADNAMESEC);                  mandoc_msg(MANDOCERR_NAMESEC_BAD, mdoc->parse,
                       n->line, n->pos, mdoc_macronames[n->tok]);
         }          }
   
         assert(n);          assert(n);
         if (MDOC_BLOCK == n->type && MDOC_Nd == n->tok)          if (MDOC_BLOCK == n->type && MDOC_Nd == n->tok)
                 return(1);                  return(1);
   
         mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_BADNAMESEC);          mandoc_msg(MANDOCERR_NAMESEC_BAD, mdoc->parse,
               n->line, n->pos, mdoc_macronames[n->tok]);
         return(1);          return(1);
 }  }
   
Line 1935  static int
Line 1967  static int
 post_sh_head(POST_ARGS)  post_sh_head(POST_ARGS)
 {  {
         struct mdoc_node *n;          struct mdoc_node *n;
           const char      *goodsec;
         char            *secname;          char            *secname;
         enum mdoc_sec    sec;          enum mdoc_sec    sec;
   
Line 1953  post_sh_head(POST_ARGS)
Line 1986  post_sh_head(POST_ARGS)
         /* The NAME should be first. */          /* The NAME should be first. */
   
         if (SEC_NAME != sec && SEC_NONE == mdoc->lastnamed)          if (SEC_NAME != sec && SEC_NONE == mdoc->lastnamed)
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_NAMESECFIRST);                  mandoc_msg(MANDOCERR_NAMESEC_FIRST, mdoc->parse,
                       mdoc->last->line, mdoc->last->pos, secname);
   
         /* The SYNOPSIS gets special attention in other areas. */          /* The SYNOPSIS gets special attention in other areas. */
   
Line 1996  post_sh_head(POST_ARGS)
Line 2030  post_sh_head(POST_ARGS)
          */           */
   
         if (sec == mdoc->lastnamed)          if (sec == mdoc->lastnamed)
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_SECREP);                  mandoc_msg(MANDOCERR_SEC_REP, mdoc->parse,
                       mdoc->last->line, mdoc->last->pos, secname);
   
         if (sec < mdoc->lastnamed)          if (sec < mdoc->lastnamed)
                 mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_SECOOO);                  mandoc_msg(MANDOCERR_SEC_ORDER, mdoc->parse,
                       mdoc->last->line, mdoc->last->pos, secname);
   
         /* Mark the last named section. */          /* Mark the last named section. */
   
Line 2009  post_sh_head(POST_ARGS)
Line 2045  post_sh_head(POST_ARGS)
   
         assert(mdoc->meta.msec);          assert(mdoc->meta.msec);
   
           goodsec = NULL;
         switch (sec) {          switch (sec) {
         case SEC_ERRORS:          case SEC_ERRORS:
                 if (*mdoc->meta.msec == '4')                  if (*mdoc->meta.msec == '4')
                         break;                          break;
                   goodsec = "2, 3, 4, 9";
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case SEC_RETURN_VALUES:          case SEC_RETURN_VALUES:
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
Line 2021  post_sh_head(POST_ARGS)
Line 2059  post_sh_head(POST_ARGS)
                         break;                          break;
                 if (*mdoc->meta.msec == '3')                  if (*mdoc->meta.msec == '3')
                         break;                          break;
                   if (NULL == goodsec)
                           goodsec = "2, 3, 9";
                 /* FALLTHROUGH */                  /* FALLTHROUGH */
         case SEC_CONTEXT:          case SEC_CONTEXT:
                 if (*mdoc->meta.msec == '9')                  if (*mdoc->meta.msec == '9')
                         break;                          break;
                 mandoc_msg(MANDOCERR_SECMSEC, mdoc->parse,                  if (NULL == goodsec)
                     mdoc->last->line, mdoc->last->pos, secname);                          goodsec = "9";
                   mandoc_vmsg(MANDOCERR_SEC_MSEC, mdoc->parse,
                       mdoc->last->line, mdoc->last->pos,
                       "%s for %s only", secname, goodsec);
                 break;                  break;
         default:          default:
                 break;                  break;
Line 2046  post_ignpar(POST_ARGS)
Line 2089  post_ignpar(POST_ARGS)
   
         if (NULL != (np = mdoc->last->child))          if (NULL != (np = mdoc->last->child))
                 if (MDOC_Pp == np->tok || MDOC_Lp == np->tok) {                  if (MDOC_Pp == np->tok || MDOC_Lp == np->tok) {
                         mdoc_nmsg(mdoc, np, MANDOCERR_IGNPAR);                          mandoc_vmsg(MANDOCERR_PAR_SKIP,
                               mdoc->parse, np->line, np->pos,
                               "%s after %s", mdoc_macronames[np->tok],
                               mdoc_macronames[mdoc->last->tok]);
                         mdoc_node_delete(mdoc, np);                          mdoc_node_delete(mdoc, np);
                 }                  }
   
         if (NULL != (np = mdoc->last->last))          if (NULL != (np = mdoc->last->last))
                 if (MDOC_Pp == np->tok || MDOC_Lp == np->tok) {                  if (MDOC_Pp == np->tok || MDOC_Lp == np->tok) {
                         mdoc_nmsg(mdoc, np, MANDOCERR_IGNPAR);                          mandoc_vmsg(MANDOCERR_PAR_SKIP, mdoc->parse,
                               np->line, np->pos, "%s at the end of %s",
                               mdoc_macronames[np->tok],
                               mdoc_macronames[mdoc->last->tok]);
                         mdoc_node_delete(mdoc, np);                          mdoc_node_delete(mdoc, np);
                 }                  }
   
Line 2084  pre_par(PRE_ARGS)
Line 2133  pre_par(PRE_ARGS)
         if (MDOC_It == n->tok && n->parent->norm->Bl.comp)          if (MDOC_It == n->tok && n->parent->norm->Bl.comp)
                 return(1);                  return(1);
   
         mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_IGNPAR);          mandoc_vmsg(MANDOCERR_PAR_SKIP, mdoc->parse,
               mdoc->last->line, mdoc->last->pos,
               "%s before %s", mdoc_macronames[mdoc->last->tok],
               mdoc_macronames[n->tok]);
         mdoc_node_delete(mdoc, mdoc->last);          mdoc_node_delete(mdoc, mdoc->last);
         return(1);          return(1);
 }  }
Line 2092  pre_par(PRE_ARGS)
Line 2144  pre_par(PRE_ARGS)
 static int  static int
 post_par(POST_ARGS)  post_par(POST_ARGS)
 {  {
           struct mdoc_node *np;
   
         if (MDOC_ELEM != mdoc->last->type &&          if (MDOC_ELEM != mdoc->last->type &&
             MDOC_BLOCK != mdoc->last->type)              MDOC_BLOCK != mdoc->last->type)
                 return(1);                  return(1);
   
         if (NULL == mdoc->last->prev) {          if (NULL == (np = mdoc->last->prev)) {
                 if (MDOC_Sh != mdoc->last->parent->tok &&                  np = mdoc->last->parent;
                     MDOC_Ss != mdoc->last->parent->tok)                  if (MDOC_Sh != np->tok && MDOC_Ss != np->tok)
                         return(1);                          return(1);
         } else {          } else {
                 if (MDOC_Pp != mdoc->last->prev->tok &&                  if (MDOC_Pp != np->tok && MDOC_Lp != np->tok &&
                     MDOC_Lp != mdoc->last->prev->tok &&  
                     (MDOC_br != mdoc->last->tok ||                      (MDOC_br != mdoc->last->tok ||
                      (MDOC_sp != mdoc->last->prev->tok &&                       (MDOC_sp != np->tok && MDOC_br != np->tok)))
                       MDOC_br != mdoc->last->prev->tok)))  
                         return(1);                          return(1);
         }          }
   
         mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_IGNPAR);          mandoc_vmsg(MANDOCERR_PAR_SKIP, mdoc->parse,
               mdoc->last->line, mdoc->last->pos,
               "%s after %s", mdoc_macronames[mdoc->last->tok],
               mdoc_macronames[np->tok]);
         mdoc_node_delete(mdoc, mdoc->last);          mdoc_node_delete(mdoc, mdoc->last);
         return(1);          return(1);
 }  }
Line 2191  post_dt(POST_ARGS)
Line 2245  post_dt(POST_ARGS)
   
         mdoc->meta.title = mdoc->meta.vol = mdoc->meta.arch = NULL;          mdoc->meta.title = mdoc->meta.vol = mdoc->meta.arch = NULL;
   
         /* First make all characters uppercase. */          /* First check that all characters are uppercase. */
   
         if (NULL != (nn = n->child))          if (NULL != (nn = n->child))
                 for (p = nn->string; *p; p++) {                  for (p = nn->string; *p; p++) {
                         if (toupper((unsigned char)*p) == *p)                          if (toupper((unsigned char)*p) == *p)
                                 continue;                                  continue;
                           mandoc_msg(MANDOCERR_TITLE_CASE,
                         /*                              mdoc->parse, nn->line,
                          * FIXME: don't be lazy: have this make all                              nn->pos + (p - nn->string),
                          * characters be uppercase and just warn once.                              nn->string);
                          */  
                         mdoc_nmsg(mdoc, nn, MANDOCERR_UPPERCASE);  
                         break;                          break;
                 }                  }
   
Line 2246  post_dt(POST_ARGS)
Line 2298  post_dt(POST_ARGS)
                 mdoc->meta.vol = mandoc_strdup(cp);                  mdoc->meta.vol = mandoc_strdup(cp);
                 mdoc->meta.msec = mandoc_strdup(nn->string);                  mdoc->meta.msec = mandoc_strdup(nn->string);
         } else {          } else {
                 mdoc_nmsg(mdoc, n, MANDOCERR_BADMSEC);                  mandoc_msg(MANDOCERR_MSEC_BAD, mdoc->parse,
                       nn->line, nn->pos, nn->string);
                 mdoc->meta.vol = mandoc_strdup(nn->string);                  mdoc->meta.vol = mandoc_strdup(nn->string);
                 mdoc->meta.msec = mandoc_strdup(nn->string);                  mdoc->meta.msec = mandoc_strdup(nn->string);
         }          }
Line 2268  post_dt(POST_ARGS)
Line 2321  post_dt(POST_ARGS)
         } else {          } else {
                 cp = mdoc_a2arch(nn->string);                  cp = mdoc_a2arch(nn->string);
                 if (NULL == cp) {                  if (NULL == cp) {
                         mdoc_nmsg(mdoc, nn, MANDOCERR_BADVOLARCH);                          mandoc_msg(MANDOCERR_ARCH_BAD, mdoc->parse,
                               nn->line, nn->pos, nn->string);
                         free(mdoc->meta.vol);                          free(mdoc->meta.vol);
                         mdoc->meta.vol = mandoc_strdup(nn->string);                          mdoc->meta.vol = mandoc_strdup(nn->string);
                 } else                  } else

Legend:
Removed from v.1.211  
changed lines
  Added in v.1.226

CVSweb