version 1.14, 2012/07/07 14:05:40 |
version 1.24, 2012/07/08 22:49:29 |
|
|
#include "main.h" |
#include "main.h" |
|
|
#define DECL_ARGS const struct mdoc_meta *m, \ |
#define DECL_ARGS const struct mdoc_meta *m, \ |
const struct mdoc_node *n, \ |
const struct mdoc_node *n |
struct mman *mm |
|
|
|
struct mman { |
|
int mode_space; /* spacing mode: 1 = on */ |
|
int need_space; /* next word needs prior ws */ |
|
int mode_keep; /* currently inside a keep */ |
|
int need_nl; /* next word needs prior nl */ |
|
}; |
|
|
|
struct manact { |
struct manact { |
int (*cond)(DECL_ARGS); /* DON'T run actions */ |
int (*cond)(DECL_ARGS); /* DON'T run actions */ |
int (*pre)(DECL_ARGS); /* pre-node action */ |
int (*pre)(DECL_ARGS); /* pre-node action */ |
Line 53 static void post_bd(DECL_ARGS); |
|
Line 45 static void post_bd(DECL_ARGS); |
|
static void post_bk(DECL_ARGS); |
static void post_bk(DECL_ARGS); |
static void post_dl(DECL_ARGS); |
static void post_dl(DECL_ARGS); |
static void post_enc(DECL_ARGS); |
static void post_enc(DECL_ARGS); |
|
static void post_fa(DECL_ARGS); |
|
static void post_fn(DECL_ARGS); |
|
static void post_fo(DECL_ARGS); |
|
static void post_in(DECL_ARGS); |
static void post_lb(DECL_ARGS); |
static void post_lb(DECL_ARGS); |
static void post_nm(DECL_ARGS); |
static void post_nm(DECL_ARGS); |
static void post_percent(DECL_ARGS); |
static void post_percent(DECL_ARGS); |
static void post_pf(DECL_ARGS); |
static void post_pf(DECL_ARGS); |
static void post_sect(DECL_ARGS); |
static void post_sect(DECL_ARGS); |
static void post_sp(DECL_ARGS); |
static void post_sp(DECL_ARGS); |
|
static void post_vt(DECL_ARGS); |
|
static int pre_an(DECL_ARGS); |
static int pre_ap(DECL_ARGS); |
static int pre_ap(DECL_ARGS); |
static int pre_bd(DECL_ARGS); |
static int pre_bd(DECL_ARGS); |
static int pre_bk(DECL_ARGS); |
static int pre_bk(DECL_ARGS); |
Line 66 static int pre_br(DECL_ARGS); |
|
Line 64 static int pre_br(DECL_ARGS); |
|
static int pre_bx(DECL_ARGS); |
static int pre_bx(DECL_ARGS); |
static int pre_dl(DECL_ARGS); |
static int pre_dl(DECL_ARGS); |
static int pre_enc(DECL_ARGS); |
static int pre_enc(DECL_ARGS); |
|
static int pre_fa(DECL_ARGS); |
|
static int pre_fn(DECL_ARGS); |
|
static int pre_fo(DECL_ARGS); |
|
static int pre_ft(DECL_ARGS); |
|
static int pre_in(DECL_ARGS); |
static int pre_it(DECL_ARGS); |
static int pre_it(DECL_ARGS); |
|
static int pre_lk(DECL_ARGS); |
static int pre_nm(DECL_ARGS); |
static int pre_nm(DECL_ARGS); |
static int pre_ns(DECL_ARGS); |
static int pre_ns(DECL_ARGS); |
static int pre_pp(DECL_ARGS); |
static int pre_pp(DECL_ARGS); |
static int pre_sm(DECL_ARGS); |
static int pre_sm(DECL_ARGS); |
static int pre_sp(DECL_ARGS); |
static int pre_sp(DECL_ARGS); |
static int pre_sect(DECL_ARGS); |
static int pre_sect(DECL_ARGS); |
|
static void pre_syn(const struct mdoc_node *); |
|
static int pre_vt(DECL_ARGS); |
static int pre_ux(DECL_ARGS); |
static int pre_ux(DECL_ARGS); |
static int pre_xr(DECL_ARGS); |
static int pre_xr(DECL_ARGS); |
static void print_word(struct mman *, const char *); |
static void print_word(const char *); |
static void print_offs(struct mman *, const char *); |
static void print_offs(const char *); |
static void print_node(DECL_ARGS); |
static void print_node(DECL_ARGS); |
|
|
static const struct manact manacts[MDOC_MAX + 1] = { |
static const struct manact manacts[MDOC_MAX + 1] = { |
Line 95 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 101 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ NULL, NULL, NULL, NULL, NULL }, /* El */ |
{ NULL, NULL, NULL, NULL, NULL }, /* El */ |
{ NULL, pre_it, NULL, NULL, NULL }, /* _It */ |
{ NULL, pre_it, NULL, NULL, NULL }, /* _It */ |
{ NULL, pre_enc, post_enc, "\\fI", "\\fP" }, /* Ad */ |
{ NULL, pre_enc, post_enc, "\\fI", "\\fP" }, /* Ad */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _An */ |
{ NULL, pre_an, NULL, NULL, NULL }, /* An */ |
{ NULL, pre_enc, post_enc, "\\fI", "\\fP" }, /* Ar */ |
{ NULL, pre_enc, post_enc, "\\fI", "\\fP" }, /* Ar */ |
{ NULL, pre_enc, post_enc, "\\fB", "\\fP" }, /* Cd */ |
{ NULL, pre_enc, post_enc, "\\fB", "\\fP" }, /* Cd */ |
{ NULL, pre_enc, post_enc, "\\fB", "\\fP" }, /* Cm */ |
{ NULL, pre_enc, post_enc, "\\fB", "\\fP" }, /* Cm */ |
Line 105 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 111 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ NULL, pre_enc, post_enc, "The \\fB", |
{ NULL, pre_enc, post_enc, "The \\fB", |
"\\fP\nutility exits 0 on success, and >0 if an error occurs." |
"\\fP\nutility exits 0 on success, and >0 if an error occurs." |
}, /* Ex */ |
}, /* Ex */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Fa */ |
{ NULL, pre_fa, post_fa, NULL, NULL }, /* Fa */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Fd */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Fd */ |
{ NULL, pre_enc, post_enc, "\\fB-", "\\fP" }, /* Fl */ |
{ NULL, pre_enc, post_enc, "\\fB-", "\\fP" }, /* Fl */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Fn */ |
{ NULL, pre_fn, post_fn, NULL, NULL }, /* Fn */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Ft */ |
{ NULL, pre_ft, post_enc, NULL, "\\fP" }, /* Ft */ |
{ NULL, pre_enc, post_enc, "\\fB", "\\fP" }, /* Ic */ |
{ NULL, pre_enc, post_enc, "\\fB", "\\fP" }, /* Ic */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _In */ |
{ NULL, pre_in, post_in, NULL, NULL }, /* In */ |
{ NULL, pre_enc, post_enc, "\\fR", "\\fP" }, /* Li */ |
{ NULL, pre_enc, post_enc, "\\fR", "\\fP" }, /* Li */ |
{ cond_head, pre_enc, NULL, "\\- ", NULL }, /* Nd */ |
{ cond_head, pre_enc, NULL, "\\- ", NULL }, /* Nd */ |
{ NULL, pre_nm, post_nm, NULL, NULL }, /* Nm */ |
{ NULL, pre_nm, post_nm, NULL, NULL }, /* Nm */ |
Line 124 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 130 static const struct manact manacts[MDOC_MAX + 1] = { |
|
"variable \\fIerrno\\fP is set to indicate the error." |
"variable \\fIerrno\\fP is set to indicate the error." |
}, /* Rv */ |
}, /* Rv */ |
{ NULL, NULL, NULL, NULL, NULL }, /* St */ |
{ NULL, NULL, NULL, NULL, NULL }, /* St */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Va */ |
{ NULL, pre_enc, post_enc, "\\fI", "\\fP" }, /* Va */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Vt */ |
{ NULL, pre_vt, post_vt, NULL, NULL }, /* Vt */ |
{ NULL, pre_xr, NULL, NULL, NULL }, /* Xr */ |
{ NULL, pre_xr, NULL, NULL, NULL }, /* Xr */ |
{ NULL, NULL, post_percent, NULL, NULL }, /* _%A */ |
{ NULL, NULL, post_percent, NULL, NULL }, /* _%A */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _%B */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _%B */ |
Line 182 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 188 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ NULL, pre_ux, NULL, "UNIX", NULL }, /* Ux */ |
{ NULL, pre_ux, NULL, "UNIX", NULL }, /* Ux */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Xc */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Xc */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Xo */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Xo */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Fo */ |
{ NULL, pre_fo, post_fo, NULL, NULL }, /* Fo */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Fc */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Fc */ |
{ cond_body, pre_enc, post_enc, "[", "]" }, /* Oo */ |
{ cond_body, pre_enc, post_enc, "[", "]" }, /* Oo */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Oc */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Oc */ |
{ NULL, pre_bk, post_bk, NULL, NULL }, /* Bk */ |
{ NULL, pre_bk, post_bk, NULL, NULL }, /* Bk */ |
Line 194 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 200 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ NULL, pre_ux, NULL, "currently under development.", NULL }, /* Ud */ |
{ NULL, pre_ux, NULL, "currently under development.", NULL }, /* Ud */ |
{ NULL, NULL, post_lb, NULL, NULL }, /* Lb */ |
{ NULL, NULL, post_lb, NULL, NULL }, /* Lb */ |
{ NULL, pre_pp, NULL, NULL, NULL }, /* Lp */ |
{ NULL, pre_pp, NULL, NULL, NULL }, /* Lp */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Lk */ |
{ NULL, pre_lk, NULL, NULL, NULL }, /* Lk */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Mt */ |
{ NULL, NULL, NULL, NULL, NULL }, /* _Mt */ |
{ cond_body, pre_enc, post_enc, "{", "}" }, /* Brq */ |
{ cond_body, pre_enc, post_enc, "{", "}" }, /* Brq */ |
{ cond_body, pre_enc, post_enc, "{", "}" }, /* Bro */ |
{ cond_body, pre_enc, post_enc, "{", "}" }, /* Bro */ |
Line 211 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 217 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ NULL, NULL, NULL, NULL, NULL }, /* ROOT */ |
{ NULL, NULL, NULL, NULL, NULL }, /* ROOT */ |
}; |
}; |
|
|
|
static int outflags; |
|
#define MMAN_spc (1 << 0) |
|
#define MMAN_nl (1 << 1) |
|
#define MMAN_br (1 << 2) |
|
#define MMAN_sp (1 << 3) |
|
#define MMAN_Sm (1 << 4) |
|
#define MMAN_Bk (1 << 5) |
|
#define MMAN_An_split (1 << 6) |
|
#define MMAN_An_nosplit (1 << 7) |
|
|
static void |
static void |
print_word(struct mman *mm, const char *s) |
print_word(const char *s) |
{ |
{ |
|
|
if (mm->need_nl) { |
if ((MMAN_sp | MMAN_br | MMAN_nl) & outflags) { |
/* |
/* |
* If we need a newline, print it now and start afresh. |
* If we need a newline, print it now and start afresh. |
*/ |
*/ |
putchar('\n'); |
if (MMAN_sp & outflags) |
mm->need_space = 0; |
printf("\n.sp\n"); |
mm->need_nl = 0; |
else if (MMAN_br & outflags) |
} else if (mm->need_space && '\0' != s[0]) |
printf("\n.br\n"); |
|
else if (MMAN_nl & outflags) |
|
putchar('\n'); |
|
outflags &= ~(MMAN_sp|MMAN_br|MMAN_nl|MMAN_spc); |
|
} else if (MMAN_spc & outflags && '\0' != s[0]) |
/* |
/* |
* If we need a space, only print it before |
* If we need a space, only print it before |
* (1) a nonzero length word; |
* (1) a nonzero length word; |
Line 230 print_word(struct mman *mm, const char *s) |
|
Line 250 print_word(struct mman *mm, const char *s) |
|
* (3) if punctuation, non-terminating puncutation. |
* (3) if punctuation, non-terminating puncutation. |
*/ |
*/ |
if (NULL == strchr(".,:;)]?!", s[0]) || '\0' != s[1]) { |
if (NULL == strchr(".,:;)]?!", s[0]) || '\0' != s[1]) { |
if (mm->mode_keep) { |
if (MMAN_Bk & outflags) { |
putchar('\\'); |
putchar('\\'); |
putchar('~'); |
putchar('~'); |
} else |
} else |
Line 241 print_word(struct mman *mm, const char *s) |
|
Line 261 print_word(struct mman *mm, const char *s) |
|
* Reassign needing space if we're not following opening |
* Reassign needing space if we're not following opening |
* punctuation. |
* punctuation. |
*/ |
*/ |
mm->need_space = mm->mode_space && |
if (MMAN_Sm & outflags && |
(('(' != s[0] && '[' != s[0]) || '\0' != s[1]); |
(('(' != s[0] && '[' != s[0]) || '\0' != s[1])) |
|
outflags |= MMAN_spc; |
|
else |
|
outflags &= ~MMAN_spc; |
|
|
for ( ; *s; s++) { |
for ( ; *s; s++) { |
switch (*s) { |
switch (*s) { |
Line 260 print_word(struct mman *mm, const char *s) |
|
Line 283 print_word(struct mman *mm, const char *s) |
|
} |
} |
|
|
static void |
static void |
print_offs(struct mman *mm, const char *v) |
print_offs(const char *v) |
{ |
{ |
char buf[24]; |
char buf[24]; |
struct roffsu su; |
struct roffsu su; |
Line 273 print_offs(struct mman *mm, const char *v) |
|
Line 296 print_offs(struct mman *mm, const char *v) |
|
else if (0 == strcmp(v, "indent-two")) |
else if (0 == strcmp(v, "indent-two")) |
sz = 12; |
sz = 12; |
else if (a2roffsu(v, &su, SCALE_MAX)) { |
else if (a2roffsu(v, &su, SCALE_MAX)) { |
print_word(mm, v); |
print_word(v); |
return; |
return; |
} else |
} else |
sz = strlen(v); |
sz = strlen(v); |
|
|
snprintf(buf, sizeof(buf), "%ldn", sz); |
snprintf(buf, sizeof(buf), "%ldn", sz); |
print_word(mm, buf); |
print_word(buf); |
} |
} |
|
|
void |
void |
Line 300 man_mdoc(void *arg, const struct mdoc *mdoc) |
|
Line 323 man_mdoc(void *arg, const struct mdoc *mdoc) |
|
{ |
{ |
const struct mdoc_meta *m; |
const struct mdoc_meta *m; |
const struct mdoc_node *n; |
const struct mdoc_node *n; |
struct mman mm; |
|
|
|
m = mdoc_meta(mdoc); |
m = mdoc_meta(mdoc); |
n = mdoc_node(mdoc); |
n = mdoc_node(mdoc); |
Line 308 man_mdoc(void *arg, const struct mdoc *mdoc) |
|
Line 330 man_mdoc(void *arg, const struct mdoc *mdoc) |
|
printf(".TH \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"", |
printf(".TH \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"", |
m->title, m->msec, m->date, m->os, m->vol); |
m->title, m->msec, m->date, m->os, m->vol); |
|
|
memset(&mm, 0, sizeof(struct mman)); |
outflags = MMAN_nl | MMAN_Sm; |
|
print_node(m, n); |
mm.mode_space = 1; |
|
mm.need_nl = 1; |
|
print_node(m, n, &mm); |
|
putchar('\n'); |
putchar('\n'); |
} |
} |
|
|
Line 328 print_node(DECL_ARGS) |
|
Line 347 print_node(DECL_ARGS) |
|
* This makes the page structure be more consistent. |
* This makes the page structure be more consistent. |
*/ |
*/ |
prev = n->prev ? n->prev : n->parent; |
prev = n->prev ? n->prev : n->parent; |
if (prev && prev->line < n->line && MDOC_Ns != prev->tok) |
if (prev && prev->line < n->line && |
mm->need_nl = 1; |
MDOC_Fo != prev->tok && MDOC_Ns != prev->tok) |
|
outflags |= MMAN_nl; |
|
|
act = NULL; |
act = NULL; |
cond = 0; |
cond = 0; |
Line 340 print_node(DECL_ARGS) |
|
Line 360 print_node(DECL_ARGS) |
|
* Make sure that we don't happen to start with a |
* Make sure that we don't happen to start with a |
* control character at the start of a line. |
* control character at the start of a line. |
*/ |
*/ |
if (mm->need_nl && ('.' == *n->string || |
if (MMAN_nl & outflags && ('.' == *n->string || |
'\'' == *n->string)) { |
'\'' == *n->string)) { |
print_word(mm, "\\&"); |
print_word("\\&"); |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
} |
} |
print_word(mm, n->string); |
print_word(n->string); |
} else { |
} else { |
/* |
/* |
* Conditionally run the pre-node action handler for a |
* Conditionally run the pre-node action handler for a |
* node. |
* node. |
*/ |
*/ |
act = manacts + n->tok; |
act = manacts + n->tok; |
cond = NULL == act->cond || (*act->cond)(m, n, mm); |
cond = NULL == act->cond || (*act->cond)(m, n); |
if (cond && act->pre) |
if (cond && act->pre) |
do_sub = (*act->pre)(m, n, mm); |
do_sub = (*act->pre)(m, n); |
} |
} |
|
|
/* |
/* |
Line 364 print_node(DECL_ARGS) |
|
Line 384 print_node(DECL_ARGS) |
|
*/ |
*/ |
if (do_sub) |
if (do_sub) |
for (sub = n->child; sub; sub = sub->next) |
for (sub = n->child; sub; sub = sub->next) |
print_node(m, sub, mm); |
print_node(m, sub); |
|
|
/* |
/* |
* Lastly, conditionally run the post-node handler. |
* Lastly, conditionally run the post-node handler. |
*/ |
*/ |
if (cond && act->post) |
if (cond && act->post) |
(*act->post)(m, n, mm); |
(*act->post)(m, n); |
} |
} |
|
|
static int |
static int |
Line 399 pre_enc(DECL_ARGS) |
|
Line 419 pre_enc(DECL_ARGS) |
|
prefix = manacts[n->tok].prefix; |
prefix = manacts[n->tok].prefix; |
if (NULL == prefix) |
if (NULL == prefix) |
return(1); |
return(1); |
print_word(mm, prefix); |
print_word(prefix); |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
return(1); |
return(1); |
} |
} |
|
|
Line 415 post_enc(DECL_ARGS) |
|
Line 435 post_enc(DECL_ARGS) |
|
suffix = manacts[n->tok].suffix; |
suffix = manacts[n->tok].suffix; |
if (NULL == suffix) |
if (NULL == suffix) |
return; |
return; |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
print_word(mm, suffix); |
print_word(suffix); |
if (MDOC_Fl == n->tok && 0 == n->nchild) |
if (MDOC_Fl == n->tok && 0 == n->nchild) |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
} |
} |
|
|
/* |
/* |
|
|
post_percent(DECL_ARGS) |
post_percent(DECL_ARGS) |
{ |
{ |
|
|
post_enc(m, n, mm); |
post_enc(m, n); |
if (n->next) |
if (n->next) |
print_word(mm, ","); |
print_word(","); |
else { |
else { |
print_word(mm, "."); |
print_word("."); |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
} |
} |
} |
} |
|
|
Line 448 pre_sect(DECL_ARGS) |
|
Line 468 pre_sect(DECL_ARGS) |
|
|
|
if (MDOC_HEAD != n->type) |
if (MDOC_HEAD != n->type) |
return(1); |
return(1); |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
print_word(mm, manacts[n->tok].prefix); |
print_word(manacts[n->tok].prefix); |
print_word(mm, "\""); |
print_word("\""); |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
return(1); |
return(1); |
} |
} |
|
|
Line 464 post_sect(DECL_ARGS) |
|
Line 484 post_sect(DECL_ARGS) |
|
|
|
if (MDOC_HEAD != n->type) |
if (MDOC_HEAD != n->type) |
return; |
return; |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
print_word(mm, "\""); |
print_word("\""); |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
|
if (MDOC_Sh == n->tok && SEC_AUTHORS == n->sec) |
|
outflags &= ~(MMAN_An_split | MMAN_An_nosplit); |
} |
} |
|
|
|
/* See mdoc_term.c, synopsis_pre() for comments. */ |
|
static void |
|
pre_syn(const struct mdoc_node *n) |
|
{ |
|
|
|
if (NULL == n->prev || ! (MDOC_SYNPRETTY & n->flags)) |
|
return; |
|
|
|
if (n->prev->tok == n->tok && |
|
MDOC_Ft != n->tok && |
|
MDOC_Fo != n->tok && |
|
MDOC_Fn != n->tok) { |
|
outflags |= MMAN_br; |
|
return; |
|
} |
|
|
|
switch (n->prev->tok) { |
|
case (MDOC_Fd): |
|
/* FALLTHROUGH */ |
|
case (MDOC_Fn): |
|
/* FALLTHROUGH */ |
|
case (MDOC_Fo): |
|
/* FALLTHROUGH */ |
|
case (MDOC_In): |
|
/* FALLTHROUGH */ |
|
case (MDOC_Vt): |
|
outflags |= MMAN_sp; |
|
break; |
|
case (MDOC_Ft): |
|
if (MDOC_Fn != n->tok && MDOC_Fo != n->tok) { |
|
outflags |= MMAN_sp; |
|
break; |
|
} |
|
/* FALLTHROUGH */ |
|
default: |
|
outflags |= MMAN_br; |
|
break; |
|
} |
|
} |
|
|
static int |
static int |
|
pre_an(DECL_ARGS) |
|
{ |
|
|
|
switch (n->norm->An.auth) { |
|
case (AUTH_split): |
|
outflags &= ~MMAN_An_nosplit; |
|
outflags |= MMAN_An_split; |
|
return(0); |
|
case (AUTH_nosplit): |
|
outflags &= ~MMAN_An_split; |
|
outflags |= MMAN_An_nosplit; |
|
return(0); |
|
default: |
|
if (MMAN_An_split & outflags) |
|
outflags |= MMAN_br; |
|
else if (SEC_AUTHORS == n->sec && |
|
! (MMAN_An_nosplit & outflags)) |
|
outflags |= MMAN_An_split; |
|
return(1); |
|
} |
|
} |
|
|
|
static int |
pre_ap(DECL_ARGS) |
pre_ap(DECL_ARGS) |
{ |
{ |
|
|
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
print_word(mm, "'"); |
print_word("'"); |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
return(0); |
return(0); |
} |
} |
|
|
|
|
pre_bd(DECL_ARGS) |
pre_bd(DECL_ARGS) |
{ |
{ |
|
|
if (0 == n->norm->Bd.comp) { |
if (0 == n->norm->Bd.comp) |
mm->need_nl = 1; |
outflags |= MMAN_sp; |
print_word(mm, ".sp"); |
|
} |
|
if (DISP_unfilled == n->norm->Bd.type || |
if (DISP_unfilled == n->norm->Bd.type || |
DISP_literal == n->norm->Bd.type) { |
DISP_literal == n->norm->Bd.type) { |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
print_word(mm, ".nf"); |
print_word(".nf"); |
} |
} |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
print_word(mm, ".RS"); |
print_word(".RS"); |
print_offs(mm, n->norm->Bd.offs); |
print_offs(n->norm->Bd.offs); |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
return(1); |
return(1); |
} |
} |
|
|
|
|
post_bd(DECL_ARGS) |
post_bd(DECL_ARGS) |
{ |
{ |
|
|
mm->need_nl = 1; |
outflags |= MMAN_nl; |
print_word(mm, ".RE"); |
print_word(".RE"); |
if (DISP_unfilled == n->norm->Bd.type || |
if (DISP_unfilled == n->norm->Bd.type || |
DISP_literal == n->norm->Bd.type) { |
DISP_literal == n->norm->Bd.type) { |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
print_word(mm, ".fi"); |
print_word(".fi"); |
} |
} |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
} |
} |
|
|
static int |
static int |
Line 521 pre_bk(DECL_ARGS) |
|
Line 604 pre_bk(DECL_ARGS) |
|
case (MDOC_BLOCK): |
case (MDOC_BLOCK): |
return(1); |
return(1); |
case (MDOC_BODY): |
case (MDOC_BODY): |
mm->mode_keep = 1; |
outflags |= MMAN_Bk; |
return(1); |
return(1); |
default: |
default: |
return(0); |
return(0); |
Line 533 post_bk(DECL_ARGS) |
|
Line 616 post_bk(DECL_ARGS) |
|
{ |
{ |
|
|
if (MDOC_BODY == n->type) |
if (MDOC_BODY == n->type) |
mm->mode_keep = 0; |
outflags &= ~MMAN_Bk; |
} |
} |
|
|
static int |
static int |
pre_br(DECL_ARGS) |
pre_br(DECL_ARGS) |
{ |
{ |
|
|
mm->need_nl = 1; |
outflags |= MMAN_br; |
print_word(mm, ".br"); |
|
mm->need_nl = 1; |
|
return(0); |
return(0); |
} |
} |
|
|
Line 552 pre_bx(DECL_ARGS) |
|
Line 633 pre_bx(DECL_ARGS) |
|
|
|
n = n->child; |
n = n->child; |
if (n) { |
if (n) { |
print_word(mm, n->string); |
print_word(n->string); |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
n = n->next; |
n = n->next; |
} |
} |
print_word(mm, "BSD"); |
print_word("BSD"); |
if (NULL == n) |
if (NULL == n) |
return(0); |
return(0); |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
print_word(mm, "-"); |
print_word("-"); |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
print_word(mm, n->string); |
print_word(n->string); |
return(0); |
return(0); |
} |
} |
|
|
|
|
pre_dl(DECL_ARGS) |
pre_dl(DECL_ARGS) |
{ |
{ |
|
|
mm->need_nl = 1; |
outflags |= MMAN_nl; |
print_word(mm, ".RS 6n"); |
print_word(".RS 6n"); |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
return(1); |
return(1); |
} |
} |
|
|
|
|
post_dl(DECL_ARGS) |
post_dl(DECL_ARGS) |
{ |
{ |
|
|
mm->need_nl = 1; |
outflags |= MMAN_nl; |
print_word(mm, ".RE"); |
print_word(".RE"); |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
} |
} |
|
|
static int |
static int |
|
pre_fa(DECL_ARGS) |
|
{ |
|
|
|
if (MDOC_Fa == n->tok) |
|
n = n->child; |
|
|
|
while (NULL != n) { |
|
print_word("\\fI"); |
|
outflags &= ~MMAN_spc; |
|
print_node(m, n); |
|
outflags &= ~MMAN_spc; |
|
print_word("\\fP"); |
|
if (NULL != (n = n->next)) |
|
print_word(","); |
|
} |
|
return(0); |
|
} |
|
|
|
static void |
|
post_fa(DECL_ARGS) |
|
{ |
|
|
|
if (NULL != n->next && MDOC_Fa == n->next->tok) |
|
print_word(","); |
|
} |
|
|
|
static int |
|
pre_fn(DECL_ARGS) |
|
{ |
|
|
|
pre_syn(n); |
|
|
|
n = n->child; |
|
if (NULL == n) |
|
return(0); |
|
|
|
print_word("\\fB"); |
|
outflags &= ~MMAN_spc; |
|
print_node(m, n); |
|
outflags &= ~MMAN_spc; |
|
print_word("\\fP("); |
|
outflags &= ~MMAN_spc; |
|
return(pre_fa(m, n->next)); |
|
} |
|
|
|
static void |
|
post_fn(DECL_ARGS) |
|
{ |
|
|
|
print_word(")"); |
|
if (MDOC_SYNPRETTY & n->flags) { |
|
print_word(";"); |
|
outflags |= MMAN_br; |
|
} |
|
} |
|
|
|
static int |
|
pre_fo(DECL_ARGS) |
|
{ |
|
|
|
switch (n->type) { |
|
case (MDOC_BLOCK): |
|
pre_syn(n); |
|
break; |
|
case (MDOC_HEAD): |
|
print_word("\\fB"); |
|
outflags &= ~MMAN_spc; |
|
break; |
|
case (MDOC_BODY): |
|
outflags &= ~MMAN_spc; |
|
print_word("("); |
|
outflags &= ~MMAN_spc; |
|
break; |
|
default: |
|
break; |
|
} |
|
return(1); |
|
} |
|
|
|
static void |
|
post_fo(DECL_ARGS) |
|
{ |
|
|
|
switch (n->type) { |
|
case (MDOC_HEAD): |
|
outflags &= ~MMAN_spc; |
|
print_word("\\fP"); |
|
break; |
|
case (MDOC_BODY): |
|
post_fn(m, n); |
|
break; |
|
default: |
|
break; |
|
} |
|
} |
|
|
|
static int |
|
pre_ft(DECL_ARGS) |
|
{ |
|
|
|
pre_syn(n); |
|
print_word("\\fI"); |
|
outflags &= ~MMAN_spc; |
|
return(1); |
|
} |
|
|
|
static int |
|
pre_in(DECL_ARGS) |
|
{ |
|
|
|
if (MDOC_SYNPRETTY & n->flags) { |
|
pre_syn(n); |
|
print_word("\\fB#include <"); |
|
} else |
|
print_word("<\\fI"); |
|
outflags &= ~MMAN_spc; |
|
return(1); |
|
} |
|
|
|
static void |
|
post_in(DECL_ARGS) |
|
{ |
|
|
|
outflags &= ~MMAN_spc; |
|
if (MDOC_SYNPRETTY & n->flags) { |
|
print_word(">\\fP"); |
|
outflags |= MMAN_br; |
|
} else |
|
print_word("\\fP>"); |
|
} |
|
|
|
static int |
pre_it(DECL_ARGS) |
pre_it(DECL_ARGS) |
{ |
{ |
const struct mdoc_node *bln; |
const struct mdoc_node *bln; |
|
|
if (MDOC_HEAD == n->type) { |
if (MDOC_HEAD == n->type) { |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
print_word(mm, ".TP"); |
print_word(".TP"); |
bln = n->parent->parent->prev; |
bln = n->parent->parent->prev; |
switch (bln->norm->Bl.type) { |
switch (bln->norm->Bl.type) { |
case (LIST_bullet): |
case (LIST_bullet): |
print_word(mm, "4n"); |
print_word("4n"); |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
print_word(mm, "\\fBo\\fP"); |
print_word("\\fBo\\fP"); |
break; |
break; |
default: |
default: |
if (bln->norm->Bl.width) |
if (bln->norm->Bl.width) |
print_word(mm, bln->norm->Bl.width); |
print_word(bln->norm->Bl.width); |
break; |
break; |
} |
} |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
} |
} |
return(1); |
return(1); |
} |
} |
|
|
post_lb(DECL_ARGS) |
post_lb(DECL_ARGS) |
{ |
{ |
|
|
if (SEC_LIBRARY == n->sec) { |
if (SEC_LIBRARY == n->sec) |
mm->need_nl = 1; |
outflags |= MMAN_br; |
print_word(mm, ".br"); |
} |
mm->need_nl = 1; |
|
|
static int |
|
pre_lk(DECL_ARGS) |
|
{ |
|
const struct mdoc_node *link, *descr; |
|
|
|
if (NULL == (link = n->child)) |
|
return(0); |
|
|
|
if (NULL != (descr = link->next)) { |
|
print_word("\\fI"); |
|
outflags &= ~MMAN_spc; |
|
while (NULL != descr) { |
|
print_word(descr->string); |
|
descr = descr->next; |
|
} |
|
print_word(":"); |
|
outflags &= ~MMAN_spc; |
|
print_word("\\fP"); |
} |
} |
|
|
|
print_word("\\fB"); |
|
outflags &= ~MMAN_spc; |
|
print_word(link->string); |
|
outflags &= ~MMAN_spc; |
|
print_word("\\fP"); |
|
return(0); |
} |
} |
|
|
static int |
static int |
pre_nm(DECL_ARGS) |
pre_nm(DECL_ARGS) |
{ |
{ |
|
|
|
if (MDOC_BLOCK == n->type) |
|
pre_syn(n); |
if (MDOC_ELEM != n->type && MDOC_HEAD != n->type) |
if (MDOC_ELEM != n->type && MDOC_HEAD != n->type) |
return(1); |
return(1); |
if (MDOC_SYNPRETTY & n->flags) { |
if (NULL == n->child && NULL == m->name) |
mm->need_nl = 1; |
return(0); |
print_word(mm, ".br"); |
print_word("\\fB"); |
mm->need_nl = 1; |
outflags &= ~MMAN_spc; |
} |
|
print_word(mm, "\\fB"); |
|
mm->need_space = 0; |
|
if (NULL == n->child) |
if (NULL == n->child) |
print_word(mm, m->name); |
print_word(m->name); |
return(1); |
return(1); |
} |
} |
|
|
Line 645 post_nm(DECL_ARGS) |
|
Line 882 post_nm(DECL_ARGS) |
|
|
|
if (MDOC_ELEM != n->type && MDOC_HEAD != n->type) |
if (MDOC_ELEM != n->type && MDOC_HEAD != n->type) |
return; |
return; |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
print_word(mm, "\\fP"); |
print_word("\\fP"); |
} |
} |
|
|
static int |
static int |
pre_ns(DECL_ARGS) |
pre_ns(DECL_ARGS) |
{ |
{ |
|
|
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
return(0); |
return(0); |
} |
} |
|
|
|
|
post_pf(DECL_ARGS) |
post_pf(DECL_ARGS) |
{ |
{ |
|
|
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
} |
} |
|
|
static int |
static int |
pre_pp(DECL_ARGS) |
pre_pp(DECL_ARGS) |
{ |
{ |
|
|
mm->need_nl = 1; |
outflags |= MMAN_nl; |
if (MDOC_It == n->parent->tok) |
if (MDOC_It == n->parent->tok) |
print_word(mm, ".sp"); |
print_word(".sp"); |
else |
else |
print_word(mm, ".PP"); |
print_word(".PP"); |
mm->need_nl = 1; |
outflags |= MMAN_nl; |
return(MDOC_Rs == n->tok); |
return(MDOC_Rs == n->tok); |
} |
} |
|
|
Line 683 pre_sm(DECL_ARGS) |
|
Line 920 pre_sm(DECL_ARGS) |
|
|
|
assert(n->child && MDOC_TEXT == n->child->type); |
assert(n->child && MDOC_TEXT == n->child->type); |
if (0 == strcmp("on", n->child->string)) |
if (0 == strcmp("on", n->child->string)) |
mm->mode_space = 1; |
outflags |= MMAN_Sm; |
else |
else |
mm->mode_space = 0; |
outflags &= ~MMAN_Sm; |
return(0); |
return(0); |
} |
} |
|
|
|
|
pre_sp(DECL_ARGS) |
pre_sp(DECL_ARGS) |
{ |
{ |
|
|
mm->need_nl = 1; |
outflags |= MMAN_nl; |
print_word(mm, ".sp"); |
print_word(".sp"); |
return(1); |
return(1); |
} |
} |
|
|
|
|
post_sp(DECL_ARGS) |
post_sp(DECL_ARGS) |
{ |
{ |
|
|
mm->need_nl = 1; |
outflags |= MMAN_nl; |
} |
} |
|
|
static int |
static int |
|
pre_vt(DECL_ARGS) |
|
{ |
|
|
|
if (MDOC_SYNPRETTY & n->flags) { |
|
switch (n->type) { |
|
case (MDOC_BLOCK): |
|
pre_syn(n); |
|
return(1); |
|
case (MDOC_BODY): |
|
break; |
|
default: |
|
return(0); |
|
} |
|
} |
|
print_word("\\fI"); |
|
outflags &= ~MMAN_spc; |
|
return(1); |
|
} |
|
|
|
static void |
|
post_vt(DECL_ARGS) |
|
{ |
|
|
|
if (MDOC_SYNPRETTY & n->flags && MDOC_BODY != n->type) |
|
return; |
|
|
|
outflags &= ~MMAN_spc; |
|
print_word("\\fP"); |
|
} |
|
|
|
static int |
pre_xr(DECL_ARGS) |
pre_xr(DECL_ARGS) |
{ |
{ |
|
|
n = n->child; |
n = n->child; |
if (NULL == n) |
if (NULL == n) |
return(0); |
return(0); |
print_node(m, n, mm); |
print_node(m, n); |
n = n->next; |
n = n->next; |
if (NULL == n) |
if (NULL == n) |
return(0); |
return(0); |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
print_word(mm, "("); |
print_word("("); |
print_node(m, n, mm); |
print_node(m, n); |
print_word(mm, ")"); |
print_word(")"); |
return(0); |
return(0); |
} |
} |
|
|
|
|
pre_ux(DECL_ARGS) |
pre_ux(DECL_ARGS) |
{ |
{ |
|
|
print_word(mm, manacts[n->tok].prefix); |
print_word(manacts[n->tok].prefix); |
if (NULL == n->child) |
if (NULL == n->child) |
return(0); |
return(0); |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
print_word(mm, "\\~"); |
print_word("\\~"); |
mm->need_space = 0; |
outflags &= ~MMAN_spc; |
return(1); |
return(1); |
} |
} |