1 /* Test and measure string and memory functions.
2 Copyright (C) 1999, 2002, 2004, 2008, 2011 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
54 #include <hp-timing.h>
57 # define TEST_FUNCTION test_main ()
58 # define TIMEOUT (4 * 60)
59 # define OPT_ITERATIONS 10000
60 # define OPT_RANDOM 10001
61 # define OPT_SEED 10002
63 unsigned char *buf1
, *buf2
;
68 hp_timing_t _dl_hp_timing_overhead
;
71 size_t iterations
= 100000;
72 # define ITERATIONS_OPTIONS \
73 { "iterations", required_argument, NULL, OPT_ITERATIONS },
74 # define ITERATIONS_PROCESS \
75 case OPT_ITERATIONS: \
76 iterations = strtoul (optarg, NULL, 0); \
78 # define ITERATIONS iterations
80 # define ITERATIONS_OPTIONS
81 # define ITERATIONS_PROCESS
84 # define CMDLINE_OPTIONS ITERATIONS_OPTIONS \
85 { "random", no_argument, NULL, OPT_RANDOM }, \
86 { "seed", required_argument, NULL, OPT_SEED },
87 # define CMDLINE_PROCESS ITERATIONS_PROCESS \
90 int fdr = open ("/dev/urandom", O_RDONLY); \
92 if (fdr < 0 || read (fdr, &seed, sizeof(seed)) != sizeof (seed)) \
101 seed = strtoul (optarg, NULL, 0); \
105 #define CALL(impl, ...) \
106 (* (proto_t) (impl)->fn) (__VA_ARGS__)
108 #define FOR_EACH_IMPL(impl, notall) \
109 for (impl_t *impl = __start_impls; impl < __stop_impls; ++impl) \
110 if (!notall || impl->test)
112 #define HP_TIMING_BEST(best_time, start, end) \
115 hp_timing_t tmptime; \
116 HP_TIMING_DIFF (tmptime, start + _dl_hp_timing_overhead, end); \
117 if (best_time > tmptime) \
118 best_time = tmptime; \
129 page_size
= 2 * getpagesize ();
131 if (page_size
< MIN_PAGE_SIZE
)
132 page_size
= MIN_PAGE_SIZE
;
134 buf1
= mmap (0, (BUF1PAGES
+ 1) * page_size
, PROT_READ
| PROT_WRITE
,
135 MAP_PRIVATE
| MAP_ANON
, -1, 0);
136 if (buf1
== MAP_FAILED
)
137 error (EXIT_FAILURE
, errno
, "mmap failed");
138 if (mprotect (buf1
+ BUF1PAGES
* page_size
, page_size
, PROT_NONE
))
139 error (EXIT_FAILURE
, errno
, "mprotect failed");
140 buf2
= mmap (0, 2 * page_size
, PROT_READ
| PROT_WRITE
,
141 MAP_PRIVATE
| MAP_ANON
, -1, 0);
142 if (buf2
== MAP_FAILED
)
143 error (EXIT_FAILURE
, errno
, "mmap failed");
144 if (mprotect (buf2
+ page_size
, page_size
, PROT_NONE
))
145 error (EXIT_FAILURE
, errno
, "mprotect failed");
146 HP_TIMING_DIFF_INIT ();
149 printf ("Setting seed to 0x%x\n", seed
);
153 memset (buf1
, 0xa5, BUF1PAGES
* page_size
);
154 memset (buf2
, 0x5a, page_size
);