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

source code of linux/sound/drivers/portman2x4.c