/* * Interface for OSS sequencer emulation * * Copyright (C) 1999 Takashi Iwai <tiwai@suse.de> * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * Changes * 19990227 Steve Ratcliffe Made separate file and merged in latest * midi emulation. */ #include <sound/driver.h> #ifdef CONFIG_SND_SEQUENCER_OSS #include <asm/uaccess.h> #include <sound/core.h> #include "emux_voice.h" #include <sound/asoundef.h> static int snd_emux_open_seq_oss(snd_seq_oss_arg_t *arg, void *closure); static int snd_emux_close_seq_oss(snd_seq_oss_arg_t *arg); static int snd_emux_ioctl_seq_oss(snd_seq_oss_arg_t *arg, unsigned int cmd, unsigned long ioarg); static int snd_emux_load_patch_seq_oss(snd_seq_oss_arg_t *arg, int format, const char __user *buf, int offs, int count); static int snd_emux_reset_seq_oss(snd_seq_oss_arg_t *arg); static int snd_emux_event_oss_input(snd_seq_event_t *ev, int direct, void *private, int atomic, int hop); static void reset_port_mode(snd_emux_port_t *port, int midi_mode); static void emuspec_control(snd_emux_t *emu, snd_emux_port_t *port, int cmd, unsigned char *event, int atomic, int hop); static void gusspec_control(snd_emux_t *emu, snd_emux_port_t *port, int cmd, unsigned char *event, int atomic, int hop); static void fake_event(snd_emux_t *emu, snd_emux_port_t *port, int ch, int param, int val, int atomic, int hop); /* operators */ static snd_seq_oss_callback_t oss_callback = { .owner = THIS_MODULE, .open = snd_emux_open_seq_oss, .close = snd_emux_close_seq_oss, .ioctl = snd_emux_ioctl_seq_oss, .load_patch = snd_emux_load_patch_seq_oss, .reset = snd_emux_reset_seq_oss, }; /* * register OSS synth */ void snd_emux_init_seq_oss(snd_emux_t *emu) { snd_seq_oss_reg_t *arg; snd_seq_device_t *dev; if (snd_seq_device_new(emu->card, 0, SNDRV_SEQ_DEV_ID_OSS, sizeof(snd_seq_oss_reg_t), &dev) < 0) return; emu->oss_synth = dev; strcpy(dev->name, emu->name); arg = SNDRV_SEQ_DEVICE_ARGPTR(dev); arg->type = SYNTH_TYPE_SAMPLE; arg->subtype = SAMPLE_TYPE_AWE32; arg->nvoices = emu->max_voices; arg->oper = oss_callback; arg->private_data = emu; /* register to OSS synth table */ snd_device_register(emu->card, dev); } /* * unregister */ void snd_emux_detach_seq_oss(snd_emux_t *emu) { if (emu->oss_synth) { snd_device_free(emu->card, emu->oss_synth); emu->oss_synth = NULL; } } /* use port number as a unique soundfont client number */ #define SF_CLIENT_NO(p) ((p) + 0x1000) /* * open port for OSS sequencer */ static int snd_emux_open_seq_oss(snd_seq_oss_arg_t *arg, void *closure) { snd_emux_t *emu; snd_emux_port_t *p; snd_seq_port_callback_t callback; char tmpname[64]; emu = closure; snd_assert(arg != NULL && emu != NULL, return -ENXIO); down(&emu->register_mutex); if (!snd_emux_inc_count(emu)) { up(&emu->register_mutex); return -EFAULT; } memset(&callback, 0, sizeof(callback)); callback.owner = THIS_MODULE; callback.event_input = snd_emux_event_oss_input; sprintf(tmpname, "%s OSS Port", emu->name); p = snd_emux_create_port(emu, tmpname, 32, 1, &callback); if (p == NULL) { snd_printk("can't create port\n"); snd_emux_dec_count(emu); up(&emu->register_mutex); return -ENOMEM; } /* fill the argument data */ arg->private_data = p; arg->addr.client = p->chset.client; arg->addr.port = p->chset.port; p->oss_arg = arg; reset_port_mode(p, arg->seq_mode); snd_emux_reset_port(p); up(&emu->register_mutex); return 0; } #define DEFAULT_DRUM_FLAGS ((1<<9) | (1<<25)) /* * reset port mode */ static void reset_port_mode(snd_emux_port_t *port, int midi_mode) { if (midi_mode) { port->port_mode = SNDRV_EMUX_PORT_MODE_OSS_MIDI; port->drum_flags = DEFAULT_DRUM_FLAGS; port->volume_atten = 0; port->oss_arg->event_passing = SNDRV_SEQ_OSS_PROCESS_KEYPRESS; } else { port->port_mode = SNDRV_EMUX_PORT_MODE_OSS_SYNTH; port->drum_flags = 0; port->volume_atten = 32; port->oss_arg->event_passing = SNDRV_SEQ_OSS_PROCESS_EVENTS; } } /* * close port */ static int snd_emux_close_seq_oss(snd_seq_oss_arg_t *arg) { snd_emux_t *emu; snd_emux_port_t *p; snd_assert(arg != NULL, return -ENXIO); p = arg->private_data; snd_assert(p != NULL, return -ENXIO); emu = p->emu; snd_assert(emu != NULL, return -ENXIO); down(&emu->register_mutex); snd_emux_sounds_off_all(p); snd_soundfont_close_check(emu->sflist, SF_CLIENT_NO(p->chset.port)); snd_seq_event_port_detach(p->chset.client, p->chset.port); snd_emux_dec_count(emu); up(&emu->register_mutex); return 0; } /* * load patch */ static int snd_emux_load_patch_seq_oss(snd_seq_oss_arg_t *arg, int format, const char __user *buf, int offs, int count) { snd_emux_t *emu; snd_emux_port_t *p; int rc; snd_assert(arg != NULL, return -ENXIO); p = arg->private_data; snd_assert(p != NULL, return -ENXIO); emu = p->emu; snd_assert(emu != NULL, return -ENXIO); if (format == GUS_PATCH) rc = snd_soundfont_load_guspatch(emu->sflist, buf, count, SF_CLIENT_NO(p->chset.port)); else if (format == SNDRV_OSS_SOUNDFONT_PATCH) { soundfont_patch_info_t patch; if (count < (int)sizeof(patch)) rc = -EINVAL; if (copy_from_user(&patch, buf, sizeof(patch))) rc = -EFAULT; if (patch.type >= SNDRV_SFNT_LOAD_INFO && patch.type <= SNDRV_SFNT_PROBE_DATA) rc = snd_soundfont_load(emu->sflist, buf, count, SF_CLIENT_NO(p->chset.port)); else { if (emu->ops.load_fx) rc = emu->ops.load_fx(emu, patch.type, patch.optarg, buf, count); else rc = -EINVAL; } } else rc = 0; return rc; } /* * ioctl */ static int snd_emux_ioctl_seq_oss(snd_seq_oss_arg_t *arg, unsigned int cmd, unsigned long ioarg) { snd_emux_port_t *p; snd_emux_t *emu; snd_assert(arg != NULL, return -ENXIO); p = arg->private_data; snd_assert(p != NULL, return -ENXIO); emu = p->emu; snd_assert(emu != NULL, return -ENXIO); switch (cmd) { case SNDCTL_SEQ_RESETSAMPLES: snd_soundfont_remove_samples(emu->sflist); return 0; case SNDCTL_SYNTH_MEMAVL: if (emu->memhdr) return snd_util_mem_avail(emu->memhdr); return 0; } return 0; } /* * reset device */ static int snd_emux_reset_seq_oss(snd_seq_oss_arg_t *arg) { snd_emux_port_t *p; snd_assert(arg != NULL, return -ENXIO); p = arg->private_data; snd_assert(p != NULL, return -ENXIO); snd_emux_reset_port(p); return 0; } /* * receive raw events: only SEQ_PRIVATE is accepted. */ static int snd_emux_event_oss_input(snd_seq_event_t *ev, int direct, void *private_data, int atomic, int hop) { snd_emux_t *emu; snd_emux_port_t *p; unsigned char cmd, *data; p = private_data; snd_assert(p != NULL, return -EINVAL); emu = p->emu; snd_assert(emu != NULL, return -EINVAL); if (ev->type != SNDRV_SEQ_EVENT_OSS) return snd_emux_event_input(ev, direct, private_data, atomic, hop); data = ev->data.raw8.d; /* only SEQ_PRIVATE is accepted */ if (data[0] != 0xfe) return 0; cmd = data[2] & _EMUX_OSS_MODE_VALUE_MASK; if (data[2] & _EMUX_OSS_MODE_FLAG) emuspec_control(emu, p, cmd, data, atomic, hop); else gusspec_control(emu, p, cmd, data, atomic, hop); return 0; } /* * OSS/AWE driver specific h/w controls */ static void emuspec_control(snd_emux_t *emu, snd_emux_port_t *port, int cmd, unsigned char *event, int atomic, int hop) { int voice; unsigned short p1; short p2; int i; snd_midi_channel_t *chan; voice = event[3]; if (voice < 0 || voice >= port->chset.max_channels) chan = NULL; else chan = &port->chset.channels[voice]; p1 = *(unsigned short *) &event[4]; p2 = *(short *) &event[6]; switch (cmd) { #if 0 /* don't do this atomically */ case _EMUX_OSS_REMOVE_LAST_SAMPLES: snd_soundfont_remove_unlocked(emu->sflist); break; #endif case _EMUX_OSS_SEND_EFFECT: if (chan) snd_emux_send_effect_oss(port, chan, p1, p2); break; case _EMUX_OSS_TERMINATE_ALL: snd_emux_terminate_all(emu); break; case _EMUX_OSS_TERMINATE_CHANNEL: /*snd_emux_mute_channel(emu, chan);*/ break; case _EMUX_OSS_RESET_CHANNEL: /*snd_emux_channel_init(chset, chan);*/ break; case _EMUX_OSS_RELEASE_ALL: fake_event(emu, port, voice, MIDI_CTL_ALL_NOTES_OFF, 0, atomic, hop); break; case _EMUX_OSS_NOTEOFF_ALL: fake_event(emu, port, voice, MIDI_CTL_ALL_SOUNDS_OFF, 0, atomic, hop); break; case _EMUX_OSS_INITIAL_VOLUME: if (p2) { port->volume_atten = (short)p1; snd_emux_update_port(port, SNDRV_EMUX_UPDATE_VOLUME); } break; case _EMUX_OSS_CHN_PRESSURE: if (chan) { chan->midi_pressure = p1; snd_emux_update_channel(port, chan, SNDRV_EMUX_UPDATE_FMMOD|SNDRV_EMUX_UPDATE_FM2FRQ2); } break; case _EMUX_OSS_CHANNEL_MODE: reset_port_mode(port, p1); snd_emux_reset_port(port); break; case _EMUX_OSS_DRUM_CHANNELS: port->drum_flags = *(unsigned int*)&event[4]; for (i = 0; i < port->chset.max_channels; i++) { chan = &port->chset.channels[i]; chan->drum_channel = ((port->drum_flags >> i) & 1) ? 1 : 0; } break; case _EMUX_OSS_MISC_MODE: if (p1 < EMUX_MD_END) port->ctrls[p1] = p2; break; case _EMUX_OSS_DEBUG_MODE: break; default: if (emu->ops.oss_ioctl) emu->ops.oss_ioctl(emu, cmd, p1, p2); break; } } /* * GUS specific h/w controls */ #include <linux/ultrasound.h> static void gusspec_control(snd_emux_t *emu, snd_emux_port_t *port, int cmd, unsigned char *event, int atomic, int hop) { int voice; unsigned short p1; short p2; int plong; snd_midi_channel_t *chan; if (port->port_mode != SNDRV_EMUX_PORT_MODE_OSS_SYNTH) return; if (cmd == _GUS_NUMVOICES) return; voice = event[3]; if (voice < 0 || voice >= port->chset.max_channels) return; chan = &port->chset.channels[voice]; p1 = *(unsigned short *) &event[4]; p2 = *(short *) &event[6]; plong = *(int*) &event[4]; switch (cmd) { case _GUS_VOICESAMPLE: chan->midi_program = p1; return; case _GUS_VOICEBALA: /* 0 to 15 --> 0 to 127 */ chan->control[MIDI_CTL_MSB_PAN] = (int)p1 << 3; snd_emux_update_channel(port, chan, SNDRV_EMUX_UPDATE_PAN); return; case _GUS_VOICEVOL: case _GUS_VOICEVOL2: /* not supported yet */ return; case _GUS_RAMPRANGE: case _GUS_RAMPRATE: case _GUS_RAMPMODE: case _GUS_RAMPON: case _GUS_RAMPOFF: /* volume ramping not supported */ return; case _GUS_VOLUME_SCALE: return; case _GUS_VOICE_POS: #ifdef SNDRV_EMUX_USE_RAW_EFFECT snd_emux_send_effect(port, chan, EMUX_FX_SAMPLE_START, (short)(plong & 0x7fff), EMUX_FX_FLAG_SET); snd_emux_send_effect(port, chan, EMUX_FX_COARSE_SAMPLE_START, (plong >> 15) & 0xffff, EMUX_FX_FLAG_SET); #endif return; } } /* * send an event to midi emulation */ static void fake_event(snd_emux_t *emu, snd_emux_port_t *port, int ch, int param, int val, int atomic, int hop) { snd_seq_event_t ev; memset(&ev, 0, sizeof(ev)); ev.type = SNDRV_SEQ_EVENT_CONTROLLER; ev.data.control.channel = ch; ev.data.control.param = param; ev.data.control.value = val; snd_emux_event_input(&ev, 0, port, atomic, hop); } #endif /* CONFIG_SND_SEQUENCER_OSS */