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