=================================================================== RCS file: /cvs/mandoc/mdoc_html.c,v retrieving revision 1.126 retrieving revision 1.140 diff -u -p -r1.126 -r1.140 --- mandoc/mdoc_html.c 2010/12/17 10:37:26 1.126 +++ mandoc/mdoc_html.c 2011/01/01 12:18:37 1.140 @@ -1,4 +1,4 @@ -/* $Id: mdoc_html.c,v 1.126 2010/12/17 10:37:26 kristaps Exp $ */ +/* $Id: mdoc_html.c,v 1.140 2011/01/01 12:18:37 kristaps Exp $ */ /* * Copyright (c) 2008, 2009, 2010 Kristaps Dzonsons * @@ -287,7 +287,7 @@ a2width(const char *p, struct roffsu *su) { if ( ! a2roffsu(p, su, SCALE_MAX)) { - su->unit = SCALE_EM; + su->unit = SCALE_BU; su->scale = (int)strlen(p); } } @@ -354,7 +354,7 @@ a2offs(const char *p, struct roffsu *su) else if (0 == strcmp(p, "indent-two")) SCALE_HS_INIT(su, INDENT * 2); else if ( ! a2roffsu(p, su, SCALE_MAX)) { - su->unit = SCALE_EM; + su->unit = SCALE_BU; su->scale = (int)strlen(p); } } @@ -422,6 +422,8 @@ print_mdoc_node(MDOC_ARGS) case (MDOC_TEXT): print_text(h, n->string); return; + case (MDOC_TBL): + return; default: if (mdocs[n->tok].pre && ENDBODY_NOT == n->end) child = (*mdocs[n->tok].pre)(m, n, h); @@ -461,16 +463,25 @@ print_mdoc_node(MDOC_ARGS) static void mdoc_root_post(MDOC_ARGS) { - struct htmlpair tag[2]; + struct htmlpair tag[3]; struct tag *t, *tt; char b[DATESIZ]; time2a(m->date, b, DATESIZ); - PAIR_CLASS_INIT(&tag[0], "foot"); - PAIR_SUMMARY_INIT(&tag[1], "Document Footer"); - t = print_otag(h, TAG_TABLE, 2, tag); + PAIR_SUMMARY_INIT(&tag[0], "Document Footer"); + PAIR_CLASS_INIT(&tag[1], "foot"); + if (NULL == h->style) { + PAIR_INIT(&tag[2], ATTR_WIDTH, "100%"); + t = print_otag(h, TAG_TABLE, 3, tag); + PAIR_INIT(&tag[0], ATTR_WIDTH, "50%"); + print_otag(h, TAG_COL, 1, tag); + print_otag(h, TAG_COL, 1, tag); + } else + t = print_otag(h, TAG_TABLE, 2, tag); + t = print_otag(h, TAG_TBODY, 0, NULL); + tt = print_otag(h, TAG_TR, 0, NULL); PAIR_CLASS_INIT(&tag[0], "foot-date"); @@ -480,7 +491,11 @@ mdoc_root_post(MDOC_ARGS) print_stagq(h, tt); PAIR_CLASS_INIT(&tag[0], "foot-os"); - print_otag(h, TAG_TD, 1, tag); + if (NULL == h->style) { + PAIR_INIT(&tag[1], ATTR_ALIGN, "right"); + print_otag(h, TAG_TD, 2, tag); + } else + print_otag(h, TAG_TD, 1, tag); print_text(h, m->os); print_tagq(h, t); @@ -505,10 +520,20 @@ mdoc_root_pre(MDOC_ARGS) snprintf(title, BUFSIZ - 1, "%s(%s)", m->title, m->msec); - PAIR_CLASS_INIT(&tag[0], "head"); - PAIR_SUMMARY_INIT(&tag[1], "Document Header"); - t = print_otag(h, TAG_TABLE, 2, tag); + PAIR_SUMMARY_INIT(&tag[0], "Document Header"); + PAIR_CLASS_INIT(&tag[1], "head"); + if (NULL == h->style) { + PAIR_INIT(&tag[2], ATTR_WIDTH, "100%"); + t = print_otag(h, TAG_TABLE, 3, tag); + PAIR_INIT(&tag[0], ATTR_WIDTH, "30%"); + print_otag(h, TAG_COL, 1, tag); + print_otag(h, TAG_COL, 1, tag); + print_otag(h, TAG_COL, 1, tag); + } else + t = print_otag(h, TAG_TABLE, 2, tag); + print_otag(h, TAG_TBODY, 0, NULL); + tt = print_otag(h, TAG_TR, 0, NULL); PAIR_CLASS_INIT(&tag[0], "head-ltitle"); @@ -518,13 +543,21 @@ mdoc_root_pre(MDOC_ARGS) print_stagq(h, tt); PAIR_CLASS_INIT(&tag[0], "head-vol"); - print_otag(h, TAG_TD, 1, tag); + if (NULL == h->style) { + PAIR_INIT(&tag[1], ATTR_ALIGN, "center"); + print_otag(h, TAG_TD, 2, tag); + } else + print_otag(h, TAG_TD, 1, tag); print_text(h, b); print_stagq(h, tt); PAIR_CLASS_INIT(&tag[0], "head-rtitle"); - print_otag(h, TAG_TD, 1, tag); + if (NULL == h->style) { + PAIR_INIT(&tag[1], ATTR_ALIGN, "right"); + print_otag(h, TAG_TD, 2, tag); + } else + print_otag(h, TAG_TD, 1, tag); print_text(h, title); print_tagq(h, t); @@ -593,7 +626,7 @@ mdoc_fl_pre(MDOC_ARGS) struct htmlpair tag; PAIR_CLASS_INIT(&tag, "flag"); - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_B, 1, &tag); /* `Cm' has no leading hyphen. */ @@ -640,7 +673,7 @@ mdoc_nm_pre(MDOC_ARGS) case (MDOC_ELEM): synopsis_pre(h, n); PAIR_CLASS_INIT(&tag, "name"); - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_B, 1, &tag); if (NULL == n->child && m->name) print_text(h, m->name); return(1); @@ -732,7 +765,7 @@ mdoc_ar_pre(MDOC_ARGS) struct htmlpair tag; PAIR_CLASS_INIT(&tag, "arg"); - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_I, 1, &tag); return(1); } @@ -808,7 +841,7 @@ mdoc_it_pre(MDOC_ARGS) assert(bl); - type = bl->data.Bl->type; + type = bl->norm->Bl.type; assert(lists[type]); PAIR_CLASS_INIT(&tag[0], lists[type]); @@ -834,10 +867,14 @@ mdoc_it_pre(MDOC_ARGS) case(LIST_ohang): /* FALLTHROUGH */ case(LIST_tag): - SCALE_VS_INIT(&su, ! bl->data.Bl->comp); + SCALE_VS_INIT(&su, ! bl->norm->Bl.comp); bufcat_su(h, "margin-top", &su); PAIR_STYLE_INIT(&tag[1], h); print_otag(h, TAG_DT, 2, tag); + if (LIST_diag != type) + break; + PAIR_CLASS_INIT(&tag[0], "diag"); + print_otag(h, TAG_B, 1, tag); break; case(LIST_column): break; @@ -855,7 +892,7 @@ mdoc_it_pre(MDOC_ARGS) case(LIST_enum): /* FALLTHROUGH */ case(LIST_item): - SCALE_VS_INIT(&su, ! bl->data.Bl->comp); + SCALE_VS_INIT(&su, ! bl->norm->Bl.comp); bufcat_su(h, "margin-top", &su); PAIR_STYLE_INIT(&tag[1], h); print_otag(h, TAG_LI, 2, tag); @@ -869,17 +906,17 @@ mdoc_it_pre(MDOC_ARGS) case(LIST_ohang): /* FALLTHROUGH */ case(LIST_tag): - if (NULL == bl->data.Bl->width) { + if (NULL == bl->norm->Bl.width) { print_otag(h, TAG_DD, 1, tag); break; } - a2width(bl->data.Bl->width, &su); + a2width(bl->norm->Bl.width, &su); bufcat_su(h, "margin-left", &su); PAIR_STYLE_INIT(&tag[1], h); print_otag(h, TAG_DD, 2, tag); break; case(LIST_column): - SCALE_VS_INIT(&su, ! bl->data.Bl->comp); + SCALE_VS_INIT(&su, ! bl->norm->Bl.comp); bufcat_su(h, "margin-top", &su); PAIR_STYLE_INIT(&tag[1], h); print_otag(h, TAG_TD, 2, tag); @@ -907,15 +944,16 @@ mdoc_bl_pre(MDOC_ARGS) size_t i; struct htmlpair tag[3]; struct roffsu su; + char buf[BUFSIZ]; if (MDOC_BODY == n->type) { - if (LIST_column == n->data.Bl->type) + if (LIST_column == n->norm->Bl.type) print_otag(h, TAG_TBODY, 0, NULL); return(1); } if (MDOC_HEAD == n->type) { - if (LIST_column != n->data.Bl->type) + if (LIST_column != n->norm->Bl.type) return(0); /* @@ -925,10 +963,10 @@ mdoc_bl_pre(MDOC_ARGS) * screen and we want to preserve that behaviour. */ - for (i = 0; i < n->data.Bl->ncols; i++) { - a2width(n->data.Bl->cols[i], &su); + for (i = 0; i < n->norm->Bl.ncols; i++) { + a2width(n->norm->Bl.cols[i], &su); bufinit(h); - if (i < n->data.Bl->ncols - 1) + if (i < n->norm->Bl.ncols - 1) bufcat_su(h, "width", &su); else bufcat_su(h, "min-width", &su); @@ -944,20 +982,19 @@ mdoc_bl_pre(MDOC_ARGS) bufcat_su(h, "margin-bottom", &su); PAIR_STYLE_INIT(&tag[0], h); - assert(lists[n->data.Bl->type]); - PAIR_CLASS_INIT(&tag[1], lists[n->data.Bl->type]); - i = 2; + assert(lists[n->norm->Bl.type]); + strlcpy(buf, "list ", BUFSIZ); + strlcat(buf, lists[n->norm->Bl.type], BUFSIZ); + PAIR_INIT(&tag[1], ATTR_CLASS, buf); /* Set the block's left-hand margin. */ - if (n->data.Bl->offs) { - a2offs(n->data.Bl->offs, &su); + if (n->norm->Bl.offs) { + a2offs(n->norm->Bl.offs, &su); bufcat_su(h, "margin-left", &su); - PAIR_STYLE_INIT(&tag[2], h); - i = 3; } - switch (n->data.Bl->type) { + switch (n->norm->Bl.type) { case(LIST_bullet): /* FALLTHROUGH */ case(LIST_dash): @@ -965,10 +1002,10 @@ mdoc_bl_pre(MDOC_ARGS) case(LIST_hyphen): /* FALLTHROUGH */ case(LIST_item): - print_otag(h, TAG_UL, i, tag); + print_otag(h, TAG_UL, 2, tag); break; case(LIST_enum): - print_otag(h, TAG_OL, i, tag); + print_otag(h, TAG_OL, 2, tag); break; case(LIST_diag): /* FALLTHROUGH */ @@ -979,10 +1016,10 @@ mdoc_bl_pre(MDOC_ARGS) case(LIST_ohang): /* FALLTHROUGH */ case(LIST_tag): - print_otag(h, TAG_DL, i, tag); + print_otag(h, TAG_DL, 2, tag); break; case(LIST_column): - print_otag(h, TAG_TABLE, i, tag); + print_otag(h, TAG_TABLE, 2, tag); break; default: abort(); @@ -1000,11 +1037,14 @@ mdoc_ex_pre(MDOC_ARGS) struct tag *t; struct htmlpair tag; + if (n->prev) + print_otag(h, TAG_BR, 0, NULL); + PAIR_CLASS_INIT(&tag, "utility"); print_text(h, "The"); for (nn = n->child; nn; nn = nn->next) { - t = print_otag(h, TAG_SPAN, 1, &tag); + t = print_otag(h, TAG_B, 1, &tag); print_text(h, nn->string); print_tagq(h, t); @@ -1058,12 +1098,13 @@ mdoc_d1_pre(MDOC_ARGS) /* BLOCKQUOTE needs a block body. */ + PAIR_CLASS_INIT(&tag[0], "display"); + print_otag(h, TAG_DIV, 1, tag); + if (MDOC_Dl == n->tok) { - PAIR_CLASS_INIT(&tag[0], "lit display"); - print_otag(h, TAG_DIV, 1, tag); - } else - PAIR_CLASS_INIT(&tag[0], "display"); - print_otag(h, TAG_DIV, 1, tag); + PAIR_CLASS_INIT(&tag[0], "lit"); + print_otag(h, TAG_CODE, 1, tag); + } return(1); } @@ -1087,6 +1128,7 @@ mdoc_sx_pre(MDOC_ARGS) PAIR_CLASS_INIT(&tag[0], "link-sec"); PAIR_HREF_INIT(&tag[1], buf); + print_otag(h, TAG_I, 1, tag); print_otag(h, TAG_A, 2, tag); return(1); } @@ -1105,7 +1147,7 @@ mdoc_bd_pre(MDOC_ARGS) return(0); if (MDOC_BLOCK == n->type) { - comp = n->data.Bd->comp; + comp = n->norm->Bd.comp; for (nn = n; nn && ! comp; nn = nn->parent) { if (MDOC_BLOCK != nn->type) continue; @@ -1120,14 +1162,14 @@ mdoc_bd_pre(MDOC_ARGS) } SCALE_HS_INIT(&su, 0); - if (n->data.Bd->offs) - a2offs(n->data.Bd->offs, &su); + if (n->norm->Bd.offs) + a2offs(n->norm->Bd.offs, &su); bufcat_su(h, "margin-left", &su); PAIR_STYLE_INIT(&tag[0], h); - if (DISP_unfilled != n->data.Bd->type && - DISP_literal != n->data.Bd->type) { + if (DISP_unfilled != n->norm->Bd.type && + DISP_literal != n->norm->Bd.type) { PAIR_CLASS_INIT(&tag[1], "display"); print_otag(h, TAG_DIV, 2, tag); return(1); @@ -1183,7 +1225,7 @@ mdoc_pa_pre(MDOC_ARGS) struct htmlpair tag; PAIR_CLASS_INIT(&tag, "file"); - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_I, 1, &tag); return(1); } @@ -1195,7 +1237,7 @@ mdoc_ad_pre(MDOC_ARGS) struct htmlpair tag; PAIR_CLASS_INIT(&tag, "addr"); - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_I, 1, &tag); return(1); } @@ -1222,7 +1264,7 @@ mdoc_cd_pre(MDOC_ARGS) synopsis_pre(h, n); PAIR_CLASS_INIT(&tag, "config"); - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_B, 1, &tag); return(1); } @@ -1273,12 +1315,12 @@ mdoc_fa_pre(MDOC_ARGS) PAIR_CLASS_INIT(&tag, "farg"); if (n->parent->tok != MDOC_Fo) { - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_I, 1, &tag); return(1); } for (nn = n->child; nn; nn = nn->next) { - t = print_otag(h, TAG_SPAN, 1, &tag); + t = print_otag(h, TAG_I, 1, &tag); print_text(h, nn->string); print_tagq(h, t); if (nn->next) @@ -1301,7 +1343,7 @@ mdoc_fd_pre(MDOC_ARGS) synopsis_pre(h, n); PAIR_CLASS_INIT(&tag, "macro"); - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_B, 1, &tag); return(1); } @@ -1334,7 +1376,7 @@ mdoc_ft_pre(MDOC_ARGS) synopsis_pre(h, n); PAIR_CLASS_INIT(&tag, "ftype"); - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_I, 1, &tag); return(1); } @@ -1359,7 +1401,7 @@ mdoc_fn_pre(MDOC_ARGS) ep = strchr(sp, ' '); if (NULL != ep) { PAIR_CLASS_INIT(&tag[0], "ftype"); - t = print_otag(h, TAG_SPAN, 1, tag); + t = print_otag(h, TAG_I, 1, tag); while (ep) { sz = MIN((int)(ep - sp), BUFSIZ - 1); @@ -1390,7 +1432,7 @@ mdoc_fn_pre(MDOC_ARGS) } #endif - t = print_otag(h, TAG_SPAN, 1, tag); + t = print_otag(h, TAG_B, 1, tag); if (sp) { strlcpy(nbuf, sp, BUFSIZ); @@ -1411,7 +1453,7 @@ mdoc_fn_pre(MDOC_ARGS) i = 1; if (MDOC_SYNPRETTY & n->flags) i = 2; - t = print_otag(h, TAG_SPAN, i, tag); + t = print_otag(h, TAG_I, i, tag); print_text(h, nn->string); print_tagq(h, t); if (nn->next) @@ -1557,7 +1599,7 @@ mdoc_fo_pre(MDOC_ARGS) assert(n->child->string); PAIR_CLASS_INIT(&tag, "fname"); - t = print_otag(h, TAG_SPAN, 1, &tag); + t = print_otag(h, TAG_B, 1, &tag); print_text(h, n->child->string); print_tagq(h, t); return(0); @@ -1588,7 +1630,7 @@ mdoc_in_pre(MDOC_ARGS) synopsis_pre(h, n); PAIR_CLASS_INIT(&tag[0], "includes"); - print_otag(h, TAG_SPAN, 1, tag); + print_otag(h, TAG_B, 1, tag); if (MDOC_SYNPRETTY & n->flags && MDOC_LINE & n->flags) print_text(h, "#include"); @@ -1624,7 +1666,7 @@ mdoc_ic_pre(MDOC_ARGS) struct htmlpair tag; PAIR_CLASS_INIT(&tag, "cmd"); - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_B, 1, &tag); return(1); } @@ -1637,12 +1679,14 @@ mdoc_rv_pre(MDOC_ARGS) struct htmlpair tag; struct tag *t; - print_otag(h, TAG_DIV, 0, NULL); + if (n->prev) + print_otag(h, TAG_BR, 0, NULL); + print_text(h, "The"); for (nn = n->child; nn; nn = nn->next) { PAIR_CLASS_INIT(&tag, "fname"); - t = print_otag(h, TAG_SPAN, 1, &tag); + t = print_otag(h, TAG_B, 1, &tag); print_text(h, nn->string); print_tagq(h, t); @@ -1664,7 +1708,7 @@ mdoc_rv_pre(MDOC_ARGS) "-1 is returned and the global variable"); PAIR_CLASS_INIT(&tag, "var"); - t = print_otag(h, TAG_SPAN, 1, &tag); + t = print_otag(h, TAG_B, 1, &tag); print_text(h, "errno"); print_tagq(h, t); print_text(h, "is set to indicate the error."); @@ -1679,7 +1723,7 @@ mdoc_va_pre(MDOC_ARGS) struct htmlpair tag; PAIR_CLASS_INIT(&tag, "var"); - print_otag(h, TAG_SPAN, 1, &tag); + print_otag(h, TAG_B, 1, &tag); return(1); } @@ -1708,13 +1752,11 @@ mdoc_bf_pre(MDOC_ARGS) else if (MDOC_BODY != n->type) return(1); - assert(n->data.Bf); - - if (FONT_Em == n->data.Bf->font) + if (FONT_Em == n->norm->Bf.font) PAIR_CLASS_INIT(&tag[0], "emph"); - else if (FONT_Sy == n->data.Bf->font) + else if (FONT_Sy == n->norm->Bf.font) PAIR_CLASS_INIT(&tag[0], "symb"); - else if (FONT_Li == n->data.Bf->font) + else if (FONT_Li == n->norm->Bf.font) PAIR_CLASS_INIT(&tag[0], "lit"); else PAIR_CLASS_INIT(&tag[0], "none"); @@ -1833,8 +1875,9 @@ mdoc_lb_pre(MDOC_ARGS) { struct htmlpair tag; - if (SEC_LIBRARY == n->sec && MDOC_LINE & n->flags) - print_otag(h, TAG_DIV, 0, NULL); + if (SEC_LIBRARY == n->sec && MDOC_LINE & n->flags && n->prev) + print_otag(h, TAG_BR, 0, NULL); + PAIR_CLASS_INIT(&tag, "lib"); print_otag(h, TAG_SPAN, 1, &tag); return(1); @@ -1846,7 +1889,10 @@ static int mdoc__x_pre(MDOC_ARGS) { struct htmlpair tag[2]; + enum htmltag t; + t = TAG_SPAN; + switch (n->tok) { case(MDOC__A): PAIR_CLASS_INIT(&tag[0], "ref-auth"); @@ -1856,6 +1902,7 @@ mdoc__x_pre(MDOC_ARGS) break; case(MDOC__B): PAIR_CLASS_INIT(&tag[0], "ref-book"); + t = TAG_I; break; case(MDOC__C): PAIR_CLASS_INIT(&tag[0], "ref-city"); @@ -1865,9 +1912,11 @@ mdoc__x_pre(MDOC_ARGS) break; case(MDOC__I): PAIR_CLASS_INIT(&tag[0], "ref-issue"); + t = TAG_I; break; case(MDOC__J): PAIR_CLASS_INIT(&tag[0], "ref-jrnl"); + t = TAG_I; break; case(MDOC__N): PAIR_CLASS_INIT(&tag[0], "ref-num"); @@ -1899,7 +1948,7 @@ mdoc__x_pre(MDOC_ARGS) } if (MDOC__U != n->tok) { - print_otag(h, TAG_SPAN, 1, tag); + print_otag(h, t, 1, tag); return(1); } @@ -1940,7 +1989,8 @@ mdoc_bk_pre(MDOC_ARGS) case (MDOC_HEAD): return(0); case (MDOC_BODY): - h->flags |= HTML_PREKEEP; + if (n->parent->args || 0 == n->prev->nchild) + h->flags |= HTML_PREKEEP; break; default: abort();