linux/sound/synth/emux/emux_oss.c
<<
>>
Prefs
   1// SPDX-License-Identifier: GPL-2.0-or-later
   2/*
   3 *  Interface for OSS sequencer emulation
   4 *
   5 *  Copyright (C) 1999 Takashi Iwai <tiwai@suse.de>
   6 *
   7 * Changes
   8 * 19990227   Steve Ratcliffe   Made separate file and merged in latest
   9 *                              midi emulation.
  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/* operators */
  37static const 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 * register OSS synth
  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        /* using device#1 here for avoiding conflicts with OPL3 */
  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        /* register to OSS synth table */
  72        snd_device_register(emu->card, dev);
  73}
  74
  75
  76/*
  77 * unregister
  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/* use port number as a unique soundfont client number */
  90#define SF_CLIENT_NO(p) ((p) + 0x1000)
  91
  92/*
  93 * open port for OSS sequencer
  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        /* fill the argument data */
 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 * reset port mode
 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 * close port
 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 * load patch
 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 * ioctl
 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 * reset device
 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 * receive raw events: only SEQ_PRIVATE is accepted.
 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        /* only SEQ_PRIVATE is accepted */
 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 * OSS/AWE driver specific h/w controls
 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 /* don't do this atomically */
 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                /*snd_emux_mute_channel(emu, chan);*/
 355                break;
 356        case _EMUX_OSS_RESET_CHANNEL:
 357                /*snd_emux_channel_init(chset, chan);*/
 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 * GUS specific h/w controls
 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                /* 0 to 15 --> 0 to 127 */
 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                /* not supported yet */
 450                return;
 451
 452        case _GUS_RAMPRANGE:
 453        case _GUS_RAMPRATE:
 454        case _GUS_RAMPMODE:
 455        case _GUS_RAMPON:
 456        case _GUS_RAMPOFF:
 457                /* volume ramping not supported */
 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 * send an event to midi emulation
 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