]> www.pilppa.org Git - linux-2.6-omap-h63xx.git/blob - arch/arm/common/sa1111.c
2048ae0b15599b5c1dc20ce6d195832920df2865
[linux-2.6-omap-h63xx.git] / arch / arm / common / sa1111.c
1 /*
2  * linux/arch/arm/common/sa1111.c
3  *
4  * SA1111 support
5  *
6  * Original code by John Dorsey
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License version 2 as
10  * published by the Free Software Foundation.
11  *
12  * This file contains all generic SA1111 support.
13  *
14  * All initialization functions provided here are intended to be called
15  * from machine specific code with proper arguments when required.
16  */
17 #include <linux/module.h>
18 #include <linux/init.h>
19 #include <linux/kernel.h>
20 #include <linux/delay.h>
21 #include <linux/errno.h>
22 #include <linux/ioport.h>
23 #include <linux/platform_device.h>
24 #include <linux/slab.h>
25 #include <linux/spinlock.h>
26 #include <linux/dma-mapping.h>
27 #include <linux/clk.h>
28
29 #include <asm/hardware.h>
30 #include <asm/mach-types.h>
31 #include <asm/io.h>
32 #include <asm/irq.h>
33 #include <asm/mach/irq.h>
34 #include <asm/sizes.h>
35
36 #include <asm/hardware/sa1111.h>
37
38 extern void __init sa1110_mb_enable(void);
39
40 /*
41  * We keep the following data for the overall SA1111.  Note that the
42  * struct device and struct resource are "fake"; they should be supplied
43  * by the bus above us.  However, in the interests of getting all SA1111
44  * drivers converted over to the device model, we provide this as an
45  * anchor point for all the other drivers.
46  */
47 struct sa1111 {
48         struct device   *dev;
49         struct clk      *clk;
50         unsigned long   phys;
51         int             irq;
52         spinlock_t      lock;
53         void __iomem    *base;
54 #ifdef CONFIG_PM
55         void            *saved_state;
56 #endif
57 };
58
59 /*
60  * We _really_ need to eliminate this.  Its only users
61  * are the PWM and DMA checking code.
62  */
63 static struct sa1111 *g_sa1111;
64
65 struct sa1111_dev_info {
66         unsigned long   offset;
67         unsigned long   skpcr_mask;
68         unsigned int    devid;
69         unsigned int    irq[6];
70 };
71
72 static struct sa1111_dev_info sa1111_devices[] = {
73         {
74                 .offset         = SA1111_USB,
75                 .skpcr_mask     = SKPCR_UCLKEN,
76                 .devid          = SA1111_DEVID_USB,
77                 .irq = {
78                         IRQ_USBPWR,
79                         IRQ_HCIM,
80                         IRQ_HCIBUFFACC,
81                         IRQ_HCIRMTWKP,
82                         IRQ_NHCIMFCIR,
83                         IRQ_USB_PORT_RESUME
84                 },
85         },
86         {
87                 .offset         = 0x0600,
88                 .skpcr_mask     = SKPCR_I2SCLKEN | SKPCR_L3CLKEN,
89                 .devid          = SA1111_DEVID_SAC,
90                 .irq = {
91                         AUDXMTDMADONEA,
92                         AUDXMTDMADONEB,
93                         AUDRCVDMADONEA,
94                         AUDRCVDMADONEB
95                 },
96         },
97         {
98                 .offset         = 0x0800,
99                 .skpcr_mask     = SKPCR_SCLKEN,
100                 .devid          = SA1111_DEVID_SSP,
101         },
102         {
103                 .offset         = SA1111_KBD,
104                 .skpcr_mask     = SKPCR_PTCLKEN,
105                 .devid          = SA1111_DEVID_PS2,
106                 .irq = {
107                         IRQ_TPRXINT,
108                         IRQ_TPTXINT
109                 },
110         },
111         {
112                 .offset         = SA1111_MSE,
113                 .skpcr_mask     = SKPCR_PMCLKEN,
114                 .devid          = SA1111_DEVID_PS2,
115                 .irq = {
116                         IRQ_MSRXINT,
117                         IRQ_MSTXINT
118                 },
119         },
120         {
121                 .offset         = 0x1800,
122                 .skpcr_mask     = 0,
123                 .devid          = SA1111_DEVID_PCMCIA,
124                 .irq = {
125                         IRQ_S0_READY_NINT,
126                         IRQ_S0_CD_VALID,
127                         IRQ_S0_BVD1_STSCHG,
128                         IRQ_S1_READY_NINT,
129                         IRQ_S1_CD_VALID,
130                         IRQ_S1_BVD1_STSCHG,
131                 },
132         },
133 };
134
135 void __init sa1111_adjust_zones(int node, unsigned long *size, unsigned long *holes)
136 {
137         unsigned int sz = SZ_1M >> PAGE_SHIFT;
138
139         if (node != 0)
140                 sz = 0;
141
142         size[1] = size[0] - sz;
143         size[0] = sz;
144 }
145
146 /*
147  * SA1111 interrupt support.  Since clearing an IRQ while there are
148  * active IRQs causes the interrupt output to pulse, the upper levels
149  * will call us again if there are more interrupts to process.
150  */
151 static void
152 sa1111_irq_handler(unsigned int irq, struct irq_desc *desc)
153 {
154         unsigned int stat0, stat1, i;
155         void __iomem *base = get_irq_data(irq);
156
157         stat0 = sa1111_readl(base + SA1111_INTSTATCLR0);
158         stat1 = sa1111_readl(base + SA1111_INTSTATCLR1);
159
160         sa1111_writel(stat0, base + SA1111_INTSTATCLR0);
161
162         desc->chip->ack(irq);
163
164         sa1111_writel(stat1, base + SA1111_INTSTATCLR1);
165
166         if (stat0 == 0 && stat1 == 0) {
167                 do_bad_IRQ(irq, desc);
168                 return;
169         }
170
171         for (i = IRQ_SA1111_START; stat0; i++, stat0 >>= 1)
172                 if (stat0 & 1)
173                         handle_edge_irq(i, irq_desc + i);
174
175         for (i = IRQ_SA1111_START + 32; stat1; i++, stat1 >>= 1)
176                 if (stat1 & 1)
177                         handle_edge_irq(i, irq_desc + i);
178
179         /* For level-based interrupts */
180         desc->chip->unmask(irq);
181 }
182
183 #define SA1111_IRQMASK_LO(x)    (1 << (x - IRQ_SA1111_START))
184 #define SA1111_IRQMASK_HI(x)    (1 << (x - IRQ_SA1111_START - 32))
185
186 static void sa1111_ack_irq(unsigned int irq)
187 {
188 }
189
190 static void sa1111_mask_lowirq(unsigned int irq)
191 {
192         void __iomem *mapbase = get_irq_chip_data(irq);
193         unsigned long ie0;
194
195         ie0 = sa1111_readl(mapbase + SA1111_INTEN0);
196         ie0 &= ~SA1111_IRQMASK_LO(irq);
197         writel(ie0, mapbase + SA1111_INTEN0);
198 }
199
200 static void sa1111_unmask_lowirq(unsigned int irq)
201 {
202         void __iomem *mapbase = get_irq_chip_data(irq);
203         unsigned long ie0;
204
205         ie0 = sa1111_readl(mapbase + SA1111_INTEN0);
206         ie0 |= SA1111_IRQMASK_LO(irq);
207         sa1111_writel(ie0, mapbase + SA1111_INTEN0);
208 }
209
210 /*
211  * Attempt to re-trigger the interrupt.  The SA1111 contains a register
212  * (INTSET) which claims to do this.  However, in practice no amount of
213  * manipulation of INTEN and INTSET guarantees that the interrupt will
214  * be triggered.  In fact, its very difficult, if not impossible to get
215  * INTSET to re-trigger the interrupt.
216  */
217 static int sa1111_retrigger_lowirq(unsigned int irq)
218 {
219         unsigned int mask = SA1111_IRQMASK_LO(irq);
220         void __iomem *mapbase = get_irq_chip_data(irq);
221         unsigned long ip0;
222         int i;
223
224         ip0 = sa1111_readl(mapbase + SA1111_INTPOL0);
225         for (i = 0; i < 8; i++) {
226                 sa1111_writel(ip0 ^ mask, mapbase + SA1111_INTPOL0);
227                 sa1111_writel(ip0, mapbase + SA1111_INTPOL0);
228                 if (sa1111_readl(mapbase + SA1111_INTSTATCLR1) & mask)
229                         break;
230         }
231
232         if (i == 8)
233                 printk(KERN_ERR "Danger Will Robinson: failed to "
234                         "re-trigger IRQ%d\n", irq);
235         return i == 8 ? -1 : 0;
236 }
237
238 static int sa1111_type_lowirq(unsigned int irq, unsigned int flags)
239 {
240         unsigned int mask = SA1111_IRQMASK_LO(irq);
241         void __iomem *mapbase = get_irq_chip_data(irq);
242         unsigned long ip0;
243
244         if (flags == IRQT_PROBE)
245                 return 0;
246
247         if ((!(flags & __IRQT_RISEDGE) ^ !(flags & __IRQT_FALEDGE)) == 0)
248                 return -EINVAL;
249
250         ip0 = sa1111_readl(mapbase + SA1111_INTPOL0);
251         if (flags & __IRQT_RISEDGE)
252                 ip0 &= ~mask;
253         else
254                 ip0 |= mask;
255         sa1111_writel(ip0, mapbase + SA1111_INTPOL0);
256         sa1111_writel(ip0, mapbase + SA1111_WAKEPOL0);
257
258         return 0;
259 }
260
261 static int sa1111_wake_lowirq(unsigned int irq, unsigned int on)
262 {
263         unsigned int mask = SA1111_IRQMASK_LO(irq);
264         void __iomem *mapbase = get_irq_chip_data(irq);
265         unsigned long we0;
266
267         we0 = sa1111_readl(mapbase + SA1111_WAKEEN0);
268         if (on)
269                 we0 |= mask;
270         else
271                 we0 &= ~mask;
272         sa1111_writel(we0, mapbase + SA1111_WAKEEN0);
273
274         return 0;
275 }
276
277 static struct irq_chip sa1111_low_chip = {
278         .name           = "SA1111-l",
279         .ack            = sa1111_ack_irq,
280         .mask           = sa1111_mask_lowirq,
281         .unmask         = sa1111_unmask_lowirq,
282         .retrigger      = sa1111_retrigger_lowirq,
283         .set_type       = sa1111_type_lowirq,
284         .set_wake       = sa1111_wake_lowirq,
285 };
286
287 static void sa1111_mask_highirq(unsigned int irq)
288 {
289         void __iomem *mapbase = get_irq_chip_data(irq);
290         unsigned long ie1;
291
292         ie1 = sa1111_readl(mapbase + SA1111_INTEN1);
293         ie1 &= ~SA1111_IRQMASK_HI(irq);
294         sa1111_writel(ie1, mapbase + SA1111_INTEN1);
295 }
296
297 static void sa1111_unmask_highirq(unsigned int irq)
298 {
299         void __iomem *mapbase = get_irq_chip_data(irq);
300         unsigned long ie1;
301
302         ie1 = sa1111_readl(mapbase + SA1111_INTEN1);
303         ie1 |= SA1111_IRQMASK_HI(irq);
304         sa1111_writel(ie1, mapbase + SA1111_INTEN1);
305 }
306
307 /*
308  * Attempt to re-trigger the interrupt.  The SA1111 contains a register
309  * (INTSET) which claims to do this.  However, in practice no amount of
310  * manipulation of INTEN and INTSET guarantees that the interrupt will
311  * be triggered.  In fact, its very difficult, if not impossible to get
312  * INTSET to re-trigger the interrupt.
313  */
314 static int sa1111_retrigger_highirq(unsigned int irq)
315 {
316         unsigned int mask = SA1111_IRQMASK_HI(irq);
317         void __iomem *mapbase = get_irq_chip_data(irq);
318         unsigned long ip1;
319         int i;
320
321         ip1 = sa1111_readl(mapbase + SA1111_INTPOL1);
322         for (i = 0; i < 8; i++) {
323                 sa1111_writel(ip1 ^ mask, mapbase + SA1111_INTPOL1);
324                 sa1111_writel(ip1, mapbase + SA1111_INTPOL1);
325                 if (sa1111_readl(mapbase + SA1111_INTSTATCLR1) & mask)
326                         break;
327         }
328
329         if (i == 8)
330                 printk(KERN_ERR "Danger Will Robinson: failed to "
331                         "re-trigger IRQ%d\n", irq);
332         return i == 8 ? -1 : 0;
333 }
334
335 static int sa1111_type_highirq(unsigned int irq, unsigned int flags)
336 {
337         unsigned int mask = SA1111_IRQMASK_HI(irq);
338         void __iomem *mapbase = get_irq_chip_data(irq);
339         unsigned long ip1;
340
341         if (flags == IRQT_PROBE)
342                 return 0;
343
344         if ((!(flags & __IRQT_RISEDGE) ^ !(flags & __IRQT_FALEDGE)) == 0)
345                 return -EINVAL;
346
347         ip1 = sa1111_readl(mapbase + SA1111_INTPOL1);
348         if (flags & __IRQT_RISEDGE)
349                 ip1 &= ~mask;
350         else
351                 ip1 |= mask;
352         sa1111_writel(ip1, mapbase + SA1111_INTPOL1);
353         sa1111_writel(ip1, mapbase + SA1111_WAKEPOL1);
354
355         return 0;
356 }
357
358 static int sa1111_wake_highirq(unsigned int irq, unsigned int on)
359 {
360         unsigned int mask = SA1111_IRQMASK_HI(irq);
361         void __iomem *mapbase = get_irq_chip_data(irq);
362         unsigned long we1;
363
364         we1 = sa1111_readl(mapbase + SA1111_WAKEEN1);
365         if (on)
366                 we1 |= mask;
367         else
368                 we1 &= ~mask;
369         sa1111_writel(we1, mapbase + SA1111_WAKEEN1);
370
371         return 0;
372 }
373
374 static struct irq_chip sa1111_high_chip = {
375         .name           = "SA1111-h",
376         .ack            = sa1111_ack_irq,
377         .mask           = sa1111_mask_highirq,
378         .unmask         = sa1111_unmask_highirq,
379         .retrigger      = sa1111_retrigger_highirq,
380         .set_type       = sa1111_type_highirq,
381         .set_wake       = sa1111_wake_highirq,
382 };
383
384 static void sa1111_setup_irq(struct sa1111 *sachip)
385 {
386         void __iomem *irqbase = sachip->base + SA1111_INTC;
387         unsigned int irq;
388
389         /*
390          * We're guaranteed that this region hasn't been taken.
391          */
392         request_mem_region(sachip->phys + SA1111_INTC, 512, "irq");
393
394         /* disable all IRQs */
395         sa1111_writel(0, irqbase + SA1111_INTEN0);
396         sa1111_writel(0, irqbase + SA1111_INTEN1);
397         sa1111_writel(0, irqbase + SA1111_WAKEEN0);
398         sa1111_writel(0, irqbase + SA1111_WAKEEN1);
399
400         /*
401          * detect on rising edge.  Note: Feb 2001 Errata for SA1111
402          * specifies that S0ReadyInt and S1ReadyInt should be '1'.
403          */
404         sa1111_writel(0, irqbase + SA1111_INTPOL0);
405         sa1111_writel(SA1111_IRQMASK_HI(IRQ_S0_READY_NINT) |
406                       SA1111_IRQMASK_HI(IRQ_S1_READY_NINT),
407                       irqbase + SA1111_INTPOL1);
408
409         /* clear all IRQs */
410         sa1111_writel(~0, irqbase + SA1111_INTSTATCLR0);
411         sa1111_writel(~0, irqbase + SA1111_INTSTATCLR1);
412
413         for (irq = IRQ_GPAIN0; irq <= SSPROR; irq++) {
414                 set_irq_chip(irq, &sa1111_low_chip);
415                 set_irq_chip_data(irq, irqbase);
416                 set_irq_handler(irq, handle_edge_irq);
417                 set_irq_flags(irq, IRQF_VALID | IRQF_PROBE);
418         }
419
420         for (irq = AUDXMTDMADONEA; irq <= IRQ_S1_BVD1_STSCHG; irq++) {
421                 set_irq_chip(irq, &sa1111_high_chip);
422                 set_irq_chip_data(irq, irqbase);
423                 set_irq_handler(irq, handle_edge_irq);
424                 set_irq_flags(irq, IRQF_VALID | IRQF_PROBE);
425         }
426
427         /*
428          * Register SA1111 interrupt
429          */
430         set_irq_type(sachip->irq, IRQT_RISING);
431         set_irq_data(sachip->irq, irqbase);
432         set_irq_chained_handler(sachip->irq, sa1111_irq_handler);
433 }
434
435 /*
436  * Bring the SA1111 out of reset.  This requires a set procedure:
437  *  1. nRESET asserted (by hardware)
438  *  2. CLK turned on from SA1110
439  *  3. nRESET deasserted
440  *  4. VCO turned on, PLL_BYPASS turned off
441  *  5. Wait lock time, then assert RCLKEn
442  *  7. PCR set to allow clocking of individual functions
443  *
444  * Until we've done this, the only registers we can access are:
445  *   SBI_SKCR
446  *   SBI_SMCR
447  *   SBI_SKID
448  */
449 static void sa1111_wake(struct sa1111 *sachip)
450 {
451         unsigned long flags, r;
452
453         spin_lock_irqsave(&sachip->lock, flags);
454
455         clk_enable(sachip->clk);
456
457         /*
458          * Turn VCO on, and disable PLL Bypass.
459          */
460         r = sa1111_readl(sachip->base + SA1111_SKCR);
461         r &= ~SKCR_VCO_OFF;
462         sa1111_writel(r, sachip->base + SA1111_SKCR);
463         r |= SKCR_PLL_BYPASS | SKCR_OE_EN;
464         sa1111_writel(r, sachip->base + SA1111_SKCR);
465
466         /*
467          * Wait lock time.  SA1111 manual _doesn't_
468          * specify a figure for this!  We choose 100us.
469          */
470         udelay(100);
471
472         /*
473          * Enable RCLK.  We also ensure that RDYEN is set.
474          */
475         r |= SKCR_RCLKEN | SKCR_RDYEN;
476         sa1111_writel(r, sachip->base + SA1111_SKCR);
477
478         /*
479          * Wait 14 RCLK cycles for the chip to finish coming out
480          * of reset. (RCLK=24MHz).  This is 590ns.
481          */
482         udelay(1);
483
484         /*
485          * Ensure all clocks are initially off.
486          */
487         sa1111_writel(0, sachip->base + SA1111_SKPCR);
488
489         spin_unlock_irqrestore(&sachip->lock, flags);
490 }
491
492 #ifdef CONFIG_ARCH_SA1100
493
494 static u32 sa1111_dma_mask[] = {
495         ~0,
496         ~(1 << 20),
497         ~(1 << 23),
498         ~(1 << 24),
499         ~(1 << 25),
500         ~(1 << 20),
501         ~(1 << 20),
502         0,
503 };
504
505 /*
506  * Configure the SA1111 shared memory controller.
507  */
508 void
509 sa1111_configure_smc(struct sa1111 *sachip, int sdram, unsigned int drac,
510                      unsigned int cas_latency)
511 {
512         unsigned int smcr = SMCR_DTIM | SMCR_MBGE | FInsrt(drac, SMCR_DRAC);
513
514         if (cas_latency == 3)
515                 smcr |= SMCR_CLAT;
516
517         sa1111_writel(smcr, sachip->base + SA1111_SMCR);
518
519         /*
520          * Now clear the bits in the DMA mask to work around the SA1111
521          * DMA erratum (Intel StrongARM SA-1111 Microprocessor Companion
522          * Chip Specification Update, June 2000, Erratum #7).
523          */
524         if (sachip->dev->dma_mask)
525                 *sachip->dev->dma_mask &= sa1111_dma_mask[drac >> 2];
526
527         sachip->dev->coherent_dma_mask &= sa1111_dma_mask[drac >> 2];
528 }
529
530 #endif
531
532 static void sa1111_dev_release(struct device *_dev)
533 {
534         struct sa1111_dev *dev = SA1111_DEV(_dev);
535
536         release_resource(&dev->res);
537         kfree(dev);
538 }
539
540 static int
541 sa1111_init_one_child(struct sa1111 *sachip, struct resource *parent,
542                       struct sa1111_dev_info *info)
543 {
544         struct sa1111_dev *dev;
545         int ret;
546
547         dev = kzalloc(sizeof(struct sa1111_dev), GFP_KERNEL);
548         if (!dev) {
549                 ret = -ENOMEM;
550                 goto out;
551         }
552
553         snprintf(dev->dev.bus_id, sizeof(dev->dev.bus_id),
554                  "%4.4lx", info->offset);
555
556         dev->devid       = info->devid;
557         dev->dev.parent  = sachip->dev;
558         dev->dev.bus     = &sa1111_bus_type;
559         dev->dev.release = sa1111_dev_release;
560         dev->dev.coherent_dma_mask = sachip->dev->coherent_dma_mask;
561         dev->res.start   = sachip->phys + info->offset;
562         dev->res.end     = dev->res.start + 511;
563         dev->res.name    = dev->dev.bus_id;
564         dev->res.flags   = IORESOURCE_MEM;
565         dev->mapbase     = sachip->base + info->offset;
566         dev->skpcr_mask  = info->skpcr_mask;
567         memmove(dev->irq, info->irq, sizeof(dev->irq));
568
569         ret = request_resource(parent, &dev->res);
570         if (ret) {
571                 printk("SA1111: failed to allocate resource for %s\n",
572                         dev->res.name);
573                 kfree(dev);
574                 goto out;
575         }
576
577
578         ret = device_register(&dev->dev);
579         if (ret) {
580                 release_resource(&dev->res);
581                 kfree(dev);
582                 goto out;
583         }
584
585         /*
586          * If the parent device has a DMA mask associated with it,
587          * propagate it down to the children.
588          */
589         if (sachip->dev->dma_mask) {
590                 dev->dma_mask = *sachip->dev->dma_mask;
591                 dev->dev.dma_mask = &dev->dma_mask;
592
593                 if (dev->dma_mask != 0xffffffffUL) {
594                         ret = dmabounce_register_dev(&dev->dev, 1024, 4096);
595                         if (ret) {
596                                 dev_err(&dev->dev, "SA1111: Failed to register"
597                                         " with dmabounce\n");
598                                 device_unregister(&dev->dev);
599                         }
600                 }
601         }
602
603 out:
604         return ret;
605 }
606
607 /**
608  *      sa1111_probe - probe for a single SA1111 chip.
609  *      @phys_addr: physical address of device.
610  *
611  *      Probe for a SA1111 chip.  This must be called
612  *      before any other SA1111-specific code.
613  *
614  *      Returns:
615  *      %-ENODEV        device not found.
616  *      %-EBUSY         physical address already marked in-use.
617  *      %0              successful.
618  */
619 static int
620 __sa1111_probe(struct device *me, struct resource *mem, int irq)
621 {
622         struct sa1111 *sachip;
623         unsigned long id;
624         unsigned int has_devs;
625         int i, ret = -ENODEV;
626
627         sachip = kzalloc(sizeof(struct sa1111), GFP_KERNEL);
628         if (!sachip)
629                 return -ENOMEM;
630
631         sachip->clk = clk_get(me, "GPIO27_CLK");
632         if (!sachip->clk) {
633                 ret = PTR_ERR(sachip->clk);
634                 goto err_free;
635         }
636
637         spin_lock_init(&sachip->lock);
638
639         sachip->dev = me;
640         dev_set_drvdata(sachip->dev, sachip);
641
642         sachip->phys = mem->start;
643         sachip->irq = irq;
644
645         /*
646          * Map the whole region.  This also maps the
647          * registers for our children.
648          */
649         sachip->base = ioremap(mem->start, PAGE_SIZE * 2);
650         if (!sachip->base) {
651                 ret = -ENOMEM;
652                 goto err_clkput;
653         }
654
655         /*
656          * Probe for the chip.  Only touch the SBI registers.
657          */
658         id = sa1111_readl(sachip->base + SA1111_SKID);
659         if ((id & SKID_ID_MASK) != SKID_SA1111_ID) {
660                 printk(KERN_DEBUG "SA1111 not detected: ID = %08lx\n", id);
661                 ret = -ENODEV;
662                 goto err_unmap;
663         }
664
665         printk(KERN_INFO "SA1111 Microprocessor Companion Chip: "
666                 "silicon revision %lx, metal revision %lx\n",
667                 (id & SKID_SIREV_MASK)>>4, (id & SKID_MTREV_MASK));
668
669         /*
670          * We found it.  Wake the chip up, and initialise.
671          */
672         sa1111_wake(sachip);
673
674 #ifdef CONFIG_ARCH_SA1100
675         {
676         unsigned int val;
677
678         /*
679          * The SDRAM configuration of the SA1110 and the SA1111 must
680          * match.  This is very important to ensure that SA1111 accesses
681          * don't corrupt the SDRAM.  Note that this ungates the SA1111's
682          * MBGNT signal, so we must have called sa1110_mb_disable()
683          * beforehand.
684          */
685         sa1111_configure_smc(sachip, 1,
686                              FExtr(MDCNFG, MDCNFG_SA1110_DRAC0),
687                              FExtr(MDCNFG, MDCNFG_SA1110_TDL0));
688
689         /*
690          * We only need to turn on DCLK whenever we want to use the
691          * DMA.  It can otherwise be held firmly in the off position.
692          * (currently, we always enable it.)
693          */
694         val = sa1111_readl(sachip->base + SA1111_SKPCR);
695         sa1111_writel(val | SKPCR_DCLKEN, sachip->base + SA1111_SKPCR);
696
697         /*
698          * Enable the SA1110 memory bus request and grant signals.
699          */
700         sa1110_mb_enable();
701         }
702 #endif
703
704         /*
705          * The interrupt controller must be initialised before any
706          * other device to ensure that the interrupts are available.
707          */
708         if (sachip->irq != NO_IRQ)
709                 sa1111_setup_irq(sachip);
710
711         g_sa1111 = sachip;
712
713         has_devs = ~0;
714         if (machine_is_assabet() || machine_is_jornada720() ||
715             machine_is_badge4())
716                 has_devs &= ~(1 << 4);
717         else
718                 has_devs &= ~(1 << 1);
719
720         for (i = 0; i < ARRAY_SIZE(sa1111_devices); i++)
721                 if (has_devs & (1 << i))
722                         sa1111_init_one_child(sachip, mem, &sa1111_devices[i]);
723
724         return 0;
725
726  err_unmap:
727         iounmap(sachip->base);
728  err_clkput:
729         clk_put(sachip->clk);
730  err_free:
731         kfree(sachip);
732         return ret;
733 }
734
735 static int sa1111_remove_one(struct device *dev, void *data)
736 {
737         device_unregister(dev);
738         return 0;
739 }
740
741 static void __sa1111_remove(struct sa1111 *sachip)
742 {
743         void __iomem *irqbase = sachip->base + SA1111_INTC;
744
745         device_for_each_child(sachip->dev, NULL, sa1111_remove_one);
746
747         /* disable all IRQs */
748         sa1111_writel(0, irqbase + SA1111_INTEN0);
749         sa1111_writel(0, irqbase + SA1111_INTEN1);
750         sa1111_writel(0, irqbase + SA1111_WAKEEN0);
751         sa1111_writel(0, irqbase + SA1111_WAKEEN1);
752
753         clk_disable(sachip->clk);
754
755         if (sachip->irq != NO_IRQ) {
756                 set_irq_chained_handler(sachip->irq, NULL);
757                 set_irq_data(sachip->irq, NULL);
758
759                 release_mem_region(sachip->phys + SA1111_INTC, 512);
760         }
761
762         iounmap(sachip->base);
763         clk_put(sachip->clk);
764         kfree(sachip);
765 }
766
767 /*
768  * According to the "Intel StrongARM SA-1111 Microprocessor Companion
769  * Chip Specification Update" (June 2000), erratum #7, there is a
770  * significant bug in the SA1111 SDRAM shared memory controller.  If
771  * an access to a region of memory above 1MB relative to the bank base,
772  * it is important that address bit 10 _NOT_ be asserted. Depending
773  * on the configuration of the RAM, bit 10 may correspond to one
774  * of several different (processor-relative) address bits.
775  *
776  * This routine only identifies whether or not a given DMA address
777  * is susceptible to the bug.
778  *
779  * This should only get called for sa1111_device types due to the
780  * way we configure our device dma_masks.
781  */
782 int dma_needs_bounce(struct device *dev, dma_addr_t addr, size_t size)
783 {
784         /*
785          * Section 4.6 of the "Intel StrongARM SA-1111 Development Module
786          * User's Guide" mentions that jumpers R51 and R52 control the
787          * target of SA-1111 DMA (either SDRAM bank 0 on Assabet, or
788          * SDRAM bank 1 on Neponset). The default configuration selects
789          * Assabet, so any address in bank 1 is necessarily invalid.
790          */
791         return ((machine_is_assabet() || machine_is_pfs168()) &&
792                 (addr >= 0xc8000000 || (addr + size) >= 0xc8000000));
793 }
794
795 struct sa1111_save_data {
796         unsigned int    skcr;
797         unsigned int    skpcr;
798         unsigned int    skcdr;
799         unsigned char   skaud;
800         unsigned char   skpwm0;
801         unsigned char   skpwm1;
802
803         /*
804          * Interrupt controller
805          */
806         unsigned int    intpol0;
807         unsigned int    intpol1;
808         unsigned int    inten0;
809         unsigned int    inten1;
810         unsigned int    wakepol0;
811         unsigned int    wakepol1;
812         unsigned int    wakeen0;
813         unsigned int    wakeen1;
814 };
815
816 #ifdef CONFIG_PM
817
818 static int sa1111_suspend(struct platform_device *dev, pm_message_t state)
819 {
820         struct sa1111 *sachip = platform_get_drvdata(dev);
821         struct sa1111_save_data *save;
822         unsigned long flags;
823         unsigned int val;
824         void __iomem *base;
825
826         save = kmalloc(sizeof(struct sa1111_save_data), GFP_KERNEL);
827         if (!save)
828                 return -ENOMEM;
829         sachip->saved_state = save;
830
831         spin_lock_irqsave(&sachip->lock, flags);
832
833         /*
834          * Save state.
835          */
836         base = sachip->base;
837         save->skcr     = sa1111_readl(base + SA1111_SKCR);
838         save->skpcr    = sa1111_readl(base + SA1111_SKPCR);
839         save->skcdr    = sa1111_readl(base + SA1111_SKCDR);
840         save->skaud    = sa1111_readl(base + SA1111_SKAUD);
841         save->skpwm0   = sa1111_readl(base + SA1111_SKPWM0);
842         save->skpwm1   = sa1111_readl(base + SA1111_SKPWM1);
843
844         base = sachip->base + SA1111_INTC;
845         save->intpol0  = sa1111_readl(base + SA1111_INTPOL0);
846         save->intpol1  = sa1111_readl(base + SA1111_INTPOL1);
847         save->inten0   = sa1111_readl(base + SA1111_INTEN0);
848         save->inten1   = sa1111_readl(base + SA1111_INTEN1);
849         save->wakepol0 = sa1111_readl(base + SA1111_WAKEPOL0);
850         save->wakepol1 = sa1111_readl(base + SA1111_WAKEPOL1);
851         save->wakeen0  = sa1111_readl(base + SA1111_WAKEEN0);
852         save->wakeen1  = sa1111_readl(base + SA1111_WAKEEN1);
853
854         /*
855          * Disable.
856          */
857         val = sa1111_readl(sachip->base + SA1111_SKCR);
858         sa1111_writel(val | SKCR_SLEEP, sachip->base + SA1111_SKCR);
859         sa1111_writel(0, sachip->base + SA1111_SKPWM0);
860         sa1111_writel(0, sachip->base + SA1111_SKPWM1);
861
862         clk_disable(sachip->clk);
863
864         spin_unlock_irqrestore(&sachip->lock, flags);
865
866         return 0;
867 }
868
869 /*
870  *      sa1111_resume - Restore the SA1111 device state.
871  *      @dev: device to restore
872  *
873  *      Restore the general state of the SA1111; clock control and
874  *      interrupt controller.  Other parts of the SA1111 must be
875  *      restored by their respective drivers, and must be called
876  *      via LDM after this function.
877  */
878 static int sa1111_resume(struct platform_device *dev)
879 {
880         struct sa1111 *sachip = platform_get_drvdata(dev);
881         struct sa1111_save_data *save;
882         unsigned long flags, id;
883         void __iomem *base;
884
885         save = sachip->saved_state;
886         if (!save)
887                 return 0;
888
889         spin_lock_irqsave(&sachip->lock, flags);
890
891         /*
892          * Ensure that the SA1111 is still here.
893          * FIXME: shouldn't do this here.
894          */
895         id = sa1111_readl(sachip->base + SA1111_SKID);
896         if ((id & SKID_ID_MASK) != SKID_SA1111_ID) {
897                 __sa1111_remove(sachip);
898                 platform_set_drvdata(dev, NULL);
899                 kfree(save);
900                 return 0;
901         }
902
903         /*
904          * First of all, wake up the chip.
905          */
906         sa1111_wake(sachip);
907         sa1111_writel(0, sachip->base + SA1111_INTC + SA1111_INTEN0);
908         sa1111_writel(0, sachip->base + SA1111_INTC + SA1111_INTEN1);
909
910         base = sachip->base;
911         sa1111_writel(save->skcr,     base + SA1111_SKCR);
912         sa1111_writel(save->skpcr,    base + SA1111_SKPCR);
913         sa1111_writel(save->skcdr,    base + SA1111_SKCDR);
914         sa1111_writel(save->skaud,    base + SA1111_SKAUD);
915         sa1111_writel(save->skpwm0,   base + SA1111_SKPWM0);
916         sa1111_writel(save->skpwm1,   base + SA1111_SKPWM1);
917
918         base = sachip->base + SA1111_INTC;
919         sa1111_writel(save->intpol0,  base + SA1111_INTPOL0);
920         sa1111_writel(save->intpol1,  base + SA1111_INTPOL1);
921         sa1111_writel(save->inten0,   base + SA1111_INTEN0);
922         sa1111_writel(save->inten1,   base + SA1111_INTEN1);
923         sa1111_writel(save->wakepol0, base + SA1111_WAKEPOL0);
924         sa1111_writel(save->wakepol1, base + SA1111_WAKEPOL1);
925         sa1111_writel(save->wakeen0,  base + SA1111_WAKEEN0);
926         sa1111_writel(save->wakeen1,  base + SA1111_WAKEEN1);
927
928         spin_unlock_irqrestore(&sachip->lock, flags);
929
930         sachip->saved_state = NULL;
931         kfree(save);
932
933         return 0;
934 }
935
936 #else
937 #define sa1111_suspend NULL
938 #define sa1111_resume  NULL
939 #endif
940
941 static int sa1111_probe(struct platform_device *pdev)
942 {
943         struct resource *mem;
944         int irq;
945
946         mem = platform_get_resource(pdev, IORESOURCE_MEM, 0);
947         if (!mem)
948                 return -EINVAL;
949         irq = platform_get_irq(pdev, 0);
950         if (irq < 0)
951                 return -ENXIO;
952
953         return __sa1111_probe(&pdev->dev, mem, irq);
954 }
955
956 static int sa1111_remove(struct platform_device *pdev)
957 {
958         struct sa1111 *sachip = platform_get_drvdata(pdev);
959
960         if (sachip) {
961                 __sa1111_remove(sachip);
962                 platform_set_drvdata(pdev, NULL);
963
964 #ifdef CONFIG_PM
965                 kfree(sachip->saved_state);
966                 sachip->saved_state = NULL;
967 #endif
968         }
969
970         return 0;
971 }
972
973 /*
974  *      Not sure if this should be on the system bus or not yet.
975  *      We really want some way to register a system device at
976  *      the per-machine level, and then have this driver pick
977  *      up the registered devices.
978  *
979  *      We also need to handle the SDRAM configuration for
980  *      PXA250/SA1110 machine classes.
981  */
982 static struct platform_driver sa1111_device_driver = {
983         .probe          = sa1111_probe,
984         .remove         = sa1111_remove,
985         .suspend        = sa1111_suspend,
986         .resume         = sa1111_resume,
987         .driver         = {
988                 .name   = "sa1111",
989         },
990 };
991
992 /*
993  *      Get the parent device driver (us) structure
994  *      from a child function device
995  */
996 static inline struct sa1111 *sa1111_chip_driver(struct sa1111_dev *sadev)
997 {
998         return (struct sa1111 *)dev_get_drvdata(sadev->dev.parent);
999 }
1000
1001 /*
1002  * The bits in the opdiv field are non-linear.
1003  */
1004 static unsigned char opdiv_table[] = { 1, 4, 2, 8 };
1005
1006 static unsigned int __sa1111_pll_clock(struct sa1111 *sachip)
1007 {
1008         unsigned int skcdr, fbdiv, ipdiv, opdiv;
1009
1010         skcdr = sa1111_readl(sachip->base + SA1111_SKCDR);
1011
1012         fbdiv = (skcdr & 0x007f) + 2;
1013         ipdiv = ((skcdr & 0x0f80) >> 7) + 2;
1014         opdiv = opdiv_table[(skcdr & 0x3000) >> 12];
1015
1016         return 3686400 * fbdiv / (ipdiv * opdiv);
1017 }
1018
1019 /**
1020  *      sa1111_pll_clock - return the current PLL clock frequency.
1021  *      @sadev: SA1111 function block
1022  *
1023  *      BUG: we should look at SKCR.  We also blindly believe that
1024  *      the chip is being fed with the 3.6864MHz clock.
1025  *
1026  *      Returns the PLL clock in Hz.
1027  */
1028 unsigned int sa1111_pll_clock(struct sa1111_dev *sadev)
1029 {
1030         struct sa1111 *sachip = sa1111_chip_driver(sadev);
1031
1032         return __sa1111_pll_clock(sachip);
1033 }
1034
1035 /**
1036  *      sa1111_select_audio_mode - select I2S or AC link mode
1037  *      @sadev: SA1111 function block
1038  *      @mode: One of %SA1111_AUDIO_ACLINK or %SA1111_AUDIO_I2S
1039  *
1040  *      Frob the SKCR to select AC Link mode or I2S mode for
1041  *      the audio block.
1042  */
1043 void sa1111_select_audio_mode(struct sa1111_dev *sadev, int mode)
1044 {
1045         struct sa1111 *sachip = sa1111_chip_driver(sadev);
1046         unsigned long flags;
1047         unsigned int val;
1048
1049         spin_lock_irqsave(&sachip->lock, flags);
1050
1051         val = sa1111_readl(sachip->base + SA1111_SKCR);
1052         if (mode == SA1111_AUDIO_I2S) {
1053                 val &= ~SKCR_SELAC;
1054         } else {
1055                 val |= SKCR_SELAC;
1056         }
1057         sa1111_writel(val, sachip->base + SA1111_SKCR);
1058
1059         spin_unlock_irqrestore(&sachip->lock, flags);
1060 }
1061
1062 /**
1063  *      sa1111_set_audio_rate - set the audio sample rate
1064  *      @sadev: SA1111 SAC function block
1065  *      @rate: sample rate to select
1066  */
1067 int sa1111_set_audio_rate(struct sa1111_dev *sadev, int rate)
1068 {
1069         struct sa1111 *sachip = sa1111_chip_driver(sadev);
1070         unsigned int div;
1071
1072         if (sadev->devid != SA1111_DEVID_SAC)
1073                 return -EINVAL;
1074
1075         div = (__sa1111_pll_clock(sachip) / 256 + rate / 2) / rate;
1076         if (div == 0)
1077                 div = 1;
1078         if (div > 128)
1079                 div = 128;
1080
1081         sa1111_writel(div - 1, sachip->base + SA1111_SKAUD);
1082
1083         return 0;
1084 }
1085
1086 /**
1087  *      sa1111_get_audio_rate - get the audio sample rate
1088  *      @sadev: SA1111 SAC function block device
1089  */
1090 int sa1111_get_audio_rate(struct sa1111_dev *sadev)
1091 {
1092         struct sa1111 *sachip = sa1111_chip_driver(sadev);
1093         unsigned long div;
1094
1095         if (sadev->devid != SA1111_DEVID_SAC)
1096                 return -EINVAL;
1097
1098         div = sa1111_readl(sachip->base + SA1111_SKAUD) + 1;
1099
1100         return __sa1111_pll_clock(sachip) / (256 * div);
1101 }
1102
1103 void sa1111_set_io_dir(struct sa1111_dev *sadev,
1104                        unsigned int bits, unsigned int dir,
1105                        unsigned int sleep_dir)
1106 {
1107         struct sa1111 *sachip = sa1111_chip_driver(sadev);
1108         unsigned long flags;
1109         unsigned int val;
1110         void __iomem *gpio = sachip->base + SA1111_GPIO;
1111
1112 #define MODIFY_BITS(port, mask, dir)            \
1113         if (mask) {                             \
1114                 val = sa1111_readl(port);       \
1115                 val &= ~(mask);                 \
1116                 val |= (dir) & (mask);          \
1117                 sa1111_writel(val, port);       \
1118         }
1119
1120         spin_lock_irqsave(&sachip->lock, flags);
1121         MODIFY_BITS(gpio + SA1111_GPIO_PADDR, bits & 15, dir);
1122         MODIFY_BITS(gpio + SA1111_GPIO_PBDDR, (bits >> 8) & 255, dir >> 8);
1123         MODIFY_BITS(gpio + SA1111_GPIO_PCDDR, (bits >> 16) & 255, dir >> 16);
1124
1125         MODIFY_BITS(gpio + SA1111_GPIO_PASDR, bits & 15, sleep_dir);
1126         MODIFY_BITS(gpio + SA1111_GPIO_PBSDR, (bits >> 8) & 255, sleep_dir >> 8);
1127         MODIFY_BITS(gpio + SA1111_GPIO_PCSDR, (bits >> 16) & 255, sleep_dir >> 16);
1128         spin_unlock_irqrestore(&sachip->lock, flags);
1129 }
1130
1131 void sa1111_set_io(struct sa1111_dev *sadev, unsigned int bits, unsigned int v)
1132 {
1133         struct sa1111 *sachip = sa1111_chip_driver(sadev);
1134         unsigned long flags;
1135         unsigned int val;
1136         void __iomem *gpio = sachip->base + SA1111_GPIO;
1137
1138         spin_lock_irqsave(&sachip->lock, flags);
1139         MODIFY_BITS(gpio + SA1111_GPIO_PADWR, bits & 15, v);
1140         MODIFY_BITS(gpio + SA1111_GPIO_PBDWR, (bits >> 8) & 255, v >> 8);
1141         MODIFY_BITS(gpio + SA1111_GPIO_PCDWR, (bits >> 16) & 255, v >> 16);
1142         spin_unlock_irqrestore(&sachip->lock, flags);
1143 }
1144
1145 void sa1111_set_sleep_io(struct sa1111_dev *sadev, unsigned int bits, unsigned int v)
1146 {
1147         struct sa1111 *sachip = sa1111_chip_driver(sadev);
1148         unsigned long flags;
1149         unsigned int val;
1150         void __iomem *gpio = sachip->base + SA1111_GPIO;
1151
1152         spin_lock_irqsave(&sachip->lock, flags);
1153         MODIFY_BITS(gpio + SA1111_GPIO_PASSR, bits & 15, v);
1154         MODIFY_BITS(gpio + SA1111_GPIO_PBSSR, (bits >> 8) & 255, v >> 8);
1155         MODIFY_BITS(gpio + SA1111_GPIO_PCSSR, (bits >> 16) & 255, v >> 16);
1156         spin_unlock_irqrestore(&sachip->lock, flags);
1157 }
1158
1159 /*
1160  * Individual device operations.
1161  */
1162
1163 /**
1164  *      sa1111_enable_device - enable an on-chip SA1111 function block
1165  *      @sadev: SA1111 function block device to enable
1166  */
1167 void sa1111_enable_device(struct sa1111_dev *sadev)
1168 {
1169         struct sa1111 *sachip = sa1111_chip_driver(sadev);
1170         unsigned long flags;
1171         unsigned int val;
1172
1173         spin_lock_irqsave(&sachip->lock, flags);
1174         val = sa1111_readl(sachip->base + SA1111_SKPCR);
1175         sa1111_writel(val | sadev->skpcr_mask, sachip->base + SA1111_SKPCR);
1176         spin_unlock_irqrestore(&sachip->lock, flags);
1177 }
1178
1179 /**
1180  *      sa1111_disable_device - disable an on-chip SA1111 function block
1181  *      @sadev: SA1111 function block device to disable
1182  */
1183 void sa1111_disable_device(struct sa1111_dev *sadev)
1184 {
1185         struct sa1111 *sachip = sa1111_chip_driver(sadev);
1186         unsigned long flags;
1187         unsigned int val;
1188
1189         spin_lock_irqsave(&sachip->lock, flags);
1190         val = sa1111_readl(sachip->base + SA1111_SKPCR);
1191         sa1111_writel(val & ~sadev->skpcr_mask, sachip->base + SA1111_SKPCR);
1192         spin_unlock_irqrestore(&sachip->lock, flags);
1193 }
1194
1195 /*
1196  *      SA1111 "Register Access Bus."
1197  *
1198  *      We model this as a regular bus type, and hang devices directly
1199  *      off this.
1200  */
1201 static int sa1111_match(struct device *_dev, struct device_driver *_drv)
1202 {
1203         struct sa1111_dev *dev = SA1111_DEV(_dev);
1204         struct sa1111_driver *drv = SA1111_DRV(_drv);
1205
1206         return dev->devid == drv->devid;
1207 }
1208
1209 static int sa1111_bus_suspend(struct device *dev, pm_message_t state)
1210 {
1211         struct sa1111_dev *sadev = SA1111_DEV(dev);
1212         struct sa1111_driver *drv = SA1111_DRV(dev->driver);
1213         int ret = 0;
1214
1215         if (drv && drv->suspend)
1216                 ret = drv->suspend(sadev, state);
1217         return ret;
1218 }
1219
1220 static int sa1111_bus_resume(struct device *dev)
1221 {
1222         struct sa1111_dev *sadev = SA1111_DEV(dev);
1223         struct sa1111_driver *drv = SA1111_DRV(dev->driver);
1224         int ret = 0;
1225
1226         if (drv && drv->resume)
1227                 ret = drv->resume(sadev);
1228         return ret;
1229 }
1230
1231 static int sa1111_bus_probe(struct device *dev)
1232 {
1233         struct sa1111_dev *sadev = SA1111_DEV(dev);
1234         struct sa1111_driver *drv = SA1111_DRV(dev->driver);
1235         int ret = -ENODEV;
1236
1237         if (drv->probe)
1238                 ret = drv->probe(sadev);
1239         return ret;
1240 }
1241
1242 static int sa1111_bus_remove(struct device *dev)
1243 {
1244         struct sa1111_dev *sadev = SA1111_DEV(dev);
1245         struct sa1111_driver *drv = SA1111_DRV(dev->driver);
1246         int ret = 0;
1247
1248         if (drv->remove)
1249                 ret = drv->remove(sadev);
1250         return ret;
1251 }
1252
1253 struct bus_type sa1111_bus_type = {
1254         .name           = "sa1111-rab",
1255         .match          = sa1111_match,
1256         .probe          = sa1111_bus_probe,
1257         .remove         = sa1111_bus_remove,
1258         .suspend        = sa1111_bus_suspend,
1259         .resume         = sa1111_bus_resume,
1260 };
1261
1262 int sa1111_driver_register(struct sa1111_driver *driver)
1263 {
1264         driver->drv.bus = &sa1111_bus_type;
1265         return driver_register(&driver->drv);
1266 }
1267
1268 void sa1111_driver_unregister(struct sa1111_driver *driver)
1269 {
1270         driver_unregister(&driver->drv);
1271 }
1272
1273 static int __init sa1111_init(void)
1274 {
1275         int ret = bus_register(&sa1111_bus_type);
1276         if (ret == 0)
1277                 platform_driver_register(&sa1111_device_driver);
1278         return ret;
1279 }
1280
1281 static void __exit sa1111_exit(void)
1282 {
1283         platform_driver_unregister(&sa1111_device_driver);
1284         bus_unregister(&sa1111_bus_type);
1285 }
1286
1287 subsys_initcall(sa1111_init);
1288 module_exit(sa1111_exit);
1289
1290 MODULE_DESCRIPTION("Intel Corporation SA1111 core driver");
1291 MODULE_LICENSE("GPL");
1292
1293 EXPORT_SYMBOL(sa1111_select_audio_mode);
1294 EXPORT_SYMBOL(sa1111_set_audio_rate);
1295 EXPORT_SYMBOL(sa1111_get_audio_rate);
1296 EXPORT_SYMBOL(sa1111_set_io_dir);
1297 EXPORT_SYMBOL(sa1111_set_io);
1298 EXPORT_SYMBOL(sa1111_set_sleep_io);
1299 EXPORT_SYMBOL(sa1111_enable_device);
1300 EXPORT_SYMBOL(sa1111_disable_device);
1301 EXPORT_SYMBOL(sa1111_pll_clock);
1302 EXPORT_SYMBOL(sa1111_bus_type);
1303 EXPORT_SYMBOL(sa1111_driver_register);
1304 EXPORT_SYMBOL(sa1111_driver_unregister);