1 /* Test and measure string and memory functions.
2 Copyright (C) 1999-2012 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Written by Jakub Jelinek <jakub@redhat.com>, 1999.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
20 #include <sys/cdefs.h>
28 extern impl_t __start_impls
[], __stop_impls
[];
30 #define IMPL(name, test) \
32 __attribute__ ((section ("impls"), aligned (sizeof (void *)))) \
33 = { __STRING (name), (void (*) (void))name, test };
41 #undef __USE_STRING_INLINES
47 #include <sys/param.h>
55 #include <hp-timing.h>
58 # define TEST_FUNCTION test_main ()
59 # define TIMEOUT (4 * 60)
60 # define OPT_ITERATIONS 10000
61 # define OPT_RANDOM 10001
62 # define OPT_SEED 10002
64 unsigned char *buf1
, *buf2
;
69 hp_timing_t _dl_hp_timing_overhead
;
72 size_t iterations
= 100000;
73 # define ITERATIONS_OPTIONS \
74 { "iterations", required_argument, NULL, OPT_ITERATIONS },
75 # define ITERATIONS_PROCESS \
76 case OPT_ITERATIONS: \
77 iterations = strtoul (optarg, NULL, 0); \
79 # define ITERATIONS iterations
81 # define ITERATIONS_OPTIONS
82 # define ITERATIONS_PROCESS
85 # define CMDLINE_OPTIONS ITERATIONS_OPTIONS \
86 { "random", no_argument, NULL, OPT_RANDOM }, \
87 { "seed", required_argument, NULL, OPT_SEED },
88 # define CMDLINE_PROCESS ITERATIONS_PROCESS \
91 int fdr = open ("/dev/urandom", O_RDONLY); \
93 if (fdr < 0 || read (fdr, &seed, sizeof(seed)) != sizeof (seed)) \
102 seed = strtoul (optarg, NULL, 0); \
106 #define CALL(impl, ...) \
107 (* (proto_t) (impl)->fn) (__VA_ARGS__)
109 #define FOR_EACH_IMPL(impl, notall) \
110 for (impl_t *impl = __start_impls; impl < __stop_impls; ++impl) \
111 if (!notall || impl->test)
113 #define HP_TIMING_BEST(best_time, start, end) \
116 hp_timing_t tmptime; \
117 HP_TIMING_DIFF (tmptime, start + _dl_hp_timing_overhead, end); \
118 if (best_time > tmptime) \
119 best_time = tmptime; \
130 page_size
= 2 * getpagesize ();
132 if (page_size
< MIN_PAGE_SIZE
)
133 page_size
= MIN_PAGE_SIZE
;
135 buf1
= mmap (0, (BUF1PAGES
+ 1) * page_size
, PROT_READ
| PROT_WRITE
,
136 MAP_PRIVATE
| MAP_ANON
, -1, 0);
137 if (buf1
== MAP_FAILED
)
138 error (EXIT_FAILURE
, errno
, "mmap failed");
139 if (mprotect (buf1
+ BUF1PAGES
* page_size
, page_size
, PROT_NONE
))
140 error (EXIT_FAILURE
, errno
, "mprotect failed");
141 buf2
= mmap (0, 2 * page_size
, PROT_READ
| PROT_WRITE
,
142 MAP_PRIVATE
| MAP_ANON
, -1, 0);
143 if (buf2
== MAP_FAILED
)
144 error (EXIT_FAILURE
, errno
, "mmap failed");
145 if (mprotect (buf2
+ page_size
, page_size
, PROT_NONE
))
146 error (EXIT_FAILURE
, errno
, "mprotect failed");
147 HP_TIMING_DIFF_INIT ();
150 printf ("Setting seed to 0x%x\n", seed
);
154 memset (buf1
, 0xa5, BUF1PAGES
* page_size
);
155 memset (buf2
, 0x5a, page_size
);