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

Diff for /mandoc/man_validate.c between version 1.14 and 1.19

version 1.14, 2009/06/22 13:09:17 version 1.19, 2009/08/19 09:14:50
Line 18 
Line 18 
   
 #include <assert.h>  #include <assert.h>
 #include <ctype.h>  #include <ctype.h>
   #include <errno.h>
   #include <limits.h>
 #include <stdarg.h>  #include <stdarg.h>
 #include <stdlib.h>  #include <stdlib.h>
   
 #include "libman.h"  #include "libman.h"
   #include "libmandoc.h"
   
 #define POSTARGS  struct man *m, const struct man_node *n  #define CHKARGS   struct man *m, const struct man_node *n
   
 typedef int     (*v_post)(POSTARGS);  typedef int     (*v_check)(CHKARGS);
   
 struct  man_valid {  struct  man_valid {
         v_post   *posts;          v_check  *pres;
           v_check  *posts;
 };  };
   
 static  int       check_eq0(POSTARGS);  static  int       check_bline(CHKARGS);
 static  int       check_ge1(POSTARGS);  static  int       check_eline(CHKARGS);
 static  int       check_ge2(POSTARGS);  static  int       check_eq0(CHKARGS);
 static  int       check_le1(POSTARGS);  static  int       check_eq1(CHKARGS);
 static  int       check_le2(POSTARGS);  static  int       check_ge2(CHKARGS);
 static  int       check_le5(POSTARGS);  static  int       check_le5(CHKARGS);
 static  int       check_text(POSTARGS);  static  int       check_par(CHKARGS);
 static  int       check_root(POSTARGS);  static  int       check_root(CHKARGS);
   static  int       check_sec(CHKARGS);
   static  int       check_sp(CHKARGS);
   static  int       check_text(CHKARGS);
   
 static  v_post    posts_le1[] = { check_le1, NULL };  static  v_check   posts_eq0[] = { check_eq0, NULL };
 static  v_post    posts_le2[] = { check_le2, NULL };  static  v_check   posts_ge2_le5[] = { check_ge2, check_le5, NULL };
 static  v_post    posts_ge1[] = { check_ge1, NULL };  static  v_check   posts_par[] = { check_par, NULL };
 static  v_post    posts_eq0[] = { check_eq0, NULL };  static  v_check   posts_sec[] = { check_sec, NULL };
 static  v_post    posts_ge2_le5[] = { check_ge2, check_le5, NULL };  static  v_check   posts_sp[] = { check_sp, NULL };
   static  v_check   pres_eline[] = { check_eline, NULL };
   static  v_check   pres_bline[] = { check_bline, NULL };
   
 static  const struct man_valid man_valids[MAN_MAX] = {  static  const struct man_valid man_valids[MAN_MAX] = {
         { posts_eq0 }, /* br */          { pres_bline, posts_eq0 }, /* br */
         { posts_ge2_le5 }, /* TH */          { pres_bline, posts_ge2_le5 }, /* TH */
         { posts_ge1 }, /* SH */          { pres_bline, posts_sec }, /* SH */
         { posts_ge1 }, /* SS */          { pres_bline, posts_sec }, /* SS */
         { NULL }, /* TP */          { pres_bline, posts_par }, /* TP */
         { posts_eq0 }, /* LP */          { pres_bline, posts_par }, /* LP */
         { posts_eq0 }, /* PP */          { pres_bline, posts_par }, /* PP */
         { posts_eq0 }, /* P */          { pres_bline, posts_par }, /* P */
         { posts_le2 }, /* IP */          { pres_bline, posts_par }, /* IP */
         { posts_le1 }, /* HP */          { pres_bline, posts_par }, /* HP */
         { NULL }, /* SM */          { pres_eline, NULL }, /* SM */
         { NULL }, /* SB */          { pres_eline, NULL }, /* SB */
         { NULL }, /* BI */          { NULL, NULL }, /* BI */
         { NULL }, /* IB */          { NULL, NULL }, /* IB */
         { NULL }, /* BR */          { NULL, NULL }, /* BR */
         { NULL }, /* RB */          { NULL, NULL }, /* RB */
         { NULL }, /* R */          { pres_eline, NULL }, /* R */
         { NULL }, /* B */          { pres_eline, NULL }, /* B */
         { NULL }, /* I */          { pres_eline, NULL }, /* I */
         { NULL }, /* IR */          { NULL, NULL }, /* IR */
         { NULL }, /* RI */          { NULL, NULL }, /* RI */
         { posts_eq0 }, /* na */          { pres_bline, posts_eq0 }, /* na */
         { NULL }, /* i */          { NULL, NULL }, /* i */
           { pres_bline, posts_sp }, /* sp */
           { pres_bline, posts_eq0 }, /* nf */
           { pres_bline, posts_eq0 }, /* fi */
           { NULL, NULL }, /* r */
           { NULL, NULL }, /* RE */
           { NULL, NULL }, /* RS */
 };  };
   
   
 int  int
   man_valid_pre(struct man *m, const struct man_node *n)
   {
           v_check         *cp;
   
           if (MAN_TEXT == n->type)
                   return(1);
           if (MAN_ROOT == n->type)
                   return(1);
   
           if (NULL == (cp = man_valids[n->tok].pres))
                   return(1);
           for ( ; *cp; cp++)
                   if ( ! (*cp)(m, n))
                           return(0);
           return(1);
   }
   
   
   int
 man_valid_post(struct man *m)  man_valid_post(struct man *m)
 {  {
         v_post          *cp;          v_check         *cp;
   
         if (MAN_VALID & m->last->flags)          if (MAN_VALID & m->last->flags)
                 return(1);                  return(1);
Line 102  man_valid_post(struct man *m)
Line 136  man_valid_post(struct man *m)
   
   
 static int  static int
 check_root(POSTARGS)  check_root(CHKARGS)
 {  {
   
           /* FIXME: closing out explicit scope! */
   
           /* XXX - make this into a warning? */
           if (MAN_BLINE & m->flags)
                   return(man_nerr(m, n, WEXITSCOPE));
           /* XXX - make this into a warning? */
           if (MAN_ELINE & m->flags)
                   return(man_nerr(m, n, WEXITSCOPE));
   
         if (NULL == m->first->child)          if (NULL == m->first->child)
                 return(man_nerr(m, n, WNODATA));                  return(man_nerr(m, n, WNODATA));
         if (NULL == m->meta.title)          if (NULL == m->meta.title)
Line 115  check_root(POSTARGS) 
Line 158  check_root(POSTARGS) 
   
   
 static int  static int
 check_text(POSTARGS)  check_text(CHKARGS)
 {  {
         const char      *p;          const char      *p;
         int              pos;          int              pos, c;
   
         assert(n->string);          assert(n->string);
   
         for (p = n->string, pos = n->pos + 1; *p; p++, pos++) {          for (p = n->string, pos = n->pos + 1; *p; p++, pos++) {
                 if ('\t' == *p || isprint((u_char)*p))                  if ('\\' == *p) {
                           c = mandoc_special(p);
                           if (c) {
                                   p += c - 1;
                                   pos += c - 1;
                                   continue;
                           }
                           if ( ! (MAN_IGN_ESCAPE & m->pflags))
                                   return(man_perr(m, n->line, pos, WESCAPE));
                           if ( ! man_pwarn(m, n->line, pos, WESCAPE))
                                   return(0);
                         continue;                          continue;
                   }
   
                   if ('\t' == *p || isprint((u_char)*p))
                           continue;
   
                 if (MAN_IGN_CHARS & m->pflags)                  if (MAN_IGN_CHARS & m->pflags)
                         return(man_pwarn(m, n->line, pos, WNPRINT));                          return(man_pwarn(m, n->line, pos, WNPRINT));
                 return(man_perr(m, n->line, pos, WNPRINT));                  return(man_perr(m, n->line, pos, WNPRINT));
Line 137  check_text(POSTARGS) 
Line 194  check_text(POSTARGS) 
   
 #define INEQ_DEFINE(x, ineq, name) \  #define INEQ_DEFINE(x, ineq, name) \
 static int \  static int \
 check_##name(POSTARGS) \  check_##name(CHKARGS) \
 { \  { \
         if (n->nchild ineq (x)) \          if (n->nchild ineq (x)) \
                 return(1); \                  return(1); \
Line 147  check_##name(POSTARGS) \
Line 204  check_##name(POSTARGS) \
 }  }
   
 INEQ_DEFINE(0, ==, eq0)  INEQ_DEFINE(0, ==, eq0)
 INEQ_DEFINE(1, >=, ge1)  INEQ_DEFINE(1, ==, eq1)
 INEQ_DEFINE(2, >=, ge2)  INEQ_DEFINE(2, >=, ge2)
 INEQ_DEFINE(1, <=, le1)  
 INEQ_DEFINE(2, <=, le2)  
 INEQ_DEFINE(5, <=, le5)  INEQ_DEFINE(5, <=, le5)
   
   
   static int
   check_sp(CHKARGS)
   {
           long             lval;
           char            *ep, *buf;
   
           if (NULL == n->child)
                   return(1);
           else if ( ! check_eq1(m, n))
                   return(0);
   
           assert(MAN_TEXT == n->child->type);
           buf = n->child->string;
           assert(buf);
   
           /* From OpenBSD's strtol(3). */
   
           errno = 0;
           lval = strtol(buf, &ep, 10);
           if (buf[0] == '\0' || *ep != '\0')
                   return(man_nerr(m, n->child, WNUMFMT));
   
           if ((errno == ERANGE && (lval == LONG_MAX || lval == LONG_MIN)) ||
                           (lval > INT_MAX || lval < 0))
                   return(man_nerr(m, n->child, WNUMFMT));
   
           return(1);
   }
   
   
   static int
   check_sec(CHKARGS)
   {
   
           if (MAN_BODY == n->type && 0 == n->nchild)
                   return(man_nwarn(m, n, WBODYARGS));
           if (MAN_HEAD == n->type && 0 == n->nchild)
                   return(man_nerr(m, n, WHEADARGS));
           return(1);
   }
   
   
   static int
   check_par(CHKARGS)
   {
   
           if (MAN_BODY == n->type)
                   switch (n->tok) {
                   case (MAN_IP):
                           /* FALLTHROUGH */
                   case (MAN_HP):
                           /* FALLTHROUGH */
                   case (MAN_TP):
                           /* Body-less lists are ok. */
                           break;
                   default:
                           if (n->nchild)
                                   break;
                           return(man_nwarn(m, n, WBODYARGS));
                   }
           if (MAN_HEAD == n->type)
                   switch (n->tok) {
                   case (MAN_PP):
                           /* FALLTHROUGH */
                   case (MAN_P):
                           /* FALLTHROUGH */
                   case (MAN_LP):
                           if (0 == n->nchild)
                                   break;
                           return(man_nwarn(m, n, WNHEADARGS));
                   default:
                           if (n->nchild)
                                   break;
                           return(man_nwarn(m, n, WHEADARGS));
                   }
   
           return(1);
   }
   
   
   static int
   check_eline(CHKARGS)
   {
   
           if (MAN_ELINE & m->flags)
                   return(man_nerr(m, n, WLNSCOPE));
           return(1);
   }
   
   
   static int
   check_bline(CHKARGS)
   {
   
           if (MAN_BLINE & m->flags)
                   return(man_nerr(m, n, WLNSCOPE));
           if (MAN_ELINE & m->flags)
                   return(man_nerr(m, n, WLNSCOPE));
           return(1);
   }
   
Legend:
Removed from v.1.14  
changed lines
  Added in v.1.19
CVSweb