1 /*- 2 * SPDX-License-Identifier: BSD-3-Clause 3 * 4 * Copyright (c) 1994,1995 Stefan Esser, Wolfgang StanglMeier 5 * Copyright (c) 2000 Michael Smith <msmith@freebsd.org> 6 * Copyright (c) 2000 BSDi 7 * All rights reserved. 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 2. Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in the 16 * documentation and/or other materials provided with the distribution. 17 * 3. The name of the author may not be used to endorse or promote products 18 * derived from this software without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 * SUCH DAMAGE. 31 */ 32 33 #include <sys/cdefs.h> 34 __FBSDID("$FreeBSD$"); 35 36 /* 37 * PCI:PCI bridge support. 38 */ 39 40 #include "opt_pci.h" 41 42 #include <sys/param.h> 43 #include <sys/bus.h> 44 #include <sys/kernel.h> 45 #include <sys/malloc.h> 46 #include <sys/module.h> 47 #include <sys/rman.h> 48 #include <sys/sysctl.h> 49 #include <sys/systm.h> 50 #include <sys/taskqueue.h> 51 52 #include <dev/pci/pcivar.h> 53 #include <dev/pci/pcireg.h> 54 #include <dev/pci/pci_private.h> 55 #include <dev/pci/pcib_private.h> 56 57 #include "pcib_if.h" 58 59 static int pcib_probe(device_t dev); 60 static int pcib_suspend(device_t dev); 61 static int pcib_resume(device_t dev); 62 static int pcib_power_for_sleep(device_t pcib, device_t dev, 63 int *pstate); 64 static int pcib_ari_get_id(device_t pcib, device_t dev, 65 enum pci_id_type type, uintptr_t *id); 66 static uint32_t pcib_read_config(device_t dev, u_int b, u_int s, 67 u_int f, u_int reg, int width); 68 static void pcib_write_config(device_t dev, u_int b, u_int s, 69 u_int f, u_int reg, uint32_t val, int width); 70 static int pcib_ari_maxslots(device_t dev); 71 static int pcib_ari_maxfuncs(device_t dev); 72 static int pcib_try_enable_ari(device_t pcib, device_t dev); 73 static int pcib_ari_enabled(device_t pcib); 74 static void pcib_ari_decode_rid(device_t pcib, uint16_t rid, 75 int *bus, int *slot, int *func); 76 #ifdef PCI_HP 77 static void pcib_pcie_ab_timeout(void *arg); 78 static void pcib_pcie_cc_timeout(void *arg); 79 static void pcib_pcie_dll_timeout(void *arg); 80 #endif 81 static int pcib_request_feature_default(device_t pcib, device_t dev, 82 enum pci_feature feature); 83 84 static device_method_t pcib_methods[] = { 85 /* Device interface */ 86 DEVMETHOD(device_probe, pcib_probe), 87 DEVMETHOD(device_attach, pcib_attach), 88 DEVMETHOD(device_detach, pcib_detach), 89 DEVMETHOD(device_shutdown, bus_generic_shutdown), 90 DEVMETHOD(device_suspend, pcib_suspend), 91 DEVMETHOD(device_resume, pcib_resume), 92 93 /* Bus interface */ 94 DEVMETHOD(bus_child_present, pcib_child_present), 95 DEVMETHOD(bus_read_ivar, pcib_read_ivar), 96 DEVMETHOD(bus_write_ivar, pcib_write_ivar), 97 DEVMETHOD(bus_alloc_resource, pcib_alloc_resource), 98 #ifdef NEW_PCIB 99 DEVMETHOD(bus_adjust_resource, pcib_adjust_resource), 100 DEVMETHOD(bus_release_resource, pcib_release_resource), 101 #else 102 DEVMETHOD(bus_adjust_resource, bus_generic_adjust_resource), 103 DEVMETHOD(bus_release_resource, bus_generic_release_resource), 104 #endif 105 DEVMETHOD(bus_activate_resource, bus_generic_activate_resource), 106 DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource), 107 DEVMETHOD(bus_setup_intr, bus_generic_setup_intr), 108 DEVMETHOD(bus_teardown_intr, bus_generic_teardown_intr), 109 110 /* pcib interface */ 111 DEVMETHOD(pcib_maxslots, pcib_ari_maxslots), 112 DEVMETHOD(pcib_maxfuncs, pcib_ari_maxfuncs), 113 DEVMETHOD(pcib_read_config, pcib_read_config), 114 DEVMETHOD(pcib_write_config, pcib_write_config), 115 DEVMETHOD(pcib_route_interrupt, pcib_route_interrupt), 116 DEVMETHOD(pcib_alloc_msi, pcib_alloc_msi), 117 DEVMETHOD(pcib_release_msi, pcib_release_msi), 118 DEVMETHOD(pcib_alloc_msix, pcib_alloc_msix), 119 DEVMETHOD(pcib_release_msix, pcib_release_msix), 120 DEVMETHOD(pcib_map_msi, pcib_map_msi), 121 DEVMETHOD(pcib_power_for_sleep, pcib_power_for_sleep), 122 DEVMETHOD(pcib_get_id, pcib_ari_get_id), 123 DEVMETHOD(pcib_try_enable_ari, pcib_try_enable_ari), 124 DEVMETHOD(pcib_ari_enabled, pcib_ari_enabled), 125 DEVMETHOD(pcib_decode_rid, pcib_ari_decode_rid), 126 DEVMETHOD(pcib_request_feature, pcib_request_feature_default), 127 128 DEVMETHOD_END 129 }; 130 131 static devclass_t pcib_devclass; 132 133 DEFINE_CLASS_0(pcib, pcib_driver, pcib_methods, sizeof(struct pcib_softc)); 134 DRIVER_MODULE(pcib, pci, pcib_driver, pcib_devclass, NULL, NULL); 135 136 #if defined(NEW_PCIB) || defined(PCI_HP) 137 SYSCTL_DECL(_hw_pci); 138 #endif 139 140 #ifdef NEW_PCIB 141 static int pci_clear_pcib; 142 SYSCTL_INT(_hw_pci, OID_AUTO, clear_pcib, CTLFLAG_RDTUN, &pci_clear_pcib, 0, 143 "Clear firmware-assigned resources for PCI-PCI bridge I/O windows."); 144 145 /* 146 * Is a resource from a child device sub-allocated from one of our 147 * resource managers? 148 */ 149 static int 150 pcib_is_resource_managed(struct pcib_softc *sc, int type, struct resource *r) 151 { 152 153 switch (type) { 154 #ifdef PCI_RES_BUS 155 case PCI_RES_BUS: 156 return (rman_is_region_manager(r, &sc->bus.rman)); 157 #endif 158 case SYS_RES_IOPORT: 159 return (rman_is_region_manager(r, &sc->io.rman)); 160 case SYS_RES_MEMORY: 161 /* Prefetchable resources may live in either memory rman. */ 162 if (rman_get_flags(r) & RF_PREFETCHABLE && 163 rman_is_region_manager(r, &sc->pmem.rman)) 164 return (1); 165 return (rman_is_region_manager(r, &sc->mem.rman)); 166 } 167 return (0); 168 } 169 170 static int 171 pcib_is_window_open(struct pcib_window *pw) 172 { 173 174 return (pw->valid && pw->base < pw->limit); 175 } 176 177 /* 178 * XXX: If RF_ACTIVE did not also imply allocating a bus space tag and 179 * handle for the resource, we could pass RF_ACTIVE up to the PCI bus 180 * when allocating the resource windows and rely on the PCI bus driver 181 * to do this for us. 182 */ 183 static void 184 pcib_activate_window(struct pcib_softc *sc, int type) 185 { 186 187 PCI_ENABLE_IO(device_get_parent(sc->dev), sc->dev, type); 188 } 189 190 static void 191 pcib_write_windows(struct pcib_softc *sc, int mask) 192 { 193 device_t dev; 194 uint32_t val; 195 196 dev = sc->dev; 197 if (sc->io.valid && mask & WIN_IO) { 198 val = pci_read_config(dev, PCIR_IOBASEL_1, 1); 199 if ((val & PCIM_BRIO_MASK) == PCIM_BRIO_32) { 200 pci_write_config(dev, PCIR_IOBASEH_1, 201 sc->io.base >> 16, 2); 202 pci_write_config(dev, PCIR_IOLIMITH_1, 203 sc->io.limit >> 16, 2); 204 } 205 pci_write_config(dev, PCIR_IOBASEL_1, sc->io.base >> 8, 1); 206 pci_write_config(dev, PCIR_IOLIMITL_1, sc->io.limit >> 8, 1); 207 } 208 209 if (mask & WIN_MEM) { 210 pci_write_config(dev, PCIR_MEMBASE_1, sc->mem.base >> 16, 2); 211 pci_write_config(dev, PCIR_MEMLIMIT_1, sc->mem.limit >> 16, 2); 212 } 213 214 if (sc->pmem.valid && mask & WIN_PMEM) { 215 val = pci_read_config(dev, PCIR_PMBASEL_1, 2); 216 if ((val & PCIM_BRPM_MASK) == PCIM_BRPM_64) { 217 pci_write_config(dev, PCIR_PMBASEH_1, 218 sc->pmem.base >> 32, 4); 219 pci_write_config(dev, PCIR_PMLIMITH_1, 220 sc->pmem.limit >> 32, 4); 221 } 222 pci_write_config(dev, PCIR_PMBASEL_1, sc->pmem.base >> 16, 2); 223 pci_write_config(dev, PCIR_PMLIMITL_1, sc->pmem.limit >> 16, 2); 224 } 225 } 226 227 /* 228 * This is used to reject I/O port allocations that conflict with an 229 * ISA alias range. 230 */ 231 static int 232 pcib_is_isa_range(struct pcib_softc *sc, rman_res_t start, rman_res_t end, 233 rman_res_t count) 234 { 235 rman_res_t next_alias; 236 237 if (!(sc->bridgectl & PCIB_BCR_ISA_ENABLE)) 238 return (0); 239 240 /* Only check fixed ranges for overlap. */ 241 if (start + count - 1 != end) 242 return (0); 243 244 /* ISA aliases are only in the lower 64KB of I/O space. */ 245 if (start >= 65536) 246 return (0); 247 248 /* Check for overlap with 0x000 - 0x0ff as a special case. */ 249 if (start < 0x100) 250 goto alias; 251 252 /* 253 * If the start address is an alias, the range is an alias. 254 * Otherwise, compute the start of the next alias range and 255 * check if it is before the end of the candidate range. 256 */ 257 if ((start & 0x300) != 0) 258 goto alias; 259 next_alias = (start & ~0x3fful) | 0x100; 260 if (next_alias <= end) 261 goto alias; 262 return (0); 263 264 alias: 265 if (bootverbose) 266 device_printf(sc->dev, 267 "I/O range %#jx-%#jx overlaps with an ISA alias\n", start, 268 end); 269 return (1); 270 } 271 272 static void 273 pcib_add_window_resources(struct pcib_window *w, struct resource **res, 274 int count) 275 { 276 struct resource **newarray; 277 int error, i; 278 279 newarray = malloc(sizeof(struct resource *) * (w->count + count), 280 M_DEVBUF, M_WAITOK); 281 if (w->res != NULL) 282 bcopy(w->res, newarray, sizeof(struct resource *) * w->count); 283 bcopy(res, newarray + w->count, sizeof(struct resource *) * count); 284 free(w->res, M_DEVBUF); 285 w->res = newarray; 286 w->count += count; 287 288 for (i = 0; i < count; i++) { 289 error = rman_manage_region(&w->rman, rman_get_start(res[i]), 290 rman_get_end(res[i])); 291 if (error) 292 panic("Failed to add resource to rman"); 293 } 294 } 295 296 typedef void (nonisa_callback)(rman_res_t start, rman_res_t end, void *arg); 297 298 static void 299 pcib_walk_nonisa_ranges(rman_res_t start, rman_res_t end, nonisa_callback *cb, 300 void *arg) 301 { 302 rman_res_t next_end; 303 304 /* 305 * If start is within an ISA alias range, move up to the start 306 * of the next non-alias range. As a special case, addresses 307 * in the range 0x000 - 0x0ff should also be skipped since 308 * those are used for various system I/O devices in ISA 309 * systems. 310 */ 311 if (start <= 65535) { 312 if (start < 0x100 || (start & 0x300) != 0) { 313 start &= ~0x3ff; 314 start += 0x400; 315 } 316 } 317 318 /* ISA aliases are only in the lower 64KB of I/O space. */ 319 while (start <= MIN(end, 65535)) { 320 next_end = MIN(start | 0xff, end); 321 cb(start, next_end, arg); 322 start += 0x400; 323 } 324 325 if (start <= end) 326 cb(start, end, arg); 327 } 328 329 static void 330 count_ranges(rman_res_t start, rman_res_t end, void *arg) 331 { 332 int *countp; 333 334 countp = arg; 335 (*countp)++; 336 } 337 338 struct alloc_state { 339 struct resource **res; 340 struct pcib_softc *sc; 341 int count, error; 342 }; 343 344 static void 345 alloc_ranges(rman_res_t start, rman_res_t end, void *arg) 346 { 347 struct alloc_state *as; 348 struct pcib_window *w; 349 int rid; 350 351 as = arg; 352 if (as->error != 0) 353 return; 354 355 w = &as->sc->io; 356 rid = w->reg; 357 if (bootverbose) 358 device_printf(as->sc->dev, 359 "allocating non-ISA range %#jx-%#jx\n", start, end); 360 as->res[as->count] = bus_alloc_resource(as->sc->dev, SYS_RES_IOPORT, 361 &rid, start, end, end - start + 1, 0); 362 if (as->res[as->count] == NULL) 363 as->error = ENXIO; 364 else 365 as->count++; 366 } 367 368 static int 369 pcib_alloc_nonisa_ranges(struct pcib_softc *sc, rman_res_t start, rman_res_t end) 370 { 371 struct alloc_state as; 372 int i, new_count; 373 374 /* First, see how many ranges we need. */ 375 new_count = 0; 376 pcib_walk_nonisa_ranges(start, end, count_ranges, &new_count); 377 378 /* Second, allocate the ranges. */ 379 as.res = malloc(sizeof(struct resource *) * new_count, M_DEVBUF, 380 M_WAITOK); 381 as.sc = sc; 382 as.count = 0; 383 as.error = 0; 384 pcib_walk_nonisa_ranges(start, end, alloc_ranges, &as); 385 if (as.error != 0) { 386 for (i = 0; i < as.count; i++) 387 bus_release_resource(sc->dev, SYS_RES_IOPORT, 388 sc->io.reg, as.res[i]); 389 free(as.res, M_DEVBUF); 390 return (as.error); 391 } 392 KASSERT(as.count == new_count, ("%s: count mismatch", __func__)); 393 394 /* Third, add the ranges to the window. */ 395 pcib_add_window_resources(&sc->io, as.res, as.count); 396 free(as.res, M_DEVBUF); 397 return (0); 398 } 399 400 static void 401 pcib_alloc_window(struct pcib_softc *sc, struct pcib_window *w, int type, 402 int flags, pci_addr_t max_address) 403 { 404 struct resource *res; 405 char buf[64]; 406 int error, rid; 407 408 if (max_address != (rman_res_t)max_address) 409 max_address = ~0; 410 w->rman.rm_start = 0; 411 w->rman.rm_end = max_address; 412 w->rman.rm_type = RMAN_ARRAY; 413 snprintf(buf, sizeof(buf), "%s %s window", 414 device_get_nameunit(sc->dev), w->name); 415 w->rman.rm_descr = strdup(buf, M_DEVBUF); 416 error = rman_init(&w->rman); 417 if (error) 418 panic("Failed to initialize %s %s rman", 419 device_get_nameunit(sc->dev), w->name); 420 421 if (!pcib_is_window_open(w)) 422 return; 423 424 if (w->base > max_address || w->limit > max_address) { 425 device_printf(sc->dev, 426 "initial %s window has too many bits, ignoring\n", w->name); 427 return; 428 } 429 if (type == SYS_RES_IOPORT && sc->bridgectl & PCIB_BCR_ISA_ENABLE) 430 (void)pcib_alloc_nonisa_ranges(sc, w->base, w->limit); 431 else { 432 rid = w->reg; 433 res = bus_alloc_resource(sc->dev, type, &rid, w->base, w->limit, 434 w->limit - w->base + 1, flags); 435 if (res != NULL) 436 pcib_add_window_resources(w, &res, 1); 437 } 438 if (w->res == NULL) { 439 device_printf(sc->dev, 440 "failed to allocate initial %s window: %#jx-%#jx\n", 441 w->name, (uintmax_t)w->base, (uintmax_t)w->limit); 442 w->base = max_address; 443 w->limit = 0; 444 pcib_write_windows(sc, w->mask); 445 return; 446 } 447 pcib_activate_window(sc, type); 448 } 449 450 /* 451 * Initialize I/O windows. 452 */ 453 static void 454 pcib_probe_windows(struct pcib_softc *sc) 455 { 456 pci_addr_t max; 457 device_t dev; 458 uint32_t val; 459 460 dev = sc->dev; 461 462 if (pci_clear_pcib) { 463 pcib_bridge_init(dev); 464 } 465 466 /* Determine if the I/O port window is implemented. */ 467 val = pci_read_config(dev, PCIR_IOBASEL_1, 1); 468 if (val == 0) { 469 /* 470 * If 'val' is zero, then only 16-bits of I/O space 471 * are supported. 472 */ 473 pci_write_config(dev, PCIR_IOBASEL_1, 0xff, 1); 474 if (pci_read_config(dev, PCIR_IOBASEL_1, 1) != 0) { 475 sc->io.valid = 1; 476 pci_write_config(dev, PCIR_IOBASEL_1, 0, 1); 477 } 478 } else 479 sc->io.valid = 1; 480 481 /* Read the existing I/O port window. */ 482 if (sc->io.valid) { 483 sc->io.reg = PCIR_IOBASEL_1; 484 sc->io.step = 12; 485 sc->io.mask = WIN_IO; 486 sc->io.name = "I/O port"; 487 if ((val & PCIM_BRIO_MASK) == PCIM_BRIO_32) { 488 sc->io.base = PCI_PPBIOBASE( 489 pci_read_config(dev, PCIR_IOBASEH_1, 2), val); 490 sc->io.limit = PCI_PPBIOLIMIT( 491 pci_read_config(dev, PCIR_IOLIMITH_1, 2), 492 pci_read_config(dev, PCIR_IOLIMITL_1, 1)); 493 max = 0xffffffff; 494 } else { 495 sc->io.base = PCI_PPBIOBASE(0, val); 496 sc->io.limit = PCI_PPBIOLIMIT(0, 497 pci_read_config(dev, PCIR_IOLIMITL_1, 1)); 498 max = 0xffff; 499 } 500 pcib_alloc_window(sc, &sc->io, SYS_RES_IOPORT, 0, max); 501 } 502 503 /* Read the existing memory window. */ 504 sc->mem.valid = 1; 505 sc->mem.reg = PCIR_MEMBASE_1; 506 sc->mem.step = 20; 507 sc->mem.mask = WIN_MEM; 508 sc->mem.name = "memory"; 509 sc->mem.base = PCI_PPBMEMBASE(0, 510 pci_read_config(dev, PCIR_MEMBASE_1, 2)); 511 sc->mem.limit = PCI_PPBMEMLIMIT(0, 512 pci_read_config(dev, PCIR_MEMLIMIT_1, 2)); 513 pcib_alloc_window(sc, &sc->mem, SYS_RES_MEMORY, 0, 0xffffffff); 514 515 /* Determine if the prefetchable memory window is implemented. */ 516 val = pci_read_config(dev, PCIR_PMBASEL_1, 2); 517 if (val == 0) { 518 /* 519 * If 'val' is zero, then only 32-bits of memory space 520 * are supported. 521 */ 522 pci_write_config(dev, PCIR_PMBASEL_1, 0xffff, 2); 523 if (pci_read_config(dev, PCIR_PMBASEL_1, 2) != 0) { 524 sc->pmem.valid = 1; 525 pci_write_config(dev, PCIR_PMBASEL_1, 0, 2); 526 } 527 } else 528 sc->pmem.valid = 1; 529 530 /* Read the existing prefetchable memory window. */ 531 if (sc->pmem.valid) { 532 sc->pmem.reg = PCIR_PMBASEL_1; 533 sc->pmem.step = 20; 534 sc->pmem.mask = WIN_PMEM; 535 sc->pmem.name = "prefetch"; 536 if ((val & PCIM_BRPM_MASK) == PCIM_BRPM_64) { 537 sc->pmem.base = PCI_PPBMEMBASE( 538 pci_read_config(dev, PCIR_PMBASEH_1, 4), val); 539 sc->pmem.limit = PCI_PPBMEMLIMIT( 540 pci_read_config(dev, PCIR_PMLIMITH_1, 4), 541 pci_read_config(dev, PCIR_PMLIMITL_1, 2)); 542 max = 0xffffffffffffffff; 543 } else { 544 sc->pmem.base = PCI_PPBMEMBASE(0, val); 545 sc->pmem.limit = PCI_PPBMEMLIMIT(0, 546 pci_read_config(dev, PCIR_PMLIMITL_1, 2)); 547 max = 0xffffffff; 548 } 549 pcib_alloc_window(sc, &sc->pmem, SYS_RES_MEMORY, 550 RF_PREFETCHABLE, max); 551 } 552 } 553 554 static void 555 pcib_release_window(struct pcib_softc *sc, struct pcib_window *w, int type) 556 { 557 device_t dev; 558 int error, i; 559 560 if (!w->valid) 561 return; 562 563 dev = sc->dev; 564 error = rman_fini(&w->rman); 565 if (error) { 566 device_printf(dev, "failed to release %s rman\n", w->name); 567 return; 568 } 569 free(__DECONST(char *, w->rman.rm_descr), M_DEVBUF); 570 571 for (i = 0; i < w->count; i++) { 572 error = bus_free_resource(dev, type, w->res[i]); 573 if (error) 574 device_printf(dev, 575 "failed to release %s resource: %d\n", w->name, 576 error); 577 } 578 free(w->res, M_DEVBUF); 579 } 580 581 static void 582 pcib_free_windows(struct pcib_softc *sc) 583 { 584 585 pcib_release_window(sc, &sc->pmem, SYS_RES_MEMORY); 586 pcib_release_window(sc, &sc->mem, SYS_RES_MEMORY); 587 pcib_release_window(sc, &sc->io, SYS_RES_IOPORT); 588 } 589 590 #ifdef PCI_RES_BUS 591 /* 592 * Allocate a suitable secondary bus for this bridge if needed and 593 * initialize the resource manager for the secondary bus range. Note 594 * that the minimum count is a desired value and this may allocate a 595 * smaller range. 596 */ 597 void 598 pcib_setup_secbus(device_t dev, struct pcib_secbus *bus, int min_count) 599 { 600 char buf[64]; 601 int error, rid, sec_reg; 602 603 switch (pci_read_config(dev, PCIR_HDRTYPE, 1) & PCIM_HDRTYPE) { 604 case PCIM_HDRTYPE_BRIDGE: 605 sec_reg = PCIR_SECBUS_1; 606 bus->sub_reg = PCIR_SUBBUS_1; 607 break; 608 case PCIM_HDRTYPE_CARDBUS: 609 sec_reg = PCIR_SECBUS_2; 610 bus->sub_reg = PCIR_SUBBUS_2; 611 break; 612 default: 613 panic("not a PCI bridge"); 614 } 615 bus->sec = pci_read_config(dev, sec_reg, 1); 616 bus->sub = pci_read_config(dev, bus->sub_reg, 1); 617 bus->dev = dev; 618 bus->rman.rm_start = 0; 619 bus->rman.rm_end = PCI_BUSMAX; 620 bus->rman.rm_type = RMAN_ARRAY; 621 snprintf(buf, sizeof(buf), "%s bus numbers", device_get_nameunit(dev)); 622 bus->rman.rm_descr = strdup(buf, M_DEVBUF); 623 error = rman_init(&bus->rman); 624 if (error) 625 panic("Failed to initialize %s bus number rman", 626 device_get_nameunit(dev)); 627 628 /* 629 * Allocate a bus range. This will return an existing bus range 630 * if one exists, or a new bus range if one does not. 631 */ 632 rid = 0; 633 bus->res = bus_alloc_resource_anywhere(dev, PCI_RES_BUS, &rid, 634 min_count, 0); 635 if (bus->res == NULL) { 636 /* 637 * Fall back to just allocating a range of a single bus 638 * number. 639 */ 640 bus->res = bus_alloc_resource_anywhere(dev, PCI_RES_BUS, &rid, 641 1, 0); 642 } else if (rman_get_size(bus->res) < min_count) 643 /* 644 * Attempt to grow the existing range to satisfy the 645 * minimum desired count. 646 */ 647 (void)bus_adjust_resource(dev, PCI_RES_BUS, bus->res, 648 rman_get_start(bus->res), rman_get_start(bus->res) + 649 min_count - 1); 650 651 /* 652 * Add the initial resource to the rman. 653 */ 654 if (bus->res != NULL) { 655 error = rman_manage_region(&bus->rman, rman_get_start(bus->res), 656 rman_get_end(bus->res)); 657 if (error) 658 panic("Failed to add resource to rman"); 659 bus->sec = rman_get_start(bus->res); 660 bus->sub = rman_get_end(bus->res); 661 } 662 } 663 664 void 665 pcib_free_secbus(device_t dev, struct pcib_secbus *bus) 666 { 667 int error; 668 669 error = rman_fini(&bus->rman); 670 if (error) { 671 device_printf(dev, "failed to release bus number rman\n"); 672 return; 673 } 674 free(__DECONST(char *, bus->rman.rm_descr), M_DEVBUF); 675 676 error = bus_free_resource(dev, PCI_RES_BUS, bus->res); 677 if (error) 678 device_printf(dev, 679 "failed to release bus numbers resource: %d\n", error); 680 } 681 682 static struct resource * 683 pcib_suballoc_bus(struct pcib_secbus *bus, device_t child, int *rid, 684 rman_res_t start, rman_res_t end, rman_res_t count, u_int flags) 685 { 686 struct resource *res; 687 688 res = rman_reserve_resource(&bus->rman, start, end, count, flags, 689 child); 690 if (res == NULL) 691 return (NULL); 692 693 if (bootverbose) 694 device_printf(bus->dev, 695 "allocated bus range (%ju-%ju) for rid %d of %s\n", 696 rman_get_start(res), rman_get_end(res), *rid, 697 pcib_child_name(child)); 698 rman_set_rid(res, *rid); 699 return (res); 700 } 701 702 /* 703 * Attempt to grow the secondary bus range. This is much simpler than 704 * for I/O windows as the range can only be grown by increasing 705 * subbus. 706 */ 707 static int 708 pcib_grow_subbus(struct pcib_secbus *bus, rman_res_t new_end) 709 { 710 rman_res_t old_end; 711 int error; 712 713 old_end = rman_get_end(bus->res); 714 KASSERT(new_end > old_end, ("attempt to shrink subbus")); 715 error = bus_adjust_resource(bus->dev, PCI_RES_BUS, bus->res, 716 rman_get_start(bus->res), new_end); 717 if (error) 718 return (error); 719 if (bootverbose) 720 device_printf(bus->dev, "grew bus range to %ju-%ju\n", 721 rman_get_start(bus->res), rman_get_end(bus->res)); 722 error = rman_manage_region(&bus->rman, old_end + 1, 723 rman_get_end(bus->res)); 724 if (error) 725 panic("Failed to add resource to rman"); 726 bus->sub = rman_get_end(bus->res); 727 pci_write_config(bus->dev, bus->sub_reg, bus->sub, 1); 728 return (0); 729 } 730 731 struct resource * 732 pcib_alloc_subbus(struct pcib_secbus *bus, device_t child, int *rid, 733 rman_res_t start, rman_res_t end, rman_res_t count, u_int flags) 734 { 735 struct resource *res; 736 rman_res_t start_free, end_free, new_end; 737 738 /* 739 * First, see if the request can be satisified by the existing 740 * bus range. 741 */ 742 res = pcib_suballoc_bus(bus, child, rid, start, end, count, flags); 743 if (res != NULL) 744 return (res); 745 746 /* 747 * Figure out a range to grow the bus range. First, find the 748 * first bus number after the last allocated bus in the rman and 749 * enforce that as a minimum starting point for the range. 750 */ 751 if (rman_last_free_region(&bus->rman, &start_free, &end_free) != 0 || 752 end_free != bus->sub) 753 start_free = bus->sub + 1; 754 if (start_free < start) 755 start_free = start; 756 new_end = start_free + count - 1; 757 758 /* 759 * See if this new range would satisfy the request if it 760 * succeeds. 761 */ 762 if (new_end > end) 763 return (NULL); 764 765 /* Finally, attempt to grow the existing resource. */ 766 if (bootverbose) { 767 device_printf(bus->dev, 768 "attempting to grow bus range for %ju buses\n", count); 769 printf("\tback candidate range: %ju-%ju\n", start_free, 770 new_end); 771 } 772 if (pcib_grow_subbus(bus, new_end) == 0) 773 return (pcib_suballoc_bus(bus, child, rid, start, end, count, 774 flags)); 775 return (NULL); 776 } 777 #endif 778 779 #else 780 781 /* 782 * Is the prefetch window open (eg, can we allocate memory in it?) 783 */ 784 static int 785 pcib_is_prefetch_open(struct pcib_softc *sc) 786 { 787 return (sc->pmembase > 0 && sc->pmembase < sc->pmemlimit); 788 } 789 790 /* 791 * Is the nonprefetch window open (eg, can we allocate memory in it?) 792 */ 793 static int 794 pcib_is_nonprefetch_open(struct pcib_softc *sc) 795 { 796 return (sc->membase > 0 && sc->membase < sc->memlimit); 797 } 798 799 /* 800 * Is the io window open (eg, can we allocate ports in it?) 801 */ 802 static int 803 pcib_is_io_open(struct pcib_softc *sc) 804 { 805 return (sc->iobase > 0 && sc->iobase < sc->iolimit); 806 } 807 808 /* 809 * Get current I/O decode. 810 */ 811 static void 812 pcib_get_io_decode(struct pcib_softc *sc) 813 { 814 device_t dev; 815 uint32_t iolow; 816 817 dev = sc->dev; 818 819 iolow = pci_read_config(dev, PCIR_IOBASEL_1, 1); 820 if ((iolow & PCIM_BRIO_MASK) == PCIM_BRIO_32) 821 sc->iobase = PCI_PPBIOBASE( 822 pci_read_config(dev, PCIR_IOBASEH_1, 2), iolow); 823 else 824 sc->iobase = PCI_PPBIOBASE(0, iolow); 825 826 iolow = pci_read_config(dev, PCIR_IOLIMITL_1, 1); 827 if ((iolow & PCIM_BRIO_MASK) == PCIM_BRIO_32) 828 sc->iolimit = PCI_PPBIOLIMIT( 829 pci_read_config(dev, PCIR_IOLIMITH_1, 2), iolow); 830 else 831 sc->iolimit = PCI_PPBIOLIMIT(0, iolow); 832 } 833 834 /* 835 * Get current memory decode. 836 */ 837 static void 838 pcib_get_mem_decode(struct pcib_softc *sc) 839 { 840 device_t dev; 841 pci_addr_t pmemlow; 842 843 dev = sc->dev; 844 845 sc->membase = PCI_PPBMEMBASE(0, 846 pci_read_config(dev, PCIR_MEMBASE_1, 2)); 847 sc->memlimit = PCI_PPBMEMLIMIT(0, 848 pci_read_config(dev, PCIR_MEMLIMIT_1, 2)); 849 850 pmemlow = pci_read_config(dev, PCIR_PMBASEL_1, 2); 851 if ((pmemlow & PCIM_BRPM_MASK) == PCIM_BRPM_64) 852 sc->pmembase = PCI_PPBMEMBASE( 853 pci_read_config(dev, PCIR_PMBASEH_1, 4), pmemlow); 854 else 855 sc->pmembase = PCI_PPBMEMBASE(0, pmemlow); 856 857 pmemlow = pci_read_config(dev, PCIR_PMLIMITL_1, 2); 858 if ((pmemlow & PCIM_BRPM_MASK) == PCIM_BRPM_64) 859 sc->pmemlimit = PCI_PPBMEMLIMIT( 860 pci_read_config(dev, PCIR_PMLIMITH_1, 4), pmemlow); 861 else 862 sc->pmemlimit = PCI_PPBMEMLIMIT(0, pmemlow); 863 } 864 865 /* 866 * Restore previous I/O decode. 867 */ 868 static void 869 pcib_set_io_decode(struct pcib_softc *sc) 870 { 871 device_t dev; 872 uint32_t iohi; 873 874 dev = sc->dev; 875 876 iohi = sc->iobase >> 16; 877 if (iohi > 0) 878 pci_write_config(dev, PCIR_IOBASEH_1, iohi, 2); 879 pci_write_config(dev, PCIR_IOBASEL_1, sc->iobase >> 8, 1); 880 881 iohi = sc->iolimit >> 16; 882 if (iohi > 0) 883 pci_write_config(dev, PCIR_IOLIMITH_1, iohi, 2); 884 pci_write_config(dev, PCIR_IOLIMITL_1, sc->iolimit >> 8, 1); 885 } 886 887 /* 888 * Restore previous memory decode. 889 */ 890 static void 891 pcib_set_mem_decode(struct pcib_softc *sc) 892 { 893 device_t dev; 894 pci_addr_t pmemhi; 895 896 dev = sc->dev; 897 898 pci_write_config(dev, PCIR_MEMBASE_1, sc->membase >> 16, 2); 899 pci_write_config(dev, PCIR_MEMLIMIT_1, sc->memlimit >> 16, 2); 900 901 pmemhi = sc->pmembase >> 32; 902 if (pmemhi > 0) 903 pci_write_config(dev, PCIR_PMBASEH_1, pmemhi, 4); 904 pci_write_config(dev, PCIR_PMBASEL_1, sc->pmembase >> 16, 2); 905 906 pmemhi = sc->pmemlimit >> 32; 907 if (pmemhi > 0) 908 pci_write_config(dev, PCIR_PMLIMITH_1, pmemhi, 4); 909 pci_write_config(dev, PCIR_PMLIMITL_1, sc->pmemlimit >> 16, 2); 910 } 911 #endif 912 913 #ifdef PCI_HP 914 /* 915 * PCI-express HotPlug support. 916 */ 917 static int pci_enable_pcie_hp = 1; 918 SYSCTL_INT(_hw_pci, OID_AUTO, enable_pcie_hp, CTLFLAG_RDTUN, 919 &pci_enable_pcie_hp, 0, 920 "Enable support for native PCI-express HotPlug."); 921 922 static void 923 pcib_probe_hotplug(struct pcib_softc *sc) 924 { 925 device_t dev; 926 uint32_t link_cap; 927 uint16_t link_sta, slot_sta; 928 929 if (!pci_enable_pcie_hp) 930 return; 931 932 dev = sc->dev; 933 if (pci_find_cap(dev, PCIY_EXPRESS, NULL) != 0) 934 return; 935 936 if (!(pcie_read_config(dev, PCIER_FLAGS, 2) & PCIEM_FLAGS_SLOT)) 937 return; 938 939 sc->pcie_slot_cap = pcie_read_config(dev, PCIER_SLOT_CAP, 4); 940 941 if ((sc->pcie_slot_cap & PCIEM_SLOT_CAP_HPC) == 0) 942 return; 943 link_cap = pcie_read_config(dev, PCIER_LINK_CAP, 4); 944 if ((link_cap & PCIEM_LINK_CAP_DL_ACTIVE) == 0) 945 return; 946 947 /* 948 * Some devices report that they have an MRL when they actually 949 * do not. Since they always report that the MRL is open, child 950 * devices would be ignored. Try to detect these devices and 951 * ignore their claim of HotPlug support. 952 * 953 * If there is an open MRL but the Data Link Layer is active, 954 * the MRL is not real. 955 */ 956 if ((sc->pcie_slot_cap & PCIEM_SLOT_CAP_MRLSP) != 0) { 957 link_sta = pcie_read_config(dev, PCIER_LINK_STA, 2); 958 slot_sta = pcie_read_config(dev, PCIER_SLOT_STA, 2); 959 if ((slot_sta & PCIEM_SLOT_STA_MRLSS) != 0 && 960 (link_sta & PCIEM_LINK_STA_DL_ACTIVE) != 0) { 961 return; 962 } 963 } 964 965 /* 966 * Now that we're sure we want to do hot plug, ask the 967 * firmware, if any, if that's OK. 968 */ 969 if (pcib_request_feature(dev, PCI_FEATURE_HP) != 0) { 970 if (bootverbose) 971 device_printf(dev, "Unable to activate hot plug feature.\n"); 972 return; 973 } 974 975 sc->flags |= PCIB_HOTPLUG; 976 } 977 978 /* 979 * Send a HotPlug command to the slot control register. If this slot 980 * uses command completion interrupts and a previous command is still 981 * in progress, then the command is dropped. Once the previous 982 * command completes or times out, pcib_pcie_hotplug_update() will be 983 * invoked to post a new command based on the slot's state at that 984 * time. 985 */ 986 static void 987 pcib_pcie_hotplug_command(struct pcib_softc *sc, uint16_t val, uint16_t mask) 988 { 989 device_t dev; 990 uint16_t ctl, new; 991 992 dev = sc->dev; 993 994 if (sc->flags & PCIB_HOTPLUG_CMD_PENDING) 995 return; 996 997 ctl = pcie_read_config(dev, PCIER_SLOT_CTL, 2); 998 new = (ctl & ~mask) | val; 999 if (new == ctl) 1000 return; 1001 if (bootverbose) 1002 device_printf(dev, "HotPlug command: %04x -> %04x\n", ctl, new); 1003 pcie_write_config(dev, PCIER_SLOT_CTL, new, 2); 1004 if (!(sc->pcie_slot_cap & PCIEM_SLOT_CAP_NCCS) && 1005 (ctl & new) & PCIEM_SLOT_CTL_CCIE) { 1006 sc->flags |= PCIB_HOTPLUG_CMD_PENDING; 1007 if (!cold) 1008 callout_reset(&sc->pcie_cc_timer, hz, 1009 pcib_pcie_cc_timeout, sc); 1010 } 1011 } 1012 1013 static void 1014 pcib_pcie_hotplug_command_completed(struct pcib_softc *sc) 1015 { 1016 device_t dev; 1017 1018 dev = sc->dev; 1019 1020 if (bootverbose) 1021 device_printf(dev, "Command Completed\n"); 1022 if (!(sc->flags & PCIB_HOTPLUG_CMD_PENDING)) 1023 return; 1024 callout_stop(&sc->pcie_cc_timer); 1025 sc->flags &= ~PCIB_HOTPLUG_CMD_PENDING; 1026 wakeup(sc); 1027 } 1028 1029 /* 1030 * Returns true if a card is fully inserted from the user's 1031 * perspective. It may not yet be ready for access, but the driver 1032 * can now start enabling access if necessary. 1033 */ 1034 static bool 1035 pcib_hotplug_inserted(struct pcib_softc *sc) 1036 { 1037 1038 /* Pretend the card isn't present if a detach is forced. */ 1039 if (sc->flags & PCIB_DETACHING) 1040 return (false); 1041 1042 /* Card must be present in the slot. */ 1043 if ((sc->pcie_slot_sta & PCIEM_SLOT_STA_PDS) == 0) 1044 return (false); 1045 1046 /* A power fault implicitly turns off power to the slot. */ 1047 if (sc->pcie_slot_sta & PCIEM_SLOT_STA_PFD) 1048 return (false); 1049 1050 /* If the MRL is disengaged, the slot is powered off. */ 1051 if (sc->pcie_slot_cap & PCIEM_SLOT_CAP_MRLSP && 1052 (sc->pcie_slot_sta & PCIEM_SLOT_STA_MRLSS) != 0) 1053 return (false); 1054 1055 return (true); 1056 } 1057 1058 /* 1059 * Returns -1 if the card is fully inserted, powered, and ready for 1060 * access. Otherwise, returns 0. 1061 */ 1062 static int 1063 pcib_hotplug_present(struct pcib_softc *sc) 1064 { 1065 1066 /* Card must be inserted. */ 1067 if (!pcib_hotplug_inserted(sc)) 1068 return (0); 1069 1070 /* 1071 * Require the Electromechanical Interlock to be engaged if 1072 * present. 1073 */ 1074 if (sc->pcie_slot_cap & PCIEM_SLOT_CAP_EIP && 1075 (sc->pcie_slot_sta & PCIEM_SLOT_STA_EIS) == 0) 1076 return (0); 1077 1078 /* Require the Data Link Layer to be active. */ 1079 if (!(sc->pcie_link_sta & PCIEM_LINK_STA_DL_ACTIVE)) 1080 return (0); 1081 1082 return (-1); 1083 } 1084 1085 static void 1086 pcib_pcie_hotplug_update(struct pcib_softc *sc, uint16_t val, uint16_t mask, 1087 bool schedule_task) 1088 { 1089 bool card_inserted, ei_engaged; 1090 1091 /* Clear DETACHING if Presence Detect has cleared. */ 1092 if ((sc->pcie_slot_sta & (PCIEM_SLOT_STA_PDC | PCIEM_SLOT_STA_PDS)) == 1093 PCIEM_SLOT_STA_PDC) 1094 sc->flags &= ~PCIB_DETACHING; 1095 1096 card_inserted = pcib_hotplug_inserted(sc); 1097 1098 /* Turn the power indicator on if a card is inserted. */ 1099 if (sc->pcie_slot_cap & PCIEM_SLOT_CAP_PIP) { 1100 mask |= PCIEM_SLOT_CTL_PIC; 1101 if (card_inserted) 1102 val |= PCIEM_SLOT_CTL_PI_ON; 1103 else if (sc->flags & PCIB_DETACH_PENDING) 1104 val |= PCIEM_SLOT_CTL_PI_BLINK; 1105 else 1106 val |= PCIEM_SLOT_CTL_PI_OFF; 1107 } 1108 1109 /* Turn the power on via the Power Controller if a card is inserted. */ 1110 if (sc->pcie_slot_cap & PCIEM_SLOT_CAP_PCP) { 1111 mask |= PCIEM_SLOT_CTL_PCC; 1112 if (card_inserted) 1113 val |= PCIEM_SLOT_CTL_PC_ON; 1114 else 1115 val |= PCIEM_SLOT_CTL_PC_OFF; 1116 } 1117 1118 /* 1119 * If a card is inserted, enable the Electromechanical 1120 * Interlock. If a card is not inserted (or we are in the 1121 * process of detaching), disable the Electromechanical 1122 * Interlock. 1123 */ 1124 if (sc->pcie_slot_cap & PCIEM_SLOT_CAP_EIP) { 1125 mask |= PCIEM_SLOT_CTL_EIC; 1126 ei_engaged = (sc->pcie_slot_sta & PCIEM_SLOT_STA_EIS) != 0; 1127 if (card_inserted != ei_engaged) 1128 val |= PCIEM_SLOT_CTL_EIC; 1129 } 1130 1131 /* 1132 * Start a timer to see if the Data Link Layer times out. 1133 * Note that we only start the timer if Presence Detect or MRL Sensor 1134 * changed on this interrupt. Stop any scheduled timer if 1135 * the Data Link Layer is active. 1136 */ 1137 if (card_inserted && 1138 !(sc->pcie_link_sta & PCIEM_LINK_STA_DL_ACTIVE) && 1139 sc->pcie_slot_sta & 1140 (PCIEM_SLOT_STA_MRLSC | PCIEM_SLOT_STA_PDC)) { 1141 if (cold) 1142 device_printf(sc->dev, 1143 "Data Link Layer inactive\n"); 1144 else 1145 callout_reset(&sc->pcie_dll_timer, hz, 1146 pcib_pcie_dll_timeout, sc); 1147 } else if (sc->pcie_link_sta & PCIEM_LINK_STA_DL_ACTIVE) 1148 callout_stop(&sc->pcie_dll_timer); 1149 1150 pcib_pcie_hotplug_command(sc, val, mask); 1151 1152 /* 1153 * During attach the child "pci" device is added synchronously; 1154 * otherwise, the task is scheduled to manage the child 1155 * device. 1156 */ 1157 if (schedule_task && 1158 (pcib_hotplug_present(sc) != 0) != (sc->child != NULL)) 1159 taskqueue_enqueue(taskqueue_thread, &sc->pcie_hp_task); 1160 } 1161 1162 static void 1163 pcib_pcie_intr_hotplug(void *arg) 1164 { 1165 struct pcib_softc *sc; 1166 device_t dev; 1167 1168 sc = arg; 1169 dev = sc->dev; 1170 sc->pcie_slot_sta = pcie_read_config(dev, PCIER_SLOT_STA, 2); 1171 1172 /* Clear the events just reported. */ 1173 pcie_write_config(dev, PCIER_SLOT_STA, sc->pcie_slot_sta, 2); 1174 1175 if (bootverbose) 1176 device_printf(dev, "HotPlug interrupt: %#x\n", 1177 sc->pcie_slot_sta); 1178 1179 if (sc->pcie_slot_sta & PCIEM_SLOT_STA_ABP) { 1180 if (sc->flags & PCIB_DETACH_PENDING) { 1181 device_printf(dev, 1182 "Attention Button Pressed: Detach Cancelled\n"); 1183 sc->flags &= ~PCIB_DETACH_PENDING; 1184 callout_stop(&sc->pcie_ab_timer); 1185 } else { 1186 device_printf(dev, 1187 "Attention Button Pressed: Detaching in 5 seconds\n"); 1188 sc->flags |= PCIB_DETACH_PENDING; 1189 callout_reset(&sc->pcie_ab_timer, 5 * hz, 1190 pcib_pcie_ab_timeout, sc); 1191 } 1192 } 1193 if (sc->pcie_slot_sta & PCIEM_SLOT_STA_PFD) 1194 device_printf(dev, "Power Fault Detected\n"); 1195 if (sc->pcie_slot_sta & PCIEM_SLOT_STA_MRLSC) 1196 device_printf(dev, "MRL Sensor Changed to %s\n", 1197 sc->pcie_slot_sta & PCIEM_SLOT_STA_MRLSS ? "open" : 1198 "closed"); 1199 if (bootverbose && sc->pcie_slot_sta & PCIEM_SLOT_STA_PDC) 1200 device_printf(dev, "Presence Detect Changed to %s\n", 1201 sc->pcie_slot_sta & PCIEM_SLOT_STA_PDS ? "card present" : 1202 "empty"); 1203 if (sc->pcie_slot_sta & PCIEM_SLOT_STA_CC) 1204 pcib_pcie_hotplug_command_completed(sc); 1205 if (sc->pcie_slot_sta & PCIEM_SLOT_STA_DLLSC) { 1206 sc->pcie_link_sta = pcie_read_config(dev, PCIER_LINK_STA, 2); 1207 if (bootverbose) 1208 device_printf(dev, 1209 "Data Link Layer State Changed to %s\n", 1210 sc->pcie_link_sta & PCIEM_LINK_STA_DL_ACTIVE ? 1211 "active" : "inactive"); 1212 } 1213 1214 pcib_pcie_hotplug_update(sc, 0, 0, true); 1215 } 1216 1217 static void 1218 pcib_pcie_hotplug_task(void *context, int pending) 1219 { 1220 struct pcib_softc *sc; 1221 device_t dev; 1222 1223 sc = context; 1224 mtx_lock(&Giant); 1225 dev = sc->dev; 1226 if (pcib_hotplug_present(sc) != 0) { 1227 if (sc->child == NULL) { 1228 sc->child = device_add_child(dev, "pci", -1); 1229 bus_generic_attach(dev); 1230 } 1231 } else { 1232 if (sc->child != NULL) { 1233 if (device_delete_child(dev, sc->child) == 0) 1234 sc->child = NULL; 1235 } 1236 } 1237 mtx_unlock(&Giant); 1238 } 1239 1240 static void 1241 pcib_pcie_ab_timeout(void *arg) 1242 { 1243 struct pcib_softc *sc; 1244 device_t dev; 1245 1246 sc = arg; 1247 dev = sc->dev; 1248 mtx_assert(&Giant, MA_OWNED); 1249 if (sc->flags & PCIB_DETACH_PENDING) { 1250 sc->flags |= PCIB_DETACHING; 1251 sc->flags &= ~PCIB_DETACH_PENDING; 1252 pcib_pcie_hotplug_update(sc, 0, 0, true); 1253 } 1254 } 1255 1256 static void 1257 pcib_pcie_cc_timeout(void *arg) 1258 { 1259 struct pcib_softc *sc; 1260 device_t dev; 1261 uint16_t sta; 1262 1263 sc = arg; 1264 dev = sc->dev; 1265 mtx_assert(&Giant, MA_OWNED); 1266 sta = pcie_read_config(dev, PCIER_SLOT_STA, 2); 1267 if (!(sta & PCIEM_SLOT_STA_CC)) { 1268 device_printf(dev, 1269 "HotPlug Command Timed Out - forcing detach\n"); 1270 sc->flags &= ~(PCIB_HOTPLUG_CMD_PENDING | PCIB_DETACH_PENDING); 1271 sc->flags |= PCIB_DETACHING; 1272 pcib_pcie_hotplug_update(sc, 0, 0, true); 1273 } else { 1274 device_printf(dev, 1275 "Missed HotPlug interrupt waiting for Command Completion\n"); 1276 pcib_pcie_intr_hotplug(sc); 1277 } 1278 } 1279 1280 static void 1281 pcib_pcie_dll_timeout(void *arg) 1282 { 1283 struct pcib_softc *sc; 1284 device_t dev; 1285 uint16_t sta; 1286 1287 sc = arg; 1288 dev = sc->dev; 1289 mtx_assert(&Giant, MA_OWNED); 1290 sta = pcie_read_config(dev, PCIER_LINK_STA, 2); 1291 if (!(sta & PCIEM_LINK_STA_DL_ACTIVE)) { 1292 device_printf(dev, 1293 "Timed out waiting for Data Link Layer Active\n"); 1294 sc->flags |= PCIB_DETACHING; 1295 pcib_pcie_hotplug_update(sc, 0, 0, true); 1296 } else if (sta != sc->pcie_link_sta) { 1297 device_printf(dev, 1298 "Missed HotPlug interrupt waiting for DLL Active\n"); 1299 pcib_pcie_intr_hotplug(sc); 1300 } 1301 } 1302 1303 static int 1304 pcib_alloc_pcie_irq(struct pcib_softc *sc) 1305 { 1306 device_t dev; 1307 int count, error, rid; 1308 1309 rid = -1; 1310 dev = sc->dev; 1311 1312 /* 1313 * For simplicity, only use MSI-X if there is a single message. 1314 * To support a device with multiple messages we would have to 1315 * use remap intr if the MSI number is not 0. 1316 */ 1317 count = pci_msix_count(dev); 1318 if (count == 1) { 1319 error = pci_alloc_msix(dev, &count); 1320 if (error == 0) 1321 rid = 1; 1322 } 1323 1324 if (rid < 0 && pci_msi_count(dev) > 0) { 1325 count = 1; 1326 error = pci_alloc_msi(dev, &count); 1327 if (error == 0) 1328 rid = 1; 1329 } 1330 1331 if (rid < 0) 1332 rid = 0; 1333 1334 sc->pcie_irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &rid, 1335 RF_ACTIVE); 1336 if (sc->pcie_irq == NULL) { 1337 device_printf(dev, 1338 "Failed to allocate interrupt for PCI-e events\n"); 1339 if (rid > 0) 1340 pci_release_msi(dev); 1341 return (ENXIO); 1342 } 1343 1344 error = bus_setup_intr(dev, sc->pcie_irq, INTR_TYPE_MISC, 1345 NULL, pcib_pcie_intr_hotplug, sc, &sc->pcie_ihand); 1346 if (error) { 1347 device_printf(dev, "Failed to setup PCI-e interrupt handler\n"); 1348 bus_release_resource(dev, SYS_RES_IRQ, rid, sc->pcie_irq); 1349 if (rid > 0) 1350 pci_release_msi(dev); 1351 return (error); 1352 } 1353 return (0); 1354 } 1355 1356 static int 1357 pcib_release_pcie_irq(struct pcib_softc *sc) 1358 { 1359 device_t dev; 1360 int error; 1361 1362 dev = sc->dev; 1363 error = bus_teardown_intr(dev, sc->pcie_irq, sc->pcie_ihand); 1364 if (error) 1365 return (error); 1366 error = bus_free_resource(dev, SYS_RES_IRQ, sc->pcie_irq); 1367 if (error) 1368 return (error); 1369 return (pci_release_msi(dev)); 1370 } 1371 1372 static void 1373 pcib_setup_hotplug(struct pcib_softc *sc) 1374 { 1375 device_t dev; 1376 uint16_t mask, val; 1377 1378 dev = sc->dev; 1379 callout_init(&sc->pcie_ab_timer, 0); 1380 callout_init(&sc->pcie_cc_timer, 0); 1381 callout_init(&sc->pcie_dll_timer, 0); 1382 TASK_INIT(&sc->pcie_hp_task, 0, pcib_pcie_hotplug_task, sc); 1383 1384 /* Allocate IRQ. */ 1385 if (pcib_alloc_pcie_irq(sc) != 0) 1386 return; 1387 1388 sc->pcie_link_sta = pcie_read_config(dev, PCIER_LINK_STA, 2); 1389 sc->pcie_slot_sta = pcie_read_config(dev, PCIER_SLOT_STA, 2); 1390 1391 /* Clear any events previously pending. */ 1392 pcie_write_config(dev, PCIER_SLOT_STA, sc->pcie_slot_sta, 2); 1393 1394 /* Enable HotPlug events. */ 1395 mask = PCIEM_SLOT_CTL_DLLSCE | PCIEM_SLOT_CTL_HPIE | 1396 PCIEM_SLOT_CTL_CCIE | PCIEM_SLOT_CTL_PDCE | PCIEM_SLOT_CTL_MRLSCE | 1397 PCIEM_SLOT_CTL_PFDE | PCIEM_SLOT_CTL_ABPE; 1398 val = PCIEM_SLOT_CTL_DLLSCE | PCIEM_SLOT_CTL_HPIE | PCIEM_SLOT_CTL_PDCE; 1399 if (sc->pcie_slot_cap & PCIEM_SLOT_CAP_APB) 1400 val |= PCIEM_SLOT_CTL_ABPE; 1401 if (sc->pcie_slot_cap & PCIEM_SLOT_CAP_PCP) 1402 val |= PCIEM_SLOT_CTL_PFDE; 1403 if (sc->pcie_slot_cap & PCIEM_SLOT_CAP_MRLSP) 1404 val |= PCIEM_SLOT_CTL_MRLSCE; 1405 if (!(sc->pcie_slot_cap & PCIEM_SLOT_CAP_NCCS)) 1406 val |= PCIEM_SLOT_CTL_CCIE; 1407 1408 /* Turn the attention indicator off. */ 1409 if (sc->pcie_slot_cap & PCIEM_SLOT_CAP_AIP) { 1410 mask |= PCIEM_SLOT_CTL_AIC; 1411 val |= PCIEM_SLOT_CTL_AI_OFF; 1412 } 1413 1414 pcib_pcie_hotplug_update(sc, val, mask, false); 1415 } 1416 1417 static int 1418 pcib_detach_hotplug(struct pcib_softc *sc) 1419 { 1420 uint16_t mask, val; 1421 int error; 1422 1423 /* Disable the card in the slot and force it to detach. */ 1424 if (sc->flags & PCIB_DETACH_PENDING) { 1425 sc->flags &= ~PCIB_DETACH_PENDING; 1426 callout_stop(&sc->pcie_ab_timer); 1427 } 1428 sc->flags |= PCIB_DETACHING; 1429 1430 if (sc->flags & PCIB_HOTPLUG_CMD_PENDING) { 1431 callout_stop(&sc->pcie_cc_timer); 1432 tsleep(sc, 0, "hpcmd", hz); 1433 sc->flags &= ~PCIB_HOTPLUG_CMD_PENDING; 1434 } 1435 1436 /* Disable HotPlug events. */ 1437 mask = PCIEM_SLOT_CTL_DLLSCE | PCIEM_SLOT_CTL_HPIE | 1438 PCIEM_SLOT_CTL_CCIE | PCIEM_SLOT_CTL_PDCE | PCIEM_SLOT_CTL_MRLSCE | 1439 PCIEM_SLOT_CTL_PFDE | PCIEM_SLOT_CTL_ABPE; 1440 val = 0; 1441 1442 /* Turn the attention indicator off. */ 1443 if (sc->pcie_slot_cap & PCIEM_SLOT_CAP_AIP) { 1444 mask |= PCIEM_SLOT_CTL_AIC; 1445 val |= PCIEM_SLOT_CTL_AI_OFF; 1446 } 1447 1448 pcib_pcie_hotplug_update(sc, val, mask, false); 1449 1450 error = pcib_release_pcie_irq(sc); 1451 if (error) 1452 return (error); 1453 taskqueue_drain(taskqueue_thread, &sc->pcie_hp_task); 1454 callout_drain(&sc->pcie_ab_timer); 1455 callout_drain(&sc->pcie_cc_timer); 1456 callout_drain(&sc->pcie_dll_timer); 1457 return (0); 1458 } 1459 #endif 1460 1461 /* 1462 * Get current bridge configuration. 1463 */ 1464 static void 1465 pcib_cfg_save(struct pcib_softc *sc) 1466 { 1467 #ifndef NEW_PCIB 1468 device_t dev; 1469 uint16_t command; 1470 1471 dev = sc->dev; 1472 1473 command = pci_read_config(dev, PCIR_COMMAND, 2); 1474 if (command & PCIM_CMD_PORTEN) 1475 pcib_get_io_decode(sc); 1476 if (command & PCIM_CMD_MEMEN) 1477 pcib_get_mem_decode(sc); 1478 #endif 1479 } 1480 1481 /* 1482 * Restore previous bridge configuration. 1483 */ 1484 static void 1485 pcib_cfg_restore(struct pcib_softc *sc) 1486 { 1487 device_t dev; 1488 #ifndef NEW_PCIB 1489 uint16_t command; 1490 #endif 1491 dev = sc->dev; 1492 1493 #ifdef NEW_PCIB 1494 pcib_write_windows(sc, WIN_IO | WIN_MEM | WIN_PMEM); 1495 #else 1496 command = pci_read_config(dev, PCIR_COMMAND, 2); 1497 if (command & PCIM_CMD_PORTEN) 1498 pcib_set_io_decode(sc); 1499 if (command & PCIM_CMD_MEMEN) 1500 pcib_set_mem_decode(sc); 1501 #endif 1502 } 1503 1504 /* 1505 * Generic device interface 1506 */ 1507 static int 1508 pcib_probe(device_t dev) 1509 { 1510 if ((pci_get_class(dev) == PCIC_BRIDGE) && 1511 (pci_get_subclass(dev) == PCIS_BRIDGE_PCI)) { 1512 device_set_desc(dev, "PCI-PCI bridge"); 1513 return(-10000); 1514 } 1515 return(ENXIO); 1516 } 1517 1518 void 1519 pcib_attach_common(device_t dev) 1520 { 1521 struct pcib_softc *sc; 1522 struct sysctl_ctx_list *sctx; 1523 struct sysctl_oid *soid; 1524 int comma; 1525 1526 sc = device_get_softc(dev); 1527 sc->dev = dev; 1528 1529 /* 1530 * Get current bridge configuration. 1531 */ 1532 sc->domain = pci_get_domain(dev); 1533 #if !(defined(NEW_PCIB) && defined(PCI_RES_BUS)) 1534 sc->bus.sec = pci_read_config(dev, PCIR_SECBUS_1, 1); 1535 sc->bus.sub = pci_read_config(dev, PCIR_SUBBUS_1, 1); 1536 #endif 1537 sc->bridgectl = pci_read_config(dev, PCIR_BRIDGECTL_1, 2); 1538 pcib_cfg_save(sc); 1539 1540 /* 1541 * The primary bus register should always be the bus of the 1542 * parent. 1543 */ 1544 sc->pribus = pci_get_bus(dev); 1545 pci_write_config(dev, PCIR_PRIBUS_1, sc->pribus, 1); 1546 1547 /* 1548 * Setup sysctl reporting nodes 1549 */ 1550 sctx = device_get_sysctl_ctx(dev); 1551 soid = device_get_sysctl_tree(dev); 1552 SYSCTL_ADD_UINT(sctx, SYSCTL_CHILDREN(soid), OID_AUTO, "domain", 1553 CTLFLAG_RD, &sc->domain, 0, "Domain number"); 1554 SYSCTL_ADD_UINT(sctx, SYSCTL_CHILDREN(soid), OID_AUTO, "pribus", 1555 CTLFLAG_RD, &sc->pribus, 0, "Primary bus number"); 1556 SYSCTL_ADD_UINT(sctx, SYSCTL_CHILDREN(soid), OID_AUTO, "secbus", 1557 CTLFLAG_RD, &sc->bus.sec, 0, "Secondary bus number"); 1558 SYSCTL_ADD_UINT(sctx, SYSCTL_CHILDREN(soid), OID_AUTO, "subbus", 1559 CTLFLAG_RD, &sc->bus.sub, 0, "Subordinate bus number"); 1560 1561 /* 1562 * Quirk handling. 1563 */ 1564 switch (pci_get_devid(dev)) { 1565 #if !(defined(NEW_PCIB) && defined(PCI_RES_BUS)) 1566 case 0x12258086: /* Intel 82454KX/GX (Orion) */ 1567 { 1568 uint8_t supbus; 1569 1570 supbus = pci_read_config(dev, 0x41, 1); 1571 if (supbus != 0xff) { 1572 sc->bus.sec = supbus + 1; 1573 sc->bus.sub = supbus + 1; 1574 } 1575 break; 1576 } 1577 #endif 1578 1579 /* 1580 * The i82380FB mobile docking controller is a PCI-PCI bridge, 1581 * and it is a subtractive bridge. However, the ProgIf is wrong 1582 * so the normal setting of PCIB_SUBTRACTIVE bit doesn't 1583 * happen. There are also Toshiba and Cavium ThunderX bridges 1584 * that behave this way. 1585 */ 1586 case 0xa002177d: /* Cavium ThunderX */ 1587 case 0x124b8086: /* Intel 82380FB Mobile */ 1588 case 0x060513d7: /* Toshiba ???? */ 1589 sc->flags |= PCIB_SUBTRACTIVE; 1590 break; 1591 1592 #if !(defined(NEW_PCIB) && defined(PCI_RES_BUS)) 1593 /* Compaq R3000 BIOS sets wrong subordinate bus number. */ 1594 case 0x00dd10de: 1595 { 1596 char *cp; 1597 1598 if ((cp = kern_getenv("smbios.planar.maker")) == NULL) 1599 break; 1600 if (strncmp(cp, "Compal", 6) != 0) { 1601 freeenv(cp); 1602 break; 1603 } 1604 freeenv(cp); 1605 if ((cp = kern_getenv("smbios.planar.product")) == NULL) 1606 break; 1607 if (strncmp(cp, "08A0", 4) != 0) { 1608 freeenv(cp); 1609 break; 1610 } 1611 freeenv(cp); 1612 if (sc->bus.sub < 0xa) { 1613 pci_write_config(dev, PCIR_SUBBUS_1, 0xa, 1); 1614 sc->bus.sub = pci_read_config(dev, PCIR_SUBBUS_1, 1); 1615 } 1616 break; 1617 } 1618 #endif 1619 } 1620 1621 if (pci_msi_device_blacklisted(dev)) 1622 sc->flags |= PCIB_DISABLE_MSI; 1623 1624 if (pci_msix_device_blacklisted(dev)) 1625 sc->flags |= PCIB_DISABLE_MSIX; 1626 1627 /* 1628 * Intel 815, 845 and other chipsets say they are PCI-PCI bridges, 1629 * but have a ProgIF of 0x80. The 82801 family (AA, AB, BAM/CAM, 1630 * BA/CA/DB and E) PCI bridges are HUB-PCI bridges, in Intelese. 1631 * This means they act as if they were subtractively decoding 1632 * bridges and pass all transactions. Mark them and real ProgIf 1 1633 * parts as subtractive. 1634 */ 1635 if ((pci_get_devid(dev) & 0xff00ffff) == 0x24008086 || 1636 pci_read_config(dev, PCIR_PROGIF, 1) == PCIP_BRIDGE_PCI_SUBTRACTIVE) 1637 sc->flags |= PCIB_SUBTRACTIVE; 1638 1639 #ifdef PCI_HP 1640 pcib_probe_hotplug(sc); 1641 #endif 1642 #ifdef NEW_PCIB 1643 #ifdef PCI_RES_BUS 1644 pcib_setup_secbus(dev, &sc->bus, 1); 1645 #endif 1646 pcib_probe_windows(sc); 1647 #endif 1648 #ifdef PCI_HP 1649 if (sc->flags & PCIB_HOTPLUG) 1650 pcib_setup_hotplug(sc); 1651 #endif 1652 if (bootverbose) { 1653 device_printf(dev, " domain %d\n", sc->domain); 1654 device_printf(dev, " secondary bus %d\n", sc->bus.sec); 1655 device_printf(dev, " subordinate bus %d\n", sc->bus.sub); 1656 #ifdef NEW_PCIB 1657 if (pcib_is_window_open(&sc->io)) 1658 device_printf(dev, " I/O decode 0x%jx-0x%jx\n", 1659 (uintmax_t)sc->io.base, (uintmax_t)sc->io.limit); 1660 if (pcib_is_window_open(&sc->mem)) 1661 device_printf(dev, " memory decode 0x%jx-0x%jx\n", 1662 (uintmax_t)sc->mem.base, (uintmax_t)sc->mem.limit); 1663 if (pcib_is_window_open(&sc->pmem)) 1664 device_printf(dev, " prefetched decode 0x%jx-0x%jx\n", 1665 (uintmax_t)sc->pmem.base, (uintmax_t)sc->pmem.limit); 1666 #else 1667 if (pcib_is_io_open(sc)) 1668 device_printf(dev, " I/O decode 0x%x-0x%x\n", 1669 sc->iobase, sc->iolimit); 1670 if (pcib_is_nonprefetch_open(sc)) 1671 device_printf(dev, " memory decode 0x%jx-0x%jx\n", 1672 (uintmax_t)sc->membase, (uintmax_t)sc->memlimit); 1673 if (pcib_is_prefetch_open(sc)) 1674 device_printf(dev, " prefetched decode 0x%jx-0x%jx\n", 1675 (uintmax_t)sc->pmembase, (uintmax_t)sc->pmemlimit); 1676 #endif 1677 if (sc->bridgectl & (PCIB_BCR_ISA_ENABLE | PCIB_BCR_VGA_ENABLE) || 1678 sc->flags & PCIB_SUBTRACTIVE) { 1679 device_printf(dev, " special decode "); 1680 comma = 0; 1681 if (sc->bridgectl & PCIB_BCR_ISA_ENABLE) { 1682 printf("ISA"); 1683 comma = 1; 1684 } 1685 if (sc->bridgectl & PCIB_BCR_VGA_ENABLE) { 1686 printf("%sVGA", comma ? ", " : ""); 1687 comma = 1; 1688 } 1689 if (sc->flags & PCIB_SUBTRACTIVE) 1690 printf("%ssubtractive", comma ? ", " : ""); 1691 printf("\n"); 1692 } 1693 } 1694 1695 /* 1696 * Always enable busmastering on bridges so that transactions 1697 * initiated on the secondary bus are passed through to the 1698 * primary bus. 1699 */ 1700 pci_enable_busmaster(dev); 1701 } 1702 1703 #ifdef PCI_HP 1704 static int 1705 pcib_present(struct pcib_softc *sc) 1706 { 1707 1708 if (sc->flags & PCIB_HOTPLUG) 1709 return (pcib_hotplug_present(sc) != 0); 1710 return (1); 1711 } 1712 #endif 1713 1714 int 1715 pcib_attach_child(device_t dev) 1716 { 1717 struct pcib_softc *sc; 1718 1719 sc = device_get_softc(dev); 1720 if (sc->bus.sec == 0) { 1721 /* no secondary bus; we should have fixed this */ 1722 return(0); 1723 } 1724 1725 #ifdef PCI_HP 1726 if (!pcib_present(sc)) { 1727 /* An empty HotPlug slot, so don't add a PCI bus yet. */ 1728 return (0); 1729 } 1730 #endif 1731 1732 sc->child = device_add_child(dev, "pci", -1); 1733 return (bus_generic_attach(dev)); 1734 } 1735 1736 int 1737 pcib_attach(device_t dev) 1738 { 1739 1740 pcib_attach_common(dev); 1741 return (pcib_attach_child(dev)); 1742 } 1743 1744 int 1745 pcib_detach(device_t dev) 1746 { 1747 #if defined(PCI_HP) || defined(NEW_PCIB) 1748 struct pcib_softc *sc; 1749 #endif 1750 int error; 1751 1752 #if defined(PCI_HP) || defined(NEW_PCIB) 1753 sc = device_get_softc(dev); 1754 #endif 1755 error = bus_generic_detach(dev); 1756 if (error) 1757 return (error); 1758 #ifdef PCI_HP 1759 if (sc->flags & PCIB_HOTPLUG) { 1760 error = pcib_detach_hotplug(sc); 1761 if (error) 1762 return (error); 1763 } 1764 #endif 1765 error = device_delete_children(dev); 1766 if (error) 1767 return (error); 1768 #ifdef NEW_PCIB 1769 pcib_free_windows(sc); 1770 #ifdef PCI_RES_BUS 1771 pcib_free_secbus(dev, &sc->bus); 1772 #endif 1773 #endif 1774 return (0); 1775 } 1776 1777 int 1778 pcib_suspend(device_t dev) 1779 { 1780 1781 pcib_cfg_save(device_get_softc(dev)); 1782 return (bus_generic_suspend(dev)); 1783 } 1784 1785 int 1786 pcib_resume(device_t dev) 1787 { 1788 1789 pcib_cfg_restore(device_get_softc(dev)); 1790 return (bus_generic_resume(dev)); 1791 } 1792 1793 void 1794 pcib_bridge_init(device_t dev) 1795 { 1796 pci_write_config(dev, PCIR_IOBASEL_1, 0xff, 1); 1797 pci_write_config(dev, PCIR_IOBASEH_1, 0xffff, 2); 1798 pci_write_config(dev, PCIR_IOLIMITL_1, 0, 1); 1799 pci_write_config(dev, PCIR_IOLIMITH_1, 0, 2); 1800 pci_write_config(dev, PCIR_MEMBASE_1, 0xffff, 2); 1801 pci_write_config(dev, PCIR_MEMLIMIT_1, 0, 2); 1802 pci_write_config(dev, PCIR_PMBASEL_1, 0xffff, 2); 1803 pci_write_config(dev, PCIR_PMBASEH_1, 0xffffffff, 4); 1804 pci_write_config(dev, PCIR_PMLIMITL_1, 0, 2); 1805 pci_write_config(dev, PCIR_PMLIMITH_1, 0, 4); 1806 } 1807 1808 int 1809 pcib_child_present(device_t dev, device_t child) 1810 { 1811 #ifdef PCI_HP 1812 struct pcib_softc *sc = device_get_softc(dev); 1813 int retval; 1814 1815 retval = bus_child_present(dev); 1816 if (retval != 0 && sc->flags & PCIB_HOTPLUG) 1817 retval = pcib_hotplug_present(sc); 1818 return (retval); 1819 #else 1820 return (bus_child_present(dev)); 1821 #endif 1822 } 1823 1824 int 1825 pcib_read_ivar(device_t dev, device_t child, int which, uintptr_t *result) 1826 { 1827 struct pcib_softc *sc = device_get_softc(dev); 1828 1829 switch (which) { 1830 case PCIB_IVAR_DOMAIN: 1831 *result = sc->domain; 1832 return(0); 1833 case PCIB_IVAR_BUS: 1834 *result = sc->bus.sec; 1835 return(0); 1836 } 1837 return(ENOENT); 1838 } 1839 1840 int 1841 pcib_write_ivar(device_t dev, device_t child, int which, uintptr_t value) 1842 { 1843 1844 switch (which) { 1845 case PCIB_IVAR_DOMAIN: 1846 return(EINVAL); 1847 case PCIB_IVAR_BUS: 1848 return(EINVAL); 1849 } 1850 return(ENOENT); 1851 } 1852 1853 #ifdef NEW_PCIB 1854 /* 1855 * Attempt to allocate a resource from the existing resources assigned 1856 * to a window. 1857 */ 1858 static struct resource * 1859 pcib_suballoc_resource(struct pcib_softc *sc, struct pcib_window *w, 1860 device_t child, int type, int *rid, rman_res_t start, rman_res_t end, 1861 rman_res_t count, u_int flags) 1862 { 1863 struct resource *res; 1864 1865 if (!pcib_is_window_open(w)) 1866 return (NULL); 1867 1868 res = rman_reserve_resource(&w->rman, start, end, count, 1869 flags & ~RF_ACTIVE, child); 1870 if (res == NULL) 1871 return (NULL); 1872 1873 if (bootverbose) 1874 device_printf(sc->dev, 1875 "allocated %s range (%#jx-%#jx) for rid %x of %s\n", 1876 w->name, rman_get_start(res), rman_get_end(res), *rid, 1877 pcib_child_name(child)); 1878 rman_set_rid(res, *rid); 1879 1880 /* 1881 * If the resource should be active, pass that request up the 1882 * tree. This assumes the parent drivers can handle 1883 * activating sub-allocated resources. 1884 */ 1885 if (flags & RF_ACTIVE) { 1886 if (bus_activate_resource(child, type, *rid, res) != 0) { 1887 rman_release_resource(res); 1888 return (NULL); 1889 } 1890 } 1891 1892 return (res); 1893 } 1894 1895 /* Allocate a fresh resource range for an unconfigured window. */ 1896 static int 1897 pcib_alloc_new_window(struct pcib_softc *sc, struct pcib_window *w, int type, 1898 rman_res_t start, rman_res_t end, rman_res_t count, u_int flags) 1899 { 1900 struct resource *res; 1901 rman_res_t base, limit, wmask; 1902 int rid; 1903 1904 /* 1905 * If this is an I/O window on a bridge with ISA enable set 1906 * and the start address is below 64k, then try to allocate an 1907 * initial window of 0x1000 bytes long starting at address 1908 * 0xf000 and walking down. Note that if the original request 1909 * was larger than the non-aliased range size of 0x100 our 1910 * caller would have raised the start address up to 64k 1911 * already. 1912 */ 1913 if (type == SYS_RES_IOPORT && sc->bridgectl & PCIB_BCR_ISA_ENABLE && 1914 start < 65536) { 1915 for (base = 0xf000; (long)base >= 0; base -= 0x1000) { 1916 limit = base + 0xfff; 1917 1918 /* 1919 * Skip ranges that wouldn't work for the 1920 * original request. Note that the actual 1921 * window that overlaps are the non-alias 1922 * ranges within [base, limit], so this isn't 1923 * quite a simple comparison. 1924 */ 1925 if (start + count > limit - 0x400) 1926 continue; 1927 if (base == 0) { 1928 /* 1929 * The first open region for the window at 1930 * 0 is 0x400-0x4ff. 1931 */ 1932 if (end - count + 1 < 0x400) 1933 continue; 1934 } else { 1935 if (end - count + 1 < base) 1936 continue; 1937 } 1938 1939 if (pcib_alloc_nonisa_ranges(sc, base, limit) == 0) { 1940 w->base = base; 1941 w->limit = limit; 1942 return (0); 1943 } 1944 } 1945 return (ENOSPC); 1946 } 1947 1948 wmask = ((rman_res_t)1 << w->step) - 1; 1949 if (RF_ALIGNMENT(flags) < w->step) { 1950 flags &= ~RF_ALIGNMENT_MASK; 1951 flags |= RF_ALIGNMENT_LOG2(w->step); 1952 } 1953 start &= ~wmask; 1954 end |= wmask; 1955 count = roundup2(count, (rman_res_t)1 << w->step); 1956 rid = w->reg; 1957 res = bus_alloc_resource(sc->dev, type, &rid, start, end, count, 1958 flags & ~RF_ACTIVE); 1959 if (res == NULL) 1960 return (ENOSPC); 1961 pcib_add_window_resources(w, &res, 1); 1962 pcib_activate_window(sc, type); 1963 w->base = rman_get_start(res); 1964 w->limit = rman_get_end(res); 1965 return (0); 1966 } 1967 1968 /* Try to expand an existing window to the requested base and limit. */ 1969 static int 1970 pcib_expand_window(struct pcib_softc *sc, struct pcib_window *w, int type, 1971 rman_res_t base, rman_res_t limit) 1972 { 1973 struct resource *res; 1974 int error, i, force_64k_base; 1975 1976 KASSERT(base <= w->base && limit >= w->limit, 1977 ("attempting to shrink window")); 1978 1979 /* 1980 * XXX: pcib_grow_window() doesn't try to do this anyway and 1981 * the error handling for all the edge cases would be tedious. 1982 */ 1983 KASSERT(limit == w->limit || base == w->base, 1984 ("attempting to grow both ends of a window")); 1985 1986 /* 1987 * Yet more special handling for requests to expand an I/O 1988 * window behind an ISA-enabled bridge. Since I/O windows 1989 * have to grow in 0x1000 increments and the end of the 0xffff 1990 * range is an alias, growing a window below 64k will always 1991 * result in allocating new resources and never adjusting an 1992 * existing resource. 1993 */ 1994 if (type == SYS_RES_IOPORT && sc->bridgectl & PCIB_BCR_ISA_ENABLE && 1995 (limit <= 65535 || (base <= 65535 && base != w->base))) { 1996 KASSERT(limit == w->limit || limit <= 65535, 1997 ("attempting to grow both ends across 64k ISA alias")); 1998 1999 if (base != w->base) 2000 error = pcib_alloc_nonisa_ranges(sc, base, w->base - 1); 2001 else 2002 error = pcib_alloc_nonisa_ranges(sc, w->limit + 1, 2003 limit); 2004 if (error == 0) { 2005 w->base = base; 2006 w->limit = limit; 2007 } 2008 return (error); 2009 } 2010 2011 /* 2012 * Find the existing resource to adjust. Usually there is only one, 2013 * but for an ISA-enabled bridge we might be growing the I/O window 2014 * above 64k and need to find the existing resource that maps all 2015 * of the area above 64k. 2016 */ 2017 for (i = 0; i < w->count; i++) { 2018 if (rman_get_end(w->res[i]) == w->limit) 2019 break; 2020 } 2021 KASSERT(i != w->count, ("did not find existing resource")); 2022 res = w->res[i]; 2023 2024 /* 2025 * Usually the resource we found should match the window's 2026 * existing range. The one exception is the ISA-enabled case 2027 * mentioned above in which case the resource should start at 2028 * 64k. 2029 */ 2030 if (type == SYS_RES_IOPORT && sc->bridgectl & PCIB_BCR_ISA_ENABLE && 2031 w->base <= 65535) { 2032 KASSERT(rman_get_start(res) == 65536, 2033 ("existing resource mismatch")); 2034 force_64k_base = 1; 2035 } else { 2036 KASSERT(w->base == rman_get_start(res), 2037 ("existing resource mismatch")); 2038 force_64k_base = 0; 2039 } 2040 2041 error = bus_adjust_resource(sc->dev, type, res, force_64k_base ? 2042 rman_get_start(res) : base, limit); 2043 if (error) 2044 return (error); 2045 2046 /* Add the newly allocated region to the resource manager. */ 2047 if (w->base != base) { 2048 error = rman_manage_region(&w->rman, base, w->base - 1); 2049 w->base = base; 2050 } else { 2051 error = rman_manage_region(&w->rman, w->limit + 1, limit); 2052 w->limit = limit; 2053 } 2054 if (error) { 2055 if (bootverbose) 2056 device_printf(sc->dev, 2057 "failed to expand %s resource manager\n", w->name); 2058 (void)bus_adjust_resource(sc->dev, type, res, force_64k_base ? 2059 rman_get_start(res) : w->base, w->limit); 2060 } 2061 return (error); 2062 } 2063 2064 /* 2065 * Attempt to grow a window to make room for a given resource request. 2066 */ 2067 static int 2068 pcib_grow_window(struct pcib_softc *sc, struct pcib_window *w, int type, 2069 rman_res_t start, rman_res_t end, rman_res_t count, u_int flags) 2070 { 2071 rman_res_t align, start_free, end_free, front, back, wmask; 2072 int error; 2073 2074 /* 2075 * Clamp the desired resource range to the maximum address 2076 * this window supports. Reject impossible requests. 2077 * 2078 * For I/O port requests behind a bridge with the ISA enable 2079 * bit set, force large allocations to start above 64k. 2080 */ 2081 if (!w->valid) 2082 return (EINVAL); 2083 if (sc->bridgectl & PCIB_BCR_ISA_ENABLE && count > 0x100 && 2084 start < 65536) 2085 start = 65536; 2086 if (end > w->rman.rm_end) 2087 end = w->rman.rm_end; 2088 if (start + count - 1 > end || start + count < start) 2089 return (EINVAL); 2090 wmask = ((rman_res_t)1 << w->step) - 1; 2091 2092 /* 2093 * If there is no resource at all, just try to allocate enough 2094 * aligned space for this resource. 2095 */ 2096 if (w->res == NULL) { 2097 error = pcib_alloc_new_window(sc, w, type, start, end, count, 2098 flags); 2099 if (error) { 2100 if (bootverbose) 2101 device_printf(sc->dev, 2102 "failed to allocate initial %s window (%#jx-%#jx,%#jx)\n", 2103 w->name, start, end, count); 2104 return (error); 2105 } 2106 if (bootverbose) 2107 device_printf(sc->dev, 2108 "allocated initial %s window of %#jx-%#jx\n", 2109 w->name, (uintmax_t)w->base, (uintmax_t)w->limit); 2110 goto updatewin; 2111 } 2112 2113 /* 2114 * See if growing the window would help. Compute the minimum 2115 * amount of address space needed on both the front and back 2116 * ends of the existing window to satisfy the allocation. 2117 * 2118 * For each end, build a candidate region adjusting for the 2119 * required alignment, etc. If there is a free region at the 2120 * edge of the window, grow from the inner edge of the free 2121 * region. Otherwise grow from the window boundary. 2122 * 2123 * Growing an I/O window below 64k for a bridge with the ISA 2124 * enable bit doesn't require any special magic as the step 2125 * size of an I/O window (1k) always includes multiple 2126 * non-alias ranges when it is grown in either direction. 2127 * 2128 * XXX: Special case: if w->res is completely empty and the 2129 * request size is larger than w->res, we should find the 2130 * optimal aligned buffer containing w->res and allocate that. 2131 */ 2132 if (bootverbose) 2133 device_printf(sc->dev, 2134 "attempting to grow %s window for (%#jx-%#jx,%#jx)\n", 2135 w->name, start, end, count); 2136 align = (rman_res_t)1 << RF_ALIGNMENT(flags); 2137 if (start < w->base) { 2138 if (rman_first_free_region(&w->rman, &start_free, &end_free) != 2139 0 || start_free != w->base) 2140 end_free = w->base; 2141 if (end_free > end) 2142 end_free = end + 1; 2143 2144 /* Move end_free down until it is properly aligned. */ 2145 end_free &= ~(align - 1); 2146 end_free--; 2147 front = end_free - (count - 1); 2148 2149 /* 2150 * The resource would now be allocated at (front, 2151 * end_free). Ensure that fits in the (start, end) 2152 * bounds. end_free is checked above. If 'front' is 2153 * ok, ensure it is properly aligned for this window. 2154 * Also check for underflow. 2155 */ 2156 if (front >= start && front <= end_free) { 2157 if (bootverbose) 2158 printf("\tfront candidate range: %#jx-%#jx\n", 2159 front, end_free); 2160 front &= ~wmask; 2161 front = w->base - front; 2162 } else 2163 front = 0; 2164 } else 2165 front = 0; 2166 if (end > w->limit) { 2167 if (rman_last_free_region(&w->rman, &start_free, &end_free) != 2168 0 || end_free != w->limit) 2169 start_free = w->limit + 1; 2170 if (start_free < start) 2171 start_free = start; 2172 2173 /* Move start_free up until it is properly aligned. */ 2174 start_free = roundup2(start_free, align); 2175 back = start_free + count - 1; 2176 2177 /* 2178 * The resource would now be allocated at (start_free, 2179 * back). Ensure that fits in the (start, end) 2180 * bounds. start_free is checked above. If 'back' is 2181 * ok, ensure it is properly aligned for this window. 2182 * Also check for overflow. 2183 */ 2184 if (back <= end && start_free <= back) { 2185 if (bootverbose) 2186 printf("\tback candidate range: %#jx-%#jx\n", 2187 start_free, back); 2188 back |= wmask; 2189 back -= w->limit; 2190 } else 2191 back = 0; 2192 } else 2193 back = 0; 2194 2195 /* 2196 * Try to allocate the smallest needed region first. 2197 * If that fails, fall back to the other region. 2198 */ 2199 error = ENOSPC; 2200 while (front != 0 || back != 0) { 2201 if (front != 0 && (front <= back || back == 0)) { 2202 error = pcib_expand_window(sc, w, type, w->base - front, 2203 w->limit); 2204 if (error == 0) 2205 break; 2206 front = 0; 2207 } else { 2208 error = pcib_expand_window(sc, w, type, w->base, 2209 w->limit + back); 2210 if (error == 0) 2211 break; 2212 back = 0; 2213 } 2214 } 2215 2216 if (error) 2217 return (error); 2218 if (bootverbose) 2219 device_printf(sc->dev, "grew %s window to %#jx-%#jx\n", 2220 w->name, (uintmax_t)w->base, (uintmax_t)w->limit); 2221 2222 updatewin: 2223 /* Write the new window. */ 2224 KASSERT((w->base & wmask) == 0, ("start address is not aligned")); 2225 KASSERT((w->limit & wmask) == wmask, ("end address is not aligned")); 2226 pcib_write_windows(sc, w->mask); 2227 return (0); 2228 } 2229 2230 /* 2231 * We have to trap resource allocation requests and ensure that the bridge 2232 * is set up to, or capable of handling them. 2233 */ 2234 struct resource * 2235 pcib_alloc_resource(device_t dev, device_t child, int type, int *rid, 2236 rman_res_t start, rman_res_t end, rman_res_t count, u_int flags) 2237 { 2238 struct pcib_softc *sc; 2239 struct resource *r; 2240 2241 sc = device_get_softc(dev); 2242 2243 /* 2244 * VGA resources are decoded iff the VGA enable bit is set in 2245 * the bridge control register. VGA resources do not fall into 2246 * the resource windows and are passed up to the parent. 2247 */ 2248 if ((type == SYS_RES_IOPORT && pci_is_vga_ioport_range(start, end)) || 2249 (type == SYS_RES_MEMORY && pci_is_vga_memory_range(start, end))) { 2250 if (sc->bridgectl & PCIB_BCR_VGA_ENABLE) 2251 return (bus_generic_alloc_resource(dev, child, type, 2252 rid, start, end, count, flags)); 2253 else 2254 return (NULL); 2255 } 2256 2257 switch (type) { 2258 #ifdef PCI_RES_BUS 2259 case PCI_RES_BUS: 2260 return (pcib_alloc_subbus(&sc->bus, child, rid, start, end, 2261 count, flags)); 2262 #endif 2263 case SYS_RES_IOPORT: 2264 if (pcib_is_isa_range(sc, start, end, count)) 2265 return (NULL); 2266 r = pcib_suballoc_resource(sc, &sc->io, child, type, rid, start, 2267 end, count, flags); 2268 if (r != NULL || (sc->flags & PCIB_SUBTRACTIVE) != 0) 2269 break; 2270 if (pcib_grow_window(sc, &sc->io, type, start, end, count, 2271 flags) == 0) 2272 r = pcib_suballoc_resource(sc, &sc->io, child, type, 2273 rid, start, end, count, flags); 2274 break; 2275 case SYS_RES_MEMORY: 2276 /* 2277 * For prefetchable resources, prefer the prefetchable 2278 * memory window, but fall back to the regular memory 2279 * window if that fails. Try both windows before 2280 * attempting to grow a window in case the firmware 2281 * has used a range in the regular memory window to 2282 * map a prefetchable BAR. 2283 */ 2284 if (flags & RF_PREFETCHABLE) { 2285 r = pcib_suballoc_resource(sc, &sc->pmem, child, type, 2286 rid, start, end, count, flags); 2287 if (r != NULL) 2288 break; 2289 } 2290 r = pcib_suballoc_resource(sc, &sc->mem, child, type, rid, 2291 start, end, count, flags); 2292 if (r != NULL || (sc->flags & PCIB_SUBTRACTIVE) != 0) 2293 break; 2294 if (flags & RF_PREFETCHABLE) { 2295 if (pcib_grow_window(sc, &sc->pmem, type, start, end, 2296 count, flags) == 0) { 2297 r = pcib_suballoc_resource(sc, &sc->pmem, child, 2298 type, rid, start, end, count, flags); 2299 if (r != NULL) 2300 break; 2301 } 2302 } 2303 if (pcib_grow_window(sc, &sc->mem, type, start, end, count, 2304 flags & ~RF_PREFETCHABLE) == 0) 2305 r = pcib_suballoc_resource(sc, &sc->mem, child, type, 2306 rid, start, end, count, flags); 2307 break; 2308 default: 2309 return (bus_generic_alloc_resource(dev, child, type, rid, 2310 start, end, count, flags)); 2311 } 2312 2313 /* 2314 * If attempts to suballocate from the window fail but this is a 2315 * subtractive bridge, pass the request up the tree. 2316 */ 2317 if (sc->flags & PCIB_SUBTRACTIVE && r == NULL) 2318 return (bus_generic_alloc_resource(dev, child, type, rid, 2319 start, end, count, flags)); 2320 return (r); 2321 } 2322 2323 int 2324 pcib_adjust_resource(device_t bus, device_t child, int type, struct resource *r, 2325 rman_res_t start, rman_res_t end) 2326 { 2327 struct pcib_softc *sc; 2328 2329 sc = device_get_softc(bus); 2330 if (pcib_is_resource_managed(sc, type, r)) 2331 return (rman_adjust_resource(r, start, end)); 2332 return (bus_generic_adjust_resource(bus, child, type, r, start, end)); 2333 } 2334 2335 int 2336 pcib_release_resource(device_t dev, device_t child, int type, int rid, 2337 struct resource *r) 2338 { 2339 struct pcib_softc *sc; 2340 int error; 2341 2342 sc = device_get_softc(dev); 2343 if (pcib_is_resource_managed(sc, type, r)) { 2344 if (rman_get_flags(r) & RF_ACTIVE) { 2345 error = bus_deactivate_resource(child, type, rid, r); 2346 if (error) 2347 return (error); 2348 } 2349 return (rman_release_resource(r)); 2350 } 2351 return (bus_generic_release_resource(dev, child, type, rid, r)); 2352 } 2353 #else 2354 /* 2355 * We have to trap resource allocation requests and ensure that the bridge 2356 * is set up to, or capable of handling them. 2357 */ 2358 struct resource * 2359 pcib_alloc_resource(device_t dev, device_t child, int type, int *rid, 2360 rman_res_t start, rman_res_t end, rman_res_t count, u_int flags) 2361 { 2362 struct pcib_softc *sc = device_get_softc(dev); 2363 const char *name, *suffix; 2364 int ok; 2365 2366 /* 2367 * Fail the allocation for this range if it's not supported. 2368 */ 2369 name = device_get_nameunit(child); 2370 if (name == NULL) { 2371 name = ""; 2372 suffix = ""; 2373 } else 2374 suffix = " "; 2375 switch (type) { 2376 case SYS_RES_IOPORT: 2377 ok = 0; 2378 if (!pcib_is_io_open(sc)) 2379 break; 2380 ok = (start >= sc->iobase && end <= sc->iolimit); 2381 2382 /* 2383 * Make sure we allow access to VGA I/O addresses when the 2384 * bridge has the "VGA Enable" bit set. 2385 */ 2386 if (!ok && pci_is_vga_ioport_range(start, end)) 2387 ok = (sc->bridgectl & PCIB_BCR_VGA_ENABLE) ? 1 : 0; 2388 2389 if ((sc->flags & PCIB_SUBTRACTIVE) == 0) { 2390 if (!ok) { 2391 if (start < sc->iobase) 2392 start = sc->iobase; 2393 if (end > sc->iolimit) 2394 end = sc->iolimit; 2395 if (start < end) 2396 ok = 1; 2397 } 2398 } else { 2399 ok = 1; 2400 #if 0 2401 /* 2402 * If we overlap with the subtractive range, then 2403 * pick the upper range to use. 2404 */ 2405 if (start < sc->iolimit && end > sc->iobase) 2406 start = sc->iolimit + 1; 2407 #endif 2408 } 2409 if (end < start) { 2410 device_printf(dev, "ioport: end (%jx) < start (%jx)\n", 2411 end, start); 2412 start = 0; 2413 end = 0; 2414 ok = 0; 2415 } 2416 if (!ok) { 2417 device_printf(dev, "%s%srequested unsupported I/O " 2418 "range 0x%jx-0x%jx (decoding 0x%x-0x%x)\n", 2419 name, suffix, start, end, sc->iobase, sc->iolimit); 2420 return (NULL); 2421 } 2422 if (bootverbose) 2423 device_printf(dev, 2424 "%s%srequested I/O range 0x%jx-0x%jx: in range\n", 2425 name, suffix, start, end); 2426 break; 2427 2428 case SYS_RES_MEMORY: 2429 ok = 0; 2430 if (pcib_is_nonprefetch_open(sc)) 2431 ok = ok || (start >= sc->membase && end <= sc->memlimit); 2432 if (pcib_is_prefetch_open(sc)) 2433 ok = ok || (start >= sc->pmembase && end <= sc->pmemlimit); 2434 2435 /* 2436 * Make sure we allow access to VGA memory addresses when the 2437 * bridge has the "VGA Enable" bit set. 2438 */ 2439 if (!ok && pci_is_vga_memory_range(start, end)) 2440 ok = (sc->bridgectl & PCIB_BCR_VGA_ENABLE) ? 1 : 0; 2441 2442 if ((sc->flags & PCIB_SUBTRACTIVE) == 0) { 2443 if (!ok) { 2444 ok = 1; 2445 if (flags & RF_PREFETCHABLE) { 2446 if (pcib_is_prefetch_open(sc)) { 2447 if (start < sc->pmembase) 2448 start = sc->pmembase; 2449 if (end > sc->pmemlimit) 2450 end = sc->pmemlimit; 2451 } else { 2452 ok = 0; 2453 } 2454 } else { /* non-prefetchable */ 2455 if (pcib_is_nonprefetch_open(sc)) { 2456 if (start < sc->membase) 2457 start = sc->membase; 2458 if (end > sc->memlimit) 2459 end = sc->memlimit; 2460 } else { 2461 ok = 0; 2462 } 2463 } 2464 } 2465 } else if (!ok) { 2466 ok = 1; /* subtractive bridge: always ok */ 2467 #if 0 2468 if (pcib_is_nonprefetch_open(sc)) { 2469 if (start < sc->memlimit && end > sc->membase) 2470 start = sc->memlimit + 1; 2471 } 2472 if (pcib_is_prefetch_open(sc)) { 2473 if (start < sc->pmemlimit && end > sc->pmembase) 2474 start = sc->pmemlimit + 1; 2475 } 2476 #endif 2477 } 2478 if (end < start) { 2479 device_printf(dev, "memory: end (%jx) < start (%jx)\n", 2480 end, start); 2481 start = 0; 2482 end = 0; 2483 ok = 0; 2484 } 2485 if (!ok && bootverbose) 2486 device_printf(dev, 2487 "%s%srequested unsupported memory range %#jx-%#jx " 2488 "(decoding %#jx-%#jx, %#jx-%#jx)\n", 2489 name, suffix, start, end, 2490 (uintmax_t)sc->membase, (uintmax_t)sc->memlimit, 2491 (uintmax_t)sc->pmembase, (uintmax_t)sc->pmemlimit); 2492 if (!ok) 2493 return (NULL); 2494 if (bootverbose) 2495 device_printf(dev,"%s%srequested memory range " 2496 "0x%jx-0x%jx: good\n", 2497 name, suffix, start, end); 2498 break; 2499 2500 default: 2501 break; 2502 } 2503 /* 2504 * Bridge is OK decoding this resource, so pass it up. 2505 */ 2506 return (bus_generic_alloc_resource(dev, child, type, rid, start, end, 2507 count, flags)); 2508 } 2509 #endif 2510 2511 /* 2512 * If ARI is enabled on this downstream port, translate the function number 2513 * to the non-ARI slot/function. The downstream port will convert it back in 2514 * hardware. If ARI is not enabled slot and func are not modified. 2515 */ 2516 static __inline void 2517 pcib_xlate_ari(device_t pcib, int bus, int *slot, int *func) 2518 { 2519 struct pcib_softc *sc; 2520 int ari_func; 2521 2522 sc = device_get_softc(pcib); 2523 ari_func = *func; 2524 2525 if (sc->flags & PCIB_ENABLE_ARI) { 2526 KASSERT(*slot == 0, 2527 ("Non-zero slot number with ARI enabled!")); 2528 *slot = PCIE_ARI_SLOT(ari_func); 2529 *func = PCIE_ARI_FUNC(ari_func); 2530 } 2531 } 2532 2533 2534 static void 2535 pcib_enable_ari(struct pcib_softc *sc, uint32_t pcie_pos) 2536 { 2537 uint32_t ctl2; 2538 2539 ctl2 = pci_read_config(sc->dev, pcie_pos + PCIER_DEVICE_CTL2, 4); 2540 ctl2 |= PCIEM_CTL2_ARI; 2541 pci_write_config(sc->dev, pcie_pos + PCIER_DEVICE_CTL2, ctl2, 4); 2542 2543 sc->flags |= PCIB_ENABLE_ARI; 2544 } 2545 2546 /* 2547 * PCIB interface. 2548 */ 2549 int 2550 pcib_maxslots(device_t dev) 2551 { 2552 return (PCI_SLOTMAX); 2553 } 2554 2555 static int 2556 pcib_ari_maxslots(device_t dev) 2557 { 2558 struct pcib_softc *sc; 2559 2560 sc = device_get_softc(dev); 2561 2562 if (sc->flags & PCIB_ENABLE_ARI) 2563 return (PCIE_ARI_SLOTMAX); 2564 else 2565 return (PCI_SLOTMAX); 2566 } 2567 2568 static int 2569 pcib_ari_maxfuncs(device_t dev) 2570 { 2571 struct pcib_softc *sc; 2572 2573 sc = device_get_softc(dev); 2574 2575 if (sc->flags & PCIB_ENABLE_ARI) 2576 return (PCIE_ARI_FUNCMAX); 2577 else 2578 return (PCI_FUNCMAX); 2579 } 2580 2581 static void 2582 pcib_ari_decode_rid(device_t pcib, uint16_t rid, int *bus, int *slot, 2583 int *func) 2584 { 2585 struct pcib_softc *sc; 2586 2587 sc = device_get_softc(pcib); 2588 2589 *bus = PCI_RID2BUS(rid); 2590 if (sc->flags & PCIB_ENABLE_ARI) { 2591 *slot = PCIE_ARI_RID2SLOT(rid); 2592 *func = PCIE_ARI_RID2FUNC(rid); 2593 } else { 2594 *slot = PCI_RID2SLOT(rid); 2595 *func = PCI_RID2FUNC(rid); 2596 } 2597 } 2598 2599 /* 2600 * Since we are a child of a PCI bus, its parent must support the pcib interface. 2601 */ 2602 static uint32_t 2603 pcib_read_config(device_t dev, u_int b, u_int s, u_int f, u_int reg, int width) 2604 { 2605 #ifdef PCI_HP 2606 struct pcib_softc *sc; 2607 2608 sc = device_get_softc(dev); 2609 if (!pcib_present(sc)) { 2610 switch (width) { 2611 case 2: 2612 return (0xffff); 2613 case 1: 2614 return (0xff); 2615 default: 2616 return (0xffffffff); 2617 } 2618 } 2619 #endif 2620 pcib_xlate_ari(dev, b, &s, &f); 2621 return(PCIB_READ_CONFIG(device_get_parent(device_get_parent(dev)), b, s, 2622 f, reg, width)); 2623 } 2624 2625 static void 2626 pcib_write_config(device_t dev, u_int b, u_int s, u_int f, u_int reg, uint32_t val, int width) 2627 { 2628 #ifdef PCI_HP 2629 struct pcib_softc *sc; 2630 2631 sc = device_get_softc(dev); 2632 if (!pcib_present(sc)) 2633 return; 2634 #endif 2635 pcib_xlate_ari(dev, b, &s, &f); 2636 PCIB_WRITE_CONFIG(device_get_parent(device_get_parent(dev)), b, s, f, 2637 reg, val, width); 2638 } 2639 2640 /* 2641 * Route an interrupt across a PCI bridge. 2642 */ 2643 int 2644 pcib_route_interrupt(device_t pcib, device_t dev, int pin) 2645 { 2646 device_t bus; 2647 int parent_intpin; 2648 int intnum; 2649 2650 /* 2651 * 2652 * The PCI standard defines a swizzle of the child-side device/intpin to 2653 * the parent-side intpin as follows. 2654 * 2655 * device = device on child bus 2656 * child_intpin = intpin on child bus slot (0-3) 2657 * parent_intpin = intpin on parent bus slot (0-3) 2658 * 2659 * parent_intpin = (device + child_intpin) % 4 2660 */ 2661 parent_intpin = (pci_get_slot(dev) + (pin - 1)) % 4; 2662 2663 /* 2664 * Our parent is a PCI bus. Its parent must export the pcib interface 2665 * which includes the ability to route interrupts. 2666 */ 2667 bus = device_get_parent(pcib); 2668 intnum = PCIB_ROUTE_INTERRUPT(device_get_parent(bus), pcib, parent_intpin + 1); 2669 if (PCI_INTERRUPT_VALID(intnum) && bootverbose) { 2670 device_printf(pcib, "slot %d INT%c is routed to irq %d\n", 2671 pci_get_slot(dev), 'A' + pin - 1, intnum); 2672 } 2673 return(intnum); 2674 } 2675 2676 /* Pass request to alloc MSI/MSI-X messages up to the parent bridge. */ 2677 int 2678 pcib_alloc_msi(device_t pcib, device_t dev, int count, int maxcount, int *irqs) 2679 { 2680 struct pcib_softc *sc = device_get_softc(pcib); 2681 device_t bus; 2682 2683 if (sc->flags & PCIB_DISABLE_MSI) 2684 return (ENXIO); 2685 bus = device_get_parent(pcib); 2686 return (PCIB_ALLOC_MSI(device_get_parent(bus), dev, count, maxcount, 2687 irqs)); 2688 } 2689 2690 /* Pass request to release MSI/MSI-X messages up to the parent bridge. */ 2691 int 2692 pcib_release_msi(device_t pcib, device_t dev, int count, int *irqs) 2693 { 2694 device_t bus; 2695 2696 bus = device_get_parent(pcib); 2697 return (PCIB_RELEASE_MSI(device_get_parent(bus), dev, count, irqs)); 2698 } 2699 2700 /* Pass request to alloc an MSI-X message up to the parent bridge. */ 2701 int 2702 pcib_alloc_msix(device_t pcib, device_t dev, int *irq) 2703 { 2704 struct pcib_softc *sc = device_get_softc(pcib); 2705 device_t bus; 2706 2707 if (sc->flags & PCIB_DISABLE_MSIX) 2708 return (ENXIO); 2709 bus = device_get_parent(pcib); 2710 return (PCIB_ALLOC_MSIX(device_get_parent(bus), dev, irq)); 2711 } 2712 2713 /* Pass request to release an MSI-X message up to the parent bridge. */ 2714 int 2715 pcib_release_msix(device_t pcib, device_t dev, int irq) 2716 { 2717 device_t bus; 2718 2719 bus = device_get_parent(pcib); 2720 return (PCIB_RELEASE_MSIX(device_get_parent(bus), dev, irq)); 2721 } 2722 2723 /* Pass request to map MSI/MSI-X message up to parent bridge. */ 2724 int 2725 pcib_map_msi(device_t pcib, device_t dev, int irq, uint64_t *addr, 2726 uint32_t *data) 2727 { 2728 device_t bus; 2729 int error; 2730 2731 bus = device_get_parent(pcib); 2732 error = PCIB_MAP_MSI(device_get_parent(bus), dev, irq, addr, data); 2733 if (error) 2734 return (error); 2735 2736 pci_ht_map_msi(pcib, *addr); 2737 return (0); 2738 } 2739 2740 /* Pass request for device power state up to parent bridge. */ 2741 int 2742 pcib_power_for_sleep(device_t pcib, device_t dev, int *pstate) 2743 { 2744 device_t bus; 2745 2746 bus = device_get_parent(pcib); 2747 return (PCIB_POWER_FOR_SLEEP(bus, dev, pstate)); 2748 } 2749 2750 static int 2751 pcib_ari_enabled(device_t pcib) 2752 { 2753 struct pcib_softc *sc; 2754 2755 sc = device_get_softc(pcib); 2756 2757 return ((sc->flags & PCIB_ENABLE_ARI) != 0); 2758 } 2759 2760 static int 2761 pcib_ari_get_id(device_t pcib, device_t dev, enum pci_id_type type, 2762 uintptr_t *id) 2763 { 2764 struct pcib_softc *sc; 2765 device_t bus_dev; 2766 uint8_t bus, slot, func; 2767 2768 if (type != PCI_ID_RID) { 2769 bus_dev = device_get_parent(pcib); 2770 return (PCIB_GET_ID(device_get_parent(bus_dev), dev, type, id)); 2771 } 2772 2773 sc = device_get_softc(pcib); 2774 2775 if (sc->flags & PCIB_ENABLE_ARI) { 2776 bus = pci_get_bus(dev); 2777 func = pci_get_function(dev); 2778 2779 *id = (PCI_ARI_RID(bus, func)); 2780 } else { 2781 bus = pci_get_bus(dev); 2782 slot = pci_get_slot(dev); 2783 func = pci_get_function(dev); 2784 2785 *id = (PCI_RID(bus, slot, func)); 2786 } 2787 2788 return (0); 2789 } 2790 2791 /* 2792 * Check that the downstream port (pcib) and the endpoint device (dev) both 2793 * support ARI. If so, enable it and return 0, otherwise return an error. 2794 */ 2795 static int 2796 pcib_try_enable_ari(device_t pcib, device_t dev) 2797 { 2798 struct pcib_softc *sc; 2799 int error; 2800 uint32_t cap2; 2801 int ari_cap_off; 2802 uint32_t ari_ver; 2803 uint32_t pcie_pos; 2804 2805 sc = device_get_softc(pcib); 2806 2807 /* 2808 * ARI is controlled in a register in the PCIe capability structure. 2809 * If the downstream port does not have the PCIe capability structure 2810 * then it does not support ARI. 2811 */ 2812 error = pci_find_cap(pcib, PCIY_EXPRESS, &pcie_pos); 2813 if (error != 0) 2814 return (ENODEV); 2815 2816 /* Check that the PCIe port advertises ARI support. */ 2817 cap2 = pci_read_config(pcib, pcie_pos + PCIER_DEVICE_CAP2, 4); 2818 if (!(cap2 & PCIEM_CAP2_ARI)) 2819 return (ENODEV); 2820 2821 /* 2822 * Check that the endpoint device advertises ARI support via the ARI 2823 * extended capability structure. 2824 */ 2825 error = pci_find_extcap(dev, PCIZ_ARI, &ari_cap_off); 2826 if (error != 0) 2827 return (ENODEV); 2828 2829 /* 2830 * Finally, check that the endpoint device supports the same version 2831 * of ARI that we do. 2832 */ 2833 ari_ver = pci_read_config(dev, ari_cap_off, 4); 2834 if (PCI_EXTCAP_VER(ari_ver) != PCIB_SUPPORTED_ARI_VER) { 2835 if (bootverbose) 2836 device_printf(pcib, 2837 "Unsupported version of ARI (%d) detected\n", 2838 PCI_EXTCAP_VER(ari_ver)); 2839 2840 return (ENXIO); 2841 } 2842 2843 pcib_enable_ari(sc, pcie_pos); 2844 2845 return (0); 2846 } 2847 2848 int 2849 pcib_request_feature_allow(device_t pcib, device_t dev, 2850 enum pci_feature feature) 2851 { 2852 /* 2853 * No host firmware we have to negotiate with, so we allow 2854 * every valid feature requested. 2855 */ 2856 switch (feature) { 2857 case PCI_FEATURE_AER: 2858 case PCI_FEATURE_HP: 2859 break; 2860 default: 2861 return (EINVAL); 2862 } 2863 2864 return (0); 2865 } 2866 2867 int 2868 pcib_request_feature(device_t dev, enum pci_feature feature) 2869 { 2870 2871 /* 2872 * Invoke PCIB_REQUEST_FEATURE of this bridge first in case 2873 * the firmware overrides the method of PCI-PCI bridges. 2874 */ 2875 return (PCIB_REQUEST_FEATURE(dev, dev, feature)); 2876 } 2877 2878 /* 2879 * Pass the request to use this PCI feature up the tree. Either there's a 2880 * firmware like ACPI that's using this feature that will approve (or deny) the 2881 * request to take it over, or the platform has no such firmware, in which case 2882 * the request will be approved. If the request is approved, the OS is expected 2883 * to make use of the feature or render it harmless. 2884 */ 2885 static int 2886 pcib_request_feature_default(device_t pcib, device_t dev, 2887 enum pci_feature feature) 2888 { 2889 device_t bus; 2890 2891 /* 2892 * Our parent is necessarily a pci bus. Its parent will either be 2893 * another pci bridge (which passes it up) or a host bridge that can 2894 * approve or reject the request. 2895 */ 2896 bus = device_get_parent(pcib); 2897 return (PCIB_REQUEST_FEATURE(device_get_parent(bus), dev, feature)); 2898 } 2899