===================================================================
RCS file: /cvs/docbook2mdoc/docbook2mdoc.c,v
retrieving revision 1.1.1.1
retrieving revision 1.8
diff -u -p -r1.1.1.1 -r1.8
--- docbook2mdoc/docbook2mdoc.c	2014/03/28 02:04:47	1.1.1.1
+++ docbook2mdoc/docbook2mdoc.c	2014/03/28 12:11:18	1.8
@@ -1,4 +1,4 @@
-/*	$Id: docbook2mdoc.c,v 1.1.1.1 2014/03/28 02:04:47 kristaps Exp $ */
+/*	$Id: docbook2mdoc.c,v 1.8 2014/03/28 12:11:18 kristaps Exp $ */
 /*
  * Copyright (c) 2014 Kristaps Dzonsons <kristaps@bsd.lv>
  *
@@ -24,6 +24,7 @@
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
+#include <unistd.h>
 
 /*
  * All recognised node types.
@@ -31,12 +32,21 @@
 enum	nodeid {
 	NODE_ROOT = 0, /* Must comes first. */
 	/* Alpha-ordered hereafter. */
+	NODE_ARG,
 	NODE_CITEREFENTRY,
+	NODE_CMDSYNOPSIS,
 	NODE_CODE,
+	NODE_COMMAND,
+	NODE_FUNCDEF,
+	NODE_FUNCPROTOTYPE,
 	NODE_FUNCSYNOPSIS,
 	NODE_FUNCSYNOPSISINFO,
+	NODE_FUNCTION,
 	NODE_MANVOLNUM, 
+	NODE_OPTION,
 	NODE_PARA,
+	NODE_PARAMDEF,
+	NODE_PARAMETER,
 	NODE_PROGRAMLISTING,
 	NODE_REFCLASS,
 	NODE_REFDESCRIPTOR,
