Linux-2.6.12-rc2
[linux-2.6.git] / arch / arm / mach-footbridge / netwinder-hw.c
1 /*
2  * linux/arch/arm/mach-footbridge/netwinder-hw.c
3  *
4  * Netwinder machine fixup
5  *
6  * Copyright (C) 1998, 1999 Russell King, Phil Blundell
7  */
8 #include <linux/config.h>
9 #include <linux/module.h>
10 #include <linux/ioport.h>
11 #include <linux/kernel.h>
12 #include <linux/delay.h>
13 #include <linux/init.h>
14
15 #include <asm/hardware/dec21285.h>
16 #include <asm/io.h>
17 #include <asm/leds.h>
18 #include <asm/mach-types.h>
19 #include <asm/setup.h>
20
21 #include <asm/mach/arch.h>
22
23 #include "common.h"
24
25 #define IRDA_IO_BASE            0x180
26 #define GP1_IO_BASE             0x338
27 #define GP2_IO_BASE             0x33a
28
29
30 #ifdef CONFIG_LEDS
31 #define DEFAULT_LEDS    0
32 #else
33 #define DEFAULT_LEDS    GPIO_GREEN_LED
34 #endif
35
36 /*
37  * Winbond WB83977F accessibility stuff
38  */
39 static inline void wb977_open(void)
40 {
41         outb(0x87, 0x370);
42         outb(0x87, 0x370);
43 }
44
45 static inline void wb977_close(void)
46 {
47         outb(0xaa, 0x370);
48 }
49
50 static inline void wb977_wb(int reg, int val)
51 {
52         outb(reg, 0x370);
53         outb(val, 0x371);
54 }
55
56 static inline void wb977_ww(int reg, int val)
57 {
58         outb(reg, 0x370);
59         outb(val >> 8, 0x371);
60         outb(reg + 1, 0x370);
61         outb(val & 255, 0x371);
62 }
63
64 #define wb977_device_select(dev)        wb977_wb(0x07, dev)
65 #define wb977_device_disable()          wb977_wb(0x30, 0x00)
66 #define wb977_device_enable()           wb977_wb(0x30, 0x01)
67
68 /*
69  * This is a lock for accessing ports GP1_IO_BASE and GP2_IO_BASE
70  */
71 DEFINE_SPINLOCK(gpio_lock);
72
73 static unsigned int current_gpio_op;
74 static unsigned int current_gpio_io;
75 static unsigned int current_cpld;
76
77 void gpio_modify_op(int mask, int set)
78 {
79         unsigned int new_gpio, changed;
80
81         new_gpio = (current_gpio_op & ~mask) | set;
82         changed = new_gpio ^ current_gpio_op;
83         current_gpio_op = new_gpio;
84
85         if (changed & 0xff)
86                 outb(new_gpio, GP1_IO_BASE);
87         if (changed & 0xff00)
88                 outb(new_gpio >> 8, GP2_IO_BASE);
89 }
90
91 static inline void __gpio_modify_io(int mask, int in)
92 {
93         unsigned int new_gpio, changed;
94         int port;
95
96         new_gpio = (current_gpio_io & ~mask) | in;
97         changed = new_gpio ^ current_gpio_io;
98         current_gpio_io = new_gpio;
99
100         changed >>= 1;
101         new_gpio >>= 1;
102
103         wb977_device_select(7);
104
105         for (port = 0xe1; changed && port < 0xe8; changed >>= 1) {
106                 wb977_wb(port, new_gpio & 1);
107
108                 port += 1;
109                 new_gpio >>= 1;
110         }
111
112         wb977_device_select(8);
113
114         for (port = 0xe8; changed && port < 0xec; changed >>= 1) {
115                 wb977_wb(port, new_gpio & 1);
116
117                 port += 1;
118                 new_gpio >>= 1;
119         }
120 }
121
122 void gpio_modify_io(int mask, int in)
123 {
124         /* Open up the SuperIO chip */
125         wb977_open();
126
127         __gpio_modify_io(mask, in);
128
129         /* Close up the EFER gate */
130         wb977_close();
131 }
132
133 int gpio_read(void)
134 {
135         return inb(GP1_IO_BASE) | inb(GP2_IO_BASE) << 8;
136 }
137
138 /*
139  * Initialise the Winbond W83977F global registers
140  */
141 static inline void wb977_init_global(void)
142 {
143         /*
144          * Enable R/W config registers
145          */
146         wb977_wb(0x26, 0x40);
147
148         /*
149          * Power down FDC (not used)
150          */
151         wb977_wb(0x22, 0xfe);
152
153         /*
154          * GP12, GP11, CIRRX, IRRXH, GP10
155          */
156         wb977_wb(0x2a, 0xc1);
157
158         /*
159          * GP23, GP22, GP21, GP20, GP13
160          */
161         wb977_wb(0x2b, 0x6b);
162
163         /*
164          * GP17, GP16, GP15, GP14
165          */
166         wb977_wb(0x2c, 0x55);
167 }
168
169 /*
170  * Initialise the Winbond W83977F printer port
171  */
172 static inline void wb977_init_printer(void)
173 {
174         wb977_device_select(1);
175
176         /*
177          * mode 1 == EPP
178          */
179         wb977_wb(0xf0, 0x01);
180 }
181
182 /*
183  * Initialise the Winbond W83977F keyboard controller
184  */
185 static inline void wb977_init_keyboard(void)
186 {
187         wb977_device_select(5);
188
189         /*
190          * Keyboard controller address
191          */
192         wb977_ww(0x60, 0x0060);
193         wb977_ww(0x62, 0x0064);
194
195         /*
196          * Keyboard IRQ 1, active high, edge trigger
197          */
198         wb977_wb(0x70, 1);
199         wb977_wb(0x71, 0x02);
200
201         /*
202          * Mouse IRQ 5, active high, edge trigger
203          */
204         wb977_wb(0x72, 5);
205         wb977_wb(0x73, 0x02);
206
207         /*
208          * KBC 8MHz
209          */
210         wb977_wb(0xf0, 0x40);
211
212         /*
213          * Enable device
214          */
215         wb977_device_enable();
216 }
217
218 /*
219  * Initialise the Winbond W83977F Infra-Red device
220  */
221 static inline void wb977_init_irda(void)
222 {
223         wb977_device_select(6);
224
225         /*
226          * IR base address
227          */
228         wb977_ww(0x60, IRDA_IO_BASE);
229
230         /*
231          * IRDA IRQ 6, active high, edge trigger
232          */
233         wb977_wb(0x70, 6);
234         wb977_wb(0x71, 0x02);
235
236         /*
237          * RX DMA - ISA DMA 0
238          */
239         wb977_wb(0x74, 0x00);
240
241         /*
242          * TX DMA - Disable Tx DMA
243          */
244         wb977_wb(0x75, 0x04);
245
246         /*
247          * Append CRC, Enable bank selection
248          */
249         wb977_wb(0xf0, 0x03);
250
251         /*
252          * Enable device
253          */
254         wb977_device_enable();
255 }
256
257 /*
258  * Initialise Winbond W83977F general purpose IO
259  */
260 static inline void wb977_init_gpio(void)
261 {
262         unsigned long flags;
263
264         /*
265          * Set up initial I/O definitions
266          */
267         current_gpio_io = -1;
268         __gpio_modify_io(-1, GPIO_DONE | GPIO_WDTIMER);
269
270         wb977_device_select(7);
271
272         /*
273          * Group1 base address
274          */
275         wb977_ww(0x60, GP1_IO_BASE);
276         wb977_ww(0x62, 0);
277         wb977_ww(0x64, 0);
278
279         /*
280          * GP10 (Orage button) IRQ 10, active high, edge trigger
281          */
282         wb977_wb(0x70, 10);
283         wb977_wb(0x71, 0x02);
284
285         /*
286          * GP10: Debounce filter enabled, IRQ, input
287          */
288         wb977_wb(0xe0, 0x19);
289
290         /*
291          * Enable Group1
292          */
293         wb977_device_enable();
294
295         wb977_device_select(8);
296
297         /*
298          * Group2 base address
299          */
300         wb977_ww(0x60, GP2_IO_BASE);
301
302         /*
303          * Clear watchdog timer regs
304          *  - timer disable
305          */
306         wb977_wb(0xf2, 0x00);
307
308         /*
309          *  - disable LED, no mouse nor keyboard IRQ
310          */
311         wb977_wb(0xf3, 0x00);
312
313         /*
314          *  - timer counting, disable power LED, disable timeouot
315          */
316         wb977_wb(0xf4, 0x00);
317
318         /*
319          * Enable group2
320          */
321         wb977_device_enable();
322
323         /*
324          * Set Group1/Group2 outputs
325          */
326         spin_lock_irqsave(&gpio_lock, flags);
327         gpio_modify_op(-1, GPIO_RED_LED | GPIO_FAN);
328         spin_unlock_irqrestore(&gpio_lock, flags);
329 }
330
331 /*
332  * Initialise the Winbond W83977F chip.
333  */
334 static void __init wb977_init(void)
335 {
336         request_region(0x370, 2, "W83977AF configuration");
337
338         /*
339          * Open up the SuperIO chip
340          */
341         wb977_open();
342
343         /*
344          * Initialise the global registers
345          */
346         wb977_init_global();
347
348         /*
349          * Initialise the various devices in
350          * the multi-IO chip.
351          */
352         wb977_init_printer();
353         wb977_init_keyboard();
354         wb977_init_irda();
355         wb977_init_gpio();
356
357         /*
358          * Close up the EFER gate
359          */
360         wb977_close();
361 }
362
363 void cpld_modify(int mask, int set)
364 {
365         int msk;
366
367         current_cpld = (current_cpld & ~mask) | set;
368
369         gpio_modify_io(GPIO_DATA | GPIO_IOCLK | GPIO_IOLOAD, 0);
370         gpio_modify_op(GPIO_IOLOAD, 0);
371
372         for (msk = 8; msk; msk >>= 1) {
373                 int bit = current_cpld & msk;
374
375                 gpio_modify_op(GPIO_DATA | GPIO_IOCLK, bit ? GPIO_DATA : 0);
376                 gpio_modify_op(GPIO_IOCLK, GPIO_IOCLK);
377         }
378
379         gpio_modify_op(GPIO_IOCLK|GPIO_DATA, 0);
380         gpio_modify_op(GPIO_IOLOAD|GPIO_DSCLK, GPIO_IOLOAD|GPIO_DSCLK);
381         gpio_modify_op(GPIO_IOLOAD, 0);
382 }
383
384 static void __init cpld_init(void)
385 {
386         unsigned long flags;
387
388         spin_lock_irqsave(&gpio_lock, flags);
389         cpld_modify(-1, CPLD_UNMUTE | CPLD_7111_DISABLE);
390         spin_unlock_irqrestore(&gpio_lock, flags);
391 }
392
393 static unsigned char rwa_unlock[] __initdata =
394 { 0x00, 0x00, 0x6a, 0xb5, 0xda, 0xed, 0xf6, 0xfb, 0x7d, 0xbe, 0xdf, 0x6f, 0x37, 0x1b,
395   0x0d, 0x86, 0xc3, 0x61, 0xb0, 0x58, 0x2c, 0x16, 0x8b, 0x45, 0xa2, 0xd1, 0xe8, 0x74,
396   0x3a, 0x9d, 0xce, 0xe7, 0x73, 0x39 };
397
398 #ifndef DEBUG
399 #define dprintk(x...)
400 #else
401 #define dprintk(x...) printk(x)
402 #endif
403
404 #define WRITE_RWA(r,v) do { outb((r), 0x279); udelay(10); outb((v), 0xa79); } while (0)
405
406 static inline void rwa010_unlock(void)
407 {
408         int i;
409
410         WRITE_RWA(2, 2);
411         mdelay(10);
412
413         for (i = 0; i < sizeof(rwa_unlock); i++) {
414                 outb(rwa_unlock[i], 0x279);
415                 udelay(10);
416         }
417 }
418
419 static inline void rwa010_read_ident(void)
420 {
421         unsigned char si[9];
422         int i, j;
423
424         WRITE_RWA(3, 0);
425         WRITE_RWA(0, 128);
426
427         outb(1, 0x279);
428
429         mdelay(1);
430
431         dprintk("Identifier: ");
432         for (i = 0; i < 9; i++) {
433                 si[i] = 0;
434                 for (j = 0; j < 8; j++) {
435                         int bit;
436                         udelay(250);
437                         inb(0x203);
438                         udelay(250);
439                         bit = inb(0x203);
440                         dprintk("%02X ", bit);
441                         bit = (bit == 0xaa) ? 1 : 0;
442                         si[i] |= bit << j;
443                 }
444                 dprintk("(%02X) ", si[i]);
445         }
446         dprintk("\n");
447 }
448
449 static inline void rwa010_global_init(void)
450 {
451         WRITE_RWA(6, 2);        // Assign a card no = 2
452
453         dprintk("Card no = %d\n", inb(0x203));
454
455         /* disable the modem section of the chip */
456         WRITE_RWA(7, 3);
457         WRITE_RWA(0x30, 0);
458
459         /* disable the cdrom section of the chip */
460         WRITE_RWA(7, 4);
461         WRITE_RWA(0x30, 0);
462
463         /* disable the MPU-401 section of the chip */
464         WRITE_RWA(7, 2);
465         WRITE_RWA(0x30, 0);
466 }
467
468 static inline void rwa010_game_port_init(void)
469 {
470         int i;
471
472         WRITE_RWA(7, 5);
473
474         dprintk("Slider base: ");
475         WRITE_RWA(0x61, 1);
476         i = inb(0x203);
477
478         WRITE_RWA(0x60, 2);
479         dprintk("%02X%02X (201)\n", inb(0x203), i);
480
481         WRITE_RWA(0x30, 1);
482 }
483
484 static inline void rwa010_waveartist_init(int base, int irq, int dma)
485 {
486         int i;
487
488         WRITE_RWA(7, 0);
489
490         dprintk("WaveArtist base: ");
491         WRITE_RWA(0x61, base & 255);
492         i = inb(0x203);
493
494         WRITE_RWA(0x60, base >> 8);
495         dprintk("%02X%02X (%X),", inb(0x203), i, base);
496
497         WRITE_RWA(0x70, irq);
498         dprintk(" irq: %d (%d),", inb(0x203), irq);
499
500         WRITE_RWA(0x74, dma);
501         dprintk(" dma: %d (%d)\n", inb(0x203), dma);
502
503         WRITE_RWA(0x30, 1);
504 }
505
506 static inline void rwa010_soundblaster_init(int sb_base, int al_base, int irq, int dma)
507 {
508         int i;
509
510         WRITE_RWA(7, 1);
511
512         dprintk("SoundBlaster base: ");
513         WRITE_RWA(0x61, sb_base & 255);
514         i = inb(0x203);
515
516         WRITE_RWA(0x60, sb_base >> 8);
517         dprintk("%02X%02X (%X),", inb(0x203), i, sb_base);
518
519         dprintk(" irq: ");
520         WRITE_RWA(0x70, irq);
521         dprintk("%d (%d),", inb(0x203), irq);
522
523         dprintk(" 8-bit DMA: ");
524         WRITE_RWA(0x74, dma);
525         dprintk("%d (%d)\n", inb(0x203), dma);
526
527         dprintk("AdLib base: ");
528         WRITE_RWA(0x63, al_base & 255);
529         i = inb(0x203);
530
531         WRITE_RWA(0x62, al_base >> 8);
532         dprintk("%02X%02X (%X)\n", inb(0x203), i, al_base);
533
534         WRITE_RWA(0x30, 1);
535 }
536
537 static void rwa010_soundblaster_reset(void)
538 {
539         int i;
540
541         outb(1, 0x226);
542         udelay(3);
543         outb(0, 0x226);
544
545         for (i = 0; i < 5; i++) {
546                 if (inb(0x22e) & 0x80)
547                         break;
548                 mdelay(1);
549         }
550         if (i == 5)
551                 printk("SoundBlaster: DSP reset failed\n");
552
553         dprintk("SoundBlaster DSP reset: %02X (AA)\n", inb(0x22a));
554
555         for (i = 0; i < 5; i++) {
556                 if ((inb(0x22c) & 0x80) == 0)
557                         break;
558                 mdelay(1);
559         }
560
561         if (i == 5)
562                 printk("SoundBlaster: DSP not ready\n");
563         else {
564                 outb(0xe1, 0x22c);
565
566                 dprintk("SoundBlaster DSP id: ");
567                 i = inb(0x22a);
568                 udelay(1);
569                 i |= inb(0x22a) << 8;
570                 dprintk("%04X\n", i);
571
572                 for (i = 0; i < 5; i++) {
573                         if ((inb(0x22c) & 0x80) == 0)
574                                 break;
575                         mdelay(1);
576                 }
577
578                 if (i == 5)
579                         printk("SoundBlaster: could not turn speaker off\n");
580
581                 outb(0xd3, 0x22c);
582         }
583
584         /* turn on OPL3 */
585         outb(5, 0x38a);
586         outb(1, 0x38b);
587 }
588
589 static void __init rwa010_init(void)
590 {
591         rwa010_unlock();
592         rwa010_read_ident();
593         rwa010_global_init();
594         rwa010_game_port_init();
595         rwa010_waveartist_init(0x250, 3, 7);
596         rwa010_soundblaster_init(0x220, 0x388, 3, 1);
597         rwa010_soundblaster_reset();
598 }
599
600 EXPORT_SYMBOL(gpio_lock);
601 EXPORT_SYMBOL(gpio_modify_op);
602 EXPORT_SYMBOL(gpio_modify_io);
603 EXPORT_SYMBOL(cpld_modify);
604
605 /*
606  * Initialise any other hardware after we've got the PCI bus
607  * initialised.  We may need the PCI bus to talk to this other
608  * hardware.
609  */
610 static int __init nw_hw_init(void)
611 {
612         if (machine_is_netwinder()) {
613                 unsigned long flags;
614
615                 wb977_init();
616                 cpld_init();
617                 rwa010_init();
618
619                 spin_lock_irqsave(&gpio_lock, flags);
620                 gpio_modify_op(GPIO_RED_LED|GPIO_GREEN_LED, DEFAULT_LEDS);
621                 spin_unlock_irqrestore(&gpio_lock, flags);
622         }
623         return 0;
624 }
625
626 __initcall(nw_hw_init);
627
628 /*
629  * Older NeTTroms either do not provide a parameters
630  * page, or they don't supply correct information in
631  * the parameter page.
632  */
633 static void __init
634 fixup_netwinder(struct machine_desc *desc, struct tag *tags,
635                 char **cmdline, struct meminfo *mi)
636 {
637 #ifdef CONFIG_ISAPNP
638         extern int isapnp_disable;
639
640         /*
641          * We must not use the kernels ISAPnP code
642          * on the NetWinder - it will reset the settings
643          * for the WaveArtist chip and render it inoperable.
644          */
645         isapnp_disable = 1;
646 #endif
647 }
648
649 MACHINE_START(NETWINDER, "Rebel-NetWinder")
650         MAINTAINER("Russell King/Rebel.com")
651         BOOT_MEM(0x00000000, DC21285_ARMCSR_BASE, 0xfe000000)
652         BOOT_PARAMS(0x00000100)
653         VIDEO(0x000a0000, 0x000bffff)
654         DISABLE_PARPORT(0)
655         DISABLE_PARPORT(2)
656         FIXUP(fixup_netwinder)
657         MAPIO(footbridge_map_io)
658         INITIRQ(footbridge_init_irq)
659         .timer          = &isa_timer,
660 MACHINE_END