Archipelago » qemu

/*

 *  SH4 translation

 *

 *  Copyright (c) 2005 Samuel Tardieu

 *

 * This library is free software; you can redistribute it and/or

 * modify it under the terms of the GNU Lesser General Public

 * License as published by the Free Software Foundation; either

 * version 2 of the License, or (at your option) any later version.

 *

 * This library is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

 * Lesser General Public License for more details.

 *

 * You should have received a copy of the GNU Lesser General Public

 * License along with this library; if not, write to the Free Software

 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

 */

#include <stdarg.h>

#include <stdlib.h>

#include <stdio.h>

#include <string.h>

#include <inttypes.h>

#include <assert.h>

#define DEBUG_DISAS

#define SH4_DEBUG_DISAS

//#define SH4_SINGLE_STEP

#include "cpu.h"

#include "exec-all.h"

#include "disas.h"

#include "helper.h"

#include "tcg-op.h"

#include "qemu-common.h"

typedef struct DisasContext {

    struct TranslationBlock *tb;

    target_ulong pc;

    uint32_t sr;

    uint32_t fpscr;

    uint16_t opcode;

    uint32_t flags;

    int bstate;

    int memidx;

    uint32_t delayed_pc;

    int singlestep_enabled;

} DisasContext;

enum {

    BS_NONE     = 0, /* We go out of the TB without reaching a branch or an

                      * exception condition

                      */

    BS_STOP     = 1, /* We want to stop translation for any reason */

    BS_BRANCH   = 2, /* We reached a branch condition     */

    BS_EXCP     = 3, /* We reached an exception condition */

};

/* global register indexes */

static TCGv cpu_env;

static TCGv cpu_gregs[24];

static TCGv cpu_pc, cpu_sr, cpu_ssr, cpu_spc, cpu_gbr;

static TCGv cpu_vbr, cpu_sgr, cpu_dbr, cpu_mach, cpu_macl;

static TCGv cpu_pr, cpu_fpscr, cpu_fpul, cpu_flags;

/* internal register indexes */

static TCGv cpu_flags, cpu_delayed_pc;

/* dyngen register indexes */

static TCGv cpu_T[2];

#include "gen-icount.h"

static void sh4_translate_init(void)

{

    int i;

    static int done_init = 0;

    static const char * const gregnames[24] = {

        "R0_BANK0", "R1_BANK0", "R2_BANK0", "R3_BANK0",

        "R4_BANK0", "R5_BANK0", "R6_BANK0", "R7_BANK0",

        "R8", "R9", "R10", "R11", "R12", "R13", "R14", "R15",

        "R0_BANK1", "R1_BANK1", "R2_BANK1", "R3_BANK1",

        "R4_BANK1", "R5_BANK1", "R6_BANK1", "R7_BANK1"

    };

    if (done_init)

        return;

    cpu_env = tcg_global_reg_new(TCG_TYPE_PTR, TCG_AREG0, "env");

    cpu_T[0] = tcg_global_reg_new(TCG_TYPE_I32, TCG_AREG1, "T0");

    cpu_T[1] = tcg_global_reg_new(TCG_TYPE_I32, TCG_AREG2, "T1");

    for (i = 0; i < 24; i++)

        cpu_gregs[i] = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                          offsetof(CPUState, gregs[i]),

                                          gregnames[i]);

    cpu_pc = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                offsetof(CPUState, pc), "PC");

    cpu_sr = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                offsetof(CPUState, sr), "SR");

    cpu_ssr = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                 offsetof(CPUState, ssr), "SSR");

    cpu_spc = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                 offsetof(CPUState, spc), "SPC");

    cpu_gbr = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                 offsetof(CPUState, gbr), "GBR");

    cpu_vbr = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                 offsetof(CPUState, vbr), "VBR");

    cpu_sgr = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                 offsetof(CPUState, sgr), "SGR");

    cpu_dbr = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                 offsetof(CPUState, dbr), "DBR");

    cpu_mach = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                  offsetof(CPUState, mach), "MACH");

    cpu_macl = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                  offsetof(CPUState, macl), "MACL");

    cpu_pr = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                offsetof(CPUState, pr), "PR");

    cpu_fpscr = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                   offsetof(CPUState, fpscr), "FPSCR");

    cpu_fpul = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                  offsetof(CPUState, fpul), "FPUL");

    cpu_flags = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                   offsetof(CPUState, flags), "_flags_");

    cpu_delayed_pc = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,

                                        offsetof(CPUState, delayed_pc),

                                        "_delayed_pc_");

    /* register helpers */

