Logo Search packages:      
Sourcecode: alsa-driver version File versions  Download package

riptide.c

/*
 *   Driver for the Conexant Riptide Soundchip
 *
 *    Copyright (c) 2004 Peter Gruber <nokos@gmx.net>
 *
 *   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
 *
 */
/*
  History:
   - 02/15/2004 first release
   
  This Driver is based on the OSS Driver version from Linuxant (riptide-0.6lnxtbeta03111100)
  credits from the original files:
  
  MODULE NAME:        cnxt_rt.h                       
  AUTHOR:             K. Lazarev  (Transcribed by KNL)
  HISTORY:         Major Revision               Date        By
            -----------------------------     --------     -----
            Created                           02/1/2000     KNL

  MODULE NAME:     int_mdl.c                       
  AUTHOR:          Konstantin Lazarev    (Transcribed by KNL)
  HISTORY:         Major Revision               Date        By
            -----------------------------     --------     -----
            Created                           10/01/99      KNL
          
  MODULE NAME:        riptide.h                       
  AUTHOR:             O. Druzhinin  (Transcribed by OLD)
  HISTORY:         Major Revision               Date        By
            -----------------------------     --------     -----
            Created                           10/16/97      OLD

  MODULE NAME:        Rp_Cmdif.cpp                       
  AUTHOR:             O. Druzhinin  (Transcribed by OLD)
                      K. Lazarev    (Transcribed by KNL)
  HISTORY:         Major Revision               Date        By
            -----------------------------     --------     -----
            Adopted from NT4 driver            6/22/99      OLD
            Ported to Linux                    9/01/99      KNL

  MODULE NAME:        rt_hw.c                       
  AUTHOR:             O. Druzhinin  (Transcribed by OLD)
                      C. Lazarev    (Transcribed by CNL)
  HISTORY:         Major Revision               Date        By
            -----------------------------     --------     -----
            Created                           11/18/97      OLD
            Hardware functions for RipTide    11/24/97      CNL
            (ES1) are coded
            Hardware functions for RipTide    12/24/97      CNL
            (A0) are coded
            Hardware functions for RipTide    03/20/98      CNL
            (A1) are coded
            Boot loader is included           05/07/98      CNL
            Redesigned for WDM                07/27/98      CNL
            Redesigned for Linux              09/01/99      CNL

  MODULE NAME:        rt_hw.h
  AUTHOR:             C. Lazarev    (Transcribed by CNL)
  HISTORY:         Major Revision               Date        By
            -----------------------------     --------     -----
            Created                           11/18/97      CNL

  MODULE NAME:     rt_mdl.c                       
  AUTHOR:          Konstantin Lazarev    (Transcribed by KNL)
  HISTORY:         Major Revision               Date        By
            -----------------------------     --------     -----
            Created                           10/01/99      KNL

  MODULE NAME:        mixer.h                        
  AUTHOR:             K. Kenney
  HISTORY:         Major Revision                   Date          By
            -----------------------------          --------     -----
            Created from MS W95 Sample             11/28/95      KRS
            RipTide                                10/15/97      KRS
            Adopted for Windows NT driver          01/20/98      CNL
*/

#include <sound/driver.h>
#include <linux/delay.h>
#include <linux/init.h>
#include <linux/interrupt.h>
#include <linux/pci.h>
#include <linux/slab.h>
#include <linux/wait.h>
#include <linux/gameport.h>
#include <linux/module.h>
#include <linux/kernel.h>
#include <linux/init.h>
#include <linux/device.h>
#include <linux/firmware.h>
#include <asm/io.h>
#include <asm/semaphore.h>
#include <sound/core.h>
#include <sound/info.h>
#include <sound/control.h>
#include <sound/pcm.h>
#include <sound/pcm_params.h>
#include <sound/ac97_codec.h>
#include <sound/mpu401.h>
#include <sound/opl3.h>
#include <sound/initval.h>


#if defined(CONFIG_GAMEPORT) || (defined(MODULE) && defined(CONFIG_GAMEPORT_MODULE))
#define SUPPORT_JOYSTICK 1
#endif


MODULE_AUTHOR("Peter Gruber <nokos@gmx.net>");
MODULE_DESCRIPTION("riptide");
MODULE_LICENSE("GPL");
MODULE_SUPPORTED_DEVICE("{{Conexant,Riptide}}");

static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;
static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;
static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE;

#ifdef SUPPORT_JOYSTICK
static int joystick_port[SNDRV_CARDS] = { [0 ... (SNDRV_CARDS - 1)] = 0x200 };
#endif
static int mpu_port[SNDRV_CARDS] = { [0 ... (SNDRV_CARDS - 1)] = 0x330 };
static int opl3_port[SNDRV_CARDS] = { [0 ... (SNDRV_CARDS - 1)] = 0x388 };

module_param_array(index, int, NULL, 0444);
MODULE_PARM_DESC(index, "Index value for Riptide soundcard.");
module_param_array(id, charp, NULL, 0444);
MODULE_PARM_DESC(id, "ID string for Riptide soundcard.");
module_param_array(enable, bool, NULL, 0444);
MODULE_PARM_DESC(enable, "Enable Riptide soundcard.");
#ifdef SUPPORT_JOYSTICK
module_param_array(joystick_port, int, NULL, 0444);
MODULE_PARM_DESC(joystick_port, "Joystick port # for Riptide soundcard.");
#endif
module_param_array(mpu_port, int, NULL, 0444);
MODULE_PARM_DESC(mpu_port, "MPU401 port # for Riptide driver.");
module_param_array(opl3_port, int, NULL, 0444);
MODULE_PARM_DESC(opl3_port, "OPL3 port # for Riptide driver.");


/*
 */

#define FALSE 0
#define TRUE  1

#define MPU401_HW_RIPTIDE MPU401_HW_MPU401
#define OPL3_HW_RIPTIDE   OPL3_HW_OPL3

#define PLAYBACK_SUBSTREAMS 3

#define PCI_EXT_CapId       0x40
#define PCI_EXT_NextCapPrt  0x41
#define PCI_EXT_PWMC        0x42
#define PCI_EXT_PWSCR       0x44
#define PCI_EXT_Data00      0x46
#define PCI_EXT_PMSCR_BSE   0x47
#define PCI_EXT_SB_Base     0x48
#define PCI_EXT_FM_Base     0x4a
#define PCI_EXT_MPU_Base    0x4C
#define PCI_EXT_Game_Base   0x4E
#define PCI_EXT_Legacy_Mask 0x50
#define PCI_EXT_AsicRev     0x52
#define PCI_EXT_Reserved3   0x53

#define LEGACY_ENABLE_ALL      0x8000
#define LEGACY_ENABLE_SB       0x4000
#define LEGACY_ENABLE_FM       0x2000
#define LEGACY_ENABLE_MPU_INT  0x1000
#define LEGACY_ENABLE_MPU      0x0800
#define LEGACY_ENABLE_GAMEPORT 0x0400

#define MAX_WRITE_RETRY  10
#define MAX_ERROR_COUNT  10
#define CMDIF_TIMEOUT    500000

#define READ_PORT_ULONG(p)     inl((unsigned long)&(p))
#define WRITE_PORT_ULONG(p,x)  outl(x,(unsigned long)&(p))

#define READ_AUDIO_CONTROL(p)     READ_PORT_ULONG(p->audio_control)
#define WRITE_AUDIO_CONTROL(p,x)  WRITE_PORT_ULONG(p->audio_control,x)
#define UMASK_AUDIO_CONTROL(p,x)  WRITE_PORT_ULONG(p->audio_control,READ_PORT_ULONG(p->audio_control)|x)
#define MASK_AUDIO_CONTROL(p,x)   WRITE_PORT_ULONG(p->audio_control,READ_PORT_ULONG(p->audio_control)&x)
#define READ_AUDIO_STATUS(p)      READ_PORT_ULONG(p->audio_status)

#define SET_GRESET(p)     UMASK_AUDIO_CONTROL(p,0x0001)
#define UNSET_GRESET(p)   MASK_AUDIO_CONTROL(p,~0x0001)
#define SET_AIE(p)        UMASK_AUDIO_CONTROL(p,0x0004)
#define UNSET_AIE(p)      MASK_AUDIO_CONTROL(p,~0x0004)
#define SET_AIACK(p)      UMASK_AUDIO_CONTROL(p,0x0008)
#define UNSET_AIACKT(p)   MASKAUDIO_CONTROL(p,~0x0008)
#define SET_ECMDAE(p)     UMASK_AUDIO_CONTROL(p,0x0010)
#define UNSET_ECMDAE(p)   MASK_AUDIO_CONTROL(p,~0x0010)
#define SET_ECMDBE(p)     UMASK_AUDIO_CONTROL(p,0x0020)
#define UNSET_ECMDBE(p)   MASK_AUDIO_CONTROL(p,~0x0020)
#define SET_EDATAF(p)     UMASK_AUDIO_CONTROL(p,0x0040)
#define UNSET_EDATAF(p)   MASK_AUDIO_CONTROL(p,~0x0040)
#define SET_EDATBF(p)     UMASK_AUDIO_CONTROL(p,0x0080)
#define UNSET_EDATBF(p)   MASK_AUDIO_CONTROL(p,~0x0080)
#define SET_ESBIRQON(p)   UMASK_AUDIO_CONTROL(p,0x0100)
#define UNSET_ESBIRQON(p) MASK_AUDIO_CONTROL(p,~0x0100)
#define SET_EMPUIRQ(p)    UMASK_AUDIO_CONTROL(p,0x0200)
#define UNSET_EMPUIRQ(p)  MASK_AUDIO_CONTROL(p,~0x0200)
#define IS_CMDE(a)        (READ_PORT_ULONG(a->stat)&0x1)
#define IS_DATF(a)        (READ_PORT_ULONG(a->stat)&0x2)
#define IS_READY(p)       (READ_AUDIO_STATUS(p)&0x0001)
#define IS_DLREADY(p)     (READ_AUDIO_STATUS(p)&0x0002)
#define IS_DLERR(p)       (READ_AUDIO_STATUS(p)&0x0004)
#define IS_GERR(p)        (READ_AUDIO_STATUS(p)&0x0008)
#define IS_CMDAEIRQ(p)    (READ_AUDIO_STATUS(p)&0x0010)
#define IS_CMDBEIRQ(p)    (READ_AUDIO_STATUS(p)&0x0020)
#define IS_DATAFIRQ(p)    (READ_AUDIO_STATUS(p)&0x0040)
#define IS_DATBFIRQ(p)    (READ_AUDIO_STATUS(p)&0x0080)
#define IS_EOBIRQ(p)      (READ_AUDIO_STATUS(p)&0x0100)
#define IS_EOSIRQ(p)      (READ_AUDIO_STATUS(p)&0x0200)
#define IS_EOCIRQ(p)      (READ_AUDIO_STATUS(p)&0x0400)
#define IS_UNSLIRQ(p)     (READ_AUDIO_STATUS(p)&0x0800)
#define IS_SBIRQ(p)       (READ_AUDIO_STATUS(p)&0x1000)
#define IS_MPUIRQ(p)      (READ_AUDIO_STATUS(p)&0x2000)

