git.oblomov.eu Git - linux-2.6/blob - sound/pci/es1938.c

   1 /*
   2  *  Driver for ESS Solo-1 (ES1938, ES1946, ES1969) soundcard
   3  *  Copyright (c) by Jaromir Koutek <miri@punknet.cz>,
   4  *                   Jaroslav Kysela <perex@perex.cz>,
   5  *                   Thomas Sailer <sailer@ife.ee.ethz.ch>,
   6  *                   Abramo Bagnara <abramo@alsa-project.org>,
   7  *                   Markus Gruber <gruber@eikon.tum.de>
   8  *
   9  * Rewritten from sonicvibes.c source.
  10  *
  11  *  TODO:
  12  *    Rewrite better spinlocks
  13  *
  14  *
  15  *   This program is free software; you can redistribute it and/or modify
  16  *   it under the terms of the GNU General Public License as published by
  17  *   the Free Software Foundation; either version 2 of the License, or
  18  *   (at your option) any later version.
  19  *
  20  *   This program is distributed in the hope that it will be useful,
  21  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  22  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  23  *   GNU General Public License for more details.
  24  *
  25  *   You should have received a copy of the GNU General Public License
  26  *   along with this program; if not, write to the Free Software
  27  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  28  *
  29  */
  30
  31 /*
  32   NOTES:
  33   - Capture data is written unaligned starting from dma_base + 1 so I need to
  34     disable mmap and to add a copy callback.
  35   - After several cycle of the following:
  36     while : ; do arecord -d1 -f cd -t raw | aplay -f cd ; done
  37     a "playback write error (DMA or IRQ trouble?)" may happen.
  38     This is due to playback interrupts not generated.
  39     I suspect a timing issue.
  40   - Sometimes the interrupt handler is invoked wrongly during playback.
  41     This generates some harmless "Unexpected hw_pointer: wrong interrupt
  42     acknowledge".
  43     I've seen that using small period sizes.
  44     Reproducible with:
  45     mpg123 test.mp3 &
  46     hdparm -t -T /dev/hda
  47 */
  48
  49
  50 #include <linux/init.h>
  51 #include <linux/interrupt.h>
  52 #include <linux/pci.h>
  53 #include <linux/slab.h>
  54 #include <linux/gameport.h>
  55 #include <linux/moduleparam.h>
  56 #include <linux/delay.h>
  57 #include <linux/dma-mapping.h>
  58 #include <sound/core.h>
  59 #include <sound/control.h>
  60 #include <sound/pcm.h>
  61 #include <sound/opl3.h>
  62 #include <sound/mpu401.h>
  63 #include <sound/initval.h>
  64 #include <sound/tlv.h>
  65
  66 #include <asm/io.h>
  67
  68 MODULE_AUTHOR("Jaromir Koutek <miri@punknet.cz>");
  69 MODULE_DESCRIPTION("ESS Solo-1");
  70 MODULE_LICENSE("GPL");
  71 MODULE_SUPPORTED_DEVICE("{{ESS,ES1938},"
  72                 "{ESS,ES1946},"
  73                 "{ESS,ES1969},"
  74                 "{TerraTec,128i PCI}}");
  75
  76 #if defined(CONFIG_GAMEPORT) || (defined(MODULE) && defined(CONFIG_GAMEPORT_MODULE))
  77 #define SUPPORT_JOYSTICK 1
  78 #endif
  79
  80 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;      /* Index 0-MAX */
  81 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;       /* ID for this card */
  82 static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP;      /* Enable this card */
  83
  84 module_param_array(index, int, NULL, 0444);
  85 MODULE_PARM_DESC(index, "Index value for ESS Solo-1 soundcard.");
  86 module_param_array(id, charp, NULL, 0444);
  87 MODULE_PARM_DESC(id, "ID string for ESS Solo-1 soundcard.");
  88 module_param_array(enable, bool, NULL, 0444);
  89 MODULE_PARM_DESC(enable, "Enable ESS Solo-1 soundcard.");
  90
  91 #define SLIO_REG(chip, x) ((chip)->io_port + ESSIO_REG_##x)
  92
  93 #define SLDM_REG(chip, x) ((chip)->ddma_port + ESSDM_REG_##x)
  94
  95 #define SLSB_REG(chip, x) ((chip)->sb_port + ESSSB_REG_##x)
  96
  97 #define SL_PCI_LEGACYCONTROL            0x40
  98 #define SL_PCI_CONFIG                   0x50
  99 #define SL_PCI_DDMACONTROL              0x60
 100
 101 #define ESSIO_REG_AUDIO2DMAADDR         0
 102 #define ESSIO_REG_AUDIO2DMACOUNT        4
 103 #define ESSIO_REG_AUDIO2MODE            6
 104 #define ESSIO_REG_IRQCONTROL            7
 105
 106 #define ESSDM_REG_DMAADDR               0x00
 107 #define ESSDM_REG_DMACOUNT              0x04
 108 #define ESSDM_REG_DMACOMMAND            0x08
 109 #define ESSDM_REG_DMASTATUS             0x08
 110 #define ESSDM_REG_DMAMODE               0x0b
 111 #define ESSDM_REG_DMACLEAR              0x0d
 112 #define ESSDM_REG_DMAMASK               0x0f
 113
 114 #define ESSSB_REG_FMLOWADDR             0x00
 115 #define ESSSB_REG_FMHIGHADDR            0x02
 116 #define ESSSB_REG_MIXERADDR             0x04
 117 #define ESSSB_REG_MIXERDATA             0x05
 118
 119 #define ESSSB_IREG_AUDIO1               0x14
 120 #define ESSSB_IREG_MICMIX               0x1a
 121 #define ESSSB_IREG_RECSRC               0x1c
 122 #define ESSSB_IREG_MASTER               0x32
 123 #define ESSSB_IREG_FM                   0x36
 124 #define ESSSB_IREG_AUXACD               0x38
 125 #define ESSSB_IREG_AUXB                 0x3a
 126 #define ESSSB_IREG_PCSPEAKER            0x3c
 127 #define ESSSB_IREG_LINE                 0x3e
 128 #define ESSSB_IREG_SPATCONTROL          0x50
 129 #define ESSSB_IREG_SPATLEVEL            0x52
 130 #define ESSSB_IREG_MASTER_LEFT          0x60
 131 #define ESSSB_IREG_MASTER_RIGHT         0x62
 132 #define ESSSB_IREG_MPU401CONTROL        0x64
 133 #define ESSSB_IREG_MICMIXRECORD         0x68
 134 #define ESSSB_IREG_AUDIO2RECORD         0x69
 135 #define ESSSB_IREG_AUXACDRECORD         0x6a
 136 #define ESSSB_IREG_FMRECORD             0x6b
 137 #define ESSSB_IREG_AUXBRECORD           0x6c
 138 #define ESSSB_IREG_MONO                 0x6d
 139 #define ESSSB_IREG_LINERECORD           0x6e
 140 #define ESSSB_IREG_MONORECORD           0x6f
 141 #define ESSSB_IREG_AUDIO2SAMPLE         0x70
 142 #define ESSSB_IREG_AUDIO2MODE           0x71
 143 #define ESSSB_IREG_AUDIO2FILTER         0x72
 144 #define ESSSB_IREG_AUDIO2TCOUNTL        0x74
 145 #define ESSSB_IREG_AUDIO2TCOUNTH        0x76
 146 #define ESSSB_IREG_AUDIO2CONTROL1       0x78
 147 #define ESSSB_IREG_AUDIO2CONTROL2       0x7a
 148 #define ESSSB_IREG_AUDIO2               0x7c
 149
 150 #define ESSSB_REG_RESET                 0x06
 151
 152 #define ESSSB_REG_READDATA              0x0a
 153 #define ESSSB_REG_WRITEDATA             0x0c
 154 #define ESSSB_REG_READSTATUS            0x0c
 155
 156 #define ESSSB_REG_STATUS                0x0e
 157
 158 #define ESS_CMD_EXTSAMPLERATE           0xa1
 159 #define ESS_CMD_FILTERDIV               0xa2
 160 #define ESS_CMD_DMACNTRELOADL           0xa4
 161 #define ESS_CMD_DMACNTRELOADH           0xa5
 162 #define ESS_CMD_ANALOGCONTROL           0xa8
 163 #define ESS_CMD_IRQCONTROL              0xb1
 164 #define ESS_CMD_DRQCONTROL              0xb2
 165 #define ESS_CMD_RECLEVEL                0xb4
 166 #define ESS_CMD_SETFORMAT               0xb6
 167 #define ESS_CMD_SETFORMAT2              0xb7
 168 #define ESS_CMD_DMACONTROL              0xb8
 169 #define ESS_CMD_DMATYPE                 0xb9
 170 #define ESS_CMD_OFFSETLEFT              0xba
 171 #define ESS_CMD_OFFSETRIGHT             0xbb
 172 #define ESS_CMD_READREG                 0xc0
 173 #define ESS_CMD_ENABLEEXT               0xc6
 174 #define ESS_CMD_PAUSEDMA                0xd0
 175 #define ESS_CMD_ENABLEAUDIO1            0xd1
 176 #define ESS_CMD_STOPAUDIO1              0xd3
 177 #define ESS_CMD_AUDIO1STATUS            0xd8
 178 #define ESS_CMD_CONTDMA                 0xd4
 179 #define ESS_CMD_TESTIRQ                 0xf2
 180
 181 #define ESS_RECSRC_MIC          0
 182 #define ESS_RECSRC_AUXACD       2
 183 #define ESS_RECSRC_AUXB         5
 184 #define ESS_RECSRC_LINE         6
 185 #define ESS_RECSRC_NONE         7
 186
 187 #define DAC1 0x01
 188 #define ADC1 0x02
 189 #define DAC2 0x04
 190
 191 /*
 192
 193  */
 194
 195 #define SAVED_REG_SIZE  32 /* max. number of registers to save */
 196
 197 struct es1938 {
 198         int irq;
 199
 200         unsigned long io_port;
 201         unsigned long sb_port;
 202         unsigned long vc_port;
 203         unsigned long mpu_port;
 204         unsigned long game_port;
 205         unsigned long ddma_port;
 206
 207         unsigned char irqmask;
 208         unsigned char revision;
 209
 210         struct snd_kcontrol *hw_volume;
 211         struct snd_kcontrol *hw_switch;
 212         struct snd_kcontrol *master_volume;
 213         struct snd_kcontrol *master_switch;
 214
 215         struct pci_dev *pci;
 216         struct snd_card *card;
 217         struct snd_pcm *pcm;
 218         struct snd_pcm_substream *capture_substream;
 219         struct snd_pcm_substream *playback1_substream;
 220         struct snd_pcm_substream *playback2_substream;
 221         struct snd_rawmidi *rmidi;
 222
 223         unsigned int dma1_size;
 224         unsigned int dma2_size;
 225         unsigned int dma1_start;
 226         unsigned int dma2_start;
 227         unsigned int dma1_shift;
 228         unsigned int dma2_shift;
 229         unsigned int last_capture_dmaaddr;
 230         unsigned int active;
 231
 232         spinlock_t reg_lock;
 233         spinlock_t mixer_lock;
 234         struct snd_info_entry *proc_entry;
 235
 236 #ifdef SUPPORT_JOYSTICK
 237         struct gameport *gameport;
 238 #endif
 239 #ifdef CONFIG_PM
 240         unsigned char saved_regs[SAVED_REG_SIZE];
 241 #endif
 242 };
 243
 244 static irqreturn_t snd_es1938_interrupt(int irq, void *dev_id);
 245
 246 static struct pci_device_id snd_es1938_ids[] = {
 247         { 0x125d, 0x1969, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0, },   /* Solo-1 */
 248         { 0, }
 249 };
 250
 251 MODULE_DEVICE_TABLE(pci, snd_es1938_ids);
 252
 253 #define RESET_LOOP_TIMEOUT      0x10000
 254 #define WRITE_LOOP_TIMEOUT      0x10000
 255 #define GET_LOOP_TIMEOUT        0x01000
 256
 257 #undef REG_DEBUG
 258 /* -----------------------------------------------------------------
 259  * Write to a mixer register
 260  * -----------------------------------------------------------------*/
 261 static void snd_es1938_mixer_write(struct es1938 *chip, unsigned char reg, unsigned char val)
 262 {
 263         unsigned long flags;
 264         spin_lock_irqsave(&chip->mixer_lock, flags);
 265         outb(reg, SLSB_REG(chip, MIXERADDR));
 266         outb(val, SLSB_REG(chip, MIXERDATA));
 267         spin_unlock_irqrestore(&chip->mixer_lock, flags);
 268 #ifdef REG_DEBUG
 269         snd_printk(KERN_DEBUG "Mixer reg %02x set to %02x\n", reg, val);
 270 #endif
 271 }
 272
 273 /* -----------------------------------------------------------------
 274  * Read from a mixer register
 275  * -----------------------------------------------------------------*/
 276 static int snd_es1938_mixer_read(struct es1938 *chip, unsigned char reg)
 277 {
 278         int data;
 279         unsigned long flags;
 280         spin_lock_irqsave(&chip->mixer_lock, flags);
 281         outb(reg, SLSB_REG(chip, MIXERADDR));
 282         data = inb(SLSB_REG(chip, MIXERDATA));
 283         spin_unlock_irqrestore(&chip->mixer_lock, flags);
 284 #ifdef REG_DEBUG
 285         snd_printk(KERN_DEBUG "Mixer reg %02x now is %02x\n", reg, data);
 286 #endif
 287         return data;
 288 }
 289
 290 /* -----------------------------------------------------------------
 291  * Write to some bits of a mixer register (return old value)
 292  * -----------------------------------------------------------------*/
 293 static int snd_es1938_mixer_bits(struct es1938 *chip, unsigned char reg,
 294                                  unsigned char mask, unsigned char val)
 295 {
 296         unsigned long flags;
 297         unsigned char old, new, oval;
 298         spin_lock_irqsave(&chip->mixer_lock, flags);
 299         outb(reg, SLSB_REG(chip, MIXERADDR));
 300         old = inb(SLSB_REG(chip, MIXERDATA));
 301         oval = old & mask;
 302         if (val != oval) {
 303                 new = (old & ~mask) | (val & mask);
 304                 outb(new, SLSB_REG(chip, MIXERDATA));
 305 #ifdef REG_DEBUG
 306                 snd_printk(KERN_DEBUG "Mixer reg %02x was %02x, set to %02x\n",
 307                            reg, old, new);
 308 #endif
 309         }
 310         spin_unlock_irqrestore(&chip->mixer_lock, flags);
 311         return oval;
 312 }
 313
 314 /* -----------------------------------------------------------------
 315  * Write command to Controller Registers
 316  * -----------------------------------------------------------------*/
 317 static void snd_es1938_write_cmd(struct es1938 *chip, unsigned char cmd)
 318 {
 319         int i;
 320         unsigned char v;
 321         for (i = 0; i < WRITE_LOOP_TIMEOUT; i++) {
 322                 if (!(v = inb(SLSB_REG(chip, READSTATUS)) & 0x80)) {
 323                         outb(cmd, SLSB_REG(chip, WRITEDATA));
 324                         return;
 325                 }
 326         }
 327         printk(KERN_ERR "snd_es1938_write_cmd timeout (0x02%x/0x02%x)\n", cmd, v);
 328 }
 329
 330 /* -----------------------------------------------------------------
 331  * Read the Read Data Buffer
 332  * -----------------------------------------------------------------*/
 333 static int snd_es1938_get_byte(struct es1938 *chip)
 334 {
 335         int i;
 336         unsigned char v;
 337         for (i = GET_LOOP_TIMEOUT; i; i--)
 338                 if ((v = inb(SLSB_REG(chip, STATUS))) & 0x80)
 339                         return inb(SLSB_REG(chip, READDATA));
 340         snd_printk(KERN_ERR "get_byte timeout: status 0x02%x\n", v);
 341         return -ENODEV;
 342 }
 343
 344 /* -----------------------------------------------------------------
 345  * Write value cmd register
 346  * -----------------------------------------------------------------*/
 347 static void snd_es1938_write(struct es1938 *chip, unsigned char reg, unsigned char val)
 348 {
 349         unsigned long flags;
 350         spin_lock_irqsave(&chip->reg_lock, flags);
 351         snd_es1938_write_cmd(chip, reg);
 352         snd_es1938_write_cmd(chip, val);
 353         spin_unlock_irqrestore(&chip->reg_lock, flags);
 354 #ifdef REG_DEBUG
 355         snd_printk(KERN_DEBUG "Reg %02x set to %02x\n", reg, val);
 356 #endif
 357 }
 358
 359 /* -----------------------------------------------------------------
 360  * Read data from cmd register and return it
 361  * -----------------------------------------------------------------*/
 362 static unsigned char snd_es1938_read(struct es1938 *chip, unsigned char reg)
 363 {
 364         unsigned char val;
 365         unsigned long flags;
 366         spin_lock_irqsave(&chip->reg_lock, flags);
 367         snd_es1938_write_cmd(chip, ESS_CMD_READREG);
 368         snd_es1938_write_cmd(chip, reg);
 369         val = snd_es1938_get_byte(chip);
 370         spin_unlock_irqrestore(&chip->reg_lock, flags);
 371 #ifdef REG_DEBUG
 372         snd_printk(KERN_DEBUG "Reg %02x now is %02x\n", reg, val);
 373 #endif
 374         return val;
 375 }
 376
 377 /* -----------------------------------------------------------------
 378  * Write data to cmd register and return old value
 379  * -----------------------------------------------------------------*/
 380 static int snd_es1938_bits(struct es1938 *chip, unsigned char reg, unsigned char mask,
 381                            unsigned char val)
 382 {
 383         unsigned long flags;
 384         unsigned char old, new, oval;
 385         spin_lock_irqsave(&chip->reg_lock, flags);
 386         snd_es1938_write_cmd(chip, ESS_CMD_READREG);
 387         snd_es1938_write_cmd(chip, reg);
 388         old = snd_es1938_get_byte(chip);
 389         oval = old & mask;
 390         if (val != oval) {
 391                 snd_es1938_write_cmd(chip, reg);
 392                 new = (old & ~mask) | (val & mask);
 393                 snd_es1938_write_cmd(chip, new);
 394 #ifdef REG_DEBUG
 395                 snd_printk(KERN_DEBUG "Reg %02x was %02x, set to %02x\n",
 396                            reg, old, new);
 397 #endif
 398         }
 399         spin_unlock_irqrestore(&chip->reg_lock, flags);
 400         return oval;
 401 }
 402
 403 /* --------------------------------------------------------------------
 404  * Reset the chip
 405  * --------------------------------------------------------------------*/
 406 static void snd_es1938_reset(struct es1938 *chip)
 407 {
 408         int i;
 409
 410         outb(3, SLSB_REG(chip, RESET));
 411         inb(SLSB_REG(chip, RESET));
 412         outb(0, SLSB_REG(chip, RESET));
 413         for (i = 0; i < RESET_LOOP_TIMEOUT; i++) {
 414                 if (inb(SLSB_REG(chip, STATUS)) & 0x80) {
 415                         if (inb(SLSB_REG(chip, READDATA)) == 0xaa)
 416                                 goto __next;
 417                 }
 418         }
 419         snd_printk(KERN_ERR "ESS Solo-1 reset failed\n");
 420
 421      __next:
 422         snd_es1938_write_cmd(chip, ESS_CMD_ENABLEEXT);
 423
 424         /* Demand transfer DMA: 4 bytes per DMA request */
 425         snd_es1938_write(chip, ESS_CMD_DMATYPE, 2);
 426
 427         /* Change behaviour of register A1
 428            4x oversampling
 429            2nd channel DAC asynchronous */
 430         snd_es1938_mixer_write(chip, ESSSB_IREG_AUDIO2MODE, 0x32);
 431         /* enable/select DMA channel and IRQ channel */
 432         snd_es1938_bits(chip, ESS_CMD_IRQCONTROL, 0xf0, 0x50);
 433         snd_es1938_bits(chip, ESS_CMD_DRQCONTROL, 0xf0, 0x50);
 434         snd_es1938_write_cmd(chip, ESS_CMD_ENABLEAUDIO1);
 435         /* Set spatializer parameters to recommended values */
 436         snd_es1938_mixer_write(chip, 0x54, 0x8f);
 437         snd_es1938_mixer_write(chip, 0x56, 0x95);
 438         snd_es1938_mixer_write(chip, 0x58, 0x94);
 439         snd_es1938_mixer_write(chip, 0x5a, 0x80);
 440 }
 441
 442 /* --------------------------------------------------------------------
 443  * Reset the FIFOs
 444  * --------------------------------------------------------------------*/
 445 static void snd_es1938_reset_fifo(struct es1938 *chip)
 446 {
 447         outb(2, SLSB_REG(chip, RESET));
 448         outb(0, SLSB_REG(chip, RESET));
 449 }
 450
 451 static struct snd_ratnum clocks[2] = {
 452         {
 453                 .num = 793800,
 454                 .den_min = 1,
 455                 .den_max = 128,
 456                 .den_step = 1,
 457         },
 458         {
 459                 .num = 768000,
 460                 .den_min = 1,
 461                 .den_max = 128,
 462                 .den_step = 1,
 463         }
 464 };
 465
 466 static struct snd_pcm_hw_constraint_ratnums hw_constraints_clocks = {
 467         .nrats = 2,
 468         .rats = clocks,
 469 };
 470
 471
 472 static void snd_es1938_rate_set(struct es1938 *chip,
 473                                 struct snd_pcm_substream *substream,
 474                                 int mode)
 475 {
 476         unsigned int bits, div0;
 477         struct snd_pcm_runtime *runtime = substream->runtime;
 478         if (runtime->rate_num == clocks[0].num)
 479                 bits = 128 - runtime->rate_den;
 480         else
 481                 bits = 256 - runtime->rate_den;
 482
 483         /* set filter register */
 484         div0 = 256 - 7160000*20/(8*82*runtime->rate);
 485
 486         if (mode == DAC2) {
 487                 snd_es1938_mixer_write(chip, 0x70, bits);
 488                 snd_es1938_mixer_write(chip, 0x72, div0);
 489         } else {
 490                 snd_es1938_write(chip, 0xA1, bits);
 491                 snd_es1938_write(chip, 0xA2, div0);
 492         }
 493 }
 494
 495 /* --------------------------------------------------------------------
 496  * Configure Solo1 builtin DMA Controller
 497  * --------------------------------------------------------------------*/
 498
 499 static void snd_es1938_playback1_setdma(struct es1938 *chip)
 500 {
 501         outb(0x00, SLIO_REG(chip, AUDIO2MODE));
 502         outl(chip->dma2_start, SLIO_REG(chip, AUDIO2DMAADDR));
 503         outw(0, SLIO_REG(chip, AUDIO2DMACOUNT));
 504         outw(chip->dma2_size, SLIO_REG(chip, AUDIO2DMACOUNT));
 505 }
 506
 507 static void snd_es1938_playback2_setdma(struct es1938 *chip)
 508 {
 509         /* Enable DMA controller */
 510         outb(0xc4, SLDM_REG(chip, DMACOMMAND));
 511         /* 1. Master reset */
 512         outb(0, SLDM_REG(chip, DMACLEAR));
 513         /* 2. Mask DMA */
 514         outb(1, SLDM_REG(chip, DMAMASK));
 515         outb(0x18, SLDM_REG(chip, DMAMODE));
 516         outl(chip->dma1_start, SLDM_REG(chip, DMAADDR));
 517         outw(chip->dma1_size - 1, SLDM_REG(chip, DMACOUNT));
 518         /* 3. Unmask DMA */
 519         outb(0, SLDM_REG(chip, DMAMASK));
 520 }
 521
 522 static void snd_es1938_capture_setdma(struct es1938 *chip)
 523 {
 524         /* Enable DMA controller */
 525         outb(0xc4, SLDM_REG(chip, DMACOMMAND));
 526         /* 1. Master reset */
 527         outb(0, SLDM_REG(chip, DMACLEAR));
 528         /* 2. Mask DMA */
 529         outb(1, SLDM_REG(chip, DMAMASK));
 530         outb(0x14, SLDM_REG(chip, DMAMODE));
 531         outl(chip->dma1_start, SLDM_REG(chip, DMAADDR));
 532         chip->last_capture_dmaaddr = chip->dma1_start;
 533         outw(chip->dma1_size - 1, SLDM_REG(chip, DMACOUNT));
 534         /* 3. Unmask DMA */
 535         outb(0, SLDM_REG(chip, DMAMASK));
 536 }
 537
 538 /* ----------------------------------------------------------------------
 539  *
 540  *                           *** PCM part ***
 541  */
 542
 543 static int snd_es1938_capture_trigger(struct snd_pcm_substream *substream,
 544                                       int cmd)
 545 {
 546         struct es1938 *chip = snd_pcm_substream_chip(substream);
 547         int val;
 548         switch (cmd) {
 549         case SNDRV_PCM_TRIGGER_START:
 550         case SNDRV_PCM_TRIGGER_RESUME:
 551                 val = 0x0f;
 552                 chip->active |= ADC1;
 553                 break;
 554         case SNDRV_PCM_TRIGGER_STOP:
 555         case SNDRV_PCM_TRIGGER_SUSPEND:
 556                 val = 0x00;
 557                 chip->active &= ~ADC1;
 558                 break;
 559         default:
 560                 return -EINVAL;
 561         }
 562         snd_es1938_write(chip, ESS_CMD_DMACONTROL, val);
 563         return 0;
 564 }
 565
 566 static int snd_es1938_playback1_trigger(struct snd_pcm_substream *substream,
 567                                         int cmd)
 568 {
 569         struct es1938 *chip = snd_pcm_substream_chip(substream);
 570         switch (cmd) {
 571         case SNDRV_PCM_TRIGGER_START:
 572         case SNDRV_PCM_TRIGGER_RESUME:
 573                 /* According to the documentation this should be:
 574                    0x13 but that value may randomly swap stereo channels */
 575                 snd_es1938_mixer_write(chip, ESSSB_IREG_AUDIO2CONTROL1, 0x92);
 576                 udelay(10);
 577                 snd_es1938_mixer_write(chip, ESSSB_IREG_AUDIO2CONTROL1, 0x93);
 578                 /* This two stage init gives the FIFO -> DAC connection time to
 579                  * settle before first data from DMA flows in.  This should ensure
 580                  * no swapping of stereo channels.  Report a bug if otherwise :-) */
 581                 outb(0x0a, SLIO_REG(chip, AUDIO2MODE));
 582                 chip->active |= DAC2;
 583                 break;
 584         case SNDRV_PCM_TRIGGER_STOP:
 585         case SNDRV_PCM_TRIGGER_SUSPEND:
 586                 outb(0, SLIO_REG(chip, AUDIO2MODE));
 587                 snd_es1938_mixer_write(chip, ESSSB_IREG_AUDIO2CONTROL1, 0);
 588                 chip->active &= ~DAC2;
 589                 break;
 590         default:
 591                 return -EINVAL;
 592         }
 593         return 0;
 594 }
 595
 596 static int snd_es1938_playback2_trigger(struct snd_pcm_substream *substream,
 597                                         int cmd)
 598 {
 599         struct es1938 *chip = snd_pcm_substream_chip(substream);
 600         int val;
 601         switch (cmd) {
 602         case SNDRV_PCM_TRIGGER_START:
 603         case SNDRV_PCM_TRIGGER_RESUME:
 604                 val = 5;
 605                 chip->active |= DAC1;
 606                 break;
 607         case SNDRV_PCM_TRIGGER_STOP:
 608         case SNDRV_PCM_TRIGGER_SUSPEND:
 609                 val = 0;
 610                 chip->active &= ~DAC1;
 611                 break;
 612         default:
 613                 return -EINVAL;
 614         }
 615         snd_es1938_write(chip, ESS_CMD_DMACONTROL, val);
 616         return 0;
 617 }
 618
 619 static int snd_es1938_playback_trigger(struct snd_pcm_substream *substream,
 620                                        int cmd)
 621 {
 622         switch (substream->number) {
 623         case 0:
 624                 return snd_es1938_playback1_trigger(substream, cmd);
 625         case 1:
 626                 return snd_es1938_playback2_trigger(substream, cmd);
 627         }
 628         snd_BUG();
 629         return -EINVAL;
 630 }
 631
 632 /* --------------------------------------------------------------------
 633  * First channel for Extended Mode Audio 1 ADC Operation
 634  * --------------------------------------------------------------------*/
 635 static int snd_es1938_capture_prepare(struct snd_pcm_substream *substream)
 636 {
 637         struct es1938 *chip = snd_pcm_substream_chip(substream);
 638         struct snd_pcm_runtime *runtime = substream->runtime;
 639         int u, is8, mono;
 640         unsigned int size = snd_pcm_lib_buffer_bytes(substream);
 641         unsigned int count = snd_pcm_lib_period_bytes(substream);
 642
 643         chip->dma1_size = size;
 644         chip->dma1_start = runtime->dma_addr;
 645
 646         mono = (runtime->channels > 1) ? 0 : 1;
 647         is8 = snd_pcm_format_width(runtime->format) == 16 ? 0 : 1;
 648         u = snd_pcm_format_unsigned(runtime->format);
 649
 650         chip->dma1_shift = 2 - mono - is8;
 651
 652         snd_es1938_reset_fifo(chip);
 653
 654         /* program type */
 655         snd_es1938_bits(chip, ESS_CMD_ANALOGCONTROL, 0x03, (mono ? 2 : 1));
 656
 657         /* set clock and counters */
 658         snd_es1938_rate_set(chip, substream, ADC1);
 659
 660         count = 0x10000 - count;
 661         snd_es1938_write(chip, ESS_CMD_DMACNTRELOADL, count & 0xff);
 662         snd_es1938_write(chip, ESS_CMD_DMACNTRELOADH, count >> 8);
 663
 664         /* initialize and configure ADC */
 665         snd_es1938_write(chip, ESS_CMD_SETFORMAT2, u ? 0x51 : 0x71);
 666         snd_es1938_write(chip, ESS_CMD_SETFORMAT2, 0x90 |
 667                        (u ? 0x00 : 0x20) |
 668                        (is8 ? 0x00 : 0x04) |
 669                        (mono ? 0x40 : 0x08));
 670
 671         //      snd_es1938_reset_fifo(chip);
 672
 673         /* 11. configure system interrupt controller and DMA controller */
 674         snd_es1938_capture_setdma(chip);
 675
 676         return 0;
 677 }
 678
 679
 680 /* ------------------------------------------------------------------------------
 681  * Second Audio channel DAC Operation
 682  * ------------------------------------------------------------------------------*/
 683 static int snd_es1938_playback1_prepare(struct snd_pcm_substream *substream)
 684 {
 685         struct es1938 *chip = snd_pcm_substream_chip(substream);
 686         struct snd_pcm_runtime *runtime = substream->runtime;
 687         int u, is8, mono;
 688         unsigned int size = snd_pcm_lib_buffer_bytes(substream);
 689         unsigned int count = snd_pcm_lib_period_bytes(substream);
 690
 691         chip->dma2_size = size;
 692         chip->dma2_start = runtime->dma_addr;
 693
 694         mono = (runtime->channels > 1) ? 0 : 1;
 695         is8 = snd_pcm_format_width(runtime->format) == 16 ? 0 : 1;
 696         u = snd_pcm_format_unsigned(runtime->format);
 697
 698         chip->dma2_shift = 2 - mono - is8;
 699
 700         snd_es1938_reset_fifo(chip);
 701
 702         /* set clock and counters */
 703         snd_es1938_rate_set(chip, substream, DAC2);
 704
 705         count >>= 1;
 706         count = 0x10000 - count;
 707         snd_es1938_mixer_write(chip, ESSSB_IREG_AUDIO2TCOUNTL, count & 0xff);
 708         snd_es1938_mixer_write(chip, ESSSB_IREG_AUDIO2TCOUNTH, count >> 8);
 709
 710         /* initialize and configure Audio 2 DAC */
 711         snd_es1938_mixer_write(chip, ESSSB_IREG_AUDIO2CONTROL2, 0x40 | (u ? 0 : 4) |
 712                                (mono ? 0 : 2) | (is8 ? 0 : 1));
 713
 714         /* program DMA */
 715         snd_es1938_playback1_setdma(chip);
 716
 717         return 0;
 718 }
 719
 720 static int snd_es1938_playback2_prepare(struct snd_pcm_substream *substream)
 721 {
 722         struct es1938 *chip = snd_pcm_substream_chip(substream);
 723         struct snd_pcm_runtime *runtime = substream->runtime;
 724         int u, is8, mono;
 725         unsigned int size = snd_pcm_lib_buffer_bytes(substream);
 726         unsigned int count = snd_pcm_lib_period_bytes(substream);
 727
 728         chip->dma1_size = size;
 729         chip->dma1_start = runtime->dma_addr;
 730
 731         mono = (runtime->channels > 1) ? 0 : 1;
 732         is8 = snd_pcm_format_width(runtime->format) == 16 ? 0 : 1;
 733         u = snd_pcm_format_unsigned(runtime->format);
 734
 735         chip->dma1_shift = 2 - mono - is8;
 736
 737         count = 0x10000 - count;
 738
 739         /* reset */
 740         snd_es1938_reset_fifo(chip);
 741
 742         snd_es1938_bits(chip, ESS_CMD_ANALOGCONTROL, 0x03, (mono ? 2 : 1));
 743
 744         /* set clock and counters */
 745         snd_es1938_rate_set(chip, substream, DAC1);
 746         snd_es1938_write(chip, ESS_CMD_DMACNTRELOADL, count & 0xff);
 747         snd_es1938_write(chip, ESS_CMD_DMACNTRELOADH, count >> 8);
 748
 749         /* initialized and configure DAC */
 750         snd_es1938_write(chip, ESS_CMD_SETFORMAT, u ? 0x80 : 0x00);
 751         snd_es1938_write(chip, ESS_CMD_SETFORMAT, u ? 0x51 : 0x71);
 752         snd_es1938_write(chip, ESS_CMD_SETFORMAT2,
 753                          0x90 | (mono ? 0x40 : 0x08) |
 754                          (is8 ? 0x00 : 0x04) | (u ? 0x00 : 0x20));
 755
 756         /* program DMA */
 757         snd_es1938_playback2_setdma(chip);
 758
 759         return 0;
 760 }
 761
 762 static int snd_es1938_playback_prepare(struct snd_pcm_substream *substream)
 763 {
 764         switch (substream->number) {
 765         case 0:
 766                 return snd_es1938_playback1_prepare(substream);
 767         case 1:
 768                 return snd_es1938_playback2_prepare(substream);
 769         }
 770         snd_BUG();
 771         return -EINVAL;
 772 }
 773
 774 /* during the incrementing of dma counters the DMA register reads sometimes
 775    returns garbage. To ensure a valid hw pointer, the following checks which
 776    should be very unlikely to fail are used:
 777    - is the current DMA address in the valid DMA range ?
 778    - is the sum of DMA address and DMA counter pointing to the last DMA byte ?
 779    One can argue this could differ by one byte depending on which register is
 780    updated first, so the implementation below allows for that.
 781 */
 782 static snd_pcm_uframes_t snd_es1938_capture_pointer(struct snd_pcm_substream *substream)
 783 {
 784         struct es1938 *chip = snd_pcm_substream_chip(substream);
 785         size_t ptr;
 786 #if 0
 787         size_t old, new;
 788         /* This stuff is *needed*, don't ask why - AB */
 789         old = inw(SLDM_REG(chip, DMACOUNT));
 790         while ((new = inw(SLDM_REG(chip, DMACOUNT))) != old)
 791                 old = new;
 792         ptr = chip->dma1_size - 1 - new;
 793 #else
 794         size_t count;
 795         unsigned int diff;
 796
 797         ptr = inl(SLDM_REG(chip, DMAADDR));
 798         count = inw(SLDM_REG(chip, DMACOUNT));
 799         diff = chip->dma1_start + chip->dma1_size - ptr - count;
 800
 801         if (diff > 3 || ptr < chip->dma1_start
 802               || ptr >= chip->dma1_start+chip->dma1_size)
 803           ptr = chip->last_capture_dmaaddr;            /* bad, use last saved */
 804         else
 805           chip->last_capture_dmaaddr = ptr;            /* good, remember it */
 806
 807         ptr -= chip->dma1_start;
 808 #endif
 809         return ptr >> chip->dma1_shift;
 810 }
 811
 812 static snd_pcm_uframes_t snd_es1938_playback1_pointer(struct snd_pcm_substream *substream)
 813 {
 814         struct es1938 *chip = snd_pcm_substream_chip(substream);
 815         size_t ptr;
 816 #if 1
 817         ptr = chip->dma2_size - inw(SLIO_REG(chip, AUDIO2DMACOUNT));
 818 #else
 819         ptr = inl(SLIO_REG(chip, AUDIO2DMAADDR)) - chip->dma2_start;
 820 #endif
 821         return ptr >> chip->dma2_shift;
 822 }
 823
 824 static snd_pcm_uframes_t snd_es1938_playback2_pointer(struct snd_pcm_substream *substream)
 825 {
 826         struct es1938 *chip = snd_pcm_substream_chip(substream);
 827         size_t ptr;
 828         size_t old, new;
 829 #if 1
 830         /* This stuff is *needed*, don't ask why - AB */
 831         old = inw(SLDM_REG(chip, DMACOUNT));
 832         while ((new = inw(SLDM_REG(chip, DMACOUNT))) != old)
 833                 old = new;
 834         ptr = chip->dma1_size - 1 - new;
 835 #else
 836         ptr = inl(SLDM_REG(chip, DMAADDR)) - chip->dma1_start;
 837 #endif
 838         return ptr >> chip->dma1_shift;
 839 }
 840
 841 static snd_pcm_uframes_t snd_es1938_playback_pointer(struct snd_pcm_substream *substream)
 842 {
 843         switch (substream->number) {
 844         case 0:
 845                 return snd_es1938_playback1_pointer(substream);
 846         case 1:
 847                 return snd_es1938_playback2_pointer(substream);
 848         }
 849         snd_BUG();
 850         return -EINVAL;
 851 }
 852
 853 static int snd_es1938_capture_copy(struct snd_pcm_substream *substream,
 854                                    int channel,
 855                                    snd_pcm_uframes_t pos,
 856                                    void __user *dst,
 857                                    snd_pcm_uframes_t count)
 858 {
 859         struct snd_pcm_runtime *runtime = substream->runtime;
 860         struct es1938 *chip = snd_pcm_substream_chip(substream);
 861         pos <<= chip->dma1_shift;
 862         count <<= chip->dma1_shift;
 863         if (snd_BUG_ON(pos + count > chip->dma1_size))
 864                 return -EINVAL;
 865         if (pos + count < chip->dma1_size) {
 866                 if (copy_to_user(dst, runtime->dma_area + pos + 1, count))
 867                         return -EFAULT;
 868         } else {
 869                 if (copy_to_user(dst, runtime->dma_area + pos + 1, count - 1))
 870                         return -EFAULT;
 871                 if (put_user(runtime->dma_area[0], ((unsigned char __user *)dst) + count - 1))
 872                         return -EFAULT;
 873         }
 874         return 0;
 875 }
 876
 877 /*
 878  * buffer management
 879  */
 880 static int snd_es1938_pcm_hw_params(struct snd_pcm_substream *substream,
 881                                     struct snd_pcm_hw_params *hw_params)
 882
 883 {
 884         int err;
 885
 886         if ((err = snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(hw_params))) < 0)
 887                 return err;
 888         return 0;
 889 }
 890
 891 static int snd_es1938_pcm_hw_free(struct snd_pcm_substream *substream)
 892 {
 893         return snd_pcm_lib_free_pages(substream);
 894 }
 895
 896 /* ----------------------------------------------------------------------
 897  * Audio1 Capture (ADC)
 898  * ----------------------------------------------------------------------*/
 899 static struct snd_pcm_hardware snd_es1938_capture =
 900 {
 901         .info =                 (SNDRV_PCM_INFO_INTERLEAVED |
 902                                 SNDRV_PCM_INFO_BLOCK_TRANSFER),
 903         .formats =              (SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE |
 904                                  SNDRV_PCM_FMTBIT_S8 | SNDRV_PCM_FMTBIT_U16_LE),
 905         .rates =                SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
 906         .rate_min =             6000,
 907         .rate_max =             48000,
 908         .channels_min =         1,
 909         .channels_max =         2,
 910         .buffer_bytes_max =     0x8000,       /* DMA controller screws on higher values */
 911         .period_bytes_min =     64,
 912         .period_bytes_max =     0x8000,
 913         .periods_min =          1,
 914         .periods_max =          1024,
 915         .fifo_size =            256,
 916 };
 917
 918 /* -----------------------------------------------------------------------
 919  * Audio2 Playback (DAC)
 920  * -----------------------------------------------------------------------*/
 921 static struct snd_pcm_hardware snd_es1938_playback =
 922 {
 923         .info =                 (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
 924                                  SNDRV_PCM_INFO_BLOCK_TRANSFER |
 925                                  SNDRV_PCM_INFO_MMAP_VALID),
 926         .formats =              (SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE |
 927                                  SNDRV_PCM_FMTBIT_S8 | SNDRV_PCM_FMTBIT_U16_LE),
 928         .rates =                SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
 929         .rate_min =             6000,
 930         .rate_max =             48000,
 931         .channels_min =         1,
 932         .channels_max =         2,
 933         .buffer_bytes_max =     0x8000,       /* DMA controller screws on higher values */
 934         .period_bytes_min =     64,
 935         .period_bytes_max =     0x8000,
 936         .periods_min =          1,
 937         .periods_max =          1024,
 938         .fifo_size =            256,
 939 };
 940
 941 static int snd_es1938_capture_open(struct snd_pcm_substream *substream)
 942 {
 943         struct es1938 *chip = snd_pcm_substream_chip(substream);
 944         struct snd_pcm_runtime *runtime = substream->runtime;
 945
 946         if (chip->playback2_substream)
 947                 return -EAGAIN;
 948         chip->capture_substream = substream;
 949         runtime->hw = snd_es1938_capture;
 950         snd_pcm_hw_constraint_ratnums(runtime, 0, SNDRV_PCM_HW_PARAM_RATE,
 951                                       &hw_constraints_clocks);
 952         snd_pcm_hw_constraint_minmax(runtime, SNDRV_PCM_HW_PARAM_BUFFER_BYTES, 0, 0xff00);
 953         return 0;
 954 }
 955
 956 static int snd_es1938_playback_open(struct snd_pcm_substream *substream)
 957 {
 958         struct es1938 *chip = snd_pcm_substream_chip(substream);
 959         struct snd_pcm_runtime *runtime = substream->runtime;
 960
 961         switch (substream->number) {
 962         case 0:
 963                 chip->playback1_substream = substream;
 964                 break;
 965         case 1:
 966                 if (chip->capture_substream)
 967                         return -EAGAIN;
 968                 chip->playback2_substream = substream;
 969                 break;
 970         default:
 971                 snd_BUG();
 972                 return -EINVAL;
 973         }
 974         runtime->hw = snd_es1938_playback;
 975         snd_pcm_hw_constraint_ratnums(runtime, 0, SNDRV_PCM_HW_PARAM_RATE,
 976                                       &hw_constraints_clocks);
 977         snd_pcm_hw_constraint_minmax(runtime, SNDRV_PCM_HW_PARAM_BUFFER_BYTES, 0, 0xff00);
 978         return 0;
 979 }
 980
 981 static int snd_es1938_capture_close(struct snd_pcm_substream *substream)
 982 {
 983         struct es1938 *chip = snd_pcm_substream_chip(substream);
 984
 985         chip->capture_substream = NULL;
 986         return 0;
 987 }
 988
 989 static int snd_es1938_playback_close(struct snd_pcm_substream *substream)
 990 {
 991         struct es1938 *chip = snd_pcm_substream_chip(substream);
 992
 993         switch (substream->number) {
 994         case 0:
 995                 chip->playback1_substream = NULL;
 996                 break;
 997         case 1:
 998                 chip->playback2_substream = NULL;
 999                 break;
1000         default:
1001                 snd_BUG();
1002                 return -EINVAL;
1003         }
1004         return 0;
1005 }
1006
1007 static struct snd_pcm_ops snd_es1938_playback_ops = {
1008         .open =         snd_es1938_playback_open,
1009         .close =        snd_es1938_playback_close,
1010         .ioctl =        snd_pcm_lib_ioctl,
1011         .hw_params =    snd_es1938_pcm_hw_params,
1012         .hw_free =      snd_es1938_pcm_hw_free,
1013         .prepare =      snd_es1938_playback_prepare,
1014         .trigger =      snd_es1938_playback_trigger,
1015         .pointer =      snd_es1938_playback_pointer,
1016 };
1017
1018 static struct snd_pcm_ops snd_es1938_capture_ops = {
1019         .open =         snd_es1938_capture_open,
1020         .close =        snd_es1938_capture_close,
1021         .ioctl =        snd_pcm_lib_ioctl,
1022         .hw_params =    snd_es1938_pcm_hw_params,
1023         .hw_free =      snd_es1938_pcm_hw_free,
1024         .prepare =      snd_es1938_capture_prepare,
1025         .trigger =      snd_es1938_capture_trigger,
1026         .pointer =      snd_es1938_capture_pointer,
1027         .copy =         snd_es1938_capture_copy,
1028 };
1029
1030 static int __devinit snd_es1938_new_pcm(struct es1938 *chip, int device)
1031 {
1032         struct snd_pcm *pcm;
1033         int err;
1034
1035         if ((err = snd_pcm_new(chip->card, "es-1938-1946", device, 2, 1, &pcm)) < 0)
1036                 return err;
1037         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_es1938_playback_ops);
1038         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_es1938_capture_ops);
1039
1040         pcm->private_data = chip;
1041         pcm->info_flags = 0;
1042         strcpy(pcm->name, "ESS Solo-1");
1043
1044         snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV,
1045                                               snd_dma_pci_data(chip->pci), 64*1024, 64*1024);
1046
1047         chip->pcm = pcm;
1048         return 0;
1049 }
1050
1051 /* -------------------------------------------------------------------
1052  *
1053  *                       *** Mixer part ***
1054  */
1055
1056 static int snd_es1938_info_mux(struct snd_kcontrol *kcontrol,
1057                                struct snd_ctl_elem_info *uinfo)
1058 {
1059         static char *texts[8] = {
1060                 "Mic", "Mic Master", "CD", "AOUT",
1061                 "Mic1", "Mix", "Line", "Master"
1062         };
1063
1064         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
1065         uinfo->count = 1;
1066         uinfo->value.enumerated.items = 8;
1067         if (uinfo->value.enumerated.item > 7)
1068                 uinfo->value.enumerated.item = 7;
1069         strcpy(uinfo->value.enumerated.name, texts[uinfo->value.enumerated.item]);
1070         return 0;
1071 }
1072
1073 static int snd_es1938_get_mux(struct snd_kcontrol *kcontrol,
1074                               struct snd_ctl_elem_value *ucontrol)
1075 {
1076         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1077         ucontrol->value.enumerated.item[0] = snd_es1938_mixer_read(chip, 0x1c) & 0x07;
1078         return 0;
1079 }
1080
1081 static int snd_es1938_put_mux(struct snd_kcontrol *kcontrol,
1082                               struct snd_ctl_elem_value *ucontrol)
1083 {
1084         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1085         unsigned char val = ucontrol->value.enumerated.item[0];
1086
1087         if (val > 7)
1088                 return -EINVAL;
1089         return snd_es1938_mixer_bits(chip, 0x1c, 0x07, val) != val;
1090 }
1091
1092 #define snd_es1938_info_spatializer_enable      snd_ctl_boolean_mono_info
1093
1094 static int snd_es1938_get_spatializer_enable(struct snd_kcontrol *kcontrol,
1095                                              struct snd_ctl_elem_value *ucontrol)
1096 {
1097         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1098         unsigned char val = snd_es1938_mixer_read(chip, 0x50);
1099         ucontrol->value.integer.value[0] = !!(val & 8);
1100         return 0;
1101 }
1102
1103 static int snd_es1938_put_spatializer_enable(struct snd_kcontrol *kcontrol,
1104                                              struct snd_ctl_elem_value *ucontrol)
1105 {
1106         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1107         unsigned char oval, nval;
1108         int change;
1109         nval = ucontrol->value.integer.value[0] ? 0x0c : 0x04;
1110         oval = snd_es1938_mixer_read(chip, 0x50) & 0x0c;
1111         change = nval != oval;
1112         if (change) {
1113                 snd_es1938_mixer_write(chip, 0x50, nval & ~0x04);
1114                 snd_es1938_mixer_write(chip, 0x50, nval);
1115         }
1116         return change;
1117 }
1118
1119 static int snd_es1938_info_hw_volume(struct snd_kcontrol *kcontrol,
1120                                      struct snd_ctl_elem_info *uinfo)
1121 {
1122         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
1123         uinfo->count = 2;
1124         uinfo->value.integer.min = 0;
1125         uinfo->value.integer.max = 63;
1126         return 0;
1127 }
1128
1129 static int snd_es1938_get_hw_volume(struct snd_kcontrol *kcontrol,
1130                                     struct snd_ctl_elem_value *ucontrol)
1131 {
1132         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1133         ucontrol->value.integer.value[0] = snd_es1938_mixer_read(chip, 0x61) & 0x3f;
1134         ucontrol->value.integer.value[1] = snd_es1938_mixer_read(chip, 0x63) & 0x3f;
1135         return 0;
1136 }
1137
1138 #define snd_es1938_info_hw_switch               snd_ctl_boolean_stereo_info
1139
1140 static int snd_es1938_get_hw_switch(struct snd_kcontrol *kcontrol,
1141                                     struct snd_ctl_elem_value *ucontrol)
1142 {
1143         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1144         ucontrol->value.integer.value[0] = !(snd_es1938_mixer_read(chip, 0x61) & 0x40);
1145         ucontrol->value.integer.value[1] = !(snd_es1938_mixer_read(chip, 0x63) & 0x40);
1146         return 0;
1147 }
1148
1149 static void snd_es1938_hwv_free(struct snd_kcontrol *kcontrol)
1150 {
1151         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1152         chip->master_volume = NULL;
1153         chip->master_switch = NULL;
1154         chip->hw_volume = NULL;
1155         chip->hw_switch = NULL;
1156 }
1157
1158 static int snd_es1938_reg_bits(struct es1938 *chip, unsigned char reg,
1159                                unsigned char mask, unsigned char val)
1160 {
1161         if (reg < 0xa0)
1162                 return snd_es1938_mixer_bits(chip, reg, mask, val);
1163         else
1164                 return snd_es1938_bits(chip, reg, mask, val);
1165 }
1166
1167 static int snd_es1938_reg_read(struct es1938 *chip, unsigned char reg)
1168 {
1169         if (reg < 0xa0)
1170                 return snd_es1938_mixer_read(chip, reg);
1171         else
1172                 return snd_es1938_read(chip, reg);
1173 }
1174
1175 #define ES1938_SINGLE_TLV(xname, xindex, reg, shift, mask, invert, xtlv)    \
1176 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, \
1177   .access = SNDRV_CTL_ELEM_ACCESS_READWRITE | SNDRV_CTL_ELEM_ACCESS_TLV_READ,\
1178   .name = xname, .index = xindex, \
1179   .info = snd_es1938_info_single, \
1180   .get = snd_es1938_get_single, .put = snd_es1938_put_single, \
1181   .private_value = reg | (shift << 8) | (mask << 16) | (invert << 24), \
1182   .tlv = { .p = xtlv } }
1183 #define ES1938_SINGLE(xname, xindex, reg, shift, mask, invert) \
1184 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .index = xindex, \
1185   .info = snd_es1938_info_single, \
1186   .get = snd_es1938_get_single, .put = snd_es1938_put_single, \
1187   .private_value = reg | (shift << 8) | (mask << 16) | (invert << 24) }
1188
1189 static int snd_es1938_info_single(struct snd_kcontrol *kcontrol,
1190                                   struct snd_ctl_elem_info *uinfo)
1191 {
1192         int mask = (kcontrol->private_value >> 16) & 0xff;
1193
1194         uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : SNDRV_CTL_ELEM_TYPE_INTEGER;
1195         uinfo->count = 1;
1196         uinfo->value.integer.min = 0;
1197         uinfo->value.integer.max = mask;
1198         return 0;
1199 }
1200
1201 static int snd_es1938_get_single(struct snd_kcontrol *kcontrol,
1202                                  struct snd_ctl_elem_value *ucontrol)
1203 {
1204         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1205         int reg = kcontrol->private_value & 0xff;
1206         int shift = (kcontrol->private_value >> 8) & 0xff;
1207         int mask = (kcontrol->private_value >> 16) & 0xff;
1208         int invert = (kcontrol->private_value >> 24) & 0xff;
1209         int val;
1210
1211         val = snd_es1938_reg_read(chip, reg);
1212         ucontrol->value.integer.value[0] = (val >> shift) & mask;
1213         if (invert)
1214                 ucontrol->value.integer.value[0] = mask - ucontrol->value.integer.value[0];
1215         return 0;
1216 }
1217
1218 static int snd_es1938_put_single(struct snd_kcontrol *kcontrol,
1219                                  struct snd_ctl_elem_value *ucontrol)
1220 {
1221         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1222         int reg = kcontrol->private_value & 0xff;
1223         int shift = (kcontrol->private_value >> 8) & 0xff;
1224         int mask = (kcontrol->private_value >> 16) & 0xff;
1225         int invert = (kcontrol->private_value >> 24) & 0xff;
1226         unsigned char val;
1227
1228         val = (ucontrol->value.integer.value[0] & mask);
1229         if (invert)
1230                 val = mask - val;
1231         mask <<= shift;
1232         val <<= shift;
1233         return snd_es1938_reg_bits(chip, reg, mask, val) != val;
1234 }
1235
1236 #define ES1938_DOUBLE_TLV(xname, xindex, left_reg, right_reg, shift_left, shift_right, mask, invert, xtlv) \
1237 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, \
1238   .access = SNDRV_CTL_ELEM_ACCESS_READWRITE | SNDRV_CTL_ELEM_ACCESS_TLV_READ,\
1239   .name = xname, .index = xindex, \
1240   .info = snd_es1938_info_double, \
1241   .get = snd_es1938_get_double, .put = snd_es1938_put_double, \
1242   .private_value = left_reg | (right_reg << 8) | (shift_left << 16) | (shift_right << 19) | (mask << 24) | (invert << 22), \
1243   .tlv = { .p = xtlv } }
1244 #define ES1938_DOUBLE(xname, xindex, left_reg, right_reg, shift_left, shift_right, mask, invert) \
1245 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .index = xindex, \
1246   .info = snd_es1938_info_double, \
1247   .get = snd_es1938_get_double, .put = snd_es1938_put_double, \
1248   .private_value = left_reg | (right_reg << 8) | (shift_left << 16) | (shift_right << 19) | (mask << 24) | (invert << 22) }
1249
1250 static int snd_es1938_info_double(struct snd_kcontrol *kcontrol,
1251                                   struct snd_ctl_elem_info *uinfo)
1252 {
1253         int mask = (kcontrol->private_value >> 24) & 0xff;
1254
1255         uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : SNDRV_CTL_ELEM_TYPE_INTEGER;
1256         uinfo->count = 2;
1257         uinfo->value.integer.min = 0;
1258         uinfo->value.integer.max = mask;
1259         return 0;
1260 }
1261
1262 static int snd_es1938_get_double(struct snd_kcontrol *kcontrol,
1263                                  struct snd_ctl_elem_value *ucontrol)
1264 {
1265         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1266         int left_reg = kcontrol->private_value & 0xff;
1267         int right_reg = (kcontrol->private_value >> 8) & 0xff;
1268         int shift_left = (kcontrol->private_value >> 16) & 0x07;
1269         int shift_right = (kcontrol->private_value >> 19) & 0x07;
1270         int mask = (kcontrol->private_value >> 24) & 0xff;
1271         int invert = (kcontrol->private_value >> 22) & 1;
1272         unsigned char left, right;
1273
1274         left = snd_es1938_reg_read(chip, left_reg);
1275         if (left_reg != right_reg)
1276                 right = snd_es1938_reg_read(chip, right_reg);
1277         else
1278                 right = left;
1279         ucontrol->value.integer.value[0] = (left >> shift_left) & mask;
1280         ucontrol->value.integer.value[1] = (right >> shift_right) & mask;
1281         if (invert) {
1282                 ucontrol->value.integer.value[0] = mask - ucontrol->value.integer.value[0];
1283                 ucontrol->value.integer.value[1] = mask - ucontrol->value.integer.value[1];
1284         }
1285         return 0;
1286 }
1287
1288 static int snd_es1938_put_double(struct snd_kcontrol *kcontrol,
1289                                  struct snd_ctl_elem_value *ucontrol)
1290 {
1291         struct es1938 *chip = snd_kcontrol_chip(kcontrol);
1292         int left_reg = kcontrol->private_value & 0xff;
1293         int right_reg = (kcontrol->private_value >> 8) & 0xff;
1294         int shift_left = (kcontrol->private_value >> 16) & 0x07;
1295         int shift_right = (kcontrol->private_value >> 19) & 0x07;
1296         int mask = (kcontrol->private_value >> 24) & 0xff;
1297         int invert = (kcontrol->private_value >> 22) & 1;
1298         int change;
1299         unsigned char val1, val2, mask1, mask2;
1300
1301         val1 = ucontrol->value.integer.value[0] & mask;
1302         val2 = ucontrol->value.integer.value[1] & mask;
1303         if (invert) {
1304                 val1 = mask - val1;
1305                 val2 = mask - val2;
1306         }
1307         val1 <<= shift_left;
1308         val2 <<= shift_right;
1309         mask1 = mask << shift_left;
1310         mask2 = mask << shift_right;
1311         if (left_reg != right_reg) {
1312                 change = 0;
1313                 if (snd_es1938_reg_bits(chip, left_reg, mask1, val1) != val1)
1314                         change = 1;
1315                 if (snd_es1938_reg_bits(chip, right_reg, mask2, val2) != val2)
1316                         change = 1;
1317         } else {
1318                 change = (snd_es1938_reg_bits(chip, left_reg, mask1 | mask2,
1319                                               val1 | val2) != (val1 | val2));
1320         }
1321         return change;
1322 }
1323
1324 static unsigned int db_scale_master[] = {
1325         TLV_DB_RANGE_HEAD(2),
1326         0, 54, TLV_DB_SCALE_ITEM(-3600, 50, 1),
1327         54, 63, TLV_DB_SCALE_ITEM(-900, 100, 0),
1328 };
1329
1330 static unsigned int db_scale_audio1[] = {
1331         TLV_DB_RANGE_HEAD(2),
1332         0, 8, TLV_DB_SCALE_ITEM(-3300, 300, 1),
1333         8, 15, TLV_DB_SCALE_ITEM(-900, 150, 0),
1334 };
1335
1336 static unsigned int db_scale_audio2[] = {
1337         TLV_DB_RANGE_HEAD(2),
1338         0, 8, TLV_DB_SCALE_ITEM(-3450, 300, 1),
1339         8, 15, TLV_DB_SCALE_ITEM(-1050, 150, 0),
1340 };
1341
1342 static unsigned int db_scale_mic[] = {
1343         TLV_DB_RANGE_HEAD(2),
1344         0, 8, TLV_DB_SCALE_ITEM(-2400, 300, 1),
1345         8, 15, TLV_DB_SCALE_ITEM(0, 150, 0),
1346 };
1347
1348 static unsigned int db_scale_line[] = {
1349         TLV_DB_RANGE_HEAD(2),
1350         0, 8, TLV_DB_SCALE_ITEM(-3150, 300, 1),
1351         8, 15, TLV_DB_SCALE_ITEM(-750, 150, 0),
1352 };
1353
1354 static const DECLARE_TLV_DB_SCALE(db_scale_capture, 0, 150, 0);
1355
1356 static struct snd_kcontrol_new snd_es1938_controls[] = {
1357 ES1938_DOUBLE_TLV("Master Playback Volume", 0, 0x60, 0x62, 0, 0, 63, 0,
1358                   db_scale_master),
1359 ES1938_DOUBLE("Master Playback Switch", 0, 0x60, 0x62, 6, 6, 1, 1),
1360 {
1361         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
1362         .name = "Hardware Master Playback Volume",
1363         .access = SNDRV_CTL_ELEM_ACCESS_READ,
1364         .info = snd_es1938_info_hw_volume,
1365         .get = snd_es1938_get_hw_volume,
1366 },
1367 {
1368         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
1369         .access = (SNDRV_CTL_ELEM_ACCESS_READ |
1370                    SNDRV_CTL_ELEM_ACCESS_TLV_READ),
1371         .name = "Hardware Master Playback Switch",
1372         .info = snd_es1938_info_hw_switch,
1373         .get = snd_es1938_get_hw_switch,
1374         .tlv = { .p = db_scale_master },
1375 },
1376 ES1938_SINGLE("Hardware Volume Split", 0, 0x64, 7, 1, 0),
1377 ES1938_DOUBLE_TLV("Line Playback Volume", 0, 0x3e, 0x3e, 4, 0, 15, 0,
1378                   db_scale_line),
1379 ES1938_DOUBLE("CD Playback Volume", 0, 0x38, 0x38, 4, 0, 15, 0),
1380 ES1938_DOUBLE_TLV("FM Playback Volume", 0, 0x36, 0x36, 4, 0, 15, 0,
1381                   db_scale_mic),
1382 ES1938_DOUBLE_TLV("Mono Playback Volume", 0, 0x6d, 0x6d, 4, 0, 15, 0,
1383                   db_scale_line),
1384 ES1938_DOUBLE_TLV("Mic Playback Volume", 0, 0x1a, 0x1a, 4, 0, 15, 0,
1385                   db_scale_mic),
1386 ES1938_DOUBLE_TLV("Aux Playback Volume", 0, 0x3a, 0x3a, 4, 0, 15, 0,
1387                   db_scale_line),
1388 ES1938_DOUBLE_TLV("Capture Volume", 0, 0xb4, 0xb4, 4, 0, 15, 0,
1389                   db_scale_capture),
1390 ES1938_SINGLE("PC Speaker Volume", 0, 0x3c, 0, 7, 0),
1391 ES1938_SINGLE("Record Monitor", 0, 0xa8, 3, 1, 0),
1392 ES1938_SINGLE("Capture Switch", 0, 0x1c, 4, 1, 1),
1393 {
1394         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
1395         .name = "Capture Source",
1396         .info = snd_es1938_info_mux,
1397         .get = snd_es1938_get_mux,
1398         .put = snd_es1938_put_mux,
1399 },
1400 ES1938_DOUBLE_TLV("Mono Input Playback Volume", 0, 0x6d, 0x6d, 4, 0, 15, 0,
1401                   db_scale_line),
1402 ES1938_DOUBLE_TLV("PCM Capture Volume", 0, 0x69, 0x69, 4, 0, 15, 0,
1403                   db_scale_audio2),
1404 ES1938_DOUBLE_TLV("Mic Capture Volume", 0, 0x68, 0x68, 4, 0, 15, 0,
1405                   db_scale_mic),
1406 ES1938_DOUBLE_TLV("Line Capture Volume", 0, 0x6e, 0x6e, 4, 0, 15, 0,
1407                   db_scale_line),
1408 ES1938_DOUBLE_TLV("FM Capture Volume", 0, 0x6b, 0x6b, 4, 0, 15, 0,
1409                   db_scale_mic),
1410 ES1938_DOUBLE_TLV("Mono Capture Volume", 0, 0x6f, 0x6f, 4, 0, 15, 0,
1411                   db_scale_line),
1412 ES1938_DOUBLE_TLV("CD Capture Volume", 0, 0x6a, 0x6a, 4, 0, 15, 0,
1413                   db_scale_line),
1414 ES1938_DOUBLE_TLV("Aux Capture Volume", 0, 0x6c, 0x6c, 4, 0, 15, 0,
1415                   db_scale_line),
1416 ES1938_DOUBLE_TLV("PCM Playback Volume", 0, 0x7c, 0x7c, 4, 0, 15, 0,
1417                   db_scale_audio2),
1418 ES1938_DOUBLE_TLV("PCM Playback Volume", 1, 0x14, 0x14, 4, 0, 15, 0,
1419                   db_scale_audio1),
1420 ES1938_SINGLE("3D Control - Level", 0, 0x52, 0, 63, 0),
1421 {
1422         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
1423         .name = "3D Control - Switch",
1424         .info = snd_es1938_info_spatializer_enable,
1425         .get = snd_es1938_get_spatializer_enable,
1426         .put = snd_es1938_put_spatializer_enable,
1427 },
1428 ES1938_SINGLE("Mic Boost (+26dB)", 0, 0x7d, 3, 1, 0)
1429 };
1430
1431
1432 /* ---------------------------------------------------------------------------- */
1433 /* ---------------------------------------------------------------------------- */
1434
1435 /*
1436  * initialize the chip - used by resume callback, too
1437  */
1438 static void snd_es1938_chip_init(struct es1938 *chip)
1439 {
1440         /* reset chip */
1441         snd_es1938_reset(chip);
1442
1443         /* configure native mode */
1444
1445         /* enable bus master */
1446         pci_set_master(chip->pci);
1447
1448         /* disable legacy audio */
1449         pci_write_config_word(chip->pci, SL_PCI_LEGACYCONTROL, 0x805f);
1450
1451         /* set DDMA base */
1452         pci_write_config_word(chip->pci, SL_PCI_DDMACONTROL, chip->ddma_port | 1);
1453
1454         /* set DMA/IRQ policy */
1455         pci_write_config_dword(chip->pci, SL_PCI_CONFIG, 0);
1456
1457         /* enable Audio 1, Audio 2, MPU401 IRQ and HW volume IRQ*/
1458         outb(0xf0, SLIO_REG(chip, IRQCONTROL));
1459
1460         /* reset DMA */
1461         outb(0, SLDM_REG(chip, DMACLEAR));
1462 }
1463
1464 #ifdef CONFIG_PM
1465 /*
1466  * PM support
1467  */
1468
1469 static unsigned char saved_regs[SAVED_REG_SIZE+1] = {
1470         0x14, 0x1a, 0x1c, 0x3a, 0x3c, 0x3e, 0x36, 0x38,
1471         0x50, 0x52, 0x60, 0x61, 0x62, 0x63, 0x64, 0x68,
1472         0x69, 0x6a, 0x6b, 0x6d, 0x6e, 0x6f, 0x7c, 0x7d,
1473         0xa8, 0xb4,
1474 };
1475
1476
1477 static int es1938_suspend(struct pci_dev *pci, pm_message_t state)
1478 {
1479         struct snd_card *card = pci_get_drvdata(pci);
1480         struct es1938 *chip = card->private_data;
1481         unsigned char *s, *d;
1482
1483         snd_power_change_state(card, SNDRV_CTL_POWER_D3hot);
1484         snd_pcm_suspend_all(chip->pcm);
1485
1486         /* save mixer-related registers */
1487         for (s = saved_regs, d = chip->saved_regs; *s; s++, d++)
1488                 *d = snd_es1938_reg_read(chip, *s);
1489
1490         outb(0x00, SLIO_REG(chip, IRQCONTROL)); /* disable irqs */
1491         if (chip->irq >= 0) {
1492                 free_irq(chip->irq, chip);
1493                 chip->irq = -1;
1494         }
1495         pci_disable_device(pci);
1496         pci_save_state(pci);
1497         pci_set_power_state(pci, pci_choose_state(pci, state));
1498         return 0;
1499 }
1500
1501 static int es1938_resume(struct pci_dev *pci)
1502 {
1503         struct snd_card *card = pci_get_drvdata(pci);
1504         struct es1938 *chip = card->private_data;
1505         unsigned char *s, *d;
1506
1507         pci_set_power_state(pci, PCI_D0);
1508         pci_restore_state(pci);
1509         if (pci_enable_device(pci) < 0) {
1510                 printk(KERN_ERR "es1938: pci_enable_device failed, "
1511                        "disabling device\n");
1512                 snd_card_disconnect(card);
1513                 return -EIO;
1514         }
1515
1516         if (request_irq(pci->irq, snd_es1938_interrupt,
1517                         IRQF_SHARED, "ES1938", chip)) {
1518                 printk(KERN_ERR "es1938: unable to grab IRQ %d, "
1519                        "disabling device\n", pci->irq);
1520                 snd_card_disconnect(card);
1521                 return -EIO;
1522         }
1523         chip->irq = pci->irq;
1524         snd_es1938_chip_init(chip);
1525
1526         /* restore mixer-related registers */
1527         for (s = saved_regs, d = chip->saved_regs; *s; s++, d++) {
1528                 if (*s < 0xa0)
1529                         snd_es1938_mixer_write(chip, *s, *d);
1530                 else
1531                         snd_es1938_write(chip, *s, *d);
1532         }
1533
1534         snd_power_change_state(card, SNDRV_CTL_POWER_D0);
1535         return 0;
1536 }
1537 #endif /* CONFIG_PM */
1538
1539 #ifdef SUPPORT_JOYSTICK
1540 static int __devinit snd_es1938_create_gameport(struct es1938 *chip)
1541 {
1542         struct gameport *gp;
1543
1544         chip->gameport = gp = gameport_allocate_port();
1545         if (!gp) {
1546                 printk(KERN_ERR "es1938: cannot allocate memory for gameport\n");
1547                 return -ENOMEM;
1548         }
1549
1550         gameport_set_name(gp, "ES1938");
1551         gameport_set_phys(gp, "pci%s/gameport0", pci_name(chip->pci));
1552         gameport_set_dev_parent(gp, &chip->pci->dev);
1553         gp->io = chip->game_port;
1554
1555         gameport_register_port(gp);
1556
1557         return 0;
1558 }
1559
1560 static void snd_es1938_free_gameport(struct es1938 *chip)
1561 {
1562         if (chip->gameport) {
1563                 gameport_unregister_port(chip->gameport);
1564                 chip->gameport = NULL;
1565         }
1566 }
1567 #else
1568 static inline int snd_es1938_create_gameport(struct es1938 *chip) { return -ENOSYS; }
1569 static inline void snd_es1938_free_gameport(struct es1938 *chip) { }
1570 #endif /* SUPPORT_JOYSTICK */
1571
1572 static int snd_es1938_free(struct es1938 *chip)
1573 {
1574         /* disable irqs */
1575         outb(0x00, SLIO_REG(chip, IRQCONTROL));
1576         if (chip->rmidi)
1577                 snd_es1938_mixer_bits(chip, ESSSB_IREG_MPU401CONTROL, 0x40, 0);
1578
1579         snd_es1938_free_gameport(chip);
1580
1581         if (chip->irq >= 0)
1582                 free_irq(chip->irq, chip);
1583         pci_release_regions(chip->pci);
1584         pci_disable_device(chip->pci);
1585         kfree(chip);
1586         return 0;
1587 }
1588
1589 static int snd_es1938_dev_free(struct snd_device *device)
1590 {
1591         struct es1938 *chip = device->device_data;
1592         return snd_es1938_free(chip);
1593 }
1594
1595 static int __devinit snd_es1938_create(struct snd_card *card,
1596                                     struct pci_dev * pci,
1597                                     struct es1938 ** rchip)
1598 {
1599         struct es1938 *chip;
1600         int err;
1601         static struct snd_device_ops ops = {
1602                 .dev_free =     snd_es1938_dev_free,
1603         };
1604
1605         *rchip = NULL;
1606
1607         /* enable PCI device */
1608         if ((err = pci_enable_device(pci)) < 0)
1609                 return err;
1610         /* check, if we can restrict PCI DMA transfers to 24 bits */
1611         if (pci_set_dma_mask(pci, DMA_24BIT_MASK) < 0 ||
1612             pci_set_consistent_dma_mask(pci, DMA_24BIT_MASK) < 0) {
1613                 snd_printk(KERN_ERR "architecture does not support 24bit PCI busmaster DMA\n");
1614                 pci_disable_device(pci);
1615                 return -ENXIO;
1616         }
1617
1618         chip = kzalloc(sizeof(*chip), GFP_KERNEL);
1619         if (chip == NULL) {
1620                 pci_disable_device(pci);
1621                 return -ENOMEM;
1622         }
1623         spin_lock_init(&chip->reg_lock);
1624         spin_lock_init(&chip->mixer_lock);
1625         chip->card = card;
1626         chip->pci = pci;
1627         chip->irq = -1;
1628         if ((err = pci_request_regions(pci, "ESS Solo-1")) < 0) {
1629                 kfree(chip);
1630                 pci_disable_device(pci);
1631                 return err;
1632         }
1633         chip->io_port = pci_resource_start(pci, 0);
1634         chip->sb_port = pci_resource_start(pci, 1);
1635         chip->vc_port = pci_resource_start(pci, 2);
1636         chip->mpu_port = pci_resource_start(pci, 3);
1637         chip->game_port = pci_resource_start(pci, 4);
1638         if (request_irq(pci->irq, snd_es1938_interrupt, IRQF_SHARED,
1639                         "ES1938", chip)) {
1640                 snd_printk(KERN_ERR "unable to grab IRQ %d\n", pci->irq);
1641                 snd_es1938_free(chip);
1642                 return -EBUSY;
1643         }
1644         chip->irq = pci->irq;
1645 #ifdef ES1938_DDEBUG
1646         snd_printk(KERN_DEBUG "create: io: 0x%lx, sb: 0x%lx, vc: 0x%lx, mpu: 0x%lx, game: 0x%lx\n",
1647                    chip->io_port, chip->sb_port, chip->vc_port, chip->mpu_port, chip->game_port);
1648 #endif
1649
1650         chip->ddma_port = chip->vc_port + 0x00;         /* fix from Thomas Sailer */
1651
1652         snd_es1938_chip_init(chip);
1653
1654         if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
1655                 snd_es1938_free(chip);
1656                 return err;
1657         }
1658
1659         snd_card_set_dev(card, &pci->dev);
1660
1661         *rchip = chip;
1662         return 0;
1663 }
1664
1665 /* --------------------------------------------------------------------
1666  * Interrupt handler
1667  * -------------------------------------------------------------------- */
1668 static irqreturn_t snd_es1938_interrupt(int irq, void *dev_id)
1669 {
1670         struct es1938 *chip = dev_id;
1671         unsigned char status, audiostatus;
1672         int handled = 0;
1673
1674         status = inb(SLIO_REG(chip, IRQCONTROL));
1675 #if 0
1676         printk("Es1938debug - interrupt status: =0x%x\n", status);
1677 #endif
1678
1679         /* AUDIO 1 */
1680         if (status & 0x10) {
1681 #if 0
1682                 printk("Es1938debug - AUDIO channel 1 interrupt\n");
1683                 printk("Es1938debug - AUDIO channel 1 DMAC DMA count: %u\n",
1684                        inw(SLDM_REG(chip, DMACOUNT)));
1685                 printk("Es1938debug - AUDIO channel 1 DMAC DMA base: %u\n",
1686                        inl(SLDM_REG(chip, DMAADDR)));
1687                 printk("Es1938debug - AUDIO channel 1 DMAC DMA status: 0x%x\n",
1688                        inl(SLDM_REG(chip, DMASTATUS)));
1689 #endif
1690                 /* clear irq */
1691                 handled = 1;
1692                 audiostatus = inb(SLSB_REG(chip, STATUS));
1693                 if (chip->active & ADC1)
1694                         snd_pcm_period_elapsed(chip->capture_substream);
1695                 else if (chip->active & DAC1)
1696                         snd_pcm_period_elapsed(chip->playback2_substream);
1697         }
1698
1699         /* AUDIO 2 */
1700         if (status & 0x20) {
1701 #if 0
1702                 printk("Es1938debug - AUDIO channel 2 interrupt\n");
1703                 printk("Es1938debug - AUDIO channel 2 DMAC DMA count: %u\n",
1704                        inw(SLIO_REG(chip, AUDIO2DMACOUNT)));
1705                 printk("Es1938debug - AUDIO channel 2 DMAC DMA base: %u\n",
1706                        inl(SLIO_REG(chip, AUDIO2DMAADDR)));
1707
1708 #endif
1709                 /* clear irq */
1710                 handled = 1;
1711                 snd_es1938_mixer_bits(chip, ESSSB_IREG_AUDIO2CONTROL2, 0x80, 0);
1712                 if (chip->active & DAC2)
1713                         snd_pcm_period_elapsed(chip->playback1_substream);
1714         }
1715
1716         /* Hardware volume */
1717         if (status & 0x40) {
1718                 int split = snd_es1938_mixer_read(chip, 0x64) & 0x80;
1719                 handled = 1;
1720                 snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE, &chip->hw_switch->id);
1721                 snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE, &chip->hw_volume->id);
1722                 if (!split) {
1723                         snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
1724                                        &chip->master_switch->id);
1725                         snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
1726                                        &chip->master_volume->id);
1727                 }
1728                 /* ack interrupt */
1729                 snd_es1938_mixer_write(chip, 0x66, 0x00);
1730         }
1731
1732         /* MPU401 */
1733         if (status & 0x80) {
1734                 // the following line is evil! It switches off MIDI interrupt handling after the first interrupt received.
1735                 // replacing the last 0 by 0x40 works for ESS-Solo1, but just doing nothing works as well!
1736                 // andreas@flying-snail.de
1737                 // snd_es1938_mixer_bits(chip, ESSSB_IREG_MPU401CONTROL, 0x40, 0); /* ack? */
1738                 if (chip->rmidi) {
1739                         handled = 1;
1740                         snd_mpu401_uart_interrupt(irq, chip->rmidi->private_data);
1741                 }
1742         }
1743         return IRQ_RETVAL(handled);
1744 }
1745
1746 #define ES1938_DMA_SIZE 64
1747
1748 static int __devinit snd_es1938_mixer(struct es1938 *chip)
1749 {
1750         struct snd_card *card;
1751         unsigned int idx;
1752         int err;
1753
1754         card = chip->card;
1755
1756         strcpy(card->mixername, "ESS Solo-1");
1757
1758         for (idx = 0; idx < ARRAY_SIZE(snd_es1938_controls); idx++) {
1759                 struct snd_kcontrol *kctl;
1760                 kctl = snd_ctl_new1(&snd_es1938_controls[idx], chip);
1761                 switch (idx) {
1762                         case 0:
1763                                 chip->master_volume = kctl;
1764                                 kctl->private_free = snd_es1938_hwv_free;
1765                                 break;
1766                         case 1:
1767                                 chip->master_switch = kctl;
1768                                 kctl->private_free = snd_es1938_hwv_free;
1769                                 break;
1770                         case 2:
1771                                 chip->hw_volume = kctl;
1772                                 kctl->private_free = snd_es1938_hwv_free;
1773                                 break;
1774                         case 3:
1775                                 chip->hw_switch = kctl;
1776                                 kctl->private_free = snd_es1938_hwv_free;
1777                                 break;
1778                         }
1779                 if ((err = snd_ctl_add(card, kctl)) < 0)
1780                         return err;
1781         }
1782         return 0;
1783 }
1784
1785
1786 static int __devinit snd_es1938_probe(struct pci_dev *pci,
1787                                       const struct pci_device_id *pci_id)
1788 {
1789         static int dev;
1790         struct snd_card *card;
1791         struct es1938 *chip;
1792         struct snd_opl3 *opl3;
1793         int idx, err;
1794
1795         if (dev >= SNDRV_CARDS)
1796                 return -ENODEV;
1797         if (!enable[dev]) {
1798                 dev++;
1799                 return -ENOENT;
1800         }
1801
1802         card = snd_card_new(index[dev], id[dev], THIS_MODULE, 0);
1803         if (card == NULL)
1804                 return -ENOMEM;
1805         for (idx = 0; idx < 5; idx++) {
1806                 if (pci_resource_start(pci, idx) == 0 ||
1807                     !(pci_resource_flags(pci, idx) & IORESOURCE_IO)) {
1808                         snd_card_free(card);
1809                         return -ENODEV;
1810                 }
1811         }
1812         if ((err = snd_es1938_create(card, pci, &chip)) < 0) {
1813                 snd_card_free(card);
1814                 return err;
1815         }
1816         card->private_data = chip;
1817
1818         strcpy(card->driver, "ES1938");
1819         strcpy(card->shortname, "ESS ES1938 (Solo-1)");
1820         sprintf(card->longname, "%s rev %i, irq %i",
1821                 card->shortname,
1822                 chip->revision,
1823                 chip->irq);
1824
1825         if ((err = snd_es1938_new_pcm(chip, 0)) < 0) {
1826                 snd_card_free(card);
1827                 return err;
1828         }
1829         if ((err = snd_es1938_mixer(chip)) < 0) {
1830                 snd_card_free(card);
1831                 return err;
1832         }
1833         if (snd_opl3_create(card,
1834                             SLSB_REG(chip, FMLOWADDR),
1835                             SLSB_REG(chip, FMHIGHADDR),
1836                             OPL3_HW_OPL3, 1, &opl3) < 0) {
1837                 printk(KERN_ERR "es1938: OPL3 not detected at 0x%lx\n",
1838                            SLSB_REG(chip, FMLOWADDR));
1839         } else {
1840                 if ((err = snd_opl3_timer_new(opl3, 0, 1)) < 0) {
1841                         snd_card_free(card);
1842                         return err;
1843                 }
1844                 if ((err = snd_opl3_hwdep_new(opl3, 0, 1, NULL)) < 0) {
1845                         snd_card_free(card);
1846                         return err;
1847                 }
1848         }
1849         if (snd_mpu401_uart_new(card, 0, MPU401_HW_MPU401,
1850                                 chip->mpu_port, MPU401_INFO_INTEGRATED,
1851                                 chip->irq, 0, &chip->rmidi) < 0) {
1852                 printk(KERN_ERR "es1938: unable to initialize MPU-401\n");
1853         } else {
1854                 // this line is vital for MIDI interrupt handling on ess-solo1
1855                 // andreas@flying-snail.de
1856                 snd_es1938_mixer_bits(chip, ESSSB_IREG_MPU401CONTROL, 0x40, 0x40);
1857         }
1858
1859         snd_es1938_create_gameport(chip);
1860
1861         if ((err = snd_card_register(card)) < 0) {
1862                 snd_card_free(card);
1863                 return err;
1864         }
1865
1866         pci_set_drvdata(pci, card);
1867         dev++;
1868         return 0;
1869 }
1870
1871 static void __devexit snd_es1938_remove(struct pci_dev *pci)
1872 {
1873         snd_card_free(pci_get_drvdata(pci));
1874         pci_set_drvdata(pci, NULL);
1875 }
1876
1877 static struct pci_driver driver = {
1878         .name = "ESS ES1938 (Solo-1)",
1879         .id_table = snd_es1938_ids,
1880         .probe = snd_es1938_probe,
1881         .remove = __devexit_p(snd_es1938_remove),
1882 #ifdef CONFIG_PM
1883         .suspend = es1938_suspend,
1884         .resume = es1938_resume,
1885 #endif
1886 };
1887
1888 static int __init alsa_card_es1938_init(void)
1889 {
1890         return pci_register_driver(&driver);
1891 }
1892
1893 static void __exit alsa_card_es1938_exit(void)
1894 {
1895         pci_unregister_driver(&driver);
1896 }
1897
1898 module_init(alsa_card_es1938_init)
1899 module_exit(alsa_card_es1938_exit)