#undef DEF_HELPER

#define DEF_HELPER(ret, name, params) tcg_register_helper(name, #name);

#include "helper.h"

    done_init = 1;

}

#ifdef CONFIG_USER_ONLY

#define GEN_OP_LD(width, reg) \

  void gen_op_ld##width##_T0_##reg (DisasContext *ctx) { \

    gen_op_ld##width##_T0_##reg##_raw(); \

  }

#define GEN_OP_ST(width, reg) \

  void gen_op_st##width##_##reg##_T1 (DisasContext *ctx) { \

    gen_op_st##width##_##reg##_T1_raw(); \

  }

#else

#define GEN_OP_LD(width, reg) \

  void gen_op_ld##width##_T0_##reg (DisasContext *ctx) { \

    if (ctx->memidx) gen_op_ld##width##_T0_##reg##_kernel(); \

    else gen_op_ld##width##_T0_##reg##_user();\

  }

#define GEN_OP_ST(width, reg) \

  void gen_op_st##width##_##reg##_T1 (DisasContext *ctx) { \

    if (ctx->memidx) gen_op_st##width##_##reg##_T1_kernel(); \

    else gen_op_st##width##_##reg##_T1_user();\

  }

#endif

GEN_OP_LD(ub, T0)

GEN_OP_LD(b, T0)

GEN_OP_ST(b, T0)

GEN_OP_LD(uw, T0)

GEN_OP_LD(w, T0)

GEN_OP_ST(w, T0)

GEN_OP_LD(l, T0)

GEN_OP_ST(l, T0)

GEN_OP_LD(fl, FT0)

GEN_OP_ST(fl, FT0)

GEN_OP_LD(fq, DT0)

GEN_OP_ST(fq, DT0)

void cpu_dump_state(CPUState * env, FILE * f,

                    int (*cpu_fprintf) (FILE * f, const char *fmt, ...),

                    int flags)

{

    int i;

    cpu_fprintf(f, "pc=0x%08x sr=0x%08x pr=0x%08x fpscr=0x%08x\n",

                env->pc, env->sr, env->pr, env->fpscr);

    cpu_fprintf(f, "spc=0x%08x ssr=0x%08x gbr=0x%08x vbr=0x%08x\n",

                env->spc, env->ssr, env->gbr, env->vbr);

    cpu_fprintf(f, "sgr=0x%08x dbr=0x%08x delayed_pc=0x%08x fpul=0x%08x\n",

                env->sgr, env->dbr, env->delayed_pc, env->fpul);

    for (i = 0; i < 24; i += 4) {

        cpu_fprintf(f, "r%d=0x%08x r%d=0x%08x r%d=0x%08x r%d=0x%08x\n",

                    i, env->gregs[i], i + 1, env->gregs[i + 1],

                    i + 2, env->gregs[i + 2], i + 3, env->gregs[i + 3]);

    }

    if (env->flags & DELAY_SLOT) {

        cpu_fprintf(f, "in delay slot (delayed_pc=0x%08x)\n",

                    env->delayed_pc);

    } else if (env->flags & DELAY_SLOT_CONDITIONAL) {

        cpu_fprintf(f, "in conditional delay slot (delayed_pc=0x%08x)\n",

                    env->delayed_pc);

    }

}

void cpu_sh4_reset(CPUSH4State * env)

{

#if defined(CONFIG_USER_ONLY)

    env->sr = SR_FD;            /* FD - kernel does lazy fpu context switch */

#else

    env->sr = 0x700000F0;        /* MD, RB, BL, I3-I0 */

#endif

    env->vbr = 0;

    env->pc = 0xA0000000;

#if defined(CONFIG_USER_ONLY)

    env->fpscr = FPSCR_PR; /* value for userspace according to the kernel */

    set_float_rounding_mode(float_round_nearest_even, &env->fp_status); /* ?! */

#else

    env->fpscr = 0x00040001; /* CPU reset value according to SH4 manual */

    set_float_rounding_mode(float_round_to_zero, &env->fp_status);

#endif

    env->mmucr = 0;

}

