Linux Audio

Check our new training course

Embedded Linux training

Mar 10-20, 2025, special US time zones
Register
Loading...
v3.1
 
  1/*
  2 * Driver for	DEC VSXXX-AA mouse (hockey-puck mouse, ball or two rollers)
  3 *		DEC VSXXX-GA mouse (rectangular mouse, with ball)
  4 *		DEC VSXXX-AB tablet (digitizer with hair cross or stylus)
  5 *
  6 * Copyright (C) 2003-2004 by Jan-Benedict Glaw <jbglaw@lug-owl.de>
  7 *
  8 * The packet format was initially taken from a patch to GPM which is (C) 2001
  9 * by	Karsten Merker <merker@linuxtag.org>
 10 * and	Maciej W. Rozycki <macro@ds2.pg.gda.pl>
 11 * Later on, I had access to the device's documentation (referenced below).
 12 */
 13
 14/*
 15 * This program is free software; you can redistribute it and/or modify
 16 * it under the terms of the GNU General Public License as published by
 17 * the Free Software Foundation; either version 2 of the License, or
 18 * (at your option) any later version.
 19 *
 20 * This program is distributed in the hope that it will be useful,
 21 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 23 * GNU General Public License for more details.
 24 *
 25 * You should have received a copy of the GNU General Public License
 26 * along with this program; if not, write to the Free Software
 27 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
 28 */
 29
 30/*
 31 * Building an adaptor to DE9 / DB25 RS232
 32 * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 33 *
 34 * DISCLAIMER: Use this description AT YOUR OWN RISK! I'll not pay for
 35 * anything if you break your mouse, your computer or whatever!
 36 *
 37 * In theory, this mouse is a simple RS232 device. In practice, it has got
 38 * a quite uncommon plug and the requirement to additionally get a power
 39 * supply at +5V and -12V.
 40 *
 41 * If you look at the socket/jack (_not_ at the plug), we use this pin
 42 * numbering:
 43 *    _______
 44 *   / 7 6 5 \
 45 *  | 4 --- 3 |
 46 *   \  2 1  /
 47 *    -------
 48 *
 49 *	DEC socket	DE9	DB25	Note
 50 *	1 (GND)		5	7	-
 51 *	2 (RxD)		2	3	-
 52 *	3 (TxD)		3	2	-
 53 *	4 (-12V)	-	-	Somewhere from the PSU. At ATX, it's
 54 *					the thin blue wire at pin 12 of the
 55 *					ATX power connector. Only required for
 56 *					VSXXX-AA/-GA mice.
 57 *	5 (+5V)		-	-	PSU (red wires of ATX power connector
 58 *					on pin 4, 6, 19 or 20) or HDD power
 59 *					connector (also red wire).
 60 *	6 (+12V)	-	-	HDD power connector, yellow wire. Only
 61 *					required for VSXXX-AB digitizer.
 62 *	7 (dev. avail.)	-	-	The mouse shorts this one to pin 1.
 63 *					This way, the host computer can detect
 64 *					the mouse. To use it with the adaptor,
 65 *					simply don't connect this pin.
 66 *
 67 * So to get a working adaptor, you need to connect the mouse with three
 68 * wires to a RS232 port and two or three additional wires for +5V, +12V and
 69 * -12V to the PSU.
 70 *
 71 * Flow specification for the link is 4800, 8o1.
 72 *
 73 * The mice and tablet are described in "VCB02 Video Subsystem - Technical
 74 * Manual", DEC EK-104AA-TM-001. You'll find it at MANX, a search engine
 75 * specific for DEC documentation. Try
 76 * http://www.vt100.net/manx/details?pn=EK-104AA-TM-001;id=21;cp=1
 77 */
 78
 79#include <linux/delay.h>
 80#include <linux/module.h>
 81#include <linux/slab.h>
 82#include <linux/interrupt.h>
 83#include <linux/input.h>
 84#include <linux/serio.h>
 85#include <linux/init.h>
 86
 87#define DRIVER_DESC "Driver for DEC VSXXX-AA and -GA mice and VSXXX-AB tablet"
 88
 89MODULE_AUTHOR("Jan-Benedict Glaw <jbglaw@lug-owl.de>");
 90MODULE_DESCRIPTION(DRIVER_DESC);
 91MODULE_LICENSE("GPL");
 92
 93#undef VSXXXAA_DEBUG
 94#ifdef VSXXXAA_DEBUG
 95#define DBG(x...) printk(x)
 96#else
 97#define DBG(x...) do {} while (0)
 98#endif
 99
