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