linux/sound/pci/emu10k1/emu10k1x.c
<<
>>
Prefs
   1/*
   2 *  Copyright (c) by Francisco Moraes <fmoraes@nc.rr.com>
   3 *  Driver EMU10K1X chips
   4 *
   5 *  Parts of this code were adapted from audigyls.c driver which is
   6 *  Copyright (c) by James Courtier-Dutton <James@superbug.demon.co.uk>
   7 *
   8 *  BUGS:
   9 *    --
  10 *
  11 *  TODO:
  12 *
  13 *  Chips (SB0200 model):
  14 *    - EMU10K1X-DBQ
  15 *    - STAC 9708T
  16 *
  17 *   This program is free software; you can redistribute it and/or modify
  18 *   it under the terms of the GNU General Public License as published by
  19 *   the Free Software Foundation; either version 2 of the License, or
  20 *   (at your option) any later version.
  21 *
  22 *   This program is distributed in the hope that it will be useful,
  23 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  24 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  25 *   GNU General Public License for more details.
  26 *
  27 *   You should have received a copy of the GNU General Public License
  28 *   along with this program; if not, write to the Free Software
  29 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  30 *
  31 */
  32#include <linux/init.h>
  33#include <linux/interrupt.h>
  34#include <linux/pci.h>
  35#include <linux/dma-mapping.h>
  36#include <linux/slab.h>
  37#include <linux/module.h>
  38#include <sound/core.h>
  39#include <sound/initval.h>
  40#include <sound/pcm.h>
  41#include <sound/ac97_codec.h>
  42#include <sound/info.h>
  43#include <sound/rawmidi.h>
  44
  45MODULE_AUTHOR("Francisco Moraes <fmoraes@nc.rr.com>");
  46MODULE_DESCRIPTION("EMU10K1X");
  47MODULE_LICENSE("GPL");
  48MODULE_SUPPORTED_DEVICE("{{Dell Creative Labs,SB Live!}");
  49
  50// module parameters (see "Module Parameters")
  51static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;
  52static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;
  53static bool enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP;
  54
  55module_param_array(index, int, NULL, 0444);
  56MODULE_PARM_DESC(index, "Index value for the EMU10K1X soundcard.");
  57module_param_array(id, charp, NULL, 0444);
  58MODULE_PARM_DESC(id, "ID string for the EMU10K1X soundcard.");
  59module_param_array(enable, bool, NULL, 0444);
  60MODULE_PARM_DESC(enable, "Enable the EMU10K1X soundcard.");
  61
  62
  63// some definitions were borrowed from emu10k1 driver as they seem to be the same
  64/************************************************************************************************/
  65/* PCI function 0 registers, address = <val> + PCIBASE0                                         */
  66/************************************************************************************************/
  67
  68#define PTR                     0x00            /* Indexed register set pointer register        */
  69                                                /* NOTE: The CHANNELNUM and ADDRESS words can   */
  70                                                /* be modified independently of each other.     */
  71
  72#define DATA                    0x04            /* Indexed register set data register           */
  73
  74#define IPR                     0x08            /* Global interrupt pending register            */
  75                                                /* Clear pending interrupts by writing a 1 to   */
  76                                                /* the relevant bits and zero to the other bits */
  77#define IPR_MIDITRANSBUFEMPTY   0x00000001      /* MIDI UART transmit buffer empty              */
  78#define IPR_MIDIRECVBUFEMPTY    0x00000002      /* MIDI UART receive buffer empty               */
  79#define IPR_CH_0_LOOP           0x00000800      /* Channel 0 loop                               */
  80#define IPR_CH_0_HALF_LOOP      0x00000100      /* Channel 0 half loop                          */
  81#define IPR_CAP_0_LOOP          0x00080000      /* Channel capture loop                         */
  82#define IPR_CAP_0_HALF_LOOP     0x00010000      /* Channel capture half loop                    */
  83
  84#define INTE                    0x0c            /* Interrupt enable register                    */
  85#define INTE_MIDITXENABLE       0x00000001      /* Enable MIDI transmit-buffer-empty interrupts */
  86#define INTE_MIDIRXENABLE       0x00000002      /* Enable MIDI receive-buffer-empty interrupts  */
  87#define INTE_CH_0_LOOP          0x00000800      /* Channel 0 loop                               */
  88#define INTE_CH_0_HALF_LOOP     0x00000100      /* Channel 0 half loop                          */
  89#define INTE_CAP_0_LOOP         0x00080000      /* Channel capture loop                         */
  90#define INTE_CAP_0_HALF_LOOP    0x00010000      /* Channel capture half loop                    */
  91
  92#define HCFG                    0x14            /* Hardware config register                     */
  93
  94#define HCFG_LOCKSOUNDCACHE     0x00000008      /* 1 = Cancel bustmaster accesses to soundcache */
  95                                                /* NOTE: This should generally never be used.   */
  96#define HCFG_AUDIOENABLE        0x00000001      /* 0 = CODECs transmit zero-valued samples      */
  97                                                /* Should be set to 1 when the EMU10K1 is       */
  98                                                /* completely initialized.                      */
  99#define GPIO                    0x18            /* Defaults: 00001080-Analog, 00001000-SPDIF.   */
 100
 101
 102#define AC97DATA                0x1c            /* AC97 register set data register (16 bit)     */
 103
 104#define AC97ADDRESS             0x1e            /* AC97 register set address register (8 bit)   */
 105
 106/********************************************************************************************************/
 107/* Emu10k1x pointer-offset register set, accessed through the PTR and DATA registers                    */
 108/********************************************************************************************************/
 109#define PLAYBACK_LIST_ADDR      0x00            /* Base DMA address of a list of pointers to each period/size */
 110                                                /* One list entry: 4 bytes for DMA address, 
 111                                                 * 4 bytes for period_size << 16.
 112                                                 * One list entry is 8 bytes long.
 113                                                 * One list entry for each period in the buffer.
 114                                                 */
 115#define PLAYBACK_LIST_SIZE      0x01            /* Size of list in bytes << 16. E.g. 8 periods -> 0x00380000  */
 116#define PLAYBACK_LIST_PTR       0x02            /* Pointer to the current period being played */
 117#define PLAYBACK_DMA_ADDR       0x04            /* Playback DMA address */
 118#define PLAYBACK_PERIOD_SIZE    0x05            /* Playback period size */
 119#define PLAYBACK_POINTER        0x06            /* Playback period pointer. Sample currently in DAC */
 120#define PLAYBACK_UNKNOWN1       0x07
 121#define PLAYBACK_UNKNOWN2       0x08
 122
 123/* Only one capture channel supported */
 124#define CAPTURE_DMA_ADDR        0x10            /* Capture DMA address */
 125#define CAPTURE_BUFFER_SIZE     0x11            /* Capture buffer size */
 126#define CAPTURE_POINTER         0x12            /* Capture buffer pointer. Sample currently in ADC */
 127#define CAPTURE_UNKNOWN         0x13
 128
 129/* From 0x20 - 0x3f, last samples played on each channel */
 130
 131#define TRIGGER_CHANNEL         0x40            /* Trigger channel playback                     */
 132#define TRIGGER_CHANNEL_0       0x00000001      /* Trigger channel 0                            */
 133#define TRIGGER_CHANNEL_1       0x00000002      /* Trigger channel 1                            */
 134#define TRIGGER_CHANNEL_2       0x00000004      /* Trigger channel 2                            */
 135#define TRIGGER_CAPTURE         0x00000100      /* Trigger capture channel                      */
 136
 137#define ROUTING                 0x41            /* Setup sound routing ?                        */
 138#define ROUTING_FRONT_LEFT      0x00000001
 139#define ROUTING_FRONT_RIGHT     0x00000002
 140#define ROUTING_REAR_LEFT       0x00000004
 141#define ROUTING_REAR_RIGHT      0x00000008
 142#define ROUTING_CENTER_LFE      0x00010000
 143
 144#define SPCS0                   0x42            /* SPDIF output Channel Status 0 register       */
 145
 146#define SPCS1                   0x43            /* SPDIF output Channel Status 1 register       */
 147
 148#define SPCS2                   0x44            /* SPDIF output Channel Status 2 register       */
 149
 150#define SPCS_CLKACCYMASK        0x30000000      /* Clock accuracy                               */
 151#define SPCS_CLKACCY_1000PPM    0x00000000      /* 1000 parts per million                       */
 152#define SPCS_CLKACCY_50PPM      0x10000000      /* 50 parts per million                         */
 153#define SPCS_CLKACCY_VARIABLE   0x20000000      /* Variable accuracy                            */
 154#define SPCS_SAMPLERATEMASK     0x0f000000      /* Sample rate                                  */
 155#define SPCS_SAMPLERATE_44      0x00000000      /* 44.1kHz sample rate                          */
 156#define SPCS_SAMPLERATE_48      0x02000000      /* 48kHz sample rate                            */
 157#define SPCS_SAMPLERATE_32      0x03000000      /* 32kHz sample rate                            */
 158#define SPCS_CHANNELNUMMASK     0x00f00000      /* Channel number                               */
 159#define SPCS_CHANNELNUM_UNSPEC  0x00000000      /* Unspecified channel number                   */
 160#define SPCS_CHANNELNUM_LEFT    0x00100000      /* Left channel                                 */
 161#define SPCS_CHANNELNUM_RIGHT   0x00200000      /* Right channel                                */
 162#define SPCS_SOURCENUMMASK      0x000f0000      /* Source number                                */
 163#define SPCS_SOURCENUM_UNSPEC   0x00000000      /* Unspecified source number                    */
 164#define SPCS_GENERATIONSTATUS   0x00008000      /* Originality flag (see IEC-958 spec)          */
 165#define SPCS_CATEGORYCODEMASK   0x00007f00      /* Category code (see IEC-958 spec)             */
 166#define SPCS_MODEMASK           0x000000c0      /* Mode (see IEC-958 spec)                      */
 167#define SPCS_EMPHASISMASK       0x00000038      /* Emphasis                                     */
 168#define SPCS_EMPHASIS_NONE      0x00000000      /* No emphasis                                  */
 169#define SPCS_EMPHASIS_50_15     0x00000008      /* 50/15 usec 2 channel                         */
 170#define SPCS_COPYRIGHT          0x00000004      /* Copyright asserted flag -- do not modify     */
 171#define SPCS_NOTAUDIODATA       0x00000002      /* 0 = Digital audio, 1 = not audio             */
 172#define SPCS_PROFESSIONAL       0x00000001      /* 0 = Consumer (IEC-958), 1 = pro (AES3-1992)  */
 173
 174#define SPDIF_SELECT            0x45            /* Enables SPDIF or Analogue outputs 0-Analogue, 0x700-SPDIF */
 175
 176/* This is the MPU port on the card                                                             */
 177#define MUDATA          0x47
 178#define MUCMD           0x48
 179#define MUSTAT          MUCMD
 180
 181/* From 0x50 - 0x5f, last samples captured */
 182
 183/**
 184 * The hardware has 3 channels for playback and 1 for capture.
 185 *  - channel 0 is the front channel
 186 *  - channel 1 is the rear channel
 187 *  - channel 2 is the center/lfe channel
 188 * Volume is controlled by the AC97 for the front and rear channels by
 189 * the PCM Playback Volume, Sigmatel Surround Playback Volume and 
 190 * Surround Playback Volume. The Sigmatel 4-Speaker Stereo switch affects
 191 * the front/rear channel mixing in the REAR OUT jack. When using the
 192 * 4-Speaker Stereo, both front and rear channels will be mixed in the
 193 * REAR OUT.
 194 * The center/lfe channel has no volume control and cannot be muted during
 195 * playback.
 196 */
 197
 198struct emu10k1x_voice {
 199        struct emu10k1x *emu;
 200        int number;
 201        int use;
 202  
 203        struct emu10k1x_pcm *epcm;
 204};
 205
 206struct emu10k1x_pcm {
 207        struct emu10k1x *emu;
 208        struct snd_pcm_substream *substream;
 209        struct emu10k1x_voice *voice;
 210        unsigned short running;
 211};
 212
 213struct emu10k1x_midi {
 214        struct emu10k1x *emu;
 215        struct snd_rawmidi *rmidi;
 216        struct snd_rawmidi_substream *substream_input;
 217        struct snd_rawmidi_substream *substream_output;
 218        unsigned int midi_mode;
 219        spinlock_t input_lock;
 220        spinlock_t output_lock;
 221        spinlock_t open_lock;
 222        int tx_enable, rx_enable;
 223        int port;
 224        int ipr_tx, ipr_rx;
 225        void (*interrupt)(struct emu10k1x *emu, unsigned int status);
 226};
 227
 228// definition of the chip-specific record
 229struct emu10k1x {
 230        struct snd_card *card;
 231        struct pci_dev *pci;
 232
 233        unsigned long port;
 234        struct resource *res_port;
 235        int irq;
 236
 237        unsigned char revision;         /* chip revision */
 238        unsigned int serial;            /* serial number */
 239        unsigned short model;           /* subsystem id */
 240
 241        spinlock_t emu_lock;
 242        spinlock_t voice_lock;
 243
 244        struct snd_ac97 *ac97;
 245        struct snd_pcm *pcm;
 246
 247        struct emu10k1x_voice voices[3];
 248        struct emu10k1x_voice capture_voice;
 249        u32 spdif_bits[3]; // SPDIF out setup
 250
 251        struct snd_dma_buffer dma_buffer;
 252
 253        struct emu10k1x_midi midi;
 254};
 255
 256/* hardware definition */
 257static struct snd_pcm_hardware snd_emu10k1x_playback_hw = {
 258        .info =                 (SNDRV_PCM_INFO_MMAP | 
 259                                 SNDRV_PCM_INFO_INTERLEAVED |
 260                                 SNDRV_PCM_INFO_BLOCK_TRANSFER |
 261                                 SNDRV_PCM_INFO_MMAP_VALID),
 262        .formats =              SNDRV_PCM_FMTBIT_S16_LE,
 263        .rates =                SNDRV_PCM_RATE_48000,
 264        .rate_min =             48000,
 265        .rate_max =             48000,
 266        .channels_min =         2,
 267        .channels_max =         2,
 268        .buffer_bytes_max =     (32*1024),
 269        .period_bytes_min =     64,
 270        .period_bytes_max =     (16*1024),
 271        .periods_min =          2,
 272        .periods_max =          8,
 273        .fifo_size =            0,
 274};
 275
 276static struct snd_pcm_hardware snd_emu10k1x_capture_hw = {
 277        .info =                 (SNDRV_PCM_INFO_MMAP | 
 278                                 SNDRV_PCM_INFO_INTERLEAVED |
 279                                 SNDRV_PCM_INFO_BLOCK_TRANSFER |
 280                                 SNDRV_PCM_INFO_MMAP_VALID),
 281        .formats =              SNDRV_PCM_FMTBIT_S16_LE,
 282        .rates =                SNDRV_PCM_RATE_48000,
 283        .rate_min =             48000,
 284        .rate_max =             48000,
 285        .channels_min =         2,
 286        .channels_max =         2,
 287        .buffer_bytes_max =     (32*1024),
 288        .period_bytes_min =     64,
 289        .period_bytes_max =     (16*1024),
 290        .periods_min =          2,
 291        .periods_max =          2,
 292        .fifo_size =            0,
 293};
 294
 295static unsigned int snd_emu10k1x_ptr_read(struct emu10k1x * emu, 
 296                                          unsigned int reg, 
 297                                          unsigned int chn)
 298{
 299        unsigned long flags;
 300        unsigned int regptr, val;
 301  
 302        regptr = (reg << 16) | chn;
 303
 304        spin_lock_irqsave(&emu->emu_lock, flags);
 305        outl(regptr, emu->port + PTR);
 306        val = inl(emu->port + DATA);
 307        spin_unlock_irqrestore(&emu->emu_lock, flags);
 308        return val;
 309}
 310
 311static void snd_emu10k1x_ptr_write(struct emu10k1x *emu, 
 312                                   unsigned int reg, 
 313                                   unsigned int chn, 
 314                                   unsigned int data)
 315{
 316        unsigned int regptr;
 317        unsigned long flags;
 318
 319        regptr = (reg << 16) | chn;
 320
 321        spin_lock_irqsave(&emu->emu_lock, flags);
 322        outl(regptr, emu->port + PTR);
 323        outl(data, emu->port + DATA);
 324        spin_unlock_irqrestore(&emu->emu_lock, flags);
 325}
 326
 327static void snd_emu10k1x_intr_enable(struct emu10k1x *emu, unsigned int intrenb)
 328{
 329        unsigned long flags;
 330        unsigned int intr_enable;
 331
 332        spin_lock_irqsave(&emu->emu_lock, flags);
 333        intr_enable = inl(emu->port + INTE) | intrenb;
 334        outl(intr_enable, emu->port + INTE);
 335        spin_unlock_irqrestore(&emu->emu_lock, flags);
 336}
 337
 338static void snd_emu10k1x_intr_disable(struct emu10k1x *emu, unsigned int intrenb)
 339{
 340        unsigned long flags;
 341        unsigned int intr_enable;
 342
 343        spin_lock_irqsave(&emu->emu_lock, flags);
 344        intr_enable = inl(emu->port + INTE) & ~intrenb;
 345        outl(intr_enable, emu->port + INTE);
 346        spin_unlock_irqrestore(&emu->emu_lock, flags);
 347}
 348
 349static void snd_emu10k1x_gpio_write(struct emu10k1x *emu, unsigned int value)
 350{
 351        unsigned long flags;
 352
 353        spin_lock_irqsave(&emu->emu_lock, flags);
 354        outl(value, emu->port + GPIO);
 355        spin_unlock_irqrestore(&emu->emu_lock, flags);
 356}
 357
 358static void snd_emu10k1x_pcm_free_substream(struct snd_pcm_runtime *runtime)
 359{
 360        kfree(runtime->private_data);
 361}
 362
 363static void snd_emu10k1x_pcm_interrupt(struct emu10k1x *emu, struct emu10k1x_voice *voice)
 364{
 365        struct emu10k1x_pcm *epcm;
 366
 367        if ((epcm = voice->epcm) == NULL)
 368                return;
 369        if (epcm->substream == NULL)
 370                return;
 371#if 0
 372        snd_printk(KERN_INFO "IRQ: position = 0x%x, period = 0x%x, size = 0x%x\n",
 373                   epcm->substream->ops->pointer(epcm->substream),
 374                   snd_pcm_lib_period_bytes(epcm->substream),
 375                   snd_pcm_lib_buffer_bytes(epcm->substream));
 376#endif
 377        snd_pcm_period_elapsed(epcm->substream);
 378}
 379
 380/* open callback */
 381static int snd_emu10k1x_playback_open(struct snd_pcm_substream *substream)
 382{
 383        struct emu10k1x *chip = snd_pcm_substream_chip(substream);
 384        struct emu10k1x_pcm *epcm;
 385        struct snd_pcm_runtime *runtime = substream->runtime;
 386        int err;
 387
 388        if ((err = snd_pcm_hw_constraint_integer(runtime, SNDRV_PCM_HW_PARAM_PERIODS)) < 0) {
 389                return err;
 390        }
 391        if ((err = snd_pcm_hw_constraint_step(runtime, 0, SNDRV_PCM_HW_PARAM_PERIOD_BYTES, 64)) < 0)
 392                return err;
 393
 394        epcm = kzalloc(sizeof(*epcm), GFP_KERNEL);
 395        if (epcm == NULL)
 396                return -ENOMEM;
 397        epcm->emu = chip;
 398        epcm->substream = substream;
 399  
 400        runtime->private_data = epcm;
 401        runtime->private_free = snd_emu10k1x_pcm_free_substream;
 402  
 403        runtime->hw = snd_emu10k1x_playback_hw;
 404
 405        return 0;
 406}
 407
 408/* close callback */
 409static int snd_emu10k1x_playback_close(struct snd_pcm_substream *substream)
 410{
 411        return 0;
 412}
 413
 414/* hw_params callback */
 415static int snd_emu10k1x_pcm_hw_params(struct snd_pcm_substream *substream,
 416                                      struct snd_pcm_hw_params *hw_params)
 417{
 418        struct snd_pcm_runtime *runtime = substream->runtime;
 419        struct emu10k1x_pcm *epcm = runtime->private_data;
 420
 421        if (! epcm->voice) {
 422                epcm->voice = &epcm->emu->voices[substream->pcm->device];
 423                epcm->voice->use = 1;
 424                epcm->voice->epcm = epcm;
 425        }
 426
 427        return snd_pcm_lib_malloc_pages(substream,
 428                                        params_buffer_bytes(hw_params));
 429}
 430
 431/* hw_free callback */
 432static int snd_emu10k1x_pcm_hw_free(struct snd_pcm_substream *substream)
 433{
 434        struct snd_pcm_runtime *runtime = substream->runtime;
 435        struct emu10k1x_pcm *epcm;
 436
 437        if (runtime->private_data == NULL)
 438                return 0;
 439        
 440        epcm = runtime->private_data;
 441
 442        if (epcm->voice) {
 443                epcm->voice->use = 0;
 444                epcm->voice->epcm = NULL;
 445                epcm->voice = NULL;
 446        }
 447
 448        return snd_pcm_lib_free_pages(substream);
 449}
 450
 451/* prepare callback */
 452static int snd_emu10k1x_pcm_prepare(struct snd_pcm_substream *substream)
 453{
 454        struct emu10k1x *emu = snd_pcm_substream_chip(substream);
 455        struct snd_pcm_runtime *runtime = substream->runtime;
 456        struct emu10k1x_pcm *epcm = runtime->private_data;
 457        int voice = epcm->voice->number;
 458        u32 *table_base = (u32 *)(emu->dma_buffer.area+1024*voice);
 459        u32 period_size_bytes = frames_to_bytes(runtime, runtime->period_size);
 460        int i;
 461        
 462        for(i = 0; i < runtime->periods; i++) {
 463                *table_base++=runtime->dma_addr+(i*period_size_bytes);
 464                *table_base++=period_size_bytes<<16;
 465        }
 466
 467        snd_emu10k1x_ptr_write(emu, PLAYBACK_LIST_ADDR, voice, emu->dma_buffer.addr+1024*voice);
 468        snd_emu10k1x_ptr_write(emu, PLAYBACK_LIST_SIZE, voice, (runtime->periods - 1) << 19);
 469        snd_emu10k1x_ptr_write(emu, PLAYBACK_LIST_PTR, voice, 0);
 470        snd_emu10k1x_ptr_write(emu, PLAYBACK_POINTER, voice, 0);
 471        snd_emu10k1x_ptr_write(emu, PLAYBACK_UNKNOWN1, voice, 0);
 472        snd_emu10k1x_ptr_write(emu, PLAYBACK_UNKNOWN2, voice, 0);
 473        snd_emu10k1x_ptr_write(emu, PLAYBACK_DMA_ADDR, voice, runtime->dma_addr);
 474
 475        snd_emu10k1x_ptr_write(emu, PLAYBACK_PERIOD_SIZE, voice, frames_to_bytes(runtime, runtime->period_size)<<16);
 476
 477        return 0;
 478}
 479
 480/* trigger callback */
 481static int snd_emu10k1x_pcm_trigger(struct snd_pcm_substream *substream,
 482                                    int cmd)
 483{
 484        struct emu10k1x *emu = snd_pcm_substream_chip(substream);
 485        struct snd_pcm_runtime *runtime = substream->runtime;
 486        struct emu10k1x_pcm *epcm = runtime->private_data;
 487        int channel = epcm->voice->number;
 488        int result = 0;
 489
 490//      snd_printk(KERN_INFO "trigger - emu10k1x = 0x%x, cmd = %i, pointer = %d\n", (int)emu, cmd, (int)substream->ops->pointer(substream));
 491
 492        switch (cmd) {
 493        case SNDRV_PCM_TRIGGER_START:
 494                if(runtime->periods == 2)
 495                        snd_emu10k1x_intr_enable(emu, (INTE_CH_0_LOOP | INTE_CH_0_HALF_LOOP) << channel);
 496                else
 497                        snd_emu10k1x_intr_enable(emu, INTE_CH_0_LOOP << channel);
 498                epcm->running = 1;
 499                snd_emu10k1x_ptr_write(emu, TRIGGER_CHANNEL, 0, snd_emu10k1x_ptr_read(emu, TRIGGER_CHANNEL, 0)|(TRIGGER_CHANNEL_0<<channel));
 500                break;
 501        case SNDRV_PCM_TRIGGER_STOP:
 502                epcm->running = 0;
 503                snd_emu10k1x_intr_disable(emu, (INTE_CH_0_LOOP | INTE_CH_0_HALF_LOOP) << channel);
 504                snd_emu10k1x_ptr_write(emu, TRIGGER_CHANNEL, 0, snd_emu10k1x_ptr_read(emu, TRIGGER_CHANNEL, 0) & ~(TRIGGER_CHANNEL_0<<channel));
 505                break;
 506        default:
 507                result = -EINVAL;
 508                break;
 509        }
 510        return result;
 511}
 512
 513/* pointer callback */
 514static snd_pcm_uframes_t
 515snd_emu10k1x_pcm_pointer(struct snd_pcm_substream *substream)
 516{
 517        struct emu10k1x *emu = snd_pcm_substream_chip(substream);
 518        struct snd_pcm_runtime *runtime = substream->runtime;
 519        struct emu10k1x_pcm *epcm = runtime->private_data;
 520        int channel = epcm->voice->number;
 521        snd_pcm_uframes_t ptr = 0, ptr1 = 0, ptr2= 0,ptr3 = 0,ptr4 = 0;
 522
 523        if (!epcm->running)
 524                return 0;
 525
 526        ptr3 = snd_emu10k1x_ptr_read(emu, PLAYBACK_LIST_PTR, channel);
 527        ptr1 = snd_emu10k1x_ptr_read(emu, PLAYBACK_POINTER, channel);
 528        ptr4 = snd_emu10k1x_ptr_read(emu, PLAYBACK_LIST_PTR, channel);
 529
 530        if(ptr4 == 0 && ptr1 == frames_to_bytes(runtime, runtime->buffer_size))
 531                return 0;
 532        
 533        if (ptr3 != ptr4) 
 534                ptr1 = snd_emu10k1x_ptr_read(emu, PLAYBACK_POINTER, channel);
 535        ptr2 = bytes_to_frames(runtime, ptr1);
 536        ptr2 += (ptr4 >> 3) * runtime->period_size;
 537        ptr = ptr2;
 538
 539        if (ptr >= runtime->buffer_size)
 540                ptr -= runtime->buffer_size;
 541
 542        return ptr;
 543}
 544
 545/* operators */
 546static struct snd_pcm_ops snd_emu10k1x_playback_ops = {
 547        .open =        snd_emu10k1x_playback_open,
 548        .close =       snd_emu10k1x_playback_close,
 549        .ioctl =       snd_pcm_lib_ioctl,
 550        .hw_params =   snd_emu10k1x_pcm_hw_params,
 551        .hw_free =     snd_emu10k1x_pcm_hw_free,
 552        .prepare =     snd_emu10k1x_pcm_prepare,
 553        .trigger =     snd_emu10k1x_pcm_trigger,
 554        .pointer =     snd_emu10k1x_pcm_pointer,
 555};
 556
 557/* open_capture callback */
 558static int snd_emu10k1x_pcm_open_capture(struct snd_pcm_substream *substream)
 559{
 560        struct emu10k1x *chip = snd_pcm_substream_chip(substream);
 561        struct emu10k1x_pcm *epcm;
 562        struct snd_pcm_runtime *runtime = substream->runtime;
 563        int err;
 564
 565        if ((err = snd_pcm_hw_constraint_integer(runtime, SNDRV_PCM_HW_PARAM_PERIODS)) < 0)
 566                return err;
 567        if ((err = snd_pcm_hw_constraint_step(runtime, 0, SNDRV_PCM_HW_PARAM_PERIOD_BYTES, 64)) < 0)
 568                return err;
 569
 570        epcm = kzalloc(sizeof(*epcm), GFP_KERNEL);
 571        if (epcm == NULL)
 572                return -ENOMEM;
 573
 574        epcm->emu = chip;
 575        epcm->substream = substream;
 576
 577        runtime->private_data = epcm;
 578        runtime->private_free = snd_emu10k1x_pcm_free_substream;
 579
 580        runtime->hw = snd_emu10k1x_capture_hw;
 581
 582        return 0;
 583}
 584
 585/* close callback */
 586static int snd_emu10k1x_pcm_close_capture(struct snd_pcm_substream *substream)
 587{
 588        return 0;
 589}
 590
 591/* hw_params callback */
 592static int snd_emu10k1x_pcm_hw_params_capture(struct snd_pcm_substream *substream,
 593                                              struct snd_pcm_hw_params *hw_params)
 594{
 595        struct snd_pcm_runtime *runtime = substream->runtime;
 596        struct emu10k1x_pcm *epcm = runtime->private_data;
 597
 598        if (! epcm->voice) {
 599                if (epcm->emu->capture_voice.use)
 600                        return -EBUSY;
 601                epcm->voice = &epcm->emu->capture_voice;
 602                epcm->voice->epcm = epcm;
 603                epcm->voice->use = 1;
 604        }
 605
 606        return snd_pcm_lib_malloc_pages(substream,
 607                                        params_buffer_bytes(hw_params));
 608}
 609
 610/* hw_free callback */
 611static int snd_emu10k1x_pcm_hw_free_capture(struct snd_pcm_substream *substream)
 612{
 613        struct snd_pcm_runtime *runtime = substream->runtime;
 614
 615        struct emu10k1x_pcm *epcm;
 616
 617        if (runtime->private_data == NULL)
 618                return 0;
 619        epcm = runtime->private_data;
 620
 621        if (epcm->voice) {
 622                epcm->voice->use = 0;
 623                epcm->voice->epcm = NULL;
 624                epcm->voice = NULL;
 625        }
 626
 627        return snd_pcm_lib_free_pages(substream);
 628}
 629
 630/* prepare capture callback */
 631static int snd_emu10k1x_pcm_prepare_capture(struct snd_pcm_substream *substream)
 632{
 633        struct emu10k1x *emu = snd_pcm_substream_chip(substream);
 634        struct snd_pcm_runtime *runtime = substream->runtime;
 635
 636        snd_emu10k1x_ptr_write(emu, CAPTURE_DMA_ADDR, 0, runtime->dma_addr);
 637        snd_emu10k1x_ptr_write(emu, CAPTURE_BUFFER_SIZE, 0, frames_to_bytes(runtime, runtime->buffer_size)<<16); // buffer size in bytes
 638        snd_emu10k1x_ptr_write(emu, CAPTURE_POINTER, 0, 0);
 639        snd_emu10k1x_ptr_write(emu, CAPTURE_UNKNOWN, 0, 0);
 640
 641        return 0;
 642}
 643
 644/* trigger_capture callback */
 645static int snd_emu10k1x_pcm_trigger_capture(struct snd_pcm_substream *substream,
 646                                            int cmd)
 647{
 648        struct emu10k1x *emu = snd_pcm_substream_chip(substream);
 649        struct snd_pcm_runtime *runtime = substream->runtime;
 650        struct emu10k1x_pcm *epcm = runtime->private_data;
 651        int result = 0;
 652
 653        switch (cmd) {
 654        case SNDRV_PCM_TRIGGER_START:
 655                snd_emu10k1x_intr_enable(emu, INTE_CAP_0_LOOP | 
 656                                         INTE_CAP_0_HALF_LOOP);
 657                snd_emu10k1x_ptr_write(emu, TRIGGER_CHANNEL, 0, snd_emu10k1x_ptr_read(emu, TRIGGER_CHANNEL, 0)|TRIGGER_CAPTURE);
 658                epcm->running = 1;
 659                break;
 660        case SNDRV_PCM_TRIGGER_STOP:
 661                epcm->running = 0;
 662                snd_emu10k1x_intr_disable(emu, INTE_CAP_0_LOOP | 
 663                                          INTE_CAP_0_HALF_LOOP);
 664                snd_emu10k1x_ptr_write(emu, TRIGGER_CHANNEL, 0, snd_emu10k1x_ptr_read(emu, TRIGGER_CHANNEL, 0) & ~(TRIGGER_CAPTURE));
 665                break;
 666        default:
 667                result = -EINVAL;
 668                break;
 669        }
 670        return result;
 671}
 672
 673/* pointer_capture callback */
 674static snd_pcm_uframes_t
 675snd_emu10k1x_pcm_pointer_capture(struct snd_pcm_substream *substream)
 676{
 677        struct emu10k1x *emu = snd_pcm_substream_chip(substream);
 678        struct snd_pcm_runtime *runtime = substream->runtime;
 679        struct emu10k1x_pcm *epcm = runtime->private_data;
 680        snd_pcm_uframes_t ptr;
 681
 682        if (!epcm->running)
 683                return 0;
 684
 685        ptr = bytes_to_frames(runtime, snd_emu10k1x_ptr_read(emu, CAPTURE_POINTER, 0));
 686        if (ptr >= runtime->buffer_size)
 687                ptr -= runtime->buffer_size;
 688
 689        return ptr;
 690}
 691
 692static struct snd_pcm_ops snd_emu10k1x_capture_ops = {
 693        .open =        snd_emu10k1x_pcm_open_capture,
 694        .close =       snd_emu10k1x_pcm_close_capture,
 695        .ioctl =       snd_pcm_lib_ioctl,
 696        .hw_params =   snd_emu10k1x_pcm_hw_params_capture,
 697        .hw_free =     snd_emu10k1x_pcm_hw_free_capture,
 698        .prepare =     snd_emu10k1x_pcm_prepare_capture,
 699        .trigger =     snd_emu10k1x_pcm_trigger_capture,
 700        .pointer =     snd_emu10k1x_pcm_pointer_capture,
 701};
 702
 703static unsigned short snd_emu10k1x_ac97_read(struct snd_ac97 *ac97,
 704                                             unsigned short reg)
 705{
 706        struct emu10k1x *emu = ac97->private_data;
 707        unsigned long flags;
 708        unsigned short val;
 709  
 710        spin_lock_irqsave(&emu->emu_lock, flags);
 711        outb(reg, emu->port + AC97ADDRESS);
 712        val = inw(emu->port + AC97DATA);
 713        spin_unlock_irqrestore(&emu->emu_lock, flags);
 714        return val;
 715}
 716
 717static void snd_emu10k1x_ac97_write(struct snd_ac97 *ac97,
 718                                    unsigned short reg, unsigned short val)
 719{
 720        struct emu10k1x *emu = ac97->private_data;
 721        unsigned long flags;
 722  
 723        spin_lock_irqsave(&emu->emu_lock, flags);
 724        outb(reg, emu->port + AC97ADDRESS);
 725        outw(val, emu->port + AC97DATA);
 726        spin_unlock_irqrestore(&emu->emu_lock, flags);
 727}
 728
 729static int snd_emu10k1x_ac97(struct emu10k1x *chip)
 730{
 731        struct snd_ac97_bus *pbus;
 732        struct snd_ac97_template ac97;
 733        int err;
 734        static struct snd_ac97_bus_ops ops = {
 735                .write = snd_emu10k1x_ac97_write,
 736                .read = snd_emu10k1x_ac97_read,
 737        };
 738  
 739        if ((err = snd_ac97_bus(chip->card, 0, &ops, NULL, &pbus)) < 0)
 740                return err;
 741        pbus->no_vra = 1; /* we don't need VRA */
 742
 743        memset(&ac97, 0, sizeof(ac97));
 744        ac97.private_data = chip;
 745        ac97.scaps = AC97_SCAP_NO_SPDIF;
 746        return snd_ac97_mixer(pbus, &ac97, &chip->ac97);
 747}
 748
 749static int snd_emu10k1x_free(struct emu10k1x *chip)
 750{
 751        snd_emu10k1x_ptr_write(chip, TRIGGER_CHANNEL, 0, 0);
 752        // disable interrupts
 753        outl(0, chip->port + INTE);
 754        // disable audio
 755        outl(HCFG_LOCKSOUNDCACHE, chip->port + HCFG);
 756
 757        /* release the irq */
 758        if (chip->irq >= 0)
 759                free_irq(chip->irq, chip);
 760
 761        // release the i/o port
 762        release_and_free_resource(chip->res_port);
 763
 764        // release the DMA
 765        if (chip->dma_buffer.area) {
 766                snd_dma_free_pages(&chip->dma_buffer);
 767        }
 768
 769        pci_disable_device(chip->pci);
 770
 771        // release the data
 772        kfree(chip);
 773        return 0;
 774}
 775
 776static int snd_emu10k1x_dev_free(struct snd_device *device)
 777{
 778        struct emu10k1x *chip = device->device_data;
 779        return snd_emu10k1x_free(chip);
 780}
 781
 782static irqreturn_t snd_emu10k1x_interrupt(int irq, void *dev_id)
 783{
 784        unsigned int status;
 785
 786        struct emu10k1x *chip = dev_id;
 787        struct emu10k1x_voice *pvoice = chip->voices;
 788        int i;
 789        int mask;
 790
 791        status = inl(chip->port + IPR);
 792
 793        if (! status)
 794                return IRQ_NONE;
 795
 796        // capture interrupt
 797        if (status & (IPR_CAP_0_LOOP | IPR_CAP_0_HALF_LOOP)) {
 798                struct emu10k1x_voice *cap_voice = &chip->capture_voice;
 799                if (cap_voice->use)
 800                        snd_emu10k1x_pcm_interrupt(chip, cap_voice);
 801                else
 802                        snd_emu10k1x_intr_disable(chip, 
 803                                                  INTE_CAP_0_LOOP |
 804                                                  INTE_CAP_0_HALF_LOOP);
 805        }
 806                
 807        mask = IPR_CH_0_LOOP|IPR_CH_0_HALF_LOOP;
 808        for (i = 0; i < 3; i++) {
 809                if (status & mask) {
 810                        if (pvoice->use)
 811                                snd_emu10k1x_pcm_interrupt(chip, pvoice);
 812                        else 
 813                                snd_emu10k1x_intr_disable(chip, mask);
 814                }
 815                pvoice++;
 816                mask <<= 1;
 817        }
 818                
 819        if (status & (IPR_MIDITRANSBUFEMPTY|IPR_MIDIRECVBUFEMPTY)) {
 820                if (chip->midi.interrupt)
 821                        chip->midi.interrupt(chip, status);
 822                else
 823                        snd_emu10k1x_intr_disable(chip, INTE_MIDITXENABLE|INTE_MIDIRXENABLE);
 824        }
 825                
 826        // acknowledge the interrupt if necessary
 827        outl(status, chip->port + IPR);
 828
 829        // snd_printk(KERN_INFO "interrupt %08x\n", status);
 830        return IRQ_HANDLED;
 831}
 832
 833static const struct snd_pcm_chmap_elem surround_map[] = {
 834        { .channels = 2,
 835          .map = { SNDRV_CHMAP_RL, SNDRV_CHMAP_RR } },
 836        { }
 837};
 838
 839static const struct snd_pcm_chmap_elem clfe_map[] = {
 840        { .channels = 2,
 841          .map = { SNDRV_CHMAP_FC, SNDRV_CHMAP_LFE } },
 842        { }
 843};
 844
 845static int snd_emu10k1x_pcm(struct emu10k1x *emu, int device, struct snd_pcm **rpcm)
 846{
 847        struct snd_pcm *pcm;
 848        const struct snd_pcm_chmap_elem *map = NULL;
 849        int err;
 850        int capture = 0;
 851  
 852        if (rpcm)
 853                *rpcm = NULL;
 854        if (device == 0)
 855                capture = 1;
 856        
 857        if ((err = snd_pcm_new(emu->card, "emu10k1x", device, 1, capture, &pcm)) < 0)
 858                return err;
 859  
 860        pcm->private_data = emu;
 861        
 862        switch(device) {
 863        case 0:
 864                snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_emu10k1x_playback_ops);
 865                snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_emu10k1x_capture_ops);
 866                break;
 867        case 1:
 868        case 2:
 869                snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_emu10k1x_playback_ops);
 870                break;
 871        }
 872
 873        pcm->info_flags = 0;
 874        switch(device) {
 875        case 0:
 876                strcpy(pcm->name, "EMU10K1X Front");
 877                map = snd_pcm_std_chmaps;
 878                break;
 879        case 1:
 880                strcpy(pcm->name, "EMU10K1X Rear");
 881                map = surround_map;
 882                break;
 883        case 2:
 884                strcpy(pcm->name, "EMU10K1X Center/LFE");
 885                map = clfe_map;
 886                break;
 887        }
 888        emu->pcm = pcm;
 889
 890        snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV,
 891                                              snd_dma_pci_data(emu->pci), 
 892                                              32*1024, 32*1024);
 893  
 894        err = snd_pcm_add_chmap_ctls(pcm, SNDRV_PCM_STREAM_PLAYBACK, map, 2,
 895                                     1 << 2, NULL);
 896        if (err < 0)
 897                return err;
 898
 899        if (rpcm)
 900                *rpcm = pcm;
 901  
 902        return 0;
 903}
 904
 905static int snd_emu10k1x_create(struct snd_card *card,
 906                               struct pci_dev *pci,
 907                               struct emu10k1x **rchip)
 908{
 909        struct emu10k1x *chip;
 910        int err;
 911        int ch;
 912        static struct snd_device_ops ops = {
 913                .dev_free = snd_emu10k1x_dev_free,
 914        };
 915
 916        *rchip = NULL;
 917
 918        if ((err = pci_enable_device(pci)) < 0)
 919                return err;
 920        if (pci_set_dma_mask(pci, DMA_BIT_MASK(28)) < 0 ||
 921            pci_set_consistent_dma_mask(pci, DMA_BIT_MASK(28)) < 0) {
 922                snd_printk(KERN_ERR "error to set 28bit mask DMA\n");
 923                pci_disable_device(pci);
 924                return -ENXIO;
 925        }
 926
 927        chip = kzalloc(sizeof(*chip), GFP_KERNEL);
 928        if (chip == NULL) {
 929                pci_disable_device(pci);
 930                return -ENOMEM;
 931        }
 932
 933        chip->card = card;
 934        chip->pci = pci;
 935        chip->irq = -1;
 936
 937        spin_lock_init(&chip->emu_lock);
 938        spin_lock_init(&chip->voice_lock);
 939  
 940        chip->port = pci_resource_start(pci, 0);
 941        if ((chip->res_port = request_region(chip->port, 8,
 942                                             "EMU10K1X")) == NULL) { 
 943                snd_printk(KERN_ERR "emu10k1x: cannot allocate the port 0x%lx\n", chip->port);
 944                snd_emu10k1x_free(chip);
 945                return -EBUSY;
 946        }
 947
 948        if (request_irq(pci->irq, snd_emu10k1x_interrupt,
 949                        IRQF_SHARED, KBUILD_MODNAME, chip)) {
 950                snd_printk(KERN_ERR "emu10k1x: cannot grab irq %d\n", pci->irq);
 951                snd_emu10k1x_free(chip);
 952                return -EBUSY;
 953        }
 954        chip->irq = pci->irq;
 955  
 956        if(snd_dma_alloc_pages(SNDRV_DMA_TYPE_DEV, snd_dma_pci_data(pci),
 957                               4 * 1024, &chip->dma_buffer) < 0) {
 958                snd_emu10k1x_free(chip);
 959                return -ENOMEM;
 960        }
 961
 962        pci_set_master(pci);
 963        /* read revision & serial */
 964        chip->revision = pci->revision;
 965        pci_read_config_dword(pci, PCI_SUBSYSTEM_VENDOR_ID, &chip->serial);
 966        pci_read_config_word(pci, PCI_SUBSYSTEM_ID, &chip->model);
 967        snd_printk(KERN_INFO "Model %04x Rev %08x Serial %08x\n", chip->model,
 968                   chip->revision, chip->serial);
 969
 970        outl(0, chip->port + INTE);     
 971
 972        for(ch = 0; ch < 3; ch++) {
 973                chip->voices[ch].emu = chip;
 974                chip->voices[ch].number = ch;
 975        }
 976
 977        /*
 978         *  Init to 0x02109204 :
 979         *  Clock accuracy    = 0     (1000ppm)
 980         *  Sample Rate       = 2     (48kHz)
 981         *  Audio Channel     = 1     (Left of 2)
 982         *  Source Number     = 0     (Unspecified)
 983         *  Generation Status = 1     (Original for Cat Code 12)
 984         *  Cat Code          = 12    (Digital Signal Mixer)
 985         *  Mode              = 0     (Mode 0)
 986         *  Emphasis          = 0     (None)
 987         *  CP                = 1     (Copyright unasserted)
 988         *  AN                = 0     (Audio data)
 989         *  P                 = 0     (Consumer)
 990         */
 991        snd_emu10k1x_ptr_write(chip, SPCS0, 0,
 992                               chip->spdif_bits[0] = 
 993                               SPCS_CLKACCY_1000PPM | SPCS_SAMPLERATE_48 |
 994                               SPCS_CHANNELNUM_LEFT | SPCS_SOURCENUM_UNSPEC |
 995                               SPCS_GENERATIONSTATUS | 0x00001200 |
 996                               0x00000000 | SPCS_EMPHASIS_NONE | SPCS_COPYRIGHT);
 997        snd_emu10k1x_ptr_write(chip, SPCS1, 0,
 998                               chip->spdif_bits[1] = 
 999                               SPCS_CLKACCY_1000PPM | SPCS_SAMPLERATE_48 |
1000                               SPCS_CHANNELNUM_LEFT | SPCS_SOURCENUM_UNSPEC |
1001                               SPCS_GENERATIONSTATUS | 0x00001200 |
1002                               0x00000000 | SPCS_EMPHASIS_NONE | SPCS_COPYRIGHT);
1003        snd_emu10k1x_ptr_write(chip, SPCS2, 0,
1004                               chip->spdif_bits[2] = 
1005                               SPCS_CLKACCY_1000PPM | SPCS_SAMPLERATE_48 |
1006                               SPCS_CHANNELNUM_LEFT | SPCS_SOURCENUM_UNSPEC |
1007                               SPCS_GENERATIONSTATUS | 0x00001200 |
1008                               0x00000000 | SPCS_EMPHASIS_NONE | SPCS_COPYRIGHT);
1009
1010        snd_emu10k1x_ptr_write(chip, SPDIF_SELECT, 0, 0x700); // disable SPDIF
1011        snd_emu10k1x_ptr_write(chip, ROUTING, 0, 0x1003F); // routing
1012        snd_emu10k1x_gpio_write(chip, 0x1080); // analog mode
1013
1014        outl(HCFG_LOCKSOUNDCACHE|HCFG_AUDIOENABLE, chip->port+HCFG);
1015
1016        if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL,
1017                                  chip, &ops)) < 0) {
1018                snd_emu10k1x_free(chip);
1019                return err;
1020        }
1021        *rchip = chip;
1022        return 0;
1023}
1024
1025static void snd_emu10k1x_proc_reg_read(struct snd_info_entry *entry, 
1026                                       struct snd_info_buffer *buffer)
1027{
1028        struct emu10k1x *emu = entry->private_data;
1029        unsigned long value,value1,value2;
1030        unsigned long flags;
1031        int i;
1032
1033        snd_iprintf(buffer, "Registers:\n\n");
1034        for(i = 0; i < 0x20; i+=4) {
1035                spin_lock_irqsave(&emu->emu_lock, flags);
1036                value = inl(emu->port + i);
1037                spin_unlock_irqrestore(&emu->emu_lock, flags);
1038                snd_iprintf(buffer, "Register %02X: %08lX\n", i, value);
1039        }
1040        snd_iprintf(buffer, "\nRegisters\n\n");
1041        for(i = 0; i <= 0x48; i++) {
1042                value = snd_emu10k1x_ptr_read(emu, i, 0);
1043                if(i < 0x10 || (i >= 0x20 && i < 0x40)) {
1044                        value1 = snd_emu10k1x_ptr_read(emu, i, 1);
1045                        value2 = snd_emu10k1x_ptr_read(emu, i, 2);
1046                        snd_iprintf(buffer, "%02X: %08lX %08lX %08lX\n", i, value, value1, value2);
1047                } else {
1048                        snd_iprintf(buffer, "%02X: %08lX\n", i, value);
1049                }
1050        }
1051}
1052
1053static void snd_emu10k1x_proc_reg_write(struct snd_info_entry *entry, 
1054                                        struct snd_info_buffer *buffer)
1055{
1056        struct emu10k1x *emu = entry->private_data;
1057        char line[64];
1058        unsigned int reg, channel_id , val;
1059
1060        while (!snd_info_get_line(buffer, line, sizeof(line))) {
1061                if (sscanf(line, "%x %x %x", &reg, &channel_id, &val) != 3)
1062                        continue;
1063
1064                if (reg < 0x49 && val <= 0xffffffff && channel_id <= 2)
1065                        snd_emu10k1x_ptr_write(emu, reg, channel_id, val);
1066        }
1067}
1068
1069static int snd_emu10k1x_proc_init(struct emu10k1x *emu)
1070{
1071        struct snd_info_entry *entry;
1072        
1073        if(! snd_card_proc_new(emu->card, "emu10k1x_regs", &entry)) {
1074                snd_info_set_text_ops(entry, emu, snd_emu10k1x_proc_reg_read);
1075                entry->c.text.write = snd_emu10k1x_proc_reg_write;
1076                entry->mode |= S_IWUSR;
1077                entry->private_data = emu;
1078        }
1079        
1080        return 0;
1081}
1082
1083#define snd_emu10k1x_shared_spdif_info  snd_ctl_boolean_mono_info
1084
1085static int snd_emu10k1x_shared_spdif_get(struct snd_kcontrol *kcontrol,
1086                                         struct snd_ctl_elem_value *ucontrol)
1087{
1088        struct emu10k1x *emu = snd_kcontrol_chip(kcontrol);
1089
1090        ucontrol->value.integer.value[0] = (snd_emu10k1x_ptr_read(emu, SPDIF_SELECT, 0) == 0x700) ? 0 : 1;
1091
1092        return 0;
1093}
1094
1095static int snd_emu10k1x_shared_spdif_put(struct snd_kcontrol *kcontrol,
1096                                         struct snd_ctl_elem_value *ucontrol)
1097{
1098        struct emu10k1x *emu = snd_kcontrol_chip(kcontrol);
1099        unsigned int val;
1100        int change = 0;
1101
1102        val = ucontrol->value.integer.value[0] ;
1103
1104        if (val) {
1105                // enable spdif output
1106                snd_emu10k1x_ptr_write(emu, SPDIF_SELECT, 0, 0x000);
1107                snd_emu10k1x_ptr_write(emu, ROUTING, 0, 0x700);
1108                snd_emu10k1x_gpio_write(emu, 0x1000);
1109        } else {
1110                // disable spdif output
1111                snd_emu10k1x_ptr_write(emu, SPDIF_SELECT, 0, 0x700);
1112                snd_emu10k1x_ptr_write(emu, ROUTING, 0, 0x1003F);
1113                snd_emu10k1x_gpio_write(emu, 0x1080);
1114        }
1115        return change;
1116}
1117
1118static struct snd_kcontrol_new snd_emu10k1x_shared_spdif =
1119{
1120        .iface =        SNDRV_CTL_ELEM_IFACE_MIXER,
1121        .name =         "Analog/Digital Output Jack",
1122        .info =         snd_emu10k1x_shared_spdif_info,
1123        .get =          snd_emu10k1x_shared_spdif_get,
1124        .put =          snd_emu10k1x_shared_spdif_put
1125};
1126
1127static int snd_emu10k1x_spdif_info(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
1128{
1129        uinfo->type = SNDRV_CTL_ELEM_TYPE_IEC958;
1130        uinfo->count = 1;
1131        return 0;
1132}
1133
1134static int snd_emu10k1x_spdif_get(struct snd_kcontrol *kcontrol,
1135                                  struct snd_ctl_elem_value *ucontrol)
1136{
1137        struct emu10k1x *emu = snd_kcontrol_chip(kcontrol);
1138        unsigned int idx = snd_ctl_get_ioffidx(kcontrol, &ucontrol->id);
1139
1140        ucontrol->value.iec958.status[0] = (emu->spdif_bits[idx] >> 0) & 0xff;
1141        ucontrol->value.iec958.status[1] = (emu->spdif_bits[idx] >> 8) & 0xff;
1142        ucontrol->value.iec958.status[2] = (emu->spdif_bits[idx] >> 16) & 0xff;
1143        ucontrol->value.iec958.status[3] = (emu->spdif_bits[idx] >> 24) & 0xff;
1144        return 0;
1145}
1146
1147static int snd_emu10k1x_spdif_get_mask(struct snd_kcontrol *kcontrol,
1148                                       struct snd_ctl_elem_value *ucontrol)
1149{
1150        ucontrol->value.iec958.status[0] = 0xff;
1151        ucontrol->value.iec958.status[1] = 0xff;
1152        ucontrol->value.iec958.status[2] = 0xff;
1153        ucontrol->value.iec958.status[3] = 0xff;
1154        return 0;
1155}
1156
1157static int snd_emu10k1x_spdif_put(struct snd_kcontrol *kcontrol,
1158                                  struct snd_ctl_elem_value *ucontrol)
1159{
1160        struct emu10k1x *emu = snd_kcontrol_chip(kcontrol);
1161        unsigned int idx = snd_ctl_get_ioffidx(kcontrol, &ucontrol->id);
1162        int change;
1163        unsigned int val;
1164
1165        val = (ucontrol->value.iec958.status[0] << 0) |
1166                (ucontrol->value.iec958.status[1] << 8) |
1167                (ucontrol->value.iec958.status[2] << 16) |
1168                (ucontrol->value.iec958.status[3] << 24);
1169        change = val != emu->spdif_bits[idx];
1170        if (change) {
1171                snd_emu10k1x_ptr_write(emu, SPCS0 + idx, 0, val);
1172                emu->spdif_bits[idx] = val;
1173        }
1174        return change;
1175}
1176
1177static struct snd_kcontrol_new snd_emu10k1x_spdif_mask_control =
1178{
1179        .access =       SNDRV_CTL_ELEM_ACCESS_READ,
1180        .iface =        SNDRV_CTL_ELEM_IFACE_PCM,
1181        .name =         SNDRV_CTL_NAME_IEC958("",PLAYBACK,MASK),
1182        .count =        3,
1183        .info =         snd_emu10k1x_spdif_info,
1184        .get =          snd_emu10k1x_spdif_get_mask
1185};
1186
1187static struct snd_kcontrol_new snd_emu10k1x_spdif_control =
1188{
1189        .iface =        SNDRV_CTL_ELEM_IFACE_PCM,
1190        .name =         SNDRV_CTL_NAME_IEC958("",PLAYBACK,DEFAULT),
1191        .count =        3,
1192        .info =         snd_emu10k1x_spdif_info,
1193        .get =          snd_emu10k1x_spdif_get,
1194        .put =          snd_emu10k1x_spdif_put
1195};
1196
1197static int snd_emu10k1x_mixer(struct emu10k1x *emu)
1198{
1199        int err;
1200        struct snd_kcontrol *kctl;
1201        struct snd_card *card = emu->card;
1202
1203        if ((kctl = snd_ctl_new1(&snd_emu10k1x_spdif_mask_control, emu)) == NULL)
1204                return -ENOMEM;
1205        if ((err = snd_ctl_add(card, kctl)))
1206                return err;
1207        if ((kctl = snd_ctl_new1(&snd_emu10k1x_shared_spdif, emu)) == NULL)
1208                return -ENOMEM;
1209        if ((err = snd_ctl_add(card, kctl)))
1210                return err;
1211        if ((kctl = snd_ctl_new1(&snd_emu10k1x_spdif_control, emu)) == NULL)
1212                return -ENOMEM;
1213        if ((err = snd_ctl_add(card, kctl)))
1214                return err;
1215
1216        return 0;
1217}
1218
1219#define EMU10K1X_MIDI_MODE_INPUT        (1<<0)
1220#define EMU10K1X_MIDI_MODE_OUTPUT       (1<<1)
1221
1222static inline unsigned char mpu401_read(struct emu10k1x *emu, struct emu10k1x_midi *mpu, int idx)
1223{
1224        return (unsigned char)snd_emu10k1x_ptr_read(emu, mpu->port + idx, 0);
1225}
1226
1227static inline void mpu401_write(struct emu10k1x *emu, struct emu10k1x_midi *mpu, int data, int idx)
1228{
1229        snd_emu10k1x_ptr_write(emu, mpu->port + idx, 0, data);
1230}
1231
1232#define mpu401_write_data(emu, mpu, data)       mpu401_write(emu, mpu, data, 0)
1233#define mpu401_write_cmd(emu, mpu, data)        mpu401_write(emu, mpu, data, 1)
1234#define mpu401_read_data(emu, mpu)              mpu401_read(emu, mpu, 0)
1235#define mpu401_read_stat(emu, mpu)              mpu401_read(emu, mpu, 1)
1236
1237#define mpu401_input_avail(emu,mpu)     (!(mpu401_read_stat(emu,mpu) & 0x80))
1238#define mpu401_output_ready(emu,mpu)    (!(mpu401_read_stat(emu,mpu) & 0x40))
1239
1240#define MPU401_RESET            0xff
1241#define MPU401_ENTER_UART       0x3f
1242#define MPU401_ACK              0xfe
1243
1244static void mpu401_clear_rx(struct emu10k1x *emu, struct emu10k1x_midi *mpu)
1245{
1246        int timeout = 100000;
1247        for (; timeout > 0 && mpu401_input_avail(emu, mpu); timeout--)
1248                mpu401_read_data(emu, mpu);
1249#ifdef CONFIG_SND_DEBUG
1250        if (timeout <= 0)
1251                snd_printk(KERN_ERR "cmd: clear rx timeout (status = 0x%x)\n", mpu401_read_stat(emu, mpu));
1252#endif
1253}
1254
1255/*
1256
1257 */
1258
1259static void do_emu10k1x_midi_interrupt(struct emu10k1x *emu,
1260                                       struct emu10k1x_midi *midi, unsigned int status)
1261{
1262        unsigned char byte;
1263
1264        if (midi->rmidi == NULL) {
1265                snd_emu10k1x_intr_disable(emu, midi->tx_enable | midi->rx_enable);
1266                return;
1267        }
1268
1269        spin_lock(&midi->input_lock);
1270        if ((status & midi->ipr_rx) && mpu401_input_avail(emu, midi)) {
1271                if (!(midi->midi_mode & EMU10K1X_MIDI_MODE_INPUT)) {
1272                        mpu401_clear_rx(emu, midi);
1273                } else {
1274                        byte = mpu401_read_data(emu, midi);
1275                        if (midi->substream_input)
1276                                snd_rawmidi_receive(midi->substream_input, &byte, 1);
1277                }
1278        }
1279        spin_unlock(&midi->input_lock);
1280
1281        spin_lock(&midi->output_lock);
1282        if ((status & midi->ipr_tx) && mpu401_output_ready(emu, midi)) {
1283                if (midi->substream_output &&
1284                    snd_rawmidi_transmit(midi->substream_output, &byte, 1) == 1) {
1285                        mpu401_write_data(emu, midi, byte);
1286                } else {
1287                        snd_emu10k1x_intr_disable(emu, midi->tx_enable);
1288                }
1289        }
1290        spin_unlock(&midi->output_lock);
1291}
1292
1293static void snd_emu10k1x_midi_interrupt(struct emu10k1x *emu, unsigned int status)
1294{
1295        do_emu10k1x_midi_interrupt(emu, &emu->midi, status);
1296}
1297
1298static int snd_emu10k1x_midi_cmd(struct emu10k1x * emu,
1299                                  struct emu10k1x_midi *midi, unsigned char cmd, int ack)
1300{
1301        unsigned long flags;
1302        int timeout, ok;
1303
1304        spin_lock_irqsave(&midi->input_lock, flags);
1305        mpu401_write_data(emu, midi, 0x00);
1306        /* mpu401_clear_rx(emu, midi); */
1307
1308        mpu401_write_cmd(emu, midi, cmd);
1309        if (ack) {
1310                ok = 0;
1311                timeout = 10000;
1312                while (!ok && timeout-- > 0) {
1313                        if (mpu401_input_avail(emu, midi)) {
1314                                if (mpu401_read_data(emu, midi) == MPU401_ACK)
1315                                        ok = 1;
1316                        }
1317                }
1318                if (!ok && mpu401_read_data(emu, midi) == MPU401_ACK)
1319                        ok = 1;
1320        } else {
1321                ok = 1;
1322        }
1323        spin_unlock_irqrestore(&midi->input_lock, flags);
1324        if (!ok) {
1325                snd_printk(KERN_ERR "midi_cmd: 0x%x failed at 0x%lx (status = 0x%x, data = 0x%x)!!!\n",
1326                           cmd, emu->port,
1327                           mpu401_read_stat(emu, midi),
1328                           mpu401_read_data(emu, midi));
1329                return 1;
1330        }
1331        return 0;
1332}
1333
1334static int snd_emu10k1x_midi_input_open(struct snd_rawmidi_substream *substream)
1335{
1336        struct emu10k1x *emu;
1337        struct emu10k1x_midi *midi = substream->rmidi->private_data;
1338        unsigned long flags;
1339        
1340        emu = midi->emu;
1341        if (snd_BUG_ON(!emu))
1342                return -ENXIO;
1343        spin_lock_irqsave(&midi->open_lock, flags);
1344        midi->midi_mode |= EMU10K1X_MIDI_MODE_INPUT;
1345        midi->substream_input = substream;
1346        if (!(midi->midi_mode & EMU10K1X_MIDI_MODE_OUTPUT)) {
1347                spin_unlock_irqrestore(&midi->open_lock, flags);
1348                if (snd_emu10k1x_midi_cmd(emu, midi, MPU401_RESET, 1))
1349                        goto error_out;
1350                if (snd_emu10k1x_midi_cmd(emu, midi, MPU401_ENTER_UART, 1))
1351                        goto error_out;
1352        } else {
1353                spin_unlock_irqrestore(&midi->open_lock, flags);
1354        }
1355        return 0;
1356
1357error_out:
1358        return -EIO;
1359}
1360
1361static int snd_emu10k1x_midi_output_open(struct snd_rawmidi_substream *substream)
1362{
1363        struct emu10k1x *emu;
1364        struct emu10k1x_midi *midi = substream->rmidi->private_data;
1365        unsigned long flags;
1366
1367        emu = midi->emu;
1368        if (snd_BUG_ON(!emu))
1369                return -ENXIO;
1370        spin_lock_irqsave(&midi->open_lock, flags);
1371        midi->midi_mode |= EMU10K1X_MIDI_MODE_OUTPUT;
1372        midi->substream_output = substream;
1373        if (!(midi->midi_mode & EMU10K1X_MIDI_MODE_INPUT)) {
1374                spin_unlock_irqrestore(&midi->open_lock, flags);
1375                if (snd_emu10k1x_midi_cmd(emu, midi, MPU401_RESET, 1))
1376                        goto error_out;
1377                if (snd_emu10k1x_midi_cmd(emu, midi, MPU401_ENTER_UART, 1))
1378                        goto error_out;
1379        } else {
1380                spin_unlock_irqrestore(&midi->open_lock, flags);
1381        }
1382        return 0;
1383
1384error_out:
1385        return -EIO;
1386}
1387
1388static int snd_emu10k1x_midi_input_close(struct snd_rawmidi_substream *substream)
1389{
1390        struct emu10k1x *emu;
1391        struct emu10k1x_midi *midi = substream->rmidi->private_data;
1392        unsigned long flags;
1393        int err = 0;
1394
1395        emu = midi->emu;
1396        if (snd_BUG_ON(!emu))
1397                return -ENXIO;
1398        spin_lock_irqsave(&midi->open_lock, flags);
1399        snd_emu10k1x_intr_disable(emu, midi->rx_enable);
1400        midi->midi_mode &= ~EMU10K1X_MIDI_MODE_INPUT;
1401        midi->substream_input = NULL;
1402        if (!(midi->midi_mode & EMU10K1X_MIDI_MODE_OUTPUT)) {
1403                spin_unlock_irqrestore(&midi->open_lock, flags);
1404                err = snd_emu10k1x_midi_cmd(emu, midi, MPU401_RESET, 0);
1405        } else {
1406                spin_unlock_irqrestore(&midi->open_lock, flags);
1407        }
1408        return err;
1409}
1410
1411static int snd_emu10k1x_midi_output_close(struct snd_rawmidi_substream *substream)
1412{
1413        struct emu10k1x *emu;
1414        struct emu10k1x_midi *midi = substream->rmidi->private_data;
1415        unsigned long flags;
1416        int err = 0;
1417
1418        emu = midi->emu;
1419        if (snd_BUG_ON(!emu))
1420                return -ENXIO;
1421        spin_lock_irqsave(&midi->open_lock, flags);
1422        snd_emu10k1x_intr_disable(emu, midi->tx_enable);
1423        midi->midi_mode &= ~EMU10K1X_MIDI_MODE_OUTPUT;
1424        midi->substream_output = NULL;
1425        if (!(midi->midi_mode & EMU10K1X_MIDI_MODE_INPUT)) {
1426                spin_unlock_irqrestore(&midi->open_lock, flags);
1427                err = snd_emu10k1x_midi_cmd(emu, midi, MPU401_RESET, 0);
1428        } else {
1429                spin_unlock_irqrestore(&midi->open_lock, flags);
1430        }
1431        return err;
1432}
1433
1434static void snd_emu10k1x_midi_input_trigger(struct snd_rawmidi_substream *substream, int up)
1435{
1436        struct emu10k1x *emu;
1437        struct emu10k1x_midi *midi = substream->rmidi->private_data;
1438        emu = midi->emu;
1439        if (snd_BUG_ON(!emu))
1440                return;
1441
1442        if (up)
1443                snd_emu10k1x_intr_enable(emu, midi->rx_enable);
1444        else
1445                snd_emu10k1x_intr_disable(emu, midi->rx_enable);
1446}
1447
1448static void snd_emu10k1x_midi_output_trigger(struct snd_rawmidi_substream *substream, int up)
1449{
1450        struct emu10k1x *emu;
1451        struct emu10k1x_midi *midi = substream->rmidi->private_data;
1452        unsigned long flags;
1453
1454        emu = midi->emu;
1455        if (snd_BUG_ON(!emu))
1456                return;
1457
1458        if (up) {
1459                int max = 4;
1460                unsigned char byte;
1461        
1462                /* try to send some amount of bytes here before interrupts */
1463                spin_lock_irqsave(&midi->output_lock, flags);
1464                while (max > 0) {
1465                        if (mpu401_output_ready(emu, midi)) {
1466                                if (!(midi->midi_mode & EMU10K1X_MIDI_MODE_OUTPUT) ||
1467                                    snd_rawmidi_transmit(substream, &byte, 1) != 1) {
1468                                        /* no more data */
1469                                        spin_unlock_irqrestore(&midi->output_lock, flags);
1470                                        return;
1471                                }
1472                                mpu401_write_data(emu, midi, byte);
1473                                max--;
1474                        } else {
1475                                break;
1476                        }
1477                }
1478                spin_unlock_irqrestore(&midi->output_lock, flags);
1479                snd_emu10k1x_intr_enable(emu, midi->tx_enable);
1480        } else {
1481                snd_emu10k1x_intr_disable(emu, midi->tx_enable);
1482        }
1483}
1484
1485/*
1486
1487 */
1488
1489static struct snd_rawmidi_ops snd_emu10k1x_midi_output =
1490{
1491        .open =         snd_emu10k1x_midi_output_open,
1492        .close =        snd_emu10k1x_midi_output_close,
1493        .trigger =      snd_emu10k1x_midi_output_trigger,
1494};
1495
1496static struct snd_rawmidi_ops snd_emu10k1x_midi_input =
1497{
1498        .open =         snd_emu10k1x_midi_input_open,
1499        .close =        snd_emu10k1x_midi_input_close,
1500        .trigger =      snd_emu10k1x_midi_input_trigger,
1501};
1502
1503static void snd_emu10k1x_midi_free(struct snd_rawmidi *rmidi)
1504{
1505        struct emu10k1x_midi *midi = rmidi->private_data;
1506        midi->interrupt = NULL;
1507        midi->rmidi = NULL;
1508}
1509
1510static int emu10k1x_midi_init(struct emu10k1x *emu,
1511                              struct emu10k1x_midi *midi, int device,
1512                              char *name)
1513{
1514        struct snd_rawmidi *rmidi;
1515        int err;
1516
1517        if ((err = snd_rawmidi_new(emu->card, name, device, 1, 1, &rmidi)) < 0)
1518                return err;
1519        midi->emu = emu;
1520        spin_lock_init(&midi->open_lock);
1521        spin_lock_init(&midi->input_lock);
1522        spin_lock_init(&midi->output_lock);
1523        strcpy(rmidi->name, name);
1524        snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_OUTPUT, &snd_emu10k1x_midi_output);
1525        snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_INPUT, &snd_emu10k1x_midi_input);
1526        rmidi->info_flags |= SNDRV_RAWMIDI_INFO_OUTPUT |
1527                             SNDRV_RAWMIDI_INFO_INPUT |
1528                             SNDRV_RAWMIDI_INFO_DUPLEX;
1529        rmidi->private_data = midi;
1530        rmidi->private_free = snd_emu10k1x_midi_free;
1531        midi->rmidi = rmidi;
1532        return 0;
1533}
1534
1535static int snd_emu10k1x_midi(struct emu10k1x *emu)
1536{
1537        struct emu10k1x_midi *midi = &emu->midi;
1538        int err;
1539
1540        if ((err = emu10k1x_midi_init(emu, midi, 0, "EMU10K1X MPU-401 (UART)")) < 0)
1541                return err;
1542
1543        midi->tx_enable = INTE_MIDITXENABLE;
1544        midi->rx_enable = INTE_MIDIRXENABLE;
1545        midi->port = MUDATA;
1546        midi->ipr_tx = IPR_MIDITRANSBUFEMPTY;
1547        midi->ipr_rx = IPR_MIDIRECVBUFEMPTY;
1548        midi->interrupt = snd_emu10k1x_midi_interrupt;
1549        return 0;
1550}
1551
1552static int snd_emu10k1x_probe(struct pci_dev *pci,
1553                              const struct pci_device_id *pci_id)
1554{
1555        static int dev;
1556        struct snd_card *card;
1557        struct emu10k1x *chip;
1558        int err;
1559
1560        if (dev >= SNDRV_CARDS)
1561                return -ENODEV;
1562        if (!enable[dev]) {
1563                dev++;
1564                return -ENOENT;
1565        }
1566
1567        err = snd_card_create(index[dev], id[dev], THIS_MODULE, 0, &card);
1568        if (err < 0)
1569                return err;
1570
1571        if ((err = snd_emu10k1x_create(card, pci, &chip)) < 0) {
1572                snd_card_free(card);
1573                return err;
1574        }
1575
1576        if ((err = snd_emu10k1x_pcm(chip, 0, NULL)) < 0) {
1577                snd_card_free(card);
1578                return err;
1579        }
1580        if ((err = snd_emu10k1x_pcm(chip, 1, NULL)) < 0) {
1581                snd_card_free(card);
1582                return err;
1583        }
1584        if ((err = snd_emu10k1x_pcm(chip, 2, NULL)) < 0) {
1585                snd_card_free(card);
1586                return err;
1587        }
1588
1589        if ((err = snd_emu10k1x_ac97(chip)) < 0) {
1590                snd_card_free(card);
1591                return err;
1592        }
1593
1594        if ((err = snd_emu10k1x_mixer(chip)) < 0) {
1595                snd_card_free(card);
1596                return err;
1597        }
1598        
1599        if ((err = snd_emu10k1x_midi(chip)) < 0) {
1600                snd_card_free(card);
1601                return err;
1602        }
1603
1604        snd_emu10k1x_proc_init(chip);
1605
1606        strcpy(card->driver, "EMU10K1X");
1607        strcpy(card->shortname, "Dell Sound Blaster Live!");
1608        sprintf(card->longname, "%s at 0x%lx irq %i",
1609                card->shortname, chip->port, chip->irq);
1610
1611        snd_card_set_dev(card, &pci->dev);
1612
1613        if ((err = snd_card_register(card)) < 0) {
1614                snd_card_free(card);
1615                return err;
1616        }
1617
1618        pci_set_drvdata(pci, card);
1619        dev++;
1620        return 0;
1621}
1622
1623static void snd_emu10k1x_remove(struct pci_dev *pci)
1624{
1625        snd_card_free(pci_get_drvdata(pci));
1626}
1627
1628// PCI IDs
1629static DEFINE_PCI_DEVICE_TABLE(snd_emu10k1x_ids) = {
1630        { PCI_VDEVICE(CREATIVE, 0x0006), 0 },   /* Dell OEM version (EMU10K1) */
1631        { 0, }
1632};
1633MODULE_DEVICE_TABLE(pci, snd_emu10k1x_ids);
1634
1635// pci_driver definition
1636static struct pci_driver emu10k1x_driver = {
1637        .name = KBUILD_MODNAME,
1638        .id_table = snd_emu10k1x_ids,
1639        .probe = snd_emu10k1x_probe,
1640        .remove = snd_emu10k1x_remove,
1641};
1642
1643module_pci_driver(emu10k1x_driver);
1644