/* * File: portdrv_core.c * Purpose: PCI Express Port Bus Driver's Core Functions * * Copyright (C) 2004 Intel * Copyright (C) Tom Long Nguyen (tom.l.nguyen@intel.com) */ #include #include #include #include #include #include #include #include #include #include #ifdef CONFIG_NETAPP_HWDD /* * Once we have a platform file in place * we should not include aer header files */ #include #endif #include "../pci.h" #include "portdrv.h" #ifdef CONFIG_NETAPP_HWDD /* TODO: These kind of routines should be in platform specific file */ static int is_device_pattsburg(struct pci_dev *dev) { if (dev->vendor != 0x8086) return 0; switch (dev->device) { case DEV_PBURG: case DEV_PBURG_P1A: case DEV_PBURG_P1B: case DEV_PBURG_P2A: case DEV_PBURG_P2B: case DEV_PBURG_P3A: case DEV_PBURG_P3B: case DEV_PBURG_P4A: case DEV_PBURG_P4B: case DEV_PBURG_P5A: case DEV_PBURG_P5B: case DEV_PBURG_P6A: case DEV_PBURG_P6B: case DEV_PBURG_P7A: case DEV_PBURG_P7B: case DEV_PBURG_P8A: case DEV_PBURG_P8B: return 1; } return 0; } /* * It is seen that some of the root ports do not * support all the registers called out by PCIe for * advanced error reporting support. For such root * ports, that do have error status registers, we * will advertise AER capability and will handle * them as special cases within the AER driver. */ static int pci_device_special_root(struct pci_dev *dev) { int ret; ret = is_device_pattsburg(dev); return ret; } #endif /** * release_pcie_device - free PCI Express port service device structure * @dev: Port service device to release * * Invoked automatically when device is being removed in response to * device_unregister(dev). Release all resources being claimed. */ static void release_pcie_device(struct device *dev) { kfree(to_pcie_device(dev)); } /** * pcie_port_msix_add_entry - add entry to given array of MSI-X entries * @entries: Array of MSI-X entries * @new_entry: Index of the entry to add to the array * @nr_entries: Number of entries aleady in the array * * Return value: Position of the added entry in the array */ static int pcie_port_msix_add_entry( struct msix_entry *entries, int new_entry, int nr_entries) { int j; for (j = 0; j < nr_entries; j++) if (entries[j].entry == new_entry) return j; entries[j].entry = new_entry; return j; } /** * pcie_port_enable_msix - try to set up MSI-X as interrupt mode for given port * @dev: PCI Express port to handle * @vectors: Array of interrupt vectors to populate * @mask: Bitmask of port capabilities returned by get_port_device_capability() * * Return value: 0 on success, error code on failure */ static int pcie_port_enable_msix(struct pci_dev *dev, int *vectors, int mask) { struct msix_entry *msix_entries; int idx[PCIE_PORT_DEVICE_MAXSERVICES]; int nr_entries, status, pos, i, nvec; u16 reg16; u32 reg32; nr_entries = pci_msix_table_size(dev); if (!nr_entries) return -EINVAL; if (nr_entries > PCIE_PORT_MAX_MSIX_ENTRIES) nr_entries = PCIE_PORT_MAX_MSIX_ENTRIES; msix_entries = kzalloc(sizeof(*msix_entries) * nr_entries, GFP_KERNEL); if (!msix_entries) return -ENOMEM; /* * Allocate as many entries as the port wants, so that we can check * which of them will be useful. Moreover, if nr_entries is correctly * equal to the number of entries this port actually uses, we'll happily * go through without any tricks. */ for (i = 0; i < nr_entries; i++) msix_entries[i].entry = i; status = pci_enable_msix(dev, msix_entries, nr_entries); if (status) goto Exit; for (i = 0; i < PCIE_PORT_DEVICE_MAXSERVICES; i++) idx[i] = -1; status = -EIO; nvec = 0; if (mask & (PCIE_PORT_SERVICE_PME | PCIE_PORT_SERVICE_HP)) { int entry; /* * The code below follows the PCI Express Base Specification 2.0 * stating in Section 6.1.6 that "PME and Hot-Plug Event * interrupts (when both are implemented) always share the same * MSI or MSI-X vector, as indicated by the Interrupt Message * Number field in the PCI Express Capabilities register", where * according to Section 7.8.2 of the specification "For MSI-X, * the value in this field indicates which MSI-X Table entry is * used to generate the interrupt message." */ pos = pci_find_capability(dev, PCI_CAP_ID_EXP); pci_read_config_word(dev, pos + PCIE_CAPABILITIES_REG, ®16); entry = (reg16 >> 9) & PCIE_PORT_MSI_VECTOR_MASK; if (entry >= nr_entries) goto Error; i = pcie_port_msix_add_entry(msix_entries, entry, nvec); if (i == nvec) nvec++; idx[PCIE_PORT_SERVICE_PME_SHIFT] = i; idx[PCIE_PORT_SERVICE_HP_SHIFT] = i; } if (mask & PCIE_PORT_SERVICE_AER) { int entry; /* * The code below follows Section 7.10.10 of the PCI Express * Base Specification 2.0 stating that bits 31-27 of the Root * Error Status Register contain a value indicating which of the * MSI/MSI-X vectors assigned to the port is going to be used * for AER, where "For MSI-X, the value in this register * indicates which MSI-X Table entry is used to generate the * interrupt message." */ pos = pci_find_ext_capability(dev, PCI_EXT_CAP_ID_ERR); pci_read_config_dword(dev, pos + PCI_ERR_ROOT_STATUS, ®32); entry = reg32 >> 27; if (entry >= nr_entries) goto Error; i = pcie_port_msix_add_entry(msix_entries, entry, nvec); if (i == nvec) nvec++; idx[PCIE_PORT_SERVICE_AER_SHIFT] = i; } /* * If nvec is equal to the allocated number of entries, we can just use * what we have. Otherwise, the port has some extra entries not for the * services we know and we need to work around that. */ if (nvec == nr_entries) { status = 0; } else { /* Drop the temporary MSI-X setup */ pci_disable_msix(dev); /* Now allocate the MSI-X vectors for real */ status = pci_enable_msix(dev, msix_entries, nvec); if (status) goto Exit; } for (i = 0; i < PCIE_PORT_DEVICE_MAXSERVICES; i++) vectors[i] = idx[i] >= 0 ? msix_entries[idx[i]].vector : -1; Exit: kfree(msix_entries); return status; Error: pci_disable_msix(dev); goto Exit; } /** * init_service_irqs - initialize irqs for PCI Express port services * @dev: PCI Express port to handle * @irqs: Array of irqs to populate * @mask: Bitmask of port capabilities returned by get_port_device_capability() * * Return value: Interrupt mode associated with the port */ static int init_service_irqs(struct pci_dev *dev, int *irqs, int mask) { int i, irq = -1; /* * We have to use INTx if MSI cannot be used for PCIe PME. * RHEL6: pcie_pme_no_msi() not implemented, use 'false' instead */ if ((mask & PCIE_PORT_SERVICE_PME) && (false)) { if (dev->pin) irq = dev->irq; goto no_msi; } /* Try to use MSI-X if supported */ if (!pcie_port_enable_msix(dev, irqs, mask)) return 0; /* We're not going to use MSI-X, so try MSI and fall back to INTx */ if (!pci_enable_msi(dev) || dev->pin) irq = dev->irq; no_msi: for (i = 0; i < PCIE_PORT_DEVICE_MAXSERVICES; i++) irqs[i] = irq; irqs[PCIE_PORT_SERVICE_VC_SHIFT] = -1; if (irq < 0) return -ENODEV; return 0; } static void cleanup_service_irqs(struct pci_dev *dev) { if (dev->msix_enabled) pci_disable_msix(dev); else if (dev->msi_enabled) pci_disable_msi(dev); } /** * get_port_device_capability - discover capabilities of a PCI Express port * @dev: PCI Express port to examine * * The capabilities are read from the port's PCI Express configuration registers * as described in PCI Express Base Specification 1.0a sections 7.8.2, 7.8.9 and * 7.9 - 7.11. * * Return value: Bitmask of discovered port capabilities */ int pcie_get_port_device_capability(struct pci_dev *dev) { int services = 0, pos; u16 reg16; u32 reg32; int cap_mask; int err; struct pci_dev_rh1 *rh1_pci = dev->rh_reserved1; if (rh1_pci->__pcie_osc_capabilities_valid) return rh1_pci->pcie_osc_capabilities; err = pcie_port_platform_notify(dev, &cap_mask); if (pcie_ports_auto) { #ifdef CONFIG_NETAPP_HWDD /*TODO: check if we need to set the other masks */ cap_mask |= PCIE_PORT_SERVICE_AER; #else if (err) { pcie_no_aspm(); return 0; } #endif } else { cap_mask = PCIE_PORT_SERVICE_PME | PCIE_PORT_SERVICE_HP | PCIE_PORT_SERVICE_VC; if (pci_aer_available()) cap_mask |= PCIE_PORT_SERVICE_AER; } pos = pci_find_capability(dev, PCI_CAP_ID_EXP); pci_read_config_word(dev, pos + PCIE_CAPABILITIES_REG, ®16); /* Hot-Plug Capable */ if ((cap_mask & PCIE_PORT_SERVICE_HP) && (reg16 & PORT_TO_SLOT_MASK)) { pci_read_config_dword(dev, pos + PCIE_SLOT_CAPABILITIES_REG, ®32); if (reg32 & SLOT_HP_CAPABLE_MASK) services |= PCIE_PORT_SERVICE_HP; } /* AER capable */ #ifdef CONFIG_NETAPP_HWDD if ((cap_mask & PCIE_PORT_SERVICE_AER) && (pci_find_ext_capability(dev, PCI_EXT_CAP_ID_ERR) || pci_device_special_root(dev))) services |= PCIE_PORT_SERVICE_AER; #else if ((cap_mask & PCIE_PORT_SERVICE_AER) && (pci_find_ext_capability(dev, PCI_EXT_CAP_ID_ERR))) services |= PCIE_PORT_SERVICE_AER; #endif /* VC support */ if (pci_find_ext_capability(dev, PCI_EXT_CAP_ID_VC)) services |= PCIE_PORT_SERVICE_VC; if ((cap_mask & PCIE_PORT_SERVICE_PME) && dev->pcie_type == PCI_EXP_TYPE_ROOT_PORT) services |= PCIE_PORT_SERVICE_PME; rh1_pci->pcie_osc_capabilities = services; rh1_pci->__pcie_osc_capabilities_valid = 1; return services; } /** * pcie_device_init - initialize PCI Express port service device * @dev: Port service device to initialize * @parent: PCI Express port to associate the service device with * @service_type: Type of service to associate with the service device * @irq: Interrupt vector to associate with the service device */ static void pcie_device_init(struct pci_dev *parent, struct pcie_device *dev, int service_type, int irq) { struct device *device; struct pci_dev *pdev; dev->port = parent; dev->irq = irq; dev->service = service_type; /* Initialize generic device interface */ device = &dev->device; memset(device, 0, sizeof(struct device)); device->bus = &pcie_port_bus_type; device->driver = NULL; dev_set_drvdata(device, NULL); device->release = release_pcie_device; /* callback to free pcie dev */ pdev = to_pci_dev(device); dev_set_name(device, "%s:pcie%02x", pci_name(parent), get_descriptor_id(pdev->pcie_type, service_type)); device->parent = &parent->dev; } /** * alloc_pcie_device - allocate PCI Express port service device structure * @parent: PCI Express port to associate the service device with * @service_type: Type of service to associate with the service device * @irq: Interrupt vector to associate with the service device */ static struct pcie_device* alloc_pcie_device(struct pci_dev *parent, int service_type, int irq) { struct pcie_device *device; device = kzalloc(sizeof(struct pcie_device), GFP_KERNEL); if (!device) return NULL; pcie_device_init(parent, device, service_type, irq); return device; } /** * pcie_port_device_register - register PCI Express port * @dev: PCI Express port to register * * Allocate the port extension structure and register services associated with * the port. */ int pcie_port_device_register(struct pci_dev *dev) { int status, capabilities, i, nr_serv; int irqs[PCIE_PORT_DEVICE_MAXSERVICES]; /* Get and check PCI Express port services */ capabilities = pcie_get_port_device_capability(dev); if (!capabilities) return -ENODEV; status = pci_enable_device(dev); if (status) return status; pci_set_master(dev); /* * Initialize service irqs. Don't use service devices that * require interrupts if there is no way to generate them. */ status = init_service_irqs(dev, irqs, capabilities); if (status) { capabilities &= PCIE_PORT_SERVICE_VC; if (!capabilities) goto error_disable; } /* Allocate child services if any */ for (i = 0, nr_serv = 0; i < PCIE_PORT_DEVICE_MAXSERVICES; i++) { struct pcie_device *child; int service = 1 << i; if (!(capabilities & service)) continue; child = alloc_pcie_device(dev, service, irqs[i]); if (!child) continue; status = device_register(&child->device); if (status) { kfree(child); continue; } get_device(&child->device); nr_serv++; } if (!nr_serv) { pci_disable_device(dev); status = -ENODEV; goto error_cleanup_irqs; } return 0; error_cleanup_irqs: cleanup_service_irqs(dev); error_disable: pci_disable_device(dev); return status; } #ifdef CONFIG_PM static int suspend_iter(struct device *dev, void *data) { struct pcie_port_service_driver *service_driver; if ((dev->bus == &pcie_port_bus_type) && (dev->driver)) { service_driver = to_service_driver(dev->driver); if (service_driver->suspend) service_driver->suspend(to_pcie_device(dev)); } return 0; } /** * pcie_port_device_suspend - suspend port services associated with a PCIe port * @dev: PCI Express port to handle */ int pcie_port_device_suspend(struct device *dev) { return device_for_each_child(dev, NULL, suspend_iter); } static int resume_iter(struct device *dev, void *data) { struct pcie_port_service_driver *service_driver; if ((dev->bus == &pcie_port_bus_type) && (dev->driver)) { service_driver = to_service_driver(dev->driver); if (service_driver->resume) service_driver->resume(to_pcie_device(dev)); } return 0; } /** * pcie_port_device_suspend - resume port services associated with a PCIe port * @dev: PCI Express port to handle */ int pcie_port_device_resume(struct device *dev) { return device_for_each_child(dev, NULL, resume_iter); } #endif /* PM */ static int remove_iter(struct device *dev, void *data) { if (dev->bus == &pcie_port_bus_type) { put_device(dev); device_unregister(dev); } return 0; } /** * pcie_port_device_remove - unregister PCI Express port service devices * @dev: PCI Express port the service devices to unregister are associated with * * Remove PCI Express port service devices associated with given port and * disable MSI-X or MSI for the port. */ void pcie_port_device_remove(struct pci_dev *dev) { device_for_each_child(&dev->dev, NULL, remove_iter); cleanup_service_irqs(dev); pci_disable_device(dev); } /** * pcie_port_probe_service - probe driver for given PCI Express port service * @dev: PCI Express port service device to probe against * * If PCI Express port service driver is registered with * pcie_port_service_register(), this function will be called by the driver core * whenever match is found between the driver and a port service device. */ static int pcie_port_probe_service(struct device *dev) { struct pcie_device *pciedev; struct pcie_port_service_driver *driver; int status; if (!dev || !dev->driver) return -ENODEV; driver = to_service_driver(dev->driver); if (!driver || !driver->probe) return -ENODEV; pciedev = to_pcie_device(dev); status = driver->probe(pciedev); if (!status) { dev_printk(KERN_DEBUG, dev, "service driver %s loaded\n", driver->name); get_device(dev); } return status; } /** * pcie_port_remove_service - detach driver from given PCI Express port service * @dev: PCI Express port service device to handle * * If PCI Express port service driver is registered with * pcie_port_service_register(), this function will be called by the driver core * when device_unregister() is called for the port service device associated * with the driver. */ static int pcie_port_remove_service(struct device *dev) { struct pcie_device *pciedev; struct pcie_port_service_driver *driver; if (!dev || !dev->driver) return 0; pciedev = to_pcie_device(dev); driver = to_service_driver(dev->driver); if (driver && driver->remove) { dev_printk(KERN_DEBUG, dev, "unloading service driver %s\n", driver->name); driver->remove(pciedev); put_device(dev); } return 0; } /** * pcie_port_shutdown_service - shut down given PCI Express port service * @dev: PCI Express port service device to handle * * If PCI Express port service driver is registered with * pcie_port_service_register(), this function will be called by the driver core * when device_shutdown() is called for the port service device associated * with the driver. */ static void pcie_port_shutdown_service(struct device *dev) {} /** * pcie_port_service_register - register PCI Express port service driver * @new: PCI Express port service driver to register */ int pcie_port_service_register(struct pcie_port_service_driver *new) { if (pcie_ports_disabled) return -ENODEV; new->driver.name = (char *)new->name; new->driver.bus = &pcie_port_bus_type; new->driver.probe = pcie_port_probe_service; new->driver.remove = pcie_port_remove_service; new->driver.shutdown = pcie_port_shutdown_service; return driver_register(&new->driver); } /** * pcie_port_service_unregister - unregister PCI Express port service driver * @drv: PCI Express port service driver to unregister */ void pcie_port_service_unregister(struct pcie_port_service_driver *drv) { driver_unregister(&drv->driver); } EXPORT_SYMBOL(pcie_port_service_register); EXPORT_SYMBOL(pcie_port_service_unregister);