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