2 * Sonics Silicon Backplane
3 * Broadcom MIPS 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>
13 #include <linux/serial.h>
14 #include <linux/serial_core.h>
15 #include <linux/serial_reg.h>
16 #include <linux/time.h>
18 #include "ssb_private.h"
21 static inline u32 mips_read32(struct ssb_mipscore *mcore,
24 return ssb_read32(mcore->dev, offset);
27 static inline void mips_write32(struct ssb_mipscore *mcore,
31 ssb_write32(mcore->dev, offset, value);
34 static const u32 ipsflag_irq_mask[] = {
42 static const u32 ipsflag_irq_shift[] = {
44 SSB_IPSFLAG_IRQ1_SHIFT,
45 SSB_IPSFLAG_IRQ2_SHIFT,
46 SSB_IPSFLAG_IRQ3_SHIFT,
47 SSB_IPSFLAG_IRQ4_SHIFT,
50 static inline u32 ssb_irqflag(struct ssb_device *dev)
52 u32 tpsflag = ssb_read32(dev, SSB_TPSFLAG);
54 return ssb_read32(dev, SSB_TPSFLAG) & SSB_TPSFLAG_BPFLAG;
56 /* not irq supported */
60 static struct ssb_device *find_device(struct ssb_device *rdev, int irqflag)
62 struct ssb_bus *bus = rdev->bus;
64 for (i = 0; i < bus->nr_devices; i++) {
65 struct ssb_device *dev;
66 dev = &(bus->devices[i]);
67 if (ssb_irqflag(dev) == irqflag)
73 /* Get the MIPS IRQ assignment for a specified device.
74 * If unassigned, 0 is returned.
75 * If disabled, 5 is returned.
76 * If not supported, 6 is returned.
78 unsigned int ssb_mips_irq(struct ssb_device *dev)
80 struct ssb_bus *bus = dev->bus;
81 struct ssb_device *mdev = bus->mipscore.dev;
87 irqflag = ssb_irqflag(dev);
90 ipsflag = ssb_read32(bus->mipscore.dev, SSB_IPSFLAG);
91 for (irq = 1; irq <= 4; irq++) {
92 tmp = ((ipsflag & ipsflag_irq_mask[irq]) >> ipsflag_irq_shift[irq]);
97 if ((1 << irqflag) & ssb_read32(mdev, SSB_INTVEC))
104 static void clear_irq(struct ssb_bus *bus, unsigned int irq)
106 struct ssb_device *dev = bus->mipscore.dev;
108 /* Clear the IRQ in the MIPScore backplane registers */
110 ssb_write32(dev, SSB_INTVEC, 0);
112 ssb_write32(dev, SSB_IPSFLAG,
113 ssb_read32(dev, SSB_IPSFLAG) |
114 ipsflag_irq_mask[irq]);
118 static void set_irq(struct ssb_device *dev, unsigned int irq)
120 unsigned int oldirq = ssb_mips_irq(dev);
121 struct ssb_bus *bus = dev->bus;
122 struct ssb_device *mdev = bus->mipscore.dev;
123 u32 irqflag = ssb_irqflag(dev);
129 /* clear the old irq */
131 ssb_write32(mdev, SSB_INTVEC, (~(1 << irqflag) & ssb_read32(mdev, SSB_INTVEC)));
132 else if (oldirq != 5)
133 clear_irq(bus, oldirq);
135 /* assign the new one */
137 ssb_write32(mdev, SSB_INTVEC, ((1 << irqflag) | ssb_read32(mdev, SSB_INTVEC)));
139 u32 ipsflag = ssb_read32(mdev, SSB_IPSFLAG);
140 if ((ipsflag & ipsflag_irq_mask[irq]) != ipsflag_irq_mask[irq]) {
141 u32 oldipsflag = (ipsflag & ipsflag_irq_mask[irq]) >> ipsflag_irq_shift[irq];
142 struct ssb_device *olddev = find_device(dev, oldipsflag);
146 irqflag <<= ipsflag_irq_shift[irq];
147 irqflag |= (ipsflag & ~ipsflag_irq_mask[irq]);
148 ssb_write32(mdev, SSB_IPSFLAG, irqflag);
150 ssb_dprintk(KERN_INFO PFX
151 "set_irq: core 0x%04x, irq %d => %d\n",
152 dev->id.coreid, oldirq+2, irq+2);
155 static void print_irq(struct ssb_device *dev, unsigned int irq)
158 static const char *irq_name[] = {"2(S)", "3", "4", "5", "6", "D", "I"};
159 ssb_dprintk(KERN_INFO PFX
160 "core 0x%04x, irq :", dev->id.coreid);
161 for (i = 0; i <= 6; i++) {
162 ssb_dprintk(" %s%s", irq_name[i], i==irq?"*":" ");
167 static void dump_irq(struct ssb_bus *bus)
170 for (i = 0; i < bus->nr_devices; i++) {
171 struct ssb_device *dev;
172 dev = &(bus->devices[i]);
173 print_irq(dev, ssb_mips_irq(dev));
177 static void ssb_mips_serial_init(struct ssb_mipscore *mcore)
179 struct ssb_bus *bus = mcore->dev->bus;
182 mcore->nr_serial_ports = ssb_extif_serial_init(&bus->extif, mcore->serial_ports);
183 else if (bus->chipco.dev)
184 mcore->nr_serial_ports = ssb_chipco_serial_init(&bus->chipco, mcore->serial_ports);
186 mcore->nr_serial_ports = 0;
189 static void ssb_mips_flash_detect(struct ssb_mipscore *mcore)
191 struct ssb_bus *bus = mcore->dev->bus;
193 mcore->flash_buswidth = 2;
194 if (bus->chipco.dev) {
195 mcore->flash_window = 0x1c000000;
196 mcore->flash_window_size = 0x02000000;
197 if ((ssb_read32(bus->chipco.dev, SSB_CHIPCO_FLASH_CFG)
198 & SSB_CHIPCO_CFG_DS16) == 0)
199 mcore->flash_buswidth = 1;
201 mcore->flash_window = 0x1fc00000;
202 mcore->flash_window_size = 0x00400000;
206 u32 ssb_cpu_clock(struct ssb_mipscore *mcore)
208 struct ssb_bus *bus = mcore->dev->bus;
209 u32 pll_type, n, m, rate = 0;
211 if (bus->extif.dev) {
212 ssb_extif_get_clockcontrol(&bus->extif, &pll_type, &n, &m);
213 } else if (bus->chipco.dev) {
214 ssb_chipco_get_clockcpu(&bus->chipco, &pll_type, &n, &m);
218 if ((pll_type == SSB_PLLTYPE_5) || (bus->chip_id == 0x5365)) {
221 rate = ssb_calc_clock_rate(pll_type, n, m);
224 if (pll_type == SSB_PLLTYPE_6) {
231 void ssb_mipscore_init(struct ssb_mipscore *mcore)
234 struct ssb_device *dev;
235 unsigned long hz, ns;
239 return; /* We don't have a MIPS core */
241 ssb_dprintk(KERN_INFO PFX "Initializing MIPS core...\n");
243 bus = mcore->dev->bus;
244 hz = ssb_clockspeed(bus);
247 ns = 1000000000 / hz;
250 ssb_extif_timing_init(&bus->extif, ns);
251 else if (bus->chipco.dev)
252 ssb_chipco_timing_init(&bus->chipco, ns);
254 /* Assign IRQs to all cores on the bus, start with irq line 2, because serial usually takes 1 */
255 for (irq = 2, i = 0; i < bus->nr_devices; i++) {
257 dev = &(bus->devices[i]);
258 mips_irq = ssb_mips_irq(dev);
262 dev->irq = mips_irq + 2;
265 switch (dev->id.coreid) {
266 case SSB_DEV_USB11_HOST:
267 /* shouldn't need a separate irq line for non-4710, most of them have a proper
268 * external usb controller on the pci */
269 if ((bus->chip_id == 0x4710) && (irq <= 4)) {
275 case SSB_DEV_ETHERNET:
276 case SSB_DEV_ETHERNET_GBIT:
278 case SSB_DEV_USB20_HOST:
279 /* These devices get their own IRQ line if available, the rest goes on IRQ0 */
286 ssb_dprintk(KERN_INFO PFX "after irq reconfiguration\n");
289 ssb_mips_serial_init(mcore);
290 ssb_mips_flash_detect(mcore);