diff options
author | peter <peter@FreeBSD.org> | 1999-01-01 08:18:13 +0000 |
---|---|---|
committer | peter <peter@FreeBSD.org> | 1999-01-01 08:18:13 +0000 |
commit | d713c6aca4942e88e9afb66a012c176a3b3c93dd (patch) | |
tree | 145a2f9aaed47d75ef5882d97d90e8835c70db2c /sys/i386/isa/sound/trix.c | |
parent | cfef427a396353878f1fdad225686030324bda8e (diff) | |
download | FreeBSD-src-d713c6aca4942e88e9afb66a012c176a3b3c93dd.zip FreeBSD-src-d713c6aca4942e88e9afb66a012c176a3b3c93dd.tar.gz |
Part 2 of pcvt/voxware revival. I hope I have not clobbered any other
deltas, but it is possible since I had a few merge conflicts over the last
few days while this has been sitting ready to go.
(Part 1 was committed to the config files, but cvs aborted grrr..)
Approved by: core
Diffstat (limited to 'sys/i386/isa/sound/trix.c')
-rw-r--r-- | sys/i386/isa/sound/trix.c | 368 |
1 files changed, 368 insertions, 0 deletions
diff --git a/sys/i386/isa/sound/trix.c b/sys/i386/isa/sound/trix.c new file mode 100644 index 0000000..818ad5f --- /dev/null +++ b/sys/i386/isa/sound/trix.c @@ -0,0 +1,368 @@ +/* + * sound/trix.c + * + * Low level driver for the MediaTriX AudioTriX Pro (MT-0002-PC Control Chip) + * + * Copyright by Hannu Savolainen 1995 + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions are + * met: 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. 2. + * Redistributions in binary form must reproduce the above copyright notice, + * this list of conditions and the following disclaimer in the documentation + * and/or other materials provided with the distribution. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND ANY + * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED + * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE + * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR + * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR + * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER + * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + */ + +#include <i386/isa/sound/sound_config.h> + +#if NTRIX > 0 + +#ifdef INCLUDE_TRIX_BOOT +#include <i386/isa/sound/trix_boot.h> +#endif + +#if (NSB > 0) +extern int sb_no_recording; +#endif + +static int kilroy_was_here = 0; /* Don't detect twice */ +static int sb_initialized = 0; + +static sound_os_info *trix_osp = NULL; + +static u_char +trix_read(int addr) +{ + outb(0x390, (u_char) addr); /* MT-0002-PC ASIC address */ + return inb(0x391); /* MT-0002-PC ASIC data */ +} + +static void +trix_write(int addr, int data) +{ + outb(0x390, (u_char) addr); /* MT-0002-PC ASIC address */ + outb(0x391, (u_char) data); /* MT-0002-PC ASIC data */ +} + +static void +download_boot(int base) +{ +#ifdef INCLUDE_TRIX_BOOT + int i = 0, n = sizeof(trix_boot); + + trix_write(0xf8, 0x00); /* ??????? */ + outb(base + 6, 0x01); /* Clear the internal data pointer */ + outb(base + 6, 0x00); /* Restart */ + + /* + * Write the boot code to the RAM upload/download register. Each + * write increments the internal data pointer. + */ + outb(base + 6, 0x01); /* Clear the internal data pointer */ + outb(0x390, 0x1A); /* Select RAM download/upload port */ + + for (i = 0; i < n; i++) + outb(0x391, trix_boot[i]); + for (i = n; i < 10016; i++) /* Clear up to first 16 bytes of data RAM */ + outb(0x391, 0x00); + outb(base + 6, 0x00); /* Reset */ + outb(0x390, 0x50); /* ?????? */ +#endif + +} + +static int +trix_set_wss_port(struct address_info * hw_config) +{ + u_char addr_bits; + + if (0) { + printf("AudioTriX: Config port I/O conflict\n"); + return 0; + } + if (kilroy_was_here) /* Already initialized */ + return 0; + + if (trix_read(0x15) != 0x71) { /* No asic signature */ + DDB(printf("No AudioTriX ASIC signature found\n")); + return 0; + } + + kilroy_was_here = 1; + + /* + * Reset some registers. + */ + + trix_write(0x13, 0); + trix_write(0x14, 0); + + /* + * Configure the ASIC to place the codec to the proper I/O location + */ + + switch (hw_config->io_base) { + case 0x530: + addr_bits = 0; + break; + case 0x604: + addr_bits = 1; + break; + case 0xE80: + addr_bits = 2; + break; + case 0xF40: + addr_bits = 3; + break; + default: + return 0; + } + + trix_write(0x19, (trix_read(0x19) & 0x03) | addr_bits); + return 1; +} + +/* + * Probe and attach routines for the Windows Sound System mode of AudioTriX + * Pro + */ + +int +probe_trix_wss(struct address_info * hw_config) +{ + /* + * Check if the IO port returns valid signature. The original MS + * Sound system returns 0x04 while some cards (AudioTriX Pro for + * example) return 0x00. + */ + + if (0) { + printf("AudioTriX: MSS I/O port conflict\n"); + return 0; + } + trix_osp = hw_config->osp; + + if (!trix_set_wss_port(hw_config)) + return 0; + + if ((inb(hw_config->io_base + 3) & 0x3f) != 0x00) { + DDB(printf("No MSS signature detected on port 0x%x\n", + hw_config->io_base)); + return 0; + } + if (hw_config->irq > 11) { + printf("AudioTriX: Bad WSS IRQ %d\n", hw_config->irq); + return 0; + } + if (hw_config->dma != 0 && hw_config->dma != 1 && hw_config->dma != 3) { + printf("AudioTriX: Bad WSS DMA %d\n", hw_config->dma); + return 0; + } + if (hw_config->dma2 != -1) + if (hw_config->dma2 != 0 && hw_config->dma2 != 1 && hw_config->dma2 != 3) { + printf("AudioTriX: Bad capture DMA %d\n", hw_config->dma2); + return 0; + } + /* + * Check that DMA0 is not in use with a 8 bit board. + */ + + if (hw_config->dma == 0 && inb(hw_config->io_base + 3) & 0x80) { + printf("AudioTriX: Can't use DMA0 with a 8 bit card\n"); + return 0; + } + if (hw_config->irq > 7 && hw_config->irq != 9 && inb(hw_config->io_base + 3) & 0x80) { + printf("AudioTriX: Can't use IRQ%d with a 8 bit card\n", hw_config->irq); + return 0; + } + return ad1848_detect(hw_config->io_base + 4, NULL, hw_config->osp); +} + +void +attach_trix_wss(struct address_info * hw_config) +{ + static u_char interrupt_bits[12] = + {-1, -1, -1, -1, -1, -1, -1, 0x08, -1, 0x10, 0x18, 0x20}; + char bits; + + static u_char dma_bits[4] = + {1, 2, 0, 3}; + + int config_port = hw_config->io_base + 0, + version_port = hw_config->io_base + 3; + int dma1 = hw_config->dma, dma2 = hw_config->dma2; + + trix_osp = hw_config->osp; + + if (!kilroy_was_here) { + DDB(printf("AudioTriX: Attach called but not probed yet???\n")); + return ; + } + /* + * Set the IRQ and DMA addresses. + */ + + bits = interrupt_bits[hw_config->irq]; + if (bits == -1) { + printf("AudioTriX: Bad IRQ (%d)\n", hw_config->irq); + return ; + } + outb(config_port, bits | 0x40); + if ((inb(version_port) & 0x40) == 0) + printf("[IRQ Conflict?]"); + + if (hw_config->dma2 == -1) { /* Single DMA mode */ + bits |= dma_bits[dma1]; + dma2 = dma1; + } else { + u_char tmp; + + tmp = trix_read(0x13) & ~30; + trix_write(0x13, tmp | 0x80 | (dma1 << 4)); + + tmp = trix_read(0x14) & ~30; + trix_write(0x14, tmp | 0x80 | (dma2 << 4)); + } + + outb(config_port, bits);/* Write IRQ+DMA setup */ + + ad1848_init("AudioTriX Pro", hw_config->io_base + 4, + hw_config->irq, + dma1, + dma2, + 0, + hw_config->osp); + return ; +} + +int +probe_trix_sb(struct address_info * hw_config) +{ + int tmp; + u_char conf; + static char irq_translate[] = {-1, -1, -1, 0, 1, 2, -1, 3}; + +#ifndef INCLUDE_TRIX_BOOT + return 0; /* No boot code -> no fun */ +#endif + if (!kilroy_was_here) + return 0; /* AudioTriX Pro has not been detected earlier */ + + if (sb_initialized) + return 0; + + if ((hw_config->io_base & 0xffffff8f) != 0x200) + return 0; + + tmp = hw_config->irq; + if (tmp > 7) + return 0; + if (irq_translate[tmp] == -1) + return 0; + + tmp = hw_config->dma; + if (tmp != 1 && tmp != 3) + return 0; + + conf = 0x84; /* DMA and IRQ enable */ + conf |= hw_config->io_base & 0x70; /* I/O address bits */ + conf |= irq_translate[hw_config->irq]; + if (hw_config->dma == 3) + conf |= 0x08; + trix_write(0x1b, conf); + + download_boot(hw_config->io_base); + sb_initialized = 1; + + return 1; +} + +void +attach_trix_sb(struct address_info * hw_config) +{ +#if (NSB > 0) + sb_dsp_disable_midi(); + sb_no_recording = 1; +#endif + conf_printf("AudioTriX (SB)", hw_config); +} + +void +attach_trix_mpu(struct address_info * hw_config) +{ +#if (defined(CONFIG_MPU401) || defined(CONFIG_MPU_EMU)) && defined(CONFIG_MIDI) + attach_mpu401(hw_config); +#endif +} + +int +probe_trix_mpu(struct address_info * hw_config) +{ +#if (defined(CONFIG_MPU401) || defined(CONFIG_MPU_EMU)) && defined(CONFIG_MIDI) + u_char conf; + static char irq_bits[] = {-1, -1, -1, 1, 2, 3, -1, 4, -1, 5}; + + if (!kilroy_was_here) { + DDB(printf("Trix: WSS and SB modes must be initialized before MPU\n")); + return 0; /* AudioTriX Pro has not been detected earlier */ + } + if (!sb_initialized) { + DDB(printf("Trix: SB mode must be initialized before MPU\n")); + return 0; + } + if (mpu_initialized) { + DDB(printf("Trix: MPU mode already initialized\n")); + return 0; + } + if (hw_config->irq > 9) { + printf("AudioTriX: Bad MPU IRQ %d\n", hw_config->irq); + return 0; + } + if (irq_bits[hw_config->irq] == -1) { + printf("AudioTriX: Bad MPU IRQ %d\n", hw_config->irq); + return 0; + } + switch (hw_config->io_base) { + case 0x330: + conf = 0x00; + break; + case 0x370: + conf = 0x04; + break; + case 0x3b0: + conf = 0x08; + break; + case 0x3f0: + conf = 0x0c; + break; + default: + return 0; /* Invalid port */ + } + + conf |= irq_bits[hw_config->irq] << 4; + + trix_write(0x19, (trix_read(0x19) & 0x83) | conf); + + mpu_initialized = 1; + + return probe_mpu401(hw_config); +#else + return 0; +#endif +} + +#endif |