summaryrefslogtreecommitdiff
path: root/src/third_party/unwind/dist/src/ia64/Gget_save_loc.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/third_party/unwind/dist/src/ia64/Gget_save_loc.c')
-rw-r--r--src/third_party/unwind/dist/src/ia64/Gget_save_loc.c168
1 files changed, 168 insertions, 0 deletions
diff --git a/src/third_party/unwind/dist/src/ia64/Gget_save_loc.c b/src/third_party/unwind/dist/src/ia64/Gget_save_loc.c
new file mode 100644
index 00000000000..34efe99a752
--- /dev/null
+++ b/src/third_party/unwind/dist/src/ia64/Gget_save_loc.c
@@ -0,0 +1,168 @@
+/* libunwind - a platform-independent unwind library
+ Copyright (C) 2002-2003, 2005 Hewlett-Packard Co
+ Contributed by David Mosberger-Tang <davidm@hpl.hp.com>
+
+This file is part of libunwind.
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */
+
+#include <assert.h>
+
+#include "rse.h"
+
+#include "offsets.h"
+#include "regs.h"
+
+int
+unw_get_save_loc (unw_cursor_t *cursor, int reg, unw_save_loc_t *sloc)
+{
+ struct cursor *c = (struct cursor *) cursor;
+ ia64_loc_t loc, reg_loc;
+ uint8_t nat_bitnr;
+ int ret;
+
+ loc = IA64_NULL_LOC; /* default to "not saved" */
+
+ switch (reg)
+ {
+ /* frame registers */
+ case UNW_IA64_BSP:
+ case UNW_REG_SP:
+ default:
+ break;
+
+ case UNW_REG_IP:
+ loc = c->loc[IA64_REG_IP];
+ break;
+
+ /* preserved registers: */
+ case UNW_IA64_GR + 4 ... UNW_IA64_GR + 7:
+ loc = c->loc[IA64_REG_R4 + (reg - (UNW_IA64_GR + 4))];
+ break;
+
+ case UNW_IA64_NAT + 4 ... UNW_IA64_NAT + 7:
+ loc = c->loc[IA64_REG_NAT4 + (reg - (UNW_IA64_NAT + 4))];
+ reg_loc = c->loc[IA64_REG_R4 + (reg - (UNW_IA64_NAT + 4))];
+ nat_bitnr = c->nat_bitnr[reg - (UNW_IA64_NAT + 4)];
+ if (IA64_IS_FP_LOC (reg_loc))
+ /* NaT bit saved as a NaTVal. */
+ loc = reg_loc;
+ break;
+
+ case UNW_IA64_FR + 2: loc = c->loc[IA64_REG_F2]; break;
+ case UNW_IA64_FR + 3: loc = c->loc[IA64_REG_F3]; break;
+ case UNW_IA64_FR + 4: loc = c->loc[IA64_REG_F4]; break;
+ case UNW_IA64_FR + 5: loc = c->loc[IA64_REG_F5]; break;
+ case UNW_IA64_FR + 16 ... UNW_IA64_FR + 31:
+ loc = c->loc[IA64_REG_F16 + (reg - (UNW_IA64_FR + 16))];
+ break;
+
+ case UNW_IA64_AR_BSP: loc = c->loc[IA64_REG_BSP]; break;
+ case UNW_IA64_AR_BSPSTORE: loc = c->loc[IA64_REG_BSPSTORE]; break;
+ case UNW_IA64_AR_PFS: loc = c->loc[IA64_REG_PFS]; break;
+ case UNW_IA64_AR_RNAT: loc = c->loc[IA64_REG_RNAT]; break;
+ case UNW_IA64_AR_UNAT: loc = c->loc[IA64_REG_UNAT]; break;
+ case UNW_IA64_AR_LC: loc = c->loc[IA64_REG_LC]; break;
+ case UNW_IA64_AR_FPSR: loc = c->loc[IA64_REG_FPSR]; break;
+ case UNW_IA64_BR + 1: loc = c->loc[IA64_REG_B1]; break;
+ case UNW_IA64_BR + 2: loc = c->loc[IA64_REG_B2]; break;
+ case UNW_IA64_BR + 3: loc = c->loc[IA64_REG_B3]; break;
+ case UNW_IA64_BR + 4: loc = c->loc[IA64_REG_B4]; break;
+ case UNW_IA64_BR + 5: loc = c->loc[IA64_REG_B5]; break;
+ case UNW_IA64_CFM: loc = c->cfm_loc; break;
+ case UNW_IA64_PR: loc = c->loc[IA64_REG_PR]; break;
+
+ case UNW_IA64_GR + 32 ... UNW_IA64_GR + 127: /* stacked reg */
+ reg = rotate_gr (c, reg - UNW_IA64_GR);
+ ret = ia64_get_stacked (c, reg, &loc, NULL);
+ if (ret < 0)
+ return ret;
+ break;
+
+ case UNW_IA64_NAT + 32 ... UNW_IA64_NAT + 127: /* stacked reg */
+ reg = rotate_gr (c, reg - UNW_IA64_NAT);
+ ret = ia64_get_stacked (c, reg, NULL, &loc);
+ break;
+
+ case UNW_IA64_AR_EC:
+ loc = c->cfm_loc;
+ break;
+
+ /* scratch & special registers: */
+
+ case UNW_IA64_GR + 0:
+ case UNW_IA64_GR + 1: /* global pointer */
+ case UNW_IA64_NAT + 0:
+ case UNW_IA64_NAT + 1: /* global pointer */
+ case UNW_IA64_FR + 0:
+ case UNW_IA64_FR + 1:
+ break;
+
+ case UNW_IA64_NAT + 2 ... UNW_IA64_NAT + 3:
+ case UNW_IA64_NAT + 8 ... UNW_IA64_NAT + 31:
+ loc = ia64_scratch_loc (c, reg, &nat_bitnr);
+ break;
+
+ case UNW_IA64_GR + 2 ... UNW_IA64_GR + 3:
+ case UNW_IA64_GR + 8 ... UNW_IA64_GR + 31:
+ case UNW_IA64_BR + 0:
+ case UNW_IA64_BR + 6:
+ case UNW_IA64_BR + 7:
+ case UNW_IA64_AR_RSC:
+ case UNW_IA64_AR_CSD:
+ case UNW_IA64_AR_SSD:
+ case UNW_IA64_AR_CCV:
+ loc = ia64_scratch_loc (c, reg, NULL);
+ break;
+
+ case UNW_IA64_FR + 6 ... UNW_IA64_FR + 15:
+ loc = ia64_scratch_loc (c, reg, NULL);
+ break;
+
+ case UNW_IA64_FR + 32 ... UNW_IA64_FR + 127:
+ reg = rotate_fr (c, reg - UNW_IA64_FR) + UNW_IA64_FR;
+ loc = ia64_scratch_loc (c, reg, NULL);
+ break;
+ }
+
+ memset (sloc, 0, sizeof (*sloc));
+
+ if (IA64_IS_NULL_LOC (loc))
+ {
+ sloc->type = UNW_SLT_NONE;
+ return 0;
+ }
+
+#if !defined(UNW_LOCAL_ONLY)
+ if (IA64_IS_REG_LOC (loc))
+ {
+ sloc->type = UNW_SLT_REG;
+ sloc->u.regnum = IA64_GET_REG (loc);
+ sloc->extra.nat_bitnr = nat_bitnr;
+ }
+ else
+#endif
+ {
+ sloc->type = UNW_SLT_MEMORY;
+ sloc->u.addr = IA64_GET_ADDR (loc);
+ sloc->extra.nat_bitnr = nat_bitnr;
+ }
+ return 0;
+}