1
2
3
4
5
6
7
8
9
10
11
12
13
14
15#include <linux/errno.h>
16#include <linux/kernel.h>
17#include <linux/module.h>
18#include <linux/slab.h>
19#include <linux/input/mt.h>
20#include <linux/serio.h>
21#include <linux/init.h>
22#include <linux/ctype.h>
23#include <linux/delay.h>
24
25#define DRIVER_DESC "Wacom W8001 serial touchscreen driver"
26
27MODULE_AUTHOR("Jaya Kumar <jayakumar.lkml@gmail.com>");
28MODULE_DESCRIPTION(DRIVER_DESC);
29MODULE_LICENSE("GPL");
30
31#define W8001_MAX_LENGTH 11
32#define W8001_LEAD_MASK 0x80
33#define W8001_LEAD_BYTE 0x80
34#define W8001_TAB_MASK 0x40
35#define W8001_TAB_BYTE 0x40
36
37#define W8001_TOUCH_MASK (0x10 | W8001_LEAD_MASK)
38#define W8001_TOUCH_BYTE (0x10 | W8001_LEAD_BYTE)
39
40#define W8001_QUERY_PACKET 0x20
41
42#define W8001_CMD_STOP '0'
43#define W8001_CMD_START '1'
44#define W8001_CMD_QUERY '*'
45#define W8001_CMD_TOUCHQUERY '%'
46
47
48#define W8001_PKTLEN_TOUCH93 5
49#define W8001_PKTLEN_TOUCH9A 7
50#define W8001_PKTLEN_TPCPEN 9
51#define W8001_PKTLEN_TPCCTL 11
52#define W8001_PKTLEN_TOUCH2FG 13
53
54
55#define W8001_PEN_RESOLUTION 100
56#define W8001_TOUCH_RESOLUTION 10
57
58struct w8001_coord {
59 u8 rdy;
60 u8 tsw;
61 u8 f1;
62 u8 f2;
63 u16 x;
64 u16 y;
65 u16 pen_pressure;
66 u8 tilt_x;
67 u8 tilt_y;
68};
69
70
71struct w8001_touch_query {
72 u16 x;
73 u16 y;
74 u8 panel_res;
75 u8 capacity_res;
76 u8 sensor_id;
77};
78
79
80
81
82
83struct w8001 {
84 struct input_dev *dev;
85 struct serio *serio;
86 struct completion cmd_done;
87 int id;
88 int idx;
89 unsigned char response_type;
90 unsigned char response[W8001_MAX_LENGTH];
91 unsigned char data[W8001_MAX_LENGTH];
92 char phys[32];
93 int type;
94 unsigned int pktlen;
95 u16 max_touch_x;
96 u16 max_touch_y;
97 u16 max_pen_x;
98 u16 max_pen_y;
99 char name[64];
100};
101
102static void parse_pen_data(u8 *data, struct w8001_coord *coord)
103{
104 memset(coord, 0, sizeof(*coord));
105
106 coord->rdy = data[0] & 0x20;
107 coord->tsw = data[0] & 0x01;
108 coord->f1 = data[0] & 0x02;
109 coord->f2 = data[0] & 0x04;
110
111 coord->x = (data[1] & 0x7F) << 9;
112 coord->x |= (data[2] & 0x7F) << 2;
113 coord->x |= (data[6] & 0x60) >> 5;
114
115 coord->y = (data[3] & 0x7F) << 9;
116 coord->y |= (data[4] & 0x7F) << 2;
117 coord->y |= (data[6] & 0x18) >> 3;
118
119 coord->pen_pressure = data[5] & 0x7F;
120 coord->pen_pressure |= (data[6] & 0x07) << 7 ;
121
122 coord->tilt_x = data[7] & 0x7F;
123 coord->tilt_y = data[8] & 0x7F;
124}
125
126static void parse_single_touch(u8 *data, struct w8001_coord *coord)
127{
128 coord->x = (data[1] << 7) | data[2];
129 coord->y = (data[3] << 7) | data[4];
130 coord->tsw = data[0] & 0x01;
131}
132
133static void scale_touch_coordinates(struct w8001 *w8001,
134 unsigned int *x, unsigned int *y)
135{
136 if (w8001->max_pen_x && w8001->max_touch_x)
137 *x = *x * w8001->max_pen_x / w8001->max_touch_x;
138
139 if (w8001->max_pen_y && w8001->max_touch_y)
140 *y = *y * w8001->max_pen_y / w8001->max_touch_y;
141}
142
143static void parse_multi_touch(struct w8001 *w8001)
144{
145 struct input_dev *dev = w8001->dev;
146 unsigned char *data = w8001->data;
147 unsigned int x, y;
148 int i;
149 int count = 0;
150
151 for (i = 0; i < 2; i++) {
152 bool touch = data[0] & (1 << i);
153
154 input_mt_slot(dev, i);
155 input_mt_report_slot_state(dev, MT_TOOL_FINGER, touch);
156 if (touch) {
157 x = (data[6 * i + 1] << 7) | data[6 * i + 2];
158 y = (data[6 * i + 3] << 7) | data[6 * i + 4];
159
160
161
162 scale_touch_coordinates(w8001, &x, &y);
163
164 input_report_abs(dev, ABS_MT_POSITION_X, x);
165 input_report_abs(dev, ABS_MT_POSITION_Y, y);
166 count++;
167 }
168 }
169
170
171
172
173
174 if (w8001->type != BTN_TOOL_PEN &&
175 w8001->type != BTN_TOOL_RUBBER) {
176 w8001->type = count == 1 ? BTN_TOOL_FINGER : KEY_RESERVED;
177 input_mt_report_pointer_emulation(dev, true);
178 }
179
180 input_sync(dev);
181}
182
183static void parse_touchquery(u8 *data, struct w8001_touch_query *query)
184{
185 memset(query, 0, sizeof(*query));
186
187 query->panel_res = data[1];
188 query->sensor_id = data[2] & 0x7;
189 query->capacity_res = data[7];
190
191 query->x = data[3] << 9;
192 query->x |= data[4] << 2;
193 query->x |= (data[2] >> 5) & 0x3;
194
195 query->y = data[5] << 9;
196 query->y |= data[6] << 2;
197 query->y |= (data[2] >> 3) & 0x3;
198
199
200 if (!query->x && !query->y) {
201 query->x = 1024;
202 query->y = 1024;
203 if (query->panel_res)
204 query->x = query->y = (1 << query->panel_res);
205 query->panel_res = W8001_TOUCH_RESOLUTION;
206 }
207}
208
209static void report_pen_events(struct w8001 *w8001, struct w8001_coord *coord)
210{
211 struct input_dev *dev = w8001->dev;
212
213
214
215
216
217
218
219
220
221
222
223 switch (w8001->type) {
224 case BTN_TOOL_RUBBER:
225 if (!coord->f2) {
226 input_report_abs(dev, ABS_PRESSURE, 0);
227 input_report_key(dev, BTN_TOUCH, 0);
228 input_report_key(dev, BTN_STYLUS, 0);
229 input_report_key(dev, BTN_STYLUS2, 0);
230 input_report_key(dev, BTN_TOOL_RUBBER, 0);
231 input_sync(dev);
232 w8001->type = BTN_TOOL_PEN;
233 }
234 break;
235
236 case BTN_TOOL_FINGER:
237 input_report_key(dev, BTN_TOUCH, 0);
238 input_report_key(dev, BTN_TOOL_FINGER, 0);
239 input_sync(dev);
240
241
242 case KEY_RESERVED:
243 w8001->type = coord->f2 ? BTN_TOOL_RUBBER : BTN_TOOL_PEN;
244 break;
245
246 default:
247 input_report_key(dev, BTN_STYLUS2, coord->f2);
248 break;
249 }
250
251 input_report_abs(dev, ABS_X, coord->x);
252 input_report_abs(dev, ABS_Y, coord->y);
253 input_report_abs(dev, ABS_PRESSURE, coord->pen_pressure);
254 input_report_key(dev, BTN_TOUCH, coord->tsw);
255 input_report_key(dev, BTN_STYLUS, coord->f1);
256 input_report_key(dev, w8001->type, coord->rdy);
257 input_sync(dev);
258
259 if (!coord->rdy)
260 w8001->type = KEY_RESERVED;
261}
262
263static void report_single_touch(struct w8001 *w8001, struct w8001_coord *coord)
264{
265 struct input_dev *dev = w8001->dev;
266 unsigned int x = coord->x;
267 unsigned int y = coord->y;
268
269
270 scale_touch_coordinates(w8001, &x, &y);
271
272 input_report_abs(dev, ABS_X, x);
273 input_report_abs(dev, ABS_Y, y);
274 input_report_key(dev, BTN_TOUCH, coord->tsw);
275 input_report_key(dev, BTN_TOOL_FINGER, coord->tsw);
276
277 input_sync(dev);
278
279 w8001->type = coord->tsw ? BTN_TOOL_FINGER : KEY_RESERVED;
280}
281
282static irqreturn_t w8001_interrupt(struct serio *serio,
283 unsigned char data, unsigned int flags)
284{
285 struct w8001 *w8001 = serio_get_drvdata(serio);
286 struct w8001_coord coord;
287 unsigned char tmp;
288
289 w8001->data[w8001->idx] = data;
290 switch (w8001->idx++) {
291 case 0:
292 if ((data & W8001_LEAD_MASK) != W8001_LEAD_BYTE) {
293 pr_debug("w8001: unsynchronized data: 0x%02x\n", data);
294 w8001->idx = 0;
295 }
296 break;
297
298 case W8001_PKTLEN_TOUCH93 - 1:
299 case W8001_PKTLEN_TOUCH9A - 1:
300 tmp = w8001->data[0] & W8001_TOUCH_BYTE;
301 if (tmp != W8001_TOUCH_BYTE)
302 break;
303
304 if (w8001->pktlen == w8001->idx) {
305 w8001->idx = 0;
306 if (w8001->type != BTN_TOOL_PEN &&
307 w8001->type != BTN_TOOL_RUBBER) {
308 parse_single_touch(w8001->data, &coord);
309 report_single_touch(w8001, &coord);
310 }
311 }
312 break;
313
314
315 case W8001_PKTLEN_TPCPEN - 1:
316 tmp = w8001->data[0] & W8001_TAB_MASK;
317 if (unlikely(tmp == W8001_TAB_BYTE))
318 break;
319
320 tmp = w8001->data[0] & W8001_TOUCH_BYTE;
321 if (tmp == W8001_TOUCH_BYTE)
322 break;
323
324 w8001->idx = 0;
325 parse_pen_data(w8001->data, &coord);
326 report_pen_events(w8001, &coord);
327 break;
328
329
330 case W8001_PKTLEN_TPCCTL - 1:
331 tmp = w8001->data[0] & W8001_TOUCH_MASK;
332 if (tmp == W8001_TOUCH_BYTE)
333 break;
334
335 w8001->idx = 0;
336 memcpy(w8001->response, w8001->data, W8001_MAX_LENGTH);
337 w8001->response_type = W8001_QUERY_PACKET;
338 complete(&w8001->cmd_done);
339 break;
340
341
342 case W8001_PKTLEN_TOUCH2FG - 1:
343 w8001->idx = 0;
344 parse_multi_touch(w8001);
345 break;
346 }
347
348 return IRQ_HANDLED;
349}
350
351static int w8001_command(struct w8001 *w8001, unsigned char command,
352 bool wait_response)
353{
354 int rc;
355
356 w8001->response_type = 0;
357 init_completion(&w8001->cmd_done);
358
359 rc = serio_write(w8001->serio, command);
360 if (rc == 0 && wait_response) {
361
362 wait_for_completion_timeout(&w8001->cmd_done, HZ);
363 if (w8001->response_type != W8001_QUERY_PACKET)
364 rc = -EIO;
365 }
366
367 return rc;
368}
369
370static int w8001_setup(struct w8001 *w8001)
371{
372 struct input_dev *dev = w8001->dev;
373 struct w8001_coord coord;
374 struct w8001_touch_query touch;
375 int error;
376
377 error = w8001_command(w8001, W8001_CMD_STOP, false);
378 if (error)
379 return error;
380
381 msleep(250);
382
383 dev->evbit[0] = BIT_MASK(EV_KEY) | BIT_MASK(EV_ABS);
384 strlcat(w8001->name, "Wacom Serial", sizeof(w8001->name));
385
386
387 error = w8001_command(w8001, W8001_CMD_QUERY, true);
388 if (!error) {
389 __set_bit(BTN_TOUCH, dev->keybit);
390 __set_bit(BTN_TOOL_PEN, dev->keybit);
391 __set_bit(BTN_TOOL_RUBBER, dev->keybit);
392 __set_bit(BTN_STYLUS, dev->keybit);
393 __set_bit(BTN_STYLUS2, dev->keybit);
394
395 parse_pen_data(w8001->response, &coord);
396 w8001->max_pen_x = coord.x;
397 w8001->max_pen_y = coord.y;
398
399 input_set_abs_params(dev, ABS_X, 0, coord.x, 0, 0);
400 input_set_abs_params(dev, ABS_Y, 0, coord.y, 0, 0);
401 input_abs_set_res(dev, ABS_X, W8001_PEN_RESOLUTION);
402 input_abs_set_res(dev, ABS_Y, W8001_PEN_RESOLUTION);
403 input_set_abs_params(dev, ABS_PRESSURE, 0, coord.pen_pressure, 0, 0);
404 if (coord.tilt_x && coord.tilt_y) {
405 input_set_abs_params(dev, ABS_TILT_X, 0, coord.tilt_x, 0, 0);
406 input_set_abs_params(dev, ABS_TILT_Y, 0, coord.tilt_y, 0, 0);
407 }
408 w8001->id = 0x90;
409 strlcat(w8001->name, " Penabled", sizeof(w8001->name));
410 }
411
412
413 error = w8001_command(w8001, W8001_CMD_TOUCHQUERY, true);
414
415
416
417
418
419 if (!error && w8001->response[1]) {
420 __set_bit(BTN_TOUCH, dev->keybit);
421 __set_bit(BTN_TOOL_FINGER, dev->keybit);
422
423 parse_touchquery(w8001->response, &touch);
424 w8001->max_touch_x = touch.x;
425 w8001->max_touch_y = touch.y;
426
427 if (w8001->max_pen_x && w8001->max_pen_y) {
428
429 touch.x = w8001->max_pen_x;
430 touch.y = w8001->max_pen_y;
431 touch.panel_res = W8001_PEN_RESOLUTION;
432 }
433
434 input_set_abs_params(dev, ABS_X, 0, touch.x, 0, 0);
435 input_set_abs_params(dev, ABS_Y, 0, touch.y, 0, 0);
436 input_abs_set_res(dev, ABS_X, touch.panel_res);
437 input_abs_set_res(dev, ABS_Y, touch.panel_res);
438
439 switch (touch.sensor_id) {
440 case 0:
441 case 2:
442 w8001->pktlen = W8001_PKTLEN_TOUCH93;
443 w8001->id = 0x93;
444 strlcat(w8001->name, " 1FG", sizeof(w8001->name));
445 break;
446
447 case 1:
448 case 3:
449 case 4:
450 w8001->pktlen = W8001_PKTLEN_TOUCH9A;
451 strlcat(w8001->name, " 1FG", sizeof(w8001->name));
452 w8001->id = 0x9a;
453 break;
454
455 case 5:
456 w8001->pktlen = W8001_PKTLEN_TOUCH2FG;
457
458 input_mt_init_slots(dev, 2);
459 input_set_abs_params(dev, ABS_MT_POSITION_X,
460 0, touch.x, 0, 0);
461 input_set_abs_params(dev, ABS_MT_POSITION_Y,
462 0, touch.y, 0, 0);
463 input_set_abs_params(dev, ABS_MT_TOOL_TYPE,
464 0, MT_TOOL_MAX, 0, 0);
465
466 strlcat(w8001->name, " 2FG", sizeof(w8001->name));
467 if (w8001->max_pen_x && w8001->max_pen_y)
468 w8001->id = 0xE3;
469 else
470 w8001->id = 0xE2;
471 break;
472 }
473 }
474
475 strlcat(w8001->name, " Touchscreen", sizeof(w8001->name));
476
477 return w8001_command(w8001, W8001_CMD_START, false);
478}
479
480
481
482
483
484static void w8001_disconnect(struct serio *serio)
485{
486 struct w8001 *w8001 = serio_get_drvdata(serio);
487
488 input_get_device(w8001->dev);
489 input_unregister_device(w8001->dev);
490 serio_close(serio);
491 serio_set_drvdata(serio, NULL);
492 input_put_device(w8001->dev);
493 kfree(w8001);
494}
495
496
497
498
499
500
501
502static int w8001_connect(struct serio *serio, struct serio_driver *drv)
503{
504 struct w8001 *w8001;
505 struct input_dev *input_dev;
506 int err;
507
508 w8001 = kzalloc(sizeof(struct w8001), GFP_KERNEL);
509 input_dev = input_allocate_device();
510 if (!w8001 || !input_dev) {
511 err = -ENOMEM;
512 goto fail1;
513 }
514
515 w8001->serio = serio;
516 w8001->dev = input_dev;
517 init_completion(&w8001->cmd_done);
518 snprintf(w8001->phys, sizeof(w8001->phys), "%s/input0", serio->phys);
519
520 serio_set_drvdata(serio, w8001);
521 err = serio_open(serio, drv);
522 if (err)
523 goto fail2;
524
525 err = w8001_setup(w8001);
526 if (err)
527 goto fail3;
528
529 input_dev->name = w8001->name;
530 input_dev->phys = w8001->phys;
531 input_dev->id.product = w8001->id;
532 input_dev->id.bustype = BUS_RS232;
533 input_dev->id.vendor = 0x056a;
534 input_dev->id.version = 0x0100;
535 input_dev->dev.parent = &serio->dev;
536
537 err = input_register_device(w8001->dev);
538 if (err)
539 goto fail3;
540
541 return 0;
542
543fail3:
544 serio_close(serio);
545fail2:
546 serio_set_drvdata(serio, NULL);
547fail1:
548 input_free_device(input_dev);
549 kfree(w8001);
550 return err;
551}
552
553static struct serio_device_id w8001_serio_ids[] = {
554 {
555 .type = SERIO_RS232,
556 .proto = SERIO_W8001,
557 .id = SERIO_ANY,
558 .extra = SERIO_ANY,
559 },
560 { 0 }
561};
562
563MODULE_DEVICE_TABLE(serio, w8001_serio_ids);
564
565static struct serio_driver w8001_drv = {
566 .driver = {
567 .name = "w8001",
568 },
569 .description = DRIVER_DESC,
570 .id_table = w8001_serio_ids,
571 .interrupt = w8001_interrupt,
572 .connect = w8001_connect,
573 .disconnect = w8001_disconnect,
574};
575
576static int __init w8001_init(void)
577{
578 return serio_register_driver(&w8001_drv);
579}
580
581static void __exit w8001_exit(void)
582{
583 serio_unregister_driver(&w8001_drv);
584}
585
586module_init(w8001_init);
587module_exit(w8001_exit);
588
