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