version 1.194, 2010/10/23 23:31:10 |
version 1.231, 2011/06/29 15:38:09 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2008, 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2010 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2010 Ingo Schwarze <schwarze@openbsd.org> |
* |
* |
* Permission to use, copy, modify, and distribute this software for any |
* Permission to use, copy, modify, and distribute this software for any |
|
|
#include "out.h" |
#include "out.h" |
#include "term.h" |
#include "term.h" |
#include "mdoc.h" |
#include "mdoc.h" |
#include "chars.h" |
|
#include "main.h" |
#include "main.h" |
|
|
#define INDENT 5 |
#define INDENT 5 |
Line 68 static void synopsis_pre(struct termp *, |
|
Line 67 static void synopsis_pre(struct termp *, |
|
const struct mdoc_node *); |
const struct mdoc_node *); |
|
|
static void termp____post(DECL_ARGS); |
static void termp____post(DECL_ARGS); |
|
static void termp__t_post(DECL_ARGS); |
static void termp_an_post(DECL_ARGS); |
static void termp_an_post(DECL_ARGS); |
static void termp_bd_post(DECL_ARGS); |
static void termp_bd_post(DECL_ARGS); |
static void termp_bk_post(DECL_ARGS); |
static void termp_bk_post(DECL_ARGS); |
static void termp_bl_post(DECL_ARGS); |
static void termp_bl_post(DECL_ARGS); |
static void termp_bx_post(DECL_ARGS); |
|
static void termp_d1_post(DECL_ARGS); |
static void termp_d1_post(DECL_ARGS); |
static void termp_fo_post(DECL_ARGS); |
static void termp_fo_post(DECL_ARGS); |
static void termp_in_post(DECL_ARGS); |
static void termp_in_post(DECL_ARGS); |
Line 85 static void termp_sh_post(DECL_ARGS); |
|
Line 84 static void termp_sh_post(DECL_ARGS); |
|
static void termp_ss_post(DECL_ARGS); |
static void termp_ss_post(DECL_ARGS); |
|
|
static int termp__a_pre(DECL_ARGS); |
static int termp__a_pre(DECL_ARGS); |
|
static int termp__t_pre(DECL_ARGS); |
static int termp_an_pre(DECL_ARGS); |
static int termp_an_pre(DECL_ARGS); |
static int termp_ap_pre(DECL_ARGS); |
static int termp_ap_pre(DECL_ARGS); |
static int termp_bd_pre(DECL_ARGS); |
static int termp_bd_pre(DECL_ARGS); |
Line 93 static int termp_bk_pre(DECL_ARGS); |
|
Line 93 static int termp_bk_pre(DECL_ARGS); |
|
static int termp_bl_pre(DECL_ARGS); |
static int termp_bl_pre(DECL_ARGS); |
static int termp_bold_pre(DECL_ARGS); |
static int termp_bold_pre(DECL_ARGS); |
static int termp_bt_pre(DECL_ARGS); |
static int termp_bt_pre(DECL_ARGS); |
|
static int termp_bx_pre(DECL_ARGS); |
static int termp_cd_pre(DECL_ARGS); |
static int termp_cd_pre(DECL_ARGS); |
static int termp_d1_pre(DECL_ARGS); |
static int termp_d1_pre(DECL_ARGS); |
static int termp_ex_pre(DECL_ARGS); |
static int termp_ex_pre(DECL_ARGS); |
Line 174 static const struct termact termacts[MDOC_MAX] = { |
|
Line 175 static const struct termact termacts[MDOC_MAX] = { |
|
{ NULL, termp____post }, /* %O */ |
{ NULL, termp____post }, /* %O */ |
{ NULL, termp____post }, /* %P */ |
{ NULL, termp____post }, /* %P */ |
{ NULL, termp____post }, /* %R */ |
{ NULL, termp____post }, /* %R */ |
{ termp_under_pre, termp____post }, /* %T */ |
{ termp__t_pre, termp__t_post }, /* %T */ |
{ NULL, termp____post }, /* %V */ |
{ NULL, termp____post }, /* %V */ |
{ NULL, NULL }, /* Ac */ |
{ NULL, NULL }, /* Ac */ |
{ termp_quote_pre, termp_quote_post }, /* Ao */ |
{ termp_quote_pre, termp_quote_post }, /* Ao */ |
Line 185 static const struct termact termacts[MDOC_MAX] = { |
|
Line 186 static const struct termact termacts[MDOC_MAX] = { |
|
{ termp_quote_pre, termp_quote_post }, /* Bo */ |
{ termp_quote_pre, termp_quote_post }, /* Bo */ |
{ termp_quote_pre, termp_quote_post }, /* Bq */ |
{ termp_quote_pre, termp_quote_post }, /* Bq */ |
{ termp_xx_pre, NULL }, /* Bsx */ |
{ termp_xx_pre, NULL }, /* Bsx */ |
{ NULL, termp_bx_post }, /* Bx */ |
{ termp_bx_pre, NULL }, /* Bx */ |
{ NULL, NULL }, /* Db */ |
{ NULL, NULL }, /* Db */ |
{ NULL, NULL }, /* Dc */ |
{ NULL, NULL }, /* Dc */ |
{ termp_quote_pre, termp_quote_post }, /* Do */ |
{ termp_quote_pre, termp_quote_post }, /* Do */ |
Line 263 terminal_mdoc(void *arg, const struct mdoc *mdoc) |
|
Line 264 terminal_mdoc(void *arg, const struct mdoc *mdoc) |
|
p->tabwidth = term_len(p, 5); |
p->tabwidth = term_len(p, 5); |
|
|
if (NULL == p->symtab) |
if (NULL == p->symtab) |
switch (p->enc) { |
p->symtab = mchars_alloc(); |
case (TERMENC_ASCII): |
|
p->symtab = chars_init(CHARS_ASCII); |
|
break; |
|
default: |
|
abort(); |
|
/* NOTREACHED */ |
|
} |
|
|
|
n = mdoc_node(mdoc); |
n = mdoc_node(mdoc); |
m = mdoc_meta(mdoc); |
m = mdoc_meta(mdoc); |
Line 311 print_mdoc_node(DECL_ARGS) |
|
Line 305 print_mdoc_node(DECL_ARGS) |
|
memset(&npair, 0, sizeof(struct termpair)); |
memset(&npair, 0, sizeof(struct termpair)); |
npair.ppair = pair; |
npair.ppair = pair; |
|
|
if (MDOC_TEXT == n->type) |
|
term_word(p, n->string); |
|
else if (termacts[n->tok].pre && ENDBODY_NOT == n->end) |
|
chld = (*termacts[n->tok].pre)(p, &npair, m, n); |
|
|
|
/* |
/* |
* Keeps only work until the end of a line. If a keep was |
* Keeps only work until the end of a line. If a keep was |
* invoked in a prior line, revert it to PREKEEP. |
* invoked in a prior line, revert it to PREKEEP. |
|
* |
|
* Also let SYNPRETTY sections behave as if they were wrapped |
|
* in a `Bk' block. |
*/ |
*/ |
|
|
if (TERMP_KEEP & p->flags) { |
if (TERMP_KEEP & p->flags || MDOC_SYNPRETTY & n->flags) { |
if (n->prev && n->prev->line != n->line) { |
if (n->prev && n->prev->line != n->line) { |
p->flags &= ~TERMP_KEEP; |
p->flags &= ~TERMP_KEEP; |
p->flags |= TERMP_PREKEEP; |
p->flags |= TERMP_PREKEEP; |
Line 333 print_mdoc_node(DECL_ARGS) |
|
Line 325 print_mdoc_node(DECL_ARGS) |
|
} |
} |
} |
} |
|
|
|
/* |
|
* Since SYNPRETTY sections aren't "turned off" with `Ek', |
|
* we have to intuit whether we should disable formatting. |
|
*/ |
|
|
|
if ( ! (MDOC_SYNPRETTY & n->flags) && |
|
((n->prev && MDOC_SYNPRETTY & n->prev->flags) || |
|
(n->parent && MDOC_SYNPRETTY & n->parent->flags))) |
|
p->flags &= ~(TERMP_KEEP | TERMP_PREKEEP); |
|
|
|
/* |
|
* After the keep flags have been set up, we may now |
|
* produce output. Note that some pre-handlers do so. |
|
*/ |
|
|
|
switch (n->type) { |
|
case (MDOC_TEXT): |
|
if (' ' == *n->string && MDOC_LINE & n->flags) |
|
term_newln(p); |
|
if (MDOC_DELIMC & n->flags) |
|
p->flags |= TERMP_NOSPACE; |
|
term_word(p, n->string); |
|
if (MDOC_DELIMO & n->flags) |
|
p->flags |= TERMP_NOSPACE; |
|
break; |
|
case (MDOC_EQN): |
|
term_word(p, n->eqn->data); |
|
break; |
|
case (MDOC_TBL): |
|
term_tbl(p, n->span); |
|
break; |
|
default: |
|
if (termacts[n->tok].pre && ENDBODY_NOT == n->end) |
|
chld = (*termacts[n->tok].pre) |
|
(p, &npair, m, n); |
|
break; |
|
} |
|
|
if (chld && n->child) |
if (chld && n->child) |
print_mdoc_nodelist(p, &npair, m, n->child); |
print_mdoc_nodelist(p, &npair, m, n->child); |
|
|
term_fontpopq(p, font); |
term_fontpopq(p, font); |
|
|
if (MDOC_TEXT != n->type && termacts[n->tok].post && |
switch (n->type) { |
! (MDOC_ENDED & n->flags)) { |
case (MDOC_TEXT): |
|
break; |
|
case (MDOC_TBL): |
|
break; |
|
case (MDOC_EQN): |
|
break; |
|
default: |
|
if ( ! termacts[n->tok].post || MDOC_ENDED & n->flags) |
|
break; |
(void)(*termacts[n->tok].post)(p, &npair, m, n); |
(void)(*termacts[n->tok].post)(p, &npair, m, n); |
|
|
/* |
/* |
Line 357 print_mdoc_node(DECL_ARGS) |
|
Line 395 print_mdoc_node(DECL_ARGS) |
|
*/ |
*/ |
if (ENDBODY_NOSPACE == n->end) |
if (ENDBODY_NOSPACE == n->end) |
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
|
break; |
} |
} |
|
|
if (MDOC_EOS & n->flags) |
if (MDOC_EOS & n->flags) |
Line 370 print_mdoc_node(DECL_ARGS) |
|
Line 409 print_mdoc_node(DECL_ARGS) |
|
static void |
static void |
print_mdoc_foot(struct termp *p, const void *arg) |
print_mdoc_foot(struct termp *p, const void *arg) |
{ |
{ |
char buf[DATESIZ], os[BUFSIZ]; |
|
const struct mdoc_meta *m; |
const struct mdoc_meta *m; |
|
|
m = (const struct mdoc_meta *)arg; |
m = (const struct mdoc_meta *)arg; |
Line 385 print_mdoc_foot(struct termp *p, const void *arg) |
|
Line 423 print_mdoc_foot(struct termp *p, const void *arg) |
|
* SYSTEM DATE SYSTEM |
* SYSTEM DATE SYSTEM |
*/ |
*/ |
|
|
time2a(m->date, buf, DATESIZ); |
|
strlcpy(os, m->os, BUFSIZ); |
|
|
|
term_vspace(p); |
term_vspace(p); |
|
|
p->offset = 0; |
p->offset = 0; |
p->rmargin = (p->maxrmargin - |
p->rmargin = (p->maxrmargin - |
term_strlen(p, buf) + term_len(p, 1)) / 2; |
term_strlen(p, m->date) + term_len(p, 1)) / 2; |
p->flags |= TERMP_NOSPACE | TERMP_NOBREAK; |
p->flags |= TERMP_NOSPACE | TERMP_NOBREAK; |
|
|
term_word(p, os); |
term_word(p, m->os); |
term_flushln(p); |
term_flushln(p); |
|
|
p->offset = p->rmargin; |
p->offset = p->rmargin; |
p->rmargin = p->maxrmargin - term_strlen(p, os); |
p->rmargin = p->maxrmargin - term_strlen(p, m->os); |
p->flags |= TERMP_NOLPAD | TERMP_NOSPACE; |
p->flags |= TERMP_NOLPAD | TERMP_NOSPACE; |
|
|
term_word(p, buf); |
term_word(p, m->date); |
term_flushln(p); |
term_flushln(p); |
|
|
p->offset = p->rmargin; |
p->offset = p->rmargin; |
Line 410 print_mdoc_foot(struct termp *p, const void *arg) |
|
Line 445 print_mdoc_foot(struct termp *p, const void *arg) |
|
p->flags &= ~TERMP_NOBREAK; |
p->flags &= ~TERMP_NOBREAK; |
p->flags |= TERMP_NOLPAD | TERMP_NOSPACE; |
p->flags |= TERMP_NOLPAD | TERMP_NOSPACE; |
|
|
term_word(p, os); |
term_word(p, m->os); |
term_flushln(p); |
term_flushln(p); |
|
|
p->offset = 0; |
p->offset = 0; |
Line 488 a2height(const struct termp *p, const char *v) |
|
Line 523 a2height(const struct termp *p, const char *v) |
|
{ |
{ |
struct roffsu su; |
struct roffsu su; |
|
|
|
|
assert(v); |
assert(v); |
if ( ! a2roffsu(v, &su, SCALE_VS)) |
if ( ! a2roffsu(v, &su, SCALE_VS)) |
SCALE_VS_INIT(&su, term_len(p, 1)); |
SCALE_VS_INIT(&su, atoi(v)); |
|
|
return(term_vspan(p, &su)); |
return(term_vspan(p, &su)); |
} |
} |
Line 543 print_bvspace(struct termp *p, |
|
Line 579 print_bvspace(struct termp *p, |
|
|
|
term_newln(p); |
term_newln(p); |
|
|
if (MDOC_Bd == bl->tok && bl->data.Bd->comp) |
if (MDOC_Bd == bl->tok && bl->norm->Bd.comp) |
return; |
return; |
if (MDOC_Bl == bl->tok && bl->data.Bl->comp) |
if (MDOC_Bl == bl->tok && bl->norm->Bl.comp) |
return; |
return; |
|
|
/* Do not vspace directly after Ss/Sh. */ |
/* Do not vspace directly after Ss/Sh. */ |
Line 564 print_bvspace(struct termp *p, |
|
Line 600 print_bvspace(struct termp *p, |
|
|
|
/* A `-column' does not assert vspace within the list. */ |
/* A `-column' does not assert vspace within the list. */ |
|
|
if (MDOC_Bl == bl->tok && LIST_column == bl->data.Bl->type) |
if (MDOC_Bl == bl->tok && LIST_column == bl->norm->Bl.type) |
if (n->prev && MDOC_It == n->prev->tok) |
if (n->prev && MDOC_It == n->prev->tok) |
return; |
return; |
|
|
/* A `-diag' without body does not vspace. */ |
/* A `-diag' without body does not vspace. */ |
|
|
if (MDOC_Bl == bl->tok && LIST_diag == bl->data.Bl->type) |
if (MDOC_Bl == bl->tok && LIST_diag == bl->norm->Bl.type) |
if (n->prev && MDOC_It == n->prev->tok) { |
if (n->prev && MDOC_It == n->prev->tok) { |
assert(n->prev->body); |
assert(n->prev->body); |
if (NULL == n->prev->body->child) |
if (NULL == n->prev->body->child) |
Line 597 termp_it_pre(DECL_ARGS) |
|
Line 633 termp_it_pre(DECL_ARGS) |
|
} |
} |
|
|
bl = n->parent->parent->parent; |
bl = n->parent->parent->parent; |
assert(bl->data.Bl); |
type = bl->norm->Bl.type; |
type = bl->data.Bl->type; |
|
|
|
/* |
/* |
* First calculate width and offset. This is pretty easy unless |
* First calculate width and offset. This is pretty easy unless |
Line 608 termp_it_pre(DECL_ARGS) |
|
Line 643 termp_it_pre(DECL_ARGS) |
|
|
|
width = offset = 0; |
width = offset = 0; |
|
|
if (bl->data.Bl->offs) |
if (bl->norm->Bl.offs) |
offset = a2offs(p, bl->data.Bl->offs); |
offset = a2offs(p, bl->norm->Bl.offs); |
|
|
switch (type) { |
switch (type) { |
case (LIST_column): |
case (LIST_column): |
Line 625 termp_it_pre(DECL_ARGS) |
|
Line 660 termp_it_pre(DECL_ARGS) |
|
* column. |
* column. |
* - For more than 5 columns, add only one column. |
* - For more than 5 columns, add only one column. |
*/ |
*/ |
ncols = bl->data.Bl->ncols; |
ncols = bl->norm->Bl.ncols; |
|
|
/* LINTED */ |
/* LINTED */ |
dcol = ncols < 5 ? term_len(p, 4) : |
dcol = ncols < 5 ? term_len(p, 4) : |
Line 640 termp_it_pre(DECL_ARGS) |
|
Line 675 termp_it_pre(DECL_ARGS) |
|
nn->prev && i < (int)ncols; |
nn->prev && i < (int)ncols; |
nn = nn->prev, i++) |
nn = nn->prev, i++) |
offset += dcol + a2width |
offset += dcol + a2width |
(p, bl->data.Bl->cols[i]); |
(p, bl->norm->Bl.cols[i]); |
|
|
/* |
/* |
* When exceeding the declared number of columns, leave |
* When exceeding the declared number of columns, leave |
Line 655 termp_it_pre(DECL_ARGS) |
|
Line 690 termp_it_pre(DECL_ARGS) |
|
* Use the declared column widths, extended as explained |
* Use the declared column widths, extended as explained |
* in the preceding paragraph. |
* in the preceding paragraph. |
*/ |
*/ |
width = a2width(p, bl->data.Bl->cols[i]) + dcol; |
width = a2width(p, bl->norm->Bl.cols[i]) + dcol; |
break; |
break; |
default: |
default: |
if (NULL == bl->data.Bl->width) |
if (NULL == bl->norm->Bl.width) |
break; |
break; |
|
|
/* |
/* |
Line 666 termp_it_pre(DECL_ARGS) |
|
Line 701 termp_it_pre(DECL_ARGS) |
|
* number for buffering single arguments. See the above |
* number for buffering single arguments. See the above |
* handling for column for how this changes. |
* handling for column for how this changes. |
*/ |
*/ |
assert(bl->data.Bl->width); |
assert(bl->norm->Bl.width); |
width = a2width(p, bl->data.Bl->width) + term_len(p, 2); |
width = a2width(p, bl->norm->Bl.width) + term_len(p, 2); |
break; |
break; |
} |
} |
|
|
Line 929 termp_it_post(DECL_ARGS) |
|
Line 964 termp_it_post(DECL_ARGS) |
|
if (MDOC_BLOCK == n->type) |
if (MDOC_BLOCK == n->type) |
return; |
return; |
|
|
type = n->parent->parent->parent->data.Bl->type; |
type = n->parent->parent->parent->norm->Bl.type; |
|
|
switch (type) { |
switch (type) { |
case (LIST_item): |
case (LIST_item): |
Line 1103 termp_an_post(DECL_ARGS) |
|
Line 1138 termp_an_post(DECL_ARGS) |
|
return; |
return; |
} |
} |
|
|
if (AUTH_split == n->data.An.auth) { |
if (AUTH_split == n->norm->An.auth) { |
p->flags &= ~TERMP_NOSPLIT; |
p->flags &= ~TERMP_NOSPLIT; |
p->flags |= TERMP_SPLIT; |
p->flags |= TERMP_SPLIT; |
} else if (AUTH_nosplit == n->data.An.auth) { |
} else if (AUTH_nosplit == n->norm->An.auth) { |
p->flags &= ~TERMP_SPLIT; |
p->flags &= ~TERMP_SPLIT; |
p->flags |= TERMP_NOSPLIT; |
p->flags |= TERMP_NOSPLIT; |
} |
} |
|
|
termp_ns_pre(DECL_ARGS) |
termp_ns_pre(DECL_ARGS) |
{ |
{ |
|
|
p->flags |= TERMP_NOSPACE; |
if ( ! (MDOC_LINE & n->flags)) |
|
p->flags |= TERMP_NOSPACE; |
return(1); |
return(1); |
} |
} |
|
|
Line 1141 termp_rs_pre(DECL_ARGS) |
|
Line 1177 termp_rs_pre(DECL_ARGS) |
|
static int |
static int |
termp_rv_pre(DECL_ARGS) |
termp_rv_pre(DECL_ARGS) |
{ |
{ |
const struct mdoc_node *nn; |
int nchild; |
|
|
term_newln(p); |
term_newln(p); |
term_word(p, "The"); |
term_word(p, "The"); |
|
|
for (nn = n->child; nn; nn = nn->next) { |
nchild = n->nchild; |
|
for (n = n->child; n; n = n->next) { |
term_fontpush(p, TERMFONT_BOLD); |
term_fontpush(p, TERMFONT_BOLD); |
term_word(p, nn->string); |
term_word(p, n->string); |
term_fontpop(p); |
term_fontpop(p); |
|
|
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
if (nn->next && NULL == nn->next->next) |
term_word(p, "()"); |
term_word(p, "(), and"); |
|
else if (nn->next) |
if (nchild > 2 && n->next) { |
term_word(p, "(),"); |
p->flags |= TERMP_NOSPACE; |
else |
term_word(p, ","); |
term_word(p, "()"); |
} |
|
|
|
if (n->next && NULL == n->next->next) |
|
term_word(p, "and"); |
} |
} |
|
|
if (n->child && n->child->next) |
if (nchild > 1) |
term_word(p, "functions return"); |
term_word(p, "functions return"); |
else |
else |
term_word(p, "function returns"); |
term_word(p, "function returns"); |
Line 1182 termp_rv_pre(DECL_ARGS) |
|
Line 1223 termp_rv_pre(DECL_ARGS) |
|
static int |
static int |
termp_ex_pre(DECL_ARGS) |
termp_ex_pre(DECL_ARGS) |
{ |
{ |
const struct mdoc_node *nn; |
int nchild; |
|
|
|
term_newln(p); |
term_word(p, "The"); |
term_word(p, "The"); |
|
|
for (nn = n->child; nn; nn = nn->next) { |
nchild = n->nchild; |
|
for (n = n->child; n; n = n->next) { |
term_fontpush(p, TERMFONT_BOLD); |
term_fontpush(p, TERMFONT_BOLD); |
term_word(p, nn->string); |
term_word(p, n->string); |
term_fontpop(p); |
term_fontpop(p); |
p->flags |= TERMP_NOSPACE; |
|
if (nn->next && NULL == nn->next->next) |
if (nchild > 2 && n->next) { |
term_word(p, ", and"); |
p->flags |= TERMP_NOSPACE; |
else if (nn->next) |
|
term_word(p, ","); |
term_word(p, ","); |
else |
} |
p->flags &= ~TERMP_NOSPACE; |
|
|
if (n->next && NULL == n->next->next) |
|
term_word(p, "and"); |
} |
} |
|
|
if (n->child && n->child->next) |
if (nchild > 1) |
term_word(p, "utilities exit"); |
term_word(p, "utilities exit"); |
else |
else |
term_word(p, "utility exits"); |
term_word(p, "utility exits"); |
|
|
term_word(p, "0 on success, and >0 if an error occurs."); |
term_word(p, "0 on success, and >0 if an error occurs."); |
p->flags |= TERMP_SENTENCE; |
|
|
|
|
p->flags |= TERMP_SENTENCE; |
return(0); |
return(0); |
} |
} |
|
|
Line 1246 termp_bl_post(DECL_ARGS) |
|
Line 1290 termp_bl_post(DECL_ARGS) |
|
term_newln(p); |
term_newln(p); |
} |
} |
|
|
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static int |
static int |
termp_xr_pre(DECL_ARGS) |
termp_xr_pre(DECL_ARGS) |
{ |
{ |
const struct mdoc_node *nn; |
|
|
|
if (NULL == n->child) |
if (NULL == (n = n->child)) |
return(0); |
return(0); |
|
|
assert(MDOC_TEXT == n->child->type); |
assert(MDOC_TEXT == n->type); |
nn = n->child; |
term_word(p, n->string); |
|
|
term_word(p, nn->string); |
if (NULL == (n = n->next)) |
if (NULL == (nn = nn->next)) |
|
return(0); |
return(0); |
|
|
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
term_word(p, "("); |
term_word(p, "("); |
term_word(p, nn->string); |
p->flags |= TERMP_NOSPACE; |
|
|
|
assert(MDOC_TEXT == n->type); |
|
term_word(p, n->string); |
|
|
|
p->flags |= TERMP_NOSPACE; |
term_word(p, ")"); |
term_word(p, ")"); |
|
|
return(0); |
return(0); |
} |
} |
|
|
|
|
/* |
/* |
* This decides how to assert whitespace before any of the SYNOPSIS set |
* This decides how to assert whitespace before any of the SYNOPSIS set |
* of macros (which, as in the case of Ft/Fo and Ft/Fn, may contain |
* of macros (which, as in the case of Ft/Fo and Ft/Fn, may contain |
Line 1484 termp_ft_pre(DECL_ARGS) |
|
Line 1530 termp_ft_pre(DECL_ARGS) |
|
static int |
static int |
termp_fn_pre(DECL_ARGS) |
termp_fn_pre(DECL_ARGS) |
{ |
{ |
const struct mdoc_node *nn; |
int pretty; |
|
|
|
pretty = MDOC_SYNPRETTY & n->flags; |
|
|
synopsis_pre(p, n); |
synopsis_pre(p, n); |
|
|
|
if (NULL == (n = n->child)) |
|
return(0); |
|
|
|
assert(MDOC_TEXT == n->type); |
term_fontpush(p, TERMFONT_BOLD); |
term_fontpush(p, TERMFONT_BOLD); |
term_word(p, n->child->string); |
term_word(p, n->string); |
term_fontpop(p); |
term_fontpop(p); |
|
|
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
term_word(p, "("); |
term_word(p, "("); |
|
p->flags |= TERMP_NOSPACE; |
|
|
for (nn = n->child->next; nn; nn = nn->next) { |
for (n = n->next; n; n = n->next) { |
|
assert(MDOC_TEXT == n->type); |
term_fontpush(p, TERMFONT_UNDER); |
term_fontpush(p, TERMFONT_UNDER); |
term_word(p, nn->string); |
term_word(p, n->string); |
term_fontpop(p); |
term_fontpop(p); |
|
|
if (nn->next) |
if (n->next) { |
|
p->flags |= TERMP_NOSPACE; |
term_word(p, ","); |
term_word(p, ","); |
|
} |
} |
} |
|
|
|
p->flags |= TERMP_NOSPACE; |
term_word(p, ")"); |
term_word(p, ")"); |
|
|
if (MDOC_SYNPRETTY & n->flags) |
if (pretty) { |
|
p->flags |= TERMP_NOSPACE; |
term_word(p, ";"); |
term_word(p, ";"); |
|
} |
|
|
return(0); |
return(0); |
} |
} |
Line 1529 termp_fa_pre(DECL_ARGS) |
|
Line 1588 termp_fa_pre(DECL_ARGS) |
|
term_word(p, nn->string); |
term_word(p, nn->string); |
term_fontpop(p); |
term_fontpop(p); |
|
|
if (nn->next) |
if (nn->next) { |
|
p->flags |= TERMP_NOSPACE; |
term_word(p, ","); |
term_word(p, ","); |
|
} |
} |
} |
|
|
if (n->child && n->next && n->next->tok == MDOC_Fa) |
if (n->child && n->next && n->next->tok == MDOC_Fa) { |
|
p->flags |= TERMP_NOSPACE; |
term_word(p, ","); |
term_word(p, ","); |
|
} |
|
|
return(0); |
return(0); |
} |
} |
Line 1553 termp_bd_pre(DECL_ARGS) |
|
Line 1616 termp_bd_pre(DECL_ARGS) |
|
} else if (MDOC_HEAD == n->type) |
} else if (MDOC_HEAD == n->type) |
return(0); |
return(0); |
|
|
assert(n->data.Bd); |
if (n->norm->Bd.offs) |
if (n->data.Bd->offs) |
p->offset += a2offs(p, n->norm->Bd.offs); |
p->offset += a2offs(p, n->data.Bd->offs); |
|
|
|
/* |
/* |
* If -ragged or -filled are specified, the block does nothing |
* If -ragged or -filled are specified, the block does nothing |
Line 1565 termp_bd_pre(DECL_ARGS) |
|
Line 1627 termp_bd_pre(DECL_ARGS) |
|
* lines are allowed. |
* lines are allowed. |
*/ |
*/ |
|
|
if (DISP_literal != n->data.Bd->type && |
if (DISP_literal != n->norm->Bd.type && |
DISP_unfilled != n->data.Bd->type) |
DISP_unfilled != n->norm->Bd.type) |
return(1); |
return(1); |
|
|
tabwidth = p->tabwidth; |
tabwidth = p->tabwidth; |
p->tabwidth = term_len(p, 8); |
if (DISP_literal == n->norm->Bd.type) |
|
p->tabwidth = term_len(p, 8); |
|
|
rm = p->rmargin; |
rm = p->rmargin; |
rmax = p->maxrmargin; |
rmax = p->maxrmargin; |
p->rmargin = p->maxrmargin = TERM_MAXMARGIN; |
p->rmargin = p->maxrmargin = TERM_MAXMARGIN; |
Line 1592 termp_bd_pre(DECL_ARGS) |
|
Line 1656 termp_bd_pre(DECL_ARGS) |
|
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case (MDOC_Bl): |
case (MDOC_Bl): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
|
case (MDOC_D1): |
|
/* FALLTHROUGH */ |
|
case (MDOC_Dl): |
|
/* FALLTHROUGH */ |
case (MDOC_Lp): |
case (MDOC_Lp): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case (MDOC_Pp): |
case (MDOC_Pp): |
Line 1624 termp_bd_post(DECL_ARGS) |
|
Line 1692 termp_bd_post(DECL_ARGS) |
|
rm = p->rmargin; |
rm = p->rmargin; |
rmax = p->maxrmargin; |
rmax = p->maxrmargin; |
|
|
assert(n->data.Bd); |
if (DISP_literal == n->norm->Bd.type || |
if (DISP_literal == n->data.Bd->type || |
DISP_unfilled == n->norm->Bd.type) |
DISP_unfilled == n->data.Bd->type) |
|
p->rmargin = p->maxrmargin = TERM_MAXMARGIN; |
p->rmargin = p->maxrmargin = TERM_MAXMARGIN; |
|
|
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
Line 1638 termp_bd_post(DECL_ARGS) |
|
Line 1705 termp_bd_post(DECL_ARGS) |
|
|
|
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |
static void |
static int |
termp_bx_post(DECL_ARGS) |
termp_bx_pre(DECL_ARGS) |
{ |
{ |
|
|
if (n->child) |
if (NULL != (n = n->child)) { |
|
term_word(p, n->string); |
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
term_word(p, "BSD"); |
term_word(p, "BSD"); |
|
} else { |
|
term_word(p, "BSD"); |
|
return(0); |
|
} |
|
|
|
if (NULL != (n = n->next)) { |
|
p->flags |= TERMP_NOSPACE; |
|
term_word(p, "-"); |
|
p->flags |= TERMP_NOSPACE; |
|
term_word(p, n->string); |
|
} |
|
|
|
return(0); |
} |
} |
|
|
|
|
|
|
termp_xx_pre(DECL_ARGS) |
termp_xx_pre(DECL_ARGS) |
{ |
{ |
const char *pp; |
const char *pp; |
|
int flags; |
|
|
pp = NULL; |
pp = NULL; |
switch (n->tok) { |
switch (n->tok) { |
Line 1678 termp_xx_pre(DECL_ARGS) |
|
Line 1760 termp_xx_pre(DECL_ARGS) |
|
break; |
break; |
} |
} |
|
|
assert(pp); |
|
term_word(p, pp); |
term_word(p, pp); |
return(1); |
if (n->child) { |
|
flags = p->flags; |
|
p->flags |= TERMP_KEEP; |
|
term_word(p, n->child->string); |
|
p->flags = flags; |
|
} |
|
return(0); |
} |
} |
|
|
|
|
Line 1798 termp_sp_pre(DECL_ARGS) |
|
Line 1885 termp_sp_pre(DECL_ARGS) |
|
len = 0; |
len = 0; |
break; |
break; |
default: |
default: |
assert(n->parent); |
|
if ((NULL == n->next || NULL == n->prev) && |
|
(MDOC_Ss == n->parent->tok || |
|
MDOC_Sh == n->parent->tok)) |
|
return(0); |
|
len = 1; |
len = 1; |
break; |
break; |
} |
} |
|
|
termp_quote_pre(DECL_ARGS) |
termp_quote_pre(DECL_ARGS) |
{ |
{ |
|
|
if (MDOC_BODY != n->type) |
if (MDOC_BODY != n->type && MDOC_ELEM != n->type) |
return(1); |
return(1); |
|
|
switch (n->tok) { |
switch (n->tok) { |
Line 1854 termp_quote_pre(DECL_ARGS) |
|
Line 1936 termp_quote_pre(DECL_ARGS) |
|
case (MDOC_Pq): |
case (MDOC_Pq): |
term_word(p, "("); |
term_word(p, "("); |
break; |
break; |
|
case (MDOC__T): |
|
/* FALLTHROUGH */ |
case (MDOC_Qo): |
case (MDOC_Qo): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case (MDOC_Qq): |
case (MDOC_Qq): |
|
|
termp_quote_post(DECL_ARGS) |
termp_quote_post(DECL_ARGS) |
{ |
{ |
|
|
if (MDOC_BODY != n->type) |
if (MDOC_BODY != n->type && MDOC_ELEM != n->type) |
return; |
return; |
|
|
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
Line 1916 termp_quote_post(DECL_ARGS) |
|
Line 2000 termp_quote_post(DECL_ARGS) |
|
case (MDOC_Pq): |
case (MDOC_Pq): |
term_word(p, ")"); |
term_word(p, ")"); |
break; |
break; |
|
case (MDOC__T): |
|
/* FALLTHROUGH */ |
case (MDOC_Qo): |
case (MDOC_Qo): |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case (MDOC_Qq): |
case (MDOC_Qq): |
Line 1946 termp_fo_pre(DECL_ARGS) |
|
Line 2032 termp_fo_pre(DECL_ARGS) |
|
} else if (MDOC_BODY == n->type) { |
} else if (MDOC_BODY == n->type) { |
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
term_word(p, "("); |
term_word(p, "("); |
|
p->flags |= TERMP_NOSPACE; |
return(1); |
return(1); |
} |
} |
|
|
Line 1969 termp_fo_post(DECL_ARGS) |
|
Line 2056 termp_fo_post(DECL_ARGS) |
|
if (MDOC_BODY != n->type) |
if (MDOC_BODY != n->type) |
return; |
return; |
|
|
|
p->flags |= TERMP_NOSPACE; |
term_word(p, ")"); |
term_word(p, ")"); |
|
|
if (MDOC_SYNPRETTY & n->flags) |
if (MDOC_SYNPRETTY & n->flags) { |
|
p->flags |= TERMP_NOSPACE; |
term_word(p, ";"); |
term_word(p, ";"); |
|
} |
} |
} |
|
|
|
|
Line 1986 termp_bf_pre(DECL_ARGS) |
|
Line 2076 termp_bf_pre(DECL_ARGS) |
|
else if (MDOC_BLOCK != n->type) |
else if (MDOC_BLOCK != n->type) |
return(1); |
return(1); |
|
|
assert(n->data.Bf); |
if (FONT_Em == n->norm->Bf.font) |
|
|
if (FONT_Em == n->data.Bf->font) |
|
term_fontpush(p, TERMFONT_UNDER); |
term_fontpush(p, TERMFONT_UNDER); |
else if (FONT_Sy == n->data.Bf->font) |
else if (FONT_Sy == n->norm->Bf.font) |
term_fontpush(p, TERMFONT_BOLD); |
term_fontpush(p, TERMFONT_BOLD); |
else |
else |
term_fontpush(p, TERMFONT_NONE); |
term_fontpush(p, TERMFONT_NONE); |
Line 2048 termp____post(DECL_ARGS) |
|
Line 2136 termp____post(DECL_ARGS) |
|
if (NULL == n->parent || MDOC_Rs != n->parent->tok) |
if (NULL == n->parent || MDOC_Rs != n->parent->tok) |
return; |
return; |
|
|
|
p->flags |= TERMP_NOSPACE; |
if (NULL == n->next) { |
if (NULL == n->next) { |
term_word(p, "."); |
term_word(p, "."); |
p->flags |= TERMP_SENTENCE; |
p->flags |= TERMP_SENTENCE; |
Line 2076 termp_lk_pre(DECL_ARGS) |
|
Line 2165 termp_lk_pre(DECL_ARGS) |
|
|
|
nn = sv = n->child; |
nn = sv = n->child; |
|
|
if (NULL == nn->next) |
if (NULL == nn || NULL == nn->next) |
return(1); |
return(1); |
|
|
for (nn = nn->next; nn; nn = nn->next) |
for (nn = nn->next; nn; nn = nn->next) |
Line 2084 termp_lk_pre(DECL_ARGS) |
|
Line 2173 termp_lk_pre(DECL_ARGS) |
|
|
|
term_fontpop(p); |
term_fontpop(p); |
|
|
|
p->flags |= TERMP_NOSPACE; |
term_word(p, ":"); |
term_word(p, ":"); |
|
|
term_fontpush(p, TERMFONT_BOLD); |
term_fontpush(p, TERMFONT_BOLD); |
Line 2105 termp_bk_pre(DECL_ARGS) |
|
Line 2195 termp_bk_pre(DECL_ARGS) |
|
case (MDOC_HEAD): |
case (MDOC_HEAD): |
return(0); |
return(0); |
case (MDOC_BODY): |
case (MDOC_BODY): |
p->flags |= TERMP_PREKEEP; |
if (n->parent->args || 0 == n->prev->nchild) |
|
p->flags |= TERMP_PREKEEP; |
break; |
break; |
default: |
default: |
abort(); |
abort(); |
Line 2123 termp_bk_post(DECL_ARGS) |
|
Line 2214 termp_bk_post(DECL_ARGS) |
|
|
|
if (MDOC_BODY == n->type) |
if (MDOC_BODY == n->type) |
p->flags &= ~(TERMP_KEEP | TERMP_PREKEEP); |
p->flags &= ~(TERMP_KEEP | TERMP_PREKEEP); |
|
} |
|
|
|
/* ARGSUSED */ |
|
static void |
|
termp__t_post(DECL_ARGS) |
|
{ |
|
|
|
/* |
|
* If we're in an `Rs' and there's a journal present, then quote |
|
* us instead of underlining us (for disambiguation). |
|
*/ |
|
if (n->parent && MDOC_Rs == n->parent->tok && |
|
n->parent->norm->Rs.quote_T) |
|
termp_quote_post(p, pair, m, n); |
|
|
|
termp____post(p, pair, m, n); |
|
} |
|
|
|
/* ARGSUSED */ |
|
static int |
|
termp__t_pre(DECL_ARGS) |
|
{ |
|
|
|
/* |
|
* If we're in an `Rs' and there's a journal present, then quote |
|
* us instead of underlining us (for disambiguation). |
|
*/ |
|
if (n->parent && MDOC_Rs == n->parent->tok && |
|
n->parent->norm->Rs.quote_T) |
|
return(termp_quote_pre(p, pair, m, n)); |
|
|
|
term_fontpush(p, TERMFONT_UNDER); |
|
return(1); |
} |
} |
|
|
/* ARGSUSED */ |
/* ARGSUSED */ |