Linux Audio

Check our new training course

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