2 * QEMU Motorola 68k CPU
4 * Copyright (c) 2012 SUSE LINUX Products GmbH
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, see
18 * <http://www.gnu.org/licenses/lgpl-2.1.html>
21 #include "qemu/osdep.h"
22 #include "qapi/error.h"
24 #include "qemu-common.h"
25 #include "migration/vmstate.h"
26 #include "exec/exec-all.h"
29 static void m68k_cpu_set_pc(CPUState
*cs
, vaddr value
)
31 M68kCPU
*cpu
= M68K_CPU(cs
);
36 static bool m68k_cpu_has_work(CPUState
*cs
)
38 return cs
->interrupt_request
& CPU_INTERRUPT_HARD
;
41 static void m68k_set_feature(CPUM68KState
*env
, int feature
)
43 env
->features
|= (1u << feature
);
46 /* CPUClass::reset() */
47 static void m68k_cpu_reset(CPUState
*s
)
49 M68kCPU
*cpu
= M68K_CPU(s
);
50 M68kCPUClass
*mcc
= M68K_CPU_GET_CLASS(cpu
);
51 CPUM68KState
*env
= &cpu
->env
;
52 floatx80 nan
= floatx80_default_nan(NULL
);
57 memset(env
, 0, offsetof(CPUM68KState
, end_reset_fields
));
58 #if !defined(CONFIG_USER_ONLY)
62 for (i
= 0; i
< 8; i
++) {
63 env
->fregs
[i
].d
= nan
;
65 cpu_m68k_set_fpcr(env
, 0);
68 cpu_m68k_set_ccr(env
, 0);
69 /* TODO: We should set PC from the interrupt vector. */
73 static void m68k_cpu_disas_set_info(CPUState
*s
, disassemble_info
*info
)
75 M68kCPU
*cpu
= M68K_CPU(s
);
76 CPUM68KState
*env
= &cpu
->env
;
77 info
->print_insn
= print_insn_m68k
;
78 if (m68k_feature(env
, M68K_FEATURE_M68000
)) {
79 info
->mach
= bfd_mach_m68040
;
85 static ObjectClass
*m68k_cpu_class_by_name(const char *cpu_model
)
90 typename
= g_strdup_printf(M68K_CPU_TYPE_NAME("%s"), cpu_model
);
91 oc
= object_class_by_name(typename
);
93 if (oc
!= NULL
&& (object_class_dynamic_cast(oc
, TYPE_M68K_CPU
) == NULL
||
94 object_class_is_abstract(oc
))) {
100 static void m5206_cpu_initfn(Object
*obj
)
102 M68kCPU
*cpu
= M68K_CPU(obj
);
103 CPUM68KState
*env
= &cpu
->env
;
105 m68k_set_feature(env
, M68K_FEATURE_CF_ISA_A
);
108 static void m68000_cpu_initfn(Object
*obj
)
110 M68kCPU
*cpu
= M68K_CPU(obj
);
111 CPUM68KState
*env
= &cpu
->env
;
113 m68k_set_feature(env
, M68K_FEATURE_M68000
);
114 m68k_set_feature(env
, M68K_FEATURE_USP
);
115 m68k_set_feature(env
, M68K_FEATURE_WORD_INDEX
);
118 static void m68020_cpu_initfn(Object
*obj
)
120 M68kCPU
*cpu
= M68K_CPU(obj
);
121 CPUM68KState
*env
= &cpu
->env
;
123 m68k_set_feature(env
, M68K_FEATURE_M68000
);
124 m68k_set_feature(env
, M68K_FEATURE_USP
);
125 m68k_set_feature(env
, M68K_FEATURE_WORD_INDEX
);
126 m68k_set_feature(env
, M68K_FEATURE_QUAD_MULDIV
);
127 m68k_set_feature(env
, M68K_FEATURE_BRAL
);
128 m68k_set_feature(env
, M68K_FEATURE_BCCL
);
129 m68k_set_feature(env
, M68K_FEATURE_BITFIELD
);
130 m68k_set_feature(env
, M68K_FEATURE_EXT_FULL
);
131 m68k_set_feature(env
, M68K_FEATURE_SCALED_INDEX
);
132 m68k_set_feature(env
, M68K_FEATURE_LONG_MULDIV
);
133 m68k_set_feature(env
, M68K_FEATURE_FPU
);
134 m68k_set_feature(env
, M68K_FEATURE_CAS
);
135 m68k_set_feature(env
, M68K_FEATURE_BKPT
);
136 m68k_set_feature(env
, M68K_FEATURE_RTD
);
138 #define m68030_cpu_initfn m68020_cpu_initfn
139 #define m68040_cpu_initfn m68020_cpu_initfn
141 static void m68060_cpu_initfn(Object
*obj
)
143 M68kCPU
*cpu
= M68K_CPU(obj
);
144 CPUM68KState
*env
= &cpu
->env
;
146 m68k_set_feature(env
, M68K_FEATURE_M68000
);
147 m68k_set_feature(env
, M68K_FEATURE_USP
);
148 m68k_set_feature(env
, M68K_FEATURE_WORD_INDEX
);
149 m68k_set_feature(env
, M68K_FEATURE_BRAL
);
150 m68k_set_feature(env
, M68K_FEATURE_BCCL
);
151 m68k_set_feature(env
, M68K_FEATURE_BITFIELD
);
152 m68k_set_feature(env
, M68K_FEATURE_EXT_FULL
);
153 m68k_set_feature(env
, M68K_FEATURE_SCALED_INDEX
);
154 m68k_set_feature(env
, M68K_FEATURE_LONG_MULDIV
);
155 m68k_set_feature(env
, M68K_FEATURE_FPU
);
156 m68k_set_feature(env
, M68K_FEATURE_CAS
);
157 m68k_set_feature(env
, M68K_FEATURE_BKPT
);
158 m68k_set_feature(env
, M68K_FEATURE_RTD
);
161 static void m5208_cpu_initfn(Object
*obj
)
163 M68kCPU
*cpu
= M68K_CPU(obj
);
164 CPUM68KState
*env
= &cpu
->env
;
166 m68k_set_feature(env
, M68K_FEATURE_CF_ISA_A
);
167 m68k_set_feature(env
, M68K_FEATURE_CF_ISA_APLUSC
);
168 m68k_set_feature(env
, M68K_FEATURE_BRAL
);
169 m68k_set_feature(env
, M68K_FEATURE_CF_EMAC
);
170 m68k_set_feature(env
, M68K_FEATURE_USP
);
173 static void cfv4e_cpu_initfn(Object
*obj
)
175 M68kCPU
*cpu
= M68K_CPU(obj
);
176 CPUM68KState
*env
= &cpu
->env
;
178 m68k_set_feature(env
, M68K_FEATURE_CF_ISA_A
);
179 m68k_set_feature(env
, M68K_FEATURE_CF_ISA_B
);
180 m68k_set_feature(env
, M68K_FEATURE_BRAL
);
181 m68k_set_feature(env
, M68K_FEATURE_CF_FPU
);
182 m68k_set_feature(env
, M68K_FEATURE_CF_EMAC
);
183 m68k_set_feature(env
, M68K_FEATURE_USP
);
186 static void any_cpu_initfn(Object
*obj
)
188 M68kCPU
*cpu
= M68K_CPU(obj
);
189 CPUM68KState
*env
= &cpu
->env
;
191 m68k_set_feature(env
, M68K_FEATURE_CF_ISA_A
);
192 m68k_set_feature(env
, M68K_FEATURE_CF_ISA_B
);
193 m68k_set_feature(env
, M68K_FEATURE_CF_ISA_APLUSC
);
194 m68k_set_feature(env
, M68K_FEATURE_BRAL
);
195 m68k_set_feature(env
, M68K_FEATURE_CF_FPU
);
196 /* MAC and EMAC are mututally exclusive, so pick EMAC.
197 It's mostly backwards compatible. */
198 m68k_set_feature(env
, M68K_FEATURE_CF_EMAC
);
199 m68k_set_feature(env
, M68K_FEATURE_CF_EMAC_B
);
200 m68k_set_feature(env
, M68K_FEATURE_USP
);
201 m68k_set_feature(env
, M68K_FEATURE_EXT_FULL
);
202 m68k_set_feature(env
, M68K_FEATURE_WORD_INDEX
);
205 static void m68k_cpu_realizefn(DeviceState
*dev
, Error
**errp
)
207 CPUState
*cs
= CPU(dev
);
208 M68kCPU
*cpu
= M68K_CPU(dev
);
209 M68kCPUClass
*mcc
= M68K_CPU_GET_CLASS(dev
);
210 Error
*local_err
= NULL
;
212 register_m68k_insns(&cpu
->env
);
214 cpu_exec_realizefn(cs
, &local_err
);
215 if (local_err
!= NULL
) {
216 error_propagate(errp
, local_err
);
220 m68k_cpu_init_gdb(cpu
);
225 mcc
->parent_realize(dev
, errp
);
228 static void m68k_cpu_initfn(Object
*obj
)
230 CPUState
*cs
= CPU(obj
);
231 M68kCPU
*cpu
= M68K_CPU(obj
);
232 CPUM68KState
*env
= &cpu
->env
;
237 static const VMStateDescription vmstate_m68k_cpu
= {
242 static void m68k_cpu_class_init(ObjectClass
*c
, void *data
)
244 M68kCPUClass
*mcc
= M68K_CPU_CLASS(c
);
245 CPUClass
*cc
= CPU_CLASS(c
);
246 DeviceClass
*dc
= DEVICE_CLASS(c
);
248 mcc
->parent_realize
= dc
->realize
;
249 dc
->realize
= m68k_cpu_realizefn
;
251 mcc
->parent_reset
= cc
->reset
;
252 cc
->reset
= m68k_cpu_reset
;
254 cc
->class_by_name
= m68k_cpu_class_by_name
;
255 cc
->has_work
= m68k_cpu_has_work
;
256 cc
->do_interrupt
= m68k_cpu_do_interrupt
;
257 cc
->cpu_exec_interrupt
= m68k_cpu_exec_interrupt
;
258 cc
->dump_state
= m68k_cpu_dump_state
;
259 cc
->set_pc
= m68k_cpu_set_pc
;
260 cc
->gdb_read_register
= m68k_cpu_gdb_read_register
;
261 cc
->gdb_write_register
= m68k_cpu_gdb_write_register
;
262 #ifdef CONFIG_USER_ONLY
263 cc
->handle_mmu_fault
= m68k_cpu_handle_mmu_fault
;
265 cc
->get_phys_page_debug
= m68k_cpu_get_phys_page_debug
;
267 cc
->disas_set_info
= m68k_cpu_disas_set_info
;
268 cc
->tcg_initialize
= m68k_tcg_init
;
270 cc
->gdb_num_core_regs
= 18;
271 cc
->gdb_core_xml_file
= "cf-core.xml";
273 dc
->vmsd
= &vmstate_m68k_cpu
;
276 #define DEFINE_M68K_CPU_TYPE(cpu_model, initfn) \
278 .name = M68K_CPU_TYPE_NAME(cpu_model), \
279 .instance_init = initfn, \
280 .parent = TYPE_M68K_CPU, \
283 static const TypeInfo m68k_cpus_type_infos
[] = {
284 { /* base class should be registered first */
285 .name
= TYPE_M68K_CPU
,
287 .instance_size
= sizeof(M68kCPU
),
288 .instance_init
= m68k_cpu_initfn
,
290 .class_size
= sizeof(M68kCPUClass
),
291 .class_init
= m68k_cpu_class_init
,
293 DEFINE_M68K_CPU_TYPE("m68000", m68000_cpu_initfn
),
294 DEFINE_M68K_CPU_TYPE("m68020", m68020_cpu_initfn
),
295 DEFINE_M68K_CPU_TYPE("m68030", m68030_cpu_initfn
),
296 DEFINE_M68K_CPU_TYPE("m68040", m68040_cpu_initfn
),
297 DEFINE_M68K_CPU_TYPE("m68060", m68060_cpu_initfn
),
298 DEFINE_M68K_CPU_TYPE("m5206", m5206_cpu_initfn
),
299 DEFINE_M68K_CPU_TYPE("m5208", m5208_cpu_initfn
),
300 DEFINE_M68K_CPU_TYPE("cfv4e", cfv4e_cpu_initfn
),
301 DEFINE_M68K_CPU_TYPE("any", any_cpu_initfn
),
304 DEFINE_TYPES(m68k_cpus_type_infos
)