summaryrefslogtreecommitdiffstats
path: root/sys/i386/isa/sound/cs4232.c
diff options
context:
space:
mode:
Diffstat (limited to 'sys/i386/isa/sound/cs4232.c')
-rw-r--r--sys/i386/isa/sound/cs4232.c204
1 files changed, 204 insertions, 0 deletions
diff --git a/sys/i386/isa/sound/cs4232.c b/sys/i386/isa/sound/cs4232.c
new file mode 100644
index 0000000..c95842a
--- /dev/null
+++ b/sys/i386/isa/sound/cs4232.c
@@ -0,0 +1,204 @@
+/*
+ * sound/cs4232.c
+ *
+ * The low level driver for Crystal CS4232 based cards. The CS4232 is a PnP
+ * compatible chip which contains a CS4231A codec, SB emulation, a MPU401
+ * compatible MIDI port, joystick and synthesizer and IDE CD-ROM interfaces.
+ * This is just a temporary driver until full PnP support gets inplemented.
+ * Just the WSS codec, FM synth and the MIDI ports are supported. Other
+ * interfaces are left uninitialized.
+ *
+ * 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 defined(CONFIG_CS4232)
+
+#define KEY_PORT 0x279 /* Same as LPT1 status port */
+#define CSN_NUM 0x99 /* Just a random number */
+
+#define CS_OUT(a) outb( KEY_PORT, a)
+#define CS_OUT2(a, b) {CS_OUT(a);CS_OUT(b);}
+#define CS_OUT3(a, b, c) {CS_OUT(a);CS_OUT(b);CS_OUT(c);}
+
+static int mpu_base = 0, mpu_irq = 0;
+static int mpu_detected = 0;
+
+int
+probe_cs4232_mpu(struct address_info * hw_config)
+{
+ /*
+ * Just write down the config values.
+ */
+
+ mpu_base = hw_config->io_base;
+ mpu_irq = hw_config->irq;
+ return 0;
+}
+
+void
+attach_cs4232_mpu(struct address_info * hw_config)
+{
+}
+
+static unsigned char crystal_key[] = /* A 32 byte magic key sequence */
+{
+ 0x96, 0x35, 0x9a, 0xcd, 0xe6, 0xf3, 0x79, 0xbc,
+ 0x5e, 0xaf, 0x57, 0x2b, 0x15, 0x8a, 0xc5, 0xe2,
+ 0xf1, 0xf8, 0x7c, 0x3e, 0x9f, 0x4f, 0x27, 0x13,
+ 0x09, 0x84, 0x42, 0xa1, 0xd0, 0x68, 0x34, 0x1a
+};
+
+int
+probe_cs4232(struct address_info * hw_config)
+{
+ int i;
+ int base = hw_config->io_base, irq = hw_config->irq;
+ int dma1 = hw_config->dma, dma2 = hw_config->dma2;
+
+ /*
+ * Verify that the I/O port range is free.
+ */
+
+ if (0) {
+ printf("cs4232.c: I/O port 0x%03x not free\n", base);
+ return 0;
+ }
+ /*
+ * This version of the driver doesn't use the PnP method when
+ * configuring the card but a simplified method defined by Crystal.
+ * This means that just one CS4232 compatible device can exist on the
+ * system. Also this method conflicts with possible PnP support in
+ * the OS. For this reason driver is just a temporary kludge.
+ */
+
+ /*
+ * Wake up the card by sending a 32 byte Crystal key to the key port.
+ */
+ for (i = 0; i < 32; i++)
+ CS_OUT(crystal_key[i]);
+
+ /*
+ * Now set the CSN (Card Select Number).
+ */
+
+ CS_OUT2(0x06, CSN_NUM);
+
+ /*
+ * Ensure that there is no other codec using the same address.
+ */
+
+ CS_OUT2(0x15, 0x00); /* Select logical device 0 (WSS/SB/FM) */
+ CS_OUT2(0x33, 0x00); /* Inactivate logical dev 0 */
+
+ /*
+ * Then set some config bytes. First logical device 0
+ */
+
+ CS_OUT2(0x15, 0x00); /* Select logical device 0 (WSS/SB/FM) */
+ CS_OUT3(0x47, (base >> 8) & 0xff, base & 0xff); /* WSSbase */
+
+ if (0) /* Not free */
+ CS_OUT3(0x48, 0x00, 0x00) /* FMbase off */
+ else
+ CS_OUT3(0x48, 0x03, 0x88); /* FMbase 0x388 */
+
+ CS_OUT3(0x42, 0x00, 0x00); /* SBbase off */
+ CS_OUT2(0x22, irq); /* SB+WSS IRQ */
+ CS_OUT2(0x2a, dma1); /* SB+WSS DMA */
+
+ if (dma2 != -1)
+ CS_OUT2(0x25, dma2) /* WSS DMA2 */
+ else
+ CS_OUT2(0x25, 4); /* No WSS DMA2 */
+
+ CS_OUT2(0x33, 0x01); /* Activate logical dev 0 */
+
+ /*
+ * Initialize logical device 3 (MPU)
+ */
+
+#if (defined(CONFIG_MPU401) || defined(CONFIG_MPU_EMU)) && defined(CONFIG_MIDI)
+ if (mpu_base != 0 && mpu_irq != 0) {
+ CS_OUT2(0x15, 0x03); /* Select logical device 3 (MPU) */
+ CS_OUT3(0x47, (mpu_base >> 8) & 0xff, mpu_base & 0xff); /* MPUbase */
+ CS_OUT2(0x22, mpu_irq); /* MPU IRQ */
+ CS_OUT2(0x33, 0x01); /* Activate logical dev 3 */
+ }
+#endif
+
+ /*
+ * Finally activate the chip
+ */
+ CS_OUT(0x79);
+
+ /*
+ * Then try to detect the codec part of the chip
+ */
+
+ return ad1848_detect(hw_config->io_base, NULL, hw_config->osp);
+}
+
+void
+attach_cs4232(struct address_info * hw_config)
+{
+ int base = hw_config->io_base, irq = hw_config->irq;
+ int dma1 = hw_config->dma, dma2 = hw_config->dma2;
+
+ if (dma2 == -1)
+ dma2 = dma1;
+
+ ad1848_init("CS4232", base,
+ irq,
+ dma1, /* Playback DMA */
+ dma2, /* Capture DMA */
+ 0,
+ hw_config->osp);
+
+#if (defined(CONFIG_MPU401) || defined(CONFIG_MPU_EMU)) && defined(CONFIG_MIDI)
+ if (mpu_base != 0 && mpu_irq != 0) {
+ static struct address_info hw_config2 =
+ {0}; /* Ensure it's initialized */
+
+ hw_config2.io_base = mpu_base;
+ hw_config2.irq = mpu_irq;
+ hw_config2.dma = -1;
+ hw_config2.dma2 = -1;
+ hw_config2.always_detect = 0;
+ hw_config2.name = NULL;
+ hw_config2.card_subtype = 0;
+ hw_config2.osp = hw_config->osp;
+
+ if (probe_mpu401(&hw_config2)) {
+ mpu_detected = 1;
+ attach_mpu401(&hw_config2);
+ } else {
+ mpu_base = mpu_irq = 0;
+ }
+ }
+#endif
+}
+
+#endif
OpenPOWER on IntegriCloud