version 1.14, 2017/03/08 19:23:43 |
version 1.32, 2020/01/19 18:02:00 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2017 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2017, 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 |
|
|
#include <assert.h> |
#include <assert.h> |
#include <ctype.h> |
#include <ctype.h> |
#include <stdio.h> |
#include <stdio.h> |
|
#include <stdlib.h> |
#include <string.h> |
#include <string.h> |
|
|
#include "mandoc_aux.h" |
#include "mandoc_aux.h" |
Line 43 static void md_rawword(const char *); |
|
Line 44 static void md_rawword(const char *); |
|
static void md_word(const char *); |
static void md_word(const char *); |
static void md_named(const char *); |
static void md_named(const char *); |
static void md_char(unsigned char); |
static void md_char(unsigned char); |
|
static void md_uri(const char *); |
|
|
static int md_cond_head(struct roff_node *); |
static int md_cond_head(struct roff_node *); |
static int md_cond_body(struct roff_node *); |
static int md_cond_body(struct roff_node *); |
|
|
|
static int md_pre_abort(struct roff_node *); |
static int md_pre_raw(struct roff_node *); |
static int md_pre_raw(struct roff_node *); |
static int md_pre_word(struct roff_node *); |
static int md_pre_word(struct roff_node *); |
static int md_pre_skip(struct roff_node *); |
static int md_pre_skip(struct roff_node *); |
Line 67 static int md_pre_Fo(struct roff_node *); |
|
Line 70 static int md_pre_Fo(struct roff_node *); |
|
static int md_pre_In(struct roff_node *); |
static int md_pre_In(struct roff_node *); |
static int md_pre_It(struct roff_node *); |
static int md_pre_It(struct roff_node *); |
static int md_pre_Lk(struct roff_node *); |
static int md_pre_Lk(struct roff_node *); |
|
static int md_pre_Mt(struct roff_node *); |
static int md_pre_Nd(struct roff_node *); |
static int md_pre_Nd(struct roff_node *); |
static int md_pre_Nm(struct roff_node *); |
static int md_pre_Nm(struct roff_node *); |
static int md_pre_No(struct roff_node *); |
static int md_pre_No(struct roff_node *); |
Line 101 static void md_post_Pf(struct roff_node *); |
|
Line 105 static void md_post_Pf(struct roff_node *); |
|
static void md_post_Vt(struct roff_node *); |
static void md_post_Vt(struct roff_node *); |
static void md_post__T(struct roff_node *); |
static void md_post__T(struct roff_node *); |
|
|
static const struct md_act md_acts[MDOC_MAX + 1] = { |
static const struct md_act md_acts[MDOC_MAX - MDOC_Dd] = { |
{ NULL, md_pre_Ap, NULL, NULL, NULL }, /* Ap */ |
|
{ 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 118 static const struct md_act md_acts[MDOC_MAX + 1] = { |
|
Line 121 static const struct md_act md_acts[MDOC_MAX + 1] = { |
|
{ NULL, md_pre_It, md_post_It, NULL, NULL }, /* It */ |
{ NULL, md_pre_It, md_post_It, NULL, NULL }, /* It */ |
{ NULL, md_pre_raw, md_post_raw, "*", "*" }, /* Ad */ |
{ NULL, md_pre_raw, md_post_raw, "*", "*" }, /* Ad */ |
{ NULL, md_pre_An, NULL, NULL, NULL }, /* An */ |
{ NULL, md_pre_An, NULL, NULL, NULL }, /* An */ |
|
{ NULL, md_pre_Ap, NULL, NULL, NULL }, /* Ap */ |
{ NULL, md_pre_raw, md_post_raw, "*", "*" }, /* Ar */ |
{ NULL, md_pre_raw, md_post_raw, "*", "*" }, /* Ar */ |
{ NULL, md_pre_raw, md_post_raw, "**", "**" }, /* Cd */ |
{ NULL, md_pre_raw, md_post_raw, "**", "**" }, /* Cd */ |
{ NULL, md_pre_raw, md_post_raw, "**", "**" }, /* Cm */ |
{ NULL, md_pre_raw, md_post_raw, "**", "**" }, /* Cm */ |
Line 136 static const struct md_act md_acts[MDOC_MAX + 1] = { |
|
Line 140 static const struct md_act md_acts[MDOC_MAX + 1] = { |
|
{ md_cond_head, md_pre_Nd, NULL, NULL, NULL }, /* Nd */ |
{ md_cond_head, md_pre_Nd, NULL, NULL, NULL }, /* Nd */ |
{ NULL, md_pre_Nm, md_post_Nm, "**", "**" }, /* Nm */ |
{ NULL, md_pre_Nm, md_post_Nm, "**", "**" }, /* Nm */ |
{ md_cond_body, md_pre_word, md_post_word, "[", "]" }, /* Op */ |
{ md_cond_body, md_pre_word, md_post_word, "[", "]" }, /* Op */ |
{ NULL, md_pre_Fd, md_post_raw, "*", "*" }, /* Ot */ |
{ NULL, md_pre_abort, NULL, NULL, NULL }, /* Ot */ |
{ NULL, md_pre_raw, md_post_raw, "*", "*" }, /* Pa */ |
{ NULL, md_pre_raw, md_post_raw, "*", "*" }, /* Pa */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Rv */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Rv */ |
{ NULL, NULL, NULL, NULL, NULL }, /* St */ |
{ NULL, NULL, NULL, NULL, NULL }, /* St */ |
Line 209 static const struct md_act md_acts[MDOC_MAX + 1] = { |
|
Line 213 static const struct md_act md_acts[MDOC_MAX + 1] = { |
|
{ NULL, md_pre_raw, md_post_raw, "*", "*" }, /* Fr */ |
{ NULL, md_pre_raw, md_post_raw, "*", "*" }, /* Fr */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ud */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ud */ |
{ NULL, NULL, md_post_Lb, NULL, NULL }, /* Lb */ |
{ NULL, NULL, md_post_Lb, NULL, NULL }, /* Lb */ |
{ NULL, md_pre_Pp, NULL, NULL, NULL }, /* Lp */ |
{ NULL, md_pre_abort, NULL, NULL, NULL }, /* Lp */ |
{ NULL, md_pre_Lk, NULL, NULL, NULL }, /* Lk */ |
{ NULL, md_pre_Lk, NULL, NULL, NULL }, /* Lk */ |
{ NULL, md_pre_raw, md_post_raw, "<", ">" }, /* Mt */ |
{ NULL, md_pre_Mt, NULL, NULL, NULL }, /* Mt */ |
{ md_cond_body, md_pre_word, md_post_word, "{", "}" }, /* Brq */ |
{ md_cond_body, md_pre_word, md_post_word, "{", "}" }, /* Brq */ |
{ md_cond_body, md_pre_word, md_post_word, "{", "}" }, /* Bro */ |
{ md_cond_body, md_pre_word, md_post_word, "{", "}" }, /* Bro */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Brc */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Brc */ |
Line 220 static const struct md_act md_acts[MDOC_MAX + 1] = { |
|
Line 224 static const struct md_act md_acts[MDOC_MAX + 1] = { |
|
{ md_cond_body, md_pre_En, md_post_En, NULL, NULL }, /* En */ |
{ md_cond_body, md_pre_En, md_post_En, NULL, NULL }, /* En */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Dx */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Dx */ |
{ NULL, NULL, md_post_pc, NULL, NULL }, /* %Q */ |
{ NULL, NULL, md_post_pc, NULL, NULL }, /* %Q */ |
{ NULL, md_pre_br, NULL, NULL, NULL }, /* br */ |
|
{ NULL, md_pre_Pp, NULL, NULL, NULL }, /* sp */ |
|
{ NULL, md_pre_Lk, md_post_pc, NULL, NULL }, /* %U */ |
{ NULL, md_pre_Lk, md_post_pc, NULL, NULL }, /* %U */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ta */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Ta */ |
{ NULL, NULL, NULL, NULL, NULL }, /* ll */ |
{ NULL, NULL, NULL, NULL, NULL }, /* Tg */ |
{ NULL, NULL, NULL, NULL, NULL }, /* ROOT */ |
|
}; |
}; |
|
static const struct md_act *md_act(enum roff_tok); |
|
|
static int outflags; |
static int outflags; |
#define MD_spc (1 << 0) /* Blank character before next word. */ |
#define MD_spc (1 << 0) /* Blank character before next word. */ |
Line 251 static int escflags; /* Escape in generated markdown |
|
Line 253 static int escflags; /* Escape in generated markdown |
|
static int code_blocks, quote_blocks, list_blocks; |
static int code_blocks, quote_blocks, list_blocks; |
static int outcount; |
static int outcount; |
|
|
|
|
|
static const struct md_act * |
|
md_act(enum roff_tok tok) |
|
{ |
|
assert(tok >= MDOC_Dd && tok <= MDOC_MAX); |
|
return md_acts + (tok - MDOC_Dd); |
|
} |
|
|
void |
void |
markdown_mdoc(void *arg, const struct roff_man *mdoc) |
markdown_mdoc(void *arg, const struct roff_meta *mdoc) |
{ |
{ |
outflags = MD_Sm; |
outflags = MD_Sm; |
md_word(mdoc->meta.title); |
md_word(mdoc->title); |
if (mdoc->meta.msec != NULL) { |
if (mdoc->msec != NULL) { |
outflags &= ~MD_spc; |
outflags &= ~MD_spc; |
md_word("("); |
md_word("("); |
md_word(mdoc->meta.msec); |
md_word(mdoc->msec); |
md_word(")"); |
md_word(")"); |
} |
} |
md_word("-"); |
md_word("-"); |
md_word(mdoc->meta.vol); |
md_word(mdoc->vol); |
if (mdoc->meta.arch != NULL) { |
if (mdoc->arch != NULL) { |
md_word("("); |
md_word("("); |
md_word(mdoc->meta.arch); |
md_word(mdoc->arch); |
md_word(")"); |
md_word(")"); |
} |
} |
outflags |= MD_sp; |
outflags |= MD_sp; |
Line 274 markdown_mdoc(void *arg, const struct roff_man *mdoc) |
|
Line 284 markdown_mdoc(void *arg, const struct roff_man *mdoc) |
|
md_nodelist(mdoc->first->child); |
md_nodelist(mdoc->first->child); |
|
|
outflags |= MD_sp; |
outflags |= MD_sp; |
md_word(mdoc->meta.os); |
md_word(mdoc->os); |
md_word("-"); |
md_word("-"); |
md_word(mdoc->meta.date); |
md_word(mdoc->date); |
putchar('\n'); |
putchar('\n'); |
} |
} |
|
|
Line 295 md_node(struct roff_node *n) |
|
Line 305 md_node(struct roff_node *n) |
|
const struct md_act *act; |
const struct md_act *act; |
int cond, process_children; |
int cond, process_children; |
|
|
if (n->flags & NODE_NOPRT) |
if (n->type == ROFFT_COMMENT || n->flags & NODE_NOPRT) |
return; |
return; |
|
|
if (outflags & MD_nonl) |
if (outflags & MD_nonl) |
Line 308 md_node(struct roff_node *n) |
|
Line 318 md_node(struct roff_node *n) |
|
process_children = 1; |
process_children = 1; |
n->flags &= ~NODE_ENDED; |
n->flags &= ~NODE_ENDED; |
|
|
switch (n->type) { |
if (n->type == ROFFT_TEXT) { |
case ROFFT_TEXT: |
|
if (n->flags & NODE_DELIMC) |
if (n->flags & NODE_DELIMC) |
outflags &= ~(MD_spc | MD_spc_force); |
outflags &= ~(MD_spc | MD_spc_force); |
else if (outflags & MD_Sm) |
else if (outflags & MD_Sm) |
Line 319 md_node(struct roff_node *n) |
|
Line 328 md_node(struct roff_node *n) |
|
outflags &= ~(MD_spc | MD_spc_force); |
outflags &= ~(MD_spc | MD_spc_force); |
else if (outflags & MD_Sm) |
else if (outflags & MD_Sm) |
outflags |= MD_spc; |
outflags |= MD_spc; |
break; |
} else if (n->tok < ROFF_MAX) { |
default: |
switch (n->tok) { |
act = md_acts + n->tok; |
case ROFF_br: |
|
process_children = md_pre_br(n); |
|
break; |
|
case ROFF_sp: |
|
process_children = md_pre_Pp(n); |
|
break; |
|
default: |
|
process_children = 0; |
|
break; |
|
} |
|
} else { |
|
act = md_act(n->tok); |
cond = act->cond == NULL || (*act->cond)(n); |
cond = act->cond == NULL || (*act->cond)(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)) |
process_children = (*act->pre)(n); |
process_children = (*act->pre)(n); |
break; |
|
} |
} |
|
|
if (process_children && n->child != NULL) |
if (process_children && n->child != NULL) |
Line 484 md_word(const char *s) |
|
Line 503 md_word(const char *s) |
|
{ |
{ |
const char *seq, *prevfont, *currfont, *nextfont; |
const char *seq, *prevfont, *currfont, *nextfont; |
char c; |
char c; |
int bs, sz, uc; |
int bs, sz, uc, breakline; |
|
|
/* No spacing before closing delimiters. */ |
/* No spacing before closing delimiters. */ |
if (s[0] != '\0' && s[1] == '\0' && |
if (s[0] != '\0' && s[1] == '\0' && |
Line 501 md_word(const char *s) |
|
Line 520 md_word(const char *s) |
|
if ((s[0] == '(' || s[0] == '[') && s[1] == '\0') |
if ((s[0] == '(' || s[0] == '[') && s[1] == '\0') |
outflags &= ~MD_spc; |
outflags &= ~MD_spc; |
|
|
|
breakline = 0; |
prevfont = currfont = ""; |
prevfont = currfont = ""; |
while ((c = *s++) != '\0') { |
while ((c = *s++) != '\0') { |
bs = 0; |
bs = 0; |
Line 570 md_word(const char *s) |
|
Line 590 md_word(const char *s) |
|
case ESCAPE_SPECIAL: |
case ESCAPE_SPECIAL: |
uc = mchars_spec2cp(seq, sz); |
uc = mchars_spec2cp(seq, sz); |
break; |
break; |
|
case ESCAPE_UNDEF: |
|
uc = *seq; |
|
break; |
|
case ESCAPE_DEVICE: |
|
md_rawword("markdown"); |
|
continue; |
case ESCAPE_FONTBOLD: |
case ESCAPE_FONTBOLD: |
nextfont = "**"; |
nextfont = "**"; |
break; |
break; |
Line 580 md_word(const char *s) |
|
Line 606 md_word(const char *s) |
|
nextfont = "***"; |
nextfont = "***"; |
break; |
break; |
case ESCAPE_FONT: |
case ESCAPE_FONT: |
|
case ESCAPE_FONTCW: |
case ESCAPE_FONTROMAN: |
case ESCAPE_FONTROMAN: |
nextfont = ""; |
nextfont = ""; |
break; |
break; |
case ESCAPE_FONTPREV: |
case ESCAPE_FONTPREV: |
nextfont = prevfont; |
nextfont = prevfont; |
break; |
break; |
|
case ESCAPE_BREAK: |
|
breakline = 1; |
|
break; |
case ESCAPE_NOSPACE: |
case ESCAPE_NOSPACE: |
case ESCAPE_SKIPCHAR: |
case ESCAPE_SKIPCHAR: |
case ESCAPE_OVERSTRIKE: |
case ESCAPE_OVERSTRIKE: |
Line 633 md_word(const char *s) |
|
Line 663 md_word(const char *s) |
|
if (bs) |
if (bs) |
putchar('\\'); |
putchar('\\'); |
md_char(c); |
md_char(c); |
|
if (breakline && |
|
(*s == '\0' || *s == ' ' || *s == ASCII_NBRSP)) { |
|
printf(" \n"); |
|
breakline = 0; |
|
while (*s == ' ' || *s == ASCII_NBRSP) |
|
s++; |
|
} |
} |
} |
if (*currfont != '\0') { |
if (*currfont != '\0') { |
outflags &= ~MD_spc; |
outflags &= ~MD_spc; |
Line 692 md_cond_body(struct roff_node *n) |
|
Line 729 md_cond_body(struct roff_node *n) |
|
} |
} |
|
|
static int |
static int |
|
md_pre_abort(struct roff_node *n) |
|
{ |
|
abort(); |
|
} |
|
|
|
static int |
md_pre_raw(struct roff_node *n) |
md_pre_raw(struct roff_node *n) |
{ |
{ |
const char *prefix; |
const char *prefix; |
|
|
if ((prefix = md_acts[n->tok].prefix) != NULL) { |
if ((prefix = md_act(n->tok)->prefix) != NULL) { |
md_rawword(prefix); |
md_rawword(prefix); |
outflags &= ~MD_spc; |
outflags &= ~MD_spc; |
if (*prefix == '`') |
if (*prefix == '`') |
Line 710 md_post_raw(struct roff_node *n) |
|
Line 753 md_post_raw(struct roff_node *n) |
|
{ |
{ |
const char *suffix; |
const char *suffix; |
|
|
if ((suffix = md_acts[n->tok].suffix) != NULL) { |
if ((suffix = md_act(n->tok)->suffix) != NULL) { |
outflags &= ~(MD_spc | MD_nl); |
outflags &= ~(MD_spc | MD_nl); |
md_rawword(suffix); |
md_rawword(suffix); |
if (*suffix == '`') |
if (*suffix == '`') |
Line 723 md_pre_word(struct roff_node *n) |
|
Line 766 md_pre_word(struct roff_node *n) |
|
{ |
{ |
const char *prefix; |
const char *prefix; |
|
|
if ((prefix = md_acts[n->tok].prefix) != NULL) { |
if ((prefix = md_act(n->tok)->prefix) != NULL) { |
md_word(prefix); |
md_word(prefix); |
outflags &= ~MD_spc; |
outflags &= ~MD_spc; |
} |
} |
Line 735 md_post_word(struct roff_node *n) |
|
Line 778 md_post_word(struct roff_node *n) |
|
{ |
{ |
const char *suffix; |
const char *suffix; |
|
|
if ((suffix = md_acts[n->tok].suffix) != NULL) { |
if ((suffix = md_act(n->tok)->suffix) != NULL) { |
outflags &= ~(MD_spc | MD_nl); |
outflags &= ~(MD_spc | MD_nl); |
md_word(suffix); |
md_word(suffix); |
} |
} |
Line 1248 md_post_It(struct roff_node *n) |
|
Line 1291 md_post_It(struct roff_node *n) |
|
while ((n = n->prev) != NULL && n->type != ROFFT_HEAD) |
while ((n = n->prev) != NULL && n->type != ROFFT_HEAD) |
i++; |
i++; |
|
|
/* |
/* |
* If a width was specified for this column, |
* If a width was specified for this column, |
* subtract what printed, and |
* subtract what printed, and |
* add the same spacing as in mdoc_term.c. |
* add the same spacing as in mdoc_term.c. |
Line 1279 md_post_Lb(struct roff_node *n) |
|
Line 1322 md_post_Lb(struct roff_node *n) |
|
outflags |= MD_br; |
outflags |= MD_br; |
} |
} |
|
|
|
static void |
|
md_uri(const char *s) |
|
{ |
|
while (*s != '\0') { |
|
if (strchr("%()<>", *s) != NULL) { |
|
printf("%%%2.2hhX", *s); |
|
outcount += 3; |
|
} else { |
|
putchar(*s); |
|
outcount++; |
|
} |
|
s++; |
|
} |
|
} |
|
|
static int |
static int |
md_pre_Lk(struct roff_node *n) |
md_pre_Lk(struct roff_node *n) |
{ |
{ |
const struct roff_node *link, *descr; |
const struct roff_node *link, *descr, *punct; |
const unsigned char *s; |
|
|
|
if ((link = n->child) == NULL) |
if ((link = n->child) == NULL) |
return 0; |
return 0; |
|
|
if ((descr = link->next) != NULL) { |
/* Find beginning of trailing punctuation. */ |
md_rawword("["); |
punct = n->last; |
outflags &= ~MD_spc; |
while (punct != link && punct->flags & NODE_DELIMC) |
while (descr != NULL) { |
punct = punct->prev; |
md_word(descr->string); |
punct = punct->next; |
descr = descr->next; |
|
} |
|
outflags &= ~MD_spc; |
|
md_rawword("]("); |
|
} else |
|
md_rawword("<"); |
|
|
|
for (s = link->string; *s != '\0'; s++) { |
/* Link text. */ |
if (strchr("%()<>", *s) != NULL) { |
descr = link->next; |
printf("%%%2.2hhX", *s); |
if (descr == punct) |
outcount += 3; |
descr = link; /* no text */ |
} else { |
md_rawword("["); |
putchar(*s); |
outflags &= ~MD_spc; |
|
do { |
|
md_word(descr->string); |
|
descr = descr->next; |
|
} while (descr != punct); |
|
outflags &= ~MD_spc; |
|
|
|
/* Link target. */ |
|
md_rawword("]("); |
|
md_uri(link->string); |
|
outflags &= ~MD_spc; |
|
md_rawword(")"); |
|
|
|
/* Trailing punctuation. */ |
|
while (punct != NULL) { |
|
md_word(punct->string); |
|
punct = punct->next; |
|
} |
|
return 0; |
|
} |
|
|
|
static int |
|
md_pre_Mt(struct roff_node *n) |
|
{ |
|
const struct roff_node *nch; |
|
|
|
md_rawword("["); |
|
outflags &= ~MD_spc; |
|
for (nch = n->child; nch != NULL; nch = nch->next) |
|
md_word(nch->string); |
|
outflags &= ~MD_spc; |
|
md_rawword("](mailto:"); |
|
for (nch = n->child; nch != NULL; nch = nch->next) { |
|
md_uri(nch->string); |
|
if (nch->next != NULL) { |
|
putchar(' '); |
outcount++; |
outcount++; |
} |
} |
} |
} |
|
|
outflags &= ~MD_spc; |
outflags &= ~MD_spc; |
md_rawword(link->next == NULL ? ">" : ")"); |
md_rawword(")"); |
return 0; |
return 0; |
} |
} |
|
|