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_transaction_commit(); 274 } 275 276 static void mch_set_smm(int smm, void *arg) 277 { 278 MCHPCIState *mch = arg; 279 PCIDevice *pd = PCI_DEVICE(mch); 280 281 memory_region_transaction_begin(); 282 smram_set_smm(&mch->smm_enabled, smm, pd->config[MCH_HOST_BRIDGE_SMRAM], 283 &mch->smram_region); 284 memory_region_transaction_commit(); 285 } 286 287 static void mch_write_config(PCIDevice *d, 288 uint32_t address, uint32_t val, int len) 289 { 290 MCHPCIState *mch = MCH_PCI_DEVICE(d); 291 292 /* XXX: implement SMRAM.D_LOCK */ 293 pci_default_write_config(d, address, val, len); 294 295 if (ranges_overlap(address, len, MCH_HOST_BRIDGE_PAM0, 296 MCH_HOST_BRIDGE_PAM_SIZE)) { 297 mch_update_pam(mch); 298 } 299 300 if (ranges_overlap(address, len, MCH_HOST_BRIDGE_PCIEXBAR, 301 MCH_HOST_BRIDGE_PCIEXBAR_SIZE)) { 302 mch_update_pciexbar(mch); 303 } 304 305 if (ranges_overlap(address, len, MCH_HOST_BRIDGE_SMRAM, 306 MCH_HOST_BRIDGE_SMRAM_SIZE)) { 307 mch_update_smram(mch); 308 } 309 } 310 311 static void mch_update(MCHPCIState *mch) 312 { 313 mch_update_pciexbar(mch); 314 mch_update_pam(mch); 315 mch_update_smram(mch); 316 } 317 318 static int mch_post_load(void *opaque, int version_id) 319 { 320 MCHPCIState *mch = opaque; 321 mch_update(mch); 322 return 0; 323 } 324 325 static const VMStateDescription vmstate_mch = { 326 .name = "mch", 327 .version_id = 1, 328 .minimum_version_id = 1, 329 .post_load = mch_post_load, 330 .fields = (VMStateField[]) { 331 VMSTATE_PCI_DEVICE(parent_obj, MCHPCIState), 332 VMSTATE_UINT8(smm_enabled, MCHPCIState), 333 VMSTATE_END_OF_LIST() 334 } 335 }; 336 337 static void mch_reset(DeviceState *qdev) 338 { 339 PCIDevice *d = PCI_DEVICE(qdev); 340 MCHPCIState *mch = MCH_PCI_DEVICE(d); 341 342 pci_set_quad(d->config + MCH_HOST_BRIDGE_PCIEXBAR, 343 MCH_HOST_BRIDGE_PCIEXBAR_DEFAULT); 344 345 d->config[MCH_HOST_BRIDGE_SMRAM] = MCH_HOST_BRIDGE_SMRAM_DEFAULT; 346 347 mch_update(mch); 348 } 349 350 static AddressSpace *q35_host_dma_iommu(PCIBus *bus, void *opaque, int devfn) 351 { 352 IntelIOMMUState *s = opaque; 353 VTDAddressSpace **pvtd_as; 354 int bus_num = pci_bus_num(bus); 355 356 assert(0 <= bus_num && bus_num <= VTD_PCI_BUS_MAX); 357 assert(0 <= devfn && devfn <= VTD_PCI_DEVFN_MAX); 358 359 pvtd_as = s->address_spaces[bus_num]; 360 if (!pvtd_as) { 361 /* No corresponding free() */ 362 pvtd_as = g_malloc0(sizeof(VTDAddressSpace *) * VTD_PCI_DEVFN_MAX); 363 s->address_spaces[bus_num] = pvtd_as; 364 } 365 if (!pvtd_as[devfn]) { 366 pvtd_as[devfn] = g_malloc0(sizeof(VTDAddressSpace)); 367 368 pvtd_as[devfn]->bus_num = (uint8_t)bus_num; 369 pvtd_as[devfn]->devfn = (uint8_t)devfn; 370 pvtd_as[devfn]->iommu_state = s; 371 pvtd_as[devfn]->context_cache_entry.context_cache_gen = 0; 372 memory_region_init_iommu(&pvtd_as[devfn]->iommu, OBJECT(s), 373 &s->iommu_ops, "intel_iommu", UINT64_MAX); 374 address_space_init(&pvtd_as[devfn]->as, 375 &pvtd_as[devfn]->iommu, "intel_iommu"); 376 } 377 return &pvtd_as[devfn]->as; 378 } 379 380 static void mch_init_dmar(MCHPCIState *mch) 381 { 382 PCIBus *pci_bus = PCI_BUS(qdev_get_parent_bus(DEVICE(mch))); 383 384 mch->iommu = INTEL_IOMMU_DEVICE(qdev_create(NULL, TYPE_INTEL_IOMMU_DEVICE)); 385 object_property_add_child(OBJECT(mch), "intel-iommu", 386 OBJECT(mch->iommu), NULL); 387 qdev_init_nofail(DEVICE(mch->iommu)); 388 sysbus_mmio_map(SYS_BUS_DEVICE(mch->iommu), 0, Q35_HOST_BRIDGE_IOMMU_ADDR); 389 390 pci_setup_iommu(pci_bus, q35_host_dma_iommu, mch->iommu); 391 } 392 393 static void mch_realize(PCIDevice *d, Error **errp) 394 { 395 int i; 396 MCHPCIState *mch = MCH_PCI_DEVICE(d); 397 398 /* setup pci memory mapping */ 399 pc_pci_as_mapping_init(OBJECT(mch), mch->system_memory, 400 mch->pci_address_space); 401 402 /* smram */ 403 cpu_smm_register(&mch_set_smm, mch); 404 memory_region_init_alias(&mch->smram_region, OBJECT(mch), "smram-region", 405 mch->pci_address_space, 0xa0000, 0x20000); 406 memory_region_add_subregion_overlap(mch->system_memory, 0xa0000, 407 &mch->smram_region, 1); 408 memory_region_set_enabled(&mch->smram_region, false); 409 init_pam(DEVICE(mch), mch->ram_memory, mch->system_memory, 410 mch->pci_address_space, &mch->pam_regions[0], 411 PAM_BIOS_BASE, PAM_BIOS_SIZE); 412 for (i = 0; i < 12; ++i) { 413 init_pam(DEVICE(mch), mch->ram_memory, mch->system_memory, 414 mch->pci_address_space, &mch->pam_regions[i+1], 415 PAM_EXPAN_BASE + i * PAM_EXPAN_SIZE, PAM_EXPAN_SIZE); 416 } 417 /* Intel IOMMU (VT-d) */ 418 if (machine_iommu(current_machine)) { 419 mch_init_dmar(mch); 420 } 421 } 422 423 uint64_t mch_mcfg_base(void) 424 { 425 bool ambiguous; 426 Object *o = object_resolve_path_type("", TYPE_MCH_PCI_DEVICE, &ambiguous); 427 if (!o) { 428 return 0; 429 } 430 return MCH_HOST_BRIDGE_PCIEXBAR_DEFAULT; 431 } 432 433 static void mch_class_init(ObjectClass *klass, void *data) 434 { 435 PCIDeviceClass *k = PCI_DEVICE_CLASS(klass); 436 DeviceClass *dc = DEVICE_CLASS(klass); 437 438 k->realize = mch_realize; 439 k->config_write = mch_write_config; 440 dc->reset = mch_reset; 441 set_bit(DEVICE_CATEGORY_BRIDGE, dc->categories); 442 dc->desc = "Host bridge"; 443 dc->vmsd = &vmstate_mch; 444 k->vendor_id = PCI_VENDOR_ID_INTEL; 445 k->device_id = PCI_DEVICE_ID_INTEL_Q35_MCH; 446 k->revision = MCH_HOST_BRIDGE_REVISION_DEFAULT; 447 k->class_id = PCI_CLASS_BRIDGE_HOST; 448 /* 449 * PCI-facing part of the host bridge, not usable without the 450 * host-facing part, which can't be device_add'ed, yet. 451 */ 452 dc->cannot_instantiate_with_device_add_yet = true; 453 } 454 455 static const TypeInfo mch_info = { 456 .name = TYPE_MCH_PCI_DEVICE, 457 .parent = TYPE_PCI_DEVICE, 458 .instance_size = sizeof(MCHPCIState), 459 .class_init = mch_class_init, 460 }; 461 462 static void q35_register(void) 463 { 464 type_register_static(&mch_info); 465 type_register_static(&q35_host_info); 466 } 467 468 type_init(q35_register); 469