sound/isa/gus/gus_reset.c

   1 /*
   2  *  Copyright (c) by Jaroslav Kysela <perex@suse.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 <sound/driver.h>
  22 #include <linux/delay.h>
  23 #include <linux/interrupt.h>
  24 #include <linux/time.h>
  25 #include <sound/core.h>
  26 #include <sound/gus.h>
  27
  28 extern void snd_gf1_timers_init(snd_gus_card_t * gus);
  29 extern void snd_gf1_timers_done(snd_gus_card_t * gus);
  30 extern int snd_gf1_synth_init(snd_gus_card_t * gus);
  31 extern void snd_gf1_synth_done(snd_gus_card_t * gus);
  32
  33 /*
  34  *  ok.. default interrupt handlers...
  35  */
  36
  37 static void snd_gf1_default_interrupt_handler_midi_out(snd_gus_card_t * gus)
  38 {
  39         snd_gf1_uart_cmd(gus, gus->gf1.uart_cmd &= ~0x20);
  40 }
  41
  42 static void snd_gf1_default_interrupt_handler_midi_in(snd_gus_card_t * gus)
  43 {
  44         snd_gf1_uart_cmd(gus, gus->gf1.uart_cmd &= ~0x80);
  45 }
  46
  47 static void snd_gf1_default_interrupt_handler_timer1(snd_gus_card_t * gus)
  48 {
  49         snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, gus->gf1.timer_enabled &= ~4);
  50 }
  51
  52 static void snd_gf1_default_interrupt_handler_timer2(snd_gus_card_t * gus)
  53 {
  54         snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, gus->gf1.timer_enabled &= ~8);
  55 }
  56
  57 static void snd_gf1_default_interrupt_handler_wave_and_volume(snd_gus_card_t * gus, snd_gus_voice_t * voice)
  58 {
  59         snd_gf1_i_ctrl_stop(gus, 0x00);
  60         snd_gf1_i_ctrl_stop(gus, 0x0d);
  61 }
  62
  63 static void snd_gf1_default_interrupt_handler_dma_write(snd_gus_card_t * gus)
  64 {
  65         snd_gf1_i_write8(gus, 0x41, 0x00);
  66 }
  67
  68 static void snd_gf1_default_interrupt_handler_dma_read(snd_gus_card_t * gus)
  69 {
  70         snd_gf1_i_write8(gus, 0x49, 0x00);
  71 }
  72
  73 void snd_gf1_set_default_handlers(snd_gus_card_t * gus, unsigned int what)
  74 {
  75         if (what & SNDRV_GF1_HANDLER_MIDI_OUT)
  76                 gus->gf1.interrupt_handler_midi_out = snd_gf1_default_interrupt_handler_midi_out;
  77         if (what & SNDRV_GF1_HANDLER_MIDI_IN)
  78                 gus->gf1.interrupt_handler_midi_in = snd_gf1_default_interrupt_handler_midi_in;
  79         if (what & SNDRV_GF1_HANDLER_TIMER1)
  80                 gus->gf1.interrupt_handler_timer1 = snd_gf1_default_interrupt_handler_timer1;
  81         if (what & SNDRV_GF1_HANDLER_TIMER2)
  82                 gus->gf1.interrupt_handler_timer2 = snd_gf1_default_interrupt_handler_timer2;
  83         if (what & SNDRV_GF1_HANDLER_VOICE) {
  84                 snd_gus_voice_t *voice;
  85
  86                 voice = &gus->gf1.voices[what & 0xffff];
  87                 voice->handler_wave =
  88                 voice->handler_volume = snd_gf1_default_interrupt_handler_wave_and_volume;
  89                 voice->handler_effect = NULL;
  90                 voice->volume_change = NULL;
  91         }
  92         if (what & SNDRV_GF1_HANDLER_DMA_WRITE)
  93                 gus->gf1.interrupt_handler_dma_write = snd_gf1_default_interrupt_handler_dma_write;
  94         if (what & SNDRV_GF1_HANDLER_DMA_READ)
  95                 gus->gf1.interrupt_handler_dma_read = snd_gf1_default_interrupt_handler_dma_read;
  96 }
  97
  98 /*
  99
 100  */
 101
 102 static void snd_gf1_clear_regs(snd_gus_card_t * gus)
 103 {
 104         unsigned long flags;
 105
 106         spin_lock_irqsave(&gus->reg_lock, flags);
 107         inb(GUSP(gus, IRQSTAT));
 108         snd_gf1_write8(gus, 0x41, 0);   /* DRAM DMA Control Register */
 109         snd_gf1_write8(gus, 0x45, 0);   /* Timer Control */
 110         snd_gf1_write8(gus, 0x49, 0);   /* Sampling Control Register */
 111         spin_unlock_irqrestore(&gus->reg_lock, flags);
 112 }
 113
 114 static void snd_gf1_look_regs(snd_gus_card_t * gus)
 115 {
 116         unsigned long flags;
 117
 118         spin_lock_irqsave(&gus->reg_lock, flags);
 119         snd_gf1_look8(gus, 0x41);       /* DRAM DMA Control Register */
 120         snd_gf1_look8(gus, 0x49);       /* Sampling Control Register */
 121         inb(GUSP(gus, IRQSTAT));
 122         snd_gf1_read8(gus, 0x0f);       /* IRQ Source Register */
 123         spin_unlock_irqrestore(&gus->reg_lock, flags);
 124 }
 125
 126 /*
 127  *  put selected GF1 voices to initial stage...
 128  */
 129
 130 void snd_gf1_smart_stop_voice(snd_gus_card_t * gus, unsigned short voice)
 131 {
 132         unsigned long flags;
 133
 134         spin_lock_irqsave(&gus->reg_lock, flags);
 135         snd_gf1_select_voice(gus, voice);
 136 #if 0
 137         printk(" -%i- smart stop voice - volume = 0x%x\n", voice, snd_gf1_i_read16(gus, SNDRV_GF1_VW_VOLUME));
 138 #endif
 139         snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_ADDRESS_CONTROL);
 140         snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_VOLUME_CONTROL);
 141         spin_unlock_irqrestore(&gus->reg_lock, flags);
 142 }
 143
 144 void snd_gf1_stop_voice(snd_gus_card_t * gus, unsigned short voice)
 145 {
 146         unsigned long flags;
 147
 148         spin_lock_irqsave(&gus->reg_lock, flags);
 149         snd_gf1_select_voice(gus, voice);
 150 #if 0
 151         printk(" -%i- stop voice - volume = 0x%x\n", voice, snd_gf1_i_read16(gus, SNDRV_GF1_VW_VOLUME));
 152 #endif
 153         snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_ADDRESS_CONTROL);
 154         snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_VOLUME_CONTROL);
 155         if (gus->gf1.enh_mode)
 156                 snd_gf1_write8(gus, SNDRV_GF1_VB_ACCUMULATOR, 0);
 157         spin_unlock_irqrestore(&gus->reg_lock, flags);
 158 #if 0
 159         snd_gf1_lfo_shutdown(gus, voice, ULTRA_LFO_VIBRATO);
 160         snd_gf1_lfo_shutdown(gus, voice, ULTRA_LFO_TREMOLO);
 161 #endif
 162 }
 163
 164 void snd_gf1_clear_voices(snd_gus_card_t * gus, unsigned short v_min, 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
 205 void snd_gf1_stop_voices(snd_gus_card_t * 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         long time;
 211
 212         if (!in_interrupt()) {  /* this can't be done in interrupt */
 213                 for (i = v_min, ramp_ok = 0; i <= v_max; i++) {
 214                         spin_lock_irqsave(&gus->reg_lock, flags);
 215                         snd_gf1_select_voice(gus, i);
 216                         ramp_end = snd_gf1_read16(gus, 9) >> 8;
 217                         if (ramp_end > SNDRV_GF1_MIN_OFFSET) {
 218                                 ramp_ok++;
 219                                 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_RATE, 20);      /* ramp rate */
 220                                 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_START, SNDRV_GF1_MIN_OFFSET);   /* ramp start */
 221                                 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_END, ramp_end); /* ramp end */
 222                                 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_CONTROL, 0x40); /* ramp down */
 223                                 if (gus->gf1.enh_mode) {
 224                                         snd_gf1_delay(gus);
 225                                         snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_CONTROL, 0x40);
 226                                 }
 227                         }
 228                         spin_unlock_irqrestore(&gus->reg_lock, flags);
 229                 }
 230                 time = HZ / 20;
 231                 while (time > 0 && !signal_pending(current)) {
 232                         set_current_state(TASK_INTERRUPTIBLE);
 233                         time = schedule_timeout(time);
 234                 }
 235         }
 236         snd_gf1_clear_voices(gus, v_min, v_max);
 237 }
 238
 239 static void snd_gf1_alloc_voice_use(snd_gus_card_t * gus,
 240                                     snd_gus_voice_t * pvoice,
 241                                     int type, int client, int port)
 242 {
 243         pvoice->use = 1;
 244         switch (type) {
 245         case SNDRV_GF1_VOICE_TYPE_PCM:
 246                 gus->gf1.pcm_alloc_voices++;
 247                 pvoice->pcm = 1;
 248                 break;
 249         case SNDRV_GF1_VOICE_TYPE_SYNTH:
 250                 pvoice->synth = 1;
 251                 pvoice->client = client;
 252                 pvoice->port = port;
 253                 break;
 254         case SNDRV_GF1_VOICE_TYPE_MIDI:
 255                 pvoice->midi = 1;
 256                 pvoice->client = client;
 257                 pvoice->port = port;
 258                 break;
 259         }
 260 }
 261
 262 snd_gus_voice_t *snd_gf1_alloc_voice(snd_gus_card_t * gus, int type, int client, int port)
 263 {
 264         snd_gus_voice_t *pvoice;
 265         unsigned long flags;
 266         int idx;
 267
 268         spin_lock_irqsave(&gus->voice_alloc, flags);
 269         if (type == SNDRV_GF1_VOICE_TYPE_PCM) {
 270                 if (gus->gf1.pcm_alloc_voices >= gus->gf1.pcm_channels) {
 271                         spin_unlock_irqrestore(&gus->voice_alloc, flags);
 272                         return NULL;
 273                 }
 274         }
 275         for (idx = 0; idx < 32; idx++) {
 276                 pvoice = &gus->gf1.voices[idx];
 277                 if (!pvoice->use) {
 278                         snd_gf1_alloc_voice_use(gus, pvoice, type, client, port);
 279                         spin_unlock_irqrestore(&gus->voice_alloc, flags);
 280                         return pvoice;
 281                 }
 282         }
 283         for (idx = 0; idx < 32; idx++) {
 284                 pvoice = &gus->gf1.voices[idx];
 285                 if (pvoice->midi && !pvoice->client) {
 286                         snd_gf1_clear_voices(gus, pvoice->number, pvoice->number);
 287                         snd_gf1_alloc_voice_use(gus, pvoice, type, client, port);
 288                         spin_unlock_irqrestore(&gus->voice_alloc, flags);
 289                         return pvoice;
 290                 }
 291         }
 292         spin_unlock_irqrestore(&gus->voice_alloc, flags);
 293         return NULL;
 294 }
 295
 296 void snd_gf1_free_voice(snd_gus_card_t * gus, snd_gus_voice_t *voice)
 297 {
 298         unsigned long flags;
 299         void (*private_free)(snd_gus_voice_t *voice);
 300         void *private_data;
 301
 302         if (voice == NULL || !voice->use)
 303                 return;
 304         snd_gf1_set_default_handlers(gus, SNDRV_GF1_HANDLER_VOICE | voice->number);
 305         snd_gf1_clear_voices(gus, voice->number, voice->number);
 306         spin_lock_irqsave(&gus->voice_alloc, flags);
 307         private_free = voice->private_free;
 308         private_data = voice->private_data;
 309         voice->private_free = NULL;
 310         voice->private_data = NULL;
 311         if (voice->pcm)
 312                 gus->gf1.pcm_alloc_voices--;
 313         voice->use = voice->pcm = 0;
 314         voice->sample_ops = NULL;
 315         spin_unlock_irqrestore(&gus->voice_alloc, flags);
 316         if (private_free)
 317                 private_free(voice);
 318 }
 319
 320 /*
 321  *  call this function only by start of driver
 322  */
 323
 324 int snd_gf1_start(snd_gus_card_t * gus)
 325 {
 326         unsigned long flags;
 327         unsigned int i;
 328
 329         snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 0);   /* reset GF1 */
 330         udelay(160);
 331         snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 1);   /* disable IRQ & DAC */
 332         udelay(160);
 333         snd_gf1_i_write8(gus, SNDRV_GF1_GB_JOYSTICK_DAC_LEVEL, gus->joystick_dac);
 334
 335         snd_gf1_set_default_handlers(gus, SNDRV_GF1_HANDLER_ALL);
 336         for (i = 0; i < 32; i++) {
 337                 gus->gf1.voices[i].number = i;
 338                 snd_gf1_set_default_handlers(gus, SNDRV_GF1_HANDLER_VOICE | i);
 339         }
 340
 341         snd_gf1_uart_cmd(gus, 0x03);    /* huh.. this cleanup took me some time... */
 342
 343         if (gus->gf1.enh_mode) {        /* enhanced mode !!!! */
 344                 snd_gf1_i_write8(gus, SNDRV_GF1_GB_GLOBAL_MODE, snd_gf1_i_look8(gus, SNDRV_GF1_GB_GLOBAL_MODE) | 0x01);
 345                 snd_gf1_i_write8(gus, SNDRV_GF1_GB_MEMORY_CONTROL, 0x01);
 346         }
 347         snd_gf1_clear_regs(gus);
 348         snd_gf1_select_active_voices(gus);
 349         snd_gf1_delay(gus);
 350         gus->gf1.default_voice_address = gus->gf1.memory > 0 ? 0 : 512 - 8;
 351         /* initialize LFOs & clear LFOs memory */
 352         if (gus->gf1.enh_mode && gus->gf1.memory) {
 353                 gus->gf1.hw_lfo = 1;
 354                 gus->gf1.default_voice_address += 1024;
 355         } else {
 356                 gus->gf1.sw_lfo = 1;
 357         }
 358 #if 0
 359         snd_gf1_lfo_init(gus);
 360 #endif
 361         if (gus->gf1.memory > 0)
 362                 for (i = 0; i < 4; i++)
 363                         snd_gf1_poke(gus, gus->gf1.default_voice_address + i, 0);
 364         snd_gf1_clear_regs(gus);
 365         snd_gf1_clear_voices(gus, 0, 31);
 366         snd_gf1_look_regs(gus);
 367         udelay(160);
 368         snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 7);   /* Reset Register = IRQ enable, DAC enable */
 369         udelay(160);
 370         snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 7);   /* Reset Register = IRQ enable, DAC enable */
 371         if (gus->gf1.enh_mode) {        /* enhanced mode !!!! */
 372                 snd_gf1_i_write8(gus, SNDRV_GF1_GB_GLOBAL_MODE, snd_gf1_i_look8(gus, SNDRV_GF1_GB_GLOBAL_MODE) | 0x01);
 373                 snd_gf1_i_write8(gus, SNDRV_GF1_GB_MEMORY_CONTROL, 0x01);
 374         }
 375         while ((snd_gf1_i_read8(gus, SNDRV_GF1_GB_VOICES_IRQ) & 0xc0) != 0xc0);
 376
 377         spin_lock_irqsave(&gus->reg_lock, flags);
 378         outb(gus->gf1.active_voice = 0, GUSP(gus, GF1PAGE));
 379         outb(gus->mix_cntrl_reg, GUSP(gus, MIXCNTRLREG));
 380         spin_unlock_irqrestore(&gus->reg_lock, flags);
 381
 382         snd_gf1_timers_init(gus);
 383         snd_gf1_look_regs(gus);
 384         snd_gf1_mem_init(gus);
 385         snd_gf1_mem_proc_init(gus);
 386 #ifdef CONFIG_SND_DEBUG
 387         snd_gus_irq_profile_init(gus);
 388 #endif
 389
 390 #if 0
 391         if (gus->pnp_flag) {
 392                 if (gus->chip.playback_fifo_size > 0)
 393                         snd_gf1_i_write16(gus, SNDRV_GF1_GW_FIFO_RECORD_BASE_ADDR, gus->chip.playback_fifo_block->ptr >> 8);
 394                 if (gus->chip.record_fifo_size > 0)
 395                         snd_gf1_i_write16(gus, SNDRV_GF1_GW_FIFO_PLAY_BASE_ADDR, gus->chip.record_fifo_block->ptr >> 8);
 396                 snd_gf1_i_write16(gus, SNDRV_GF1_GW_FIFO_SIZE, gus->chip.interwave_fifo_reg);
 397         }
 398 #endif
 399
 400         return 0;
 401 }
 402
 403 /*
 404  *  call this function only by shutdown of driver
 405  */
 406
 407 int snd_gf1_stop(snd_gus_card_t * gus)
 408 {
 409         snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, 0); /* stop all timers */
 410         snd_gf1_stop_voices(gus, 0, 31);                /* stop all voices */
 411         snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 1);   /* disable IRQ & DAC */
 412         snd_gf1_timers_done(gus);
 413         snd_gf1_mem_done(gus);
 414 #if 0
 415         snd_gf1_lfo_done(gus);
 416 #endif
 417         return 0;
 418 }