version 1.75, 2014/11/27 16:20:31 |
version 1.83, 2015/01/28 17:32:07 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2011, 2012, 2013, 2014 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2011-2015 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 |
* purpose with or without fee is hereby granted, provided that the above |
* purpose with or without fee is hereby granted, provided that the above |
Line 85 static int pre_en(DECL_ARGS); |
|
Line 85 static int pre_en(DECL_ARGS); |
|
static int pre_enc(DECL_ARGS); |
static int pre_enc(DECL_ARGS); |
static int pre_em(DECL_ARGS); |
static int pre_em(DECL_ARGS); |
static int pre_skip(DECL_ARGS); |
static int pre_skip(DECL_ARGS); |
|
static int pre_eo(DECL_ARGS); |
static int pre_ex(DECL_ARGS); |
static int pre_ex(DECL_ARGS); |
static int pre_fa(DECL_ARGS); |
static int pre_fa(DECL_ARGS); |
static int pre_fd(DECL_ARGS); |
static int pre_fd(DECL_ARGS); |
Line 115 static void print_word(const char *); |
|
Line 116 static void print_word(const char *); |
|
static void print_line(const char *, int); |
static void print_line(const char *, int); |
static void print_block(const char *, int); |
static void print_block(const char *, int); |
static void print_offs(const char *, int); |
static void print_offs(const char *, int); |
static void print_width(const char *, |
static void print_width(const struct mdoc_bl *, |
const struct mdoc_node *, size_t); |
const struct mdoc_node *); |
static void print_count(int *); |
static void print_count(int *); |
static void print_node(DECL_ARGS); |
static void print_node(DECL_ARGS); |
|
|
Line 190 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 191 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ NULL, NULL, NULL, NULL, NULL }, /* Ec */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ec */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ef */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ef */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Em */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Em */ |
{ NULL, NULL, post_eo, NULL, NULL }, /* Eo */ |
{ cond_body, pre_eo, post_eo, NULL, NULL }, /* Eo */ |
{ NULL, pre_ux, NULL, "FreeBSD", NULL }, /* Fx */ |
{ NULL, pre_ux, NULL, "FreeBSD", NULL }, /* Fx */ |
{ NULL, pre_sy, post_font, NULL, NULL }, /* Ms */ |
{ NULL, pre_sy, post_font, NULL, NULL }, /* Ms */ |
{ NULL, pre_no, NULL, NULL, NULL }, /* No */ |
{ NULL, pre_no, NULL, NULL, NULL }, /* No */ |
Line 264 static int outflags; |
|
Line 265 static int outflags; |
|
|
|
#define BL_STACK_MAX 32 |
#define BL_STACK_MAX 32 |
|
|
static size_t Bl_stack[BL_STACK_MAX]; /* offsets [chars] */ |
static int Bl_stack[BL_STACK_MAX]; /* offsets [chars] */ |
static int Bl_stack_post[BL_STACK_MAX]; /* add final .RE */ |
static int Bl_stack_post[BL_STACK_MAX]; /* add final .RE */ |
static int Bl_stack_len; /* number of nested Bl blocks */ |
static int Bl_stack_len; /* number of nested Bl blocks */ |
static int TPremain; /* characters before tag is full */ |
static int TPremain; /* characters before tag is full */ |
Line 422 print_offs(const char *v, int keywords) |
|
Line 423 print_offs(const char *v, int keywords) |
|
{ |
{ |
char buf[24]; |
char buf[24]; |
struct roffsu su; |
struct roffsu su; |
size_t sz; |
int sz; |
|
|
print_line(".RS", MMAN_Bk_susp); |
print_line(".RS", MMAN_Bk_susp); |
|
|
Line 433 print_offs(const char *v, int keywords) |
|
Line 434 print_offs(const char *v, int keywords) |
|
sz = 6; |
sz = 6; |
else if (keywords && !strcmp(v, "indent-two")) |
else if (keywords && !strcmp(v, "indent-two")) |
sz = 12; |
sz = 12; |
else if (a2roffsu(v, &su, SCALE_MAX)) { |
else if (a2roffsu(v, &su, SCALE_EN) > 1) { |
if (SCALE_EN == su.unit) |
if (SCALE_EN == su.unit) |
sz = su.scale; |
sz = su.scale; |
else { |
else { |
Line 458 print_offs(const char *v, int keywords) |
|
Line 459 print_offs(const char *v, int keywords) |
|
if (Bl_stack_len) |
if (Bl_stack_len) |
sz += Bl_stack[Bl_stack_len - 1]; |
sz += Bl_stack[Bl_stack_len - 1]; |
|
|
(void)snprintf(buf, sizeof(buf), "%zun", sz); |
(void)snprintf(buf, sizeof(buf), "%dn", sz); |
print_word(buf); |
print_word(buf); |
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
} |
} |
Line 467 print_offs(const char *v, int keywords) |
|
Line 468 print_offs(const char *v, int keywords) |
|
* Set up the indentation for a list item; used from pre_it(). |
* Set up the indentation for a list item; used from pre_it(). |
*/ |
*/ |
static void |
static void |
print_width(const char *v, const struct mdoc_node *child, size_t defsz) |
print_width(const struct mdoc_bl *bl, const struct mdoc_node *child) |
{ |
{ |
char buf[24]; |
char buf[24]; |
struct roffsu su; |
struct roffsu su; |
size_t sz, chsz; |
int numeric, remain, sz, chsz; |
int numeric, remain; |
|
|
|
numeric = 1; |
numeric = 1; |
remain = 0; |
remain = 0; |
|
|
/* Convert v into a number (of characters). */ |
/* Convert the width into a number (of characters). */ |
if (NULL == v) |
if (bl->width == NULL) |
sz = defsz; |
sz = (bl->type == LIST_hang) ? 6 : 0; |
else if (a2roffsu(v, &su, SCALE_MAX)) { |
else if (a2roffsu(bl->width, &su, SCALE_MAX) > 1) { |
if (SCALE_EN == su.unit) |
if (SCALE_EN == su.unit) |
sz = su.scale; |
sz = su.scale; |
else { |
else { |
Line 488 print_width(const char *v, const struct mdoc_node *chi |
|
Line 488 print_width(const char *v, const struct mdoc_node *chi |
|
numeric = 0; |
numeric = 0; |
} |
} |
} else |
} else |
sz = strlen(v); |
sz = strlen(bl->width); |
|
|
/* XXX Rough estimation, might have multiple parts. */ |
/* XXX Rough estimation, might have multiple parts. */ |
chsz = (NULL != child && MDOC_TEXT == child->type) ? |
if (bl->type == LIST_enum) |
strlen(child->string) : 0; |
chsz = (bl->count > 8) + 1; |
|
else if (child != NULL && child->type == MDOC_TEXT) |
|
chsz = strlen(child->string); |
|
else |
|
chsz = 0; |
|
|
/* Maybe we are inside an enclosing list? */ |
/* Maybe we are inside an enclosing list? */ |
mid_it(); |
mid_it(); |
Line 504 print_width(const char *v, const struct mdoc_node *chi |
|
Line 508 print_width(const char *v, const struct mdoc_node *chi |
|
Bl_stack[Bl_stack_len++] = sz + 2; |
Bl_stack[Bl_stack_len++] = sz + 2; |
|
|
/* Set up the current list. */ |
/* Set up the current list. */ |
if (defsz && chsz > sz) |
if (chsz > sz && bl->type != LIST_tag) |
print_block(".HP", 0); |
print_block(".HP", 0); |
else { |
else { |
print_block(".TP", 0); |
print_block(".TP", 0); |
remain = sz + 2; |
remain = sz + 2; |
} |
} |
if (numeric) { |
if (numeric) { |
(void)snprintf(buf, sizeof(buf), "%zun", sz + 2); |
(void)snprintf(buf, sizeof(buf), "%dn", sz + 2); |
print_word(buf); |
print_word(buf); |
} else |
} else |
print_word(v); |
print_word(bl->width); |
TPremain = remain; |
TPremain = remain; |
} |
} |
|
|
Line 523 print_count(int *count) |
|
Line 527 print_count(int *count) |
|
{ |
{ |
char buf[24]; |
char buf[24]; |
|
|
(void)snprintf(buf, sizeof(buf), "%d.", ++*count); |
(void)snprintf(buf, sizeof(buf), "%d.\\&", ++*count); |
print_word(buf); |
print_word(buf); |
} |
} |
|
|
Line 607 print_node(DECL_ARGS) |
|
Line 611 print_node(DECL_ARGS) |
|
* node. |
* node. |
*/ |
*/ |
act = manacts + n->tok; |
act = manacts + n->tok; |
cond = NULL == act->cond || (*act->cond)(meta, n); |
cond = act->cond == NULL || (*act->cond)(meta, n); |
if (cond && act->pre && ENDBODY_NOT == n->end) |
if (cond && act->pre && (n->end == ENDBODY_NOT || n->nchild)) |
do_sub = (*act->pre)(meta, n); |
do_sub = (*act->pre)(meta, n); |
} |
} |
|
|
|
|
pre_aq(DECL_ARGS) |
pre_aq(DECL_ARGS) |
{ |
{ |
|
|
print_word(n->parent->prev != NULL && |
print_word(n->nchild == 1 && |
n->parent->prev->tok == MDOC_An ? "<" : "\\(la"); |
n->child->tok == MDOC_Mt ? "<" : "\\(la"); |
outflags &= ~MMAN_spc; |
outflags &= ~MMAN_spc; |
return(1); |
return(1); |
} |
} |
Line 886 post_aq(DECL_ARGS) |
|
Line 890 post_aq(DECL_ARGS) |
|
{ |
{ |
|
|
outflags &= ~(MMAN_spc | MMAN_nl); |
outflags &= ~(MMAN_spc | MMAN_nl); |
print_word(n->parent->prev != NULL && |
print_word(n->nchild == 1 && |
n->parent->prev->tok == MDOC_An ? ">" : "\\(ra"); |
n->child->tok == MDOC_Mt ? ">" : "\\(ra"); |
} |
} |
|
|
static int |
static int |
Line 1002 pre_bl(DECL_ARGS) |
|
Line 1006 pre_bl(DECL_ARGS) |
|
return(1); |
return(1); |
} |
} |
|
|
print_line(".TS", MMAN_nl); |
if (n->nchild) { |
for (icol = 0; icol < n->norm->Bl.ncols; icol++) |
print_line(".TS", MMAN_nl); |
print_word("l"); |
for (icol = 0; icol < n->norm->Bl.ncols; icol++) |
print_word("."); |
print_word("l"); |
|
print_word("."); |
|
} |
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
return(1); |
return(1); |
} |
} |
Line 1016 post_bl(DECL_ARGS) |
|
Line 1022 post_bl(DECL_ARGS) |
|
|
|
switch (n->norm->Bl.type) { |
switch (n->norm->Bl.type) { |
case LIST_column: |
case LIST_column: |
print_line(".TE", 0); |
if (n->nchild) |
|
print_line(".TE", 0); |
break; |
break; |
case LIST_enum: |
case LIST_enum: |
n->norm->Bl.count = 0; |
n->norm->Bl.count = 0; |
Line 1123 post_en(DECL_ARGS) |
|
Line 1130 post_en(DECL_ARGS) |
|
return; |
return; |
} |
} |
|
|
|
static int |
|
pre_eo(DECL_ARGS) |
|
{ |
|
|
|
outflags &= ~(MMAN_spc | MMAN_nl); |
|
return(1); |
|
} |
|
|
static void |
static void |
post_eo(DECL_ARGS) |
post_eo(DECL_ARGS) |
{ |
{ |
|
|
if (MDOC_HEAD == n->type || MDOC_BODY == n->type) |
if (n->end != ENDBODY_SPACE) |
outflags &= ~MMAN_spc; |
outflags &= ~MMAN_spc; |
} |
} |
|
|
Line 1353 pre_it(DECL_ARGS) |
|
Line 1368 pre_it(DECL_ARGS) |
|
case LIST_dash: |
case LIST_dash: |
/* FALLTHROUGH */ |
/* FALLTHROUGH */ |
case LIST_hyphen: |
case LIST_hyphen: |
print_width(bln->norm->Bl.width, NULL, 0); |
print_width(&bln->norm->Bl, NULL); |
TPremain = 0; |
TPremain = 0; |
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
font_push('B'); |
font_push('B'); |
Line 1365 pre_it(DECL_ARGS) |
|
Line 1380 pre_it(DECL_ARGS) |
|
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
return(0); |
return(0); |
case LIST_enum: |
case LIST_enum: |
print_width(bln->norm->Bl.width, NULL, 0); |
print_width(&bln->norm->Bl, NULL); |
TPremain = 0; |
TPremain = 0; |
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
print_count(&bln->norm->Bl.count); |
print_count(&bln->norm->Bl.count); |
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
return(0); |
return(0); |
case LIST_hang: |
case LIST_hang: |
print_width(bln->norm->Bl.width, n->child, 6); |
print_width(&bln->norm->Bl, n->child); |
TPremain = 0; |
TPremain = 0; |
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
return(1); |
return(1); |
case LIST_tag: |
case LIST_tag: |
print_width(bln->norm->Bl.width, n->child, 0); |
print_width(&bln->norm->Bl, n->child); |
putchar('\n'); |
putchar('\n'); |
outflags &= ~MMAN_spc; |
outflags &= ~MMAN_spc; |
return(1); |
return(1); |
|
|
|
|
/* Restore the indentation of the enclosing list. */ |
/* Restore the indentation of the enclosing list. */ |
print_line(".RS", MMAN_Bk_susp); |
print_line(".RS", MMAN_Bk_susp); |
(void)snprintf(buf, sizeof(buf), "%zun", |
(void)snprintf(buf, sizeof(buf), "%dn", |
Bl_stack[Bl_stack_len - 1]); |
Bl_stack[Bl_stack_len - 1]); |
print_word(buf); |
print_word(buf); |
|
|
|
|
post_pf(DECL_ARGS) |
post_pf(DECL_ARGS) |
{ |
{ |
|
|
outflags &= ~MMAN_spc; |
if ( ! (n->next == NULL || n->next->flags & MDOC_LINE)) |
|
outflags &= ~MMAN_spc; |
} |
} |
|
|
static int |
static int |