#include <mach_kdb.h>
#include <mach_kgdb.h>
#include <mach_kdp.h>
#include <mach_ldebug.h>
#include <types.h>
#include <i386/eflags.h>
#include <i386/trap.h>
#include <i386/pmap.h>
#include <i386/fpu.h>
#include <i386/misc_protos.h>
#include <i386/lapic.h>
#include <mach/exception.h>
#include <mach/kern_return.h>
#include <mach/vm_param.h>
#include <mach/i386/thread_status.h>
#include <vm/vm_kern.h>
#include <vm/vm_fault.h>
#include <kern/kern_types.h>
#include <kern/processor.h>
#include <kern/thread.h>
#include <kern/task.h>
#include <kern/sched.h>
#include <kern/sched_prim.h>
#include <kern/exception.h>
#include <kern/spl.h>
#include <kern/misc_protos.h>
#include <kern/debug.h>
#include <sys/kdebug.h>
#if MACH_KGDB
#include <kgdb/kgdb_defs.h>
#endif
#if MACH_KDB
#include <debug.h>
#include <ddb/db_watch.h>
#include <ddb/db_run.h>
#include <ddb/db_break.h>
#include <ddb/db_trap.h>
#endif
#include <string.h>
#include <i386/postcode.h>
#include <i386/mp_desc.h>
#include <i386/proc_reg.h>
#if CONFIG_MCA
#include <i386/machine_check.h>
#endif
#include <mach/i386/syscall_sw.h>
#include <libkern/OSDebug.h>
extern void throttle_lowpri_io(boolean_t);
static void user_page_fault_continue(kern_return_t kret);
#ifdef __i386__
static void panic_trap(x86_saved_state32_t *saved_state);
static void set_recovery_ip(x86_saved_state32_t *saved_state, vm_offset_t ip);
#else
static void panic_trap(x86_saved_state64_t *saved_state);
static void set_recovery_ip(x86_saved_state64_t *saved_state, vm_offset_t ip);
#endif
volatile perfCallback perfTrapHook = NULL;
volatile perfCallback perfASTHook = NULL;
#if CONFIG_DTRACE
perfCallback tempDTraceTrapHook = NULL;
extern boolean_t dtrace_tally_fault(user_addr_t);
#endif
void
thread_syscall_return(
kern_return_t ret)
{
thread_t thr_act = current_thread();
boolean_t is_mach;
int code;
if (thread_is_64bit(thr_act)) {
x86_saved_state64_t *regs;
regs = USER_REGS64(thr_act);
code = (int) (regs->rax & SYSCALL_NUMBER_MASK);
is_mach = (regs->rax & SYSCALL_CLASS_MASK)
== (SYSCALL_CLASS_MACH << SYSCALL_CLASS_SHIFT);
if (kdebug_enable && is_mach) {
KERNEL_DEBUG_CONSTANT(
MACHDBG_CODE(DBG_MACH_EXCP_SC,code)|DBG_FUNC_END,
ret, 0, 0, 0, 0);
}
regs->rax = ret;
#if DEBUG
if (is_mach)
DEBUG_KPRINT_SYSCALL_MACH(
"thread_syscall_return: 64-bit mach ret=%u\n",
ret);
else
DEBUG_KPRINT_SYSCALL_UNIX(
"thread_syscall_return: 64-bit unix ret=%u\n",
ret);
#endif
} else {
x86_saved_state32_t *regs;
regs = USER_REGS32(thr_act);
code = ((int) regs->eax);
is_mach = (code < 0);
if (kdebug_enable && is_mach) {
KERNEL_DEBUG_CONSTANT(
MACHDBG_CODE(DBG_MACH_EXCP_SC,-code)|DBG_FUNC_END,
ret, 0, 0, 0, 0);
}
regs->eax = ret;
#if DEBUG
if (is_mach)
DEBUG_KPRINT_SYSCALL_MACH(
"thread_syscall_return: 32-bit mach ret=%u\n",
ret);
else
DEBUG_KPRINT_SYSCALL_UNIX(
"thread_syscall_return: 32-bit unix ret=%u\n",
ret);
#endif
}
throttle_lowpri_io(TRUE);
thread_exception_return();
}
#if MACH_KDB
boolean_t debug_all_traps_with_kdb = FALSE;
extern struct db_watchpoint *db_watchpoint_list;
extern boolean_t db_watchpoints_inserted;
extern boolean_t db_breakpoints_inserted;
void
thread_kdb_return(void)
{
thread_t thr_act = current_thread();
x86_saved_state_t *iss = USER_STATE(thr_act);
if (is_saved_state64(iss)) {
x86_saved_state64_t *regs;
regs = saved_state64(iss);
if (kdb_trap(regs->isf.trapno, (int)regs->isf.err, (void *)regs)) {
thread_exception_return();
}
} else {
x86_saved_state32_t *regs;
regs = saved_state32(iss);
if (kdb_trap(regs->trapno, regs->err, (void *)regs)) {
thread_exception_return();
}
}
}
#endif
void
user_page_fault_continue(
kern_return_t kr)
{
thread_t thread = current_thread();
ast_t *myast;
boolean_t intr;
user_addr_t vaddr;
#if MACH_KDB
x86_saved_state_t *regs = USER_STATE(thread);
int err;
int trapno;
assert((is_saved_state32(regs) && !thread_is_64bit(thread)) ||
(is_saved_state64(regs) && thread_is_64bit(thread)));
#endif
if (thread_is_64bit(thread)) {
x86_saved_state64_t *uregs;
uregs = USER_REGS64(thread);
#if MACH_KDB
trapno = uregs->isf.trapno;
err = (int)uregs->isf.err;
#endif
vaddr = (user_addr_t)uregs->cr2;
} else {
x86_saved_state32_t *uregs;
uregs = USER_REGS32(thread);
#if MACH_KDB
trapno = uregs->trapno;
err = uregs->err;
#endif
vaddr = uregs->cr2;
}
if ((kr == KERN_SUCCESS) || (kr == KERN_ABORTED)) {
#if MACH_KDB
if (!db_breakpoints_inserted) {
db_set_breakpoints();
}
if (db_watchpoint_list &&
db_watchpoints_inserted &&
(err & T_PF_WRITE) &&
db_find_watchpoint(thread->map,
(vm_offset_t)vaddr,
saved_state32(regs)))
kdb_trap(T_WATCHPOINT, 0, saved_state32(regs));
#endif
intr = ml_set_interrupts_enabled(FALSE);
myast = ast_pending();
while (*myast & AST_ALL) {
ast_taken(AST_ALL, intr);
ml_set_interrupts_enabled(FALSE);
myast = ast_pending();
}
ml_set_interrupts_enabled(intr);
thread_exception_return();
}
#if MACH_KDB
if (debug_all_traps_with_kdb &&
kdb_trap(trapno, err, saved_state32(regs))) {
thread_exception_return();
}
#endif
i386_exception(EXC_BAD_ACCESS, kr, vaddr);
}
struct recovery {
uintptr_t fault_addr;
uintptr_t recover_addr;
};
extern struct recovery recover_table[];
extern struct recovery recover_table_end[];
const char * trap_type[] = {TRAP_NAMES};
unsigned TRAP_TYPES = sizeof(trap_type)/sizeof(trap_type[0]);
#if defined(__x86_64__) && DEBUG
static void
print_state(x86_saved_state64_t *saved_state)
{
kprintf("current_cpu_datap() 0x%lx\n", (uintptr_t)current_cpu_datap());
kprintf("Current GS base MSR 0x%llx\n", rdmsr64(MSR_IA32_GS_BASE));
kprintf("Kernel GS base MSR 0x%llx\n", rdmsr64(MSR_IA32_KERNEL_GS_BASE));
kprintf("state at 0x%lx:\n", (uintptr_t) saved_state);
kprintf(" rdi 0x%llx\n", saved_state->rdi);
kprintf(" rsi 0x%llx\n", saved_state->rsi);
kprintf(" rdx 0x%llx\n", saved_state->rdx);
kprintf(" r10 0x%llx\n", saved_state->r10);
kprintf(" r8 0x%llx\n", saved_state->r8);
kprintf(" r9 0x%llx\n", saved_state->r9);
kprintf(" v_arg6 0x%llx\n", saved_state->v_arg6);
kprintf(" v_arg7 0x%llx\n", saved_state->v_arg7);
kprintf(" v_arg8 0x%llx\n", saved_state->v_arg8);
kprintf(" cr2 0x%llx\n", saved_state->cr2);
kprintf("real cr2 0x%lx\n", get_cr2());
kprintf(" r15 0x%llx\n", saved_state->r15);
kprintf(" r14 0x%llx\n", saved_state->r14);
kprintf(" r13 0x%llx\n", saved_state->r13);
kprintf(" r12 0x%llx\n", saved_state->r12);
kprintf(" r11 0x%llx\n", saved_state->r11);
kprintf(" rbp 0x%llx\n", saved_state->rbp);
kprintf(" rbx 0x%llx\n", saved_state->rbx);
kprintf(" rcx 0x%llx\n", saved_state->rcx);
kprintf(" rax 0x%llx\n", saved_state->rax);
kprintf(" gs 0x%x\n", saved_state->gs);
kprintf(" fs 0x%x\n", saved_state->fs);
kprintf(" isf.trapno 0x%x\n", saved_state->isf.trapno);
kprintf(" isf._pad 0x%x\n", saved_state->isf._pad);
kprintf(" isf.trapfn 0x%llx\n", saved_state->isf.trapfn);
kprintf(" isf.err 0x%llx\n", saved_state->isf.err);
kprintf(" isf.rip 0x%llx\n", saved_state->isf.rip);
kprintf(" isf.cs 0x%llx\n", saved_state->isf.cs);
kprintf(" isf.rflags 0x%llx\n", saved_state->isf.rflags);
kprintf(" isf.rsp 0x%llx\n", saved_state->isf.rsp);
kprintf(" isf.ss 0x%llx\n", saved_state->isf.ss);
}
extern void
panic_idt64(x86_saved_state_t *rsp);
void
panic_idt64(x86_saved_state_t *rsp)
{
print_state(saved_state64(rsp));
panic("panic_idt64");
}
#endif
extern void PE_incoming_interrupt(int interrupt);
void
interrupt(x86_saved_state_t *state)
{
uint64_t rip;
uint64_t rsp;
int interrupt_num;
boolean_t user_mode = FALSE;
if (is_saved_state64(state) == TRUE) {
x86_saved_state64_t *state64;
state64 = saved_state64(state);
rip = state64->isf.rip;
rsp = state64->isf.rsp;
interrupt_num = state64->isf.trapno;
#ifdef __x86_64__
if(state64->isf.cs & 0x03)
#endif
user_mode = TRUE;
} else {
x86_saved_state32_t *state32;
state32 = saved_state32(state);
if (state32->cs & 0x03)
user_mode = TRUE;
rip = state32->eip;
rsp = state32->uesp;
interrupt_num = state32->trapno;
}
KERNEL_DEBUG_CONSTANT(
MACHDBG_CODE(DBG_MACH_EXCP_INTR, 0) | DBG_FUNC_START,
interrupt_num, (long) rip, user_mode, 0, 0);
if (!lapic_interrupt(interrupt_num, state))
PE_incoming_interrupt(interrupt_num);
KERNEL_DEBUG_CONSTANT(
MACHDBG_CODE(DBG_MACH_EXCP_INTR, 0) | DBG_FUNC_END,
0, 0, 0, 0, 0);
if (!user_mode) {
uint64_t depth = current_cpu_datap()->cpu_kernel_stack
+ sizeof(struct x86_kernel_state)
+ sizeof(struct i386_exception_link *)
- rsp;
if (depth > kernel_stack_depth_max) {
kernel_stack_depth_max = (vm_offset_t)depth;
KERNEL_DEBUG_CONSTANT(
MACHDBG_CODE(DBG_MACH_SCHED, MACH_STACK_DEPTH),
(long) depth, (long) rip, 0, 0, 0);
}
}
}
static inline void
reset_dr7(void)
{
long dr7 = 0x400;
__asm__ volatile("mov %0,%%dr7" : : "r" (dr7));
}
#if MACH_KDP
unsigned kdp_has_active_watchpoints = 0;
#define NO_WATCHPOINTS (!kdp_has_active_watchpoints)
#else
#define NO_WATCHPOINTS 1
#endif
void
kernel_trap(
x86_saved_state_t *state)
{
#ifdef __i386__
x86_saved_state32_t *saved_state;
#else
x86_saved_state64_t *saved_state;
#endif
int code;
user_addr_t vaddr;
int type;
vm_map_t map = 0;
kern_return_t result = KERN_FAILURE;
thread_t thread;
ast_t *myast;
boolean_t intr;
vm_prot_t prot;
struct recovery *rp;
vm_offset_t kern_ip;
#if NCOPY_WINDOWS > 0
int fault_in_copy_window = -1;
#endif
int is_user = 0;
#if MACH_KDB
pt_entry_t *pte;
#endif
thread = current_thread();
#ifdef __i386__
if (is_saved_state64(state))
panic("kernel_trap(%p) with 64-bit state", state);
saved_state = saved_state32(state);
vaddr = (user_addr_t)saved_state->cr2;
type = saved_state->trapno;
code = saved_state->err & 0xffff;
intr = (saved_state->efl & EFL_IF) != 0;
kern_ip = (vm_offset_t)saved_state->eip;
#else
if (is_saved_state32(state))
panic("kernel_trap(%p) with 32-bit state", state);
saved_state = saved_state64(state);
vaddr = (user_addr_t)saved_state->cr2;
type = saved_state->isf.trapno;
code = (int)(saved_state->isf.err & 0xffff);
intr = (saved_state->isf.rflags & EFL_IF) != 0;
kern_ip = (vm_offset_t)saved_state->isf.rip;
#endif
myast = ast_pending();
perfCallback fn = perfASTHook;
if (fn) {
if (*myast & AST_CHUD_ALL)
fn(type, NULL, 0, 0);
} else
*myast &= ~AST_CHUD_ALL;
fn = perfTrapHook;
if (fn) {
if (fn(type, NULL, 0, 0) == KERN_SUCCESS) {
return;
}
}
#if CONFIG_DTRACE
if (tempDTraceTrapHook) {
if (tempDTraceTrapHook(type, state, 0, 0) == KERN_SUCCESS) {
return;
}
}
#endif
if (T_PREEMPT == type) {
ast_taken(AST_PREEMPTION, FALSE);
KERNEL_DEBUG_CONSTANT((MACHDBG_CODE(DBG_MACH_EXCP_KTRAP_x86, type)) | DBG_FUNC_NONE,
0, 0, 0, kern_ip, 0);
return;
}
if (T_PAGE_FAULT == type) {
map = kernel_map;
if (thread != THREAD_NULL && thread->map != kernel_map) {
#if NCOPY_WINDOWS > 0
vm_offset_t copy_window_base;
vm_offset_t kvaddr;
int window_index;
kvaddr = (vm_offset_t)vaddr;
copy_window_base = current_cpu_datap()->cpu_copywindow_base;
if (kvaddr >= copy_window_base && kvaddr < (copy_window_base + (NBPDE * NCOPY_WINDOWS)) ) {
window_index = (kvaddr - copy_window_base) / NBPDE;
if (thread->machine.copy_window[window_index].user_base != (user_addr_t)-1) {
kvaddr -= (copy_window_base + (NBPDE * window_index));
vaddr = thread->machine.copy_window[window_index].user_base + kvaddr;
map = thread->map;
fault_in_copy_window = window_index;
}
is_user = -1;
}
#else
if (vaddr < VM_MAX_USER_PAGE_ADDRESS) {
map = thread->map;
is_user = -1;
if (no_shared_cr3 &&
(thread->machine.specFlags&CopyIOActive) &&
map->pmap->pm_cr3 != get_cr3()) {
set_cr3(map->pmap->pm_cr3);
return;
}
}
#endif
}
}
KERNEL_DEBUG_CONSTANT(
(MACHDBG_CODE(DBG_MACH_EXCP_KTRAP_x86, type)) | DBG_FUNC_NONE,
(unsigned)(vaddr >> 32), (unsigned)vaddr, is_user, kern_ip, 0);
(void) ml_set_interrupts_enabled(intr);
switch (type) {
case T_NO_FPU:
fpnoextflt();
return;
case T_FPU_FAULT:
fpextovrflt();
return;
case T_FLOATING_POINT_ERROR:
fpexterrflt();
return;
case T_SSE_FLOAT_ERROR:
fpSSEexterrflt();
return;
case T_DEBUG:
#ifdef __i386__
if ((saved_state->efl & EFL_TF) == 0 && NO_WATCHPOINTS)
#else
if ((saved_state->isf.rflags & EFL_TF) == 0 && NO_WATCHPOINTS)
#endif
{
reset_dr7();
return;
}
goto debugger_entry;
#ifdef __x86_64__
case T_INT3:
goto debugger_entry;
#endif
case T_PAGE_FAULT:
prot = VM_PROT_READ;
if (code & T_PF_WRITE)
prot |= VM_PROT_WRITE;
#if PAE
if (code & T_PF_EXECUTE)
prot |= VM_PROT_EXECUTE;
#endif
#if MACH_KDB
if (map == kernel_map && db_watchpoint_list && db_watchpoints_inserted &&
(code & T_PF_WRITE) && vaddr < vm_map_max(map) &&
((*(pte = pmap_pte(kernel_pmap, (vm_map_offset_t)vaddr))) & INTEL_PTE_WRITE) == 0) {
pmap_store_pte(
pte,
*pte | INTEL_PTE_VALID | INTEL_PTE_WRITE);
result = KERN_SUCCESS;
goto look_for_watchpoints;
}
#endif
#if CONFIG_DTRACE
if (thread->options & TH_OPT_DTRACE) {
if (dtrace_tally_fault(vaddr)) {
goto FALL_THROUGH;
}
}
#endif
result = vm_fault(map,
vm_map_trunc_page(vaddr),
prot,
FALSE,
THREAD_UNINT, NULL, 0);
#if MACH_KDB
if (result == KERN_SUCCESS) {
look_for_watchpoints:
if (map == kernel_map && db_watchpoint_list && db_watchpoints_inserted && (code & T_PF_WRITE) &&
db_find_watchpoint(map, vaddr, saved_state))
kdb_trap(T_WATCHPOINT, 0, saved_state);
}
#endif
if (result == KERN_SUCCESS) {
#if NCOPY_WINDOWS > 0
if (fault_in_copy_window != -1) {
pt_entry_t *updp;
pt_entry_t *kpdp;
ml_set_interrupts_enabled(FALSE);
updp = pmap_pde(map->pmap, thread->machine.copy_window[fault_in_copy_window].user_base);
assert(updp);
if (0 == updp) panic("trap: updp 0");
kpdp = current_cpu_datap()->cpu_copywindow_pdp;
kpdp += fault_in_copy_window;
#if JOE_DEBUG
if (*kpdp && (*kpdp & PG_FRAME) != (*updp & PG_FRAME))
panic("kernel_fault: user pdp doesn't match - updp = 0x%qx, kpdp = 0x%qx\n", *updp, *kpdp);
#endif
pmap_store_pte(kpdp, *updp);
(void) ml_set_interrupts_enabled(intr);
}
#endif
return;
}
#if CONFIG_DTRACE
FALL_THROUGH:
#endif
case T_GENERAL_PROTECTION:
#if defined(__x86_64__) && DEBUG
print_state(saved_state);
#endif
for (rp = recover_table; rp < recover_table_end; rp++) {
if (kern_ip == rp->fault_addr) {
set_recovery_ip(saved_state, rp->recover_addr);
return;
}
}
if (thread->recover) {
set_recovery_ip(saved_state, thread->recover);
thread->recover = 0;
return;
}
default:
if (type == 15) {
kprintf("kernel_trap() ignoring spurious trap 15\n");
return;
}
debugger_entry:
sync_iss_to_iks(state);
#if MACH_KDB
restart_debugger:
#endif
#if MACH_KDP
if (current_debugger != KDB_CUR_DB) {
if (kdp_i386_trap(type, saved_state, result, (vm_offset_t)vaddr))
return;
} else {
#endif
#if MACH_KDB
if (kdb_trap(type, code, saved_state)) {
if (switch_debugger) {
current_debugger = KDP_CUR_DB;
switch_debugger = 0;
goto restart_debugger;
}
return;
}
#endif
#if MACH_KDP
}
#endif
}
panic_trap(saved_state);
}
#ifdef __i386__
static void
set_recovery_ip(x86_saved_state32_t *saved_state, vm_offset_t ip)
{
saved_state->eip = ip;
}
#else
static void
set_recovery_ip(x86_saved_state64_t *saved_state, vm_offset_t ip)
{
saved_state->isf.rip = ip;
}
#endif
#ifdef __i386__
static void
panic_trap(x86_saved_state32_t *regs)
{
const char *trapname = "Unknown";
uint32_t cr0 = get_cr0();
uint32_t cr2 = get_cr2();
uint32_t cr3 = get_cr3();
uint32_t cr4 = get_cr4();
panic_io_port_read();
kprintf("panic trap number 0x%x, eip 0x%x\n", regs->trapno, regs->eip);
kprintf("cr0 0x%08x cr2 0x%08x cr3 0x%08x cr4 0x%08x\n",
cr0, cr2, cr3, cr4);
if (regs->trapno < TRAP_TYPES)
trapname = trap_type[regs->trapno];
#undef panic
panic("Kernel trap at 0x%08x, type %d=%s, registers:\n"
"CR0: 0x%08x, CR2: 0x%08x, CR3: 0x%08x, CR4: 0x%08x\n"
"EAX: 0x%08x, EBX: 0x%08x, ECX: 0x%08x, EDX: 0x%08x\n"
"CR2: 0x%08x, EBP: 0x%08x, ESI: 0x%08x, EDI: 0x%08x\n"
"EFL: 0x%08x, EIP: 0x%08x, CS: 0x%08x, DS: 0x%08x\n"
"Error code: 0x%08x\n",
regs->eip, regs->trapno, trapname, cr0, cr2, cr3, cr4,
regs->eax,regs->ebx,regs->ecx,regs->edx,
regs->cr2,regs->ebp,regs->esi,regs->edi,
regs->efl,regs->eip,regs->cs, regs->ds, regs->err);
cr0 = 0;
}
#else
static void
panic_trap(x86_saved_state64_t *regs)
{
const char *trapname = "Unknown";
uint64_t cr0 = get_cr0();
uint64_t cr2 = get_cr2();
uint64_t cr3 = get_cr3();
uint64_t cr4 = get_cr4();
panic_io_port_read();
kprintf("panic trap number 0x%x, rip 0x%016llx\n",
regs->isf.trapno, regs->isf.rip);
kprintf("cr0 0x%016llx cr2 0x%016llx cr3 0x%016llx cr4 0x%016llx\n",
cr0, cr2, cr3, cr4);
if (regs->isf.trapno < TRAP_TYPES)
trapname = trap_type[regs->isf.trapno];
#undef panic
panic("Kernel trap at 0x%016llx, type %d=%s, registers:\n"
"CR0: 0x%016llx, CR2: 0x%016llx, CR3: 0x%016llx, CR4: 0x%016llx\n"
"RAX: 0x%016llx, RBX: 0x%016llx, RCX: 0x%016llx, RDX: 0x%016llx\n"
"RSP: 0x%016llx, RBP: 0x%016llx, RSI: 0x%016llx, RDI: 0x%016llx\n"
"R8: 0x%016llx, R9: 0x%016llx, R10: 0x%016llx, R11: 0x%016llx\n"
"R12: 0x%016llx, R13: 0x%016llx, R14: 0x%016llx, R15: 0x%016llx\n"
"RFL: 0x%016llx, RIP: 0x%016llx, CS: 0x%016llx, SS: 0x%016llx\n"
"Error code: 0x%016llx\n",
regs->isf.rip, regs->isf.trapno, trapname,
cr0, cr2, cr3, cr4,
regs->rax, regs->rbx, regs->rcx, regs->rdx,
regs->isf.rsp, regs->rbp, regs->rsi, regs->rdi,
regs->r8, regs->r9, regs->r10, regs->r11,
regs->r12, regs->r13, regs->r14, regs->r15,
regs->isf.rflags, regs->isf.rip, regs->isf.cs, regs->isf.ss,
regs->isf.err);
cr0 = 0;
}
#endif
extern void kprintf_break_lock(void);
#ifdef __i386__
static void
panic_32(__unused int code, __unused int pc, __unused const char *msg, boolean_t do_mca_dump, boolean_t do_bt)
{
struct i386_tss *my_ktss = current_ktss();
postcode(pc);
panic_io_port_read();
kprintf_break_lock();
if (do_mca_dump) {
#if CONFIG_MCA
mca_dump();
#endif
}
#if MACH_KDP
if (do_bt)
panic_i386_backtrace((void *) my_ktss->ebp, 10, NULL, FALSE, NULL);
#endif
panic("%s at 0x%08x, thread:%p, code:0x%x, "
"registers:\n"
"CR0: 0x%08x, CR2: 0x%08x, CR3: 0x%08x, CR4: 0x%08x\n"
"EAX: 0x%08x, EBX: 0x%08x, ECX: 0x%08x, EDX: 0x%08x\n"
"ESP: 0x%08x, EBP: 0x%08x, ESI: 0x%08x, EDI: 0x%08x\n"
"EFL: 0x%08x, EIP: 0x%08x\n",
msg,
my_ktss->eip, current_thread(), code,
(uint32_t)get_cr0(), (uint32_t)get_cr2(), (uint32_t)get_cr3(), (uint32_t)get_cr4(),
my_ktss->eax, my_ktss->ebx, my_ktss->ecx, my_ktss->edx,
my_ktss->esp, my_ktss->ebp, my_ktss->esi, my_ktss->edi,
my_ktss->eflags, my_ktss->eip);
}
void
panic_double_fault32(int code)
{
panic_32(code, PANIC_DOUBLE_FAULT, "Double fault", FALSE, TRUE);
}
void
panic_machine_check32(int code)
{
panic_32(code, PANIC_MACHINE_CHECK, "Machine-check", TRUE, FALSE);
}
#endif
static void
panic_64(x86_saved_state_t *sp, __unused int pc, __unused const char *msg, boolean_t do_mca_dump)
{
postcode(pc);
panic_io_port_read();
kprintf_break_lock();
if (do_mca_dump) {
#if CONFIG_MCA
mca_dump();
#endif
}
#ifdef __i386__
if (is_saved_state64(sp)) {
x86_saved_state64_t *ss64p = saved_state64(sp);
panic("%s thread:%p, trapno:0x%x, err:0x%qx, "
"registers:\n"
"CR0: 0x%08x, CR2: 0x%08x, CR3: 0x%08x, CR4: 0x%08x\n"
"RAX: 0x%016qx, RBX: 0x%016qx, RCX: 0x%016qx, RDX: 0x%016qx\n"
"RSP: 0x%016qx, RBP: 0x%016qx, RSI: 0x%016qx, RDI: 0x%016qx\n"
"R8: 0x%016qx, R9: 0x%016qx, R10: 0x%016qx, R11: 0x%016qx\n"
"R12: 0x%016qx, R13: 0x%016qx, R14: 0x%016qx, R15: 0x%016qx\n"
"RFL: 0x%016qx, RIP: 0x%016qx, CR2: 0x%016qx\n",
msg,
current_thread(), ss64p->isf.trapno, ss64p->isf.err,
(uint32_t)get_cr0(), (uint32_t)get_cr2(), (uint32_t)get_cr3(), (uint32_t)get_cr4(),
ss64p->rax, ss64p->rbx, ss64p->rcx, ss64p->rdx,
ss64p->isf.rsp, ss64p->rbp, ss64p->rsi, ss64p->rdi,
ss64p->r8, ss64p->r9, ss64p->r10, ss64p->r11,
ss64p->r12, ss64p->r13, ss64p->r14, ss64p->r15,
ss64p->isf.rflags, ss64p->isf.rip, ss64p->cr2);
} else {
x86_saved_state32_t *ss32p = saved_state32(sp);
panic("%s at 0x%08x, thread:%p, trapno:0x%x, err:0x%x,"
"registers:\n"
"CR0: 0x%08x, CR2: 0x%08x, CR3: 0x%08x, CR4: 0x%08x\n"
"EAX: 0x%08x, EBX: 0x%08x, ECX: 0x%08x, EDX: 0x%08x\n"
"ESP: 0x%08x, EBP: 0x%08x, ESI: 0x%08x, EDI: 0x%08x\n"
"EFL: 0x%08x, EIP: 0x%08x\n",
msg,
ss32p->eip, current_thread(), ss32p->trapno, ss32p->err,
(uint32_t)get_cr0(), (uint32_t)get_cr2(), (uint32_t)get_cr3(), (uint32_t)get_cr4(),
ss32p->eax, ss32p->ebx, ss32p->ecx, ss32p->edx,
ss32p->uesp, ss32p->ebp, ss32p->esi, ss32p->edi,
ss32p->efl, ss32p->eip);
}
#else
x86_saved_state64_t *regs = saved_state64(sp);
panic("%s thread:%p at 0x%016llx, registers:\n"
"CR0: 0x%016lx, CR2: 0x%016lx, CR3: 0x%016lx, CR4: 0x%016lx\n"
"RAX: 0x%016llx, RBX: 0x%016llx, RCX: 0x%016llx, RDX: 0x%016llx\n"
"RSP: 0x%016llx, RBP: 0x%016llx, RSI: 0x%016llx, RDI: 0x%016llx\n"
"R8: 0x%016llx, R9: 0x%016llx, R10: 0x%016llx, R11: 0x%016llx\n"
"R12: 0x%016llx, R13: 0x%016llx, R14: 0x%016llx, R15: 0x%016llx\n"
"RFL: 0x%016llx, RIP: 0x%016llx, CS: 0x%016llx, SS: 0x%016llx\n"
"Error code: 0x%016llx\n",
msg,
current_thread(), regs->isf.rip,
get_cr0(), get_cr2(), get_cr3(), get_cr4(),
regs->rax, regs->rbx, regs->rcx, regs->rdx,
regs->isf.rsp, regs->rbp, regs->rsi, regs->rdi,
regs->r8, regs->r9, regs->r10, regs->r11,
regs->r12, regs->r13, regs->r14, regs->r15,
regs->isf.rflags, regs->isf.rip, regs->isf.cs, regs->isf.ss,
regs->isf.err);
#endif
}
void
panic_double_fault64(x86_saved_state_t *sp)
{
panic_64(sp, PANIC_DOUBLE_FAULT, "Double fault", FALSE);
}
void
panic_machine_check64(x86_saved_state_t *sp)
{
panic_64(sp, PANIC_MACHINE_CHECK, "Machine Check", TRUE);
}
#if CONFIG_DTRACE
extern kern_return_t dtrace_user_probe(x86_saved_state_t *);
#endif
void
user_trap(
x86_saved_state_t *saved_state)
{
int exc;
int err;
mach_exception_code_t code;
mach_exception_subcode_t subcode;
int type;
user_addr_t vaddr;
vm_prot_t prot;
thread_t thread = current_thread();
ast_t *myast;
kern_return_t kret;
user_addr_t rip;
assert((is_saved_state32(saved_state) && !thread_is_64bit(thread)) ||
(is_saved_state64(saved_state) && thread_is_64bit(thread)));
if (is_saved_state64(saved_state)) {
x86_saved_state64_t *regs;
regs = saved_state64(saved_state);
type = regs->isf.trapno;
err = (int)regs->isf.err & 0xffff;
vaddr = (user_addr_t)regs->cr2;
rip = (user_addr_t)regs->isf.rip;
} else {
x86_saved_state32_t *regs;
regs = saved_state32(saved_state);
type = regs->trapno;
err = regs->err & 0xffff;
vaddr = (user_addr_t)regs->cr2;
rip = (user_addr_t)regs->eip;
}
KERNEL_DEBUG_CONSTANT(
(MACHDBG_CODE(DBG_MACH_EXCP_UTRAP_x86, type)) | DBG_FUNC_NONE,
(unsigned)(vaddr>>32), (unsigned)vaddr,
(unsigned)(rip>>32), (unsigned)rip, 0);
code = 0;
subcode = 0;
exc = 0;
#if DEBUG_TRACE
kprintf("user_trap(0x%08x) type=%d vaddr=0x%016llx\n",
saved_state, type, vaddr);
#endif
myast = ast_pending();
perfCallback fn = perfASTHook;
if (fn) {
if (*myast & AST_CHUD_ALL) {
fn(type, saved_state, 0, 0);
}
} else {
*myast &= ~AST_CHUD_ALL;
}
fn = perfTrapHook;
if (fn) {
if (fn(type, saved_state, 0, 0) == KERN_SUCCESS)
return;
}
DEBUG_KPRINT_SYSCALL_MASK(1,
"user_trap: type=0x%x(%s) err=0x%x cr2=%p rip=%p\n",
type, trap_type[type], err, (void *)(long) vaddr, (void *)(long) rip);
switch (type) {
case T_DIVIDE_ERROR:
exc = EXC_ARITHMETIC;
code = EXC_I386_DIV;
break;
case T_DEBUG:
{
pcb_t pcb;
long clear = 0;
pcb = thread->machine.pcb;
if (pcb->ids) {
unsigned long dr6_temp;
__asm__ volatile ("mov %%db6, %0" : "=r" (dr6_temp));
if (thread_is_64bit(thread)) {
x86_debug_state64_t *ids = pcb->ids;
ids->dr6 = dr6_temp;
} else {
x86_debug_state32_t *ids = pcb->ids;
ids->dr6 = (uint32_t) dr6_temp;
}
__asm__ volatile ("mov %0, %%db6" : : "r" (clear));
}
exc = EXC_BREAKPOINT;
code = EXC_I386_SGL;
break;
}
case T_INT3:
#if CONFIG_DTRACE
if (dtrace_user_probe(saved_state) == KERN_SUCCESS)
return;
#endif
exc = EXC_BREAKPOINT;
code = EXC_I386_BPT;
break;
case T_OVERFLOW:
exc = EXC_ARITHMETIC;
code = EXC_I386_INTO;
break;
case T_OUT_OF_BOUNDS:
exc = EXC_SOFTWARE;
code = EXC_I386_BOUND;
break;
case T_INVALID_OPCODE:
exc = EXC_BAD_INSTRUCTION;
code = EXC_I386_INVOP;
break;
case T_NO_FPU:
fpnoextflt();
return;
case T_FPU_FAULT:
fpextovrflt();
return;
case T_INVALID_TSS:
exc = EXC_BAD_INSTRUCTION;
code = EXC_I386_INVTSSFLT;
subcode = err;
break;
case T_SEGMENT_NOT_PRESENT:
exc = EXC_BAD_INSTRUCTION;
code = EXC_I386_SEGNPFLT;
subcode = err;
break;
case T_STACK_FAULT:
exc = EXC_BAD_INSTRUCTION;
code = EXC_I386_STKFLT;
subcode = err;
break;
case T_GENERAL_PROTECTION:
exc = EXC_BAD_ACCESS;
code = EXC_I386_GPFLT;
subcode = err;
break;
case T_PAGE_FAULT:
prot = VM_PROT_READ;
if (err & T_PF_WRITE)
prot |= VM_PROT_WRITE;
#if PAE
if (err & T_PF_EXECUTE)
prot |= VM_PROT_EXECUTE;
#endif
kret = vm_fault(thread->map, vm_map_trunc_page(vaddr),
prot, FALSE,
THREAD_ABORTSAFE, NULL, 0);
user_page_fault_continue(kret);
break;
case T_SSE_FLOAT_ERROR:
fpSSEexterrflt();
return;
case T_FLOATING_POINT_ERROR:
fpexterrflt();
return;
case T_DTRACE_RET:
#if CONFIG_DTRACE
if (dtrace_user_probe(saved_state) == KERN_SUCCESS)
return;
#endif
exc = EXC_BAD_INSTRUCTION;
code = EXC_I386_INVOP;
break;
default:
#if MACH_KGDB
Debugger("Unanticipated user trap");
return;
#endif
#if MACH_KDB
if (kdb_trap(type, err, saved_state32(saved_state)))
return;
#endif
panic("Unexpected user trap, type %d", type);
return;
}
i386_exception(exc, code, subcode);
}
extern void log_thread_action (thread_t, char *);
void
i386_astintr(int preemption)
{
ast_t mask = AST_ALL;
spl_t s;
if (preemption)
mask = AST_PREEMPTION;
s = splsched();
ast_taken(mask, s);
splx(s);
}
void
i386_exception(
int exc,
mach_exception_code_t code,
mach_exception_subcode_t subcode)
{
mach_exception_data_type_t codes[EXCEPTION_CODE_MAX];
DEBUG_KPRINT_SYSCALL_MACH("i386_exception: exc=%d code=0x%llx subcode=0x%llx\n",
exc, code, subcode);
codes[0] = code;
codes[1] = subcode;
exception_triage(exc, codes, 2);
}
void
kernel_preempt_check(void)
{
ast_t *myast;
boolean_t intr;
intr = ml_set_interrupts_enabled(FALSE);
myast = ast_pending();
if ((*myast & AST_URGENT) && intr == TRUE && get_interrupt_level() == 0) {
ml_set_interrupts_enabled(intr);
__asm__ volatile (" int $0xff");
} else {
ml_set_interrupts_enabled(intr);
}
}
#if MACH_KDB
extern void db_i386_state(x86_saved_state32_t *regs);
#include <ddb/db_output.h>
void
db_i386_state(
x86_saved_state32_t *regs)
{
db_printf("eip %8x\n", regs->eip);
db_printf("trap %8x\n", regs->trapno);
db_printf("err %8x\n", regs->err);
db_printf("efl %8x\n", regs->efl);
db_printf("ebp %8x\n", regs->ebp);
db_printf("esp %8x\n", regs->cr2);
db_printf("uesp %8x\n", regs->uesp);
db_printf("cs %8x\n", regs->cs & 0xff);
db_printf("ds %8x\n", regs->ds & 0xff);
db_printf("es %8x\n", regs->es & 0xff);
db_printf("fs %8x\n", regs->fs & 0xff);
db_printf("gs %8x\n", regs->gs & 0xff);
db_printf("ss %8x\n", regs->ss & 0xff);
db_printf("eax %8x\n", regs->eax);
db_printf("ebx %8x\n", regs->ebx);
db_printf("ecx %8x\n", regs->ecx);
db_printf("edx %8x\n", regs->edx);
db_printf("esi %8x\n", regs->esi);
db_printf("edi %8x\n", regs->edi);
}
#endif
void
sync_iss_to_iks(x86_saved_state_t *saved_state)
{
struct x86_kernel_state *iks;
vm_offset_t kstack;
boolean_t record_active_regs = FALSE;
if ((kstack = current_thread()->kernel_stack) != 0) {
#ifdef __i386__
x86_saved_state32_t *regs = saved_state32(saved_state);
#else
x86_saved_state64_t *regs = saved_state64(saved_state);
#endif
iks = STACK_IKS(kstack);
#ifdef __i386__
if (regs == USER_REGS32(current_thread()))
record_active_regs = TRUE;
else {
iks->k_ebx = regs->ebx;
iks->k_esp = (int)regs;
iks->k_ebp = regs->ebp;
iks->k_edi = regs->edi;
iks->k_esi = regs->esi;
iks->k_eip = regs->eip;
}
#else
if (regs == USER_REGS64(current_thread()))
record_active_regs = TRUE;
else {
iks->k_rbx = regs->rbx;
iks->k_rsp = regs->isf.rsp;
iks->k_rbp = regs->rbp;
iks->k_r12 = regs->r12;
iks->k_r13 = regs->r13;
iks->k_r14 = regs->r14;
iks->k_r15 = regs->r15;
iks->k_rip = regs->isf.rip;
}
#endif
}
if (record_active_regs == TRUE) {
#ifdef __i386__
__asm__ volatile("movl %%ebx, %0" : "=m" (iks->k_ebx));
__asm__ volatile("movl %%esp, %0" : "=m" (iks->k_esp));
__asm__ volatile("movl %%ebp, %0" : "=m" (iks->k_ebp));
__asm__ volatile("movl %%edi, %0" : "=m" (iks->k_edi));
__asm__ volatile("movl %%esi, %0" : "=m" (iks->k_esi));
__asm__ volatile("movl $1f, %0\n1:" : "=m" (iks->k_eip));
#else
__asm__ volatile("movq %%rbx, %0" : "=m" (iks->k_rbx));
__asm__ volatile("movq %%rsp, %0" : "=m" (iks->k_rsp));
__asm__ volatile("movq %%rbp, %0" : "=m" (iks->k_rbp));
__asm__ volatile("movq %%r12, %0" : "=m" (iks->k_r12));
__asm__ volatile("movq %%r13, %0" : "=m" (iks->k_r13));
__asm__ volatile("movq %%r14, %0" : "=m" (iks->k_r14));
__asm__ volatile("movq %%r15, %0" : "=m" (iks->k_r15));
__asm__ volatile("leaq 1f(%%rip), %%rax; mov %%rax, %0\n1:"
: "=m" (iks->k_rip)
:
: "rax");
#endif
}
}
void
sync_iss_to_iks_unconditionally(__unused x86_saved_state_t *saved_state) {
struct x86_kernel_state *iks;
vm_offset_t kstack;
if ((kstack = current_thread()->kernel_stack) != 0) {
iks = STACK_IKS(kstack);
#ifdef __i386__
__asm__ volatile("movl %%ebx, %0" : "=m" (iks->k_ebx));
__asm__ volatile("movl %%esp, %0" : "=m" (iks->k_esp));
__asm__ volatile("movl %%ebp, %0" : "=m" (iks->k_ebp));
__asm__ volatile("movl %%edi, %0" : "=m" (iks->k_edi));
__asm__ volatile("movl %%esi, %0" : "=m" (iks->k_esi));
__asm__ volatile("movl $1f, %0\n1:" : "=m" (iks->k_eip));
#else
__asm__ volatile("movq %%rbx, %0" : "=m" (iks->k_rbx));
__asm__ volatile("movq %%rsp, %0" : "=m" (iks->k_rsp));
__asm__ volatile("movq %%rbp, %0" : "=m" (iks->k_rbp));
__asm__ volatile("movq %%r12, %0" : "=m" (iks->k_r12));
__asm__ volatile("movq %%r13, %0" : "=m" (iks->k_r13));
__asm__ volatile("movq %%r14, %0" : "=m" (iks->k_r14));
__asm__ volatile("movq %%r15, %0" : "=m" (iks->k_r15));
__asm__ volatile("leaq 1f(%%rip), %%rax; mov %%rax, %0\n1:" : "=m" (iks->k_rip)::"rax");
#endif
}
}