]> git.cameronkatri.com Git - mandoc.git/blobdiff - mdoc_validate.c
Get ready for a version.
[mandoc.git] / mdoc_validate.c
index 6a65ea6d6efb44e326b2874d2fd3b1dd1cf6fd13..060ccdadec38c27390e8c7a94d9f4e616a7cd6fe 100644 (file)
@@ -1,6 +1,7 @@
-/*     $Id: mdoc_validate.c,v 1.143 2010/12/16 00:57:50 kristaps Exp $ */
+/*     $Id: mdoc_validate.c,v 1.182 2012/03/23 05:50:25 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"
@@ -53,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);
@@ -71,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);
@@ -98,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);
@@ -106,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);
@@ -137,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 };
@@ -177,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 */
@@ -192,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 */
@@ -218,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 */
@@ -239,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 */
@@ -249,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 */
@@ -268,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 */
@@ -286,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 */ 
@@ -321,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)
@@ -329,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);
@@ -357,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);
@@ -376,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);
@@ -387,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;
@@ -401,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
@@ -429,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)
 {
@@ -460,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
@@ -489,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)
 {
@@ -526,32 +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;
-
-               if ('\0' == *p)
-                       break;
-
-               pos += (int)sz;
-
-               if ('\t' == *p) {
-                       if ( ! (MDOC_LITERAL & m->flags))
-                               mdoc_pmsg(m, ln, pos, MANDOCERR_BADTAB);
-                       continue;
-               }
+       char            *cp;
 
 
-               if (0 == (c = mandoc_special(p))) {
-                       mdoc_pmsg(m, ln, pos, MANDOCERR_BADESCAPE);
-                       continue;
-               }
+       if (MDOC_LITERAL & m->flags)
+               return;
 
 
-               p += c - 1;
-               pos += c - 1;
-       }
+       for (cp = p; NULL != (p = strchr(p, '\t')); p++)
+               mdoc_pmsg(m, ln, pos + (int)(p - cp), MANDOCERR_BADTAB);
 }
 
 static int
 }
 
 static int
@@ -563,10 +561,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);
 }
 
@@ -609,8 +606,6 @@ 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);
-               assert(np->data.Bl);
-               n->data.Bl = np->data.Bl;
                return(1);
        }
 
                return(1);
        }
 
@@ -620,9 +615,6 @@ pre_bl(PRE_ARGS)
         * ones.  If we find no list type, we default to LIST_item.
         */
 
         * ones.  If we find no list type, we default to LIST_item.
         */
 
-       assert(NULL == n->data.Bl);
-       n->data.Bl = mandoc_calloc(1, sizeof(struct mdoc_bl));
-
        /* LINTED */
        for (i = 0; n->args && i < (int)n->args->argc; i++) {
                lt = LIST__NONE;
        /* LINTED */
        for (i = 0; n->args && i < (int)n->args->argc; i++) {
                lt = LIST__NONE;
@@ -665,18 +657,23 @@ pre_bl(PRE_ARGS)
                        break;
                /* Set list arguments. */
                case (MDOC_Compact):
                        break;
                /* Set list arguments. */
                case (MDOC_Compact):
-                       dup = n->data.Bl->comp;
+                       dup = n->norm->Bl.comp;
                        comp = 1;
                        break;
                case (MDOC_Width):
                        comp = 1;
                        break;
                case (MDOC_Width):
-                       dup = (NULL != n->data.Bl->width);
-                       width = n->args->argv[i].value[0];
+                       /* NB: this can be empty! */
+                       if (n->args->argv[i].sz) {
+                               width = n->args->argv[i].value[0];
+                               dup = (NULL != n->norm->Bl.width);
+                               break;
+                       }
+                       mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                        break;
                case (MDOC_Offset):
                        /* NB: this can be empty! */
                        if (n->args->argv[i].sz) {
                                offs = 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->data.Bl->offs);
+                               dup = (NULL != n->norm->Bl.offs);
                                break;
                        }
                        mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                                break;
                        }
                        mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
@@ -691,36 +688,36 @@ pre_bl(PRE_ARGS)
                        mdoc_nmsg(mdoc, n, MANDOCERR_ARGVREP);
 
                if (comp && ! dup)
                        mdoc_nmsg(mdoc, n, MANDOCERR_ARGVREP);
 
                if (comp && ! dup)
-                       n->data.Bl->comp = comp;
+                       n->norm->Bl.comp = comp;
                if (offs && ! dup)
                if (offs && ! dup)
