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>
31 #define SNDRV_SEQ_OSS_MAX_SYNTH_NAME 30
32 #define MAX_SYSEX_BUFLEN 128
36 * definition of synth info records
40 struct seq_oss_synth_sysex_t {
43 unsigned char buf[MAX_SYSEX_BUFLEN];
47 struct seq_oss_synth_t {
55 char name[SNDRV_SEQ_OSS_MAX_SYNTH_NAME];
56 snd_seq_oss_callback_t oper;
61 snd_use_lock_t use_lock;
68 static int max_synth_devs;
69 static seq_oss_synth_t *synth_devs[SNDRV_SEQ_OSS_MAX_SYNTH_DEVS];
70 static seq_oss_synth_t midi_synth_dev = {
72 SYNTH_TYPE_MIDI, /* synth_type */
73 0, /* synth_subtype */
78 static spinlock_t register_lock = SPIN_LOCK_UNLOCKED;
83 static seq_oss_synth_t *get_synthdev(seq_oss_devinfo_t *dp, int dev);
84 static void reset_channels(seq_oss_synthinfo_t *info);
87 * global initialization
90 snd_seq_oss_synth_init(void)
92 snd_use_lock_init(&midi_synth_dev.use_lock);
96 * registration of the synth device
99 snd_seq_oss_synth_register(snd_seq_device_t *dev)
102 seq_oss_synth_t *rec;
103 snd_seq_oss_reg_t *reg = SNDRV_SEQ_DEVICE_ARGPTR(dev);
106 if ((rec = kcalloc(1, sizeof(*rec), GFP_KERNEL)) == NULL) {
107 snd_printk(KERN_ERR "can't malloc synth info\n");
110 rec->seq_device = -1;
111 rec->synth_type = reg->type;
112 rec->synth_subtype = reg->subtype;
113 rec->nr_voices = reg->nvoices;
114 rec->oper = reg->oper;
115 rec->private_data = reg->private_data;
117 snd_use_lock_init(&rec->use_lock);
119 /* copy and truncate the name of synth device */
120 strlcpy(rec->name, dev->name, sizeof(rec->name));
123 spin_lock_irqsave(®ister_lock, flags);
124 for (i = 0; i < max_synth_devs; i++) {
125 if (synth_devs[i] == NULL)
128 if (i >= max_synth_devs) {
129 if (max_synth_devs >= SNDRV_SEQ_OSS_MAX_SYNTH_DEVS) {
130 spin_unlock_irqrestore(®ister_lock, flags);
131 snd_printk(KERN_ERR "no more synth slot\n");
139 debug_printk(("synth %s registered %d\n", rec->name, i));
140 spin_unlock_irqrestore(®ister_lock, flags);
141 dev->driver_data = rec;
142 #ifdef SNDRV_OSS_INFO_DEV_SYNTH
144 snd_oss_info_register(SNDRV_OSS_INFO_DEV_SYNTH, i, rec->name);
151 snd_seq_oss_synth_unregister(snd_seq_device_t *dev)
154 seq_oss_synth_t *rec = dev->driver_data;
157 spin_lock_irqsave(®ister_lock, flags);
158 for (index = 0; index < max_synth_devs; index++) {
159 if (synth_devs[index] == rec)
162 if (index >= max_synth_devs) {
163 spin_unlock_irqrestore(®ister_lock, flags);
164 snd_printk(KERN_ERR "can't unregister synth\n");
167 synth_devs[index] = NULL;
168 if (index == max_synth_devs - 1) {
169 for (index--; index >= 0; index--) {
170 if (synth_devs[index])
173 max_synth_devs = index + 1;
175 spin_unlock_irqrestore(®ister_lock, flags);
176 #ifdef SNDRV_OSS_INFO_DEV_SYNTH
177 if (rec->seq_device < SNDRV_CARDS)
178 snd_oss_info_unregister(SNDRV_OSS_INFO_DEV_SYNTH, rec->seq_device);
181 snd_use_lock_sync(&rec->use_lock);
190 static seq_oss_synth_t *
193 seq_oss_synth_t *rec;
196 spin_lock_irqsave(®ister_lock, flags);
197 rec = synth_devs[dev];
199 snd_use_lock_use(&rec->use_lock);
200 spin_unlock_irqrestore(®ister_lock, flags);
206 * set up synth tables
210 snd_seq_oss_synth_setup(seq_oss_devinfo_t *dp)
213 seq_oss_synth_t *rec;
214 seq_oss_synthinfo_t *info;
216 dp->max_synthdev = max_synth_devs;
217 dp->synth_opened = 0;
218 memset(dp->synths, 0, sizeof(dp->synths));
219 for (i = 0; i < dp->max_synthdev; i++) {
223 if (rec->oper.open == NULL || rec->oper.close == NULL) {
224 snd_use_lock_free(&rec->use_lock);
227 info = &dp->synths[i];
228 info->arg.app_index = dp->port;
229 info->arg.file_mode = dp->file_mode;
230 info->arg.seq_mode = dp->seq_mode;
231 if (dp->seq_mode == SNDRV_SEQ_OSS_MODE_SYNTH)
232 info->arg.event_passing = SNDRV_SEQ_OSS_PROCESS_EVENTS;
234 info->arg.event_passing = SNDRV_SEQ_OSS_PASS_EVENTS;
236 if (!try_module_get(rec->oper.owner)) {
237 snd_use_lock_free(&rec->use_lock);
240 if (rec->oper.open(&info->arg, rec->private_data) < 0) {
241 module_put(rec->oper.owner);
242 snd_use_lock_free(&rec->use_lock);
245 info->nr_voices = rec->nr_voices;
246 if (info->nr_voices > 0) {
247 info->ch = kcalloc(info->nr_voices, sizeof(seq_oss_chinfo_t), GFP_KERNEL);
250 reset_channels(info);
252 debug_printk(("synth %d assigned\n", i));
256 snd_use_lock_free(&rec->use_lock);
262 * set up synth tables for MIDI emulation - /dev/music mode only
266 snd_seq_oss_synth_setup_midi(seq_oss_devinfo_t *dp)
270 if (dp->max_synthdev >= SNDRV_SEQ_OSS_MAX_SYNTH_DEVS)
273 for (i = 0; i < dp->max_mididev; i++) {
274 seq_oss_synthinfo_t *info;
275 info = &dp->synths[dp->max_synthdev];
276 if (snd_seq_oss_midi_open(dp, i, dp->file_mode) < 0)
278 info->arg.app_index = dp->port;
279 info->arg.file_mode = dp->file_mode;
280 info->arg.seq_mode = dp->seq_mode;
281 info->arg.private_data = info;
283 info->midi_mapped = i;
284 info->arg.event_passing = SNDRV_SEQ_OSS_PASS_EVENTS;
285 snd_seq_oss_midi_get_addr(dp, i, &info->arg.addr);
287 midi_synth_dev.opened++;
289 if (dp->max_synthdev >= SNDRV_SEQ_OSS_MAX_SYNTH_DEVS)
296 * clean up synth tables
300 snd_seq_oss_synth_cleanup(seq_oss_devinfo_t *dp)
303 seq_oss_synth_t *rec;
304 seq_oss_synthinfo_t *info;
306 snd_assert(dp->max_synthdev <= SNDRV_SEQ_OSS_MAX_SYNTH_DEVS, return);
307 for (i = 0; i < dp->max_synthdev; i++) {
308 info = &dp->synths[i];
312 if (midi_synth_dev.opened > 0) {
313 snd_seq_oss_midi_close(dp, info->midi_mapped);
314 midi_synth_dev.opened--;
320 if (rec->opened > 0) {
321 debug_printk(("synth %d closed\n", i));
322 rec->oper.close(&info->arg);
323 module_put(rec->oper.owner);
326 snd_use_lock_free(&rec->use_lock);
337 dp->synth_opened = 0;
338 dp->max_synthdev = 0;
342 * check if the specified device is MIDI mapped device
345 is_midi_dev(seq_oss_devinfo_t *dp, int dev)
347 if (dev < 0 || dev >= dp->max_synthdev)
349 if (dp->synths[dev].is_midi)
355 * return synth device information pointer
357 static seq_oss_synth_t *
358 get_synthdev(seq_oss_devinfo_t *dp, int dev)
360 seq_oss_synth_t *rec;
361 if (dev < 0 || dev >= dp->max_synthdev)
363 if (! dp->synths[dev].opened)
365 if (dp->synths[dev].is_midi)
366 return &midi_synth_dev;
367 if ((rec = get_sdev(dev)) == NULL)
370 snd_use_lock_free(&rec->use_lock);
378 * reset note and velocity on each channel.
381 reset_channels(seq_oss_synthinfo_t *info)
384 if (info->ch == NULL || ! info->nr_voices)
386 for (i = 0; i < info->nr_voices; i++) {
387 info->ch[i].note = -1;
394 * reset synth device:
395 * call reset callback. if no callback is defined, send a heartbeat
396 * event to the corresponding port.
399 snd_seq_oss_synth_reset(seq_oss_devinfo_t *dp, int dev)
401 seq_oss_synth_t *rec;
402 seq_oss_synthinfo_t *info;
404 snd_assert(dev >= 0 && dev < dp->max_synthdev, return);
405 info = &dp->synths[dev];
409 info->sysex->len = 0; /* reset sysex */
410 reset_channels(info);
412 if (midi_synth_dev.opened <= 0)
414 snd_seq_oss_midi_reset(dp, info->midi_mapped);
415 /* reopen the device */
416 snd_seq_oss_midi_close(dp, dev);
417 if (snd_seq_oss_midi_open(dp, info->midi_mapped,
418 dp->file_mode) < 0) {
419 midi_synth_dev.opened--;
436 if (rec->oper.reset) {
437 rec->oper.reset(&info->arg);
440 memset(&ev, 0, sizeof(ev));
441 snd_seq_oss_fill_addr(dp, &ev, info->arg.addr.client,
442 info->arg.addr.port);
443 ev.type = SNDRV_SEQ_EVENT_RESET;
444 snd_seq_oss_dispatch(dp, &ev, 0, 0);
446 snd_use_lock_free(&rec->use_lock);
451 * load a patch record:
452 * call load_patch callback function
455 snd_seq_oss_synth_load_patch(seq_oss_devinfo_t *dp, int dev, int fmt,
456 const char __user *buf, int p, int c)
458 seq_oss_synth_t *rec;
461 if (dev < 0 || dev >= dp->max_synthdev)
464 if (is_midi_dev(dp, dev))
466 if ((rec = get_synthdev(dp, dev)) == NULL)
469 if (rec->oper.load_patch == NULL)
472 rc = rec->oper.load_patch(&dp->synths[dev].arg, fmt, buf, p, c);
473 snd_use_lock_free(&rec->use_lock);
478 * check if the device is valid synth device
481 snd_seq_oss_synth_is_valid(seq_oss_devinfo_t *dp, int dev)
483 seq_oss_synth_t *rec;
484 rec = get_synthdev(dp, dev);
486 snd_use_lock_free(&rec->use_lock);
494 * receive OSS 6 byte sysex packet:
495 * the full sysex message will be sent if it reaches to the end of data
499 snd_seq_oss_synth_sysex(seq_oss_devinfo_t *dp, int dev, unsigned char *buf, snd_seq_event_t *ev)
503 seq_oss_synth_sysex_t *sysex;
505 if (! snd_seq_oss_synth_is_valid(dp, dev))
508 sysex = dp->synths[dev].sysex;
510 sysex = kcalloc(1, sizeof(*sysex), GFP_KERNEL);
513 dp->synths[dev].sysex = sysex;
517 dest = sysex->buf + sysex->len;
518 /* copy 6 byte packet to the buffer */
519 for (i = 0; i < 6; i++) {
520 if (buf[i] == 0xff) {
526 if (sysex->len >= MAX_SYSEX_BUFLEN) {
533 if (sysex->len && send) {
537 return -EINVAL; /* skip */
539 /* copy the data to event record and send it */
540 ev->flags = SNDRV_SEQ_EVENT_LENGTH_VARIABLE;
541 if (snd_seq_oss_synth_addr(dp, dev, ev))
543 ev->data.ext.len = sysex->len;
544 ev->data.ext.ptr = sysex->buf;
549 return -EINVAL; /* skip */
553 * fill the event source/destination addresses
556 snd_seq_oss_synth_addr(seq_oss_devinfo_t *dp, int dev, snd_seq_event_t *ev)
558 if (! snd_seq_oss_synth_is_valid(dp, dev))
560 snd_seq_oss_fill_addr(dp, ev, dp->synths[dev].arg.addr.client,
561 dp->synths[dev].arg.addr.port);
567 * OSS compatible ioctl
570 snd_seq_oss_synth_ioctl(seq_oss_devinfo_t *dp, int dev, unsigned int cmd, unsigned long addr)
572 seq_oss_synth_t *rec;
575 if (is_midi_dev(dp, dev))
577 if ((rec = get_synthdev(dp, dev)) == NULL)
579 if (rec->oper.ioctl == NULL)
582 rc = rec->oper.ioctl(&dp->synths[dev].arg, cmd, addr);
583 snd_use_lock_free(&rec->use_lock);
589 * send OSS raw events - SEQ_PRIVATE and SEQ_VOLUME
592 snd_seq_oss_synth_raw_event(seq_oss_devinfo_t *dp, int dev, unsigned char *data, snd_seq_event_t *ev)
594 if (! snd_seq_oss_synth_is_valid(dp, dev) || is_midi_dev(dp, dev))
596 ev->type = SNDRV_SEQ_EVENT_OSS;
597 memcpy(ev->data.raw8.d, data, 8);
598 return snd_seq_oss_synth_addr(dp, dev, ev);
603 * create OSS compatible synth_info record
606 snd_seq_oss_synth_make_info(seq_oss_devinfo_t *dp, int dev, struct synth_info *inf)
608 seq_oss_synth_t *rec;
610 if (dp->synths[dev].is_midi) {
611 struct midi_info minf;
612 snd_seq_oss_midi_make_info(dp, dp->synths[dev].midi_mapped, &minf);
613 inf->synth_type = SYNTH_TYPE_MIDI;
614 inf->synth_subtype = 0;
617 strlcpy(inf->name, minf.name, sizeof(inf->name));
619 if ((rec = get_synthdev(dp, dev)) == NULL)
621 inf->synth_type = rec->synth_type;
622 inf->synth_subtype = rec->synth_subtype;
623 inf->nr_voices = rec->nr_voices;
625 strlcpy(inf->name, rec->name, sizeof(inf->name));
626 snd_use_lock_free(&rec->use_lock);
636 snd_seq_oss_synth_info_read(snd_info_buffer_t *buf)
639 seq_oss_synth_t *rec;
641 snd_iprintf(buf, "\nNumber of synth devices: %d\n", max_synth_devs);
642 for (i = 0; i < max_synth_devs; i++) {
643 snd_iprintf(buf, "\nsynth %d: ", i);
646 snd_iprintf(buf, "*empty*\n");
649 snd_iprintf(buf, "[%s]\n", rec->name);
650 snd_iprintf(buf, " type 0x%x : subtype 0x%x : voices %d\n",
651 rec->synth_type, rec->synth_subtype,
653 snd_iprintf(buf, " capabilities : ioctl %s / load_patch %s\n",
654 enabled_str((long)rec->oper.ioctl),
655 enabled_str((long)rec->oper.load_patch));
656 snd_use_lock_free(&rec->use_lock);