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

source code of glibc/benchtests/bench-strcat.c