Message ID | 20170626220330.6785-3-laurent@vivier.eu |
---|---|
State | New |
Headers | show |
I find this patch aesthetically very nice :) On Tue, 27 Jun 2017 00:03:25 +0200 Laurent Vivier <laurent@vivier.eu> wrote: > fmovecr moves a floating point constant from the > FPU ROM to a floating point register. > > Signed-off-by: Laurent Vivier <laurent@vivier.eu> > Reviewed-by: Richard Henderson <rth@twiddle.net> > --- > target/m68k/fpu_helper.c | 30 ++++++++++++++++++++++++++++++ > target/m68k/helper.h | 1 + > target/m68k/translate.c | 13 ++++++++++++- > 3 files changed, 43 insertions(+), 1 deletion(-) > > diff --git a/target/m68k/fpu_helper.c b/target/m68k/fpu_helper.c > index a9e17f5..912c0b7 100644 > --- a/target/m68k/fpu_helper.c > +++ b/target/m68k/fpu_helper.c > @@ -23,6 +23,31 @@ > #include "exec/helper-proto.h" > #include "exec/exec-all.h" > > +static const floatx80 fpu_rom[128] = { > + [0x00] = floatx80_pi, /* Pi */ > + [0x0b] = make_floatx80(0x3ffd, 0x9a209a84fbcff798ULL), /* > Log10(2) */ > + [0x0c] = make_floatx80(0x4000, 0xadf85458a2bb4a9aULL), /* > e */ > + [0x0d] = make_floatx80(0x3fff, 0xb8aa3b295c17f0bcULL), /* > Log2(e) */ > + [0x0e] = make_floatx80(0x3ffd, 0xde5bd8a937287195ULL), /* > Log10(e) */ > + [0x0f] = floatx80_zero, /* > Zero */ > + [0x30] = floatx80_ln2, /* > ln(2) */ > + [0x31] = make_floatx80(0x4000, 0x935d8dddaaa8ac17ULL), /* > ln(10) */ > + [0x32] = floatx80_one, /* > 10^0 */ > + [0x33] = make_floatx80(0x4002, 0xa000000000000000ULL), /* > 10^1 */ > + [0x34] = make_floatx80(0x4005, 0xc800000000000000ULL), /* > 10^2 */ > + [0x35] = make_floatx80(0x400c, 0x9c40000000000000ULL), /* > 10^4 */ > + [0x36] = make_floatx80(0x4019, 0xbebc200000000000ULL), /* > 10^8 */ > + [0x37] = make_floatx80(0x4034, 0x8e1bc9bf04000000ULL), /* > 10^16 */ > + [0x38] = make_floatx80(0x4069, 0x9dc5ada82b70b59eULL), /* > 10^32 */ > + [0x39] = make_floatx80(0x40d3, 0xc2781f49ffcfa6d5ULL), /* > 10^64 */ > + [0x3a] = make_floatx80(0x41a8, 0x93ba47c980e98ce0ULL), /* > 10^128 */ > + [0x3b] = make_floatx80(0x4351, 0xaa7eebfb9df9de8eULL), /* > 10^256 */ > + [0x3c] = make_floatx80(0x46a3, 0xe319a0aea60e91c7ULL), /* > 10^512 */ > + [0x3d] = make_floatx80(0x4d48, 0xc976758681750c17ULL), /* > 10^1024 */ > + [0x3e] = make_floatx80(0x5a92, 0x9e8b3b5dc53d5de5ULL), /* > 10^2048 */ > + [0x3f] = make_floatx80(0x7525, 0xc46052028a20979bULL), /* > 10^4096 */ +}; > + > int32_t HELPER(reds32)(CPUM68KState *env, FPReg *val) > { > return floatx80_to_int32(val->d, &env->fp_status); > @@ -204,3 +229,8 @@ void HELPER(ftst)(CPUM68KState *env, FPReg *val) > } > env->fpsr = (env->fpsr & ~FPSR_CC_MASK) | cc; > } > + > +void HELPER(fconst)(CPUM68KState *env, FPReg *val, uint32_t offset) > +{ > + val->d = fpu_rom[offset]; For offset not declared in fpu_rom (0x1..0xa, 0x10..0x2f, 0x40..0x7f), this will return floatx80_zero, is this correct? > +} > diff --git a/target/m68k/helper.h b/target/m68k/helper.h > index 98cbf18..d6e80e4 100644 > --- a/target/m68k/helper.h > +++ b/target/m68k/helper.h > @@ -35,6 +35,7 @@ DEF_HELPER_4(fdiv, void, env, fp, fp, fp) > DEF_HELPER_FLAGS_3(fcmp, TCG_CALL_NO_RWG, void, env, fp, fp) > DEF_HELPER_FLAGS_2(set_fpcr, TCG_CALL_NO_RWG, void, env, i32) > DEF_HELPER_FLAGS_2(ftst, TCG_CALL_NO_RWG, void, env, fp) > +DEF_HELPER_3(fconst, void, env, fp, i32) > > DEF_HELPER_3(mac_move, void, env, i32, i32) > DEF_HELPER_3(macmulf, i64, env, i32, i32) > diff --git a/target/m68k/translate.c b/target/m68k/translate.c > index 8824f81..ab2fe50 100644 > --- a/target/m68k/translate.c > +++ b/target/m68k/translate.c > @@ -4510,6 +4510,7 @@ static void gen_op_fmove_fcr(CPUM68KState *env, > DisasContext *s, DISAS_INSN(fpu) > { > uint16_t ext; > + uint8_t rom_offset; > int opmode; > TCGv tmp32; > int opsize; > @@ -4518,10 +4519,20 @@ DISAS_INSN(fpu) > ext = read_im16(env, s); > opmode = ext & 0x7f; > switch ((ext >> 13) & 7) { > - case 0: case 2: > + case 0: > break; > case 1: > goto undef; > + case 2: > + if (insn == 0xf200 && (ext & 0xfc00) == 0x5c00) { > + /* fmovecr */ > + rom_offset = ext & 0x7f; you can use opmode directly. > + cpu_dest = gen_fp_ptr(REG(ext, 7)); > + gen_helper_fconst(cpu_env, cpu_dest, > tcg_const_i32(rom_offset)); > + tcg_temp_free_ptr(cpu_dest); > + return; > + } > + break; > case 3: /* fmove out */ > cpu_src = gen_fp_ptr(REG(ext, 7)); > opsize = ext_opsize(ext, 10);
Le 27/06/2017 à 17:45, Philippe Mathieu-Daudé a écrit : > I find this patch aesthetically very nice :) > > On Tue, 27 Jun 2017 00:03:25 +0200 > Laurent Vivier <laurent@vivier.eu> wrote: >> fmovecr moves a floating point constant from the >> FPU ROM to a floating point register. >> >> Signed-off-by: Laurent Vivier <laurent@vivier.eu> >> Reviewed-by: Richard Henderson <rth@twiddle.net> >> --- >> target/m68k/fpu_helper.c | 30 ++++++++++++++++++++++++++++++ >> target/m68k/helper.h | 1 + >> target/m68k/translate.c | 13 ++++++++++++- >> 3 files changed, 43 insertions(+), 1 deletion(-) >> >> diff --git a/target/m68k/fpu_helper.c b/target/m68k/fpu_helper.c >> index a9e17f5..912c0b7 100644 >> --- a/target/m68k/fpu_helper.c >> +++ b/target/m68k/fpu_helper.c >> @@ -23,6 +23,31 @@ >> #include "exec/helper-proto.h" >> #include "exec/exec-all.h" >> >> +static const floatx80 fpu_rom[128] = { >> + [0x00] = floatx80_pi, /* Pi */ >> + [0x0b] = make_floatx80(0x3ffd, 0x9a209a84fbcff798ULL), /* >> Log10(2) */ >> + [0x0c] = make_floatx80(0x4000, 0xadf85458a2bb4a9aULL), /* >> e */ >> + [0x0d] = make_floatx80(0x3fff, 0xb8aa3b295c17f0bcULL), /* >> Log2(e) */ >> + [0x0e] = make_floatx80(0x3ffd, 0xde5bd8a937287195ULL), /* >> Log10(e) */ >> + [0x0f] = floatx80_zero, /* >> Zero */ >> + [0x30] = floatx80_ln2, /* >> ln(2) */ >> + [0x31] = make_floatx80(0x4000, 0x935d8dddaaa8ac17ULL), /* >> ln(10) */ >> + [0x32] = floatx80_one, /* >> 10^0 */ >> + [0x33] = make_floatx80(0x4002, 0xa000000000000000ULL), /* >> 10^1 */ >> + [0x34] = make_floatx80(0x4005, 0xc800000000000000ULL), /* >> 10^2 */ >> + [0x35] = make_floatx80(0x400c, 0x9c40000000000000ULL), /* >> 10^4 */ >> + [0x36] = make_floatx80(0x4019, 0xbebc200000000000ULL), /* >> 10^8 */ >> + [0x37] = make_floatx80(0x4034, 0x8e1bc9bf04000000ULL), /* >> 10^16 */ >> + [0x38] = make_floatx80(0x4069, 0x9dc5ada82b70b59eULL), /* >> 10^32 */ >> + [0x39] = make_floatx80(0x40d3, 0xc2781f49ffcfa6d5ULL), /* >> 10^64 */ >> + [0x3a] = make_floatx80(0x41a8, 0x93ba47c980e98ce0ULL), /* >> 10^128 */ >> + [0x3b] = make_floatx80(0x4351, 0xaa7eebfb9df9de8eULL), /* >> 10^256 */ >> + [0x3c] = make_floatx80(0x46a3, 0xe319a0aea60e91c7ULL), /* >> 10^512 */ >> + [0x3d] = make_floatx80(0x4d48, 0xc976758681750c17ULL), /* >> 10^1024 */ >> + [0x3e] = make_floatx80(0x5a92, 0x9e8b3b5dc53d5de5ULL), /* >> 10^2048 */ >> + [0x3f] = make_floatx80(0x7525, 0xc46052028a20979bULL), /* >> 10^4096 */ +}; >> + >> int32_t HELPER(reds32)(CPUM68KState *env, FPReg *val) >> { >> return floatx80_to_int32(val->d, &env->fp_status); >> @@ -204,3 +229,8 @@ void HELPER(ftst)(CPUM68KState *env, FPReg *val) >> } >> env->fpsr = (env->fpsr & ~FPSR_CC_MASK) | cc; >> } >> + >> +void HELPER(fconst)(CPUM68KState *env, FPReg *val, uint32_t offset) >> +{ >> + val->d = fpu_rom[offset]; > > For offset not declared in fpu_rom (0x1..0xa, 0x10..0x2f, 0x40..0x7f), > this will return floatx80_zero, is this correct? yes, according to the doc: The values contained at offsets other than those defined above are reserved for the use of Motorola and may be different on various mask sets of the floating-point coprocessor. These undefined values yield the value 0.0 in the M68040FPSP > >> +} >> diff --git a/target/m68k/helper.h b/target/m68k/helper.h >> index 98cbf18..d6e80e4 100644 >> --- a/target/m68k/helper.h >> +++ b/target/m68k/helper.h >> @@ -35,6 +35,7 @@ DEF_HELPER_4(fdiv, void, env, fp, fp, fp) >> DEF_HELPER_FLAGS_3(fcmp, TCG_CALL_NO_RWG, void, env, fp, fp) >> DEF_HELPER_FLAGS_2(set_fpcr, TCG_CALL_NO_RWG, void, env, i32) >> DEF_HELPER_FLAGS_2(ftst, TCG_CALL_NO_RWG, void, env, fp) >> +DEF_HELPER_3(fconst, void, env, fp, i32) >> >> DEF_HELPER_3(mac_move, void, env, i32, i32) >> DEF_HELPER_3(macmulf, i64, env, i32, i32) >> diff --git a/target/m68k/translate.c b/target/m68k/translate.c >> index 8824f81..ab2fe50 100644 >> --- a/target/m68k/translate.c >> +++ b/target/m68k/translate.c >> @@ -4510,6 +4510,7 @@ static void gen_op_fmove_fcr(CPUM68KState *env, >> DisasContext *s, DISAS_INSN(fpu) >> { >> uint16_t ext; >> + uint8_t rom_offset; >> int opmode; >> TCGv tmp32; >> int opsize; >> @@ -4518,10 +4519,20 @@ DISAS_INSN(fpu) >> ext = read_im16(env, s); >> opmode = ext & 0x7f; >> switch ((ext >> 13) & 7) { >> - case 0: case 2: >> + case 0: >> break; >> case 1: >> goto undef; >> + case 2: >> + if (insn == 0xf200 && (ext & 0xfc00) == 0x5c00) { >> + /* fmovecr */ >> + rom_offset = ext & 0x7f; > > you can use opmode directly. yes, I will update. Thanks, Laurent
On 06/27/2017 02:58 PM, Laurent Vivier wrote: > Le 27/06/2017 à 17:45, Philippe Mathieu-Daudé a écrit : >>> +static const floatx80 fpu_rom[128] = { >>> + [0x00] = floatx80_pi, /* Pi */ >>> + [0x0b] = make_floatx80(0x3ffd, 0x9a209a84fbcff798ULL), /* >>> Log10(2) */ >>> + [0x0c] = make_floatx80(0x4000, 0xadf85458a2bb4a9aULL), /* >>> e */ >>> + [0x0d] = make_floatx80(0x3fff, 0xb8aa3b295c17f0bcULL), /* >>> Log2(e) */ >>> + [0x0e] = make_floatx80(0x3ffd, 0xde5bd8a937287195ULL), /* >>> Log10(e) */ >>> + [0x0f] = floatx80_zero, /* >>> Zero */ >>> + [0x30] = floatx80_ln2, /* >>> ln(2) */ >>> + [0x31] = make_floatx80(0x4000, 0x935d8dddaaa8ac17ULL), /* >>> ln(10) */ >>> + [0x32] = floatx80_one, /* >>> 10^0 */ >>> + [0x33] = make_floatx80(0x4002, 0xa000000000000000ULL), /* >>> 10^1 */ >>> + [0x34] = make_floatx80(0x4005, 0xc800000000000000ULL), /* >>> 10^2 */ >>> + [0x35] = make_floatx80(0x400c, 0x9c40000000000000ULL), /* >>> 10^4 */ >>> + [0x36] = make_floatx80(0x4019, 0xbebc200000000000ULL), /* >>> 10^8 */ >>> + [0x37] = make_floatx80(0x4034, 0x8e1bc9bf04000000ULL), /* >>> 10^16 */ >>> + [0x38] = make_floatx80(0x4069, 0x9dc5ada82b70b59eULL), /* >>> 10^32 */ >>> + [0x39] = make_floatx80(0x40d3, 0xc2781f49ffcfa6d5ULL), /* >>> 10^64 */ >>> + [0x3a] = make_floatx80(0x41a8, 0x93ba47c980e98ce0ULL), /* >>> 10^128 */ >>> + [0x3b] = make_floatx80(0x4351, 0xaa7eebfb9df9de8eULL), /* >>> 10^256 */ >>> + [0x3c] = make_floatx80(0x46a3, 0xe319a0aea60e91c7ULL), /* >>> 10^512 */ >>> + [0x3d] = make_floatx80(0x4d48, 0xc976758681750c17ULL), /* >>> 10^1024 */ >>> + [0x3e] = make_floatx80(0x5a92, 0x9e8b3b5dc53d5de5ULL), /* >>> 10^2048 */ >>> + [0x3f] = make_floatx80(0x7525, 0xc46052028a20979bULL), /* >>> 10^4096 */ +}; >>> + >>> int32_t HELPER(reds32)(CPUM68KState *env, FPReg *val) >>> { >>> return floatx80_to_int32(val->d, &env->fp_status); >>> @@ -204,3 +229,8 @@ void HELPER(ftst)(CPUM68KState *env, FPReg *val) >>> } >>> env->fpsr = (env->fpsr & ~FPSR_CC_MASK) | cc; >>> } >>> + >>> +void HELPER(fconst)(CPUM68KState *env, FPReg *val, uint32_t offset) >>> +{ >>> + val->d = fpu_rom[offset]; >> >> For offset not declared in fpu_rom (0x1..0xa, 0x10..0x2f, 0x40..0x7f), >> this will return floatx80_zero, is this correct? > > yes, according to the doc: > > The values contained at offsets other than those defined above are > reserved for the use of Motorola and may be different on various mask > sets of the floating-point coprocessor. These undefined values yield the > value 0.0 in the M68040FPSP can you add this comment before/in the fpu_rom array please?
diff --git a/target/m68k/fpu_helper.c b/target/m68k/fpu_helper.c index a9e17f5..912c0b7 100644 --- a/target/m68k/fpu_helper.c +++ b/target/m68k/fpu_helper.c @@ -23,6 +23,31 @@ #include "exec/helper-proto.h" #include "exec/exec-all.h" +static const floatx80 fpu_rom[128] = { + [0x00] = floatx80_pi, /* Pi */ + [0x0b] = make_floatx80(0x3ffd, 0x9a209a84fbcff798ULL), /* Log10(2) */ + [0x0c] = make_floatx80(0x4000, 0xadf85458a2bb4a9aULL), /* e */ + [0x0d] = make_floatx80(0x3fff, 0xb8aa3b295c17f0bcULL), /* Log2(e) */ + [0x0e] = make_floatx80(0x3ffd, 0xde5bd8a937287195ULL), /* Log10(e) */ + [0x0f] = floatx80_zero, /* Zero */ + [0x30] = floatx80_ln2, /* ln(2) */ + [0x31] = make_floatx80(0x4000, 0x935d8dddaaa8ac17ULL), /* ln(10) */ + [0x32] = floatx80_one, /* 10^0 */ + [0x33] = make_floatx80(0x4002, 0xa000000000000000ULL), /* 10^1 */ + [0x34] = make_floatx80(0x4005, 0xc800000000000000ULL), /* 10^2 */ + [0x35] = make_floatx80(0x400c, 0x9c40000000000000ULL), /* 10^4 */ + [0x36] = make_floatx80(0x4019, 0xbebc200000000000ULL), /* 10^8 */ + [0x37] = make_floatx80(0x4034, 0x8e1bc9bf04000000ULL), /* 10^16 */ + [0x38] = make_floatx80(0x4069, 0x9dc5ada82b70b59eULL), /* 10^32 */ + [0x39] = make_floatx80(0x40d3, 0xc2781f49ffcfa6d5ULL), /* 10^64 */ + [0x3a] = make_floatx80(0x41a8, 0x93ba47c980e98ce0ULL), /* 10^128 */ + [0x3b] = make_floatx80(0x4351, 0xaa7eebfb9df9de8eULL), /* 10^256 */ + [0x3c] = make_floatx80(0x46a3, 0xe319a0aea60e91c7ULL), /* 10^512 */ + [0x3d] = make_floatx80(0x4d48, 0xc976758681750c17ULL), /* 10^1024 */ + [0x3e] = make_floatx80(0x5a92, 0x9e8b3b5dc53d5de5ULL), /* 10^2048 */ + [0x3f] = make_floatx80(0x7525, 0xc46052028a20979bULL), /* 10^4096 */ +}; + int32_t HELPER(reds32)(CPUM68KState *env, FPReg *val) { return floatx80_to_int32(val->d, &env->fp_status); @@ -204,3 +229,8 @@ void HELPER(ftst)(CPUM68KState *env, FPReg *val) } env->fpsr = (env->fpsr & ~FPSR_CC_MASK) | cc; } + +void HELPER(fconst)(CPUM68KState *env, FPReg *val, uint32_t offset) +{ + val->d = fpu_rom[offset]; +} diff --git a/target/m68k/helper.h b/target/m68k/helper.h index 98cbf18..d6e80e4 100644 --- a/target/m68k/helper.h +++ b/target/m68k/helper.h @@ -35,6 +35,7 @@ DEF_HELPER_4(fdiv, void, env, fp, fp, fp) DEF_HELPER_FLAGS_3(fcmp, TCG_CALL_NO_RWG, void, env, fp, fp) DEF_HELPER_FLAGS_2(set_fpcr, TCG_CALL_NO_RWG, void, env, i32) DEF_HELPER_FLAGS_2(ftst, TCG_CALL_NO_RWG, void, env, fp) +DEF_HELPER_3(fconst, void, env, fp, i32) DEF_HELPER_3(mac_move, void, env, i32, i32) DEF_HELPER_3(macmulf, i64, env, i32, i32) diff --git a/target/m68k/translate.c b/target/m68k/translate.c index 8824f81..ab2fe50 100644 --- a/target/m68k/translate.c +++ b/target/m68k/translate.c @@ -4510,6 +4510,7 @@ static void gen_op_fmove_fcr(CPUM68KState *env, DisasContext *s, DISAS_INSN(fpu) { uint16_t ext; + uint8_t rom_offset; int opmode; TCGv tmp32; int opsize; @@ -4518,10 +4519,20 @@ DISAS_INSN(fpu) ext = read_im16(env, s); opmode = ext & 0x7f; switch ((ext >> 13) & 7) { - case 0: case 2: + case 0: break; case 1: goto undef; + case 2: + if (insn == 0xf200 && (ext & 0xfc00) == 0x5c00) { + /* fmovecr */ + rom_offset = ext & 0x7f; + cpu_dest = gen_fp_ptr(REG(ext, 7)); + gen_helper_fconst(cpu_env, cpu_dest, tcg_const_i32(rom_offset)); + tcg_temp_free_ptr(cpu_dest); + return; + } + break; case 3: /* fmove out */ cpu_src = gen_fp_ptr(REG(ext, 7)); opsize = ext_opsize(ext, 10);