version 1.145, 2011/01/25 15:17:18 |
version 1.157, 2011/04/04 15:41:05 |
|
|
/* $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 410 print_mdoc_node(MDOC_ARGS) |
|
Line 410 print_mdoc_node(MDOC_ARGS) |
|
{ |
{ |
int child; |
int child; |
struct tag *t; |
struct tag *t; |
|
struct htmlpair tag; |
|
|
child = 1; |
child = 1; |
t = h->tags.head; |
t = h->tags.head; |
Line 422 print_mdoc_node(MDOC_ARGS) |
|
Line 423 print_mdoc_node(MDOC_ARGS) |
|
case (MDOC_TEXT): |
case (MDOC_TEXT): |
/* No tables in this mode... */ |
/* No tables in this mode... */ |
assert(NULL == h->tblt); |
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 (' ' == *n->string && MDOC_LINE & n->flags) |
print_otag(h, TAG_BR, 0, NULL); |
if ( ! (HTML_LITERAL & h->flags)) |
|
print_otag(h, TAG_BR, 0, NULL); |
|
if (MDOC_DELIMC & n->flags) |
|
h->flags |= HTML_NOSPACE; |
print_text(h, n->string); |
print_text(h, n->string); |
|
if (MDOC_DELIMO & n->flags) |
|
h->flags |= HTML_NOSPACE; |
return; |
return; |
|
case (MDOC_EQN): |
|
PAIR_CLASS_INIT(&tag, "eqn"); |
|
print_otag(h, TAG_SPAN, 1, &tag); |
|
print_text(h, n->eqn->data); |
|
break; |
case (MDOC_TBL): |
case (MDOC_TBL): |
/* |
/* |
* This will take care of initialising all of the table |
* This will take care of initialising all of the table |
Line 473 print_mdoc_node(MDOC_ARGS) |
|
Line 489 print_mdoc_node(MDOC_ARGS) |
|
case (MDOC_ROOT): |
case (MDOC_ROOT): |
mdoc_root_post(m, n, h); |
mdoc_root_post(m, n, h); |
break; |
break; |
|
case (MDOC_EQN): |
|
break; |
default: |
default: |
if (mdocs[n->tok].post && ENDBODY_NOT == n->end) |
if (mdocs[n->tok].post && ENDBODY_NOT == n->end) |
(*mdocs[n->tok].post)(m, n, h); |
(*mdocs[n->tok].post)(m, n, h); |
Line 486 mdoc_root_post(MDOC_ARGS) |
|
Line 504 mdoc_root_post(MDOC_ARGS) |
|
{ |
{ |
struct htmlpair tag[3]; |
struct htmlpair tag[3]; |
struct tag *t, *tt; |
struct tag *t, *tt; |
char b[DATESIZ]; |
|
|
|
time2a(m->date, b, DATESIZ); |
|
|
|
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) { |
Line 508 mdoc_root_post(MDOC_ARGS) |
|
Line 523 mdoc_root_post(MDOC_ARGS) |
|
PAIR_CLASS_INIT(&tag[0], "foot-date"); |
PAIR_CLASS_INIT(&tag[0], "foot-date"); |
print_otag(h, TAG_TD, 1, tag); |
print_otag(h, TAG_TD, 1, tag); |
|
|
print_text(h, b); |
print_text(h, m->date); |
print_stagq(h, tt); |
print_stagq(h, tt); |
|
|
PAIR_CLASS_INIT(&tag[0], "foot-os"); |
PAIR_CLASS_INIT(&tag[0], "foot-os"); |
Line 736 mdoc_nm_pre(MDOC_ARGS) |
|
Line 751 mdoc_nm_pre(MDOC_ARGS) |
|
static int |
static int |
mdoc_xr_pre(MDOC_ARGS) |
mdoc_xr_pre(MDOC_ARGS) |
{ |
{ |
struct htmlpair tag[2]; |
struct htmlpair tag[2]; |
const struct mdoc_node *nn; |
|
|
|
if (NULL == n->child) |
if (NULL == n->child) |
return(0); |
return(0); |
Line 753 mdoc_xr_pre(MDOC_ARGS) |
|
Line 767 mdoc_xr_pre(MDOC_ARGS) |
|
} else |
} else |
print_otag(h, TAG_A, 1, tag); |
print_otag(h, TAG_A, 1, tag); |
|
|
nn = n->child; |
n = n->child; |
print_text(h, nn->string); |
print_text(h, n->string); |
|
|
if (NULL == (nn = nn->next)) |
if (NULL == (n = n->next)) |
return(0); |
return(0); |
|
|
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
print_text(h, "("); |
print_text(h, "("); |
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
print_text(h, nn->string); |
print_text(h, n->string); |
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
print_text(h, ")"); |
print_text(h, ")"); |
return(0); |
return(0); |
|
|
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 797 mdoc_xx_pre(MDOC_ARGS) |
|
Line 812 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 823 mdoc_xx_pre(MDOC_ARGS) |
|
Line 839 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 832 mdoc_xx_pre(MDOC_ARGS) |
|
Line 855 mdoc_xx_pre(MDOC_ARGS) |
|
static int |
static int |
mdoc_bx_pre(MDOC_ARGS) |
mdoc_bx_pre(MDOC_ARGS) |
{ |
{ |
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); |
Line 1144 mdoc_d1_pre(MDOC_ARGS) |
|
Line 1167 mdoc_d1_pre(MDOC_ARGS) |
|
static int |
static int |
mdoc_sx_pre(MDOC_ARGS) |
mdoc_sx_pre(MDOC_ARGS) |
{ |
{ |
struct htmlpair tag[2]; |
struct htmlpair tag[2]; |
const struct mdoc_node *nn; |
char buf[BUFSIZ]; |
char buf[BUFSIZ]; |
|
|
|
strlcpy(buf, "#", BUFSIZ); |
strlcpy(buf, "#", BUFSIZ); |
for (nn = n->child; nn; nn = nn->next) { |
for (n = n->child; n; n = n->next) { |
html_idcat(buf, nn->string, BUFSIZ); |
html_idcat(buf, n->string, BUFSIZ); |
if (nn->next) |
if (n->next) |
html_idcat(buf, " ", BUFSIZ); |
html_idcat(buf, " ", BUFSIZ); |
} |
} |
|
|
|
|
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 1208 mdoc_bd_pre(MDOC_ARGS) |
|
Line 1230 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 1244 mdoc_bd_pre(MDOC_ARGS) |
|
Line 1271 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 1353 mdoc_fa_pre(MDOC_ARGS) |
|
Line 1383 mdoc_fa_pre(MDOC_ARGS) |
|
t = print_otag(h, TAG_I, 1, &tag); |
t = print_otag(h, TAG_I, 1, &tag); |
print_text(h, nn->string); |
print_text(h, nn->string); |
print_tagq(h, t); |
print_tagq(h, t); |
if (nn->next) |
if (nn->next) { |
|
h->flags |= HTML_NOSPACE; |
print_text(h, ","); |
print_text(h, ","); |
|
} |
} |
} |
|
|
if (n->child && n->next && n->next->tok == MDOC_Fa) |
if (n->child && n->next && n->next->tok == MDOC_Fa) { |
|
h->flags |= HTML_NOSPACE; |
print_text(h, ","); |
print_text(h, ","); |
|
} |
|
|
return(0); |
return(0); |
} |
} |
Line 1415 mdoc_ft_pre(MDOC_ARGS) |
|
Line 1449 mdoc_ft_pre(MDOC_ARGS) |
|
static int |
static int |
mdoc_fn_pre(MDOC_ARGS) |
mdoc_fn_pre(MDOC_ARGS) |
{ |
{ |
struct tag *t; |
struct tag *t; |
struct htmlpair tag[2]; |
struct htmlpair tag[2]; |
const struct mdoc_node *nn; |
char nbuf[BUFSIZ]; |
char nbuf[BUFSIZ]; |
const char *sp, *ep; |
const char *sp, *ep; |
int sz, i, pretty; |
int sz, i; |
|
|
|
|
pretty = MDOC_SYNPRETTY & n->flags; |
synopsis_pre(h, n); |
synopsis_pre(h, n); |
|
|
/* Split apart into type and name. */ |
/* Split apart into type and name. */ |
Line 1479 mdoc_fn_pre(MDOC_ARGS) |
|
Line 1513 mdoc_fn_pre(MDOC_ARGS) |
|
bufcat_style(h, "white-space", "nowrap"); |
bufcat_style(h, "white-space", "nowrap"); |
PAIR_STYLE_INIT(&tag[1], h); |
PAIR_STYLE_INIT(&tag[1], h); |
|
|
for (nn = n->child->next; nn; nn = nn->next) { |
for (n = n->child->next; n; n = n->next) { |
i = 1; |
i = 1; |
if (MDOC_SYNPRETTY & n->flags) |
if (MDOC_SYNPRETTY & n->flags) |
i = 2; |
i = 2; |
t = print_otag(h, TAG_I, i, tag); |
t = print_otag(h, TAG_I, i, tag); |
print_text(h, nn->string); |
print_text(h, n->string); |
print_tagq(h, t); |
print_tagq(h, t); |
if (nn->next) |
if (n->next) { |
|
h->flags |= HTML_NOSPACE; |
print_text(h, ","); |
print_text(h, ","); |
|
} |
} |
} |
|
|
|
h->flags |= HTML_NOSPACE; |
print_text(h, ")"); |
print_text(h, ")"); |
if (MDOC_SYNPRETTY & n->flags) |
|
|
if (pretty) { |
|
h->flags |= HTML_NOSPACE; |
print_text(h, ";"); |
print_text(h, ";"); |
|
} |
|
|
return(0); |
return(0); |
} |
} |
Line 1643 mdoc_fo_post(MDOC_ARGS) |
|
Line 1683 mdoc_fo_post(MDOC_ARGS) |
|
|
|
if (MDOC_BODY != n->type) |
if (MDOC_BODY != n->type) |
return; |
return; |
|
h->flags |= HTML_NOSPACE; |
print_text(h, ")"); |
print_text(h, ")"); |
|
h->flags |= HTML_NOSPACE; |
print_text(h, ";"); |
print_text(h, ";"); |
} |
} |
|
|
Line 1652 mdoc_fo_post(MDOC_ARGS) |
|
Line 1694 mdoc_fo_post(MDOC_ARGS) |
|
static int |
static int |
mdoc_in_pre(MDOC_ARGS) |
mdoc_in_pre(MDOC_ARGS) |
{ |
{ |
const struct mdoc_node *nn; |
struct tag *t; |
struct tag *t; |
struct htmlpair tag[2]; |
struct htmlpair tag[2]; |
int i; |
int i; |
|
|
|
synopsis_pre(h, n); |
synopsis_pre(h, n); |
|
|
PAIR_CLASS_INIT(&tag[0], "includes"); |
PAIR_CLASS_INIT(&tag[0], "includes"); |
print_otag(h, TAG_B, 1, tag); |
print_otag(h, TAG_B, 1, tag); |
|
|
|
/* |
|
* The first argument of the `In' gets special treatment as |
|
* being a linked value. Subsequent values are printed |
|
* afterward. groff does similarly. This also handles the case |
|
* of no children. |
|
*/ |
|
|
if (MDOC_SYNPRETTY & n->flags && MDOC_LINE & n->flags) |
if (MDOC_SYNPRETTY & n->flags && MDOC_LINE & n->flags) |
print_text(h, "#include"); |
print_text(h, "#include"); |
|
|
print_text(h, "<"); |
print_text(h, "<"); |
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
|
|
for (nn = n->child; nn; nn = nn->next) { |
if (NULL != (n = n->child)) { |
|
assert(MDOC_TEXT == n->type); |
|
|
PAIR_CLASS_INIT(&tag[0], "link-includes"); |
PAIR_CLASS_INIT(&tag[0], "link-includes"); |
i = 1; |
|
bufinit(h); |
bufinit(h); |
|
|
|
i = 1; |
|
|
if (h->base_includes) { |
if (h->base_includes) { |
buffmt_includes(h, nn->string); |
buffmt_includes(h, n->string); |
PAIR_HREF_INIT(&tag[i], h->buf); |
PAIR_HREF_INIT(&tag[i++], h->buf); |
i++; |
} |
} |
|
t = print_otag(h, TAG_A, i, tag); |
t = print_otag(h, TAG_A, i, tag); |
print_mdoc_node(m, nn, h); |
print_text(h, n->string); |
print_tagq(h, t); |
print_tagq(h, t); |
|
|
|
n = n->next; |
} |
} |
|
|
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
print_text(h, ">"); |
print_text(h, ">"); |
|
|
|
for ( ; n; n = n->next) { |
|
assert(MDOC_TEXT == n->type); |
|
print_text(h, n->string); |
|
} |
|
|
return(0); |
return(0); |
} |
} |
|
|
Line 2004 mdoc__x_post(MDOC_ARGS) |
|
Line 2063 mdoc__x_post(MDOC_ARGS) |
|
if (NULL == n->parent || MDOC_Rs != n->parent->tok) |
if (NULL == n->parent || MDOC_Rs != n->parent->tok) |
return; |
return; |
|
|
|
h->flags |= HTML_NOSPACE; |
print_text(h, n->next ? "," : "."); |
print_text(h, n->next ? "," : "."); |
} |
} |
|
|