xref: /openbmc/qemu/hw/loongarch/virt.c (revision 8b4b668f6a3661885fcabcedcf812930d5577f7e)
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-mm.h"
13 #include "system/kvm.h"
14 #include "system/tcg.h"
15 #include "system/system.h"
16 #include "system/qtest.h"
17 #include "system/runstate.h"
18 #include "system/reset.h"
19 #include "system/rtc.h"
20 #include "hw/loongarch/virt.h"
21 #include "exec/address-spaces.h"
22 #include "hw/irq.h"
23 #include "net/net.h"
24 #include "hw/loader.h"
25 #include "elf.h"
26 #include "hw/intc/loongarch_ipi.h"
27 #include "hw/intc/loongarch_extioi.h"
28 #include "hw/intc/loongarch_pch_pic.h"
29 #include "hw/intc/loongarch_pch_msi.h"
30 #include "hw/pci-host/ls7a.h"
31 #include "hw/pci-host/gpex.h"
32 #include "hw/misc/unimp.h"
33 #include "hw/loongarch/fw_cfg.h"
34 #include "target/loongarch/cpu.h"
35 #include "hw/firmware/smbios.h"
36 #include "qapi/qapi-visit-common.h"
37 #include "hw/acpi/generic_event_device.h"
38 #include "hw/mem/nvdimm.h"
39 #include "hw/platform-bus.h"
40 #include "hw/display/ramfb.h"
41 #include "hw/mem/pc-dimm.h"
42 #include "system/tpm.h"
43 #include "system/block-backend.h"
44 #include "hw/block/flash.h"
45 #include "hw/virtio/virtio-iommu.h"
46 #include "qemu/error-report.h"
47 
48 static void virt_get_veiointc(Object *obj, Visitor *v, const char *name,
49                               void *opaque, Error **errp)
50 {
51     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(obj);
52     OnOffAuto veiointc = lvms->veiointc;
53 
54     visit_type_OnOffAuto(v, name, &veiointc, errp);
55 }
56 
57 static void virt_set_veiointc(Object *obj, Visitor *v, const char *name,
58                               void *opaque, Error **errp)
59 {
60     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(obj);
61 
62     visit_type_OnOffAuto(v, name, &lvms->veiointc, errp);
63 }
64 
65 static PFlashCFI01 *virt_flash_create1(LoongArchVirtMachineState *lvms,
66                                        const char *name,
67                                        const char *alias_prop_name)
68 {
69     DeviceState *dev = qdev_new(TYPE_PFLASH_CFI01);
70 
71     qdev_prop_set_uint64(dev, "sector-length", VIRT_FLASH_SECTOR_SIZE);
72     qdev_prop_set_uint8(dev, "width", 4);
73     qdev_prop_set_uint8(dev, "device-width", 2);
74     qdev_prop_set_bit(dev, "big-endian", false);
75     qdev_prop_set_uint16(dev, "id0", 0x89);
76     qdev_prop_set_uint16(dev, "id1", 0x18);
77     qdev_prop_set_uint16(dev, "id2", 0x00);
78     qdev_prop_set_uint16(dev, "id3", 0x00);
79     qdev_prop_set_string(dev, "name", name);
80     object_property_add_child(OBJECT(lvms), name, OBJECT(dev));
81     object_property_add_alias(OBJECT(lvms), alias_prop_name,
82                               OBJECT(dev), "drive");
83     return PFLASH_CFI01(dev);
84 }
85 
86 static void virt_flash_create(LoongArchVirtMachineState *lvms)
87 {
88     lvms->flash[0] = virt_flash_create1(lvms, "virt.flash0", "pflash0");
89     lvms->flash[1] = virt_flash_create1(lvms, "virt.flash1", "pflash1");
90 }
91 
92 static void virt_flash_map1(PFlashCFI01 *flash,
93                             hwaddr base, hwaddr size,
94                             MemoryRegion *sysmem)
95 {
96     DeviceState *dev = DEVICE(flash);
97     BlockBackend *blk;
98     hwaddr real_size = size;
99 
100     blk = pflash_cfi01_get_blk(flash);
101     if (blk) {
102         real_size = blk_getlength(blk);
103         assert(real_size && real_size <= size);
104     }
105 
106     assert(QEMU_IS_ALIGNED(real_size, VIRT_FLASH_SECTOR_SIZE));
107     assert(real_size / VIRT_FLASH_SECTOR_SIZE <= UINT32_MAX);
108 
109     qdev_prop_set_uint32(dev, "num-blocks", real_size / VIRT_FLASH_SECTOR_SIZE);
110     sysbus_realize_and_unref(SYS_BUS_DEVICE(dev), &error_fatal);
111     memory_region_add_subregion(sysmem, base,
112                                 sysbus_mmio_get_region(SYS_BUS_DEVICE(dev), 0));
113 }
114 
115 static void virt_flash_map(LoongArchVirtMachineState *lvms,
116                            MemoryRegion *sysmem)
117 {
118     PFlashCFI01 *flash0 = lvms->flash[0];
119     PFlashCFI01 *flash1 = lvms->flash[1];
120 
121     virt_flash_map1(flash0, VIRT_FLASH0_BASE, VIRT_FLASH0_SIZE, sysmem);
122     virt_flash_map1(flash1, VIRT_FLASH1_BASE, VIRT_FLASH1_SIZE, sysmem);
123 }
124 
125 static void virt_build_smbios(LoongArchVirtMachineState *lvms)
126 {
127     MachineState *ms = MACHINE(lvms);
128     MachineClass *mc = MACHINE_GET_CLASS(lvms);
129     uint8_t *smbios_tables, *smbios_anchor;
130     size_t smbios_tables_len, smbios_anchor_len;
131     const char *product = "QEMU Virtual Machine";
132 
133     if (!lvms->fw_cfg) {
134         return;
135     }
136 
137     smbios_set_defaults("QEMU", product, mc->name);
138 
139     smbios_get_tables(ms, SMBIOS_ENTRY_POINT_TYPE_64,
140                       NULL, 0,
141                       &smbios_tables, &smbios_tables_len,
142                       &smbios_anchor, &smbios_anchor_len, &error_fatal);
143 
144     if (smbios_anchor) {
145         fw_cfg_add_file(lvms->fw_cfg, "etc/smbios/smbios-tables",
146                         smbios_tables, smbios_tables_len);
147         fw_cfg_add_file(lvms->fw_cfg, "etc/smbios/smbios-anchor",
148                         smbios_anchor, smbios_anchor_len);
149     }
150 }
151 
152 static void virt_done(Notifier *notifier, void *data)
153 {
154     LoongArchVirtMachineState *lvms = container_of(notifier,
155                                       LoongArchVirtMachineState, machine_done);
156     virt_build_smbios(lvms);
157     virt_acpi_setup(lvms);
158     virt_fdt_setup(lvms);
159 }
160 
161 static void virt_powerdown_req(Notifier *notifier, void *opaque)
162 {
163     LoongArchVirtMachineState *s;
164 
165     s = container_of(notifier, LoongArchVirtMachineState, powerdown_notifier);
166     acpi_send_event(s->acpi_ged, ACPI_POWER_DOWN_STATUS);
167 }
168 
169 static void memmap_add_entry(uint64_t address, uint64_t length, uint32_t type)
170 {
171     /* Ensure there are no duplicate entries. */
172     for (unsigned i = 0; i < memmap_entries; i++) {
173         assert(memmap_table[i].address != address);
174     }
175 
176     memmap_table = g_renew(struct memmap_entry, memmap_table,
177                            memmap_entries + 1);
178     memmap_table[memmap_entries].address = cpu_to_le64(address);
179     memmap_table[memmap_entries].length = cpu_to_le64(length);
180     memmap_table[memmap_entries].type = cpu_to_le32(type);
181     memmap_table[memmap_entries].reserved = 0;
182     memmap_entries++;
183 }
184 
185 static DeviceState *create_acpi_ged(DeviceState *pch_pic,
186                                     LoongArchVirtMachineState *lvms)
187 {
188     DeviceState *dev;
189     MachineState *ms = MACHINE(lvms);
190     uint32_t event = ACPI_GED_PWR_DOWN_EVT;
191 
192     if (ms->ram_slots) {
193         event |= ACPI_GED_MEM_HOTPLUG_EVT;
194     }
195     dev = qdev_new(TYPE_ACPI_GED);
196     qdev_prop_set_uint32(dev, "ged-event", event);
197     sysbus_realize_and_unref(SYS_BUS_DEVICE(dev), &error_fatal);
198 
199     /* ged event */
200     sysbus_mmio_map(SYS_BUS_DEVICE(dev), 0, VIRT_GED_EVT_ADDR);
201     /* memory hotplug */
202     sysbus_mmio_map(SYS_BUS_DEVICE(dev), 1, VIRT_GED_MEM_ADDR);
203     /* ged regs used for reset and power down */
204     sysbus_mmio_map(SYS_BUS_DEVICE(dev), 2, VIRT_GED_REG_ADDR);
205 
206     sysbus_connect_irq(SYS_BUS_DEVICE(dev), 0,
207                        qdev_get_gpio_in(pch_pic, VIRT_SCI_IRQ - VIRT_GSI_BASE));
208     return dev;
209 }
210 
211 static DeviceState *create_platform_bus(DeviceState *pch_pic)
212 {
213     DeviceState *dev;
214     SysBusDevice *sysbus;
215     int i, irq;
216     MemoryRegion *sysmem = get_system_memory();
217 
218     dev = qdev_new(TYPE_PLATFORM_BUS_DEVICE);
219     dev->id = g_strdup(TYPE_PLATFORM_BUS_DEVICE);
220     qdev_prop_set_uint32(dev, "num_irqs", VIRT_PLATFORM_BUS_NUM_IRQS);
221     qdev_prop_set_uint32(dev, "mmio_size", VIRT_PLATFORM_BUS_SIZE);
222     sysbus_realize_and_unref(SYS_BUS_DEVICE(dev), &error_fatal);
223 
224     sysbus = SYS_BUS_DEVICE(dev);
225     for (i = 0; i < VIRT_PLATFORM_BUS_NUM_IRQS; i++) {
226         irq = VIRT_PLATFORM_BUS_IRQ - VIRT_GSI_BASE + i;
227         sysbus_connect_irq(sysbus, i, qdev_get_gpio_in(pch_pic, irq));
228     }
229 
230     memory_region_add_subregion(sysmem,
231                                 VIRT_PLATFORM_BUS_BASEADDRESS,
232                                 sysbus_mmio_get_region(sysbus, 0));
233     return dev;
234 }
235 
236 static void virt_devices_init(DeviceState *pch_pic,
237                                    LoongArchVirtMachineState *lvms)
238 {
239     MachineClass *mc = MACHINE_GET_CLASS(lvms);
240     DeviceState *gpex_dev;
241     SysBusDevice *d;
242     PCIBus *pci_bus;
243     MemoryRegion *ecam_alias, *ecam_reg, *pio_alias, *pio_reg;
244     MemoryRegion *mmio_alias, *mmio_reg;
245     int i;
246 
247     gpex_dev = qdev_new(TYPE_GPEX_HOST);
248     d = SYS_BUS_DEVICE(gpex_dev);
249     sysbus_realize_and_unref(d, &error_fatal);
250     pci_bus = PCI_HOST_BRIDGE(gpex_dev)->bus;
251     lvms->pci_bus = pci_bus;
252 
253     /* Map only part size_ecam bytes of ECAM space */
254     ecam_alias = g_new0(MemoryRegion, 1);
255     ecam_reg = sysbus_mmio_get_region(d, 0);
256     memory_region_init_alias(ecam_alias, OBJECT(gpex_dev), "pcie-ecam",
257                              ecam_reg, 0, VIRT_PCI_CFG_SIZE);
258     memory_region_add_subregion(get_system_memory(), VIRT_PCI_CFG_BASE,
259                                 ecam_alias);
260 
261     /* Map PCI mem space */
262     mmio_alias = g_new0(MemoryRegion, 1);
263     mmio_reg = sysbus_mmio_get_region(d, 1);
264     memory_region_init_alias(mmio_alias, OBJECT(gpex_dev), "pcie-mmio",
265                              mmio_reg, VIRT_PCI_MEM_BASE, VIRT_PCI_MEM_SIZE);
266     memory_region_add_subregion(get_system_memory(), VIRT_PCI_MEM_BASE,
267                                 mmio_alias);
268 
269     /* Map PCI IO port space. */
270     pio_alias = g_new0(MemoryRegion, 1);
271     pio_reg = sysbus_mmio_get_region(d, 2);
272     memory_region_init_alias(pio_alias, OBJECT(gpex_dev), "pcie-io", pio_reg,
273                              VIRT_PCI_IO_OFFSET, VIRT_PCI_IO_SIZE);
274     memory_region_add_subregion(get_system_memory(), VIRT_PCI_IO_BASE,
275                                 pio_alias);
276 
277     for (i = 0; i < PCI_NUM_PINS; i++) {
278         sysbus_connect_irq(d, i,
279                            qdev_get_gpio_in(pch_pic, 16 + i));
280         gpex_set_irq_num(GPEX_HOST(gpex_dev), i, 16 + i);
281     }
282 
283     /*
284      * Create uart fdt node in reverse order so that they appear
285      * in the finished device tree lowest address first
286      */
287     for (i = VIRT_UART_COUNT; i-- > 0;) {
288         hwaddr base = VIRT_UART_BASE + i * VIRT_UART_SIZE;
289         int irq = VIRT_UART_IRQ + i - VIRT_GSI_BASE;
290         serial_mm_init(get_system_memory(), base, 0,
291                        qdev_get_gpio_in(pch_pic, irq),
292                        115200, serial_hd(i), DEVICE_LITTLE_ENDIAN);
293     }
294 
295     /* Network init */
296     pci_init_nic_devices(pci_bus, mc->default_nic);
297 
298     /*
299      * There are some invalid guest memory access.
300      * Create some unimplemented devices to emulate this.
301      */
302     create_unimplemented_device("pci-dma-cfg", 0x1001041c, 0x4);
303     sysbus_create_simple("ls7a_rtc", VIRT_RTC_REG_BASE,
304                          qdev_get_gpio_in(pch_pic,
305                          VIRT_RTC_IRQ - VIRT_GSI_BASE));
306 
307     /* acpi ged */
308     lvms->acpi_ged = create_acpi_ged(pch_pic, lvms);
309     /* platform bus */
310     lvms->platform_bus_dev = create_platform_bus(pch_pic);
311 }
312 
313 static void virt_cpu_irq_init(LoongArchVirtMachineState *lvms)
314 {
315     int num, pin;
316     MachineState *ms = MACHINE(lvms);
317     MachineClass *mc = MACHINE_GET_CLASS(ms);
318     const CPUArchIdList *possible_cpus;
319     CPUState *cs;
320     Error *err = NULL;
321 
322     /* cpu nodes */
323     possible_cpus = mc->possible_cpu_arch_ids(ms);
324     for (num = 0; num < possible_cpus->len; num++) {
325         cs = possible_cpus->cpus[num].cpu;
326         if (cs == NULL) {
327             continue;
328         }
329 
330         hotplug_handler_plug(HOTPLUG_HANDLER(lvms->ipi), DEVICE(cs), &err);
331 
332         /*
333          * connect ext irq to the cpu irq
334          * cpu_pin[9:2] <= intc_pin[7:0]
335          */
336         for (pin = 0; pin < LS3A_INTC_IP; pin++) {
337             qdev_connect_gpio_out(lvms->extioi, (num * LS3A_INTC_IP + pin),
338                                   qdev_get_gpio_in(DEVICE(cs), pin + 2));
339         }
340     }
341 }
342 
343 static void virt_irq_init(LoongArchVirtMachineState *lvms)
344 {
345     DeviceState *pch_pic, *pch_msi;
346     DeviceState *ipi, *extioi;
347     SysBusDevice *d;
348     int i, start, num;
349 
350     /*
351      * Extended IRQ model.
352      *                                 |
353      * +-----------+     +-------------|--------+     +-----------+
354      * | IPI/Timer | --> | CPUINTC(0-3)|(4-255) | <-- | IPI/Timer |
355      * +-----------+     +-------------|--------+     +-----------+
356      *                         ^       |
357      *                         |
358      *                    +---------+
359      *                    | EIOINTC |
360      *                    +---------+
361      *                     ^       ^
362      *                     |       |
363      *              +---------+ +---------+
364      *              | PCH-PIC | | PCH-MSI |
365      *              +---------+ +---------+
366      *                ^      ^          ^
367      *                |      |          |
368      *         +--------+ +---------+ +---------+
369      *         | UARTs  | | Devices | | Devices |
370      *         +--------+ +---------+ +---------+
371      *
372      * Virt extended IRQ model.
373      *
374      *   +-----+    +---------------+     +-------+
375      *   | IPI |--> | CPUINTC(0-255)| <-- | Timer |
376      *   +-----+    +---------------+     +-------+
377      *                     ^
378      *                     |
379      *               +-----------+
380      *               | V-EIOINTC |
381      *               +-----------+
382      *                ^         ^
383      *                |         |
384      *         +---------+ +---------+
385      *         | PCH-PIC | | PCH-MSI |
386      *         +---------+ +---------+
387      *           ^      ^          ^
388      *           |      |          |
389      *    +--------+ +---------+ +---------+
390      *    | UARTs  | | Devices | | Devices |
391      *    +--------+ +---------+ +---------+
392      */
393 
394     /* Create IPI device */
395     ipi = qdev_new(TYPE_LOONGARCH_IPI);
396     lvms->ipi = ipi;
397     sysbus_realize_and_unref(SYS_BUS_DEVICE(ipi), &error_fatal);
398 
399     /* IPI iocsr memory region */
400     memory_region_add_subregion(&lvms->system_iocsr, SMP_IPI_MAILBOX,
401                    sysbus_mmio_get_region(SYS_BUS_DEVICE(ipi), 0));
402     memory_region_add_subregion(&lvms->system_iocsr, MAIL_SEND_ADDR,
403                    sysbus_mmio_get_region(SYS_BUS_DEVICE(ipi), 1));
404 
405     /* Create EXTIOI device */
406     extioi = qdev_new(TYPE_LOONGARCH_EXTIOI);
407     lvms->extioi = extioi;
408     if (virt_is_veiointc_enabled(lvms)) {
409         qdev_prop_set_bit(extioi, "has-virtualization-extension", true);
410     }
411     sysbus_realize_and_unref(SYS_BUS_DEVICE(extioi), &error_fatal);
412     memory_region_add_subregion(&lvms->system_iocsr, APIC_BASE,
413                     sysbus_mmio_get_region(SYS_BUS_DEVICE(extioi), 0));
414     if (virt_is_veiointc_enabled(lvms)) {
415         memory_region_add_subregion(&lvms->system_iocsr, EXTIOI_VIRT_BASE,
416                     sysbus_mmio_get_region(SYS_BUS_DEVICE(extioi), 1));
417     }
418 
419     virt_cpu_irq_init(lvms);
420     pch_pic = qdev_new(TYPE_LOONGARCH_PIC);
421     num = VIRT_PCH_PIC_IRQ_NUM;
422     qdev_prop_set_uint32(pch_pic, "pch_pic_irq_num", num);
423     d = SYS_BUS_DEVICE(pch_pic);
424     sysbus_realize_and_unref(d, &error_fatal);
425     memory_region_add_subregion(get_system_memory(), VIRT_IOAPIC_REG_BASE,
426                             sysbus_mmio_get_region(d, 0));
427     memory_region_add_subregion(get_system_memory(),
428                             VIRT_IOAPIC_REG_BASE + PCH_PIC_ROUTE_ENTRY_OFFSET,
429                             sysbus_mmio_get_region(d, 1));
430     memory_region_add_subregion(get_system_memory(),
431                             VIRT_IOAPIC_REG_BASE + PCH_PIC_INT_STATUS_LO,
432                             sysbus_mmio_get_region(d, 2));
433 
434     /* Connect pch_pic irqs to extioi */
435     for (i = 0; i < num; i++) {
436         qdev_connect_gpio_out(DEVICE(d), i, qdev_get_gpio_in(extioi, i));
437     }
438 
439     pch_msi = qdev_new(TYPE_LOONGARCH_PCH_MSI);
440     start   =  num;
441     num = EXTIOI_IRQS - start;
442     qdev_prop_set_uint32(pch_msi, "msi_irq_base", start);
443     qdev_prop_set_uint32(pch_msi, "msi_irq_num", num);
444     d = SYS_BUS_DEVICE(pch_msi);
445     sysbus_realize_and_unref(d, &error_fatal);
446     sysbus_mmio_map(d, 0, VIRT_PCH_MSI_ADDR_LOW);
447     for (i = 0; i < num; i++) {
448         /* Connect pch_msi irqs to extioi */
449         qdev_connect_gpio_out(DEVICE(d), i,
450                               qdev_get_gpio_in(extioi, i + start));
451     }
452 
453     virt_devices_init(pch_pic, lvms);
454 }
455 
456 static void virt_firmware_init(LoongArchVirtMachineState *lvms)
457 {
458     char *filename = MACHINE(lvms)->firmware;
459     char *bios_name = NULL;
460     int bios_size, i;
461     BlockBackend *pflash_blk0;
462     MemoryRegion *mr;
463 
464     lvms->bios_loaded = false;
465 
466     /* Map legacy -drive if=pflash to machine properties */
467     for (i = 0; i < ARRAY_SIZE(lvms->flash); i++) {
468         pflash_cfi01_legacy_drive(lvms->flash[i],
469                                   drive_get(IF_PFLASH, 0, i));
470     }
471 
472     virt_flash_map(lvms, get_system_memory());
473 
474     pflash_blk0 = pflash_cfi01_get_blk(lvms->flash[0]);
475 
476     if (pflash_blk0) {
477         if (filename) {
478             error_report("cannot use both '-bios' and '-drive if=pflash'"
479                          "options at once");
480             exit(1);
481         }
482         lvms->bios_loaded = true;
483         return;
484     }
485 
486     if (filename) {
487         bios_name = qemu_find_file(QEMU_FILE_TYPE_BIOS, filename);
488         if (!bios_name) {
489             error_report("Could not find ROM image '%s'", filename);
490             exit(1);
491         }
492 
493         mr = sysbus_mmio_get_region(SYS_BUS_DEVICE(lvms->flash[0]), 0);
494         bios_size = load_image_mr(bios_name, mr);
495         if (bios_size < 0) {
496             error_report("Could not load ROM image '%s'", bios_name);
497             exit(1);
498         }
499         g_free(bios_name);
500         lvms->bios_loaded = true;
501     }
502 }
503 
504 static MemTxResult virt_iocsr_misc_write(void *opaque, hwaddr addr,
505                                          uint64_t val, unsigned size,
506                                          MemTxAttrs attrs)
507 {
508     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(opaque);
509     uint64_t features;
510 
511     switch (addr) {
512     case MISC_FUNC_REG:
513         if (!virt_is_veiointc_enabled(lvms)) {
514             return MEMTX_OK;
515         }
516 
517         features = address_space_ldl(&lvms->as_iocsr,
518                                      EXTIOI_VIRT_BASE + EXTIOI_VIRT_CONFIG,
519                                      attrs, NULL);
520         if (val & BIT_ULL(IOCSRM_EXTIOI_EN)) {
521             features |= BIT(EXTIOI_ENABLE);
522         }
523         if (val & BIT_ULL(IOCSRM_EXTIOI_INT_ENCODE)) {
524             features |= BIT(EXTIOI_ENABLE_INT_ENCODE);
525         }
526 
527         address_space_stl(&lvms->as_iocsr,
528                           EXTIOI_VIRT_BASE + EXTIOI_VIRT_CONFIG,
529                           features, attrs, NULL);
530         break;
531     default:
532         g_assert_not_reached();
533     }
534 
535     return MEMTX_OK;
536 }
537 
538 static MemTxResult virt_iocsr_misc_read(void *opaque, hwaddr addr,
539                                         uint64_t *data,
540                                         unsigned size, MemTxAttrs attrs)
541 {
542     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(opaque);
543     uint64_t ret = 0;
544     int features;
545 
546     switch (addr) {
547     case VERSION_REG:
548         ret = 0x11ULL;
549         break;
550     case FEATURE_REG:
551         ret = BIT(IOCSRF_MSI) | BIT(IOCSRF_EXTIOI) | BIT(IOCSRF_CSRIPI);
552         if (kvm_enabled()) {
553             ret |= BIT(IOCSRF_VM);
554         }
555         break;
556     case VENDOR_REG:
557         ret = 0x6e6f73676e6f6f4cULL; /* "Loongson" */
558         break;
559     case CPUNAME_REG:
560         ret = 0x303030354133ULL;     /* "3A5000" */
561         break;
562     case MISC_FUNC_REG:
563         if (!virt_is_veiointc_enabled(lvms)) {
564             ret |= BIT_ULL(IOCSRM_EXTIOI_EN);
565             break;
566         }
567 
568         features = address_space_ldl(&lvms->as_iocsr,
569                                      EXTIOI_VIRT_BASE + EXTIOI_VIRT_CONFIG,
570                                      attrs, NULL);
571         if (features & BIT(EXTIOI_ENABLE)) {
572             ret |= BIT_ULL(IOCSRM_EXTIOI_EN);
573         }
574         if (features & BIT(EXTIOI_ENABLE_INT_ENCODE)) {
575             ret |= BIT_ULL(IOCSRM_EXTIOI_INT_ENCODE);
576         }
577         break;
578     default:
579         g_assert_not_reached();
580     }
581 
582     *data = ret;
583     return MEMTX_OK;
584 }
585 
586 static const MemoryRegionOps virt_iocsr_misc_ops = {
587     .read_with_attrs  = virt_iocsr_misc_read,
588     .write_with_attrs = virt_iocsr_misc_write,
589     .endianness = DEVICE_LITTLE_ENDIAN,
590     .valid = {
591         .min_access_size = 4,
592         .max_access_size = 8,
593     },
594     .impl = {
595         .min_access_size = 8,
596         .max_access_size = 8,
597     },
598 };
599 
600 static void fw_cfg_add_memory(MachineState *ms)
601 {
602     hwaddr base, size, ram_size, gap;
603     int nb_numa_nodes, nodes;
604     NodeInfo *numa_info;
605 
606     ram_size = ms->ram_size;
607     base = VIRT_LOWMEM_BASE;
608     gap = VIRT_LOWMEM_SIZE;
609     nodes = nb_numa_nodes = ms->numa_state->num_nodes;
610     numa_info = ms->numa_state->nodes;
611     if (!nodes) {
612         nodes = 1;
613     }
614 
615     /* add fw_cfg memory map of node0 */
616     if (nb_numa_nodes) {
617         size = numa_info[0].node_mem;
618     } else {
619         size = ram_size;
620     }
621 
622     if (size >= gap) {
623         memmap_add_entry(base, gap, 1);
624         size -= gap;
625         base = VIRT_HIGHMEM_BASE;
626     }
627 
628     if (size) {
629         memmap_add_entry(base, size, 1);
630         base += size;
631     }
632 
633     if (nodes < 2) {
634         return;
635     }
636 
637     /* add fw_cfg memory map of other nodes */
638     if (numa_info[0].node_mem < gap && ram_size > gap) {
639         /*
640          * memory map for the maining nodes splited into two part
641          * lowram:  [base, +(gap - numa_info[0].node_mem))
642          * highram: [VIRT_HIGHMEM_BASE, +(ram_size - gap))
643          */
644         memmap_add_entry(base, gap - numa_info[0].node_mem, 1);
645         size = ram_size - gap;
646         base = VIRT_HIGHMEM_BASE;
647     } else {
648         size = ram_size - numa_info[0].node_mem;
649     }
650 
651     if (size) {
652         memmap_add_entry(base, size, 1);
653     }
654 }
655 
656 static void virt_init(MachineState *machine)
657 {
658     LoongArchCPU *lacpu;
659     const char *cpu_model = machine->cpu_type;
660     MemoryRegion *address_space_mem = get_system_memory();
661     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(machine);
662     int i;
663     hwaddr base, size, ram_size = machine->ram_size;
664     const CPUArchIdList *possible_cpus;
665     MachineClass *mc = MACHINE_GET_CLASS(machine);
666     CPUState *cpu;
667 
668     if (!cpu_model) {
669         cpu_model = LOONGARCH_CPU_TYPE_NAME("la464");
670     }
671 
672     /* Create IOCSR space */
673     memory_region_init_io(&lvms->system_iocsr, OBJECT(machine), NULL,
674                           machine, "iocsr", UINT64_MAX);
675     address_space_init(&lvms->as_iocsr, &lvms->system_iocsr, "IOCSR");
676     memory_region_init_io(&lvms->iocsr_mem, OBJECT(machine),
677                           &virt_iocsr_misc_ops,
678                           machine, "iocsr_misc", 0x428);
679     memory_region_add_subregion(&lvms->system_iocsr, 0, &lvms->iocsr_mem);
680 
681     /* Init CPUs */
682     possible_cpus = mc->possible_cpu_arch_ids(machine);
683     for (i = 0; i < possible_cpus->len; i++) {
684         cpu = cpu_create(machine->cpu_type);
685         cpu->cpu_index = i;
686         machine->possible_cpus->cpus[i].cpu = cpu;
687         lacpu = LOONGARCH_CPU(cpu);
688         lacpu->phy_id = machine->possible_cpus->cpus[i].arch_id;
689         lacpu->env.address_space_iocsr = &lvms->as_iocsr;
690     }
691     fw_cfg_add_memory(machine);
692 
693     /* Node0 memory */
694     size = ram_size;
695     base = VIRT_LOWMEM_BASE;
696     if (size > VIRT_LOWMEM_SIZE) {
697         size = VIRT_LOWMEM_SIZE;
698     }
699 
700     memory_region_init_alias(&lvms->lowmem, NULL, "loongarch.lowram",
701                               machine->ram, base, size);
702     memory_region_add_subregion(address_space_mem, base, &lvms->lowmem);
703     base += size;
704     if (ram_size - size) {
705         base = VIRT_HIGHMEM_BASE;
706         memory_region_init_alias(&lvms->highmem, NULL, "loongarch.highram",
707                 machine->ram, VIRT_LOWMEM_BASE + size, ram_size - size);
708         memory_region_add_subregion(address_space_mem, base, &lvms->highmem);
709         base += ram_size - size;
710     }
711 
712     /* initialize device memory address space */
713     if (machine->ram_size < machine->maxram_size) {
714         ram_addr_t device_mem_size = machine->maxram_size - machine->ram_size;
715 
716         if (machine->ram_slots > ACPI_MAX_RAM_SLOTS) {
717             error_report("unsupported amount of memory slots: %"PRIu64,
718                          machine->ram_slots);
719             exit(EXIT_FAILURE);
720         }
721 
722         if (QEMU_ALIGN_UP(machine->maxram_size,
723                           TARGET_PAGE_SIZE) != machine->maxram_size) {
724             error_report("maximum memory size must by aligned to multiple of "
725                          "%d bytes", TARGET_PAGE_SIZE);
726             exit(EXIT_FAILURE);
727         }
728         machine_memory_devices_init(machine, base, device_mem_size);
729     }
730 
731     /* load the BIOS image. */
732     virt_firmware_init(lvms);
733 
734     /* fw_cfg init */
735     lvms->fw_cfg = virt_fw_cfg_init(ram_size, machine);
736     rom_set_fw(lvms->fw_cfg);
737     if (lvms->fw_cfg != NULL) {
738         fw_cfg_add_file(lvms->fw_cfg, "etc/memmap",
739                         memmap_table,
740                         sizeof(struct memmap_entry) * (memmap_entries));
741     }
742 
743     /* Initialize the IO interrupt subsystem */
744     virt_irq_init(lvms);
745     lvms->machine_done.notify = virt_done;
746     qemu_add_machine_init_done_notifier(&lvms->machine_done);
747      /* connect powerdown request */
748     lvms->powerdown_notifier.notify = virt_powerdown_req;
749     qemu_register_powerdown_notifier(&lvms->powerdown_notifier);
750 
751     lvms->bootinfo.ram_size = ram_size;
752     loongarch_load_kernel(machine, &lvms->bootinfo);
753 }
754 
755 static void virt_get_acpi(Object *obj, Visitor *v, const char *name,
756                           void *opaque, Error **errp)
757 {
758     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(obj);
759     OnOffAuto acpi = lvms->acpi;
760 
761     visit_type_OnOffAuto(v, name, &acpi, errp);
762 }
763 
764 static void virt_set_acpi(Object *obj, Visitor *v, const char *name,
765                                void *opaque, Error **errp)
766 {
767     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(obj);
768 
769     visit_type_OnOffAuto(v, name, &lvms->acpi, errp);
770 }
771 
772 static void virt_initfn(Object *obj)
773 {
774     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(obj);
775 
776     if (tcg_enabled()) {
777         lvms->veiointc = ON_OFF_AUTO_OFF;
778     }
779     lvms->acpi = ON_OFF_AUTO_AUTO;
780     lvms->oem_id = g_strndup(ACPI_BUILD_APPNAME6, 6);
781     lvms->oem_table_id = g_strndup(ACPI_BUILD_APPNAME8, 8);
782     virt_flash_create(lvms);
783 }
784 
785 static bool memhp_type_supported(DeviceState *dev)
786 {
787     /* we only support pc dimm now */
788     return object_dynamic_cast(OBJECT(dev), TYPE_PC_DIMM) &&
789            !object_dynamic_cast(OBJECT(dev), TYPE_NVDIMM);
790 }
791 
792 static void virt_mem_pre_plug(HotplugHandler *hotplug_dev, DeviceState *dev,
793                                  Error **errp)
794 {
795     pc_dimm_pre_plug(PC_DIMM(dev), MACHINE(hotplug_dev), errp);
796 }
797 
798 static void virt_device_pre_plug(HotplugHandler *hotplug_dev,
799                                             DeviceState *dev, Error **errp)
800 {
801     if (memhp_type_supported(dev)) {
802         virt_mem_pre_plug(hotplug_dev, dev, errp);
803     }
804 }
805 
806 static void virt_mem_unplug_request(HotplugHandler *hotplug_dev,
807                                      DeviceState *dev, Error **errp)
808 {
809     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(hotplug_dev);
810 
811     /* the acpi ged is always exist */
812     hotplug_handler_unplug_request(HOTPLUG_HANDLER(lvms->acpi_ged), dev,
813                                    errp);
814 }
815 
816 static void virt_device_unplug_request(HotplugHandler *hotplug_dev,
817                                           DeviceState *dev, Error **errp)
818 {
819     if (memhp_type_supported(dev)) {
820         virt_mem_unplug_request(hotplug_dev, dev, errp);
821     }
822 }
823 
824 static void virt_mem_unplug(HotplugHandler *hotplug_dev,
825                              DeviceState *dev, Error **errp)
826 {
827     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(hotplug_dev);
828 
829     hotplug_handler_unplug(HOTPLUG_HANDLER(lvms->acpi_ged), dev, errp);
830     pc_dimm_unplug(PC_DIMM(dev), MACHINE(lvms));
831     qdev_unrealize(dev);
832 }
833 
834 static void virt_device_unplug(HotplugHandler *hotplug_dev,
835                                           DeviceState *dev, Error **errp)
836 {
837     if (memhp_type_supported(dev)) {
838         virt_mem_unplug(hotplug_dev, dev, errp);
839     }
840 }
841 
842 static void virt_mem_plug(HotplugHandler *hotplug_dev,
843                              DeviceState *dev, Error **errp)
844 {
845     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(hotplug_dev);
846 
847     pc_dimm_plug(PC_DIMM(dev), MACHINE(lvms));
848     hotplug_handler_plug(HOTPLUG_HANDLER(lvms->acpi_ged),
849                          dev, &error_abort);
850 }
851 
852 static void virt_device_plug_cb(HotplugHandler *hotplug_dev,
853                                         DeviceState *dev, Error **errp)
854 {
855     LoongArchVirtMachineState *lvms = LOONGARCH_VIRT_MACHINE(hotplug_dev);
856     MachineClass *mc = MACHINE_GET_CLASS(lvms);
857     PlatformBusDevice *pbus;
858 
859     if (device_is_dynamic_sysbus(mc, dev)) {
860         if (lvms->platform_bus_dev) {
861             pbus = PLATFORM_BUS_DEVICE(lvms->platform_bus_dev);
862             platform_bus_link_device(pbus, SYS_BUS_DEVICE(dev));
863         }
864     } else if (memhp_type_supported(dev)) {
865         virt_mem_plug(hotplug_dev, dev, errp);
866     }
867 }
868 
869 static HotplugHandler *virt_get_hotplug_handler(MachineState *machine,
870                                                 DeviceState *dev)
871 {
872     MachineClass *mc = MACHINE_GET_CLASS(machine);
873 
874     if (device_is_dynamic_sysbus(mc, dev) ||
875         object_dynamic_cast(OBJECT(dev), TYPE_VIRTIO_IOMMU_PCI) ||
876         memhp_type_supported(dev)) {
877         return HOTPLUG_HANDLER(machine);
878     }
879     return NULL;
880 }
881 
882 static const CPUArchIdList *virt_possible_cpu_arch_ids(MachineState *ms)
883 {
884     int n;
885     unsigned int max_cpus = ms->smp.max_cpus;
886 
887     if (ms->possible_cpus) {
888         assert(ms->possible_cpus->len == max_cpus);
889         return ms->possible_cpus;
890     }
891 
892     ms->possible_cpus = g_malloc0(sizeof(CPUArchIdList) +
893                                   sizeof(CPUArchId) * max_cpus);
894     ms->possible_cpus->len = max_cpus;
895     for (n = 0; n < ms->possible_cpus->len; n++) {
896         ms->possible_cpus->cpus[n].type = ms->cpu_type;
897         ms->possible_cpus->cpus[n].arch_id = n;
898 
899         ms->possible_cpus->cpus[n].props.has_socket_id = true;
900         ms->possible_cpus->cpus[n].props.socket_id  =
901                                    n / (ms->smp.cores * ms->smp.threads);
902         ms->possible_cpus->cpus[n].props.has_core_id = true;
903         ms->possible_cpus->cpus[n].props.core_id =
904                                    n / ms->smp.threads % ms->smp.cores;
905         ms->possible_cpus->cpus[n].props.has_thread_id = true;
906         ms->possible_cpus->cpus[n].props.thread_id = n % ms->smp.threads;
907     }
908     return ms->possible_cpus;
909 }
910 
911 static CpuInstanceProperties virt_cpu_index_to_props(MachineState *ms,
912                                                      unsigned cpu_index)
913 {
914     MachineClass *mc = MACHINE_GET_CLASS(ms);
915     const CPUArchIdList *possible_cpus = mc->possible_cpu_arch_ids(ms);
916 
917     assert(cpu_index < possible_cpus->len);
918     return possible_cpus->cpus[cpu_index].props;
919 }
920 
921 static int64_t virt_get_default_cpu_node_id(const MachineState *ms, int idx)
922 {
923     int64_t socket_id;
924 
925     if (ms->numa_state->num_nodes) {
926         socket_id = ms->possible_cpus->cpus[idx].props.socket_id;
927         return socket_id % ms->numa_state->num_nodes;
928     } else {
929         return 0;
930     }
931 }
932 
933 static void virt_class_init(ObjectClass *oc, void *data)
934 {
935     MachineClass *mc = MACHINE_CLASS(oc);
936     HotplugHandlerClass *hc = HOTPLUG_HANDLER_CLASS(oc);
937 
938     mc->init = virt_init;
939     mc->default_cpu_type = LOONGARCH_CPU_TYPE_NAME("la464");
940     mc->default_ram_id = "loongarch.ram";
941     mc->desc = "QEMU LoongArch Virtual Machine";
942     mc->max_cpus = LOONGARCH_MAX_CPUS;
943     mc->is_default = 1;
944     mc->default_kernel_irqchip_split = false;
945     mc->block_default_type = IF_VIRTIO;
946     mc->default_boot_order = "c";
947     mc->no_cdrom = 1;
948     mc->possible_cpu_arch_ids = virt_possible_cpu_arch_ids;
949     mc->cpu_index_to_instance_props = virt_cpu_index_to_props;
950     mc->get_default_cpu_node_id = virt_get_default_cpu_node_id;
951     mc->numa_mem_supported = true;
952     mc->auto_enable_numa_with_memhp = true;
953     mc->auto_enable_numa_with_memdev = true;
954     mc->get_hotplug_handler = virt_get_hotplug_handler;
955     mc->default_nic = "virtio-net-pci";
956     hc->plug = virt_device_plug_cb;
957     hc->pre_plug = virt_device_pre_plug;
958     hc->unplug_request = virt_device_unplug_request;
959     hc->unplug = virt_device_unplug;
960 
961     object_class_property_add(oc, "acpi", "OnOffAuto",
962         virt_get_acpi, virt_set_acpi,
963         NULL, NULL);
964     object_class_property_set_description(oc, "acpi",
965         "Enable ACPI");
966     object_class_property_add(oc, "v-eiointc", "OnOffAuto",
967         virt_get_veiointc, virt_set_veiointc,
968         NULL, NULL);
969     object_class_property_set_description(oc, "v-eiointc",
970                             "Enable Virt Extend I/O Interrupt Controller.");
971     machine_class_allow_dynamic_sysbus_dev(mc, TYPE_RAMFB_DEVICE);
972 #ifdef CONFIG_TPM
973     machine_class_allow_dynamic_sysbus_dev(mc, TYPE_TPM_TIS_SYSBUS);
974 #endif
975 }
976 
977 static const TypeInfo virt_machine_types[] = {
978     {
979         .name           = TYPE_LOONGARCH_VIRT_MACHINE,
980         .parent         = TYPE_MACHINE,
981         .instance_size  = sizeof(LoongArchVirtMachineState),
982         .class_init     = virt_class_init,
983         .instance_init  = virt_initfn,
984         .interfaces = (InterfaceInfo[]) {
985          { TYPE_HOTPLUG_HANDLER },
986          { }
987         },
988     }
989 };
990 
991 DEFINE_TYPES(virt_machine_types)
992