1 /*
2 * Driver for ESS Solo-1 (ES1938, ES1946, ES1969) soundcard
3 * Copyright (c) by Jaromir Koutek <miri@punknet.cz>,
4 * Jaroslav Kysela <perex@perex.cz>,
5 * Thomas Sailer <sailer@ife.ee.ethz.ch>,
6 * Abramo Bagnara <abramo@alsa-project.org>,
7 * Markus Gruber <gruber@eikon.tum.de>
8 *
9 * Rewritten from sonicvibes.c source.
10 *
11 * TODO:
12 * Rewrite better spinlocks
13 *
14 *
15 * This program is free software; you can redistribute it and/or modify
16 * it under the terms of the GNU General Public License as published by
17 * the Free Software Foundation; either version 2 of the License, or
18 * (at your option) any later version.
19 *
20 * This program is distributed in the hope that it will be useful,
21 * but WITHOUT ANY WARRANTY; without even the implied warranty of
22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 * GNU General Public License for more details.
24 *
25 * You should have received a copy of the GNU General Public License
26 * along with this program; if not, write to the Free Software
27 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
28 *
29 */
30
31 /*
32 NOTES:
33 - Capture data is written unaligned starting from dma_base + 1 so I need to
34 disable mmap and to add a copy callback.
35 - After several cycle of the following:
36 while : ; do arecord -d1 -f cd -t raw | aplay -f cd ; done
37 a "playback write error (DMA or IRQ trouble?)" may happen.
38 This is due to playback interrupts not generated.
39 I suspect a timing issue.
40 - Sometimes the interrupt handler is invoked wrongly during playback.
41 This generates some harmless "Unexpected hw_pointer: wrong interrupt
42 acknowledge".
43 I've seen that using small period sizes.
44 Reproducible with:
45 mpg123 test.mp3 &
46 hdparm -t -T /dev/hda
47 */
48
49
50 #include <linux/init.h>
51 #include <linux/interrupt.h>
52 #include <linux/pci.h>
53 #include <linux/slab.h>
54 #include <linux/gameport.h>
55 #include <linux/moduleparam.h>
56 #include <linux/delay.h>
57 #include <linux/dma-mapping.h>
58 #include <sound/core.h>
59 #include <sound/control.h>
60 #include <sound/pcm.h>
61 #include <sound/opl3.h>
62 #include <sound/mpu401.h>
63 #include <sound/initval.h>
64 #include <sound/tlv.h>
65
66 #include <asm/io.h>
67
68 MODULE_AUTHOR("Jaromir Koutek <miri@punknet.cz>");
69 MODULE_DESCRIPTION("ESS Solo-1");
70 MODULE_LICENSE("GPL");
71 MODULE_SUPPORTED_DEVICE("{{ESS,ES1938},"
72 "{ESS,ES1946},"
73 "{ESS,ES1969},"
74 "{TerraTec,128i PCI}}");
75
76 #if defined(CONFIG_GAMEPORT) || (defined(MODULE) && defined(CONFIG_GAMEPORT_MODULE))
77 #define SUPPORT_JOYSTICK 1
78 #endif
79
80 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; /* Index 0-MAX */
81 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; /* ID for this card */
82 static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP; /* Enable this card */
83
84 module_param_array(index, int, NULL, 0444);
85 MODULE_PARM_DESC(index, "Index value for ESS Solo-1 soundcard.");
86 module_param_array(id, charp, NULL, 0444);
87 MODULE_PARM_DESC(id, "ID string for ESS Solo-1 soundcard.");
88 module_param_array(enable, bool, NULL, 0444);
89 MODULE_PARM_DESC(enable, "Enable ESS Solo-1 soundcard.");
90
91 #define SLIO_REG(chip, x) ((chip)->io_port + ESSIO_REG_##x)
92
93 #define SLDM_REG(chip, x) ((chip)->ddma_port + ESSDM_REG_##x)
94
95 #define SLSB_REG(chip, x) ((chip)->sb_port + ESSSB_REG_##x)
96
97 #define SL_PCI_LEGACYCONTROL 0x40
98 #define SL_PCI_CONFIG 0x50
99 #define SL_PCI_DDMACONTROL 0x60
100
101 #define ESSIO_REG_AUDIO2DMAADDR 0
102 #define ESSIO_REG_AUDIO2DMACOUNT 4
103 #define ESSIO_REG_AUDIO2MODE 6
104 #define ESSIO_REG_IRQCONTROL 7
105
106 #define ESSDM_REG_DMAADDR 0x00
107 #define ESSDM_REG_DMACOUNT 0x04
108 #define ESSDM_REG_DMACOMMAND 0x08
109 #define ESSDM_REG_DMASTATUS 0x08
110 #define ESSDM_REG_DMAMODE 0x0b
111 #define ESSDM_REG_DMACLEAR 0x0d
112 #define ESSDM_REG_DMAMASK 0x0f
113
114 #define ESSSB_REG_FMLOWADDR 0x00
115 #define ESSSB_REG_FMHIGHADDR 0x02
116 #define ESSSB_REG_MIXERADDR 0x04
117 #define ESSSB_REG_MIXERDATA 0x05
118
119 #define ESSSB_IREG_AUDIO1 0x14
120 #define ESSSB_IREG_MICMIX 0x1a
121 #define ESSSB_IREG_RECSRC 0x1c
122 #define ESSSB_IREG_MASTER 0x32
123 #define ESSSB_IREG_FM 0x36
124 #define ESSSB_IREG_AUXACD 0x38
125 #define ESSSB_IREG_AUXB 0x3a
126 #define ESSSB_IREG_PCSPEAKER 0x3c
127 #define ESSSB_IREG_LINE 0x3e
128 #define ESSSB_IREG_SPATCONTROL 0x50
129 #define ESSSB_IREG_SPATLEVEL 0x52
130 #define ESSSB_IREG_MASTER_LEFT 0x60
131 #define ESSSB_IREG_MASTER_RIGHT 0x62
132 #define ESSSB_IREG_MPU401CONTROL 0x64
133 #define ESSSB_IREG_MICMIXRECORD 0x68
134 #define ESSSB_IREG_AUDIO2RECORD 0x69
135 #define ESSSB_IREG_AUXACDRECORD 0x6a
136 #define ESSSB_IREG_FMRECORD 0x6b
137 #define ESSSB_IREG_AUXBRECORD 0x6c
138 #define ESSSB_IREG_MONO 0x6d
139 #define ESSSB_IREG_LINERECORD 0x6e
140 #define ESSSB_IREG_MONORECORD 0x6f
141 #define ESSSB_IREG_AUDIO2SAMPLE 0x70
142 #define ESSSB_IREG_AUDIO2MODE 0x71
143 #define ESSSB_IREG_AUDIO2FILTER 0x72
144 #define ESSSB_IREG_AUDIO2TCOUNTL 0x74
145 #define ESSSB_IREG_AUDIO2TCOUNTH 0x76
146 #define ESSSB_IREG_AUDIO2CONTROL1 0x78
147 #define ESSSB_IREG_AUDIO2CONTROL2 0x7a
148 #define ESSSB_IREG_AUDIO2 0x7c
149
150 #define ESSSB_REG_RESET 0x06
151
152 #define ESSSB_REG_READDATA 0x0a
153 #define ESSSB_REG_WRITEDATA 0x0c
154 #define ESSSB_REG_READSTATUS 0x0c
155
156 #define ESSSB_REG_STATUS 0x0e
157
158 #define ESS_CMD_EXTSAMPLERATE 0xa1
159 #define ESS_CMD_FILTERDIV 0xa2
160 #define ESS_CMD_DMACNTRELOADL 0xa4
161 #define ESS_CMD_DMACNTRELOADH 0xa5
162 #define ESS_CMD_ANALOGCONTROL 0xa8
163 #define ESS_CMD_IRQCONTROL 0xb1
164 #define ESS_CMD_DRQCONTROL 0xb2
165 #define ESS_CMD_RECLEVEL 0xb4
166 #define ESS_CMD_SETFORMAT 0xb6
167 #define ESS_CMD_SETFORMAT2 0xb7
168 #define ESS_CMD_DMACONTROL 0xb8
169 #define ESS_CMD_DMATYPE 0xb9
170 #define ESS_CMD_OFFSETLEFT 0xba
171 #define ESS_CMD_OFFSETRIGHT 0xbb
172 #define ESS_CMD_READREG 0xc0
173 #define ESS_CMD_ENABLEEXT 0xc6
174 #define ESS_CMD_PAUSEDMA 0xd0
175 #define ESS_CMD_ENABLEAUDIO1 0xd1
176 #define ESS_CMD_STOPAUDIO1 0xd3
177 #define ESS_CMD_AUDIO1STATUS 0xd8
178 #define ESS_CMD_CONTDMA 0xd4
179 #define ESS_CMD_TESTIRQ 0xf2
180
181 #define ESS_RECSRC_MIC 0
182 #define ESS_RECSRC_AUXACD 2
183 #define ESS_RECSRC_AUXB 5
184 #define ESS_RECSRC_LINE 6
185 #define ESS_RECSRC_NONE 7
186
187 #define DAC1 0x01
188 #define ADC1 0x02
189 #define DAC2 0x04
190
191 /*
192
193 */
194
195 #define SAVED_REG_SIZE 32 /* max. number of registers to save */
196
197 struct es1938 {
198 int irq;
199
200 unsigned long io_port;
201 unsigned long sb_port;
202 unsigned long vc_port;
203 unsigned long mpu_port;
204 unsigned long game_port;
205 unsigned long ddma_port;
206
207 unsigned char irqmask;
208 unsigned char revision;
209
210 struct snd_kcontrol *hw_volume;
211 struct snd_kcontrol *hw_switch;
212 struct snd_kcontrol *master_volume;
213 struct snd_kcontrol *master_switch;
214
215 struct pci_dev *pci;
216 struct snd_card *card;
217 struct snd_pcm *pcm;
218 struct snd_pcm_substream *capture_substream;
219 struct snd_pcm_substream *playback1_substream;
220 struct snd_pcm_substream *playback2_substream;
221 struct snd_rawmidi *rmidi;
222
223 unsigned int dma1_size;
224 unsigned int dma2_size;
225 unsigned int dma1_start;
226 unsigned int dma2_start;
227 unsigned int dma1_shift;
228 unsigned int dma2_shift;
229 unsigned int last_capture_dmaaddr;
230 unsigned int active;
231
232 spinlock_t reg_lock;
233 spinlock_t mixer_lock;
234 struct snd_info_entry *proc_entry;
235
236 #ifdef SUPPORT_JOYSTICK
237 struct gameport *gameport;
238 #endif
239 #ifdef CONFIG_PM
240 unsigned char saved_regs[SAVED_REG_SIZE];
241 #endif
242 };
243
244 static irqreturn_t snd_es1938_interrupt(int irq, void *dev_id);
245
246 static 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 * -----------------------------------------------------------------*/
snd_es1938_mixer_write(struct es1938 * chip,unsigned char reg,unsigned char val)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 * -----------------------------------------------------------------*/
snd_es1938_mixer_read(struct es1938 * chip,unsigned char reg)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 * -----------------------------------------------------------------*/
snd_es1938_mixer_bits(struct es1938 * chip,unsigned char reg,unsigned char mask,unsigned char val)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 * -----------------------------------------------------------------*/
snd_es1938_write_cmd(struct es1938 * chip,unsigned char cmd)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 * -----------------------------------------------------------------*/
snd_es1938_get_byte(struct es1938 * chip)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 * -----------------------------------------------------------------*/
snd_es1938_write(struct es1938 * chip,unsigned char reg,unsigned char val)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 * -----------------------------------------------------------------*/
snd_es1938_read(struct es1938 * chip,unsigned char reg)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 * -----------------------------------------------------------------*/
snd_es1938_bits(struct es1938 * chip,unsigned char reg,unsigned char mask,unsigned char val)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 * --------------------------------------------------------------------*/
snd_es1938_reset(struct es1938 * chip)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 * --------------------------------------------------------------------*/
snd_es1938_reset_fifo(struct es1938 * chip)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
snd_es1938_rate_set(struct es1938 * chip,struct snd_pcm_substream * substream,int mode)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
snd_es1938_playback1_setdma(struct es1938 * chip)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
snd_es1938_playback2_setdma(struct es1938 * chip)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
snd_es1938_capture_setdma(struct es1938 * chip)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
snd_es1938_capture_trigger(struct snd_pcm_substream * substream,int cmd)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
snd_es1938_playback1_trigger(struct snd_pcm_substream * substream,int cmd)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
snd_es1938_playback2_trigger(struct snd_pcm_substream * substream,int cmd)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
snd_es1938_playback_trigger(struct snd_pcm_substream * substream,int cmd)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 * --------------------------------------------------------------------*/
snd_es1938_capture_prepare(struct snd_pcm_substream * substream)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 * ------------------------------------------------------------------------------*/
snd_es1938_playback1_prepare(struct snd_pcm_substream * substream)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
snd_es1938_playback2_prepare(struct snd_pcm_substream * substream)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
snd_es1938_playback_prepare(struct snd_pcm_substream * substream)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 */
snd_es1938_capture_pointer(struct snd_pcm_substream * substream)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
snd_es1938_playback1_pointer(struct snd_pcm_substream * substream)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
snd_es1938_playback2_pointer(struct snd_pcm_substream * substream)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
snd_es1938_playback_pointer(struct snd_pcm_substream * substream)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
snd_es1938_capture_copy(struct snd_pcm_substream * substream,int channel,snd_pcm_uframes_t pos,void __user * dst,snd_pcm_uframes_t count)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 */
snd_es1938_pcm_hw_params(struct snd_pcm_substream * substream,struct snd_pcm_hw_params * hw_params)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
snd_es1938_pcm_hw_free(struct snd_pcm_substream * substream)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
snd_es1938_capture_open(struct snd_pcm_substream * substream)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
snd_es1938_playback_open(struct snd_pcm_substream * substream)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
snd_es1938_capture_close(struct snd_pcm_substream * substream)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
snd_es1938_playback_close(struct snd_pcm_substream * substream)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
snd_es1938_new_pcm(struct es1938 * chip,int device)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
snd_es1938_info_mux(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_info * uinfo)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
snd_es1938_get_mux(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)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
snd_es1938_put_mux(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)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
snd_es1938_get_spatializer_enable(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)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
snd_es1938_put_spatializer_enable(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)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
snd_es1938_info_hw_volume(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_info * uinfo)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
snd_es1938_get_hw_volume(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)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
snd_es1938_get_hw_switch(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)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
snd_es1938_hwv_free(struct snd_kcontrol * kcontrol)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
snd_es1938_reg_bits(struct es1938 * chip,unsigned char reg,unsigned char mask,unsigned char val)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
snd_es1938_reg_read(struct es1938 * chip,unsigned char reg)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
snd_es1938_info_single(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_info * uinfo)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
snd_es1938_get_single(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)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
snd_es1938_put_single(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)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
snd_es1938_info_double(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_info * uinfo)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
snd_es1938_get_double(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)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
snd_es1938_put_double(struct snd_kcontrol * kcontrol,struct snd_ctl_elem_value * ucontrol)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 */
snd_es1938_chip_init(struct es1938 * chip)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
es1938_suspend(struct pci_dev * pci,pm_message_t state)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
es1938_resume(struct pci_dev * pci)1501 static int es1938_resume(struct pci_dev *pci)
1502 {
1503 struct snd_card *card = pci_get_drvdata(pci);
1504 struct es1938 *chip = card->private_data;
1505 unsigned char *s, *d;
1506
1507 pci_set_power_state(pci, PCI_D0);
1508 pci_restore_state(pci);
1509 if (pci_enable_device(pci) < 0) {
1510 printk(KERN_ERR "es1938: pci_enable_device failed, "
1511 "disabling device\n");
1512 snd_card_disconnect(card);
1513 return -EIO;
1514 }
1515
1516 if (request_irq(pci->irq, snd_es1938_interrupt,
1517 IRQF_SHARED, "ES1938", chip)) {
1518 printk(KERN_ERR "es1938: unable to grab IRQ %d, "
1519 "disabling device\n", pci->irq);
1520 snd_card_disconnect(card);
1521 return -EIO;
1522 }
1523 chip->irq = pci->irq;
1524 snd_es1938_chip_init(chip);
1525
1526 /* restore mixer-related registers */
1527 for (s = saved_regs, d = chip->saved_regs; *s; s++, d++) {
1528 if (*s < 0xa0)
1529 snd_es1938_mixer_write(chip, *s, *d);
1530 else
1531 snd_es1938_write(chip, *s, *d);
1532 }
1533
1534 snd_power_change_state(card, SNDRV_CTL_POWER_D0);
1535 return 0;
1536 }
1537 #endif /* CONFIG_PM */
1538
1539 #ifdef SUPPORT_JOYSTICK
snd_es1938_create_gameport(struct es1938 * chip)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
snd_es1938_free_gameport(struct es1938 * chip)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
snd_es1938_create_gameport(struct es1938 * chip)1568 static inline int snd_es1938_create_gameport(struct es1938 *chip) { return -ENOSYS; }
snd_es1938_free_gameport(struct es1938 * chip)1569 static inline void snd_es1938_free_gameport(struct es1938 *chip) { }
1570 #endif /* SUPPORT_JOYSTICK */
1571
snd_es1938_free(struct es1938 * chip)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
snd_es1938_dev_free(struct snd_device * device)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
snd_es1938_create(struct snd_card * card,struct pci_dev * pci,struct es1938 ** rchip)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 "ES1938", chip)) {
1640 snd_printk(KERN_ERR "unable to grab IRQ %d\n", pci->irq);
1641 snd_es1938_free(chip);
1642 return -EBUSY;
1643 }
1644 chip->irq = pci->irq;
1645 #ifdef ES1938_DDEBUG
1646 snd_printk(KERN_DEBUG "create: io: 0x%lx, sb: 0x%lx, vc: 0x%lx, mpu: 0x%lx, game: 0x%lx\n",
1647 chip->io_port, chip->sb_port, chip->vc_port, chip->mpu_port, chip->game_port);
1648 #endif
1649
1650 chip->ddma_port = chip->vc_port + 0x00; /* fix from Thomas Sailer */
1651
1652 snd_es1938_chip_init(chip);
1653
1654 if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
1655 snd_es1938_free(chip);
1656 return err;
1657 }
1658
1659 snd_card_set_dev(card, &pci->dev);
1660
1661 *rchip = chip;
1662 return 0;
1663 }
1664
1665 /* --------------------------------------------------------------------
1666 * Interrupt handler
1667 * -------------------------------------------------------------------- */
snd_es1938_interrupt(int irq,void * dev_id)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
snd_es1938_mixer(struct es1938 * chip)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
snd_es1938_probe(struct pci_dev * pci,const struct pci_device_id * pci_id)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, MPU401_INFO_INTEGRATED,
1858 chip->irq, 0, &chip->rmidi) < 0) {
1859 printk(KERN_ERR "es1938: unable to initialize MPU-401\n");
1860 } else {
1861 // this line is vital for MIDI interrupt handling on ess-solo1
1862 // andreas@flying-snail.de
1863 snd_es1938_mixer_bits(chip, ESSSB_IREG_MPU401CONTROL, 0x40, 0x40);
1864 }
1865
1866 snd_es1938_create_gameport(chip);
1867
1868 if ((err = snd_card_register(card)) < 0) {
1869 snd_card_free(card);
1870 return err;
1871 }
1872
1873 pci_set_drvdata(pci, card);
1874 dev++;
1875 return 0;
1876 }
1877
snd_es1938_remove(struct pci_dev * pci)1878 static void __devexit snd_es1938_remove(struct pci_dev *pci)
1879 {
1880 snd_card_free(pci_get_drvdata(pci));
1881 pci_set_drvdata(pci, NULL);
1882 }
1883
1884 static struct pci_driver driver = {
1885 .name = "ESS ES1938 (Solo-1)",
1886 .id_table = snd_es1938_ids,
1887 .probe = snd_es1938_probe,
1888 .remove = __devexit_p(snd_es1938_remove),
1889 #ifdef CONFIG_PM
1890 .suspend = es1938_suspend,
1891 .resume = es1938_resume,
1892 #endif
1893 };
1894
alsa_card_es1938_init(void)1895 static int __init alsa_card_es1938_init(void)
1896 {
1897 return pci_register_driver(&driver);
1898 }
1899
alsa_card_es1938_exit(void)1900 static void __exit alsa_card_es1938_exit(void)
1901 {
1902 pci_unregister_driver(&driver);
1903 }
1904
1905 module_init(alsa_card_es1938_init)
1906 module_exit(alsa_card_es1938_exit)
1907