man_validate.c revision 95c635efb7c3b86efc493e0447eaec7aecca3f0f
/* $Id: man_validate.c,v 1.80 2012/01/03 15:16:24 kristaps Exp $ */
/*
* Copyright (c) 2008, 2009, 2010, 2011 Kristaps Dzonsons <kristaps@bsd.lv>
* Copyright (c) 2010 Ingo Schwarze <schwarze@openbsd.org>
*
* Permission to use, copy, modify, and distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <assert.h>
#include <ctype.h>
#include <errno.h>
#include <limits.h>
#include <stdarg.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include "man.h"
#include "mandoc.h"
#include "libman.h"
#include "libmandoc.h"
struct man_valid {
};
static int check_part(CHKARGS);
static int check_root(CHKARGS);
static void check_text(CHKARGS);
};
int
{
switch (n->type) {
case (MAN_TEXT):
/* FALLTHROUGH */
case (MAN_ROOT):
/* FALLTHROUGH */
case (MAN_EQN):
/* FALLTHROUGH */
case (MAN_TBL):
return(1);
default:
break;
}
return(1);
if ( ! (*cp)(m, n))
return(0);
return(1);
}
int
man_valid_post(struct man *m)
{
return(1);
case (MAN_TEXT):
check_text(m, m->last);
return(1);
case (MAN_ROOT):
return(check_root(m, m->last));
case (MAN_EQN):
/* FALLTHROUGH */
case (MAN_TBL):
return(1);
default:
break;
}
return(1);
return(0);
return(1);
}
static int
{
man_nmsg(m, n, MANDOCERR_SCOPEEXIT);
man_nmsg(m, n, MANDOCERR_SCOPEEXIT);
man_nmsg(m, n, MANDOCERR_NODOCBODY);
return(0);
man_nmsg(m, n, MANDOCERR_NOTITLE);
/*
* If a title hasn't been set, do so now (by
* implication, date and section also aren't set).
*/
}
return(1);
}
static void
{
char *cp, *p;
if (MAN_LITERAL & m->flags)
return;
}
static int \
{ \
return(1); \
"line arguments %s %d (have %d)", \
return(1); \
}
INEQ_DEFINE(0, ==, eq0)
static int
{
char *cp;
int ok;
if (0 == n->nchild)
return(1);
ok = 0;
switch (*cp) {
case ('1'):
/* FALLTHROUGH */
case ('2'):
/* FALLTHROUGH */
case ('3'):
/* FALLTHROUGH */
case ('4'):
/* FALLTHROUGH */
case ('I'):
/* FALLTHROUGH */
case ('P'):
/* FALLTHROUGH */
case ('R'):
ok = 1;
break;
case ('B'):
ok = 1;
break;
case ('C'):
ok = 1;
break;
default:
break;
}
if (0 == ok) {
(MANDOCERR_BADFONT, m->parse,
*cp = '\0';
}
if (1 < n->nchild)
n->pos, "want one child (have %d)",
n->nchild);
return(1);
}
static int
{
m->flags &= ~MAN_LITERAL;
return(1);
}
static int
{
return(1);
man_nmsg(m, n, MANDOCERR_SYNTARGCOUNT);
return(0);
}
static int
{
n->pos, "want children (have none)");
return(1);
}
static int
{
switch (n->type) {
case (MAN_BLOCK):
man_node_delete(m, n);
break;
case (MAN_BODY):
if (0 == n->nchild)
man_nmsg(m, n, MANDOCERR_IGNPAR);
break;
case (MAN_HEAD):
if (n->nchild)
man_nmsg(m, n, MANDOCERR_ARGSLOST);
break;
default:
break;
}
return(1);
}
static int
{
const char *p;
/* ->TITLE<- MSEC DATE SOURCE VOL */
n = n->child;
if (n && n->string) {
for (p = n->string; '\0' != *p; p++) {
/* Only warn about this once... */
if (isalpha((unsigned char)*p) &&
! isupper((unsigned char)*p)) {
man_nmsg(m, n, MANDOCERR_UPPERCASE);
break;
}
}
} else
/* TITLE ->MSEC<- DATE SOURCE VOL */
if (n)
n = n->next;
if (n && n->string)
else
/* TITLE MSEC ->DATE<- SOURCE VOL */
if (n)
n = n->next;
} else
/* TITLE MSEC DATE ->SOURCE<- VOL */
if (n && (n = n->next))
/* TITLE MSEC DATE SOURCE ->VOL<- */
/* If missing, use the default VOL name for MSEC. */
if (n && (n = n->next))
/*
* Remove the `TH' node after we've processed it for our
* meta-data.
*/
man_node_delete(m, m->last);
return(1);
}
static int
{
if (MAN_LITERAL & m->flags)
man_nmsg(m, n, MANDOCERR_SCOPEREP);
m->flags |= MAN_LITERAL;
return(1);
}
static int
{
if ( ! (MAN_LITERAL & m->flags))
man_nmsg(m, n, MANDOCERR_WNOSCOPE);
m->flags &= ~MAN_LITERAL;
return(1);
}
static int
{
static const char * const bsd_versions[] = {
"3rd Berkeley Distribution",
"4th Berkeley Distribution",
"4.2 Berkeley Distribution",
"4.3 Berkeley Distribution",
"4.4 Berkeley Distribution",
};
const char *p, *s;
n = n->child;
p = bsd_versions[0];
else {
s = n->string;
if (0 == strcmp(s, "3"))
p = bsd_versions[0];
else if (0 == strcmp(s, "4"))
p = bsd_versions[1];
else if (0 == strcmp(s, "5"))
p = bsd_versions[2];
else if (0 == strcmp(s, "6"))
p = bsd_versions[3];
else if (0 == strcmp(s, "7"))
p = bsd_versions[4];
else
p = bsd_versions[0];
}
return(1);
}
static int
{
static const char * const unix_versions[] = {
"7th Edition",
"System III",
"System V",
"System V Release 2",
};
const char *p, *s;
n = n->child;
p = unix_versions[0];
else {
s = n->string;
if (0 == strcmp(s, "3"))
p = unix_versions[0];
else if (0 == strcmp(s, "4"))
p = unix_versions[1];
else if (0 == strcmp(s, "5")) {
p = unix_versions[3];
else
p = unix_versions[2];
} else
p = unix_versions[0];
}
return(1);
}
static int
{
/*
* Don't warn about this because it occurs in pod2man and would
* cause considerable (unfixable) warnage.
*/
man_node_delete(m, n);
return(1);
}