ia32_trap.c revision 160764
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 160764 2006-07-27 19:50:16Z jhb $"); 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 49135832Smarcel#ifdef WITNESS 50135832Smarcelextern char *syscallnames[]; 51135832Smarcel#endif 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 101135783Smarcel narg = callp->sy_narg & SYF_ARGMASK; 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 116135783Smarcel /* 117135783Smarcel * Try to run the syscall without Giant if the syscall 118135783Smarcel * is MP safe. 119135783Smarcel */ 120135783Smarcel if ((callp->sy_narg & SYF_MPSAFE) == 0) 121135783Smarcel mtx_lock(&Giant); 122135783Smarcel 123135783Smarcel if (error == 0) { 124135783Smarcel td->td_retval[0] = 0; 125135783Smarcel td->td_retval[1] = tf->tf_scratch.gr10; /* edx */ 126135783Smarcel 127135783Smarcel STOPEVENT(p, S_SCE, narg); 128135783Smarcel 129160764Sjhb PTRACESTOP_SC(p, td, S_PT_SCE); 130160764Sjhb 131135783Smarcel error = (*callp->sy_call)(td, args64); 132135783Smarcel } 133135783Smarcel 134135783Smarcel switch (error) { 135135783Smarcel case 0: 136135783Smarcel tf->tf_scratch.gr8 = td->td_retval[0]; /* eax */ 137135783Smarcel tf->tf_scratch.gr10 = td->td_retval[1]; /* edx */ 138135783Smarcel ia64_set_eflag(ia64_get_eflag() & ~PSL_C); 139135783Smarcel break; 140135783Smarcel 141135783Smarcel case ERESTART: 142135783Smarcel /* 143135783Smarcel * Reconstruct pc, assuming lcall $X,y is 7 bytes, 144135783Smarcel * int 0x80 is 2 bytes. XXX Assume int 0x80. 145135783Smarcel */ 146135783Smarcel tf->tf_special.iip -= 2; 147135783Smarcel break; 148135783Smarcel 149135783Smarcel case EJUSTRETURN: 150135783Smarcel break; 151135783Smarcel 152135783Smarcel default: 153135783Smarcel if (p->p_sysent->sv_errsize) { 154135783Smarcel if (error >= p->p_sysent->sv_errsize) 155135783Smarcel error = -1; /* XXX */ 156135783Smarcel else 157135783Smarcel error = p->p_sysent->sv_errtbl[error]; 158135783Smarcel } 159135783Smarcel tf->tf_scratch.gr8 = error; 160135783Smarcel ia64_set_eflag(ia64_get_eflag() | PSL_C); 161135783Smarcel break; 162135783Smarcel } 163135783Smarcel 164135783Smarcel /* 165135783Smarcel * Release Giant if we previously set it. 166135783Smarcel */ 167135783Smarcel if ((callp->sy_narg & SYF_MPSAFE) == 0) 168135783Smarcel mtx_unlock(&Giant); 169135783Smarcel 170135783Smarcel /* 171135783Smarcel * Traced syscall. 172135783Smarcel */ 173135783Smarcel if ((eflags & PSL_T) && !(eflags & PSL_VM)) { 174135783Smarcel ia64_set_eflag(ia64_get_eflag() & ~PSL_T); 175151316Sdavidxu ksiginfo_init_trap(&ksi); 176151316Sdavidxu ksi.ksi_signo = SIGTRAP; 177151316Sdavidxu ksi.ksi_code = TRAP_TRACE; 178151316Sdavidxu ksi.ksi_addr = (void *)tf->tf_special.iip; 179151316Sdavidxu trapsignal(td, &ksi); 180135783Smarcel } 181135783Smarcel 182135783Smarcel#ifdef KTRACE 183135783Smarcel if (KTRPOINT(td, KTR_SYSRET)) 184135783Smarcel ktrsysret(code, error, td->td_retval[0]); 185135783Smarcel#endif 186135783Smarcel 187135783Smarcel /* 188135783Smarcel * This works because errno is findable through the 189135783Smarcel * register set. If we ever support an emulation where this 190135783Smarcel * is not the case, this code will need to be revisited. 191135783Smarcel */ 192135783Smarcel STOPEVENT(p, S_SCX, code); 193160764Sjhb 194160764Sjhb PTRACESTOP_SC(p, td, S_PT_SCX); 195135783Smarcel 196135783Smarcel WITNESS_WARN(WARN_PANIC, NULL, "System call %s returning", 197135783Smarcel (code >= 0 && code < SYS_MAXSYSCALL) ? syscallnames[code] : "???"); 198135783Smarcel mtx_assert(&sched_lock, MA_NOTOWNED); 199135783Smarcel mtx_assert(&Giant, MA_NOTOWNED); 200135783Smarcel} 201135783Smarcel 202135783Smarcel/* 203135783Smarcel * ia32_trap() is called from exception.S to handle the IA-32 specific 204135783Smarcel * interruption vectors. 205135783Smarcel */ 206135783Smarcelvoid 207135783Smarcelia32_trap(int vector, struct trapframe *tf) 208135783Smarcel{ 209135783Smarcel struct proc *p; 210135783Smarcel struct thread *td; 211135783Smarcel uint64_t ucode; 212135783Smarcel int sig; 213151316Sdavidxu ksiginfo_t ksi; 214135783Smarcel 215135783Smarcel KASSERT(TRAPF_USERMODE(tf), ("%s: In kernel mode???", __func__)); 216135783Smarcel 217135783Smarcel ia64_set_fpsr(IA64_FPSR_DEFAULT); 218144971Sjhb PCPU_LAZY_INC(cnt.v_trap); 219135783Smarcel 220135783Smarcel td = curthread; 221135783Smarcel td->td_frame = tf; 222155455Sphk td->td_pticks = 0; 223135783Smarcel p = td->td_proc; 224135783Smarcel if (td->td_ucred != p->p_ucred) 225135783Smarcel cred_update_thread(td); 226135783Smarcel sig = 0; 227135783Smarcel ucode = 0; 228135783Smarcel switch (vector) { 229135783Smarcel case IA64_VEC_IA32_EXCEPTION: 230135783Smarcel switch ((tf->tf_special.isr >> 16) & 0xffff) { 231135783Smarcel case IA32_EXCEPTION_DIVIDE: 232135783Smarcel ucode = FPE_INTDIV; 233135783Smarcel sig = SIGFPE; 234135783Smarcel break; 235135783Smarcel case IA32_EXCEPTION_DEBUG: 236135783Smarcel case IA32_EXCEPTION_BREAK: 237135783Smarcel sig = SIGTRAP; 238135783Smarcel break; 239135783Smarcel case IA32_EXCEPTION_OVERFLOW: 240135783Smarcel ucode = FPE_INTOVF; 241135783Smarcel sig = SIGFPE; 242135783Smarcel break; 243135783Smarcel case IA32_EXCEPTION_BOUND: 244135783Smarcel ucode = FPE_FLTSUB; 245135783Smarcel sig = SIGFPE; 246135783Smarcel break; 247135783Smarcel case IA32_EXCEPTION_DNA: 248135783Smarcel ucode = 0; 249135783Smarcel sig = SIGFPE; 250135783Smarcel break; 251135783Smarcel case IA32_EXCEPTION_NOT_PRESENT: 252135783Smarcel case IA32_EXCEPTION_STACK_FAULT: 253135783Smarcel case IA32_EXCEPTION_GPFAULT: 254135783Smarcel ucode = (tf->tf_special.isr & 0xffff) + BUS_SEGM_FAULT; 255135783Smarcel sig = SIGBUS; 256135783Smarcel break; 257135783Smarcel case IA32_EXCEPTION_FPERROR: 258135783Smarcel ucode = 0; /* XXX */ 259135783Smarcel sig = SIGFPE; 260135783Smarcel break; 261135783Smarcel case IA32_EXCEPTION_ALIGNMENT_CHECK: 262135783Smarcel ucode = tf->tf_special.ifa; /* VA */ 263135783Smarcel sig = SIGBUS; 264135783Smarcel break; 265135783Smarcel case IA32_EXCEPTION_STREAMING_SIMD: 266135783Smarcel ucode = 0; /* XXX */ 267135783Smarcel sig = SIGFPE; 268135783Smarcel break; 269135783Smarcel default: 270135783Smarcel trap_panic(vector, tf); 271135783Smarcel break; 272135783Smarcel } 273135783Smarcel break; 274135783Smarcel 275135783Smarcel case IA64_VEC_IA32_INTERCEPT: 276135783Smarcel /* XXX Maybe need to emulate ia32 instruction. */ 277135783Smarcel trap_panic(vector, tf); 278135783Smarcel 279135783Smarcel case IA64_VEC_IA32_INTERRUPT: 280135783Smarcel /* INT n instruction - probably a syscall. */ 281135783Smarcel if (((tf->tf_special.isr >> 16) & 0xffff) == 0x80) { 282135783Smarcel ia32_syscall(tf); 283135783Smarcel goto out; 284135783Smarcel } 285135783Smarcel ucode = (tf->tf_special.isr >> 16) & 0xffff; 286135783Smarcel sig = SIGILL; 287135783Smarcel break; 288135783Smarcel 289135783Smarcel default: 290135783Smarcel /* Should never happen of course. */ 291135783Smarcel trap_panic(vector, tf); 292135783Smarcel break; 293135783Smarcel } 294135783Smarcel 295135783Smarcel KASSERT(sig != 0, ("%s: signal not set", __func__)); 296135783Smarcel 297151316Sdavidxu ksiginfo_init_trap(&ksi); 298151316Sdavidxu ksi.ksi_signo = sig; 299151316Sdavidxu ksi.ksi_code = (int)ucode; /* XXX */ 300151316Sdavidxu /* ksi.ksi_addr */ 301151316Sdavidxu trapsignal(td, &ksi); 302135783Smarcel 303135783Smarcelout: 304155455Sphk userret(td, tf); 305135783Smarcel mtx_assert(&Giant, MA_NOTOWNED); 306135783Smarcel do_ast(tf); 307135783Smarcel} 308