ia32_trap.c revision 162361
1139790Simp/*- 2135783Smarcel * Copyright (c) 2004 Marcel Moolenaar 3135783Smarcel * All rights reserved. 4135783Smarcel * 5135783Smarcel * Redistribution and use in source and binary forms, with or without 6135783Smarcel * modification, are permitted provided that the following conditions 7135783Smarcel * are met: 8135783Smarcel * 9135783Smarcel * 1. Redistributions of source code must retain the above copyright 10135783Smarcel * notice, this list of conditions and the following disclaimer. 11135783Smarcel * 2. Redistributions in binary form must reproduce the above copyright 12135783Smarcel * notice, this list of conditions and the following disclaimer in the 13135783Smarcel * documentation and/or other materials provided with the distribution. 14135783Smarcel * 15135783Smarcel * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 16135783Smarcel * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 17135783Smarcel * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 18135783Smarcel * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 19135783Smarcel * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 20135783Smarcel * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 21135783Smarcel * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 22135783Smarcel * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 23135783Smarcel * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 24135783Smarcel * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 25135783Smarcel */ 26135783Smarcel 27135783Smarcel#include <sys/cdefs.h> 28135783Smarcel__FBSDID("$FreeBSD: head/sys/ia64/ia32/ia32_trap.c 162361 2006-09-16 17:03:02Z rwatson $"); 29135783Smarcel 30135783Smarcel#include <sys/param.h> 31135783Smarcel#include <sys/systm.h> 32135783Smarcel#include <sys/ktr.h> 33135783Smarcel#include <sys/sysproto.h> 34135783Smarcel#include <sys/kernel.h> 35135783Smarcel#include <sys/lock.h> 36135783Smarcel#include <sys/mutex.h> 37135783Smarcel#include <sys/pioctl.h> 38135783Smarcel#include <sys/proc.h> 39160764Sjhb#include <sys/ptrace.h> 40135783Smarcel#include <sys/signalvar.h> 41135783Smarcel#include <sys/syscall.h> 42135783Smarcel#include <sys/sysent.h> 43135798Smarcel#include <machine/cpu.h> 44135783Smarcel#include <machine/fpu.h> 45135783Smarcel#include <machine/frame.h> 46135783Smarcel#include <machine/md_var.h> 47135783Smarcel#include <i386/include/psl.h> 48135783Smarcel 49162361Srwatson#include <security/audit/audit.h> 50162361Srwatson 51135832Smarcelextern char *syscallnames[]; 52135832Smarcel 53135783Smarcelstatic void 54135783Smarcelia32_syscall(struct trapframe *tf) 55135783Smarcel{ 56135783Smarcel uint64_t args64[8]; 57135783Smarcel uint32_t args[8]; 58135783Smarcel struct thread *td; 59135783Smarcel struct proc *p; 60135783Smarcel struct sysent *callp; 61135783Smarcel caddr_t params; 62135783Smarcel register_t eflags; 63135783Smarcel u_int code; 64135783Smarcel int error, i, narg; 65151316Sdavidxu ksiginfo_t ksi; 66135783Smarcel 67144971Sjhb PCPU_LAZY_INC(cnt.v_syscall); 68135783Smarcel 69135783Smarcel td = curthread; 70135783Smarcel params = (caddr_t)(tf->tf_special.sp & ((1L<<32)-1)) + 71135783Smarcel sizeof(uint32_t); 72135783Smarcel code = tf->tf_scratch.gr8; /* eax */ 73135783Smarcel eflags = ia64_get_eflag(); 74135783Smarcel p = td->td_proc; 75135783Smarcel 76135783Smarcel if (p->p_sysent->sv_prepsyscall == NULL) { 77135783Smarcel if (code == SYS_syscall) { 78135783Smarcel /* Code is first argument, followed by actual args. */ 79135783Smarcel code = fuword32(params); 80135783Smarcel params += sizeof(int); 81135783Smarcel } else if (code == SYS___syscall) { 82135783Smarcel /* 83135783Smarcel * Like syscall, but code is a quad, so as to maintain 84135783Smarcel * quad alignment for the rest of the arguments. We 85135783Smarcel * use a 32-bit fetch in case params is not aligned. 86135783Smarcel */ 87135783Smarcel code = fuword32(params); 88135783Smarcel params += sizeof(quad_t); 89135783Smarcel } 90135783Smarcel } else 91135783Smarcel (*p->p_sysent->sv_prepsyscall)(tf, args, &code, ¶ms); 92135783Smarcel 93135783Smarcel if (p->p_sysent->sv_mask) 94135783Smarcel code &= p->p_sysent->sv_mask; 95135783Smarcel 96135783Smarcel if (code >= p->p_sysent->sv_size) 97135783Smarcel callp = &p->p_sysent->sv_table[0]; 98135783Smarcel else 99135783Smarcel callp = &p->p_sysent->sv_table[code]; 100135783Smarcel 101160801Sjhb narg = callp->sy_narg; 102135783Smarcel 103135783Smarcel /* copyin and the ktrsyscall()/ktrsysret() code is MP-aware */ 104135783Smarcel if (params != NULL && narg != 0) 105135783Smarcel error = copyin(params, (caddr_t)args, narg * sizeof(int)); 106135783Smarcel else 107135783Smarcel error = 0; 108135783Smarcel 109135783Smarcel for (i = 0; i < narg; i++) 110135783Smarcel args64[i] = args[i]; 111135783Smarcel 112135783Smarcel#ifdef KTRACE 113135783Smarcel if (KTRPOINT(td, KTR_SYSCALL)) 114135783Smarcel ktrsyscall(code, narg, args64); 115135783Smarcel#endif 116160770Sjhb CTR4(KTR_SYSC, "syscall enter thread %p pid %d proc %s code %d", td, 117160770Sjhb td->td_proc->p_pid, td->td_proc->p_comm, code); 118160770Sjhb 119135783Smarcel if (error == 0) { 120135783Smarcel td->td_retval[0] = 0; 121135783Smarcel td->td_retval[1] = tf->tf_scratch.gr10; /* edx */ 122135783Smarcel 123135783Smarcel STOPEVENT(p, S_SCE, narg); 124135783Smarcel 125160764Sjhb PTRACESTOP_SC(p, td, S_PT_SCE); 126160764Sjhb 127162361Srwatson AUDIT_SYSCALL_ENTER(code, td); 128135783Smarcel error = (*callp->sy_call)(td, args64); 129162361Srwatson AUDIT_SYSCALL_EXIT(error, td); 130135783Smarcel } 131135783Smarcel 132135783Smarcel switch (error) { 133135783Smarcel case 0: 134135783Smarcel tf->tf_scratch.gr8 = td->td_retval[0]; /* eax */ 135135783Smarcel tf->tf_scratch.gr10 = td->td_retval[1]; /* edx */ 136135783Smarcel ia64_set_eflag(ia64_get_eflag() & ~PSL_C); 137135783Smarcel break; 138135783Smarcel 139135783Smarcel case ERESTART: 140135783Smarcel /* 141135783Smarcel * Reconstruct pc, assuming lcall $X,y is 7 bytes, 142135783Smarcel * int 0x80 is 2 bytes. XXX Assume int 0x80. 143135783Smarcel */ 144135783Smarcel tf->tf_special.iip -= 2; 145135783Smarcel break; 146135783Smarcel 147135783Smarcel case EJUSTRETURN: 148135783Smarcel break; 149135783Smarcel 150135783Smarcel default: 151135783Smarcel if (p->p_sysent->sv_errsize) { 152135783Smarcel if (error >= p->p_sysent->sv_errsize) 153135783Smarcel error = -1; /* XXX */ 154135783Smarcel else 155135783Smarcel error = p->p_sysent->sv_errtbl[error]; 156135783Smarcel } 157135783Smarcel tf->tf_scratch.gr8 = error; 158135783Smarcel ia64_set_eflag(ia64_get_eflag() | PSL_C); 159135783Smarcel break; 160135783Smarcel } 161135783Smarcel 162135783Smarcel /* 163135783Smarcel * Traced syscall. 164135783Smarcel */ 165135783Smarcel if ((eflags & PSL_T) && !(eflags & PSL_VM)) { 166135783Smarcel ia64_set_eflag(ia64_get_eflag() & ~PSL_T); 167151316Sdavidxu ksiginfo_init_trap(&ksi); 168151316Sdavidxu ksi.ksi_signo = SIGTRAP; 169151316Sdavidxu ksi.ksi_code = TRAP_TRACE; 170151316Sdavidxu ksi.ksi_addr = (void *)tf->tf_special.iip; 171151316Sdavidxu trapsignal(td, &ksi); 172135783Smarcel } 173135783Smarcel 174160770Sjhb /* 175160773Sjhb * Check for misbehavior. 176160773Sjhb */ 177160773Sjhb WITNESS_WARN(WARN_PANIC, NULL, "System call %s returning", 178160773Sjhb (code >= 0 && code < SYS_MAXSYSCALL) ? syscallnames[code] : "???"); 179160773Sjhb KASSERT(td->td_critnest == 0, 180160773Sjhb ("System call %s returning in a critical section", 181160773Sjhb (code >= 0 && code < SYS_MAXSYSCALL) ? syscallnames[code] : "???")); 182160773Sjhb KASSERT(td->td_locks == 0, 183160773Sjhb ("System call %s returning with %d locks held", 184160773Sjhb (code >= 0 && code < SYS_MAXSYSCALL) ? syscallnames[code] : "???", 185160773Sjhb td->td_locks)); 186160773Sjhb 187160773Sjhb /* 188160770Sjhb * End of syscall tracing. 189160770Sjhb */ 190160770Sjhb CTR4(KTR_SYSC, "syscall exit thread %p pid %d proc %s code %d", td, 191160770Sjhb td->td_proc->p_pid, td->td_proc->p_comm, code); 192135783Smarcel#ifdef KTRACE 193135783Smarcel if (KTRPOINT(td, KTR_SYSRET)) 194135783Smarcel ktrsysret(code, error, td->td_retval[0]); 195135783Smarcel#endif 196135783Smarcel 197135783Smarcel /* 198135783Smarcel * This works because errno is findable through the 199135783Smarcel * register set. If we ever support an emulation where this 200135783Smarcel * is not the case, this code will need to be revisited. 201135783Smarcel */ 202135783Smarcel STOPEVENT(p, S_SCX, code); 203160764Sjhb 204160764Sjhb PTRACESTOP_SC(p, td, S_PT_SCX); 205135783Smarcel} 206135783Smarcel 207135783Smarcel/* 208135783Smarcel * ia32_trap() is called from exception.S to handle the IA-32 specific 209135783Smarcel * interruption vectors. 210135783Smarcel */ 211135783Smarcelvoid 212135783Smarcelia32_trap(int vector, struct trapframe *tf) 213135783Smarcel{ 214135783Smarcel struct proc *p; 215135783Smarcel struct thread *td; 216135783Smarcel uint64_t ucode; 217135783Smarcel int sig; 218151316Sdavidxu ksiginfo_t ksi; 219135783Smarcel 220135783Smarcel KASSERT(TRAPF_USERMODE(tf), ("%s: In kernel mode???", __func__)); 221135783Smarcel 222135783Smarcel ia64_set_fpsr(IA64_FPSR_DEFAULT); 223144971Sjhb PCPU_LAZY_INC(cnt.v_trap); 224135783Smarcel 225135783Smarcel td = curthread; 226135783Smarcel td->td_frame = tf; 227155455Sphk td->td_pticks = 0; 228135783Smarcel p = td->td_proc; 229135783Smarcel if (td->td_ucred != p->p_ucred) 230135783Smarcel cred_update_thread(td); 231135783Smarcel sig = 0; 232135783Smarcel ucode = 0; 233135783Smarcel switch (vector) { 234135783Smarcel case IA64_VEC_IA32_EXCEPTION: 235135783Smarcel switch ((tf->tf_special.isr >> 16) & 0xffff) { 236135783Smarcel case IA32_EXCEPTION_DIVIDE: 237135783Smarcel ucode = FPE_INTDIV; 238135783Smarcel sig = SIGFPE; 239135783Smarcel break; 240135783Smarcel case IA32_EXCEPTION_DEBUG: 241135783Smarcel case IA32_EXCEPTION_BREAK: 242135783Smarcel sig = SIGTRAP; 243135783Smarcel break; 244135783Smarcel case IA32_EXCEPTION_OVERFLOW: 245135783Smarcel ucode = FPE_INTOVF; 246135783Smarcel sig = SIGFPE; 247135783Smarcel break; 248135783Smarcel case IA32_EXCEPTION_BOUND: 249135783Smarcel ucode = FPE_FLTSUB; 250135783Smarcel sig = SIGFPE; 251135783Smarcel break; 252135783Smarcel case IA32_EXCEPTION_DNA: 253135783Smarcel ucode = 0; 254135783Smarcel sig = SIGFPE; 255135783Smarcel break; 256135783Smarcel case IA32_EXCEPTION_NOT_PRESENT: 257135783Smarcel case IA32_EXCEPTION_STACK_FAULT: 258135783Smarcel case IA32_EXCEPTION_GPFAULT: 259135783Smarcel ucode = (tf->tf_special.isr & 0xffff) + BUS_SEGM_FAULT; 260135783Smarcel sig = SIGBUS; 261135783Smarcel break; 262135783Smarcel case IA32_EXCEPTION_FPERROR: 263135783Smarcel ucode = 0; /* XXX */ 264135783Smarcel sig = SIGFPE; 265135783Smarcel break; 266135783Smarcel case IA32_EXCEPTION_ALIGNMENT_CHECK: 267135783Smarcel ucode = tf->tf_special.ifa; /* VA */ 268135783Smarcel sig = SIGBUS; 269135783Smarcel break; 270135783Smarcel case IA32_EXCEPTION_STREAMING_SIMD: 271135783Smarcel ucode = 0; /* XXX */ 272135783Smarcel sig = SIGFPE; 273135783Smarcel break; 274135783Smarcel default: 275135783Smarcel trap_panic(vector, tf); 276135783Smarcel break; 277135783Smarcel } 278135783Smarcel break; 279135783Smarcel 280135783Smarcel case IA64_VEC_IA32_INTERCEPT: 281135783Smarcel /* XXX Maybe need to emulate ia32 instruction. */ 282135783Smarcel trap_panic(vector, tf); 283135783Smarcel 284135783Smarcel case IA64_VEC_IA32_INTERRUPT: 285135783Smarcel /* INT n instruction - probably a syscall. */ 286135783Smarcel if (((tf->tf_special.isr >> 16) & 0xffff) == 0x80) { 287135783Smarcel ia32_syscall(tf); 288135783Smarcel goto out; 289135783Smarcel } 290135783Smarcel ucode = (tf->tf_special.isr >> 16) & 0xffff; 291135783Smarcel sig = SIGILL; 292135783Smarcel break; 293135783Smarcel 294135783Smarcel default: 295135783Smarcel /* Should never happen of course. */ 296135783Smarcel trap_panic(vector, tf); 297135783Smarcel break; 298135783Smarcel } 299135783Smarcel 300135783Smarcel KASSERT(sig != 0, ("%s: signal not set", __func__)); 301135783Smarcel 302151316Sdavidxu ksiginfo_init_trap(&ksi); 303151316Sdavidxu ksi.ksi_signo = sig; 304151316Sdavidxu ksi.ksi_code = (int)ucode; /* XXX */ 305151316Sdavidxu /* ksi.ksi_addr */ 306151316Sdavidxu trapsignal(td, &ksi); 307135783Smarcel 308135783Smarcelout: 309155455Sphk userret(td, tf); 310135783Smarcel mtx_assert(&Giant, MA_NOTOWNED); 311135783Smarcel do_ast(tf); 312135783Smarcel} 313