sound/pci/sonicvibes.c

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