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
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
|
/*
* cpp_test.c: to compile and run n_*.c, i_*.c;
* make a summary of the results.
* 1998/08 by kmatsui
* Made after runtest.c and summtest.c of
* "Plum-Hall Validation Sampler".
* 2005/03 by kmatsui
* Changed 'PGNUM'.
* 2006/07 by kmatsui
* Changed 'PGNUM'.
* Changed non-prototype declarations to prototype ones.
* Removed DOS-extender option.
*/
#include "stdio.h"
#include "stdlib.h"
#include "string.h"
#include "ctype.h"
#include "errno.h"
#define NAMEMAX 8
#define PGMNUM 35
#if __MSDOS__ || __WIN32__ || _WIN32
#define PATH_DELIM '\\'
#else
#define PATH_DELIM '/'
#endif
#if 0
extern int sleep( unsigned int seconds);
#endif
void test_cpp( int argc, char **argv);
void sum_test( void);
void usage( void);
char comp_fmt[ BUFSIZ/2] = "cc -o%s %s.c";
char cmp_name[ NAMEMAX+1];
char out_file[ NAMEMAX+5];
char err_file[ NAMEMAX+5];
char sum_file[ NAMEMAX+5];
char err_name[ PGMNUM][ NAMEMAX+5];
char buf[ BUFSIZ];
int main( int argc, char **argv) {
char *cp;
int i;
if (argc < 2)
usage();
if (! isalpha( argv[ 1][ 0])
|| strchr( argv[ 1], '.') != NULL
|| strlen( argv[ 1]) > NAMEMAX) {
usage();
}
strcpy( cmp_name, argv[ 1]);
sprintf( sum_file, "%s.sum", cmp_name);
sprintf( out_file, "%s.out", cmp_name);
sprintf( err_file, "%s.err", cmp_name);
for (cp = cmp_name; (i = *cp) != 0; cp++) {
if (i == '-' || i == '_' || i == '~')
*cp = '|'; /* Convert horizontal line to vertical line */
}
if (argc > 2)
strcpy( comp_fmt, argv[ 2]);
if (freopen( out_file, "w", stdout) == NULL)
usage();
if (freopen( err_file, "w", stderr) == NULL)
usage();
setbuf( stdout, NULL);
setbuf( stderr, NULL);
test_cpp( argc, argv);
sum_test();
return 0;
}
void test_cpp( int argc, char ** argv) {
int i, len;
int pgm_num;
for (pgm_num = 0; pgm_num < PGMNUM && ! feof( stdin); pgm_num++) {
/* for each input program */
char pgm_name[ NAMEMAX+2];
fgets( pgm_name, NAMEMAX+1, stdin);
if ((len = strlen( pgm_name)) < 2 || *(pgm_name + len - 1) != '\n')
continue; /* skip erroneous line */
else
*(pgm_name + len - 1) = '\0'; /* remove '\n' */
sprintf( buf, comp_fmt, pgm_name, pgm_name);
system( buf);
printf( "COMPILE: %s\n", buf);
#if 0
sleep( 1); /* Wait a moment */
#endif
sprintf( err_name[ pgm_num], "%s.err", pgm_name);
freopen( err_name[ pgm_num], "w", stderr);
sprintf( buf, ".%c%s", PATH_DELIM, pgm_name);
system( buf);
printf( "EXECUTE: %s\n", buf);
#if 0
sleep( 1); /* Wait a moment */
#endif
freopen( err_file, "a", stderr);
for (i = 3; i < argc; ++i) {
sprintf( buf, argv[i], pgm_name, pgm_name);
system( buf);
printf( "CLEANUP: %s\n", buf);
}
} /* end loop over each program */
}
void sum_test( void)
{
FILE *sumfp, *errfp;
char *cp;
int i, len;
int nerror = 0;
int pgm_num;
/* Make a column of summary */
if ((sumfp = fopen( sum_file, "w")) == NULL) {
fprintf( stderr, "Can't open %s\n", sum_file);
exit( errno);
}
len = strlen( cmp_name);
for (i = 0; i < len; i++)
fprintf( sumfp, " %c\n", cmp_name[i]);
for (i = len; i <= NAMEMAX; i++)
fputs( " \n", sumfp);
for (pgm_num = 0; pgm_num < PGMNUM; pgm_num++) {
if ((errfp = fopen( err_name[ pgm_num], "r")) == NULL) {
fputs( " -\n", sumfp);
nerror++;
} else {
cp = fgets( buf, BUFSIZ, errfp);
if (cp == NULL || strcmp( buf, "started\n") != 0) {
fputs( " -\n", sumfp);
nerror++;
} else {
fgets( buf, BUFSIZ, errfp);
if (strcmp( "success\n", buf) != 0) {
fputs( " o\n", sumfp);
nerror++;
} else {
fputs( " *\n", sumfp);
}
}
fclose( errfp);
}
}
fprintf( sumfp, "\n%3d\n", nerror);
}
void usage( void)
{
fputs( "Usage:\n"
" cpp_test compiler-name \"compile command\" \"cleaning command\"s\n"
" Compiler-name must be 8 bytes or less and must be without dot.\n"
" Number of \"cleaning command\"s can be any.\n"
" Do this command in mcpp's test-c directory.\n"
"Examples:\n"
" cpp_test GCC332 \"gcc -std=iso9899:199409 -o%s %s.c\""
" \"rm %s\" < n_i_.lst\n"
" cpp_test VC2005 \"cl -Za -D_CRT_SECURE_NO_DEPRECATE -Fe%s.exe %s.c\""
" \"del %s.exe\" < n_i_.lst\n"
" cpp_test MCPP26 \"gcc -Wp,-23 -std=iso9899:199409 -o%s %s.c\""
" \"rm %s\" < n_i_.lst\n"
, stderr);
exit( 0);
}
|
