Subversion Repositories or1k

/*

 * sound/trix.c

 *

 * Low level driver for the MediaTrix AudioTrix Pro

 * (MT-0002-PC Control Chip)

 */

/*

 * Copyright (C) by Hannu Savolainen 1993-1996

 *

 * USS/Lite 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"

#include "sb.h"

#if defined(CONFIG_TRIX)

#ifdef INCLUDE_TRIX_BOOT

#include "trix_boot.h"

#else

static unsigned char *trix_boot = NULL;

static int      trix_boot_len = 0;

#endif

static int      kilroy_was_here = 0;     /* Don't detect twice */

static int      sb_initialized = 0;

static int      mpu_initialized = 0;

static int     *trix_osp = NULL;

static unsigned char

trix_read (int addr)

{

  outb ((unsigned char) addr, 0x390);   /* MT-0002-PC ASIC address */

  return inb (0x391);           /* MT-0002-PC ASIC data */

}

static void

trix_write (int addr, int data)

{

  outb ((unsigned char) addr, 0x390);   /* MT-0002-PC ASIC address */

  outb ((unsigned char) data, 0x391);   /* MT-0002-PC ASIC data */

}

static void

download_boot (int base)

{

  int             i = 0, n = trix_boot_len;

  if (trix_boot_len == 0)

    return;

  trix_write (0xf8, 0x00);      /* ??????? */

  outb (0x01, base + 6);        /* Clear the internal data pointer */

  outb (0x00, base + 6);        /* Restart */

  /*

     *  Write the boot code to the RAM upload/download register.

     *  Each write increments the internal data pointer.

   */

  outb (0x01, base + 6);        /* Clear the internal data pointer */

  outb (0x1A, 0x390);           /* Select RAM download/upload port */

  for (i = 0; i < n; i++)

    outb (trix_boot[i], 0x391);

  for (i = n; i < 10016; i++)   /* Clear up to first 16 bytes of data RAM */

    outb (0x00, 0x391);

  outb (0x00, base + 6);        /* Reset */

  outb (0x50, 0x390);           /* ?????? */

}

static int

trix_set_wss_port (struct address_info *hw_config)

{

  unsigned char   addr_bits;

  if (check_region (0x390, 2))

    {

      printk ("AudioTrix: Config port I/O conflict\n");

      return 0;

    }

  if (kilroy_was_here)          /* Already initialized */

    return 0;

  if (trix_read (0x15) != 0x71) /* No ASIC signature */

    {

      DDB (printk ("No AudioTrix ASIC signature found\n"));

      return 0;

    }

  kilroy_was_here = 1;

  /*

   * Reset some registers.

   */

  trix_write (0x13, 0);

  trix_write (0x14, 0);

  /*

     * Configure the ASIC to place the codec to the proper I/O location

   */

  switch (hw_config->io_base)

    {

    case 0x530:

      addr_bits = 0;

      break;

    case 0x604:

      addr_bits = 1;

      break;

    case 0xE80:

      addr_bits = 2;

      break;

    case 0xF40:

      addr_bits = 3;

      break;

    default:

      return 0;

    }

  trix_write (0x19, (trix_read (0x19) & 0x03) | addr_bits);

  return 1;

}

/*

 *    Probe and attach routines for the Windows Sound System mode of

 *      AudioTrix Pro

 */

int

probe_trix_wss (struct address_info *hw_config)

