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