6e2716d8ca
This patch introduces wrappers around the tcg_gen_exit_tb() and tcg_gen_lookup_and_goto_ptr() functions that handle single stepping, i.e. call gen_exception_debug() when single stepping is enabled. Theses functions are then used instead of the originals, bringing single stepping handling in places where it was previously ignored such as jalr and system branch instructions (ecall, mret, sret, etc.). Signed-off-by: Fabien Chouteau <chouteau@adacore.com> Reviewed-by: Richard Henderson <richard.henderson@linaro.org> Reviewed-by: Alistair Francis <alistair.francis@wdc.com> Signed-off-by: Palmer Dabbelt <palmer@sifive.com>
111 lines
2.8 KiB
C
111 lines
2.8 KiB
C
/*
|
|
* RISC-V translation routines for the RISC-V privileged instructions.
|
|
*
|
|
* Copyright (c) 2016-2017 Sagar Karandikar, sagark@eecs.berkeley.edu
|
|
* Copyright (c) 2018 Peer Adelt, peer.adelt@hni.uni-paderborn.de
|
|
* Bastian Koppelmann, kbastian@mail.uni-paderborn.de
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify it
|
|
* under the terms and conditions of the GNU General Public License,
|
|
* version 2 or later, as published by the Free Software Foundation.
|
|
*
|
|
* This program is distributed in the hope it will be useful, but WITHOUT
|
|
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
|
|
* more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License along with
|
|
* this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
static bool trans_ecall(DisasContext *ctx, arg_ecall *a)
|
|
{
|
|
/* always generates U-level ECALL, fixed in do_interrupt handler */
|
|
generate_exception(ctx, RISCV_EXCP_U_ECALL);
|
|
exit_tb(ctx); /* no chaining */
|
|
ctx->base.is_jmp = DISAS_NORETURN;
|
|
return true;
|
|
}
|
|
|
|
static bool trans_ebreak(DisasContext *ctx, arg_ebreak *a)
|
|
{
|
|
generate_exception(ctx, RISCV_EXCP_BREAKPOINT);
|
|
exit_tb(ctx); /* no chaining */
|
|
ctx->base.is_jmp = DISAS_NORETURN;
|
|
return true;
|
|
}
|
|
|
|
static bool trans_uret(DisasContext *ctx, arg_uret *a)
|
|
{
|
|
return false;
|
|
}
|
|
|
|
static bool trans_sret(DisasContext *ctx, arg_sret *a)
|
|
{
|
|
#ifndef CONFIG_USER_ONLY
|
|
tcg_gen_movi_tl(cpu_pc, ctx->base.pc_next);
|
|
|
|
if (has_ext(ctx, RVS)) {
|
|
gen_helper_sret(cpu_pc, cpu_env, cpu_pc);
|
|
exit_tb(ctx); /* no chaining */
|
|
ctx->base.is_jmp = DISAS_NORETURN;
|
|
} else {
|
|
return false;
|
|
}
|
|
return true;
|
|
#else
|
|
return false;
|
|
#endif
|
|
}
|
|
|
|
static bool trans_hret(DisasContext *ctx, arg_hret *a)
|
|
{
|
|
return false;
|
|
}
|
|
|
|
static bool trans_mret(DisasContext *ctx, arg_mret *a)
|
|
{
|
|
#ifndef CONFIG_USER_ONLY
|
|
tcg_gen_movi_tl(cpu_pc, ctx->base.pc_next);
|
|
gen_helper_mret(cpu_pc, cpu_env, cpu_pc);
|
|
exit_tb(ctx); /* no chaining */
|
|
ctx->base.is_jmp = DISAS_NORETURN;
|
|
return true;
|
|
#else
|
|
return false;
|
|
#endif
|
|
}
|
|
|
|
static bool trans_wfi(DisasContext *ctx, arg_wfi *a)
|
|
{
|
|
#ifndef CONFIG_USER_ONLY
|
|
tcg_gen_movi_tl(cpu_pc, ctx->pc_succ_insn);
|
|
gen_helper_wfi(cpu_env);
|
|
return true;
|
|
#else
|
|
return false;
|
|
#endif
|
|
}
|
|
|
|
static bool trans_sfence_vma(DisasContext *ctx, arg_sfence_vma *a)
|
|
{
|
|
#ifndef CONFIG_USER_ONLY
|
|
if (ctx->priv_ver == PRIV_VERSION_1_10_0) {
|
|
gen_helper_tlb_flush(cpu_env);
|
|
return true;
|
|
}
|
|
#endif
|
|
return false;
|
|
}
|
|
|
|
static bool trans_sfence_vm(DisasContext *ctx, arg_sfence_vm *a)
|
|
{
|
|
#ifndef CONFIG_USER_ONLY
|
|
if (ctx->priv_ver <= PRIV_VERSION_1_09_1) {
|
|
gen_helper_tlb_flush(cpu_env);
|
|
return true;
|
|
}
|
|
#endif
|
|
return false;
|
|
}
|