/*
   *  Driver for Gallant SC-6000 soundcard. This card is also known as
   *  Audio Excel DSP 16 or Zoltrix AV302.
   *  These cards use CompuMedia ASC-9308 chip + AD1848 codec.

   *  SC-6600 and SC-7000 cards are also supported. They are based on
   *  CompuMedia ASC-9408 chip and CS4231 codec.

   *
   *  Copyright (C) 2007 Krzysztof Helt <krzysztof.h1@wp.pl>
   *
   *  I don't have documentation for this card. I used the driver
   *  for OSS/Free included in the kernel source as reference.
   *
   *  This program is free software; you can redistribute it and/or modify
   *  it under the terms of the GNU General Public License as published by
   *  the Free Software Foundation; either version 2 of the License, or
   *  (at your option) any later version.
   *
   *  This program is distributed in the hope that it will be useful,
   *  but WITHOUT ANY WARRANTY; without even the implied warranty of
   *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   *  GNU General Public License for more details.
   *
   *  You should have received a copy of the GNU General Public License
   *  along with this program; if not, write to the Free Software
   *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
   */

  #include <linux/module.h>

  #include <linux/delay.h>

  #include <linux/isa.h>
  #include <linux/io.h>
  #include <asm/dma.h>
  #include <sound/core.h>

  #include <sound/wss.h>

  #include <sound/opl3.h>
  #include <sound/mpu401.h>
  #include <sound/control.h>
  #define SNDRV_LEGACY_FIND_FREE_IRQ
  #define SNDRV_LEGACY_FIND_FREE_DMA
  #include <sound/initval.h>
  
  MODULE_AUTHOR("Krzysztof Helt");
  MODULE_DESCRIPTION("Gallant SC-6000");
  MODULE_LICENSE("GPL");
  MODULE_SUPPORTED_DEVICE("{{Gallant, SC-6000},"
  			"{AudioExcel, Audio Excel DSP 16},"
  			"{Zoltrix, AV302}}");
  
  static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;	/* Index 0-MAX */
  static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;	/* ID for this card */

  static bool enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE;	/* Enable this card */

  static long port[SNDRV_CARDS] = SNDRV_DEFAULT_PORT;	/* 0x220, 0x240 */
  static int irq[SNDRV_CARDS] = SNDRV_DEFAULT_IRQ;	/* 5, 7, 9, 10, 11 */
  static long mss_port[SNDRV_CARDS] = SNDRV_DEFAULT_PORT;	/* 0x530, 0xe80 */
  static long mpu_port[SNDRV_CARDS] = SNDRV_DEFAULT_PORT;
  						/* 0x300, 0x310, 0x320, 0x330 */
  static int mpu_irq[SNDRV_CARDS] = SNDRV_DEFAULT_IRQ;	/* 5, 7, 9, 10, 0 */
  static int dma[SNDRV_CARDS] = SNDRV_DEFAULT_DMA;	/* 0, 1, 3 */

  static bool joystick[SNDRV_CARDS] = { [0 ... (SNDRV_CARDS-1)] = false };

  
  module_param_array(index, int, NULL, 0444);
  MODULE_PARM_DESC(index, "Index value for sc-6000 based soundcard.");
  module_param_array(id, charp, NULL, 0444);
  MODULE_PARM_DESC(id, "ID string for sc-6000 based soundcard.");
  module_param_array(enable, bool, NULL, 0444);
  MODULE_PARM_DESC(enable, "Enable sc-6000 based soundcard.");
  module_param_array(port, long, NULL, 0444);
  MODULE_PARM_DESC(port, "Port # for sc-6000 driver.");
  module_param_array(mss_port, long, NULL, 0444);
  MODULE_PARM_DESC(mss_port, "MSS Port # for sc-6000 driver.");
  module_param_array(mpu_port, long, NULL, 0444);
  MODULE_PARM_DESC(mpu_port, "MPU-401 port # for sc-6000 driver.");
  module_param_array(irq, int, NULL, 0444);
  MODULE_PARM_DESC(irq, "IRQ # for sc-6000 driver.");
  module_param_array(mpu_irq, int, NULL, 0444);
  MODULE_PARM_DESC(mpu_irq, "MPU-401 IRQ # for sc-6000 driver.");
  module_param_array(dma, int, NULL, 0444);
  MODULE_PARM_DESC(dma, "DMA # for sc-6000 driver.");

  module_param_array(joystick, bool, NULL, 0444);
  MODULE_PARM_DESC(joystick, "Enable gameport.");

  
  /*
   * Commands of SC6000's DSP (SBPRO+special).
   * Some of them are COMMAND_xx, in the future they may change.
   */
  #define WRITE_MDIRQ_CFG	0x50	/* Set M&I&DRQ mask (the real config)	*/
  #define COMMAND_52	0x52	/*					*/
  #define READ_HARD_CFG	0x58	/* Read Hardware Config (I/O base etc)	*/
  #define COMMAND_5C	0x5c	/*					*/
  #define COMMAND_60	0x60	/*					*/
  #define COMMAND_66	0x66	/*					*/
  #define COMMAND_6C	0x6c	/*					*/
  #define COMMAND_6E	0x6e	/*					*/
  #define COMMAND_88	0x88	/* Unknown command 			*/
  #define DSP_INIT_MSS	0x8c	/* Enable Microsoft Sound System mode	*/
  #define COMMAND_C5	0xc5	/*					*/
  #define GET_DSP_VERSION	0xe1	/* Get DSP Version			*/
  #define GET_DSP_COPYRIGHT 0xe3	/* Get DSP Copyright			*/
  
  /*
   * Offsets of SC6000 DSP I/O ports. The offset is added to base I/O port
   * to have the actual I/O port.
   * Register permissions are:
   * (wo) == Write Only
   * (ro) == Read  Only
   * (w-) == Write
   * (r-) == Read
   */
  #define DSP_RESET	0x06	/* offset of DSP RESET		(wo) */
  #define DSP_READ	0x0a	/* offset of DSP READ		(ro) */
  #define DSP_WRITE	0x0c	/* offset of DSP WRITE		(w-) */
  #define DSP_COMMAND	0x0c	/* offset of DSP COMMAND	(w-) */
  #define DSP_STATUS	0x0c	/* offset of DSP STATUS		(r-) */
  #define DSP_DATAVAIL	0x0e	/* offset of DSP DATA AVAILABLE	(ro) */
  
  #define PFX "sc6000: "
  #define DRV_NAME "SC-6000"
  
  /* hardware dependent functions */
  
  /*
   * sc6000_irq_to_softcfg - Decode irq number into cfg code.
   */
  static __devinit unsigned char sc6000_irq_to_softcfg(int irq)
  {
  	unsigned char val = 0;
  
  	switch (irq) {
  	case 5:
  		val = 0x28;
  		break;
  	case 7:
  		val = 0x8;
  		break;
  	case 9:
  		val = 0x10;
  		break;
  	case 10:
  		val = 0x18;
  		break;
  	case 11:
  		val = 0x20;
  		break;
  	default:
  		break;
  	}
  	return val;
  }
  
  /*
   * sc6000_dma_to_softcfg - Decode dma number into cfg code.
   */
  static __devinit unsigned char sc6000_dma_to_softcfg(int dma)
  {
  	unsigned char val = 0;
  
  	switch (dma) {
  	case 0:
  		val = 1;
  		break;
  	case 1:
  		val = 2;
  		break;
  	case 3:
  		val = 3;
  		break;
  	default:
  		break;
  	}
  	return val;
  }
  
  /*
   * sc6000_mpu_irq_to_softcfg - Decode MPU-401 irq number into cfg code.
   */
  static __devinit unsigned char sc6000_mpu_irq_to_softcfg(int mpu_irq)
  {
  	unsigned char val = 0;
  
  	switch (mpu_irq) {
  	case 5:
  		val = 4;
  		break;
  	case 7:
  		val = 0x44;
  		break;
  	case 9:
  		val = 0x84;
  		break;
  	case 10:
  		val = 0xc4;
  		break;
  	default:
  		break;
  	}
  	return val;
  }

  static int sc6000_wait_data(char __iomem *vport)

  {
  	int loop = 1000;
  	unsigned char val = 0;
  
  	do {
  		val = ioread8(vport + DSP_DATAVAIL);
  		if (val & 0x80)
  			return 0;
  		cpu_relax();
  	} while (loop--);
  
  	return -EAGAIN;
  }

  static int sc6000_read(char __iomem *vport)

  {
  	if (sc6000_wait_data(vport))
  		return -EBUSY;
  
  	return ioread8(vport + DSP_READ);
  
  }

  static int sc6000_write(char __iomem *vport, int cmd)

  {
  	unsigned char val;
  	int loop = 500000;
  
  	do {
  		val = ioread8(vport + DSP_STATUS);
  		/*
  		 * DSP ready to receive data if bit 7 of val == 0
  		 */
  		if (!(val & 0x80)) {
  			iowrite8(cmd, vport + DSP_COMMAND);
  			return 0;
  		}
  		cpu_relax();
  	} while (loop--);
  
  	snd_printk(KERN_ERR "DSP Command (0x%x) timeout.
  ", cmd);
  
  	return -EIO;
  }
  
  static int __devinit sc6000_dsp_get_answer(char __iomem *vport, int command,
  					   char *data, int data_len)
  {
  	int len = 0;
  
  	if (sc6000_write(vport, command)) {
  		snd_printk(KERN_ERR "CMD 0x%x: failed!
  ", command);
  		return -EIO;
  	}
  
  	do {
  		int val = sc6000_read(vport);
  
  		if (val < 0)
  			break;
  
  		data[len++] = val;
  
  	} while (len < data_len);
  
  	/*
  	 * If no more data available, return to the caller, no error if len>0.
  	 * We have no other way to know when the string is finished.
  	 */
  	return len ? len : -EIO;
  }
  
  static int __devinit sc6000_dsp_reset(char __iomem *vport)
  {
  	iowrite8(1, vport + DSP_RESET);
  	udelay(10);
  	iowrite8(0, vport + DSP_RESET);
  	udelay(20);
  	if (sc6000_read(vport) == 0xaa)
  		return 0;
  	return -ENODEV;
  }
  
  /* detection and initialization */

  static int __devinit sc6000_hw_cfg_write(char __iomem *vport, const int *cfg)
  {
  	if (sc6000_write(vport, COMMAND_6C) < 0) {
  		snd_printk(KERN_WARNING "CMD 0x%x: failed!
  ", COMMAND_6C);
  		return -EIO;
  	}
  	if (sc6000_write(vport, COMMAND_5C) < 0) {
  		snd_printk(KERN_ERR "CMD 0x%x: failed!
  ", COMMAND_5C);
  		return -EIO;
  	}
  	if (sc6000_write(vport, cfg[0]) < 0) {
  		snd_printk(KERN_ERR "DATA 0x%x: failed!
  ", cfg[0]);
  		return -EIO;
  	}
  	if (sc6000_write(vport, cfg[1]) < 0) {
  		snd_printk(KERN_ERR "DATA 0x%x: failed!
  ", cfg[1]);
  		return -EIO;
  	}
  	if (sc6000_write(vport, COMMAND_C5) < 0) {
  		snd_printk(KERN_ERR "CMD 0x%x: failed!
  ", COMMAND_C5);
  		return -EIO;
  	}
  
  	return 0;
  }
  
  static int sc6000_cfg_write(char __iomem *vport, unsigned char softcfg)

  {
  
  	if (sc6000_write(vport, WRITE_MDIRQ_CFG)) {
  		snd_printk(KERN_ERR "CMD 0x%x: failed!
  ", WRITE_MDIRQ_CFG);
  		return -EIO;
  	}
  	if (sc6000_write(vport, softcfg)) {
  		snd_printk(KERN_ERR "sc6000_cfg_write: failed!
  ");
  		return -EIO;
  	}
  	return 0;
  }

  static int sc6000_setup_board(char __iomem *vport, int config)

  {
  	int loop = 10;
  
  	do {
  		if (sc6000_write(vport, COMMAND_88)) {
  			snd_printk(KERN_ERR "CMD 0x%x: failed!
  ",
  				   COMMAND_88);
  			return -EIO;
  		}
  	} while ((sc6000_wait_data(vport) < 0) && loop--);
  
  	if (sc6000_read(vport) < 0) {
  		snd_printk(KERN_ERR "sc6000_read after CMD 0x%x: failed
  ",
  			   COMMAND_88);
  		return -EIO;
  	}
  
  	if (sc6000_cfg_write(vport, config))
  		return -ENODEV;
  
  	return 0;
  }
  
  static int __devinit sc6000_init_mss(char __iomem *vport, int config,
  				     char __iomem *vmss_port, int mss_config)
  {
  	if (sc6000_write(vport, DSP_INIT_MSS)) {
  		snd_printk(KERN_ERR "sc6000_init_mss [0x%x]: failed!
  ",
  			   DSP_INIT_MSS);
  		return -EIO;
  	}
  
  	msleep(10);
  
  	if (sc6000_cfg_write(vport, config))
  		return -EIO;
  
  	iowrite8(mss_config, vmss_port);
  
  	return 0;
  }

  static void __devinit sc6000_hw_cfg_encode(char __iomem *vport, int *cfg,
  					   long xport, long xmpu,

  					   long xmss_port, int joystick)

  {
  	cfg[0] = 0;
  	cfg[1] = 0;
  	if (xport == 0x240)
  		cfg[0] |= 1;
  	if (xmpu != SNDRV_AUTO_PORT) {
  		cfg[0] |= (xmpu & 0x30) >> 2;
  		cfg[1] |= 0x20;
  	}
  	if (xmss_port == 0xe80)
  		cfg[0] |= 0x10;
  	cfg[0] |= 0x40;		/* always set */

  	if (!joystick)
  		cfg[0] |= 0x02;

  	cfg[1] |= 0x80;		/* enable WSS system */
  	cfg[1] &= ~0x40;	/* disable IDE */
  	snd_printd("hw cfg %x, %x
  ", cfg[0], cfg[1]);
  }
  
  static int __devinit sc6000_init_board(char __iomem *vport,
  					char __iomem *vmss_port, int dev)

  {
  	char answer[15];
  	char version[2];

  	int mss_config = sc6000_irq_to_softcfg(irq[dev]) |
  			 sc6000_dma_to_softcfg(dma[dev]);

  	int config = mss_config |

  		     sc6000_mpu_irq_to_softcfg(mpu_irq[dev]);

  	int err;

  	int old = 0;

  
  	err = sc6000_dsp_reset(vport);
  	if (err < 0) {
  		snd_printk(KERN_ERR "sc6000_dsp_reset: failed!
  ");
  		return err;
  	}

  	memset(answer, 0, sizeof(answer));

  	err = sc6000_dsp_get_answer(vport, GET_DSP_COPYRIGHT, answer, 15);
  	if (err <= 0) {
  		snd_printk(KERN_ERR "sc6000_dsp_copyright: failed!
  ");
  		return -ENODEV;
  	}
  	/*
  	 * My SC-6000 card return "SC-6000" in DSPCopyright, so
  	 * if we have something different, we have to be warned.

  	 */
  	if (strncmp("SC-6000", answer, 7))
  		snd_printk(KERN_WARNING "Warning: non SC-6000 audio card!
  ");
  
  	if (sc6000_dsp_get_answer(vport, GET_DSP_VERSION, version, 2) < 2) {
  		snd_printk(KERN_ERR "sc6000_dsp_version: failed!
  ");
  		return -ENODEV;
  	}
  	printk(KERN_INFO PFX "Detected model: %s, DSP version %d.%d
  ",
  		answer, version[0], version[1]);

  	/* set configuration */

  	sc6000_write(vport, COMMAND_5C);
  	if (sc6000_read(vport) < 0)
  		old = 1;
  
  	if (!old) {
  		int cfg[2];
  		sc6000_hw_cfg_encode(vport, &cfg[0], port[dev], mpu_port[dev],

  				     mss_port[dev], joystick[dev]);

  		if (sc6000_hw_cfg_write(vport, cfg) < 0) {
  			snd_printk(KERN_ERR "sc6000_hw_cfg_write: failed!
  ");
  			return -EIO;
  		}

  	}
  	err = sc6000_setup_board(vport, config);

  	if (err < 0) {

  		snd_printk(KERN_ERR "sc6000_setup_board: failed!
  ");
  		return -ENODEV;
  	}
  
  	sc6000_dsp_reset(vport);

  
  	if (!old) {
  		sc6000_write(vport, COMMAND_60);
  		sc6000_write(vport, 0x02);
  		sc6000_dsp_reset(vport);

  	}
  
  	err = sc6000_setup_board(vport, config);
  	if (err < 0) {
  		snd_printk(KERN_ERR "sc6000_setup_board: failed!
  ");
  		return -ENODEV;
  	}

  	err = sc6000_init_mss(vport, config, vmss_port, mss_config);
  	if (err < 0) {

  		snd_printk(KERN_ERR "Cannot initialize "

  			   "Microsoft Sound System mode.
  ");
  		return -ENODEV;
  	}
  
  	return 0;
  }

  static int __devinit snd_sc6000_mixer(struct snd_wss *chip)

  {
  	struct snd_card *card = chip->card;
  	struct snd_ctl_elem_id id1, id2;
  	int err;
  
  	memset(&id1, 0, sizeof(id1));
  	memset(&id2, 0, sizeof(id2));
  	id1.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
  	id2.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
  	/* reassign AUX0 to FM */
  	strcpy(id1.name, "Aux Playback Switch");
  	strcpy(id2.name, "FM Playback Switch");
  	err = snd_ctl_rename_id(card, &id1, &id2);
  	if (err < 0)
  		return err;
  	strcpy(id1.name, "Aux Playback Volume");
  	strcpy(id2.name, "FM Playback Volume");
  	err = snd_ctl_rename_id(card, &id1, &id2);
  	if (err < 0)
  		return err;
  	/* reassign AUX1 to CD */
  	strcpy(id1.name, "Aux Playback Switch"); id1.index = 1;
  	strcpy(id2.name, "CD Playback Switch");
  	err = snd_ctl_rename_id(card, &id1, &id2);
  	if (err < 0)
  		return err;
  	strcpy(id1.name, "Aux Playback Volume");
  	strcpy(id2.name, "CD Playback Volume");
  	err = snd_ctl_rename_id(card, &id1, &id2);
  	if (err < 0)
  		return err;
  	return 0;
  }
  
  static int __devinit snd_sc6000_match(struct device *devptr, unsigned int dev)
  {
  	if (!enable[dev])
  		return 0;
  	if (port[dev] == SNDRV_AUTO_PORT) {
  		printk(KERN_ERR PFX "specify IO port
  ");
  		return 0;
  	}
  	if (mss_port[dev] == SNDRV_AUTO_PORT) {
  		printk(KERN_ERR PFX "specify MSS port
  ");
  		return 0;
  	}
  	if (port[dev] != 0x220 && port[dev] != 0x240) {
  		printk(KERN_ERR PFX "Port must be 0x220 or 0x240
  ");
  		return 0;
  	}
  	if (mss_port[dev] != 0x530 && mss_port[dev] != 0xe80) {
  		printk(KERN_ERR PFX "MSS port must be 0x530 or 0xe80
  ");
  		return 0;
  	}
  	if (irq[dev] != SNDRV_AUTO_IRQ && !sc6000_irq_to_softcfg(irq[dev])) {
  		printk(KERN_ERR PFX "invalid IRQ %d
  ", irq[dev]);
  		return 0;
  	}
  	if (dma[dev] != SNDRV_AUTO_DMA && !sc6000_dma_to_softcfg(dma[dev])) {
  		printk(KERN_ERR PFX "invalid DMA %d
  ", dma[dev]);
  		return 0;
  	}
  	if (mpu_port[dev] != SNDRV_AUTO_PORT &&
  	    (mpu_port[dev] & ~0x30L) != 0x300) {
  		printk(KERN_ERR PFX "invalid MPU-401 port %lx
  ",
  			mpu_port[dev]);
  		return 0;
  	}
  	if (mpu_port[dev] != SNDRV_AUTO_PORT &&
  	    mpu_irq[dev] != SNDRV_AUTO_IRQ && mpu_irq[dev] != 0 &&
  	    !sc6000_mpu_irq_to_softcfg(mpu_irq[dev])) {
  		printk(KERN_ERR PFX "invalid MPU-401 IRQ %d
  ", mpu_irq[dev]);
  		return 0;
  	}
  	return 1;
  }
  
  static int __devinit snd_sc6000_probe(struct device *devptr, unsigned int dev)
  {
  	static int possible_irqs[] = { 5, 7, 9, 10, 11, -1 };
  	static int possible_dmas[] = { 1, 3, 0, -1 };
  	int err;
  	int xirq = irq[dev];
  	int xdma = dma[dev];
  	struct snd_card *card;

  	struct snd_wss *chip;

  	struct snd_opl3 *opl3;

  	char __iomem **vport;

  	char __iomem *vmss_port;

  	err = snd_card_create(index[dev], id[dev], THIS_MODULE, sizeof(vport),
  				&card);

  	if (err < 0)
  		return err;

  	vport = card->private_data;

  	if (xirq == SNDRV_AUTO_IRQ) {
  		xirq = snd_legacy_find_free_irq(possible_irqs);
  		if (xirq < 0) {
  			snd_printk(KERN_ERR PFX "unable to find a free IRQ
  ");
  			err = -EBUSY;
  			goto err_exit;
  		}
  	}
  
  	if (xdma == SNDRV_AUTO_DMA) {
  		xdma = snd_legacy_find_free_dma(possible_dmas);
  		if (xdma < 0) {
  			snd_printk(KERN_ERR PFX "unable to find a free DMA
  ");
  			err = -EBUSY;
  			goto err_exit;
  		}
  	}
  
  	if (!request_region(port[dev], 0x10, DRV_NAME)) {
  		snd_printk(KERN_ERR PFX
  			   "I/O port region is already in use.
  ");
  		err = -EBUSY;
  		goto err_exit;
  	}

  	*vport = devm_ioport_map(devptr, port[dev], 0x10);
  	if (*vport == NULL) {

  		snd_printk(KERN_ERR PFX
  			   "I/O port cannot be iomaped.
  ");
  		err = -EBUSY;
  		goto err_unmap1;
  	}
  
  	/* to make it marked as used */
  	if (!request_region(mss_port[dev], 4, DRV_NAME)) {
  		snd_printk(KERN_ERR PFX
  			   "SC-6000 port I/O port region is already in use.
  ");
  		err = -EBUSY;

  		goto err_unmap1;

  	}
  	vmss_port = devm_ioport_map(devptr, mss_port[dev], 4);

  	if (!vmss_port) {

  		snd_printk(KERN_ERR PFX
  			   "MSS port I/O cannot be iomaped.
  ");
  		err = -EBUSY;
  		goto err_unmap2;
  	}
  
  	snd_printd("Initializing BASE[0x%lx] IRQ[%d] DMA[%d] MIRQ[%d]
  ",
  		   port[dev], xirq, xdma,
  		   mpu_irq[dev] == SNDRV_AUTO_IRQ ? 0 : mpu_irq[dev]);

  	err = sc6000_init_board(*vport, vmss_port, dev);

  	if (err < 0)
  		goto err_unmap2;

  	err = snd_wss_create(card, mss_port[dev] + 4,  -1, xirq, xdma, -1,
  			     WSS_HW_DETECT, 0, &chip);

  	if (err < 0)
  		goto err_unmap2;

  	err = snd_wss_pcm(chip, 0, NULL);

  	if (err < 0) {
  		snd_printk(KERN_ERR PFX

  			   "error creating new WSS PCM device
  ");

  		goto err_unmap2;
  	}

  	err = snd_wss_mixer(chip);

  	if (err < 0) {

  		snd_printk(KERN_ERR PFX "error creating new WSS mixer
  ");

  		goto err_unmap2;
  	}
  	err = snd_sc6000_mixer(chip);
  	if (err < 0) {
  		snd_printk(KERN_ERR PFX "the mixer rewrite failed
  ");
  		goto err_unmap2;
  	}
  	if (snd_opl3_create(card,
  			    0x388, 0x388 + 2,
  			    OPL3_HW_AUTO, 0, &opl3) < 0) {
  		snd_printk(KERN_ERR PFX "no OPL device at 0x%x-0x%x ?
  ",
  			   0x388, 0x388 + 2);
  	} else {

  		err = snd_opl3_hwdep_new(opl3, 0, 1, NULL);
  		if (err < 0)
  			goto err_unmap2;
  	}
  
  	if (mpu_port[dev] != SNDRV_AUTO_PORT) {
  		if (mpu_irq[dev] == SNDRV_AUTO_IRQ)
  			mpu_irq[dev] = -1;
  		if (snd_mpu401_uart_new(card, 0,
  					MPU401_HW_MPU401,
  					mpu_port[dev], 0,

  					mpu_irq[dev], NULL) < 0)

  			snd_printk(KERN_ERR "no MPU-401 device at 0x%lx ?
  ",
  					mpu_port[dev]);
  	}
  
  	strcpy(card->driver, DRV_NAME);
  	strcpy(card->shortname, "SC-6000");
  	sprintf(card->longname, "Gallant SC-6000 at 0x%lx, irq %d, dma %d",
  		mss_port[dev], xirq, xdma);
  
  	snd_card_set_dev(card, devptr);
  
  	err = snd_card_register(card);
  	if (err < 0)
  		goto err_unmap2;
  
  	dev_set_drvdata(devptr, card);
  	return 0;
  
  err_unmap2:

  	sc6000_setup_board(*vport, 0);

  	release_region(mss_port[dev], 4);
  err_unmap1:
  	release_region(port[dev], 0x10);
  err_exit:
  	snd_card_free(card);
  	return err;
  }
  
  static int __devexit snd_sc6000_remove(struct device *devptr, unsigned int dev)
  {

  	struct snd_card *card = dev_get_drvdata(devptr);
  	char __iomem **vport = card->private_data;
  
  	if (sc6000_setup_board(*vport, 0) < 0)
  		snd_printk(KERN_WARNING "sc6000_setup_board failed on exit!
  ");

  	release_region(port[dev], 0x10);
  	release_region(mss_port[dev], 4);

  	dev_set_drvdata(devptr, NULL);

  	snd_card_free(card);

  	return 0;
  }
  
  static struct isa_driver snd_sc6000_driver = {
  	.match		= snd_sc6000_match,
  	.probe		= snd_sc6000_probe,
  	.remove		= __devexit_p(snd_sc6000_remove),
  	/* FIXME: suspend/resume */
  	.driver		= {
  		.name	= DRV_NAME,
  	},
  };
  
  
  static int __init alsa_card_sc6000_init(void)
  {
  	return isa_register_driver(&snd_sc6000_driver, SNDRV_CARDS);
  }
  
  static void __exit alsa_card_sc6000_exit(void)
  {
  	isa_unregister_driver(&snd_sc6000_driver);
  }
  
  module_init(alsa_card_sc6000_init)
  module_exit(alsa_card_sc6000_exit)