xref: /qemu/target/xtensa/cpu.c (revision 513823e7521a09ed7ad1e32e6454bac3b2cbf52d)
1 /*
2  * QEMU Xtensa CPU
3  *
4  * Copyright (c) 2011, Max Filippov, Open Source and Linux Lab.
5  * Copyright (c) 2012 SUSE LINUX Products GmbH
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions are met:
10  *     * Redistributions of source code must retain the above copyright
11  *       notice, this list of conditions and the following disclaimer.
12  *     * Redistributions in binary form must reproduce the above copyright
13  *       notice, this list of conditions and the following disclaimer in the
14  *       documentation and/or other materials provided with the distribution.
15  *     * Neither the name of the Open Source and Linux Lab nor the
16  *       names of its contributors may be used to endorse or promote products
17  *       derived from this software without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
20  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
23  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
24  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
25  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
26  * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
28  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29  */
30 
31 #include "qemu/osdep.h"
32 #include "qapi/error.h"
33 #include "cpu.h"
34 #include "fpu/softfloat.h"
35 #include "qemu/module.h"
36 #include "migration/vmstate.h"
37 #include "hw/qdev-clock.h"
38 #ifndef CONFIG_USER_ONLY
39 #include "exec/memory.h"
40 #endif
41 
42 
43 static void xtensa_cpu_set_pc(CPUState *cs, vaddr value)
44 {
45     XtensaCPU *cpu = XTENSA_CPU(cs);
46 
47     cpu->env.pc = value;
48 }
49 
50 static vaddr xtensa_cpu_get_pc(CPUState *cs)
51 {
52     XtensaCPU *cpu = XTENSA_CPU(cs);
53 
54     return cpu->env.pc;
55 }
56 
57 static void xtensa_restore_state_to_opc(CPUState *cs,
58                                         const TranslationBlock *tb,
59                                         const uint64_t *data)
60 {
61     XtensaCPU *cpu = XTENSA_CPU(cs);
62 
63     cpu->env.pc = data[0];
64 }
65 
66 static bool xtensa_cpu_has_work(CPUState *cs)
67 {
68 #ifndef CONFIG_USER_ONLY
69     XtensaCPU *cpu = XTENSA_CPU(cs);
70 
71     return !cpu->env.runstall && cpu->env.pending_irq_level;
72 #else
73     return true;
74 #endif
75 }
76 
77 static int xtensa_cpu_mmu_index(CPUState *cs, bool ifetch)
78 {
79     return xtensa_get_cring(cpu_env(cs));
80 }
81 
82 #ifdef CONFIG_USER_ONLY
83 static bool abi_call0;
84 
85 void xtensa_set_abi_call0(void)
86 {
87     abi_call0 = true;
88 }
89 
90 bool xtensa_abi_call0(void)
91 {
92     return abi_call0;
93 }
94 #endif
95 
96 static void xtensa_cpu_reset_hold(Object *obj, ResetType type)
97 {
98     CPUState *cs = CPU(obj);
99     XtensaCPUClass *xcc = XTENSA_CPU_GET_CLASS(obj);
100     CPUXtensaState *env = cpu_env(cs);
101     bool dfpu = xtensa_option_enabled(env->config,
102                                       XTENSA_OPTION_DFP_COPROCESSOR);
103 
104     if (xcc->parent_phases.hold) {
105         xcc->parent_phases.hold(obj, type);
106     }
107 
108     env->pc = env->config->exception_vector[EXC_RESET0 + env->static_vectors];
109     env->sregs[LITBASE] &= ~1;
110 #ifndef CONFIG_USER_ONLY
111     env->sregs[PS] = xtensa_option_enabled(env->config,
112             XTENSA_OPTION_INTERRUPT) ? 0x1f : 0x10;
113     env->pending_irq_level = 0;
114 #else
115     env->sregs[PS] = PS_UM | (3 << PS_RING_SHIFT);
116     if (xtensa_option_enabled(env->config,
117                               XTENSA_OPTION_WINDOWED_REGISTER) &&
118         !xtensa_abi_call0()) {
119         env->sregs[PS] |= PS_WOE;
120     }
121     env->sregs[CPENABLE] = 0xff;
122 #endif
123     env->sregs[VECBASE] = env->config->vecbase;
124     env->sregs[IBREAKENABLE] = 0;
125     env->sregs[MEMCTL] = MEMCTL_IL0EN & env->config->memctl_mask;
126     env->sregs[ATOMCTL] = xtensa_option_enabled(env->config,
127             XTENSA_OPTION_ATOMCTL) ? 0x28 : 0x15;
128     env->sregs[CONFIGID0] = env->config->configid[0];
129     env->sregs[CONFIGID1] = env->config->configid[1];
130     env->exclusive_addr = -1;
131 
132 #ifndef CONFIG_USER_ONLY
133     reset_mmu(env);
134     cs->halted = env->runstall;
135 #endif
136     /* For inf * 0 + NaN, return the input NaN */
137     set_float_infzeronan_rule(float_infzeronan_dnan_never, &env->fp_status);
138     set_no_signaling_nans(!dfpu, &env->fp_status);
139     /* Default NaN value: sign bit clear, set frac msb */
140     set_float_default_nan_pattern(0b01000000, &env->fp_status);
141     xtensa_use_first_nan(env, !dfpu);
142 }
143 
144 static ObjectClass *xtensa_cpu_class_by_name(const char *cpu_model)
145 {
146     ObjectClass *oc;
147     char *typename;
148 
149     typename = g_strdup_printf(XTENSA_CPU_TYPE_NAME("%s"), cpu_model);
150     oc = object_class_by_name(typename);
151     g_free(typename);
152 
153     return oc;
154 }
155 
156 static void xtensa_cpu_disas_set_info(CPUState *cs, disassemble_info *info)
157 {
158     XtensaCPU *cpu = XTENSA_CPU(cs);
159 
160     info->private_data = cpu->env.config->isa;
161     info->print_insn = print_insn_xtensa;
162 }
163 
164 static void xtensa_cpu_realizefn(DeviceState *dev, Error **errp)
165 {
166     CPUState *cs = CPU(dev);
167     XtensaCPUClass *xcc = XTENSA_CPU_GET_CLASS(dev);
168     Error *local_err = NULL;
169 
170 #ifndef CONFIG_USER_ONLY
171     xtensa_irq_init(&XTENSA_CPU(dev)->env);
172 #endif
173 
174     cpu_exec_realizefn(cs, &local_err);
175     if (local_err != NULL) {
176         error_propagate(errp, local_err);
177         return;
178     }
179 
180     cs->gdb_num_regs = xcc->config->gdb_regmap.num_regs;
181 
182     qemu_init_vcpu(cs);
183 
184     xcc->parent_realize(dev, errp);
185 }
186 
187 static void xtensa_cpu_initfn(Object *obj)
188 {
189     XtensaCPU *cpu = XTENSA_CPU(obj);
190     XtensaCPUClass *xcc = XTENSA_CPU_GET_CLASS(obj);
191     CPUXtensaState *env = &cpu->env;
192 
193     env->config = xcc->config;
194 
195 #ifndef CONFIG_USER_ONLY
196     env->address_space_er = g_malloc(sizeof(*env->address_space_er));
197     env->system_er = g_malloc(sizeof(*env->system_er));
198     memory_region_init_io(env->system_er, obj, NULL, env, "er",
199                           UINT64_C(0x100000000));
200     address_space_init(env->address_space_er, env->system_er, "ER");
201 
202     cpu->clock = qdev_init_clock_in(DEVICE(obj), "clk-in", NULL, cpu, 0);
203     clock_set_hz(cpu->clock, env->config->clock_freq_khz * 1000);
204 #endif
205 }
206 
207 XtensaCPU *xtensa_cpu_create_with_clock(const char *cpu_type, Clock *cpu_refclk)
208 {
209     DeviceState *cpu;
210 
211     cpu = qdev_new(cpu_type);
212     qdev_connect_clock_in(cpu, "clk-in", cpu_refclk);
213     qdev_realize(cpu, NULL, &error_abort);
214 
215     return XTENSA_CPU(cpu);
216 }
217 
218 #ifndef CONFIG_USER_ONLY
219 static const VMStateDescription vmstate_xtensa_cpu = {
220     .name = "cpu",
221     .unmigratable = 1,
222 };
223 
224 #include "hw/core/sysemu-cpu-ops.h"
225 
226 static const struct SysemuCPUOps xtensa_sysemu_ops = {
227     .get_phys_page_debug = xtensa_cpu_get_phys_page_debug,
228 };
229 #endif
230 
231 #include "hw/core/tcg-cpu-ops.h"
232 
233 static const TCGCPUOps xtensa_tcg_ops = {
234     .initialize = xtensa_translate_init,
235     .translate_code = xtensa_translate_code,
236     .debug_excp_handler = xtensa_breakpoint_handler,
237     .restore_state_to_opc = xtensa_restore_state_to_opc,
238 
239 #ifndef CONFIG_USER_ONLY
240     .tlb_fill = xtensa_cpu_tlb_fill,
241     .cpu_exec_interrupt = xtensa_cpu_exec_interrupt,
242     .cpu_exec_halt = xtensa_cpu_has_work,
243     .do_interrupt = xtensa_cpu_do_interrupt,
244     .do_transaction_failed = xtensa_cpu_do_transaction_failed,
245     .do_unaligned_access = xtensa_cpu_do_unaligned_access,
246     .debug_check_breakpoint = xtensa_debug_check_breakpoint,
247 #endif /* !CONFIG_USER_ONLY */
248 };
249 
250 static void xtensa_cpu_class_init(ObjectClass *oc, void *data)
251 {
252     DeviceClass *dc = DEVICE_CLASS(oc);
253     CPUClass *cc = CPU_CLASS(oc);
254     XtensaCPUClass *xcc = XTENSA_CPU_CLASS(cc);
255     ResettableClass *rc = RESETTABLE_CLASS(oc);
256 
257     device_class_set_parent_realize(dc, xtensa_cpu_realizefn,
258                                     &xcc->parent_realize);
259 
260     resettable_class_set_parent_phases(rc, NULL, xtensa_cpu_reset_hold, NULL,
261                                        &xcc->parent_phases);
262 
263     cc->class_by_name = xtensa_cpu_class_by_name;
264     cc->has_work = xtensa_cpu_has_work;
265     cc->mmu_index = xtensa_cpu_mmu_index;
266     cc->dump_state = xtensa_cpu_dump_state;
267     cc->set_pc = xtensa_cpu_set_pc;
268     cc->get_pc = xtensa_cpu_get_pc;
269     cc->gdb_read_register = xtensa_cpu_gdb_read_register;
270     cc->gdb_write_register = xtensa_cpu_gdb_write_register;
271     cc->gdb_stop_before_watchpoint = true;
272 #ifndef CONFIG_USER_ONLY
273     cc->sysemu_ops = &xtensa_sysemu_ops;
274     dc->vmsd = &vmstate_xtensa_cpu;
275 #endif
276     cc->disas_set_info = xtensa_cpu_disas_set_info;
277     cc->tcg_ops = &xtensa_tcg_ops;
278 }
279 
280 static const TypeInfo xtensa_cpu_type_info = {
281     .name = TYPE_XTENSA_CPU,
282     .parent = TYPE_CPU,
283     .instance_size = sizeof(XtensaCPU),
284     .instance_align = __alignof(XtensaCPU),
285     .instance_init = xtensa_cpu_initfn,
286     .abstract = true,
287     .class_size = sizeof(XtensaCPUClass),
288     .class_init = xtensa_cpu_class_init,
289 };
290 
291 static void xtensa_cpu_register_types(void)
292 {
293     type_register_static(&xtensa_cpu_type_info);
294 }
295 
296 type_init(xtensa_cpu_register_types)
297