linux/sound/pci/es1938.c
<<
>>
Prefs
   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
  68MODULE_AUTHOR("Jaromir Koutek <miri@punknet.cz>");
  69MODULE_DESCRIPTION("ESS Solo-1");
  70MODULE_LICENSE("GPL");
  71MODULE_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
  80static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;      /* Index 0-MAX */
  81static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;       /* ID for this card */
  82static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP;      /* Enable this card */
  83
  84module_param_array(index, int, NULL, 0444);
  85MODULE_PARM_DESC(index, "Index value for ESS Solo-1 soundcard.");
  86module_param_array(id, charp, NULL, 0444);
  87MODULE_PARM_DESC(id, "ID string for ESS Solo-1 soundcard.");
  88module_param_array(enable, bool, NULL, 0444);
  89MODULE_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
 197struct 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
 244static irqreturn_t snd_es1938_interrupt(int irq, void *dev_id);
 245
 246static struct pci_device_id snd_es1938_ids[] = {
 247        { PCI_VDEVICE(ESS, 0x1969), 0, },   /* Solo-1 */
 248        { 0, }
 249};
 250
 251MODULE_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 * -----------------------------------------------------------------*/
 261static 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 * -----------------------------------------------------------------*/
 276static 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 * -----------------------------------------------------------------*/
 293static 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 * -----------------------------------------------------------------*/
 317static 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 * -----------------------------------------------------------------*/
 333static 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 * -----------------------------------------------------------------*/
 347static 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 * -----------------------------------------------------------------*/
 362static 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 * -----------------------------------------------------------------*/
 380static 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 * --------------------------------------------------------------------*/
 406static 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 * --------------------------------------------------------------------*/
 445static 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
 451static 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
 466static struct snd_pcm_hw_constraint_ratnums hw_constraints_clocks = {
 467        .nrats = 2,
 468        .rats = clocks,
 469};
 470
 471
 472static 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
 499static 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
 507static 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
 522static 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
 543static 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
 566static 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
 596static 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
 619static 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 * --------------------------------------------------------------------*/
 635static 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 * ------------------------------------------------------------------------------*/
 683static 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
 720static 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
 762static 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*/
 782static 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
 812static 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
 824static 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
 841static 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
 853static 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 */
 880static 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
 891static 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 * ----------------------------------------------------------------------*/
 899static 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 * -----------------------------------------------------------------------*/
 921static 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
 941static 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
 956static 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
 981static 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
 989static 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