CPUSH4State *cpu_sh4_init(const char *cpu_model)

{

    CPUSH4State *env;

    env = qemu_mallocz(sizeof(CPUSH4State));

    if (!env)

        return NULL;

    cpu_exec_init(env);

    sh4_translate_init();

    cpu_sh4_reset(env);

    tlb_flush(env, 1);

    return env;

}

static void gen_goto_tb(DisasContext * ctx, int n, target_ulong dest)

{

    TranslationBlock *tb;

    tb = ctx->tb;

    if ((tb->pc & TARGET_PAGE_MASK) == (dest & TARGET_PAGE_MASK) &&

        !ctx->singlestep_enabled) {

        /* Use a direct jump if in same page and singlestep not enabled */

        tcg_gen_goto_tb(n);

        tcg_gen_movi_i32(cpu_pc, dest);

        tcg_gen_exit_tb((long) tb + n);

    } else {

        tcg_gen_movi_i32(cpu_pc, dest);

        if (ctx->singlestep_enabled)

            tcg_gen_helper_0_0(helper_debug);

        tcg_gen_exit_tb(0);

    }

}

static void gen_jump(DisasContext * ctx)

{

    if (ctx->delayed_pc == (uint32_t) - 1) {

        /* Target is not statically known, it comes necessarily from a

           delayed jump as immediate jump are conditinal jumps */

        tcg_gen_mov_i32(cpu_pc, cpu_delayed_pc);

        if (ctx->singlestep_enabled)

            tcg_gen_helper_0_0(helper_debug);

        tcg_gen_exit_tb(0);

    } else {

        gen_goto_tb(ctx, 0, ctx->delayed_pc);

    }

}

static inline void gen_branch_slot(uint32_t delayed_pc, int t)

{

    int label = gen_new_label();

    tcg_gen_movi_i32(cpu_delayed_pc, delayed_pc);

    tcg_gen_andi_i32(cpu_T[0], cpu_sr, SR_T);

    tcg_gen_brcondi_i32(TCG_COND_NE, cpu_T[0], t ? SR_T : 0, label);

    tcg_gen_ori_i32(cpu_flags, cpu_flags, DELAY_SLOT_TRUE);

    gen_set_label(label);

}

/* Immediate conditional jump (bt or bf) */

static void gen_conditional_jump(DisasContext * ctx,

                                 target_ulong ift, target_ulong ifnott)

{

    int l1;

    l1 = gen_new_label();

    tcg_gen_andi_i32(cpu_T[0], cpu_sr, SR_T);

    tcg_gen_brcondi_i32(TCG_COND_EQ, cpu_T[0], SR_T, l1);

    gen_goto_tb(ctx, 0, ifnott);

    gen_set_label(l1);

    gen_goto_tb(ctx, 1, ift);

}

/* Delayed conditional jump (bt or bf) */

static void gen_delayed_conditional_jump(DisasContext * ctx)

{

    int l1;

    l1 = gen_new_label();

    tcg_gen_andi_i32(cpu_T[0], cpu_flags, DELAY_SLOT_TRUE);

    tcg_gen_brcondi_i32(TCG_COND_EQ, cpu_T[0], DELAY_SLOT_TRUE, l1);

    gen_goto_tb(ctx, 1, ctx->pc + 2);

    gen_set_label(l1);

    tcg_gen_andi_i32(cpu_flags, cpu_flags, ~DELAY_SLOT_TRUE);

    gen_jump(ctx);

}

static inline void gen_set_t(void)

{

    tcg_gen_ori_i32(cpu_sr, cpu_sr, SR_T);

}

static inline void gen_clr_t(void)

{

    tcg_gen_andi_i32(cpu_sr, cpu_sr, ~SR_T);

}

static inline void gen_cmp(int cond, TCGv t0, TCGv t1)

