sound/isa/gus/gus_reset.c

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