]> git.cameronkatri.com Git - mandoc.git/blobdiff - mdoc_validate.c
git.ckatri.com / mandoc.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
First, use \(dq instead of \*q for double-quote. Second, use `Li' to
[mandoc.git] / mdoc_validate.c
diff --git a/mdoc_validate.c b/mdoc_validate.c
index c54411413fd6857bff717e1d2c6ce4a057fde2d5..4de6d29ae4e389156d169f821b16ad36b43f7e6d 100644 (file)
--- a/mdoc_validate.c
+++ b/mdoc_validate.c
@@ -1,6 +1,7 @@
-/*     $Id: mdoc_validate.c,v 1.145 2010/12/22 11:15:16 kristaps Exp $ */
+/*     $Id: mdoc_validate.c,v 1.174 2011/08/16 12:23:51 kristaps Exp $ */
 /*
 /*
- * Copyright (c) 2008, 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv>
+ * Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
+ * Copyright (c) 2010, 2011 Ingo Schwarze <schwarze@openbsd.org>
  *
  * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above
  *
  * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above
@@ -32,6 +33,7 @@
 #include <string.h>
 #include <time.h>
 
 #include <string.h>
 #include <time.h>
 
+#include "mdoc.h"
 #include "mandoc.h"
 #include "libmdoc.h"
 #include "libmandoc.h"
 #include "mandoc.h"
 #include "libmdoc.h"
 #include "libmandoc.h"
@@ -41,16 +43,6 @@
 #define        PRE_ARGS  struct mdoc *mdoc, struct mdoc_node *n
 #define        POST_ARGS struct mdoc *mdoc
 
 #define        PRE_ARGS  struct mdoc *mdoc, struct mdoc_node *n
 #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        DATESIZE  32
 
 #define        NUMSIZ    32
 #define        DATESIZE  32
 
@@ -63,7 +55,6 @@ enum  check_ineq {
 enum   check_lvl {
        CHECK_WARN,
        CHECK_ERROR,
 enum   check_lvl {
        CHECK_WARN,
        CHECK_ERROR,
-       CHECK_FATAL
 };
 
 typedef        int     (*v_pre)(PRE_ARGS);
 };
 
 typedef        int     (*v_pre)(PRE_ARGS);
@@ -81,23 +72,20 @@ static      void     check_text(struct mdoc *, int, int, char *);
 static void     check_argv(struct mdoc *, 
                        struct mdoc_node *, struct mdoc_argv *);
 static void     check_args(struct mdoc *, struct mdoc_node *);
 static void     check_argv(struct mdoc *, 
                        struct mdoc_node *, struct mdoc_argv *);
 static void     check_args(struct mdoc *, struct mdoc_node *);
-
-static int      concat(struct mdoc *, char *, 
-                       const struct mdoc_node *, size_t);
+static int      concat(char *, const struct mdoc_node *, size_t);
+static enum mdoc_sec   a2sec(const char *);
+static size_t          macro2len(enum mdoct);
 
 static int      ebool(POST_ARGS);
 static int      berr_ge1(POST_ARGS);
 static int      bwarn_ge1(POST_ARGS);
 
 static int      ebool(POST_ARGS);
 static int      berr_ge1(POST_ARGS);
 static int      bwarn_ge1(POST_ARGS);
-static int      eerr_eq0(POST_ARGS);
-static int      eerr_eq1(POST_ARGS);
-static int      eerr_ge1(POST_ARGS);
-static int      eerr_le1(POST_ARGS);
 static int      ewarn_eq0(POST_ARGS);
 static int      ewarn_eq0(POST_ARGS);
+static int      ewarn_eq1(POST_ARGS);
 static int      ewarn_ge1(POST_ARGS);
 static int      ewarn_ge1(POST_ARGS);
-static int      herr_eq0(POST_ARGS);
-static int      herr_ge1(POST_ARGS);
+static int      ewarn_le1(POST_ARGS);
 static int      hwarn_eq0(POST_ARGS);
 static int      hwarn_eq1(POST_ARGS);
 static int      hwarn_eq0(POST_ARGS);
 static int      hwarn_eq1(POST_ARGS);
+static int      hwarn_ge1(POST_ARGS);
 static int      hwarn_le1(POST_ARGS);
 
 static int      post_an(POST_ARGS);
 static int      hwarn_le1(POST_ARGS);
 
 static int      post_an(POST_ARGS);
@@ -108,6 +96,7 @@ static       int      post_bl_block(POST_ARGS);
 static int      post_bl_block_width(POST_ARGS);
 static int      post_bl_block_tag(POST_ARGS);
 static int      post_bl_head(POST_ARGS);
 static int      post_bl_block_width(POST_ARGS);
 static int      post_bl_block_tag(POST_ARGS);
 static int      post_bl_head(POST_ARGS);
+static int      post_bx(POST_ARGS);
 static int      post_dd(POST_ARGS);
 static int      post_dt(POST_ARGS);
 static int      post_defaults(POST_ARGS);
 static int      post_dd(POST_ARGS);
 static int      post_dt(POST_ARGS);
 static int      post_defaults(POST_ARGS);
@@ -116,6 +105,7 @@ static      int      post_eoln(POST_ARGS);
 static int      post_it(POST_ARGS);
 static int      post_lb(POST_ARGS);
 static int      post_nm(POST_ARGS);
 static int      post_it(POST_ARGS);
 static int      post_lb(POST_ARGS);
 static int      post_nm(POST_ARGS);
+static int      post_ns(POST_ARGS);
 static int      post_os(POST_ARGS);
 static int      post_ignpar(POST_ARGS);
 static int      post_prol(POST_ARGS);
 static int      post_os(POST_ARGS);
 static int      post_ignpar(POST_ARGS);
 static int      post_prol(POST_ARGS);
@@ -147,30 +137,31 @@ 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_bk[] = { hwarn_eq0, bwarn_ge1, NULL };
 static v_post   posts_bl[] = { bwarn_ge1, post_bl, NULL };
 static v_post   posts_bf[] = { hwarn_le1, post_bf, 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_bool[] = { eerr_eq1, ebool, NULL };
+static v_post   posts_bx[] = { post_bx, NULL };
+static v_post   posts_bool[] = { ebool, NULL };
 static v_post   posts_eoln[] = { post_eoln, NULL };
 static v_post   posts_defaults[] = { post_defaults, NULL };
 static v_post   posts_eoln[] = { post_eoln, NULL };
 static v_post   posts_defaults[] = { post_defaults, NULL };
-static v_post   posts_dd[] = { ewarn_ge1, post_dd, post_prol, NULL };
-static v_post   posts_dl[] = { post_literal, bwarn_ge1, herr_eq0, 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_dt[] = { post_dt, post_prol, NULL };
 static v_post   posts_fo[] = { hwarn_eq1, bwarn_ge1, NULL };
 static v_post   posts_it[] = { post_it, NULL };
 static v_post   posts_dt[] = { post_dt, post_prol, NULL };
 static v_post   posts_fo[] = { hwarn_eq1, bwarn_ge1, NULL };
 static v_post   posts_it[] = { post_it, NULL };
-static v_post   posts_lb[] = { eerr_eq1, post_lb, NULL };
+static v_post   posts_lb[] = { post_lb, NULL };
 static v_post   posts_nd[] = { berr_ge1, NULL };
 static v_post   posts_nm[] = { post_nm, NULL };
 static v_post   posts_notext[] = { ewarn_eq0, NULL };
 static v_post   posts_nd[] = { berr_ge1, NULL };
 static v_post   posts_nm[] = { post_nm, NULL };
 static v_post   posts_notext[] = { ewarn_eq0, NULL };
+static v_post   posts_ns[] = { post_ns, NULL };
 static v_post   posts_os[] = { post_os, post_prol, NULL };
 static v_post   posts_os[] = { post_os, post_prol, NULL };
-static v_post   posts_rs[] = { berr_ge1, herr_eq0, post_rs, NULL };
-static v_post   posts_sh[] = { post_ignpar, herr_ge1, bwarn_ge1, post_sh, NULL };
-static v_post   posts_sp[] = { eerr_le1, NULL };
-static v_post   posts_ss[] = { post_ignpar, herr_ge1, bwarn_ge1, NULL };
-static v_post   posts_st[] = { eerr_eq1, post_st, NULL };
+static v_post   posts_rs[] = { post_rs, NULL };
+static v_post   posts_sh[] = { post_ignpar, hwarn_ge1, post_sh, NULL };
+static v_post   posts_sp[] = { ewarn_le1, NULL };
+static v_post   posts_ss[] = { post_ignpar, hwarn_ge1, NULL };
+static v_post   posts_st[] = { post_st, NULL };
 static v_post   posts_std[] = { post_std, NULL };
 static v_post   posts_std[] = { post_std, NULL };
-static v_post   posts_text[] = { eerr_ge1, NULL };
-static v_post   posts_text1[] = { eerr_eq1, NULL };
+static v_post   posts_text[] = { ewarn_ge1, NULL };
+static v_post   posts_text1[] = { ewarn_eq1, NULL };
 static v_post   posts_vt[] = { post_vt, NULL };
 static v_post   posts_vt[] = { post_vt, NULL };
-static v_post   posts_wline[] = { bwarn_ge1, herr_eq0, NULL };
-static v_post   posts_wtext[] = { ewarn_ge1, NULL };
+static v_post   posts_wline[] = { bwarn_ge1, NULL };
 static v_pre    pres_an[] = { pre_an, NULL };
 static v_pre    pres_bd[] = { pre_display, pre_bd, pre_literal, pre_par, NULL };
 static v_pre    pres_bl[] = { pre_bl, pre_par, NULL };
 static v_pre    pres_an[] = { pre_an, NULL };
 static v_pre    pres_bd[] = { pre_display, pre_bd, pre_literal, pre_par, NULL };
 static v_pre    pres_bl[] = { pre_bl, pre_par, NULL };
@@ -187,7 +178,7 @@ static      v_pre    pres_sh[] = { pre_sh, NULL };
 static v_pre    pres_ss[] = { pre_ss, NULL };
 static v_pre    pres_std[] = { pre_std, NULL };
 
 static v_pre    pres_ss[] = { pre_ss, NULL };
 static v_pre    pres_std[] = { pre_std, NULL };
 
-const  struct valids mdoc_valids[MDOC_MAX] = {
+static const struct valids mdoc_valids[MDOC_MAX] = {
        { NULL, NULL },                         /* Ap */
        { pres_dd, posts_dd },                  /* Dd */
        { pres_dt, posts_dt },                  /* Dt */
        { NULL, NULL },                         /* Ap */
        { pres_dd, posts_dd },                  /* Dd */
        { pres_dt, posts_dt },                  /* Dt */
@@ -202,21 +193,21 @@ const     struct valids mdoc_valids[MDOC_MAX] = {
        { pres_bl, posts_bl },                  /* Bl */ 
        { NULL, NULL },                         /* El */
        { pres_it, posts_it },                  /* It */
        { pres_bl, posts_bl },                  /* Bl */ 
        { NULL, NULL },                         /* El */
        { pres_it, posts_it },                  /* It */
-       { NULL, posts_text },                   /* Ad */ 
+       { NULL, NULL },                         /* Ad */ 
        { pres_an, posts_an },                  /* An */ 
        { NULL, posts_defaults },               /* Ar */
        { pres_an, posts_an },                  /* An */ 
        { NULL, posts_defaults },               /* Ar */
-       { NULL, posts_text },                   /* Cd */ 
+       { NULL, NULL },                         /* Cd */ 
        { NULL, NULL },                         /* Cm */
        { NULL, NULL },                         /* Dv */ 
        { NULL, NULL },                         /* Cm */
        { NULL, NULL },                         /* Dv */ 
-       { pres_er, posts_text },                /* Er */ 
+       { pres_er, NULL },                      /* Er */ 
        { NULL, NULL },                         /* Ev */ 
        { pres_std, posts_std },                /* Ex */ 
        { NULL, NULL },                         /* Fa */ 
        { NULL, NULL },                         /* Ev */ 
        { pres_std, posts_std },                /* Ex */ 
        { NULL, NULL },                         /* Fa */ 
-       { pres_fd, posts_wtext },               /* Fd */
+       { pres_fd, posts_text },                /* Fd */
        { NULL, NULL },                         /* Fl */
        { NULL, NULL },                         /* Fl */
-       { NULL, posts_text },                   /* Fn */ 
-       { NULL, posts_wtext },                  /* Ft */ 
-       { NULL, posts_text },                   /* Ic */ 
+       { NULL, NULL },                         /* Fn */ 
+       { NULL, NULL },                         /* Ft */ 
+       { NULL, NULL },                         /* Ic */ 
        { NULL, posts_text1 },                  /* In */ 
        { NULL, posts_defaults },               /* Li */
        { NULL, posts_nd },                     /* Nd */
        { NULL, posts_text1 },                  /* In */ 
        { NULL, posts_defaults },               /* Li */
        { NULL, posts_nd },                     /* Nd */
@@ -228,10 +219,10 @@ const     struct valids mdoc_valids[MDOC_MAX] = {
        { NULL, posts_st },                     /* St */ 
        { NULL, NULL },                         /* Va */
        { NULL, posts_vt },                     /* Vt */ 
        { NULL, posts_st },                     /* St */ 
        { NULL, NULL },                         /* Va */
        { NULL, posts_vt },                     /* Vt */ 
-       { NULL, posts_wtext },                  /* Xr */ 
+       { NULL, posts_text },                   /* Xr */ 
        { NULL, posts_text },                   /* %A */
        { NULL, posts_text },                   /* %B */ /* FIXME: can be used outside Rs/Re. */
        { NULL, posts_text },                   /* %A */
        { NULL, posts_text },                   /* %B */ /* FIXME: can be used outside Rs/Re. */
-       { NULL, posts_text },                   /* %D */ /* FIXME: check date with mandoc_a2time(). */
+       { NULL, posts_text },                   /* %D */
        { NULL, posts_text },                   /* %I */
        { NULL, posts_text },                   /* %J */
        { NULL, posts_text },                   /* %N */
        { NULL, posts_text },                   /* %I */
        { NULL, posts_text },                   /* %J */
        { NULL, posts_text },                   /* %N */
@@ -249,7 +240,7 @@ const       struct valids mdoc_valids[MDOC_MAX] = {
        { NULL, NULL },                         /* Bo */
        { NULL, NULL },                         /* Bq */
        { NULL, NULL },                         /* Bsx */
        { NULL, NULL },                         /* Bo */
        { NULL, NULL },                         /* Bq */
        { NULL, NULL },                         /* Bsx */
-       { NULL, NULL },                         /* Bx */
+       { NULL, posts_bx },                     /* Bx */
        { NULL, posts_bool },                   /* Db */
        { NULL, NULL },                         /* Dc */
        { NULL, NULL },                         /* Do */
        { NULL, posts_bool },                   /* Db */
        { NULL, NULL },                         /* Dc */
        { NULL, NULL },                         /* Do */
@@ -259,9 +250,9 @@ const       struct valids mdoc_valids[MDOC_MAX] = {
        { NULL, NULL },                         /* Em */ 
        { NULL, NULL },                         /* Eo */
        { NULL, NULL },                         /* Fx */
        { NULL, NULL },                         /* Em */ 
        { NULL, NULL },                         /* Eo */
        { NULL, NULL },                         /* Fx */
-       { NULL, posts_text },                   /* Ms */ 
+       { NULL, NULL },                         /* Ms */ 
        { NULL, posts_notext },                 /* No */
        { NULL, posts_notext },                 /* No */
-       { NULL, posts_notext },                 /* Ns */
+       { NULL, posts_ns },                     /* Ns */
        { NULL, NULL },                         /* Nx */
        { NULL, NULL },                         /* Ox */
        { NULL, NULL },                         /* Pc */
        { NULL, NULL },                         /* Nx */
        { NULL, NULL },                         /* Ox */
        { NULL, NULL },                         /* Pc */
@@ -278,9 +269,9 @@ const       struct valids mdoc_valids[MDOC_MAX] = {
        { NULL, NULL },                         /* So */
        { NULL, NULL },                         /* Sq */
        { NULL, posts_bool },                   /* Sm */ 
        { NULL, NULL },                         /* So */
        { NULL, NULL },                         /* Sq */
        { NULL, posts_bool },                   /* Sm */ 
-       { NULL, posts_text },                   /* Sx */
-       { NULL, posts_text },                   /* Sy */
-       { NULL, posts_text },                   /* Tn */
+       { NULL, NULL },                         /* Sx */
+       { NULL, NULL },                         /* Sy */
+       { NULL, NULL },                         /* Tn */
        { NULL, NULL },                         /* Ux */
        { NULL, NULL },                         /* Xc */
        { NULL, NULL },                         /* Xo */
        { NULL, NULL },                         /* Ux */
        { NULL, NULL },                         /* Xc */
        { NULL, NULL },                         /* Xo */
@@ -296,7 +287,7 @@ const       struct valids mdoc_valids[MDOC_MAX] = {
        { NULL, posts_eoln },                   /* Ud */
        { NULL, posts_lb },                     /* Lb */
        { NULL, posts_notext },                 /* Lp */ 
        { NULL, posts_eoln },                   /* Ud */
        { NULL, posts_lb },                     /* Lb */
        { NULL, posts_notext },                 /* Lp */ 
-       { NULL, posts_text },                   /* Lk */ 
+       { NULL, NULL },                         /* Lk */ 
        { NULL, posts_defaults },               /* Mt */ 
        { NULL, NULL },                         /* Brq */ 
        { NULL, NULL },                         /* Bro */ 
        { NULL, posts_defaults },               /* Mt */ 
        { NULL, NULL },                         /* Brq */ 
        { NULL, NULL },                         /* Bro */ 
@@ -331,6 +322,30 @@ static     const enum mdoct rsord[RSORD_MAX] = {
        MDOC__U
 };
 
        MDOC__U
 };
 
+static const char * const secnames[SEC__MAX] = {
+       NULL,
+       "NAME",
+       "LIBRARY",
+       "SYNOPSIS",
+       "DESCRIPTION",
+       "IMPLEMENTATION NOTES",
+       "RETURN VALUES",
+       "ENVIRONMENT",
+       "FILES",
+       "EXIT STATUS",
+       "EXAMPLES",
+       "DIAGNOSTICS",
+       "COMPATIBILITY",
+       "ERRORS",
+       "SEE ALSO",
+       "STANDARDS",
+       "HISTORY",
+       "AUTHORS",
+       "CAVEATS",
+       "BUGS",
+       "SECURITY CONSIDERATIONS",
+       NULL
+};
 
 int
 mdoc_valid_pre(struct mdoc *mdoc, struct mdoc_node *n)
 
 int
 mdoc_valid_pre(struct mdoc *mdoc, struct mdoc_node *n)
@@ -339,12 +354,21 @@ mdoc_valid_pre(struct mdoc *mdoc, struct mdoc_node *n)
        int              line, pos;
        char            *tp;
 
        int              line, pos;
        char            *tp;
 
-       if (MDOC_TEXT == n->type) {
+       switch (n->type) {
+       case (MDOC_TEXT):
                tp = n->string;
                line = n->line;
                pos = n->pos;
                check_text(mdoc, line, pos, tp);
                tp = n->string;
                line = n->line;
                pos = n->pos;
                check_text(mdoc, line, pos, tp);
+               /* FALLTHROUGH */
+       case (MDOC_TBL):
+               /* FALLTHROUGH */
+       case (MDOC_EQN):
+               /* FALLTHROUGH */
+       case (MDOC_ROOT):
                return(1);
                return(1);
+       default:
+               break;
        }
 
        check_args(mdoc, n);
        }
 
        check_args(mdoc, n);
@@ -367,10 +391,18 @@ mdoc_valid_post(struct mdoc *mdoc)
                return(1);
        mdoc->last->flags |= MDOC_VALID;
 
                return(1);
        mdoc->last->flags |= MDOC_VALID;
 
-       if (MDOC_TEXT == mdoc->last->type)
+       switch (mdoc->last->type) {
+       case (MDOC_TEXT):
+               /* FALLTHROUGH */
+       case (MDOC_EQN):
+               /* FALLTHROUGH */
+       case (MDOC_TBL):
                return(1);
                return(1);
-       if (MDOC_ROOT == mdoc->last->type)
+       case (MDOC_ROOT):
                return(post_root(mdoc));
                return(post_root(mdoc));
+       default:
+               break;
+       }
 
        if (NULL == mdoc_valids[mdoc->last->tok].post)
                return(1);
 
        if (NULL == mdoc_valids[mdoc->last->tok].post)
                return(1);
@@ -386,6 +418,7 @@ check_count(struct mdoc *m, enum mdoc_type type,
                enum check_lvl lvl, enum check_ineq ineq, int val)
 {
        const char      *p;
                enum check_lvl lvl, enum check_ineq ineq, int val)
 {
        const char      *p;
+       enum mandocerr   t;
 
        if (m->last->type != type)
                return(1);
 
        if (m->last->type != type)
                return(1);
@@ -397,7 +430,7 @@ check_count(struct mdoc *m, enum mdoc_type type,
                        return(1);
                break;
        case (CHECK_GT):
                        return(1);
                break;
        case (CHECK_GT):
-               p = "greater than ";
+               p = "more than ";
                if (m->last->nchild > val)
                        return(1);
                break;
                if (m->last->nchild > val)
                        return(1);
                break;
@@ -411,26 +444,18 @@ check_count(struct mdoc *m, enum mdoc_type type,
                /* NOTREACHED */
        }
 
                /* NOTREACHED */
        }
 
-       if (CHECK_WARN == lvl) {
-               return(mdoc_vmsg(m, MANDOCERR_ARGCOUNT,
-                               m->last->line, m->last->pos,
-                               "want %s%d children (have %d)",
-                               p, val, m->last->nchild));
-       }
-
-       /* FIXME: THIS IS THE SAME AS THE ABOVE. */
-
-       return(mdoc_vmsg(m, MANDOCERR_ARGCOUNT,
-                       m->last->line, m->last->pos,
-                       "require %s%d children (have %d)",
-                       p, val, m->last->nchild));
+       t = lvl == CHECK_WARN ? MANDOCERR_ARGCWARN : MANDOCERR_ARGCOUNT;
+       mandoc_vmsg(t, m->parse, m->last->line, m->last->pos,
+                       "want %s%d children (have %d)",
+                       p, val, m->last->nchild);
+       return(1);
 }
 
 static int
 berr_ge1(POST_ARGS)
 {
 
 }
 
 static int
 berr_ge1(POST_ARGS)
 {
 
-       return(check_count(mdoc, MDOC_BODY, CHECK_FATAL, CHECK_GT, 0));
+       return(check_count(mdoc, MDOC_BODY, CHECK_ERROR, CHECK_GT, 0));
 }
 
 static int
 }
 
 static int
@@ -439,30 +464,6 @@ bwarn_ge1(POST_ARGS)
        return(check_count(mdoc, MDOC_BODY, CHECK_WARN, CHECK_GT, 0));
 }
 
        return(check_count(mdoc, MDOC_BODY, CHECK_WARN, CHECK_GT, 0));
 }
 
-static int
-eerr_eq0(POST_ARGS)
-{
-       return(check_count(mdoc, MDOC_ELEM, CHECK_FATAL, CHECK_EQ, 0));
-}
-
-static int
-eerr_eq1(POST_ARGS)
-{
-       return(check_count(mdoc, MDOC_ELEM, CHECK_FATAL, CHECK_EQ, 1));
-}
-
-static int
-eerr_ge1(POST_ARGS)
-{
-       return(check_count(mdoc, MDOC_ELEM, CHECK_FATAL, CHECK_GT, 0));
-}
-
-static int
-eerr_le1(POST_ARGS)
-{
-       return(check_count(mdoc, MDOC_ELEM, CHECK_FATAL, CHECK_LT, 2));
-}
-
 static int
 ewarn_eq0(POST_ARGS)
 {
 static int
 ewarn_eq0(POST_ARGS)
 {
@@ -470,21 +471,21 @@ ewarn_eq0(POST_ARGS)
 }
 
 static int
 }
 
 static int
-ewarn_ge1(POST_ARGS)
+ewarn_eq1(POST_ARGS)
 {
 {
-       return(check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_GT, 0));
+       return(check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_EQ, 1));
 }
 
 static int
 }
 
 static int
-herr_eq0(POST_ARGS)
+ewarn_ge1(POST_ARGS)
 {
 {
-       return(check_count(mdoc, MDOC_HEAD, CHECK_FATAL, CHECK_EQ, 0));
+       return(check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_GT, 0));
 }
 
 static int
 }
 
 static int
-herr_ge1(POST_ARGS)
+ewarn_le1(POST_ARGS)
 {
 {
-       return(check_count(mdoc, MDOC_HEAD, CHECK_FATAL, CHECK_GT, 0));
+       return(check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_LT, 2));
 }
 
 static int
 }
 
 static int
@@ -499,6 +500,12 @@ hwarn_eq1(POST_ARGS)
        return(check_count(mdoc, MDOC_HEAD, CHECK_WARN, CHECK_EQ, 1));
 }
 
        return(check_count(mdoc, MDOC_HEAD, CHECK_WARN, CHECK_EQ, 1));
 }
 
+static int
+hwarn_ge1(POST_ARGS)
+{
+       return(check_count(mdoc, MDOC_HEAD, CHECK_WARN, CHECK_GT, 0));
+}
+
 static int
 hwarn_le1(POST_ARGS)
 {
 static int
 hwarn_le1(POST_ARGS)
 {
@@ -536,31 +543,13 @@ check_argv(struct mdoc *m, struct mdoc_node *n, struct mdoc_argv *v)
 static void
 check_text(struct mdoc *m, int ln, int pos, char *p)
 {
 static void
 check_text(struct mdoc *m, int ln, int pos, char *p)
 {
-       int              c;
-       size_t           sz;
-
-       for ( ; *p; p++, pos++) {
-               sz = strcspn(p, "\t\\");
-               p += (int)sz;
+       char            *cp;
 
 
-               if ('\0' == *p)
-                       break;
-
-               pos += (int)sz;
-
-               if ('\t' == *p) {
-                       if ( ! (MDOC_LITERAL & m->flags))
-                               mdoc_pmsg(m, ln, pos, MANDOCERR_BADTAB);
-                       continue;
-               }
-
-               if (0 == (c = mandoc_special(p))) {
-                       mdoc_pmsg(m, ln, pos, MANDOCERR_BADESCAPE);
+       cp = p;
+       for (cp = p; NULL != (p = strchr(p, '\t')); p++) {
+               if (MDOC_LITERAL & m->flags)
                        continue;
                        continue;
-               }
-
-               p += c - 1;
-               pos += c - 1;
+               mdoc_pmsg(m, ln, (int)(p - cp), MANDOCERR_BADTAB);
        }
 }
 
        }
 }
 
@@ -573,10 +562,9 @@ check_parent(PRE_ARGS, enum mdoct tok, enum mdoc_type t)
                        (t == n->parent->type))
                return(1);
 
                        (t == n->parent->type))
                return(1);
 
-       mdoc_vmsg(mdoc, MANDOCERR_SYNTCHILD,
-                               n->line, n->pos, "want parent %s",
-                               MDOC_ROOT == t ? "<root>" : 
-                                       mdoc_macronames[tok]);
+       mandoc_vmsg(MANDOCERR_SYNTCHILD, mdoc->parse, n->line, 
+                       n->pos, "want parent %s", MDOC_ROOT == t ? 
+                       "<root>" : mdoc_macronames[tok]);
        return(0);
 }
 
        return(0);
 }
 
@@ -619,12 +607,9 @@ pre_bl(PRE_ARGS)
                assert(np);
                assert(MDOC_BLOCK == np->type);
                assert(MDOC_Bl == np->tok);
                assert(np);
                assert(MDOC_BLOCK == np->type);
                assert(MDOC_Bl == np->tok);
-               NORM_BUMP(n, np);
                return(1);
        }
 
                return(1);
        }
 
-       NORM_ALLOC(n);
-
        /* 
         * First figure out which kind of list to use: bind ourselves to
         * the first mentioned list type and warn about any remaining
        /* 
         * First figure out which kind of list to use: bind ourselves to
         * the first mentioned list type and warn about any remaining
@@ -673,18 +658,18 @@ pre_bl(PRE_ARGS)
                        break;
                /* Set list arguments. */
                case (MDOC_Compact):
                        break;
                /* Set list arguments. */
                case (MDOC_Compact):
-                       dup = n->norm->d.Bl.comp;
+                       dup = n->norm->Bl.comp;
                        comp = 1;
                        break;
                case (MDOC_Width):
                        comp = 1;
                        break;
                case (MDOC_Width):
-                       dup = (NULL != n->norm->d.Bl.width);
+                       dup = (NULL != n->norm->Bl.width);
                        width = n->args->argv[i].value[0];
                        break;
                case (MDOC_Offset):
                        /* NB: this can be empty! */
                        if (n->args->argv[i].sz) {
                                offs = n->args->argv[i].value[0];
                        width = n->args->argv[i].value[0];
                        break;
                case (MDOC_Offset):
                        /* NB: this can be empty! */
                        if (n->args->argv[i].sz) {
                                offs = n->args->argv[i].value[0];
-                               dup = (NULL != n->norm->d.Bl.offs);
+                               dup = (NULL != n->norm->Bl.offs);
                                break;
                        }
                        mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                                break;
                        }
                        mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
@@ -699,36 +684,36 @@ pre_bl(PRE_ARGS)
                        mdoc_nmsg(mdoc, n, MANDOCERR_ARGVREP);
 
                if (comp && ! dup)
                        mdoc_nmsg(mdoc, n, MANDOCERR_ARGVREP);
 
                if (comp && ! dup)
-                       n->norm->d.Bl.comp = comp;
+                       n->norm->Bl.comp = comp;
                if (offs && ! dup)
                if (offs && ! dup)
-                       n->norm->d.Bl.offs = offs;
+                       n->norm->Bl.offs = offs;
                if (width && ! dup)
                if (width && ! dup)
-                       n->norm->d.Bl.width = width;
+                       n->norm->Bl.width = width;
 
                /* Check: multiple list types. */
 
 
                /* Check: multiple list types. */
 
-               if (LIST__NONE != lt && n->norm->d.Bl.type != LIST__NONE)
+               if (LIST__NONE != lt && n->norm->Bl.type != LIST__NONE)
                        mdoc_nmsg(mdoc, n, MANDOCERR_LISTREP);
 
                /* Assign list type. */
 
                        mdoc_nmsg(mdoc, n, MANDOCERR_LISTREP);
 
                /* Assign list type. */
 
-               if (LIST__NONE != lt && n->norm->d.Bl.type == LIST__NONE) {
-                       n->norm->d.Bl.type = lt;
+               if (LIST__NONE != lt && n->norm->Bl.type == LIST__NONE) {
+                       n->norm->Bl.type = lt;
                        /* Set column information, too. */
                        if (LIST_column == lt) {
                        /* Set column information, too. */
                        if (LIST_column == lt) {
-                               n->norm->d.Bl.ncols = 
+                               n->norm->Bl.ncols = 
                                        n->args->argv[i].sz;
                                        n->args->argv[i].sz;
-                               n->norm->d.Bl.cols = (const char **)
+                               n->norm->Bl.cols = (const char **)
                                        n->args->argv[i].value;
                        }
                }
 
                /* The list type should come first. */
 
                                        n->args->argv[i].value;
                        }
                }
 
                /* The list type should come first. */
 
-               if (n->norm->d.Bl.type == LIST__NONE)
-                       if (n->norm->d.Bl.width || 
-                                       n->norm->d.Bl.offs || 
-                                       n->norm->d.Bl.comp)
+               if (n->norm->Bl.type == LIST__NONE)
+                       if (n->norm->Bl.width || 
+                                       n->norm->Bl.offs || 
+                                       n->norm->Bl.comp)
                                mdoc_nmsg(mdoc, n, MANDOCERR_LISTFIRST);
 
                continue;
                                mdoc_nmsg(mdoc, n, MANDOCERR_LISTFIRST);
 
                continue;
@@ -736,9 +721,9 @@ pre_bl(PRE_ARGS)
 
        /* Allow lists to default to LIST_item. */
 
 
        /* Allow lists to default to LIST_item. */
 
-       if (LIST__NONE == n->norm->d.Bl.type) {
+       if (LIST__NONE == n->norm->Bl.type) {
                mdoc_nmsg(mdoc, n, MANDOCERR_LISTTYPE);
                mdoc_nmsg(mdoc, n, MANDOCERR_LISTTYPE);
-               n->norm->d.Bl.type = LIST_item;
+               n->norm->Bl.type = LIST_item;
        }
 
        /* 
        }
 
        /* 
@@ -747,9 +732,9 @@ pre_bl(PRE_ARGS)
         * and must also be warned.
         */
 
         * and must also be warned.
         */
 
-       switch (n->norm->d.Bl.type) {
+       switch (n->norm->Bl.type) {
        case (LIST_tag):
        case (LIST_tag):
-               if (n->norm->d.Bl.width)
+               if (n->norm->Bl.width)
                        break;
                mdoc_nmsg(mdoc, n, MANDOCERR_NOWIDTHARG);
                break;
                        break;
                mdoc_nmsg(mdoc, n, MANDOCERR_NOWIDTHARG);
                break;
@@ -762,7 +747,7 @@ pre_bl(PRE_ARGS)
        case (LIST_inset):
                /* FALLTHROUGH */
        case (LIST_item):
        case (LIST_inset):
                /* FALLTHROUGH */
        case (LIST_item):
-               if (n->norm->d.Bl.width)
+               if (n->norm->Bl.width)
                        mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                break;
        default:
                        mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                break;
        default:
@@ -791,12 +776,9 @@ pre_bd(PRE_ARGS)
                assert(np);
                assert(MDOC_BLOCK == np->type);
                assert(MDOC_Bd == np->tok);
                assert(np);
                assert(MDOC_BLOCK == np->type);
                assert(MDOC_Bd == np->tok);
-               NORM_BUMP(n, np);
                return(1);
        }
 
                return(1);
        }
 
-       NORM_ALLOC(n);
-
        /* LINTED */
        for (i = 0; n->args && i < (int)n->args->argc; i++) {
                dt = DISP__NONE;
        /* LINTED */
        for (i = 0; n->args && i < (int)n->args->argc; i++) {
                dt = DISP__NONE;
@@ -826,14 +808,14 @@ pre_bd(PRE_ARGS)
                        /* NB: this can be empty! */
                        if (n->args->argv[i].sz) {
                                offs = n->args->argv[i].value[0];
                        /* NB: this can be empty! */
                        if (n->args->argv[i].sz) {
                                offs = n->args->argv[i].value[0];
-                               dup = (NULL != n->norm->d.Bd.offs);
+                               dup = (NULL != n->norm->Bd.offs);
                                break;
                        }
                        mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                        break;
                case (MDOC_Compact):
                        comp = 1;
                                break;
                        }
                        mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                        break;
                case (MDOC_Compact):
                        comp = 1;
-                       dup = n->norm->d.Bd.comp;
+                       dup = n->norm->Bd.comp;
                        break;
                default:
                        abort();
                        break;
                default:
                        abort();
@@ -848,24 +830,24 @@ pre_bd(PRE_ARGS)
                /* Make our auxiliary assignments. */
 
                if (offs && ! dup)
                /* Make our auxiliary assignments. */
 
                if (offs && ! dup)
-                       n->norm->d.Bd.offs = offs;
+                       n->norm->Bd.offs = offs;
                if (comp && ! dup)
                if (comp && ! dup)
-                       n->norm->d.Bd.comp = comp;
+                       n->norm->Bd.comp = comp;
 
                /* Check whether a type has already been assigned. */
 
 
                /* Check whether a type has already been assigned. */
 
-               if (DISP__NONE != dt && n->norm->d.Bd.type != DISP__NONE)
+               if (DISP__NONE != dt && n->norm->Bd.type != DISP__NONE)
                        mdoc_nmsg(mdoc, n, MANDOCERR_DISPREP);
 
                /* Make our type assignment. */
 
                        mdoc_nmsg(mdoc, n, MANDOCERR_DISPREP);
 
                /* Make our type assignment. */
 
-               if (DISP__NONE != dt && n->norm->d.Bd.type == DISP__NONE)
-                       n->norm->d.Bd.type = dt;
+               if (DISP__NONE != dt && n->norm->Bd.type == DISP__NONE)
+                       n->norm->Bd.type = dt;
        }
 
        }
 
-       if (DISP__NONE == n->norm->d.Bd.type) {
+       if (DISP__NONE == n->norm->Bd.type) {
                mdoc_nmsg(mdoc, n, MANDOCERR_DISPTYPE);
                mdoc_nmsg(mdoc, n, MANDOCERR_DISPTYPE);
-               n->norm->d.Bd.type = DISP_ragged;
+               n->norm->Bd.type = DISP_ragged;
        }
 
        return(1);
        }
 
        return(1);
@@ -889,7 +871,7 @@ pre_sh(PRE_ARGS)
        if (MDOC_BLOCK != n->type)
                return(1);
 
        if (MDOC_BLOCK != n->type)
                return(1);
 
-       mdoc->regs->regs[(int)REG_nS].set = 0;
+       roff_regunset(mdoc->roff, REG_nS);
        return(check_parent(mdoc, n, MDOC_MAX, MDOC_ROOT));
 }
 
        return(check_parent(mdoc, n, MDOC_MAX, MDOC_ROOT));
 }
 
@@ -910,8 +892,6 @@ pre_an(PRE_ARGS)
 {
        int              i;
 
 {
        int              i;
 
-       NORM_ALLOC(n);
-
        if (NULL == n->args)
                return(1);
        
        if (NULL == n->args)
                return(1);
        
@@ -920,9 +900,9 @@ pre_an(PRE_ARGS)
                        n->args->argv[i].pos, MANDOCERR_IGNARGV);
 
        if (MDOC_Split == n->args->argv[0].arg)
                        n->args->argv[i].pos, MANDOCERR_IGNARGV);
 
        if (MDOC_Split == n->args->argv[0].arg)
-               n->norm->d.An.auth = AUTH_split;
+               n->norm->An.auth = AUTH_split;
        else if (MDOC_Nosplit == n->args->argv[0].arg)
        else if (MDOC_Nosplit == n->args->argv[0].arg)
-               n->norm->d.An.auth = AUTH_nosplit;
+               n->norm->An.auth = AUTH_nosplit;
        else
                abort();
 
        else
                abort();
 
@@ -945,7 +925,7 @@ static int
 pre_dt(PRE_ARGS)
 {
 
 pre_dt(PRE_ARGS)
 {
 
-       if (0 == mdoc->meta.date || mdoc->meta.os)
+       if (NULL == mdoc->meta.date || mdoc->meta.os)
                mdoc_nmsg(mdoc, n, MANDOCERR_PROLOGOOO);
 
        if (mdoc->meta.title)
                mdoc_nmsg(mdoc, n, MANDOCERR_PROLOGOOO);
 
        if (mdoc->meta.title)
@@ -958,7 +938,7 @@ static int
 pre_os(PRE_ARGS)
 {
 
 pre_os(PRE_ARGS)
 {
 
-       if (NULL == mdoc->meta.title || 0 == mdoc->meta.date)
+       if (NULL == mdoc->meta.title || NULL == mdoc->meta.date)
                mdoc_nmsg(mdoc, n, MANDOCERR_PROLOGOOO);
 
        if (mdoc->meta.os)
                mdoc_nmsg(mdoc, n, MANDOCERR_PROLOGOOO);
 
        if (mdoc->meta.os)
@@ -1004,14 +984,12 @@ post_bf(POST_ARGS)
                assert(np);
                assert(MDOC_HEAD == np->type);
                assert(MDOC_Bf == np->tok);
                assert(np);
                assert(MDOC_HEAD == np->type);
                assert(MDOC_Bf == np->tok);
-               NORM_BUMP(mdoc->last, np);
                return(1);
        }
 
        np = mdoc->last;
        assert(MDOC_BLOCK == np->parent->type);
        assert(MDOC_Bf == np->parent->tok);
                return(1);
        }
 
        np = mdoc->last;
        assert(MDOC_BLOCK == np->parent->type);
        assert(MDOC_Bf == np->parent->tok);
-       NORM_ALLOC(np);
 
        /* 
         * Cannot have both argument and parameter.
 
        /* 
         * Cannot have both argument and parameter.
@@ -1031,11 +1009,11 @@ post_bf(POST_ARGS)
        if (np->parent->args) {
                arg = np->parent->args->argv[0].arg;
                if (MDOC_Emphasis == arg)
        if (np->parent->args) {
                arg = np->parent->args->argv[0].arg;
                if (MDOC_Emphasis == arg)
-                       np->norm->d.Bf.font = FONT_Em;
+                       np->norm->Bf.font = FONT_Em;
                else if (MDOC_Literal == arg)
                else if (MDOC_Literal == arg)
-                       np->norm->d.Bf.font = FONT_Li;
+                       np->norm->Bf.font = FONT_Li;
                else if (MDOC_Symbolic == arg)
                else if (MDOC_Symbolic == arg)
-                       np->norm->d.Bf.font = FONT_Sy;
+                       np->norm->Bf.font = FONT_Sy;
                else
                        abort();
                return(1);
                else
                        abort();
                return(1);
@@ -1044,11 +1022,11 @@ post_bf(POST_ARGS)
        /* Extract parameter into data. */
 
        if (0 == strcmp(np->child->string, "Em"))
        /* Extract parameter into data. */
 
        if (0 == strcmp(np->child->string, "Em"))
-               np->norm->d.Bf.font = FONT_Em;
+               np->norm->Bf.font = FONT_Em;
        else if (0 == strcmp(np->child->string, "Li"))
        else if (0 == strcmp(np->child->string, "Li"))
-               np->norm->d.Bf.font = FONT_Li;
+               np->norm->Bf.font = FONT_Li;
        else if (0 == strcmp(np->child->string, "Sy"))
        else if (0 == strcmp(np->child->string, "Sy"))
-               np->norm->d.Bf.font = FONT_Sy;
+               np->norm->Bf.font = FONT_Sy;
        else 
                mdoc_nmsg(mdoc, np, MANDOCERR_FONTTYPE);
 
        else 
                mdoc_nmsg(mdoc, np, MANDOCERR_FONTTYPE);
 
@@ -1062,6 +1040,8 @@ post_lb(POST_ARGS)
        char            *buf;
        size_t           sz;
 
        char            *buf;
        size_t           sz;
 
+       check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_EQ, 1);
+
        assert(mdoc->last->child);
        assert(MDOC_TEXT == mdoc->last->child->type);
 
        assert(mdoc->last->child);
        assert(MDOC_TEXT == mdoc->last->child->type);
 
@@ -1105,12 +1085,11 @@ post_vt(POST_ARGS)
        /*
         * The Vt macro comes in both ELEM and BLOCK form, both of which
         * have different syntaxes (yet more context-sensitive
        /*
         * The Vt macro comes in both ELEM and BLOCK form, both of which
         * have different syntaxes (yet more context-sensitive
-        * behaviour).  ELEM types must have a child; BLOCK types,
+        * behaviour).  ELEM types must have a child, which is already
+        * guaranteed by the in_line parsing routine; BLOCK types,
         * specifically the BODY, should only have TEXT children.
         */
 
         * specifically the BODY, should only have TEXT children.
         */
 
-       if (MDOC_ELEM == mdoc->last->type)
-               return(eerr_ge1(mdoc));
        if (MDOC_BODY != mdoc->last->type)
                return(1);
        
        if (MDOC_BODY != mdoc->last->type)
                return(1);
        
@@ -1126,6 +1105,7 @@ static int
 post_nm(POST_ARGS)
 {
        char             buf[BUFSIZ];
 post_nm(POST_ARGS)
 {
        char             buf[BUFSIZ];
+       int              c;
 
        /* If no child specified, make sure we have the meta name. */
 
 
        /* If no child specified, make sure we have the meta name. */
 
@@ -1137,11 +1117,14 @@ post_nm(POST_ARGS)
 
        /* If no meta name, set it from the child. */
 
 
        /* If no meta name, set it from the child. */
 
-       if ( ! concat(mdoc, buf, mdoc->last->child, BUFSIZ))
+       buf[0] = '\0';
+       if (-1 == (c = concat(buf, mdoc->last->child, BUFSIZ))) {
+               mdoc_nmsg(mdoc, mdoc->last->child, MANDOCERR_MEM);
                return(0);
                return(0);
+       }
 
 
+       assert(c);
        mdoc->meta.name = mandoc_strdup(buf);
        mdoc->meta.name = mandoc_strdup(buf);
-
        return(1);
 }
 
        return(1);
 }
 
@@ -1254,17 +1237,12 @@ post_an(POST_ARGS)
        struct mdoc_node *np;
 
        np = mdoc->last;
        struct mdoc_node *np;
 
        np = mdoc->last;
-       if (AUTH__NONE != np->norm->d.An.auth && np->child)
-               return(eerr_eq0(mdoc));
+       if (AUTH__NONE == np->norm->An.auth) {
+               if (0 == np->child)
+                       check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_GT, 0);
+       } else if (np->child)
+               check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_EQ, 0);
 
 
-       /* 
-        * FIXME: make this ewarn and make sure that the front-ends
-        * don't print the arguments.
-        */
-       if (AUTH__NONE != np->norm->d.An.auth || np->child)
-               return(1);
-
-       mdoc_nmsg(mdoc, np, MANDOCERR_NOARGS);
        return(1);
 }
 
        return(1);
 }
 
@@ -1272,7 +1250,7 @@ post_an(POST_ARGS)
 static int
 post_it(POST_ARGS)
 {
 static int
 post_it(POST_ARGS)
 {
-       int               i, cols, rc;
+       int               i, cols;
        enum mdoc_list    lt;
        struct mdoc_node *n, *c;
        enum mandocerr    er;
        enum mdoc_list    lt;
        struct mdoc_node *n, *c;
        enum mandocerr    er;
@@ -1281,7 +1259,7 @@ post_it(POST_ARGS)
                return(1);
 
        n = mdoc->last->parent->parent;
                return(1);
 
        n = mdoc->last->parent->parent;
-       lt = n->norm->d.Bl.type;
+       lt = n->norm->Bl.type;
 
        if (LIST__NONE == lt) {
                mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_LISTTYPE);
 
        if (LIST__NONE == lt) {
                mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_LISTTYPE);
@@ -1320,7 +1298,7 @@ post_it(POST_ARGS)
                        mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_ARGSLOST);
                break;
        case (LIST_column):
                        mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_ARGSLOST);
                break;
        case (LIST_column):
-               cols = (int)n->norm->d.Bl.ncols;
+               cols = (int)n->norm->Bl.ncols;
 
                assert(NULL == mdoc->last->head->child);
 
 
                assert(NULL == mdoc->last->head->child);
 
@@ -1338,10 +1316,10 @@ post_it(POST_ARGS)
                else
                        er = MANDOCERR_SYNTARGCOUNT;
 
                else
                        er = MANDOCERR_SYNTARGCOUNT;
 
-               rc = mdoc_vmsg(mdoc, er, 
-                               mdoc->last->line, mdoc->last->pos, 
+               mandoc_vmsg(er, mdoc->parse, mdoc->last->line, 
+                               mdoc->last->pos, 
                                "columns == %d (have %d)", cols, i);
                                "columns == %d (have %d)", cols, i);
-               return(rc);
+               return(MANDOCERR_ARGCOUNT == er);
        default:
                break;
        }
        default:
                break;
        }
@@ -1364,17 +1342,17 @@ post_bl_block(POST_ARGS)
 
        n = mdoc->last;
 
 
        n = mdoc->last;
 
-       if (LIST_tag == n->norm->d.Bl.type && 
-                       NULL == n->norm->d.Bl.width) {
+       if (LIST_tag == n->norm->Bl.type && 
+                       NULL == n->norm->Bl.width) {
                if ( ! post_bl_block_tag(mdoc))
                        return(0);
                if ( ! post_bl_block_tag(mdoc))
                        return(0);
-       } else if (NULL != n->norm->d.Bl.width) {
+       } else if (NULL != n->norm->Bl.width) {
                if ( ! post_bl_block_width(mdoc))
                        return(0);
        } else 
                return(1);
 
                if ( ! post_bl_block_width(mdoc))
                        return(0);
        } else 
                return(1);
 
-       assert(n->norm->d.Bl.width);
+       assert(n->norm->Bl.width);
        return(1);
 }
 
        return(1);
 }
 
@@ -1398,11 +1376,11 @@ 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->norm->d.Bl.width, "Ds"))
+       if (0 == strcmp(n->norm->Bl.width, "Ds"))
                width = 6;
                width = 6;
-       else if (MDOC_MAX == (tok = mdoc_hash_find(n->norm->d.Bl.width)))
+       else if (MDOC_MAX == (tok = mdoc_hash_find(n->norm->Bl.width)))
                return(1);
                return(1);
-       else if (0 == (width = mdoc_macro2len(tok)))  {
+       else if (0 == (width = macro2len(tok)))  {
                mdoc_nmsg(mdoc, n, MANDOCERR_BADWIDTH);
                return(1);
        }
                mdoc_nmsg(mdoc, n, MANDOCERR_BADWIDTH);
                return(1);
        }
@@ -1417,12 +1395,12 @@ post_bl_block_width(POST_ARGS)
 
        assert(i < (int)n->args->argc);
 
 
        assert(i < (int)n->args->argc);
 
-       snprintf(buf, NUMSIZ, "%zun", width);
+       snprintf(buf, NUMSIZ, "%un", (unsigned int)width);
        free(n->args->argv[i].value[0]);
        n->args->argv[i].value[0] = mandoc_strdup(buf);
 
        /* Set our width! */
        free(n->args->argv[i].value[0]);
        n->args->argv[i].value[0] = mandoc_strdup(buf);
 
        /* Set our width! */
-       n->norm->d.Bl.width = n->args->argv[i].value[0];
+       n->norm->Bl.width = n->args->argv[i].value[0];
        return(1);
 }
 
        return(1);
 }
 
@@ -1459,7 +1437,7 @@ post_bl_block_tag(POST_ARGS)
                        break;
                }
 
                        break;
                }
 
-               if (0 != (ssz = mdoc_macro2len(nn->tok)))
+               if (0 != (ssz = macro2len(nn->tok)))
                        sz = ssz;
 
                break;
                        sz = ssz;
 
                break;
@@ -1467,7 +1445,7 @@ post_bl_block_tag(POST_ARGS)
 
        /* Defaults to ten ens. */
 
 
        /* Defaults to ten ens. */
 
-       snprintf(buf, NUMSIZ, "%zun", sz);
+       snprintf(buf, NUMSIZ, "%un", (unsigned int)sz);
 
        /*
         * We have to dynamically add this to the macro's argument list.
 
        /*
         * We have to dynamically add this to the macro's argument list.
@@ -1488,7 +1466,7 @@ post_bl_block_tag(POST_ARGS)
        n->args->argv[i].value[0] = mandoc_strdup(buf);
 
        /* Set our width! */
        n->args->argv[i].value[0] = mandoc_strdup(buf);
 
        /* Set our width! */
-       n->norm->d.Bl.width = n->args->argv[i].value[0];
+       n->norm->Bl.width = n->args->argv[i].value[0];
        return(1);
 }
 
        return(1);
 }
 
@@ -1499,7 +1477,7 @@ post_bl_head(POST_ARGS)
        struct mdoc_node *np, *nn, *nnp;
        int               i, j;
 
        struct mdoc_node *np, *nn, *nnp;
        int               i, j;
 
-       if (LIST_column != mdoc->last->norm->d.Bl.type)
+       if (LIST_column != mdoc->last->norm->Bl.type)
                /* FIXME: this should be ERROR class... */
                return(hwarn_eq0(mdoc));
 
                /* FIXME: this should be ERROR class... */
                return(hwarn_eq0(mdoc));
 
@@ -1516,7 +1494,7 @@ 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->norm->d.Bl.ncols && mdoc->last->nchild) {
+       if (mdoc->last->norm->Bl.ncols && mdoc->last->nchild) {
                mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_COLUMNS);
                return(0);
        } else if (NULL == mdoc->last->child)
                mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_COLUMNS);
                return(0);
        } else if (NULL == mdoc->last->child)
@@ -1533,7 +1511,7 @@ post_bl_head(POST_ARGS)
        assert(0 == np->args->argv[j].sz);
 
        /*
        assert(0 == np->args->argv[j].sz);
 
        /*
-        * Accomodate for new-style groff column syntax.  Shuffle the
+        * Accommodate for new-style groff column syntax.  Shuffle the
         * child nodes, all of which must be TEXT, as arguments for the
         * column field.  Then, delete the head children.
         */
         * child nodes, all of which must be TEXT, as arguments for the
         * column field.  Then, delete the head children.
         */
@@ -1542,8 +1520,8 @@ post_bl_head(POST_ARGS)
        np->args->argv[j].value = mandoc_malloc
                ((size_t)mdoc->last->nchild * sizeof(char *));
 
        np->args->argv[j].value = mandoc_malloc
                ((size_t)mdoc->last->nchild * sizeof(char *));
 
-       mdoc->last->norm->d.Bl.ncols = np->args->argv[j].sz;
-       mdoc->last->norm->d.Bl.cols = (const char **)np->args->argv[j].value;
+       mdoc->last->norm->Bl.ncols = np->args->argv[j].sz;
+       mdoc->last->norm->Bl.cols = (const char **)np->args->argv[j].value;
 
        for (i = 0, nn = mdoc->last->child; nn; i++) {
                np->args->argv[j].value[i] = nn->string;
 
        for (i = 0, nn = mdoc->last->child; nn; i++) {
                np->args->argv[j].value[i] = nn->string;
@@ -1573,12 +1551,14 @@ post_bl(POST_ARGS)
 
        for (n = mdoc->last->child; n; n = n->next) {
                switch (n->tok) {
 
        for (n = mdoc->last->child; n; n = n->next) {
                switch (n->tok) {
-               case (MDOC_It):
-                       continue;
-               case (MDOC_Sm):
+               case (MDOC_Lp):
                        /* FALLTHROUGH */
                case (MDOC_Pp):
                        mdoc_nmsg(mdoc, n, MANDOCERR_CHILD);
                        /* FALLTHROUGH */
                case (MDOC_Pp):
                        mdoc_nmsg(mdoc, n, MANDOCERR_CHILD);
+                       /* FALLTHROUGH */
+               case (MDOC_It):
+                       /* FALLTHROUGH */
+               case (MDOC_Sm):
                        continue;
                default:
                        break;
                        continue;
                default:
                        break;
@@ -1595,8 +1575,12 @@ static int
 ebool(struct mdoc *mdoc)
 {
 
 ebool(struct mdoc *mdoc)
 {
 
-       if (NULL == mdoc->last->child)
+       if (NULL == mdoc->last->child) {
+               mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_MACROEMPTY);
+               mdoc_node_delete(mdoc, mdoc->last);
                return(1);
                return(1);
+       }
+       check_count(mdoc, MDOC_ELEM, CHECK_WARN, CHECK_EQ, 1);
 
        assert(MDOC_TEXT == mdoc->last->child->type);
 
 
        assert(MDOC_TEXT == mdoc->last->child->type);
 
@@ -1645,18 +1629,23 @@ post_root(POST_ARGS)
 static int
 post_st(POST_ARGS)
 {
 static int
 post_st(POST_ARGS)
 {
-       const char      *p;
+       struct mdoc_node         *ch;
+       const char               *p;
 
 
-       assert(MDOC_TEXT == mdoc->last->child->type);
+       if (NULL == (ch = mdoc->last->child)) {
+               mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_MACROEMPTY);
+               mdoc_node_delete(mdoc, mdoc->last);
+               return(1);
+       }
 
 
-       p = mdoc_a2st(mdoc->last->child->string);
+       assert(MDOC_TEXT == ch->type);
 
 
-       if (p == NULL) {
+       if (NULL == (p = mdoc_a2st(ch->string))) {
                mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_BADSTANDARD);
                mdoc_node_delete(mdoc, mdoc->last);
        } else {
                mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_BADSTANDARD);
                mdoc_node_delete(mdoc, mdoc->last);
        } else {
-               free(mdoc->last->child->string);
-               mdoc->last->child->string = mandoc_strdup(p);
+               free(ch->string);
+               ch->string = mandoc_strdup(p);
        }
 
        return(1);
        }
 
        return(1);
@@ -1668,8 +1657,18 @@ post_rs(POST_ARGS)
        struct mdoc_node *nn, *next, *prev;
        int               i, j;
 
        struct mdoc_node *nn, *next, *prev;
        int               i, j;
 
-       if (MDOC_BODY != mdoc->last->type)
+       switch (mdoc->last->type) {
+       case (MDOC_HEAD):
+               check_count(mdoc, MDOC_HEAD, CHECK_WARN, CHECK_EQ, 0);
+               return(1);
+       case (MDOC_BODY):
+               if (mdoc->last->child)
+                       break;
+               check_count(mdoc, MDOC_BODY, CHECK_WARN, CHECK_GT, 0);
                return(1);
                return(1);
+       default:
+               return(1);
+       }
 
        /*
         * Make sure only certain types of nodes are allowed within the
 
        /*
         * Make sure only certain types of nodes are allowed within the
@@ -1684,6 +1683,8 @@ post_rs(POST_ARGS)
                                break;
 
                if (i < RSORD_MAX) {
                                break;
 
                if (i < RSORD_MAX) {
+                       if (MDOC__J == rsord[i] || MDOC__B == rsord[i])
+                               mdoc->last->norm->Rs.quote_T++;
                        next = nn->next;
                        continue;
                }
                        next = nn->next;
                        continue;
                }
@@ -1758,6 +1759,15 @@ post_rs(POST_ARGS)
        return(1);
 }
 
        return(1);
 }
 
+static int
+post_ns(POST_ARGS)
+{
+
+       if (MDOC_LINE & mdoc->last->flags)
+               mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_IGNNS);
+       return(1);
+}
+
 static int
 post_sh(POST_ARGS)
 {
 static int
 post_sh(POST_ARGS)
 {
@@ -1810,6 +1820,7 @@ post_sh_head(POST_ARGS)
 {
        char             buf[BUFSIZ];
        enum mdoc_sec    sec;
 {
        char             buf[BUFSIZ];
        enum mdoc_sec    sec;
+       int              c;
 
        /*
         * Process a new section.  Sections are either "named" or
 
        /*
         * Process a new section.  Sections are either "named" or
@@ -1818,10 +1829,13 @@ post_sh_head(POST_ARGS)
         * manual sections.
         */
 
         * manual sections.
         */
 
-       if ( ! concat(mdoc, buf, mdoc->last->child, BUFSIZ))
+       sec = SEC_CUSTOM;
+       buf[0] = '\0';
+       if (-1 == (c = concat(buf, mdoc->last->child, BUFSIZ))) {
+               mdoc_nmsg(mdoc, mdoc->last->child, MANDOCERR_MEM);
                return(0);
                return(0);
-
-       sec = mdoc_str2sec(buf);
+       } else if (1 == c)
+               sec = a2sec(buf);
 
        /* The NAME should be first. */
 
 
        /* The NAME should be first. */
 
@@ -1923,11 +1937,11 @@ pre_par(PRE_ARGS)
 
        if (MDOC_Pp != mdoc->last->tok && MDOC_Lp != mdoc->last->tok)
                return(1);
 
        if (MDOC_Pp != mdoc->last->tok && MDOC_Lp != mdoc->last->tok)
                return(1);
-       if (MDOC_Bl == n->tok && n->norm->d.Bl.comp)
+       if (MDOC_Bl == n->tok && n->norm->Bl.comp)
                return(1);
                return(1);
-       if (MDOC_Bd == n->tok && n->norm->d.Bd.comp)
+       if (MDOC_Bd == n->tok && n->norm->Bd.comp)
                return(1);
                return(1);
-       if (MDOC_It == n->tok && n->parent->norm->d.Bl.comp)
+       if (MDOC_It == n->tok && n->parent->norm->Bl.comp)
                return(1);
 
        mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_IGNPAR);
                return(1);
 
        mdoc_nmsg(mdoc, mdoc->last, MANDOCERR_IGNPAR);
@@ -1952,9 +1966,9 @@ pre_literal(PRE_ARGS)
                mdoc->flags |= MDOC_LITERAL;
                break;
        case (MDOC_Bd):
                mdoc->flags |= MDOC_LITERAL;
                break;
        case (MDOC_Bd):
-               if (DISP_literal == n->norm->d.Bd.type)
+               if (DISP_literal == n->norm->Bd.type)
                        mdoc->flags |= MDOC_LITERAL;
                        mdoc->flags |= MDOC_LITERAL;
-               if (DISP_unfilled == n->norm->d.Bd.type)
+               if (DISP_unfilled == n->norm->Bd.type)
                        mdoc->flags |= MDOC_LITERAL;
                break;
        default:
                        mdoc->flags |= MDOC_LITERAL;
                break;
        default:
@@ -1970,25 +1984,28 @@ post_dd(POST_ARGS)
 {
        char              buf[DATESIZE];
        struct mdoc_node *n;
 {
        char              buf[DATESIZE];
        struct mdoc_node *n;
+       int               c;
 
 
-       n = mdoc->last;
+       if (mdoc->meta.date)
+               free(mdoc->meta.date);
 
 
-       if (NULL == n->child) {
-               mdoc->meta.date = time(NULL);
+       n = mdoc->last;
+       if (NULL == n->child || '\0' == n->child->string[0]) {
+               mdoc->meta.date = mandoc_normdate
+                       (mdoc->parse, NULL, n->line, n->pos);
                return(1);
        }
 
                return(1);
        }
 
-       if ( ! concat(mdoc, buf, n->child, DATESIZE))
+       buf[0] = '\0';
+       if (-1 == (c = concat(buf, n->child, DATESIZE))) {
+               mdoc_nmsg(mdoc, n->child, MANDOCERR_MEM);
                return(0);
                return(0);
-
-       mdoc->meta.date = mandoc_a2time
-               (MTIME_MDOCDATE | MTIME_CANONICAL, buf);
-
-       if (0 == mdoc->meta.date) {
-               mdoc_nmsg(mdoc, n, MANDOCERR_BADDATE);
-               mdoc->meta.date = time(NULL);
        }
 
        }
 
+       assert(c);
+       mdoc->meta.date = mandoc_normdate
+               (mdoc->parse, buf, n->line, n->pos);
+
        return(1);
 }
 
        return(1);
 }
 
@@ -2014,7 +2031,7 @@ post_dt(POST_ARGS)
 
        if (NULL != (nn = n->child))
                for (p = nn->string; *p; p++) {
 
        if (NULL != (nn = n->child))
                for (p = nn->string; *p; p++) {
-                       if (toupper((u_char)*p) == *p)
+                       if (toupper((unsigned char)*p) == *p)
                                continue;
 
                        /* 
                                continue;
 
                        /* 
@@ -2116,11 +2133,31 @@ post_prol(POST_ARGS)
        return(1);
 }
 
        return(1);
 }
 
+static int
+post_bx(POST_ARGS)
+{
+       struct mdoc_node        *n;
+
+       /* 
+        * Make `Bx's second argument always start with an uppercase
+        * letter.  Groff checks if it's an "accepted" term, but we just
+        * uppercase blindly.
+        */
+
+       n = mdoc->last->child;
+       if (n && NULL != (n = n->next))
+               *n->string = (char)toupper
+                       ((unsigned char)*n->string);
+
+       return(1);
+}
+
 static int
 post_os(POST_ARGS)
 {
        struct mdoc_node *n;
        char              buf[BUFSIZ];
 static int
 post_os(POST_ARGS)
 {
        struct mdoc_node *n;
        char              buf[BUFSIZ];
+       int               c;
 #ifndef OSNAME
        struct utsname    utsname;
 #endif
 #ifndef OSNAME
        struct utsname    utsname;
 #endif
@@ -2137,8 +2174,13 @@ post_os(POST_ARGS)
        if (mdoc->meta.os)
                free(mdoc->meta.os);
 
        if (mdoc->meta.os)
                free(mdoc->meta.os);
 
-       if ( ! concat(mdoc, buf, n->child, BUFSIZ))
+       buf[0] = '\0';
+       if (-1 == (c = concat(buf, n->child, BUFSIZ))) {
+               mdoc_nmsg(mdoc, n->child, MANDOCERR_MEM);
                return(0);
                return(0);
+       }
+
+       assert(c);
 
        /* XXX: yes, these can all be dynamically-adjusted buffers, but
         * it's really not worth the extra hackery.
 
        /* XXX: yes, these can all be dynamically-adjusted buffers, but
         * it's really not worth the extra hackery.
@@ -2151,7 +2193,7 @@ post_os(POST_ARGS)
                        return(0);
                }
 #else /*!OSNAME */
                        return(0);
                }
 #else /*!OSNAME */
-               if (uname(&utsname)) {
+               if (-1 == uname(&utsname)) {
                        mdoc_nmsg(mdoc, n, MANDOCERR_UNAME);
                         mdoc->meta.os = mandoc_strdup("UNKNOWN");
                         return(post_prol(mdoc));
                        mdoc_nmsg(mdoc, n, MANDOCERR_UNAME);
                         mdoc->meta.os = mandoc_strdup("UNKNOWN");
                         return(post_prol(mdoc));
@@ -2205,36 +2247,130 @@ post_std(POST_ARGS)
        return(1);
 }
 
        return(1);
 }
 
+/*
+ * Concatenate a node, stopping at the first non-text.
+ * Concatenation is separated by a single whitespace.  
+ * Returns -1 on fatal (string overrun) error, 0 if child nodes were
+ * encountered, 1 otherwise.
+ */
 static int
 static int
-concat(struct mdoc *m, char *p, const struct mdoc_node *n, size_t sz)
+concat(char *p, const struct mdoc_node *n, size_t sz)
 {
 
 {
 
-       p[0] = '\0';
+       for ( ; NULL != n; n = n->next) {
+               if (MDOC_TEXT != n->type) 
+                       return(0);
+               if ('\0' != p[0] && strlcat(p, " ", sz) >= sz)
+                       return(-1);
+               if (strlcat(p, n->string, sz) >= sz)
+                       return(-1);
+               concat(p, n->child, sz);
+       }
 
 
-       /*
-        * Concatenate sibling nodes together.  All siblings must be of
-        * type MDOC_TEXT or an assertion is raised.  Concatenation is
-        * separated by a single whitespace.  Returns 0 on fatal (string
-        * overrun) error.
-        */
+       return(1);
+}
 
 
-       for ( ; n; n = n->next) {
-               assert(MDOC_TEXT == n->type);
+static enum mdoc_sec 
+a2sec(const char *p)
+{
+       int              i;
 
 
-               if (strlcat(p, n->string, sz) >= sz) {
-                       mdoc_nmsg(m, n, MANDOCERR_MEM);
-                       return(0);
-               }
+       for (i = 0; i < (int)SEC__MAX; i++) 
+               if (secnames[i] && 0 == strcmp(p, secnames[i]))
+                       return((enum mdoc_sec)i);
 
 
-               if (NULL == n->next)
-                       continue;
+       return(SEC_CUSTOM);
+}
 
 
-               if (strlcat(p, " ", sz) >= sz) {
-                       mdoc_nmsg(m, n, MANDOCERR_MEM);
-                       return(0);
-               }
-       }
+static size_t
+macro2len(enum mdoct macro)
+{
 
 
-       return(1);
+       switch (macro) {
+       case(MDOC_Ad):
+               return(12);
+       case(MDOC_Ao):
+               return(12);
+       case(MDOC_An):
+               return(12);
+       case(MDOC_Aq):
+               return(12);
+       case(MDOC_Ar):
+               return(12);
+       case(MDOC_Bo):
+               return(12);
+       case(MDOC_Bq):
+               return(12);
+       case(MDOC_Cd):
+               return(12);
+       case(MDOC_Cm):
+               return(10);
+       case(MDOC_Do):
+               return(10);
+       case(MDOC_Dq):
+               return(12);
+       case(MDOC_Dv):
+               return(12);
+       case(MDOC_Eo):
+               return(12);
+       case(MDOC_Em):
+               return(10);
+       case(MDOC_Er):
+               return(17);
+       case(MDOC_Ev):
+               return(15);
+       case(MDOC_Fa):
+               return(12);
+       case(MDOC_Fl):
+               return(10);
+       case(MDOC_Fo):
+               return(16);
+       case(MDOC_Fn):
+               return(16);
+       case(MDOC_Ic):
+               return(10);
+       case(MDOC_Li):
+               return(16);
+       case(MDOC_Ms):
+               return(6);
+       case(MDOC_Nm):
+               return(10);
+       case(MDOC_No):
+               return(12);
+       case(MDOC_Oo):
+               return(10);
+       case(MDOC_Op):
+               return(14);
+       case(MDOC_Pa):
+               return(32);
+       case(MDOC_Pf):
+               return(12);
+       case(MDOC_Po):
+               return(12);
+       case(MDOC_Pq):
+               return(12);
+       case(MDOC_Ql):
+               return(16);
+       case(MDOC_Qo):
+               return(12);
+       case(MDOC_So):
+               return(12);
+       case(MDOC_Sq):
+               return(12);
+       case(MDOC_Sy):
+               return(6);
+       case(MDOC_Sx):
+               return(16);
+       case(MDOC_Tn):
+               return(10);
+       case(MDOC_Va):
+               return(12);
+       case(MDOC_Vt):
+               return(12);
+       case(MDOC_Xr):
+               return(10);
+       default:
+               break;
+       };
+       return(0);
 }
 }
-
A git conversion mirror of mandoc.bsd.lv