1 /* Measure strtok 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 TEST_MAIN
20 #define TEST_NAME "strtok"
21 #include "bench-string.h"
22
23 typedef char *(*proto_t) (const char *, const char *);
24
25 IMPL (strtok, 1)
26
27 static void
28 do_one_test (impl_t * impl, const char *s1, const char *s2)
29 {
30 size_t i, iters = INNER_LOOP_ITERS_MEDIUM;
31 timing_t start, stop, cur;
32 TIMING_NOW (start);
33 for (i = 0; i < iters; ++i)
34 {
35 CALL (impl, s1, s2);
36 CALL (impl, NULL, s2);
37 CALL (impl, NULL, s2);
38 }
39 TIMING_NOW (stop);
40
41 TIMING_DIFF (cur, start, stop);
42
43 TIMING_PRINT_MEAN ((double) cur, (double) iters);
44 }
45
46
47 static void
48 do_test (size_t align1, size_t align2, size_t len1, size_t len2, int fail)
49 {
50 char *s2 = (char *) (buf2 + align2);
51 static const char d[] = "1234567890abcdef";
52 #define dl (sizeof (d) - 1)
53 char *ss2 = s2;
54 for (size_t l = len2; l > 0; l = l > dl ? l - dl : 0)
55 {
56 size_t t = l > dl ? dl : l;
57 ss2 = mempcpy (ss2, d, t);
58 }
59 s2[len2] = '\0';
60
61 printf ("Length %4zd/%zd, alignment %2zd/%2zd, %s:",
62 len1, len2, align1, align2, fail ? "fail" : "found");
63
64 FOR_EACH_IMPL (impl, 0)
65 {
66 char *s1 = (char *) (buf1 + align1);
67 if (fail)
68 {
69 char *ss1 = s1;
70 for (size_t l = len1; l > 0; l = l > dl ? l - dl : 0)
71 {
72 size_t t = l > dl ? dl : l;
73 memcpy (ss1, d, t);
74 ++ss1[len2 > 7 ? 7 : len2 - 1];
75 ss1 += t;
76 }
77 }
78 else
79 {
80 memset (s1, '0', len1);
81 memcpy (s1 + (len1 - len2) - 2, s2, len2);
82 if ((len1 / len2) > 4)
83 memcpy (s1 + (len1 - len2) - (3 * len2), s2, len2);
84 }
85 s1[len1] = '\0';
86 do_one_test (impl, s1, s2);
87 }
88 putchar ('\n');
89 }
90
91 static int
92 test_main (void)
93 {
94 test_init ();
95
96 printf ("%23s", "");
97 FOR_EACH_IMPL (impl, 0)
98 printf ("\t%s", impl->name);
99 putchar ('\n');
100
101 for (size_t klen = 2; klen < 32; ++klen)
102 for (size_t hlen = 2 * klen; hlen < 16 * klen; hlen += klen)
103 {
104 do_test (0, 0, hlen, klen, 0);
105 do_test (0, 0, hlen, klen, 1);
106 do_test (0, 3, hlen, klen, 0);
107 do_test (0, 3, hlen, klen, 1);
108 do_test (0, 9, hlen, klen, 0);
109 do_test (0, 9, hlen, klen, 1);
110 do_test (0, 15, hlen, klen, 0);
111 do_test (0, 15, hlen, klen, 1);
112
113 do_test (3, 0, hlen, klen, 0);
114 do_test (3, 0, hlen, klen, 1);
115 do_test (3, 3, hlen, klen, 0);
116 do_test (3, 3, hlen, klen, 1);
117 do_test (3, 9, hlen, klen, 0);
118 do_test (3, 9, hlen, klen, 1);
119 do_test (3, 15, hlen, klen, 0);
120 do_test (3, 15, hlen, klen, 1);
121
122 do_test (9, 0, hlen, klen, 0);
123 do_test (9, 0, hlen, klen, 1);
124 do_test (9, 3, hlen, klen, 0);
125 do_test (9, 3, hlen, klen, 1);
126 do_test (9, 9, hlen, klen, 0);
127 do_test (9, 9, hlen, klen, 1);
128 do_test (9, 15, hlen, klen, 0);
129 do_test (9, 15, hlen, klen, 1);
130
131 do_test (15, 0, hlen, klen, 0);
132 do_test (15, 0, hlen, klen, 1);
133 do_test (15, 3, hlen, klen, 0);
134 do_test (15, 3, hlen, klen, 1);
135 do_test (15, 9, hlen, klen, 0);
136 do_test (15, 9, hlen, klen, 1);
137 do_test (15, 15, hlen, klen, 0);
138 do_test (15, 15, hlen, klen, 1);
139 }
140 do_test (0, 0, page_size - 1, 16, 0);
141 do_test (0, 0, page_size - 1, 16, 1);
142
143 return ret;
144 }
145
146 #include <support/test-driver.c>