LXR linux/sound/isa/gus/gus

   1/*
   2 *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
   3 *
   4 *
   5 *   This program is free software; you can redistribute it and/or modify
   6 *   it under the terms of the GNU General Public License as published by
   7 *   the Free Software Foundation; either version 2 of the License, or
   8 *   (at your option) any later version.
   9 *
  10 *   This program is distributed in the hope that it will be useful,
  11 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 *   GNU General Public License for more details.
  14 *
  15 *   You should have received a copy of the GNU General Public License
  16 *   along with this program; if not, write to the Free Software
  17 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  18 *
  19 */
  20
  21#include <linux/delay.h>
  22#include <linux/interrupt.h>
  23#include <linux/time.h>
  24#include <sound/core.h>
  25#include <sound/gus.h>
  26
  27extern void snd_gf1_timers_init(struct snd_gus_card * gus);
  28extern void snd_gf1_timers_done(struct snd_gus_card * gus);
  29extern int snd_gf1_synth_init(struct snd_gus_card * gus);
  30extern void snd_gf1_synth_done(struct snd_gus_card * gus);
  31
  32/*
  33 *  ok.. default interrupt handlers...
  34 */
  35
  36static void snd_gf1_default_interrupt_handler_midi_out(struct snd_gus_card * gus)
  37{
  38        snd_gf1_uart_cmd(gus, gus->gf1.uart_cmd &= ~0x20);
  39}
  40
  41static void snd_gf1_default_interrupt_handler_midi_in(struct snd_gus_card * gus)
  42{
  43        snd_gf1_uart_cmd(gus, gus->gf1.uart_cmd &= ~0x80);
  44}
  45
  46static void snd_gf1_default_interrupt_handler_timer1(struct snd_gus_card * gus)
  47{
  48        snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, gus->gf1.timer_enabled &= ~4);
  49}
  50
  51static void snd_gf1_default_interrupt_handler_timer2(struct snd_gus_card * gus)
  52{
  53        snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, gus->gf1.timer_enabled &= ~8);
  54}
  55
  56static void snd_gf1_default_interrupt_handler_wave_and_volume(struct snd_gus_card * gus, struct snd_gus_voice * voice)
  57{
  58        snd_gf1_i_ctrl_stop(gus, 0x00);
  59        snd_gf1_i_ctrl_stop(gus, 0x0d);
  60}
  61
  62static void snd_gf1_default_interrupt_handler_dma_write(struct snd_gus_card * gus)
  63{
  64        snd_gf1_i_write8(gus, 0x41, 0x00);
  65}
  66
  67static void snd_gf1_default_interrupt_handler_dma_read(struct snd_gus_card * gus)
  68{
  69        snd_gf1_i_write8(gus, 0x49, 0x00);
  70}
  71
  72void snd_gf1_set_default_handlers(struct snd_gus_card * gus, unsigned int what)
  73{
  74        if (what & SNDRV_GF1_HANDLER_MIDI_OUT)
  75                gus->gf1.interrupt_handler_midi_out = snd_gf1_default_interrupt_handler_midi_out;
  76        if (what & SNDRV_GF1_HANDLER_MIDI_IN)
  77                gus->gf1.interrupt_handler_midi_in = snd_gf1_default_interrupt_handler_midi_in;
  78        if (what & SNDRV_GF1_HANDLER_TIMER1)
  79                gus->gf1.interrupt_handler_timer1 = snd_gf1_default_interrupt_handler_timer1;
  80        if (what & SNDRV_GF1_HANDLER_TIMER2)
  81                gus->gf1.interrupt_handler_timer2 = snd_gf1_default_interrupt_handler_timer2;
  82        if (what & SNDRV_GF1_HANDLER_VOICE) {
  83                struct snd_gus_voice *voice;
  84                
  85                voice = &gus->gf1.voices[what & 0xffff];
  86                voice->handler_wave =
  87                voice->handler_volume = snd_gf1_default_interrupt_handler_wave_and_volume;
  88                voice->handler_effect = NULL;
  89                voice->volume_change = NULL;
  90        }
  91        if (what & SNDRV_GF1_HANDLER_DMA_WRITE)
  92                gus->gf1.interrupt_handler_dma_write = snd_gf1_default_interrupt_handler_dma_write;
  93        if (what & SNDRV_GF1_HANDLER_DMA_READ)
  94                gus->gf1.interrupt_handler_dma_read = snd_gf1_default_interrupt_handler_dma_read;
  95}
  96
  97/*
  98
  99 */
 100
 101static void snd_gf1_clear_regs(struct snd_gus_card * gus)
 102{
 103        unsigned long flags;
 104
 105        spin_lock_irqsave(&gus->reg_lock, flags);
 106        inb(GUSP(gus, IRQSTAT));
 107        snd_gf1_write8(gus, 0x41, 0);   /* DRAM DMA Control Register */
 108        snd_gf1_write8(gus, 0x45, 0);   /* Timer Control */
 109        snd_gf1_write8(gus, 0x49, 0);   /* Sampling Control Register */
 110        spin_unlock_irqrestore(&gus->reg_lock, flags);
 111}
 112
 113static void snd_gf1_look_regs(struct snd_gus_card * gus)
 114{
 115        unsigned long flags;
 116
 117        spin_lock_irqsave(&gus->reg_lock, flags);
 118        snd_gf1_look8(gus, 0x41);       /* DRAM DMA Control Register */
 119        snd_gf1_look8(gus, 0x49);       /* Sampling Control Register */
 120        inb(GUSP(gus, IRQSTAT));
 121        snd_gf1_read8(gus, 0x0f);       /* IRQ Source Register */
 122        spin_unlock_irqrestore(&gus->reg_lock, flags);
 123}
 124
 125/*
 126 *  put selected GF1 voices to initial stage...
 127 */
 128
 129void snd_gf1_smart_stop_voice(struct snd_gus_card * gus, unsigned short voice)
 130{
 131        unsigned long flags;
 132
 133        spin_lock_irqsave(&gus->reg_lock, flags);
 134        snd_gf1_select_voice(gus, voice);
 135#if 0
 136        printk(KERN_DEBUG " -%i- smart stop voice - volume = 0x%x\n", voice, snd_gf1_i_read16(gus, SNDRV_GF1_VW_VOLUME));
 137#endif
 138        snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_ADDRESS_CONTROL);
 139        snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_VOLUME_CONTROL);
 140        spin_unlock_irqrestore(&gus->reg_lock, flags);
 141}
 142
 143void snd_gf1_stop_voice(struct snd_gus_card * gus, unsigned short voice)
 144{
 145        unsigned long flags;
 146
 147        spin_lock_irqsave(&gus->reg_lock, flags);
 148        snd_gf1_select_voice(gus, voice);
 149#if 0
 150        printk(KERN_DEBUG " -%i- stop voice - volume = 0x%x\n", voice, snd_gf1_i_read16(gus, SNDRV_GF1_VW_VOLUME));
 151#endif
 152        snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_ADDRESS_CONTROL);
 153        snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_VOLUME_CONTROL);
 154        if (gus->gf1.enh_mode)
 155                snd_gf1_write8(gus, SNDRV_GF1_VB_ACCUMULATOR, 0);
 156        spin_unlock_irqrestore(&gus->reg_lock, flags);
 157#if 0
 158        snd_gf1_lfo_shutdown(gus, voice, ULTRA_LFO_VIBRATO);
 159        snd_gf1_lfo_shutdown(gus, voice, ULTRA_LFO_TREMOLO);
 160#endif
 161}
 162
 163static void snd_gf1_clear_voices(struct snd_gus_card * gus, unsigned short v_min,
 164                                 unsigned short v_max)
 165{
 166        unsigned long flags;
 167        unsigned int daddr;
 168        unsigned short i, w_16;
 169
 170        daddr = gus->gf1.default_voice_address << 4;
 171        for (i = v_min; i <= v_max; i++) {
 172#if 0
 173                if (gus->gf1.syn_voices)
 174                        gus->gf1.syn_voices[i].flags = ~VFLG_DYNAMIC;
 175#endif
 176                spin_lock_irqsave(&gus->reg_lock, flags);
 177                snd_gf1_select_voice(gus, i);
 178                snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_ADDRESS_CONTROL);   /* Voice Control Register = voice stop */
 179                snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_VOLUME_CONTROL);    /* Volume Ramp Control Register = ramp off */
 180                if (gus->gf1.enh_mode)
 181                        snd_gf1_write8(gus, SNDRV_GF1_VB_MODE, gus->gf1.memory ? 0x02 : 0x82);  /* Deactivate voice */
 182                w_16 = snd_gf1_read8(gus, SNDRV_GF1_VB_ADDRESS_CONTROL) & 0x04;
 183                snd_gf1_write16(gus, SNDRV_GF1_VW_FREQUENCY, 0x400);
 184                snd_gf1_write_addr(gus, SNDRV_GF1_VA_START, daddr, w_16);
 185                snd_gf1_write_addr(gus, SNDRV_GF1_VA_END, daddr, w_16);
 186                snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_START, 0);
 187                snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_END, 0);
 188                snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_RATE, 0);
 189                snd_gf1_write16(gus, SNDRV_GF1_VW_VOLUME, 0);
 190                snd_gf1_write_addr(gus, SNDRV_GF1_VA_CURRENT, daddr, w_16);
 191                snd_gf1_write8(gus, SNDRV_GF1_VB_PAN, 7);
 192                if (gus->gf1.enh_mode) {
 193                        snd_gf1_write8(gus, SNDRV_GF1_VB_ACCUMULATOR, 0);
 194                        snd_gf1_write16(gus, SNDRV_GF1_VW_EFFECT_VOLUME, 0);
 195                        snd_gf1_write16(gus, SNDRV_GF1_VW_EFFECT_VOLUME_FINAL, 0);
 196                }
 197                spin_unlock_irqrestore(&gus->reg_lock, flags);
 198#if 0
 199                snd_gf1_lfo_shutdown(gus, i, ULTRA_LFO_VIBRATO);
 200                snd_gf1_lfo_shutdown(gus, i, ULTRA_LFO_TREMOLO);
 201#endif
 202        }
 203}
 204
 205void snd_gf1_stop_voices(struct snd_gus_card * gus, unsigned short v_min, unsigned short v_max)
 206{
 207        unsigned long flags;
 208        short i, ramp_ok;
 209        unsigned short ramp_end;
 210
 211        if (!in_interrupt()) {  /* this can't be done in interrupt */
 212                for (i = v_min, ramp_ok = 0; i <= v_max; i++) {
 213                        spin_lock_irqsave(&gus->reg_lock, flags);
 214                        snd_gf1_select_voice(gus, i);
 215                        ramp_end = snd_gf1_read16(gus, 9) >> 8;
 216                        if (ramp_end > SNDRV_GF1_MIN_OFFSET) {
 217                                ramp_ok++;
 218                                snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_RATE, 20);      /* ramp rate */
 219                                snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_START, SNDRV_GF1_MIN_OFFSET);   /* ramp start */
 220                                snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_END, ramp_end); /* ramp end */
 221                                snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_CONTROL, 0x40); /* ramp down */
 222                                if (gus->gf1.enh_mode) {
 223                                        snd_gf1_delay(gus);
 224                                        snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_CONTROL, 0x40);
 225                                }
 226                        }
 227                        spin_unlock_irqrestore(&gus->reg_lock, flags);
 228                }
 229                msleep_interruptible(50);
 230        }
 231        snd_gf1_clear_voices(gus, v_min, v_max);
 232}
 233
 234static void snd_gf1_alloc_voice_use(struct snd_gus_card * gus, 
 235                                    struct snd_gus_voice * pvoice,
 236                                    int type, int client, int port)
 237{
 238        pvoice->use = 1;
 239        switch (type) {
 240        case SNDRV_GF1_VOICE_TYPE_PCM:
 241                gus->gf1.pcm_alloc_voices++;
 242                pvoice->pcm = 1;
 243                break;
 244        case SNDRV_GF1_VOICE_TYPE_SYNTH:
 245                pvoice->synth = 1;
 246                pvoice->client = client;
 247                pvoice->port = port;
 248                break;
 249        case SNDRV_GF1_VOICE_TYPE_MIDI:
 250                pvoice->midi = 1;
 251                pvoice->client = client;
 252                pvoice->port = port;
 253                break;
 254        }
 255}
 256
 257struct snd_gus_voice *snd_gf1_alloc_voice(struct snd_gus_card * gus, int type, int client, int port)
 258{
 259        struct snd_gus_voice *pvoice;
 260        unsigned long flags;
 261        int idx;
 262
 263        spin_lock_irqsave(&gus->voice_alloc, flags);
 264        if (type == SNDRV_GF1_VOICE_TYPE_PCM) {
 265                if (gus->gf1.pcm_alloc_voices >= gus->gf1.pcm_channels) {
 266                        spin_unlock_irqrestore(&gus->voice_alloc, flags);
 267                        return NULL;
 268                }
 269        }
 270        for (idx = 0; idx < 32; idx++) {
 271                pvoice = &gus->gf1.voices[idx];
 272                if (!pvoice->use) {
 273                        snd_gf1_alloc_voice_use(gus, pvoice, type, client, port);
 274                        spin_unlock_irqrestore(&gus->voice_alloc, flags);
 275                        return pvoice;
 276                }
 277        } 
 278        for (idx = 0; idx < 32; idx++) {
 279                pvoice = &gus->gf1.voices[idx];
 280                if (pvoice->midi && !pvoice->client) {
 281                        snd_gf1_clear_voices(gus, pvoice->number, pvoice->number);
 282                        snd_gf1_alloc_voice_use(gus, pvoice, type, client, port);
 283                        spin_unlock_irqrestore(&gus->voice_alloc, flags);
 284                        return pvoice;
 285                }
 286        } 
 287        spin_unlock_irqrestore(&gus->voice_alloc, flags);
 288        return NULL;
 289}
 290
 291void snd_gf1_free_voice(struct snd_gus_card * gus, struct snd_gus_voice *voice)
 292{
 293        unsigned long flags;
 294        void (*private_free)(struct snd_gus_voice *voice);
 295        void *private_data;
 296
 297        if (voice == NULL || !voice->use)
 298                return;
 299        snd_gf1_set_default_handlers(gus, SNDRV_GF1_HANDLER_VOICE | voice->number);
 300        snd_gf1_clear_voices(gus, voice->number, voice->number);
 301        spin_lock_irqsave(&gus->voice_alloc, flags);
 302        private_free = voice->private_free;
 303        private_data = voice->private_data;
 304        voice->private_free = NULL;
 305        voice->private_data = NULL;
 306        if (voice->pcm)
 307                gus->gf1.pcm_alloc_voices--;
 308        voice->use = voice->pcm = 0;
 309        voice->sample_ops = NULL;
 310        spin_unlock_irqrestore(&gus->voice_alloc, flags);
 311        if (private_free)
 312                private_free(voice);
 313}
 314
 315/*
 316 *  call this function only by start of driver
 317 */
 318
 319int snd_gf1_start(struct snd_gus_card * gus)
 320{
 321        unsigned long flags;
 322        unsigned int i;
 323
 324        snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 0);   /* reset GF1 */
 325        udelay(160);
 326        snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 1);   /* disable IRQ & DAC */
 327        udelay(160);
 328        snd_gf1_i_write8(gus, SNDRV_GF1_GB_JOYSTICK_DAC_LEVEL, gus->joystick_dac);
 329
 330        snd_gf1_set_default_handlers(gus, SNDRV_GF1_HANDLER_ALL);
 331        for (i = 0; i < 32; i++) {
 332                gus->gf1.voices[i].number = i;
 333                snd_gf1_set_default_handlers(gus, SNDRV_GF1_HANDLER_VOICE | i);
 334        }
 335
 336        snd_gf1_uart_cmd(gus, 0x03);    /* huh.. this cleanup took me some time... */
 337
 338        if (gus->gf1.enh_mode) {        /* enhanced mode !!!! */
 339                snd_gf1_i_write8(gus, SNDRV_GF1_GB_GLOBAL_MODE, snd_gf1_i_look8(gus, SNDRV_GF1_GB_GLOBAL_MODE) | 0x01);
 340                snd_gf1_i_write8(gus, SNDRV_GF1_GB_MEMORY_CONTROL, 0x01);
 341        }
 342        snd_gf1_clear_regs(gus);
 343        snd_gf1_select_active_voices(gus);
 344        snd_gf1_delay(gus);
 345        gus->gf1.default_voice_address = gus->gf1.memory > 0 ? 0 : 512 - 8;
 346        /* initialize LFOs & clear LFOs memory */
 347        if (gus->gf1.enh_mode && gus->gf1.memory) {
 348                gus->gf1.hw_lfo = 1;
 349                gus->gf1.default_voice_address += 1024;
 350        } else {
 351                gus->gf1.sw_lfo = 1;
 352        }
 353#if 0
 354        snd_gf1_lfo_init(gus);
 355#endif
 356        if (gus->gf1.memory > 0)
 357                for (i = 0; i < 4; i++)
 358                        snd_gf1_poke(gus, gus->gf1.default_voice_address + i, 0);
 359        snd_gf1_clear_regs(gus);
 360        snd_gf1_clear_voices(gus, 0, 31);
 361        snd_gf1_look_regs(gus);
 362        udelay(160);
 363        snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 7);   /* Reset Register = IRQ enable, DAC enable */
 364        udelay(160);
 365        snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 7);   /* Reset Register = IRQ enable, DAC enable */
 366        if (gus->gf1.enh_mode) {        /* enhanced mode !!!! */
 367                snd_gf1_i_write8(gus, SNDRV_GF1_GB_GLOBAL_MODE, snd_gf1_i_look8(gus, SNDRV_GF1_GB_GLOBAL_MODE) | 0x01);
 368                snd_gf1_i_write8(gus, SNDRV_GF1_GB_MEMORY_CONTROL, 0x01);
 369        }
 370        while ((snd_gf1_i_read8(gus, SNDRV_GF1_GB_VOICES_IRQ) & 0xc0) != 0xc0);
 371
 372        spin_lock_irqsave(&gus->reg_lock, flags);
 373        outb(gus->gf1.active_voice = 0, GUSP(gus, GF1PAGE));
 374        outb(gus->mix_cntrl_reg, GUSP(gus, MIXCNTRLREG));
 375        spin_unlock_irqrestore(&gus->reg_lock, flags);
 376
 377        snd_gf1_timers_init(gus);
 378        snd_gf1_look_regs(gus);
 379        snd_gf1_mem_init(gus);
 380        snd_gf1_mem_proc_init(gus);
 381#ifdef CONFIG_SND_DEBUG
 382        snd_gus_irq_profile_init(gus);
 383#endif
 384
 385#if 0
 386        if (gus->pnp_flag) {
 387                if (gus->chip.playback_fifo_size > 0)
 388                        snd_gf1_i_write16(gus, SNDRV_GF1_GW_FIFO_RECORD_BASE_ADDR, gus->chip.playback_fifo_block->ptr >> 8);
 389                if (gus->chip.record_fifo_size > 0)
 390                        snd_gf1_i_write16(gus, SNDRV_GF1_GW_FIFO_PLAY_BASE_ADDR, gus->chip.record_fifo_block->ptr >> 8);
 391                snd_gf1_i_write16(gus, SNDRV_GF1_GW_FIFO_SIZE, gus->chip.interwave_fifo_reg);
 392        }
 393#endif
 394
 395        return 0;
 396}
 397
 398/*
 399 *  call this function only by shutdown of driver
 400 */
 401
 402int snd_gf1_stop(struct snd_gus_card * gus)
 403{
 404        snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, 0); /* stop all timers */
 405        snd_gf1_stop_voices(gus, 0, 31);                /* stop all voices */
 406        snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 1);   /* disable IRQ & DAC */
 407        snd_gf1_timers_done(gus);
 408        snd_gf1_mem_done(gus);
 409#if 0
 410        snd_gf1_lfo_done(gus);
 411#endif
 412        return 0;
 413}
 414