1
2
3
4
5
6
7
8
9#include "hw/cpu/core.h"
10#include "hw/ppc/spapr_cpu_core.h"
11#include "target/ppc/cpu.h"
12#include "hw/ppc/spapr.h"
13#include "hw/boards.h"
14#include "qapi/error.h"
15#include "sysemu/cpus.h"
16#include "sysemu/kvm.h"
17#include "target/ppc/kvm_ppc.h"
18#include "hw/ppc/ppc.h"
19#include "target/ppc/mmu-hash64.h"
20#include "sysemu/numa.h"
21#include "qemu/error-report.h"
22
23void spapr_cpu_parse_features(sPAPRMachineState *spapr)
24{
25
26
27
28
29
30
31
32
33
34
35 gchar **inpieces;
36 int i, j;
37 gchar *compat_str = NULL;
38
39 inpieces = g_strsplit(MACHINE(spapr)->cpu_model, ",", 0);
40
41
42 i = 1;
43 j = 1;
44 while (inpieces[i]) {
45 if (g_str_has_prefix(inpieces[i], "compat=")) {
46
47 g_free(compat_str);
48 compat_str = inpieces[i];
49 } else {
50 j++;
51 }
52
53 i++;
54
55 inpieces[j] = inpieces[i];
56 }
57
58 if (compat_str) {
59 char *val = compat_str + strlen("compat=");
60 gchar *newprops = g_strjoinv(",", inpieces);
61
62 object_property_set_str(OBJECT(spapr), val, "max-cpu-compat",
63 &error_fatal);
64
65 ppc_cpu_parse_features(newprops);
66 g_free(newprops);
67 } else {
68 ppc_cpu_parse_features(MACHINE(spapr)->cpu_model);
69 }
70
71 g_strfreev(inpieces);
72}
73
74static void spapr_cpu_reset(void *opaque)
75{
76 sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
77 PowerPCCPU *cpu = opaque;
78 CPUState *cs = CPU(cpu);
79 CPUPPCState *env = &cpu->env;
80
81 cpu_reset(cs);
82
83
84
85
86 cs->halted = 1;
87
88 env->spr[SPR_HIOR] = 0;
89
90
91
92
93
94
95 if (kvm_enabled()) {
96 env->spr[SPR_SDR1] = (target_ulong)(uintptr_t)spapr->htab
97 | (spapr->htab_shift - 18);
98 if (kvmppc_put_books_sregs(cpu) < 0) {
99 error_report("Unable to update SDR1 in KVM");
100 exit(1);
101 }
102 }
103}
104
105static void spapr_cpu_destroy(PowerPCCPU *cpu)
106{
107 qemu_unregister_reset(spapr_cpu_reset, cpu);
108}
109
110static void spapr_cpu_init(sPAPRMachineState *spapr, PowerPCCPU *cpu,
111 Error **errp)
112{
113 CPUPPCState *env = &cpu->env;
114
115
116 cpu_ppc_tb_init(env, SPAPR_TIMEBASE_FREQ);
117
118
119 cpu_ppc_set_papr(cpu, PPC_VIRTUAL_HYPERVISOR(spapr));
120
121 qemu_register_reset(spapr_cpu_reset, cpu);
122 spapr_cpu_reset(cpu);
123}
124
125
126
127
128
129char *spapr_get_cpu_core_type(const char *model)
130{
131 char *core_type;
132 gchar **model_pieces = g_strsplit(model, ",", 2);
133
134 core_type = g_strdup_printf("%s-%s", model_pieces[0], TYPE_SPAPR_CPU_CORE);
135
136
137 if (!object_class_by_name(core_type)) {
138 const char *realmodel;
139
140 g_free(core_type);
141 core_type = NULL;
142 realmodel = ppc_cpu_lookup_alias(model_pieces[0]);
143 if (realmodel) {
144 core_type = spapr_get_cpu_core_type(realmodel);
145 }
146 }
147
148 g_strfreev(model_pieces);
149 return core_type;
150}
151
152static void spapr_cpu_core_unrealizefn(DeviceState *dev, Error **errp)
153{
154 sPAPRCPUCore *sc = SPAPR_CPU_CORE(OBJECT(dev));
155 sPAPRCPUCoreClass *scc = SPAPR_CPU_CORE_GET_CLASS(OBJECT(dev));
156 const char *typename = object_class_get_name(scc->cpu_class);
157 size_t size = object_type_get_instance_size(typename);
158 CPUCore *cc = CPU_CORE(dev);
159 int i;
160
161 for (i = 0; i < cc->nr_threads; i++) {
162 void *obj = sc->threads + i * size;
163 DeviceState *dev = DEVICE(obj);
164 CPUState *cs = CPU(dev);
165 PowerPCCPU *cpu = POWERPC_CPU(cs);
166
167 spapr_cpu_destroy(cpu);
168 object_unparent(cpu->intc);
169 cpu_remove_sync(cs);
170 object_unparent(obj);
171 }
172 g_free(sc->threads);
173}
174
175static void spapr_cpu_core_realize_child(Object *child, Error **errp)
176{
177 Error *local_err = NULL;
178 sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
179 CPUState *cs = CPU(child);
180 PowerPCCPU *cpu = POWERPC_CPU(cs);
181 Object *obj;
182
183 object_property_set_bool(child, true, "realized", &local_err);
184 if (local_err) {
185 goto error;
186 }
187
188 spapr_cpu_init(spapr, cpu, &local_err);
189 if (local_err) {
190 goto error;
191 }
192
193 obj = object_new(spapr->icp_type);
194 object_property_add_child(child, "icp", obj, &error_abort);
195 object_unref(obj);
196 object_property_add_const_link(obj, ICP_PROP_XICS, OBJECT(spapr),
197 &error_abort);
198 object_property_add_const_link(obj, ICP_PROP_CPU, child, &error_abort);
199 object_property_set_bool(obj, true, "realized", &local_err);
200 if (local_err) {
201 goto free_icp;
202 }
203
204 return;
205
206free_icp:
207 object_unparent(obj);
208error:
209 error_propagate(errp, local_err);
210}
211
212static void spapr_cpu_core_realize(DeviceState *dev, Error **errp)
213{
214 sPAPRCPUCore *sc = SPAPR_CPU_CORE(OBJECT(dev));
215 sPAPRCPUCoreClass *scc = SPAPR_CPU_CORE_GET_CLASS(OBJECT(dev));
216 CPUCore *cc = CPU_CORE(OBJECT(dev));
217 const char *typename = object_class_get_name(scc->cpu_class);
218 size_t size = object_type_get_instance_size(typename);
219 Error *local_err = NULL;
220 void *obj;
221 int i, j;
222
223 sc->threads = g_malloc0(size * cc->nr_threads);
224 for (i = 0; i < cc->nr_threads; i++) {
225 char id[32];
226 CPUState *cs;
227 PowerPCCPU *cpu;
228
229 obj = sc->threads + i * size;
230
231 object_initialize(obj, size, typename);
232 cs = CPU(obj);
233 cpu = POWERPC_CPU(cs);
234 cs->cpu_index = cc->core_id + i;
235
236
237 cpu->node_id = sc->node_id;
238
239 snprintf(id, sizeof(id), "thread[%d]", i);
240 object_property_add_child(OBJECT(sc), id, obj, &local_err);
241 if (local_err) {
242 goto err;
243 }
244 object_unref(obj);
245 }
246
247 for (j = 0; j < cc->nr_threads; j++) {
248 obj = sc->threads + j * size;
249
250 spapr_cpu_core_realize_child(obj, &local_err);
251 if (local_err) {
252 goto err;
253 }
254 }
255 return;
256
257err:
258 while (--i >= 0) {
259 obj = sc->threads + i * size;
260 object_unparent(obj);
261 }
262 g_free(sc->threads);
263 error_propagate(errp, local_err);
264}
265
266static const char *spapr_core_models[] = {
267
268 "970_v2.2",
269
270
271 "970MP_v1.0",
272 "970mp_v1.0",
273 "970MP_v1.1",
274 "970mp_v1.1",
275
276
277 "POWER5+_v2.1",
278
279
280 "POWER7_v2.3",
281
282
283 "POWER7+_v2.1",
284
285
286 "POWER8_v2.0",
287
288
289 "POWER8E_v2.1",
290
291
292 "POWER8NVL_v1.0",
293
294
295 "POWER9_v1.0",
296};
297
298static Property spapr_cpu_core_properties[] = {
299 DEFINE_PROP_INT32("node-id", sPAPRCPUCore, node_id, CPU_UNSET_NUMA_NODE_ID),
300 DEFINE_PROP_END_OF_LIST()
301};
302
303void spapr_cpu_core_class_init(ObjectClass *oc, void *data)
304{
305 DeviceClass *dc = DEVICE_CLASS(oc);
306 sPAPRCPUCoreClass *scc = SPAPR_CPU_CORE_CLASS(oc);
307
308 dc->realize = spapr_cpu_core_realize;
309 dc->unrealize = spapr_cpu_core_unrealizefn;
310 dc->props = spapr_cpu_core_properties;
311 scc->cpu_class = cpu_class_by_name(TYPE_POWERPC_CPU, data);
312 g_assert(scc->cpu_class);
313}
314
315static const TypeInfo spapr_cpu_core_type_info = {
316 .name = TYPE_SPAPR_CPU_CORE,
317 .parent = TYPE_CPU_CORE,
318 .abstract = true,
319 .instance_size = sizeof(sPAPRCPUCore),
320 .class_size = sizeof(sPAPRCPUCoreClass),
321};
322
323static void spapr_cpu_core_register_types(void)
324{
325 int i;
326
327 type_register_static(&spapr_cpu_core_type_info);
328
329 for (i = 0; i < ARRAY_SIZE(spapr_core_models); i++) {
330 TypeInfo type_info = {
331 .parent = TYPE_SPAPR_CPU_CORE,
332 .instance_size = sizeof(sPAPRCPUCore),
333 .class_init = spapr_cpu_core_class_init,
334 .class_data = (void *) spapr_core_models[i],
335 };
336
337 type_info.name = g_strdup_printf("%s-" TYPE_SPAPR_CPU_CORE,
338 spapr_core_models[i]);
339 type_register(&type_info);
340 g_free((void *)type_info.name);
341 }
342}
343
344type_init(spapr_cpu_core_register_types)
345