1007static 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
1018static 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
1030static 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
1056static 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
1073static 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
1081static 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
1094static 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
1103static 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
1119static 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
1129static 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
1140static 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
1149static 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
1158static 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
1167static 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
1189static 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
1201static 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
1218static 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
1250static 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
1262static 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
1288static 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
1324static 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
1330static 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
1336static 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
1342static 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
1348static 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
1354static const DECLARE_TLV_DB_SCALE(db_scale_capture, 0, 150, 0);
1355
1356static struct snd_kcontrol_new snd_es1938_controls[] = {
1357ES1938_DOUBLE_TLV("Master Playback Volume", 0, 0x60, 0x62, 0, 0, 63, 0,
1358                  db_scale_master),
1359ES1938_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},
1376ES1938_SINGLE("Hardware Volume Split", 0, 0x64, 7, 1, 0),
1377ES1938_DOUBLE_TLV("Line Playback Volume", 0, 0x3e, 0x3e, 4, 0, 15, 0,
1378                  db_scale_line),
1379ES1938_DOUBLE("CD Playback Volume", 0, 0x38, 0x38, 4, 0, 15, 0),
1380ES1938_DOUBLE_TLV("FM Playback Volume", 0, 0x36, 0x36, 4, 0, 15, 0,
1381                  db_scale_mic),
1382ES1938_DOUBLE_TLV("Mono Playback Volume", 0, 0x6d, 0x6d, 4, 0, 15, 0,
1383                  db_scale_line),
1384ES1938_DOUBLE_TLV("Mic Playback Volume", 0, 0x1a, 0x1a, 4, 0, 15, 0,
1385                  db_scale_mic),
1386ES1938_DOUBLE_TLV("Aux Playback Volume", 0, 0x3a, 0x3a, 4, 0, 15, 0,
1387                  db_scale_line),
1388ES1938_DOUBLE_TLV("Capture Volume", 0, 0xb4, 0xb4, 4, 0, 15, 0,
1389                  db_scale_capture),
1390ES1938_SINGLE("PC Speaker Volume", 0, 0x3c, 0, 7, 0),
1391ES1938_SINGLE("Record Monitor", 0, 0xa8, 3, 1, 0),
1392ES1938_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},
1400ES1938_DOUBLE_TLV("Mono Input Playback Volume", 0, 0x6d, 0x6d, 4, 0, 15, 0,
1401                  db_scale_line),
1402ES1938_DOUBLE_TLV("PCM Capture Volume", 0, 0x69, 0x69, 4, 0, 15, 0,
1403                  db_scale_audio2),
1404ES1938_DOUBLE_TLV("Mic Capture Volume", 0, 0x68, 0x68, 4, 0, 15, 0,
1405                  db_scale_mic),
1406ES1938_DOUBLE_TLV("Line Capture Volume", 0, 0x6e, 0x6e, 4, 0, 15, 0,
1407                  db_scale_line),
1408ES1938_DOUBLE_TLV("FM Capture Volume", 0, 0x6b, 0x6b, 4, 0, 15, 0,
1409                  db_scale_mic),
1410ES1938_DOUBLE_TLV("Mono Capture Volume", 0, 0x6f, 0x6f, 4, 0, 15, 0,
1411                  db_scale_line),
1412ES1938_DOUBLE_TLV("CD Capture Volume", 0, 0x6a, 0x6a, 4, 0, 15, 0,
1413                  db_scale_line),
1414ES1938_DOUBLE_TLV("Aux Capture Volume", 0, 0x6c, 0x6c, 4, 0, 15, 0,
1415                  db_scale_line),
1416ES1938_DOUBLE_TLV("PCM Playback Volume", 0, 0x7c, 0x7c, 4, 0, 15, 0,
1417                  db_scale_audio2),
1418ES1938_DOUBLE_TLV("PCM Playback Volume", 1, 0x14, 0x14, 4, 0, 15, 0,
1419                  db_scale_audio1),
1420ES1938_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},
1428ES1938_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 */
1438static 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
1469static 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
1477static 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
1501static 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
1540static 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
1560static 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
1568static inline int snd_es1938_create_gameport(struct es1938 *chip) { return -ENOSYS; }
1569static inline void snd_es1938_free_gameport(struct es1938 *chip) { }
1570#endif /* SUPPORT_JOYSTICK */
1571
1572static 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
1589static 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
1595static 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_BIT_MASK(24)) < 0 ||
1612            pci_set_consistent_dma_mask(pci, DMA_BIT_MASK(24)) < 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 * -------------------------------------------------------------------- */
1668static 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(KERN_DEBUG "Es1938debug - interrupt status: =0x%x\n", status);
1677#endif
1678        
1679        /* AUDIO 1 */
1680        if (status & 0x10) {
1681#if 0
1682                printk(KERN_DEBUG
1683                       "Es1938debug - AUDIO channel 1 interrupt\n");
1684                printk(KERN_DEBUG
1685                       "Es1938debug - AUDIO channel 1 DMAC DMA count: %u\n",
1686                       inw(SLDM_REG(chip, DMACOUNT)));
1687                printk(KERN_DEBUG
1688                       "Es1938debug - AUDIO channel 1 DMAC DMA base: %u\n",
1689                       inl(SLDM_REG(chip, DMAADDR)));
1690                printk(KERN_DEBUG
1691                       "Es1938debug - AUDIO channel 1 DMAC DMA status: 0x%x\n",
1692                       inl(SLDM_REG(chip, DMASTATUS)));
1693#endif
1694                /* clear irq */
1695                handled = 1;
1696                audiostatus = inb(SLSB_REG(chip, STATUS));
1697                if (chip->active & ADC1)
1698                        snd_pcm_period_elapsed(chip->capture_substream);
1699                else if (chip->active & DAC1)
1700                        snd_pcm_period_elapsed(chip->playback2_substream);
1701        }
1702        
1703        /* AUDIO 2 */
1704        if (status & 0x20) {
1705#if 0
1706                printk(KERN_DEBUG
1707                       "Es1938debug - AUDIO channel 2 interrupt\n");
1708                printk(KERN_DEBUG
1709                       "Es1938debug - AUDIO channel 2 DMAC DMA count: %u\n",
1710                       inw(SLIO_REG(chip, AUDIO2DMACOUNT)));
1711                printk(KERN_DEBUG
1712                       "Es1938debug - AUDIO channel 2 DMAC DMA base: %u\n",
1713                       inl(SLIO_REG(chip, AUDIO2DMAADDR)));
1714
1715#endif
1716                /* clear irq */
1717                handled = 1;
1718                snd_es1938_mixer_bits(chip, ESSSB_IREG_AUDIO2CONTROL2, 0x80, 0);
1719                if (chip->active & DAC2)
1720                        snd_pcm_period_elapsed(chip->playback1_substream);
1721        }
1722
1723        /* Hardware volume */
1724        if (status & 0x40) {
1725                int split = snd_es1938_mixer_read(chip, 0x64) & 0x80;
1726                handled = 1;
1727                snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE, &chip->hw_switch->id);
1728                snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE, &chip->hw_volume->id);
1729                if (!split) {
1730                        snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
1731                                       &chip->master_switch->id);
1732                        snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
1733                                       &chip->master_volume->id);
1734                }
1735                /* ack interrupt */
1736                snd_es1938_mixer_write(chip, 0x66, 0x00);
1737        }
1738
1739        /* MPU401 */
1740        if (status & 0x80) {
1741                // the following line is evil! It switches off MIDI interrupt handling after the first interrupt received.
1742                // replacing the last 0 by 0x40 works for ESS-Solo1, but just doing nothing works as well!
1743                // andreas@flying-snail.de
1744                // snd_es1938_mixer_bits(chip, ESSSB_IREG_MPU401CONTROL, 0x40, 0); /* ack? */
1745                if (chip->rmidi) {
1746                        handled = 1;
1747                        snd_mpu401_uart_interrupt(irq, chip->rmidi->private_data);
1748                }
1749        }
1750        return IRQ_RETVAL(handled);
1751}
1752
1753#define ES1938_DMA_SIZE 64
1754
1755static int __devinit snd_es1938_mixer(struct es1938 *chip)
1756{
1757        struct snd_card *card;
1758        unsigned int idx;
1759        int err;
1760
1761        card = chip->card;
1762
1763        strcpy(card->mixername, "ESS Solo-1");
1764
1765        for (idx = 0; idx < ARRAY_SIZE(snd_es1938_controls); idx++) {
1766                struct snd_kcontrol *kctl;
1767                kctl = snd_ctl_new1(&snd_es1938_controls[idx], chip);
1768                switch (idx) {
1769                        case 0:
1770                                chip->master_volume = kctl;
1771                                kctl->private_free = snd_es1938_hwv_free;
1772                                break;
1773                        case 1:
1774                                chip->master_switch = kctl;
1775                                kctl->private_free = snd_es1938_hwv_free;
1776                                break;
1777                        case 2:
1778                                chip->hw_volume = kctl;
1779                                kctl->private_free = snd_es1938_hwv_free;
1780                                break;
1781                        case 3:
1782                                chip->hw_switch = kctl;
1783                                kctl->private_free = snd_es1938_hwv_free;
1784                                break;
1785                        }
1786                if ((err = snd_ctl_add(card, kctl)) < 0)
1787                        return err;
1788        }
1789        return 0;
1790}
1791       
1792
1793static int __devinit snd_es1938_probe(struct pci_dev *pci,
1794                                      const struct pci_device_id *pci_id)
1795{
1796        static int dev;
1797        struct snd_card *card;
1798        struct es1938 *chip;
1799        struct snd_opl3 *opl3;
1800        int idx, err;
1801
1802        if (dev >= SNDRV_CARDS)
1803                return -ENODEV;
1804        if (!enable[dev]) {
1805                dev++;
1806                return -ENOENT;
1807        }
1808
1809        err = snd_card_create(index[dev], id[dev], THIS_MODULE, 0, &card);
1810        if (err < 0)
1811                return err;
1812        for (idx = 0; idx < 5; idx++) {
1813                if (pci_resource_start(pci, idx) == 0 ||
1814                    !(pci_resource_flags(pci, idx) & IORESOURCE_IO)) {
1815                        snd_card_free(card);
1816                        return -ENODEV;
1817                }
1818        }
1819        if ((err = snd_es1938_create(card, pci, &chip)) < 0) {
1820                snd_card_free(card);
1821                return err;
1822        }
1823        card->private_data = chip;
1824
1825        strcpy(card->driver, "ES1938");
1826        strcpy(card->shortname, "ESS ES1938 (Solo-1)");
1827        sprintf(card->longname, "%s rev %i, irq %i",
1828                card->shortname,
1829                chip->revision,
1830                chip->irq);
1831
1832        if ((err = snd_es1938_new_pcm(chip, 0)) < 0) {
1833                snd_card_free(card);
1834                return err;
1835        }
1836        if ((err = snd_es1938_mixer(chip)) < 0) {
1837                snd_card_free(card);
1838                return err;
1839        }
1840        if (snd_opl3_create(card,
1841                            SLSB_REG(chip, FMLOWADDR),
1842                            SLSB_REG(chip, FMHIGHADDR),
1843                            OPL3_HW_OPL3, 1, &opl3) < 0) {
1844                printk(KERN_ERR "es1938: OPL3 not detected at 0x%lx\n",
1845                           SLSB_REG(chip, FMLOWADDR));
1846        } else {
1847                if ((err = snd_opl3_timer_new(opl3, 0, 1)) < 0) {
1848                        snd_card_free(card);
1849                        return err;
1850                }
1851                if ((err = snd_opl3_hwdep_new(opl3, 0, 1, NULL)) < 0) {
1852                        snd_card_free(card);
1853                        return err;
1854                }
1855        }
1856        if (snd_mpu401_uart_new(card, 0, MPU401_HW_MPU401,
1857                                chip->mpu_port, MPU401_INFO_INTEGRATED,
1858                                chip->irq, 0, &chip->rmidi) < 0) {
1859                printk(KERN_ERR "es1938: unable to initialize MPU-401\n");
1860        } else {
1861                // this line is vital for MIDI interrupt handling on ess-solo1
1862                // andreas@flying-snail.de
1863                snd_es1938_mixer_bits(chip, ESSSB_IREG_MPU401CONTROL, 0x40, 0x40);
1864        }
1865
1866        snd_es1938_create_gameport(chip);
1867
1868        if ((err = snd_card_register(card)) < 0) {
1869                snd_card_free(card);
1870                return err;
1871        }
1872
1873        pci_set_drvdata(pci, card);
1874        dev++;
1875        return 0;
1876}
1877
1878static void __devexit snd_es1938_remove(struct pci_dev *pci)
1879{
1880        snd_card_free(pci_get_drvdata(pci));
1881        pci_set_drvdata(pci, NULL);
1882}
1883
1884static struct pci_driver driver = {
1885        .name = "ESS ES1938 (Solo-1)",
1886        .id_table = snd_es1938_ids,
1887        .probe = snd_es1938_probe,
1888        .remove = __devexit_p(snd_es1938_remove),
1889#ifdef CONFIG_PM
1890        .suspend = es1938_suspend,
1891        .resume = es1938_resume,
1892#endif
1893};
1894
1895static int __init alsa_card_es1938_init(void)
1896{
1897        return pci_register_driver(&driver);
1898}
1899
1900static void __exit alsa_card_es1938_exit(void)
1901{
1902        pci_unregister_driver(&driver);
1903}
1904
1905module_init(alsa_card_es1938_init)
1906module_exit(alsa_card_es1938_exit)
1907