checkeq.c revision 7c478bd95313f5f23a4c958a745db2134aa03244
/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */
/*
* Copyright (c) 1980 Regents of the University of California.
* All rights reserved. The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
*/
/*
* Copyright 2004 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#include <stdio.h>
#include <stdlib.h>
#include <locale.h>
static void check(FILE *);
static FILE *fin;
static int delim = '$';
int
main(int argc, char **argv)
{
(void) setlocale(LC_ALL, "");
#if !defined(TEXT_DOMAIN)
#define TEXT_DOMAIN "SYS_TEST"
#endif
(void) textdomain(TEXT_DOMAIN);
if (argc <= 1)
check(stdin);
else
while (--argc > 0) {
if ((fin = fopen(*++argv, "r")) == NULL) {
perror(*argv);
exit(1);
}
(void) printf("%s:\n", *argv);
check(fin);
(void) fclose(fin);
}
return (0);
}
static void
check(FILE *f)
{
int start, line, eq, ndel, totdel;
char in[600], *p;
start = eq = line = ndel = totdel = 0;
while (fgets(in, 600, f) != NULL) {
line++;
ndel = 0;
for (p = in; *p; p++)
if (*p == delim)
ndel++;
if (*in == '.' && *(in+1) == 'E' && *(in+2) == 'Q') {
if (eq++)
(void) printf(
gettext(" Spurious EQ, line %d\n"),
line);
if (totdel)
(void) printf(
gettext(" EQ in %c%c, line %d\n"),
delim, delim, line);
} else if (*in == '.' && *(in+1) == 'E' && *(in+2) == 'N') {
if (eq == 0)
(void) printf(
gettext(" Spurious EN, line %d\n"),
line);
else
eq = 0;
if (totdel > 0)
(void) printf(
gettext(" EN in %c%c, line %d\n"),
delim, delim, line);
start = 0;
} else if (eq && *in == 'd' && *(in+1) == 'e' &&
*(in+2) == 'l' && *(in+3) == 'i' && *(in+4) == 'm') {
for (p = in+5; *p; p++)
if (*p != ' ') {
if (*p == 'o' && *(p+1) == 'f')
delim = 0;
else
delim = *p;
break;
}
if (delim == 0)
(void) printf(
gettext(" Delim off, line %d\n"),
line);
else
(void) printf(
gettext(" New delims %c%c, line %d\n"),
delim, delim, line);
}
if (ndel > 0 && eq > 0)
(void) printf(
gettext(" %c%c in EQ, line %d\n"), delim,
delim, line);
if (ndel == 0)
continue;
totdel += ndel;
if (totdel%2) {
if (start == 0)
start = line;
else {
(void) printf(
gettext(" %d line %c%c, lines %d-%d\n"),
line-start+1, delim, delim, start, line);
start = line;
}
} else {
if (start > 0) {
(void) printf(
gettext(" %d line %c%c, lines %d-%d\n"),
line-start+1, delim, delim, start, line);
start = 0;
}
totdel = 0;
}
}
if (totdel)
(void) printf(gettext(" Unfinished %c%c\n"), delim, delim);
if (eq)
(void) printf(gettext(" Unfinished EQ\n"));
}