149 lines
4.1 KiB
C
149 lines
4.1 KiB
C
|
/* Test and measure string and memory functions.
|
||
|
Copyright (C) 1999, 2002 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);
|
||
|
int test;
|
||
|
} impl_t;
|
||
|
extern impl_t __start_impls[], __stop_impls[];
|
||
|
|
||
|
#define IMPL(name, test) \
|
||
|
impl_t tst_ ## name \
|
||
|
__attribute__ ((section ("impls"))) \
|
||
|
= { #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
|
||
|
#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)
|
||
|
|
||
|
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, 2 * 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 + 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);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
#endif
|