Benchtests: Improve memrchr benchmarks
[platform/upstream/glibc.git] / benchtests / bench-skeleton.c
1 /* Skeleton for benchmark programs.
2    Copyright (C) 2013-2022 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 #include <string.h>
20 #include <stdint.h>
21 #include <stdbool.h>
22 #include <stdio.h>
23 #include <time.h>
24 #include <inttypes.h>
25 #include "bench-timing.h"
26 #include "json-lib.h"
27 #include "bench-util.h"
28
29 #include "bench-util.c"
30
31 #define TIMESPEC_AFTER(a, b) \
32   (((a).tv_sec == (b).tv_sec)                                                 \
33    ? ((a).tv_nsec > (b).tv_nsec)                                              \
34    : ((a).tv_sec > (b).tv_sec))
35 int
36 main (int argc, char **argv)
37 {
38   unsigned long i, k;
39   struct timespec runtime;
40   timing_t start, end;
41   bool detailed = false;
42   json_ctx_t json_ctx;
43
44   if (argc == 2 && !strcmp (argv[1], "-d"))
45     detailed = true;
46
47   bench_start ();
48
49   memset (&runtime, 0, sizeof (runtime));
50
51   unsigned long iters = 1000;
52
53 #ifdef BENCH_INIT
54   BENCH_INIT ();
55 #endif
56
57   json_init (&json_ctx, 2, stdout);
58
59   /* Begin function.  */
60   json_attr_object_begin (&json_ctx, FUNCNAME);
61
62   for (int v = 0; v < NUM_VARIANTS; v++)
63     {
64       /* Run for approximately DURATION seconds.  */
65       clock_gettime (CLOCK_MONOTONIC_RAW, &runtime);
66       runtime.tv_sec += DURATION;
67
68       bool is_bench = strncmp (VARIANT (v), "workload-", 9) == 0;
69       double d_total_i = 0;
70       timing_t total = 0, max = 0, min = 0x7fffffffffffffff;
71       timing_t throughput = 0, latency = 0;
72       int64_t c = 0;
73       uint64_t cur;
74       BENCH_VARS;
75       while (1)
76         {
77           if (is_bench)
78             {
79               /* Benchmark a real trace of calls - all samples are iterated
80                  over once before repeating.  This models actual use more
81                  accurately than repeating the same sample many times.  */
82               TIMING_NOW (start);
83               for (k = 0; k < iters; k++)
84                 for (i = 0; i < NUM_SAMPLES (v); i++)
85                   BENCH_FUNC (v, i);
86               TIMING_NOW (end);
87               TIMING_DIFF (cur, start, end);
88               TIMING_ACCUM (throughput, cur);
89
90               TIMING_NOW (start);
91               for (k = 0; k < iters; k++)
92                 for (i = 0; i < NUM_SAMPLES (v); i++)
93                   BENCH_FUNC_LAT (v, i);
94               TIMING_NOW (end);
95               TIMING_DIFF (cur, start, end);
96               TIMING_ACCUM (latency, cur);
97
98               d_total_i += iters * NUM_SAMPLES (v);
99             }
100           else
101             for (i = 0; i < NUM_SAMPLES (v); i++)
102               {
103                 TIMING_NOW (start);
104                 for (k = 0; k < iters; k++)
105                   BENCH_FUNC (v, i);
106                 TIMING_NOW (end);
107
108                 TIMING_DIFF (cur, start, end);
109
110                 if (cur > max)
111                   max = cur;
112
113                 if (cur < min)
114                   min = cur;
115
116                 TIMING_ACCUM (total, cur);
117                 /* Accumulate timings for the value.  In the end we will divide
118                    by the total iterations.  */
119                 RESULT_ACCUM (cur, v, i, c * iters, (c + 1) * iters);
120
121                 d_total_i += iters;
122               }
123           c++;
124           struct timespec curtime;
125
126           memset (&curtime, 0, sizeof (curtime));
127           clock_gettime (CLOCK_MONOTONIC_RAW, &curtime);
128           if (TIMESPEC_AFTER (curtime, runtime))
129             goto done;
130         }
131
132       double d_total_s;
133       double d_iters;
134
135     done:
136       d_total_s = total;
137       d_iters = iters;
138
139       /* Begin variant.  */
140       json_attr_object_begin (&json_ctx, VARIANT (v));
141
142       if (is_bench)
143         {
144           json_attr_double (&json_ctx, "duration", throughput + latency);
145           json_attr_double (&json_ctx, "iterations", 2 * d_total_i);
146           json_attr_double (&json_ctx, "reciprocal-throughput",
147                             throughput / d_total_i);
148           json_attr_double (&json_ctx, "latency", latency / d_total_i);
149           json_attr_double (&json_ctx, "max-throughput",
150                             d_total_i / throughput * 1000000000.0);
151           json_attr_double (&json_ctx, "min-throughput",
152                             d_total_i / latency * 1000000000.0);
153         }
154       else
155         {
156           json_attr_double (&json_ctx, "duration", d_total_s);
157           json_attr_double (&json_ctx, "iterations", d_total_i);
158           json_attr_double (&json_ctx, "max", max / d_iters);
159           json_attr_double (&json_ctx, "min", min / d_iters);
160           json_attr_double (&json_ctx, "mean", d_total_s / d_total_i);
161         }
162
163       if (detailed && !is_bench)
164         {
165           json_array_begin (&json_ctx, "timings");
166
167           for (int i = 0; i < NUM_SAMPLES (v); i++)
168             json_element_double (&json_ctx, RESULT (v, i));
169
170           json_array_end (&json_ctx);
171         }
172
173       /* End variant.  */
174       json_attr_object_end (&json_ctx);
175     }
176
177   /* End function.  */
178   json_attr_object_end (&json_ctx);
179
180   return 0;
181 }