Version:  2.0.40 2.2.26 2.4.37 3.10 3.11 3.12 3.13 3.14 3.15 3.16 3.17 3.18 3.19 4.0 4.1 4.2 4.3 4.4 4.5 4.6 4.7

Linux/sound/drivers/portman2x4.c

  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 <linux/slab.h>
 46 #include <linux/module.h>
 47 #include <sound/core.h>
 48 #include <sound/initval.h>
 49 #include <sound/rawmidi.h>
 50 #include <sound/control.h>
 51 
 52 #define CARD_NAME "Portman 2x4"
 53 #define DRIVER_NAME "portman"
 54 #define PLATFORM_DRIVER "snd_portman2x4"
 55 
 56 static int index[SNDRV_CARDS]  = SNDRV_DEFAULT_IDX;
 57 static char *id[SNDRV_CARDS]   = SNDRV_DEFAULT_STR;
 58 static bool enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP;
 59 
 60 static struct platform_device *platform_devices[SNDRV_CARDS]; 
 61 static int device_count;
 62 
 63 module_param_array(index, int, NULL, S_IRUGO);
 64 MODULE_PARM_DESC(index, "Index value for " CARD_NAME " soundcard.");
 65 module_param_array(id, charp, NULL, S_IRUGO);
 66 MODULE_PARM_DESC(id, "ID string for " CARD_NAME " soundcard.");
 67 module_param_array(enable, bool, NULL, S_IRUGO);
 68 MODULE_PARM_DESC(enable, "Enable " CARD_NAME " soundcard.");
 69 
 70 MODULE_AUTHOR("Levent Guendogdu, Tobias Gehrig, Matthias Koenig");
 71 MODULE_DESCRIPTION("Midiman Portman2x4");
 72 MODULE_LICENSE("GPL");
 73 MODULE_SUPPORTED_DEVICE("{{Midiman,Portman2x4}}");
 74 
 75 /*********************************************************************
 76  * Chip specific
 77  *********************************************************************/
 78 #define PORTMAN_NUM_INPUT_PORTS 2
 79 #define PORTMAN_NUM_OUTPUT_PORTS 4
 80 
 81 struct portman {
 82         spinlock_t reg_lock;
 83         struct snd_card *card;
 84         struct snd_rawmidi *rmidi;
 85         struct pardevice *pardev;
 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 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 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 void snd_portman_attach(struct parport *p)
650 {
651         struct platform_device *device;
652 
653         device = platform_device_alloc(PLATFORM_DRIVER, device_count);
654         if (!device)
655                 return;
656 
657         /* Temporary assignment to forward the parport */
658         platform_set_drvdata(device, p);
659 
660         if (platform_device_add(device) < 0) {
661                 platform_device_put(device);
662                 return;
663         }
664 
665         /* Since we dont get the return value of probe
666          * We need to check if device probing succeeded or not */
667         if (!platform_get_drvdata(device)) {
668                 platform_device_unregister(device);
669                 return;
670         }
671 
672         /* register device in global table */
673         platform_devices[device_count] = device;
674         device_count++;
675 }
676 
677 static void snd_portman_detach(struct parport *p)
678 {
679         /* nothing to do here */
680 }
681 
682 static int snd_portman_dev_probe(struct pardevice *pardev)
683 {
684         if (strcmp(pardev->name, DRIVER_NAME))
685                 return -ENODEV;
686 
687         return 0;
688 }
689 
690 static struct parport_driver portman_parport_driver = {
691         .name           = "portman2x4",
692         .probe          = snd_portman_dev_probe,
693         .match_port     = snd_portman_attach,
694         .detach         = snd_portman_detach,
695         .devmodel       = true,
696 };
697 
698 /*********************************************************************
699  * platform stuff
700  *********************************************************************/
701 static void snd_portman_card_private_free(struct snd_card *card)
702 {
703         struct portman *pm = card->private_data;
704         struct pardevice *pardev = pm->pardev;
705 
706         if (pardev) {
707                 parport_release(pardev);
708                 parport_unregister_device(pardev);
709         }
710 
711         portman_free(pm);
712 }
713 
714 static int snd_portman_probe(struct platform_device *pdev)
715 {
716         struct pardevice *pardev;
717         struct parport *p;
718         int dev = pdev->id;
719         struct snd_card *card = NULL;
720         struct portman *pm = NULL;
721         int err;
722         struct pardev_cb portman_cb = {
723                 .preempt = NULL,
724                 .wakeup = NULL,
725                 .irq_func = snd_portman_interrupt,      /* ISR */
726                 .flags = PARPORT_DEV_EXCL,              /* flags */
727         };
728 
729         p = platform_get_drvdata(pdev);
730         platform_set_drvdata(pdev, NULL);
731 
732         if (dev >= SNDRV_CARDS)
733                 return -ENODEV;
734         if (!enable[dev]) 
735                 return -ENOENT;
736 
737         err = snd_card_new(&pdev->dev, index[dev], id[dev], THIS_MODULE,
738                            0, &card);
739         if (err < 0) {
740                 snd_printd("Cannot create card\n");
741                 return err;
742         }
743         strcpy(card->driver, DRIVER_NAME);
744         strcpy(card->shortname, CARD_NAME);
745         sprintf(card->longname,  "%s at 0x%lx, irq %i", 
746                 card->shortname, p->base, p->irq);
747 
748         portman_cb.private = card;                         /* private */
749         pardev = parport_register_dev_model(p,             /* port */
750                                             DRIVER_NAME,   /* name */
751                                             &portman_cb,   /* callbacks */
752                                             pdev->id);     /* device number */
753         if (pardev == NULL) {
754                 snd_printd("Cannot register pardevice\n");
755                 err = -EIO;
756                 goto __err;
757         }
758 
759         /* claim parport */
760         if (parport_claim(pardev)) {
761                 snd_printd("Cannot claim parport 0x%lx\n", pardev->port->base);
762                 err = -EIO;
763                 goto free_pardev;
764         }
765 
766         if ((err = portman_create(card, pardev, &pm)) < 0) {
767                 snd_printd("Cannot create main component\n");
768                 goto release_pardev;
769         }
770         card->private_data = pm;
771         card->private_free = snd_portman_card_private_free;
772 
773         err = portman_probe(p);
774         if (err) {
775                 err = -EIO;
776                 goto __err;
777         }
778         
779         if ((err = snd_portman_rawmidi_create(card)) < 0) {
780                 snd_printd("Creating Rawmidi component failed\n");
781                 goto __err;
782         }
783 
784         /* init device */
785         if ((err = portman_device_init(pm)) < 0)
786                 goto __err;
787 
788         platform_set_drvdata(pdev, card);
789 
790         /* At this point card will be usable */
791         if ((err = snd_card_register(card)) < 0) {
792                 snd_printd("Cannot register card\n");
793                 goto __err;
794         }
795 
796         snd_printk(KERN_INFO "Portman 2x4 on 0x%lx\n", p->base);
797         return 0;
798 
799 release_pardev:
800         parport_release(pardev);
801 free_pardev:
802         parport_unregister_device(pardev);
803 __err:
804         snd_card_free(card);
805         return err;
806 }
807 
808 static int snd_portman_remove(struct platform_device *pdev)
809 {
810         struct snd_card *card = platform_get_drvdata(pdev);
811 
812         if (card)
813                 snd_card_free(card);
814 
815         return 0;
816 }
817 
818 
819 static struct platform_driver snd_portman_driver = {
820         .probe  = snd_portman_probe,
821         .remove = snd_portman_remove,
822         .driver = {
823                 .name = PLATFORM_DRIVER,
824         }
825 };
826 
827 /*********************************************************************
828  * module init stuff
829  *********************************************************************/
830 static void snd_portman_unregister_all(void)
831 {
832         int i;
833 
834         for (i = 0; i < SNDRV_CARDS; ++i) {
835                 if (platform_devices[i]) {
836                         platform_device_unregister(platform_devices[i]);
837                         platform_devices[i] = NULL;
838                 }
839         }               
840         platform_driver_unregister(&snd_portman_driver);
841         parport_unregister_driver(&portman_parport_driver);
842 }
843 
844 static int __init snd_portman_module_init(void)
845 {
846         int err;
847 
848         if ((err = platform_driver_register(&snd_portman_driver)) < 0)
849                 return err;
850 
851         if (parport_register_driver(&portman_parport_driver) != 0) {
852                 platform_driver_unregister(&snd_portman_driver);
853                 return -EIO;
854         }
855 
856         if (device_count == 0) {
857                 snd_portman_unregister_all();
858                 return -ENODEV;
859         }
860 
861         return 0;
862 }
863 
864 static void __exit snd_portman_module_exit(void)
865 {
866         snd_portman_unregister_all();
867 }
868 
869 module_init(snd_portman_module_init);
870 module_exit(snd_portman_module_exit);
871 

This page was automatically generated by LXR 0.3.1 (source).  •  Linux is a registered trademark of Linus Torvalds  •  Contact us