version 1.283, 2017/05/05 02:06:19 |
version 1.293, 2017/07/15 17:29:31 |
|
|
#include <unistd.h> |
#include <unistd.h> |
|
|
#include "mandoc_aux.h" |
#include "mandoc_aux.h" |
|
#include "mandoc.h" |
#include "roff.h" |
#include "roff.h" |
#include "mdoc.h" |
#include "mdoc.h" |
#include "out.h" |
#include "out.h" |
Line 108 static int mdoc_rs_pre(MDOC_ARGS); |
|
Line 109 static int mdoc_rs_pre(MDOC_ARGS); |
|
static int mdoc_sh_pre(MDOC_ARGS); |
static int mdoc_sh_pre(MDOC_ARGS); |
static int mdoc_skip_pre(MDOC_ARGS); |
static int mdoc_skip_pre(MDOC_ARGS); |
static int mdoc_sm_pre(MDOC_ARGS); |
static int mdoc_sm_pre(MDOC_ARGS); |
static int mdoc_sp_pre(MDOC_ARGS); |
|
static int mdoc_ss_pre(MDOC_ARGS); |
static int mdoc_ss_pre(MDOC_ARGS); |
static int mdoc_st_pre(MDOC_ARGS); |
static int mdoc_st_pre(MDOC_ARGS); |
static int mdoc_sx_pre(MDOC_ARGS); |
static int mdoc_sx_pre(MDOC_ARGS); |
Line 237 static const struct htmlmdoc __mdocs[MDOC_MAX - MDOC_D |
|
Line 237 static const struct htmlmdoc __mdocs[MDOC_MAX - MDOC_D |
|
{mdoc_quote_pre, mdoc_quote_post}, /* En */ |
{mdoc_quote_pre, mdoc_quote_post}, /* En */ |
{mdoc_xx_pre, NULL}, /* Dx */ |
{mdoc_xx_pre, NULL}, /* Dx */ |
{mdoc__x_pre, mdoc__x_post}, /* %Q */ |
{mdoc__x_pre, mdoc__x_post}, /* %Q */ |
{mdoc_sp_pre, NULL}, /* sp */ |
|
{mdoc__x_pre, mdoc__x_post}, /* %U */ |
{mdoc__x_pre, mdoc__x_post}, /* %U */ |
{NULL, NULL}, /* Ta */ |
{NULL, NULL}, /* Ta */ |
{mdoc_skip_pre, NULL}, /* ll */ |
|
}; |
}; |
static const struct htmlmdoc *const mdocs = __mdocs - MDOC_Dd; |
static const struct htmlmdoc *const mdocs = __mdocs - MDOC_Dd; |
|
|
Line 362 print_mdoc_node(MDOC_ARGS) |
|
Line 360 print_mdoc_node(MDOC_ARGS) |
|
* Make sure that if we're in a literal mode already |
* Make sure that if we're in a literal mode already |
* (i.e., within a <PRE>) don't print the newline. |
* (i.e., within a <PRE>) don't print the newline. |
*/ |
*/ |
if (' ' == *n->string && NODE_LINE & n->flags) |
if (*n->string == ' ' && n->flags & NODE_LINE && |
if ( ! (HTML_LITERAL & h->flags)) |
(h->flags & (HTML_LITERAL | HTML_NONEWLINE)) == 0) |
print_otag(h, TAG_BR, ""); |
print_otag(h, TAG_BR, ""); |
if (NODE_DELIMC & n->flags) |
if (NODE_DELIMC & n->flags) |
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
print_text(h, n->string); |
print_text(h, n->string); |
Line 588 mdoc_nd_pre(MDOC_ARGS) |
|
Line 586 mdoc_nd_pre(MDOC_ARGS) |
|
static int |
static int |
mdoc_nm_pre(MDOC_ARGS) |
mdoc_nm_pre(MDOC_ARGS) |
{ |
{ |
struct tag *t; |
|
int len; |
|
|
|
switch (n->type) { |
switch (n->type) { |
case ROFFT_HEAD: |
case ROFFT_HEAD: |
print_otag(h, TAG_TD, ""); |
print_otag(h, TAG_TD, ""); |
Line 604 mdoc_nm_pre(MDOC_ARGS) |
|
Line 599 mdoc_nm_pre(MDOC_ARGS) |
|
default: |
default: |
break; |
break; |
} |
} |
|
|
synopsis_pre(h, n); |
synopsis_pre(h, n); |
print_otag(h, TAG_TABLE, "c", "Nm"); |
print_otag(h, TAG_TABLE, "c", "Nm"); |
|
|
for (len = 0, n = n->head->child; n; n = n->next) |
|
if (n->type == ROFFT_TEXT) |
|
len += html_strlen(n->string); |
|
|
|
if (len == 0 && meta->name != NULL) |
|
len = html_strlen(meta->name); |
|
|
|
t = print_otag(h, TAG_COLGROUP, ""); |
|
/* Increase width to make even bold text fit. */ |
|
print_otag(h, TAG_COL, "shw", len + 2); |
|
print_otag(h, TAG_COL, ""); |
|
print_tagq(h, t); |
|
print_otag(h, TAG_TR, ""); |
print_otag(h, TAG_TR, ""); |
return 1; |
return 1; |
} |
} |
Line 734 mdoc_it_pre(MDOC_ARGS) |
|
Line 715 mdoc_it_pre(MDOC_ARGS) |
|
case ROFFT_HEAD: |
case ROFFT_HEAD: |
return 0; |
return 0; |
case ROFFT_BODY: |
case ROFFT_BODY: |
if (bl->norm->Bl.comp) |
print_otag(h, TAG_LI, "c", cattr); |
print_otag(h, TAG_LI, "csvt", cattr, 0); |
|
else |
|
print_otag(h, TAG_LI, "c", cattr); |
|
break; |
break; |
default: |
default: |
break; |
break; |
Line 749 mdoc_it_pre(MDOC_ARGS) |
|
Line 727 mdoc_it_pre(MDOC_ARGS) |
|
case LIST_ohang: |
case LIST_ohang: |
switch (n->type) { |
switch (n->type) { |
case ROFFT_HEAD: |
case ROFFT_HEAD: |
if (bl->norm->Bl.comp) |
print_otag(h, TAG_DT, "c", cattr); |
print_otag(h, TAG_DT, "csvt", cattr, 0); |
|
else |
|
print_otag(h, TAG_DT, "c", cattr); |
|
if (type == LIST_diag) |
if (type == LIST_diag) |
print_otag(h, TAG_B, "c", cattr); |
print_otag(h, TAG_B, "c", cattr); |
break; |
break; |
case ROFFT_BODY: |
case ROFFT_BODY: |
print_otag(h, TAG_DD, "cswl", cattr, |
print_otag(h, TAG_DD, "csw+l", cattr, |
bl->norm->Bl.width); |
bl->norm->Bl.width); |
break; |
break; |
default: |
default: |
Line 771 mdoc_it_pre(MDOC_ARGS) |
|
Line 746 mdoc_it_pre(MDOC_ARGS) |
|
(n->parent->prev == NULL || |
(n->parent->prev == NULL || |
n->parent->prev->body == NULL || |
n->parent->prev->body == NULL || |
n->parent->prev->body->child != NULL)) { |
n->parent->prev->body->child != NULL)) { |
t = print_otag(h, TAG_DT, "csWl", |
t = print_otag(h, TAG_DT, "csw+-l", |
cattr, bl->norm->Bl.width); |
cattr, bl->norm->Bl.width); |
print_text(h, "\\ "); |
print_text(h, "\\ "); |
print_tagq(h, t); |
print_tagq(h, t); |
Line 779 mdoc_it_pre(MDOC_ARGS) |
|
Line 754 mdoc_it_pre(MDOC_ARGS) |
|
print_text(h, "\\ "); |
print_text(h, "\\ "); |
print_tagq(h, t); |
print_tagq(h, t); |
} |
} |
print_otag(h, TAG_DT, "csWl", cattr, |
print_otag(h, TAG_DT, "csw+-l", cattr, |
bl->norm->Bl.width); |
bl->norm->Bl.width); |
break; |
break; |
case ROFFT_BODY: |
case ROFFT_BODY: |
Line 799 mdoc_it_pre(MDOC_ARGS) |
|
Line 774 mdoc_it_pre(MDOC_ARGS) |
|
case ROFFT_HEAD: |
case ROFFT_HEAD: |
break; |
break; |
case ROFFT_BODY: |
case ROFFT_BODY: |
if (bl->norm->Bl.comp) |
print_otag(h, TAG_TD, "c", cattr); |
print_otag(h, TAG_TD, "csvt", cattr, 0); |
|
else |
|
print_otag(h, TAG_TD, "c", cattr); |
|
break; |
break; |
default: |
default: |
print_otag(h, TAG_TR, "c", cattr); |
print_otag(h, TAG_TR, "c", cattr); |
Line 817 mdoc_it_pre(MDOC_ARGS) |
|
Line 789 mdoc_it_pre(MDOC_ARGS) |
|
static int |
static int |
mdoc_bl_pre(MDOC_ARGS) |
mdoc_bl_pre(MDOC_ARGS) |
{ |
{ |
|
char cattr[21]; |
struct tag *t; |
struct tag *t; |
struct mdoc_bl *bl; |
struct mdoc_bl *bl; |
const char *cattr; |
|
size_t i; |
size_t i; |
enum htmltag elemtype; |
enum htmltag elemtype; |
|
|
Line 842 mdoc_bl_pre(MDOC_ARGS) |
|
Line 814 mdoc_bl_pre(MDOC_ARGS) |
|
|
|
t = print_otag(h, TAG_COLGROUP, ""); |
t = print_otag(h, TAG_COLGROUP, ""); |
for (i = 0; i < bl->ncols - 1; i++) |
for (i = 0; i < bl->ncols - 1; i++) |
print_otag(h, TAG_COL, "sww", bl->cols[i]); |
print_otag(h, TAG_COL, "sw+w", bl->cols[i]); |
print_otag(h, TAG_COL, "swW", bl->cols[i]); |
print_otag(h, TAG_COL, "swW", bl->cols[i]); |
print_tagq(h, t); |
print_tagq(h, t); |
return 0; |
return 0; |
Line 854 mdoc_bl_pre(MDOC_ARGS) |
|
Line 826 mdoc_bl_pre(MDOC_ARGS) |
|
switch (bl->type) { |
switch (bl->type) { |
case LIST_bullet: |
case LIST_bullet: |
elemtype = TAG_UL; |
elemtype = TAG_UL; |
cattr = "Bl-bullet"; |
(void)strlcpy(cattr, "Bl-bullet", sizeof(cattr)); |
break; |
break; |
case LIST_dash: |
case LIST_dash: |
case LIST_hyphen: |
case LIST_hyphen: |
elemtype = TAG_UL; |
elemtype = TAG_UL; |
cattr = "Bl-dash"; |
(void)strlcpy(cattr, "Bl-dash", sizeof(cattr)); |
break; |
break; |
case LIST_item: |
case LIST_item: |
elemtype = TAG_UL; |
elemtype = TAG_UL; |
cattr = "Bl-item"; |
(void)strlcpy(cattr, "Bl-item", sizeof(cattr)); |
break; |
break; |
case LIST_enum: |
case LIST_enum: |
elemtype = TAG_OL; |
elemtype = TAG_OL; |
cattr = "Bl-enum"; |
(void)strlcpy(cattr, "Bl-enum", sizeof(cattr)); |
break; |
break; |
case LIST_diag: |
case LIST_diag: |
elemtype = TAG_DL; |
elemtype = TAG_DL; |
cattr = "Bl-diag"; |
(void)strlcpy(cattr, "Bl-diag", sizeof(cattr)); |
break; |
break; |
case LIST_hang: |
case LIST_hang: |
elemtype = TAG_DL; |
elemtype = TAG_DL; |
cattr = "Bl-hang"; |
(void)strlcpy(cattr, "Bl-hang", sizeof(cattr)); |
break; |
break; |
case LIST_inset: |
case LIST_inset: |
elemtype = TAG_DL; |
elemtype = TAG_DL; |
cattr = "Bl-inset"; |
(void)strlcpy(cattr, "Bl-inset", sizeof(cattr)); |
break; |
break; |
case LIST_ohang: |
case LIST_ohang: |
elemtype = TAG_DL; |
elemtype = TAG_DL; |
cattr = "Bl-ohang"; |
(void)strlcpy(cattr, "Bl-ohang", sizeof(cattr)); |
break; |
break; |
case LIST_tag: |
case LIST_tag: |
cattr = "Bl-tag"; |
|
if (bl->offs) |
if (bl->offs) |
print_otag(h, TAG_DIV, "cswl", cattr, bl->offs); |
print_otag(h, TAG_DIV, "cswl", "Bl-tag", bl->offs); |
print_otag(h, TAG_DL, "cswl", cattr, bl->width); |
print_otag(h, TAG_DL, "csw+l", bl->comp ? |
|
"Bl-tag Bl-compact" : "Bl-tag", bl->width); |
return 1; |
return 1; |
case LIST_column: |
case LIST_column: |
elemtype = TAG_TABLE; |
elemtype = TAG_TABLE; |
cattr = "Bl-column"; |
(void)strlcpy(cattr, "Bl-column", sizeof(cattr)); |
break; |
break; |
default: |
default: |
abort(); |
abort(); |
} |
} |
|
if (bl->comp) |
|
(void)strlcat(cattr, " Bl-compact", sizeof(cattr)); |
print_otag(h, elemtype, "cswl", cattr, bl->offs); |
print_otag(h, elemtype, "cswl", cattr, bl->offs); |
return 1; |
return 1; |
} |
} |
Line 1010 mdoc_bd_pre(MDOC_ARGS) |
|
Line 984 mdoc_bd_pre(MDOC_ARGS) |
|
* anyway, so don't sweat it. |
* anyway, so don't sweat it. |
*/ |
*/ |
switch (nn->tok) { |
switch (nn->tok) { |
case MDOC_Sm: |
|
case ROFF_br: |
case ROFF_br: |
case MDOC_sp: |
case ROFF_sp: |
|
case MDOC_Sm: |
case MDOC_Bl: |
case MDOC_Bl: |
case MDOC_D1: |
case MDOC_D1: |
case MDOC_Dl: |
case MDOC_Dl: |
Line 1327 mdoc_pp_pre(MDOC_ARGS) |
|
Line 1301 mdoc_pp_pre(MDOC_ARGS) |
|
} |
} |
|
|
static int |
static int |
mdoc_sp_pre(MDOC_ARGS) |
|
{ |
|
struct roffsu su; |
|
|
|
SCALE_VS_INIT(&su, 1); |
|
if (NULL != (n = n->child)) { |
|
if ( ! a2roffsu(n->string, &su, SCALE_VS)) |
|
su.scale = 1.0; |
|
else if (su.scale < 0.0) |
|
su.scale = 0.0; |
|
} |
|
|
|
print_otag(h, TAG_DIV, "suh", &su); |
|
|
|
/* So the div isn't empty: */ |
|
print_text(h, "\\~"); |
|
|
|
return 0; |
|
|
|
} |
|
|
|
static int |
|
mdoc_lk_pre(MDOC_ARGS) |
mdoc_lk_pre(MDOC_ARGS) |
{ |
{ |
|
const struct roff_node *link, *descr, *punct; |
struct tag *t; |
struct tag *t; |
|
|
if ((n = n->child) == NULL) |
if ((link = n->child) == NULL) |
return 0; |
return 0; |
|
|
|
/* Find beginning of trailing punctuation. */ |
|
punct = n->last; |
|
while (punct != link && punct->flags & NODE_DELIMC) |
|
punct = punct->prev; |
|
punct = punct->next; |
|
|
/* Link target and link text. */ |
/* Link target and link text. */ |
t = print_otag(h, TAG_A, "cTh", "Lk", n->string); |
descr = link->next; |
if (n->next == NULL || n->next->flags & NODE_DELIMC) |
if (descr == punct) |
print_text(h, n->string); |
descr = link; /* no text */ |
for (n = n->next; n != NULL && !(n->flags & NODE_DELIMC); n = n->next) |
t = print_otag(h, TAG_A, "cTh", "Lk", link->string); |
print_text(h, n->string); |
do { |
|
if (descr->flags & (NODE_DELIMC | NODE_DELIMO)) |
|
h->flags |= HTML_NOSPACE; |
|
print_text(h, descr->string); |
|
descr = descr->next; |
|
} while (descr != punct); |
print_tagq(h, t); |
print_tagq(h, t); |
|
|
/* Trailing punctuation. */ |
/* Trailing punctuation. */ |
while (n != NULL) { |
while (punct != NULL) { |
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
print_text(h, n->string); |
print_text(h, punct->string); |
n = n->next; |
punct = punct->next; |
} |
} |
return 0; |
return 0; |
} |
} |