1 /* Test and measure strspn functions.
2 Copyright (C) 1999-2021 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 TEST_NAME "strspn"
23 # define TEST_NAME "wcsspn"
25 #include "test-string.h"
28 # define STRSPN strspn
30 # define UCHAR unsigned char
31 # define SIMPLE_STRSPN simple_strspn
32 # define STUPID_STRSPN stupid_strspn
33 # define STRLEN strlen
34 # define STRCHR strchr
35 # define BIG_CHAR CHAR_MAX
36 # define SMALL_CHAR 127
39 # define STRSPN wcsspn
41 # define UCHAR wchar_t
42 # define SIMPLE_STRSPN simple_wcsspn
43 # define STUPID_STRSPN stupid_wcsspn
44 # define STRLEN wcslen
45 # define STRCHR wcschr
46 # define BIG_CHAR WCHAR_MAX
47 # define SMALL_CHAR 1273
50 typedef size_t (*proto_t
) (const CHAR
*, const CHAR
*);
51 size_t SIMPLE_STRSPN (const CHAR
*, const CHAR
*);
52 size_t STUPID_STRSPN (const CHAR
*, const CHAR
*);
54 IMPL (STUPID_STRSPN
, 0)
55 IMPL (SIMPLE_STRSPN
, 0)
59 SIMPLE_STRSPN (const CHAR
*s
, const CHAR
*acc
)
61 const CHAR
*r
, *str
= s
;
64 while ((c
= *s
++) != '\0')
66 for (r
= acc
; *r
!= '\0'; ++r
)
76 STUPID_STRSPN (const CHAR
*s
, const CHAR
*acc
)
78 size_t ns
= STRLEN (s
), nacc
= STRLEN (acc
);
81 for (i
= 0; i
< ns
; ++i
)
83 for (j
= 0; j
< nacc
; ++j
)
93 do_one_test (impl_t
*impl
, const CHAR
*s
, const CHAR
*acc
, size_t exp_res
)
95 size_t res
= CALL (impl
, s
, acc
);
98 error (0, 0, "Wrong result in function %s %p %p", impl
->name
,
99 (void *) res
, (void *) exp_res
);
106 do_test (size_t align
, size_t pos
, size_t len
)
112 if ((align
+ pos
+ 10) * sizeof (CHAR
) >= page_size
|| len
> 240 || ! len
)
115 acc
= (CHAR
*) (buf2
) + (random () & 255);
116 s
= (CHAR
*) (buf1
) + align
;
118 for (i
= 0; i
< len
; ++i
)
120 acc
[i
] = random () & BIG_CHAR
;
122 acc
[i
] = random () & BIG_CHAR
;
124 acc
[i
] = 1 + (random () & SMALL_CHAR
);
128 for (i
= 0; i
< pos
; ++i
)
129 s
[i
] = acc
[random () % len
];
130 s
[pos
] = random () & BIG_CHAR
;
131 if (STRCHR (acc
, s
[pos
]))
135 for (i
= pos
+ 1; i
< pos
+ 10; ++i
)
136 s
[i
] = random () & BIG_CHAR
;
140 FOR_EACH_IMPL (impl
, 0)
141 do_one_test (impl
, s
, acc
, pos
);
145 do_random_tests (void)
147 size_t i
, j
, n
, align
, pos
, alen
, len
;
148 UCHAR
*p
= (UCHAR
*) (buf1
+ page_size
) - 512;
151 for (n
= 0; n
< ITERATIONS
; n
++)
153 align
= random () & 15;
155 alen
= random () & 63;
157 alen
= random () & 15;
161 pos
= random () & 511;
162 if (pos
+ align
>= 511)
163 pos
= 510 - align
- (random () & 7);
164 len
= random () & 511;
165 if (len
+ align
>= 512)
166 len
= 511 - align
- (random () & 7);
167 acc
= (UCHAR
*) (buf2
+ page_size
) - alen
- 1 - (random () & 7);
168 for (i
= 0; i
< alen
; ++i
)
170 acc
[i
] = random () & BIG_CHAR
;
172 acc
[i
] = random () & BIG_CHAR
;
174 acc
[i
] = 1 + (random () & SMALL_CHAR
);
177 j
= (pos
> len
? pos
: len
) + align
+ 64;
181 for (i
= 0; i
< j
; i
++)
183 if (i
== len
+ align
)
185 else if (i
== pos
+ align
)
187 p
[i
] = random () & BIG_CHAR
;
188 if (STRCHR ((CHAR
*) acc
, p
[i
]))
191 else if (i
< align
|| i
> pos
+ align
)
192 p
[i
] = random () & BIG_CHAR
;
194 p
[i
] = acc
[random () % alen
];
197 FOR_EACH_IMPL (impl
, 1)
198 if (CALL (impl
, (CHAR
*) (p
+ align
),
199 (CHAR
*) acc
) != (pos
< len
? pos
: len
))
201 error (0, 0, "Iteration %zd - wrong result in function %s (%zd, %p, %zd, %zd, %zd) %zd != %zd",
202 n
, impl
->name
, align
, acc
, alen
, pos
, len
,
203 CALL (impl
, (CHAR
*) (p
+ align
), (CHAR
*) acc
),
204 (pos
< len
? pos
: len
));
218 FOR_EACH_IMPL (impl
, 0)
219 printf ("\t%s", impl
->name
);
222 for (i
= 0; i
< 32; ++i
)
228 for (i
= 1; i
< 8; ++i
)
230 do_test (0, 16 << i
, 4);
231 do_test (i
, 16 << i
, 4);
234 for (i
= 1; i
< 8; ++i
)
237 for (i
= 0; i
< 64; ++i
)
244 #include <support/test-driver.c>