Staging: aten2011: remove paranoia check functions
[linux-2.6/verdex.git] / drivers / ssb / driver_pcicore.c
blob538c570df3373e147c399a2d0907cf3b20d16762
1 /*
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.
9 */
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"
19 static inline
20 u32 pcicore_read32(struct ssb_pcicore *pc, u16 offset)
22 return ssb_read32(pc->dev, offset);
25 static inline
26 void pcicore_write32(struct ssb_pcicore *pc, u16 offset, u32 value)
28 ssb_write32(pc->dev, offset, value);
31 static inline
32 u16 pcicore_read16(struct ssb_pcicore *pc, u16 offset)
34 return ssb_read16(pc->dev, offset);
37 static inline
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)
68 u32 addr = 0;
69 u32 tmp;
71 /* We do only have one cardbus device behind the bridge. */
72 if (pc->cardbusmode && (dev >= 1))
73 goto out;
75 if (bus == 0) {
76 /* Type 0 transaction */
77 if (unlikely(dev >= SSB_PCI_SLOT_MAX))
78 goto out;
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 */
84 addr = SSB_PCI_CFG;
85 addr |= ((1 << (dev + 16)) & ~SSB_PCICORE_SBTOPCI1_MASK);
86 addr |= (func << 8);
87 addr |= (off & ~3);
88 } else {
89 /* Type 1 transaction */
90 pcicore_write32(pc, SSB_PCICORE_SBTOPCI1,
91 SSB_PCICORE_SBTOPCI_CFG1);
92 /* Calculate the address */
93 addr = SSB_PCI_CFG;
94 addr |= (bus << 16);
95 addr |= (dev << 11);
96 addr |= (func << 8);
97 addr |= (off & ~3);
99 out:
100 return addr;
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,
106 void *buf, int len)
108 int err = -EINVAL;
109 u32 addr, val;
110 void __iomem *mmio;
112 SSB_WARN_ON(!pc->hostmode);
113 if (unlikely(len != 1 && len != 2 && len != 4))
114 goto out;
115 addr = get_cfgspace_addr(pc, bus, dev, func, off);
116 if (unlikely(!addr))
117 goto out;
118 err = -ENOMEM;
119 mmio = ioremap_nocache(addr, len);
120 if (!mmio)
121 goto out;
123 if (mips_busprobe32(val, mmio)) {
124 val = 0xffffffff;
125 goto unmap;
128 val = readl(mmio);
129 val >>= (8 * (off & 3));
131 switch (len) {
132 case 1:
133 *((u8 *)buf) = (u8)val;
134 break;
135 case 2:
136 *((u16 *)buf) = (u16)val;
137 break;
138 case 4:
139 *((u32 *)buf) = (u32)val;
140 break;
142 err = 0;
143 unmap:
144 iounmap(mmio);
145 out:
146 return err;
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)
154 int err = -EINVAL;
155 u32 addr, val = 0;
156 void __iomem *mmio;
158 SSB_WARN_ON(!pc->hostmode);
159 if (unlikely(len != 1 && len != 2 && len != 4))
160 goto out;
161 addr = get_cfgspace_addr(pc, bus, dev, func, off);
162 if (unlikely(!addr))
163 goto out;
164 err = -ENOMEM;
165 mmio = ioremap_nocache(addr, len);
166 if (!mmio)
167 goto out;
169 if (mips_busprobe32(val, mmio)) {
170 val = 0xffffffff;
171 goto unmap;
174 switch (len) {
175 case 1:
176 val = readl(mmio);
177 val &= ~(0xFF << (8 * (off & 3)));
178 val |= *((const u8 *)buf) << (8 * (off & 3));
179 break;
180 case 2:
181 val = readl(mmio);
182 val &= ~(0xFFFF << (8 * (off & 3)));
183 val |= *((const u16 *)buf) << (8 * (off & 3));
184 break;
185 case 4:
186 val = *((const u32 *)buf);
187 break;
189 writel(val, mmio);
191 err = 0;
192 unmap:
193 iounmap(mmio);
194 out:
195 return err;
198 static int ssb_pcicore_read_config(struct pci_bus *bus, unsigned int devfn,
199 int reg, int size, u32 *val)
201 unsigned long flags;
202 int err;
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)
215 unsigned long flags;
216 int err;
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",
240 .start = 0x100,
241 .end = 0x7FF,
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;
260 int pos, size;
261 u32 *base;
263 if (d->bus->ops != &ssb_pcicore_pciops) {
264 /* This is not a device on the PCI-core bridge. */
265 return -ENODEV;
268 ssb_printk(KERN_INFO "PCI: Fixing up device %s\n",
269 pci_name(d));
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;
276 else
277 base = &ssb_pcicore_pcibus_membase;
278 res->flags |= IORESOURCE_PCI_FIXED;
279 if (res->end) {
280 size = res->end - res->start + 1;
281 if (*base & (size - 1))
282 *base = (*base + size) & ~(size - 1);
283 res->start = *base;
284 res->end = res->start + size - 1;
285 *base += size;
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)
290 break;
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);
296 return 0;
299 /* Early PCI fixup for a device on the PCI-core bridge. */
300 static void ssb_pcicore_fixup_pcibridge(struct pci_dev *dev)
302 u8 lat;
304 if (dev->bus->ops != &ssb_pcicore_pciops) {
305 /* This is not a device on the PCI-core bridge. */
306 return;
308 if (dev->bus->number != 0 || PCI_SLOT(dev->devfn) != 0)
309 return;
311 ssb_printk(KERN_INFO "PCI: Fixing up bridge %s\n", pci_name(dev));
313 /* Enable PCI bridge bus mastering and memory space */
314 pci_set_master(dev);
315 if (pcibios_enable_device(dev, ~0) < 0) {
316 ssb_printk(KERN_ERR "PCI: SSB bridge enable failed\n");
317 return;
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 */
324 lat = 168;
325 ssb_printk(KERN_INFO "PCI: Fixing latency timer of device %s to %u\n",
326 pci_name(dev), lat);
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. */
336 return -ENODEV;
338 return ssb_mips_irq(extpci_core->dev) + 2;
341 static void ssb_pcicore_init_hostmode(struct ssb_pcicore *pc)
343 u32 val;
345 if (WARN_ON(extpci_core))
346 return;
347 extpci_core = pc;
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");
365 pc->cardbusmode = 1;
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))
371 | 0x0400);
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 */
388 val = 0;
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. */
402 mdelay(10);
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;
409 u16 chipid_top;
410 u32 tmp;
412 chipid_top = (bus->chip_id & 0xFF00);
413 if (chipid_top != 0x4700 &&
414 chipid_top != 0x5300)
415 return 0;
417 if (bus->sprom.boardflags_lo & SSB_PCICORE_BFL_NOPCI)
418 return 0;
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)
424 return 0;
425 if (bus->chip_package == SSB_CHIPPACK_BCM4712M)
426 return 0;
428 if (bus->chip_id == 0x5350)
429 return 0;
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;
449 struct ssb_bus *bus;
451 if (!dev)
452 return;
453 bus = dev->bus;
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);
459 if (pc->hostmode)
460 ssb_pcicore_init_hostmode(pc);
461 #endif /* CONFIG_SSB_PCICORE_HOSTMODE */
462 if (!pc->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;
483 u32 v;
484 int i;
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;
495 v |= data;
496 pcicore_write32(pc, mdio_data, v);
497 /* Wait for the device to complete the transaction */
498 udelay(10);
499 for (i = 0; i < 10; i++) {
500 v = pcicore_read32(pc, mdio_control);
501 if (v & 0x100 /* Trans complete */)
502 break;
503 msleep(1);
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;
526 if (WARN_ON(!dev))
527 return;
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;
536 struct ssb_bus *bus;
537 int err = 0;
538 u32 tmp;
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. */
544 goto out;
547 if (!pdev)
548 goto out;
549 bus = pdev->bus;
551 might_sleep_if(pdev->id.coreid != SSB_DEV_PCI);
553 /* Enable interrupts for this device. */
554 if (bus->host_pci &&
555 ((pdev->id.revision >= 6) || (pdev->id.coreid == SSB_DEV_PCIE))) {
556 u32 coremask;
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);
562 if (err)
563 goto out;
564 tmp |= coremask << 8;
565 err = pci_write_config_dword(bus->host_pci, SSB_PCI_IRQMASK, tmp);
566 if (err)
567 goto out;
568 } else {
569 u32 intvec;
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. */
579 if (pc->setup_done)
580 goto out;
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;
590 tmp |= 2;
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);
600 } else {
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);
606 tmp |= 0x8;
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);
621 tmp |= 0x40;
622 ssb_pcie_write(pc, 0x100, tmp);
625 pc->setup_done = 1;
626 out:
627 return err;
629 EXPORT_SYMBOL(ssb_pcicore_dev_irqvecs_enable);