{

    int label1 = gen_new_label();

    int label2 = gen_new_label();

    tcg_gen_brcond_i32(cond, t1, t0, label1);

    gen_clr_t();

    tcg_gen_br(label2);

    gen_set_label(label1);

    gen_set_t();

    gen_set_label(label2);

}

static inline void gen_cmp_imm(int cond, TCGv t0, int32_t imm)

{

    int label1 = gen_new_label();

    int label2 = gen_new_label();

    tcg_gen_brcondi_i32(cond, t0, imm, label1);

    gen_clr_t();

    tcg_gen_br(label2);

    gen_set_label(label1);

    gen_set_t();

    gen_set_label(label2);

}

static inline void gen_store_flags(uint32_t flags)

{

    tcg_gen_andi_i32(cpu_flags, cpu_flags, DELAY_SLOT_TRUE);

    tcg_gen_ori_i32(cpu_flags, cpu_flags, flags);

}

#define B3_0 (ctx->opcode & 0xf)

#define B6_4 ((ctx->opcode >> 4) & 0x7)

#define B7_4 ((ctx->opcode >> 4) & 0xf)

#define B7_0 (ctx->opcode & 0xff)

#define B7_0s ((int32_t) (int8_t) (ctx->opcode & 0xff))

#define B11_0s (ctx->opcode & 0x800 ? 0xfffff000 | (ctx->opcode & 0xfff) : \

  (ctx->opcode & 0xfff))

#define B11_8 ((ctx->opcode >> 8) & 0xf)

#define B15_12 ((ctx->opcode >> 12) & 0xf)

#define REG(x) ((x) < 8 && (ctx->sr & (SR_MD | SR_RB)) == (SR_MD | SR_RB) ? \

                (x) + 16 : (x))

#define ALTREG(x) ((x) < 8 && (ctx->sr & (SR_MD | SR_RB)) != (SR_MD | SR_RB) \

                ? (x) + 16 : (x))

#define FREG(x) (ctx->fpscr & FPSCR_FR ? (x) ^ 0x10 : (x))

#define XHACK(x) ((((x) & 1 ) << 4) | ((x) & 0xe))

#define XREG(x) (ctx->fpscr & FPSCR_FR ? XHACK(x) ^ 0x10 : XHACK(x))

#define DREG(x) FREG(x) /* Assumes lsb of (x) is always 0 */

#define CHECK_NOT_DELAY_SLOT \

  if (ctx->flags & (DELAY_SLOT | DELAY_SLOT_CONDITIONAL)) \

  {tcg_gen_helper_0_0(helper_raise_slot_illegal_instruction); ctx->bstate = BS_EXCP; \

   return;}

void _decode_opc(DisasContext * ctx)

