target/arm: [tcg] Port to translate_insn
Incrementally paves the way towards using the generic instruction translation loop. Reviewed-by: Emilio G. Cota <cota@braap.org> Signed-off-by: Lluís Vilanova <vilanova@ac.upc.edu> Message-Id: <150002485863.22386.13949856269576226529.stgit@frigg.lan> [rth: Adjust for translate_insn interface change.] Signed-off-by: Richard Henderson <rth@twiddle.net>
This commit is contained in:
parent
0cb56b373d
commit
13189a9080
@ -11880,6 +11880,8 @@ static int arm_tr_init_disas_context(DisasContextBase *dcbase,
|
||||
dc->is_ldex = false;
|
||||
dc->ss_same_el = false; /* Can't be true since EL_d must be AArch64 */
|
||||
|
||||
dc->next_page_start =
|
||||
(dc->base.pc_first & TARGET_PAGE_MASK) + TARGET_PAGE_SIZE;
|
||||
|
||||
cpu_F0s = tcg_temp_new_i32();
|
||||
cpu_F1s = tcg_temp_new_i32();
|
||||
@ -11973,14 +11975,93 @@ static bool arm_tr_breakpoint_check(DisasContextBase *dcbase, CPUState *cpu,
|
||||
return true;
|
||||
}
|
||||
|
||||
static void arm_tr_translate_insn(DisasContextBase *dcbase, CPUState *cpu)
|
||||
{
|
||||
DisasContext *dc = container_of(dcbase, DisasContext, base);
|
||||
CPUARMState *env = cpu->env_ptr;
|
||||
|
||||
#ifdef CONFIG_USER_ONLY
|
||||
/* Intercept jump to the magic kernel page. */
|
||||
if (dc->pc >= 0xffff0000) {
|
||||
/* We always get here via a jump, so know we are not in a
|
||||
conditional execution block. */
|
||||
gen_exception_internal(EXCP_KERNEL_TRAP);
|
||||
dc->base.is_jmp = DISAS_NORETURN;
|
||||
return;
|
||||
}
|
||||
#endif
|
||||
|
||||
if (dc->ss_active && !dc->pstate_ss) {
|
||||
/* Singlestep state is Active-pending.
|
||||
* If we're in this state at the start of a TB then either
|
||||
* a) we just took an exception to an EL which is being debugged
|
||||
* and this is the first insn in the exception handler
|
||||
* b) debug exceptions were masked and we just unmasked them
|
||||
* without changing EL (eg by clearing PSTATE.D)
|
||||
* In either case we're going to take a swstep exception in the
|
||||
* "did not step an insn" case, and so the syndrome ISV and EX
|
||||
* bits should be zero.
|
||||
*/
|
||||
assert(dc->base.num_insns == 1);
|
||||
gen_exception(EXCP_UDEF, syn_swstep(dc->ss_same_el, 0, 0),
|
||||
default_exception_el(dc));
|
||||
dc->base.is_jmp = DISAS_NORETURN;
|
||||
return;
|
||||
}
|
||||
|
||||
if (dc->thumb) {
|
||||
disas_thumb_insn(env, dc);
|
||||
if (dc->condexec_mask) {
|
||||
dc->condexec_cond = (dc->condexec_cond & 0xe)
|
||||
| ((dc->condexec_mask >> 4) & 1);
|
||||
dc->condexec_mask = (dc->condexec_mask << 1) & 0x1f;
|
||||
if (dc->condexec_mask == 0) {
|
||||
dc->condexec_cond = 0;
|
||||
}
|
||||
}
|
||||
} else {
|
||||
unsigned int insn = arm_ldl_code(env, dc->pc, dc->sctlr_b);
|
||||
dc->pc += 4;
|
||||
disas_arm_insn(dc, insn);
|
||||
}
|
||||
|
||||
if (dc->condjmp && !dc->base.is_jmp) {
|
||||
gen_set_label(dc->condlabel);
|
||||
dc->condjmp = 0;
|
||||
}
|
||||
|
||||
if (dc->base.is_jmp == DISAS_NEXT) {
|
||||
/* Translation stops when a conditional branch is encountered.
|
||||
* Otherwise the subsequent code could get translated several times.
|
||||
* Also stop translation when a page boundary is reached. This
|
||||
* ensures prefetch aborts occur at the right place. */
|
||||
|
||||
if (is_singlestepping(dc)) {
|
||||
dc->base.is_jmp = DISAS_TOO_MANY;
|
||||
} else if ((dc->pc >= dc->next_page_start) ||
|
||||
((dc->pc >= dc->next_page_start - 3) &&
|
||||
insn_crosses_page(env, dc))) {
|
||||
/* We want to stop the TB if the next insn starts in a new page,
|
||||
* or if it spans between this page and the next. This means that
|
||||
* if we're looking at the last halfword in the page we need to
|
||||
* see if it's a 16-bit Thumb insn (which will fit in this TB)
|
||||
* or a 32-bit Thumb insn (which won't).
|
||||
* This is to avoid generating a silly TB with a single 16-bit insn
|
||||
* in it at the end of this page (which would execute correctly
|
||||
* but isn't very efficient).
|
||||
*/
|
||||
dc->base.is_jmp = DISAS_TOO_MANY;
|
||||
}
|
||||
}
|
||||
|
||||
dc->base.pc_next = dc->pc;
|
||||
}
|
||||
|
||||
/* generate intermediate code for basic block 'tb'. */
|
||||
void gen_intermediate_code(CPUState *cs, TranslationBlock *tb)
|
||||
{
|
||||
CPUARMState *env = cs->env_ptr;
|
||||
DisasContext dc1, *dc = &dc1;
|
||||
target_ulong next_page_start;
|
||||
int max_insns;
|
||||
bool end_of_page;
|
||||
|
||||
/* generate intermediate code */
|
||||
|
||||
@ -11999,7 +12080,6 @@ void gen_intermediate_code(CPUState *cs, TranslationBlock *tb)
|
||||
dc->base.num_insns = 0;
|
||||
dc->base.singlestep_enabled = cs->singlestep_enabled;
|
||||
|
||||
next_page_start = (dc->base.pc_first & TARGET_PAGE_MASK) + TARGET_PAGE_SIZE;
|
||||
max_insns = tb->cflags & CF_COUNT_MASK;
|
||||
if (max_insns == 0) {
|
||||
max_insns = CF_COUNT_MASK;
|
||||
@ -12036,83 +12116,18 @@ void gen_intermediate_code(CPUState *cs, TranslationBlock *tb)
|
||||
gen_io_start();
|
||||
}
|
||||
|
||||
#ifdef CONFIG_USER_ONLY
|
||||
/* Intercept jump to the magic kernel page. */
|
||||
if (dc->pc >= 0xffff0000) {
|
||||
/* We always get here via a jump, so know we are not in a
|
||||
conditional execution block. */
|
||||
gen_exception_internal(EXCP_KERNEL_TRAP);
|
||||
dc->base.is_jmp = DISAS_NORETURN;
|
||||
break;
|
||||
}
|
||||
#endif
|
||||
|
||||
if (dc->ss_active && !dc->pstate_ss) {
|
||||
/* Singlestep state is Active-pending.
|
||||
* If we're in this state at the start of a TB then either
|
||||
* a) we just took an exception to an EL which is being debugged
|
||||
* and this is the first insn in the exception handler
|
||||
* b) debug exceptions were masked and we just unmasked them
|
||||
* without changing EL (eg by clearing PSTATE.D)
|
||||
* In either case we're going to take a swstep exception in the
|
||||
* "did not step an insn" case, and so the syndrome ISV and EX
|
||||
* bits should be zero.
|
||||
*/
|
||||
assert(dc->base.num_insns == 1);
|
||||
gen_exception(EXCP_UDEF, syn_swstep(dc->ss_same_el, 0, 0),
|
||||
default_exception_el(dc));
|
||||
dc->base.is_jmp = DISAS_NORETURN;
|
||||
break;
|
||||
}
|
||||
|
||||
if (dc->thumb) {
|
||||
disas_thumb_insn(env, dc);
|
||||
if (dc->condexec_mask) {
|
||||
dc->condexec_cond = (dc->condexec_cond & 0xe)
|
||||
| ((dc->condexec_mask >> 4) & 1);
|
||||
dc->condexec_mask = (dc->condexec_mask << 1) & 0x1f;
|
||||
if (dc->condexec_mask == 0) {
|
||||
dc->condexec_cond = 0;
|
||||
}
|
||||
}
|
||||
} else {
|
||||
unsigned int insn = arm_ldl_code(env, dc->pc, dc->sctlr_b);
|
||||
dc->pc += 4;
|
||||
disas_arm_insn(dc, insn);
|
||||
}
|
||||
|
||||
if (dc->condjmp && !dc->base.is_jmp) {
|
||||
gen_set_label(dc->condlabel);
|
||||
dc->condjmp = 0;
|
||||
}
|
||||
arm_tr_translate_insn(&dc->base, cs);
|
||||
|
||||
if (tcg_check_temp_count()) {
|
||||
fprintf(stderr, "TCG temporary leak before "TARGET_FMT_lx"\n",
|
||||
dc->pc);
|
||||
}
|
||||
|
||||
/* Translation stops when a conditional branch is encountered.
|
||||
* Otherwise the subsequent code could get translated several times.
|
||||
* Also stop translation when a page boundary is reached. This
|
||||
* ensures prefetch aborts occur at the right place. */
|
||||
|
||||
/* We want to stop the TB if the next insn starts in a new page,
|
||||
* or if it spans between this page and the next. This means that
|
||||
* if we're looking at the last halfword in the page we need to
|
||||
* see if it's a 16-bit Thumb insn (which will fit in this TB)
|
||||
* or a 32-bit Thumb insn (which won't).
|
||||
* This is to avoid generating a silly TB with a single 16-bit insn
|
||||
* in it at the end of this page (which would execute correctly
|
||||
* but isn't very efficient).
|
||||
*/
|
||||
end_of_page = (dc->pc >= next_page_start) ||
|
||||
((dc->pc >= next_page_start - 3) && insn_crosses_page(env, dc));
|
||||
|
||||
} while (!dc->base.is_jmp && !tcg_op_buf_full() &&
|
||||
!is_singlestepping(dc) &&
|
||||
!singlestep &&
|
||||
!end_of_page &&
|
||||
dc->base.num_insns < max_insns);
|
||||
if (!dc->base.is_jmp && (tcg_op_buf_full() || singlestep ||
|
||||
dc->base.num_insns >= max_insns)) {
|
||||
dc->base.is_jmp = DISAS_TOO_MANY;
|
||||
}
|
||||
} while (!dc->base.is_jmp);
|
||||
|
||||
if (tb->cflags & CF_LAST_IO) {
|
||||
if (dc->condjmp) {
|
||||
|
@ -9,6 +9,7 @@ typedef struct DisasContext {
|
||||
DisasContextBase base;
|
||||
|
||||
target_ulong pc;
|
||||
target_ulong next_page_start;
|
||||
uint32_t insn;
|
||||
/* Nonzero if this instruction has been conditionally skipped. */
|
||||
int condjmp;
|
||||
|
Loading…
Reference in New Issue
Block a user