100#define VSXXXAA_INTRO_MASK	0x80
101#define VSXXXAA_INTRO_HEAD	0x80
102#define IS_HDR_BYTE(x)			\
103	(((x) & VSXXXAA_INTRO_MASK) == VSXXXAA_INTRO_HEAD)
104
105#define VSXXXAA_PACKET_MASK	0xe0
106#define VSXXXAA_PACKET_REL	0x80
107#define VSXXXAA_PACKET_ABS	0xc0
108#define VSXXXAA_PACKET_POR	0xa0
109#define MATCH_PACKET_TYPE(data, type)	\
110	(((data) & VSXXXAA_PACKET_MASK) == (type))
111
112
113
114struct vsxxxaa {
115	struct input_dev *dev;
116	struct serio *serio;
117#define BUFLEN 15 /* At least 5 is needed for a full tablet packet */
118	unsigned char buf[BUFLEN];
119	unsigned char count;
120	unsigned char version;
121	unsigned char country;
122	unsigned char type;
123	char name[64];
124	char phys[32];
125};
126
127static void vsxxxaa_drop_bytes(struct vsxxxaa *mouse, int num)
128{
129	if (num >= mouse->count) {
130		mouse->count = 0;
131	} else {
132		memmove(mouse->buf, mouse->buf + num - 1, BUFLEN - num);
133		mouse->count -= num;
134	}
135}
136
137static void vsxxxaa_queue_byte(struct vsxxxaa *mouse, unsigned char byte)
138{
139	if (mouse->count == BUFLEN) {
140		printk(KERN_ERR "%s on %s: Dropping a byte of full buffer.\n",
141			mouse->name, mouse->phys);
142		vsxxxaa_drop_bytes(mouse, 1);
143	}
144
145	DBG(KERN_INFO "Queueing byte 0x%02x\n", byte);
146
147	mouse->buf[mouse->count++] = byte;
148}
149
150static void vsxxxaa_detection_done(struct vsxxxaa *mouse)
151{
152	switch (mouse->type) {
153	case 0x02:
154		strlcpy(mouse->name, "DEC VSXXX-AA/-GA mouse",
155			sizeof(mouse->name));
156		break;
157
158	case 0x04:
159		strlcpy(mouse->name, "DEC VSXXX-AB digitizer",
160			sizeof(mouse->name));
161		break;
162
163	default:
164		snprintf(mouse->name, sizeof(mouse->name),
165			 "unknown DEC pointer device (type = 0x%02x)",
166			 mouse->type);
167		break;
168	}
169
170	printk(KERN_INFO
171		"Found %s version 0x%02x from country 0x%02x on port %s\n",
172		mouse->name, mouse->version, mouse->country, mouse->phys);
173}
174
175/*
176 * Returns number of bytes to be dropped, 0 if packet is okay.
177 */
178static int vsxxxaa_check_packet(struct vsxxxaa *mouse, int packet_len)
179{
180	int i;
181
182	/* First byte must be a header byte */
183	if (!IS_HDR_BYTE(mouse->buf[0])) {
184		DBG("vsck: len=%d, 1st=0x%02x\n", packet_len, mouse->buf[0]);
185		return 1;
186	}
187
188	/* Check all following bytes */
189	for (i = 1; i < packet_len; i++) {
190		if (IS_HDR_BYTE(mouse->buf[i])) {
191			printk(KERN_ERR
192				"Need to drop %d bytes of a broken packet.\n",
193				i - 1);
194			DBG(KERN_INFO "check: len=%d, b[%d]=0x%02x\n",
195			    packet_len, i, mouse->buf[i]);
196			return i - 1;
197		}
198	}
199
200	return 0;
201}
202
203static inline int vsxxxaa_smells_like_packet(struct vsxxxaa *mouse,
204					     unsigned char type, size_t len)
205{
206	return mouse->count >= len && MATCH_PACKET_TYPE(mouse->buf[0], type);
207}
208
209static void vsxxxaa_handle_REL_packet(struct vsxxxaa *mouse)
210{
211	struct input_dev *dev = mouse->dev;
212	unsigned char *buf = mouse->buf;
213	int left, middle, right;
214	int dx, dy;
215
216	/*
217	 * Check for normal stream packets. This is three bytes,
218	 * with the first byte's 3 MSB set to 100.
219	 *
220	 * [0]:	1	0	0	SignX	SignY	Left	Middle	Right
221	 * [1]: 0	dx	dx	dx	dx	dx	dx	dx
222	 * [2]:	0	dy	dy	dy	dy	dy	dy	dy
223	 */
224
225	/*
226	 * Low 7 bit of byte 1 are abs(dx), bit 7 is
227	 * 0, bit 4 of byte 0 is direction.
228	 */
229	dx = buf[1] & 0x7f;
230	dx *= ((buf[0] >> 4) & 0x01) ? 1 : -1;
231
232	/*
233	 * Low 7 bit of byte 2 are abs(dy), bit 7 is
234	 * 0, bit 3 of byte 0 is direction.
235	 */
236	dy = buf[2] & 0x7f;
237	dy *= ((buf[0] >> 3) & 0x01) ? -1 : 1;
238
239	/*
240	 * Get button state. It's the low three bits
241	 * (for three buttons) of byte 0.
242	 */
243	left	= buf[0] & 0x04;
244	middle	= buf[0] & 0x02;
245	right	= buf[0] & 0x01;
246
247	vsxxxaa_drop_bytes(mouse, 3);
248
249	DBG(KERN_INFO "%s on %s: dx=%d, dy=%d, buttons=%s%s%s\n",
250	    mouse->name, mouse->phys, dx, dy,
251	    left ? "L" : "l", middle ? "M" : "m", right ? "R" : "r");
252
253	/*
254	 * Report what we've found so far...
255	 */
256	input_report_key(dev, BTN_LEFT, left);
257	input_report_key(dev, BTN_MIDDLE, middle);
258	input_report_key(dev, BTN_RIGHT, right);
259	input_report_key(dev, BTN_TOUCH, 0);
260	input_report_rel(dev, REL_X, dx);
261	input_report_rel(dev, REL_Y, dy);
262	input_sync(dev);
263}
264
265static void vsxxxaa_handle_ABS_packet(struct vsxxxaa *mouse)
266{
267	struct input_dev *dev = mouse->dev;
268	unsigned char *buf = mouse->buf;
269	int left, middle, right, touch;
270	int x, y;
271
272	/*
273	 * Tablet position / button packet
274	 *
275	 * [0]:	1	1	0	B4	B3	B2	B1	Pr
276	 * [1]:	0	0	X5	X4	X3	X2	X1	X0
277	 * [2]:	0	0	X11	X10	X9	X8	X7	X6
278	 * [3]:	0	0	Y5	Y4	Y3	Y2	Y1	Y0
279	 * [4]:	0	0	Y11	Y10	Y9	Y8	Y7	Y6
280	 */
281
282	/*
283	 * Get X/Y position. Y axis needs to be inverted since VSXXX-AB
284	 * counts down->top while monitor counts top->bottom.
285	 */
286	x = ((buf[2] & 0x3f) << 6) | (buf[1] & 0x3f);
287	y = ((buf[4] & 0x3f) << 6) | (buf[3] & 0x3f);
288	y = 1023 - y;
289
290	/*
291	 * Get button state. It's bits <4..1> of byte 0.
292	 */
293	left	= buf[0] & 0x02;
294	middle	= buf[0] & 0x04;
295	right	= buf[0] & 0x08;
296	touch	= buf[0] & 0x10;
297
298	vsxxxaa_drop_bytes(mouse, 5);
299
300	DBG(KERN_INFO "%s on %s: x=%d, y=%d, buttons=%s%s%s%s\n",
301	    mouse->name, mouse->phys, x, y,
302	    left ? "L" : "l", middle ? "M" : "m",
303	    right ? "R" : "r", touch ? "T" : "t");
304
305	/*
306	 * Report what we've found so far...
307	 */
308	input_report_key(dev, BTN_LEFT, left);
309	input_report_key(dev, BTN_MIDDLE, middle);
310	input_report_key(dev, BTN_RIGHT, right);
311	input_report_key(dev, BTN_TOUCH, touch);
312	input_report_abs(dev, ABS_X, x);
313	input_report_abs(dev, ABS_Y, y);
314	input_sync(dev);
315}
316
317static void vsxxxaa_handle_POR_packet(struct vsxxxaa *mouse)
318{
319	struct input_dev *dev = mouse->dev;
320	unsigned char *buf = mouse->buf;
321	int left, middle, right;
322	unsigned char error;
323
324	/*
325	 * Check for Power-On-Reset packets. These are sent out
326	 * after plugging the mouse in, or when explicitly
327	 * requested by sending 'T'.
328	 *
329	 * [0]:	1	0	1	0	R3	R2	R1	R0
330	 * [1]:	0	M2	M1	M0	D3	D2	D1	D0
331	 * [2]:	0	E6	E5	E4	E3	E2	E1	E0
332	 * [3]:	0	0	0	0	0	Left	Middle	Right
333	 *
334	 * M: manufacturer location code
335	 * R: revision code
336	 * E: Error code. If it's in the range of 0x00..0x1f, only some
337	 *    minor problem occurred. Errors >= 0x20 are considered bad
338	 *    and the device may not work properly...
339	 * D: <0010> == mouse, <0100> == tablet
340	 */
341
342	mouse->version = buf[0] & 0x0f;
343	mouse->country = (buf[1] >> 4) & 0x07;
344	mouse->type = buf[1] & 0x0f;
345	error = buf[2] & 0x7f;
346
347	/*
348	 * Get button state. It's the low three bits
349	 * (for three buttons) of byte 0. Maybe even the bit <3>
350	 * has some meaning if a tablet is attached.
351	 */
352	left	= buf[0] & 0x04;
353	middle	= buf[0] & 0x02;
354	right	= buf[0] & 0x01;
355
356	vsxxxaa_drop_bytes(mouse, 4);
357	vsxxxaa_detection_done(mouse);
358
359	if (error <= 0x1f) {
360		/* No (serious) error. Report buttons */
361		input_report_key(dev, BTN_LEFT, left);
362		input_report_key(dev, BTN_MIDDLE, middle);
363		input_report_key(dev, BTN_RIGHT, right);
364		input_report_key(dev, BTN_TOUCH, 0);
365		input_sync(dev);
366
367		if (error != 0)
368			printk(KERN_INFO "Your %s on %s reports error=0x%02x\n",
369				mouse->name, mouse->phys, error);
370
371	}
372
373	/*
374	 * If the mouse was hot-plugged, we need to force differential mode
375	 * now... However, give it a second to recover from it's reset.
376	 */
377	printk(KERN_NOTICE
378		"%s on %s: Forcing standard packet format, "
379		"incremental streaming mode and 72 samples/sec\n",
380		mouse->name, mouse->phys);
381	serio_write(mouse->serio, 'S');	/* Standard format */
382	mdelay(50);
383	serio_write(mouse->serio, 'R');	/* Incremental */
384	mdelay(50);
385	serio_write(mouse->serio, 'L');	/* 72 samples/sec */
386}
387
388static void vsxxxaa_parse_buffer(struct vsxxxaa *mouse)
389{
390	unsigned char *buf = mouse->buf;
391	int stray_bytes;
392
393	/*
394	 * Parse buffer to death...
395	 */
396	do {
397		/*
398		 * Out of sync? Throw away what we don't understand. Each
399		 * packet starts with a byte whose bit 7 is set. Unhandled
400		 * packets (ie. which we don't know about or simply b0rk3d
401		 * data...) will get shifted out of the buffer after some
402		 * activity on the mouse.
403		 */
404		while (mouse->count > 0 && !IS_HDR_BYTE(buf[0])) {
405			printk(KERN_ERR "%s on %s: Dropping a byte to regain "
406				"sync with mouse data stream...\n",
407				mouse->name, mouse->phys);
408			vsxxxaa_drop_bytes(mouse, 1);
409		}
410
411		/*
412		 * Check for packets we know about.
413		 */
414
415		if (vsxxxaa_smells_like_packet(mouse, VSXXXAA_PACKET_REL, 3)) {
416			/* Check for broken packet */
417			stray_bytes = vsxxxaa_check_packet(mouse, 3);
418			if (!stray_bytes)
419				vsxxxaa_handle_REL_packet(mouse);
420
421		} else if (vsxxxaa_smells_like_packet(mouse,
422						      VSXXXAA_PACKET_ABS, 5)) {
423			/* Check for broken packet */
424			stray_bytes = vsxxxaa_check_packet(mouse, 5);
425			if (!stray_bytes)
426				vsxxxaa_handle_ABS_packet(mouse);
427
428		} else if (vsxxxaa_smells_like_packet(mouse,
429						      VSXXXAA_PACKET_POR, 4)) {
430			/* Check for broken packet */
431			stray_bytes = vsxxxaa_check_packet(mouse, 4);
432			if (!stray_bytes)
433				vsxxxaa_handle_POR_packet(mouse);
434
435		} else {
436			break; /* No REL, ABS or POR packet found */
437		}
438
439		if (stray_bytes > 0) {
440			printk(KERN_ERR "Dropping %d bytes now...\n",
441				stray_bytes);
442			vsxxxaa_drop_bytes(mouse, stray_bytes);
443		}
444
445	} while (1);
446}
447
448static irqreturn_t vsxxxaa_interrupt(struct serio *serio,
449				     unsigned char data, unsigned int flags)
450{
451	struct vsxxxaa *mouse = serio_get_drvdata(serio);
452
453	vsxxxaa_queue_byte(mouse, data);
454	vsxxxaa_parse_buffer(mouse);
455
456	return IRQ_HANDLED;
457}
458
459static void vsxxxaa_disconnect(struct serio *serio)
460{
461	struct vsxxxaa *mouse = serio_get_drvdata(serio);
462
463	serio_close(serio);
464	serio_set_drvdata(serio, NULL);
465	input_unregister_device(mouse->dev);
466	kfree(mouse);
467}
468
469static int vsxxxaa_connect(struct serio *serio, struct serio_driver *drv)
470{
471	struct vsxxxaa *mouse;
472	struct input_dev *input_dev;
473	int err = -ENOMEM;
474
475	mouse = kzalloc(sizeof(struct vsxxxaa), GFP_KERNEL);
476	input_dev = input_allocate_device();
477	if (!mouse || !input_dev)
478		goto fail1;
479
480	mouse->dev = input_dev;
481	mouse->serio = serio;
482	strlcat(mouse->name, "DEC VSXXX-AA/-GA mouse or VSXXX-AB digitizer",
483		 sizeof(mouse->name));
484	snprintf(mouse->phys, sizeof(mouse->phys), "%s/input0", serio->phys);
485
486	input_dev->name = mouse->name;
487	input_dev->phys = mouse->phys;
488	input_dev->id.bustype = BUS_RS232;
489	input_dev->dev.parent = &serio->dev;
490
491	__set_bit(EV_KEY, input_dev->evbit);		/* We have buttons */
492	__set_bit(EV_REL, input_dev->evbit);
493	__set_bit(EV_ABS, input_dev->evbit);
494	__set_bit(BTN_LEFT, input_dev->keybit);		/* We have 3 buttons */
495	__set_bit(BTN_MIDDLE, input_dev->keybit);
496	__set_bit(BTN_RIGHT, input_dev->keybit);
497	__set_bit(BTN_TOUCH, input_dev->keybit);	/* ...and Tablet */
498	__set_bit(REL_X, input_dev->relbit);
499	__set_bit(REL_Y, input_dev->relbit);
500	input_set_abs_params(input_dev, ABS_X, 0, 1023, 0, 0);
501	input_set_abs_params(input_dev, ABS_Y, 0, 1023, 0, 0);
502
503	serio_set_drvdata(serio, mouse);
504
505	err = serio_open(serio, drv);
506	if (err)
507		goto fail2;
508
509	/*
510	 * Request selftest. Standard packet format and differential
511	 * mode will be requested after the device ID'ed successfully.
512	 */
513	serio_write(serio, 'T'); /* Test */
514
515	err = input_register_device(input_dev);
516	if (err)
517		goto fail3;
518
519	return 0;
520
521 fail3:	serio_close(serio);
522 fail2:	serio_set_drvdata(serio, NULL);
523 fail1:	input_free_device(input_dev);
524	kfree(mouse);
525	return err;
526}
527
528static struct serio_device_id vsxxaa_serio_ids[] = {
529	{
530		.type	= SERIO_RS232,
531		.proto	= SERIO_VSXXXAA,
532		.id	= SERIO_ANY,
533		.extra	= SERIO_ANY,
534	},
535	{ 0 }
536};
537
538MODULE_DEVICE_TABLE(serio, vsxxaa_serio_ids);
539
540static struct serio_driver vsxxxaa_drv = {
541	.driver		= {
542		.name	= "vsxxxaa",
543	},
544	.description	= DRIVER_DESC,
545	.id_table	= vsxxaa_serio_ids,
546	.connect	= vsxxxaa_connect,
547	.interrupt	= vsxxxaa_interrupt,
548	.disconnect	= vsxxxaa_disconnect,
549};
550
551static int __init vsxxxaa_init(void)
552{
553	return serio_register_driver(&vsxxxaa_drv);
554}
555
556static void __exit vsxxxaa_exit(void)
557{
558	serio_unregister_driver(&vsxxxaa_drv);
559}
560
561module_init(vsxxxaa_init);
562module_exit(vsxxxaa_exit);
563
v6.2
  1// SPDX-License-Identifier: GPL-2.0-or-later
  2/*
  3 * Driver for	DEC VSXXX-AA mouse (hockey-puck mouse, ball or two rollers)
  4 *		DEC VSXXX-GA mouse (rectangular mouse, with ball)
  5 *		DEC VSXXX-AB tablet (digitizer with hair cross or stylus)
  6 *
  7 * Copyright (C) 2003-2004 by Jan-Benedict Glaw <jbglaw@lug-owl.de>
  8 *
  9 * The packet format was initially taken from a patch to GPM which is (C) 2001
 10 * by	Karsten Merker <merker@linuxtag.org>
 11 * and	Maciej W. Rozycki <macro@ds2.pg.gda.pl>
 12 * Later on, I had access to the device's documentation (referenced below).
 13 */
 14
 15/*
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 16 * Building an adaptor to DE9 / DB25 RS232
 17 * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 18 *
 19 * DISCLAIMER: Use this description AT YOUR OWN RISK! I'll not pay for
 20 * anything if you break your mouse, your computer or whatever!
 21 *
 22 * In theory, this mouse is a simple RS232 device. In practice, it has got
 23 * a quite uncommon plug and the requirement to additionally get a power
 24 * supply at +5V and -12V.
 25 *
 26 * If you look at the socket/jack (_not_ at the plug), we use this pin
 27 * numbering:
 28 *    _______
 29 *   / 7 6 5 \
 30 *  | 4 --- 3 |
 31 *   \  2 1  /
 32 *    -------
 33 *
 34 *	DEC socket	DE9	DB25	Note
 35 *	1 (GND)		5	7	-
 36 *	2 (RxD)		2	3	-
 37 *	3 (TxD)		3	2	-
 38 *	4 (-12V)	-	-	Somewhere from the PSU. At ATX, it's
 39 *					the thin blue wire at pin 12 of the
 40 *					ATX power connector. Only required for
 41 *					VSXXX-AA/-GA mice.
 42 *	5 (+5V)		-	-	PSU (red wires of ATX power connector
 43 *					on pin 4, 6, 19 or 20) or HDD power
 44 *					connector (also red wire).
 45 *	6 (+12V)	-	-	HDD power connector, yellow wire. Only
 46 *					required for VSXXX-AB digitizer.
 47 *	7 (dev. avail.)	-	-	The mouse shorts this one to pin 1.
 48 *					This way, the host computer can detect
 49 *					the mouse. To use it with the adaptor,
 50 *					simply don't connect this pin.
 51 *
 52 * So to get a working adaptor, you need to connect the mouse with three
 53 * wires to a RS232 port and two or three additional wires for +5V, +12V and
 54 * -12V to the PSU.
 55 *
 56 * Flow specification for the link is 4800, 8o1.
 57 *
 58 * The mice and tablet are described in "VCB02 Video Subsystem - Technical
 59 * Manual", DEC EK-104AA-TM-001. You'll find it at MANX, a search engine
 60 * specific for DEC documentation. Try
 61 * http://www.vt100.net/manx/details?pn=EK-104AA-TM-001;id=21;cp=1
 62 */
 63
 64#include <linux/delay.h>
 65#include <linux/module.h>
 66#include <linux/slab.h>
 67#include <linux/interrupt.h>
 68#include <linux/input.h>
 69#include <linux/serio.h>
 
 70
 71#define DRIVER_DESC "Driver for DEC VSXXX-AA and -GA mice and VSXXX-AB tablet"
 72
 73MODULE_AUTHOR("Jan-Benedict Glaw <jbglaw@lug-owl.de>");
 74MODULE_DESCRIPTION(DRIVER_DESC);
 75MODULE_LICENSE("GPL");
 76
 77#undef VSXXXAA_DEBUG
 78#ifdef VSXXXAA_DEBUG
 79#define DBG(x...) printk(x)
 80#else
 81#define DBG(x...) do {} while (0)
 82#endif
 83
 84#define VSXXXAA_INTRO_MASK	0x80
 85#define VSXXXAA_INTRO_HEAD	0x80
 86#define IS_HDR_BYTE(x)			\
 87	(((x) & VSXXXAA_INTRO_MASK) == VSXXXAA_INTRO_HEAD)
 88
 89#define VSXXXAA_PACKET_MASK	0xe0
 90#define VSXXXAA_PACKET_REL	0x80
 91#define VSXXXAA_PACKET_ABS	0xc0
 92#define VSXXXAA_PACKET_POR	0xa0
 93#define MATCH_PACKET_TYPE(data, type)	\
 94	(((data) & VSXXXAA_PACKET_MASK) == (type))
 95
 96
 97
 98struct vsxxxaa {
 99	struct input_dev *dev;
100	struct serio *serio;
101#define BUFLEN 15 /* At least 5 is needed for a full tablet packet */
102	unsigned char buf[BUFLEN];
103	unsigned char count;
104	unsigned char version;
105	unsigned char country;
106	unsigned char type;
107	char name[64];
108	char phys[32];
109};
110
111static void vsxxxaa_drop_bytes(struct vsxxxaa *mouse, int num)
112{
113	if (num >= mouse->count) {
114		mouse->count = 0;
115	} else {
116		memmove(mouse->buf, mouse->buf + num, BUFLEN - num);
117		mouse->count -= num;
118	}
119}
120
121static void vsxxxaa_queue_byte(struct vsxxxaa *mouse, unsigned char byte)
122{
123	if (mouse->count == BUFLEN) {
124		printk(KERN_ERR "%s on %s: Dropping a byte of full buffer.\n",
125			mouse->name, mouse->phys);
126		vsxxxaa_drop_bytes(mouse, 1);
127	}
128
129	DBG(KERN_INFO "Queueing byte 0x%02x\n", byte);
130
131	mouse->buf[mouse->count++] = byte;
132}
133
134static void vsxxxaa_detection_done(struct vsxxxaa *mouse)
135{
136	switch (mouse->type) {
137	case 0x02:
138		strscpy(mouse->name, "DEC VSXXX-AA/-GA mouse",
139			sizeof(mouse->name));
140		break;
141
142	case 0x04:
143		strscpy(mouse->name, "DEC VSXXX-AB digitizer",
144			sizeof(mouse->name));
145		break;
146
147	default:
148		snprintf(mouse->name, sizeof(mouse->name),
149			 "unknown DEC pointer device (type = 0x%02x)",
150			 mouse->type);
151		break;
152	}
153
154	printk(KERN_INFO
155		"Found %s version 0x%02x from country 0x%02x on port %s\n",
156		mouse->name, mouse->version, mouse->country, mouse->phys);
157}
158
159/*
160 * Returns number of bytes to be dropped, 0 if packet is okay.
161 */
162static int vsxxxaa_check_packet(struct vsxxxaa *mouse, int packet_len)
163{
164	int i;
165
166	/* First byte must be a header byte */
167	if (!IS_HDR_BYTE(mouse->buf[0])) {
168		DBG("vsck: len=%d, 1st=0x%02x\n", packet_len, mouse->buf[0]);
169		return 1;
170	}
171
172	/* Check all following bytes */
173	for (i = 1; i < packet_len; i++) {
174		if (IS_HDR_BYTE(mouse->buf[i])) {
175			printk(KERN_ERR
176				"Need to drop %d bytes of a broken packet.\n",
177				i - 1);
178			DBG(KERN_INFO "check: len=%d, b[%d]=0x%02x\n",
179			    packet_len, i, mouse->buf[i]);
180			return i - 1;
181		}
182	}
183
184	return 0;
185}
186
187static inline int vsxxxaa_smells_like_packet(struct vsxxxaa *mouse,
188					     unsigned char type, size_t len)
189{
190	return mouse->count >= len && MATCH_PACKET_TYPE(mouse->buf[0], type);
191}
192
193static void vsxxxaa_handle_REL_packet(struct vsxxxaa *mouse)
194{
195	struct input_dev *dev = mouse->dev;
196	unsigned char *buf = mouse->buf;
197	int left, middle, right;
198	int dx, dy;
199
200	/*
201	 * Check for normal stream packets. This is three bytes,
202	 * with the first byte's 3 MSB set to 100.
203	 *
204	 * [0]:	1	0	0	SignX	SignY	Left	Middle	Right
205	 * [1]: 0	dx	dx	dx	dx	dx	dx	dx
206	 * [2]:	0	dy	dy	dy	dy	dy	dy	dy
207	 */
208
209	/*
210	 * Low 7 bit of byte 1 are abs(dx), bit 7 is
211	 * 0, bit 4 of byte 0 is direction.
212	 */
213	dx = buf[1] & 0x7f;
214	dx *= ((buf[0] >> 4) & 0x01) ? 1 : -1;
215
216	/*
217	 * Low 7 bit of byte 2 are abs(dy), bit 7 is
218	 * 0, bit 3 of byte 0 is direction.
219	 */
220	dy = buf[2] & 0x7f;
221	dy *= ((buf[0] >> 3) & 0x01) ? -1 : 1;
222
223	/*
224	 * Get button state. It's the low three bits
225	 * (for three buttons) of byte 0.
226	 */
227	left	= buf[0] & 0x04;
228	middle	= buf[0] & 0x02;
229	right	= buf[0] & 0x01;
230
231	vsxxxaa_drop_bytes(mouse, 3);
232
233	DBG(KERN_INFO "%s on %s: dx=%d, dy=%d, buttons=%s%s%s\n",
234	    mouse->name, mouse->phys, dx, dy,
235	    left ? "L" : "l", middle ? "M" : "m", right ? "R" : "r");
236
237	/*
238	 * Report what we've found so far...
239	 */
240	input_report_key(dev, BTN_LEFT, left);
241	input_report_key(dev, BTN_MIDDLE, middle);
242	input_report_key(dev, BTN_RIGHT, right);
243	input_report_key(dev, BTN_TOUCH, 0);
244	input_report_rel(dev, REL_X, dx);
245	input_report_rel(dev, REL_Y, dy);
246	input_sync(dev);
247}
248
249static void vsxxxaa_handle_ABS_packet(struct vsxxxaa *mouse)
250{
251	struct input_dev *dev = mouse->dev;
252	unsigned char *buf = mouse->buf;
253	int left, middle, right, touch;
254	int x, y;
255
256	/*
257	 * Tablet position / button packet
258	 *
259	 * [0]:	1	1	0	B4	B3	B2	B1	Pr
260	 * [1]:	0	0	X5	X4	X3	X2	X1	X0
261	 * [2]:	0	0	X11	X10	X9	X8	X7	X6
262	 * [3]:	0	0	Y5	Y4	Y3	Y2	Y1	Y0
263	 * [4]:	0	0	Y11	Y10	Y9	Y8	Y7	Y6
264	 */
265
266	/*
267	 * Get X/Y position. Y axis needs to be inverted since VSXXX-AB
268	 * counts down->top while monitor counts top->bottom.
269	 */
270	x = ((buf[2] & 0x3f) << 6) | (buf[1] & 0x3f);
271	y = ((buf[4] & 0x3f) << 6) | (buf[3] & 0x3f);
272	y = 1023 - y;
273
274	/*
275	 * Get button state. It's bits <4..1> of byte 0.
276	 */
277	left	= buf[0] & 0x02;
278	middle	= buf[0] & 0x04;
279	right	= buf[0] & 0x08;
280	touch	= buf[0] & 0x10;
281
282	vsxxxaa_drop_bytes(mouse, 5);
283
284	DBG(KERN_INFO "%s on %s: x=%d, y=%d, buttons=%s%s%s%s\n",
285	    mouse->name, mouse->phys, x, y,
286	    left ? "L" : "l", middle ? "M" : "m",
287	    right ? "R" : "r", touch ? "T" : "t");
288
289	/*
290	 * Report what we've found so far...
291	 */
292	input_report_key(dev, BTN_LEFT, left);
293	input_report_key(dev, BTN_MIDDLE, middle);
294	input_report_key(dev, BTN_RIGHT, right);
295	input_report_key(dev, BTN_TOUCH, touch);
296	input_report_abs(dev, ABS_X, x);
297	input_report_abs(dev, ABS_Y, y);
298	input_sync(dev);
299}
300
301static void vsxxxaa_handle_POR_packet(struct vsxxxaa *mouse)
302{
303	struct input_dev *dev = mouse->dev;
304	unsigned char *buf = mouse->buf;
305	int left, middle, right;
306	unsigned char error;
307
308	/*
309	 * Check for Power-On-Reset packets. These are sent out
310	 * after plugging the mouse in, or when explicitly
311	 * requested by sending 'T'.
312	 *
313	 * [0]:	1	0	1	0	R3	R2	R1	R0
314	 * [1]:	0	M2	M1	M0	D3	D2	D1	D0
315	 * [2]:	0	E6	E5	E4	E3	E2	E1	E0
316	 * [3]:	0	0	0	0	0	Left	Middle	Right
317	 *
318	 * M: manufacturer location code
319	 * R: revision code
320	 * E: Error code. If it's in the range of 0x00..0x1f, only some
321	 *    minor problem occurred. Errors >= 0x20 are considered bad
322	 *    and the device may not work properly...
323	 * D: <0010> == mouse, <0100> == tablet
324	 */
325
326	mouse->version = buf[0] & 0x0f;
327	mouse->country = (buf[1] >> 4) & 0x07;
328	mouse->type = buf[1] & 0x0f;
329	error = buf[2] & 0x7f;
330
331	/*
332	 * Get button state. It's the low three bits
333	 * (for three buttons) of byte 0. Maybe even the bit <3>
334	 * has some meaning if a tablet is attached.
335	 */
336	left	= buf[0] & 0x04;
337	middle	= buf[0] & 0x02;
338	right	= buf[0] & 0x01;
339
340	vsxxxaa_drop_bytes(mouse, 4);
341	vsxxxaa_detection_done(mouse);
342
343	if (error <= 0x1f) {
344		/* No (serious) error. Report buttons */
345		input_report_key(dev, BTN_LEFT, left);
346		input_report_key(dev, BTN_MIDDLE, middle);
347		input_report_key(dev, BTN_RIGHT, right);
348		input_report_key(dev, BTN_TOUCH, 0);
349		input_sync(dev);
350
351		if (error != 0)
352			printk(KERN_INFO "Your %s on %s reports error=0x%02x\n",
353				mouse->name, mouse->phys, error);
354
355	}
356
357	/*
358	 * If the mouse was hot-plugged, we need to force differential mode
359	 * now... However, give it a second to recover from it's reset.
360	 */
361	printk(KERN_NOTICE
362		"%s on %s: Forcing standard packet format, "
363		"incremental streaming mode and 72 samples/sec\n",
364		mouse->name, mouse->phys);
365	serio_write(mouse->serio, 'S');	/* Standard format */
366	mdelay(50);
367	serio_write(mouse->serio, 'R');	/* Incremental */
368	mdelay(50);
369	serio_write(mouse->serio, 'L');	/* 72 samples/sec */
370}
371
372static void vsxxxaa_parse_buffer(struct vsxxxaa *mouse)
373{
374	unsigned char *buf = mouse->buf;
375	int stray_bytes;
376
377	/*
378	 * Parse buffer to death...
379	 */
380	do {
381		/*
382		 * Out of sync? Throw away what we don't understand. Each
383		 * packet starts with a byte whose bit 7 is set. Unhandled
384		 * packets (ie. which we don't know about or simply b0rk3d
385		 * data...) will get shifted out of the buffer after some
386		 * activity on the mouse.
387		 */
388		while (mouse->count > 0 && !IS_HDR_BYTE(buf[0])) {
389			printk(KERN_ERR "%s on %s: Dropping a byte to regain "
390				"sync with mouse data stream...\n",
391				mouse->name, mouse->phys);
392			vsxxxaa_drop_bytes(mouse, 1);
393		}
394
395		/*
396		 * Check for packets we know about.
397		 */
398
399		if (vsxxxaa_smells_like_packet(mouse, VSXXXAA_PACKET_REL, 3)) {
400			/* Check for broken packet */
401			stray_bytes = vsxxxaa_check_packet(mouse, 3);
402			if (!stray_bytes)
403				vsxxxaa_handle_REL_packet(mouse);
404
405		} else if (vsxxxaa_smells_like_packet(mouse,
406						      VSXXXAA_PACKET_ABS, 5)) {
407			/* Check for broken packet */
408			stray_bytes = vsxxxaa_check_packet(mouse, 5);
409			if (!stray_bytes)
410				vsxxxaa_handle_ABS_packet(mouse);
411
412		} else if (vsxxxaa_smells_like_packet(mouse,
413						      VSXXXAA_PACKET_POR, 4)) {
414			/* Check for broken packet */
415			stray_bytes = vsxxxaa_check_packet(mouse, 4);
416			if (!stray_bytes)
417				vsxxxaa_handle_POR_packet(mouse);
418
419		} else {
420			break; /* No REL, ABS or POR packet found */
421		}
422
423		if (stray_bytes > 0) {
424			printk(KERN_ERR "Dropping %d bytes now...\n",
425				stray_bytes);
426			vsxxxaa_drop_bytes(mouse, stray_bytes);
427		}
428
429	} while (1);
430}
431
432static irqreturn_t vsxxxaa_interrupt(struct serio *serio,
433				     unsigned char data, unsigned int flags)
434{
435	struct vsxxxaa *mouse = serio_get_drvdata(serio);
436
437	vsxxxaa_queue_byte(mouse, data);
438	vsxxxaa_parse_buffer(mouse);
439
440	return IRQ_HANDLED;
441}
442
443static void vsxxxaa_disconnect(struct serio *serio)
444{
445	struct vsxxxaa *mouse = serio_get_drvdata(serio);
446
447	serio_close(serio);
448	serio_set_drvdata(serio, NULL);
449	input_unregister_device(mouse->dev);
450	kfree(mouse);
451}
452
453static int vsxxxaa_connect(struct serio *serio, struct serio_driver *drv)
454{
455	struct vsxxxaa *mouse;
456	struct input_dev *input_dev;
457	int err = -ENOMEM;
458
459	mouse = kzalloc(sizeof(struct vsxxxaa), GFP_KERNEL);
460	input_dev = input_allocate_device();
461	if (!mouse || !input_dev)
462		goto fail1;
463
464	mouse->dev = input_dev;
465	mouse->serio = serio;
466	strlcat(mouse->name, "DEC VSXXX-AA/-GA mouse or VSXXX-AB digitizer",
467		 sizeof(mouse->name));
468	snprintf(mouse->phys, sizeof(mouse->phys), "%s/input0", serio->phys);
469
470	input_dev->name = mouse->name;
471	input_dev->phys = mouse->phys;
472	input_dev->id.bustype = BUS_RS232;
473	input_dev->dev.parent = &serio->dev;
474
475	__set_bit(EV_KEY, input_dev->evbit);		/* We have buttons */
476	__set_bit(EV_REL, input_dev->evbit);
477	__set_bit(EV_ABS, input_dev->evbit);
478	__set_bit(BTN_LEFT, input_dev->keybit);		/* We have 3 buttons */
479	__set_bit(BTN_MIDDLE, input_dev->keybit);
480	__set_bit(BTN_RIGHT, input_dev->keybit);
481	__set_bit(BTN_TOUCH, input_dev->keybit);	/* ...and Tablet */
482	__set_bit(REL_X, input_dev->relbit);
483	__set_bit(REL_Y, input_dev->relbit);
484	input_set_abs_params(input_dev, ABS_X, 0, 1023, 0, 0);
485	input_set_abs_params(input_dev, ABS_Y, 0, 1023, 0, 0);
486
487	serio_set_drvdata(serio, mouse);
488
489	err = serio_open(serio, drv);
490	if (err)
491		goto fail2;
492
493	/*
494	 * Request selftest. Standard packet format and differential
495	 * mode will be requested after the device ID'ed successfully.
496	 */
497	serio_write(serio, 'T'); /* Test */
498
499	err = input_register_device(input_dev);
500	if (err)
501		goto fail3;
502
503	return 0;
504
505 fail3:	serio_close(serio);
506 fail2:	serio_set_drvdata(serio, NULL);
507 fail1:	input_free_device(input_dev);
508	kfree(mouse);
509	return err;
510}
511
512static struct serio_device_id vsxxaa_serio_ids[] = {
513	{
514		.type	= SERIO_RS232,
515		.proto	= SERIO_VSXXXAA,
516		.id	= SERIO_ANY,
517		.extra	= SERIO_ANY,
518	},
519	{ 0 }
520};
521
522MODULE_DEVICE_TABLE(serio, vsxxaa_serio_ids);
523
524static struct serio_driver vsxxxaa_drv = {
525	.driver		= {
526		.name	= "vsxxxaa",
527	},
528	.description	= DRIVER_DESC,
529	.id_table	= vsxxaa_serio_ids,
530	.connect	= vsxxxaa_connect,
531	.interrupt	= vsxxxaa_interrupt,
532	.disconnect	= vsxxxaa_disconnect,
533};
534
535module_serio_driver(vsxxxaa_drv);