1 /*
2 * Copyright (C) 2002 by Red Hat, Incorporated. All rights reserved.
3 *
4 * Permission to use, copy, modify, and distribute this software
5 * is freely granted, provided that this notice is preserved.
6 */
7
8 #include <string.h>
9 #include <stdio.h>
10 #include <stdlib.h>
11
12 #ifndef MAX_1
13 #ifdef __SPU__
14 #define MAX_1 11000
15 #else
16 #define MAX_1 33000
17 #endif
18 #endif
19
20 #define MAX_2 (2 * MAX_1 + MAX_1 / 10)
21
eprintf(int line,char * result,char * expected,int size)22 void eprintf (int line, char *result, char *expected, int size)
23 {
24 if (size != 0)
25 printf ("Failure at line %d, result is <%.*s>, should be <%s> of size %d\n",
26 line, size, result, expected, size);
27 else
28 printf ("Failure at line %d, result is <%s>, should be <%s>\n",
29 line, result, expected);
30 }
31
mycopy(char * target,char * source,int size)32 void mycopy (char *target, char *source, int size)
33 {
34 int i;
35
36 for (i = 0; i < size; ++i)
37 {
38 target[i] = source[i];
39 }
40 }
41
myset(char * target,char ch,int size)42 void myset (char *target, char ch, int size)
43 {
44 int i;
45
46 for (i = 0; i < size; ++i)
47 {
48 target[i] = ch;
49 }
50 }
51
main()52 int main()
53 {
54 char target[MAX_1] = "A";
55 char first_char;
56 char second_char;
57 char array[] = "abcdefghijklmnopqrstuvwxz";
58 char array2[] = "0123456789!@#$%^&*(";
59 char buffer2[MAX_1];
60 char buffer3[MAX_1];
61 char buffer4[MAX_1];
62 char buffer5[MAX_2];
63 char buffer6[MAX_2];
64 char buffer7[MAX_2];
65 char expected[MAX_1];
66 char *tmp1, *tmp2, *tmp3, *tmp4, *tmp5, *tmp6, *tmp7;
67 int i, j, k, x, z, align_test_iterations;
68
69 int test_failed = 0;
70
71 tmp1 = target;
72 tmp2 = buffer2;
73 tmp3 = buffer3;
74 tmp4 = buffer4;
75 tmp5 = buffer5;
76 tmp6 = buffer6;
77 tmp7 = buffer7;
78
79 tmp2[0] = 'Z';
80 tmp2[1] = '\0';
81
82 if (memset (target, 'X', 0) != target ||
83 memcpy (target, "Y", 0) != target ||
84 memmove (target, "K", 0) != target ||
85 strncpy (tmp2, "4", 0) != tmp2 ||
86 strncat (tmp2, "123", 0) != tmp2 ||
87 strcat (target, "") != target)
88 {
89 eprintf (__LINE__, target, "A", 0);
90 test_failed = 1;
91 }
92
93 if (strcmp (target, "A") || strlen(target) != 1 || memchr (target, 'A', 0) != NULL
94 || memcmp (target, "J", 0) || strncmp (target, "A", 1) || strncmp (target, "J", 0) ||
95 tmp2[0] != 'Z' || tmp2[1] != '\0')
96 {
97 eprintf (__LINE__, target, "A", 0);
98 test_failed = 1;
99 }
100
101 tmp2[2] = 'A';
102 if (strcpy (target, "") != target ||
103 strncpy (tmp2, "", 4) != tmp2 ||
104 strcat (target, "") != target)
105 {
106 eprintf (__LINE__, target, "", 0);
107 test_failed = 1;
108 }
109
110 if (target[0] != '\0' || strncmp (target, "", 1) ||
111 memcmp (tmp2, "\0\0\0\0", 4))
112 {
113 eprintf (__LINE__, target, "", 0);
114 test_failed = 1;
115 }
116
117 tmp2[2] = 'A';
118 if (strncat (tmp2, "1", 3) != tmp2 ||
119 memcmp (tmp2, "1\0A", 3))
120 {
121 eprintf (__LINE__, tmp2, "1\0A", 3);
122 test_failed = 1;
123 }
124
125 if (strcpy (tmp3, target) != tmp3 ||
126 strcat (tmp3, "X") != tmp3 ||
127 strncpy (tmp2, "X", 2) != tmp2 ||
128 memset (target, tmp2[0], 1) != target)
129 {
130 eprintf (__LINE__, target, "X", 0);
131 test_failed = 1;
132 }
133
134 if (strcmp (target, "X") || strlen (target) != 1 ||
135 memchr (target, 'X', 2) != target ||
136 strchr (target, 'X') != target ||
137 memchr (target, 'Y', 2) != NULL ||
138 strchr (target, 'Y') != NULL ||
139 strcmp (tmp3, target) ||
140 strncmp (tmp3, target, 2) ||
141 memcmp (target, "K", 0) ||
142 strncmp (target, tmp3, 3))
143 {
144 eprintf (__LINE__, target, "X", 0);
145 test_failed = 1;
146 }
147
148 if (strcpy (tmp3, "Y") != tmp3 ||
149 strcat (tmp3, "Y") != tmp3 ||
150 memset (target, 'Y', 2) != target)
151 {
152 eprintf (__LINE__, target, "Y", 0);
153 test_failed = 1;
154 }
155
156 target[2] = '\0';
157 if (memcmp (target, "YY", 2) || strcmp (target, "YY") ||
158 strlen (target) != 2 || memchr (target, 'Y', 2) != target ||
159 strcmp (tmp3, target) ||
160 strncmp (target, tmp3, 3) ||
161 strncmp (target, tmp3, 4) ||
162 strncmp (target, tmp3, 2) ||
163 strchr (target, 'Y') != target)
164 {
165 eprintf (__LINE__, target, "YY", 2);
166 test_failed = 1;
167 }
168
169 strcpy (target, "WW");
170 if (memcmp (target, "WW", 2) || strcmp (target, "WW") ||
171 strlen (target) != 2 || memchr (target, 'W', 2) != target ||
172 strchr (target, 'W') != target)
173 {
174 eprintf (__LINE__, target, "WW", 2);
175 test_failed = 1;
176 }
177
178 if (strncpy (target, "XX", 16) != target ||
179 memcmp (target, "XX\0\0\0\0\0\0\0\0\0\0\0\0\0\0", 16))
180 {
181 eprintf (__LINE__, target, "XX\0\0\0\0\0\0\0\0\0\0\0\0\0\0", 16);
182 test_failed = 1;
183 }
184
185 if (strcpy (tmp3, "ZZ") != tmp3 ||
186 strcat (tmp3, "Z") != tmp3 ||
187 memcpy (tmp4, "Z", 2) != tmp4 ||
188 strcat (tmp4, "ZZ") != tmp4 ||
189 memset (target, 'Z', 3) != target)
190 {
191 eprintf (__LINE__, target, "ZZZ", 3);
192 test_failed = 1;
193 }
194
195 target[3] = '\0';
196 tmp5[0] = '\0';
197 strncat (tmp5, "123", 2);
198 if (memcmp (target, "ZZZ", 3) || strcmp (target, "ZZZ") ||
199 strcmp (tmp3, target) || strcmp (tmp4, target) ||
200 strncmp (target, "ZZZ", 4) || strncmp (target, "ZZY", 3) <= 0 ||
201 strncmp ("ZZY", target, 4) >= 0 ||
202 memcmp (tmp5, "12", 3) ||
203 strlen (target) != 3)
204 {
205 eprintf (__LINE__, target, "ZZZ", 3);
206 test_failed = 1;
207 }
208
209 target[2] = 'K';
210 if (memcmp (target, "ZZZ", 2) || strcmp (target, "ZZZ") >= 0 ||
211 memcmp (target, "ZZZ", 3) >= 0 || strlen (target) != 3 ||
212 memchr (target, 'K', 3) != target + 2 ||
213 strncmp (target, "ZZZ", 2) || strncmp (target, "ZZZ", 4) >= 0 ||
214 strchr (target, 'K') != target + 2)
215 {
216 eprintf (__LINE__, target, "ZZK", 3);
217 test_failed = 1;
218 }
219
220 strcpy (target, "AAA");
221 if (memcmp (target, "AAA", 3) || strcmp (target, "AAA") ||
222 strncmp (target, "AAA", 3) ||
223 strlen (target) != 3)
224 {
225 eprintf (__LINE__, target, "AAA", 3);
226 test_failed = 1;
227 }
228
229 j = 5;
230 while (j < MAX_1)
231 {
232 for (i = j-1; i <= j+1; ++i)
233 {
234 /* don't bother checking unaligned data in the larger
235 sizes since it will waste time without performing additional testing */
236 if (i <= 16 * sizeof(long))
237 {
238 align_test_iterations = 2*sizeof(long);
239 if (i <= 2 * sizeof(long) + 1)
240 z = 2;
241 else
242 z = 2 * sizeof(long);
243 }
244 else
245 {
246 align_test_iterations = 1;
247 }
248
249 for (x = 0; x < align_test_iterations; ++x)
250 {
251 tmp1 = target + x;
252 tmp2 = buffer2 + x;
253 tmp3 = buffer3 + x;
254 tmp4 = buffer4 + x;
255 tmp5 = buffer5 + x;
256 tmp6 = buffer6 + x;
257
258 first_char = array[i % (sizeof(array) - 1)];
259 second_char = array2[i % (sizeof(array2) - 1)];
260 memset (tmp1, first_char, i);
261 mycopy (tmp2, tmp1, i);
262 myset (tmp2 + z, second_char, i - z - 1);
263 if (memcpy (tmp1 + z, tmp2 + z, i - z - 1) != tmp1 + z)
264 {
265 printf ("error at line %d\n", __LINE__);
266 test_failed = 1;
267 }
268
269 tmp1[i] = '\0';
270 tmp2[i] = '\0';
271 if (strcpy (expected, tmp2) != expected)
272 {
273 printf ("error at line %d\n", __LINE__);
274 test_failed = 1;
275 }
276 tmp2[i-z] = first_char + 1;
277 if (memmove (tmp2 + z + 1, tmp2 + z, i - z - 1) != tmp2 + z + 1 ||
278 memset (tmp3, first_char, i) != tmp3)
279 {
280 printf ("error at line %d\n", __LINE__);
281 test_failed = 1;
282 }
283
284 myset (tmp4, first_char, i);
285 tmp5[0] = '\0';
286 if (strncpy (tmp5, tmp1, i+1) != tmp5 ||
287 strcat (tmp5, tmp1) != tmp5)
288 {
289 printf ("error at line %d\n", __LINE__);
290 test_failed = 1;
291 }
292 mycopy (tmp6, tmp1, i);
293 mycopy (tmp6 + i, tmp1, i + 1);
294
295 tmp7[2*i+z] = second_char;
296 strcpy (tmp7, tmp1);
297
298 strchr (tmp1, second_char);
299
300 if (memcmp (tmp1, expected, i) || strcmp (tmp1, expected) ||
301 strncmp (tmp1, expected, i) ||
302 strncmp (tmp1, expected, i+1) ||
303 strcmp (tmp1, tmp2) >= 0 || memcmp (tmp1, tmp2, i) >= 0 ||
304 strncmp (tmp1, tmp2, i+1) >= 0 ||
305 strlen (tmp1) != i || memchr (tmp1, first_char, i) != tmp1 ||
306 strchr (tmp1, first_char) != tmp1 ||
307 memchr (tmp1, second_char, i) != tmp1 + z ||
308 strchr (tmp1, second_char) != tmp1 + z ||
309 strcmp (tmp5, tmp6) ||
310 strncat (tmp7, tmp1, i+2) != tmp7 ||
311 strcmp (tmp7, tmp6) ||
312 tmp7[2*i+z] != second_char)
313 {
314 eprintf (__LINE__, tmp1, expected, 0);
315 printf ("x is %d\n",x);
316 printf ("i is %d\n", i);
317 printf ("tmp1 is <%p>\n", tmp1);
318 printf ("tmp5 is <%p> <%s>\n", tmp5, tmp5);
319 printf ("tmp6 is <%p> <%s>\n", tmp6, tmp6);
320 test_failed = 1;
321 }
322
323 for (k = 1; k <= align_test_iterations && k <= i; ++k)
324 {
325 if (memcmp (tmp3, tmp4, i - k + 1) != 0 ||
326 strncmp (tmp3, tmp4, i - k + 1) != 0)
327 {
328 printf ("Failure at line %d, comparing %.*s with %.*s\n",
329 __LINE__, i, tmp3, i, tmp4);
330 test_failed = 1;
331 }
332 tmp4[i-k] = first_char + 1;
333 if (memcmp (tmp3, tmp4, i) >= 0 ||
334 strncmp (tmp3, tmp4, i) >= 0 ||
335 memcmp (tmp4, tmp3, i) <= 0 ||
336 strncmp (tmp4, tmp3, i) <= 0)
337 {
338 printf ("Failure at line %d, comparing %.*s with %.*s\n",
339 __LINE__, i, tmp3, i, tmp4);
340 test_failed = 1;
341 }
342 tmp4[i-k] = first_char;
343 }
344 }
345 }
346 j = ((2 * j) >> 2) << 2;
347 }
348
349 if (test_failed)
350 abort();
351 else
352 exit(0);
353 }
354