===================================================================
RCS file: /cvs/mandoc/html.c,v
retrieving revision 1.34
retrieving revision 1.37
diff -u -p -r1.34 -r1.37
--- mandoc/html.c	2009/09/17 23:35:41	1.34
+++ mandoc/html.c	2009/09/20 17:24:57	1.37
@@ -1,4 +1,4 @@
-/*	$Id: html.c,v 1.34 2009/09/17 23:35:41 kristaps Exp $ */
+/*	$Id: html.c,v 1.37 2009/09/20 17:24:57 kristaps Exp $ */
 /*
  * Copyright (c) 2008, 2009 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -127,13 +127,21 @@ struct	tag {
 	SLIST_ENTRY(tag)  entry;
 };
 
+struct	ord {
+	int		  pos;
+	const void	 *cookie;
+	SLIST_ENTRY(ord)  entry;
+};
+
 SLIST_HEAD(tagq, tag);
+SLIST_HEAD(ordq, ord);
 
 struct	html {
 	int		  flags;
 #define	HTML_NOSPACE	 (1 << 0)
 #define	HTML_NEWLINE	 (1 << 1)
-	struct tagq	  stack;
+	struct tagq	  tags;
+	struct ordq	  ords;
 	void		 *symtab;
 };
 
@@ -170,16 +178,18 @@ static	void		  print_spec(struct html *, const char *,
 
 static	int		  a2width(const char *);
 static	int		  a2offs(const char *);
+static	int		  a2list(const struct mdoc_node *);
 
-static	int		  mdoc_list_pre(MDOC_ARGS, int);
-static	int		  mdoc_listitem_pre(MDOC_ARGS);
 static	int		  mdoc_root_pre(MDOC_ARGS);
 static	int		  mdoc_tbl_pre(MDOC_ARGS, int);
-static	int		  mdoc_tbl_block_pre(MDOC_ARGS, int, int, int);
+static	int		  mdoc_tbl_block_pre(MDOC_ARGS, int, int, int, int);
 static	int		  mdoc_tbl_body_pre(MDOC_ARGS, int, int);
 static	int		  mdoc_tbl_head_pre(MDOC_ARGS, int, int);
 
+static	void		  mdoc_aq_post(MDOC_ARGS);
+static	int		  mdoc_aq_pre(MDOC_ARGS);
 static	int		  mdoc_ar_pre(MDOC_ARGS);
+static	void		  mdoc_bl_post(MDOC_ARGS);
 static	int		  mdoc_bl_pre(MDOC_ARGS);
 static	int		  mdoc_d1_pre(MDOC_ARGS);
 static	void		  mdoc_dq_post(MDOC_ARGS);
@@ -205,8 +215,8 @@ static	int		  mdoc_xr_pre(MDOC_ARGS);
 static	int		  mdoc_xx_pre(MDOC_ARGS);
 
 #ifdef __linux__
-extern	size_t	  strlcpy(char *, const char *, size_t);
-extern	size_t	  strlcat(char *, const char *, size_t);
+extern	size_t	  	  strlcpy(char *, const char *, size_t);
+extern	size_t	  	  strlcat(char *, const char *, size_t);
 #endif
 
 static	const struct htmlmdoc mdocs[MDOC_MAX] = {
@@ -221,7 +231,7 @@ static	const struct htmlmdoc mdocs[MDOC_MAX] = {
 	{mdoc_d1_pre, NULL}, /* Dl */
 	{NULL, NULL}, /* Bd */
 	{NULL, NULL}, /* Ed */
-	{mdoc_bl_pre, NULL}, /* Bl */
+	{mdoc_bl_pre, mdoc_bl_post}, /* Bl */
 	{NULL, NULL}, /* El */
 	{mdoc_it_pre, NULL}, /* It */
 	{NULL, NULL}, /* Ad */ 
