Merge git://git.kernel.org/pub/scm/linux/kernel/git/herbert/crypto-2.6
[linux-2.6] / 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         {
511          .vendor = 0x127a,.device = 0x4310,
512          .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
513          },
514         {
515          .vendor = 0x127a,.device = 0x4320,
516          .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
517          },
518         {
519          .vendor = 0x127a,.device = 0x4330,
520          .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
521          },
522         {
523          .vendor = 0x127a,.device = 0x4340,
524          .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
525          },
526         {0,},
527 };
528
529 #ifdef SUPPORT_JOYSTICK
530 static struct pci_device_id snd_riptide_joystick_ids[] __devinitdata = {
531         {
532          .vendor = 0x127a,.device = 0x4312,
533          .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
534          },
535         {
536          .vendor = 0x127a,.device = 0x4322,
537          .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
538          },
539         {.vendor = 0x127a,.device = 0x4332,
540          .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
541          },
542         {.vendor = 0x127a,.device = 0x4342,
543          .subvendor = PCI_ANY_ID,.subdevice = PCI_ANY_ID,
544          },
545         {0,},
546 };
547 #endif
548
549 MODULE_DEVICE_TABLE(pci, snd_riptide_ids);
550
551 /*
552  */
553
554 static unsigned char lbusin2out[E2SINK_MAX + 1][2] = {
555         {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2}, {NO_OUT, LS_NONE1}, {NO_OUT,
556                                                                      LS_NONE2},
557         {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2}, {NO_OUT, LS_NONE1}, {NO_OUT,
558                                                                      LS_NONE2},
559         {INTER0_OUT, LS_SRC_INTERPOLATOR}, {INTER1_OUT, LS_SRC_INTERPOLATOR},
560         {INTER2_OUT, LS_SRC_INTERPOLATOR}, {INTER3_OUT, LS_SRC_INTERPOLATOR},
561         {INTER4_OUT, LS_SRC_INTERPOLATOR}, {INTERM0_OUT, LS_SRC_INTERPOLATORM},
562         {INTERM1_OUT, LS_SRC_INTERPOLATORM}, {INTERM2_OUT,
563                                               LS_SRC_INTERPOLATORM},
564         {INTERM3_OUT, LS_SRC_INTERPOLATORM}, {INTERM4_OUT,
565                                               LS_SRC_INTERPOLATORM},
566         {INTERM5_OUT, LS_SRC_INTERPOLATORM}, {INTERM6_OUT,
567                                               LS_SRC_INTERPOLATORM},
568         {DECIMM0_OUT, LS_SRC_DECIMATORM}, {DECIMM1_OUT, LS_SRC_DECIMATORM},
569         {DECIMM2_OUT, LS_SRC_DECIMATORM}, {DECIMM3_OUT, LS_SRC_DECIMATORM},
570         {DECIM0_OUT, LS_SRC_DECIMATOR}, {SR3_4_OUT, LS_NONE1}, {NO_OUT,
571                                                                 LS_NONE2},
572         {NO_OUT, LS_NONE1}, {NO_OUT, LS_NONE2}, {NO_OUT, LS_NONE1},
573         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
574         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
575         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
576         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
577         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
578         {DIGITAL_MIXER_OUT0, LS_MIXER_IN}, {DIGITAL_MIXER_OUT0, LS_MIXER_IN},
579         {GAINFUNC0_OUT, LS_MIXER_GAIN_FUNCTION}, {GAINFUNC1_OUT,
580                                                   LS_MIXER_GAIN_FUNCTION},
581         {GAINFUNC2_OUT, LS_MIXER_GAIN_FUNCTION}, {GAINFUNC3_OUT,
582                                                   LS_MIXER_GAIN_FUNCTION},
583         {GAINFUNC4_OUT, LS_MIXER_GAIN_FUNCTION}, {SOFTMODEMTX, LS_NONE1},
584         {SPLITTER0_OUTL, LS_SRC_SPLITTER}, {SPLITTER1_OUTL, LS_SRC_SPLITTER},
585         {SPLITTER2_OUTL, LS_SRC_SPLITTER}, {SPLITTER3_OUTL, LS_SRC_SPLITTER},
586         {MERGER0_OUT, LS_SRC_MERGER}, {MERGER0_OUT, LS_SRC_MERGER},
587         {MERGER1_OUT, LS_SRC_MERGER},
588         {MERGER1_OUT, LS_SRC_MERGER}, {MERGER2_OUT, LS_SRC_MERGER},
589         {MERGER2_OUT, LS_SRC_MERGER},
590         {MERGER3_OUT, LS_SRC_MERGER}, {MERGER3_OUT, LS_SRC_MERGER}, {NO_OUT,
591                                                                      LS_NONE2},
592 };
593
594 static unsigned char lbus_play_opl3[] = {
595         DIGITAL_MIXER_IN0 + FM_MIXER, 0xff
596 };
597 static unsigned char lbus_play_modem[] = {
598         DIGITAL_MIXER_IN0 + MODEM_MIXER, 0xff
599 };
600 static unsigned char lbus_play_i2s[] = {
601         INTER0_IN + I2S_INTDEC, DIGITAL_MIXER_IN0 + I2S_MIXER, 0xff
602 };
603 static unsigned char lbus_play_out[] = {
604         PDAC2ACLNK, 0xff
605 };
606 static unsigned char lbus_play_outhp[] = {
607         HNDSPK2ACLNK, 0xff
608 };
609 static unsigned char lbus_play_noconv1[] = {
610         DIGITAL_MIXER_IN0, 0xff
611 };
612 static unsigned char lbus_play_stereo1[] = {
613         INTER0_IN, DIGITAL_MIXER_IN0, 0xff
614 };
615 static unsigned char lbus_play_mono1[] = {
616         INTERM0_IN, DIGITAL_MIXER_IN0, 0xff
617 };
618 static unsigned char lbus_play_noconv2[] = {
619         DIGITAL_MIXER_IN1, 0xff
620 };
621 static unsigned char lbus_play_stereo2[] = {
622         INTER1_IN, DIGITAL_MIXER_IN1, 0xff
623 };
624 static unsigned char lbus_play_mono2[] = {
625         INTERM1_IN, DIGITAL_MIXER_IN1, 0xff
626 };
627 static unsigned char lbus_play_noconv3[] = {
628         DIGITAL_MIXER_IN2, 0xff
629 };
630 static unsigned char lbus_play_stereo3[] = {
631         INTER2_IN, DIGITAL_MIXER_IN2, 0xff
632 };
633 static unsigned char lbus_play_mono3[] = {
634         INTERM2_IN, DIGITAL_MIXER_IN2, 0xff
635 };
636 static unsigned char lbus_rec_noconv1[] = {
637         LBUS2ARM_FIFO5, 0xff
638 };
639 static unsigned char lbus_rec_stereo1[] = {
640         DECIM0_IN, LBUS2ARM_FIFO5, 0xff
641 };
642 static unsigned char lbus_rec_mono1[] = {
643         DECIMM3_IN, LBUS2ARM_FIFO5, 0xff
644 };
645
646 static unsigned char play_ids[] = { 4, 1, 2, };
647 static unsigned char play_sources[] = {
648         ARM2LBUS_FIFO4, ARM2LBUS_FIFO1, ARM2LBUS_FIFO2,
649 };
650 static struct lbuspath lbus_play_paths[] = {
651         {
652          .noconv = lbus_play_noconv1,
653          .stereo = lbus_play_stereo1,
654          .mono = lbus_play_mono1,
655          },
656         {
657          .noconv = lbus_play_noconv2,
658          .stereo = lbus_play_stereo2,
659          .mono = lbus_play_mono2,
660          },
661         {
662          .noconv = lbus_play_noconv3,
663          .stereo = lbus_play_stereo3,
664          .mono = lbus_play_mono3,
665          },
666 };
667 static struct lbuspath lbus_rec_path = {
668         .noconv = lbus_rec_noconv1,
669         .stereo = lbus_rec_stereo1,
670         .mono = lbus_rec_mono1,
671 };
672
673 #define FIRMWARE_VERSIONS 1
674 static union firmware_version firmware_versions[] = {
675         {
676                 .firmware = {
677                         .ASIC = 3,
678                         .CODEC = 2,
679                         .AUXDSP = 3,
680                         .PROG = 773,
681                 },
682         },
683 };
684
685 static u32 atoh(const unsigned char *in, unsigned int len)
686 {
687         u32 sum = 0;
688         unsigned int mult = 1;
689         unsigned char c;
690
691         while (len) {
692                 c = in[len - 1];
693                 if ((c >= '0') && (c <= '9'))
694                         sum += mult * (c - '0');
695                 else if ((c >= 'A') && (c <= 'F'))
696                         sum += mult * (c - ('A' - 10));
697                 else if ((c >= 'a') && (c <= 'f'))
698                         sum += mult * (c - ('a' - 10));
699                 mult *= 16;
700                 --len;
701         }
702         return sum;
703 }
704
705 static int senddata(struct cmdif *cif, const unsigned char *in, u32 offset)
706 {
707         u32 addr;
708         u32 data;
709         u32 i;
710         const unsigned char *p;
711
712         i = atoh(&in[1], 2);
713         addr = offset + atoh(&in[3], 4);
714         if (SEND_SMEM(cif, 0, addr) != 0)
715                 return -EACCES;
716         p = in + 9;
717         while (i) {
718                 data = atoh(p, 8);
719                 if (SEND_WMEM(cif, 2,
720                               ((data & 0x0f0f0f0f) << 4) | ((data & 0xf0f0f0f0)
721                                                             >> 4)))
722                         return -EACCES;
723                 i -= 4;
724                 p += 8;
725         }
726         return 0;
727 }
728
729 static int loadfirmware(struct cmdif *cif, const unsigned char *img,
730                         unsigned int size)
731 {
732         const unsigned char *in;
733         u32 laddr, saddr, t, val;
734         int err = 0;
735
736         laddr = saddr = 0;
737         while (size > 0 && err == 0) {
738                 in = img;
739                 if (in[0] == ':') {
740                         t = atoh(&in[7], 2);
741                         switch (t) {
742                         case DATA_REC:
743                                 err = senddata(cif, in, laddr + saddr);
744                                 break;
745                         case EXT_SEG_ADDR_REC:
746                                 saddr = atoh(&in[9], 4) << 4;
747                                 break;
748                         case EXT_LIN_ADDR_REC:
749                                 laddr = atoh(&in[9], 4) << 16;
750                                 break;
751                         case EXT_GOTO_CMD_REC:
752                                 val = atoh(&in[9], 8);
753                                 if (SEND_GOTO(cif, val) != 0)
754                                         err = -EACCES;
755                                 break;
756                         case EXT_END_OF_FILE:
757                                 size = 0;
758                                 break;
759                         default:
760                                 break;
761                         }
762                         while (size > 0) {
763                                 size--;
764                                 if (*img++ == '\n')
765                                         break;
766                         }
767                 }
768         }
769         snd_printdd("load firmware return %d\n", err);
770         return err;
771 }
772
773 static void
774 alloclbuspath(struct cmdif *cif, unsigned char source,
775               unsigned char *path, unsigned char *mixer, unsigned char *s)
776 {
777         while (*path != 0xff) {
778                 unsigned char sink, type;
779
780                 sink = *path & (~SPLIT_PATH);
781                 if (sink != E2SINK_MAX) {
782                         snd_printdd("alloc path 0x%x->0x%x\n", source, sink);
783                         SEND_PSEL(cif, source, sink);
784                         source = lbusin2out[sink][0];
785                         type = lbusin2out[sink][1];
786                         if (type == LS_MIXER_IN) {
787                                 if (mixer)
788                                         *mixer = sink - DIGITAL_MIXER_IN0;
789                         }
790                         if (type == LS_SRC_DECIMATORM ||
791                             type == LS_SRC_DECIMATOR ||
792                             type == LS_SRC_INTERPOLATORM ||
793                             type == LS_SRC_INTERPOLATOR) {
794                                 if (s) {
795                                         if (s[0] != 0xff)
796                                                 s[1] = sink;
797                                         else
798                                                 s[0] = sink;
799                                 }
800                         }
801                 }
802                 if (*path++ & SPLIT_PATH) {
803                         unsigned char *npath = path;
804
805                         while (*npath != 0xff)
806                                 npath++;
807                         alloclbuspath(cif, source + 1, ++npath, mixer, s);
808                 }
809         }
810 }
811
812 static void
813 freelbuspath(struct cmdif *cif, unsigned char source, unsigned char *path)
814 {
815         while (*path != 0xff) {
816                 unsigned char sink;
817
818                 sink = *path & (~SPLIT_PATH);
819                 if (sink != E2SINK_MAX) {
820                         snd_printdd("free path 0x%x->0x%x\n", source, sink);
821                         SEND_PCLR(cif, source, sink);
822                         source = lbusin2out[sink][0];
823                 }
824                 if (*path++ & SPLIT_PATH) {
825                         unsigned char *npath = path;
826
827                         while (*npath != 0xff)
828                                 npath++;
829                         freelbuspath(cif, source + 1, ++npath);
830                 }
831         }
832 }
833
834 static int writearm(struct cmdif *cif, u32 addr, u32 data, u32 mask)
835 {
836         union cmdret rptr = CMDRET_ZERO;
837         unsigned int i = MAX_WRITE_RETRY;
838         int flag = 1;
839
840         SEND_RMEM(cif, 0x02, addr, &rptr);
841         rptr.retlongs[0] &= (~mask);
842
843         while (--i) {
844                 SEND_SMEM(cif, 0x01, addr);
845                 SEND_WMEM(cif, 0x02, (rptr.retlongs[0] | data));
846                 SEND_RMEM(cif, 0x02, addr, &rptr);
847                 if ((rptr.retlongs[0] & data) == data) {
848                         flag = 0;
849                         break;
850                 } else
851                         rptr.retlongs[0] &= ~mask;
852         }
853         snd_printdd("send arm 0x%x 0x%x 0x%x return %d\n", addr, data, mask,
854                     flag);
855         return flag;
856 }
857
858 static int sendcmd(struct cmdif *cif, u32 flags, u32 cmd, u32 parm,
859                    union cmdret *ret)
860 {
861         int i, j;
862         int err;
863         unsigned int time = 0;
864         unsigned long irqflags;
865         struct riptideport *hwport;
866         struct cmdport *cmdport = NULL;
867
868         if (snd_BUG_ON(!cif))
869                 return -EINVAL;
870
871         hwport = cif->hwport;
872         if (cif->errcnt > MAX_ERROR_COUNT) {
873                 if (cif->is_reset) {
874                         snd_printk(KERN_ERR
875                                    "Riptide: Too many failed cmds, reinitializing\n");
876                         if (riptide_reset(cif, NULL) == 0) {
877                                 cif->errcnt = 0;
878                                 return -EIO;
879                         }
880                 }
881                 snd_printk(KERN_ERR "Riptide: Initialization failed.\n");
882                 return -EINVAL;
883         }
884         if (ret) {
885                 ret->retlongs[0] = 0;
886                 ret->retlongs[1] = 0;
887         }
888         i = 0;
889         spin_lock_irqsave(&cif->lock, irqflags);
890         while (i++ < CMDIF_TIMEOUT && !IS_READY(cif->hwport))
891                 udelay(10);
892         if (i > CMDIF_TIMEOUT) {
893                 err = -EBUSY;
894                 goto errout;
895         }
896
897         err = 0;
898         for (j = 0, time = 0; time < CMDIF_TIMEOUT; j++, time += 2) {
899                 cmdport = &(hwport->port[j % 2]);
900                 if (IS_DATF(cmdport)) { /* free pending data */
901                         READ_PORT_ULONG(cmdport->data1);
902                         READ_PORT_ULONG(cmdport->data2);
903                 }
904                 if (IS_CMDE(cmdport)) {
905                         if (flags & PARM)       /* put data */
906                                 WRITE_PORT_ULONG(cmdport->data2, parm);
907                         WRITE_PORT_ULONG(cmdport->data1, cmd);  /* write cmd */
908                         if ((flags & RESP) && ret) {
909                                 while (!IS_DATF(cmdport) &&
910                                        time < CMDIF_TIMEOUT) {
911                                         udelay(10);
912                                         time++;
913                                 }
914                                 if (time < CMDIF_TIMEOUT) {     /* read response */
915                                         ret->retlongs[0] =
916                                             READ_PORT_ULONG(cmdport->data1);
917                                         ret->retlongs[1] =
918                                             READ_PORT_ULONG(cmdport->data2);
919                                 } else {
920                                         err = -ENOSYS;
921                                         goto errout;
922                                 }
923                         }
924                         break;
925                 }
926                 udelay(20);
927         }
928         if (time == CMDIF_TIMEOUT) {
929                 err = -ENODATA;
930                 goto errout;
931         }
932         spin_unlock_irqrestore(&cif->lock, irqflags);
933
934         cif->cmdcnt++;          /* update command statistics */
935         cif->cmdtime += time;
936         if (time > cif->cmdtimemax)
937                 cif->cmdtimemax = time;
938         if (time < cif->cmdtimemin)
939                 cif->cmdtimemin = time;
940         if ((cif->cmdcnt) % 1000 == 0)
941                 snd_printdd
942                     ("send cmd %d time: %d mintime: %d maxtime %d err: %d\n",
943                      cif->cmdcnt, cif->cmdtime, cif->cmdtimemin,
944                      cif->cmdtimemax, cif->errcnt);
945         return 0;
946
947       errout:
948         cif->errcnt++;
949         spin_unlock_irqrestore(&cif->lock, irqflags);
950         snd_printdd
951             ("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",
952              cif->cmdcnt, (int)((void *)&(cmdport->stat) - (void *)hwport),
953              flags, cmd, parm, ret ? ret->retlongs[0] : 0,
954              ret ? ret->retlongs[1] : 0, IS_CMDE(cmdport), IS_DATF(cmdport),
955              err);
956         return err;
957 }
958
959 static int
960 setmixer(struct cmdif *cif, short num, unsigned short rval, unsigned short lval)
961 {
962         union cmdret rptr = CMDRET_ZERO;
963         int i = 0;
964
965         snd_printdd("sent mixer %d: 0x%d 0x%d\n", num, rval, lval);
966         do {
967                 SEND_SDGV(cif, num, num, rval, lval);
968                 SEND_RDGV(cif, num, num, &rptr);
969                 if (rptr.retwords[0] == lval && rptr.retwords[1] == rval)
970                         return 0;
971         } while (i++ < MAX_WRITE_RETRY);
972         snd_printdd("sent mixer failed\n");
973         return -EIO;
974 }
975
976 static int getpaths(struct cmdif *cif, unsigned char *o)
977 {
978         unsigned char src[E2SINK_MAX];
979         unsigned char sink[E2SINK_MAX];
980         int i, j = 0;
981
982         for (i = 0; i < E2SINK_MAX; i++) {
983                 getsourcesink(cif, i, i, &src[i], &sink[i]);
984                 if (sink[i] < E2SINK_MAX) {
985                         o[j++] = sink[i];
986                         o[j++] = i;
987                 }
988         }
989         return j;
990 }
991
992 static int
993 getsourcesink(struct cmdif *cif, unsigned char source, unsigned char sink,
994               unsigned char *a, unsigned char *b)
995 {
996         union cmdret rptr = CMDRET_ZERO;
997
998         if (SEND_RSSV(cif, source, sink, &rptr) &&
999             SEND_RSSV(cif, source, sink, &rptr))
1000                 return -EIO;
1001         *a = rptr.retbytes[0];
1002         *b = rptr.retbytes[1];
1003         snd_printdd("getsourcesink 0x%x 0x%x\n", *a, *b);
1004         return 0;
1005 }
1006
1007 static int
1008 getsamplerate(struct cmdif *cif, unsigned char *intdec, unsigned int *rate)
1009 {
1010         unsigned char *s;
1011         unsigned int p[2] = { 0, 0 };
1012         int i;
1013         union cmdret rptr = CMDRET_ZERO;
1014
1015         s = intdec;
1016         for (i = 0; i < 2; i++) {
1017                 if (*s != 0xff) {
1018                         if (SEND_RSRC(cif, *s, &rptr) &&
1019                             SEND_RSRC(cif, *s, &rptr))
1020                                 return -EIO;
1021                         p[i] += rptr.retwords[1];
1022                         p[i] *= rptr.retwords[2];
1023                         p[i] += rptr.retwords[3];
1024                         p[i] /= 65536;
1025                 }
1026                 s++;
1027         }
1028         if (p[0]) {
1029                 if (p[1] != p[0])
1030                         snd_printdd("rates differ %d %d\n", p[0], p[1]);
1031                 *rate = (unsigned int)p[0];
1032         } else
1033                 *rate = (unsigned int)p[1];
1034         snd_printdd("getsampleformat %d %d %d\n", intdec[0], intdec[1], *rate);
1035         return 0;
1036 }
1037
1038 static int
1039 setsampleformat(struct cmdif *cif,
1040                 unsigned char mixer, unsigned char id,
1041                 unsigned char channels, unsigned char format)
1042 {
1043         unsigned char w, ch, sig, order;
1044
1045         snd_printdd
1046             ("setsampleformat mixer: %d id: %d channels: %d format: %d\n",
1047              mixer, id, channels, format);
1048         ch = channels == 1;
1049         w = snd_pcm_format_width(format) == 8;
1050         sig = snd_pcm_format_unsigned(format) != 0;
1051         order = snd_pcm_format_big_endian(format) != 0;
1052
1053         if (SEND_SETF(cif, mixer, w, ch, order, sig, id) &&
1054             SEND_SETF(cif, mixer, w, ch, order, sig, id)) {
1055                 snd_printdd("setsampleformat failed\n");
1056                 return -EIO;
1057         }
1058         return 0;
1059 }
1060
1061 static int
1062 setsamplerate(struct cmdif *cif, unsigned char *intdec, unsigned int rate)
1063 {
1064         u32 D, M, N;
1065         union cmdret rptr = CMDRET_ZERO;
1066         int i;
1067
1068         snd_printdd("setsamplerate intdec: %d,%d rate: %d\n", intdec[0],
1069                     intdec[1], rate);
1070         D = 48000;
1071         M = ((rate == 48000) ? 47999 : rate) * 65536;
1072         N = M % D;
1073         M /= D;
1074         for (i = 0; i < 2; i++) {
1075                 if (*intdec != 0xff) {
1076                         do {
1077                                 SEND_SSRC(cif, *intdec, D, M, N);
1078                                 SEND_RSRC(cif, *intdec, &rptr);
1079                         } while (rptr.retwords[1] != D &&
1080                                  rptr.retwords[2] != M &&
1081                                  rptr.retwords[3] != N &&
1082                                  i++ < MAX_WRITE_RETRY);
1083                         if (i == MAX_WRITE_RETRY) {
1084                                 snd_printdd("sent samplerate %d: %d failed\n",
1085                                             *intdec, rate);
1086                                 return -EIO;
1087                         }
1088                 }
1089                 intdec++;
1090         }
1091         return 0;
1092 }
1093
1094 static int
1095 getmixer(struct cmdif *cif, short num, unsigned short *rval,
1096          unsigned short *lval)
1097 {
1098         union cmdret rptr = CMDRET_ZERO;
1099
1100         if (SEND_RDGV(cif, num, num, &rptr) && SEND_RDGV(cif, num, num, &rptr))
1101                 return -EIO;
1102         *rval = rptr.retwords[0];
1103         *lval = rptr.retwords[1];
1104         snd_printdd("got mixer %d: 0x%d 0x%d\n", num, *rval, *lval);
1105         return 0;
1106 }
1107
1108 static void riptide_handleirq(unsigned long dev_id)
1109 {
1110         struct snd_riptide *chip = (void *)dev_id;
1111         struct cmdif *cif = chip->cif;
1112         struct snd_pcm_substream *substream[PLAYBACK_SUBSTREAMS + 1];
1113         struct snd_pcm_runtime *runtime;
1114         struct pcmhw *data = NULL;
1115         unsigned int pos, period_bytes;
1116         struct sgd *c;
1117         int i, j;
1118         unsigned int flag;
1119
1120         if (!cif)
1121                 return;
1122
1123         for (i = 0; i < PLAYBACK_SUBSTREAMS; i++)
1124                 substream[i] = chip->playback_substream[i];
1125         substream[i] = chip->capture_substream;
1126         for (i = 0; i < PLAYBACK_SUBSTREAMS + 1; i++) {
1127                 if (substream[i] &&
1128                     (runtime = substream[i]->runtime) &&
1129                     (data = runtime->private_data) && data->state != ST_STOP) {
1130                         pos = 0;
1131                         for (j = 0; j < data->pages; j++) {
1132                                 c = &data->sgdbuf[j];
1133                                 flag = le32_to_cpu(c->dwStat_Ctl);
1134                                 if (flag & EOB_STATUS)
1135                                         pos += le32_to_cpu(c->dwSegLen);
1136                                 if (flag & EOC_STATUS)
1137                                         pos += le32_to_cpu(c->dwSegLen);
1138                                 if ((flag & EOS_STATUS)
1139                                     && (data->state == ST_PLAY)) {
1140                                         data->state = ST_STOP;
1141                                         snd_printk(KERN_ERR
1142                                                    "Riptide: DMA stopped unexpectedly\n");
1143                                 }
1144                                 c->dwStat_Ctl =
1145                                     cpu_to_le32(flag &
1146                                                 ~(EOS_STATUS | EOB_STATUS |
1147                                                   EOC_STATUS));
1148                         }
1149                         data->pointer += pos;
1150                         pos += data->oldpos;
1151                         if (data->state != ST_STOP) {
1152                                 period_bytes =
1153                                     frames_to_bytes(runtime,
1154                                                     runtime->period_size);
1155                                 snd_printdd
1156                                     ("interrupt 0x%x after 0x%lx of 0x%lx frames in period\n",
1157                                      READ_AUDIO_STATUS(cif->hwport),
1158                                      bytes_to_frames(runtime, pos),
1159                                      runtime->period_size);
1160                                 j = 0;
1161                                 if (pos >= period_bytes) {
1162                                         j++;
1163                                         while (pos >= period_bytes)
1164                                                 pos -= period_bytes;
1165                                 }
1166                                 data->oldpos = pos;
1167                                 if (j > 0)
1168                                         snd_pcm_period_elapsed(substream[i]);
1169                         }
1170                 }
1171         }
1172 }
1173
1174 #ifdef CONFIG_PM
1175 static int riptide_suspend(struct pci_dev *pci, pm_message_t state)
1176 {
1177         struct snd_card *card = pci_get_drvdata(pci);
1178         struct snd_riptide *chip = card->private_data;
1179
1180         chip->in_suspend = 1;
1181         snd_power_change_state(card, SNDRV_CTL_POWER_D3hot);
1182         snd_pcm_suspend_all(chip->pcm);
1183         snd_ac97_suspend(chip->ac97);
1184         pci_disable_device(pci);
1185         pci_save_state(pci);
1186         pci_set_power_state(pci, pci_choose_state(pci, state));
1187         return 0;
1188 }
1189
1190 static int riptide_resume(struct pci_dev *pci)
1191 {
1192         struct snd_card *card = pci_get_drvdata(pci);
1193         struct snd_riptide *chip = card->private_data;
1194
1195         pci_set_power_state(pci, PCI_D0);
1196         pci_restore_state(pci);
1197         if (pci_enable_device(pci) < 0) {
1198                 printk(KERN_ERR "riptide: pci_enable_device failed, "
1199                        "disabling device\n");
1200                 snd_card_disconnect(card);
1201                 return -EIO;
1202         }
1203         pci_set_master(pci);
1204         snd_riptide_initialize(chip);
1205         snd_ac97_resume(chip->ac97);
1206         snd_power_change_state(card, SNDRV_CTL_POWER_D0);
1207         chip->in_suspend = 0;
1208         return 0;
1209 }
1210 #endif
1211
1212 static int riptide_reset(struct cmdif *cif, struct snd_riptide *chip)
1213 {
1214         int timeout, tries;
1215         union cmdret rptr = CMDRET_ZERO;
1216         union firmware_version firmware;
1217         int i, j, err, has_firmware;
1218
1219         if (!cif)
1220                 return -EINVAL;
1221
1222         cif->cmdcnt = 0;
1223         cif->cmdtime = 0;
1224         cif->cmdtimemax = 0;
1225         cif->cmdtimemin = 0xffffffff;
1226         cif->errcnt = 0;
1227         cif->is_reset = 0;
1228
1229         tries = RESET_TRIES;
1230         has_firmware = 0;
1231         while (has_firmware == 0 && tries-- > 0) {
1232                 for (i = 0; i < 2; i++) {
1233                         WRITE_PORT_ULONG(cif->hwport->port[i].data1, 0);
1234                         WRITE_PORT_ULONG(cif->hwport->port[i].data2, 0);
1235                 }
1236                 SET_GRESET(cif->hwport);
1237                 udelay(100);
1238                 UNSET_GRESET(cif->hwport);
1239                 udelay(100);
1240
1241                 for (timeout = 100000; --timeout; udelay(10)) {
1242                         if (IS_READY(cif->hwport) && !IS_GERR(cif->hwport))
1243                                 break;
1244                 }
1245                 if (timeout == 0) {
1246                         snd_printk(KERN_ERR
1247                                    "Riptide: device not ready, audio status: 0x%x ready: %d gerr: %d\n",
1248                                    READ_AUDIO_STATUS(cif->hwport),
1249                                    IS_READY(cif->hwport), IS_GERR(cif->hwport));
1250                         return -EIO;
1251                 } else {
1252                         snd_printdd
1253                             ("Riptide: audio status: 0x%x ready: %d gerr: %d\n",
1254                              READ_AUDIO_STATUS(cif->hwport),
1255                              IS_READY(cif->hwport), IS_GERR(cif->hwport));
1256                 }
1257
1258                 SEND_GETV(cif, &rptr);
1259                 for (i = 0; i < 4; i++)
1260                         firmware.ret.retwords[i] = rptr.retwords[i];
1261
1262                 snd_printdd
1263                     ("Firmware version: ASIC: %d CODEC %d AUXDSP %d PROG %d\n",
1264                      firmware.firmware.ASIC, firmware.firmware.CODEC,
1265                      firmware.firmware.AUXDSP, firmware.firmware.PROG);
1266
1267                 for (j = 0; j < FIRMWARE_VERSIONS; j++) {
1268                         has_firmware = 1;
1269                         for (i = 0; i < 4; i++) {
1270                                 if (firmware_versions[j].ret.retwords[i] !=
1271                                     firmware.ret.retwords[i])
1272                                         has_firmware = 0;
1273                         }
1274                         if (has_firmware)
1275                                 break;
1276                 }
1277
1278                 if (chip != NULL && has_firmware == 0) {
1279                         snd_printdd("Writing Firmware\n");
1280                         if (!chip->fw_entry) {
1281                                 if ((err =
1282                                      request_firmware(&chip->fw_entry,
1283                                                       "riptide.hex",
1284                                                       &chip->pci->dev)) != 0) {
1285                                         snd_printk(KERN_ERR
1286                                                    "Riptide: Firmware not available %d\n",
1287                                                    err);
1288                                         return -EIO;
1289                                 }
1290                         }
1291                         err = loadfirmware(cif, chip->fw_entry->data,
1292                                            chip->fw_entry->size);
1293                         if (err)
1294                                 snd_printk(KERN_ERR
1295                                            "Riptide: Could not load firmware %d\n",
1296                                            err);
1297                 }
1298         }
1299
1300         SEND_SACR(cif, 0, AC97_RESET);
1301         SEND_RACR(cif, AC97_RESET, &rptr);
1302         snd_printdd("AC97: 0x%x 0x%x\n", rptr.retlongs[0], rptr.retlongs[1]);
1303
1304         SEND_PLST(cif, 0);
1305         SEND_SLST(cif, 0);
1306         SEND_DLST(cif, 0);
1307         SEND_ALST(cif, 0);
1308         SEND_KDMA(cif);
1309
1310         writearm(cif, 0x301F8, 1, 1);
1311         writearm(cif, 0x301F4, 1, 1);
1312
1313         SEND_LSEL(cif, MODEM_CMD, 0, 0, MODEM_INTDEC, MODEM_MERGER,
1314                   MODEM_SPLITTER, MODEM_MIXER);
1315         setmixer(cif, MODEM_MIXER, 0x7fff, 0x7fff);
1316         alloclbuspath(cif, ARM2LBUS_FIFO13, lbus_play_modem, NULL, NULL);
1317
1318         SEND_LSEL(cif, FM_CMD, 0, 0, FM_INTDEC, FM_MERGER, FM_SPLITTER,
1319                   FM_MIXER);
1320         setmixer(cif, FM_MIXER, 0x7fff, 0x7fff);
1321         writearm(cif, 0x30648 + FM_MIXER * 4, 0x01, 0x00000005);
1322         writearm(cif, 0x301A8, 0x02, 0x00000002);
1323         writearm(cif, 0x30264, 0x08, 0xffffffff);
1324         alloclbuspath(cif, OPL3_SAMPLE, lbus_play_opl3, NULL, NULL);
1325
1326         SEND_SSRC(cif, I2S_INTDEC, 48000,
1327                   ((u32) I2S_RATE * 65536) / 48000,
1328                   ((u32) I2S_RATE * 65536) % 48000);
1329         SEND_LSEL(cif, I2S_CMD0, 0, 0, I2S_INTDEC, I2S_MERGER, I2S_SPLITTER,
1330                   I2S_MIXER);
1331         SEND_SI2S(cif, 1);
1332         alloclbuspath(cif, ARM2LBUS_FIFO0, lbus_play_i2s, NULL, NULL);
1333         alloclbuspath(cif, DIGITAL_MIXER_OUT0, lbus_play_out, NULL, NULL);
1334         alloclbuspath(cif, DIGITAL_MIXER_OUT0, lbus_play_outhp, NULL, NULL);
1335
1336         SET_AIACK(cif->hwport);
1337         SET_AIE(cif->hwport);
1338         SET_AIACK(cif->hwport);
1339         cif->is_reset = 1;
1340         if (chip) {
1341                 for (i = 0; i < 4; i++)
1342                         chip->firmware.ret.retwords[i] =
1343                             firmware.ret.retwords[i];
1344         }
1345
1346         return 0;
1347 }
1348
1349 static struct snd_pcm_hardware snd_riptide_playback = {
1350         .info = (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
1351                  SNDRV_PCM_INFO_BLOCK_TRANSFER |
1352                  SNDRV_PCM_INFO_PAUSE | SNDRV_PCM_INFO_MMAP_VALID),
1353         .formats =
1354             SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S8
1355             | SNDRV_PCM_FMTBIT_U16_LE,
1356         .rates = SNDRV_PCM_RATE_KNOT | SNDRV_PCM_RATE_8000_48000,
1357         .rate_min = 5500,
1358         .rate_max = 48000,
1359         .channels_min = 1,
1360         .channels_max = 2,
1361         .buffer_bytes_max = (64 * 1024),
1362         .period_bytes_min = PAGE_SIZE >> 1,
1363         .period_bytes_max = PAGE_SIZE << 8,
1364         .periods_min = 2,
1365         .periods_max = 64,
1366         .fifo_size = 0,
1367 };
1368 static struct snd_pcm_hardware snd_riptide_capture = {
1369         .info = (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
1370                  SNDRV_PCM_INFO_BLOCK_TRANSFER |
1371                  SNDRV_PCM_INFO_PAUSE | SNDRV_PCM_INFO_MMAP_VALID),
1372         .formats =
1373             SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S8
1374             | SNDRV_PCM_FMTBIT_U16_LE,
1375         .rates = SNDRV_PCM_RATE_KNOT | SNDRV_PCM_RATE_8000_48000,
1376         .rate_min = 5500,
1377         .rate_max = 48000,
1378         .channels_min = 1,
1379         .channels_max = 2,
1380         .buffer_bytes_max = (64 * 1024),
1381         .period_bytes_min = PAGE_SIZE >> 1,
1382         .period_bytes_max = PAGE_SIZE << 3,
1383         .periods_min = 2,
1384         .periods_max = 64,
1385         .fifo_size = 0,
1386 };
1387
1388 static snd_pcm_uframes_t snd_riptide_pointer(struct snd_pcm_substream
1389                                              *substream)
1390 {
1391         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1392         struct snd_pcm_runtime *runtime = substream->runtime;
1393         struct pcmhw *data = get_pcmhwdev(substream);
1394         struct cmdif *cif = chip->cif;
1395         union cmdret rptr = CMDRET_ZERO;
1396         snd_pcm_uframes_t ret;
1397
1398         SEND_GPOS(cif, 0, data->id, &rptr);
1399         if (data->size && runtime->period_size) {
1400                 snd_printdd
1401                     ("pointer stream %d position 0x%x(0x%x in buffer) bytes 0x%lx(0x%lx in period) frames\n",
1402                      data->id, rptr.retlongs[1], rptr.retlongs[1] % data->size,
1403                      bytes_to_frames(runtime, rptr.retlongs[1]),
1404                      bytes_to_frames(runtime,
1405                                      rptr.retlongs[1]) % runtime->period_size);
1406                 if (rptr.retlongs[1] > data->pointer)
1407                         ret =
1408                             bytes_to_frames(runtime,
1409                                             rptr.retlongs[1] % data->size);
1410                 else
1411                         ret =
1412                             bytes_to_frames(runtime,
1413                                             data->pointer % data->size);
1414         } else {
1415                 snd_printdd("stream not started or strange parms (%d %ld)\n",
1416                             data->size, runtime->period_size);
1417                 ret = bytes_to_frames(runtime, 0);
1418         }
1419         return ret;
1420 }
1421
1422 static int snd_riptide_trigger(struct snd_pcm_substream *substream, int cmd)
1423 {
1424         int i, j;
1425         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1426         struct pcmhw *data = get_pcmhwdev(substream);
1427         struct cmdif *cif = chip->cif;
1428         union cmdret rptr = CMDRET_ZERO;
1429
1430         spin_lock(&chip->lock);
1431         switch (cmd) {
1432         case SNDRV_PCM_TRIGGER_START:
1433         case SNDRV_PCM_TRIGGER_RESUME:
1434                 if (!(data->state & ST_PLAY)) {
1435                         SEND_SSTR(cif, data->id, data->sgdlist.addr);
1436                         SET_AIE(cif->hwport);
1437                         data->state = ST_PLAY;
1438                         if (data->mixer != 0xff)
1439                                 setmixer(cif, data->mixer, 0x7fff, 0x7fff);
1440                         chip->openstreams++;
1441                         data->oldpos = 0;
1442                         data->pointer = 0;
1443                 }
1444                 break;
1445         case SNDRV_PCM_TRIGGER_STOP:
1446         case SNDRV_PCM_TRIGGER_SUSPEND:
1447                 if (data->mixer != 0xff)
1448                         setmixer(cif, data->mixer, 0, 0);
1449                 setmixer(cif, data->mixer, 0, 0);
1450                 SEND_KSTR(cif, data->id);
1451                 data->state = ST_STOP;
1452                 chip->openstreams--;
1453                 j = 0;
1454                 do {
1455                         i = rptr.retlongs[1];
1456                         SEND_GPOS(cif, 0, data->id, &rptr);
1457                         udelay(1);
1458                 } while (i != rptr.retlongs[1] && j++ < MAX_WRITE_RETRY);
1459                 if (j > MAX_WRITE_RETRY)
1460                         snd_printk(KERN_ERR "Riptide: Could not stop stream!");
1461                 break;
1462         case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
1463                 if (!(data->state & ST_PAUSE)) {
1464                         SEND_PSTR(cif, data->id);
1465                         data->state |= ST_PAUSE;
1466                         chip->openstreams--;
1467                 }
1468                 break;
1469         case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
1470                 if (data->state & ST_PAUSE) {
1471                         SEND_SSTR(cif, data->id, data->sgdlist.addr);
1472                         data->state &= ~ST_PAUSE;
1473                         chip->openstreams++;
1474                 }
1475                 break;
1476         default:
1477                 spin_unlock(&chip->lock);
1478                 return -EINVAL;
1479         }
1480         spin_unlock(&chip->lock);
1481         return 0;
1482 }
1483
1484 static int snd_riptide_prepare(struct snd_pcm_substream *substream)
1485 {
1486         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1487         struct snd_pcm_runtime *runtime = substream->runtime;
1488         struct pcmhw *data = get_pcmhwdev(substream);
1489         struct cmdif *cif = chip->cif;
1490         unsigned char *lbuspath = NULL;
1491         unsigned int rate, channels;
1492         int err = 0;
1493         snd_pcm_format_t format;
1494
1495         if (snd_BUG_ON(!cif || !data))
1496                 return -EINVAL;
1497
1498         snd_printdd("prepare id %d ch: %d f:0x%x r:%d\n", data->id,
1499                     runtime->channels, runtime->format, runtime->rate);
1500
1501         spin_lock_irq(&chip->lock);
1502         channels = runtime->channels;
1503         format = runtime->format;
1504         rate = runtime->rate;
1505         switch (channels) {
1506         case 1:
1507                 if (rate == 48000 && format == SNDRV_PCM_FORMAT_S16_LE)
1508                         lbuspath = data->paths.noconv;
1509                 else
1510                         lbuspath = data->paths.mono;
1511                 break;
1512         case 2:
1513                 if (rate == 48000 && format == SNDRV_PCM_FORMAT_S16_LE)
1514                         lbuspath = data->paths.noconv;
1515                 else
1516                         lbuspath = data->paths.stereo;
1517                 break;
1518         }
1519         snd_printdd("use sgdlist at 0x%p\n",
1520                     data->sgdlist.area);
1521         if (data->sgdlist.area) {
1522                 unsigned int i, j, size, pages, f, pt, period;
1523                 struct sgd *c, *p = NULL;
1524
1525                 size = frames_to_bytes(runtime, runtime->buffer_size);
1526                 period = frames_to_bytes(runtime, runtime->period_size);
1527                 f = PAGE_SIZE;
1528                 while ((size + (f >> 1) - 1) <= (f << 7) && (f << 1) > period)
1529                         f = f >> 1;
1530                 pages = (size + f - 1) / f;
1531                 data->size = size;
1532                 data->pages = pages;
1533                 snd_printdd
1534                     ("create sgd size: 0x%x pages %d of size 0x%x for period 0x%x\n",
1535                      size, pages, f, period);
1536                 pt = 0;
1537                 j = 0;
1538                 for (i = 0; i < pages; i++) {
1539                         unsigned int ofs, addr;
1540                         c = &data->sgdbuf[i];
1541                         if (p)
1542                                 p->dwNextLink = cpu_to_le32(data->sgdlist.addr +
1543                                                             (i *
1544                                                              sizeof(struct
1545                                                                     sgd)));
1546                         c->dwNextLink = cpu_to_le32(data->sgdlist.addr);
1547                         ofs = j << PAGE_SHIFT;
1548                         addr = snd_pcm_sgbuf_get_addr(substream, ofs) + pt;
1549                         c->dwSegPtrPhys = cpu_to_le32(addr);
1550                         pt = (pt + f) % PAGE_SIZE;
1551                         if (pt == 0)
1552                                 j++;
1553                         c->dwSegLen = cpu_to_le32(f);
1554                         c->dwStat_Ctl =
1555                             cpu_to_le32(IEOB_ENABLE | IEOS_ENABLE |
1556                                         IEOC_ENABLE);
1557                         p = c;
1558                         size -= f;
1559                 }
1560                 data->sgdbuf[i].dwSegLen = cpu_to_le32(size);
1561         }
1562         if (lbuspath && lbuspath != data->lbuspath) {
1563                 if (data->lbuspath)
1564                         freelbuspath(cif, data->source, data->lbuspath);
1565                 alloclbuspath(cif, data->source, lbuspath,
1566                               &data->mixer, data->intdec);
1567                 data->lbuspath = lbuspath;
1568                 data->rate = 0;
1569         }
1570         if (data->rate != rate || data->format != format ||
1571             data->channels != channels) {
1572                 data->rate = rate;
1573                 data->format = format;
1574                 data->channels = channels;
1575                 if (setsampleformat
1576                     (cif, data->mixer, data->id, channels, format)
1577                     || setsamplerate(cif, data->intdec, rate))
1578                         err = -EIO;
1579         }
1580         spin_unlock_irq(&chip->lock);
1581         return err;
1582 }
1583
1584 static int
1585 snd_riptide_hw_params(struct snd_pcm_substream *substream,
1586                       struct snd_pcm_hw_params *hw_params)
1587 {
1588         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1589         struct pcmhw *data = get_pcmhwdev(substream);
1590         struct snd_dma_buffer *sgdlist = &data->sgdlist;
1591         int err;
1592
1593         snd_printdd("hw params id %d (sgdlist: 0x%p 0x%lx %d)\n", data->id,
1594                     sgdlist->area, (unsigned long)sgdlist->addr,
1595                     (int)sgdlist->bytes);
1596         if (sgdlist->area)
1597                 snd_dma_free_pages(sgdlist);
1598         if ((err = snd_dma_alloc_pages(SNDRV_DMA_TYPE_DEV,
1599                                        snd_dma_pci_data(chip->pci),
1600                                        sizeof(struct sgd) * (DESC_MAX_MASK + 1),
1601                                        sgdlist)) < 0) {
1602                 snd_printk(KERN_ERR "Riptide: failed to alloc %d dma bytes\n",
1603                            (int)sizeof(struct sgd) * (DESC_MAX_MASK + 1));
1604                 return err;
1605         }
1606         data->sgdbuf = (struct sgd *)sgdlist->area;
1607         return snd_pcm_lib_malloc_pages(substream,
1608                                         params_buffer_bytes(hw_params));
1609 }
1610
1611 static int snd_riptide_hw_free(struct snd_pcm_substream *substream)
1612 {
1613         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1614         struct pcmhw *data = get_pcmhwdev(substream);
1615         struct cmdif *cif = chip->cif;
1616
1617         if (cif && data) {
1618                 if (data->lbuspath)
1619                         freelbuspath(cif, data->source, data->lbuspath);
1620                 data->lbuspath = NULL;
1621                 data->source = 0xff;
1622                 data->intdec[0] = 0xff;
1623                 data->intdec[1] = 0xff;
1624
1625                 if (data->sgdlist.area) {
1626                         snd_dma_free_pages(&data->sgdlist);
1627                         data->sgdlist.area = NULL;
1628                 }
1629         }
1630         return snd_pcm_lib_free_pages(substream);
1631 }
1632
1633 static int snd_riptide_playback_open(struct snd_pcm_substream *substream)
1634 {
1635         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1636         struct snd_pcm_runtime *runtime = substream->runtime;
1637         struct pcmhw *data;
1638         int sub_num = substream->number;
1639
1640         chip->playback_substream[sub_num] = substream;
1641         runtime->hw = snd_riptide_playback;
1642         data = kzalloc(sizeof(struct pcmhw), GFP_KERNEL);
1643         data->paths = lbus_play_paths[sub_num];
1644         data->id = play_ids[sub_num];
1645         data->source = play_sources[sub_num];
1646         data->intdec[0] = 0xff;
1647         data->intdec[1] = 0xff;
1648         data->state = ST_STOP;
1649         runtime->private_data = data;
1650         return snd_pcm_hw_constraint_integer(runtime,
1651                                              SNDRV_PCM_HW_PARAM_PERIODS);
1652 }
1653
1654 static int snd_riptide_capture_open(struct snd_pcm_substream *substream)
1655 {
1656         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1657         struct snd_pcm_runtime *runtime = substream->runtime;
1658         struct pcmhw *data;
1659
1660         chip->capture_substream = substream;
1661         runtime->hw = snd_riptide_capture;
1662         data = kzalloc(sizeof(struct pcmhw), GFP_KERNEL);
1663         data->paths = lbus_rec_path;
1664         data->id = PADC;
1665         data->source = ACLNK2PADC;
1666         data->intdec[0] = 0xff;
1667         data->intdec[1] = 0xff;
1668         data->state = ST_STOP;
1669         runtime->private_data = data;
1670         return snd_pcm_hw_constraint_integer(runtime,
1671                                              SNDRV_PCM_HW_PARAM_PERIODS);
1672 }
1673
1674 static int snd_riptide_playback_close(struct snd_pcm_substream *substream)
1675 {
1676         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1677         struct pcmhw *data = get_pcmhwdev(substream);
1678         int sub_num = substream->number;
1679
1680         substream->runtime->private_data = NULL;
1681         chip->playback_substream[sub_num] = NULL;
1682         kfree(data);
1683         return 0;
1684 }
1685
1686 static int snd_riptide_capture_close(struct snd_pcm_substream *substream)
1687 {
1688         struct snd_riptide *chip = snd_pcm_substream_chip(substream);
1689         struct pcmhw *data = get_pcmhwdev(substream);
1690
1691         substream->runtime->private_data = NULL;
1692         chip->capture_substream = NULL;
1693         kfree(data);
1694         return 0;
1695 }
1696
1697 static struct snd_pcm_ops snd_riptide_playback_ops = {
1698         .open = snd_riptide_playback_open,
1699         .close = snd_riptide_playback_close,
1700         .ioctl = snd_pcm_lib_ioctl,
1701         .hw_params = snd_riptide_hw_params,
1702         .hw_free = snd_riptide_hw_free,
1703         .prepare = snd_riptide_prepare,
1704         .page = snd_pcm_sgbuf_ops_page,
1705         .trigger = snd_riptide_trigger,
1706         .pointer = snd_riptide_pointer,
1707 };
1708 static struct snd_pcm_ops snd_riptide_capture_ops = {
1709         .open = snd_riptide_capture_open,
1710         .close = snd_riptide_capture_close,
1711         .ioctl = snd_pcm_lib_ioctl,
1712         .hw_params = snd_riptide_hw_params,
1713         .hw_free = snd_riptide_hw_free,
1714         .prepare = snd_riptide_prepare,
1715         .page = snd_pcm_sgbuf_ops_page,
1716         .trigger = snd_riptide_trigger,
1717         .pointer = snd_riptide_pointer,
1718 };
1719
1720 static int __devinit
1721 snd_riptide_pcm(struct snd_riptide *chip, int device, struct snd_pcm **rpcm)
1722 {
1723         struct snd_pcm *pcm;
1724         int err;
1725
1726         if (rpcm)
1727                 *rpcm = NULL;
1728         if ((err =
1729              snd_pcm_new(chip->card, "RIPTIDE", device, PLAYBACK_SUBSTREAMS, 1,
1730                          &pcm)) < 0)
1731                 return err;
1732         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK,
1733                         &snd_riptide_playback_ops);
1734         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE,
1735                         &snd_riptide_capture_ops);
1736         pcm->private_data = chip;
1737         pcm->info_flags = 0;
1738         strcpy(pcm->name, "RIPTIDE");
1739         chip->pcm = pcm;
1740         snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV_SG,
1741                                               snd_dma_pci_data(chip->pci),
1742                                               64 * 1024, 128 * 1024);
1743         if (rpcm)
1744                 *rpcm = pcm;
1745         return 0;
1746 }
1747
1748 static irqreturn_t
1749 snd_riptide_interrupt(int irq, void *dev_id)
1750 {
1751         struct snd_riptide *chip = dev_id;
1752         struct cmdif *cif = chip->cif;
1753
1754         if (cif) {
1755                 chip->received_irqs++;
1756                 if (IS_EOBIRQ(cif->hwport) || IS_EOSIRQ(cif->hwport) ||
1757                     IS_EOCIRQ(cif->hwport)) {
1758                         chip->handled_irqs++;
1759                         tasklet_schedule(&chip->riptide_tq);
1760                 }
1761                 if (chip->rmidi && IS_MPUIRQ(cif->hwport)) {
1762                         chip->handled_irqs++;
1763                         snd_mpu401_uart_interrupt(irq,
1764                                                   chip->rmidi->private_data);
1765                 }
1766                 SET_AIACK(cif->hwport);
1767         }
1768         return IRQ_HANDLED;
1769 }
1770
1771 static void
1772 snd_riptide_codec_write(struct snd_ac97 *ac97, unsigned short reg,
1773                         unsigned short val)
1774 {
1775         struct snd_riptide *chip = ac97->private_data;
1776         struct cmdif *cif = chip->cif;
1777         union cmdret rptr = CMDRET_ZERO;
1778         int i = 0;
1779
1780         if (snd_BUG_ON(!cif))
1781                 return;
1782
1783         snd_printdd("Write AC97 reg 0x%x 0x%x\n", reg, val);
1784         do {
1785                 SEND_SACR(cif, val, reg);
1786                 SEND_RACR(cif, reg, &rptr);
1787         } while (rptr.retwords[1] != val && i++ < MAX_WRITE_RETRY);
1788         if (i > MAX_WRITE_RETRY)
1789                 snd_printdd("Write AC97 reg failed\n");
1790 }
1791
1792 static unsigned short snd_riptide_codec_read(struct snd_ac97 *ac97,
1793                                              unsigned short reg)
1794 {
1795         struct snd_riptide *chip = ac97->private_data;
1796         struct cmdif *cif = chip->cif;
1797         union cmdret rptr = CMDRET_ZERO;
1798
1799         if (snd_BUG_ON(!cif))
1800                 return 0;
1801
1802         if (SEND_RACR(cif, reg, &rptr) != 0)
1803                 SEND_RACR(cif, reg, &rptr);
1804         snd_printdd("Read AC97 reg 0x%x got 0x%x\n", reg, rptr.retwords[1]);
1805         return rptr.retwords[1];
1806 }
1807
1808 static int snd_riptide_initialize(struct snd_riptide *chip)
1809 {
1810         struct cmdif *cif;
1811         unsigned int device_id;
1812         int err;
1813
1814         if (snd_BUG_ON(!chip))
1815                 return -EINVAL;
1816
1817         cif = chip->cif;
1818         if (!cif) {
1819                 if ((cif = kzalloc(sizeof(struct cmdif), GFP_KERNEL)) == NULL)
1820                         return -ENOMEM;
1821                 cif->hwport = (struct riptideport *)chip->port;
1822                 spin_lock_init(&cif->lock);
1823                 chip->cif = cif;
1824         }
1825         cif->is_reset = 0;
1826         if ((err = riptide_reset(cif, chip)) != 0)
1827                 return err;
1828         device_id = chip->device_id;
1829         switch (device_id) {
1830         case 0x4310:
1831         case 0x4320:
1832         case 0x4330:
1833                 snd_printdd("Modem enable?\n");
1834                 SEND_SETDPLL(cif);
1835                 break;
1836         }
1837         snd_printdd("Enabling MPU IRQs\n");
1838         if (chip->rmidi)
1839                 SET_EMPUIRQ(cif->hwport);
1840         return err;
1841 }
1842
1843 static int snd_riptide_free(struct snd_riptide *chip)
1844 {
1845         struct cmdif *cif;
1846
1847         if (!chip)
1848                 return 0;
1849
1850         if ((cif = chip->cif)) {
1851                 SET_GRESET(cif->hwport);
1852                 udelay(100);
1853                 UNSET_GRESET(cif->hwport);
1854                 kfree(chip->cif);
1855         }
1856         if (chip->irq >= 0)
1857                 free_irq(chip->irq, chip);
1858         if (chip->fw_entry)
1859                 release_firmware(chip->fw_entry);
1860         release_and_free_resource(chip->res_port);
1861         kfree(chip);
1862         return 0;
1863 }
1864
1865 static int snd_riptide_dev_free(struct snd_device *device)
1866 {
1867         struct snd_riptide *chip = device->device_data;
1868
1869         return snd_riptide_free(chip);
1870 }
1871
1872 static int __devinit
1873 snd_riptide_create(struct snd_card *card, struct pci_dev *pci,
1874                    struct snd_riptide **rchip)
1875 {
1876         struct snd_riptide *chip;
1877         struct riptideport *hwport;
1878         int err;
1879         static struct snd_device_ops ops = {
1880                 .dev_free = snd_riptide_dev_free,
1881         };
1882
1883         *rchip = NULL;
1884         if ((err = pci_enable_device(pci)) < 0)
1885                 return err;
1886         if (!(chip = kzalloc(sizeof(struct snd_riptide), GFP_KERNEL)))
1887                 return -ENOMEM;
1888
1889         spin_lock_init(&chip->lock);
1890         chip->card = card;
1891         chip->pci = pci;
1892         chip->irq = -1;
1893         chip->openstreams = 0;
1894         chip->port = pci_resource_start(pci, 0);
1895         chip->received_irqs = 0;
1896         chip->handled_irqs = 0;
1897         chip->cif = NULL;
1898         tasklet_init(&chip->riptide_tq, riptide_handleirq, (unsigned long)chip);
1899
1900         if ((chip->res_port =
1901              request_region(chip->port, 64, "RIPTIDE")) == NULL) {
1902                 snd_printk(KERN_ERR
1903                            "Riptide: unable to grab region 0x%lx-0x%lx\n",
1904                            chip->port, chip->port + 64 - 1);
1905                 snd_riptide_free(chip);
1906                 return -EBUSY;
1907         }
1908         hwport = (struct riptideport *)chip->port;
1909         UNSET_AIE(hwport);
1910
1911         if (request_irq(pci->irq, snd_riptide_interrupt, IRQF_SHARED,
1912                         "RIPTIDE", chip)) {
1913                 snd_printk(KERN_ERR "Riptide: unable to grab IRQ %d\n",
1914                            pci->irq);
1915                 snd_riptide_free(chip);
1916                 return -EBUSY;
1917         }
1918         chip->irq = pci->irq;
1919         chip->device_id = pci->device;
1920         pci_set_master(pci);
1921         if ((err = snd_riptide_initialize(chip)) < 0) {
1922                 snd_riptide_free(chip);
1923                 return err;
1924         }
1925
1926         if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
1927                 snd_riptide_free(chip);
1928                 return err;
1929         }
1930
1931         snd_card_set_dev(card, &pci->dev);
1932
1933         *rchip = chip;
1934         return 0;
1935 }
1936
1937 static void
1938 snd_riptide_proc_read(struct snd_info_entry *entry,
1939                       struct snd_info_buffer *buffer)
1940 {
1941         struct snd_riptide *chip = entry->private_data;
1942         struct pcmhw *data;
1943         int i;
1944         struct cmdif *cif = NULL;
1945         unsigned char p[256];
1946         unsigned short rval = 0, lval = 0;
1947         unsigned int rate;
1948
1949         if (!chip)
1950                 return;
1951
1952         snd_iprintf(buffer, "%s\n\n", chip->card->longname);
1953         snd_iprintf(buffer, "Device ID: 0x%x\nReceived IRQs: (%ld)%ld\nPorts:",
1954                     chip->device_id, chip->handled_irqs, chip->received_irqs);
1955         for (i = 0; i < 64; i += 4)
1956                 snd_iprintf(buffer, "%c%02x: %08x",
1957                             (i % 16) ? ' ' : '\n', i, inl(chip->port + i));
1958         if ((cif = chip->cif)) {
1959                 snd_iprintf(buffer,
1960                             "\nVersion: ASIC: %d CODEC: %d AUXDSP: %d PROG: %d",
1961                             chip->firmware.firmware.ASIC,
1962                             chip->firmware.firmware.CODEC,
1963                             chip->firmware.firmware.AUXDSP,
1964                             chip->firmware.firmware.PROG);
1965                 snd_iprintf(buffer, "\nDigital mixer:");
1966                 for (i = 0; i < 12; i++) {
1967                         getmixer(cif, i, &rval, &lval);
1968                         snd_iprintf(buffer, "\n %d: %d %d", i, rval, lval);
1969                 }
1970                 snd_iprintf(buffer,
1971                             "\nARM Commands num: %d failed: %d time: %d max: %d min: %d",
1972                             cif->cmdcnt, cif->errcnt,
1973                             cif->cmdtime, cif->cmdtimemax, cif->cmdtimemin);
1974         }
1975         snd_iprintf(buffer, "\nOpen streams %d:\n", chip->openstreams);
1976         for (i = 0; i < PLAYBACK_SUBSTREAMS; i++) {
1977                 if (chip->playback_substream[i]
1978                     && chip->playback_substream[i]->runtime
1979                     && (data =
1980                         chip->playback_substream[i]->runtime->private_data)) {
1981                         snd_iprintf(buffer,
1982                                     "stream: %d mixer: %d source: %d (%d,%d)\n",
1983                                     data->id, data->mixer, data->source,
1984                                     data->intdec[0], data->intdec[1]);
1985                         if (!(getsamplerate(cif, data->intdec, &rate)))
1986                                 snd_iprintf(buffer, "rate: %d\n", rate);
1987                 }
1988         }
1989         if (chip->capture_substream
1990             && chip->capture_substream->runtime
1991             && (data = chip->capture_substream->runtime->private_data)) {
1992                 snd_iprintf(buffer,
1993                             "stream: %d mixer: %d source: %d (%d,%d)\n",
1994                             data->id, data->mixer,
1995                             data->source, data->intdec[0], data->intdec[1]);
1996                 if (!(getsamplerate(cif, data->intdec, &rate)))
1997                         snd_iprintf(buffer, "rate: %d\n", rate);
1998         }
1999         snd_iprintf(buffer, "Paths:\n");
2000         i = getpaths(cif, p);
2001         while (i--) {
2002                 snd_iprintf(buffer, "%x->%x ", p[i - 1], p[i]);
2003                 i--;
2004         }
2005         snd_iprintf(buffer, "\n");
2006 }
2007
2008 static void __devinit snd_riptide_proc_init(struct snd_riptide *chip)
2009 {
2010         struct snd_info_entry *entry;
2011
2012         if (!snd_card_proc_new(chip->card, "riptide", &entry))
2013                 snd_info_set_text_ops(entry, chip, snd_riptide_proc_read);
2014 }
2015
2016 static int __devinit snd_riptide_mixer(struct snd_riptide *chip)
2017 {
2018         struct snd_ac97_bus *pbus;
2019         struct snd_ac97_template ac97;
2020         int err = 0;
2021         static struct snd_ac97_bus_ops ops = {
2022                 .write = snd_riptide_codec_write,
2023                 .read = snd_riptide_codec_read,
2024         };
2025
2026         memset(&ac97, 0, sizeof(ac97));
2027         ac97.private_data = chip;
2028         ac97.scaps = AC97_SCAP_SKIP_MODEM;
2029
2030         if ((err = snd_ac97_bus(chip->card, 0, &ops, chip, &pbus)) < 0)
2031                 return err;
2032
2033         chip->ac97_bus = pbus;
2034         ac97.pci = chip->pci;
2035         if ((err = snd_ac97_mixer(pbus, &ac97, &chip->ac97)) < 0)
2036                 return err;
2037         return err;
2038 }
2039
2040 #ifdef SUPPORT_JOYSTICK
2041 static int have_joystick;
2042 static struct pci_dev *riptide_gameport_pci;
2043 static struct gameport *riptide_gameport;
2044
2045 static int __devinit
2046 snd_riptide_joystick_probe(struct pci_dev *pci, const struct pci_device_id *id)
2047 {
2048         static int dev;
2049
2050         if (dev >= SNDRV_CARDS)
2051                 return -ENODEV;
2052         if (!enable[dev]) {
2053                 dev++;
2054                 return -ENOENT;
2055         }
2056
2057         if (joystick_port[dev]) {
2058                 riptide_gameport = gameport_allocate_port();
2059                 if (riptide_gameport) {
2060                         if (!request_region
2061                             (joystick_port[dev], 8, "Riptide gameport")) {
2062                                 snd_printk(KERN_WARNING
2063                                            "Riptide: cannot grab gameport 0x%x\n",
2064                                            joystick_port[dev]);
2065                                 gameport_free_port(riptide_gameport);
2066                                 riptide_gameport = NULL;
2067                         } else {
2068                                 riptide_gameport_pci = pci;
2069                                 riptide_gameport->io = joystick_port[dev];
2070                                 gameport_register_port(riptide_gameport);
2071                         }
2072                 }
2073         }
2074         dev++;
2075         return 0;
2076 }
2077
2078 static void __devexit snd_riptide_joystick_remove(struct pci_dev *pci)
2079 {
2080         if (riptide_gameport) {
2081                 if (riptide_gameport_pci == pci) {
2082                         release_region(riptide_gameport->io, 8);
2083                         riptide_gameport_pci = NULL;
2084                         gameport_unregister_port(riptide_gameport);
2085                         riptide_gameport = NULL;
2086                 }
2087         }
2088 }
2089 #endif
2090
2091 static int __devinit
2092 snd_card_riptide_probe(struct pci_dev *pci, const struct pci_device_id *pci_id)
2093 {
2094         static int dev;
2095         struct snd_card *card;
2096         struct snd_riptide *chip;
2097         unsigned short addr;
2098         int err = 0;
2099
2100         if (dev >= SNDRV_CARDS)
2101                 return -ENODEV;
2102         if (!enable[dev]) {
2103                 dev++;
2104                 return -ENOENT;
2105         }
2106
2107         err = snd_card_create(index[dev], id[dev], THIS_MODULE, 0, &card);
2108         if (err < 0)
2109                 return err;
2110         if ((err = snd_riptide_create(card, pci, &chip)) < 0) {
2111                 snd_card_free(card);
2112                 return err;
2113         }
2114         card->private_data = chip;
2115         if ((err = snd_riptide_pcm(chip, 0, NULL)) < 0) {
2116                 snd_card_free(card);
2117                 return err;
2118         }
2119         if ((err = snd_riptide_mixer(chip)) < 0) {
2120                 snd_card_free(card);
2121                 return err;
2122         }
2123         pci_write_config_word(chip->pci, PCI_EXT_Legacy_Mask, LEGACY_ENABLE_ALL
2124                               | (opl3_port[dev] ? LEGACY_ENABLE_FM : 0)
2125 #ifdef SUPPORT_JOYSTICK
2126                               | (joystick_port[dev] ? LEGACY_ENABLE_GAMEPORT :
2127                                  0)
2128 #endif
2129                               | (mpu_port[dev]
2130                                  ? (LEGACY_ENABLE_MPU_INT | LEGACY_ENABLE_MPU) :
2131                                  0)
2132                               | ((chip->irq << 4) & 0xF0));
2133         if ((addr = mpu_port[dev]) != 0) {
2134                 pci_write_config_word(chip->pci, PCI_EXT_MPU_Base, addr);
2135                 if ((err = snd_mpu401_uart_new(card, 0, MPU401_HW_RIPTIDE,
2136                                                addr, 0, chip->irq, 0,
2137                                                &chip->rmidi)) < 0)
2138                         snd_printk(KERN_WARNING
2139                                    "Riptide: Can't Allocate MPU at 0x%x\n",
2140                                    addr);
2141                 else
2142                         chip->mpuaddr = addr;
2143         }
2144         if ((addr = opl3_port[dev]) != 0) {
2145                 pci_write_config_word(chip->pci, PCI_EXT_FM_Base, addr);
2146                 if ((err = snd_opl3_create(card, addr, addr + 2,
2147                                            OPL3_HW_RIPTIDE, 0,
2148                                            &chip->opl3)) < 0)
2149                         snd_printk(KERN_WARNING
2150                                    "Riptide: Can't Allocate OPL3 at 0x%x\n",
2151                                    addr);
2152                 else {
2153                         chip->opladdr = addr;
2154                         if ((err =
2155                              snd_opl3_hwdep_new(chip->opl3, 0, 1, NULL)) < 0)
2156                                 snd_printk(KERN_WARNING
2157                                            "Riptide: Can't Allocate OPL3-HWDEP\n");
2158                 }
2159         }
2160 #ifdef SUPPORT_JOYSTICK
2161         if ((addr = joystick_port[dev]) != 0) {
2162                 pci_write_config_word(chip->pci, PCI_EXT_Game_Base, addr);
2163                 chip->gameaddr = addr;
2164         }
2165 #endif
2166
2167         strcpy(card->driver, "RIPTIDE");
2168         strcpy(card->shortname, "Riptide");
2169 #ifdef SUPPORT_JOYSTICK
2170         snprintf(card->longname, sizeof(card->longname),
2171                  "%s at 0x%lx, irq %i mpu 0x%x opl3 0x%x gameport 0x%x",
2172                  card->shortname, chip->port, chip->irq, chip->mpuaddr,
2173                  chip->opladdr, chip->gameaddr);
2174 #else
2175         snprintf(card->longname, sizeof(card->longname),
2176                  "%s at 0x%lx, irq %i mpu 0x%x opl3 0x%x",
2177                  card->shortname, chip->port, chip->irq, chip->mpuaddr,
2178                  chip->opladdr);
2179 #endif
2180         snd_riptide_proc_init(chip);
2181         if ((err = snd_card_register(card)) < 0) {
2182                 snd_card_free(card);
2183                 return err;
2184         }
2185         pci_set_drvdata(pci, card);
2186         dev++;
2187         return 0;
2188 }
2189
2190 static void __devexit snd_card_riptide_remove(struct pci_dev *pci)
2191 {
2192         snd_card_free(pci_get_drvdata(pci));
2193         pci_set_drvdata(pci, NULL);
2194 }
2195
2196 static struct pci_driver driver = {
2197         .name = "RIPTIDE",
2198         .id_table = snd_riptide_ids,
2199         .probe = snd_card_riptide_probe,
2200         .remove = __devexit_p(snd_card_riptide_remove),
2201 #ifdef CONFIG_PM
2202         .suspend = riptide_suspend,
2203         .resume = riptide_resume,
2204 #endif
2205 };
2206
2207 #ifdef SUPPORT_JOYSTICK
2208 static struct pci_driver joystick_driver = {
2209         .name = "Riptide Joystick",
2210         .id_table = snd_riptide_joystick_ids,
2211         .probe = snd_riptide_joystick_probe,
2212         .remove = __devexit_p(snd_riptide_joystick_remove),
2213 };
2214 #endif
2215
2216 static int __init alsa_card_riptide_init(void)
2217 {
2218         int err;
2219         if ((err = pci_register_driver(&driver)) < 0)
2220                 return err;
2221 #if defined(SUPPORT_JOYSTICK)
2222         if (pci_register_driver(&joystick_driver) < 0) {
2223                 have_joystick = 0;
2224                 snd_printk(KERN_INFO "no joystick found\n");
2225         } else
2226                 have_joystick = 1;
2227 #endif
2228         return 0;
2229 }
2230
2231 static void __exit alsa_card_riptide_exit(void)
2232 {
2233         pci_unregister_driver(&driver);
2234 #if defined(SUPPORT_JOYSTICK)
2235         if (have_joystick)
2236                 pci_unregister_driver(&joystick_driver);
2237 #endif
2238 }
2239
2240 module_init(alsa_card_riptide_init);
2241 module_exit(alsa_card_riptide_exit);