2019-03-08 18:06:28 +00:00
|
|
|
/*
|
|
|
|
* RISC-V Emulation Helpers for QEMU.
|
|
|
|
*
|
|
|
|
* Copyright (c) 2016-2017 Sagar Karandikar, sagark@eecs.berkeley.edu
|
|
|
|
* Copyright (c) 2017-2018 SiFive, Inc.
|
|
|
|
*
|
|
|
|
* 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/>.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "qemu/osdep.h"
|
|
|
|
#include "qemu/log.h"
|
|
|
|
#include "cpu.h"
|
|
|
|
#include "exec/exec-all.h"
|
|
|
|
#include "exec/helper-proto.h"
|
|
|
|
|
|
|
|
/* Exceptions processing helpers */
|
|
|
|
void QEMU_NORETURN riscv_raise_exception(CPURISCVState *env,
|
|
|
|
uint32_t exception, uintptr_t pc)
|
|
|
|
{
|
2019-06-12 15:58:56 +00:00
|
|
|
CPUState *cs = env_cpu(env);
|
2019-03-08 18:06:28 +00:00
|
|
|
qemu_log_mask(CPU_LOG_INT, "%s: %d\n", __func__, exception);
|
|
|
|
cs->exception_index = exception;
|
|
|
|
cpu_loop_exit_restore(cs, pc);
|
|
|
|
}
|
|
|
|
|
|
|
|
void helper_raise_exception(CPURISCVState *env, uint32_t exception)
|
|
|
|
{
|
|
|
|
riscv_raise_exception(env, exception, 0);
|
|
|
|
}
|
|
|
|
|
|
|
|
target_ulong helper_csrrw(CPURISCVState *env, target_ulong src,
|
|
|
|
target_ulong csr)
|
|
|
|
{
|
|
|
|
target_ulong val = 0;
|
|
|
|
if (riscv_csrrw(env, csr, &val, src, -1) < 0) {
|
|
|
|
riscv_raise_exception(env, RISCV_EXCP_ILLEGAL_INST, GETPC());
|
|
|
|
}
|
|
|
|
return val;
|
|
|
|
}
|
|
|
|
|
|
|
|
target_ulong helper_csrrs(CPURISCVState *env, target_ulong src,
|
|
|
|
target_ulong csr, target_ulong rs1_pass)
|
|
|
|
{
|
|
|
|
target_ulong val = 0;
|
|
|
|
if (riscv_csrrw(env, csr, &val, -1, rs1_pass ? src : 0) < 0) {
|
|
|
|
riscv_raise_exception(env, RISCV_EXCP_ILLEGAL_INST, GETPC());
|
|
|
|
}
|
|
|
|
return val;
|
|
|
|
}
|
|
|
|
|
|
|
|
target_ulong helper_csrrc(CPURISCVState *env, target_ulong src,
|
|
|
|
target_ulong csr, target_ulong rs1_pass)
|
|
|
|
{
|
|
|
|
target_ulong val = 0;
|
|
|
|
if (riscv_csrrw(env, csr, &val, 0, rs1_pass ? src : 0) < 0) {
|
|
|
|
riscv_raise_exception(env, RISCV_EXCP_ILLEGAL_INST, GETPC());
|
|
|
|
}
|
|
|
|
return val;
|
|
|
|
}
|
|
|
|
|
|
|
|
#ifndef CONFIG_USER_ONLY
|
|
|
|
|
|
|
|
target_ulong helper_sret(CPURISCVState *env, target_ulong cpu_pc_deb)
|
|
|
|
{
|
2020-03-22 05:41:56 +00:00
|
|
|
target_ulong prev_priv, prev_virt, mstatus;
|
|
|
|
|
2019-03-08 18:06:28 +00:00
|
|
|
if (!(env->priv >= PRV_S)) {
|
|
|
|
riscv_raise_exception(env, RISCV_EXCP_ILLEGAL_INST, GETPC());
|
|
|
|
}
|
|
|
|
|
|
|
|
target_ulong retpc = env->sepc;
|
|
|
|
if (!riscv_has_ext(env, RVC) && (retpc & 0x3)) {
|
|
|
|
riscv_raise_exception(env, RISCV_EXCP_INST_ADDR_MIS, GETPC());
|
|
|
|
}
|
|
|
|
|
|
|
|
if (env->priv_ver >= PRIV_VERSION_1_10_0 &&
|
|
|
|
get_field(env->mstatus, MSTATUS_TSR)) {
|
|
|
|
riscv_raise_exception(env, RISCV_EXCP_ILLEGAL_INST, GETPC());
|
|
|
|
}
|
|
|
|
|
2020-03-22 05:41:56 +00:00
|
|
|
mstatus = env->mstatus;
|
|
|
|
|
|
|
|
if (riscv_has_ext(env, RVH) && !riscv_cpu_virt_enabled(env)) {
|
|
|
|
/* We support Hypervisor extensions and virtulisation is disabled */
|
|
|
|
target_ulong hstatus = env->hstatus;
|
|
|
|
|
|
|
|
prev_priv = get_field(mstatus, MSTATUS_SPP);
|
|
|
|
prev_virt = get_field(hstatus, HSTATUS_SPV);
|
|
|
|
|
|
|
|
hstatus = set_field(hstatus, HSTATUS_SPV,
|
|
|
|
get_field(hstatus, HSTATUS_SP2V));
|
|
|
|
mstatus = set_field(mstatus, MSTATUS_SPP,
|
|
|
|
get_field(hstatus, HSTATUS_SP2P));
|
|
|
|
hstatus = set_field(hstatus, HSTATUS_SP2V, 0);
|
|
|
|
hstatus = set_field(hstatus, HSTATUS_SP2P, 0);
|
|
|
|
mstatus = set_field(mstatus, SSTATUS_SIE,
|
|
|
|
get_field(mstatus, SSTATUS_SPIE));
|
|
|
|
mstatus = set_field(mstatus, SSTATUS_SPIE, 1);
|
|
|
|
|
|
|
|
env->mstatus = mstatus;
|
|
|
|
env->hstatus = hstatus;
|
|
|
|
|
|
|
|
if (prev_virt) {
|
|
|
|
riscv_cpu_swap_hypervisor_regs(env);
|
|
|
|
}
|
|
|
|
|
|
|
|
riscv_cpu_set_virt_enabled(env, prev_virt);
|
|
|
|
} else {
|
|
|
|
prev_priv = get_field(mstatus, MSTATUS_SPP);
|
|
|
|
|
|
|
|
mstatus = set_field(mstatus,
|
|
|
|
env->priv_ver >= PRIV_VERSION_1_10_0 ?
|
|
|
|
MSTATUS_SIE : MSTATUS_UIE << prev_priv,
|
|
|
|
get_field(mstatus, MSTATUS_SPIE));
|
|
|
|
mstatus = set_field(mstatus, MSTATUS_SPIE, 1);
|
|
|
|
mstatus = set_field(mstatus, MSTATUS_SPP, PRV_U);
|
|
|
|
env->mstatus = mstatus;
|
|
|
|
}
|
|
|
|
|
2019-03-08 18:06:28 +00:00
|
|
|
riscv_cpu_set_mode(env, prev_priv);
|
|
|
|
|
|
|
|
return retpc;
|
|
|
|
}
|
|
|
|
|
|
|
|
target_ulong helper_mret(CPURISCVState *env, target_ulong cpu_pc_deb)
|
|
|
|
{
|
|
|
|
if (!(env->priv >= PRV_M)) {
|
|
|
|
riscv_raise_exception(env, RISCV_EXCP_ILLEGAL_INST, GETPC());
|
|
|
|
}
|
|
|
|
|
|
|
|
target_ulong retpc = env->mepc;
|
|
|
|
if (!riscv_has_ext(env, RVC) && (retpc & 0x3)) {
|
|
|
|
riscv_raise_exception(env, RISCV_EXCP_INST_ADDR_MIS, GETPC());
|
|
|
|
}
|
|
|
|
|
|
|
|
target_ulong mstatus = env->mstatus;
|
|
|
|
target_ulong prev_priv = get_field(mstatus, MSTATUS_MPP);
|
2020-03-22 05:41:56 +00:00
|
|
|
target_ulong prev_virt = get_field(mstatus, MSTATUS_MPV);
|
2019-03-08 18:06:28 +00:00
|
|
|
mstatus = set_field(mstatus,
|
|
|
|
env->priv_ver >= PRIV_VERSION_1_10_0 ?
|
|
|
|
MSTATUS_MIE : MSTATUS_UIE << prev_priv,
|
|
|
|
get_field(mstatus, MSTATUS_MPIE));
|
2020-03-21 16:18:51 +00:00
|
|
|
mstatus = set_field(mstatus, MSTATUS_MPIE, 1);
|
2019-03-08 18:06:28 +00:00
|
|
|
mstatus = set_field(mstatus, MSTATUS_MPP, PRV_U);
|
2020-03-22 06:16:10 +00:00
|
|
|
#ifdef TARGET_RISCV32
|
|
|
|
env->mstatush = set_field(env->mstatush, MSTATUS_MPV, 0);
|
|
|
|
#else
|
2020-03-22 05:41:56 +00:00
|
|
|
mstatus = set_field(mstatus, MSTATUS_MPV, 0);
|
2020-03-22 06:16:10 +00:00
|
|
|
#endif
|
2019-03-08 18:06:28 +00:00
|
|
|
env->mstatus = mstatus;
|
2020-03-22 05:41:56 +00:00
|
|
|
riscv_cpu_set_mode(env, prev_priv);
|
|
|
|
|
|
|
|
if (riscv_has_ext(env, RVH)) {
|
|
|
|
if (prev_virt) {
|
|
|
|
riscv_cpu_swap_hypervisor_regs(env);
|
|
|
|
}
|
|
|
|
|
|
|
|
riscv_cpu_set_virt_enabled(env, prev_virt);
|
|
|
|
}
|
2019-03-08 18:06:28 +00:00
|
|
|
|
|
|
|
return retpc;
|
|
|
|
}
|
|
|
|
|
|
|
|
void helper_wfi(CPURISCVState *env)
|
|
|
|
{
|
2019-06-12 15:58:56 +00:00
|
|
|
CPUState *cs = env_cpu(env);
|
2019-03-08 18:06:28 +00:00
|
|
|
|
2020-03-22 05:38:12 +00:00
|
|
|
if ((env->priv == PRV_S &&
|
2019-03-08 18:06:28 +00:00
|
|
|
env->priv_ver >= PRIV_VERSION_1_10_0 &&
|
2020-03-22 05:38:12 +00:00
|
|
|
get_field(env->mstatus, MSTATUS_TW)) ||
|
|
|
|
riscv_cpu_virt_enabled(env)) {
|
2019-03-08 18:06:28 +00:00
|
|
|
riscv_raise_exception(env, RISCV_EXCP_ILLEGAL_INST, GETPC());
|
|
|
|
} else {
|
|
|
|
cs->halted = 1;
|
|
|
|
cs->exception_index = EXCP_HLT;
|
|
|
|
cpu_loop_exit(cs);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void helper_tlb_flush(CPURISCVState *env)
|
|
|
|
{
|
2019-06-12 15:58:56 +00:00
|
|
|
CPUState *cs = env_cpu(env);
|
2019-05-28 22:29:36 +00:00
|
|
|
if (!(env->priv >= PRV_S) ||
|
|
|
|
(env->priv == PRV_S &&
|
|
|
|
env->priv_ver >= PRIV_VERSION_1_10_0 &&
|
|
|
|
get_field(env->mstatus, MSTATUS_TVM))) {
|
2019-03-08 18:06:28 +00:00
|
|
|
riscv_raise_exception(env, RISCV_EXCP_ILLEGAL_INST, GETPC());
|
|
|
|
} else {
|
|
|
|
tlb_flush(cs);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
#endif /* !CONFIG_USER_ONLY */
|