2002-11-07 20:15:01 +01:00
|
|
|
/* Test and measure string and memory functions.
|
2011-08-04 23:47:24 +02:00
|
|
|
Copyright (C) 1999, 2002, 2004, 2008, 2011 Free Software Foundation, Inc.
|
2002-11-07 20:15:01 +01:00
|
|
|
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
|
2012-02-10 00:18:22 +01:00
|
|
|
License along with the GNU C Library; if not, see
|
|
|
|
<http://www.gnu.org/licenses/>. */
|
2002-11-07 20:15:01 +01:00
|
|
|
|
2011-08-04 23:47:24 +02:00
|
|
|
#include <sys/cdefs.h>
|
|
|
|
|
2002-11-07 20:15:01 +01:00
|
|
|
typedef struct
|
|
|
|
{
|
|
|
|
const char *name;
|
|
|
|
void (*fn) (void);
|
2002-11-08 23:10:01 +01:00
|
|
|
long test;
|
2002-11-07 20:15:01 +01:00
|
|
|
} impl_t;
|
|
|
|
extern impl_t __start_impls[], __stop_impls[];
|
|
|
|
|
|
|
|
#define IMPL(name, test) \
|
2002-11-08 23:10:01 +01:00
|
|
|
impl_t tst_ ## name \
|
|
|
|
__attribute__ ((section ("impls"), aligned (sizeof (void *)))) \
|
2011-08-04 23:47:24 +02:00
|
|
|
= { __STRING (name), (void (*) (void))name, test };
|
2002-11-07 20:15:01 +01:00
|
|
|
|
|
|
|
#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
|
2004-03-07 10:05:18 +01:00
|
|
|
#define GLRO(x) _##x
|
2002-11-07 20:15:01 +01:00
|
|
|
#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)
|
|
|
|
|
2008-05-25 02:17:34 +02:00
|
|
|
#ifndef BUF1PAGES
|
|
|
|
# define BUF1PAGES 1
|
|
|
|
#endif
|
|
|
|
|
2002-11-07 20:15:01 +01:00
|
|
|
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
|
2008-05-25 02:17:34 +02:00
|
|
|
buf1 = mmap (0, (BUF1PAGES + 1) * page_size, PROT_READ | PROT_WRITE,
|
2002-11-07 20:15:01 +01:00
|
|
|
MAP_PRIVATE | MAP_ANON, -1, 0);
|
|
|
|
if (buf1 == MAP_FAILED)
|
|
|
|
error (EXIT_FAILURE, errno, "mmap failed");
|
2008-05-25 02:17:34 +02:00
|
|
|
if (mprotect (buf1 + BUF1PAGES * page_size, page_size, PROT_NONE))
|
2002-11-07 20:15:01 +01:00
|
|
|
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);
|
|
|
|
}
|
2002-11-09 01:36:21 +01:00
|
|
|
|
2008-05-25 02:17:34 +02:00
|
|
|
memset (buf1, 0xa5, BUF1PAGES * page_size);
|
2002-11-09 01:36:21 +01:00
|
|
|
memset (buf2, 0x5a, page_size);
|
2002-11-07 20:15:01 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
#endif
|