4 * Copyright (c) 2016-2017 Sagar Karandikar, sagark@eecs.berkeley.edu
5 * Copyright (c) 2017-2018 SiFive, Inc.
7 * This program is free software; you can redistribute it and/or modify it
8 * under the terms and conditions of the GNU General Public License,
9 * version 2 or later, as published by the Free Software Foundation.
11 * This program is distributed in the hope it will be useful, but WITHOUT
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
16 * You should have received a copy of the GNU General Public License along with
17 * this program. If not, see <http://www.gnu.org/licenses/>.
20 #include "qemu/osdep.h"
21 #include "qemu/qemu-print.h"
22 #include "qemu/ctype.h"
25 #include "exec/exec-all.h"
26 #include "qapi/error.h"
27 #include "qemu/error-report.h"
28 #include "hw/qdev-properties.h"
29 #include "migration/vmstate.h"
30 #include "fpu/softfloat-helpers.h"
32 /* RISC-V CPU definitions */
34 static const char riscv_exts
[26] = "IEMAFDQCLBJTPVNSUHKORWXYZG";
36 const char * const riscv_int_regnames
[] = {
37 "x0/zero", "x1/ra", "x2/sp", "x3/gp", "x4/tp", "x5/t0", "x6/t1",
38 "x7/t2", "x8/s0", "x9/s1", "x10/a0", "x11/a1", "x12/a2", "x13/a3",
39 "x14/a4", "x15/a5", "x16/a6", "x17/a7", "x18/s2", "x19/s3", "x20/s4",
40 "x21/s5", "x22/s6", "x23/s7", "x24/s8", "x25/s9", "x26/s10", "x27/s11",
41 "x28/t3", "x29/t4", "x30/t5", "x31/t6"
44 const char * const riscv_fpr_regnames
[] = {
45 "f0/ft0", "f1/ft1", "f2/ft2", "f3/ft3", "f4/ft4", "f5/ft5",
46 "f6/ft6", "f7/ft7", "f8/fs0", "f9/fs1", "f10/fa0", "f11/fa1",
47 "f12/fa2", "f13/fa3", "f14/fa4", "f15/fa5", "f16/fa6", "f17/fa7",
48 "f18/fs2", "f19/fs3", "f20/fs4", "f21/fs5", "f22/fs6", "f23/fs7",
49 "f24/fs8", "f25/fs9", "f26/fs10", "f27/fs11", "f28/ft8", "f29/ft9",
50 "f30/ft10", "f31/ft11"
53 const char * const riscv_excp_names
[] = {
56 "illegal_instruction",
74 "guest_exec_page_fault",
75 "guest_load_page_fault",
77 "guest_store_page_fault",
80 const char * const riscv_intr_names
[] = {
99 static void set_misa(CPURISCVState
*env
, target_ulong misa
)
101 env
->misa_mask
= env
->misa
= misa
;
104 static void set_priv_version(CPURISCVState
*env
, int priv_ver
)
106 env
->priv_ver
= priv_ver
;
109 static void set_vext_version(CPURISCVState
*env
, int vext_ver
)
111 env
->vext_ver
= vext_ver
;
114 static void set_feature(CPURISCVState
*env
, int feature
)
116 env
->features
|= (1ULL << feature
);
119 static void set_resetvec(CPURISCVState
*env
, int resetvec
)
121 #ifndef CONFIG_USER_ONLY
122 env
->resetvec
= resetvec
;
126 static void riscv_any_cpu_init(Object
*obj
)
128 CPURISCVState
*env
= &RISCV_CPU(obj
)->env
;
129 set_misa(env
, RVXLEN
| RVI
| RVM
| RVA
| RVF
| RVD
| RVC
| RVU
);
130 set_priv_version(env
, PRIV_VERSION_1_11_0
);
131 set_resetvec(env
, DEFAULT_RSTVEC
);
134 static void riscv_base_cpu_init(Object
*obj
)
136 CPURISCVState
*env
= &RISCV_CPU(obj
)->env
;
137 /* We set this in the realise function */
139 set_resetvec(env
, DEFAULT_RSTVEC
);
142 static void rvxx_sifive_u_cpu_init(Object
*obj
)
144 CPURISCVState
*env
= &RISCV_CPU(obj
)->env
;
145 set_misa(env
, RVXLEN
| RVI
| RVM
| RVA
| RVF
| RVD
| RVC
| RVS
| RVU
);
146 set_priv_version(env
, PRIV_VERSION_1_10_0
);
147 set_resetvec(env
, 0x1004);
150 static void rvxx_sifive_e_cpu_init(Object
*obj
)
152 CPURISCVState
*env
= &RISCV_CPU(obj
)->env
;
153 set_misa(env
, RVXLEN
| RVI
| RVM
| RVA
| RVC
| RVU
);
154 set_priv_version(env
, PRIV_VERSION_1_10_0
);
155 set_resetvec(env
, 0x1004);
156 qdev_prop_set_bit(DEVICE(obj
), "mmu", false);
159 #if defined(TARGET_RISCV32)
161 static void rv32_ibex_cpu_init(Object
*obj
)
163 CPURISCVState
*env
= &RISCV_CPU(obj
)->env
;
164 set_misa(env
, RV32
| RVI
| RVM
| RVC
| RVU
);
165 set_priv_version(env
, PRIV_VERSION_1_10_0
);
166 set_resetvec(env
, 0x8090);
167 qdev_prop_set_bit(DEVICE(obj
), "mmu", false);
170 static void rv32_imafcu_nommu_cpu_init(Object
*obj
)
172 CPURISCVState
*env
= &RISCV_CPU(obj
)->env
;
173 set_misa(env
, RV32
| RVI
| RVM
| RVA
| RVF
| RVC
| RVU
);
174 set_priv_version(env
, PRIV_VERSION_1_10_0
);
175 set_resetvec(env
, DEFAULT_RSTVEC
);
176 qdev_prop_set_bit(DEVICE(obj
), "mmu", false);
181 static ObjectClass
*riscv_cpu_class_by_name(const char *cpu_model
)
187 cpuname
= g_strsplit(cpu_model
, ",", 1);
188 typename
= g_strdup_printf(RISCV_CPU_TYPE_NAME("%s"), cpuname
[0]);
189 oc
= object_class_by_name(typename
);
192 if (!oc
|| !object_class_dynamic_cast(oc
, TYPE_RISCV_CPU
) ||
193 object_class_is_abstract(oc
)) {
199 static void riscv_cpu_dump_state(CPUState
*cs
, FILE *f
, int flags
)
201 RISCVCPU
*cpu
= RISCV_CPU(cs
);
202 CPURISCVState
*env
= &cpu
->env
;
205 #if !defined(CONFIG_USER_ONLY)
206 if (riscv_has_ext(env
, RVH
)) {
207 qemu_fprintf(f
, " %s %d\n", "V = ", riscv_cpu_virt_enabled(env
));
210 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "pc ", env
->pc
);
211 #ifndef CONFIG_USER_ONLY
212 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mhartid ", env
->mhartid
);
213 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mstatus ", env
->mstatus
);
214 #ifdef TARGET_RISCV32
215 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mstatush ", env
->mstatush
);
217 if (riscv_has_ext(env
, RVH
)) {
218 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "hstatus ", env
->hstatus
);
219 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "vsstatus ", env
->vsstatus
);
221 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mip ", env
->mip
);
222 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mie ", env
->mie
);
223 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mideleg ", env
->mideleg
);
224 if (riscv_has_ext(env
, RVH
)) {
225 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "hideleg ", env
->hideleg
);
227 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "medeleg ", env
->medeleg
);
228 if (riscv_has_ext(env
, RVH
)) {
229 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "hedeleg ", env
->hedeleg
);
231 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mtvec ", env
->mtvec
);
232 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "stvec ", env
->stvec
);
233 if (riscv_has_ext(env
, RVH
)) {
234 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "vstvec ", env
->vstvec
);
236 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mepc ", env
->mepc
);
237 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "sepc ", env
->sepc
);
238 if (riscv_has_ext(env
, RVH
)) {
239 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "vsepc ", env
->vsepc
);
241 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mcause ", env
->mcause
);
242 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "scause ", env
->scause
);
243 if (riscv_has_ext(env
, RVH
)) {
244 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "vscause ", env
->vscause
);
246 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mtval ", env
->mtval
);
247 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "stval ", env
->sbadaddr
);
248 if (riscv_has_ext(env
, RVH
)) {
249 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "htval ", env
->htval
);
250 qemu_fprintf(f
, " %s " TARGET_FMT_lx
"\n", "mtval2 ", env
->mtval2
);
254 for (i
= 0; i
< 32; i
++) {
255 qemu_fprintf(f
, " %s " TARGET_FMT_lx
,
256 riscv_int_regnames
[i
], env
->gpr
[i
]);
258 qemu_fprintf(f
, "\n");
261 if (flags
& CPU_DUMP_FPU
) {
262 for (i
= 0; i
< 32; i
++) {
263 qemu_fprintf(f
, " %s %016" PRIx64
,
264 riscv_fpr_regnames
[i
], env
->fpr
[i
]);
266 qemu_fprintf(f
, "\n");
272 static void riscv_cpu_set_pc(CPUState
*cs
, vaddr value
)
274 RISCVCPU
*cpu
= RISCV_CPU(cs
);
275 CPURISCVState
*env
= &cpu
->env
;
279 static void riscv_cpu_synchronize_from_tb(CPUState
*cs
, TranslationBlock
*tb
)
281 RISCVCPU
*cpu
= RISCV_CPU(cs
);
282 CPURISCVState
*env
= &cpu
->env
;
286 static bool riscv_cpu_has_work(CPUState
*cs
)
288 #ifndef CONFIG_USER_ONLY
289 RISCVCPU
*cpu
= RISCV_CPU(cs
);
290 CPURISCVState
*env
= &cpu
->env
;
292 * Definition of the WFI instruction requires it to ignore the privilege
293 * mode and delegation registers, but respect individual enables
295 return (env
->mip
& env
->mie
) != 0;
301 void restore_state_to_opc(CPURISCVState
*env
, TranslationBlock
*tb
,
307 static void riscv_cpu_reset(DeviceState
*dev
)
309 CPUState
*cs
= CPU(dev
);
310 RISCVCPU
*cpu
= RISCV_CPU(cs
);
311 RISCVCPUClass
*mcc
= RISCV_CPU_GET_CLASS(cpu
);
312 CPURISCVState
*env
= &cpu
->env
;
314 mcc
->parent_reset(dev
);
315 #ifndef CONFIG_USER_ONLY
317 env
->mstatus
&= ~(MSTATUS_MIE
| MSTATUS_MPRV
);
319 env
->pc
= env
->resetvec
;
321 cs
->exception_index
= EXCP_NONE
;
323 set_default_nan_mode(1, &env
->fp_status
);
326 static void riscv_cpu_disas_set_info(CPUState
*s
, disassemble_info
*info
)
328 #if defined(TARGET_RISCV32)
329 info
->print_insn
= print_insn_riscv32
;
330 #elif defined(TARGET_RISCV64)
331 info
->print_insn
= print_insn_riscv64
;
335 static void riscv_cpu_realize(DeviceState
*dev
, Error
**errp
)
337 CPUState
*cs
= CPU(dev
);
338 RISCVCPU
*cpu
= RISCV_CPU(dev
);
339 CPURISCVState
*env
= &cpu
->env
;
340 RISCVCPUClass
*mcc
= RISCV_CPU_GET_CLASS(dev
);
341 int priv_version
= PRIV_VERSION_1_11_0
;
342 int vext_version
= VEXT_VERSION_0_07_1
;
343 target_ulong target_misa
= 0;
344 Error
*local_err
= NULL
;
346 cpu_exec_realizefn(cs
, &local_err
);
347 if (local_err
!= NULL
) {
348 error_propagate(errp
, local_err
);
352 if (cpu
->cfg
.priv_spec
) {
353 if (!g_strcmp0(cpu
->cfg
.priv_spec
, "v1.11.0")) {
354 priv_version
= PRIV_VERSION_1_11_0
;
355 } else if (!g_strcmp0(cpu
->cfg
.priv_spec
, "v1.10.0")) {
356 priv_version
= PRIV_VERSION_1_10_0
;
359 "Unsupported privilege spec version '%s'",
365 set_priv_version(env
, priv_version
);
366 set_vext_version(env
, vext_version
);
369 set_feature(env
, RISCV_FEATURE_MMU
);
373 set_feature(env
, RISCV_FEATURE_PMP
);
376 /* If misa isn't set (rv32 and rv64 machines) set it here */
378 /* Do some ISA extension error checking */
379 if (cpu
->cfg
.ext_i
&& cpu
->cfg
.ext_e
) {
381 "I and E extensions are incompatible");
385 if (!cpu
->cfg
.ext_i
&& !cpu
->cfg
.ext_e
) {
387 "Either I or E extension must be set");
391 if (cpu
->cfg
.ext_g
&& !(cpu
->cfg
.ext_i
& cpu
->cfg
.ext_m
&
392 cpu
->cfg
.ext_a
& cpu
->cfg
.ext_f
&
394 warn_report("Setting G will also set IMAFD");
395 cpu
->cfg
.ext_i
= true;
396 cpu
->cfg
.ext_m
= true;
397 cpu
->cfg
.ext_a
= true;
398 cpu
->cfg
.ext_f
= true;
399 cpu
->cfg
.ext_d
= true;
402 /* Set the ISA extensions, checks should have happened above */
403 if (cpu
->cfg
.ext_i
) {
406 if (cpu
->cfg
.ext_e
) {
409 if (cpu
->cfg
.ext_m
) {
412 if (cpu
->cfg
.ext_a
) {
415 if (cpu
->cfg
.ext_f
) {
418 if (cpu
->cfg
.ext_d
) {
421 if (cpu
->cfg
.ext_c
) {
424 if (cpu
->cfg
.ext_s
) {
427 if (cpu
->cfg
.ext_u
) {
430 if (cpu
->cfg
.ext_h
) {
434 set_misa(env
, RVXLEN
| target_misa
);
437 riscv_cpu_register_gdb_regs_for_features(cs
);
442 mcc
->parent_realize(dev
, errp
);
445 static void riscv_cpu_init(Object
*obj
)
447 RISCVCPU
*cpu
= RISCV_CPU(obj
);
449 cpu_set_cpustate_pointers(cpu
);
452 #ifndef CONFIG_USER_ONLY
453 static const VMStateDescription vmstate_riscv_cpu
= {
459 static Property riscv_cpu_properties
[] = {
460 DEFINE_PROP_BOOL("i", RISCVCPU
, cfg
.ext_i
, true),
461 DEFINE_PROP_BOOL("e", RISCVCPU
, cfg
.ext_e
, false),
462 DEFINE_PROP_BOOL("g", RISCVCPU
, cfg
.ext_g
, true),
463 DEFINE_PROP_BOOL("m", RISCVCPU
, cfg
.ext_m
, true),
464 DEFINE_PROP_BOOL("a", RISCVCPU
, cfg
.ext_a
, true),
465 DEFINE_PROP_BOOL("f", RISCVCPU
, cfg
.ext_f
, true),
466 DEFINE_PROP_BOOL("d", RISCVCPU
, cfg
.ext_d
, true),
467 DEFINE_PROP_BOOL("c", RISCVCPU
, cfg
.ext_c
, true),
468 DEFINE_PROP_BOOL("s", RISCVCPU
, cfg
.ext_s
, true),
469 DEFINE_PROP_BOOL("u", RISCVCPU
, cfg
.ext_u
, true),
470 /* This is experimental so mark with 'x-' */
471 DEFINE_PROP_BOOL("x-h", RISCVCPU
, cfg
.ext_h
, false),
472 DEFINE_PROP_BOOL("Counters", RISCVCPU
, cfg
.ext_counters
, true),
473 DEFINE_PROP_BOOL("Zifencei", RISCVCPU
, cfg
.ext_ifencei
, true),
474 DEFINE_PROP_BOOL("Zicsr", RISCVCPU
, cfg
.ext_icsr
, true),
475 DEFINE_PROP_STRING("priv_spec", RISCVCPU
, cfg
.priv_spec
),
476 DEFINE_PROP_BOOL("mmu", RISCVCPU
, cfg
.mmu
, true),
477 DEFINE_PROP_BOOL("pmp", RISCVCPU
, cfg
.pmp
, true),
478 DEFINE_PROP_END_OF_LIST(),
481 static void riscv_cpu_class_init(ObjectClass
*c
, void *data
)
483 RISCVCPUClass
*mcc
= RISCV_CPU_CLASS(c
);
484 CPUClass
*cc
= CPU_CLASS(c
);
485 DeviceClass
*dc
= DEVICE_CLASS(c
);
487 device_class_set_parent_realize(dc
, riscv_cpu_realize
,
488 &mcc
->parent_realize
);
490 device_class_set_parent_reset(dc
, riscv_cpu_reset
, &mcc
->parent_reset
);
492 cc
->class_by_name
= riscv_cpu_class_by_name
;
493 cc
->has_work
= riscv_cpu_has_work
;
494 cc
->do_interrupt
= riscv_cpu_do_interrupt
;
495 cc
->cpu_exec_interrupt
= riscv_cpu_exec_interrupt
;
496 cc
->dump_state
= riscv_cpu_dump_state
;
497 cc
->set_pc
= riscv_cpu_set_pc
;
498 cc
->synchronize_from_tb
= riscv_cpu_synchronize_from_tb
;
499 cc
->gdb_read_register
= riscv_cpu_gdb_read_register
;
500 cc
->gdb_write_register
= riscv_cpu_gdb_write_register
;
501 cc
->gdb_num_core_regs
= 33;
502 #if defined(TARGET_RISCV32)
503 cc
->gdb_core_xml_file
= "riscv-32bit-cpu.xml";
504 #elif defined(TARGET_RISCV64)
505 cc
->gdb_core_xml_file
= "riscv-64bit-cpu.xml";
507 cc
->gdb_stop_before_watchpoint
= true;
508 cc
->disas_set_info
= riscv_cpu_disas_set_info
;
509 #ifndef CONFIG_USER_ONLY
510 cc
->do_transaction_failed
= riscv_cpu_do_transaction_failed
;
511 cc
->do_unaligned_access
= riscv_cpu_do_unaligned_access
;
512 cc
->get_phys_page_debug
= riscv_cpu_get_phys_page_debug
;
513 /* For now, mark unmigratable: */
514 cc
->vmsd
= &vmstate_riscv_cpu
;
517 cc
->tcg_initialize
= riscv_translate_init
;
518 cc
->tlb_fill
= riscv_cpu_tlb_fill
;
520 device_class_set_props(dc
, riscv_cpu_properties
);
523 char *riscv_isa_string(RISCVCPU
*cpu
)
526 const size_t maxlen
= sizeof("rv128") + sizeof(riscv_exts
) + 1;
527 char *isa_str
= g_new(char, maxlen
);
528 char *p
= isa_str
+ snprintf(isa_str
, maxlen
, "rv%d", TARGET_LONG_BITS
);
529 for (i
= 0; i
< sizeof(riscv_exts
); i
++) {
530 if (cpu
->env
.misa
& RV(riscv_exts
[i
])) {
531 *p
++ = qemu_tolower(riscv_exts
[i
]);
538 static gint
riscv_cpu_list_compare(gconstpointer a
, gconstpointer b
)
540 ObjectClass
*class_a
= (ObjectClass
*)a
;
541 ObjectClass
*class_b
= (ObjectClass
*)b
;
542 const char *name_a
, *name_b
;
544 name_a
= object_class_get_name(class_a
);
545 name_b
= object_class_get_name(class_b
);
546 return strcmp(name_a
, name_b
);
549 static void riscv_cpu_list_entry(gpointer data
, gpointer user_data
)
551 const char *typename
= object_class_get_name(OBJECT_CLASS(data
));
552 int len
= strlen(typename
) - strlen(RISCV_CPU_TYPE_SUFFIX
);
554 qemu_printf("%.*s\n", len
, typename
);
557 void riscv_cpu_list(void)
561 list
= object_class_get_list(TYPE_RISCV_CPU
, false);
562 list
= g_slist_sort(list
, riscv_cpu_list_compare
);
563 g_slist_foreach(list
, riscv_cpu_list_entry
, NULL
);
567 #define DEFINE_CPU(type_name, initfn) \
570 .parent = TYPE_RISCV_CPU, \
571 .instance_init = initfn \
574 static const TypeInfo riscv_cpu_type_infos
[] = {
576 .name
= TYPE_RISCV_CPU
,
578 .instance_size
= sizeof(RISCVCPU
),
579 .instance_init
= riscv_cpu_init
,
581 .class_size
= sizeof(RISCVCPUClass
),
582 .class_init
= riscv_cpu_class_init
,
584 DEFINE_CPU(TYPE_RISCV_CPU_ANY
, riscv_any_cpu_init
),
585 #if defined(TARGET_RISCV32)
586 DEFINE_CPU(TYPE_RISCV_CPU_BASE32
, riscv_base_cpu_init
),
587 DEFINE_CPU(TYPE_RISCV_CPU_IBEX
, rv32_ibex_cpu_init
),
588 DEFINE_CPU(TYPE_RISCV_CPU_SIFIVE_E31
, rvxx_sifive_e_cpu_init
),
589 DEFINE_CPU(TYPE_RISCV_CPU_SIFIVE_E34
, rv32_imafcu_nommu_cpu_init
),
590 DEFINE_CPU(TYPE_RISCV_CPU_SIFIVE_U34
, rvxx_sifive_u_cpu_init
),
591 #elif defined(TARGET_RISCV64)
592 DEFINE_CPU(TYPE_RISCV_CPU_BASE64
, riscv_base_cpu_init
),
593 DEFINE_CPU(TYPE_RISCV_CPU_SIFIVE_E51
, rvxx_sifive_e_cpu_init
),
594 DEFINE_CPU(TYPE_RISCV_CPU_SIFIVE_U54
, rvxx_sifive_u_cpu_init
),
598 DEFINE_TYPES(riscv_cpu_type_infos
)