blob: 20cfdb87f84ab24c8f4480e5540caf57d67fd50e [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
Jaroslav Kyselac1017a42007-10-15 09:50:19 +02002 * Copyright (c) by Jaroslav Kysela <perex@perex.cz>
Linus Torvalds1da177e2005-04-16 15:20:36 -07003 *
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
Takashi Iwai5e2da202005-11-17 14:36:44 +010028extern void snd_gf1_timers_init(struct snd_gus_card * gus);
29extern void snd_gf1_timers_done(struct snd_gus_card * gus);
30extern int snd_gf1_synth_init(struct snd_gus_card * gus);
31extern void snd_gf1_synth_done(struct snd_gus_card * gus);
Linus Torvalds1da177e2005-04-16 15:20:36 -070032
33/*
34 * ok.. default interrupt handlers...
35 */
36
Takashi Iwai5e2da202005-11-17 14:36:44 +010037static void snd_gf1_default_interrupt_handler_midi_out(struct snd_gus_card * gus)
Linus Torvalds1da177e2005-04-16 15:20:36 -070038{
39 snd_gf1_uart_cmd(gus, gus->gf1.uart_cmd &= ~0x20);
40}
41
Takashi Iwai5e2da202005-11-17 14:36:44 +010042static void snd_gf1_default_interrupt_handler_midi_in(struct snd_gus_card * gus)
Linus Torvalds1da177e2005-04-16 15:20:36 -070043{
44 snd_gf1_uart_cmd(gus, gus->gf1.uart_cmd &= ~0x80);
45}
46
Takashi Iwai5e2da202005-11-17 14:36:44 +010047static void snd_gf1_default_interrupt_handler_timer1(struct snd_gus_card * gus)
Linus Torvalds1da177e2005-04-16 15:20:36 -070048{
49 snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, gus->gf1.timer_enabled &= ~4);
50}
51
Takashi Iwai5e2da202005-11-17 14:36:44 +010052static void snd_gf1_default_interrupt_handler_timer2(struct snd_gus_card * gus)
Linus Torvalds1da177e2005-04-16 15:20:36 -070053{
54 snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, gus->gf1.timer_enabled &= ~8);
55}
56
Takashi Iwai5e2da202005-11-17 14:36:44 +010057static void snd_gf1_default_interrupt_handler_wave_and_volume(struct snd_gus_card * gus, struct snd_gus_voice * voice)
Linus Torvalds1da177e2005-04-16 15:20:36 -070058{
59 snd_gf1_i_ctrl_stop(gus, 0x00);
60 snd_gf1_i_ctrl_stop(gus, 0x0d);
61}
62
Takashi Iwai5e2da202005-11-17 14:36:44 +010063static void snd_gf1_default_interrupt_handler_dma_write(struct snd_gus_card * gus)
Linus Torvalds1da177e2005-04-16 15:20:36 -070064{
65 snd_gf1_i_write8(gus, 0x41, 0x00);
66}
67
Takashi Iwai5e2da202005-11-17 14:36:44 +010068static void snd_gf1_default_interrupt_handler_dma_read(struct snd_gus_card * gus)
Linus Torvalds1da177e2005-04-16 15:20:36 -070069{
70 snd_gf1_i_write8(gus, 0x49, 0x00);
71}
72
Takashi Iwai5e2da202005-11-17 14:36:44 +010073void snd_gf1_set_default_handlers(struct snd_gus_card * gus, unsigned int what)
Linus Torvalds1da177e2005-04-16 15:20:36 -070074{
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) {
Takashi Iwai5e2da202005-11-17 14:36:44 +010084 struct snd_gus_voice *voice;
Linus Torvalds1da177e2005-04-16 15:20:36 -070085
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
Takashi Iwai5e2da202005-11-17 14:36:44 +0100102static void snd_gf1_clear_regs(struct snd_gus_card * gus)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700103{
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
Takashi Iwai5e2da202005-11-17 14:36:44 +0100114static void snd_gf1_look_regs(struct snd_gus_card * gus)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700115{
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
Takashi Iwai5e2da202005-11-17 14:36:44 +0100130void snd_gf1_smart_stop_voice(struct snd_gus_card * gus, unsigned short voice)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700131{
132 unsigned long flags;
133
134 spin_lock_irqsave(&gus->reg_lock, flags);
135 snd_gf1_select_voice(gus, voice);
136#if 0
Takashi Iwai99b359b2005-10-20 18:26:44 +0200137 printk(KERN_DEBUG " -%i- smart stop voice - volume = 0x%x\n", voice, snd_gf1_i_read16(gus, SNDRV_GF1_VW_VOLUME));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700138#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
Takashi Iwai5e2da202005-11-17 14:36:44 +0100144void snd_gf1_stop_voice(struct snd_gus_card * gus, unsigned short voice)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700145{
146 unsigned long flags;
147
148 spin_lock_irqsave(&gus->reg_lock, flags);
149 snd_gf1_select_voice(gus, voice);
150#if 0
Takashi Iwai99b359b2005-10-20 18:26:44 +0200151 printk(KERN_DEBUG " -%i- stop voice - volume = 0x%x\n", voice, snd_gf1_i_read16(gus, SNDRV_GF1_VW_VOLUME));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700152#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
Takashi Iwai5e2da202005-11-17 14:36:44 +0100164static void snd_gf1_clear_voices(struct snd_gus_card * gus, unsigned short v_min,
Adrian Bunk209ac852005-05-23 10:29:53 +0200165 unsigned short v_max)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700166{
167 unsigned long flags;
168 unsigned int daddr;
169 unsigned short i, w_16;
170
171 daddr = gus->gf1.default_voice_address << 4;
172 for (i = v_min; i <= v_max; i++) {
173#if 0
174 if (gus->gf1.syn_voices)
175 gus->gf1.syn_voices[i].flags = ~VFLG_DYNAMIC;
176#endif
177 spin_lock_irqsave(&gus->reg_lock, flags);
178 snd_gf1_select_voice(gus, i);
179 snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_ADDRESS_CONTROL); /* Voice Control Register = voice stop */
180 snd_gf1_ctrl_stop(gus, SNDRV_GF1_VB_VOLUME_CONTROL); /* Volume Ramp Control Register = ramp off */
181 if (gus->gf1.enh_mode)
182 snd_gf1_write8(gus, SNDRV_GF1_VB_MODE, gus->gf1.memory ? 0x02 : 0x82); /* Deactivate voice */
183 w_16 = snd_gf1_read8(gus, SNDRV_GF1_VB_ADDRESS_CONTROL) & 0x04;
184 snd_gf1_write16(gus, SNDRV_GF1_VW_FREQUENCY, 0x400);
185 snd_gf1_write_addr(gus, SNDRV_GF1_VA_START, daddr, w_16);
186 snd_gf1_write_addr(gus, SNDRV_GF1_VA_END, daddr, w_16);
187 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_START, 0);
188 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_END, 0);
189 snd_gf1_write8(gus, SNDRV_GF1_VB_VOLUME_RATE, 0);
190 snd_gf1_write16(gus, SNDRV_GF1_VW_VOLUME, 0);
191 snd_gf1_write_addr(gus, SNDRV_GF1_VA_CURRENT, daddr, w_16);
192 snd_gf1_write8(gus, SNDRV_GF1_VB_PAN, 7);
193 if (gus->gf1.enh_mode) {
194 snd_gf1_write8(gus, SNDRV_GF1_VB_ACCUMULATOR, 0);
195 snd_gf1_write16(gus, SNDRV_GF1_VW_EFFECT_VOLUME, 0);
196 snd_gf1_write16(gus, SNDRV_GF1_VW_EFFECT_VOLUME_FINAL, 0);
197 }
198 spin_unlock_irqrestore(&gus->reg_lock, flags);
199#if 0
200 snd_gf1_lfo_shutdown(gus, i, ULTRA_LFO_VIBRATO);
201 snd_gf1_lfo_shutdown(gus, i, ULTRA_LFO_TREMOLO);
202#endif
203 }
204}
205
Takashi Iwai5e2da202005-11-17 14:36:44 +0100206void snd_gf1_stop_voices(struct snd_gus_card * gus, unsigned short v_min, unsigned short v_max)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700207{
208 unsigned long flags;
209 short i, ramp_ok;
210 unsigned short ramp_end;
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 msleep_interruptible(50);
231 }
232 snd_gf1_clear_voices(gus, v_min, v_max);
233}
234
Takashi Iwai5e2da202005-11-17 14:36:44 +0100235static void snd_gf1_alloc_voice_use(struct snd_gus_card * gus,
236 struct snd_gus_voice * pvoice,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700237 int type, int client, int port)
238{
239 pvoice->use = 1;
240 switch (type) {
241 case SNDRV_GF1_VOICE_TYPE_PCM:
242 gus->gf1.pcm_alloc_voices++;
243 pvoice->pcm = 1;
244 break;
245 case SNDRV_GF1_VOICE_TYPE_SYNTH:
246 pvoice->synth = 1;
247 pvoice->client = client;
248 pvoice->port = port;
249 break;
250 case SNDRV_GF1_VOICE_TYPE_MIDI:
251 pvoice->midi = 1;
252 pvoice->client = client;
253 pvoice->port = port;
254 break;
255 }
256}
257
Takashi Iwai5e2da202005-11-17 14:36:44 +0100258struct snd_gus_voice *snd_gf1_alloc_voice(struct snd_gus_card * gus, int type, int client, int port)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700259{
Takashi Iwai5e2da202005-11-17 14:36:44 +0100260 struct snd_gus_voice *pvoice;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700261 unsigned long flags;
262 int idx;
263
264 spin_lock_irqsave(&gus->voice_alloc, flags);
265 if (type == SNDRV_GF1_VOICE_TYPE_PCM) {
266 if (gus->gf1.pcm_alloc_voices >= gus->gf1.pcm_channels) {
267 spin_unlock_irqrestore(&gus->voice_alloc, flags);
268 return NULL;
269 }
270 }
271 for (idx = 0; idx < 32; idx++) {
272 pvoice = &gus->gf1.voices[idx];
273 if (!pvoice->use) {
274 snd_gf1_alloc_voice_use(gus, pvoice, type, client, port);
275 spin_unlock_irqrestore(&gus->voice_alloc, flags);
276 return pvoice;
277 }
278 }
279 for (idx = 0; idx < 32; idx++) {
280 pvoice = &gus->gf1.voices[idx];
281 if (pvoice->midi && !pvoice->client) {
282 snd_gf1_clear_voices(gus, pvoice->number, pvoice->number);
283 snd_gf1_alloc_voice_use(gus, pvoice, type, client, port);
284 spin_unlock_irqrestore(&gus->voice_alloc, flags);
285 return pvoice;
286 }
287 }
288 spin_unlock_irqrestore(&gus->voice_alloc, flags);
289 return NULL;
290}
291
Takashi Iwai5e2da202005-11-17 14:36:44 +0100292void snd_gf1_free_voice(struct snd_gus_card * gus, struct snd_gus_voice *voice)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700293{
294 unsigned long flags;
Takashi Iwai5e2da202005-11-17 14:36:44 +0100295 void (*private_free)(struct snd_gus_voice *voice);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700296 void *private_data;
297
298 if (voice == NULL || !voice->use)
299 return;
300 snd_gf1_set_default_handlers(gus, SNDRV_GF1_HANDLER_VOICE | voice->number);
301 snd_gf1_clear_voices(gus, voice->number, voice->number);
302 spin_lock_irqsave(&gus->voice_alloc, flags);
303 private_free = voice->private_free;
304 private_data = voice->private_data;
305 voice->private_free = NULL;
306 voice->private_data = NULL;
307 if (voice->pcm)
308 gus->gf1.pcm_alloc_voices--;
309 voice->use = voice->pcm = 0;
310 voice->sample_ops = NULL;
311 spin_unlock_irqrestore(&gus->voice_alloc, flags);
312 if (private_free)
313 private_free(voice);
314}
315
316/*
317 * call this function only by start of driver
318 */
319
Takashi Iwai5e2da202005-11-17 14:36:44 +0100320int snd_gf1_start(struct snd_gus_card * gus)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700321{
322 unsigned long flags;
323 unsigned int i;
324
325 snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 0); /* reset GF1 */
326 udelay(160);
327 snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 1); /* disable IRQ & DAC */
328 udelay(160);
329 snd_gf1_i_write8(gus, SNDRV_GF1_GB_JOYSTICK_DAC_LEVEL, gus->joystick_dac);
330
331 snd_gf1_set_default_handlers(gus, SNDRV_GF1_HANDLER_ALL);
332 for (i = 0; i < 32; i++) {
333 gus->gf1.voices[i].number = i;
334 snd_gf1_set_default_handlers(gus, SNDRV_GF1_HANDLER_VOICE | i);
335 }
336
337 snd_gf1_uart_cmd(gus, 0x03); /* huh.. this cleanup took me some time... */
338
339 if (gus->gf1.enh_mode) { /* enhanced mode !!!! */
340 snd_gf1_i_write8(gus, SNDRV_GF1_GB_GLOBAL_MODE, snd_gf1_i_look8(gus, SNDRV_GF1_GB_GLOBAL_MODE) | 0x01);
341 snd_gf1_i_write8(gus, SNDRV_GF1_GB_MEMORY_CONTROL, 0x01);
342 }
343 snd_gf1_clear_regs(gus);
344 snd_gf1_select_active_voices(gus);
345 snd_gf1_delay(gus);
346 gus->gf1.default_voice_address = gus->gf1.memory > 0 ? 0 : 512 - 8;
347 /* initialize LFOs & clear LFOs memory */
348 if (gus->gf1.enh_mode && gus->gf1.memory) {
349 gus->gf1.hw_lfo = 1;
350 gus->gf1.default_voice_address += 1024;
351 } else {
352 gus->gf1.sw_lfo = 1;
353 }
354#if 0
355 snd_gf1_lfo_init(gus);
356#endif
357 if (gus->gf1.memory > 0)
358 for (i = 0; i < 4; i++)
359 snd_gf1_poke(gus, gus->gf1.default_voice_address + i, 0);
360 snd_gf1_clear_regs(gus);
361 snd_gf1_clear_voices(gus, 0, 31);
362 snd_gf1_look_regs(gus);
363 udelay(160);
364 snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 7); /* Reset Register = IRQ enable, DAC enable */
365 udelay(160);
366 snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 7); /* Reset Register = IRQ enable, DAC enable */
367 if (gus->gf1.enh_mode) { /* enhanced mode !!!! */
368 snd_gf1_i_write8(gus, SNDRV_GF1_GB_GLOBAL_MODE, snd_gf1_i_look8(gus, SNDRV_GF1_GB_GLOBAL_MODE) | 0x01);
369 snd_gf1_i_write8(gus, SNDRV_GF1_GB_MEMORY_CONTROL, 0x01);
370 }
371 while ((snd_gf1_i_read8(gus, SNDRV_GF1_GB_VOICES_IRQ) & 0xc0) != 0xc0);
372
373 spin_lock_irqsave(&gus->reg_lock, flags);
374 outb(gus->gf1.active_voice = 0, GUSP(gus, GF1PAGE));
375 outb(gus->mix_cntrl_reg, GUSP(gus, MIXCNTRLREG));
376 spin_unlock_irqrestore(&gus->reg_lock, flags);
377
378 snd_gf1_timers_init(gus);
379 snd_gf1_look_regs(gus);
380 snd_gf1_mem_init(gus);
381 snd_gf1_mem_proc_init(gus);
382#ifdef CONFIG_SND_DEBUG
383 snd_gus_irq_profile_init(gus);
384#endif
385
386#if 0
387 if (gus->pnp_flag) {
388 if (gus->chip.playback_fifo_size > 0)
389 snd_gf1_i_write16(gus, SNDRV_GF1_GW_FIFO_RECORD_BASE_ADDR, gus->chip.playback_fifo_block->ptr >> 8);
390 if (gus->chip.record_fifo_size > 0)
391 snd_gf1_i_write16(gus, SNDRV_GF1_GW_FIFO_PLAY_BASE_ADDR, gus->chip.record_fifo_block->ptr >> 8);
392 snd_gf1_i_write16(gus, SNDRV_GF1_GW_FIFO_SIZE, gus->chip.interwave_fifo_reg);
393 }
394#endif
395
396 return 0;
397}
398
399/*
400 * call this function only by shutdown of driver
401 */
402
Takashi Iwai5e2da202005-11-17 14:36:44 +0100403int snd_gf1_stop(struct snd_gus_card * gus)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700404{
405 snd_gf1_i_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, 0); /* stop all timers */
406 snd_gf1_stop_voices(gus, 0, 31); /* stop all voices */
407 snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 1); /* disable IRQ & DAC */
408 snd_gf1_timers_done(gus);
409 snd_gf1_mem_done(gus);
410#if 0
411 snd_gf1_lfo_done(gus);
412#endif
413 return 0;
414}