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