version 1.116, 2017/04/24 23:06:18 |
version 1.127, 2018/08/17 20:33:37 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2012-2015, 2017 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2012-2015, 2017, 2018 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2013 Franco Fichtner <franco@lastsummer.de> |
* Copyright (c) 2013 Franco Fichtner <franco@lastsummer.de> |
* |
* |
* Permission to use, copy, modify, and distribute this software for any |
* Permission to use, copy, modify, and distribute this software for any |
Line 40 static int man_args(struct roff_man *, int, |
|
Line 40 static int man_args(struct roff_man *, int, |
|
int *, char *, char **); |
int *, char *, char **); |
static void rew_scope(struct roff_man *, enum roff_tok); |
static void rew_scope(struct roff_man *, enum roff_tok); |
|
|
const struct man_macro __man_macros[MAN_MAX - MAN_TH] = { |
static const struct man_macro man_macros[MAN_MAX - MAN_TH] = { |
{ in_line_eoln, MAN_BSCOPE }, /* TH */ |
{ in_line_eoln, MAN_BSCOPE }, /* TH */ |
{ blk_imp, MAN_BSCOPE | MAN_SCOPED }, /* SH */ |
{ blk_imp, MAN_BSCOPE | MAN_SCOPED }, /* SH */ |
{ blk_imp, MAN_BSCOPE | MAN_SCOPED }, /* SS */ |
{ blk_imp, MAN_BSCOPE | MAN_SCOPED }, /* SS */ |
{ blk_imp, MAN_BSCOPE | MAN_SCOPED }, /* TP */ |
{ blk_imp, MAN_BSCOPE | MAN_SCOPED }, /* TP */ |
|
{ blk_imp, MAN_BSCOPE | MAN_SCOPED }, /* TQ */ |
{ blk_imp, MAN_BSCOPE }, /* LP */ |
{ blk_imp, MAN_BSCOPE }, /* LP */ |
{ blk_imp, MAN_BSCOPE }, /* PP */ |
{ blk_imp, MAN_BSCOPE }, /* PP */ |
{ blk_imp, MAN_BSCOPE }, /* P */ |
{ blk_imp, MAN_BSCOPE }, /* P */ |
Line 61 const struct man_macro __man_macros[MAN_MAX - MAN_TH] |
|
Line 62 const struct man_macro __man_macros[MAN_MAX - MAN_TH] |
|
{ in_line_eoln, MAN_SCOPED | MAN_JOIN }, /* I */ |
{ in_line_eoln, MAN_SCOPED | MAN_JOIN }, /* I */ |
{ in_line_eoln, 0 }, /* IR */ |
{ in_line_eoln, 0 }, /* IR */ |
{ in_line_eoln, 0 }, /* RI */ |
{ in_line_eoln, 0 }, /* RI */ |
{ in_line_eoln, MAN_NSCOPED }, /* br */ |
|
{ in_line_eoln, MAN_NSCOPED }, /* sp */ |
|
{ in_line_eoln, MAN_NSCOPED }, /* nf */ |
{ in_line_eoln, MAN_NSCOPED }, /* nf */ |
{ in_line_eoln, MAN_NSCOPED }, /* fi */ |
{ in_line_eoln, MAN_NSCOPED }, /* fi */ |
{ blk_close, MAN_BSCOPE }, /* RE */ |
{ blk_close, MAN_BSCOPE }, /* RE */ |
Line 71 const struct man_macro __man_macros[MAN_MAX - MAN_TH] |
|
Line 70 const struct man_macro __man_macros[MAN_MAX - MAN_TH] |
|
{ in_line_eoln, 0 }, /* UC */ |
{ in_line_eoln, 0 }, /* UC */ |
{ in_line_eoln, MAN_NSCOPED }, /* PD */ |
{ in_line_eoln, MAN_NSCOPED }, /* PD */ |
{ in_line_eoln, 0 }, /* AT */ |
{ in_line_eoln, 0 }, /* AT */ |
{ in_line_eoln, 0 }, /* in */ |
{ in_line_eoln, MAN_NSCOPED }, /* in */ |
{ in_line_eoln, 0 }, /* ft */ |
|
{ in_line_eoln, 0 }, /* OP */ |
{ in_line_eoln, 0 }, /* OP */ |
{ in_line_eoln, MAN_BSCOPE }, /* EX */ |
{ in_line_eoln, MAN_BSCOPE }, /* EX */ |
{ in_line_eoln, MAN_BSCOPE }, /* EE */ |
{ in_line_eoln, MAN_BSCOPE }, /* EE */ |
{ blk_exp, MAN_BSCOPE }, /* UR */ |
{ blk_exp, MAN_BSCOPE }, /* UR */ |
{ blk_close, MAN_BSCOPE }, /* UE */ |
{ blk_close, MAN_BSCOPE }, /* UE */ |
{ in_line_eoln, 0 }, /* ll */ |
{ blk_exp, MAN_BSCOPE }, /* MT */ |
|
{ blk_close, MAN_BSCOPE }, /* ME */ |
}; |
}; |
const struct man_macro *const man_macros = __man_macros - MAN_TH; |
|
|
|
|
|
|
const struct man_macro * |
|
man_macro(enum roff_tok tok) |
|
{ |
|
assert(tok >= MAN_TH && tok <= MAN_MAX); |
|
return man_macros + (tok - MAN_TH); |
|
} |
|
|
void |
void |
man_unscope(struct roff_man *man, const struct roff_node *to) |
man_unscope(struct roff_man *man, const struct roff_node *to) |
{ |
{ |
Line 96 man_unscope(struct roff_man *man, const struct roff_no |
|
Line 101 man_unscope(struct roff_man *man, const struct roff_no |
|
|
|
if (to == NULL && ! (n->flags & NODE_VALID)) { |
if (to == NULL && ! (n->flags & NODE_VALID)) { |
if (man->flags & (MAN_BLINE | MAN_ELINE) && |
if (man->flags & (MAN_BLINE | MAN_ELINE) && |
man_macros[n->tok].flags & MAN_SCOPED) { |
man_macro(n->tok)->flags & MAN_SCOPED) { |
mandoc_vmsg(MANDOCERR_BLK_LINE, |
mandoc_vmsg(MANDOCERR_BLK_LINE, |
man->parse, n->line, n->pos, |
man->parse, n->line, n->pos, |
"EOF breaks %s", roff_name[n->tok]); |
"EOF breaks %s", roff_name[n->tok]); |
Line 113 man_unscope(struct roff_man *man, const struct roff_no |
|
Line 118 man_unscope(struct roff_man *man, const struct roff_no |
|
continue; |
continue; |
} |
} |
if (n->type == ROFFT_BLOCK && |
if (n->type == ROFFT_BLOCK && |
man_macros[n->tok].fp == blk_exp) |
man_macro(n->tok)->fp == blk_exp) |
mandoc_msg(MANDOCERR_BLK_NOEND, |
mandoc_msg(MANDOCERR_BLK_NOEND, |
man->parse, n->line, n->pos, |
man->parse, n->line, n->pos, |
roff_name[n->tok]); |
roff_name[n->tok]); |
Line 177 rew_scope(struct roff_man *man, enum roff_tok tok) |
|
Line 182 rew_scope(struct roff_man *man, enum roff_tok tok) |
|
} |
} |
if (tok != MAN_SH && (n->tok == MAN_SH || |
if (tok != MAN_SH && (n->tok == MAN_SH || |
(tok != MAN_SS && (n->tok == MAN_SS || |
(tok != MAN_SS && (n->tok == MAN_SS || |
man_macros[n->tok].fp == blk_exp)))) |
man_macro(n->tok)->fp == blk_exp)))) |
return; |
return; |
man_unscope(man, n); |
man_unscope(man, n); |
n = man->last; |
n = man->last; |
Line 191 rew_scope(struct roff_man *man, enum roff_tok tok) |
|
Line 196 rew_scope(struct roff_man *man, enum roff_tok tok) |
|
void |
void |
blk_close(MACRO_PROT_ARGS) |
blk_close(MACRO_PROT_ARGS) |
{ |
{ |
enum roff_tok ntok; |
enum roff_tok ctok, ntok; |
const struct roff_node *nn; |
const struct roff_node *nn; |
char *p; |
char *p; |
int nrew, target; |
int cline, cpos, nrew, target; |
|
|
nrew = 1; |
nrew = 1; |
switch (tok) { |
switch (tok) { |
Line 221 blk_close(MACRO_PROT_ARGS) |
|
Line 226 blk_close(MACRO_PROT_ARGS) |
|
case MAN_UE: |
case MAN_UE: |
ntok = MAN_UR; |
ntok = MAN_UR; |
break; |
break; |
|
case MAN_ME: |
|
ntok = MAN_MT; |
|
break; |
default: |
default: |
abort(); |
abort(); |
} |
} |
Line 233 blk_close(MACRO_PROT_ARGS) |
|
Line 241 blk_close(MACRO_PROT_ARGS) |
|
mandoc_msg(MANDOCERR_BLK_NOTOPEN, man->parse, |
mandoc_msg(MANDOCERR_BLK_NOTOPEN, man->parse, |
line, ppos, roff_name[tok]); |
line, ppos, roff_name[tok]); |
rew_scope(man, MAN_PP); |
rew_scope(man, MAN_PP); |
} else { |
return; |
line = man->last->line; |
} |
ppos = man->last->pos; |
|
ntok = man->last->tok; |
|
man_unscope(man, nn); |
|
|
|
/* Move a trailing paragraph behind the block. */ |
cline = man->last->line; |
|
cpos = man->last->pos; |
|
ctok = man->last->tok; |
|
man_unscope(man, nn); |
|
|
if (ntok == MAN_LP || ntok == MAN_PP || ntok == MAN_P) { |
if (tok == MAN_RE && nn->head->aux > 0) |
*pos = strlen(buf); |
roff_setreg(man->roff, "an-margin", nn->head->aux, '-'); |
blk_imp(man, ntok, line, ppos, pos, buf); |
|
} |
/* Trailing text. */ |
|
|
|
if (buf[*pos] != '\0') { |
|
roff_word_alloc(man, line, ppos, buf + *pos); |
|
man->last->flags |= NODE_DELIMC; |
} |
} |
|
|
|
/* Move a trailing paragraph behind the block. */ |
|
|
|
if (ctok == MAN_LP || ctok == MAN_PP || ctok == MAN_P) { |
|
*pos = strlen(buf); |
|
blk_imp(man, ctok, cline, cpos, pos, buf); |
|
} |
} |
} |
|
|
void |
void |
Line 260 blk_exp(MACRO_PROT_ARGS) |
|
Line 279 blk_exp(MACRO_PROT_ARGS) |
|
head = roff_head_alloc(man, line, ppos, tok); |
head = roff_head_alloc(man, line, ppos, tok); |
|
|
la = *pos; |
la = *pos; |
if (man_args(man, line, pos, buf, &p)) |
if (man_args(man, line, pos, buf, &p)) { |
roff_word_alloc(man, line, la, p); |
roff_word_alloc(man, line, la, p); |
|
if (tok == MAN_RS) { |
|
if (roff_getreg(man->roff, "an-margin") == 0) |
|
roff_setreg(man->roff, "an-margin", |
|
7 * 24, '='); |
|
if ((head->aux = strtod(p, NULL) * 24.0) > 0) |
|
roff_setreg(man->roff, "an-margin", |
|
head->aux, '+'); |
|
} |
|
} |
|
|
if (buf[*pos] != '\0') |
if (buf[*pos] != '\0') |
mandoc_vmsg(MANDOCERR_ARG_EXCESS, man->parse, line, |
mandoc_vmsg(MANDOCERR_ARG_EXCESS, man->parse, line, |
Line 305 blk_imp(MACRO_PROT_ARGS) |
|
Line 333 blk_imp(MACRO_PROT_ARGS) |
|
* For `TP', always keep the head open. |
* For `TP', always keep the head open. |
*/ |
*/ |
|
|
if (man_macros[tok].flags & MAN_SCOPED && |
if (man_macro(tok)->flags & MAN_SCOPED && |
(tok == MAN_TP || n == man->last)) { |
(tok == MAN_TP || tok == MAN_TQ || n == man->last)) { |
man->flags |= MAN_BLINE; |
man->flags |= MAN_BLINE; |
return; |
return; |
} |
} |
Line 328 in_line_eoln(MACRO_PROT_ARGS) |
|
Line 356 in_line_eoln(MACRO_PROT_ARGS) |
|
n = man->last; |
n = man->last; |
|
|
for (;;) { |
for (;;) { |
if (buf[*pos] != '\0' && (tok == MAN_br || |
if (buf[*pos] != '\0' && (tok == MAN_fi || tok == MAN_nf)) { |
tok == MAN_fi || tok == MAN_nf)) { |
|
mandoc_vmsg(MANDOCERR_ARG_SKIP, |
mandoc_vmsg(MANDOCERR_ARG_SKIP, |
man->parse, line, *pos, "%s %s", |
man->parse, line, *pos, "%s %s", |
roff_name[tok], buf + *pos); |
roff_name[tok], buf + *pos); |
break; |
break; |
} |
} |
if (buf[*pos] != '\0' && man->last != n && |
if (buf[*pos] != '\0' && man->last != n && tok == MAN_PD) { |
(tok == MAN_PD || tok == MAN_ft || tok == MAN_sp)) { |
|
mandoc_vmsg(MANDOCERR_ARG_EXCESS, |
mandoc_vmsg(MANDOCERR_ARG_EXCESS, |
man->parse, line, *pos, "%s ... %s", |
man->parse, line, *pos, "%s ... %s", |
roff_name[tok], buf + *pos); |
roff_name[tok], buf + *pos); |
Line 345 in_line_eoln(MACRO_PROT_ARGS) |
|
Line 371 in_line_eoln(MACRO_PROT_ARGS) |
|
la = *pos; |
la = *pos; |
if ( ! man_args(man, line, pos, buf, &p)) |
if ( ! man_args(man, line, pos, buf, &p)) |
break; |
break; |
if (man_macros[tok].flags & MAN_JOIN && |
if (man_macro(tok)->flags & MAN_JOIN && |
man->last->type == ROFFT_TEXT) |
man->last->type == ROFFT_TEXT) |
roff_word_append(man, p); |
roff_word_append(man, p); |
else |
else |
Line 367 in_line_eoln(MACRO_PROT_ARGS) |
|
Line 393 in_line_eoln(MACRO_PROT_ARGS) |
|
* waiting for terms to load into our context. |
* waiting for terms to load into our context. |
*/ |
*/ |
|
|
if (n == man->last && man_macros[tok].flags & MAN_SCOPED) { |
if (n == man->last && man_macro(tok)->flags & MAN_SCOPED) { |
assert( ! (man_macros[tok].flags & MAN_NSCOPED)); |
assert((man_macro(tok)->flags & MAN_NSCOPED) == 0); |
man->flags |= MAN_ELINE; |
man->flags |= MAN_ELINE; |
return; |
return; |
} |
} |