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