Root/
1 | /* |
2 | * Driver for Midiman Portman2x4 parallel port midi interface |
3 | * |
4 | * Copyright (c) by Levent Guendogdu <levon@feature-it.com> |
5 | * |
6 | * This program is free software; you can redistribute it and/or modify |
7 | * it under the terms of the GNU General Public License as published by |
8 | * the Free Software Foundation; either version 2 of the License, or |
9 | * (at your option) any later version. |
10 | * |
11 | * This program is distributed in the hope that it will be useful, |
12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
14 | * GNU General Public License for more details. |
15 | * |
16 | * You should have received a copy of the GNU General Public License |
17 | * along with this program; if not, write to the Free Software |
18 | * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
19 | * |
20 | * ChangeLog |
21 | * Jan 24 2007 Matthias Koenig <mkoenig@suse.de> |
22 | * - cleanup and rewrite |
23 | * Sep 30 2004 Tobias Gehrig <tobias@gehrig.tk> |
24 | * - source code cleanup |
25 | * Sep 03 2004 Tobias Gehrig <tobias@gehrig.tk> |
26 | * - fixed compilation problem with alsa 1.0.6a (removed MODULE_CLASSES, |
27 | * MODULE_PARM_SYNTAX and changed MODULE_DEVICES to |
28 | * MODULE_SUPPORTED_DEVICE) |
29 | * Mar 24 2004 Tobias Gehrig <tobias@gehrig.tk> |
30 | * - added 2.6 kernel support |
31 | * Mar 18 2004 Tobias Gehrig <tobias@gehrig.tk> |
32 | * - added parport_unregister_driver to the startup routine if the driver fails to detect a portman |
33 | * - added support for all 4 output ports in portman_putmidi |
34 | * Mar 17 2004 Tobias Gehrig <tobias@gehrig.tk> |
35 | * - added checks for opened input device in interrupt handler |
36 | * Feb 20 2004 Tobias Gehrig <tobias@gehrig.tk> |
37 | * - ported from alsa 0.5 to 1.0 |
38 | */ |
39 | |
40 | #include <linux/init.h> |
41 | #include <linux/platform_device.h> |
42 | #include <linux/parport.h> |
43 | #include <linux/spinlock.h> |
44 | #include <linux/delay.h> |
45 | #include <sound/core.h> |
46 | #include <sound/initval.h> |
47 | #include <sound/rawmidi.h> |
48 | #include <sound/control.h> |
49 | |
50 | #define CARD_NAME "Portman 2x4" |
51 | #define DRIVER_NAME "portman" |
52 | #define PLATFORM_DRIVER "snd_portman2x4" |
53 | |
54 | static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; |
55 | static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; |
56 | static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP; |
57 | |
58 | static struct platform_device *platform_devices[SNDRV_CARDS]; |
59 | static int device_count; |
60 | |
61 | module_param_array(index, int, NULL, S_IRUGO); |
62 | MODULE_PARM_DESC(index, "Index value for " CARD_NAME " soundcard."); |
63 | module_param_array(id, charp, NULL, S_IRUGO); |
64 | MODULE_PARM_DESC(id, "ID string for " CARD_NAME " soundcard."); |
65 | module_param_array(enable, bool, NULL, S_IRUGO); |
66 | MODULE_PARM_DESC(enable, "Enable " CARD_NAME " soundcard."); |
67 | |
68 | MODULE_AUTHOR("Levent Guendogdu, Tobias Gehrig, Matthias Koenig"); |
69 | MODULE_DESCRIPTION("Midiman Portman2x4"); |
70 | MODULE_LICENSE("GPL"); |
71 | MODULE_SUPPORTED_DEVICE("{{Midiman,Portman2x4}}"); |
72 | |
73 | /********************************************************************* |
74 | * Chip specific |
75 | *********************************************************************/ |
76 | #define PORTMAN_NUM_INPUT_PORTS 2 |
77 | #define PORTMAN_NUM_OUTPUT_PORTS 4 |
78 | |
79 | struct portman { |
80 | spinlock_t reg_lock; |
81 | struct snd_card *card; |
82 | struct snd_rawmidi *rmidi; |
83 | struct pardevice *pardev; |
84 | int pardev_claimed; |
85 | |
86 | int open_count; |
87 | int mode[PORTMAN_NUM_INPUT_PORTS]; |
88 | struct snd_rawmidi_substream *midi_input[PORTMAN_NUM_INPUT_PORTS]; |
89 | }; |
90 | |
91 | static int portman_free(struct portman *pm) |
92 | { |
93 | kfree(pm); |
94 | return 0; |
95 | } |
96 | |
97 | static int __devinit portman_create(struct snd_card *card, |
98 | struct pardevice *pardev, |
99 | struct portman **rchip) |
100 | { |
101 | struct portman *pm; |
102 | |
103 | *rchip = NULL; |
104 | |
105 | pm = kzalloc(sizeof(struct portman), GFP_KERNEL); |
106 | if (pm == NULL) |
107 | return -ENOMEM; |
108 | |
109 | /* Init chip specific data */ |
110 | spin_lock_init(&pm->reg_lock); |
111 | pm->card = card; |
112 | pm->pardev = pardev; |
113 | |
114 | *rchip = pm; |
115 | |
116 | return 0; |
117 | } |
118 | |
119 | /********************************************************************* |
120 | * HW related constants |
121 | *********************************************************************/ |
122 | |
123 | /* Standard PC parallel port status register equates. */ |
124 | #define PP_STAT_BSY 0x80 /* Busy status. Inverted. */ |
125 | #define PP_STAT_ACK 0x40 /* Acknowledge. Non-Inverted. */ |
126 | #define PP_STAT_POUT 0x20 /* Paper Out. Non-Inverted. */ |
127 | #define PP_STAT_SEL 0x10 /* Select. Non-Inverted. */ |
128 | #define PP_STAT_ERR 0x08 /* Error. Non-Inverted. */ |
129 | |
130 | /* Standard PC parallel port command register equates. */ |
131 | #define PP_CMD_IEN 0x10 /* IRQ Enable. Non-Inverted. */ |
132 | #define PP_CMD_SELI 0x08 /* Select Input. Inverted. */ |
133 | #define PP_CMD_INIT 0x04 /* Init Printer. Non-Inverted. */ |
134 | #define PP_CMD_FEED 0x02 /* Auto Feed. Inverted. */ |
135 | #define PP_CMD_STB 0x01 /* Strobe. Inverted. */ |
136 | |
137 | /* Parallel Port Command Register as implemented by PCP2x4. */ |
138 | #define INT_EN PP_CMD_IEN /* Interrupt enable. */ |
139 | #define STROBE PP_CMD_STB /* Command strobe. */ |
140 | |
141 | /* The parallel port command register field (b1..b3) selects the |
142 | * various "registers" within the PC/P 2x4. These are the internal |
143 | * address of these "registers" that must be written to the parallel |
144 | * port command register. |
145 | */ |
146 | #define RXDATA0 (0 << 1) /* PCP RxData channel 0. */ |
147 | #define RXDATA1 (1 << 1) /* PCP RxData channel 1. */ |
148 | #define GEN_CTL (2 << 1) /* PCP General Control Register. */ |
149 | #define SYNC_CTL (3 << 1) /* PCP Sync Control Register. */ |
150 | #define TXDATA0 (4 << 1) /* PCP TxData channel 0. */ |
151 | #define TXDATA1 (5 << 1) /* PCP TxData channel 1. */ |
152 | #define TXDATA2 (6 << 1) /* PCP TxData channel 2. */ |
153 | #define TXDATA3 (7 << 1) /* PCP TxData channel 3. */ |
154 | |
155 | /* Parallel Port Status Register as implemented by PCP2x4. */ |
156 | #define ESTB PP_STAT_POUT /* Echoed strobe. */ |
157 | #define INT_REQ PP_STAT_ACK /* Input data int request. */ |
158 | #define BUSY PP_STAT_ERR /* Interface Busy. */ |
159 | |
160 | /* Parallel Port Status Register BUSY and SELECT lines are multiplexed |
161 | * between several functions. Depending on which 2x4 "register" is |
162 | * currently selected (b1..b3), the BUSY and SELECT lines are |
163 | * assigned as follows: |
164 | * |
165 | * SELECT LINE: A3 A2 A1 |
166 | * -------- |
167 | */ |
168 | #define RXAVAIL PP_STAT_SEL /* Rx Available, channel 0. 0 0 0 */ |
169 | // RXAVAIL1 PP_STAT_SEL /* Rx Available, channel 1. 0 0 1 */ |
170 | #define SYNC_STAT PP_STAT_SEL /* Reserved - Sync Status. 0 1 0 */ |
171 | // /* Reserved. 0 1 1 */ |
172 | #define TXEMPTY PP_STAT_SEL /* Tx Empty, channel 0. 1 0 0 */ |
173 | // TXEMPTY1 PP_STAT_SEL /* Tx Empty, channel 1. 1 0 1 */ |
174 | // TXEMPTY2 PP_STAT_SEL /* Tx Empty, channel 2. 1 1 0 */ |
175 | // TXEMPTY3 PP_STAT_SEL /* Tx Empty, channel 3. 1 1 1 */ |
176 | |
177 | /* BUSY LINE: A3 A2 A1 |
178 | * -------- |
179 | */ |
180 | #define RXDATA PP_STAT_BSY /* Rx Input Data, channel 0. 0 0 0 */ |
181 | // RXDATA1 PP_STAT_BSY /* Rx Input Data, channel 1. 0 0 1 */ |
182 | #define SYNC_DATA PP_STAT_BSY /* Reserved - Sync Data. 0 1 0 */ |
183 | /* Reserved. 0 1 1 */ |
184 | #define DATA_ECHO PP_STAT_BSY /* Parallel Port Data Echo. 1 0 0 */ |
185 | #define A0_ECHO PP_STAT_BSY /* Address 0 Echo. 1 0 1 */ |
186 | #define A1_ECHO PP_STAT_BSY /* Address 1 Echo. 1 1 0 */ |
187 | #define A2_ECHO PP_STAT_BSY /* Address 2 Echo. 1 1 1 */ |
188 | |
189 | #define PORTMAN2X4_MODE_INPUT_TRIGGERED 0x01 |
190 | |
191 | /********************************************************************* |
192 | * Hardware specific functions |
193 | *********************************************************************/ |
194 | static inline void portman_write_command(struct portman *pm, u8 value) |
195 | { |
196 | parport_write_control(pm->pardev->port, value); |
197 | } |
198 | |
199 | static inline u8 portman_read_command(struct portman *pm) |
200 | { |
201 | return parport_read_control(pm->pardev->port); |
202 | } |
203 | |
204 | static inline u8 portman_read_status(struct portman *pm) |
205 | { |
206 | return parport_read_status(pm->pardev->port); |
207 | } |
208 | |
209 | static inline u8 portman_read_data(struct portman *pm) |
210 | { |
211 | return parport_read_data(pm->pardev->port); |
212 | } |
213 | |
214 | static inline void portman_write_data(struct portman *pm, u8 value) |
215 | { |
216 | parport_write_data(pm->pardev->port, value); |
217 | } |
218 | |
219 | static void portman_write_midi(struct portman *pm, |
220 | int port, u8 mididata) |
221 | { |
222 | int command = ((port + 4) << 1); |
223 | |
224 | /* Get entering data byte and port number in BL and BH respectively. |
225 | * Set up Tx Channel address field for use with PP Cmd Register. |
226 | * Store address field in BH register. |
227 | * Inputs: AH = Output port number (0..3). |
228 | * AL = Data byte. |
229 | * command = TXDATA0 | INT_EN; |
230 | * Align port num with address field (b1...b3), |
231 | * set address for TXDatax, Strobe=0 |
232 | */ |
233 | command |= INT_EN; |
234 | |
235 | /* Disable interrupts so that the process is not interrupted, then |
236 | * write the address associated with the current Tx channel to the |
237 | * PP Command Reg. Do not set the Strobe signal yet. |
238 | */ |
239 | |
240 | do { |
241 | portman_write_command(pm, command); |
242 | |
243 | /* While the address lines settle, write parallel output data to |
244 | * PP Data Reg. This has no effect until Strobe signal is asserted. |
245 | */ |
246 | |
247 | portman_write_data(pm, mididata); |
248 | |
249 | /* If PCP channel's TxEmpty is set (TxEmpty is read through the PP |
250 | * Status Register), then go write data. Else go back and wait. |
251 | */ |
252 | } while ((portman_read_status(pm) & TXEMPTY) != TXEMPTY); |
253 | |
254 | /* TxEmpty is set. Maintain PC/P destination address and assert |
255 | * Strobe through the PP Command Reg. This will Strobe data into |
256 | * the PC/P transmitter and set the PC/P BUSY signal. |
257 | */ |
258 | |
259 | portman_write_command(pm, command | STROBE); |
260 | |
261 | /* Wait for strobe line to settle and echo back through hardware. |
262 | * Once it has echoed back, assume that the address and data lines |
263 | * have settled! |
264 | */ |
265 | |
266 | while ((portman_read_status(pm) & ESTB) == 0) |
267 | cpu_relax(); |
268 | |
269 | /* Release strobe and immediately re-allow interrupts. */ |
270 | portman_write_command(pm, command); |
271 | |
272 | while ((portman_read_status(pm) & ESTB) == ESTB) |
273 | cpu_relax(); |
274 | |
275 | /* PC/P BUSY is now set. We must wait until BUSY resets itself. |
276 | * We'll reenable ints while we're waiting. |
277 | */ |
278 | |
279 | while ((portman_read_status(pm) & BUSY) == BUSY) |
280 | cpu_relax(); |
281 | |
282 | /* Data sent. */ |
283 | } |
284 | |
285 | |
286 | /* |
287 | * Read MIDI byte from port |
288 | * Attempt to read input byte from specified hardware input port (0..). |
289 | * Return -1 if no data |
290 | */ |
291 | static int portman_read_midi(struct portman *pm, int port) |
292 | { |
293 | unsigned char midi_data = 0; |
294 | unsigned char cmdout; /* Saved address+IE bit. */ |
295 | |
296 | /* Make sure clocking edge is down before starting... */ |
297 | portman_write_data(pm, 0); /* Make sure edge is down. */ |
298 | |
299 | /* Set destination address to PCP. */ |
300 | cmdout = (port << 1) | INT_EN; /* Address + IE + No Strobe. */ |
301 | portman_write_command(pm, cmdout); |
302 | |
303 | while ((portman_read_status(pm) & ESTB) == ESTB) |
304 | cpu_relax(); /* Wait for strobe echo. */ |
305 | |
306 | /* After the address lines settle, check multiplexed RxAvail signal. |
307 | * If data is available, read it. |
308 | */ |
309 | if ((portman_read_status(pm) & RXAVAIL) == 0) |
310 | return -1; /* No data. */ |
311 | |
312 | /* Set the Strobe signal to enable the Rx clocking circuitry. */ |
313 | portman_write_command(pm, cmdout | STROBE); /* Write address+IE+Strobe. */ |
314 | |
315 | while ((portman_read_status(pm) & ESTB) == 0) |
316 | cpu_relax(); /* Wait for strobe echo. */ |
317 | |
318 | /* The first data bit (msb) is already sitting on the input line. */ |
319 | midi_data = (portman_read_status(pm) & 128); |
320 | portman_write_data(pm, 1); /* Cause rising edge, which shifts data. */ |
321 | |
322 | /* Data bit 6. */ |
323 | portman_write_data(pm, 0); /* Cause falling edge while data settles. */ |
324 | midi_data |= (portman_read_status(pm) >> 1) & 64; |
325 | portman_write_data(pm, 1); /* Cause rising edge, which shifts data. */ |
326 | |
327 | /* Data bit 5. */ |
328 | portman_write_data(pm, 0); /* Cause falling edge while data settles. */ |
329 | midi_data |= (portman_read_status(pm) >> 2) & 32; |
330 | portman_write_data(pm, 1); /* Cause rising edge, which shifts data. */ |
331 | |
332 | /* Data bit 4. */ |
333 | portman_write_data(pm, 0); /* Cause falling edge while data settles. */ |
334 | midi_data |= (portman_read_status(pm) >> 3) & 16; |
335 | portman_write_data(pm, 1); /* Cause rising edge, which shifts data. */ |
336 | |
337 | /* Data bit 3. */ |
338 | portman_write_data(pm, 0); /* Cause falling edge while data settles. */ |
339 | midi_data |= (portman_read_status(pm) >> 4) & 8; |
340 | portman_write_data(pm, 1); /* Cause rising edge, which shifts data. */ |
341 | |
342 | /* Data bit 2. */ |
343 | portman_write_data(pm, 0); /* Cause falling edge while data settles. */ |
344 | midi_data |= (portman_read_status(pm) >> 5) & 4; |
345 | portman_write_data(pm, 1); /* Cause rising edge, which shifts data. */ |
346 | |
347 | /* Data bit 1. */ |
348 | portman_write_data(pm, 0); /* Cause falling edge while data settles. */ |
349 | midi_data |= (portman_read_status(pm) >> 6) & 2; |
350 | portman_write_data(pm, 1); /* Cause rising edge, which shifts data. */ |
351 | |
352 | /* Data bit 0. */ |
353 | portman_write_data(pm, 0); /* Cause falling edge while data settles. */ |
354 | midi_data |= (portman_read_status(pm) >> 7) & 1; |
355 | portman_write_data(pm, 1); /* Cause rising edge, which shifts data. */ |
356 | portman_write_data(pm, 0); /* Return data clock low. */ |
357 | |
358 | |
359 | /* De-assert Strobe and return data. */ |
360 | portman_write_command(pm, cmdout); /* Output saved address+IE. */ |
361 | |
362 | /* Wait for strobe echo. */ |
363 | while ((portman_read_status(pm) & ESTB) == ESTB) |
364 | cpu_relax(); |
365 | |
366 | return (midi_data & 255); /* Shift back and return value. */ |
367 | } |
368 | |
369 | /* |
370 | * Checks if any input data on the given channel is available |
371 | * Checks RxAvail |
372 | */ |
373 | static int portman_data_avail(struct portman *pm, int channel) |
374 | { |
375 | int command = INT_EN; |
376 | switch (channel) { |
377 | case 0: |
378 | command |= RXDATA0; |
379 | break; |
380 | case 1: |
381 | command |= RXDATA1; |
382 | break; |
383 | } |
384 | /* Write hardware (assumme STROBE=0) */ |
385 | portman_write_command(pm, command); |
386 | /* Check multiplexed RxAvail signal */ |
387 | if ((portman_read_status(pm) & RXAVAIL) == RXAVAIL) |
388 | return 1; /* Data available */ |
389 | |
390 | /* No Data available */ |
391 | return 0; |
392 | } |
393 | |
394 | |
395 | /* |
396 | * Flushes any input |
397 | */ |
398 | static void portman_flush_input(struct portman *pm, unsigned char port) |
399 | { |
400 | /* Local variable for counting things */ |
401 | unsigned int i = 0; |
402 | unsigned char command = 0; |
403 | |
404 | switch (port) { |
405 | case 0: |
406 | command = RXDATA0; |
407 | break; |
408 | case 1: |
409 | command = RXDATA1; |
410 | break; |
411 | default: |
412 | snd_printk(KERN_WARNING |
413 | "portman_flush_input() Won't flush port %i\n", |
414 | port); |
415 | return; |
416 | } |
417 | |
418 | /* Set address for specified channel in port and allow to settle. */ |
419 | portman_write_command(pm, command); |
420 | |
421 | /* Assert the Strobe and wait for echo back. */ |
422 | portman_write_command(pm, command | STROBE); |
423 | |
424 | /* Wait for ESTB */ |
425 | while ((portman_read_status(pm) & ESTB) == 0) |
426 | cpu_relax(); |
427 | |
428 | /* Output clock cycles to the Rx circuitry. */ |
429 | portman_write_data(pm, 0); |
430 | |
431 | /* Flush 250 bits... */ |
432 | for (i = 0; i < 250; i++) { |
433 | portman_write_data(pm, 1); |
434 | portman_write_data(pm, 0); |
435 | } |
436 | |
437 | /* Deassert the Strobe signal of the port and wait for it to settle. */ |
438 | portman_write_command(pm, command | INT_EN); |
439 | |
440 | /* Wait for settling */ |
441 | while ((portman_read_status(pm) & ESTB) == ESTB) |
442 | cpu_relax(); |
443 | } |
444 | |
445 | static int portman_probe(struct parport *p) |
446 | { |
447 | /* Initialize the parallel port data register. Will set Rx clocks |
448 | * low in case we happen to be addressing the Rx ports at this time. |
449 | */ |
450 | /* 1 */ |
451 | parport_write_data(p, 0); |
452 | |
453 | /* Initialize the parallel port command register, thus initializing |
454 | * hardware handshake lines to midi box: |
455 | * |
456 | * Strobe = 0 |
457 | * Interrupt Enable = 0 |
458 | */ |
459 | /* 2 */ |
460 | parport_write_control(p, 0); |
461 | |
462 | /* Check if Portman PC/P 2x4 is out there. */ |
463 | /* 3 */ |
464 | parport_write_control(p, RXDATA0); /* Write Strobe=0 to command reg. */ |
465 | |
466 | /* Check for ESTB to be clear */ |
467 | /* 4 */ |
468 | if ((parport_read_status(p) & ESTB) == ESTB) |
469 | return 1; /* CODE 1 - Strobe Failure. */ |
470 | |
471 | /* Set for RXDATA0 where no damage will be done. */ |
472 | /* 5 */ |
473 | parport_write_control(p, RXDATA0 + STROBE); /* Write Strobe=1 to command reg. */ |
474 | |
475 | /* 6 */ |
476 | if ((parport_read_status(p) & ESTB) != ESTB) |
477 | return 1; /* CODE 1 - Strobe Failure. */ |
478 | |
479 | /* 7 */ |
480 | parport_write_control(p, 0); /* Reset Strobe=0. */ |
481 | |
482 | /* Check if Tx circuitry is functioning properly. If initialized |
483 | * unit TxEmpty is false, send out char and see if if goes true. |
484 | */ |
485 | /* 8 */ |
486 | parport_write_control(p, TXDATA0); /* Tx channel 0, strobe off. */ |
487 | |
488 | /* If PCP channel's TxEmpty is set (TxEmpty is read through the PP |
489 | * Status Register), then go write data. Else go back and wait. |
490 | */ |
491 | /* 9 */ |
492 | if ((parport_read_status(p) & TXEMPTY) == 0) |
493 | return 2; |
494 | |
495 | /* Return OK status. */ |
496 | return 0; |
497 | } |
498 | |
499 | static int portman_device_init(struct portman *pm) |
500 | { |
501 | portman_flush_input(pm, 0); |
502 | portman_flush_input(pm, 1); |
503 | |
504 | return 0; |
505 | } |
506 | |
507 | /********************************************************************* |
508 | * Rawmidi |
509 | *********************************************************************/ |
510 | static int snd_portman_midi_open(struct snd_rawmidi_substream *substream) |
511 | { |
512 | return 0; |
513 | } |
514 | |
515 | static int snd_portman_midi_close(struct snd_rawmidi_substream *substream) |
516 | { |
517 | return 0; |
518 | } |
519 | |
520 | static void snd_portman_midi_input_trigger(struct snd_rawmidi_substream *substream, |
521 | int up) |
522 | { |
523 | struct portman *pm = substream->rmidi->private_data; |
524 | unsigned long flags; |
525 | |
526 | spin_lock_irqsave(&pm->reg_lock, flags); |
527 | if (up) |
528 | pm->mode[substream->number] |= PORTMAN2X4_MODE_INPUT_TRIGGERED; |
529 | else |
530 | pm->mode[substream->number] &= ~PORTMAN2X4_MODE_INPUT_TRIGGERED; |
531 | spin_unlock_irqrestore(&pm->reg_lock, flags); |
532 | } |
533 | |
534 | static void snd_portman_midi_output_trigger(struct snd_rawmidi_substream *substream, |
535 | int up) |
536 | { |
537 | struct portman *pm = substream->rmidi->private_data; |
538 | unsigned long flags; |
539 | unsigned char byte; |
540 | |
541 | spin_lock_irqsave(&pm->reg_lock, flags); |
542 | if (up) { |
543 | while ((snd_rawmidi_transmit(substream, &byte, 1) == 1)) |
544 | portman_write_midi(pm, substream->number, byte); |
545 | } |
546 | spin_unlock_irqrestore(&pm->reg_lock, flags); |
547 | } |
548 | |
549 | static struct snd_rawmidi_ops snd_portman_midi_output = { |
550 | .open = snd_portman_midi_open, |
551 | .close = snd_portman_midi_close, |
552 | .trigger = snd_portman_midi_output_trigger, |
553 | }; |
554 | |
555 | static struct snd_rawmidi_ops snd_portman_midi_input = { |
556 | .open = snd_portman_midi_open, |
557 | .close = snd_portman_midi_close, |
558 | .trigger = snd_portman_midi_input_trigger, |
559 | }; |
560 | |
561 | /* Create and initialize the rawmidi component */ |
562 | static int __devinit snd_portman_rawmidi_create(struct snd_card *card) |
563 | { |
564 | struct portman *pm = card->private_data; |
565 | struct snd_rawmidi *rmidi; |
566 | struct snd_rawmidi_substream *substream; |
567 | int err; |
568 | |
569 | err = snd_rawmidi_new(card, CARD_NAME, 0, |
570 | PORTMAN_NUM_OUTPUT_PORTS, |
571 | PORTMAN_NUM_INPUT_PORTS, |
572 | &rmidi); |
573 | if (err < 0) |
574 | return err; |
575 | |
576 | rmidi->private_data = pm; |
577 | strcpy(rmidi->name, CARD_NAME); |
578 | rmidi->info_flags = SNDRV_RAWMIDI_INFO_OUTPUT | |
579 | SNDRV_RAWMIDI_INFO_INPUT | |
580 | SNDRV_RAWMIDI_INFO_DUPLEX; |
581 | |
582 | pm->rmidi = rmidi; |
583 | |
584 | /* register rawmidi ops */ |
585 | snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_OUTPUT, |
586 | &snd_portman_midi_output); |
587 | snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_INPUT, |
588 | &snd_portman_midi_input); |
589 | |
590 | /* name substreams */ |
591 | /* output */ |
592 | list_for_each_entry(substream, |
593 | &rmidi->streams[SNDRV_RAWMIDI_STREAM_OUTPUT].substreams, |
594 | list) { |
595 | sprintf(substream->name, |
596 | "Portman2x4 %d", substream->number+1); |
597 | } |
598 | /* input */ |
599 | list_for_each_entry(substream, |
600 | &rmidi->streams[SNDRV_RAWMIDI_STREAM_INPUT].substreams, |
601 | list) { |
602 | pm->midi_input[substream->number] = substream; |
603 | sprintf(substream->name, |
604 | "Portman2x4 %d", substream->number+1); |
605 | } |
606 | |
607 | return err; |
608 | } |
609 | |
610 | /********************************************************************* |
611 | * parport stuff |
612 | *********************************************************************/ |
613 | static void snd_portman_interrupt(void *userdata) |
614 | { |
615 | unsigned char midivalue = 0; |
616 | struct portman *pm = ((struct snd_card*)userdata)->private_data; |
617 | |
618 | spin_lock(&pm->reg_lock); |
619 | |
620 | /* While any input data is waiting */ |
621 | while ((portman_read_status(pm) & INT_REQ) == INT_REQ) { |
622 | /* If data available on channel 0, |
623 | read it and stuff it into the queue. */ |
624 | if (portman_data_avail(pm, 0)) { |
625 | /* Read Midi */ |
626 | midivalue = portman_read_midi(pm, 0); |
627 | /* put midi into queue... */ |
628 | if (pm->mode[0] & PORTMAN2X4_MODE_INPUT_TRIGGERED) |
629 | snd_rawmidi_receive(pm->midi_input[0], |
630 | &midivalue, 1); |
631 | |
632 | } |
633 | /* If data available on channel 1, |
634 | read it and stuff it into the queue. */ |
635 | if (portman_data_avail(pm, 1)) { |
636 | /* Read Midi */ |
637 | midivalue = portman_read_midi(pm, 1); |
638 | /* put midi into queue... */ |
639 | if (pm->mode[1] & PORTMAN2X4_MODE_INPUT_TRIGGERED) |
640 | snd_rawmidi_receive(pm->midi_input[1], |
641 | &midivalue, 1); |
642 | } |
643 | |
644 | } |
645 | |
646 | spin_unlock(&pm->reg_lock); |
647 | } |
648 | |
649 | static int __devinit snd_portman_probe_port(struct parport *p) |
650 | { |
651 | struct pardevice *pardev; |
652 | int res; |
653 | |
654 | pardev = parport_register_device(p, DRIVER_NAME, |
655 | NULL, NULL, NULL, |
656 | 0, NULL); |
657 | if (!pardev) |
658 | return -EIO; |
659 | |
660 | if (parport_claim(pardev)) { |
661 | parport_unregister_device(pardev); |
662 | return -EIO; |
663 | } |
664 | |
665 | res = portman_probe(p); |
666 | |
667 | parport_release(pardev); |
668 | parport_unregister_device(pardev); |
669 | |
670 | return res ? -EIO : 0; |
671 | } |
672 | |
673 | static void __devinit snd_portman_attach(struct parport *p) |
674 | { |
675 | struct platform_device *device; |
676 | |
677 | device = platform_device_alloc(PLATFORM_DRIVER, device_count); |
678 | if (!device) |
679 | return; |
680 | |
681 | /* Temporary assignment to forward the parport */ |
682 | platform_set_drvdata(device, p); |
683 | |
684 | if (platform_device_add(device) < 0) { |
685 | platform_device_put(device); |
686 | return; |
687 | } |
688 | |
689 | /* Since we dont get the return value of probe |
690 | * We need to check if device probing succeeded or not */ |
691 | if (!platform_get_drvdata(device)) { |
692 | platform_device_unregister(device); |
693 | return; |
694 | } |
695 | |
696 | /* register device in global table */ |
697 | platform_devices[device_count] = device; |
698 | device_count++; |
699 | } |
700 | |
701 | static void snd_portman_detach(struct parport *p) |
702 | { |
703 | /* nothing to do here */ |
704 | } |
705 | |
706 | static struct parport_driver portman_parport_driver = { |
707 | .name = "portman2x4", |
708 | .attach = snd_portman_attach, |
709 | .detach = snd_portman_detach |
710 | }; |
711 | |
712 | /********************************************************************* |
713 | * platform stuff |
714 | *********************************************************************/ |
715 | static void snd_portman_card_private_free(struct snd_card *card) |
716 | { |
717 | struct portman *pm = card->private_data; |
718 | struct pardevice *pardev = pm->pardev; |
719 | |
720 | if (pardev) { |
721 | if (pm->pardev_claimed) |
722 | parport_release(pardev); |
723 | parport_unregister_device(pardev); |
724 | } |
725 | |
726 | portman_free(pm); |
727 | } |
728 | |
729 | static int __devinit snd_portman_probe(struct platform_device *pdev) |
730 | { |
731 | struct pardevice *pardev; |
732 | struct parport *p; |
733 | int dev = pdev->id; |
734 | struct snd_card *card = NULL; |
735 | struct portman *pm = NULL; |
736 | int err; |
737 | |
738 | p = platform_get_drvdata(pdev); |
739 | platform_set_drvdata(pdev, NULL); |
740 | |
741 | if (dev >= SNDRV_CARDS) |
742 | return -ENODEV; |
743 | if (!enable[dev]) |
744 | return -ENOENT; |
745 | |
746 | if ((err = snd_portman_probe_port(p)) < 0) |
747 | return err; |
748 | |
749 | err = snd_card_create(index[dev], id[dev], THIS_MODULE, 0, &card); |
750 | if (err < 0) { |
751 | snd_printd("Cannot create card\n"); |
752 | return err; |
753 | } |
754 | strcpy(card->driver, DRIVER_NAME); |
755 | strcpy(card->shortname, CARD_NAME); |
756 | sprintf(card->longname, "%s at 0x%lx, irq %i", |
757 | card->shortname, p->base, p->irq); |
758 | |
759 | pardev = parport_register_device(p, /* port */ |
760 | DRIVER_NAME, /* name */ |
761 | NULL, /* preempt */ |
762 | NULL, /* wakeup */ |
763 | snd_portman_interrupt, /* ISR */ |
764 | PARPORT_DEV_EXCL, /* flags */ |
765 | (void *)card); /* private */ |
766 | if (pardev == NULL) { |
767 | snd_printd("Cannot register pardevice\n"); |
768 | err = -EIO; |
769 | goto __err; |
770 | } |
771 | |
772 | if ((err = portman_create(card, pardev, &pm)) < 0) { |
773 | snd_printd("Cannot create main component\n"); |
774 | parport_unregister_device(pardev); |
775 | goto __err; |
776 | } |
777 | card->private_data = pm; |
778 | card->private_free = snd_portman_card_private_free; |
779 | |
780 | if ((err = snd_portman_rawmidi_create(card)) < 0) { |
781 | snd_printd("Creating Rawmidi component failed\n"); |
782 | goto __err; |
783 | } |
784 | |
785 | /* claim parport */ |
786 | if (parport_claim(pardev)) { |
787 | snd_printd("Cannot claim parport 0x%lx\n", pardev->port->base); |
788 | err = -EIO; |
789 | goto __err; |
790 | } |
791 | pm->pardev_claimed = 1; |
792 | |
793 | /* init device */ |
794 | if ((err = portman_device_init(pm)) < 0) |
795 | goto __err; |
796 | |
797 | platform_set_drvdata(pdev, card); |
798 | |
799 | snd_card_set_dev(card, &pdev->dev); |
800 | |
801 | /* At this point card will be usable */ |
802 | if ((err = snd_card_register(card)) < 0) { |
803 | snd_printd("Cannot register card\n"); |
804 | goto __err; |
805 | } |
806 | |
807 | snd_printk(KERN_INFO "Portman 2x4 on 0x%lx\n", p->base); |
808 | return 0; |
809 | |
810 | __err: |
811 | snd_card_free(card); |
812 | return err; |
813 | } |
814 | |
815 | static int __devexit snd_portman_remove(struct platform_device *pdev) |
816 | { |
817 | struct snd_card *card = platform_get_drvdata(pdev); |
818 | |
819 | if (card) |
820 | snd_card_free(card); |
821 | |
822 | return 0; |
823 | } |
824 | |
825 | |
826 | static struct platform_driver snd_portman_driver = { |
827 | .probe = snd_portman_probe, |
828 | .remove = __devexit_p(snd_portman_remove), |
829 | .driver = { |
830 | .name = PLATFORM_DRIVER |
831 | } |
832 | }; |
833 | |
834 | /********************************************************************* |
835 | * module init stuff |
836 | *********************************************************************/ |
837 | static void snd_portman_unregister_all(void) |
838 | { |
839 | int i; |
840 | |
841 | for (i = 0; i < SNDRV_CARDS; ++i) { |
842 | if (platform_devices[i]) { |
843 | platform_device_unregister(platform_devices[i]); |
844 | platform_devices[i] = NULL; |
845 | } |
846 | } |
847 | platform_driver_unregister(&snd_portman_driver); |
848 | parport_unregister_driver(&portman_parport_driver); |
849 | } |
850 | |
851 | static int __init snd_portman_module_init(void) |
852 | { |
853 | int err; |
854 | |
855 | if ((err = platform_driver_register(&snd_portman_driver)) < 0) |
856 | return err; |
857 | |
858 | if (parport_register_driver(&portman_parport_driver) != 0) { |
859 | platform_driver_unregister(&snd_portman_driver); |
860 | return -EIO; |
861 | } |
862 | |
863 | if (device_count == 0) { |
864 | snd_portman_unregister_all(); |
865 | return -ENODEV; |
866 | } |
867 | |
868 | return 0; |
869 | } |
870 | |
871 | static void __exit snd_portman_module_exit(void) |
872 | { |
873 | snd_portman_unregister_all(); |
874 | } |
875 | |
876 | module_init(snd_portman_module_init); |
877 | module_exit(snd_portman_module_exit); |
878 |
Branches:
ben-wpan
ben-wpan-stefan
javiroman/ks7010
jz-2.6.34
jz-2.6.34-rc5
jz-2.6.34-rc6
jz-2.6.34-rc7
jz-2.6.35
jz-2.6.36
jz-2.6.37
jz-2.6.38
jz-2.6.39
jz-3.0
jz-3.1
jz-3.11
jz-3.12
jz-3.13
jz-3.15
jz-3.16
jz-3.18-dt
jz-3.2
jz-3.3
jz-3.4
jz-3.5
jz-3.6
jz-3.6-rc2-pwm
jz-3.9
jz-3.9-clk
jz-3.9-rc8
jz47xx
jz47xx-2.6.38
master
Tags:
od-2011-09-04
od-2011-09-18
v2.6.34-rc5
v2.6.34-rc6
v2.6.34-rc7
v3.9