xref: /linux/drivers/input/joystick/db9.c (revision 6ab3d5624e172c553004ecc862bfeac16d9d68b7)
1 /*
2  * $Id: db9.c,v 1.13 2002/04/07 20:13:37 vojtech Exp $
3  *
4  *  Copyright (c) 1999-2001 Vojtech Pavlik
5  *
6  *  Based on the work of:
7  *	Andree Borrmann		Mats Sj�vall
8  */
9 
10 /*
11  * Atari, Amstrad, Commodore, Amiga, Sega, etc. joystick driver for Linux
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  * Should you need to contact me, the author, you can do so either by
30  * e-mail - mail your message to <vojtech@ucw.cz>, or by paper mail:
31  * Vojtech Pavlik, Simunkova 1594, Prague 8, 182 00 Czech Republic
32  */
33 
34 #include <linux/kernel.h>
35 #include <linux/module.h>
36 #include <linux/moduleparam.h>
37 #include <linux/delay.h>
38 #include <linux/init.h>
39 #include <linux/parport.h>
40 #include <linux/input.h>
41 #include <linux/mutex.h>
42 
43 MODULE_AUTHOR("Vojtech Pavlik <vojtech@ucw.cz>");
44 MODULE_DESCRIPTION("Atari, Amstrad, Commodore, Amiga, Sega, etc. joystick driver");
45 MODULE_LICENSE("GPL");
46 
47 struct db9_config {
48 	int args[2];
49 	int nargs;
50 };
51 
52 #define DB9_MAX_PORTS		3
53 static struct db9_config db9[DB9_MAX_PORTS] __initdata;
54 
55 module_param_array_named(dev, db9[0].args, int, &db9[0].nargs, 0);
56 MODULE_PARM_DESC(dev, "Describes first attached device (<parport#>,<type>)");
57 module_param_array_named(dev2, db9[1].args, int, &db9[0].nargs, 0);
58 MODULE_PARM_DESC(dev2, "Describes second attached device (<parport#>,<type>)");
59 module_param_array_named(dev3, db9[2].args, int, &db9[2].nargs, 0);
60 MODULE_PARM_DESC(dev3, "Describes third attached device (<parport#>,<type>)");
61 
62 __obsolete_setup("db9=");
63 __obsolete_setup("db9_2=");
64 __obsolete_setup("db9_3=");
65 
66 #define DB9_ARG_PARPORT		0
67 #define DB9_ARG_MODE		1
68 
69 #define DB9_MULTI_STICK		0x01
70 #define DB9_MULTI2_STICK	0x02
71 #define DB9_GENESIS_PAD		0x03
72 #define DB9_GENESIS5_PAD	0x05
73 #define DB9_GENESIS6_PAD	0x06
74 #define DB9_SATURN_PAD		0x07
75 #define DB9_MULTI_0802		0x08
76 #define DB9_MULTI_0802_2	0x09
77 #define DB9_CD32_PAD		0x0A
78 #define DB9_SATURN_DPP		0x0B
79 #define DB9_SATURN_DPP_2	0x0C
80 #define DB9_MAX_PAD		0x0D
81 
82 #define DB9_UP			0x01
83 #define DB9_DOWN		0x02
84 #define DB9_LEFT		0x04
85 #define DB9_RIGHT		0x08
86 #define DB9_FIRE1		0x10
87 #define DB9_FIRE2		0x20
88 #define DB9_FIRE3		0x40
89 #define DB9_FIRE4		0x80
90 
91 #define DB9_NORMAL		0x0a
92 #define DB9_NOSELECT		0x08
93 
94 #define DB9_GENESIS6_DELAY	14
95 #define DB9_REFRESH_TIME	HZ/100
96 
97 #define DB9_MAX_DEVICES		2
98 
99 struct db9_mode_data {
100 	const char *name;
101 	const short *buttons;
102 	int n_buttons;
103 	int n_pads;
104 	int n_axis;
105 	int bidirectional;
106 	int reverse;
107 };
108 
109 struct db9 {
110 	struct input_dev *dev[DB9_MAX_DEVICES];
111 	struct timer_list timer;
112 	struct pardevice *pd;
113 	int mode;
114 	int used;
115 	struct mutex mutex;
116 	char phys[DB9_MAX_DEVICES][32];
117 };
118 
119 static struct db9 *db9_base[3];
120 
121 static const short db9_multi_btn[] = { BTN_TRIGGER, BTN_THUMB };
122 static const short db9_genesis_btn[] = { BTN_START, BTN_A, BTN_B, BTN_C, BTN_X, BTN_Y, BTN_Z, BTN_MODE };
123 static const short db9_cd32_btn[] = { BTN_A, BTN_B, BTN_C, BTN_X, BTN_Y, BTN_Z, BTN_TL, BTN_TR, BTN_START };
124 static const short db9_abs[] = { ABS_X, ABS_Y, ABS_RX, ABS_RY, ABS_RZ, ABS_Z, ABS_HAT0X, ABS_HAT0Y, ABS_HAT1X, ABS_HAT1Y };
125 
126 static const struct db9_mode_data db9_modes[] = {
127 	{ NULL,					 NULL,		  0,  0,  0,  0,  0 },
128 	{ "Multisystem joystick",		 db9_multi_btn,	  1,  1,  2,  1,  1 },
129 	{ "Multisystem joystick (2 fire)",	 db9_multi_btn,	  2,  1,  2,  1,  1 },
130 	{ "Genesis pad",			 db9_genesis_btn, 4,  1,  2,  1,  1 },
131 	{ NULL,					 NULL,		  0,  0,  0,  0,  0 },
132 	{ "Genesis 5 pad",			 db9_genesis_btn, 6,  1,  2,  1,  1 },
133 	{ "Genesis 6 pad",			 db9_genesis_btn, 8,  1,  2,  1,  1 },
134 	{ "Saturn pad",				 db9_cd32_btn,	  9,  6,  7,  0,  1 },
135 	{ "Multisystem (0.8.0.2) joystick",	 db9_multi_btn,	  1,  1,  2,  1,  1 },
136 	{ "Multisystem (0.8.0.2-dual) joystick", db9_multi_btn,	  1,  2,  2,  1,  1 },
137 	{ "Amiga CD-32 pad",			 db9_cd32_btn,	  7,  1,  2,  1,  1 },
138 	{ "Saturn dpp",				 db9_cd32_btn,	  9,  6,  7,  0,  0 },
139 	{ "Saturn dpp dual",			 db9_cd32_btn,	  9,  12, 7,  0,  0 },
140 };
141 
142 /*
143  * Saturn controllers
144  */
145 #define DB9_SATURN_DELAY 300
146 static const int db9_saturn_byte[] = { 1, 1, 1, 2, 2, 2, 2, 2, 1 };
147 static const unsigned char db9_saturn_mask[] = { 0x04, 0x01, 0x02, 0x40, 0x20, 0x10, 0x08, 0x80, 0x08 };
148 
149 /*
150  * db9_saturn_write_sub() writes 2 bit data.
151  */
152 static void db9_saturn_write_sub(struct parport *port, int type, unsigned char data, int powered, int pwr_sub)
153 {
154 	unsigned char c;
155 
156 	switch (type) {
157 	case 1: /* DPP1 */
158 		c = 0x80 | 0x30 | (powered ? 0x08 : 0) | (pwr_sub ? 0x04 : 0) | data;
159 		parport_write_data(port, c);
160 		break;
161 	case 2: /* DPP2 */
162 		c = 0x40 | data << 4 | (powered ? 0x08 : 0) | (pwr_sub ? 0x04 : 0) | 0x03;
163 		parport_write_data(port, c);
164 		break;
165 	case 0:	/* DB9 */
166 		c = ((((data & 2) ? 2 : 0) | ((data & 1) ? 4 : 0)) ^ 0x02) | !powered;
167 		parport_write_control(port, c);
168 		break;
169 	}
170 }
171 
172 /*
173  * gc_saturn_read_sub() reads 4 bit data.
174  */
175 static unsigned char db9_saturn_read_sub(struct parport *port, int type)
176 {
177 	unsigned char data;
178 
179 	if (type) {
180 		/* DPP */
181 		data = parport_read_status(port) ^ 0x80;
182 		return (data & 0x80 ? 1 : 0) | (data & 0x40 ? 2 : 0)
183 		     | (data & 0x20 ? 4 : 0) | (data & 0x10 ? 8 : 0);
184 	} else {
185 		/* DB9 */
186 		data = parport_read_data(port) & 0x0f;
187 		return (data & 0x8 ? 1 : 0) | (data & 0x4 ? 2 : 0)
188 		     | (data & 0x2 ? 4 : 0) | (data & 0x1 ? 8 : 0);
189 	}
190 }
191 
192 /*
193  * db9_saturn_read_analog() sends clock and reads 8 bit data.
194  */
195 static unsigned char db9_saturn_read_analog(struct parport *port, int type, int powered)
196 {
197 	unsigned char data;
198 
199 	db9_saturn_write_sub(port, type, 0, powered, 0);
200 	udelay(DB9_SATURN_DELAY);
201 	data = db9_saturn_read_sub(port, type) << 4;
202 	db9_saturn_write_sub(port, type, 2, powered, 0);
203 	udelay(DB9_SATURN_DELAY);
204 	data |= db9_saturn_read_sub(port, type);
205 	return data;
206 }
207 
208 /*
209  * db9_saturn_read_packet() reads whole saturn packet at connector
210  * and returns device identifier code.
211  */
212 static unsigned char db9_saturn_read_packet(struct parport *port, unsigned char *data, int type, int powered)
213 {
214 	int i, j;
215 	unsigned char tmp;
216 
217 	db9_saturn_write_sub(port, type, 3, powered, 0);
218 	data[0] = db9_saturn_read_sub(port, type);
219 	switch (data[0] & 0x0f) {
220 	case 0xf:
221 		/* 1111  no pad */
222 		return data[0] = 0xff;
223 	case 0x4: case 0x4 | 0x8:
224 		/* ?100 : digital controller */
225 		db9_saturn_write_sub(port, type, 0, powered, 1);
226 		data[2] = db9_saturn_read_sub(port, type) << 4;
227 		db9_saturn_write_sub(port, type, 2, powered, 1);
228 		data[1] = db9_saturn_read_sub(port, type) << 4;
229 		db9_saturn_write_sub(port, type, 1, powered, 1);
230 		data[1] |= db9_saturn_read_sub(port, type);
231 		db9_saturn_write_sub(port, type, 3, powered, 1);
232 		/* data[2] |= db9_saturn_read_sub(port, type); */
233 		data[2] |= data[0];
234 		return data[0] = 0x02;
235 	case 0x1:
236 		/* 0001 : analog controller or multitap */
237 		db9_saturn_write_sub(port, type, 2, powered, 0);
238 		udelay(DB9_SATURN_DELAY);
239 		data[0] = db9_saturn_read_analog(port, type, powered);
240 		if (data[0] != 0x41) {
241 			/* read analog controller */
242 			for (i = 0; i < (data[0] & 0x0f); i++)
243 				data[i + 1] = db9_saturn_read_analog(port, type, powered);
244 			db9_saturn_write_sub(port, type, 3, powered, 0);
245 			return data[0];
246 		} else {
247 			/* read multitap */
248 			if (db9_saturn_read_analog(port, type, powered) != 0x60)
249 				return data[0] = 0xff;
250 			for (i = 0; i < 60; i += 10) {
251 				data[i] = db9_saturn_read_analog(port, type, powered);
252 				if (data[i] != 0xff)
253 					/* read each pad */
254 					for (j = 0; j < (data[i] & 0x0f); j++)
255 						data[i + j + 1] = db9_saturn_read_analog(port, type, powered);
256 			}
257 			db9_saturn_write_sub(port, type, 3, powered, 0);
258 			return 0x41;
259 		}
260 	case 0x0:
261 		/* 0000 : mouse */
262 		db9_saturn_write_sub(port, type, 2, powered, 0);
263 		udelay(DB9_SATURN_DELAY);
264 		tmp = db9_saturn_read_analog(port, type, powered);
265 		if (tmp == 0xff) {
266 			for (i = 0; i < 3; i++)
267 				data[i + 1] = db9_saturn_read_analog(port, type, powered);
268 			db9_saturn_write_sub(port, type, 3, powered, 0);
269 			return data[0] = 0xe3;
270 		}
271 	default:
272 		return data[0];
273 	}
274 }
275 
276 /*
277  * db9_saturn_report() analyzes packet and reports.
278  */
279 static int db9_saturn_report(unsigned char id, unsigned char data[60], struct input_dev *devs[], int n, int max_pads)
280 {
281 	struct input_dev *dev;
282 	int tmp, i, j;
283 
284 	tmp = (id == 0x41) ? 60 : 10;
285 	for (j = 0; j < tmp && n < max_pads; j += 10, n++) {
286 		dev = devs[n];
287 		switch (data[j]) {
288 		case 0x16: /* multi controller (analog 4 axis) */
289 			input_report_abs(dev, db9_abs[5], data[j + 6]);
290 		case 0x15: /* mission stick (analog 3 axis) */
291 			input_report_abs(dev, db9_abs[3], data[j + 4]);
292 			input_report_abs(dev, db9_abs[4], data[j + 5]);
293 		case 0x13: /* racing controller (analog 1 axis) */
294 			input_report_abs(dev, db9_abs[2], data[j + 3]);
295 		case 0x34: /* saturn keyboard (udlr ZXC ASD QE Esc) */
296 		case 0x02: /* digital pad (digital 2 axis + buttons) */
297 			input_report_abs(dev, db9_abs[0], !(data[j + 1] & 128) - !(data[j + 1] & 64));
298 			input_report_abs(dev, db9_abs[1], !(data[j + 1] & 32) - !(data[j + 1] & 16));
299 			for (i = 0; i < 9; i++)
300 				input_report_key(dev, db9_cd32_btn[i], ~data[j + db9_saturn_byte[i]] & db9_saturn_mask[i]);
301 			break;
302 		case 0x19: /* mission stick x2 (analog 6 axis + buttons) */
303 			input_report_abs(dev, db9_abs[0], !(data[j + 1] & 128) - !(data[j + 1] & 64));
304 			input_report_abs(dev, db9_abs[1], !(data[j + 1] & 32) - !(data[j + 1] & 16));
305 			for (i = 0; i < 9; i++)
306 				input_report_key(dev, db9_cd32_btn[i], ~data[j + db9_saturn_byte[i]] & db9_saturn_mask[i]);
307 			input_report_abs(dev, db9_abs[2], data[j + 3]);
308 			input_report_abs(dev, db9_abs[3], data[j + 4]);
309 			input_report_abs(dev, db9_abs[4], data[j + 5]);
310 			/*
311 			input_report_abs(dev, db9_abs[8], (data[j + 6] & 128 ? 0 : 1) - (data[j + 6] & 64 ? 0 : 1));
312 			input_report_abs(dev, db9_abs[9], (data[j + 6] & 32 ? 0 : 1) - (data[j + 6] & 16 ? 0 : 1));
313 			*/
314 			input_report_abs(dev, db9_abs[6], data[j + 7]);
315 			input_report_abs(dev, db9_abs[7], data[j + 8]);
316 			input_report_abs(dev, db9_abs[5], data[j + 9]);
317 			break;
318 		case 0xd3: /* sankyo ff (analog 1 axis + stop btn) */
319 			input_report_key(dev, BTN_A, data[j + 3] & 0x80);
320 			input_report_abs(dev, db9_abs[2], data[j + 3] & 0x7f);
321 			break;
322 		case 0xe3: /* shuttle mouse (analog 2 axis + buttons. signed value) */
323 			input_report_key(dev, BTN_START, data[j + 1] & 0x08);
324 			input_report_key(dev, BTN_A, data[j + 1] & 0x04);
325 			input_report_key(dev, BTN_C, data[j + 1] & 0x02);
326 			input_report_key(dev, BTN_B, data[j + 1] & 0x01);
327 			input_report_abs(dev, db9_abs[2], data[j + 2] ^ 0x80);
328 			input_report_abs(dev, db9_abs[3], (0xff-(data[j + 3] ^ 0x80))+1); /* */
329 			break;
330 		case 0xff:
331 		default: /* no pad */
332 			input_report_abs(dev, db9_abs[0], 0);
333 			input_report_abs(dev, db9_abs[1], 0);
334 			for (i = 0; i < 9; i++)
335 				input_report_key(dev, db9_cd32_btn[i], 0);
336 			break;
337 		}
338 	}
339 	return n;
340 }
341 
342 static int db9_saturn(int mode, struct parport *port, struct input_dev *devs[])
343 {
344 	unsigned char id, data[60];
345 	int type, n, max_pads;
346 	int tmp, i;
347 
348 	switch (mode) {
349 	case DB9_SATURN_PAD:
350 		type = 0;
351 		n = 1;
352 		break;
353 	case DB9_SATURN_DPP:
354 		type = 1;
355 		n = 1;
356 		break;
357 	case DB9_SATURN_DPP_2:
358 		type = 1;
359 		n = 2;
360 		break;
361 	default:
362 		return -1;
363 	}
364 	max_pads = min(db9_modes[mode].n_pads, DB9_MAX_DEVICES);
365 	for (tmp = 0, i = 0; i < n; i++) {
366 		id = db9_saturn_read_packet(port, data, type + i, 1);
367 		tmp = db9_saturn_report(id, data, devs, tmp, max_pads);
368 	}
369 	return 0;
370 }
371 
372 static void db9_timer(unsigned long private)
373 {
374 	struct db9 *db9 = (void *) private;
375 	struct parport *port = db9->pd->port;
376 	struct input_dev *dev = db9->dev[0];
377 	struct input_dev *dev2 = db9->dev[1];
378 	int data, i;
379 
380 	switch (db9->mode) {
381 		case DB9_MULTI_0802_2:
382 
383 			data = parport_read_data(port) >> 3;
384 
385 			input_report_abs(dev2, ABS_X, (data & DB9_RIGHT ? 0 : 1) - (data & DB9_LEFT ? 0 : 1));
386 			input_report_abs(dev2, ABS_Y, (data & DB9_DOWN  ? 0 : 1) - (data & DB9_UP   ? 0 : 1));
387 			input_report_key(dev2, BTN_TRIGGER, ~data & DB9_FIRE1);
388 
389 		case DB9_MULTI_0802:
390 
391 			data = parport_read_status(port) >> 3;
392 
393 			input_report_abs(dev, ABS_X, (data & DB9_RIGHT ? 0 : 1) - (data & DB9_LEFT ? 0 : 1));
394 			input_report_abs(dev, ABS_Y, (data & DB9_DOWN  ? 0 : 1) - (data & DB9_UP   ? 0 : 1));
395 			input_report_key(dev, BTN_TRIGGER, data & DB9_FIRE1);
396 			break;
397 
398 		case DB9_MULTI_STICK:
399 
400 			data = parport_read_data(port);
401 
402 			input_report_abs(dev, ABS_X, (data & DB9_RIGHT ? 0 : 1) - (data & DB9_LEFT ? 0 : 1));
403 			input_report_abs(dev, ABS_Y, (data & DB9_DOWN  ? 0 : 1) - (data & DB9_UP   ? 0 : 1));
404 			input_report_key(dev, BTN_TRIGGER, ~data & DB9_FIRE1);
405 			break;
406 
407 		case DB9_MULTI2_STICK:
408 
409 			data = parport_read_data(port);
410 
411 			input_report_abs(dev, ABS_X, (data & DB9_RIGHT ? 0 : 1) - (data & DB9_LEFT ? 0 : 1));
412 			input_report_abs(dev, ABS_Y, (data & DB9_DOWN  ? 0 : 1) - (data & DB9_UP   ? 0 : 1));
413 			input_report_key(dev, BTN_TRIGGER, ~data & DB9_FIRE1);
414 			input_report_key(dev, BTN_THUMB,   ~data & DB9_FIRE2);
415 			break;
416 
417 		case DB9_GENESIS_PAD:
418 
419 			parport_write_control(port, DB9_NOSELECT);
420 			data = parport_read_data(port);
421 
422 			input_report_abs(dev, ABS_X, (data & DB9_RIGHT ? 0 : 1) - (data & DB9_LEFT ? 0 : 1));
423 			input_report_abs(dev, ABS_Y, (data & DB9_DOWN  ? 0 : 1) - (data & DB9_UP   ? 0 : 1));
424 			input_report_key(dev, BTN_B, ~data & DB9_FIRE1);
425 			input_report_key(dev, BTN_C, ~data & DB9_FIRE2);
426 
427 			parport_write_control(port, DB9_NORMAL);
428 			data = parport_read_data(port);
429 
430 			input_report_key(dev, BTN_A,     ~data & DB9_FIRE1);
431 			input_report_key(dev, BTN_START, ~data & DB9_FIRE2);
432 			break;
433 
434 		case DB9_GENESIS5_PAD:
435 
436 			parport_write_control(port, DB9_NOSELECT);
437 			data = parport_read_data(port);
438 
439 			input_report_abs(dev, ABS_X, (data & DB9_RIGHT ? 0 : 1) - (data & DB9_LEFT ? 0 : 1));
440 			input_report_abs(dev, ABS_Y, (data & DB9_DOWN  ? 0 : 1) - (data & DB9_UP   ? 0 : 1));
441 			input_report_key(dev, BTN_B, ~data & DB9_FIRE1);
442 			input_report_key(dev, BTN_C, ~data & DB9_FIRE2);
443 
444 			parport_write_control(port, DB9_NORMAL);
445 			data = parport_read_data(port);
446 
447 			input_report_key(dev, BTN_A,     ~data & DB9_FIRE1);
448 			input_report_key(dev, BTN_X,     ~data & DB9_FIRE2);
449 			input_report_key(dev, BTN_Y,     ~data & DB9_LEFT);
450 			input_report_key(dev, BTN_START, ~data & DB9_RIGHT);
451 			break;
452 
453 		case DB9_GENESIS6_PAD:
454 
455 			parport_write_control(port, DB9_NOSELECT); /* 1 */
456 			udelay(DB9_GENESIS6_DELAY);
457 			data = parport_read_data(port);
458 
459 			input_report_abs(dev, ABS_X, (data & DB9_RIGHT ? 0 : 1) - (data & DB9_LEFT ? 0 : 1));
460 			input_report_abs(dev, ABS_Y, (data & DB9_DOWN  ? 0 : 1) - (data & DB9_UP   ? 0 : 1));
461 			input_report_key(dev, BTN_B, ~data & DB9_FIRE1);
462 			input_report_key(dev, BTN_C, ~data & DB9_FIRE2);
463 
464 			parport_write_control(port, DB9_NORMAL);
465 			udelay(DB9_GENESIS6_DELAY);
466 			data = parport_read_data(port);
467 
468 			input_report_key(dev, BTN_A, ~data & DB9_FIRE1);
469 			input_report_key(dev, BTN_START, ~data & DB9_FIRE2);
470 
471 			parport_write_control(port, DB9_NOSELECT); /* 2 */
472 			udelay(DB9_GENESIS6_DELAY);
473 			parport_write_control(port, DB9_NORMAL);
474 			udelay(DB9_GENESIS6_DELAY);
475 			parport_write_control(port, DB9_NOSELECT); /* 3 */
476 			udelay(DB9_GENESIS6_DELAY);
477 			data=parport_read_data(port);
478 
479 			input_report_key(dev, BTN_X,    ~data & DB9_LEFT);
480 			input_report_key(dev, BTN_Y,    ~data & DB9_DOWN);
481 			input_report_key(dev, BTN_Z,    ~data & DB9_UP);
482 			input_report_key(dev, BTN_MODE, ~data & DB9_RIGHT);
483 
484 			parport_write_control(port, DB9_NORMAL);
485 			udelay(DB9_GENESIS6_DELAY);
486 			parport_write_control(port, DB9_NOSELECT); /* 4 */
487 			udelay(DB9_GENESIS6_DELAY);
488 			parport_write_control(port, DB9_NORMAL);
489 			break;
490 
491 		case DB9_SATURN_PAD:
492 		case DB9_SATURN_DPP:
493 		case DB9_SATURN_DPP_2:
494 
495 			db9_saturn(db9->mode, port, db9->dev);
496 			break;
497 
498 		case DB9_CD32_PAD:
499 
500 			data = parport_read_data(port);
501 
502 			input_report_abs(dev, ABS_X, (data & DB9_RIGHT ? 0 : 1) - (data & DB9_LEFT ? 0 : 1));
503 			input_report_abs(dev, ABS_Y, (data & DB9_DOWN  ? 0 : 1) - (data & DB9_UP   ? 0 : 1));
504 
505 			parport_write_control(port, 0x0a);
506 
507 			for (i = 0; i < 7; i++) {
508 				data = parport_read_data(port);
509 				parport_write_control(port, 0x02);
510 				parport_write_control(port, 0x0a);
511 				input_report_key(dev, db9_cd32_btn[i], ~data & DB9_FIRE2);
512 			}
513 
514 			parport_write_control(port, 0x00);
515 			break;
516 		}
517 
518 	input_sync(dev);
519 
520 	mod_timer(&db9->timer, jiffies + DB9_REFRESH_TIME);
521 }
522 
523 static int db9_open(struct input_dev *dev)
524 {
525 	struct db9 *db9 = dev->private;
526 	struct parport *port = db9->pd->port;
527 	int err;
528 
529 	err = mutex_lock_interruptible(&db9->mutex);
530 	if (err)
531 		return err;
532 
533 	if (!db9->used++) {
534 		parport_claim(db9->pd);
535 		parport_write_data(port, 0xff);
536 		if (db9_modes[db9->mode].reverse) {
537 			parport_data_reverse(port);
538 			parport_write_control(port, DB9_NORMAL);
539 		}
540 		mod_timer(&db9->timer, jiffies + DB9_REFRESH_TIME);
541 	}
542 
543 	mutex_unlock(&db9->mutex);
544 	return 0;
545 }
546 
547 static void db9_close(struct input_dev *dev)
548 {
549 	struct db9 *db9 = dev->private;
550 	struct parport *port = db9->pd->port;
551 
552 	mutex_lock(&db9->mutex);
553 	if (!--db9->used) {
554 		del_timer_sync(&db9->timer);
555 		parport_write_control(port, 0x00);
556 		parport_data_forward(port);
557 		parport_release(db9->pd);
558 	}
559 	mutex_unlock(&db9->mutex);
560 }
561 
562 static struct db9 __init *db9_probe(int parport, int mode)
563 {
564 	struct db9 *db9;
565 	const struct db9_mode_data *db9_mode;
566 	struct parport *pp;
567 	struct pardevice *pd;
568 	struct input_dev *input_dev;
569 	int i, j;
570 	int err;
571 
572 	if (mode < 1 || mode >= DB9_MAX_PAD || !db9_modes[mode].n_buttons) {
573 		printk(KERN_ERR "db9.c: Bad device type %d\n", mode);
574 		err = -EINVAL;
575 		goto err_out;
576 	}
577 
578 	db9_mode = &db9_modes[mode];
579 
580 	pp = parport_find_number(parport);
581 	if (!pp) {
582 		printk(KERN_ERR "db9.c: no such parport\n");
583 		err = -ENODEV;
584 		goto err_out;
585 	}
586 
587 	if (db9_mode->bidirectional && !(pp->modes & PARPORT_MODE_TRISTATE)) {
588 		printk(KERN_ERR "db9.c: specified parport is not bidirectional\n");
589 		err = -EINVAL;
590 		goto err_put_pp;
591 	}
592 
593 	pd = parport_register_device(pp, "db9", NULL, NULL, NULL, PARPORT_DEV_EXCL, NULL);
594 	if (!pd) {
595 		printk(KERN_ERR "db9.c: parport busy already - lp.o loaded?\n");
596 		err = -EBUSY;
597 		goto err_put_pp;
598 	}
599 
600 	db9 = kzalloc(sizeof(struct db9), GFP_KERNEL);
601 	if (!db9) {
602 		printk(KERN_ERR "db9.c: Not enough memory\n");
603 		err = -ENOMEM;
604 		goto err_unreg_pardev;
605 	}
606 
607 	mutex_init(&db9->mutex);
608 	db9->pd = pd;
609 	db9->mode = mode;
610 	init_timer(&db9->timer);
611 	db9->timer.data = (long) db9;
612 	db9->timer.function = db9_timer;
613 
614 	for (i = 0; i < (min(db9_mode->n_pads, DB9_MAX_DEVICES)); i++) {
615 
616 		db9->dev[i] = input_dev = input_allocate_device();
617 		if (!input_dev) {
618 			printk(KERN_ERR "db9.c: Not enough memory for input device\n");
619 			err = -ENOMEM;
620 			goto err_unreg_devs;
621 		}
622 
623 		snprintf(db9->phys[i], sizeof(db9->phys[i]),
624 			 "%s/input%d", db9->pd->port->name, i);
625 
626 		input_dev->name = db9_mode->name;
627 		input_dev->phys = db9->phys[i];
628 		input_dev->id.bustype = BUS_PARPORT;
629 		input_dev->id.vendor = 0x0002;
630 		input_dev->id.product = mode;
631 		input_dev->id.version = 0x0100;
632 		input_dev->private = db9;
633 
634 		input_dev->open = db9_open;
635 		input_dev->close = db9_close;
636 
637 		input_dev->evbit[0] = BIT(EV_KEY) | BIT(EV_ABS);
638 		for (j = 0; j < db9_mode->n_buttons; j++)
639 			set_bit(db9_mode->buttons[j], input_dev->keybit);
640 		for (j = 0; j < db9_mode->n_axis; j++) {
641 			if (j < 2)
642 				input_set_abs_params(input_dev, db9_abs[j], -1, 1, 0, 0);
643 			else
644 				input_set_abs_params(input_dev, db9_abs[j], 1, 255, 0, 0);
645 		}
646 
647 		err = input_register_device(input_dev);
648 		if (err)
649 			goto err_free_dev;
650 	}
651 
652 	parport_put_port(pp);
653 	return db9;
654 
655  err_free_dev:
656 	input_free_device(db9->dev[i]);
657  err_unreg_devs:
658 	while (--i >= 0)
659 		input_unregister_device(db9->dev[i]);
660 	kfree(db9);
661  err_unreg_pardev:
662 	parport_unregister_device(pd);
663  err_put_pp:
664 	parport_put_port(pp);
665  err_out:
666 	return ERR_PTR(err);
667 }
668 
669 static void db9_remove(struct db9 *db9)
670 {
671 	int i;
672 
673 	for (i = 0; i < min(db9_modes[db9->mode].n_pads, DB9_MAX_DEVICES); i++)
674 		input_unregister_device(db9->dev[i]);
675 	parport_unregister_device(db9->pd);
676 	kfree(db9);
677 }
678 
679 static int __init db9_init(void)
680 {
681 	int i;
682 	int have_dev = 0;
683 	int err = 0;
684 
685 	for (i = 0; i < DB9_MAX_PORTS; i++) {
686 		if (db9[i].nargs == 0 || db9[i].args[DB9_ARG_PARPORT] < 0)
687 			continue;
688 
689 		if (db9[i].nargs < 2) {
690 			printk(KERN_ERR "db9.c: Device type must be specified.\n");
691 			err = -EINVAL;
692 			break;
693 		}
694 
695 		db9_base[i] = db9_probe(db9[i].args[DB9_ARG_PARPORT],
696 					db9[i].args[DB9_ARG_MODE]);
697 		if (IS_ERR(db9_base[i])) {
698 			err = PTR_ERR(db9_base[i]);
699 			break;
700 		}
701 
702 		have_dev = 1;
703 	}
704 
705 	if (err) {
706 		while (--i >= 0)
707 			if (db9_base[i])
708 				db9_remove(db9_base[i]);
709 		return err;
710 	}
711 
712 	return have_dev ? 0 : -ENODEV;
713 }
714 
715 static void __exit db9_exit(void)
716 {
717 	int i;
718 
719 	for (i = 0; i < DB9_MAX_PORTS; i++)
720 		if (db9_base[i])
721 			db9_remove(db9_base[i]);
722 }
723 
724 module_init(db9_init);
725 module_exit(db9_exit);
726