[net-next-2.6.git] / sound / synth / emux / emux_oss.c

/*
 *  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.
 */


#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(struct snd_seq_oss_arg *arg, void *closure);
static int snd_emux_close_seq_oss(struct snd_seq_oss_arg *arg);
static int snd_emux_ioctl_seq_oss(struct snd_seq_oss_arg *arg, unsigned int cmd,
				  unsigned long ioarg);
static int snd_emux_load_patch_seq_oss(struct snd_seq_oss_arg *arg, int format,
				       const char __user *buf, int offs, int count);
static int snd_emux_reset_seq_oss(struct snd_seq_oss_arg *arg);
static int snd_emux_event_oss_input(struct snd_seq_event *ev, int direct,
				    void *private, int atomic, int hop);
static void reset_port_mode(struct snd_emux_port *port, int midi_mode);
static void emuspec_control(struct snd_emux *emu, struct snd_emux_port *port,
			    int cmd, unsigned char *event, int atomic, int hop);
static void gusspec_control(struct snd_emux *emu, struct snd_emux_port *port,
			    int cmd, unsigned char *event, int atomic, int hop);
static void fake_event(struct snd_emux *emu, struct snd_emux_port *port,
		       int ch, int param, int val, int atomic, int hop);

/* operators */
static struct snd_seq_oss_callback 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(struct snd_emux *emu)
{
	struct snd_seq_oss_reg *arg;
	struct snd_seq_device *dev;