#define RESP 0x00000001
#define PARM 0x00000002
#define CMDA 0x00000004
#define CMDB 0x00000008
#define NILL 0x00000000

#define LONG0(a)   ((u32)a)
#define BYTE0(a)   (LONG0(a)&0xff)
#define BYTE1(a)   (BYTE0(a)<<8)
#define BYTE2(a)   (BYTE0(a)<<16)
#define BYTE3(a)   (BYTE0(a)<<24)
#define WORD0(a)   (LONG0(a)&0xffff)
#define WORD1(a)   (WORD0(a)<<8)
#define WORD2(a)   (WORD0(a)<<16)
#define TRINIB0(a) (LONG0(a)&0xffffff)
#define TRINIB1(a) (TRINIB0(a)<<8)
#define RET(a)     ((cmdret_t *)(a))

#define SEND_GETV(p,b)             sendcmd(p,RESP,GETV,0,RET(b))
#define SEND_GETC(p,b,c)           sendcmd(p,PARM|RESP,GETC,c,RET(b))
#define SEND_GUNS(p,b)             sendcmd(p,RESP,GUNS,0,RET(b))
#define SEND_SCID(p,b)             sendcmd(p,RESP,SCID,0,RET(b))
#define SEND_RMEM(p,b,c,d)         sendcmd(p,PARM|RESP,RMEM|BYTE1(b),LONG0(c),RET(d))
#define SEND_SMEM(p,b,c)           sendcmd(p,PARM,SMEM|BYTE1(b),LONG0(c),RET(0))
#define SEND_WMEM(p,b,c)           sendcmd(p,PARM,WMEM|BYTE1(b),LONG0(c),RET(0))
#define SEND_SDTM(p,b,c)           sendcmd(p,PARM|RESP,SDTM|TRINIB1(b),0,RET(c))
#define SEND_GOTO(p,b)             sendcmd(p,PARM,GOTO,LONG0(b),RET(0))
#define SEND_SETDPLL(p)            sendcmd(p,0,ARM_SETDPLL,0,RET(0))
#define SEND_SSTR(p,b,c)           sendcmd(p,PARM,SSTR|BYTE3(b),LONG0(c),RET(0))
#define SEND_PSTR(p,b)             sendcmd(p,PARM,PSTR,BYTE3(b),RET(0))
#define SEND_KSTR(p,b)             sendcmd(p,PARM,KSTR,BYTE3(b),RET(0))
#define SEND_KDMA(p)               sendcmd(p,0,KDMA,0,RET(0))
#define SEND_GPOS(p,b,c,d)         sendcmd(p,PARM|RESP,GPOS,BYTE3(c)|BYTE2(b),RET(d))
#define SEND_SETF(p,b,c,d,e,f,g)   sendcmd(p,PARM,SETF|WORD1(b)|BYTE3(c),d|BYTE1(e)|BYTE2(f)|BYTE3(g),RET(0))
#define SEND_GSTS(p,b,c,d)         sendcmd(p,PARM|RESP,GSTS,BYTE3(c)|BYTE2(b),RET(d))
#define SEND_NGPOS(p,b,c,d)        sendcmd(p,PARM|RESP,NGPOS,BYTE3(c)|BYTE2(b),RET(d))
#define SEND_PSEL(p,b,c)           sendcmd(p,PARM,PSEL,BYTE2(b)|BYTE3(c),RET(0))
#define SEND_PCLR(p,b,c)           sendcmd(p,PARM,PCLR,BYTE2(b)|BYTE3(c),RET(0))
#define SEND_PLST(p,b)             sendcmd(p,PARM,PLST,BYTE3(b),RET(0))
#define SEND_RSSV(p,b,c,d)         sendcmd(p,PARM|RESP,RSSV,BYTE2(b)|BYTE3(c),RET(d))
#define SEND_LSEL(p,b,c,d,e,f,g,h) sendcmd(p,PARM,LSEL|BYTE1(b)|BYTE2(c)|BYTE3(d),BYTE0(e)|BYTE1(f)|BYTE2(g)|BYTE3(h),RET(0))
#define SEND_SSRC(p,b,c,d,e)       sendcmd(p,PARM,SSRC|BYTE1(b)|WORD2(c),WORD0(d)|WORD2(e),RET(0))
#define SEND_SLST(p,b)             sendcmd(p,PARM,SLST,BYTE3(b),RET(0))
#define SEND_RSRC(p,b,c)           sendcmd(p,RESP,RSRC|BYTE1(b),0,RET(c))
#define SEND_SSRB(p,b,c)           sendcmd(p,PARM,SSRB|BYTE1(b),WORD2(c),RET(0))
#define SEND_SDGV(p,b,c,d,e)       sendcmd(p,PARM,SDGV|BYTE2(b)|BYTE3(c),WORD0(d)|WORD2(e),RET(0))
#define SEND_RDGV(p,b,c,d)         sendcmd(p,PARM|RESP,RDGV|BYTE2(b)|BYTE3(c),0,RET(d))
#define SEND_DLST(p,b)             sendcmd(p,PARM,DLST,BYTE3(b),RET(0))
#define SEND_SACR(p,b,c)           sendcmd(p,PARM,SACR,WORD0(b)|WORD2(c),RET(0))
#define SEND_RACR(p,b,c)           sendcmd(p,PARM|RESP,RACR,WORD2(b),RET(c))
#define SEND_ALST(p,b)             sendcmd(p,PARM,ALST,BYTE3(b),RET(0))
#define SEND_TXAC(p,b,c,d,e,f)     sendcmd(p,PARM,TXAC|BYTE1(b)|WORD2(c),WORD0(d)|BYTE2(e)|BYTE3(f),RET(0))
#define SEND_RXAC(p,b,c,d)         sendcmd(p,PARM|RESP,RXAC,BYTE2(b)|BYTE3(c),RET(d))
#define SEND_SI2S(p,b)             sendcmd(p,PARM,SI2S,WORD2(b),RET(0))

#define EOB_STATUS         0x80000000
#define EOS_STATUS         0x40000000
#define EOC_STATUS         0x20000000
#define ERR_STATUS         0x10000000
#define EMPTY_STATUS       0x08000000

#define IEOB_ENABLE        0x1
#define IEOS_ENABLE        0x2
#define IEOC_ENABLE        0x4
#define RDONCE             0x8
#define DESC_MAX_MASK      0xff

#define ST_PLAY  0x1
#define ST_STOP  0x2
#define ST_PAUSE 0x4

#define I2S_INTDEC     3
#define I2S_MERGER     0
#define I2S_SPLITTER   0
#define I2S_MIXER      7
#define I2S_RATE       44100

#define MODEM_INTDEC   4
#define MODEM_MERGER   3
#define MODEM_SPLITTER 0
#define MODEM_MIXER    11

#define FM_INTDEC      3
#define FM_MERGER      0
#define FM_SPLITTER    0
#define FM_MIXER       9

#define SPLIT_PATH  0x80

enum FIRMWARE {
      DATA_REC =
          0, EXT_END_OF_FILE, EXT_SEG_ADDR_REC, EXT_GOTO_CMD_REC,
          EXT_LIN_ADDR_REC,
};

enum CMDS {
      GETV = 0x00, GETC, GUNS, SCID, RMEM =
          0x10, SMEM, WMEM, SDTM, GOTO, SSTR =
          0x20, PSTR, KSTR, KDMA, GPOS, SETF, GSTS, NGPOS, PSEL =
          0x30, PCLR, PLST, RSSV, LSEL, SSRC = 0x40, SLST, RSRC, SSRB, SDGV =
          0x50, RDGV, DLST, SACR = 0x60, RACR, ALST, TXAC, RXAC, SI2S =
          0x70, ARM_SETDPLL = 0x72,
};

enum E1SOURCE {
      ARM2LBUS_FIFO0, ARM2LBUS_FIFO1, ARM2LBUS_FIFO2, ARM2LBUS_FIFO3,
      ARM2LBUS_FIFO4, ARM2LBUS_FIFO5, ARM2LBUS_FIFO6, ARM2LBUS_FIFO7,
      ARM2LBUS_FIFO8, ARM2LBUS_FIFO9, ARM2LBUS_FIFO10, ARM2LBUS_FIFO11,
      ARM2LBUS_FIFO12, ARM2LBUS_FIFO13, ARM2LBUS_FIFO14, ARM2LBUS_FIFO15,
      INTER0_OUT, INTER1_OUT, INTER2_OUT, INTER3_OUT, INTER4_OUT, INTERM0_OUT,
      INTERM1_OUT, INTERM2_OUT, INTERM3_OUT, INTERM4_OUT, INTERM5_OUT,
      INTERM6_OUT, DECIMM0_OUT, DECIMM1_OUT, DECIMM2_OUT, DECIMM3_OUT,
      DECIM0_OUT, SR3_4_OUT, OPL3_SAMPLE, ASRC0, ASRC1, ACLNK2PADC,
      ACLNK2MODEM0RX, ACLNK2MIC, ACLNK2MODEM1RX, ACLNK2HNDMIC,
      DIGITAL_MIXER_OUT0, GAINFUNC0_OUT, GAINFUNC1_OUT, GAINFUNC2_OUT,
      GAINFUNC3_OUT, GAINFUNC4_OUT, SOFTMODEMTX, SPLITTER0_OUTL,
          SPLITTER0_OUTR,
      SPLITTER1_OUTL, SPLITTER1_OUTR, SPLITTER2_OUTL, SPLITTER2_OUTR,
      SPLITTER3_OUTL, SPLITTER3_OUTR, MERGER0_OUT, MERGER1_OUT, MERGER2_OUT,
      MERGER3_OUT, ARM2LBUS_FIFO_DIRECT, NO_OUT,
};

enum E2SINK {
      LBUS2ARM_FIFO0, LBUS2ARM_FIFO1, LBUS2ARM_FIFO2, LBUS2ARM_FIFO3,
      LBUS2ARM_FIFO4, LBUS2ARM_FIFO5, LBUS2ARM_FIFO6, LBUS2ARM_FIFO7,
          INTER0_IN,
      INTER1_IN, INTER2_IN, INTER3_IN, INTER4_IN, INTERM0_IN, INTERM1_IN,
      INTERM2_IN, INTERM3_IN, INTERM4_IN, INTERM5_IN, INTERM6_IN, DECIMM0_IN,
      DECIMM1_IN, DECIMM2_IN, DECIMM3_IN, DECIM0_IN, SR3_4_IN, PDAC2ACLNK,
      MODEM0TX2ACLNK, MODEM1TX2ACLNK, HNDSPK2ACLNK, DIGITAL_MIXER_IN0,
      DIGITAL_MIXER_IN1, DIGITAL_MIXER_IN2, DIGITAL_MIXER_IN3,
      DIGITAL_MIXER_IN4, DIGITAL_MIXER_IN5, DIGITAL_MIXER_IN6,
      DIGITAL_MIXER_IN7, DIGITAL_MIXER_IN8, DIGITAL_MIXER_IN9,
      DIGITAL_MIXER_IN10, DIGITAL_MIXER_IN11, GAINFUNC0_IN, GAINFUNC1_IN,
      GAINFUNC2_IN, GAINFUNC3_IN, GAINFUNC4_IN, SOFTMODEMRX, SPLITTER0_IN,
      SPLITTER1_IN, SPLITTER2_IN, SPLITTER3_IN, MERGER0_INL, MERGER0_INR,
      MERGER1_INL, MERGER1_INR, MERGER2_INL, MERGER2_INR, MERGER3_INL,
      MERGER3_INR, E2SINK_MAX
};

