4 * (c) Copyright 1999 Red Hat Software
5 * Portions (c) Copyright 1999 The Puffin Group Inc.
6 * Portions (c) Copyright 1999 Hewlett-Packard
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
13 * by Alan Cox <alan@redhat.com> and
14 * Alex deVries <alex@onefishtwo.ca>
17 #include <linux/errno.h>
18 #include <linux/init.h>
19 #include <linux/interrupt.h>
20 #include <linux/slab.h>
21 #include <linux/module.h>
23 #include <linux/types.h>
26 #include <asm/hardware.h>
32 #define LASI_VER 0xC008 /* LASI Version */
34 #define LASI_IO_CONF 0x7FFFE /* LASI primary configuration register */
35 #define LASI_IO_CONF2 0x7FFFF /* LASI secondary configuration register */
37 static void lasi_choose_irq(struct parisc_device
*dev
, void *ctrl
)
41 switch (dev
->id
.sversion
) {
42 case 0x74: irq
= 7; break; /* Centronics */
43 case 0x7B: irq
= 13; break; /* Audio */
44 case 0x81: irq
= 14; break; /* Lasi itself */
45 case 0x82: irq
= 9; break; /* SCSI */
46 case 0x83: irq
= 20; break; /* Floppy */
47 case 0x84: irq
= 26; break; /* PS/2 Keyboard */
48 case 0x87: irq
= 18; break; /* ISDN */
49 case 0x8A: irq
= 8; break; /* LAN */
50 case 0x8C: irq
= 5; break; /* RS232 */
51 case 0x8D: irq
= (dev
->hw_path
== 13) ? 16 : 17; break;
53 default: return; /* unknown */
56 gsc_asic_assign_irq(ctrl
, irq
, &dev
->irq
);
60 lasi_init_irq(struct gsc_asic
*this_lasi
)
62 unsigned long lasi_base
= this_lasi
->hpa
;
64 /* Stop LASI barking for a bit */
65 gsc_writel(0x00000000, lasi_base
+OFFSET_IMR
);
67 /* clear pending interrupts */
68 gsc_readl(lasi_base
+OFFSET_IRR
);
70 /* We're not really convinced we want to reset the onboard
71 * devices. Firmware does it for us...
75 /* gsc_writel(0xFFFFFFFF, lasi_base+0x2000);*/ /* Parallel */
76 if(pdc_add_valid(lasi_base
+0x4004) == PDC_OK
)
77 gsc_writel(0xFFFFFFFF, lasi_base
+0x4004); /* Audio */
78 /* gsc_writel(0xFFFFFFFF, lasi_base+0x5000);*/ /* Serial */
79 /* gsc_writel(0xFFFFFFFF, lasi_base+0x6000);*/ /* SCSI */
80 gsc_writel(0xFFFFFFFF, lasi_base
+0x7000); /* LAN */
81 gsc_writel(0xFFFFFFFF, lasi_base
+0x8000); /* Keyboard */
82 gsc_writel(0xFFFFFFFF, lasi_base
+0xA000); /* FDC */
84 /* Ok we hit it on the head with a hammer, our Dog is now
85 ** comatose and muzzled. Devices will now unmask LASI
86 ** interrupts as they are registered as irq's in the LASI range.
88 /* XXX: I thought it was `awks that got `it on the `ead with an
97 ** lasi_led_init() initializes the LED controller on the LASI.
99 ** Since Mirage and Electra machines use a different LED
100 ** address register, we need to check for these machines
104 #ifndef CONFIG_CHASSIS_LCD_LED
106 #define lasi_led_init(x) /* nothing */
110 static void __init
lasi_led_init(unsigned long lasi_hpa
)
112 unsigned long datareg
;
114 switch (CPU_HVERSION
) {
115 /* Gecko machines have only one single LED, which can be permanently
116 turned on by writing a zero into the power control register. */
117 case 0x600: /* Gecko (712/60) */
118 case 0x601: /* Gecko (712/80) */
119 case 0x602: /* Gecko (712/100) */
120 case 0x603: /* Anole 64 (743/64) */
121 case 0x604: /* Anole 100 (743/100) */
122 case 0x605: /* Gecko (712/120) */
123 datareg
= lasi_hpa
+ 0x0000C000;
124 gsc_writeb(0, datareg
);
125 return; /* no need to register the LED interrupt-function */
127 /* Mirage and Electra machines need special offsets */
128 case 0x60A: /* Mirage Jr (715/64) */
129 case 0x60B: /* Mirage 100 */
130 case 0x60C: /* Mirage 100+ */
131 case 0x60D: /* Electra 100 */
132 case 0x60E: /* Electra 120 */
133 datareg
= lasi_hpa
- 0x00020000;
137 datareg
= lasi_hpa
+ 0x0000C000;
141 register_led_driver(DISPLAY_MODEL_LASI
, LED_CMD_REG_NONE
, datareg
);
148 * Function for lasi to turn off the power. This is accomplished by setting a
149 * 1 to PWR_ON_L in the Power Control Register
153 static unsigned long lasi_power_off_hpa __read_mostly
;
155 static void lasi_power_off(void)
157 unsigned long datareg
;
159 /* calculate addr of the Power Control Register */
160 datareg
= lasi_power_off_hpa
+ 0x0000C000;
162 /* Power down the machine */
163 gsc_writel(0x02, datareg
);
166 static int __init
lasi_init_chip(struct parisc_device
*dev
)
168 extern void (*chassis_power_off
)(void);
169 struct gsc_asic
*lasi
;
170 struct gsc_irq gsc_irq
;
173 lasi
= kzalloc(sizeof(*lasi
), GFP_KERNEL
);
178 lasi
->hpa
= dev
->hpa
.start
;
180 /* Check the 4-bit (yes, only 4) version register */
181 lasi
->version
= gsc_readl(lasi
->hpa
+ LASI_VER
) & 0xf;
182 printk(KERN_INFO
"%s version %d at 0x%lx found.\n",
183 lasi
->name
, lasi
->version
, lasi
->hpa
);
185 /* initialize the chassis LEDs really early */
186 lasi_led_init(lasi
->hpa
);
188 /* Stop LASI barking for a bit */
191 /* the IRQ lasi should use */
192 dev
->irq
= gsc_alloc_irq(&gsc_irq
);
194 printk(KERN_ERR
"%s(): cannot get GSC irq\n",
200 lasi
->eim
= ((u32
) gsc_irq
.txn_addr
) | gsc_irq
.txn_data
;
202 ret
= request_irq(gsc_irq
.irq
, gsc_asic_intr
, 0, "lasi", lasi
);
208 /* enable IRQ's for devices below LASI */
209 gsc_writel(lasi
->eim
, lasi
->hpa
+ OFFSET_IAR
);
211 /* Done init'ing, register this driver */
212 ret
= gsc_common_setup(dev
, lasi
);
218 gsc_fixup_irqs(dev
, lasi
, lasi_choose_irq
);
220 /* initialize the power off function */
221 /* FIXME: Record the LASI HPA for the power off function. This should
222 * ensure that only the first LASI (the one controlling the power off)
223 * should set the HPA here */
224 lasi_power_off_hpa
= lasi
->hpa
;
225 chassis_power_off
= lasi_power_off
;
230 static struct parisc_device_id lasi_tbl
[] = {
231 { HPHW_BA
, HVERSION_REV_ANY_ID
, HVERSION_ANY_ID
, 0x00081 },
235 struct parisc_driver lasi_driver
= {
237 .id_table
= lasi_tbl
,
238 .probe
= lasi_init_chip
,