target/loongarch: Fix emulation of float-point disable exception
We need to emulate it to generate a floating point disable exception when CSR.EUEN.FPE is zero. Reviewed-by: Richard Henderson <richard.henderson@linaro.org> Reviewed-by: Song Gao <gaosong@loongson.cn> Signed-off-by: Rui Wang <wangrui@loongson.cn> Message-Id: <20221104040517.222059-3-wangrui@loongson.cn> Signed-off-by: Song Gao <gaosong@loongson.cn>
This commit is contained in:
parent
b4bda2006f
commit
2419978cb0
@ -48,6 +48,7 @@ static const char * const excp_names[] = {
|
||||
[EXCCODE_BRK] = "Break",
|
||||
[EXCCODE_INE] = "Instruction Non-Existent",
|
||||
[EXCCODE_IPE] = "Instruction privilege error",
|
||||
[EXCCODE_FPD] = "Floating Point Disabled",
|
||||
[EXCCODE_FPE] = "Floating Point Exception",
|
||||
[EXCCODE_DBP] = "Debug breakpoint",
|
||||
[EXCCODE_BCE] = "Bound Check Exception",
|
||||
@ -185,6 +186,7 @@ static void loongarch_cpu_do_interrupt(CPUState *cs)
|
||||
case EXCCODE_BRK:
|
||||
case EXCCODE_INE:
|
||||
case EXCCODE_IPE:
|
||||
case EXCCODE_FPD:
|
||||
case EXCCODE_FPE:
|
||||
case EXCCODE_BCE:
|
||||
env->CSR_BADV = env->pc;
|
||||
|
@ -397,6 +397,7 @@ static inline int cpu_mmu_index(CPULoongArchState *env, bool ifetch)
|
||||
*/
|
||||
#define HW_FLAGS_PLV_MASK R_CSR_CRMD_PLV_MASK /* 0x03 */
|
||||
#define HW_FLAGS_CRMD_PG R_CSR_CRMD_PG_MASK /* 0x10 */
|
||||
#define HW_FLAGS_EUEN_FPE 0x04
|
||||
|
||||
static inline void cpu_get_tb_cpu_state(CPULoongArchState *env,
|
||||
target_ulong *pc,
|
||||
@ -406,6 +407,7 @@ static inline void cpu_get_tb_cpu_state(CPULoongArchState *env,
|
||||
*pc = env->pc;
|
||||
*cs_base = 0;
|
||||
*flags = env->CSR_CRMD & (R_CSR_CRMD_PLV_MASK | R_CSR_CRMD_PG_MASK);
|
||||
*flags |= FIELD_EX64(env->CSR_EUEN, CSR_EUEN, FPE) * HW_FLAGS_EUEN_FPE;
|
||||
}
|
||||
|
||||
void loongarch_cpu_list(void);
|
||||
|
@ -3,9 +3,22 @@
|
||||
* Copyright (c) 2021 Loongson Technology Corporation Limited
|
||||
*/
|
||||
|
||||
#ifndef CONFIG_USER_ONLY
|
||||
#define CHECK_FPE do { \
|
||||
if ((ctx->base.tb->flags & HW_FLAGS_EUEN_FPE) == 0) { \
|
||||
generate_exception(ctx, EXCCODE_FPD); \
|
||||
return false; \
|
||||
} \
|
||||
} while (0)
|
||||
#else
|
||||
#define CHECK_FPE
|
||||
#endif
|
||||
|
||||
static bool gen_fff(DisasContext *ctx, arg_fff *a,
|
||||
void (*func)(TCGv, TCGv_env, TCGv, TCGv))
|
||||
{
|
||||
CHECK_FPE;
|
||||
|
||||
func(cpu_fpr[a->fd], cpu_env, cpu_fpr[a->fj], cpu_fpr[a->fk]);
|
||||
return true;
|
||||
}
|
||||
@ -13,6 +26,8 @@ static bool gen_fff(DisasContext *ctx, arg_fff *a,
|
||||
static bool gen_ff(DisasContext *ctx, arg_ff *a,
|
||||
void (*func)(TCGv, TCGv_env, TCGv))
|
||||
{
|
||||
CHECK_FPE;
|
||||
|
||||
func(cpu_fpr[a->fd], cpu_env, cpu_fpr[a->fj]);
|
||||
return true;
|
||||
}
|
||||
@ -22,6 +37,9 @@ static bool gen_muladd(DisasContext *ctx, arg_ffff *a,
|
||||
int flag)
|
||||
{
|
||||
TCGv_i32 tflag = tcg_constant_i32(flag);
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
func(cpu_fpr[a->fd], cpu_env, cpu_fpr[a->fj],
|
||||
cpu_fpr[a->fk], cpu_fpr[a->fa], tflag);
|
||||
return true;
|
||||
@ -29,18 +47,24 @@ static bool gen_muladd(DisasContext *ctx, arg_ffff *a,
|
||||
|
||||
static bool trans_fcopysign_s(DisasContext *ctx, arg_fcopysign_s *a)
|
||||
{
|
||||
CHECK_FPE;
|
||||
|
||||
tcg_gen_deposit_i64(cpu_fpr[a->fd], cpu_fpr[a->fk], cpu_fpr[a->fj], 0, 31);
|
||||
return true;
|
||||
}
|
||||
|
||||
static bool trans_fcopysign_d(DisasContext *ctx, arg_fcopysign_d *a)
|
||||
{
|
||||
CHECK_FPE;
|
||||
|
||||
tcg_gen_deposit_i64(cpu_fpr[a->fd], cpu_fpr[a->fk], cpu_fpr[a->fj], 0, 63);
|
||||
return true;
|
||||
}
|
||||
|
||||
static bool trans_fabs_s(DisasContext *ctx, arg_fabs_s *a)
|
||||
{
|
||||
CHECK_FPE;
|
||||
|
||||
tcg_gen_andi_i64(cpu_fpr[a->fd], cpu_fpr[a->fj], MAKE_64BIT_MASK(0, 31));
|
||||
gen_nanbox_s(cpu_fpr[a->fd], cpu_fpr[a->fd]);
|
||||
return true;
|
||||
@ -48,12 +72,16 @@ static bool trans_fabs_s(DisasContext *ctx, arg_fabs_s *a)
|
||||
|
||||
static bool trans_fabs_d(DisasContext *ctx, arg_fabs_d *a)
|
||||
{
|
||||
CHECK_FPE;
|
||||
|
||||
tcg_gen_andi_i64(cpu_fpr[a->fd], cpu_fpr[a->fj], MAKE_64BIT_MASK(0, 63));
|
||||
return true;
|
||||
}
|
||||
|
||||
static bool trans_fneg_s(DisasContext *ctx, arg_fneg_s *a)
|
||||
{
|
||||
CHECK_FPE;
|
||||
|
||||
tcg_gen_xori_i64(cpu_fpr[a->fd], cpu_fpr[a->fj], 0x80000000);
|
||||
gen_nanbox_s(cpu_fpr[a->fd], cpu_fpr[a->fd]);
|
||||
return true;
|
||||
@ -61,6 +89,8 @@ static bool trans_fneg_s(DisasContext *ctx, arg_fneg_s *a)
|
||||
|
||||
static bool trans_fneg_d(DisasContext *ctx, arg_fneg_d *a)
|
||||
{
|
||||
CHECK_FPE;
|
||||
|
||||
tcg_gen_xori_i64(cpu_fpr[a->fd], cpu_fpr[a->fj], 0x8000000000000000LL);
|
||||
return true;
|
||||
}
|
||||
|
@ -25,10 +25,13 @@ static uint32_t get_fcmp_flags(int cond)
|
||||
|
||||
static bool trans_fcmp_cond_s(DisasContext *ctx, arg_fcmp_cond_s *a)
|
||||
{
|
||||
TCGv var = tcg_temp_new();
|
||||
TCGv var;
|
||||
uint32_t flags;
|
||||
void (*fn)(TCGv, TCGv_env, TCGv, TCGv, TCGv_i32);
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
var = tcg_temp_new();
|
||||
fn = (a->fcond & 1 ? gen_helper_fcmp_s_s : gen_helper_fcmp_c_s);
|
||||
flags = get_fcmp_flags(a->fcond >> 1);
|
||||
|
||||
@ -41,9 +44,13 @@ static bool trans_fcmp_cond_s(DisasContext *ctx, arg_fcmp_cond_s *a)
|
||||
|
||||
static bool trans_fcmp_cond_d(DisasContext *ctx, arg_fcmp_cond_d *a)
|
||||
{
|
||||
TCGv var = tcg_temp_new();
|
||||
TCGv var;
|
||||
uint32_t flags;
|
||||
void (*fn)(TCGv, TCGv_env, TCGv, TCGv, TCGv_i32);
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
var = tcg_temp_new();
|
||||
fn = (a->fcond & 1 ? gen_helper_fcmp_s_d : gen_helper_fcmp_c_d);
|
||||
flags = get_fcmp_flags(a->fcond >> 1);
|
||||
|
||||
|
@ -15,6 +15,8 @@ static bool gen_fload_i(DisasContext *ctx, arg_fr_i *a, MemOp mop)
|
||||
TCGv addr = gpr_src(ctx, a->rj, EXT_NONE);
|
||||
TCGv temp = NULL;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
if (a->imm) {
|
||||
temp = tcg_temp_new();
|
||||
tcg_gen_addi_tl(temp, addr, a->imm);
|
||||
@ -36,6 +38,8 @@ static bool gen_fstore_i(DisasContext *ctx, arg_fr_i *a, MemOp mop)
|
||||
TCGv addr = gpr_src(ctx, a->rj, EXT_NONE);
|
||||
TCGv temp = NULL;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
if (a->imm) {
|
||||
temp = tcg_temp_new();
|
||||
tcg_gen_addi_tl(temp, addr, a->imm);
|
||||
@ -54,8 +58,11 @@ static bool gen_floadx(DisasContext *ctx, arg_frr *a, MemOp mop)
|
||||
{
|
||||
TCGv src1 = gpr_src(ctx, a->rj, EXT_NONE);
|
||||
TCGv src2 = gpr_src(ctx, a->rk, EXT_NONE);
|
||||
TCGv addr = tcg_temp_new();
|
||||
TCGv addr;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
addr = tcg_temp_new();
|
||||
tcg_gen_add_tl(addr, src1, src2);
|
||||
tcg_gen_qemu_ld_tl(cpu_fpr[a->fd], addr, ctx->mem_idx, mop);
|
||||
maybe_nanbox_load(cpu_fpr[a->fd], mop);
|
||||
@ -68,8 +75,11 @@ static bool gen_fstorex(DisasContext *ctx, arg_frr *a, MemOp mop)
|
||||
{
|
||||
TCGv src1 = gpr_src(ctx, a->rj, EXT_NONE);
|
||||
TCGv src2 = gpr_src(ctx, a->rk, EXT_NONE);
|
||||
TCGv addr = tcg_temp_new();
|
||||
TCGv addr;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
addr = tcg_temp_new();
|
||||
tcg_gen_add_tl(addr, src1, src2);
|
||||
tcg_gen_qemu_st_tl(cpu_fpr[a->fd], addr, ctx->mem_idx, mop);
|
||||
tcg_temp_free(addr);
|
||||
@ -81,8 +91,11 @@ static bool gen_fload_gt(DisasContext *ctx, arg_frr *a, MemOp mop)
|
||||
{
|
||||
TCGv src1 = gpr_src(ctx, a->rj, EXT_NONE);
|
||||
TCGv src2 = gpr_src(ctx, a->rk, EXT_NONE);
|
||||
TCGv addr = tcg_temp_new();
|
||||
TCGv addr;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
addr = tcg_temp_new();
|
||||
gen_helper_asrtgt_d(cpu_env, src1, src2);
|
||||
tcg_gen_add_tl(addr, src1, src2);
|
||||
tcg_gen_qemu_ld_tl(cpu_fpr[a->fd], addr, ctx->mem_idx, mop);
|
||||
@ -96,8 +109,11 @@ static bool gen_fstore_gt(DisasContext *ctx, arg_frr *a, MemOp mop)
|
||||
{
|
||||
TCGv src1 = gpr_src(ctx, a->rj, EXT_NONE);
|
||||
TCGv src2 = gpr_src(ctx, a->rk, EXT_NONE);
|
||||
TCGv addr = tcg_temp_new();
|
||||
TCGv addr;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
addr = tcg_temp_new();
|
||||
gen_helper_asrtgt_d(cpu_env, src1, src2);
|
||||
tcg_gen_add_tl(addr, src1, src2);
|
||||
tcg_gen_qemu_st_tl(cpu_fpr[a->fd], addr, ctx->mem_idx, mop);
|
||||
@ -110,8 +126,11 @@ static bool gen_fload_le(DisasContext *ctx, arg_frr *a, MemOp mop)
|
||||
{
|
||||
TCGv src1 = gpr_src(ctx, a->rj, EXT_NONE);
|
||||
TCGv src2 = gpr_src(ctx, a->rk, EXT_NONE);
|
||||
TCGv addr = tcg_temp_new();
|
||||
TCGv addr;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
addr = tcg_temp_new();
|
||||
gen_helper_asrtle_d(cpu_env, src1, src2);
|
||||
tcg_gen_add_tl(addr, src1, src2);
|
||||
tcg_gen_qemu_ld_tl(cpu_fpr[a->fd], addr, ctx->mem_idx, mop);
|
||||
@ -125,8 +144,11 @@ static bool gen_fstore_le(DisasContext *ctx, arg_frr *a, MemOp mop)
|
||||
{
|
||||
TCGv src1 = gpr_src(ctx, a->rj, EXT_NONE);
|
||||
TCGv src2 = gpr_src(ctx, a->rk, EXT_NONE);
|
||||
TCGv addr = tcg_temp_new();
|
||||
TCGv addr;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
addr = tcg_temp_new();
|
||||
gen_helper_asrtle_d(cpu_env, src1, src2);
|
||||
tcg_gen_add_tl(addr, src1, src2);
|
||||
tcg_gen_qemu_st_tl(cpu_fpr[a->fd], addr, ctx->mem_idx, mop);
|
||||
|
@ -10,8 +10,11 @@ static const uint32_t fcsr_mask[4] = {
|
||||
static bool trans_fsel(DisasContext *ctx, arg_fsel *a)
|
||||
{
|
||||
TCGv zero = tcg_constant_tl(0);
|
||||
TCGv cond = tcg_temp_new();
|
||||
TCGv cond;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
cond = tcg_temp_new();
|
||||
tcg_gen_ld8u_tl(cond, cpu_env, offsetof(CPULoongArchState, cf[a->ca]));
|
||||
tcg_gen_movcond_tl(TCG_COND_EQ, cpu_fpr[a->fd], cond, zero,
|
||||
cpu_fpr[a->fj], cpu_fpr[a->fk]);
|
||||
@ -26,6 +29,8 @@ static bool gen_f2f(DisasContext *ctx, arg_ff *a,
|
||||
TCGv dest = cpu_fpr[a->fd];
|
||||
TCGv src = cpu_fpr[a->fj];
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
func(dest, src);
|
||||
if (nanbox) {
|
||||
gen_nanbox_s(cpu_fpr[a->fd], cpu_fpr[a->fd]);
|
||||
@ -39,6 +44,8 @@ static bool gen_r2f(DisasContext *ctx, arg_fr *a,
|
||||
{
|
||||
TCGv src = gpr_src(ctx, a->rj, EXT_NONE);
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
func(cpu_fpr[a->fd], src);
|
||||
return true;
|
||||
}
|
||||
@ -48,6 +55,8 @@ static bool gen_f2r(DisasContext *ctx, arg_rf *a,
|
||||
{
|
||||
TCGv dest = gpr_dst(ctx, a->rd, EXT_NONE);
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
func(dest, cpu_fpr[a->fj]);
|
||||
gen_set_gpr(a->rd, dest, EXT_NONE);
|
||||
|
||||
@ -59,6 +68,8 @@ static bool trans_movgr2fcsr(DisasContext *ctx, arg_movgr2fcsr *a)
|
||||
uint32_t mask = fcsr_mask[a->fcsrd];
|
||||
TCGv Rj = gpr_src(ctx, a->rj, EXT_NONE);
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
if (mask == UINT32_MAX) {
|
||||
tcg_gen_st32_i64(Rj, cpu_env, offsetof(CPULoongArchState, fcsr0));
|
||||
} else {
|
||||
@ -90,6 +101,8 @@ static bool trans_movfcsr2gr(DisasContext *ctx, arg_movfcsr2gr *a)
|
||||
{
|
||||
TCGv dest = gpr_dst(ctx, a->rd, EXT_NONE);
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
tcg_gen_ld32u_i64(dest, cpu_env, offsetof(CPULoongArchState, fcsr0));
|
||||
tcg_gen_andi_i64(dest, dest, fcsr_mask[a->fcsrs]);
|
||||
gen_set_gpr(a->rd, dest, EXT_NONE);
|
||||
@ -114,8 +127,11 @@ static void gen_movfrh2gr_s(TCGv dest, TCGv src)
|
||||
|
||||
static bool trans_movfr2cf(DisasContext *ctx, arg_movfr2cf *a)
|
||||
{
|
||||
TCGv t0 = tcg_temp_new();
|
||||
TCGv t0;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
t0 = tcg_temp_new();
|
||||
tcg_gen_andi_tl(t0, cpu_fpr[a->fj], 0x1);
|
||||
tcg_gen_st8_tl(t0, cpu_env, offsetof(CPULoongArchState, cf[a->cd & 0x7]));
|
||||
tcg_temp_free(t0);
|
||||
@ -125,6 +141,8 @@ static bool trans_movfr2cf(DisasContext *ctx, arg_movfr2cf *a)
|
||||
|
||||
static bool trans_movcf2fr(DisasContext *ctx, arg_movcf2fr *a)
|
||||
{
|
||||
CHECK_FPE;
|
||||
|
||||
tcg_gen_ld8u_tl(cpu_fpr[a->fd], cpu_env,
|
||||
offsetof(CPULoongArchState, cf[a->cj & 0x7]));
|
||||
return true;
|
||||
@ -132,8 +150,11 @@ static bool trans_movcf2fr(DisasContext *ctx, arg_movcf2fr *a)
|
||||
|
||||
static bool trans_movgr2cf(DisasContext *ctx, arg_movgr2cf *a)
|
||||
{
|
||||
TCGv t0 = tcg_temp_new();
|
||||
TCGv t0;
|
||||
|
||||
CHECK_FPE;
|
||||
|
||||
t0 = tcg_temp_new();
|
||||
tcg_gen_andi_tl(t0, gpr_src(ctx, a->rj, EXT_NONE), 0x1);
|
||||
tcg_gen_st8_tl(t0, cpu_env, offsetof(CPULoongArchState, cf[a->cd & 0x7]));
|
||||
tcg_temp_free(t0);
|
||||
@ -143,6 +164,8 @@ static bool trans_movgr2cf(DisasContext *ctx, arg_movgr2cf *a)
|
||||
|
||||
static bool trans_movcf2gr(DisasContext *ctx, arg_movcf2gr *a)
|
||||
{
|
||||
CHECK_FPE;
|
||||
|
||||
tcg_gen_ld8u_tl(gpr_dst(ctx, a->rd, EXT_NONE), cpu_env,
|
||||
offsetof(CPULoongArchState, cf[a->cj & 0x7]));
|
||||
return true;
|
||||
|
Loading…
Reference in New Issue
Block a user