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