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