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