1 /* 2 * QEMU MCH/ICH9 PCI Bridge Emulation 3 * 4 * Copyright (c) 2006 Fabrice Bellard 5 * Copyright (c) 2009, 2010, 2011 6 * Isaku Yamahata <yamahata at valinux co jp> 7 * VA Linux Systems Japan K.K. 8 * Copyright (C) 2012 Jason Baron <jbaron@redhat.com> 9 * 10 * This is based on piix.c, but heavily modified. 11 * 12 * Permission is hereby granted, free of charge, to any person obtaining a copy 13 * of this software and associated documentation files (the "Software"), to deal 14 * in the Software without restriction, including without limitation the rights 15 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 16 * copies of the Software, and to permit persons to whom the Software is 17 * furnished to do so, subject to the following conditions: 18 * 19 * The above copyright notice and this permission notice shall be included in 20 * all copies or substantial portions of the Software. 21 * 22 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 23 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 24 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 25 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 26 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 27 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN 28 * THE SOFTWARE. 29 */ 30 #include "hw/hw.h" 31 #include "hw/pci-host/q35.h" 32 #include "qapi/visitor.h" 33 34 /**************************************************************************** 35 * Q35 host 36 */ 37 38 static void q35_host_realize(DeviceState *dev, Error **errp) 39 { 40 PCIHostState *pci = PCI_HOST_BRIDGE(dev); 41 Q35PCIHost *s = Q35_HOST_DEVICE(dev); 42 SysBusDevice *sbd = SYS_BUS_DEVICE(dev); 43 44 sysbus_add_io(sbd, MCH_HOST_BRIDGE_CONFIG_ADDR, &pci->conf_mem); 45 sysbus_init_ioports(sbd, MCH_HOST_BRIDGE_CONFIG_ADDR, 4); 46 47 sysbus_add_io(sbd, MCH_HOST_BRIDGE_CONFIG_DATA, &pci->data_mem); 48 sysbus_init_ioports(sbd, MCH_HOST_BRIDGE_CONFIG_DATA, 4); 49 50 pci->bus = pci_bus_new(DEVICE(s), "pcie.0", 51 s->mch.pci_address_space, s->mch.address_space_io, 52 0, TYPE_PCIE_BUS); 53 qdev_set_parent_bus(DEVICE(&s->mch), BUS(pci->bus)); 54 qdev_init_nofail(DEVICE(&s->mch)); 55 } 56 57 static const char *q35_host_root_bus_path(PCIHostState *host_bridge, 58 PCIBus *rootbus) 59 { 60 Q35PCIHost *s = Q35_HOST_DEVICE(host_bridge); 61 62 /* For backwards compat with old device paths */ 63 if (s->mch.short_root_bus) { 64 return "0000"; 65 } 66 return "0000:00"; 67 } 68 69 static void q35_host_get_pci_hole_start(Object *obj, Visitor *v, 70 void *opaque, const char *name, 71 Error **errp) 72 { 73 Q35PCIHost *s = Q35_HOST_DEVICE(obj); 74 uint32_t value = s->mch.pci_info.w32.begin; 75 76 visit_type_uint32(v, &value, name, errp); 77 } 78 79 static void q35_host_get_pci_hole_end(Object *obj, Visitor *v, 80 void *opaque, const char *name, 81 Error **errp) 82 { 83 Q35PCIHost *s = Q35_HOST_DEVICE(obj); 84 uint32_t value = s->mch.pci_info.w32.end; 85 86 visit_type_uint32(v, &value, name, errp); 87 } 88 89 static void q35_host_get_pci_hole64_start(Object *obj, Visitor *v, 90 void *opaque, const char *name, 91 Error **errp) 92 { 93 PCIHostState *h = PCI_HOST_BRIDGE(obj); 94 Range w64; 95 96 pci_bus_get_w64_range(h->bus, &w64); 97 98 visit_type_uint64(v, &w64.begin, name, errp); 99 } 100 101 static void q35_host_get_pci_hole64_end(Object *obj, Visitor *v, 102 void *opaque, const char *name, 103 Error **errp) 104 { 105 PCIHostState *h = PCI_HOST_BRIDGE(obj); 106 Range w64; 107 108 pci_bus_get_w64_range(h->bus, &w64); 109 110 visit_type_uint64(v, &w64.end, name, errp); 111 } 112 113 static void q35_host_get_mmcfg_size(Object *obj, Visitor *v, 114 void *opaque, const char *name, 115 Error **errp) 116 { 117 PCIExpressHost *e = PCIE_HOST_BRIDGE(obj); 118 uint32_t value = e->size; 119 120 visit_type_uint32(v, &value, name, errp); 121 } 122 123 static Property mch_props[] = { 124 DEFINE_PROP_UINT64(PCIE_HOST_MCFG_BASE, Q35PCIHost, parent_obj.base_addr, 125 MCH_HOST_BRIDGE_PCIEXBAR_DEFAULT), 126 DEFINE_PROP_SIZE(PCI_HOST_PROP_PCI_HOLE64_SIZE, Q35PCIHost, 127 mch.pci_hole64_size, DEFAULT_PCI_HOLE64_SIZE), 128 DEFINE_PROP_UINT32("short_root_bus", Q35PCIHost, mch.short_root_bus, 0), 129 DEFINE_PROP_END_OF_LIST(), 130 }; 131 132 static void q35_host_class_init(ObjectClass *klass, void *data) 133 { 134 DeviceClass *dc = DEVICE_CLASS(klass); 135 PCIHostBridgeClass *hc = PCI_HOST_BRIDGE_CLASS(klass); 136 137 hc->root_bus_path = q35_host_root_bus_path; 138 dc->realize = q35_host_realize; 139 dc->props = mch_props; 140 set_bit(DEVICE_CATEGORY_BRIDGE, dc->categories); 141 dc->fw_name = "pci"; 142 } 143 144 static void q35_host_initfn(Object *obj) 145 { 146 Q35PCIHost *s = Q35_HOST_DEVICE(obj); 147 PCIHostState *phb = PCI_HOST_BRIDGE(obj); 148 149 memory_region_init_io(&phb->conf_mem, obj, &pci_host_conf_le_ops, phb, 150 "pci-conf-idx", 4); 151 memory_region_init_io(&phb->data_mem, obj, &pci_host_data_le_ops, phb, 152 "pci-conf-data", 4); 153 154 object_initialize(&s->mch, sizeof(s->mch), TYPE_MCH_PCI_DEVICE); 155 object_property_add_child(OBJECT(s), "mch", OBJECT(&s->mch), NULL); 156 qdev_prop_set_uint32(DEVICE(&s->mch), "addr", PCI_DEVFN(0, 0)); 157 qdev_prop_set_bit(DEVICE(&s->mch), "multifunction", false); 158 159 object_property_add(obj, PCI_HOST_PROP_PCI_HOLE_START, "int", 160 q35_host_get_pci_hole_start, 161 NULL, NULL, NULL, NULL); 162 163 object_property_add(obj, PCI_HOST_PROP_PCI_HOLE_END, "int", 164 q35_host_get_pci_hole_end, 165 NULL, NULL, NULL, NULL); 166 167 object_property_add(obj, PCI_HOST_PROP_PCI_HOLE64_START, "int", 168 q35_host_get_pci_hole64_start, 169 NULL, NULL, NULL, NULL); 170 171 object_property_add(obj, PCI_HOST_PROP_PCI_HOLE64_END, "int", 172 q35_host_get_pci_hole64_end, 173 NULL, NULL, NULL, NULL); 174 175 object_property_add(obj, PCIE_HOST_MCFG_SIZE, "int", 176 q35_host_get_mmcfg_size, 177 NULL, NULL, NULL, NULL); 178 179 /* Leave enough space for the biggest MCFG BAR */ 180 /* TODO: this matches current bios behaviour, but 181 * it's not a power of two, which means an MTRR 182 * can't cover it exactly. 183 */ 184 s->mch.pci_info.w32.begin = MCH_HOST_BRIDGE_PCIEXBAR_DEFAULT + 185 MCH_HOST_BRIDGE_PCIEXBAR_MAX; 186 s->mch.pci_info.w32.end = IO_APIC_DEFAULT_ADDRESS; 187 } 188 189 static const TypeInfo q35_host_info = { 190 .name = TYPE_Q35_HOST_DEVICE, 191 .parent = TYPE_PCIE_HOST_BRIDGE, 192 .instance_size = sizeof(Q35PCIHost), 193 .instance_init = q35_host_initfn, 194 .class_init = q35_host_class_init, 195 }; 196 197 /**************************************************************************** 198 * MCH D0:F0 199 */ 200 201 /* PCIe MMCFG */ 202 static void mch_update_pciexbar(MCHPCIState *mch) 203 { 204 PCIDevice *pci_dev = PCI_DEVICE(mch); 205 BusState *bus = qdev_get_parent_bus(DEVICE(mch)); 206 PCIExpressHost *pehb = PCIE_HOST_BRIDGE(bus->parent); 207 208 uint64_t pciexbar; 209 int enable; 210 uint64_t addr; 211 uint64_t addr_mask; 212 uint32_t length; 213 214 pciexbar = pci_get_quad(pci_dev->config + MCH_HOST_BRIDGE_PCIEXBAR); 215 enable = pciexbar & MCH_HOST_BRIDGE_PCIEXBAREN; 216 addr_mask = MCH_HOST_BRIDGE_PCIEXBAR_ADMSK; 217 switch (pciexbar & MCH_HOST_BRIDGE_PCIEXBAR_LENGTH_MASK) { 218 case MCH_HOST_BRIDGE_PCIEXBAR_LENGTH_256M: 219 length = 256 * 1024 * 1024; 220 break; 221 case MCH_HOST_BRIDGE_PCIEXBAR_LENGTH_128M: 222 length = 128 * 1024 * 1024; 223 addr_mask |= MCH_HOST_BRIDGE_PCIEXBAR_128ADMSK | 224 MCH_HOST_BRIDGE_PCIEXBAR_64ADMSK; 225 break; 226 case MCH_HOST_BRIDGE_PCIEXBAR_LENGTH_64M: 227 length = 64 * 1024 * 1024; 228 addr_mask |= MCH_HOST_BRIDGE_PCIEXBAR_64ADMSK; 229 break; 230 case MCH_HOST_BRIDGE_PCIEXBAR_LENGTH_RVD: 231 default: 232 enable = 0; 233 length = 0; 234 abort(); 235 break; 236 } 237 addr = pciexbar & addr_mask; 238 pcie_host_mmcfg_update(pehb, enable, addr, length); 239 /* Leave enough space for the MCFG BAR */ 240 /* 241 * TODO: this matches current bios behaviour, but it's not a power of two, 242 * which means an MTRR can't cover it exactly. 243 */ 244 if (enable) { 245 mch->pci_info.w32.begin = addr + length; 246 } else { 247 mch->pci_info.w32.begin = MCH_HOST_BRIDGE_PCIEXBAR_DEFAULT; 248 } 249 } 250 251 /* PAM */ 252 static void mch_update_pam(MCHPCIState *mch) 253 { 254 PCIDevice *pd = PCI_DEVICE(mch); 255 int i; 256 257 memory_region_transaction_begin(); 258 for (i = 0; i < 13; i++) { 259 pam_update(&mch->pam_regions[i], i, 260 pd->config[MCH_HOST_BRIDGE_PAM0 + ((i + 1) / 2)]); 261 } 262 memory_region_transaction_commit(); 263 } 264 265 /* SMRAM */ 266 static void mch_update_smram(MCHPCIState *mch) 267 { 268 PCIDevice *pd = PCI_DEVICE(mch); 269 270 memory_region_transaction_begin(); 271 smram_update(&mch->smram_region, pd->config[MCH_HOST_BRIDGE_SMRAM], 272 mch->smm_enabled); 273 memory_region_set_enabled(&mch->smram, 274 pd->config[MCH_HOST_BRIDGE_SMRAM] & SMRAM_G_SMRAME); 275 memory_region_transaction_commit(); 276 } 277 278 static void mch_set_smm(int smm, void *arg) 279 { 280 MCHPCIState *mch = arg; 281 PCIDevice *pd = PCI_DEVICE(mch); 282 283 memory_region_transaction_begin(); 284 smram_set_smm(&mch->smm_enabled, smm, pd->config[MCH_HOST_BRIDGE_SMRAM], 285 &mch->smram_region); 286 memory_region_transaction_commit(); 287 } 288 289 static void mch_write_config(PCIDevice *d, 290 uint32_t address, uint32_t val, int len) 291 { 292 MCHPCIState *mch = MCH_PCI_DEVICE(d); 293 294 /* XXX: implement SMRAM.D_LOCK */ 295 pci_default_write_config(d, address, val, len); 296 297 if (ranges_overlap(address, len, MCH_HOST_BRIDGE_PAM0, 298 MCH_HOST_BRIDGE_PAM_SIZE)) { 299 mch_update_pam(mch); 300 } 301 302 if (ranges_overlap(address, len, MCH_HOST_BRIDGE_PCIEXBAR, 303 MCH_HOST_BRIDGE_PCIEXBAR_SIZE)) { 304 mch_update_pciexbar(mch); 305 } 306 307 if (ranges_overlap(address, len, MCH_HOST_BRIDGE_SMRAM, 308 MCH_HOST_BRIDGE_SMRAM_SIZE)) { 309 mch_update_smram(mch); 310 } 311 } 312 313 static void mch_update(MCHPCIState *mch) 314 { 315 mch_update_pciexbar(mch); 316 mch_update_pam(mch); 317 mch_update_smram(mch); 318 } 319 320 static int mch_post_load(void *opaque, int version_id) 321 { 322 MCHPCIState *mch = opaque; 323 mch_update(mch); 324 return 0; 325 } 326 327 static const VMStateDescription vmstate_mch = { 328 .name = "mch", 329 .version_id = 1, 330 .minimum_version_id = 1, 331 .post_load = mch_post_load, 332 .fields = (VMStateField[]) { 333 VMSTATE_PCI_DEVICE(parent_obj, MCHPCIState), 334 VMSTATE_UINT8(smm_enabled, MCHPCIState), 335 VMSTATE_END_OF_LIST() 336 } 337 }; 338 339 static void mch_reset(DeviceState *qdev) 340 { 341 PCIDevice *d = PCI_DEVICE(qdev); 342 MCHPCIState *mch = MCH_PCI_DEVICE(d); 343 344 pci_set_quad(d->config + MCH_HOST_BRIDGE_PCIEXBAR, 345 MCH_HOST_BRIDGE_PCIEXBAR_DEFAULT); 346 347 d->config[MCH_HOST_BRIDGE_SMRAM] = MCH_HOST_BRIDGE_SMRAM_DEFAULT; 348 349 mch_update(mch); 350 } 351 352 static AddressSpace *q35_host_dma_iommu(PCIBus *bus, void *opaque, int devfn) 353 { 354 IntelIOMMUState *s = opaque; 355 VTDAddressSpace **pvtd_as; 356 int bus_num = pci_bus_num(bus); 357 358 assert(0 <= bus_num && bus_num <= VTD_PCI_BUS_MAX); 359 assert(0 <= devfn && devfn <= VTD_PCI_DEVFN_MAX); 360 361 pvtd_as = s->address_spaces[bus_num]; 362 if (!pvtd_as) { 363 /* No corresponding free() */ 364 pvtd_as = g_malloc0(sizeof(VTDAddressSpace *) * VTD_PCI_DEVFN_MAX); 365 s->address_spaces[bus_num] = pvtd_as; 366 } 367 if (!pvtd_as[devfn]) { 368 pvtd_as[devfn] = g_malloc0(sizeof(VTDAddressSpace)); 369 370 pvtd_as[devfn]->bus_num = (uint8_t)bus_num; 371 pvtd_as[devfn]->devfn = (uint8_t)devfn; 372 pvtd_as[devfn]->iommu_state = s; 373 pvtd_as[devfn]->context_cache_entry.context_cache_gen = 0; 374 memory_region_init_iommu(&pvtd_as[devfn]->iommu, OBJECT(s), 375 &s->iommu_ops, "intel_iommu", UINT64_MAX); 376 address_space_init(&pvtd_as[devfn]->as, 377 &pvtd_as[devfn]->iommu, "intel_iommu"); 378 } 379 return &pvtd_as[devfn]->as; 380 } 381 382 static void mch_init_dmar(MCHPCIState *mch) 383 { 384 PCIBus *pci_bus = PCI_BUS(qdev_get_parent_bus(DEVICE(mch))); 385 386 mch->iommu = INTEL_IOMMU_DEVICE(qdev_create(NULL, TYPE_INTEL_IOMMU_DEVICE)); 387 object_property_add_child(OBJECT(mch), "intel-iommu", 388 OBJECT(mch->iommu), NULL); 389 qdev_init_nofail(DEVICE(mch->iommu)); 390 sysbus_mmio_map(SYS_BUS_DEVICE(mch->iommu), 0, Q35_HOST_BRIDGE_IOMMU_ADDR); 391 392 pci_setup_iommu(pci_bus, q35_host_dma_iommu, mch->iommu); 393 } 394 395 static void mch_realize(PCIDevice *d, Error **errp) 396 { 397 int i; 398 MCHPCIState *mch = MCH_PCI_DEVICE(d); 399 400 /* setup pci memory mapping */ 401 pc_pci_as_mapping_init(OBJECT(mch), mch->system_memory, 402 mch->pci_address_space); 403 404 /* if *disabled* show SMRAM to all CPUs */ 405 cpu_smm_register(&mch_set_smm, mch); 406 memory_region_init_alias(&mch->smram_region, OBJECT(mch), "smram-region", 407 mch->pci_address_space, 0xa0000, 0x20000); 408 memory_region_add_subregion_overlap(mch->system_memory, 0xa0000, 409 &mch->smram_region, 1); 410 memory_region_set_enabled(&mch->smram_region, true); 411 412 /* smram, as seen by SMM CPUs */ 413 memory_region_init(&mch->smram, OBJECT(mch), "smram", 1ull << 32); 414 memory_region_set_enabled(&mch->smram, true); 415 memory_region_init_alias(&mch->low_smram, OBJECT(mch), "smram-low", 416 mch->system_memory, 0xa0000, 0x20000); 417 memory_region_set_enabled(&mch->low_smram, true); 418 memory_region_add_subregion(&mch->smram, 0xa0000, &mch->low_smram); 419 object_property_add_const_link(qdev_get_machine(), "smram", 420 OBJECT(&mch->smram), &error_abort); 421 422 init_pam(DEVICE(mch), mch->ram_memory, mch->system_memory, 423 mch->pci_address_space, &mch->pam_regions[0], 424 PAM_BIOS_BASE, PAM_BIOS_SIZE); 425 for (i = 0; i < 12; ++i) { 426 init_pam(DEVICE(mch), mch->ram_memory, mch->system_memory, 427 mch->pci_address_space, &mch->pam_regions[i+1], 428 PAM_EXPAN_BASE + i * PAM_EXPAN_SIZE, PAM_EXPAN_SIZE); 429 } 430 /* Intel IOMMU (VT-d) */ 431 if (machine_iommu(current_machine)) { 432 mch_init_dmar(mch); 433 } 434 } 435 436 uint64_t mch_mcfg_base(void) 437 { 438 bool ambiguous; 439 Object *o = object_resolve_path_type("", TYPE_MCH_PCI_DEVICE, &ambiguous); 440 if (!o) { 441 return 0; 442 } 443 return MCH_HOST_BRIDGE_PCIEXBAR_DEFAULT; 444 } 445 446 static void mch_class_init(ObjectClass *klass, void *data) 447 { 448 PCIDeviceClass *k = PCI_DEVICE_CLASS(klass); 449 DeviceClass *dc = DEVICE_CLASS(klass); 450 451 k->realize = mch_realize; 452 k->config_write = mch_write_config; 453 dc->reset = mch_reset; 454 set_bit(DEVICE_CATEGORY_BRIDGE, dc->categories); 455 dc->desc = "Host bridge"; 456 dc->vmsd = &vmstate_mch; 457 k->vendor_id = PCI_VENDOR_ID_INTEL; 458 k->device_id = PCI_DEVICE_ID_INTEL_Q35_MCH; 459 k->revision = MCH_HOST_BRIDGE_REVISION_DEFAULT; 460 k->class_id = PCI_CLASS_BRIDGE_HOST; 461 /* 462 * PCI-facing part of the host bridge, not usable without the 463 * host-facing part, which can't be device_add'ed, yet. 464 */ 465 dc->cannot_instantiate_with_device_add_yet = true; 466 } 467 468 static const TypeInfo mch_info = { 469 .name = TYPE_MCH_PCI_DEVICE, 470 .parent = TYPE_PCI_DEVICE, 471 .instance_size = sizeof(MCHPCIState), 472 .class_init = mch_class_init, 473 }; 474 475 static void q35_register(void) 476 { 477 type_register_static(&mch_info); 478 type_register_static(&q35_host_info); 479 } 480 481 type_init(q35_register); 482