2
* Copyright (c) by Jaroslav Kysela <perex@perex.cz>
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.
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.
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
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>
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);
33
* ok.. default interrupt handlers...
36
static void snd_gf1_default_interrupt_handler_midi_out(struct snd_gus_card * gus)
38
snd_gf1_uart_cmd(gus, gus->gf1.uart_cmd &= ~0x20);
41
static void snd_gf1_default_interrupt_handler_midi_in(struct snd_gus_card * gus)
43
snd_gf1_uart_cmd(gus, gus->gf1.uart_cmd &= ~0x80);
46
static void snd_gf1_default_interrupt_handler_timer1(struct snd_gus_card * gus)
48
snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, gus->gf1.timer_enabled &= ~4);
51
static void snd_gf1_default_interrupt_handler_timer2(struct snd_gus_card * gus)
53
snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, gus->gf1.timer_enabled &= ~8);
56
static void snd_gf1_default_interrupt_handler_wave_and_volume(struct snd_gus_card * gus, struct snd_gus_voice * voice)
58
snd_gf1_i_ctrl_stop(gus, 0x00);
59
snd_gf1_i_ctrl_stop(gus, 0x0d);
62
static void snd_gf1_default_interrupt_handler_dma_write(struct snd_gus_card * gus)
64
snd_gf1_i_write8(gus, 0x41, 0x00);
67
static void snd_gf1_default_interrupt_handler_dma_read(struct snd_gus_card * gus)
69
snd_gf1_i_write8(gus, 0x49, 0x00);
72
void snd_gf1_set_default_handlers(struct snd_gus_card * gus, unsigned int what)
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;
85
voice = &gus->gf1.voices[what & 0xffff];
87
voice->handler_volume = snd_gf1_default_interrupt_handler_wave_and_volume;
88
voice->handler_effect = NULL;
89
voice->volume_change = NULL;
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;
101
static void snd_gf1_clear_regs(struct snd_gus_card * gus)
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);
113
static void snd_gf1_look_regs(struct snd_gus_card * gus)
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);
126
* put selected GF1 voices to initial stage...
129
void snd_gf1_smart_stop_voice(struct snd_gus_card * gus, unsigned short voice)
133
spin_lock_irqsave(&gus->reg_lock, flags);
134
snd_gf1_select_voice(gus, voice);
136
printk(KERN_DEBUG " -%i- smart stop voice - volume = 0x%x\n", voice, snd_gf1_i_read16(gus, SNDRV_GF1_VW_VOLUME));
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);
143
void snd_gf1_stop_voice(struct snd_gus_card * gus, unsigned short voice)
147
spin_lock_irqsave(&gus->reg_lock, flags);
148
snd_gf1_select_voice(gus, voice);
150
printk(KERN_DEBUG " -%i- stop voice - volume = 0x%x\n", voice, snd_gf1_i_read16(gus, SNDRV_GF1_VW_VOLUME));
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);
158
snd_gf1_lfo_shutdown(gus, voice, ULTRA_LFO_VIBRATO);
159
snd_gf1_lfo_shutdown(gus, voice, ULTRA_LFO_TREMOLO);
163
static void snd_gf1_clear_voices(struct snd_gus_card * gus, unsigned short v_min,
164
unsigned short v_max)
168
unsigned short i, w_16;
170
daddr = gus->gf1.default_voice_address << 4;
171
for (i = v_min; i <= v_max; i++) {
173
if (gus->gf1.syn_voices)
174
gus->gf1.syn_voices[i].flags = ~VFLG_DYNAMIC;
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);
197
spin_unlock_irqrestore(&gus->reg_lock, flags);
199
snd_gf1_lfo_shutdown(gus, i, ULTRA_LFO_VIBRATO);
200
snd_gf1_lfo_shutdown(gus, i, ULTRA_LFO_TREMOLO);
205
void snd_gf1_stop_voices(struct snd_gus_card * gus, unsigned short v_min, unsigned short v_max)
209
unsigned short ramp_end;
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) {
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) {
224
snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_CONTROL, 0x40);
227
spin_unlock_irqrestore(&gus->reg_lock, flags);
229
msleep_interruptible(50);
231
snd_gf1_clear_voices(gus, v_min, v_max);
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)
240
case SNDRV_GF1_VOICE_TYPE_PCM:
241
gus->gf1.pcm_alloc_voices++;
244
case SNDRV_GF1_VOICE_TYPE_SYNTH:
246
pvoice->client = client;
249
case SNDRV_GF1_VOICE_TYPE_MIDI:
251
pvoice->client = client;
257
struct snd_gus_voice *snd_gf1_alloc_voice(struct snd_gus_card * gus, int type, int client, int port)
259
struct snd_gus_voice *pvoice;
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);
270
for (idx = 0; idx < 32; idx++) {
271
pvoice = &gus->gf1.voices[idx];
273
snd_gf1_alloc_voice_use(gus, pvoice, type, client, port);
274
spin_unlock_irqrestore(&gus->voice_alloc, flags);
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);
287
spin_unlock_irqrestore(&gus->voice_alloc, flags);
291
void snd_gf1_free_voice(struct snd_gus_card * gus, struct snd_gus_voice *voice)
294
void (*private_free)(struct snd_gus_voice *voice);
297
if (voice == NULL || !voice->use)
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;
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);
316
* call this function only by start of driver
319
int snd_gf1_start(struct snd_gus_card * gus)
324
snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 0); /* reset GF1 */
326
snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 1); /* disable IRQ & DAC */
328
snd_gf1_i_write8(gus, SNDRV_GF1_GB_JOYSTICK_DAC_LEVEL, gus->joystick_dac);
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);
336
snd_gf1_uart_cmd(gus, 0x03); /* huh.. this cleanup took me some time... */
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);
342
snd_gf1_clear_regs(gus);
343
snd_gf1_select_active_voices(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) {
349
gus->gf1.default_voice_address += 1024;
354
snd_gf1_lfo_init(gus);
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);
363
snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 7); /* Reset Register = IRQ enable, DAC enable */
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);
370
while ((snd_gf1_i_read8(gus, SNDRV_GF1_GB_VOICES_IRQ) & 0xc0) != 0xc0);
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);
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);
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);
399
* call this function only by shutdown of driver
402
int snd_gf1_stop(struct snd_gus_card * gus)
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);
410
snd_gf1_lfo_done(gus);