xref: /openbmc/qemu/hw/loongarch/virt.c (revision 3cf71969)
1 /* SPDX-License-Identifier: GPL-2.0-or-later */
2 /*
3  * QEMU loongson 3a5000 develop board emulation
4  *
5  * Copyright (c) 2021 Loongson Technology Corporation Limited
6  */
7 #include "qemu/osdep.h"
8 #include "qemu/units.h"
9 #include "qemu/datadir.h"
10 #include "qapi/error.h"
11 #include "hw/boards.h"
12 #include "hw/char/serial.h"
13 #include "sysemu/sysemu.h"
14 #include "sysemu/qtest.h"
15 #include "sysemu/runstate.h"
16 #include "sysemu/reset.h"
17 #include "sysemu/rtc.h"
18 #include "hw/loongarch/virt.h"
19 #include "exec/address-spaces.h"
20 #include "hw/irq.h"
21 #include "net/net.h"
22 #include "hw/loader.h"
23 #include "elf.h"
24 #include "hw/intc/loongarch_ipi.h"
25 #include "hw/intc/loongarch_extioi.h"
26 #include "hw/intc/loongarch_pch_pic.h"
27 #include "hw/intc/loongarch_pch_msi.h"
28 #include "hw/pci-host/ls7a.h"
29 #include "hw/pci-host/gpex.h"
30 #include "hw/misc/unimp.h"
31 #include "hw/loongarch/fw_cfg.h"
32 #include "target/loongarch/cpu.h"
33 #include "hw/firmware/smbios.h"
34 #include "hw/acpi/aml-build.h"
35 #include "qapi/qapi-visit-common.h"
36 #include "hw/acpi/generic_event_device.h"
37 #include "hw/mem/nvdimm.h"
38 #include "sysemu/device_tree.h"
39 #include <libfdt.h>
40 #include "hw/core/sysbus-fdt.h"
41 #include "hw/platform-bus.h"
42 #include "hw/display/ramfb.h"
43 #include "hw/mem/pc-dimm.h"
44 
45 static void create_fdt(LoongArchMachineState *lams)
46 {
47     MachineState *ms = MACHINE(lams);
48 
49     ms->fdt = create_device_tree(&lams->fdt_size);
50     if (!ms->fdt) {
51         error_report("create_device_tree() failed");
52         exit(1);
53     }
54 
55     /* Header */
56     qemu_fdt_setprop_string(ms->fdt, "/", "compatible",
57                             "linux,dummy-loongson3");
58     qemu_fdt_setprop_cell(ms->fdt, "/", "#address-cells", 0x2);
59     qemu_fdt_setprop_cell(ms->fdt, "/", "#size-cells", 0x2);
60 }
61 
62 static void fdt_add_cpu_nodes(const LoongArchMachineState *lams)
63 {
64     int num;
65     const MachineState *ms = MACHINE(lams);
66     int smp_cpus = ms->smp.cpus;
67 
68     qemu_fdt_add_subnode(ms->fdt, "/cpus");
69     qemu_fdt_setprop_cell(ms->fdt, "/cpus", "#address-cells", 0x1);
70     qemu_fdt_setprop_cell(ms->fdt, "/cpus", "#size-cells", 0x0);
71 
72     /* cpu nodes */
73     for (num = smp_cpus - 1; num >= 0; num--) {
74         char *nodename = g_strdup_printf("/cpus/cpu@%d", num);
75         LoongArchCPU *cpu = LOONGARCH_CPU(qemu_get_cpu(num));
76 
77         qemu_fdt_add_subnode(ms->fdt, nodename);
78         qemu_fdt_setprop_string(ms->fdt, nodename, "device_type", "cpu");
79         qemu_fdt_setprop_string(ms->fdt, nodename, "compatible",
80                                 cpu->dtb_compatible);
81         qemu_fdt_setprop_cell(ms->fdt, nodename, "reg", num);
82         qemu_fdt_setprop_cell(ms->fdt, nodename, "phandle",
83                               qemu_fdt_alloc_phandle(ms->fdt));
84         g_free(nodename);
85     }
86 
87     /*cpu map */
88     qemu_fdt_add_subnode(ms->fdt, "/cpus/cpu-map");
89 
90     for (num = smp_cpus - 1; num >= 0; num--) {
91         char *cpu_path = g_strdup_printf("/cpus/cpu@%d", num);
92         char *map_path;
93 
94         if (ms->smp.threads > 1) {
95             map_path = g_strdup_printf(
96                 "/cpus/cpu-map/socket%d/core%d/thread%d",
97                 num / (ms->smp.cores * ms->smp.threads),
98                 (num / ms->smp.threads) % ms->smp.cores,
99                 num % ms->smp.threads);
100         } else {
101             map_path = g_strdup_printf(
102                 "/cpus/cpu-map/socket%d/core%d",
103                 num / ms->smp.cores,
104                 num % ms->smp.cores);
105         }
106         qemu_fdt_add_path(ms->fdt, map_path);
107         qemu_fdt_setprop_phandle(ms->fdt, map_path, "cpu", cpu_path);
108 
109         g_free(map_path);
110         g_free(cpu_path);
111     }
112 }
113 
114 static void fdt_add_fw_cfg_node(const LoongArchMachineState *lams)
115 {
116     char *nodename;
117     hwaddr base = VIRT_FWCFG_BASE;
118     const MachineState *ms = MACHINE(lams);
119 
120     nodename = g_strdup_printf("/fw_cfg@%" PRIx64, base);
121     qemu_fdt_add_subnode(ms->fdt, nodename);
122     qemu_fdt_setprop_string(ms->fdt, nodename,
123                             "compatible", "qemu,fw-cfg-mmio");
124     qemu_fdt_setprop_sized_cells(ms->fdt, nodename, "reg",
125                                  2, base, 2, 0x18);
126     qemu_fdt_setprop(ms->fdt, nodename, "dma-coherent", NULL, 0);
127     g_free(nodename);
128 }
129 
130 static void fdt_add_pcie_node(const LoongArchMachineState *lams)
131 {
132     char *nodename;
133     hwaddr base_mmio = VIRT_PCI_MEM_BASE;
134     hwaddr size_mmio = VIRT_PCI_MEM_SIZE;
135     hwaddr base_pio = VIRT_PCI_IO_BASE;
136     hwaddr size_pio = VIRT_PCI_IO_SIZE;
137     hwaddr base_pcie = VIRT_PCI_CFG_BASE;
138     hwaddr size_pcie = VIRT_PCI_CFG_SIZE;
139     hwaddr base = base_pcie;
140 
141     const MachineState *ms = MACHINE(lams);
142 
143     nodename = g_strdup_printf("/pcie@%" PRIx64, base);
144     qemu_fdt_add_subnode(ms->fdt, nodename);
145     qemu_fdt_setprop_string(ms->fdt, nodename,
146                             "compatible", "pci-host-ecam-generic");
147     qemu_fdt_setprop_string(ms->fdt, nodename, "device_type", "pci");
148     qemu_fdt_setprop_cell(ms->fdt, nodename, "#address-cells", 3);
149     qemu_fdt_setprop_cell(ms->fdt, nodename, "#size-cells", 2);
150     qemu_fdt_setprop_cell(ms->fdt, nodename, "linux,pci-domain", 0);
151     qemu_fdt_setprop_cells(ms->fdt, nodename, "bus-range", 0,
152                            PCIE_MMCFG_BUS(VIRT_PCI_CFG_SIZE - 1));
153     qemu_fdt_setprop(ms->fdt, nodename, "dma-coherent", NULL, 0);
154     qemu_fdt_setprop_sized_cells(ms->fdt, nodename, "reg",
155                                  2, base_pcie, 2, size_pcie);
156     qemu_fdt_setprop_sized_cells(ms->fdt, nodename, "ranges",
157                                  1, FDT_PCI_RANGE_IOPORT, 2, VIRT_PCI_IO_OFFSET,
158                                  2, base_pio, 2, size_pio,
159                                  1, FDT_PCI_RANGE_MMIO, 2, base_mmio,
160                                  2, base_mmio, 2, size_mmio);
161     g_free(nodename);
162     qemu_fdt_dumpdtb(ms->fdt, lams->fdt_size);
163 }
164 
165 static void fdt_add_irqchip_node(LoongArchMachineState *lams)
166 {
167     MachineState *ms = MACHINE(lams);
168     char *nodename;
169     uint32_t irqchip_phandle;
170 
171     irqchip_phandle = qemu_fdt_alloc_phandle(ms->fdt);
172     qemu_fdt_setprop_cell(ms->fdt, "/", "interrupt-parent", irqchip_phandle);
173 
174     nodename = g_strdup_printf("/intc@%lx", VIRT_IOAPIC_REG_BASE);
175     qemu_fdt_add_subnode(ms->fdt, nodename);
176     qemu_fdt_setprop_cell(ms->fdt, nodename, "#interrupt-cells", 3);
177     qemu_fdt_setprop(ms->fdt, nodename, "interrupt-controller", NULL, 0);
178     qemu_fdt_setprop_cell(ms->fdt, nodename, "#address-cells", 0x2);
179     qemu_fdt_setprop_cell(ms->fdt, nodename, "#size-cells", 0x2);
180     qemu_fdt_setprop(ms->fdt, nodename, "ranges", NULL, 0);
181 
182     qemu_fdt_setprop_string(ms->fdt, nodename, "compatible",
183                             "loongarch,ls7a");
184 
185     qemu_fdt_setprop_sized_cells(ms->fdt, nodename, "reg",
186                                  2, VIRT_IOAPIC_REG_BASE,
187                                  2, PCH_PIC_ROUTE_ENTRY_OFFSET);
188 
189     qemu_fdt_setprop_cell(ms->fdt, nodename, "phandle", irqchip_phandle);
190     g_free(nodename);
191 }
192 
193 #define PM_BASE 0x10080000
194 #define PM_SIZE 0x100
195 #define PM_CTRL 0x10
196 
197 static void virt_build_smbios(LoongArchMachineState *lams)
198 {
199     MachineState *ms = MACHINE(lams);
200     MachineClass *mc = MACHINE_GET_CLASS(lams);
201     uint8_t *smbios_tables, *smbios_anchor;
202     size_t smbios_tables_len, smbios_anchor_len;
203     const char *product = "QEMU Virtual Machine";
204 
205     if (!lams->fw_cfg) {
206         return;
207     }
208 
209     smbios_set_defaults("QEMU", product, mc->name, false,
210                         true, SMBIOS_ENTRY_POINT_TYPE_64);
211 
212     smbios_get_tables(ms, NULL, 0, &smbios_tables, &smbios_tables_len,
213                       &smbios_anchor, &smbios_anchor_len, &error_fatal);
214 
215     if (smbios_anchor) {
216         fw_cfg_add_file(lams->fw_cfg, "etc/smbios/smbios-tables",
217                         smbios_tables, smbios_tables_len);
218         fw_cfg_add_file(lams->fw_cfg, "etc/smbios/smbios-anchor",
219                         smbios_anchor, smbios_anchor_len);
220     }
221 }
222 
223 static void virt_machine_done(Notifier *notifier, void *data)
224 {
225     LoongArchMachineState *lams = container_of(notifier,
226                                         LoongArchMachineState, machine_done);
227     virt_build_smbios(lams);
228     loongarch_acpi_setup(lams);
229 }
230 
231 struct memmap_entry {
232     uint64_t address;
233     uint64_t length;
234     uint32_t type;
235     uint32_t reserved;
236 };
237 
238 static struct memmap_entry *memmap_table;
239 static unsigned memmap_entries;
240 
241 static void memmap_add_entry(uint64_t address, uint64_t length, uint32_t type)
242 {
243     /* Ensure there are no duplicate entries. */
244     for (unsigned i = 0; i < memmap_entries; i++) {
245         assert(memmap_table[i].address != address);
246     }
247 
248     memmap_table = g_renew(struct memmap_entry, memmap_table,
249                            memmap_entries + 1);
250     memmap_table[memmap_entries].address = cpu_to_le64(address);
251     memmap_table[memmap_entries].length = cpu_to_le64(length);
252     memmap_table[memmap_entries].type = cpu_to_le32(type);
253     memmap_table[memmap_entries].reserved = 0;
254     memmap_entries++;
255 }
256 
257 /*
258  * This is a placeholder for missing ACPI,
259  * and will eventually be replaced.
260  */
261 static uint64_t loongarch_virt_pm_read(void *opaque, hwaddr addr, unsigned size)
262 {
263     return 0;
264 }
265 
266 static void loongarch_virt_pm_write(void *opaque, hwaddr addr,
267                                uint64_t val, unsigned size)
268 {
269     if (addr != PM_CTRL) {
270         return;
271     }
272 
273     switch (val) {
274     case 0x00:
275         qemu_system_reset_request(SHUTDOWN_CAUSE_GUEST_RESET);
276         return;
277     case 0xff:
278         qemu_system_shutdown_request(SHUTDOWN_CAUSE_GUEST_SHUTDOWN);
279         return;
280     default:
281         return;
282     }
283 }
284 
285 static const MemoryRegionOps loongarch_virt_pm_ops = {
286     .read  = loongarch_virt_pm_read,
287     .write = loongarch_virt_pm_write,
288     .endianness = DEVICE_NATIVE_ENDIAN,
289     .valid = {
290         .min_access_size = 1,
291         .max_access_size = 1
292     }
293 };
294 
295 static struct _loaderparams {
296     uint64_t ram_size;
297     const char *kernel_filename;
298     const char *kernel_cmdline;
299     const char *initrd_filename;
300 } loaderparams;
301 
302 static uint64_t cpu_loongarch_virt_to_phys(void *opaque, uint64_t addr)
303 {
304     return addr & 0x1fffffffll;
305 }
306 
307 static int64_t load_kernel_info(void)
308 {
309     uint64_t kernel_entry, kernel_low, kernel_high;
310     ssize_t kernel_size;
311 
312     kernel_size = load_elf(loaderparams.kernel_filename, NULL,
313                            cpu_loongarch_virt_to_phys, NULL,
314                            &kernel_entry, &kernel_low,
315                            &kernel_high, NULL, 0,
316                            EM_LOONGARCH, 1, 0);
317 
318     if (kernel_size < 0) {
319         error_report("could not load kernel '%s': %s",
320                      loaderparams.kernel_filename,
321                      load_elf_strerror(kernel_size));
322         exit(1);
323     }
324     return kernel_entry;
325 }
326 
327 static DeviceState *create_acpi_ged(DeviceState *pch_pic, LoongArchMachineState *lams)
328 {
329     DeviceState *dev;
330     MachineState *ms = MACHINE(lams);
331     uint32_t event = ACPI_GED_PWR_DOWN_EVT;
332 
333     if (ms->ram_slots) {
334         event |= ACPI_GED_MEM_HOTPLUG_EVT;
335     }
336     dev = qdev_new(TYPE_ACPI_GED);
337     qdev_prop_set_uint32(dev, "ged-event", event);
338 
339     /* ged event */
340     sysbus_mmio_map(SYS_BUS_DEVICE(dev), 0, VIRT_GED_EVT_ADDR);
341     /* memory hotplug */
342     sysbus_mmio_map(SYS_BUS_DEVICE(dev), 1, VIRT_GED_MEM_ADDR);
343     /* ged regs used for reset and power down */
344     sysbus_mmio_map(SYS_BUS_DEVICE(dev), 2, VIRT_GED_REG_ADDR);
345 
346     sysbus_connect_irq(SYS_BUS_DEVICE(dev), 0,
347                        qdev_get_gpio_in(pch_pic, VIRT_SCI_IRQ - PCH_PIC_IRQ_OFFSET));
348     sysbus_realize_and_unref(SYS_BUS_DEVICE(dev), &error_fatal);
349     return dev;
350 }
351 
352 static DeviceState *create_platform_bus(DeviceState *pch_pic)
353 {
354     DeviceState *dev;
355     SysBusDevice *sysbus;
356     int i, irq;
357     MemoryRegion *sysmem = get_system_memory();
358 
359     dev = qdev_new(TYPE_PLATFORM_BUS_DEVICE);
360     dev->id = g_strdup(TYPE_PLATFORM_BUS_DEVICE);
361     qdev_prop_set_uint32(dev, "num_irqs", VIRT_PLATFORM_BUS_NUM_IRQS);
362     qdev_prop_set_uint32(dev, "mmio_size", VIRT_PLATFORM_BUS_SIZE);
363     sysbus_realize_and_unref(SYS_BUS_DEVICE(dev), &error_fatal);
364 
365     sysbus = SYS_BUS_DEVICE(dev);
366     for (i = 0; i < VIRT_PLATFORM_BUS_NUM_IRQS; i++) {
367         irq = VIRT_PLATFORM_BUS_IRQ - PCH_PIC_IRQ_OFFSET + i;
368         sysbus_connect_irq(sysbus, i, qdev_get_gpio_in(pch_pic, irq));
369     }
370 
371     memory_region_add_subregion(sysmem,
372                                 VIRT_PLATFORM_BUS_BASEADDRESS,
373                                 sysbus_mmio_get_region(sysbus, 0));
374     return dev;
375 }
376 
377 static void loongarch_devices_init(DeviceState *pch_pic, LoongArchMachineState *lams)
378 {
379     DeviceState *gpex_dev;
380     SysBusDevice *d;
381     PCIBus *pci_bus;
382     MemoryRegion *ecam_alias, *ecam_reg, *pio_alias, *pio_reg;
383     MemoryRegion *mmio_alias, *mmio_reg, *pm_mem;
384     int i;
385 
386     gpex_dev = qdev_new(TYPE_GPEX_HOST);
387     d = SYS_BUS_DEVICE(gpex_dev);
388     sysbus_realize_and_unref(d, &error_fatal);
389     pci_bus = PCI_HOST_BRIDGE(gpex_dev)->bus;
390     lams->pci_bus = pci_bus;
391 
392     /* Map only part size_ecam bytes of ECAM space */
393     ecam_alias = g_new0(MemoryRegion, 1);
394     ecam_reg = sysbus_mmio_get_region(d, 0);
395     memory_region_init_alias(ecam_alias, OBJECT(gpex_dev), "pcie-ecam",
396                              ecam_reg, 0, VIRT_PCI_CFG_SIZE);
397     memory_region_add_subregion(get_system_memory(), VIRT_PCI_CFG_BASE,
398                                 ecam_alias);
399 
400     /* Map PCI mem space */
401     mmio_alias = g_new0(MemoryRegion, 1);
402     mmio_reg = sysbus_mmio_get_region(d, 1);
403     memory_region_init_alias(mmio_alias, OBJECT(gpex_dev), "pcie-mmio",
404                              mmio_reg, VIRT_PCI_MEM_BASE, VIRT_PCI_MEM_SIZE);
405     memory_region_add_subregion(get_system_memory(), VIRT_PCI_MEM_BASE,
406                                 mmio_alias);
407 
408     /* Map PCI IO port space. */
409     pio_alias = g_new0(MemoryRegion, 1);
410     pio_reg = sysbus_mmio_get_region(d, 2);
411     memory_region_init_alias(pio_alias, OBJECT(gpex_dev), "pcie-io", pio_reg,
412                              VIRT_PCI_IO_OFFSET, VIRT_PCI_IO_SIZE);
413     memory_region_add_subregion(get_system_memory(), VIRT_PCI_IO_BASE,
414                                 pio_alias);
415 
416     for (i = 0; i < GPEX_NUM_IRQS; i++) {
417         sysbus_connect_irq(d, i,
418                            qdev_get_gpio_in(pch_pic, 16 + i));
419         gpex_set_irq_num(GPEX_HOST(gpex_dev), i, 16 + i);
420     }
421 
422     serial_mm_init(get_system_memory(), VIRT_UART_BASE, 0,
423                    qdev_get_gpio_in(pch_pic,
424                                     VIRT_UART_IRQ - PCH_PIC_IRQ_OFFSET),
425                    115200, serial_hd(0), DEVICE_LITTLE_ENDIAN);
426 
427     /* Network init */
428     for (i = 0; i < nb_nics; i++) {
429         NICInfo *nd = &nd_table[i];
430 
431         if (!nd->model) {
432             nd->model = g_strdup("virtio");
433         }
434 
435         pci_nic_init_nofail(nd, pci_bus, nd->model, NULL);
436     }
437 
438     /*
439      * There are some invalid guest memory access.
440      * Create some unimplemented devices to emulate this.
441      */
442     create_unimplemented_device("pci-dma-cfg", 0x1001041c, 0x4);
443     sysbus_create_simple("ls7a_rtc", VIRT_RTC_REG_BASE,
444                          qdev_get_gpio_in(pch_pic,
445                          VIRT_RTC_IRQ - PCH_PIC_IRQ_OFFSET));
446 
447     pm_mem = g_new(MemoryRegion, 1);
448     memory_region_init_io(pm_mem, NULL, &loongarch_virt_pm_ops,
449                           NULL, "loongarch_virt_pm", PM_SIZE);
450     memory_region_add_subregion(get_system_memory(), PM_BASE, pm_mem);
451     /* acpi ged */
452     lams->acpi_ged = create_acpi_ged(pch_pic, lams);
453     /* platform bus */
454     lams->platform_bus_dev = create_platform_bus(pch_pic);
455 }
456 
457 static void loongarch_irq_init(LoongArchMachineState *lams)
458 {
459     MachineState *ms = MACHINE(lams);
460     DeviceState *pch_pic, *pch_msi, *cpudev;
461     DeviceState *ipi, *extioi;
462     SysBusDevice *d;
463     LoongArchCPU *lacpu;
464     CPULoongArchState *env;
465     CPUState *cpu_state;
466     int cpu, pin, i;
467 
468     ipi = qdev_new(TYPE_LOONGARCH_IPI);
469     sysbus_realize_and_unref(SYS_BUS_DEVICE(ipi), &error_fatal);
470 
471     extioi = qdev_new(TYPE_LOONGARCH_EXTIOI);
472     sysbus_realize_and_unref(SYS_BUS_DEVICE(extioi), &error_fatal);
473 
474     /*
475      * The connection of interrupts:
476      *   +-----+    +---------+     +-------+
477      *   | IPI |--> | CPUINTC | <-- | Timer |
478      *   +-----+    +---------+     +-------+
479      *                  ^
480      *                  |
481      *            +---------+
482      *            | EIOINTC |
483      *            +---------+
484      *             ^       ^
485      *             |       |
486      *      +---------+ +---------+
487      *      | PCH-PIC | | PCH-MSI |
488      *      +---------+ +---------+
489      *        ^      ^          ^
490      *        |      |          |
491      * +--------+ +---------+ +---------+
492      * | UARTs  | | Devices | | Devices |
493      * +--------+ +---------+ +---------+
494      */
495     for (cpu = 0; cpu < ms->smp.cpus; cpu++) {
496         cpu_state = qemu_get_cpu(cpu);
497         cpudev = DEVICE(cpu_state);
498         lacpu = LOONGARCH_CPU(cpu_state);
499         env = &(lacpu->env);
500 
501         /* connect ipi irq to cpu irq */
502         qdev_connect_gpio_out(ipi, cpu, qdev_get_gpio_in(cpudev, IRQ_IPI));
503         /* IPI iocsr memory region */
504         memory_region_add_subregion(&env->system_iocsr, SMP_IPI_MAILBOX,
505                                     sysbus_mmio_get_region(SYS_BUS_DEVICE(ipi),
506                                     cpu * 2));
507         memory_region_add_subregion(&env->system_iocsr, MAIL_SEND_ADDR,
508                                     sysbus_mmio_get_region(SYS_BUS_DEVICE(ipi),
509                                     cpu * 2 + 1));
510         /* extioi iocsr memory region */
511         memory_region_add_subregion(&env->system_iocsr, APIC_BASE,
512                                 sysbus_mmio_get_region(SYS_BUS_DEVICE(extioi),
513                                 cpu));
514     }
515 
516     /*
517      * connect ext irq to the cpu irq
518      * cpu_pin[9:2] <= intc_pin[7:0]
519      */
520     for (cpu = 0; cpu < ms->smp.cpus; cpu++) {
521         cpudev = DEVICE(qemu_get_cpu(cpu));
522         for (pin = 0; pin < LS3A_INTC_IP; pin++) {
523             qdev_connect_gpio_out(extioi, (cpu * 8 + pin),
524                                   qdev_get_gpio_in(cpudev, pin + 2));
525         }
526     }
527 
528     pch_pic = qdev_new(TYPE_LOONGARCH_PCH_PIC);
529     d = SYS_BUS_DEVICE(pch_pic);
530     sysbus_realize_and_unref(d, &error_fatal);
531     memory_region_add_subregion(get_system_memory(), VIRT_IOAPIC_REG_BASE,
532                             sysbus_mmio_get_region(d, 0));
533     memory_region_add_subregion(get_system_memory(),
534                             VIRT_IOAPIC_REG_BASE + PCH_PIC_ROUTE_ENTRY_OFFSET,
535                             sysbus_mmio_get_region(d, 1));
536     memory_region_add_subregion(get_system_memory(),
537                             VIRT_IOAPIC_REG_BASE + PCH_PIC_INT_STATUS_LO,
538                             sysbus_mmio_get_region(d, 2));
539 
540     /* Connect 64 pch_pic irqs to extioi */
541     for (int i = 0; i < PCH_PIC_IRQ_NUM; i++) {
542         qdev_connect_gpio_out(DEVICE(d), i, qdev_get_gpio_in(extioi, i));
543     }
544 
545     pch_msi = qdev_new(TYPE_LOONGARCH_PCH_MSI);
546     qdev_prop_set_uint32(pch_msi, "msi_irq_base", PCH_MSI_IRQ_START);
547     d = SYS_BUS_DEVICE(pch_msi);
548     sysbus_realize_and_unref(d, &error_fatal);
549     sysbus_mmio_map(d, 0, VIRT_PCH_MSI_ADDR_LOW);
550     for (i = 0; i < PCH_MSI_IRQ_NUM; i++) {
551         /* Connect 192 pch_msi irqs to extioi */
552         qdev_connect_gpio_out(DEVICE(d), i,
553                               qdev_get_gpio_in(extioi, i + PCH_MSI_IRQ_START));
554     }
555 
556     loongarch_devices_init(pch_pic, lams);
557 }
558 
559 static void loongarch_firmware_init(LoongArchMachineState *lams)
560 {
561     char *filename = MACHINE(lams)->firmware;
562     char *bios_name = NULL;
563     int bios_size;
564 
565     lams->bios_loaded = false;
566     if (filename) {
567         bios_name = qemu_find_file(QEMU_FILE_TYPE_BIOS, filename);
568         if (!bios_name) {
569             error_report("Could not find ROM image '%s'", filename);
570             exit(1);
571         }
572 
573         bios_size = load_image_targphys(bios_name, VIRT_BIOS_BASE, VIRT_BIOS_SIZE);
574         if (bios_size < 0) {
575             error_report("Could not load ROM image '%s'", bios_name);
576             exit(1);
577         }
578 
579         g_free(bios_name);
580 
581         memory_region_init_ram(&lams->bios, NULL, "loongarch.bios",
582                                VIRT_BIOS_SIZE, &error_fatal);
583         memory_region_set_readonly(&lams->bios, true);
584         memory_region_add_subregion(get_system_memory(), VIRT_BIOS_BASE, &lams->bios);
585         lams->bios_loaded = true;
586     }
587 
588 }
589 
590 static void reset_load_elf(void *opaque)
591 {
592     LoongArchCPU *cpu = opaque;
593     CPULoongArchState *env = &cpu->env;
594 
595     cpu_reset(CPU(cpu));
596     if (env->load_elf) {
597         cpu_set_pc(CPU(cpu), env->elf_address);
598     }
599 }
600 
601 static void fw_cfg_add_kernel_info(FWCfgState *fw_cfg)
602 {
603     /*
604      * Expose the kernel, the command line, and the initrd in fw_cfg.
605      * We don't process them here at all, it's all left to the
606      * firmware.
607      */
608     load_image_to_fw_cfg(fw_cfg,
609                          FW_CFG_KERNEL_SIZE, FW_CFG_KERNEL_DATA,
610                          loaderparams.kernel_filename,
611                          false);
612 
613     if (loaderparams.initrd_filename) {
614         load_image_to_fw_cfg(fw_cfg,
615                              FW_CFG_INITRD_SIZE, FW_CFG_INITRD_DATA,
616                              loaderparams.initrd_filename, false);
617     }
618 
619     if (loaderparams.kernel_cmdline) {
620         fw_cfg_add_i32(fw_cfg, FW_CFG_CMDLINE_SIZE,
621                        strlen(loaderparams.kernel_cmdline) + 1);
622         fw_cfg_add_string(fw_cfg, FW_CFG_CMDLINE_DATA,
623                           loaderparams.kernel_cmdline);
624     }
625 }
626 
627 static void loongarch_firmware_boot(LoongArchMachineState *lams)
628 {
629     fw_cfg_add_kernel_info(lams->fw_cfg);
630 }
631 
632 static void loongarch_direct_kernel_boot(LoongArchMachineState *lams)
633 {
634     MachineState *machine = MACHINE(lams);
635     int64_t kernel_addr = 0;
636     LoongArchCPU *lacpu;
637     int i;
638 
639     kernel_addr = load_kernel_info();
640     if (!machine->firmware) {
641         for (i = 0; i < machine->smp.cpus; i++) {
642             lacpu = LOONGARCH_CPU(qemu_get_cpu(i));
643             lacpu->env.load_elf = true;
644             lacpu->env.elf_address = kernel_addr;
645         }
646     }
647 }
648 
649 static void loongarch_init(MachineState *machine)
650 {
651     LoongArchCPU *lacpu;
652     const char *cpu_model = machine->cpu_type;
653     ram_addr_t offset = 0;
654     ram_addr_t ram_size = machine->ram_size;
655     uint64_t highram_size = 0;
656     MemoryRegion *address_space_mem = get_system_memory();
657     LoongArchMachineState *lams = LOONGARCH_MACHINE(machine);
658     int i;
659 
660     if (!cpu_model) {
661         cpu_model = LOONGARCH_CPU_TYPE_NAME("la464");
662     }
663 
664     if (!strstr(cpu_model, "la464")) {
665         error_report("LoongArch/TCG needs cpu type la464");
666         exit(1);
667     }
668 
669     if (ram_size < 1 * GiB) {
670         error_report("ram_size must be greater than 1G.");
671         exit(1);
672     }
673     create_fdt(lams);
674     /* Init CPUs */
675     for (i = 0; i < machine->smp.cpus; i++) {
676         cpu_create(machine->cpu_type);
677     }
678     fdt_add_cpu_nodes(lams);
679     /* Add memory region */
680     memory_region_init_alias(&lams->lowmem, NULL, "loongarch.lowram",
681                              machine->ram, 0, 256 * MiB);
682     memory_region_add_subregion(address_space_mem, offset, &lams->lowmem);
683     offset += 256 * MiB;
684     memmap_add_entry(0, 256 * MiB, 1);
685     highram_size = ram_size - 256 * MiB;
686     memory_region_init_alias(&lams->highmem, NULL, "loongarch.highmem",
687                              machine->ram, offset, highram_size);
688     memory_region_add_subregion(address_space_mem, 0x90000000, &lams->highmem);
689     memmap_add_entry(0x90000000, highram_size, 1);
690 
691     /* initialize device memory address space */
692     if (machine->ram_size < machine->maxram_size) {
693         machine->device_memory = g_malloc0(sizeof(*machine->device_memory));
694         ram_addr_t device_mem_size = machine->maxram_size - machine->ram_size;
695 
696         if (machine->ram_slots > ACPI_MAX_RAM_SLOTS) {
697             error_report("unsupported amount of memory slots: %"PRIu64,
698                          machine->ram_slots);
699             exit(EXIT_FAILURE);
700         }
701 
702         if (QEMU_ALIGN_UP(machine->maxram_size,
703                           TARGET_PAGE_SIZE) != machine->maxram_size) {
704             error_report("maximum memory size must by aligned to multiple of "
705                          "%d bytes", TARGET_PAGE_SIZE);
706             exit(EXIT_FAILURE);
707         }
708         /* device memory base is the top of high memory address. */
709         machine->device_memory->base = 0x90000000 + highram_size;
710         machine->device_memory->base =
711             ROUND_UP(machine->device_memory->base, 1 * GiB);
712 
713         memory_region_init(&machine->device_memory->mr, OBJECT(lams),
714                            "device-memory", device_mem_size);
715         memory_region_add_subregion(address_space_mem, machine->device_memory->base,
716                                     &machine->device_memory->mr);
717     }
718 
719     /* Add isa io region */
720     memory_region_init_alias(&lams->isa_io, NULL, "isa-io",
721                              get_system_io(), 0, VIRT_ISA_IO_SIZE);
722     memory_region_add_subregion(address_space_mem, VIRT_ISA_IO_BASE,
723                                 &lams->isa_io);
724     /* load the BIOS image. */
725     loongarch_firmware_init(lams);
726 
727     /* fw_cfg init */
728     lams->fw_cfg = loongarch_fw_cfg_init(ram_size, machine);
729     rom_set_fw(lams->fw_cfg);
730     if (lams->fw_cfg != NULL) {
731         fw_cfg_add_file(lams->fw_cfg, "etc/memmap",
732                         memmap_table,
733                         sizeof(struct memmap_entry) * (memmap_entries));
734     }
735     fdt_add_fw_cfg_node(lams);
736     loaderparams.ram_size = ram_size;
737     loaderparams.kernel_filename = machine->kernel_filename;
738     loaderparams.kernel_cmdline = machine->kernel_cmdline;
739     loaderparams.initrd_filename = machine->initrd_filename;
740     /* load the kernel. */
741     if (loaderparams.kernel_filename) {
742         if (lams->bios_loaded) {
743             loongarch_firmware_boot(lams);
744         } else {
745             loongarch_direct_kernel_boot(lams);
746         }
747     }
748     /* register reset function */
749     for (i = 0; i < machine->smp.cpus; i++) {
750         lacpu = LOONGARCH_CPU(qemu_get_cpu(i));
751         qemu_register_reset(reset_load_elf, lacpu);
752     }
753     /* Initialize the IO interrupt subsystem */
754     loongarch_irq_init(lams);
755     fdt_add_irqchip_node(lams);
756     platform_bus_add_all_fdt_nodes(machine->fdt, "/intc",
757                                    VIRT_PLATFORM_BUS_BASEADDRESS,
758                                    VIRT_PLATFORM_BUS_SIZE,
759                                    VIRT_PLATFORM_BUS_IRQ);
760     lams->machine_done.notify = virt_machine_done;
761     qemu_add_machine_init_done_notifier(&lams->machine_done);
762     fdt_add_pcie_node(lams);
763 
764     /* load fdt */
765     MemoryRegion *fdt_rom = g_new(MemoryRegion, 1);
766     memory_region_init_rom(fdt_rom, NULL, "fdt", VIRT_FDT_SIZE, &error_fatal);
767     memory_region_add_subregion(get_system_memory(), VIRT_FDT_BASE, fdt_rom);
768     rom_add_blob_fixed("fdt", machine->fdt, lams->fdt_size, VIRT_FDT_BASE);
769 }
770 
771 bool loongarch_is_acpi_enabled(LoongArchMachineState *lams)
772 {
773     if (lams->acpi == ON_OFF_AUTO_OFF) {
774         return false;
775     }
776     return true;
777 }
778 
779 static void loongarch_get_acpi(Object *obj, Visitor *v, const char *name,
780                                void *opaque, Error **errp)
781 {
782     LoongArchMachineState *lams = LOONGARCH_MACHINE(obj);
783     OnOffAuto acpi = lams->acpi;
784 
785     visit_type_OnOffAuto(v, name, &acpi, errp);
786 }
787 
788 static void loongarch_set_acpi(Object *obj, Visitor *v, const char *name,
789                                void *opaque, Error **errp)
790 {
791     LoongArchMachineState *lams = LOONGARCH_MACHINE(obj);
792 
793     visit_type_OnOffAuto(v, name, &lams->acpi, errp);
794 }
795 
796 static void loongarch_machine_initfn(Object *obj)
797 {
798     LoongArchMachineState *lams = LOONGARCH_MACHINE(obj);
799 
800     lams->acpi = ON_OFF_AUTO_AUTO;
801     lams->oem_id = g_strndup(ACPI_BUILD_APPNAME6, 6);
802     lams->oem_table_id = g_strndup(ACPI_BUILD_APPNAME8, 8);
803 }
804 
805 static bool memhp_type_supported(DeviceState *dev)
806 {
807     /* we only support pc dimm now */
808     return object_dynamic_cast(OBJECT(dev), TYPE_PC_DIMM) &&
809            !object_dynamic_cast(OBJECT(dev), TYPE_NVDIMM);
810 }
811 
812 static void virt_mem_pre_plug(HotplugHandler *hotplug_dev, DeviceState *dev,
813                                  Error **errp)
814 {
815     pc_dimm_pre_plug(PC_DIMM(dev), MACHINE(hotplug_dev), NULL, errp);
816 }
817 
818 static void virt_machine_device_pre_plug(HotplugHandler *hotplug_dev,
819                                             DeviceState *dev, Error **errp)
820 {
821     if (memhp_type_supported(dev)) {
822         virt_mem_pre_plug(hotplug_dev, dev, errp);
823     }
824 }
825 
826 static void virt_mem_unplug_request(HotplugHandler *hotplug_dev,
827                                      DeviceState *dev, Error **errp)
828 {
829     LoongArchMachineState *lams = LOONGARCH_MACHINE(hotplug_dev);
830 
831     /* the acpi ged is always exist */
832     hotplug_handler_unplug_request(HOTPLUG_HANDLER(lams->acpi_ged), dev,
833                                    errp);
834 }
835 
836 static void virt_machine_device_unplug_request(HotplugHandler *hotplug_dev,
837                                           DeviceState *dev, Error **errp)
838 {
839     if (memhp_type_supported(dev)) {
840         virt_mem_unplug_request(hotplug_dev, dev, errp);
841     }
842 }
843 
844 static void virt_mem_unplug(HotplugHandler *hotplug_dev,
845                              DeviceState *dev, Error **errp)
846 {
847     LoongArchMachineState *lams = LOONGARCH_MACHINE(hotplug_dev);
848 
849     hotplug_handler_unplug(HOTPLUG_HANDLER(lams->acpi_ged), dev, errp);
850     pc_dimm_unplug(PC_DIMM(dev), MACHINE(lams));
851     qdev_unrealize(dev);
852 }
853 
854 static void virt_machine_device_unplug(HotplugHandler *hotplug_dev,
855                                           DeviceState *dev, Error **errp)
856 {
857     if (memhp_type_supported(dev)) {
858         virt_mem_unplug(hotplug_dev, dev, errp);
859     }
860 }
861 
862 static void virt_mem_plug(HotplugHandler *hotplug_dev,
863                              DeviceState *dev, Error **errp)
864 {
865     LoongArchMachineState *lams = LOONGARCH_MACHINE(hotplug_dev);
866 
867     pc_dimm_plug(PC_DIMM(dev), MACHINE(lams));
868     hotplug_handler_plug(HOTPLUG_HANDLER(lams->acpi_ged),
869                          dev, &error_abort);
870 }
871 
872 static void loongarch_machine_device_plug_cb(HotplugHandler *hotplug_dev,
873                                         DeviceState *dev, Error **errp)
874 {
875     LoongArchMachineState *lams = LOONGARCH_MACHINE(hotplug_dev);
876     MachineClass *mc = MACHINE_GET_CLASS(lams);
877 
878     if (device_is_dynamic_sysbus(mc, dev)) {
879         if (lams->platform_bus_dev) {
880             platform_bus_link_device(PLATFORM_BUS_DEVICE(lams->platform_bus_dev),
881                                      SYS_BUS_DEVICE(dev));
882         }
883     } else if (memhp_type_supported(dev)) {
884         virt_mem_plug(hotplug_dev, dev, errp);
885     }
886 }
887 
888 static HotplugHandler *virt_machine_get_hotplug_handler(MachineState *machine,
889                                                         DeviceState *dev)
890 {
891     MachineClass *mc = MACHINE_GET_CLASS(machine);
892 
893     if (device_is_dynamic_sysbus(mc, dev) ||
894         memhp_type_supported(dev)) {
895         return HOTPLUG_HANDLER(machine);
896     }
897     return NULL;
898 }
899 
900 static void loongarch_class_init(ObjectClass *oc, void *data)
901 {
902     MachineClass *mc = MACHINE_CLASS(oc);
903     HotplugHandlerClass *hc = HOTPLUG_HANDLER_CLASS(oc);
904 
905     mc->desc = "Loongson-3A5000 LS7A1000 machine";
906     mc->init = loongarch_init;
907     mc->default_ram_size = 1 * GiB;
908     mc->default_cpu_type = LOONGARCH_CPU_TYPE_NAME("la464");
909     mc->default_ram_id = "loongarch.ram";
910     mc->max_cpus = LOONGARCH_MAX_VCPUS;
911     mc->is_default = 1;
912     mc->default_kernel_irqchip_split = false;
913     mc->block_default_type = IF_VIRTIO;
914     mc->default_boot_order = "c";
915     mc->no_cdrom = 1;
916     mc->get_hotplug_handler = virt_machine_get_hotplug_handler;
917     hc->plug = loongarch_machine_device_plug_cb;
918     hc->pre_plug = virt_machine_device_pre_plug;
919     hc->unplug_request = virt_machine_device_unplug_request;
920     hc->unplug = virt_machine_device_unplug;
921 
922     object_class_property_add(oc, "acpi", "OnOffAuto",
923         loongarch_get_acpi, loongarch_set_acpi,
924         NULL, NULL);
925     object_class_property_set_description(oc, "acpi",
926         "Enable ACPI");
927     machine_class_allow_dynamic_sysbus_dev(mc, TYPE_RAMFB_DEVICE);
928 }
929 
930 static const TypeInfo loongarch_machine_types[] = {
931     {
932         .name           = TYPE_LOONGARCH_MACHINE,
933         .parent         = TYPE_MACHINE,
934         .instance_size  = sizeof(LoongArchMachineState),
935         .class_init     = loongarch_class_init,
936         .instance_init = loongarch_machine_initfn,
937         .interfaces = (InterfaceInfo[]) {
938          { TYPE_HOTPLUG_HANDLER },
939          { }
940         },
941     }
942 };
943 
944 DEFINE_TYPES(loongarch_machine_types)
945