ALSA: hda - Cache pin-cap values
[linux-2.6] / sound / pci / sonicvibes.c
1 /*
2  *  Driver for S3 SonicVibes soundcard
3  *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
4  *
5  *  BUGS:
6  *    It looks like 86c617 rev 3 doesn't supports DDMA buffers above 16MB?
7  *    Driver sometimes hangs... Nobody knows why at this moment...
8  *
9  *   This program is free software; you can redistribute it and/or modify
10  *   it under the terms of the GNU General Public License as published by
11  *   the Free Software Foundation; either version 2 of the License, or
12  *   (at your option) any later version.
13  *
14  *   This program is distributed in the hope that it will be useful,
15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  *   GNU General Public License for more details.
18  *
19  *   You should have received a copy of the GNU General Public License
20  *   along with this program; if not, write to the Free Software
21  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
22  *
23  */
24
25 #include <linux/delay.h>
26 #include <linux/init.h>
27 #include <linux/interrupt.h>
28 #include <linux/pci.h>
29 #include <linux/slab.h>
30 #include <linux/gameport.h>
31 #include <linux/moduleparam.h>
32 #include <linux/dma-mapping.h>
33
34 #include <sound/core.h>
35 #include <sound/pcm.h>
36 #include <sound/info.h>
37 #include <sound/control.h>
38 #include <sound/mpu401.h>
39 #include <sound/opl3.h>
40 #include <sound/initval.h>
41
42 #include <asm/io.h>
43
44 MODULE_AUTHOR("Jaroslav Kysela <perex@perex.cz>");
45 MODULE_DESCRIPTION("S3 SonicVibes PCI");
46 MODULE_LICENSE("GPL");
47 MODULE_SUPPORTED_DEVICE("{{S3,SonicVibes PCI}}");
48
49 #if defined(CONFIG_GAMEPORT) || (defined(MODULE) && defined(CONFIG_GAMEPORT_MODULE))
50 #define SUPPORT_JOYSTICK 1
51 #endif
52
53 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;      /* Index 0-MAX */
54 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;       /* ID for this card */
55 static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP;      /* Enable this card */
56 static int reverb[SNDRV_CARDS];
57 static int mge[SNDRV_CARDS];
58 static unsigned int dmaio = 0x7a00;     /* DDMA i/o address */
59
60 module_param_array(index, int, NULL, 0444);
61 MODULE_PARM_DESC(index, "Index value for S3 SonicVibes soundcard.");
62 module_param_array(id, charp, NULL, 0444);
63 MODULE_PARM_DESC(id, "ID string for S3 SonicVibes soundcard.");
64 module_param_array(enable, bool, NULL, 0444);
65 MODULE_PARM_DESC(enable, "Enable S3 SonicVibes soundcard.");
66 module_param_array(reverb, bool, NULL, 0444);
67 MODULE_PARM_DESC(reverb, "Enable reverb (SRAM is present) for S3 SonicVibes soundcard.");
68 module_param_array(mge, bool, NULL, 0444);
69 MODULE_PARM_DESC(mge, "MIC Gain Enable for S3 SonicVibes soundcard.");
70 module_param(dmaio, uint, 0444);
71 MODULE_PARM_DESC(dmaio, "DDMA i/o base address for S3 SonicVibes soundcard.");
72
73 /*
74  * Enhanced port direct registers
75  */
76
77 #define SV_REG(sonic, x) ((sonic)->enh_port + SV_REG_##x)
78
79 #define SV_REG_CONTROL  0x00    /* R/W: CODEC/Mixer control register */
80 #define   SV_ENHANCED     0x01  /* audio mode select - enhanced mode */
81 #define   SV_TEST         0x02  /* test bit */
82 #define   SV_REVERB       0x04  /* reverb enable */
83 #define   SV_WAVETABLE    0x08  /* wavetable active / FM active if not set */
84 #define   SV_INTA         0x20  /* INTA driving - should be always 1 */
85 #define   SV_RESET        0x80  /* reset chip */
86 #define SV_REG_IRQMASK  0x01    /* R/W: CODEC/Mixer interrupt mask register */
87 #define   SV_DMAA_MASK    0x01  /* mask DMA-A interrupt */
88 #define   SV_DMAC_MASK    0x04  /* mask DMA-C interrupt */
89 #define   SV_SPEC_MASK    0x08  /* special interrupt mask - should be always masked */
90 #define   SV_UD_MASK      0x40  /* Up/Down button interrupt mask */
91 #define   SV_MIDI_MASK    0x80  /* mask MIDI interrupt */
92 #define SV_REG_STATUS   0x02    /* R/O: CODEC/Mixer status register */
93 #define   SV_DMAA_IRQ     0x01  /* DMA-A interrupt */
94 #define   SV_DMAC_IRQ     0x04  /* DMA-C interrupt */
95 #define   SV_SPEC_IRQ     0x08  /* special interrupt */
96 #define   SV_UD_IRQ       0x40  /* Up/Down interrupt */
97 #define   SV_MIDI_IRQ     0x80  /* MIDI interrupt */
98 #define SV_REG_INDEX    0x04    /* R/W: CODEC/Mixer index address register */
99 #define   SV_MCE          0x40  /* mode change enable */
100 #define   SV_TRD          0x80  /* DMA transfer request disabled */
101 #define SV_REG_DATA     0x05    /* R/W: CODEC/Mixer index data register */
102
103 /*
104  * Enhanced port indirect registers
105  */
106
107 #define SV_IREG_LEFT_ADC        0x00    /* Left ADC Input Control */
108 #define SV_IREG_RIGHT_ADC       0x01    /* Right ADC Input Control */
109 #define SV_IREG_LEFT_AUX1       0x02    /* Left AUX1 Input Control */
110 #define SV_IREG_RIGHT_AUX1      0x03    /* Right AUX1 Input Control */
111 #define SV_IREG_LEFT_CD         0x04    /* Left CD Input Control */
112 #define SV_IREG_RIGHT_CD        0x05    /* Right CD Input Control */
113 #define SV_IREG_LEFT_LINE       0x06    /* Left Line Input Control */
114 #define SV_IREG_RIGHT_LINE      0x07    /* Right Line Input Control */
115 #define SV_IREG_MIC             0x08    /* MIC Input Control */
116 #define SV_IREG_GAME_PORT       0x09    /* Game Port Control */
117 #define SV_IREG_LEFT_SYNTH      0x0a    /* Left Synth Input Control */
118 #define SV_IREG_RIGHT_SYNTH     0x0b    /* Right Synth Input Control */
119 #define SV_IREG_LEFT_AUX2       0x0c    /* Left AUX2 Input Control */
120 #define SV_IREG_RIGHT_AUX2      0x0d    /* Right AUX2 Input Control */
121 #define SV_IREG_LEFT_ANALOG     0x0e    /* Left Analog Mixer Output Control */
122 #define SV_IREG_RIGHT_ANALOG    0x0f    /* Right Analog Mixer Output Control */
123 #define SV_IREG_LEFT_PCM        0x10    /* Left PCM Input Control */
124 #define SV_IREG_RIGHT_PCM       0x11    /* Right PCM Input Control */
125 #define SV_IREG_DMA_DATA_FMT    0x12    /* DMA Data Format */
126 #define SV_IREG_PC_ENABLE       0x13    /* Playback/Capture Enable Register */
127 #define SV_IREG_UD_BUTTON       0x14    /* Up/Down Button Register */
128 #define SV_IREG_REVISION        0x15    /* Revision */
129 #define SV_IREG_ADC_OUTPUT_CTRL 0x16    /* ADC Output Control */
130 #define SV_IREG_DMA_A_UPPER     0x18    /* DMA A Upper Base Count */
131 #define SV_IREG_DMA_A_LOWER     0x19    /* DMA A Lower Base Count */
132 #define SV_IREG_DMA_C_UPPER     0x1c    /* DMA C Upper Base Count */
133 #define SV_IREG_DMA_C_LOWER     0x1d    /* DMA C Lower Base Count */
134 #define SV_IREG_PCM_RATE_LOW    0x1e    /* PCM Sampling Rate Low Byte */
135 #define SV_IREG_PCM_RATE_HIGH   0x1f    /* PCM Sampling Rate High Byte */
136 #define SV_IREG_SYNTH_RATE_LOW  0x20    /* Synthesizer Sampling Rate Low Byte */
137 #define SV_IREG_SYNTH_RATE_HIGH 0x21    /* Synthesizer Sampling Rate High Byte */
138 #define SV_IREG_ADC_CLOCK       0x22    /* ADC Clock Source Selection */
139 #define SV_IREG_ADC_ALT_RATE    0x23    /* ADC Alternative Sampling Rate Selection */
140 #define SV_IREG_ADC_PLL_M       0x24    /* ADC PLL M Register */
141 #define SV_IREG_ADC_PLL_N       0x25    /* ADC PLL N Register */
142 #define SV_IREG_SYNTH_PLL_M     0x26    /* Synthesizer PLL M Register */
143 #define SV_IREG_SYNTH_PLL_N     0x27    /* Synthesizer PLL N Register */
144 #define SV_IREG_MPU401          0x2a    /* MPU-401 UART Operation */
145 #define SV_IREG_DRIVE_CTRL      0x2b    /* Drive Control */
146 #define SV_IREG_SRS_SPACE       0x2c    /* SRS Space Control */
147 #define SV_IREG_SRS_CENTER      0x2d    /* SRS Center Control */
148 #define SV_IREG_WAVE_SOURCE     0x2e    /* Wavetable Sample Source Select */
149 #define SV_IREG_ANALOG_POWER    0x30    /* Analog Power Down Control */
150 #define SV_IREG_DIGITAL_POWER   0x31    /* Digital Power Down Control */
151
152 #define SV_IREG_ADC_PLL         SV_IREG_ADC_PLL_M
153 #define SV_IREG_SYNTH_PLL       SV_IREG_SYNTH_PLL_M
154
155 /*
156  *  DMA registers
157  */
158
159 #define SV_DMA_ADDR0            0x00
160 #define SV_DMA_ADDR1            0x01
161 #define SV_DMA_ADDR2            0x02
162 #define SV_DMA_ADDR3            0x03
163 #define SV_DMA_COUNT0           0x04
164 #define SV_DMA_COUNT1           0x05
165 #define SV_DMA_COUNT2           0x06
166 #define SV_DMA_MODE             0x0b
167 #define SV_DMA_RESET            0x0d
168 #define SV_DMA_MASK             0x0f
169
170 /*
171  *  Record sources
172  */
173
174 #define SV_RECSRC_RESERVED      (0x00<<5)
175 #define SV_RECSRC_CD            (0x01<<5)
176 #define SV_RECSRC_DAC           (0x02<<5)
177 #define SV_RECSRC_AUX2          (0x03<<5)
178 #define SV_RECSRC_LINE          (0x04<<5)
179 #define SV_RECSRC_AUX1          (0x05<<5)
180 #define SV_RECSRC_MIC           (0x06<<5)
181 #define SV_RECSRC_OUT           (0x07<<5)
182
183 /*
184  *  constants
185  */
186
187 #define SV_FULLRATE             48000
188 #define SV_REFFREQUENCY         24576000
189 #define SV_ADCMULT              512
190
191 #define SV_MODE_PLAY            1
192 #define SV_MODE_CAPTURE         2
193
194 /*
195
196  */
197
198 struct sonicvibes {
199         unsigned long dma1size;
200         unsigned long dma2size;
201         int irq;
202
203         unsigned long sb_port;
204         unsigned long enh_port;
205         unsigned long synth_port;
206         unsigned long midi_port;
207         unsigned long game_port;
208         unsigned int dmaa_port;
209         struct resource *res_dmaa;
210         unsigned int dmac_port;
211         struct resource *res_dmac;
212
213         unsigned char enable;
214         unsigned char irqmask;
215         unsigned char revision;
216         unsigned char format;
217         unsigned char srs_space;
218         unsigned char srs_center;
219         unsigned char mpu_switch;
220         unsigned char wave_source;
221
222         unsigned int mode;
223
224         struct pci_dev *pci;
225         struct snd_card *card;
226         struct snd_pcm *pcm;
227         struct snd_pcm_substream *playback_substream;
228         struct snd_pcm_substream *capture_substream;
229         struct snd_rawmidi *rmidi;
230         struct snd_hwdep *fmsynth;      /* S3FM */
231
232         spinlock_t reg_lock;
233
234         unsigned int p_dma_size;
235         unsigned int c_dma_size;
236
237         struct snd_kcontrol *master_mute;
238         struct snd_kcontrol *master_volume;
239
240 #ifdef SUPPORT_JOYSTICK
241         struct gameport *gameport;
242 #endif
243 };
244
245 static struct pci_device_id snd_sonic_ids[] = {
246         { 0x5333, 0xca00, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0, },
247         { 0, }
248 };
249
250 MODULE_DEVICE_TABLE(pci, snd_sonic_ids);
251
252 static struct snd_ratden sonicvibes_adc_clock = {
253         .num_min = 4000 * 65536,
254         .num_max = 48000UL * 65536,
255         .num_step = 1,
256         .den = 65536,
257 };
258 static struct snd_pcm_hw_constraint_ratdens snd_sonicvibes_hw_constraints_adc_clock = {
259         .nrats = 1,
260         .rats = &sonicvibes_adc_clock,
261 };
262
263 /*
264  *  common I/O routines
265  */
266
267 static inline void snd_sonicvibes_setdmaa(struct sonicvibes * sonic,
268                                           unsigned int addr,
269                                           unsigned int count)
270 {
271         count--;
272         outl(addr, sonic->dmaa_port + SV_DMA_ADDR0);
273         outl(count, sonic->dmaa_port + SV_DMA_COUNT0);
274         outb(0x18, sonic->dmaa_port + SV_DMA_MODE);
275 #if 0
276         printk("program dmaa: addr = 0x%x, paddr = 0x%x\n", addr, inl(sonic->dmaa_port + SV_DMA_ADDR0));
277 #endif
278 }
279
280 static inline void snd_sonicvibes_setdmac(struct sonicvibes * sonic,
281                                           unsigned int addr,
282                                           unsigned int count)
283 {
284         /* note: dmac is working in word mode!!! */
285         count >>= 1;
286         count--;
287         outl(addr, sonic->dmac_port + SV_DMA_ADDR0);
288         outl(count, sonic->dmac_port + SV_DMA_COUNT0);
289         outb(0x14, sonic->dmac_port + SV_DMA_MODE);
290 #if 0
291         printk("program dmac: addr = 0x%x, paddr = 0x%x\n", addr, inl(sonic->dmac_port + SV_DMA_ADDR0));
292 #endif
293 }
294
295 static inline unsigned int snd_sonicvibes_getdmaa(struct sonicvibes * sonic)
296 {
297         return (inl(sonic->dmaa_port + SV_DMA_COUNT0) & 0xffffff) + 1;
298 }
299
300 static inline unsigned int snd_sonicvibes_getdmac(struct sonicvibes * sonic)
301 {
302         /* note: dmac is working in word mode!!! */
303         return ((inl(sonic->dmac_port + SV_DMA_COUNT0) & 0xffffff) + 1) << 1;
304 }
305
306 static void snd_sonicvibes_out1(struct sonicvibes * sonic,
307                                 unsigned char reg,
308                                 unsigned char value)
309 {
310         outb(reg, SV_REG(sonic, INDEX));
311         udelay(10);
312         outb(value, SV_REG(sonic, DATA));
313         udelay(10);
314 }
315
316 static void snd_sonicvibes_out(struct sonicvibes * sonic,
317                                unsigned char reg,
318                                unsigned char value)
319 {
320         unsigned long flags;
321
322         spin_lock_irqsave(&sonic->reg_lock, flags);
323         outb(reg, SV_REG(sonic, INDEX));
324         udelay(10);
325         outb(value, SV_REG(sonic, DATA));
326         udelay(10);
327         spin_unlock_irqrestore(&sonic->reg_lock, flags);
328 }
329
330 static unsigned char snd_sonicvibes_in1(struct sonicvibes * sonic, unsigned char reg)
331 {
332         unsigned char value;
333
334         outb(reg, SV_REG(sonic, INDEX));
335         udelay(10);
336         value = inb(SV_REG(sonic, DATA));
337         udelay(10);
338         return value;
339 }
340
341 static unsigned char snd_sonicvibes_in(struct sonicvibes * sonic, unsigned char reg)
342 {
343         unsigned long flags;
344         unsigned char value;
345
346         spin_lock_irqsave(&sonic->reg_lock, flags);
347         outb(reg, SV_REG(sonic, INDEX));
348         udelay(10);
349         value = inb(SV_REG(sonic, DATA));
350         udelay(10);
351         spin_unlock_irqrestore(&sonic->reg_lock, flags);
352         return value;
353 }
354
355 #if 0
356 static void snd_sonicvibes_debug(struct sonicvibes * sonic)
357 {
358         printk("SV REGS:          INDEX = 0x%02x  ", inb(SV_REG(sonic, INDEX)));
359         printk("                 STATUS = 0x%02x\n", inb(SV_REG(sonic, STATUS)));
360         printk("  0x00: left input      = 0x%02x  ", snd_sonicvibes_in(sonic, 0x00));
361         printk("  0x20: synth rate low  = 0x%02x\n", snd_sonicvibes_in(sonic, 0x20));
362         printk("  0x01: right input     = 0x%02x  ", snd_sonicvibes_in(sonic, 0x01));
363         printk("  0x21: synth rate high = 0x%02x\n", snd_sonicvibes_in(sonic, 0x21));
364         printk("  0x02: left AUX1       = 0x%02x  ", snd_sonicvibes_in(sonic, 0x02));
365         printk("  0x22: ADC clock       = 0x%02x\n", snd_sonicvibes_in(sonic, 0x22));
366         printk("  0x03: right AUX1      = 0x%02x  ", snd_sonicvibes_in(sonic, 0x03));
367         printk("  0x23: ADC alt rate    = 0x%02x\n", snd_sonicvibes_in(sonic, 0x23));
368         printk("  0x04: left CD         = 0x%02x  ", snd_sonicvibes_in(sonic, 0x04));
369         printk("  0x24: ADC pll M       = 0x%02x\n", snd_sonicvibes_in(sonic, 0x24));
370         printk("  0x05: right CD        = 0x%02x  ", snd_sonicvibes_in(sonic, 0x05));
371         printk("  0x25: ADC pll N       = 0x%02x\n", snd_sonicvibes_in(sonic, 0x25));
372         printk("  0x06: left line       = 0x%02x  ", snd_sonicvibes_in(sonic, 0x06));
373         printk("  0x26: Synth pll M     = 0x%02x\n", snd_sonicvibes_in(sonic, 0x26));
374         printk("  0x07: right line      = 0x%02x  ", snd_sonicvibes_in(sonic, 0x07));
375         printk("  0x27: Synth pll N     = 0x%02x\n", snd_sonicvibes_in(sonic, 0x27));
376         printk("  0x08: MIC             = 0x%02x  ", snd_sonicvibes_in(sonic, 0x08));
377         printk("  0x28: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x28));
378         printk("  0x09: Game port       = 0x%02x  ", snd_sonicvibes_in(sonic, 0x09));
379         printk("  0x29: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x29));
380         printk("  0x0a: left synth      = 0x%02x  ", snd_sonicvibes_in(sonic, 0x0a));
381         printk("  0x2a: MPU401          = 0x%02x\n", snd_sonicvibes_in(sonic, 0x2a));
382         printk("  0x0b: right synth     = 0x%02x  ", snd_sonicvibes_in(sonic, 0x0b));
383         printk("  0x2b: drive ctrl      = 0x%02x\n", snd_sonicvibes_in(sonic, 0x2b));
384         printk("  0x0c: left AUX2       = 0x%02x  ", snd_sonicvibes_in(sonic, 0x0c));
385         printk("  0x2c: SRS space       = 0x%02x\n", snd_sonicvibes_in(sonic, 0x2c));
386         printk("  0x0d: right AUX2      = 0x%02x  ", snd_sonicvibes_in(sonic, 0x0d));
387         printk("  0x2d: SRS center      = 0x%02x\n", snd_sonicvibes_in(sonic, 0x2d));
388         printk("  0x0e: left analog     = 0x%02x  ", snd_sonicvibes_in(sonic, 0x0e));
389         printk("  0x2e: wave source     = 0x%02x\n", snd_sonicvibes_in(sonic, 0x2e));
390         printk("  0x0f: right analog    = 0x%02x  ", snd_sonicvibes_in(sonic, 0x0f));
391         printk("  0x2f: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x2f));
392         printk("  0x10: left PCM        = 0x%02x  ", snd_sonicvibes_in(sonic, 0x10));
393         printk("  0x30: analog power    = 0x%02x\n", snd_sonicvibes_in(sonic, 0x30));
394         printk("  0x11: right PCM       = 0x%02x  ", snd_sonicvibes_in(sonic, 0x11));
395         printk("  0x31: analog power    = 0x%02x\n", snd_sonicvibes_in(sonic, 0x31));
396         printk("  0x12: DMA data format = 0x%02x  ", snd_sonicvibes_in(sonic, 0x12));
397         printk("  0x32: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x32));
398         printk("  0x13: P/C enable      = 0x%02x  ", snd_sonicvibes_in(sonic, 0x13));
399         printk("  0x33: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x33));
400         printk("  0x14: U/D button      = 0x%02x  ", snd_sonicvibes_in(sonic, 0x14));
401         printk("  0x34: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x34));
402         printk("  0x15: revision        = 0x%02x  ", snd_sonicvibes_in(sonic, 0x15));
403         printk("  0x35: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x35));
404         printk("  0x16: ADC output ctrl = 0x%02x  ", snd_sonicvibes_in(sonic, 0x16));
405         printk("  0x36: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x36));
406         printk("  0x17: ---             = 0x%02x  ", snd_sonicvibes_in(sonic, 0x17));
407         printk("  0x37: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x37));
408         printk("  0x18: DMA A upper cnt = 0x%02x  ", snd_sonicvibes_in(sonic, 0x18));
409         printk("  0x38: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x38));
410         printk("  0x19: DMA A lower cnt = 0x%02x  ", snd_sonicvibes_in(sonic, 0x19));
411         printk("  0x39: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x39));
412         printk("  0x1a: ---             = 0x%02x  ", snd_sonicvibes_in(sonic, 0x1a));
413         printk("  0x3a: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x3a));
414         printk("  0x1b: ---             = 0x%02x  ", snd_sonicvibes_in(sonic, 0x1b));
415         printk("  0x3b: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x3b));
416         printk("  0x1c: DMA C upper cnt = 0x%02x  ", snd_sonicvibes_in(sonic, 0x1c));
417         printk("  0x3c: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x3c));
418         printk("  0x1d: DMA C upper cnt = 0x%02x  ", snd_sonicvibes_in(sonic, 0x1d));
419         printk("  0x3d: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x3d));
420         printk("  0x1e: PCM rate low    = 0x%02x  ", snd_sonicvibes_in(sonic, 0x1e));
421         printk("  0x3e: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x3e));
422         printk("  0x1f: PCM rate high   = 0x%02x  ", snd_sonicvibes_in(sonic, 0x1f));
423         printk("  0x3f: ---             = 0x%02x\n", snd_sonicvibes_in(sonic, 0x3f));
424 }
425
426 #endif
427
428 static void snd_sonicvibes_setfmt(struct sonicvibes * sonic,
429                                   unsigned char mask,
430                                   unsigned char value)
431 {
432         unsigned long flags;
433
434         spin_lock_irqsave(&sonic->reg_lock, flags);
435         outb(SV_MCE | SV_IREG_DMA_DATA_FMT, SV_REG(sonic, INDEX));
436         if (mask) {
437                 sonic->format = inb(SV_REG(sonic, DATA));
438                 udelay(10);
439         }
440         sonic->format = (sonic->format & mask) | value;
441         outb(sonic->format, SV_REG(sonic, DATA));
442         udelay(10);
443         outb(0, SV_REG(sonic, INDEX));
444         udelay(10);
445         spin_unlock_irqrestore(&sonic->reg_lock, flags);
446 }
447
448 static void snd_sonicvibes_pll(unsigned int rate,
449                                unsigned int *res_r,
450                                unsigned int *res_m,
451                                unsigned int *res_n)
452 {
453         unsigned int r, m = 0, n = 0;
454         unsigned int xm, xn, xr, xd, metric = ~0U;
455
456         if (rate < 625000 / SV_ADCMULT)
457                 rate = 625000 / SV_ADCMULT;
458         if (rate > 150000000 / SV_ADCMULT)
459                 rate = 150000000 / SV_ADCMULT;
460         /* slight violation of specs, needed for continuous sampling rates */
461         for (r = 0; rate < 75000000 / SV_ADCMULT; r += 0x20, rate <<= 1);
462         for (xn = 3; xn < 33; xn++)     /* 35 */
463                 for (xm = 3; xm < 257; xm++) {
464                         xr = ((SV_REFFREQUENCY / SV_ADCMULT) * xm) / xn;
465                         if (xr >= rate)
466                                 xd = xr - rate;
467                         else
468                                 xd = rate - xr;
469                         if (xd < metric) {
470                                 metric = xd;
471                                 m = xm - 2;
472                                 n = xn - 2;
473                         }
474                 }
475         *res_r = r;
476         *res_m = m;
477         *res_n = n;
478 #if 0
479         printk("metric = %i, xm = %i, xn = %i\n", metric, xm, xn);
480         printk("pll: m = 0x%x, r = 0x%x, n = 0x%x\n", reg, m, r, n);
481 #endif
482 }
483
484 static void snd_sonicvibes_setpll(struct sonicvibes * sonic,
485                                   unsigned char reg,
486                                   unsigned int rate)
487 {
488         unsigned long flags;
489         unsigned int r, m, n;
490
491         snd_sonicvibes_pll(rate, &r, &m, &n);
492         if (sonic != NULL) {
493                 spin_lock_irqsave(&sonic->reg_lock, flags);
494                 snd_sonicvibes_out1(sonic, reg, m);
495                 snd_sonicvibes_out1(sonic, reg + 1, r | n);
496                 spin_unlock_irqrestore(&sonic->reg_lock, flags);
497         }
498 }
499
500 static void snd_sonicvibes_set_adc_rate(struct sonicvibes * sonic, unsigned int rate)
501 {
502         unsigned long flags;
503         unsigned int div;
504         unsigned char clock;
505
506         div = 48000 / rate;
507         if (div > 8)
508                 div = 8;
509         if ((48000 / div) == rate) {    /* use the alternate clock */
510                 clock = 0x10;
511         } else {                        /* use the PLL source */
512                 clock = 0x00;
513                 snd_sonicvibes_setpll(sonic, SV_IREG_ADC_PLL, rate);
514         }
515         spin_lock_irqsave(&sonic->reg_lock, flags);
516         snd_sonicvibes_out1(sonic, SV_IREG_ADC_ALT_RATE, (div - 1) << 4);
517         snd_sonicvibes_out1(sonic, SV_IREG_ADC_CLOCK, clock);
518         spin_unlock_irqrestore(&sonic->reg_lock, flags);
519 }
520
521 static int snd_sonicvibes_hw_constraint_dac_rate(struct snd_pcm_hw_params *params,
522                                                  struct snd_pcm_hw_rule *rule)
523 {
524         unsigned int rate, div, r, m, n;
525
526         if (hw_param_interval(params, SNDRV_PCM_HW_PARAM_RATE)->min == 
527             hw_param_interval(params, SNDRV_PCM_HW_PARAM_RATE)->max) {
528                 rate = hw_param_interval(params, SNDRV_PCM_HW_PARAM_RATE)->min;
529                 div = 48000 / rate;
530                 if (div > 8)
531                         div = 8;
532                 if ((48000 / div) == rate) {
533                         params->rate_num = rate;
534                         params->rate_den = 1;
535                 } else {
536                         snd_sonicvibes_pll(rate, &r, &m, &n);
537                         snd_BUG_ON(SV_REFFREQUENCY % 16);
538                         snd_BUG_ON(SV_ADCMULT % 512);
539                         params->rate_num = (SV_REFFREQUENCY/16) * (n+2) * r;
540                         params->rate_den = (SV_ADCMULT/512) * (m+2);
541                 }
542         }
543         return 0;
544 }
545
546 static void snd_sonicvibes_set_dac_rate(struct sonicvibes * sonic, unsigned int rate)
547 {
548         unsigned int div;
549         unsigned long flags;
550
551         div = (rate * 65536 + SV_FULLRATE / 2) / SV_FULLRATE;
552         if (div > 65535)
553                 div = 65535;
554         spin_lock_irqsave(&sonic->reg_lock, flags);
555         snd_sonicvibes_out1(sonic, SV_IREG_PCM_RATE_HIGH, div >> 8);
556         snd_sonicvibes_out1(sonic, SV_IREG_PCM_RATE_LOW, div);
557         spin_unlock_irqrestore(&sonic->reg_lock, flags);
558 }
559
560 static int snd_sonicvibes_trigger(struct sonicvibes * sonic, int what, int cmd)
561 {
562         int result = 0;
563
564         spin_lock(&sonic->reg_lock);
565         if (cmd == SNDRV_PCM_TRIGGER_START) {
566                 if (!(sonic->enable & what)) {
567                         sonic->enable |= what;
568                         snd_sonicvibes_out1(sonic, SV_IREG_PC_ENABLE, sonic->enable);
569                 }
570         } else if (cmd == SNDRV_PCM_TRIGGER_STOP) {
571                 if (sonic->enable & what) {
572                         sonic->enable &= ~what;
573                         snd_sonicvibes_out1(sonic, SV_IREG_PC_ENABLE, sonic->enable);
574                 }
575         } else {
576                 result = -EINVAL;
577         }
578         spin_unlock(&sonic->reg_lock);
579         return result;
580 }
581
582 static irqreturn_t snd_sonicvibes_interrupt(int irq, void *dev_id)
583 {
584         struct sonicvibes *sonic = dev_id;
585         unsigned char status;
586
587         status = inb(SV_REG(sonic, STATUS));
588         if (!(status & (SV_DMAA_IRQ | SV_DMAC_IRQ | SV_MIDI_IRQ)))
589                 return IRQ_NONE;
590         if (status == 0xff) {   /* failure */
591                 outb(sonic->irqmask = ~0, SV_REG(sonic, IRQMASK));
592                 snd_printk(KERN_ERR "IRQ failure - interrupts disabled!!\n");
593                 return IRQ_HANDLED;
594         }
595         if (sonic->pcm) {
596                 if (status & SV_DMAA_IRQ)
597                         snd_pcm_period_elapsed(sonic->playback_substream);
598                 if (status & SV_DMAC_IRQ)
599                         snd_pcm_period_elapsed(sonic->capture_substream);
600         }
601         if (sonic->rmidi) {
602                 if (status & SV_MIDI_IRQ)
603                         snd_mpu401_uart_interrupt(irq, sonic->rmidi->private_data);
604         }
605         if (status & SV_UD_IRQ) {
606                 unsigned char udreg;
607                 int vol, oleft, oright, mleft, mright;
608
609                 spin_lock(&sonic->reg_lock);
610                 udreg = snd_sonicvibes_in1(sonic, SV_IREG_UD_BUTTON);
611                 vol = udreg & 0x3f;
612                 if (!(udreg & 0x40))
613                         vol = -vol;
614                 oleft = mleft = snd_sonicvibes_in1(sonic, SV_IREG_LEFT_ANALOG);
615                 oright = mright = snd_sonicvibes_in1(sonic, SV_IREG_RIGHT_ANALOG);
616                 oleft &= 0x1f;
617                 oright &= 0x1f;
618                 oleft += vol;
619                 if (oleft < 0)
620                         oleft = 0;
621                 if (oleft > 0x1f)
622                         oleft = 0x1f;
623                 oright += vol;
624                 if (oright < 0)
625                         oright = 0;
626                 if (oright > 0x1f)
627                         oright = 0x1f;
628                 if (udreg & 0x80) {
629                         mleft ^= 0x80;
630                         mright ^= 0x80;
631                 }
632                 oleft |= mleft & 0x80;
633                 oright |= mright & 0x80;
634                 snd_sonicvibes_out1(sonic, SV_IREG_LEFT_ANALOG, oleft);
635                 snd_sonicvibes_out1(sonic, SV_IREG_RIGHT_ANALOG, oright);
636                 spin_unlock(&sonic->reg_lock);
637                 snd_ctl_notify(sonic->card, SNDRV_CTL_EVENT_MASK_VALUE, &sonic->master_mute->id);
638                 snd_ctl_notify(sonic->card, SNDRV_CTL_EVENT_MASK_VALUE, &sonic->master_volume->id);
639         }
640         return IRQ_HANDLED;
641 }
642
643 /*
644  *  PCM part
645  */
646
647 static int snd_sonicvibes_playback_trigger(struct snd_pcm_substream *substream,
648                                            int cmd)
649 {
650         struct sonicvibes *sonic = snd_pcm_substream_chip(substream);
651         return snd_sonicvibes_trigger(sonic, 1, cmd);
652 }
653
654 static int snd_sonicvibes_capture_trigger(struct snd_pcm_substream *substream,
655                                           int cmd)
656 {
657         struct sonicvibes *sonic = snd_pcm_substream_chip(substream);
658         return snd_sonicvibes_trigger(sonic, 2, cmd);
659 }
660
661 static int snd_sonicvibes_hw_params(struct snd_pcm_substream *substream,
662                                     struct snd_pcm_hw_params *hw_params)
663 {
664         return snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(hw_params));
665 }
666
667 static int snd_sonicvibes_hw_free(struct snd_pcm_substream *substream)
668 {
669         return snd_pcm_lib_free_pages(substream);
670 }
671
672 static int snd_sonicvibes_playback_prepare(struct snd_pcm_substream *substream)
673 {
674         struct sonicvibes *sonic = snd_pcm_substream_chip(substream);
675         struct snd_pcm_runtime *runtime = substream->runtime;
676         unsigned char fmt = 0;
677         unsigned int size = snd_pcm_lib_buffer_bytes(substream);
678         unsigned int count = snd_pcm_lib_period_bytes(substream);
679
680         sonic->p_dma_size = size;
681         count--;
682         if (runtime->channels > 1)
683                 fmt |= 1;
684         if (snd_pcm_format_width(runtime->format) == 16)
685                 fmt |= 2;
686         snd_sonicvibes_setfmt(sonic, ~3, fmt);
687         snd_sonicvibes_set_dac_rate(sonic, runtime->rate);
688         spin_lock_irq(&sonic->reg_lock);
689         snd_sonicvibes_setdmaa(sonic, runtime->dma_addr, size);
690         snd_sonicvibes_out1(sonic, SV_IREG_DMA_A_UPPER, count >> 8);
691         snd_sonicvibes_out1(sonic, SV_IREG_DMA_A_LOWER, count);
692         spin_unlock_irq(&sonic->reg_lock);
693         return 0;
694 }
695
696 static int snd_sonicvibes_capture_prepare(struct snd_pcm_substream *substream)
697 {
698         struct sonicvibes *sonic = snd_pcm_substream_chip(substream);
699         struct snd_pcm_runtime *runtime = substream->runtime;
700         unsigned char fmt = 0;
701         unsigned int size = snd_pcm_lib_buffer_bytes(substream);
702         unsigned int count = snd_pcm_lib_period_bytes(substream);
703
704         sonic->c_dma_size = size;
705         count >>= 1;
706         count--;
707         if (runtime->channels > 1)
708                 fmt |= 0x10;
709         if (snd_pcm_format_width(runtime->format) == 16)
710                 fmt |= 0x20;
711         snd_sonicvibes_setfmt(sonic, ~0x30, fmt);
712         snd_sonicvibes_set_adc_rate(sonic, runtime->rate);
713         spin_lock_irq(&sonic->reg_lock);
714         snd_sonicvibes_setdmac(sonic, runtime->dma_addr, size);
715         snd_sonicvibes_out1(sonic, SV_IREG_DMA_C_UPPER, count >> 8);
716         snd_sonicvibes_out1(sonic, SV_IREG_DMA_C_LOWER, count);
717         spin_unlock_irq(&sonic->reg_lock);
718         return 0;
719 }
720
721 static snd_pcm_uframes_t snd_sonicvibes_playback_pointer(struct snd_pcm_substream *substream)
722 {
723         struct sonicvibes *sonic = snd_pcm_substream_chip(substream);
724         size_t ptr;
725
726         if (!(sonic->enable & 1))
727                 return 0;
728         ptr = sonic->p_dma_size - snd_sonicvibes_getdmaa(sonic);
729         return bytes_to_frames(substream->runtime, ptr);
730 }
731
732 static snd_pcm_uframes_t snd_sonicvibes_capture_pointer(struct snd_pcm_substream *substream)
733 {
734         struct sonicvibes *sonic = snd_pcm_substream_chip(substream);
735         size_t ptr;
736         if (!(sonic->enable & 2))
737                 return 0;
738         ptr = sonic->c_dma_size - snd_sonicvibes_getdmac(sonic);
739         return bytes_to_frames(substream->runtime, ptr);
740 }
741
742 static struct snd_pcm_hardware snd_sonicvibes_playback =
743 {
744         .info =                 (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
745                                  SNDRV_PCM_INFO_BLOCK_TRANSFER |
746                                  SNDRV_PCM_INFO_MMAP_VALID),
747         .formats =              SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE,
748         .rates =                SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
749         .rate_min =             4000,
750         .rate_max =             48000,
751         .channels_min =         1,
752         .channels_max =         2,
753         .buffer_bytes_max =     (128*1024),
754         .period_bytes_min =     32,
755         .period_bytes_max =     (128*1024),
756         .periods_min =          1,
757         .periods_max =          1024,
758         .fifo_size =            0,
759 };
760
761 static struct snd_pcm_hardware snd_sonicvibes_capture =
762 {
763         .info =                 (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
764                                  SNDRV_PCM_INFO_BLOCK_TRANSFER |
765                                  SNDRV_PCM_INFO_MMAP_VALID),
766         .formats =              SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE,
767         .rates =                SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
768         .rate_min =             4000,
769         .rate_max =             48000,
770         .channels_min =         1,
771         .channels_max =         2,
772         .buffer_bytes_max =     (128*1024),
773         .period_bytes_min =     32,
774         .period_bytes_max =     (128*1024),
775         .periods_min =          1,
776         .periods_max =          1024,
777         .fifo_size =            0,
778 };
779
780 static int snd_sonicvibes_playback_open(struct snd_pcm_substream *substream)
781 {
782         struct sonicvibes *sonic = snd_pcm_substream_chip(substream);
783         struct snd_pcm_runtime *runtime = substream->runtime;
784
785         sonic->mode |= SV_MODE_PLAY;
786         sonic->playback_substream = substream;
787         runtime->hw = snd_sonicvibes_playback;
788         snd_pcm_hw_rule_add(runtime, 0, SNDRV_PCM_HW_PARAM_RATE, snd_sonicvibes_hw_constraint_dac_rate, NULL, SNDRV_PCM_HW_PARAM_RATE, -1);
789         return 0;
790 }
791
792 static int snd_sonicvibes_capture_open(struct snd_pcm_substream *substream)
793 {
794         struct sonicvibes *sonic = snd_pcm_substream_chip(substream);
795         struct snd_pcm_runtime *runtime = substream->runtime;
796
797         sonic->mode |= SV_MODE_CAPTURE;
798         sonic->capture_substream = substream;
799         runtime->hw = snd_sonicvibes_capture;
800         snd_pcm_hw_constraint_ratdens(runtime, 0, SNDRV_PCM_HW_PARAM_RATE,
801                                       &snd_sonicvibes_hw_constraints_adc_clock);
802         return 0;
803 }
804
805 static int snd_sonicvibes_playback_close(struct snd_pcm_substream *substream)
806 {
807         struct sonicvibes *sonic = snd_pcm_substream_chip(substream);
808
809         sonic->playback_substream = NULL;
810         sonic->mode &= ~SV_MODE_PLAY;
811         return 0;
812 }
813
814 static int snd_sonicvibes_capture_close(struct snd_pcm_substream *substream)
815 {
816         struct sonicvibes *sonic = snd_pcm_substream_chip(substream);
817
818         sonic->capture_substream = NULL;
819         sonic->mode &= ~SV_MODE_CAPTURE;
820         return 0;
821 }
822
823 static struct snd_pcm_ops snd_sonicvibes_playback_ops = {
824         .open =         snd_sonicvibes_playback_open,
825         .close =        snd_sonicvibes_playback_close,
826         .ioctl =        snd_pcm_lib_ioctl,
827         .hw_params =    snd_sonicvibes_hw_params,
828         .hw_free =      snd_sonicvibes_hw_free,
829         .prepare =      snd_sonicvibes_playback_prepare,
830         .trigger =      snd_sonicvibes_playback_trigger,
831         .pointer =      snd_sonicvibes_playback_pointer,
832 };
833
834 static struct snd_pcm_ops snd_sonicvibes_capture_ops = {
835         .open =         snd_sonicvibes_capture_open,
836         .close =        snd_sonicvibes_capture_close,
837         .ioctl =        snd_pcm_lib_ioctl,
838         .hw_params =    snd_sonicvibes_hw_params,
839         .hw_free =      snd_sonicvibes_hw_free,
840         .prepare =      snd_sonicvibes_capture_prepare,
841         .trigger =      snd_sonicvibes_capture_trigger,
842         .pointer =      snd_sonicvibes_capture_pointer,
843 };
844
845 static int __devinit snd_sonicvibes_pcm(struct sonicvibes * sonic, int device, struct snd_pcm ** rpcm)
846 {
847         struct snd_pcm *pcm;
848         int err;
849
850         if ((err = snd_pcm_new(sonic->card, "s3_86c617", device, 1, 1, &pcm)) < 0)
851                 return err;
852         if (snd_BUG_ON(!pcm))
853                 return -EINVAL;
854
855         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_sonicvibes_playback_ops);
856         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_sonicvibes_capture_ops);
857
858         pcm->private_data = sonic;
859         pcm->info_flags = 0;
860         strcpy(pcm->name, "S3 SonicVibes");
861         sonic->pcm = pcm;
862
863         snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV,
864                                               snd_dma_pci_data(sonic->pci), 64*1024, 128*1024);
865
866         if (rpcm)
867                 *rpcm = pcm;
868         return 0;
869 }
870
871 /*
872  *  Mixer part
873  */
874
875 #define SONICVIBES_MUX(xname, xindex) \
876 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .index = xindex, \
877   .info = snd_sonicvibes_info_mux, \
878   .get = snd_sonicvibes_get_mux, .put = snd_sonicvibes_put_mux }
879
880 static int snd_sonicvibes_info_mux(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
881 {
882         static char *texts[7] = {
883                 "CD", "PCM", "Aux1", "Line", "Aux0", "Mic", "Mix"
884         };
885
886         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
887         uinfo->count = 2;
888         uinfo->value.enumerated.items = 7;
889         if (uinfo->value.enumerated.item >= 7)
890                 uinfo->value.enumerated.item = 6;
891         strcpy(uinfo->value.enumerated.name, texts[uinfo->value.enumerated.item]);
892         return 0;
893 }
894
895 static int snd_sonicvibes_get_mux(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
896 {
897         struct sonicvibes *sonic = snd_kcontrol_chip(kcontrol);
898         
899         spin_lock_irq(&sonic->reg_lock);
900         ucontrol->value.enumerated.item[0] = ((snd_sonicvibes_in1(sonic, SV_IREG_LEFT_ADC) & SV_RECSRC_OUT) >> 5) - 1;
901         ucontrol->value.enumerated.item[1] = ((snd_sonicvibes_in1(sonic, SV_IREG_RIGHT_ADC) & SV_RECSRC_OUT) >> 5) - 1;
902         spin_unlock_irq(&sonic->reg_lock);
903         return 0;
904 }
905
906 static int snd_sonicvibes_put_mux(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
907 {
908         struct sonicvibes *sonic = snd_kcontrol_chip(kcontrol);
909         unsigned short left, right, oval1, oval2;
910         int change;
911         
912         if (ucontrol->value.enumerated.item[0] >= 7 ||
913             ucontrol->value.enumerated.item[1] >= 7)
914                 return -EINVAL;
915         left = (ucontrol->value.enumerated.item[0] + 1) << 5;
916         right = (ucontrol->value.enumerated.item[1] + 1) << 5;
917         spin_lock_irq(&sonic->reg_lock);
918         oval1 = snd_sonicvibes_in1(sonic, SV_IREG_LEFT_ADC);
919         oval2 = snd_sonicvibes_in1(sonic, SV_IREG_RIGHT_ADC);
920         left = (oval1 & ~SV_RECSRC_OUT) | left;
921         right = (oval2 & ~SV_RECSRC_OUT) | right;
922         change = left != oval1 || right != oval2;
923         snd_sonicvibes_out1(sonic, SV_IREG_LEFT_ADC, left);
924         snd_sonicvibes_out1(sonic, SV_IREG_RIGHT_ADC, right);
925         spin_unlock_irq(&sonic->reg_lock);
926         return change;
927 }
928
929 #define SONICVIBES_SINGLE(xname, xindex, reg, shift, mask, invert) \
930 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .index = xindex, \
931   .info = snd_sonicvibes_info_single, \
932   .get = snd_sonicvibes_get_single, .put = snd_sonicvibes_put_single, \
933   .private_value = reg | (shift << 8) | (mask << 16) | (invert << 24) }
934
935 static int snd_sonicvibes_info_single(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
936 {
937         int mask = (kcontrol->private_value >> 16) & 0xff;
938
939         uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : SNDRV_CTL_ELEM_TYPE_INTEGER;
940         uinfo->count = 1;
941         uinfo->value.integer.min = 0;
942         uinfo->value.integer.max = mask;
943         return 0;
944 }
945
946 static int snd_sonicvibes_get_single(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
947 {
948         struct sonicvibes *sonic = snd_kcontrol_chip(kcontrol);
949         int reg = kcontrol->private_value & 0xff;
950         int shift = (kcontrol->private_value >> 8) & 0xff;
951         int mask = (kcontrol->private_value >> 16) & 0xff;
952         int invert = (kcontrol->private_value >> 24) & 0xff;
953         
954         spin_lock_irq(&sonic->reg_lock);
955         ucontrol->value.integer.value[0] = (snd_sonicvibes_in1(sonic, reg)>> shift) & mask;
956         spin_unlock_irq(&sonic->reg_lock);
957         if (invert)
958                 ucontrol->value.integer.value[0] = mask - ucontrol->value.integer.value[0];
959         return 0;
960 }
961
962 static int snd_sonicvibes_put_single(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
963 {
964         struct sonicvibes *sonic = snd_kcontrol_chip(kcontrol);
965         int reg = kcontrol->private_value & 0xff;
966         int shift = (kcontrol->private_value >> 8) & 0xff;
967         int mask = (kcontrol->private_value >> 16) & 0xff;
968         int invert = (kcontrol->private_value >> 24) & 0xff;
969         int change;
970         unsigned short val, oval;
971         
972         val = (ucontrol->value.integer.value[0] & mask);
973         if (invert)
974                 val = mask - val;
975         val <<= shift;
976         spin_lock_irq(&sonic->reg_lock);
977         oval = snd_sonicvibes_in1(sonic, reg);
978         val = (oval & ~(mask << shift)) | val;
979         change = val != oval;
980         snd_sonicvibes_out1(sonic, reg, val);
981         spin_unlock_irq(&sonic->reg_lock);
982         return change;
983 }
984
985 #define SONICVIBES_DOUBLE(xname, xindex, left_reg, right_reg, shift_left, shift_right, mask, invert) \
986 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .index = xindex, \
987   .info = snd_sonicvibes_info_double, \
988   .get = snd_sonicvibes_get_double, .put = snd_sonicvibes_put_double, \
989   .private_value = left_reg | (right_reg << 8) | (shift_left << 16) | (shift_right << 19) | (mask << 24) | (invert << 22) }
990
991 static int snd_sonicvibes_info_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
992 {
993         int mask = (kcontrol->private_value >> 24) & 0xff;
994
995         uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : SNDRV_CTL_ELEM_TYPE_INTEGER;
996         uinfo->count = 2;
997         uinfo->value.integer.min = 0;
998         uinfo->value.integer.max = mask;
999         return 0;
1000 }
1001
1002 static int snd_sonicvibes_get_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
1003 {
1004         struct sonicvibes *sonic = snd_kcontrol_chip(kcontrol);
1005         int left_reg = kcontrol->private_value & 0xff;
1006         int right_reg = (kcontrol->private_value >> 8) & 0xff;
1007         int shift_left = (kcontrol->private_value >> 16) & 0x07;
1008         int shift_right = (kcontrol->private_value >> 19) & 0x07;
1009         int mask = (kcontrol->private_value >> 24) & 0xff;
1010         int invert = (kcontrol->private_value >> 22) & 1;
1011         
1012         spin_lock_irq(&sonic->reg_lock);
1013         ucontrol->value.integer.value[0] = (snd_sonicvibes_in1(sonic, left_reg) >> shift_left) & mask;
1014         ucontrol->value.integer.value[1] = (snd_sonicvibes_in1(sonic, right_reg) >> shift_right) & mask;
1015         spin_unlock_irq(&sonic->reg_lock);
1016         if (invert) {
1017                 ucontrol->value.integer.value[0] = mask - ucontrol->value.integer.value[0];
1018                 ucontrol->value.integer.value[1] = mask - ucontrol->value.integer.value[1];
1019         }
1020         return 0;
1021 }
1022
1023 static int snd_sonicvibes_put_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
1024 {
1025         struct sonicvibes *sonic = snd_kcontrol_chip(kcontrol);
1026         int left_reg = kcontrol->private_value & 0xff;
1027         int right_reg = (kcontrol->private_value >> 8) & 0xff;
1028         int shift_left = (kcontrol->private_value >> 16) & 0x07;
1029         int shift_right = (kcontrol->private_value >> 19) & 0x07;
1030         int mask = (kcontrol->private_value >> 24) & 0xff;
1031         int invert = (kcontrol->private_value >> 22) & 1;
1032         int change;
1033         unsigned short val1, val2, oval1, oval2;
1034         
1035         val1 = ucontrol->value.integer.value[0] & mask;
1036         val2 = ucontrol->value.integer.value[1] & mask;
1037         if (invert) {
1038                 val1 = mask - val1;
1039                 val2 = mask - val2;
1040         }
1041         val1 <<= shift_left;
1042         val2 <<= shift_right;
1043         spin_lock_irq(&sonic->reg_lock);
1044         oval1 = snd_sonicvibes_in1(sonic, left_reg);
1045         oval2 = snd_sonicvibes_in1(sonic, right_reg);
1046         val1 = (oval1 & ~(mask << shift_left)) | val1;
1047         val2 = (oval2 & ~(mask << shift_right)) | val2;
1048         change = val1 != oval1 || val2 != oval2;
1049         snd_sonicvibes_out1(sonic, left_reg, val1);
1050         snd_sonicvibes_out1(sonic, right_reg, val2);
1051         spin_unlock_irq(&sonic->reg_lock);
1052         return change;
1053 }
1054
1055 static struct snd_kcontrol_new snd_sonicvibes_controls[] __devinitdata = {
1056 SONICVIBES_DOUBLE("Capture Volume", 0, SV_IREG_LEFT_ADC, SV_IREG_RIGHT_ADC, 0, 0, 15, 0),
1057 SONICVIBES_DOUBLE("Aux Playback Switch", 0, SV_IREG_LEFT_AUX1, SV_IREG_RIGHT_AUX1, 7, 7, 1, 1),
1058 SONICVIBES_DOUBLE("Aux Playback Volume", 0, SV_IREG_LEFT_AUX1, SV_IREG_RIGHT_AUX1, 0, 0, 31, 1),
1059 SONICVIBES_DOUBLE("CD Playback Switch", 0, SV_IREG_LEFT_CD, SV_IREG_RIGHT_CD, 7, 7, 1, 1),
1060 SONICVIBES_DOUBLE("CD Playback Volume", 0, SV_IREG_LEFT_CD, SV_IREG_RIGHT_CD, 0, 0, 31, 1),
1061 SONICVIBES_DOUBLE("Line Playback Switch", 0, SV_IREG_LEFT_LINE, SV_IREG_RIGHT_LINE, 7, 7, 1, 1),
1062 SONICVIBES_DOUBLE("Line Playback Volume", 0, SV_IREG_LEFT_LINE, SV_IREG_RIGHT_LINE, 0, 0, 31, 1),
1063 SONICVIBES_SINGLE("Mic Playback Switch", 0, SV_IREG_MIC, 7, 1, 1),
1064 SONICVIBES_SINGLE("Mic Playback Volume", 0, SV_IREG_MIC, 0, 15, 1),
1065 SONICVIBES_SINGLE("Mic Boost", 0, SV_IREG_LEFT_ADC, 4, 1, 0),
1066 SONICVIBES_DOUBLE("Synth Playback Switch", 0, SV_IREG_LEFT_SYNTH, SV_IREG_RIGHT_SYNTH, 7, 7, 1, 1),
1067 SONICVIBES_DOUBLE("Synth Playback Volume", 0, SV_IREG_LEFT_SYNTH, SV_IREG_RIGHT_SYNTH, 0, 0, 31, 1),
1068 SONICVIBES_DOUBLE("Aux Playback Switch", 1, SV_IREG_LEFT_AUX2, SV_IREG_RIGHT_AUX2, 7, 7, 1, 1),
1069 SONICVIBES_DOUBLE("Aux Playback Volume", 1, SV_IREG_LEFT_AUX2, SV_IREG_RIGHT_AUX2, 0, 0, 31, 1),
1070 SONICVIBES_DOUBLE("Master Playback Switch", 0, SV_IREG_LEFT_ANALOG, SV_IREG_RIGHT_ANALOG, 7, 7, 1, 1),
1071 SONICVIBES_DOUBLE("Master Playback Volume", 0, SV_IREG_LEFT_ANALOG, SV_IREG_RIGHT_ANALOG, 0, 0, 31, 1),
1072 SONICVIBES_DOUBLE("PCM Playback Switch", 0, SV_IREG_LEFT_PCM, SV_IREG_RIGHT_PCM, 7, 7, 1, 1),
1073 SONICVIBES_DOUBLE("PCM Playback Volume", 0, SV_IREG_LEFT_PCM, SV_IREG_RIGHT_PCM, 0, 0, 63, 1),
1074 SONICVIBES_SINGLE("Loopback Capture Switch", 0, SV_IREG_ADC_OUTPUT_CTRL, 0, 1, 0),
1075 SONICVIBES_SINGLE("Loopback Capture Volume", 0, SV_IREG_ADC_OUTPUT_CTRL, 2, 63, 1),
1076 SONICVIBES_MUX("Capture Source", 0)
1077 };
1078
1079 static void snd_sonicvibes_master_free(struct snd_kcontrol *kcontrol)
1080 {
1081         struct sonicvibes *sonic = snd_kcontrol_chip(kcontrol);
1082         sonic->master_mute = NULL;
1083         sonic->master_volume = NULL;
1084 }
1085
1086 static int __devinit snd_sonicvibes_mixer(struct sonicvibes * sonic)
1087 {
1088         struct snd_card *card;
1089         struct snd_kcontrol *kctl;
1090         unsigned int idx;
1091         int err;
1092
1093         if (snd_BUG_ON(!sonic || !sonic->card))
1094                 return -EINVAL;
1095         card = sonic->card;
1096         strcpy(card->mixername, "S3 SonicVibes");
1097
1098         for (idx = 0; idx < ARRAY_SIZE(snd_sonicvibes_controls); idx++) {
1099                 if ((err = snd_ctl_add(card, kctl = snd_ctl_new1(&snd_sonicvibes_controls[idx], sonic))) < 0)
1100                         return err;
1101                 switch (idx) {
1102                 case 0:
1103                 case 1: kctl->private_free = snd_sonicvibes_master_free; break;
1104                 }
1105         }
1106         return 0;
1107 }
1108
1109 /*
1110
1111  */
1112
1113 static void snd_sonicvibes_proc_read(struct snd_info_entry *entry, 
1114                                      struct snd_info_buffer *buffer)
1115 {
1116         struct sonicvibes *sonic = entry->private_data;
1117         unsigned char tmp;
1118
1119         tmp = sonic->srs_space & 0x0f;
1120         snd_iprintf(buffer, "SRS 3D           : %s\n",
1121                     sonic->srs_space & 0x80 ? "off" : "on");
1122         snd_iprintf(buffer, "SRS Space        : %s\n",
1123                     tmp == 0x00 ? "100%" :
1124                     tmp == 0x01 ? "75%" :
1125                     tmp == 0x02 ? "50%" :
1126                     tmp == 0x03 ? "25%" : "0%");
1127         tmp = sonic->srs_center & 0x0f;
1128         snd_iprintf(buffer, "SRS Center       : %s\n",
1129                     tmp == 0x00 ? "100%" :
1130                     tmp == 0x01 ? "75%" :
1131                     tmp == 0x02 ? "50%" :
1132                     tmp == 0x03 ? "25%" : "0%");
1133         tmp = sonic->wave_source & 0x03;
1134         snd_iprintf(buffer, "WaveTable Source : %s\n",
1135                     tmp == 0x00 ? "on-board ROM" :
1136                     tmp == 0x01 ? "PCI bus" : "on-board ROM + PCI bus");
1137         tmp = sonic->mpu_switch;
1138         snd_iprintf(buffer, "Onboard synth    : %s\n", tmp & 0x01 ? "on" : "off");
1139         snd_iprintf(buffer, "Ext. Rx to synth : %s\n", tmp & 0x02 ? "on" : "off");
1140         snd_iprintf(buffer, "MIDI to ext. Tx  : %s\n", tmp & 0x04 ? "on" : "off");
1141 }
1142
1143 static void __devinit snd_sonicvibes_proc_init(struct sonicvibes * sonic)
1144 {
1145         struct snd_info_entry *entry;
1146
1147         if (! snd_card_proc_new(sonic->card, "sonicvibes", &entry))
1148                 snd_info_set_text_ops(entry, sonic, snd_sonicvibes_proc_read);
1149 }
1150
1151 /*
1152
1153  */
1154
1155 #ifdef SUPPORT_JOYSTICK
1156 static struct snd_kcontrol_new snd_sonicvibes_game_control __devinitdata =
1157 SONICVIBES_SINGLE("Joystick Speed", 0, SV_IREG_GAME_PORT, 1, 15, 0);
1158
1159 static int __devinit snd_sonicvibes_create_gameport(struct sonicvibes *sonic)
1160 {
1161         struct gameport *gp;
1162
1163         sonic->gameport = gp = gameport_allocate_port();
1164         if (!gp) {
1165                 printk(KERN_ERR "sonicvibes: cannot allocate memory for gameport\n");
1166                 return -ENOMEM;
1167         }
1168
1169         gameport_set_name(gp, "SonicVibes Gameport");
1170         gameport_set_phys(gp, "pci%s/gameport0", pci_name(sonic->pci));
1171         gameport_set_dev_parent(gp, &sonic->pci->dev);
1172         gp->io = sonic->game_port;
1173
1174         gameport_register_port(gp);
1175
1176         snd_ctl_add(sonic->card, snd_ctl_new1(&snd_sonicvibes_game_control, sonic));
1177
1178         return 0;
1179 }
1180
1181 static void snd_sonicvibes_free_gameport(struct sonicvibes *sonic)
1182 {
1183         if (sonic->gameport) {
1184                 gameport_unregister_port(sonic->gameport);
1185                 sonic->gameport = NULL;
1186         }
1187 }
1188 #else
1189 static inline int snd_sonicvibes_create_gameport(struct sonicvibes *sonic) { return -ENOSYS; }
1190 static inline void snd_sonicvibes_free_gameport(struct sonicvibes *sonic) { }
1191 #endif
1192
1193 static int snd_sonicvibes_free(struct sonicvibes *sonic)
1194 {
1195         snd_sonicvibes_free_gameport(sonic);
1196         pci_write_config_dword(sonic->pci, 0x40, sonic->dmaa_port);
1197         pci_write_config_dword(sonic->pci, 0x48, sonic->dmac_port);
1198         if (sonic->irq >= 0)
1199                 free_irq(sonic->irq, sonic);
1200         release_and_free_resource(sonic->res_dmaa);
1201         release_and_free_resource(sonic->res_dmac);
1202         pci_release_regions(sonic->pci);
1203         pci_disable_device(sonic->pci);
1204         kfree(sonic);
1205         return 0;
1206 }
1207
1208 static int snd_sonicvibes_dev_free(struct snd_device *device)
1209 {
1210         struct sonicvibes *sonic = device->device_data;
1211         return snd_sonicvibes_free(sonic);
1212 }
1213
1214 static int __devinit snd_sonicvibes_create(struct snd_card *card,
1215                                         struct pci_dev *pci,
1216                                         int reverb,
1217                                         int mge,
1218                                         struct sonicvibes ** rsonic)
1219 {
1220         struct sonicvibes *sonic;
1221         unsigned int dmaa, dmac;
1222         int err;
1223         static struct snd_device_ops ops = {
1224                 .dev_free =     snd_sonicvibes_dev_free,
1225         };
1226
1227         *rsonic = NULL;
1228         /* enable PCI device */
1229         if ((err = pci_enable_device(pci)) < 0)
1230                 return err;
1231         /* check, if we can restrict PCI DMA transfers to 24 bits */
1232         if (pci_set_dma_mask(pci, DMA_24BIT_MASK) < 0 ||
1233             pci_set_consistent_dma_mask(pci, DMA_24BIT_MASK) < 0) {
1234                 snd_printk(KERN_ERR "architecture does not support 24bit PCI busmaster DMA\n");
1235                 pci_disable_device(pci);
1236                 return -ENXIO;
1237         }
1238
1239         sonic = kzalloc(sizeof(*sonic), GFP_KERNEL);
1240         if (sonic == NULL) {
1241                 pci_disable_device(pci);
1242                 return -ENOMEM;
1243         }
1244         spin_lock_init(&sonic->reg_lock);
1245         sonic->card = card;
1246         sonic->pci = pci;
1247         sonic->irq = -1;
1248
1249         if ((err = pci_request_regions(pci, "S3 SonicVibes")) < 0) {
1250                 kfree(sonic);
1251                 pci_disable_device(pci);
1252                 return err;
1253         }
1254
1255         sonic->sb_port = pci_resource_start(pci, 0);
1256         sonic->enh_port = pci_resource_start(pci, 1);
1257         sonic->synth_port = pci_resource_start(pci, 2);
1258         sonic->midi_port = pci_resource_start(pci, 3);
1259         sonic->game_port = pci_resource_start(pci, 4);
1260
1261         if (request_irq(pci->irq, snd_sonicvibes_interrupt, IRQF_SHARED,
1262                         "S3 SonicVibes", sonic)) {
1263                 snd_printk(KERN_ERR "unable to grab IRQ %d\n", pci->irq);
1264                 snd_sonicvibes_free(sonic);
1265                 return -EBUSY;
1266         }
1267         sonic->irq = pci->irq;
1268
1269         pci_read_config_dword(pci, 0x40, &dmaa);
1270         pci_read_config_dword(pci, 0x48, &dmac);
1271         dmaio &= ~0x0f;
1272         dmaa &= ~0x0f;
1273         dmac &= ~0x0f;
1274         if (!dmaa) {
1275                 dmaa = dmaio;
1276                 dmaio += 0x10;
1277                 snd_printk(KERN_INFO "BIOS did not allocate DDMA channel A i/o, allocated at 0x%x\n", dmaa);
1278         }
1279         if (!dmac) {
1280                 dmac = dmaio;
1281                 dmaio += 0x10;
1282                 snd_printk(KERN_INFO "BIOS did not allocate DDMA channel C i/o, allocated at 0x%x\n", dmac);
1283         }
1284         pci_write_config_dword(pci, 0x40, dmaa);
1285         pci_write_config_dword(pci, 0x48, dmac);
1286
1287         if ((sonic->res_dmaa = request_region(dmaa, 0x10, "S3 SonicVibes DDMA-A")) == NULL) {
1288                 snd_sonicvibes_free(sonic);
1289                 snd_printk(KERN_ERR "unable to grab DDMA-A port at 0x%x-0x%x\n", dmaa, dmaa + 0x10 - 1);
1290                 return -EBUSY;
1291         }
1292         if ((sonic->res_dmac = request_region(dmac, 0x10, "S3 SonicVibes DDMA-C")) == NULL) {
1293                 snd_sonicvibes_free(sonic);
1294                 snd_printk(KERN_ERR "unable to grab DDMA-C port at 0x%x-0x%x\n", dmac, dmac + 0x10 - 1);
1295                 return -EBUSY;
1296         }
1297
1298         pci_read_config_dword(pci, 0x40, &sonic->dmaa_port);
1299         pci_read_config_dword(pci, 0x48, &sonic->dmac_port);
1300         sonic->dmaa_port &= ~0x0f;
1301         sonic->dmac_port &= ~0x0f;
1302         pci_write_config_dword(pci, 0x40, sonic->dmaa_port | 9);        /* enable + enhanced */
1303         pci_write_config_dword(pci, 0x48, sonic->dmac_port | 9);        /* enable */
1304         /* ok.. initialize S3 SonicVibes chip */
1305         outb(SV_RESET, SV_REG(sonic, CONTROL));         /* reset chip */
1306         udelay(100);
1307         outb(0, SV_REG(sonic, CONTROL));        /* release reset */
1308         udelay(100);
1309         outb(SV_ENHANCED | SV_INTA | (reverb ? SV_REVERB : 0), SV_REG(sonic, CONTROL));
1310         inb(SV_REG(sonic, STATUS));     /* clear IRQs */
1311 #if 1
1312         snd_sonicvibes_out(sonic, SV_IREG_DRIVE_CTRL, 0);       /* drive current 16mA */
1313 #else
1314         snd_sonicvibes_out(sonic, SV_IREG_DRIVE_CTRL, 0x40);    /* drive current 8mA */
1315 #endif
1316         snd_sonicvibes_out(sonic, SV_IREG_PC_ENABLE, sonic->enable = 0);        /* disable playback & capture */
1317         outb(sonic->irqmask = ~(SV_DMAA_MASK | SV_DMAC_MASK | SV_UD_MASK), SV_REG(sonic, IRQMASK));
1318         inb(SV_REG(sonic, STATUS));     /* clear IRQs */
1319         snd_sonicvibes_out(sonic, SV_IREG_ADC_CLOCK, 0);        /* use PLL as clock source */
1320         snd_sonicvibes_out(sonic, SV_IREG_ANALOG_POWER, 0);     /* power up analog parts */
1321         snd_sonicvibes_out(sonic, SV_IREG_DIGITAL_POWER, 0);    /* power up digital parts */
1322         snd_sonicvibes_setpll(sonic, SV_IREG_ADC_PLL, 8000);
1323         snd_sonicvibes_out(sonic, SV_IREG_SRS_SPACE, sonic->srs_space = 0x80);  /* SRS space off */
1324         snd_sonicvibes_out(sonic, SV_IREG_SRS_CENTER, sonic->srs_center = 0x00);/* SRS center off */
1325         snd_sonicvibes_out(sonic, SV_IREG_MPU401, sonic->mpu_switch = 0x05);    /* MPU-401 switch */
1326         snd_sonicvibes_out(sonic, SV_IREG_WAVE_SOURCE, sonic->wave_source = 0x00);      /* onboard ROM */
1327         snd_sonicvibes_out(sonic, SV_IREG_PCM_RATE_LOW, (8000 * 65536 / SV_FULLRATE) & 0xff);
1328         snd_sonicvibes_out(sonic, SV_IREG_PCM_RATE_HIGH, ((8000 * 65536 / SV_FULLRATE) >> 8) & 0xff);
1329         snd_sonicvibes_out(sonic, SV_IREG_LEFT_ADC, mge ? 0xd0 : 0xc0);
1330         snd_sonicvibes_out(sonic, SV_IREG_RIGHT_ADC, 0xc0);
1331         snd_sonicvibes_out(sonic, SV_IREG_LEFT_AUX1, 0x9f);
1332         snd_sonicvibes_out(sonic, SV_IREG_RIGHT_AUX1, 0x9f);
1333         snd_sonicvibes_out(sonic, SV_IREG_LEFT_CD, 0x9f);
1334         snd_sonicvibes_out(sonic, SV_IREG_RIGHT_CD, 0x9f);
1335         snd_sonicvibes_out(sonic, SV_IREG_LEFT_LINE, 0x9f);
1336         snd_sonicvibes_out(sonic, SV_IREG_RIGHT_LINE, 0x9f);
1337         snd_sonicvibes_out(sonic, SV_IREG_MIC, 0x8f);
1338         snd_sonicvibes_out(sonic, SV_IREG_LEFT_SYNTH, 0x9f);
1339         snd_sonicvibes_out(sonic, SV_IREG_RIGHT_SYNTH, 0x9f);
1340         snd_sonicvibes_out(sonic, SV_IREG_LEFT_AUX2, 0x9f);
1341         snd_sonicvibes_out(sonic, SV_IREG_RIGHT_AUX2, 0x9f);
1342         snd_sonicvibes_out(sonic, SV_IREG_LEFT_ANALOG, 0x9f);
1343         snd_sonicvibes_out(sonic, SV_IREG_RIGHT_ANALOG, 0x9f);
1344         snd_sonicvibes_out(sonic, SV_IREG_LEFT_PCM, 0xbf);
1345         snd_sonicvibes_out(sonic, SV_IREG_RIGHT_PCM, 0xbf);
1346         snd_sonicvibes_out(sonic, SV_IREG_ADC_OUTPUT_CTRL, 0xfc);
1347 #if 0
1348         snd_sonicvibes_debug(sonic);
1349 #endif
1350         sonic->revision = snd_sonicvibes_in(sonic, SV_IREG_REVISION);
1351
1352         if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, sonic, &ops)) < 0) {
1353                 snd_sonicvibes_free(sonic);
1354                 return err;
1355         }
1356
1357         snd_sonicvibes_proc_init(sonic);
1358
1359         snd_card_set_dev(card, &pci->dev);
1360
1361         *rsonic = sonic;
1362         return 0;
1363 }
1364
1365 /*
1366  *  MIDI section
1367  */
1368
1369 static struct snd_kcontrol_new snd_sonicvibes_midi_controls[] __devinitdata = {
1370 SONICVIBES_SINGLE("SonicVibes Wave Source RAM", 0, SV_IREG_WAVE_SOURCE, 0, 1, 0),
1371 SONICVIBES_SINGLE("SonicVibes Wave Source RAM+ROM", 0, SV_IREG_WAVE_SOURCE, 1, 1, 0),
1372 SONICVIBES_SINGLE("SonicVibes Onboard Synth", 0, SV_IREG_MPU401, 0, 1, 0),
1373 SONICVIBES_SINGLE("SonicVibes External Rx to Synth", 0, SV_IREG_MPU401, 1, 1, 0),
1374 SONICVIBES_SINGLE("SonicVibes External Tx", 0, SV_IREG_MPU401, 2, 1, 0)
1375 };
1376
1377 static int snd_sonicvibes_midi_input_open(struct snd_mpu401 * mpu)
1378 {
1379         struct sonicvibes *sonic = mpu->private_data;
1380         outb(sonic->irqmask &= ~SV_MIDI_MASK, SV_REG(sonic, IRQMASK));
1381         return 0;
1382 }
1383
1384 static void snd_sonicvibes_midi_input_close(struct snd_mpu401 * mpu)
1385 {
1386         struct sonicvibes *sonic = mpu->private_data;
1387         outb(sonic->irqmask |= SV_MIDI_MASK, SV_REG(sonic, IRQMASK));
1388 }
1389
1390 static int __devinit snd_sonicvibes_midi(struct sonicvibes * sonic,
1391                                          struct snd_rawmidi *rmidi)
1392 {
1393         struct snd_mpu401 * mpu = rmidi->private_data;
1394         struct snd_card *card = sonic->card;
1395         struct snd_rawmidi_str *dir;
1396         unsigned int idx;
1397         int err;
1398
1399         mpu->private_data = sonic;
1400         mpu->open_input = snd_sonicvibes_midi_input_open;
1401         mpu->close_input = snd_sonicvibes_midi_input_close;
1402         dir = &rmidi->streams[SNDRV_RAWMIDI_STREAM_OUTPUT];
1403         for (idx = 0; idx < ARRAY_SIZE(snd_sonicvibes_midi_controls); idx++)
1404                 if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_sonicvibes_midi_controls[idx], sonic))) < 0)
1405                         return err;
1406         return 0;
1407 }
1408
1409 static int __devinit snd_sonic_probe(struct pci_dev *pci,
1410                                      const struct pci_device_id *pci_id)
1411 {
1412         static int dev;
1413         struct snd_card *card;
1414         struct sonicvibes *sonic;
1415         struct snd_rawmidi *midi_uart;
1416         struct snd_opl3 *opl3;
1417         int idx, err;
1418
1419         if (dev >= SNDRV_CARDS)
1420                 return -ENODEV;
1421         if (!enable[dev]) {
1422                 dev++;
1423                 return -ENOENT;
1424         }
1425  
1426         card = snd_card_new(index[dev], id[dev], THIS_MODULE, 0);
1427         if (card == NULL)
1428                 return -ENOMEM;
1429         for (idx = 0; idx < 5; idx++) {
1430                 if (pci_resource_start(pci, idx) == 0 ||
1431                     !(pci_resource_flags(pci, idx) & IORESOURCE_IO)) {
1432                         snd_card_free(card);
1433                         return -ENODEV;
1434                 }
1435         }
1436         if ((err = snd_sonicvibes_create(card, pci,
1437                                          reverb[dev] ? 1 : 0,
1438                                          mge[dev] ? 1 : 0,
1439                                          &sonic)) < 0) {
1440                 snd_card_free(card);
1441                 return err;
1442         }
1443
1444         strcpy(card->driver, "SonicVibes");
1445         strcpy(card->shortname, "S3 SonicVibes");
1446         sprintf(card->longname, "%s rev %i at 0x%llx, irq %i",
1447                 card->shortname,
1448                 sonic->revision,
1449                 (unsigned long long)pci_resource_start(pci, 1),
1450                 sonic->irq);
1451
1452         if ((err = snd_sonicvibes_pcm(sonic, 0, NULL)) < 0) {
1453                 snd_card_free(card);
1454                 return err;
1455         }
1456         if ((err = snd_sonicvibes_mixer(sonic)) < 0) {
1457                 snd_card_free(card);
1458                 return err;
1459         }
1460         if ((err = snd_mpu401_uart_new(card, 0, MPU401_HW_SONICVIBES,
1461                                        sonic->midi_port, MPU401_INFO_INTEGRATED,
1462                                        sonic->irq, 0,
1463                                        &midi_uart)) < 0) {
1464                 snd_card_free(card);
1465                 return err;
1466         }
1467         snd_sonicvibes_midi(sonic, midi_uart);
1468         if ((err = snd_opl3_create(card, sonic->synth_port,
1469                                    sonic->synth_port + 2,
1470                                    OPL3_HW_OPL3_SV, 1, &opl3)) < 0) {
1471                 snd_card_free(card);
1472                 return err;
1473         }
1474         if ((err = snd_opl3_hwdep_new(opl3, 0, 1, NULL)) < 0) {
1475                 snd_card_free(card);
1476                 return err;
1477         }
1478
1479         snd_sonicvibes_create_gameport(sonic);
1480
1481         if ((err = snd_card_register(card)) < 0) {
1482                 snd_card_free(card);
1483                 return err;
1484         }
1485         
1486         pci_set_drvdata(pci, card);
1487         dev++;
1488         return 0;
1489 }
1490
1491 static void __devexit snd_sonic_remove(struct pci_dev *pci)
1492 {
1493         snd_card_free(pci_get_drvdata(pci));
1494         pci_set_drvdata(pci, NULL);
1495 }
1496
1497 static struct pci_driver driver = {
1498         .name = "S3 SonicVibes",
1499         .id_table = snd_sonic_ids,
1500         .probe = snd_sonic_probe,
1501         .remove = __devexit_p(snd_sonic_remove),
1502 };
1503
1504 static int __init alsa_card_sonicvibes_init(void)
1505 {
1506         return pci_register_driver(&driver);
1507 }
1508
1509 static void __exit alsa_card_sonicvibes_exit(void)
1510 {
1511         pci_unregister_driver(&driver);
1512 }
1513
1514 module_init(alsa_card_sonicvibes_init)
1515 module_exit(alsa_card_sonicvibes_exit)