1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
/* 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"));
}
|
