libunwind_i.h revision 37be21c01ebe23402d4b5f1391e7a83da34e8c32
137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang/* libunwind - a platform-independent unwind library 237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang Copyright (C) 2002-2005 Hewlett-Packard Co 337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang Contributed by David Mosberger-Tang <davidm@hpl.hp.com> 437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-TangThis file is part of libunwind. 637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-TangPermission is hereby granted, free of charge, to any person obtaining 837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tanga copy of this software and associated documentation files (the 937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang"Software"), to deal in the Software without restriction, including 1037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangwithout limitation the rights to use, copy, modify, merge, publish, 1137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangdistribute, sublicense, and/or sell copies of the Software, and to 1237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangpermit persons to whom the Software is furnished to do so, subject to 1337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangthe following conditions: 1437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 1537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-TangThe above copyright notice and this permission notice shall be 1637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangincluded in all copies or substantial portions of the Software. 1737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 1837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-TangTHE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 1937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-TangEXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF 2037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-TangMERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 2137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-TangNONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE 2237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-TangLIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION 2337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-TangOF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION 2437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-TangWITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */ 2537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 2637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#ifndef X86_LIBUNWIND_I_H 2737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define X86_LIBUNWIND_I_H 2837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 2937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang/* Target-dependent definitions that are internal to libunwind but need 3037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang to be shared with target-independent code. */ 3137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 3237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#include <stdlib.h> 3337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#include <libunwind.h> 3437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 3537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#include "elf32.h" 3637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#include "dwarf.h" 3737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 3837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangstruct unw_addr_space 3937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang { 4037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang struct unw_accessors acc; 4137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang unw_caching_policy_t caching_policy; 4237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#ifdef HAVE_ATOMIC_OPS_H 4337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang AO_t cache_generation; 4437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#else 4537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang uint32_t cache_generation; 4637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#endif 4737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang unw_word_t dyn_generation; /* see dyn-common.h */ 4837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang unw_word_t dyn_info_list_addr; /* (cached) dyn_info_list_addr */ 4937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang }; 5037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 5137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangstruct cursor 5237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang { 5337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang struct dwarf_cursor dwarf; /* must be first */ 5437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 5537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang /* Format of sigcontext structure and address at which it is 5637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang stored: */ 5737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang enum 5837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang { 5937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang X86_SCF_NONE, /* no signal frame encountered */ 6037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang X86_SCF_LINUX_SIGFRAME, /* classic x86 sigcontext */ 6137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang X86_SCF_LINUX_RT_SIGFRAME /* POSIX ucontext_t */ 6237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang } 6337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang sigcontext_format; 6437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang unw_word_t sigcontext_addr; 6537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang }; 6637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 6737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define DWARF_GET_LOC(l) ((l).val) 6837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 6937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#ifdef UNW_LOCAL_ONLY 7037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_NULL_LOC DWARF_LOC (0, 0) 7137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_IS_NULL_LOC(l) (DWARF_GET_LOC (l) == 0) 7237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_LOC(r, t) ((dwarf_loc_t) { .val = (r) }) 7337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_IS_REG_LOC(l) 0 7437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_REG_LOC(c,r) (DWARF_LOC((unw_word_t) \ 7537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang tdep_uc_addr((c)->as_arg, (r)), 0)) 7637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_MEM_LOC(c,m) DWARF_LOC ((m), 0) 7737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_FPREG_LOC(c,r) (DWARF_LOC((unw_word_t) \ 7837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang tdep_uc_addr((c)->as_arg, (r)), 0)) 7937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 8037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangstatic inline int 8137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangdwarf_getfp (struct dwarf_cursor *c, dwarf_loc_t loc, unw_fpreg_t *val) 8237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang{ 8337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (!DWARF_GET_LOC (loc)) 8437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return -1; 8537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang *val = *(unw_fpreg_t *) DWARF_GET_LOC (loc); 8637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return 0; 8737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang} 8837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 8937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangstatic inline int 9037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangdwarf_putfp (struct dwarf_cursor *c, dwarf_loc_t loc, unw_fpreg_t val) 9137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang{ 9237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (!DWARF_GET_LOC (loc)) 9337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return -1; 9437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang *(unw_fpreg_t *) DWARF_GET_LOC (loc) = val; 9537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return 0; 9637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang} 9737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 9837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangstatic inline int 9937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangdwarf_get (struct dwarf_cursor *c, dwarf_loc_t loc, unw_word_t *val) 10037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang{ 10137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (!DWARF_GET_LOC (loc)) 10237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return -1; 10337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang *val = *(unw_word_t *) DWARF_GET_LOC (loc); 10437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return 0; 10537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang} 10637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 10737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangstatic inline int 10837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangdwarf_put (struct dwarf_cursor *c, dwarf_loc_t loc, unw_word_t val) 10937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang{ 11037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (!DWARF_GET_LOC (loc)) 11137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return -1; 11237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang *(unw_word_t *) DWARF_GET_LOC (loc) = val; 11337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return 0; 11437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang} 11537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 11637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#else /* !UNW_LOCAL_ONLY */ 11737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_LOC_TYPE_FP (1 << 0) 11837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_LOC_TYPE_REG (1 << 1) 11937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_NULL_LOC DWARF_LOC (0, 0) 12037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_IS_NULL_LOC(l) \ 12137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang ({ dwarf_loc_t _l = (l); _l.val == 0 && _l.type == 0; }) 12237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_LOC(r, t) ((dwarf_loc_t) { .val = (r), .type = (t) }) 12337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_IS_REG_LOC(l) (((l).type & DWARF_LOC_TYPE_REG) != 0) 12437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_IS_FP_LOC(l) (((l).type & DWARF_LOC_TYPE_FP) != 0) 12537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_REG_LOC(c,r) DWARF_LOC((r), DWARF_LOC_TYPE_REG) 12637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_MEM_LOC(c,m) DWARF_LOC ((m), 0) 12737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define DWARF_FPREG_LOC(c,r) DWARF_LOC((r), (DWARF_LOC_TYPE_REG \ 12837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang | DWARF_LOC_TYPE_FP)) 12937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 13037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangstatic inline int 13137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangdwarf_getfp (struct dwarf_cursor *c, dwarf_loc_t loc, unw_fpreg_t *val) 13237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang{ 13337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang char *valp = (char *) &val; 13437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang unw_word_t addr; 13537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang int ret; 13637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 13737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (DWARF_IS_NULL_LOC (loc)) 13837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return -UNW_EBADREG; 13937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 14037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (DWARF_IS_REG_LOC (loc)) 14137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return (*c->as->acc.access_fpreg) (c->as, DWARF_GET_LOC (loc), 14237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang val, 0, c->as_arg); 14337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 14437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang addr = DWARF_GET_LOC (loc); 14537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if ((ret = (*c->as->acc.access_mem) (c->as, addr + 0, (unw_word_t *) valp, 14637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 0, c->as_arg)) < 0) 14737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return ret; 14837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 14937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return (*c->as->acc.access_mem) (c->as, addr + 4, (unw_word_t *) valp + 1, 0, 15037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang c->as_arg); 15137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang} 15237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 15337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangstatic inline int 15437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangdwarf_putfp (struct dwarf_cursor *c, dwarf_loc_t loc, unw_fpreg_t val) 15537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang{ 15637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang char *valp = (char *) &val; 15737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang unw_word_t addr; 15837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang int ret; 15937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 16037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (DWARF_IS_NULL_LOC (loc)) 16137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return -UNW_EBADREG; 16237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 16337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (DWARF_IS_REG_LOC (loc)) 16437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return (*c->as->acc.access_fpreg) (c->as, DWARF_GET_LOC (loc), 16537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang &val, 1, c->as_arg); 16637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 16737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang addr = DWARF_GET_LOC (loc); 16837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if ((ret = (*c->as->acc.access_mem) (c->as, addr + 0, (unw_word_t *) valp, 16937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 1, c->as_arg)) < 0) 17037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return ret; 17137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 17237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return (*c->as->acc.access_mem) (c->as, addr + 4, (unw_word_t *) valp + 1, 17337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 1, c->as_arg); 17437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang} 17537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 17637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangstatic inline int 17737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangdwarf_get (struct dwarf_cursor *c, dwarf_loc_t loc, unw_word_t *val) 17837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang{ 17937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (DWARF_IS_NULL_LOC (loc)) 18037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return -UNW_EBADREG; 18137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 18237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang /* If a code-generator were to save a value of type unw_word_t in a 18337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang floating-point register, we would have to support this case. I 18437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang suppose it could happen with MMX registers, but does it really 18537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang happen? */ 18637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang assert (!DWARF_IS_FP_LOC (loc)); 18737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 18837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (DWARF_IS_REG_LOC (loc)) 18937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return (*c->as->acc.access_reg) (c->as, DWARF_GET_LOC (loc), val, 19037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 0, c->as_arg); 19137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang else 19237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return (*c->as->acc.access_mem) (c->as, DWARF_GET_LOC (loc), val, 19337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 0, c->as_arg); 19437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang} 19537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 19637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangstatic inline int 19737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangdwarf_put (struct dwarf_cursor *c, dwarf_loc_t loc, unw_word_t val) 19837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang{ 19937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (DWARF_IS_NULL_LOC (loc)) 20037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return -UNW_EBADREG; 20137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 20237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang /* If a code-generator were to save a value of type unw_word_t in a 20337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang floating-point register, we would have to support this case. I 20437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang suppose it could happen with MMX registers, but does it really 20537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang happen? */ 20637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang assert (!DWARF_IS_FP_LOC (loc)); 20737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 20837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang if (DWARF_IS_REG_LOC (loc)) 20937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return (*c->as->acc.access_reg) (c->as, DWARF_GET_LOC (loc), &val, 21037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 1, c->as_arg); 21137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang else 21237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang return (*c->as->acc.access_mem) (c->as, DWARF_GET_LOC (loc), &val, 21337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 1, c->as_arg); 21437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang} 21537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 21637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#endif /* !UNW_LOCAL_ONLY */ 21737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 21837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_needs_initialization UNW_OBJ(needs_initialization) 21937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_init UNW_OBJ(init) 22037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang/* Platforms that support UNW_INFO_FORMAT_TABLE need to define 22137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang tdep_search_unwind_table. */ 22237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_search_unwind_table dwarf_search_unwind_table 22337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_uc_addr UNW_ARCH_OBJ(uc_addr) 22437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_get_elf_image UNW_ARCH_OBJ(get_elf_image) 22537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_access_reg UNW_OBJ(access_reg) 22637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_access_fpreg UNW_OBJ(access_fpreg) 22737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 22837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#ifdef UNW_LOCAL_ONLY 22937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define tdep_find_proc_info(c,ip,n) \ 23037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang dwarf_find_proc_info((c)->as, (ip), &(c)->pi, (n), \ 23137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang (c)->as_arg) 23237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define tdep_put_unwind_info(as,pi,arg) \ 23337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang dwarf_put_unwind_info((as), (pi), (arg)) 23437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#else 23537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define tdep_find_proc_info(c,ip,n) \ 23637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang (*(c)->as->acc.find_proc_info)((c)->as, (ip), &(c)->pi, (n), \ 23737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang (c)->as_arg) 23837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang# define tdep_put_unwind_info(as,pi,arg) \ 23937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang (*(as)->acc.put_unwind_info)((as), (pi), (arg)) 24037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#endif 24137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 24237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_get_as(c) ((c)->dwarf.as) 24337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_get_as_arg(c) ((c)->dwarf.as_arg) 24437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_get_ip(c) ((c)->dwarf.ip) 24537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#define tdep_big_endian(as) 0 24637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 24737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangextern int tdep_needs_initialization; 24837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 24937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangextern void tdep_init (void); 25037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangextern int tdep_search_unwind_table (unw_addr_space_t as, unw_word_t ip, 25137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang unw_dyn_info_t *di, unw_proc_info_t *pi, 25237be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang int need_unwind_info, void *arg); 25337be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangextern void *tdep_uc_addr (ucontext_t *uc, int reg); 25437be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangextern int tdep_get_elf_image (struct elf_image *ei, pid_t pid, unw_word_t ip, 25537be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang unsigned long *segbase, unsigned long *mapoff); 25637be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangextern int tdep_access_reg (struct cursor *c, unw_regnum_t reg, 25737be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang unw_word_t *valp, int write); 25837be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tangextern int tdep_access_fpreg (struct cursor *c, unw_regnum_t reg, 25937be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang unw_fpreg_t *valp, int write); 26037be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang 26137be21c01ebe23402d4b5f1391e7a83da34e8c32David Mosberger-Tang#endif /* X86_LIBUNWIND_I_H */ 262