xref: /linux/sound/drivers/mts64.c (revision ebf68996de0ab250c5d520eb2291ab65643e9a1e)
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  *   ALSA Driver for Ego Systems Inc. (ESI) Miditerminal 4140
4  *   Copyright (c) 2006 by Matthias König <mk@phasorlab.de>
5  */
6 
7 #include <linux/init.h>
8 #include <linux/platform_device.h>
9 #include <linux/parport.h>
10 #include <linux/spinlock.h>
11 #include <linux/module.h>
12 #include <linux/delay.h>
13 #include <linux/slab.h>
14 #include <sound/core.h>
15 #include <sound/initval.h>
16 #include <sound/rawmidi.h>
17 #include <sound/control.h>
18 
19 #define CARD_NAME "Miditerminal 4140"
20 #define DRIVER_NAME "MTS64"
21 #define PLATFORM_DRIVER "snd_mts64"
22 
23 static int index[SNDRV_CARDS]  = SNDRV_DEFAULT_IDX;
24 static char *id[SNDRV_CARDS]   = SNDRV_DEFAULT_STR;
25 static bool enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP;
26 
27 static struct platform_device *platform_devices[SNDRV_CARDS];
28 static int device_count;
29 
30 module_param_array(index, int, NULL, 0444);
31 MODULE_PARM_DESC(index, "Index value for " CARD_NAME " soundcard.");
32 module_param_array(id, charp, NULL, 0444);
33 MODULE_PARM_DESC(id, "ID string for " CARD_NAME " soundcard.");
34 module_param_array(enable, bool, NULL, 0444);
35 MODULE_PARM_DESC(enable, "Enable " CARD_NAME " soundcard.");
36 
37 MODULE_AUTHOR("Matthias Koenig <mk@phasorlab.de>");
38 MODULE_DESCRIPTION("ESI Miditerminal 4140");
39 MODULE_LICENSE("GPL");
40 MODULE_SUPPORTED_DEVICE("{{ESI,Miditerminal 4140}}");
41 
42 /*********************************************************************
43  * Chip specific
44  *********************************************************************/
45 #define MTS64_NUM_INPUT_PORTS 5
46 #define MTS64_NUM_OUTPUT_PORTS 4
47 #define MTS64_SMPTE_SUBSTREAM 4
48 
49 struct mts64 {
50 	spinlock_t lock;
51 	struct snd_card *card;
52 	struct snd_rawmidi *rmidi;
53 	struct pardevice *pardev;
54 	int open_count;
55 	int current_midi_output_port;
56 	int current_midi_input_port;
57 	u8 mode[MTS64_NUM_INPUT_PORTS];
58 	struct snd_rawmidi_substream *midi_input_substream[MTS64_NUM_INPUT_PORTS];
59 	int smpte_switch;
60 	u8 time[4]; /* [0]=hh, [1]=mm, [2]=ss, [3]=ff */
61 	u8 fps;
62 };
63 
64 static int snd_mts64_free(struct mts64 *mts)
65 {
66 	kfree(mts);
67 	return 0;
68 }
69 
70 static int snd_mts64_create(struct snd_card *card,
71 			    struct pardevice *pardev,
72 			    struct mts64 **rchip)
73 {
74 	struct mts64 *mts;
75 
76 	*rchip = NULL;
77 
78 	mts = kzalloc(sizeof(struct mts64), GFP_KERNEL);
79 	if (mts == NULL)
80 		return -ENOMEM;
81 
82 	/* Init chip specific data */
83 	spin_lock_init(&mts->lock);
84 	mts->card = card;
85 	mts->pardev = pardev;
86 	mts->current_midi_output_port = -1;
87 	mts->current_midi_input_port = -1;
88 
89 	*rchip = mts;
90 
91 	return 0;
92 }
93 
94 /*********************************************************************
95  * HW register related constants
96  *********************************************************************/
97 
98 /* Status Bits */
99 #define MTS64_STAT_BSY             0x80
100 #define MTS64_STAT_BIT_SET         0x20  /* readout process, bit is set */
101 #define MTS64_STAT_PORT            0x10  /* read byte is a port number */
102 
103 /* Control Bits */
104 #define MTS64_CTL_READOUT          0x08  /* enable readout */
105 #define MTS64_CTL_WRITE_CMD        0x06
106 #define MTS64_CTL_WRITE_DATA       0x02
107 #define MTS64_CTL_STROBE           0x01
108 
109 /* Command */
110 #define MTS64_CMD_RESET            0xfe
111 #define MTS64_CMD_PROBE            0x8f  /* Used in probing procedure */
112 #define MTS64_CMD_SMPTE_SET_TIME   0xe8
113 #define MTS64_CMD_SMPTE_SET_FPS    0xee
114 #define MTS64_CMD_SMPTE_STOP       0xef
115 #define MTS64_CMD_SMPTE_FPS_24     0xe3
116 #define MTS64_CMD_SMPTE_FPS_25     0xe2
117 #define MTS64_CMD_SMPTE_FPS_2997   0xe4
118 #define MTS64_CMD_SMPTE_FPS_30D    0xe1
119 #define MTS64_CMD_SMPTE_FPS_30     0xe0
120 #define MTS64_CMD_COM_OPEN         0xf8  /* setting the communication mode */
121 #define MTS64_CMD_COM_CLOSE1       0xff  /* clearing communication mode */
122 #define MTS64_CMD_COM_CLOSE2       0xf5
123 
124 /*********************************************************************
125  * Hardware specific functions
126  *********************************************************************/
127 static void mts64_enable_readout(struct parport *p);
128 static void mts64_disable_readout(struct parport *p);
129 static int mts64_device_ready(struct parport *p);
130 static int mts64_device_init(struct parport *p);
131 static int mts64_device_open(struct mts64 *mts);
132 static int mts64_device_close(struct mts64 *mts);
133 static u8 mts64_map_midi_input(u8 c);
134 static int mts64_probe(struct parport *p);
135 static u16 mts64_read(struct parport *p);
136 static u8 mts64_read_char(struct parport *p);
137 static void mts64_smpte_start(struct parport *p,
138 			      u8 hours, u8 minutes,
139 			      u8 seconds, u8 frames,
140 			      u8 idx);
141 static void mts64_smpte_stop(struct parport *p);
142 static void mts64_write_command(struct parport *p, u8 c);
143 static void mts64_write_data(struct parport *p, u8 c);
144 static void mts64_write_midi(struct mts64 *mts, u8 c, int midiport);
145 
146 
147 /*  Enables the readout procedure
148  *
149  *  Before we can read a midi byte from the device, we have to set
150  *  bit 3 of control port.
151  */
152 static void mts64_enable_readout(struct parport *p)
153 {
154 	u8 c;
155 
156 	c = parport_read_control(p);
157 	c |= MTS64_CTL_READOUT;
158 	parport_write_control(p, c);
159 }
160 
161 /*  Disables readout
162  *
163  *  Readout is disabled by clearing bit 3 of control
164  */
165 static void mts64_disable_readout(struct parport *p)
166 {
167 	u8 c;
168 
169 	c = parport_read_control(p);
170 	c &= ~MTS64_CTL_READOUT;
171 	parport_write_control(p, c);
172 }
173 
174 /*  waits for device ready
175  *
176  *  Checks if BUSY (Bit 7 of status) is clear
177  *  1 device ready
178  *  0 failure
179  */
180 static int mts64_device_ready(struct parport *p)
181 {
182 	int i;
183 	u8 c;
184 
185 	for (i = 0; i < 0xffff; ++i) {
186 		c = parport_read_status(p);
187 		c &= MTS64_STAT_BSY;
188 		if (c != 0)
189 			return 1;
190 	}
191 
192 	return 0;
193 }
194 
195 /*  Init device (LED blinking startup magic)
196  *
197  *  Returns:
198  *  0 init ok
199  *  -EIO failure
200  */
201 static int mts64_device_init(struct parport *p)
202 {
203 	int i;
204 
205 	mts64_write_command(p, MTS64_CMD_RESET);
206 
207 	for (i = 0; i < 64; ++i) {
208 		msleep(100);
209 
210 		if (mts64_probe(p) == 0) {
211 			/* success */
212 			mts64_disable_readout(p);
213 			return 0;
214 		}
215 	}
216 	mts64_disable_readout(p);
217 
218 	return -EIO;
219 }
220 
221 /*
222  *  Opens the device (set communication mode)
223  */
224 static int mts64_device_open(struct mts64 *mts)
225 {
226 	int i;
227 	struct parport *p = mts->pardev->port;
228 
229 	for (i = 0; i < 5; ++i)
230 		mts64_write_command(p, MTS64_CMD_COM_OPEN);
231 
232 	return 0;
233 }
234 
235 /*
236  *  Close device (clear communication mode)
237  */
238 static int mts64_device_close(struct mts64 *mts)
239 {
240 	int i;
241 	struct parport *p = mts->pardev->port;
242 
243 	for (i = 0; i < 5; ++i) {
244 		mts64_write_command(p, MTS64_CMD_COM_CLOSE1);
245 		mts64_write_command(p, MTS64_CMD_COM_CLOSE2);
246 	}
247 
248 	return 0;
249 }
250 
251 /*  map hardware port to substream number
252  *
253  *  When reading a byte from the device, the device tells us
254  *  on what port the byte is. This HW port has to be mapped to
255  *  the midiport (substream number).
256  *  substream 0-3 are Midiports 1-4
257  *  substream 4 is SMPTE Timecode
258  *  The mapping is done by the table:
259  *  HW | 0 | 1 | 2 | 3 | 4
260  *  SW | 0 | 1 | 4 | 2 | 3
261  */
262 static u8 mts64_map_midi_input(u8 c)
263 {
264 	static u8 map[] = { 0, 1, 4, 2, 3 };
265 
266 	return map[c];
267 }
268 
269 
270 /*  Probe parport for device
271  *
272  *  Do we have a Miditerminal 4140 on parport?
273  *  Returns:
274  *  0       device found
275  *  -ENODEV no device
276  */
277 static int mts64_probe(struct parport *p)
278 {
279 	u8 c;
280 
281 	mts64_smpte_stop(p);
282 	mts64_write_command(p, MTS64_CMD_PROBE);
283 
284 	msleep(50);
285 
286 	c = mts64_read(p);
287 
288 	c &= 0x00ff;
289 	if (c != MTS64_CMD_PROBE)
290 		return -ENODEV;
291 	else
292 		return 0;
293 
294 }
295 
296 /*  Read byte incl. status from device
297  *
298  *  Returns:
299  *  data in lower 8 bits and status in upper 8 bits
300  */
301 static u16 mts64_read(struct parport *p)
302 {
303 	u8 data, status;
304 
305 	mts64_device_ready(p);
306 	mts64_enable_readout(p);
307 	status = parport_read_status(p);
308 	data = mts64_read_char(p);
309 	mts64_disable_readout(p);
310 
311 	return (status << 8) | data;
312 }
313 
314 /*  Read a byte from device
315  *
316  *  Note, that readout mode has to be enabled.
317  *  readout procedure is as follows:
318  *  - Write number of the Bit to read to DATA
319  *  - Read STATUS
320  *  - Bit 5 of STATUS indicates if Bit is set
321  *
322  *  Returns:
323  *  Byte read from device
324  */
325 static u8 mts64_read_char(struct parport *p)
326 {
327 	u8 c = 0;
328 	u8 status;
329 	u8 i;
330 
331 	for (i = 0; i < 8; ++i) {
332 		parport_write_data(p, i);
333 		c >>= 1;
334 		status = parport_read_status(p);
335 		if (status & MTS64_STAT_BIT_SET)
336 			c |= 0x80;
337 	}
338 
339 	return c;
340 }
341 
342 /*  Starts SMPTE Timecode generation
343  *
344  *  The device creates SMPTE Timecode by hardware.
345  *  0 24 fps
346  *  1 25 fps
347  *  2 29.97 fps
348  *  3 30 fps (Drop-frame)
349  *  4 30 fps
350  */
351 static void mts64_smpte_start(struct parport *p,
352 			      u8 hours, u8 minutes,
353 			      u8 seconds, u8 frames,
354 			      u8 idx)
355 {
356 	static u8 fps[5] = { MTS64_CMD_SMPTE_FPS_24,
357 			     MTS64_CMD_SMPTE_FPS_25,
358 			     MTS64_CMD_SMPTE_FPS_2997,
359 			     MTS64_CMD_SMPTE_FPS_30D,
360 			     MTS64_CMD_SMPTE_FPS_30    };
361 
362 	mts64_write_command(p, MTS64_CMD_SMPTE_SET_TIME);
363 	mts64_write_command(p, frames);
364 	mts64_write_command(p, seconds);
365 	mts64_write_command(p, minutes);
366 	mts64_write_command(p, hours);
367 
368 	mts64_write_command(p, MTS64_CMD_SMPTE_SET_FPS);
369 	mts64_write_command(p, fps[idx]);
370 }
371 
372 /*  Stops SMPTE Timecode generation
373  */
374 static void mts64_smpte_stop(struct parport *p)
375 {
376 	mts64_write_command(p, MTS64_CMD_SMPTE_STOP);
377 }
378 
379 /*  Write a command byte to device
380  */
381 static void mts64_write_command(struct parport *p, u8 c)
382 {
383 	mts64_device_ready(p);
384 
385 	parport_write_data(p, c);
386 
387 	parport_write_control(p, MTS64_CTL_WRITE_CMD);
388 	parport_write_control(p, MTS64_CTL_WRITE_CMD | MTS64_CTL_STROBE);
389 	parport_write_control(p, MTS64_CTL_WRITE_CMD);
390 }
391 
392 /*  Write a data byte to device
393  */
394 static void mts64_write_data(struct parport *p, u8 c)
395 {
396 	mts64_device_ready(p);
397 
398 	parport_write_data(p, c);
399 
400 	parport_write_control(p, MTS64_CTL_WRITE_DATA);
401 	parport_write_control(p, MTS64_CTL_WRITE_DATA | MTS64_CTL_STROBE);
402 	parport_write_control(p, MTS64_CTL_WRITE_DATA);
403 }
404 
405 /*  Write a MIDI byte to midiport
406  *
407  *  midiport ranges from 0-3 and maps to Ports 1-4
408  *  assumptions: communication mode is on
409  */
410 static void mts64_write_midi(struct mts64 *mts, u8 c,
411 			     int midiport)
412 {
413 	struct parport *p = mts->pardev->port;
414 
415 	/* check current midiport */
416 	if (mts->current_midi_output_port != midiport)
417 		mts64_write_command(p, midiport);
418 
419 	/* write midi byte */
420 	mts64_write_data(p, c);
421 }
422 
423 /*********************************************************************
424  * Control elements
425  *********************************************************************/
426 
427 /* SMPTE Switch */
428 #define snd_mts64_ctl_smpte_switch_info		snd_ctl_boolean_mono_info
429 
430 static int snd_mts64_ctl_smpte_switch_get(struct snd_kcontrol* kctl,
431 					  struct snd_ctl_elem_value *uctl)
432 {
433 	struct mts64 *mts = snd_kcontrol_chip(kctl);
434 
435 	spin_lock_irq(&mts->lock);
436 	uctl->value.integer.value[0] = mts->smpte_switch;
437 	spin_unlock_irq(&mts->lock);
438 
439 	return 0;
440 }
441 
442 /* smpte_switch is not accessed from IRQ handler, so we just need
443    to protect the HW access */
444 static int snd_mts64_ctl_smpte_switch_put(struct snd_kcontrol* kctl,
445 					  struct snd_ctl_elem_value *uctl)
446 {
447 	struct mts64 *mts = snd_kcontrol_chip(kctl);
448 	int changed = 0;
449 	int val = !!uctl->value.integer.value[0];
450 
451 	spin_lock_irq(&mts->lock);
452 	if (mts->smpte_switch == val)
453 		goto __out;
454 
455 	changed = 1;
456 	mts->smpte_switch = val;
457 	if (mts->smpte_switch) {
458 		mts64_smpte_start(mts->pardev->port,
459 				  mts->time[0], mts->time[1],
460 				  mts->time[2], mts->time[3],
461 				  mts->fps);
462 	} else {
463 		mts64_smpte_stop(mts->pardev->port);
464 	}
465 __out:
466 	spin_unlock_irq(&mts->lock);
467 	return changed;
468 }
469 
470 static struct snd_kcontrol_new mts64_ctl_smpte_switch = {
471 	.iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
472 	.name  = "SMPTE Playback Switch",
473 	.index = 0,
474 	.access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
475 	.private_value = 0,
476 	.info = snd_mts64_ctl_smpte_switch_info,
477 	.get  = snd_mts64_ctl_smpte_switch_get,
478 	.put  = snd_mts64_ctl_smpte_switch_put
479 };
480 
481 /* Time */
482 static int snd_mts64_ctl_smpte_time_h_info(struct snd_kcontrol *kctl,
483 					   struct snd_ctl_elem_info *uinfo)
484 {
485 	uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
486 	uinfo->count = 1;
487 	uinfo->value.integer.min = 0;
488 	uinfo->value.integer.max = 23;
489 	return 0;
490 }
491 
492 static int snd_mts64_ctl_smpte_time_f_info(struct snd_kcontrol *kctl,
493 					   struct snd_ctl_elem_info *uinfo)
494 {
495 	uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
496 	uinfo->count = 1;
497 	uinfo->value.integer.min = 0;
498 	uinfo->value.integer.max = 99;
499 	return 0;
500 }
501 
502 static int snd_mts64_ctl_smpte_time_info(struct snd_kcontrol *kctl,
503 					 struct snd_ctl_elem_info *uinfo)
504 {
505 	uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
506 	uinfo->count = 1;
507 	uinfo->value.integer.min = 0;
508 	uinfo->value.integer.max = 59;
509 	return 0;
510 }
511 
512 static int snd_mts64_ctl_smpte_time_get(struct snd_kcontrol *kctl,
513 					struct snd_ctl_elem_value *uctl)
514 {
515 	struct mts64 *mts = snd_kcontrol_chip(kctl);
516 	int idx = kctl->private_value;
517 
518 	spin_lock_irq(&mts->lock);
519 	uctl->value.integer.value[0] = mts->time[idx];
520 	spin_unlock_irq(&mts->lock);
521 
522 	return 0;
523 }
524 
525 static int snd_mts64_ctl_smpte_time_put(struct snd_kcontrol *kctl,
526 					struct snd_ctl_elem_value *uctl)
527 {
528 	struct mts64 *mts = snd_kcontrol_chip(kctl);
529 	int idx = kctl->private_value;
530 	unsigned int time = uctl->value.integer.value[0] % 60;
531 	int changed = 0;
532 
533 	spin_lock_irq(&mts->lock);
534 	if (mts->time[idx] != time) {
535 		changed = 1;
536 		mts->time[idx] = time;
537 	}
538 	spin_unlock_irq(&mts->lock);
539 
540 	return changed;
541 }
542 
543 static struct snd_kcontrol_new mts64_ctl_smpte_time_hours = {
544 	.iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
545 	.name  = "SMPTE Time Hours",
546 	.index = 0,
547 	.access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
548 	.private_value = 0,
549 	.info = snd_mts64_ctl_smpte_time_h_info,
550 	.get  = snd_mts64_ctl_smpte_time_get,
551 	.put  = snd_mts64_ctl_smpte_time_put
552 };
553 
554 static struct snd_kcontrol_new mts64_ctl_smpte_time_minutes = {
555 	.iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
556 	.name  = "SMPTE Time Minutes",
557 	.index = 0,
558 	.access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
559 	.private_value = 1,
560 	.info = snd_mts64_ctl_smpte_time_info,
561 	.get  = snd_mts64_ctl_smpte_time_get,
562 	.put  = snd_mts64_ctl_smpte_time_put
563 };
564 
565 static struct snd_kcontrol_new mts64_ctl_smpte_time_seconds = {
566 	.iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
567 	.name  = "SMPTE Time Seconds",
568 	.index = 0,
569 	.access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
570 	.private_value = 2,
571 	.info = snd_mts64_ctl_smpte_time_info,
572 	.get  = snd_mts64_ctl_smpte_time_get,
573 	.put  = snd_mts64_ctl_smpte_time_put
574 };
575 
576 static struct snd_kcontrol_new mts64_ctl_smpte_time_frames = {
577 	.iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
578 	.name  = "SMPTE Time Frames",
579 	.index = 0,
580 	.access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
581 	.private_value = 3,
582 	.info = snd_mts64_ctl_smpte_time_f_info,
583 	.get  = snd_mts64_ctl_smpte_time_get,
584 	.put  = snd_mts64_ctl_smpte_time_put
585 };
586 
587 /* FPS */
588 static int snd_mts64_ctl_smpte_fps_info(struct snd_kcontrol *kctl,
589 					struct snd_ctl_elem_info *uinfo)
590 {
591 	static const char * const texts[5] = {
592 		"24", "25", "29.97", "30D", "30"
593 	};
594 
595 	return snd_ctl_enum_info(uinfo, 1, 5, texts);
596 }
597 
598 static int snd_mts64_ctl_smpte_fps_get(struct snd_kcontrol *kctl,
599 				       struct snd_ctl_elem_value *uctl)
600 {
601 	struct mts64 *mts = snd_kcontrol_chip(kctl);
602 
603 	spin_lock_irq(&mts->lock);
604 	uctl->value.enumerated.item[0] = mts->fps;
605 	spin_unlock_irq(&mts->lock);
606 
607 	return 0;
608 }
609 
610 static int snd_mts64_ctl_smpte_fps_put(struct snd_kcontrol *kctl,
611 				       struct snd_ctl_elem_value *uctl)
612 {
613 	struct mts64 *mts = snd_kcontrol_chip(kctl);
614 	int changed = 0;
615 
616 	if (uctl->value.enumerated.item[0] >= 5)
617 		return -EINVAL;
618 	spin_lock_irq(&mts->lock);
619 	if (mts->fps != uctl->value.enumerated.item[0]) {
620 		changed = 1;
621 		mts->fps = uctl->value.enumerated.item[0];
622 	}
623 	spin_unlock_irq(&mts->lock);
624 
625 	return changed;
626 }
627 
628 static struct snd_kcontrol_new mts64_ctl_smpte_fps = {
629 	.iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
630 	.name  = "SMPTE Fps",
631 	.index = 0,
632 	.access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
633 	.private_value = 0,
634 	.info  = snd_mts64_ctl_smpte_fps_info,
635 	.get   = snd_mts64_ctl_smpte_fps_get,
636 	.put   = snd_mts64_ctl_smpte_fps_put
637 };
638 
639 
640 static int snd_mts64_ctl_create(struct snd_card *card,
641 				struct mts64 *mts)
642 {
643 	int err, i;
644 	static struct snd_kcontrol_new *control[] = {
645 		&mts64_ctl_smpte_switch,
646 		&mts64_ctl_smpte_time_hours,
647 		&mts64_ctl_smpte_time_minutes,
648 		&mts64_ctl_smpte_time_seconds,
649 		&mts64_ctl_smpte_time_frames,
650 		&mts64_ctl_smpte_fps,
651 	        NULL  };
652 
653 	for (i = 0; control[i]; ++i) {
654 		err = snd_ctl_add(card, snd_ctl_new1(control[i], mts));
655 		if (err < 0) {
656 			snd_printd("Cannot create control: %s\n",
657 				   control[i]->name);
658 			return err;
659 		}
660 	}
661 
662 	return 0;
663 }
664 
665 /*********************************************************************
666  * Rawmidi
667  *********************************************************************/
668 #define MTS64_MODE_INPUT_TRIGGERED 0x01
669 
670 static int snd_mts64_rawmidi_open(struct snd_rawmidi_substream *substream)
671 {
672 	struct mts64 *mts = substream->rmidi->private_data;
673 
674 	if (mts->open_count == 0) {
675 		/* We don't need a spinlock here, because this is just called
676 		   if the device has not been opened before.
677 		   So there aren't any IRQs from the device */
678 		mts64_device_open(mts);
679 
680 		msleep(50);
681 	}
682 	++(mts->open_count);
683 
684 	return 0;
685 }
686 
687 static int snd_mts64_rawmidi_close(struct snd_rawmidi_substream *substream)
688 {
689 	struct mts64 *mts = substream->rmidi->private_data;
690 	unsigned long flags;
691 
692 	--(mts->open_count);
693 	if (mts->open_count == 0) {
694 		/* We need the spinlock_irqsave here because we can still
695 		   have IRQs at this point */
696 		spin_lock_irqsave(&mts->lock, flags);
697 		mts64_device_close(mts);
698 		spin_unlock_irqrestore(&mts->lock, flags);
699 
700 		msleep(500);
701 
702 	} else if (mts->open_count < 0)
703 		mts->open_count = 0;
704 
705 	return 0;
706 }
707 
708 static void snd_mts64_rawmidi_output_trigger(struct snd_rawmidi_substream *substream,
709 					     int up)
710 {
711 	struct mts64 *mts = substream->rmidi->private_data;
712 	u8 data;
713 	unsigned long flags;
714 
715 	spin_lock_irqsave(&mts->lock, flags);
716 	while (snd_rawmidi_transmit_peek(substream, &data, 1) == 1) {
717 		mts64_write_midi(mts, data, substream->number+1);
718 		snd_rawmidi_transmit_ack(substream, 1);
719 	}
720 	spin_unlock_irqrestore(&mts->lock, flags);
721 }
722 
723 static void snd_mts64_rawmidi_input_trigger(struct snd_rawmidi_substream *substream,
724 					    int up)
725 {
726 	struct mts64 *mts = substream->rmidi->private_data;
727 	unsigned long flags;
728 
729 	spin_lock_irqsave(&mts->lock, flags);
730 	if (up)
731 		mts->mode[substream->number] |= MTS64_MODE_INPUT_TRIGGERED;
732 	else
733  		mts->mode[substream->number] &= ~MTS64_MODE_INPUT_TRIGGERED;
734 
735 	spin_unlock_irqrestore(&mts->lock, flags);
736 }
737 
738 static const struct snd_rawmidi_ops snd_mts64_rawmidi_output_ops = {
739 	.open    = snd_mts64_rawmidi_open,
740 	.close   = snd_mts64_rawmidi_close,
741 	.trigger = snd_mts64_rawmidi_output_trigger
742 };
743 
744 static const struct snd_rawmidi_ops snd_mts64_rawmidi_input_ops = {
745 	.open    = snd_mts64_rawmidi_open,
746 	.close   = snd_mts64_rawmidi_close,
747 	.trigger = snd_mts64_rawmidi_input_trigger
748 };
749 
750 /* Create and initialize the rawmidi component */
751 static int snd_mts64_rawmidi_create(struct snd_card *card)
752 {
753 	struct mts64 *mts = card->private_data;
754 	struct snd_rawmidi *rmidi;
755 	struct snd_rawmidi_substream *substream;
756 	struct list_head *list;
757 	int err;
758 
759 	err = snd_rawmidi_new(card, CARD_NAME, 0,
760 			      MTS64_NUM_OUTPUT_PORTS,
761 			      MTS64_NUM_INPUT_PORTS,
762 			      &rmidi);
763 	if (err < 0)
764 		return err;
765 
766 	rmidi->private_data = mts;
767 	strcpy(rmidi->name, CARD_NAME);
768 	rmidi->info_flags = SNDRV_RAWMIDI_INFO_OUTPUT |
769 		            SNDRV_RAWMIDI_INFO_INPUT |
770                             SNDRV_RAWMIDI_INFO_DUPLEX;
771 
772 	mts->rmidi = rmidi;
773 
774 	/* register rawmidi ops */
775 	snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_OUTPUT,
776 			    &snd_mts64_rawmidi_output_ops);
777 	snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_INPUT,
778 			    &snd_mts64_rawmidi_input_ops);
779 
780 	/* name substreams */
781 	/* output */
782 	list_for_each(list,
783 		      &rmidi->streams[SNDRV_RAWMIDI_STREAM_OUTPUT].substreams) {
784 		substream = list_entry(list, struct snd_rawmidi_substream, list);
785 		sprintf(substream->name,
786 			"Miditerminal %d", substream->number+1);
787 	}
788 	/* input */
789 	list_for_each(list,
790 		      &rmidi->streams[SNDRV_RAWMIDI_STREAM_INPUT].substreams) {
791 		substream = list_entry(list, struct snd_rawmidi_substream, list);
792 		mts->midi_input_substream[substream->number] = substream;
793 		switch(substream->number) {
794 		case MTS64_SMPTE_SUBSTREAM:
795 			strcpy(substream->name, "Miditerminal SMPTE");
796 			break;
797 		default:
798 			sprintf(substream->name,
799 				"Miditerminal %d", substream->number+1);
800 		}
801 	}
802 
803 	/* controls */
804 	err = snd_mts64_ctl_create(card, mts);
805 
806 	return err;
807 }
808 
809 /*********************************************************************
810  * parport stuff
811  *********************************************************************/
812 static void snd_mts64_interrupt(void *private)
813 {
814 	struct mts64 *mts = ((struct snd_card*)private)->private_data;
815 	u16 ret;
816 	u8 status, data;
817 	struct snd_rawmidi_substream *substream;
818 
819 	spin_lock(&mts->lock);
820 	ret = mts64_read(mts->pardev->port);
821 	data = ret & 0x00ff;
822 	status = ret >> 8;
823 
824 	if (status & MTS64_STAT_PORT) {
825 		mts->current_midi_input_port = mts64_map_midi_input(data);
826 	} else {
827 		if (mts->current_midi_input_port == -1)
828 			goto __out;
829 		substream = mts->midi_input_substream[mts->current_midi_input_port];
830 		if (mts->mode[substream->number] & MTS64_MODE_INPUT_TRIGGERED)
831 			snd_rawmidi_receive(substream, &data, 1);
832 	}
833 __out:
834 	spin_unlock(&mts->lock);
835 }
836 
837 static void snd_mts64_attach(struct parport *p)
838 {
839 	struct platform_device *device;
840 
841 	device = platform_device_alloc(PLATFORM_DRIVER, device_count);
842 	if (!device)
843 		return;
844 
845 	/* Temporary assignment to forward the parport */
846 	platform_set_drvdata(device, p);
847 
848 	if (platform_device_add(device) < 0) {
849 		platform_device_put(device);
850 		return;
851 	}
852 
853 	/* Since we dont get the return value of probe
854 	 * We need to check if device probing succeeded or not */
855 	if (!platform_get_drvdata(device)) {
856 		platform_device_unregister(device);
857 		return;
858 	}
859 
860 	/* register device in global table */
861 	platform_devices[device_count] = device;
862 	device_count++;
863 }
864 
865 static void snd_mts64_detach(struct parport *p)
866 {
867 	/* nothing to do here */
868 }
869 
870 static int snd_mts64_dev_probe(struct pardevice *pardev)
871 {
872 	if (strcmp(pardev->name, DRIVER_NAME))
873 		return -ENODEV;
874 
875 	return 0;
876 }
877 
878 static struct parport_driver mts64_parport_driver = {
879 	.name		= "mts64",
880 	.probe		= snd_mts64_dev_probe,
881 	.match_port	= snd_mts64_attach,
882 	.detach		= snd_mts64_detach,
883 	.devmodel	= true,
884 };
885 
886 /*********************************************************************
887  * platform stuff
888  *********************************************************************/
889 static void snd_mts64_card_private_free(struct snd_card *card)
890 {
891 	struct mts64 *mts = card->private_data;
892 	struct pardevice *pardev = mts->pardev;
893 
894 	if (pardev) {
895 		parport_release(pardev);
896 		parport_unregister_device(pardev);
897 	}
898 
899 	snd_mts64_free(mts);
900 }
901 
902 static int snd_mts64_probe(struct platform_device *pdev)
903 {
904 	struct pardevice *pardev;
905 	struct parport *p;
906 	int dev = pdev->id;
907 	struct snd_card *card = NULL;
908 	struct mts64 *mts = NULL;
909 	int err;
910 	struct pardev_cb mts64_cb = {
911 		.preempt = NULL,
912 		.wakeup = NULL,
913 		.irq_func = snd_mts64_interrupt,	/* ISR */
914 		.flags = PARPORT_DEV_EXCL,		/* flags */
915 	};
916 
917 	p = platform_get_drvdata(pdev);
918 	platform_set_drvdata(pdev, NULL);
919 
920 	if (dev >= SNDRV_CARDS)
921 		return -ENODEV;
922 	if (!enable[dev])
923 		return -ENOENT;
924 
925 	err = snd_card_new(&pdev->dev, index[dev], id[dev], THIS_MODULE,
926 			   0, &card);
927 	if (err < 0) {
928 		snd_printd("Cannot create card\n");
929 		return err;
930 	}
931 	strcpy(card->driver, DRIVER_NAME);
932 	strcpy(card->shortname, "ESI " CARD_NAME);
933 	sprintf(card->longname,  "%s at 0x%lx, irq %i",
934 		card->shortname, p->base, p->irq);
935 
936 	mts64_cb.private = card;			 /* private */
937 	pardev = parport_register_dev_model(p,		 /* port */
938 					    DRIVER_NAME, /* name */
939 					    &mts64_cb,	 /* callbacks */
940 					    pdev->id);	 /* device number */
941 	if (!pardev) {
942 		snd_printd("Cannot register pardevice\n");
943 		err = -EIO;
944 		goto __err;
945 	}
946 
947 	/* claim parport */
948 	if (parport_claim(pardev)) {
949 		snd_printd("Cannot claim parport 0x%lx\n", pardev->port->base);
950 		err = -EIO;
951 		goto free_pardev;
952 	}
953 
954 	if ((err = snd_mts64_create(card, pardev, &mts)) < 0) {
955 		snd_printd("Cannot create main component\n");
956 		goto release_pardev;
957 	}
958 	card->private_data = mts;
959 	card->private_free = snd_mts64_card_private_free;
960 
961 	err = mts64_probe(p);
962 	if (err) {
963 		err = -EIO;
964 		goto __err;
965 	}
966 
967 	if ((err = snd_mts64_rawmidi_create(card)) < 0) {
968 		snd_printd("Creating Rawmidi component failed\n");
969 		goto __err;
970 	}
971 
972 	/* init device */
973 	if ((err = mts64_device_init(p)) < 0)
974 		goto __err;
975 
976 	platform_set_drvdata(pdev, card);
977 
978 	/* At this point card will be usable */
979 	if ((err = snd_card_register(card)) < 0) {
980 		snd_printd("Cannot register card\n");
981 		goto __err;
982 	}
983 
984 	snd_printk(KERN_INFO "ESI Miditerminal 4140 on 0x%lx\n", p->base);
985 	return 0;
986 
987 release_pardev:
988 	parport_release(pardev);
989 free_pardev:
990 	parport_unregister_device(pardev);
991 __err:
992 	snd_card_free(card);
993 	return err;
994 }
995 
996 static int snd_mts64_remove(struct platform_device *pdev)
997 {
998 	struct snd_card *card = platform_get_drvdata(pdev);
999 
1000 	if (card)
1001 		snd_card_free(card);
1002 
1003 	return 0;
1004 }
1005 
1006 static struct platform_driver snd_mts64_driver = {
1007 	.probe  = snd_mts64_probe,
1008 	.remove = snd_mts64_remove,
1009 	.driver = {
1010 		.name = PLATFORM_DRIVER,
1011 	}
1012 };
1013 
1014 /*********************************************************************
1015  * module init stuff
1016  *********************************************************************/
1017 static void snd_mts64_unregister_all(void)
1018 {
1019 	int i;
1020 
1021 	for (i = 0; i < SNDRV_CARDS; ++i) {
1022 		if (platform_devices[i]) {
1023 			platform_device_unregister(platform_devices[i]);
1024 			platform_devices[i] = NULL;
1025 		}
1026 	}
1027 	platform_driver_unregister(&snd_mts64_driver);
1028 	parport_unregister_driver(&mts64_parport_driver);
1029 }
1030 
1031 static int __init snd_mts64_module_init(void)
1032 {
1033 	int err;
1034 
1035 	if ((err = platform_driver_register(&snd_mts64_driver)) < 0)
1036 		return err;
1037 
1038 	if (parport_register_driver(&mts64_parport_driver) != 0) {
1039 		platform_driver_unregister(&snd_mts64_driver);
1040 		return -EIO;
1041 	}
1042 
1043 	if (device_count == 0) {
1044 		snd_mts64_unregister_all();
1045 		return -ENODEV;
1046 	}
1047 
1048 	return 0;
1049 }
1050 
1051 static void __exit snd_mts64_module_exit(void)
1052 {
1053 	snd_mts64_unregister_all();
1054 }
1055 
1056 module_init(snd_mts64_module_init);
1057 module_exit(snd_mts64_module_exit);
1058