xref: /openbmc/linux/drivers/input/keyboard/sunkbd.c (revision 87c2ce3b)
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, struct pt_regs *regs)
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_regs(sunkbd->dev, regs);
133                                 input_report_key(sunkbd->dev, sunkbd->keycode[data & SUNKBD_KEY], !(data & SUNKBD_RELEASE));
134 				input_sync(sunkbd->dev);
135                         } else {
136                                 printk(KERN_WARNING "sunkbd.c: Unknown key (scancode %#x) %s.\n",
137                                         data & SUNKBD_KEY, data & SUNKBD_RELEASE ? "released" : "pressed");
138                         }
139 	}
140 out:
141 	return IRQ_HANDLED;
142 }
143 
144 /*
145  * sunkbd_event() handles events from the input module.
146  */
147 
148 static int sunkbd_event(struct input_dev *dev, unsigned int type, unsigned int code, int value)
149 {
150 	struct sunkbd *sunkbd = dev->private;
151 
152 	switch (type) {
153 
154 		case EV_LED:
155 
156 			sunkbd->serio->write(sunkbd->serio, SUNKBD_CMD_SETLED);
157 			sunkbd->serio->write(sunkbd->serio,
158 				(!!test_bit(LED_CAPSL, dev->led) << 3) | (!!test_bit(LED_SCROLLL, dev->led) << 2) |
159 				(!!test_bit(LED_COMPOSE, dev->led) << 1) | !!test_bit(LED_NUML, dev->led));
160 			return 0;
161 
162 		case EV_SND:
163 
164 			switch (code) {
165 
166 				case SND_CLICK:
167 					sunkbd->serio->write(sunkbd->serio, SUNKBD_CMD_NOCLICK - value);
168 					return 0;
169 
170 				case SND_BELL:
171 					sunkbd->serio->write(sunkbd->serio, SUNKBD_CMD_BELLOFF - value);
172 					return 0;
173 			}
174 
175 			break;
176 	}
177 
178 	return -1;
179 }
180 
181 /*
182  * sunkbd_initialize() checks for a Sun keyboard attached, and determines
183  * its type.
184  */
185 
186 static int sunkbd_initialize(struct sunkbd *sunkbd)
187 {
188 	sunkbd->reset = -2;
189 	sunkbd->serio->write(sunkbd->serio, SUNKBD_CMD_RESET);
190 	wait_event_interruptible_timeout(sunkbd->wait, sunkbd->reset >= 0, HZ);
191 	if (sunkbd->reset < 0)
192 		return -1;
193 
194 	sunkbd->type = sunkbd->reset;
195 
196 	if (sunkbd->type == 4) {	/* Type 4 keyboard */
197 		sunkbd->layout = -2;
198 		sunkbd->serio->write(sunkbd->serio, SUNKBD_CMD_LAYOUT);
199 		wait_event_interruptible_timeout(sunkbd->wait, sunkbd->layout >= 0, HZ/4);
200 		if (sunkbd->layout < 0) return -1;
201 		if (sunkbd->layout & SUNKBD_LAYOUT_5_MASK) sunkbd->type = 5;
202 	}
203 
204 	return 0;
205 }
206 
207 /*
208  * sunkbd_reinit() sets leds and beeps to a state the computer remembers they
209  * were in.
210  */
211 
212 static void sunkbd_reinit(void *data)
213 {
214 	struct sunkbd *sunkbd = data;
215 
216 	wait_event_interruptible_timeout(sunkbd->wait, sunkbd->reset >= 0, HZ);
217 
218 	sunkbd->serio->write(sunkbd->serio, SUNKBD_CMD_SETLED);
219 	sunkbd->serio->write(sunkbd->serio,
220 		(!!test_bit(LED_CAPSL, sunkbd->dev->led) << 3) | (!!test_bit(LED_SCROLLL, sunkbd->dev->led) << 2) |
221 		(!!test_bit(LED_COMPOSE, sunkbd->dev->led) << 1) | !!test_bit(LED_NUML, sunkbd->dev->led));
222 	sunkbd->serio->write(sunkbd->serio, SUNKBD_CMD_NOCLICK - !!test_bit(SND_CLICK, sunkbd->dev->snd));
223 	sunkbd->serio->write(sunkbd->serio, SUNKBD_CMD_BELLOFF - !!test_bit(SND_BELL, sunkbd->dev->snd));
224 }
225 
226 static void sunkbd_enable(struct sunkbd *sunkbd, int enable)
227 {
228 	serio_pause_rx(sunkbd->serio);
229 	sunkbd->enabled = 1;
230 	serio_continue_rx(sunkbd->serio);
231 }
232 
233 /*
234  * sunkbd_connect() probes for a Sun keyboard and fills the necessary structures.
235  */
236 
237 static int sunkbd_connect(struct serio *serio, struct serio_driver *drv)
238 {
239 	struct sunkbd *sunkbd;
240 	struct input_dev *input_dev;
241 	int err = -ENOMEM;
242 	int i;
243 
244 	sunkbd = kzalloc(sizeof(struct sunkbd), GFP_KERNEL);
245 	input_dev = input_allocate_device();
246 	if (!sunkbd || !input_dev)
247 		goto fail;
248 
249 	sunkbd->serio = serio;
250 	sunkbd->dev = input_dev;
251 	init_waitqueue_head(&sunkbd->wait);
252 	INIT_WORK(&sunkbd->tq, sunkbd_reinit, sunkbd);
253 	snprintf(sunkbd->phys, sizeof(sunkbd->phys), "%s/input0", serio->phys);
254 
255 	serio_set_drvdata(serio, sunkbd);
256 
257 	err = serio_open(serio, drv);
258 	if (err)
259 		goto fail;
260 
261 	if (sunkbd_initialize(sunkbd) < 0) {
262 		serio_close(serio);
263 		goto fail;
264 	}
265 
266 	sprintf(sunkbd->name, "Sun Type %d keyboard", sunkbd->type);
267 	memcpy(sunkbd->keycode, sunkbd_keycode, sizeof(sunkbd->keycode));
268 
269 	input_dev->name = sunkbd->name;
270 	input_dev->phys = sunkbd->phys;
271 	input_dev->id.bustype = BUS_RS232;
272 	input_dev->id.vendor  = SERIO_SUNKBD;
273 	input_dev->id.product = sunkbd->type;
274 	input_dev->id.version = 0x0100;
275 	input_dev->cdev.dev = &serio->dev;
276 	input_dev->private = sunkbd;
277 	input_dev->event = sunkbd_event;
278 
279 	input_dev->evbit[0] = BIT(EV_KEY) | BIT(EV_LED) | BIT(EV_SND) | BIT(EV_REP);
280 	input_dev->ledbit[0] = BIT(LED_CAPSL) | BIT(LED_COMPOSE) | BIT(LED_SCROLLL) | BIT(LED_NUML);
281 	input_dev->sndbit[0] = BIT(SND_CLICK) | BIT(SND_BELL);
282 
283 	input_dev->keycode = sunkbd->keycode;
284 	input_dev->keycodesize = sizeof(unsigned char);
285 	input_dev->keycodemax = ARRAY_SIZE(sunkbd_keycode);
286 	for (i = 0; i < 128; i++)
287 		set_bit(sunkbd->keycode[i], input_dev->keybit);
288 	clear_bit(0, input_dev->keybit);
289 
290 	sunkbd_enable(sunkbd, 1);
291 	input_register_device(sunkbd->dev);
292 	return 0;
293 
294  fail:	serio_set_drvdata(serio, NULL);
295 	input_free_device(input_dev);
296 	kfree(sunkbd);
297 	return err;
298 }
299 
300 /*
301  * sunkbd_disconnect() unregisters and closes behind us.
302  */
303 
304 static void sunkbd_disconnect(struct serio *serio)
305 {
306 	struct sunkbd *sunkbd = serio_get_drvdata(serio);
307 
308 	sunkbd_enable(sunkbd, 0);
309 	input_unregister_device(sunkbd->dev);
310 	serio_close(serio);
311 	serio_set_drvdata(serio, NULL);
312 	kfree(sunkbd);
313 }
314 
315 static struct serio_device_id sunkbd_serio_ids[] = {
316 	{
317 		.type	= SERIO_RS232,
318 		.proto	= SERIO_SUNKBD,
319 		.id	= SERIO_ANY,
320 		.extra	= SERIO_ANY,
321 	},
322 	{
323 		.type	= SERIO_RS232,
324 		.proto	= SERIO_UNKNOWN, /* sunkbd does probe */
325 		.id	= SERIO_ANY,
326 		.extra	= SERIO_ANY,
327 	},
328 	{ 0 }
329 };
330 
331 MODULE_DEVICE_TABLE(serio, sunkbd_serio_ids);
332 
333 static struct serio_driver sunkbd_drv = {
334 	.driver		= {
335 		.name	= "sunkbd",
336 	},
337 	.description	= DRIVER_DESC,
338 	.id_table	= sunkbd_serio_ids,
339 	.interrupt	= sunkbd_interrupt,
340 	.connect	= sunkbd_connect,
341 	.disconnect	= sunkbd_disconnect,
342 };
343 
344 /*
345  * The functions for insering/removing us as a module.
346  */
347 
348 static int __init sunkbd_init(void)
349 {
350 	serio_register_driver(&sunkbd_drv);
351 	return 0;
352 }
353 
354 static void __exit sunkbd_exit(void)
355 {
356 	serio_unregister_driver(&sunkbd_drv);
357 }
358 
359 module_init(sunkbd_init);
360 module_exit(sunkbd_exit);
361