- add warning text to quickstart example - add CFI tests to CI - use --arch-only for docker pre-requisites - fix .editorconfig for emacs - add guest-loader for Xen-like hypervisor testing - move generic-loader docs into manual proper - move semihosting out of hw/ -----BEGIN PGP SIGNATURE----- iQEzBAABCgAdFiEEZoWumedRZ7yvyN81+9DbCVqeKkQFAmBI50MACgkQ+9DbCVqe KkSyKggAhPZW+7sReVEsFdnVfwuo3evW7auoW44mghNbikTnm3RfoahYTrek8lGZ AEo2gFMbzENW0j88e0OvSYYtwkVz3sD68bygfXerti6sQwWlwkf42I/suWjJNLph oVKGEEdJess9+zR13Cu6RAq5RaTwzDPGPjUwTbeJPpAps4+UZV3hsxhaxs8keII6 GBa/idnh0qEApP2NDLKiSASrYZM7xGvljE7zO4qhchd6iSH/o5rCtkoB2tRCcXGo +KF8LyBsUNf7GiWp0yYZMZUQ3Pqskqma8N3d2A4UlS1kXvxeX/FiORkG/Ne8bH1Z VZ1Z/xbyXGlVkiP1bcoYSc6XWHNDTw== =R9zQ -----END PGP SIGNATURE----- Merge remote-tracking branch 'remotes/stsquad/tags/pull-testing-docs-xen-updates-100321-2' into staging Testing, guest-loader and other misc tweaks - add warning text to quickstart example - add CFI tests to CI - use --arch-only for docker pre-requisites - fix .editorconfig for emacs - add guest-loader for Xen-like hypervisor testing - move generic-loader docs into manual proper - move semihosting out of hw/ # gpg: Signature made Wed 10 Mar 2021 15:35:31 GMT # gpg: using RSA key 6685AE99E75167BCAFC8DF35FBD0DB095A9E2A44 # gpg: Good signature from "Alex Bennée (Master Work Key) <alex.bennee@linaro.org>" [full] # Primary key fingerprint: 6685 AE99 E751 67BC AFC8 DF35 FBD0 DB09 5A9E 2A44 * remotes/stsquad/tags/pull-testing-docs-xen-updates-100321-2: semihosting: Move hw/semihosting/ -> semihosting/ semihosting: Move include/hw/semihosting/ -> include/semihosting/ tests/avocado: add boot_xen tests docs: add some documentation for the guest-loader docs: move generic-loader documentation into the main manual hw/core: implement a guest-loader to support static hypervisor guests device_tree: add qemu_fdt_setprop_string_array helper hw/riscv: migrate fdt field to generic MachineState hw/board: promote fdt from ARM VirtMachineState to MachineState .editorconfig: update the automatic mode setting for Emacs tests/docker: Use --arch-only when building Debian cross image gitlab-ci.yml: Add jobs to test CFI flags gitlab-ci.yml: Allow custom # of parallel linkers tests/docker: add a test-tcg for building then running check-tcg docs/system: add a gentle prompt for the complexity to come Signed-off-by: Peter Maydell <peter.maydell@linaro.org>
831 lines
26 KiB
C
831 lines
26 KiB
C
/*
|
|
* QEMU MIPS CPU
|
|
*
|
|
* Copyright (c) 2012 SUSE LINUX Products GmbH
|
|
*
|
|
* 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.1 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, see
|
|
* <http://www.gnu.org/licenses/lgpl-2.1.html>
|
|
*/
|
|
|
|
#include "qemu/osdep.h"
|
|
#include "qemu/cutils.h"
|
|
#include "qemu/qemu-print.h"
|
|
#include "qapi/error.h"
|
|
#include "cpu.h"
|
|
#include "internal.h"
|
|
#include "kvm_mips.h"
|
|
#include "qemu/module.h"
|
|
#include "sysemu/kvm.h"
|
|
#include "sysemu/qtest.h"
|
|
#include "exec/exec-all.h"
|
|
#include "hw/qdev-properties.h"
|
|
#include "hw/qdev-clock.h"
|
|
#include "semihosting/semihost.h"
|
|
#include "qapi/qapi-commands-machine-target.h"
|
|
#include "fpu_helper.h"
|
|
|
|
#if !defined(CONFIG_USER_ONLY)
|
|
|
|
/* Called for updates to CP0_Status. */
|
|
void sync_c0_status(CPUMIPSState *env, CPUMIPSState *cpu, int tc)
|
|
{
|
|
int32_t tcstatus, *tcst;
|
|
uint32_t v = cpu->CP0_Status;
|
|
uint32_t cu, mx, asid, ksu;
|
|
uint32_t mask = ((1 << CP0TCSt_TCU3)
|
|
| (1 << CP0TCSt_TCU2)
|
|
| (1 << CP0TCSt_TCU1)
|
|
| (1 << CP0TCSt_TCU0)
|
|
| (1 << CP0TCSt_TMX)
|
|
| (3 << CP0TCSt_TKSU)
|
|
| (0xff << CP0TCSt_TASID));
|
|
|
|
cu = (v >> CP0St_CU0) & 0xf;
|
|
mx = (v >> CP0St_MX) & 0x1;
|
|
ksu = (v >> CP0St_KSU) & 0x3;
|
|
asid = env->CP0_EntryHi & env->CP0_EntryHi_ASID_mask;
|
|
|
|
tcstatus = cu << CP0TCSt_TCU0;
|
|
tcstatus |= mx << CP0TCSt_TMX;
|
|
tcstatus |= ksu << CP0TCSt_TKSU;
|
|
tcstatus |= asid;
|
|
|
|
if (tc == cpu->current_tc) {
|
|
tcst = &cpu->active_tc.CP0_TCStatus;
|
|
} else {
|
|
tcst = &cpu->tcs[tc].CP0_TCStatus;
|
|
}
|
|
|
|
*tcst &= ~mask;
|
|
*tcst |= tcstatus;
|
|
compute_hflags(cpu);
|
|
}
|
|
|
|
void cpu_mips_store_status(CPUMIPSState *env, target_ulong val)
|
|
{
|
|
uint32_t mask = env->CP0_Status_rw_bitmask;
|
|
target_ulong old = env->CP0_Status;
|
|
|
|
if (env->insn_flags & ISA_MIPS_R6) {
|
|
bool has_supervisor = extract32(mask, CP0St_KSU, 2) == 0x3;
|
|
#if defined(TARGET_MIPS64)
|
|
uint32_t ksux = (1 << CP0St_KX) & val;
|
|
ksux |= (ksux >> 1) & val; /* KX = 0 forces SX to be 0 */
|
|
ksux |= (ksux >> 1) & val; /* SX = 0 forces UX to be 0 */
|
|
val = (val & ~(7 << CP0St_UX)) | ksux;
|
|
#endif
|
|
if (has_supervisor && extract32(val, CP0St_KSU, 2) == 0x3) {
|
|
mask &= ~(3 << CP0St_KSU);
|
|
}
|
|
mask &= ~(((1 << CP0St_SR) | (1 << CP0St_NMI)) & val);
|
|
}
|
|
|
|
env->CP0_Status = (old & ~mask) | (val & mask);
|
|
#if defined(TARGET_MIPS64)
|
|
if ((env->CP0_Status ^ old) & (old & (7 << CP0St_UX))) {
|
|
/* Access to at least one of the 64-bit segments has been disabled */
|
|
tlb_flush(env_cpu(env));
|
|
}
|
|
#endif
|
|
if (ase_mt_available(env)) {
|
|
sync_c0_status(env, env, env->current_tc);
|
|
} else {
|
|
compute_hflags(env);
|
|
}
|
|
}
|
|
|
|
void cpu_mips_store_cause(CPUMIPSState *env, target_ulong val)
|
|
{
|
|
uint32_t mask = 0x00C00300;
|
|
uint32_t old = env->CP0_Cause;
|
|
int i;
|
|
|
|
if (env->insn_flags & ISA_MIPS_R2) {
|
|
mask |= 1 << CP0Ca_DC;
|
|
}
|
|
if (env->insn_flags & ISA_MIPS_R6) {
|
|
mask &= ~((1 << CP0Ca_WP) & val);
|
|
}
|
|
|
|
env->CP0_Cause = (env->CP0_Cause & ~mask) | (val & mask);
|
|
|
|
if ((old ^ env->CP0_Cause) & (1 << CP0Ca_DC)) {
|
|
if (env->CP0_Cause & (1 << CP0Ca_DC)) {
|
|
cpu_mips_stop_count(env);
|
|
} else {
|
|
cpu_mips_start_count(env);
|
|
}
|
|
}
|
|
|
|
/* Set/reset software interrupts */
|
|
for (i = 0 ; i < 2 ; i++) {
|
|
if ((old ^ env->CP0_Cause) & (1 << (CP0Ca_IP + i))) {
|
|
cpu_mips_soft_irq(env, i, env->CP0_Cause & (1 << (CP0Ca_IP + i)));
|
|
}
|
|
}
|
|
}
|
|
|
|
#endif /* !CONFIG_USER_ONLY */
|
|
|
|
static const char * const excp_names[EXCP_LAST + 1] = {
|
|
[EXCP_RESET] = "reset",
|
|
[EXCP_SRESET] = "soft reset",
|
|
[EXCP_DSS] = "debug single step",
|
|
[EXCP_DINT] = "debug interrupt",
|
|
[EXCP_NMI] = "non-maskable interrupt",
|
|
[EXCP_MCHECK] = "machine check",
|
|
[EXCP_EXT_INTERRUPT] = "interrupt",
|
|
[EXCP_DFWATCH] = "deferred watchpoint",
|
|
[EXCP_DIB] = "debug instruction breakpoint",
|
|
[EXCP_IWATCH] = "instruction fetch watchpoint",
|
|
[EXCP_AdEL] = "address error load",
|
|
[EXCP_AdES] = "address error store",
|
|
[EXCP_TLBF] = "TLB refill",
|
|
[EXCP_IBE] = "instruction bus error",
|
|
[EXCP_DBp] = "debug breakpoint",
|
|
[EXCP_SYSCALL] = "syscall",
|
|
[EXCP_BREAK] = "break",
|
|
[EXCP_CpU] = "coprocessor unusable",
|
|
[EXCP_RI] = "reserved instruction",
|
|
[EXCP_OVERFLOW] = "arithmetic overflow",
|
|
[EXCP_TRAP] = "trap",
|
|
[EXCP_FPE] = "floating point",
|
|
[EXCP_DDBS] = "debug data break store",
|
|
[EXCP_DWATCH] = "data watchpoint",
|
|
[EXCP_LTLBL] = "TLB modify",
|
|
[EXCP_TLBL] = "TLB load",
|
|
[EXCP_TLBS] = "TLB store",
|
|
[EXCP_DBE] = "data bus error",
|
|
[EXCP_DDBL] = "debug data break load",
|
|
[EXCP_THREAD] = "thread",
|
|
[EXCP_MDMX] = "MDMX",
|
|
[EXCP_C2E] = "precise coprocessor 2",
|
|
[EXCP_CACHE] = "cache error",
|
|
[EXCP_TLBXI] = "TLB execute-inhibit",
|
|
[EXCP_TLBRI] = "TLB read-inhibit",
|
|
[EXCP_MSADIS] = "MSA disabled",
|
|
[EXCP_MSAFPE] = "MSA floating point",
|
|
};
|
|
|
|
const char *mips_exception_name(int32_t exception)
|
|
{
|
|
if (exception < 0 || exception > EXCP_LAST) {
|
|
return "unknown";
|
|
}
|
|
return excp_names[exception];
|
|
}
|
|
|
|
void cpu_set_exception_base(int vp_index, target_ulong address)
|
|
{
|
|
MIPSCPU *vp = MIPS_CPU(qemu_get_cpu(vp_index));
|
|
vp->env.exception_base = address;
|
|
}
|
|
|
|
target_ulong exception_resume_pc(CPUMIPSState *env)
|
|
{
|
|
target_ulong bad_pc;
|
|
target_ulong isa_mode;
|
|
|
|
isa_mode = !!(env->hflags & MIPS_HFLAG_M16);
|
|
bad_pc = env->active_tc.PC | isa_mode;
|
|
if (env->hflags & MIPS_HFLAG_BMASK) {
|
|
/*
|
|
* If the exception was raised from a delay slot, come back to
|
|
* the jump.
|
|
*/
|
|
bad_pc -= (env->hflags & MIPS_HFLAG_B16 ? 2 : 4);
|
|
}
|
|
|
|
return bad_pc;
|
|
}
|
|
|
|
bool mips_cpu_exec_interrupt(CPUState *cs, int interrupt_request)
|
|
{
|
|
if (interrupt_request & CPU_INTERRUPT_HARD) {
|
|
MIPSCPU *cpu = MIPS_CPU(cs);
|
|
CPUMIPSState *env = &cpu->env;
|
|
|
|
if (cpu_mips_hw_interrupts_enabled(env) &&
|
|
cpu_mips_hw_interrupts_pending(env)) {
|
|
/* Raise it */
|
|
cs->exception_index = EXCP_EXT_INTERRUPT;
|
|
env->error_code = 0;
|
|
mips_cpu_do_interrupt(cs);
|
|
return true;
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
void QEMU_NORETURN do_raise_exception_err(CPUMIPSState *env,
|
|
uint32_t exception,
|
|
int error_code,
|
|
uintptr_t pc)
|
|
{
|
|
CPUState *cs = env_cpu(env);
|
|
|
|
qemu_log_mask(CPU_LOG_INT, "%s: %d (%s) %d\n",
|
|
__func__, exception, mips_exception_name(exception),
|
|
error_code);
|
|
cs->exception_index = exception;
|
|
env->error_code = error_code;
|
|
|
|
cpu_loop_exit_restore(cs, pc);
|
|
}
|
|
|
|
static void mips_cpu_set_pc(CPUState *cs, vaddr value)
|
|
{
|
|
MIPSCPU *cpu = MIPS_CPU(cs);
|
|
CPUMIPSState *env = &cpu->env;
|
|
|
|
env->active_tc.PC = value & ~(target_ulong)1;
|
|
if (value & 1) {
|
|
env->hflags |= MIPS_HFLAG_M16;
|
|
} else {
|
|
env->hflags &= ~(MIPS_HFLAG_M16);
|
|
}
|
|
}
|
|
|
|
#ifdef CONFIG_TCG
|
|
static void mips_cpu_synchronize_from_tb(CPUState *cs,
|
|
const TranslationBlock *tb)
|
|
{
|
|
MIPSCPU *cpu = MIPS_CPU(cs);
|
|
CPUMIPSState *env = &cpu->env;
|
|
|
|
env->active_tc.PC = tb->pc;
|
|
env->hflags &= ~MIPS_HFLAG_BMASK;
|
|
env->hflags |= tb->flags & MIPS_HFLAG_BMASK;
|
|
}
|
|
|
|
# ifndef CONFIG_USER_ONLY
|
|
static bool mips_io_recompile_replay_branch(CPUState *cs,
|
|
const TranslationBlock *tb)
|
|
{
|
|
MIPSCPU *cpu = MIPS_CPU(cs);
|
|
CPUMIPSState *env = &cpu->env;
|
|
|
|
if ((env->hflags & MIPS_HFLAG_BMASK) != 0
|
|
&& env->active_tc.PC != tb->pc) {
|
|
env->active_tc.PC -= (env->hflags & MIPS_HFLAG_B16 ? 2 : 4);
|
|
env->hflags &= ~MIPS_HFLAG_BMASK;
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
# endif /* !CONFIG_USER_ONLY */
|
|
#endif /* CONFIG_TCG */
|
|
|
|
static bool mips_cpu_has_work(CPUState *cs)
|
|
{
|
|
MIPSCPU *cpu = MIPS_CPU(cs);
|
|
CPUMIPSState *env = &cpu->env;
|
|
bool has_work = false;
|
|
|
|
/*
|
|
* Prior to MIPS Release 6 it is implementation dependent if non-enabled
|
|
* interrupts wake-up the CPU, however most of the implementations only
|
|
* check for interrupts that can be taken.
|
|
*/
|
|
if ((cs->interrupt_request & CPU_INTERRUPT_HARD) &&
|
|
cpu_mips_hw_interrupts_pending(env)) {
|
|
if (cpu_mips_hw_interrupts_enabled(env) ||
|
|
(env->insn_flags & ISA_MIPS_R6)) {
|
|
has_work = true;
|
|
}
|
|
}
|
|
|
|
/* MIPS-MT has the ability to halt the CPU. */
|
|
if (ase_mt_available(env)) {
|
|
/*
|
|
* The QEMU model will issue an _WAKE request whenever the CPUs
|
|
* should be woken up.
|
|
*/
|
|
if (cs->interrupt_request & CPU_INTERRUPT_WAKE) {
|
|
has_work = true;
|
|
}
|
|
|
|
if (!mips_vpe_active(env)) {
|
|
has_work = false;
|
|
}
|
|
}
|
|
/* MIPS Release 6 has the ability to halt the CPU. */
|
|
if (env->CP0_Config5 & (1 << CP0C5_VP)) {
|
|
if (cs->interrupt_request & CPU_INTERRUPT_WAKE) {
|
|
has_work = true;
|
|
}
|
|
if (!mips_vp_active(env)) {
|
|
has_work = false;
|
|
}
|
|
}
|
|
return has_work;
|
|
}
|
|
|
|
#include "cpu-defs.c.inc"
|
|
|
|
static void mips_cpu_reset(DeviceState *dev)
|
|
{
|
|
CPUState *cs = CPU(dev);
|
|
MIPSCPU *cpu = MIPS_CPU(cs);
|
|
MIPSCPUClass *mcc = MIPS_CPU_GET_CLASS(cpu);
|
|
CPUMIPSState *env = &cpu->env;
|
|
|
|
mcc->parent_reset(dev);
|
|
|
|
memset(env, 0, offsetof(CPUMIPSState, end_reset_fields));
|
|
|
|
/* Reset registers to their default values */
|
|
env->CP0_PRid = env->cpu_model->CP0_PRid;
|
|
env->CP0_Config0 = env->cpu_model->CP0_Config0;
|
|
#ifdef TARGET_WORDS_BIGENDIAN
|
|
env->CP0_Config0 |= (1 << CP0C0_BE);
|
|
#endif
|
|
env->CP0_Config1 = env->cpu_model->CP0_Config1;
|
|
env->CP0_Config2 = env->cpu_model->CP0_Config2;
|
|
env->CP0_Config3 = env->cpu_model->CP0_Config3;
|
|
env->CP0_Config4 = env->cpu_model->CP0_Config4;
|
|
env->CP0_Config4_rw_bitmask = env->cpu_model->CP0_Config4_rw_bitmask;
|
|
env->CP0_Config5 = env->cpu_model->CP0_Config5;
|
|
env->CP0_Config5_rw_bitmask = env->cpu_model->CP0_Config5_rw_bitmask;
|
|
env->CP0_Config6 = env->cpu_model->CP0_Config6;
|
|
env->CP0_Config6_rw_bitmask = env->cpu_model->CP0_Config6_rw_bitmask;
|
|
env->CP0_Config7 = env->cpu_model->CP0_Config7;
|
|
env->CP0_Config7_rw_bitmask = env->cpu_model->CP0_Config7_rw_bitmask;
|
|
env->CP0_LLAddr_rw_bitmask = env->cpu_model->CP0_LLAddr_rw_bitmask
|
|
<< env->cpu_model->CP0_LLAddr_shift;
|
|
env->CP0_LLAddr_shift = env->cpu_model->CP0_LLAddr_shift;
|
|
env->SYNCI_Step = env->cpu_model->SYNCI_Step;
|
|
env->CCRes = env->cpu_model->CCRes;
|
|
env->CP0_Status_rw_bitmask = env->cpu_model->CP0_Status_rw_bitmask;
|
|
env->CP0_TCStatus_rw_bitmask = env->cpu_model->CP0_TCStatus_rw_bitmask;
|
|
env->CP0_SRSCtl = env->cpu_model->CP0_SRSCtl;
|
|
env->current_tc = 0;
|
|
env->SEGBITS = env->cpu_model->SEGBITS;
|
|
env->SEGMask = (target_ulong)((1ULL << env->cpu_model->SEGBITS) - 1);
|
|
#if defined(TARGET_MIPS64)
|
|
if (env->cpu_model->insn_flags & ISA_MIPS3) {
|
|
env->SEGMask |= 3ULL << 62;
|
|
}
|
|
#endif
|
|
env->PABITS = env->cpu_model->PABITS;
|
|
env->CP0_SRSConf0_rw_bitmask = env->cpu_model->CP0_SRSConf0_rw_bitmask;
|
|
env->CP0_SRSConf0 = env->cpu_model->CP0_SRSConf0;
|
|
env->CP0_SRSConf1_rw_bitmask = env->cpu_model->CP0_SRSConf1_rw_bitmask;
|
|
env->CP0_SRSConf1 = env->cpu_model->CP0_SRSConf1;
|
|
env->CP0_SRSConf2_rw_bitmask = env->cpu_model->CP0_SRSConf2_rw_bitmask;
|
|
env->CP0_SRSConf2 = env->cpu_model->CP0_SRSConf2;
|
|
env->CP0_SRSConf3_rw_bitmask = env->cpu_model->CP0_SRSConf3_rw_bitmask;
|
|
env->CP0_SRSConf3 = env->cpu_model->CP0_SRSConf3;
|
|
env->CP0_SRSConf4_rw_bitmask = env->cpu_model->CP0_SRSConf4_rw_bitmask;
|
|
env->CP0_SRSConf4 = env->cpu_model->CP0_SRSConf4;
|
|
env->CP0_PageGrain_rw_bitmask = env->cpu_model->CP0_PageGrain_rw_bitmask;
|
|
env->CP0_PageGrain = env->cpu_model->CP0_PageGrain;
|
|
env->CP0_EBaseWG_rw_bitmask = env->cpu_model->CP0_EBaseWG_rw_bitmask;
|
|
env->active_fpu.fcr0 = env->cpu_model->CP1_fcr0;
|
|
env->active_fpu.fcr31_rw_bitmask = env->cpu_model->CP1_fcr31_rw_bitmask;
|
|
env->active_fpu.fcr31 = env->cpu_model->CP1_fcr31;
|
|
env->msair = env->cpu_model->MSAIR;
|
|
env->insn_flags = env->cpu_model->insn_flags;
|
|
|
|
#if defined(CONFIG_USER_ONLY)
|
|
env->CP0_Status = (MIPS_HFLAG_UM << CP0St_KSU);
|
|
# ifdef TARGET_MIPS64
|
|
/* Enable 64-bit register mode. */
|
|
env->CP0_Status |= (1 << CP0St_PX);
|
|
# endif
|
|
# ifdef TARGET_ABI_MIPSN64
|
|
/* Enable 64-bit address mode. */
|
|
env->CP0_Status |= (1 << CP0St_UX);
|
|
# endif
|
|
/*
|
|
* Enable access to the CPUNum, SYNCI_Step, CC, and CCRes RDHWR
|
|
* hardware registers.
|
|
*/
|
|
env->CP0_HWREna |= 0x0000000F;
|
|
if (env->CP0_Config1 & (1 << CP0C1_FP)) {
|
|
env->CP0_Status |= (1 << CP0St_CU1);
|
|
}
|
|
if (env->CP0_Config3 & (1 << CP0C3_DSPP)) {
|
|
env->CP0_Status |= (1 << CP0St_MX);
|
|
}
|
|
# if defined(TARGET_MIPS64)
|
|
/* For MIPS64, init FR bit to 1 if FPU unit is there and bit is writable. */
|
|
if ((env->CP0_Config1 & (1 << CP0C1_FP)) &&
|
|
(env->CP0_Status_rw_bitmask & (1 << CP0St_FR))) {
|
|
env->CP0_Status |= (1 << CP0St_FR);
|
|
}
|
|
# endif
|
|
#else /* !CONFIG_USER_ONLY */
|
|
if (env->hflags & MIPS_HFLAG_BMASK) {
|
|
/*
|
|
* If the exception was raised from a delay slot,
|
|
* come back to the jump.
|
|
*/
|
|
env->CP0_ErrorEPC = (env->active_tc.PC
|
|
- (env->hflags & MIPS_HFLAG_B16 ? 2 : 4));
|
|
} else {
|
|
env->CP0_ErrorEPC = env->active_tc.PC;
|
|
}
|
|
env->active_tc.PC = env->exception_base;
|
|
env->CP0_Random = env->tlb->nb_tlb - 1;
|
|
env->tlb->tlb_in_use = env->tlb->nb_tlb;
|
|
env->CP0_Wired = 0;
|
|
env->CP0_GlobalNumber = (cs->cpu_index & 0xFF) << CP0GN_VPId;
|
|
env->CP0_EBase = (cs->cpu_index & 0x3FF);
|
|
if (mips_um_ksegs_enabled()) {
|
|
env->CP0_EBase |= 0x40000000;
|
|
} else {
|
|
env->CP0_EBase |= (int32_t)0x80000000;
|
|
}
|
|
if (env->CP0_Config3 & (1 << CP0C3_CMGCR)) {
|
|
env->CP0_CMGCRBase = 0x1fbf8000 >> 4;
|
|
}
|
|
env->CP0_EntryHi_ASID_mask = (env->CP0_Config5 & (1 << CP0C5_MI)) ?
|
|
0x0 : (env->CP0_Config4 & (1 << CP0C4_AE)) ? 0x3ff : 0xff;
|
|
env->CP0_Status = (1 << CP0St_BEV) | (1 << CP0St_ERL);
|
|
/*
|
|
* Vectored interrupts not implemented, timer on int 7,
|
|
* no performance counters.
|
|
*/
|
|
env->CP0_IntCtl = 0xe0000000;
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < 7; i++) {
|
|
env->CP0_WatchLo[i] = 0;
|
|
env->CP0_WatchHi[i] = 0x80000000;
|
|
}
|
|
env->CP0_WatchLo[7] = 0;
|
|
env->CP0_WatchHi[7] = 0;
|
|
}
|
|
/* Count register increments in debug mode, EJTAG version 1 */
|
|
env->CP0_Debug = (1 << CP0DB_CNT) | (0x1 << CP0DB_VER);
|
|
|
|
cpu_mips_store_count(env, 1);
|
|
|
|
if (ase_mt_available(env)) {
|
|
int i;
|
|
|
|
/* Only TC0 on VPE 0 starts as active. */
|
|
for (i = 0; i < ARRAY_SIZE(env->tcs); i++) {
|
|
env->tcs[i].CP0_TCBind = cs->cpu_index << CP0TCBd_CurVPE;
|
|
env->tcs[i].CP0_TCHalt = 1;
|
|
}
|
|
env->active_tc.CP0_TCHalt = 1;
|
|
cs->halted = 1;
|
|
|
|
if (cs->cpu_index == 0) {
|
|
/* VPE0 starts up enabled. */
|
|
env->mvp->CP0_MVPControl |= (1 << CP0MVPCo_EVP);
|
|
env->CP0_VPEConf0 |= (1 << CP0VPEC0_MVP) | (1 << CP0VPEC0_VPA);
|
|
|
|
/* TC0 starts up unhalted. */
|
|
cs->halted = 0;
|
|
env->active_tc.CP0_TCHalt = 0;
|
|
env->tcs[0].CP0_TCHalt = 0;
|
|
/* With thread 0 active. */
|
|
env->active_tc.CP0_TCStatus = (1 << CP0TCSt_A);
|
|
env->tcs[0].CP0_TCStatus = (1 << CP0TCSt_A);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Configure default legacy segmentation control. We use this regardless of
|
|
* whether segmentation control is presented to the guest.
|
|
*/
|
|
/* KSeg3 (seg0 0xE0000000..0xFFFFFFFF) */
|
|
env->CP0_SegCtl0 = (CP0SC_AM_MK << CP0SC_AM);
|
|
/* KSeg2 (seg1 0xC0000000..0xDFFFFFFF) */
|
|
env->CP0_SegCtl0 |= ((CP0SC_AM_MSK << CP0SC_AM)) << 16;
|
|
/* KSeg1 (seg2 0xA0000000..0x9FFFFFFF) */
|
|
env->CP0_SegCtl1 = (0 << CP0SC_PA) | (CP0SC_AM_UK << CP0SC_AM) |
|
|
(2 << CP0SC_C);
|
|
/* KSeg0 (seg3 0x80000000..0x9FFFFFFF) */
|
|
env->CP0_SegCtl1 |= ((0 << CP0SC_PA) | (CP0SC_AM_UK << CP0SC_AM) |
|
|
(3 << CP0SC_C)) << 16;
|
|
/* USeg (seg4 0x40000000..0x7FFFFFFF) */
|
|
env->CP0_SegCtl2 = (2 << CP0SC_PA) | (CP0SC_AM_MUSK << CP0SC_AM) |
|
|
(1 << CP0SC_EU) | (2 << CP0SC_C);
|
|
/* USeg (seg5 0x00000000..0x3FFFFFFF) */
|
|
env->CP0_SegCtl2 |= ((0 << CP0SC_PA) | (CP0SC_AM_MUSK << CP0SC_AM) |
|
|
(1 << CP0SC_EU) | (2 << CP0SC_C)) << 16;
|
|
/* XKPhys (note, SegCtl2.XR = 0, so XAM won't be used) */
|
|
env->CP0_SegCtl1 |= (CP0SC_AM_UK << CP0SC1_XAM);
|
|
#endif /* !CONFIG_USER_ONLY */
|
|
if ((env->insn_flags & ISA_MIPS_R6) &&
|
|
(env->active_fpu.fcr0 & (1 << FCR0_F64))) {
|
|
/* Status.FR = 0 mode in 64-bit FPU not allowed in R6 */
|
|
env->CP0_Status |= (1 << CP0St_FR);
|
|
}
|
|
|
|
if (env->insn_flags & ISA_MIPS_R6) {
|
|
/* PTW = 1 */
|
|
env->CP0_PWSize = 0x40;
|
|
/* GDI = 12 */
|
|
/* UDI = 12 */
|
|
/* MDI = 12 */
|
|
/* PRI = 12 */
|
|
/* PTEI = 2 */
|
|
env->CP0_PWField = 0x0C30C302;
|
|
} else {
|
|
/* GDI = 0 */
|
|
/* UDI = 0 */
|
|
/* MDI = 0 */
|
|
/* PRI = 0 */
|
|
/* PTEI = 2 */
|
|
env->CP0_PWField = 0x02;
|
|
}
|
|
|
|
if (env->CP0_Config3 & (1 << CP0C3_ISA) & (1 << (CP0C3_ISA + 1))) {
|
|
/* microMIPS on reset when Config3.ISA is 3 */
|
|
env->hflags |= MIPS_HFLAG_M16;
|
|
}
|
|
|
|
msa_reset(env);
|
|
|
|
compute_hflags(env);
|
|
restore_fp_status(env);
|
|
restore_pamask(env);
|
|
cs->exception_index = EXCP_NONE;
|
|
|
|
if (semihosting_get_argc()) {
|
|
/* UHI interface can be used to obtain argc and argv */
|
|
env->active_tc.gpr[4] = -1;
|
|
}
|
|
|
|
#ifndef CONFIG_USER_ONLY
|
|
if (kvm_enabled()) {
|
|
kvm_mips_reset_vcpu(cpu);
|
|
}
|
|
#endif
|
|
}
|
|
|
|
static void mips_cpu_disas_set_info(CPUState *s, disassemble_info *info)
|
|
{
|
|
MIPSCPU *cpu = MIPS_CPU(s);
|
|
CPUMIPSState *env = &cpu->env;
|
|
|
|
if (!(env->insn_flags & ISA_NANOMIPS32)) {
|
|
#ifdef TARGET_WORDS_BIGENDIAN
|
|
info->print_insn = print_insn_big_mips;
|
|
#else
|
|
info->print_insn = print_insn_little_mips;
|
|
#endif
|
|
} else {
|
|
#if defined(CONFIG_NANOMIPS_DIS)
|
|
info->print_insn = print_insn_nanomips;
|
|
#endif
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Since commit 6af0bf9c7c3 this model assumes a CPU clocked at 200MHz.
|
|
*/
|
|
#define CPU_FREQ_HZ_DEFAULT 200000000
|
|
#define CP0_COUNT_RATE_DEFAULT 2
|
|
|
|
static void mips_cp0_period_set(MIPSCPU *cpu)
|
|
{
|
|
CPUMIPSState *env = &cpu->env;
|
|
|
|
env->cp0_count_ns = clock_ticks_to_ns(MIPS_CPU(cpu)->clock,
|
|
cpu->cp0_count_rate);
|
|
assert(env->cp0_count_ns);
|
|
}
|
|
|
|
static void mips_cpu_realizefn(DeviceState *dev, Error **errp)
|
|
{
|
|
CPUState *cs = CPU(dev);
|
|
MIPSCPU *cpu = MIPS_CPU(dev);
|
|
CPUMIPSState *env = &cpu->env;
|
|
MIPSCPUClass *mcc = MIPS_CPU_GET_CLASS(dev);
|
|
Error *local_err = NULL;
|
|
|
|
if (!clock_get(cpu->clock)) {
|
|
#ifndef CONFIG_USER_ONLY
|
|
if (!qtest_enabled()) {
|
|
g_autofree char *cpu_freq_str = freq_to_str(CPU_FREQ_HZ_DEFAULT);
|
|
|
|
warn_report("CPU input clock is not connected to any output clock, "
|
|
"using default frequency of %s.", cpu_freq_str);
|
|
}
|
|
#endif
|
|
/* Initialize the frequency in case the clock remains unconnected. */
|
|
clock_set_hz(cpu->clock, CPU_FREQ_HZ_DEFAULT);
|
|
}
|
|
mips_cp0_period_set(cpu);
|
|
|
|
cpu_exec_realizefn(cs, &local_err);
|
|
if (local_err != NULL) {
|
|
error_propagate(errp, local_err);
|
|
return;
|
|
}
|
|
|
|
env->exception_base = (int32_t)0xBFC00000;
|
|
|
|
#ifndef CONFIG_USER_ONLY
|
|
mmu_init(env, env->cpu_model);
|
|
#endif
|
|
fpu_init(env, env->cpu_model);
|
|
mvp_init(env);
|
|
|
|
cpu_reset(cs);
|
|
qemu_init_vcpu(cs);
|
|
|
|
mcc->parent_realize(dev, errp);
|
|
}
|
|
|
|
static void mips_cpu_initfn(Object *obj)
|
|
{
|
|
MIPSCPU *cpu = MIPS_CPU(obj);
|
|
CPUMIPSState *env = &cpu->env;
|
|
MIPSCPUClass *mcc = MIPS_CPU_GET_CLASS(obj);
|
|
|
|
cpu_set_cpustate_pointers(cpu);
|
|
cpu->clock = qdev_init_clock_in(DEVICE(obj), "clk-in", NULL, cpu, 0);
|
|
env->cpu_model = mcc->cpu_def;
|
|
}
|
|
|
|
static char *mips_cpu_type_name(const char *cpu_model)
|
|
{
|
|
return g_strdup_printf(MIPS_CPU_TYPE_NAME("%s"), cpu_model);
|
|
}
|
|
|
|
static ObjectClass *mips_cpu_class_by_name(const char *cpu_model)
|
|
{
|
|
ObjectClass *oc;
|
|
char *typename;
|
|
|
|
typename = mips_cpu_type_name(cpu_model);
|
|
oc = object_class_by_name(typename);
|
|
g_free(typename);
|
|
return oc;
|
|
}
|
|
|
|
static Property mips_cpu_properties[] = {
|
|
/* CP0 timer running at half the clock of the CPU */
|
|
DEFINE_PROP_UINT32("cp0-count-rate", MIPSCPU, cp0_count_rate,
|
|
CP0_COUNT_RATE_DEFAULT),
|
|
DEFINE_PROP_END_OF_LIST()
|
|
};
|
|
|
|
#ifdef CONFIG_TCG
|
|
#include "hw/core/tcg-cpu-ops.h"
|
|
/*
|
|
* NB: cannot be const, as some elements are changed for specific
|
|
* mips hardware (see hw/mips/jazz.c).
|
|
*/
|
|
static struct TCGCPUOps mips_tcg_ops = {
|
|
.initialize = mips_tcg_init,
|
|
.synchronize_from_tb = mips_cpu_synchronize_from_tb,
|
|
.cpu_exec_interrupt = mips_cpu_exec_interrupt,
|
|
.tlb_fill = mips_cpu_tlb_fill,
|
|
|
|
#if !defined(CONFIG_USER_ONLY)
|
|
.do_interrupt = mips_cpu_do_interrupt,
|
|
.do_transaction_failed = mips_cpu_do_transaction_failed,
|
|
.do_unaligned_access = mips_cpu_do_unaligned_access,
|
|
.io_recompile_replay_branch = mips_io_recompile_replay_branch,
|
|
#endif /* !CONFIG_USER_ONLY */
|
|
};
|
|
#endif /* CONFIG_TCG */
|
|
|
|
static void mips_cpu_class_init(ObjectClass *c, void *data)
|
|
{
|
|
MIPSCPUClass *mcc = MIPS_CPU_CLASS(c);
|
|
CPUClass *cc = CPU_CLASS(c);
|
|
DeviceClass *dc = DEVICE_CLASS(c);
|
|
|
|
device_class_set_parent_realize(dc, mips_cpu_realizefn,
|
|
&mcc->parent_realize);
|
|
device_class_set_parent_reset(dc, mips_cpu_reset, &mcc->parent_reset);
|
|
device_class_set_props(dc, mips_cpu_properties);
|
|
|
|
cc->class_by_name = mips_cpu_class_by_name;
|
|
cc->has_work = mips_cpu_has_work;
|
|
cc->dump_state = mips_cpu_dump_state;
|
|
cc->set_pc = mips_cpu_set_pc;
|
|
cc->gdb_read_register = mips_cpu_gdb_read_register;
|
|
cc->gdb_write_register = mips_cpu_gdb_write_register;
|
|
#ifndef CONFIG_USER_ONLY
|
|
cc->get_phys_page_debug = mips_cpu_get_phys_page_debug;
|
|
cc->vmsd = &vmstate_mips_cpu;
|
|
#endif
|
|
cc->disas_set_info = mips_cpu_disas_set_info;
|
|
cc->gdb_num_core_regs = 73;
|
|
cc->gdb_stop_before_watchpoint = true;
|
|
#ifdef CONFIG_TCG
|
|
cc->tcg_ops = &mips_tcg_ops;
|
|
#endif /* CONFIG_TCG */
|
|
}
|
|
|
|
static const TypeInfo mips_cpu_type_info = {
|
|
.name = TYPE_MIPS_CPU,
|
|
.parent = TYPE_CPU,
|
|
.instance_size = sizeof(MIPSCPU),
|
|
.instance_init = mips_cpu_initfn,
|
|
.abstract = true,
|
|
.class_size = sizeof(MIPSCPUClass),
|
|
.class_init = mips_cpu_class_init,
|
|
};
|
|
|
|
static void mips_cpu_cpudef_class_init(ObjectClass *oc, void *data)
|
|
{
|
|
MIPSCPUClass *mcc = MIPS_CPU_CLASS(oc);
|
|
mcc->cpu_def = data;
|
|
}
|
|
|
|
static void mips_register_cpudef_type(const struct mips_def_t *def)
|
|
{
|
|
char *typename = mips_cpu_type_name(def->name);
|
|
TypeInfo ti = {
|
|
.name = typename,
|
|
.parent = TYPE_MIPS_CPU,
|
|
.class_init = mips_cpu_cpudef_class_init,
|
|
.class_data = (void *)def,
|
|
};
|
|
|
|
type_register(&ti);
|
|
g_free(typename);
|
|
}
|
|
|
|
static void mips_cpu_register_types(void)
|
|
{
|
|
int i;
|
|
|
|
type_register_static(&mips_cpu_type_info);
|
|
for (i = 0; i < mips_defs_number; i++) {
|
|
mips_register_cpudef_type(&mips_defs[i]);
|
|
}
|
|
}
|
|
|
|
type_init(mips_cpu_register_types)
|
|
|
|
static void mips_cpu_add_definition(gpointer data, gpointer user_data)
|
|
{
|
|
ObjectClass *oc = data;
|
|
CpuDefinitionInfoList **cpu_list = user_data;
|
|
CpuDefinitionInfo *info;
|
|
const char *typename;
|
|
|
|
typename = object_class_get_name(oc);
|
|
info = g_malloc0(sizeof(*info));
|
|
info->name = g_strndup(typename,
|
|
strlen(typename) - strlen("-" TYPE_MIPS_CPU));
|
|
info->q_typename = g_strdup(typename);
|
|
|
|
QAPI_LIST_PREPEND(*cpu_list, info);
|
|
}
|
|
|
|
CpuDefinitionInfoList *qmp_query_cpu_definitions(Error **errp)
|
|
{
|
|
CpuDefinitionInfoList *cpu_list = NULL;
|
|
GSList *list;
|
|
|
|
list = object_class_get_list(TYPE_MIPS_CPU, false);
|
|
g_slist_foreach(list, mips_cpu_add_definition, &cpu_list);
|
|
g_slist_free(list);
|
|
|
|
return cpu_list;
|
|
}
|
|
|
|
/* Could be used by generic CPU object */
|
|
MIPSCPU *mips_cpu_create_with_clock(const char *cpu_type, Clock *cpu_refclk)
|
|
{
|
|
DeviceState *cpu;
|
|
|
|
cpu = DEVICE(object_new(cpu_type));
|
|
qdev_connect_clock_in(cpu, "clk-in", cpu_refclk);
|
|
qdev_realize(cpu, NULL, &error_abort);
|
|
|
|
return MIPS_CPU(cpu);
|
|
}
|
|
|
|
bool cpu_supports_isa(const CPUMIPSState *env, uint64_t isa_mask)
|
|
{
|
|
return (env->cpu_model->insn_flags & isa_mask) != 0;
|
|
}
|
|
|
|
bool cpu_type_supports_isa(const char *cpu_type, uint64_t isa)
|
|
{
|
|
const MIPSCPUClass *mcc = MIPS_CPU_CLASS(object_class_by_name(cpu_type));
|
|
return (mcc->cpu_def->insn_flags & isa) != 0;
|
|
}
|
|
|
|
bool cpu_type_supports_cps_smp(const char *cpu_type)
|
|
{
|
|
const MIPSCPUClass *mcc = MIPS_CPU_CLASS(object_class_by_name(cpu_type));
|
|
return (mcc->cpu_def->CP0_Config3 & (1 << CP0C3_CMGCR)) != 0;
|
|
}
|