version 1.134, 2010/12/20 13:39:24 |
version 1.152, 2011/02/06 23:02:31 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2008, 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* |
* |
* Permission to use, copy, modify, and distribute this software for any |
* Permission to use, copy, modify, and distribute this software for any |
* purpose with or without fee is hereby granted, provided that the above |
* purpose with or without fee is hereby granted, provided that the above |
Line 420 print_mdoc_node(MDOC_ARGS) |
|
Line 420 print_mdoc_node(MDOC_ARGS) |
|
child = mdoc_root_pre(m, n, h); |
child = mdoc_root_pre(m, n, h); |
break; |
break; |
case (MDOC_TEXT): |
case (MDOC_TEXT): |
|
/* No tables in this mode... */ |
|
assert(NULL == h->tblt); |
|
|
|
/* |
|
* Make sure that if we're in a literal mode already |
|
* (i.e., within a <PRE>) don't print the newline. |
|
*/ |
|
if (' ' == *n->string && MDOC_LINE & n->flags) |
|
if ( ! (HTML_LITERAL & h->flags)) |
|
print_otag(h, TAG_BR, 0, NULL); |
print_text(h, n->string); |
print_text(h, n->string); |
return; |
return; |
|
case (MDOC_EQN): |
|
return; |
|
case (MDOC_TBL): |
|
/* |
|
* This will take care of initialising all of the table |
|
* state data for the first table, then tearing it down |
|
* for the last one. |
|
*/ |
|
print_tbl(h, n->span); |
|
return; |
default: |
default: |
|
/* |
|
* Close out the current table, if it's open, and unset |
|
* the "meta" table state. This will be reopened on the |
|
* next table element. |
|
*/ |
|
if (h->tblt) { |
|
print_tblclose(h); |
|
t = h->tags.head; |
|
} |
|
|
|
assert(NULL == h->tblt); |
if (mdocs[n->tok].pre && ENDBODY_NOT == n->end) |
if (mdocs[n->tok].pre && ENDBODY_NOT == n->end) |
child = (*mdocs[n->tok].pre)(m, n, h); |
child = (*mdocs[n->tok].pre)(m, n, h); |
break; |
break; |
Line 470 mdoc_root_post(MDOC_ARGS) |
|
Line 501 mdoc_root_post(MDOC_ARGS) |
|
PAIR_SUMMARY_INIT(&tag[0], "Document Footer"); |
PAIR_SUMMARY_INIT(&tag[0], "Document Footer"); |
PAIR_CLASS_INIT(&tag[1], "foot"); |
PAIR_CLASS_INIT(&tag[1], "foot"); |
if (NULL == h->style) { |
if (NULL == h->style) { |
PAIR_INIT(&tag[1], ATTR_WIDTH, "100%"); |
PAIR_INIT(&tag[2], ATTR_WIDTH, "100%"); |
t = print_otag(h, TAG_TABLE, 2, tag); |
t = print_otag(h, TAG_TABLE, 3, tag); |
PAIR_INIT(&tag[0], ATTR_WIDTH, "50%"); |
PAIR_INIT(&tag[0], ATTR_WIDTH, "50%"); |
print_otag(h, TAG_COL, 1, tag); |
print_otag(h, TAG_COL, 1, tag); |
print_otag(h, TAG_COL, 1, tag); |
print_otag(h, TAG_COL, 1, tag); |
|
|
mdoc_ns_pre(MDOC_ARGS) |
mdoc_ns_pre(MDOC_ARGS) |
{ |
{ |
|
|
h->flags |= HTML_NOSPACE; |
if ( ! (MDOC_LINE & n->flags)) |
|
h->flags |= HTML_NOSPACE; |
return(1); |
return(1); |
} |
} |
|
|
Line 774 mdoc_xx_pre(MDOC_ARGS) |
|
Line 806 mdoc_xx_pre(MDOC_ARGS) |
|
{ |
{ |
const char *pp; |
const char *pp; |
struct htmlpair tag; |
struct htmlpair tag; |
|
int flags; |
|
|
switch (n->tok) { |
switch (n->tok) { |
case (MDOC_Bsx): |
case (MDOC_Bsx): |
Line 800 mdoc_xx_pre(MDOC_ARGS) |
|
Line 833 mdoc_xx_pre(MDOC_ARGS) |
|
|
|
PAIR_CLASS_INIT(&tag, "unix"); |
PAIR_CLASS_INIT(&tag, "unix"); |
print_otag(h, TAG_SPAN, 1, &tag); |
print_otag(h, TAG_SPAN, 1, &tag); |
|
|
print_text(h, pp); |
print_text(h, pp); |
return(1); |
if (n->child) { |
|
flags = h->flags; |
|
h->flags |= HTML_KEEP; |
|
print_text(h, n->child->string); |
|
h->flags = flags; |
|
} |
|
return(0); |
} |
} |
|
|
|
|
Line 809 mdoc_xx_pre(MDOC_ARGS) |
|
Line 849 mdoc_xx_pre(MDOC_ARGS) |
|
static int |
static int |
mdoc_bx_pre(MDOC_ARGS) |
mdoc_bx_pre(MDOC_ARGS) |
{ |
{ |
const struct mdoc_node *nn; |
struct htmlpair tag; |
struct htmlpair tag; |
|
|
|
PAIR_CLASS_INIT(&tag, "unix"); |
PAIR_CLASS_INIT(&tag, "unix"); |
print_otag(h, TAG_SPAN, 1, &tag); |
print_otag(h, TAG_SPAN, 1, &tag); |
|
|
for (nn = n->child; nn; nn = nn->next) |
if (NULL != (n = n->child)) { |
print_mdoc_node(m, nn, h); |
print_text(h, n->string); |
|
h->flags |= HTML_NOSPACE; |
|
print_text(h, "BSD"); |
|
} else { |
|
print_text(h, "BSD"); |
|
return(0); |
|
} |
|
|
if (n->child) |
if (NULL != (n = n->next)) { |
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
|
print_text(h, "-"); |
|
h->flags |= HTML_NOSPACE; |
|
print_text(h, n->string); |
|
} |
|
|
print_text(h, "BSD"); |
|
return(0); |
return(0); |
} |
} |
|
|
|
/* ARGSUSED */ |
static int |
static int |
mdoc_it_pre(MDOC_ARGS) |
mdoc_it_pre(MDOC_ARGS) |
{ |
{ |
Line 839 mdoc_it_pre(MDOC_ARGS) |
|
Line 888 mdoc_it_pre(MDOC_ARGS) |
|
|
|
assert(bl); |
assert(bl); |
|
|
type = bl->data.Bl->type; |
type = bl->norm->Bl.type; |
|
|
assert(lists[type]); |
assert(lists[type]); |
PAIR_CLASS_INIT(&tag[0], lists[type]); |
PAIR_CLASS_INIT(&tag[0], lists[type]); |
Line 865 mdoc_it_pre(MDOC_ARGS) |
|
Line 914 mdoc_it_pre(MDOC_ARGS) |
|
case(LIST_ohang): |
case(LIST_ohang): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case(LIST_tag): |
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); |
bufcat_su(h, "margin-top", &su); |
PAIR_STYLE_INIT(&tag[1], h); |
PAIR_STYLE_INIT(&tag[1], h); |
print_otag(h, TAG_DT, 2, tag); |
print_otag(h, TAG_DT, 2, tag); |
Line 890 mdoc_it_pre(MDOC_ARGS) |
|
Line 939 mdoc_it_pre(MDOC_ARGS) |
|
case(LIST_enum): |
case(LIST_enum): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case(LIST_item): |
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); |
bufcat_su(h, "margin-top", &su); |
PAIR_STYLE_INIT(&tag[1], h); |
PAIR_STYLE_INIT(&tag[1], h); |
print_otag(h, TAG_LI, 2, tag); |
print_otag(h, TAG_LI, 2, tag); |
Line 904 mdoc_it_pre(MDOC_ARGS) |
|
Line 953 mdoc_it_pre(MDOC_ARGS) |
|
case(LIST_ohang): |
case(LIST_ohang): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case(LIST_tag): |
case(LIST_tag): |
if (NULL == bl->data.Bl->width) { |
if (NULL == bl->norm->Bl.width) { |
print_otag(h, TAG_DD, 1, tag); |
print_otag(h, TAG_DD, 1, tag); |
break; |
break; |
} |
} |
a2width(bl->data.Bl->width, &su); |
a2width(bl->norm->Bl.width, &su); |
bufcat_su(h, "margin-left", &su); |
bufcat_su(h, "margin-left", &su); |
PAIR_STYLE_INIT(&tag[1], h); |
PAIR_STYLE_INIT(&tag[1], h); |
print_otag(h, TAG_DD, 2, tag); |
print_otag(h, TAG_DD, 2, tag); |
break; |
break; |
case(LIST_column): |
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); |
bufcat_su(h, "margin-top", &su); |
PAIR_STYLE_INIT(&tag[1], h); |
PAIR_STYLE_INIT(&tag[1], h); |
print_otag(h, TAG_TD, 2, tag); |
print_otag(h, TAG_TD, 2, tag); |
Line 939 mdoc_it_pre(MDOC_ARGS) |
|
Line 988 mdoc_it_pre(MDOC_ARGS) |
|
static int |
static int |
mdoc_bl_pre(MDOC_ARGS) |
mdoc_bl_pre(MDOC_ARGS) |
{ |
{ |
size_t i; |
int i; |
struct htmlpair tag[3]; |
struct htmlpair tag[3]; |
struct roffsu su; |
struct roffsu su; |
char buf[BUFSIZ]; |
char buf[BUFSIZ]; |
|
|
if (MDOC_BODY == n->type) { |
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); |
print_otag(h, TAG_TBODY, 0, NULL); |
return(1); |
return(1); |
} |
} |
|
|
if (MDOC_HEAD == n->type) { |
if (MDOC_HEAD == n->type) { |
if (LIST_column != n->data.Bl->type) |
if (LIST_column != n->norm->Bl.type) |
return(0); |
return(0); |
|
|
/* |
/* |
Line 961 mdoc_bl_pre(MDOC_ARGS) |
|
Line 1010 mdoc_bl_pre(MDOC_ARGS) |
|
* screen and we want to preserve that behaviour. |
* screen and we want to preserve that behaviour. |
*/ |
*/ |
|
|
for (i = 0; i < n->data.Bl->ncols; i++) { |
for (i = 0; i < (int)n->norm->Bl.ncols; i++) { |
a2width(n->data.Bl->cols[i], &su); |
a2width(n->norm->Bl.cols[i], &su); |
bufinit(h); |
bufinit(h); |
if (i < n->data.Bl->ncols - 1) |
if (i < (int)n->norm->Bl.ncols - 1) |
bufcat_su(h, "width", &su); |
bufcat_su(h, "width", &su); |
else |
else |
bufcat_su(h, "min-width", &su); |
bufcat_su(h, "min-width", &su); |
Line 980 mdoc_bl_pre(MDOC_ARGS) |
|
Line 1029 mdoc_bl_pre(MDOC_ARGS) |
|
bufcat_su(h, "margin-bottom", &su); |
bufcat_su(h, "margin-bottom", &su); |
PAIR_STYLE_INIT(&tag[0], h); |
PAIR_STYLE_INIT(&tag[0], h); |
|
|
assert(lists[n->data.Bl->type]); |
assert(lists[n->norm->Bl.type]); |
strlcpy(buf, "list ", BUFSIZ); |
strlcpy(buf, "list ", BUFSIZ); |
strlcat(buf, lists[n->data.Bl->type], BUFSIZ); |
strlcat(buf, lists[n->norm->Bl.type], BUFSIZ); |
PAIR_INIT(&tag[1], ATTR_CLASS, buf); |
PAIR_INIT(&tag[1], ATTR_CLASS, buf); |
|
|
/* Set the block's left-hand margin. */ |
/* Set the block's left-hand margin. */ |
|
|
if (n->data.Bl->offs) { |
if (n->norm->Bl.offs) { |
a2offs(n->data.Bl->offs, &su); |
a2offs(n->norm->Bl.offs, &su); |
bufcat_su(h, "margin-left", &su); |
bufcat_su(h, "margin-left", &su); |
} |
} |
|
|
switch (n->data.Bl->type) { |
switch (n->norm->Bl.type) { |
case(LIST_bullet): |
case(LIST_bullet): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case(LIST_dash): |
case(LIST_dash): |
Line 1096 mdoc_d1_pre(MDOC_ARGS) |
|
Line 1145 mdoc_d1_pre(MDOC_ARGS) |
|
|
|
/* BLOCKQUOTE needs a block body. */ |
/* BLOCKQUOTE needs a block body. */ |
|
|
if (MDOC_Dl == n->tok) |
PAIR_CLASS_INIT(&tag[0], "display"); |
PAIR_CLASS_INIT(&tag[0], "lit display"); |
|
else |
|
PAIR_CLASS_INIT(&tag[0], "display"); |
|
|
|
print_otag(h, TAG_DIV, 1, tag); |
print_otag(h, TAG_DIV, 1, tag); |
|
|
|
if (MDOC_Dl == n->tok) { |
|
PAIR_CLASS_INIT(&tag[0], "lit"); |
|
print_otag(h, TAG_CODE, 1, tag); |
|
} |
|
|
return(1); |
return(1); |
} |
} |
|
|
|
|
mdoc_bd_pre(MDOC_ARGS) |
mdoc_bd_pre(MDOC_ARGS) |
{ |
{ |
struct htmlpair tag[2]; |
struct htmlpair tag[2]; |
int comp; |
int comp, sv; |
const struct mdoc_node *nn; |
const struct mdoc_node *nn; |
struct roffsu su; |
struct roffsu su; |
|
|
Line 1143 mdoc_bd_pre(MDOC_ARGS) |
|
Line 1194 mdoc_bd_pre(MDOC_ARGS) |
|
return(0); |
return(0); |
|
|
if (MDOC_BLOCK == n->type) { |
if (MDOC_BLOCK == n->type) { |
comp = n->data.Bd->comp; |
comp = n->norm->Bd.comp; |
for (nn = n; nn && ! comp; nn = nn->parent) { |
for (nn = n; nn && ! comp; nn = nn->parent) { |
if (MDOC_BLOCK != nn->type) |
if (MDOC_BLOCK != nn->type) |
continue; |
continue; |
Line 1158 mdoc_bd_pre(MDOC_ARGS) |
|
Line 1209 mdoc_bd_pre(MDOC_ARGS) |
|
} |
} |
|
|
SCALE_HS_INIT(&su, 0); |
SCALE_HS_INIT(&su, 0); |
if (n->data.Bd->offs) |
if (n->norm->Bd.offs) |
a2offs(n->data.Bd->offs, &su); |
a2offs(n->norm->Bd.offs, &su); |
|
|
bufcat_su(h, "margin-left", &su); |
bufcat_su(h, "margin-left", &su); |
PAIR_STYLE_INIT(&tag[0], h); |
PAIR_STYLE_INIT(&tag[0], h); |
|
|
if (DISP_unfilled != n->data.Bd->type && |
if (DISP_unfilled != n->norm->Bd.type && |
DISP_literal != n->data.Bd->type) { |
DISP_literal != n->norm->Bd.type) { |
PAIR_CLASS_INIT(&tag[1], "display"); |
PAIR_CLASS_INIT(&tag[1], "display"); |
print_otag(h, TAG_DIV, 2, tag); |
print_otag(h, TAG_DIV, 2, tag); |
return(1); |
return(1); |
Line 1174 mdoc_bd_pre(MDOC_ARGS) |
|
Line 1225 mdoc_bd_pre(MDOC_ARGS) |
|
PAIR_CLASS_INIT(&tag[1], "lit display"); |
PAIR_CLASS_INIT(&tag[1], "lit display"); |
print_otag(h, TAG_PRE, 2, tag); |
print_otag(h, TAG_PRE, 2, tag); |
|
|
|
/* This can be recursive: save & set our literal state. */ |
|
|
|
sv = h->flags & HTML_LITERAL; |
|
h->flags |= HTML_LITERAL; |
|
|
for (nn = n->child; nn; nn = nn->next) { |
for (nn = n->child; nn; nn = nn->next) { |
print_mdoc_node(m, nn, h); |
print_mdoc_node(m, nn, h); |
/* |
/* |
Line 1210 mdoc_bd_pre(MDOC_ARGS) |
|
Line 1266 mdoc_bd_pre(MDOC_ARGS) |
|
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
} |
} |
|
|
|
if (0 == sv) |
|
h->flags &= ~HTML_LITERAL; |
|
|
return(0); |
return(0); |
} |
} |
|
|
Line 1595 mdoc_fo_pre(MDOC_ARGS) |
|
Line 1654 mdoc_fo_pre(MDOC_ARGS) |
|
assert(n->child->string); |
assert(n->child->string); |
|
|
PAIR_CLASS_INIT(&tag, "fname"); |
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_text(h, n->child->string); |
print_tagq(h, t); |
print_tagq(h, t); |
return(0); |
return(0); |
Line 1682 mdoc_rv_pre(MDOC_ARGS) |
|
Line 1741 mdoc_rv_pre(MDOC_ARGS) |
|
|
|
for (nn = n->child; nn; nn = nn->next) { |
for (nn = n->child; nn; nn = nn->next) { |
PAIR_CLASS_INIT(&tag, "fname"); |
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_text(h, nn->string); |
print_tagq(h, t); |
print_tagq(h, t); |
|
|
Line 1748 mdoc_bf_pre(MDOC_ARGS) |
|
Line 1807 mdoc_bf_pre(MDOC_ARGS) |
|
else if (MDOC_BODY != n->type) |
else if (MDOC_BODY != n->type) |
return(1); |
return(1); |
|
|
assert(n->data.Bf); |
if (FONT_Em == n->norm->Bf.font) |
|
|
if (FONT_Em == n->data.Bf->font) |
|
PAIR_CLASS_INIT(&tag[0], "emph"); |
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"); |
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"); |
PAIR_CLASS_INIT(&tag[0], "lit"); |
else |
else |
PAIR_CLASS_INIT(&tag[0], "none"); |
PAIR_CLASS_INIT(&tag[0], "none"); |
Line 1933 mdoc__x_pre(MDOC_ARGS) |
|
Line 1990 mdoc__x_pre(MDOC_ARGS) |
|
break; |
break; |
case(MDOC__T): |
case(MDOC__T): |
PAIR_CLASS_INIT(&tag[0], "ref-title"); |
PAIR_CLASS_INIT(&tag[0], "ref-title"); |
t = TAG_U; |
|
break; |
break; |
case(MDOC__U): |
case(MDOC__U): |
PAIR_CLASS_INIT(&tag[0], "link-ref"); |
PAIR_CLASS_INIT(&tag[0], "link-ref"); |