2 * Copyright (C) 2004 by Jan-Benedict Glaw <jbglaw@lug-owl.de>
6 * LK keyboard driver for Linux, based on sunkbd.c (C) by Vojtech Pavlik
10 * DEC LK201 and LK401 keyboard driver for Linux (primary for DECstations
11 * and VAXstations, but can also be used on any standard RS232 with an
14 * DISCLAIMER: This works for _me_. If you break anything by using the
15 * information given below, I will _not_ be liable!
17 * RJ10 pinout: To DE9: Or DB25:
18 * 1 - RxD <----> Pin 3 (TxD) <-> Pin 2 (TxD)
19 * 2 - GND <----> Pin 5 (GND) <-> Pin 7 (GND)
20 * 4 - TxD <----> Pin 2 (RxD) <-> Pin 3 (RxD)
21 * 3 - +12V (from HDD drive connector), DON'T connect to DE9 or DB25!!!
23 * Pin numbers for DE9 and DB25 are noted on the plug (quite small:). For
24 * RJ10, it's like this:
26 * __=__ Hold the plug in front of you, cable downwards,
27 * /___/| nose is hidden behind the plug. Now, pin 1 is at
28 * |1234|| the left side, pin 4 at the right and 2 and 3 are
29 * |IIII|| in between, of course:)
32 * || So the adaptor consists of three connected cables
33 * || for data transmission (RxD and TxD) and signal ground.
34 * Additionally, you have to get +12V from somewhere.
35 * Most easily, you'll get that from a floppy or HDD power connector.
36 * It's the yellow cable there (black is ground and red is +5V).
38 * The keyboard and all the commands it understands are documented in
39 * "VCB02 Video Subsystem - Technical Manual", EK-104AA-TM-001. This
40 * document is LK201 specific, but LK401 is mostly compatible. It comes
41 * up in LK201 mode and doesn't report any of the additional keys it
42 * has. These need to be switched on with the LK_CMD_ENABLE_LK401
43 * command. You'll find this document (scanned .pdf file) on MANX,
44 * a search engine specific to DEC documentation. Try
45 * http://www.vt100.net/manx/details?pn=EK-104AA-TM-001;id=21;cp=1
49 * This program is free software; you can redistribute it and/or modify
50 * it under the terms of the GNU General Public License as published by
51 * the Free Software Foundation; either version 2 of the License, or
52 * (at your option) any later version.
54 * This program is distributed in the hope that it will be useful,
55 * but WITHOUT ANY WARRANTY; without even the implied warranty of
56 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
57 * GNU General Public License for more details.
59 * You should have received a copy of the GNU General Public License
60 * along with this program; if not, write to the Free Software
61 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
64 #include <linux/delay.h>
65 #include <linux/slab.h>
66 #include <linux/module.h>
67 #include <linux/moduleparam.h>
68 #include <linux/interrupt.h>
69 #include <linux/init.h>
70 #include <linux/input.h>
71 #include <linux/serio.h>
72 #include <linux/workqueue.h>
74 #define DRIVER_DESC "LK keyboard driver"
76 MODULE_AUTHOR ("Jan-Benedict Glaw <jbglaw@lug-owl.de>");
77 MODULE_DESCRIPTION (DRIVER_DESC);
78 MODULE_LICENSE ("GPL");
86 * Please notice that there's not yet an API to set these at runtime.
88 static int bell_volume = 100; /* % */
89 module_param (bell_volume, int, 0);
90 MODULE_PARM_DESC (bell_volume, "Bell volume (in %). default is 100%");
92 static int keyclick_volume = 100; /* % */
93 module_param (keyclick_volume, int, 0);
94 MODULE_PARM_DESC (keyclick_volume, "Keyclick volume (in %), default is 100%");
96 static int ctrlclick_volume = 100; /* % */
97 module_param (ctrlclick_volume, int, 0);
98 MODULE_PARM_DESC (ctrlclick_volume, "Ctrlclick volume (in %), default is 100%");
100 static int lk201_compose_is_alt;
101 module_param (lk201_compose_is_alt, int, 0);
102 MODULE_PARM_DESC (lk201_compose_is_alt, "If set non-zero, LK201' Compose key "
103 "will act as an Alt key");
109 #define DBG(x...) printk (x)
111 #define DBG(x...) do {} while (0)
115 #define LK_LED_WAIT 0x81
116 #define LK_LED_COMPOSE 0x82
117 #define LK_LED_SHIFTLOCK 0x84
118 #define LK_LED_SCROLLLOCK 0x88
119 #define LK_CMD_LED_ON 0x13
120 #define LK_CMD_LED_OFF 0x11
123 #define LK_MODE_DOWN 0x80
124 #define LK_MODE_AUTODOWN 0x82
125 #define LK_MODE_UPDOWN 0x86
126 #define LK_CMD_SET_MODE(mode,div) ((mode) | ((div) << 3))
129 #define LK_CMD_ENABLE_KEYCLICK 0x1b
130 #define LK_CMD_DISABLE_KEYCLICK 0x99
131 #define LK_CMD_DISABLE_BELL 0xa1
132 #define LK_CMD_SOUND_BELL 0xa7
133 #define LK_CMD_ENABLE_BELL 0x23
134 #define LK_CMD_DISABLE_CTRCLICK 0xb9
135 #define LK_CMD_ENABLE_CTRCLICK 0xbb
136 #define LK_CMD_SET_DEFAULTS 0xd3
137 #define LK_CMD_POWERCYCLE_RESET 0xfd
138 #define LK_CMD_ENABLE_LK401 0xe9
139 #define LK_CMD_REQUEST_ID 0xab
141 /* Misc responses from keyboard */
142 #define LK_STUCK_KEY 0x3d
143 #define LK_SELFTEST_FAILED 0x3e
144 #define LK_ALL_KEYS_UP 0xb3
145 #define LK_METRONOME 0xb4
146 #define LK_OUTPUT_ERROR 0xb5
147 #define LK_INPUT_ERROR 0xb6
148 #define LK_KBD_LOCKED 0xb7
149 #define LK_KBD_TEST_MODE_ACK 0xb8
150 #define LK_PREFIX_KEY_DOWN 0xb9
151 #define LK_MODE_CHANGE_ACK 0xba
152 #define LK_RESPONSE_RESERVED 0xbb
154 #define LK_NUM_KEYCODES 256
155 #define LK_NUM_IGNORE_BYTES 6
156 typedef u_int16_t lk_keycode_t;
160 static lk_keycode_t lkkbd_keycode[LK_NUM_KEYCODES] = {
186 [0x8f] = KEY_PAGEDOWN,
189 [0x95] = KEY_KPENTER,
196 [0x9c] = KEY_KPCOMMA,
200 [0xa0] = KEY_KPMINUS,
209 [0xab] = KEY_RIGHTSHIFT,
210 [0xac] = KEY_LEFTALT,
211 [0xad] = KEY_COMPOSE, /* Right Compose, that is. */
212 [0xae] = KEY_LEFTSHIFT, /* Same as KEY_RIGHTSHIFT on LK201 */
213 [0xaf] = KEY_LEFTCTRL,
214 [0xb0] = KEY_CAPSLOCK,
215 [0xb1] = KEY_COMPOSE, /* Left Compose, that is. */
216 [0xb2] = KEY_RIGHTALT,
217 [0xbc] = KEY_BACKSPACE,
261 [0xf2] = KEY_SEMICOLON,
264 [0xf6] = KEY_RIGHTBRACE,
265 [0xf7] = KEY_BACKSLASH,
267 [0xfa] = KEY_LEFTBRACE,
268 [0xfb] = KEY_APOSTROPHE,
271 #define CHECK_LED(LK, VAR_ON, VAR_OFF, LED, BITS) do { \
272 if (test_bit (LED, (LK)->dev->led)) \
282 lk_keycode_t keycode[LK_NUM_KEYCODES];
284 unsigned char id[LK_NUM_IGNORE_BYTES];
285 struct input_dev *dev;
287 struct work_struct tq;
293 int ctrlclick_volume;
298 * Responses from the keyboard and mapping back to their names.
304 #define RESPONSE(x) { .value = (x), .name = #x, }
305 RESPONSE (LK_STUCK_KEY),
306 RESPONSE (LK_SELFTEST_FAILED),
307 RESPONSE (LK_ALL_KEYS_UP),
308 RESPONSE (LK_METRONOME),
309 RESPONSE (LK_OUTPUT_ERROR),
310 RESPONSE (LK_INPUT_ERROR),
311 RESPONSE (LK_KBD_LOCKED),
312 RESPONSE (LK_KBD_TEST_MODE_ACK),
313 RESPONSE (LK_PREFIX_KEY_DOWN),
314 RESPONSE (LK_MODE_CHANGE_ACK),
315 RESPONSE (LK_RESPONSE_RESERVED),
319 static unsigned char *
320 response_name (unsigned char value)
324 for (i = 0; i < ARRAY_SIZE (lk_response); i++)
325 if (lk_response[i].value == value)
326 return lk_response[i].name;
330 #endif /* LKKBD_DEBUG */
333 * Calculate volume parameter byte for a given volume.
336 volume_to_hw (int volume_percent)
338 unsigned char ret = 0;
340 if (volume_percent < 0)
342 if (volume_percent > 100)
343 volume_percent = 100;
345 if (volume_percent >= 0)
347 if (volume_percent >= 13) /* 12.5 */
349 if (volume_percent >= 25)
351 if (volume_percent >= 38) /* 37.5 */
353 if (volume_percent >= 50)
355 if (volume_percent >= 63) /* 62.5 */
356 ret = 2; /* This is the default volume */
357 if (volume_percent >= 75)
359 if (volume_percent >= 88) /* 87.5 */
368 lkkbd_detection_done (struct lkkbd *lk)
373 * Reset setting for Compose key. Let Compose be KEY_COMPOSE.
375 lk->keycode[0xb1] = KEY_COMPOSE;
378 * Print keyboard name and modify Compose=Alt on user's request.
382 strlcpy (lk->name, "DEC LK201 keyboard",
385 if (lk201_compose_is_alt)
386 lk->keycode[0xb1] = KEY_LEFTALT;
390 strlcpy (lk->name, "DEC LK401 keyboard",
395 strlcpy (lk->name, "Unknown DEC keyboard",
397 printk (KERN_ERR "lkkbd: keyboard on %s is unknown, "
398 "please report to Jan-Benedict Glaw "
399 "<jbglaw@lug-owl.de>\n", lk->phys);
400 printk (KERN_ERR "lkkbd: keyboard ID'ed as:");
401 for (i = 0; i < LK_NUM_IGNORE_BYTES; i++)
402 printk (" 0x%02x", lk->id[i]);
406 printk (KERN_INFO "lkkbd: keyboard on %s identified as: %s\n",
410 * Report errors during keyboard boot-up.
418 printk (KERN_ERR "lkkbd: Stuck key on keyboard at "
422 case LK_SELFTEST_FAILED:
423 printk (KERN_ERR "lkkbd: Selftest failed on keyboard "
424 "at %s, keyboard may not work "
425 "properly\n", lk->phys);
429 printk (KERN_ERR "lkkbd: Unknown error %02x on "
430 "keyboard at %s\n", lk->id[2],
436 * Try to hint user if there's a stuck key.
438 if (lk->id[2] == LK_STUCK_KEY && lk->id[3] != 0)
439 printk (KERN_ERR "Scancode of stuck key is 0x%02x, keycode "
440 "is 0x%04x\n", lk->id[3],
441 lk->keycode[lk->id[3]]);
447 * lkkbd_interrupt() is called by the low level driver when a character
451 lkkbd_interrupt (struct serio *serio, unsigned char data, unsigned int flags)
453 struct lkkbd *lk = serio_get_drvdata (serio);
456 DBG (KERN_INFO "Got byte 0x%02x\n", data);
458 if (lk->ignore_bytes > 0) {
459 DBG (KERN_INFO "Ignoring a byte on %s\n", lk->name);
460 lk->id[LK_NUM_IGNORE_BYTES - lk->ignore_bytes--] = data;
462 if (lk->ignore_bytes == 0)
463 lkkbd_detection_done (lk);
470 for (i = 0; i < ARRAY_SIZE (lkkbd_keycode); i++)
471 if (lk->keycode[i] != KEY_RESERVED)
472 input_report_key (lk->dev, lk->keycode[i], 0);
473 input_sync (lk->dev);
477 DBG (KERN_INFO "Got 0x01, scheduling re-initialization\n");
478 lk->ignore_bytes = LK_NUM_IGNORE_BYTES;
479 lk->id[LK_NUM_IGNORE_BYTES - lk->ignore_bytes--] = data;
480 schedule_work (&lk->tq);
484 case LK_OUTPUT_ERROR:
487 case LK_KBD_TEST_MODE_ACK:
488 case LK_PREFIX_KEY_DOWN:
489 case LK_MODE_CHANGE_ACK:
490 case LK_RESPONSE_RESERVED:
491 DBG (KERN_INFO "Got %s and don't know how to handle...\n",
492 response_name (data));
496 if (lk->keycode[data] != KEY_RESERVED) {
497 if (!test_bit (lk->keycode[data], lk->dev->key))
498 input_report_key (lk->dev, lk->keycode[data], 1);
500 input_report_key (lk->dev, lk->keycode[data], 0);
501 input_sync (lk->dev);
503 printk (KERN_WARNING "%s: Unknown key with "
504 "scancode 0x%02x on %s.\n",
505 __FILE__, data, lk->name);
512 * lkkbd_event() handles events from the input module.
515 lkkbd_event (struct input_dev *dev, unsigned int type, unsigned int code,
518 struct lkkbd *lk = dev->private;
519 unsigned char leds_on = 0;
520 unsigned char leds_off = 0;
524 CHECK_LED (lk, leds_on, leds_off, LED_CAPSL, LK_LED_SHIFTLOCK);
525 CHECK_LED (lk, leds_on, leds_off, LED_COMPOSE, LK_LED_COMPOSE);
526 CHECK_LED (lk, leds_on, leds_off, LED_SCROLLL, LK_LED_SCROLLLOCK);
527 CHECK_LED (lk, leds_on, leds_off, LED_SLEEP, LK_LED_WAIT);
529 lk->serio->write (lk->serio, LK_CMD_LED_ON);
530 lk->serio->write (lk->serio, leds_on);
533 lk->serio->write (lk->serio, LK_CMD_LED_OFF);
534 lk->serio->write (lk->serio, leds_off);
542 DBG ("%s: Deactivating key clicks\n", __FUNCTION__);
543 lk->serio->write (lk->serio, LK_CMD_DISABLE_KEYCLICK);
544 lk->serio->write (lk->serio, LK_CMD_DISABLE_CTRCLICK);
546 DBG ("%s: Activating key clicks\n", __FUNCTION__);
547 lk->serio->write (lk->serio, LK_CMD_ENABLE_KEYCLICK);
548 lk->serio->write (lk->serio, volume_to_hw (lk->keyclick_volume));
549 lk->serio->write (lk->serio, LK_CMD_ENABLE_CTRCLICK);
550 lk->serio->write (lk->serio, volume_to_hw (lk->ctrlclick_volume));
556 lk->serio->write (lk->serio, LK_CMD_SOUND_BELL);
563 printk (KERN_ERR "%s (): Got unknown type %d, code %d, value %d\n",
564 __FUNCTION__, type, code, value);
571 * lkkbd_reinit() sets leds and beeps to a state the computer remembers they
575 lkkbd_reinit (struct work_struct *work)
577 struct lkkbd *lk = container_of(work, struct lkkbd, tq);
579 unsigned char leds_on = 0;
580 unsigned char leds_off = 0;
583 lk->serio->write (lk->serio, LK_CMD_REQUEST_ID);
585 /* Reset parameters */
586 lk->serio->write (lk->serio, LK_CMD_SET_DEFAULTS);
589 CHECK_LED (lk, leds_on, leds_off, LED_CAPSL, LK_LED_SHIFTLOCK);
590 CHECK_LED (lk, leds_on, leds_off, LED_COMPOSE, LK_LED_COMPOSE);
591 CHECK_LED (lk, leds_on, leds_off, LED_SCROLLL, LK_LED_SCROLLLOCK);
592 CHECK_LED (lk, leds_on, leds_off, LED_SLEEP, LK_LED_WAIT);
594 lk->serio->write (lk->serio, LK_CMD_LED_ON);
595 lk->serio->write (lk->serio, leds_on);
598 lk->serio->write (lk->serio, LK_CMD_LED_OFF);
599 lk->serio->write (lk->serio, leds_off);
603 * Try to activate extended LK401 mode. This command will
604 * only work with a LK401 keyboard and grants access to
605 * LAlt, RAlt, RCompose and RShift.
607 lk->serio->write (lk->serio, LK_CMD_ENABLE_LK401);
609 /* Set all keys to UPDOWN mode */
610 for (division = 1; division <= 14; division++)
611 lk->serio->write (lk->serio, LK_CMD_SET_MODE (LK_MODE_UPDOWN,
614 /* Enable bell and set volume */
615 lk->serio->write (lk->serio, LK_CMD_ENABLE_BELL);
616 lk->serio->write (lk->serio, volume_to_hw (lk->bell_volume));
618 /* Enable/disable keyclick (and possibly set volume) */
619 if (test_bit (SND_CLICK, lk->dev->snd)) {
620 lk->serio->write (lk->serio, LK_CMD_ENABLE_KEYCLICK);
621 lk->serio->write (lk->serio, volume_to_hw (lk->keyclick_volume));
622 lk->serio->write (lk->serio, LK_CMD_ENABLE_CTRCLICK);
623 lk->serio->write (lk->serio, volume_to_hw (lk->ctrlclick_volume));
625 lk->serio->write (lk->serio, LK_CMD_DISABLE_KEYCLICK);
626 lk->serio->write (lk->serio, LK_CMD_DISABLE_CTRCLICK);
629 /* Sound the bell if needed */
630 if (test_bit (SND_BELL, lk->dev->snd))
631 lk->serio->write (lk->serio, LK_CMD_SOUND_BELL);
635 * lkkbd_connect() probes for a LK keyboard and fills the necessary structures.
638 lkkbd_connect (struct serio *serio, struct serio_driver *drv)
641 struct input_dev *input_dev;
645 lk = kzalloc (sizeof (struct lkkbd), GFP_KERNEL);
646 input_dev = input_allocate_device ();
647 if (!lk || !input_dev) {
654 INIT_WORK (&lk->tq, lkkbd_reinit);
655 lk->bell_volume = bell_volume;
656 lk->keyclick_volume = keyclick_volume;
657 lk->ctrlclick_volume = ctrlclick_volume;
658 memcpy (lk->keycode, lkkbd_keycode, sizeof (lk_keycode_t) * LK_NUM_KEYCODES);
660 strlcpy (lk->name, "DEC LK keyboard", sizeof(lk->name));
661 snprintf (lk->phys, sizeof(lk->phys), "%s/input0", serio->phys);
663 input_dev->name = lk->name;
664 input_dev->phys = lk->phys;
665 input_dev->id.bustype = BUS_RS232;
666 input_dev->id.vendor = SERIO_LKKBD;
667 input_dev->id.product = 0;
668 input_dev->id.version = 0x0100;
669 input_dev->cdev.dev = &serio->dev;
670 input_dev->event = lkkbd_event;
671 input_dev->private = lk;
673 set_bit (EV_KEY, input_dev->evbit);
674 set_bit (EV_LED, input_dev->evbit);
675 set_bit (EV_SND, input_dev->evbit);
676 set_bit (EV_REP, input_dev->evbit);
677 set_bit (LED_CAPSL, input_dev->ledbit);
678 set_bit (LED_SLEEP, input_dev->ledbit);
679 set_bit (LED_COMPOSE, input_dev->ledbit);
680 set_bit (LED_SCROLLL, input_dev->ledbit);
681 set_bit (SND_BELL, input_dev->sndbit);
682 set_bit (SND_CLICK, input_dev->sndbit);
684 input_dev->keycode = lk->keycode;
685 input_dev->keycodesize = sizeof (lk_keycode_t);
686 input_dev->keycodemax = LK_NUM_KEYCODES;
687 for (i = 0; i < LK_NUM_KEYCODES; i++)
688 set_bit (lk->keycode[i], input_dev->keybit);
690 serio_set_drvdata (serio, lk);
692 err = serio_open (serio, drv);
696 input_register_device (lk->dev);
697 lk->serio->write (lk->serio, LK_CMD_POWERCYCLE_RESET);
701 fail: serio_set_drvdata (serio, NULL);
702 input_free_device (input_dev);
708 * lkkbd_disconnect() unregisters and closes behind us.
711 lkkbd_disconnect (struct serio *serio)
713 struct lkkbd *lk = serio_get_drvdata (serio);
715 input_get_device (lk->dev);
716 input_unregister_device (lk->dev);
718 serio_set_drvdata (serio, NULL);
719 input_put_device (lk->dev);
723 static struct serio_device_id lkkbd_serio_ids[] = {
726 .proto = SERIO_LKKBD,
733 MODULE_DEVICE_TABLE(serio, lkkbd_serio_ids);
735 static struct serio_driver lkkbd_drv = {
739 .description = DRIVER_DESC,
740 .id_table = lkkbd_serio_ids,
741 .connect = lkkbd_connect,
742 .disconnect = lkkbd_disconnect,
743 .interrupt = lkkbd_interrupt,
747 * The functions for insering/removing us as a module.
752 serio_register_driver(&lkkbd_drv);
759 serio_unregister_driver(&lkkbd_drv);
762 module_init (lkkbd_init);
763 module_exit (lkkbd_exit);