mirror of https://github.com/proxmox/mirror_qemu
target/riscv: Move gen_* helpers for RVM
Move these helpers near their use by the trans_* functions within insn_trans/trans_rvm.c.inc. Reviewed-by: Bin Meng <bmeng.cn@gmail.com> Reviewed-by: Philippe Mathieu-Daudé <f4bug@amsat.org> Reviewed-by: Alistair Francis <alistair.francis@wdc.com> Signed-off-by: Richard Henderson <richard.henderson@linaro.org> Message-id: 20210823195529.560295-10-richard.henderson@linaro.org Signed-off-by: Alistair Francis <alistair.francis@wdc.com>master
parent
8a1b4917c5
commit
b66a0585f0
|
@ -39,6 +39,21 @@ static bool trans_mulh(DisasContext *ctx, arg_mulh *a)
|
||||||
return gen_arith(ctx, a, EXT_NONE, gen_mulh);
|
return gen_arith(ctx, a, EXT_NONE, gen_mulh);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static void gen_mulhsu(TCGv ret, TCGv arg1, TCGv arg2)
|
||||||
|
{
|
||||||
|
TCGv rl = tcg_temp_new();
|
||||||
|
TCGv rh = tcg_temp_new();
|
||||||
|
|
||||||
|
tcg_gen_mulu2_tl(rl, rh, arg1, arg2);
|
||||||
|
/* fix up for one negative */
|
||||||
|
tcg_gen_sari_tl(rl, arg1, TARGET_LONG_BITS - 1);
|
||||||
|
tcg_gen_and_tl(rl, rl, arg2);
|
||||||
|
tcg_gen_sub_tl(ret, rh, rl);
|
||||||
|
|
||||||
|
tcg_temp_free(rl);
|
||||||
|
tcg_temp_free(rh);
|
||||||
|
}
|
||||||
|
|
||||||
static bool trans_mulhsu(DisasContext *ctx, arg_mulhsu *a)
|
static bool trans_mulhsu(DisasContext *ctx, arg_mulhsu *a)
|
||||||
{
|
{
|
||||||
REQUIRE_EXT(ctx, RVM);
|
REQUIRE_EXT(ctx, RVM);
|
||||||
|
@ -59,24 +74,136 @@ static bool trans_mulhu(DisasContext *ctx, arg_mulhu *a)
|
||||||
return gen_arith(ctx, a, EXT_NONE, gen_mulhu);
|
return gen_arith(ctx, a, EXT_NONE, gen_mulhu);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static void gen_div(TCGv ret, TCGv source1, TCGv source2)
|
||||||
|
{
|
||||||
|
TCGv temp1, temp2, zero, one, mone, min;
|
||||||
|
|
||||||
|
temp1 = tcg_temp_new();
|
||||||
|
temp2 = tcg_temp_new();
|
||||||
|
zero = tcg_constant_tl(0);
|
||||||
|
one = tcg_constant_tl(1);
|
||||||
|
mone = tcg_constant_tl(-1);
|
||||||
|
min = tcg_constant_tl(1ull << (TARGET_LONG_BITS - 1));
|
||||||
|
|
||||||
|
/*
|
||||||
|
* If overflow, set temp2 to 1, else source2.
|
||||||
|
* This produces the required result of min.
|
||||||
|
*/
|
||||||
|
tcg_gen_setcond_tl(TCG_COND_EQ, temp1, source1, min);
|
||||||
|
tcg_gen_setcond_tl(TCG_COND_EQ, temp2, source2, mone);
|
||||||
|
tcg_gen_and_tl(temp1, temp1, temp2);
|
||||||
|
tcg_gen_movcond_tl(TCG_COND_NE, temp2, temp1, zero, one, source2);
|
||||||
|
|
||||||
|
/*
|
||||||
|
* If div by zero, set temp1 to -1 and temp2 to 1 to
|
||||||
|
* produce the required result of -1.
|
||||||
|
*/
|
||||||
|
tcg_gen_movcond_tl(TCG_COND_EQ, temp1, source2, zero, mone, source1);
|
||||||
|
tcg_gen_movcond_tl(TCG_COND_EQ, temp2, source2, zero, one, temp2);
|
||||||
|
|
||||||
|
tcg_gen_div_tl(ret, temp1, temp2);
|
||||||
|
|
||||||
|
tcg_temp_free(temp1);
|
||||||
|
tcg_temp_free(temp2);
|
||||||
|
}
|
||||||
|
|
||||||
static bool trans_div(DisasContext *ctx, arg_div *a)
|
static bool trans_div(DisasContext *ctx, arg_div *a)
|
||||||
{
|
{
|
||||||
REQUIRE_EXT(ctx, RVM);
|
REQUIRE_EXT(ctx, RVM);
|
||||||
return gen_arith(ctx, a, EXT_SIGN, gen_div);
|
return gen_arith(ctx, a, EXT_SIGN, gen_div);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static void gen_divu(TCGv ret, TCGv source1, TCGv source2)
|
||||||
|
{
|
||||||
|
TCGv temp1, temp2, zero, one, max;
|
||||||
|
|
||||||
|
temp1 = tcg_temp_new();
|
||||||
|
temp2 = tcg_temp_new();
|
||||||
|
zero = tcg_constant_tl(0);
|
||||||
|
one = tcg_constant_tl(1);
|
||||||
|
max = tcg_constant_tl(~0);
|
||||||
|
|
||||||
|
/*
|
||||||
|
* If div by zero, set temp1 to max and temp2 to 1 to
|
||||||
|
* produce the required result of max.
|
||||||
|
*/
|
||||||
|
tcg_gen_movcond_tl(TCG_COND_EQ, temp1, source2, zero, max, source1);
|
||||||
|
tcg_gen_movcond_tl(TCG_COND_EQ, temp2, source2, zero, one, source2);
|
||||||
|
tcg_gen_divu_tl(ret, temp1, temp2);
|
||||||
|
|
||||||
|
tcg_temp_free(temp1);
|
||||||
|
tcg_temp_free(temp2);
|
||||||
|
}
|
||||||
|
|
||||||
static bool trans_divu(DisasContext *ctx, arg_divu *a)
|
static bool trans_divu(DisasContext *ctx, arg_divu *a)
|
||||||
{
|
{
|
||||||
REQUIRE_EXT(ctx, RVM);
|
REQUIRE_EXT(ctx, RVM);
|
||||||
return gen_arith(ctx, a, EXT_ZERO, gen_divu);
|
return gen_arith(ctx, a, EXT_ZERO, gen_divu);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static void gen_rem(TCGv ret, TCGv source1, TCGv source2)
|
||||||
|
{
|
||||||
|
TCGv temp1, temp2, zero, one, mone, min;
|
||||||
|
|
||||||
|
temp1 = tcg_temp_new();
|
||||||
|
temp2 = tcg_temp_new();
|
||||||
|
zero = tcg_constant_tl(0);
|
||||||
|
one = tcg_constant_tl(1);
|
||||||
|
mone = tcg_constant_tl(-1);
|
||||||
|
min = tcg_constant_tl(1ull << (TARGET_LONG_BITS - 1));
|
||||||
|
|
||||||
|
/*
|
||||||
|
* If overflow, set temp1 to 0, else source1.
|
||||||
|
* This avoids a possible host trap, and produces the required result of 0.
|
||||||
|
*/
|
||||||
|
tcg_gen_setcond_tl(TCG_COND_EQ, temp1, source1, min);
|
||||||
|
tcg_gen_setcond_tl(TCG_COND_EQ, temp2, source2, mone);
|
||||||
|
tcg_gen_and_tl(temp1, temp1, temp2);
|
||||||
|
tcg_gen_movcond_tl(TCG_COND_NE, temp1, temp1, zero, zero, source1);
|
||||||
|
|
||||||
|
/*
|
||||||
|
* If div by zero, set temp2 to 1, else source2.
|
||||||
|
* This avoids a possible host trap, but produces an incorrect result.
|
||||||
|
*/
|
||||||
|
tcg_gen_movcond_tl(TCG_COND_EQ, temp2, source2, zero, one, source2);
|
||||||
|
|
||||||
|
tcg_gen_rem_tl(temp1, temp1, temp2);
|
||||||
|
|
||||||
|
/* If div by zero, the required result is the original dividend. */
|
||||||
|
tcg_gen_movcond_tl(TCG_COND_EQ, ret, source2, zero, source1, temp1);
|
||||||
|
|
||||||
|
tcg_temp_free(temp1);
|
||||||
|
tcg_temp_free(temp2);
|
||||||
|
}
|
||||||
|
|
||||||
static bool trans_rem(DisasContext *ctx, arg_rem *a)
|
static bool trans_rem(DisasContext *ctx, arg_rem *a)
|
||||||
{
|
{
|
||||||
REQUIRE_EXT(ctx, RVM);
|
REQUIRE_EXT(ctx, RVM);
|
||||||
return gen_arith(ctx, a, EXT_SIGN, gen_rem);
|
return gen_arith(ctx, a, EXT_SIGN, gen_rem);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static void gen_remu(TCGv ret, TCGv source1, TCGv source2)
|
||||||
|
{
|
||||||
|
TCGv temp, zero, one;
|
||||||
|
|
||||||
|
temp = tcg_temp_new();
|
||||||
|
zero = tcg_constant_tl(0);
|
||||||
|
one = tcg_constant_tl(1);
|
||||||
|
|
||||||
|
/*
|
||||||
|
* If div by zero, set temp to 1, else source2.
|
||||||
|
* This avoids a possible host trap, but produces an incorrect result.
|
||||||
|
*/
|
||||||
|
tcg_gen_movcond_tl(TCG_COND_EQ, temp, source2, zero, one, source2);
|
||||||
|
|
||||||
|
tcg_gen_remu_tl(temp, source1, temp);
|
||||||
|
|
||||||
|
/* If div by zero, the required result is the original dividend. */
|
||||||
|
tcg_gen_movcond_tl(TCG_COND_EQ, ret, source2, zero, source1, temp);
|
||||||
|
|
||||||
|
tcg_temp_free(temp);
|
||||||
|
}
|
||||||
|
|
||||||
static bool trans_remu(DisasContext *ctx, arg_remu *a)
|
static bool trans_remu(DisasContext *ctx, arg_remu *a)
|
||||||
{
|
{
|
||||||
REQUIRE_EXT(ctx, RVM);
|
REQUIRE_EXT(ctx, RVM);
|
||||||
|
|
|
@ -249,133 +249,6 @@ static void gen_set_gpr(DisasContext *ctx, int reg_num, TCGv t)
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
static void gen_mulhsu(TCGv ret, TCGv arg1, TCGv arg2)
|
|
||||||
{
|
|
||||||
TCGv rl = tcg_temp_new();
|
|
||||||
TCGv rh = tcg_temp_new();
|
|
||||||
|
|
||||||
tcg_gen_mulu2_tl(rl, rh, arg1, arg2);
|
|
||||||
/* fix up for one negative */
|
|
||||||
tcg_gen_sari_tl(rl, arg1, TARGET_LONG_BITS - 1);
|
|
||||||
tcg_gen_and_tl(rl, rl, arg2);
|
|
||||||
tcg_gen_sub_tl(ret, rh, rl);
|
|
||||||
|
|
||||||
tcg_temp_free(rl);
|
|
||||||
tcg_temp_free(rh);
|
|
||||||
}
|
|
||||||
|
|
||||||
static void gen_div(TCGv ret, TCGv source1, TCGv source2)
|
|
||||||
{
|
|
||||||
TCGv temp1, temp2, zero, one, mone, min;
|
|
||||||
|
|
||||||
temp1 = tcg_temp_new();
|
|
||||||
temp2 = tcg_temp_new();
|
|
||||||
zero = tcg_constant_tl(0);
|
|
||||||
one = tcg_constant_tl(1);
|
|
||||||
mone = tcg_constant_tl(-1);
|
|
||||||
min = tcg_constant_tl(1ull << (TARGET_LONG_BITS - 1));
|
|
||||||
|
|
||||||
/*
|
|
||||||
* If overflow, set temp2 to 1, else source2.
|
|
||||||
* This produces the required result of min.
|
|
||||||
*/
|
|
||||||
tcg_gen_setcond_tl(TCG_COND_EQ, temp1, source1, min);
|
|
||||||
tcg_gen_setcond_tl(TCG_COND_EQ, temp2, source2, mone);
|
|
||||||
tcg_gen_and_tl(temp1, temp1, temp2);
|
|
||||||
tcg_gen_movcond_tl(TCG_COND_NE, temp2, temp1, zero, one, source2);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* If div by zero, set temp1 to -1 and temp2 to 1 to
|
|
||||||
* produce the required result of -1.
|
|
||||||
*/
|
|
||||||
tcg_gen_movcond_tl(TCG_COND_EQ, temp1, source2, zero, mone, source1);
|
|
||||||
tcg_gen_movcond_tl(TCG_COND_EQ, temp2, source2, zero, one, temp2);
|
|
||||||
|
|
||||||
tcg_gen_div_tl(ret, temp1, temp2);
|
|
||||||
|
|
||||||
tcg_temp_free(temp1);
|
|
||||||
tcg_temp_free(temp2);
|
|
||||||
}
|
|
||||||
|
|
||||||
static void gen_divu(TCGv ret, TCGv source1, TCGv source2)
|
|
||||||
{
|
|
||||||
TCGv temp1, temp2, zero, one, max;
|
|
||||||
|
|
||||||
temp1 = tcg_temp_new();
|
|
||||||
temp2 = tcg_temp_new();
|
|
||||||
zero = tcg_constant_tl(0);
|
|
||||||
one = tcg_constant_tl(1);
|
|
||||||
max = tcg_constant_tl(~0);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* If div by zero, set temp1 to max and temp2 to 1 to
|
|
||||||
* produce the required result of max.
|
|
||||||
*/
|
|
||||||
tcg_gen_movcond_tl(TCG_COND_EQ, temp1, source2, zero, max, source1);
|
|
||||||
tcg_gen_movcond_tl(TCG_COND_EQ, temp2, source2, zero, one, source2);
|
|
||||||
tcg_gen_divu_tl(ret, temp1, temp2);
|
|
||||||
|
|
||||||
tcg_temp_free(temp1);
|
|
||||||
tcg_temp_free(temp2);
|
|
||||||
}
|
|
||||||
|
|
||||||
static void gen_rem(TCGv ret, TCGv source1, TCGv source2)
|
|
||||||
{
|
|
||||||
TCGv temp1, temp2, zero, one, mone, min;
|
|
||||||
|
|
||||||
temp1 = tcg_temp_new();
|
|
||||||
temp2 = tcg_temp_new();
|
|
||||||
zero = tcg_constant_tl(0);
|
|
||||||
one = tcg_constant_tl(1);
|
|
||||||
mone = tcg_constant_tl(-1);
|
|
||||||
min = tcg_constant_tl(1ull << (TARGET_LONG_BITS - 1));
|
|
||||||
|
|
||||||
/*
|
|
||||||
* If overflow, set temp1 to 0, else source1.
|
|
||||||
* This avoids a possible host trap, and produces the required result of 0.
|
|
||||||
*/
|
|
||||||
tcg_gen_setcond_tl(TCG_COND_EQ, temp1, source1, min);
|
|
||||||
tcg_gen_setcond_tl(TCG_COND_EQ, temp2, source2, mone);
|
|
||||||
tcg_gen_and_tl(temp1, temp1, temp2);
|
|
||||||
tcg_gen_movcond_tl(TCG_COND_NE, temp1, temp1, zero, zero, source1);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* If div by zero, set temp2 to 1, else source2.
|
|
||||||
* This avoids a possible host trap, but produces an incorrect result.
|
|
||||||
*/
|
|
||||||
tcg_gen_movcond_tl(TCG_COND_EQ, temp2, source2, zero, one, source2);
|
|
||||||
|
|
||||||
tcg_gen_rem_tl(temp1, temp1, temp2);
|
|
||||||
|
|
||||||
/* If div by zero, the required result is the original dividend. */
|
|
||||||
tcg_gen_movcond_tl(TCG_COND_EQ, ret, source2, zero, source1, temp1);
|
|
||||||
|
|
||||||
tcg_temp_free(temp1);
|
|
||||||
tcg_temp_free(temp2);
|
|
||||||
}
|
|
||||||
|
|
||||||
static void gen_remu(TCGv ret, TCGv source1, TCGv source2)
|
|
||||||
{
|
|
||||||
TCGv temp, zero, one;
|
|
||||||
|
|
||||||
temp = tcg_temp_new();
|
|
||||||
zero = tcg_constant_tl(0);
|
|
||||||
one = tcg_constant_tl(1);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* If div by zero, set temp to 1, else source2.
|
|
||||||
* This avoids a possible host trap, but produces an incorrect result.
|
|
||||||
*/
|
|
||||||
tcg_gen_movcond_tl(TCG_COND_EQ, temp, source2, zero, one, source2);
|
|
||||||
|
|
||||||
tcg_gen_remu_tl(temp, source1, temp);
|
|
||||||
|
|
||||||
/* If div by zero, the required result is the original dividend. */
|
|
||||||
tcg_gen_movcond_tl(TCG_COND_EQ, ret, source2, zero, source1, temp);
|
|
||||||
|
|
||||||
tcg_temp_free(temp);
|
|
||||||
}
|
|
||||||
|
|
||||||
static void gen_jal(DisasContext *ctx, int rd, target_ulong imm)
|
static void gen_jal(DisasContext *ctx, int rd, target_ulong imm)
|
||||||
{
|
{
|
||||||
target_ulong next_pc;
|
target_ulong next_pc;
|
||||||
|
|
Loading…
Reference in New Issue