1
0
Fork 0
mirror of https://github.com/tobast/libunwind-eh_elf.git synced 2024-11-22 23:47:39 +01:00

(ITERATIONS): New macro.

(maxlevel): New global variable.
(measure_unwind): Return init/step times via arg pointers.
(f1): Pass through init/step pointers.
(doit): New function.
(main): Use doit() instead of open code.

(Logical change 1.130)
This commit is contained in:
hp.com!davidm 2003-11-27 06:52:54 +00:00
parent 85d354c9d1
commit 5e446b24d7

View file

@ -5,9 +5,13 @@
#include <libunwind.h> #include <libunwind.h>
#define ITERATIONS 10000
#define panic(args...) \ #define panic(args...) \
do { fprintf (stderr, args); exit (-1); } while (0) do { fprintf (stderr, args); exit (-1); } while (0)
static int maxlevel = 100;
static inline double static inline double
gettime (void) gettime (void)
{ {
@ -18,7 +22,7 @@ gettime (void)
} }
static int static int
measure_unwind (int maxlevel) measure_unwind (int maxlevel, double *init, double *step)
{ {
double stop, mid, start; double stop, mid, start;
unw_cursor_t cursor; unw_cursor_t cursor;
@ -48,42 +52,69 @@ measure_unwind (int maxlevel)
panic ("Unwound only %d levels, expected at least %d levels", panic ("Unwound only %d levels, expected at least %d levels",
level, maxlevel); level, maxlevel);
printf (" unw_{getcontext+init_local}: %9.3f nsec, unw_step: %9.3f nsec\n", *init = mid - start;
1e9*(mid - start), 1e9*(stop - mid)/level); *step = (stop - mid) / (double) level;
return 0; return 0;
} }
static int static int
f1 (int level, int maxlevel) f1 (int level, int maxlevel, double *init, double *step)
{ {
if (level == maxlevel) if (level == maxlevel)
return measure_unwind (maxlevel); return measure_unwind (maxlevel, init, step);
else else
/* defeat last-call/sibcall optimization */ /* defeat last-call/sibcall optimization */
return f1 (level + 1, maxlevel) + level; return f1 (level + 1, maxlevel, init, step) + level;
}
static void
doit (const char *label)
{
double init, step, min_init, first_init, min_step, first_step, sum_init, sum_step;
int i;
sum_init = sum_step = first_init = first_step = 0.0;
min_init = min_step = 1e99;
for (i = 0; i < ITERATIONS; ++i)
{
f1 (0, maxlevel, &init, &step);
sum_init += init;
sum_step += step;
if (init < min_init)
min_init = init;
if (step < min_step)
min_step = step;
if (i == 0)
{
first_init = init;
first_step = step;
}
}
printf ("%s:\n"
" unw_{getcontext+init_local}: first=%9.3f min=%9.3f avg=%9.3f nsec\n"
" unw_step : first=%9.3f min=%9.3f avg=%9.3f nsec\n",
label,
1e9*first_init, 1e9*min_init, 1e9*sum_init/ITERATIONS,
1e9*first_step, 1e9*min_step, 1e9*sum_step/ITERATIONS);
} }
int int
main (int argc, char **argv) main (int argc, char **argv)
{ {
int i, maxlevel = 100;
if (argc > 1) if (argc > 1)
maxlevel = atol (argv[1]); maxlevel = atol (argv[1]);
printf ("Caching: none\n");
unw_set_caching_policy (unw_local_addr_space, UNW_CACHE_NONE); unw_set_caching_policy (unw_local_addr_space, UNW_CACHE_NONE);
for (i = 0; i < 20; ++i) doit ("Caching: none");
f1 (0, maxlevel);
printf ("Caching: global\n");
unw_set_caching_policy (unw_local_addr_space, UNW_CACHE_GLOBAL); unw_set_caching_policy (unw_local_addr_space, UNW_CACHE_GLOBAL);
for (i = 0; i < 20; ++i) doit ("Caching: global");
f1 (0, maxlevel);
printf ("Caching: per-thread\n");
unw_set_caching_policy (unw_local_addr_space, UNW_CACHE_PER_THREAD); unw_set_caching_policy (unw_local_addr_space, UNW_CACHE_PER_THREAD);
for (i = 0; i < 20; ++i) doit ("Caching: per-thread");
f1 (0, maxlevel);
return 0; return 0;
} }