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$"); 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> 47233204Stijl#include <x86/include/psl.h> 48135783Smarcel 49162361Srwatson#include <security/audit/audit.h> 50162361Srwatson 51208453Skib#include <compat/ia32/ia32_util.h> 52135832Smarcel 53208453Skibvoid 54208453Skibia32_set_syscall_retval(struct thread *td, int error) 55135783Smarcel{ 56135783Smarcel struct proc *p; 57208453Skib struct trapframe *tf; 58135783Smarcel 59208453Skib tf = td->td_frame; 60135783Smarcel 61135783Smarcel switch (error) { 62135783Smarcel case 0: 63135783Smarcel tf->tf_scratch.gr8 = td->td_retval[0]; /* eax */ 64135783Smarcel tf->tf_scratch.gr10 = td->td_retval[1]; /* edx */ 65135783Smarcel ia64_set_eflag(ia64_get_eflag() & ~PSL_C); 66135783Smarcel break; 67135783Smarcel 68135783Smarcel case ERESTART: 69135783Smarcel /* 70135783Smarcel * Reconstruct pc, assuming lcall $X,y is 7 bytes, 71135783Smarcel * int 0x80 is 2 bytes. XXX Assume int 0x80. 72135783Smarcel */ 73135783Smarcel tf->tf_special.iip -= 2; 74135783Smarcel break; 75135783Smarcel 76135783Smarcel case EJUSTRETURN: 77135783Smarcel break; 78135783Smarcel 79135783Smarcel default: 80208453Skib p = td->td_proc; 81135783Smarcel if (p->p_sysent->sv_errsize) { 82135783Smarcel if (error >= p->p_sysent->sv_errsize) 83135783Smarcel error = -1; /* XXX */ 84135783Smarcel else 85135783Smarcel error = p->p_sysent->sv_errtbl[error]; 86135783Smarcel } 87135783Smarcel tf->tf_scratch.gr8 = error; 88135783Smarcel ia64_set_eflag(ia64_get_eflag() | PSL_C); 89135783Smarcel break; 90135783Smarcel } 91208453Skib} 92135783Smarcel 93208453Skibint 94208453Skibia32_fetch_syscall_args(struct thread *td, struct syscall_args *sa) 95208453Skib{ 96208453Skib struct trapframe *tf; 97208453Skib struct proc *p; 98208453Skib uint32_t args[8]; 99208453Skib caddr_t params; 100208453Skib int error, i; 101208453Skib 102208453Skib tf = td->td_frame; 103208453Skib p = td->td_proc; 104208453Skib 105208453Skib params = (caddr_t)(tf->tf_special.sp & ((1L<<32)-1)) + 106208453Skib sizeof(uint32_t); 107208453Skib sa->code = tf->tf_scratch.gr8; /* eax */ 108208453Skib 109208453Skib if (sa->code == SYS_syscall) { 110208453Skib /* Code is first argument, followed by actual args. */ 111208453Skib sa->code = fuword32(params); 112208453Skib params += sizeof(int); 113208453Skib } else if (sa->code == SYS___syscall) { 114208453Skib /* 115208453Skib * Like syscall, but code is a quad, so as to maintain 116208453Skib * quad alignment for the rest of the arguments. We 117208453Skib * use a 32-bit fetch in case params is not aligned. 118208453Skib */ 119208453Skib sa->code = fuword32(params); 120208453Skib params += sizeof(quad_t); 121208453Skib } 122208453Skib 123208453Skib if (p->p_sysent->sv_mask) 124208453Skib sa->code &= p->p_sysent->sv_mask; 125208453Skib if (sa->code >= p->p_sysent->sv_size) 126208453Skib sa->callp = &p->p_sysent->sv_table[0]; 127208453Skib else 128208453Skib sa->callp = &p->p_sysent->sv_table[sa->code]; 129208453Skib sa->narg = sa->callp->sy_narg; 130208453Skib 131208453Skib if (params != NULL && sa->narg != 0) 132208453Skib error = copyin(params, (caddr_t)args, sa->narg * sizeof(int)); 133208453Skib else 134208453Skib error = 0; 135208514Skib sa->args = &sa->args32[0]; 136208453Skib 137208453Skib if (error == 0) { 138208453Skib for (i = 0; i < sa->narg; i++) 139208514Skib sa->args32[i] = args[i]; 140208453Skib td->td_retval[0] = 0; 141208453Skib td->td_retval[1] = tf->tf_scratch.gr10; /* edx */ 142208453Skib } 143208453Skib 144208453Skib return (error); 145208453Skib} 146208453Skib 147225474Skib#include "../../kern/subr_syscall.c" 148225474Skib 149208453Skibstatic void 150208453Skibia32_syscall(struct trapframe *tf) 151208453Skib{ 152208453Skib struct thread *td; 153208453Skib struct syscall_args sa; 154208453Skib register_t eflags; 155208453Skib int error; 156208453Skib ksiginfo_t ksi; 157208453Skib 158208453Skib td = curthread; 159208453Skib eflags = ia64_get_eflag(); 160208453Skib 161208453Skib error = syscallenter(td, &sa); 162208453Skib 163135783Smarcel /* 164135783Smarcel * Traced syscall. 165135783Smarcel */ 166135783Smarcel if ((eflags & PSL_T) && !(eflags & PSL_VM)) { 167135783Smarcel ia64_set_eflag(ia64_get_eflag() & ~PSL_T); 168151316Sdavidxu ksiginfo_init_trap(&ksi); 169151316Sdavidxu ksi.ksi_signo = SIGTRAP; 170151316Sdavidxu ksi.ksi_code = TRAP_TRACE; 171151316Sdavidxu ksi.ksi_addr = (void *)tf->tf_special.iip; 172151316Sdavidxu trapsignal(td, &ksi); 173135783Smarcel } 174135783Smarcel 175208453Skib syscallret(td, error, &sa); 176135783Smarcel} 177135783Smarcel 178135783Smarcel/* 179135783Smarcel * ia32_trap() is called from exception.S to handle the IA-32 specific 180135783Smarcel * interruption vectors. 181135783Smarcel */ 182135783Smarcelvoid 183135783Smarcelia32_trap(int vector, struct trapframe *tf) 184135783Smarcel{ 185135783Smarcel struct proc *p; 186135783Smarcel struct thread *td; 187135783Smarcel uint64_t ucode; 188135783Smarcel int sig; 189151316Sdavidxu ksiginfo_t ksi; 190135783Smarcel 191135783Smarcel KASSERT(TRAPF_USERMODE(tf), ("%s: In kernel mode???", __func__)); 192135783Smarcel 193135783Smarcel ia64_set_fpsr(IA64_FPSR_DEFAULT); 194170291Sattilio PCPU_INC(cnt.v_trap); 195135783Smarcel 196135783Smarcel td = curthread; 197135783Smarcel td->td_frame = tf; 198155455Sphk td->td_pticks = 0; 199135783Smarcel p = td->td_proc; 200135783Smarcel if (td->td_ucred != p->p_ucred) 201135783Smarcel cred_update_thread(td); 202135783Smarcel sig = 0; 203135783Smarcel ucode = 0; 204135783Smarcel switch (vector) { 205135783Smarcel case IA64_VEC_IA32_EXCEPTION: 206135783Smarcel switch ((tf->tf_special.isr >> 16) & 0xffff) { 207135783Smarcel case IA32_EXCEPTION_DIVIDE: 208135783Smarcel ucode = FPE_INTDIV; 209135783Smarcel sig = SIGFPE; 210135783Smarcel break; 211135783Smarcel case IA32_EXCEPTION_DEBUG: 212135783Smarcel case IA32_EXCEPTION_BREAK: 213135783Smarcel sig = SIGTRAP; 214135783Smarcel break; 215135783Smarcel case IA32_EXCEPTION_OVERFLOW: 216135783Smarcel ucode = FPE_INTOVF; 217135783Smarcel sig = SIGFPE; 218135783Smarcel break; 219135783Smarcel case IA32_EXCEPTION_BOUND: 220135783Smarcel ucode = FPE_FLTSUB; 221135783Smarcel sig = SIGFPE; 222135783Smarcel break; 223135783Smarcel case IA32_EXCEPTION_DNA: 224135783Smarcel ucode = 0; 225135783Smarcel sig = SIGFPE; 226135783Smarcel break; 227135783Smarcel case IA32_EXCEPTION_NOT_PRESENT: 228135783Smarcel case IA32_EXCEPTION_STACK_FAULT: 229135783Smarcel case IA32_EXCEPTION_GPFAULT: 230135783Smarcel ucode = (tf->tf_special.isr & 0xffff) + BUS_SEGM_FAULT; 231135783Smarcel sig = SIGBUS; 232135783Smarcel break; 233135783Smarcel case IA32_EXCEPTION_FPERROR: 234135783Smarcel ucode = 0; /* XXX */ 235135783Smarcel sig = SIGFPE; 236135783Smarcel break; 237135783Smarcel case IA32_EXCEPTION_ALIGNMENT_CHECK: 238135783Smarcel ucode = tf->tf_special.ifa; /* VA */ 239135783Smarcel sig = SIGBUS; 240135783Smarcel break; 241135783Smarcel case IA32_EXCEPTION_STREAMING_SIMD: 242135783Smarcel ucode = 0; /* XXX */ 243135783Smarcel sig = SIGFPE; 244135783Smarcel break; 245135783Smarcel default: 246135783Smarcel trap_panic(vector, tf); 247135783Smarcel break; 248135783Smarcel } 249135783Smarcel break; 250135783Smarcel 251135783Smarcel case IA64_VEC_IA32_INTERCEPT: 252135783Smarcel /* XXX Maybe need to emulate ia32 instruction. */ 253135783Smarcel trap_panic(vector, tf); 254135783Smarcel 255135783Smarcel case IA64_VEC_IA32_INTERRUPT: 256135783Smarcel /* INT n instruction - probably a syscall. */ 257135783Smarcel if (((tf->tf_special.isr >> 16) & 0xffff) == 0x80) { 258135783Smarcel ia32_syscall(tf); 259135783Smarcel goto out; 260135783Smarcel } 261135783Smarcel ucode = (tf->tf_special.isr >> 16) & 0xffff; 262135783Smarcel sig = SIGILL; 263135783Smarcel break; 264135783Smarcel 265135783Smarcel default: 266135783Smarcel /* Should never happen of course. */ 267135783Smarcel trap_panic(vector, tf); 268135783Smarcel break; 269135783Smarcel } 270135783Smarcel 271135783Smarcel KASSERT(sig != 0, ("%s: signal not set", __func__)); 272135783Smarcel 273151316Sdavidxu ksiginfo_init_trap(&ksi); 274151316Sdavidxu ksi.ksi_signo = sig; 275151316Sdavidxu ksi.ksi_code = (int)ucode; /* XXX */ 276151316Sdavidxu /* ksi.ksi_addr */ 277151316Sdavidxu trapsignal(td, &ksi); 278135783Smarcel 279135783Smarcelout: 280155455Sphk userret(td, tf); 281135783Smarcel do_ast(tf); 282135783Smarcel} 283