mirror of https://github.com/xemu-project/xemu.git
target/arm: Inline scalar SUQADD and USQADD
This eliminates the last uses of these neon helpers. Incorporate the MO_64 expanders as an option to the vector expander. Reviewed-by: Peter Maydell <peter.maydell@linaro.org> Signed-off-by: Richard Henderson <richard.henderson@linaro.org> Message-id: 20240528203044.612851-6-richard.henderson@linaro.org Signed-off-by: Peter Maydell <peter.maydell@linaro.org>
This commit is contained in:
parent
8f6343ae18
commit
1217edace8
|
@ -274,14 +274,6 @@ DEF_HELPER_FLAGS_3(neon_qadd_u16, TCG_CALL_NO_RWG, i32, env, i32, i32)
|
|||
DEF_HELPER_FLAGS_3(neon_qadd_s16, TCG_CALL_NO_RWG, i32, env, i32, i32)
|
||||
DEF_HELPER_FLAGS_3(neon_qadd_u32, TCG_CALL_NO_RWG, i32, env, i32, i32)
|
||||
DEF_HELPER_FLAGS_3(neon_qadd_s32, TCG_CALL_NO_RWG, i32, env, i32, i32)
|
||||
DEF_HELPER_FLAGS_3(neon_uqadd_s8, TCG_CALL_NO_RWG, i32, env, i32, i32)
|
||||
DEF_HELPER_FLAGS_3(neon_uqadd_s16, TCG_CALL_NO_RWG, i32, env, i32, i32)
|
||||
DEF_HELPER_FLAGS_3(neon_uqadd_s32, TCG_CALL_NO_RWG, i32, env, i32, i32)
|
||||
DEF_HELPER_FLAGS_3(neon_uqadd_s64, TCG_CALL_NO_RWG, i64, env, i64, i64)
|
||||
DEF_HELPER_FLAGS_3(neon_sqadd_u8, TCG_CALL_NO_RWG, i32, env, i32, i32)
|
||||
DEF_HELPER_FLAGS_3(neon_sqadd_u16, TCG_CALL_NO_RWG, i32, env, i32, i32)
|
||||
DEF_HELPER_FLAGS_3(neon_sqadd_u32, TCG_CALL_NO_RWG, i32, env, i32, i32)
|
||||
DEF_HELPER_FLAGS_3(neon_sqadd_u64, TCG_CALL_NO_RWG, i64, env, i64, i64)
|
||||
DEF_HELPER_3(neon_qsub_u8, i32, env, i32, i32)
|
||||
DEF_HELPER_3(neon_qsub_s8, i32, env, i32, i32)
|
||||
DEF_HELPER_3(neon_qsub_u16, i32, env, i32, i32)
|
||||
|
|
|
@ -188,6 +188,38 @@ void gen_gvec_bcax(unsigned vece, uint32_t d, uint32_t n, uint32_t m,
|
|||
tcg_gen_gvec_4(d, n, m, a, oprsz, maxsz, &op);
|
||||
}
|
||||
|
||||
/*
|
||||
* Set @res to the correctly saturated result.
|
||||
* Set @qc non-zero if saturation occured.
|
||||
*/
|
||||
void gen_suqadd_bhs(TCGv_i64 res, TCGv_i64 qc,
|
||||
TCGv_i64 a, TCGv_i64 b, MemOp esz)
|
||||
{
|
||||
TCGv_i64 max = tcg_constant_i64((1ull << ((8 << esz) - 1)) - 1);
|
||||
TCGv_i64 t = tcg_temp_new_i64();
|
||||
|
||||
tcg_gen_add_i64(t, a, b);
|
||||
tcg_gen_smin_i64(res, t, max);
|
||||
tcg_gen_xor_i64(t, t, res);
|
||||
tcg_gen_or_i64(qc, qc, t);
|
||||
}
|
||||
|
||||
void gen_suqadd_d(TCGv_i64 res, TCGv_i64 qc, TCGv_i64 a, TCGv_i64 b)
|
||||
{
|
||||
TCGv_i64 max = tcg_constant_i64(INT64_MAX);
|
||||
TCGv_i64 t = tcg_temp_new_i64();
|
||||
|
||||
/* Maximum value that can be added to @a without overflow. */
|
||||
tcg_gen_sub_i64(t, max, a);
|
||||
|
||||
/* Constrain addend so that the next addition never overflows. */
|
||||
tcg_gen_umin_i64(t, t, b);
|
||||
tcg_gen_add_i64(res, a, t);
|
||||
|
||||
tcg_gen_xor_i64(t, t, b);
|
||||
tcg_gen_or_i64(qc, qc, t);
|
||||
}
|
||||
|
||||
static void gen_suqadd_vec(unsigned vece, TCGv_vec t, TCGv_vec qc,
|
||||
TCGv_vec a, TCGv_vec b)
|
||||
{
|
||||
|
@ -231,6 +263,7 @@ void gen_gvec_suqadd_qc(unsigned vece, uint32_t rd_ofs,
|
|||
.write_aofs = true,
|
||||
.vece = MO_32 },
|
||||
{ .fniv = gen_suqadd_vec,
|
||||
.fni8 = gen_suqadd_d,
|
||||
.fno = gen_helper_gvec_suqadd_d,
|
||||
.opt_opc = vecop_list,
|
||||
.write_aofs = true,
|
||||
|
@ -242,6 +275,43 @@ void gen_gvec_suqadd_qc(unsigned vece, uint32_t rd_ofs,
|
|||
rn_ofs, rm_ofs, opr_sz, max_sz, &ops[vece]);
|
||||
}
|
||||
|
||||
void gen_usqadd_bhs(TCGv_i64 res, TCGv_i64 qc,
|
||||
TCGv_i64 a, TCGv_i64 b, MemOp esz)
|
||||
{
|
||||
TCGv_i64 max = tcg_constant_i64(MAKE_64BIT_MASK(0, 8 << esz));
|
||||
TCGv_i64 zero = tcg_constant_i64(0);
|
||||
TCGv_i64 tmp = tcg_temp_new_i64();
|
||||
|
||||
tcg_gen_add_i64(tmp, a, b);
|
||||
tcg_gen_smin_i64(res, tmp, max);
|
||||
tcg_gen_smax_i64(res, res, zero);
|
||||
tcg_gen_xor_i64(tmp, tmp, res);
|
||||
tcg_gen_or_i64(qc, qc, tmp);
|
||||
}
|
||||
|
||||
void gen_usqadd_d(TCGv_i64 res, TCGv_i64 qc, TCGv_i64 a, TCGv_i64 b)
|
||||
{
|
||||
TCGv_i64 tmp = tcg_temp_new_i64();
|
||||
TCGv_i64 tneg = tcg_temp_new_i64();
|
||||
TCGv_i64 tpos = tcg_temp_new_i64();
|
||||
TCGv_i64 max = tcg_constant_i64(UINT64_MAX);
|
||||
TCGv_i64 zero = tcg_constant_i64(0);
|
||||
|
||||
tcg_gen_add_i64(tmp, a, b);
|
||||
|
||||
/* If @b is positive, saturate if (a + b) < a, aka unsigned overflow. */
|
||||
tcg_gen_movcond_i64(TCG_COND_LTU, tpos, tmp, a, max, tmp);
|
||||
|
||||
/* If @b is negative, saturate if a < -b, ie subtraction is negative. */
|
||||
tcg_gen_neg_i64(tneg, b);
|
||||
tcg_gen_movcond_i64(TCG_COND_LTU, tneg, a, tneg, zero, tmp);
|
||||
|
||||
/* Select correct result from sign of @b. */
|
||||
tcg_gen_movcond_i64(TCG_COND_LT, res, b, zero, tneg, tpos);
|
||||
tcg_gen_xor_i64(tmp, tmp, res);
|
||||
tcg_gen_or_i64(qc, qc, tmp);
|
||||
}
|
||||
|
||||
static void gen_usqadd_vec(unsigned vece, TCGv_vec t, TCGv_vec qc,
|
||||
TCGv_vec a, TCGv_vec b)
|
||||
{
|
||||
|
@ -288,6 +358,7 @@ void gen_gvec_usqadd_qc(unsigned vece, uint32_t rd_ofs,
|
|||
.write_aofs = true,
|
||||
.vece = MO_32 },
|
||||
{ .fniv = gen_usqadd_vec,
|
||||
.fni8 = gen_usqadd_d,
|
||||
.fno = gen_helper_gvec_usqadd_d,
|
||||
.opt_opc = vecop_list,
|
||||
.write_aofs = true,
|
||||
|
|
|
@ -236,171 +236,6 @@ uint64_t HELPER(neon_qadd_s64)(CPUARMState *env, uint64_t src1, uint64_t src2)
|
|||
return res;
|
||||
}
|
||||
|
||||
/* Unsigned saturating accumulate of signed value
|
||||
*
|
||||
* Op1/Rn is treated as signed
|
||||
* Op2/Rd is treated as unsigned
|
||||
*
|
||||
* Explicit casting is used to ensure the correct sign extension of
|
||||
* inputs. The result is treated as a unsigned value and saturated as such.
|
||||
*
|
||||
* We use a macro for the 8/16 bit cases which expects signed integers of va,
|
||||
* vb, and vr for interim calculation and an unsigned 32 bit result value r.
|
||||
*/
|
||||
|
||||
#define USATACC(bits, shift) \
|
||||
do { \
|
||||
va = sextract32(a, shift, bits); \
|
||||
vb = extract32(b, shift, bits); \
|
||||
vr = va + vb; \
|
||||
if (vr > UINT##bits##_MAX) { \
|
||||
SET_QC(); \
|
||||
vr = UINT##bits##_MAX; \
|
||||
} else if (vr < 0) { \
|
||||
SET_QC(); \
|
||||
vr = 0; \
|
||||
} \
|
||||
r = deposit32(r, shift, bits, vr); \
|
||||
} while (0)
|
||||
|
||||
uint32_t HELPER(neon_uqadd_s8)(CPUARMState *env, uint32_t a, uint32_t b)
|
||||
{
|
||||
int16_t va, vb, vr;
|
||||
uint32_t r = 0;
|
||||
|
||||
USATACC(8, 0);
|
||||
USATACC(8, 8);
|
||||
USATACC(8, 16);
|
||||
USATACC(8, 24);
|
||||
return r;
|
||||
}
|
||||
|
||||
uint32_t HELPER(neon_uqadd_s16)(CPUARMState *env, uint32_t a, uint32_t b)
|
||||
{
|
||||
int32_t va, vb, vr;
|
||||
uint64_t r = 0;
|
||||
|
||||
USATACC(16, 0);
|
||||
USATACC(16, 16);
|
||||
return r;
|
||||
}
|
||||
|
||||
#undef USATACC
|
||||
|
||||
uint32_t HELPER(neon_uqadd_s32)(CPUARMState *env, uint32_t a, uint32_t b)
|
||||
{
|
||||
int64_t va = (int32_t)a;
|
||||
int64_t vb = (uint32_t)b;
|
||||
int64_t vr = va + vb;
|
||||
if (vr > UINT32_MAX) {
|
||||
SET_QC();
|
||||
vr = UINT32_MAX;
|
||||
} else if (vr < 0) {
|
||||
SET_QC();
|
||||
vr = 0;
|
||||
}
|
||||
return vr;
|
||||
}
|
||||
|
||||
uint64_t HELPER(neon_uqadd_s64)(CPUARMState *env, uint64_t a, uint64_t b)
|
||||
{
|
||||
uint64_t res;
|
||||
res = a + b;
|
||||
/* We only need to look at the pattern of SIGN bits to detect
|
||||
* +ve/-ve saturation
|
||||
*/
|
||||
if (~a & b & ~res & SIGNBIT64) {
|
||||
SET_QC();
|
||||
res = UINT64_MAX;
|
||||
} else if (a & ~b & res & SIGNBIT64) {
|
||||
SET_QC();
|
||||
res = 0;
|
||||
}
|
||||
return res;
|
||||
}
|
||||
|
||||
/* Signed saturating accumulate of unsigned value
|
||||
*
|
||||
* Op1/Rn is treated as unsigned
|
||||
* Op2/Rd is treated as signed
|
||||
*
|
||||
* The result is treated as a signed value and saturated as such
|
||||
*
|
||||
* We use a macro for the 8/16 bit cases which expects signed integers of va,
|
||||
* vb, and vr for interim calculation and an unsigned 32 bit result value r.
|
||||
*/
|
||||
|
||||
#define SSATACC(bits, shift) \
|
||||
do { \
|
||||
va = extract32(a, shift, bits); \
|
||||
vb = sextract32(b, shift, bits); \
|
||||
vr = va + vb; \
|
||||
if (vr > INT##bits##_MAX) { \
|
||||
SET_QC(); \
|
||||
vr = INT##bits##_MAX; \
|
||||
} else if (vr < INT##bits##_MIN) { \
|
||||
SET_QC(); \
|
||||
vr = INT##bits##_MIN; \
|
||||
} \
|
||||
r = deposit32(r, shift, bits, vr); \
|
||||
} while (0)
|
||||
|
||||
uint32_t HELPER(neon_sqadd_u8)(CPUARMState *env, uint32_t a, uint32_t b)
|
||||
{
|
||||
int16_t va, vb, vr;
|
||||
uint32_t r = 0;
|
||||
|
||||
SSATACC(8, 0);
|
||||
SSATACC(8, 8);
|
||||
SSATACC(8, 16);
|
||||
SSATACC(8, 24);
|
||||
return r;
|
||||
}
|
||||
|
||||
uint32_t HELPER(neon_sqadd_u16)(CPUARMState *env, uint32_t a, uint32_t b)
|
||||
{
|
||||
int32_t va, vb, vr;
|
||||
uint32_t r = 0;
|
||||
|
||||
SSATACC(16, 0);
|
||||
SSATACC(16, 16);
|
||||
|
||||
return r;
|
||||
}
|
||||
|
||||
#undef SSATACC
|
||||
|
||||
uint32_t HELPER(neon_sqadd_u32)(CPUARMState *env, uint32_t a, uint32_t b)
|
||||
{
|
||||
int64_t res;
|
||||
int64_t op1 = (uint32_t)a;
|
||||
int64_t op2 = (int32_t)b;
|
||||
res = op1 + op2;
|
||||
if (res > INT32_MAX) {
|
||||
SET_QC();
|
||||
res = INT32_MAX;
|
||||
} else if (res < INT32_MIN) {
|
||||
SET_QC();
|
||||
res = INT32_MIN;
|
||||
}
|
||||
return res;
|
||||
}
|
||||
|
||||
uint64_t HELPER(neon_sqadd_u64)(CPUARMState *env, uint64_t a, uint64_t b)
|
||||
{
|
||||
uint64_t res;
|
||||
res = a + b;
|
||||
/* We only need to look at the pattern of SIGN bits to detect an overflow */
|
||||
if (((a & res)
|
||||
| (~b & res)
|
||||
| (a & ~b)) & SIGNBIT64) {
|
||||
SET_QC();
|
||||
res = INT64_MAX;
|
||||
}
|
||||
return res;
|
||||
}
|
||||
|
||||
|
||||
#define NEON_USAT(dest, src1, src2, type) do { \
|
||||
uint32_t tmp = (uint32_t)src1 - (uint32_t)src2; \
|
||||
if (tmp != (type)tmp) { \
|
||||
|
|
|
@ -9985,67 +9985,42 @@ static void handle_2misc_narrow(DisasContext *s, bool scalar,
|
|||
static void handle_2misc_satacc(DisasContext *s, bool is_scalar, bool is_u,
|
||||
bool is_q, unsigned size, int rn, int rd)
|
||||
{
|
||||
TCGv_i64 res, qc, a, b;
|
||||
|
||||
if (!is_scalar) {
|
||||
gen_gvec_fn3(s, is_q, rd, rd, rn,
|
||||
is_u ? gen_gvec_usqadd_qc : gen_gvec_suqadd_qc, size);
|
||||
return;
|
||||
}
|
||||
|
||||
if (size == 3) {
|
||||
TCGv_i64 tcg_rn = tcg_temp_new_i64();
|
||||
TCGv_i64 tcg_rd = tcg_temp_new_i64();
|
||||
res = tcg_temp_new_i64();
|
||||
qc = tcg_temp_new_i64();
|
||||
a = tcg_temp_new_i64();
|
||||
b = tcg_temp_new_i64();
|
||||
|
||||
read_vec_element(s, tcg_rn, rn, 0, MO_64);
|
||||
read_vec_element(s, tcg_rd, rd, 0, MO_64);
|
||||
/* Read and extend scalar inputs to 64-bits. */
|
||||
read_vec_element(s, a, rd, 0, size | (is_u ? 0 : MO_SIGN));
|
||||
read_vec_element(s, b, rn, 0, size | (is_u ? MO_SIGN : 0));
|
||||
tcg_gen_ld_i64(qc, tcg_env, offsetof(CPUARMState, vfp.qc));
|
||||
|
||||
if (is_u) { /* USQADD */
|
||||
gen_helper_neon_uqadd_s64(tcg_rd, tcg_env, tcg_rn, tcg_rd);
|
||||
} else { /* SUQADD */
|
||||
gen_helper_neon_sqadd_u64(tcg_rd, tcg_env, tcg_rn, tcg_rd);
|
||||
if (size == MO_64) {
|
||||
if (is_u) {
|
||||
gen_usqadd_d(res, qc, a, b);
|
||||
} else {
|
||||
gen_suqadd_d(res, qc, a, b);
|
||||
}
|
||||
write_vec_element(s, tcg_rd, rd, 0, MO_64);
|
||||
clear_vec_high(s, false, rd);
|
||||
} else {
|
||||
TCGv_i32 tcg_rn = tcg_temp_new_i32();
|
||||
TCGv_i32 tcg_rd = tcg_temp_new_i32();
|
||||
|
||||
read_vec_element_i32(s, tcg_rn, rn, 0, size);
|
||||
read_vec_element_i32(s, tcg_rd, rd, 0, size);
|
||||
|
||||
if (is_u) { /* USQADD */
|
||||
switch (size) {
|
||||
case 0:
|
||||
gen_helper_neon_uqadd_s8(tcg_rd, tcg_env, tcg_rn, tcg_rd);
|
||||
break;
|
||||
case 1:
|
||||
gen_helper_neon_uqadd_s16(tcg_rd, tcg_env, tcg_rn, tcg_rd);
|
||||
break;
|
||||
case 2:
|
||||
gen_helper_neon_uqadd_s32(tcg_rd, tcg_env, tcg_rn, tcg_rd);
|
||||
break;
|
||||
default:
|
||||
g_assert_not_reached();
|
||||
}
|
||||
} else { /* SUQADD */
|
||||
switch (size) {
|
||||
case 0:
|
||||
gen_helper_neon_sqadd_u8(tcg_rd, tcg_env, tcg_rn, tcg_rd);
|
||||
break;
|
||||
case 1:
|
||||
gen_helper_neon_sqadd_u16(tcg_rd, tcg_env, tcg_rn, tcg_rd);
|
||||
break;
|
||||
case 2:
|
||||
gen_helper_neon_sqadd_u32(tcg_rd, tcg_env, tcg_rn, tcg_rd);
|
||||
break;
|
||||
default:
|
||||
g_assert_not_reached();
|
||||
}
|
||||
if (is_u) {
|
||||
gen_usqadd_bhs(res, qc, a, b, size);
|
||||
} else {
|
||||
gen_suqadd_bhs(res, qc, a, b, size);
|
||||
/* Truncate signed 64-bit result for writeback. */
|
||||
tcg_gen_ext_i64(res, res, size);
|
||||
}
|
||||
|
||||
write_vec_element(s, tcg_constant_i64(0), rd, 0, MO_64);
|
||||
write_vec_element_i32(s, tcg_rd, rd, 0, MO_32);
|
||||
clear_vec_high(s, false, rd);
|
||||
}
|
||||
|
||||
write_fp_dreg(s, rd, res);
|
||||
tcg_gen_st_i64(qc, tcg_env, offsetof(CPUARMState, vfp.qc));
|
||||
}
|
||||
|
||||
/* AdvSIMD scalar two reg misc
|
||||
|
|
|
@ -197,9 +197,17 @@ void gen_gvec_eor3(unsigned vece, uint32_t d, uint32_t n, uint32_t m,
|
|||
uint32_t a, uint32_t oprsz, uint32_t maxsz);
|
||||
void gen_gvec_bcax(unsigned vece, uint32_t d, uint32_t n, uint32_t m,
|
||||
uint32_t a, uint32_t oprsz, uint32_t maxsz);
|
||||
|
||||
void gen_suqadd_bhs(TCGv_i64 res, TCGv_i64 qc,
|
||||
TCGv_i64 a, TCGv_i64 b, MemOp esz);
|
||||
void gen_suqadd_d(TCGv_i64 res, TCGv_i64 qc, TCGv_i64 a, TCGv_i64 b);
|
||||
void gen_gvec_suqadd_qc(unsigned vece, uint32_t rd_ofs,
|
||||
uint32_t rn_ofs, uint32_t rm_ofs,
|
||||
uint32_t opr_sz, uint32_t max_sz);
|
||||
|
||||
void gen_usqadd_bhs(TCGv_i64 res, TCGv_i64 qc,
|
||||
TCGv_i64 a, TCGv_i64 b, MemOp esz);
|
||||
void gen_usqadd_d(TCGv_i64 res, TCGv_i64 qc, TCGv_i64 a, TCGv_i64 b);
|
||||
void gen_gvec_usqadd_qc(unsigned vece, uint32_t rd_ofs,
|
||||
uint32_t rn_ofs, uint32_t rm_ofs,
|
||||
uint32_t opr_sz, uint32_t max_sz);
|
||||
|
|
Loading…
Reference in New Issue