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 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/units.h"
23 #include "qapi/error.h"
24 #include "sysemu/sysemu.h"
25 #include "sysemu/numa.h"
26 #include "sysemu/reset.h"
27 #include "sysemu/runstate.h"
28 #include "sysemu/cpus.h"
29 #include "sysemu/device_tree.h"
30 #include "target/ppc/cpu.h"
32 #include "hw/ppc/fdt.h"
33 #include "hw/ppc/ppc.h"
34 #include "hw/ppc/pnv.h"
35 #include "hw/ppc/pnv_core.h"
36 #include "hw/loader.h"
37 #include "exec/address-spaces.h"
38 #include "qapi/visitor.h"
39 #include "monitor/monitor.h"
40 #include "hw/intc/intc.h"
41 #include "hw/ipmi/ipmi.h"
42 #include "target/ppc/mmu-hash64.h"
44 #include "hw/ppc/xics.h"
45 #include "hw/qdev-properties.h"
46 #include "hw/ppc/pnv_xscom.h"
47 #include "hw/ppc/pnv_pnor.h"
49 #include "hw/isa/isa.h"
50 #include "hw/boards.h"
51 #include "hw/char/serial.h"
52 #include "hw/rtc/mc146818rtc.h"
56 #define FDT_MAX_SIZE (1 * MiB)
58 #define FW_FILE_NAME "skiboot.lid"
59 #define FW_LOAD_ADDR 0x0
60 #define FW_MAX_SIZE (4 * MiB)
62 #define KERNEL_LOAD_ADDR 0x20000000
63 #define KERNEL_MAX_SIZE (256 * MiB)
64 #define INITRD_LOAD_ADDR 0x60000000
65 #define INITRD_MAX_SIZE (256 * MiB)
67 static const char *pnv_chip_core_typename(const PnvChip
*o
)
69 const char *chip_type
= object_class_get_name(object_get_class(OBJECT(o
)));
70 int len
= strlen(chip_type
) - strlen(PNV_CHIP_TYPE_SUFFIX
);
71 char *s
= g_strdup_printf(PNV_CORE_TYPE_NAME("%.*s"), len
, chip_type
);
72 const char *core_type
= object_class_get_name(object_class_by_name(s
));
78 * On Power Systems E880 (POWER8), the max cpus (threads) should be :
79 * 4 * 4 sockets * 12 cores * 8 threads = 1536
85 * Memory nodes are created by hostboot, one for each range of memory
86 * that has a different "affinity". In practice, it means one range
89 static void pnv_dt_memory(void *fdt
, int chip_id
, hwaddr start
, hwaddr size
)
92 uint64_t mem_reg_property
[2];
95 mem_reg_property
[0] = cpu_to_be64(start
);
96 mem_reg_property
[1] = cpu_to_be64(size
);
98 mem_name
= g_strdup_printf("memory@%"HWADDR_PRIx
, start
);
99 off
= fdt_add_subnode(fdt
, 0, mem_name
);
102 _FDT((fdt_setprop_string(fdt
, off
, "device_type", "memory")));
103 _FDT((fdt_setprop(fdt
, off
, "reg", mem_reg_property
,
104 sizeof(mem_reg_property
))));
105 _FDT((fdt_setprop_cell(fdt
, off
, "ibm,chip-id", chip_id
)));
108 static int get_cpus_node(void *fdt
)
110 int cpus_offset
= fdt_path_offset(fdt
, "/cpus");
112 if (cpus_offset
< 0) {
113 cpus_offset
= fdt_add_subnode(fdt
, 0, "cpus");
115 _FDT((fdt_setprop_cell(fdt
, cpus_offset
, "#address-cells", 0x1)));
116 _FDT((fdt_setprop_cell(fdt
, cpus_offset
, "#size-cells", 0x0)));
124 * The PowerNV cores (and threads) need to use real HW ids and not an
125 * incremental index like it has been done on other platforms. This HW
126 * id is stored in the CPU PIR, it is used to create cpu nodes in the
127 * device tree, used in XSCOM to address cores and in interrupt
130 static void pnv_dt_core(PnvChip
*chip
, PnvCore
*pc
, void *fdt
)
132 PowerPCCPU
*cpu
= pc
->threads
[0];
133 CPUState
*cs
= CPU(cpu
);
134 DeviceClass
*dc
= DEVICE_GET_CLASS(cs
);
135 int smt_threads
= CPU_CORE(pc
)->nr_threads
;
136 CPUPPCState
*env
= &cpu
->env
;
137 PowerPCCPUClass
*pcc
= POWERPC_CPU_GET_CLASS(cs
);
138 uint32_t servers_prop
[smt_threads
];
140 uint32_t segs
[] = {cpu_to_be32(28), cpu_to_be32(40),
141 0xffffffff, 0xffffffff};
142 uint32_t tbfreq
= PNV_TIMEBASE_FREQ
;
143 uint32_t cpufreq
= 1000000000;
144 uint32_t page_sizes_prop
[64];
145 size_t page_sizes_prop_size
;
146 const uint8_t pa_features
[] = { 24, 0,
147 0xf6, 0x3f, 0xc7, 0xc0, 0x80, 0xf0,
148 0x80, 0x00, 0x00, 0x00, 0x00, 0x00,
149 0x00, 0x00, 0x00, 0x00, 0x80, 0x00,
150 0x80, 0x00, 0x80, 0x00, 0x80, 0x00 };
153 int cpus_offset
= get_cpus_node(fdt
);
155 nodename
= g_strdup_printf("%s@%x", dc
->fw_name
, pc
->pir
);
156 offset
= fdt_add_subnode(fdt
, cpus_offset
, nodename
);
160 _FDT((fdt_setprop_cell(fdt
, offset
, "ibm,chip-id", chip
->chip_id
)));
162 _FDT((fdt_setprop_cell(fdt
, offset
, "reg", pc
->pir
)));
163 _FDT((fdt_setprop_cell(fdt
, offset
, "ibm,pir", pc
->pir
)));
164 _FDT((fdt_setprop_string(fdt
, offset
, "device_type", "cpu")));
166 _FDT((fdt_setprop_cell(fdt
, offset
, "cpu-version", env
->spr
[SPR_PVR
])));
167 _FDT((fdt_setprop_cell(fdt
, offset
, "d-cache-block-size",
168 env
->dcache_line_size
)));
169 _FDT((fdt_setprop_cell(fdt
, offset
, "d-cache-line-size",
170 env
->dcache_line_size
)));
171 _FDT((fdt_setprop_cell(fdt
, offset
, "i-cache-block-size",
172 env
->icache_line_size
)));
173 _FDT((fdt_setprop_cell(fdt
, offset
, "i-cache-line-size",
174 env
->icache_line_size
)));
176 if (pcc
->l1_dcache_size
) {
177 _FDT((fdt_setprop_cell(fdt
, offset
, "d-cache-size",
178 pcc
->l1_dcache_size
)));
180 warn_report("Unknown L1 dcache size for cpu");
182 if (pcc
->l1_icache_size
) {
183 _FDT((fdt_setprop_cell(fdt
, offset
, "i-cache-size",
184 pcc
->l1_icache_size
)));
186 warn_report("Unknown L1 icache size for cpu");
189 _FDT((fdt_setprop_cell(fdt
, offset
, "timebase-frequency", tbfreq
)));
190 _FDT((fdt_setprop_cell(fdt
, offset
, "clock-frequency", cpufreq
)));
191 _FDT((fdt_setprop_cell(fdt
, offset
, "ibm,slb-size",
192 cpu
->hash64_opts
->slb_size
)));
193 _FDT((fdt_setprop_string(fdt
, offset
, "status", "okay")));
194 _FDT((fdt_setprop(fdt
, offset
, "64-bit", NULL
, 0)));
196 if (env
->spr_cb
[SPR_PURR
].oea_read
) {
197 _FDT((fdt_setprop(fdt
, offset
, "ibm,purr", NULL
, 0)));
200 if (ppc_hash64_has(cpu
, PPC_HASH64_1TSEG
)) {
201 _FDT((fdt_setprop(fdt
, offset
, "ibm,processor-segment-sizes",
202 segs
, sizeof(segs
))));
206 * Advertise VMX/VSX (vector extensions) if available
207 * 0 / no property == no vector extensions
208 * 1 == VMX / Altivec available
211 if (env
->insns_flags
& PPC_ALTIVEC
) {
212 uint32_t vmx
= (env
->insns_flags2
& PPC2_VSX
) ? 2 : 1;
214 _FDT((fdt_setprop_cell(fdt
, offset
, "ibm,vmx", vmx
)));
218 * Advertise DFP (Decimal Floating Point) if available
219 * 0 / no property == no DFP
222 if (env
->insns_flags2
& PPC2_DFP
) {
223 _FDT((fdt_setprop_cell(fdt
, offset
, "ibm,dfp", 1)));
226 page_sizes_prop_size
= ppc_create_page_sizes_prop(cpu
, page_sizes_prop
,
227 sizeof(page_sizes_prop
));
228 if (page_sizes_prop_size
) {
229 _FDT((fdt_setprop(fdt
, offset
, "ibm,segment-page-sizes",
230 page_sizes_prop
, page_sizes_prop_size
)));
233 _FDT((fdt_setprop(fdt
, offset
, "ibm,pa-features",
234 pa_features
, sizeof(pa_features
))));
236 /* Build interrupt servers properties */
237 for (i
= 0; i
< smt_threads
; i
++) {
238 servers_prop
[i
] = cpu_to_be32(pc
->pir
+ i
);
240 _FDT((fdt_setprop(fdt
, offset
, "ibm,ppc-interrupt-server#s",
241 servers_prop
, sizeof(servers_prop
))));
244 static void pnv_dt_icp(PnvChip
*chip
, void *fdt
, uint32_t pir
,
247 uint64_t addr
= PNV_ICP_BASE(chip
) | (pir
<< 12);
249 const char compat
[] = "IBM,power8-icp\0IBM,ppc-xicp";
250 uint32_t irange
[2], i
, rsize
;
254 irange
[0] = cpu_to_be32(pir
);
255 irange
[1] = cpu_to_be32(nr_threads
);
257 rsize
= sizeof(uint64_t) * 2 * nr_threads
;
258 reg
= g_malloc(rsize
);
259 for (i
= 0; i
< nr_threads
; i
++) {
260 reg
[i
* 2] = cpu_to_be64(addr
| ((pir
+ i
) * 0x1000));
261 reg
[i
* 2 + 1] = cpu_to_be64(0x1000);
264 name
= g_strdup_printf("interrupt-controller@%"PRIX64
, addr
);
265 offset
= fdt_add_subnode(fdt
, 0, name
);
269 _FDT((fdt_setprop(fdt
, offset
, "compatible", compat
, sizeof(compat
))));
270 _FDT((fdt_setprop(fdt
, offset
, "reg", reg
, rsize
)));
271 _FDT((fdt_setprop_string(fdt
, offset
, "device_type",
272 "PowerPC-External-Interrupt-Presentation")));
273 _FDT((fdt_setprop(fdt
, offset
, "interrupt-controller", NULL
, 0)));
274 _FDT((fdt_setprop(fdt
, offset
, "ibm,interrupt-server-ranges",
275 irange
, sizeof(irange
))));
276 _FDT((fdt_setprop_cell(fdt
, offset
, "#interrupt-cells", 1)));
277 _FDT((fdt_setprop_cell(fdt
, offset
, "#address-cells", 0)));
281 static void pnv_chip_power8_dt_populate(PnvChip
*chip
, void *fdt
)
285 pnv_dt_xscom(chip
, fdt
, 0);
287 for (i
= 0; i
< chip
->nr_cores
; i
++) {
288 PnvCore
*pnv_core
= chip
->cores
[i
];
290 pnv_dt_core(chip
, pnv_core
, fdt
);
292 /* Interrupt Control Presenters (ICP). One per core. */
293 pnv_dt_icp(chip
, fdt
, pnv_core
->pir
, CPU_CORE(pnv_core
)->nr_threads
);
296 if (chip
->ram_size
) {
297 pnv_dt_memory(fdt
, chip
->chip_id
, chip
->ram_start
, chip
->ram_size
);
301 static void pnv_chip_power9_dt_populate(PnvChip
*chip
, void *fdt
)
305 pnv_dt_xscom(chip
, fdt
, 0);
307 for (i
= 0; i
< chip
->nr_cores
; i
++) {
308 PnvCore
*pnv_core
= chip
->cores
[i
];
310 pnv_dt_core(chip
, pnv_core
, fdt
);
313 if (chip
->ram_size
) {
314 pnv_dt_memory(fdt
, chip
->chip_id
, chip
->ram_start
, chip
->ram_size
);
317 pnv_dt_lpc(chip
, fdt
, 0, PNV9_LPCM_BASE(chip
), PNV9_LPCM_SIZE
);
320 static void pnv_chip_power10_dt_populate(PnvChip
*chip
, void *fdt
)
324 pnv_dt_xscom(chip
, fdt
, 0);
326 for (i
= 0; i
< chip
->nr_cores
; i
++) {
327 PnvCore
*pnv_core
= chip
->cores
[i
];
329 pnv_dt_core(chip
, pnv_core
, fdt
);
332 if (chip
->ram_size
) {
333 pnv_dt_memory(fdt
, chip
->chip_id
, chip
->ram_start
, chip
->ram_size
);
336 pnv_dt_lpc(chip
, fdt
, 0, PNV10_LPCM_BASE(chip
), PNV10_LPCM_SIZE
);
339 static void pnv_dt_rtc(ISADevice
*d
, void *fdt
, int lpc_off
)
341 uint32_t io_base
= d
->ioport_id
;
342 uint32_t io_regs
[] = {
344 cpu_to_be32(io_base
),
350 name
= g_strdup_printf("%s@i%x", qdev_fw_name(DEVICE(d
)), io_base
);
351 node
= fdt_add_subnode(fdt
, lpc_off
, name
);
355 _FDT((fdt_setprop(fdt
, node
, "reg", io_regs
, sizeof(io_regs
))));
356 _FDT((fdt_setprop_string(fdt
, node
, "compatible", "pnpPNP,b00")));
359 static void pnv_dt_serial(ISADevice
*d
, void *fdt
, int lpc_off
)
361 const char compatible
[] = "ns16550\0pnpPNP,501";
362 uint32_t io_base
= d
->ioport_id
;
363 uint32_t io_regs
[] = {
365 cpu_to_be32(io_base
),
371 name
= g_strdup_printf("%s@i%x", qdev_fw_name(DEVICE(d
)), io_base
);
372 node
= fdt_add_subnode(fdt
, lpc_off
, name
);
376 _FDT((fdt_setprop(fdt
, node
, "reg", io_regs
, sizeof(io_regs
))));
377 _FDT((fdt_setprop(fdt
, node
, "compatible", compatible
,
378 sizeof(compatible
))));
380 _FDT((fdt_setprop_cell(fdt
, node
, "clock-frequency", 1843200)));
381 _FDT((fdt_setprop_cell(fdt
, node
, "current-speed", 115200)));
382 _FDT((fdt_setprop_cell(fdt
, node
, "interrupts", d
->isairq
[0])));
383 _FDT((fdt_setprop_cell(fdt
, node
, "interrupt-parent",
384 fdt_get_phandle(fdt
, lpc_off
))));
386 /* This is needed by Linux */
387 _FDT((fdt_setprop_string(fdt
, node
, "device_type", "serial")));
390 static void pnv_dt_ipmi_bt(ISADevice
*d
, void *fdt
, int lpc_off
)
392 const char compatible
[] = "bt\0ipmi-bt";
394 uint32_t io_regs
[] = {
396 0, /* 'io_base' retrieved from the 'ioport' property of 'isa-ipmi-bt' */
403 io_base
= object_property_get_int(OBJECT(d
), "ioport", &error_fatal
);
404 io_regs
[1] = cpu_to_be32(io_base
);
406 irq
= object_property_get_int(OBJECT(d
), "irq", &error_fatal
);
408 name
= g_strdup_printf("%s@i%x", qdev_fw_name(DEVICE(d
)), io_base
);
409 node
= fdt_add_subnode(fdt
, lpc_off
, name
);
413 _FDT((fdt_setprop(fdt
, node
, "reg", io_regs
, sizeof(io_regs
))));
414 _FDT((fdt_setprop(fdt
, node
, "compatible", compatible
,
415 sizeof(compatible
))));
417 /* Mark it as reserved to avoid Linux trying to claim it */
418 _FDT((fdt_setprop_string(fdt
, node
, "status", "reserved")));
419 _FDT((fdt_setprop_cell(fdt
, node
, "interrupts", irq
)));
420 _FDT((fdt_setprop_cell(fdt
, node
, "interrupt-parent",
421 fdt_get_phandle(fdt
, lpc_off
))));
424 typedef struct ForeachPopulateArgs
{
427 } ForeachPopulateArgs
;
429 static int pnv_dt_isa_device(DeviceState
*dev
, void *opaque
)
431 ForeachPopulateArgs
*args
= opaque
;
432 ISADevice
*d
= ISA_DEVICE(dev
);
434 if (object_dynamic_cast(OBJECT(dev
), TYPE_MC146818_RTC
)) {
435 pnv_dt_rtc(d
, args
->fdt
, args
->offset
);
436 } else if (object_dynamic_cast(OBJECT(dev
), TYPE_ISA_SERIAL
)) {
437 pnv_dt_serial(d
, args
->fdt
, args
->offset
);
438 } else if (object_dynamic_cast(OBJECT(dev
), "isa-ipmi-bt")) {
439 pnv_dt_ipmi_bt(d
, args
->fdt
, args
->offset
);
441 error_report("unknown isa device %s@i%x", qdev_fw_name(dev
),
449 * The default LPC bus of a multichip system is on chip 0. It's
450 * recognized by the firmware (skiboot) using a "primary" property.
452 static void pnv_dt_isa(PnvMachineState
*pnv
, void *fdt
)
454 int isa_offset
= fdt_path_offset(fdt
, pnv
->chips
[0]->dt_isa_nodename
);
455 ForeachPopulateArgs args
= {
457 .offset
= isa_offset
,
461 _FDT((fdt_setprop(fdt
, isa_offset
, "primary", NULL
, 0)));
463 phandle
= qemu_fdt_alloc_phandle(fdt
);
465 _FDT((fdt_setprop_cell(fdt
, isa_offset
, "phandle", phandle
)));
468 * ISA devices are not necessarily parented to the ISA bus so we
469 * can not use object_child_foreach()
471 qbus_walk_children(BUS(pnv
->isa_bus
), pnv_dt_isa_device
, NULL
, NULL
, NULL
,
475 static void pnv_dt_power_mgt(void *fdt
)
479 off
= fdt_add_subnode(fdt
, 0, "ibm,opal");
480 off
= fdt_add_subnode(fdt
, off
, "power-mgt");
482 _FDT(fdt_setprop_cell(fdt
, off
, "ibm,enabled-stop-levels", 0xc0000000));
485 static void *pnv_dt_create(MachineState
*machine
)
487 const char plat_compat8
[] = "qemu,powernv8\0qemu,powernv\0ibm,powernv";
488 const char plat_compat9
[] = "qemu,powernv9\0ibm,powernv";
489 const char plat_compat10
[] = "qemu,powernv10\0ibm,powernv";
490 PnvMachineState
*pnv
= PNV_MACHINE(machine
);
496 fdt
= g_malloc0(FDT_MAX_SIZE
);
497 _FDT((fdt_create_empty_tree(fdt
, FDT_MAX_SIZE
)));
500 _FDT((fdt_add_subnode(fdt
, 0, "qemu")));
503 _FDT((fdt_setprop_cell(fdt
, 0, "#address-cells", 0x2)));
504 _FDT((fdt_setprop_cell(fdt
, 0, "#size-cells", 0x2)));
505 _FDT((fdt_setprop_string(fdt
, 0, "model",
506 "IBM PowerNV (emulated by qemu)")));
507 if (pnv_is_power10(pnv
)) {
508 _FDT((fdt_setprop(fdt
, 0, "compatible", plat_compat10
,
509 sizeof(plat_compat10
))));
510 } else if (pnv_is_power9(pnv
)) {
511 _FDT((fdt_setprop(fdt
, 0, "compatible", plat_compat9
,
512 sizeof(plat_compat9
))));
514 _FDT((fdt_setprop(fdt
, 0, "compatible", plat_compat8
,
515 sizeof(plat_compat8
))));
519 buf
= qemu_uuid_unparse_strdup(&qemu_uuid
);
520 _FDT((fdt_setprop_string(fdt
, 0, "vm,uuid", buf
)));
522 _FDT((fdt_property_string(fdt
, "system-id", buf
)));
526 off
= fdt_add_subnode(fdt
, 0, "chosen");
527 if (machine
->kernel_cmdline
) {
528 _FDT((fdt_setprop_string(fdt
, off
, "bootargs",
529 machine
->kernel_cmdline
)));
532 if (pnv
->initrd_size
) {
533 uint32_t start_prop
= cpu_to_be32(pnv
->initrd_base
);
534 uint32_t end_prop
= cpu_to_be32(pnv
->initrd_base
+ pnv
->initrd_size
);
536 _FDT((fdt_setprop(fdt
, off
, "linux,initrd-start",
537 &start_prop
, sizeof(start_prop
))));
538 _FDT((fdt_setprop(fdt
, off
, "linux,initrd-end",
539 &end_prop
, sizeof(end_prop
))));
542 /* Populate device tree for each chip */
543 for (i
= 0; i
< pnv
->num_chips
; i
++) {
544 PNV_CHIP_GET_CLASS(pnv
->chips
[i
])->dt_populate(pnv
->chips
[i
], fdt
);
547 /* Populate ISA devices on chip 0 */
548 pnv_dt_isa(pnv
, fdt
);
551 pnv_dt_bmc_sensors(pnv
->bmc
, fdt
);
554 /* Create an extra node for power management on Power9 and Power10 */
555 if (pnv_is_power9(pnv
) || pnv_is_power10(pnv
)) {
556 pnv_dt_power_mgt(fdt
);
562 static void pnv_powerdown_notify(Notifier
*n
, void *opaque
)
564 PnvMachineState
*pnv
= PNV_MACHINE(qdev_get_machine());
567 pnv_bmc_powerdown(pnv
->bmc
);
571 static void pnv_reset(MachineState
*machine
)
575 qemu_devices_reset();
577 fdt
= pnv_dt_create(machine
);
579 /* Pack resulting tree */
580 _FDT((fdt_pack(fdt
)));
582 qemu_fdt_dumpdtb(fdt
, fdt_totalsize(fdt
));
583 cpu_physical_memory_write(PNV_FDT_ADDR
, fdt
, fdt_totalsize(fdt
));
586 static ISABus
*pnv_chip_power8_isa_create(PnvChip
*chip
, Error
**errp
)
588 Pnv8Chip
*chip8
= PNV8_CHIP(chip
);
589 return pnv_lpc_isa_create(&chip8
->lpc
, true, errp
);
592 static ISABus
*pnv_chip_power8nvl_isa_create(PnvChip
*chip
, Error
**errp
)
594 Pnv8Chip
*chip8
= PNV8_CHIP(chip
);
595 return pnv_lpc_isa_create(&chip8
->lpc
, false, errp
);
598 static ISABus
*pnv_chip_power9_isa_create(PnvChip
*chip
, Error
**errp
)
600 Pnv9Chip
*chip9
= PNV9_CHIP(chip
);
601 return pnv_lpc_isa_create(&chip9
->lpc
, false, errp
);
604 static ISABus
*pnv_chip_power10_isa_create(PnvChip
*chip
, Error
**errp
)
606 Pnv10Chip
*chip10
= PNV10_CHIP(chip
);
607 return pnv_lpc_isa_create(&chip10
->lpc
, false, errp
);
610 static ISABus
*pnv_isa_create(PnvChip
*chip
, Error
**errp
)
612 return PNV_CHIP_GET_CLASS(chip
)->isa_create(chip
, errp
);
615 static void pnv_chip_power8_pic_print_info(PnvChip
*chip
, Monitor
*mon
)
617 Pnv8Chip
*chip8
= PNV8_CHIP(chip
);
619 ics_pic_print_info(&chip8
->psi
.ics
, mon
);
622 static void pnv_chip_power9_pic_print_info(PnvChip
*chip
, Monitor
*mon
)
624 Pnv9Chip
*chip9
= PNV9_CHIP(chip
);
626 pnv_xive_pic_print_info(&chip9
->xive
, mon
);
627 pnv_psi_pic_print_info(&chip9
->psi
, mon
);
630 static bool pnv_match_cpu(const char *default_type
, const char *cpu_type
)
632 PowerPCCPUClass
*ppc_default
=
633 POWERPC_CPU_CLASS(object_class_by_name(default_type
));
634 PowerPCCPUClass
*ppc
=
635 POWERPC_CPU_CLASS(object_class_by_name(cpu_type
));
637 return ppc_default
->pvr_match(ppc_default
, ppc
->pvr
);
640 static void pnv_ipmi_bt_init(ISABus
*bus
, IPMIBmc
*bmc
, uint32_t irq
)
644 obj
= OBJECT(isa_create(bus
, "isa-ipmi-bt"));
645 object_property_set_link(obj
, OBJECT(bmc
), "bmc", &error_fatal
);
646 object_property_set_int(obj
, irq
, "irq", &error_fatal
);
647 object_property_set_bool(obj
, true, "realized", &error_fatal
);
650 static void pnv_chip_power10_pic_print_info(PnvChip
*chip
, Monitor
*mon
)
652 Pnv10Chip
*chip10
= PNV10_CHIP(chip
);
654 pnv_psi_pic_print_info(&chip10
->psi
, mon
);
657 static void pnv_init(MachineState
*machine
)
659 PnvMachineState
*pnv
= PNV_MACHINE(machine
);
660 MachineClass
*mc
= MACHINE_GET_CLASS(machine
);
666 DriveInfo
*pnor
= drive_get(IF_MTD
, 0, 0);
670 if (machine
->ram_size
< (1 * GiB
)) {
671 warn_report("skiboot may not work with < 1GB of RAM");
674 ram
= g_new(MemoryRegion
, 1);
675 memory_region_allocate_system_memory(ram
, NULL
, "pnv.ram",
677 memory_region_add_subregion(get_system_memory(), 0, ram
);
680 * Create our simple PNOR device
682 dev
= qdev_create(NULL
, TYPE_PNV_PNOR
);
684 qdev_prop_set_drive(dev
, "drive", blk_by_legacy_dinfo(pnor
),
687 qdev_init_nofail(dev
);
688 pnv
->pnor
= PNV_PNOR(dev
);
690 /* load skiboot firmware */
691 if (bios_name
== NULL
) {
692 bios_name
= FW_FILE_NAME
;
695 fw_filename
= qemu_find_file(QEMU_FILE_TYPE_BIOS
, bios_name
);
697 error_report("Could not find OPAL firmware '%s'", bios_name
);
701 fw_size
= load_image_targphys(fw_filename
, FW_LOAD_ADDR
, FW_MAX_SIZE
);
703 error_report("Could not load OPAL firmware '%s'", fw_filename
);
709 if (machine
->kernel_filename
) {
712 kernel_size
= load_image_targphys(machine
->kernel_filename
,
713 KERNEL_LOAD_ADDR
, KERNEL_MAX_SIZE
);
714 if (kernel_size
< 0) {
715 error_report("Could not load kernel '%s'",
716 machine
->kernel_filename
);
722 if (machine
->initrd_filename
) {
723 pnv
->initrd_base
= INITRD_LOAD_ADDR
;
724 pnv
->initrd_size
= load_image_targphys(machine
->initrd_filename
,
725 pnv
->initrd_base
, INITRD_MAX_SIZE
);
726 if (pnv
->initrd_size
< 0) {
727 error_report("Could not load initial ram disk '%s'",
728 machine
->initrd_filename
);
734 * Check compatibility of the specified CPU with the machine
737 if (!pnv_match_cpu(mc
->default_cpu_type
, machine
->cpu_type
)) {
738 error_report("invalid CPU model '%s' for %s machine",
739 machine
->cpu_type
, mc
->name
);
743 /* Create the processor chips */
744 i
= strlen(machine
->cpu_type
) - strlen(POWERPC_CPU_TYPE_SUFFIX
);
745 chip_typename
= g_strdup_printf(PNV_CHIP_TYPE_NAME("%.*s"),
746 i
, machine
->cpu_type
);
747 if (!object_class_by_name(chip_typename
)) {
748 error_report("invalid chip model '%.*s' for %s machine",
749 i
, machine
->cpu_type
, mc
->name
);
753 pnv
->chips
= g_new0(PnvChip
*, pnv
->num_chips
);
754 for (i
= 0; i
< pnv
->num_chips
; i
++) {
756 Object
*chip
= object_new(chip_typename
);
758 pnv
->chips
[i
] = PNV_CHIP(chip
);
761 * TODO: put all the memory in one node on chip 0 until we find a
762 * way to specify different ranges for each chip
765 object_property_set_int(chip
, machine
->ram_size
, "ram-size",
769 snprintf(chip_name
, sizeof(chip_name
), "chip[%d]", PNV_CHIP_HWID(i
));
770 object_property_add_child(OBJECT(pnv
), chip_name
, chip
, &error_fatal
);
771 object_property_set_int(chip
, PNV_CHIP_HWID(i
), "chip-id",
773 object_property_set_int(chip
, machine
->smp
.cores
,
774 "nr-cores", &error_fatal
);
775 object_property_set_bool(chip
, true, "realized", &error_fatal
);
777 g_free(chip_typename
);
779 /* Create the machine BMC simulator */
780 pnv
->bmc
= pnv_bmc_create();
782 /* Instantiate ISA bus on chip 0 */
783 pnv
->isa_bus
= pnv_isa_create(pnv
->chips
[0], &error_fatal
);
785 /* Create serial port */
786 serial_hds_isa_init(pnv
->isa_bus
, 0, MAX_ISA_SERIAL_PORTS
);
788 /* Create an RTC ISA device too */
789 mc146818_rtc_init(pnv
->isa_bus
, 2000, NULL
);
791 /* Create the IPMI BT device for communication with the BMC */
792 pnv_ipmi_bt_init(pnv
->isa_bus
, pnv
->bmc
, 10);
795 * OpenPOWER systems use a IPMI SEL Event message to notify the
798 pnv
->powerdown_notifier
.notify
= pnv_powerdown_notify
;
799 qemu_register_powerdown_notifier(&pnv
->powerdown_notifier
);
803 * 0:21 Reserved - Read as zeros
808 static uint32_t pnv_chip_core_pir_p8(PnvChip
*chip
, uint32_t core_id
)
810 return (chip
->chip_id
<< 7) | (core_id
<< 3);
813 static void pnv_chip_power8_intc_create(PnvChip
*chip
, PowerPCCPU
*cpu
,
816 Error
*local_err
= NULL
;
818 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
820 obj
= icp_create(OBJECT(cpu
), TYPE_PNV_ICP
, XICS_FABRIC(qdev_get_machine()),
823 error_propagate(errp
, local_err
);
831 static void pnv_chip_power8_intc_reset(PnvChip
*chip
, PowerPCCPU
*cpu
)
833 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
835 icp_reset(ICP(pnv_cpu
->intc
));
838 static void pnv_chip_power8_intc_destroy(PnvChip
*chip
, PowerPCCPU
*cpu
)
840 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
842 icp_destroy(ICP(pnv_cpu
->intc
));
843 pnv_cpu
->intc
= NULL
;
847 * 0:48 Reserved - Read as zeroes
850 * 56 Reserved - Read as zero
854 * We only care about the lower bits. uint32_t is fine for the moment.
856 static uint32_t pnv_chip_core_pir_p9(PnvChip
*chip
, uint32_t core_id
)
858 return (chip
->chip_id
<< 8) | (core_id
<< 2);
861 static uint32_t pnv_chip_core_pir_p10(PnvChip
*chip
, uint32_t core_id
)
863 return (chip
->chip_id
<< 8) | (core_id
<< 2);
866 static void pnv_chip_power9_intc_create(PnvChip
*chip
, PowerPCCPU
*cpu
,
869 Pnv9Chip
*chip9
= PNV9_CHIP(chip
);
870 Error
*local_err
= NULL
;
872 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
875 * The core creates its interrupt presenter but the XIVE interrupt
876 * controller object is initialized afterwards. Hopefully, it's
877 * only used at runtime.
879 obj
= xive_tctx_create(OBJECT(cpu
), XIVE_ROUTER(&chip9
->xive
), &local_err
);
881 error_propagate(errp
, local_err
);
888 static void pnv_chip_power9_intc_reset(PnvChip
*chip
, PowerPCCPU
*cpu
)
890 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
892 xive_tctx_reset(XIVE_TCTX(pnv_cpu
->intc
));
895 static void pnv_chip_power9_intc_destroy(PnvChip
*chip
, PowerPCCPU
*cpu
)
897 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
899 xive_tctx_destroy(XIVE_TCTX(pnv_cpu
->intc
));
900 pnv_cpu
->intc
= NULL
;
903 static void pnv_chip_power10_intc_create(PnvChip
*chip
, PowerPCCPU
*cpu
,
906 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
908 /* Will be defined when the interrupt controller is */
909 pnv_cpu
->intc
= NULL
;
912 static void pnv_chip_power10_intc_reset(PnvChip
*chip
, PowerPCCPU
*cpu
)
917 static void pnv_chip_power10_intc_destroy(PnvChip
*chip
, PowerPCCPU
*cpu
)
919 PnvCPUState
*pnv_cpu
= pnv_cpu_state(cpu
);
921 pnv_cpu
->intc
= NULL
;
925 * Allowed core identifiers on a POWER8 Processor Chip :
934 * <EX7,8 reserved> <reserved>
943 #define POWER8E_CORE_MASK (0x7070ull)
944 #define POWER8_CORE_MASK (0x7e7eull)
947 * POWER9 has 24 cores, ids starting at 0x0
949 #define POWER9_CORE_MASK (0xffffffffffffffull)
952 #define POWER10_CORE_MASK (0xffffffffffffffull)
954 static void pnv_chip_power8_instance_init(Object
*obj
)
956 Pnv8Chip
*chip8
= PNV8_CHIP(obj
);
958 object_initialize_child(obj
, "psi", &chip8
->psi
, sizeof(chip8
->psi
),
959 TYPE_PNV8_PSI
, &error_abort
, NULL
);
960 object_property_add_const_link(OBJECT(&chip8
->psi
), "xics",
961 OBJECT(qdev_get_machine()), &error_abort
);
963 object_initialize_child(obj
, "lpc", &chip8
->lpc
, sizeof(chip8
->lpc
),
964 TYPE_PNV8_LPC
, &error_abort
, NULL
);
966 object_initialize_child(obj
, "occ", &chip8
->occ
, sizeof(chip8
->occ
),
967 TYPE_PNV8_OCC
, &error_abort
, NULL
);
969 object_initialize_child(obj
, "homer", &chip8
->homer
, sizeof(chip8
->homer
),
970 TYPE_PNV8_HOMER
, &error_abort
, NULL
);
973 static void pnv_chip_icp_realize(Pnv8Chip
*chip8
, Error
**errp
)
975 PnvChip
*chip
= PNV_CHIP(chip8
);
976 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(chip
);
979 XICSFabric
*xi
= XICS_FABRIC(qdev_get_machine());
981 name
= g_strdup_printf("icp-%x", chip
->chip_id
);
982 memory_region_init(&chip8
->icp_mmio
, OBJECT(chip
), name
, PNV_ICP_SIZE
);
983 sysbus_init_mmio(SYS_BUS_DEVICE(chip
), &chip8
->icp_mmio
);
986 sysbus_mmio_map(SYS_BUS_DEVICE(chip
), 1, PNV_ICP_BASE(chip
));
988 /* Map the ICP registers for each thread */
989 for (i
= 0; i
< chip
->nr_cores
; i
++) {
990 PnvCore
*pnv_core
= chip
->cores
[i
];
991 int core_hwid
= CPU_CORE(pnv_core
)->core_id
;
993 for (j
= 0; j
< CPU_CORE(pnv_core
)->nr_threads
; j
++) {
994 uint32_t pir
= pcc
->core_pir(chip
, core_hwid
) + j
;
995 PnvICPState
*icp
= PNV_ICP(xics_icp_get(xi
, pir
));
997 memory_region_add_subregion(&chip8
->icp_mmio
, pir
<< 12,
1003 static void pnv_chip_power8_realize(DeviceState
*dev
, Error
**errp
)
1005 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(dev
);
1006 PnvChip
*chip
= PNV_CHIP(dev
);
1007 Pnv8Chip
*chip8
= PNV8_CHIP(dev
);
1008 Pnv8Psi
*psi8
= &chip8
->psi
;
1009 Error
*local_err
= NULL
;
1011 /* XSCOM bridge is first */
1012 pnv_xscom_realize(chip
, PNV_XSCOM_SIZE
, &local_err
);
1014 error_propagate(errp
, local_err
);
1017 sysbus_mmio_map(SYS_BUS_DEVICE(chip
), 0, PNV_XSCOM_BASE(chip
));
1019 pcc
->parent_realize(dev
, &local_err
);
1021 error_propagate(errp
, local_err
);
1025 /* Processor Service Interface (PSI) Host Bridge */
1026 object_property_set_int(OBJECT(&chip8
->psi
), PNV_PSIHB_BASE(chip
),
1027 "bar", &error_fatal
);
1028 object_property_set_bool(OBJECT(&chip8
->psi
), true, "realized", &local_err
);
1030 error_propagate(errp
, local_err
);
1033 pnv_xscom_add_subregion(chip
, PNV_XSCOM_PSIHB_BASE
,
1034 &PNV_PSI(psi8
)->xscom_regs
);
1036 /* Create LPC controller */
1037 object_property_set_link(OBJECT(&chip8
->lpc
), OBJECT(&chip8
->psi
), "psi",
1039 object_property_set_bool(OBJECT(&chip8
->lpc
), true, "realized",
1041 pnv_xscom_add_subregion(chip
, PNV_XSCOM_LPC_BASE
, &chip8
->lpc
.xscom_regs
);
1043 chip
->dt_isa_nodename
= g_strdup_printf("/xscom@%" PRIx64
"/isa@%x",
1044 (uint64_t) PNV_XSCOM_BASE(chip
),
1045 PNV_XSCOM_LPC_BASE
);
1048 * Interrupt Management Area. This is the memory region holding
1049 * all the Interrupt Control Presenter (ICP) registers
1051 pnv_chip_icp_realize(chip8
, &local_err
);
1053 error_propagate(errp
, local_err
);
1057 /* Create the simplified OCC model */
1058 object_property_set_link(OBJECT(&chip8
->occ
), OBJECT(&chip8
->psi
), "psi",
1060 object_property_set_bool(OBJECT(&chip8
->occ
), true, "realized", &local_err
);
1062 error_propagate(errp
, local_err
);
1065 pnv_xscom_add_subregion(chip
, PNV_XSCOM_OCC_BASE
, &chip8
->occ
.xscom_regs
);
1067 /* OCC SRAM model */
1068 memory_region_add_subregion(get_system_memory(), PNV_OCC_SENSOR_BASE(chip
),
1069 &chip8
->occ
.sram_regs
);
1072 object_property_set_link(OBJECT(&chip8
->homer
), OBJECT(chip
), "chip",
1074 object_property_set_bool(OBJECT(&chip8
->homer
), true, "realized",
1077 error_propagate(errp
, local_err
);
1080 /* Homer Xscom region */
1081 pnv_xscom_add_subregion(chip
, PNV_XSCOM_PBA_BASE
, &chip8
->homer
.pba_regs
);
1083 /* Homer mmio region */
1084 memory_region_add_subregion(get_system_memory(), PNV_HOMER_BASE(chip
),
1085 &chip8
->homer
.regs
);
1088 static void pnv_chip_power8e_class_init(ObjectClass
*klass
, void *data
)
1090 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1091 PnvChipClass
*k
= PNV_CHIP_CLASS(klass
);
1093 k
->chip_type
= PNV_CHIP_POWER8E
;
1094 k
->chip_cfam_id
= 0x221ef04980000000ull
; /* P8 Murano DD2.1 */
1095 k
->cores_mask
= POWER8E_CORE_MASK
;
1096 k
->core_pir
= pnv_chip_core_pir_p8
;
1097 k
->intc_create
= pnv_chip_power8_intc_create
;
1098 k
->intc_reset
= pnv_chip_power8_intc_reset
;
1099 k
->intc_destroy
= pnv_chip_power8_intc_destroy
;
1100 k
->isa_create
= pnv_chip_power8_isa_create
;
1101 k
->dt_populate
= pnv_chip_power8_dt_populate
;
1102 k
->pic_print_info
= pnv_chip_power8_pic_print_info
;
1103 dc
->desc
= "PowerNV Chip POWER8E";
1105 device_class_set_parent_realize(dc
, pnv_chip_power8_realize
,
1106 &k
->parent_realize
);
1109 static void pnv_chip_power8_class_init(ObjectClass
*klass
, void *data
)
1111 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1112 PnvChipClass
*k
= PNV_CHIP_CLASS(klass
);
1114 k
->chip_type
= PNV_CHIP_POWER8
;
1115 k
->chip_cfam_id
= 0x220ea04980000000ull
; /* P8 Venice DD2.0 */
1116 k
->cores_mask
= POWER8_CORE_MASK
;
1117 k
->core_pir
= pnv_chip_core_pir_p8
;
1118 k
->intc_create
= pnv_chip_power8_intc_create
;
1119 k
->intc_reset
= pnv_chip_power8_intc_reset
;
1120 k
->intc_destroy
= pnv_chip_power8_intc_destroy
;
1121 k
->isa_create
= pnv_chip_power8_isa_create
;
1122 k
->dt_populate
= pnv_chip_power8_dt_populate
;
1123 k
->pic_print_info
= pnv_chip_power8_pic_print_info
;
1124 dc
->desc
= "PowerNV Chip POWER8";
1126 device_class_set_parent_realize(dc
, pnv_chip_power8_realize
,
1127 &k
->parent_realize
);
1130 static void pnv_chip_power8nvl_class_init(ObjectClass
*klass
, void *data
)
1132 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1133 PnvChipClass
*k
= PNV_CHIP_CLASS(klass
);
1135 k
->chip_type
= PNV_CHIP_POWER8NVL
;
1136 k
->chip_cfam_id
= 0x120d304980000000ull
; /* P8 Naples DD1.0 */
1137 k
->cores_mask
= POWER8_CORE_MASK
;
1138 k
->core_pir
= pnv_chip_core_pir_p8
;
1139 k
->intc_create
= pnv_chip_power8_intc_create
;
1140 k
->intc_reset
= pnv_chip_power8_intc_reset
;
1141 k
->intc_destroy
= pnv_chip_power8_intc_destroy
;
1142 k
->isa_create
= pnv_chip_power8nvl_isa_create
;
1143 k
->dt_populate
= pnv_chip_power8_dt_populate
;
1144 k
->pic_print_info
= pnv_chip_power8_pic_print_info
;
1145 dc
->desc
= "PowerNV Chip POWER8NVL";
1147 device_class_set_parent_realize(dc
, pnv_chip_power8_realize
,
1148 &k
->parent_realize
);
1151 static void pnv_chip_power9_instance_init(Object
*obj
)
1153 Pnv9Chip
*chip9
= PNV9_CHIP(obj
);
1155 object_initialize_child(obj
, "xive", &chip9
->xive
, sizeof(chip9
->xive
),
1156 TYPE_PNV_XIVE
, &error_abort
, NULL
);
1158 object_initialize_child(obj
, "psi", &chip9
->psi
, sizeof(chip9
->psi
),
1159 TYPE_PNV9_PSI
, &error_abort
, NULL
);
1161 object_initialize_child(obj
, "lpc", &chip9
->lpc
, sizeof(chip9
->lpc
),
1162 TYPE_PNV9_LPC
, &error_abort
, NULL
);
1164 object_initialize_child(obj
, "occ", &chip9
->occ
, sizeof(chip9
->occ
),
1165 TYPE_PNV9_OCC
, &error_abort
, NULL
);
1167 object_initialize_child(obj
, "homer", &chip9
->homer
, sizeof(chip9
->homer
),
1168 TYPE_PNV9_HOMER
, &error_abort
, NULL
);
1171 static void pnv_chip_quad_realize(Pnv9Chip
*chip9
, Error
**errp
)
1173 PnvChip
*chip
= PNV_CHIP(chip9
);
1176 chip9
->nr_quads
= DIV_ROUND_UP(chip
->nr_cores
, 4);
1177 chip9
->quads
= g_new0(PnvQuad
, chip9
->nr_quads
);
1179 for (i
= 0; i
< chip9
->nr_quads
; i
++) {
1181 PnvQuad
*eq
= &chip9
->quads
[i
];
1182 PnvCore
*pnv_core
= chip
->cores
[i
* 4];
1183 int core_id
= CPU_CORE(pnv_core
)->core_id
;
1185 snprintf(eq_name
, sizeof(eq_name
), "eq[%d]", core_id
);
1186 object_initialize_child(OBJECT(chip
), eq_name
, eq
, sizeof(*eq
),
1187 TYPE_PNV_QUAD
, &error_fatal
, NULL
);
1189 object_property_set_int(OBJECT(eq
), core_id
, "id", &error_fatal
);
1190 object_property_set_bool(OBJECT(eq
), true, "realized", &error_fatal
);
1192 pnv_xscom_add_subregion(chip
, PNV9_XSCOM_EQ_BASE(eq
->id
),
1197 static void pnv_chip_power9_realize(DeviceState
*dev
, Error
**errp
)
1199 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(dev
);
1200 Pnv9Chip
*chip9
= PNV9_CHIP(dev
);
1201 PnvChip
*chip
= PNV_CHIP(dev
);
1202 Pnv9Psi
*psi9
= &chip9
->psi
;
1203 Error
*local_err
= NULL
;
1205 /* XSCOM bridge is first */
1206 pnv_xscom_realize(chip
, PNV9_XSCOM_SIZE
, &local_err
);
1208 error_propagate(errp
, local_err
);
1211 sysbus_mmio_map(SYS_BUS_DEVICE(chip
), 0, PNV9_XSCOM_BASE(chip
));
1213 pcc
->parent_realize(dev
, &local_err
);
1215 error_propagate(errp
, local_err
);
1219 pnv_chip_quad_realize(chip9
, &local_err
);
1221 error_propagate(errp
, local_err
);
1225 /* XIVE interrupt controller (POWER9) */
1226 object_property_set_int(OBJECT(&chip9
->xive
), PNV9_XIVE_IC_BASE(chip
),
1227 "ic-bar", &error_fatal
);
1228 object_property_set_int(OBJECT(&chip9
->xive
), PNV9_XIVE_VC_BASE(chip
),
1229 "vc-bar", &error_fatal
);
1230 object_property_set_int(OBJECT(&chip9
->xive
), PNV9_XIVE_PC_BASE(chip
),
1231 "pc-bar", &error_fatal
);
1232 object_property_set_int(OBJECT(&chip9
->xive
), PNV9_XIVE_TM_BASE(chip
),
1233 "tm-bar", &error_fatal
);
1234 object_property_set_link(OBJECT(&chip9
->xive
), OBJECT(chip
), "chip",
1236 object_property_set_bool(OBJECT(&chip9
->xive
), true, "realized",
1239 error_propagate(errp
, local_err
);
1242 pnv_xscom_add_subregion(chip
, PNV9_XSCOM_XIVE_BASE
,
1243 &chip9
->xive
.xscom_regs
);
1245 /* Processor Service Interface (PSI) Host Bridge */
1246 object_property_set_int(OBJECT(&chip9
->psi
), PNV9_PSIHB_BASE(chip
),
1247 "bar", &error_fatal
);
1248 object_property_set_bool(OBJECT(&chip9
->psi
), true, "realized", &local_err
);
1250 error_propagate(errp
, local_err
);
1253 pnv_xscom_add_subregion(chip
, PNV9_XSCOM_PSIHB_BASE
,
1254 &PNV_PSI(psi9
)->xscom_regs
);
1257 object_property_set_link(OBJECT(&chip9
->lpc
), OBJECT(&chip9
->psi
), "psi",
1259 object_property_set_bool(OBJECT(&chip9
->lpc
), true, "realized", &local_err
);
1261 error_propagate(errp
, local_err
);
1264 memory_region_add_subregion(get_system_memory(), PNV9_LPCM_BASE(chip
),
1265 &chip9
->lpc
.xscom_regs
);
1267 chip
->dt_isa_nodename
= g_strdup_printf("/lpcm-opb@%" PRIx64
"/lpc@0",
1268 (uint64_t) PNV9_LPCM_BASE(chip
));
1270 /* Create the simplified OCC model */
1271 object_property_set_link(OBJECT(&chip9
->occ
), OBJECT(&chip9
->psi
), "psi",
1273 object_property_set_bool(OBJECT(&chip9
->occ
), true, "realized", &local_err
);
1275 error_propagate(errp
, local_err
);
1278 pnv_xscom_add_subregion(chip
, PNV9_XSCOM_OCC_BASE
, &chip9
->occ
.xscom_regs
);
1280 /* OCC SRAM model */
1281 memory_region_add_subregion(get_system_memory(), PNV9_OCC_SENSOR_BASE(chip
),
1282 &chip9
->occ
.sram_regs
);
1285 object_property_set_link(OBJECT(&chip9
->homer
), OBJECT(chip
), "chip",
1287 object_property_set_bool(OBJECT(&chip9
->homer
), true, "realized",
1290 error_propagate(errp
, local_err
);
1293 /* Homer Xscom region */
1294 pnv_xscom_add_subregion(chip
, PNV9_XSCOM_PBA_BASE
, &chip9
->homer
.pba_regs
);
1296 /* Homer mmio region */
1297 memory_region_add_subregion(get_system_memory(), PNV9_HOMER_BASE(chip
),
1298 &chip9
->homer
.regs
);
1301 static void pnv_chip_power9_class_init(ObjectClass
*klass
, void *data
)
1303 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1304 PnvChipClass
*k
= PNV_CHIP_CLASS(klass
);
1306 k
->chip_type
= PNV_CHIP_POWER9
;
1307 k
->chip_cfam_id
= 0x220d104900008000ull
; /* P9 Nimbus DD2.0 */
1308 k
->cores_mask
= POWER9_CORE_MASK
;
1309 k
->core_pir
= pnv_chip_core_pir_p9
;
1310 k
->intc_create
= pnv_chip_power9_intc_create
;
1311 k
->intc_reset
= pnv_chip_power9_intc_reset
;
1312 k
->intc_destroy
= pnv_chip_power9_intc_destroy
;
1313 k
->isa_create
= pnv_chip_power9_isa_create
;
1314 k
->dt_populate
= pnv_chip_power9_dt_populate
;
1315 k
->pic_print_info
= pnv_chip_power9_pic_print_info
;
1316 dc
->desc
= "PowerNV Chip POWER9";
1318 device_class_set_parent_realize(dc
, pnv_chip_power9_realize
,
1319 &k
->parent_realize
);
1322 static void pnv_chip_power10_instance_init(Object
*obj
)
1324 Pnv10Chip
*chip10
= PNV10_CHIP(obj
);
1326 object_initialize_child(obj
, "psi", &chip10
->psi
, sizeof(chip10
->psi
),
1327 TYPE_PNV10_PSI
, &error_abort
, NULL
);
1328 object_initialize_child(obj
, "lpc", &chip10
->lpc
, sizeof(chip10
->lpc
),
1329 TYPE_PNV10_LPC
, &error_abort
, NULL
);
1332 static void pnv_chip_power10_realize(DeviceState
*dev
, Error
**errp
)
1334 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(dev
);
1335 PnvChip
*chip
= PNV_CHIP(dev
);
1336 Pnv10Chip
*chip10
= PNV10_CHIP(dev
);
1337 Error
*local_err
= NULL
;
1339 /* XSCOM bridge is first */
1340 pnv_xscom_realize(chip
, PNV10_XSCOM_SIZE
, &local_err
);
1342 error_propagate(errp
, local_err
);
1345 sysbus_mmio_map(SYS_BUS_DEVICE(chip
), 0, PNV10_XSCOM_BASE(chip
));
1347 pcc
->parent_realize(dev
, &local_err
);
1349 error_propagate(errp
, local_err
);
1353 /* Processor Service Interface (PSI) Host Bridge */
1354 object_property_set_int(OBJECT(&chip10
->psi
), PNV10_PSIHB_BASE(chip
),
1355 "bar", &error_fatal
);
1356 object_property_set_bool(OBJECT(&chip10
->psi
), true, "realized",
1359 error_propagate(errp
, local_err
);
1362 pnv_xscom_add_subregion(chip
, PNV10_XSCOM_PSIHB_BASE
,
1363 &PNV_PSI(&chip10
->psi
)->xscom_regs
);
1366 object_property_set_link(OBJECT(&chip10
->lpc
), OBJECT(&chip10
->psi
), "psi",
1368 object_property_set_bool(OBJECT(&chip10
->lpc
), true, "realized",
1371 error_propagate(errp
, local_err
);
1374 memory_region_add_subregion(get_system_memory(), PNV10_LPCM_BASE(chip
),
1375 &chip10
->lpc
.xscom_regs
);
1377 chip
->dt_isa_nodename
= g_strdup_printf("/lpcm-opb@%" PRIx64
"/lpc@0",
1378 (uint64_t) PNV10_LPCM_BASE(chip
));
1381 static void pnv_chip_power10_class_init(ObjectClass
*klass
, void *data
)
1383 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1384 PnvChipClass
*k
= PNV_CHIP_CLASS(klass
);
1386 k
->chip_type
= PNV_CHIP_POWER10
;
1387 k
->chip_cfam_id
= 0x120da04900008000ull
; /* P10 DD1.0 (with NX) */
1388 k
->cores_mask
= POWER10_CORE_MASK
;
1389 k
->core_pir
= pnv_chip_core_pir_p10
;
1390 k
->intc_create
= pnv_chip_power10_intc_create
;
1391 k
->intc_reset
= pnv_chip_power10_intc_reset
;
1392 k
->intc_destroy
= pnv_chip_power10_intc_destroy
;
1393 k
->isa_create
= pnv_chip_power10_isa_create
;
1394 k
->dt_populate
= pnv_chip_power10_dt_populate
;
1395 k
->pic_print_info
= pnv_chip_power10_pic_print_info
;
1396 dc
->desc
= "PowerNV Chip POWER10";
1398 device_class_set_parent_realize(dc
, pnv_chip_power10_realize
,
1399 &k
->parent_realize
);
1402 static void pnv_chip_core_sanitize(PnvChip
*chip
, Error
**errp
)
1404 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(chip
);
1408 * No custom mask for this chip, let's use the default one from *
1411 if (!chip
->cores_mask
) {
1412 chip
->cores_mask
= pcc
->cores_mask
;
1415 /* filter alien core ids ! some are reserved */
1416 if ((chip
->cores_mask
& pcc
->cores_mask
) != chip
->cores_mask
) {
1417 error_setg(errp
, "warning: invalid core mask for chip Ox%"PRIx64
" !",
1421 chip
->cores_mask
&= pcc
->cores_mask
;
1423 /* now that we have a sane layout, let check the number of cores */
1424 cores_max
= ctpop64(chip
->cores_mask
);
1425 if (chip
->nr_cores
> cores_max
) {
1426 error_setg(errp
, "warning: too many cores for chip ! Limit is %d",
1432 static void pnv_chip_core_realize(PnvChip
*chip
, Error
**errp
)
1434 MachineState
*ms
= MACHINE(qdev_get_machine());
1435 Error
*error
= NULL
;
1436 PnvChipClass
*pcc
= PNV_CHIP_GET_CLASS(chip
);
1437 const char *typename
= pnv_chip_core_typename(chip
);
1440 if (!object_class_by_name(typename
)) {
1441 error_setg(errp
, "Unable to find PowerNV CPU Core '%s'", typename
);
1446 pnv_chip_core_sanitize(chip
, &error
);
1448 error_propagate(errp
, error
);
1452 chip
->cores
= g_new0(PnvCore
*, chip
->nr_cores
);
1454 for (i
= 0, core_hwid
= 0; (core_hwid
< sizeof(chip
->cores_mask
) * 8)
1455 && (i
< chip
->nr_cores
); core_hwid
++) {
1458 uint64_t xscom_core_base
;
1460 if (!(chip
->cores_mask
& (1ull << core_hwid
))) {
1464 pnv_core
= PNV_CORE(object_new(typename
));
1466 snprintf(core_name
, sizeof(core_name
), "core[%d]", core_hwid
);
1467 object_property_add_child(OBJECT(chip
), core_name
, OBJECT(pnv_core
),
1469 chip
->cores
[i
] = pnv_core
;
1470 object_property_set_int(OBJECT(pnv_core
), ms
->smp
.threads
, "nr-threads",
1472 object_property_set_int(OBJECT(pnv_core
), core_hwid
,
1473 CPU_CORE_PROP_CORE_ID
, &error_fatal
);
1474 object_property_set_int(OBJECT(pnv_core
),
1475 pcc
->core_pir(chip
, core_hwid
),
1476 "pir", &error_fatal
);
1477 object_property_set_link(OBJECT(pnv_core
), OBJECT(chip
), "chip",
1479 object_property_set_bool(OBJECT(pnv_core
), true, "realized",
1482 /* Each core has an XSCOM MMIO region */
1483 if (pnv_chip_is_power10(chip
)) {
1484 xscom_core_base
= PNV10_XSCOM_EC_BASE(core_hwid
);
1485 } else if (pnv_chip_is_power9(chip
)) {
1486 xscom_core_base
= PNV9_XSCOM_EC_BASE(core_hwid
);
1488 xscom_core_base
= PNV_XSCOM_EX_BASE(core_hwid
);
1491 pnv_xscom_add_subregion(chip
, xscom_core_base
,
1492 &pnv_core
->xscom_regs
);
1497 static void pnv_chip_realize(DeviceState
*dev
, Error
**errp
)
1499 PnvChip
*chip
= PNV_CHIP(dev
);
1500 Error
*error
= NULL
;
1503 pnv_chip_core_realize(chip
, &error
);
1505 error_propagate(errp
, error
);
1510 static Property pnv_chip_properties
[] = {
1511 DEFINE_PROP_UINT32("chip-id", PnvChip
, chip_id
, 0),
1512 DEFINE_PROP_UINT64("ram-start", PnvChip
, ram_start
, 0),
1513 DEFINE_PROP_UINT64("ram-size", PnvChip
, ram_size
, 0),
1514 DEFINE_PROP_UINT32("nr-cores", PnvChip
, nr_cores
, 1),
1515 DEFINE_PROP_UINT64("cores-mask", PnvChip
, cores_mask
, 0x0),
1516 DEFINE_PROP_END_OF_LIST(),
1519 static void pnv_chip_class_init(ObjectClass
*klass
, void *data
)
1521 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1523 set_bit(DEVICE_CATEGORY_CPU
, dc
->categories
);
1524 dc
->realize
= pnv_chip_realize
;
1525 dc
->props
= pnv_chip_properties
;
1526 dc
->desc
= "PowerNV Chip";
1529 PowerPCCPU
*pnv_chip_find_cpu(PnvChip
*chip
, uint32_t pir
)
1533 for (i
= 0; i
< chip
->nr_cores
; i
++) {
1534 PnvCore
*pc
= chip
->cores
[i
];
1535 CPUCore
*cc
= CPU_CORE(pc
);
1537 for (j
= 0; j
< cc
->nr_threads
; j
++) {
1538 if (ppc_cpu_pir(pc
->threads
[j
]) == pir
) {
1539 return pc
->threads
[j
];
1546 static ICSState
*pnv_ics_get(XICSFabric
*xi
, int irq
)
1548 PnvMachineState
*pnv
= PNV_MACHINE(xi
);
1551 for (i
= 0; i
< pnv
->num_chips
; i
++) {
1552 Pnv8Chip
*chip8
= PNV8_CHIP(pnv
->chips
[i
]);
1554 if (ics_valid_irq(&chip8
->psi
.ics
, irq
)) {
1555 return &chip8
->psi
.ics
;
1561 static void pnv_ics_resend(XICSFabric
*xi
)
1563 PnvMachineState
*pnv
= PNV_MACHINE(xi
);
1566 for (i
= 0; i
< pnv
->num_chips
; i
++) {
1567 Pnv8Chip
*chip8
= PNV8_CHIP(pnv
->chips
[i
]);
1568 ics_resend(&chip8
->psi
.ics
);
1572 static ICPState
*pnv_icp_get(XICSFabric
*xi
, int pir
)
1574 PowerPCCPU
*cpu
= ppc_get_vcpu_by_pir(pir
);
1576 return cpu
? ICP(pnv_cpu_state(cpu
)->intc
) : NULL
;
1579 static void pnv_pic_print_info(InterruptStatsProvider
*obj
,
1582 PnvMachineState
*pnv
= PNV_MACHINE(obj
);
1587 PowerPCCPU
*cpu
= POWERPC_CPU(cs
);
1589 if (pnv_chip_is_power9(pnv
->chips
[0])) {
1590 xive_tctx_pic_print_info(XIVE_TCTX(pnv_cpu_state(cpu
)->intc
), mon
);
1592 icp_pic_print_info(ICP(pnv_cpu_state(cpu
)->intc
), mon
);
1596 for (i
= 0; i
< pnv
->num_chips
; i
++) {
1597 PNV_CHIP_GET_CLASS(pnv
->chips
[i
])->pic_print_info(pnv
->chips
[i
], mon
);
1601 static int pnv_match_nvt(XiveFabric
*xfb
, uint8_t format
,
1602 uint8_t nvt_blk
, uint32_t nvt_idx
,
1603 bool cam_ignore
, uint8_t priority
,
1604 uint32_t logic_serv
,
1605 XiveTCTXMatch
*match
)
1607 PnvMachineState
*pnv
= PNV_MACHINE(xfb
);
1608 int total_count
= 0;
1611 for (i
= 0; i
< pnv
->num_chips
; i
++) {
1612 Pnv9Chip
*chip9
= PNV9_CHIP(pnv
->chips
[i
]);
1613 XivePresenter
*xptr
= XIVE_PRESENTER(&chip9
->xive
);
1614 XivePresenterClass
*xpc
= XIVE_PRESENTER_GET_CLASS(xptr
);
1617 count
= xpc
->match_nvt(xptr
, format
, nvt_blk
, nvt_idx
, cam_ignore
,
1618 priority
, logic_serv
, match
);
1624 total_count
+= count
;
1630 PnvChip
*pnv_get_chip(uint32_t chip_id
)
1632 PnvMachineState
*pnv
= PNV_MACHINE(qdev_get_machine());
1635 for (i
= 0; i
< pnv
->num_chips
; i
++) {
1636 PnvChip
*chip
= pnv
->chips
[i
];
1637 if (chip
->chip_id
== chip_id
) {
1644 static void pnv_get_num_chips(Object
*obj
, Visitor
*v
, const char *name
,
1645 void *opaque
, Error
**errp
)
1647 visit_type_uint32(v
, name
, &PNV_MACHINE(obj
)->num_chips
, errp
);
1650 static void pnv_set_num_chips(Object
*obj
, Visitor
*v
, const char *name
,
1651 void *opaque
, Error
**errp
)
1653 PnvMachineState
*pnv
= PNV_MACHINE(obj
);
1655 Error
*local_err
= NULL
;
1657 visit_type_uint32(v
, name
, &num_chips
, &local_err
);
1659 error_propagate(errp
, local_err
);
1664 * TODO: should we decide on how many chips we can create based
1665 * on #cores and Venice vs. Murano vs. Naples chip type etc...,
1667 if (!is_power_of_2(num_chips
) || num_chips
> 4) {
1668 error_setg(errp
, "invalid number of chips: '%d'", num_chips
);
1672 pnv
->num_chips
= num_chips
;
1675 static void pnv_machine_instance_init(Object
*obj
)
1677 PnvMachineState
*pnv
= PNV_MACHINE(obj
);
1681 static void pnv_machine_class_props_init(ObjectClass
*oc
)
1683 object_class_property_add(oc
, "num-chips", "uint32",
1684 pnv_get_num_chips
, pnv_set_num_chips
,
1686 object_class_property_set_description(oc
, "num-chips",
1687 "Specifies the number of processor chips",
1691 static void pnv_machine_power8_class_init(ObjectClass
*oc
, void *data
)
1693 MachineClass
*mc
= MACHINE_CLASS(oc
);
1694 XICSFabricClass
*xic
= XICS_FABRIC_CLASS(oc
);
1696 mc
->desc
= "IBM PowerNV (Non-Virtualized) POWER8";
1697 mc
->default_cpu_type
= POWERPC_CPU_TYPE_NAME("power8_v2.0");
1699 xic
->icp_get
= pnv_icp_get
;
1700 xic
->ics_get
= pnv_ics_get
;
1701 xic
->ics_resend
= pnv_ics_resend
;
1704 static void pnv_machine_power9_class_init(ObjectClass
*oc
, void *data
)
1706 MachineClass
*mc
= MACHINE_CLASS(oc
);
1707 XiveFabricClass
*xfc
= XIVE_FABRIC_CLASS(oc
);
1709 mc
->desc
= "IBM PowerNV (Non-Virtualized) POWER9";
1710 mc
->default_cpu_type
= POWERPC_CPU_TYPE_NAME("power9_v2.0");
1711 xfc
->match_nvt
= pnv_match_nvt
;
1713 mc
->alias
= "powernv";
1716 static void pnv_machine_power10_class_init(ObjectClass
*oc
, void *data
)
1718 MachineClass
*mc
= MACHINE_CLASS(oc
);
1720 mc
->desc
= "IBM PowerNV (Non-Virtualized) POWER10";
1721 mc
->default_cpu_type
= POWERPC_CPU_TYPE_NAME("power10_v1.0");
1724 static void pnv_machine_class_init(ObjectClass
*oc
, void *data
)
1726 MachineClass
*mc
= MACHINE_CLASS(oc
);
1727 InterruptStatsProviderClass
*ispc
= INTERRUPT_STATS_PROVIDER_CLASS(oc
);
1729 mc
->desc
= "IBM PowerNV (Non-Virtualized)";
1730 mc
->init
= pnv_init
;
1731 mc
->reset
= pnv_reset
;
1732 mc
->max_cpus
= MAX_CPUS
;
1733 /* Pnv provides a AHCI device for storage */
1734 mc
->block_default_type
= IF_IDE
;
1735 mc
->no_parallel
= 1;
1736 mc
->default_boot_order
= NULL
;
1738 * RAM defaults to less than 2048 for 32-bit hosts, and large
1739 * enough to fit the maximum initrd size at it's load address
1741 mc
->default_ram_size
= INITRD_LOAD_ADDR
+ INITRD_MAX_SIZE
;
1742 ispc
->print_info
= pnv_pic_print_info
;
1744 pnv_machine_class_props_init(oc
);
1747 #define DEFINE_PNV8_CHIP_TYPE(type, class_initfn) \
1750 .class_init = class_initfn, \
1751 .parent = TYPE_PNV8_CHIP, \
1754 #define DEFINE_PNV9_CHIP_TYPE(type, class_initfn) \
1757 .class_init = class_initfn, \
1758 .parent = TYPE_PNV9_CHIP, \
1761 #define DEFINE_PNV10_CHIP_TYPE(type, class_initfn) \
1764 .class_init = class_initfn, \
1765 .parent = TYPE_PNV10_CHIP, \
1768 static const TypeInfo types
[] = {
1770 .name
= MACHINE_TYPE_NAME("powernv10"),
1771 .parent
= TYPE_PNV_MACHINE
,
1772 .class_init
= pnv_machine_power10_class_init
,
1775 .name
= MACHINE_TYPE_NAME("powernv9"),
1776 .parent
= TYPE_PNV_MACHINE
,
1777 .class_init
= pnv_machine_power9_class_init
,
1778 .interfaces
= (InterfaceInfo
[]) {
1779 { TYPE_XIVE_FABRIC
},
1784 .name
= MACHINE_TYPE_NAME("powernv8"),
1785 .parent
= TYPE_PNV_MACHINE
,
1786 .class_init
= pnv_machine_power8_class_init
,
1787 .interfaces
= (InterfaceInfo
[]) {
1788 { TYPE_XICS_FABRIC
},
1793 .name
= TYPE_PNV_MACHINE
,
1794 .parent
= TYPE_MACHINE
,
1796 .instance_size
= sizeof(PnvMachineState
),
1797 .instance_init
= pnv_machine_instance_init
,
1798 .class_init
= pnv_machine_class_init
,
1799 .interfaces
= (InterfaceInfo
[]) {
1800 { TYPE_INTERRUPT_STATS_PROVIDER
},
1805 .name
= TYPE_PNV_CHIP
,
1806 .parent
= TYPE_SYS_BUS_DEVICE
,
1807 .class_init
= pnv_chip_class_init
,
1808 .instance_size
= sizeof(PnvChip
),
1809 .class_size
= sizeof(PnvChipClass
),
1814 * P10 chip and variants
1817 .name
= TYPE_PNV10_CHIP
,
1818 .parent
= TYPE_PNV_CHIP
,
1819 .instance_init
= pnv_chip_power10_instance_init
,
1820 .instance_size
= sizeof(Pnv10Chip
),
1822 DEFINE_PNV10_CHIP_TYPE(TYPE_PNV_CHIP_POWER10
, pnv_chip_power10_class_init
),
1825 * P9 chip and variants
1828 .name
= TYPE_PNV9_CHIP
,
1829 .parent
= TYPE_PNV_CHIP
,
1830 .instance_init
= pnv_chip_power9_instance_init
,
1831 .instance_size
= sizeof(Pnv9Chip
),
1833 DEFINE_PNV9_CHIP_TYPE(TYPE_PNV_CHIP_POWER9
, pnv_chip_power9_class_init
),
1836 * P8 chip and variants
1839 .name
= TYPE_PNV8_CHIP
,
1840 .parent
= TYPE_PNV_CHIP
,
1841 .instance_init
= pnv_chip_power8_instance_init
,
1842 .instance_size
= sizeof(Pnv8Chip
),
1844 DEFINE_PNV8_CHIP_TYPE(TYPE_PNV_CHIP_POWER8
, pnv_chip_power8_class_init
),
1845 DEFINE_PNV8_CHIP_TYPE(TYPE_PNV_CHIP_POWER8E
, pnv_chip_power8e_class_init
),
1846 DEFINE_PNV8_CHIP_TYPE(TYPE_PNV_CHIP_POWER8NVL
,
1847 pnv_chip_power8nvl_class_init
),