summaryrefslogtreecommitdiffstats
path: root/sys/i386/isa/sound/pas2_card.c
diff options
context:
space:
mode:
Diffstat (limited to 'sys/i386/isa/sound/pas2_card.c')
-rw-r--r--sys/i386/isa/sound/pas2_card.c361
1 files changed, 361 insertions, 0 deletions
diff --git a/sys/i386/isa/sound/pas2_card.c b/sys/i386/isa/sound/pas2_card.c
new file mode 100644
index 0000000..dc78afa
--- /dev/null
+++ b/sys/i386/isa/sound/pas2_card.c
@@ -0,0 +1,361 @@
+/*
+ * sound/pas2_card.c
+ *
+ * Detection routine for the Pro Audio Spectrum cards.
+ *
+ * Copyright by Hannu Savolainen 1993
+ *
+ * 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 defined(CONFIG_PAS)
+#define _PAS2_CARD_C_
+
+#define DEFINE_TRANSLATIONS
+#include <i386/isa/sound/pas_hw.h>
+
+/*
+ * The Address Translation code is used to convert I/O register addresses to
+ * be relative to the given base -register
+ */
+
+int translat_code;
+static int pas_intr_mask = 0;
+static int pas_irq = 0;
+
+static sound_os_info *pas_osp;
+
+char pas_model;
+static char *pas_model_names[] =
+{"", "Pro AudioSpectrum+", "CDPC", "Pro AudioSpectrum 16", "Pro AudioSpectrum 16D"};
+
+/*
+ * pas_read() and pas_write() are equivalents of inb and outb
+ */
+/*
+ * These routines perform the I/O address translation required
+ */
+/*
+ * to support other than the default base address
+ */
+extern void mix_write(u_char data, int ioaddr);
+
+u_char
+pas_read(int ioaddr)
+{
+ return inb(ioaddr ^ translat_code);
+}
+
+void
+pas_write(u_char data, int ioaddr)
+{
+ outb(ioaddr ^ translat_code, data);
+}
+
+static void
+pas2_msg(char *foo)
+{
+ printf(" PAS2: %s.\n", foo);
+}
+
+/******************* Begin of the Interrupt Handler ********************/
+
+void
+pasintr(int irq)
+{
+ int status;
+
+ status = pas_read(INTERRUPT_STATUS);
+ pas_write(status, INTERRUPT_STATUS); /* Clear interrupt */
+
+ if (status & I_S_PCM_SAMPLE_BUFFER_IRQ) {
+#ifdef CONFIG_AUDIO
+ pas_pcm_interrupt(status, 1);
+#endif
+ status &= ~I_S_PCM_SAMPLE_BUFFER_IRQ;
+ }
+ if (status & I_S_MIDI_IRQ) {
+#ifdef CONFIG_MIDI
+ pas_midi_interrupt();
+#endif
+ status &= ~I_S_MIDI_IRQ;
+ }
+}
+
+int
+pas_set_intr(int mask)
+{
+ if (!mask)
+ return 0;
+
+ pas_intr_mask |= mask;
+
+ pas_write(pas_intr_mask, INTERRUPT_MASK);
+ return 0;
+}
+
+int
+pas_remove_intr(int mask)
+{
+ if (!mask)
+ return 0;
+
+ pas_intr_mask &= ~mask;
+ pas_write(pas_intr_mask, INTERRUPT_MASK);
+
+ return 0;
+}
+
+/******************* End of the Interrupt handler **********************/
+
+/******************* Begin of the Initialization Code ******************/
+
+static int
+config_pas_hw(struct address_info * hw_config)
+{
+ char ok = 1;
+ u_int int_ptrs; /* scsi/sound interrupt pointers */
+
+ pas_irq = hw_config->irq;
+
+ pas_write(0x00, INTERRUPT_MASK);
+
+ pas_write(0x36, SAMPLE_COUNTER_CONTROL); /* Local timer control *
+ * register */
+
+ pas_write(0x36, SAMPLE_RATE_TIMER); /* Sample rate timer (16 bit) */
+ pas_write(0, SAMPLE_RATE_TIMER);
+
+ pas_write(0x74, SAMPLE_COUNTER_CONTROL); /* Local timer control *
+ * register */
+
+ pas_write(0x74, SAMPLE_BUFFER_COUNTER); /* Sample count register (16 *
+ * bit) */
+ pas_write(0, SAMPLE_BUFFER_COUNTER);
+
+ pas_write(F_F_PCM_BUFFER_COUNTER | F_F_PCM_RATE_COUNTER | F_F_MIXER_UNMUTE | 1, FILTER_FREQUENCY);
+ pas_write(P_C_PCM_DMA_ENABLE | P_C_PCM_MONO | P_C_PCM_DAC_MODE | P_C_MIXER_CROSS_L_TO_L | P_C_MIXER_CROSS_R_TO_R, PCM_CONTROL);
+ pas_write(S_M_PCM_RESET | S_M_FM_RESET | S_M_SB_RESET | S_M_MIXER_RESET /* | S_M_OPL3_DUAL_MONO */ , SERIAL_MIXER);
+
+ pas_write(I_C_1_BOOT_RESET_ENABLE
+#ifdef PAS_JOYSTICK_ENABLE
+ | I_C_1_JOYSTICK_ENABLE
+#endif
+ ,IO_CONFIGURATION_1);
+
+ if (pas_irq < 0 || pas_irq > 15) {
+ printf("PAS2: Invalid IRQ %d", pas_irq);
+ ok = 0;
+ } else {
+ int_ptrs = pas_read(IO_CONFIGURATION_3);
+ int_ptrs |= I_C_3_PCM_IRQ_translate[pas_irq] & 0xf;
+ pas_write(int_ptrs, IO_CONFIGURATION_3);
+ if (!I_C_3_PCM_IRQ_translate[pas_irq]) {
+ printf("PAS2: Invalid IRQ %d", pas_irq);
+ ok = 0;
+ } else {
+ if (snd_set_irq_handler(pas_irq, pasintr, hw_config->osp) < 0)
+ ok = 0;
+ }
+ }
+
+ if (hw_config->dma < 0 || hw_config->dma > 7) {
+ printf("PAS2: Invalid DMA selection %d", hw_config->dma);
+ ok = 0;
+ } else {
+ pas_write(I_C_2_PCM_DMA_translate[hw_config->dma], IO_CONFIGURATION_2);
+ if (!I_C_2_PCM_DMA_translate[hw_config->dma]) {
+ printf("PAS2: Invalid DMA selection %d", hw_config->dma);
+ ok = 0;
+ } else {
+ if (0) {
+ printf("pas2_card.c: Can't allocate DMA channel\n");
+ ok = 0;
+ }
+ }
+ }
+
+ /*
+ * This fixes the timing problems of the PAS due to the Symphony
+ * chipset as per Media Vision. Only define this if your PAS doesn't
+ * work correctly.
+ */
+#ifdef SYMPHONY_PAS
+ outb(0xa8, 0x05);
+ outb(0xa9, 0x60);
+#endif
+
+#ifdef BROKEN_BUS_CLOCK
+ pas_write(S_C_1_PCS_ENABLE | S_C_1_PCS_STEREO | S_C_1_PCS_REALSOUND | S_C_1_FM_EMULATE_CLOCK, SYSTEM_CONFIGURATION_1);
+#else
+ /*
+ * pas_write(S_C_1_PCS_ENABLE, SYSTEM_CONFIGURATION_1);
+ */
+ pas_write(S_C_1_PCS_ENABLE | S_C_1_PCS_STEREO | S_C_1_PCS_REALSOUND, SYSTEM_CONFIGURATION_1);
+#endif
+ pas_write(0x18, SYSTEM_CONFIGURATION_3); /* ??? */
+
+ pas_write(F_F_MIXER_UNMUTE | 0x01, FILTER_FREQUENCY); /* Sets mute off and *
+ * selects filter rate *
+ * of 17.897 kHz */
+ pas_write(8, PRESCALE_DIVIDER);
+
+ mix_write(P_M_MV508_ADDRESS | 5, PARALLEL_MIXER);
+ mix_write(5, PARALLEL_MIXER);
+
+#if defined(CONFIG_SB_EMULATION) && defined(CONFIG_SB)
+
+ {
+ struct address_info *sb_config;
+
+ if ((sb_config = sound_getconf(SNDCARD_SB))) {
+ u_char irq_dma;
+
+ /*
+ * Turn on Sound Blaster compatibility
+ */
+ /*
+ * bit 1 = SB emulation
+ */
+ /*
+ * bit 0 = MPU401 emulation (CDPC only :-( )
+ */
+ pas_write(0x02, COMPATIBILITY_ENABLE);
+
+ /*
+ * "Emulation address"
+ */
+ pas_write((sb_config->io_base >> 4) & 0x0f, EMULATION_ADDRESS);
+
+ if (!E_C_SB_DMA_translate[sb_config->dma])
+ printf("\n\nPAS16 Warning: Invalid SB DMA %d\n\n",
+ sb_config->dma);
+
+ if (!E_C_SB_IRQ_translate[sb_config->irq])
+ printf("\n\nPAS16 Warning: Invalid SB IRQ %d\n\n",
+ sb_config->irq);
+
+ irq_dma = E_C_SB_DMA_translate[sb_config->dma] |
+ E_C_SB_IRQ_translate[sb_config->irq];
+
+ pas_write(irq_dma, EMULATION_CONFIGURATION);
+ }
+ }
+#else
+ pas_write(0x00, COMPATIBILITY_ENABLE);
+#endif
+
+ if (!ok)
+ pas2_msg("Driver not enabled");
+
+ return ok;
+}
+
+static int
+detect_pas_hw(struct address_info * hw_config)
+{
+ u_char board_id, foo;
+
+ /*
+ * WARNING: Setting an option like W:1 or so that disables warm boot
+ * reset of the card will screw up this detect code something fierce.
+ * Adding code to handle this means possibly interfering with other
+ * cards on the bus if you have something on base port 0x388. SO be
+ * forewarned.
+ */
+
+ outb(MASTER_DECODE, 0xBC); /* Talk to first board */
+ outb(MASTER_DECODE, hw_config->io_base >> 2); /* Set base address */
+ translat_code = PAS_DEFAULT_BASE ^ hw_config->io_base;
+ pas_write(1, WAIT_STATE); /* One wait-state */
+
+ board_id = pas_read(INTERRUPT_MASK);
+
+ if (board_id == 0xff)
+ return 0;
+
+ /*
+ * We probably have a PAS-series board, now check for a PAS2-series
+ * board by trying to change the board revision bits. PAS2-series
+ * hardware won't let you do this - the bits are read-only.
+ */
+
+ foo = board_id ^ 0xe0;
+
+ pas_write(foo, INTERRUPT_MASK);
+ foo = inb(INTERRUPT_MASK);
+ pas_write(board_id, INTERRUPT_MASK);
+
+ if (board_id != foo) /* Not a PAS2 */
+ return 0;
+
+ pas_model = pas_read(CHIP_REV);
+
+ return pas_model;
+}
+
+void
+attach_pas_card(struct address_info * hw_config)
+{
+ pas_irq = hw_config->irq;
+ pas_osp = hw_config->osp;
+
+ if (detect_pas_hw(hw_config)) {
+
+ if ((pas_model = pas_read(CHIP_REV))) {
+ char temp[100];
+
+ snprintf(temp, sizeof(temp),
+ "%s rev %d", pas_model_names[(int) pas_model],
+ pas_read(BOARD_REV_ID));
+ conf_printf(temp, hw_config);
+ }
+ if (config_pas_hw(hw_config)) {
+
+#ifdef CONFIG_AUDIO
+ pas_pcm_init(hw_config);
+#endif
+
+#if defined(CONFIG_SB_EMULATION) && defined(CONFIG_SB)
+
+ sb_dsp_disable_midi(); /* The SB emulation don't
+ * support * midi */
+#endif
+
+
+#ifdef CONFIG_MIDI
+ pas_midi_init();
+#endif
+ pas_init_mixer();
+ }
+ }
+}
+
+int
+probe_pas(struct address_info * hw_config)
+{
+ pas_osp = hw_config->osp;
+ return detect_pas_hw(hw_config);
+}
+
+#endif
OpenPOWER on IntegriCloud