Loading...
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
27extern void snd_gf1_timers_init(struct snd_gus_card * gus);
28extern void snd_gf1_timers_done(struct snd_gus_card * gus);
29extern int snd_gf1_synth_init(struct snd_gus_card * gus);
30extern void snd_gf1_synth_done(struct snd_gus_card * gus);
31
32/*
33 * ok.. default interrupt handlers...
34 */
35
36static 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
41static 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
46static 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
51static 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
56static 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
62static void snd_gf1_default_interrupt_handler_dma_write(struct snd_gus_card * gus)
63{
64 snd_gf1_i_write8(gus, 0x41, 0x00);
65}
66
67static void snd_gf1_default_interrupt_handler_dma_read(struct snd_gus_card * gus)
68{
69 snd_gf1_i_write8(gus, 0x49, 0x00);
70}
71
72void 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
101static 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
113static 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
129void 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
143void 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
163static 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
205void 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
234static 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
257struct 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
291void 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
319int 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
402int 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}
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
12extern void snd_gf1_timers_init(struct snd_gus_card * gus);
13extern void snd_gf1_timers_done(struct snd_gus_card * gus);
14extern int snd_gf1_synth_init(struct snd_gus_card * gus);
15extern void snd_gf1_synth_done(struct snd_gus_card * gus);
16
17/*
18 * ok.. default interrupt handlers...
19 */
20
21static 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
26static 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
31static 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
36static 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
41static 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
47static void snd_gf1_default_interrupt_handler_dma_write(struct snd_gus_card * gus)
48{
49 snd_gf1_i_write8(gus, 0x41, 0x00);
50}
51
52static void snd_gf1_default_interrupt_handler_dma_read(struct snd_gus_card * gus)
53{
54 snd_gf1_i_write8(gus, 0x49, 0x00);
55}
56
57void 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
86static 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
98static 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
114void 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
128void 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
148static 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
190void 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
219static 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
242struct 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
276void 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
302int 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
385int 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}