version 1.106, 2017/04/14 18:25:04 |
version 1.134, 2020/02/20 00:29:16 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2011-2017 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2011-2019 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 |
|
|
|
|
#include <assert.h> |
#include <assert.h> |
#include <stdio.h> |
#include <stdio.h> |
|
#include <stdlib.h> |
#include <string.h> |
#include <string.h> |
|
|
#include "mandoc_aux.h" |
#include "mandoc_aux.h" |
|
|
|
|
#define DECL_ARGS const struct roff_meta *meta, struct roff_node *n |
#define DECL_ARGS const struct roff_meta *meta, struct roff_node *n |
|
|
struct manact { |
typedef int (*int_fp)(DECL_ARGS); |
int (*cond)(DECL_ARGS); /* DON'T run actions */ |
typedef void (*void_fp)(DECL_ARGS); |
int (*pre)(DECL_ARGS); /* pre-node action */ |
|
void (*post)(DECL_ARGS); /* post-node action */ |
struct mdoc_man_act { |
|
int_fp cond; /* DON'T run actions */ |
|
int_fp pre; /* pre-node action */ |
|
void_fp post; /* post-node action */ |
const char *prefix; /* pre-node string constant */ |
const char *prefix; /* pre-node string constant */ |
const char *suffix; /* post-node string constant */ |
const char *suffix; /* post-node string constant */ |
}; |
}; |
Line 44 static int cond_body(DECL_ARGS); |
|
Line 48 static int cond_body(DECL_ARGS); |
|
static int cond_head(DECL_ARGS); |
static int cond_head(DECL_ARGS); |
static void font_push(char); |
static void font_push(char); |
static void font_pop(void); |
static void font_pop(void); |
|
static int man_strlen(const char *); |
static void mid_it(void); |
static void mid_it(void); |
static void post__t(DECL_ARGS); |
static void post__t(DECL_ARGS); |
static void post_aq(DECL_ARGS); |
static void post_aq(DECL_ARGS); |
Line 68 static void post_nm(DECL_ARGS); |
|
Line 73 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_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 78 static int pre_bd(DECL_ARGS); |
|
Line 83 static int pre_bd(DECL_ARGS); |
|
static int pre_bf(DECL_ARGS); |
static int pre_bf(DECL_ARGS); |
static int pre_bk(DECL_ARGS); |
static int pre_bk(DECL_ARGS); |
static int pre_bl(DECL_ARGS); |
static int pre_bl(DECL_ARGS); |
static int pre_br(DECL_ARGS); |
static void pre_br(DECL_ARGS); |
static int pre_dl(DECL_ARGS); |
static int pre_dl(DECL_ARGS); |
static int pre_en(DECL_ARGS); |
static int pre_en(DECL_ARGS); |
static int pre_enc(DECL_ARGS); |
static int pre_enc(DECL_ARGS); |
Line 91 static int pre_fd(DECL_ARGS); |
|
Line 96 static int pre_fd(DECL_ARGS); |
|
static int pre_fl(DECL_ARGS); |
static int pre_fl(DECL_ARGS); |
static int pre_fn(DECL_ARGS); |
static int pre_fn(DECL_ARGS); |
static int pre_fo(DECL_ARGS); |
static int pre_fo(DECL_ARGS); |
static int pre_ft(DECL_ARGS); |
static void pre_ft(DECL_ARGS); |
|
static int pre_Ft(DECL_ARGS); |
static int pre_in(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_lk(DECL_ARGS); |
static int pre_li(DECL_ARGS); |
static int pre_li(DECL_ARGS); |
static int pre_ll(DECL_ARGS); |
|
static int pre_nm(DECL_ARGS); |
static int pre_nm(DECL_ARGS); |
static int pre_no(DECL_ARGS); |
static int pre_no(DECL_ARGS); |
|
static void pre_noarg(DECL_ARGS); |
static int pre_ns(DECL_ARGS); |
static int pre_ns(DECL_ARGS); |
|
static void pre_onearg(DECL_ARGS); |
static int pre_pp(DECL_ARGS); |
static int pre_pp(DECL_ARGS); |
static int pre_rs(DECL_ARGS); |
static int pre_rs(DECL_ARGS); |
static int pre_sm(DECL_ARGS); |
static int pre_sm(DECL_ARGS); |
static int pre_sp(DECL_ARGS); |
static void pre_sp(DECL_ARGS); |
static int pre_sect(DECL_ARGS); |
static int pre_sect(DECL_ARGS); |
static int pre_sy(DECL_ARGS); |
static int pre_sy(DECL_ARGS); |
static void pre_syn(const struct roff_node *); |
static void pre_syn(const struct roff_node *); |
|
static void pre_ta(DECL_ARGS); |
static int pre_vt(DECL_ARGS); |
static int pre_vt(DECL_ARGS); |
static int pre_xr(DECL_ARGS); |
static int pre_xr(DECL_ARGS); |
static void print_word(const char *); |
static void print_word(const char *); |
Line 118 static void print_width(const struct mdoc_bl *, |
|
Line 126 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 struct manact manacts[MDOC_MAX + 1] = { |
static const void_fp roff_man_acts[ROFF_MAX] = { |
{ NULL, pre_ap, NULL, NULL, NULL }, /* Ap */ |
pre_br, /* br */ |
|
pre_onearg, /* ce */ |
|
pre_noarg, /* fi */ |
|
pre_ft, /* ft */ |
|
pre_onearg, /* ll */ |
|
pre_onearg, /* mc */ |
|
pre_noarg, /* nf */ |
|
pre_onearg, /* po */ |
|
pre_onearg, /* rj */ |
|
pre_sp, /* sp */ |
|
pre_ta, /* ta */ |
|
pre_onearg, /* ti */ |
|
}; |
|
|
|
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 135 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 157 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ NULL, pre_it, post_it, NULL, NULL }, /* It */ |
{ NULL, pre_it, post_it, NULL, NULL }, /* It */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Ad */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Ad */ |
{ NULL, pre_an, NULL, NULL, NULL }, /* An */ |
{ NULL, pre_an, NULL, NULL, NULL }, /* An */ |
|
{ NULL, pre_ap, NULL, NULL, NULL }, /* Ap */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Ar */ |
{ NULL, pre_em, post_font, NULL, NULL }, /* Ar */ |
{ NULL, pre_sy, post_font, NULL, NULL }, /* Cd */ |
{ NULL, pre_sy, post_font, NULL, NULL }, /* Cd */ |
{ NULL, pre_sy, post_font, NULL, NULL }, /* Cm */ |
{ NULL, pre_sy, post_font, NULL, NULL }, /* Cm */ |
Line 146 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 169 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ NULL, pre_fd, post_fd, NULL, NULL }, /* Fd */ |
{ NULL, pre_fd, post_fd, NULL, NULL }, /* Fd */ |
{ NULL, pre_fl, post_fl, NULL, NULL }, /* Fl */ |
{ NULL, pre_fl, post_fl, NULL, NULL }, /* Fl */ |
{ NULL, pre_fn, post_fn, NULL, NULL }, /* Fn */ |
{ NULL, pre_fn, post_fn, NULL, NULL }, /* Fn */ |
{ NULL, pre_ft, post_font, NULL, NULL }, /* Ft */ |
{ NULL, pre_Ft, post_font, NULL, NULL }, /* Ft */ |
{ NULL, pre_sy, post_font, NULL, NULL }, /* Ic */ |
{ NULL, pre_sy, post_font, NULL, NULL }, /* Ic */ |
{ NULL, pre_in, post_in, NULL, NULL }, /* In */ |
{ NULL, pre_in, post_in, NULL, NULL }, /* In */ |
{ NULL, pre_li, post_font, NULL, NULL }, /* Li */ |
{ NULL, pre_li, post_font, NULL, NULL }, /* 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 */ |
{ 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 179 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 202 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ NULL, pre_bf, post_bf, NULL, NULL }, /* Bf */ |
{ NULL, pre_bf, post_bf, NULL, NULL }, /* Bf */ |
{ cond_body, pre_enc, post_enc, "[", "]" }, /* Bo */ |
{ cond_body, pre_enc, post_enc, "[", "]" }, /* Bo */ |
{ cond_body, pre_enc, post_enc, "[", "]" }, /* Bq */ |
{ cond_body, pre_enc, post_enc, "[", "]" }, /* Bq */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Bsx */ |
{ NULL, pre_bk, post_bk, NULL, NULL }, /* Bsx */ |
{ NULL, NULL, NULL, 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 */ |
{ cond_body, pre_eo, post_eo, NULL, NULL }, /* Eo */ |
{ cond_body, pre_eo, post_eo, NULL, NULL }, /* Eo */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Fx */ |
{ NULL, pre_bk, post_bk, NULL, 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 */ |
{ NULL, pre_ns, NULL, NULL, NULL }, /* Ns */ |
{ NULL, pre_ns, NULL, NULL, NULL }, /* Ns */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Nx */ |
{ NULL, pre_bk, post_bk, NULL, NULL }, /* Nx */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ox */ |
{ NULL, pre_bk, post_bk, NULL, NULL }, /* Ox */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Pc */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Pc */ |
{ NULL, NULL, post_pf, NULL, NULL }, /* Pf */ |
{ NULL, NULL, post_pf, NULL, NULL }, /* Pf */ |
{ cond_body, pre_enc, post_enc, "(", ")" }, /* Po */ |
{ cond_body, pre_enc, post_enc, "(", ")" }, /* Po */ |
Line 226 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 249 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ 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 235 static const struct manact manacts[MDOC_MAX + 1] = { |
|
Line 258 static const struct manact manacts[MDOC_MAX + 1] = { |
|
{ NULL, NULL, post_percent, NULL, NULL }, /* %C */ |
{ NULL, NULL, post_percent, NULL, NULL }, /* %C */ |
{ NULL, pre_skip, NULL, NULL, NULL }, /* Es */ |
{ NULL, pre_skip, NULL, NULL, NULL }, /* Es */ |
{ cond_body, pre_en, post_en, NULL, NULL }, /* En */ |
{ cond_body, pre_en, post_en, NULL, NULL }, /* En */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Dx */ |
{ NULL, pre_bk, post_bk, NULL, NULL }, /* Dx */ |
{ NULL, NULL, post_percent, NULL, NULL }, /* %Q */ |
{ NULL, NULL, post_percent, NULL, NULL }, /* %Q */ |
{ NULL, pre_br, NULL, NULL, NULL }, /* br */ |
|
{ NULL, pre_sp, post_sp, NULL, NULL }, /* sp */ |
|
{ 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 */ |
{ NULL, pre_ll, post_sp, NULL, NULL }, /* ll */ |
{ NULL, pre_skip, NULL, NULL, NULL }, /* Tg */ |
{ NULL, NULL, NULL, NULL, NULL }, /* ROOT */ |
|
}; |
}; |
|
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 |
|
man_strlen(const char *cp) |
|
{ |
|
size_t rsz; |
|
int skip, sz; |
|
|
|
sz = 0; |
|
skip = 0; |
|
for (;;) { |
|
rsz = strcspn(cp, "\\"); |
|
if (rsz) { |
|
cp += rsz; |
|
if (skip) { |
|
skip = 0; |
|
rsz--; |
|
} |
|
sz += rsz; |
|
} |
|
if ('\0' == *cp) |
|
break; |
|
cp++; |
|
switch (mandoc_escape(&cp, NULL, NULL)) { |
|
case ESCAPE_ERROR: |
|
return sz; |
|
case ESCAPE_UNICODE: |
|
case ESCAPE_NUMBERED: |
|
case ESCAPE_SPECIAL: |
|
case ESCAPE_UNDEF: |
|
case ESCAPE_OVERSTRIKE: |
|
if (skip) |
|
skip = 0; |
|
else |
|
sz++; |
|
break; |
|
case ESCAPE_SKIPCHAR: |
|
skip = 1; |
|
break; |
|
default: |
|
break; |
|
} |
|
} |
|
return sz; |
|
} |
|
|
static void |
static void |
font_push(char newfont) |
font_push(char newfont) |
{ |
{ |
|
|
print_line(const char *s, int newflags) |
print_line(const char *s, int newflags) |
{ |
{ |
|
|
outflags &= ~MMAN_br; |
|
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
print_word(s); |
print_word(s); |
outflags |= newflags; |
outflags |= newflags; |
Line 420 print_offs(const char *v, int keywords) |
|
Line 491 print_offs(const char *v, int keywords) |
|
{ |
{ |
char buf[24]; |
char buf[24]; |
struct roffsu su; |
struct roffsu su; |
|
const char *end; |
int sz; |
int sz; |
|
|
print_line(".RS", MMAN_Bk_susp); |
print_line(".RS", MMAN_Bk_susp); |
Line 431 print_offs(const char *v, int keywords) |
|
Line 503 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_EN) > 1) { |
else { |
if (SCALE_EN == su.unit) |
end = a2roffsu(v, &su, SCALE_EN); |
|
if (end == NULL || *end != '\0') |
|
sz = man_strlen(v); |
|
else if (SCALE_EN == su.unit) |
sz = su.scale; |
sz = su.scale; |
else { |
else { |
/* |
/* |
Line 446 print_offs(const char *v, int keywords) |
|
Line 521 print_offs(const char *v, int keywords) |
|
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
return; |
return; |
} |
} |
} else |
} |
sz = strlen(v); |
|
|
|
/* |
/* |
* We are inside an enclosing list. |
* We are inside an enclosing list. |
Line 469 print_width(const struct mdoc_bl *bl, const struct rof |
|
Line 543 print_width(const struct mdoc_bl *bl, const struct rof |
|
{ |
{ |
char buf[24]; |
char buf[24]; |
struct roffsu su; |
struct roffsu su; |
|
const char *end; |
int numeric, remain, sz, chsz; |
int numeric, remain, sz, chsz; |
|
|
numeric = 1; |
numeric = 1; |
Line 477 print_width(const struct mdoc_bl *bl, const struct rof |
|
Line 552 print_width(const struct mdoc_bl *bl, const struct rof |
|
/* Convert the width into a number (of characters). */ |
/* Convert the width into a number (of characters). */ |
if (bl->width == NULL) |
if (bl->width == NULL) |
sz = (bl->type == LIST_hang) ? 6 : 0; |
sz = (bl->type == LIST_hang) ? 6 : 0; |
else if (a2roffsu(bl->width, &su, SCALE_MAX) > 1) { |
else { |
if (SCALE_EN == su.unit) |
end = a2roffsu(bl->width, &su, SCALE_MAX); |
|
if (end == NULL || *end != '\0') |
|
sz = man_strlen(bl->width); |
|
else if (SCALE_EN == su.unit) |
sz = su.scale; |
sz = su.scale; |
else { |
else { |
sz = 0; |
sz = 0; |
numeric = 0; |
numeric = 0; |
} |
} |
} else |
} |
sz = strlen(bl->width); |
|
|
|
/* XXX Rough estimation, might have multiple parts. */ |
/* XXX Rough estimation, might have multiple parts. */ |
if (bl->type == LIST_enum) |
if (bl->type == LIST_enum) |
chsz = (bl->count > 8) + 1; |
chsz = (bl->count > 8) + 1; |
else if (child != NULL && child->type == ROFFT_TEXT) |
else if (child != NULL && child->type == ROFFT_TEXT) |
chsz = strlen(child->string); |
chsz = man_strlen(child->string); |
else |
else |
chsz = 0; |
chsz = 0; |
|
|
Line 529 print_count(int *count) |
|
Line 606 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 560 man_mdoc(void *arg, const struct roff_man *mdoc) |
|
Line 631 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 607 print_node(DECL_ARGS) |
|
Line 678 print_node(DECL_ARGS) |
|
outflags &= ~(MMAN_spc | MMAN_spc_force); |
outflags &= ~(MMAN_spc | MMAN_spc_force); |
else if (outflags & MMAN_Sm) |
else if (outflags & MMAN_Sm) |
outflags |= MMAN_spc; |
outflags |= MMAN_spc; |
|
} else if (n->tok < ROFF_MAX) { |
|
(*roff_man_acts[n->tok])(meta, n); |
|
return; |
} 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 = 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 656 cond_body(DECL_ARGS) |
|
Line 730 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 673 post_enc(DECL_ARGS) |
|
Line 753 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 744 pre_sect(DECL_ARGS) |
|
Line 824 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 860 post_aq(DECL_ARGS) |
|
Line 940 post_aq(DECL_ARGS) |
|
static int |
static int |
pre_bd(DECL_ARGS) |
pre_bd(DECL_ARGS) |
{ |
{ |
|
|
outflags &= ~(MMAN_PP | MMAN_sp | MMAN_br); |
outflags &= ~(MMAN_PP | MMAN_sp | MMAN_br); |
|
|
if (DISP_unfilled == n->norm->Bd.type || |
if (DISP_unfilled == n->norm->Bd.type || |
Line 875 pre_bd(DECL_ARGS) |
|
Line 954 pre_bd(DECL_ARGS) |
|
static void |
static void |
post_bd(DECL_ARGS) |
post_bd(DECL_ARGS) |
{ |
{ |
|
enum roff_tok bef, now; |
|
|
/* Close out this display. */ |
/* Close out this display. */ |
print_line(".RE", MMAN_nl); |
print_line(".RE", MMAN_nl); |
if (DISP_unfilled == n->norm->Bd.type || |
bef = n->flags & NODE_NOFILL ? ROFF_nf : ROFF_fi; |
DISP_literal == n->norm->Bd.type) |
if (n->last == NULL) |
print_line(".fi", MMAN_nl); |
now = n->norm->Bd.type == DISP_unfilled || |
|
n->norm->Bd.type == DISP_literal ? ROFF_nf : ROFF_fi; |
|
else if (n->last->tok == ROFF_nf) |
|
now = ROFF_nf; |
|
else if (n->last->tok == ROFF_fi) |
|
now = ROFF_fi; |
|
else |
|
now = n->last->flags & NODE_NOFILL ? ROFF_nf : ROFF_fi; |
|
if (bef != now) { |
|
outflags |= MMAN_nl; |
|
print_word("."); |
|
outflags &= ~MMAN_spc; |
|
print_word(roff_name[bef]); |
|
outflags |= MMAN_nl; |
|
} |
|
|
/* Maybe we are inside an enclosing list? */ |
/* Maybe we are inside an enclosing list? */ |
if (NULL != n->parent->next) |
if (NULL != n->parent->next) |
Line 924 post_bf(DECL_ARGS) |
|
Line 1018 post_bf(DECL_ARGS) |
|
static int |
static int |
pre_bk(DECL_ARGS) |
pre_bk(DECL_ARGS) |
{ |
{ |
|
|
switch (n->type) { |
switch (n->type) { |
case ROFFT_BLOCK: |
case ROFFT_BLOCK: |
return 1; |
return 1; |
case ROFFT_BODY: |
case ROFFT_BODY: |
|
case ROFFT_ELEM: |
outflags |= MMAN_Bk; |
outflags |= MMAN_Bk; |
return 1; |
return 1; |
default: |
default: |
Line 939 pre_bk(DECL_ARGS) |
|
Line 1033 pre_bk(DECL_ARGS) |
|
static void |
static void |
post_bk(DECL_ARGS) |
post_bk(DECL_ARGS) |
{ |
{ |
|
switch (n->type) { |
if (n->type == ROFFT_BODY) |
case ROFFT_ELEM: |
|
while ((n = n->parent) != NULL) |
|
if (n->tok == MDOC_Bk) |
|
return; |
|
/* FALLTHROUGH */ |
|
case ROFFT_BODY: |
outflags &= ~MMAN_Bk; |
outflags &= ~MMAN_Bk; |
|
break; |
|
default: |
|
break; |
|
} |
} |
} |
|
|
static int |
static int |
Line 1011 post_bl(DECL_ARGS) |
|
Line 1114 post_bl(DECL_ARGS) |
|
|
|
} |
} |
|
|
static int |
static void |
pre_br(DECL_ARGS) |
pre_br(DECL_ARGS) |
{ |
{ |
|
|
outflags |= MMAN_br; |
outflags |= MMAN_br; |
return 0; |
|
} |
} |
|
|
static int |
static int |
Line 1261 post_fo(DECL_ARGS) |
|
Line 1362 post_fo(DECL_ARGS) |
|
} |
} |
|
|
static int |
static int |
pre_ft(DECL_ARGS) |
pre_Ft(DECL_ARGS) |
{ |
{ |
|
|
pre_syn(n); |
pre_syn(n); |
Line 1269 pre_ft(DECL_ARGS) |
|
Line 1370 pre_ft(DECL_ARGS) |
|
return 1; |
return 1; |
} |
} |
|
|
|
static void |
|
pre_ft(DECL_ARGS) |
|
{ |
|
print_line(".ft", 0); |
|
print_word(n->child->string); |
|
outflags |= MMAN_nl; |
|
} |
|
|
static int |
static int |
pre_in(DECL_ARGS) |
pre_in(DECL_ARGS) |
{ |
{ |
Line 1325 pre_it(DECL_ARGS) |
|
Line 1434 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: |
Line 1463 post_lb(DECL_ARGS) |
|
Line 1572 post_lb(DECL_ARGS) |
|
static int |
static int |
pre_lk(DECL_ARGS) |
pre_lk(DECL_ARGS) |
{ |
{ |
const struct roff_node *link, *descr; |
const struct roff_node *link, *descr, *punct; |
|
|
if (NULL == (link = n->child)) |
if ((link = n->child) == NULL) |
return 0; |
return 0; |
|
|
if (NULL != (descr = link->next)) { |
/* Find beginning of trailing punctuation. */ |
|
punct = n->last; |
|
while (punct != link && punct->flags & NODE_DELIMC) |
|
punct = punct->prev; |
|
punct = punct->next; |
|
|
|
/* Link text. */ |
|
if ((descr = link->next) != NULL && descr != punct) { |
font_push('I'); |
font_push('I'); |
while (NULL != descr) { |
while (descr != punct) { |
print_word(descr->string); |
print_word(descr->string); |
descr = descr->next; |
descr = descr->next; |
} |
} |
Line 1478 pre_lk(DECL_ARGS) |
|
Line 1594 pre_lk(DECL_ARGS) |
|
print_word(":"); |
print_word(":"); |
} |
} |
|
|
|
/* Link target. */ |
font_push('B'); |
font_push('B'); |
print_word(link->string); |
print_word(link->string); |
font_pop(); |
font_pop(); |
|
|
|
/* Trailing punctuation. */ |
|
while (punct != NULL) { |
|
print_word(punct->string); |
|
punct = punct->next; |
|
} |
return 0; |
return 0; |
} |
} |
|
|
static int |
static void |
pre_ll(DECL_ARGS) |
pre_onearg(DECL_ARGS) |
{ |
{ |
|
outflags |= MMAN_nl; |
print_line(".ll", 0); |
print_word("."); |
return 1; |
outflags &= ~MMAN_spc; |
|
print_word(roff_name[n->tok]); |
|
if (n->child != NULL) |
|
print_word(n->child->string); |
|
outflags |= MMAN_nl; |
|
if (n->tok == ROFF_ce) |
|
for (n = n->child->next; n != NULL; n = n->next) |
|
print_node(meta, n); |
} |
} |
|
|
static int |
static int |
pre_li(DECL_ARGS) |
pre_li(DECL_ARGS) |
{ |
{ |
|
|
font_push('R'); |
font_push('R'); |
return 1; |
return 1; |
} |
} |
Line 1518 pre_nm(DECL_ARGS) |
|
Line 1647 pre_nm(DECL_ARGS) |
|
if (NULL == n->parent->prev) |
if (NULL == n->parent->prev) |
outflags |= MMAN_sp; |
outflags |= MMAN_sp; |
print_block(".HP", 0); |
print_block(".HP", 0); |
printf(" %zun", strlen(name) + 1); |
printf(" %dn", man_strlen(name) + 1); |
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
} |
} |
font_push('B'); |
font_push('B'); |
Line 1528 pre_nm(DECL_ARGS) |
|
Line 1657 pre_nm(DECL_ARGS) |
|
static void |
static void |
post_nm(DECL_ARGS) |
post_nm(DECL_ARGS) |
{ |
{ |
|
|
switch (n->type) { |
switch (n->type) { |
case ROFFT_BLOCK: |
case ROFFT_BLOCK: |
outflags &= ~MMAN_Bk; |
outflags &= ~MMAN_Bk; |
Line 1546 post_nm(DECL_ARGS) |
|
Line 1674 post_nm(DECL_ARGS) |
|
static int |
static int |
pre_no(DECL_ARGS) |
pre_no(DECL_ARGS) |
{ |
{ |
|
|
outflags |= MMAN_spc_force; |
outflags |= MMAN_spc_force; |
return 1; |
return 1; |
} |
} |
|
|
|
static void |
|
pre_noarg(DECL_ARGS) |
|
{ |
|
outflags |= MMAN_nl; |
|
print_word("."); |
|
outflags &= ~MMAN_spc; |
|
print_word(roff_name[n->tok]); |
|
outflags |= MMAN_nl; |
|
} |
|
|
static int |
static int |
pre_ns(DECL_ARGS) |
pre_ns(DECL_ARGS) |
{ |
{ |
|
|
outflags &= ~MMAN_spc; |
outflags &= ~MMAN_spc; |
return 0; |
return 0; |
} |
} |
Line 1613 pre_sm(DECL_ARGS) |
|
Line 1749 pre_sm(DECL_ARGS) |
|
return 0; |
return 0; |
} |
} |
|
|
static int |
static void |
pre_sp(DECL_ARGS) |
pre_sp(DECL_ARGS) |
{ |
{ |
|
if (outflags & MMAN_PP) { |
if (MMAN_PP & outflags) { |
|
outflags &= ~MMAN_PP; |
outflags &= ~MMAN_PP; |
print_line(".PP", 0); |
print_line(".PP", 0); |
} else |
} else { |
print_line(".sp", 0); |
print_line(".sp", 0); |
return 1; |
if (n->child != NULL) |
} |
print_word(n->child->string); |
|
} |
static void |
|
post_sp(DECL_ARGS) |
|
{ |
|
|
|
outflags |= MMAN_nl; |
outflags |= MMAN_nl; |
} |
} |
|
|
Line 1638 pre_sy(DECL_ARGS) |
|
Line 1769 pre_sy(DECL_ARGS) |
|
|
|
font_push('B'); |
font_push('B'); |
return 1; |
return 1; |
|
} |
|
|
|
static void |
|
pre_ta(DECL_ARGS) |
|
{ |
|
print_line(".ta", 0); |
|
for (n = n->child; n != NULL; n = n->next) |
|
print_word(n->string); |
|
outflags |= MMAN_nl; |
} |
} |
|
|
static int |
static int |