update work in progress rewritten bcm947xx code. wifi and usb seem to be working...
[librecmc/librecmc.git] / target / linux / brcm47xx-2.6 / files / drivers / ssb / driver_chipcommon / chipcommon.c
1 /*
2  * Sonics Silicon Backplane
3  * Broadcom ChipCommon core driver
4  *
5  * Copyright 2005, Broadcom Corporation
6  * Copyright 2006, 2007, Michael Buesch <mb@bu3sch.de>
7  *
8  * Licensed under the GNU/GPL. See COPYING for details.
9  */
10
11 #include <linux/ssb/ssb.h>
12 #include <linux/ssb/ssb_regs.h>
13 #include <linux/pci.h>
14
15 #include "../ssb_private.h"
16
17
18 /* Clock sources */
19 enum {
20         /* PCI clock */
21         SSB_CHIPCO_CLKSRC_PCI,
22         /* Crystal slow clock oscillator */
23         SSB_CHIPCO_CLKSRC_XTALOS,
24         /* Low power oscillator */
25         SSB_CHIPCO_CLKSRC_LOPWROS,
26 };
27
28
29 static inline u32 chipco_read32(struct ssb_chipcommon *cc,
30                                 u16 offset)
31 {
32         return ssb_read32(cc->dev, offset);
33 }
34
35 static inline void chipco_write32(struct ssb_chipcommon *cc,
36                                   u16 offset,
37                                   u32 value)
38 {
39         ssb_write32(cc->dev, offset, value);
40 }
41
42
43 void ssb_chipco_set_clockmode(struct ssb_chipcommon *cc,
44                               enum ssb_clkmode mode)
45 {
46         struct ssb_device *ccdev = cc->dev;
47         struct ssb_bus *bus;
48         u32 tmp;
49
50         if (!ccdev)
51                 return;
52         bus = ccdev->bus;
53         /* chipcommon cores prior to rev6 don't support dynamic clock control */
54         if (ccdev->id.revision < 6)
55                 return;
56         /* chipcommon cores rev10 are a whole new ball game */
57         if (ccdev->id.revision >= 10)
58                 return;
59         if (!(cc->capabilities & SSB_CHIPCO_CAP_PCTL))
60                 return;
61
62         switch (mode) {
63         case SSB_CLKMODE_SLOW:
64                 tmp = chipco_read32(cc, SSB_CHIPCO_SLOWCLKCTL);
65                 tmp |= SSB_CHIPCO_SLOWCLKCTL_FSLOW;
66                 chipco_write32(cc, SSB_CHIPCO_SLOWCLKCTL, tmp);
67                 break;
68         case SSB_CLKMODE_FAST:
69                 ssb_pci_xtal(bus, SSB_GPIO_XTAL, 1); /* Force crystal on */
70                 tmp = chipco_read32(cc, SSB_CHIPCO_SLOWCLKCTL);
71                 tmp &= ~SSB_CHIPCO_SLOWCLKCTL_FSLOW;
72                 tmp |= SSB_CHIPCO_SLOWCLKCTL_IPLL;
73                 chipco_write32(cc, SSB_CHIPCO_SLOWCLKCTL, tmp);
74                 break;
75         case SSB_CLKMODE_DYNAMIC:
76                 tmp = chipco_read32(cc, SSB_CHIPCO_SLOWCLKCTL);
77                 tmp &= ~SSB_CHIPCO_SLOWCLKCTL_FSLOW;
78                 tmp &= ~SSB_CHIPCO_SLOWCLKCTL_IPLL;
79                 tmp &= ~SSB_CHIPCO_SLOWCLKCTL_ENXTAL;
80                 if ((tmp & SSB_CHIPCO_SLOWCLKCTL_SRC) != SSB_CHIPCO_SLOWCLKCTL_SRC_XTAL)
81                         tmp |= SSB_CHIPCO_SLOWCLKCTL_ENXTAL;
82                 chipco_write32(cc, SSB_CHIPCO_SLOWCLKCTL, tmp);
83
84                 /* for dynamic control, we have to release our xtal_pu "force on" */
85                 if (tmp & SSB_CHIPCO_SLOWCLKCTL_ENXTAL)
86                         ssb_pci_xtal(bus, SSB_GPIO_XTAL, 0);
87                 break;
88         default:
89                 assert(0);
90         }
91 }
92 EXPORT_SYMBOL(ssb_chipco_set_clockmode);
93
94 /* Get the Slow Clock Source */
95 static int chipco_pctl_get_slowclksrc(struct ssb_chipcommon *cc)
96 {
97         struct ssb_bus *bus = cc->dev->bus;
98         u32 tmp = 0;
99
100         if (cc->dev->id.revision < 6) {
101                 if (bus->bustype == SSB_BUSTYPE_SSB /*TODO ||
102                     bus->bustype == SSB_BUSTYPE_PCMCIA*/)
103                         return SSB_CHIPCO_CLKSRC_XTALOS;
104                 if (bus->bustype == SSB_BUSTYPE_PCI) {
105                         pci_read_config_dword(bus->host_pci, SSB_GPIO_OUT, &tmp);
106                         if (tmp & 0x10)
107                                 return SSB_CHIPCO_CLKSRC_PCI;
108                         return SSB_CHIPCO_CLKSRC_XTALOS;
109                 }
110         }
111         if (cc->dev->id.revision < 10) {
112                 tmp = chipco_read32(cc, SSB_CHIPCO_SLOWCLKCTL);
113                 tmp &= 0x7;
114                 if (tmp == 0)
115                         return SSB_CHIPCO_CLKSRC_LOPWROS;
116                 if (tmp == 1)
117                         return SSB_CHIPCO_CLKSRC_XTALOS;
118                 if (tmp == 2)
119                         return SSB_CHIPCO_CLKSRC_PCI;
120         }
121
122         return SSB_CHIPCO_CLKSRC_XTALOS;
123 }
124
125 /* Get maximum or minimum (depending on get_max flag) slowclock frequency. */
126 static int chipco_pctl_clockfreqlimit(struct ssb_chipcommon *cc, int get_max)
127 {
128         int limit;
129         int clocksrc;
130         int divisor;
131         u32 tmp;
132
133         clocksrc = chipco_pctl_get_slowclksrc(cc);
134         if (cc->dev->id.revision < 6) {
135                 switch (clocksrc) {
136                 case SSB_CHIPCO_CLKSRC_PCI:
137                         divisor = 64;
138                         break;
139                 case SSB_CHIPCO_CLKSRC_XTALOS:
140                         divisor = 32;
141                         break;
142                 default:
143                         assert(0);
144                         divisor = 1;
145                 }
146         } else if (cc->dev->id.revision < 10) {
147                 switch (clocksrc) {
148                 case SSB_CHIPCO_CLKSRC_LOPWROS:
149                         divisor = 1;
150                         break;
151                 case SSB_CHIPCO_CLKSRC_XTALOS:
152                 case SSB_CHIPCO_CLKSRC_PCI:
153                         tmp = chipco_read32(cc, SSB_CHIPCO_SLOWCLKCTL);
154                         divisor = (tmp >> 16) + 1;
155                         divisor *= 4;
156                         break;
157                 default:
158                         assert(0);
159                         divisor = 1;
160                 }
161         } else {
162                 tmp = chipco_read32(cc, SSB_CHIPCO_SYSCLKCTL);
163                 divisor = (tmp >> 16) + 1;
164                 divisor *= 4;
165         }
166
167         switch (clocksrc) {
168         case SSB_CHIPCO_CLKSRC_LOPWROS:
169                 if (get_max)
170                         limit = 43000;
171                 else
172                         limit = 25000;
173                 break;
174         case SSB_CHIPCO_CLKSRC_XTALOS:
175                 if (get_max)
176                         limit = 20200000;
177                 else
178                         limit = 19800000;
179                 break;
180         case SSB_CHIPCO_CLKSRC_PCI:
181                 if (get_max)
182                         limit = 34000000;
183                 else
184                         limit = 25000000;
185                 break;
186         default:
187                 assert(0);
188                 limit = 0;
189         }
190         limit /= divisor;
191
192         return limit;
193 }
194
195 static void chipco_powercontrol_init(struct ssb_chipcommon *cc)
196 {
197         struct ssb_bus *bus = cc->dev->bus;
198
199         if (bus->chip_id == 0x4321) {
200                 if (bus->chip_rev == 0)
201                         chipco_write32(cc, SSB_CHIPCO_CHIPCTL, 0x3A4);
202                 else if (bus->chip_rev == 1)
203                         chipco_write32(cc, SSB_CHIPCO_CHIPCTL, 0xA4);
204         }
205
206         if (!(cc->capabilities & SSB_CHIPCO_CAP_PCTL))
207                 return;
208
209         if (cc->dev->id.revision >= 10) {
210                 /* Set Idle Power clock rate to 1Mhz */
211                 chipco_write32(cc, SSB_CHIPCO_SYSCLKCTL,
212                                (chipco_read32(cc, SSB_CHIPCO_SYSCLKCTL) &
213                                 0x0000FFFF) | 0x00040000);
214         } else {
215                 int maxfreq;
216
217                 maxfreq = chipco_pctl_clockfreqlimit(cc, 1);
218                 chipco_write32(cc, SSB_CHIPCO_PLLONDELAY,
219                                (maxfreq * 150 + 999999) / 1000000);
220                 chipco_write32(cc, SSB_CHIPCO_FREFSELDELAY,
221                                (maxfreq * 15 + 999999) / 1000000);
222         }
223 }
224
225 static void calc_fast_powerup_delay(struct ssb_chipcommon *cc)
226 {
227         struct ssb_bus *bus = cc->dev->bus;
228         int minfreq;
229         unsigned int tmp;
230         u32 pll_on_delay;
231
232         if (bus->bustype != SSB_BUSTYPE_PCI)
233                 return;
234         if (!(cc->capabilities & SSB_CHIPCO_CAP_PCTL))
235                 return;
236
237         minfreq = chipco_pctl_clockfreqlimit(cc, 0);
238         pll_on_delay = chipco_read32(cc, SSB_CHIPCO_PLLONDELAY);
239         tmp = (((pll_on_delay + 2) * 1000000) + (minfreq - 1)) / minfreq;
240         assert((tmp & ~0xFFFF) == 0);
241
242         cc->fast_pwrup_delay = tmp;
243 }
244
245 void ssb_chipcommon_init(struct ssb_chipcommon *cc)
246 {
247         if (!cc->dev)
248                 return; /* We don't have a ChipCommon */
249         ssb_chipco_set_clockmode(cc, SSB_CLKMODE_FAST);
250         chipco_powercontrol_init(cc);
251         calc_fast_powerup_delay(cc);
252 }
253
254 void ssb_chipco_suspend(struct ssb_chipcommon *cc, pm_message_t state)
255 {
256         if (!cc->dev)
257                 return;
258         ssb_chipco_set_clockmode(cc, SSB_CLKMODE_SLOW);
259 }
260
261 void ssb_chipco_resume(struct ssb_chipcommon *cc)
262 {
263         if (!cc->dev)
264                 return;
265         ssb_chipco_set_clockmode(cc, SSB_CLKMODE_FAST);
266         chipco_powercontrol_init(cc);
267 }
268
269 void ssb_chipco_get_clockcontrol(struct ssb_chipcommon *cc,
270                                  u32 *plltype, u32 *n, u32 *m)
271 {
272         *n = chipco_read32(cc, SSB_CHIPCO_CLOCK_N);
273         *plltype = (cc->capabilities & SSB_CHIPCO_CAP_PLLT);
274         switch (*plltype) {
275         case SSB_PLLTYPE_6: /* 100/200 or 120/240 only */
276                 *m = chipco_read32(cc, SSB_CHIPCO_CLOCK_MIPS);
277                 break;
278         case SSB_PLLTYPE_3: /* 25Mhz, 2 dividers */
279                 if (cc->dev->bus->chip_id != 0x5365) {
280                         *m = chipco_read32(cc, SSB_CHIPCO_CLOCK_M2);
281                         break;
282                 }
283                 /* Fallthough */
284         default:
285                 *m = chipco_read32(cc, SSB_CHIPCO_CLOCK_SB);
286         }
287 }
288
289 void ssb_chipco_timing_init(struct ssb_chipcommon *cc,
290                             unsigned long ns)
291 {
292         struct ssb_device *dev = cc->dev;
293         struct ssb_bus *bus = dev->bus;
294         u32 tmp;
295
296         /* set register for external IO to control LED. */
297         chipco_write32(cc, SSB_CHIPCO_PROG_CFG, 0x11);
298         tmp = ceildiv(10, ns) << SSB_PROG_WCNT_3_SHIFT;         /* Waitcount-3 = 10ns */
299         tmp |= ceildiv(40, ns) << SSB_PROG_WCNT_1_SHIFT;        /* Waitcount-1 = 40ns */
300         tmp |= ceildiv(240, ns);                                /* Waitcount-0 = 240ns */
301         chipco_write32(cc, SSB_CHIPCO_PROG_WAITCNT, tmp);       /* 0x01020a0c for a 100Mhz clock */
302
303         /* Set timing for the flash */
304         tmp = ceildiv(10, ns) << SSB_FLASH_WCNT_3_SHIFT;        /* Waitcount-3 = 10nS */
305         tmp |= ceildiv(10, ns) << SSB_FLASH_WCNT_1_SHIFT;       /* Waitcount-1 = 10nS */
306         tmp |= ceildiv(120, ns);                                /* Waitcount-0 = 120nS */
307         if ((bus->chip_id == 0x5365) ||
308             (dev->id.revision < 9))
309                 chipco_write32(cc, SSB_CHIPCO_FLASH_WAITCNT, tmp);
310         if ((bus->chip_id == 0x5365) ||
311             (dev->id.revision < 9) ||
312             ((bus->chip_id == 0x5350) && (bus->chip_rev == 0)))
313                 chipco_write32(cc, SSB_CHIPCO_PCMCIA_MEMWAIT, tmp);
314
315         if (bus->chip_id == 0x5350) {
316                 /* Enable EXTIF */
317                 tmp = ceildiv(10, ns) << SSB_PROG_WCNT_3_SHIFT;   /* Waitcount-3 = 10ns */
318                 tmp |= ceildiv(20, ns) << SSB_PROG_WCNT_2_SHIFT;  /* Waitcount-2 = 20ns */
319                 tmp |= ceildiv(100, ns) << SSB_PROG_WCNT_1_SHIFT; /* Waitcount-1 = 100ns */
320                 tmp |= ceildiv(120, ns);                          /* Waitcount-0 = 120ns */
321                 chipco_write32(cc, SSB_CHIPCO_PROG_WAITCNT, tmp); /* 0x01020a0c for a 100Mhz clock */
322         }
323 }
324
325 #ifdef CONFIG_SSB_SERIAL
326 int ssb_chipco_serial_init(struct ssb_chipcommon *cc,
327                            struct ssb_serial_port *ports)
328 {
329         struct ssb_bus *bus = cc->dev->bus;
330         int nr_ports = 0;
331         u32 plltype;
332         unsigned int irq;
333         u32 baud_base, div;
334         u32 i, n;
335
336         plltype = (cc->capabilities & SSB_CHIPCO_CAP_PLLT);
337         irq = ssb_mips_irq(cc->dev);
338
339         if (plltype == SSB_PLLTYPE_1) {
340                 /* PLL clock */
341                 baud_base = ssb_calc_clock_rate(plltype,
342                                                 chipco_read32(cc, SSB_CHIPCO_CLOCK_N),
343                                                 chipco_read32(cc, SSB_CHIPCO_CLOCK_M2));
344                 div = 1;
345         } else {
346                 if (cc->dev->id.revision >= 11) {
347                         /* Fixed ALP clock */
348                         baud_base = 20000000;
349                         div = 1;
350                         /* Set the override bit so we don't divide it */
351                         chipco_write32(cc, SSB_CHIPCO_CORECTL,
352                                        SSB_CHIPCO_CORECTL_UARTCLK0);
353                 } else if (cc->dev->id.revision >= 3) {
354                         /* Internal backplane clock */
355                         baud_base = ssb_clockspeed(bus);
356                         div = 2; /* Minimum divisor */
357                         chipco_write32(cc, SSB_CHIPCO_CLKDIV,
358                                        (chipco_read32(cc, SSB_CHIPCO_CLKDIV)
359                                         & ~SSB_CHIPCO_CLKDIV_UART) | div);
360                 } else {
361                         /* Fixed internal backplane clock */
362                         baud_base = 88000000;
363                         div = 48;
364                 }
365
366                 /* Clock source depends on strapping if UartClkOverride is unset */
367                 if ((cc->dev->id.revision > 0) &&
368                     !(chipco_read32(cc, SSB_CHIPCO_CORECTL) & SSB_CHIPCO_CORECTL_UARTCLK0)) {
369                         if ((cc->capabilities & SSB_CHIPCO_CAP_UARTCLK) ==
370                             SSB_CHIPCO_CAP_UARTCLK_INT) {
371                                 /* Internal divided backplane clock */
372                                 baud_base /= div;
373                         } else {
374                                 /* Assume external clock of 1.8432 MHz */
375                                 baud_base = 1843200;
376                         }
377                 }
378         }
379
380         /* Determine the registers of the UARTs */
381         n = (cc->capabilities & SSB_CHIPCO_CAP_NRUART);
382         for (i = 0; i < n; i++) {
383                 void __iomem *cc_mmio;
384                 void __iomem *uart_regs;
385
386                 cc_mmio = cc->dev->bus->mmio + (cc->dev->core_index * SSB_CORE_SIZE);
387                 uart_regs = cc_mmio + SSB_CHIPCO_UART0_DATA;
388                 /* Offset changed at after rev 0 */
389                 if (cc->dev->id.revision == 0)
390                         uart_regs += (i * 8);
391                 else
392                         uart_regs += (i * 256);
393
394                 nr_ports++;
395                 ports[i].regs = uart_regs;
396                 ports[i].irq = irq;
397                 ports[i].baud_base = baud_base;
398                 ports[i].reg_shift = 0;
399         }
400
401         return nr_ports;
402 }
403 #endif /* CONFIG_SSB_SERIAL */