version 1.272, 2015/02/06 01:07:22 |
version 1.274, 2015/02/06 03:38:45 |
Line 67 static enum mdoc_sec a2sec(const char *); |
|
Line 67 static enum mdoc_sec a2sec(const char *); |
|
static size_t macro2len(enum mdoct); |
static size_t macro2len(enum mdoct); |
static void rewrite_macro2len(char **); |
static void rewrite_macro2len(char **); |
|
|
static void bwarn_ge1(POST_ARGS); |
|
static void ewarn_eq1(POST_ARGS); |
static void ewarn_eq1(POST_ARGS); |
static void ewarn_ge1(POST_ARGS); |
static void ewarn_ge1(POST_ARGS); |
|
|
Line 151 static const struct valids mdoc_valids[MDOC_MAX] = { |
|
Line 150 static const struct valids mdoc_valids[MDOC_MAX] = { |
|
{ NULL, NULL }, /* Ev */ |
{ NULL, NULL }, /* Ev */ |
{ pre_std, post_ex }, /* Ex */ |
{ pre_std, post_ex }, /* Ex */ |
{ NULL, post_fa }, /* Fa */ |
{ NULL, post_fa }, /* Fa */ |
{ NULL, ewarn_ge1 }, /* Fd */ |
{ NULL, NULL }, /* Fd */ |
{ NULL, NULL }, /* Fl */ |
{ NULL, NULL }, /* Fl */ |
{ NULL, post_fn }, /* Fn */ |
{ NULL, post_fn }, /* Fn */ |
{ NULL, NULL }, /* Ft */ |
{ NULL, NULL }, /* Ft */ |
Line 402 check_count(struct mdoc *mdoc, enum mdoc_type type, |
|
Line 401 check_count(struct mdoc *mdoc, enum mdoc_type type, |
|
} |
} |
|
|
static void |
static void |
bwarn_ge1(POST_ARGS) |
|
{ |
|
check_count(mdoc, MDOC_BODY, CHECK_GT, 0); |
|
} |
|
|
|
static void |
|
ewarn_eq1(POST_ARGS) |
ewarn_eq1(POST_ARGS) |
{ |
{ |
check_count(mdoc, MDOC_ELEM, CHECK_EQ, 1); |
check_count(mdoc, MDOC_ELEM, CHECK_EQ, 1); |
Line 980 post_fn(POST_ARGS) |
|
Line 973 post_fn(POST_ARGS) |
|
static void |
static void |
post_fo(POST_ARGS) |
post_fo(POST_ARGS) |
{ |
{ |
|
const struct mdoc_node *n; |
|
|
check_count(mdoc, MDOC_HEAD, CHECK_EQ, 1); |
n = mdoc->last; |
bwarn_ge1(mdoc); |
|
if (mdoc->last->type == MDOC_HEAD && mdoc->last->nchild) |
if (n->type != MDOC_HEAD) |
post_fname(mdoc); |
return; |
|
|
|
if (n->child == NULL) { |
|
mandoc_msg(MANDOCERR_FO_NOHEAD, mdoc->parse, |
|
n->line, n->pos, "Fo"); |
|
return; |
|
} |
|
if (n->child != n->last) { |
|
mandoc_vmsg(MANDOCERR_ARG_EXCESS, mdoc->parse, |
|
n->child->next->line, n->child->next->pos, |
|
"Fo ... %s", n->child->next->string); |
|
while (n->child != n->last) |
|
mdoc_node_delete(mdoc, n->last); |
|
} |
|
|
|
post_fname(mdoc); |
} |
} |
|
|
static void |
static void |
Line 1072 post_nd(POST_ARGS) |
|
Line 1081 post_nd(POST_ARGS) |
|
static void |
static void |
post_d1(POST_ARGS) |
post_d1(POST_ARGS) |
{ |
{ |
|
struct mdoc_node *n; |
|
|
bwarn_ge1(mdoc); |
n = mdoc->last; |
|
|
|
if (n->type != MDOC_BODY) |
|
return; |
|
|
|
if (n->child == NULL) |
|
mandoc_msg(MANDOCERR_MACRO_EMPTY, mdoc->parse, |
|
n->line, n->pos, "D1"); |
|
|
post_hyph(mdoc); |
post_hyph(mdoc); |
} |
} |
|
|
static void |
static void |
post_literal(POST_ARGS) |
post_literal(POST_ARGS) |
{ |
{ |
|
struct mdoc_node *n; |
|
|
bwarn_ge1(mdoc); |
n = mdoc->last; |
|
|
/* |
if (n->type != MDOC_BODY) |
* The `Dl' (note "el" not "one") and `Bd' macros unset the |
return; |
* MDOC_LITERAL flag as they leave. Note that `Bd' only sets |
|
* this in literal mode, but it doesn't hurt to just switch it |
|
* off in general since displays can't be nested. |
|
*/ |
|
|
|
if (MDOC_BODY == mdoc->last->type) |
if (n->child == NULL) |
mdoc->flags &= ~MDOC_LITERAL; |
mandoc_msg(MANDOCERR_MACRO_EMPTY, mdoc->parse, |
|
n->line, n->pos, mdoc_macronames[n->tok]); |
|
|
|
if (n->tok == MDOC_Bd && |
|
n->norm->Bd.type != DISP_literal && |
|
n->norm->Bd.type != DISP_unfilled) |
|
return; |
|
|
|
mdoc->flags &= ~MDOC_LITERAL; |
} |
} |
|
|
static void |
static void |
Line 1488 post_bl(POST_ARGS) |
|
Line 1511 post_bl(POST_ARGS) |
|
return; |
return; |
} |
} |
|
|
bwarn_ge1(mdoc); |
|
|
|
nchild = nbody->child; |
nchild = nbody->child; |
while (NULL != nchild) { |
if (nchild == NULL) { |
|
mandoc_msg(MANDOCERR_MACRO_EMPTY, mdoc->parse, |
|
nbody->line, nbody->pos, "Bl"); |
|
return; |
|
} |
|
while (nchild != NULL) { |
if (nchild->tok == MDOC_It || |
if (nchild->tok == MDOC_It || |
(nchild->tok == MDOC_Sm && |
(nchild->tok == MDOC_Sm && |
nchild->next != NULL && |
nchild->next != NULL && |
Line 1749 post_rs(POST_ARGS) |
|
Line 1775 post_rs(POST_ARGS) |
|
static void |
static void |
post_hyph(POST_ARGS) |
post_hyph(POST_ARGS) |
{ |
{ |
struct mdoc_node *n, *nch; |
struct mdoc_node *nch; |
char *cp; |
char *cp; |
|
|
n = mdoc->last; |
for (nch = mdoc->last->child; nch != NULL; nch = nch->next) { |
switch (n->type) { |
if (nch->type != MDOC_TEXT) |
case MDOC_HEAD: |
|
if (MDOC_Sh == n->tok || MDOC_Ss == n->tok) |
|
break; |
|
return; |
|
case MDOC_BODY: |
|
if (MDOC_D1 == n->tok || MDOC_Nd == n->tok) |
|
break; |
|
return; |
|
case MDOC_ELEM: |
|
break; |
|
default: |
|
return; |
|
} |
|
|
|
for (nch = n->child; nch; nch = nch->next) { |
|
if (MDOC_TEXT != nch->type) |
|
continue; |
continue; |
cp = nch->string; |
cp = nch->string; |
if ('\0' == *cp) |
if (*cp == '\0') |
continue; |
continue; |
while ('\0' != *(++cp)) |
while (*(++cp) != '\0') |
if ('-' == *cp && |
if (*cp == '-' && |
isalpha((unsigned char)cp[-1]) && |
isalpha((unsigned char)cp[-1]) && |
isalpha((unsigned char)cp[1])) |
isalpha((unsigned char)cp[1])) |
*cp = ASCII_HYPH; |
*cp = ASCII_HYPH; |
Line 2069 post_ignpar(POST_ARGS) |
|
Line 2079 post_ignpar(POST_ARGS) |
|
{ |
{ |
struct mdoc_node *np; |
struct mdoc_node *np; |
|
|
post_hyph(mdoc); |
switch (mdoc->last->type) { |
|
case MDOC_HEAD: |
if (MDOC_BODY != mdoc->last->type) |
post_hyph(mdoc); |
return; |
return; |
|
case MDOC_BODY: |
|
break; |
|
default: |
|
return; |
|
} |
|
|
if (NULL != (np = mdoc->last->child)) |
if (NULL != (np = mdoc->last->child)) |
if (MDOC_Pp == np->tok || MDOC_Lp == np->tok) { |
if (MDOC_Pp == np->tok || MDOC_Lp == np->tok) { |