1 /* 2 * ARM V2M MPS2 board emulation. 3 * 4 * Copyright (c) 2017 Linaro Limited 5 * Written by Peter Maydell 6 * 7 * This program is free software; you can redistribute it and/or modify 8 * it under the terms of the GNU General Public License version 2 or 9 * (at your option) any later version. 10 */ 11 12 /* The MPS2 and MPS2+ dev boards are FPGA based (the 2+ has a bigger 13 * FPGA but is otherwise the same as the 2). Since the CPU itself 14 * and most of the devices are in the FPGA, the details of the board 15 * as seen by the guest depend significantly on the FPGA image. 16 * We model the following FPGA images: 17 * "mps2-an385" -- Cortex-M3 as documented in ARM Application Note AN385 18 * "mps2-an511" -- Cortex-M3 'DesignStart' as documented in AN511 19 * 20 * Links to the TRM for the board itself and to the various Application 21 * Notes which document the FPGA images can be found here: 22 * https://developer.arm.com/products/system-design/development-boards/cortex-m-prototyping-system 23 */ 24 25 #include "qemu/osdep.h" 26 #include "qapi/error.h" 27 #include "qemu/error-report.h" 28 #include "hw/arm/arm.h" 29 #include "hw/arm/armv7m.h" 30 #include "hw/or-irq.h" 31 #include "hw/boards.h" 32 #include "exec/address-spaces.h" 33 #include "sysemu/sysemu.h" 34 #include "hw/misc/unimp.h" 35 #include "hw/char/cmsdk-apb-uart.h" 36 #include "hw/timer/cmsdk-apb-timer.h" 37 #include "hw/timer/cmsdk-apb-dualtimer.h" 38 #include "hw/misc/mps2-scc.h" 39 #include "hw/devices.h" 40 #include "net/net.h" 41 42 typedef enum MPS2FPGAType { 43 FPGA_AN385, 44 FPGA_AN511, 45 } MPS2FPGAType; 46 47 typedef struct { 48 MachineClass parent; 49 MPS2FPGAType fpga_type; 50 uint32_t scc_id; 51 } MPS2MachineClass; 52 53 typedef struct { 54 MachineState parent; 55 56 ARMv7MState armv7m; 57 MemoryRegion psram; 58 MemoryRegion ssram1; 59 MemoryRegion ssram1_m; 60 MemoryRegion ssram23; 61 MemoryRegion ssram23_m; 62 MemoryRegion blockram; 63 MemoryRegion blockram_m1; 64 MemoryRegion blockram_m2; 65 MemoryRegion blockram_m3; 66 MemoryRegion sram; 67 MPS2SCC scc; 68 CMSDKAPBDualTimer dualtimer; 69 } MPS2MachineState; 70 71 #define TYPE_MPS2_MACHINE "mps2" 72 #define TYPE_MPS2_AN385_MACHINE MACHINE_TYPE_NAME("mps2-an385") 73 #define TYPE_MPS2_AN511_MACHINE MACHINE_TYPE_NAME("mps2-an511") 74 75 #define MPS2_MACHINE(obj) \ 76 OBJECT_CHECK(MPS2MachineState, obj, TYPE_MPS2_MACHINE) 77 #define MPS2_MACHINE_GET_CLASS(obj) \ 78 OBJECT_GET_CLASS(MPS2MachineClass, obj, TYPE_MPS2_MACHINE) 79 #define MPS2_MACHINE_CLASS(klass) \ 80 OBJECT_CLASS_CHECK(MPS2MachineClass, klass, TYPE_MPS2_MACHINE) 81 82 /* Main SYSCLK frequency in Hz */ 83 #define SYSCLK_FRQ 25000000 84 85 /* Initialize the auxiliary RAM region @mr and map it into 86 * the memory map at @base. 87 */ 88 static void make_ram(MemoryRegion *mr, const char *name, 89 hwaddr base, hwaddr size) 90 { 91 memory_region_init_ram(mr, NULL, name, size, &error_fatal); 92 memory_region_add_subregion(get_system_memory(), base, mr); 93 } 94 95 /* Create an alias of an entire original MemoryRegion @orig 96 * located at @base in the memory map. 97 */ 98 static void make_ram_alias(MemoryRegion *mr, const char *name, 99 MemoryRegion *orig, hwaddr base) 100 { 101 memory_region_init_alias(mr, NULL, name, orig, 0, 102 memory_region_size(orig)); 103 memory_region_add_subregion(get_system_memory(), base, mr); 104 } 105 106 static void mps2_common_init(MachineState *machine) 107 { 108 MPS2MachineState *mms = MPS2_MACHINE(machine); 109 MPS2MachineClass *mmc = MPS2_MACHINE_GET_CLASS(machine); 110 MemoryRegion *system_memory = get_system_memory(); 111 MachineClass *mc = MACHINE_GET_CLASS(machine); 112 DeviceState *armv7m, *sccdev; 113 114 if (strcmp(machine->cpu_type, mc->default_cpu_type) != 0) { 115 error_report("This board can only be used with CPU %s", 116 mc->default_cpu_type); 117 exit(1); 118 } 119 120 /* The FPGA images have an odd combination of different RAMs, 121 * because in hardware they are different implementations and 122 * connected to different buses, giving varying performance/size 123 * tradeoffs. For QEMU they're all just RAM, though. We arbitrarily 124 * call the 16MB our "system memory", as it's the largest lump. 125 * 126 * Common to both boards: 127 * 0x21000000..0x21ffffff : PSRAM (16MB) 128 * AN385 only: 129 * 0x00000000 .. 0x003fffff : ZBT SSRAM1 130 * 0x00400000 .. 0x007fffff : mirror of ZBT SSRAM1 131 * 0x20000000 .. 0x203fffff : ZBT SSRAM 2&3 132 * 0x20400000 .. 0x207fffff : mirror of ZBT SSRAM 2&3 133 * 0x01000000 .. 0x01003fff : block RAM (16K) 134 * 0x01004000 .. 0x01007fff : mirror of above 135 * 0x01008000 .. 0x0100bfff : mirror of above 136 * 0x0100c000 .. 0x0100ffff : mirror of above 137 * AN511 only: 138 * 0x00000000 .. 0x0003ffff : FPGA block RAM 139 * 0x00400000 .. 0x007fffff : ZBT SSRAM1 140 * 0x20000000 .. 0x2001ffff : SRAM 141 * 0x20400000 .. 0x207fffff : ZBT SSRAM 2&3 142 * 143 * The AN385 has a feature where the lowest 16K can be mapped 144 * either to the bottom of the ZBT SSRAM1 or to the block RAM. 145 * This is of no use for QEMU so we don't implement it (as if 146 * zbt_boot_ctrl is always zero). 147 */ 148 memory_region_allocate_system_memory(&mms->psram, 149 NULL, "mps.ram", 0x1000000); 150 memory_region_add_subregion(system_memory, 0x21000000, &mms->psram); 151 152 switch (mmc->fpga_type) { 153 case FPGA_AN385: 154 make_ram(&mms->ssram1, "mps.ssram1", 0x0, 0x400000); 155 make_ram_alias(&mms->ssram1_m, "mps.ssram1_m", &mms->ssram1, 0x400000); 156 make_ram(&mms->ssram23, "mps.ssram23", 0x20000000, 0x400000); 157 make_ram_alias(&mms->ssram23_m, "mps.ssram23_m", 158 &mms->ssram23, 0x20400000); 159 make_ram(&mms->blockram, "mps.blockram", 0x01000000, 0x4000); 160 make_ram_alias(&mms->blockram_m1, "mps.blockram_m1", 161 &mms->blockram, 0x01004000); 162 make_ram_alias(&mms->blockram_m2, "mps.blockram_m2", 163 &mms->blockram, 0x01008000); 164 make_ram_alias(&mms->blockram_m3, "mps.blockram_m3", 165 &mms->blockram, 0x0100c000); 166 break; 167 case FPGA_AN511: 168 make_ram(&mms->blockram, "mps.blockram", 0x0, 0x40000); 169 make_ram(&mms->ssram1, "mps.ssram1", 0x00400000, 0x00800000); 170 make_ram(&mms->sram, "mps.sram", 0x20000000, 0x20000); 171 make_ram(&mms->ssram23, "mps.ssram23", 0x20400000, 0x400000); 172 break; 173 default: 174 g_assert_not_reached(); 175 } 176 177 object_initialize(&mms->armv7m, sizeof(mms->armv7m), TYPE_ARMV7M); 178 armv7m = DEVICE(&mms->armv7m); 179 qdev_set_parent_bus(armv7m, sysbus_get_default()); 180 switch (mmc->fpga_type) { 181 case FPGA_AN385: 182 qdev_prop_set_uint32(armv7m, "num-irq", 32); 183 break; 184 case FPGA_AN511: 185 qdev_prop_set_uint32(armv7m, "num-irq", 64); 186 break; 187 default: 188 g_assert_not_reached(); 189 } 190 qdev_prop_set_string(armv7m, "cpu-type", machine->cpu_type); 191 qdev_prop_set_bit(armv7m, "enable-bitband", true); 192 object_property_set_link(OBJECT(&mms->armv7m), OBJECT(system_memory), 193 "memory", &error_abort); 194 object_property_set_bool(OBJECT(&mms->armv7m), true, "realized", 195 &error_fatal); 196 197 create_unimplemented_device("zbtsmram mirror", 0x00400000, 0x00400000); 198 create_unimplemented_device("RESERVED 1", 0x00800000, 0x00800000); 199 create_unimplemented_device("Block RAM", 0x01000000, 0x00010000); 200 create_unimplemented_device("RESERVED 2", 0x01010000, 0x1EFF0000); 201 create_unimplemented_device("RESERVED 3", 0x20800000, 0x00800000); 202 create_unimplemented_device("PSRAM", 0x21000000, 0x01000000); 203 /* These three ranges all cover multiple devices; we may implement 204 * some of them below (in which case the real device takes precedence 205 * over the unimplemented-region mapping). 206 */ 207 create_unimplemented_device("CMSDK APB peripheral region @0x40000000", 208 0x40000000, 0x00010000); 209 create_unimplemented_device("CMSDK peripheral region @0x40010000", 210 0x40010000, 0x00010000); 211 create_unimplemented_device("Extra peripheral region @0x40020000", 212 0x40020000, 0x00010000); 213 create_unimplemented_device("RESERVED 4", 0x40030000, 0x001D0000); 214 create_unimplemented_device("VGA", 0x41000000, 0x0200000); 215 216 switch (mmc->fpga_type) { 217 case FPGA_AN385: 218 { 219 /* The overflow IRQs for UARTs 0, 1 and 2 are ORed together. 220 * Overflow for UARTs 4 and 5 doesn't trigger any interrupt. 221 */ 222 Object *orgate; 223 DeviceState *orgate_dev; 224 int i; 225 226 orgate = object_new(TYPE_OR_IRQ); 227 object_property_set_int(orgate, 6, "num-lines", &error_fatal); 228 object_property_set_bool(orgate, true, "realized", &error_fatal); 229 orgate_dev = DEVICE(orgate); 230 qdev_connect_gpio_out(orgate_dev, 0, qdev_get_gpio_in(armv7m, 12)); 231 232 for (i = 0; i < 5; i++) { 233 static const hwaddr uartbase[] = {0x40004000, 0x40005000, 234 0x40006000, 0x40007000, 235 0x40009000}; 236 /* RX irq number; TX irq is always one greater */ 237 static const int uartirq[] = {0, 2, 4, 18, 20}; 238 qemu_irq txovrint = NULL, rxovrint = NULL; 239 240 if (i < 3) { 241 txovrint = qdev_get_gpio_in(orgate_dev, i * 2); 242 rxovrint = qdev_get_gpio_in(orgate_dev, i * 2 + 1); 243 } 244 245 cmsdk_apb_uart_create(uartbase[i], 246 qdev_get_gpio_in(armv7m, uartirq[i] + 1), 247 qdev_get_gpio_in(armv7m, uartirq[i]), 248 txovrint, rxovrint, 249 NULL, 250 serial_hd(i), SYSCLK_FRQ); 251 } 252 break; 253 } 254 case FPGA_AN511: 255 { 256 /* The overflow IRQs for all UARTs are ORed together. 257 * Tx and Rx IRQs for each UART are ORed together. 258 */ 259 Object *orgate; 260 DeviceState *orgate_dev; 261 int i; 262 263 orgate = object_new(TYPE_OR_IRQ); 264 object_property_set_int(orgate, 10, "num-lines", &error_fatal); 265 object_property_set_bool(orgate, true, "realized", &error_fatal); 266 orgate_dev = DEVICE(orgate); 267 qdev_connect_gpio_out(orgate_dev, 0, qdev_get_gpio_in(armv7m, 12)); 268 269 for (i = 0; i < 5; i++) { 270 /* system irq numbers for the combined tx/rx for each UART */ 271 static const int uart_txrx_irqno[] = {0, 2, 45, 46, 56}; 272 static const hwaddr uartbase[] = {0x40004000, 0x40005000, 273 0x4002c000, 0x4002d000, 274 0x4002e000}; 275 Object *txrx_orgate; 276 DeviceState *txrx_orgate_dev; 277 278 txrx_orgate = object_new(TYPE_OR_IRQ); 279 object_property_set_int(txrx_orgate, 2, "num-lines", &error_fatal); 280 object_property_set_bool(txrx_orgate, true, "realized", 281 &error_fatal); 282 txrx_orgate_dev = DEVICE(txrx_orgate); 283 qdev_connect_gpio_out(txrx_orgate_dev, 0, 284 qdev_get_gpio_in(armv7m, uart_txrx_irqno[i])); 285 cmsdk_apb_uart_create(uartbase[i], 286 qdev_get_gpio_in(txrx_orgate_dev, 0), 287 qdev_get_gpio_in(txrx_orgate_dev, 1), 288 qdev_get_gpio_in(orgate_dev, i * 2), 289 qdev_get_gpio_in(orgate_dev, i * 2 + 1), 290 NULL, 291 serial_hd(i), SYSCLK_FRQ); 292 } 293 break; 294 } 295 default: 296 g_assert_not_reached(); 297 } 298 299 cmsdk_apb_timer_create(0x40000000, qdev_get_gpio_in(armv7m, 8), SYSCLK_FRQ); 300 cmsdk_apb_timer_create(0x40001000, qdev_get_gpio_in(armv7m, 9), SYSCLK_FRQ); 301 302 sysbus_init_child_obj(OBJECT(mms), "dualtimer", &mms->dualtimer, 303 sizeof(mms->dualtimer), TYPE_CMSDK_APB_DUALTIMER); 304 qdev_prop_set_uint32(DEVICE(&mms->dualtimer), "pclk-frq", SYSCLK_FRQ); 305 object_property_set_bool(OBJECT(&mms->dualtimer), true, "realized", 306 &error_fatal); 307 sysbus_connect_irq(SYS_BUS_DEVICE(&mms->dualtimer), 0, 308 qdev_get_gpio_in(armv7m, 10)); 309 sysbus_mmio_map(SYS_BUS_DEVICE(&mms->dualtimer), 0, 0x40002000); 310 311 object_initialize(&mms->scc, sizeof(mms->scc), TYPE_MPS2_SCC); 312 sccdev = DEVICE(&mms->scc); 313 qdev_set_parent_bus(sccdev, sysbus_get_default()); 314 qdev_prop_set_uint32(sccdev, "scc-cfg4", 0x2); 315 qdev_prop_set_uint32(sccdev, "scc-aid", 0x00200008); 316 qdev_prop_set_uint32(sccdev, "scc-id", mmc->scc_id); 317 object_property_set_bool(OBJECT(&mms->scc), true, "realized", 318 &error_fatal); 319 sysbus_mmio_map(SYS_BUS_DEVICE(sccdev), 0, 0x4002f000); 320 321 /* In hardware this is a LAN9220; the LAN9118 is software compatible 322 * except that it doesn't support the checksum-offload feature. 323 */ 324 lan9118_init(&nd_table[0], 0x40200000, 325 qdev_get_gpio_in(armv7m, 326 mmc->fpga_type == FPGA_AN385 ? 13 : 47)); 327 328 system_clock_scale = NANOSECONDS_PER_SECOND / SYSCLK_FRQ; 329 330 armv7m_load_kernel(ARM_CPU(first_cpu), machine->kernel_filename, 331 0x400000); 332 } 333 334 static void mps2_class_init(ObjectClass *oc, void *data) 335 { 336 MachineClass *mc = MACHINE_CLASS(oc); 337 338 mc->init = mps2_common_init; 339 mc->max_cpus = 1; 340 } 341 342 static void mps2_an385_class_init(ObjectClass *oc, void *data) 343 { 344 MachineClass *mc = MACHINE_CLASS(oc); 345 MPS2MachineClass *mmc = MPS2_MACHINE_CLASS(oc); 346 347 mc->desc = "ARM MPS2 with AN385 FPGA image for Cortex-M3"; 348 mmc->fpga_type = FPGA_AN385; 349 mc->default_cpu_type = ARM_CPU_TYPE_NAME("cortex-m3"); 350 mmc->scc_id = 0x41043850; 351 } 352 353 static void mps2_an511_class_init(ObjectClass *oc, void *data) 354 { 355 MachineClass *mc = MACHINE_CLASS(oc); 356 MPS2MachineClass *mmc = MPS2_MACHINE_CLASS(oc); 357 358 mc->desc = "ARM MPS2 with AN511 DesignStart FPGA image for Cortex-M3"; 359 mmc->fpga_type = FPGA_AN511; 360 mc->default_cpu_type = ARM_CPU_TYPE_NAME("cortex-m3"); 361 mmc->scc_id = 0x41045110; 362 } 363 364 static const TypeInfo mps2_info = { 365 .name = TYPE_MPS2_MACHINE, 366 .parent = TYPE_MACHINE, 367 .abstract = true, 368 .instance_size = sizeof(MPS2MachineState), 369 .class_size = sizeof(MPS2MachineClass), 370 .class_init = mps2_class_init, 371 }; 372 373 static const TypeInfo mps2_an385_info = { 374 .name = TYPE_MPS2_AN385_MACHINE, 375 .parent = TYPE_MPS2_MACHINE, 376 .class_init = mps2_an385_class_init, 377 }; 378 379 static const TypeInfo mps2_an511_info = { 380 .name = TYPE_MPS2_AN511_MACHINE, 381 .parent = TYPE_MPS2_MACHINE, 382 .class_init = mps2_an511_class_init, 383 }; 384 385 static void mps2_machine_init(void) 386 { 387 type_register_static(&mps2_info); 388 type_register_static(&mps2_an385_info); 389 type_register_static(&mps2_an511_info); 390 } 391 392 type_init(mps2_machine_init); 393