@@ -263,8 +273,8 @@ static	const struct htmlmdoc mdocs[MDOC_MAX] = {
 	{NULL, NULL}, /* %T */
 	{NULL, NULL}, /* %V */
 	{NULL, NULL}, /* Ac */
-	{NULL, NULL}, /* Ao */
-	{NULL, NULL}, /* Aq */
+	{mdoc_aq_pre, mdoc_aq_post}, /* Ao */
+	{mdoc_aq_pre, mdoc_aq_post}, /* Aq */
 	{NULL, NULL}, /* At */
 	{NULL, NULL}, /* Bc */
 	{NULL, NULL}, /* Bf */ 
@@ -332,7 +342,12 @@ static	const struct htmlmdoc mdocs[MDOC_MAX] = {
 	{NULL, NULL}, /* sp */ 
 };
 
+static	char		  buf[BUFSIZ]; /* XXX */
 
+#define	bufcat(x)	  (void)strlcat(buf, (x), BUFSIZ) 
+#define	bufinit()	  buf[0] = 0
+#define	buffmt(...)	  (void)snprintf(buf, BUFSIZ - 1, __VA_ARGS__)
+
 void
 html_mdoc(void *arg, const struct mdoc *m)
 {
@@ -375,7 +390,9 @@ html_alloc(void)
 	if (NULL == (h = calloc(1, sizeof(struct html))))
 		return(NULL);
 
-	SLIST_INIT(&h->stack);
+	SLIST_INIT(&h->tags);
+	SLIST_INIT(&h->ords);
+
 	if (NULL == (h->symtab = chars_init(CHARS_HTML))) {
 		free(h);
 		return(NULL);
@@ -388,15 +405,25 @@ void
 html_free(void *p)
 {
 	struct tag	*tag;
+	struct ord	*ord;
 	struct html	*h;
 
 	h = (struct html *)p;
 
-	while ( ! SLIST_EMPTY(&h->stack)) {
-		tag = SLIST_FIRST(&h->stack);
-		SLIST_REMOVE_HEAD(&h->stack, entry);
+	while ( ! SLIST_EMPTY(&h->ords)) {
+		ord = SLIST_FIRST(&h->ords);
+		SLIST_REMOVE_HEAD(&h->ords, entry);
+		free(ord);
+	}
+
+	while ( ! SLIST_EMPTY(&h->tags)) {
+		tag = SLIST_FIRST(&h->tags);
+		SLIST_REMOVE_HEAD(&h->tags, entry);
 		free(tag);
 	}
+	
+	if (h->symtab)
+		chars_free(h->symtab);
 	free(h);
 }
 
@@ -476,8 +503,10 @@ print_mdoc_node(MDOC_ARGS)
 	struct tag	*t;
 
 	child = 1;
-	t = SLIST_FIRST(&h->stack);
+	t = SLIST_FIRST(&h->tags);
 
+	bufinit();
+
 	switch (n->type) {
 	case (MDOC_ROOT):
 		child = mdoc_root_pre(m, n, h);
@@ -496,6 +525,8 @@ print_mdoc_node(MDOC_ARGS)
 
 	print_stagq(h, t);
 
+	bufinit();
+
 	switch (n->type) {
 	case (MDOC_ROOT):
 		break;
@@ -717,7 +748,7 @@ print_otag(struct html *h, enum htmltag tag, 
 		if (NULL == (t = malloc(sizeof(struct tag))))
 			err(EXIT_FAILURE, "malloc");
 		t->tag = tag;
-		SLIST_INSERT_HEAD(&h->stack, t, entry);
+		SLIST_INSERT_HEAD(&h->tags, t, entry);
 	} else
 		t = NULL;
 
@@ -826,10 +857,10 @@ print_tagq(struct html *h, const struct tag *until)
 {
 	struct tag	*tag;
 
-	while ( ! SLIST_EMPTY(&h->stack)) {
-		tag = SLIST_FIRST(&h->stack);
+	while ( ! SLIST_EMPTY(&h->tags)) {
+		tag = SLIST_FIRST(&h->tags);
 		print_ctag(h, tag->tag);
-		SLIST_REMOVE_HEAD(&h->stack, entry);
+		SLIST_REMOVE_HEAD(&h->tags, entry);
 		free(tag);
 		if (until && tag == until)
 			return;
@@ -842,17 +873,18 @@ print_stagq(struct html *h, const struct tag *suntil)
 {
 	struct tag	*tag;
 
-	while ( ! SLIST_EMPTY(&h->stack)) {
-		tag = SLIST_FIRST(&h->stack);
+	while ( ! SLIST_EMPTY(&h->tags)) {
+		tag = SLIST_FIRST(&h->tags);
 		if (suntil && tag == suntil)
 			return;
 		print_ctag(h, tag->tag);
-		SLIST_REMOVE_HEAD(&h->stack, entry);
+		SLIST_REMOVE_HEAD(&h->tags, entry);
 		free(tag);
 	}
 }
 
 
+/* FIXME: put in utility file for front-ends. */
 static int
 a2offs(const char *p)
 {
@@ -880,7 +912,50 @@ a2offs(const char *p)
 }
 
 
+/* FIXME: put in utility file for front-ends. */
 static int
+a2list(const struct mdoc_node *bl)
+{
+	int		 i;
+
+	assert(MDOC_BLOCK == bl->type && MDOC_Bl == bl->tok);
+	assert(bl->args);
+
+	for (i = 0; i < (int)bl->args->argc; i++) 
+		switch (bl->args->argv[i].arg) {
+		case (MDOC_Enum):
+			/* FALLTHROUGH */
+		case (MDOC_Dash):
+			/* FALLTHROUGH */
+		case (MDOC_Hyphen):
+			/* FALLTHROUGH */
+		case (MDOC_Bullet):
+			/* FALLTHROUGH */
+		case (MDOC_Tag):
+			/* FALLTHROUGH */
+		case (MDOC_Hang):
+			/* FALLTHROUGH */
+		case (MDOC_Inset):
+			/* FALLTHROUGH */
+		case (MDOC_Diag):
+			/* FALLTHROUGH */
+		case (MDOC_Item):
+			/* FALLTHROUGH */
+		case (MDOC_Column):
+			/* FALLTHROUGH */
+		case (MDOC_Ohang):
+			return(bl->args->argv[i].arg);
+		default:
+			break;
+		}
+
+	abort();
+	/* NOTREACHED */
+}
+
+
+/* FIXME: put in utility file for front-ends. */
+static int
 a2width(const char *p)
 {
 	int		 i, len;
@@ -917,20 +992,78 @@ mdoc_root_pre(MDOC_ARGS)
 
 /* ARGSUSED */
 static int
-mdoc_ss_pre(MDOC_ARGS)
+mdoc_sh_pre(MDOC_ARGS)
 {
 	struct htmlpair	tag[2];
 
+	if (MDOC_HEAD == n->type) {
+		tag[0].key = ATTR_CLASS;
+		tag[0].val = "sec-head";
+		print_otag(h, TAG_DIV, 1, tag);
+		print_otag(h, TAG_SPAN, 1, tag);
+		return(1);
+	} else if (MDOC_BLOCK == n->type) {
+		tag[0].key = ATTR_CLASS;
+		tag[0].val = "sec-block";
+		print_otag(h, TAG_DIV, 1, tag);
+		return(1);
+	}
+
+	buffmt("margin-left: %dem;", INDENT);
+	
+	if (n->parent->next && n->child)
+		bufcat("margin-bottom: 1em;");
+
 	tag[0].key = ATTR_CLASS;
-	tag[0].val = "ssec";
+	tag[0].val = "sec-body";
+	tag[1].key = ATTR_STYLE;
+	tag[1].val = buf;
 
+	print_otag(h, TAG_DIV, 2, tag);
+	return(1);
+}
+
+
+/* ARGSUSED */
+static int
+mdoc_ss_pre(MDOC_ARGS)
+{
+	struct htmlpair	 tag[2];
+	int		 i;
+
+	i = 0;
+
+	if (MDOC_BODY == n->type) {
+		tag[i].key = ATTR_CLASS;
+		tag[i++].val = "ssec-body";
+		if (n->parent->next && n->child) {
+			bufcat("margin-bottom: 1em;");
+			tag[i].key = ATTR_STYLE;
+			tag[i++].val = buf;
+		}
+		print_otag(h, TAG_DIV, i, tag);
+		return(1);
+	} else if (MDOC_BLOCK == n->type) {
+		tag[i].key = ATTR_CLASS;
+		tag[i++].val = "ssec-block";
+		if (n->prev) {
+			bufcat("margin-top: 1em;");
+			tag[i].key = ATTR_STYLE;
+			tag[i++].val = buf;
+		}
+		print_otag(h, TAG_DIV, i, tag);
+		return(1);
+	}
+
+	buffmt("margin-left: -%dem;", INDENT - HALFINDENT);
+
+	tag[0].key = ATTR_CLASS;
+	tag[0].val = "ssec-head";
 	tag[1].key = ATTR_STYLE;
-	tag[1].val = "margin-left: -20px;";
+	tag[1].val = buf;
 
-	if (MDOC_BODY == n->type)
-		print_otag(h, TAG_DIV, 1, &tag);
-	if (MDOC_HEAD == n->type)
-		print_otag(h, TAG_SPAN, 1, &tag);
+	print_otag(h, TAG_DIV, 2, tag);
+	print_otag(h, TAG_SPAN, 1, tag);
 	return(1);
 }
 
@@ -957,11 +1090,13 @@ mdoc_pp_pre(MDOC_ARGS)
 {
 	struct htmlpair	tag;
 
+	bufcat("clear: both;");
+	bufcat("height: 1em;");
+
 	tag.key = ATTR_STYLE;
-	tag.val = "clear: both;";
+	tag.val = buf;
 
-	print_otag(h, TAG_BR, 1, &tag);
-	print_otag(h, TAG_BR, 1, &tag);
+	print_otag(h, TAG_DIV, 1, &tag);
 	return(0);
 }
 
@@ -970,9 +1105,16 @@ mdoc_pp_pre(MDOC_ARGS)
 static int
 mdoc_nd_pre(MDOC_ARGS)
 {
+	struct htmlpair	 tag;
 
-	if (MDOC_BODY == n->type)
-		print_text(h, "\\(en");
+	if (MDOC_BODY != n->type)
+		return(1);
+
+	/* XXX - this can contain block elements! */
+	print_text(h, "\\(em");
+	tag.key = ATTR_CLASS;
+	tag.val = "desc-body";
+	print_otag(h, TAG_SPAN, 1, &tag);
 	return(1);
 }
 
@@ -981,11 +1123,16 @@ mdoc_nd_pre(MDOC_ARGS)
 static int
 mdoc_op_pre(MDOC_ARGS)
 {
+	struct htmlpair	 tag;
 
-	if (MDOC_BODY == n->type) {
-		print_text(h, "\\(lB");
-		h->flags |= HTML_NOSPACE;
-	}
+	if (MDOC_BODY != n->type)
+		return(1);
+
+	/* XXX - this can contain block elements! */
+	print_text(h, "\\(lB");
+	tag.key = ATTR_CLASS;
+	tag.val = "opt";
+	print_otag(h, TAG_SPAN, 1, &tag);
 	return(1);
 }
 
@@ -1005,16 +1152,19 @@ mdoc_op_post(MDOC_ARGS)
 static int
 mdoc_nm_pre(MDOC_ARGS)
 {
-	struct htmlpair	class;
+	struct htmlpair	tag;
 
 	if ( ! (HTML_NEWLINE & h->flags))
-		if (SEC_SYNOPSIS == n->sec)
-			print_otag(h, TAG_BR, 0, NULL);
+		if (SEC_SYNOPSIS == n->sec) {
+			tag.key = ATTR_STYLE;
+			tag.val = "clear: both;";
+			print_otag(h, TAG_BR, 1, &tag);
+		}
 
-	class.key = ATTR_CLASS;
-	class.val = "name";
+	tag.key = ATTR_CLASS;
+	tag.val = "name";
 
-	print_otag(h, TAG_SPAN, 1, &class);
+	print_otag(h, TAG_SPAN, 1, &tag);
 	if (NULL == n->child)
 		print_text(h, m->name);
 
@@ -1024,31 +1174,16 @@ mdoc_nm_pre(MDOC_ARGS)
 
 /* ARGSUSED */
 static int
-mdoc_sh_pre(MDOC_ARGS)
-{
-	struct htmlpair	tag;
-
-	tag.key = ATTR_CLASS;
-	tag.val = "sec";
-
-	if (MDOC_BODY == n->type)
-		print_otag(h, TAG_DIV, 1, &tag);
-	if (MDOC_HEAD == n->type)
-		print_otag(h, TAG_SPAN, 1, &tag);
-	return(1);
-}
-
-
-/* ARGSUSED */
-static int
 mdoc_xr_pre(MDOC_ARGS)
 {
-	struct htmlpair	tag;
+	struct htmlpair	tag[2];
 
-	tag.key = ATTR_HREF;
-	tag.val = "#"; /* TODO */
+	tag[0].key = ATTR_CLASS;
+	tag[0].val = "link-man";
+	tag[1].key = ATTR_HREF;
+	tag[1].val = "#"; /* TODO */
 
-	print_otag(h, TAG_A, 1, &tag);
+	print_otag(h, TAG_A, 2, tag);
 
 	n = n->child;
 	print_text(h, n->string);
@@ -1075,6 +1210,7 @@ mdoc_ns_pre(MDOC_ARGS)
 	return(1);
 }
 
+
 /* ARGSUSED */
 static int
 mdoc_ar_pre(MDOC_ARGS)
@@ -1088,11 +1224,13 @@ mdoc_ar_pre(MDOC_ARGS)
 	return(1);
 }
 
+
 /* ARGSUSED */
 static int
 mdoc_xx_pre(MDOC_ARGS)
 {
 	const char	*pp;
+	struct htmlpair	 tag;
 
 	switch (n->tok) {
 	case (MDOC_Bsx):
@@ -1117,93 +1255,104 @@ mdoc_xx_pre(MDOC_ARGS)
 		return(1);
 	}
 
+	tag.key = ATTR_CLASS;
+	tag.val = "unix";
+
+	print_otag(h, TAG_SPAN, 1, &tag);
 	print_text(h, pp);
 	return(1);
 }
 
 
+/* ARGSUSED */
 static int
-mdoc_tbl_block_pre(MDOC_ARGS, int w, int o, int c)
+mdoc_tbl_block_pre(MDOC_ARGS, int t, int w, int o, int c)
 {
 	struct htmlpair	 tag;
-	char		 buf[BUFSIZ];
 
-	buf[BUFSIZ - 1] = 0;
+	switch (t) {
+	case (MDOC_Item):
+		/* FALLTHROUGH */
+	case (MDOC_Ohang):
+		buffmt("margin-left: %dem; clear: both;", o);
+		break;
+	default:
+		buffmt("margin-left: %dem; clear: both;", w + o);
+		break;
+	}
 
-	snprintf(buf, BUFSIZ - 1, "margin-left: %dpx; "
-			"clear: both;", w + o);
 
-	if ( ! c)
-		(void)strlcat(buf, " padding-top: 1em;", BUFSIZ);
+	if ( ! c && n->prev && n->prev->body->child)
+		bufcat("padding-top: 1em;");
 
 	tag.key = ATTR_STYLE;
 	tag.val = buf;
-
 	print_otag(h, TAG_DIV, 1, &tag);
 	return(1);
 }
 
 
+/* ARGSUSED */
 static int
 mdoc_tbl_body_pre(MDOC_ARGS, int t, int w)
 {
-	struct htmlpair	 tag;
-	char		 buf[BUFSIZ];
-	int		 i;
 
-	buf[BUFSIZ - 1] = 0;
-	i = 0;
-
-	switch (t) {
-	case (MDOC_Tag):
-		i++;
-		(void)snprintf(buf, BUFSIZ - 1, 
-				"clear: right; float: left; "
-				"width: 100%%;");
-		tag.key = ATTR_STYLE;
-		tag.val = buf;
-		break;
-	default:
-		break;
-	}
-
-	print_otag(h, TAG_DIV, i, &tag);
+	print_otag(h, TAG_DIV, 0, NULL);
 	return(1);
 }
 
 
+/* ARGSUSED */
 static int
-mdoc_tbl_head_pre(MDOC_ARGS, int type, int w)
+mdoc_tbl_head_pre(MDOC_ARGS, int t, int w)
 {
 	struct htmlpair	 tag;
-	char		 buf[BUFSIZ];
-	int		 i;
+	struct ord	*ord;
+	char		 nbuf[BUFSIZ];
 
-	buf[BUFSIZ - 1] = 0;
-	i = 0;
-
-	switch (type) {
-	case (MDOC_Tag):
-		i++;
-		(void)snprintf(buf, BUFSIZ - 1,  
-				"clear: left; float: left; "
-				"padding-right: 1em; "
-				"margin-left: -%dpx;", w);
-		tag.key = ATTR_STYLE;
-		tag.val = buf;
+	switch (t) {
+	case (MDOC_Item):
+		/* FALLTHROUGH */
+	case (MDOC_Ohang):
+		print_otag(h, TAG_DIV, 0, NULL);
 		break;
 	default:
-		i++;
-		(void)snprintf(buf, BUFSIZ - 1, 
-				"clear: left; float: left; "
-				"margin-left: -%dpx; "
-				"padding-right: 1em;", w);
+		buffmt("margin-left: -%dem;", w);
+		bufcat("clear: left;");
+		bufcat("float: left;");
+		bufcat("padding-right: 1em;");
 		tag.key = ATTR_STYLE;
 		tag.val = buf;
+		print_otag(h, TAG_DIV, 1, &tag);
 		break;
 	}
 
-	print_otag(h, TAG_DIV, i, &tag);
+	switch (t) {
+	case (MDOC_Diag):
+		tag.key = ATTR_CLASS;
+		tag.val = "diag";
+		print_otag(h, TAG_SPAN, 1, &tag);
+		break;
+	case (MDOC_Enum):
+		ord = SLIST_FIRST(&h->ords);
+		assert(ord);
+		nbuf[BUFSIZ - 1] = 0;
+		(void)snprintf(nbuf, BUFSIZ - 1, "%d.", ord->pos++);
+		print_text(h, nbuf);
+		return(0);
+	case (MDOC_Dash):
+		print_text(h, "\\(en");
+		return(0);
+	case (MDOC_Hyphen):
+		print_text(h, "\\-");
+		return(0);
+	case (MDOC_Bullet):
+		print_text(h, "\\(bu");
+		return(0);
+	default:
+		break;
+	}
+
 	return(1);
 }
 
@@ -1234,12 +1383,28 @@ mdoc_tbl_pre(MDOC_ARGS, int type)
 		} else if (MDOC_Compact == bl->args->argv[i].arg) 
 			c = 1;
 
-	if (0 == w)
-		w = 10;
+	switch (type) {
+	case (MDOC_Enum):
+		/* FALLTHROUGH */
+	case (MDOC_Dash):
+		/* FALLTHROUGH */
+	case (MDOC_Hyphen):
+		/* FALLTHROUGH */
+	case (MDOC_Bullet):
+		if (w < 4)
+			w = 4;
+		break;
+	case (MDOC_Inset):
+		/* FALLTHROUGH */
+	case (MDOC_Diag):
+		w = 1;
+		break;
+	default:
+		if (0 == w)
+			w = 10;
+		break;
+	}
 
-	w *= PX_MULT;
-	o *= PX_MULT;
-	
 	switch (n->type) {
 	case (MDOC_BLOCK):
 		break;
@@ -1252,165 +1417,59 @@ mdoc_tbl_pre(MDOC_ARGS, int type)
 		/* NOTREACHED */
 	}
 
-	return(mdoc_tbl_block_pre(m, n, h, w, o, c));
+	return(mdoc_tbl_block_pre(m, n, h, type, w, o, c));
 }
 
 
-/* ARGSUSED */
 static int
-mdoc_listitem_pre(MDOC_ARGS)
+mdoc_bl_pre(MDOC_ARGS)
 {
-	int			 i, w, o, c;
-	const struct mdoc_node	*bl;
-	struct htmlpair	 	 tag;
-	char		 	 buf[BUFSIZ];
+	struct ord	*ord;
 
-	/* FIXME: fmt_vspace() equivalent. */
-
 	if (MDOC_BLOCK != n->type)
 		return(1);
+	if (MDOC_Enum != a2list(n))
+		return(1);
 
-	bl = n->parent->parent;
-	assert(bl);
+	ord = malloc(sizeof(struct ord));
+	if (NULL == ord)
+		err(EXIT_FAILURE, "malloc");
+	ord->cookie = n;
+	ord->pos = 1;
+	SLIST_INSERT_HEAD(&h->ords, ord, entry);
 
-	w = o = c = 0;
-
-	for (i = 0; i < (int)bl->args->argc; i++) 
-		if (MDOC_Width == bl->args->argv[i].arg) {
-			assert(bl->args->argv[i].sz);
-			w = a2width(bl->args->argv[i].value[0]);
-		} else if (MDOC_Offset == bl->args->argv[i].arg) {
-			assert(bl->args->argv[i].sz);
-			o = a2offs(bl->args->argv[i].value[0]);
-		} else if (MDOC_Compact == bl->args->argv[i].arg) 
-			c = 1;
-	
-	o *= PX_MULT;
-	w *= PX_MULT;
-
-	buf[BUFSIZ - 1] = 0;
-
-	snprintf(buf, BUFSIZ - 1, "margin-left: %dpx;", o);
-
-	if ( ! c)
-		(void)strlcat(buf, " padding-top: 1em;", BUFSIZ);
-
-	tag.key = ATTR_STYLE;
-	tag.val = buf;
-
-	print_otag(h, TAG_LI, 1, &tag);
 	return(1);
 }
 
 
-/* ARGSUSED */
-static int
-mdoc_list_pre(MDOC_ARGS, int type)
+static void
+mdoc_bl_post(MDOC_ARGS)
 {
+	struct ord	*ord;
 
-	switch (type) {
-	case (MDOC_Enum):
-		print_otag(h, TAG_OL, 0, NULL);
-		break;
-	case (MDOC_Bullet):
-		print_otag(h, TAG_UL, 0, NULL);
-		break;
-	default:
-		break;
-	}
-
-	return(1);
-}
-
-
-static int
-mdoc_bl_pre(MDOC_ARGS)
-{
-	int		i, len, type;
-
 	if (MDOC_BLOCK != n->type)
-		return(1);
+		return;
+	if (MDOC_Enum != a2list(n))
+		return;
 
-	assert(n->args);
-	len = (int)n->args->argc;
-
-	for (i = 0; i < len; i++) 
-		switch ((type = n->args->argv[i].arg)) {
-		case (MDOC_Enum):
-			/* FALLTHROUGH */
-		case (MDOC_Bullet):
-			return(mdoc_list_pre(m, n, h, type));
-		case (MDOC_Tag):
-			/* FALLTHROUGH */
-		case (MDOC_Hang):
-			/* FALLTHROUGH */
-		case (MDOC_Dash):
-			/* FALLTHROUGH */
-		case (MDOC_Hyphen):
-			/* FALLTHROUGH */
-		case (MDOC_Inset):
-			/* FALLTHROUGH */
-		case (MDOC_Diag):
-			/* FALLTHROUGH */
-		case (MDOC_Item):
-			/* FALLTHROUGH */
-		case (MDOC_Column):
-			/* FALLTHROUGH */
-		case (MDOC_Ohang):
-			return(1); 
-		default:
-			break;
-		}
-
-	abort();
-	/* NOTREACHED */
+	ord = SLIST_FIRST(&h->ords);
+	assert(ord);
+	SLIST_REMOVE_HEAD(&h->ords, entry);
+	free(ord);
 }
 
 
 static int
 mdoc_it_pre(MDOC_ARGS)
 {
-	int		 	 i, len, type;
-	const struct mdoc_node	*bl;
+	int		 type;
 
 	if (MDOC_BLOCK == n->type)
-		bl = n->parent->parent;
+		type = a2list(n->parent->parent);
 	else
-		bl = n->parent->parent->parent;
+		type = a2list(n->parent->parent->parent);
 
-	assert(bl->args);
-	len = (int)bl->args->argc;
-
-	for (i = 0; i < len; i++) 
-		switch ((type = bl->args->argv[i].arg)) {
-		case (MDOC_Tag):
-			/* FALLTHROUGH */
-		case (MDOC_Hang):
-			return(mdoc_tbl_pre(m, n, h, type));
-		case (MDOC_Enum):
-			/* FALLTHROUGH */
-		case (MDOC_Bullet):
-			return(mdoc_listitem_pre(m, n, h));
-		case (MDOC_Dash):
-			/* FALLTHROUGH */
-		case (MDOC_Hyphen):
-			/* FALLTHROUGH */
-		case (MDOC_Inset):
-			/* FALLTHROUGH */
-		case (MDOC_Diag):
-			/* FALLTHROUGH */
-		case (MDOC_Item):
-			/* FALLTHROUGH */
-		case (MDOC_Column):
-			/* FALLTHROUGH */
-		case (MDOC_Ohang):
-			return(0);
-		default:
-			break;
-		}
-
-	abort();
-	/* NOTREACHED */
+	return(mdoc_tbl_pre(m, n, h, type));
 }
 
 
@@ -1544,19 +1603,19 @@ mdoc_em_pre(MDOC_ARGS)
 static int
 mdoc_d1_pre(MDOC_ARGS)
 {
-	struct htmlpair	tag;
-	char		buf[BUFSIZ];
+	struct htmlpair	tag[2];
 
 	if (MDOC_BLOCK != n->type)
 		return(1);
 
-	(void)snprintf(buf, BUFSIZ - 1, "margin-left: %dpx", 
-			INDENT * PX_MULT);
+	buffmt("margin-left: %dem;", INDENT);
 
-	tag.key = ATTR_STYLE;
-	tag.val = buf;
+	tag[0].key = ATTR_CLASS;
+	tag[0].val = "lit-block";
+	tag[1].key = ATTR_STYLE;
+	tag[1].val = buf;
 
-	print_otag(h, TAG_DIV, 1, &tag);
+	print_otag(h, TAG_DIV, 2, tag);
 	return(1);
 }
 
@@ -1565,11 +1624,39 @@ mdoc_d1_pre(MDOC_ARGS)
 static int
 mdoc_sx_pre(MDOC_ARGS)
 {
-	struct htmlpair	tag;
+	struct htmlpair	tag[2];
 
-	tag.key = ATTR_HREF;
-	tag.val = "#";
+	tag[0].key = ATTR_HREF;
+	tag[0].val = "#"; /* XXX */
+	tag[1].key = ATTR_CLASS;
+	tag[1].val = "link-sec";
 
-	print_otag(h, TAG_A, 1, &tag);
+	print_otag(h, TAG_A, 2, tag);
 	return(1);
 }
+
+
+/* ARGSUSED */
+static int
+mdoc_aq_pre(MDOC_ARGS)
+{
+
+	if (MDOC_BODY != n->type)
+		return(1);
+	print_text(h, "\\(la");
+	h->flags |= HTML_NOSPACE;
+	return(1);
+}
+
+
+/* ARGSUSED */
+static void
+mdoc_aq_post(MDOC_ARGS)
+{
+
+	if (MDOC_BODY != n->type)
+		return;
+	h->flags |= HTML_NOSPACE;
+	print_text(h, "\\(ra");
+}
+