2 * Generic linux-input device driver for keyboard devices
4 * Copyright (c) 2001 Brian S. Julin
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions, and the following disclaimer,
12 * without modification.
13 * 2. The name of the author may not be used to endorse or promote products
14 * derived from this software without specific prior written permission.
16 * Alternatively, this software may be distributed under the terms of the
17 * GNU General Public License ("GPL").
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
23 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * HP-HIL Technical Reference Manual. Hewlett Packard Product No. 45918A
34 #include <linux/hil.h>
35 #include <linux/input.h>
36 #include <linux/serio.h>
37 #include <linux/kernel.h>
38 #include <linux/module.h>
39 #include <linux/completion.h>
40 #include <linux/slab.h>
41 #include <linux/pci_ids.h>
43 #define PREFIX "HIL: "
45 MODULE_AUTHOR("Brian S. Julin <bri@calyx.com>");
46 MODULE_DESCRIPTION("HIL keyboard/mouse driver");
47 MODULE_LICENSE("Dual BSD/GPL");
48 MODULE_ALIAS("serio:ty03pr25id00ex*"); /* HIL keyboard */
49 MODULE_ALIAS("serio:ty03pr25id0Fex*"); /* HIL mouse */
51 #define HIL_PACKET_MAX_LENGTH 16
53 #define HIL_KBD_SET1_UPBIT 0x01
54 #define HIL_KBD_SET1_SHIFT 1
55 static unsigned int hil_kbd_set1
[HIL_KEYCODES_SET1_TBLSIZE
] __read_mostly
=
56 { HIL_KEYCODES_SET1
};
58 #define HIL_KBD_SET2_UPBIT 0x01
59 #define HIL_KBD_SET2_SHIFT 1
60 /* Set2 is user defined */
62 #define HIL_KBD_SET3_UPBIT 0x80
63 #define HIL_KBD_SET3_SHIFT 0
64 static unsigned int hil_kbd_set3
[HIL_KEYCODES_SET3_TBLSIZE
] __read_mostly
=
65 { HIL_KEYCODES_SET3
};
67 static const char hil_language
[][16] = { HIL_LOCALE_MAP
};
70 struct input_dev
*dev
;
73 /* Input buffer and index for packets from HIL bus. */
74 hil_packet data
[HIL_PACKET_MAX_LENGTH
];
75 int idx4
; /* four counts per packet */
77 /* Raw device info records from HIL bus, see hil.h for fields. */
78 char idd
[HIL_PACKET_MAX_LENGTH
]; /* DID byte and IDD record */
79 char rsc
[HIL_PACKET_MAX_LENGTH
]; /* RSC record */
80 char exd
[HIL_PACKET_MAX_LENGTH
]; /* EXD record */
81 char rnm
[HIL_PACKET_MAX_LENGTH
+ 1]; /* RNM record + NULL term. */
83 struct completion cmd_done
;
86 /* Extra device details needed for pointing devices. */
87 unsigned int nbtn
, naxes
;
88 unsigned int btnmap
[7];
91 static bool hil_dev_is_command_response(hil_packet p
)
93 if ((p
& ~HIL_CMDCT_POL
) == (HIL_ERR_INT
| HIL_PKT_CMD
| HIL_CMD_POL
))
96 if ((p
& ~HIL_CMDCT_RPL
) == (HIL_ERR_INT
| HIL_PKT_CMD
| HIL_CMD_RPL
))
102 static void hil_dev_handle_command_response(struct hil_dev
*dev
)
109 p
= dev
->data
[idx
- 1];
111 switch (p
& HIL_PKT_DATA_MASK
) {
125 dev
->rnm
[HIL_PACKET_MAX_LENGTH
] = 0;
130 /* These occur when device isn't present */
131 if (p
!= (HIL_ERR_INT
| HIL_PKT_CMD
)) {
132 /* Anything else we'd like to know about. */
133 printk(KERN_WARNING PREFIX
"Device sent unknown record %x\n", p
);
138 for (i
= 0; i
< idx
; i
++)
139 buf
[i
] = dev
->data
[i
] & HIL_PKT_DATA_MASK
;
140 for (; i
< HIL_PACKET_MAX_LENGTH
; i
++)
143 complete(&dev
->cmd_done
);
146 static void hil_dev_handle_kbd_events(struct hil_dev
*kbd
)
148 struct input_dev
*dev
= kbd
->dev
;
149 int idx
= kbd
->idx4
/ 4;
152 switch (kbd
->data
[0] & HIL_POL_CHARTYPE_MASK
) {
153 case HIL_POL_CHARTYPE_NONE
:
156 case HIL_POL_CHARTYPE_ASCII
:
157 for (i
= 1; i
< idx
- 1; i
++)
158 input_report_key(dev
, kbd
->data
[i
] & 0x7f, 1);
161 case HIL_POL_CHARTYPE_RSVD1
:
162 case HIL_POL_CHARTYPE_RSVD2
:
163 case HIL_POL_CHARTYPE_BINARY
:
164 for (i
= 1; i
< idx
- 1; i
++)
165 input_report_key(dev
, kbd
->data
[i
], 1);
168 case HIL_POL_CHARTYPE_SET1
:
169 for (i
= 1; i
< idx
- 1; i
++) {
170 unsigned int key
= kbd
->data
[i
];
171 int up
= key
& HIL_KBD_SET1_UPBIT
;
173 key
&= (~HIL_KBD_SET1_UPBIT
& 0xff);
174 key
= hil_kbd_set1
[key
>> HIL_KBD_SET1_SHIFT
];
175 input_report_key(dev
, key
, !up
);
179 case HIL_POL_CHARTYPE_SET2
:
180 for (i
= 1; i
< idx
- 1; i
++) {
181 unsigned int key
= kbd
->data
[i
];
182 int up
= key
& HIL_KBD_SET2_UPBIT
;
184 key
&= (~HIL_KBD_SET1_UPBIT
& 0xff);
185 key
= key
>> HIL_KBD_SET2_SHIFT
;
186 input_report_key(dev
, key
, !up
);
190 case HIL_POL_CHARTYPE_SET3
:
191 for (i
= 1; i
< idx
- 1; i
++) {
192 unsigned int key
= kbd
->data
[i
];
193 int up
= key
& HIL_KBD_SET3_UPBIT
;
195 key
&= (~HIL_KBD_SET1_UPBIT
& 0xff);
196 key
= hil_kbd_set3
[key
>> HIL_KBD_SET3_SHIFT
];
197 input_report_key(dev
, key
, !up
);
205 static void hil_dev_handle_ptr_events(struct hil_dev
*ptr
)
207 struct input_dev
*dev
= ptr
->dev
;
208 int idx
= ptr
->idx4
/ 4;
209 hil_packet p
= ptr
->data
[idx
- 1];
213 if ((p
& HIL_CMDCT_POL
) != idx
- 1) {
214 printk(KERN_WARNING PREFIX
215 "Malformed poll packet %x (idx = %i)\n", p
, idx
);
219 i
= (p
& HIL_POL_AXIS_ALT
) ? 3 : 0;
220 laxis
= (p
& HIL_POL_NUM_AXES_MASK
) + i
;
222 ax16
= ptr
->idd
[1] & HIL_IDD_HEADER_16BIT
; /* 8 or 16bit resolution */
223 absdev
= ptr
->idd
[1] & HIL_IDD_HEADER_ABS
;
225 for (cnt
= 1; i
< laxis
; i
++) {
226 unsigned int lo
, hi
, val
;
228 lo
= ptr
->data
[cnt
++] & HIL_PKT_DATA_MASK
;
229 hi
= ax16
? (ptr
->data
[cnt
++] & HIL_PKT_DATA_MASK
) : 0;
232 val
= lo
+ (hi
<< 8);
233 #ifdef TABLET_AUTOADJUST
234 if (val
< input_abs_get_min(dev
, ABS_X
+ i
))
235 input_abs_set_min(dev
, ABS_X
+ i
, val
);
236 if (val
> input_abs_get_max(dev
, ABS_X
+ i
))
237 input_abs_set_max(dev
, ABS_X
+ i
, val
);
240 val
= input_abs_get_max(dev
, ABS_X
+ i
) - val
;
241 input_report_abs(dev
, ABS_X
+ i
, val
);
243 val
= (int) (((int8_t) lo
) | ((int8_t) hi
<< 8));
246 input_report_rel(dev
, REL_X
+ i
, val
);
250 while (cnt
< idx
- 1) {
251 unsigned int btn
= ptr
->data
[cnt
++];
256 continue; /* TODO: proximity == touch? */
257 if (btn
> 0x8c || btn
< 0x80)
259 btn
= (btn
- 0x80) >> 1;
260 btn
= ptr
->btnmap
[btn
];
261 input_report_key(dev
, btn
, !up
);
267 static void hil_dev_process_err(struct hil_dev
*dev
)
269 printk(KERN_WARNING PREFIX
"errored HIL packet\n");
271 complete(&dev
->cmd_done
); /* just in case somebody is waiting */
274 static irqreturn_t
hil_dev_interrupt(struct serio
*serio
,
275 unsigned char data
, unsigned int flags
)
281 dev
= serio_get_drvdata(serio
);
284 if (dev
->idx4
>= HIL_PACKET_MAX_LENGTH
* sizeof(hil_packet
)) {
285 hil_dev_process_err(dev
);
290 if (!(dev
->idx4
% 4))
292 packet
= dev
->data
[idx
];
293 packet
|= ((hil_packet
)data
) << ((3 - (dev
->idx4
% 4)) * 8);
294 dev
->data
[idx
] = packet
;
296 /* Records of N 4-byte hil_packets must terminate with a command. */
297 if ((++dev
->idx4
% 4) == 0) {
298 if ((packet
& 0xffff0000) != HIL_ERR_INT
) {
299 hil_dev_process_err(dev
);
300 } else if (packet
& HIL_PKT_CMD
) {
301 if (hil_dev_is_command_response(packet
))
302 hil_dev_handle_command_response(dev
);
303 else if (dev
->is_pointer
)
304 hil_dev_handle_ptr_events(dev
);
306 hil_dev_handle_kbd_events(dev
);
314 static void hil_dev_disconnect(struct serio
*serio
)
316 struct hil_dev
*dev
= serio_get_drvdata(serio
);
321 input_unregister_device(dev
->dev
);
322 serio_set_drvdata(serio
, NULL
);
326 static void hil_dev_keyboard_setup(struct hil_dev
*kbd
)
328 struct input_dev
*input_dev
= kbd
->dev
;
329 uint8_t did
= kbd
->idd
[0];
332 input_dev
->evbit
[0] = BIT_MASK(EV_KEY
) | BIT_MASK(EV_REP
);
333 input_dev
->ledbit
[0] = BIT_MASK(LED_NUML
) | BIT_MASK(LED_CAPSL
) |
334 BIT_MASK(LED_SCROLLL
);
336 for (i
= 0; i
< 128; i
++) {
337 __set_bit(hil_kbd_set1
[i
], input_dev
->keybit
);
338 __set_bit(hil_kbd_set3
[i
], input_dev
->keybit
);
340 __clear_bit(KEY_RESERVED
, input_dev
->keybit
);
342 input_dev
->keycodemax
= HIL_KEYCODES_SET1_TBLSIZE
;
343 input_dev
->keycodesize
= sizeof(hil_kbd_set1
[0]);
344 input_dev
->keycode
= hil_kbd_set1
;
346 input_dev
->name
= strlen(kbd
->rnm
) ? kbd
->rnm
: "HIL keyboard";
347 input_dev
->phys
= "hpkbd/input0";
349 printk(KERN_INFO PREFIX
"HIL keyboard found (did = 0x%02x, lang = %s)\n",
350 did
, hil_language
[did
& HIL_IDD_DID_TYPE_KB_LANG_MASK
]);
353 static void hil_dev_pointer_setup(struct hil_dev
*ptr
)
355 struct input_dev
*input_dev
= ptr
->dev
;
356 uint8_t did
= ptr
->idd
[0];
357 uint8_t *idd
= ptr
->idd
+ 1;
358 unsigned int naxsets
= HIL_IDD_NUM_AXSETS(*idd
);
359 unsigned int i
, btntype
;
362 ptr
->naxes
= HIL_IDD_NUM_AXES_PER_SET(*idd
);
364 switch (did
& HIL_IDD_DID_TYPE_MASK
) {
365 case HIL_IDD_DID_TYPE_REL
:
366 input_dev
->evbit
[0] = BIT_MASK(EV_REL
);
368 for (i
= 0; i
< ptr
->naxes
; i
++)
369 __set_bit(REL_X
+ i
, input_dev
->relbit
);
371 for (i
= 3; naxsets
> 1 && i
< ptr
->naxes
+ 3; i
++)
372 __set_bit(REL_X
+ i
, input_dev
->relbit
);
377 case HIL_IDD_DID_TYPE_ABS
:
378 input_dev
->evbit
[0] = BIT_MASK(EV_ABS
);
380 for (i
= 0; i
< ptr
->naxes
; i
++)
381 input_set_abs_params(input_dev
, ABS_X
+ i
,
382 0, HIL_IDD_AXIS_MAX(idd
, i
), 0, 0);
384 for (i
= 3; naxsets
> 1 && i
< ptr
->naxes
+ 3; i
++)
385 input_set_abs_params(input_dev
, ABS_X
+ i
,
386 0, HIL_IDD_AXIS_MAX(idd
, i
- 3), 0, 0);
388 #ifdef TABLET_AUTOADJUST
389 for (i
= 0; i
< ABS_MAX
; i
++) {
390 int diff
= input_abs_get_max(input_dev
, ABS_X
+ i
) / 10;
391 input_abs_set_min(input_dev
, ABS_X
+ i
,
392 input_abs_get_min(input_dev
, ABS_X
+ i
) + diff
);
393 input_abs_set_max(input_dev
, ABS_X
+ i
,
394 input_abs_get_max(input_dev
, ABS_X
+ i
) - diff
);
405 ptr
->nbtn
= HIL_IDD_NUM_BUTTONS(idd
);
407 input_dev
->evbit
[0] |= BIT_MASK(EV_KEY
);
410 if ((did
& HIL_IDD_DID_ABS_TABLET_MASK
) == HIL_IDD_DID_ABS_TABLET
)
411 #ifdef TABLET_SIMULATES_MOUSE
416 if ((did
& HIL_IDD_DID_ABS_TSCREEN_MASK
) == HIL_IDD_DID_ABS_TSCREEN
)
419 if ((did
& HIL_IDD_DID_REL_MOUSE_MASK
) == HIL_IDD_DID_REL_MOUSE
)
422 for (i
= 0; i
< ptr
->nbtn
; i
++) {
423 __set_bit(btntype
| i
, input_dev
->keybit
);
424 ptr
->btnmap
[i
] = btntype
| i
;
427 if (btntype
== BTN_MOUSE
) {
428 /* Swap buttons 2 and 3 */
429 ptr
->btnmap
[1] = BTN_MIDDLE
;
430 ptr
->btnmap
[2] = BTN_RIGHT
;
433 input_dev
->name
= strlen(ptr
->rnm
) ? ptr
->rnm
: "HIL pointer device";
435 printk(KERN_INFO PREFIX
436 "HIL pointer device found (did: 0x%02x, axis: %s)\n",
438 printk(KERN_INFO PREFIX
439 "HIL pointer has %i buttons and %i sets of %i axes\n",
440 ptr
->nbtn
, naxsets
, ptr
->naxes
);
443 static int hil_dev_connect(struct serio
*serio
, struct serio_driver
*drv
)
446 struct input_dev
*input_dev
;
450 dev
= kzalloc(sizeof(*dev
), GFP_KERNEL
);
451 input_dev
= input_allocate_device();
452 if (!dev
|| !input_dev
) {
458 dev
->dev
= input_dev
;
460 error
= serio_open(serio
, drv
);
464 serio_set_drvdata(serio
, dev
);
466 /* Get device info. MLC driver supplies devid/status/etc. */
467 init_completion(&dev
->cmd_done
);
468 serio_write(serio
, 0);
469 serio_write(serio
, 0);
470 serio_write(serio
, HIL_PKT_CMD
>> 8);
471 serio_write(serio
, HIL_CMD_IDD
);
472 error
= wait_for_completion_killable(&dev
->cmd_done
);
476 reinit_completion(&dev
->cmd_done
);
477 serio_write(serio
, 0);
478 serio_write(serio
, 0);
479 serio_write(serio
, HIL_PKT_CMD
>> 8);
480 serio_write(serio
, HIL_CMD_RSC
);
481 error
= wait_for_completion_killable(&dev
->cmd_done
);
485 reinit_completion(&dev
->cmd_done
);
486 serio_write(serio
, 0);
487 serio_write(serio
, 0);
488 serio_write(serio
, HIL_PKT_CMD
>> 8);
489 serio_write(serio
, HIL_CMD_RNM
);
490 error
= wait_for_completion_killable(&dev
->cmd_done
);
494 reinit_completion(&dev
->cmd_done
);
495 serio_write(serio
, 0);
496 serio_write(serio
, 0);
497 serio_write(serio
, HIL_PKT_CMD
>> 8);
498 serio_write(serio
, HIL_CMD_EXD
);
499 error
= wait_for_completion_killable(&dev
->cmd_done
);
506 switch (did
& HIL_IDD_DID_TYPE_MASK
) {
507 case HIL_IDD_DID_TYPE_KB_INTEGRAL
:
508 case HIL_IDD_DID_TYPE_KB_ITF
:
509 case HIL_IDD_DID_TYPE_KB_RSVD
:
510 case HIL_IDD_DID_TYPE_CHAR
:
511 if (HIL_IDD_NUM_BUTTONS(idd
) ||
512 HIL_IDD_NUM_AXES_PER_SET(*idd
)) {
513 printk(KERN_INFO PREFIX
514 "combo devices are not supported.\n");
518 dev
->is_pointer
= false;
519 hil_dev_keyboard_setup(dev
);
522 case HIL_IDD_DID_TYPE_REL
:
523 case HIL_IDD_DID_TYPE_ABS
:
524 dev
->is_pointer
= true;
525 hil_dev_pointer_setup(dev
);
532 input_dev
->id
.bustype
= BUS_HIL
;
533 input_dev
->id
.vendor
= PCI_VENDOR_ID_HP
;
534 input_dev
->id
.product
= 0x0001; /* TODO: get from kbd->rsc */
535 input_dev
->id
.version
= 0x0100; /* TODO: get from kbd->rsc */
536 input_dev
->dev
.parent
= &serio
->dev
;
538 if (!dev
->is_pointer
) {
539 serio_write(serio
, 0);
540 serio_write(serio
, 0);
541 serio_write(serio
, HIL_PKT_CMD
>> 8);
542 /* Enable Keyswitch Autorepeat 1 */
543 serio_write(serio
, HIL_CMD_EK1
);
544 /* No need to wait for completion */
547 error
= input_register_device(input_dev
);
555 serio_set_drvdata(serio
, NULL
);
557 input_free_device(input_dev
);
562 static struct serio_device_id hil_dev_ids
[] = {
564 .type
= SERIO_HIL_MLC
,
572 MODULE_DEVICE_TABLE(serio
, hil_dev_ids
);
574 static struct serio_driver hil_serio_drv
= {
578 .description
= "HP HIL keyboard/mouse/tablet driver",
579 .id_table
= hil_dev_ids
,
580 .connect
= hil_dev_connect
,
581 .disconnect
= hil_dev_disconnect
,
582 .interrupt
= hil_dev_interrupt
585 module_serio_driver(hil_serio_drv
);