xref: /openbmc/linux/arch/arm/mach-sa1100/neponset.c (revision 3ae5eaec)
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/platform_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 platform_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 platform_device *dev, pm_message_t state)
182 {
183 	/*
184 	 * Save state.
185 	 */
186 	if (!dev->dev.power.saved_state)
187 		dev->dev.power.saved_state = kmalloc(sizeof(unsigned int), GFP_KERNEL);
188 	if (!dev->dev.power.saved_state)
189 		return -ENOMEM;
190 
191 	*(unsigned int *)dev->dev.power.saved_state = NCR_0;
192 
193 	return 0;
194 }
195 
196 static int neponset_resume(struct platform_device *dev)
197 {
198 	if (dev->dev.power.saved_state) {
199 		NCR_0 = *(unsigned int *)dev->dev.power.saved_state;
200 		kfree(dev->dev.power.saved_state);
201 		dev->dev.power.saved_state = NULL;
202 	}
203 
204 	return 0;
205 }
206 
207 #else
208 #define neponset_suspend NULL
209 #define neponset_resume  NULL
210 #endif
211 
212 static struct platform_driver neponset_device_driver = {
213 	.probe		= neponset_probe,
214 	.suspend	= neponset_suspend,
215 	.resume		= neponset_resume,
216 	.driver		= {
217 		.name	= "neponset",
218 	},
219 };
220 
221 static struct resource neponset_resources[] = {
222 	[0] = {
223 		.start	= 0x10000000,
224 		.end	= 0x17ffffff,
225 		.flags	= IORESOURCE_MEM,
226 	},
227 };
228 
229 static struct platform_device neponset_device = {
230 	.name		= "neponset",
231 	.id		= 0,
232 	.num_resources	= ARRAY_SIZE(neponset_resources),
233 	.resource	= neponset_resources,
234 };
235 
236 static struct resource sa1111_resources[] = {
237 	[0] = {
238 		.start	= 0x40000000,
239 		.end	= 0x40001fff,
240 		.flags	= IORESOURCE_MEM,
241 	},
242 	[1] = {
243 		.start	= IRQ_NEPONSET_SA1111,
244 		.end	= IRQ_NEPONSET_SA1111,
245 		.flags	= IORESOURCE_IRQ,
246 	},
247 };
248 
249 static u64 sa1111_dmamask = 0xffffffffUL;
250 
251 static struct platform_device sa1111_device = {
252 	.name		= "sa1111",
253 	.id		= 0,
254 	.dev		= {
255 		.dma_mask = &sa1111_dmamask,
256 		.coherent_dma_mask = 0xffffffff,
257 	},
258 	.num_resources	= ARRAY_SIZE(sa1111_resources),
259 	.resource	= sa1111_resources,
260 };
261 
262 static struct resource smc91x_resources[] = {
263 	[0] = {
264 		.name	= "smc91x-regs",
265 		.start	= SA1100_CS3_PHYS,
266 		.end	= SA1100_CS3_PHYS + 0x01ffffff,
267 		.flags	= IORESOURCE_MEM,
268 	},
269 	[1] = {
270 		.start	= IRQ_NEPONSET_SMC9196,
271 		.end	= IRQ_NEPONSET_SMC9196,
272 		.flags	= IORESOURCE_IRQ,
273 	},
274 	[2] = {
275 		.name	= "smc91x-attrib",
276 		.start	= SA1100_CS3_PHYS + 0x02000000,
277 		.end	= SA1100_CS3_PHYS + 0x03ffffff,
278 		.flags	= IORESOURCE_MEM,
279 	},
280 };
281 
282 static struct platform_device smc91x_device = {
283 	.name		= "smc91x",
284 	.id		= 0,
285 	.num_resources	= ARRAY_SIZE(smc91x_resources),
286 	.resource	= smc91x_resources,
287 };
288 
289 static struct platform_device *devices[] __initdata = {
290 	&neponset_device,
291 	&sa1111_device,
292 	&smc91x_device,
293 };
294 
295 static int __init neponset_init(void)
296 {
297 	platform_driver_register(&neponset_device_driver);
298 
299 	/*
300 	 * The Neponset is only present on the Assabet machine type.
301 	 */
302 	if (!machine_is_assabet())
303 		return -ENODEV;
304 
305 	/*
306 	 * Ensure that the memory bus request/grant signals are setup,
307 	 * and the grant is held in its inactive state, whether or not
308 	 * we actually have a Neponset attached.
309 	 */
310 	sa1110_mb_disable();
311 
312 	if (!machine_has_neponset()) {
313 		printk(KERN_DEBUG "Neponset expansion board not present\n");
314 		return -ENODEV;
315 	}
316 
317 	if (WHOAMI != 0x11) {
318 		printk(KERN_WARNING "Neponset board detected, but "
319 			"wrong ID: %02x\n", WHOAMI);
320 		return -ENODEV;
321 	}
322 
323 	return platform_add_devices(devices, ARRAY_SIZE(devices));
324 }
325 
326 subsys_initcall(neponset_init);
327 
328 static struct map_desc neponset_io_desc[] __initdata = {
329 	{	/* System Registers */
330 		.virtual	=  0xf3000000,
331 		.pfn		= __phys_to_pfn(0x10000000),
332 		.length		= SZ_1M,
333 		.type		= MT_DEVICE
334 	}, {	/* SA-1111 */
335 		.virtual	=  0xf4000000,
336 		.pfn		= __phys_to_pfn(0x40000000),
337 		.length		= SZ_1M,
338 		.type		= MT_DEVICE
339 	}
340 };
341 
342 void __init neponset_map_io(void)
343 {
344 	iotable_init(neponset_io_desc, ARRAY_SIZE(neponset_io_desc));
345 }
346