1 /* Test and measure strpbrk functions.
2 Copyright (C) 1999, 2002 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, write to the Free
18 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
21 #ifndef STRPBRK_RESULT
22 # define STRPBRK_RESULT(s, pos) ((s)[(pos)] ? (s) + (pos) : NULL)
23 # define RES_TYPE char *
25 # include "test-string.h"
27 typedef char *(*proto_t
) (const char *, const char *);
28 char *simple_strpbrk (const char *, const char *);
29 char *stupid_strpbrk (const char *, const char *);
31 IMPL (stupid_strpbrk
, 0)
32 IMPL (simple_strpbrk
, 0)
36 simple_strpbrk (const char *s
, const char *rej
)
41 while ((c
= *s
++) != '\0')
42 for (r
= rej
; *r
!= '\0'; ++r
)
44 return (char *) s
- 1;
49 stupid_strpbrk (const char *s
, const char *rej
)
51 size_t ns
= strlen (s
), nrej
= strlen (rej
);
54 for (i
= 0; i
< ns
; ++i
)
55 for (j
= 0; j
< nrej
; ++j
)
57 return (char *) s
+ i
;
63 do_one_test (impl_t
*impl
, const char *s
, const char *rej
, RES_TYPE exp_res
)
65 RES_TYPE res
= CALL (impl
, s
, rej
);
68 error (0, 0, "Wrong result in function %s %p %p", impl
->name
,
69 (void *) res
, (void *) exp_res
);
76 hp_timing_t start
, stop
, best_time
= ~ (hp_timing_t
) 0;
79 for (i
= 0; i
< 32; ++i
)
81 HP_TIMING_NOW (start
);
84 HP_TIMING_BEST (best_time
, start
, stop
);
87 printf ("\t%zd", (size_t) best_time
);
92 do_test (size_t align
, size_t pos
, size_t len
)
100 if (align
+ pos
+ 10 >= page_size
|| len
> 240)
103 rej
= buf2
+ (random () & 255);
106 for (i
= 0; i
< len
; ++i
)
108 rej
[i
] = random () & 255;
110 rej
[i
] = random () & 255;
112 rej
[i
] = 1 + (random () & 127);
115 for (c
= 1; c
<= 255; ++c
)
116 if (strchr (rej
, c
) == NULL
)
119 for (i
= 0; i
< pos
; ++i
)
121 s
[i
] = random () & 255;
122 if (strchr (rej
, s
[i
]))
124 s
[i
] = random () & 255;
125 if (strchr (rej
, s
[i
]))
129 s
[pos
] = rej
[random () % (len
+ 1)];
132 for (i
= pos
+ 1; i
< pos
+ 10; ++i
)
133 s
[i
] = random () & 255;
136 result
= STRPBRK_RESULT (s
, pos
);
139 printf ("Length %4zd, alignment %2zd, rej len %2zd:", pos
, align
, len
);
141 FOR_EACH_IMPL (impl
, 0)
142 do_one_test (impl
, s
, rej
, result
);
149 do_random_tests (void)
151 size_t i
, j
, n
, align
, pos
, len
, rlen
;
154 unsigned char *p
= buf1
+ page_size
- 512;
157 for (n
= 0; n
< ITERATIONS
; n
++)
159 align
= random () & 15;
160 pos
= random () & 511;
161 if (pos
+ align
>= 511)
162 pos
= 510 - align
- (random () & 7);
163 len
= random () & 511;
164 if (pos
>= len
&& (random () & 1))
165 len
= pos
+ 1 + (random () & 7);
166 if (len
+ align
>= 512)
167 len
= 511 - align
- (random () & 7);
169 rlen
= random () & 63;
171 rlen
= random () & 15;
172 rej
= buf2
+ page_size
- rlen
- 1 - (random () & 7);
173 for (i
= 0; i
< rlen
; ++i
)
175 rej
[i
] = random () & 255;
177 rej
[i
] = random () & 255;
179 rej
[i
] = 1 + (random () & 127);
182 for (c
= 1; c
<= 255; ++c
)
183 if (strchr (rej
, c
) == NULL
)
185 j
= (pos
> len
? pos
: len
) + align
+ 64;
189 for (i
= 0; i
< j
; i
++)
191 if (i
== len
+ align
)
193 else if (i
== pos
+ align
)
194 p
[i
] = rej
[random () % (rlen
+ 1)];
195 else if (i
< align
|| i
> pos
+ align
)
196 p
[i
] = random () & 255;
199 p
[i
] = random () & 255;
200 if (strchr (rej
, p
[i
]))
202 p
[i
] = random () & 255;
203 if (strchr (rej
, p
[i
]))
209 result
= STRPBRK_RESULT (p
+ align
, pos
< len
? pos
: len
);
211 FOR_EACH_IMPL (impl
, 1)
212 if (CALL (impl
, p
+ align
, rej
) != result
)
214 error (0, 0, "Iteration %zd - wrong result in function %s (%zd, %p, %zd, %zd, %zd) %p != %p",
215 n
, impl
->name
, align
, rej
, rlen
, pos
, len
,
216 (void *) CALL (impl
, p
+ align
, rej
), (void *) result
);
230 FOR_EACH_IMPL (impl
, 0)
231 printf ("\t%s", impl
->name
);
234 for (i
= 0; i
< 32; ++i
)
240 for (i
= 1; i
< 8; ++i
)
242 do_test (0, 16 << i
, 4);
243 do_test (i
, 16 << i
, 4);
246 for (i
= 1; i
< 8; ++i
)
249 for (i
= 0; i
< 64; ++i
)
256 #include "../test-skeleton.c"