Mercurial > hg > CbC > CbC_gcc
annotate libiberty/testsuite/test-expandargv.c @ 108:7ad14f446135
add CbC-example/rectypeTest/
author | Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Thu, 14 Jun 2012 20:30:24 +0900 |
parents | 77e2b8dfacca |
children | 04ced10e8804 |
rev | line source |
---|---|
0 | 1 /* expandargv test program, |
2 Copyright (C) 2006 Free Software Foundation, Inc. | |
3 Written by Carlos O'Donell <carlos@codesourcery.com> | |
4 | |
5 This file is part of the libiberty library, which is part of GCC. | |
6 | |
7 This file is free software; you can redistribute it and/or modify | |
8 it under the terms of the GNU General Public License as published by | |
9 the Free Software Foundation; either version 2 of the License, or | |
10 (at your option) any later version. | |
11 | |
12 In addition to the permissions in the GNU General Public License, the | |
13 Free Software Foundation gives you unlimited permission to link the | |
14 compiled version of this file into combinations with other programs, | |
15 and to distribute those combinations without any restriction coming | |
16 from the use of this file. (The General Public License restrictions | |
17 do apply in other respects; for example, they cover modification of | |
18 the file, and distribution when not linked into a combined | |
19 executable.) | |
20 | |
21 This program is distributed in the hope that it will be useful, | |
22 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
23 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
24 GNU General Public License for more details. | |
25 | |
26 You should have received a copy of the GNU General Public License | |
27 along with this program; if not, write to the Free Software | |
28 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. | |
29 */ | |
30 | |
31 #ifdef HAVE_CONFIG_H | |
32 #include "config.h" | |
33 #endif | |
34 #include "libiberty.h" | |
35 #include <stdio.h> | |
36 #include <errno.h> | |
37 #ifdef HAVE_STDLIB_H | |
38 #include <stdlib.h> | |
39 #endif | |
40 #ifdef HAVE_STRING_H | |
41 #include <string.h> | |
42 #endif | |
43 | |
44 #ifndef EXIT_SUCCESS | |
45 #define EXIT_SUCCESS 0 | |
46 #endif | |
47 | |
48 #ifndef EXIT_FAILURE | |
49 #define EXIT_FAILURE 1 | |
50 #endif | |
51 | |
52 static void fatal_error (int, const char *, int) ATTRIBUTE_NORETURN; | |
53 void writeout_test (int, const char *); | |
54 void run_replaces (char *); | |
55 void hook_char_replace (char *, size_t, char, char); | |
56 int run_tests (const char **); | |
57 void erase_test (int); | |
58 | |
59 /* Test input data, argv before, and argv after: | |
60 | |
61 The \n is an important part of test_data since expandargv | |
62 may have to work in environments where \n is translated | |
63 as \r\n. Thus \n is included in the test data for the file. | |
64 | |
65 We use \b to indicate that the test data is the null character. | |
66 This is because we use \0 normally to represent the end of the | |
67 file data, so we need something else for this. */ | |
68 | |
69 #define FILENAME_PATTERN "test-expandargv-%d.lst" | |
70 #define ARGV0 "test-expandargv" | |
71 | |
72 const char *test_data[] = { | |
73 /* Test 0 - Check for expansion with \r\n */ | |
74 "a\r\nb", /* Test 0 data */ | |
75 ARGV0, | |
76 "@test-expandargv-0.lst", | |
77 0, /* End of argv[] before expansion */ | |
78 ARGV0, | |
79 "a", | |
80 "b", | |
81 0, /* End of argv[] after expansion */ | |
82 | |
83 /* Test 1 - Check for expansion with \n */ | |
84 "a\nb", /* Test 1 data */ | |
85 ARGV0, | |
86 "@test-expandargv-1.lst", | |
87 0, | |
88 ARGV0, | |
89 "a", | |
90 "b", | |
91 0, | |
92 | |
93 /* Test 2 - Check for expansion with \0 */ | |
94 "a\bb", /* Test 2 data */ | |
95 ARGV0, | |
96 "@test-expandargv-2.lst", | |
97 0, | |
98 ARGV0, | |
99 "a", | |
100 0, | |
101 | |
102 /* Test 3 - Check for expansion with only \0 */ | |
103 "\b", /* Test 3 data */ | |
104 ARGV0, | |
105 "@test-expandargv-3.lst", | |
106 0, | |
107 ARGV0, | |
108 0, | |
109 | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
110 /* Test 4 - Check for options beginning with an empty line. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
111 "\na\nb", /* Test 4 data */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
112 ARGV0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
113 "@test-expandargv-4.lst", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
114 0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
115 ARGV0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
116 "a", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
117 "b", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
118 0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
119 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
120 /* Test 5 - Check for options containing an empty argument. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
121 "a\n''\nb", /* Test 5 data */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
122 ARGV0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
123 "@test-expandargv-5.lst", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
124 0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
125 ARGV0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
126 "a", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
127 "", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
128 "b", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
129 0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
130 |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
131 /* Test 6 - Check for options containing a quoted newline. */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
132 "a\n'a\n\nb'\nb", /* Test 6 data */ |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
133 ARGV0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
134 "@test-expandargv-6.lst", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
135 0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
136 ARGV0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
137 "a", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
138 "a\n\nb", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
139 "b", |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
140 0, |
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
141 |
0 | 142 0 /* Test done marker, don't remove. */ |
143 }; | |
144 | |
145 /* Print a fatal error and exit. LINE is the line number where we | |
146 detected the error, ERRMSG is the error message to print, and ERR | |
147 is 0 or an errno value to print. */ | |
148 | |
149 static void | |
150 fatal_error (int line, const char *errmsg, int err) | |
151 { | |
152 fprintf (stderr, "test-expandargv:%d: %s", line, errmsg); | |
153 if (errno != 0) | |
154 fprintf (stderr, ": %s", xstrerror (err)); | |
155 fprintf (stderr, "\n"); | |
156 exit (EXIT_FAILURE); | |
157 } | |
158 | |
159 /* hook_char_replace: | |
160 Replace 'replacethis' with 'withthis' */ | |
161 | |
162 void | |
163 hook_char_replace (char *string, size_t len, char replacethis, char withthis) | |
164 { | |
165 int i = 0; | |
166 for (i = 0; i < len; i++) | |
167 if (string[i] == replacethis) | |
168 string[i] = withthis; | |
169 } | |
170 | |
171 /* run_replaces: | |
172 Hook here all the character for character replaces. | |
173 Be warned that expanding the string or contracting the string | |
174 should be handled with care. */ | |
175 | |
176 void | |
177 run_replaces (char * string) | |
178 { | |
179 /* Store original string size */ | |
180 size_t len = strlen (string); | |
181 hook_char_replace (string, len, '\b', '\0'); | |
182 } | |
183 | |
184 /* write_test: | |
185 Write test datafile */ | |
186 | |
187 void | |
188 writeout_test (int test, const char * test_data) | |
189 { | |
190 char filename[256]; | |
191 FILE *fd; | |
192 size_t len; | |
193 char * parse; | |
194 | |
195 /* Unique filename per test */ | |
196 sprintf (filename, FILENAME_PATTERN, test); | |
197 fd = fopen (filename, "w"); | |
198 if (fd == NULL) | |
199 fatal_error (__LINE__, "Failed to create test file.", errno); | |
200 | |
201 /* Generate RW copy of data for replaces */ | |
202 len = strlen (test_data); | |
203 parse = malloc (sizeof (char) * (len + 1)); | |
204 if (parse == NULL) | |
205 fatal_error (__LINE__, "Failed to malloc parse.", errno); | |
206 | |
207 memcpy (parse, test_data, sizeof (char) * len); | |
208 /* Run all possible replaces */ | |
209 run_replaces (parse); | |
210 | |
211 fwrite (parse, len, sizeof (char), fd); | |
212 free (parse); | |
213 fclose (fd); | |
214 } | |
215 | |
216 /* erase_test: | |
217 Erase the test file */ | |
218 | |
219 void | |
220 erase_test (int test) | |
221 { | |
222 char filename[256]; | |
223 sprintf (filename, FILENAME_PATTERN, test); | |
224 if (unlink (filename) != 0) | |
225 fatal_error (__LINE__, "Failed to erase test file.", errno); | |
226 } | |
227 | |
228 | |
229 /* run_tests: | |
230 Run expandargv | |
231 Compare argv before and after. | |
232 Return number of fails */ | |
233 | |
234 int | |
235 run_tests (const char **test_data) | |
236 { | |
237 int argc_after, argc_before; | |
238 char ** argv_before, ** argv_after; | |
239 int i, j, k, fails, failed; | |
240 | |
241 i = j = fails = 0; | |
242 /* Loop over all the tests */ | |
243 while (test_data[j]) | |
244 { | |
245 /* Write test data */ | |
246 writeout_test (i, test_data[j++]); | |
247 /* Copy argv before */ | |
248 argv_before = dupargv ((char **) &test_data[j]); | |
249 | |
250 /* Count argc before/after */ | |
251 argc_before = 0; | |
252 argc_after = 0; | |
253 while (test_data[j + argc_before]) | |
254 argc_before++; | |
255 j += argc_before + 1; /* Skip null */ | |
256 while (test_data[j + argc_after]) | |
257 argc_after++; | |
258 | |
259 /* Copy argv after */ | |
260 argv_after = dupargv ((char **) &test_data[j]); | |
261 | |
262 /* Run all possible replaces */ | |
263 for (k = 0; k < argc_before; k++) | |
264 run_replaces (argv_before[k]); | |
265 for (k = 0; k < argc_after; k++) | |
266 run_replaces (argv_after[k]); | |
267 | |
268 /* Run test: Expand arguments */ | |
269 expandargv (&argc_before, &argv_before); | |
270 | |
271 failed = 0; | |
272 /* Compare size first */ | |
273 if (argc_before != argc_after) | |
274 { | |
275 printf ("FAIL: test-expandargv-%d. Number of arguments don't match.\n", i); | |
276 failed++; | |
277 } | |
278 /* Compare each of the argv's ... */ | |
279 else | |
280 for (k = 0; k < argc_after; k++) | |
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
281 if (strcmp (argv_before[k], argv_after[k]) != 0) |
0 | 282 { |
283 printf ("FAIL: test-expandargv-%d. Arguments don't match.\n", i); | |
284 failed++; | |
285 } | |
286 | |
287 if (!failed) | |
288 printf ("PASS: test-expandargv-%d.\n", i); | |
289 else | |
290 fails++; | |
291 | |
292 freeargv (argv_before); | |
293 freeargv (argv_after); | |
294 /* Advance to next test */ | |
295 j += argc_after + 1; | |
296 /* Erase test file */ | |
297 erase_test (i); | |
298 i++; | |
299 } | |
300 return fails; | |
301 } | |
302 | |
303 /* main: | |
304 Run tests. | |
305 Check result and exit with appropriate code. */ | |
306 | |
307 int | |
308 main(int argc, char **argv) | |
309 { | |
310 int fails; | |
311 /* Repeat for all the tests: | |
312 - Parse data array and write into file. | |
313 - Run replace hooks before writing to file. | |
314 - Parse data array and build argv before/after. | |
315 - Run replace hooks on argv before/after | |
316 - Run expandargv. | |
317 - Compare output of expandargv argv to after argv. | |
318 - If they compare the same then test passes | |
319 else the test fails. | |
320 - Erase test file. */ | |
321 | |
322 fails = run_tests (test_data); | |
323 if (!fails) | |
324 exit (EXIT_SUCCESS); | |
325 else | |
326 exit (EXIT_FAILURE); | |
327 } | |
328 |