Archipelago » qemu

static int cp15_tls_load_store(CPUState *env, DisasContext *s, uint32_t insn, uint32_t rd)

{

    TCGv tmp;

    int cpn = (insn >> 16) & 0xf;

    int cpm = insn & 0xf;

    int op = ((insn >> 5) & 7) | ((insn >> 18) & 0x38);

    if (!arm_feature(env, ARM_FEATURE_V6K))

        return 0;

    if (!(cpn == 13 && cpm == 0))

        return 0;

    if (insn & ARM_CP_RW_BIT) {

        tmp = new_tmp();

        switch (op) {

        case 2:

            tcg_gen_ld_i32(tmp, cpu_env, offsetof(CPUARMState, cp15.c13_tls1));

            break;

        case 3:

            tcg_gen_ld_i32(tmp, cpu_env, offsetof(CPUARMState, cp15.c13_tls2));

            break;

        case 4:

            tcg_gen_ld_i32(tmp, cpu_env, offsetof(CPUARMState, cp15.c13_tls3));

            break;

        default:

            dead_tmp(tmp);

            return 0;

        }

        store_reg(s, rd, tmp);

    } else {

        tmp = load_reg(s, rd);

        switch (op) {

        case 2:

            tcg_gen_st_i32(tmp, cpu_env, offsetof(CPUARMState, cp15.c13_tls1));

            break;

        case 3:

            tcg_gen_st_i32(tmp, cpu_env, offsetof(CPUARMState, cp15.c13_tls2));

            break;

        case 4:

            tcg_gen_st_i32(tmp, cpu_env, offsetof(CPUARMState, cp15.c13_tls3));

            break;

        default:

            return 0;

        }

        dead_tmp(tmp);

    }

    return 1;

}

    if (cp15_tls_load_store(env, s, insn, rd))

        return 0;