-                       n->data.Bl->offs = offs;
+                       n->norm->Bl.offs = offs;
                if (width && ! dup)
                if (width && ! dup)
-                       n->data.Bl->width = width;
+                       n->norm->Bl.width = width;
 
                /* Check: multiple list types. */
 
 
                /* Check: multiple list types. */
 
-               if (LIST__NONE != lt && n->data.Bl->type != LIST__NONE)
+               if (LIST__NONE != lt && n->norm->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->data.Bl->type == LIST__NONE) {
-                       n->data.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->data.Bl->ncols = 
+                               n->norm->Bl.ncols = 
                                        n->args->argv[i].sz;
                                        n->args->argv[i].sz;
-                               n->data.Bl->cols = (const char **)
+                               n->norm->Bl.cols = (void *)
                                        n->args->argv[i].value;
                        }
                }
 
                /* The list type should come first. */
 
                                        n->args->argv[i].value;
                        }
                }
 
                /* The list type should come first. */
 
-               if (n->data.Bl->type == LIST__NONE)
-                       if (n->data.Bl->width || 
-                                       n->data.Bl->offs || 
-                                       n->data.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;
@@ -728,9 +725,9 @@ pre_bl(PRE_ARGS)
 
        /* Allow lists to default to LIST_item. */
 
 
        /* Allow lists to default to LIST_item. */
 
-       if (LIST__NONE == n->data.Bl->type) {
+       if (LIST__NONE == n->norm->Bl.type) {
                mdoc_nmsg(mdoc, n, MANDOCERR_LISTTYPE);
                mdoc_nmsg(mdoc, n, MANDOCERR_LISTTYPE);
-               n->data.Bl->type = LIST_item;
+               n->norm->Bl.type = LIST_item;
        }
 
        /* 
        }
 
        /* 
@@ -739,9 +736,9 @@ pre_bl(PRE_ARGS)
         * and must also be warned.
         */
 
         * and must also be warned.
         */
 
-       switch (n->data.Bl->type) {
+       switch (n->norm->Bl.type) {
        case (LIST_tag):
        case (LIST_tag):
-               if (n->data.Bl->width)
+               if (n->norm->Bl.width)
                        break;
                mdoc_nmsg(mdoc, n, MANDOCERR_NOWIDTHARG);
                break;
                        break;
                mdoc_nmsg(mdoc, n, MANDOCERR_NOWIDTHARG);
                break;
@@ -754,7 +751,7 @@ pre_bl(PRE_ARGS)
        case (LIST_inset):
                /* FALLTHROUGH */
        case (LIST_item):
        case (LIST_inset):
                /* FALLTHROUGH */
        case (LIST_item):
-               if (n->data.Bl->width)
+               if (n->norm->Bl.width)
                        mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                break;
        default:
                        mdoc_nmsg(mdoc, n, MANDOCERR_IGNARGV);
                break;
        default:
@@ -783,14 +780,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);
-               assert(np->data.Bd);
-               n->data.Bd = np->data.Bd;
                return(1);
        }
 
                return(1);
        }
 
-       assert(NULL == n->data.Bd);
-       n->data.Bd = mandoc_calloc(1, sizeof(struct mdoc_bd));
-
        /* 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;
@@ -820,14 +812,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->data.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->data.Bd->comp;
+                       dup = n->norm->Bd.comp;
                        break;
                default:
                        abort();
                        break;
                default:
                        abort();
@@ -842,24 +834,24 @@ pre_bd(PRE_ARGS)
                /* Make our auxiliary assignments. */
 
                if (offs && ! dup)
                /* Make our auxiliary assignments. */
 
                if (offs && ! dup)
-                       n->data.Bd->offs = offs;
+                       n->norm->Bd.offs = offs;
                if (comp && ! dup)
                if (comp && ! dup)
-                       n->data.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->data.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->data.Bd->type == DISP__NONE)
-                       n->data.Bd->type = dt;
+               if (DISP__NONE != dt && n->norm->Bd.type == DISP__NONE)
+                       n->norm->Bd.type = dt;
        }
 
        }
 
-       if (DISP__NONE == n->data.Bd->type) {
+       if (DISP__NONE == n->norm->Bd.type) {
                mdoc_nmsg(mdoc, n, MANDOCERR_DISPTYPE);
                mdoc_nmsg(mdoc, n, MANDOCERR_DISPTYPE);
-               n->data.Bd->type = DISP_ragged;
+               n->norm->Bd.type = DISP_ragged;
        }
 
        return(1);
        }
 
        return(1);
@@ -883,7 +875,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));
 }
 
