1 // SPDX-License-Identifier: GPL-2.0 2 /* 3 * Copyright IBM Corp. 2012 4 * 5 * Author(s): 6 * Jan Glauber <jang@linux.vnet.ibm.com> 7 * 8 * The System z PCI code is a rewrite from a prototype by 9 * the following people (Kudoz!): 10 * Alexander Schmidt 11 * Christoph Raisch 12 * Hannes Hering 13 * Hoang-Nam Nguyen 14 * Jan-Bernd Themann 15 * Stefan Roscher 16 * Thomas Klein 17 */ 18 19 #define KMSG_COMPONENT "zpci" 20 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt 21 22 #include <linux/kernel.h> 23 #include <linux/slab.h> 24 #include <linux/err.h> 25 #include <linux/export.h> 26 #include <linux/delay.h> 27 #include <linux/irq.h> 28 #include <linux/kernel_stat.h> 29 #include <linux/seq_file.h> 30 #include <linux/pci.h> 31 #include <linux/msi.h> 32 33 #include <asm/isc.h> 34 #include <asm/airq.h> 35 #include <asm/facility.h> 36 #include <asm/pci_insn.h> 37 #include <asm/pci_clp.h> 38 #include <asm/pci_dma.h> 39 40 #define DEBUG /* enable pr_debug */ 41 42 #define SIC_IRQ_MODE_ALL 0 43 #define SIC_IRQ_MODE_SINGLE 1 44 45 #define ZPCI_NR_DMA_SPACES 1 46 #define ZPCI_NR_DEVICES CONFIG_PCI_NR_FUNCTIONS 47 48 /* list of all detected zpci devices */ 49 static LIST_HEAD(zpci_list); 50 static DEFINE_SPINLOCK(zpci_list_lock); 51 52 static struct irq_chip zpci_irq_chip = { 53 .name = "zPCI", 54 .irq_unmask = pci_msi_unmask_irq, 55 .irq_mask = pci_msi_mask_irq, 56 }; 57 58 static DECLARE_BITMAP(zpci_domain, ZPCI_NR_DEVICES); 59 static DEFINE_SPINLOCK(zpci_domain_lock); 60 61 static struct airq_iv *zpci_aisb_iv; 62 static struct airq_iv *zpci_aibv[ZPCI_NR_DEVICES]; 63 64 #define ZPCI_IOMAP_ENTRIES \ 65 min(((unsigned long) ZPCI_NR_DEVICES * PCI_BAR_COUNT / 2), \ 66 ZPCI_IOMAP_MAX_ENTRIES) 67 68 static DEFINE_SPINLOCK(zpci_iomap_lock); 69 static unsigned long *zpci_iomap_bitmap; 70 struct zpci_iomap_entry *zpci_iomap_start; 71 EXPORT_SYMBOL_GPL(zpci_iomap_start); 72 73 static struct kmem_cache *zdev_fmb_cache; 74 75 struct zpci_dev *get_zdev_by_fid(u32 fid) 76 { 77 struct zpci_dev *tmp, *zdev = NULL; 78 79 spin_lock(&zpci_list_lock); 80 list_for_each_entry(tmp, &zpci_list, entry) { 81 if (tmp->fid == fid) { 82 zdev = tmp; 83 break; 84 } 85 } 86 spin_unlock(&zpci_list_lock); 87 return zdev; 88 } 89 90 void zpci_remove_reserved_devices(void) 91 { 92 struct zpci_dev *tmp, *zdev; 93 enum zpci_state state; 94 LIST_HEAD(remove); 95 96 spin_lock(&zpci_list_lock); 97 list_for_each_entry_safe(zdev, tmp, &zpci_list, entry) { 98 if (zdev->state == ZPCI_FN_STATE_STANDBY && 99 !clp_get_state(zdev->fid, &state) && 100 state == ZPCI_FN_STATE_RESERVED) 101 list_move_tail(&zdev->entry, &remove); 102 } 103 spin_unlock(&zpci_list_lock); 104 105 list_for_each_entry_safe(zdev, tmp, &remove, entry) 106 zpci_remove_device(zdev); 107 } 108 109 static struct zpci_dev *get_zdev_by_bus(struct pci_bus *bus) 110 { 111 return (bus && bus->sysdata) ? (struct zpci_dev *) bus->sysdata : NULL; 112 } 113 114 int pci_domain_nr(struct pci_bus *bus) 115 { 116 return ((struct zpci_dev *) bus->sysdata)->domain; 117 } 118 EXPORT_SYMBOL_GPL(pci_domain_nr); 119 120 int pci_proc_domain(struct pci_bus *bus) 121 { 122 return pci_domain_nr(bus); 123 } 124 EXPORT_SYMBOL_GPL(pci_proc_domain); 125 126 /* Modify PCI: Register adapter interruptions */ 127 static int zpci_set_airq(struct zpci_dev *zdev) 128 { 129 u64 req = ZPCI_CREATE_REQ(zdev->fh, 0, ZPCI_MOD_FC_REG_INT); 130 struct zpci_fib fib = {0}; 131 u8 status; 132 133 fib.isc = PCI_ISC; 134 fib.sum = 1; /* enable summary notifications */ 135 fib.noi = airq_iv_end(zdev->aibv); 136 fib.aibv = (unsigned long) zdev->aibv->vector; 137 fib.aibvo = 0; /* each zdev has its own interrupt vector */ 138 fib.aisb = (unsigned long) zpci_aisb_iv->vector + (zdev->aisb/64)*8; 139 fib.aisbo = zdev->aisb & 63; 140 141 return zpci_mod_fc(req, &fib, &status) ? -EIO : 0; 142 } 143 144 /* Modify PCI: Unregister adapter interruptions */ 145 static int zpci_clear_airq(struct zpci_dev *zdev) 146 { 147 u64 req = ZPCI_CREATE_REQ(zdev->fh, 0, ZPCI_MOD_FC_DEREG_INT); 148 struct zpci_fib fib = {0}; 149 u8 cc, status; 150 151 cc = zpci_mod_fc(req, &fib, &status); 152 if (cc == 3 || (cc == 1 && status == 24)) 153 /* Function already gone or IRQs already deregistered. */ 154 cc = 0; 155 156 return cc ? -EIO : 0; 157 } 158 159 /* Modify PCI: Register I/O address translation parameters */ 160 int zpci_register_ioat(struct zpci_dev *zdev, u8 dmaas, 161 u64 base, u64 limit, u64 iota) 162 { 163 u64 req = ZPCI_CREATE_REQ(zdev->fh, dmaas, ZPCI_MOD_FC_REG_IOAT); 164 struct zpci_fib fib = {0}; 165 u8 status; 166 167 WARN_ON_ONCE(iota & 0x3fff); 168 fib.pba = base; 169 fib.pal = limit; 170 fib.iota = iota | ZPCI_IOTA_RTTO_FLAG; 171 return zpci_mod_fc(req, &fib, &status) ? -EIO : 0; 172 } 173 174 /* Modify PCI: Unregister I/O address translation parameters */ 175 int zpci_unregister_ioat(struct zpci_dev *zdev, u8 dmaas) 176 { 177 u64 req = ZPCI_CREATE_REQ(zdev->fh, dmaas, ZPCI_MOD_FC_DEREG_IOAT); 178 struct zpci_fib fib = {0}; 179 u8 cc, status; 180 181 cc = zpci_mod_fc(req, &fib, &status); 182 if (cc == 3) /* Function already gone. */ 183 cc = 0; 184 return cc ? -EIO : 0; 185 } 186 187 /* Modify PCI: Set PCI function measurement parameters */ 188 int zpci_fmb_enable_device(struct zpci_dev *zdev) 189 { 190 u64 req = ZPCI_CREATE_REQ(zdev->fh, 0, ZPCI_MOD_FC_SET_MEASURE); 191 struct zpci_fib fib = {0}; 192 u8 cc, status; 193 194 if (zdev->fmb || sizeof(*zdev->fmb) < zdev->fmb_length) 195 return -EINVAL; 196 197 zdev->fmb = kmem_cache_zalloc(zdev_fmb_cache, GFP_KERNEL); 198 if (!zdev->fmb) 199 return -ENOMEM; 200 WARN_ON((u64) zdev->fmb & 0xf); 201 202 /* reset software counters */ 203 atomic64_set(&zdev->allocated_pages, 0); 204 atomic64_set(&zdev->mapped_pages, 0); 205 atomic64_set(&zdev->unmapped_pages, 0); 206 207 fib.fmb_addr = virt_to_phys(zdev->fmb); 208 cc = zpci_mod_fc(req, &fib, &status); 209 if (cc) { 210 kmem_cache_free(zdev_fmb_cache, zdev->fmb); 211 zdev->fmb = NULL; 212 } 213 return cc ? -EIO : 0; 214 } 215 216 /* Modify PCI: Disable PCI function measurement */ 217 int zpci_fmb_disable_device(struct zpci_dev *zdev) 218 { 219 u64 req = ZPCI_CREATE_REQ(zdev->fh, 0, ZPCI_MOD_FC_SET_MEASURE); 220 struct zpci_fib fib = {0}; 221 u8 cc, status; 222 223 if (!zdev->fmb) 224 return -EINVAL; 225 226 /* Function measurement is disabled if fmb address is zero */ 227 cc = zpci_mod_fc(req, &fib, &status); 228 if (cc == 3) /* Function already gone. */ 229 cc = 0; 230 231 if (!cc) { 232 kmem_cache_free(zdev_fmb_cache, zdev->fmb); 233 zdev->fmb = NULL; 234 } 235 return cc ? -EIO : 0; 236 } 237 238 static int zpci_cfg_load(struct zpci_dev *zdev, int offset, u32 *val, u8 len) 239 { 240 u64 req = ZPCI_CREATE_REQ(zdev->fh, ZPCI_PCIAS_CFGSPC, len); 241 u64 data; 242 int rc; 243 244 rc = zpci_load(&data, req, offset); 245 if (!rc) { 246 data = le64_to_cpu((__force __le64) data); 247 data >>= (8 - len) * 8; 248 *val = (u32) data; 249 } else 250 *val = 0xffffffff; 251 return rc; 252 } 253 254 static int zpci_cfg_store(struct zpci_dev *zdev, int offset, u32 val, u8 len) 255 { 256 u64 req = ZPCI_CREATE_REQ(zdev->fh, ZPCI_PCIAS_CFGSPC, len); 257 u64 data = val; 258 int rc; 259 260 data <<= (8 - len) * 8; 261 data = (__force u64) cpu_to_le64(data); 262 rc = zpci_store(data, req, offset); 263 return rc; 264 } 265 266 resource_size_t pcibios_align_resource(void *data, const struct resource *res, 267 resource_size_t size, 268 resource_size_t align) 269 { 270 return 0; 271 } 272 273 /* combine single writes by using store-block insn */ 274 void __iowrite64_copy(void __iomem *to, const void *from, size_t count) 275 { 276 zpci_memcpy_toio(to, from, count); 277 } 278 279 /* Create a virtual mapping cookie for a PCI BAR */ 280 void __iomem *pci_iomap_range(struct pci_dev *pdev, 281 int bar, 282 unsigned long offset, 283 unsigned long max) 284 { 285 struct zpci_dev *zdev = to_zpci(pdev); 286 int idx; 287 288 if (!pci_resource_len(pdev, bar)) 289 return NULL; 290 291 idx = zdev->bars[bar].map_idx; 292 spin_lock(&zpci_iomap_lock); 293 /* Detect overrun */ 294 WARN_ON(!++zpci_iomap_start[idx].count); 295 zpci_iomap_start[idx].fh = zdev->fh; 296 zpci_iomap_start[idx].bar = bar; 297 spin_unlock(&zpci_iomap_lock); 298 299 return (void __iomem *) ZPCI_ADDR(idx) + offset; 300 } 301 EXPORT_SYMBOL(pci_iomap_range); 302 303 void __iomem *pci_iomap(struct pci_dev *dev, int bar, unsigned long maxlen) 304 { 305 return pci_iomap_range(dev, bar, 0, maxlen); 306 } 307 EXPORT_SYMBOL(pci_iomap); 308 309 void pci_iounmap(struct pci_dev *pdev, void __iomem *addr) 310 { 311 unsigned int idx = ZPCI_IDX(addr); 312 313 spin_lock(&zpci_iomap_lock); 314 /* Detect underrun */ 315 WARN_ON(!zpci_iomap_start[idx].count); 316 if (!--zpci_iomap_start[idx].count) { 317 zpci_iomap_start[idx].fh = 0; 318 zpci_iomap_start[idx].bar = 0; 319 } 320 spin_unlock(&zpci_iomap_lock); 321 } 322 EXPORT_SYMBOL(pci_iounmap); 323 324 static int pci_read(struct pci_bus *bus, unsigned int devfn, int where, 325 int size, u32 *val) 326 { 327 struct zpci_dev *zdev = get_zdev_by_bus(bus); 328 int ret; 329 330 if (!zdev || devfn != ZPCI_DEVFN) 331 ret = -ENODEV; 332 else 333 ret = zpci_cfg_load(zdev, where, val, size); 334 335 return ret; 336 } 337 338 static int pci_write(struct pci_bus *bus, unsigned int devfn, int where, 339 int size, u32 val) 340 { 341 struct zpci_dev *zdev = get_zdev_by_bus(bus); 342 int ret; 343 344 if (!zdev || devfn != ZPCI_DEVFN) 345 ret = -ENODEV; 346 else 347 ret = zpci_cfg_store(zdev, where, val, size); 348 349 return ret; 350 } 351 352 static struct pci_ops pci_root_ops = { 353 .read = pci_read, 354 .write = pci_write, 355 }; 356 357 static void zpci_irq_handler(struct airq_struct *airq) 358 { 359 unsigned long si, ai; 360 struct airq_iv *aibv; 361 int irqs_on = 0; 362 363 inc_irq_stat(IRQIO_PCI); 364 for (si = 0;;) { 365 /* Scan adapter summary indicator bit vector */ 366 si = airq_iv_scan(zpci_aisb_iv, si, airq_iv_end(zpci_aisb_iv)); 367 if (si == -1UL) { 368 if (irqs_on++) 369 /* End of second scan with interrupts on. */ 370 break; 371 /* First scan complete, reenable interrupts. */ 372 if (zpci_set_irq_ctrl(SIC_IRQ_MODE_SINGLE, NULL, PCI_ISC)) 373 break; 374 si = 0; 375 continue; 376 } 377 378 /* Scan the adapter interrupt vector for this device. */ 379 aibv = zpci_aibv[si]; 380 for (ai = 0;;) { 381 ai = airq_iv_scan(aibv, ai, airq_iv_end(aibv)); 382 if (ai == -1UL) 383 break; 384 inc_irq_stat(IRQIO_MSI); 385 generic_handle_irq(airq_iv_get_data(aibv, ai)); 386 } 387 } 388 } 389 390 int arch_setup_msi_irqs(struct pci_dev *pdev, int nvec, int type) 391 { 392 struct zpci_dev *zdev = to_zpci(pdev); 393 unsigned int hwirq, msi_vecs; 394 unsigned long aisb; 395 struct msi_desc *msi; 396 struct msi_msg msg; 397 int rc, irq; 398 399 zdev->aisb = -1UL; 400 if (type == PCI_CAP_ID_MSI && nvec > 1) 401 return 1; 402 msi_vecs = min_t(unsigned int, nvec, zdev->max_msi); 403 404 /* Allocate adapter summary indicator bit */ 405 aisb = airq_iv_alloc_bit(zpci_aisb_iv); 406 if (aisb == -1UL) 407 return -EIO; 408 zdev->aisb = aisb; 409 410 /* Create adapter interrupt vector */ 411 zdev->aibv = airq_iv_create(msi_vecs, AIRQ_IV_DATA); 412 if (!zdev->aibv) 413 return -ENOMEM; 414 415 /* Wire up shortcut pointer */ 416 zpci_aibv[aisb] = zdev->aibv; 417 418 /* Request MSI interrupts */ 419 hwirq = 0; 420 for_each_pci_msi_entry(msi, pdev) { 421 if (hwirq >= msi_vecs) 422 break; 423 irq = irq_alloc_desc(0); /* Alloc irq on node 0 */ 424 if (irq < 0) 425 return -ENOMEM; 426 rc = irq_set_msi_desc(irq, msi); 427 if (rc) 428 return rc; 429 irq_set_chip_and_handler(irq, &zpci_irq_chip, 430 handle_simple_irq); 431 msg.data = hwirq; 432 msg.address_lo = zdev->msi_addr & 0xffffffff; 433 msg.address_hi = zdev->msi_addr >> 32; 434 pci_write_msi_msg(irq, &msg); 435 airq_iv_set_data(zdev->aibv, hwirq, irq); 436 hwirq++; 437 } 438 439 /* Enable adapter interrupts */ 440 rc = zpci_set_airq(zdev); 441 if (rc) 442 return rc; 443 444 return (msi_vecs == nvec) ? 0 : msi_vecs; 445 } 446 447 void arch_teardown_msi_irqs(struct pci_dev *pdev) 448 { 449 struct zpci_dev *zdev = to_zpci(pdev); 450 struct msi_desc *msi; 451 int rc; 452 453 /* Disable adapter interrupts */ 454 rc = zpci_clear_airq(zdev); 455 if (rc) 456 return; 457 458 /* Release MSI interrupts */ 459 for_each_pci_msi_entry(msi, pdev) { 460 if (!msi->irq) 461 continue; 462 if (msi->msi_attrib.is_msix) 463 __pci_msix_desc_mask_irq(msi, 1); 464 else 465 __pci_msi_desc_mask_irq(msi, 1, 1); 466 irq_set_msi_desc(msi->irq, NULL); 467 irq_free_desc(msi->irq); 468 msi->msg.address_lo = 0; 469 msi->msg.address_hi = 0; 470 msi->msg.data = 0; 471 msi->irq = 0; 472 } 473 474 if (zdev->aisb != -1UL) { 475 zpci_aibv[zdev->aisb] = NULL; 476 airq_iv_free_bit(zpci_aisb_iv, zdev->aisb); 477 zdev->aisb = -1UL; 478 } 479 if (zdev->aibv) { 480 airq_iv_release(zdev->aibv); 481 zdev->aibv = NULL; 482 } 483 } 484 485 static void zpci_map_resources(struct pci_dev *pdev) 486 { 487 resource_size_t len; 488 int i; 489 490 for (i = 0; i < PCI_BAR_COUNT; i++) { 491 len = pci_resource_len(pdev, i); 492 if (!len) 493 continue; 494 pdev->resource[i].start = 495 (resource_size_t __force) pci_iomap(pdev, i, 0); 496 pdev->resource[i].end = pdev->resource[i].start + len - 1; 497 } 498 } 499 500 static void zpci_unmap_resources(struct pci_dev *pdev) 501 { 502 resource_size_t len; 503 int i; 504 505 for (i = 0; i < PCI_BAR_COUNT; i++) { 506 len = pci_resource_len(pdev, i); 507 if (!len) 508 continue; 509 pci_iounmap(pdev, (void __iomem __force *) 510 pdev->resource[i].start); 511 } 512 } 513 514 static struct airq_struct zpci_airq = { 515 .handler = zpci_irq_handler, 516 .isc = PCI_ISC, 517 }; 518 519 static int __init zpci_irq_init(void) 520 { 521 int rc; 522 523 rc = register_adapter_interrupt(&zpci_airq); 524 if (rc) 525 goto out; 526 /* Set summary to 1 to be called every time for the ISC. */ 527 *zpci_airq.lsi_ptr = 1; 528 529 rc = -ENOMEM; 530 zpci_aisb_iv = airq_iv_create(ZPCI_NR_DEVICES, AIRQ_IV_ALLOC); 531 if (!zpci_aisb_iv) 532 goto out_airq; 533 534 zpci_set_irq_ctrl(SIC_IRQ_MODE_SINGLE, NULL, PCI_ISC); 535 return 0; 536 537 out_airq: 538 unregister_adapter_interrupt(&zpci_airq); 539 out: 540 return rc; 541 } 542 543 static void zpci_irq_exit(void) 544 { 545 airq_iv_release(zpci_aisb_iv); 546 unregister_adapter_interrupt(&zpci_airq); 547 } 548 549 static int zpci_alloc_iomap(struct zpci_dev *zdev) 550 { 551 unsigned long entry; 552 553 spin_lock(&zpci_iomap_lock); 554 entry = find_first_zero_bit(zpci_iomap_bitmap, ZPCI_IOMAP_ENTRIES); 555 if (entry == ZPCI_IOMAP_ENTRIES) { 556 spin_unlock(&zpci_iomap_lock); 557 return -ENOSPC; 558 } 559 set_bit(entry, zpci_iomap_bitmap); 560 spin_unlock(&zpci_iomap_lock); 561 return entry; 562 } 563 564 static void zpci_free_iomap(struct zpci_dev *zdev, int entry) 565 { 566 spin_lock(&zpci_iomap_lock); 567 memset(&zpci_iomap_start[entry], 0, sizeof(struct zpci_iomap_entry)); 568 clear_bit(entry, zpci_iomap_bitmap); 569 spin_unlock(&zpci_iomap_lock); 570 } 571 572 static struct resource *__alloc_res(struct zpci_dev *zdev, unsigned long start, 573 unsigned long size, unsigned long flags) 574 { 575 struct resource *r; 576 577 r = kzalloc(sizeof(*r), GFP_KERNEL); 578 if (!r) 579 return NULL; 580 581 r->start = start; 582 r->end = r->start + size - 1; 583 r->flags = flags; 584 r->name = zdev->res_name; 585 586 if (request_resource(&iomem_resource, r)) { 587 kfree(r); 588 return NULL; 589 } 590 return r; 591 } 592 593 static int zpci_setup_bus_resources(struct zpci_dev *zdev, 594 struct list_head *resources) 595 { 596 unsigned long addr, size, flags; 597 struct resource *res; 598 int i, entry; 599 600 snprintf(zdev->res_name, sizeof(zdev->res_name), 601 "PCI Bus %04x:%02x", zdev->domain, ZPCI_BUS_NR); 602 603 for (i = 0; i < PCI_BAR_COUNT; i++) { 604 if (!zdev->bars[i].size) 605 continue; 606 entry = zpci_alloc_iomap(zdev); 607 if (entry < 0) 608 return entry; 609 zdev->bars[i].map_idx = entry; 610 611 /* only MMIO is supported */ 612 flags = IORESOURCE_MEM; 613 if (zdev->bars[i].val & 8) 614 flags |= IORESOURCE_PREFETCH; 615 if (zdev->bars[i].val & 4) 616 flags |= IORESOURCE_MEM_64; 617 618 addr = ZPCI_ADDR(entry); 619 size = 1UL << zdev->bars[i].size; 620 621 res = __alloc_res(zdev, addr, size, flags); 622 if (!res) { 623 zpci_free_iomap(zdev, entry); 624 return -ENOMEM; 625 } 626 zdev->bars[i].res = res; 627 pci_add_resource(resources, res); 628 } 629 630 return 0; 631 } 632 633 static void zpci_cleanup_bus_resources(struct zpci_dev *zdev) 634 { 635 int i; 636 637 for (i = 0; i < PCI_BAR_COUNT; i++) { 638 if (!zdev->bars[i].size || !zdev->bars[i].res) 639 continue; 640 641 zpci_free_iomap(zdev, zdev->bars[i].map_idx); 642 release_resource(zdev->bars[i].res); 643 kfree(zdev->bars[i].res); 644 } 645 } 646 647 int pcibios_add_device(struct pci_dev *pdev) 648 { 649 struct resource *res; 650 int i; 651 652 if (pdev->is_physfn) 653 pdev->no_vf_scan = 1; 654 655 pdev->dev.groups = zpci_attr_groups; 656 pdev->dev.dma_ops = &s390_pci_dma_ops; 657 zpci_map_resources(pdev); 658 659 for (i = 0; i < PCI_BAR_COUNT; i++) { 660 res = &pdev->resource[i]; 661 if (res->parent || !res->flags) 662 continue; 663 pci_claim_resource(pdev, i); 664 } 665 666 return 0; 667 } 668 669 void pcibios_release_device(struct pci_dev *pdev) 670 { 671 zpci_unmap_resources(pdev); 672 } 673 674 int pcibios_enable_device(struct pci_dev *pdev, int mask) 675 { 676 struct zpci_dev *zdev = to_zpci(pdev); 677 678 zpci_debug_init_device(zdev, dev_name(&pdev->dev)); 679 zpci_fmb_enable_device(zdev); 680 681 return pci_enable_resources(pdev, mask); 682 } 683 684 void pcibios_disable_device(struct pci_dev *pdev) 685 { 686 struct zpci_dev *zdev = to_zpci(pdev); 687 688 zpci_fmb_disable_device(zdev); 689 zpci_debug_exit_device(zdev); 690 } 691 692 #ifdef CONFIG_HIBERNATE_CALLBACKS 693 static int zpci_restore(struct device *dev) 694 { 695 struct pci_dev *pdev = to_pci_dev(dev); 696 struct zpci_dev *zdev = to_zpci(pdev); 697 int ret = 0; 698 699 if (zdev->state != ZPCI_FN_STATE_ONLINE) 700 goto out; 701 702 ret = clp_enable_fh(zdev, ZPCI_NR_DMA_SPACES); 703 if (ret) 704 goto out; 705 706 zpci_map_resources(pdev); 707 zpci_register_ioat(zdev, 0, zdev->start_dma, zdev->end_dma, 708 (u64) zdev->dma_table); 709 710 out: 711 return ret; 712 } 713 714 static int zpci_freeze(struct device *dev) 715 { 716 struct pci_dev *pdev = to_pci_dev(dev); 717 struct zpci_dev *zdev = to_zpci(pdev); 718 719 if (zdev->state != ZPCI_FN_STATE_ONLINE) 720 return 0; 721 722 zpci_unregister_ioat(zdev, 0); 723 zpci_unmap_resources(pdev); 724 return clp_disable_fh(zdev); 725 } 726 727 struct dev_pm_ops pcibios_pm_ops = { 728 .thaw_noirq = zpci_restore, 729 .freeze_noirq = zpci_freeze, 730 .restore_noirq = zpci_restore, 731 .poweroff_noirq = zpci_freeze, 732 }; 733 #endif /* CONFIG_HIBERNATE_CALLBACKS */ 734 735 static int zpci_alloc_domain(struct zpci_dev *zdev) 736 { 737 if (zpci_unique_uid) { 738 zdev->domain = (u16) zdev->uid; 739 if (zdev->domain >= ZPCI_NR_DEVICES) 740 return 0; 741 742 spin_lock(&zpci_domain_lock); 743 if (test_bit(zdev->domain, zpci_domain)) { 744 spin_unlock(&zpci_domain_lock); 745 return -EEXIST; 746 } 747 set_bit(zdev->domain, zpci_domain); 748 spin_unlock(&zpci_domain_lock); 749 return 0; 750 } 751 752 spin_lock(&zpci_domain_lock); 753 zdev->domain = find_first_zero_bit(zpci_domain, ZPCI_NR_DEVICES); 754 if (zdev->domain == ZPCI_NR_DEVICES) { 755 spin_unlock(&zpci_domain_lock); 756 return -ENOSPC; 757 } 758 set_bit(zdev->domain, zpci_domain); 759 spin_unlock(&zpci_domain_lock); 760 return 0; 761 } 762 763 static void zpci_free_domain(struct zpci_dev *zdev) 764 { 765 if (zdev->domain >= ZPCI_NR_DEVICES) 766 return; 767 768 spin_lock(&zpci_domain_lock); 769 clear_bit(zdev->domain, zpci_domain); 770 spin_unlock(&zpci_domain_lock); 771 } 772 773 void pcibios_remove_bus(struct pci_bus *bus) 774 { 775 struct zpci_dev *zdev = get_zdev_by_bus(bus); 776 777 zpci_exit_slot(zdev); 778 zpci_cleanup_bus_resources(zdev); 779 zpci_destroy_iommu(zdev); 780 zpci_free_domain(zdev); 781 782 spin_lock(&zpci_list_lock); 783 list_del(&zdev->entry); 784 spin_unlock(&zpci_list_lock); 785 786 zpci_dbg(3, "rem fid:%x\n", zdev->fid); 787 kfree(zdev); 788 } 789 790 static int zpci_scan_bus(struct zpci_dev *zdev) 791 { 792 LIST_HEAD(resources); 793 int ret; 794 795 ret = zpci_setup_bus_resources(zdev, &resources); 796 if (ret) 797 goto error; 798 799 zdev->bus = pci_scan_root_bus(NULL, ZPCI_BUS_NR, &pci_root_ops, 800 zdev, &resources); 801 if (!zdev->bus) { 802 ret = -EIO; 803 goto error; 804 } 805 zdev->bus->max_bus_speed = zdev->max_bus_speed; 806 pci_bus_add_devices(zdev->bus); 807 return 0; 808 809 error: 810 zpci_cleanup_bus_resources(zdev); 811 pci_free_resource_list(&resources); 812 return ret; 813 } 814 815 int zpci_enable_device(struct zpci_dev *zdev) 816 { 817 int rc; 818 819 rc = clp_enable_fh(zdev, ZPCI_NR_DMA_SPACES); 820 if (rc) 821 goto out; 822 823 rc = zpci_dma_init_device(zdev); 824 if (rc) 825 goto out_dma; 826 827 zdev->state = ZPCI_FN_STATE_ONLINE; 828 return 0; 829 830 out_dma: 831 clp_disable_fh(zdev); 832 out: 833 return rc; 834 } 835 EXPORT_SYMBOL_GPL(zpci_enable_device); 836 837 int zpci_disable_device(struct zpci_dev *zdev) 838 { 839 zpci_dma_exit_device(zdev); 840 return clp_disable_fh(zdev); 841 } 842 EXPORT_SYMBOL_GPL(zpci_disable_device); 843 844 int zpci_create_device(struct zpci_dev *zdev) 845 { 846 int rc; 847 848 rc = zpci_alloc_domain(zdev); 849 if (rc) 850 goto out; 851 852 rc = zpci_init_iommu(zdev); 853 if (rc) 854 goto out_free; 855 856 mutex_init(&zdev->lock); 857 if (zdev->state == ZPCI_FN_STATE_CONFIGURED) { 858 rc = zpci_enable_device(zdev); 859 if (rc) 860 goto out_destroy_iommu; 861 } 862 rc = zpci_scan_bus(zdev); 863 if (rc) 864 goto out_disable; 865 866 spin_lock(&zpci_list_lock); 867 list_add_tail(&zdev->entry, &zpci_list); 868 spin_unlock(&zpci_list_lock); 869 870 zpci_init_slot(zdev); 871 872 return 0; 873 874 out_disable: 875 if (zdev->state == ZPCI_FN_STATE_ONLINE) 876 zpci_disable_device(zdev); 877 out_destroy_iommu: 878 zpci_destroy_iommu(zdev); 879 out_free: 880 zpci_free_domain(zdev); 881 out: 882 return rc; 883 } 884 885 void zpci_remove_device(struct zpci_dev *zdev) 886 { 887 if (!zdev->bus) 888 return; 889 890 pci_stop_root_bus(zdev->bus); 891 pci_remove_root_bus(zdev->bus); 892 } 893 894 int zpci_report_error(struct pci_dev *pdev, 895 struct zpci_report_error_header *report) 896 { 897 struct zpci_dev *zdev = to_zpci(pdev); 898 899 return sclp_pci_report(report, zdev->fh, zdev->fid); 900 } 901 EXPORT_SYMBOL(zpci_report_error); 902 903 static int zpci_mem_init(void) 904 { 905 BUILD_BUG_ON(!is_power_of_2(__alignof__(struct zpci_fmb)) || 906 __alignof__(struct zpci_fmb) < sizeof(struct zpci_fmb)); 907 908 zdev_fmb_cache = kmem_cache_create("PCI_FMB_cache", sizeof(struct zpci_fmb), 909 __alignof__(struct zpci_fmb), 0, NULL); 910 if (!zdev_fmb_cache) 911 goto error_fmb; 912 913 zpci_iomap_start = kcalloc(ZPCI_IOMAP_ENTRIES, 914 sizeof(*zpci_iomap_start), GFP_KERNEL); 915 if (!zpci_iomap_start) 916 goto error_iomap; 917 918 zpci_iomap_bitmap = kcalloc(BITS_TO_LONGS(ZPCI_IOMAP_ENTRIES), 919 sizeof(*zpci_iomap_bitmap), GFP_KERNEL); 920 if (!zpci_iomap_bitmap) 921 goto error_iomap_bitmap; 922 923 return 0; 924 error_iomap_bitmap: 925 kfree(zpci_iomap_start); 926 error_iomap: 927 kmem_cache_destroy(zdev_fmb_cache); 928 error_fmb: 929 return -ENOMEM; 930 } 931 932 static void zpci_mem_exit(void) 933 { 934 kfree(zpci_iomap_bitmap); 935 kfree(zpci_iomap_start); 936 kmem_cache_destroy(zdev_fmb_cache); 937 } 938 939 static unsigned int s390_pci_probe = 1; 940 static unsigned int s390_pci_initialized; 941 942 char * __init pcibios_setup(char *str) 943 { 944 if (!strcmp(str, "off")) { 945 s390_pci_probe = 0; 946 return NULL; 947 } 948 return str; 949 } 950 951 bool zpci_is_enabled(void) 952 { 953 return s390_pci_initialized; 954 } 955 956 static int __init pci_base_init(void) 957 { 958 int rc; 959 960 if (!s390_pci_probe) 961 return 0; 962 963 if (!test_facility(69) || !test_facility(71)) 964 return 0; 965 966 rc = zpci_debug_init(); 967 if (rc) 968 goto out; 969 970 rc = zpci_mem_init(); 971 if (rc) 972 goto out_mem; 973 974 rc = zpci_irq_init(); 975 if (rc) 976 goto out_irq; 977 978 rc = zpci_dma_init(); 979 if (rc) 980 goto out_dma; 981 982 rc = clp_scan_pci_devices(); 983 if (rc) 984 goto out_find; 985 986 s390_pci_initialized = 1; 987 return 0; 988 989 out_find: 990 zpci_dma_exit(); 991 out_dma: 992 zpci_irq_exit(); 993 out_irq: 994 zpci_mem_exit(); 995 out_mem: 996 zpci_debug_exit(); 997 out: 998 return rc; 999 } 1000 subsys_initcall_sync(pci_base_init); 1001 1002 void zpci_rescan(void) 1003 { 1004 if (zpci_is_enabled()) 1005 clp_rescan_pci_devices_simple(); 1006 } 1007