{

#if 0

    fprintf(stderr, "Translating opcode 0x%04x\n", ctx->opcode);

#endif

    switch (ctx->opcode) {

    case 0x0019:                /* div0u */

        tcg_gen_andi_i32(cpu_sr, cpu_sr, ~(SR_M | SR_Q | SR_T));

        return;

    case 0x000b:                /* rts */

        CHECK_NOT_DELAY_SLOT

        tcg_gen_mov_i32(cpu_delayed_pc, cpu_pr);

        ctx->flags |= DELAY_SLOT;

        ctx->delayed_pc = (uint32_t) - 1;

        return;

    case 0x0028:                /* clrmac */

        tcg_gen_movi_i32(cpu_mach, 0);

        tcg_gen_movi_i32(cpu_macl, 0);

        return;

    case 0x0048:                /* clrs */

        tcg_gen_andi_i32(cpu_sr, cpu_sr, ~SR_S);

        return;

    case 0x0008:                /* clrt */

        gen_clr_t();

        return;

    case 0x0038:                /* ldtlb */

#if defined(CONFIG_USER_ONLY)

        assert(0);                /* XXXXX */

#else

        tcg_gen_helper_0_0(helper_ldtlb);

#endif

        return;

    case 0x002b:                /* rte */

        CHECK_NOT_DELAY_SLOT

        tcg_gen_mov_i32(cpu_sr, cpu_ssr);

        tcg_gen_mov_i32(cpu_delayed_pc, cpu_spc);

        ctx->flags |= DELAY_SLOT;

        ctx->delayed_pc = (uint32_t) - 1;

        return;

    case 0x0058:                /* sets */

        tcg_gen_ori_i32(cpu_sr, cpu_sr, SR_S);

        return;

    case 0x0018:                /* sett */

        gen_set_t();

        return;

    case 0xfbfd:                /* frchg */

        gen_op_frchg();

        ctx->bstate = BS_STOP;

        return;

    case 0xf3fd:                /* fschg */

        gen_op_fschg();

        ctx->bstate = BS_STOP;

        return;

    case 0x0009:                /* nop */

        return;

    case 0x001b:                /* sleep */

        if (ctx->memidx) {

                tcg_gen_helper_0_0(helper_sleep);

        } else {

                tcg_gen_helper_0_0(helper_raise_illegal_instruction);

                ctx->bstate = BS_EXCP;

        }

        return;

    }

    switch (ctx->opcode & 0xf000) {

    case 0x1000:                /* mov.l Rm,@(disp,Rn) */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        tcg_gen_addi_i32(cpu_T[1], cpu_T[1], B3_0 * 4);

        gen_op_stl_T0_T1(ctx);

        return;

    case 0x5000:                /* mov.l @(disp,Rm),Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_addi_i32(cpu_T[0], cpu_T[0], B3_0 * 4);

        gen_op_ldl_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0xe000:                /* mov #imm,Rn */

        tcg_gen_movi_i32(cpu_gregs[REG(B11_8)], B7_0s);

        return;

    case 0x9000:                /* mov.w @(disp,PC),Rn */

        tcg_gen_movi_i32(cpu_T[0], ctx->pc + 4 + B7_0 * 2);

        gen_op_ldw_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0xd000:                /* mov.l @(disp,PC),Rn */

        tcg_gen_movi_i32(cpu_T[0], (ctx->pc + 4 + B7_0 * 4) & ~3);

        gen_op_ldl_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x7000:                /* add #imm,Rn */

        tcg_gen_addi_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B11_8)], B7_0s);

        return;

    case 0xa000:                /* bra disp */

        CHECK_NOT_DELAY_SLOT

        ctx->delayed_pc = ctx->pc + 4 + B11_0s * 2;

        tcg_gen_movi_i32(cpu_delayed_pc, ctx->delayed_pc);

        ctx->flags |= DELAY_SLOT;

        return;

    case 0xb000:                /* bsr disp */

        CHECK_NOT_DELAY_SLOT

        tcg_gen_movi_i32(cpu_pr, ctx->pc + 4);

        ctx->delayed_pc = ctx->pc + 4 + B11_0s * 2;

        tcg_gen_movi_i32(cpu_delayed_pc, ctx->delayed_pc);

        ctx->flags |= DELAY_SLOT;

        return;

    }

    switch (ctx->opcode & 0xf00f) {

    case 0x6003:                /* mov Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x2000:                /* mov.b Rm,@Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_stb_T0_T1(ctx);

        return;

    case 0x2001:                /* mov.w Rm,@Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_stw_T0_T1(ctx);

        return;

    case 0x2002:                /* mov.l Rm,@Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_stl_T0_T1(ctx);

        return;

    case 0x6000:                /* mov.b @Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        gen_op_ldb_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x6001:                /* mov.w @Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        gen_op_ldw_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x6002:                /* mov.l @Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        gen_op_ldl_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x2004:                /* mov.b Rm,@-Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_subi_i32(cpu_gregs[REG(B11_8)],

                         cpu_gregs[REG(B11_8)], 1);        /* modify register status */

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        tcg_gen_addi_i32(cpu_gregs[REG(B11_8)],

                         cpu_gregs[REG(B11_8)],        1);        /* recover register status */

        gen_op_stb_T0_T1(ctx);                                /* might cause re-execution */

        tcg_gen_subi_i32(cpu_gregs[REG(B11_8)],

                         cpu_gregs[REG(B11_8)], 1);        /* modify register status */

        return;

    case 0x2005:                /* mov.w Rm,@-Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_subi_i32(cpu_gregs[REG(B11_8)],

                         cpu_gregs[REG(B11_8)], 2);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        tcg_gen_addi_i32(cpu_gregs[REG(B11_8)],

                         cpu_gregs[REG(B11_8)], 2);

        gen_op_stw_T0_T1(ctx);

        tcg_gen_subi_i32(cpu_gregs[REG(B11_8)],

                         cpu_gregs[REG(B11_8)], 2);

        return;

    case 0x2006:                /* mov.l Rm,@-Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_subi_i32(cpu_gregs[REG(B11_8)],

                         cpu_gregs[REG(B11_8)], 4);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        tcg_gen_addi_i32(cpu_gregs[REG(B11_8)],

                         cpu_gregs[REG(B11_8)], 4);

        gen_op_stl_T0_T1(ctx);

        tcg_gen_subi_i32(cpu_gregs[REG(B11_8)],

                         cpu_gregs[REG(B11_8)], 4);

        return;

    case 0x6004:                /* mov.b @Rm+,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        gen_op_ldb_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        if ( B11_8 != B7_4 )

                tcg_gen_addi_i32(cpu_gregs[REG(B7_4)],

                                 cpu_gregs[REG(B7_4)], 1);

        return;

    case 0x6005:                /* mov.w @Rm+,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        gen_op_ldw_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        if ( B11_8 != B7_4 )

                tcg_gen_addi_i32(cpu_gregs[REG(B7_4)],

                                 cpu_gregs[REG(B7_4)], 2);

        return;

    case 0x6006:                /* mov.l @Rm+,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        gen_op_ldl_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        if ( B11_8 != B7_4 )

                tcg_gen_addi_i32(cpu_gregs[REG(B7_4)],

                                 cpu_gregs[REG(B7_4)], 4);

        return;

    case 0x0004:                /* mov.b Rm,@(R0,Rn) */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        tcg_gen_add_i32(cpu_T[1], cpu_T[1], cpu_gregs[REG(0)]);

        gen_op_stb_T0_T1(ctx);

        return;

    case 0x0005:                /* mov.w Rm,@(R0,Rn) */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        tcg_gen_add_i32(cpu_T[1], cpu_T[1], cpu_gregs[REG(0)]);

        gen_op_stw_T0_T1(ctx);

        return;

    case 0x0006:                /* mov.l Rm,@(R0,Rn) */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        tcg_gen_add_i32(cpu_T[1], cpu_T[1], cpu_gregs[REG(0)]);

        gen_op_stl_T0_T1(ctx);

        return;

    case 0x000c:                /* mov.b @(R0,Rm),Rn */

        tcg_gen_add_i32(cpu_T[0], cpu_gregs[REG(B7_4)], cpu_gregs[REG(0)]);

        gen_op_ldb_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x000d:                /* mov.w @(R0,Rm),Rn */

        tcg_gen_add_i32(cpu_T[0], cpu_gregs[REG(B7_4)], cpu_gregs[REG(0)]);

        gen_op_ldw_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x000e:                /* mov.l @(R0,Rm),Rn */

        tcg_gen_add_i32(cpu_T[0], cpu_gregs[REG(B7_4)], cpu_gregs[REG(0)]);

        gen_op_ldl_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x6008:                /* swap.b Rm,Rn */

        tcg_gen_andi_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B7_4)], 0xffff0000);

        tcg_gen_andi_i32(cpu_T[0], cpu_gregs[REG(B7_4)], 0xff);

        tcg_gen_shli_i32(cpu_T[0], cpu_T[0], 8);

        tcg_gen_or_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B11_8)], cpu_T[0]);

        tcg_gen_shri_i32(cpu_T[0], cpu_gregs[REG(B7_4)], 8);

        tcg_gen_andi_i32(cpu_T[0], cpu_T[0], 0xff);

        tcg_gen_or_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x6009:                /* swap.w Rm,Rn */

        tcg_gen_andi_i32(cpu_T[0], cpu_gregs[REG(B7_4)], 0xffff);

        tcg_gen_shli_i32(cpu_T[0], cpu_T[0], 16);

        tcg_gen_shri_i32(cpu_T[1], cpu_gregs[REG(B7_4)], 16);

        tcg_gen_andi_i32(cpu_T[1], cpu_T[1], 0xffff);

        tcg_gen_or_i32(cpu_gregs[REG(B11_8)], cpu_T[0], cpu_T[1]);

        return;

    case 0x200d:                /* xtrct Rm,Rn */

        tcg_gen_andi_i32(cpu_T[0], cpu_gregs[REG(B7_4)], 0xffff);

        tcg_gen_shli_i32(cpu_T[0], cpu_T[0], 16);

        tcg_gen_shri_i32(cpu_T[1], cpu_gregs[REG(B11_8)], 16);

        tcg_gen_andi_i32(cpu_T[1], cpu_T[1], 0xffff);

        tcg_gen_or_i32(cpu_gregs[REG(B11_8)], cpu_T[0], cpu_T[1]);

        return;

    case 0x300c:                /* add Rm,Rn */

        tcg_gen_add_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B11_8)], cpu_gregs[REG(B7_4)]);

        return;

    case 0x300e:                /* addc Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_addc_T0_T1();

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[1]);

        return;

    case 0x300f:                /* addv Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_addv_T0_T1();

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[1]);

        return;

    case 0x2009:                /* and Rm,Rn */

        tcg_gen_and_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B11_8)], cpu_gregs[REG(B7_4)]);

        return;

    case 0x3000:                /* cmp/eq Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_cmp(TCG_COND_EQ, cpu_T[0], cpu_T[1]);

        return;

    case 0x3003:                /* cmp/ge Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_cmp(TCG_COND_GE, cpu_T[0], cpu_T[1]);

        return;

    case 0x3007:                /* cmp/gt Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_cmp(TCG_COND_GT, cpu_T[0], cpu_T[1]);

        return;

    case 0x3006:                /* cmp/hi Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_cmp(TCG_COND_GTU, cpu_T[0], cpu_T[1]);

        return;

    case 0x3002:                /* cmp/hs Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_cmp(TCG_COND_GEU, cpu_T[0], cpu_T[1]);

        return;

    case 0x200c:                /* cmp/str Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_cmp_str_T0_T1();

        return;

    case 0x2007:                /* div0s Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_div0s_T0_T1();

        return;

    case 0x3004:                /* div1 Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_div1_T0_T1();

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[1]);

        return;

    case 0x300d:                /* dmuls.l Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_dmulsl_T0_T1();

        return;

    case 0x3005:                /* dmulu.l Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_dmulul_T0_T1();

        return;

    case 0x600e:                /* exts.b Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_andi_i32(cpu_T[0], cpu_T[0], 0xff);

        tcg_gen_ext8s_i32(cpu_T[0], cpu_T[0]);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x600f:                /* exts.w Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_andi_i32(cpu_T[0], cpu_T[0], 0xffff);

        tcg_gen_ext16s_i32(cpu_T[0], cpu_T[0]);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x600c:                /* extu.b Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_andi_i32(cpu_T[0], cpu_T[0], 0xff);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x600d:                /* extu.w Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_andi_i32(cpu_T[0], cpu_T[0], 0xffff);

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x000f:                /* mac.l @Rm+,@Rn+ */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B11_8)]);

        gen_op_ldl_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_T[1], cpu_T[0]);

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        gen_op_ldl_T0_T0(ctx);

        gen_op_macl_T0_T1();

        tcg_gen_addi_i32(cpu_gregs[REG(B7_4)], cpu_gregs[REG(B7_4)], 4);

        tcg_gen_addi_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B11_8)], 4);

        return;

    case 0x400f:                /* mac.w @Rm+,@Rn+ */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B11_8)]);

        gen_op_ldl_T0_T0(ctx);

        tcg_gen_mov_i32(cpu_T[1], cpu_T[0]);

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        gen_op_ldl_T0_T0(ctx);

        gen_op_macw_T0_T1();

        tcg_gen_addi_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B11_8)], 2);

        tcg_gen_addi_i32(cpu_gregs[REG(B7_4)], cpu_gregs[REG(B7_4)], 2);

        return;

    case 0x0007:                /* mul.l Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_mull_T0_T1();

        return;

    case 0x200f:                /* muls.w Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_andi_i32(cpu_T[0], cpu_T[0], 0xffff);

        tcg_gen_ext16s_i32(cpu_T[0], cpu_T[0]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        tcg_gen_andi_i32(cpu_T[1], cpu_T[1], 0xffff);

        tcg_gen_ext16s_i32(cpu_T[1], cpu_T[1]);

        gen_op_mulsw_T0_T1();

        return;

    case 0x200e:                /* mulu.w Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_andi_i32(cpu_T[0], cpu_T[0], 0xffff);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        tcg_gen_andi_i32(cpu_T[1], cpu_T[1], 0xffff);

        gen_op_muluw_T0_T1();

        return;

    case 0x600b:                /* neg Rm,Rn */

        tcg_gen_neg_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B7_4)]);

        return;

    case 0x600a:                /* negc Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        gen_op_negc_T0();

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[0]);

        return;

    case 0x6007:                /* not Rm,Rn */

        tcg_gen_not_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B7_4)]);

        return;

    case 0x200b:                /* or Rm,Rn */

        tcg_gen_or_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B11_8)], cpu_gregs[REG(B7_4)]);

        return;

    case 0x400c:                /* shad Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_shad_T0_T1();

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[1]);

        return;

    case 0x400d:                /* shld Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_shld_T0_T1();

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[1]);

        return;

    case 0x3008:                /* sub Rm,Rn */

        tcg_gen_sub_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B11_8)], cpu_gregs[REG(B7_4)]);

        return;

    case 0x300a:                /* subc Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_subc_T0_T1();

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[1]);

        return;

    case 0x300b:                /* subv Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        gen_op_subv_T0_T1();

        tcg_gen_mov_i32(cpu_gregs[REG(B11_8)], cpu_T[1]);

        return;

    case 0x2008:                /* tst Rm,Rn */

        tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

        tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

        tcg_gen_and_i32(cpu_T[0], cpu_T[0], cpu_T[1]);

        gen_cmp_imm(TCG_COND_EQ, cpu_T[0], 0);

        return;

    case 0x200a:                /* xor Rm,Rn */

        tcg_gen_xor_i32(cpu_gregs[REG(B11_8)], cpu_gregs[REG(B11_8)], cpu_gregs[REG(B7_4)]);

        return;

    case 0xf00c: /* fmov {F,D,X}Rm,{F,D,X}Rn - FPSCR: Nothing */

        if (ctx->fpscr & FPSCR_SZ) {

            gen_op_fmov_drN_DT0(XREG(B7_4));

            gen_op_fmov_DT0_drN(XREG(B11_8));

        } else {

            gen_op_fmov_frN_FT0(FREG(B7_4));

            gen_op_fmov_FT0_frN(FREG(B11_8));

        }

        return;

    case 0xf00a: /* fmov {F,D,X}Rm,@Rn - FPSCR: Nothing */

        if (ctx->fpscr & FPSCR_SZ) {

            gen_op_fmov_drN_DT0(XREG(B7_4));

            tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

            gen_op_stfq_DT0_T1(ctx);

        } else {

            gen_op_fmov_frN_FT0(FREG(B7_4));

            tcg_gen_mov_i32(cpu_T[1], cpu_gregs[REG(B11_8)]);

            gen_op_stfl_FT0_T1(ctx);

        }

        return;

    case 0xf008: /* fmov @Rm,{F,D,X}Rn - FPSCR: Nothing */

        if (ctx->fpscr & FPSCR_SZ) {

            tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

            gen_op_ldfq_T0_DT0(ctx);

            gen_op_fmov_DT0_drN(XREG(B11_8));

        } else {

            tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

            gen_op_ldfl_T0_FT0(ctx);

            gen_op_fmov_FT0_frN(FREG(B11_8));

        }

        return;

    case 0xf009: /* fmov @Rm+,{F,D,X}Rn - FPSCR: Nothing */

        if (ctx->fpscr & FPSCR_SZ) {

            tcg_gen_mov_i32(cpu_T[0], cpu_gregs[REG(B7_4)]);

            gen_op_ldfq_T0_DT0(ctx);

            gen_op_fmov_DT0_drN(XREG(B11_8));