version 1.268, 2014/07/02 03:48:07 |
version 1.282, 2014/09/17 20:18:58 |
|
|
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
*/ |
*/ |
#ifdef HAVE_CONFIG_H |
|
#include "config.h" |
#include "config.h" |
#endif |
|
|
|
#include <sys/types.h> |
#include <sys/types.h> |
|
|
Line 67 static void synopsis_pre(struct termp *, |
|
Line 65 static void synopsis_pre(struct termp *, |
|
|
|
static void termp____post(DECL_ARGS); |
static void termp____post(DECL_ARGS); |
static void termp__t_post(DECL_ARGS); |
static void termp__t_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); |
Line 140 static const struct termact termacts[MDOC_MAX] = { |
|
Line 137 static const struct termact termacts[MDOC_MAX] = { |
|
{ NULL, NULL }, /* El */ |
{ NULL, NULL }, /* El */ |
{ termp_it_pre, termp_it_post }, /* It */ |
{ termp_it_pre, termp_it_post }, /* It */ |
{ termp_under_pre, NULL }, /* Ad */ |
{ termp_under_pre, NULL }, /* Ad */ |
{ termp_an_pre, termp_an_post }, /* An */ |
{ termp_an_pre, NULL }, /* An */ |
{ termp_under_pre, NULL }, /* Ar */ |
{ termp_under_pre, NULL }, /* Ar */ |
{ termp_cd_pre, NULL }, /* Cd */ |
{ termp_cd_pre, NULL }, /* Cd */ |
{ termp_bold_pre, NULL }, /* Cm */ |
{ termp_bold_pre, NULL }, /* Cm */ |
Line 254 static const struct termact termacts[MDOC_MAX] = { |
|
Line 251 static const struct termact termacts[MDOC_MAX] = { |
|
void |
void |
terminal_mdoc(void *arg, const struct mdoc *mdoc) |
terminal_mdoc(void *arg, const struct mdoc *mdoc) |
{ |
{ |
const struct mdoc_node *n; |
|
const struct mdoc_meta *meta; |
const struct mdoc_meta *meta; |
|
struct mdoc_node *n; |
struct termp *p; |
struct termp *p; |
|
|
p = (struct termp *)arg; |
p = (struct termp *)arg; |
|
|
if (0 == p->defindent) |
|
p->defindent = 5; |
|
|
|
p->overstep = 0; |
p->overstep = 0; |
p->maxrmargin = p->defrmargin; |
p->rmargin = p->maxrmargin = p->defrmargin; |
p->tabwidth = term_len(p, 5); |
p->tabwidth = term_len(p, 5); |
|
|
if (NULL == p->symtab) |
if (NULL == p->symtab) |
p->symtab = mchars_alloc(); |
p->symtab = mchars_alloc(); |
|
|
n = mdoc_node(mdoc); |
n = mdoc_node(mdoc)->child; |
meta = mdoc_meta(mdoc); |
meta = mdoc_meta(mdoc); |
|
|
term_begin(p, print_mdoc_head, print_mdoc_foot, meta); |
if (p->synopsisonly) { |
|
while (n != NULL) { |
if (n->child) |
if (n->tok == MDOC_Sh && n->sec == SEC_SYNOPSIS) { |
print_mdoc_nodelist(p, NULL, meta, n->child); |
if (n->child->next->child != NULL) |
|
print_mdoc_nodelist(p, NULL, |
term_end(p); |
meta, n->child->next->child); |
|
term_newln(p); |
|
break; |
|
} |
|
n = n->next; |
|
} |
|
} else { |
|
if (p->defindent == 0) |
|
p->defindent = 5; |
|
term_begin(p, print_mdoc_head, print_mdoc_foot, meta); |
|
if (n != NULL) { |
|
if (n->tok != MDOC_Sh) |
|
term_vspace(p); |
|
print_mdoc_nodelist(p, NULL, meta, n); |
|
} |
|
term_end(p); |
|
} |
} |
} |
|
|
static void |
static void |
Line 462 print_mdoc_head(struct termp *p, const void *arg) |
|
Line 472 print_mdoc_head(struct termp *p, const void *arg) |
|
* switches on the manual section. |
* switches on the manual section. |
*/ |
*/ |
|
|
p->offset = 0; |
|
p->rmargin = p->maxrmargin; |
|
|
|
assert(meta->vol); |
assert(meta->vol); |
if (NULL == meta->arch) |
if (NULL == meta->arch) |
volume = mandoc_strdup(meta->vol); |
volume = mandoc_strdup(meta->vol); |
Line 473 print_mdoc_head(struct termp *p, const void *arg) |
|
Line 480 print_mdoc_head(struct termp *p, const void *arg) |
|
meta->vol, meta->arch); |
meta->vol, meta->arch); |
vollen = term_strlen(p, volume); |
vollen = term_strlen(p, volume); |
|
|
mandoc_asprintf(&title, "%s(%s)", meta->title, meta->msec); |
if (NULL == meta->msec) |
|
title = mandoc_strdup(meta->title); |
|
else |
|
mandoc_asprintf(&title, "%s(%s)", |
|
meta->title, meta->msec); |
titlen = term_strlen(p, title); |
titlen = term_strlen(p, title); |
|
|
p->flags |= TERMP_NOBREAK | TERMP_NOSPACE; |
p->flags |= TERMP_NOBREAK | TERMP_NOSPACE; |
Line 747 termp_it_pre(DECL_ARGS) |
|
Line 758 termp_it_pre(DECL_ARGS) |
|
term_word(p, "\\ \\ "); |
term_word(p, "\\ \\ "); |
break; |
break; |
case LIST_inset: |
case LIST_inset: |
if (MDOC_BODY == n->type) |
if (MDOC_BODY == n->type && n->parent->head->nchild) |
term_word(p, "\\ "); |
term_word(p, "\\ "); |
break; |
break; |
default: |
default: |
Line 801 termp_it_pre(DECL_ARGS) |
|
Line 812 termp_it_pre(DECL_ARGS) |
|
* the "overstep" effect in term_flushln() and treat |
* the "overstep" effect in term_flushln() and treat |
* this as a `-ohang' list instead. |
* this as a `-ohang' list instead. |
*/ |
*/ |
if (n->next->child && |
if (NULL != n->next && |
|
NULL != n->next->child && |
(MDOC_Bl == n->next->child->tok || |
(MDOC_Bl == n->next->child->tok || |
MDOC_Bd == n->next->child->tok)) |
MDOC_Bd == n->next->child->tok)) |
break; |
break; |
Line 857 termp_it_pre(DECL_ARGS) |
|
Line 869 termp_it_pre(DECL_ARGS) |
|
* don't want to recalculate rmargin and offsets when |
* don't want to recalculate rmargin and offsets when |
* using `Bd' or `Bl' within `-hang' overstep lists. |
* using `Bd' or `Bl' within `-hang' overstep lists. |
*/ |
*/ |
if (MDOC_HEAD == n->type && n->next->child && |
if (MDOC_HEAD == n->type && |
|
NULL != n->next && |
|
NULL != n->next->child && |
(MDOC_Bl == n->next->child->tok || |
(MDOC_Bl == n->next->child->tok || |
MDOC_Bd == n->next->child->tok)) |
MDOC_Bd == n->next->child->tok)) |
break; |
break; |
Line 1022 termp_nm_pre(DECL_ARGS) |
|
Line 1036 termp_nm_pre(DECL_ARGS) |
|
if (MDOC_HEAD == n->type) |
if (MDOC_HEAD == n->type) |
synopsis_pre(p, n->parent); |
synopsis_pre(p, n->parent); |
|
|
if (MDOC_HEAD == n->type && n->next->child) { |
if (MDOC_HEAD == n->type && |
|
NULL != n->next && NULL != n->next->child) { |
p->flags |= TERMP_NOSPACE | TERMP_NOBREAK | TERMP_BRIND; |
p->flags |= TERMP_NOSPACE | TERMP_NOBREAK | TERMP_BRIND; |
p->trailspace = 1; |
p->trailspace = 1; |
p->rmargin = p->offset + term_len(p, 1); |
p->rmargin = p->offset + term_len(p, 1); |
Line 1050 termp_nm_post(DECL_ARGS) |
|
Line 1065 termp_nm_post(DECL_ARGS) |
|
|
|
if (MDOC_BLOCK == n->type) { |
if (MDOC_BLOCK == n->type) { |
p->flags &= ~(TERMP_KEEP | TERMP_PREKEEP); |
p->flags &= ~(TERMP_KEEP | TERMP_PREKEEP); |
} else if (MDOC_HEAD == n->type && n->next->child) { |
} else if (MDOC_HEAD == n->type && |
|
NULL != n->next && NULL != n->next->child) { |
term_flushln(p); |
term_flushln(p); |
p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND | TERMP_HANG); |
p->flags &= ~(TERMP_NOBREAK | TERMP_BRIND | TERMP_HANG); |
p->trailspace = 0; |
p->trailspace = 0; |
Line 1065 termp_fl_pre(DECL_ARGS) |
|
Line 1081 termp_fl_pre(DECL_ARGS) |
|
term_fontpush(p, TERMFONT_BOLD); |
term_fontpush(p, TERMFONT_BOLD); |
term_word(p, "\\-"); |
term_word(p, "\\-"); |
|
|
if (n->child) |
if ( ! (n->nchild == 0 && |
|
(n->next == NULL || |
|
n->next->type == MDOC_TEXT || |
|
n->next->flags & MDOC_LINE))) |
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
else if (n->next && n->next->line == n->line) |
|
p->flags |= TERMP_NOSPACE; |
|
|
|
return(1); |
return(1); |
} |
} |
|
|
termp_an_pre(DECL_ARGS) |
termp_an_pre(DECL_ARGS) |
{ |
{ |
|
|
if (NULL == n->child) |
if (n->norm->An.auth == AUTH_split) { |
return(1); |
p->flags &= ~TERMP_NOSPLIT; |
|
p->flags |= TERMP_SPLIT; |
|
return(0); |
|
} |
|
if (n->norm->An.auth == AUTH_nosplit) { |
|
p->flags &= ~TERMP_SPLIT; |
|
p->flags |= TERMP_NOSPLIT; |
|
return(0); |
|
} |
|
|
/* |
if (n->child == NULL) |
* If not in the AUTHORS section, `An -split' will cause |
return(0); |
* newlines to occur before the author name. If in the AUTHORS |
|
* section, by default, the first `An' invocation is nosplit, |
|
* then all subsequent ones, regardless of whether interspersed |
|
* with other macros/text, are split. -split, in this case, |
|
* will override the condition of the implied first -nosplit. |
|
*/ |
|
|
|
if (n->sec == SEC_AUTHORS) { |
if (p->flags & TERMP_SPLIT) |
if ( ! (TERMP_ANPREC & p->flags)) { |
|
if (TERMP_SPLIT & p->flags) |
|
term_newln(p); |
|
return(1); |
|
} |
|
if (TERMP_NOSPLIT & p->flags) |
|
return(1); |
|
term_newln(p); |
term_newln(p); |
return(1); |
|
} |
|
|
|
if (TERMP_SPLIT & p->flags) |
if (n->sec == SEC_AUTHORS && ! (p->flags & TERMP_NOSPLIT)) |
term_newln(p); |
p->flags |= TERMP_SPLIT; |
|
|
return(1); |
return(1); |
} |
} |
|
|
static void |
|
termp_an_post(DECL_ARGS) |
|
{ |
|
|
|
if (n->child) { |
|
if (SEC_AUTHORS == n->sec) |
|
p->flags |= TERMP_ANPREC; |
|
return; |
|
} |
|
|
|
if (AUTH_split == n->norm->An.auth) { |
|
p->flags &= ~TERMP_NOSPLIT; |
|
p->flags |= TERMP_SPLIT; |
|
} else if (AUTH_nosplit == n->norm->An.auth) { |
|
p->flags &= ~TERMP_SPLIT; |
|
p->flags |= TERMP_NOSPLIT; |
|
} |
|
|
|
} |
|
|
|
static int |
static int |
termp_ns_pre(DECL_ARGS) |
termp_ns_pre(DECL_ARGS) |
{ |
{ |
Line 1164 termp_rv_pre(DECL_ARGS) |
|
Line 1154 termp_rv_pre(DECL_ARGS) |
|
int nchild; |
int nchild; |
|
|
term_newln(p); |
term_newln(p); |
term_word(p, "The"); |
|
|
|
nchild = n->nchild; |
nchild = n->nchild; |
for (n = n->child; n; n = n->next) { |
if (nchild > 0) { |
term_fontpush(p, TERMFONT_BOLD); |
term_word(p, "The"); |
term_word(p, n->string); |
|
term_fontpop(p); |
|
|
|
p->flags |= TERMP_NOSPACE; |
for (n = n->child; n; n = n->next) { |
term_word(p, "()"); |
term_fontpush(p, TERMFONT_BOLD); |
|
term_word(p, n->string); |
|
term_fontpop(p); |
|
|
if (nchild > 2 && n->next) { |
|
p->flags |= TERMP_NOSPACE; |
p->flags |= TERMP_NOSPACE; |
term_word(p, ","); |
term_word(p, "()"); |
|
|
|
if (n->next == NULL) |
|
continue; |
|
|
|
if (nchild > 2) { |
|
p->flags |= TERMP_NOSPACE; |
|
term_word(p, ","); |
|
} |
|
if (n->next->next == NULL) |
|
term_word(p, "and"); |
} |
} |
|
|
if (n->next && NULL == n->next->next) |
if (nchild > 1) |
term_word(p, "and"); |
term_word(p, "functions return"); |
} |
else |
|
term_word(p, "function returns"); |
|
|
if (nchild > 1) |
term_word(p, "the value\\~0 if successful;"); |
term_word(p, "functions return"); |
} else |
else |
term_word(p, "Upon successful completion," |
term_word(p, "function returns"); |
" the value\\~0 is returned;"); |
|
|
term_word(p, "the value 0 if successful; otherwise the " |
term_word(p, "otherwise the value\\~\\-1 is returned" |
"value -1 is returned and the global variable"); |
" and the global variable"); |
|
|
term_fontpush(p, TERMFONT_UNDER); |
term_fontpush(p, TERMFONT_UNDER); |
term_word(p, "errno"); |
term_word(p, "errno"); |
Line 1226 termp_ex_pre(DECL_ARGS) |
|
Line 1225 termp_ex_pre(DECL_ARGS) |
|
} |
} |
|
|
if (nchild > 1) |
if (nchild > 1) |
term_word(p, "utilities exit"); |
term_word(p, "utilities exit\\~0"); |
else |
else |
term_word(p, "utility exits"); |
term_word(p, "utility exits\\~0"); |
|
|
term_word(p, "0 on success, and >0 if an error occurs."); |
term_word(p, "on success, and\\~>0 if an error occurs."); |
|
|
p->flags |= TERMP_SENTENCE; |
p->flags |= TERMP_SENTENCE; |
return(0); |
return(0); |
Line 1568 termp_fa_pre(DECL_ARGS) |
|
Line 1567 termp_fa_pre(DECL_ARGS) |
|
static int |
static int |
termp_bd_pre(DECL_ARGS) |
termp_bd_pre(DECL_ARGS) |
{ |
{ |
size_t tabwidth, rm, rmax; |
size_t tabwidth, lm, len, rm, rmax; |
struct mdoc_node *nn; |
struct mdoc_node *nn; |
|
|
if (MDOC_BLOCK == n->type) { |
if (MDOC_BLOCK == n->type) { |
Line 1589 termp_bd_pre(DECL_ARGS) |
|
Line 1588 termp_bd_pre(DECL_ARGS) |
|
*/ |
*/ |
|
|
if (DISP_literal != n->norm->Bd.type && |
if (DISP_literal != n->norm->Bd.type && |
DISP_unfilled != n->norm->Bd.type) |
DISP_unfilled != n->norm->Bd.type && |
|
DISP_centered != n->norm->Bd.type) |
return(1); |
return(1); |
|
|
tabwidth = p->tabwidth; |
tabwidth = p->tabwidth; |
if (DISP_literal == n->norm->Bd.type) |
if (DISP_literal == n->norm->Bd.type) |
p->tabwidth = term_len(p, 8); |
p->tabwidth = term_len(p, 8); |
|
|
|
lm = p->offset; |
rm = p->rmargin; |
rm = p->rmargin; |
rmax = p->maxrmargin; |
rmax = p->maxrmargin; |
p->rmargin = p->maxrmargin = TERM_MAXMARGIN; |
p->rmargin = p->maxrmargin = TERM_MAXMARGIN; |
|
|
for (nn = n->child; nn; nn = nn->next) { |
for (nn = n->child; nn; nn = nn->next) { |
|
if (DISP_centered == n->norm->Bd.type) { |
|
if (MDOC_TEXT == nn->type) { |
|
len = term_strlen(p, nn->string); |
|
p->offset = len >= rm ? 0 : |
|
lm + len >= rm ? rm - len : |
|
(lm + rm - len) / 2; |
|
} else |
|
p->offset = lm; |
|
} |
print_mdoc_node(p, pair, meta, nn); |
print_mdoc_node(p, pair, meta, nn); |
/* |
/* |
* If the printed node flushes its own line, then we |
* If the printed node flushes its own line, then we |
Line 1747 termp_ss_pre(DECL_ARGS) |
|
Line 1757 termp_ss_pre(DECL_ARGS) |
|
term_fontpush(p, TERMFONT_BOLD); |
term_fontpush(p, TERMFONT_BOLD); |
p->offset = term_len(p, (p->defindent+1)/2); |
p->offset = term_len(p, (p->defindent+1)/2); |
break; |
break; |
|
case MDOC_BODY: |
|
p->offset = term_len(p, p->defindent); |
|
break; |
default: |
default: |
break; |
break; |
} |
} |
|
|
termp_ss_post(DECL_ARGS) |
termp_ss_post(DECL_ARGS) |
{ |
{ |
|
|
if (MDOC_HEAD == n->type) |
if (n->type == MDOC_HEAD || n->type == MDOC_BODY) |
term_newln(p); |
term_newln(p); |
} |
} |
|
|
|
|
termp_sm_pre(DECL_ARGS) |
termp_sm_pre(DECL_ARGS) |
{ |
{ |
|
|
assert(n->child && MDOC_TEXT == n->child->type); |
if (NULL == n->child) |
if (0 == strcmp("on", n->child->string)) { |
p->flags ^= TERMP_NONOSPACE; |
if (p->col) |
else if (0 == strcmp("on", n->child->string)) |
p->flags &= ~TERMP_NOSPACE; |
|
p->flags &= ~TERMP_NONOSPACE; |
p->flags &= ~TERMP_NONOSPACE; |
} else |
else |
p->flags |= TERMP_NONOSPACE; |
p->flags |= TERMP_NONOSPACE; |
|
|
|
if (p->col && ! (TERMP_NONOSPACE & p->flags)) |
|
p->flags &= ~TERMP_NOSPACE; |
|
|
return(0); |
return(0); |
} |
} |