m2-internship/libunwind-eh_elf
1
0
Fork 0
mirror of https://github.com/tobast/libunwind-eh_elf.git synced 2024-11-29 18:27:37 +01:00
Code Issues Releases Activity

Update with rotation-test.

Browse source 
(Logical change 1.183)
This commit is contained in:
hp.com!davidm 2004-03-19 02:38:39 +00:00
parent f59f60f9ce
commit 77a27f0baf
1 changed files with 39 additions and 23 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

62
tests/Gia64-test-nat.c
View file

@ -34,20 +34,22 @@ WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */
#include <asm/rse.h> #include <asm/rse.h>
//#define NUM_RUNS 1024 #define NUM_RUNS 1024
#define NUM_RUNS 1 //#define NUM_RUNS 1
//#define MAX_CHECKS 1024 #define MAX_CHECKS 1024
#define MAX_CHECKS 4 //#define MAX_CHECKS 2
#define MAX_VALUES_PER_FUNC 4 #define MAX_VALUES_PER_FUNC 4
#define panic(args...) \ #define panic(args...) \
do { fprintf (stderr, args); ++nerrors; } while (0) do { printf (args); ++nerrors; } while (0)
#define NELEMS(a) ((int) (sizeof (a) / sizeof ((a)[0]))) #define NELEMS(a) ((int) (sizeof (a) / sizeof ((a)[0])))
typedef void save_func_t (void *funcs, unsigned long *vals); typedef void save_func_t (void *funcs, unsigned long *vals);
typedef unw_word_t *check_func_t (unw_cursor_t *c, unsigned long *vals); typedef unw_word_t *check_func_t (unw_cursor_t *c, unsigned long *vals);
extern void flushrs (void);
extern save_func_t save_static_to_stacked; extern save_func_t save_static_to_stacked;
static check_func_t check_static_to_stacked; static check_func_t check_static_to_stacked;
@ -63,6 +65,9 @@ static check_func_t check_static_to_mem;
extern save_func_t save_static_to_scratch; extern save_func_t save_static_to_scratch;
static check_func_t check_static_to_scratch; static check_func_t check_static_to_scratch;
extern save_func_t rotate_regs;
static check_func_t check_rotate_regs;
static int verbose; static int verbose;
static int nerrors; static int nerrors;
@ -78,14 +83,15 @@ static struct
} }
all_funcs[] = all_funcs[] =
{ {
#if 0
{ save_static_to_stacked, check_static_to_stacked }, { save_static_to_stacked, check_static_to_stacked },
{ save_static_to_fr, check_static_to_fr } #if 1
{ save_static_to_fr, check_static_to_fr },
{ save_static_to_br, check_static_to_br },
{ save_static_to_mem, check_static_to_mem },
{ save_static_to_scratch, check_static_to_scratch },
#endif #endif
{ save_static_to_br, check_static_to_br } { rotate_regs, check_rotate_regs },
#if 0 #if 0
{ save_static_to_mem, check_static_to_mem }
{ save_static_to_scratch, check_static_to_scratch }
#endif #endif
}; };
@ -98,12 +104,15 @@ sighandler (int signal, void *siginfo, void *context)
long sof; long sof;
int sp; int sp;
printf ("sighandler: got signal %d, sp=%p, nat=%lx\n", if (verbose)
signal, &sp, uc->uc_mcontext.sc_nat); printf ("sighandler: signal %d sp=%p nat=%08lx pr=%lx\n",
signal, &sp, uc->uc_mcontext.sc_nat, uc->uc_mcontext.sc_pr);
sof = uc->uc_mcontext.sc_cfm & 0x7f; sof = uc->uc_mcontext.sc_cfm & 0x7f;
bsp = ia64_rse_skip_regs ((unsigned long *) uc->uc_mcontext.sc_ar_bsp, bsp = ia64_rse_skip_regs ((unsigned long *) uc->uc_mcontext.sc_ar_bsp,
-sof); -sof);
flushrs ();
arg0 = (save_func_t **) *bsp; arg0 = (save_func_t **) *bsp;
bsp = ia64_rse_skip_regs (bsp, 1); bsp = ia64_rse_skip_regs (bsp, 1);
arg1 = (unsigned long *) *bsp; arg1 = (unsigned long *) *bsp;
@ -224,19 +233,12 @@ check_static_to_fr (unw_cursor_t *c, unw_word_t *vals)
static unw_word_t * static unw_word_t *
check_static_to_br (unw_cursor_t *c, unw_word_t *vals) check_static_to_br (unw_cursor_t *c, unw_word_t *vals)
{ {
unw_word_t r4, nat4, pr; unw_word_t r4, nat4;
int ret; int ret;
if (verbose) if (verbose)
printf (" %s()\n", __FUNCTION__); printf (" %s()\n", __FUNCTION__);
if ((ret = unw_get_reg (c, UNW_IA64_PR, &pr)) < 0)
panic ("%s: failed to read register pr, error=%d\n", __FUNCTION__, ret);
if (!(pr & 1))
/* r4 contained a NaT, so the routine didn't do anything. */
return vals;
vals -= 1; vals -= 1;
if ((ret = unw_get_reg (c, UNW_IA64_GR + 4, &r4)) < 0) if ((ret = unw_get_reg (c, UNW_IA64_GR + 4, &r4)) < 0)
@ -353,6 +355,12 @@ check_static_to_scratch (unw_cursor_t *c, unw_word_t *vals)
return vals; return vals;
} }
static unw_word_t *
check_rotate_regs (unw_cursor_t *c, unw_word_t *vals)
{
return vals; /* nothing to do here... */
}
static void static void
start_checks (void *funcs, unsigned long *vals) start_checks (void *funcs, unsigned long *vals)
{ {
@ -372,7 +380,7 @@ start_checks (void *funcs, unsigned long *vals)
for (i = 0; i < num_checks; ++i) for (i = 0; i < num_checks; ++i)
{ {
vals = (*checks[i]) (&c, vals); vals = (*checks[num_checks - 1 - i]) (&c, vals);
if ((ret = unw_step (&c)) < 0) if ((ret = unw_step (&c)) < 0)
panic ("%s: unw_step (ret=%d)\n", __FUNCTION__, ret); panic ("%s: unw_step (ret=%d)\n", __FUNCTION__, ret);
@ -384,14 +392,22 @@ run_check (int test)
{ {
int index, i; int index, i;
num_checks = (random () % MAX_CHECKS) + 1; if (test == 1)
/* Make first test always go the full depth... */
num_checks = MAX_CHECKS;
else
num_checks = (random () % MAX_CHECKS) + 1;
for (i = 0; i < num_checks * MAX_VALUES_PER_FUNC; ++i) for (i = 0; i < num_checks * MAX_VALUES_PER_FUNC; ++i)
values[i] = random (); values[i] = random ();
for (i = 0; i < num_checks; ++i) for (i = 0; i < num_checks; ++i)
{ {
index = random () % NELEMS (all_funcs); if (test == 1)
/* Make first test once go through each test... */
index = i % NELEMS (all_funcs);
else
index = random () % NELEMS (all_funcs);
funcs[i] = all_funcs[index].func; funcs[i] = all_funcs[index].func;
checks[i] = all_funcs[index].check; checks[i] = all_funcs[index].check;
} }