[deliverable/linux.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 <linux/export.h>
#include <linux/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;

	/* using device#1 here for avoiding conflicts with OPL3 */
	if (snd_seq_device_new(emu->card, 1, 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;
	if (snd_BUG_ON(!arg || !emu))
		return -ENXIO;

	if (!snd_emux_inc_count(emu))
		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(KERN_ERR "can't create port\n");
		snd_emux_dec_count(emu);
		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);
	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;

	if (snd_BUG_ON(!arg))
		return -ENXIO;
	p = arg->private_data;
	if (snd_BUG_ON(!p))
		return -ENXIO;

	emu = p->emu;
	if (snd_BUG_ON(!emu))
		return -ENXIO;

	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);

	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;

	if (snd_BUG_ON(!arg))
		return -ENXIO;
	p = arg->private_data;
	if (snd_BUG_ON(!p))
		return -ENXIO;

	emu = p->emu;
	if (snd_BUG_ON(!emu))
		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;

	if (snd_BUG_ON(!arg))
		return -ENXIO;
	p = arg->private_data;
	if (snd_BUG_ON(!p))
		return -ENXIO;

	emu = p->emu;
	if (snd_BUG_ON(!emu))
		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;

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