1 /*- 2 * Copyright (C) 2018 Cavium Inc. 3 * Copyright (c) 2015 Ruslan Bukin <br@bsdpad.com> 4 * Copyright (c) 2014 The FreeBSD Foundation 5 * All rights reserved. 6 * 7 * This software was developed by Semihalf under 8 * the sponsorship of the FreeBSD Foundation. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 * SUCH DAMAGE. 30 */ 31 32 /* Generic ECAM PCIe driver */ 33 34 #include <sys/cdefs.h> 35 #include "opt_platform.h" 36 37 #include <sys/param.h> 38 #include <sys/systm.h> 39 #include <sys/malloc.h> 40 #include <sys/kernel.h> 41 #include <sys/rman.h> 42 #include <sys/module.h> 43 #include <sys/bus.h> 44 #include <sys/endian.h> 45 #include <sys/cpuset.h> 46 #include <sys/rwlock.h> 47 48 #include <contrib/dev/acpica/include/acpi.h> 49 #include <contrib/dev/acpica/include/accommon.h> 50 51 #include <dev/acpica/acpivar.h> 52 #include <dev/acpica/acpi_pcibvar.h> 53 54 #include <dev/pci/pcivar.h> 55 #include <dev/pci/pcireg.h> 56 #include <dev/pci/pcib_private.h> 57 #include <dev/pci/pci_host_generic.h> 58 #include <dev/pci/pci_host_generic_acpi.h> 59 60 #include <machine/cpu.h> 61 #include <machine/bus.h> 62 #include <machine/intr.h> 63 64 #include "pcib_if.h" 65 #include "acpi_bus_if.h" 66 67 /* Assembling ECAM Configuration Address */ 68 #define PCIE_BUS_SHIFT 20 69 #define PCIE_SLOT_SHIFT 15 70 #define PCIE_FUNC_SHIFT 12 71 #define PCIE_BUS_MASK 0xFF 72 #define PCIE_SLOT_MASK 0x1F 73 #define PCIE_FUNC_MASK 0x07 74 #define PCIE_REG_MASK 0xFFF 75 76 #define PCIE_ADDR_OFFSET(bus, slot, func, reg) \ 77 ((((bus) & PCIE_BUS_MASK) << PCIE_BUS_SHIFT) | \ 78 (((slot) & PCIE_SLOT_MASK) << PCIE_SLOT_SHIFT) | \ 79 (((func) & PCIE_FUNC_MASK) << PCIE_FUNC_SHIFT) | \ 80 ((reg) & PCIE_REG_MASK)) 81 82 #define PCI_IO_WINDOW_OFFSET 0x1000 83 84 #define SPACE_CODE_SHIFT 24 85 #define SPACE_CODE_MASK 0x3 86 #define SPACE_CODE_IO_SPACE 0x1 87 #define PROPS_CELL_SIZE 1 88 #define PCI_ADDR_CELL_SIZE 2 89 90 static struct { 91 char oem_id[ACPI_OEM_ID_SIZE + 1]; 92 char oem_table_id[ACPI_OEM_TABLE_ID_SIZE + 1]; 93 uint32_t quirks; 94 } pci_acpi_quirks[] = { 95 { "MRVL ", "CN9130 ", PCIE_ECAM_DESIGNWARE_QUIRK }, 96 { "MRVL ", "CN913X ", PCIE_ECAM_DESIGNWARE_QUIRK }, 97 { "MVEBU ", "ARMADA7K", PCIE_ECAM_DESIGNWARE_QUIRK }, 98 { "MVEBU ", "ARMADA8K", PCIE_ECAM_DESIGNWARE_QUIRK }, 99 { "MVEBU ", "CN9130 ", PCIE_ECAM_DESIGNWARE_QUIRK }, 100 { "MVEBU ", "CN9131 ", PCIE_ECAM_DESIGNWARE_QUIRK }, 101 { "MVEBU ", "CN9132 ", PCIE_ECAM_DESIGNWARE_QUIRK }, 102 }; 103 104 /* Forward prototypes */ 105 106 static int generic_pcie_acpi_probe(device_t dev); 107 static ACPI_STATUS pci_host_generic_acpi_parse_resource(ACPI_RESOURCE *, void *); 108 static int generic_pcie_acpi_read_ivar(device_t, device_t, int, uintptr_t *); 109 110 /* 111 * generic_pcie_acpi_probe - look for root bridge flag 112 */ 113 static int 114 generic_pcie_acpi_probe(device_t dev) 115 { 116 ACPI_DEVICE_INFO *devinfo; 117 ACPI_HANDLE h; 118 int root; 119 120 if (acpi_disabled("pcib") || (h = acpi_get_handle(dev)) == NULL || 121 ACPI_FAILURE(AcpiGetObjectInfo(h, &devinfo))) 122 return (ENXIO); 123 root = (devinfo->Flags & ACPI_PCI_ROOT_BRIDGE) != 0; 124 AcpiOsFree(devinfo); 125 if (!root) 126 return (ENXIO); 127 128 device_set_desc(dev, "Generic PCI host controller"); 129 return (BUS_PROBE_GENERIC); 130 } 131 132 /* 133 * pci_host_generic_acpi_parse_resource - parse PCI memory, IO and bus spaces 134 * 'produced' by this bridge 135 */ 136 static ACPI_STATUS 137 pci_host_generic_acpi_parse_resource(ACPI_RESOURCE *res, void *arg) 138 { 139 device_t dev = (device_t)arg; 140 struct generic_pcie_acpi_softc *sc; 141 rman_res_t min, max, off; 142 int r, restype; 143 144 sc = device_get_softc(dev); 145 r = sc->base.nranges; 146 switch (res->Type) { 147 case ACPI_RESOURCE_TYPE_ADDRESS16: 148 restype = res->Data.Address16.ResourceType; 149 min = res->Data.Address16.Address.Minimum; 150 max = res->Data.Address16.Address.Maximum; 151 break; 152 case ACPI_RESOURCE_TYPE_ADDRESS32: 153 restype = res->Data.Address32.ResourceType; 154 min = res->Data.Address32.Address.Minimum; 155 max = res->Data.Address32.Address.Maximum; 156 off = res->Data.Address32.Address.TranslationOffset; 157 break; 158 case ACPI_RESOURCE_TYPE_ADDRESS64: 159 restype = res->Data.Address64.ResourceType; 160 min = res->Data.Address64.Address.Minimum; 161 max = res->Data.Address64.Address.Maximum; 162 off = res->Data.Address64.Address.TranslationOffset; 163 break; 164 case ACPI_RESOURCE_TYPE_FIXED_MEMORY32: 165 /* 166 * The Microsoft Dev Kit 2023 uses a fixed memory region 167 * for some PCI controllers. For this memory the 168 * ResourceType is ACPI_IO_RANGE meaning we create an IO 169 * resource. As drivers expect it to be a memory resource 170 * force the type here. 171 */ 172 restype = ACPI_MEMORY_RANGE; 173 min = res->Data.FixedMemory32.Address; 174 max = res->Data.FixedMemory32.Address + 175 res->Data.FixedMemory32.AddressLength - 1; 176 off = 0; 177 break; 178 default: 179 return (AE_OK); 180 } 181 182 /* Save detected ranges */ 183 if (res->Data.Address.ResourceType == ACPI_MEMORY_RANGE || 184 res->Data.Address.ResourceType == ACPI_IO_RANGE) { 185 sc->base.ranges[r].pci_base = min; 186 sc->base.ranges[r].phys_base = min + off; 187 sc->base.ranges[r].size = max - min + 1; 188 if (restype == ACPI_MEMORY_RANGE) 189 sc->base.ranges[r].flags |= FLAG_TYPE_MEM; 190 else if (restype == ACPI_IO_RANGE) 191 sc->base.ranges[r].flags |= FLAG_TYPE_IO; 192 sc->base.nranges++; 193 } else if (res->Data.Address.ResourceType == ACPI_BUS_NUMBER_RANGE) { 194 sc->base.bus_start = min; 195 sc->base.bus_end = max; 196 } 197 return (AE_OK); 198 } 199 200 static void 201 pci_host_acpi_get_oem_quirks(struct generic_pcie_acpi_softc *sc, 202 ACPI_TABLE_HEADER *hdr) 203 { 204 size_t i; 205 206 for (i = 0; i < nitems(pci_acpi_quirks); i++) { 207 if (memcmp(hdr->OemId, pci_acpi_quirks[i].oem_id, 208 ACPI_OEM_ID_SIZE) != 0) 209 continue; 210 if (memcmp(hdr->OemTableId, pci_acpi_quirks[i].oem_table_id, 211 ACPI_OEM_TABLE_ID_SIZE) != 0) 212 continue; 213 sc->base.quirks |= pci_acpi_quirks[i].quirks; 214 } 215 } 216 217 static int 218 pci_host_acpi_get_ecam_resource(device_t dev) 219 { 220 struct generic_pcie_acpi_softc *sc; 221 struct acpi_device *ad; 222 struct resource_list *rl; 223 ACPI_TABLE_HEADER *hdr; 224 ACPI_MCFG_ALLOCATION *mcfg_entry, *mcfg_end; 225 ACPI_HANDLE handle; 226 ACPI_STATUS status; 227 rman_res_t base, start, end; 228 int found, val; 229 230 sc = device_get_softc(dev); 231 handle = acpi_get_handle(dev); 232 233 /* Try MCFG first */ 234 status = AcpiGetTable(ACPI_SIG_MCFG, 1, &hdr); 235 if (ACPI_SUCCESS(status)) { 236 found = FALSE; 237 mcfg_end = (ACPI_MCFG_ALLOCATION *)((char *)hdr + hdr->Length); 238 mcfg_entry = (ACPI_MCFG_ALLOCATION *)((ACPI_TABLE_MCFG *)hdr + 1); 239 while (mcfg_entry < mcfg_end && !found) { 240 if (mcfg_entry->PciSegment == sc->base.ecam && 241 mcfg_entry->StartBusNumber <= sc->base.bus_start && 242 mcfg_entry->EndBusNumber >= sc->base.bus_start) 243 found = TRUE; 244 else 245 mcfg_entry++; 246 } 247 if (found) { 248 if (mcfg_entry->EndBusNumber < sc->base.bus_end) 249 sc->base.bus_end = mcfg_entry->EndBusNumber; 250 base = mcfg_entry->Address; 251 } else { 252 device_printf(dev, "MCFG exists, but does not have bus %d-%d\n", 253 sc->base.bus_start, sc->base.bus_end); 254 return (ENXIO); 255 } 256 pci_host_acpi_get_oem_quirks(sc, hdr); 257 if (sc->base.quirks & PCIE_ECAM_DESIGNWARE_QUIRK) 258 device_set_desc(dev, "Synopsys DesignWare PCIe Controller"); 259 } else { 260 status = acpi_GetInteger(handle, "_CBA", &val); 261 if (ACPI_SUCCESS(status)) 262 base = val; 263 else 264 return (ENXIO); 265 } 266 267 /* add as MEM rid 0 */ 268 ad = device_get_ivars(dev); 269 rl = &ad->ad_rl; 270 start = base + (sc->base.bus_start << PCIE_BUS_SHIFT); 271 end = base + ((sc->base.bus_end + 1) << PCIE_BUS_SHIFT) - 1; 272 resource_list_add(rl, SYS_RES_MEMORY, 0, start, end, end - start + 1); 273 if (bootverbose) 274 device_printf(dev, "ECAM for bus %d-%d at mem %jx-%jx\n", 275 sc->base.bus_start, sc->base.bus_end, start, end); 276 return (0); 277 } 278 279 int 280 pci_host_generic_acpi_init(device_t dev) 281 { 282 struct generic_pcie_acpi_softc *sc; 283 ACPI_HANDLE handle; 284 ACPI_STATUS status; 285 int error; 286 287 sc = device_get_softc(dev); 288 handle = acpi_get_handle(dev); 289 290 /* Get Start bus number for the PCI host bus is from _BBN method */ 291 status = acpi_GetInteger(handle, "_BBN", &sc->base.bus_start); 292 if (ACPI_FAILURE(status)) { 293 device_printf(dev, "No _BBN, using start bus 0\n"); 294 sc->base.bus_start = 0; 295 } 296 sc->base.bus_end = 255; 297 298 /* Get PCI Segment (domain) needed for MCFG lookup */ 299 status = acpi_GetInteger(handle, "_SEG", &sc->base.ecam); 300 if (ACPI_FAILURE(status)) { 301 device_printf(dev, "No _SEG for PCI Bus, using segment 0\n"); 302 sc->base.ecam = 0; 303 } 304 305 /* Bus decode ranges */ 306 status = AcpiWalkResources(handle, "_CRS", 307 pci_host_generic_acpi_parse_resource, (void *)dev); 308 if (ACPI_FAILURE(status)) 309 return (ENXIO); 310 311 /* Coherency attribute */ 312 if (ACPI_FAILURE(acpi_GetInteger(handle, "_CCA", &sc->base.coherent))) 313 sc->base.coherent = 0; 314 if (bootverbose) 315 device_printf(dev, "Bus is%s cache-coherent\n", 316 sc->base.coherent ? "" : " not"); 317 318 /* add config space resource */ 319 pci_host_acpi_get_ecam_resource(dev); 320 acpi_pcib_fetch_prt(dev, &sc->ap_prt); 321 322 error = pci_host_generic_core_attach(dev); 323 if (error != 0) 324 return (error); 325 326 return (0); 327 } 328 329 static int 330 pci_host_generic_acpi_attach(device_t dev) 331 { 332 int error; 333 334 error = pci_host_generic_acpi_init(dev); 335 if (error != 0) 336 return (error); 337 338 device_add_child(dev, "pci", DEVICE_UNIT_ANY); 339 bus_attach_children(dev); 340 return (0); 341 } 342 343 static int 344 generic_pcie_acpi_read_ivar(device_t dev, device_t child, int index, 345 uintptr_t *result) 346 { 347 struct generic_pcie_acpi_softc *sc; 348 349 sc = device_get_softc(dev); 350 351 if (index == PCIB_IVAR_BUS) { 352 *result = sc->base.bus_start; 353 return (0); 354 } 355 356 if (index == PCIB_IVAR_DOMAIN) { 357 *result = sc->base.ecam; 358 return (0); 359 } 360 361 if (bootverbose) 362 device_printf(dev, "ERROR: Unknown index %d.\n", index); 363 return (ENOENT); 364 } 365 366 static int 367 generic_pcie_acpi_route_interrupt(device_t bus, device_t dev, int pin) 368 { 369 struct generic_pcie_acpi_softc *sc; 370 371 sc = device_get_softc(bus); 372 return (acpi_pcib_route_interrupt(bus, dev, pin, &sc->ap_prt)); 373 } 374 375 static u_int 376 generic_pcie_get_xref(device_t pci, device_t child) 377 { 378 struct generic_pcie_acpi_softc *sc; 379 uintptr_t rid; 380 u_int xref, devid; 381 int err; 382 383 sc = device_get_softc(pci); 384 err = pcib_get_id(pci, child, PCI_ID_RID, &rid); 385 if (err != 0) 386 return (ACPI_MSI_XREF); 387 err = acpi_iort_map_pci_msi(sc->base.ecam, rid, &xref, &devid); 388 if (err != 0) 389 return (ACPI_MSI_XREF); 390 return (xref); 391 } 392 393 static u_int 394 generic_pcie_map_id(device_t pci, device_t child, uintptr_t *id) 395 { 396 struct generic_pcie_acpi_softc *sc; 397 uintptr_t rid; 398 u_int xref, devid; 399 int err; 400 401 sc = device_get_softc(pci); 402 err = pcib_get_id(pci, child, PCI_ID_RID, &rid); 403 if (err != 0) 404 return (err); 405 err = acpi_iort_map_pci_msi(sc->base.ecam, rid, &xref, &devid); 406 if (err == 0) 407 *id = devid; 408 else 409 *id = rid; /* RID not in IORT, likely FW bug, ignore */ 410 return (0); 411 } 412 413 static int 414 generic_pcie_get_iommu(device_t pci, device_t child, uintptr_t *id) 415 { 416 struct generic_pcie_acpi_softc *sc; 417 struct pci_id_ofw_iommu *iommu; 418 u_int iommu_sid, iommu_xref; 419 uintptr_t rid; 420 int err; 421 422 iommu = (struct pci_id_ofw_iommu *)id; 423 424 sc = device_get_softc(pci); 425 err = pcib_get_id(pci, child, PCI_ID_RID, &rid); 426 if (err != 0) 427 return (err); 428 err = acpi_iort_map_pci_smmuv3(sc->base.ecam, rid, &iommu_xref, 429 &iommu_sid); 430 if (err == 0) { 431 iommu->id = iommu_sid; 432 iommu->xref = iommu_xref; 433 } 434 435 return (err); 436 } 437 438 static int 439 generic_pcie_acpi_alloc_msi(device_t pci, device_t child, int count, 440 int maxcount, int *irqs) 441 { 442 443 #if defined(INTRNG) 444 return (intr_alloc_msi(pci, child, generic_pcie_get_xref(pci, child), 445 count, maxcount, irqs)); 446 #else 447 return (ENXIO); 448 #endif 449 } 450 451 static int 452 generic_pcie_acpi_release_msi(device_t pci, device_t child, int count, 453 int *irqs) 454 { 455 456 #if defined(INTRNG) 457 return (intr_release_msi(pci, child, generic_pcie_get_xref(pci, child), 458 count, irqs)); 459 #else 460 return (ENXIO); 461 #endif 462 } 463 464 static int 465 generic_pcie_acpi_map_msi(device_t pci, device_t child, int irq, uint64_t *addr, 466 uint32_t *data) 467 { 468 469 #if defined(INTRNG) 470 return (intr_map_msi(pci, child, generic_pcie_get_xref(pci, child), irq, 471 addr, data)); 472 #else 473 return (ENXIO); 474 #endif 475 } 476 477 static int 478 generic_pcie_acpi_alloc_msix(device_t pci, device_t child, int *irq) 479 { 480 481 #if defined(INTRNG) 482 return (intr_alloc_msix(pci, child, generic_pcie_get_xref(pci, child), 483 irq)); 484 #else 485 return (ENXIO); 486 #endif 487 } 488 489 static int 490 generic_pcie_acpi_release_msix(device_t pci, device_t child, int irq) 491 { 492 493 #if defined(INTRNG) 494 return (intr_release_msix(pci, child, generic_pcie_get_xref(pci, child), 495 irq)); 496 #else 497 return (ENXIO); 498 #endif 499 } 500 501 static int 502 generic_pcie_acpi_get_id(device_t pci, device_t child, enum pci_id_type type, 503 uintptr_t *id) 504 { 505 if (type == PCI_ID_OFW_IOMMU) 506 return (generic_pcie_get_iommu(pci, child, id)); 507 508 if (type == PCI_ID_MSI) 509 return (generic_pcie_map_id(pci, child, id)); 510 511 return (pcib_get_id(pci, child, type, id)); 512 } 513 514 static device_method_t generic_pcie_acpi_methods[] = { 515 DEVMETHOD(device_probe, generic_pcie_acpi_probe), 516 DEVMETHOD(device_attach, pci_host_generic_acpi_attach), 517 DEVMETHOD(bus_read_ivar, generic_pcie_acpi_read_ivar), 518 519 /* pcib interface */ 520 DEVMETHOD(pcib_route_interrupt, generic_pcie_acpi_route_interrupt), 521 DEVMETHOD(pcib_alloc_msi, generic_pcie_acpi_alloc_msi), 522 DEVMETHOD(pcib_release_msi, generic_pcie_acpi_release_msi), 523 DEVMETHOD(pcib_alloc_msix, generic_pcie_acpi_alloc_msix), 524 DEVMETHOD(pcib_release_msix, generic_pcie_acpi_release_msix), 525 DEVMETHOD(pcib_map_msi, generic_pcie_acpi_map_msi), 526 DEVMETHOD(pcib_get_id, generic_pcie_acpi_get_id), 527 528 DEVMETHOD_END 529 }; 530 531 DEFINE_CLASS_1(pcib, generic_pcie_acpi_driver, generic_pcie_acpi_methods, 532 sizeof(struct generic_pcie_acpi_softc), generic_pcie_core_driver); 533 534 DRIVER_MODULE(pcib, acpi, generic_pcie_acpi_driver, 0, 0); 535