version 1.57, 2010/12/24 00:46:49 |
version 1.68, 2011/02/06 21:44:36 |
Line 67 static int man_ign_pre(MAN_ARGS); |
|
Line 67 static int man_ign_pre(MAN_ARGS); |
|
static int man_in_pre(MAN_ARGS); |
static int man_in_pre(MAN_ARGS); |
static int man_literal_pre(MAN_ARGS); |
static int man_literal_pre(MAN_ARGS); |
static void man_root_post(MAN_ARGS); |
static void man_root_post(MAN_ARGS); |
static int man_root_pre(MAN_ARGS); |
static void man_root_pre(MAN_ARGS); |
static int man_B_pre(MAN_ARGS); |
static int man_B_pre(MAN_ARGS); |
static int man_HP_pre(MAN_ARGS); |
static int man_HP_pre(MAN_ARGS); |
static int man_I_pre(MAN_ARGS); |
static int man_I_pre(MAN_ARGS); |
Line 100 static const struct htmlman mans[MAN_MAX] = { |
|
Line 100 static const struct htmlman mans[MAN_MAX] = { |
|
{ man_I_pre, NULL }, /* I */ |
{ man_I_pre, NULL }, /* I */ |
{ man_alt_pre, NULL }, /* IR */ |
{ man_alt_pre, NULL }, /* IR */ |
{ man_alt_pre, NULL }, /* RI */ |
{ man_alt_pre, NULL }, /* RI */ |
{ NULL, NULL }, /* na */ |
{ man_ign_pre, NULL }, /* na */ |
{ man_br_pre, NULL }, /* sp */ |
{ man_br_pre, NULL }, /* sp */ |
{ man_literal_pre, NULL }, /* nf */ |
{ man_literal_pre, NULL }, /* nf */ |
{ man_literal_pre, NULL }, /* fi */ |
{ man_literal_pre, NULL }, /* fi */ |
Line 183 print_man_node(MAN_ARGS) |
|
Line 183 print_man_node(MAN_ARGS) |
|
|
|
child = 1; |
child = 1; |
t = h->tags.head; |
t = h->tags.head; |
|
|
bufinit(h); |
bufinit(h); |
|
|
/* |
|
* FIXME: embedded elements within next-line scopes (e.g., `br' |
|
* within an empty `B') will cause formatting to be forgotten |
|
* due to scope closing out. |
|
*/ |
|
|
|
switch (n->type) { |
switch (n->type) { |
case (MAN_ROOT): |
case (MAN_ROOT): |
child = man_root_pre(m, n, mh, h); |
man_root_pre(m, n, mh, h); |
break; |
break; |
case (MAN_TEXT): |
case (MAN_TEXT): |
|
/* |
|
* If we have a blank line, output a vertical space. |
|
* If we have a space as the first character, break |
|
* before printing the line's data. |
|
*/ |
|
if ('\0' == *n->string) { |
|
print_otag(h, TAG_P, 0, NULL); |
|
return; |
|
} else if (' ' == *n->string && MAN_LINE & n->flags) |
|
print_otag(h, TAG_BR, 0, NULL); |
|
|
print_text(h, n->string); |
print_text(h, n->string); |
|
|
if (MANH_LITERAL & mh->fl) |
/* |
|
* If we're in a literal context, make sure that words |
|
* togehter on the same line stay together. This is a |
|
* POST-printing call, so we check the NEXT word. Since |
|
* -man doesn't have nested macros, we don't need to be |
|
* more specific than this. |
|
*/ |
|
if (MANH_LITERAL & mh->fl && |
|
(NULL == n->next || |
|
n->next->line > n->line)) |
print_otag(h, TAG_BR, 0, NULL); |
print_otag(h, TAG_BR, 0, NULL); |
|
|
return; |
return; |
|
case (MAN_EQN): |
|
return; |
|
case (MAN_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 scope of font prior to opening a macro |
* Close out scope of font prior to opening a macro |
* scope. Assert that the metafont is on the top of the |
* scope. |
* stack (it's never nested). |
|
*/ |
*/ |
if (HTMLFONT_NONE != h->metac) { |
if (HTMLFONT_NONE != h->metac) { |
h->metal = h->metac; |
h->metal = h->metac; |
h->metac = HTMLFONT_NONE; |
h->metac = HTMLFONT_NONE; |
} |
} |
|
|
|
/* |
|
* 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; |
|
} |
if (mans[n->tok].pre) |
if (mans[n->tok].pre) |
child = (*mans[n->tok].pre)(m, n, mh, h); |
child = (*mans[n->tok].pre)(m, n, mh, h); |
break; |
break; |
Line 230 print_man_node(MAN_ARGS) |
|
Line 261 print_man_node(MAN_ARGS) |
|
case (MAN_ROOT): |
case (MAN_ROOT): |
man_root_post(m, n, mh, h); |
man_root_post(m, n, mh, h); |
break; |
break; |
case (MAN_TEXT): |
|
break; |
|
default: |
default: |
if (mans[n->tok].post) |
if (mans[n->tok].post) |
(*mans[n->tok].post)(m, n, mh, h); |
(*mans[n->tok].post)(m, n, mh, h); |
Line 254 a2width(const struct man_node *n, struct roffsu *su) |
|
Line 283 a2width(const struct man_node *n, struct roffsu *su) |
|
|
|
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static int |
static void |
man_root_pre(MAN_ARGS) |
man_root_pre(MAN_ARGS) |
{ |
{ |
struct htmlpair tag[3]; |
struct htmlpair tag[3]; |
Line 308 man_root_pre(MAN_ARGS) |
|
Line 337 man_root_pre(MAN_ARGS) |
|
|
|
print_text(h, title); |
print_text(h, title); |
print_tagq(h, t); |
print_tagq(h, t); |
return(1); |
|
} |
} |
|
|
|
|
Line 504 man_IP_pre(MAN_ARGS) |
|
Line 532 man_IP_pre(MAN_ARGS) |
|
struct roffsu su; |
struct roffsu su; |
struct htmlpair tag; |
struct htmlpair tag; |
const struct man_node *nn; |
const struct man_node *nn; |
int width; |
|
|
|
/* |
/* |
* This scattering of 1-BU margins and pads is to make sure that |
* This scattering of 1-BU margins and pads is to make sure that |
Line 522 man_IP_pre(MAN_ARGS) |
|
Line 549 man_IP_pre(MAN_ARGS) |
|
n->head->child : n->parent->head->child; |
n->head->child : n->parent->head->child; |
|
|
SCALE_HS_INIT(&su, INDENT); |
SCALE_HS_INIT(&su, INDENT); |
width = 0; |
|
|
|
/* Width is the last token. */ |
/* Width is the second token. */ |
|
|
if (MAN_IP == n->tok && NULL != nn) |
if (MAN_IP == n->tok && NULL != nn) |
if (NULL != (nn = nn->next)) { |
if (NULL != (nn = nn->next)) |
for ( ; nn->next; nn = nn->next) |
a2width(nn, &su); |
/* Do nothing. */ ; |
|
width = a2width(nn, &su); |
|
} |
|
|
|
/* Width is the first token. */ |
/* Width is the first token. */ |
|
|
Line 540 man_IP_pre(MAN_ARGS) |
|
Line 563 man_IP_pre(MAN_ARGS) |
|
while (nn && MAN_TEXT != nn->type) |
while (nn && MAN_TEXT != nn->type) |
nn = nn->next; |
nn = nn->next; |
if (nn) |
if (nn) |
width = a2width(nn, &su); |
a2width(nn, &su); |
} |
} |
|
|
if (MAN_BLOCK == n->type) { |
if (MAN_BLOCK == n->type) { |
Line 557 man_IP_pre(MAN_ARGS) |
|
Line 580 man_IP_pre(MAN_ARGS) |
|
|
|
print_otag(h, TAG_TD, 0, NULL); |
print_otag(h, TAG_TD, 0, NULL); |
|
|
/* |
/* For IP, only print the first header element. */ |
* Without a length string, we can print all of our children. |
|
*/ |
|
|
|
if ( ! width) |
if (MAN_IP == n->tok && n->child) |
return(1); |
print_man_node(m, n->child, mh, h); |
|
|
/* |
/* For TP, only print next-line header elements. */ |
* When a length has been specified, we need to carefully print |
|
* our child context: IP gets all children printed but the last |
|
* (the width), while TP gets all children printed but the first |
|
* (the width). |
|
*/ |
|
|
|
if (MAN_IP == n->tok) |
|
for (nn = n->child; nn->next; nn = nn->next) |
|
print_man_node(m, nn, mh, h); |
|
if (MAN_TP == n->tok) |
if (MAN_TP == n->tok) |
for (nn = n->child->next; nn; nn = nn->next) |
for (nn = n->child; nn; nn = nn->next) |
print_man_node(m, nn, mh, h); |
if (nn->line > n->line) |
|
print_man_node(m, nn, mh, h); |
|
|
return(0); |
return(0); |
} |
} |
Line 651 man_literal_pre(MAN_ARGS) |
|
Line 665 man_literal_pre(MAN_ARGS) |
|
} else |
} else |
mh->fl &= ~MANH_LITERAL; |
mh->fl &= ~MANH_LITERAL; |
|
|
return(1); |
return(0); |
} |
} |
|
|
|
|