1fcf5ef2aSThomas Huth /* 2fcf5ef2aSThomas Huth * SH4 translation 3fcf5ef2aSThomas Huth * 4fcf5ef2aSThomas Huth * Copyright (c) 2005 Samuel Tardieu 5fcf5ef2aSThomas Huth * 6fcf5ef2aSThomas Huth * This library is free software; you can redistribute it and/or 7fcf5ef2aSThomas Huth * modify it under the terms of the GNU Lesser General Public 8fcf5ef2aSThomas Huth * License as published by the Free Software Foundation; either 9fcf5ef2aSThomas Huth * version 2 of the License, or (at your option) any later version. 10fcf5ef2aSThomas Huth * 11fcf5ef2aSThomas Huth * This library is distributed in the hope that it will be useful, 12fcf5ef2aSThomas Huth * but WITHOUT ANY WARRANTY; without even the implied warranty of 13fcf5ef2aSThomas Huth * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 14fcf5ef2aSThomas Huth * Lesser General Public License for more details. 15fcf5ef2aSThomas Huth * 16fcf5ef2aSThomas Huth * You should have received a copy of the GNU Lesser General Public 17fcf5ef2aSThomas Huth * License along with this library; if not, see <http://www.gnu.org/licenses/>. 18fcf5ef2aSThomas Huth */ 19fcf5ef2aSThomas Huth 20fcf5ef2aSThomas Huth #define DEBUG_DISAS 21fcf5ef2aSThomas Huth 22fcf5ef2aSThomas Huth #include "qemu/osdep.h" 23fcf5ef2aSThomas Huth #include "cpu.h" 24fcf5ef2aSThomas Huth #include "disas/disas.h" 25fcf5ef2aSThomas Huth #include "exec/exec-all.h" 26fcf5ef2aSThomas Huth #include "tcg-op.h" 27fcf5ef2aSThomas Huth #include "exec/cpu_ldst.h" 28fcf5ef2aSThomas Huth 29fcf5ef2aSThomas Huth #include "exec/helper-proto.h" 30fcf5ef2aSThomas Huth #include "exec/helper-gen.h" 31fcf5ef2aSThomas Huth 32fcf5ef2aSThomas Huth #include "trace-tcg.h" 33fcf5ef2aSThomas Huth #include "exec/log.h" 34fcf5ef2aSThomas Huth 35fcf5ef2aSThomas Huth 36fcf5ef2aSThomas Huth typedef struct DisasContext { 37fcf5ef2aSThomas Huth struct TranslationBlock *tb; 38fcf5ef2aSThomas Huth target_ulong pc; 39fcf5ef2aSThomas Huth uint16_t opcode; 40a6215749SAurelien Jarno uint32_t tbflags; /* should stay unmodified during the TB translation */ 41a6215749SAurelien Jarno uint32_t envflags; /* should stay in sync with env->flags using TCG ops */ 42fcf5ef2aSThomas Huth int bstate; 43fcf5ef2aSThomas Huth int memidx; 443a3bb8d2SRichard Henderson int gbank; 455c13bad9SRichard Henderson int fbank; 46fcf5ef2aSThomas Huth uint32_t delayed_pc; 47fcf5ef2aSThomas Huth int singlestep_enabled; 48fcf5ef2aSThomas Huth uint32_t features; 49fcf5ef2aSThomas Huth int has_movcal; 50fcf5ef2aSThomas Huth } DisasContext; 51fcf5ef2aSThomas Huth 52fcf5ef2aSThomas Huth #if defined(CONFIG_USER_ONLY) 53fcf5ef2aSThomas Huth #define IS_USER(ctx) 1 54fcf5ef2aSThomas Huth #else 55a6215749SAurelien Jarno #define IS_USER(ctx) (!(ctx->tbflags & (1u << SR_MD))) 56fcf5ef2aSThomas Huth #endif 57fcf5ef2aSThomas Huth 58fcf5ef2aSThomas Huth enum { 59fcf5ef2aSThomas Huth BS_NONE = 0, /* We go out of the TB without reaching a branch or an 60fcf5ef2aSThomas Huth * exception condition 61fcf5ef2aSThomas Huth */ 62fcf5ef2aSThomas Huth BS_STOP = 1, /* We want to stop translation for any reason */ 63fcf5ef2aSThomas Huth BS_BRANCH = 2, /* We reached a branch condition */ 64fcf5ef2aSThomas Huth BS_EXCP = 3, /* We reached an exception condition */ 65fcf5ef2aSThomas Huth }; 66fcf5ef2aSThomas Huth 67fcf5ef2aSThomas Huth /* global register indexes */ 68fcf5ef2aSThomas Huth static TCGv_env cpu_env; 693a3bb8d2SRichard Henderson static TCGv cpu_gregs[32]; 70fcf5ef2aSThomas Huth static TCGv cpu_sr, cpu_sr_m, cpu_sr_q, cpu_sr_t; 71fcf5ef2aSThomas Huth static TCGv cpu_pc, cpu_ssr, cpu_spc, cpu_gbr; 72fcf5ef2aSThomas Huth static TCGv cpu_vbr, cpu_sgr, cpu_dbr, cpu_mach, cpu_macl; 73fcf5ef2aSThomas Huth static TCGv cpu_pr, cpu_fpscr, cpu_fpul, cpu_ldst; 74fcf5ef2aSThomas Huth static TCGv cpu_fregs[32]; 75fcf5ef2aSThomas Huth 76fcf5ef2aSThomas Huth /* internal register indexes */ 7747b9f4d5SAurelien Jarno static TCGv cpu_flags, cpu_delayed_pc, cpu_delayed_cond; 78fcf5ef2aSThomas Huth 79fcf5ef2aSThomas Huth #include "exec/gen-icount.h" 80fcf5ef2aSThomas Huth 81fcf5ef2aSThomas Huth void sh4_translate_init(void) 82fcf5ef2aSThomas Huth { 83fcf5ef2aSThomas Huth int i; 84fcf5ef2aSThomas Huth static int done_init = 0; 85fcf5ef2aSThomas Huth static const char * const gregnames[24] = { 86fcf5ef2aSThomas Huth "R0_BANK0", "R1_BANK0", "R2_BANK0", "R3_BANK0", 87fcf5ef2aSThomas Huth "R4_BANK0", "R5_BANK0", "R6_BANK0", "R7_BANK0", 88fcf5ef2aSThomas Huth "R8", "R9", "R10", "R11", "R12", "R13", "R14", "R15", 89fcf5ef2aSThomas Huth "R0_BANK1", "R1_BANK1", "R2_BANK1", "R3_BANK1", 90fcf5ef2aSThomas Huth "R4_BANK1", "R5_BANK1", "R6_BANK1", "R7_BANK1" 91fcf5ef2aSThomas Huth }; 92fcf5ef2aSThomas Huth static const char * const fregnames[32] = { 93fcf5ef2aSThomas Huth "FPR0_BANK0", "FPR1_BANK0", "FPR2_BANK0", "FPR3_BANK0", 94fcf5ef2aSThomas Huth "FPR4_BANK0", "FPR5_BANK0", "FPR6_BANK0", "FPR7_BANK0", 95fcf5ef2aSThomas Huth "FPR8_BANK0", "FPR9_BANK0", "FPR10_BANK0", "FPR11_BANK0", 96fcf5ef2aSThomas Huth "FPR12_BANK0", "FPR13_BANK0", "FPR14_BANK0", "FPR15_BANK0", 97fcf5ef2aSThomas Huth "FPR0_BANK1", "FPR1_BANK1", "FPR2_BANK1", "FPR3_BANK1", 98fcf5ef2aSThomas Huth "FPR4_BANK1", "FPR5_BANK1", "FPR6_BANK1", "FPR7_BANK1", 99fcf5ef2aSThomas Huth "FPR8_BANK1", "FPR9_BANK1", "FPR10_BANK1", "FPR11_BANK1", 100fcf5ef2aSThomas Huth "FPR12_BANK1", "FPR13_BANK1", "FPR14_BANK1", "FPR15_BANK1", 101fcf5ef2aSThomas Huth }; 102fcf5ef2aSThomas Huth 1033a3bb8d2SRichard Henderson if (done_init) { 104fcf5ef2aSThomas Huth return; 1053a3bb8d2SRichard Henderson } 106fcf5ef2aSThomas Huth 107fcf5ef2aSThomas Huth cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env"); 108fcf5ef2aSThomas Huth tcg_ctx.tcg_env = cpu_env; 109fcf5ef2aSThomas Huth 1103a3bb8d2SRichard Henderson for (i = 0; i < 24; i++) { 111fcf5ef2aSThomas Huth cpu_gregs[i] = tcg_global_mem_new_i32(cpu_env, 112fcf5ef2aSThomas Huth offsetof(CPUSH4State, gregs[i]), 113fcf5ef2aSThomas Huth gregnames[i]); 1143a3bb8d2SRichard Henderson } 1153a3bb8d2SRichard Henderson memcpy(cpu_gregs + 24, cpu_gregs + 8, 8 * sizeof(TCGv)); 116fcf5ef2aSThomas Huth 117fcf5ef2aSThomas Huth cpu_pc = tcg_global_mem_new_i32(cpu_env, 118fcf5ef2aSThomas Huth offsetof(CPUSH4State, pc), "PC"); 119fcf5ef2aSThomas Huth cpu_sr = tcg_global_mem_new_i32(cpu_env, 120fcf5ef2aSThomas Huth offsetof(CPUSH4State, sr), "SR"); 121fcf5ef2aSThomas Huth cpu_sr_m = tcg_global_mem_new_i32(cpu_env, 122fcf5ef2aSThomas Huth offsetof(CPUSH4State, sr_m), "SR_M"); 123fcf5ef2aSThomas Huth cpu_sr_q = tcg_global_mem_new_i32(cpu_env, 124fcf5ef2aSThomas Huth offsetof(CPUSH4State, sr_q), "SR_Q"); 125fcf5ef2aSThomas Huth cpu_sr_t = tcg_global_mem_new_i32(cpu_env, 126fcf5ef2aSThomas Huth offsetof(CPUSH4State, sr_t), "SR_T"); 127fcf5ef2aSThomas Huth cpu_ssr = tcg_global_mem_new_i32(cpu_env, 128fcf5ef2aSThomas Huth offsetof(CPUSH4State, ssr), "SSR"); 129fcf5ef2aSThomas Huth cpu_spc = tcg_global_mem_new_i32(cpu_env, 130fcf5ef2aSThomas Huth offsetof(CPUSH4State, spc), "SPC"); 131fcf5ef2aSThomas Huth cpu_gbr = tcg_global_mem_new_i32(cpu_env, 132fcf5ef2aSThomas Huth offsetof(CPUSH4State, gbr), "GBR"); 133fcf5ef2aSThomas Huth cpu_vbr = tcg_global_mem_new_i32(cpu_env, 134fcf5ef2aSThomas Huth offsetof(CPUSH4State, vbr), "VBR"); 135fcf5ef2aSThomas Huth cpu_sgr = tcg_global_mem_new_i32(cpu_env, 136fcf5ef2aSThomas Huth offsetof(CPUSH4State, sgr), "SGR"); 137fcf5ef2aSThomas Huth cpu_dbr = tcg_global_mem_new_i32(cpu_env, 138fcf5ef2aSThomas Huth offsetof(CPUSH4State, dbr), "DBR"); 139fcf5ef2aSThomas Huth cpu_mach = tcg_global_mem_new_i32(cpu_env, 140fcf5ef2aSThomas Huth offsetof(CPUSH4State, mach), "MACH"); 141fcf5ef2aSThomas Huth cpu_macl = tcg_global_mem_new_i32(cpu_env, 142fcf5ef2aSThomas Huth offsetof(CPUSH4State, macl), "MACL"); 143fcf5ef2aSThomas Huth cpu_pr = tcg_global_mem_new_i32(cpu_env, 144fcf5ef2aSThomas Huth offsetof(CPUSH4State, pr), "PR"); 145fcf5ef2aSThomas Huth cpu_fpscr = tcg_global_mem_new_i32(cpu_env, 146fcf5ef2aSThomas Huth offsetof(CPUSH4State, fpscr), "FPSCR"); 147fcf5ef2aSThomas Huth cpu_fpul = tcg_global_mem_new_i32(cpu_env, 148fcf5ef2aSThomas Huth offsetof(CPUSH4State, fpul), "FPUL"); 149fcf5ef2aSThomas Huth 150fcf5ef2aSThomas Huth cpu_flags = tcg_global_mem_new_i32(cpu_env, 151fcf5ef2aSThomas Huth offsetof(CPUSH4State, flags), "_flags_"); 152fcf5ef2aSThomas Huth cpu_delayed_pc = tcg_global_mem_new_i32(cpu_env, 153fcf5ef2aSThomas Huth offsetof(CPUSH4State, delayed_pc), 154fcf5ef2aSThomas Huth "_delayed_pc_"); 15547b9f4d5SAurelien Jarno cpu_delayed_cond = tcg_global_mem_new_i32(cpu_env, 15647b9f4d5SAurelien Jarno offsetof(CPUSH4State, 15747b9f4d5SAurelien Jarno delayed_cond), 15847b9f4d5SAurelien Jarno "_delayed_cond_"); 159fcf5ef2aSThomas Huth cpu_ldst = tcg_global_mem_new_i32(cpu_env, 160fcf5ef2aSThomas Huth offsetof(CPUSH4State, ldst), "_ldst_"); 161fcf5ef2aSThomas Huth 162fcf5ef2aSThomas Huth for (i = 0; i < 32; i++) 163fcf5ef2aSThomas Huth cpu_fregs[i] = tcg_global_mem_new_i32(cpu_env, 164fcf5ef2aSThomas Huth offsetof(CPUSH4State, fregs[i]), 165fcf5ef2aSThomas Huth fregnames[i]); 166fcf5ef2aSThomas Huth 167fcf5ef2aSThomas Huth done_init = 1; 168fcf5ef2aSThomas Huth } 169fcf5ef2aSThomas Huth 170fcf5ef2aSThomas Huth void superh_cpu_dump_state(CPUState *cs, FILE *f, 171fcf5ef2aSThomas Huth fprintf_function cpu_fprintf, int flags) 172fcf5ef2aSThomas Huth { 173fcf5ef2aSThomas Huth SuperHCPU *cpu = SUPERH_CPU(cs); 174fcf5ef2aSThomas Huth CPUSH4State *env = &cpu->env; 175fcf5ef2aSThomas Huth int i; 176fcf5ef2aSThomas Huth cpu_fprintf(f, "pc=0x%08x sr=0x%08x pr=0x%08x fpscr=0x%08x\n", 177fcf5ef2aSThomas Huth env->pc, cpu_read_sr(env), env->pr, env->fpscr); 178fcf5ef2aSThomas Huth cpu_fprintf(f, "spc=0x%08x ssr=0x%08x gbr=0x%08x vbr=0x%08x\n", 179fcf5ef2aSThomas Huth env->spc, env->ssr, env->gbr, env->vbr); 180fcf5ef2aSThomas Huth cpu_fprintf(f, "sgr=0x%08x dbr=0x%08x delayed_pc=0x%08x fpul=0x%08x\n", 181fcf5ef2aSThomas Huth env->sgr, env->dbr, env->delayed_pc, env->fpul); 182fcf5ef2aSThomas Huth for (i = 0; i < 24; i += 4) { 183fcf5ef2aSThomas Huth cpu_fprintf(f, "r%d=0x%08x r%d=0x%08x r%d=0x%08x r%d=0x%08x\n", 184fcf5ef2aSThomas Huth i, env->gregs[i], i + 1, env->gregs[i + 1], 185fcf5ef2aSThomas Huth i + 2, env->gregs[i + 2], i + 3, env->gregs[i + 3]); 186fcf5ef2aSThomas Huth } 187fcf5ef2aSThomas Huth if (env->flags & DELAY_SLOT) { 188fcf5ef2aSThomas Huth cpu_fprintf(f, "in delay slot (delayed_pc=0x%08x)\n", 189fcf5ef2aSThomas Huth env->delayed_pc); 190fcf5ef2aSThomas Huth } else if (env->flags & DELAY_SLOT_CONDITIONAL) { 191fcf5ef2aSThomas Huth cpu_fprintf(f, "in conditional delay slot (delayed_pc=0x%08x)\n", 192fcf5ef2aSThomas Huth env->delayed_pc); 193be53081aSAurelien Jarno } else if (env->flags & DELAY_SLOT_RTE) { 194be53081aSAurelien Jarno cpu_fprintf(f, "in rte delay slot (delayed_pc=0x%08x)\n", 195be53081aSAurelien Jarno env->delayed_pc); 196fcf5ef2aSThomas Huth } 197fcf5ef2aSThomas Huth } 198fcf5ef2aSThomas Huth 199fcf5ef2aSThomas Huth static void gen_read_sr(TCGv dst) 200fcf5ef2aSThomas Huth { 201fcf5ef2aSThomas Huth TCGv t0 = tcg_temp_new(); 202fcf5ef2aSThomas Huth tcg_gen_shli_i32(t0, cpu_sr_q, SR_Q); 203fcf5ef2aSThomas Huth tcg_gen_or_i32(dst, dst, t0); 204fcf5ef2aSThomas Huth tcg_gen_shli_i32(t0, cpu_sr_m, SR_M); 205fcf5ef2aSThomas Huth tcg_gen_or_i32(dst, dst, t0); 206fcf5ef2aSThomas Huth tcg_gen_shli_i32(t0, cpu_sr_t, SR_T); 207fcf5ef2aSThomas Huth tcg_gen_or_i32(dst, cpu_sr, t0); 208fcf5ef2aSThomas Huth tcg_temp_free_i32(t0); 209fcf5ef2aSThomas Huth } 210fcf5ef2aSThomas Huth 211fcf5ef2aSThomas Huth static void gen_write_sr(TCGv src) 212fcf5ef2aSThomas Huth { 213fcf5ef2aSThomas Huth tcg_gen_andi_i32(cpu_sr, src, 214fcf5ef2aSThomas Huth ~((1u << SR_Q) | (1u << SR_M) | (1u << SR_T))); 215a380f9dbSAurelien Jarno tcg_gen_extract_i32(cpu_sr_q, src, SR_Q, 1); 216a380f9dbSAurelien Jarno tcg_gen_extract_i32(cpu_sr_m, src, SR_M, 1); 217a380f9dbSAurelien Jarno tcg_gen_extract_i32(cpu_sr_t, src, SR_T, 1); 218fcf5ef2aSThomas Huth } 219fcf5ef2aSThomas Huth 220ac9707eaSAurelien Jarno static inline void gen_save_cpu_state(DisasContext *ctx, bool save_pc) 221ac9707eaSAurelien Jarno { 222ac9707eaSAurelien Jarno if (save_pc) { 223ac9707eaSAurelien Jarno tcg_gen_movi_i32(cpu_pc, ctx->pc); 224ac9707eaSAurelien Jarno } 225ac9707eaSAurelien Jarno if (ctx->delayed_pc != (uint32_t) -1) { 226ac9707eaSAurelien Jarno tcg_gen_movi_i32(cpu_delayed_pc, ctx->delayed_pc); 227ac9707eaSAurelien Jarno } 228e1933d14SRichard Henderson if ((ctx->tbflags & TB_FLAG_ENVFLAGS_MASK) != ctx->envflags) { 229ac9707eaSAurelien Jarno tcg_gen_movi_i32(cpu_flags, ctx->envflags); 230ac9707eaSAurelien Jarno } 231ac9707eaSAurelien Jarno } 232ac9707eaSAurelien Jarno 233fcf5ef2aSThomas Huth static inline bool use_goto_tb(DisasContext *ctx, target_ulong dest) 234fcf5ef2aSThomas Huth { 235fcf5ef2aSThomas Huth if (unlikely(ctx->singlestep_enabled)) { 236fcf5ef2aSThomas Huth return false; 237fcf5ef2aSThomas Huth } 2384bfa602bSRichard Henderson if (ctx->tbflags & GUSA_EXCLUSIVE) { 2394bfa602bSRichard Henderson return false; 2404bfa602bSRichard Henderson } 241fcf5ef2aSThomas Huth #ifndef CONFIG_USER_ONLY 242fcf5ef2aSThomas Huth return (ctx->tb->pc & TARGET_PAGE_MASK) == (dest & TARGET_PAGE_MASK); 243fcf5ef2aSThomas Huth #else 244fcf5ef2aSThomas Huth return true; 245fcf5ef2aSThomas Huth #endif 246fcf5ef2aSThomas Huth } 247fcf5ef2aSThomas Huth 248fcf5ef2aSThomas Huth static void gen_goto_tb(DisasContext *ctx, int n, target_ulong dest) 249fcf5ef2aSThomas Huth { 250fcf5ef2aSThomas Huth if (use_goto_tb(ctx, dest)) { 251fcf5ef2aSThomas Huth /* Use a direct jump if in same page and singlestep not enabled */ 252fcf5ef2aSThomas Huth tcg_gen_goto_tb(n); 253fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_pc, dest); 254fcf5ef2aSThomas Huth tcg_gen_exit_tb((uintptr_t)ctx->tb + n); 255fcf5ef2aSThomas Huth } else { 256fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_pc, dest); 257fcf5ef2aSThomas Huth if (ctx->singlestep_enabled) 258fcf5ef2aSThomas Huth gen_helper_debug(cpu_env); 259fcf5ef2aSThomas Huth tcg_gen_exit_tb(0); 260fcf5ef2aSThomas Huth } 261fcf5ef2aSThomas Huth } 262fcf5ef2aSThomas Huth 263fcf5ef2aSThomas Huth static void gen_jump(DisasContext * ctx) 264fcf5ef2aSThomas Huth { 265fcf5ef2aSThomas Huth if (ctx->delayed_pc == (uint32_t) - 1) { 266fcf5ef2aSThomas Huth /* Target is not statically known, it comes necessarily from a 267fcf5ef2aSThomas Huth delayed jump as immediate jump are conditinal jumps */ 268fcf5ef2aSThomas Huth tcg_gen_mov_i32(cpu_pc, cpu_delayed_pc); 269ac9707eaSAurelien Jarno tcg_gen_discard_i32(cpu_delayed_pc); 270fcf5ef2aSThomas Huth if (ctx->singlestep_enabled) 271fcf5ef2aSThomas Huth gen_helper_debug(cpu_env); 272fcf5ef2aSThomas Huth tcg_gen_exit_tb(0); 273fcf5ef2aSThomas Huth } else { 274fcf5ef2aSThomas Huth gen_goto_tb(ctx, 0, ctx->delayed_pc); 275fcf5ef2aSThomas Huth } 276fcf5ef2aSThomas Huth } 277fcf5ef2aSThomas Huth 278fcf5ef2aSThomas Huth /* Immediate conditional jump (bt or bf) */ 2794bfa602bSRichard Henderson static void gen_conditional_jump(DisasContext *ctx, target_ulong dest, 2804bfa602bSRichard Henderson bool jump_if_true) 281fcf5ef2aSThomas Huth { 282fcf5ef2aSThomas Huth TCGLabel *l1 = gen_new_label(); 2834bfa602bSRichard Henderson TCGCond cond_not_taken = jump_if_true ? TCG_COND_EQ : TCG_COND_NE; 2844bfa602bSRichard Henderson 2854bfa602bSRichard Henderson if (ctx->tbflags & GUSA_EXCLUSIVE) { 2864bfa602bSRichard Henderson /* When in an exclusive region, we must continue to the end. 2874bfa602bSRichard Henderson Therefore, exit the region on a taken branch, but otherwise 2884bfa602bSRichard Henderson fall through to the next instruction. */ 2894bfa602bSRichard Henderson tcg_gen_brcondi_i32(cond_not_taken, cpu_sr_t, 0, l1); 2904bfa602bSRichard Henderson tcg_gen_movi_i32(cpu_flags, ctx->envflags & ~GUSA_MASK); 2914bfa602bSRichard Henderson /* Note that this won't actually use a goto_tb opcode because we 2924bfa602bSRichard Henderson disallow it in use_goto_tb, but it handles exit + singlestep. */ 2934bfa602bSRichard Henderson gen_goto_tb(ctx, 0, dest); 294fcf5ef2aSThomas Huth gen_set_label(l1); 2954bfa602bSRichard Henderson return; 2964bfa602bSRichard Henderson } 2974bfa602bSRichard Henderson 2984bfa602bSRichard Henderson gen_save_cpu_state(ctx, false); 2994bfa602bSRichard Henderson tcg_gen_brcondi_i32(cond_not_taken, cpu_sr_t, 0, l1); 3004bfa602bSRichard Henderson gen_goto_tb(ctx, 0, dest); 3014bfa602bSRichard Henderson gen_set_label(l1); 3024bfa602bSRichard Henderson gen_goto_tb(ctx, 1, ctx->pc + 2); 303b3995c23SAurelien Jarno ctx->bstate = BS_BRANCH; 304fcf5ef2aSThomas Huth } 305fcf5ef2aSThomas Huth 306fcf5ef2aSThomas Huth /* Delayed conditional jump (bt or bf) */ 307fcf5ef2aSThomas Huth static void gen_delayed_conditional_jump(DisasContext * ctx) 308fcf5ef2aSThomas Huth { 3094bfa602bSRichard Henderson TCGLabel *l1 = gen_new_label(); 3104bfa602bSRichard Henderson TCGv ds = tcg_temp_new(); 311fcf5ef2aSThomas Huth 31247b9f4d5SAurelien Jarno tcg_gen_mov_i32(ds, cpu_delayed_cond); 31347b9f4d5SAurelien Jarno tcg_gen_discard_i32(cpu_delayed_cond); 3144bfa602bSRichard Henderson 3154bfa602bSRichard Henderson if (ctx->tbflags & GUSA_EXCLUSIVE) { 3164bfa602bSRichard Henderson /* When in an exclusive region, we must continue to the end. 3174bfa602bSRichard Henderson Therefore, exit the region on a taken branch, but otherwise 3184bfa602bSRichard Henderson fall through to the next instruction. */ 3194bfa602bSRichard Henderson tcg_gen_brcondi_i32(TCG_COND_EQ, ds, 0, l1); 3204bfa602bSRichard Henderson 3214bfa602bSRichard Henderson /* Leave the gUSA region. */ 3224bfa602bSRichard Henderson tcg_gen_movi_i32(cpu_flags, ctx->envflags & ~GUSA_MASK); 3234bfa602bSRichard Henderson gen_jump(ctx); 3244bfa602bSRichard Henderson 3254bfa602bSRichard Henderson gen_set_label(l1); 3264bfa602bSRichard Henderson return; 3274bfa602bSRichard Henderson } 3284bfa602bSRichard Henderson 329fcf5ef2aSThomas Huth tcg_gen_brcondi_i32(TCG_COND_NE, ds, 0, l1); 330fcf5ef2aSThomas Huth gen_goto_tb(ctx, 1, ctx->pc + 2); 331fcf5ef2aSThomas Huth gen_set_label(l1); 332fcf5ef2aSThomas Huth gen_jump(ctx); 333fcf5ef2aSThomas Huth } 334fcf5ef2aSThomas Huth 335e5d8053eSRichard Henderson static inline void gen_load_fpr64(DisasContext *ctx, TCGv_i64 t, int reg) 336fcf5ef2aSThomas Huth { 3371e0b21d8SRichard Henderson /* We have already signaled illegal instruction for odd Dr. */ 3381e0b21d8SRichard Henderson tcg_debug_assert((reg & 1) == 0); 3391e0b21d8SRichard Henderson reg ^= ctx->fbank; 340fcf5ef2aSThomas Huth tcg_gen_concat_i32_i64(t, cpu_fregs[reg + 1], cpu_fregs[reg]); 341fcf5ef2aSThomas Huth } 342fcf5ef2aSThomas Huth 343e5d8053eSRichard Henderson static inline void gen_store_fpr64(DisasContext *ctx, TCGv_i64 t, int reg) 344fcf5ef2aSThomas Huth { 3451e0b21d8SRichard Henderson /* We have already signaled illegal instruction for odd Dr. */ 3461e0b21d8SRichard Henderson tcg_debug_assert((reg & 1) == 0); 3471e0b21d8SRichard Henderson reg ^= ctx->fbank; 34858d2a9aeSAurelien Jarno tcg_gen_extr_i64_i32(cpu_fregs[reg + 1], cpu_fregs[reg], t); 349fcf5ef2aSThomas Huth } 350fcf5ef2aSThomas Huth 351fcf5ef2aSThomas Huth #define B3_0 (ctx->opcode & 0xf) 352fcf5ef2aSThomas Huth #define B6_4 ((ctx->opcode >> 4) & 0x7) 353fcf5ef2aSThomas Huth #define B7_4 ((ctx->opcode >> 4) & 0xf) 354fcf5ef2aSThomas Huth #define B7_0 (ctx->opcode & 0xff) 355fcf5ef2aSThomas Huth #define B7_0s ((int32_t) (int8_t) (ctx->opcode & 0xff)) 356fcf5ef2aSThomas Huth #define B11_0s (ctx->opcode & 0x800 ? 0xfffff000 | (ctx->opcode & 0xfff) : \ 357fcf5ef2aSThomas Huth (ctx->opcode & 0xfff)) 358fcf5ef2aSThomas Huth #define B11_8 ((ctx->opcode >> 8) & 0xf) 359fcf5ef2aSThomas Huth #define B15_12 ((ctx->opcode >> 12) & 0xf) 360fcf5ef2aSThomas Huth 3613a3bb8d2SRichard Henderson #define REG(x) cpu_gregs[(x) ^ ctx->gbank] 3623a3bb8d2SRichard Henderson #define ALTREG(x) cpu_gregs[(x) ^ ctx->gbank ^ 0x10] 3635c13bad9SRichard Henderson #define FREG(x) cpu_fregs[(x) ^ ctx->fbank] 364fcf5ef2aSThomas Huth 365fcf5ef2aSThomas Huth #define XHACK(x) ((((x) & 1 ) << 4) | ((x) & 0xe)) 366fcf5ef2aSThomas Huth 367fcf5ef2aSThomas Huth #define CHECK_NOT_DELAY_SLOT \ 3689a562ae7SAurelien Jarno if (ctx->envflags & DELAY_SLOT_MASK) { \ 369ac9707eaSAurelien Jarno gen_save_cpu_state(ctx, true); \ 370fcf5ef2aSThomas Huth gen_helper_raise_slot_illegal_instruction(cpu_env); \ 37163205665SAurelien Jarno ctx->bstate = BS_EXCP; \ 372fcf5ef2aSThomas Huth return; \ 373fcf5ef2aSThomas Huth } 374fcf5ef2aSThomas Huth 375fcf5ef2aSThomas Huth #define CHECK_PRIVILEGED \ 376fcf5ef2aSThomas Huth if (IS_USER(ctx)) { \ 377ac9707eaSAurelien Jarno gen_save_cpu_state(ctx, true); \ 3789a562ae7SAurelien Jarno if (ctx->envflags & DELAY_SLOT_MASK) { \ 379fcf5ef2aSThomas Huth gen_helper_raise_slot_illegal_instruction(cpu_env); \ 380fcf5ef2aSThomas Huth } else { \ 381fcf5ef2aSThomas Huth gen_helper_raise_illegal_instruction(cpu_env); \ 382fcf5ef2aSThomas Huth } \ 38363205665SAurelien Jarno ctx->bstate = BS_EXCP; \ 384fcf5ef2aSThomas Huth return; \ 385fcf5ef2aSThomas Huth } 386fcf5ef2aSThomas Huth 387fcf5ef2aSThomas Huth #define CHECK_FPU_ENABLED \ 388a6215749SAurelien Jarno if (ctx->tbflags & (1u << SR_FD)) { \ 389ac9707eaSAurelien Jarno gen_save_cpu_state(ctx, true); \ 3909a562ae7SAurelien Jarno if (ctx->envflags & DELAY_SLOT_MASK) { \ 391fcf5ef2aSThomas Huth gen_helper_raise_slot_fpu_disable(cpu_env); \ 392fcf5ef2aSThomas Huth } else { \ 393fcf5ef2aSThomas Huth gen_helper_raise_fpu_disable(cpu_env); \ 394fcf5ef2aSThomas Huth } \ 39563205665SAurelien Jarno ctx->bstate = BS_EXCP; \ 396fcf5ef2aSThomas Huth return; \ 397fcf5ef2aSThomas Huth } 398fcf5ef2aSThomas Huth 399fcf5ef2aSThomas Huth static void _decode_opc(DisasContext * ctx) 400fcf5ef2aSThomas Huth { 401fcf5ef2aSThomas Huth /* This code tries to make movcal emulation sufficiently 402fcf5ef2aSThomas Huth accurate for Linux purposes. This instruction writes 403fcf5ef2aSThomas Huth memory, and prior to that, always allocates a cache line. 404fcf5ef2aSThomas Huth It is used in two contexts: 405fcf5ef2aSThomas Huth - in memcpy, where data is copied in blocks, the first write 406fcf5ef2aSThomas Huth of to a block uses movca.l for performance. 407fcf5ef2aSThomas Huth - in arch/sh/mm/cache-sh4.c, movcal.l + ocbi combination is used 408fcf5ef2aSThomas Huth to flush the cache. Here, the data written by movcal.l is never 409fcf5ef2aSThomas Huth written to memory, and the data written is just bogus. 410fcf5ef2aSThomas Huth 411fcf5ef2aSThomas Huth To simulate this, we simulate movcal.l, we store the value to memory, 412fcf5ef2aSThomas Huth but we also remember the previous content. If we see ocbi, we check 413fcf5ef2aSThomas Huth if movcal.l for that address was done previously. If so, the write should 414fcf5ef2aSThomas Huth not have hit the memory, so we restore the previous content. 415fcf5ef2aSThomas Huth When we see an instruction that is neither movca.l 416fcf5ef2aSThomas Huth nor ocbi, the previous content is discarded. 417fcf5ef2aSThomas Huth 418fcf5ef2aSThomas Huth To optimize, we only try to flush stores when we're at the start of 419fcf5ef2aSThomas Huth TB, or if we already saw movca.l in this TB and did not flush stores 420fcf5ef2aSThomas Huth yet. */ 421fcf5ef2aSThomas Huth if (ctx->has_movcal) 422fcf5ef2aSThomas Huth { 423fcf5ef2aSThomas Huth int opcode = ctx->opcode & 0xf0ff; 424fcf5ef2aSThomas Huth if (opcode != 0x0093 /* ocbi */ 425fcf5ef2aSThomas Huth && opcode != 0x00c3 /* movca.l */) 426fcf5ef2aSThomas Huth { 427fcf5ef2aSThomas Huth gen_helper_discard_movcal_backup(cpu_env); 428fcf5ef2aSThomas Huth ctx->has_movcal = 0; 429fcf5ef2aSThomas Huth } 430fcf5ef2aSThomas Huth } 431fcf5ef2aSThomas Huth 432fcf5ef2aSThomas Huth #if 0 433fcf5ef2aSThomas Huth fprintf(stderr, "Translating opcode 0x%04x\n", ctx->opcode); 434fcf5ef2aSThomas Huth #endif 435fcf5ef2aSThomas Huth 436fcf5ef2aSThomas Huth switch (ctx->opcode) { 437fcf5ef2aSThomas Huth case 0x0019: /* div0u */ 438fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_sr_m, 0); 439fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_sr_q, 0); 440fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_sr_t, 0); 441fcf5ef2aSThomas Huth return; 442fcf5ef2aSThomas Huth case 0x000b: /* rts */ 443fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 444fcf5ef2aSThomas Huth tcg_gen_mov_i32(cpu_delayed_pc, cpu_pr); 445a6215749SAurelien Jarno ctx->envflags |= DELAY_SLOT; 446fcf5ef2aSThomas Huth ctx->delayed_pc = (uint32_t) - 1; 447fcf5ef2aSThomas Huth return; 448fcf5ef2aSThomas Huth case 0x0028: /* clrmac */ 449fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_mach, 0); 450fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_macl, 0); 451fcf5ef2aSThomas Huth return; 452fcf5ef2aSThomas Huth case 0x0048: /* clrs */ 453fcf5ef2aSThomas Huth tcg_gen_andi_i32(cpu_sr, cpu_sr, ~(1u << SR_S)); 454fcf5ef2aSThomas Huth return; 455fcf5ef2aSThomas Huth case 0x0008: /* clrt */ 456fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_sr_t, 0); 457fcf5ef2aSThomas Huth return; 458fcf5ef2aSThomas Huth case 0x0038: /* ldtlb */ 459fcf5ef2aSThomas Huth CHECK_PRIVILEGED 460fcf5ef2aSThomas Huth gen_helper_ldtlb(cpu_env); 461fcf5ef2aSThomas Huth return; 462fcf5ef2aSThomas Huth case 0x002b: /* rte */ 463fcf5ef2aSThomas Huth CHECK_PRIVILEGED 464fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 465fcf5ef2aSThomas Huth gen_write_sr(cpu_ssr); 466fcf5ef2aSThomas Huth tcg_gen_mov_i32(cpu_delayed_pc, cpu_spc); 467be53081aSAurelien Jarno ctx->envflags |= DELAY_SLOT_RTE; 468fcf5ef2aSThomas Huth ctx->delayed_pc = (uint32_t) - 1; 469be53081aSAurelien Jarno ctx->bstate = BS_STOP; 470fcf5ef2aSThomas Huth return; 471fcf5ef2aSThomas Huth case 0x0058: /* sets */ 472fcf5ef2aSThomas Huth tcg_gen_ori_i32(cpu_sr, cpu_sr, (1u << SR_S)); 473fcf5ef2aSThomas Huth return; 474fcf5ef2aSThomas Huth case 0x0018: /* sett */ 475fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_sr_t, 1); 476fcf5ef2aSThomas Huth return; 477fcf5ef2aSThomas Huth case 0xfbfd: /* frchg */ 478fcf5ef2aSThomas Huth tcg_gen_xori_i32(cpu_fpscr, cpu_fpscr, FPSCR_FR); 479fcf5ef2aSThomas Huth ctx->bstate = BS_STOP; 480fcf5ef2aSThomas Huth return; 481fcf5ef2aSThomas Huth case 0xf3fd: /* fschg */ 482fcf5ef2aSThomas Huth tcg_gen_xori_i32(cpu_fpscr, cpu_fpscr, FPSCR_SZ); 483fcf5ef2aSThomas Huth ctx->bstate = BS_STOP; 484fcf5ef2aSThomas Huth return; 485fcf5ef2aSThomas Huth case 0x0009: /* nop */ 486fcf5ef2aSThomas Huth return; 487fcf5ef2aSThomas Huth case 0x001b: /* sleep */ 488fcf5ef2aSThomas Huth CHECK_PRIVILEGED 489fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_pc, ctx->pc + 2); 490fcf5ef2aSThomas Huth gen_helper_sleep(cpu_env); 491fcf5ef2aSThomas Huth return; 492fcf5ef2aSThomas Huth } 493fcf5ef2aSThomas Huth 494fcf5ef2aSThomas Huth switch (ctx->opcode & 0xf000) { 495fcf5ef2aSThomas Huth case 0x1000: /* mov.l Rm,@(disp,Rn) */ 496fcf5ef2aSThomas Huth { 497fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 498fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, REG(B11_8), B3_0 * 4); 499fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(B7_4), addr, ctx->memidx, MO_TEUL); 500fcf5ef2aSThomas Huth tcg_temp_free(addr); 501fcf5ef2aSThomas Huth } 502fcf5ef2aSThomas Huth return; 503fcf5ef2aSThomas Huth case 0x5000: /* mov.l @(disp,Rm),Rn */ 504fcf5ef2aSThomas Huth { 505fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 506fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, REG(B7_4), B3_0 * 4); 507fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), addr, ctx->memidx, MO_TESL); 508fcf5ef2aSThomas Huth tcg_temp_free(addr); 509fcf5ef2aSThomas Huth } 510fcf5ef2aSThomas Huth return; 511fcf5ef2aSThomas Huth case 0xe000: /* mov #imm,Rn */ 5124bfa602bSRichard Henderson #ifdef CONFIG_USER_ONLY 5134bfa602bSRichard Henderson /* Detect the start of a gUSA region. If so, update envflags 5144bfa602bSRichard Henderson and end the TB. This will allow us to see the end of the 5154bfa602bSRichard Henderson region (stored in R0) in the next TB. */ 5164bfa602bSRichard Henderson if (B11_8 == 15 && B7_0s < 0 && parallel_cpus) { 5174bfa602bSRichard Henderson ctx->envflags = deposit32(ctx->envflags, GUSA_SHIFT, 8, B7_0s); 5184bfa602bSRichard Henderson ctx->bstate = BS_STOP; 5194bfa602bSRichard Henderson } 5204bfa602bSRichard Henderson #endif 521fcf5ef2aSThomas Huth tcg_gen_movi_i32(REG(B11_8), B7_0s); 522fcf5ef2aSThomas Huth return; 523fcf5ef2aSThomas Huth case 0x9000: /* mov.w @(disp,PC),Rn */ 524fcf5ef2aSThomas Huth { 525fcf5ef2aSThomas Huth TCGv addr = tcg_const_i32(ctx->pc + 4 + B7_0 * 2); 526fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), addr, ctx->memidx, MO_TESW); 527fcf5ef2aSThomas Huth tcg_temp_free(addr); 528fcf5ef2aSThomas Huth } 529fcf5ef2aSThomas Huth return; 530fcf5ef2aSThomas Huth case 0xd000: /* mov.l @(disp,PC),Rn */ 531fcf5ef2aSThomas Huth { 532fcf5ef2aSThomas Huth TCGv addr = tcg_const_i32((ctx->pc + 4 + B7_0 * 4) & ~3); 533fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), addr, ctx->memidx, MO_TESL); 534fcf5ef2aSThomas Huth tcg_temp_free(addr); 535fcf5ef2aSThomas Huth } 536fcf5ef2aSThomas Huth return; 537fcf5ef2aSThomas Huth case 0x7000: /* add #imm,Rn */ 538fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B11_8), REG(B11_8), B7_0s); 539fcf5ef2aSThomas Huth return; 540fcf5ef2aSThomas Huth case 0xa000: /* bra disp */ 541fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 542fcf5ef2aSThomas Huth ctx->delayed_pc = ctx->pc + 4 + B11_0s * 2; 543a6215749SAurelien Jarno ctx->envflags |= DELAY_SLOT; 544fcf5ef2aSThomas Huth return; 545fcf5ef2aSThomas Huth case 0xb000: /* bsr disp */ 546fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 547fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_pr, ctx->pc + 4); 548fcf5ef2aSThomas Huth ctx->delayed_pc = ctx->pc + 4 + B11_0s * 2; 549a6215749SAurelien Jarno ctx->envflags |= DELAY_SLOT; 550fcf5ef2aSThomas Huth return; 551fcf5ef2aSThomas Huth } 552fcf5ef2aSThomas Huth 553fcf5ef2aSThomas Huth switch (ctx->opcode & 0xf00f) { 554fcf5ef2aSThomas Huth case 0x6003: /* mov Rm,Rn */ 555fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), REG(B7_4)); 556fcf5ef2aSThomas Huth return; 557fcf5ef2aSThomas Huth case 0x2000: /* mov.b Rm,@Rn */ 558fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(B7_4), REG(B11_8), ctx->memidx, MO_UB); 559fcf5ef2aSThomas Huth return; 560fcf5ef2aSThomas Huth case 0x2001: /* mov.w Rm,@Rn */ 561fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(B7_4), REG(B11_8), ctx->memidx, MO_TEUW); 562fcf5ef2aSThomas Huth return; 563fcf5ef2aSThomas Huth case 0x2002: /* mov.l Rm,@Rn */ 564fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(B7_4), REG(B11_8), ctx->memidx, MO_TEUL); 565fcf5ef2aSThomas Huth return; 566fcf5ef2aSThomas Huth case 0x6000: /* mov.b @Rm,Rn */ 567fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), REG(B7_4), ctx->memidx, MO_SB); 568fcf5ef2aSThomas Huth return; 569fcf5ef2aSThomas Huth case 0x6001: /* mov.w @Rm,Rn */ 570fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), REG(B7_4), ctx->memidx, MO_TESW); 571fcf5ef2aSThomas Huth return; 572fcf5ef2aSThomas Huth case 0x6002: /* mov.l @Rm,Rn */ 573fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), REG(B7_4), ctx->memidx, MO_TESL); 574fcf5ef2aSThomas Huth return; 575fcf5ef2aSThomas Huth case 0x2004: /* mov.b Rm,@-Rn */ 576fcf5ef2aSThomas Huth { 577fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 578fcf5ef2aSThomas Huth tcg_gen_subi_i32(addr, REG(B11_8), 1); 579fcf5ef2aSThomas Huth /* might cause re-execution */ 580fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(B7_4), addr, ctx->memidx, MO_UB); 581fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), addr); /* modify register status */ 582fcf5ef2aSThomas Huth tcg_temp_free(addr); 583fcf5ef2aSThomas Huth } 584fcf5ef2aSThomas Huth return; 585fcf5ef2aSThomas Huth case 0x2005: /* mov.w Rm,@-Rn */ 586fcf5ef2aSThomas Huth { 587fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 588fcf5ef2aSThomas Huth tcg_gen_subi_i32(addr, REG(B11_8), 2); 589fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(B7_4), addr, ctx->memidx, MO_TEUW); 590fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), addr); 591fcf5ef2aSThomas Huth tcg_temp_free(addr); 592fcf5ef2aSThomas Huth } 593fcf5ef2aSThomas Huth return; 594fcf5ef2aSThomas Huth case 0x2006: /* mov.l Rm,@-Rn */ 595fcf5ef2aSThomas Huth { 596fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 597fcf5ef2aSThomas Huth tcg_gen_subi_i32(addr, REG(B11_8), 4); 598fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(B7_4), addr, ctx->memidx, MO_TEUL); 599fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), addr); 600fcf5ef2aSThomas Huth } 601fcf5ef2aSThomas Huth return; 602fcf5ef2aSThomas Huth case 0x6004: /* mov.b @Rm+,Rn */ 603fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), REG(B7_4), ctx->memidx, MO_SB); 604fcf5ef2aSThomas Huth if ( B11_8 != B7_4 ) 605fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B7_4), REG(B7_4), 1); 606fcf5ef2aSThomas Huth return; 607fcf5ef2aSThomas Huth case 0x6005: /* mov.w @Rm+,Rn */ 608fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), REG(B7_4), ctx->memidx, MO_TESW); 609fcf5ef2aSThomas Huth if ( B11_8 != B7_4 ) 610fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B7_4), REG(B7_4), 2); 611fcf5ef2aSThomas Huth return; 612fcf5ef2aSThomas Huth case 0x6006: /* mov.l @Rm+,Rn */ 613fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), REG(B7_4), ctx->memidx, MO_TESL); 614fcf5ef2aSThomas Huth if ( B11_8 != B7_4 ) 615fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B7_4), REG(B7_4), 4); 616fcf5ef2aSThomas Huth return; 617fcf5ef2aSThomas Huth case 0x0004: /* mov.b Rm,@(R0,Rn) */ 618fcf5ef2aSThomas Huth { 619fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 620fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(B11_8), REG(0)); 621fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(B7_4), addr, ctx->memidx, MO_UB); 622fcf5ef2aSThomas Huth tcg_temp_free(addr); 623fcf5ef2aSThomas Huth } 624fcf5ef2aSThomas Huth return; 625fcf5ef2aSThomas Huth case 0x0005: /* mov.w Rm,@(R0,Rn) */ 626fcf5ef2aSThomas Huth { 627fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 628fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(B11_8), REG(0)); 629fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(B7_4), addr, ctx->memidx, MO_TEUW); 630fcf5ef2aSThomas Huth tcg_temp_free(addr); 631fcf5ef2aSThomas Huth } 632fcf5ef2aSThomas Huth return; 633fcf5ef2aSThomas Huth case 0x0006: /* mov.l Rm,@(R0,Rn) */ 634fcf5ef2aSThomas Huth { 635fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 636fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(B11_8), REG(0)); 637fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(B7_4), addr, ctx->memidx, MO_TEUL); 638fcf5ef2aSThomas Huth tcg_temp_free(addr); 639fcf5ef2aSThomas Huth } 640fcf5ef2aSThomas Huth return; 641fcf5ef2aSThomas Huth case 0x000c: /* mov.b @(R0,Rm),Rn */ 642fcf5ef2aSThomas Huth { 643fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 644fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(B7_4), REG(0)); 645fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), addr, ctx->memidx, MO_SB); 646fcf5ef2aSThomas Huth tcg_temp_free(addr); 647fcf5ef2aSThomas Huth } 648fcf5ef2aSThomas Huth return; 649fcf5ef2aSThomas Huth case 0x000d: /* mov.w @(R0,Rm),Rn */ 650fcf5ef2aSThomas Huth { 651fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 652fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(B7_4), REG(0)); 653fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), addr, ctx->memidx, MO_TESW); 654fcf5ef2aSThomas Huth tcg_temp_free(addr); 655fcf5ef2aSThomas Huth } 656fcf5ef2aSThomas Huth return; 657fcf5ef2aSThomas Huth case 0x000e: /* mov.l @(R0,Rm),Rn */ 658fcf5ef2aSThomas Huth { 659fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 660fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(B7_4), REG(0)); 661fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(B11_8), addr, ctx->memidx, MO_TESL); 662fcf5ef2aSThomas Huth tcg_temp_free(addr); 663fcf5ef2aSThomas Huth } 664fcf5ef2aSThomas Huth return; 665fcf5ef2aSThomas Huth case 0x6008: /* swap.b Rm,Rn */ 666fcf5ef2aSThomas Huth { 667fcf5ef2aSThomas Huth TCGv low = tcg_temp_new();; 668fcf5ef2aSThomas Huth tcg_gen_ext16u_i32(low, REG(B7_4)); 669fcf5ef2aSThomas Huth tcg_gen_bswap16_i32(low, low); 670fcf5ef2aSThomas Huth tcg_gen_deposit_i32(REG(B11_8), REG(B7_4), low, 0, 16); 671fcf5ef2aSThomas Huth tcg_temp_free(low); 672fcf5ef2aSThomas Huth } 673fcf5ef2aSThomas Huth return; 674fcf5ef2aSThomas Huth case 0x6009: /* swap.w Rm,Rn */ 675fcf5ef2aSThomas Huth tcg_gen_rotli_i32(REG(B11_8), REG(B7_4), 16); 676fcf5ef2aSThomas Huth return; 677fcf5ef2aSThomas Huth case 0x200d: /* xtrct Rm,Rn */ 678fcf5ef2aSThomas Huth { 679fcf5ef2aSThomas Huth TCGv high, low; 680fcf5ef2aSThomas Huth high = tcg_temp_new(); 681fcf5ef2aSThomas Huth tcg_gen_shli_i32(high, REG(B7_4), 16); 682fcf5ef2aSThomas Huth low = tcg_temp_new(); 683fcf5ef2aSThomas Huth tcg_gen_shri_i32(low, REG(B11_8), 16); 684fcf5ef2aSThomas Huth tcg_gen_or_i32(REG(B11_8), high, low); 685fcf5ef2aSThomas Huth tcg_temp_free(low); 686fcf5ef2aSThomas Huth tcg_temp_free(high); 687fcf5ef2aSThomas Huth } 688fcf5ef2aSThomas Huth return; 689fcf5ef2aSThomas Huth case 0x300c: /* add Rm,Rn */ 690fcf5ef2aSThomas Huth tcg_gen_add_i32(REG(B11_8), REG(B11_8), REG(B7_4)); 691fcf5ef2aSThomas Huth return; 692fcf5ef2aSThomas Huth case 0x300e: /* addc Rm,Rn */ 693fcf5ef2aSThomas Huth { 694fcf5ef2aSThomas Huth TCGv t0, t1; 695fcf5ef2aSThomas Huth t0 = tcg_const_tl(0); 696fcf5ef2aSThomas Huth t1 = tcg_temp_new(); 697fcf5ef2aSThomas Huth tcg_gen_add2_i32(t1, cpu_sr_t, cpu_sr_t, t0, REG(B7_4), t0); 698fcf5ef2aSThomas Huth tcg_gen_add2_i32(REG(B11_8), cpu_sr_t, 699fcf5ef2aSThomas Huth REG(B11_8), t0, t1, cpu_sr_t); 700fcf5ef2aSThomas Huth tcg_temp_free(t0); 701fcf5ef2aSThomas Huth tcg_temp_free(t1); 702fcf5ef2aSThomas Huth } 703fcf5ef2aSThomas Huth return; 704fcf5ef2aSThomas Huth case 0x300f: /* addv Rm,Rn */ 705fcf5ef2aSThomas Huth { 706fcf5ef2aSThomas Huth TCGv t0, t1, t2; 707fcf5ef2aSThomas Huth t0 = tcg_temp_new(); 708fcf5ef2aSThomas Huth tcg_gen_add_i32(t0, REG(B7_4), REG(B11_8)); 709fcf5ef2aSThomas Huth t1 = tcg_temp_new(); 710fcf5ef2aSThomas Huth tcg_gen_xor_i32(t1, t0, REG(B11_8)); 711fcf5ef2aSThomas Huth t2 = tcg_temp_new(); 712fcf5ef2aSThomas Huth tcg_gen_xor_i32(t2, REG(B7_4), REG(B11_8)); 713fcf5ef2aSThomas Huth tcg_gen_andc_i32(cpu_sr_t, t1, t2); 714fcf5ef2aSThomas Huth tcg_temp_free(t2); 715fcf5ef2aSThomas Huth tcg_gen_shri_i32(cpu_sr_t, cpu_sr_t, 31); 716fcf5ef2aSThomas Huth tcg_temp_free(t1); 717fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B7_4), t0); 718fcf5ef2aSThomas Huth tcg_temp_free(t0); 719fcf5ef2aSThomas Huth } 720fcf5ef2aSThomas Huth return; 721fcf5ef2aSThomas Huth case 0x2009: /* and Rm,Rn */ 722fcf5ef2aSThomas Huth tcg_gen_and_i32(REG(B11_8), REG(B11_8), REG(B7_4)); 723fcf5ef2aSThomas Huth return; 724fcf5ef2aSThomas Huth case 0x3000: /* cmp/eq Rm,Rn */ 725fcf5ef2aSThomas Huth tcg_gen_setcond_i32(TCG_COND_EQ, cpu_sr_t, REG(B11_8), REG(B7_4)); 726fcf5ef2aSThomas Huth return; 727fcf5ef2aSThomas Huth case 0x3003: /* cmp/ge Rm,Rn */ 728fcf5ef2aSThomas Huth tcg_gen_setcond_i32(TCG_COND_GE, cpu_sr_t, REG(B11_8), REG(B7_4)); 729fcf5ef2aSThomas Huth return; 730fcf5ef2aSThomas Huth case 0x3007: /* cmp/gt Rm,Rn */ 731fcf5ef2aSThomas Huth tcg_gen_setcond_i32(TCG_COND_GT, cpu_sr_t, REG(B11_8), REG(B7_4)); 732fcf5ef2aSThomas Huth return; 733fcf5ef2aSThomas Huth case 0x3006: /* cmp/hi Rm,Rn */ 734fcf5ef2aSThomas Huth tcg_gen_setcond_i32(TCG_COND_GTU, cpu_sr_t, REG(B11_8), REG(B7_4)); 735fcf5ef2aSThomas Huth return; 736fcf5ef2aSThomas Huth case 0x3002: /* cmp/hs Rm,Rn */ 737fcf5ef2aSThomas Huth tcg_gen_setcond_i32(TCG_COND_GEU, cpu_sr_t, REG(B11_8), REG(B7_4)); 738fcf5ef2aSThomas Huth return; 739fcf5ef2aSThomas Huth case 0x200c: /* cmp/str Rm,Rn */ 740fcf5ef2aSThomas Huth { 741fcf5ef2aSThomas Huth TCGv cmp1 = tcg_temp_new(); 742fcf5ef2aSThomas Huth TCGv cmp2 = tcg_temp_new(); 743fcf5ef2aSThomas Huth tcg_gen_xor_i32(cmp2, REG(B7_4), REG(B11_8)); 744fcf5ef2aSThomas Huth tcg_gen_subi_i32(cmp1, cmp2, 0x01010101); 745fcf5ef2aSThomas Huth tcg_gen_andc_i32(cmp1, cmp1, cmp2); 746fcf5ef2aSThomas Huth tcg_gen_andi_i32(cmp1, cmp1, 0x80808080); 747fcf5ef2aSThomas Huth tcg_gen_setcondi_i32(TCG_COND_NE, cpu_sr_t, cmp1, 0); 748fcf5ef2aSThomas Huth tcg_temp_free(cmp2); 749fcf5ef2aSThomas Huth tcg_temp_free(cmp1); 750fcf5ef2aSThomas Huth } 751fcf5ef2aSThomas Huth return; 752fcf5ef2aSThomas Huth case 0x2007: /* div0s Rm,Rn */ 753fcf5ef2aSThomas Huth tcg_gen_shri_i32(cpu_sr_q, REG(B11_8), 31); /* SR_Q */ 754fcf5ef2aSThomas Huth tcg_gen_shri_i32(cpu_sr_m, REG(B7_4), 31); /* SR_M */ 755fcf5ef2aSThomas Huth tcg_gen_xor_i32(cpu_sr_t, cpu_sr_q, cpu_sr_m); /* SR_T */ 756fcf5ef2aSThomas Huth return; 757fcf5ef2aSThomas Huth case 0x3004: /* div1 Rm,Rn */ 758fcf5ef2aSThomas Huth { 759fcf5ef2aSThomas Huth TCGv t0 = tcg_temp_new(); 760fcf5ef2aSThomas Huth TCGv t1 = tcg_temp_new(); 761fcf5ef2aSThomas Huth TCGv t2 = tcg_temp_new(); 762fcf5ef2aSThomas Huth TCGv zero = tcg_const_i32(0); 763fcf5ef2aSThomas Huth 764fcf5ef2aSThomas Huth /* shift left arg1, saving the bit being pushed out and inserting 765fcf5ef2aSThomas Huth T on the right */ 766fcf5ef2aSThomas Huth tcg_gen_shri_i32(t0, REG(B11_8), 31); 767fcf5ef2aSThomas Huth tcg_gen_shli_i32(REG(B11_8), REG(B11_8), 1); 768fcf5ef2aSThomas Huth tcg_gen_or_i32(REG(B11_8), REG(B11_8), cpu_sr_t); 769fcf5ef2aSThomas Huth 770fcf5ef2aSThomas Huth /* Add or subtract arg0 from arg1 depending if Q == M. To avoid 771fcf5ef2aSThomas Huth using 64-bit temps, we compute arg0's high part from q ^ m, so 772fcf5ef2aSThomas Huth that it is 0x00000000 when adding the value or 0xffffffff when 773fcf5ef2aSThomas Huth subtracting it. */ 774fcf5ef2aSThomas Huth tcg_gen_xor_i32(t1, cpu_sr_q, cpu_sr_m); 775fcf5ef2aSThomas Huth tcg_gen_subi_i32(t1, t1, 1); 776fcf5ef2aSThomas Huth tcg_gen_neg_i32(t2, REG(B7_4)); 777fcf5ef2aSThomas Huth tcg_gen_movcond_i32(TCG_COND_EQ, t2, t1, zero, REG(B7_4), t2); 778fcf5ef2aSThomas Huth tcg_gen_add2_i32(REG(B11_8), t1, REG(B11_8), zero, t2, t1); 779fcf5ef2aSThomas Huth 780fcf5ef2aSThomas Huth /* compute T and Q depending on carry */ 781fcf5ef2aSThomas Huth tcg_gen_andi_i32(t1, t1, 1); 782fcf5ef2aSThomas Huth tcg_gen_xor_i32(t1, t1, t0); 783fcf5ef2aSThomas Huth tcg_gen_xori_i32(cpu_sr_t, t1, 1); 784fcf5ef2aSThomas Huth tcg_gen_xor_i32(cpu_sr_q, cpu_sr_m, t1); 785fcf5ef2aSThomas Huth 786fcf5ef2aSThomas Huth tcg_temp_free(zero); 787fcf5ef2aSThomas Huth tcg_temp_free(t2); 788fcf5ef2aSThomas Huth tcg_temp_free(t1); 789fcf5ef2aSThomas Huth tcg_temp_free(t0); 790fcf5ef2aSThomas Huth } 791fcf5ef2aSThomas Huth return; 792fcf5ef2aSThomas Huth case 0x300d: /* dmuls.l Rm,Rn */ 793fcf5ef2aSThomas Huth tcg_gen_muls2_i32(cpu_macl, cpu_mach, REG(B7_4), REG(B11_8)); 794fcf5ef2aSThomas Huth return; 795fcf5ef2aSThomas Huth case 0x3005: /* dmulu.l Rm,Rn */ 796fcf5ef2aSThomas Huth tcg_gen_mulu2_i32(cpu_macl, cpu_mach, REG(B7_4), REG(B11_8)); 797fcf5ef2aSThomas Huth return; 798fcf5ef2aSThomas Huth case 0x600e: /* exts.b Rm,Rn */ 799fcf5ef2aSThomas Huth tcg_gen_ext8s_i32(REG(B11_8), REG(B7_4)); 800fcf5ef2aSThomas Huth return; 801fcf5ef2aSThomas Huth case 0x600f: /* exts.w Rm,Rn */ 802fcf5ef2aSThomas Huth tcg_gen_ext16s_i32(REG(B11_8), REG(B7_4)); 803fcf5ef2aSThomas Huth return; 804fcf5ef2aSThomas Huth case 0x600c: /* extu.b Rm,Rn */ 805fcf5ef2aSThomas Huth tcg_gen_ext8u_i32(REG(B11_8), REG(B7_4)); 806fcf5ef2aSThomas Huth return; 807fcf5ef2aSThomas Huth case 0x600d: /* extu.w Rm,Rn */ 808fcf5ef2aSThomas Huth tcg_gen_ext16u_i32(REG(B11_8), REG(B7_4)); 809fcf5ef2aSThomas Huth return; 810fcf5ef2aSThomas Huth case 0x000f: /* mac.l @Rm+,@Rn+ */ 811fcf5ef2aSThomas Huth { 812fcf5ef2aSThomas Huth TCGv arg0, arg1; 813fcf5ef2aSThomas Huth arg0 = tcg_temp_new(); 814fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(arg0, REG(B7_4), ctx->memidx, MO_TESL); 815fcf5ef2aSThomas Huth arg1 = tcg_temp_new(); 816fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(arg1, REG(B11_8), ctx->memidx, MO_TESL); 817fcf5ef2aSThomas Huth gen_helper_macl(cpu_env, arg0, arg1); 818fcf5ef2aSThomas Huth tcg_temp_free(arg1); 819fcf5ef2aSThomas Huth tcg_temp_free(arg0); 820fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B7_4), REG(B7_4), 4); 821fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B11_8), REG(B11_8), 4); 822fcf5ef2aSThomas Huth } 823fcf5ef2aSThomas Huth return; 824fcf5ef2aSThomas Huth case 0x400f: /* mac.w @Rm+,@Rn+ */ 825fcf5ef2aSThomas Huth { 826fcf5ef2aSThomas Huth TCGv arg0, arg1; 827fcf5ef2aSThomas Huth arg0 = tcg_temp_new(); 828fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(arg0, REG(B7_4), ctx->memidx, MO_TESL); 829fcf5ef2aSThomas Huth arg1 = tcg_temp_new(); 830fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(arg1, REG(B11_8), ctx->memidx, MO_TESL); 831fcf5ef2aSThomas Huth gen_helper_macw(cpu_env, arg0, arg1); 832fcf5ef2aSThomas Huth tcg_temp_free(arg1); 833fcf5ef2aSThomas Huth tcg_temp_free(arg0); 834fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B11_8), REG(B11_8), 2); 835fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B7_4), REG(B7_4), 2); 836fcf5ef2aSThomas Huth } 837fcf5ef2aSThomas Huth return; 838fcf5ef2aSThomas Huth case 0x0007: /* mul.l Rm,Rn */ 839fcf5ef2aSThomas Huth tcg_gen_mul_i32(cpu_macl, REG(B7_4), REG(B11_8)); 840fcf5ef2aSThomas Huth return; 841fcf5ef2aSThomas Huth case 0x200f: /* muls.w Rm,Rn */ 842fcf5ef2aSThomas Huth { 843fcf5ef2aSThomas Huth TCGv arg0, arg1; 844fcf5ef2aSThomas Huth arg0 = tcg_temp_new(); 845fcf5ef2aSThomas Huth tcg_gen_ext16s_i32(arg0, REG(B7_4)); 846fcf5ef2aSThomas Huth arg1 = tcg_temp_new(); 847fcf5ef2aSThomas Huth tcg_gen_ext16s_i32(arg1, REG(B11_8)); 848fcf5ef2aSThomas Huth tcg_gen_mul_i32(cpu_macl, arg0, arg1); 849fcf5ef2aSThomas Huth tcg_temp_free(arg1); 850fcf5ef2aSThomas Huth tcg_temp_free(arg0); 851fcf5ef2aSThomas Huth } 852fcf5ef2aSThomas Huth return; 853fcf5ef2aSThomas Huth case 0x200e: /* mulu.w Rm,Rn */ 854fcf5ef2aSThomas Huth { 855fcf5ef2aSThomas Huth TCGv arg0, arg1; 856fcf5ef2aSThomas Huth arg0 = tcg_temp_new(); 857fcf5ef2aSThomas Huth tcg_gen_ext16u_i32(arg0, REG(B7_4)); 858fcf5ef2aSThomas Huth arg1 = tcg_temp_new(); 859fcf5ef2aSThomas Huth tcg_gen_ext16u_i32(arg1, REG(B11_8)); 860fcf5ef2aSThomas Huth tcg_gen_mul_i32(cpu_macl, arg0, arg1); 861fcf5ef2aSThomas Huth tcg_temp_free(arg1); 862fcf5ef2aSThomas Huth tcg_temp_free(arg0); 863fcf5ef2aSThomas Huth } 864fcf5ef2aSThomas Huth return; 865fcf5ef2aSThomas Huth case 0x600b: /* neg Rm,Rn */ 866fcf5ef2aSThomas Huth tcg_gen_neg_i32(REG(B11_8), REG(B7_4)); 867fcf5ef2aSThomas Huth return; 868fcf5ef2aSThomas Huth case 0x600a: /* negc Rm,Rn */ 869fcf5ef2aSThomas Huth { 870fcf5ef2aSThomas Huth TCGv t0 = tcg_const_i32(0); 871fcf5ef2aSThomas Huth tcg_gen_add2_i32(REG(B11_8), cpu_sr_t, 872fcf5ef2aSThomas Huth REG(B7_4), t0, cpu_sr_t, t0); 873fcf5ef2aSThomas Huth tcg_gen_sub2_i32(REG(B11_8), cpu_sr_t, 874fcf5ef2aSThomas Huth t0, t0, REG(B11_8), cpu_sr_t); 875fcf5ef2aSThomas Huth tcg_gen_andi_i32(cpu_sr_t, cpu_sr_t, 1); 876fcf5ef2aSThomas Huth tcg_temp_free(t0); 877fcf5ef2aSThomas Huth } 878fcf5ef2aSThomas Huth return; 879fcf5ef2aSThomas Huth case 0x6007: /* not Rm,Rn */ 880fcf5ef2aSThomas Huth tcg_gen_not_i32(REG(B11_8), REG(B7_4)); 881fcf5ef2aSThomas Huth return; 882fcf5ef2aSThomas Huth case 0x200b: /* or Rm,Rn */ 883fcf5ef2aSThomas Huth tcg_gen_or_i32(REG(B11_8), REG(B11_8), REG(B7_4)); 884fcf5ef2aSThomas Huth return; 885fcf5ef2aSThomas Huth case 0x400c: /* shad Rm,Rn */ 886fcf5ef2aSThomas Huth { 887fcf5ef2aSThomas Huth TCGv t0 = tcg_temp_new(); 888fcf5ef2aSThomas Huth TCGv t1 = tcg_temp_new(); 889fcf5ef2aSThomas Huth TCGv t2 = tcg_temp_new(); 890fcf5ef2aSThomas Huth 891fcf5ef2aSThomas Huth tcg_gen_andi_i32(t0, REG(B7_4), 0x1f); 892fcf5ef2aSThomas Huth 893fcf5ef2aSThomas Huth /* positive case: shift to the left */ 894fcf5ef2aSThomas Huth tcg_gen_shl_i32(t1, REG(B11_8), t0); 895fcf5ef2aSThomas Huth 896fcf5ef2aSThomas Huth /* negative case: shift to the right in two steps to 897fcf5ef2aSThomas Huth correctly handle the -32 case */ 898fcf5ef2aSThomas Huth tcg_gen_xori_i32(t0, t0, 0x1f); 899fcf5ef2aSThomas Huth tcg_gen_sar_i32(t2, REG(B11_8), t0); 900fcf5ef2aSThomas Huth tcg_gen_sari_i32(t2, t2, 1); 901fcf5ef2aSThomas Huth 902fcf5ef2aSThomas Huth /* select between the two cases */ 903fcf5ef2aSThomas Huth tcg_gen_movi_i32(t0, 0); 904fcf5ef2aSThomas Huth tcg_gen_movcond_i32(TCG_COND_GE, REG(B11_8), REG(B7_4), t0, t1, t2); 905fcf5ef2aSThomas Huth 906fcf5ef2aSThomas Huth tcg_temp_free(t0); 907fcf5ef2aSThomas Huth tcg_temp_free(t1); 908fcf5ef2aSThomas Huth tcg_temp_free(t2); 909fcf5ef2aSThomas Huth } 910fcf5ef2aSThomas Huth return; 911fcf5ef2aSThomas Huth case 0x400d: /* shld Rm,Rn */ 912fcf5ef2aSThomas Huth { 913fcf5ef2aSThomas Huth TCGv t0 = tcg_temp_new(); 914fcf5ef2aSThomas Huth TCGv t1 = tcg_temp_new(); 915fcf5ef2aSThomas Huth TCGv t2 = tcg_temp_new(); 916fcf5ef2aSThomas Huth 917fcf5ef2aSThomas Huth tcg_gen_andi_i32(t0, REG(B7_4), 0x1f); 918fcf5ef2aSThomas Huth 919fcf5ef2aSThomas Huth /* positive case: shift to the left */ 920fcf5ef2aSThomas Huth tcg_gen_shl_i32(t1, REG(B11_8), t0); 921fcf5ef2aSThomas Huth 922fcf5ef2aSThomas Huth /* negative case: shift to the right in two steps to 923fcf5ef2aSThomas Huth correctly handle the -32 case */ 924fcf5ef2aSThomas Huth tcg_gen_xori_i32(t0, t0, 0x1f); 925fcf5ef2aSThomas Huth tcg_gen_shr_i32(t2, REG(B11_8), t0); 926fcf5ef2aSThomas Huth tcg_gen_shri_i32(t2, t2, 1); 927fcf5ef2aSThomas Huth 928fcf5ef2aSThomas Huth /* select between the two cases */ 929fcf5ef2aSThomas Huth tcg_gen_movi_i32(t0, 0); 930fcf5ef2aSThomas Huth tcg_gen_movcond_i32(TCG_COND_GE, REG(B11_8), REG(B7_4), t0, t1, t2); 931fcf5ef2aSThomas Huth 932fcf5ef2aSThomas Huth tcg_temp_free(t0); 933fcf5ef2aSThomas Huth tcg_temp_free(t1); 934fcf5ef2aSThomas Huth tcg_temp_free(t2); 935fcf5ef2aSThomas Huth } 936fcf5ef2aSThomas Huth return; 937fcf5ef2aSThomas Huth case 0x3008: /* sub Rm,Rn */ 938fcf5ef2aSThomas Huth tcg_gen_sub_i32(REG(B11_8), REG(B11_8), REG(B7_4)); 939fcf5ef2aSThomas Huth return; 940fcf5ef2aSThomas Huth case 0x300a: /* subc Rm,Rn */ 941fcf5ef2aSThomas Huth { 942fcf5ef2aSThomas Huth TCGv t0, t1; 943fcf5ef2aSThomas Huth t0 = tcg_const_tl(0); 944fcf5ef2aSThomas Huth t1 = tcg_temp_new(); 945fcf5ef2aSThomas Huth tcg_gen_add2_i32(t1, cpu_sr_t, cpu_sr_t, t0, REG(B7_4), t0); 946fcf5ef2aSThomas Huth tcg_gen_sub2_i32(REG(B11_8), cpu_sr_t, 947fcf5ef2aSThomas Huth REG(B11_8), t0, t1, cpu_sr_t); 948fcf5ef2aSThomas Huth tcg_gen_andi_i32(cpu_sr_t, cpu_sr_t, 1); 949fcf5ef2aSThomas Huth tcg_temp_free(t0); 950fcf5ef2aSThomas Huth tcg_temp_free(t1); 951fcf5ef2aSThomas Huth } 952fcf5ef2aSThomas Huth return; 953fcf5ef2aSThomas Huth case 0x300b: /* subv Rm,Rn */ 954fcf5ef2aSThomas Huth { 955fcf5ef2aSThomas Huth TCGv t0, t1, t2; 956fcf5ef2aSThomas Huth t0 = tcg_temp_new(); 957fcf5ef2aSThomas Huth tcg_gen_sub_i32(t0, REG(B11_8), REG(B7_4)); 958fcf5ef2aSThomas Huth t1 = tcg_temp_new(); 959fcf5ef2aSThomas Huth tcg_gen_xor_i32(t1, t0, REG(B7_4)); 960fcf5ef2aSThomas Huth t2 = tcg_temp_new(); 961fcf5ef2aSThomas Huth tcg_gen_xor_i32(t2, REG(B11_8), REG(B7_4)); 962fcf5ef2aSThomas Huth tcg_gen_and_i32(t1, t1, t2); 963fcf5ef2aSThomas Huth tcg_temp_free(t2); 964fcf5ef2aSThomas Huth tcg_gen_shri_i32(cpu_sr_t, t1, 31); 965fcf5ef2aSThomas Huth tcg_temp_free(t1); 966fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), t0); 967fcf5ef2aSThomas Huth tcg_temp_free(t0); 968fcf5ef2aSThomas Huth } 969fcf5ef2aSThomas Huth return; 970fcf5ef2aSThomas Huth case 0x2008: /* tst Rm,Rn */ 971fcf5ef2aSThomas Huth { 972fcf5ef2aSThomas Huth TCGv val = tcg_temp_new(); 973fcf5ef2aSThomas Huth tcg_gen_and_i32(val, REG(B7_4), REG(B11_8)); 974fcf5ef2aSThomas Huth tcg_gen_setcondi_i32(TCG_COND_EQ, cpu_sr_t, val, 0); 975fcf5ef2aSThomas Huth tcg_temp_free(val); 976fcf5ef2aSThomas Huth } 977fcf5ef2aSThomas Huth return; 978fcf5ef2aSThomas Huth case 0x200a: /* xor Rm,Rn */ 979fcf5ef2aSThomas Huth tcg_gen_xor_i32(REG(B11_8), REG(B11_8), REG(B7_4)); 980fcf5ef2aSThomas Huth return; 981fcf5ef2aSThomas Huth case 0xf00c: /* fmov {F,D,X}Rm,{F,D,X}Rn - FPSCR: Nothing */ 982fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 983a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_SZ) { 984fcf5ef2aSThomas Huth TCGv_i64 fp = tcg_temp_new_i64(); 985e5d8053eSRichard Henderson gen_load_fpr64(ctx, fp, XHACK(B7_4)); 986e5d8053eSRichard Henderson gen_store_fpr64(ctx, fp, XHACK(B11_8)); 987fcf5ef2aSThomas Huth tcg_temp_free_i64(fp); 988fcf5ef2aSThomas Huth } else { 9897c9f7038SRichard Henderson tcg_gen_mov_i32(FREG(B11_8), FREG(B7_4)); 990fcf5ef2aSThomas Huth } 991fcf5ef2aSThomas Huth return; 992fcf5ef2aSThomas Huth case 0xf00a: /* fmov {F,D,X}Rm,@Rn - FPSCR: Nothing */ 993fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 994a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_SZ) { 995*4d57fa50SRichard Henderson TCGv_i64 fp = tcg_temp_new_i64(); 996*4d57fa50SRichard Henderson gen_load_fpr64(ctx, fp, XHACK(B7_4)); 997*4d57fa50SRichard Henderson tcg_gen_qemu_st_i64(fp, REG(B11_8), ctx->memidx, MO_TEQ); 998*4d57fa50SRichard Henderson tcg_temp_free_i64(fp); 999fcf5ef2aSThomas Huth } else { 10007c9f7038SRichard Henderson tcg_gen_qemu_st_i32(FREG(B7_4), REG(B11_8), ctx->memidx, MO_TEUL); 1001fcf5ef2aSThomas Huth } 1002fcf5ef2aSThomas Huth return; 1003fcf5ef2aSThomas Huth case 0xf008: /* fmov @Rm,{F,D,X}Rn - FPSCR: Nothing */ 1004fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1005a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_SZ) { 1006*4d57fa50SRichard Henderson TCGv_i64 fp = tcg_temp_new_i64(); 1007*4d57fa50SRichard Henderson tcg_gen_qemu_ld_i64(fp, REG(B7_4), ctx->memidx, MO_TEQ); 1008*4d57fa50SRichard Henderson gen_store_fpr64(ctx, fp, XHACK(B11_8)); 1009*4d57fa50SRichard Henderson tcg_temp_free_i64(fp); 1010fcf5ef2aSThomas Huth } else { 10117c9f7038SRichard Henderson tcg_gen_qemu_ld_i32(FREG(B11_8), REG(B7_4), ctx->memidx, MO_TEUL); 1012fcf5ef2aSThomas Huth } 1013fcf5ef2aSThomas Huth return; 1014fcf5ef2aSThomas Huth case 0xf009: /* fmov @Rm+,{F,D,X}Rn - FPSCR: Nothing */ 1015fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1016a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_SZ) { 1017*4d57fa50SRichard Henderson TCGv_i64 fp = tcg_temp_new_i64(); 1018*4d57fa50SRichard Henderson tcg_gen_qemu_ld_i64(fp, REG(B7_4), ctx->memidx, MO_TEQ); 1019*4d57fa50SRichard Henderson gen_store_fpr64(ctx, fp, XHACK(B11_8)); 1020*4d57fa50SRichard Henderson tcg_temp_free_i64(fp); 1021fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B7_4), REG(B7_4), 8); 1022fcf5ef2aSThomas Huth } else { 10237c9f7038SRichard Henderson tcg_gen_qemu_ld_i32(FREG(B11_8), REG(B7_4), ctx->memidx, MO_TEUL); 1024fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B7_4), REG(B7_4), 4); 1025fcf5ef2aSThomas Huth } 1026fcf5ef2aSThomas Huth return; 1027fcf5ef2aSThomas Huth case 0xf00b: /* fmov {F,D,X}Rm,@-Rn - FPSCR: Nothing */ 1028fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1029*4d57fa50SRichard Henderson { 1030fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new_i32(); 1031a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_SZ) { 1032*4d57fa50SRichard Henderson TCGv_i64 fp = tcg_temp_new_i64(); 1033*4d57fa50SRichard Henderson gen_load_fpr64(ctx, fp, XHACK(B7_4)); 1034*4d57fa50SRichard Henderson tcg_gen_subi_i32(addr, REG(B11_8), 8); 1035*4d57fa50SRichard Henderson tcg_gen_qemu_st_i64(fp, addr, ctx->memidx, MO_TEQ); 1036*4d57fa50SRichard Henderson tcg_temp_free_i64(fp); 1037fcf5ef2aSThomas Huth } else { 1038*4d57fa50SRichard Henderson tcg_gen_subi_i32(addr, REG(B11_8), 4); 10397c9f7038SRichard Henderson tcg_gen_qemu_st_i32(FREG(B7_4), addr, ctx->memidx, MO_TEUL); 1040fcf5ef2aSThomas Huth } 1041fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), addr); 1042fcf5ef2aSThomas Huth tcg_temp_free(addr); 1043*4d57fa50SRichard Henderson } 1044fcf5ef2aSThomas Huth return; 1045fcf5ef2aSThomas Huth case 0xf006: /* fmov @(R0,Rm),{F,D,X}Rm - FPSCR: Nothing */ 1046fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1047fcf5ef2aSThomas Huth { 1048fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new_i32(); 1049fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(B7_4), REG(0)); 1050a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_SZ) { 1051*4d57fa50SRichard Henderson TCGv_i64 fp = tcg_temp_new_i64(); 1052*4d57fa50SRichard Henderson tcg_gen_qemu_ld_i64(fp, addr, ctx->memidx, MO_TEQ); 1053*4d57fa50SRichard Henderson gen_store_fpr64(ctx, fp, XHACK(B11_8)); 1054*4d57fa50SRichard Henderson tcg_temp_free_i64(fp); 1055fcf5ef2aSThomas Huth } else { 10567c9f7038SRichard Henderson tcg_gen_qemu_ld_i32(FREG(B11_8), addr, ctx->memidx, MO_TEUL); 1057fcf5ef2aSThomas Huth } 1058fcf5ef2aSThomas Huth tcg_temp_free(addr); 1059fcf5ef2aSThomas Huth } 1060fcf5ef2aSThomas Huth return; 1061fcf5ef2aSThomas Huth case 0xf007: /* fmov {F,D,X}Rn,@(R0,Rn) - FPSCR: Nothing */ 1062fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1063fcf5ef2aSThomas Huth { 1064fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1065fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(B11_8), REG(0)); 1066a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_SZ) { 1067*4d57fa50SRichard Henderson TCGv_i64 fp = tcg_temp_new_i64(); 1068*4d57fa50SRichard Henderson gen_load_fpr64(ctx, fp, XHACK(B7_4)); 1069*4d57fa50SRichard Henderson tcg_gen_qemu_st_i64(fp, addr, ctx->memidx, MO_TEQ); 1070*4d57fa50SRichard Henderson tcg_temp_free_i64(fp); 1071fcf5ef2aSThomas Huth } else { 10727c9f7038SRichard Henderson tcg_gen_qemu_st_i32(FREG(B7_4), addr, ctx->memidx, MO_TEUL); 1073fcf5ef2aSThomas Huth } 1074fcf5ef2aSThomas Huth tcg_temp_free(addr); 1075fcf5ef2aSThomas Huth } 1076fcf5ef2aSThomas Huth return; 1077fcf5ef2aSThomas Huth case 0xf000: /* fadd Rm,Rn - FPSCR: R[PR,Enable.O/U/I]/W[Cause,Flag] */ 1078fcf5ef2aSThomas Huth case 0xf001: /* fsub Rm,Rn - FPSCR: R[PR,Enable.O/U/I]/W[Cause,Flag] */ 1079fcf5ef2aSThomas Huth case 0xf002: /* fmul Rm,Rn - FPSCR: R[PR,Enable.O/U/I]/W[Cause,Flag] */ 1080fcf5ef2aSThomas Huth case 0xf003: /* fdiv Rm,Rn - FPSCR: R[PR,Enable.O/U/I]/W[Cause,Flag] */ 1081fcf5ef2aSThomas Huth case 0xf004: /* fcmp/eq Rm,Rn - FPSCR: R[PR,Enable.V]/W[Cause,Flag] */ 1082fcf5ef2aSThomas Huth case 0xf005: /* fcmp/gt Rm,Rn - FPSCR: R[PR,Enable.V]/W[Cause,Flag] */ 1083fcf5ef2aSThomas Huth { 1084fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1085a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_PR) { 1086fcf5ef2aSThomas Huth TCGv_i64 fp0, fp1; 1087fcf5ef2aSThomas Huth 1088fcf5ef2aSThomas Huth if (ctx->opcode & 0x0110) 1089fcf5ef2aSThomas Huth break; /* illegal instruction */ 1090fcf5ef2aSThomas Huth fp0 = tcg_temp_new_i64(); 1091fcf5ef2aSThomas Huth fp1 = tcg_temp_new_i64(); 10921e0b21d8SRichard Henderson gen_load_fpr64(ctx, fp0, B11_8); 10931e0b21d8SRichard Henderson gen_load_fpr64(ctx, fp1, B7_4); 1094fcf5ef2aSThomas Huth switch (ctx->opcode & 0xf00f) { 1095fcf5ef2aSThomas Huth case 0xf000: /* fadd Rm,Rn */ 1096fcf5ef2aSThomas Huth gen_helper_fadd_DT(fp0, cpu_env, fp0, fp1); 1097fcf5ef2aSThomas Huth break; 1098fcf5ef2aSThomas Huth case 0xf001: /* fsub Rm,Rn */ 1099fcf5ef2aSThomas Huth gen_helper_fsub_DT(fp0, cpu_env, fp0, fp1); 1100fcf5ef2aSThomas Huth break; 1101fcf5ef2aSThomas Huth case 0xf002: /* fmul Rm,Rn */ 1102fcf5ef2aSThomas Huth gen_helper_fmul_DT(fp0, cpu_env, fp0, fp1); 1103fcf5ef2aSThomas Huth break; 1104fcf5ef2aSThomas Huth case 0xf003: /* fdiv Rm,Rn */ 1105fcf5ef2aSThomas Huth gen_helper_fdiv_DT(fp0, cpu_env, fp0, fp1); 1106fcf5ef2aSThomas Huth break; 1107fcf5ef2aSThomas Huth case 0xf004: /* fcmp/eq Rm,Rn */ 110892f1f83eSAurelien Jarno gen_helper_fcmp_eq_DT(cpu_sr_t, cpu_env, fp0, fp1); 1109fcf5ef2aSThomas Huth return; 1110fcf5ef2aSThomas Huth case 0xf005: /* fcmp/gt Rm,Rn */ 111192f1f83eSAurelien Jarno gen_helper_fcmp_gt_DT(cpu_sr_t, cpu_env, fp0, fp1); 1112fcf5ef2aSThomas Huth return; 1113fcf5ef2aSThomas Huth } 11141e0b21d8SRichard Henderson gen_store_fpr64(ctx, fp0, B11_8); 1115fcf5ef2aSThomas Huth tcg_temp_free_i64(fp0); 1116fcf5ef2aSThomas Huth tcg_temp_free_i64(fp1); 1117fcf5ef2aSThomas Huth } else { 1118fcf5ef2aSThomas Huth switch (ctx->opcode & 0xf00f) { 1119fcf5ef2aSThomas Huth case 0xf000: /* fadd Rm,Rn */ 11207c9f7038SRichard Henderson gen_helper_fadd_FT(FREG(B11_8), cpu_env, 11217c9f7038SRichard Henderson FREG(B11_8), FREG(B7_4)); 1122fcf5ef2aSThomas Huth break; 1123fcf5ef2aSThomas Huth case 0xf001: /* fsub Rm,Rn */ 11247c9f7038SRichard Henderson gen_helper_fsub_FT(FREG(B11_8), cpu_env, 11257c9f7038SRichard Henderson FREG(B11_8), FREG(B7_4)); 1126fcf5ef2aSThomas Huth break; 1127fcf5ef2aSThomas Huth case 0xf002: /* fmul Rm,Rn */ 11287c9f7038SRichard Henderson gen_helper_fmul_FT(FREG(B11_8), cpu_env, 11297c9f7038SRichard Henderson FREG(B11_8), FREG(B7_4)); 1130fcf5ef2aSThomas Huth break; 1131fcf5ef2aSThomas Huth case 0xf003: /* fdiv Rm,Rn */ 11327c9f7038SRichard Henderson gen_helper_fdiv_FT(FREG(B11_8), cpu_env, 11337c9f7038SRichard Henderson FREG(B11_8), FREG(B7_4)); 1134fcf5ef2aSThomas Huth break; 1135fcf5ef2aSThomas Huth case 0xf004: /* fcmp/eq Rm,Rn */ 113692f1f83eSAurelien Jarno gen_helper_fcmp_eq_FT(cpu_sr_t, cpu_env, 11377c9f7038SRichard Henderson FREG(B11_8), FREG(B7_4)); 1138fcf5ef2aSThomas Huth return; 1139fcf5ef2aSThomas Huth case 0xf005: /* fcmp/gt Rm,Rn */ 114092f1f83eSAurelien Jarno gen_helper_fcmp_gt_FT(cpu_sr_t, cpu_env, 11417c9f7038SRichard Henderson FREG(B11_8), FREG(B7_4)); 1142fcf5ef2aSThomas Huth return; 1143fcf5ef2aSThomas Huth } 1144fcf5ef2aSThomas Huth } 1145fcf5ef2aSThomas Huth } 1146fcf5ef2aSThomas Huth return; 1147fcf5ef2aSThomas Huth case 0xf00e: /* fmac FR0,RM,Rn */ 1148fcf5ef2aSThomas Huth { 1149fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1150a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_PR) { 1151fcf5ef2aSThomas Huth break; /* illegal instruction */ 1152fcf5ef2aSThomas Huth } else { 11537c9f7038SRichard Henderson gen_helper_fmac_FT(FREG(B11_8), cpu_env, 11547c9f7038SRichard Henderson FREG(0), FREG(B7_4), FREG(B11_8)); 1155fcf5ef2aSThomas Huth return; 1156fcf5ef2aSThomas Huth } 1157fcf5ef2aSThomas Huth } 1158fcf5ef2aSThomas Huth } 1159fcf5ef2aSThomas Huth 1160fcf5ef2aSThomas Huth switch (ctx->opcode & 0xff00) { 1161fcf5ef2aSThomas Huth case 0xc900: /* and #imm,R0 */ 1162fcf5ef2aSThomas Huth tcg_gen_andi_i32(REG(0), REG(0), B7_0); 1163fcf5ef2aSThomas Huth return; 1164fcf5ef2aSThomas Huth case 0xcd00: /* and.b #imm,@(R0,GBR) */ 1165fcf5ef2aSThomas Huth { 1166fcf5ef2aSThomas Huth TCGv addr, val; 1167fcf5ef2aSThomas Huth addr = tcg_temp_new(); 1168fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(0), cpu_gbr); 1169fcf5ef2aSThomas Huth val = tcg_temp_new(); 1170fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(val, addr, ctx->memidx, MO_UB); 1171fcf5ef2aSThomas Huth tcg_gen_andi_i32(val, val, B7_0); 1172fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(val, addr, ctx->memidx, MO_UB); 1173fcf5ef2aSThomas Huth tcg_temp_free(val); 1174fcf5ef2aSThomas Huth tcg_temp_free(addr); 1175fcf5ef2aSThomas Huth } 1176fcf5ef2aSThomas Huth return; 1177fcf5ef2aSThomas Huth case 0x8b00: /* bf label */ 1178fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 11794bfa602bSRichard Henderson gen_conditional_jump(ctx, ctx->pc + 4 + B7_0s * 2, false); 1180fcf5ef2aSThomas Huth return; 1181fcf5ef2aSThomas Huth case 0x8f00: /* bf/s label */ 1182fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 1183ac9707eaSAurelien Jarno tcg_gen_xori_i32(cpu_delayed_cond, cpu_sr_t, 1); 1184ac9707eaSAurelien Jarno ctx->delayed_pc = ctx->pc + 4 + B7_0s * 2; 1185a6215749SAurelien Jarno ctx->envflags |= DELAY_SLOT_CONDITIONAL; 1186fcf5ef2aSThomas Huth return; 1187fcf5ef2aSThomas Huth case 0x8900: /* bt label */ 1188fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 11894bfa602bSRichard Henderson gen_conditional_jump(ctx, ctx->pc + 4 + B7_0s * 2, true); 1190fcf5ef2aSThomas Huth return; 1191fcf5ef2aSThomas Huth case 0x8d00: /* bt/s label */ 1192fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 1193ac9707eaSAurelien Jarno tcg_gen_mov_i32(cpu_delayed_cond, cpu_sr_t); 1194ac9707eaSAurelien Jarno ctx->delayed_pc = ctx->pc + 4 + B7_0s * 2; 1195a6215749SAurelien Jarno ctx->envflags |= DELAY_SLOT_CONDITIONAL; 1196fcf5ef2aSThomas Huth return; 1197fcf5ef2aSThomas Huth case 0x8800: /* cmp/eq #imm,R0 */ 1198fcf5ef2aSThomas Huth tcg_gen_setcondi_i32(TCG_COND_EQ, cpu_sr_t, REG(0), B7_0s); 1199fcf5ef2aSThomas Huth return; 1200fcf5ef2aSThomas Huth case 0xc400: /* mov.b @(disp,GBR),R0 */ 1201fcf5ef2aSThomas Huth { 1202fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1203fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, cpu_gbr, B7_0); 1204fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(0), addr, ctx->memidx, MO_SB); 1205fcf5ef2aSThomas Huth tcg_temp_free(addr); 1206fcf5ef2aSThomas Huth } 1207fcf5ef2aSThomas Huth return; 1208fcf5ef2aSThomas Huth case 0xc500: /* mov.w @(disp,GBR),R0 */ 1209fcf5ef2aSThomas Huth { 1210fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1211fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, cpu_gbr, B7_0 * 2); 1212fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(0), addr, ctx->memidx, MO_TESW); 1213fcf5ef2aSThomas Huth tcg_temp_free(addr); 1214fcf5ef2aSThomas Huth } 1215fcf5ef2aSThomas Huth return; 1216fcf5ef2aSThomas Huth case 0xc600: /* mov.l @(disp,GBR),R0 */ 1217fcf5ef2aSThomas Huth { 1218fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1219fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, cpu_gbr, B7_0 * 4); 1220fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(0), addr, ctx->memidx, MO_TESL); 1221fcf5ef2aSThomas Huth tcg_temp_free(addr); 1222fcf5ef2aSThomas Huth } 1223fcf5ef2aSThomas Huth return; 1224fcf5ef2aSThomas Huth case 0xc000: /* mov.b R0,@(disp,GBR) */ 1225fcf5ef2aSThomas Huth { 1226fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1227fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, cpu_gbr, B7_0); 1228fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(0), addr, ctx->memidx, MO_UB); 1229fcf5ef2aSThomas Huth tcg_temp_free(addr); 1230fcf5ef2aSThomas Huth } 1231fcf5ef2aSThomas Huth return; 1232fcf5ef2aSThomas Huth case 0xc100: /* mov.w R0,@(disp,GBR) */ 1233fcf5ef2aSThomas Huth { 1234fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1235fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, cpu_gbr, B7_0 * 2); 1236fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(0), addr, ctx->memidx, MO_TEUW); 1237fcf5ef2aSThomas Huth tcg_temp_free(addr); 1238fcf5ef2aSThomas Huth } 1239fcf5ef2aSThomas Huth return; 1240fcf5ef2aSThomas Huth case 0xc200: /* mov.l R0,@(disp,GBR) */ 1241fcf5ef2aSThomas Huth { 1242fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1243fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, cpu_gbr, B7_0 * 4); 1244fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(0), addr, ctx->memidx, MO_TEUL); 1245fcf5ef2aSThomas Huth tcg_temp_free(addr); 1246fcf5ef2aSThomas Huth } 1247fcf5ef2aSThomas Huth return; 1248fcf5ef2aSThomas Huth case 0x8000: /* mov.b R0,@(disp,Rn) */ 1249fcf5ef2aSThomas Huth { 1250fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1251fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, REG(B7_4), B3_0); 1252fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(0), addr, ctx->memidx, MO_UB); 1253fcf5ef2aSThomas Huth tcg_temp_free(addr); 1254fcf5ef2aSThomas Huth } 1255fcf5ef2aSThomas Huth return; 1256fcf5ef2aSThomas Huth case 0x8100: /* mov.w R0,@(disp,Rn) */ 1257fcf5ef2aSThomas Huth { 1258fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1259fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, REG(B7_4), B3_0 * 2); 1260fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(0), addr, ctx->memidx, MO_TEUW); 1261fcf5ef2aSThomas Huth tcg_temp_free(addr); 1262fcf5ef2aSThomas Huth } 1263fcf5ef2aSThomas Huth return; 1264fcf5ef2aSThomas Huth case 0x8400: /* mov.b @(disp,Rn),R0 */ 1265fcf5ef2aSThomas Huth { 1266fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1267fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, REG(B7_4), B3_0); 1268fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(0), addr, ctx->memidx, MO_SB); 1269fcf5ef2aSThomas Huth tcg_temp_free(addr); 1270fcf5ef2aSThomas Huth } 1271fcf5ef2aSThomas Huth return; 1272fcf5ef2aSThomas Huth case 0x8500: /* mov.w @(disp,Rn),R0 */ 1273fcf5ef2aSThomas Huth { 1274fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1275fcf5ef2aSThomas Huth tcg_gen_addi_i32(addr, REG(B7_4), B3_0 * 2); 1276fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(0), addr, ctx->memidx, MO_TESW); 1277fcf5ef2aSThomas Huth tcg_temp_free(addr); 1278fcf5ef2aSThomas Huth } 1279fcf5ef2aSThomas Huth return; 1280fcf5ef2aSThomas Huth case 0xc700: /* mova @(disp,PC),R0 */ 1281fcf5ef2aSThomas Huth tcg_gen_movi_i32(REG(0), ((ctx->pc & 0xfffffffc) + 4 + B7_0 * 4) & ~3); 1282fcf5ef2aSThomas Huth return; 1283fcf5ef2aSThomas Huth case 0xcb00: /* or #imm,R0 */ 1284fcf5ef2aSThomas Huth tcg_gen_ori_i32(REG(0), REG(0), B7_0); 1285fcf5ef2aSThomas Huth return; 1286fcf5ef2aSThomas Huth case 0xcf00: /* or.b #imm,@(R0,GBR) */ 1287fcf5ef2aSThomas Huth { 1288fcf5ef2aSThomas Huth TCGv addr, val; 1289fcf5ef2aSThomas Huth addr = tcg_temp_new(); 1290fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(0), cpu_gbr); 1291fcf5ef2aSThomas Huth val = tcg_temp_new(); 1292fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(val, addr, ctx->memidx, MO_UB); 1293fcf5ef2aSThomas Huth tcg_gen_ori_i32(val, val, B7_0); 1294fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(val, addr, ctx->memidx, MO_UB); 1295fcf5ef2aSThomas Huth tcg_temp_free(val); 1296fcf5ef2aSThomas Huth tcg_temp_free(addr); 1297fcf5ef2aSThomas Huth } 1298fcf5ef2aSThomas Huth return; 1299fcf5ef2aSThomas Huth case 0xc300: /* trapa #imm */ 1300fcf5ef2aSThomas Huth { 1301fcf5ef2aSThomas Huth TCGv imm; 1302fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 1303ac9707eaSAurelien Jarno gen_save_cpu_state(ctx, true); 1304fcf5ef2aSThomas Huth imm = tcg_const_i32(B7_0); 1305fcf5ef2aSThomas Huth gen_helper_trapa(cpu_env, imm); 1306fcf5ef2aSThomas Huth tcg_temp_free(imm); 130763205665SAurelien Jarno ctx->bstate = BS_EXCP; 1308fcf5ef2aSThomas Huth } 1309fcf5ef2aSThomas Huth return; 1310fcf5ef2aSThomas Huth case 0xc800: /* tst #imm,R0 */ 1311fcf5ef2aSThomas Huth { 1312fcf5ef2aSThomas Huth TCGv val = tcg_temp_new(); 1313fcf5ef2aSThomas Huth tcg_gen_andi_i32(val, REG(0), B7_0); 1314fcf5ef2aSThomas Huth tcg_gen_setcondi_i32(TCG_COND_EQ, cpu_sr_t, val, 0); 1315fcf5ef2aSThomas Huth tcg_temp_free(val); 1316fcf5ef2aSThomas Huth } 1317fcf5ef2aSThomas Huth return; 1318fcf5ef2aSThomas Huth case 0xcc00: /* tst.b #imm,@(R0,GBR) */ 1319fcf5ef2aSThomas Huth { 1320fcf5ef2aSThomas Huth TCGv val = tcg_temp_new(); 1321fcf5ef2aSThomas Huth tcg_gen_add_i32(val, REG(0), cpu_gbr); 1322fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(val, val, ctx->memidx, MO_UB); 1323fcf5ef2aSThomas Huth tcg_gen_andi_i32(val, val, B7_0); 1324fcf5ef2aSThomas Huth tcg_gen_setcondi_i32(TCG_COND_EQ, cpu_sr_t, val, 0); 1325fcf5ef2aSThomas Huth tcg_temp_free(val); 1326fcf5ef2aSThomas Huth } 1327fcf5ef2aSThomas Huth return; 1328fcf5ef2aSThomas Huth case 0xca00: /* xor #imm,R0 */ 1329fcf5ef2aSThomas Huth tcg_gen_xori_i32(REG(0), REG(0), B7_0); 1330fcf5ef2aSThomas Huth return; 1331fcf5ef2aSThomas Huth case 0xce00: /* xor.b #imm,@(R0,GBR) */ 1332fcf5ef2aSThomas Huth { 1333fcf5ef2aSThomas Huth TCGv addr, val; 1334fcf5ef2aSThomas Huth addr = tcg_temp_new(); 1335fcf5ef2aSThomas Huth tcg_gen_add_i32(addr, REG(0), cpu_gbr); 1336fcf5ef2aSThomas Huth val = tcg_temp_new(); 1337fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(val, addr, ctx->memidx, MO_UB); 1338fcf5ef2aSThomas Huth tcg_gen_xori_i32(val, val, B7_0); 1339fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(val, addr, ctx->memidx, MO_UB); 1340fcf5ef2aSThomas Huth tcg_temp_free(val); 1341fcf5ef2aSThomas Huth tcg_temp_free(addr); 1342fcf5ef2aSThomas Huth } 1343fcf5ef2aSThomas Huth return; 1344fcf5ef2aSThomas Huth } 1345fcf5ef2aSThomas Huth 1346fcf5ef2aSThomas Huth switch (ctx->opcode & 0xf08f) { 1347fcf5ef2aSThomas Huth case 0x408e: /* ldc Rm,Rn_BANK */ 1348fcf5ef2aSThomas Huth CHECK_PRIVILEGED 1349fcf5ef2aSThomas Huth tcg_gen_mov_i32(ALTREG(B6_4), REG(B11_8)); 1350fcf5ef2aSThomas Huth return; 1351fcf5ef2aSThomas Huth case 0x4087: /* ldc.l @Rm+,Rn_BANK */ 1352fcf5ef2aSThomas Huth CHECK_PRIVILEGED 1353fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(ALTREG(B6_4), REG(B11_8), ctx->memidx, MO_TESL); 1354fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B11_8), REG(B11_8), 4); 1355fcf5ef2aSThomas Huth return; 1356fcf5ef2aSThomas Huth case 0x0082: /* stc Rm_BANK,Rn */ 1357fcf5ef2aSThomas Huth CHECK_PRIVILEGED 1358fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), ALTREG(B6_4)); 1359fcf5ef2aSThomas Huth return; 1360fcf5ef2aSThomas Huth case 0x4083: /* stc.l Rm_BANK,@-Rn */ 1361fcf5ef2aSThomas Huth CHECK_PRIVILEGED 1362fcf5ef2aSThomas Huth { 1363fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1364fcf5ef2aSThomas Huth tcg_gen_subi_i32(addr, REG(B11_8), 4); 1365fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(ALTREG(B6_4), addr, ctx->memidx, MO_TEUL); 1366fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), addr); 1367fcf5ef2aSThomas Huth tcg_temp_free(addr); 1368fcf5ef2aSThomas Huth } 1369fcf5ef2aSThomas Huth return; 1370fcf5ef2aSThomas Huth } 1371fcf5ef2aSThomas Huth 1372fcf5ef2aSThomas Huth switch (ctx->opcode & 0xf0ff) { 1373fcf5ef2aSThomas Huth case 0x0023: /* braf Rn */ 1374fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 1375fcf5ef2aSThomas Huth tcg_gen_addi_i32(cpu_delayed_pc, REG(B11_8), ctx->pc + 4); 1376a6215749SAurelien Jarno ctx->envflags |= DELAY_SLOT; 1377fcf5ef2aSThomas Huth ctx->delayed_pc = (uint32_t) - 1; 1378fcf5ef2aSThomas Huth return; 1379fcf5ef2aSThomas Huth case 0x0003: /* bsrf Rn */ 1380fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 1381fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_pr, ctx->pc + 4); 1382fcf5ef2aSThomas Huth tcg_gen_add_i32(cpu_delayed_pc, REG(B11_8), cpu_pr); 1383a6215749SAurelien Jarno ctx->envflags |= DELAY_SLOT; 1384fcf5ef2aSThomas Huth ctx->delayed_pc = (uint32_t) - 1; 1385fcf5ef2aSThomas Huth return; 1386fcf5ef2aSThomas Huth case 0x4015: /* cmp/pl Rn */ 1387fcf5ef2aSThomas Huth tcg_gen_setcondi_i32(TCG_COND_GT, cpu_sr_t, REG(B11_8), 0); 1388fcf5ef2aSThomas Huth return; 1389fcf5ef2aSThomas Huth case 0x4011: /* cmp/pz Rn */ 1390fcf5ef2aSThomas Huth tcg_gen_setcondi_i32(TCG_COND_GE, cpu_sr_t, REG(B11_8), 0); 1391fcf5ef2aSThomas Huth return; 1392fcf5ef2aSThomas Huth case 0x4010: /* dt Rn */ 1393fcf5ef2aSThomas Huth tcg_gen_subi_i32(REG(B11_8), REG(B11_8), 1); 1394fcf5ef2aSThomas Huth tcg_gen_setcondi_i32(TCG_COND_EQ, cpu_sr_t, REG(B11_8), 0); 1395fcf5ef2aSThomas Huth return; 1396fcf5ef2aSThomas Huth case 0x402b: /* jmp @Rn */ 1397fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 1398fcf5ef2aSThomas Huth tcg_gen_mov_i32(cpu_delayed_pc, REG(B11_8)); 1399a6215749SAurelien Jarno ctx->envflags |= DELAY_SLOT; 1400fcf5ef2aSThomas Huth ctx->delayed_pc = (uint32_t) - 1; 1401fcf5ef2aSThomas Huth return; 1402fcf5ef2aSThomas Huth case 0x400b: /* jsr @Rn */ 1403fcf5ef2aSThomas Huth CHECK_NOT_DELAY_SLOT 1404fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_pr, ctx->pc + 4); 1405fcf5ef2aSThomas Huth tcg_gen_mov_i32(cpu_delayed_pc, REG(B11_8)); 1406a6215749SAurelien Jarno ctx->envflags |= DELAY_SLOT; 1407fcf5ef2aSThomas Huth ctx->delayed_pc = (uint32_t) - 1; 1408fcf5ef2aSThomas Huth return; 1409fcf5ef2aSThomas Huth case 0x400e: /* ldc Rm,SR */ 1410fcf5ef2aSThomas Huth CHECK_PRIVILEGED 1411fcf5ef2aSThomas Huth { 1412fcf5ef2aSThomas Huth TCGv val = tcg_temp_new(); 1413fcf5ef2aSThomas Huth tcg_gen_andi_i32(val, REG(B11_8), 0x700083f3); 1414fcf5ef2aSThomas Huth gen_write_sr(val); 1415fcf5ef2aSThomas Huth tcg_temp_free(val); 1416fcf5ef2aSThomas Huth ctx->bstate = BS_STOP; 1417fcf5ef2aSThomas Huth } 1418fcf5ef2aSThomas Huth return; 1419fcf5ef2aSThomas Huth case 0x4007: /* ldc.l @Rm+,SR */ 1420fcf5ef2aSThomas Huth CHECK_PRIVILEGED 1421fcf5ef2aSThomas Huth { 1422fcf5ef2aSThomas Huth TCGv val = tcg_temp_new(); 1423fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(val, REG(B11_8), ctx->memidx, MO_TESL); 1424fcf5ef2aSThomas Huth tcg_gen_andi_i32(val, val, 0x700083f3); 1425fcf5ef2aSThomas Huth gen_write_sr(val); 1426fcf5ef2aSThomas Huth tcg_temp_free(val); 1427fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B11_8), REG(B11_8), 4); 1428fcf5ef2aSThomas Huth ctx->bstate = BS_STOP; 1429fcf5ef2aSThomas Huth } 1430fcf5ef2aSThomas Huth return; 1431fcf5ef2aSThomas Huth case 0x0002: /* stc SR,Rn */ 1432fcf5ef2aSThomas Huth CHECK_PRIVILEGED 1433fcf5ef2aSThomas Huth gen_read_sr(REG(B11_8)); 1434fcf5ef2aSThomas Huth return; 1435fcf5ef2aSThomas Huth case 0x4003: /* stc SR,@-Rn */ 1436fcf5ef2aSThomas Huth CHECK_PRIVILEGED 1437fcf5ef2aSThomas Huth { 1438fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1439fcf5ef2aSThomas Huth TCGv val = tcg_temp_new(); 1440fcf5ef2aSThomas Huth tcg_gen_subi_i32(addr, REG(B11_8), 4); 1441fcf5ef2aSThomas Huth gen_read_sr(val); 1442fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(val, addr, ctx->memidx, MO_TEUL); 1443fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), addr); 1444fcf5ef2aSThomas Huth tcg_temp_free(val); 1445fcf5ef2aSThomas Huth tcg_temp_free(addr); 1446fcf5ef2aSThomas Huth } 1447fcf5ef2aSThomas Huth return; 1448fcf5ef2aSThomas Huth #define LD(reg,ldnum,ldpnum,prechk) \ 1449fcf5ef2aSThomas Huth case ldnum: \ 1450fcf5ef2aSThomas Huth prechk \ 1451fcf5ef2aSThomas Huth tcg_gen_mov_i32 (cpu_##reg, REG(B11_8)); \ 1452fcf5ef2aSThomas Huth return; \ 1453fcf5ef2aSThomas Huth case ldpnum: \ 1454fcf5ef2aSThomas Huth prechk \ 1455fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(cpu_##reg, REG(B11_8), ctx->memidx, MO_TESL); \ 1456fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B11_8), REG(B11_8), 4); \ 1457fcf5ef2aSThomas Huth return; 1458fcf5ef2aSThomas Huth #define ST(reg,stnum,stpnum,prechk) \ 1459fcf5ef2aSThomas Huth case stnum: \ 1460fcf5ef2aSThomas Huth prechk \ 1461fcf5ef2aSThomas Huth tcg_gen_mov_i32 (REG(B11_8), cpu_##reg); \ 1462fcf5ef2aSThomas Huth return; \ 1463fcf5ef2aSThomas Huth case stpnum: \ 1464fcf5ef2aSThomas Huth prechk \ 1465fcf5ef2aSThomas Huth { \ 1466fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); \ 1467fcf5ef2aSThomas Huth tcg_gen_subi_i32(addr, REG(B11_8), 4); \ 1468fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(cpu_##reg, addr, ctx->memidx, MO_TEUL); \ 1469fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), addr); \ 1470fcf5ef2aSThomas Huth tcg_temp_free(addr); \ 1471fcf5ef2aSThomas Huth } \ 1472fcf5ef2aSThomas Huth return; 1473fcf5ef2aSThomas Huth #define LDST(reg,ldnum,ldpnum,stnum,stpnum,prechk) \ 1474fcf5ef2aSThomas Huth LD(reg,ldnum,ldpnum,prechk) \ 1475fcf5ef2aSThomas Huth ST(reg,stnum,stpnum,prechk) 1476fcf5ef2aSThomas Huth LDST(gbr, 0x401e, 0x4017, 0x0012, 0x4013, {}) 1477fcf5ef2aSThomas Huth LDST(vbr, 0x402e, 0x4027, 0x0022, 0x4023, CHECK_PRIVILEGED) 1478fcf5ef2aSThomas Huth LDST(ssr, 0x403e, 0x4037, 0x0032, 0x4033, CHECK_PRIVILEGED) 1479fcf5ef2aSThomas Huth LDST(spc, 0x404e, 0x4047, 0x0042, 0x4043, CHECK_PRIVILEGED) 1480fcf5ef2aSThomas Huth ST(sgr, 0x003a, 0x4032, CHECK_PRIVILEGED) 1481fcf5ef2aSThomas Huth LD(sgr, 0x403a, 0x4036, CHECK_PRIVILEGED if (!(ctx->features & SH_FEATURE_SH4A)) break;) 1482fcf5ef2aSThomas Huth LDST(dbr, 0x40fa, 0x40f6, 0x00fa, 0x40f2, CHECK_PRIVILEGED) 1483fcf5ef2aSThomas Huth LDST(mach, 0x400a, 0x4006, 0x000a, 0x4002, {}) 1484fcf5ef2aSThomas Huth LDST(macl, 0x401a, 0x4016, 0x001a, 0x4012, {}) 1485fcf5ef2aSThomas Huth LDST(pr, 0x402a, 0x4026, 0x002a, 0x4022, {}) 1486fcf5ef2aSThomas Huth LDST(fpul, 0x405a, 0x4056, 0x005a, 0x4052, {CHECK_FPU_ENABLED}) 1487fcf5ef2aSThomas Huth case 0x406a: /* lds Rm,FPSCR */ 1488fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1489fcf5ef2aSThomas Huth gen_helper_ld_fpscr(cpu_env, REG(B11_8)); 1490fcf5ef2aSThomas Huth ctx->bstate = BS_STOP; 1491fcf5ef2aSThomas Huth return; 1492fcf5ef2aSThomas Huth case 0x4066: /* lds.l @Rm+,FPSCR */ 1493fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1494fcf5ef2aSThomas Huth { 1495fcf5ef2aSThomas Huth TCGv addr = tcg_temp_new(); 1496fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(addr, REG(B11_8), ctx->memidx, MO_TESL); 1497fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B11_8), REG(B11_8), 4); 1498fcf5ef2aSThomas Huth gen_helper_ld_fpscr(cpu_env, addr); 1499fcf5ef2aSThomas Huth tcg_temp_free(addr); 1500fcf5ef2aSThomas Huth ctx->bstate = BS_STOP; 1501fcf5ef2aSThomas Huth } 1502fcf5ef2aSThomas Huth return; 1503fcf5ef2aSThomas Huth case 0x006a: /* sts FPSCR,Rn */ 1504fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1505fcf5ef2aSThomas Huth tcg_gen_andi_i32(REG(B11_8), cpu_fpscr, 0x003fffff); 1506fcf5ef2aSThomas Huth return; 1507fcf5ef2aSThomas Huth case 0x4062: /* sts FPSCR,@-Rn */ 1508fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1509fcf5ef2aSThomas Huth { 1510fcf5ef2aSThomas Huth TCGv addr, val; 1511fcf5ef2aSThomas Huth val = tcg_temp_new(); 1512fcf5ef2aSThomas Huth tcg_gen_andi_i32(val, cpu_fpscr, 0x003fffff); 1513fcf5ef2aSThomas Huth addr = tcg_temp_new(); 1514fcf5ef2aSThomas Huth tcg_gen_subi_i32(addr, REG(B11_8), 4); 1515fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(val, addr, ctx->memidx, MO_TEUL); 1516fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), addr); 1517fcf5ef2aSThomas Huth tcg_temp_free(addr); 1518fcf5ef2aSThomas Huth tcg_temp_free(val); 1519fcf5ef2aSThomas Huth } 1520fcf5ef2aSThomas Huth return; 1521fcf5ef2aSThomas Huth case 0x00c3: /* movca.l R0,@Rm */ 1522fcf5ef2aSThomas Huth { 1523fcf5ef2aSThomas Huth TCGv val = tcg_temp_new(); 1524fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(val, REG(B11_8), ctx->memidx, MO_TEUL); 1525fcf5ef2aSThomas Huth gen_helper_movcal(cpu_env, REG(B11_8), val); 1526fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(0), REG(B11_8), ctx->memidx, MO_TEUL); 1527fcf5ef2aSThomas Huth } 1528fcf5ef2aSThomas Huth ctx->has_movcal = 1; 1529fcf5ef2aSThomas Huth return; 1530143021b2SAurelien Jarno case 0x40a9: /* movua.l @Rm,R0 */ 1531143021b2SAurelien Jarno /* Load non-boundary-aligned data */ 1532143021b2SAurelien Jarno if (ctx->features & SH_FEATURE_SH4A) { 153334257c21SAurelien Jarno tcg_gen_qemu_ld_i32(REG(0), REG(B11_8), ctx->memidx, 153434257c21SAurelien Jarno MO_TEUL | MO_UNALN); 1535fcf5ef2aSThomas Huth return; 1536143021b2SAurelien Jarno } 1537143021b2SAurelien Jarno break; 1538143021b2SAurelien Jarno case 0x40e9: /* movua.l @Rm+,R0 */ 1539143021b2SAurelien Jarno /* Load non-boundary-aligned data */ 1540143021b2SAurelien Jarno if (ctx->features & SH_FEATURE_SH4A) { 154134257c21SAurelien Jarno tcg_gen_qemu_ld_i32(REG(0), REG(B11_8), ctx->memidx, 154234257c21SAurelien Jarno MO_TEUL | MO_UNALN); 1543fcf5ef2aSThomas Huth tcg_gen_addi_i32(REG(B11_8), REG(B11_8), 4); 1544fcf5ef2aSThomas Huth return; 1545143021b2SAurelien Jarno } 1546143021b2SAurelien Jarno break; 1547fcf5ef2aSThomas Huth case 0x0029: /* movt Rn */ 1548fcf5ef2aSThomas Huth tcg_gen_mov_i32(REG(B11_8), cpu_sr_t); 1549fcf5ef2aSThomas Huth return; 1550fcf5ef2aSThomas Huth case 0x0073: 1551fcf5ef2aSThomas Huth /* MOVCO.L 1552fcf5ef2aSThomas Huth LDST -> T 1553fcf5ef2aSThomas Huth If (T == 1) R0 -> (Rn) 1554fcf5ef2aSThomas Huth 0 -> LDST 1555fcf5ef2aSThomas Huth */ 1556fcf5ef2aSThomas Huth if (ctx->features & SH_FEATURE_SH4A) { 1557fcf5ef2aSThomas Huth TCGLabel *label = gen_new_label(); 1558fcf5ef2aSThomas Huth tcg_gen_mov_i32(cpu_sr_t, cpu_ldst); 1559fcf5ef2aSThomas Huth tcg_gen_brcondi_i32(TCG_COND_EQ, cpu_ldst, 0, label); 1560fcf5ef2aSThomas Huth tcg_gen_qemu_st_i32(REG(0), REG(B11_8), ctx->memidx, MO_TEUL); 1561fcf5ef2aSThomas Huth gen_set_label(label); 1562fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_ldst, 0); 1563fcf5ef2aSThomas Huth return; 1564fcf5ef2aSThomas Huth } else 1565fcf5ef2aSThomas Huth break; 1566fcf5ef2aSThomas Huth case 0x0063: 1567fcf5ef2aSThomas Huth /* MOVLI.L @Rm,R0 1568fcf5ef2aSThomas Huth 1 -> LDST 1569fcf5ef2aSThomas Huth (Rm) -> R0 1570fcf5ef2aSThomas Huth When interrupt/exception 1571fcf5ef2aSThomas Huth occurred 0 -> LDST 1572fcf5ef2aSThomas Huth */ 1573fcf5ef2aSThomas Huth if (ctx->features & SH_FEATURE_SH4A) { 1574fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_ldst, 0); 1575fcf5ef2aSThomas Huth tcg_gen_qemu_ld_i32(REG(0), REG(B11_8), ctx->memidx, MO_TESL); 1576fcf5ef2aSThomas Huth tcg_gen_movi_i32(cpu_ldst, 1); 1577fcf5ef2aSThomas Huth return; 1578fcf5ef2aSThomas Huth } else 1579fcf5ef2aSThomas Huth break; 1580fcf5ef2aSThomas Huth case 0x0093: /* ocbi @Rn */ 1581fcf5ef2aSThomas Huth { 1582fcf5ef2aSThomas Huth gen_helper_ocbi(cpu_env, REG(B11_8)); 1583fcf5ef2aSThomas Huth } 1584fcf5ef2aSThomas Huth return; 1585fcf5ef2aSThomas Huth case 0x00a3: /* ocbp @Rn */ 1586fcf5ef2aSThomas Huth case 0x00b3: /* ocbwb @Rn */ 1587fcf5ef2aSThomas Huth /* These instructions are supposed to do nothing in case of 1588fcf5ef2aSThomas Huth a cache miss. Given that we only partially emulate caches 1589fcf5ef2aSThomas Huth it is safe to simply ignore them. */ 1590fcf5ef2aSThomas Huth return; 1591fcf5ef2aSThomas Huth case 0x0083: /* pref @Rn */ 1592fcf5ef2aSThomas Huth return; 1593fcf5ef2aSThomas Huth case 0x00d3: /* prefi @Rn */ 1594fcf5ef2aSThomas Huth if (ctx->features & SH_FEATURE_SH4A) 1595fcf5ef2aSThomas Huth return; 1596fcf5ef2aSThomas Huth else 1597fcf5ef2aSThomas Huth break; 1598fcf5ef2aSThomas Huth case 0x00e3: /* icbi @Rn */ 1599fcf5ef2aSThomas Huth if (ctx->features & SH_FEATURE_SH4A) 1600fcf5ef2aSThomas Huth return; 1601fcf5ef2aSThomas Huth else 1602fcf5ef2aSThomas Huth break; 1603fcf5ef2aSThomas Huth case 0x00ab: /* synco */ 1604aa351317SAurelien Jarno if (ctx->features & SH_FEATURE_SH4A) { 1605aa351317SAurelien Jarno tcg_gen_mb(TCG_MO_ALL | TCG_BAR_SC); 1606fcf5ef2aSThomas Huth return; 1607aa351317SAurelien Jarno } 1608fcf5ef2aSThomas Huth break; 1609fcf5ef2aSThomas Huth case 0x4024: /* rotcl Rn */ 1610fcf5ef2aSThomas Huth { 1611fcf5ef2aSThomas Huth TCGv tmp = tcg_temp_new(); 1612fcf5ef2aSThomas Huth tcg_gen_mov_i32(tmp, cpu_sr_t); 1613fcf5ef2aSThomas Huth tcg_gen_shri_i32(cpu_sr_t, REG(B11_8), 31); 1614fcf5ef2aSThomas Huth tcg_gen_shli_i32(REG(B11_8), REG(B11_8), 1); 1615fcf5ef2aSThomas Huth tcg_gen_or_i32(REG(B11_8), REG(B11_8), tmp); 1616fcf5ef2aSThomas Huth tcg_temp_free(tmp); 1617fcf5ef2aSThomas Huth } 1618fcf5ef2aSThomas Huth return; 1619fcf5ef2aSThomas Huth case 0x4025: /* rotcr Rn */ 1620fcf5ef2aSThomas Huth { 1621fcf5ef2aSThomas Huth TCGv tmp = tcg_temp_new(); 1622fcf5ef2aSThomas Huth tcg_gen_shli_i32(tmp, cpu_sr_t, 31); 1623fcf5ef2aSThomas Huth tcg_gen_andi_i32(cpu_sr_t, REG(B11_8), 1); 1624fcf5ef2aSThomas Huth tcg_gen_shri_i32(REG(B11_8), REG(B11_8), 1); 1625fcf5ef2aSThomas Huth tcg_gen_or_i32(REG(B11_8), REG(B11_8), tmp); 1626fcf5ef2aSThomas Huth tcg_temp_free(tmp); 1627fcf5ef2aSThomas Huth } 1628fcf5ef2aSThomas Huth return; 1629fcf5ef2aSThomas Huth case 0x4004: /* rotl Rn */ 1630fcf5ef2aSThomas Huth tcg_gen_rotli_i32(REG(B11_8), REG(B11_8), 1); 1631fcf5ef2aSThomas Huth tcg_gen_andi_i32(cpu_sr_t, REG(B11_8), 0); 1632fcf5ef2aSThomas Huth return; 1633fcf5ef2aSThomas Huth case 0x4005: /* rotr Rn */ 1634fcf5ef2aSThomas Huth tcg_gen_andi_i32(cpu_sr_t, REG(B11_8), 0); 1635fcf5ef2aSThomas Huth tcg_gen_rotri_i32(REG(B11_8), REG(B11_8), 1); 1636fcf5ef2aSThomas Huth return; 1637fcf5ef2aSThomas Huth case 0x4000: /* shll Rn */ 1638fcf5ef2aSThomas Huth case 0x4020: /* shal Rn */ 1639fcf5ef2aSThomas Huth tcg_gen_shri_i32(cpu_sr_t, REG(B11_8), 31); 1640fcf5ef2aSThomas Huth tcg_gen_shli_i32(REG(B11_8), REG(B11_8), 1); 1641fcf5ef2aSThomas Huth return; 1642fcf5ef2aSThomas Huth case 0x4021: /* shar Rn */ 1643fcf5ef2aSThomas Huth tcg_gen_andi_i32(cpu_sr_t, REG(B11_8), 1); 1644fcf5ef2aSThomas Huth tcg_gen_sari_i32(REG(B11_8), REG(B11_8), 1); 1645fcf5ef2aSThomas Huth return; 1646fcf5ef2aSThomas Huth case 0x4001: /* shlr Rn */ 1647fcf5ef2aSThomas Huth tcg_gen_andi_i32(cpu_sr_t, REG(B11_8), 1); 1648fcf5ef2aSThomas Huth tcg_gen_shri_i32(REG(B11_8), REG(B11_8), 1); 1649fcf5ef2aSThomas Huth return; 1650fcf5ef2aSThomas Huth case 0x4008: /* shll2 Rn */ 1651fcf5ef2aSThomas Huth tcg_gen_shli_i32(REG(B11_8), REG(B11_8), 2); 1652fcf5ef2aSThomas Huth return; 1653fcf5ef2aSThomas Huth case 0x4018: /* shll8 Rn */ 1654fcf5ef2aSThomas Huth tcg_gen_shli_i32(REG(B11_8), REG(B11_8), 8); 1655fcf5ef2aSThomas Huth return; 1656fcf5ef2aSThomas Huth case 0x4028: /* shll16 Rn */ 1657fcf5ef2aSThomas Huth tcg_gen_shli_i32(REG(B11_8), REG(B11_8), 16); 1658fcf5ef2aSThomas Huth return; 1659fcf5ef2aSThomas Huth case 0x4009: /* shlr2 Rn */ 1660fcf5ef2aSThomas Huth tcg_gen_shri_i32(REG(B11_8), REG(B11_8), 2); 1661fcf5ef2aSThomas Huth return; 1662fcf5ef2aSThomas Huth case 0x4019: /* shlr8 Rn */ 1663fcf5ef2aSThomas Huth tcg_gen_shri_i32(REG(B11_8), REG(B11_8), 8); 1664fcf5ef2aSThomas Huth return; 1665fcf5ef2aSThomas Huth case 0x4029: /* shlr16 Rn */ 1666fcf5ef2aSThomas Huth tcg_gen_shri_i32(REG(B11_8), REG(B11_8), 16); 1667fcf5ef2aSThomas Huth return; 1668fcf5ef2aSThomas Huth case 0x401b: /* tas.b @Rn */ 1669fcf5ef2aSThomas Huth { 1670cb32f179SAurelien Jarno TCGv val = tcg_const_i32(0x80); 1671cb32f179SAurelien Jarno tcg_gen_atomic_fetch_or_i32(val, REG(B11_8), val, 1672cb32f179SAurelien Jarno ctx->memidx, MO_UB); 1673fcf5ef2aSThomas Huth tcg_gen_setcondi_i32(TCG_COND_EQ, cpu_sr_t, val, 0); 1674fcf5ef2aSThomas Huth tcg_temp_free(val); 1675fcf5ef2aSThomas Huth } 1676fcf5ef2aSThomas Huth return; 1677fcf5ef2aSThomas Huth case 0xf00d: /* fsts FPUL,FRn - FPSCR: Nothing */ 1678fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 16797c9f7038SRichard Henderson tcg_gen_mov_i32(FREG(B11_8), cpu_fpul); 1680fcf5ef2aSThomas Huth return; 1681fcf5ef2aSThomas Huth case 0xf01d: /* flds FRm,FPUL - FPSCR: Nothing */ 1682fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 16837c9f7038SRichard Henderson tcg_gen_mov_i32(cpu_fpul, FREG(B11_8)); 1684fcf5ef2aSThomas Huth return; 1685fcf5ef2aSThomas Huth case 0xf02d: /* float FPUL,FRn/DRn - FPSCR: R[PR,Enable.I]/W[Cause,Flag] */ 1686fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1687a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_PR) { 1688fcf5ef2aSThomas Huth TCGv_i64 fp; 1689fcf5ef2aSThomas Huth if (ctx->opcode & 0x0100) 1690fcf5ef2aSThomas Huth break; /* illegal instruction */ 1691fcf5ef2aSThomas Huth fp = tcg_temp_new_i64(); 1692fcf5ef2aSThomas Huth gen_helper_float_DT(fp, cpu_env, cpu_fpul); 16931e0b21d8SRichard Henderson gen_store_fpr64(ctx, fp, B11_8); 1694fcf5ef2aSThomas Huth tcg_temp_free_i64(fp); 1695fcf5ef2aSThomas Huth } 1696fcf5ef2aSThomas Huth else { 16977c9f7038SRichard Henderson gen_helper_float_FT(FREG(B11_8), cpu_env, cpu_fpul); 1698fcf5ef2aSThomas Huth } 1699fcf5ef2aSThomas Huth return; 1700fcf5ef2aSThomas Huth case 0xf03d: /* ftrc FRm/DRm,FPUL - FPSCR: R[PR,Enable.V]/W[Cause,Flag] */ 1701fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1702a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_PR) { 1703fcf5ef2aSThomas Huth TCGv_i64 fp; 1704fcf5ef2aSThomas Huth if (ctx->opcode & 0x0100) 1705fcf5ef2aSThomas Huth break; /* illegal instruction */ 1706fcf5ef2aSThomas Huth fp = tcg_temp_new_i64(); 17071e0b21d8SRichard Henderson gen_load_fpr64(ctx, fp, B11_8); 1708fcf5ef2aSThomas Huth gen_helper_ftrc_DT(cpu_fpul, cpu_env, fp); 1709fcf5ef2aSThomas Huth tcg_temp_free_i64(fp); 1710fcf5ef2aSThomas Huth } 1711fcf5ef2aSThomas Huth else { 17127c9f7038SRichard Henderson gen_helper_ftrc_FT(cpu_fpul, cpu_env, FREG(B11_8)); 1713fcf5ef2aSThomas Huth } 1714fcf5ef2aSThomas Huth return; 1715fcf5ef2aSThomas Huth case 0xf04d: /* fneg FRn/DRn - FPSCR: Nothing */ 1716fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 17177c9f7038SRichard Henderson tcg_gen_xori_i32(FREG(B11_8), FREG(B11_8), 0x80000000); 1718fcf5ef2aSThomas Huth return; 171957f5c1b0SAurelien Jarno case 0xf05d: /* fabs FRn/DRn - FPCSR: Nothing */ 1720fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 17217c9f7038SRichard Henderson tcg_gen_andi_i32(FREG(B11_8), FREG(B11_8), 0x7fffffff); 1722fcf5ef2aSThomas Huth return; 1723fcf5ef2aSThomas Huth case 0xf06d: /* fsqrt FRn */ 1724fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1725a6215749SAurelien Jarno if (ctx->tbflags & FPSCR_PR) { 1726fcf5ef2aSThomas Huth if (ctx->opcode & 0x0100) 1727fcf5ef2aSThomas Huth break; /* illegal instruction */ 1728fcf5ef2aSThomas Huth TCGv_i64 fp = tcg_temp_new_i64(); 17291e0b21d8SRichard Henderson gen_load_fpr64(ctx, fp, B11_8); 1730fcf5ef2aSThomas Huth gen_helper_fsqrt_DT(fp, cpu_env, fp); 17311e0b21d8SRichard Henderson gen_store_fpr64(ctx, fp, B11_8); 1732fcf5ef2aSThomas Huth tcg_temp_free_i64(fp); 1733fcf5ef2aSThomas Huth } else { 17347c9f7038SRichard Henderson gen_helper_fsqrt_FT(FREG(B11_8), cpu_env, FREG(B11_8)); 1735fcf5ef2aSThomas Huth } 1736fcf5ef2aSThomas Huth return; 1737fcf5ef2aSThomas Huth case 0xf07d: /* fsrra FRn */ 1738fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1739fcf5ef2aSThomas Huth break; 1740fcf5ef2aSThomas Huth case 0xf08d: /* fldi0 FRn - FPSCR: R[PR] */ 1741fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1742a6215749SAurelien Jarno if (!(ctx->tbflags & FPSCR_PR)) { 17437c9f7038SRichard Henderson tcg_gen_movi_i32(FREG(B11_8), 0); 1744fcf5ef2aSThomas Huth } 1745fcf5ef2aSThomas Huth return; 1746fcf5ef2aSThomas Huth case 0xf09d: /* fldi1 FRn - FPSCR: R[PR] */ 1747fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1748a6215749SAurelien Jarno if (!(ctx->tbflags & FPSCR_PR)) { 17497c9f7038SRichard Henderson tcg_gen_movi_i32(FREG(B11_8), 0x3f800000); 1750fcf5ef2aSThomas Huth } 1751fcf5ef2aSThomas Huth return; 1752fcf5ef2aSThomas Huth case 0xf0ad: /* fcnvsd FPUL,DRn */ 1753fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1754fcf5ef2aSThomas Huth { 1755fcf5ef2aSThomas Huth TCGv_i64 fp = tcg_temp_new_i64(); 1756fcf5ef2aSThomas Huth gen_helper_fcnvsd_FT_DT(fp, cpu_env, cpu_fpul); 17571e0b21d8SRichard Henderson gen_store_fpr64(ctx, fp, B11_8); 1758fcf5ef2aSThomas Huth tcg_temp_free_i64(fp); 1759fcf5ef2aSThomas Huth } 1760fcf5ef2aSThomas Huth return; 1761fcf5ef2aSThomas Huth case 0xf0bd: /* fcnvds DRn,FPUL */ 1762fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1763fcf5ef2aSThomas Huth { 1764fcf5ef2aSThomas Huth TCGv_i64 fp = tcg_temp_new_i64(); 17651e0b21d8SRichard Henderson gen_load_fpr64(ctx, fp, B11_8); 1766fcf5ef2aSThomas Huth gen_helper_fcnvds_DT_FT(cpu_fpul, cpu_env, fp); 1767fcf5ef2aSThomas Huth tcg_temp_free_i64(fp); 1768fcf5ef2aSThomas Huth } 1769fcf5ef2aSThomas Huth return; 1770fcf5ef2aSThomas Huth case 0xf0ed: /* fipr FVm,FVn */ 1771fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1772a6215749SAurelien Jarno if ((ctx->tbflags & FPSCR_PR) == 0) { 1773fcf5ef2aSThomas Huth TCGv m, n; 1774fcf5ef2aSThomas Huth m = tcg_const_i32((ctx->opcode >> 8) & 3); 1775fcf5ef2aSThomas Huth n = tcg_const_i32((ctx->opcode >> 10) & 3); 1776fcf5ef2aSThomas Huth gen_helper_fipr(cpu_env, m, n); 1777fcf5ef2aSThomas Huth tcg_temp_free(m); 1778fcf5ef2aSThomas Huth tcg_temp_free(n); 1779fcf5ef2aSThomas Huth return; 1780fcf5ef2aSThomas Huth } 1781fcf5ef2aSThomas Huth break; 1782fcf5ef2aSThomas Huth case 0xf0fd: /* ftrv XMTRX,FVn */ 1783fcf5ef2aSThomas Huth CHECK_FPU_ENABLED 1784fcf5ef2aSThomas Huth if ((ctx->opcode & 0x0300) == 0x0100 && 1785a6215749SAurelien Jarno (ctx->tbflags & FPSCR_PR) == 0) { 1786fcf5ef2aSThomas Huth TCGv n; 1787fcf5ef2aSThomas Huth n = tcg_const_i32((ctx->opcode >> 10) & 3); 1788fcf5ef2aSThomas Huth gen_helper_ftrv(cpu_env, n); 1789fcf5ef2aSThomas Huth tcg_temp_free(n); 1790fcf5ef2aSThomas Huth return; 1791fcf5ef2aSThomas Huth } 1792fcf5ef2aSThomas Huth break; 1793fcf5ef2aSThomas Huth } 1794fcf5ef2aSThomas Huth #if 0 1795fcf5ef2aSThomas Huth fprintf(stderr, "unknown instruction 0x%04x at pc 0x%08x\n", 1796fcf5ef2aSThomas Huth ctx->opcode, ctx->pc); 1797fcf5ef2aSThomas Huth fflush(stderr); 1798fcf5ef2aSThomas Huth #endif 1799ac9707eaSAurelien Jarno gen_save_cpu_state(ctx, true); 18009a562ae7SAurelien Jarno if (ctx->envflags & DELAY_SLOT_MASK) { 1801fcf5ef2aSThomas Huth gen_helper_raise_slot_illegal_instruction(cpu_env); 1802fcf5ef2aSThomas Huth } else { 1803fcf5ef2aSThomas Huth gen_helper_raise_illegal_instruction(cpu_env); 1804fcf5ef2aSThomas Huth } 180563205665SAurelien Jarno ctx->bstate = BS_EXCP; 1806fcf5ef2aSThomas Huth } 1807fcf5ef2aSThomas Huth 1808fcf5ef2aSThomas Huth static void decode_opc(DisasContext * ctx) 1809fcf5ef2aSThomas Huth { 1810a6215749SAurelien Jarno uint32_t old_flags = ctx->envflags; 1811fcf5ef2aSThomas Huth 1812fcf5ef2aSThomas Huth _decode_opc(ctx); 1813fcf5ef2aSThomas Huth 18149a562ae7SAurelien Jarno if (old_flags & DELAY_SLOT_MASK) { 1815fcf5ef2aSThomas Huth /* go out of the delay slot */ 18169a562ae7SAurelien Jarno ctx->envflags &= ~DELAY_SLOT_MASK; 18174bfa602bSRichard Henderson 18184bfa602bSRichard Henderson /* When in an exclusive region, we must continue to the end 18194bfa602bSRichard Henderson for conditional branches. */ 18204bfa602bSRichard Henderson if (ctx->tbflags & GUSA_EXCLUSIVE 18214bfa602bSRichard Henderson && old_flags & DELAY_SLOT_CONDITIONAL) { 18224bfa602bSRichard Henderson gen_delayed_conditional_jump(ctx); 18234bfa602bSRichard Henderson return; 18244bfa602bSRichard Henderson } 18254bfa602bSRichard Henderson /* Otherwise this is probably an invalid gUSA region. 18264bfa602bSRichard Henderson Drop the GUSA bits so the next TB doesn't see them. */ 18274bfa602bSRichard Henderson ctx->envflags &= ~GUSA_MASK; 18284bfa602bSRichard Henderson 1829ac9707eaSAurelien Jarno tcg_gen_movi_i32(cpu_flags, ctx->envflags); 1830fcf5ef2aSThomas Huth ctx->bstate = BS_BRANCH; 1831fcf5ef2aSThomas Huth if (old_flags & DELAY_SLOT_CONDITIONAL) { 1832fcf5ef2aSThomas Huth gen_delayed_conditional_jump(ctx); 1833be53081aSAurelien Jarno } else { 1834fcf5ef2aSThomas Huth gen_jump(ctx); 1835fcf5ef2aSThomas Huth } 18364bfa602bSRichard Henderson } 18374bfa602bSRichard Henderson } 1838fcf5ef2aSThomas Huth 18394bfa602bSRichard Henderson #ifdef CONFIG_USER_ONLY 18404bfa602bSRichard Henderson /* For uniprocessors, SH4 uses optimistic restartable atomic sequences. 18414bfa602bSRichard Henderson Upon an interrupt, a real kernel would simply notice magic values in 18424bfa602bSRichard Henderson the registers and reset the PC to the start of the sequence. 18434bfa602bSRichard Henderson 18444bfa602bSRichard Henderson For QEMU, we cannot do this in quite the same way. Instead, we notice 18454bfa602bSRichard Henderson the normal start of such a sequence (mov #-x,r15). While we can handle 18464bfa602bSRichard Henderson any sequence via cpu_exec_step_atomic, we can recognize the "normal" 18474bfa602bSRichard Henderson sequences and transform them into atomic operations as seen by the host. 18484bfa602bSRichard Henderson */ 18494bfa602bSRichard Henderson static int decode_gusa(DisasContext *ctx, CPUSH4State *env, int *pmax_insns) 18504bfa602bSRichard Henderson { 1851d6a6cffdSRichard Henderson uint16_t insns[5]; 1852d6a6cffdSRichard Henderson int ld_adr, ld_dst, ld_mop; 1853d6a6cffdSRichard Henderson int op_dst, op_src, op_opc; 1854d6a6cffdSRichard Henderson int mv_src, mt_dst, st_src, st_mop; 1855d6a6cffdSRichard Henderson TCGv op_arg; 1856d6a6cffdSRichard Henderson 18574bfa602bSRichard Henderson uint32_t pc = ctx->pc; 18584bfa602bSRichard Henderson uint32_t pc_end = ctx->tb->cs_base; 18594bfa602bSRichard Henderson int backup = sextract32(ctx->tbflags, GUSA_SHIFT, 8); 18604bfa602bSRichard Henderson int max_insns = (pc_end - pc) / 2; 1861d6a6cffdSRichard Henderson int i; 18624bfa602bSRichard Henderson 18634bfa602bSRichard Henderson if (pc != pc_end + backup || max_insns < 2) { 18644bfa602bSRichard Henderson /* This is a malformed gUSA region. Don't do anything special, 18654bfa602bSRichard Henderson since the interpreter is likely to get confused. */ 18664bfa602bSRichard Henderson ctx->envflags &= ~GUSA_MASK; 18674bfa602bSRichard Henderson return 0; 1868fcf5ef2aSThomas Huth } 18694bfa602bSRichard Henderson 18704bfa602bSRichard Henderson if (ctx->tbflags & GUSA_EXCLUSIVE) { 18714bfa602bSRichard Henderson /* Regardless of single-stepping or the end of the page, 18724bfa602bSRichard Henderson we must complete execution of the gUSA region while 18734bfa602bSRichard Henderson holding the exclusive lock. */ 18744bfa602bSRichard Henderson *pmax_insns = max_insns; 18754bfa602bSRichard Henderson return 0; 1876fcf5ef2aSThomas Huth } 1877fcf5ef2aSThomas Huth 1878d6a6cffdSRichard Henderson /* The state machine below will consume only a few insns. 1879d6a6cffdSRichard Henderson If there are more than that in a region, fail now. */ 1880d6a6cffdSRichard Henderson if (max_insns > ARRAY_SIZE(insns)) { 1881d6a6cffdSRichard Henderson goto fail; 1882d6a6cffdSRichard Henderson } 1883d6a6cffdSRichard Henderson 1884d6a6cffdSRichard Henderson /* Read all of the insns for the region. */ 1885d6a6cffdSRichard Henderson for (i = 0; i < max_insns; ++i) { 1886d6a6cffdSRichard Henderson insns[i] = cpu_lduw_code(env, pc + i * 2); 1887d6a6cffdSRichard Henderson } 1888d6a6cffdSRichard Henderson 1889d6a6cffdSRichard Henderson ld_adr = ld_dst = ld_mop = -1; 1890d6a6cffdSRichard Henderson mv_src = -1; 1891d6a6cffdSRichard Henderson op_dst = op_src = op_opc = -1; 1892d6a6cffdSRichard Henderson mt_dst = -1; 1893d6a6cffdSRichard Henderson st_src = st_mop = -1; 1894d6a6cffdSRichard Henderson TCGV_UNUSED(op_arg); 1895d6a6cffdSRichard Henderson i = 0; 1896d6a6cffdSRichard Henderson 1897d6a6cffdSRichard Henderson #define NEXT_INSN \ 1898d6a6cffdSRichard Henderson do { if (i >= max_insns) goto fail; ctx->opcode = insns[i++]; } while (0) 1899d6a6cffdSRichard Henderson 1900d6a6cffdSRichard Henderson /* 1901d6a6cffdSRichard Henderson * Expect a load to begin the region. 1902d6a6cffdSRichard Henderson */ 1903d6a6cffdSRichard Henderson NEXT_INSN; 1904d6a6cffdSRichard Henderson switch (ctx->opcode & 0xf00f) { 1905d6a6cffdSRichard Henderson case 0x6000: /* mov.b @Rm,Rn */ 1906d6a6cffdSRichard Henderson ld_mop = MO_SB; 1907d6a6cffdSRichard Henderson break; 1908d6a6cffdSRichard Henderson case 0x6001: /* mov.w @Rm,Rn */ 1909d6a6cffdSRichard Henderson ld_mop = MO_TESW; 1910d6a6cffdSRichard Henderson break; 1911d6a6cffdSRichard Henderson case 0x6002: /* mov.l @Rm,Rn */ 1912d6a6cffdSRichard Henderson ld_mop = MO_TESL; 1913d6a6cffdSRichard Henderson break; 1914d6a6cffdSRichard Henderson default: 1915d6a6cffdSRichard Henderson goto fail; 1916d6a6cffdSRichard Henderson } 1917d6a6cffdSRichard Henderson ld_adr = B7_4; 1918d6a6cffdSRichard Henderson ld_dst = B11_8; 1919d6a6cffdSRichard Henderson if (ld_adr == ld_dst) { 1920d6a6cffdSRichard Henderson goto fail; 1921d6a6cffdSRichard Henderson } 1922d6a6cffdSRichard Henderson /* Unless we see a mov, any two-operand operation must use ld_dst. */ 1923d6a6cffdSRichard Henderson op_dst = ld_dst; 1924d6a6cffdSRichard Henderson 1925d6a6cffdSRichard Henderson /* 1926d6a6cffdSRichard Henderson * Expect an optional register move. 1927d6a6cffdSRichard Henderson */ 1928d6a6cffdSRichard Henderson NEXT_INSN; 1929d6a6cffdSRichard Henderson switch (ctx->opcode & 0xf00f) { 1930d6a6cffdSRichard Henderson case 0x6003: /* mov Rm,Rn */ 1931d6a6cffdSRichard Henderson /* Here we want to recognize ld_dst being saved for later consumtion, 1932d6a6cffdSRichard Henderson or for another input register being copied so that ld_dst need not 1933d6a6cffdSRichard Henderson be clobbered during the operation. */ 1934d6a6cffdSRichard Henderson op_dst = B11_8; 1935d6a6cffdSRichard Henderson mv_src = B7_4; 1936d6a6cffdSRichard Henderson if (op_dst == ld_dst) { 1937d6a6cffdSRichard Henderson /* Overwriting the load output. */ 1938d6a6cffdSRichard Henderson goto fail; 1939d6a6cffdSRichard Henderson } 1940d6a6cffdSRichard Henderson if (mv_src != ld_dst) { 1941d6a6cffdSRichard Henderson /* Copying a new input; constrain op_src to match the load. */ 1942d6a6cffdSRichard Henderson op_src = ld_dst; 1943d6a6cffdSRichard Henderson } 1944d6a6cffdSRichard Henderson break; 1945d6a6cffdSRichard Henderson 1946d6a6cffdSRichard Henderson default: 1947d6a6cffdSRichard Henderson /* Put back and re-examine as operation. */ 1948d6a6cffdSRichard Henderson --i; 1949d6a6cffdSRichard Henderson } 1950d6a6cffdSRichard Henderson 1951d6a6cffdSRichard Henderson /* 1952d6a6cffdSRichard Henderson * Expect the operation. 1953d6a6cffdSRichard Henderson */ 1954d6a6cffdSRichard Henderson NEXT_INSN; 1955d6a6cffdSRichard Henderson switch (ctx->opcode & 0xf00f) { 1956d6a6cffdSRichard Henderson case 0x300c: /* add Rm,Rn */ 1957d6a6cffdSRichard Henderson op_opc = INDEX_op_add_i32; 1958d6a6cffdSRichard Henderson goto do_reg_op; 1959d6a6cffdSRichard Henderson case 0x2009: /* and Rm,Rn */ 1960d6a6cffdSRichard Henderson op_opc = INDEX_op_and_i32; 1961d6a6cffdSRichard Henderson goto do_reg_op; 1962d6a6cffdSRichard Henderson case 0x200a: /* xor Rm,Rn */ 1963d6a6cffdSRichard Henderson op_opc = INDEX_op_xor_i32; 1964d6a6cffdSRichard Henderson goto do_reg_op; 1965d6a6cffdSRichard Henderson case 0x200b: /* or Rm,Rn */ 1966d6a6cffdSRichard Henderson op_opc = INDEX_op_or_i32; 1967d6a6cffdSRichard Henderson do_reg_op: 1968d6a6cffdSRichard Henderson /* The operation register should be as expected, and the 1969d6a6cffdSRichard Henderson other input cannot depend on the load. */ 1970d6a6cffdSRichard Henderson if (op_dst != B11_8) { 1971d6a6cffdSRichard Henderson goto fail; 1972d6a6cffdSRichard Henderson } 1973d6a6cffdSRichard Henderson if (op_src < 0) { 1974d6a6cffdSRichard Henderson /* Unconstrainted input. */ 1975d6a6cffdSRichard Henderson op_src = B7_4; 1976d6a6cffdSRichard Henderson } else if (op_src == B7_4) { 1977d6a6cffdSRichard Henderson /* Constrained input matched load. All operations are 1978d6a6cffdSRichard Henderson commutative; "swap" them by "moving" the load output 1979d6a6cffdSRichard Henderson to the (implicit) first argument and the move source 1980d6a6cffdSRichard Henderson to the (explicit) second argument. */ 1981d6a6cffdSRichard Henderson op_src = mv_src; 1982d6a6cffdSRichard Henderson } else { 1983d6a6cffdSRichard Henderson goto fail; 1984d6a6cffdSRichard Henderson } 1985d6a6cffdSRichard Henderson op_arg = REG(op_src); 1986d6a6cffdSRichard Henderson break; 1987d6a6cffdSRichard Henderson 1988d6a6cffdSRichard Henderson case 0x6007: /* not Rm,Rn */ 1989d6a6cffdSRichard Henderson if (ld_dst != B7_4 || mv_src >= 0) { 1990d6a6cffdSRichard Henderson goto fail; 1991d6a6cffdSRichard Henderson } 1992d6a6cffdSRichard Henderson op_dst = B11_8; 1993d6a6cffdSRichard Henderson op_opc = INDEX_op_xor_i32; 1994d6a6cffdSRichard Henderson op_arg = tcg_const_i32(-1); 1995d6a6cffdSRichard Henderson break; 1996d6a6cffdSRichard Henderson 1997d6a6cffdSRichard Henderson case 0x7000 ... 0x700f: /* add #imm,Rn */ 1998d6a6cffdSRichard Henderson if (op_dst != B11_8 || mv_src >= 0) { 1999d6a6cffdSRichard Henderson goto fail; 2000d6a6cffdSRichard Henderson } 2001d6a6cffdSRichard Henderson op_opc = INDEX_op_add_i32; 2002d6a6cffdSRichard Henderson op_arg = tcg_const_i32(B7_0s); 2003d6a6cffdSRichard Henderson break; 2004d6a6cffdSRichard Henderson 2005d6a6cffdSRichard Henderson case 0x3000: /* cmp/eq Rm,Rn */ 2006d6a6cffdSRichard Henderson /* Looking for the middle of a compare-and-swap sequence, 2007d6a6cffdSRichard Henderson beginning with the compare. Operands can be either order, 2008d6a6cffdSRichard Henderson but with only one overlapping the load. */ 2009d6a6cffdSRichard Henderson if ((ld_dst == B11_8) + (ld_dst == B7_4) != 1 || mv_src >= 0) { 2010d6a6cffdSRichard Henderson goto fail; 2011d6a6cffdSRichard Henderson } 2012d6a6cffdSRichard Henderson op_opc = INDEX_op_setcond_i32; /* placeholder */ 2013d6a6cffdSRichard Henderson op_src = (ld_dst == B11_8 ? B7_4 : B11_8); 2014d6a6cffdSRichard Henderson op_arg = REG(op_src); 2015d6a6cffdSRichard Henderson 2016d6a6cffdSRichard Henderson NEXT_INSN; 2017d6a6cffdSRichard Henderson switch (ctx->opcode & 0xff00) { 2018d6a6cffdSRichard Henderson case 0x8b00: /* bf label */ 2019d6a6cffdSRichard Henderson case 0x8f00: /* bf/s label */ 2020d6a6cffdSRichard Henderson if (pc + (i + 1 + B7_0s) * 2 != pc_end) { 2021d6a6cffdSRichard Henderson goto fail; 2022d6a6cffdSRichard Henderson } 2023d6a6cffdSRichard Henderson if ((ctx->opcode & 0xff00) == 0x8b00) { /* bf label */ 2024d6a6cffdSRichard Henderson break; 2025d6a6cffdSRichard Henderson } 2026d6a6cffdSRichard Henderson /* We're looking to unconditionally modify Rn with the 2027d6a6cffdSRichard Henderson result of the comparison, within the delay slot of 2028d6a6cffdSRichard Henderson the branch. This is used by older gcc. */ 2029d6a6cffdSRichard Henderson NEXT_INSN; 2030d6a6cffdSRichard Henderson if ((ctx->opcode & 0xf0ff) == 0x0029) { /* movt Rn */ 2031d6a6cffdSRichard Henderson mt_dst = B11_8; 2032d6a6cffdSRichard Henderson } else { 2033d6a6cffdSRichard Henderson goto fail; 2034d6a6cffdSRichard Henderson } 2035d6a6cffdSRichard Henderson break; 2036d6a6cffdSRichard Henderson 2037d6a6cffdSRichard Henderson default: 2038d6a6cffdSRichard Henderson goto fail; 2039d6a6cffdSRichard Henderson } 2040d6a6cffdSRichard Henderson break; 2041d6a6cffdSRichard Henderson 2042d6a6cffdSRichard Henderson case 0x2008: /* tst Rm,Rn */ 2043d6a6cffdSRichard Henderson /* Looking for a compare-and-swap against zero. */ 2044d6a6cffdSRichard Henderson if (ld_dst != B11_8 || ld_dst != B7_4 || mv_src >= 0) { 2045d6a6cffdSRichard Henderson goto fail; 2046d6a6cffdSRichard Henderson } 2047d6a6cffdSRichard Henderson op_opc = INDEX_op_setcond_i32; 2048d6a6cffdSRichard Henderson op_arg = tcg_const_i32(0); 2049d6a6cffdSRichard Henderson 2050d6a6cffdSRichard Henderson NEXT_INSN; 2051d6a6cffdSRichard Henderson if ((ctx->opcode & 0xff00) != 0x8900 /* bt label */ 2052d6a6cffdSRichard Henderson || pc + (i + 1 + B7_0s) * 2 != pc_end) { 2053d6a6cffdSRichard Henderson goto fail; 2054d6a6cffdSRichard Henderson } 2055d6a6cffdSRichard Henderson break; 2056d6a6cffdSRichard Henderson 2057d6a6cffdSRichard Henderson default: 2058d6a6cffdSRichard Henderson /* Put back and re-examine as store. */ 2059d6a6cffdSRichard Henderson --i; 2060d6a6cffdSRichard Henderson } 2061d6a6cffdSRichard Henderson 2062d6a6cffdSRichard Henderson /* 2063d6a6cffdSRichard Henderson * Expect the store. 2064d6a6cffdSRichard Henderson */ 2065d6a6cffdSRichard Henderson /* The store must be the last insn. */ 2066d6a6cffdSRichard Henderson if (i != max_insns - 1) { 2067d6a6cffdSRichard Henderson goto fail; 2068d6a6cffdSRichard Henderson } 2069d6a6cffdSRichard Henderson NEXT_INSN; 2070d6a6cffdSRichard Henderson switch (ctx->opcode & 0xf00f) { 2071d6a6cffdSRichard Henderson case 0x2000: /* mov.b Rm,@Rn */ 2072d6a6cffdSRichard Henderson st_mop = MO_UB; 2073d6a6cffdSRichard Henderson break; 2074d6a6cffdSRichard Henderson case 0x2001: /* mov.w Rm,@Rn */ 2075d6a6cffdSRichard Henderson st_mop = MO_UW; 2076d6a6cffdSRichard Henderson break; 2077d6a6cffdSRichard Henderson case 0x2002: /* mov.l Rm,@Rn */ 2078d6a6cffdSRichard Henderson st_mop = MO_UL; 2079d6a6cffdSRichard Henderson break; 2080d6a6cffdSRichard Henderson default: 2081d6a6cffdSRichard Henderson goto fail; 2082d6a6cffdSRichard Henderson } 2083d6a6cffdSRichard Henderson /* The store must match the load. */ 2084d6a6cffdSRichard Henderson if (ld_adr != B11_8 || st_mop != (ld_mop & MO_SIZE)) { 2085d6a6cffdSRichard Henderson goto fail; 2086d6a6cffdSRichard Henderson } 2087d6a6cffdSRichard Henderson st_src = B7_4; 2088d6a6cffdSRichard Henderson 2089d6a6cffdSRichard Henderson #undef NEXT_INSN 2090d6a6cffdSRichard Henderson 2091d6a6cffdSRichard Henderson /* 2092d6a6cffdSRichard Henderson * Emit the operation. 2093d6a6cffdSRichard Henderson */ 2094d6a6cffdSRichard Henderson tcg_gen_insn_start(pc, ctx->envflags); 2095d6a6cffdSRichard Henderson switch (op_opc) { 2096d6a6cffdSRichard Henderson case -1: 2097d6a6cffdSRichard Henderson /* No operation found. Look for exchange pattern. */ 2098d6a6cffdSRichard Henderson if (st_src == ld_dst || mv_src >= 0) { 2099d6a6cffdSRichard Henderson goto fail; 2100d6a6cffdSRichard Henderson } 2101d6a6cffdSRichard Henderson tcg_gen_atomic_xchg_i32(REG(ld_dst), REG(ld_adr), REG(st_src), 2102d6a6cffdSRichard Henderson ctx->memidx, ld_mop); 2103d6a6cffdSRichard Henderson break; 2104d6a6cffdSRichard Henderson 2105d6a6cffdSRichard Henderson case INDEX_op_add_i32: 2106d6a6cffdSRichard Henderson if (op_dst != st_src) { 2107d6a6cffdSRichard Henderson goto fail; 2108d6a6cffdSRichard Henderson } 2109d6a6cffdSRichard Henderson if (op_dst == ld_dst && st_mop == MO_UL) { 2110d6a6cffdSRichard Henderson tcg_gen_atomic_add_fetch_i32(REG(ld_dst), REG(ld_adr), 2111d6a6cffdSRichard Henderson op_arg, ctx->memidx, ld_mop); 2112d6a6cffdSRichard Henderson } else { 2113d6a6cffdSRichard Henderson tcg_gen_atomic_fetch_add_i32(REG(ld_dst), REG(ld_adr), 2114d6a6cffdSRichard Henderson op_arg, ctx->memidx, ld_mop); 2115d6a6cffdSRichard Henderson if (op_dst != ld_dst) { 2116d6a6cffdSRichard Henderson /* Note that mop sizes < 4 cannot use add_fetch 2117d6a6cffdSRichard Henderson because it won't carry into the higher bits. */ 2118d6a6cffdSRichard Henderson tcg_gen_add_i32(REG(op_dst), REG(ld_dst), op_arg); 2119d6a6cffdSRichard Henderson } 2120d6a6cffdSRichard Henderson } 2121d6a6cffdSRichard Henderson break; 2122d6a6cffdSRichard Henderson 2123d6a6cffdSRichard Henderson case INDEX_op_and_i32: 2124d6a6cffdSRichard Henderson if (op_dst != st_src) { 2125d6a6cffdSRichard Henderson goto fail; 2126d6a6cffdSRichard Henderson } 2127d6a6cffdSRichard Henderson if (op_dst == ld_dst) { 2128d6a6cffdSRichard Henderson tcg_gen_atomic_and_fetch_i32(REG(ld_dst), REG(ld_adr), 2129d6a6cffdSRichard Henderson op_arg, ctx->memidx, ld_mop); 2130d6a6cffdSRichard Henderson } else { 2131d6a6cffdSRichard Henderson tcg_gen_atomic_fetch_and_i32(REG(ld_dst), REG(ld_adr), 2132d6a6cffdSRichard Henderson op_arg, ctx->memidx, ld_mop); 2133d6a6cffdSRichard Henderson tcg_gen_and_i32(REG(op_dst), REG(ld_dst), op_arg); 2134d6a6cffdSRichard Henderson } 2135d6a6cffdSRichard Henderson break; 2136d6a6cffdSRichard Henderson 2137d6a6cffdSRichard Henderson case INDEX_op_or_i32: 2138d6a6cffdSRichard Henderson if (op_dst != st_src) { 2139d6a6cffdSRichard Henderson goto fail; 2140d6a6cffdSRichard Henderson } 2141d6a6cffdSRichard Henderson if (op_dst == ld_dst) { 2142d6a6cffdSRichard Henderson tcg_gen_atomic_or_fetch_i32(REG(ld_dst), REG(ld_adr), 2143d6a6cffdSRichard Henderson op_arg, ctx->memidx, ld_mop); 2144d6a6cffdSRichard Henderson } else { 2145d6a6cffdSRichard Henderson tcg_gen_atomic_fetch_or_i32(REG(ld_dst), REG(ld_adr), 2146d6a6cffdSRichard Henderson op_arg, ctx->memidx, ld_mop); 2147d6a6cffdSRichard Henderson tcg_gen_or_i32(REG(op_dst), REG(ld_dst), op_arg); 2148d6a6cffdSRichard Henderson } 2149d6a6cffdSRichard Henderson break; 2150d6a6cffdSRichard Henderson 2151d6a6cffdSRichard Henderson case INDEX_op_xor_i32: 2152d6a6cffdSRichard Henderson if (op_dst != st_src) { 2153d6a6cffdSRichard Henderson goto fail; 2154d6a6cffdSRichard Henderson } 2155d6a6cffdSRichard Henderson if (op_dst == ld_dst) { 2156d6a6cffdSRichard Henderson tcg_gen_atomic_xor_fetch_i32(REG(ld_dst), REG(ld_adr), 2157d6a6cffdSRichard Henderson op_arg, ctx->memidx, ld_mop); 2158d6a6cffdSRichard Henderson } else { 2159d6a6cffdSRichard Henderson tcg_gen_atomic_fetch_xor_i32(REG(ld_dst), REG(ld_adr), 2160d6a6cffdSRichard Henderson op_arg, ctx->memidx, ld_mop); 2161d6a6cffdSRichard Henderson tcg_gen_xor_i32(REG(op_dst), REG(ld_dst), op_arg); 2162d6a6cffdSRichard Henderson } 2163d6a6cffdSRichard Henderson break; 2164d6a6cffdSRichard Henderson 2165d6a6cffdSRichard Henderson case INDEX_op_setcond_i32: 2166d6a6cffdSRichard Henderson if (st_src == ld_dst) { 2167d6a6cffdSRichard Henderson goto fail; 2168d6a6cffdSRichard Henderson } 2169d6a6cffdSRichard Henderson tcg_gen_atomic_cmpxchg_i32(REG(ld_dst), REG(ld_adr), op_arg, 2170d6a6cffdSRichard Henderson REG(st_src), ctx->memidx, ld_mop); 2171d6a6cffdSRichard Henderson tcg_gen_setcond_i32(TCG_COND_EQ, cpu_sr_t, REG(ld_dst), op_arg); 2172d6a6cffdSRichard Henderson if (mt_dst >= 0) { 2173d6a6cffdSRichard Henderson tcg_gen_mov_i32(REG(mt_dst), cpu_sr_t); 2174d6a6cffdSRichard Henderson } 2175d6a6cffdSRichard Henderson break; 2176d6a6cffdSRichard Henderson 2177d6a6cffdSRichard Henderson default: 2178d6a6cffdSRichard Henderson g_assert_not_reached(); 2179d6a6cffdSRichard Henderson } 2180d6a6cffdSRichard Henderson 2181d6a6cffdSRichard Henderson /* If op_src is not a valid register, then op_arg was a constant. */ 2182d6a6cffdSRichard Henderson if (op_src < 0) { 2183d6a6cffdSRichard Henderson tcg_temp_free_i32(op_arg); 2184d6a6cffdSRichard Henderson } 2185d6a6cffdSRichard Henderson 2186d6a6cffdSRichard Henderson /* The entire region has been translated. */ 2187d6a6cffdSRichard Henderson ctx->envflags &= ~GUSA_MASK; 2188d6a6cffdSRichard Henderson ctx->pc = pc_end; 2189d6a6cffdSRichard Henderson return max_insns; 2190d6a6cffdSRichard Henderson 2191d6a6cffdSRichard Henderson fail: 21924bfa602bSRichard Henderson qemu_log_mask(LOG_UNIMP, "Unrecognized gUSA sequence %08x-%08x\n", 21934bfa602bSRichard Henderson pc, pc_end); 21944bfa602bSRichard Henderson 21954bfa602bSRichard Henderson /* Restart with the EXCLUSIVE bit set, within a TB run via 21964bfa602bSRichard Henderson cpu_exec_step_atomic holding the exclusive lock. */ 21974bfa602bSRichard Henderson tcg_gen_insn_start(pc, ctx->envflags); 21984bfa602bSRichard Henderson ctx->envflags |= GUSA_EXCLUSIVE; 21994bfa602bSRichard Henderson gen_save_cpu_state(ctx, false); 22004bfa602bSRichard Henderson gen_helper_exclusive(cpu_env); 22014bfa602bSRichard Henderson ctx->bstate = BS_EXCP; 22024bfa602bSRichard Henderson 22034bfa602bSRichard Henderson /* We're not executing an instruction, but we must report one for the 22044bfa602bSRichard Henderson purposes of accounting within the TB. We might as well report the 22054bfa602bSRichard Henderson entire region consumed via ctx->pc so that it's immediately available 22064bfa602bSRichard Henderson in the disassembly dump. */ 22074bfa602bSRichard Henderson ctx->pc = pc_end; 22084bfa602bSRichard Henderson return 1; 22094bfa602bSRichard Henderson } 22104bfa602bSRichard Henderson #endif 22114bfa602bSRichard Henderson 2212fcf5ef2aSThomas Huth void gen_intermediate_code(CPUSH4State * env, struct TranslationBlock *tb) 2213fcf5ef2aSThomas Huth { 2214fcf5ef2aSThomas Huth SuperHCPU *cpu = sh_env_get_cpu(env); 2215fcf5ef2aSThomas Huth CPUState *cs = CPU(cpu); 2216fcf5ef2aSThomas Huth DisasContext ctx; 2217fcf5ef2aSThomas Huth target_ulong pc_start; 2218fcf5ef2aSThomas Huth int num_insns; 2219fcf5ef2aSThomas Huth int max_insns; 2220fcf5ef2aSThomas Huth 2221fcf5ef2aSThomas Huth pc_start = tb->pc; 2222fcf5ef2aSThomas Huth ctx.pc = pc_start; 2223a6215749SAurelien Jarno ctx.tbflags = (uint32_t)tb->flags; 2224e1933d14SRichard Henderson ctx.envflags = tb->flags & TB_FLAG_ENVFLAGS_MASK; 2225fcf5ef2aSThomas Huth ctx.bstate = BS_NONE; 2226a6215749SAurelien Jarno ctx.memidx = (ctx.tbflags & (1u << SR_MD)) == 0 ? 1 : 0; 2227fcf5ef2aSThomas Huth /* We don't know if the delayed pc came from a dynamic or static branch, 2228fcf5ef2aSThomas Huth so assume it is a dynamic branch. */ 2229fcf5ef2aSThomas Huth ctx.delayed_pc = -1; /* use delayed pc from env pointer */ 2230fcf5ef2aSThomas Huth ctx.tb = tb; 2231fcf5ef2aSThomas Huth ctx.singlestep_enabled = cs->singlestep_enabled; 2232fcf5ef2aSThomas Huth ctx.features = env->features; 2233a6215749SAurelien Jarno ctx.has_movcal = (ctx.tbflags & TB_FLAG_PENDING_MOVCA); 22343a3bb8d2SRichard Henderson ctx.gbank = ((ctx.tbflags & (1 << SR_MD)) && 22353a3bb8d2SRichard Henderson (ctx.tbflags & (1 << SR_RB))) * 0x10; 22365c13bad9SRichard Henderson ctx.fbank = ctx.tbflags & FPSCR_FR ? 0x10 : 0; 2237fcf5ef2aSThomas Huth 2238fcf5ef2aSThomas Huth max_insns = tb->cflags & CF_COUNT_MASK; 2239fcf5ef2aSThomas Huth if (max_insns == 0) { 2240fcf5ef2aSThomas Huth max_insns = CF_COUNT_MASK; 2241fcf5ef2aSThomas Huth } 22424448a836SRichard Henderson max_insns = MIN(max_insns, TCG_MAX_INSNS); 22434448a836SRichard Henderson 22444448a836SRichard Henderson /* Since the ISA is fixed-width, we can bound by the number 22454448a836SRichard Henderson of instructions remaining on the page. */ 22464448a836SRichard Henderson num_insns = -(ctx.pc | TARGET_PAGE_MASK) / 2; 22474448a836SRichard Henderson max_insns = MIN(max_insns, num_insns); 22484448a836SRichard Henderson 22494448a836SRichard Henderson /* Single stepping means just that. */ 22504448a836SRichard Henderson if (ctx.singlestep_enabled || singlestep) { 22514448a836SRichard Henderson max_insns = 1; 2252fcf5ef2aSThomas Huth } 2253fcf5ef2aSThomas Huth 2254fcf5ef2aSThomas Huth gen_tb_start(tb); 22554448a836SRichard Henderson num_insns = 0; 22564448a836SRichard Henderson 22574bfa602bSRichard Henderson #ifdef CONFIG_USER_ONLY 22584bfa602bSRichard Henderson if (ctx.tbflags & GUSA_MASK) { 22594bfa602bSRichard Henderson num_insns = decode_gusa(&ctx, env, &max_insns); 22604bfa602bSRichard Henderson } 22614bfa602bSRichard Henderson #endif 22624bfa602bSRichard Henderson 22634448a836SRichard Henderson while (ctx.bstate == BS_NONE 22644448a836SRichard Henderson && num_insns < max_insns 22654448a836SRichard Henderson && !tcg_op_buf_full()) { 2266a6215749SAurelien Jarno tcg_gen_insn_start(ctx.pc, ctx.envflags); 2267fcf5ef2aSThomas Huth num_insns++; 2268fcf5ef2aSThomas Huth 2269fcf5ef2aSThomas Huth if (unlikely(cpu_breakpoint_test(cs, ctx.pc, BP_ANY))) { 2270fcf5ef2aSThomas Huth /* We have hit a breakpoint - make sure PC is up-to-date */ 2271ac9707eaSAurelien Jarno gen_save_cpu_state(&ctx, true); 2272fcf5ef2aSThomas Huth gen_helper_debug(cpu_env); 227363205665SAurelien Jarno ctx.bstate = BS_EXCP; 2274fcf5ef2aSThomas Huth /* The address covered by the breakpoint must be included in 2275fcf5ef2aSThomas Huth [tb->pc, tb->pc + tb->size) in order to for it to be 2276fcf5ef2aSThomas Huth properly cleared -- thus we increment the PC here so that 2277fcf5ef2aSThomas Huth the logic setting tb->size below does the right thing. */ 2278fcf5ef2aSThomas Huth ctx.pc += 2; 2279fcf5ef2aSThomas Huth break; 2280fcf5ef2aSThomas Huth } 2281fcf5ef2aSThomas Huth 2282fcf5ef2aSThomas Huth if (num_insns == max_insns && (tb->cflags & CF_LAST_IO)) { 2283fcf5ef2aSThomas Huth gen_io_start(); 2284fcf5ef2aSThomas Huth } 2285fcf5ef2aSThomas Huth 2286fcf5ef2aSThomas Huth ctx.opcode = cpu_lduw_code(env, ctx.pc); 2287fcf5ef2aSThomas Huth decode_opc(&ctx); 2288fcf5ef2aSThomas Huth ctx.pc += 2; 2289fcf5ef2aSThomas Huth } 22904448a836SRichard Henderson if (tb->cflags & CF_LAST_IO) { 2291fcf5ef2aSThomas Huth gen_io_end(); 22924448a836SRichard Henderson } 22934bfa602bSRichard Henderson 22944bfa602bSRichard Henderson if (ctx.tbflags & GUSA_EXCLUSIVE) { 22954bfa602bSRichard Henderson /* Ending the region of exclusivity. Clear the bits. */ 22964bfa602bSRichard Henderson ctx.envflags &= ~GUSA_MASK; 22974bfa602bSRichard Henderson } 22984bfa602bSRichard Henderson 2299fcf5ef2aSThomas Huth if (cs->singlestep_enabled) { 2300ac9707eaSAurelien Jarno gen_save_cpu_state(&ctx, true); 2301fcf5ef2aSThomas Huth gen_helper_debug(cpu_env); 2302fcf5ef2aSThomas Huth } else { 2303fcf5ef2aSThomas Huth switch (ctx.bstate) { 2304fcf5ef2aSThomas Huth case BS_STOP: 2305ac9707eaSAurelien Jarno gen_save_cpu_state(&ctx, true); 23060fc37a8bSAurelien Jarno tcg_gen_exit_tb(0); 23070fc37a8bSAurelien Jarno break; 2308fcf5ef2aSThomas Huth case BS_NONE: 2309ac9707eaSAurelien Jarno gen_save_cpu_state(&ctx, false); 2310fcf5ef2aSThomas Huth gen_goto_tb(&ctx, 0, ctx.pc); 2311fcf5ef2aSThomas Huth break; 2312fcf5ef2aSThomas Huth case BS_EXCP: 231363205665SAurelien Jarno /* fall through */ 2314fcf5ef2aSThomas Huth case BS_BRANCH: 2315fcf5ef2aSThomas Huth default: 2316fcf5ef2aSThomas Huth break; 2317fcf5ef2aSThomas Huth } 2318fcf5ef2aSThomas Huth } 2319fcf5ef2aSThomas Huth 2320fcf5ef2aSThomas Huth gen_tb_end(tb, num_insns); 2321fcf5ef2aSThomas Huth 2322fcf5ef2aSThomas Huth tb->size = ctx.pc - pc_start; 2323fcf5ef2aSThomas Huth tb->icount = num_insns; 2324fcf5ef2aSThomas Huth 2325fcf5ef2aSThomas Huth #ifdef DEBUG_DISAS 2326fcf5ef2aSThomas Huth if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM) 2327fcf5ef2aSThomas Huth && qemu_log_in_addr_range(pc_start)) { 2328fcf5ef2aSThomas Huth qemu_log_lock(); 2329fcf5ef2aSThomas Huth qemu_log("IN:\n"); /* , lookup_symbol(pc_start)); */ 2330fcf5ef2aSThomas Huth log_target_disas(cs, pc_start, ctx.pc - pc_start, 0); 2331fcf5ef2aSThomas Huth qemu_log("\n"); 2332fcf5ef2aSThomas Huth qemu_log_unlock(); 2333fcf5ef2aSThomas Huth } 2334fcf5ef2aSThomas Huth #endif 2335fcf5ef2aSThomas Huth } 2336fcf5ef2aSThomas Huth 2337fcf5ef2aSThomas Huth void restore_state_to_opc(CPUSH4State *env, TranslationBlock *tb, 2338fcf5ef2aSThomas Huth target_ulong *data) 2339fcf5ef2aSThomas Huth { 2340fcf5ef2aSThomas Huth env->pc = data[0]; 2341fcf5ef2aSThomas Huth env->flags = data[1]; 2342ac9707eaSAurelien Jarno /* Theoretically delayed_pc should also be restored. In practice the 2343ac9707eaSAurelien Jarno branch instruction is re-executed after exception, so the delayed 2344ac9707eaSAurelien Jarno branch target will be recomputed. */ 2345fcf5ef2aSThomas Huth } 2346