{

  int             ret;

  /*

     * Check if the IO port returns valid signature. The original MS Sound

     * system returns 0x04 while some cards (AudioTrix Pro for example)

     * return 0x00.

   */

  if (check_region (hw_config->io_base, 8))

    {

      printk ("AudioTrix: MSS I/O port conflict (%x)\n", hw_config->io_base);

      return 0;

    }

  trix_osp = hw_config->osp;

  if (!trix_set_wss_port (hw_config))

    return 0;

  if ((inb (hw_config->io_base + 3) & 0x3f) != 0x00)

    {

      DDB (printk ("No MSS signature detected on port 0x%x\n", hw_config->io_base));

      return 0;

    }

  if (hw_config->irq > 11)

    {

      printk ("AudioTrix: Bad WSS IRQ %d\n", hw_config->irq);

      return 0;

    }

  if (hw_config->dma != 0 && hw_config->dma != 1 && hw_config->dma != 3)

    {

      printk ("AudioTrix: Bad WSS DMA %d\n", hw_config->dma);

      return 0;

    }

  if (hw_config->dma2 != -1)

    if (hw_config->dma2 != 0 && hw_config->dma2 != 1 && hw_config->dma2 != 3)

      {

        printk ("AudioTrix: Bad capture DMA %d\n", hw_config->dma2);

        return 0;

      }

  /*

     * Check that DMA0 is not in use with a 8 bit board.

   */

  if (hw_config->dma == 0 && inb (hw_config->io_base + 3) & 0x80)

    {

      printk ("AudioTrix: Can't use DMA0 with a 8 bit card\n");

      return 0;

    }

  if (hw_config->irq > 7 && hw_config->irq != 9 && inb (hw_config->io_base + 3) & 0x80)

    {

      printk ("AudioTrix: Can't use IRQ%d with a 8 bit card\n", hw_config->irq);

      return 0;

    }

  ret = ad1848_detect (hw_config->io_base + 4, NULL, hw_config->osp);

  if (ret)

    request_region (0x390, 2, "AudioTrix");

  return ret;

}

void

attach_trix_wss (struct address_info *hw_config)

{

  static unsigned char interrupt_bits[12] =

  {0, 0, 0, 0, 0, 0, 0, 0x08, 0, 0x10, 0x18, 0x20};

  char            bits;

  static unsigned char dma_bits[4] =

  {1, 2, 0, 3};

  int             config_port = hw_config->io_base + 0;

  int             dma1 = hw_config->dma, dma2 = hw_config->dma2;

  trix_osp = hw_config->osp;

  if (!kilroy_was_here)

    {

      DDB (printk ("AudioTrix: Attach called but not probed yet???\n"));

      return;

    }

  /*

     * Set the IRQ and DMA addresses.

   */

  bits = interrupt_bits[hw_config->irq];

  if (bits == 0)

    {

      printk ("AudioTrix: Bad IRQ (%d)\n", hw_config->irq);

      return;

    }

  outb (bits | 0x40, config_port);

  if (hw_config->dma2 == -1 || hw_config->dma2 == hw_config->dma)

    {

      bits |= dma_bits[dma1];

      dma2 = dma1;

    }

  else

    {

      unsigned char   tmp;

      tmp = trix_read (0x13) & ~30;

      trix_write (0x13, tmp | 0x80 | (dma1 << 4));

      tmp = trix_read (0x14) & ~30;

      trix_write (0x14, tmp | 0x80 | (dma2 << 4));

    }

  outb (bits, config_port);     /* Write IRQ+DMA setup */

  ad1848_init ("AudioTrix Pro", hw_config->io_base + 4,

               hw_config->irq,

               dma1,

               dma2,

               0,

               hw_config->osp);

  request_region (hw_config->io_base, 4, "MSS config");

}

int

probe_trix_sb (struct address_info *hw_config)

