1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24#include "qemu/osdep.h"
25#include "qapi/error.h"
26#include "cpu.h"
27#include "qemu-common.h"
28#include "mmu.h"
29
30
31static void cris_cpu_set_pc(CPUState *cs, vaddr value)
32{
33 CRISCPU *cpu = CRIS_CPU(cs);
34
35 cpu->env.pc = value;
36}
37
38static bool cris_cpu_has_work(CPUState *cs)
39{
40 return cs->interrupt_request & (CPU_INTERRUPT_HARD | CPU_INTERRUPT_NMI);
41}
42
43
44static void cris_cpu_reset(CPUState *s)
45{
46 CRISCPU *cpu = CRIS_CPU(s);
47 CRISCPUClass *ccc = CRIS_CPU_GET_CLASS(cpu);
48 CPUCRISState *env = &cpu->env;
49 uint32_t vr;
50
51 ccc->parent_reset(s);
52
53 vr = env->pregs[PR_VR];
54 memset(env, 0, offsetof(CPUCRISState, load_info));
55 env->pregs[PR_VR] = vr;
56 tlb_flush(s, 1);
57
58#if defined(CONFIG_USER_ONLY)
59
60 env->pregs[PR_CCS] |= U_FLAG | I_FLAG | P_FLAG;
61#else
62 cris_mmu_init(env);
63 env->pregs[PR_CCS] = 0;
64#endif
65}
66
67static ObjectClass *cris_cpu_class_by_name(const char *cpu_model)
68{
69 ObjectClass *oc;
70 char *typename;
71
72 if (cpu_model == NULL) {
73 return NULL;
74 }
75
76#if defined(CONFIG_USER_ONLY)
77 if (strcasecmp(cpu_model, "any") == 0) {
78 return object_class_by_name("crisv32-" TYPE_CRIS_CPU);
79 }
80#endif
81
82 typename = g_strdup_printf("%s-" TYPE_CRIS_CPU, cpu_model);
83 oc = object_class_by_name(typename);
84 g_free(typename);
85 if (oc != NULL && (!object_class_dynamic_cast(oc, TYPE_CRIS_CPU) ||
86 object_class_is_abstract(oc))) {
87 oc = NULL;
88 }
89 return oc;
90}
91
92CRISCPU *cpu_cris_init(const char *cpu_model)
93{
94 return CRIS_CPU(cpu_generic_init(TYPE_CRIS_CPU, cpu_model));
95}
96
97
98static gint cris_cpu_list_compare(gconstpointer a, gconstpointer b)
99{
100 CRISCPUClass *ccc_a = CRIS_CPU_CLASS(a);
101 CRISCPUClass *ccc_b = CRIS_CPU_CLASS(b);
102
103
104 if (ccc_a->vr > ccc_b->vr) {
105 return 1;
106 } else if (ccc_a->vr < ccc_b->vr) {
107 return -1;
108 } else {
109 return 0;
110 }
111}
112
113static void cris_cpu_list_entry(gpointer data, gpointer user_data)
114{
115 ObjectClass *oc = data;
116 CPUListState *s = user_data;
117 const char *typename = object_class_get_name(oc);
118 char *name;
119
120 name = g_strndup(typename, strlen(typename) - strlen("-" TYPE_CRIS_CPU));
121 (*s->cpu_fprintf)(s->file, " %s\n", name);
122 g_free(name);
123}
124
125void cris_cpu_list(FILE *f, fprintf_function cpu_fprintf)
126{
127 CPUListState s = {
128 .file = f,
129 .cpu_fprintf = cpu_fprintf,
130 };
131 GSList *list;
132
133 list = object_class_get_list(TYPE_CRIS_CPU, false);
134 list = g_slist_sort(list, cris_cpu_list_compare);
135 (*cpu_fprintf)(f, "Available CPUs:\n");
136 g_slist_foreach(list, cris_cpu_list_entry, &s);
137 g_slist_free(list);
138}
139
140static void cris_cpu_realizefn(DeviceState *dev, Error **errp)
141{
142 CPUState *cs = CPU(dev);
143 CRISCPUClass *ccc = CRIS_CPU_GET_CLASS(dev);
144
145 cpu_reset(cs);
146 qemu_init_vcpu(cs);
147
148 ccc->parent_realize(dev, errp);
149}
150
151#ifndef CONFIG_USER_ONLY
152static void cris_cpu_set_irq(void *opaque, int irq, int level)
153{
154 CRISCPU *cpu = opaque;
155 CPUState *cs = CPU(cpu);
156 int type = irq == CRIS_CPU_IRQ ? CPU_INTERRUPT_HARD : CPU_INTERRUPT_NMI;
157
158 if (level) {
159 cpu_interrupt(cs, type);
160 } else {
161 cpu_reset_interrupt(cs, type);
162 }
163}
164#endif
165
166static void cris_disas_set_info(CPUState *cpu, disassemble_info *info)
167{
168 CRISCPU *cc = CRIS_CPU(cpu);
169 CPUCRISState *env = &cc->env;
170
171 if (env->pregs[PR_VR] != 32) {
172 info->mach = bfd_mach_cris_v0_v10;
173 info->print_insn = print_insn_crisv10;
174 } else {
175 info->mach = bfd_mach_cris_v32;
176 info->print_insn = print_insn_crisv32;
177 }
178}
179
180static void cris_cpu_initfn(Object *obj)
181{
182 CPUState *cs = CPU(obj);
183 CRISCPU *cpu = CRIS_CPU(obj);
184 CRISCPUClass *ccc = CRIS_CPU_GET_CLASS(obj);
185 CPUCRISState *env = &cpu->env;
186 static bool tcg_initialized;
187
188 cs->env_ptr = env;
189 cpu_exec_init(cs, &error_abort);
190
191 env->pregs[PR_VR] = ccc->vr;
192
193#ifndef CONFIG_USER_ONLY
194
195 qdev_init_gpio_in(DEVICE(cpu), cris_cpu_set_irq, 2);
196#endif
197
198 if (tcg_enabled() && !tcg_initialized) {
199 tcg_initialized = true;
200 if (env->pregs[PR_VR] < 32) {
201 cris_initialize_crisv10_tcg();
202 } else {
203 cris_initialize_tcg();
204 }
205 }
206}
207
208static void crisv8_cpu_class_init(ObjectClass *oc, void *data)
209{
210 CPUClass *cc = CPU_CLASS(oc);
211 CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
212
213 ccc->vr = 8;
214 cc->do_interrupt = crisv10_cpu_do_interrupt;
215 cc->gdb_read_register = crisv10_cpu_gdb_read_register;
216}
217
218static void crisv9_cpu_class_init(ObjectClass *oc, void *data)
219{
220 CPUClass *cc = CPU_CLASS(oc);
221 CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
222
223 ccc->vr = 9;
224 cc->do_interrupt = crisv10_cpu_do_interrupt;
225 cc->gdb_read_register = crisv10_cpu_gdb_read_register;
226}
227
228static void crisv10_cpu_class_init(ObjectClass *oc, void *data)
229{
230 CPUClass *cc = CPU_CLASS(oc);
231 CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
232
233 ccc->vr = 10;
234 cc->do_interrupt = crisv10_cpu_do_interrupt;
235 cc->gdb_read_register = crisv10_cpu_gdb_read_register;
236}
237
238static void crisv11_cpu_class_init(ObjectClass *oc, void *data)
239{
240 CPUClass *cc = CPU_CLASS(oc);
241 CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
242
243 ccc->vr = 11;
244 cc->do_interrupt = crisv10_cpu_do_interrupt;
245 cc->gdb_read_register = crisv10_cpu_gdb_read_register;
246}
247
248static void crisv32_cpu_class_init(ObjectClass *oc, void *data)
249{
250 CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
251
252 ccc->vr = 32;
253}
254
255#define TYPE(model) model "-" TYPE_CRIS_CPU
256
257static const TypeInfo cris_cpu_model_type_infos[] = {
258 {
259 .name = TYPE("crisv8"),
260 .parent = TYPE_CRIS_CPU,
261 .class_init = crisv8_cpu_class_init,
262 }, {
263 .name = TYPE("crisv9"),
264 .parent = TYPE_CRIS_CPU,
265 .class_init = crisv9_cpu_class_init,
266 }, {
267 .name = TYPE("crisv10"),
268 .parent = TYPE_CRIS_CPU,
269 .class_init = crisv10_cpu_class_init,
270 }, {
271 .name = TYPE("crisv11"),
272 .parent = TYPE_CRIS_CPU,
273 .class_init = crisv11_cpu_class_init,
274 }, {
275 .name = TYPE("crisv32"),
276 .parent = TYPE_CRIS_CPU,
277 .class_init = crisv32_cpu_class_init,
278 }
279};
280
281#undef TYPE
282
283static void cris_cpu_class_init(ObjectClass *oc, void *data)
284{
285 DeviceClass *dc = DEVICE_CLASS(oc);
286 CPUClass *cc = CPU_CLASS(oc);
287 CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
288
289 ccc->parent_realize = dc->realize;
290 dc->realize = cris_cpu_realizefn;
291
292 ccc->parent_reset = cc->reset;
293 cc->reset = cris_cpu_reset;
294
295 cc->class_by_name = cris_cpu_class_by_name;
296 cc->has_work = cris_cpu_has_work;
297 cc->do_interrupt = cris_cpu_do_interrupt;
298 cc->cpu_exec_interrupt = cris_cpu_exec_interrupt;
299 cc->dump_state = cris_cpu_dump_state;
300 cc->set_pc = cris_cpu_set_pc;
301 cc->gdb_read_register = cris_cpu_gdb_read_register;
302 cc->gdb_write_register = cris_cpu_gdb_write_register;
303#ifdef CONFIG_USER_ONLY
304 cc->handle_mmu_fault = cris_cpu_handle_mmu_fault;
305#else
306 cc->get_phys_page_debug = cris_cpu_get_phys_page_debug;
307 dc->vmsd = &vmstate_cris_cpu;
308#endif
309
310 cc->gdb_num_core_regs = 49;
311 cc->gdb_stop_before_watchpoint = true;
312
313 cc->disas_set_info = cris_disas_set_info;
314
315
316
317
318
319
320 dc->cannot_destroy_with_object_finalize_yet = true;
321}
322
323static const TypeInfo cris_cpu_type_info = {
324 .name = TYPE_CRIS_CPU,
325 .parent = TYPE_CPU,
326 .instance_size = sizeof(CRISCPU),
327 .instance_init = cris_cpu_initfn,
328 .abstract = true,
329 .class_size = sizeof(CRISCPUClass),
330 .class_init = cris_cpu_class_init,
331};
332
333static void cris_cpu_register_types(void)
334{
335 int i;
336
337 type_register_static(&cris_cpu_type_info);
338 for (i = 0; i < ARRAY_SIZE(cris_cpu_model_type_infos); i++) {
339 type_register_static(&cris_cpu_model_type_infos[i]);
340 }
341}
342
343type_init(cris_cpu_register_types)
344