qemu/hw/pci-host/q35.c
<<
>>
Prefs
   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
  38static 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
  57static 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
  69static 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
  79static 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
  89static 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
 101static 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
 113static 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
 123static 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
 132static 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
 144static 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
 189static 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 */
 202static 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 */
 252static 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 */
 266static 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
 276static 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
 287static 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
 311static void mch_update(MCHPCIState *mch)
 312{
 313    mch_update_pciexbar(mch);
 314    mch_update_pam(mch);
 315    mch_update_smram(mch);
 316}
 317
 318static int mch_post_load(void *opaque, int version_id)
 319{
 320    MCHPCIState *mch = opaque;
 321    mch_update(mch);
 322    return 0;
 323}
 324
 325static 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
 337static 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
 350static 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
 380static 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
 393static 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
 423uint64_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
 433static 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
 455static 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
 462static void q35_register(void)
 463{
 464    type_register_static(&mch_info);
 465    type_register_static(&q35_host_info);
 466}
 467
 468type_init(q35_register);
 469