2 * Driver for ESS Maestro 1/2/2E Sound Card (started 21.8.99)
3 * Copyright (c) by Matze Braun <MatzeBraun@gmx.de>.
4 * Takashi Iwai <tiwai@suse.de>
6 * Most of the driver code comes from Zach Brown(zab@redhat.com)
8 * Rewritted from card-es1938.c source.
13 * This program is free software; you can redistribute it and/or modify
14 * it under the terms of the GNU General Public License as published by
15 * the Free Software Foundation; either version 2 of the License, or
16 * (at your option) any later version.
18 * This program is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU General Public License for more details.
23 * You should have received a copy of the GNU General Public License
24 * along with this program; if not, write to the Free Software
25 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
28 * Notes from Zach Brown about the driver code
30 * Hardware Description
32 * A working Maestro setup contains the Maestro chip wired to a
33 * codec or 2. In the Maestro we have the APUs, the ASSP, and the
34 * Wavecache. The APUs can be though of as virtual audio routing
35 * channels. They can take data from a number of sources and perform
36 * basic encodings of the data. The wavecache is a storehouse for
37 * PCM data. Typically it deals with PCI and interracts with the
38 * APUs. The ASSP is a wacky DSP like device that ESS is loth
39 * to release docs on. Thankfully it isn't required on the Maestro
40 * until you start doing insane things like FM emulation and surround
41 * encoding. The codecs are almost always AC-97 compliant codecs,
42 * but it appears that early Maestros may have had PT101 (an ESS
43 * part?) wired to them. The only real difference in the Maestro
44 * families is external goop like docking capability, memory for
45 * the ASSP, and initialization differences.
49 * We only drive the APU/Wavecache as typical DACs and drive the
50 * mixers in the codecs. There are 64 APUs. We assign 6 to each
51 * /dev/dsp? device. 2 channels for output, and 4 channels for
54 * Each APU can do a number of things, but we only really use
55 * 3 basic functions. For playback we use them to convert PCM
56 * data fetched over PCI by the wavecahche into analog data that
57 * is handed to the codec. One APU for mono, and a pair for stereo.
58 * When in stereo, the combination of smarts in the APU and Wavecache
59 * decide which wavecache gets the left or right channel.
61 * For record we still use the old overly mono system. For each in
62 * coming channel the data comes in from the codec, through a 'input'
63 * APU, through another rate converter APU, and then into memory via
64 * the wavecache and PCI. If its stereo, we mash it back into LRLR in
65 * software. The pass between the 2 APUs is supposedly what requires us
66 * to have a 512 byte buffer sitting around in wavecache/memory.
68 * The wavecache makes our life even more fun. First off, it can
69 * only address the first 28 bits of PCI address space, making it
70 * useless on quite a few architectures. Secondly, its insane.
71 * It claims to fetch from 4 regions of PCI space, each 4 meg in length.
72 * But that doesn't really work. You can only use 1 region. So all our
73 * allocations have to be in 4meg of each other. Booo. Hiss.
74 * So we have a module parameter, dsps_order, that is the order of
75 * the number of dsps to provide. All their buffer space is allocated
76 * on open time. The sonicvibes OSS routines we inherited really want
77 * power of 2 buffers, so we have all those next to each other, then
78 * 512 byte regions for the recording wavecaches. This ends up
79 * wasting quite a bit of memory. The only fixes I can see would be
80 * getting a kernel allocator that could work in zones, or figuring out
81 * just how to coerce the WP into doing what we want.
83 * The indirection of the various registers means we have to spinlock
84 * nearly all register accesses. We have the main register indirection
85 * like the wave cache, maestro registers, etc. Then we have beasts
86 * like the APU interface that is indirect registers gotten at through
87 * the main maestro indirection. Ouch. We spinlock around the actual
88 * ports on a per card basis. This means spinlock activity at each IO
89 * operation, but the only IO operation clusters are in non critical
90 * paths and it makes the code far easier to follow. Interrupts are
91 * blocked while holding the locks because the int handler has to
92 * get at some of them :(. The mixer interface doesn't, however.
93 * We also have an OSS state lock that is thrown around in a few
98 #include <linux/delay.h>
99 #include <linux/interrupt.h>
100 #include <linux/init.h>
101 #include <linux/pci.h>
102 #include <linux/dma-mapping.h>
103 #include <linux/slab.h>
104 #include <linux/gameport.h>
105 #include <linux/moduleparam.h>
106 #include <linux/mutex.h>
108 #include <sound/core.h>
109 #include <sound/pcm.h>
110 #include <sound/mpu401.h>
111 #include <sound/ac97_codec.h>
112 #include <sound/initval.h>
114 #define CARD_NAME "ESS Maestro1/2"
115 #define DRIVER_NAME "ES1968"
117 MODULE_DESCRIPTION("ESS Maestro");
118 MODULE_LICENSE("GPL");
119 MODULE_SUPPORTED_DEVICE("{{ESS,Maestro 2e},"
124 #if defined(CONFIG_GAMEPORT) || (defined(MODULE) && defined(CONFIG_GAMEPORT_MODULE))
125 #define SUPPORT_JOYSTICK 1
128 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; /* Index 1-MAX */
129 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; /* ID for this card */
130 static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP; /* Enable this card */
131 static int total_bufsize[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 1024 };
132 static int pcm_substreams_p[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 4 };
133 static int pcm_substreams_c[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 1 };
134 static int clock[SNDRV_CARDS];
135 static int use_pm[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 2};
136 static int enable_mpu[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 2};
137 #ifdef SUPPORT_JOYSTICK
138 static int joystick[SNDRV_CARDS];
141 module_param_array(index, int, NULL, 0444);
142 MODULE_PARM_DESC(index, "Index value for " CARD_NAME " soundcard.");
143 module_param_array(id, charp, NULL, 0444);
144 MODULE_PARM_DESC(id, "ID string for " CARD_NAME " soundcard.");
145 module_param_array(enable, bool, NULL, 0444);
146 MODULE_PARM_DESC(enable, "Enable " CARD_NAME " soundcard.");
147 module_param_array(total_bufsize, int, NULL, 0444);
148 MODULE_PARM_DESC(total_bufsize, "Total buffer size in kB.");
149 module_param_array(pcm_substreams_p, int, NULL, 0444);
150 MODULE_PARM_DESC(pcm_substreams_p, "PCM Playback substreams for " CARD_NAME " soundcard.");
151 module_param_array(pcm_substreams_c, int, NULL, 0444);
152 MODULE_PARM_DESC(pcm_substreams_c, "PCM Capture substreams for " CARD_NAME " soundcard.");
153 module_param_array(clock, int, NULL, 0444);
154 MODULE_PARM_DESC(clock, "Clock on " CARD_NAME " soundcard. (0 = auto-detect)");
155 module_param_array(use_pm, int, NULL, 0444);
156 MODULE_PARM_DESC(use_pm, "Toggle power-management. (0 = off, 1 = on, 2 = auto)");
157 module_param_array(enable_mpu, int, NULL, 0444);
158 MODULE_PARM_DESC(enable_mpu, "Enable MPU401. (0 = off, 1 = on, 2 = auto)");
159 #ifdef SUPPORT_JOYSTICK
160 module_param_array(joystick, bool, NULL, 0444);
161 MODULE_PARM_DESC(joystick, "Enable joystick.");
166 #define NR_APU_REGS 16
169 #define NEC_VERSA_SUBID1 0x80581033
170 #define NEC_VERSA_SUBID2 0x803c1033
173 #define ESS_FMT_STEREO 0x01
174 #define ESS_FMT_16BIT 0x02
176 #define DAC_RUNNING 1
177 #define ADC_RUNNING 2
179 /* Values for the ESM_LEGACY_AUDIO_CONTROL */
181 #define ESS_DISABLE_AUDIO 0x8000
182 #define ESS_ENABLE_SERIAL_IRQ 0x4000
183 #define IO_ADRESS_ALIAS 0x0020
184 #define MPU401_IRQ_ENABLE 0x0010
185 #define MPU401_IO_ENABLE 0x0008
186 #define GAME_IO_ENABLE 0x0004
187 #define FM_IO_ENABLE 0x0002
188 #define SB_IO_ENABLE 0x0001
190 /* Values for the ESM_CONFIG_A */
192 #define PIC_SNOOP1 0x4000
193 #define PIC_SNOOP2 0x2000
194 #define SAFEGUARD 0x0800
195 #define DMA_CLEAR 0x0700
196 #define DMA_DDMA 0x0000
197 #define DMA_TDMA 0x0100
198 #define DMA_PCPCI 0x0200
199 #define POST_WRITE 0x0080
200 #define PCI_TIMING 0x0040
201 #define SWAP_LR 0x0020
202 #define SUBTR_DECODE 0x0002
204 /* Values for the ESM_CONFIG_B */
206 #define SPDIF_CONFB 0x0100
207 #define HWV_CONFB 0x0080
208 #define DEBOUNCE 0x0040
209 #define GPIO_CONFB 0x0020
210 #define CHI_CONFB 0x0010
211 #define IDMA_CONFB 0x0008 /*undoc */
212 #define MIDI_FIX 0x0004 /*undoc */
213 #define IRQ_TO_ISA 0x0001 /*undoc */
215 /* Values for Ring Bus Control B */
216 #define RINGB_2CODEC_ID_MASK 0x0003
217 #define RINGB_DIS_VALIDATION 0x0008
218 #define RINGB_EN_SPDIF 0x0010
219 #define RINGB_EN_2CODEC 0x0020
220 #define RINGB_SING_BIT_DUAL 0x0040
222 /* ****Port Adresses**** */
225 #define ESM_INDEX 0x02
226 #define ESM_DATA 0x00
229 #define ESM_AC97_INDEX 0x30
230 #define ESM_AC97_DATA 0x32
231 #define ESM_RING_BUS_DEST 0x34
232 #define ESM_RING_BUS_CONTR_A 0x36
233 #define ESM_RING_BUS_CONTR_B 0x38
234 #define ESM_RING_BUS_SDO 0x3A
237 #define WC_INDEX 0x10
239 #define WC_CONTROL 0x14
242 #define ASSP_INDEX 0x80
243 #define ASSP_MEMORY 0x82
244 #define ASSP_DATA 0x84
245 #define ASSP_CONTROL_A 0xA2
246 #define ASSP_CONTROL_B 0xA4
247 #define ASSP_CONTROL_C 0xA6
248 #define ASSP_HOSTW_INDEX 0xA8
249 #define ASSP_HOSTW_DATA 0xAA
250 #define ASSP_HOSTW_IRQ 0xAC
252 #define ESM_MPU401_PORT 0x98
254 #define ESM_PORT_HOST_IRQ 0x18
256 #define IDR0_DATA_PORT 0x00
257 #define IDR1_CRAM_POINTER 0x01
258 #define IDR2_CRAM_DATA 0x02
259 #define IDR3_WAVE_DATA 0x03
260 #define IDR4_WAVE_PTR_LOW 0x04
261 #define IDR5_WAVE_PTR_HI 0x05
262 #define IDR6_TIMER_CTRL 0x06
263 #define IDR7_WAVE_ROMRAM 0x07
265 #define WRITEABLE_MAP 0xEFFFFF
266 #define READABLE_MAP 0x64003F
270 #define ESM_LEGACY_AUDIO_CONTROL 0x40
271 #define ESM_ACPI_COMMAND 0x54
272 #define ESM_CONFIG_A 0x50
273 #define ESM_CONFIG_B 0x52
274 #define ESM_DDMA 0x60
277 #define ESM_BOB_ENABLE 0x0001
278 #define ESM_BOB_START 0x0001
280 /* Host IRQ Control Bits */
281 #define ESM_RESET_MAESTRO 0x8000
282 #define ESM_RESET_DIRECTSOUND 0x4000
283 #define ESM_HIRQ_ClkRun 0x0100
284 #define ESM_HIRQ_HW_VOLUME 0x0040
285 #define ESM_HIRQ_HARPO 0x0030 /* What's that? */
286 #define ESM_HIRQ_ASSP 0x0010
287 #define ESM_HIRQ_DSIE 0x0004
288 #define ESM_HIRQ_MPU401 0x0002
289 #define ESM_HIRQ_SB 0x0001
291 /* Host IRQ Status Bits */
292 #define ESM_MPU401_IRQ 0x02
293 #define ESM_SB_IRQ 0x01
294 #define ESM_SOUND_IRQ 0x04
295 #define ESM_ASSP_IRQ 0x10
296 #define ESM_HWVOL_IRQ 0x40
298 #define ESS_SYSCLK 50000000
299 #define ESM_BOB_FREQ 200
300 #define ESM_BOB_FREQ_MAX 800
302 #define ESM_FREQ_ESM1 (49152000L / 1024L) /* default rate 48000 */
303 #define ESM_FREQ_ESM2 (50000000L / 1024L)
305 /* APU Modes: reg 0x00, bit 4-7 */
306 #define ESM_APU_MODE_SHIFT 4
307 #define ESM_APU_MODE_MASK (0xf << 4)
308 #define ESM_APU_OFF 0x00
309 #define ESM_APU_16BITLINEAR 0x01 /* 16-Bit Linear Sample Player */
310 #define ESM_APU_16BITSTEREO 0x02 /* 16-Bit Stereo Sample Player */
311 #define ESM_APU_8BITLINEAR 0x03 /* 8-Bit Linear Sample Player */
312 #define ESM_APU_8BITSTEREO 0x04 /* 8-Bit Stereo Sample Player */
313 #define ESM_APU_8BITDIFF 0x05 /* 8-Bit Differential Sample Playrer */
314 #define ESM_APU_DIGITALDELAY 0x06 /* Digital Delay Line */
315 #define ESM_APU_DUALTAP 0x07 /* Dual Tap Reader */
316 #define ESM_APU_CORRELATOR 0x08 /* Correlator */
317 #define ESM_APU_INPUTMIXER 0x09 /* Input Mixer */
318 #define ESM_APU_WAVETABLE 0x0A /* Wave Table Mode */
319 #define ESM_APU_SRCONVERTOR 0x0B /* Sample Rate Convertor */
320 #define ESM_APU_16BITPINGPONG 0x0C /* 16-Bit Ping-Pong Sample Player */
321 #define ESM_APU_RESERVED1 0x0D /* Reserved 1 */
322 #define ESM_APU_RESERVED2 0x0E /* Reserved 2 */
323 #define ESM_APU_RESERVED3 0x0F /* Reserved 3 */
326 #define ESM_APU_FILTER_Q_SHIFT 0
327 #define ESM_APU_FILTER_Q_MASK (3 << 0)
328 /* APU Filtey Q Control */
329 #define ESM_APU_FILTER_LESSQ 0x00
330 #define ESM_APU_FILTER_MOREQ 0x03
332 #define ESM_APU_FILTER_TYPE_SHIFT 2
333 #define ESM_APU_FILTER_TYPE_MASK (3 << 2)
334 #define ESM_APU_ENV_TYPE_SHIFT 8
335 #define ESM_APU_ENV_TYPE_MASK (3 << 8)
336 #define ESM_APU_ENV_STATE_SHIFT 10
337 #define ESM_APU_ENV_STATE_MASK (3 << 10)
338 #define ESM_APU_END_CURVE (1 << 12)
339 #define ESM_APU_INT_ON_LOOP (1 << 13)
340 #define ESM_APU_DMA_ENABLE (1 << 14)
343 #define ESM_APU_SUBMIX_GROUP_SHIRT 0
344 #define ESM_APU_SUBMIX_GROUP_MASK (7 << 0)
345 #define ESM_APU_SUBMIX_MODE (1 << 3)
346 #define ESM_APU_6dB (1 << 4)
347 #define ESM_APU_DUAL_EFFECT (1 << 5)
348 #define ESM_APU_EFFECT_CHANNELS_SHIFT 6
349 #define ESM_APU_EFFECT_CHANNELS_MASK (3 << 6)
352 #define ESM_APU_STEP_SIZE_MASK 0x0fff
355 #define ESM_APU_PHASE_SHIFT 0
356 #define ESM_APU_PHASE_MASK (0xff << 0)
357 #define ESM_APU_WAVE64K_PAGE_SHIFT 8 /* most 8bit of wave start offset */
358 #define ESM_APU_WAVE64K_PAGE_MASK (0xff << 8)
360 /* reg 0x05 - wave start offset */
361 /* reg 0x06 - wave end offset */
362 /* reg 0x07 - wave loop length */
365 #define ESM_APU_EFFECT_GAIN_SHIFT 0
366 #define ESM_APU_EFFECT_GAIN_MASK (0xff << 0)
367 #define ESM_APU_TREMOLO_DEPTH_SHIFT 8
368 #define ESM_APU_TREMOLO_DEPTH_MASK (0xf << 8)
369 #define ESM_APU_TREMOLO_RATE_SHIFT 12
370 #define ESM_APU_TREMOLO_RATE_MASK (0xf << 12)
373 /* bit 0-7 amplitude dest? */
374 #define ESM_APU_AMPLITUDE_NOW_SHIFT 8
375 #define ESM_APU_AMPLITUDE_NOW_MASK (0xff << 8)
378 #define ESM_APU_POLAR_PAN_SHIFT 0
379 #define ESM_APU_POLAR_PAN_MASK (0x3f << 0)
380 /* Polar Pan Control */
381 #define ESM_APU_PAN_CENTER_CIRCLE 0x00
382 #define ESM_APU_PAN_MIDDLE_RADIUS 0x01
383 #define ESM_APU_PAN_OUTSIDE_RADIUS 0x02
385 #define ESM_APU_FILTER_TUNING_SHIFT 8
386 #define ESM_APU_FILTER_TUNING_MASK (0xff << 8)
389 #define ESM_APU_DATA_SRC_A_SHIFT 0
390 #define ESM_APU_DATA_SRC_A_MASK (0x7f << 0)
391 #define ESM_APU_INV_POL_A (1 << 7)
392 #define ESM_APU_DATA_SRC_B_SHIFT 8
393 #define ESM_APU_DATA_SRC_B_MASK (0x7f << 8)
394 #define ESM_APU_INV_POL_B (1 << 15)
396 #define ESM_APU_VIBRATO_RATE_SHIFT 0
397 #define ESM_APU_VIBRATO_RATE_MASK (0xf << 0)
398 #define ESM_APU_VIBRATO_DEPTH_SHIFT 4
399 #define ESM_APU_VIBRATO_DEPTH_MASK (0xf << 4)
400 #define ESM_APU_VIBRATO_PHASE_SHIFT 8
401 #define ESM_APU_VIBRATO_PHASE_MASK (0xff << 8)
404 #define ESM_APU_RADIUS_SELECT (1 << 6)
406 /* APU Filter Control */
407 #define ESM_APU_FILTER_2POLE_LOPASS 0x00
408 #define ESM_APU_FILTER_2POLE_BANDPASS 0x01
409 #define ESM_APU_FILTER_2POLE_HIPASS 0x02
410 #define ESM_APU_FILTER_1POLE_LOPASS 0x03
411 #define ESM_APU_FILTER_1POLE_HIPASS 0x04
412 #define ESM_APU_FILTER_OFF 0x05
415 #define ESM_APU_ATFP_AMPLITUDE 0x00
416 #define ESM_APU_ATFP_TREMELO 0x01
417 #define ESM_APU_ATFP_FILTER 0x02
418 #define ESM_APU_ATFP_PAN 0x03
421 #define ESM_APU_ATFP_FLG_OFF 0x00
422 #define ESM_APU_ATFP_FLG_WAIT 0x01
423 #define ESM_APU_ATFP_FLG_DONE 0x02
424 #define ESM_APU_ATFP_FLG_INPROCESS 0x03
427 /* capture mixing buffer size */
428 #define ESM_MEM_ALIGN 0x1000
429 #define ESM_MIXBUF_SIZE 0x400
431 #define ESM_MODE_PLAY 0
432 #define ESM_MODE_CAPTURE 1
435 /* APU use in the driver */
436 enum snd_enum_apu_type {
439 ESM_APU_PCM_RATECONV,
445 TYPE_MAESTRO, TYPE_MAESTRO2, TYPE_MAESTRO2E
450 struct snd_dma_buffer buf;
451 int empty; /* status */
452 struct list_head list;
455 /* Playback Channel */
462 /* playback/capture pcm buffer */
463 struct esm_memory *memory;
464 /* capture mixer buffer */
465 struct esm_memory *mixbuf;
467 unsigned int hwptr; /* current hw pointer in bytes */
468 unsigned int count; /* sample counter in bytes */
469 unsigned int dma_size; /* total buffer size in bytes */
470 unsigned int frag_size; /* period size in bytes */
471 unsigned int wav_shift;
472 u16 base[4]; /* offset for ptr */
474 /* stereo/16bit flag */
476 int mode; /* playback / capture */
478 int bob_freq; /* required timer frequency */
480 struct snd_pcm_substream *substream;
483 struct list_head list;
492 int total_bufsize; /* in bytes */
494 int playback_streams, capture_streams;
496 unsigned int clock; /* clock */
497 /* for clock measurement */
498 unsigned int in_measurement: 1;
499 unsigned int measure_apu;
500 unsigned int measure_lastpos;
501 unsigned int measure_count;
504 struct snd_dma_buffer dma;
508 unsigned long io_port;
511 struct snd_card *card;
513 int do_pm; /* power-management enabled */
515 /* DMA memory block */
516 struct list_head buf_list;
519 struct snd_ac97 *ac97;
520 struct snd_kcontrol *master_switch; /* for h/w volume control */
521 struct snd_kcontrol *master_volume;
523 struct snd_rawmidi *rmidi;
526 spinlock_t ac97_lock;
527 struct tasklet_struct hwvol_tq;
528 unsigned int in_suspend;
532 int bobclient; /* active timer instancs */
533 int bob_freq; /* timer frequency */
534 struct mutex memory_mutex; /* memory lock */
537 unsigned char apu[NR_APUS];
539 /* active substreams */
540 struct list_head substream_list;
541 spinlock_t substream_lock;
544 u16 apu_map[NR_APUS][NR_APU_REGS];
547 #ifdef SUPPORT_JOYSTICK
548 struct gameport *gameport;
552 static irqreturn_t snd_es1968_interrupt(int irq, void *dev_id);
554 static struct pci_device_id snd_es1968_ids[] = {
556 { 0x1285, 0x0100, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO },
558 { 0x125d, 0x1968, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO2 },
560 { 0x125d, 0x1978, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO2E },
564 MODULE_DEVICE_TABLE(pci, snd_es1968_ids);
566 /* *********************
568 *********************/
571 static void __maestro_write(struct es1968 *chip, u16 reg, u16 data)
573 outw(reg, chip->io_port + ESM_INDEX);
574 outw(data, chip->io_port + ESM_DATA);
575 chip->maestro_map[reg] = data;
578 static inline void maestro_write(struct es1968 *chip, u16 reg, u16 data)
581 spin_lock_irqsave(&chip->reg_lock, flags);
582 __maestro_write(chip, reg, data);
583 spin_unlock_irqrestore(&chip->reg_lock, flags);
587 static u16 __maestro_read(struct es1968 *chip, u16 reg)
589 if (READABLE_MAP & (1 << reg)) {
590 outw(reg, chip->io_port + ESM_INDEX);
591 chip->maestro_map[reg] = inw(chip->io_port + ESM_DATA);
593 return chip->maestro_map[reg];
596 static inline u16 maestro_read(struct es1968 *chip, u16 reg)
600 spin_lock_irqsave(&chip->reg_lock, flags);
601 result = __maestro_read(chip, reg);
602 spin_unlock_irqrestore(&chip->reg_lock, flags);
606 /* Wait for the codec bus to be free */
607 static int snd_es1968_ac97_wait(struct es1968 *chip)
609 int timeout = 100000;
611 while (timeout-- > 0) {
612 if (!(inb(chip->io_port + ESM_AC97_INDEX) & 1))
616 snd_printd("es1968: ac97 timeout\n");
617 return 1; /* timeout */
620 static void snd_es1968_ac97_write(struct snd_ac97 *ac97, unsigned short reg, unsigned short val)
622 struct es1968 *chip = ac97->private_data;
625 snd_es1968_ac97_wait(chip);
628 spin_lock_irqsave(&chip->ac97_lock, flags);
629 outw(val, chip->io_port + ESM_AC97_DATA);
631 outb(reg, chip->io_port + ESM_AC97_INDEX);
633 spin_unlock_irqrestore(&chip->ac97_lock, flags);
636 static unsigned short snd_es1968_ac97_read(struct snd_ac97 *ac97, unsigned short reg)
639 struct es1968 *chip = ac97->private_data;
642 snd_es1968_ac97_wait(chip);
644 spin_lock_irqsave(&chip->ac97_lock, flags);
645 outb(reg | 0x80, chip->io_port + ESM_AC97_INDEX);
648 if (! snd_es1968_ac97_wait(chip)) {
649 data = inw(chip->io_port + ESM_AC97_DATA);
652 spin_unlock_irqrestore(&chip->ac97_lock, flags);
658 static void apu_index_set(struct es1968 *chip, u16 index)
661 __maestro_write(chip, IDR1_CRAM_POINTER, index);
662 for (i = 0; i < 1000; i++)
663 if (__maestro_read(chip, IDR1_CRAM_POINTER) == index)
665 snd_printd("es1968: APU register select failed. (Timeout)\n");
669 static void apu_data_set(struct es1968 *chip, u16 data)
672 for (i = 0; i < 1000; i++) {
673 if (__maestro_read(chip, IDR0_DATA_PORT) == data)
675 __maestro_write(chip, IDR0_DATA_PORT, data);
677 snd_printd("es1968: APU register set probably failed (Timeout)!\n");
681 static void __apu_set_register(struct es1968 *chip, u16 channel, u8 reg, u16 data)
683 snd_assert(channel < NR_APUS, return);
685 chip->apu_map[channel][reg] = data;
687 reg |= (channel << 4);
688 apu_index_set(chip, reg);
689 apu_data_set(chip, data);
692 static void apu_set_register(struct es1968 *chip, u16 channel, u8 reg, u16 data)
695 spin_lock_irqsave(&chip->reg_lock, flags);
696 __apu_set_register(chip, channel, reg, data);
697 spin_unlock_irqrestore(&chip->reg_lock, flags);
700 static u16 __apu_get_register(struct es1968 *chip, u16 channel, u8 reg)
702 snd_assert(channel < NR_APUS, return 0);
703 reg |= (channel << 4);
704 apu_index_set(chip, reg);
705 return __maestro_read(chip, IDR0_DATA_PORT);
708 static u16 apu_get_register(struct es1968 *chip, u16 channel, u8 reg)
712 spin_lock_irqsave(&chip->reg_lock, flags);
713 v = __apu_get_register(chip, channel, reg);
714 spin_unlock_irqrestore(&chip->reg_lock, flags);
718 #if 0 /* ASSP is not supported */
720 static void assp_set_register(struct es1968 *chip, u32 reg, u32 value)
724 spin_lock_irqsave(&chip->reg_lock, flags);
725 outl(reg, chip->io_port + ASSP_INDEX);
726 outl(value, chip->io_port + ASSP_DATA);
727 spin_unlock_irqrestore(&chip->reg_lock, flags);
730 static u32 assp_get_register(struct es1968 *chip, u32 reg)
735 spin_lock_irqsave(&chip->reg_lock, flags);
736 outl(reg, chip->io_port + ASSP_INDEX);
737 value = inl(chip->io_port + ASSP_DATA);
738 spin_unlock_irqrestore(&chip->reg_lock, flags);
745 static void wave_set_register(struct es1968 *chip, u16 reg, u16 value)
749 spin_lock_irqsave(&chip->reg_lock, flags);
750 outw(reg, chip->io_port + WC_INDEX);
751 outw(value, chip->io_port + WC_DATA);
752 spin_unlock_irqrestore(&chip->reg_lock, flags);
755 static u16 wave_get_register(struct es1968 *chip, u16 reg)
760 spin_lock_irqsave(&chip->reg_lock, flags);
761 outw(reg, chip->io_port + WC_INDEX);
762 value = inw(chip->io_port + WC_DATA);
763 spin_unlock_irqrestore(&chip->reg_lock, flags);
768 /* *******************
772 static void snd_es1968_bob_stop(struct es1968 *chip)
776 reg = __maestro_read(chip, 0x11);
777 reg &= ~ESM_BOB_ENABLE;
778 __maestro_write(chip, 0x11, reg);
779 reg = __maestro_read(chip, 0x17);
780 reg &= ~ESM_BOB_START;
781 __maestro_write(chip, 0x17, reg);
784 static void snd_es1968_bob_start(struct es1968 *chip)
789 /* compute ideal interrupt frequency for buffer size & play rate */
790 /* first, find best prescaler value to match freq */
791 for (prescale = 5; prescale < 12; prescale++)
792 if (chip->bob_freq > (ESS_SYSCLK >> (prescale + 9)))
795 /* next, back off prescaler whilst getting divider into optimum range */
797 while ((prescale > 5) && (divide < 32)) {
803 /* now fine-tune the divider for best match */
804 for (; divide < 31; divide++)
806 ((ESS_SYSCLK >> (prescale + 9)) / (divide + 1))) break;
808 /* divide = 0 is illegal, but don't let prescale = 4! */
813 } else if (divide > 1)
816 __maestro_write(chip, 6, 0x9000 | (prescale << 5) | divide); /* set reg */
818 /* Now set IDR 11/17 */
819 __maestro_write(chip, 0x11, __maestro_read(chip, 0x11) | 1);
820 __maestro_write(chip, 0x17, __maestro_read(chip, 0x17) | 1);
823 /* call with substream spinlock */
824 static void snd_es1968_bob_inc(struct es1968 *chip, int freq)
827 if (chip->bobclient == 1) {
828 chip->bob_freq = freq;
829 snd_es1968_bob_start(chip);
830 } else if (chip->bob_freq < freq) {
831 snd_es1968_bob_stop(chip);
832 chip->bob_freq = freq;
833 snd_es1968_bob_start(chip);
837 /* call with substream spinlock */
838 static void snd_es1968_bob_dec(struct es1968 *chip)
841 if (chip->bobclient <= 0)
842 snd_es1968_bob_stop(chip);
843 else if (chip->bob_freq > ESM_BOB_FREQ) {
844 /* check reduction of timer frequency */
845 int max_freq = ESM_BOB_FREQ;
847 list_for_each_entry(es, &chip->substream_list, list) {
848 if (max_freq < es->bob_freq)
849 max_freq = es->bob_freq;
851 if (max_freq != chip->bob_freq) {
852 snd_es1968_bob_stop(chip);
853 chip->bob_freq = max_freq;
854 snd_es1968_bob_start(chip);
860 snd_es1968_calc_bob_rate(struct es1968 *chip, struct esschan *es,
861 struct snd_pcm_runtime *runtime)
863 /* we acquire 4 interrupts per period for precise control.. */
864 int freq = runtime->rate * 4;
865 if (es->fmt & ESS_FMT_STEREO)
867 if (es->fmt & ESS_FMT_16BIT)
869 freq /= es->frag_size;
870 if (freq < ESM_BOB_FREQ)
872 else if (freq > ESM_BOB_FREQ_MAX)
873 freq = ESM_BOB_FREQ_MAX;
882 static u32 snd_es1968_compute_rate(struct es1968 *chip, u32 freq)
884 u32 rate = (freq << 16) / chip->clock;
885 #if 0 /* XXX: do we need this? */
892 /* get current pointer */
893 static inline unsigned int
894 snd_es1968_get_dma_ptr(struct es1968 *chip, struct esschan *es)
898 offset = apu_get_register(chip, es->apu[0], 5);
900 offset -= es->base[0];
902 return (offset & 0xFFFE); /* hardware is in words */
905 static void snd_es1968_apu_set_freq(struct es1968 *chip, int apu, int freq)
907 apu_set_register(chip, apu, 2,
908 (apu_get_register(chip, apu, 2) & 0x00FF) |
909 ((freq & 0xff) << 8) | 0x10);
910 apu_set_register(chip, apu, 3, freq >> 8);
914 static inline void snd_es1968_trigger_apu(struct es1968 *esm, int apu, int mode)
916 /* set the APU mode */
917 __apu_set_register(esm, apu, 0,
918 (__apu_get_register(esm, apu, 0) & 0xff0f) |
922 static void snd_es1968_pcm_start(struct es1968 *chip, struct esschan *es)
924 spin_lock(&chip->reg_lock);
925 __apu_set_register(chip, es->apu[0], 5, es->base[0]);
926 snd_es1968_trigger_apu(chip, es->apu[0], es->apu_mode[0]);
927 if (es->mode == ESM_MODE_CAPTURE) {
928 __apu_set_register(chip, es->apu[2], 5, es->base[2]);
929 snd_es1968_trigger_apu(chip, es->apu[2], es->apu_mode[2]);
931 if (es->fmt & ESS_FMT_STEREO) {
932 __apu_set_register(chip, es->apu[1], 5, es->base[1]);
933 snd_es1968_trigger_apu(chip, es->apu[1], es->apu_mode[1]);
934 if (es->mode == ESM_MODE_CAPTURE) {
935 __apu_set_register(chip, es->apu[3], 5, es->base[3]);
936 snd_es1968_trigger_apu(chip, es->apu[3], es->apu_mode[3]);
939 spin_unlock(&chip->reg_lock);
942 static void snd_es1968_pcm_stop(struct es1968 *chip, struct esschan *es)
944 spin_lock(&chip->reg_lock);
945 snd_es1968_trigger_apu(chip, es->apu[0], 0);
946 snd_es1968_trigger_apu(chip, es->apu[1], 0);
947 if (es->mode == ESM_MODE_CAPTURE) {
948 snd_es1968_trigger_apu(chip, es->apu[2], 0);
949 snd_es1968_trigger_apu(chip, es->apu[3], 0);
951 spin_unlock(&chip->reg_lock);
954 /* set the wavecache control reg */
955 static void snd_es1968_program_wavecache(struct es1968 *chip, struct esschan *es,
956 int channel, u32 addr, int capture)
958 u32 tmpval = (addr - 0x10) & 0xFFF8;
961 if (!(es->fmt & ESS_FMT_16BIT))
962 tmpval |= 4; /* 8bit */
963 if (es->fmt & ESS_FMT_STEREO)
964 tmpval |= 2; /* stereo */
967 /* set the wavecache control reg */
968 wave_set_register(chip, es->apu[channel] << 3, tmpval);
971 es->wc_map[channel] = tmpval;
976 static void snd_es1968_playback_setup(struct es1968 *chip, struct esschan *es,
977 struct snd_pcm_runtime *runtime)
986 size = es->dma_size >> es->wav_shift;
988 if (es->fmt & ESS_FMT_STEREO)
991 for (channel = 0; channel <= high_apu; channel++) {
992 apu = es->apu[channel];
994 snd_es1968_program_wavecache(chip, es, channel, es->memory->buf.addr, 0);
996 /* Offset to PCMBAR */
997 pa = es->memory->buf.addr;
998 pa -= chip->dma.addr;
999 pa >>= 1; /* words */
1001 pa |= 0x00400000; /* System RAM (Bit 22) */
1003 if (es->fmt & ESS_FMT_STEREO) {
1006 pa |= 0x00800000; /* (Bit 23) */
1007 if (es->fmt & ESS_FMT_16BIT)
1011 /* base offset of dma calcs when reading the pointer
1013 es->base[channel] = pa & 0xFFFF;
1015 for (i = 0; i < 16; i++)
1016 apu_set_register(chip, apu, i, 0x0000);
1018 /* Load the buffer into the wave engine */
1019 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xFF) << 8);
1020 apu_set_register(chip, apu, 5, pa & 0xFFFF);
1021 apu_set_register(chip, apu, 6, (pa + size) & 0xFFFF);
1022 /* setting loop == sample len */
1023 apu_set_register(chip, apu, 7, size);
1025 /* clear effects/env.. */
1026 apu_set_register(chip, apu, 8, 0x0000);
1027 /* set amp now to 0xd0 (?), low byte is 'amplitude dest'? */
1028 apu_set_register(chip, apu, 9, 0xD000);
1030 /* clear routing stuff */
1031 apu_set_register(chip, apu, 11, 0x0000);
1032 /* dma on, no envelopes, filter to all 1s) */
1033 apu_set_register(chip, apu, 0, 0x400F);
1035 if (es->fmt & ESS_FMT_16BIT)
1036 es->apu_mode[channel] = ESM_APU_16BITLINEAR;
1038 es->apu_mode[channel] = ESM_APU_8BITLINEAR;
1040 if (es->fmt & ESS_FMT_STEREO) {
1041 /* set panning: left or right */
1042 /* Check: different panning. On my Canyon 3D Chipset the
1043 Channels are swapped. I don't know, about the output
1044 to the SPDif Link. Perhaps you have to change this
1045 and not the APU Regs 4-5. */
1046 apu_set_register(chip, apu, 10,
1047 0x8F00 | (channel ? 0 : 0x10));
1048 es->apu_mode[channel] += 1; /* stereo */
1050 apu_set_register(chip, apu, 10, 0x8F08);
1053 spin_lock_irqsave(&chip->reg_lock, flags);
1054 /* clear WP interrupts */
1055 outw(1, chip->io_port + 0x04);
1056 /* enable WP ints */
1057 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ);
1058 spin_unlock_irqrestore(&chip->reg_lock, flags);
1060 freq = runtime->rate;
1068 if (!(es->fmt & ESS_FMT_16BIT) && !(es->fmt & ESS_FMT_STEREO))
1071 freq = snd_es1968_compute_rate(chip, freq);
1073 /* Load the frequency, turn on 6dB */
1074 snd_es1968_apu_set_freq(chip, es->apu[0], freq);
1075 snd_es1968_apu_set_freq(chip, es->apu[1], freq);
1079 static void init_capture_apu(struct es1968 *chip, struct esschan *es, int channel,
1080 unsigned int pa, unsigned int bsize,
1081 int mode, int route)
1083 int i, apu = es->apu[channel];
1085 es->apu_mode[channel] = mode;
1087 /* set the wavecache control reg */
1088 snd_es1968_program_wavecache(chip, es, channel, pa, 1);
1090 /* Offset to PCMBAR */
1091 pa -= chip->dma.addr;
1092 pa >>= 1; /* words */
1094 /* base offset of dma calcs when reading the pointer
1096 es->base[channel] = pa & 0xFFFF;
1097 pa |= 0x00400000; /* bit 22 -> System RAM */
1099 /* Begin loading the APU */
1100 for (i = 0; i < 16; i++)
1101 apu_set_register(chip, apu, i, 0x0000);
1103 /* need to enable subgroups.. and we should probably
1104 have different groups for different /dev/dsps.. */
1105 apu_set_register(chip, apu, 2, 0x8);
1107 /* Load the buffer into the wave engine */
1108 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xFF) << 8);
1109 apu_set_register(chip, apu, 5, pa & 0xFFFF);
1110 apu_set_register(chip, apu, 6, (pa + bsize) & 0xFFFF);
1111 apu_set_register(chip, apu, 7, bsize);
1112 /* clear effects/env.. */
1113 apu_set_register(chip, apu, 8, 0x00F0);
1114 /* amplitude now? sure. why not. */
1115 apu_set_register(chip, apu, 9, 0x0000);
1116 /* set filter tune, radius, polar pan */
1117 apu_set_register(chip, apu, 10, 0x8F08);
1119 apu_set_register(chip, apu, 11, route);
1120 /* dma on, no envelopes, filter to all 1s) */
1121 apu_set_register(chip, apu, 0, 0x400F);
1124 static void snd_es1968_capture_setup(struct es1968 *chip, struct esschan *es,
1125 struct snd_pcm_runtime *runtime)
1129 unsigned long flags;
1131 size = es->dma_size >> es->wav_shift;
1136 2 = mono/left Input Mixer
1137 3 = right Input Mixer
1139 /* data seems to flow from the codec, through an apu into
1140 the 'mixbuf' bit of page, then through the SRC apu
1141 and out to the real 'buffer'. ok. sure. */
1143 /* input mixer (left/mono) */
1144 /* parallel in crap, see maestro reg 0xC [8-11] */
1145 init_capture_apu(chip, es, 2,
1146 es->mixbuf->buf.addr, ESM_MIXBUF_SIZE/4, /* in words */
1147 ESM_APU_INPUTMIXER, 0x14);
1148 /* SRC (left/mono); get input from inputing apu */
1149 init_capture_apu(chip, es, 0, es->memory->buf.addr, size,
1150 ESM_APU_SRCONVERTOR, es->apu[2]);
1151 if (es->fmt & ESS_FMT_STEREO) {
1152 /* input mixer (right) */
1153 init_capture_apu(chip, es, 3,
1154 es->mixbuf->buf.addr + ESM_MIXBUF_SIZE/2,
1155 ESM_MIXBUF_SIZE/4, /* in words */
1156 ESM_APU_INPUTMIXER, 0x15);
1158 init_capture_apu(chip, es, 1,
1159 es->memory->buf.addr + size*2, size,
1160 ESM_APU_SRCONVERTOR, es->apu[3]);
1163 freq = runtime->rate;
1164 /* Sample Rate conversion APUs don't like 0x10000 for their rate */
1170 freq = snd_es1968_compute_rate(chip, freq);
1172 /* Load the frequency, turn on 6dB */
1173 snd_es1968_apu_set_freq(chip, es->apu[0], freq);
1174 snd_es1968_apu_set_freq(chip, es->apu[1], freq);
1176 /* fix mixer rate at 48khz. and its _must_ be 0x10000. */
1178 snd_es1968_apu_set_freq(chip, es->apu[2], freq);
1179 snd_es1968_apu_set_freq(chip, es->apu[3], freq);
1181 spin_lock_irqsave(&chip->reg_lock, flags);
1182 /* clear WP interrupts */
1183 outw(1, chip->io_port + 0x04);
1184 /* enable WP ints */
1185 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ);
1186 spin_unlock_irqrestore(&chip->reg_lock, flags);
1189 /*******************
1191 *******************/
1193 static int snd_es1968_pcm_prepare(struct snd_pcm_substream *substream)
1195 struct es1968 *chip = snd_pcm_substream_chip(substream);
1196 struct snd_pcm_runtime *runtime = substream->runtime;
1197 struct esschan *es = runtime->private_data;
1199 es->dma_size = snd_pcm_lib_buffer_bytes(substream);
1200 es->frag_size = snd_pcm_lib_period_bytes(substream);
1202 es->wav_shift = 1; /* maestro handles always 16bit */
1204 if (snd_pcm_format_width(runtime->format) == 16)
1205 es->fmt |= ESS_FMT_16BIT;
1206 if (runtime->channels > 1) {
1207 es->fmt |= ESS_FMT_STEREO;
1208 if (es->fmt & ESS_FMT_16BIT) /* 8bit is already word shifted */
1211 es->bob_freq = snd_es1968_calc_bob_rate(chip, es, runtime);
1215 snd_es1968_playback_setup(chip, es, runtime);
1217 case ESM_MODE_CAPTURE:
1218 snd_es1968_capture_setup(chip, es, runtime);
1225 static int snd_es1968_pcm_trigger(struct snd_pcm_substream *substream, int cmd)
1227 struct es1968 *chip = snd_pcm_substream_chip(substream);
1228 struct esschan *es = substream->runtime->private_data;
1230 spin_lock(&chip->substream_lock);
1232 case SNDRV_PCM_TRIGGER_START:
1233 case SNDRV_PCM_TRIGGER_RESUME:
1236 snd_es1968_bob_inc(chip, es->bob_freq);
1239 snd_es1968_pcm_start(chip, es);
1242 case SNDRV_PCM_TRIGGER_STOP:
1243 case SNDRV_PCM_TRIGGER_SUSPEND:
1246 snd_es1968_pcm_stop(chip, es);
1248 snd_es1968_bob_dec(chip);
1251 spin_unlock(&chip->substream_lock);
1255 static snd_pcm_uframes_t snd_es1968_pcm_pointer(struct snd_pcm_substream *substream)
1257 struct es1968 *chip = snd_pcm_substream_chip(substream);
1258 struct esschan *es = substream->runtime->private_data;
1261 ptr = snd_es1968_get_dma_ptr(chip, es) << es->wav_shift;
1263 return bytes_to_frames(substream->runtime, ptr % es->dma_size);
1266 static struct snd_pcm_hardware snd_es1968_playback = {
1267 .info = (SNDRV_PCM_INFO_MMAP |
1268 SNDRV_PCM_INFO_MMAP_VALID |
1269 SNDRV_PCM_INFO_INTERLEAVED |
1270 SNDRV_PCM_INFO_BLOCK_TRANSFER |
1271 /*SNDRV_PCM_INFO_PAUSE |*/
1272 SNDRV_PCM_INFO_RESUME),
1273 .formats = SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE,
1274 .rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
1279 .buffer_bytes_max = 65536,
1280 .period_bytes_min = 256,
1281 .period_bytes_max = 65536,
1283 .periods_max = 1024,
1287 static struct snd_pcm_hardware snd_es1968_capture = {
1288 .info = (SNDRV_PCM_INFO_NONINTERLEAVED |
1289 SNDRV_PCM_INFO_MMAP |
1290 SNDRV_PCM_INFO_MMAP_VALID |
1291 SNDRV_PCM_INFO_BLOCK_TRANSFER |
1292 /*SNDRV_PCM_INFO_PAUSE |*/
1293 SNDRV_PCM_INFO_RESUME),
1294 .formats = /*SNDRV_PCM_FMTBIT_U8 |*/ SNDRV_PCM_FMTBIT_S16_LE,
1295 .rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
1300 .buffer_bytes_max = 65536,
1301 .period_bytes_min = 256,
1302 .period_bytes_max = 65536,
1304 .periods_max = 1024,
1308 /* *************************
1309 * DMA memory management *
1310 *************************/
1312 /* Because the Maestro can only take addresses relative to the PCM base address
1315 static int calc_available_memory_size(struct es1968 *chip)
1318 struct esm_memory *buf;
1320 mutex_lock(&chip->memory_mutex);
1321 list_for_each_entry(buf, &chip->buf_list, list) {
1322 if (buf->empty && buf->buf.bytes > max_size)
1323 max_size = buf->buf.bytes;
1325 mutex_unlock(&chip->memory_mutex);
1326 if (max_size >= 128*1024)
1327 max_size = 127*1024;
1331 /* allocate a new memory chunk with the specified size */
1332 static struct esm_memory *snd_es1968_new_memory(struct es1968 *chip, int size)
1334 struct esm_memory *buf;
1336 size = ALIGN(size, ESM_MEM_ALIGN);
1337 mutex_lock(&chip->memory_mutex);
1338 list_for_each_entry(buf, &chip->buf_list, list) {
1339 if (buf->empty && buf->buf.bytes >= size)
1342 mutex_unlock(&chip->memory_mutex);
1346 if (buf->buf.bytes > size) {
1347 struct esm_memory *chunk = kmalloc(sizeof(*chunk), GFP_KERNEL);
1348 if (chunk == NULL) {
1349 mutex_unlock(&chip->memory_mutex);
1352 chunk->buf = buf->buf;
1353 chunk->buf.bytes -= size;
1354 chunk->buf.area += size;
1355 chunk->buf.addr += size;
1357 buf->buf.bytes = size;
1358 list_add(&chunk->list, &buf->list);
1361 mutex_unlock(&chip->memory_mutex);
1365 /* free a memory chunk */
1366 static void snd_es1968_free_memory(struct es1968 *chip, struct esm_memory *buf)
1368 struct esm_memory *chunk;
1370 mutex_lock(&chip->memory_mutex);
1372 if (buf->list.prev != &chip->buf_list) {
1373 chunk = list_entry(buf->list.prev, struct esm_memory, list);
1375 chunk->buf.bytes += buf->buf.bytes;
1376 list_del(&buf->list);
1381 if (buf->list.next != &chip->buf_list) {
1382 chunk = list_entry(buf->list.next, struct esm_memory, list);
1384 buf->buf.bytes += chunk->buf.bytes;
1385 list_del(&chunk->list);
1389 mutex_unlock(&chip->memory_mutex);
1392 static void snd_es1968_free_dmabuf(struct es1968 *chip)
1394 struct list_head *p;
1396 if (! chip->dma.area)
1398 snd_dma_reserve_buf(&chip->dma, snd_dma_pci_buf_id(chip->pci));
1399 while ((p = chip->buf_list.next) != &chip->buf_list) {
1400 struct esm_memory *chunk = list_entry(p, struct esm_memory, list);
1406 static int __devinit
1407 snd_es1968_init_dmabuf(struct es1968 *chip)
1410 struct esm_memory *chunk;
1412 chip->dma.dev.type = SNDRV_DMA_TYPE_DEV;
1413 chip->dma.dev.dev = snd_dma_pci_data(chip->pci);
1414 if (! snd_dma_get_reserved_buf(&chip->dma, snd_dma_pci_buf_id(chip->pci))) {
1415 err = snd_dma_alloc_pages_fallback(SNDRV_DMA_TYPE_DEV,
1416 snd_dma_pci_data(chip->pci),
1417 chip->total_bufsize, &chip->dma);
1418 if (err < 0 || ! chip->dma.area) {
1419 snd_printk(KERN_ERR "es1968: can't allocate dma pages for size %d\n",
1420 chip->total_bufsize);
1423 if ((chip->dma.addr + chip->dma.bytes - 1) & ~((1 << 28) - 1)) {
1424 snd_dma_free_pages(&chip->dma);
1425 snd_printk(KERN_ERR "es1968: DMA buffer beyond 256MB.\n");
1430 INIT_LIST_HEAD(&chip->buf_list);
1431 /* allocate an empty chunk */
1432 chunk = kmalloc(sizeof(*chunk), GFP_KERNEL);
1433 if (chunk == NULL) {
1434 snd_es1968_free_dmabuf(chip);
1437 memset(chip->dma.area, 0, ESM_MEM_ALIGN);
1438 chunk->buf = chip->dma;
1439 chunk->buf.area += ESM_MEM_ALIGN;
1440 chunk->buf.addr += ESM_MEM_ALIGN;
1441 chunk->buf.bytes -= ESM_MEM_ALIGN;
1443 list_add(&chunk->list, &chip->buf_list);
1448 /* setup the dma_areas */
1449 /* buffer is extracted from the pre-allocated memory chunk */
1450 static int snd_es1968_hw_params(struct snd_pcm_substream *substream,
1451 struct snd_pcm_hw_params *hw_params)
1453 struct es1968 *chip = snd_pcm_substream_chip(substream);
1454 struct snd_pcm_runtime *runtime = substream->runtime;
1455 struct esschan *chan = runtime->private_data;
1456 int size = params_buffer_bytes(hw_params);
1459 if (chan->memory->buf.bytes >= size) {
1460 runtime->dma_bytes = size;
1463 snd_es1968_free_memory(chip, chan->memory);
1465 chan->memory = snd_es1968_new_memory(chip, size);
1466 if (chan->memory == NULL) {
1467 // snd_printd("cannot allocate dma buffer: size = %d\n", size);
1470 snd_pcm_set_runtime_buffer(substream, &chan->memory->buf);
1471 return 1; /* area was changed */
1474 /* remove dma areas if allocated */
1475 static int snd_es1968_hw_free(struct snd_pcm_substream *substream)
1477 struct es1968 *chip = snd_pcm_substream_chip(substream);
1478 struct snd_pcm_runtime *runtime = substream->runtime;
1479 struct esschan *chan;
1481 if (runtime->private_data == NULL)
1483 chan = runtime->private_data;
1485 snd_es1968_free_memory(chip, chan->memory);
1486 chan->memory = NULL;
1495 static int snd_es1968_alloc_apu_pair(struct es1968 *chip, int type)
1499 for (apu = 0; apu < NR_APUS; apu += 2) {
1500 if (chip->apu[apu] == ESM_APU_FREE &&
1501 chip->apu[apu + 1] == ESM_APU_FREE) {
1502 chip->apu[apu] = chip->apu[apu + 1] = type;
1512 static void snd_es1968_free_apu_pair(struct es1968 *chip, int apu)
1514 chip->apu[apu] = chip->apu[apu + 1] = ESM_APU_FREE;
1522 static int snd_es1968_playback_open(struct snd_pcm_substream *substream)
1524 struct es1968 *chip = snd_pcm_substream_chip(substream);
1525 struct snd_pcm_runtime *runtime = substream->runtime;
1530 apu1 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_PLAY);
1534 es = kzalloc(sizeof(*es), GFP_KERNEL);
1536 snd_es1968_free_apu_pair(chip, apu1);
1541 es->apu[1] = apu1 + 1;
1542 es->apu_mode[0] = 0;
1543 es->apu_mode[1] = 0;
1545 es->substream = substream;
1546 es->mode = ESM_MODE_PLAY;
1548 runtime->private_data = es;
1549 runtime->hw = snd_es1968_playback;
1550 runtime->hw.buffer_bytes_max = runtime->hw.period_bytes_max =
1551 calc_available_memory_size(chip);
1553 spin_lock_irq(&chip->substream_lock);
1554 list_add(&es->list, &chip->substream_list);
1555 spin_unlock_irq(&chip->substream_lock);
1560 static int snd_es1968_capture_open(struct snd_pcm_substream *substream)
1562 struct snd_pcm_runtime *runtime = substream->runtime;
1563 struct es1968 *chip = snd_pcm_substream_chip(substream);
1567 apu1 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_CAPTURE);
1570 apu2 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_RATECONV);
1572 snd_es1968_free_apu_pair(chip, apu1);
1576 es = kzalloc(sizeof(*es), GFP_KERNEL);
1578 snd_es1968_free_apu_pair(chip, apu1);
1579 snd_es1968_free_apu_pair(chip, apu2);
1584 es->apu[1] = apu1 + 1;
1586 es->apu[3] = apu2 + 1;
1587 es->apu_mode[0] = 0;
1588 es->apu_mode[1] = 0;
1589 es->apu_mode[2] = 0;
1590 es->apu_mode[3] = 0;
1592 es->substream = substream;
1593 es->mode = ESM_MODE_CAPTURE;
1596 if ((es->mixbuf = snd_es1968_new_memory(chip, ESM_MIXBUF_SIZE)) == NULL) {
1597 snd_es1968_free_apu_pair(chip, apu1);
1598 snd_es1968_free_apu_pair(chip, apu2);
1602 memset(es->mixbuf->buf.area, 0, ESM_MIXBUF_SIZE);
1604 runtime->private_data = es;
1605 runtime->hw = snd_es1968_capture;
1606 runtime->hw.buffer_bytes_max = runtime->hw.period_bytes_max =
1607 calc_available_memory_size(chip) - 1024; /* keep MIXBUF size */
1608 snd_pcm_hw_constraint_pow2(runtime, 0, SNDRV_PCM_HW_PARAM_BUFFER_BYTES);
1610 spin_lock_irq(&chip->substream_lock);
1611 list_add(&es->list, &chip->substream_list);
1612 spin_unlock_irq(&chip->substream_lock);
1617 static int snd_es1968_playback_close(struct snd_pcm_substream *substream)
1619 struct es1968 *chip = snd_pcm_substream_chip(substream);
1622 if (substream->runtime->private_data == NULL)
1624 es = substream->runtime->private_data;
1625 spin_lock_irq(&chip->substream_lock);
1626 list_del(&es->list);
1627 spin_unlock_irq(&chip->substream_lock);
1628 snd_es1968_free_apu_pair(chip, es->apu[0]);
1634 static int snd_es1968_capture_close(struct snd_pcm_substream *substream)
1636 struct es1968 *chip = snd_pcm_substream_chip(substream);
1639 if (substream->runtime->private_data == NULL)
1641 es = substream->runtime->private_data;
1642 spin_lock_irq(&chip->substream_lock);
1643 list_del(&es->list);
1644 spin_unlock_irq(&chip->substream_lock);
1645 snd_es1968_free_memory(chip, es->mixbuf);
1646 snd_es1968_free_apu_pair(chip, es->apu[0]);
1647 snd_es1968_free_apu_pair(chip, es->apu[2]);
1653 static struct snd_pcm_ops snd_es1968_playback_ops = {
1654 .open = snd_es1968_playback_open,
1655 .close = snd_es1968_playback_close,
1656 .ioctl = snd_pcm_lib_ioctl,
1657 .hw_params = snd_es1968_hw_params,
1658 .hw_free = snd_es1968_hw_free,
1659 .prepare = snd_es1968_pcm_prepare,
1660 .trigger = snd_es1968_pcm_trigger,
1661 .pointer = snd_es1968_pcm_pointer,
1664 static struct snd_pcm_ops snd_es1968_capture_ops = {
1665 .open = snd_es1968_capture_open,
1666 .close = snd_es1968_capture_close,
1667 .ioctl = snd_pcm_lib_ioctl,
1668 .hw_params = snd_es1968_hw_params,
1669 .hw_free = snd_es1968_hw_free,
1670 .prepare = snd_es1968_pcm_prepare,
1671 .trigger = snd_es1968_pcm_trigger,
1672 .pointer = snd_es1968_pcm_pointer,
1679 #define CLOCK_MEASURE_BUFSIZE 16768 /* enough large for a single shot */
1681 static void __devinit es1968_measure_clock(struct es1968 *chip)
1684 unsigned int pa, offset, t;
1685 struct esm_memory *memory;
1686 struct timeval start_time, stop_time;
1688 if (chip->clock == 0)
1689 chip->clock = 48000; /* default clock value */
1691 /* search 2 APUs (although one apu is enough) */
1692 if ((apu = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_PLAY)) < 0) {
1693 snd_printk(KERN_ERR "Hmm, cannot find empty APU pair!?\n");
1696 if ((memory = snd_es1968_new_memory(chip, CLOCK_MEASURE_BUFSIZE)) == NULL) {
1697 snd_printk(KERN_ERR "cannot allocate dma buffer - using default clock %d\n", chip->clock);
1698 snd_es1968_free_apu_pair(chip, apu);
1702 memset(memory->buf.area, 0, CLOCK_MEASURE_BUFSIZE);
1704 wave_set_register(chip, apu << 3, (memory->buf.addr - 0x10) & 0xfff8);
1706 pa = (unsigned int)((memory->buf.addr - chip->dma.addr) >> 1);
1707 pa |= 0x00400000; /* System RAM (Bit 22) */
1709 /* initialize apu */
1710 for (i = 0; i < 16; i++)
1711 apu_set_register(chip, apu, i, 0x0000);
1713 apu_set_register(chip, apu, 0, 0x400f);
1714 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xff) << 8);
1715 apu_set_register(chip, apu, 5, pa & 0xffff);
1716 apu_set_register(chip, apu, 6, (pa + CLOCK_MEASURE_BUFSIZE/2) & 0xffff);
1717 apu_set_register(chip, apu, 7, CLOCK_MEASURE_BUFSIZE/2);
1718 apu_set_register(chip, apu, 8, 0x0000);
1719 apu_set_register(chip, apu, 9, 0xD000);
1720 apu_set_register(chip, apu, 10, 0x8F08);
1721 apu_set_register(chip, apu, 11, 0x0000);
1722 spin_lock_irq(&chip->reg_lock);
1723 outw(1, chip->io_port + 0x04); /* clear WP interrupts */
1724 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ); /* enable WP ints */
1725 spin_unlock_irq(&chip->reg_lock);
1727 snd_es1968_apu_set_freq(chip, apu, ((unsigned int)48000 << 16) / chip->clock); /* 48000 Hz */
1729 chip->in_measurement = 1;
1730 chip->measure_apu = apu;
1731 spin_lock_irq(&chip->reg_lock);
1732 snd_es1968_bob_inc(chip, ESM_BOB_FREQ);
1733 __apu_set_register(chip, apu, 5, pa & 0xffff);
1734 snd_es1968_trigger_apu(chip, apu, ESM_APU_16BITLINEAR);
1735 do_gettimeofday(&start_time);
1736 spin_unlock_irq(&chip->reg_lock);
1738 spin_lock_irq(&chip->reg_lock);
1739 offset = __apu_get_register(chip, apu, 5);
1740 do_gettimeofday(&stop_time);
1741 snd_es1968_trigger_apu(chip, apu, 0); /* stop */
1742 snd_es1968_bob_dec(chip);
1743 chip->in_measurement = 0;
1744 spin_unlock_irq(&chip->reg_lock);
1746 /* check the current position */
1747 offset -= (pa & 0xffff);
1749 offset += chip->measure_count * (CLOCK_MEASURE_BUFSIZE/2);
1751 t = stop_time.tv_sec - start_time.tv_sec;
1753 if (stop_time.tv_usec < start_time.tv_usec)
1754 t -= start_time.tv_usec - stop_time.tv_usec;
1756 t += stop_time.tv_usec - start_time.tv_usec;
1758 snd_printk(KERN_ERR "?? calculation error..\n");
1761 offset = (offset / t) * 1000 + ((offset % t) * 1000) / t;
1762 if (offset < 47500 || offset > 48500) {
1763 if (offset >= 40000 && offset <= 50000)
1764 chip->clock = (chip->clock * offset) / 48000;
1766 printk(KERN_INFO "es1968: clocking to %d\n", chip->clock);
1768 snd_es1968_free_memory(chip, memory);
1769 snd_es1968_free_apu_pair(chip, apu);
1776 static void snd_es1968_pcm_free(struct snd_pcm *pcm)
1778 struct es1968 *esm = pcm->private_data;
1779 snd_es1968_free_dmabuf(esm);
1783 static int __devinit
1784 snd_es1968_pcm(struct es1968 *chip, int device)
1786 struct snd_pcm *pcm;
1789 /* get DMA buffer */
1790 if ((err = snd_es1968_init_dmabuf(chip)) < 0)
1794 wave_set_register(chip, 0x01FC, chip->dma.addr >> 12);
1795 wave_set_register(chip, 0x01FD, chip->dma.addr >> 12);
1796 wave_set_register(chip, 0x01FE, chip->dma.addr >> 12);
1797 wave_set_register(chip, 0x01FF, chip->dma.addr >> 12);
1799 if ((err = snd_pcm_new(chip->card, "ESS Maestro", device,
1800 chip->playback_streams,
1801 chip->capture_streams, &pcm)) < 0)
1804 pcm->private_data = chip;
1805 pcm->private_free = snd_es1968_pcm_free;
1807 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_es1968_playback_ops);
1808 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_es1968_capture_ops);
1810 pcm->info_flags = 0;
1812 strcpy(pcm->name, "ESS Maestro");
1822 static void snd_es1968_update_pcm(struct es1968 *chip, struct esschan *es)
1826 struct snd_pcm_substream *subs = es->substream;
1828 if (subs == NULL || !es->running)
1831 hwptr = snd_es1968_get_dma_ptr(chip, es) << es->wav_shift;
1832 hwptr %= es->dma_size;
1834 diff = (es->dma_size + hwptr - es->hwptr) % es->dma_size;
1839 if (es->count > es->frag_size) {
1840 spin_unlock(&chip->substream_lock);
1841 snd_pcm_period_elapsed(subs);
1842 spin_lock(&chip->substream_lock);
1843 es->count %= es->frag_size;
1849 static void es1968_update_hw_volume(unsigned long private_data)
1851 struct es1968 *chip = (struct es1968 *) private_data;
1853 unsigned long flags;
1855 /* Figure out which volume control button was pushed,
1856 based on differences from the default register
1858 x = inb(chip->io_port + 0x1c) & 0xee;
1859 /* Reset the volume control registers. */
1860 outb(0x88, chip->io_port + 0x1c);
1861 outb(0x88, chip->io_port + 0x1d);
1862 outb(0x88, chip->io_port + 0x1e);
1863 outb(0x88, chip->io_port + 0x1f);
1865 if (chip->in_suspend)
1868 if (! chip->master_switch || ! chip->master_volume)
1871 /* FIXME: we can't call snd_ac97_* functions since here is in tasklet. */
1872 spin_lock_irqsave(&chip->ac97_lock, flags);
1873 val = chip->ac97->regs[AC97_MASTER];
1878 chip->ac97->regs[AC97_MASTER] = val;
1879 outw(val, chip->io_port + ESM_AC97_DATA);
1880 outb(AC97_MASTER, chip->io_port + ESM_AC97_INDEX);
1881 snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
1882 &chip->master_switch->id);
1886 if ((val & 0x7f) > 0)
1888 if ((val & 0x7f00) > 0)
1890 chip->ac97->regs[AC97_MASTER] = val;
1891 outw(val, chip->io_port + ESM_AC97_DATA);
1892 outb(AC97_MASTER, chip->io_port + ESM_AC97_INDEX);
1893 snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
1894 &chip->master_volume->id);
1898 if ((val & 0x7f) < 0x1f)
1900 if ((val & 0x7f00) < 0x1f00)
1902 chip->ac97->regs[AC97_MASTER] = val;
1903 outw(val, chip->io_port + ESM_AC97_DATA);
1904 outb(AC97_MASTER, chip->io_port + ESM_AC97_INDEX);
1905 snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
1906 &chip->master_volume->id);
1909 spin_unlock_irqrestore(&chip->ac97_lock, flags);
1915 static irqreturn_t snd_es1968_interrupt(int irq, void *dev_id)
1917 struct es1968 *chip = dev_id;
1920 if (!(event = inb(chip->io_port + 0x1A)))
1923 outw(inw(chip->io_port + 4) & 1, chip->io_port + 4);
1925 if (event & ESM_HWVOL_IRQ)
1926 tasklet_hi_schedule(&chip->hwvol_tq); /* we'll do this later */
1928 /* else ack 'em all, i imagine */
1929 outb(0xFF, chip->io_port + 0x1A);
1931 if ((event & ESM_MPU401_IRQ) && chip->rmidi) {
1932 snd_mpu401_uart_interrupt(irq, chip->rmidi->private_data);
1935 if (event & ESM_SOUND_IRQ) {
1937 spin_lock(&chip->substream_lock);
1938 list_for_each_entry(es, &chip->substream_list, list) {
1940 snd_es1968_update_pcm(chip, es);
1942 spin_unlock(&chip->substream_lock);
1943 if (chip->in_measurement) {
1944 unsigned int curp = __apu_get_register(chip, chip->measure_apu, 5);
1945 if (curp < chip->measure_lastpos)
1946 chip->measure_count++;
1947 chip->measure_lastpos = curp;
1958 static int __devinit
1959 snd_es1968_mixer(struct es1968 *chip)
1961 struct snd_ac97_bus *pbus;
1962 struct snd_ac97_template ac97;
1963 struct snd_ctl_elem_id id;
1965 static struct snd_ac97_bus_ops ops = {
1966 .write = snd_es1968_ac97_write,
1967 .read = snd_es1968_ac97_read,
1970 if ((err = snd_ac97_bus(chip->card, 0, &ops, NULL, &pbus)) < 0)
1972 pbus->no_vra = 1; /* ES1968 doesn't need VRA */
1974 memset(&ac97, 0, sizeof(ac97));
1975 ac97.private_data = chip;
1976 if ((err = snd_ac97_mixer(pbus, &ac97, &chip->ac97)) < 0)
1979 /* attach master switch / volumes for h/w volume control */
1980 memset(&id, 0, sizeof(id));
1981 id.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
1982 strcpy(id.name, "Master Playback Switch");
1983 chip->master_switch = snd_ctl_find_id(chip->card, &id);
1984 memset(&id, 0, sizeof(id));
1985 id.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
1986 strcpy(id.name, "Master Playback Volume");
1987 chip->master_volume = snd_ctl_find_id(chip->card, &id);
1996 static void snd_es1968_ac97_reset(struct es1968 *chip)
1998 unsigned long ioaddr = chip->io_port;
2000 unsigned short save_ringbus_a;
2001 unsigned short save_68;
2005 /* save configuration */
2006 save_ringbus_a = inw(ioaddr + 0x36);
2008 //outw(inw(ioaddr + 0x38) & 0xfffc, ioaddr + 0x38); /* clear second codec id? */
2009 /* set command/status address i/o to 1st codec */
2010 outw(inw(ioaddr + 0x3a) & 0xfffc, ioaddr + 0x3a);
2011 outw(inw(ioaddr + 0x3c) & 0xfffc, ioaddr + 0x3c);
2013 /* disable ac link */
2014 outw(0x0000, ioaddr + 0x36);
2015 save_68 = inw(ioaddr + 0x68);
2016 pci_read_config_word(chip->pci, 0x58, &w); /* something magical with gpio and bus arb. */
2017 pci_read_config_dword(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend);
2020 outw(0xfffe, ioaddr + 0x64); /* unmask gpio 0 */
2021 outw(0x0001, ioaddr + 0x68); /* gpio write */
2022 outw(0x0000, ioaddr + 0x60); /* write 0 to gpio 0 */
2024 outw(0x0001, ioaddr + 0x60); /* write 1 to gpio 1 */
2027 outw(save_68 | 0x1, ioaddr + 0x68); /* now restore .. */
2028 outw((inw(ioaddr + 0x38) & 0xfffc) | 0x1, ioaddr + 0x38);
2029 outw((inw(ioaddr + 0x3a) & 0xfffc) | 0x1, ioaddr + 0x3a);
2030 outw((inw(ioaddr + 0x3c) & 0xfffc) | 0x1, ioaddr + 0x3c);
2032 /* now the second codec */
2033 /* disable ac link */
2034 outw(0x0000, ioaddr + 0x36);
2035 outw(0xfff7, ioaddr + 0x64); /* unmask gpio 3 */
2036 save_68 = inw(ioaddr + 0x68);
2037 outw(0x0009, ioaddr + 0x68); /* gpio write 0 & 3 ?? */
2038 outw(0x0001, ioaddr + 0x60); /* write 1 to gpio */
2040 outw(0x0009, ioaddr + 0x60); /* write 9 to gpio */
2042 //outw(inw(ioaddr + 0x38) & 0xfffc, ioaddr + 0x38);
2043 outw(inw(ioaddr + 0x3a) & 0xfffc, ioaddr + 0x3a);
2044 outw(inw(ioaddr + 0x3c) & 0xfffc, ioaddr + 0x3c);
2046 #if 0 /* the loop here needs to be much better if we want it.. */
2047 snd_printk(KERN_INFO "trying software reset\n");
2048 /* try and do a software reset */
2049 outb(0x80 | 0x7c, ioaddr + 0x30);
2051 if ((inw(ioaddr + 0x30) & 1) == 0) {
2052 if (inb(ioaddr + 0x32) != 0)
2055 outb(0x80 | 0x7d, ioaddr + 0x30);
2056 if (((inw(ioaddr + 0x30) & 1) == 0)
2057 && (inb(ioaddr + 0x32) != 0))
2059 outb(0x80 | 0x7f, ioaddr + 0x30);
2060 if (((inw(ioaddr + 0x30) & 1) == 0)
2061 && (inb(ioaddr + 0x32) != 0))
2066 outb(inb(ioaddr + 0x37) | 0x08, ioaddr + 0x37); /* do a software reset */
2067 msleep(500); /* oh my.. */
2068 outb(inb(ioaddr + 0x37) & ~0x08,
2071 outw(0x80, ioaddr + 0x30);
2072 for (w = 0; w < 10000; w++) {
2073 if ((inw(ioaddr + 0x30) & 1) == 0)
2079 if (vend == NEC_VERSA_SUBID1 || vend == NEC_VERSA_SUBID2) {
2080 /* turn on external amp? */
2081 outw(0xf9ff, ioaddr + 0x64);
2082 outw(inw(ioaddr + 0x68) | 0x600, ioaddr + 0x68);
2083 outw(0x0209, ioaddr + 0x60);
2087 outw(save_ringbus_a, ioaddr + 0x36);
2089 /* Turn on the 978 docking chip.
2090 First frob the "master output enable" bit,
2091 then set most of the playback volume control registers to max. */
2092 outb(inb(ioaddr+0xc0)|(1<<5), ioaddr+0xc0);
2093 outb(0xff, ioaddr+0xc3);
2094 outb(0xff, ioaddr+0xc4);
2095 outb(0xff, ioaddr+0xc6);
2096 outb(0xff, ioaddr+0xc8);
2097 outb(0x3f, ioaddr+0xcf);
2098 outb(0x3f, ioaddr+0xd0);
2101 static void snd_es1968_reset(struct es1968 *chip)
2104 outw(ESM_RESET_MAESTRO | ESM_RESET_DIRECTSOUND,
2105 chip->io_port + ESM_PORT_HOST_IRQ);
2107 outw(0x0000, chip->io_port + ESM_PORT_HOST_IRQ);
2112 * initialize maestro chip
2114 static void snd_es1968_chip_init(struct es1968 *chip)
2116 struct pci_dev *pci = chip->pci;
2118 unsigned long iobase = chip->io_port;
2122 /* We used to muck around with pci config space that
2123 * we had no business messing with. We don't know enough
2124 * about the machine to know which DMA mode is appropriate,
2125 * etc. We were guessing wrong on some machines and making
2126 * them unhappy. We now trust in the BIOS to do things right,
2127 * which almost certainly means a new host of problems will
2128 * arise with broken BIOS implementations. screw 'em.
2129 * We're already intolerant of machines that don't assign
2134 pci_read_config_word(pci, ESM_CONFIG_A, &w);
2136 w &= ~DMA_CLEAR; /* Clear DMA bits */
2137 w &= ~(PIC_SNOOP1 | PIC_SNOOP2); /* Clear Pic Snoop Mode Bits */
2138 w &= ~SAFEGUARD; /* Safeguard off */
2139 w |= POST_WRITE; /* Posted write */
2140 w |= PCI_TIMING; /* PCI timing on */
2141 /* XXX huh? claims to be reserved.. */
2142 w &= ~SWAP_LR; /* swap left/right
2143 seems to only have effect on SB
2145 w &= ~SUBTR_DECODE; /* Subtractive decode off */
2147 pci_write_config_word(pci, ESM_CONFIG_A, w);
2151 pci_read_config_word(pci, ESM_CONFIG_B, &w);
2153 w &= ~(1 << 15); /* Turn off internal clock multiplier */
2154 /* XXX how do we know which to use? */
2155 w &= ~(1 << 14); /* External clock */
2157 w &= ~SPDIF_CONFB; /* disable S/PDIF output */
2158 w |= HWV_CONFB; /* HWV on */
2159 w |= DEBOUNCE; /* Debounce off: easier to push the HW buttons */
2160 w &= ~GPIO_CONFB; /* GPIO 4:5 */
2161 w |= CHI_CONFB; /* Disconnect from the CHI. Enabling this made a dell 7500 work. */
2162 w &= ~IDMA_CONFB; /* IDMA off (undocumented) */
2163 w &= ~MIDI_FIX; /* MIDI fix off (undoc) */
2164 w &= ~(1 << 1); /* reserved, always write 0 */
2165 w &= ~IRQ_TO_ISA; /* IRQ to ISA off (undoc) */
2167 pci_write_config_word(pci, ESM_CONFIG_B, w);
2171 pci_read_config_word(pci, ESM_DDMA, &w);
2173 pci_write_config_word(pci, ESM_DDMA, w);
2179 pci_read_config_word(pci, ESM_LEGACY_AUDIO_CONTROL, &w);
2181 w |= ESS_DISABLE_AUDIO; /* Disable Legacy Audio */
2182 w &= ~ESS_ENABLE_SERIAL_IRQ; /* Disable SIRQ */
2183 w &= ~(0x1f); /* disable mpu irq/io, game port, fm, SB */
2185 pci_write_config_word(pci, ESM_LEGACY_AUDIO_CONTROL, w);
2187 /* Set up 978 docking control chip. */
2188 pci_read_config_word(pci, 0x58, &w);
2189 w|=1<<2; /* Enable 978. */
2190 w|=1<<3; /* Turn on 978 hardware volume control. */
2191 w&=~(1<<11); /* Turn on 978 mixer volume control. */
2192 pci_write_config_word(pci, 0x58, w);
2196 snd_es1968_reset(chip);
2202 /* setup usual 0x34 stuff.. 0x36 may be chip specific */
2203 outw(0xC090, iobase + ESM_RING_BUS_DEST); /* direct sound, stereo */
2205 outw(0x3000, iobase + ESM_RING_BUS_CONTR_A); /* enable ringbus/serial */
2212 snd_es1968_ac97_reset(chip);
2214 /* Ring Bus Control B */
2216 n = inl(iobase + ESM_RING_BUS_CONTR_B);
2217 n &= ~RINGB_EN_SPDIF; /* SPDIF off */
2218 //w |= RINGB_EN_2CODEC; /* enable 2nd codec */
2219 outl(n, iobase + ESM_RING_BUS_CONTR_B);
2221 /* Set hardware volume control registers to midpoints.
2222 We can tell which button was pushed based on how they change. */
2223 outb(0x88, iobase+0x1c);
2224 outb(0x88, iobase+0x1d);
2225 outb(0x88, iobase+0x1e);
2226 outb(0x88, iobase+0x1f);
2228 /* it appears some maestros (dell 7500) only work if these are set,
2229 regardless of wether we use the assp or not. */
2231 outb(0, iobase + ASSP_CONTROL_B);
2232 outb(3, iobase + ASSP_CONTROL_A); /* M: Reserved bits... */
2233 outb(0, iobase + ASSP_CONTROL_C); /* M: Disable ASSP, ASSP IRQ's and FM Port */
2238 for (i = 0; i < 16; i++) {
2239 /* Write 0 into the buffer area 0x1E0->1EF */
2240 outw(0x01E0 + i, iobase + WC_INDEX);
2241 outw(0x0000, iobase + WC_DATA);
2243 /* The 1.10 test program seem to write 0 into the buffer area
2244 * 0x1D0-0x1DF too.*/
2245 outw(0x01D0 + i, iobase + WC_INDEX);
2246 outw(0x0000, iobase + WC_DATA);
2248 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2249 (wave_get_register(chip, IDR7_WAVE_ROMRAM) & 0xFF00));
2250 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2251 wave_get_register(chip, IDR7_WAVE_ROMRAM) | 0x100);
2252 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2253 wave_get_register(chip, IDR7_WAVE_ROMRAM) & ~0x200);
2254 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2255 wave_get_register(chip, IDR7_WAVE_ROMRAM) | ~0x400);
2258 maestro_write(chip, IDR2_CRAM_DATA, 0x0000);
2259 /* Now back to the DirectSound stuff */
2260 /* audio serial configuration.. ? */
2261 maestro_write(chip, 0x08, 0xB004);
2262 maestro_write(chip, 0x09, 0x001B);
2263 maestro_write(chip, 0x0A, 0x8000);
2264 maestro_write(chip, 0x0B, 0x3F37);
2265 maestro_write(chip, 0x0C, 0x0098);
2267 /* parallel in, has something to do with recording :) */
2268 maestro_write(chip, 0x0C,
2269 (maestro_read(chip, 0x0C) & ~0xF000) | 0x8000);
2271 maestro_write(chip, 0x0C,
2272 (maestro_read(chip, 0x0C) & ~0x0F00) | 0x0500);
2274 maestro_write(chip, 0x0D, 0x7632);
2276 /* Wave cache control on - test off, sg off,
2277 enable, enable extra chans 1Mb */
2279 w = inw(iobase + WC_CONTROL);
2281 w &= ~0xFA00; /* Seems to be reserved? I don't know */
2282 w |= 0xA000; /* reserved... I don't know */
2283 w &= ~0x0200; /* Channels 56,57,58,59 as Extra Play,Rec Channel enable
2284 Seems to crash the Computer if enabled... */
2285 w |= 0x0100; /* Wave Cache Operation Enabled */
2286 w |= 0x0080; /* Channels 60/61 as Placback/Record enabled */
2287 w &= ~0x0060; /* Clear Wavtable Size */
2288 w |= 0x0020; /* Wavetable Size : 1MB */
2289 /* Bit 4 is reserved */
2290 w &= ~0x000C; /* DMA Stuff? I don't understand what the datasheet means */
2291 /* Bit 1 is reserved */
2292 w &= ~0x0001; /* Test Mode off */
2294 outw(w, iobase + WC_CONTROL);
2296 /* Now clear the APU control ram */
2297 for (i = 0; i < NR_APUS; i++) {
2298 for (w = 0; w < NR_APU_REGS; w++)
2299 apu_set_register(chip, i, w, 0);
2305 static void snd_es1968_start_irq(struct es1968 *chip)
2308 w = ESM_HIRQ_DSIE | ESM_HIRQ_HW_VOLUME;
2310 w |= ESM_HIRQ_MPU401;
2311 outw(w, chip->io_port + ESM_PORT_HOST_IRQ);
2318 static int es1968_suspend(struct pci_dev *pci, pm_message_t state)
2320 struct snd_card *card = pci_get_drvdata(pci);
2321 struct es1968 *chip = card->private_data;
2326 chip->in_suspend = 1;
2327 snd_power_change_state(card, SNDRV_CTL_POWER_D3hot);
2328 snd_pcm_suspend_all(chip->pcm);
2329 snd_ac97_suspend(chip->ac97);
2330 snd_es1968_bob_stop(chip);
2332 pci_disable_device(pci);
2333 pci_save_state(pci);
2334 pci_set_power_state(pci, pci_choose_state(pci, state));
2338 static int es1968_resume(struct pci_dev *pci)
2340 struct snd_card *card = pci_get_drvdata(pci);
2341 struct es1968 *chip = card->private_data;
2347 /* restore all our config */
2348 pci_set_power_state(pci, PCI_D0);
2349 pci_restore_state(pci);
2350 if (pci_enable_device(pci) < 0) {
2351 printk(KERN_ERR "es1968: pci_enable_device failed, "
2352 "disabling device\n");
2353 snd_card_disconnect(card);
2356 pci_set_master(pci);
2358 snd_es1968_chip_init(chip);
2360 /* need to restore the base pointers.. */
2361 if (chip->dma.addr) {
2363 wave_set_register(chip, 0x01FC, chip->dma.addr >> 12);
2366 snd_es1968_start_irq(chip);
2368 /* restore ac97 state */
2369 snd_ac97_resume(chip->ac97);
2371 list_for_each_entry(es, &chip->substream_list, list) {
2374 snd_es1968_playback_setup(chip, es, es->substream->runtime);
2376 case ESM_MODE_CAPTURE:
2377 snd_es1968_capture_setup(chip, es, es->substream->runtime);
2382 /* start timer again */
2383 if (chip->bobclient)
2384 snd_es1968_bob_start(chip);
2386 snd_power_change_state(card, SNDRV_CTL_POWER_D0);
2387 chip->in_suspend = 0;
2390 #endif /* CONFIG_PM */
2392 #ifdef SUPPORT_JOYSTICK
2393 #define JOYSTICK_ADDR 0x200
2394 static int __devinit snd_es1968_create_gameport(struct es1968 *chip, int dev)
2396 struct gameport *gp;
2403 r = request_region(JOYSTICK_ADDR, 8, "ES1968 gameport");
2407 chip->gameport = gp = gameport_allocate_port();
2409 printk(KERN_ERR "es1968: cannot allocate memory for gameport\n");
2410 release_and_free_resource(r);
2414 pci_read_config_word(chip->pci, ESM_LEGACY_AUDIO_CONTROL, &val);
2415 pci_write_config_word(chip->pci, ESM_LEGACY_AUDIO_CONTROL, val | 0x04);
2417 gameport_set_name(gp, "ES1968 Gameport");
2418 gameport_set_phys(gp, "pci%s/gameport0", pci_name(chip->pci));
2419 gameport_set_dev_parent(gp, &chip->pci->dev);
2420 gp->io = JOYSTICK_ADDR;
2421 gameport_set_port_data(gp, r);
2423 gameport_register_port(gp);
2428 static void snd_es1968_free_gameport(struct es1968 *chip)
2430 if (chip->gameport) {
2431 struct resource *r = gameport_get_port_data(chip->gameport);
2433 gameport_unregister_port(chip->gameport);
2434 chip->gameport = NULL;
2436 release_and_free_resource(r);
2440 static inline int snd_es1968_create_gameport(struct es1968 *chip, int dev) { return -ENOSYS; }
2441 static inline void snd_es1968_free_gameport(struct es1968 *chip) { }
2444 static int snd_es1968_free(struct es1968 *chip)
2446 if (chip->io_port) {
2447 synchronize_irq(chip->irq);
2448 outw(1, chip->io_port + 0x04); /* clear WP interrupts */
2449 outw(0, chip->io_port + ESM_PORT_HOST_IRQ); /* disable IRQ */
2453 free_irq(chip->irq, chip);
2454 snd_es1968_free_gameport(chip);
2455 chip->master_switch = NULL;
2456 chip->master_volume = NULL;
2457 pci_release_regions(chip->pci);
2458 pci_disable_device(chip->pci);
2463 static int snd_es1968_dev_free(struct snd_device *device)
2465 struct es1968 *chip = device->device_data;
2466 return snd_es1968_free(chip);
2469 struct ess_device_list {
2470 unsigned short type; /* chip type */
2471 unsigned short vendor; /* subsystem vendor id */
2474 static struct ess_device_list pm_whitelist[] __devinitdata = {
2475 { TYPE_MAESTRO2E, 0x0e11 }, /* Compaq Armada */
2476 { TYPE_MAESTRO2E, 0x1028 },
2477 { TYPE_MAESTRO2E, 0x103c },
2478 { TYPE_MAESTRO2E, 0x1179 },
2479 { TYPE_MAESTRO2E, 0x14c0 }, /* HP omnibook 4150 */
2480 { TYPE_MAESTRO2E, 0x1558 },
2483 static struct ess_device_list mpu_blacklist[] __devinitdata = {
2484 { TYPE_MAESTRO2, 0x125d },
2487 static int __devinit snd_es1968_create(struct snd_card *card,
2488 struct pci_dev *pci,
2494 struct es1968 **chip_ret)
2496 static struct snd_device_ops ops = {
2497 .dev_free = snd_es1968_dev_free,
2499 struct es1968 *chip;
2504 /* enable PCI device */
2505 if ((err = pci_enable_device(pci)) < 0)
2507 /* check, if we can restrict PCI DMA transfers to 28 bits */
2508 if (pci_set_dma_mask(pci, DMA_28BIT_MASK) < 0 ||
2509 pci_set_consistent_dma_mask(pci, DMA_28BIT_MASK) < 0) {
2510 snd_printk(KERN_ERR "architecture does not support 28bit PCI busmaster DMA\n");
2511 pci_disable_device(pci);
2515 chip = kzalloc(sizeof(*chip), GFP_KERNEL);
2517 pci_disable_device(pci);
2522 chip->type = chip_type;
2523 spin_lock_init(&chip->reg_lock);
2524 spin_lock_init(&chip->substream_lock);
2525 INIT_LIST_HEAD(&chip->buf_list);
2526 INIT_LIST_HEAD(&chip->substream_list);
2527 spin_lock_init(&chip->ac97_lock);
2528 mutex_init(&chip->memory_mutex);
2529 tasklet_init(&chip->hwvol_tq, es1968_update_hw_volume, (unsigned long)chip);
2533 chip->total_bufsize = total_bufsize; /* in bytes */
2534 chip->playback_streams = play_streams;
2535 chip->capture_streams = capt_streams;
2537 if ((err = pci_request_regions(pci, "ESS Maestro")) < 0) {
2539 pci_disable_device(pci);
2542 chip->io_port = pci_resource_start(pci, 0);
2543 if (request_irq(pci->irq, snd_es1968_interrupt, IRQF_SHARED,
2544 "ESS Maestro", chip)) {
2545 snd_printk(KERN_ERR "unable to grab IRQ %d\n", pci->irq);
2546 snd_es1968_free(chip);
2549 chip->irq = pci->irq;
2551 /* Clear Maestro_map */
2552 for (i = 0; i < 32; i++)
2553 chip->maestro_map[i] = 0;
2556 for (i = 0; i < NR_APUS; i++)
2557 chip->apu[i] = ESM_APU_FREE;
2559 /* just to be sure */
2560 pci_set_master(pci);
2563 /* disable power-management if not on the whitelist */
2564 unsigned short vend;
2565 pci_read_config_word(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend);
2566 for (i = 0; i < (int)ARRAY_SIZE(pm_whitelist); i++) {
2567 if (chip->type == pm_whitelist[i].type &&
2568 vend == pm_whitelist[i].vendor) {
2574 /* not matched; disabling pm */
2575 printk(KERN_INFO "es1968: not attempting power management.\n");
2579 chip->do_pm = do_pm;
2581 snd_es1968_chip_init(chip);
2583 if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
2584 snd_es1968_free(chip);
2588 snd_card_set_dev(card, &pci->dev);
2598 static int __devinit snd_es1968_probe(struct pci_dev *pci,
2599 const struct pci_device_id *pci_id)
2602 struct snd_card *card;
2603 struct es1968 *chip;
2607 if (dev >= SNDRV_CARDS)
2614 card = snd_card_new(index[dev], id[dev], THIS_MODULE, 0);
2618 if (total_bufsize[dev] < 128)
2619 total_bufsize[dev] = 128;
2620 if (total_bufsize[dev] > 4096)
2621 total_bufsize[dev] = 4096;
2622 if ((err = snd_es1968_create(card, pci,
2623 total_bufsize[dev] * 1024, /* in bytes */
2624 pcm_substreams_p[dev],
2625 pcm_substreams_c[dev],
2626 pci_id->driver_data,
2629 snd_card_free(card);
2632 card->private_data = chip;
2634 switch (chip->type) {
2635 case TYPE_MAESTRO2E:
2636 strcpy(card->driver, "ES1978");
2637 strcpy(card->shortname, "ESS ES1978 (Maestro 2E)");
2640 strcpy(card->driver, "ES1968");
2641 strcpy(card->shortname, "ESS ES1968 (Maestro 2)");
2644 strcpy(card->driver, "ESM1");
2645 strcpy(card->shortname, "ESS Maestro 1");
2649 if ((err = snd_es1968_pcm(chip, 0)) < 0) {
2650 snd_card_free(card);
2654 if ((err = snd_es1968_mixer(chip)) < 0) {
2655 snd_card_free(card);
2659 if (enable_mpu[dev] == 2) {
2660 /* check the black list */
2661 unsigned short vend;
2662 pci_read_config_word(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend);
2663 for (i = 0; i < ARRAY_SIZE(mpu_blacklist); i++) {
2664 if (chip->type == mpu_blacklist[i].type &&
2665 vend == mpu_blacklist[i].vendor) {
2666 enable_mpu[dev] = 0;
2671 if (enable_mpu[dev]) {
2672 if ((err = snd_mpu401_uart_new(card, 0, MPU401_HW_MPU401,
2673 chip->io_port + ESM_MPU401_PORT,
2674 MPU401_INFO_INTEGRATED,
2675 chip->irq, 0, &chip->rmidi)) < 0) {
2676 printk(KERN_WARNING "es1968: skipping MPU-401 MIDI support..\n");
2680 snd_es1968_create_gameport(chip, dev);
2682 snd_es1968_start_irq(chip);
2684 chip->clock = clock[dev];
2686 es1968_measure_clock(chip);
2688 sprintf(card->longname, "%s at 0x%lx, irq %i",
2689 card->shortname, chip->io_port, chip->irq);
2691 if ((err = snd_card_register(card)) < 0) {
2692 snd_card_free(card);
2695 pci_set_drvdata(pci, card);
2700 static void __devexit snd_es1968_remove(struct pci_dev *pci)
2702 snd_card_free(pci_get_drvdata(pci));
2703 pci_set_drvdata(pci, NULL);
2706 static struct pci_driver driver = {
2707 .name = "ES1968 (ESS Maestro)",
2708 .id_table = snd_es1968_ids,
2709 .probe = snd_es1968_probe,
2710 .remove = __devexit_p(snd_es1968_remove),
2712 .suspend = es1968_suspend,
2713 .resume = es1968_resume,
2717 static int __init alsa_card_es1968_init(void)
2719 return pci_register_driver(&driver);
2722 static void __exit alsa_card_es1968_exit(void)
2724 pci_unregister_driver(&driver);
2727 module_init(alsa_card_es1968_init)
2728 module_exit(alsa_card_es1968_exit)