version 1.70, 2011/07/08 09:34:06 |
version 1.83, 2012/07/18 16:52:03 |
|
|
/* $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) 2010 Ingo Schwarze <schwarze@openbsd.org> |
* Copyright (c) 2010, 2012 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 |
Line 44 struct man_valid { |
|
Line 44 struct man_valid { |
|
v_check *posts; |
v_check *posts; |
}; |
}; |
|
|
static int check_bline(CHKARGS); |
|
static int check_eq0(CHKARGS); |
static int check_eq0(CHKARGS); |
static int check_ft(CHKARGS); |
static int check_eq2(CHKARGS); |
static int check_le1(CHKARGS); |
static int check_le1(CHKARGS); |
static int check_ge2(CHKARGS); |
static int check_ge2(CHKARGS); |
static int check_le5(CHKARGS); |
static int check_le5(CHKARGS); |
static int check_par(CHKARGS); |
static int check_par(CHKARGS); |
static int check_part(CHKARGS); |
static int check_part(CHKARGS); |
static int check_root(CHKARGS); |
static int check_root(CHKARGS); |
static int check_sec(CHKARGS); |
|
static void check_text(CHKARGS); |
static void check_text(CHKARGS); |
|
|
static int post_AT(CHKARGS); |
static int post_AT(CHKARGS); |
|
static int post_IP(CHKARGS); |
static int post_vs(CHKARGS); |
static int post_vs(CHKARGS); |
static int post_fi(CHKARGS); |
static int post_fi(CHKARGS); |
|
static int post_ft(CHKARGS); |
static int post_nf(CHKARGS); |
static int post_nf(CHKARGS); |
|
static int post_sec(CHKARGS); |
static int post_TH(CHKARGS); |
static int post_TH(CHKARGS); |
static int post_UC(CHKARGS); |
static int post_UC(CHKARGS); |
|
static int pre_sec(CHKARGS); |
|
|
static v_check posts_at[] = { post_AT, NULL }; |
static v_check posts_at[] = { post_AT, NULL }; |
static v_check posts_br[] = { post_vs, check_eq0, NULL }; |
static v_check posts_br[] = { post_vs, check_eq0, NULL }; |
static v_check posts_eq0[] = { check_eq0, NULL }; |
static v_check posts_eq0[] = { check_eq0, NULL }; |
|
static v_check posts_eq2[] = { check_eq2, NULL }; |
static v_check posts_fi[] = { check_eq0, post_fi, NULL }; |
static v_check posts_fi[] = { check_eq0, post_fi, NULL }; |
static v_check posts_ft[] = { check_ft, NULL }; |
static v_check posts_ft[] = { post_ft, NULL }; |
|
static v_check posts_ip[] = { post_IP, NULL }; |
static v_check posts_nf[] = { check_eq0, post_nf, NULL }; |
static v_check posts_nf[] = { check_eq0, post_nf, NULL }; |
static v_check posts_par[] = { check_par, NULL }; |
static v_check posts_par[] = { check_par, NULL }; |
static v_check posts_part[] = { check_part, NULL }; |
static v_check posts_part[] = { check_part, NULL }; |
static v_check posts_sec[] = { check_sec, NULL }; |
static v_check posts_sec[] = { post_sec, NULL }; |
static v_check posts_sp[] = { post_vs, check_le1, NULL }; |
static v_check posts_sp[] = { post_vs, check_le1, NULL }; |
static v_check posts_th[] = { check_ge2, check_le5, post_TH, NULL }; |
static v_check posts_th[] = { check_ge2, check_le5, post_TH, NULL }; |
static v_check posts_uc[] = { post_UC, NULL }; |
static v_check posts_uc[] = { post_UC, NULL }; |
static v_check pres_bline[] = { check_bline, NULL }; |
static v_check pres_sec[] = { pre_sec, NULL }; |
|
|
static const struct man_valid man_valids[MAN_MAX] = { |
static const struct man_valid man_valids[MAN_MAX] = { |
{ NULL, posts_br }, /* br */ |
{ NULL, posts_br }, /* br */ |
{ pres_bline, posts_th }, /* TH */ |
{ NULL, posts_th }, /* TH */ |
{ pres_bline, posts_sec }, /* SH */ |
{ pres_sec, posts_sec }, /* SH */ |
{ pres_bline, posts_sec }, /* SS */ |
{ pres_sec, posts_sec }, /* SS */ |
{ pres_bline, NULL }, /* TP */ |
{ NULL, NULL }, /* TP */ |
{ pres_bline, posts_par }, /* LP */ |
{ NULL, posts_par }, /* LP */ |
{ pres_bline, posts_par }, /* PP */ |
{ NULL, posts_par }, /* PP */ |
{ pres_bline, posts_par }, /* P */ |
{ NULL, posts_par }, /* P */ |
{ pres_bline, NULL }, /* IP */ |
{ NULL, posts_ip }, /* IP */ |
{ pres_bline, NULL }, /* HP */ |
{ NULL, NULL }, /* HP */ |
{ NULL, NULL }, /* SM */ |
{ NULL, NULL }, /* SM */ |
{ NULL, NULL }, /* SB */ |
{ NULL, NULL }, /* SB */ |
{ NULL, NULL }, /* BI */ |
{ NULL, NULL }, /* BI */ |
Line 99 static const struct man_valid man_valids[MAN_MAX] = { |
|
Line 103 static const struct man_valid man_valids[MAN_MAX] = { |
|
{ NULL, NULL }, /* I */ |
{ NULL, NULL }, /* I */ |
{ NULL, NULL }, /* IR */ |
{ NULL, NULL }, /* IR */ |
{ NULL, NULL }, /* RI */ |
{ NULL, NULL }, /* RI */ |
{ NULL, posts_eq0 }, /* na */ /* FIXME: should warn only. */ |
{ NULL, posts_eq0 }, /* na */ |
{ NULL, posts_sp }, /* sp */ /* FIXME: should warn only. */ |
{ NULL, posts_sp }, /* sp */ |
{ pres_bline, posts_nf }, /* nf */ |
{ NULL, posts_nf }, /* nf */ |
{ pres_bline, posts_fi }, /* fi */ |
{ NULL, posts_fi }, /* fi */ |
{ NULL, NULL }, /* RE */ |
{ NULL, NULL }, /* RE */ |
{ NULL, posts_part }, /* RS */ |
{ NULL, posts_part }, /* RS */ |
{ NULL, NULL }, /* DT */ |
{ NULL, NULL }, /* DT */ |
Line 111 static const struct man_valid man_valids[MAN_MAX] = { |
|
Line 115 static const struct man_valid man_valids[MAN_MAX] = { |
|
{ NULL, posts_at }, /* AT */ |
{ NULL, posts_at }, /* AT */ |
{ NULL, NULL }, /* in */ |
{ NULL, NULL }, /* in */ |
{ NULL, posts_ft }, /* ft */ |
{ NULL, posts_ft }, /* ft */ |
|
{ NULL, posts_eq2 }, /* OP */ |
|
{ NULL, posts_nf }, /* EX */ |
|
{ NULL, posts_fi }, /* EE */ |
}; |
}; |
|
|
|
|
Line 207 check_root(CHKARGS) |
|
Line 214 check_root(CHKARGS) |
|
} |
} |
|
|
static void |
static void |
check_text(CHKARGS) |
check_text(CHKARGS) |
{ |
{ |
char *p, *pp, *cpp; |
char *cp, *p; |
int pos; |
|
size_t sz; |
|
|
|
p = n->string; |
if (MAN_LITERAL & m->flags) |
pos = n->pos + 1; |
return; |
|
|
while ('\0' != *p) { |
cp = n->string; |
sz = strcspn(p, "\t\\"); |
for (p = cp; NULL != (p = strchr(p, '\t')); p++) |
|
man_pmsg(m, n->line, (int)(p - cp), MANDOCERR_BADTAB); |
p += (int)sz; |
|
pos += (int)sz; |
|
|
|
if ('\t' == *p) { |
|
if ( ! (MAN_LITERAL & m->flags)) |
|
man_pmsg(m, n->line, pos, MANDOCERR_BADTAB); |
|
p++; |
|
pos++; |
|
continue; |
|
} else if ('\0' == *p) |
|
break; |
|
|
|
pos++; |
|
pp = ++p; |
|
|
|
if (ESCAPE_ERROR == mandoc_escape |
|
((const char **)&pp, NULL, NULL)) { |
|
man_pmsg(m, n->line, pos, MANDOCERR_BADESCAPE); |
|
break; |
|
} |
|
|
|
cpp = p; |
|
while (NULL != (cpp = memchr(cpp, ASCII_HYPH, pp - cpp))) |
|
*cpp = '-'; |
|
|
|
pos += pp - p; |
|
p = pp; |
|
} |
|
} |
} |
|
|
#define INEQ_DEFINE(x, ineq, name) \ |
#define INEQ_DEFINE(x, ineq, name) \ |
Line 262 check_##name(CHKARGS) \ |
|
Line 239 check_##name(CHKARGS) \ |
|
} |
} |
|
|
INEQ_DEFINE(0, ==, eq0) |
INEQ_DEFINE(0, ==, eq0) |
|
INEQ_DEFINE(2, ==, eq2) |
INEQ_DEFINE(1, <=, le1) |
INEQ_DEFINE(1, <=, le1) |
INEQ_DEFINE(2, >=, ge2) |
INEQ_DEFINE(2, >=, ge2) |
INEQ_DEFINE(5, <=, le5) |
INEQ_DEFINE(5, <=, le5) |
|
|
static int |
static int |
check_ft(CHKARGS) |
post_ft(CHKARGS) |
{ |
{ |
char *cp; |
char *cp; |
int ok; |
int ok; |
Line 323 check_ft(CHKARGS) |
|
Line 301 check_ft(CHKARGS) |
|
} |
} |
|
|
static int |
static int |
check_sec(CHKARGS) |
pre_sec(CHKARGS) |
{ |
{ |
|
|
|
if (MAN_BLOCK == n->type) |
|
m->flags &= ~MAN_LITERAL; |
|
return(1); |
|
} |
|
|
|
static int |
|
post_sec(CHKARGS) |
|
{ |
|
|
if ( ! (MAN_HEAD == n->type && 0 == n->nchild)) |
if ( ! (MAN_HEAD == n->type && 0 == n->nchild)) |
return(1); |
return(1); |
|
|
Line 333 check_sec(CHKARGS) |
|
Line 320 check_sec(CHKARGS) |
|
return(0); |
return(0); |
} |
} |
|
|
|
|
static int |
static int |
check_part(CHKARGS) |
check_part(CHKARGS) |
{ |
{ |
Line 370 check_par(CHKARGS) |
|
Line 356 check_par(CHKARGS) |
|
return(1); |
return(1); |
} |
} |
|
|
|
|
static int |
static int |
check_bline(CHKARGS) |
post_IP(CHKARGS) |
{ |
{ |
|
|
assert( ! (MAN_ELINE & m->flags)); |
switch (n->type) { |
if (MAN_BLINE & m->flags) { |
case (MAN_BLOCK): |
man_nmsg(m, n, MANDOCERR_SYNTLINESCOPE); |
if (0 == n->head->nchild && 0 == n->body->nchild) |
return(0); |
man_node_delete(m, n); |
|
break; |
|
case (MAN_BODY): |
|
if (0 == n->parent->head->nchild && 0 == n->nchild) |
|
man_nmsg(m, n, MANDOCERR_IGNPAR); |
|
break; |
|
default: |
|
break; |
} |
} |
|
|
return(1); |
return(1); |
} |
} |
|
|
Line 412 post_TH(CHKARGS) |
|
Line 403 post_TH(CHKARGS) |
|
if (n && n->string) { |
if (n && n->string) { |
for (p = n->string; '\0' != *p; p++) { |
for (p = n->string; '\0' != *p; p++) { |
/* Only warn about this once... */ |
/* Only warn about this once... */ |
if (isalpha((u_char)*p) && ! isupper((u_char)*p)) { |
if (isalpha((unsigned char)*p) && |
|
! isupper((unsigned char)*p)) { |
man_nmsg(m, n, MANDOCERR_UPPERCASE); |
man_nmsg(m, n, MANDOCERR_UPPERCASE); |
break; |
break; |
} |
} |
Line 434 post_TH(CHKARGS) |
|
Line 426 post_TH(CHKARGS) |
|
|
|
if (n) |
if (n) |
n = n->next; |
n = n->next; |
if (n) |
if (n && n->string && '\0' != n->string[0]) { |
pos = n->pos; |
pos = n->pos; |
m->meta.date = mandoc_normdate |
m->meta.date = mandoc_normdate |
(m->parse, n ? n->string : NULL, line, pos); |
(m->parse, n->string, line, pos); |
|
} else |
|
m->meta.date = mandoc_strdup(""); |
|
|
/* TITLE MSEC DATE ->SOURCE<- VOL */ |
/* TITLE MSEC DATE ->SOURCE<- VOL */ |
|
|
Line 445 post_TH(CHKARGS) |
|
Line 439 post_TH(CHKARGS) |
|
m->meta.source = mandoc_strdup(n->string); |
m->meta.source = mandoc_strdup(n->string); |
|
|
/* TITLE MSEC DATE SOURCE ->VOL<- */ |
/* TITLE MSEC DATE SOURCE ->VOL<- */ |
|
/* If missing, use the default VOL name for MSEC. */ |
|
|
if (n && (n = n->next)) |
if (n && (n = n->next)) |
m->meta.vol = mandoc_strdup(n->string); |
m->meta.vol = mandoc_strdup(n->string); |
|
else if ('\0' != m->meta.msec[0] && |
|
(NULL != (p = mandoc_a2msec(m->meta.msec)))) |
|
m->meta.vol = mandoc_strdup(p); |
|
|
/* |
/* |
* Remove the `TH' node after we've processed it for our |
* Remove the `TH' node after we've processed it for our |
Line 493 post_UC(CHKARGS) |
|
Line 491 post_UC(CHKARGS) |
|
const char *p, *s; |
const char *p, *s; |
|
|
n = n->child; |
n = n->child; |
n = m->last->child; |
|
|
|
if (NULL == n || MAN_TEXT != n->type) |
if (NULL == n || MAN_TEXT != n->type) |
p = bsd_versions[0]; |
p = bsd_versions[0]; |
|
|
post_vs(CHKARGS) |
post_vs(CHKARGS) |
{ |
{ |
|
|
/* |
if (NULL != n->prev) |
* Don't warn about this because it occurs in pod2man and would |
return(1); |
* cause considerable (unfixable) warnage. |
|
*/ |
switch (n->parent->tok) { |
if (NULL == n->prev && MAN_ROOT == n->parent->type) |
case (MAN_SH): |
|
/* FALLTHROUGH */ |
|
case (MAN_SS): |
|
man_nmsg(m, n, MANDOCERR_IGNPAR); |
|
/* FALLTHROUGH */ |
|
case (MAN_MAX): |
|
/* |
|
* Don't warn about this because it occurs in pod2man |
|
* and would cause considerable (unfixable) warnage. |
|
*/ |
man_node_delete(m, n); |
man_node_delete(m, n); |
|
break; |
|
default: |
|
break; |
|
} |
|
|
return(1); |
return(1); |
} |
} |