1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3 * Copyright (c) 1999-2001 Vojtech Pavlik
4 */
5
6 /*
7 * Sun keyboard driver for Linux
8 */
9
10 #include <linux/delay.h>
11 #include <linux/sched.h>
12 #include <linux/slab.h>
13 #include <linux/module.h>
14 #include <linux/interrupt.h>
15 #include <linux/input.h>
16 #include <linux/serio.h>
17 #include <linux/workqueue.h>
18
19 #define DRIVER_DESC "Sun keyboard driver"
20
21 MODULE_AUTHOR("Vojtech Pavlik <vojtech@ucw.cz>");
22 MODULE_DESCRIPTION(DRIVER_DESC);
23 MODULE_LICENSE("GPL");
24
25 static unsigned char sunkbd_keycode[128] = {
26 0,128,114,129,115, 59, 60, 68, 61, 87, 62, 88, 63,100, 64,112,
27 65, 66, 67, 56,103,119, 99, 70,105,130,131,108,106, 1, 2, 3,
28 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 41, 14,110,113, 98, 55,
29 116,132, 83,133,102, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25,
30 26, 27,111,127, 71, 72, 73, 74,134,135,107, 0, 29, 30, 31, 32,
31 33, 34, 35, 36, 37, 38, 39, 40, 43, 28, 96, 75, 76, 77, 82,136,
32 104,137, 69, 42, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54,101,
33 79, 80, 81, 0, 0, 0,138, 58,125, 57,126,109, 86, 78
34 };
35
36 #define SUNKBD_CMD_RESET 0x1
37 #define SUNKBD_CMD_BELLON 0x2
38 #define SUNKBD_CMD_BELLOFF 0x3
39 #define SUNKBD_CMD_CLICK 0xa
40 #define SUNKBD_CMD_NOCLICK 0xb
41 #define SUNKBD_CMD_SETLED 0xe
42 #define SUNKBD_CMD_LAYOUT 0xf
43
44 #define SUNKBD_RET_RESET 0xff
45 #define SUNKBD_RET_ALLUP 0x7f
46 #define SUNKBD_RET_LAYOUT 0xfe
47
48 #define SUNKBD_LAYOUT_5_MASK 0x20
49 #define SUNKBD_RELEASE 0x80
50 #define SUNKBD_KEY 0x7f
51
52 /*
53 * Per-keyboard data.
54 */
55
56 struct sunkbd {
57 unsigned char keycode[ARRAY_SIZE(sunkbd_keycode)];
58 struct input_dev *dev;
59 struct serio *serio;
60 struct work_struct tq;
61 wait_queue_head_t wait;
62 char name[64];
63 char phys[32];
64 char type;
65 bool enabled;
66 volatile s8 reset;
67 volatile s8 layout;
68 };
69
70 /*
71 * sunkbd_interrupt() is called by the low level driver when a character
72 * is received.
73 */
74
sunkbd_interrupt(struct serio * serio,unsigned char data,unsigned int flags)75 static irqreturn_t sunkbd_interrupt(struct serio *serio,
76 unsigned char data, unsigned int flags)
77 {
78 struct sunkbd *sunkbd = serio_get_drvdata(serio);
79
80 if (sunkbd->reset <= -1) {
81 /*
82 * If cp[i] is 0xff, sunkbd->reset will stay -1.
83 * The keyboard sends 0xff 0xff 0xID on powerup.
84 */
85 sunkbd->reset = data;
86 wake_up_interruptible(&sunkbd->wait);
87 goto out;
88 }
89
90 if (sunkbd->layout == -1) {
91 sunkbd->layout = data;
92 wake_up_interruptible(&sunkbd->wait);
93 goto out;
94 }
95
96 switch (data) {
97
98 case SUNKBD_RET_RESET:
99 if (sunkbd->enabled)
100 schedule_work(&sunkbd->tq);
101 sunkbd->reset = -1;
102 break;
103
104 case SUNKBD_RET_LAYOUT:
105 sunkbd->layout = -1;
106 break;
107
108 case SUNKBD_RET_ALLUP: /* All keys released */
109 break;
110
111 default:
112 if (!sunkbd->enabled)
113 break;
114
115 if (sunkbd->keycode[data & SUNKBD_KEY]) {
116 input_report_key(sunkbd->dev,
117 sunkbd->keycode[data & SUNKBD_KEY],
118 !(data & SUNKBD_RELEASE));
119 input_sync(sunkbd->dev);
120 } else {
121 printk(KERN_WARNING
122 "sunkbd.c: Unknown key (scancode %#x) %s.\n",
123 data & SUNKBD_KEY,
124 data & SUNKBD_RELEASE ? "released" : "pressed");
125 }
126 }
127 out:
128 return IRQ_HANDLED;
129 }
130
131 /*
132 * sunkbd_event() handles events from the input module.
133 */
134
sunkbd_event(struct input_dev * dev,unsigned int type,unsigned int code,int value)135 static int sunkbd_event(struct input_dev *dev,
136 unsigned int type, unsigned int code, int value)
137 {
138 struct sunkbd *sunkbd = input_get_drvdata(dev);
139
140 switch (type) {
141
142 case EV_LED:
143
144 serio_write(sunkbd->serio, SUNKBD_CMD_SETLED);
145 serio_write(sunkbd->serio,
146 (!!test_bit(LED_CAPSL, dev->led) << 3) |
147 (!!test_bit(LED_SCROLLL, dev->led) << 2) |
148 (!!test_bit(LED_COMPOSE, dev->led) << 1) |
149 !!test_bit(LED_NUML, dev->led));
150 return 0;
151
152 case EV_SND:
153
154 switch (code) {
155
156 case SND_CLICK:
157 serio_write(sunkbd->serio, SUNKBD_CMD_NOCLICK - value);
158 return 0;
159
160 case SND_BELL:
161 serio_write(sunkbd->serio, SUNKBD_CMD_BELLOFF - value);
162 return 0;
163 }
164
165 break;
166 }
167
168 return -1;
169 }
170
171 /*
172 * sunkbd_initialize() checks for a Sun keyboard attached, and determines
173 * its type.
174 */
175
sunkbd_initialize(struct sunkbd * sunkbd)176 static int sunkbd_initialize(struct sunkbd *sunkbd)
177 {
178 sunkbd->reset = -2;
179 serio_write(sunkbd->serio, SUNKBD_CMD_RESET);
180 wait_event_interruptible_timeout(sunkbd->wait, sunkbd->reset >= 0, HZ);
181 if (sunkbd->reset < 0)
182 return -1;
183
184 sunkbd->type = sunkbd->reset;
185
186 if (sunkbd->type == 4) { /* Type 4 keyboard */
187 sunkbd->layout = -2;
188 serio_write(sunkbd->serio, SUNKBD_CMD_LAYOUT);
189 wait_event_interruptible_timeout(sunkbd->wait,
190 sunkbd->layout >= 0, HZ / 4);
191 if (sunkbd->layout < 0)
192 return -1;
193 if (sunkbd->layout & SUNKBD_LAYOUT_5_MASK)
194 sunkbd->type = 5;
195 }
196
197 return 0;
198 }
199
200 /*
201 * sunkbd_set_leds_beeps() sets leds and beeps to a state the computer remembers
202 * they were in.
203 */
204
sunkbd_set_leds_beeps(struct sunkbd * sunkbd)205 static void sunkbd_set_leds_beeps(struct sunkbd *sunkbd)
206 {
207 serio_write(sunkbd->serio, SUNKBD_CMD_SETLED);
208 serio_write(sunkbd->serio,
209 (!!test_bit(LED_CAPSL, sunkbd->dev->led) << 3) |
210 (!!test_bit(LED_SCROLLL, sunkbd->dev->led) << 2) |
211 (!!test_bit(LED_COMPOSE, sunkbd->dev->led) << 1) |
212 !!test_bit(LED_NUML, sunkbd->dev->led));
213 serio_write(sunkbd->serio,
214 SUNKBD_CMD_NOCLICK - !!test_bit(SND_CLICK, sunkbd->dev->snd));
215 serio_write(sunkbd->serio,
216 SUNKBD_CMD_BELLOFF - !!test_bit(SND_BELL, sunkbd->dev->snd));
217 }
218
219
220 /*
221 * sunkbd_reinit() wait for the keyboard reset to complete and restores state
222 * of leds and beeps.
223 */
224
sunkbd_reinit(struct work_struct * work)225 static void sunkbd_reinit(struct work_struct *work)
226 {
227 struct sunkbd *sunkbd = container_of(work, struct sunkbd, tq);
228
229 /*
230 * It is OK that we check sunkbd->enabled without pausing serio,
231 * as we only want to catch true->false transition that will
232 * happen once and we will be woken up for it.
233 */
234 wait_event_interruptible_timeout(sunkbd->wait,
235 sunkbd->reset >= 0 || !sunkbd->enabled,
236 HZ);
237
238 if (sunkbd->reset >= 0 && sunkbd->enabled)
239 sunkbd_set_leds_beeps(sunkbd);
240 }
241
sunkbd_enable(struct sunkbd * sunkbd,bool enable)242 static void sunkbd_enable(struct sunkbd *sunkbd, bool enable)
243 {
244 scoped_guard(serio_pause_rx, sunkbd->serio)
245 sunkbd->enabled = enable;
246
247 if (!enable) {
248 wake_up_interruptible(&sunkbd->wait);
249 cancel_work_sync(&sunkbd->tq);
250 }
251 }
252
253 /*
254 * sunkbd_connect() probes for a Sun keyboard and fills the necessary
255 * structures.
256 */
257
sunkbd_connect(struct serio * serio,struct serio_driver * drv)258 static int sunkbd_connect(struct serio *serio, struct serio_driver *drv)
259 {
260 struct sunkbd *sunkbd;
261 struct input_dev *input_dev;
262 int err = -ENOMEM;
263 int i;
264
265 sunkbd = kzalloc(sizeof(*sunkbd), GFP_KERNEL);
266 input_dev = input_allocate_device();
267 if (!sunkbd || !input_dev)
268 goto fail1;
269
270 sunkbd->serio = serio;
271 sunkbd->dev = input_dev;
272 init_waitqueue_head(&sunkbd->wait);
273 INIT_WORK(&sunkbd->tq, sunkbd_reinit);
274 snprintf(sunkbd->phys, sizeof(sunkbd->phys), "%s/input0", serio->phys);
275
276 serio_set_drvdata(serio, sunkbd);
277
278 err = serio_open(serio, drv);
279 if (err)
280 goto fail2;
281
282 if (sunkbd_initialize(sunkbd) < 0) {
283 err = -ENODEV;
284 goto fail3;
285 }
286
287 snprintf(sunkbd->name, sizeof(sunkbd->name),
288 "Sun Type %d keyboard", sunkbd->type);
289 memcpy(sunkbd->keycode, sunkbd_keycode, sizeof(sunkbd->keycode));
290
291 input_dev->name = sunkbd->name;
292 input_dev->phys = sunkbd->phys;
293 input_dev->id.bustype = BUS_RS232;
294 input_dev->id.vendor = SERIO_SUNKBD;
295 input_dev->id.product = sunkbd->type;
296 input_dev->id.version = 0x0100;
297 input_dev->dev.parent = &serio->dev;
298
299 input_set_drvdata(input_dev, sunkbd);
300
301 input_dev->event = sunkbd_event;
302
303 input_dev->evbit[0] = BIT_MASK(EV_KEY) | BIT_MASK(EV_LED) |
304 BIT_MASK(EV_SND) | BIT_MASK(EV_REP);
305 input_dev->ledbit[0] = BIT_MASK(LED_CAPSL) | BIT_MASK(LED_COMPOSE) |
306 BIT_MASK(LED_SCROLLL) | BIT_MASK(LED_NUML);
307 input_dev->sndbit[0] = BIT_MASK(SND_CLICK) | BIT_MASK(SND_BELL);
308
309 input_dev->keycode = sunkbd->keycode;
310 input_dev->keycodesize = sizeof(unsigned char);
311 input_dev->keycodemax = ARRAY_SIZE(sunkbd_keycode);
312 for (i = 0; i < ARRAY_SIZE(sunkbd_keycode); i++)
313 __set_bit(sunkbd->keycode[i], input_dev->keybit);
314 __clear_bit(KEY_RESERVED, input_dev->keybit);
315
316 sunkbd_enable(sunkbd, true);
317
318 err = input_register_device(sunkbd->dev);
319 if (err)
320 goto fail4;
321
322 return 0;
323
324 fail4: sunkbd_enable(sunkbd, false);
325 fail3: serio_close(serio);
326 fail2: serio_set_drvdata(serio, NULL);
327 fail1: input_free_device(input_dev);
328 kfree(sunkbd);
329 return err;
330 }
331
332 /*
333 * sunkbd_disconnect() unregisters and closes behind us.
334 */
335
sunkbd_disconnect(struct serio * serio)336 static void sunkbd_disconnect(struct serio *serio)
337 {
338 struct sunkbd *sunkbd = serio_get_drvdata(serio);
339
340 sunkbd_enable(sunkbd, false);
341 input_unregister_device(sunkbd->dev);
342 serio_close(serio);
343 serio_set_drvdata(serio, NULL);
344 kfree(sunkbd);
345 }
346
347 static const struct serio_device_id sunkbd_serio_ids[] = {
348 {
349 .type = SERIO_RS232,
350 .proto = SERIO_SUNKBD,
351 .id = SERIO_ANY,
352 .extra = SERIO_ANY,
353 },
354 {
355 .type = SERIO_RS232,
356 .proto = SERIO_UNKNOWN, /* sunkbd does probe */
357 .id = SERIO_ANY,
358 .extra = SERIO_ANY,
359 },
360 { 0 }
361 };
362
363 MODULE_DEVICE_TABLE(serio, sunkbd_serio_ids);
364
365 static struct serio_driver sunkbd_drv = {
366 .driver = {
367 .name = "sunkbd",
368 },
369 .description = DRIVER_DESC,
370 .id_table = sunkbd_serio_ids,
371 .interrupt = sunkbd_interrupt,
372 .connect = sunkbd_connect,
373 .disconnect = sunkbd_disconnect,
374 };
375
376 module_serio_driver(sunkbd_drv);
377