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