2 * OSS compatible sequencer driver
4 * synth device handlers
6 * Copyright (C) 1998,99 Takashi Iwai <tiwai@suse.de>
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 #include "seq_oss_synth.h"
24 #include "seq_oss_midi.h"
25 #include "../seq_lock.h"
26 #include <linux/init.h>
27 #include <linux/module.h>
28 #include <linux/slab.h>
33 #define SNDRV_SEQ_OSS_MAX_SYNTH_NAME 30
34 #define MAX_SYSEX_BUFLEN 128
38 * definition of synth info records
42 struct seq_oss_synth_sysex {
45 unsigned char buf[MAX_SYSEX_BUFLEN];
49 struct seq_oss_synth {
57 char name[SNDRV_SEQ_OSS_MAX_SYNTH_NAME];
58 struct snd_seq_oss_callback oper;
63 snd_use_lock_t use_lock;
70 static int max_synth_devs;
71 static struct seq_oss_synth *synth_devs[SNDRV_SEQ_OSS_MAX_SYNTH_DEVS];
72 static struct seq_oss_synth midi_synth_dev = {
74 SYNTH_TYPE_MIDI, /* synth_type */
75 0, /* synth_subtype */
80 static DEFINE_SPINLOCK(register_lock);
85 static struct seq_oss_synth *get_synthdev(struct seq_oss_devinfo *dp, int dev);
86 static void reset_channels(struct seq_oss_synthinfo *info);
89 * global initialization
92 snd_seq_oss_synth_init(void)
94 snd_use_lock_init(&midi_synth_dev.use_lock);
98 * registration of the synth device
101 snd_seq_oss_synth_probe(struct device *_dev)
103 struct snd_seq_device *dev = to_seq_dev(_dev);
105 struct seq_oss_synth *rec;
106 struct snd_seq_oss_reg *reg = SNDRV_SEQ_DEVICE_ARGPTR(dev);
109 rec = kzalloc(sizeof(*rec), GFP_KERNEL);
112 rec->seq_device = -1;
113 rec->synth_type = reg->type;
114 rec->synth_subtype = reg->subtype;
115 rec->nr_voices = reg->nvoices;
116 rec->oper = reg->oper;
117 rec->private_data = reg->private_data;
119 snd_use_lock_init(&rec->use_lock);
121 /* copy and truncate the name of synth device */
122 strlcpy(rec->name, dev->name, sizeof(rec->name));
125 spin_lock_irqsave(®ister_lock, flags);
126 for (i = 0; i < max_synth_devs; i++) {
127 if (synth_devs[i] == NULL)
130 if (i >= max_synth_devs) {
131 if (max_synth_devs >= SNDRV_SEQ_OSS_MAX_SYNTH_DEVS) {
132 spin_unlock_irqrestore(®ister_lock, flags);
133 pr_err("ALSA: seq_oss: no more synth slot\n");
141 spin_unlock_irqrestore(®ister_lock, flags);
142 dev->driver_data = rec;
143 #ifdef SNDRV_OSS_INFO_DEV_SYNTH
145 snd_oss_info_register(SNDRV_OSS_INFO_DEV_SYNTH, i, rec->name);
152 snd_seq_oss_synth_remove(struct device *_dev)
154 struct snd_seq_device *dev = to_seq_dev(_dev);
156 struct seq_oss_synth *rec = dev->driver_data;
159 spin_lock_irqsave(®ister_lock, flags);
160 for (index = 0; index < max_synth_devs; index++) {
161 if (synth_devs[index] == rec)
164 if (index >= max_synth_devs) {
165 spin_unlock_irqrestore(®ister_lock, flags);
166 pr_err("ALSA: seq_oss: can't unregister synth\n");
169 synth_devs[index] = NULL;
170 if (index == max_synth_devs - 1) {
171 for (index--; index >= 0; index--) {
172 if (synth_devs[index])
175 max_synth_devs = index + 1;
177 spin_unlock_irqrestore(®ister_lock, flags);
178 #ifdef SNDRV_OSS_INFO_DEV_SYNTH
179 if (rec->seq_device < SNDRV_CARDS)
180 snd_oss_info_unregister(SNDRV_OSS_INFO_DEV_SYNTH, rec->seq_device);
183 snd_use_lock_sync(&rec->use_lock);
192 static struct seq_oss_synth *
195 struct seq_oss_synth *rec;
198 spin_lock_irqsave(®ister_lock, flags);
199 rec = synth_devs[dev];
201 snd_use_lock_use(&rec->use_lock);
202 spin_unlock_irqrestore(®ister_lock, flags);
208 * set up synth tables
212 snd_seq_oss_synth_setup(struct seq_oss_devinfo *dp)
215 struct seq_oss_synth *rec;
216 struct seq_oss_synthinfo *info;
218 dp->max_synthdev = max_synth_devs;
219 dp->synth_opened = 0;
220 memset(dp->synths, 0, sizeof(dp->synths));
221 for (i = 0; i < dp->max_synthdev; i++) {
225 if (rec->oper.open == NULL || rec->oper.close == NULL) {
226 snd_use_lock_free(&rec->use_lock);
229 info = &dp->synths[i];
230 info->arg.app_index = dp->port;
231 info->arg.file_mode = dp->file_mode;
232 info->arg.seq_mode = dp->seq_mode;
233 if (dp->seq_mode == SNDRV_SEQ_OSS_MODE_SYNTH)
234 info->arg.event_passing = SNDRV_SEQ_OSS_PROCESS_EVENTS;
236 info->arg.event_passing = SNDRV_SEQ_OSS_PASS_EVENTS;
238 if (!try_module_get(rec->oper.owner)) {
239 snd_use_lock_free(&rec->use_lock);
242 if (rec->oper.open(&info->arg, rec->private_data) < 0) {
243 module_put(rec->oper.owner);
244 snd_use_lock_free(&rec->use_lock);
247 info->nr_voices = rec->nr_voices;
248 if (info->nr_voices > 0) {
249 info->ch = kcalloc(info->nr_voices, sizeof(struct seq_oss_chinfo), GFP_KERNEL);
251 rec->oper.close(&info->arg);
252 module_put(rec->oper.owner);
253 snd_use_lock_free(&rec->use_lock);
256 reset_channels(info);
261 snd_use_lock_free(&rec->use_lock);
267 * set up synth tables for MIDI emulation - /dev/music mode only
271 snd_seq_oss_synth_setup_midi(struct seq_oss_devinfo *dp)
275 if (dp->max_synthdev >= SNDRV_SEQ_OSS_MAX_SYNTH_DEVS)
278 for (i = 0; i < dp->max_mididev; i++) {
279 struct seq_oss_synthinfo *info;
280 info = &dp->synths[dp->max_synthdev];
281 if (snd_seq_oss_midi_open(dp, i, dp->file_mode) < 0)
283 info->arg.app_index = dp->port;
284 info->arg.file_mode = dp->file_mode;
285 info->arg.seq_mode = dp->seq_mode;
286 info->arg.private_data = info;
288 info->midi_mapped = i;
289 info->arg.event_passing = SNDRV_SEQ_OSS_PASS_EVENTS;
290 snd_seq_oss_midi_get_addr(dp, i, &info->arg.addr);
292 midi_synth_dev.opened++;
294 if (dp->max_synthdev >= SNDRV_SEQ_OSS_MAX_SYNTH_DEVS)
301 * clean up synth tables
305 snd_seq_oss_synth_cleanup(struct seq_oss_devinfo *dp)
308 struct seq_oss_synth *rec;
309 struct seq_oss_synthinfo *info;
311 if (snd_BUG_ON(dp->max_synthdev > SNDRV_SEQ_OSS_MAX_SYNTH_DEVS))
313 for (i = 0; i < dp->max_synthdev; i++) {
314 info = &dp->synths[i];
318 if (midi_synth_dev.opened > 0) {
319 snd_seq_oss_midi_close(dp, info->midi_mapped);
320 midi_synth_dev.opened--;
326 if (rec->opened > 0) {
327 rec->oper.close(&info->arg);
328 module_put(rec->oper.owner);
331 snd_use_lock_free(&rec->use_lock);
338 dp->synth_opened = 0;
339 dp->max_synthdev = 0;
343 * check if the specified device is MIDI mapped device
346 is_midi_dev(struct seq_oss_devinfo *dp, int dev)
348 if (dev < 0 || dev >= dp->max_synthdev)
350 if (dp->synths[dev].is_midi)
356 * return synth device information pointer
358 static struct seq_oss_synth *
359 get_synthdev(struct seq_oss_devinfo *dp, int dev)
361 struct seq_oss_synth *rec;
362 if (dev < 0 || dev >= dp->max_synthdev)
364 if (! dp->synths[dev].opened)
366 if (dp->synths[dev].is_midi)
367 return &midi_synth_dev;
368 if ((rec = get_sdev(dev)) == NULL)
371 snd_use_lock_free(&rec->use_lock);
379 * reset note and velocity on each channel.
382 reset_channels(struct seq_oss_synthinfo *info)
385 if (info->ch == NULL || ! info->nr_voices)
387 for (i = 0; i < info->nr_voices; i++) {
388 info->ch[i].note = -1;
395 * reset synth device:
396 * call reset callback. if no callback is defined, send a heartbeat
397 * event to the corresponding port.
400 snd_seq_oss_synth_reset(struct seq_oss_devinfo *dp, int dev)
402 struct seq_oss_synth *rec;
403 struct seq_oss_synthinfo *info;
405 if (snd_BUG_ON(dev < 0 || dev >= dp->max_synthdev))
407 info = &dp->synths[dev];
411 info->sysex->len = 0; /* reset sysex */
412 reset_channels(info);
414 if (midi_synth_dev.opened <= 0)
416 snd_seq_oss_midi_reset(dp, info->midi_mapped);
417 /* reopen the device */
418 snd_seq_oss_midi_close(dp, dev);
419 if (snd_seq_oss_midi_open(dp, info->midi_mapped,
420 dp->file_mode) < 0) {
421 midi_synth_dev.opened--;
434 if (rec->oper.reset) {
435 rec->oper.reset(&info->arg);
437 struct snd_seq_event ev;
438 memset(&ev, 0, sizeof(ev));
439 snd_seq_oss_fill_addr(dp, &ev, info->arg.addr.client,
440 info->arg.addr.port);
441 ev.type = SNDRV_SEQ_EVENT_RESET;
442 snd_seq_oss_dispatch(dp, &ev, 0, 0);
444 snd_use_lock_free(&rec->use_lock);
449 * load a patch record:
450 * call load_patch callback function
453 snd_seq_oss_synth_load_patch(struct seq_oss_devinfo *dp, int dev, int fmt,
454 const char __user *buf, int p, int c)
456 struct seq_oss_synth *rec;
459 if (dev < 0 || dev >= dp->max_synthdev)
462 if (is_midi_dev(dp, dev))
464 if ((rec = get_synthdev(dp, dev)) == NULL)
467 if (rec->oper.load_patch == NULL)
470 rc = rec->oper.load_patch(&dp->synths[dev].arg, fmt, buf, p, c);
471 snd_use_lock_free(&rec->use_lock);
476 * check if the device is valid synth device
479 snd_seq_oss_synth_is_valid(struct seq_oss_devinfo *dp, int dev)
481 struct seq_oss_synth *rec;
482 rec = get_synthdev(dp, dev);
484 snd_use_lock_free(&rec->use_lock);
492 * receive OSS 6 byte sysex packet:
493 * the full sysex message will be sent if it reaches to the end of data
497 snd_seq_oss_synth_sysex(struct seq_oss_devinfo *dp, int dev, unsigned char *buf, struct snd_seq_event *ev)
501 struct seq_oss_synth_sysex *sysex;
503 if (! snd_seq_oss_synth_is_valid(dp, dev))
506 sysex = dp->synths[dev].sysex;
508 sysex = kzalloc(sizeof(*sysex), GFP_KERNEL);
511 dp->synths[dev].sysex = sysex;
515 dest = sysex->buf + sysex->len;
516 /* copy 6 byte packet to the buffer */
517 for (i = 0; i < 6; i++) {
518 if (buf[i] == 0xff) {
524 if (sysex->len >= MAX_SYSEX_BUFLEN) {
531 if (sysex->len && send) {
535 return -EINVAL; /* skip */
537 /* copy the data to event record and send it */
538 ev->flags = SNDRV_SEQ_EVENT_LENGTH_VARIABLE;
539 if (snd_seq_oss_synth_addr(dp, dev, ev))
541 ev->data.ext.len = sysex->len;
542 ev->data.ext.ptr = sysex->buf;
547 return -EINVAL; /* skip */
551 * fill the event source/destination addresses
554 snd_seq_oss_synth_addr(struct seq_oss_devinfo *dp, int dev, struct snd_seq_event *ev)
556 if (! snd_seq_oss_synth_is_valid(dp, dev))
558 snd_seq_oss_fill_addr(dp, ev, dp->synths[dev].arg.addr.client,
559 dp->synths[dev].arg.addr.port);
565 * OSS compatible ioctl
568 snd_seq_oss_synth_ioctl(struct seq_oss_devinfo *dp, int dev, unsigned int cmd, unsigned long addr)
570 struct seq_oss_synth *rec;
573 if (is_midi_dev(dp, dev))
575 if ((rec = get_synthdev(dp, dev)) == NULL)
577 if (rec->oper.ioctl == NULL)
580 rc = rec->oper.ioctl(&dp->synths[dev].arg, cmd, addr);
581 snd_use_lock_free(&rec->use_lock);
587 * send OSS raw events - SEQ_PRIVATE and SEQ_VOLUME
590 snd_seq_oss_synth_raw_event(struct seq_oss_devinfo *dp, int dev, unsigned char *data, struct snd_seq_event *ev)
592 if (! snd_seq_oss_synth_is_valid(dp, dev) || is_midi_dev(dp, dev))
594 ev->type = SNDRV_SEQ_EVENT_OSS;
595 memcpy(ev->data.raw8.d, data, 8);
596 return snd_seq_oss_synth_addr(dp, dev, ev);
601 * create OSS compatible synth_info record
604 snd_seq_oss_synth_make_info(struct seq_oss_devinfo *dp, int dev, struct synth_info *inf)
606 struct seq_oss_synth *rec;
608 if (dev < 0 || dev >= dp->max_synthdev)
611 if (dp->synths[dev].is_midi) {
612 struct midi_info minf;
613 snd_seq_oss_midi_make_info(dp, dp->synths[dev].midi_mapped, &minf);
614 inf->synth_type = SYNTH_TYPE_MIDI;
615 inf->synth_subtype = 0;
618 strlcpy(inf->name, minf.name, sizeof(inf->name));
620 if ((rec = get_synthdev(dp, dev)) == NULL)
622 inf->synth_type = rec->synth_type;
623 inf->synth_subtype = rec->synth_subtype;
624 inf->nr_voices = rec->nr_voices;
626 strlcpy(inf->name, rec->name, sizeof(inf->name));
627 snd_use_lock_free(&rec->use_lock);
633 #ifdef CONFIG_SND_PROC_FS
638 snd_seq_oss_synth_info_read(struct snd_info_buffer *buf)
641 struct seq_oss_synth *rec;
643 snd_iprintf(buf, "\nNumber of synth devices: %d\n", max_synth_devs);
644 for (i = 0; i < max_synth_devs; i++) {
645 snd_iprintf(buf, "\nsynth %d: ", i);
648 snd_iprintf(buf, "*empty*\n");
651 snd_iprintf(buf, "[%s]\n", rec->name);
652 snd_iprintf(buf, " type 0x%x : subtype 0x%x : voices %d\n",
653 rec->synth_type, rec->synth_subtype,
655 snd_iprintf(buf, " capabilities : ioctl %s / load_patch %s\n",
656 enabled_str((long)rec->oper.ioctl),
657 enabled_str((long)rec->oper.load_patch));
658 snd_use_lock_free(&rec->use_lock);
661 #endif /* CONFIG_SND_PROC_FS */