benchtests/bench-memchr.c

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