@@ -49,6 +59,7 @@ enum	nodeid {
 	NODE_REFPURPOSE,
 	NODE_REFSECT1,
 	NODE_REFSYNOPSISDIV,
+	NODE_STRUCTNAME,
 	NODE_SYNOPSIS,
 	NODE_TEXT, 
 	NODE_TITLE,
@@ -64,13 +75,13 @@ struct	parse {
 	int		 stop; /* should we stop now? */
 	struct pnode	*root; /* root of parse tree */
 	struct pnode	*cur; /* current node in tree */
-	char		*b;
-	size_t		 bsz;
-	size_t		 mbsz;
+	char		*b; /* nil-terminated buffer for pre-print */
+	size_t		 bsz; /* current length of b */
+	size_t		 mbsz; /* max bsz allocation */
 };
 
 struct	node {
-	const char	*name;
+	const char	*name; /* docbook element name */
 	unsigned int	 flags;
 #define	NODE_IGNTEXT	 1 /* ignore all contained text */
 };
@@ -88,12 +99,21 @@ struct	pnode {
 
 static	const struct node nodes[NODE__MAX] = {
 	{ NULL, 0 }, 
+	{ "arg", 0 }, 
 	{ "citerefentry", NODE_IGNTEXT }, 
+	{ "cmdsynopsis", NODE_IGNTEXT }, 
 	{ "code", 0 }, 
+	{ "command", 0 }, 
+	{ "funcdef", 0 },
+	{ "funcprototype", NODE_IGNTEXT }, 
 	{ "funcsynopsis", NODE_IGNTEXT }, 
 	{ "funcsynopsisinfo", 0 }, 
+	{ "function", 0 }, 
 	{ "manvolnum", 0 }, 
+	{ "option", 0 }, 
 	{ "para", 0 }, 
+	{ "paramdef", 0 },
+	{ "parameter", 0 }, 
 	{ "programlisting", 0 }, 
 	{ "refclass", NODE_IGNTEXT }, 
 	{ "refdescriptor", NODE_IGNTEXT }, 
@@ -106,6 +126,7 @@ static	const struct node nodes[NODE__MAX] = {
 	{ "refpurpose", 0 }, 
 	{ "refsect1", 0 }, 
 	{ "refsynopsisdiv", NODE_IGNTEXT }, 
+	{ "structname", 0 }, 
 	{ "synopsis", 0 }, 
 	{ NULL, 0 }, 
 	{ "title", 0 }, 
@@ -113,6 +134,8 @@ static	const struct node nodes[NODE__MAX] = {
 
 /*
  * Look up whether "parent" is a valid parent for "node".
+ * This is sucked directly from the DocBook specification: look at the
+ * "children" and "parent" sections of each node.
  */
 static int
 isparent(enum nodeid node, enum nodeid parent)
@@ -121,6 +144,15 @@ isparent(enum nodeid node, enum nodeid parent)
 	switch (node) {
 	case (NODE_ROOT):
 		return(0);
+	case (NODE_ARG):
+		switch (parent) {
+		case (NODE_ARG):
+		case (NODE_CMDSYNOPSIS):
+			return(1);
+		default:
+			break;
+		}
+		return(0);
 	case (NODE_CITEREFENTRY):
 		switch (parent) {
 		case (NODE_FUNCSYNOPSISINFO):
@@ -137,6 +169,16 @@ isparent(enum nodeid node, enum nodeid parent)
 			break;
 		}
 		return(0);
+	case (NODE_CMDSYNOPSIS):
+		switch (parent) {
+		case (NODE_PARA):
+		case (NODE_REFSECT1):
+		case (NODE_REFSYNOPSISDIV):
+			return(1);
+		default:
+			break;
+		}
+		return(0);
 	case (NODE_CODE):
 		switch (parent) {
 		case (NODE_FUNCSYNOPSISINFO):
@@ -153,15 +195,27 @@ isparent(enum nodeid node, enum nodeid parent)
 			break;
 		}
 		return(0);
-	case (NODE_MANVOLNUM):
+	case (NODE_COMMAND):
 		switch (parent) {
-		case (NODE_CITEREFENTRY):
-		case (NODE_REFMETA):
+		case (NODE_CMDSYNOPSIS):
+		case (NODE_FUNCSYNOPSISINFO):
+		case (NODE_PARA):
+		case (NODE_PROGRAMLISTING):
+		case (NODE_REFDESCRIPTOR):
+		case (NODE_REFENTRYTITLE):
+		case (NODE_REFNAME):
+		case (NODE_REFPURPOSE):
+		case (NODE_SYNOPSIS):
+		case (NODE_TITLE):
 			return(1);
 		default:
 			break;
 		}
 		return(0);
+	case (NODE_FUNCDEF):
+		return(NODE_FUNCPROTOTYPE == parent);
+	case (NODE_FUNCPROTOTYPE):
+		return(NODE_FUNCSYNOPSIS == parent);
 	case (NODE_FUNCSYNOPSIS):
 		switch (parent) {
 		case (NODE_PARA):
@@ -174,6 +228,50 @@ isparent(enum nodeid node, enum nodeid parent)
 		return(0);
 	case (NODE_FUNCSYNOPSISINFO):
 		return(NODE_FUNCSYNOPSIS == parent);
+	case (NODE_FUNCTION):
+		switch (parent) {
+		case (NODE_CODE):
+		case (NODE_FUNCDEF):
+		case (NODE_FUNCSYNOPSISINFO):
+		case (NODE_PARA):
+		case (NODE_PROGRAMLISTING):
+		case (NODE_REFDESCRIPTOR):
+		case (NODE_REFENTRYTITLE):
+		case (NODE_REFNAME):
+		case (NODE_REFPURPOSE):
+		case (NODE_SYNOPSIS):
+		case (NODE_TITLE):
+			return(1);
+		default:
+			break;
+		}
+		return(0);
+	case (NODE_MANVOLNUM):
+		switch (parent) {
+		case (NODE_CITEREFENTRY):
+		case (NODE_REFMETA):
+			return(1);
+		default:
+			break;
+		}
+		return(0);
+	case (NODE_OPTION):
+		switch (parent) {
+		case (NODE_ARG):
+		case (NODE_FUNCSYNOPSISINFO):
+		case (NODE_PARA):
+		case (NODE_PROGRAMLISTING):
+		case (NODE_REFDESCRIPTOR):
+		case (NODE_REFENTRYTITLE):
+		case (NODE_REFNAME):
+		case (NODE_REFPURPOSE):
+		case (NODE_SYNOPSIS):
+		case (NODE_TITLE):
+			return(1);
+		default:
+			break;
+		}
+		return(0);
 	case (NODE_PARA):
 		switch (parent) {
 		case (NODE_REFSECT1):
@@ -183,6 +281,26 @@ isparent(enum nodeid node, enum nodeid parent)
 			break;
 		}
 		return(0);
+	case (NODE_PARAMDEF):
+		return(NODE_FUNCPROTOTYPE == parent);
+	case (NODE_PARAMETER):
+		switch (parent) {
+		case (NODE_CODE):
+		case (NODE_FUNCSYNOPSISINFO):
+		case (NODE_PARA):
+		case (NODE_PARAMDEF):
+		case (NODE_PROGRAMLISTING):
+		case (NODE_REFDESCRIPTOR):
+		case (NODE_REFENTRYTITLE):
+		case (NODE_REFNAME):
+		case (NODE_REFPURPOSE):
+		case (NODE_SYNOPSIS):
+		case (NODE_TITLE):
+			return(1);
+		default:
+			break;
+		}
+		return(0);
 	case (NODE_PROGRAMLISTING):
 		switch (parent) {
 		case (NODE_PARA):
@@ -221,6 +339,26 @@ isparent(enum nodeid node, enum nodeid parent)
 		return(parent == NODE_REFENTRY);
 	case (NODE_REFSYNOPSISDIV):
 		return(parent == NODE_REFENTRY);
+	case (NODE_STRUCTNAME):
+		switch (parent) {
+		case (NODE_CODE):
+		case (NODE_FUNCSYNOPSISINFO):
+		case (NODE_FUNCTION):
+		case (NODE_OPTION):
+		case (NODE_PARA):
+		case (NODE_PARAMETER):
+		case (NODE_PROGRAMLISTING):
+		case (NODE_REFDESCRIPTOR):
+		case (NODE_REFENTRYTITLE):
+		case (NODE_REFNAME):
+		case (NODE_REFPURPOSE):
+		case (NODE_SYNOPSIS):
+		case (NODE_TITLE):
+			return(1);
+		default:
+			break;
+		}
+		return(0);
 	case (NODE_SYNOPSIS):
 		switch (parent) {
 		case (NODE_REFSYNOPSISDIV):
@@ -249,11 +387,18 @@ isparent(enum nodeid node, enum nodeid parent)
 	return(0);
 }
 
+/*
+ * Process a stream of characters.
+ * We store text as nodes in and of themselves.
+ * If a text node is already open, append to it.
+ * If it's not open, open one under the current context.
+ */
 static void
 xml_char(void *arg, const XML_Char *p, int sz)
 {
 	struct parse	*ps = arg;
 	struct pnode	*dat;
+	int		 i;
 
 	/* Stopped or no tree yet. */
 	if (ps->stop || NODE_ROOT == ps->node)
@@ -268,8 +413,15 @@ xml_char(void *arg, const XML_Char *p, int sz)
 	 * Are we in the midst of processing text?
 	 * If we're not processing text right now, then create a text
 	 * node for doing so.
+	 * However, don't do so unless we have some non-whitespace to
+	 * process!
 	 */
 	if (NODE_TEXT != ps->node) {
+		for (i = 0; i < sz; i++)
+			if ( ! isspace((int)p[i]))
+				break;
+		if (i == sz)
+			return;
 		dat = calloc(1, sizeof(struct pnode));
 		if (NULL == dat) {
 			perror(NULL);
@@ -301,10 +453,13 @@ xml_char(void *arg, const XML_Char *p, int sz)
  * Begin an element.
  * First, look for the element.
  * If we don't find it and we're not parsing, keep going.
- * If we don't find it (and we're parsing), puke and exit.
+ * If we don't find it and we're parsing, puke and exit.
  * If we find it but we're not parsing yet (i.e., it's not a refentry
  * and thus out of context), keep going.
- * If we're at the root and already have a tree, puke and exit.
+ * If we find it and we're at the root and already have a tree, puke and
+ * exit (FIXME: I don't think this is right?).
+ * If we find it but we're parsing a text node, close out the text node,
+ * return to its parent, and keep going.
  * Make sure that the element is in the right context.
  * Lastly, put the node onto our parse tree and continue.
  */
@@ -332,6 +487,7 @@ xml_elem_start(void *arg, const XML_Char *name, const 
 		else if (0 == strcmp(nodes[node].name, name))
 			break;
 
+	/* FIXME: do more with these error messages... */
 	if (NODE__MAX == node && NODE_ROOT == ps->node) {
 		fprintf(stderr, "%s: ignoring node\n", name);
 		return;
@@ -371,7 +527,7 @@ xml_elem_start(void *arg, const XML_Char *name, const 
 
 /*
  * Roll up the parse tree.
- * Does nothing else special.
+ * If we're at a text node, roll that one up first.
  * If we hit the root, then assign ourselves as the NODE_ROOT.
  */
 static void
@@ -396,6 +552,9 @@ xml_elem_end(void *arg, const XML_Char *name)
 		ps->node = ps->cur->node;
 }
 
+/*
+ * Recursively free a node (NULL is ok).
+ */
 static void
 pnode_free(struct pnode *pn)
 {
@@ -413,6 +572,9 @@ pnode_free(struct pnode *pn)
 	free(pn);
 }
 
+/*
+ * Unlink a node from its parent and pnode_free() it.
+ */
 static void
 pnode_unlink(struct pnode *pn)
 {
@@ -422,13 +584,32 @@ pnode_unlink(struct pnode *pn)
 	pnode_free(pn);
 }
 
+/*
+ * Unlink all children of a node and pnode_free() them.
+ */
 static void
+pnode_unlinksub(struct pnode *pn)
+{
+
+	while ( ! TAILQ_EMPTY(&pn->childq))
+		pnode_unlink(TAILQ_FIRST(&pn->childq));
+}
+
+/*
+ * Reset the lookaside buffer.
+ */
+static void
 bufclear(struct parse *p)
 {
 
 	p->b[p->bsz = 0] = '\0';
 }
 
+/*
+ * Append NODE_TEXT contents to the current buffer, reallocating its
+ * size if necessary.
+ * The buffer is ALWAYS nil-terminated.
+ */
 static void
 bufappend(struct parse *p, struct pnode *pn)
 {
@@ -447,22 +628,33 @@ bufappend(struct parse *p, struct pnode *pn)
 }
 
 /*
- * Print text presumably on a macro line.
- * Ignore any child macros.
+ * Recursively append all NODE_TEXT nodes to the buffer.
+ * This descends into non-text nodes, but doesn't do anything beyond
+ * them.
+ * In other words, this is a recursive text grok.
+ */
+static void
+bufappend_r(struct parse *p, struct pnode *pn)
+{
+	struct pnode	*pp;
+
+	if (NODE_TEXT == pn->node)
+		bufappend(p, pn);
+	TAILQ_FOREACH(pp, &pn->childq, child)
+		bufappend_r(p, pp);
+}
+
+/*
+ * Recursively print text presumably on a macro line.
  * Convert all whitespace to regular spaces.
  */
 static void
 pnode_printmacrolinepart(struct parse *p, struct pnode *pn)
 {
-	struct pnode	*pp;
 	char		*cp;
 
 	bufclear(p);
-	while (NULL != (pp = TAILQ_FIRST(&pn->childq))) {
-		if (NODE_TEXT == pp->node)
-			bufappend(p, pp);
-		pnode_unlink(pp);
-	}
+	bufappend_r(p, pn);
 
 	/* Convert all space to spaces. */
 	for (cp = p->b; '\0' != *cp; cp++)
@@ -470,8 +662,7 @@ pnode_printmacrolinepart(struct parse *p, struct pnode
 			*cp = ' ';
 
 	for (cp = p->b; isspace((int)*cp); cp++)
-		/* Spin. */ ;
-
+		/* Spin past whitespace (XXX: necessary?) */ ;
 	for ( ; '\0' != *cp; cp++) {
 		/* Escape us if we look like a macro. */
 		if ((cp == p->b || ' ' == *(cp - 1)) &&
@@ -503,7 +694,27 @@ pnode_printmacroline(struct parse *p, struct pnode *pn
 	putchar('\n');
 }
 
+/*
+ * Start the SYNOPSIS macro, unlinking its [superfluous] title.
+ */
 static void
+pnode_printrefsynopsisdiv(struct parse *p, struct pnode *pn)
+{
+	struct pnode	*pp;
+
+	TAILQ_FOREACH(pp, &pn->childq, child)
+		if (NODE_TITLE == pp->node) {
+			pnode_unlink(pp);
+			break;
+		}
+
+	puts(".Sh SYNOPSIS");
+}
+
+/*
+ * Start a hopefully-named `Sh' section.
+ */
+static void
 pnode_printrefsect(struct parse *p, struct pnode *pn)
 {
 	struct pnode	*pp;
@@ -512,14 +723,18 @@ pnode_printrefsect(struct parse *p, struct pnode *pn)
 		if (NODE_TITLE == pp->node)
 			break;
 
+	fputs(".Sh ", stdout);
+
 	if (NULL != pp) {
-		fputs(".Sh ", stdout);
 		pnode_printmacroline(p, pp);
 		pnode_unlink(pp);
 	} else
-		puts(".Sh UNKNOWN");
+		puts("UNKNOWN");
 }
 
+/*
+ * Start a reference, extracting the title and volume.
+ */
 static void
 pnode_printciterefentry(struct parse *p, struct pnode *pn)
 {
@@ -533,16 +748,16 @@ pnode_printciterefentry(struct parse *p, struct pnode 
 			title = pp;
 
 	fputs(".Xr ", stdout);
+
 	if (NULL != title) {
 		pnode_printmacrolinepart(p, title);
-		pnode_unlink(title);
+		putchar(' ');
 	} else
-		fputs("unknown", stdout);
-	putchar(' ');
-	if (NULL != manvol) {
+		fputs("unknown ", stdout);
+
+	if (NULL != manvol)
 		pnode_printmacroline(p, manvol);
-		pnode_unlink(manvol);
-	} else
+	else
 		puts("1");
 }
 
@@ -558,24 +773,154 @@ pnode_printrefmeta(struct parse *p, struct pnode *pn)
 		else if (NODE_REFENTRYTITLE == pp->node)
 			title = pp;
 
-	puts(".Dd $Mdocdate: March 28 2014 $");
+	puts(".Dd $Mdocdate" "$");
 	fputs(".Dt ", stdout);
 
 	if (NULL != title) {
+		/* FIXME: uppercase. */
 		pnode_printmacrolinepart(p, title);
-		pnode_unlink(title);
+		putchar(' ');
 	} else
-		fputs("UNKNOWN", stdout);
-	putchar(' ');
-	if (NULL != manvol) {
+		fputs("UNKNOWN ", stdout);
+
+	if (NULL != manvol)
 		pnode_printmacroline(p, manvol);
-		pnode_unlink(manvol);
-	} else
+	else
 		puts("1");
 
 	puts(".Os");
 }
 
+static void
+pnode_printfuncdef(struct parse *p, struct pnode *pn)
+{
+	struct pnode	*pp, *ftype, *func;
+
+	ftype = func = NULL;
+	TAILQ_FOREACH(pp, &pn->childq, child)
+		if (NODE_TEXT == pp->node)
+			ftype = pp;
+		else if (NODE_FUNCTION == pp->node)
+			func = pp;
+
+	if (NULL != ftype) {
+		fputs(".Ft ", stdout);
+		pnode_printmacroline(p, ftype);
+	}
+
+	if (NULL != func) {
+		fputs(".Fo ", stdout);
+		pnode_printmacroline(p, func);
+	} else 
+		puts(".Fo UNKNOWN");
+}
+
+static void
+pnode_printparamdef(struct parse *p, struct pnode *pn)
+{
+	struct pnode	*pp, *ptype, *param;
+
+	ptype = param = NULL;
+	TAILQ_FOREACH(pp, &pn->childq, child)
+		if (NODE_TEXT == pp->node)
+			ptype = pp;
+		else if (NODE_PARAMETER == pp->node)
+			param = pp;
+
+	fputs(".Fa \"", stdout);
+	if (NULL != ptype) {
+		pnode_printmacrolinepart(p, ptype);
+		putchar(' ');
+	}
+
+	if (NULL != param)
+		pnode_printmacrolinepart(p, param);
+	else
+		fputs("UNKNOWN", stdout);
+
+	puts("\"");
+}
+
+static void
+pnode_printfuncprototype(struct parse *p, struct pnode *pn)
+{
+	struct pnode	*pp, *fdef;
+
+	TAILQ_FOREACH(fdef, &pn->childq, child)
+		if (NODE_FUNCDEF == fdef->node) 
+			break;
+
+	if (NULL != fdef)
+		pnode_printfuncdef(p, fdef);
+	else
+		puts(".Fo UNKNOWN");
+
+	TAILQ_FOREACH(pp, &pn->childq, child) 
+		if (NODE_PARAMDEF == pp->node)
+			pnode_printparamdef(p, pp);
+
+	puts(".Fc");
+}
+
+/* TODO: handle "optional" values. */
+static void
+pnode_printarg(struct parse *p, struct pnode *pn, int nested)
+{
+	struct pnode	*pp;
+	int		 sv = nested;
+
+	if ( ! nested) 
+		fputs(".", stdout);
+	nested = 1;
+	TAILQ_FOREACH(pp, &pn->childq, child)
+		if (NODE_OPTION == pp->node) {
+			fputs("Fl ", stdout);
+			pnode_printmacrolinepart(p, pp);
+		} else if (NODE_TEXT == pp->node) {
+			fputs("Ar ", stdout);
+			pnode_printmacrolinepart(p, pp);
+		} else if (NODE_ARG == pp->node)
+			pnode_printarg(p, pp, nested);
+
+	if ( ! sv)
+		puts("");
+}
+
+/* 
+ * Recursively search and return the first instance of "node".
+ */
+static struct pnode *
+pnode_findfirst(struct pnode *pn, enum nodeid node)
+{
+	struct pnode	*pp, *res;
+
+	res = NULL;
+	TAILQ_FOREACH(pp, &pn->childq, child) {
+		res = pp->node == node ? pp :
+			pnode_findfirst(pp, node);
+		if (NULL != res)
+			break;
+	}
+
+	return(res);
+}
+
+static void
+pnode_printprologue(struct parse *p, struct pnode *pn)
+{
+	struct pnode	*pp;
+
+	if (NULL != (pp = pnode_findfirst(p->root, NODE_REFMETA))) {
+		pnode_printrefmeta(p, pp);
+		pnode_unlink(pp);
+	} else {
+		puts(".\\\" Supplying bogus prologue...");
+		puts(".Dd $Mdocdate" "$");
+		puts(".Dt UNKNOWN 1");
+		puts(".Os");
+	}
+}
+
 /*
  * Print a parsed node (or ignore it--whatever).
  * This is a recursive function.
@@ -595,30 +940,58 @@ pnode_print(struct parse *p, struct pnode *pn)
 		printf(".\\\" %s\n", nodes[pn->node].name);
 
 	switch (pn->node) {
+	case (NODE_ARG):
+		pnode_printarg(p, pn, 0);
+		pnode_unlinksub(pn);
+		break;
 	case (NODE_CITEREFENTRY):
 		pnode_printciterefentry(p, pn);
+		pnode_unlinksub(pn);
 		break;
 	case (NODE_CODE):
 		fputs(".Li ", stdout);
 		pnode_printmacroline(p, pn);
+		pnode_unlinksub(pn);
 		break;
+	case (NODE_COMMAND):
+		fputs(".Nm ", stdout);
+		pnode_printmacroline(p, pn);
+		pnode_unlinksub(pn);
+		break;
+	case (NODE_FUNCTION):
+		fputs(".Fn ", stdout);
+		pnode_printmacroline(p, pn);
+		pnode_unlinksub(pn);
+		break;
+	case (NODE_FUNCPROTOTYPE):
+		pnode_printfuncprototype(p, pn);
+		pnode_unlinksub(pn);
+		break;
 	case (NODE_FUNCSYNOPSISINFO):
 		fputs(".Fd ", stdout);
 		pnode_printmacroline(p, pn);
+		pnode_unlinksub(pn);
 		break;
 	case (NODE_PARA):
 		/* FIXME: not always. */
 		puts(".Pp");
 		break;
+	case (NODE_PARAMETER):
+		fputs(".Fa \"", stdout);
+		pnode_printmacrolinepart(p, pn);
+		puts("\"");
+		pnode_unlinksub(pn);
+		break;
 	case (NODE_PROGRAMLISTING):
 		puts(".Bd -literal");
 		break;
 	case (NODE_REFMETA):
-		pnode_printrefmeta(p, pn);
+		abort();
 		break;
 	case (NODE_REFNAME):
 		fputs(".Nm ", stdout);
 		pnode_printmacroline(p, pn);
+		pnode_unlinksub(pn);
 		return;
 	case (NODE_REFNAMEDIV):
 		puts(".Sh NAME");
@@ -626,13 +999,19 @@ pnode_print(struct parse *p, struct pnode *pn)
 	case (NODE_REFPURPOSE):
 		fputs(".Nd ", stdout);
 		pnode_printmacroline(p, pn);
+		pnode_unlinksub(pn);
 		return;
 	case (NODE_REFSYNOPSISDIV):
-		puts(".Sh SYNOPSIS");
+		pnode_printrefsynopsisdiv(p, pn);
 		break;
 	case (NODE_REFSECT1):
 		pnode_printrefsect(p, pn);
 		break;
+	case (NODE_STRUCTNAME):
+		fputs(".Vt ", stdout);
+		pnode_printmacroline(p, pn);
+		pnode_unlinksub(pn);
+		return;
 	case (NODE_TEXT):
 		bufclear(p);
 		bufappend(p, pn);
@@ -707,6 +1086,7 @@ readfile(XML_Parser xp, int fd, 
 		 * Exit when we've read all or errors have occured
 		 * during the parse sequence.
 		 */
+		pnode_printprologue(&p, p.root);
 		pnode_print(&p, p.root);
 		pnode_free(p.root);
 		free(p.b);