	if (snd_seq_device_new(emu->card, 0, SNDRV_SEQ_DEV_ID_OSS,
			       sizeof(struct snd_seq_oss_reg), &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(struct snd_emux *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(struct snd_seq_oss_arg *arg, void *closure)
{
	struct snd_emux *emu;
	struct snd_emux_port *p;
	struct snd_seq_port_callback callback;
	char tmpname[64];

	emu = closure;
	snd_assert(arg != NULL && emu != NULL, return -ENXIO);

	mutex_lock(&emu->register_mutex);

	if (!snd_emux_inc_count(emu)) {
		mutex_unlock(&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);
		mutex_unlock(&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);

	mutex_unlock(&emu->register_mutex);
	return 0;
}


#define DEFAULT_DRUM_FLAGS	((1<<9) | (1<<25))

/*
 * reset port mode
 */
static void
reset_port_mode(struct snd_emux_port *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(struct snd_seq_oss_arg *arg)
{
	struct snd_emux *emu;
	struct snd_emux_port *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);

	mutex_lock(&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);

	mutex_unlock(&emu->register_mutex);
	return 0;
}


/*
 * load patch
 */
static int
snd_emux_load_patch_seq_oss(struct snd_seq_oss_arg *arg, int format,
			    const char __user *buf, int offs, int count)
{
	struct snd_emux *emu;
	struct snd_emux_port *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) {
		struct soundfont_patch_info 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(struct snd_seq_oss_arg *arg, unsigned int cmd, unsigned long ioarg)
{
	struct snd_emux_port *p;
	struct snd_emux *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(struct snd_seq_oss_arg *arg)
{
	struct snd_emux_port *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(struct snd_seq_event *ev, int direct, void *private_data,
			 int atomic, int hop)
{
	struct snd_emux *emu;
	struct snd_emux_port *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(struct snd_emux *emu, struct snd_emux_port *port, int cmd,
		unsigned char *event, int atomic, int hop)
{
	int voice;
	unsigned short p1;
	short p2;
	int i;
	struct snd_midi_channel *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(struct snd_emux *emu, struct snd_emux_port *port, int cmd,
		unsigned char *event, int atomic, int hop)
{
	int voice;
	unsigned short p1;
	short p2;
	int plong;
	struct snd_midi_channel *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(struct snd_emux *emu, struct snd_emux_port *port, int ch, int param, int val, int atomic, int hop)
{
	struct snd_seq_event 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 */
Commit	Line	Data
1da177e4 LT	1	/*
	2	* Interface for OSS sequencer emulation
	3	*
	4	* Copyright (C) 1999 Takashi Iwai <tiwai@suse.de>
	5	*
	6	* This program is free software; you can redistribute it and/or modify
	7	* it under the terms of the GNU General Public License as published by
	8	* the Free Software Foundation; either version 2 of the License, or
	9	* (at your option) any later version.
	10	*
	11	* This program is distributed in the hope that it will be useful,
	12	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	13	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	14	* GNU General Public License for more details.
	15	*
	16	* You should have received a copy of the GNU General Public License
	17	* along with this program; if not, write to the Free Software
	18	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	19	*
	20	* Changes
	21	* 19990227 Steve Ratcliffe Made separate file and merged in latest
	22	* midi emulation.
	23	*/
	24
1da177e4 LT	25
	26	#ifdef CONFIG_SND_SEQUENCER_OSS
	27
	28	#include <asm/uaccess.h>
	29	#include <sound/core.h>
	30	#include "emux_voice.h"
	31	#include <sound/asoundef.h>
	32
03da312a TI	33	static int snd_emux_open_seq_oss(struct snd_seq_oss_arg arg, void closure);
	34	static int snd_emux_close_seq_oss(struct snd_seq_oss_arg *arg);
	35	static int snd_emux_ioctl_seq_oss(struct snd_seq_oss_arg *arg, unsigned int cmd,
	36	unsigned long ioarg);
	37	static int snd_emux_load_patch_seq_oss(struct snd_seq_oss_arg *arg, int format,
	38	const char __user *buf, int offs, int count);
	39	static int snd_emux_reset_seq_oss(struct snd_seq_oss_arg *arg);
	40	static int snd_emux_event_oss_input(struct snd_seq_event *ev, int direct,
	41	void *private, int atomic, int hop);
	42	static void reset_port_mode(struct snd_emux_port *port, int midi_mode);
	43	static void emuspec_control(struct snd_emux emu, struct snd_emux_port port,
	44	int cmd, unsigned char *event, int atomic, int hop);
	45	static void gusspec_control(struct snd_emux emu, struct snd_emux_port port,
	46	int cmd, unsigned char *event, int atomic, int hop);
	47	static void fake_event(struct snd_emux emu, struct snd_emux_port port,
	48	int ch, int param, int val, int atomic, int hop);
1da177e4 LT	49
1da177e4 LT	50	/* operators */
03da312a	51	static struct snd_seq_oss_callback oss_callback = {
1da177e4 LT	52	.owner = THIS_MODULE,
	53	.open = snd_emux_open_seq_oss,
	54	.close = snd_emux_close_seq_oss,
	55	.ioctl = snd_emux_ioctl_seq_oss,
	56	.load_patch = snd_emux_load_patch_seq_oss,
	57	.reset = snd_emux_reset_seq_oss,
	58	};
	59
	60
	61	/*
	62	* register OSS synth
	63	*/
	64
	65	void
03da312a	66	snd_emux_init_seq_oss(struct snd_emux *emu)
1da177e4	67	{
03da312a TI	68	struct snd_seq_oss_reg *arg;
03da312a TI	69	struct snd_seq_device *dev;
1da177e4 LT	70
1da177e4 LT	71	if (snd_seq_device_new(emu->card, 0, SNDRV_SEQ_DEV_ID_OSS,
03da312a	72	sizeof(struct snd_seq_oss_reg), &dev) < 0)
1da177e4 LT	73	return;
	74
	75	emu->oss_synth = dev;
	76	strcpy(dev->name, emu->name);
	77	arg = SNDRV_SEQ_DEVICE_ARGPTR(dev);
	78	arg->type = SYNTH_TYPE_SAMPLE;
	79	arg->subtype = SAMPLE_TYPE_AWE32;
	80	arg->nvoices = emu->max_voices;
	81	arg->oper = oss_callback;
	82	arg->private_data = emu;
	83
	84	/* register to OSS synth table */
	85	snd_device_register(emu->card, dev);
	86	}
	87
	88
	89	/*
	90	* unregister
	91	*/
	92	void
03da312a	93	snd_emux_detach_seq_oss(struct snd_emux *emu)
1da177e4 LT	94	{
	95	if (emu->oss_synth) {
	96	snd_device_free(emu->card, emu->oss_synth);
	97	emu->oss_synth = NULL;
	98	}
	99	}
	100
	101
	102	/* use port number as a unique soundfont client number */
	103	#define SF_CLIENT_NO(p) ((p) + 0x1000)
	104
	105	/*
	106	* open port for OSS sequencer
	107	*/
	108	static int
03da312a	109	snd_emux_open_seq_oss(struct snd_seq_oss_arg arg, void closure)
1da177e4	110	{
03da312a TI	111	struct snd_emux *emu;
	112	struct snd_emux_port *p;
	113	struct snd_seq_port_callback callback;
1da177e4 LT	114	char tmpname[64];
	115
	116	emu = closure;
	117	snd_assert(arg != NULL && emu != NULL, return -ENXIO);
	118
ef9f0a42	119	mutex_lock(&emu->register_mutex);
1da177e4 LT	120
1da177e4 LT	121	if (!snd_emux_inc_count(emu)) {
ef9f0a42	122	mutex_unlock(&emu->register_mutex);
1da177e4 LT	123	return -EFAULT;
	124	}
	125
	126	memset(&callback, 0, sizeof(callback));
	127	callback.owner = THIS_MODULE;
	128	callback.event_input = snd_emux_event_oss_input;
	129
	130	sprintf(tmpname, "%s OSS Port", emu->name);
	131	p = snd_emux_create_port(emu, tmpname, 32,
	132	1, &callback);
	133	if (p == NULL) {
	134	snd_printk("can't create port\n");
	135	snd_emux_dec_count(emu);
ef9f0a42	136	mutex_unlock(&emu->register_mutex);
1da177e4 LT	137	return -ENOMEM;
	138	}
	139
	140	/* fill the argument data */
	141	arg->private_data = p;
	142	arg->addr.client = p->chset.client;
	143	arg->addr.port = p->chset.port;
	144	p->oss_arg = arg;
	145
	146	reset_port_mode(p, arg->seq_mode);
	147
	148	snd_emux_reset_port(p);
	149
ef9f0a42	150	mutex_unlock(&emu->register_mutex);
1da177e4 LT	151	return 0;
	152	}
	153
	154
	155	#define DEFAULT_DRUM_FLAGS ((1<<9) \| (1<<25))
	156
	157	/*
	158	* reset port mode
	159	*/
	160	static void
03da312a	161	reset_port_mode(struct snd_emux_port *port, int midi_mode)
1da177e4 LT	162	{
	163	if (midi_mode) {
	164	port->port_mode = SNDRV_EMUX_PORT_MODE_OSS_MIDI;
	165	port->drum_flags = DEFAULT_DRUM_FLAGS;
	166	port->volume_atten = 0;
	167	port->oss_arg->event_passing = SNDRV_SEQ_OSS_PROCESS_KEYPRESS;
	168	} else {
	169	port->port_mode = SNDRV_EMUX_PORT_MODE_OSS_SYNTH;
	170	port->drum_flags = 0;
	171	port->volume_atten = 32;
	172	port->oss_arg->event_passing = SNDRV_SEQ_OSS_PROCESS_EVENTS;
	173	}
	174	}
	175
	176
	177	/*
	178	* close port
	179	*/
	180	static int
03da312a	181	snd_emux_close_seq_oss(struct snd_seq_oss_arg *arg)
1da177e4	182	{
03da312a TI	183	struct snd_emux *emu;
03da312a TI	184	struct snd_emux_port *p;
1da177e4 LT	185
	186	snd_assert(arg != NULL, return -ENXIO);
	187	p = arg->private_data;
	188	snd_assert(p != NULL, return -ENXIO);
	189
	190	emu = p->emu;
	191	snd_assert(emu != NULL, return -ENXIO);
	192
ef9f0a42	193	mutex_lock(&emu->register_mutex);
1da177e4 LT	194	snd_emux_sounds_off_all(p);
	195	snd_soundfont_close_check(emu->sflist, SF_CLIENT_NO(p->chset.port));
	196	snd_seq_event_port_detach(p->chset.client, p->chset.port);
	197	snd_emux_dec_count(emu);
	198
ef9f0a42	199	mutex_unlock(&emu->register_mutex);
1da177e4 LT	200	return 0;
	201	}
	202
	203
	204	/*
	205	* load patch
	206	*/
	207	static int
03da312a	208	snd_emux_load_patch_seq_oss(struct snd_seq_oss_arg *arg, int format,
1da177e4 LT	209	const char __user *buf, int offs, int count)
1da177e4 LT	210	{
03da312a TI	211	struct snd_emux *emu;
03da312a TI	212	struct snd_emux_port *p;
1da177e4 LT	213	int rc;
	214
	215	snd_assert(arg != NULL, return -ENXIO);
	216	p = arg->private_data;
	217	snd_assert(p != NULL, return -ENXIO);
	218
	219	emu = p->emu;
	220	snd_assert(emu != NULL, return -ENXIO);
	221
	222	if (format == GUS_PATCH)
	223	rc = snd_soundfont_load_guspatch(emu->sflist, buf, count,
	224	SF_CLIENT_NO(p->chset.port));
	225	else if (format == SNDRV_OSS_SOUNDFONT_PATCH) {
03da312a	226	struct soundfont_patch_info patch;
1da177e4 LT	227	if (count < (int)sizeof(patch))
	228	rc = -EINVAL;
	229	if (copy_from_user(&patch, buf, sizeof(patch)))
	230	rc = -EFAULT;
	231	if (patch.type >= SNDRV_SFNT_LOAD_INFO &&
	232	patch.type <= SNDRV_SFNT_PROBE_DATA)
	233	rc = snd_soundfont_load(emu->sflist, buf, count, SF_CLIENT_NO(p->chset.port));
	234	else {
	235	if (emu->ops.load_fx)
	236	rc = emu->ops.load_fx(emu, patch.type, patch.optarg, buf, count);
	237	else
	238	rc = -EINVAL;
	239	}
	240	} else
	241	rc = 0;
	242	return rc;
	243	}
	244
	245
	246	/*
	247	* ioctl
	248	*/
	249	static int
03da312a	250	snd_emux_ioctl_seq_oss(struct snd_seq_oss_arg *arg, unsigned int cmd, unsigned long ioarg)
1da177e4	251	{
03da312a TI	252	struct snd_emux_port *p;
03da312a TI	253	struct snd_emux *emu;
1da177e4 LT	254
	255	snd_assert(arg != NULL, return -ENXIO);
	256	p = arg->private_data;
	257	snd_assert(p != NULL, return -ENXIO);
	258
	259	emu = p->emu;
	260	snd_assert(emu != NULL, return -ENXIO);
	261
	262	switch (cmd) {
	263	case SNDCTL_SEQ_RESETSAMPLES:
	264	snd_soundfont_remove_samples(emu->sflist);
	265	return 0;
	266
	267	case SNDCTL_SYNTH_MEMAVL:
	268	if (emu->memhdr)
	269	return snd_util_mem_avail(emu->memhdr);
	270	return 0;
	271	}
	272
	273	return 0;
	274	}
	275
	276
	277	/*
	278	* reset device
	279	*/
	280	static int
03da312a	281	snd_emux_reset_seq_oss(struct snd_seq_oss_arg *arg)
1da177e4	282	{
03da312a	283	struct snd_emux_port *p;
1da177e4 LT	284
	285	snd_assert(arg != NULL, return -ENXIO);
	286	p = arg->private_data;
	287	snd_assert(p != NULL, return -ENXIO);
	288	snd_emux_reset_port(p);
	289	return 0;
	290	}
	291
	292
	293	/*
	294	* receive raw events: only SEQ_PRIVATE is accepted.
	295	*/
	296	static int
03da312a	297	snd_emux_event_oss_input(struct snd_seq_event ev, int direct, void private_data,
1da177e4 LT	298	int atomic, int hop)
1da177e4 LT	299	{
03da312a TI	300	struct snd_emux *emu;
03da312a TI	301	struct snd_emux_port *p;
1da177e4 LT	302	unsigned char cmd, *data;
	303
	304	p = private_data;
	305	snd_assert(p != NULL, return -EINVAL);
	306	emu = p->emu;
	307	snd_assert(emu != NULL, return -EINVAL);
	308	if (ev->type != SNDRV_SEQ_EVENT_OSS)
	309	return snd_emux_event_input(ev, direct, private_data, atomic, hop);
	310
	311	data = ev->data.raw8.d;
	312	/* only SEQ_PRIVATE is accepted */
	313	if (data[0] != 0xfe)
	314	return 0;
	315	cmd = data[2] & _EMUX_OSS_MODE_VALUE_MASK;
	316	if (data[2] & _EMUX_OSS_MODE_FLAG)
	317	emuspec_control(emu, p, cmd, data, atomic, hop);
	318	else
	319	gusspec_control(emu, p, cmd, data, atomic, hop);
	320	return 0;
	321	}
	322
	323
	324	/*
	325	* OSS/AWE driver specific h/w controls
	326	*/
	327	static void
03da312a	328	emuspec_control(struct snd_emux emu, struct snd_emux_port port, int cmd,
1da177e4 LT	329	unsigned char *event, int atomic, int hop)
	330	{
	331	int voice;
	332	unsigned short p1;
	333	short p2;
	334	int i;
03da312a	335	struct snd_midi_channel *chan;
1da177e4 LT	336
	337	voice = event[3];
	338	if (voice < 0 \|\| voice >= port->chset.max_channels)
	339	chan = NULL;
	340	else
	341	chan = &port->chset.channels[voice];
	342
	343	p1 = (unsigned short ) &event[4];
	344	p2 = (short ) &event[6];
	345
	346	switch (cmd) {
	347	#if 0 /* don't do this atomically */
	348	case _EMUX_OSS_REMOVE_LAST_SAMPLES:
	349	snd_soundfont_remove_unlocked(emu->sflist);
	350	break;
	351	#endif
	352	case _EMUX_OSS_SEND_EFFECT:
	353	if (chan)
	354	snd_emux_send_effect_oss(port, chan, p1, p2);
	355	break;
	356
	357	case _EMUX_OSS_TERMINATE_ALL:
	358	snd_emux_terminate_all(emu);
	359	break;
	360
	361	case _EMUX_OSS_TERMINATE_CHANNEL:
	362	/snd_emux_mute_channel(emu, chan);/
	363	break;
	364	case _EMUX_OSS_RESET_CHANNEL:
	365	/snd_emux_channel_init(chset, chan);/
	366	break;
	367
	368	case _EMUX_OSS_RELEASE_ALL:
	369	fake_event(emu, port, voice, MIDI_CTL_ALL_NOTES_OFF, 0, atomic, hop);
	370	break;
	371	case _EMUX_OSS_NOTEOFF_ALL:
	372	fake_event(emu, port, voice, MIDI_CTL_ALL_SOUNDS_OFF, 0, atomic, hop);
	373	break;
	374
	375	case _EMUX_OSS_INITIAL_VOLUME:
	376	if (p2) {
	377	port->volume_atten = (short)p1;
	378	snd_emux_update_port(port, SNDRV_EMUX_UPDATE_VOLUME);
	379	}
	380	break;
	381
	382	case _EMUX_OSS_CHN_PRESSURE:
	383	if (chan) {
	384	chan->midi_pressure = p1;
	385	snd_emux_update_channel(port, chan, SNDRV_EMUX_UPDATE_FMMOD\|SNDRV_EMUX_UPDATE_FM2FRQ2);
	386	}
	387	break;
	388
	389	case _EMUX_OSS_CHANNEL_MODE:
	390	reset_port_mode(port, p1);
	391	snd_emux_reset_port(port);
	392	break;
	393
	394	case _EMUX_OSS_DRUM_CHANNELS:
	395	port->drum_flags = (unsigned int)&event[4];
	396	for (i = 0; i < port->chset.max_channels; i++) {
	397	chan = &port->chset.channels[i];
	398	chan->drum_channel = ((port->drum_flags >> i) & 1) ? 1 : 0;
	399	}
400	break;
401
402	case _EMUX_OSS_MISC_MODE:
403	if (p1 < EMUX_MD_END)
404	port->ctrls[p1] = p2;
405	break;
406	case _EMUX_OSS_DEBUG_MODE:
407	break;
408
409	default:
410	if (emu->ops.oss_ioctl)
411	emu->ops.oss_ioctl(emu, cmd, p1, p2);
412	break;
413	}
414	}
415
416	/*
417	* GUS specific h/w controls
418	*/
419
420	#include <linux/ultrasound.h>
421
422	static void
03da312a	423	gusspec_control(struct snd_emux emu, struct snd_emux_port port, int cmd,
1da177e4 LT	424	unsigned char *event, int atomic, int hop)
	425	{
	426	int voice;
	427	unsigned short p1;
	428	short p2;
	429	int plong;
03da312a	430	struct snd_midi_channel *chan;
1da177e4 LT	431
	432	if (port->port_mode != SNDRV_EMUX_PORT_MODE_OSS_SYNTH)
	433	return;
	434	if (cmd == _GUS_NUMVOICES)
	435	return;
	436	voice = event[3];
	437	if (voice < 0 \|\| voice >= port->chset.max_channels)
	438	return;
	439
	440	chan = &port->chset.channels[voice];
	441
	442	p1 = (unsigned short ) &event[4];
	443	p2 = (short ) &event[6];
	444	plong = (int) &event[4];
	445
	446	switch (cmd) {
	447	case _GUS_VOICESAMPLE:
	448	chan->midi_program = p1;
	449	return;
	450
	451	case _GUS_VOICEBALA:
	452	/* 0 to 15 --> 0 to 127 */
	453	chan->control[MIDI_CTL_MSB_PAN] = (int)p1 << 3;
	454	snd_emux_update_channel(port, chan, SNDRV_EMUX_UPDATE_PAN);
	455	return;
	456
	457	case _GUS_VOICEVOL:
	458	case _GUS_VOICEVOL2:
	459	/* not supported yet */
	460	return;
	461
	462	case _GUS_RAMPRANGE:
	463	case _GUS_RAMPRATE:
	464	case _GUS_RAMPMODE:
	465	case _GUS_RAMPON:
	466	case _GUS_RAMPOFF:
	467	/* volume ramping not supported */
	468	return;
	469
	470	case _GUS_VOLUME_SCALE:
	471	return;
	472
	473	case _GUS_VOICE_POS:
	474	#ifdef SNDRV_EMUX_USE_RAW_EFFECT
	475	snd_emux_send_effect(port, chan, EMUX_FX_SAMPLE_START,
	476	(short)(plong & 0x7fff),
	477	EMUX_FX_FLAG_SET);
	478	snd_emux_send_effect(port, chan, EMUX_FX_COARSE_SAMPLE_START,
	479	(plong >> 15) & 0xffff,
	480	EMUX_FX_FLAG_SET);
	481	#endif
	482	return;
	483	}
	484	}
	485
	486
	487	/*
	488	* send an event to midi emulation
	489	*/
	490	static void
03da312a	491	fake_event(struct snd_emux emu, struct snd_emux_port port, int ch, int param, int val, int atomic, int hop)
1da177e4	492	{
03da312a	493	struct snd_seq_event ev;
1da177e4 LT	494	memset(&ev, 0, sizeof(ev));
	495	ev.type = SNDRV_SEQ_EVENT_CONTROLLER;
	496	ev.data.control.channel = ch;
	497	ev.data.control.param = param;
	498	ev.data.control.value = val;
	499	snd_emux_event_input(&ev, 0, port, atomic, hop);
	500	}
	501
	502	#endif /* CONFIG_SND_SEQUENCER_OSS */