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 airq_iv_lock(aibv, ai); 386 generic_handle_irq(airq_iv_get_data(aibv, ai)); 387 airq_iv_unlock(aibv, ai); 388 } 389 } 390 } 391 392 int arch_setup_msi_irqs(struct pci_dev *pdev, int nvec, int type) 393 { 394 struct zpci_dev *zdev = to_zpci(pdev); 395 unsigned int hwirq, msi_vecs; 396 unsigned long aisb; 397 struct msi_desc *msi; 398 struct msi_msg msg; 399 int rc, irq; 400 401 zdev->aisb = -1UL; 402 if (type == PCI_CAP_ID_MSI && nvec > 1) 403 return 1; 404 msi_vecs = min_t(unsigned int, nvec, zdev->max_msi); 405 406 /* Allocate adapter summary indicator bit */ 407 aisb = airq_iv_alloc_bit(zpci_aisb_iv); 408 if (aisb == -1UL) 409 return -EIO; 410 zdev->aisb = aisb; 411 412 /* Create adapter interrupt vector */ 413 zdev->aibv = airq_iv_create(msi_vecs, AIRQ_IV_DATA | AIRQ_IV_BITLOCK); 414 if (!zdev->aibv) 415 return -ENOMEM; 416 417 /* Wire up shortcut pointer */ 418 zpci_aibv[aisb] = zdev->aibv; 419 420 /* Request MSI interrupts */ 421 hwirq = 0; 422 for_each_pci_msi_entry(msi, pdev) { 423 rc = -EIO; 424 irq = irq_alloc_desc(0); /* Alloc irq on node 0 */ 425 if (irq < 0) 426 return -ENOMEM; 427 rc = irq_set_msi_desc(irq, msi); 428 if (rc) 429 return rc; 430 irq_set_chip_and_handler(irq, &zpci_irq_chip, 431 handle_simple_irq); 432 msg.data = hwirq; 433 msg.address_lo = zdev->msi_addr & 0xffffffff; 434 msg.address_hi = zdev->msi_addr >> 32; 435 pci_write_msi_msg(irq, &msg); 436 airq_iv_set_data(zdev->aibv, hwirq, irq); 437 hwirq++; 438 } 439 440 /* Enable adapter interrupts */ 441 rc = zpci_set_airq(zdev); 442 if (rc) 443 return rc; 444 445 return (msi_vecs == nvec) ? 0 : msi_vecs; 446 } 447 448 void arch_teardown_msi_irqs(struct pci_dev *pdev) 449 { 450 struct zpci_dev *zdev = to_zpci(pdev); 451 struct msi_desc *msi; 452 int rc; 453 454 /* Disable adapter interrupts */ 455 rc = zpci_clear_airq(zdev); 456 if (rc) 457 return; 458 459 /* Release MSI interrupts */ 460 for_each_pci_msi_entry(msi, pdev) { 461 if (!msi->irq) 462 continue; 463 if (msi->msi_attrib.is_msix) 464 __pci_msix_desc_mask_irq(msi, 1); 465 else 466 __pci_msi_desc_mask_irq(msi, 1, 1); 467 irq_set_msi_desc(msi->irq, NULL); 468 irq_free_desc(msi->irq); 469 msi->msg.address_lo = 0; 470 msi->msg.address_hi = 0; 471 msi->msg.data = 0; 472 msi->irq = 0; 473 } 474 475 if (zdev->aisb != -1UL) { 476 zpci_aibv[zdev->aisb] = NULL; 477 airq_iv_free_bit(zpci_aisb_iv, zdev->aisb); 478 zdev->aisb = -1UL; 479 } 480 if (zdev->aibv) { 481 airq_iv_release(zdev->aibv); 482 zdev->aibv = NULL; 483 } 484 } 485 486 static void zpci_map_resources(struct pci_dev *pdev) 487 { 488 resource_size_t len; 489 int i; 490 491 for (i = 0; i < PCI_BAR_COUNT; i++) { 492 len = pci_resource_len(pdev, i); 493 if (!len) 494 continue; 495 pdev->resource[i].start = 496 (resource_size_t __force) pci_iomap(pdev, i, 0); 497 pdev->resource[i].end = pdev->resource[i].start + len - 1; 498 } 499 } 500 501 static void zpci_unmap_resources(struct pci_dev *pdev) 502 { 503 resource_size_t len; 504 int i; 505 506 for (i = 0; i < PCI_BAR_COUNT; i++) { 507 len = pci_resource_len(pdev, i); 508 if (!len) 509 continue; 510 pci_iounmap(pdev, (void __iomem __force *) 511 pdev->resource[i].start); 512 } 513 } 514 515 static struct airq_struct zpci_airq = { 516 .handler = zpci_irq_handler, 517 .isc = PCI_ISC, 518 }; 519 520 static int __init zpci_irq_init(void) 521 { 522 int rc; 523 524 rc = register_adapter_interrupt(&zpci_airq); 525 if (rc) 526 goto out; 527 /* Set summary to 1 to be called every time for the ISC. */ 528 *zpci_airq.lsi_ptr = 1; 529 530 rc = -ENOMEM; 531 zpci_aisb_iv = airq_iv_create(ZPCI_NR_DEVICES, AIRQ_IV_ALLOC); 532 if (!zpci_aisb_iv) 533 goto out_airq; 534 535 zpci_set_irq_ctrl(SIC_IRQ_MODE_SINGLE, NULL, PCI_ISC); 536 return 0; 537 538 out_airq: 539 unregister_adapter_interrupt(&zpci_airq); 540 out: 541 return rc; 542 } 543 544 static void zpci_irq_exit(void) 545 { 546 airq_iv_release(zpci_aisb_iv); 547 unregister_adapter_interrupt(&zpci_airq); 548 } 549 550 static int zpci_alloc_iomap(struct zpci_dev *zdev) 551 { 552 unsigned long entry; 553 554 spin_lock(&zpci_iomap_lock); 555 entry = find_first_zero_bit(zpci_iomap_bitmap, ZPCI_IOMAP_ENTRIES); 556 if (entry == ZPCI_IOMAP_ENTRIES) { 557 spin_unlock(&zpci_iomap_lock); 558 return -ENOSPC; 559 } 560 set_bit(entry, zpci_iomap_bitmap); 561 spin_unlock(&zpci_iomap_lock); 562 return entry; 563 } 564 565 static void zpci_free_iomap(struct zpci_dev *zdev, int entry) 566 { 567 spin_lock(&zpci_iomap_lock); 568 memset(&zpci_iomap_start[entry], 0, sizeof(struct zpci_iomap_entry)); 569 clear_bit(entry, zpci_iomap_bitmap); 570 spin_unlock(&zpci_iomap_lock); 571 } 572 573 static struct resource *__alloc_res(struct zpci_dev *zdev, unsigned long start, 574 unsigned long size, unsigned long flags) 575 { 576 struct resource *r; 577 578 r = kzalloc(sizeof(*r), GFP_KERNEL); 579 if (!r) 580 return NULL; 581 582 r->start = start; 583 r->end = r->start + size - 1; 584 r->flags = flags; 585 r->name = zdev->res_name; 586 587 if (request_resource(&iomem_resource, r)) { 588 kfree(r); 589 return NULL; 590 } 591 return r; 592 } 593 594 static int zpci_setup_bus_resources(struct zpci_dev *zdev, 595 struct list_head *resources) 596 { 597 unsigned long addr, size, flags; 598 struct resource *res; 599 int i, entry; 600 601 snprintf(zdev->res_name, sizeof(zdev->res_name), 602 "PCI Bus %04x:%02x", zdev->domain, ZPCI_BUS_NR); 603 604 for (i = 0; i < PCI_BAR_COUNT; i++) { 605 if (!zdev->bars[i].size) 606 continue; 607 entry = zpci_alloc_iomap(zdev); 608 if (entry < 0) 609 return entry; 610 zdev->bars[i].map_idx = entry; 611 612 /* only MMIO is supported */ 613 flags = IORESOURCE_MEM; 614 if (zdev->bars[i].val & 8) 615 flags |= IORESOURCE_PREFETCH; 616 if (zdev->bars[i].val & 4) 617 flags |= IORESOURCE_MEM_64; 618 619 addr = ZPCI_ADDR(entry); 620 size = 1UL << zdev->bars[i].size; 621 622 res = __alloc_res(zdev, addr, size, flags); 623 if (!res) { 624 zpci_free_iomap(zdev, entry); 625 return -ENOMEM; 626 } 627 zdev->bars[i].res = res; 628 pci_add_resource(resources, res); 629 } 630 631 return 0; 632 } 633 634 static void zpci_cleanup_bus_resources(struct zpci_dev *zdev) 635 { 636 int i; 637 638 for (i = 0; i < PCI_BAR_COUNT; i++) { 639 if (!zdev->bars[i].size || !zdev->bars[i].res) 640 continue; 641 642 zpci_free_iomap(zdev, zdev->bars[i].map_idx); 643 release_resource(zdev->bars[i].res); 644 kfree(zdev->bars[i].res); 645 } 646 } 647 648 int pcibios_add_device(struct pci_dev *pdev) 649 { 650 struct resource *res; 651 int i; 652 653 pdev->dev.groups = zpci_attr_groups; 654 pdev->dev.dma_ops = &s390_pci_dma_ops; 655 zpci_map_resources(pdev); 656 657 for (i = 0; i < PCI_BAR_COUNT; i++) { 658 res = &pdev->resource[i]; 659 if (res->parent || !res->flags) 660 continue; 661 pci_claim_resource(pdev, i); 662 } 663 664 return 0; 665 } 666 667 void pcibios_release_device(struct pci_dev *pdev) 668 { 669 zpci_unmap_resources(pdev); 670 } 671 672 int pcibios_enable_device(struct pci_dev *pdev, int mask) 673 { 674 struct zpci_dev *zdev = to_zpci(pdev); 675 676 zpci_debug_init_device(zdev, dev_name(&pdev->dev)); 677 zpci_fmb_enable_device(zdev); 678 679 return pci_enable_resources(pdev, mask); 680 } 681 682 void pcibios_disable_device(struct pci_dev *pdev) 683 { 684 struct zpci_dev *zdev = to_zpci(pdev); 685 686 zpci_fmb_disable_device(zdev); 687 zpci_debug_exit_device(zdev); 688 } 689 690 #ifdef CONFIG_HIBERNATE_CALLBACKS 691 static int zpci_restore(struct device *dev) 692 { 693 struct pci_dev *pdev = to_pci_dev(dev); 694 struct zpci_dev *zdev = to_zpci(pdev); 695 int ret = 0; 696 697 if (zdev->state != ZPCI_FN_STATE_ONLINE) 698 goto out; 699 700 ret = clp_enable_fh(zdev, ZPCI_NR_DMA_SPACES); 701 if (ret) 702 goto out; 703 704 zpci_map_resources(pdev); 705 zpci_register_ioat(zdev, 0, zdev->start_dma, zdev->end_dma, 706 (u64) zdev->dma_table); 707 708 out: 709 return ret; 710 } 711 712 static int zpci_freeze(struct device *dev) 713 { 714 struct pci_dev *pdev = to_pci_dev(dev); 715 struct zpci_dev *zdev = to_zpci(pdev); 716 717 if (zdev->state != ZPCI_FN_STATE_ONLINE) 718 return 0; 719 720 zpci_unregister_ioat(zdev, 0); 721 zpci_unmap_resources(pdev); 722 return clp_disable_fh(zdev); 723 } 724 725 struct dev_pm_ops pcibios_pm_ops = { 726 .thaw_noirq = zpci_restore, 727 .freeze_noirq = zpci_freeze, 728 .restore_noirq = zpci_restore, 729 .poweroff_noirq = zpci_freeze, 730 }; 731 #endif /* CONFIG_HIBERNATE_CALLBACKS */ 732 733 static int zpci_alloc_domain(struct zpci_dev *zdev) 734 { 735 if (zpci_unique_uid) { 736 zdev->domain = (u16) zdev->uid; 737 if (zdev->domain >= ZPCI_NR_DEVICES) 738 return 0; 739 740 spin_lock(&zpci_domain_lock); 741 if (test_bit(zdev->domain, zpci_domain)) { 742 spin_unlock(&zpci_domain_lock); 743 return -EEXIST; 744 } 745 set_bit(zdev->domain, zpci_domain); 746 spin_unlock(&zpci_domain_lock); 747 return 0; 748 } 749 750 spin_lock(&zpci_domain_lock); 751 zdev->domain = find_first_zero_bit(zpci_domain, ZPCI_NR_DEVICES); 752 if (zdev->domain == ZPCI_NR_DEVICES) { 753 spin_unlock(&zpci_domain_lock); 754 return -ENOSPC; 755 } 756 set_bit(zdev->domain, zpci_domain); 757 spin_unlock(&zpci_domain_lock); 758 return 0; 759 } 760 761 static void zpci_free_domain(struct zpci_dev *zdev) 762 { 763 if (zdev->domain >= ZPCI_NR_DEVICES) 764 return; 765 766 spin_lock(&zpci_domain_lock); 767 clear_bit(zdev->domain, zpci_domain); 768 spin_unlock(&zpci_domain_lock); 769 } 770 771 void pcibios_remove_bus(struct pci_bus *bus) 772 { 773 struct zpci_dev *zdev = get_zdev_by_bus(bus); 774 775 zpci_exit_slot(zdev); 776 zpci_cleanup_bus_resources(zdev); 777 zpci_destroy_iommu(zdev); 778 zpci_free_domain(zdev); 779 780 spin_lock(&zpci_list_lock); 781 list_del(&zdev->entry); 782 spin_unlock(&zpci_list_lock); 783 784 zpci_dbg(3, "rem fid:%x\n", zdev->fid); 785 kfree(zdev); 786 } 787 788 static int zpci_scan_bus(struct zpci_dev *zdev) 789 { 790 LIST_HEAD(resources); 791 int ret; 792 793 ret = zpci_setup_bus_resources(zdev, &resources); 794 if (ret) 795 goto error; 796 797 zdev->bus = pci_scan_root_bus(NULL, ZPCI_BUS_NR, &pci_root_ops, 798 zdev, &resources); 799 if (!zdev->bus) { 800 ret = -EIO; 801 goto error; 802 } 803 zdev->bus->max_bus_speed = zdev->max_bus_speed; 804 pci_bus_add_devices(zdev->bus); 805 return 0; 806 807 error: 808 zpci_cleanup_bus_resources(zdev); 809 pci_free_resource_list(&resources); 810 return ret; 811 } 812 813 int zpci_enable_device(struct zpci_dev *zdev) 814 { 815 int rc; 816 817 rc = clp_enable_fh(zdev, ZPCI_NR_DMA_SPACES); 818 if (rc) 819 goto out; 820 821 rc = zpci_dma_init_device(zdev); 822 if (rc) 823 goto out_dma; 824 825 zdev->state = ZPCI_FN_STATE_ONLINE; 826 return 0; 827 828 out_dma: 829 clp_disable_fh(zdev); 830 out: 831 return rc; 832 } 833 EXPORT_SYMBOL_GPL(zpci_enable_device); 834 835 int zpci_disable_device(struct zpci_dev *zdev) 836 { 837 zpci_dma_exit_device(zdev); 838 return clp_disable_fh(zdev); 839 } 840 EXPORT_SYMBOL_GPL(zpci_disable_device); 841 842 int zpci_create_device(struct zpci_dev *zdev) 843 { 844 int rc; 845 846 rc = zpci_alloc_domain(zdev); 847 if (rc) 848 goto out; 849 850 rc = zpci_init_iommu(zdev); 851 if (rc) 852 goto out_free; 853 854 mutex_init(&zdev->lock); 855 if (zdev->state == ZPCI_FN_STATE_CONFIGURED) { 856 rc = zpci_enable_device(zdev); 857 if (rc) 858 goto out_destroy_iommu; 859 } 860 rc = zpci_scan_bus(zdev); 861 if (rc) 862 goto out_disable; 863 864 spin_lock(&zpci_list_lock); 865 list_add_tail(&zdev->entry, &zpci_list); 866 spin_unlock(&zpci_list_lock); 867 868 zpci_init_slot(zdev); 869 870 return 0; 871 872 out_disable: 873 if (zdev->state == ZPCI_FN_STATE_ONLINE) 874 zpci_disable_device(zdev); 875 out_destroy_iommu: 876 zpci_destroy_iommu(zdev); 877 out_free: 878 zpci_free_domain(zdev); 879 out: 880 return rc; 881 } 882 883 void zpci_remove_device(struct zpci_dev *zdev) 884 { 885 if (!zdev->bus) 886 return; 887 888 pci_stop_root_bus(zdev->bus); 889 pci_remove_root_bus(zdev->bus); 890 } 891 892 int zpci_report_error(struct pci_dev *pdev, 893 struct zpci_report_error_header *report) 894 { 895 struct zpci_dev *zdev = to_zpci(pdev); 896 897 return sclp_pci_report(report, zdev->fh, zdev->fid); 898 } 899 EXPORT_SYMBOL(zpci_report_error); 900 901 static int zpci_mem_init(void) 902 { 903 BUILD_BUG_ON(!is_power_of_2(__alignof__(struct zpci_fmb)) || 904 __alignof__(struct zpci_fmb) < sizeof(struct zpci_fmb)); 905 906 zdev_fmb_cache = kmem_cache_create("PCI_FMB_cache", sizeof(struct zpci_fmb), 907 __alignof__(struct zpci_fmb), 0, NULL); 908 if (!zdev_fmb_cache) 909 goto error_fmb; 910 911 zpci_iomap_start = kcalloc(ZPCI_IOMAP_ENTRIES, 912 sizeof(*zpci_iomap_start), GFP_KERNEL); 913 if (!zpci_iomap_start) 914 goto error_iomap; 915 916 zpci_iomap_bitmap = kcalloc(BITS_TO_LONGS(ZPCI_IOMAP_ENTRIES), 917 sizeof(*zpci_iomap_bitmap), GFP_KERNEL); 918 if (!zpci_iomap_bitmap) 919 goto error_iomap_bitmap; 920 921 return 0; 922 error_iomap_bitmap: 923 kfree(zpci_iomap_start); 924 error_iomap: 925 kmem_cache_destroy(zdev_fmb_cache); 926 error_fmb: 927 return -ENOMEM; 928 } 929 930 static void zpci_mem_exit(void) 931 { 932 kfree(zpci_iomap_bitmap); 933 kfree(zpci_iomap_start); 934 kmem_cache_destroy(zdev_fmb_cache); 935 } 936 937 static unsigned int s390_pci_probe = 1; 938 static unsigned int s390_pci_initialized; 939 940 char * __init pcibios_setup(char *str) 941 { 942 if (!strcmp(str, "off")) { 943 s390_pci_probe = 0; 944 return NULL; 945 } 946 return str; 947 } 948 949 bool zpci_is_enabled(void) 950 { 951 return s390_pci_initialized; 952 } 953 954 static int __init pci_base_init(void) 955 { 956 int rc; 957 958 if (!s390_pci_probe) 959 return 0; 960 961 if (!test_facility(69) || !test_facility(71)) 962 return 0; 963 964 rc = zpci_debug_init(); 965 if (rc) 966 goto out; 967 968 rc = zpci_mem_init(); 969 if (rc) 970 goto out_mem; 971 972 rc = zpci_irq_init(); 973 if (rc) 974 goto out_irq; 975 976 rc = zpci_dma_init(); 977 if (rc) 978 goto out_dma; 979 980 rc = clp_scan_pci_devices(); 981 if (rc) 982 goto out_find; 983 984 s390_pci_initialized = 1; 985 return 0; 986 987 out_find: 988 zpci_dma_exit(); 989 out_dma: 990 zpci_irq_exit(); 991 out_irq: 992 zpci_mem_exit(); 993 out_mem: 994 zpci_debug_exit(); 995 out: 996 return rc; 997 } 998 subsys_initcall_sync(pci_base_init); 999 1000 void zpci_rescan(void) 1001 { 1002 if (zpci_is_enabled()) 1003 clp_rescan_pci_devices_simple(); 1004 } 1005