2 * Interface for OSS sequencer emulation
4 * Copyright (C) 1999 Takashi Iwai <tiwai@suse.de>
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.
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.
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
21 * 19990227 Steve Ratcliffe Made separate file and merged in latest
26 #ifdef CONFIG_SND_SEQUENCER_OSS
28 #include <linux/export.h>
29 #include <linux/uaccess.h>
30 #include <sound/core.h>
31 #include "emux_voice.h"
32 #include <sound/asoundef.h>
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
,
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
);
52 static struct snd_seq_oss_callback oss_callback
= {
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
,
67 snd_emux_init_seq_oss(struct snd_emux
*emu
)
69 struct snd_seq_oss_reg
*arg
;
70 struct snd_seq_device
*dev
;
72 /* using device#1 here for avoiding conflicts with OPL3 */
73 if (snd_seq_device_new(emu
->card
, 1, SNDRV_SEQ_DEV_ID_OSS
,
74 sizeof(struct snd_seq_oss_reg
), &dev
) < 0)
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
;
86 /* register to OSS synth table */
87 snd_device_register(emu
->card
, dev
);
95 snd_emux_detach_seq_oss(struct snd_emux
*emu
)
98 snd_device_free(emu
->card
, emu
->oss_synth
);
99 emu
->oss_synth
= NULL
;
104 /* use port number as a unique soundfont client number */
105 #define SF_CLIENT_NO(p) ((p) + 0x1000)
108 * open port for OSS sequencer
111 snd_emux_open_seq_oss(struct snd_seq_oss_arg
*arg
, void *closure
)
113 struct snd_emux
*emu
;
114 struct snd_emux_port
*p
;
115 struct snd_seq_port_callback callback
;
119 if (snd_BUG_ON(!arg
|| !emu
))
122 if (!snd_emux_inc_count(emu
))
125 memset(&callback
, 0, sizeof(callback
));
126 callback
.owner
= THIS_MODULE
;
127 callback
.event_input
= snd_emux_event_oss_input
;
129 sprintf(tmpname
, "%s OSS Port", emu
->name
);
130 p
= snd_emux_create_port(emu
, tmpname
, 32,
133 snd_printk(KERN_ERR
"can't create port\n");
134 snd_emux_dec_count(emu
);
138 /* fill the argument data */
139 arg
->private_data
= p
;
140 arg
->addr
.client
= p
->chset
.client
;
141 arg
->addr
.port
= p
->chset
.port
;
144 reset_port_mode(p
, arg
->seq_mode
);
146 snd_emux_reset_port(p
);
151 #define DEFAULT_DRUM_FLAGS ((1<<9) | (1<<25))
157 reset_port_mode(struct snd_emux_port
*port
, int 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
;
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
;
177 snd_emux_close_seq_oss(struct snd_seq_oss_arg
*arg
)
179 struct snd_emux
*emu
;
180 struct snd_emux_port
*p
;
182 if (snd_BUG_ON(!arg
))
184 p
= arg
->private_data
;
189 if (snd_BUG_ON(!emu
))
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
);
205 snd_emux_load_patch_seq_oss(struct snd_seq_oss_arg
*arg
, int format
,
206 const char __user
*buf
, int offs
, int count
)
208 struct snd_emux
*emu
;
209 struct snd_emux_port
*p
;
212 if (snd_BUG_ON(!arg
))
214 p
= arg
->private_data
;
219 if (snd_BUG_ON(!emu
))
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
) {
226 struct soundfont_patch_info patch
;
227 if (count
< (int)sizeof(patch
))
229 if (copy_from_user(&patch
, buf
, sizeof(patch
)))
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
));
235 if (emu
->ops
.load_fx
)
236 rc
= emu
->ops
.load_fx(emu
, patch
.type
, patch
.optarg
, buf
, count
);
250 snd_emux_ioctl_seq_oss(struct snd_seq_oss_arg
*arg
, unsigned int cmd
, unsigned long ioarg
)
252 struct snd_emux_port
*p
;
253 struct snd_emux
*emu
;
255 if (snd_BUG_ON(!arg
))
257 p
= arg
->private_data
;
262 if (snd_BUG_ON(!emu
))
266 case SNDCTL_SEQ_RESETSAMPLES
:
267 snd_soundfont_remove_samples(emu
->sflist
);
270 case SNDCTL_SYNTH_MEMAVL
:
272 return snd_util_mem_avail(emu
->memhdr
);
284 snd_emux_reset_seq_oss(struct snd_seq_oss_arg
*arg
)
286 struct snd_emux_port
*p
;
288 if (snd_BUG_ON(!arg
))
290 p
= arg
->private_data
;
293 snd_emux_reset_port(p
);
299 * receive raw events: only SEQ_PRIVATE is accepted.
302 snd_emux_event_oss_input(struct snd_seq_event
*ev
, int direct
, void *private_data
,
305 struct snd_emux
*emu
;
306 struct snd_emux_port
*p
;
307 unsigned char cmd
, *data
;
313 if (snd_BUG_ON(!emu
))
315 if (ev
->type
!= SNDRV_SEQ_EVENT_OSS
)
316 return snd_emux_event_input(ev
, direct
, private_data
, atomic
, hop
);
318 data
= ev
->data
.raw8
.d
;
319 /* only SEQ_PRIVATE is accepted */
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
);
326 gusspec_control(emu
, p
, cmd
, data
, atomic
, hop
);
332 * OSS/AWE driver specific h/w controls
335 emuspec_control(struct snd_emux
*emu
, struct snd_emux_port
*port
, int cmd
,
336 unsigned char *event
, int atomic
, int hop
)
342 struct snd_midi_channel
*chan
;
345 if (voice
< 0 || voice
>= port
->chset
.max_channels
)
348 chan
= &port
->chset
.channels
[voice
];
350 p1
= *(unsigned short *) &event
[4];
351 p2
= *(short *) &event
[6];
354 #if 0 /* don't do this atomically */
355 case _EMUX_OSS_REMOVE_LAST_SAMPLES
:
356 snd_soundfont_remove_unlocked(emu
->sflist
);
359 case _EMUX_OSS_SEND_EFFECT
:
361 snd_emux_send_effect_oss(port
, chan
, p1
, p2
);
364 case _EMUX_OSS_TERMINATE_ALL
:
365 snd_emux_terminate_all(emu
);
368 case _EMUX_OSS_TERMINATE_CHANNEL
:
369 /*snd_emux_mute_channel(emu, chan);*/
371 case _EMUX_OSS_RESET_CHANNEL
:
372 /*snd_emux_channel_init(chset, chan);*/
375 case _EMUX_OSS_RELEASE_ALL
:
376 fake_event(emu
, port
, voice
, MIDI_CTL_ALL_NOTES_OFF
, 0, atomic
, hop
);
378 case _EMUX_OSS_NOTEOFF_ALL
:
379 fake_event(emu
, port
, voice
, MIDI_CTL_ALL_SOUNDS_OFF
, 0, atomic
, hop
);
382 case _EMUX_OSS_INITIAL_VOLUME
:
384 port
->volume_atten
= (short)p1
;
385 snd_emux_update_port(port
, SNDRV_EMUX_UPDATE_VOLUME
);
389 case _EMUX_OSS_CHN_PRESSURE
:
391 chan
->midi_pressure
= p1
;
392 snd_emux_update_channel(port
, chan
, SNDRV_EMUX_UPDATE_FMMOD
|SNDRV_EMUX_UPDATE_FM2FRQ2
);
396 case _EMUX_OSS_CHANNEL_MODE
:
397 reset_port_mode(port
, p1
);
398 snd_emux_reset_port(port
);
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;
409 case _EMUX_OSS_MISC_MODE
:
410 if (p1
< EMUX_MD_END
)
411 port
->ctrls
[p1
] = p2
;
413 case _EMUX_OSS_DEBUG_MODE
:
417 if (emu
->ops
.oss_ioctl
)
418 emu
->ops
.oss_ioctl(emu
, cmd
, p1
, p2
);
424 * GUS specific h/w controls
427 #include <linux/ultrasound.h>
430 gusspec_control(struct snd_emux
*emu
, struct snd_emux_port
*port
, int cmd
,
431 unsigned char *event
, int atomic
, int hop
)
437 struct snd_midi_channel
*chan
;
439 if (port
->port_mode
!= SNDRV_EMUX_PORT_MODE_OSS_SYNTH
)
441 if (cmd
== _GUS_NUMVOICES
)
444 if (voice
< 0 || voice
>= port
->chset
.max_channels
)
447 chan
= &port
->chset
.channels
[voice
];
449 p1
= *(unsigned short *) &event
[4];
450 p2
= *(short *) &event
[6];
451 plong
= *(int*) &event
[4];
454 case _GUS_VOICESAMPLE
:
455 chan
->midi_program
= p1
;
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
);
466 /* not supported yet */
474 /* volume ramping not supported */
477 case _GUS_VOLUME_SCALE
:
481 #ifdef SNDRV_EMUX_USE_RAW_EFFECT
482 snd_emux_send_effect(port
, chan
, EMUX_FX_SAMPLE_START
,
483 (short)(plong
& 0x7fff),
485 snd_emux_send_effect(port
, chan
, EMUX_FX_COARSE_SAMPLE_START
,
486 (plong
>> 15) & 0xffff,
495 * send an event to midi emulation
498 fake_event(struct snd_emux
*emu
, struct snd_emux_port
*port
, int ch
, int param
, int val
, int atomic
, int hop
)
500 struct snd_seq_event ev
;
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
);
509 #endif /* CONFIG_SND_SEQUENCER_OSS */