static int access_fpreg (unw_addr_space_t as, unw_regnum_t reg, unw_fpreg_t *val, int write, void *arg) { ucontext_t *uc = ((struct cursor *)arg)->uc; unw_fpreg_t *addr; if (!unw_is_fpreg (reg)) goto badreg; if (!(addr = x86_64_r_uc_addr (uc, reg))) goto badreg; if (write) { Debug (12, "%s <- %08lx.%08lx.%08lx\n", unw_regname (reg), ((long *)val)[0], ((long *)val)[1], ((long *)val)[2]); *(unw_fpreg_t *) addr = *val; } else { *val = *(unw_fpreg_t *) addr; Debug (12, "%s -> %08lx.%08lx.%08lx\n", unw_regname (reg), ((long *)val)[0], ((long *)val)[1], ((long *)val)[2]); } return 0; badreg: Debug (1, "bad register number %u\n", reg); /* attempt to access a non-preserved register */ return -UNW_EBADREG; }
static int access_reg (unw_addr_space_t as, unw_regnum_t reg, unw_word_t *val, int write, void *arg) { unw_word_t *addr; ucontext_t *uc = ((struct cursor *)arg)->uc; if (unw_is_fpreg (reg)) goto badreg; if (!(addr = x86_64_r_uc_addr (uc, reg))) goto badreg; if (write) { *(unw_word_t *) addr = *val; Debug (12, "%s <- 0x%016lx\n", unw_regname (reg), *val); } else { *val = *(unw_word_t *) addr; Debug (12, "%s -> 0x%016lx\n", unw_regname (reg), *val); } return 0; badreg: Debug (1, "bad register number %u\n", reg); return -UNW_EBADREG; }
static int access_reg (unw_addr_space_t as, unw_regnum_t reg, unw_word_t *val, int write, void *arg) { unw_word_t *addr; ucontext_t *uc = arg; if (unw_is_fpreg (reg)) goto badreg; Debug (16, "reg = %s\n", unw_regname (reg)); if (!(addr = uc_addr (uc, reg))) goto badreg; if (write) { *(unw_word_t *) (intptr_t) addr = (mips_reg_t) *val; Debug (12, "%s <- %llx\n", unw_regname (reg), (long long) *val); } else { *val = (mips_reg_t) *(unw_word_t *) (intptr_t) addr; Debug (12, "%s -> %llx\n", unw_regname (reg), (long long) *val); } return 0; badreg: Debug (1, "bad register number %u\n", reg); return -UNW_EBADREG; }
static int access_reg (unw_addr_space_t as, unw_regnum_t reg, unw_word_t *val, int write, void *arg) { unw_word_t *addr; unw_tdep_context_t *uc = arg; if (unw_is_fpreg (reg)) goto badreg; if (!(addr = uc_addr (uc, reg))) goto badreg; if (write) { *(unw_word_t *) addr = *val; Debug (12, "%s <- %lx\n", unw_regname (reg), *val); } else { *val = *(unw_word_t *) addr; Debug (12, "%s -> %lx\n", unw_regname (reg), *val); } return 0; badreg: Debug (1, "bad register number %u\n", reg); return -UNW_EBADREG; }
static inline int establish_machine_state (struct cursor *c) { unw_addr_space_t as = c->dwarf.as; void *arg = c->dwarf.as_arg; unw_fpreg_t fpval; unw_word_t val; int reg; Debug (8, "copying out cursor state\n"); for (reg = 0; reg <= UNW_REG_LAST; ++reg) { Debug (16, "copying %s %d\n", unw_regname (reg), reg); if (unw_is_fpreg (reg)) { if (tdep_access_fpreg (c, reg, &fpval, 0) >= 0) as->acc.access_fpreg (as, reg, &fpval, 1, arg); } else { if (tdep_access_reg (c, reg, &val, 0) >= 0) as->acc.access_reg (as, reg, &val, 1, arg); } } return 0; }