Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * linux/arch/arm/mach-sa1100/assabet.c | |
3 | * | |
4 | * Author: Nicolas Pitre | |
5 | * | |
6 | * This file contains all Assabet-specific tweaks. | |
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 | */ | |
1da177e4 LT |
12 | #include <linux/init.h> |
13 | #include <linux/kernel.h> | |
14 | #include <linux/module.h> | |
15 | #include <linux/errno.h> | |
16 | #include <linux/ioport.h> | |
17 | #include <linux/serial_core.h> | |
18 | #include <linux/mtd/mtd.h> | |
19 | #include <linux/mtd/partitions.h> | |
20 | #include <linux/delay.h> | |
21 | #include <linux/mm.h> | |
22 | ||
a09e64fb | 23 | #include <mach/hardware.h> |
1da177e4 LT |
24 | #include <asm/mach-types.h> |
25 | #include <asm/irq.h> | |
26 | #include <asm/setup.h> | |
27 | #include <asm/page.h> | |
74945c86 | 28 | #include <asm/pgtable-hwdef.h> |
1da177e4 LT |
29 | #include <asm/pgtable.h> |
30 | #include <asm/tlbflush.h> | |
31 | ||
32 | #include <asm/mach/arch.h> | |
33 | #include <asm/mach/flash.h> | |
34 | #include <asm/mach/irda.h> | |
35 | #include <asm/mach/map.h> | |
36 | #include <asm/mach/serial_sa1100.h> | |
a09e64fb RK |
37 | #include <mach/assabet.h> |
38 | #include <mach/mcp.h> | |
1da177e4 LT |
39 | |
40 | #include "generic.h" | |
41 | ||
42 | #define ASSABET_BCR_DB1110 \ | |
43 | (ASSABET_BCR_SPK_OFF | ASSABET_BCR_QMUTE | \ | |
44 | ASSABET_BCR_LED_GREEN | ASSABET_BCR_LED_RED | \ | |
45 | ASSABET_BCR_RS232EN | ASSABET_BCR_LCD_12RGB | \ | |
46 | ASSABET_BCR_IRDA_MD0) | |
47 | ||
48 | #define ASSABET_BCR_DB1111 \ | |
49 | (ASSABET_BCR_SPK_OFF | ASSABET_BCR_QMUTE | \ | |
50 | ASSABET_BCR_LED_GREEN | ASSABET_BCR_LED_RED | \ | |
51 | ASSABET_BCR_RS232EN | ASSABET_BCR_LCD_12RGB | \ | |
52 | ASSABET_BCR_CF_BUS_OFF | ASSABET_BCR_STEREO_LB | \ | |
53 | ASSABET_BCR_IRDA_MD0 | ASSABET_BCR_CF_RST) | |
54 | ||
55 | unsigned long SCR_value = ASSABET_SCR_INIT; | |
56 | EXPORT_SYMBOL(SCR_value); | |
57 | ||
58 | static unsigned long BCR_value = ASSABET_BCR_DB1110; | |
59 | ||
60 | void ASSABET_BCR_frob(unsigned int mask, unsigned int val) | |
61 | { | |
62 | unsigned long flags; | |
63 | ||
64 | local_irq_save(flags); | |
65 | BCR_value = (BCR_value & ~mask) | val; | |
66 | ASSABET_BCR = BCR_value; | |
67 | local_irq_restore(flags); | |
68 | } | |
69 | ||
70 | EXPORT_SYMBOL(ASSABET_BCR_frob); | |
71 | ||
72 | static void assabet_backlight_power(int on) | |
73 | { | |
74 | #ifndef ASSABET_PAL_VIDEO | |
75 | if (on) | |
76 | ASSABET_BCR_set(ASSABET_BCR_LIGHT_ON); | |
77 | else | |
78 | #endif | |
79 | ASSABET_BCR_clear(ASSABET_BCR_LIGHT_ON); | |
80 | } | |
81 | ||
82 | /* | |
83 | * Turn on/off the backlight. When turning the backlight on, | |
84 | * we wait 500us after turning it on so we don't cause the | |
85 | * supplies to droop when we enable the LCD controller (and | |
86 | * cause a hard reset.) | |
87 | */ | |
88 | static void assabet_lcd_power(int on) | |
89 | { | |
90 | #ifndef ASSABET_PAL_VIDEO | |
91 | if (on) { | |
92 | ASSABET_BCR_set(ASSABET_BCR_LCD_ON); | |
93 | udelay(500); | |
94 | } else | |
95 | #endif | |
96 | ASSABET_BCR_clear(ASSABET_BCR_LCD_ON); | |
97 | } | |
98 | ||
99 | ||
100 | /* | |
101 | * Assabet flash support code. | |
102 | */ | |
103 | ||
104 | #ifdef ASSABET_REV_4 | |
105 | /* | |
106 | * Phase 4 Assabet has two 28F160B3 flash parts in bank 0: | |
107 | */ | |
108 | static struct mtd_partition assabet_partitions[] = { | |
109 | { | |
110 | .name = "bootloader", | |
111 | .size = 0x00020000, | |
112 | .offset = 0, | |
113 | .mask_flags = MTD_WRITEABLE, | |
114 | }, { | |
115 | .name = "bootloader params", | |
116 | .size = 0x00020000, | |
117 | .offset = MTDPART_OFS_APPEND, | |
118 | .mask_flags = MTD_WRITEABLE, | |
119 | }, { | |
120 | .name = "jffs", | |
121 | .size = MTDPART_SIZ_FULL, | |
122 | .offset = MTDPART_OFS_APPEND, | |
123 | } | |
124 | }; | |
125 | #else | |
126 | /* | |
127 | * Phase 5 Assabet has two 28F128J3A flash parts in bank 0: | |
128 | */ | |
129 | static struct mtd_partition assabet_partitions[] = { | |
130 | { | |
131 | .name = "bootloader", | |
132 | .size = 0x00040000, | |
133 | .offset = 0, | |
134 | .mask_flags = MTD_WRITEABLE, | |
135 | }, { | |
136 | .name = "bootloader params", | |
137 | .size = 0x00040000, | |
138 | .offset = MTDPART_OFS_APPEND, | |
139 | .mask_flags = MTD_WRITEABLE, | |
140 | }, { | |
141 | .name = "jffs", | |
142 | .size = MTDPART_SIZ_FULL, | |
143 | .offset = MTDPART_OFS_APPEND, | |
144 | } | |
145 | }; | |
146 | #endif | |
147 | ||
148 | static struct flash_platform_data assabet_flash_data = { | |
149 | .map_name = "cfi_probe", | |
150 | .parts = assabet_partitions, | |
151 | .nr_parts = ARRAY_SIZE(assabet_partitions), | |
152 | }; | |
153 | ||
154 | static struct resource assabet_flash_resources[] = { | |
155 | { | |
156 | .start = SA1100_CS0_PHYS, | |
157 | .end = SA1100_CS0_PHYS + SZ_32M - 1, | |
158 | .flags = IORESOURCE_MEM, | |
159 | }, { | |
160 | .start = SA1100_CS1_PHYS, | |
161 | .end = SA1100_CS1_PHYS + SZ_32M - 1, | |
162 | .flags = IORESOURCE_MEM, | |
163 | } | |
164 | }; | |
165 | ||
166 | ||
167 | /* | |
168 | * Assabet IrDA support code. | |
169 | */ | |
170 | ||
171 | static int assabet_irda_set_power(struct device *dev, unsigned int state) | |
172 | { | |
173 | static unsigned int bcr_state[4] = { | |
174 | ASSABET_BCR_IRDA_MD0, | |
175 | ASSABET_BCR_IRDA_MD1|ASSABET_BCR_IRDA_MD0, | |
176 | ASSABET_BCR_IRDA_MD1, | |
177 | 0 | |
178 | }; | |
179 | ||
180 | if (state < 4) { | |
181 | state = bcr_state[state]; | |
182 | ASSABET_BCR_clear(state ^ (ASSABET_BCR_IRDA_MD1| | |
183 | ASSABET_BCR_IRDA_MD0)); | |
184 | ASSABET_BCR_set(state); | |
185 | } | |
186 | return 0; | |
187 | } | |
188 | ||
189 | static void assabet_irda_set_speed(struct device *dev, unsigned int speed) | |
190 | { | |
191 | if (speed < 4000000) | |
192 | ASSABET_BCR_clear(ASSABET_BCR_IRDA_FSEL); | |
193 | else | |
194 | ASSABET_BCR_set(ASSABET_BCR_IRDA_FSEL); | |
195 | } | |
196 | ||
197 | static struct irda_platform_data assabet_irda_data = { | |
198 | .set_power = assabet_irda_set_power, | |
199 | .set_speed = assabet_irda_set_speed, | |
200 | }; | |
201 | ||
323cdfc1 RK |
202 | static struct mcp_plat_data assabet_mcp_data = { |
203 | .mccr0 = MCCR0_ADM, | |
204 | .sclk_rate = 11981000, | |
205 | }; | |
206 | ||
1da177e4 LT |
207 | static void __init assabet_init(void) |
208 | { | |
209 | /* | |
210 | * Ensure that the power supply is in "high power" mode. | |
211 | */ | |
212 | GPDR |= GPIO_GPIO16; | |
213 | GPSR = GPIO_GPIO16; | |
214 | ||
215 | /* | |
216 | * Ensure that these pins are set as outputs and are driving | |
217 | * logic 0. This ensures that we won't inadvertently toggle | |
218 | * the WS latch in the CPLD, and we don't float causing | |
219 | * excessive power drain. --rmk | |
220 | */ | |
221 | GPDR |= GPIO_SSP_TXD | GPIO_SSP_SCLK | GPIO_SSP_SFRM; | |
222 | GPCR = GPIO_SSP_TXD | GPIO_SSP_SCLK | GPIO_SSP_SFRM; | |
223 | ||
224 | /* | |
225 | * Set up registers for sleep mode. | |
226 | */ | |
227 | PWER = PWER_GPIO0; | |
228 | PGSR = 0; | |
229 | PCFR = 0; | |
230 | PSDR = 0; | |
231 | PPDR |= PPC_TXD3 | PPC_TXD1; | |
232 | PPSR |= PPC_TXD3 | PPC_TXD1; | |
233 | ||
234 | sa1100fb_lcd_power = assabet_lcd_power; | |
235 | sa1100fb_backlight_power = assabet_backlight_power; | |
236 | ||
237 | if (machine_has_neponset()) { | |
238 | /* | |
239 | * Angel sets this, but other bootloaders may not. | |
240 | * | |
241 | * This must precede any driver calls to BCR_set() | |
242 | * or BCR_clear(). | |
243 | */ | |
244 | ASSABET_BCR = BCR_value = ASSABET_BCR_DB1111; | |
245 | ||
246 | #ifndef CONFIG_ASSABET_NEPONSET | |
247 | printk( "Warning: Neponset detected but full support " | |
248 | "hasn't been configured in the kernel\n" ); | |
249 | #endif | |
250 | } | |
251 | ||
7a5b4e16 RK |
252 | sa11x0_register_mtd(&assabet_flash_data, assabet_flash_resources, |
253 | ARRAY_SIZE(assabet_flash_resources)); | |
254 | sa11x0_register_irda(&assabet_irda_data); | |
255 | sa11x0_register_mcp(&assabet_mcp_data); | |
1da177e4 LT |
256 | } |
257 | ||
258 | /* | |
259 | * On Assabet, we must probe for the Neponset board _before_ | |
260 | * paging_init() has occurred to actually determine the amount | |
261 | * of RAM available. To do so, we map the appropriate IO section | |
262 | * in the page table here in order to access GPIO registers. | |
263 | */ | |
264 | static void __init map_sa1100_gpio_regs( void ) | |
265 | { | |
266 | unsigned long phys = __PREG(GPLR) & PMD_MASK; | |
267 | unsigned long virt = io_p2v(phys); | |
268 | int prot = PMD_TYPE_SECT | PMD_SECT_AP_WRITE | PMD_DOMAIN(DOMAIN_IO); | |
269 | pmd_t *pmd; | |
270 | ||
a61c2332 | 271 | pmd = pmd_offset(pud_offset(pgd_offset_k(virt), virt), virt); |
1da177e4 LT |
272 | *pmd = __pmd(phys | prot); |
273 | flush_pmd_entry(pmd); | |
274 | } | |
275 | ||
276 | /* | |
277 | * Read System Configuration "Register" | |
278 | * (taken from "Intel StrongARM SA-1110 Microprocessor Development Board | |
279 | * User's Guide", section 4.4.1) | |
280 | * | |
281 | * This same scan is performed in arch/arm/boot/compressed/head-sa1100.S | |
282 | * to set up the serial port for decompression status messages. We | |
283 | * repeat it here because the kernel may not be loaded as a zImage, and | |
284 | * also because it's a hassle to communicate the SCR value to the kernel | |
285 | * from the decompressor. | |
286 | * | |
287 | * Note that IRQs are guaranteed to be disabled. | |
288 | */ | |
289 | static void __init get_assabet_scr(void) | |
290 | { | |
291 | unsigned long scr, i; | |
292 | ||
293 | GPDR |= 0x3fc; /* Configure GPIO 9:2 as outputs */ | |
294 | GPSR = 0x3fc; /* Write 0xFF to GPIO 9:2 */ | |
295 | GPDR &= ~(0x3fc); /* Configure GPIO 9:2 as inputs */ | |
2f3eca8b RK |
296 | for(i = 100; i--; ) /* Read GPIO 9:2 */ |
297 | scr = GPLR; | |
1da177e4 LT |
298 | GPDR |= 0x3fc; /* restore correct pin direction */ |
299 | scr &= 0x3fc; /* save as system configuration byte. */ | |
300 | SCR_value = scr; | |
301 | } | |
302 | ||
303 | static void __init | |
0744a3ee | 304 | fixup_assabet(struct tag *tags, char **cmdline, struct meminfo *mi) |
1da177e4 LT |
305 | { |
306 | /* This must be done before any call to machine_has_neponset() */ | |
307 | map_sa1100_gpio_regs(); | |
308 | get_assabet_scr(); | |
309 | ||
310 | if (machine_has_neponset()) | |
311 | printk("Neponset expansion board detected\n"); | |
312 | } | |
313 | ||
314 | ||
315 | static void assabet_uart_pm(struct uart_port *port, u_int state, u_int oldstate) | |
316 | { | |
317 | if (port->mapbase == _Ser1UTCR0) { | |
318 | if (state) | |
319 | ASSABET_BCR_clear(ASSABET_BCR_RS232EN | | |
320 | ASSABET_BCR_COM_RTS | | |
321 | ASSABET_BCR_COM_DTR); | |
322 | else | |
323 | ASSABET_BCR_set(ASSABET_BCR_RS232EN | | |
324 | ASSABET_BCR_COM_RTS | | |
325 | ASSABET_BCR_COM_DTR); | |
326 | } | |
327 | } | |
328 | ||
329 | /* | |
330 | * Assabet uses COM_RTS and COM_DTR for both UART1 (com port) | |
331 | * and UART3 (radio module). We only handle them for UART1 here. | |
332 | */ | |
333 | static void assabet_set_mctrl(struct uart_port *port, u_int mctrl) | |
334 | { | |
335 | if (port->mapbase == _Ser1UTCR0) { | |
336 | u_int set = 0, clear = 0; | |
337 | ||
338 | if (mctrl & TIOCM_RTS) | |
339 | clear |= ASSABET_BCR_COM_RTS; | |
340 | else | |
341 | set |= ASSABET_BCR_COM_RTS; | |
342 | ||
343 | if (mctrl & TIOCM_DTR) | |
344 | clear |= ASSABET_BCR_COM_DTR; | |
345 | else | |
346 | set |= ASSABET_BCR_COM_DTR; | |
347 | ||
348 | ASSABET_BCR_clear(clear); | |
349 | ASSABET_BCR_set(set); | |
350 | } | |
351 | } | |
352 | ||
353 | static u_int assabet_get_mctrl(struct uart_port *port) | |
354 | { | |
355 | u_int ret = 0; | |
356 | u_int bsr = ASSABET_BSR; | |
357 | ||
358 | /* need 2 reads to read current value */ | |
359 | bsr = ASSABET_BSR; | |
360 | ||
361 | if (port->mapbase == _Ser1UTCR0) { | |
362 | if (bsr & ASSABET_BSR_COM_DCD) | |
363 | ret |= TIOCM_CD; | |
364 | if (bsr & ASSABET_BSR_COM_CTS) | |
365 | ret |= TIOCM_CTS; | |
366 | if (bsr & ASSABET_BSR_COM_DSR) | |
367 | ret |= TIOCM_DSR; | |
368 | } else if (port->mapbase == _Ser3UTCR0) { | |
369 | if (bsr & ASSABET_BSR_RAD_DCD) | |
370 | ret |= TIOCM_CD; | |
371 | if (bsr & ASSABET_BSR_RAD_CTS) | |
372 | ret |= TIOCM_CTS; | |
373 | if (bsr & ASSABET_BSR_RAD_DSR) | |
374 | ret |= TIOCM_DSR; | |
375 | if (bsr & ASSABET_BSR_RAD_RI) | |
376 | ret |= TIOCM_RI; | |
377 | } else { | |
378 | ret = TIOCM_CD | TIOCM_CTS | TIOCM_DSR; | |
379 | } | |
380 | ||
381 | return ret; | |
382 | } | |
383 | ||
384 | static struct sa1100_port_fns assabet_port_fns __initdata = { | |
385 | .set_mctrl = assabet_set_mctrl, | |
386 | .get_mctrl = assabet_get_mctrl, | |
387 | .pm = assabet_uart_pm, | |
388 | }; | |
389 | ||
390 | static struct map_desc assabet_io_desc[] __initdata = { | |
92519d82 DS |
391 | { /* Board Control Register */ |
392 | .virtual = 0xf1000000, | |
393 | .pfn = __phys_to_pfn(0x12000000), | |
394 | .length = 0x00100000, | |
395 | .type = MT_DEVICE | |
396 | }, { /* MQ200 */ | |
397 | .virtual = 0xf2800000, | |
398 | .pfn = __phys_to_pfn(0x4b800000), | |
399 | .length = 0x00800000, | |
400 | .type = MT_DEVICE | |
401 | } | |
1da177e4 LT |
402 | }; |
403 | ||
404 | static void __init assabet_map_io(void) | |
405 | { | |
406 | sa1100_map_io(); | |
407 | iotable_init(assabet_io_desc, ARRAY_SIZE(assabet_io_desc)); | |
408 | ||
409 | /* | |
410 | * Set SUS bit in SDCR0 so serial port 1 functions. | |
411 | * Its called GPCLKR0 in my SA1110 manual. | |
412 | */ | |
413 | Ser1SDCR0 |= SDCR0_SUS; | |
414 | ||
415 | if (machine_has_neponset()) { | |
416 | #ifdef CONFIG_ASSABET_NEPONSET | |
417 | extern void neponset_map_io(void); | |
418 | ||
419 | /* | |
420 | * We map Neponset registers even if it isn't present since | |
421 | * many drivers will try to probe their stuff (and fail). | |
422 | * This is still more friendly than a kernel paging request | |
423 | * crash. | |
424 | */ | |
425 | neponset_map_io(); | |
426 | #endif | |
427 | } else { | |
428 | sa1100_register_uart_fns(&assabet_port_fns); | |
429 | } | |
430 | ||
431 | /* | |
432 | * When Neponset is attached, the first UART should be | |
433 | * UART3. That's what Angel is doing and many documents | |
434 | * are stating this. | |
435 | * | |
436 | * We do the Neponset mapping even if Neponset support | |
437 | * isn't compiled in so the user will still get something on | |
438 | * the expected physical serial port. | |
439 | * | |
440 | * We no longer do this; not all boot loaders support it, | |
441 | * and UART3 appears to be somewhat unreliable with blob. | |
442 | */ | |
443 | sa1100_register_uart(0, 1); | |
444 | sa1100_register_uart(2, 3); | |
445 | } | |
446 | ||
447 | ||
448 | MACHINE_START(ASSABET, "Intel-Assabet") | |
17f4425d | 449 | .atag_offset = 0x100, |
e9dea0c6 RK |
450 | .fixup = fixup_assabet, |
451 | .map_io = assabet_map_io, | |
452 | .init_irq = sa1100_init_irq, | |
1da177e4 LT |
453 | .timer = &sa1100_timer, |
454 | .init_machine = assabet_init, | |
e9107ab6 NP |
455 | #ifdef CONFIG_SA1111 |
456 | .dma_zone_size = SZ_1M, | |
457 | #endif | |
d9ca5839 | 458 | .restart = sa11x0_restart, |
1da177e4 | 459 | MACHINE_END |