1 | /* Test and measure STRLEN functions. |
2 | Copyright (C) 1999-2024 Free Software Foundation, Inc. |
3 | This file is part of the GNU C Library. |
4 | |
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. |
9 | |
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. |
14 | |
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/>. */ |
18 | |
19 | #define TEST_MAIN |
20 | #ifndef WIDE |
21 | # define TEST_NAME "strlen" |
22 | #else |
23 | # define TEST_NAME "wcslen" |
24 | #endif |
25 | #include "test-string.h" |
26 | |
27 | #ifndef WIDE |
28 | # define STRLEN strlen |
29 | # define CHAR char |
30 | # define MAX_CHAR CHAR_MAX |
31 | #else |
32 | # include <wchar.h> |
33 | # define STRLEN wcslen |
34 | # define CHAR wchar_t |
35 | # define MAX_CHAR WCHAR_MAX |
36 | #endif |
37 | |
38 | typedef size_t (*proto_t) (const CHAR *); |
39 | |
40 | IMPL (STRLEN, 1) |
41 | |
42 | /* Also check the generic implementation. */ |
43 | #undef STRLEN |
44 | #undef weak_alias |
45 | #define weak_alias(a, b) |
46 | #undef libc_hidden_builtin_def |
47 | #define libc_hidden_builtin_def(a) |
48 | #ifndef WIDE |
49 | # define STRLEN __strlen_default |
50 | # include "string/strlen.c" |
51 | IMPL (__strlen_default, 1) |
52 | #else |
53 | # define WCSLEN __wcslen_default |
54 | # include "wcsmbs/wcslen.c" |
55 | IMPL (__wcslen_default, 1) |
56 | #endif |
57 | |
58 | |
59 | static void |
60 | do_one_test (impl_t *impl, const CHAR *s, size_t exp_len) |
61 | { |
62 | size_t len = CALL (impl, s); |
63 | if (len != exp_len) |
64 | { |
65 | error (status: 0, errnum: 0, format: "Wrong result in function %s %zd %zd" , impl->name, |
66 | len, exp_len); |
67 | ret = 1; |
68 | return; |
69 | } |
70 | } |
71 | |
72 | static void |
73 | do_test (size_t align, size_t len) |
74 | { |
75 | size_t i; |
76 | |
77 | align &= (getpagesize () / sizeof (CHAR)) - 1; |
78 | if (align + sizeof (CHAR) * len >= page_size) |
79 | return; |
80 | |
81 | CHAR *buf = (CHAR *) (buf1); |
82 | |
83 | for (i = 0; i < len; ++i) |
84 | buf[align + i] = 1 + 11111 * i % MAX_CHAR; |
85 | buf[align + len] = 0; |
86 | |
87 | FOR_EACH_IMPL (impl, 0) |
88 | do_one_test (impl, s: (CHAR *) (buf + align), exp_len: len); |
89 | } |
90 | |
91 | static void |
92 | do_random_tests (void) |
93 | { |
94 | size_t i, j, n, align, len; |
95 | CHAR *p = (CHAR *) (buf1 + page_size - 512 * sizeof (CHAR)); |
96 | |
97 | for (n = 0; n < ITERATIONS; n++) |
98 | { |
99 | align = random () & 15; |
100 | len = random () & 511; |
101 | if (len + align > 510) |
102 | len = 511 - align - (random () & 7); |
103 | j = len + align + 64; |
104 | if (j > 512) |
105 | j = 512; |
106 | |
107 | for (i = 0; i < j; i++) |
108 | { |
109 | if (i == len + align) |
110 | p[i] = 0; |
111 | else |
112 | { |
113 | p[i] = random () & 255; |
114 | if (i >= align && i < len + align && !p[i]) |
115 | p[i] = (random () & 127) + 1; |
116 | } |
117 | } |
118 | |
119 | FOR_EACH_IMPL (impl, 1) |
120 | if (CALL (impl, (CHAR *) (p + align)) != len) |
121 | { |
122 | error (status: 0, errnum: 0, format: "Iteration %zd - wrong result in function %s (%zd) %zd != %zd, p %p" , |
123 | n, impl->name, align, CALL (impl, (CHAR *) (p + align)), |
124 | len, p); |
125 | ret = 1; |
126 | } |
127 | } |
128 | } |
129 | |
130 | int |
131 | test_main (void) |
132 | { |
133 | size_t i; |
134 | |
135 | test_init (); |
136 | |
137 | printf (format: "%20s" , "" ); |
138 | FOR_EACH_IMPL (impl, 0) |
139 | printf (format: "\t%s" , impl->name); |
140 | putchar (c: '\n'); |
141 | |
142 | /* Checking with only 4 * N alignments for wcslen, other alignments are wrong for wchar_t type arrays*/ |
143 | |
144 | for (i = 1; i < 8; ++i) |
145 | { |
146 | do_test (align: sizeof (CHAR) * i, len: i); |
147 | do_test (align: 0, len: i); |
148 | } |
149 | |
150 | for (i = 2; i <= 12; ++i) |
151 | { |
152 | do_test (align: 0, len: 1 << i); |
153 | do_test (align: sizeof (CHAR) * 7, len: 1 << i); |
154 | do_test (align: sizeof (CHAR) * i, len: 1 << i); |
155 | do_test (align: sizeof (CHAR) * i, len: (size_t)((1 << i) / 1.5)); |
156 | } |
157 | |
158 | /* Test strings near page boundary */ |
159 | |
160 | size_t maxlength = 64 / sizeof (CHAR) - 1; |
161 | size_t pagesize = getpagesize () / sizeof (CHAR); |
162 | |
163 | for (i = maxlength ; i > 1; --i) |
164 | { |
165 | /* String stays on the same page. */ |
166 | do_test (align: pagesize - i, len: i - 1); |
167 | /* String crosses page boundary. */ |
168 | do_test (align: pagesize - i, len: maxlength); |
169 | } |
170 | |
171 | do_random_tests (); |
172 | return ret; |
173 | } |
174 | |
175 | #include <support/test-driver.c> |
176 | |