[linux.git] / sound / oss / cs4232.c

/*
 * Copyright (C) by Hannu Savolainen 1993-1997
 *
 *	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.
 *
 * ifdef ...WAVEFRONT...
 * 
 *   Support is provided for initializing the WaveFront synth
 *   interface as well, which is logical device #4. Note that if
 *   you have a Tropez+ card, you probably don't need to setup
 *   the CS4232-supported MIDI interface, since it corresponds to
 *   the internal 26-pin header that's hard to access. Using this
 *   requires an additional IRQ, a resource none too plentiful in
 *   this environment. Just don't set module parameters mpuio and
 *   mpuirq, and the MIDI port will be left uninitialized. You can
 *   still use the ICS2115 hosted MIDI interface which corresponds
 *   to the 9-pin D connector on the back of the card.
 *
 * endif  ...WAVEFRONT...
 *
 * Supported chips are:
 *      CS4232
 *      CS4236
 *      CS4236B
 *
 * Note: You will need a PnP config setup to initialise some CS4232 boards
 * anyway.
 *
 * Changes
 *      John Rood               Added Bose Sound System Support.
 *      Toshio Spoor
 *	Alan Cox		Modularisation, Basic cleanups.
 *      Paul Barton-Davis	Separated MPU configuration, added
 *                                       Tropez+ (WaveFront) support
 *	Christoph Hellwig	Adapted to module_init/module_exit,
 * 					simple cleanups
 * 	Arnaldo C. de Melo	got rid of attach_uart401
 *	Bartlomiej Zolnierkiewicz
 *				Added some __init/__initdata/__exit
 *	Marcus Meissner		Added ISA PnP support.
 */

#include <linux/pnp.h>
#include <linux/module.h>
#include <linux/init.h>

#include "sound_config.h"

#include "ad1848.h"
#include "mpu401.h"

#define KEY_PORT	0x279	/* Same as LPT1 status port */
#define CSN_NUM		0x99	/* Just a random number */
#define INDEX_ADDRESS   0x00    /* (R0) Index Address Register */
#define INDEX_DATA      0x01    /* (R1) Indexed Data Register */
#define PIN_CONTROL     0x0a    /* (I10) Pin Control */
#define ENABLE_PINS     0xc0    /* XCTRL0/XCTRL1 enable */

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 __initdata bss       = 0;
static int mpu_base, mpu_irq;
static int synth_base, synth_irq;
static int mpu_detected;

static 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 1;
}

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
};

static void sleep(unsigned howlong)
{
	current->state = TASK_INTERRUPTIBLE;
	schedule_timeout(howlong);
}

static void enable_xctrl(int baseio)
{
        unsigned char regd;
                
        /*
         * Some IBM Aptiva's have the Bose Sound System. By default
         * the Bose Amplifier is disabled. The amplifier will be 
         * activated, by setting the XCTRL0 and XCTRL1 bits.
         * Volume of the monitor bose speakers/woofer, can then
         * be set by changing the PCM volume.
         *
         */
                
        printk("cs4232: enabling Bose Sound System Amplifier.\n");
        
        /* Switch to Pin Control Address */                   
        regd = inb(baseio + INDEX_ADDRESS) & 0xe0;
        outb(((unsigned char) (PIN_CONTROL | regd)), baseio + INDEX_ADDRESS );
        
        /* Activate the XCTRL0 and XCTRL1 Pins */
        regd = inb(baseio + INDEX_DATA);
        outb(((unsigned char) (ENABLE_PINS | regd)), baseio + INDEX_DATA );
}

