fc061641b7be083cb44d89e33fa22c3826e9c272
[linux-2.6.git] / arch / arm / mach-sa1100 / neponset.c
1 /*
2  * linux/arch/arm/mach-sa1100/neponset.c
3  *
4  */
5 #include <linux/kernel.h>
6 #include <linux/init.h>
7 #include <linux/ptrace.h>
8 #include <linux/tty.h>
9 #include <linux/ioport.h>
10 #include <linux/serial_core.h>
11 #include <linux/device.h>
12 #include <linux/slab.h>
13
14 #include <asm/hardware.h>
15 #include <asm/mach-types.h>
16 #include <asm/irq.h>
17 #include <asm/mach/map.h>
18 #include <asm/mach/irq.h>
19 #include <asm/mach/serial_sa1100.h>
20 #include <asm/arch/assabet.h>
21 #include <asm/arch/neponset.h>
22 #include <asm/hardware/sa1111.h>
23 #include <asm/sizes.h>
24
25 /*
26  * Install handler for Neponset IRQ.  Note that we have to loop here
27  * since the ETHERNET and USAR IRQs are level based, and we need to
28  * ensure that the IRQ signal is deasserted before returning.  This
29  * is rather unfortunate.
30  */
31 static void
32 neponset_irq_handler(unsigned int irq, struct irqdesc *desc, struct pt_regs *regs)
33 {
34         unsigned int irr;
35
36         while (1) {
37                 struct irqdesc *d;
38
39                 /*
40                  * Acknowledge the parent IRQ.
41                  */
42                 desc->chip->ack(irq);
43
44                 /*
45                  * Read the interrupt reason register.  Let's have all
46                  * active IRQ bits high.  Note: there is a typo in the
47                  * Neponset user's guide for the SA1111 IRR level.
48                  */
49                 irr = IRR ^ (IRR_ETHERNET | IRR_USAR);
50
51                 if ((irr & (IRR_ETHERNET | IRR_USAR | IRR_SA1111)) == 0)
52                         break;
53
54                 /*
55                  * Since there is no individual mask, we have to
56                  * mask the parent IRQ.  This is safe, since we'll
57                  * recheck the register for any pending IRQs.
58                  */
59                 if (irr & (IRR_ETHERNET | IRR_USAR)) {
60                         desc->chip->mask(irq);
61
62                         if (irr & IRR_ETHERNET) {
63                                 d = irq_desc + IRQ_NEPONSET_SMC9196;
64                                 desc_handle_irq(IRQ_NEPONSET_SMC9196, d, regs);
65                         }
66
67                         if (irr & IRR_USAR) {
68                                 d = irq_desc + IRQ_NEPONSET_USAR;
69                                 desc_handle_irq(IRQ_NEPONSET_USAR, d, regs);
70                         }
71
72                         desc->chip->unmask(irq);
73                 }
74
75                 if (irr & IRR_SA1111) {
76                         d = irq_desc + IRQ_NEPONSET_SA1111;
77                         desc_handle_irq(IRQ_NEPONSET_SA1111, d, regs);
78                 }
79         }
80 }
81
82 static void neponset_set_mctrl(struct uart_port *port, u_int mctrl)
83 {
84         u_int mdm_ctl0 = MDM_CTL_0;
85
86         if (port->mapbase == _Ser1UTCR0) {
87                 if (mctrl & TIOCM_RTS)
88                         mdm_ctl0 &= ~MDM_CTL0_RTS2;
89                 else
90                         mdm_ctl0 |= MDM_CTL0_RTS2;
91
92                 if (mctrl & TIOCM_DTR)
93                         mdm_ctl0 &= ~MDM_CTL0_DTR2;
94                 else
95                         mdm_ctl0 |= MDM_CTL0_DTR2;
96         } else if (port->mapbase == _Ser3UTCR0) {
97                 if (mctrl & TIOCM_RTS)
98                         mdm_ctl0 &= ~MDM_CTL0_RTS1;
99                 else
100                         mdm_ctl0 |= MDM_CTL0_RTS1;
101
102                 if (mctrl & TIOCM_DTR)
103                         mdm_ctl0 &= ~MDM_CTL0_DTR1;
104                 else
105                         mdm_ctl0 |= MDM_CTL0_DTR1;
106         }
107
108         MDM_CTL_0 = mdm_ctl0;
109 }
110
111 static u_int neponset_get_mctrl(struct uart_port *port)
112 {
113         u_int ret = TIOCM_CD | TIOCM_CTS | TIOCM_DSR;
114         u_int mdm_ctl1 = MDM_CTL_1;
115
116         if (port->mapbase == _Ser1UTCR0) {
117                 if (mdm_ctl1 & MDM_CTL1_DCD2)
118                         ret &= ~TIOCM_CD;
119                 if (mdm_ctl1 & MDM_CTL1_CTS2)
120                         ret &= ~TIOCM_CTS;
121                 if (mdm_ctl1 & MDM_CTL1_DSR2)
122                         ret &= ~TIOCM_DSR;
123         } else if (port->mapbase == _Ser3UTCR0) {
124                 if (mdm_ctl1 & MDM_CTL1_DCD1)
125                         ret &= ~TIOCM_CD;
126                 if (mdm_ctl1 & MDM_CTL1_CTS1)
127                         ret &= ~TIOCM_CTS;
128                 if (mdm_ctl1 & MDM_CTL1_DSR1)
129                         ret &= ~TIOCM_DSR;
130         }
131
132         return ret;
133 }
134
135 static struct sa1100_port_fns neponset_port_fns __initdata = {
136         .set_mctrl      = neponset_set_mctrl,
137         .get_mctrl      = neponset_get_mctrl,
138 };
139
140 static int neponset_probe(struct device *dev)
141 {
142         sa1100_register_uart_fns(&neponset_port_fns);
143
144         /*
145          * Install handler for GPIO25.
146          */
147         set_irq_type(IRQ_GPIO25, IRQT_RISING);
148         set_irq_chained_handler(IRQ_GPIO25, neponset_irq_handler);
149
150         /*
151          * We would set IRQ_GPIO25 to be a wake-up IRQ, but
152          * unfortunately something on the Neponset activates
153          * this IRQ on sleep (ethernet?)
154          */
155 #if 0
156         enable_irq_wake(IRQ_GPIO25);
157 #endif
158
159         /*
160          * Setup other Neponset IRQs.  SA1111 will be done by the
161          * generic SA1111 code.
162          */
163         set_irq_handler(IRQ_NEPONSET_SMC9196, do_simple_IRQ);
164         set_irq_flags(IRQ_NEPONSET_SMC9196, IRQF_VALID | IRQF_PROBE);
165         set_irq_handler(IRQ_NEPONSET_USAR, do_simple_IRQ);
166         set_irq_flags(IRQ_NEPONSET_USAR, IRQF_VALID | IRQF_PROBE);
167
168         /*
169          * Disable GPIO 0/1 drivers so the buttons work on the module.
170          */
171         NCR_0 = NCR_GP01_OFF;
172
173         return 0;
174 }
175
176 #ifdef CONFIG_PM
177
178 /*
179  * LDM power management.
180  */
181 static int neponset_suspend(struct device *dev, pm_message_t state, u32 level)
182 {
183         /*
184          * Save state.
185          */
186         if (level == SUSPEND_SAVE_STATE ||
187             level == SUSPEND_DISABLE ||
188             level == SUSPEND_POWER_DOWN) {
189                 if (!dev->power.saved_state)
190                         dev->power.saved_state = kmalloc(sizeof(unsigned int), GFP_KERNEL);
191                 if (!dev->power.saved_state)
192                         return -ENOMEM;
193
194                 *(unsigned int *)dev->power.saved_state = NCR_0;
195         }
196
197         return 0;
198 }
199
200 static int neponset_resume(struct device *dev, u32 level)
201 {
202         if (level == RESUME_RESTORE_STATE || level == RESUME_ENABLE) {
203                 if (dev->power.saved_state) {
204                         NCR_0 = *(unsigned int *)dev->power.saved_state;
205                         kfree(dev->power.saved_state);
206                         dev->power.saved_state = NULL;
207                 }
208         }
209
210         return 0;
211 }
212
213 #else
214 #define neponset_suspend NULL
215 #define neponset_resume  NULL
216 #endif
217
218 static struct device_driver neponset_device_driver = {
219         .name           = "neponset",
220         .bus            = &platform_bus_type,
221         .probe          = neponset_probe,
222         .suspend        = neponset_suspend,
223         .resume         = neponset_resume,
224 };
225
226 static struct resource neponset_resources[] = {
227         [0] = {
228                 .start  = 0x10000000,
229                 .end    = 0x17ffffff,
230                 .flags  = IORESOURCE_MEM,
231         },
232 };
233
234 static struct platform_device neponset_device = {
235         .name           = "neponset",
236         .id             = 0,
237         .num_resources  = ARRAY_SIZE(neponset_resources),
238         .resource       = neponset_resources,
239 };
240
241 static struct resource sa1111_resources[] = {
242         [0] = {
243                 .start  = 0x40000000,
244                 .end    = 0x40001fff,
245                 .flags  = IORESOURCE_MEM,
246         },
247         [1] = {
248                 .start  = IRQ_NEPONSET_SA1111,
249                 .end    = IRQ_NEPONSET_SA1111,
250                 .flags  = IORESOURCE_IRQ,
251         },
252 };
253
254 static u64 sa1111_dmamask = 0xffffffffUL;
255
256 static struct platform_device sa1111_device = {
257         .name           = "sa1111",
258         .id             = 0,
259         .dev            = {
260                 .dma_mask = &sa1111_dmamask,
261                 .coherent_dma_mask = 0xffffffff,
262         },
263         .num_resources  = ARRAY_SIZE(sa1111_resources),
264         .resource       = sa1111_resources,
265 };
266
267 static struct resource smc91x_resources[] = {
268         [0] = {
269                 .name   = "smc91x-regs",
270                 .start  = SA1100_CS3_PHYS,
271                 .end    = SA1100_CS3_PHYS + 0x01ffffff,
272                 .flags  = IORESOURCE_MEM,
273         },
274         [1] = {
275                 .start  = IRQ_NEPONSET_SMC9196,
276                 .end    = IRQ_NEPONSET_SMC9196,
277                 .flags  = IORESOURCE_IRQ,
278         },
279         [2] = {
280                 .name   = "smc91x-attrib",
281                 .start  = SA1100_CS3_PHYS + 0x02000000,
282                 .end    = SA1100_CS3_PHYS + 0x03ffffff,
283                 .flags  = IORESOURCE_MEM,
284         },
285 };
286
287 static struct platform_device smc91x_device = {
288         .name           = "smc91x",
289         .id             = 0,
290         .num_resources  = ARRAY_SIZE(smc91x_resources),
291         .resource       = smc91x_resources,
292 };
293
294 static struct platform_device *devices[] __initdata = {
295         &neponset_device,
296         &sa1111_device,
297         &smc91x_device,
298 };
299
300 static int __init neponset_init(void)
301 {
302         driver_register(&neponset_device_driver);
303
304         /*
305          * The Neponset is only present on the Assabet machine type.
306          */
307         if (!machine_is_assabet())
308                 return -ENODEV;
309
310         /*
311          * Ensure that the memory bus request/grant signals are setup,
312          * and the grant is held in its inactive state, whether or not
313          * we actually have a Neponset attached.
314          */
315         sa1110_mb_disable();
316
317         if (!machine_has_neponset()) {
318                 printk(KERN_DEBUG "Neponset expansion board not present\n");
319                 return -ENODEV;
320         }
321
322         if (WHOAMI != 0x11) {
323                 printk(KERN_WARNING "Neponset board detected, but "
324                         "wrong ID: %02x\n", WHOAMI);
325                 return -ENODEV;
326         }
327
328         return platform_add_devices(devices, ARRAY_SIZE(devices));
329 }
330
331 subsys_initcall(neponset_init);
332
333 static struct map_desc neponset_io_desc[] __initdata = {
334  /* virtual     physical    length type */
335   { 0xf3000000, 0x10000000, SZ_1M, MT_DEVICE }, /* System Registers */
336   { 0xf4000000, 0x40000000, SZ_1M, MT_DEVICE }  /* SA-1111 */
337 };
338
339 void __init neponset_map_io(void)
340 {
341         iotable_init(neponset_io_desc, ARRAY_SIZE(neponset_io_desc));
342 }