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