2 * QEMU PowerPC PowerNV machine model
4 * Copyright (c) 2016, IBM Corporation.
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 <http://www.gnu.org/licenses/>.
20 #include "qemu/osdep.h"
21 #include "qemu-common.h"
22 #include "qemu/datadir.h"
23 #include "qemu/units.h"
24 #include "qemu/cutils.h"
25 #include "qapi/error.h"
26 #include "sysemu/qtest.h"
27 #include "sysemu/sysemu.h"
28 #include "sysemu/numa.h"
29 #include "sysemu/reset.h"
30 #include "sysemu/runstate.h"
31 #include "sysemu/cpus.h"
32 #include "sysemu/device_tree.h"
33 #include "sysemu/hw_accel.h"
34 #include "target/ppc/cpu.h"
35 #include "hw/ppc/fdt.h"
36 #include "hw/ppc/ppc.h"
37 #include "hw/ppc/pnv.h"
38 #include "hw/ppc/pnv_core.h"
39 #include "hw/loader.h"
41 #include "qapi/visitor.h"
42 #include "monitor/monitor.h"
43 #include "hw/intc/intc.h"
44 #include "hw/ipmi/ipmi.h"
45 #include "target/ppc/mmu-hash64.h"
46 #include "hw/pci/msi.h"
48 #include "hw/ppc/xics.h"
49 #include "hw/qdev-properties.h"
50 #include "hw/ppc/pnv_xscom.h"
51 #include "hw/ppc/pnv_pnor.h"
53 #include "hw/isa/isa.h"
54 #include "hw/char/serial.h"
55 #include "hw/rtc/mc146818rtc.h"
59 #define FDT_MAX_SIZE (1 * MiB)
61 #define FW_FILE_NAME "skiboot.lid"
62 #define FW_LOAD_ADDR 0x0
63 #define FW_MAX_SIZE (16 * MiB)
65 #define KERNEL_LOAD_ADDR 0x20000000
66 #define KERNEL_MAX_SIZE (128 * MiB)
67 #define INITRD_LOAD_ADDR 0x28000000
68 #define INITRD_MAX_SIZE (128 * MiB)
70 static const char *pnv_chip_core_typename(const PnvChip
*o
)
72 const char *chip_type
= object_class_get_name(object_get_class(OBJECT(o
)));
73 int len
= strlen(chip_type
) - strlen(PNV_CHIP_TYPE_SUFFIX
);
74 char *s
= g_strdup_printf(PNV_CORE_TYPE_NAME("%.*s"), len
, chip_type
);
75 const char *core_type
= object_class_get_name(object_class_by_name(s
));
81 * On Power Systems E880 (POWER8), the max cpus (threads) should be :
82 * 4 * 4 sockets * 12 cores * 8 threads = 1536
88 * Memory nodes are created by hostboot, one for each range of memory
89 * that has a different "affinity". In practice, it means one range
92 static void pnv_dt_memory(void *fdt
, int chip_id
, hwaddr start
, hwaddr size
)
95 uint64_t mem_reg_property
[2];
98 mem_reg_property
[0] = cpu_to_be64(start
);
99 mem_reg_property
[1] = cpu_to_be64(size
);
101 mem_name
= g_strdup_printf("memory@%"HWADDR_PRIx
, start
);
102 off
= fdt_add_subnode(fdt
, 0, mem_name
);
105 _FDT((fdt_setprop_string(fdt
, off
, "device_type", "memory")));
106 _FDT((fdt_setprop(fdt
, off
, "reg", mem_reg_property
,
107 sizeof(mem_reg_property
))));
108 _FDT((fdt_setprop_cell(fdt
, off
, "ibm,chip-id", chip_id
)));
111 static int get_cpus_node(void *fdt
)
113 int cpus_offset
= fdt_path_offset(fdt
, "/cpus");
115 if (cpus_offset
< 0) {
116 cpus_offset
= fdt_add_subnode(fdt
, 0, "cpus");
118 _FDT((fdt_setprop_cell(fdt
, cpus_offset
, "#address-cells", 0x1)));
119 _FDT((fdt_setprop_cell(fdt
, cpus_offset
, "#size-cells", 0x0)));
127 * The PowerNV cores (and threads) need to use real HW ids and not an
128 * incremental index like it has been done on other platforms. This HW
129 * id is stored in the CPU PIR, it is used to create cpu nodes in the
130 * device tree, used in XSCOM to address cores and in interrupt
133 static void pnv_dt_core(PnvChip
*chip
, PnvCore
*pc
, void *fdt
)
135 PowerPCCPU
*cpu
= pc
->threads
[0];
136 CPUState
*cs
= CPU(cpu
);
137 DeviceClass
*dc
= DEVICE_GET_CLASS(cs
);
138 int smt_threads
= CPU_CORE(pc
)->nr_threads
;
139 CPUPPCState
*env
= &cpu
->env
;
140 PowerPCCPUClass
*pcc
= POWERPC_CPU_GET_CLASS(cs
);
141 uint32_t servers_prop
[smt_threads
];
143 uint32_t segs
[] = {cpu_to_be32(28), cpu_to_be32(40),
144 0xffffffff, 0xffffffff};
145 uint32_t tbfreq
= PNV_TIMEBASE_FREQ
;
146 uint32_t cpufreq
= 1000000000;
147 uint32_t page_sizes_prop
[64];
148 size_t page_sizes_prop_size
;
149 const uint8_t pa_features
[] = { 24, 0,
150 0xf6, 0x3f, 0xc7, 0xc0, 0x80, 0xf0,
151 0x80, 0x00, 0x00, 0x00, 0x00, 0x00,
152 0x00, 0x00, 0x00, 0x00, 0x80, 0x00,
153 0x80, 0x00, 0x80, 0x00, 0x80, 0x00 };
156 int cpus_offset
= get_cpus_node(fdt
);
158 nodename
= g_strdup_printf("%s@%x", dc
->fw_name
, pc
->pir
);
159 offset
= fdt_add_subnode(fdt
, cpus_offset
, nodename
);
163 _FDT((fdt_setprop_cell(fdt
, offset
, "ibm,chip-id", chip
->chip_id
)));
165 _FDT((fdt_setprop_cell(fdt
, offset
, "reg", pc
->pir
)));
166 _FDT((fdt_setprop_cell(fdt
, offset
, "ibm,pir", pc
->pir
)));
167 _FDT((fdt_setprop_string(fdt
, offset
, "device_type", "cpu")));
169 _FDT((fdt_setprop_cell(fdt
, offset
, "cpu-version", env
->spr
[SPR_PVR
])));
170 _FDT((fdt_setprop_cell(fdt
, offset
, "d-cache-block-size",
171 env
->dcache_line_size
)));
172 _FDT((fdt_setprop_cell(fdt
, offset
, "d-cache-line-size",
173 env
->dcache_line_size
)));
174 _FDT((fdt_setprop_cell(fdt
, offset
, "i-cache-block-size",
175 env
->icache_line_size
)));
176 _FDT((fdt_setprop_cell(fdt
, offset
, "i-cache-line-size",
177 env
->icache_line_size
)));
179 if (pcc
->l1_dcache_size
) {
180 _FDT((fdt_setprop_cell(fdt
, offset
, "d-cache-size",
181 pcc
->l1_dcache_size
)));
183 warn_report("Unknown L1 dcache size for cpu");
185 if (pcc
->l1_icache_size
) {
186 _FDT((fdt_setprop_cell(fdt
, offset
, "i-cache-size",
187 pcc
->l1_icache_size
)));
189 warn_report("Unknown L1 icache size for cpu");
192 _FDT((fdt_setprop_cell(fdt
, offset
, "timebase-frequency", tbfreq
)));
193 _FDT((fdt_setprop_cell(fdt
, offset
, "clock-frequency", cpufreq
)));
194 _FDT((fdt_setprop_cell(fdt
, offset
, "ibm,slb-size",
195 cpu
->hash64_opts
->slb_size
)));
196 _FDT((fdt_setprop_string(fdt
, offset
, "status", "okay")));
197 _FDT((fdt_setprop(fdt
, offset
, "64-bit", NULL
, 0)));
199 if (ppc_has_spr(cpu
, SPR_PURR
)) {
200 _FDT((fdt_setprop(fdt
, offset
, "ibm,purr", NULL
, 0)));
203 if (ppc_hash64_has(cpu
, PPC_HASH64_1TSEG
)) {
204 _FDT((fdt_setprop(fdt
, offset
, "ibm,processor-segment-sizes",
205 segs
, sizeof(segs
))));
209 * Advertise VMX/VSX (vector extensions) if available
210 * 0 / no property == no vector extensions
211 * 1 == VMX / Altivec available
214 if (env
->insns_flags
& PPC_ALTIVEC
) {
215 uint32_t vmx
= (env
->insns_flags2
& PPC2_VSX
) ? 2 : 1;
217 _FDT((fdt_setprop_cell(fdt
, offset
, "ibm,vmx", vmx
)));
221 * Advertise DFP (Decimal Floating Point) if available
222 * 0 / no property == no DFP
225 if (env
->insns_flags2
& PPC2_DFP
) {
226 _FDT((fdt_setprop_cell(fdt
, offset
, "ibm,dfp", 1)));
229 page_sizes_prop_size
= ppc_create_page_sizes_prop(cpu
, page_sizes_prop
,
230 sizeof(page_sizes_prop
));
231 if (page_sizes_prop_size
) {
232 _FDT((fdt_setprop(fdt
, offset
, "ibm,segment-page-sizes",
233 page_sizes_prop
, page_sizes_prop_size
)));
236 _FDT((fdt_setprop(fdt
, offset
, "ibm,pa-features",
237 pa_features
, sizeof(pa_features
))));
239 /* Build interrupt servers properties */
240 for (i
= 0; i
< smt_threads
; i
++) {
241 servers_prop
[i
] = cpu_to_be32(pc
->pir
+ i
);
243 _FDT((fdt_setprop(fdt
, offset
, "ibm,ppc-interrupt-server#s",
244 servers_prop
, sizeof(servers_prop
))));
247 static void pnv_dt_icp(PnvChip
*chip
, void *fdt
, uint32_t pir
,
250 uint64_t addr
= PNV_ICP_BASE(chip
) | (pir
<< 12);
252 const char compat
[] = "IBM,power8-icp\0IBM,ppc-xicp";
253 uint32_t irange
[2], i
, rsize
;
257 irange
[0] = cpu_to_be32(pir
);
258 irange
[1] = cpu_to_be32(nr_threads
);
260 rsize
= sizeof(uint64_t) * 2 * nr_threads
;
261 reg
= g_malloc(rsize
);
262 for (i
= 0; i
< nr_threads
; i
++) {
263 reg
[i
* 2] = cpu_to_be64(addr
| ((pir
+ i
) * 0x1000));
264 reg
[i
* 2 + 1] = cpu_to_be64(0x1000);
267 name
= g_strdup_printf("interrupt-controller@%"PRIX64
, addr
);
268 offset
= fdt_add_subnode(fdt
, 0, name
);
272 _FDT((fdt_setprop(fdt
, offset
, "compatible", compat
, sizeof(compat
))));
273 _FDT((fdt_setprop(fdt
, offset
, "reg", reg
, rsize
)));
274 _FDT((fdt_setprop_string(fdt
, offset
, "device_type",
275 "PowerPC-External-Interrupt-Presentation")));
276 _FDT((fdt_setprop(fdt
, offset
, "interrupt-controller", NULL
, 0)));
277 _FDT((fdt_setprop(fdt
, offset
, "ibm,interrupt-server-ranges",
278 irange
, sizeof(irange
))));
279 _FDT((fdt_setprop_cell(fdt
, offset
, "#interrupt-cells", 1)));
280 _FDT((fdt_setprop_cell(fdt
, offset
, "#address-cells", 0)));
284 static void pnv_chip_power8_dt_populate(PnvChip
*chip
, void *fdt
)
286 static const char compat
[] = "ibm,power8-xscom\0ibm,xscom";
289 pnv_dt_xscom(chip
, fdt
, 0,
290 cpu_to_be64(PNV_XSCOM_BASE(chip
)),
291 cpu_to_be64(PNV_XSCOM_SIZE
),
292 compat
, sizeof(compat
));
294 for (i
= 0; i
< chip
->nr_cores
; i
++) {
295 PnvCore
*pnv_core
= chip
->cores
[i
];
297 pnv_dt_core(chip
, pnv_core
, fdt
);
299 /* Interrupt Control Presenters (ICP). One per core. */
300 pnv_dt_icp(chip
, fdt
, pnv_core
->pir
, CPU_CORE(pnv_core
)->nr_threads
);
303 if (chip
->ram_size
) {
304 pnv_dt_memory(fdt
, chip
->chip_id
, chip
->ram_start
, chip
->ram_size
);
308 static void pnv_chip_power9_dt_populate(PnvChip
*chip
, void *fdt
)
310 static const char compat
[] = "ibm,power9-xscom\0ibm,xscom";
313 pnv_dt_xscom(chip
, fdt
, 0,
314 cpu_to_be64(PNV9_XSCOM_BASE(chip
)),
315 cpu_to_be64(PNV9_XSCOM_SIZE
),
316 compat
, sizeof(compat
));
318 for (i
= 0; i
< chip
->nr_cores
; i
++) {
319 PnvCore
*pnv_core
= chip
->cores
[i
];
321 pnv_dt_core(chip
, pnv_core
, fdt
);
324 if (chip
->ram_size
) {
325 pnv_dt_memory(fdt
, chip
->chip_id
, chip
->ram_start
, chip
->ram_size
);
328 pnv_dt_lpc(chip
, fdt
, 0, PNV9_LPCM_BASE(chip
), PNV9_LPCM_SIZE
);
331 static void pnv_chip_power10_dt_populate(PnvChip
*chip
, void *fdt
)
333 static const char compat
[] = "ibm,power10-xscom\0ibm,xscom";
336 pnv_dt_xscom(chip
, fdt
, 0,
337 cpu_to_be64(PNV10_XSCOM_BASE(chip
)),
338 cpu_to_be64(PNV10_XSCOM_SIZE
),
339 compat
, sizeof(compat
));
341 for (i
= 0; i
< chip
->nr_cores
; i
++) {
342 PnvCore
*pnv_core
= chip
->cores
[i
];
344 pnv_dt_core(chip
, pnv_core
, fdt
);
347 if (chip
->ram_size
) {
348 pnv_dt_memory(fdt
, chip
->chip_id
, chip
->ram_start
, chip
->ram_size
);
351 pnv_dt_lpc(chip
, fdt
, 0, PNV10_LPCM_BASE(chip
), PNV10_LPCM_SIZE
);
354 static void pnv_dt_rtc(ISADevice
*d
, void *fdt
, int lpc_off
)
356 uint32_t io_base
= d
->ioport_id
;
357 uint32_t io_regs
[] = {
359 cpu_to_be32(io_base
),
365 name
= g_strdup_printf("%s@i%x", qdev_fw_name(DEVICE(d
)), io_base
);
366 node
= fdt_add_subnode(fdt
, lpc_off
, name
);
370 _FDT((fdt_setprop(fdt
, node
, "reg", io_regs
, sizeof(io_regs
))));
371 _FDT((fdt_setprop_string(fdt
, node
, "compatible", "pnpPNP,b00")));
374 static void pnv_dt_serial(ISADevice
*d
, void *fdt
, int lpc_off
)
376 const char compatible
[] = "ns16550\0pnpPNP,501";
377 uint32_t io_base
= d
->ioport_id
;
378 uint32_t io_regs
[] = {
380 cpu_to_be32(io_base
),
386 name
= g_strdup_printf("%s@i%x", qdev_fw_name(DEVICE(d
)), io_base
);
387 node
= fdt_add_subnode(fdt
, lpc_off
, name
);
391 _FDT((fdt_setprop(fdt
, node
, "reg", io_regs
, sizeof(io_regs
))));
392 _FDT((fdt_setprop(fdt
, node
, "compatible", compatible
,
393 sizeof(compatible
))));
395 _FDT((fdt_setprop_cell(fdt
, node
, "clock-frequency", 1843200)));
396 _FDT((fdt_setprop_cell(fdt
, node
, "current-speed", 115200)));
397 _FDT((fdt_setprop_cell(fdt
, node
, "interrupts", d
->isairq
[0])));
398 _FDT((fdt_setprop_cell(fdt
, node
, "interrupt-parent",
399 fdt_get_phandle(fdt
, lpc_off
))));
401 /* This is needed by Linux */
402 _FDT((fdt_setprop_string(fdt
, node
, "device_type", "serial")));
405 static void pnv_dt_ipmi_bt(ISADevice
*d
, void *fdt
, int lpc_off
)
407 const char compatible
[] = "bt\0ipmi-bt";
409 uint32_t io_regs
[] = {
411 0, /* 'io_base' retrieved from the 'ioport' property of 'isa-ipmi-bt' */
418 io_base
= object_property_get_int(OBJECT(d
), "ioport", &error_fatal
);
419 io_regs
[1] = cpu_to_be32(io_base
);
421 irq
= object_property_get_int(OBJECT(d
), "irq", &error_fatal
);
423 name
= g_strdup_printf("%s@i%x", qdev_fw_name(DEVICE(d
)), io_base
);
424 node
= fdt_add_subnode(fdt
, lpc_off
, name
);
428 _FDT((fdt_setprop(fdt
, node
, "reg", io_regs
, sizeof(io_regs
))));
429 _FDT((fdt_setprop(fdt
, node
, "compatible", compatible
,
430 sizeof(compatible
))));
432 /* Mark it as reserved to avoid Linux trying to claim it */
433 _FDT((fdt_setprop_string(fdt
, node
, "status", "reserved")));
434 _FDT((fdt_setprop_cell(fdt
, node
, "interrupts", irq
)));
435 _FDT((fdt_setprop_cell(fdt
, node
, "interrupt-parent",
436 fdt_get_phandle(fdt
, lpc_off
))));
439 typedef struct ForeachPopulateArgs
{
442 } ForeachPopulateArgs
;
444 static int pnv_dt_isa_device(DeviceState
*dev
, void *opaque
)
446 ForeachPopulateArgs
*args
= opaque
;
447 ISADevice
*d
= ISA_DEVICE(dev
);
449 if (object_dynamic_cast(OBJECT(dev
), TYPE_MC146818_RTC
)) {
450 pnv_dt_rtc(d
, args
->fdt
, args
->offset
);
451 } else if (object_dynamic_cast(OBJECT(dev
), TYPE_ISA_SERIAL
)) {
452 pnv_dt_serial(d
, args
->fdt
, args
->offset
);
453 } else if (object_dynamic_cast(OBJECT(dev
), "isa-ipmi-bt")) {
454 pnv_dt_ipmi_bt(d
, args
->fdt
, args
->offset
);
456 error_report("unknown isa device %s@i%x", qdev_fw_name(dev
),
464 * The default LPC bus of a multichip system is on chip 0. It's
465 * recognized by the firmware (skiboot) using a "primary" property.
467 static void pnv_dt_isa(PnvMachineState
*pnv
, void *fdt
)
469 int isa_offset
= fdt_path_offset(fdt
, pnv
->chips
[0]->dt_isa_nodename
);
470 ForeachPopulateArgs args
= {
472 .offset
= isa_offset
,
476 _FDT((fdt_setprop(fdt
, isa_offset
, "primary", NULL
, 0)));
478 phandle
= qemu_fdt_alloc_phandle(fdt
);
480 _FDT((fdt_setprop_cell(fdt
, isa_offset
, "phandle", phandle
)));
483 * ISA devices are not necessarily parented to the ISA bus so we
484 * can not use object_child_foreach()
486 qbus_walk_children(BUS(pnv
->isa_bus
), pnv_dt_isa_device
, NULL
, NULL
, NULL
,
490 static void pnv_dt_power_mgt(PnvMachineState
*pnv
, void *fdt
)
494 off
= fdt_add_subnode(fdt
, 0, "ibm,opal");
495 off
= fdt_add_subnode(fdt
, off
, "power-mgt");
497 _FDT(fdt_setprop_cell(fdt
, off
, "ibm,enabled-stop-levels", 0xc0000000));
500 static void *pnv_dt_create(MachineState
*machine
)
502 PnvMachineClass
*pmc
= PNV_MACHINE_GET_CLASS(machine
);
503 PnvMachineState
*pnv
= PNV_MACHINE(machine
);
509 fdt
= g_malloc0(FDT_MAX_SIZE
);
510 _FDT((fdt_create_empty_tree(fdt
, FDT_MAX_SIZE
)));
513 _FDT((fdt_add_subnode(fdt
, 0, "qemu")));
516 _FDT((fdt_setprop_cell(fdt
, 0, "#address-cells", 0x2)));
517 _FDT((fdt_setprop_cell(fdt
, 0, "#size-cells", 0x2)));
518 _FDT((fdt_setprop_string(fdt
, 0, "model",
519 "IBM PowerNV (emulated by qemu)")));
520 _FDT((fdt_setprop(fdt
, 0, "compatible", pmc
->compat
, pmc
->compat_size
)));
522 buf
= qemu_uuid_unparse_strdup(&qemu_uuid
);
523 _FDT((fdt_setprop_string(fdt
, 0, "vm,uuid", buf
)));
525 _FDT((fdt_property_string(fdt
, "system-id", buf
)));
529 off
= fdt_add_subnode(fdt
, 0, "chosen");
530 if (machine
->kernel_cmdline
) {
531 _FDT((fdt_setprop_string(fdt
, off
, "bootargs",
532 machine
->kernel_cmdline
)));
535 if (pnv
->initrd_size
) {
536 uint32_t start_prop
= cpu_to_be32(pnv
->initrd_base
);
537 uint32_t end_prop
= cpu_to_be32(pnv
->initrd_base
+ pnv
->initrd_size
);
539 _FDT((fdt_setprop(fdt
, off
, "linux,initrd-start",
540 &start_prop
, sizeof(start_prop
))));
541 _FDT((fdt_setprop(fdt
, off
, "linux,initrd-end",
542 &end_prop
, sizeof(end_prop
))));
545 /* Populate device tree for each chip */
546 for (i
= 0; i
< pnv
->num_chips
; i
++) {
547 PNV_CHIP_GET_CLASS(pnv
->chips
[i
])->dt_populate(pnv
->chips
[i
], fdt
);
550 /* Populate ISA devices on chip 0 */
551 pnv_dt_isa(pnv
, fdt
);
554 pnv_dt_bmc_sensors(pnv
->bmc
, fdt
);
557 /* Create an extra node for power management on machines that support it */
558 if (pmc
->dt_power_mgt
) {
559 pmc
->dt_power_mgt(pnv
, fdt
);
565 static void pnv_powerdown_notify(Notifier
*n
, void *opaque
)
567 PnvMachineState
*pnv
= container_of(n
, PnvMachineState
, powerdown_notifier
);
570 pnv_bmc_powerdown(pnv
->bmc
);
574 static void pnv_reset(MachineState
*machine
)
576 PnvMachineState
*pnv
= PNV_MACHINE(machine
);
580 qemu_devices_reset();
583 * The machine should provide by default an internal BMC simulator.
584 * If not, try to use the BMC device that was provided on the command
587 bmc
= pnv_bmc_find(&error_fatal
);
590 if (!qtest_enabled()) {
591 warn_report("machine has no BMC device. Use '-device "
592 "ipmi-bmc-sim,id=bmc0 -device isa-ipmi-bt,bmc=bmc0,irq=10' "
596 pnv_bmc_set_pnor(bmc
, pnv
->pnor
);
601 fdt
= pnv_dt_create(machine
);
603 /* Pack resulting tree */
604 _FDT((fdt_pack(fdt
)));
606 qemu_fdt_dumpdtb(fdt
, fdt_totalsize(fdt
));
607 cpu_physical_memory_write(PNV_FDT_ADDR
, fdt
, fdt_totalsize(fdt
));
612 static ISABus
*pnv_chip_power8_isa_create(PnvChip
*chip
, Error
**errp
)
614 Pnv8Chip
*chip8
= PNV8_CHIP(chip
);
615 return pnv_lpc_isa_create(&chip8
->lpc
, true, errp
);
618 static ISABus
*pnv_chip_power8nvl_isa_create(PnvChip
*chip
, Error
**errp
)
620 Pnv8Chip
*chip8
= PNV8_CHIP(chip
);
621 return pnv_lpc_isa_create(&chip8
->lpc
, false, errp
);
624 static ISABus
*pnv_chip_power9_isa_create(PnvChip
*chip
, Error
**errp
)
626 Pnv9Chip
*chip9
= PNV9_CHIP(chip
);
627 return pnv_lpc_isa_create(&chip9
->lpc
, false, errp
);
630 static ISABus
*pnv_chip_power10_isa_create(PnvChip
*chip
, Error
**errp
)
632 Pnv10Chip
*chip10
= PNV10_CHIP(chip
);
633 return pnv_lpc_isa_create(&chip10
->lpc
, false, errp
);
636 static ISABus
*pnv_isa_create(PnvChip
*chip
, Error
**errp
)
638 return PNV_CHIP_GET_CLASS(chip
)->isa_create(chip
, errp
);
641 static void pnv_chip_power8_pic_print_info(PnvChip
*chip
, Monitor
*mon
)
643 Pnv8Chip
*chip8
= PNV8_CHIP(chip
);
646 ics_pic_print_info(&chip8
->psi
.ics
, mon
);
647 for (i
= 0; i
< chip
->num_phbs
; i
++) {
648 pnv_phb3_msi_pic_print_info(&chip8
->phbs
[i
].msis
, mon
);
649 ics_pic_print_info(&chip8
->phbs
[i
].lsis
, mon
);
653 static void pnv_chip_power9_pic_print_info(PnvChip
*chip
, Monitor
*mon
)
655 Pnv9Chip
*chip9
= PNV9_CHIP(chip
);
658 pnv_xive_pic_print_info(&chip9
->xive
, mon
);
659 pnv_psi_pic_print_info(&chip9
->psi
, mon
);
661 for (i
= 0; i
< PNV9_CHIP_MAX_PEC
; i
++) {
662 PnvPhb4PecState
*pec
= &chip9
->pecs
[i
];
663 for (j
= 0; j
< pec
->num_stacks
; j
++) {
664 pnv_phb4_pic_print_info(&pec
->stacks
[j
].phb
, mon
);
669 static uint64_t pnv_chip_power8_xscom_core_base(PnvChip
*chip
,
672 return PNV_XSCOM_EX_BASE(core_id
);
675 static uint64_t pnv_chip_power9_xscom_core_base(PnvChip
*chip
,
678 return PNV9_XSCOM_EC_BASE(core_id
);
681 static uint64_t pnv_chip_power10_xscom_core_base(PnvChip
*chip
,
684 return PNV10_XSCOM_EC_BASE(core_id
);
687 static bool pnv_match_cpu(const char *default_type
, const char *cpu_type
)
689 PowerPCCPUClass
*ppc_default
=
690 POWERPC_CPU_CLASS(object_class_by_name(default_type
));
691 PowerPCCPUClass
*ppc
=
692 POWERPC_CPU_CLASS(object_class_by_name(cpu_type
));
694 return ppc_default
->pvr_match(ppc_default
, ppc
->pvr
);
697 static void pnv_ipmi_bt_init(ISABus
*bus
, IPMIBmc
*bmc
, uint32_t irq
)
699 ISADevice
*dev
= isa_new("isa-ipmi-bt");
701 object_property_set_link(OBJECT(dev
), "bmc", OBJECT(bmc
), &error_fatal
);
702 object_property_set_int(OBJECT(dev
), "irq", irq
, &error_fatal
);
703 isa_realize_and_unref(dev
, bus
, &error_fatal
);
706 static void pnv_chip_power10_pic_print_info(PnvChip
*chip
, Monitor
*mon
)
708 Pnv10Chip
*chip10
= PNV10_CHIP(chip
);
710 pnv_psi_pic_print_info(&chip10
->psi
, mon
);
713 /* Always give the first 1GB to chip 0 else we won't boot */
714 static uint64_t pnv_chip_get_ram_size(PnvMachineState
*pnv
, int chip_id
)
716 MachineState
*machine
= MACHINE(pnv
);
717 uint64_t ram_per_chip
;
719 assert(machine
->ram_size
>= 1 * GiB
);
721 ram_per_chip
= machine
->ram_size
/ pnv
->num_chips
;
722 if (ram_per_chip
>= 1 * GiB
) {
723 return QEMU_ALIGN_DOWN(ram_per_chip
, 1 * MiB
);
726 ram_per_chip
= (machine
->ram_size
- 1 * GiB
) / (pnv
->num_chips
- 1);
727 return chip_id
== 0 ? 1 * GiB
: QEMU_ALIGN_DOWN(ram_per_chip
, 1 * MiB
);
730 static void pnv_init(MachineState
*machine
)
732 const char *bios_name
= machine
->firmware
?: FW_FILE_NAME
;
733 PnvMachineState
*pnv
= PNV_MACHINE(machine
);
734 MachineClass
*mc
= MACHINE_GET_CLASS(machine
);
737 uint64_t chip_ram_start
= 0;
740 DriveInfo
*pnor
= drive_get(IF_MTD
, 0, 0);
744 if (machine
->ram_size
< mc
->default_ram_size
) {
745 char *sz
= size_to_str(mc
->default_ram_size
);
746 error_report("Invalid RAM size, should be bigger than %s", sz
);
750 memory_region_add_subregion(get_system_memory(), 0, machine
->ram
);
753 * Create our simple PNOR device
755 dev
= qdev_new(TYPE_PNV_PNOR
);
757 qdev_prop_set_drive(dev
, "drive", blk_by_legacy_dinfo(pnor
));
759 sysbus_realize_and_unref(SYS_BUS_DEVICE(dev
), &error_fatal
);
760 pnv
->pnor
= PNV_PNOR(dev
);
762 /* load skiboot firmware */
763 fw_filename
= qemu_find_file(QEMU_FILE_TYPE_BIOS
, bios_name
);
765 error_report("Could not find OPAL firmware '%s'", bios_name
);
769 fw_size
= load_image_targphys(fw_filename
, pnv
->fw_load_addr
, FW_MAX_SIZE
);
771 error_report("Could not load OPAL firmware '%s'", fw_filename
);
777 if (machine
->kernel_filename
) {
780 kernel_size
= load_image_targphys(machine
->kernel_filename
,
781 KERNEL_LOAD_ADDR
, KERNEL_MAX_SIZE
);
782 if (kernel_size
< 0) {
783 error_report("Could not load kernel '%s'",
784 machine
->kernel_filename
);
790 if (machine
->initrd_filename
) {
791 pnv
->initrd_base
= INITRD_LOAD_ADDR
;
792 pnv
->initrd_size
= load_image_targphys(machine
->initrd_filename
,
793 pnv
->initrd_base
, INITRD_MAX_SIZE
);
794 if (pnv
->initrd_size
< 0) {
795 error_report("Could not load initial ram disk '%s'",
796 machine
->initrd_filename
);
801 /* MSIs are supported on this platform */
802 msi_nonbroken
= true;
805 * Check compatibility of the specified CPU with the machine
808 if (!pnv_match_cpu(mc
->default_cpu_type
, machine
->cpu_type
)) {
809 error_report("invalid CPU model '%s' for %s machine",
810 machine
->cpu_type
, mc
->name
);
814 /* Create the processor chips */
815 i
= strlen(machine
->cpu_type
) - strlen(POWERPC_CPU_TYPE_SUFFIX
);
816 chip_typename
= g_strdup_printf(PNV_CHIP_TYPE_NAME("%.*s"),
817 i
, machine
->cpu_type
);
818 if (!object_class_by_name(chip_typename
)) {
819 error_report("invalid chip model '%.*s' for %s machine",
820 i
, machine
->cpu_type
, mc
->name
);
825 machine
->smp
.max_cpus
/ (machine
->smp
.cores
* machine
->smp
.threads
);
827 * TODO: should we decide on how many chips we can create based
828 * on #cores and Venice vs. Murano vs. Naples chip type etc...,
830 if (!is_power_of_2(pnv
->num_chips
) || pnv
->num_chips
> 16) {
831 error_report("invalid number of chips: '%d'", pnv
->num_chips
);
833 "Try '-smp sockets=N'. Valid values are : 1, 2, 4, 8 and 16.\n");
837 pnv
->chips
= g_new0(PnvChip
*, pnv
->num_chips
);
838 for (i
= 0; i
< pnv
->num_chips
; i
++) {
840 Object
*chip
= OBJECT(qdev_new(chip_typename
));
842 uint64_t chip_ram_size
= pnv_chip_get_ram_size(pnv
, chip_id
);
844 pnv
->chips
[i
] = PNV_CHIP(chip
);
846 /* Distribute RAM among the chips */
847 object_property_set_int(chip
, "ram-start", chip_ram_start
,
849 object_property_set_int(chip
, "ram-size", chip_ram_size
,
851 chip_ram_start
+= chip_ram_size
;
853 snprintf(chip_name
, sizeof(chip_name
), "chip[%d]", chip_id
);
854 object_property_add_child(OBJECT(pnv
), chip_name
, chip
);
855 object_property_set_int(chip
, "chip-id", chip_id
, &error_fatal
);
856 object_property_set_int(chip
, "nr-cores", machine
->smp
.cores
,
858 object_property_set_int(chip
, "nr-threads", machine
->smp
.threads
,
861 * The POWER8 machine use the XICS interrupt interface.
862 * Propagate the XICS fabric to the chip and its controllers.
864 if (object_dynamic_cast(OBJECT(pnv
), TYPE_XICS_FABRIC
)) {
865 object_property_set_link(chip
, "xics", OBJECT(pnv
), &error_abort
);
867 if (object_dynamic_cast(OBJECT(pnv
), TYPE_XIVE_FABRIC
)) {
868 object_property_set_link(chip
, "xive-fabric", OBJECT(pnv
),
871 sysbus_realize_and_unref(SYS_BUS_DEVICE(chip
), &error_fatal
);
873 g_free(chip_typename
);
875 /* Instantiate ISA bus on chip 0 */
876 pnv
->isa_bus
= pnv_isa_create(pnv
->chips
[0], &error_fatal
);
878 /* Create serial port */
879 serial_hds_isa_init(pnv
->isa_bus
, 0, MAX_ISA_SERIAL_PORTS
);
881 /* Create an RTC ISA device too */
882 mc146818_rtc_init(pnv
->isa_bus
, 2000, NULL
);
885 * Create the machine BMC simulator and the IPMI BT device for
886 * communication with the BMC
888 if (defaults_enabled()) {
889 pnv
->bmc
= pnv_bmc_create(pnv
->pnor
);
890 pnv_ipmi_bt_init(pnv
->isa_bus
, pnv
->bmc
, 10);
894 * The PNOR is mapped on the LPC FW address space by the BMC.
895 * Since we can not reach the remote BMC machine with LPC memops,
896 * map it always for now.
898 memory_region_add_subregion(pnv
->chips
[0]->fw_mr
, PNOR_SPI_OFFSET
,
902 * OpenPOWER systems use a IPMI SEL Event message to notify the
905 pnv
->powerdown_notifier
.notify
= pnv_powerdown_notify
;
906 qemu_register_powerdown_notifier(&pnv
->powerdown_notifier
);
910 * 0:21 Reserved - Read as zeros
915 static uint32_t pnv_chip_core_pir_p8(PnvChip
*chip
, uint32_t core_id
)
917 return (chip
->chip_id
<< 7) | (core_id
<< 3);
920 static void pnv_chip_power8_intc_create(PnvChip
*chip
, PowerPCCPU
*cpu
,
923 Pnv8Chip
*chip8
= PNV8_CHIP(chip
);
924 Error
*local_err
= NULL
;
926 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
928 obj
= icp_create(OBJECT(cpu
), TYPE_PNV_ICP
, chip8
->xics
, &local_err
);
930 error_propagate(errp
, local_err
);
938 static void pnv_chip_power8_intc_reset(PnvChip
*chip
, PowerPCCPU
*cpu
)
940 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
942 icp_reset(ICP(pnv_cpu
->intc
));
945 static void pnv_chip_power8_intc_destroy(PnvChip
*chip
, PowerPCCPU
*cpu
)
947 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
949 icp_destroy(ICP(pnv_cpu
->intc
));
950 pnv_cpu
->intc
= NULL
;
953 static void pnv_chip_power8_intc_print_info(PnvChip
*chip
, PowerPCCPU
*cpu
,
956 icp_pic_print_info(ICP(pnv_cpu_state(cpu
)->intc
), mon
);
960 * 0:48 Reserved - Read as zeroes
963 * 56 Reserved - Read as zero
967 * We only care about the lower bits. uint32_t is fine for the moment.
969 static uint32_t pnv_chip_core_pir_p9(PnvChip
*chip
, uint32_t core_id
)
971 return (chip
->chip_id
<< 8) | (core_id
<< 2);
974 static uint32_t pnv_chip_core_pir_p10(PnvChip
*chip
, uint32_t core_id
)
976 return (chip
->chip_id
<< 8) | (core_id
<< 2);
979 static void pnv_chip_power9_intc_create(PnvChip
*chip
, PowerPCCPU
*cpu
,
982 Pnv9Chip
*chip9
= PNV9_CHIP(chip
);
983 Error
*local_err
= NULL
;
985 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
988 * The core creates its interrupt presenter but the XIVE interrupt
989 * controller object is initialized afterwards. Hopefully, it's
990 * only used at runtime.
992 obj
= xive_tctx_create(OBJECT(cpu
), XIVE_PRESENTER(&chip9
->xive
),
995 error_propagate(errp
, local_err
);
1002 static void pnv_chip_power9_intc_reset(PnvChip
*chip
, PowerPCCPU
*cpu
)
1004 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
1006 xive_tctx_reset(XIVE_TCTX(pnv_cpu
->intc
));
1009 static void pnv_chip_power9_intc_destroy(PnvChip
*chip
, PowerPCCPU
*cpu
)
1011 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
1013 xive_tctx_destroy(XIVE_TCTX(pnv_cpu
->intc
));
1014 pnv_cpu
->intc
= NULL
;
1017 static void pnv_chip_power9_intc_print_info(PnvChip
*chip
, PowerPCCPU
*cpu
,
1020 xive_tctx_pic_print_info(XIVE_TCTX(pnv_cpu_state(cpu
)->intc
), mon
);
1023 static void pnv_chip_power10_intc_create(PnvChip
*chip
, PowerPCCPU
*cpu
,
1026 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
1028 /* Will be defined when the interrupt controller is */
1029 pnv_cpu
->intc
= NULL
;
1032 static void pnv_chip_power10_intc_reset(PnvChip
*chip
, PowerPCCPU
*cpu
)
1037 static void pnv_chip_power10_intc_destroy(PnvChip
*chip
, PowerPCCPU
*cpu
)
1039 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
1041 pnv_cpu
->intc
= NULL
;
1044 static void pnv_chip_power10_intc_print_info(PnvChip
*chip
, PowerPCCPU
*cpu
,
1050 * Allowed core identifiers on a POWER8 Processor Chip :
1059 * <EX7,8 reserved> <reserved>
1061 * EX10 - Venice only
1062 * EX11 - Venice only
1068 #define POWER8E_CORE_MASK (0x7070ull)
1069 #define POWER8_CORE_MASK (0x7e7eull)
1072 * POWER9 has 24 cores, ids starting at 0x0
1074 #define POWER9_CORE_MASK (0xffffffffffffffull)
1077 #define POWER10_CORE_MASK (0xffffffffffffffull)
1079 static void pnv_chip_power8_instance_init(Object
*obj
)
1081 PnvChip
*chip
= PNV_CHIP(obj
);
1082 Pnv8Chip
*chip8
= PNV8_CHIP(obj
);
1083 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(obj
);
1086 object_property_add_link(obj
, "xics", TYPE_XICS_FABRIC
,
1087 (Object
**)&chip8
->xics
,
1088 object_property_allow_set_link
,
1089 OBJ_PROP_LINK_STRONG
);
1091 object_initialize_child(obj
, "psi", &chip8
->psi
, TYPE_PNV8_PSI
);
1093 object_initialize_child(obj
, "lpc", &chip8
->lpc
, TYPE_PNV8_LPC
);
1095 object_initialize_child(obj
, "occ", &chip8
->occ
, TYPE_PNV8_OCC
);
1097 object_initialize_child(obj
, "homer", &chip8
->homer
, TYPE_PNV8_HOMER
);
1099 for (i
= 0; i
< pcc
->num_phbs
; i
++) {
1100 object_initialize_child(obj
, "phb[*]", &chip8
->phbs
[i
], TYPE_PNV_PHB3
);
1104 * Number of PHBs is the chip default
1106 chip
->num_phbs
= pcc
->num_phbs
;
1109 static void pnv_chip_icp_realize(Pnv8Chip
*chip8
, Error
**errp
)
1111 PnvChip
*chip
= PNV_CHIP(chip8
);
1112 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(chip
);
1116 name
= g_strdup_printf("icp-%x", chip
->chip_id
);
1117 memory_region_init(&chip8
->icp_mmio
, OBJECT(chip
), name
, PNV_ICP_SIZE
);
1118 sysbus_init_mmio(SYS_BUS_DEVICE(chip
), &chip8
->icp_mmio
);
1121 sysbus_mmio_map(SYS_BUS_DEVICE(chip
), 1, PNV_ICP_BASE(chip
));
1123 /* Map the ICP registers for each thread */
1124 for (i
= 0; i
< chip
->nr_cores
; i
++) {
1125 PnvCore
*pnv_core
= chip
->cores
[i
];
1126 int core_hwid
= CPU_CORE(pnv_core
)->core_id
;
1128 for (j
= 0; j
< CPU_CORE(pnv_core
)->nr_threads
; j
++) {
1129 uint32_t pir
= pcc
->core_pir(chip
, core_hwid
) + j
;
1130 PnvICPState
*icp
= PNV_ICP(xics_icp_get(chip8
->xics
, pir
));
1132 memory_region_add_subregion(&chip8
->icp_mmio
, pir
<< 12,
1138 static void pnv_chip_power8_realize(DeviceState
*dev
, Error
**errp
)
1140 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(dev
);
1141 PnvChip
*chip
= PNV_CHIP(dev
);
1142 Pnv8Chip
*chip8
= PNV8_CHIP(dev
);
1143 Pnv8Psi
*psi8
= &chip8
->psi
;
1144 Error
*local_err
= NULL
;
1147 assert(chip8
->xics
);
1149 /* XSCOM bridge is first */
1150 pnv_xscom_realize(chip
, PNV_XSCOM_SIZE
, &local_err
);
1152 error_propagate(errp
, local_err
);
1155 sysbus_mmio_map(SYS_BUS_DEVICE(chip
), 0, PNV_XSCOM_BASE(chip
));
1157 pcc
->parent_realize(dev
, &local_err
);
1159 error_propagate(errp
, local_err
);
1163 /* Processor Service Interface (PSI) Host Bridge */
1164 object_property_set_int(OBJECT(&chip8
->psi
), "bar", PNV_PSIHB_BASE(chip
),
1166 object_property_set_link(OBJECT(&chip8
->psi
), ICS_PROP_XICS
,
1167 OBJECT(chip8
->xics
), &error_abort
);
1168 if (!qdev_realize(DEVICE(&chip8
->psi
), NULL
, errp
)) {
1171 pnv_xscom_add_subregion(chip
, PNV_XSCOM_PSIHB_BASE
,
1172 &PNV_PSI(psi8
)->xscom_regs
);
1174 /* Create LPC controller */
1175 object_property_set_link(OBJECT(&chip8
->lpc
), "psi", OBJECT(&chip8
->psi
),
1177 qdev_realize(DEVICE(&chip8
->lpc
), NULL
, &error_fatal
);
1178 pnv_xscom_add_subregion(chip
, PNV_XSCOM_LPC_BASE
, &chip8
->lpc
.xscom_regs
);
1180 chip
->fw_mr
= &chip8
->lpc
.isa_fw
;
1181 chip
->dt_isa_nodename
= g_strdup_printf("/xscom@%" PRIx64
"/isa@%x",
1182 (uint64_t) PNV_XSCOM_BASE(chip
),
1183 PNV_XSCOM_LPC_BASE
);
1186 * Interrupt Management Area. This is the memory region holding
1187 * all the Interrupt Control Presenter (ICP) registers
1189 pnv_chip_icp_realize(chip8
, &local_err
);
1191 error_propagate(errp
, local_err
);
1195 /* Create the simplified OCC model */
1196 object_property_set_link(OBJECT(&chip8
->occ
), "psi", OBJECT(&chip8
->psi
),
1198 if (!qdev_realize(DEVICE(&chip8
->occ
), NULL
, errp
)) {
1201 pnv_xscom_add_subregion(chip
, PNV_XSCOM_OCC_BASE
, &chip8
->occ
.xscom_regs
);
1203 /* OCC SRAM model */
1204 memory_region_add_subregion(get_system_memory(), PNV_OCC_SENSOR_BASE(chip
),
1205 &chip8
->occ
.sram_regs
);
1208 object_property_set_link(OBJECT(&chip8
->homer
), "chip", OBJECT(chip
),
1210 if (!qdev_realize(DEVICE(&chip8
->homer
), NULL
, errp
)) {
1213 /* Homer Xscom region */
1214 pnv_xscom_add_subregion(chip
, PNV_XSCOM_PBA_BASE
, &chip8
->homer
.pba_regs
);
1216 /* Homer mmio region */
1217 memory_region_add_subregion(get_system_memory(), PNV_HOMER_BASE(chip
),
1218 &chip8
->homer
.regs
);
1220 /* PHB3 controllers */
1221 for (i
= 0; i
< chip
->num_phbs
; i
++) {
1222 PnvPHB3
*phb
= &chip8
->phbs
[i
];
1223 PnvPBCQState
*pbcq
= &phb
->pbcq
;
1225 object_property_set_int(OBJECT(phb
), "index", i
, &error_fatal
);
1226 object_property_set_int(OBJECT(phb
), "chip-id", chip
->chip_id
,
1228 if (!sysbus_realize(SYS_BUS_DEVICE(phb
), errp
)) {
1232 /* Populate the XSCOM address space. */
1233 pnv_xscom_add_subregion(chip
,
1234 PNV_XSCOM_PBCQ_NEST_BASE
+ 0x400 * phb
->phb_id
,
1235 &pbcq
->xscom_nest_regs
);
1236 pnv_xscom_add_subregion(chip
,
1237 PNV_XSCOM_PBCQ_PCI_BASE
+ 0x400 * phb
->phb_id
,
1238 &pbcq
->xscom_pci_regs
);
1239 pnv_xscom_add_subregion(chip
,
1240 PNV_XSCOM_PBCQ_SPCI_BASE
+ 0x040 * phb
->phb_id
,
1241 &pbcq
->xscom_spci_regs
);
1245 static uint32_t pnv_chip_power8_xscom_pcba(PnvChip
*chip
, uint64_t addr
)
1247 addr
&= (PNV_XSCOM_SIZE
- 1);
1248 return ((addr
>> 4) & ~0xfull
) | ((addr
>> 3) & 0xf);
1251 static void pnv_chip_power8e_class_init(ObjectClass
*klass
, void *data
)
1253 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1254 PnvChipClass
*k
= PNV_CHIP_CLASS(klass
);
1256 k
->chip_cfam_id
= 0x221ef04980000000ull
; /* P8 Murano DD2.1 */
1257 k
->cores_mask
= POWER8E_CORE_MASK
;
1259 k
->core_pir
= pnv_chip_core_pir_p8
;
1260 k
->intc_create
= pnv_chip_power8_intc_create
;
1261 k
->intc_reset
= pnv_chip_power8_intc_reset
;
1262 k
->intc_destroy
= pnv_chip_power8_intc_destroy
;
1263 k
->intc_print_info
= pnv_chip_power8_intc_print_info
;
1264 k
->isa_create
= pnv_chip_power8_isa_create
;
1265 k
->dt_populate
= pnv_chip_power8_dt_populate
;
1266 k
->pic_print_info
= pnv_chip_power8_pic_print_info
;
1267 k
->xscom_core_base
= pnv_chip_power8_xscom_core_base
;
1268 k
->xscom_pcba
= pnv_chip_power8_xscom_pcba
;
1269 dc
->desc
= "PowerNV Chip POWER8E";
1271 device_class_set_parent_realize(dc
, pnv_chip_power8_realize
,
1272 &k
->parent_realize
);
1275 static void pnv_chip_power8_class_init(ObjectClass
*klass
, void *data
)
1277 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1278 PnvChipClass
*k
= PNV_CHIP_CLASS(klass
);
1280 k
->chip_cfam_id
= 0x220ea04980000000ull
; /* P8 Venice DD2.0 */
1281 k
->cores_mask
= POWER8_CORE_MASK
;
1283 k
->core_pir
= pnv_chip_core_pir_p8
;
1284 k
->intc_create
= pnv_chip_power8_intc_create
;
1285 k
->intc_reset
= pnv_chip_power8_intc_reset
;
1286 k
->intc_destroy
= pnv_chip_power8_intc_destroy
;
1287 k
->intc_print_info
= pnv_chip_power8_intc_print_info
;
1288 k
->isa_create
= pnv_chip_power8_isa_create
;
1289 k
->dt_populate
= pnv_chip_power8_dt_populate
;
1290 k
->pic_print_info
= pnv_chip_power8_pic_print_info
;
1291 k
->xscom_core_base
= pnv_chip_power8_xscom_core_base
;
1292 k
->xscom_pcba
= pnv_chip_power8_xscom_pcba
;
1293 dc
->desc
= "PowerNV Chip POWER8";
1295 device_class_set_parent_realize(dc
, pnv_chip_power8_realize
,
1296 &k
->parent_realize
);
1299 static void pnv_chip_power8nvl_class_init(ObjectClass
*klass
, void *data
)
1301 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1302 PnvChipClass
*k
= PNV_CHIP_CLASS(klass
);
1304 k
->chip_cfam_id
= 0x120d304980000000ull
; /* P8 Naples DD1.0 */
1305 k
->cores_mask
= POWER8_CORE_MASK
;
1307 k
->core_pir
= pnv_chip_core_pir_p8
;
1308 k
->intc_create
= pnv_chip_power8_intc_create
;
1309 k
->intc_reset
= pnv_chip_power8_intc_reset
;
1310 k
->intc_destroy
= pnv_chip_power8_intc_destroy
;
1311 k
->intc_print_info
= pnv_chip_power8_intc_print_info
;
1312 k
->isa_create
= pnv_chip_power8nvl_isa_create
;
1313 k
->dt_populate
= pnv_chip_power8_dt_populate
;
1314 k
->pic_print_info
= pnv_chip_power8_pic_print_info
;
1315 k
->xscom_core_base
= pnv_chip_power8_xscom_core_base
;
1316 k
->xscom_pcba
= pnv_chip_power8_xscom_pcba
;
1317 dc
->desc
= "PowerNV Chip POWER8NVL";
1319 device_class_set_parent_realize(dc
, pnv_chip_power8_realize
,
1320 &k
->parent_realize
);
1323 static void pnv_chip_power9_instance_init(Object
*obj
)
1325 PnvChip
*chip
= PNV_CHIP(obj
);
1326 Pnv9Chip
*chip9
= PNV9_CHIP(obj
);
1327 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(obj
);
1330 object_initialize_child(obj
, "xive", &chip9
->xive
, TYPE_PNV_XIVE
);
1331 object_property_add_alias(obj
, "xive-fabric", OBJECT(&chip9
->xive
),
1334 object_initialize_child(obj
, "psi", &chip9
->psi
, TYPE_PNV9_PSI
);
1336 object_initialize_child(obj
, "lpc", &chip9
->lpc
, TYPE_PNV9_LPC
);
1338 object_initialize_child(obj
, "occ", &chip9
->occ
, TYPE_PNV9_OCC
);
1340 object_initialize_child(obj
, "homer", &chip9
->homer
, TYPE_PNV9_HOMER
);
1342 for (i
= 0; i
< PNV9_CHIP_MAX_PEC
; i
++) {
1343 object_initialize_child(obj
, "pec[*]", &chip9
->pecs
[i
],
1348 * Number of PHBs is the chip default
1350 chip
->num_phbs
= pcc
->num_phbs
;
1353 static void pnv_chip_quad_realize(Pnv9Chip
*chip9
, Error
**errp
)
1355 PnvChip
*chip
= PNV_CHIP(chip9
);
1358 chip9
->nr_quads
= DIV_ROUND_UP(chip
->nr_cores
, 4);
1359 chip9
->quads
= g_new0(PnvQuad
, chip9
->nr_quads
);
1361 for (i
= 0; i
< chip9
->nr_quads
; i
++) {
1363 PnvQuad
*eq
= &chip9
->quads
[i
];
1364 PnvCore
*pnv_core
= chip
->cores
[i
* 4];
1365 int core_id
= CPU_CORE(pnv_core
)->core_id
;
1367 snprintf(eq_name
, sizeof(eq_name
), "eq[%d]", core_id
);
1368 object_initialize_child_with_props(OBJECT(chip
), eq_name
, eq
,
1369 sizeof(*eq
), TYPE_PNV_QUAD
,
1370 &error_fatal
, NULL
);
1372 object_property_set_int(OBJECT(eq
), "id", core_id
, &error_fatal
);
1373 qdev_realize(DEVICE(eq
), NULL
, &error_fatal
);
1375 pnv_xscom_add_subregion(chip
, PNV9_XSCOM_EQ_BASE(eq
->id
),
1380 static void pnv_chip_power9_phb_realize(PnvChip
*chip
, Error
**errp
)
1382 Pnv9Chip
*chip9
= PNV9_CHIP(chip
);
1386 for (i
= 0; i
< PNV9_CHIP_MAX_PEC
; i
++) {
1387 PnvPhb4PecState
*pec
= &chip9
->pecs
[i
];
1388 PnvPhb4PecClass
*pecc
= PNV_PHB4_PEC_GET_CLASS(pec
);
1389 uint32_t pec_nest_base
;
1390 uint32_t pec_pci_base
;
1392 object_property_set_int(OBJECT(pec
), "index", i
, &error_fatal
);
1398 object_property_set_int(OBJECT(pec
), "num-stacks", i
+ 1,
1400 object_property_set_int(OBJECT(pec
), "chip-id", chip
->chip_id
,
1402 object_property_set_link(OBJECT(pec
), "system-memory",
1403 OBJECT(get_system_memory()), &error_abort
);
1404 if (!qdev_realize(DEVICE(pec
), NULL
, errp
)) {
1408 pec_nest_base
= pecc
->xscom_nest_base(pec
);
1409 pec_pci_base
= pecc
->xscom_pci_base(pec
);
1411 pnv_xscom_add_subregion(chip
, pec_nest_base
, &pec
->nest_regs_mr
);
1412 pnv_xscom_add_subregion(chip
, pec_pci_base
, &pec
->pci_regs_mr
);
1414 for (j
= 0; j
< pec
->num_stacks
&& phb_id
< chip
->num_phbs
;
1416 PnvPhb4PecStack
*stack
= &pec
->stacks
[j
];
1417 Object
*obj
= OBJECT(&stack
->phb
);
1419 object_property_set_int(obj
, "index", phb_id
, &error_fatal
);
1420 object_property_set_int(obj
, "chip-id", chip
->chip_id
,
1422 object_property_set_int(obj
, "version", PNV_PHB4_VERSION
,
1424 object_property_set_int(obj
, "device-id", PNV_PHB4_DEVICE_ID
,
1426 object_property_set_link(obj
, "stack", OBJECT(stack
),
1428 if (!sysbus_realize(SYS_BUS_DEVICE(obj
), errp
)) {
1432 /* Populate the XSCOM address space. */
1433 pnv_xscom_add_subregion(chip
,
1434 pec_nest_base
+ 0x40 * (stack
->stack_no
+ 1),
1435 &stack
->nest_regs_mr
);
1436 pnv_xscom_add_subregion(chip
,
1437 pec_pci_base
+ 0x40 * (stack
->stack_no
+ 1),
1438 &stack
->pci_regs_mr
);
1439 pnv_xscom_add_subregion(chip
,
1440 pec_pci_base
+ PNV9_XSCOM_PEC_PCI_STK0
+
1441 0x40 * stack
->stack_no
,
1442 &stack
->phb_regs_mr
);
1447 static void pnv_chip_power9_realize(DeviceState
*dev
, Error
**errp
)
1449 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(dev
);
1450 Pnv9Chip
*chip9
= PNV9_CHIP(dev
);
1451 PnvChip
*chip
= PNV_CHIP(dev
);
1452 Pnv9Psi
*psi9
= &chip9
->psi
;
1453 Error
*local_err
= NULL
;
1455 /* XSCOM bridge is first */
1456 pnv_xscom_realize(chip
, PNV9_XSCOM_SIZE
, &local_err
);
1458 error_propagate(errp
, local_err
);
1461 sysbus_mmio_map(SYS_BUS_DEVICE(chip
), 0, PNV9_XSCOM_BASE(chip
));
1463 pcc
->parent_realize(dev
, &local_err
);
1465 error_propagate(errp
, local_err
);
1469 pnv_chip_quad_realize(chip9
, &local_err
);
1471 error_propagate(errp
, local_err
);
1475 /* XIVE interrupt controller (POWER9) */
1476 object_property_set_int(OBJECT(&chip9
->xive
), "ic-bar",
1477 PNV9_XIVE_IC_BASE(chip
), &error_fatal
);
1478 object_property_set_int(OBJECT(&chip9
->xive
), "vc-bar",
1479 PNV9_XIVE_VC_BASE(chip
), &error_fatal
);
1480 object_property_set_int(OBJECT(&chip9
->xive
), "pc-bar",
1481 PNV9_XIVE_PC_BASE(chip
), &error_fatal
);
1482 object_property_set_int(OBJECT(&chip9
->xive
), "tm-bar",
1483 PNV9_XIVE_TM_BASE(chip
), &error_fatal
);
1484 object_property_set_link(OBJECT(&chip9
->xive
), "chip", OBJECT(chip
),
1486 if (!sysbus_realize(SYS_BUS_DEVICE(&chip9
->xive
), errp
)) {
1489 pnv_xscom_add_subregion(chip
, PNV9_XSCOM_XIVE_BASE
,
1490 &chip9
->xive
.xscom_regs
);
1492 /* Processor Service Interface (PSI) Host Bridge */
1493 object_property_set_int(OBJECT(&chip9
->psi
), "bar", PNV9_PSIHB_BASE(chip
),
1495 if (!qdev_realize(DEVICE(&chip9
->psi
), NULL
, errp
)) {
1498 pnv_xscom_add_subregion(chip
, PNV9_XSCOM_PSIHB_BASE
,
1499 &PNV_PSI(psi9
)->xscom_regs
);
1502 object_property_set_link(OBJECT(&chip9
->lpc
), "psi", OBJECT(&chip9
->psi
),
1504 if (!qdev_realize(DEVICE(&chip9
->lpc
), NULL
, errp
)) {
1507 memory_region_add_subregion(get_system_memory(), PNV9_LPCM_BASE(chip
),
1508 &chip9
->lpc
.xscom_regs
);
1510 chip
->fw_mr
= &chip9
->lpc
.isa_fw
;
1511 chip
->dt_isa_nodename
= g_strdup_printf("/lpcm-opb@%" PRIx64
"/lpc@0",
1512 (uint64_t) PNV9_LPCM_BASE(chip
));
1514 /* Create the simplified OCC model */
1515 object_property_set_link(OBJECT(&chip9
->occ
), "psi", OBJECT(&chip9
->psi
),
1517 if (!qdev_realize(DEVICE(&chip9
->occ
), NULL
, errp
)) {
1520 pnv_xscom_add_subregion(chip
, PNV9_XSCOM_OCC_BASE
, &chip9
->occ
.xscom_regs
);
1522 /* OCC SRAM model */
1523 memory_region_add_subregion(get_system_memory(), PNV9_OCC_SENSOR_BASE(chip
),
1524 &chip9
->occ
.sram_regs
);
1527 object_property_set_link(OBJECT(&chip9
->homer
), "chip", OBJECT(chip
),
1529 if (!qdev_realize(DEVICE(&chip9
->homer
), NULL
, errp
)) {
1532 /* Homer Xscom region */
1533 pnv_xscom_add_subregion(chip
, PNV9_XSCOM_PBA_BASE
, &chip9
->homer
.pba_regs
);
1535 /* Homer mmio region */
1536 memory_region_add_subregion(get_system_memory(), PNV9_HOMER_BASE(chip
),
1537 &chip9
->homer
.regs
);
1540 pnv_chip_power9_phb_realize(chip
, &local_err
);
1542 error_propagate(errp
, local_err
);
1547 static uint32_t pnv_chip_power9_xscom_pcba(PnvChip
*chip
, uint64_t addr
)
1549 addr
&= (PNV9_XSCOM_SIZE
- 1);
1553 static void pnv_chip_power9_class_init(ObjectClass
*klass
, void *data
)
1555 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1556 PnvChipClass
*k
= PNV_CHIP_CLASS(klass
);
1558 k
->chip_cfam_id
= 0x220d104900008000ull
; /* P9 Nimbus DD2.0 */
1559 k
->cores_mask
= POWER9_CORE_MASK
;
1560 k
->core_pir
= pnv_chip_core_pir_p9
;
1561 k
->intc_create
= pnv_chip_power9_intc_create
;
1562 k
->intc_reset
= pnv_chip_power9_intc_reset
;
1563 k
->intc_destroy
= pnv_chip_power9_intc_destroy
;
1564 k
->intc_print_info
= pnv_chip_power9_intc_print_info
;
1565 k
->isa_create
= pnv_chip_power9_isa_create
;
1566 k
->dt_populate
= pnv_chip_power9_dt_populate
;
1567 k
->pic_print_info
= pnv_chip_power9_pic_print_info
;
1568 k
->xscom_core_base
= pnv_chip_power9_xscom_core_base
;
1569 k
->xscom_pcba
= pnv_chip_power9_xscom_pcba
;
1570 dc
->desc
= "PowerNV Chip POWER9";
1573 device_class_set_parent_realize(dc
, pnv_chip_power9_realize
,
1574 &k
->parent_realize
);
1577 static void pnv_chip_power10_instance_init(Object
*obj
)
1579 Pnv10Chip
*chip10
= PNV10_CHIP(obj
);
1581 object_initialize_child(obj
, "psi", &chip10
->psi
, TYPE_PNV10_PSI
);
1582 object_initialize_child(obj
, "lpc", &chip10
->lpc
, TYPE_PNV10_LPC
);
1585 static void pnv_chip_power10_realize(DeviceState
*dev
, Error
**errp
)
1587 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(dev
);
1588 PnvChip
*chip
= PNV_CHIP(dev
);
1589 Pnv10Chip
*chip10
= PNV10_CHIP(dev
);
1590 Error
*local_err
= NULL
;
1592 /* XSCOM bridge is first */
1593 pnv_xscom_realize(chip
, PNV10_XSCOM_SIZE
, &local_err
);
1595 error_propagate(errp
, local_err
);
1598 sysbus_mmio_map(SYS_BUS_DEVICE(chip
), 0, PNV10_XSCOM_BASE(chip
));
1600 pcc
->parent_realize(dev
, &local_err
);
1602 error_propagate(errp
, local_err
);
1606 /* Processor Service Interface (PSI) Host Bridge */
1607 object_property_set_int(OBJECT(&chip10
->psi
), "bar",
1608 PNV10_PSIHB_BASE(chip
), &error_fatal
);
1609 if (!qdev_realize(DEVICE(&chip10
->psi
), NULL
, errp
)) {
1612 pnv_xscom_add_subregion(chip
, PNV10_XSCOM_PSIHB_BASE
,
1613 &PNV_PSI(&chip10
->psi
)->xscom_regs
);
1616 object_property_set_link(OBJECT(&chip10
->lpc
), "psi",
1617 OBJECT(&chip10
->psi
), &error_abort
);
1618 if (!qdev_realize(DEVICE(&chip10
->lpc
), NULL
, errp
)) {
1621 memory_region_add_subregion(get_system_memory(), PNV10_LPCM_BASE(chip
),
1622 &chip10
->lpc
.xscom_regs
);
1624 chip
->fw_mr
= &chip10
->lpc
.isa_fw
;
1625 chip
->dt_isa_nodename
= g_strdup_printf("/lpcm-opb@%" PRIx64
"/lpc@0",
1626 (uint64_t) PNV10_LPCM_BASE(chip
));
1629 static uint32_t pnv_chip_power10_xscom_pcba(PnvChip
*chip
, uint64_t addr
)
1631 addr
&= (PNV10_XSCOM_SIZE
- 1);
1635 static void pnv_chip_power10_class_init(ObjectClass
*klass
, void *data
)
1637 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1638 PnvChipClass
*k
= PNV_CHIP_CLASS(klass
);
1640 k
->chip_cfam_id
= 0x120da04900008000ull
; /* P10 DD1.0 (with NX) */
1641 k
->cores_mask
= POWER10_CORE_MASK
;
1642 k
->core_pir
= pnv_chip_core_pir_p10
;
1643 k
->intc_create
= pnv_chip_power10_intc_create
;
1644 k
->intc_reset
= pnv_chip_power10_intc_reset
;
1645 k
->intc_destroy
= pnv_chip_power10_intc_destroy
;
1646 k
->intc_print_info
= pnv_chip_power10_intc_print_info
;
1647 k
->isa_create
= pnv_chip_power10_isa_create
;
1648 k
->dt_populate
= pnv_chip_power10_dt_populate
;
1649 k
->pic_print_info
= pnv_chip_power10_pic_print_info
;
1650 k
->xscom_core_base
= pnv_chip_power10_xscom_core_base
;
1651 k
->xscom_pcba
= pnv_chip_power10_xscom_pcba
;
1652 dc
->desc
= "PowerNV Chip POWER10";
1654 device_class_set_parent_realize(dc
, pnv_chip_power10_realize
,
1655 &k
->parent_realize
);
1658 static void pnv_chip_core_sanitize(PnvChip
*chip
, Error
**errp
)
1660 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(chip
);
1664 * No custom mask for this chip, let's use the default one from *
1667 if (!chip
->cores_mask
) {
1668 chip
->cores_mask
= pcc
->cores_mask
;
1671 /* filter alien core ids ! some are reserved */
1672 if ((chip
->cores_mask
& pcc
->cores_mask
) != chip
->cores_mask
) {
1673 error_setg(errp
, "warning: invalid core mask for chip Ox%"PRIx64
" !",
1677 chip
->cores_mask
&= pcc
->cores_mask
;
1679 /* now that we have a sane layout, let check the number of cores */
1680 cores_max
= ctpop64(chip
->cores_mask
);
1681 if (chip
->nr_cores
> cores_max
) {
1682 error_setg(errp
, "warning: too many cores for chip ! Limit is %d",
1688 static void pnv_chip_core_realize(PnvChip
*chip
, Error
**errp
)
1690 Error
*error
= NULL
;
1691 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(chip
);
1692 const char *typename
= pnv_chip_core_typename(chip
);
1694 PnvMachineState
*pnv
= PNV_MACHINE(qdev_get_machine());
1696 if (!object_class_by_name(typename
)) {
1697 error_setg(errp
, "Unable to find PowerNV CPU Core '%s'", typename
);
1702 pnv_chip_core_sanitize(chip
, &error
);
1704 error_propagate(errp
, error
);
1708 chip
->cores
= g_new0(PnvCore
*, chip
->nr_cores
);
1710 for (i
= 0, core_hwid
= 0; (core_hwid
< sizeof(chip
->cores_mask
) * 8)
1711 && (i
< chip
->nr_cores
); core_hwid
++) {
1714 uint64_t xscom_core_base
;
1716 if (!(chip
->cores_mask
& (1ull << core_hwid
))) {
1720 pnv_core
= PNV_CORE(object_new(typename
));
1722 snprintf(core_name
, sizeof(core_name
), "core[%d]", core_hwid
);
1723 object_property_add_child(OBJECT(chip
), core_name
, OBJECT(pnv_core
));
1724 chip
->cores
[i
] = pnv_core
;
1725 object_property_set_int(OBJECT(pnv_core
), "nr-threads",
1726 chip
->nr_threads
, &error_fatal
);
1727 object_property_set_int(OBJECT(pnv_core
), CPU_CORE_PROP_CORE_ID
,
1728 core_hwid
, &error_fatal
);
1729 object_property_set_int(OBJECT(pnv_core
), "pir",
1730 pcc
->core_pir(chip
, core_hwid
), &error_fatal
);
1731 object_property_set_int(OBJECT(pnv_core
), "hrmor", pnv
->fw_load_addr
,
1733 object_property_set_link(OBJECT(pnv_core
), "chip", OBJECT(chip
),
1735 qdev_realize(DEVICE(pnv_core
), NULL
, &error_fatal
);
1737 /* Each core has an XSCOM MMIO region */
1738 xscom_core_base
= pcc
->xscom_core_base(chip
, core_hwid
);
1740 pnv_xscom_add_subregion(chip
, xscom_core_base
,
1741 &pnv_core
->xscom_regs
);
1746 static void pnv_chip_realize(DeviceState
*dev
, Error
**errp
)
1748 PnvChip
*chip
= PNV_CHIP(dev
);
1749 Error
*error
= NULL
;
1752 pnv_chip_core_realize(chip
, &error
);
1754 error_propagate(errp
, error
);
1759 static Property pnv_chip_properties
[] = {
1760 DEFINE_PROP_UINT32("chip-id", PnvChip
, chip_id
, 0),
1761 DEFINE_PROP_UINT64("ram-start", PnvChip
, ram_start
, 0),
1762 DEFINE_PROP_UINT64("ram-size", PnvChip
, ram_size
, 0),
1763 DEFINE_PROP_UINT32("nr-cores", PnvChip
, nr_cores
, 1),
1764 DEFINE_PROP_UINT64("cores-mask", PnvChip
, cores_mask
, 0x0),
1765 DEFINE_PROP_UINT32("nr-threads", PnvChip
, nr_threads
, 1),
1766 DEFINE_PROP_UINT32("num-phbs", PnvChip
, num_phbs
, 0),
1767 DEFINE_PROP_END_OF_LIST(),
1770 static void pnv_chip_class_init(ObjectClass
*klass
, void *data
)
1772 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1774 set_bit(DEVICE_CATEGORY_CPU
, dc
->categories
);
1775 dc
->realize
= pnv_chip_realize
;
1776 device_class_set_props(dc
, pnv_chip_properties
);
1777 dc
->desc
= "PowerNV Chip";
1780 PowerPCCPU
*pnv_chip_find_cpu(PnvChip
*chip
, uint32_t pir
)
1784 for (i
= 0; i
< chip
->nr_cores
; i
++) {
1785 PnvCore
*pc
= chip
->cores
[i
];
1786 CPUCore
*cc
= CPU_CORE(pc
);
1788 for (j
= 0; j
< cc
->nr_threads
; j
++) {
1789 if (ppc_cpu_pir(pc
->threads
[j
]) == pir
) {
1790 return pc
->threads
[j
];
1797 static ICSState
*pnv_ics_get(XICSFabric
*xi
, int irq
)
1799 PnvMachineState
*pnv
= PNV_MACHINE(xi
);
1802 for (i
= 0; i
< pnv
->num_chips
; i
++) {
1803 PnvChip
*chip
= pnv
->chips
[i
];
1804 Pnv8Chip
*chip8
= PNV8_CHIP(pnv
->chips
[i
]);
1806 if (ics_valid_irq(&chip8
->psi
.ics
, irq
)) {
1807 return &chip8
->psi
.ics
;
1809 for (j
= 0; j
< chip
->num_phbs
; j
++) {
1810 if (ics_valid_irq(&chip8
->phbs
[j
].lsis
, irq
)) {
1811 return &chip8
->phbs
[j
].lsis
;
1813 if (ics_valid_irq(ICS(&chip8
->phbs
[j
].msis
), irq
)) {
1814 return ICS(&chip8
->phbs
[j
].msis
);
1821 static void pnv_ics_resend(XICSFabric
*xi
)
1823 PnvMachineState
*pnv
= PNV_MACHINE(xi
);
1826 for (i
= 0; i
< pnv
->num_chips
; i
++) {
1827 PnvChip
*chip
= pnv
->chips
[i
];
1828 Pnv8Chip
*chip8
= PNV8_CHIP(pnv
->chips
[i
]);
1830 ics_resend(&chip8
->psi
.ics
);
1831 for (j
= 0; j
< chip
->num_phbs
; j
++) {
1832 ics_resend(&chip8
->phbs
[j
].lsis
);
1833 ics_resend(ICS(&chip8
->phbs
[j
].msis
));
1838 static ICPState
*pnv_icp_get(XICSFabric
*xi
, int pir
)
1840 PowerPCCPU
*cpu
= ppc_get_vcpu_by_pir(pir
);
1842 return cpu
? ICP(pnv_cpu_state(cpu
)->intc
) : NULL
;
1845 static void pnv_pic_print_info(InterruptStatsProvider
*obj
,
1848 PnvMachineState
*pnv
= PNV_MACHINE(obj
);
1853 PowerPCCPU
*cpu
= POWERPC_CPU(cs
);
1855 /* XXX: loop on each chip/core/thread instead of CPU_FOREACH() */
1856 PNV_CHIP_GET_CLASS(pnv
->chips
[0])->intc_print_info(pnv
->chips
[0], cpu
,
1860 for (i
= 0; i
< pnv
->num_chips
; i
++) {
1861 PNV_CHIP_GET_CLASS(pnv
->chips
[i
])->pic_print_info(pnv
->chips
[i
], mon
);
1865 static int pnv_match_nvt(XiveFabric
*xfb
, uint8_t format
,
1866 uint8_t nvt_blk
, uint32_t nvt_idx
,
1867 bool cam_ignore
, uint8_t priority
,
1868 uint32_t logic_serv
,
1869 XiveTCTXMatch
*match
)
1871 PnvMachineState
*pnv
= PNV_MACHINE(xfb
);
1872 int total_count
= 0;
1875 for (i
= 0; i
< pnv
->num_chips
; i
++) {
1876 Pnv9Chip
*chip9
= PNV9_CHIP(pnv
->chips
[i
]);
1877 XivePresenter
*xptr
= XIVE_PRESENTER(&chip9
->xive
);
1878 XivePresenterClass
*xpc
= XIVE_PRESENTER_GET_CLASS(xptr
);
1881 count
= xpc
->match_nvt(xptr
, format
, nvt_blk
, nvt_idx
, cam_ignore
,
1882 priority
, logic_serv
, match
);
1888 total_count
+= count
;
1894 static void pnv_machine_power8_class_init(ObjectClass
*oc
, void *data
)
1896 MachineClass
*mc
= MACHINE_CLASS(oc
);
1897 XICSFabricClass
*xic
= XICS_FABRIC_CLASS(oc
);
1898 PnvMachineClass
*pmc
= PNV_MACHINE_CLASS(oc
);
1899 static const char compat
[] = "qemu,powernv8\0qemu,powernv\0ibm,powernv";
1901 mc
->desc
= "IBM PowerNV (Non-Virtualized) POWER8";
1902 mc
->default_cpu_type
= POWERPC_CPU_TYPE_NAME("power8_v2.0");
1904 xic
->icp_get
= pnv_icp_get
;
1905 xic
->ics_get
= pnv_ics_get
;
1906 xic
->ics_resend
= pnv_ics_resend
;
1908 pmc
->compat
= compat
;
1909 pmc
->compat_size
= sizeof(compat
);
1912 static void pnv_machine_power9_class_init(ObjectClass
*oc
, void *data
)
1914 MachineClass
*mc
= MACHINE_CLASS(oc
);
1915 XiveFabricClass
*xfc
= XIVE_FABRIC_CLASS(oc
);
1916 PnvMachineClass
*pmc
= PNV_MACHINE_CLASS(oc
);
1917 static const char compat
[] = "qemu,powernv9\0ibm,powernv";
1919 mc
->desc
= "IBM PowerNV (Non-Virtualized) POWER9";
1920 mc
->default_cpu_type
= POWERPC_CPU_TYPE_NAME("power9_v2.0");
1921 xfc
->match_nvt
= pnv_match_nvt
;
1923 mc
->alias
= "powernv";
1925 pmc
->compat
= compat
;
1926 pmc
->compat_size
= sizeof(compat
);
1927 pmc
->dt_power_mgt
= pnv_dt_power_mgt
;
1930 static void pnv_machine_power10_class_init(ObjectClass
*oc
, void *data
)
1932 MachineClass
*mc
= MACHINE_CLASS(oc
);
1933 PnvMachineClass
*pmc
= PNV_MACHINE_CLASS(oc
);
1934 static const char compat
[] = "qemu,powernv10\0ibm,powernv";
1936 mc
->desc
= "IBM PowerNV (Non-Virtualized) POWER10";
1937 mc
->default_cpu_type
= POWERPC_CPU_TYPE_NAME("power10_v2.0");
1939 pmc
->compat
= compat
;
1940 pmc
->compat_size
= sizeof(compat
);
1941 pmc
->dt_power_mgt
= pnv_dt_power_mgt
;
1944 static bool pnv_machine_get_hb(Object
*obj
, Error
**errp
)
1946 PnvMachineState
*pnv
= PNV_MACHINE(obj
);
1948 return !!pnv
->fw_load_addr
;
1951 static void pnv_machine_set_hb(Object
*obj
, bool value
, Error
**errp
)
1953 PnvMachineState
*pnv
= PNV_MACHINE(obj
);
1956 pnv
->fw_load_addr
= 0x8000000;
1960 static void pnv_cpu_do_nmi_on_cpu(CPUState
*cs
, run_on_cpu_data arg
)
1962 PowerPCCPU
*cpu
= POWERPC_CPU(cs
);
1963 CPUPPCState
*env
= &cpu
->env
;
1965 cpu_synchronize_state(cs
);
1966 ppc_cpu_do_system_reset(cs
);
1967 if (env
->spr
[SPR_SRR1
] & SRR1_WAKESTATE
) {
1969 * Power-save wakeups, as indicated by non-zero SRR1[46:47] put the
1970 * wakeup reason in SRR1[42:45], system reset is indicated with 0b0100
1973 if (!(env
->spr
[SPR_SRR1
] & SRR1_WAKERESET
)) {
1974 warn_report("ppc_cpu_do_system_reset does not set system reset wakeup reason");
1975 env
->spr
[SPR_SRR1
] |= SRR1_WAKERESET
;
1979 * For non-powersave system resets, SRR1[42:45] are defined to be
1980 * implementation-dependent. The POWER9 User Manual specifies that
1981 * an external (SCOM driven, which may come from a BMC nmi command or
1982 * another CPU requesting a NMI IPI) system reset exception should be
1983 * 0b0010 (PPC_BIT(44)).
1985 env
->spr
[SPR_SRR1
] |= SRR1_WAKESCOM
;
1989 static void pnv_nmi(NMIState
*n
, int cpu_index
, Error
**errp
)
1994 async_run_on_cpu(cs
, pnv_cpu_do_nmi_on_cpu
, RUN_ON_CPU_NULL
);
1998 static void pnv_machine_class_init(ObjectClass
*oc
, void *data
)
2000 MachineClass
*mc
= MACHINE_CLASS(oc
);
2001 InterruptStatsProviderClass
*ispc
= INTERRUPT_STATS_PROVIDER_CLASS(oc
);
2002 NMIClass
*nc
= NMI_CLASS(oc
);
2004 mc
->desc
= "IBM PowerNV (Non-Virtualized)";
2005 mc
->init
= pnv_init
;
2006 mc
->reset
= pnv_reset
;
2007 mc
->max_cpus
= MAX_CPUS
;
2008 /* Pnv provides a AHCI device for storage */
2009 mc
->block_default_type
= IF_IDE
;
2010 mc
->no_parallel
= 1;
2011 mc
->default_boot_order
= NULL
;
2013 * RAM defaults to less than 2048 for 32-bit hosts, and large
2014 * enough to fit the maximum initrd size at it's load address
2016 mc
->default_ram_size
= 1 * GiB
;
2017 mc
->default_ram_id
= "pnv.ram";
2018 ispc
->print_info
= pnv_pic_print_info
;
2019 nc
->nmi_monitor_handler
= pnv_nmi
;
2021 object_class_property_add_bool(oc
, "hb-mode",
2022 pnv_machine_get_hb
, pnv_machine_set_hb
);
2023 object_class_property_set_description(oc
, "hb-mode",
2024 "Use a hostboot like boot loader");
2027 #define DEFINE_PNV8_CHIP_TYPE(type, class_initfn) \
2030 .class_init = class_initfn, \
2031 .parent = TYPE_PNV8_CHIP, \
2034 #define DEFINE_PNV9_CHIP_TYPE(type, class_initfn) \
2037 .class_init = class_initfn, \
2038 .parent = TYPE_PNV9_CHIP, \
2041 #define DEFINE_PNV10_CHIP_TYPE(type, class_initfn) \
2044 .class_init = class_initfn, \
2045 .parent = TYPE_PNV10_CHIP, \
2048 static const TypeInfo types
[] = {
2050 .name
= MACHINE_TYPE_NAME("powernv10"),
2051 .parent
= TYPE_PNV_MACHINE
,
2052 .class_init
= pnv_machine_power10_class_init
,
2055 .name
= MACHINE_TYPE_NAME("powernv9"),
2056 .parent
= TYPE_PNV_MACHINE
,
2057 .class_init
= pnv_machine_power9_class_init
,
2058 .interfaces
= (InterfaceInfo
[]) {
2059 { TYPE_XIVE_FABRIC
},
2064 .name
= MACHINE_TYPE_NAME("powernv8"),
2065 .parent
= TYPE_PNV_MACHINE
,
2066 .class_init
= pnv_machine_power8_class_init
,
2067 .interfaces
= (InterfaceInfo
[]) {
2068 { TYPE_XICS_FABRIC
},
2073 .name
= TYPE_PNV_MACHINE
,
2074 .parent
= TYPE_MACHINE
,
2076 .instance_size
= sizeof(PnvMachineState
),
2077 .class_init
= pnv_machine_class_init
,
2078 .class_size
= sizeof(PnvMachineClass
),
2079 .interfaces
= (InterfaceInfo
[]) {
2080 { TYPE_INTERRUPT_STATS_PROVIDER
},
2086 .name
= TYPE_PNV_CHIP
,
2087 .parent
= TYPE_SYS_BUS_DEVICE
,
2088 .class_init
= pnv_chip_class_init
,
2089 .instance_size
= sizeof(PnvChip
),
2090 .class_size
= sizeof(PnvChipClass
),
2095 * P10 chip and variants
2098 .name
= TYPE_PNV10_CHIP
,
2099 .parent
= TYPE_PNV_CHIP
,
2100 .instance_init
= pnv_chip_power10_instance_init
,
2101 .instance_size
= sizeof(Pnv10Chip
),
2103 DEFINE_PNV10_CHIP_TYPE(TYPE_PNV_CHIP_POWER10
, pnv_chip_power10_class_init
),
2106 * P9 chip and variants
2109 .name
= TYPE_PNV9_CHIP
,
2110 .parent
= TYPE_PNV_CHIP
,
2111 .instance_init
= pnv_chip_power9_instance_init
,
2112 .instance_size
= sizeof(Pnv9Chip
),
2114 DEFINE_PNV9_CHIP_TYPE(TYPE_PNV_CHIP_POWER9
, pnv_chip_power9_class_init
),
2117 * P8 chip and variants
2120 .name
= TYPE_PNV8_CHIP
,
2121 .parent
= TYPE_PNV_CHIP
,
2122 .instance_init
= pnv_chip_power8_instance_init
,
2123 .instance_size
= sizeof(Pnv8Chip
),
2125 DEFINE_PNV8_CHIP_TYPE(TYPE_PNV_CHIP_POWER8
, pnv_chip_power8_class_init
),
2126 DEFINE_PNV8_CHIP_TYPE(TYPE_PNV_CHIP_POWER8E
, pnv_chip_power8e_class_init
),
2127 DEFINE_PNV8_CHIP_TYPE(TYPE_PNV_CHIP_POWER8NVL
,
2128 pnv_chip_power8nvl_class_init
),