ia32_trap.c revision 139790
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 139790 2005-01-06 22:18:23Z imp $"); 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> 39135783Smarcel#include <sys/signalvar.h> 40135783Smarcel#include <sys/syscall.h> 41135783Smarcel#include <sys/sysent.h> 42135798Smarcel#include <machine/cpu.h> 43135783Smarcel#include <machine/fpu.h> 44135783Smarcel#include <machine/frame.h> 45135783Smarcel#include <machine/md_var.h> 46135783Smarcel#include <i386/include/psl.h> 47135783Smarcel 48135832Smarcel#ifdef WITNESS 49135832Smarcelextern char *syscallnames[]; 50135832Smarcel#endif 51135832Smarcel 52135783Smarcelstatic void 53135783Smarcelia32_syscall(struct trapframe *tf) 54135783Smarcel{ 55135783Smarcel uint64_t args64[8]; 56135783Smarcel uint32_t args[8]; 57135783Smarcel struct thread *td; 58135783Smarcel struct proc *p; 59135783Smarcel struct sysent *callp; 60135783Smarcel caddr_t params; 61135783Smarcel register_t eflags; 62135783Smarcel u_int code; 63135783Smarcel int error, i, narg; 64135783Smarcel 65135783Smarcel atomic_add_int(&cnt.v_syscall, 1); 66135783Smarcel 67135783Smarcel td = curthread; 68135783Smarcel params = (caddr_t)(tf->tf_special.sp & ((1L<<32)-1)) + 69135783Smarcel sizeof(uint32_t); 70135783Smarcel code = tf->tf_scratch.gr8; /* eax */ 71135783Smarcel eflags = ia64_get_eflag(); 72135783Smarcel p = td->td_proc; 73135783Smarcel 74135783Smarcel if (p->p_sysent->sv_prepsyscall == NULL) { 75135783Smarcel if (code == SYS_syscall) { 76135783Smarcel /* Code is first argument, followed by actual args. */ 77135783Smarcel code = fuword32(params); 78135783Smarcel params += sizeof(int); 79135783Smarcel } else if (code == SYS___syscall) { 80135783Smarcel /* 81135783Smarcel * Like syscall, but code is a quad, so as to maintain 82135783Smarcel * quad alignment for the rest of the arguments. We 83135783Smarcel * use a 32-bit fetch in case params is not aligned. 84135783Smarcel */ 85135783Smarcel code = fuword32(params); 86135783Smarcel params += sizeof(quad_t); 87135783Smarcel } 88135783Smarcel } else 89135783Smarcel (*p->p_sysent->sv_prepsyscall)(tf, args, &code, ¶ms); 90135783Smarcel 91135783Smarcel if (p->p_sysent->sv_mask) 92135783Smarcel code &= p->p_sysent->sv_mask; 93135783Smarcel 94135783Smarcel if (code >= p->p_sysent->sv_size) 95135783Smarcel callp = &p->p_sysent->sv_table[0]; 96135783Smarcel else 97135783Smarcel callp = &p->p_sysent->sv_table[code]; 98135783Smarcel 99135783Smarcel narg = callp->sy_narg & SYF_ARGMASK; 100135783Smarcel 101135783Smarcel /* copyin and the ktrsyscall()/ktrsysret() code is MP-aware */ 102135783Smarcel if (params != NULL && narg != 0) 103135783Smarcel error = copyin(params, (caddr_t)args, narg * sizeof(int)); 104135783Smarcel else 105135783Smarcel error = 0; 106135783Smarcel 107135783Smarcel for (i = 0; i < narg; i++) 108135783Smarcel args64[i] = args[i]; 109135783Smarcel 110135783Smarcel#ifdef KTRACE 111135783Smarcel if (KTRPOINT(td, KTR_SYSCALL)) 112135783Smarcel ktrsyscall(code, narg, args64); 113135783Smarcel#endif 114135783Smarcel /* 115135783Smarcel * Try to run the syscall without Giant if the syscall 116135783Smarcel * is MP safe. 117135783Smarcel */ 118135783Smarcel if ((callp->sy_narg & SYF_MPSAFE) == 0) 119135783Smarcel mtx_lock(&Giant); 120135783Smarcel 121135783Smarcel if (error == 0) { 122135783Smarcel td->td_retval[0] = 0; 123135783Smarcel td->td_retval[1] = tf->tf_scratch.gr10; /* edx */ 124135783Smarcel 125135783Smarcel STOPEVENT(p, S_SCE, narg); 126135783Smarcel 127135783Smarcel error = (*callp->sy_call)(td, args64); 128135783Smarcel } 129135783Smarcel 130135783Smarcel switch (error) { 131135783Smarcel case 0: 132135783Smarcel tf->tf_scratch.gr8 = td->td_retval[0]; /* eax */ 133135783Smarcel tf->tf_scratch.gr10 = td->td_retval[1]; /* edx */ 134135783Smarcel ia64_set_eflag(ia64_get_eflag() & ~PSL_C); 135135783Smarcel break; 136135783Smarcel 137135783Smarcel case ERESTART: 138135783Smarcel /* 139135783Smarcel * Reconstruct pc, assuming lcall $X,y is 7 bytes, 140135783Smarcel * int 0x80 is 2 bytes. XXX Assume int 0x80. 141135783Smarcel */ 142135783Smarcel tf->tf_special.iip -= 2; 143135783Smarcel break; 144135783Smarcel 145135783Smarcel case EJUSTRETURN: 146135783Smarcel break; 147135783Smarcel 148135783Smarcel default: 149135783Smarcel if (p->p_sysent->sv_errsize) { 150135783Smarcel if (error >= p->p_sysent->sv_errsize) 151135783Smarcel error = -1; /* XXX */ 152135783Smarcel else 153135783Smarcel error = p->p_sysent->sv_errtbl[error]; 154135783Smarcel } 155135783Smarcel tf->tf_scratch.gr8 = error; 156135783Smarcel ia64_set_eflag(ia64_get_eflag() | PSL_C); 157135783Smarcel break; 158135783Smarcel } 159135783Smarcel 160135783Smarcel /* 161135783Smarcel * Release Giant if we previously set it. 162135783Smarcel */ 163135783Smarcel if ((callp->sy_narg & SYF_MPSAFE) == 0) 164135783Smarcel mtx_unlock(&Giant); 165135783Smarcel 166135783Smarcel /* 167135783Smarcel * Traced syscall. 168135783Smarcel */ 169135783Smarcel if ((eflags & PSL_T) && !(eflags & PSL_VM)) { 170135783Smarcel ia64_set_eflag(ia64_get_eflag() & ~PSL_T); 171135783Smarcel trapsignal(td, SIGTRAP, 0); 172135783Smarcel } 173135783Smarcel 174135783Smarcel#ifdef KTRACE 175135783Smarcel if (KTRPOINT(td, KTR_SYSRET)) 176135783Smarcel ktrsysret(code, error, td->td_retval[0]); 177135783Smarcel#endif 178135783Smarcel 179135783Smarcel /* 180135783Smarcel * This works because errno is findable through the 181135783Smarcel * register set. If we ever support an emulation where this 182135783Smarcel * is not the case, this code will need to be revisited. 183135783Smarcel */ 184135783Smarcel STOPEVENT(p, S_SCX, code); 185135783Smarcel 186135783Smarcel WITNESS_WARN(WARN_PANIC, NULL, "System call %s returning", 187135783Smarcel (code >= 0 && code < SYS_MAXSYSCALL) ? syscallnames[code] : "???"); 188135783Smarcel mtx_assert(&sched_lock, MA_NOTOWNED); 189135783Smarcel mtx_assert(&Giant, MA_NOTOWNED); 190135783Smarcel} 191135783Smarcel 192135783Smarcel/* 193135783Smarcel * ia32_trap() is called from exception.S to handle the IA-32 specific 194135783Smarcel * interruption vectors. 195135783Smarcel */ 196135783Smarcelvoid 197135783Smarcelia32_trap(int vector, struct trapframe *tf) 198135783Smarcel{ 199135783Smarcel struct proc *p; 200135783Smarcel struct thread *td; 201135783Smarcel uint64_t ucode; 202135783Smarcel int sig; 203135783Smarcel u_int sticks; 204135783Smarcel 205135783Smarcel KASSERT(TRAPF_USERMODE(tf), ("%s: In kernel mode???", __func__)); 206135783Smarcel 207135783Smarcel ia64_set_fpsr(IA64_FPSR_DEFAULT); 208135783Smarcel atomic_add_int(&cnt.v_trap, 1); 209135783Smarcel 210135783Smarcel td = curthread; 211135783Smarcel td->td_frame = tf; 212135783Smarcel sticks = td->td_sticks; 213135783Smarcel p = td->td_proc; 214135783Smarcel if (td->td_ucred != p->p_ucred) 215135783Smarcel cred_update_thread(td); 216135783Smarcel sig = 0; 217135783Smarcel ucode = 0; 218135783Smarcel switch (vector) { 219135783Smarcel case IA64_VEC_IA32_EXCEPTION: 220135783Smarcel switch ((tf->tf_special.isr >> 16) & 0xffff) { 221135783Smarcel case IA32_EXCEPTION_DIVIDE: 222135783Smarcel ucode = FPE_INTDIV; 223135783Smarcel sig = SIGFPE; 224135783Smarcel break; 225135783Smarcel case IA32_EXCEPTION_DEBUG: 226135783Smarcel case IA32_EXCEPTION_BREAK: 227135783Smarcel sig = SIGTRAP; 228135783Smarcel break; 229135783Smarcel case IA32_EXCEPTION_OVERFLOW: 230135783Smarcel ucode = FPE_INTOVF; 231135783Smarcel sig = SIGFPE; 232135783Smarcel break; 233135783Smarcel case IA32_EXCEPTION_BOUND: 234135783Smarcel ucode = FPE_FLTSUB; 235135783Smarcel sig = SIGFPE; 236135783Smarcel break; 237135783Smarcel case IA32_EXCEPTION_DNA: 238135783Smarcel ucode = 0; 239135783Smarcel sig = SIGFPE; 240135783Smarcel break; 241135783Smarcel case IA32_EXCEPTION_NOT_PRESENT: 242135783Smarcel case IA32_EXCEPTION_STACK_FAULT: 243135783Smarcel case IA32_EXCEPTION_GPFAULT: 244135783Smarcel ucode = (tf->tf_special.isr & 0xffff) + BUS_SEGM_FAULT; 245135783Smarcel sig = SIGBUS; 246135783Smarcel break; 247135783Smarcel case IA32_EXCEPTION_FPERROR: 248135783Smarcel ucode = 0; /* XXX */ 249135783Smarcel sig = SIGFPE; 250135783Smarcel break; 251135783Smarcel case IA32_EXCEPTION_ALIGNMENT_CHECK: 252135783Smarcel ucode = tf->tf_special.ifa; /* VA */ 253135783Smarcel sig = SIGBUS; 254135783Smarcel break; 255135783Smarcel case IA32_EXCEPTION_STREAMING_SIMD: 256135783Smarcel ucode = 0; /* XXX */ 257135783Smarcel sig = SIGFPE; 258135783Smarcel break; 259135783Smarcel default: 260135783Smarcel trap_panic(vector, tf); 261135783Smarcel break; 262135783Smarcel } 263135783Smarcel break; 264135783Smarcel 265135783Smarcel case IA64_VEC_IA32_INTERCEPT: 266135783Smarcel /* XXX Maybe need to emulate ia32 instruction. */ 267135783Smarcel trap_panic(vector, tf); 268135783Smarcel 269135783Smarcel case IA64_VEC_IA32_INTERRUPT: 270135783Smarcel /* INT n instruction - probably a syscall. */ 271135783Smarcel if (((tf->tf_special.isr >> 16) & 0xffff) == 0x80) { 272135783Smarcel ia32_syscall(tf); 273135783Smarcel goto out; 274135783Smarcel } 275135783Smarcel ucode = (tf->tf_special.isr >> 16) & 0xffff; 276135783Smarcel sig = SIGILL; 277135783Smarcel break; 278135783Smarcel 279135783Smarcel default: 280135783Smarcel /* Should never happen of course. */ 281135783Smarcel trap_panic(vector, tf); 282135783Smarcel break; 283135783Smarcel } 284135783Smarcel 285135783Smarcel KASSERT(sig != 0, ("%s: signal not set", __func__)); 286135783Smarcel 287135783Smarcel trapsignal(td, sig, ucode); 288135783Smarcel 289135783Smarcelout: 290135783Smarcel userret(td, tf, sticks); 291135783Smarcel mtx_assert(&Giant, MA_NOTOWNED); 292135783Smarcel do_ast(tf); 293135783Smarcel} 294