1 /* Test and measure strpbrk functions.
2 Copyright (C) 1999-2022 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
21 # define UCHAR unsigned char
22 # define STRLEN strlen
23 # define STRCHR strchr
24 # define BIG_CHAR CHAR_MAX
25 # define SMALL_CHAR 127
29 # define UCHAR wchar_t
30 # define STRLEN wcslen
31 # define STRCHR wcschr
32 # define BIG_CHAR WCHAR_MAX
33 # define SMALL_CHAR 1273
36 #ifndef STRPBRK_RESULT
37 # define STRPBRK_RESULT(s, pos) ((s)[(pos)] ? (s) + (pos) : NULL)
38 # define RES_TYPE CHAR *
41 # define TEST_NAME "strpbrk"
43 # define TEST_NAME "wcspbrk"
45 # include "test-string.h"
48 # define STRPBRK strpbrk
49 # define SIMPLE_STRPBRK simple_strpbrk
50 # define STUPID_STRPBRK stupid_strpbrk
53 # define STRPBRK wcspbrk
54 # define SIMPLE_STRPBRK simple_wcspbrk
55 # define STUPID_STRPBRK stupid_wcspbrk
58 typedef CHAR
*(*proto_t
) (const CHAR
*, const CHAR
*);
59 CHAR
*SIMPLE_STRPBRK (const CHAR
*, const CHAR
*);
60 CHAR
*STUPID_STRPBRK (const CHAR
*, const CHAR
*);
62 IMPL (STUPID_STRPBRK
, 0)
63 IMPL (SIMPLE_STRPBRK
, 0)
67 SIMPLE_STRPBRK (const CHAR
*s
, const CHAR
*rej
)
72 while ((c
= *s
++) != '\0')
73 for (r
= rej
; *r
!= '\0'; ++r
)
75 return (CHAR
*) s
- 1;
80 STUPID_STRPBRK (const CHAR
*s
, const CHAR
*rej
)
82 size_t ns
= STRLEN (s
), nrej
= STRLEN (rej
);
85 for (i
= 0; i
< ns
; ++i
)
86 for (j
= 0; j
< nrej
; ++j
)
88 return (CHAR
*) s
+ i
;
91 #endif /* !STRPBRK_RESULT */
94 do_one_test (impl_t
*impl
, const CHAR
*s
, const CHAR
*rej
, RES_TYPE exp_res
)
96 RES_TYPE res
= CALL (impl
, s
, rej
);
99 error (0, 0, "Wrong result in function %s %p %p", impl
->name
,
100 (void *) res
, (void *) exp_res
);
107 do_test (size_t align
, size_t pos
, size_t len
)
115 if ((align
+ pos
+ 10) * sizeof (CHAR
) >= page_size
|| len
> 240)
118 rej
= (CHAR
*) (buf2
) + (random () & 255);
119 s
= (CHAR
*) (buf1
) + align
;
121 for (i
= 0; i
< len
; ++i
)
123 rej
[i
] = random () & BIG_CHAR
;
125 rej
[i
] = random () & BIG_CHAR
;
127 rej
[i
] = 1 + (random () & SMALL_CHAR
);
130 for (c
= 1; c
<= BIG_CHAR
; ++c
)
131 if (STRCHR (rej
, c
) == NULL
)
134 for (i
= 0; i
< pos
; ++i
)
136 s
[i
] = random () & BIG_CHAR
;
137 if (STRCHR (rej
, s
[i
]))
139 s
[i
] = random () & BIG_CHAR
;
140 if (STRCHR (rej
, s
[i
]))
144 s
[pos
] = rej
[random () % (len
+ 1)];
147 for (i
= pos
+ 1; i
< pos
+ 10; ++i
)
148 s
[i
] = random () & BIG_CHAR
;
151 result
= STRPBRK_RESULT (s
, pos
);
153 FOR_EACH_IMPL (impl
, 0)
154 do_one_test (impl
, s
, rej
, result
);
158 do_random_tests (void)
160 size_t i
, j
, n
, align
, pos
, len
, rlen
;
163 UCHAR
*p
= (UCHAR
*) (buf1
+ page_size
) - 512;
166 for (n
= 0; n
< ITERATIONS
; n
++)
168 align
= random () & 15;
169 pos
= random () & 511;
170 if (pos
+ align
>= 511)
171 pos
= 510 - align
- (random () & 7);
172 len
= random () & 511;
173 if (pos
>= len
&& (random () & 1))
174 len
= pos
+ 1 + (random () & 7);
175 if (len
+ align
>= 512)
176 len
= 511 - align
- (random () & 7);
178 rlen
= random () & 63;
180 rlen
= random () & 15;
181 rej
= (UCHAR
*) (buf2
+ page_size
) - rlen
- 1 - (random () & 7);
182 for (i
= 0; i
< rlen
; ++i
)
184 rej
[i
] = random () & BIG_CHAR
;
186 rej
[i
] = random () & BIG_CHAR
;
188 rej
[i
] = 1 + (random () & SMALL_CHAR
);
191 for (c
= 1; c
<= BIG_CHAR
; ++c
)
192 if (STRCHR ((CHAR
*) rej
, c
) == NULL
)
194 j
= (pos
> len
? pos
: len
) + align
+ 64;
198 for (i
= 0; i
< j
; i
++)
200 if (i
== len
+ align
)
202 else if (i
== pos
+ align
)
203 p
[i
] = rej
[random () % (rlen
+ 1)];
204 else if (i
< align
|| i
> pos
+ align
)
205 p
[i
] = random () & BIG_CHAR
;
208 p
[i
] = random () & BIG_CHAR
;
209 if (STRCHR ((CHAR
*) rej
, p
[i
]))
211 p
[i
] = random () & BIG_CHAR
;
212 if (STRCHR ((CHAR
*) rej
, p
[i
]))
218 result
= STRPBRK_RESULT ((CHAR
*) (p
+ align
), pos
< len
? pos
: len
);
220 FOR_EACH_IMPL (impl
, 1)
221 if (CALL (impl
, (CHAR
*) (p
+ align
), (CHAR
*) rej
) != result
)
223 error (0, 0, "Iteration %zd - wrong result in function %s (%zd, %p, %zd, %zd, %zd) %p != %p",
224 n
, impl
->name
, align
, rej
, rlen
, pos
, len
,
225 (void *) CALL (impl
, (CHAR
*) (p
+ align
), (CHAR
*) rej
),
240 FOR_EACH_IMPL (impl
, 0)
241 printf ("\t%s", impl
->name
);
244 for (i
= 0; i
< 32; ++i
)
250 for (i
= 1; i
< 8; ++i
)
252 do_test (0, 16 << i
, 4);
253 do_test (i
, 16 << i
, 4);
256 for (i
= 1; i
< 8; ++i
)
259 for (i
= 0; i
< 64; ++i
)
266 #include <support/test-driver.c>