1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3 * LASI Device Driver
4 *
5 * (c) Copyright 1999 Red Hat Software
6 * Portions (c) Copyright 1999 The Puffin Group Inc.
7 * Portions (c) Copyright 1999 Hewlett-Packard
8 *
9 * by Alan Cox <alan@redhat.com> and
10 * Alex deVries <alex@onefishtwo.ca>
11 */
12
13 #include <linux/errno.h>
14 #include <linux/init.h>
15 #include <linux/interrupt.h>
16 #include <linux/slab.h>
17 #include <linux/module.h>
18 #include <linux/pm.h>
19 #include <linux/types.h>
20
21 #include <asm/io.h>
22 #include <asm/hardware.h>
23 #include <asm/led.h>
24
25 #include "gsc.h"
26
27
28 #define LASI_VER 0xC008 /* LASI Version */
29
30 #define LASI_IO_CONF 0x7FFFE /* LASI primary configuration register */
31 #define LASI_IO_CONF2 0x7FFFF /* LASI secondary configuration register */
32
lasi_choose_irq(struct parisc_device * dev,void * ctrl)33 static void lasi_choose_irq(struct parisc_device *dev, void *ctrl)
34 {
35 int irq;
36
37 switch (dev->id.sversion) {
38 case 0x74: irq = 7; break; /* Centronics */
39 case 0x7B: irq = 13; break; /* Audio */
40 case 0x81: irq = 14; break; /* Lasi itself */
41 case 0x82: irq = 9; break; /* SCSI */
42 case 0x83: irq = 20; break; /* Floppy */
43 case 0x84: irq = 26; break; /* PS/2 Keyboard */
44 case 0x87: irq = 18; break; /* ISDN */
45 case 0x8A: irq = 8; break; /* LAN */
46 case 0x8C: irq = 5; break; /* RS232 */
47 case 0x8D: irq = (dev->hw_path == 13) ? 16 : 17; break;
48 /* Telephone */
49 default: return; /* unknown */
50 }
51
52 gsc_asic_assign_irq(ctrl, irq, &dev->irq);
53 }
54
55 static void __init
lasi_init_irq(struct gsc_asic * this_lasi)56 lasi_init_irq(struct gsc_asic *this_lasi)
57 {
58 unsigned long lasi_base = this_lasi->hpa;
59
60 /* Stop LASI barking for a bit */
61 gsc_writel(0x00000000, lasi_base+OFFSET_IMR);
62
63 /* clear pending interrupts */
64 gsc_readl(lasi_base+OFFSET_IRR);
65
66 /* We're not really convinced we want to reset the onboard
67 * devices. Firmware does it for us...
68 */
69
70 /* Resets */
71 /* gsc_writel(0xFFFFFFFF, lasi_base+0x2000);*/ /* Parallel */
72 if(pdc_add_valid(lasi_base+0x4004) == PDC_OK)
73 gsc_writel(0xFFFFFFFF, lasi_base+0x4004); /* Audio */
74 /* gsc_writel(0xFFFFFFFF, lasi_base+0x5000);*/ /* Serial */
75 /* gsc_writel(0xFFFFFFFF, lasi_base+0x6000);*/ /* SCSI */
76 gsc_writel(0xFFFFFFFF, lasi_base+0x7000); /* LAN */
77 gsc_writel(0xFFFFFFFF, lasi_base+0x8000); /* Keyboard */
78 gsc_writel(0xFFFFFFFF, lasi_base+0xA000); /* FDC */
79
80 /* Ok we hit it on the head with a hammer, our Dog is now
81 ** comatose and muzzled. Devices will now unmask LASI
82 ** interrupts as they are registered as irq's in the LASI range.
83 */
84 /* XXX: I thought it was `awks that got `it on the `ead with an
85 * `ammer. -- willy
86 */
87 }
88
89
90 /*
91 ** lasi_led_init()
92 **
93 ** lasi_led_init() initializes the LED controller on the LASI.
94 **
95 ** Since Mirage and Electra machines use a different LED
96 ** address register, we need to check for these machines
97 ** explicitly.
98 */
99
100 #ifndef CONFIG_CHASSIS_LCD_LED
101
102 #define lasi_led_init(x) /* nothing */
103
104 #else
105
lasi_led_init(unsigned long lasi_hpa)106 static void __init lasi_led_init(unsigned long lasi_hpa)
107 {
108 unsigned long datareg;
109
110 switch (CPU_HVERSION) {
111 /* Gecko machines have only one single LED, which can be permanently
112 turned on by writing a zero into the power control register. */
113 case 0x600: /* Gecko (712/60) */
114 case 0x601: /* Gecko (712/80) */
115 case 0x602: /* Gecko (712/100) */
116 case 0x603: /* Anole 64 (743/64) */
117 case 0x604: /* Anole 100 (743/100) */
118 case 0x605: /* Gecko (712/120) */
119 datareg = lasi_hpa + 0x0000C000;
120 gsc_writeb(0, datareg);
121 return; /* no need to register the LED interrupt-function */
122
123 /* Mirage and Electra machines need special offsets */
124 case 0x60A: /* Mirage Jr (715/64) */
125 case 0x60B: /* Mirage 100 */
126 case 0x60C: /* Mirage 100+ */
127 case 0x60D: /* Electra 100 */
128 case 0x60E: /* Electra 120 */
129 datareg = lasi_hpa - 0x00020000;
130 break;
131
132 default:
133 datareg = lasi_hpa + 0x0000C000;
134 break;
135 }
136
137 register_led_driver(DISPLAY_MODEL_LASI, LED_CMD_REG_NONE, datareg);
138 }
139 #endif
140
141 /*
142 * lasi_power_off
143 *
144 * Function for lasi to turn off the power. This is accomplished by setting a
145 * 1 to PWR_ON_L in the Power Control Register
146 *
147 */
148
149 static unsigned long lasi_power_off_hpa __read_mostly;
150
lasi_power_off(void)151 static void lasi_power_off(void)
152 {
153 unsigned long datareg;
154
155 /* calculate addr of the Power Control Register */
156 datareg = lasi_power_off_hpa + 0x0000C000;
157
158 /* Power down the machine */
159 gsc_writel(0x02, datareg);
160 }
161
lasi_init_chip(struct parisc_device * dev)162 static int __init lasi_init_chip(struct parisc_device *dev)
163 {
164 extern void (*chassis_power_off)(void);
165 struct gsc_asic *lasi;
166 int ret;
167
168 lasi = kzalloc(sizeof(*lasi), GFP_KERNEL);
169 if (!lasi)
170 return -ENOMEM;
171
172 lasi->name = "Lasi";
173 lasi->hpa = dev->hpa.start;
174
175 /* Check the 4-bit (yes, only 4) version register */
176 lasi->version = gsc_readl(lasi->hpa + LASI_VER) & 0xf;
177 printk(KERN_INFO "%s version %d at 0x%lx found.\n",
178 lasi->name, lasi->version, lasi->hpa);
179
180 /* initialize the chassis LEDs really early */
181 lasi_led_init(lasi->hpa);
182
183 /* Stop LASI barking for a bit */
184 lasi_init_irq(lasi);
185
186 /* the IRQ lasi should use */
187 dev->irq = gsc_alloc_irq(&lasi->gsc_irq);
188 if (dev->irq < 0) {
189 printk(KERN_ERR "%s(): cannot get GSC irq\n",
190 __func__);
191 kfree(lasi);
192 return -EBUSY;
193 }
194
195 lasi->eim = ((u32) lasi->gsc_irq.txn_addr) | lasi->gsc_irq.txn_data;
196
197 ret = request_irq(lasi->gsc_irq.irq, gsc_asic_intr, 0, "lasi", lasi);
198 if (ret < 0) {
199 kfree(lasi);
200 return ret;
201 }
202
203 /* enable IRQ's for devices below LASI */
204 gsc_writel(lasi->eim, lasi->hpa + OFFSET_IAR);
205
206 /* Done init'ing, register this driver */
207 ret = gsc_common_setup(dev, lasi);
208 if (ret) {
209 kfree(lasi);
210 return ret;
211 }
212
213 gsc_fixup_irqs(dev, lasi, lasi_choose_irq);
214
215 /* initialize the power off function */
216 /* FIXME: Record the LASI HPA for the power off function. This should
217 * ensure that only the first LASI (the one controlling the power off)
218 * should set the HPA here */
219 lasi_power_off_hpa = lasi->hpa;
220 chassis_power_off = lasi_power_off;
221
222 return ret;
223 }
224
225 static struct parisc_device_id lasi_tbl[] __initdata = {
226 { HPHW_BA, HVERSION_REV_ANY_ID, HVERSION_ANY_ID, 0x00081 },
227 { 0, }
228 };
229
230 struct parisc_driver lasi_driver __refdata = {
231 .name = "lasi",
232 .id_table = lasi_tbl,
233 .probe = lasi_init_chip,
234 };
235