enum LBUS_SINK {
      LS_SRC_INTERPOLATOR, LS_SRC_INTERPOLATORM, LS_SRC_DECIMATOR,
      LS_SRC_DECIMATORM, LS_MIXER_IN, LS_MIXER_GAIN_FUNCTION, LS_SRC_SPLITTER,
      LS_SRC_MERGER, LS_NONE1, LS_NONE2,
};

enum RT_CHANNEL_IDS {
      M0TX =
          0, M1TX, TAMTX, HSSPKR, PDAC, DSNDTX0, DSNDTX1, DSNDTX2, DSNDTX3,
          DSNDTX4,
      DSNDTX5, DSNDTX6, DSNDTX7, WVSTRTX, COP3DTX, SPARE, M0RX, HSMIC, M1RX,
      CLEANRX, MICADC, PADC, COPRX1, COPRX2, CHANNEL_ID_COUNTER
};

enum { SB_CMD, MODEM_CMD, I2S_CMD0, I2S_CMD1, FM_CMD, MAX_CMD };

typedef struct _snd_riptide riptide_t;
typedef struct _snd_cmdif cmdif_t;
typedef struct _snd_pcmhw pcmhw_t;
typedef struct _snd_lbuspath lbuspath_t;
typedef struct _snd_sgd sgd_t;
typedef union _snd_cmdret cmdret_t;
typedef struct _snd_riptideport riptideport_t;
typedef struct _snd_cmdport cmdport_t;

struct _snd_lbuspath {
      unsigned char *noconv;
      unsigned char *stereo;
      unsigned char *mono;
};

struct _snd_cmdport {
      u32 data1;
      u32 data2;
      u32 stat;
      u32 pad[5];
};

struct _snd_riptideport {
      u32 audio_control;
      u32 audio_status;
      u32 pad[2];
      cmdport_t port[2];
};

struct _snd_cmdif {
      riptideport_t *hwport;
      spinlock_t lock;
      unsigned int cmdcnt;
      unsigned int cmdtime;
      unsigned int cmdtimemax;
      unsigned int cmdtimemin;
      unsigned int errcnt;
      int is_reset;
};

#define get_pcmhwdev(substream) (pcmhw_t *)(substream->runtime->private_data)

struct _snd_riptide {
      snd_card_t *card;
      struct pci_dev *pci;
      const struct firmware *fw_entry;

      cmdif_t *cif;

      snd_pcm_t *pcm;
      snd_pcm_t *pcm_i2s;
      snd_rawmidi_t *rmidi;
      opl3_t *opl3;
      ac97_t *ac97;
      ac97_bus_t *ac97_bus;

      snd_pcm_substream_t *playback_substream[PLAYBACK_SUBSTREAMS];
      snd_pcm_substream_t *capture_substream;

      int openstreams;

      int irq;
      unsigned long port;
      unsigned short mpuaddr;
      unsigned short opladdr;
#ifdef SUPPORT_JOYSTICK
      unsigned short gameaddr;
#endif
      struct resource *res_port;

      unsigned short device_id;

      spinlock_t lock;
      struct tasklet_struct riptide_tq;
      snd_info_entry_t *proc_entry;

      unsigned long received_irqs;
      unsigned long handled_irqs;
#ifdef CONFIG_PM
      int in_suspend;
#endif
};

struct _snd_sgd {
      dma_addr_t dwNextLink;
      dma_addr_t dwSegPtrPhys;
      u32 dwSegLen;
      u32 dwStat_Ctl;
};

struct _snd_pcmhw {
      lbuspath_t paths;
      unsigned char *lbuspath;
      unsigned char source;
      unsigned char intdec[2];
      unsigned char mixer;
      unsigned char id;
      unsigned char state;
      unsigned int rate;
      unsigned int channels;
      snd_pcm_format_t format;
      struct snd_dma_buffer sgdlist;
      unsigned int size;
      unsigned int pages;
      unsigned int oldpos;
      unsigned int pointer;
};

union _snd_cmdret {
      u8 retbytes[8];
      u16 retwords[4];
      u32 retlongs[2];
};


static int sendcmd(cmdif_t * cif, u32 flags, u32 cmd, u32 parm, cmdret_t * ret);
static int getsourcesink(cmdif_t * cif, unsigned char source, unsigned char sink,
                   unsigned char *a, unsigned char *b);
static int snd_riptide_initialize(riptide_t * chip);
static int riptide_reset(cmdif_t * cif, riptide_t * chip);


/*
 */

static struct pci_device_id snd_riptide_ids[] = {
      {
       .vendor = 0x127a,.device = 0x4310,
       .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
       },
      {
       .vendor = 0x127a,.device = 0x4320,
       .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
       },
      {
       .vendor = 0x127a,.device = 0x4330,
       .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
       },
      {
       .vendor = 0x127a,.device = 0x4340,
       .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
       },
      {0,},
};

#ifdef SUPPORT_JOYSTICK
static struct pci_device_id snd_riptide_joystick_ids[] = {
      {
       .vendor = 0x127a,.device = 0x4312,
       .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
       },
      {
       .vendor = 0x127a,.device = 0x4322,
       .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
       },
      {.vendor = 0x127a,.device = 0x4332,
       .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
       },
      {.vendor = 0x127a,.device = 0x4342,
       .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
       },
};
#endif

MODULE_DEVICE_TABLE(pci, snd_riptide_ids);

/*
 */

