2 * Copyright (c) by Jaroslav Kysela <perex@suse.cz>
3 * I/O routines for GF1/InterWave synthesizer chips
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 #include <sound/driver.h>
23 #include <linux/delay.h>
24 #include <linux/time.h>
25 #include <sound/core.h>
26 #include <sound/gus.h>
28 void snd_gf1_delay(snd_gus_card_t * gus)
32 for (i = 0; i < 6; i++) {
39 * =======================================================================
43 * ok.. stop of control registers (wave & ramp) need some special things..
44 * big UltraClick (tm) elimination...
47 static inline void __snd_gf1_ctrl_stop(snd_gus_card_t * gus, unsigned char reg)
51 outb(reg | 0x80, gus->gf1.reg_regsel);
53 value = inb(gus->gf1.reg_data8);
55 outb(reg, gus->gf1.reg_regsel);
57 outb((value | 0x03) & ~(0x80 | 0x20), gus->gf1.reg_data8);
61 static inline void __snd_gf1_write8(snd_gus_card_t * gus,
65 outb(reg, gus->gf1.reg_regsel);
67 outb(data, gus->gf1.reg_data8);
71 static inline unsigned char __snd_gf1_look8(snd_gus_card_t * gus,
74 outb(reg, gus->gf1.reg_regsel);
76 return inb(gus->gf1.reg_data8);
79 static inline void __snd_gf1_write16(snd_gus_card_t * gus,
80 unsigned char reg, unsigned int data)
82 outb(reg, gus->gf1.reg_regsel);
84 outw((unsigned short) data, gus->gf1.reg_data16);
88 static inline unsigned short __snd_gf1_look16(snd_gus_card_t * gus,
91 outb(reg, gus->gf1.reg_regsel);
93 return inw(gus->gf1.reg_data16);
96 static inline void __snd_gf1_adlib_write(snd_gus_card_t * gus,
97 unsigned char reg, unsigned char data)
99 outb(reg, gus->gf1.reg_timerctrl);
100 inb(gus->gf1.reg_timerctrl);
101 inb(gus->gf1.reg_timerctrl);
102 outb(data, gus->gf1.reg_timerdata);
103 inb(gus->gf1.reg_timerctrl);
104 inb(gus->gf1.reg_timerctrl);
107 static inline void __snd_gf1_write_addr(snd_gus_card_t * gus, unsigned char reg,
108 unsigned int addr, int w_16bit)
110 if (gus->gf1.enh_mode) {
112 addr = ((addr >> 1) & ~0x0000000f) | (addr & 0x0000000f);
113 __snd_gf1_write8(gus, SNDRV_GF1_VB_UPPER_ADDRESS, (unsigned char) ((addr >> 26) & 0x03));
115 addr = (addr & 0x00c0000f) | ((addr & 0x003ffff0) >> 1);
116 __snd_gf1_write16(gus, reg, (unsigned short) (addr >> 11));
117 __snd_gf1_write16(gus, reg + 1, (unsigned short) (addr << 5));
120 static inline unsigned int __snd_gf1_read_addr(snd_gus_card_t * gus,
121 unsigned char reg, short w_16bit)
125 res = ((unsigned int) __snd_gf1_look16(gus, reg | 0x80) << 11) & 0xfff800;
126 res |= ((unsigned int) __snd_gf1_look16(gus, (reg + 1) | 0x80) >> 5) & 0x0007ff;
127 if (gus->gf1.enh_mode) {
128 res |= (unsigned int) __snd_gf1_look8(gus, SNDRV_GF1_VB_UPPER_ADDRESS | 0x80) << 26;
130 res = ((res << 1) & 0xffffffe0) | (res & 0x0000000f);
132 res = ((res & 0x001ffff0) << 1) | (res & 0x00c0000f);
138 * =======================================================================
141 void snd_gf1_ctrl_stop(snd_gus_card_t * gus, unsigned char reg)
143 __snd_gf1_ctrl_stop(gus, reg);
146 void snd_gf1_write8(snd_gus_card_t * gus,
150 __snd_gf1_write8(gus, reg, data);
153 unsigned char snd_gf1_look8(snd_gus_card_t * gus, unsigned char reg)
155 return __snd_gf1_look8(gus, reg);
158 void snd_gf1_write16(snd_gus_card_t * gus,
162 __snd_gf1_write16(gus, reg, data);
165 unsigned short snd_gf1_look16(snd_gus_card_t * gus, unsigned char reg)
167 return __snd_gf1_look16(gus, reg);
170 void snd_gf1_adlib_write(snd_gus_card_t * gus,
174 __snd_gf1_adlib_write(gus, reg, data);
177 void snd_gf1_write_addr(snd_gus_card_t * gus, unsigned char reg,
178 unsigned int addr, short w_16bit)
180 __snd_gf1_write_addr(gus, reg, addr, w_16bit);
183 unsigned int snd_gf1_read_addr(snd_gus_card_t * gus,
187 return __snd_gf1_read_addr(gus, reg, w_16bit);
194 void snd_gf1_i_ctrl_stop(snd_gus_card_t * gus, unsigned char reg)
198 spin_lock_irqsave(&gus->reg_lock, flags);
199 __snd_gf1_ctrl_stop(gus, reg);
200 spin_unlock_irqrestore(&gus->reg_lock, flags);
203 void snd_gf1_i_write8(snd_gus_card_t * gus,
209 spin_lock_irqsave(&gus->reg_lock, flags);
210 __snd_gf1_write8(gus, reg, data);
211 spin_unlock_irqrestore(&gus->reg_lock, flags);
214 unsigned char snd_gf1_i_look8(snd_gus_card_t * gus, unsigned char reg)
219 spin_lock_irqsave(&gus->reg_lock, flags);
220 res = __snd_gf1_look8(gus, reg);
221 spin_unlock_irqrestore(&gus->reg_lock, flags);
225 void snd_gf1_i_write16(snd_gus_card_t * gus,
231 spin_lock_irqsave(&gus->reg_lock, flags);
232 __snd_gf1_write16(gus, reg, data);
233 spin_unlock_irqrestore(&gus->reg_lock, flags);
236 unsigned short snd_gf1_i_look16(snd_gus_card_t * gus, unsigned char reg)
241 spin_lock_irqsave(&gus->reg_lock, flags);
242 res = __snd_gf1_look16(gus, reg);
243 spin_unlock_irqrestore(&gus->reg_lock, flags);
249 void snd_gf1_i_adlib_write(snd_gus_card_t * gus,
255 spin_lock_irqsave(&gus->reg_lock, flags);
256 __snd_gf1_adlib_write(gus, reg, data);
257 spin_unlock_irqrestore(&gus->reg_lock, flags);
260 void snd_gf1_i_write_addr(snd_gus_card_t * gus, unsigned char reg,
261 unsigned int addr, short w_16bit)
265 spin_lock_irqsave(&gus->reg_lock, flags);
266 __snd_gf1_write_addr(gus, reg, addr, w_16bit);
267 spin_unlock_irqrestore(&gus->reg_lock, flags);
272 unsigned int snd_gf1_i_read_addr(snd_gus_card_t * gus,
273 unsigned char reg, short w_16bit)
278 spin_lock_irqsave(&gus->reg_lock, flags);
279 res = __snd_gf1_read_addr(gus, reg, w_16bit);
280 spin_unlock_irqrestore(&gus->reg_lock, flags);
288 void snd_gf1_dram_addr(snd_gus_card_t * gus, unsigned int addr)
290 outb(0x43, gus->gf1.reg_regsel);
292 outw((unsigned short) addr, gus->gf1.reg_data16);
294 outb(0x44, gus->gf1.reg_regsel);
296 outb((unsigned char) (addr >> 16), gus->gf1.reg_data8);
300 void snd_gf1_poke(snd_gus_card_t * gus, unsigned int addr, unsigned char data)
304 spin_lock_irqsave(&gus->reg_lock, flags);
305 outb(SNDRV_GF1_GW_DRAM_IO_LOW, gus->gf1.reg_regsel);
307 outw((unsigned short) addr, gus->gf1.reg_data16);
309 outb(SNDRV_GF1_GB_DRAM_IO_HIGH, gus->gf1.reg_regsel);
311 outb((unsigned char) (addr >> 16), gus->gf1.reg_data8);
313 outb(data, gus->gf1.reg_dram);
314 spin_unlock_irqrestore(&gus->reg_lock, flags);
317 unsigned char snd_gf1_peek(snd_gus_card_t * gus, unsigned int addr)
322 spin_lock_irqsave(&gus->reg_lock, flags);
323 outb(SNDRV_GF1_GW_DRAM_IO_LOW, gus->gf1.reg_regsel);
325 outw((unsigned short) addr, gus->gf1.reg_data16);
327 outb(SNDRV_GF1_GB_DRAM_IO_HIGH, gus->gf1.reg_regsel);
329 outb((unsigned char) (addr >> 16), gus->gf1.reg_data8);
331 res = inb(gus->gf1.reg_dram);
332 spin_unlock_irqrestore(&gus->reg_lock, flags);
338 void snd_gf1_pokew(snd_gus_card_t * gus, unsigned int addr, unsigned short data)
342 #ifdef CONFIG_SND_DEBUG
344 snd_printk("snd_gf1_pokew - GF1!!!\n");
346 spin_lock_irqsave(&gus->reg_lock, flags);
347 outb(SNDRV_GF1_GW_DRAM_IO_LOW, gus->gf1.reg_regsel);
349 outw((unsigned short) addr, gus->gf1.reg_data16);
351 outb(SNDRV_GF1_GB_DRAM_IO_HIGH, gus->gf1.reg_regsel);
353 outb((unsigned char) (addr >> 16), gus->gf1.reg_data8);
355 outb(SNDRV_GF1_GW_DRAM_IO16, gus->gf1.reg_regsel);
357 outw(data, gus->gf1.reg_data16);
358 spin_unlock_irqrestore(&gus->reg_lock, flags);
361 unsigned short snd_gf1_peekw(snd_gus_card_t * gus, unsigned int addr)
366 #ifdef CONFIG_SND_DEBUG
368 snd_printk("snd_gf1_peekw - GF1!!!\n");
370 spin_lock_irqsave(&gus->reg_lock, flags);
371 outb(SNDRV_GF1_GW_DRAM_IO_LOW, gus->gf1.reg_regsel);
373 outw((unsigned short) addr, gus->gf1.reg_data16);
375 outb(SNDRV_GF1_GB_DRAM_IO_HIGH, gus->gf1.reg_regsel);
377 outb((unsigned char) (addr >> 16), gus->gf1.reg_data8);
379 outb(SNDRV_GF1_GW_DRAM_IO16, gus->gf1.reg_regsel);
381 res = inw(gus->gf1.reg_data16);
382 spin_unlock_irqrestore(&gus->reg_lock, flags);
386 void snd_gf1_dram_setmem(snd_gus_card_t * gus, unsigned int addr,
387 unsigned short value, unsigned int count)
392 #ifdef CONFIG_SND_DEBUG
394 snd_printk("snd_gf1_dram_setmem - GF1!!!\n");
398 port = GUSP(gus, GF1DATALOW);
399 spin_lock_irqsave(&gus->reg_lock, flags);
400 outb(SNDRV_GF1_GW_DRAM_IO_LOW, gus->gf1.reg_regsel);
402 outw((unsigned short) addr, gus->gf1.reg_data16);
404 outb(SNDRV_GF1_GB_DRAM_IO_HIGH, gus->gf1.reg_regsel);
406 outb((unsigned char) (addr >> 16), gus->gf1.reg_data8);
408 outb(SNDRV_GF1_GW_DRAM_IO16, gus->gf1.reg_regsel);
411 spin_unlock_irqrestore(&gus->reg_lock, flags);
416 void snd_gf1_select_active_voices(snd_gus_card_t * gus)
418 unsigned short voices;
420 static unsigned short voices_tbl[32 - 14 + 1] =
422 44100, 41160, 38587, 36317, 34300, 32494, 30870, 29400, 28063, 26843,
423 25725, 24696, 23746, 22866, 22050, 21289, 20580, 19916, 19293
426 voices = gus->gf1.active_voices;
431 if (gus->gf1.enh_mode)
433 gus->gf1.active_voices = voices;
434 gus->gf1.playback_freq =
435 gus->gf1.enh_mode ? 44100 : voices_tbl[voices - 14];
436 if (!gus->gf1.enh_mode) {
437 snd_gf1_i_write8(gus, SNDRV_GF1_GB_ACTIVE_VOICES, 0xc0 | (voices - 1));
442 #ifdef CONFIG_SND_DEBUG
444 void snd_gf1_print_voice_registers(snd_gus_card_t * gus)
449 voice = gus->gf1.active_voice;
450 printk(" -%i- GF1 voice ctrl, ramp ctrl = 0x%x, 0x%x\n", voice, ctrl = snd_gf1_i_read8(gus, 0), snd_gf1_i_read8(gus, 0x0d));
451 printk(" -%i- GF1 frequency = 0x%x\n", voice, snd_gf1_i_read16(gus, 1));
452 printk(" -%i- GF1 loop start, end = 0x%x (0x%x), 0x%x (0x%x)\n", voice, snd_gf1_i_read_addr(gus, 2, ctrl & 4), snd_gf1_i_read_addr(gus, 2, (ctrl & 4) ^ 4), snd_gf1_i_read_addr(gus, 4, ctrl & 4), snd_gf1_i_read_addr(gus, 4, (ctrl & 4) ^ 4));
453 printk(" -%i- GF1 ramp start, end, rate = 0x%x, 0x%x, 0x%x\n", voice, snd_gf1_i_read8(gus, 7), snd_gf1_i_read8(gus, 8), snd_gf1_i_read8(gus, 6));
454 printk(" -%i- GF1 volume = 0x%x\n", voice, snd_gf1_i_read16(gus, 9));
455 printk(" -%i- GF1 position = 0x%x (0x%x)\n", voice, snd_gf1_i_read_addr(gus, 0x0a, ctrl & 4), snd_gf1_i_read_addr(gus, 0x0a, (ctrl & 4) ^ 4));
456 if (gus->interwave && snd_gf1_i_read8(gus, 0x19) & 0x01) { /* enhanced mode */
457 mode = snd_gf1_i_read8(gus, 0x15);
458 printk(" -%i- GFA1 mode = 0x%x\n", voice, mode);
459 if (mode & 0x01) { /* Effect processor */
460 printk(" -%i- GFA1 effect address = 0x%x\n", voice, snd_gf1_i_read_addr(gus, 0x11, ctrl & 4));
461 printk(" -%i- GFA1 effect volume = 0x%x\n", voice, snd_gf1_i_read16(gus, 0x16));
462 printk(" -%i- GFA1 effect volume final = 0x%x\n", voice, snd_gf1_i_read16(gus, 0x1d));
463 printk(" -%i- GFA1 effect acumulator = 0x%x\n", voice, snd_gf1_i_read8(gus, 0x14));
466 printk(" -%i- GFA1 left offset = 0x%x (%i)\n", voice, snd_gf1_i_read16(gus, 0x13), snd_gf1_i_read16(gus, 0x13) >> 4);
467 printk(" -%i- GFA1 left offset final = 0x%x (%i)\n", voice, snd_gf1_i_read16(gus, 0x1c), snd_gf1_i_read16(gus, 0x1c) >> 4);
468 printk(" -%i- GFA1 right offset = 0x%x (%i)\n", voice, snd_gf1_i_read16(gus, 0x0c), snd_gf1_i_read16(gus, 0x0c) >> 4);
469 printk(" -%i- GFA1 right offset final = 0x%x (%i)\n", voice, snd_gf1_i_read16(gus, 0x1b), snd_gf1_i_read16(gus, 0x1b) >> 4);
471 printk(" -%i- GF1 pan = 0x%x\n", voice, snd_gf1_i_read8(gus, 0x0c));
473 printk(" -%i- GF1 pan = 0x%x\n", voice, snd_gf1_i_read8(gus, 0x0c));
478 void snd_gf1_print_global_registers(snd_gus_card_t * gus)
480 unsigned char global_mode = 0x00;
482 printk(" -G- GF1 active voices = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_ACTIVE_VOICES));
483 if (gus->interwave) {
484 global_mode = snd_gf1_i_read8(gus, SNDRV_GF1_GB_GLOBAL_MODE);
485 printk(" -G- GF1 global mode = 0x%x\n", global_mode);
487 if (global_mode & 0x02) /* LFO enabled? */
488 printk(" -G- GF1 LFO base = 0x%x\n", snd_gf1_i_look16(gus, SNDRV_GF1_GW_LFO_BASE));
489 printk(" -G- GF1 voices IRQ read = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_VOICES_IRQ_READ));
490 printk(" -G- GF1 DRAM DMA control = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_DRAM_DMA_CONTROL));
491 printk(" -G- GF1 DRAM DMA high/low = 0x%x/0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_DRAM_DMA_HIGH), snd_gf1_i_read16(gus, SNDRV_GF1_GW_DRAM_DMA_LOW));
492 printk(" -G- GF1 DRAM IO high/low = 0x%x/0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_DRAM_IO_HIGH), snd_gf1_i_read16(gus, SNDRV_GF1_GW_DRAM_IO_LOW));
494 printk(" -G- GF1 record DMA control = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_REC_DMA_CONTROL));
495 printk(" -G- GF1 DRAM IO 16 = 0x%x\n", snd_gf1_i_look16(gus, SNDRV_GF1_GW_DRAM_IO16));
496 if (gus->gf1.enh_mode) {
497 printk(" -G- GFA1 memory config = 0x%x\n", snd_gf1_i_look16(gus, SNDRV_GF1_GW_MEMORY_CONFIG));
498 printk(" -G- GFA1 memory control = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_MEMORY_CONTROL));
499 printk(" -G- GFA1 FIFO record base = 0x%x\n", snd_gf1_i_look16(gus, SNDRV_GF1_GW_FIFO_RECORD_BASE_ADDR));
500 printk(" -G- GFA1 FIFO playback base = 0x%x\n", snd_gf1_i_look16(gus, SNDRV_GF1_GW_FIFO_PLAY_BASE_ADDR));
501 printk(" -G- GFA1 interleave control = 0x%x\n", snd_gf1_i_look16(gus, SNDRV_GF1_GW_INTERLEAVE));
505 void snd_gf1_print_setup_registers(snd_gus_card_t * gus)
507 printk(" -S- mix control = 0x%x\n", inb(GUSP(gus, MIXCNTRLREG)));
508 printk(" -S- IRQ status = 0x%x\n", inb(GUSP(gus, IRQSTAT)));
509 printk(" -S- timer control = 0x%x\n", inb(GUSP(gus, TIMERCNTRL)));
510 printk(" -S- timer data = 0x%x\n", inb(GUSP(gus, TIMERDATA)));
511 printk(" -S- status read = 0x%x\n", inb(GUSP(gus, REGCNTRLS)));
512 printk(" -S- Sound Blaster control = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL));
513 printk(" -S- AdLib timer 1/2 = 0x%x/0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_ADLIB_TIMER_1), snd_gf1_i_look8(gus, SNDRV_GF1_GB_ADLIB_TIMER_2));
514 printk(" -S- reset = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_RESET));
515 if (gus->interwave) {
516 printk(" -S- compatibility = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_COMPATIBILITY));
517 printk(" -S- decode control = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_DECODE_CONTROL));
518 printk(" -S- version number = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_VERSION_NUMBER));
519 printk(" -S- MPU-401 emul. control A/B = 0x%x/0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_MPU401_CONTROL_A), snd_gf1_i_look8(gus, SNDRV_GF1_GB_MPU401_CONTROL_B));
520 printk(" -S- emulation IRQ = 0x%x\n", snd_gf1_i_look8(gus, SNDRV_GF1_GB_EMULATION_IRQ));
524 void snd_gf1_peek_print_block(snd_gus_card_t * gus, unsigned int addr, int count, int w_16bit)
528 printk(count > 0 ? "%02x:" : "%02x", snd_gf1_peek(gus, addr++));
530 while (count-- > 0) {
531 printk(count > 0 ? "%04x:" : "%04x", snd_gf1_peek(gus, addr) | (snd_gf1_peek(gus, addr + 1) << 8));