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