2  * Sonics Silicon Backplane
 
   3  * Broadcom PCI-core driver
 
   5  * Copyright 2005, Broadcom Corporation
 
   6  * Copyright 2006, 2007, Michael Buesch <mb@bu3sch.de>
 
   8  * Licensed under the GNU/GPL. See COPYING for details.
 
  11 #include <linux/ssb/ssb.h>
 
  12 #include <linux/pci.h>
 
  13 #include <linux/delay.h>
 
  14 #include <linux/ssb/ssb_embedded.h>
 
  16 #include "ssb_private.h"
 
  20 u32 pcicore_read32(struct ssb_pcicore *pc, u16 offset)
 
  22         return ssb_read32(pc->dev, offset);
 
  26 void pcicore_write32(struct ssb_pcicore *pc, u16 offset, u32 value)
 
  28         ssb_write32(pc->dev, offset, value);
 
  32 u16 pcicore_read16(struct ssb_pcicore *pc, u16 offset)
 
  34         return ssb_read16(pc->dev, offset);
 
  38 void pcicore_write16(struct ssb_pcicore *pc, u16 offset, u16 value)
 
  40         ssb_write16(pc->dev, offset, value);
 
  43 /**************************************************
 
  44  * Code for hostmode operation.
 
  45  **************************************************/
 
  47 #ifdef CONFIG_SSB_PCICORE_HOSTMODE
 
  49 #include <asm/paccess.h>
 
  50 /* Probe a 32bit value on the bus and catch bus exceptions.
 
  51  * Returns nonzero on a bus exception.
 
  52  * This is MIPS specific */
 
  53 #define mips_busprobe32(val, addr)      get_dbe((val), ((u32 *)(addr)))
 
  55 /* Assume one-hot slot wiring */
 
  56 #define SSB_PCI_SLOT_MAX        16
 
  58 /* Global lock is OK, as we won't have more than one extpci anyway. */
 
  59 static DEFINE_SPINLOCK(cfgspace_lock);
 
  60 /* Core to access the external PCI config space. Can only have one. */
 
  61 static struct ssb_pcicore *extpci_core;
 
  64 static u32 get_cfgspace_addr(struct ssb_pcicore *pc,
 
  65                              unsigned int bus, unsigned int dev,
 
  66                              unsigned int func, unsigned int off)
 
  71         /* We do only have one cardbus device behind the bridge. */
 
  72         if (pc->cardbusmode && (dev >= 1))
 
  76                 /* Type 0 transaction */
 
  77                 if (unlikely(dev >= SSB_PCI_SLOT_MAX))
 
  79                 /* Slide the window */
 
  80                 tmp = SSB_PCICORE_SBTOPCI_CFG0;
 
  81                 tmp |= ((1 << (dev + 16)) & SSB_PCICORE_SBTOPCI1_MASK);
 
  82                 pcicore_write32(pc, SSB_PCICORE_SBTOPCI1, tmp);
 
  83                 /* Calculate the address */
 
  85                 addr |= ((1 << (dev + 16)) & ~SSB_PCICORE_SBTOPCI1_MASK);
 
  89                 /* Type 1 transaction */
 
  90                 pcicore_write32(pc, SSB_PCICORE_SBTOPCI1,
 
  91                                 SSB_PCICORE_SBTOPCI_CFG1);
 
  92                 /* Calculate the address */
 
 103 static int ssb_extpci_read_config(struct ssb_pcicore *pc,
 
 104                                   unsigned int bus, unsigned int dev,
 
 105                                   unsigned int func, unsigned int off,
 
 112         SSB_WARN_ON(!pc->hostmode);
 
 113         if (unlikely(len != 1 && len != 2 && len != 4))
 
 115         addr = get_cfgspace_addr(pc, bus, dev, func, off);
 
 119         mmio = ioremap_nocache(addr, len);
 
 123         if (mips_busprobe32(val, mmio)) {
 
 129         val >>= (8 * (off & 3));
 
 133                 *((u8 *)buf) = (u8)val;
 
 136                 *((u16 *)buf) = (u16)val;
 
 139                 *((u32 *)buf) = (u32)val;
 
 149 static int ssb_extpci_write_config(struct ssb_pcicore *pc,
 
 150                                    unsigned int bus, unsigned int dev,
 
 151                                    unsigned int func, unsigned int off,
 
 152                                    const void *buf, int len)
 
 158         SSB_WARN_ON(!pc->hostmode);
 
 159         if (unlikely(len != 1 && len != 2 && len != 4))
 
 161         addr = get_cfgspace_addr(pc, bus, dev, func, off);
 
 165         mmio = ioremap_nocache(addr, len);
 
 169         if (mips_busprobe32(val, mmio)) {
 
 177                 val &= ~(0xFF << (8 * (off & 3)));
 
 178                 val |= *((const u8 *)buf) << (8 * (off & 3));
 
 182                 val &= ~(0xFFFF << (8 * (off & 3)));
 
 183                 val |= *((const u16 *)buf) << (8 * (off & 3));
 
 186                 val = *((const u32 *)buf);
 
 198 static int ssb_pcicore_read_config(struct pci_bus *bus, unsigned int devfn,
 
 199                                    int reg, int size, u32 *val)
 
 204         spin_lock_irqsave(&cfgspace_lock, flags);
 
 205         err = ssb_extpci_read_config(extpci_core, bus->number, PCI_SLOT(devfn),
 
 206                                      PCI_FUNC(devfn), reg, val, size);
 
 207         spin_unlock_irqrestore(&cfgspace_lock, flags);
 
 209         return err ? PCIBIOS_DEVICE_NOT_FOUND : PCIBIOS_SUCCESSFUL;
 
 212 static int ssb_pcicore_write_config(struct pci_bus *bus, unsigned int devfn,
 
 213                                     int reg, int size, u32 val)
 
 218         spin_lock_irqsave(&cfgspace_lock, flags);
 
 219         err = ssb_extpci_write_config(extpci_core, bus->number, PCI_SLOT(devfn),
 
 220                                       PCI_FUNC(devfn), reg, &val, size);
 
 221         spin_unlock_irqrestore(&cfgspace_lock, flags);
 
 223         return err ? PCIBIOS_DEVICE_NOT_FOUND : PCIBIOS_SUCCESSFUL;
 
 226 static struct pci_ops ssb_pcicore_pciops = {
 
 227         .read   = ssb_pcicore_read_config,
 
 228         .write  = ssb_pcicore_write_config,
 
 231 static struct resource ssb_pcicore_mem_resource = {
 
 232         .name   = "SSB PCIcore external memory",
 
 233         .start  = SSB_PCI_DMA,
 
 234         .end    = SSB_PCI_DMA + SSB_PCI_DMA_SZ - 1,
 
 235         .flags  = IORESOURCE_MEM | IORESOURCE_PCI_FIXED,
 
 238 static struct resource ssb_pcicore_io_resource = {
 
 239         .name   = "SSB PCIcore external I/O",
 
 242         .flags  = IORESOURCE_IO | IORESOURCE_PCI_FIXED,
 
 245 static struct pci_controller ssb_pcicore_controller = {
 
 246         .pci_ops        = &ssb_pcicore_pciops,
 
 247         .io_resource    = &ssb_pcicore_io_resource,
 
 248         .mem_resource   = &ssb_pcicore_mem_resource,
 
 249         .mem_offset     = 0x24000000,
 
 252 static u32 ssb_pcicore_pcibus_iobase = 0x100;
 
 253 static u32 ssb_pcicore_pcibus_membase = SSB_PCI_DMA;
 
 255 /* This function is called when doing a pci_enable_device().
 
 256  * We must first check if the device is a device on the PCI-core bridge. */
 
 257 int ssb_pcicore_plat_dev_init(struct pci_dev *d)
 
 259         struct resource *res;
 
 263         if (d->bus->ops != &ssb_pcicore_pciops) {
 
 264                 /* This is not a device on the PCI-core bridge. */
 
 268         ssb_printk(KERN_INFO "PCI: Fixing up device %s\n",
 
 271         /* Fix up resource bases */
 
 272         for (pos = 0; pos < 6; pos++) {
 
 273                 res = &d->resource[pos];
 
 274                 if (res->flags & IORESOURCE_IO)
 
 275                         base = &ssb_pcicore_pcibus_iobase;
 
 277                         base = &ssb_pcicore_pcibus_membase;
 
 278                 res->flags |= IORESOURCE_PCI_FIXED;
 
 280                         size = res->end - res->start + 1;
 
 281                         if (*base & (size - 1))
 
 282                                 *base = (*base + size) & ~(size - 1);
 
 284                         res->end = res->start + size - 1;
 
 286                         pci_write_config_dword(d, PCI_BASE_ADDRESS_0 + (pos << 2), res->start);
 
 288                 /* Fix up PCI bridge BAR0 only */
 
 289                 if (d->bus->number == 0 && PCI_SLOT(d->devfn) == 0)
 
 292         /* Fix up interrupt lines */
 
 293         d->irq = ssb_mips_irq(extpci_core->dev) + 2;
 
 294         pci_write_config_byte(d, PCI_INTERRUPT_LINE, d->irq);
 
 299 /* Early PCI fixup for a device on the PCI-core bridge. */
 
 300 static void ssb_pcicore_fixup_pcibridge(struct pci_dev *dev)
 
 304         if (dev->bus->ops != &ssb_pcicore_pciops) {
 
 305                 /* This is not a device on the PCI-core bridge. */
 
 308         if (dev->bus->number != 0 || PCI_SLOT(dev->devfn) != 0)
 
 311         ssb_printk(KERN_INFO "PCI: Fixing up bridge %s\n", pci_name(dev));
 
 313         /* Enable PCI bridge bus mastering and memory space */
 
 315         if (pcibios_enable_device(dev, ~0) < 0) {
 
 316                 ssb_printk(KERN_ERR "PCI: SSB bridge enable failed\n");
 
 320         /* Enable PCI bridge BAR1 prefetch and burst */
 
 321         pci_write_config_dword(dev, SSB_BAR1_CONTROL, 3);
 
 323         /* Make sure our latency is high enough to handle the devices behind us */
 
 325         ssb_printk(KERN_INFO "PCI: Fixing latency timer of device %s to %u\n",
 
 327         pci_write_config_byte(dev, PCI_LATENCY_TIMER, lat);
 
 329 DECLARE_PCI_FIXUP_EARLY(PCI_ANY_ID, PCI_ANY_ID, ssb_pcicore_fixup_pcibridge);
 
 331 /* PCI device IRQ mapping. */
 
 332 int ssb_pcicore_pcibios_map_irq(const struct pci_dev *dev, u8 slot, u8 pin)
 
 334         if (dev->bus->ops != &ssb_pcicore_pciops) {
 
 335                 /* This is not a device on the PCI-core bridge. */
 
 338         return ssb_mips_irq(extpci_core->dev) + 2;
 
 341 static void ssb_pcicore_init_hostmode(struct ssb_pcicore *pc)
 
 345         if (WARN_ON(extpci_core))
 
 349         ssb_dprintk(KERN_INFO PFX "PCIcore in host mode found\n");
 
 350         /* Reset devices on the external PCI bus */
 
 351         val = SSB_PCICORE_CTL_RST_OE;
 
 352         val |= SSB_PCICORE_CTL_CLK_OE;
 
 353         pcicore_write32(pc, SSB_PCICORE_CTL, val);
 
 354         val |= SSB_PCICORE_CTL_CLK; /* Clock on */
 
 355         pcicore_write32(pc, SSB_PCICORE_CTL, val);
 
 356         udelay(150); /* Assertion time demanded by the PCI standard */
 
 357         val |= SSB_PCICORE_CTL_RST; /* Deassert RST# */
 
 358         pcicore_write32(pc, SSB_PCICORE_CTL, val);
 
 359         val = SSB_PCICORE_ARBCTL_INTERN;
 
 360         pcicore_write32(pc, SSB_PCICORE_ARBCTL, val);
 
 361         udelay(1); /* Assertion time demanded by the PCI standard */
 
 363         if (pc->dev->bus->has_cardbus_slot) {
 
 364                 ssb_dprintk(KERN_INFO PFX "CardBus slot detected\n");
 
 366                 /* GPIO 1 resets the bridge */
 
 367                 ssb_gpio_out(pc->dev->bus, 1, 1);
 
 368                 ssb_gpio_outen(pc->dev->bus, 1, 1);
 
 369                 pcicore_write16(pc, SSB_PCICORE_SPROM(0),
 
 370                                 pcicore_read16(pc, SSB_PCICORE_SPROM(0))
 
 374         /* 64MB I/O window */
 
 375         pcicore_write32(pc, SSB_PCICORE_SBTOPCI0,
 
 376                         SSB_PCICORE_SBTOPCI_IO);
 
 377         /* 64MB config space */
 
 378         pcicore_write32(pc, SSB_PCICORE_SBTOPCI1,
 
 379                         SSB_PCICORE_SBTOPCI_CFG0);
 
 380         /* 1GB memory window */
 
 381         pcicore_write32(pc, SSB_PCICORE_SBTOPCI2,
 
 382                         SSB_PCICORE_SBTOPCI_MEM | SSB_PCI_DMA);
 
 384         /* Enable PCI bridge BAR0 prefetch and burst */
 
 385         val = PCI_COMMAND_MASTER | PCI_COMMAND_MEMORY;
 
 386         ssb_extpci_write_config(pc, 0, 0, 0, PCI_COMMAND, &val, 2);
 
 387         /* Clear error conditions */
 
 389         ssb_extpci_write_config(pc, 0, 0, 0, PCI_STATUS, &val, 2);
 
 391         /* Enable PCI interrupts */
 
 392         pcicore_write32(pc, SSB_PCICORE_IMASK,
 
 393                         SSB_PCICORE_IMASK_INTA);
 
 395         /* Ok, ready to run, register it to the system.
 
 396          * The following needs change, if we want to port hostmode
 
 397          * to non-MIPS platform. */
 
 398         ssb_pcicore_controller.io_map_base = (unsigned long)ioremap_nocache(SSB_PCI_MEM, 0x04000000);
 
 399         set_io_port_base(ssb_pcicore_controller.io_map_base);
 
 400         /* Give some time to the PCI controller to configure itself with the new
 
 401          * values. Not waiting at this point causes crashes of the machine. */
 
 403         register_pci_controller(&ssb_pcicore_controller);
 
 406 static int pcicore_is_in_hostmode(struct ssb_pcicore *pc)
 
 408         struct ssb_bus *bus = pc->dev->bus;
 
 412         chipid_top = (bus->chip_id & 0xFF00);
 
 413         if (chipid_top != 0x4700 &&
 
 414             chipid_top != 0x5300)
 
 417         if (bus->sprom.boardflags_lo & SSB_PCICORE_BFL_NOPCI)
 
 420         /* The 200-pin BCM4712 package does not bond out PCI. Even when
 
 421          * PCI is bonded out, some boards may leave the pins floating. */
 
 422         if (bus->chip_id == 0x4712) {
 
 423                 if (bus->chip_package == SSB_CHIPPACK_BCM4712S)
 
 425                 if (bus->chip_package == SSB_CHIPPACK_BCM4712M)
 
 428         if (bus->chip_id == 0x5350)
 
 431         return !mips_busprobe32(tmp, (bus->mmio + (pc->dev->core_index * SSB_CORE_SIZE)));
 
 433 #endif /* CONFIG_SSB_PCICORE_HOSTMODE */
 
 436 /**************************************************
 
 437  * Generic and Clientmode operation code.
 
 438  **************************************************/
 
 440 static void ssb_pcicore_init_clientmode(struct ssb_pcicore *pc)
 
 442         /* Disable PCI interrupts. */
 
 443         ssb_write32(pc->dev, SSB_INTVEC, 0);
 
 446 void ssb_pcicore_init(struct ssb_pcicore *pc)
 
 448         struct ssb_device *dev = pc->dev;
 
 454         if (!ssb_device_is_enabled(dev))
 
 455                 ssb_device_enable(dev, 0);
 
 457 #ifdef CONFIG_SSB_PCICORE_HOSTMODE
 
 458         pc->hostmode = pcicore_is_in_hostmode(pc);
 
 460                 ssb_pcicore_init_hostmode(pc);
 
 461 #endif /* CONFIG_SSB_PCICORE_HOSTMODE */
 
 463                 ssb_pcicore_init_clientmode(pc);
 
 466 static u32 ssb_pcie_read(struct ssb_pcicore *pc, u32 address)
 
 468         pcicore_write32(pc, 0x130, address);
 
 469         return pcicore_read32(pc, 0x134);
 
 472 static void ssb_pcie_write(struct ssb_pcicore *pc, u32 address, u32 data)
 
 474         pcicore_write32(pc, 0x130, address);
 
 475         pcicore_write32(pc, 0x134, data);
 
 478 static void ssb_pcie_mdio_write(struct ssb_pcicore *pc, u8 device,
 
 479                                 u8 address, u16 data)
 
 481         const u16 mdio_control = 0x128;
 
 482         const u16 mdio_data = 0x12C;
 
 486         v = 0x80; /* Enable Preamble Sequence */
 
 487         v |= 0x2; /* MDIO Clock Divisor */
 
 488         pcicore_write32(pc, mdio_control, v);
 
 490         v = (1 << 30); /* Start of Transaction */
 
 491         v |= (1 << 28); /* Write Transaction */
 
 492         v |= (1 << 17); /* Turnaround */
 
 493         v |= (u32)device << 22;
 
 494         v |= (u32)address << 18;
 
 496         pcicore_write32(pc, mdio_data, v);
 
 497         /* Wait for the device to complete the transaction */
 
 499         for (i = 0; i < 10; i++) {
 
 500                 v = pcicore_read32(pc, mdio_control);
 
 501                 if (v & 0x100 /* Trans complete */)
 
 505         pcicore_write32(pc, mdio_control, 0);
 
 508 static void ssb_broadcast_value(struct ssb_device *dev,
 
 509                                 u32 address, u32 data)
 
 511         /* This is used for both, PCI and ChipCommon core, so be careful. */
 
 512         BUILD_BUG_ON(SSB_PCICORE_BCAST_ADDR != SSB_CHIPCO_BCAST_ADDR);
 
 513         BUILD_BUG_ON(SSB_PCICORE_BCAST_DATA != SSB_CHIPCO_BCAST_DATA);
 
 515         ssb_write32(dev, SSB_PCICORE_BCAST_ADDR, address);
 
 516         ssb_read32(dev, SSB_PCICORE_BCAST_ADDR); /* flush */
 
 517         ssb_write32(dev, SSB_PCICORE_BCAST_DATA, data);
 
 518         ssb_read32(dev, SSB_PCICORE_BCAST_DATA); /* flush */
 
 521 static void ssb_commit_settings(struct ssb_bus *bus)
 
 523         struct ssb_device *dev;
 
 525         dev = bus->chipco.dev ? bus->chipco.dev : bus->pcicore.dev;
 
 528         /* This forces an update of the cached registers. */
 
 529         ssb_broadcast_value(dev, 0xFD8, 0);
 
 532 int ssb_pcicore_dev_irqvecs_enable(struct ssb_pcicore *pc,
 
 533                                    struct ssb_device *dev)
 
 535         struct ssb_device *pdev = pc->dev;
 
 540         if (dev->bus->bustype != SSB_BUSTYPE_PCI) {
 
 541                 /* This SSB device is not on a PCI host-bus. So the IRQs are
 
 542                  * not routed through the PCI core.
 
 543                  * So we must not enable routing through the PCI core. */
 
 551         might_sleep_if(pdev->id.coreid != SSB_DEV_PCI);
 
 553         /* Enable interrupts for this device. */
 
 555             ((pdev->id.revision >= 6) || (pdev->id.coreid == SSB_DEV_PCIE))) {
 
 558                 /* Calculate the "coremask" for the device. */
 
 559                 coremask = (1 << dev->core_index);
 
 561                 err = pci_read_config_dword(bus->host_pci, SSB_PCI_IRQMASK, &tmp);
 
 564                 tmp |= coremask << 8;
 
 565                 err = pci_write_config_dword(bus->host_pci, SSB_PCI_IRQMASK, tmp);
 
 571                 intvec = ssb_read32(pdev, SSB_INTVEC);
 
 572                 tmp = ssb_read32(dev, SSB_TPSFLAG);
 
 573                 tmp &= SSB_TPSFLAG_BPFLAG;
 
 574                 intvec |= (1 << tmp);
 
 575                 ssb_write32(pdev, SSB_INTVEC, intvec);
 
 578         /* Setup PCIcore operation. */
 
 581         if (pdev->id.coreid == SSB_DEV_PCI) {
 
 582                 tmp = pcicore_read32(pc, SSB_PCICORE_SBTOPCI2);
 
 583                 tmp |= SSB_PCICORE_SBTOPCI_PREF;
 
 584                 tmp |= SSB_PCICORE_SBTOPCI_BURST;
 
 585                 pcicore_write32(pc, SSB_PCICORE_SBTOPCI2, tmp);
 
 587                 if (pdev->id.revision < 5) {
 
 588                         tmp = ssb_read32(pdev, SSB_IMCFGLO);
 
 589                         tmp &= ~SSB_IMCFGLO_SERTO;
 
 591                         tmp &= ~SSB_IMCFGLO_REQTO;
 
 592                         tmp |= 3 << SSB_IMCFGLO_REQTO_SHIFT;
 
 593                         ssb_write32(pdev, SSB_IMCFGLO, tmp);
 
 594                         ssb_commit_settings(bus);
 
 595                 } else if (pdev->id.revision >= 11) {
 
 596                         tmp = pcicore_read32(pc, SSB_PCICORE_SBTOPCI2);
 
 597                         tmp |= SSB_PCICORE_SBTOPCI_MRM;
 
 598                         pcicore_write32(pc, SSB_PCICORE_SBTOPCI2, tmp);
 
 601                 WARN_ON(pdev->id.coreid != SSB_DEV_PCIE);
 
 602                 //TODO: Better make defines for all these magic PCIE values.
 
 603                 if ((pdev->id.revision == 0) || (pdev->id.revision == 1)) {
 
 604                         /* TLP Workaround register. */
 
 605                         tmp = ssb_pcie_read(pc, 0x4);
 
 607                         ssb_pcie_write(pc, 0x4, tmp);
 
 609                 if (pdev->id.revision == 0) {
 
 610                         const u8 serdes_rx_device = 0x1F;
 
 612                         ssb_pcie_mdio_write(pc, serdes_rx_device,
 
 613                                             2 /* Timer */, 0x8128);
 
 614                         ssb_pcie_mdio_write(pc, serdes_rx_device,
 
 615                                             6 /* CDR */, 0x0100);
 
 616                         ssb_pcie_mdio_write(pc, serdes_rx_device,
 
 617                                             7 /* CDR BW */, 0x1466);
 
 618                 } else if (pdev->id.revision == 1) {
 
 619                         /* DLLP Link Control register. */
 
 620                         tmp = ssb_pcie_read(pc, 0x100);
 
 622                         ssb_pcie_write(pc, 0x100, tmp);
 
 629 EXPORT_SYMBOL(ssb_pcicore_dev_irqvecs_enable);