2002-02-16 00:22:05 +01:00
|
|
|
/* libunwind - a platform-independent unwind library
|
|
|
|
|
Copyright (C) 2001-2002 Hewlett-Packard Co
|
|
|
|
|
Contributed by David Mosberger-Tang <davidm@hpl.hp.com>
|
|
|
|
|
|
|
|
|
|
This file is part of libunwind.
|
|
|
|
|
|
|
|
|
|
libunwind is free software; you can redistribute it and/or modify
|
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
|
the Free Software Foundation; either version 2, or (at your option)
|
|
|
|
|
any later version.
|
|
|
|
|
|
|
|
|
|
libunwind 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 General Public License for more details.
|
|
|
|
|
|
|
|
|
|
As a special exception, if you link this library with other files to
|
|
|
|
|
produce an executable, this library does not by itself cause the
|
|
|
|
|
resulting executable to be covered by the GNU General Public License.
|
|
|
|
|
This exception does not however invalidate any other reasons why the
|
|
|
|
|
executable file might be covered by the GNU General Public
|
|
|
|
|
License. */
|
|
|
|
|
|
|
|
|
|
#include "rse.h"
|
|
|
|
|
#include "unwind_i.h"
|
|
|
|
|
|
|
|
|
|
int
|
|
|
|
|
ia64_init_remote (unw_cursor_t *cursor, unw_accessors_t *a)
|
|
|
|
|
{
|
|
|
|
|
struct ia64_cursor *c = (struct ia64_cursor *) cursor;
|
|
|
|
|
int i;
|
|
|
|
|
|
|
|
|
|
if (unw.first_time)
|
|
|
|
|
{
|
|
|
|
|
unw.first_time = 0;
|
|
|
|
|
ia64_init ();
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
c->acc = *a;
|
|
|
|
|
|
|
|
|
|
c->cfm_loc = IA64_REG_LOC (UNW_IA64_AR_PFS);
|
|
|
|
|
c->top_rnat_loc = IA64_REG_LOC (UNW_IA64_AR_RNAT);
|
|
|
|
|
c->bsp_loc = IA64_REG_LOC (UNW_IA64_AR_BSP);
|
|
|
|
|
c->bspstore_loc = IA64_REG_LOC (UNW_IA64_AR_BSP);
|
|
|
|
|
c->pfs_loc = IA64_REG_LOC (UNW_IA64_AR_PFS);
|
|
|
|
|
c->rnat_loc = IA64_REG_LOC (UNW_IA64_AR_RNAT);
|
|
|
|
|
c->rp_loc = IA64_REG_LOC (UNW_IA64_BR + 0);
|
|
|
|
|
c->pri_unat_loc = 0; /* no primary UNaT location */
|
|
|
|
|
c->unat_loc = IA64_REG_LOC (UNW_IA64_AR_UNAT);
|
|
|
|
|
c->pr_loc = IA64_REG_LOC (UNW_IA64_PR);
|
|
|
|
|
c->lc_loc = IA64_REG_LOC (UNW_IA64_AR_LC);
|
|
|
|
|
c->fpsr_loc = IA64_REG_LOC (UNW_IA64_AR_FPSR);
|
|
|
|
|
|
|
|
|
|
c->r4_loc = IA64_REG_LOC (UNW_IA64_GR + 4);
|
|
|
|
|
c->r5_loc = IA64_REG_LOC (UNW_IA64_GR + 5);
|
|
|
|
|
c->r6_loc = IA64_REG_LOC (UNW_IA64_GR + 6);
|
|
|
|
|
c->r7_loc = IA64_REG_LOC (UNW_IA64_GR + 7);
|
|
|
|
|
|
|
|
|
|
c->nat4_loc = IA64_REG_LOC (UNW_IA64_NAT + 4);
|
|
|
|
|
c->nat5_loc = IA64_REG_LOC (UNW_IA64_NAT + 5);
|
|
|
|
|
c->nat6_loc = IA64_REG_LOC (UNW_IA64_NAT + 6);
|
|
|
|
|
c->nat7_loc = IA64_REG_LOC (UNW_IA64_NAT + 7);
|
|
|
|
|
|
|
|
|
|
c->b1_loc = IA64_REG_LOC (UNW_IA64_BR + 1);
|
|
|
|
|
c->b2_loc = IA64_REG_LOC (UNW_IA64_BR + 2);
|
|
|
|
|
c->b3_loc = IA64_REG_LOC (UNW_IA64_BR + 3);
|
|
|
|
|
c->b4_loc = IA64_REG_LOC (UNW_IA64_BR + 4);
|
|
|
|
|
c->b5_loc = IA64_REG_LOC (UNW_IA64_BR + 5);
|
|
|
|
|
|
|
|
|
|
c->f2_loc = IA64_FPREG_LOC (UNW_IA64_FR + 2);
|
|
|
|
|
c->f3_loc = IA64_FPREG_LOC (UNW_IA64_FR + 3);
|
|
|
|
|
c->f4_loc = IA64_FPREG_LOC (UNW_IA64_FR + 4);
|
|
|
|
|
c->f5_loc = IA64_FPREG_LOC (UNW_IA64_FR + 5);
|
|
|
|
|
for (i = 16; i <= 31; ++i)
|
|
|
|
|
c->fr_loc[i - 16] = IA64_FPREG_LOC (UNW_IA64_FR + i);
|
|
|
|
|
|
|
|
|
|
if (ia64_get (c, IA64_REG_LOC (UNW_IA64_SP), &c->psp) < 0)
|
|
|
|
|
return -1;
|
|
|
|
|
|
|
|
|
|
if (ia64_get (c, c->bsp_loc, &c->bsp) < 0)
|
|
|
|
|
return -1;
|
|
|
|
|
|
|
|
|
|
c->rbs_top = c->bsp;
|
|
|
|
|
c->pi.flags = 0;
|
|
|
|
|
c->eh_args[0] = 0;
|
|
|
|
|
c->eh_args[1] = 0;
|
|
|
|
|
c->eh_args[2] = 0;
|
|
|
|
|
c->eh_args[3] = 0;
|
|
|
|
|
|
|
|
|
|
#ifdef IA64_UNW_SCRIPT_CACHE
|
|
|
|
|
c->hint = 0;
|
|
|
|
|
c->prev_script = 0;
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
return ia64_get_frame_state (c);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
alias (ia64_init_remote, UNW_OBJ(init_remote))
|
