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