{

  int             tmp;

  unsigned char   conf;

  static char     irq_translate[] =

  {-1, -1, -1, 0, 1, 2, -1, 3};

  if (trix_boot_len == 0)

    return 0;                    /* No boot code -> no fun */

  if (!kilroy_was_here)

    return 0;                    /* AudioTrix Pro has not been detected earlier */

  if (sb_initialized)

    return 0;

  if (check_region (hw_config->io_base, 16))

    {

      printk ("AudioTrix: SB I/O port conflict (%x)\n", hw_config->io_base);

      return 0;

    }

  if ((hw_config->io_base & 0xffffff8f) != 0x200)

    return 0;

  tmp = hw_config->irq;

  if (tmp > 7)

    return 0;

  if (irq_translate[tmp] == -1)

    return 0;

  tmp = hw_config->dma;

  if (tmp != 1 && tmp != 3)

    return 0;

  conf = 0x84;                  /* DMA and IRQ enable */

  conf |= hw_config->io_base & 0x70;    /* I/O address bits */

  conf |= irq_translate[hw_config->irq];

  if (hw_config->dma == 3)

    conf |= 0x08;

  trix_write (0x1b, conf);

  download_boot (hw_config->io_base);

  sb_initialized = 1;

  hw_config->name = "AudioTrix SB";

#ifdef CONFIG_SBDSP

  return probe_sb (hw_config);

#else

  return 0;

#endif

}

void

attach_trix_sb (struct address_info *hw_config)

{

#ifdef CONFIG_SBDSP

  hw_config->driver_use_1 = SB_NO_MIDI | SB_NO_MIXER | SB_NO_RECORDING;

  attach_sb_card (hw_config);

#endif

}

void

attach_trix_mpu (struct address_info *hw_config)

{

#if defined(CONFIG_UART401) && defined(CONFIG_MIDI)

  hw_config->name = "AudioTrix Pro";

  attach_uart401 (hw_config);

#endif

}

int

probe_trix_mpu (struct address_info *hw_config)

{

#if defined(CONFIG_UART401) && defined(CONFIG_MIDI)

  unsigned char   conf;

  static char     irq_bits[] =

  {-1, -1, -1, 1, 2, 3, -1, 4, -1, 5};

  if (!kilroy_was_here)

    {

      DDB (printk ("Trix: WSS and SB modes must be initialized before MPU\n"));

      return 0;                  /* AudioTrix Pro has not been detected earlier */

    }

  if (!sb_initialized)

    {

      DDB (printk ("Trix: SB mode must be initialized before MPU\n"));

      return 0;

    }

  if (mpu_initialized)

    {

      DDB (printk ("Trix: MPU mode already initialized\n"));

      return 0;

    }

  if (check_region (hw_config->io_base, 4))

    {

      printk ("AudioTrix: MPU I/O port conflict (%x)\n", hw_config->io_base);

      return 0;

    }

  if (hw_config->irq > 9)

    {

      printk ("AudioTrix: Bad MPU IRQ %d\n", hw_config->irq);

      return 0;

    }

  if (irq_bits[hw_config->irq] == -1)

    {

      printk ("AudioTrix: Bad MPU IRQ %d\n", hw_config->irq);

      return 0;

    }

  switch (hw_config->io_base)

    {

    case 0x330:

      conf = 0x00;

      break;

    case 0x370:

      conf = 0x04;

      break;

    case 0x3b0:

      conf = 0x08;

      break;

    case 0x3f0:

      conf = 0x0c;

      break;

    default:

      return 0;                  /* Invalid port */

    }

  conf |= irq_bits[hw_config->irq] << 4;

  trix_write (0x19, (trix_read (0x19) & 0x83) | conf);

  mpu_initialized = 1;

  return probe_uart401 (hw_config);

#else

  return 0;

#endif

}

void

unload_trix_wss (struct address_info *hw_config)

{

  int             dma2 = hw_config->dma2;

  if (dma2 == -1)

    dma2 = hw_config->dma;

  release_region (0x390, 2);

  release_region (hw_config->io_base, 4);

  ad1848_unload (hw_config->io_base + 4,

                 hw_config->irq,

                 hw_config->dma,

                 dma2,

                 0);

}

void

unload_trix_mpu (struct address_info *hw_config)

{

#if defined(CONFIG_UART401) && defined(CONFIG_MIDI)

  unload_uart401 (hw_config);

#endif

}

void

unload_trix_sb (struct address_info *hw_config)

{

#ifdef CONFIG_SBDSP

  unload_sb (hw_config);

#endif

}

#endif