123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154 |
- /* libunwind - a platform-independent unwind library
- Copyright (C) 2002-2003 Hewlett-Packard Co
- Contributed by David Mosberger-Tang <davidm@hpl.hp.com>
- Modified for x86_64 by Max Asbock <masbock@us.ibm.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 "unwind_i.h"
- #include "ucontext_i.h"
- #include <sys/syscall.h>
- HIDDEN void
- tdep_fetch_frame (struct dwarf_cursor *dw, unw_word_t ip, int need_unwind_info)
- {
- struct cursor *c = (struct cursor *) dw;
- assert(! need_unwind_info || dw->pi_valid);
- assert(! need_unwind_info || dw->pi.unwind_info);
- if (dw->pi_valid
- && dw->pi.unwind_info
- && ((struct dwarf_cie_info *) dw->pi.unwind_info)->signal_frame)
- c->sigcontext_format = X86_64_SCF_LINUX_RT_SIGFRAME;
- else
- c->sigcontext_format = X86_64_SCF_NONE;
- Debug(5, "fetch frame ip=0x%lx cfa=0x%lx format=%d\n",
- dw->ip, dw->cfa, c->sigcontext_format);
- }
- HIDDEN void
- tdep_cache_frame (struct dwarf_cursor *dw, struct dwarf_reg_state *rs)
- {
- struct cursor *c = (struct cursor *) dw;
- rs->signal_frame = c->sigcontext_format;
- Debug(5, "cache frame ip=0x%lx cfa=0x%lx format=%d\n",
- dw->ip, dw->cfa, c->sigcontext_format);
- }
- HIDDEN void
- tdep_reuse_frame (struct dwarf_cursor *dw, struct dwarf_reg_state *rs)
- {
- struct cursor *c = (struct cursor *) dw;
- c->sigcontext_format = rs->signal_frame;
- if (c->sigcontext_format == X86_64_SCF_LINUX_RT_SIGFRAME)
- {
- c->frame_info.frame_type = UNW_X86_64_FRAME_SIGRETURN;
- /* Offset from cfa to ucontext_t in signal frame. */
- c->frame_info.cfa_reg_offset = 0;
- c->sigcontext_addr = dw->cfa;
- }
- else
- c->sigcontext_addr = 0;
- Debug(5, "reuse frame ip=0x%lx cfa=0x%lx format=%d addr=0x%lx offset=%+d\n",
- dw->ip, dw->cfa, c->sigcontext_format, c->sigcontext_addr,
- (c->sigcontext_format == X86_64_SCF_LINUX_RT_SIGFRAME
- ? c->frame_info.cfa_reg_offset : 0));
- }
- PROTECTED int
- unw_is_signal_frame (unw_cursor_t *cursor)
- {
- struct cursor *c = (struct cursor *) cursor;
- return c->sigcontext_format != X86_64_SCF_NONE;
- }
- PROTECTED int
- unw_handle_signal_frame (unw_cursor_t *cursor)
- {
- #if UNW_DEBUG /* To silence compiler warnings */
- /* Should not get here because we now use kernel-provided dwarf
- information for the signal trampoline and dwarf_step() works.
- Hence unw_step() should never call this function. Maybe
- restore old non-dwarf signal handling here, but then the
- gating on unw_is_signal_frame() needs to be removed. */
- struct cursor *c = (struct cursor *) cursor;
- Debug(1, "old format signal frame? format=%d addr=0x%lx cfa=0x%lx\n",
- c->sigcontext_format, c->sigcontext_addr, c->dwarf.cfa);
- #endif
- return -UNW_EBADFRAME;
- }
- #ifndef UNW_REMOTE_ONLY
- HIDDEN void *
- x86_64_r_uc_addr (ucontext_t *uc, int reg)
- {
- /* NOTE: common_init() in init.h inlines these for fast path access. */
- void *addr;
- switch (reg)
- {
- case UNW_X86_64_R8: addr = &uc->uc_mcontext.gregs[REG_R8]; break;
- case UNW_X86_64_R9: addr = &uc->uc_mcontext.gregs[REG_R9]; break;
- case UNW_X86_64_R10: addr = &uc->uc_mcontext.gregs[REG_R10]; break;
- case UNW_X86_64_R11: addr = &uc->uc_mcontext.gregs[REG_R11]; break;
- case UNW_X86_64_R12: addr = &uc->uc_mcontext.gregs[REG_R12]; break;
- case UNW_X86_64_R13: addr = &uc->uc_mcontext.gregs[REG_R13]; break;
- case UNW_X86_64_R14: addr = &uc->uc_mcontext.gregs[REG_R14]; break;
- case UNW_X86_64_R15: addr = &uc->uc_mcontext.gregs[REG_R15]; break;
- case UNW_X86_64_RDI: addr = &uc->uc_mcontext.gregs[REG_RDI]; break;
- case UNW_X86_64_RSI: addr = &uc->uc_mcontext.gregs[REG_RSI]; break;
- case UNW_X86_64_RBP: addr = &uc->uc_mcontext.gregs[REG_RBP]; break;
- case UNW_X86_64_RBX: addr = &uc->uc_mcontext.gregs[REG_RBX]; break;
- case UNW_X86_64_RDX: addr = &uc->uc_mcontext.gregs[REG_RDX]; break;
- case UNW_X86_64_RAX: addr = &uc->uc_mcontext.gregs[REG_RAX]; break;
- case UNW_X86_64_RCX: addr = &uc->uc_mcontext.gregs[REG_RCX]; break;
- case UNW_X86_64_RSP: addr = &uc->uc_mcontext.gregs[REG_RSP]; break;
- case UNW_X86_64_RIP: addr = &uc->uc_mcontext.gregs[REG_RIP]; break;
- default:
- addr = NULL;
- }
- return addr;
- }
- /* sigreturn() is a no-op on x86_64 glibc. */
- HIDDEN NORETURN void
- x86_64_sigreturn (unw_cursor_t *cursor)
- {
- struct cursor *c = (struct cursor *) cursor;
- struct sigcontext *sc = (struct sigcontext *) c->sigcontext_addr;
- Debug (8, "resuming at ip=%llx via sigreturn(%p)\n",
- (unsigned long long) c->dwarf.ip, sc);
- __asm__ __volatile__ ("mov %0, %%rsp;"
- "mov %1, %%rax;"
- "syscall"
- :: "r"(sc), "i"(SYS_rt_sigreturn)
- : "memory");
- abort();
- }
- #endif
|