static unsigned char lbusin2out[E2SINK_MAX + 1][2] = {
      {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2}, {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2},
      {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2}, {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2},
      {INTER0_OUT, LS_SRC_INTERPOLATOR}, {INTER1_OUT, LS_SRC_INTERPOLATOR},
      {INTER2_OUT, LS_SRC_INTERPOLATOR}, {INTER3_OUT, LS_SRC_INTERPOLATOR},
      {INTER4_OUT, LS_SRC_INTERPOLATOR}, {INTERM0_OUT, LS_SRC_INTERPOLATORM},
      {INTERM1_OUT, LS_SRC_INTERPOLATORM}, {INTERM2_OUT, LS_SRC_INTERPOLATORM},
      {INTERM3_OUT, LS_SRC_INTERPOLATORM}, {INTERM4_OUT, LS_SRC_INTERPOLATORM},
      {INTERM5_OUT, LS_SRC_INTERPOLATORM}, {INTERM6_OUT, LS_SRC_INTERPOLATORM},
      {DECIMM0_OUT, LS_SRC_DECIMATORM}, {DECIMM1_OUT, LS_SRC_DECIMATORM},
      {DECIMM2_OUT, LS_SRC_DECIMATORM}, {DECIMM3_OUT, LS_SRC_DECIMATORM},
      {DECIM0_OUT, LS_SRC_DECIMATOR}, {SR3_4_OUT, LS_NONE1}, {NO_OUT, LS_NONE2},
      {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2}, {NO_OUT, LS_NONE1},
      {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
      {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
      {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
      {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
      {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
      {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
      {GAINFUNC0_OUT, LS_MIXER_GAIN_FUNCTION}, {GAINFUNC1_OUT,
                                      LS_MIXER_GAIN_FUNCTION},
      {GAINFUNC2_OUT, LS_MIXER_GAIN_FUNCTION}, {GAINFUNC3_OUT,
                                      LS_MIXER_GAIN_FUNCTION},
      {GAINFUNC4_OUT, LS_MIXER_GAIN_FUNCTION}, {SOFTMODEMTX, LS_NONE1},
      {SPLITTER0_OUTL, LS_SRC_SPLITTER}, {SPLITTER1_OUTL, LS_SRC_SPLITTER},
      {SPLITTER2_OUTL, LS_SRC_SPLITTER}, {SPLITTER3_OUTL, LS_SRC_SPLITTER},
      {MERGER0_OUT, LS_SRC_MERGER}, {MERGER0_OUT, LS_SRC_MERGER},
          {MERGER1_OUT, LS_SRC_MERGER},
      {MERGER1_OUT, LS_SRC_MERGER}, {MERGER2_OUT, LS_SRC_MERGER},
          {MERGER2_OUT, LS_SRC_MERGER},
      {MERGER3_OUT, LS_SRC_MERGER}, {MERGER3_OUT, LS_SRC_MERGER}, {NO_OUT, LS_NONE2},
};

static unsigned char lbus_play_opl3[] = {
      DIGITAL_MIXER_IN0 + FM_MIXER, 0xff
};
static unsigned char lbus_play_modem[] = {
      DIGITAL_MIXER_IN0 + MODEM_MIXER, 0xff
};
static unsigned char lbus_play_i2s[] = {
      INTER0_IN + I2S_INTDEC, DIGITAL_MIXER_IN0 + I2S_MIXER, 0xff
};
static unsigned char lbus_play_out[] = {
      PDAC2ACLNK, 0xff
};
static unsigned char lbus_play_outhp[] = {
      HNDSPK2ACLNK, 0xff
};
static unsigned char lbus_play_noconv1[] = {
      DIGITAL_MIXER_IN0, 0xff
};
static unsigned char lbus_play_stereo1[] = {
      INTER0_IN, DIGITAL_MIXER_IN0, 0xff
};
static unsigned char lbus_play_mono1[] = {
      INTERM0_IN, DIGITAL_MIXER_IN0, 0xff
};
static unsigned char lbus_play_noconv2[] = {
      DIGITAL_MIXER_IN1, 0xff
};
static unsigned char lbus_play_stereo2[] = {
      INTER1_IN, DIGITAL_MIXER_IN1, 0xff
};
static unsigned char lbus_play_mono2[] = {
      INTERM1_IN, DIGITAL_MIXER_IN1, 0xff
};
static unsigned char lbus_play_noconv3[] = {
      DIGITAL_MIXER_IN2, 0xff
};
static unsigned char lbus_play_stereo3[] = {
      INTER2_IN, DIGITAL_MIXER_IN2, 0xff
};
static unsigned char lbus_play_mono3[] = {
      INTERM2_IN, DIGITAL_MIXER_IN2, 0xff
};
static unsigned char lbus_rec_noconv1[] = {
      LBUS2ARM_FIFO5, 0xff
};
static unsigned char lbus_rec_stereo1[] = {
      DECIM0_IN, LBUS2ARM_FIFO5, 0xff
};
static unsigned char lbus_rec_mono1[] = {
      DECIMM3_IN, LBUS2ARM_FIFO5, 0xff
};

static unsigned char play_ids[] = { 4, 1, 2, };
static unsigned char play_sources[] = {
      ARM2LBUS_FIFO4, ARM2LBUS_FIFO1, ARM2LBUS_FIFO2,
};
static struct _snd_lbuspath lbus_play_paths[] = {
      {
       .noconv = lbus_play_noconv1,
       .stereo = lbus_play_stereo1,
       .mono = lbus_play_mono1,
       },
      {
       .noconv = lbus_play_noconv2,
       .stereo = lbus_play_stereo2,
       .mono = lbus_play_mono2,
       },
      {
       .noconv = lbus_play_noconv3,
       .stereo = lbus_play_stereo3,
       .mono = lbus_play_mono3,
       },
};
static struct _snd_lbuspath lbus_rec_path = {
      .noconv = lbus_rec_noconv1,
      .stereo = lbus_rec_stereo1,
      .mono = lbus_rec_mono1,
};

static u32 atoh(unsigned char *in, unsigned int len)
{
      u32 sum = 0;
      unsigned int mult = 1;
      unsigned char c;

      while (len) {
            c = in[len - 1];
            if ((c >= '0') && (c <= '9'))
                  sum += mult * (c - '0');
            else if ((c >= 'A') && (c <= 'F'))
                  sum += mult * (c - ('A' - 10));
            else if ((c >= 'a') && (c <= 'f'))
                  sum += mult * (c - ('a' - 10));
            mult *= 16;
            --len;
      }
      return sum;
}

static int senddata(cmdif_t * cif, unsigned char *in, u32 offset)
{
      u32 addr;
      u32 data;
      u32 i;
      unsigned char *p;

      i = atoh(&in[1], 2);
      addr = offset + atoh(&in[3], 4);
      if (SEND_SMEM(cif, 0, addr) != 0)
            return -EACCES;
      p = in + 9;
      while (i) {
            data = atoh(p, 8);
            if (SEND_WMEM(cif, 2,
                        ((data & 0x0f0f0f0f) << 4) | ((data & 0xf0f0f0f0) >> 4)))
                  return -EACCES;
            i -= 4;
            p += 8;
      }
      return 0;
}

static int loadfirmware(cmdif_t * cif, unsigned char *img, unsigned int size)
{
      unsigned char *in;
      u32 laddr, saddr, t, val;
      int err = 0;

      laddr = saddr = 0;
      while (size > 0 && err == 0) {
            in = img;
            if (in[0] == ':') {
                  t = atoh(&in[7], 2);
                  switch (t) {
                  case DATA_REC:
                        err = senddata(cif, in, laddr + saddr);
                        break;
                  case EXT_SEG_ADDR_REC:
                        saddr = atoh(&in[9], 4) << 4;
                        break;
                  case EXT_LIN_ADDR_REC:
                        laddr = atoh(&in[9], 4) << 16;
                        break;
                  case EXT_GOTO_CMD_REC:
                        val = atoh(&in[9], 8);
                        if (SEND_GOTO(cif, val) != 0)
                              err = -EACCES;
                        break;
                  case EXT_END_OF_FILE:
                        size = 0;
                        break;
                  default:
                        break;
                  }
                  while (size > 0) {
                        size--;
                        if (*img++ == '\n')
                              break;
                  }
            }
      }
      snd_printdd("load firmware return %d\n", err);
      return err;
}

static void
alloclbuspath(cmdif_t * cif, unsigned char source,
            unsigned char *path, unsigned char *mixer, unsigned char *s)
{
      while (*path != 0xff) {
            unsigned char sink, type;

            sink = *path & (~SPLIT_PATH);
            if (sink != E2SINK_MAX) {
                  snd_printdd("alloc path 0x%x->0x%x\n", source, sink);
                  SEND_PSEL(cif, source, sink);
                  source = lbusin2out[sink][0];
                  type = lbusin2out[sink][1];
                  if (type == LS_MIXER_IN) {
                        if (mixer)
                              *mixer = sink - DIGITAL_MIXER_IN0;
                  }
                  if (type == LS_SRC_DECIMATORM ||
                      type == LS_SRC_DECIMATOR ||
                      type == LS_SRC_INTERPOLATORM ||
                      type == LS_SRC_INTERPOLATOR) {
                        if (s) {
                              if (s[0] != 0xff)
                                    s[1] = sink;
                              else
                                    s[0] = sink;
                        }
                  }
            }
            if (*path++ & SPLIT_PATH) {
                  unsigned char *npath = path;

                  while (*npath != 0xff)
                        npath++;
                  alloclbuspath(cif, source + 1, ++npath, mixer, s);
            }
      }
}

static void
freelbuspath(cmdif_t * cif, unsigned char source, unsigned char *path)
{
      while (*path != 0xff) {
            unsigned char sink;

            sink = *path & (~SPLIT_PATH);
            if (sink != E2SINK_MAX) {
                  snd_printdd("free path 0x%x->0x%x\n", source, sink);
                  SEND_PCLR(cif, source, sink);
                  source = lbusin2out[sink][0];
            }
            if (*path++ & SPLIT_PATH) {
                  unsigned char *npath = path;

                  while (*npath != 0xff)
                        npath++;
                  freelbuspath(cif, source + 1, ++npath);
            }
      }
}

static int writearm(cmdif_t * cif, u32 addr, u32 data, u32 mask)
{
      cmdret_t rptr = { {(u32) 0, (u32) 0} };
      unsigned int i = MAX_WRITE_RETRY;
      int flag = 1;

      SEND_RMEM(cif, 0x02, addr, &rptr);
      rptr.retlongs[0] &= (~mask);

      while (--i) {
            SEND_SMEM(cif, 0x01, addr);
            SEND_WMEM(cif, 0x02, (rptr.retlongs[0] | data));
            SEND_RMEM(cif, 0x02, addr, &rptr);
            if ((rptr.retlongs[0] & data) == data) {
                  flag = 0;
                  break;
            } else
                  rptr.retlongs[0] &= ~mask;
      }
      snd_printdd("send arm 0x%x 0x%x 0x%x return %d\n", addr, data, mask, flag);
      return flag;
}

static int sendcmd(cmdif_t * cif, u32 flags, u32 cmd, u32 parm, cmdret_t * ret)
{
      int i, j;
      int err;
      unsigned int time;
      unsigned long irqflags;
      riptideport_t *hwport;
      cmdport_t *cmdport = NULL;

      snd_assert(cif, return -EINVAL);

      hwport = cif->hwport;
      if (cif->errcnt > MAX_ERROR_COUNT) {
            if (cif->is_reset == TRUE) {
                  snd_printk(KERN_ERR "Riptide: Too many failed cmds, reinitializing\n");
                  if (riptide_reset(cif, NULL) == 0) {
                        cif->errcnt = 0;
                        return -EIO;
                  }
            }
            return -EINVAL;
      }
      if (ret) {
            ret->retlongs[0] = 0;
            ret->retlongs[1] = 0;
      }
      i = 0;
      spin_lock_irqsave(&cif->lock, irqflags);
      while (i++ < CMDIF_TIMEOUT && !IS_READY(cif->hwport))
            udelay(10);
      if (i < CMDIF_TIMEOUT) {
            err = 0;
            for (j = 0, time = 0; time < CMDIF_TIMEOUT; j++, time += 2) {
                  cmdport = &(hwport->port[j % 2]);
                  if (IS_CMDE(cmdport)) {
                        if (flags & PARM)
                              WRITE_PORT_ULONG(cmdport->data2, parm);
                        WRITE_PORT_ULONG(cmdport->data1, cmd);
                        if ((flags & RESP) && ret) {
                              while (!IS_DATF(cmdport) &&
                                     time++ < CMDIF_TIMEOUT)
                                    udelay(10);
                              if (time < CMDIF_TIMEOUT) {
                                    ret->retlongs[0] =
                                        READ_PORT_ULONG(cmdport->data1);
                                    ret->retlongs[1] =
                                        READ_PORT_ULONG(cmdport->data2);
                              } else
                                    err = -ENOSYS;
                        }
                        break;
                  }
                  udelay(20);
            }
            if (time == CMDIF_TIMEOUT)
                  err = -ENODATA;
      } else
            err = -EBUSY;

      if (! err) {
            cif->cmdcnt++;
            cif->cmdtime += time;
            if (time > cif->cmdtimemax)
                  cif->cmdtimemax = time;
            if (time < cif->cmdtimemin)
                  cif->cmdtimemin = time;
      } else {
            cif->errcnt++;
            snd_printdd("send cmd %d hw: 0x%x flag: 0x%x cmd: 0x%x parm: 0x%x ret: 0x%x 0x%x failed %d\n",
                      cif->cmdcnt,
                      (int)((void *)&(cmdport->stat) - (void *)hwport), flags,
                      cmd, parm, ret ? ret->retlongs[0] : 0,
                      ret ? ret->retlongs[1] : 0, err);
      }
      spin_unlock_irqrestore(&cif->lock, irqflags);
      return err;
}

static int
setmixer(cmdif_t * cif, short num, unsigned short rval, unsigned short lval)
{
      cmdret_t rptr = { {(u32) 0, (u32) 0} };
      int i = 0;

      snd_printdd("sent mixer %d: 0x%d 0x%d\n", num, rval, lval);
      do {
            SEND_SDGV(cif, num, num, rval, lval);
            SEND_RDGV(cif, num, num, &rptr);
            if (rptr.retwords[0] == lval && rptr.retwords[1] == rval)
                  return 0;
      } while (i++ < MAX_WRITE_RETRY);
      snd_printdd("sent mixer failed\n");
      return -EIO;
}

static int getpaths(cmdif_t * cif, unsigned char *o)
{
      unsigned char src[E2SINK_MAX];
      unsigned char sink[E2SINK_MAX];
      int i, j = 0;

      for (i = 0; i < E2SINK_MAX; i++) {
            getsourcesink(cif, i, i, &src[i], &sink[i]);
            if (sink[i] < E2SINK_MAX) {
                  o[j++] = sink[i];
                  o[j++] = i;
            }
      }
      return j;
}

static int
getsourcesink(cmdif_t * cif, unsigned char source, unsigned char sink,
            unsigned char *a, unsigned char *b)
{
      cmdret_t rptr = { {(u32) 0, (u32) 0} };

      if (SEND_RSSV(cif, source, sink, &rptr) &&
          SEND_RSSV(cif, source, sink, &rptr))
            return -EIO;
      *a = rptr.retbytes[0];
      *b = rptr.retbytes[1];
      snd_printdd("getsourcesink 0x%x 0x%x\n", *a, *b);
      return 0;
}

static int
getsamplerate(cmdif_t * cif, unsigned char *intdec, unsigned int *rate)
{
      unsigned char *s;
      unsigned int p[2] = { 0, 0 };
      int i;
      cmdret_t rptr = { {(u32) 0, (u32) 0} };

      s = intdec;
      for (i = 0; i < 2; i++) {
            if (*s != 0xff) {
                  if (SEND_RSRC(cif, *s, &rptr) &&
                      SEND_RSRC(cif, *s, &rptr))
                        return -EIO;
                  p[i] += rptr.retwords[1];
                  p[i] *= rptr.retwords[2];
                  p[i] += rptr.retwords[3];
                  p[i] /= 65536;
            }
            s++;
      }
      if (p[0]) {
            if (p[1] != p[0])
                  snd_printdd("rates differ %d %d\n", p[0], p[1]);
            *rate = (unsigned int)p[0];
      } else
            *rate = (unsigned int)p[1];
      snd_printdd("getsampleformat %d %d %d\n", intdec[0], intdec[1], *rate);
      return 0;
}

static int
setsampleformat(cmdif_t * cif,
            unsigned char mixer, unsigned char id,
            unsigned char channels, unsigned char format)
{
      unsigned char w, ch, sig, order;

      snd_printdd("setsampleformat mixer: %d id: %d channels: %d format: %d\n",
                mixer, id, channels, format);
      ch = channels == 1;
      w = snd_pcm_format_width(format) == 8;
      sig = snd_pcm_format_unsigned(format) != 0;
      order = snd_pcm_format_big_endian(format) != 0;

      if (SEND_SETF(cif, mixer, w, ch, order, sig, id) &&
          SEND_SETF(cif, mixer, w, ch, order, sig, id)) {
            snd_printdd("setsampleformat failed\n");
            return -EIO;
      }
      return 0;
}

static int
setsamplerate(cmdif_t * cif, unsigned char *intdec, unsigned int rate)
{
      u32 D, M, N;
      cmdret_t rptr = { {(u32) 0, (u32) 0} };
      int i;

      snd_printdd("setsamplerate intdec: %d,%d rate: %d\n", intdec[0],
               intdec[1], rate);
      D = 48000;
      M = ((rate == 48000) ? 47999 : rate) * 65536;
      N = M % D;
      M /= D;
      for (i = 0; i < 2; i++) {
            if (*intdec != 0xff) {
                  do {
                        SEND_SSRC(cif, *intdec, D, M, N);
                        SEND_RSRC(cif, *intdec, &rptr);
                  } while (rptr.retwords[1] != D &&
                         rptr.retwords[2] != M &&
                         rptr.retwords[3] != N &&
                         i++ < MAX_WRITE_RETRY);
                  if (i == MAX_WRITE_RETRY) {
                        snd_printdd("sent samplerate %d: %d failed\n",
                                  *intdec, rate);
                        return -EIO;
                  }
            }
            intdec++;
      }
      return 0;
}

static int
getmixer(cmdif_t * cif, short num, unsigned short *rval, unsigned short *lval)
{
      cmdret_t rptr = { {(u32) 0, (u32) 0} };

      if (SEND_RDGV(cif, num, num, &rptr) &&
          SEND_RDGV(cif, num, num, &rptr))
            return -EIO;
      *rval = rptr.retwords[0];
      *lval = rptr.retwords[1];
      snd_printdd("got mixer %d: 0x%d 0x%d\n", num, *rval, *lval);
      return 0;
}

static void riptide_handleirq(unsigned long dev_id)
{
      riptide_t *chip = (void *)dev_id;
      cmdif_t *cif = chip->cif;
      snd_pcm_substream_t *substream[PLAYBACK_SUBSTREAMS + 1];
      snd_pcm_runtime_t *runtime;
      pcmhw_t *data = NULL;
      unsigned int pos, period_bytes;
      sgd_t *c;
      int i, j;
      unsigned int flag;

      if (! cif)
            return;

      for (i = 0; i < PLAYBACK_SUBSTREAMS; i++)
            substream[i] = chip->playback_substream[i];
      substream[i] = chip->capture_substream;
      for (i = 0; i < PLAYBACK_SUBSTREAMS + 1; i++) {
            if (substream[i] &&
                (runtime = substream[i]->runtime) &&
                (data = runtime->private_data) &&
                data->state != ST_STOP) {
                  pos = 0;
                  for (j = 0; j < data->pages; j++) {
                        c = &((sgd_t *) (data->sgdlist.area))[j];
                        flag = c->dwStat_Ctl;
                        if (flag & EOB_STATUS)
                              pos += c->dwSegLen;
                        if (flag & EOC_STATUS)
                              pos += c->dwSegLen;
                        if ((flag & EOS_STATUS)
                            && (data->state == ST_PLAY)) {
                              data->state = ST_STOP;
                              snd_printk(KERN_ERR "Riptide: DMA stopped unexpectedly\n");
                        }
                        c->dwStat_Ctl = flag & ~(EOS_STATUS | EOB_STATUS | EOC_STATUS);
                  }
                  data->pointer += pos;
                  pos += data->oldpos;
                  if (data->state != ST_STOP) {
                        period_bytes = frames_to_bytes(runtime, runtime->period_size);
                        snd_printdd("interrupt 0x%x after 0x%lx of 0x%lx frames in period\n",
                                 READ_AUDIO_STATUS(cif->hwport),
                                 bytes_to_frames(runtime, pos),
                                 runtime->period_size);
                        j = 0;
                        if (pos >= period_bytes) {
                              j++;
                              while (pos >= period_bytes)
                                    pos -= period_bytes;
                        }
                        data->oldpos = pos;
                        if (j > 0)
                              snd_pcm_period_elapsed(substream[i]);
                  }
            }
      }
}

#ifdef CONFIG_PM
static int riptide_suspend(snd_card_t *card, pm_message_t state)
{
      riptide_t *chip = card->pm_private_data;

      chip->in_suspend = 1;
      if (chip->pcm)
            snd_pcm_suspend_all(chip->pcm);
      if (chip->ac97)
            snd_ac97_suspend(chip->ac97);
      pci_set_power_state(chip->pci, PCI_D3hot);
      pci_disable_device(chip->pci);
      return 0;
}

static int riptide_resume(snd_card_t *card)
{
      riptide_t *chip = card->pm_private_data;

      pci_enable_device(chip->pci);
      pci_set_power_state(chip->pci, PCI_D0);
      pci_set_master(chip->pci);
      snd_riptide_initialize(chip);

      if (chip->ac97)
            snd_ac97_resume(chip->ac97);
      chip->in_suspend = 0;
      return 0;
}
#endif

static int riptide_reset(cmdif_t * cif, riptide_t * chip)
{
      int timeout;
      cmdret_t rptr = { {(u32) 0, (u32) 0} };
      int err;

      if (!(cif))
            return -EINVAL;

      cif->cmdcnt = 0;
      cif->cmdtime = 0;
      cif->cmdtimemax = 0;
      cif->cmdtimemin = 0xffffffff;
      cif->errcnt = 0;
      cif->is_reset = FALSE;

      WRITE_PORT_ULONG(cif->hwport->port[0].data1, 0);
      WRITE_PORT_ULONG(cif->hwport->port[0].data2, 0);
      WRITE_PORT_ULONG(cif->hwport->port[1].data1, 0);
      WRITE_PORT_ULONG(cif->hwport->port[1].data2, 0);
      SET_GRESET(cif->hwport);
      udelay(100);
      UNSET_GRESET(cif->hwport);
      udelay(100);

      for (timeout = 100000; --timeout; udelay(10)) {
            if (IS_READY(cif->hwport) && !IS_GERR(cif->hwport))
                  break;
      }
      snd_printdd("Audio status 0x%x\n", READ_AUDIO_STATUS(cif->hwport));
      SEND_GETV(cif, &rptr);
      snd_printdd("Version before firmware upload: ASIC: %d CODEC %d AUXDSP %d PROG %d\n",
                rptr.retwords[0], rptr.retwords[1], rptr.retwords[2],
                rptr.retwords[3]);

      if (chip != NULL &&
          rptr.retwords[0] && rptr.retwords[1] &&
          rptr.retwords[2] && rptr.retwords[3]) {
            snd_printdd("Writing Firmware\n");
            if (! chip->fw_entry) {
                  if ((err = request_firmware(&chip->fw_entry, "riptide.hex",
#if LINUX_VERSION_CODE >= KERNEL_VERSION(2, 6, 0)
                                        &chip->pci->dev
#else
                                        "riptide"
#endif
                                        )) != 0) {
                        snd_printk(KERN_ERR "Riptide: Firmware not available %d\n", err);
                        return -EIO;
                  }
            }
            err = loadfirmware(cif, chip->fw_entry->data, chip->fw_entry->size);
            if (err)
                  snd_printk(KERN_ERR "Riptide: Could not load firmware %d\n", err);
      }

      for (timeout = 100000; --timeout; udelay(10)) {
            if (IS_READY(cif->hwport) && !IS_GERR(cif->hwport))
                  break;
      }
      if (timeout == 0) {
            snd_printk(KERN_ERR "Riptide: audio status 0x%x %d %d\n",
                     READ_AUDIO_STATUS(cif->hwport),
                     IS_READY(cif->hwport), IS_GERR(cif->hwport));
            return -EIO;
      }
      SEND_GETV(cif, &rptr);
      for (timeout = 100; --timeout;) {
            if (rptr.retwords[0] || rptr.retwords[1] ||
                rptr.retwords[2] || rptr.retwords[3])
                  break;
            udelay(10);
            SEND_GETV(cif, &rptr);
      }
      snd_printdd(KERN_INFO "Riptide: version after firmware upload: ASIC: %d CODEC %d AUXDSP %d PROG %d (delay %d)\n",
                rptr.retwords[0], rptr.retwords[1], rptr.retwords[2],
                rptr.retwords[3], timeout);
      if (! (rptr.retwords[0] || rptr.retwords[1] ||
             rptr.retwords[2] || rptr.retwords[3])) {
            snd_printk(KERN_ERR "Riptide: no firmware version?\n");
            return -EIO;
      }

      SEND_SACR(cif, 0, AC97_RESET);
      SEND_RACR(cif, AC97_RESET, &rptr);
      snd_printdd("AC97: 0x%x 0x%x\n", rptr.retlongs[0], rptr.retlongs[1]);
      SEND_PLST(cif, 0);
      SEND_SLST(cif, 0);
      SEND_DLST(cif, 0);
      SEND_ALST(cif, 0);
      SEND_KDMA(cif);

      writearm(cif, 0x301F8, 1, 1);
      writearm(cif, 0x301F4, 1, 1);

      SEND_LSEL(cif, MODEM_CMD, 0, 0, MODEM_INTDEC, MODEM_MERGER,
              MODEM_SPLITTER, MODEM_MIXER);
      setmixer(cif, MODEM_MIXER, 0x7fff, 0x7fff);
      alloclbuspath(cif, ARM2LBUS_FIFO13, lbus_play_modem, NULL, NULL);

      SEND_LSEL(cif, FM_CMD, 0, 0, FM_INTDEC, FM_MERGER, FM_SPLITTER,
              FM_MIXER);
      setmixer(cif, FM_MIXER, 0x7fff, 0x7fff);
      writearm(cif, 0x30648 + FM_MIXER * 4, 0x01, 0x00000005);
      writearm(cif, 0x301A8, 0x02, 0x00000002);
      writearm(cif, 0x30264, 0x08, 0xffffffff);
      alloclbuspath(cif, OPL3_SAMPLE, lbus_play_opl3, NULL, NULL);

      SEND_SSRC(cif, I2S_INTDEC, 48000,
              ((u32) I2S_RATE * 65536) / 48000,
              ((u32) I2S_RATE * 65536) % 48000);
      SEND_LSEL(cif, I2S_CMD0, 0, 0, I2S_INTDEC, I2S_MERGER, I2S_SPLITTER,
              I2S_MIXER);
      SEND_SI2S(cif, 1);
      alloclbuspath(cif, ARM2LBUS_FIFO0, lbus_play_i2s, NULL, NULL);
      alloclbuspath(cif, DIGITAL_MIXER_OUT0, lbus_play_out, NULL, NULL);
      alloclbuspath(cif, DIGITAL_MIXER_OUT0, lbus_play_outhp, NULL, NULL);

      SET_AIACK(cif->hwport);
      SET_AIE(cif->hwport);
      SET_AIACK(cif->hwport);
      cif->is_reset = TRUE;

      return 0;
}


static snd_pcm_hardware_t snd_riptide_playback = {
      .info = (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
             SNDRV_PCM_INFO_BLOCK_TRANSFER |
             SNDRV_PCM_INFO_PAUSE | SNDRV_PCM_INFO_MMAP_VALID),
      .formats =
          SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S8
          | SNDRV_PCM_FMTBIT_U16_LE,
      .rates = SNDRV_PCM_RATE_KNOT | SNDRV_PCM_RATE_8000_48000,
      .rate_min = 5500,
      .rate_max = 48000,
      .channels_min = 1,
      .channels_max = 2,
      .buffer_bytes_max = (64 * 1024),
      .period_bytes_min = PAGE_SIZE >> 1,
      .period_bytes_max = PAGE_SIZE << 8,
      .periods_min = 2,
      .periods_max = 64,
      .fifo_size = 0,
};
static snd_pcm_hardware_t snd_riptide_capture = {
      .info = (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
             SNDRV_PCM_INFO_BLOCK_TRANSFER |
             SNDRV_PCM_INFO_PAUSE | SNDRV_PCM_INFO_MMAP_VALID),
      .formats =
          SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S8
          | SNDRV_PCM_FMTBIT_U16_LE,
      .rates = SNDRV_PCM_RATE_KNOT | SNDRV_PCM_RATE_8000_48000,
      .rate_min = 5500,
      .rate_max = 48000,
      .channels_min = 1,
      .channels_max = 2,
      .buffer_bytes_max = (64 * 1024),
      .period_bytes_min = PAGE_SIZE >> 1,
      .period_bytes_max = PAGE_SIZE << 3,
      .periods_min = 2,
      .periods_max = 64,
      .fifo_size = 0,
};


static snd_pcm_uframes_t snd_riptide_pointer(snd_pcm_substream_t * substream)
{
      riptide_t *chip = snd_pcm_substream_chip(substream);
      snd_pcm_runtime_t *runtime = substream->runtime;
      pcmhw_t *data = get_pcmhwdev(substream);
      cmdif_t *cif = chip->cif;
      cmdret_t rptr = { {(u32) 0, (u32) 0} };
      snd_pcm_uframes_t ret;

      SEND_GPOS(cif, 0, data->id, &rptr);
      if (data->size && runtime->period_size) {
            snd_printdd("pointer stream %d position 0x%x(0x%x in buffer) bytes 0x%lx(0x%lx in period) frames\n",
                     data->id, rptr.retlongs[1], rptr.retlongs[1] % data->size,
                     bytes_to_frames(runtime, rptr.retlongs[1]),
                     bytes_to_frames(runtime,
                                 rptr.retlongs[1]) % runtime->period_size);
            if (rptr.retlongs[1] > data->pointer)
                  ret = bytes_to_frames(runtime, rptr.retlongs[1] % data->size);
            else
                  ret = bytes_to_frames(runtime, data->pointer % data->size);
      } else {
            snd_printdd("stream not started or strange parms (%d %ld)\n",
                      data->size, runtime->period_size);
            ret = bytes_to_frames(runtime, 0);
      }
      return ret;
}

static int snd_riptide_trigger(snd_pcm_substream_t * substream, int cmd)
{
      int i, j;
      riptide_t *chip = snd_pcm_substream_chip(substream);
      pcmhw_t *data = get_pcmhwdev(substream);
      cmdif_t *cif = chip->cif;
      cmdret_t rptr = { {(u32) 0, (u32) 0} };

      spin_lock(&chip->lock);
      switch (cmd) {
      case SNDRV_PCM_TRIGGER_START:
      case SNDRV_PCM_TRIGGER_RESUME:
            if (!(data->state & ST_PLAY)) {
                  SEND_SSTR(cif, data->id, data->sgdlist.addr);
                  SET_AIE(cif->hwport);
                  data->state = ST_PLAY;
                  if (data->mixer != 0xff)
                        setmixer(cif, data->mixer, 0x7fff, 0x7fff);
                  chip->openstreams++;
                  data->oldpos = 0;
                  data->pointer = 0;
            }
            break;
      case SNDRV_PCM_TRIGGER_STOP:
      case SNDRV_PCM_TRIGGER_SUSPEND:
            if (data->mixer != 0xff)
                  setmixer(cif, data->mixer, 0, 0);
            setmixer(cif, data->mixer, 0, 0);
            SEND_KSTR(cif, data->id);
            data->state = ST_STOP;
            chip->openstreams--;
            j = 0;
            do {
                  i = rptr.retlongs[1];
                  SEND_GPOS(cif, 0, data->id, &rptr);
                  udelay(1);
            } while (i != rptr.retlongs[1] && j++ < MAX_WRITE_RETRY);
            if (j >= MAX_WRITE_RETRY)
                  snd_printk(KERN_ERR "Riptide: Could not stop stream!");
            break;
      case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
            if (!(data->state & ST_PAUSE)) {
                  SEND_PSTR(cif, data->id);
                  data->state |= ST_PAUSE;
                  chip->openstreams--;
            }
            break;
      case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
            if (data->state & ST_PAUSE) {
                  SEND_SSTR(cif, data->id, data->sgdlist.addr);
                  data->state &= ~ST_PAUSE;
                  chip->openstreams++;
            }
            break;
      default:
            spin_unlock(&chip->lock);
            return -EINVAL;
      }
      spin_unlock(&chip->lock);
      return 0;
}

static int snd_riptide_prepare(snd_pcm_substream_t * substream)
{
      riptide_t *chip = snd_pcm_substream_chip(substream);
      snd_pcm_runtime_t *runtime = substream->runtime;
      snd_pcm_sgbuf_t *sgbuf = snd_pcm_substream_sgbuf(substream);
      pcmhw_t *data = get_pcmhwdev(substream);
      cmdif_t *cif = chip->cif;
      unsigned char *lbuspath = NULL;
      unsigned int rate, channels;
      int err = -EINVAL;
      snd_pcm_format_t format;

      snd_assert(cif && data, return -EINVAL);

      snd_printdd("prepare id %d ch: %d f:0x%x r:%d\n", data->id,
                runtime->channels, runtime->format, runtime->rate);

      spin_lock_irq(&chip->lock);
      channels = runtime->channels;
      format = runtime->format;
      rate = runtime->rate;
      switch (channels) {
      case 1:
            if (rate == 48000 && format == SNDRV_PCM_FORMAT_S16_LE)
                  lbuspath = data->paths.noconv;
            else
                  lbuspath = data->paths.mono;
            break;
      case 2:
            if (rate == 48000 && format == SNDRV_PCM_FORMAT_S16_LE)
                  lbuspath = data->paths.noconv;
            else
                  lbuspath = data->paths.stereo;
            break;
      }
      snd_printdd("use sgdlist at 0x%p and buffer at 0x%p\n",
                data->sgdlist.area, sgbuf);
      if (data->sgdlist.area && sgbuf) {
            unsigned int i, j, size, pages, f, pt, period;
            sgd_t *c, *p = NULL;

            size = frames_to_bytes(runtime, runtime->buffer_size);
            period = frames_to_bytes(runtime, runtime->period_size);
            f = PAGE_SIZE;
            while ((size + (f >> 1) - 1) <= (f << 7) &&
                   (f << 1) > period)
                  f = f >> 1;
            pages = (size + f - 1) / f;
            data->size = size;
            data->pages = pages;
            snd_printdd("create sgd size: 0x%x pages %d of size 0x%x for period 0x%x\n",
                      size, pages, f, period);
            pt = 0;
            j = 0;
            for (i = 0; i < pages; i++) {
                  c = &(((sgd_t *) (data->sgdlist.area))[i]);
                  if (p)
                        p->dwNextLink = data->sgdlist.addr +
                              (i * sizeof(sgd_t));
                  c->dwNextLink = data->sgdlist.addr;
                  c->dwSegPtrPhys = sgbuf->table[j].addr + pt;
                  pt = (pt + f) % PAGE_SIZE;
                  if (pt == 0)
                        j++;
                  c->dwSegLen = f;
                  c->dwStat_Ctl = IEOB_ENABLE | IEOS_ENABLE | IEOC_ENABLE;
                  p = c;
                  size -= f;
            }
            ((sgd_t *) (data->sgdlist.area))[i].dwSegLen = size;
      }
      if (lbuspath && lbuspath != data->lbuspath) {
            if (data->lbuspath)
                  freelbuspath(cif, data->source, data->lbuspath);
            alloclbuspath(cif, data->source, lbuspath,
                        &data->mixer, data->intdec);
            data->lbuspath = lbuspath;
            data->rate = 0;
      }
      if (data->rate != rate || data->format != format ||
          data->channels != channels) {
            data->rate = rate;
            data->format = format;
            data->channels = channels;
            if (setsampleformat(cif, data->mixer, data->id, channels, format) ||
                setsamplerate(cif, data->intdec, rate))
                  err = -EIO;
      }
      spin_unlock_irq(&chip->lock);
      return err;
}

static int
snd_riptide_hw_params(snd_pcm_substream_t * substream,
                  snd_pcm_hw_params_t * hw_params)
{
      riptide_t *chip = snd_pcm_substream_chip(substream);
      pcmhw_t *data = get_pcmhwdev(substream);
      struct snd_dma_buffer *sgdlist = &data->sgdlist;
      int err;

      snd_printdd("hw params id %d (sgdlist: 0x%p 0x%lx %d)\n", data->id,
                sgdlist->area, (unsigned long)sgdlist->addr, (int)sgdlist->bytes);
      if (sgdlist->area)
            snd_dma_free_pages(sgdlist);
      if ((err = snd_dma_alloc_pages(SNDRV_DMA_TYPE_DEV,
                               snd_dma_pci_data(chip->pci),
                               sizeof(sgd_t) * (DESC_MAX_MASK + 1),
                               sgdlist)) < 0) {
            snd_printk(KERN_ERR "Riptide: failed to alloc %d dma bytes\n",
                     (int)sizeof(sgd_t) * (DESC_MAX_MASK + 1));
            return err;
      }
      return snd_pcm_lib_malloc_pages(substream,
                              params_buffer_bytes(hw_params));
}

static int snd_riptide_hw_free(snd_pcm_substream_t * substream)
{
      riptide_t *chip = snd_pcm_substream_chip(substream);
      pcmhw_t *data = get_pcmhwdev(substream);
      cmdif_t *cif = chip->cif;

      if (cif && data) {
            if (data->lbuspath)
                  freelbuspath(cif, data->source, data->lbuspath);
            data->lbuspath = NULL;
            data->source = 0xff;
            data->intdec[0] = 0xff;
            data->intdec[1] = 0xff;
      }
      if (data->sgdlist.area) {
            snd_dma_free_pages(&data->sgdlist);
            data->sgdlist.area = NULL;
      }
      return snd_pcm_lib_free_pages(substream);
}

static int snd_riptide_playback_open(snd_pcm_substream_t * substream)
{
      riptide_t *chip = snd_pcm_substream_chip(substream);
      snd_pcm_runtime_t *runtime = substream->runtime;
      pcmhw_t *data;
      int index = substream->number;

      chip->playback_substream[index] = substream;
      runtime->hw = snd_riptide_playback;
      data = kzalloc(sizeof(pcmhw_t), GFP_KERNEL);
      data->paths = lbus_play_paths[index];
      data->id = play_ids[index];
      data->source = play_sources[index];
      data->intdec[0] = 0xff;
      data->intdec[1] = 0xff;
      data->state = ST_STOP;
      runtime->private_data = data;
      return snd_pcm_hw_constraint_integer(runtime, SNDRV_PCM_HW_PARAM_PERIODS);
}

static int snd_riptide_capture_open(snd_pcm_substream_t * substream)
{
      riptide_t *chip = snd_pcm_substream_chip(substream);
      snd_pcm_runtime_t *runtime = substream->runtime;
      pcmhw_t *data;

      chip->capture_substream = substream;
      runtime->hw = snd_riptide_capture;
      data = kzalloc(sizeof(pcmhw_t), GFP_KERNEL);
      data->paths = lbus_rec_path;
      data->id = PADC;
      data->source = ACLNK2PADC;
      data->intdec[0] = 0xff;
      data->intdec[1] = 0xff;
      data->state = ST_STOP;
      runtime->private_data = data;
      return snd_pcm_hw_constraint_integer(runtime, SNDRV_PCM_HW_PARAM_PERIODS);
}

static int snd_riptide_playback_close(snd_pcm_substream_t * substream)
{
      riptide_t *chip = snd_pcm_substream_chip(substream);
      pcmhw_t *data = get_pcmhwdev(substream);
      int index = substream->number;

      substream->runtime->private_data = NULL;
      chip->playback_substream[index] = NULL;
      kfree(data);
      return 0;
}

static int snd_riptide_capture_close(snd_pcm_substream_t * substream)
{
      riptide_t *chip = snd_pcm_substream_chip(substream);
      pcmhw_t *data = get_pcmhwdev(substream);

      substream->runtime->private_data = NULL;
      chip->capture_substream = NULL;
      kfree(data);
      return 0;
}

static snd_pcm_ops_t snd_riptide_playback_ops = {
      .open = snd_riptide_playback_open,
      .close = snd_riptide_playback_close,
      .ioctl = snd_pcm_lib_ioctl,
      .hw_params = snd_riptide_hw_params,
      .hw_free = snd_riptide_hw_free,
      .prepare = snd_riptide_prepare,
      .page = snd_pcm_sgbuf_ops_page,
      .trigger = snd_riptide_trigger,
      .pointer = snd_riptide_pointer,
};
static snd_pcm_ops_t snd_riptide_capture_ops = {
      .open = snd_riptide_capture_open,
      .close = snd_riptide_capture_close,
      .ioctl = snd_pcm_lib_ioctl,
      .hw_params = snd_riptide_hw_params,
      .hw_free = snd_riptide_hw_free,
      .prepare = snd_riptide_prepare,
      .page = snd_pcm_sgbuf_ops_page,
      .trigger = snd_riptide_trigger,
      .pointer = snd_riptide_pointer,
};

static void snd_riptide_pcm_free(snd_pcm_t * pcm)
{
      riptide_t *chip = pcm->private_data;

      chip->pcm = NULL;
      snd_pcm_lib_preallocate_free_for_all(pcm);
}

static int __devinit
snd_riptide_pcm(riptide_t * chip, int device, snd_pcm_t ** rpcm)
{
      snd_pcm_t *pcm;
      int err;

      if (rpcm)
            *rpcm = NULL;
      if ((err = snd_pcm_new(chip->card, "RIPTIDE", device, PLAYBACK_SUBSTREAMS, 1,
                         &pcm)) < 0)
            return err;
      snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK,
                  &snd_riptide_playback_ops);
      snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE,
                  &snd_riptide_capture_ops);
      pcm->private_data = chip;
      pcm->private_free = snd_riptide_pcm_free;
      pcm->info_flags = 0;
      strcpy(pcm->name, "RIPTIDE");
      chip->pcm = pcm;
      snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV_SG,
                                    snd_dma_pci_data(chip->pci),
                                    64 * 1024, 128 * 1024);
      if (rpcm)
            *rpcm = pcm;
      return 0;
}

static irqreturn_t
snd_riptide_interrupt(int irq, void *dev_id, struct pt_regs *regs)
{
      riptide_t *chip = dev_id;
      cmdif_t *cif = chip->cif;

      if (cif) {
            chip->received_irqs++;
            if (IS_EOBIRQ(cif->hwport) || IS_EOSIRQ(cif->hwport) ||
                IS_EOCIRQ(cif->hwport)) {
                  chip->handled_irqs++;
                  tasklet_hi_schedule(&chip->riptide_tq);
            }
            if (chip->rmidi && IS_MPUIRQ(cif->hwport)) {
                  chip->handled_irqs++;
                  snd_mpu401_uart_interrupt(irq, chip->rmidi->private_data, regs);
            }
            SET_AIACK(cif->hwport);
      }
      return IRQ_HANDLED;
}

static void
snd_riptide_codec_write(ac97_t * ac97, unsigned short reg, unsigned short val)
{
      riptide_t *chip = ac97->private_data;
      cmdif_t *cif = chip->cif;
      cmdret_t rptr = { {(u32) 0, (u32) 0} };
      int i = 0;

      snd_assert(cif, return);
      snd_printdd("Write AC97 reg 0x%x 0x%x\n", reg, val);
      do {
            SEND_SACR(cif, val, reg);
            SEND_RACR(cif, reg, &rptr);
      } while (rptr.retwords[1] != val && i++ < MAX_WRITE_RETRY);
      if (i == MAX_WRITE_RETRY)
            snd_printdd("Write AC97 reg failed\n");
}

static unsigned short snd_riptide_codec_read(ac97_t * ac97, unsigned short reg)
{
      riptide_t *chip = ac97->private_data;
      cmdif_t *cif = chip->cif;
      cmdret_t rptr = { {(u32) 0, (u32) 0} };

      snd_assert(cif, return 0);

      if (SEND_RACR(cif, reg, &rptr) != 0)
            SEND_RACR(cif, reg, &rptr);
      snd_printdd("Read AC97 reg 0x%x got 0x%x\n", reg, rptr.retwords[1]);
      return rptr.retwords[1];
}

static int snd_riptide_initialize(riptide_t * chip)
{
      cmdif_t *cif;
      unsigned int device_id;
      int err;

      snd_assert(chip, return -EINVAL);

      cif = chip->cif;
      if (! cif) {
            if ((cif = kzalloc(sizeof(cmdif_t), GFP_KERNEL)) == NULL)
                  return -ENOMEM;
            cif->hwport = (riptideport_t *) chip->port;
            spin_lock_init(&cif->lock);
            chip->cif = cif;
      }
      cif->is_reset = FALSE;
      err = riptide_reset(cif, chip);
      device_id = chip->device_id;
      switch (device_id) {
      case 0x4310:
      case 0x4320:
      case 0x4330:
            snd_printdd("Modem enable?\n");
            SEND_SETDPLL(cif);
            break;
      }
      snd_printdd("Enabling MPU IRQs\n");
      if (chip->rmidi)
            SET_EMPUIRQ(cif->hwport);
      return err;
}

static int snd_riptide_free(riptide_t * chip)
{
      cmdif_t *cif;

      snd_assert(chip, return 0);

      if ((cif = chip->cif)) {
            SET_GRESET(cif->hwport);
            udelay(100);
            UNSET_GRESET(cif->hwport);
            kfree(chip->cif);
      }
      if (chip->fw_entry)
            release_firmware(chip->fw_entry);
      if (chip->res_port) {
            release_resource(chip->res_port);
            kfree_nocheck(chip->res_port);
      }
      if (chip->irq >= 0)
            free_irq(chip->irq, (void *)chip);
      kfree(chip);
      return 0;
}

static int snd_riptide_dev_free(snd_device_t * device)
{
      riptide_t *chip = device->device_data;

      return snd_riptide_free(chip);
}

static int __devinit
snd_riptide_create(snd_card_t * card, struct pci_dev *pci, riptide_t ** rchip)
{
      riptide_t *chip;
      riptideport_t *hwport;
      int err;
      static snd_device_ops_t ops = {
            .dev_free = snd_riptide_dev_free,
      };


      *rchip = NULL;
      if ((err = pci_enable_device(pci)) < 0)
            return err;
      chip = kzalloc(sizeof(riptide_t), GFP_KERNEL);
      if (chip == NULL)
            return -ENOMEM;

      spin_lock_init(&chip->lock);
      chip->card = card;
      chip->pci = pci;
      chip->irq = -1;
      chip->openstreams = 0;
      chip->port = pci_resource_start(pci, 0);
      chip->received_irqs = 0;
      chip->handled_irqs = 0;
      chip->cif = NULL;
      tasklet_init(&chip->riptide_tq, riptide_handleirq, (unsigned long)chip);

      if ((chip->res_port = request_region(chip->port, 64, "RIPTIDE")) == NULL) {
            snd_printk(KERN_ERR "Riptide: unable to grab region 0x%lx-0x%lx\n",
                     chip->port, chip->port + 64 - 1);
            snd_riptide_free(chip);
            return -EBUSY;
      }
      hwport = (riptideport_t *) chip->port;
      UNSET_AIE(hwport);

      if (request_irq(pci->irq, snd_riptide_interrupt, SA_INTERRUPT | SA_SHIRQ,
                  "RIPTIDE", (void *)chip)) {
            snd_printk(KERN_ERR "Riptide: unable to grab IRQ %d\n", pci->irq);
            snd_riptide_free(chip);
            return -EBUSY;
      }
      chip->irq = pci->irq;
      chip->device_id = pci->device;
      pci_set_master(pci);
      if ((err = snd_riptide_initialize(chip)) < 0) {
            snd_riptide_free(chip);
            return err;
      }

      snd_card_set_pm_callback(card, riptide_suspend, riptide_resume, chip);

      if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
            snd_riptide_free(chip);
            return err;
      }

      *rchip = chip;
      return 0;
}

static void
snd_riptide_proc_read(snd_info_entry_t * entry, snd_info_buffer_t * buffer)
{
      riptide_t *chip = entry->private_data;
      pcmhw_t *data;
      int i;
      cmdif_t *cif = NULL;
      cmdret_t rptr = { {(u32) 0, (u32) 0} };
      unsigned char p[256];
      unsigned short rval = 0, lval = 0;
      unsigned int rate;

      if (! chip)
            return;

      snd_iprintf(buffer, "%s\n\n", chip->card->longname);
      snd_iprintf(buffer, "Device ID: 0x%x\nReceived IRQs: (%ld)%ld\nPorts:",
                chip->device_id, chip->handled_irqs, chip->received_irqs);
      for (i = 0; i < 64; i += 4)
            snd_iprintf(buffer, "%c%02x: %08x",
                      (i % 16) ? ' ' : '\n', i,
                      inl(chip->port + i));
      if ((cif = chip->cif)) {
            i = SEND_GETV(cif, &rptr);
            snd_iprintf(buffer,
                      "\nVersion: %d ASIC: %d CODEC: %d AUXDSP: %d PROG: %d",
                      i, rptr.retwords[0], rptr.retwords[1],
                      rptr.retwords[2], rptr.retwords[3]);
            snd_iprintf(buffer, "\nDigital mixer:");
            for (i = 0; i < 12; i++) {
                  getmixer(cif, i, &rval, &lval);
                  snd_iprintf(buffer, "\n %d: %d %d", i, rval, lval);
            }
            snd_iprintf(buffer,
                      "\nARM Commands num: %d failed: %d time: %d max: %d min: %d",
                      cif->cmdcnt, cif->errcnt,
                      cif->cmdtime, cif->cmdtimemax,
                      cif->cmdtimemin);
      }
      snd_iprintf(buffer, "\nOpen streams %d:\n", chip->openstreams);
      for (i = 0; i < PLAYBACK_SUBSTREAMS; i++) {
            if (chip->playback_substream[i]
                && chip->playback_substream[i]->runtime
                && (data = chip->playback_substream[i]->runtime->private_data)) {
                  snd_iprintf(buffer,
                            "stream: %d mixer: %d source: %d (%d,%d)\n",
                            data->id, data->mixer, data->source,
                            data->intdec[0], data->intdec[1]);
                  if (!(getsamplerate(cif, data->intdec, &rate)))
                        snd_iprintf(buffer, "rate: %d\n", rate);
            }
      }
      if (chip->capture_substream
          && chip->capture_substream->runtime
          && (data = chip->capture_substream->runtime->private_data)) {
            snd_iprintf(buffer,
                      "stream: %d mixer: %d source: %d (%d,%d)\n",
                      data->id, data->mixer,
                      data->source, data->intdec[0],
                      data->intdec[1]);
            if (!(getsamplerate(cif, data->intdec, &rate)))
                  snd_iprintf(buffer, "rate: %d\n", rate);
      }
      snd_iprintf(buffer, "Paths:\n");
      i = getpaths(cif, p);
      while (i--) {
            snd_iprintf(buffer, "%x->%x ", p[i - 1], p[i]);
            i--;
      }
      snd_iprintf(buffer, "\n");
}

static void __devinit snd_riptide_proc_init(riptide_t * chip)
{
      snd_info_entry_t *entry;

      if (!snd_card_proc_new(chip->card, "riptide", &entry))
            snd_info_set_text_ops(entry, chip, 4096, snd_riptide_proc_read);
}

static int __devinit snd_riptide_mixer(riptide_t * chip)
{
      ac97_bus_t *pbus;
      ac97_template_t ac97;
      int err = 0;
      static ac97_bus_ops_t ops = {
            .write = snd_riptide_codec_write,
            .read = snd_riptide_codec_read,
      };

      memset(&ac97, 0, sizeof(ac97));
      ac97.private_data = chip;
      ac97.scaps = AC97_SCAP_SKIP_MODEM;

      if ((err = snd_ac97_bus(chip->card, 0, &ops, chip, &pbus)) < 0)
            return err;

      chip->ac97_bus = pbus;
      ac97.pci = chip->pci;
      if ((err = snd_ac97_mixer(pbus, &ac97, &chip->ac97)) < 0)
            return err;
      return err;
}

#ifdef SUPPORT_JOYSTICK
static int have_joystick;
static struct pci_dev *riptide_gameport_pci;
static struct gameport *riptide_gameport;

static int __devinit
snd_riptide_joystick_probe(struct pci_dev *pci, const struct pci_device_id *id)
{
      static int dev;

      if (dev >= SNDRV_CARDS)
            return -ENODEV;
      if (!enable[dev]) {
            dev++;
            return -ENOENT;
      }

      if (joystick_port[dev]) {
            riptide_gameport = kzalloc(sizeof(struct gameport), GFP_KERNEL);
            if (riptide_gameport) {
                  if (!request_region(joystick_port[dev], 8, "Riptide gameport"))
                        snd_printk(KERN_WARNING "Riptide: cannot grab gameport 0x%x\n",
                                 joystick_port[dev]);
                  else {
                        riptide_gameport_pci = pci;
                        riptide_gameport->io = joystick_port[dev];
                        gameport_register_port(riptide_gameport);
                  }
            }
      }
      dev++;
      return 0;
}

static void __devexit snd_riptide_joystick_remove(struct pci_dev *pci)
{
      if (riptide_gameport) {
            if (riptide_gameport_pci == pci) {
                  release_region(riptide_gameport->io, 8);
                  riptide_gameport_pci = NULL;
                  gameport_unregister_port(riptide_gameport);
            }
            kfree(riptide_gameport);
      }
}
#endif

static int __devinit
snd_card_riptide_probe(struct pci_dev *pci, const struct pci_device_id *pci_id)
{
      static int dev;
      snd_card_t *card;
      riptide_t *chip;
      unsigned short addr;
      int err = 0;

      if (dev >= SNDRV_CARDS)
            return -ENODEV;
      if (!enable[dev]) {
            dev++;
            return -ENOENT;
      }

      card = snd_card_new(index[dev], id[dev], THIS_MODULE, 0);
      if (card == NULL)
            return -ENOMEM;
      if ((err = snd_riptide_create(card, pci, &chip)) < 0) {
            snd_card_free(card);
            return err;
      }
      if ((err = snd_riptide_pcm(chip, 0, NULL)) < 0) {
            snd_card_free(card);
            return err;
      }
      if ((err = snd_riptide_mixer(chip)) < 0) {
            snd_card_free(card);
            return err;
      }
      pci_write_config_word(chip->pci, PCI_EXT_Legacy_Mask, LEGACY_ENABLE_ALL
                        | (opl3_port[dev] ? LEGACY_ENABLE_FM : 0)
#ifdef SUPPORT_JOYSTICK
                        | (joystick_port[dev] ? LEGACY_ENABLE_GAMEPORT : 0)
#endif
                        | (mpu_port[dev]
                         ? (LEGACY_ENABLE_MPU_INT | LEGACY_ENABLE_MPU) : 0)
                        | ((chip->irq << 4) & 0xF0));
      if ((addr = mpu_port[dev]) != 0) {
            pci_write_config_word(chip->pci, PCI_EXT_MPU_Base, addr);
            if ((err = snd_mpu401_uart_new(card, 0, MPU401_HW_RIPTIDE,
                                     addr, 0, chip->irq, 0,
                                     &chip->rmidi)) < 0)
                  snd_printk(KERN_WARNING "Riptide: Can't Allocate MPU at 0x%x\n", addr);
            else
                  chip->mpuaddr = addr;
      }
      if ((addr = opl3_port[dev]) != 0) {
            pci_write_config_word(chip->pci, PCI_EXT_FM_Base, addr);
            if ((err = snd_opl3_create(card, addr, addr + 2,
                                 OPL3_HW_RIPTIDE, 0, &chip->opl3)) < 0)
                  snd_printk(KERN_WARNING "Riptide: Can't Allocate OPL3 at 0x%x\n", addr);
            else {
                  chip->opladdr = addr;
                  if ((err = snd_opl3_hwdep_new(chip->opl3, 0, 1, NULL)) < 0)
                        snd_printk(KERN_WARNING "Riptide: Can't Allocate OPL3-HWDEP\n");
            }
      }
#ifdef SUPPORT_JOYSTICK
      if ((addr = joystick_port[dev]) != 0) {
            pci_write_config_word(chip->pci, PCI_EXT_Game_Base, addr);
            chip->gameaddr = addr;
      }
#endif

      strcpy(card->driver, "RIPTIDE");
      strcpy(card->shortname, "Riptide");
#ifdef SUPPORT_JOYSTICK
      snprintf(card->longname, sizeof(card->longname),
             "%s at 0x%lx, irq %i mpu 0x%x opl3 0x%x gameport 0x%x",
             card->shortname, chip->port, chip->irq, chip->mpuaddr,
             chip->opladdr, chip->gameaddr);
#else
      snprintf(card->longname, sizeof(card->longname),
             "%s at 0x%lx, irq %i mpu 0x%x opl3 0x%x",
             card->shortname, chip->port, chip->irq, chip->mpuaddr,
             chip->opladdr);
#endif
      snd_riptide_proc_init(chip);
      if ((err = snd_card_register(card)) < 0) {
            snd_card_free(card);
            return err;
      }
      pci_set_drvdata(pci, card);
      dev++;
      return 0;
}

static void __devexit snd_card_riptide_remove(struct pci_dev *pci)
{
      snd_card_free(pci_get_drvdata(pci));
      pci_set_drvdata(pci, NULL);
}


static struct pci_driver driver = {
      .name = "RIPTIDE",
      .id_table = snd_riptide_ids,
      .probe = snd_card_riptide_probe,
      .remove = __devexit_p(snd_card_riptide_remove),
      SND_PCI_PM_CALLBACKS
};

#ifdef SUPPORT_JOYSTICK
static struct pci_driver joystick_driver = {
      .name = "Riptide Joystick",
      .id_table = snd_riptide_joystick_ids,
      .probe = snd_riptide_joystick_probe,
      .remove = __devexit_p(snd_riptide_joystick_remove),
};
#endif


static int __init alsa_card_riptide_init(void)
{
      int err;
      if ((err = pci_register_driver(&driver)) < 0)
            return err;
#if defined(SUPPORT_JOYSTICK)
      if (pci_register_driver(&joystick_driver) < 0) {
            have_joystick = 0;
            snd_printk(KERN_INFO "no joystick found\n");
      } else
            have_joystick = 1;
#endif
      return 0;
}

static void __exit alsa_card_riptide_exit(void)
{
      pci_unregister_driver(&driver);
#if defined(SUPPORT_JOYSTICK)
      if (have_joystick)
            pci_unregister_driver(&joystick_driver);
#endif
}

module_init(alsa_card_riptide_init);
module_exit(alsa_card_riptide_exit);

EXPORT_NO_SYMBOLS;

Generated by  Doxygen 1.6.0   Back to index