1 /* Test and measure strncasecmp functions.
2 Copyright (C) 1999, 2002, 2003, 2005, 2010 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Written by Jakub Jelinek <jakub@redhat.com>, 1999.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
22 #include "test-string.h"
24 typedef int (*proto_t
) (const char *, const char *, size_t);
25 static int simple_strncasecmp (const char *, const char *, size_t);
26 static int stupid_strncasecmp (const char *, const char *, size_t);
28 IMPL (stupid_strncasecmp
, 0)
29 IMPL (simple_strncasecmp
, 0)
33 simple_strncasecmp (const char *s1
, const char *s2
, size_t n
)
40 while ((ret
= ((unsigned char) tolower (*s1
)
41 - (unsigned char) tolower (*s2
))) == 0
52 stupid_strncasecmp (const char *s1
, const char *s2
, size_t max
)
54 size_t ns1
= strlen (s1
) + 1;
55 size_t ns2
= strlen (s2
) + 1;
56 size_t n
= ns1
< ns2
? ns1
: ns2
;
63 if ((ret
= ((unsigned char) tolower (*s1
)
64 - (unsigned char) tolower (*s2
))) != 0)
73 check_result (impl_t
*impl
, const char *s1
, const char *s2
, size_t n
,
76 int result
= CALL (impl
, s1
, s2
, n
);
77 if ((exp_result
== 0 && result
!= 0)
78 || (exp_result
< 0 && result
>= 0)
79 || (exp_result
> 0 && result
<= 0))
81 error (0, 0, "Wrong result in function %s %d %d", impl
->name
,
91 do_one_test (impl_t
*impl
, const char *s1
, const char *s2
, size_t n
,
94 if (check_result (impl
, s1
, s2
, n
, exp_result
) < 0)
99 hp_timing_t start
__attribute ((unused
));
100 hp_timing_t stop
__attribute ((unused
));
101 hp_timing_t best_time
= ~ (hp_timing_t
) 0;
104 for (i
= 0; i
< 32; ++i
)
106 HP_TIMING_NOW (start
);
107 CALL (impl
, s1
, s2
, n
);
108 HP_TIMING_NOW (stop
);
109 HP_TIMING_BEST (best_time
, start
, stop
);
112 printf ("\t%zd", (size_t) best_time
);
117 do_test (size_t align1
, size_t align2
, size_t n
, size_t len
, int max_char
,
127 if (align1
+ len
+ 1 >= page_size
)
131 if (align2
+ len
+ 1 >= page_size
)
134 s1
= (char *) (buf1
+ align1
);
135 s2
= (char *) (buf2
+ align2
);
137 for (i
= 0; i
< len
; i
++)
139 s1
[i
] = toupper (1 + 23 * i
% max_char
);
140 s2
[i
] = tolower (s1
[i
]);
143 s1
[len
] = s2
[len
] = 0;
145 s2
[len
+ 1] = 24 + exp_result
;
146 if ((s2
[len
- 1] == 'z' && exp_result
== -1)
147 || (s2
[len
- 1] == 'a' && exp_result
== 1))
148 s1
[len
- 1] += exp_result
;
150 s2
[len
- 1] -= exp_result
;
153 printf ("Length %4zd, alignment %2zd/%2zd:", len
, align1
, align2
);
155 FOR_EACH_IMPL (impl
, 0)
156 do_one_test (impl
, s1
, s2
, n
, exp_result
);
163 do_random_tests (void)
165 size_t i
, j
, n
, align1
, align2
, pos
, len1
, len2
;
168 unsigned char *p1
= buf1
+ page_size
- 512;
169 unsigned char *p2
= buf2
+ page_size
- 512;
171 for (n
= 0; n
< ITERATIONS
; n
++)
173 align1
= random () & 31;
175 align2
= random () & 31;
177 align2
= align1
+ (random () & 24);
178 pos
= random () & 511;
179 j
= align1
> align2
? align1
: align2
;
181 pos
= 510 - j
- (random () & 7);
182 len1
= random () & 511;
183 if (pos
>= len1
&& (random () & 1))
184 len1
= pos
+ (random () & 7);
186 len1
= 511 - j
- (random () & 7);
190 len2
= len1
+ (len1
!= 511 - j
? random () % (511 - j
- len1
) : 0);
191 j
= (pos
> len2
? pos
: len2
) + align1
+ 64;
194 for (i
= 0; i
< j
; ++i
)
196 p1
[i
] = tolower (random () & 255);
197 if (i
< len1
+ align1
&& !p1
[i
])
199 p1
[i
] = tolower (random () & 255);
201 p1
[i
] = tolower (1 + (random () & 127));
204 for (i
= 0; i
< j
; ++i
)
206 p2
[i
] = toupper (random () & 255);
207 if (i
< len2
+ align2
&& !p2
[i
])
209 p2
[i
] = toupper (random () & 255);
211 toupper (p2
[i
] = 1 + (random () & 127));
216 memcpy (p2
+ align2
, p1
+ align1
, pos
);
219 if (tolower (p2
[align2
+ pos
]) == p1
[align1
+ pos
])
221 p2
[align2
+ pos
] = toupper (random () & 255);
222 if (tolower (p2
[align2
+ pos
]) == p1
[align1
+ pos
])
223 p2
[align2
+ pos
] = toupper (p1
[align1
+ pos
]
224 + 3 + (random () & 127));
227 if (p1
[align1
+ pos
] < tolower (p2
[align2
+ pos
]))
232 p1
[len1
+ align1
] = 0;
233 p2
[len2
+ align2
] = 0;
235 FOR_EACH_IMPL (impl
, 1)
237 r
= CALL (impl
, (char *) (p1
+ align1
), (char *) (p2
+ align2
),
238 pos
+ 1 + (random () & 255));
239 /* Test whether on 64-bit architectures where ABI requires
240 callee to promote has the promotion been done. */
241 asm ("" : "=g" (r
) : "0" (r
));
242 if ((r
== 0 && result
)
243 || (r
< 0 && result
>= 0)
244 || (r
> 0 && result
<= 0))
246 error (0, 0, "Iteration %zd - wrong result in function %s (%zd, %zd, %zd, %zd, %zd) %ld != %d, p1 %p p2 %p",
247 n
, impl
->name
, align1
, align2
, len1
, len2
, pos
, r
, result
, p1
, p2
);
258 static char cp
[4096+16] __attribute__ ((aligned(4096)));
259 static char gotrel
[4096] __attribute__ ((aligned(4096)));
260 char *s1
= cp
+ 0xffa;
261 char *s2
= gotrel
+ 0xcbe;
265 strcpy (s1
, "gottpoff");
266 strcpy (s2
, "GOTPLT");
268 exp_result
= simple_strncasecmp (s1
, s2
, n
);
269 FOR_EACH_IMPL (impl
, 0)
270 check_result (impl
, s1
, s2
, n
, exp_result
);
283 FOR_EACH_IMPL (impl
, 0)
284 printf ("\t%s", impl
->name
);
287 for (i
= 1; i
< 16; ++i
)
289 do_test (i
, i
, i
- 1, i
, 127, 0);
291 do_test (i
, i
, i
, i
, 127, 0);
292 do_test (i
, i
, i
, i
, 127, 1);
293 do_test (i
, i
, i
, i
, 127, -1);
295 do_test (i
, i
, i
+ 1, i
, 127, 0);
296 do_test (i
, i
, i
+ 1, i
, 127, 1);
297 do_test (i
, i
, i
+ 1, i
, 127, -1);
300 for (i
= 1; i
< 10; ++i
)
302 do_test (0, 0, (2 << i
) - 1, 2 << i
, 127, 0);
303 do_test (0, 0, 2 << i
, 2 << i
, 254, 0);
304 do_test (0, 0, (2 << i
) + 1, 2 << i
, 127, 0);
306 do_test (0, 0, (2 << i
) + 1, 2 << i
, 254, 0);
308 do_test (0, 0, 2 << i
, 2 << i
, 127, 1);
309 do_test (0, 0, (2 << i
) + 10, 2 << i
, 127, 1);
311 do_test (0, 0, 2 << i
, 2 << i
, 254, 1);
312 do_test (0, 0, (2 << i
) + 10, 2 << i
, 254, 1);
314 do_test (0, 0, 2 << i
, 2 << i
, 127, -1);
315 do_test (0, 0, (2 << i
) + 10, 2 << i
, 127, -1);
317 do_test (0, 0, 2 << i
, 2 << i
, 254, -1);
318 do_test (0, 0, (2 << i
) + 10, 2 << i
, 254, -1);
321 for (i
= 1; i
< 8; ++i
)
323 do_test (i
, 2 * i
, (8 << i
) - 1, 8 << i
, 127, 0);
324 do_test (i
, 2 * i
, 8 << i
, 8 << i
, 127, 0);
325 do_test (i
, 2 * i
, (8 << i
) + 100, 8 << i
, 127, 0);
327 do_test (2 * i
, i
, (8 << i
) - 1, 8 << i
, 254, 0);
328 do_test (2 * i
, i
, 8 << i
, 8 << i
, 254, 0);
329 do_test (2 * i
, i
, (8 << i
) + 100, 8 << i
, 254, 0);
331 do_test (i
, 2 * i
, 8 << i
, 8 << i
, 127, 1);
332 do_test (i
, 2 * i
, (8 << i
) + 100, 8 << i
, 127, 1);
334 do_test (2 * i
, i
, 8 << i
, 8 << i
, 254, 1);
335 do_test (2 * i
, i
, (8 << i
) + 100, 8 << i
, 254, 1);
337 do_test (i
, 2 * i
, 8 << i
, 8 << i
, 127, -1);
338 do_test (i
, 2 * i
, (8 << i
) + 100, 8 << i
, 127, -1);
340 do_test (2 * i
, i
, 8 << i
, 8 << i
, 254, -1);
341 do_test (2 * i
, i
, (8 << i
) + 100, 8 << i
, 254, -1);
348 #include "../test-skeleton.c"