| /* Test and measure string and memory functions. |
| Copyright (C) 1999, 2002, 2004, 2008 Free Software Foundation, Inc. |
| This file is part of the GNU C Library. |
| Written by Jakub Jelinek <jakub@redhat.com>, 1999. |
| |
| The GNU C Library is free software; you can redistribute it and/or |
| modify it under the terms of the GNU Lesser General Public |
| License as published by the Free Software Foundation; either |
| version 2.1 of the License, or (at your option) any later version. |
| |
| The GNU C Library is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| Lesser General Public License for more details. |
| |
| You should have received a copy of the GNU Lesser General Public |
| License along with the GNU C Library; if not, write to the Free |
| Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA |
| 02111-1307 USA. */ |
| |
| typedef struct |
| { |
| const char *name; |
| void (*fn) (void); |
| long test; |
| } impl_t; |
| extern impl_t __start_impls[], __stop_impls[]; |
| |
| #define IMPL(name, test) \ |
| impl_t tst_ ## name \ |
| __attribute__ ((section ("impls"), aligned (sizeof (void *)))) \ |
| = { #name, (void (*) (void))name, test }; |
| |
| #ifdef TEST_MAIN |
| |
| #ifndef _GNU_SOURCE |
| #define _GNU_SOURCE |
| #endif |
| |
| #undef __USE_STRING_INLINES |
| |
| #include <stdio.h> |
| #include <stdlib.h> |
| #include <string.h> |
| #include <sys/mman.h> |
| #include <unistd.h> |
| #include <fcntl.h> |
| #include <error.h> |
| #include <errno.h> |
| #include <time.h> |
| #define GL(x) _##x |
| #define GLRO(x) _##x |
| #include <hp-timing.h> |
| |
| |
| # define TEST_FUNCTION test_main () |
| # define TIMEOUT (4 * 60) |
| # define OPT_ITERATIONS 10000 |
| # define OPT_RANDOM 10001 |
| # define OPT_SEED 10002 |
| |
| unsigned char *buf1, *buf2; |
| int ret, do_srandom; |
| unsigned int seed; |
| size_t page_size; |
| |
| hp_timing_t _dl_hp_timing_overhead; |
| |
| # ifndef ITERATIONS |
| size_t iterations = 100000; |
| # define ITERATIONS_OPTIONS \ |
| { "iterations", required_argument, NULL, OPT_ITERATIONS }, |
| # define ITERATIONS_PROCESS \ |
| case OPT_ITERATIONS: \ |
| iterations = strtoul (optarg, NULL, 0); \ |
| break; |
| # define ITERATIONS iterations |
| # else |
| # define ITERATIONS_OPTIONS |
| # define ITERATIONS_PROCESS |
| # endif |
| |
| # define CMDLINE_OPTIONS ITERATIONS_OPTIONS \ |
| { "random", no_argument, NULL, OPT_RANDOM }, \ |
| { "seed", required_argument, NULL, OPT_SEED }, |
| # define CMDLINE_PROCESS ITERATIONS_PROCESS \ |
| case OPT_RANDOM: \ |
| { \ |
| int fdr = open ("/dev/urandom", O_RDONLY); \ |
| \ |
| if (fdr < 0 || read (fdr, &seed, sizeof(seed)) != sizeof (seed)) \ |
| seed = time (NULL); \ |
| if (fdr >= 0) \ |
| close (fdr); \ |
| do_srandom = 1; \ |
| break; \ |
| } \ |
| \ |
| case OPT_SEED: \ |
| seed = strtoul (optarg, NULL, 0); \ |
| do_srandom = 1; \ |
| break; |
| |
| #define CALL(impl, ...) \ |
| (* (proto_t) (impl)->fn) (__VA_ARGS__) |
| |
| #define FOR_EACH_IMPL(impl, notall) \ |
| for (impl_t *impl = __start_impls; impl < __stop_impls; ++impl) \ |
| if (!notall || impl->test) |
| |
| #define HP_TIMING_BEST(best_time, start, end) \ |
| do \ |
| { \ |
| hp_timing_t tmptime; \ |
| HP_TIMING_DIFF (tmptime, start + _dl_hp_timing_overhead, end); \ |
| if (best_time > tmptime) \ |
| best_time = tmptime; \ |
| } \ |
| while (0) |
| |
| #ifndef BUF1PAGES |
| # define BUF1PAGES 1 |
| #endif |
| |
| static void |
| test_init (void) |
| { |
| page_size = 2 * getpagesize (); |
| #ifdef MIN_PAGE_SIZE |
| if (page_size < MIN_PAGE_SIZE) |
| page_size = MIN_PAGE_SIZE; |
| #endif |
| buf1 = mmap (0, (BUF1PAGES + 1) * page_size, PROT_READ | PROT_WRITE, |
| MAP_PRIVATE | MAP_ANON, -1, 0); |
| if (buf1 == MAP_FAILED) |
| error (EXIT_FAILURE, errno, "mmap failed"); |
| if (mprotect (buf1 + BUF1PAGES * page_size, page_size, PROT_NONE)) |
| error (EXIT_FAILURE, errno, "mprotect failed"); |
| buf2 = mmap (0, 2 * page_size, PROT_READ | PROT_WRITE, |
| MAP_PRIVATE | MAP_ANON, -1, 0); |
| if (buf2 == MAP_FAILED) |
| error (EXIT_FAILURE, errno, "mmap failed"); |
| if (mprotect (buf2 + page_size, page_size, PROT_NONE)) |
| error (EXIT_FAILURE, errno, "mprotect failed"); |
| HP_TIMING_DIFF_INIT (); |
| if (do_srandom) |
| { |
| printf ("Setting seed to 0x%x\n", seed); |
| srandom (seed); |
| } |
| |
| memset (buf1, 0xa5, BUF1PAGES * page_size); |
| memset (buf2, 0x5a, page_size); |
| } |
| |
| #endif |