target-ppc: use the new fp functions
Signed-off-by: Aurelien Jarno <aurelien@aurel32.net> git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@6051 c046a42c-6fe2-441c-8c8c-71466251a162
This commit is contained in:
parent
c52ab6f585
commit
f23c346e69
|
@ -554,15 +554,6 @@ uint32_t helper_float64_to_float32(uint64_t arg)
|
||||||
return f.l;
|
return f.l;
|
||||||
}
|
}
|
||||||
|
|
||||||
static always_inline int fpisneg (float64 d)
|
|
||||||
{
|
|
||||||
CPU_DoubleU u;
|
|
||||||
|
|
||||||
u.d = d;
|
|
||||||
|
|
||||||
return u.ll >> 63 != 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
static always_inline int isden (float64 d)
|
static always_inline int isden (float64 d)
|
||||||
{
|
{
|
||||||
CPU_DoubleU u;
|
CPU_DoubleU u;
|
||||||
|
@ -572,24 +563,6 @@ static always_inline int isden (float64 d)
|
||||||
return ((u.ll >> 52) & 0x7FF) == 0;
|
return ((u.ll >> 52) & 0x7FF) == 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
static always_inline int iszero (float64 d)
|
|
||||||
{
|
|
||||||
CPU_DoubleU u;
|
|
||||||
|
|
||||||
u.d = d;
|
|
||||||
|
|
||||||
return (u.ll & ~0x8000000000000000ULL) == 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
static always_inline int isinfinity (float64 d)
|
|
||||||
{
|
|
||||||
CPU_DoubleU u;
|
|
||||||
|
|
||||||
u.d = d;
|
|
||||||
|
|
||||||
return ((u.ll >> 52) & 0x7FF) == 0x7FF &&
|
|
||||||
(u.ll & 0x000FFFFFFFFFFFFFULL) == 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
#ifdef CONFIG_SOFTFLOAT
|
#ifdef CONFIG_SOFTFLOAT
|
||||||
static always_inline int isfinite (float64 d)
|
static always_inline int isfinite (float64 d)
|
||||||
|
@ -618,7 +591,7 @@ uint32_t helper_compute_fprf (uint64_t arg, uint32_t set_fprf)
|
||||||
int isneg;
|
int isneg;
|
||||||
int ret;
|
int ret;
|
||||||
farg.ll = arg;
|
farg.ll = arg;
|
||||||
isneg = fpisneg(farg.d);
|
isneg = float64_is_neg(farg.d);
|
||||||
if (unlikely(float64_is_nan(farg.d))) {
|
if (unlikely(float64_is_nan(farg.d))) {
|
||||||
if (float64_is_signaling_nan(farg.d)) {
|
if (float64_is_signaling_nan(farg.d)) {
|
||||||
/* Signaling NaN: flags are undefined */
|
/* Signaling NaN: flags are undefined */
|
||||||
|
@ -627,14 +600,14 @@ uint32_t helper_compute_fprf (uint64_t arg, uint32_t set_fprf)
|
||||||
/* Quiet NaN */
|
/* Quiet NaN */
|
||||||
ret = 0x11;
|
ret = 0x11;
|
||||||
}
|
}
|
||||||
} else if (unlikely(isinfinity(farg.d))) {
|
} else if (unlikely(float64_is_infinity(farg.d))) {
|
||||||
/* +/- infinity */
|
/* +/- infinity */
|
||||||
if (isneg)
|
if (isneg)
|
||||||
ret = 0x09;
|
ret = 0x09;
|
||||||
else
|
else
|
||||||
ret = 0x05;
|
ret = 0x05;
|
||||||
} else {
|
} else {
|
||||||
if (iszero(farg.d)) {
|
if (float64_is_zero(farg.d)) {
|
||||||
/* +/- zero */
|
/* +/- zero */
|
||||||
if (isneg)
|
if (isneg)
|
||||||
ret = 0x12;
|
ret = 0x12;
|
||||||
|
@ -1056,7 +1029,7 @@ uint64_t helper_fadd (uint64_t arg1, uint64_t arg2)
|
||||||
/* sNaN addition */
|
/* sNaN addition */
|
||||||
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
||||||
} else if (likely(isfinite(farg1.d) || isfinite(farg2.d) ||
|
} else if (likely(isfinite(farg1.d) || isfinite(farg2.d) ||
|
||||||
fpisneg(farg1.d) == fpisneg(farg2.d))) {
|
float64_is_neg(farg1.d) == float64_is_neg(farg2.d))) {
|
||||||
farg1.d = float64_add(farg1.d, farg2.d, &env->fp_status);
|
farg1.d = float64_add(farg1.d, farg2.d, &env->fp_status);
|
||||||
} else {
|
} else {
|
||||||
/* Magnitude subtraction of infinities */
|
/* Magnitude subtraction of infinities */
|
||||||
|
@ -1082,7 +1055,7 @@ uint64_t helper_fsub (uint64_t arg1, uint64_t arg2)
|
||||||
/* sNaN subtraction */
|
/* sNaN subtraction */
|
||||||
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
||||||
} else if (likely(isfinite(farg1.d) || isfinite(farg2.d) ||
|
} else if (likely(isfinite(farg1.d) || isfinite(farg2.d) ||
|
||||||
fpisneg(farg1.d) != fpisneg(farg2.d))) {
|
float64_is_neg(farg1.d) != float64_is_neg(farg2.d))) {
|
||||||
farg1.d = float64_sub(farg1.d, farg2.d, &env->fp_status);
|
farg1.d = float64_sub(farg1.d, farg2.d, &env->fp_status);
|
||||||
} else {
|
} else {
|
||||||
/* Magnitude subtraction of infinities */
|
/* Magnitude subtraction of infinities */
|
||||||
|
@ -1107,8 +1080,8 @@ uint64_t helper_fmul (uint64_t arg1, uint64_t arg2)
|
||||||
float64_is_signaling_nan(farg2.d))) {
|
float64_is_signaling_nan(farg2.d))) {
|
||||||
/* sNaN multiplication */
|
/* sNaN multiplication */
|
||||||
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
||||||
} else if (unlikely((isinfinity(farg1.d) && iszero(farg2.d)) ||
|
} else if (unlikely((float64_is_infinity(farg1.d) && float64_is_zero(farg2.d)) ||
|
||||||
(iszero(farg1.d) && isinfinity(farg2.d)))) {
|
(float64_is_zero(farg1.d) && float64_is_infinity(farg2.d)))) {
|
||||||
/* Multiplication of zero by infinity */
|
/* Multiplication of zero by infinity */
|
||||||
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXIMZ);
|
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXIMZ);
|
||||||
} else {
|
} else {
|
||||||
|
@ -1132,11 +1105,11 @@ uint64_t helper_fdiv (uint64_t arg1, uint64_t arg2)
|
||||||
float64_is_signaling_nan(farg2.d))) {
|
float64_is_signaling_nan(farg2.d))) {
|
||||||
/* sNaN division */
|
/* sNaN division */
|
||||||
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
||||||
} else if (unlikely(isinfinity(farg1.d) && isinfinity(farg2.d))) {
|
} else if (unlikely(float64_is_infinity(farg1.d) && float64_is_infinity(farg2.d))) {
|
||||||
/* Division of infinity by infinity */
|
/* Division of infinity by infinity */
|
||||||
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXIDI);
|
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXIDI);
|
||||||
} else if (unlikely(!float64_is_nan(farg1.d) && iszero(farg2.d))) {
|
} else if (unlikely(!float64_is_nan(farg1.d) && float64_is_zero(farg2.d))) {
|
||||||
if (iszero(farg1.d)) {
|
if (float64_is_zero(farg1.d)) {
|
||||||
/* Division of zero by zero */
|
/* Division of zero by zero */
|
||||||
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXZDZ);
|
farg1.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXZDZ);
|
||||||
} else {
|
} else {
|
||||||
|
@ -1192,7 +1165,7 @@ uint64_t helper_fctiw (uint64_t arg)
|
||||||
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
||||||
/* sNaN conversion */
|
/* sNaN conversion */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN | POWERPC_EXCP_FP_VXCVI);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN | POWERPC_EXCP_FP_VXCVI);
|
||||||
} else if (unlikely(float64_is_nan(farg.d) || isinfinity(farg.d))) {
|
} else if (unlikely(float64_is_nan(farg.d) || float64_is_infinity(farg.d))) {
|
||||||
/* qNan / infinity conversion */
|
/* qNan / infinity conversion */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXCVI);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXCVI);
|
||||||
} else {
|
} else {
|
||||||
|
@ -1216,7 +1189,7 @@ uint64_t helper_fctiwz (uint64_t arg)
|
||||||
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
||||||
/* sNaN conversion */
|
/* sNaN conversion */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN | POWERPC_EXCP_FP_VXCVI);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN | POWERPC_EXCP_FP_VXCVI);
|
||||||
} else if (unlikely(float64_is_nan(farg.d) || isinfinity(farg.d))) {
|
} else if (unlikely(float64_is_nan(farg.d) || float64_is_infinity(farg.d))) {
|
||||||
/* qNan / infinity conversion */
|
/* qNan / infinity conversion */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXCVI);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXCVI);
|
||||||
} else {
|
} else {
|
||||||
|
@ -1249,7 +1222,7 @@ uint64_t helper_fctid (uint64_t arg)
|
||||||
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
||||||
/* sNaN conversion */
|
/* sNaN conversion */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN | POWERPC_EXCP_FP_VXCVI);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN | POWERPC_EXCP_FP_VXCVI);
|
||||||
} else if (unlikely(float64_is_nan(farg.d) || isinfinity(farg.d))) {
|
} else if (unlikely(float64_is_nan(farg.d) || float64_is_infinity(farg.d))) {
|
||||||
/* qNan / infinity conversion */
|
/* qNan / infinity conversion */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXCVI);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXCVI);
|
||||||
} else {
|
} else {
|
||||||
|
@ -1267,7 +1240,7 @@ uint64_t helper_fctidz (uint64_t arg)
|
||||||
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
||||||
/* sNaN conversion */
|
/* sNaN conversion */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN | POWERPC_EXCP_FP_VXCVI);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN | POWERPC_EXCP_FP_VXCVI);
|
||||||
} else if (unlikely(float64_is_nan(farg.d) || isinfinity(farg.d))) {
|
} else if (unlikely(float64_is_nan(farg.d) || float64_is_infinity(farg.d))) {
|
||||||
/* qNan / infinity conversion */
|
/* qNan / infinity conversion */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXCVI);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXCVI);
|
||||||
} else {
|
} else {
|
||||||
|
@ -1286,7 +1259,7 @@ static always_inline uint64_t do_fri (uint64_t arg, int rounding_mode)
|
||||||
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
||||||
/* sNaN round */
|
/* sNaN round */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN | POWERPC_EXCP_FP_VXCVI);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN | POWERPC_EXCP_FP_VXCVI);
|
||||||
} else if (unlikely(float64_is_nan(farg.d) || isinfinity(farg.d))) {
|
} else if (unlikely(float64_is_nan(farg.d) || float64_is_infinity(farg.d))) {
|
||||||
/* qNan / infinity round */
|
/* qNan / infinity round */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXCVI);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXCVI);
|
||||||
} else {
|
} else {
|
||||||
|
@ -1503,7 +1476,7 @@ uint64_t helper_fsqrt (uint64_t arg)
|
||||||
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
||||||
/* sNaN square root */
|
/* sNaN square root */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
||||||
} else if (unlikely(fpisneg(farg.d) && !iszero(farg.d))) {
|
} else if (unlikely(float64_is_neg(farg.d) && !float64_is_zero(farg.d))) {
|
||||||
/* Square root of a negative nonzero number */
|
/* Square root of a negative nonzero number */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSQRT);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSQRT);
|
||||||
} else {
|
} else {
|
||||||
|
@ -1522,7 +1495,7 @@ uint64_t helper_fre (uint64_t arg)
|
||||||
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
||||||
/* sNaN reciprocal */
|
/* sNaN reciprocal */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
||||||
} else if (unlikely(iszero(farg.d))) {
|
} else if (unlikely(float64_is_zero(farg.d))) {
|
||||||
/* Zero reciprocal */
|
/* Zero reciprocal */
|
||||||
farg.ll = float_zero_divide_excp(fone.d, farg.d);
|
farg.ll = float_zero_divide_excp(fone.d, farg.d);
|
||||||
} else if (likely(isnormal(farg.d))) {
|
} else if (likely(isnormal(farg.d))) {
|
||||||
|
@ -1534,7 +1507,7 @@ uint64_t helper_fre (uint64_t arg)
|
||||||
farg.ll = 0x7FF0000000000000ULL;
|
farg.ll = 0x7FF0000000000000ULL;
|
||||||
} else if (float64_is_nan(farg.d)) {
|
} else if (float64_is_nan(farg.d)) {
|
||||||
farg.ll = 0x7FF8000000000000ULL;
|
farg.ll = 0x7FF8000000000000ULL;
|
||||||
} else if (fpisneg(farg.d)) {
|
} else if (float64_is_neg(farg.d)) {
|
||||||
farg.ll = 0x8000000000000000ULL;
|
farg.ll = 0x8000000000000000ULL;
|
||||||
} else {
|
} else {
|
||||||
farg.ll = 0x0000000000000000ULL;
|
farg.ll = 0x0000000000000000ULL;
|
||||||
|
@ -1553,7 +1526,7 @@ uint64_t helper_fres (uint64_t arg)
|
||||||
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
||||||
/* sNaN reciprocal */
|
/* sNaN reciprocal */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
||||||
} else if (unlikely(iszero(farg.d))) {
|
} else if (unlikely(float64_is_zero(farg.d))) {
|
||||||
/* Zero reciprocal */
|
/* Zero reciprocal */
|
||||||
farg.ll = float_zero_divide_excp(fone.d, farg.d);
|
farg.ll = float_zero_divide_excp(fone.d, farg.d);
|
||||||
} else if (likely(isnormal(farg.d))) {
|
} else if (likely(isnormal(farg.d))) {
|
||||||
|
@ -1570,7 +1543,7 @@ uint64_t helper_fres (uint64_t arg)
|
||||||
farg.ll = 0x7FF0000000000000ULL;
|
farg.ll = 0x7FF0000000000000ULL;
|
||||||
} else if (float64_is_nan(farg.d)) {
|
} else if (float64_is_nan(farg.d)) {
|
||||||
farg.ll = 0x7FF8000000000000ULL;
|
farg.ll = 0x7FF8000000000000ULL;
|
||||||
} else if (fpisneg(farg.d)) {
|
} else if (float64_is_neg(farg.d)) {
|
||||||
farg.ll = 0x8000000000000000ULL;
|
farg.ll = 0x8000000000000000ULL;
|
||||||
} else {
|
} else {
|
||||||
farg.ll = 0x0000000000000000ULL;
|
farg.ll = 0x0000000000000000ULL;
|
||||||
|
@ -1589,7 +1562,7 @@ uint64_t helper_frsqrte (uint64_t arg)
|
||||||
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
if (unlikely(float64_is_signaling_nan(farg.d))) {
|
||||||
/* sNaN reciprocal square root */
|
/* sNaN reciprocal square root */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSNAN);
|
||||||
} else if (unlikely(fpisneg(farg.d) && !iszero(farg.d))) {
|
} else if (unlikely(float64_is_neg(farg.d) && !float64_is_zero(farg.d))) {
|
||||||
/* Reciprocal square root of a negative nonzero number */
|
/* Reciprocal square root of a negative nonzero number */
|
||||||
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSQRT);
|
farg.ll = fload_invalid_op_excp(POWERPC_EXCP_FP_VXSQRT);
|
||||||
} else if (likely(isnormal(farg.d))) {
|
} else if (likely(isnormal(farg.d))) {
|
||||||
|
@ -1602,7 +1575,7 @@ uint64_t helper_frsqrte (uint64_t arg)
|
||||||
farg.ll = 0x7FF0000000000000ULL;
|
farg.ll = 0x7FF0000000000000ULL;
|
||||||
} else if (float64_is_nan(farg.d)) {
|
} else if (float64_is_nan(farg.d)) {
|
||||||
farg.ll |= 0x000FFFFFFFFFFFFFULL;
|
farg.ll |= 0x000FFFFFFFFFFFFFULL;
|
||||||
} else if (fpisneg(farg.d)) {
|
} else if (float64_is_neg(farg.d)) {
|
||||||
farg.ll = 0x7FF8000000000000ULL;
|
farg.ll = 0x7FF8000000000000ULL;
|
||||||
} else {
|
} else {
|
||||||
farg.ll = 0x0000000000000000ULL;
|
farg.ll = 0x0000000000000000ULL;
|
||||||
|
@ -1618,7 +1591,7 @@ uint64_t helper_fsel (uint64_t arg1, uint64_t arg2, uint64_t arg3)
|
||||||
|
|
||||||
farg1.ll = arg1;
|
farg1.ll = arg1;
|
||||||
|
|
||||||
if (!fpisneg(farg1.d) || iszero(farg1.d))
|
if (!float64_is_neg(farg1.d) || float64_is_zero(farg1.d))
|
||||||
return arg2;
|
return arg2;
|
||||||
else
|
else
|
||||||
return arg3;
|
return arg3;
|
||||||
|
|
Loading…
Reference in a new issue