sound/pci/riptide/riptide.c

   1 /*
   2  *   Driver for the Conexant Riptide Soundchip
   3  *
   4  *      Copyright (c) 2004 Peter Gruber <nokos@gmx.net>
   5  *
   6  *   This program is free software; you can redistribute it and/or modify
   7  *   it under the terms of the GNU General Public License as published by
   8  *   the Free Software Foundation; either version 2 of the License, or
   9  *   (at your option) any later version.
  10  *
  11  *   This program is distributed in the hope that it will be useful,
  12  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *   GNU General Public License for more details.
  15  *
  16  *   You should have received a copy of the GNU General Public License
  17  *   along with this program; if not, write to the Free Software
  18  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  19  *
  20  */
  21 /*
  22   History:
  23    - 02/15/2004 first release
  24
  25   This Driver is based on the OSS Driver version from Linuxant (riptide-0.6lnxtbeta03111100)
  26   credits from the original files:
  27
  28   MODULE NAME:        cnxt_rt.h
  29   AUTHOR:             K. Lazarev  (Transcribed by KNL)
  30   HISTORY:         Major Revision               Date        By
  31             -----------------------------     --------     -----
  32             Created                           02/1/2000     KNL
  33
  34   MODULE NAME:     int_mdl.c
  35   AUTHOR:          Konstantin Lazarev    (Transcribed by KNL)
  36   HISTORY:         Major Revision               Date        By
  37             -----------------------------     --------     -----
  38             Created                           10/01/99      KNL
  39
  40   MODULE NAME:        riptide.h
  41   AUTHOR:             O. Druzhinin  (Transcribed by OLD)
  42   HISTORY:         Major Revision               Date        By
  43             -----------------------------     --------     -----
  44             Created                           10/16/97      OLD
  45
  46   MODULE NAME:        Rp_Cmdif.cpp
  47   AUTHOR:             O. Druzhinin  (Transcribed by OLD)
  48                       K. Lazarev    (Transcribed by KNL)
  49   HISTORY:         Major Revision               Date        By
  50             -----------------------------     --------     -----
  51             Adopted from NT4 driver            6/22/99      OLD
  52             Ported to Linux                    9/01/99      KNL
  53
  54   MODULE NAME:        rt_hw.c
  55   AUTHOR:             O. Druzhinin  (Transcribed by OLD)
  56                       C. Lazarev    (Transcribed by CNL)
  57   HISTORY:         Major Revision               Date        By
  58             -----------------------------     --------     -----
  59             Created                           11/18/97      OLD
  60             Hardware functions for RipTide    11/24/97      CNL
  61             (ES1) are coded
  62             Hardware functions for RipTide    12/24/97      CNL
  63             (A0) are coded
  64             Hardware functions for RipTide    03/20/98      CNL
  65             (A1) are coded
  66             Boot loader is included           05/07/98      CNL
  67             Redesigned for WDM                07/27/98      CNL
  68             Redesigned for Linux              09/01/99      CNL
  69
  70   MODULE NAME:        rt_hw.h
  71   AUTHOR:             C. Lazarev    (Transcribed by CNL)
  72   HISTORY:         Major Revision               Date        By
  73             -----------------------------     --------     -----
  74             Created                           11/18/97      CNL
  75
  76   MODULE NAME:     rt_mdl.c
  77   AUTHOR:          Konstantin Lazarev    (Transcribed by KNL)
  78   HISTORY:         Major Revision               Date        By
  79             -----------------------------     --------     -----
  80             Created                           10/01/99      KNL
  81
  82   MODULE NAME:        mixer.h
  83   AUTHOR:             K. Kenney
  84   HISTORY:         Major Revision                   Date          By
  85             -----------------------------          --------     -----
  86             Created from MS W95 Sample             11/28/95      KRS
  87             RipTide                                10/15/97      KRS
  88             Adopted for Windows NT driver          01/20/98      CNL
  89 */
  90
  91 #include <linux/delay.h>
  92 #include <linux/init.h>
  93 #include <linux/interrupt.h>
  94 #include <linux/pci.h>
  95 #include <linux/slab.h>
  96 #include <linux/wait.h>
  97 #include <linux/gameport.h>
  98 #include <linux/device.h>
  99 #include <linux/firmware.h>
 100 #include <asm/io.h>
 101 #include <sound/core.h>
 102 #include <sound/info.h>
 103 #include <sound/control.h>
 104 #include <sound/pcm.h>
 105 #include <sound/pcm_params.h>
 106 #include <sound/ac97_codec.h>
 107 #include <sound/mpu401.h>
 108 #include <sound/opl3.h>
 109 #include <sound/initval.h>
 110
 111 #if defined(CONFIG_GAMEPORT) || (defined(MODULE) && defined(CONFIG_GAMEPORT_MODULE))
 112 #define SUPPORT_JOYSTICK 1
 113 #endif
 114
 115 MODULE_AUTHOR("Peter Gruber <nokos@gmx.net>");
 116 MODULE_DESCRIPTION("riptide");
 117 MODULE_LICENSE("GPL");
 118 MODULE_SUPPORTED_DEVICE("{{Conexant,Riptide}}");
 119 MODULE_FIRMWARE("riptide.hex");
 120
 121 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;
 122 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;
 123 static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE;
 124
 125 #ifdef SUPPORT_JOYSTICK
 126 static int joystick_port[SNDRV_CARDS] = { [0 ... (SNDRV_CARDS - 1)] = 0x200 };
 127 #endif
 128 static int mpu_port[SNDRV_CARDS] = { [0 ... (SNDRV_CARDS - 1)] = 0x330 };
 129 static int opl3_port[SNDRV_CARDS] = { [0 ... (SNDRV_CARDS - 1)] = 0x388 };
 130
 131 module_param_array(index, int, NULL, 0444);
 132 MODULE_PARM_DESC(index, "Index value for Riptide soundcard.");
 133 module_param_array(id, charp, NULL, 0444);
 134 MODULE_PARM_DESC(id, "ID string for Riptide soundcard.");
 135 module_param_array(enable, bool, NULL, 0444);
 136 MODULE_PARM_DESC(enable, "Enable Riptide soundcard.");
 137 #ifdef SUPPORT_JOYSTICK
 138 module_param_array(joystick_port, int, NULL, 0444);
 139 MODULE_PARM_DESC(joystick_port, "Joystick port # for Riptide soundcard.");
 140 #endif
 141 module_param_array(mpu_port, int, NULL, 0444);
 142 MODULE_PARM_DESC(mpu_port, "MPU401 port # for Riptide driver.");
 143 module_param_array(opl3_port, int, NULL, 0444);
 144 MODULE_PARM_DESC(opl3_port, "OPL3 port # for Riptide driver.");
 145
 146 /*
 147  */
 148
 149 #define MPU401_HW_RIPTIDE MPU401_HW_MPU401
 150 #define OPL3_HW_RIPTIDE   OPL3_HW_OPL3
 151
 152 #define PCI_EXT_CapId       0x40
 153 #define PCI_EXT_NextCapPrt  0x41
 154 #define PCI_EXT_PWMC        0x42
 155 #define PCI_EXT_PWSCR       0x44
 156 #define PCI_EXT_Data00      0x46
 157 #define PCI_EXT_PMSCR_BSE   0x47
 158 #define PCI_EXT_SB_Base     0x48
 159 #define PCI_EXT_FM_Base     0x4a
 160 #define PCI_EXT_MPU_Base    0x4C
 161 #define PCI_EXT_Game_Base   0x4E
 162 #define PCI_EXT_Legacy_Mask 0x50
 163 #define PCI_EXT_AsicRev     0x52
 164 #define PCI_EXT_Reserved3   0x53
 165
 166 #define LEGACY_ENABLE_ALL      0x8000   /* legacy device options */
 167 #define LEGACY_ENABLE_SB       0x4000
 168 #define LEGACY_ENABLE_FM       0x2000
 169 #define LEGACY_ENABLE_MPU_INT  0x1000
 170 #define LEGACY_ENABLE_MPU      0x0800
 171 #define LEGACY_ENABLE_GAMEPORT 0x0400
 172
 173 #define MAX_WRITE_RETRY  10     /* cmd interface limits */
 174 #define MAX_ERROR_COUNT  10
 175 #define CMDIF_TIMEOUT    50000
 176 #define RESET_TRIES      5
 177
 178 #define READ_PORT_ULONG(p)     inl((unsigned long)&(p))
 179 #define WRITE_PORT_ULONG(p,x)  outl(x,(unsigned long)&(p))
 180
 181 #define READ_AUDIO_CONTROL(p)     READ_PORT_ULONG(p->audio_control)
 182 #define WRITE_AUDIO_CONTROL(p,x)  WRITE_PORT_ULONG(p->audio_control,x)
 183 #define UMASK_AUDIO_CONTROL(p,x)  WRITE_PORT_ULONG(p->audio_control,READ_PORT_ULONG(p->audio_control)|x)
 184 #define MASK_AUDIO_CONTROL(p,x)   WRITE_PORT_ULONG(p->audio_control,READ_PORT_ULONG(p->audio_control)&x)
 185 #define READ_AUDIO_STATUS(p)      READ_PORT_ULONG(p->audio_status)
 186
 187 #define SET_GRESET(p)     UMASK_AUDIO_CONTROL(p,0x0001) /* global reset switch */
 188 #define UNSET_GRESET(p)   MASK_AUDIO_CONTROL(p,~0x0001)
 189 #define SET_AIE(p)        UMASK_AUDIO_CONTROL(p,0x0004) /* interrupt enable */
 190 #define UNSET_AIE(p)      MASK_AUDIO_CONTROL(p,~0x0004)
 191 #define SET_AIACK(p)      UMASK_AUDIO_CONTROL(p,0x0008) /* interrupt acknowledge */
 192 #define UNSET_AIACKT(p)   MASKAUDIO_CONTROL(p,~0x0008)
 193 #define SET_ECMDAE(p)     UMASK_AUDIO_CONTROL(p,0x0010)
 194 #define UNSET_ECMDAE(p)   MASK_AUDIO_CONTROL(p,~0x0010)
 195 #define SET_ECMDBE(p)     UMASK_AUDIO_CONTROL(p,0x0020)
 196 #define UNSET_ECMDBE(p)   MASK_AUDIO_CONTROL(p,~0x0020)
 197 #define SET_EDATAF(p)     UMASK_AUDIO_CONTROL(p,0x0040)
 198 #define UNSET_EDATAF(p)   MASK_AUDIO_CONTROL(p,~0x0040)
 199 #define SET_EDATBF(p)     UMASK_AUDIO_CONTROL(p,0x0080)
 200 #define UNSET_EDATBF(p)   MASK_AUDIO_CONTROL(p,~0x0080)
 201 #define SET_ESBIRQON(p)   UMASK_AUDIO_CONTROL(p,0x0100)
 202 #define UNSET_ESBIRQON(p) MASK_AUDIO_CONTROL(p,~0x0100)
 203 #define SET_EMPUIRQ(p)    UMASK_AUDIO_CONTROL(p,0x0200)
 204 #define UNSET_EMPUIRQ(p)  MASK_AUDIO_CONTROL(p,~0x0200)
 205 #define IS_CMDE(a)        (READ_PORT_ULONG(a->stat)&0x1)        /* cmd empty */
 206 #define IS_DATF(a)        (READ_PORT_ULONG(a->stat)&0x2)        /* data filled */
 207 #define IS_READY(p)       (READ_AUDIO_STATUS(p)&0x0001)
 208 #define IS_DLREADY(p)     (READ_AUDIO_STATUS(p)&0x0002)
 209 #define IS_DLERR(p)       (READ_AUDIO_STATUS(p)&0x0004)
 210 #define IS_GERR(p)        (READ_AUDIO_STATUS(p)&0x0008) /* error ! */
 211 #define IS_CMDAEIRQ(p)    (READ_AUDIO_STATUS(p)&0x0010)
 212 #define IS_CMDBEIRQ(p)    (READ_AUDIO_STATUS(p)&0x0020)
 213 #define IS_DATAFIRQ(p)    (READ_AUDIO_STATUS(p)&0x0040)
 214 #define IS_DATBFIRQ(p)    (READ_AUDIO_STATUS(p)&0x0080)
 215 #define IS_EOBIRQ(p)      (READ_AUDIO_STATUS(p)&0x0100) /* interrupt status */
 216 #define IS_EOSIRQ(p)      (READ_AUDIO_STATUS(p)&0x0200)
 217 #define IS_EOCIRQ(p)      (READ_AUDIO_STATUS(p)&0x0400)
 218 #define IS_UNSLIRQ(p)     (READ_AUDIO_STATUS(p)&0x0800)
 219 #define IS_SBIRQ(p)       (READ_AUDIO_STATUS(p)&0x1000)
 220 #define IS_MPUIRQ(p)      (READ_AUDIO_STATUS(p)&0x2000)
 221
 222 #define RESP 0x00000001         /* command flags */
 223 #define PARM 0x00000002
 224 #define CMDA 0x00000004
 225 #define CMDB 0x00000008
 226 #define NILL 0x00000000
 227
 228 #define LONG0(a)   ((u32)a)     /* shifts and masks */
 229 #define BYTE0(a)   (LONG0(a)&0xff)
 230 #define BYTE1(a)   (BYTE0(a)<<8)
 231 #define BYTE2(a)   (BYTE0(a)<<16)
 232 #define BYTE3(a)   (BYTE0(a)<<24)
 233 #define WORD0(a)   (LONG0(a)&0xffff)
 234 #define WORD1(a)   (WORD0(a)<<8)
 235 #define WORD2(a)   (WORD0(a)<<16)
 236 #define TRINIB0(a) (LONG0(a)&0xffffff)
 237 #define TRINIB1(a) (TRINIB0(a)<<8)
 238
 239 #define RET(a)     ((union cmdret *)(a))
 240
 241 #define SEND_GETV(p,b)             sendcmd(p,RESP,GETV,0,RET(b))        /* get version */
 242 #define SEND_GETC(p,b,c)           sendcmd(p,PARM|RESP,GETC,c,RET(b))
 243 #define SEND_GUNS(p,b)             sendcmd(p,RESP,GUNS,0,RET(b))
 244 #define SEND_SCID(p,b)             sendcmd(p,RESP,SCID,0,RET(b))
 245 #define SEND_RMEM(p,b,c,d)         sendcmd(p,PARM|RESP,RMEM|BYTE1(b),LONG0(c),RET(d))   /* memory access for firmware write */
 246 #define SEND_SMEM(p,b,c)           sendcmd(p,PARM,SMEM|BYTE1(b),LONG0(c),RET(0))        /* memory access for firmware write */
 247 #define SEND_WMEM(p,b,c)           sendcmd(p,PARM,WMEM|BYTE1(b),LONG0(c),RET(0))        /* memory access for firmware write */
 248 #define SEND_SDTM(p,b,c)           sendcmd(p,PARM|RESP,SDTM|TRINIB1(b),0,RET(c))        /* memory access for firmware write */
 249 #define SEND_GOTO(p,b)             sendcmd(p,PARM,GOTO,LONG0(b),RET(0)) /* memory access for firmware write */
 250 #define SEND_SETDPLL(p)            sendcmd(p,0,ARM_SETDPLL,0,RET(0))
 251 #define SEND_SSTR(p,b,c)           sendcmd(p,PARM,SSTR|BYTE3(b),LONG0(c),RET(0))        /* start stream */
 252 #define SEND_PSTR(p,b)             sendcmd(p,PARM,PSTR,BYTE3(b),RET(0)) /* pause stream */
 253 #define SEND_KSTR(p,b)             sendcmd(p,PARM,KSTR,BYTE3(b),RET(0)) /* stop stream */
 254 #define SEND_KDMA(p)               sendcmd(p,0,KDMA,0,RET(0))   /* stop all dma */
 255 #define SEND_GPOS(p,b,c,d)         sendcmd(p,PARM|RESP,GPOS,BYTE3(c)|BYTE2(b),RET(d))   /* get position in dma */
 256 #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))   /* set sample format at mixer */
 257 #define SEND_GSTS(p,b,c,d)         sendcmd(p,PARM|RESP,GSTS,BYTE3(c)|BYTE2(b),RET(d))
 258 #define SEND_NGPOS(p,b,c,d)        sendcmd(p,PARM|RESP,NGPOS,BYTE3(c)|BYTE2(b),RET(d))
 259 #define SEND_PSEL(p,b,c)           sendcmd(p,PARM,PSEL,BYTE2(b)|BYTE3(c),RET(0))        /* activate lbus path */
 260 #define SEND_PCLR(p,b,c)           sendcmd(p,PARM,PCLR,BYTE2(b)|BYTE3(c),RET(0))        /* deactivate lbus path */
 261 #define SEND_PLST(p,b)             sendcmd(p,PARM,PLST,BYTE3(b),RET(0))
 262 #define SEND_RSSV(p,b,c,d)         sendcmd(p,PARM|RESP,RSSV,BYTE2(b)|BYTE3(c),RET(d))
 263 #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))   /* select paths for internal connections */
 264 #define SEND_SSRC(p,b,c,d,e)       sendcmd(p,PARM,SSRC|BYTE1(b)|WORD2(c),WORD0(d)|WORD2(e),RET(0))      /* configure source */
 265 #define SEND_SLST(p,b)             sendcmd(p,PARM,SLST,BYTE3(b),RET(0))
 266 #define SEND_RSRC(p,b,c)           sendcmd(p,RESP,RSRC|BYTE1(b),0,RET(c))       /* read source config */
 267 #define SEND_SSRB(p,b,c)           sendcmd(p,PARM,SSRB|BYTE1(b),WORD2(c),RET(0))
 268 #define SEND_SDGV(p,b,c,d,e)       sendcmd(p,PARM,SDGV|BYTE2(b)|BYTE3(c),WORD0(d)|WORD2(e),RET(0))      /* set digital mixer */
 269 #define SEND_RDGV(p,b,c,d)         sendcmd(p,PARM|RESP,RDGV|BYTE2(b)|BYTE3(c),0,RET(d)) /* read digital mixer */
 270 #define SEND_DLST(p,b)             sendcmd(p,PARM,DLST,BYTE3(b),RET(0))
 271 #define SEND_SACR(p,b,c)           sendcmd(p,PARM,SACR,WORD0(b)|WORD2(c),RET(0))        /* set AC97 register */
 272 #define SEND_RACR(p,b,c)           sendcmd(p,PARM|RESP,RACR,WORD2(b),RET(c))    /* get AC97 register */
 273 #define SEND_ALST(p,b)             sendcmd(p,PARM,ALST,BYTE3(b),RET(0))
 274 #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))
 275 #define SEND_RXAC(p,b,c,d)         sendcmd(p,PARM|RESP,RXAC,BYTE2(b)|BYTE3(c),RET(d))
 276 #define SEND_SI2S(p,b)             sendcmd(p,PARM,SI2S,WORD2(b),RET(0))
 277
 278 #define EOB_STATUS         0x80000000   /* status flags : block boundary */
 279 #define EOS_STATUS         0x40000000   /*              : stoppped */
 280 #define EOC_STATUS         0x20000000   /*              : stream end */
 281 #define ERR_STATUS         0x10000000
 282 #define EMPTY_STATUS       0x08000000
 283
 284 #define IEOB_ENABLE        0x1  /* enable interrupts for status notification above */
 285 #define IEOS_ENABLE        0x2
 286 #define IEOC_ENABLE        0x4
 287 #define RDONCE             0x8
 288 #define DESC_MAX_MASK      0xff
 289
 290 #define ST_PLAY  0x1            /* stream states */
 291 #define ST_STOP  0x2
 292 #define ST_PAUSE 0x4
 293
 294 #define I2S_INTDEC     3        /* config for I2S link */
 295 #define I2S_MERGER     0
 296 #define I2S_SPLITTER   0
 297 #define I2S_MIXER      7
 298 #define I2S_RATE       44100
 299
 300 #define MODEM_INTDEC   4        /* config for modem link */
 301 #define MODEM_MERGER   3
 302 #define MODEM_SPLITTER 0
 303 #define MODEM_MIXER    11
 304
 305 #define FM_INTDEC      3        /* config for FM/OPL3 link */
 306 #define FM_MERGER      0
 307 #define FM_SPLITTER    0
 308 #define FM_MIXER       9
 309
 310 #define SPLIT_PATH  0x80        /* path splitting flag */
 311
 312 enum FIRMWARE {
 313         DATA_REC = 0, EXT_END_OF_FILE, EXT_SEG_ADDR_REC, EXT_GOTO_CMD_REC,
 314         EXT_LIN_ADDR_REC,
 315 };
 316
 317 enum CMDS {
 318         GETV = 0x00, GETC, GUNS, SCID, RMEM =
 319             0x10, SMEM, WMEM, SDTM, GOTO, SSTR =
 320             0x20, PSTR, KSTR, KDMA, GPOS, SETF, GSTS, NGPOS, PSEL =
 321             0x30, PCLR, PLST, RSSV, LSEL, SSRC = 0x40, SLST, RSRC, SSRB, SDGV =
 322             0x50, RDGV, DLST, SACR = 0x60, RACR, ALST, TXAC, RXAC, SI2S =
 323             0x70, ARM_SETDPLL = 0x72,
 324 };
 325
 326 enum E1SOURCE {
 327         ARM2LBUS_FIFO0 = 0, ARM2LBUS_FIFO1, ARM2LBUS_FIFO2, ARM2LBUS_FIFO3,
 328         ARM2LBUS_FIFO4, ARM2LBUS_FIFO5, ARM2LBUS_FIFO6, ARM2LBUS_FIFO7,
 329         ARM2LBUS_FIFO8, ARM2LBUS_FIFO9, ARM2LBUS_FIFO10, ARM2LBUS_FIFO11,
 330         ARM2LBUS_FIFO12, ARM2LBUS_FIFO13, ARM2LBUS_FIFO14, ARM2LBUS_FIFO15,
 331         INTER0_OUT, INTER1_OUT, INTER2_OUT, INTER3_OUT, INTER4_OUT,
 332         INTERM0_OUT, INTERM1_OUT, INTERM2_OUT, INTERM3_OUT, INTERM4_OUT,
 333         INTERM5_OUT, INTERM6_OUT, DECIMM0_OUT, DECIMM1_OUT, DECIMM2_OUT,
 334         DECIMM3_OUT, DECIM0_OUT, SR3_4_OUT, OPL3_SAMPLE, ASRC0, ASRC1,
 335         ACLNK2PADC, ACLNK2MODEM0RX, ACLNK2MIC, ACLNK2MODEM1RX, ACLNK2HNDMIC,
 336         DIGITAL_MIXER_OUT0, GAINFUNC0_OUT, GAINFUNC1_OUT, GAINFUNC2_OUT,
 337         GAINFUNC3_OUT, GAINFUNC4_OUT, SOFTMODEMTX, SPLITTER0_OUTL,
 338         SPLITTER0_OUTR, SPLITTER1_OUTL, SPLITTER1_OUTR, SPLITTER2_OUTL,
 339         SPLITTER2_OUTR, SPLITTER3_OUTL, SPLITTER3_OUTR, MERGER0_OUT,
 340         MERGER1_OUT, MERGER2_OUT, MERGER3_OUT, ARM2LBUS_FIFO_DIRECT, NO_OUT
 341 };
 342
 343 enum E2SINK {
 344         LBUS2ARM_FIFO0 = 0, LBUS2ARM_FIFO1, LBUS2ARM_FIFO2, LBUS2ARM_FIFO3,
 345         LBUS2ARM_FIFO4, LBUS2ARM_FIFO5, LBUS2ARM_FIFO6, LBUS2ARM_FIFO7,
 346         INTER0_IN, INTER1_IN, INTER2_IN, INTER3_IN, INTER4_IN, INTERM0_IN,
 347         INTERM1_IN, INTERM2_IN, INTERM3_IN, INTERM4_IN, INTERM5_IN, INTERM6_IN,
 348         DECIMM0_IN, DECIMM1_IN, DECIMM2_IN, DECIMM3_IN, DECIM0_IN, SR3_4_IN,
 349         PDAC2ACLNK, MODEM0TX2ACLNK, MODEM1TX2ACLNK, HNDSPK2ACLNK,
 350         DIGITAL_MIXER_IN0, DIGITAL_MIXER_IN1, DIGITAL_MIXER_IN2,
 351         DIGITAL_MIXER_IN3, DIGITAL_MIXER_IN4, DIGITAL_MIXER_IN5,
 352         DIGITAL_MIXER_IN6, DIGITAL_MIXER_IN7, DIGITAL_MIXER_IN8,
 353         DIGITAL_MIXER_IN9, DIGITAL_MIXER_IN10, DIGITAL_MIXER_IN11,
 354         GAINFUNC0_IN, GAINFUNC1_IN, GAINFUNC2_IN, GAINFUNC3_IN, GAINFUNC4_IN,
 355         SOFTMODEMRX, SPLITTER0_IN, SPLITTER1_IN, SPLITTER2_IN, SPLITTER3_IN,
 356         MERGER0_INL, MERGER0_INR, MERGER1_INL, MERGER1_INR, MERGER2_INL,
 357         MERGER2_INR, MERGER3_INL, MERGER3_INR, E2SINK_MAX
 358 };
 359
 360 enum LBUS_SINK {
 361         LS_SRC_INTERPOLATOR = 0, LS_SRC_INTERPOLATORM, LS_SRC_DECIMATOR,
 362         LS_SRC_DECIMATORM, LS_MIXER_IN, LS_MIXER_GAIN_FUNCTION,
 363         LS_SRC_SPLITTER, LS_SRC_MERGER, LS_NONE1, LS_NONE2,
 364 };
 365
 366 enum RT_CHANNEL_IDS {
 367         M0TX = 0, M1TX, TAMTX, HSSPKR, PDAC, DSNDTX0, DSNDTX1, DSNDTX2,
 368         DSNDTX3, DSNDTX4, DSNDTX5, DSNDTX6, DSNDTX7, WVSTRTX, COP3DTX, SPARE,
 369         M0RX, HSMIC, M1RX, CLEANRX, MICADC, PADC, COPRX1, COPRX2,
 370         CHANNEL_ID_COUNTER
 371 };
 372
 373 enum { SB_CMD = 0, MODEM_CMD, I2S_CMD0, I2S_CMD1, FM_CMD, MAX_CMD };
 374
 375 struct lbuspath {
 376         unsigned char *noconv;
 377         unsigned char *stereo;
 378         unsigned char *mono;
 379 };
 380
 381 struct cmdport {
 382         u32 data1;              /* cmd,param */
 383         u32 data2;              /* param */
 384         u32 stat;               /* status */
 385         u32 pad[5];
 386 };
 387
 388 struct riptideport {
 389         u32 audio_control;      /* status registers */
 390         u32 audio_status;
 391         u32 pad[2];
 392         struct cmdport port[2]; /* command ports */
 393 };
 394
 395 struct cmdif {
 396         struct riptideport *hwport;
 397         spinlock_t lock;
 398         unsigned int cmdcnt;    /* cmd statistics */
 399         unsigned int cmdtime;
 400         unsigned int cmdtimemax;
 401         unsigned int cmdtimemin;
 402         unsigned int errcnt;
 403         int is_reset;
 404 };
 405
 406 struct riptide_firmware {
 407         u16 ASIC;
 408         u16 CODEC;
 409         u16 AUXDSP;
 410         u16 PROG;
 411 };
 412
 413 union cmdret {
 414         u8 retbytes[8];
 415         u16 retwords[4];
 416         u32 retlongs[2];
 417 };
 418
 419 union firmware_version {
 420         union cmdret ret;
 421         struct riptide_firmware firmware;
 422 };
 423
 424 #define get_pcmhwdev(substream) (struct pcmhw *)(substream->runtime->private_data)
 425
 426 #define PLAYBACK_SUBSTREAMS 3
 427 struct snd_riptide {
 428         struct snd_card *card;
 429         struct pci_dev *pci;
 430         const struct firmware *fw_entry;
 431
 432         struct cmdif *cif;
 433
 434         struct snd_pcm *pcm;
 435         struct snd_pcm *pcm_i2s;
 436         struct snd_rawmidi *rmidi;
 437         struct snd_opl3 *opl3;
 438         struct snd_ac97 *ac97;
 439         struct snd_ac97_bus *ac97_bus;
 440
 441         struct snd_pcm_substream *playback_substream[PLAYBACK_SUBSTREAMS];
 442         struct snd_pcm_substream *capture_substream;
 443
 444         int openstreams;
 445
 446         int irq;
 447         unsigned long port;
 448         unsigned short mpuaddr;
 449         unsigned short opladdr;
 450 #ifdef SUPPORT_JOYSTICK
 451         unsigned short gameaddr;
 452 #endif
 453         struct resource *res_port;
 454
 455         unsigned short device_id;
 456
 457         union firmware_version firmware;
 458
 459         spinlock_t lock;
 460         struct tasklet_struct riptide_tq;
 461         struct snd_info_entry *proc_entry;
 462
 463         unsigned long received_irqs;
 464         unsigned long handled_irqs;
 465 #ifdef CONFIG_PM
 466         int in_suspend;
 467 #endif
 468 };
 469
 470 struct sgd {                    /* scatter gather desriptor */
 471         u32 dwNextLink;
 472         u32 dwSegPtrPhys;
 473         u32 dwSegLen;
 474         u32 dwStat_Ctl;
 475 };
 476
 477 struct pcmhw {                  /* pcm descriptor */
 478         struct lbuspath paths;
 479         unsigned char *lbuspath;
 480         unsigned char source;
 481         unsigned char intdec[2];
 482         unsigned char mixer;
 483         unsigned char id;
 484         unsigned char state;
 485         unsigned int rate;
 486         unsigned int channels;
 487         snd_pcm_format_t format;
 488         struct snd_dma_buffer sgdlist;
 489         struct sgd *sgdbuf;
 490         unsigned int size;
 491         unsigned int pages;
 492         unsigned int oldpos;
 493         unsigned int pointer;
 494 };
 495
 496 #define CMDRET_ZERO (union cmdret){{(u32)0, (u32) 0}}
 497
 498 static int sendcmd(struct cmdif *cif, u32 flags, u32 cmd, u32 parm,
 499                    union cmdret *ret);
 500 static int getsourcesink(struct cmdif *cif, unsigned char source,
 501                          unsigned char sink, unsigned char *a,
 502                          unsigned char *b);
 503 static int snd_riptide_initialize(struct snd_riptide *chip);
 504 static int riptide_reset(struct cmdif *cif, struct snd_riptide *chip);
 505
 506 /*
 507  */
 508
 509 static struct pci_device_id snd_riptide_ids[] = {
 510         { PCI_DEVICE(0x127a, 0x4310) },
 511         { PCI_DEVICE(0x127a, 0x4320) },
 512         { PCI_DEVICE(0x127a, 0x4330) },
 513         { PCI_DEVICE(0x127a, 0x4340) },
 514         {0,},
 515 };
 516
 517 #ifdef SUPPORT_JOYSTICK
 518 static struct pci_device_id snd_riptide_joystick_ids[] __devinitdata = {
 519         { PCI_DEVICE(0x127a, 0x4312) },
 520         { PCI_DEVICE(0x127a, 0x4322) },
 521         { PCI_DEVICE(0x127a, 0x4332) },
 522         { PCI_DEVICE(0x127a, 0x4342) },
 523         {0,},
 524 };
 525 #endif
 526
 527 MODULE_DEVICE_TABLE(pci, snd_riptide_ids);
 528
 529 /*
 530  */
 531
 532 static unsigned char lbusin2out[E2SINK_MAX + 1][2] = {
 533         {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2}, {NO_OUT, LS_NONE1}, {NO_OUT,
 534                                                                      LS_NONE2},
 535         {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2}, {NO_OUT, LS_NONE1}, {NO_OUT,
 536                                                                      LS_NONE2},
 537         {INTER0_OUT, LS_SRC_INTERPOLATOR}, {INTER1_OUT, LS_SRC_INTERPOLATOR},
 538         {INTER2_OUT, LS_SRC_INTERPOLATOR}, {INTER3_OUT, LS_SRC_INTERPOLATOR},
 539         {INTER4_OUT, LS_SRC_INTERPOLATOR}, {INTERM0_OUT, LS_SRC_INTERPOLATORM},
 540         {INTERM1_OUT, LS_SRC_INTERPOLATORM}, {INTERM2_OUT,
 541                                               LS_SRC_INTERPOLATORM},
 542         {INTERM3_OUT, LS_SRC_INTERPOLATORM}, {INTERM4_OUT,
 543                                               LS_SRC_INTERPOLATORM},
 544         {INTERM5_OUT, LS_SRC_INTERPOLATORM}, {INTERM6_OUT,
 545                                               LS_SRC_INTERPOLATORM},
 546         {DECIMM0_OUT, LS_SRC_DECIMATORM}, {DECIMM1_OUT, LS_SRC_DECIMATORM},
 547         {DECIMM2_OUT, LS_SRC_DECIMATORM}, {DECIMM3_OUT, LS_SRC_DECIMATORM},
 548         {DECIM0_OUT, LS_SRC_DECIMATOR}, {SR3_4_OUT, LS_NONE1}, {NO_OUT,
 549                                                                 LS_NONE2},
 550         {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2}, {NO_OUT, LS_NONE1},
 551         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
 552         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
 553         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
 554         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
 555         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
 556         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
 557         {GAINFUNC0_OUT, LS_MIXER_GAIN_FUNCTION}, {GAINFUNC1_OUT,
 558                                                   LS_MIXER_GAIN_FUNCTION},
 559         {GAINFUNC2_OUT, LS_MIXER_GAIN_FUNCTION}, {GAINFUNC3_OUT,
 560                                                   LS_MIXER_GAIN_FUNCTION},
 561         {GAINFUNC4_OUT, LS_MIXER_GAIN_FUNCTION}, {SOFTMODEMTX, LS_NONE1},
 562         {SPLITTER0_OUTL, LS_SRC_SPLITTER}, {SPLITTER1_OUTL, LS_SRC_SPLITTER},
 563         {SPLITTER2_OUTL, LS_SRC_SPLITTER}, {SPLITTER3_OUTL, LS_SRC_SPLITTER},
 564         {MERGER0_OUT, LS_SRC_MERGER}, {MERGER0_OUT, LS_SRC_MERGER},
 565         {MERGER1_OUT, LS_SRC_MERGER},
 566         {MERGER1_OUT, LS_SRC_MERGER}, {MERGER2_OUT, LS_SRC_MERGER},
 567         {MERGER2_OUT, LS_SRC_MERGER},
 568         {MERGER3_OUT, LS_SRC_MERGER}, {MERGER3_OUT, LS_SRC_MERGER}, {NO_OUT,
 569                                                                      LS_NONE2},
 570 };
 571
 572 static unsigned char lbus_play_opl3[] = {
 573         DIGITAL_MIXER_IN0 + FM_MIXER, 0xff
 574 };
 575 static unsigned char lbus_play_modem[] = {
 576         DIGITAL_MIXER_IN0 + MODEM_MIXER, 0xff
 577 };
 578 static unsigned char lbus_play_i2s[] = {
 579         INTER0_IN + I2S_INTDEC, DIGITAL_MIXER_IN0 + I2S_MIXER, 0xff
 580 };
 581 static unsigned char lbus_play_out[] = {
 582         PDAC2ACLNK, 0xff
 583 };
 584 static unsigned char lbus_play_outhp[] = {
 585         HNDSPK2ACLNK, 0xff
 586 };
 587 static unsigned char lbus_play_noconv1[] = {
 588         DIGITAL_MIXER_IN0, 0xff
 589 };
 590 static unsigned char lbus_play_stereo1[] = {
 591         INTER0_IN, DIGITAL_MIXER_IN0, 0xff
 592 };
 593 static unsigned char lbus_play_mono1[] = {
 594         INTERM0_IN, DIGITAL_MIXER_IN0, 0xff
 595 };
 596 static unsigned char lbus_play_noconv2[] = {
 597         DIGITAL_MIXER_IN1, 0xff
 598 };
 599 static unsigned char lbus_play_stereo2[] = {
 600         INTER1_IN, DIGITAL_MIXER_IN1, 0xff
 601 };
 602 static unsigned char lbus_play_mono2[] = {
 603         INTERM1_IN, DIGITAL_MIXER_IN1, 0xff
 604 };
 605 static unsigned char lbus_play_noconv3[] = {
 606         DIGITAL_MIXER_IN2, 0xff
 607 };
 608 static unsigned char lbus_play_stereo3[] = {
 609         INTER2_IN, DIGITAL_MIXER_IN2, 0xff
 610 };
 611 static unsigned char lbus_play_mono3[] = {
 612         INTERM2_IN, DIGITAL_MIXER_IN2, 0xff
 613 };
 614 static unsigned char lbus_rec_noconv1[] = {
 615         LBUS2ARM_FIFO5, 0xff
 616 };
 617 static unsigned char lbus_rec_stereo1[] = {
 618         DECIM0_IN, LBUS2ARM_FIFO5, 0xff
 619 };
 620 static unsigned char lbus_rec_mono1[] = {
 621         DECIMM3_IN, LBUS2ARM_FIFO5, 0xff
 622 };
 623
 624 static unsigned char play_ids[] = { 4, 1, 2, };
 625 static unsigned char play_sources[] = {
 626         ARM2LBUS_FIFO4, ARM2LBUS_FIFO1, ARM2LBUS_FIFO2,
 627 };
 628 static struct lbuspath lbus_play_paths[] = {
 629         {
 630          .noconv = lbus_play_noconv1,
 631          .stereo = lbus_play_stereo1,
 632          .mono = lbus_play_mono1,
 633          },
 634         {
 635          .noconv = lbus_play_noconv2,
 636          .stereo = lbus_play_stereo2,
 637          .mono = lbus_play_mono2,
 638          },
 639         {
 640          .noconv = lbus_play_noconv3,
 641          .stereo = lbus_play_stereo3,
 642          .mono = lbus_play_mono3,
 643          },
 644 };
 645 static struct lbuspath lbus_rec_path = {
 646         .noconv = lbus_rec_noconv1,
 647         .stereo = lbus_rec_stereo1,
 648         .mono = lbus_rec_mono1,
 649 };
 650
 651 #define FIRMWARE_VERSIONS 1
 652 static union firmware_version firmware_versions[] = {
 653         {
 654                 .firmware = {
 655                         .ASIC = 3,
 656                         .CODEC = 2,
 657                         .AUXDSP = 3,
 658                         .PROG = 773,
 659                 },
 660         },
 661 };
 662
 663 static u32 atoh(const unsigned char *in, unsigned int len)
 664 {
 665         u32 sum = 0;
 666         unsigned int mult = 1;
 667         unsigned char c;
 668
 669         while (len) {
 670                 c = in[len - 1];
 671                 if ((c >= '0') && (c <= '9'))
 672                         sum += mult * (c - '0');
 673                 else if ((c >= 'A') && (c <= 'F'))
 674                         sum += mult * (c - ('A' - 10));
 675                 else if ((c >= 'a') && (c <= 'f'))
 676                         sum += mult * (c - ('a' - 10));
 677                 mult *= 16;
 678                 --len;
 679         }
 680         return sum;
 681 }
 682
 683 static int senddata(struct cmdif *cif, const unsigned char *in, u32 offset)
 684 {
 685         u32 addr;
 686         u32 data;
 687         u32 i;
 688         const unsigned char *p;
 689
 690         i = atoh(&in[1], 2);
 691         addr = offset + atoh(&in[3], 4);
 692         if (SEND_SMEM(cif, 0, addr) != 0)
 693                 return -EACCES;
 694         p = in + 9;
 695         while (i) {
 696                 data = atoh(p, 8);
 697                 if (SEND_WMEM(cif, 2,
 698                               ((data & 0x0f0f0f0f) << 4) | ((data & 0xf0f0f0f0)
 699                                                             >> 4)))
 700                         return -EACCES;
 701                 i -= 4;
 702                 p += 8;
 703         }
 704         return 0;
 705 }
 706
 707 static int loadfirmware(struct cmdif *cif, const unsigned char *img,
 708                         unsigned int size)
 709 {
 710         const unsigned char *in;
 711         u32 laddr, saddr, t, val;
 712         int err = 0;
 713
 714         laddr = saddr = 0;
 715         while (size > 0 && err == 0) {
 716                 in = img;
 717                 if (in[0] == ':') {
 718                         t = atoh(&in[7], 2);
 719                         switch (t) {
 720                         case DATA_REC:
 721                                 err = senddata(cif, in, laddr + saddr);
 722                                 break;
 723                         case EXT_SEG_ADDR_REC:
 724                                 saddr = atoh(&in[9], 4) << 4;
 725                                 break;
 726                         case EXT_LIN_ADDR_REC:
 727                                 laddr = atoh(&in[9], 4) << 16;
 728                                 break;
 729                         case EXT_GOTO_CMD_REC:
 730                                 val = atoh(&in[9], 8);
 731                                 if (SEND_GOTO(cif, val) != 0)
 732                                         err = -EACCES;
 733                                 break;
 734                         case EXT_END_OF_FILE:
 735                                 size = 0;
 736                                 break;
 737                         default:
 738                                 break;
 739                         }
 740                         while (size > 0) {
 741                                 size--;
 742                                 if (*img++ == '\n')
 743                                         break;
 744                         }
 745                 }
 746         }
 747         snd_printdd("load firmware return %d\n", err);
 748         return err;
 749 }
 750
 751 static void
 752 alloclbuspath(struct cmdif *cif, unsigned char source,
 753               unsigned char *path, unsigned char *mixer, unsigned char *s)
 754 {
 755         while (*path != 0xff) {
 756                 unsigned char sink, type;
 757
 758                 sink = *path & (~SPLIT_PATH);
 759                 if (sink != E2SINK_MAX) {
 760                         snd_printdd("alloc path 0x%x->0x%x\n", source, sink);
 761                         SEND_PSEL(cif, source, sink);
 762                         source = lbusin2out[sink][0];
 763                         type = lbusin2out[sink][1];
 764                         if (type == LS_MIXER_IN) {
 765                                 if (mixer)
 766                                         *mixer = sink - DIGITAL_MIXER_IN0;
 767                         }
 768                         if (type == LS_SRC_DECIMATORM ||
 769                             type == LS_SRC_DECIMATOR ||
 770                             type == LS_SRC_INTERPOLATORM ||
 771                             type == LS_SRC_INTERPOLATOR) {
 772                                 if (s) {
 773                                         if (s[0] != 0xff)
 774                                                 s[1] = sink;
 775                                         else
 776                                                 s[0] = sink;
 777                                 }
 778                         }
 779                 }
 780                 if (*path++ & SPLIT_PATH) {
 781                         unsigned char *npath = path;
 782
 783                         while (*npath != 0xff)
 784                                 npath++;
 785                         alloclbuspath(cif, source + 1, ++npath, mixer, s);
 786                 }
 787         }
 788 }
 789
 790 static void
 791 freelbuspath(struct cmdif *cif, unsigned char source, unsigned char *path)
 792 {
 793         while (*path != 0xff) {
 794                 unsigned char sink;
 795
 796                 sink = *path & (~SPLIT_PATH);
 797                 if (sink != E2SINK_MAX) {
 798                         snd_printdd("free path 0x%x->0x%x\n", source, sink);
 799                         SEND_PCLR(cif, source, sink);
 800                         source = lbusin2out[sink][0];
 801                 }
 802                 if (*path++ & SPLIT_PATH) {
 803                         unsigned char *npath = path;
 804
 805                         while (*npath != 0xff)
 806                                 npath++;
 807                         freelbuspath(cif, source + 1, ++npath);
 808                 }
 809         }
 810 }
 811
 812 static int writearm(struct cmdif *cif, u32 addr, u32 data, u32 mask)
 813 {
 814         union cmdret rptr = CMDRET_ZERO;
 815         unsigned int i = MAX_WRITE_RETRY;
 816         int flag = 1;
 817
 818         SEND_RMEM(cif, 0x02, addr, &rptr);
 819         rptr.retlongs[0] &= (~mask);
 820
 821         while (--i) {
 822                 SEND_SMEM(cif, 0x01, addr);
 823                 SEND_WMEM(cif, 0x02, (rptr.retlongs[0] | data));
 824                 SEND_RMEM(cif, 0x02, addr, &rptr);
 825                 if ((rptr.retlongs[0] & data) == data) {
 826                         flag = 0;
 827                         break;
 828                 } else
 829                         rptr.retlongs[0] &= ~mask;
 830         }
 831         snd_printdd("send arm 0x%x 0x%x 0x%x return %d\n", addr, data, mask,
 832                     flag);
 833         return flag;
 834 }
 835
 836 static int sendcmd(struct cmdif *cif, u32 flags, u32 cmd, u32 parm,
 837                    union cmdret *ret)
 838 {
 839         int i, j;
 840         int err;
 841         unsigned int time = 0;
 842         unsigned long irqflags;
 843         struct riptideport *hwport;
 844         struct cmdport *cmdport = NULL;
 845
 846         if (snd_BUG_ON(!cif))
 847                 return -EINVAL;
 848
 849         hwport = cif->hwport;
 850         if (cif->errcnt > MAX_ERROR_COUNT) {
 851                 if (cif->is_reset) {
 852                         snd_printk(KERN_ERR
 853                                    "Riptide: Too many failed cmds, reinitializing\n");
 854                         if (riptide_reset(cif, NULL) == 0) {
 855                                 cif->errcnt = 0;
 856                                 return -EIO;
 857                         }
 858                 }
 859                 snd_printk(KERN_ERR "Riptide: Initialization failed.\n");
 860                 return -EINVAL;
 861         }
 862         if (ret) {
 863                 ret->retlongs[0] = 0;
 864                 ret->retlongs[1] = 0;
 865         }
 866         i = 0;
 867         spin_lock_irqsave(&cif->lock, irqflags);
 868         while (i++ < CMDIF_TIMEOUT && !IS_READY(cif->hwport))
 869                 udelay(10);
 870         if (i > CMDIF_TIMEOUT) {
 871                 err = -EBUSY;
 872                 goto errout;
 873         }
 874
 875         err = 0;
 876         for (j = 0, time = 0; time < CMDIF_TIMEOUT; j++, time += 2) {
 877                 cmdport = &(hwport->port[j % 2]);
 878                 if (IS_DATF(cmdport)) { /* free pending data */
 879                         READ_PORT_ULONG(cmdport->data1);
 880                         READ_PORT_ULONG(cmdport->data2);
 881                 }
 882                 if (IS_CMDE(cmdport)) {
 883                         if (flags & PARM)       /* put data */
 884                                 WRITE_PORT_ULONG(cmdport->data2, parm);
 885                         WRITE_PORT_ULONG(cmdport->data1, cmd);  /* write cmd */
 886                         if ((flags & RESP) && ret) {
 887                                 while (!IS_DATF(cmdport) &&
 888                                        time < CMDIF_TIMEOUT) {
 889                                         udelay(10);
 890                                         time++;
 891                                 }
 892                                 if (time < CMDIF_TIMEOUT) {     /* read response */
 893                                         ret->retlongs[0] =
 894                                             READ_PORT_ULONG(cmdport->data1);
 895                                         ret->retlongs[1] =
 896                                             READ_PORT_ULONG(cmdport->data2);
 897                                 } else {
 898                                         err = -ENOSYS;
 899                                         goto errout;
 900                                 }
 901                         }
 902                         break;
 903                 }
 904                 udelay(20);
 905         }
 906         if (time == CMDIF_TIMEOUT) {
 907                 err = -ENODATA;
 908                 goto errout;
 909         }
 910         spin_unlock_irqrestore(&cif->lock, irqflags);
 911
 912         cif->cmdcnt++;          /* update command statistics */
 913         cif->cmdtime += time;
 914         if (time > cif->cmdtimemax)
 915                 cif->cmdtimemax = time;
 916         if (time < cif->cmdtimemin)
 917                 cif->cmdtimemin = time;
 918         if ((cif->cmdcnt) % 1000 == 0)
 919                 snd_printdd
 920                     ("send cmd %d time: %d mintime: %d maxtime %d err: %d\n",
 921                      cif->cmdcnt, cif->cmdtime, cif->cmdtimemin,
 922                      cif->cmdtimemax, cif->errcnt);
 923         return 0;
 924
 925       errout:
 926         cif->errcnt++;
 927         spin_unlock_irqrestore(&cif->lock, irqflags);
 928         snd_printdd
 929             ("send cmd %d hw: 0x%x flag: 0x%x cmd: 0x%x parm: 0x%x ret: 0x%x 0x%x CMDE: %d DATF: %d failed %d\n",
 930              cif->cmdcnt, (int)((void *)&(cmdport->stat) - (void *)hwport),
 931              flags, cmd, parm, ret ? ret->retlongs[0] : 0,
 932              ret ? ret->retlongs[1] : 0, IS_CMDE(cmdport), IS_DATF(cmdport),
 933              err);
 934         return err;
 935 }
 936
 937 static int
 938 setmixer(struct cmdif *cif, short num, unsigned short rval, unsigned short lval)
 939 {
 940         union cmdret rptr = CMDRET_ZERO;
 941         int i = 0;
 942
 943         snd_printdd("sent mixer %d: 0x%d 0x%d\n", num, rval, lval);
 944         do {
 945                 SEND_SDGV(cif, num, num, rval, lval);
 946                 SEND_RDGV(cif, num, num, &rptr);
 947                 if (rptr.retwords[0] == lval && rptr.retwords[1] == rval)
 948                         return 0;
 949         } while (i++ < MAX_WRITE_RETRY);
 950         snd_printdd("sent mixer failed\n");
 951         return -EIO;
 952 }
 953
 954 static int getpaths(struct cmdif *cif, unsigned char *o)
 955 {
 956         unsigned char src[E2SINK_MAX];
 957         unsigned char sink[E2SINK_MAX];
 958         int i, j = 0;
 959
 960         for (i = 0; i < E2SINK_MAX; i++) {
 961                 getsourcesink(cif, i, i, &src[i], &sink[i]);
 962                 if (sink[i] < E2SINK_MAX) {
 963                         o[j++] = sink[i];
 964                         o[j++] = i;
 965                 }
 966         }
 967         return j;
 968 }
 969
 970 static int
 971 getsourcesink(struct cmdif *cif, unsigned char source, unsigned char sink,
 972               unsigned char *a, unsigned char *b)
 973 {
 974         union cmdret rptr = CMDRET_ZERO;
 975
 976         if (SEND_RSSV(cif, source, sink, &rptr) &&
 977             SEND_RSSV(cif, source, sink, &rptr))
 978                 return -EIO;
 979         *a = rptr.retbytes[0];
 980         *b = rptr.retbytes[1];
 981         snd_printdd("getsourcesink 0x%x 0x%x\n", *a, *b);
 982         return 0;
 983 }
 984
 985 static int
 986 getsamplerate(struct cmdif *cif, unsigned char *intdec, unsigned int *rate)
 987 {
 988         unsigned char *s;
 989         unsigned int p[2] = { 0, 0 };
 990         int i;
 991         union cmdret rptr = CMDRET_ZERO;
 992
 993         s = intdec;
 994         for (i = 0; i < 2; i++) {
 995                 if (*s != 0xff) {
 996                         if (SEND_RSRC(cif, *s, &rptr) &&
 997                             SEND_RSRC(cif, *s, &rptr))
 998                                 return -EIO;
 999                         p[i] += rptr.retwords[1];
1000                         p[i] *= rptr.retwords[2];
1001                         p[i] += rptr.retwords[3];
1002                         p[i] /= 65536;
1003                 }
1004                 s++;
1005         }
1006         if (p[0]) {
1007                 if (p[1] != p[0])
1008                         snd_printdd("rates differ %d %d\n", p[0], p[1]);
1009                 *rate = (unsigned int)p[0];
1010         } else
1011                 *rate = (unsigned int)p[1];
1012         snd_printdd("getsampleformat %d %d %d\n", intdec[0], intdec[1], *rate);
1013         return 0;
1014 }
1015
1016 static int
1017 setsampleformat(struct cmdif *cif,
1018                 unsigned char mixer, unsigned char id,
1019                 unsigned char channels, unsigned char format)
1020 {
1021         unsigned char w, ch, sig, order;
1022
1023         snd_printdd
1024             ("setsampleformat mixer: %d id: %d channels: %d format: %d\n",
1025              mixer, id, channels, format);
1026         ch = channels == 1;
1027         w = snd_pcm_format_width(format) == 8;
1028         sig = snd_pcm_format_unsigned(format) != 0;
1029         order = snd_pcm_format_big_endian(format) != 0;
1030
1031         if (SEND_SETF(cif, mixer, w, ch, order, sig, id) &&
1032             SEND_SETF(cif, mixer, w, ch, order, sig, id)) {
1033                 snd_printdd("setsampleformat failed\n");
1034                 return -EIO;
1035         }
1036         return 0;
1037 }
1038
1039 static int
1040 setsamplerate(struct cmdif *cif, unsigned char *intdec, unsigned int rate)
1041 {
1042         u32 D, M, N;
1043         union cmdret rptr = CMDRET_ZERO;
1044         int i;
1045
1046         snd_printdd("setsamplerate intdec: %d,%d rate: %d\n", intdec[0],
1047                     intdec[1], rate);
1048         D = 48000;
1049         M = ((rate == 48000) ? 47999 : rate) * 65536;
1050         N = M % D;
1051         M /= D;
1052         for (i = 0; i < 2; i++) {
1053                 if (*intdec != 0xff) {
1054                         do {
1055                                 SEND_SSRC(cif, *intdec, D, M, N);
1056                                 SEND_RSRC(cif, *intdec, &rptr);
1057                         } while (rptr.retwords[1] != D &&
1058                                  rptr.retwords[2] != M &&
1059                                  rptr.retwords[3] != N &&
1060                                  i++ < MAX_WRITE_RETRY);
1061                         if (i == MAX_WRITE_RETRY) {
1062                                 snd_printdd("sent samplerate %d: %d failed\n",
1063                                             *intdec, rate);
1064                                 return -EIO;
1065                         }
1066                 }
1067                 intdec++;
1068         }
1069         return 0;
1070 }
1071
1072 static int
1073 getmixer(struct cmdif *cif, short num, unsigned short *rval,
1074          unsigned short *lval)
1075 {
1076         union cmdret rptr = CMDRET_ZERO;
1077
1078         if (SEND_RDGV(cif, num, num, &rptr) && SEND_RDGV(cif, num, num, &rptr))
1079                 return -EIO;
1080         *rval = rptr.retwords[0];
1081         *lval = rptr.retwords[1];
1082         snd_printdd("got mixer %d: 0x%d 0x%d\n", num, *rval, *lval);
1083         return 0;
1084 }
1085
1086 static void riptide_handleirq(unsigned long dev_id)
1087 {
1088         struct snd_riptide *chip = (void *)dev_id;
1089         struct cmdif *cif = chip->cif;
1090         struct snd_pcm_substream *substream[PLAYBACK_SUBSTREAMS + 1];
1091         struct snd_pcm_runtime *runtime;
1092         struct pcmhw *data = NULL;
1093         unsigned int pos, period_bytes;
1094         struct sgd *c;
1095         int i, j;
1096         unsigned int flag;
1097
1098         if (!cif)
1099                 return;
1100
1101         for (i = 0; i < PLAYBACK_SUBSTREAMS; i++)
1102                 substream[i] = chip->playback_substream[i];
1103         substream[i] = chip->capture_substream;
1104         for (i = 0; i < PLAYBACK_SUBSTREAMS + 1; i++) {
1105                 if (substream[i] &&
1106                     (runtime = substream[i]->runtime) &&
1107                     (data = runtime->private_data) && data->state != ST_STOP) {
1108                         pos = 0;
1109                         for (j = 0; j < data->pages; j++) {
1110                                 c = &data->sgdbuf[j];
1111                                 flag = le32_to_cpu(c->dwStat_Ctl);
1112                                 if (flag & EOB_STATUS)
1113                                         pos += le32_to_cpu(c->dwSegLen);
1114                                 if (flag & EOC_STATUS)
1115                                         pos += le32_to_cpu(c->dwSegLen);
1116                                 if ((flag & EOS_STATUS)
1117                                     && (data->state == ST_PLAY)) {
1118                                         data->state = ST_STOP;
1119                                         snd_printk(KERN_ERR
1120                                                    "Riptide: DMA stopped unexpectedly\n");
1121                                 }
1122                                 c->dwStat_Ctl =
1123                                     cpu_to_le32(flag &
1124                                                 ~(EOS_STATUS | EOB_STATUS |
1125                                                   EOC_STATUS));
1126                         }
1127                         data->pointer += pos;
1128                         pos += data->oldpos;
1129                         if (data->state != ST_STOP) {
1130                                 period_bytes =
1131                                     frames_to_bytes(runtime,
1132                                                     runtime->period_size);
1133                                 snd_printdd
1134                                     ("interrupt 0x%x after 0x%lx of 0x%lx frames in period\n",
1135                                      READ_AUDIO_STATUS(cif->hwport),
1136                                      bytes_to_frames(runtime, pos),
1137                                      runtime->period_size);
1138                                 j = 0;
1139                                 if (pos >= period_bytes) {
1140                                         j++;
1141                                         while (pos >= period_bytes)
1142                                                 pos -= period_bytes;
1143                                 }
1144                                 data->oldpos = pos;
1145                                 if (j > 0)
1146                                         snd_pcm_period_elapsed(substream[i]);
1147                         }
1148                 }
1149         }
1150 }
1151
1152 #ifdef CONFIG_PM
1153 static int riptide_suspend(struct pci_dev *pci, pm_message_t state)
1154 {
1155         struct snd_card *card = pci_get_drvdata(pci);
1156         struct snd_riptide *chip = card->private_data;
1157
1158         chip->in_suspend = 1;
1159         snd_power_change_state(card, SNDRV_CTL_POWER_D3hot);
1160         snd_pcm_suspend_all(chip->pcm);
1161         snd_ac97_suspend(chip->ac97);
1162         pci_disable_device(pci);
1163         pci_save_state(pci);
1164         pci_set_power_state(pci, pci_choose_state(pci, state));
1165         return 0;
1166 }
1167
1168 static int riptide_resume(struct pci_dev *pci)
1169 {
1170         struct snd_card *card = pci_get_drvdata(pci);
1171         struct snd_riptide *chip = card->private_data;
1172
1173         pci_set_power_state(pci, PCI_D0);
1174         pci_restore_state(pci);
1175         if (pci_enable_device(pci) < 0) {
1176                 printk(KERN_ERR "riptide: pci_enable_device failed, "
1177                        "disabling device\n");
1178                 snd_card_disconnect(card);
1179                 return -EIO;
1180         }
1181         pci_set_master(pci);
1182         snd_riptide_initialize(chip);
1183         snd_ac97_resume(chip->ac97);
1184         snd_power_change_state(card, SNDRV_CTL_POWER_D0);
1185         chip->in_suspend = 0;
1186         return 0;
1187 }
1188 #endif
1189
1190 static int try_to_load_firmware(struct cmdif *cif, struct snd_riptide *chip)
1191 {
1192         union firmware_version firmware = { .ret = CMDRET_ZERO };
1193         int i, timeout, err;
1194
1195         for (i = 0; i < 2; i++) {
1196                 WRITE_PORT_ULONG(cif->hwport->port[i].data1, 0);
1197                 WRITE_PORT_ULONG(cif->hwport->port[i].data2, 0);
1198         }
1199         SET_GRESET(cif->hwport);
1200         udelay(100);
1201         UNSET_GRESET(cif->hwport);
1202         udelay(100);
1203
1204         for (timeout = 100000; --timeout; udelay(10)) {
1205                 if (IS_READY(cif->hwport) && !IS_GERR(cif->hwport))
1206                         break;
1207         }
1208         if (!timeout) {
1209                 snd_printk(KERN_ERR
1210                            "Riptide: device not ready, audio status: 0x%x "
1211                            "ready: %d gerr: %d\n",
1212                            READ_AUDIO_STATUS(cif->hwport),
1213                            IS_READY(cif->hwport), IS_GERR(cif->hwport));
1214                 return -EIO;
1215         } else {
1216                 snd_printdd
1217                         ("Riptide: audio status: 0x%x ready: %d gerr: %d\n",
1218                          READ_AUDIO_STATUS(cif->hwport),
1219                          IS_READY(cif->hwport), IS_GERR(cif->hwport));
1220         }
1221
1222         SEND_GETV(cif, &firmware.ret);
1223         snd_printdd("Firmware version: ASIC: %d CODEC %d AUXDSP %d PROG %d\n",
1224                     firmware.firmware.ASIC, firmware.firmware.CODEC,
1225                     firmware.firmware.AUXDSP, firmware.firmware.PROG);
1226
1227         if (!chip)
1228                 return 1;
1229
1230         for (i = 0; i < FIRMWARE_VERSIONS; i++) {
1231                 if (!memcmp(&firmware_versions[i], &firmware, sizeof(firmware)))
1232                         return 1; /* OK */
1233
1234         }
1235
1236         snd_printdd("Writing Firmware\n");
1237         if (!chip->fw_entry) {
1238                 err = request_firmware(&chip->fw_entry, "riptide.hex",
1239                                        &chip->pci->dev);
1240                 if (err) {
1241                         snd_printk(KERN_ERR
1242                                    "Riptide: Firmware not available %d\n", err);
1243                         return -EIO;
1244                 }
1245         }
1246         err = loadfirmware(cif, chip->fw_entry->data, chip->fw_entry->size);
1247         if (err) {
1248                 snd_printk(KERN_ERR
1249                            "Riptide: Could not load firmware %d\n", err);
1250                 return err;
1251         }
1252
1253         chip->firmware = firmware;
1254
1255         return 1; /* OK */
1256 }
1257
1258 static int riptide_reset(struct cmdif *cif, struct snd_riptide *chip)
1259 {
1260         union cmdret rptr = CMDRET_ZERO;
1261         int err, tries;
1262
1263         if (!cif)
1264                 return -EINVAL;
1265
1266         cif->cmdcnt = 0;
1267         cif->cmdtime = 0;
1268         cif->cmdtimemax = 0;
1269         cif->cmdtimemin = 0xffffffff;
1270         cif->errcnt = 0;
1271         cif->is_reset = 0;
1272
1273         tries = RESET_TRIES;
1274         do {
1275                 err = try_to_load_firmware(cif, chip);
1276                 if (err < 0)
1277                         return err;
1278         } while (!err && --tries);
1279
1280         SEND_SACR(cif, 0, AC97_RESET);
1281         SEND_RACR(cif, AC97_RESET, &rptr);
1282         snd_printdd("AC97: 0x%x 0x%x\n", rptr.retlongs[0], rptr.retlongs[1]);
1283
1284         SEND_PLST(cif, 0);
1285         SEND_SLST(cif, 0);
1286         SEND_DLST(cif, 0);
1287         SEND_ALST(cif, 0);
1288         SEND_KDMA(cif);
1289
1290         writearm(cif, 0x301F8, 1, 1);
1291         writearm(cif, 0x301F4, 1, 1);
1292
1293         SEND_LSEL(cif, MODEM_CMD, 0, 0, MODEM_INTDEC, MODEM_MERGER,
1294                   MODEM_SPLITTER, MODEM_MIXER);
1295         setmixer(cif, MODEM_MIXER, 0x7fff, 0x7fff);
1296         alloclbuspath(cif, ARM2LBUS_FIFO13, lbus_play_modem, NULL, NULL);
1297
1298         SEND_LSEL(cif, FM_CMD, 0, 0, FM_INTDEC, FM_MERGER, FM_SPLITTER,
1299                   FM_MIXER);
1300         setmixer(cif, FM_MIXER, 0x7fff, 0x7fff);
1301         writearm(cif, 0x30648 + FM_MIXER * 4, 0x01, 0x00000005);
1302         writearm(cif, 0x301A8, 0x02, 0x00000002);
1303         writearm(cif, 0x30264, 0x08, 0xffffffff);
1304         alloclbuspath(cif, OPL3_SAMPLE, lbus_play_opl3, NULL, NULL);
1305
1306         SEND_SSRC(cif, I2S_INTDEC, 48000,
1307                   ((u32) I2S_RATE * 65536) / 48000,
1308                   ((u32) I2S_RATE * 65536) % 48000);
1309         SEND_LSEL(cif, I2S_CMD0, 0, 0, I2S_INTDEC, I2S_MERGER, I2S_SPLITTER,
1310                   I2S_MIXER);
1311         SEND_SI2S(cif, 1);
1312         alloclbuspath(cif, ARM2LBUS_FIFO0, lbus_play_i2s, NULL, NULL);
1313         alloclbuspath(cif, DIGITAL_MIXER_OUT0, lbus_play_out, NULL, NULL);
1314         alloclbuspath(cif, DIGITAL_MIXER_OUT0, lbus_play_outhp, NULL, NULL);
1315
1316         SET_AIACK(cif->hwport);
1317         SET_AIE(cif->hwport);
1318         SET_AIACK(cif->hwport);
1319         cif->is_reset = 1;
1320
1321         return 0;
1322 }
1323
1324 static struct snd_pcm_hardware snd_riptide_playback = {
1325         .info = (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
1326                  SNDRV_PCM_INFO_BLOCK_TRANSFER |
1327                  SNDRV_PCM_INFO_PAUSE | SNDRV_PCM_INFO_MMAP_VALID),
1328         .formats =
1329             SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S8
1330             | SNDRV_PCM_FMTBIT_U16_LE,
1331         .rates = SNDRV_PCM_RATE_KNOT | SNDRV_PCM_RATE_8000_48000,
1332         .rate_min = 5500,
1333         .rate_max = 48000,
1334         .channels_min = 1,
1335         .channels_max = 2,
1336         .buffer_bytes_max = (64 * 1024),
1337         .period_bytes_min = PAGE_SIZE >> 1,
1338         .period_bytes_max = PAGE_SIZE << 8,
1339         .periods_min = 2,
1340         .periods_max = 64,
1341         .fifo_size = 0,
1342 };
1343 static struct snd_pcm_hardware snd_riptide_capture = {
1344         .info = (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
1345                  SNDRV_PCM_INFO_BLOCK_TRANSFER |
1346                  SNDRV_PCM_INFO_PAUSE | SNDRV_PCM_INFO_MMAP_VALID),
1347         .formats =
1348             SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S8
1349             | SNDRV_PCM_FMTBIT_U16_LE,
1350         .rates = SNDRV_PCM_RATE_KNOT | SNDRV_PCM_RATE_8000_48000,
1351         .rate_min = 5500,
1352         .rate_max = 48000,
1353         .channels_min = 1,
1354         .channels_max = 2,
1355         .buffer_bytes_max = (64 * 1024),
1356         .period_bytes_min = PAGE_SIZE >> 1,
1357         .period_bytes_max = PAGE_SIZE << 3,
1358         .periods_min = 2,
1359         .periods_max = 64,
1360         .fifo_size = 0,
1361 };
1362
1363 static snd_pcm_uframes_t snd_riptide_pointer(struct snd_pcm_substream
1364                                              *substream)
1365 {
1366         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1367         struct snd_pcm_runtime *runtime = substream->runtime;
1368         struct pcmhw *data = get_pcmhwdev(substream);
1369         struct cmdif *cif = chip->cif;
1370         union cmdret rptr = CMDRET_ZERO;
1371         snd_pcm_uframes_t ret;
1372
1373         SEND_GPOS(cif, 0, data->id, &rptr);
1374         if (data->size && runtime->period_size) {
1375                 snd_printdd
1376                     ("pointer stream %d position 0x%x(0x%x in buffer) bytes 0x%lx(0x%lx in period) frames\n",
1377                      data->id, rptr.retlongs[1], rptr.retlongs[1] % data->size,
1378                      bytes_to_frames(runtime, rptr.retlongs[1]),
1379                      bytes_to_frames(runtime,
1380                                      rptr.retlongs[1]) % runtime->period_size);
1381                 if (rptr.retlongs[1] > data->pointer)
1382                         ret =
1383                             bytes_to_frames(runtime,
1384                                             rptr.retlongs[1] % data->size);
1385                 else
1386                         ret =
1387                             bytes_to_frames(runtime,
1388                                             data->pointer % data->size);
1389         } else {
1390                 snd_printdd("stream not started or strange parms (%d %ld)\n",
1391                             data->size, runtime->period_size);
1392                 ret = bytes_to_frames(runtime, 0);
1393         }
1394         return ret;
1395 }
1396
1397 static int snd_riptide_trigger(struct snd_pcm_substream *substream, int cmd)
1398 {
1399         int i, j;
1400         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1401         struct pcmhw *data = get_pcmhwdev(substream);
1402         struct cmdif *cif = chip->cif;
1403         union cmdret rptr = CMDRET_ZERO;
1404
1405         spin_lock(&chip->lock);
1406         switch (cmd) {
1407         case SNDRV_PCM_TRIGGER_START:
1408         case SNDRV_PCM_TRIGGER_RESUME:
1409                 if (!(data->state & ST_PLAY)) {
1410                         SEND_SSTR(cif, data->id, data->sgdlist.addr);
1411                         SET_AIE(cif->hwport);
1412                         data->state = ST_PLAY;
1413                         if (data->mixer != 0xff)
1414                                 setmixer(cif, data->mixer, 0x7fff, 0x7fff);
1415                         chip->openstreams++;
1416                         data->oldpos = 0;
1417                         data->pointer = 0;
1418                 }
1419                 break;
1420         case SNDRV_PCM_TRIGGER_STOP:
1421         case SNDRV_PCM_TRIGGER_SUSPEND:
1422                 if (data->mixer != 0xff)
1423                         setmixer(cif, data->mixer, 0, 0);
1424                 setmixer(cif, data->mixer, 0, 0);
1425                 SEND_KSTR(cif, data->id);
1426                 data->state = ST_STOP;
1427                 chip->openstreams--;
1428                 j = 0;
1429                 do {
1430                         i = rptr.retlongs[1];
1431                         SEND_GPOS(cif, 0, data->id, &rptr);
1432                         udelay(1);
1433                 } while (i != rptr.retlongs[1] && j++ < MAX_WRITE_RETRY);
1434                 if (j > MAX_WRITE_RETRY)
1435                         snd_printk(KERN_ERR "Riptide: Could not stop stream!");
1436                 break;
1437         case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
1438                 if (!(data->state & ST_PAUSE)) {
1439                         SEND_PSTR(cif, data->id);
1440                         data->state |= ST_PAUSE;
1441                         chip->openstreams--;
1442                 }
1443                 break;
1444         case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
1445                 if (data->state & ST_PAUSE) {
1446                         SEND_SSTR(cif, data->id, data->sgdlist.addr);
1447                         data->state &= ~ST_PAUSE;
1448                         chip->openstreams++;
1449                 }
1450                 break;
1451         default:
1452                 spin_unlock(&chip->lock);
1453                 return -EINVAL;
1454         }
1455         spin_unlock(&chip->lock);
1456         return 0;
1457 }
1458
1459 static int snd_riptide_prepare(struct snd_pcm_substream *substream)
1460 {
1461         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1462         struct snd_pcm_runtime *runtime = substream->runtime;
1463         struct pcmhw *data = get_pcmhwdev(substream);
1464         struct cmdif *cif = chip->cif;
1465         unsigned char *lbuspath = NULL;
1466         unsigned int rate, channels;
1467         int err = 0;
1468         snd_pcm_format_t format;
1469
1470         if (snd_BUG_ON(!cif || !data))
1471                 return -EINVAL;
1472
1473         snd_printdd("prepare id %d ch: %d f:0x%x r:%d\n", data->id,
1474                     runtime->channels, runtime->format, runtime->rate);
1475
1476         spin_lock_irq(&chip->lock);
1477         channels = runtime->channels;
1478         format = runtime->format;
1479         rate = runtime->rate;
1480         switch (channels) {
1481         case 1:
1482                 if (rate == 48000 && format == SNDRV_PCM_FORMAT_S16_LE)
1483                         lbuspath = data->paths.noconv;
1484                 else
1485                         lbuspath = data->paths.mono;
1486                 break;
1487         case 2:
1488                 if (rate == 48000 && format == SNDRV_PCM_FORMAT_S16_LE)
1489                         lbuspath = data->paths.noconv;
1490                 else
1491                         lbuspath = data->paths.stereo;
1492                 break;
1493         }
1494         snd_printdd("use sgdlist at 0x%p\n",
1495                     data->sgdlist.area);
1496         if (data->sgdlist.area) {
1497                 unsigned int i, j, size, pages, f, pt, period;
1498                 struct sgd *c, *p = NULL;
1499
1500                 size = frames_to_bytes(runtime, runtime->buffer_size);
1501                 period = frames_to_bytes(runtime, runtime->period_size);
1502                 f = PAGE_SIZE;
1503                 while ((size + (f >> 1) - 1) <= (f << 7) && (f << 1) > period)
1504                         f = f >> 1;
1505                 pages = (size + f - 1) / f;
1506                 data->size = size;
1507                 data->pages = pages;
1508                 snd_printdd
1509                     ("create sgd size: 0x%x pages %d of size 0x%x for period 0x%x\n",
1510                      size, pages, f, period);
1511                 pt = 0;
1512                 j = 0;
1513                 for (i = 0; i < pages; i++) {
1514                         unsigned int ofs, addr;
1515                         c = &data->sgdbuf[i];
1516                         if (p)
1517                                 p->dwNextLink = cpu_to_le32(data->sgdlist.addr +
1518                                                             (i *
1519                                                              sizeof(struct
1520                                                                     sgd)));
1521                         c->dwNextLink = cpu_to_le32(data->sgdlist.addr);
1522                         ofs = j << PAGE_SHIFT;
1523                         addr = snd_pcm_sgbuf_get_addr(substream, ofs) + pt;
1524                         c->dwSegPtrPhys = cpu_to_le32(addr);
1525                         pt = (pt + f) % PAGE_SIZE;
1526                         if (pt == 0)
1527                                 j++;
1528                         c->dwSegLen = cpu_to_le32(f);
1529                         c->dwStat_Ctl =
1530                             cpu_to_le32(IEOB_ENABLE | IEOS_ENABLE |
1531                                         IEOC_ENABLE);
1532                         p = c;
1533                         size -= f;
1534                 }
1535                 data->sgdbuf[i].dwSegLen = cpu_to_le32(size);
1536         }
1537         if (lbuspath && lbuspath != data->lbuspath) {
1538                 if (data->lbuspath)
1539                         freelbuspath(cif, data->source, data->lbuspath);
1540                 alloclbuspath(cif, data->source, lbuspath,
1541                               &data->mixer, data->intdec);
1542                 data->lbuspath = lbuspath;
1543                 data->rate = 0;
1544         }
1545         if (data->rate != rate || data->format != format ||
1546             data->channels != channels) {
1547                 data->rate = rate;
1548                 data->format = format;
1549                 data->channels = channels;
1550                 if (setsampleformat
1551                     (cif, data->mixer, data->id, channels, format)
1552                     || setsamplerate(cif, data->intdec, rate))
1553                         err = -EIO;
1554         }
1555         spin_unlock_irq(&chip->lock);
1556         return err;
1557 }
1558
1559 static int
1560 snd_riptide_hw_params(struct snd_pcm_substream *substream,
1561                       struct snd_pcm_hw_params *hw_params)
1562 {
1563         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1564         struct pcmhw *data = get_pcmhwdev(substream);
1565         struct snd_dma_buffer *sgdlist = &data->sgdlist;
1566         int err;
1567
1568         snd_printdd("hw params id %d (sgdlist: 0x%p 0x%lx %d)\n", data->id,
1569                     sgdlist->area, (unsigned long)sgdlist->addr,
1570                     (int)sgdlist->bytes);
1571         if (sgdlist->area)
1572                 snd_dma_free_pages(sgdlist);
1573         if ((err = snd_dma_alloc_pages(SNDRV_DMA_TYPE_DEV,
1574                                        snd_dma_pci_data(chip->pci),
1575                                        sizeof(struct sgd) * (DESC_MAX_MASK + 1),
1576                                        sgdlist)) < 0) {
1577                 snd_printk(KERN_ERR "Riptide: failed to alloc %d dma bytes\n",
1578                            (int)sizeof(struct sgd) * (DESC_MAX_MASK + 1));
1579                 return err;
1580         }
1581         data->sgdbuf = (struct sgd *)sgdlist->area;
1582         return snd_pcm_lib_malloc_pages(substream,
1583                                         params_buffer_bytes(hw_params));
1584 }
1585
1586 static int snd_riptide_hw_free(struct snd_pcm_substream *substream)
1587 {
1588         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1589         struct pcmhw *data = get_pcmhwdev(substream);
1590         struct cmdif *cif = chip->cif;
1591
1592         if (cif && data) {
1593                 if (data->lbuspath)
1594                         freelbuspath(cif, data->source, data->lbuspath);
1595                 data->lbuspath = NULL;
1596                 data->source = 0xff;
1597                 data->intdec[0] = 0xff;
1598                 data->intdec[1] = 0xff;
1599
1600                 if (data->sgdlist.area) {
1601                         snd_dma_free_pages(&data->sgdlist);
1602                         data->sgdlist.area = NULL;
1603                 }
1604         }
1605         return snd_pcm_lib_free_pages(substream);
1606 }
1607
1608 static int snd_riptide_playback_open(struct snd_pcm_substream *substream)
1609 {
1610         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1611         struct snd_pcm_runtime *runtime = substream->runtime;
1612         struct pcmhw *data;
1613         int sub_num = substream->number;
1614
1615         chip->playback_substream[sub_num] = substream;
1616         runtime->hw = snd_riptide_playback;
1617         data = kzalloc(sizeof(struct pcmhw), GFP_KERNEL);
1618         data->paths = lbus_play_paths[sub_num];
1619         data->id = play_ids[sub_num];
1620         data->source = play_sources[sub_num];
1621         data->intdec[0] = 0xff;
1622         data->intdec[1] = 0xff;
1623         data->state = ST_STOP;
1624         runtime->private_data = data;
1625         return snd_pcm_hw_constraint_integer(runtime,
1626                                              SNDRV_PCM_HW_PARAM_PERIODS);
1627 }
1628
1629 static int snd_riptide_capture_open(struct snd_pcm_substream *substream)
1630 {
1631         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1632         struct snd_pcm_runtime *runtime = substream->runtime;
1633         struct pcmhw *data;
1634
1635         chip->capture_substream = substream;
1636         runtime->hw = snd_riptide_capture;
1637         data = kzalloc(sizeof(struct pcmhw), GFP_KERNEL);
1638         data->paths = lbus_rec_path;
1639         data->id = PADC;
1640         data->source = ACLNK2PADC;
1641         data->intdec[0] = 0xff;
1642         data->intdec[1] = 0xff;
1643         data->state = ST_STOP;
1644         runtime->private_data = data;
1645         return snd_pcm_hw_constraint_integer(runtime,
1646                                              SNDRV_PCM_HW_PARAM_PERIODS);
1647 }
1648
1649 static int snd_riptide_playback_close(struct snd_pcm_substream *substream)
1650 {
1651         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1652         struct pcmhw *data = get_pcmhwdev(substream);
1653         int sub_num = substream->number;
1654
1655         substream->runtime->private_data = NULL;
1656         chip->playback_substream[sub_num] = NULL;
1657         kfree(data);
1658         return 0;
1659 }
1660
1661 static int snd_riptide_capture_close(struct snd_pcm_substream *substream)
1662 {
1663         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1664         struct pcmhw *data = get_pcmhwdev(substream);
1665
1666         substream->runtime->private_data = NULL;
1667         chip->capture_substream = NULL;
1668         kfree(data);
1669         return 0;
1670 }
1671
1672 static struct snd_pcm_ops snd_riptide_playback_ops = {
1673         .open = snd_riptide_playback_open,
1674         .close = snd_riptide_playback_close,
1675         .ioctl = snd_pcm_lib_ioctl,
1676         .hw_params = snd_riptide_hw_params,
1677         .hw_free = snd_riptide_hw_free,
1678         .prepare = snd_riptide_prepare,
1679         .page = snd_pcm_sgbuf_ops_page,
1680         .trigger = snd_riptide_trigger,
1681         .pointer = snd_riptide_pointer,
1682 };
1683 static struct snd_pcm_ops snd_riptide_capture_ops = {
1684         .open = snd_riptide_capture_open,
1685         .close = snd_riptide_capture_close,
1686         .ioctl = snd_pcm_lib_ioctl,
1687         .hw_params = snd_riptide_hw_params,
1688         .hw_free = snd_riptide_hw_free,
1689         .prepare = snd_riptide_prepare,
1690         .page = snd_pcm_sgbuf_ops_page,
1691         .trigger = snd_riptide_trigger,
1692         .pointer = snd_riptide_pointer,
1693 };
1694
1695 static int __devinit
1696 snd_riptide_pcm(struct snd_riptide *chip, int device, struct snd_pcm **rpcm)
1697 {
1698         struct snd_pcm *pcm;
1699         int err;
1700
1701         if (rpcm)
1702                 *rpcm = NULL;
1703         if ((err =
1704              snd_pcm_new(chip->card, "RIPTIDE", device, PLAYBACK_SUBSTREAMS, 1,
1705                          &pcm)) < 0)
1706                 return err;
1707         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK,
1708                         &snd_riptide_playback_ops);
1709         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE,
1710                         &snd_riptide_capture_ops);
1711         pcm->private_data = chip;
1712         pcm->info_flags = 0;
1713         strcpy(pcm->name, "RIPTIDE");
1714         chip->pcm = pcm;
1715         snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV_SG,
1716                                               snd_dma_pci_data(chip->pci),
1717                                               64 * 1024, 128 * 1024);
1718         if (rpcm)
1719                 *rpcm = pcm;
1720         return 0;
1721 }
1722
1723 static irqreturn_t
1724 snd_riptide_interrupt(int irq, void *dev_id)
1725 {
1726         struct snd_riptide *chip = dev_id;
1727         struct cmdif *cif = chip->cif;
1728
1729         if (cif) {
1730                 chip->received_irqs++;
1731                 if (IS_EOBIRQ(cif->hwport) || IS_EOSIRQ(cif->hwport) ||
1732                     IS_EOCIRQ(cif->hwport)) {
1733                         chip->handled_irqs++;
1734                         tasklet_schedule(&chip->riptide_tq);
1735                 }
1736                 if (chip->rmidi && IS_MPUIRQ(cif->hwport)) {
1737                         chip->handled_irqs++;
1738                         snd_mpu401_uart_interrupt(irq,
1739                                                   chip->rmidi->private_data);
1740                 }
1741                 SET_AIACK(cif->hwport);
1742         }
1743         return IRQ_HANDLED;
1744 }
1745
1746 static void
1747 snd_riptide_codec_write(struct snd_ac97 *ac97, unsigned short reg,
1748                         unsigned short val)
1749 {
1750         struct snd_riptide *chip = ac97->private_data;
1751         struct cmdif *cif = chip->cif;
1752         union cmdret rptr = CMDRET_ZERO;
1753         int i = 0;
1754
1755         if (snd_BUG_ON(!cif))
1756                 return;
1757
1758         snd_printdd("Write AC97 reg 0x%x 0x%x\n", reg, val);
1759         do {
1760                 SEND_SACR(cif, val, reg);
1761                 SEND_RACR(cif, reg, &rptr);
1762         } while (rptr.retwords[1] != val && i++ < MAX_WRITE_RETRY);
1763         if (i > MAX_WRITE_RETRY)
1764                 snd_printdd("Write AC97 reg failed\n");
1765 }
1766
1767 static unsigned short snd_riptide_codec_read(struct snd_ac97 *ac97,
1768                                              unsigned short reg)
1769 {
1770         struct snd_riptide *chip = ac97->private_data;
1771         struct cmdif *cif = chip->cif;
1772         union cmdret rptr = CMDRET_ZERO;
1773
1774         if (snd_BUG_ON(!cif))
1775                 return 0;
1776
1777         if (SEND_RACR(cif, reg, &rptr) != 0)
1778                 SEND_RACR(cif, reg, &rptr);
1779         snd_printdd("Read AC97 reg 0x%x got 0x%x\n", reg, rptr.retwords[1]);
1780         return rptr.retwords[1];
1781 }
1782
1783 static int snd_riptide_initialize(struct snd_riptide *chip)
1784 {
1785         struct cmdif *cif;
1786         unsigned int device_id;
1787         int err;
1788
1789         if (snd_BUG_ON(!chip))
1790                 return -EINVAL;
1791
1792         cif = chip->cif;
1793         if (!cif) {
1794                 if ((cif = kzalloc(sizeof(struct cmdif), GFP_KERNEL)) == NULL)
1795                         return -ENOMEM;
1796                 cif->hwport = (struct riptideport *)chip->port;
1797                 spin_lock_init(&cif->lock);
1798                 chip->cif = cif;
1799         }
1800         cif->is_reset = 0;
1801         if ((err = riptide_reset(cif, chip)) != 0)
1802                 return err;
1803         device_id = chip->device_id;
1804         switch (device_id) {
1805         case 0x4310:
1806         case 0x4320:
1807         case 0x4330:
1808                 snd_printdd("Modem enable?\n");
1809                 SEND_SETDPLL(cif);
1810                 break;
1811         }
1812         snd_printdd("Enabling MPU IRQs\n");
1813         if (chip->rmidi)
1814                 SET_EMPUIRQ(cif->hwport);
1815         return err;
1816 }
1817
1818 static int snd_riptide_free(struct snd_riptide *chip)
1819 {
1820         struct cmdif *cif;
1821
1822         if (!chip)
1823                 return 0;
1824
1825         if ((cif = chip->cif)) {
1826                 SET_GRESET(cif->hwport);
1827                 udelay(100);
1828                 UNSET_GRESET(cif->hwport);
1829                 kfree(chip->cif);
1830         }
1831         if (chip->irq >= 0)
1832                 free_irq(chip->irq, chip);
1833         if (chip->fw_entry)
1834                 release_firmware(chip->fw_entry);
1835         release_and_free_resource(chip->res_port);
1836         kfree(chip);
1837         return 0;
1838 }
1839
1840 static int snd_riptide_dev_free(struct snd_device *device)
1841 {
1842         struct snd_riptide *chip = device->device_data;
1843
1844         return snd_riptide_free(chip);
1845 }
1846
1847 static int __devinit
1848 snd_riptide_create(struct snd_card *card, struct pci_dev *pci,
1849                    struct snd_riptide **rchip)
1850 {
1851         struct snd_riptide *chip;
1852         struct riptideport *hwport;
1853         int err;
1854         static struct snd_device_ops ops = {
1855                 .dev_free = snd_riptide_dev_free,
1856         };
1857
1858         *rchip = NULL;
1859         if ((err = pci_enable_device(pci)) < 0)
1860                 return err;
1861         if (!(chip = kzalloc(sizeof(struct snd_riptide), GFP_KERNEL)))
1862                 return -ENOMEM;
1863
1864         spin_lock_init(&chip->lock);
1865         chip->card = card;
1866         chip->pci = pci;
1867         chip->irq = -1;
1868         chip->openstreams = 0;
1869         chip->port = pci_resource_start(pci, 0);
1870         chip->received_irqs = 0;
1871         chip->handled_irqs = 0;
1872         chip->cif = NULL;
1873         tasklet_init(&chip->riptide_tq, riptide_handleirq, (unsigned long)chip);
1874
1875         if ((chip->res_port =
1876              request_region(chip->port, 64, "RIPTIDE")) == NULL) {
1877                 snd_printk(KERN_ERR
1878                            "Riptide: unable to grab region 0x%lx-0x%lx\n",
1879                            chip->port, chip->port + 64 - 1);
1880                 snd_riptide_free(chip);
1881                 return -EBUSY;
1882         }
1883         hwport = (struct riptideport *)chip->port;
1884         UNSET_AIE(hwport);
1885
1886         if (request_irq(pci->irq, snd_riptide_interrupt, IRQF_SHARED,
1887                         "RIPTIDE", chip)) {
1888                 snd_printk(KERN_ERR "Riptide: unable to grab IRQ %d\n",
1889                            pci->irq);
1890                 snd_riptide_free(chip);
1891                 return -EBUSY;
1892         }
1893         chip->irq = pci->irq;
1894         chip->device_id = pci->device;
1895         pci_set_master(pci);
1896         if ((err = snd_riptide_initialize(chip)) < 0) {
1897                 snd_riptide_free(chip);
1898                 return err;
1899         }
1900
1901         if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
1902                 snd_riptide_free(chip);
1903                 return err;
1904         }
1905
1906         snd_card_set_dev(card, &pci->dev);
1907
1908         *rchip = chip;
1909         return 0;
1910 }
1911
1912 static void
1913 snd_riptide_proc_read(struct snd_info_entry *entry,
1914                       struct snd_info_buffer *buffer)
1915 {
1916         struct snd_riptide *chip = entry->private_data;
1917         struct pcmhw *data;
1918         int i;
1919         struct cmdif *cif = NULL;
1920         unsigned char p[256];
1921         unsigned short rval = 0, lval = 0;
1922         unsigned int rate;
1923
1924         if (!chip)
1925                 return;
1926
1927         snd_iprintf(buffer, "%s\n\n", chip->card->longname);
1928         snd_iprintf(buffer, "Device ID: 0x%x\nReceived IRQs: (%ld)%ld\nPorts:",
1929                     chip->device_id, chip->handled_irqs, chip->received_irqs);
1930         for (i = 0; i < 64; i += 4)
1931                 snd_iprintf(buffer, "%c%02x: %08x",
1932                             (i % 16) ? ' ' : '\n', i, inl(chip->port + i));
1933         if ((cif = chip->cif)) {
1934                 snd_iprintf(buffer,
1935                             "\nVersion: ASIC: %d CODEC: %d AUXDSP: %d PROG: %d",
1936                             chip->firmware.firmware.ASIC,
1937                             chip->firmware.firmware.CODEC,
1938                             chip->firmware.firmware.AUXDSP,
1939                             chip->firmware.firmware.PROG);
1940                 snd_iprintf(buffer, "\nDigital mixer:");
1941                 for (i = 0; i < 12; i++) {
1942                         getmixer(cif, i, &rval, &lval);
1943                         snd_iprintf(buffer, "\n %d: %d %d", i, rval, lval);
1944                 }
1945                 snd_iprintf(buffer,
1946                             "\nARM Commands num: %d failed: %d time: %d max: %d min: %d",
1947                             cif->cmdcnt, cif->errcnt,
1948                             cif->cmdtime, cif->cmdtimemax, cif->cmdtimemin);
1949         }
1950         snd_iprintf(buffer, "\nOpen streams %d:\n", chip->openstreams);
1951         for (i = 0; i < PLAYBACK_SUBSTREAMS; i++) {
1952                 if (chip->playback_substream[i]
1953                     && chip->playback_substream[i]->runtime
1954                     && (data =
1955                         chip->playback_substream[i]->runtime->private_data)) {
1956                         snd_iprintf(buffer,
1957                                     "stream: %d mixer: %d source: %d (%d,%d)\n",
1958                                     data->id, data->mixer, data->source,
1959                                     data->intdec[0], data->intdec[1]);
1960                         if (!(getsamplerate(cif, data->intdec, &rate)))
1961                                 snd_iprintf(buffer, "rate: %d\n", rate);
1962                 }
1963         }
1964         if (chip->capture_substream
1965             && chip->capture_substream->runtime
1966             && (data = chip->capture_substream->runtime->private_data)) {
1967                 snd_iprintf(buffer,
1968                             "stream: %d mixer: %d source: %d (%d,%d)\n",
1969                             data->id, data->mixer,
1970                             data->source, data->intdec[0], data->intdec[1]);
1971                 if (!(getsamplerate(cif, data->intdec, &rate)))
1972                         snd_iprintf(buffer, "rate: %d\n", rate);
1973         }
1974         snd_iprintf(buffer, "Paths:\n");
1975         i = getpaths(cif, p);
1976         while (i--) {
1977                 snd_iprintf(buffer, "%x->%x ", p[i - 1], p[i]);
1978                 i--;
1979         }
1980         snd_iprintf(buffer, "\n");
1981 }
1982
1983 static void __devinit snd_riptide_proc_init(struct snd_riptide *chip)
1984 {
1985         struct snd_info_entry *entry;
1986
1987         if (!snd_card_proc_new(chip->card, "riptide", &entry))
1988                 snd_info_set_text_ops(entry, chip, snd_riptide_proc_read);
1989 }
1990
1991 static int __devinit snd_riptide_mixer(struct snd_riptide *chip)
1992 {
1993         struct snd_ac97_bus *pbus;
1994         struct snd_ac97_template ac97;
1995         int err = 0;
1996         static struct snd_ac97_bus_ops ops = {
1997                 .write = snd_riptide_codec_write,
1998                 .read = snd_riptide_codec_read,
1999         };
2000
2001         memset(&ac97, 0, sizeof(ac97));
2002         ac97.private_data = chip;
2003         ac97.scaps = AC97_SCAP_SKIP_MODEM;
2004
2005         if ((err = snd_ac97_bus(chip->card, 0, &ops, chip, &pbus)) < 0)
2006                 return err;
2007
2008         chip->ac97_bus = pbus;
2009         ac97.pci = chip->pci;
2010         if ((err = snd_ac97_mixer(pbus, &ac97, &chip->ac97)) < 0)
2011                 return err;
2012         return err;
2013 }
2014
2015 #ifdef SUPPORT_JOYSTICK
2016
2017 static int __devinit
2018 snd_riptide_joystick_probe(struct pci_dev *pci, const struct pci_device_id *id)
2019 {
2020         static int dev;
2021         struct gameport *gameport;
2022
2023         if (dev >= SNDRV_CARDS)
2024                 return -ENODEV;
2025         if (!enable[dev]) {
2026                 dev++;
2027                 return -ENOENT;
2028         }
2029
2030         if (!joystick_port[dev++])
2031                 return 0;
2032
2033         gameport = gameport_allocate_port();
2034         if (!gameport)
2035                 return -ENOMEM;
2036         if (!request_region(joystick_port[dev], 8, "Riptide gameport")) {
2037                 snd_printk(KERN_WARNING
2038                            "Riptide: cannot grab gameport 0x%x\n",
2039                            joystick_port[dev]);
2040                 gameport_free_port(gameport);
2041                 return -EBUSY;
2042         }
2043
2044         gameport->io = joystick_port[dev];
2045         gameport_register_port(gameport);
2046         pci_set_drvdata(pci, gameport);
2047         return 0;
2048 }
2049
2050 static void __devexit snd_riptide_joystick_remove(struct pci_dev *pci)
2051 {
2052         struct gameport *gameport = pci_get_drvdata(pci);
2053         if (gameport) {
2054                 release_region(gameport->io, 8);
2055                 gameport_unregister_port(gameport);
2056                 pci_set_drvdata(pci, NULL);
2057         }
2058 }
2059 #endif
2060
2061 static int __devinit
2062 snd_card_riptide_probe(struct pci_dev *pci, const struct pci_device_id *pci_id)
2063 {
2064         static int dev;
2065         struct snd_card *card;
2066         struct snd_riptide *chip;
2067         unsigned short val;
2068         int err;
2069
2070         if (dev >= SNDRV_CARDS)
2071                 return -ENODEV;
2072         if (!enable[dev]) {
2073                 dev++;
2074                 return -ENOENT;
2075         }
2076
2077         err = snd_card_create(index[dev], id[dev], THIS_MODULE, 0, &card);
2078         if (err < 0)
2079                 return err;
2080         err = snd_riptide_create(card, pci, &chip);
2081         if (err < 0)
2082                 goto error;
2083         card->private_data = chip;
2084         err = snd_riptide_pcm(chip, 0, NULL);
2085         if (err < 0)
2086                 goto error;
2087         err = snd_riptide_mixer(chip);
2088         if (err < 0)
2089                 goto error;
2090
2091         val = LEGACY_ENABLE_ALL;
2092         if (opl3_port[dev])
2093                 val |= LEGACY_ENABLE_FM;
2094 #ifdef SUPPORT_JOYSTICK
2095         if (joystick_port[dev])
2096                 val |= LEGACY_ENABLE_GAMEPORT;
2097 #endif
2098         if (mpu_port[dev])
2099                 val |= LEGACY_ENABLE_MPU_INT | LEGACY_ENABLE_MPU;
2100         val |= (chip->irq << 4) & 0xf0;
2101         pci_write_config_word(chip->pci, PCI_EXT_Legacy_Mask, val);
2102         if (mpu_port[dev]) {
2103                 val = mpu_port[dev];
2104                 pci_write_config_word(chip->pci, PCI_EXT_MPU_Base, val);
2105                 err = snd_mpu401_uart_new(card, 0, MPU401_HW_RIPTIDE,
2106                                           val, 0, chip->irq, 0,
2107                                           &chip->rmidi);
2108                 if (err < 0)
2109                         snd_printk(KERN_WARNING
2110                                    "Riptide: Can't Allocate MPU at 0x%x\n",
2111                                    val);
2112                 else
2113                         chip->mpuaddr = val;
2114         }
2115         if (opl3_port[dev]) {
2116                 val = opl3_port[dev];
2117                 pci_write_config_word(chip->pci, PCI_EXT_FM_Base, val);
2118                 err = snd_opl3_create(card, val, val + 2,
2119                                       OPL3_HW_RIPTIDE, 0, &chip->opl3);
2120                 if (err < 0)
2121                         snd_printk(KERN_WARNING
2122                                    "Riptide: Can't Allocate OPL3 at 0x%x\n",
2123                                    val);
2124                 else {
2125                         chip->opladdr = val;
2126                         err = snd_opl3_hwdep_new(chip->opl3, 0, 1, NULL);
2127                         if (err < 0)
2128                                 snd_printk(KERN_WARNING
2129                                            "Riptide: Can't Allocate OPL3-HWDEP\n");
2130                 }
2131         }
2132 #ifdef SUPPORT_JOYSTICK
2133         if (joystick_port[dev]) {
2134                 val = joystick_port[dev];
2135                 pci_write_config_word(chip->pci, PCI_EXT_Game_Base, val);
2136                 chip->gameaddr = val;
2137         }
2138 #endif
2139
2140         strcpy(card->driver, "RIPTIDE");
2141         strcpy(card->shortname, "Riptide");
2142 #ifdef SUPPORT_JOYSTICK
2143         snprintf(card->longname, sizeof(card->longname),
2144                  "%s at 0x%lx, irq %i mpu 0x%x opl3 0x%x gameport 0x%x",
2145                  card->shortname, chip->port, chip->irq, chip->mpuaddr,
2146                  chip->opladdr, chip->gameaddr);
2147 #else
2148         snprintf(card->longname, sizeof(card->longname),
2149                  "%s at 0x%lx, irq %i mpu 0x%x opl3 0x%x",
2150                  card->shortname, chip->port, chip->irq, chip->mpuaddr,
2151                  chip->opladdr);
2152 #endif
2153         snd_riptide_proc_init(chip);
2154         err = snd_card_register(card);
2155         if (err < 0)
2156                 goto error;
2157         pci_set_drvdata(pci, card);
2158         dev++;
2159         return 0;
2160
2161  error:
2162         snd_card_free(card);
2163         return err;
2164 }
2165
2166 static void __devexit snd_card_riptide_remove(struct pci_dev *pci)
2167 {
2168         snd_card_free(pci_get_drvdata(pci));
2169         pci_set_drvdata(pci, NULL);
2170 }
2171
2172 static struct pci_driver driver = {
2173         .name = "RIPTIDE",
2174         .id_table = snd_riptide_ids,
2175         .probe = snd_card_riptide_probe,
2176         .remove = __devexit_p(snd_card_riptide_remove),
2177 #ifdef CONFIG_PM
2178         .suspend = riptide_suspend,
2179         .resume = riptide_resume,
2180 #endif
2181 };
2182
2183 #ifdef SUPPORT_JOYSTICK
2184 static struct pci_driver joystick_driver = {
2185         .name = "Riptide Joystick",
2186         .id_table = snd_riptide_joystick_ids,
2187         .probe = snd_riptide_joystick_probe,
2188         .remove = __devexit_p(snd_riptide_joystick_remove),
2189 };
2190 #endif
2191
2192 static int __init alsa_card_riptide_init(void)
2193 {
2194         int err;
2195         err = pci_register_driver(&driver);
2196         if (err < 0)
2197                 return err;
2198 #if defined(SUPPORT_JOYSTICK)
2199         err = pci_register_driver(&joystick_driver);
2200         /* On failure unregister formerly registered audio driver */
2201         if (err < 0)
2202                 pci_unregister_driver(&driver);
2203 #endif
2204         return err;
2205 }
2206
2207 static void __exit alsa_card_riptide_exit(void)
2208 {
2209         pci_unregister_driver(&driver);
2210 #if defined(SUPPORT_JOYSTICK)
2211         pci_unregister_driver(&joystick_driver);
2212 #endif
2213 }
2214
2215 module_init(alsa_card_riptide_init);
2216 module_exit(alsa_card_riptide_exit);