hw/pci-host/q35.c

   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 int mch_init(PCIDevice *d)
 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 (qemu_opt_get_bool(qemu_get_machine_opts(), "iommu", false)) {
 419         mch_init_dmar(mch);
 420     }
 421     return 0;
 422 }
 423
 424 uint64_t mch_mcfg_base(void)
 425 {
 426     bool ambiguous;
 427     Object *o = object_resolve_path_type("", TYPE_MCH_PCI_DEVICE, &ambiguous);
 428     if (!o) {
 429         return 0;
 430     }
 431     return MCH_HOST_BRIDGE_PCIEXBAR_DEFAULT;
 432 }
 433
 434 static void mch_class_init(ObjectClass *klass, void *data)
 435 {
 436     PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
 437     DeviceClass *dc = DEVICE_CLASS(klass);
 438
 439     k->init = mch_init;
 440     k->config_write = mch_write_config;
 441     dc->reset = mch_reset;
 442     set_bit(DEVICE_CATEGORY_BRIDGE, dc->categories);
 443     dc->desc = "Host bridge";
 444     dc->vmsd = &vmstate_mch;
 445     k->vendor_id = PCI_VENDOR_ID_INTEL;
 446     k->device_id = PCI_DEVICE_ID_INTEL_Q35_MCH;
 447     k->revision = MCH_HOST_BRIDGE_REVISION_DEFAULT;
 448     k->class_id = PCI_CLASS_BRIDGE_HOST;
 449     /*
 450      * PCI-facing part of the host bridge, not usable without the
 451      * host-facing part, which can't be device_add'ed, yet.
 452      */
 453     dc->cannot_instantiate_with_device_add_yet = true;
 454 }
 455
 456 static const TypeInfo mch_info = {
 457     .name = TYPE_MCH_PCI_DEVICE,
 458     .parent = TYPE_PCI_DEVICE,
 459     .instance_size = sizeof(MCHPCIState),
 460     .class_init = mch_class_init,
 461 };
 462
 463 static void q35_register(void)
 464 {
 465     type_register_static(&mch_info);
 466     type_register_static(&q35_host_info);
 467 }
 468
 469 type_init(q35_register);