===================================================================
RCS file: /cvs/docbook2mdoc/docbook2mdoc.c,v
retrieving revision 1.14
retrieving revision 1.27
diff -u -p -r1.14 -r1.27
--- docbook2mdoc/docbook2mdoc.c	2014/03/30 13:18:49	1.14
+++ docbook2mdoc/docbook2mdoc.c	2014/04/02 10:06:14	1.27
@@ -1,4 +1,4 @@
-/*	$Id: docbook2mdoc.c,v 1.14 2014/03/30 13:18:49 kristaps Exp $ */
+/*	$Id: docbook2mdoc.c,v 1.27 2014/04/02 10:06:14 kristaps Exp $ */
 /*
  * Copyright (c) 2014 Kristaps Dzonsons <kristaps@bsd.lv>
  *
@@ -87,45 +87,68 @@ static	const char *attrvals[ATTRVAL__MAX] = {
 
 static	const struct node nodes[NODE__MAX] = {
 	{ NULL, 0 }, 
+	{ "acronym", 0 }, 
+	{ "application", 0 }, 
 	{ "arg", 0 }, 
 	{ "citerefentry", NODE_IGNTEXT }, 
 	{ "cmdsynopsis", NODE_IGNTEXT }, 
 	{ "code", 0 }, 
 	{ "command", 0 }, 
+	{ "date", 0 }, 
 	{ "emphasis", 0 },
+	{ "entry", 0 },
+	{ "envar", 0 },
+	{ "filename", 0 },
 	{ "funcdef", 0 },
 	{ "funcprototype", NODE_IGNTEXT }, 
 	{ "funcsynopsis", NODE_IGNTEXT }, 
 	{ "funcsynopsisinfo", 0 }, 
 	{ "function", 0 }, 
+	{ "itemizedlist", NODE_IGNTEXT }, 
+	{ "group", NODE_IGNTEXT }, 
 	{ "link", 0 }, 
 	{ "listitem", NODE_IGNTEXT }, 
+	{ "literal", 0 }, 
 	{ "manvolnum", 0 }, 
 	{ "option", 0 }, 
+	{ "orderedlist", NODE_IGNTEXT }, 
 	{ "para", 0 }, 
 	{ "paramdef", 0 },
 	{ "parameter", 0 }, 
 	{ "programlisting", 0 }, 
+	{ "prompt", 0 }, 
 	{ "refclass", NODE_IGNTEXT }, 
 	{ "refdescriptor", NODE_IGNTEXT }, 
 	{ "refentry", NODE_IGNTEXT }, 
+	{ "refentryinfo", NODE_IGNTEXT }, 
 	{ "refentrytitle", 0 }, 
 	{ "refmeta", NODE_IGNTEXT }, 
 	{ "refmiscinfo", NODE_IGNTEXT }, 
 	{ "refname", 0 }, 
 	{ "refnamediv", NODE_IGNTEXT }, 
 	{ "refpurpose", 0 }, 
-	{ "refsect1", 0 }, 
+	{ "refsect1", NODE_IGNTEXT }, 
+	{ "refsect2", NODE_IGNTEXT }, 
 	{ "refsynopsisdiv", NODE_IGNTEXT }, 
 	{ "replaceable", 0 }, 
+	{ "row", NODE_IGNTEXT }, 
+	{ "sbr", NODE_IGNTEXT }, 
+	{ "screen", NODE_IGNTEXT }, 
 	{ "structname", 0 }, 
 	{ "synopsis", 0 }, 
+	{ "table", NODE_IGNTEXT }, 
+	{ "tbody", NODE_IGNTEXT }, 
 	{ "term", 0 }, 
 	{ NULL, 0 }, 
+	{ "tfoot", NODE_IGNTEXT }, 
+	{ "tgroup", NODE_IGNTEXT }, 
+	{ "thead", NODE_IGNTEXT }, 
 	{ "title", 0 }, 
 	{ "ulink", 0 }, 
+	{ "userinput", 0 }, 
 	{ "variablelist", NODE_IGNTEXT }, 
 	{ "varlistentry", NODE_IGNTEXT }, 
+	{ "varname", 0 }, 
 };
 
 static void
@@ -464,6 +487,25 @@ bufappend_r(struct parse *p, struct pnode *pn)
 		bufappend_r(p, pp);
 }
 
+/* 
+ * 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);
+}
+
 #define MACROLINE_NORM	0
 #define MACROLINE_UPPER	1
 /*
@@ -578,11 +620,18 @@ pnode_printrefsect(struct parse *p, struct pnode *pn)
 		if (NODE_TITLE == pp->node)
 			break;
 
-	fputs(".Sh", stdout);
+	if (NODE_REFSECT1 == pn->node)
+		fputs(".Sh", stdout);
+	else
+		fputs(".Ss", stdout);
+
 	p->newln = 0;
 
 	if (NULL != pp) {
-		pnode_printmacroline(p, pp);
+		pnode_printmacrolinetext(p, pp, 
+			NODE_REFSECT1 == pn->node ?
+			MACROLINE_UPPER : 0);
+		pnode_printmclose(p, 1);
 		pnode_unlink(pp);
 	} else {
 		puts("UNKNOWN");
@@ -772,23 +821,56 @@ pnode_printarg(struct parse *p, struct pnode *pn)
 	}
 }
 
-/* 
- * Recursively search and return the first instance of "node".
- */
-static struct pnode *
-pnode_findfirst(struct pnode *pn, enum nodeid node)
+static void
+pnode_printgroup(struct parse *p, struct pnode *pn)
 {
-	struct pnode	*pp, *res;
+	struct pnode	*pp, *np;
+	struct pattr	*ap;
+	int		 isop, sv;
 
-	res = NULL;
-	TAILQ_FOREACH(pp, &pn->childq, child) {
-		res = pp->node == node ? pp :
-			pnode_findfirst(pp, node);
-		if (NULL != res)
+	isop = 1;
+	TAILQ_FOREACH(ap, &pn->attrq, child) 
+		if (ATTRKEY_CHOICE == ap->key &&
+			(ATTRVAL_PLAIN == ap->val ||
+			 ATTRVAL_REQ == ap->val)) {
+			isop = 0;
 			break;
+		}
+
+	/* 
+	 * Make sure we're on a macro line.
+	 * This will prevent pnode_print() for putting us on a
+	 * subsequent line.
+	 */
+	sv = p->newln;
+	pnode_printmopen(p);
+	if (isop) 
+		fputs("Op", stdout);
+	else if (sv)
+		fputs("No", stdout);
+
+	/*
+	 * Keep on printing text separated by the vertical bar as long
+	 * as we're within the same origin node as the group.
+	 * This is kind of a nightmare.
+	 * Eh, DocBook...
+	 * FIXME: if there's a "Fl", we don't cut off the leading "-"
+	 * like we do in pnode_print().
+	 */
+	TAILQ_FOREACH(pp, &pn->childq, child) {
+		pnode_print(p, pp);
+		np = TAILQ_NEXT(pp, child);
+		while (NULL != np) {
+			if (pp->node != np->node)
+				break;
+			fputs(" |", stdout);
+			pnode_printmacrolinepart(p, np);
+			pp = np;
+			np = TAILQ_NEXT(np, child);
+		}
 	}
 
-	return(res);
+	pnode_printmclose(p, sv);
 }
 
 static void
@@ -822,8 +904,7 @@ pnode_printvarlistentry(struct parse *p, struct pnode 
 			p->newln = 0;
 			pnode_print(p, pp);
 			pnode_unlink(pp);
-			putchar('\n');
-			p->newln = 1;
+			pnode_printmclose(p, 1);
 			return;
 		} 
 
@@ -832,6 +913,76 @@ pnode_printvarlistentry(struct parse *p, struct pnode 
 }
 
 static void
+pnode_printrow(struct parse *p, struct pnode *pn)
+{
+	struct pnode	*pp;
+
+	puts(".Bl -dash -compact");
+
+	TAILQ_FOREACH(pp, &pn->childq, child) {
+		assert(p->newln);
+		puts(".It");
+		pnode_print(p, pp);
+		pnode_printmclose(p, 1);
+	}
+	assert(p->newln);
+	puts(".El");
+}
+
+static void
+pnode_printtable(struct parse *p, struct pnode *pn)
+{
+	struct pnode	*pp;
+
+	assert(p->newln);
+	TAILQ_FOREACH(pp, &pn->childq, child)
+		if (NODE_TITLE == pp->node) {
+			puts(".Pp");
+			pnode_print(p, pp);
+			pnode_unlink(pp);
+		}
+	assert(p->newln);
+	puts(".Bl -ohang");
+	while (NULL != (pp = pnode_findfirst(pn, NODE_ROW))) {
+		puts(".It Table Row");
+		pnode_printrow(p, pp);
+		pnode_printmclose(p, 1);
+		pnode_unlink(pp);
+	}
+	assert(p->newln);
+	puts(".El");
+}
+
+static void
+pnode_printlist(struct parse *p, struct pnode *pn)
+{
+	struct pnode	*pp;
+
+	assert(p->newln);
+	TAILQ_FOREACH(pp, &pn->childq, child)
+		if (NODE_TITLE == pp->node) {
+			puts(".Pp");
+			pnode_print(p, pp);
+			pnode_unlink(pp);
+		}
+	assert(p->newln);
+
+	if (NODE_ORDEREDLIST == pn->node)
+		puts(".Bl -enum");
+	else
+		puts(".Bl -item");
+
+	TAILQ_FOREACH(pp, &pn->childq, child) {
+		assert(p->newln);
+		puts(".It");
+		pnode_print(p, pp);
+		pnode_printmclose(p, 1);
+	}
+	assert(p->newln);
+	puts(".El");
+}
+
+static void
 pnode_printvariablelist(struct parse *p, struct pnode *pn)
 {
 	struct pnode	*pp;
@@ -862,7 +1013,8 @@ pnode_printvariablelist(struct parse *p, struct pnode 
 /*
  * Print a parsed node (or ignore it--whatever).
  * This is a recursive function.
- * FIXME: macro line continuation?
+ * FIXME: if we're in a literal context (<screen> or <programlisting> or
+ * whatever), don't print inline macros.
  */
 static void
 pnode_print(struct parse *p, struct pnode *pn)
@@ -877,6 +1029,10 @@ pnode_print(struct parse *p, struct pnode *pn)
 	sv = p->newln;
 
 	switch (pn->node) {
+	case (NODE_APPLICATION):
+		pnode_printmopen(p);
+		fputs("Nm", stdout);
+		break;
 	case (NODE_ARG):
 		pnode_printarg(p, pn);
 		pnode_unlinksub(pn);
@@ -898,6 +1054,14 @@ pnode_print(struct parse *p, struct pnode *pn)
 		pnode_printmopen(p);
 		fputs("Em", stdout);
 		break;
+	case (NODE_ENVAR):
+		pnode_printmopen(p);
+		fputs("Ev", stdout);
+		break;
+	case (NODE_FILENAME):
+		pnode_printmopen(p);
+		fputs("Pa", stdout);
+		break;
 	case (NODE_FUNCTION):
 		pnode_printmopen(p);
 		fputs("Fn", stdout);
@@ -911,11 +1075,28 @@ pnode_print(struct parse *p, struct pnode *pn)
 		pnode_printmopen(p);
 		fputs("Fd", stdout);
 		break;
+	case (NODE_ITEMIZEDLIST):
+		assert(p->newln);
+		pnode_printlist(p, pn);
+		pnode_unlinksub(pn);
+		break;
+	case (NODE_GROUP):
+		pnode_printgroup(p, pn);
+		pnode_unlinksub(pn);
+		break;
+	case (NODE_LITERAL):
+		pnode_printmopen(p);
+		fputs("Li", stdout);
+		break;
 	case (NODE_OPTION):
 		pnode_printmopen(p);
 		fputs("Fl", stdout);
-		/* FIXME: bogus leading '-'? */
 		break;
+	case (NODE_ORDEREDLIST):
+		assert(p->newln);
+		pnode_printlist(p, pn);
+		pnode_unlinksub(pn);
+		break;
 	case (NODE_PARA):
 		assert(p->newln);
 		if (NULL != pn->parent && 
@@ -932,9 +1113,15 @@ pnode_print(struct parse *p, struct pnode *pn)
 		pnode_unlinksub(pn);
 		break;
 	case (NODE_PROGRAMLISTING):
+		/* FALLTHROUGH */
+	case (NODE_SCREEN):
 		assert(p->newln);
 		puts(".Bd -literal");
 		break;
+	case (NODE_REFENTRYINFO):
+		/* Suppress. */
+		pnode_unlinksub(pn);
+		break;
 	case (NODE_REFMETA):
 		abort();
 		break;
@@ -961,6 +1148,8 @@ pnode_print(struct parse *p, struct pnode *pn)
 		puts(".Sh SYNOPSIS");
 		break;
 	case (NODE_REFSECT1):
+		/* FALLTHROUGH */
+	case (NODE_REFSECT2):
 		assert(p->newln);
 		pnode_printrefsect(p, pn);
 		break;
@@ -968,10 +1157,19 @@ pnode_print(struct parse *p, struct pnode *pn)
 		pnode_printmopen(p);
 		fputs("Ar", stdout);
 		break;
+	case (NODE_SBR):
+		assert(p->newln);
+		puts(".br");
+		break;
 	case (NODE_STRUCTNAME):
 		pnode_printmopen(p);
 		fputs("Vt", stdout);
 		break;
+	case (NODE_TABLE):
+		assert(p->newln);
+		pnode_printtable(p, pn);
+		pnode_unlinksub(pn);
+		break;
 	case (NODE_TEXT):
 		if (0 == p->newln)
 			putchar(' ');
@@ -984,7 +1182,17 @@ pnode_print(struct parse *p, struct pnode *pn)
 		 * Remember to escape control characters and escapes.
 		 */
 		assert(p->bsz);
-		for (last = '\n', cp = p->b; '\0' != *cp; ) {
+		cp = p->b;
+		/*
+		 * There's often a superfluous "-" in its <option> tags
+		 * before the actual flags themselves.
+		 * "Fl" does this for us, so remove it.
+		 */
+		if (NULL != pn->parent &&
+			NODE_OPTION == pn->parent->node &&
+			'-' == *cp)
+			cp++;
+		for (last = '\n'; '\0' != *cp; ) {
 			if ('\n' == last) {
 				/* Consume all whitespace. */
 				if (isspace((int)*cp)) {
@@ -1001,6 +1209,10 @@ pnode_print(struct parse *p, struct pnode *pn)
 		}
 		p->newln = 0;
 		break;
+	case (NODE_USERINPUT):
+		pnode_printmopen(p);
+		fputs("Li", stdout);
+		break;
 	case (NODE_VARIABLELIST):
 		assert(p->newln);
 		pnode_printvariablelist(p, pn);
@@ -1010,6 +1222,10 @@ pnode_print(struct parse *p, struct pnode *pn)
 		assert(p->newln);
 		pnode_printvarlistentry(p, pn);
 		break;
+	case (NODE_VARNAME):
+		pnode_printmopen(p);
+		fputs("Va", stdout);
+		break;
 	default:
 		break;
 	}
@@ -1018,18 +1234,24 @@ pnode_print(struct parse *p, struct pnode *pn)
 		pnode_print(p, pp);
 
 	switch (pn->node) {
+	case (NODE_APPLICATION):
 	case (NODE_ARG):
 	case (NODE_CODE):
 	case (NODE_COMMAND):
 	case (NODE_EMPHASIS):
+	case (NODE_ENVAR):
+	case (NODE_FILENAME):
 	case (NODE_FUNCTION):
 	case (NODE_FUNCSYNOPSISINFO):
+	case (NODE_LITERAL):
 	case (NODE_OPTION):
 	case (NODE_PARAMETER):
 	case (NODE_REPLACEABLE):
 	case (NODE_REFPURPOSE):
 	case (NODE_STRUCTNAME):
 	case (NODE_TEXT):
+	case (NODE_USERINPUT):
+	case (NODE_VARNAME):
 		pnode_printmclose(p, sv);
 		break;
 	case (NODE_REFNAME):
@@ -1046,6 +1268,8 @@ pnode_print(struct parse *p, struct pnode *pn)
 		pnode_printmclose(p, sv);
 		break;
 	case (NODE_PROGRAMLISTING):
+		/* FALLTHROUGH */
+	case (NODE_SCREEN):
 		assert(p->newln);
 		puts(".Ed");
 		p->newln = 1;