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