Import of Linux/MIPS 2.1.14

1 files changed, 342 insertions, 0 deletions

diff --git a/drivers/sound/cs4232.c b/drivers/sound/cs4232.c
new file mode 100644
index 000000000..2e7e9acc6
--- /dev/null
+++ b/drivers/sound/cs4232.c
@@ -0,0 +1,342 @@
+/*
+ * 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 implemented. Just the WSS codec, FM synth and the MIDI ports are
+ * supported. Other interfaces are left uninitialized.
+ */
+/*
+ * Copyright (C) by Hannu Savolainen 1993-1996
+ *
+ * OSS/Free for Linux is distributed under the GNU GENERAL PUBLIC LICENSE (GPL)
+ * Version 2 (June 1991). See the "COPYING" file distributed with this software
+ * for more info.
+ */
+#include <linux/config.h>
+
+
+#include "sound_config.h"
+
+#if defined(CONFIG_CS4232)
+
+#define KEY_PORT	0x279	/* Same as LPT1 status port */
+#define CSN_NUM		0x99	/* Just a random number */
+
+static int     *osp;
+
+static void 
+CS_OUT (unsigned char a)
+{
+  outb ((a), KEY_PORT);
+}
+#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, n;
+  int             base = hw_config->io_base, irq = hw_config->irq;
+  int             dma1 = hw_config->dma, dma2 = hw_config->dma2;
+
+  static struct wait_queue *cs_sleeper = NULL;
+  static volatile struct snd_wait cs_sleep_flag =
+  {0};
+
+
+/*
+ * Verify that the I/O port range is free.
+ */
+
+  if (check_region (base, 4))
+    {
+      printk ("cs4232.c: I/O port 0x%03x not free\n", base);
+      return 0;
+    }
+
+  if (ad1848_detect (hw_config->io_base, NULL, hw_config->osp))
+    return 1;			/* The card is already active */
+
+/*
+ * 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.
+ */
+
+/*
+ * Repeat initialization few times since it doesn't always succeed in
+ * first time.
+ */
+
+  for (n = 0; n < 4; n++)
+    {
+      cs_sleep_flag.opts = WK_NONE;
+/*
+ * 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]);
+
+
+      {
+	unsigned long   tlimit;
+
+	if (HZ / 10)
+	  current->timeout = tlimit = jiffies + (HZ / 10);
+	else
+	  tlimit = (unsigned long) -1;
+	cs_sleep_flag.opts = WK_SLEEP;
+	interruptible_sleep_on (&cs_sleeper);
+	if (!(cs_sleep_flag.opts & WK_WAKEUP))
+	  {
+	    if (jiffies >= tlimit)
+	      cs_sleep_flag.opts |= WK_TIMEOUT;
+	  }
+	cs_sleep_flag.opts &= ~WK_SLEEP;
+      };			/* Delay */
+
+/*
+ * Now set the CSN (Card Select Number).
+ */
+
+      CS_OUT2 (0x06, CSN_NUM);
+
+
+/*
+ * 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);	/* WSS base */
+
+      if (check_region (0x388, 4))	/* Not free */
+	CS_OUT3 (0x48, 0x00, 0x00)	/* FM base off */
+	  else
+	CS_OUT3 (0x48, 0x03, 0x88);	/* FM base 0x388 */
+
+      CS_OUT3 (0x42, 0x00, 0x00);	/* SB base 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 */
+
+
+      {
+	unsigned long   tlimit;
+
+	if (HZ / 10)
+	  current->timeout = tlimit = jiffies + (HZ / 10);
+	else
+	  tlimit = (unsigned long) -1;
+	cs_sleep_flag.opts = WK_SLEEP;
+	interruptible_sleep_on (&cs_sleeper);
+	if (!(cs_sleep_flag.opts & WK_WAKEUP))
+	  {
+	    if (jiffies >= tlimit)
+	      cs_sleep_flag.opts |= WK_TIMEOUT;
+	  }
+	cs_sleep_flag.opts &= ~WK_SLEEP;
+      };			/* Delay */
+
+/*
+ * 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);	/* MPU base */
+	  CS_OUT2 (0x22, mpu_irq);	/* MPU IRQ */
+	  CS_OUT2 (0x33, 0x01);	/* Activate logical dev 3 */
+	}
+#endif
+
+/*
+ * Finally activate the chip
+ */
+      CS_OUT (0x79);
+
+
+      {
+	unsigned long   tlimit;
+
+	if (HZ / 5)
+	  current->timeout = tlimit = jiffies + (HZ / 5);
+	else
+	  tlimit = (unsigned long) -1;
+	cs_sleep_flag.opts = WK_SLEEP;
+	interruptible_sleep_on (&cs_sleeper);
+	if (!(cs_sleep_flag.opts & WK_WAKEUP))
+	  {
+	    if (jiffies >= tlimit)
+	      cs_sleep_flag.opts |= WK_TIMEOUT;
+	  }
+	cs_sleep_flag.opts &= ~WK_SLEEP;
+      };			/* Delay */
+
+/*
+ * Then try to detect the codec part of the chip
+ */
+
+      if (ad1848_detect (hw_config->io_base, NULL, hw_config->osp))
+	return 1;
+
+
+      {
+	unsigned long   tlimit;
+
+	if (HZ)
+	  current->timeout = tlimit = jiffies + (HZ);
+	else
+	  tlimit = (unsigned long) -1;
+	cs_sleep_flag.opts = WK_SLEEP;
+	interruptible_sleep_on (&cs_sleeper);
+	if (!(cs_sleep_flag.opts & WK_WAKEUP))
+	  {
+	    if (jiffies >= tlimit)
+	      cs_sleep_flag.opts |= WK_TIMEOUT;
+	  }
+	cs_sleep_flag.opts &= ~WK_SLEEP;
+      };			/* Longer delay */
+    }
+
+  return 0;
+}
+
+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;
+  int             old_num_mixers = num_mixers;
+
+  if (dma2 == -1)
+    dma2 = dma1;
+
+  ad1848_init ("CS4232", base,
+	       irq,
+	       dma1,		/* Playback DMA */
+	       dma2,		/* Capture DMA */
+	       0,
+	       hw_config->osp);
+
+  if (num_mixers > old_num_mixers)
+    {				/* Assume the mixer map is as suggested in the CS4232 databook */
+      AD1848_REROUTE (SOUND_MIXER_LINE1, SOUND_MIXER_LINE);
+      AD1848_REROUTE (SOUND_MIXER_LINE2, SOUND_MIXER_CD);
+      AD1848_REROUTE (SOUND_MIXER_LINE3, SOUND_MIXER_SYNTH);	/* FM synth */
+    }
+
+#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.driver_use_1 = 0;
+      hw_config2.driver_use_2 = 0;
+      hw_config2.card_subtype = 0;
+
+      if (probe_mpu401 (&hw_config2))
+	{
+	  mpu_detected = 1;
+	  attach_mpu401 (&hw_config2);
+	}
+      else
+	{
+	  mpu_base = mpu_irq = 0;
+	}
+    }
+#endif
+}
+
+void
+unload_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_unload (base,
+		 irq,
+		 dma1,		/* Playback DMA */
+		 dma2,		/* Capture DMA */
+		 0);
+
+#if (defined(CONFIG_MPU401) || defined(CONFIG_MPU_EMU)) && defined(CONFIG_MIDI)
+  if (mpu_base != 0 && mpu_irq != 0 && mpu_detected)
+    {
+      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.driver_use_1 = 0;
+      hw_config2.driver_use_2 = 0;
+      hw_config2.card_subtype = 0;
+
+      unload_mpu401 (&hw_config2);
+    }
+#endif
+}
+
+void
+unload_cs4232_mpu (struct address_info *hw_config)
+{
+  /* Not required. Handled by cs4232_unload */
+}
+
+
+#endif