From beb116954b9b7f3bb56412b2494b562f02b864b1 Mon Sep 17 00:00:00 2001 From: Ralf Baechle Date: Tue, 7 Jan 1997 02:33:00 +0000 Subject: Import of Linux/MIPS 2.1.14 --- drivers/sound/cs4232.c | 342 +++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 342 insertions(+) create mode 100644 drivers/sound/cs4232.c (limited to 'drivers/sound/cs4232.c') 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 + + +#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 -- cgit v1.2.3