1 /* Measure strncpy functions.
2 Copyright (C) 2013-2023 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 BIG_CHAR MAX_CHAR
20
21 #ifdef WIDE
22 # define SMALL_CHAR 1273
23 #else
24 # define SMALL_CHAR 127
25 #endif /* !WIDE */
26
27 #include "json-lib.h"
28
29 #ifndef STRNCPY_RESULT
30 # define STRNCPY_RESULT(dst, len, n) dst
31 # define TEST_MAIN
32 # ifndef WIDE
33 # define TEST_NAME "strncpy"
34 # else
35 # define TEST_NAME "wcsncpy"
36 # define generic_strncpy generic_wcsncpy
37 # endif /* WIDE */
38 # include "bench-string.h"
39
40 CHAR *
41 generic_strncpy (CHAR *dst, const CHAR *src, size_t n)
42 {
43 size_t nc = STRNLEN (src, n);
44 if (nc != n)
45 MEMSET (dst + nc, 0, n - nc);
46 return MEMCPY (dst, src, nc);
47 }
48
49 IMPL (STRNCPY, 1)
50 IMPL (generic_strncpy, 0)
51
52 #endif /* !STRNCPY_RESULT */
53
54 typedef CHAR *(*proto_t) (CHAR *, const CHAR *, size_t);
55
56 static void
57 do_one_test (json_ctx_t *json_ctx, impl_t *impl, CHAR *dst, const CHAR *src,
58 size_t len, size_t n)
59 {
60 size_t i, iters = INNER_LOOP_ITERS_LARGE / CHARBYTES;
61 timing_t start, stop, cur;
62
63 if (CALL (impl, dst, src, n) != STRNCPY_RESULT (dst, len, n))
64 {
65 error (0, 0, "Wrong result in function %s %p %p", impl->name,
66 CALL (impl, dst, src, n), dst);
67 ret = 1;
68 return;
69 }
70
71 if (memcmp (dst, src, (len > n ? n : len) * sizeof (CHAR)) != 0)
72 {
73 error (0, 0, "Wrong result in function %s", impl->name);
74 ret = 1;
75 return;
76 }
77
78 if (n > len)
79 {
80 size_t i;
81
82 for (i = len; i < n; ++i)
83 if (dst[i] != '\0')
84 {
85 error (0, 0, "Wrong result in function %s", impl->name);
86 ret = 1;
87 return;
88 }
89 }
90
91 TIMING_NOW (start);
92 for (i = 0; i < iters; ++i)
93 {
94 CALL (impl, dst, src, n);
95 }
96 TIMING_NOW (stop);
97
98 TIMING_DIFF (cur, start, stop);
99
100 json_element_double (json_ctx, (double) cur / (double) iters);
101 }
102
103 static void
104 do_test (json_ctx_t *json_ctx, size_t align1, size_t align2, size_t len,
105 size_t n, int max_char)
106 {
107 size_t i;
108 CHAR *s1, *s2;
109
110 /* For wcsncpy: align1 and align2 here mean alignment not in bytes,
111 but in wchar_ts, in bytes it will equal to align * (sizeof (wchar_t)). */
112 align1 &= 7;
113 if ((align1 + len) * sizeof (CHAR) >= page_size)
114 return;
115
116 align2 &= 7;
117 if ((align2 + len) * sizeof (CHAR) >= page_size)
118 return;
119
120 s1 = (CHAR *) (buf1) + align1;
121 s2 = (CHAR *) (buf2) + align2;
122
123 for (i = 0; i < len; ++i)
124 s1[i] = 32 + 23 * i % (max_char - 32);
125 s1[len] = 0;
126 for (i = len + 1; (i + align1) * sizeof (CHAR) < page_size && i < len + 64;
127 ++i)
128 s1[i] = 32 + 32 * i % (max_char - 32);
129
130 json_element_object_begin (json_ctx);
131 json_attr_uint (json_ctx, "align1", align1);
132 json_attr_uint (json_ctx, "align2", align2);
133 json_attr_uint (json_ctx, "len", len);
134 json_attr_uint (json_ctx, "n", n);
135 json_attr_uint (json_ctx, "max_char", max_char);
136
137 json_array_begin (json_ctx, "timings");
138
139 FOR_EACH_IMPL (impl, 0)
140 do_one_test (json_ctx, impl, s2, s1, len, n);
141
142 json_array_end (json_ctx);
143 json_element_object_end (json_ctx);
144 }
145
146 static int
147 test_main (void)
148 {
149 json_ctx_t json_ctx;
150 size_t i, j;
151
152 test_init ();
153
154 json_init (&json_ctx, 0, stdout);
155
156 json_document_begin (&json_ctx);
157 json_attr_string (&json_ctx, "timing_type", TIMING_TYPE);
158
159 json_attr_object_begin (&json_ctx, "functions");
160 json_attr_object_begin (&json_ctx, TEST_NAME);
161 json_attr_string (&json_ctx, "bench-variant", "");
162
163 json_array_begin (&json_ctx, "ifuncs");
164 FOR_EACH_IMPL (impl, 0)
165 json_element_string (&json_ctx, impl->name);
166 json_array_end (&json_ctx);
167
168 json_array_begin (&json_ctx, "results");
169
170 for (i = 1; i < 8; ++i)
171 {
172 do_test (&json_ctx, i, i, 16, 16, SMALL_CHAR);
173 do_test (&json_ctx, i, i, 16, 16, BIG_CHAR);
174 do_test (&json_ctx, i, 2 * i, 16, 16, SMALL_CHAR);
175 do_test (&json_ctx, 2 * i, i, 16, 16, BIG_CHAR);
176 do_test (&json_ctx, 8 - i, 2 * i, 1 << i, 2 << i, SMALL_CHAR);
177 do_test (&json_ctx, 2 * i, 8 - i, 2 << i, 1 << i, SMALL_CHAR);
178 do_test (&json_ctx, 8 - i, 2 * i, 1 << i, 2 << i, BIG_CHAR);
179 do_test (&json_ctx, 2 * i, 8 - i, 2 << i, 1 << i, BIG_CHAR);
180 }
181
182 for (i = 1; i < 8; ++i)
183 {
184 do_test (&json_ctx, 0, 0, 4 << i, 8 << i, SMALL_CHAR);
185 do_test (&json_ctx, 0, 0, 16 << i, 8 << i, SMALL_CHAR);
186 do_test (&json_ctx, 8 - i, 2 * i, 4 << i, 8 << i, SMALL_CHAR);
187 do_test (&json_ctx, 8 - i, 2 * i, 16 << i, 8 << i, SMALL_CHAR);
188 }
189
190 for (i = 128; i < 2048; i += i)
191 {
192 for (j = i - 64; j <= i + 64; j += 32)
193 {
194 do_test (&json_ctx, 1, 0, i, j, SMALL_CHAR);
195 do_test (&json_ctx, 0, i, i, j, SMALL_CHAR);
196 do_test (&json_ctx, 0, 0, i, j, SMALL_CHAR);
197 do_test (&json_ctx, i, i, i, j, SMALL_CHAR);
198 do_test (&json_ctx, 1, 0, j, i, SMALL_CHAR);
199 do_test (&json_ctx, 0, i, j, i, SMALL_CHAR);
200 do_test (&json_ctx, 0, 0, j, i, SMALL_CHAR);
201 do_test (&json_ctx, i, i, j, i, SMALL_CHAR);
202 }
203 }
204
205 json_array_end (&json_ctx);
206 json_attr_object_end (&json_ctx);
207 json_attr_object_end (&json_ctx);
208 json_document_end (&json_ctx);
209
210 return ret;
211 }
212
213 #include <support/test-driver.c>