version 1.121, 2017/06/14 13:00:31 |
version 1.131, 2018/12/30 00:49:55 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2011-2017 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2011-2018 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 |
|
|
typedef int (*int_fp)(DECL_ARGS); |
typedef int (*int_fp)(DECL_ARGS); |
typedef void (*void_fp)(DECL_ARGS); |
typedef void (*void_fp)(DECL_ARGS); |
|
|
struct manact { |
struct mdoc_man_act { |
int_fp cond; /* DON'T run actions */ |
int_fp cond; /* DON'T run actions */ |
int_fp pre; /* pre-node action */ |
int_fp pre; /* pre-node action */ |
void_fp post; /* post-node action */ |
void_fp post; /* post-node action */ |
Line 75 static void post_pf(DECL_ARGS); |
|
Line 75 static void post_pf(DECL_ARGS); |
|
static void post_sect(DECL_ARGS); |
static void post_sect(DECL_ARGS); |
static void post_vt(DECL_ARGS); |
static void post_vt(DECL_ARGS); |
static int pre__t(DECL_ARGS); |
static int pre__t(DECL_ARGS); |
|
static int pre_abort(DECL_ARGS); |
static int pre_an(DECL_ARGS); |
static int pre_an(DECL_ARGS); |
static int pre_ap(DECL_ARGS); |
static int pre_ap(DECL_ARGS); |
static int pre_aq(DECL_ARGS); |
static int pre_aq(DECL_ARGS); |
Line 124 static void print_width(const struct mdoc_bl *, |
|
Line 125 static void print_width(const struct mdoc_bl *, |
|
static void print_count(int *); |
static void print_count(int *); |
static void print_node(DECL_ARGS); |
static void print_node(DECL_ARGS); |
|
|
static const void_fp roff_manacts[ROFF_MAX] = { |
static const void_fp roff_man_acts[ROFF_MAX] = { |
pre_br, /* br */ |
pre_br, /* br */ |
pre_onearg, /* ce */ |
pre_onearg, /* ce */ |
pre_ft, /* ft */ |
pre_ft, /* ft */ |
pre_onearg, /* ll */ |
pre_onearg, /* ll */ |
pre_onearg, /* mc */ |
pre_onearg, /* mc */ |
|
pre_onearg, /* po */ |
pre_onearg, /* rj */ |
pre_onearg, /* rj */ |
pre_sp, /* sp */ |
pre_sp, /* sp */ |
pre_ta, /* ta */ |
pre_ta, /* ta */ |
pre_onearg, /* ti */ |
pre_onearg, /* ti */ |
}; |
}; |
|
|
static const struct manact __manacts[MDOC_MAX - MDOC_Dd] = { |
static const struct mdoc_man_act mdoc_man_acts[MDOC_MAX - MDOC_Dd] = { |
{ NULL, NULL, NULL, NULL, NULL }, /* Dd */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Dd */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Dt */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Dt */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Os */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Os */ |
Line 171 static const struct manact __manacts[MDOC_MAX - MDOC_D |
|
Line 173 static const struct manact __manacts[MDOC_MAX - MDOC_D |
|
{ 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 */ |
{ cond_body, pre_enc, post_enc, "[", "]" }, /* Op */ |
{ cond_body, pre_enc, post_enc, "[", "]" }, /* Op */ |
{ NULL, pre_Ft, post_font, NULL, NULL }, /* Ot */ |
{ NULL, pre_abort, NULL, NULL, NULL }, /* Ot */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Pa */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Pa */ |
{ NULL, pre_ex, NULL, NULL, NULL }, /* Rv */ |
{ NULL, pre_ex, NULL, NULL, NULL }, /* Rv */ |
{ NULL, NULL, NULL, NULL, NULL }, /* St */ |
{ NULL, NULL, NULL, NULL, NULL }, /* St */ |
Line 201 static const struct manact __manacts[MDOC_MAX - MDOC_D |
|
Line 203 static const struct manact __manacts[MDOC_MAX - MDOC_D |
|
{ NULL, pre_bk, post_bk, NULL, NULL }, /* Bx */ |
{ NULL, pre_bk, post_bk, NULL, NULL }, /* Bx */ |
{ NULL, pre_skip, NULL, NULL, NULL }, /* Db */ |
{ NULL, pre_skip, NULL, NULL, NULL }, /* Db */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Dc */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Dc */ |
{ cond_body, pre_enc, post_enc, "\\(Lq", "\\(Rq" }, /* Do */ |
{ cond_body, pre_enc, post_enc, "\\(lq", "\\(rq" }, /* Do */ |
{ cond_body, pre_enc, post_enc, "\\(Lq", "\\(Rq" }, /* Dq */ |
{ cond_body, pre_enc, post_enc, "\\(lq", "\\(rq" }, /* Dq */ |
{ 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 */ |
Line 244 static const struct manact __manacts[MDOC_MAX - MDOC_D |
|
Line 246 static const struct manact __manacts[MDOC_MAX - MDOC_D |
|
{ NULL, pre_em, post_font, NULL, NULL }, /* Fr */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Fr */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ud */ |
{ NULL, NULL, NULL, NULL, 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_abort, NULL, NULL, NULL }, /* Lp */ |
{ NULL, pre_lk, NULL, NULL, NULL }, /* Lk */ |
{ NULL, pre_lk, NULL, NULL, NULL }, /* Lk */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Mt */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Mt */ |
{ cond_body, pre_enc, post_enc, "{", "}" }, /* Brq */ |
{ cond_body, pre_enc, post_enc, "{", "}" }, /* Brq */ |
Line 258 static const struct manact __manacts[MDOC_MAX - MDOC_D |
|
Line 260 static const struct manact __manacts[MDOC_MAX - MDOC_D |
|
{ NULL, NULL, post_percent, NULL, NULL }, /* %U */ |
{ NULL, NULL, post_percent, NULL, NULL }, /* %U */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ta */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ta */ |
}; |
}; |
static const struct manact *const manacts = __manacts - MDOC_Dd; |
static const struct mdoc_man_act *mdoc_man_act(enum roff_tok); |
|
|
static int outflags; |
static int outflags; |
#define MMAN_spc (1 << 0) /* blank character before next word */ |
#define MMAN_spc (1 << 0) /* blank character before next word */ |
|
|
} fontqueue; |
} fontqueue; |
|
|
|
|
|
static const struct mdoc_man_act * |
|
mdoc_man_act(enum roff_tok tok) |
|
{ |
|
assert(tok >= MDOC_Dd && tok <= MDOC_MAX); |
|
return mdoc_man_acts + (tok - MDOC_Dd); |
|
} |
|
|
static int |
static int |
man_strlen(const char *cp) |
man_strlen(const char *cp) |
{ |
{ |
Line 316 man_strlen(const char *cp) |
|
Line 325 man_strlen(const char *cp) |
|
case ESCAPE_UNICODE: |
case ESCAPE_UNICODE: |
case ESCAPE_NUMBERED: |
case ESCAPE_NUMBERED: |
case ESCAPE_SPECIAL: |
case ESCAPE_SPECIAL: |
|
case ESCAPE_UNDEF: |
case ESCAPE_OVERSTRIKE: |
case ESCAPE_OVERSTRIKE: |
if (skip) |
if (skip) |
skip = 0; |
skip = 0; |
Line 592 print_count(int *count) |
|
Line 602 print_count(int *count) |
|
} |
} |
|
|
void |
void |
man_man(void *arg, const struct roff_man *man) |
man_mdoc(void *arg, const struct roff_meta *mdoc) |
{ |
{ |
|
|
/* |
|
* Dump the keep buffer. |
|
* We're guaranteed by now that this exists (is non-NULL). |
|
* Flush stdout afterward, just in case. |
|
*/ |
|
fputs(mparse_getkeep(man_mparse(man)), stdout); |
|
fflush(stdout); |
|
} |
|
|
|
void |
|
man_mdoc(void *arg, const struct roff_man *mdoc) |
|
{ |
|
struct roff_node *n; |
struct roff_node *n; |
|
|
|
printf(".\\\" Automatically generated from an mdoc input file." |
|
" Do not edit.\n"); |
|
for (n = mdoc->first->child; n != NULL; n = n->next) { |
|
if (n->type != ROFFT_COMMENT) |
|
break; |
|
printf(".\\\"%s\n", n->string); |
|
} |
|
|
printf(".TH \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"\n", |
printf(".TH \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"\n", |
mdoc->meta.title, |
mdoc->title, (mdoc->msec == NULL ? "" : mdoc->msec), |
(mdoc->meta.msec == NULL ? "" : mdoc->meta.msec), |
mdoc->date, mdoc->os, mdoc->vol); |
mdoc->meta.date, mdoc->meta.os, mdoc->meta.vol); |
|
|
|
/* Disable hyphenation and if nroff, disable justification. */ |
/* Disable hyphenation and if nroff, disable justification. */ |
printf(".nh\n.if n .ad l"); |
printf(".nh\n.if n .ad l"); |
Line 623 man_mdoc(void *arg, const struct roff_man *mdoc) |
|
Line 627 man_mdoc(void *arg, const struct roff_man *mdoc) |
|
fontqueue.head = fontqueue.tail = mandoc_malloc(8); |
fontqueue.head = fontqueue.tail = mandoc_malloc(8); |
*fontqueue.tail = 'R'; |
*fontqueue.tail = 'R'; |
} |
} |
for (n = mdoc->first->child; n != NULL; n = n->next) |
for (; n != NULL; n = n->next) |
print_node(&mdoc->meta, n); |
print_node(mdoc, n); |
putchar('\n'); |
putchar('\n'); |
} |
} |
|
|
static void |
static void |
print_node(DECL_ARGS) |
print_node(DECL_ARGS) |
{ |
{ |
const struct manact *act; |
const struct mdoc_man_act *act; |
struct roff_node *sub; |
struct roff_node *sub; |
int cond, do_sub; |
int cond, do_sub; |
|
|
if (n->flags & NODE_NOPRT) |
if (n->flags & NODE_NOPRT) |
return; |
return; |
Line 671 print_node(DECL_ARGS) |
|
Line 675 print_node(DECL_ARGS) |
|
else if (outflags & MMAN_Sm) |
else if (outflags & MMAN_Sm) |
outflags |= MMAN_spc; |
outflags |= MMAN_spc; |
} else if (n->tok < ROFF_MAX) { |
} else if (n->tok < ROFF_MAX) { |
(*roff_manacts[n->tok])(meta, n); |
(*roff_man_acts[n->tok])(meta, n); |
return; |
return; |
} else { |
} else { |
assert(n->tok >= MDOC_Dd && n->tok < MDOC_MAX); |
|
/* |
/* |
* 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 = mdoc_man_act(n->tok); |
cond = act->cond == NULL || (*act->cond)(meta, n); |
cond = act->cond == NULL || (*act->cond)(meta, n); |
if (cond && act->pre != NULL && |
if (cond && act->pre != NULL && |
(n->end == ENDBODY_NOT || n->child != NULL)) |
(n->end == ENDBODY_NOT || n->child != NULL)) |
Line 723 cond_body(DECL_ARGS) |
|
Line 726 cond_body(DECL_ARGS) |
|
} |
} |
|
|
static int |
static int |
|
pre_abort(DECL_ARGS) |
|
{ |
|
abort(); |
|
} |
|
|
|
static int |
pre_enc(DECL_ARGS) |
pre_enc(DECL_ARGS) |
{ |
{ |
const char *prefix; |
const char *prefix; |
|
|
prefix = manacts[n->tok].prefix; |
prefix = mdoc_man_act(n->tok)->prefix; |
if (NULL == prefix) |
if (NULL == prefix) |
return 1; |
return 1; |
print_word(prefix); |
print_word(prefix); |
Line 740 post_enc(DECL_ARGS) |
|
Line 749 post_enc(DECL_ARGS) |
|
{ |
{ |
const char *suffix; |
const char *suffix; |
|
|
suffix = manacts[n->tok].suffix; |
suffix = mdoc_man_act(n->tok)->suffix; |
if (NULL == suffix) |
if (NULL == suffix) |
return; |
return; |
outflags &= ~(MMAN_spc | MMAN_nl); |
outflags &= ~(MMAN_spc | MMAN_nl); |
|
|
post_percent(DECL_ARGS) |
post_percent(DECL_ARGS) |
{ |
{ |
|
|
if (pre_em == manacts[n->tok].pre) |
if (mdoc_man_act(n->tok)->pre == pre_em) |
font_pop(); |
font_pop(); |
if (n->next) { |
if (n->next) { |
print_word(","); |
print_word(","); |
Line 811 pre_sect(DECL_ARGS) |
|
Line 820 pre_sect(DECL_ARGS) |
|
|
|
if (n->type == ROFFT_HEAD) { |
if (n->type == ROFFT_HEAD) { |
outflags |= MMAN_sp; |
outflags |= MMAN_sp; |
print_block(manacts[n->tok].prefix, 0); |
print_block(mdoc_man_act(n->tok)->prefix, 0); |
print_word(""); |
print_word(""); |
putchar('\"'); |
putchar('\"'); |
outflags &= ~MMAN_spc; |
outflags &= ~MMAN_spc; |
Line 1407 pre_it(DECL_ARGS) |
|
Line 1416 pre_it(DECL_ARGS) |
|
if (bln->norm->Bl.type == LIST_diag) |
if (bln->norm->Bl.type == LIST_diag) |
print_line(".B \"", 0); |
print_line(".B \"", 0); |
else |
else |
print_line(".R \"", 0); |
print_line(".BR \\& \"", 0); |
outflags &= ~MMAN_spc; |
outflags &= ~MMAN_spc; |
return 1; |
return 1; |
case LIST_bullet: |
case LIST_bullet: |
|
|
pre_lk(DECL_ARGS) |
pre_lk(DECL_ARGS) |
{ |
{ |
const struct roff_node *link, *descr, *punct; |
const struct roff_node *link, *descr, *punct; |
int display; |
|
|
|
if ((link = n->child) == NULL) |
if ((link = n->child) == NULL) |
return 0; |
return 0; |
Line 1569 pre_lk(DECL_ARGS) |
|
Line 1577 pre_lk(DECL_ARGS) |
|
} |
} |
|
|
/* Link target. */ |
/* Link target. */ |
display = man_strlen(link->string) >= 26; |
|
if (display) { |
|
print_line(".RS", MMAN_Bk_susp); |
|
print_word("6n"); |
|
outflags |= MMAN_nl; |
|
} |
|
font_push('B'); |
font_push('B'); |
print_word(link->string); |
print_word(link->string); |
font_pop(); |
font_pop(); |
Line 1584 pre_lk(DECL_ARGS) |
|
Line 1586 pre_lk(DECL_ARGS) |
|
print_word(punct->string); |
print_word(punct->string); |
punct = punct->next; |
punct = punct->next; |
} |
} |
if (display) |
|
print_line(".RE", MMAN_nl); |
|
return 0; |
return 0; |
} |
} |
|
|