@@ -912,9 +904,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->data.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->data.An.auth = AUTH_nosplit;
+               n->norm->An.auth = AUTH_nosplit;
        else
                abort();
 
        else
                abort();
 
@@ -937,7 +929,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)
@@ -950,7 +942,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)
@@ -996,15 +988,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);
-               assert(np->data.Bf);
-               mdoc->last->data.Bf = np->data.Bf;
                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);
-       np->data.Bf = mandoc_calloc(1, sizeof(struct mdoc_bf));
 
        /* 
         * Cannot have both argument and parameter.
 
        /* 
         * Cannot have both argument and parameter.
@@ -1024,11 +1013,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->data.Bf->font = FONT_Em;
+                       np->norm->Bf.font = FONT_Em;
                else if (MDOC_Literal == arg)
                else if (MDOC_Literal == arg)
-                       np->data.Bf->font = FONT_Li;
+                       np->norm->Bf.font = FONT_Li;
                else if (MDOC_Symbolic == arg)
                else if (MDOC_Symbolic == arg)
-                       np->data.Bf->font = FONT_Sy;
+                       np->norm->Bf.font = FONT_Sy;
                else
                        abort();
                return(1);
                else
                        abort();
                return(1);
@@ -1037,11 +1026,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->data.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->data.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->data.Bf->font = FONT_Sy;
+               np->norm->Bf.font = FONT_Sy;
        else 
                mdoc_nmsg(mdoc, np, MANDOCERR_FONTTYPE);
 
        else 
                mdoc_nmsg(mdoc, np, MANDOCERR_FONTTYPE);
 
@@ -1055,6 +1044,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);
 
@@ -1098,12 +1089,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);
        
@@ -1119,6 +1109,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. */
 
@@ -1130,11 +1121,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);
 }
 
@@ -1247,17 +1241,12 @@ post_an(POST_ARGS)
        struct mdoc_node *np;
 
        np = mdoc->last;
        struct mdoc_node *np;
 
        np = mdoc->last;
-       if (AUTH__NONE != np->data.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->data.An.auth || np->child)
-               return(1);
-
-       mdoc_nmsg(mdoc, np, MANDOCERR_NOARGS);
        return(1);
 }
 
        return(1);
 }
 
@@ -1265,7 +1254,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;
@@ -1274,8 +1263,7 @@ post_it(POST_ARGS)
                return(1);
 
        n = mdoc->last->parent->parent;
                return(1);
 
        n = mdoc->last->parent->parent;
-       assert(n->data.Bl);
-       lt = n->data.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);
@@ -1314,7 +1302,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->data.Bl->ncols;
+               cols = (int)n->norm->Bl.ncols;
 
                assert(NULL == mdoc->last->head->child);
 
 
                assert(NULL == mdoc->last->head->child);
 
@@ -1332,10 +1320,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;
        }
@@ -1358,17 +1346,17 @@ post_bl_block(POST_ARGS)
 
        n = mdoc->last;
 
 
        n = mdoc->last;
 
-       if (LIST_tag == n->data.Bl->type && 
-                       NULL == n->data.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->data.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->data.Bl->width);
+       assert(n->norm->Bl.width);
        return(1);
 }
 
        return(1);
 }
 
@@ -1392,11 +1380,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->data.Bl->width, "Ds"))
+       if (0 == strcmp(n->norm->Bl.width, "Ds"))
                width = 6;
                width = 6;
-       else if (MDOC_MAX == (tok = mdoc_hash_find(n->data.Bl->width)))
+       else if (MDOC_MAX == (tok = mdoc_hash_find(n->norm->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);
        }
@@ -1411,12 +1399,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->data.Bl->width = n->args->argv[i].value[0];
+       n->norm->Bl.width = n->args->argv[i].value[0];
        return(1);
 }
 
        return(1);
 }
 
@@ -1453,7 +1441,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;
@@ -1461,7 +1449,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.
@@ -1482,7 +1470,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->data.Bl->width = n->args->argv[i].value[0];
+       n->norm->Bl.width = n->args->argv[i].value[0];
        return(1);
 }
 
        return(1);
 }
 
@@ -1493,7 +1481,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->data.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));
 
@@ -1510,7 +1498,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->data.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)
@@ -1527,7 +1515,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.
         */
@@ -1536,8 +1524,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->data.Bl->ncols = np->args->argv[j].sz;
-       mdoc->last->data.Bl->cols = (const char **)np->args->argv[j].value;
+       mdoc->last->norm->Bl.ncols = np->args->argv[j].sz;
+       mdoc->last->norm->Bl.cols = (void *)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;
@@ -1567,12 +1555,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;
@@ -1589,8 +1579,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);
 
