mirror of
https://github.com/yuzu-emu/unicorn.git
synced 2024-12-23 12:35:36 +00:00
target-i386: exception handling for FPU instructions
This patch fixes exception handling for FPU instructions and removes obsolete PC update from translate.c. Backports commit 6cad09d2f74d7318f737acaa21b3da49a0c9e670 from qemu
This commit is contained in:
Pavel Dovgalyuk
Lioncash
parent
56615596e4
commit
afe5ed6f49
|
|
@ -67,22 +67,24 @@ static inline void fpop(CPUX86State *env)
|
|||
env->fpstt = (env->fpstt + 1) & 7;
|
||||
}
|
||||
|
||||
static inline floatx80 helper_fldt(CPUX86State *env, target_ulong ptr)
|
||||
static inline floatx80 helper_fldt(CPUX86State *env, target_ulong ptr,
|
||||
uintptr_t retaddr)
|
||||
{
|
||||
CPU_LDoubleU temp;
|
||||
|
||||
temp.l.lower = cpu_ldq_data(env, ptr);
|
||||
temp.l.upper = cpu_lduw_data(env, ptr + 8);
|
||||
temp.l.lower = cpu_ldq_data_ra(env, ptr, retaddr);
|
||||
temp.l.upper = cpu_lduw_data_ra(env, ptr + 8, retaddr);
|
||||
return temp.d;
|
||||
}
|
||||
|
||||
static inline void helper_fstt(CPUX86State *env, floatx80 f, target_ulong ptr)
|
||||
static inline void helper_fstt(CPUX86State *env, floatx80 f, target_ulong ptr,
|
||||
uintptr_t retaddr)
|
||||
{
|
||||
CPU_LDoubleU temp;
|
||||
|
||||
temp.d = f;
|
||||
cpu_stq_data(env, ptr, temp.l.lower);
|
||||
cpu_stw_data(env, ptr + 8, temp.l.upper);
|
||||
cpu_stq_data_ra(env, ptr, temp.l.lower, retaddr);
|
||||
cpu_stw_data_ra(env, ptr + 8, temp.l.upper, retaddr);
|
||||
}
|
||||
|
||||
/* x87 FPU helpers */
|
||||
|
|
@ -125,10 +127,10 @@ static inline floatx80 helper_fdiv(CPUX86State *env, floatx80 a, floatx80 b)
|
|||
return floatx80_div(a, b, &env->fp_status);
|
||||
}
|
||||
|
||||
static void fpu_raise_exception(CPUX86State *env)
|
||||
static void fpu_raise_exception(CPUX86State *env, uintptr_t retaddr)
|
||||
{
|
||||
if (env->cr[0] & CR0_NE_MASK) {
|
||||
raise_exception(env, EXCP10_COPR);
|
||||
raise_exception_ra(env, EXCP10_COPR, retaddr);
|
||||
}
|
||||
#if !defined(CONFIG_USER_ONLY)
|
||||
else {
|
||||
|
|
@ -313,14 +315,14 @@ void helper_fldt_ST0(CPUX86State *env, target_ulong ptr)
|
|||
int new_fpstt;
|
||||
|
||||
new_fpstt = (env->fpstt - 1) & 7;
|
||||
env->fpregs[new_fpstt].d = helper_fldt(env, ptr);
|
||||
env->fpregs[new_fpstt].d = helper_fldt(env, ptr, GETPC());
|
||||
env->fpstt = new_fpstt;
|
||||
env->fptags[new_fpstt] = 0; /* validate stack entry */
|
||||
}
|
||||
|
||||
void helper_fstt_ST0(CPUX86State *env, target_ulong ptr)
|
||||
{
|
||||
helper_fstt(env, ST0, ptr);
|
||||
helper_fstt(env, ST0, ptr, GETPC());
|
||||
}
|
||||
|
||||
void helper_fpush(CPUX86State *env)
|
||||
|
|
@ -619,7 +621,7 @@ void helper_fclex(CPUX86State *env)
|
|||
void helper_fwait(CPUX86State *env)
|
||||
{
|
||||
if (env->fpus & FPUS_SE) {
|
||||
fpu_raise_exception(env);
|
||||
fpu_raise_exception(env, GETPC());
|
||||
}
|
||||
}
|
||||
|
||||
|
|
@ -649,11 +651,11 @@ void helper_fbld_ST0(CPUX86State *env, target_ulong ptr)
|
|||
|
||||
val = 0;
|
||||
for (i = 8; i >= 0; i--) {
|
||||
v = cpu_ldub_data(env, ptr + i);
|
||||
v = cpu_ldub_data_ra(env, ptr + i, GETPC());
|
||||
val = (val * 100) + ((v >> 4) * 10) + (v & 0xf);
|
||||
}
|
||||
tmp = int64_to_floatx80(val, &env->fp_status);
|
||||
if (cpu_ldub_data(env, ptr + 9) & 0x80) {
|
||||
if (cpu_ldub_data_ra(env, ptr + 9, GETPC()) & 0x80) {
|
||||
tmp = floatx80_chs(tmp);
|
||||
}
|
||||
fpush(env);
|
||||
|
|
@ -670,10 +672,10 @@ void helper_fbst_ST0(CPUX86State *env, target_ulong ptr)
|
|||
mem_ref = ptr;
|
||||
mem_end = mem_ref + 9;
|
||||
if (val < 0) {
|
||||
cpu_stb_data(env, mem_end, 0x80);
|
||||
cpu_stb_data_ra(env, mem_end, 0x80, GETPC());
|
||||
val = -val;
|
||||
} else {
|
||||
cpu_stb_data(env, mem_end, 0x00);
|
||||
cpu_stb_data_ra(env, mem_end, 0x00, GETPC());
|
||||
}
|
||||
while (mem_ref < mem_end) {
|
||||
if (val == 0) {
|
||||
|
|
@ -682,10 +684,10 @@ void helper_fbst_ST0(CPUX86State *env, target_ulong ptr)
|
|||
v = val % 100;
|
||||
val = val / 100;
|
||||
v = ((v / 10) << 4) | (v % 10);
|
||||
cpu_stb_data(env, mem_ref++, v);
|
||||
cpu_stb_data_ra(env, mem_ref++, v, GETPC());
|
||||
}
|
||||
while (mem_ref < mem_end) {
|
||||
cpu_stb_data(env, mem_ref++, 0);
|
||||
cpu_stb_data_ra(env, mem_ref++, 0, GETPC());
|
||||
}
|
||||
}
|
||||
|
||||
|
|
@ -996,7 +998,8 @@ void helper_fxam_ST0(CPUX86State *env)
|
|||
}
|
||||
}
|
||||
|
||||
void helper_fstenv(CPUX86State *env, target_ulong ptr, int data32)
|
||||
static void do_fstenv(CPUX86State *env, target_ulong ptr, int data32,
|
||||
uintptr_t retaddr)
|
||||
{
|
||||
int fpus, fptag, exp, i;
|
||||
uint64_t mant;
|
||||
|
|
@ -1034,38 +1037,43 @@ void helper_fstenv(CPUX86State *env, target_ulong ptr, int data32)
|
|||
cpu_stl_data(env, ptr + 28, 0); /* fpos */
|
||||
} else if (data32) {
|
||||
/* 32 bit */
|
||||
cpu_stl_data(env, ptr, env->fpuc);
|
||||
cpu_stl_data(env, ptr + 4, fpus);
|
||||
cpu_stl_data(env, ptr + 8, fptag);
|
||||
cpu_stl_data(env, ptr + 12, (uint32_t)env->fpip); /* fpip */
|
||||
cpu_stl_data(env, ptr + 16, 0); /* fpcs */
|
||||
cpu_stl_data(env, ptr + 20, 0); /* fpoo */
|
||||
cpu_stl_data(env, ptr + 24, 0); /* fpos */
|
||||
cpu_stl_data_ra(env, ptr, env->fpuc, retaddr);
|
||||
cpu_stl_data_ra(env, ptr + 4, fpus, retaddr);
|
||||
cpu_stl_data_ra(env, ptr + 8, fptag, retaddr);
|
||||
cpu_stl_data_ra(env, ptr + 12, 0, retaddr); /* fpip */
|
||||
cpu_stl_data_ra(env, ptr + 16, 0, retaddr); /* fpcs */
|
||||
cpu_stl_data_ra(env, ptr + 20, 0, retaddr); /* fpoo */
|
||||
cpu_stl_data_ra(env, ptr + 24, 0, retaddr); /* fpos */
|
||||
} else {
|
||||
/* 16 bit */
|
||||
cpu_stw_data(env, ptr, env->fpuc);
|
||||
cpu_stw_data(env, ptr + 2, fpus);
|
||||
cpu_stw_data(env, ptr + 4, fptag);
|
||||
cpu_stw_data(env, ptr + 6, (uint32_t)env->fpip);
|
||||
cpu_stw_data(env, ptr + 8, 0);
|
||||
cpu_stw_data(env, ptr + 10, 0);
|
||||
cpu_stw_data(env, ptr + 12, 0);
|
||||
cpu_stw_data_ra(env, ptr, env->fpuc, retaddr);
|
||||
cpu_stw_data_ra(env, ptr + 2, fpus, retaddr);
|
||||
cpu_stw_data_ra(env, ptr + 4, fptag, retaddr);
|
||||
cpu_stw_data_ra(env, ptr + 6, 0, retaddr);
|
||||
cpu_stw_data_ra(env, ptr + 8, 0, retaddr);
|
||||
cpu_stw_data_ra(env, ptr + 10, 0, retaddr);
|
||||
cpu_stw_data_ra(env, ptr + 12, 0, retaddr);
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
void helper_fldenv(CPUX86State *env, target_ulong ptr, int data32)
|
||||
void helper_fstenv(CPUX86State *env, target_ulong ptr, int data32)
|
||||
{
|
||||
do_fstenv(env, ptr, data32, GETPC());
|
||||
}
|
||||
|
||||
static void do_fldenv(CPUX86State *env, target_ulong ptr, int data32,
|
||||
uintptr_t retaddr)
|
||||
{
|
||||
int i, fpus, fptag;
|
||||
|
||||
if (data32) {
|
||||
cpu_set_fpuc(env, cpu_lduw_data(env, ptr));
|
||||
fpus = cpu_lduw_data(env, ptr + 4);
|
||||
fptag = cpu_lduw_data(env, ptr + 8);
|
||||
cpu_set_fpuc(env, cpu_lduw_data_ra(env, ptr, retaddr));
|
||||
fpus = cpu_lduw_data_ra(env, ptr + 4, retaddr);
|
||||
fptag = cpu_lduw_data_ra(env, ptr + 8, retaddr);
|
||||
} else {
|
||||
cpu_set_fpuc(env, cpu_lduw_data(env, ptr));
|
||||
fpus = cpu_lduw_data(env, ptr + 2);
|
||||
fptag = cpu_lduw_data(env, ptr + 4);
|
||||
cpu_set_fpuc(env, cpu_lduw_data_ra(env, ptr, retaddr));
|
||||
fpus = cpu_lduw_data_ra(env, ptr + 2, retaddr);
|
||||
fptag = cpu_lduw_data_ra(env, ptr + 4, retaddr);
|
||||
}
|
||||
env->fpstt = (fpus >> 11) & 7;
|
||||
env->fpus = fpus & ~0x3800;
|
||||
|
|
@ -1075,17 +1083,22 @@ void helper_fldenv(CPUX86State *env, target_ulong ptr, int data32)
|
|||
}
|
||||
}
|
||||
|
||||
void helper_fldenv(CPUX86State *env, target_ulong ptr, int data32)
|
||||
{
|
||||
do_fldenv(env, ptr, data32, GETPC());
|
||||
}
|
||||
|
||||
void helper_fsave(CPUX86State *env, target_ulong ptr, int data32)
|
||||
{
|
||||
floatx80 tmp;
|
||||
int i;
|
||||
|
||||
helper_fstenv(env, ptr, data32);
|
||||
do_fstenv(env, ptr, data32, GETPC());
|
||||
|
||||
ptr += (14 << data32);
|
||||
for (i = 0; i < 8; i++) {
|
||||
tmp = ST(i);
|
||||
helper_fstt(env, tmp, ptr);
|
||||
helper_fstt(env, tmp, ptr, GETPC());
|
||||
ptr += 10;
|
||||
}
|
||||
|
||||
|
|
@ -1108,11 +1121,11 @@ void helper_frstor(CPUX86State *env, target_ulong ptr, int data32)
|
|||
floatx80 tmp;
|
||||
int i;
|
||||
|
||||
helper_fldenv(env, ptr, data32);
|
||||
do_fldenv(env, ptr, data32, GETPC());
|
||||
ptr += (14 << data32);
|
||||
|
||||
for (i = 0; i < 8; i++) {
|
||||
tmp = helper_fldt(env, ptr);
|
||||
tmp = helper_fldt(env, ptr, GETPC());
|
||||
ST(i) = tmp;
|
||||
ptr += 10;
|
||||
}
|
||||
|
|
@ -1130,7 +1143,8 @@ void cpu_x86_frstor(CPUX86State *env, target_ulong ptr, int data32)
|
|||
}
|
||||
#endif
|
||||
|
||||
void helper_fxsave(CPUX86State *env, target_ulong ptr, int data64)
|
||||
static void do_fxsave(CPUX86State *env, target_ulong ptr, int data64,
|
||||
uintptr_t retaddr)
|
||||
{
|
||||
int fpus, fptag, i, nb_xmm_regs;
|
||||
floatx80 tmp;
|
||||
|
|
@ -1138,7 +1152,7 @@ void helper_fxsave(CPUX86State *env, target_ulong ptr, int data64)
|
|||
|
||||
/* The operand must be 16 byte aligned */
|
||||
if (ptr & 0xf) {
|
||||
raise_exception(env, EXCP0D_GPF);
|
||||
raise_exception_ra(env, EXCP0D_GPF, retaddr);
|
||||
}
|
||||
|
||||
fpus = (env->fpus & ~0x3800) | (env->fpstt & 0x7) << 11;
|
||||
|
|
@ -1146,33 +1160,34 @@ void helper_fxsave(CPUX86State *env, target_ulong ptr, int data64)
|
|||
for (i = 0; i < 8; i++) {
|
||||
fptag |= (env->fptags[i] << i);
|
||||
}
|
||||
cpu_stw_data(env, ptr, env->fpuc);
|
||||
cpu_stw_data(env, ptr + 2, fpus);
|
||||
cpu_stw_data(env, ptr + 4, fptag ^ 0xff);
|
||||
cpu_stw_data_ra(env, ptr, env->fpuc, retaddr);
|
||||
cpu_stw_data_ra(env, ptr + 2, fpus, retaddr);
|
||||
cpu_stw_data_ra(env, ptr + 4, fptag ^ 0xff, retaddr);
|
||||
#ifdef TARGET_X86_64
|
||||
if (data64) {
|
||||
cpu_stq_data(env, ptr + 0x08, 0); /* rip */
|
||||
cpu_stq_data(env, ptr + 0x10, 0); /* rdp */
|
||||
cpu_stq_data_ra(env, ptr + 0x08, 0, retaddr); /* rip */
|
||||
cpu_stq_data_ra(env, ptr + 0x10, 0, retaddr); /* rdp */
|
||||
} else
|
||||
#endif
|
||||
{
|
||||
cpu_stl_data(env, ptr + 0x08, 0); /* eip */
|
||||
cpu_stl_data(env, ptr + 0x0c, 0); /* sel */
|
||||
cpu_stl_data(env, ptr + 0x10, 0); /* dp */
|
||||
cpu_stl_data(env, ptr + 0x14, 0); /* sel */
|
||||
cpu_stl_data_ra(env, ptr + 0x08, 0, retaddr); /* eip */
|
||||
cpu_stl_data_ra(env, ptr + 0x0c, 0, retaddr); /* sel */
|
||||
cpu_stl_data_ra(env, ptr + 0x10, 0, retaddr); /* dp */
|
||||
cpu_stl_data_ra(env, ptr + 0x14, 0, retaddr); /* sel */
|
||||
}
|
||||
|
||||
addr = ptr + 0x20;
|
||||
for (i = 0; i < 8; i++) {
|
||||
tmp = ST(i);
|
||||
helper_fstt(env, tmp, addr);
|
||||
helper_fstt(env, tmp, addr, retaddr);
|
||||
addr += 16;
|
||||
}
|
||||
|
||||
if (env->cr[4] & CR4_OSFXSR_MASK) {
|
||||
/* XXX: finish it */
|
||||
cpu_stl_data(env, ptr + 0x18, env->mxcsr); /* mxcsr */
|
||||
cpu_stl_data(env, ptr + 0x1c, 0x0000ffff); /* mxcsr_mask */
|
||||
cpu_stl_data_ra(env, ptr + 0x18, env->mxcsr, retaddr); /* mxcsr */
|
||||
cpu_stl_data_ra(env, ptr + 0x1c, 0x0000ffff, retaddr); /* mxcsr_mask */
|
||||
|
||||
if (env->hflags & HF_CS64_MASK) {
|
||||
nb_xmm_regs = 16;
|
||||
} else {
|
||||
|
|
@ -1184,15 +1199,21 @@ void helper_fxsave(CPUX86State *env, target_ulong ptr, int data64)
|
|||
|| (env->hflags & HF_CPL_MASK)
|
||||
|| !(env->hflags & HF_LMA_MASK)) {
|
||||
for (i = 0; i < nb_xmm_regs; i++) {
|
||||
cpu_stq_data(env, addr, env->xmm_regs[i].XMM_Q(0));
|
||||
cpu_stq_data(env, addr + 8, env->xmm_regs[i].XMM_Q(1));
|
||||
cpu_stq_data_ra(env, addr, env->xmm_regs[i].XMM_Q(0), retaddr);
|
||||
cpu_stq_data_ra(env, addr + 8, env->xmm_regs[i].XMM_Q(1), retaddr);
|
||||
addr += 16;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void helper_fxrstor(CPUX86State *env, target_ulong ptr, int data64)
|
||||
void helper_fxsave(CPUX86State *env, target_ulong ptr, int data64)
|
||||
{
|
||||
do_fxsave(env, ptr, data64, GETPC());
|
||||
}
|
||||
|
||||
static void do_fxrstor(CPUX86State *env, target_ulong ptr, int data64,
|
||||
uintptr_t retaddr)
|
||||
{
|
||||
int i, fpus, fptag, nb_xmm_regs;
|
||||
floatx80 tmp;
|
||||
|
|
@ -1200,12 +1221,12 @@ void helper_fxrstor(CPUX86State *env, target_ulong ptr, int data64)
|
|||
|
||||
/* The operand must be 16 byte aligned */
|
||||
if (ptr & 0xf) {
|
||||
raise_exception(env, EXCP0D_GPF);
|
||||
raise_exception_ra(env, EXCP0D_GPF, retaddr);
|
||||
}
|
||||
|
||||
cpu_set_fpuc(env, cpu_lduw_data(env, ptr));
|
||||
fpus = cpu_lduw_data(env, ptr + 2);
|
||||
fptag = cpu_lduw_data(env, ptr + 4);
|
||||
cpu_set_fpuc(env, cpu_lduw_data_ra(env, ptr, retaddr));
|
||||
fpus = cpu_lduw_data_ra(env, ptr + 2, retaddr);
|
||||
fptag = cpu_lduw_data_ra(env, ptr + 4, retaddr);
|
||||
env->fpstt = (fpus >> 11) & 7;
|
||||
env->fpus = fpus & ~0x3800;
|
||||
fptag ^= 0xff;
|
||||
|
|
@ -1215,15 +1236,15 @@ void helper_fxrstor(CPUX86State *env, target_ulong ptr, int data64)
|
|||
|
||||
addr = ptr + 0x20;
|
||||
for (i = 0; i < 8; i++) {
|
||||
tmp = helper_fldt(env, addr);
|
||||
tmp = helper_fldt(env, addr, retaddr);
|
||||
ST(i) = tmp;
|
||||
addr += 16;
|
||||
}
|
||||
|
||||
if (env->cr[4] & CR4_OSFXSR_MASK) {
|
||||
/* XXX: finish it */
|
||||
cpu_set_mxcsr(env, cpu_ldl_data(env, ptr + 0x18));
|
||||
/* cpu_ldl_data(env, ptr + 0x1c); */
|
||||
cpu_set_mxcsr(env, cpu_ldl_data_ra(env, ptr + 0x18, retaddr));
|
||||
/* cpu_ldl_data_ra(env, ptr + 0x1c, retaddr); */
|
||||
if (env->hflags & HF_CS64_MASK) {
|
||||
nb_xmm_regs = 16;
|
||||
} else {
|
||||
|
|
@ -1235,14 +1256,19 @@ void helper_fxrstor(CPUX86State *env, target_ulong ptr, int data64)
|
|||
|| (env->hflags & HF_CPL_MASK)
|
||||
|| !(env->hflags & HF_LMA_MASK)) {
|
||||
for (i = 0; i < nb_xmm_regs; i++) {
|
||||
env->xmm_regs[i].XMM_Q(0) = cpu_ldq_data(env, addr);
|
||||
env->xmm_regs[i].XMM_Q(1) = cpu_ldq_data(env, addr + 8);
|
||||
env->xmm_regs[i].XMM_Q(0) = cpu_ldq_data_ra(env, addr, retaddr);
|
||||
env->xmm_regs[i].XMM_Q(1) = cpu_ldq_data_ra(env, addr + 8, retaddr);
|
||||
addr += 16;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void helper_fxrstor(CPUX86State *env, target_ulong ptr, int data64)
|
||||
{
|
||||
do_fxrstor(env, ptr, data64, GETPC());
|
||||
}
|
||||
|
||||
void cpu_get_fp80(uint64_t *pmant, uint16_t *pexp, floatx80 f)
|
||||
{
|
||||
CPU_LDoubleU temp;
|
||||
|
|
|
|||
Loading…
Reference in a new issue