OpenE2K
/
qemu-e2k
13
4
Fork 0
Code Issues 4 Pull Requests Projects 2 Releases Activity

target-ppc: Introduce DFP Test Data Group 

Add emulation of the PowerPC Decimal Floating Point Test Data
Group instructions dtstdg[q][.].

Signed-off-by: Tom Musta <tommusta@gmail.com>
Signed-off-by: Alexander Graf <agraf@suse.de>
This commit is contained in:
Tom Musta 2014-04-21 15:55:07 -05:00 committed by Alexander Graf
parent e601c1eead
commit 1bf9c0e133
3 changed files with 61 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
target-ppc/dfp_helper.c
View File

@ -449,3 +449,58 @@ uint32_t helper_##op(CPUPPCState *env, uint64_t *a, uint32_t dcm) \
DFP_HELPER_TSTDC(dtstdc, 64)
DFP_HELPER_TSTDC(dtstdcq, 128)
#define DFP_HELPER_TSTDG(op, size) \
uint32_t helper_##op(CPUPPCState *env, uint64_t *a, uint32_t dcm) \
{ \
struct PPC_DFP dfp; \
int minexp, maxexp, nzero_digits, nzero_idx, is_negative, is_zero, \
is_extreme_exp, is_subnormal, is_normal, leftmost_is_nonzero, \
match; \
\
dfp_prepare_decimal##size(&dfp, a, 0, env); \
\
if ((size) == 64) { \
minexp = -398; \
maxexp = 369; \
nzero_digits = 16; \
nzero_idx = 5; \
} else if ((size) == 128) { \
minexp = -6176; \
maxexp = 6111; \
nzero_digits = 34; \
nzero_idx = 11; \
} \
\
is_negative = decNumberIsNegative(&dfp.a); \
is_zero = decNumberIsZero(&dfp.a); \
is_extreme_exp = (dfp.a.exponent == maxexp) || \
(dfp.a.exponent == minexp); \
is_subnormal = decNumberIsSubnormal(&dfp.a, &dfp.context); \
is_normal = decNumberIsNormal(&dfp.a, &dfp.context); \
leftmost_is_nonzero = (dfp.a.digits == nzero_digits) && \
(dfp.a.lsu[nzero_idx] != 0); \
match = 0; \
\
match |= (dcm & 0x20) && is_zero && !is_extreme_exp; \
match |= (dcm & 0x10) && is_zero && is_extreme_exp; \
match |= (dcm & 0x08) && \
(is_subnormal || (is_normal && is_extreme_exp)); \
match |= (dcm & 0x04) && is_normal && !is_extreme_exp && \
!leftmost_is_nonzero; \
match |= (dcm & 0x02) && is_normal && !is_extreme_exp && \
leftmost_is_nonzero; \
match |= (dcm & 0x01) && decNumberIsSpecial(&dfp.a); \
\
if (is_negative) { \
dfp.crbf = match ? 0xA : 0x8; \
} else { \
dfp.crbf = match ? 0x2 : 0x0; \
} \
\
dfp_set_FPCC_from_CRBF(&dfp); \
return dfp.crbf; \
}
DFP_HELPER_TSTDG(dtstdg, 64)
DFP_HELPER_TSTDG(dtstdgq, 128)

2
target-ppc/helper.h
View File

@ -630,3 +630,5 @@ DEF_HELPER_3(dcmpu, i32, env, fprp, fprp)
DEF_HELPER_3(dcmpuq, i32, env, fprp, fprp)
DEF_HELPER_3(dtstdc, i32, env, fprp, i32)
DEF_HELPER_3(dtstdcq, i32, env, fprp, i32)
DEF_HELPER_3(dtstdg, i32, env, fprp, i32)
DEF_HELPER_3(dtstdgq, i32, env, fprp, i32)

4
target-ppc/translate.c
View File

@ -8370,6 +8370,8 @@ GEN_DFP_BF_A_B(dcmpo)
GEN_DFP_BF_A_B(dcmpoq)
GEN_DFP_BF_A_DCM(dtstdc)
GEN_DFP_BF_A_DCM(dtstdcq)
GEN_DFP_BF_A_DCM(dtstdg)
GEN_DFP_BF_A_DCM(dtstdgq)
/*** SPE extension ***/
/* Register moves */
@ -11311,6 +11313,8 @@ GEN_DFP_BF_A_B(dcmpo, 0x02, 0x04),
GEN_DFP_BF_Ap_Bp(dcmpoq, 0x02, 0x04),
GEN_DFP_BF_A_DCM(dtstdc, 0x02, 0x06),
GEN_DFP_BF_Ap_DCM(dtstdcq, 0x02, 0x06),
GEN_DFP_BF_A_DCM(dtstdg, 0x02, 0x07),
GEN_DFP_BF_Ap_DCM(dtstdgq, 0x02, 0x07),
#undef GEN_SPE
#define GEN_SPE(name0, name1, opc2, opc3, inval0, inval1, type) \
GEN_OPCODE_DUAL(name0##_##name1, 0x04, opc2, opc3, inval0, inval1, type, PPC_NONE)