@@ -1639,18 +1633,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);
@@ -1662,8 +1661,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
@@ -1678,6 +1687,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;
                }
@@ -1687,6 +1698,14 @@ post_rs(POST_ARGS)
                mdoc_node_delete(mdoc, nn);
        }
 
                mdoc_node_delete(mdoc, nn);
        }
 
+       /*
+        * Nothing to sort if only invalid nodes were found
+        * inside the `Rs' body.
+        */
+
+       if (NULL == mdoc->last->child)
+               return(1);
+
        /*
         * The full `Rs' block needs special handling to order the
         * sub-elements according to `rsord'.  Pick through each element
        /*
         * The full `Rs' block needs special handling to order the
         * sub-elements according to `rsord'.  Pick through each element
@@ -1752,6 +1771,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)
 {
@@ -1803,7 +1831,9 @@ static int
 post_sh_head(POST_ARGS)
 {
        char             buf[BUFSIZ];
 post_sh_head(POST_ARGS)
 {
        char             buf[BUFSIZ];
+       struct mdoc_node *n;
        enum mdoc_sec    sec;
        enum mdoc_sec    sec;
+       int              c;
 
        /*
         * Process a new section.  Sections are either "named" or
 
        /*
         * Process a new section.  Sections are either "named" or
@@ -1812,10 +1842,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. */
 
@@ -1833,6 +1866,20 @@ post_sh_head(POST_ARGS)
 
        mdoc->lastsec = sec;
 
 
        mdoc->lastsec = sec;
 
+       /*
+        * Set the section attribute for the current HEAD, for its
+        * parent BLOCK, and for the HEAD children; the latter can
+        * only be TEXT nodes, so no recursion is needed.
+        * For other blocks and elements, including .Sh BODY, this is
+        * done when allocating the node data structures, but for .Sh
+        * BLOCK and HEAD, the section is still unknown at that time.
+        */
+
+       mdoc->last->parent->sec = sec;
+       mdoc->last->sec = sec;
+       for (n = mdoc->last->child; n; n = n->next)
+               n->sec = sec;
+
        /* We don't care about custom sections after this. */
 
        if (SEC_CUSTOM == sec)
        /* We don't care about custom sections after this. */
 
        if (SEC_CUSTOM == sec)
@@ -1917,11 +1964,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->data.Bl->comp)
+       if (MDOC_Bl == n->tok && n->norm->Bl.comp)
                return(1);
                return(1);
-       if (MDOC_Bd == n->tok && n->data.Bd->comp)
+       if (MDOC_Bd == n->tok && n->norm->Bd.comp)
                return(1);
                return(1);
-       if (MDOC_It == n->tok && n->parent->data.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);
@@ -1946,10 +1993,9 @@ pre_literal(PRE_ARGS)
                mdoc->flags |= MDOC_LITERAL;
                break;
        case (MDOC_Bd):
                mdoc->flags |= MDOC_LITERAL;
                break;
        case (MDOC_Bd):
-               assert(n->data.Bd);
-               if (DISP_literal == n->data.Bd->type)
+               if (DISP_literal == n->norm->Bd.type)
                        mdoc->flags |= MDOC_LITERAL;
                        mdoc->flags |= MDOC_LITERAL;
-               if (DISP_unfilled == n->data.Bd->type)
+               if (DISP_unfilled == n->norm->Bd.type)
                        mdoc->flags |= MDOC_LITERAL;
                break;
        default:
                        mdoc->flags |= MDOC_LITERAL;
                break;
        default:
@@ -1965,25 +2011,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);
 }
 
@@ -2009,7 +2058,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;
 
                        /* 
@@ -2055,7 +2104,7 @@ post_dt(POST_ARGS)
         *       arch = NULL
         */
 
         *       arch = NULL
         */
 
-       cp = mdoc_a2msec(nn->string);
+       cp = mandoc_a2msec(nn->string);
        if (cp) {
                mdoc->meta.vol = mandoc_strdup(cp);
                mdoc->meta.msec = mandoc_strdup(nn->string);
        if (cp) {
                mdoc->meta.vol = mandoc_strdup(cp);
                mdoc->meta.msec = mandoc_strdup(nn->string);
@@ -2111,11 +2160,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
@@ -2132,8 +2201,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.
@@ -2146,7 +2220,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));
@@ -2200,36 +2274,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);
 }
 }
-