ppc/pnv: Fix OCC common area region mapping
[qemu/ar7.git] / hw / ppc / pnv.c
blob0be0b6b411c3dc33b99095818e42fc0297942ded
1 /*
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"
31 #include "qemu/log.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"
54 #include <libfdt.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));
73 g_free(s);
74 return core_type;
78 * On Power Systems E880 (POWER8), the max cpus (threads) should be :
79 * 4 * 4 sockets * 12 cores * 8 threads = 1536
80 * Let's make it 2^11
82 #define MAX_CPUS 2048
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
87 * per chip.
89 static void pnv_dt_memory(void *fdt, int chip_id, hwaddr start, hwaddr size)
91 char *mem_name;
92 uint64_t mem_reg_property[2];
93 int off;
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);
100 g_free(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");
114 if (cpus_offset) {
115 _FDT((fdt_setprop_cell(fdt, cpus_offset, "#address-cells", 0x1)));
116 _FDT((fdt_setprop_cell(fdt, cpus_offset, "#size-cells", 0x0)));
119 _FDT(cpus_offset);
120 return cpus_offset;
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
128 * servers.
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];
139 int i;
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 };
151 int offset;
152 char *nodename;
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);
157 _FDT(offset);
158 g_free(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)));
179 } else {
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)));
185 } else {
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
209 * 2 == VSX 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
220 * 1 == DFP available
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,
245 uint32_t nr_threads)
247 uint64_t addr = PNV_ICP_BASE(chip) | (pir << 12);
248 char *name;
249 const char compat[] = "IBM,power8-icp\0IBM,ppc-xicp";
250 uint32_t irange[2], i, rsize;
251 uint64_t *reg;
252 int offset;
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);
266 _FDT(offset);
267 g_free(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)));
278 g_free(reg);
281 static void pnv_chip_power8_dt_populate(PnvChip *chip, void *fdt)
283 int i;
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)
303 int i;
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)
322 int i;
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[] = {
343 cpu_to_be32(1),
344 cpu_to_be32(io_base),
345 cpu_to_be32(2)
347 char *name;
348 int node;
350 name = g_strdup_printf("%s@i%x", qdev_fw_name(DEVICE(d)), io_base);
351 node = fdt_add_subnode(fdt, lpc_off, name);
352 _FDT(node);
353 g_free(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[] = {
364 cpu_to_be32(1),
365 cpu_to_be32(io_base),
366 cpu_to_be32(8)
368 char *name;
369 int node;
371 name = g_strdup_printf("%s@i%x", qdev_fw_name(DEVICE(d)), io_base);
372 node = fdt_add_subnode(fdt, lpc_off, name);
373 _FDT(node);
374 g_free(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";
393 uint32_t io_base;
394 uint32_t io_regs[] = {
395 cpu_to_be32(1),
396 0, /* 'io_base' retrieved from the 'ioport' property of 'isa-ipmi-bt' */
397 cpu_to_be32(3)
399 uint32_t irq;
400 char *name;
401 int node;
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);
410 _FDT(node);
411 g_free(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 {
425 void *fdt;
426 int offset;
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);
440 } else {
441 error_report("unknown isa device %s@i%x", qdev_fw_name(dev),
442 d->ioport_id);
445 return 0;
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 = {
456 .fdt = fdt,
457 .offset = isa_offset,
459 uint32_t phandle;
461 _FDT((fdt_setprop(fdt, isa_offset, "primary", NULL, 0)));
463 phandle = qemu_fdt_alloc_phandle(fdt);
464 assert(phandle > 0);
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,
472 &args);
475 static void pnv_dt_power_mgt(void *fdt)
477 int off;
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);
491 void *fdt;
492 char *buf;
493 int off;
494 int i;
496 fdt = g_malloc0(FDT_MAX_SIZE);
497 _FDT((fdt_create_empty_tree(fdt, FDT_MAX_SIZE)));
499 /* /qemu node */
500 _FDT((fdt_add_subnode(fdt, 0, "qemu")));
502 /* Root node */
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))));
513 } else {
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)));
521 if (qemu_uuid_set) {
522 _FDT((fdt_property_string(fdt, "system-id", buf)));
524 g_free(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);
550 if (pnv->bmc) {
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);
559 return fdt;
562 static void pnv_powerdown_notify(Notifier *n, void *opaque)
564 PnvMachineState *pnv = PNV_MACHINE(qdev_get_machine());
566 if (pnv->bmc) {
567 pnv_bmc_powerdown(pnv->bmc);
571 static void pnv_reset(MachineState *machine)
573 void *fdt;
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)
642 Object *obj;
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);
661 MemoryRegion *ram;
662 char *fw_filename;
663 long fw_size;
664 int i;
665 char *chip_typename;
666 DriveInfo *pnor = drive_get(IF_MTD, 0, 0);
667 DeviceState *dev;
669 /* allocate RAM */
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",
676 machine->ram_size);
677 memory_region_add_subregion(get_system_memory(), 0, ram);
680 * Create our simple PNOR device
682 dev = qdev_create(NULL, TYPE_PNV_PNOR);
683 if (pnor) {
684 qdev_prop_set_drive(dev, "drive", blk_by_legacy_dinfo(pnor),
685 &error_abort);
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);
696 if (!fw_filename) {
697 error_report("Could not find OPAL firmware '%s'", bios_name);
698 exit(1);
701 fw_size = load_image_targphys(fw_filename, FW_LOAD_ADDR, FW_MAX_SIZE);
702 if (fw_size < 0) {
703 error_report("Could not load OPAL firmware '%s'", fw_filename);
704 exit(1);
706 g_free(fw_filename);
708 /* load kernel */
709 if (machine->kernel_filename) {
710 long kernel_size;
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);
717 exit(1);
721 /* load initrd */
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);
729 exit(1);
734 * Check compatibility of the specified CPU with the machine
735 * default.
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);
740 exit(1);
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);
750 exit(1);
753 pnv->chips = g_new0(PnvChip *, pnv->num_chips);
754 for (i = 0; i < pnv->num_chips; i++) {
755 char chip_name[32];
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
764 if (i == 0) {
765 object_property_set_int(chip, machine->ram_size, "ram-size",
766 &error_fatal);
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",
772 &error_fatal);
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
796 * host to powerdown
798 pnv->powerdown_notifier.notify = pnv_powerdown_notify;
799 qemu_register_powerdown_notifier(&pnv->powerdown_notifier);
803 * 0:21 Reserved - Read as zeros
804 * 22:24 Chip ID
805 * 25:28 Core number
806 * 29:31 Thread ID
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,
814 Error **errp)
816 Error *local_err = NULL;
817 Object *obj;
818 PnvCPUState *pnv_cpu = pnv_cpu_state(cpu);
820 obj = icp_create(OBJECT(cpu), TYPE_PNV_ICP, XICS_FABRIC(qdev_get_machine()),
821 &local_err);
822 if (local_err) {
823 error_propagate(errp, local_err);
824 return;
827 pnv_cpu->intc = obj;
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
848 * 49:52 Node ID
849 * 53:55 Chip ID
850 * 56 Reserved - Read as zero
851 * 57:61 Core number
852 * 62:63 Thread ID
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,
867 Error **errp)
869 Pnv9Chip *chip9 = PNV9_CHIP(chip);
870 Error *local_err = NULL;
871 Object *obj;
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);
880 if (local_err) {
881 error_propagate(errp, local_err);
882 return;
885 pnv_cpu->intc = obj;
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,
904 Error **errp)
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 :
927 * <EX0 reserved>
928 * EX1 - Venice only
929 * EX2 - Venice only
930 * EX3 - Venice only
931 * EX4
932 * EX5
933 * EX6
934 * <EX7,8 reserved> <reserved>
935 * EX9 - Venice only
936 * EX10 - Venice only
937 * EX11 - Venice only
938 * EX12
939 * EX13
940 * EX14
941 * <EX15 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);
977 int i, j;
978 char *name;
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);
984 g_free(name);
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,
998 &icp->mmio);
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);
1013 if (local_err) {
1014 error_propagate(errp, local_err);
1015 return;
1017 sysbus_mmio_map(SYS_BUS_DEVICE(chip), 0, PNV_XSCOM_BASE(chip));
1019 pcc->parent_realize(dev, &local_err);
1020 if (local_err) {
1021 error_propagate(errp, local_err);
1022 return;
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);
1029 if (local_err) {
1030 error_propagate(errp, local_err);
1031 return;
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",
1038 &error_abort);
1039 object_property_set_bool(OBJECT(&chip8->lpc), true, "realized",
1040 &error_fatal);
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);
1052 if (local_err) {
1053 error_propagate(errp, local_err);
1054 return;
1057 /* Create the simplified OCC model */
1058 object_property_set_link(OBJECT(&chip8->occ), OBJECT(&chip8->psi), "psi",
1059 &error_abort);
1060 object_property_set_bool(OBJECT(&chip8->occ), true, "realized", &local_err);
1061 if (local_err) {
1062 error_propagate(errp, local_err);
1063 return;
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);
1071 /* HOMER */
1072 object_property_set_link(OBJECT(&chip8->homer), OBJECT(chip), "chip",
1073 &error_abort);
1074 object_property_set_bool(OBJECT(&chip8->homer), true, "realized",
1075 &local_err);
1076 if (local_err) {
1077 error_propagate(errp, local_err);
1078 return;
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);
1174 int i;
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++) {
1180 char eq_name[32];
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),
1193 &eq->xscom_regs);
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);
1207 if (local_err) {
1208 error_propagate(errp, local_err);
1209 return;
1211 sysbus_mmio_map(SYS_BUS_DEVICE(chip), 0, PNV9_XSCOM_BASE(chip));
1213 pcc->parent_realize(dev, &local_err);
1214 if (local_err) {
1215 error_propagate(errp, local_err);
1216 return;
1219 pnv_chip_quad_realize(chip9, &local_err);
1220 if (local_err) {
1221 error_propagate(errp, local_err);
1222 return;
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",
1235 &error_abort);
1236 object_property_set_bool(OBJECT(&chip9->xive), true, "realized",
1237 &local_err);
1238 if (local_err) {
1239 error_propagate(errp, local_err);
1240 return;
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);
1249 if (local_err) {
1250 error_propagate(errp, local_err);
1251 return;
1253 pnv_xscom_add_subregion(chip, PNV9_XSCOM_PSIHB_BASE,
1254 &PNV_PSI(psi9)->xscom_regs);
1256 /* LPC */
1257 object_property_set_link(OBJECT(&chip9->lpc), OBJECT(&chip9->psi), "psi",
1258 &error_abort);
1259 object_property_set_bool(OBJECT(&chip9->lpc), true, "realized", &local_err);
1260 if (local_err) {
1261 error_propagate(errp, local_err);
1262 return;
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",
1272 &error_abort);
1273 object_property_set_bool(OBJECT(&chip9->occ), true, "realized", &local_err);
1274 if (local_err) {
1275 error_propagate(errp, local_err);
1276 return;
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);
1284 /* HOMER */
1285 object_property_set_link(OBJECT(&chip9->homer), OBJECT(chip), "chip",
1286 &error_abort);
1287 object_property_set_bool(OBJECT(&chip9->homer), true, "realized",
1288 &local_err);
1289 if (local_err) {
1290 error_propagate(errp, local_err);
1291 return;
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);
1341 if (local_err) {
1342 error_propagate(errp, local_err);
1343 return;
1345 sysbus_mmio_map(SYS_BUS_DEVICE(chip), 0, PNV10_XSCOM_BASE(chip));
1347 pcc->parent_realize(dev, &local_err);
1348 if (local_err) {
1349 error_propagate(errp, local_err);
1350 return;
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",
1357 &local_err);
1358 if (local_err) {
1359 error_propagate(errp, local_err);
1360 return;
1362 pnv_xscom_add_subregion(chip, PNV10_XSCOM_PSIHB_BASE,
1363 &PNV_PSI(&chip10->psi)->xscom_regs);
1365 /* LPC */
1366 object_property_set_link(OBJECT(&chip10->lpc), OBJECT(&chip10->psi), "psi",
1367 &error_abort);
1368 object_property_set_bool(OBJECT(&chip10->lpc), true, "realized",
1369 &local_err);
1370 if (local_err) {
1371 error_propagate(errp, local_err);
1372 return;
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);
1405 int cores_max;
1408 * No custom mask for this chip, let's use the default one from *
1409 * the chip class
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" !",
1418 chip->cores_mask);
1419 return;
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",
1427 cores_max);
1428 return;
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);
1438 int i, core_hwid;
1440 if (!object_class_by_name(typename)) {
1441 error_setg(errp, "Unable to find PowerNV CPU Core '%s'", typename);
1442 return;
1445 /* Cores */
1446 pnv_chip_core_sanitize(chip, &error);
1447 if (error) {
1448 error_propagate(errp, error);
1449 return;
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++) {
1456 char core_name[32];
1457 PnvCore *pnv_core;
1458 uint64_t xscom_core_base;
1460 if (!(chip->cores_mask & (1ull << core_hwid))) {
1461 continue;
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),
1468 &error_abort);
1469 chip->cores[i] = pnv_core;
1470 object_property_set_int(OBJECT(pnv_core), ms->smp.threads, "nr-threads",
1471 &error_fatal);
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",
1478 &error_abort);
1479 object_property_set_bool(OBJECT(pnv_core), true, "realized",
1480 &error_fatal);
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);
1487 } else {
1488 xscom_core_base = PNV_XSCOM_EX_BASE(core_hwid);
1491 pnv_xscom_add_subregion(chip, xscom_core_base,
1492 &pnv_core->xscom_regs);
1493 i++;
1497 static void pnv_chip_realize(DeviceState *dev, Error **errp)
1499 PnvChip *chip = PNV_CHIP(dev);
1500 Error *error = NULL;
1502 /* Cores */
1503 pnv_chip_core_realize(chip, &error);
1504 if (error) {
1505 error_propagate(errp, error);
1506 return;
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)
1531 int i, j;
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];
1543 return NULL;
1546 static ICSState *pnv_ics_get(XICSFabric *xi, int irq)
1548 PnvMachineState *pnv = PNV_MACHINE(xi);
1549 int i;
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;
1558 return NULL;
1561 static void pnv_ics_resend(XICSFabric *xi)
1563 PnvMachineState *pnv = PNV_MACHINE(xi);
1564 int i;
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,
1580 Monitor *mon)
1582 PnvMachineState *pnv = PNV_MACHINE(obj);
1583 int i;
1584 CPUState *cs;
1586 CPU_FOREACH(cs) {
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);
1591 } else {
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;
1609 int i;
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);
1615 int count;
1617 count = xpc->match_nvt(xptr, format, nvt_blk, nvt_idx, cam_ignore,
1618 priority, logic_serv, match);
1620 if (count < 0) {
1621 return count;
1624 total_count += count;
1627 return total_count;
1630 PnvChip *pnv_get_chip(uint32_t chip_id)
1632 PnvMachineState *pnv = PNV_MACHINE(qdev_get_machine());
1633 int i;
1635 for (i = 0; i < pnv->num_chips; i++) {
1636 PnvChip *chip = pnv->chips[i];
1637 if (chip->chip_id == chip_id) {
1638 return chip;
1641 return NULL;
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);
1654 uint32_t num_chips;
1655 Error *local_err = NULL;
1657 visit_type_uint32(v, name, &num_chips, &local_err);
1658 if (local_err) {
1659 error_propagate(errp, local_err);
1660 return;
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);
1669 return;
1672 pnv->num_chips = num_chips;
1675 static void pnv_machine_instance_init(Object *obj)
1677 PnvMachineState *pnv = PNV_MACHINE(obj);
1678 pnv->num_chips = 1;
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,
1685 NULL, NULL, NULL);
1686 object_class_property_set_description(oc, "num-chips",
1687 "Specifies the number of processor chips",
1688 NULL);
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) \
1749 .name = type, \
1750 .class_init = class_initfn, \
1751 .parent = TYPE_PNV8_CHIP, \
1754 #define DEFINE_PNV9_CHIP_TYPE(type, class_initfn) \
1756 .name = type, \
1757 .class_init = class_initfn, \
1758 .parent = TYPE_PNV9_CHIP, \
1761 #define DEFINE_PNV10_CHIP_TYPE(type, class_initfn) \
1763 .name = type, \
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 },
1780 { },
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 },
1789 { },
1793 .name = TYPE_PNV_MACHINE,
1794 .parent = TYPE_MACHINE,
1795 .abstract = true,
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 },
1801 { },
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),
1810 .abstract = true,
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),
1850 DEFINE_TYPES(types)