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 27 extern void snd_gf1_timers_init(struct snd_gus_card * gus); 28 extern void snd_gf1_timers_done(struct snd_gus_card * gus); 29 extern int snd_gf1_synth_init(struct snd_gus_card * gus); 30 extern void snd_gf1_synth_done(struct snd_gus_card * gus); 31 32 /* 33 * ok.. default interrupt handlers... 34 */ 35 36 static 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 41 static 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 46 static 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 51 static 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 56 static 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 62 static void snd_gf1_default_interrupt_handler_dma_write(struct snd_gus_card * gus) 63 { 64 snd_gf1_i_write8(gus, 0x41, 0x00); 65 } 66 67 static void snd_gf1_default_interrupt_handler_dma_read(struct snd_gus_card * gus) 68 { 69 snd_gf1_i_write8(gus, 0x49, 0x00); 70 } 71 72 void 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 101 static 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 113 static 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 129 void 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 143 void 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 163 static 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 205 void 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 234 static 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 257 struct 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 291 void 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 319 int 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 402 int 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