static int __init probe_cs4232(struct address_info *hw_config, int isapnp_configured)
{
	int i, n;
	int base = hw_config->io_base, irq = hw_config->irq;
	int dma1 = hw_config->dma, dma2 = hw_config->dma2;
	struct resource *ports;

	if (base == -1 || irq == -1 || dma1 == -1) {
		printk(KERN_ERR "cs4232: dma, irq and io must be set.\n");
		return 0;
	}

	/*
	 * Verify that the I/O port range is free.
	 */

	ports = request_region(base, 4, "ad1848");
	if (!ports) {
		printk(KERN_ERR "cs4232.c: I/O port 0x%03x not free\n", base);
		return 0;
	}
	if (ad1848_detect(ports, NULL, hw_config->osp)) {
		goto got_it;	/* The card is already active */
	}
	if (isapnp_configured) {
		printk(KERN_ERR "cs4232.c: ISA PnP configured, but not detected?\n");
		goto fail;
	}

	/*
	 * 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.
	 *
	 * Also the Cirrus/Crystal method doesn't always work. Try ISA PnP first ;)
	 */

	/*
	 * Repeat initialization few times since it doesn't always succeed in
	 * first time.
	 */

	for (n = 0; n < 4; n++)
	{	
		/*
		 *	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]);

		sleep(HZ / 10);

		/*
		 *	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 (!request_region(0x388, 4, "FM"))	/* Not free */
			CS_OUT3(0x48, 0x00, 0x00)	/* FM base off */
		else {
			release_region(0x388, 4);
			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 */

		sleep(HZ / 10);

		/*
		 * Initialize logical device 3 (MPU)
		 */

		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 */
		}

		if(synth_base != 0)
		{
		    CS_OUT2 (0x15, 0x04);	        /* logical device 4 (WaveFront) */
		    CS_OUT3 (0x47, (synth_base >> 8) & 0xff,
			     synth_base & 0xff);	/* base */
		    CS_OUT2 (0x22, synth_irq);     	/* IRQ */
		    CS_OUT2 (0x33, 0x01);	        /* Activate logical dev 4 */
		}

		/*
		 * Finally activate the chip
		 */
		
		CS_OUT(0x79);

		sleep(HZ / 5);

		/*
		 * Then try to detect the codec part of the chip
		 */

		if (ad1848_detect(ports, NULL, hw_config->osp))
			goto got_it;
		
		sleep(HZ);
	}
fail:
	release_region(base, 4);
	return 0;

got_it:
	if (dma2 == -1)
		dma2 = dma1;

	hw_config->slots[0] = ad1848_init("Crystal audio controller", ports,
					  irq,
					  dma1,		/* Playback DMA */
					  dma2,		/* Capture DMA */
					  0,
					  hw_config->osp,
					  THIS_MODULE);

	if (hw_config->slots[0] != -1 &&
		audio_devs[hw_config->slots[0]]->mixer_dev!=-1)
	{	
		/* 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 (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_uart401(&hw_config2, THIS_MODULE))
		{
			mpu_detected = 1;
		}
		else
		{
			mpu_base = mpu_irq = 0;
		}
		hw_config->slots[1] = hw_config2.slots[1];
	}
	
	if (bss)
        	enable_xctrl(base);

	return 1;
}

static void __devexit 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);

	sound_unload_audiodev(hw_config->slots[0]);
	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;
		hw_config2.slots[1] = hw_config->slots[1];

		unload_uart401(&hw_config2);
	}
}

static struct address_info cfg;
static struct address_info cfg_mpu;

static int __initdata io	= -1;
static int __initdata irq	= -1;
static int __initdata dma	= -1;
static int __initdata dma2	= -1;
static int __initdata mpuio	= -1;
static int __initdata mpuirq	= -1;
static int __initdata synthio	= -1;
static int __initdata synthirq	= -1;
static int __initdata isapnp	= 1;

static unsigned int cs4232_devices;

MODULE_DESCRIPTION("CS4232 based soundcard driver"); 
MODULE_AUTHOR("Hannu Savolainen, Paul Barton-Davis"); 
MODULE_LICENSE("GPL");

module_param(io, int, 0);
MODULE_PARM_DESC(io,"base I/O port for AD1848");
module_param(irq, int, 0);
MODULE_PARM_DESC(irq,"IRQ for AD1848 chip");
module_param(dma, int, 0);
MODULE_PARM_DESC(dma,"8 bit DMA for AD1848 chip");
module_param(dma2, int, 0);
MODULE_PARM_DESC(dma2,"16 bit DMA for AD1848 chip");
module_param(mpuio, int, 0);
MODULE_PARM_DESC(mpuio,"MPU 401 base address");
module_param(mpuirq, int, 0);
MODULE_PARM_DESC(mpuirq,"MPU 401 IRQ");
module_param(synthio, int, 0);
MODULE_PARM_DESC(synthio,"Maui WaveTable base I/O port");
module_param(synthirq, int, 0);
MODULE_PARM_DESC(synthirq,"Maui WaveTable IRQ");
module_param(isapnp, bool, 0);
MODULE_PARM_DESC(isapnp,"Enable ISAPnP probing (default 1)");
module_param(bss, bool, 0);
MODULE_PARM_DESC(bss,"Enable Bose Sound System Support (default 0)");

/*
 *	Install a CS4232 based card. Need to have ad1848 and mpu401
 *	loaded ready.
 */

/* All cs4232 based cards have the main ad1848 card either as CSC0000 or
 * CSC0100. */
static const struct pnp_device_id cs4232_pnp_table[] = {
	{ .id = "CSC0100", .driver_data = 0 },
	{ .id = "CSC0000", .driver_data = 0 },
	/* Guillemot Turtlebeach something appears to be cs4232 compatible
	 * (untested) */
	{ .id = "GIM0100", .driver_data = 0 },
	{ .id = ""}
};

MODULE_DEVICE_TABLE(pnp, cs4232_pnp_table);

static int __init cs4232_pnp_probe(struct pnp_dev *dev, const struct pnp_device_id *dev_id)
{
	struct address_info *isapnpcfg;

	isapnpcfg=(struct address_info*)kmalloc(sizeof(*isapnpcfg),GFP_KERNEL);
	if (!isapnpcfg)
		return -ENOMEM;

	isapnpcfg->irq		= pnp_irq(dev, 0);
	isapnpcfg->dma		= pnp_dma(dev, 0);
	isapnpcfg->dma2		= pnp_dma(dev, 1);
	isapnpcfg->io_base	= pnp_port_start(dev, 0);
	if (probe_cs4232(isapnpcfg,TRUE) == 0) {
		printk(KERN_ERR "cs4232: ISA PnP card found, but not detected?\n");
		kfree(isapnpcfg);
		return -ENODEV;
	}
	pnp_set_drvdata(dev,isapnpcfg);
	cs4232_devices++;
	return 0;
}

static void __devexit cs4232_pnp_remove(struct pnp_dev *dev)
{
	struct address_info *cfg = pnp_get_drvdata(dev);
	if (cfg) {
		unload_cs4232(cfg);
		kfree(cfg);
	}
}

static struct pnp_driver cs4232_driver = {
	.name		= "cs4232",
	.id_table	= cs4232_pnp_table,
	.probe		= cs4232_pnp_probe,
	.remove		= __devexit_p(cs4232_pnp_remove),
};

static int __init init_cs4232(void)
{
#ifdef CONFIG_SOUND_WAVEFRONT_MODULE
	if(synthio == -1)
		printk(KERN_INFO "cs4232: set synthio and synthirq to use the wavefront facilities.\n");
	else {
		synth_base = synthio;
		synth_irq =  synthirq;
	}
#else
	if(synthio != -1)
		printk(KERN_WARNING "cs4232: wavefront support not enabled in this driver.\n");
#endif
	cfg.irq = -1;

	if (isapnp) {
		pnp_register_driver(&cs4232_driver);
		if (cs4232_devices)
			return 0;
	}

	if(io==-1||irq==-1||dma==-1)
	{
		printk(KERN_ERR "cs4232: Must set io, irq and dma.\n");
		return -ENODEV;
	}

	cfg.io_base = io;
	cfg.irq = irq;
	cfg.dma = dma;
	cfg.dma2 = dma2;

	cfg_mpu.io_base = -1;
	cfg_mpu.irq = -1;

	if (mpuio != -1 && mpuirq != -1) {
		cfg_mpu.io_base = mpuio;
		cfg_mpu.irq = mpuirq;
		probe_cs4232_mpu(&cfg_mpu); /* Bug always returns 0 not OK -- AC */
	}

	if (probe_cs4232(&cfg,FALSE) == 0)
		return -ENODEV;

	return 0;
}

static void __exit cleanup_cs4232(void)
{
	pnp_unregister_driver(&cs4232_driver);
        if (cfg.irq != -1)
		unload_cs4232(&cfg); /* Unloads global MPU as well, if needed */
}

module_init(init_cs4232);
module_exit(cleanup_cs4232);

#ifndef MODULE
static int __init setup_cs4232(char *str)
{
	/* io, irq, dma, dma2 mpuio, mpuirq*/
	int ints[7];

	/* If we have isapnp cards, no need for options */
	pnp_register_driver(&cs4232_driver);
	if (cs4232_devices)
		return 1;
	
	str = get_options(str, ARRAY_SIZE(ints), ints);
	
	io	= ints[1];
	irq	= ints[2];
	dma	= ints[3];
	dma2	= ints[4];
	mpuio	= ints[5];
	mpuirq	= ints[6];

	return 1;
}

__setup("cs4232=", setup_cs4232);
#endif
Commit	Line	Data
1da177e4 LT	1	/*
	2	* Copyright (C) by Hannu Savolainen 1993-1997
	3	*
	4	* cs4232.c
	5	*
	6	* The low level driver for Crystal CS4232 based cards. The CS4232 is
	7	* a PnP compatible chip which contains a CS4231A codec, SB emulation,
	8	* a MPU401 compatible MIDI port, joystick and synthesizer and IDE CD-ROM
	9	* interfaces. This is just a temporary driver until full PnP support
	10	* gets implemented. Just the WSS codec, FM synth and the MIDI ports are
	11	* supported. Other interfaces are left uninitialized.
	12	*
	13	* ifdef ...WAVEFRONT...
	14	*
	15	* Support is provided for initializing the WaveFront synth
	16	* interface as well, which is logical device #4. Note that if
	17	* you have a Tropez+ card, you probably don't need to setup
	18	* the CS4232-supported MIDI interface, since it corresponds to
	19	* the internal 26-pin header that's hard to access. Using this
	20	* requires an additional IRQ, a resource none too plentiful in
	21	* this environment. Just don't set module parameters mpuio and
	22	* mpuirq, and the MIDI port will be left uninitialized. You can
	23	* still use the ICS2115 hosted MIDI interface which corresponds
	24	* to the 9-pin D connector on the back of the card.
	25	*
	26	* endif ...WAVEFRONT...
	27	*
	28	* Supported chips are:
	29	* CS4232
	30	* CS4236
	31	* CS4236B
	32	*
	33	* Note: You will need a PnP config setup to initialise some CS4232 boards
	34	* anyway.
	35	*
	36	* Changes
	37	* John Rood Added Bose Sound System Support.
	38	* Toshio Spoor
	39	* Alan Cox Modularisation, Basic cleanups.
	40	* Paul Barton-Davis Separated MPU configuration, added
	41	* Tropez+ (WaveFront) support
	42	* Christoph Hellwig Adapted to module_init/module_exit,
	43	* simple cleanups
	44	* Arnaldo C. de Melo got rid of attach_uart401
	45	* Bartlomiej Zolnierkiewicz
	46	* Added some __init/__initdata/__exit
	47	* Marcus Meissner Added ISA PnP support.
	48	*/
	49
1da177e4 LT	50	#include <linux/pnp.h>
	51	#include <linux/module.h>
	52	#include <linux/init.h>
	53
	54	#include "sound_config.h"
	55
	56	#include "ad1848.h"
	57	#include "mpu401.h"
	58
	59	#define KEY_PORT 0x279 /* Same as LPT1 status port */
	60	#define CSN_NUM 0x99 /* Just a random number */
	61	#define INDEX_ADDRESS 0x00 /* (R0) Index Address Register */
	62	#define INDEX_DATA 0x01 /* (R1) Indexed Data Register */
	63	#define PIN_CONTROL 0x0a /* (I10) Pin Control */
	64	#define ENABLE_PINS 0xc0 /* XCTRL0/XCTRL1 enable */
	65
	66	static void CS_OUT(unsigned char a)
	67	{
	68	outb(a, KEY_PORT);
	69	}
	70
	71	#define CS_OUT2(a, b) {CS_OUT(a);CS_OUT(b);}
	72	#define CS_OUT3(a, b, c) {CS_OUT(a);CS_OUT(b);CS_OUT(c);}
	73
	74	static int __initdata bss = 0;
	75	static int mpu_base, mpu_irq;
	76	static int synth_base, synth_irq;
	77	static int mpu_detected;
	78
	79	static int probe_cs4232_mpu(struct address_info *hw_config)
	80	{
	81	/*
	82	* Just write down the config values.
	83	*/
	84
	85	mpu_base = hw_config->io_base;
	86	mpu_irq = hw_config->irq;
	87
	88	return 1;
	89	}
	90
	91	static unsigned char crystal_key[] = /* A 32 byte magic key sequence */
	92	{
	93	0x96, 0x35, 0x9a, 0xcd, 0xe6, 0xf3, 0x79, 0xbc,
	94	0x5e, 0xaf, 0x57, 0x2b, 0x15, 0x8a, 0xc5, 0xe2,
	95	0xf1, 0xf8, 0x7c, 0x3e, 0x9f, 0x4f, 0x27, 0x13,
	96	0x09, 0x84, 0x42, 0xa1, 0xd0, 0x68, 0x34, 0x1a
	97	};
	98
	99	static void sleep(unsigned howlong)
	100	{
	101	current->state = TASK_INTERRUPTIBLE;
	102	schedule_timeout(howlong);
	103	}
	104
	105	static void enable_xctrl(int baseio)
	106	{
	107	unsigned char regd;
	108
	109	/*
	110	* Some IBM Aptiva's have the Bose Sound System. By default
	111	* the Bose Amplifier is disabled. The amplifier will be
	112	* activated, by setting the XCTRL0 and XCTRL1 bits.
	113	* Volume of the monitor bose speakers/woofer, can then
114	* be set by changing the PCM volume.
115	*
116	*/
117
118	printk("cs4232: enabling Bose Sound System Amplifier.\n");
119
120	/* Switch to Pin Control Address */
121	regd = inb(baseio + INDEX_ADDRESS) & 0xe0;
122	outb(((unsigned char) (PIN_CONTROL \| regd)), baseio + INDEX_ADDRESS );
123
124	/* Activate the XCTRL0 and XCTRL1 Pins */
125	regd = inb(baseio + INDEX_DATA);
126	outb(((unsigned char) (ENABLE_PINS \| regd)), baseio + INDEX_DATA );
127	}
128
129	static int __init probe_cs4232(struct address_info *hw_config, int isapnp_configured)
130	{
131	int i, n;
132	int base = hw_config->io_base, irq = hw_config->irq;
133	int dma1 = hw_config->dma, dma2 = hw_config->dma2;
134	struct resource *ports;
135
136	if (base == -1 \|\| irq == -1 \|\| dma1 == -1) {
137	printk(KERN_ERR "cs4232: dma, irq and io must be set.\n");
138	return 0;
139	}
140
141	/*
142	* Verify that the I/O port range is free.
143	*/
144
145	ports = request_region(base, 4, "ad1848");
146	if (!ports) {
147	printk(KERN_ERR "cs4232.c: I/O port 0x%03x not free\n", base);
148	return 0;
149	}
150	if (ad1848_detect(ports, NULL, hw_config->osp)) {
151	goto got_it; /* The card is already active */
152	}
153	if (isapnp_configured) {
154	printk(KERN_ERR "cs4232.c: ISA PnP configured, but not detected?\n");
155	goto fail;
156	}
157
158	/*
159	* This version of the driver doesn't use the PnP method when configuring
160	* the card but a simplified method defined by Crystal. This means that
161	* just one CS4232 compatible device can exist on the system. Also this
162	* method conflicts with possible PnP support in the OS. For this reason
163	* driver is just a temporary kludge.
164	*
165	* Also the Cirrus/Crystal method doesn't always work. Try ISA PnP first ;)
166	*/
167
168	/*
169	* Repeat initialization few times since it doesn't always succeed in
170	* first time.
171	*/
172
173	for (n = 0; n < 4; n++)
174	{
175	/*
176	* Wake up the card by sending a 32 byte Crystal key to the key port.
177	*/
178
179	for (i = 0; i < 32; i++)
180	CS_OUT(crystal_key[i]);
181
182	sleep(HZ / 10);
183
184	/*
185	* Now set the CSN (Card Select Number).
186	*/
187
188	CS_OUT2(0x06, CSN_NUM);
189
190	/*
191	* Then set some config bytes. First logical device 0
192	*/
193
194	CS_OUT2(0x15, 0x00); /* Select logical device 0 (WSS/SB/FM) */
195	CS_OUT3(0x47, (base >> 8) & 0xff, base & 0xff); /* WSS base */
196
d61780c0	197	if (!request_region(0x388, 4, "FM")) /* Not free */
1da177e4	198	CS_OUT3(0x48, 0x00, 0x00) /* FM base off */
d61780c0 JG	199	else {
d61780c0 JG	200	release_region(0x388, 4);
1da177e4	201	CS_OUT3(0x48, 0x03, 0x88); /* FM base 0x388 */
d61780c0	202	}
1da177e4 LT	203
	204	CS_OUT3(0x42, 0x00, 0x00); /* SB base off */
	205	CS_OUT2(0x22, irq); /* SB+WSS IRQ */
	206	CS_OUT2(0x2a, dma1); /* SB+WSS DMA */
	207
	208	if (dma2 != -1)
	209	CS_OUT2(0x25, dma2) /* WSS DMA2 */
	210	else
	211	CS_OUT2(0x25, 4); /* No WSS DMA2 */
	212
	213	CS_OUT2(0x33, 0x01); /* Activate logical dev 0 */
	214
	215	sleep(HZ / 10);
	216
	217	/*
	218	* Initialize logical device 3 (MPU)
	219	*/
	220
	221	if (mpu_base != 0 && mpu_irq != 0)
	222	{
	223	CS_OUT2(0x15, 0x03); /* Select logical device 3 (MPU) */
	224	CS_OUT3(0x47, (mpu_base >> 8) & 0xff, mpu_base & 0xff); /* MPU base */
	225	CS_OUT2(0x22, mpu_irq); /* MPU IRQ */
	226	CS_OUT2(0x33, 0x01); /* Activate logical dev 3 */
	227	}
	228
	229	if(synth_base != 0)
	230	{
	231	CS_OUT2 (0x15, 0x04); /* logical device 4 (WaveFront) */
	232	CS_OUT3 (0x47, (synth_base >> 8) & 0xff,
	233	synth_base & 0xff); /* base */
	234	CS_OUT2 (0x22, synth_irq); /* IRQ */
	235	CS_OUT2 (0x33, 0x01); /* Activate logical dev 4 */
	236	}
	237
	238	/*
	239	* Finally activate the chip
	240	*/
	241
	242	CS_OUT(0x79);
	243
	244	sleep(HZ / 5);
	245
	246	/*
	247	* Then try to detect the codec part of the chip
	248	*/
	249
	250	if (ad1848_detect(ports, NULL, hw_config->osp))
	251	goto got_it;
	252
	253	sleep(HZ);
	254	}
	255	fail:
	256	release_region(base, 4);
	257	return 0;
	258
	259	got_it:
	260	if (dma2 == -1)
	261	dma2 = dma1;
	262
	263	hw_config->slots[0] = ad1848_init("Crystal audio controller", ports,
	264	irq,
	265	dma1, /* Playback DMA */
	266	dma2, /* Capture DMA */
267	0,
268	hw_config->osp,
269	THIS_MODULE);
270
271	if (hw_config->slots[0] != -1 &&
272	audio_devs[hw_config->slots[0]]->mixer_dev!=-1)
273	{
274	/* Assume the mixer map is as suggested in the CS4232 databook */
275	AD1848_REROUTE(SOUND_MIXER_LINE1, SOUND_MIXER_LINE);
276	AD1848_REROUTE(SOUND_MIXER_LINE2, SOUND_MIXER_CD);
277	AD1848_REROUTE(SOUND_MIXER_LINE3, SOUND_MIXER_SYNTH); /* FM synth */
278	}
279	if (mpu_base != 0 && mpu_irq != 0)
280	{
281	static struct address_info hw_config2 = {
282	0
283	}; /* Ensure it's initialized */
284
285	hw_config2.io_base = mpu_base;
286	hw_config2.irq = mpu_irq;
287	hw_config2.dma = -1;
288	hw_config2.dma2 = -1;
289	hw_config2.always_detect = 0;
290	hw_config2.name = NULL;
291	hw_config2.driver_use_1 = 0;
292	hw_config2.driver_use_2 = 0;
293	hw_config2.card_subtype = 0;
294
295	if (probe_uart401(&hw_config2, THIS_MODULE))
296	{
297	mpu_detected = 1;
298	}
299	else
300	{
301	mpu_base = mpu_irq = 0;
302	}
303	hw_config->slots[1] = hw_config2.slots[1];
304	}
305
306	if (bss)
307	enable_xctrl(base);
308
309	return 1;
310	}
311
312	static void __devexit unload_cs4232(struct address_info *hw_config)
313	{
314	int base = hw_config->io_base, irq = hw_config->irq;
315	int dma1 = hw_config->dma, dma2 = hw_config->dma2;
316
317	if (dma2 == -1)
318	dma2 = dma1;
319
320	ad1848_unload(base,
321	irq,
322	dma1, /* Playback DMA */
323	dma2, /* Capture DMA */
324	0);
325
326	sound_unload_audiodev(hw_config->slots[0]);
327	if (mpu_base != 0 && mpu_irq != 0 && mpu_detected)
328	{
329	static struct address_info hw_config2 =
330	{
331	0
332	}; /* Ensure it's initialized */
333
334	hw_config2.io_base = mpu_base;
335	hw_config2.irq = mpu_irq;
336	hw_config2.dma = -1;
337	hw_config2.dma2 = -1;
338	hw_config2.always_detect = 0;
339	hw_config2.name = NULL;
340	hw_config2.driver_use_1 = 0;
341	hw_config2.driver_use_2 = 0;
342	hw_config2.card_subtype = 0;
343	hw_config2.slots[1] = hw_config->slots[1];
344
345	unload_uart401(&hw_config2);
346	}
347	}
348
349	static struct address_info cfg;
350	static struct address_info cfg_mpu;
351
352	static int __initdata io = -1;
353	static int __initdata irq = -1;
354	static int __initdata dma = -1;
355	static int __initdata dma2 = -1;
356	static int __initdata mpuio = -1;
357	static int __initdata mpuirq = -1;
358	static int __initdata synthio = -1;
359	static int __initdata synthirq = -1;
360	static int __initdata isapnp = 1;
361
070c6999 BH	362	static unsigned int cs4232_devices;
070c6999 BH	363
1da177e4 LT	364	MODULE_DESCRIPTION("CS4232 based soundcard driver");
	365	MODULE_AUTHOR("Hannu Savolainen, Paul Barton-Davis");
	366	MODULE_LICENSE("GPL");
	367
	368	module_param(io, int, 0);
	369	MODULE_PARM_DESC(io,"base I/O port for AD1848");
	370	module_param(irq, int, 0);
	371	MODULE_PARM_DESC(irq,"IRQ for AD1848 chip");
	372	module_param(dma, int, 0);
	373	MODULE_PARM_DESC(dma,"8 bit DMA for AD1848 chip");
	374	module_param(dma2, int, 0);
	375	MODULE_PARM_DESC(dma2,"16 bit DMA for AD1848 chip");
	376	module_param(mpuio, int, 0);
	377	MODULE_PARM_DESC(mpuio,"MPU 401 base address");
	378	module_param(mpuirq, int, 0);
	379	MODULE_PARM_DESC(mpuirq,"MPU 401 IRQ");
	380	module_param(synthio, int, 0);
	381	MODULE_PARM_DESC(synthio,"Maui WaveTable base I/O port");
	382	module_param(synthirq, int, 0);
	383	MODULE_PARM_DESC(synthirq,"Maui WaveTable IRQ");
	384	module_param(isapnp, bool, 0);
	385	MODULE_PARM_DESC(isapnp,"Enable ISAPnP probing (default 1)");
	386	module_param(bss, bool, 0);
	387	MODULE_PARM_DESC(bss,"Enable Bose Sound System Support (default 0)");
	388
	389	/*
	390	* Install a CS4232 based card. Need to have ad1848 and mpu401
	391	* loaded ready.
	392	*/
	393
	394	/* All cs4232 based cards have the main ad1848 card either as CSC0000 or
	395	* CSC0100. */
	396	static const struct pnp_device_id cs4232_pnp_table[] = {
	397	{ .id = "CSC0100", .driver_data = 0 },
	398	{ .id = "CSC0000", .driver_data = 0 },
	399	/* Guillemot Turtlebeach something appears to be cs4232 compatible
	400	* (untested) */
	401	{ .id = "GIM0100", .driver_data = 0 },
	402	{ .id = ""}
	403	};
	404
	405	MODULE_DEVICE_TABLE(pnp, cs4232_pnp_table);
	406
e85f8dcc	407	static int __init cs4232_pnp_probe(struct pnp_dev dev, const struct pnp_device_id dev_id)
1da177e4 LT	408	{
	409	struct address_info *isapnpcfg;
	410
	411	isapnpcfg=(struct address_info)kmalloc(sizeof(isapnpcfg),GFP_KERNEL);
	412	if (!isapnpcfg)
	413	return -ENOMEM;
	414
	415	isapnpcfg->irq = pnp_irq(dev, 0);
	416	isapnpcfg->dma = pnp_dma(dev, 0);
	417	isapnpcfg->dma2 = pnp_dma(dev, 1);
	418	isapnpcfg->io_base = pnp_port_start(dev, 0);
	419	if (probe_cs4232(isapnpcfg,TRUE) == 0) {
	420	printk(KERN_ERR "cs4232: ISA PnP card found, but not detected?\n");
	421	kfree(isapnpcfg);
	422	return -ENODEV;
	423	}
	424	pnp_set_drvdata(dev,isapnpcfg);
070c6999	425	cs4232_devices++;
1da177e4 LT	426	return 0;
	427	}
	428
	429	static void __devexit cs4232_pnp_remove(struct pnp_dev *dev)
	430	{
	431	struct address_info *cfg = pnp_get_drvdata(dev);
	432	if (cfg) {
	433	unload_cs4232(cfg);
	434	kfree(cfg);
	435	}
	436	}
	437
	438	static struct pnp_driver cs4232_driver = {
	439	.name = "cs4232",
	440	.id_table = cs4232_pnp_table,
	441	.probe = cs4232_pnp_probe,
	442	.remove = __devexit_p(cs4232_pnp_remove),
	443	};
	444
	445	static int __init init_cs4232(void)
	446	{
	447	#ifdef CONFIG_SOUND_WAVEFRONT_MODULE
	448	if(synthio == -1)
	449	printk(KERN_INFO "cs4232: set synthio and synthirq to use the wavefront facilities.\n");
	450	else {
	451	synth_base = synthio;
	452	synth_irq = synthirq;
	453	}
	454	#else
	455	if(synthio != -1)
	456	printk(KERN_WARNING "cs4232: wavefront support not enabled in this driver.\n");
	457	#endif
	458	cfg.irq = -1;
	459
070c6999 BH	460	if (isapnp) {
	461	pnp_register_driver(&cs4232_driver);
	462	if (cs4232_devices)
	463	return 0;
	464	}
1da177e4 LT	465
	466	if(io==-1\|\|irq==-1\|\|dma==-1)
	467	{
	468	printk(KERN_ERR "cs4232: Must set io, irq and dma.\n");
	469	return -ENODEV;
	470	}
	471
	472	cfg.io_base = io;
	473	cfg.irq = irq;
	474	cfg.dma = dma;
	475	cfg.dma2 = dma2;
	476
	477	cfg_mpu.io_base = -1;
	478	cfg_mpu.irq = -1;
	479
	480	if (mpuio != -1 && mpuirq != -1) {
	481	cfg_mpu.io_base = mpuio;
	482	cfg_mpu.irq = mpuirq;
	483	probe_cs4232_mpu(&cfg_mpu); /* Bug always returns 0 not OK -- AC */
	484	}
	485
	486	if (probe_cs4232(&cfg,FALSE) == 0)
	487	return -ENODEV;
	488
	489	return 0;
	490	}
	491
	492	static void __exit cleanup_cs4232(void)
	493	{
	494	pnp_unregister_driver(&cs4232_driver);
	495	if (cfg.irq != -1)
	496	unload_cs4232(&cfg); /* Unloads global MPU as well, if needed */
	497	}
	498
	499	module_init(init_cs4232);
	500	module_exit(cleanup_cs4232);
	501
	502	#ifndef MODULE
	503	static int __init setup_cs4232(char *str)
	504	{
	505	/* io, irq, dma, dma2 mpuio, mpuirq*/
	506	int ints[7];
	507
	508	/* If we have isapnp cards, no need for options */
070c6999 BH	509	pnp_register_driver(&cs4232_driver);
070c6999 BH	510	if (cs4232_devices)
1da177e4 LT	511	return 1;
	512
	513	str = get_options(str, ARRAY_SIZE(ints), ints);
	514
	515	io = ints[1];
	516	irq = ints[2];
	517	dma = ints[3];
	518	dma2 = ints[4];
	519	mpuio = ints[5];
	520	mpuirq = ints[6];
	521
	522	return 1;
	523	}
	524
	525	__setup("cs4232=", setup_cs4232);
	526	#endif