Loading...
1/*
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>
5 *
6 * Most of the driver code comes from Zach Brown(zab@redhat.com)
7 * Alan Cox OSS Driver
8 * Rewritted from card-es1938.c source.
9 *
10 * TODO:
11 * Perhaps Synth
12 *
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.
17 *
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.
22 *
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
26 *
27 *
28 * Notes from Zach Brown about the driver code
29 *
30 * Hardware Description
31 *
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.
46 *
47 * Driver Operation
48 *
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
52 * input.
53 *
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.
60 *
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.
67 *
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.
82 *
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
94 * places.
95 */
96
97#include <asm/io.h>
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>
107#include <linux/input.h>
108
109#include <sound/core.h>
110#include <sound/pcm.h>
111#include <sound/mpu401.h>
112#include <sound/ac97_codec.h>
113#include <sound/initval.h>
114
115#ifdef CONFIG_SND_ES1968_RADIO
116#include <sound/tea575x-tuner.h>
117#endif
118
119#define CARD_NAME "ESS Maestro1/2"
120#define DRIVER_NAME "ES1968"
121
122MODULE_DESCRIPTION("ESS Maestro");
123MODULE_LICENSE("GPL");
124MODULE_SUPPORTED_DEVICE("{{ESS,Maestro 2e},"
125 "{ESS,Maestro 2},"
126 "{ESS,Maestro 1},"
127 "{TerraTec,DMX}}");
128
129#if defined(CONFIG_GAMEPORT) || (defined(MODULE) && defined(CONFIG_GAMEPORT_MODULE))
130#define SUPPORT_JOYSTICK 1
131#endif
132
133static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; /* Index 1-MAX */
134static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; /* ID for this card */
135static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP; /* Enable this card */
136static int total_bufsize[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 1024 };
137static int pcm_substreams_p[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 4 };
138static int pcm_substreams_c[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 1 };
139static int clock[SNDRV_CARDS];
140static int use_pm[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 2};
141static int enable_mpu[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 2};
142#ifdef SUPPORT_JOYSTICK
143static int joystick[SNDRV_CARDS];
144#endif
145
146module_param_array(index, int, NULL, 0444);
147MODULE_PARM_DESC(index, "Index value for " CARD_NAME " soundcard.");
148module_param_array(id, charp, NULL, 0444);
149MODULE_PARM_DESC(id, "ID string for " CARD_NAME " soundcard.");
150module_param_array(enable, bool, NULL, 0444);
151MODULE_PARM_DESC(enable, "Enable " CARD_NAME " soundcard.");
152module_param_array(total_bufsize, int, NULL, 0444);
153MODULE_PARM_DESC(total_bufsize, "Total buffer size in kB.");
154module_param_array(pcm_substreams_p, int, NULL, 0444);
155MODULE_PARM_DESC(pcm_substreams_p, "PCM Playback substreams for " CARD_NAME " soundcard.");
156module_param_array(pcm_substreams_c, int, NULL, 0444);
157MODULE_PARM_DESC(pcm_substreams_c, "PCM Capture substreams for " CARD_NAME " soundcard.");
158module_param_array(clock, int, NULL, 0444);
159MODULE_PARM_DESC(clock, "Clock on " CARD_NAME " soundcard. (0 = auto-detect)");
160module_param_array(use_pm, int, NULL, 0444);
161MODULE_PARM_DESC(use_pm, "Toggle power-management. (0 = off, 1 = on, 2 = auto)");
162module_param_array(enable_mpu, int, NULL, 0444);
163MODULE_PARM_DESC(enable_mpu, "Enable MPU401. (0 = off, 1 = on, 2 = auto)");
164#ifdef SUPPORT_JOYSTICK
165module_param_array(joystick, bool, NULL, 0444);
166MODULE_PARM_DESC(joystick, "Enable joystick.");
167#endif
168
169
170#define NR_APUS 64
171#define NR_APU_REGS 16
172
173/* NEC Versas ? */
174#define NEC_VERSA_SUBID1 0x80581033
175#define NEC_VERSA_SUBID2 0x803c1033
176
177/* Mode Flags */
178#define ESS_FMT_STEREO 0x01
179#define ESS_FMT_16BIT 0x02
180
181#define DAC_RUNNING 1
182#define ADC_RUNNING 2
183
184/* Values for the ESM_LEGACY_AUDIO_CONTROL */
185
186#define ESS_DISABLE_AUDIO 0x8000
187#define ESS_ENABLE_SERIAL_IRQ 0x4000
188#define IO_ADRESS_ALIAS 0x0020
189#define MPU401_IRQ_ENABLE 0x0010
190#define MPU401_IO_ENABLE 0x0008
191#define GAME_IO_ENABLE 0x0004
192#define FM_IO_ENABLE 0x0002
193#define SB_IO_ENABLE 0x0001
194
195/* Values for the ESM_CONFIG_A */
196
197#define PIC_SNOOP1 0x4000
198#define PIC_SNOOP2 0x2000
199#define SAFEGUARD 0x0800
200#define DMA_CLEAR 0x0700
201#define DMA_DDMA 0x0000
202#define DMA_TDMA 0x0100
203#define DMA_PCPCI 0x0200
204#define POST_WRITE 0x0080
205#define PCI_TIMING 0x0040
206#define SWAP_LR 0x0020
207#define SUBTR_DECODE 0x0002
208
209/* Values for the ESM_CONFIG_B */
210
211#define SPDIF_CONFB 0x0100
212#define HWV_CONFB 0x0080
213#define DEBOUNCE 0x0040
214#define GPIO_CONFB 0x0020
215#define CHI_CONFB 0x0010
216#define IDMA_CONFB 0x0008 /*undoc */
217#define MIDI_FIX 0x0004 /*undoc */
218#define IRQ_TO_ISA 0x0001 /*undoc */
219
220/* Values for Ring Bus Control B */
221#define RINGB_2CODEC_ID_MASK 0x0003
222#define RINGB_DIS_VALIDATION 0x0008
223#define RINGB_EN_SPDIF 0x0010
224#define RINGB_EN_2CODEC 0x0020
225#define RINGB_SING_BIT_DUAL 0x0040
226
227/* ****Port Addresses**** */
228
229/* Write & Read */
230#define ESM_INDEX 0x02
231#define ESM_DATA 0x00
232
233/* AC97 + RingBus */
234#define ESM_AC97_INDEX 0x30
235#define ESM_AC97_DATA 0x32
236#define ESM_RING_BUS_DEST 0x34
237#define ESM_RING_BUS_CONTR_A 0x36
238#define ESM_RING_BUS_CONTR_B 0x38
239#define ESM_RING_BUS_SDO 0x3A
240
241/* WaveCache*/
242#define WC_INDEX 0x10
243#define WC_DATA 0x12
244#define WC_CONTROL 0x14
245
246/* ASSP*/
247#define ASSP_INDEX 0x80
248#define ASSP_MEMORY 0x82
249#define ASSP_DATA 0x84
250#define ASSP_CONTROL_A 0xA2
251#define ASSP_CONTROL_B 0xA4
252#define ASSP_CONTROL_C 0xA6
253#define ASSP_HOSTW_INDEX 0xA8
254#define ASSP_HOSTW_DATA 0xAA
255#define ASSP_HOSTW_IRQ 0xAC
256/* Midi */
257#define ESM_MPU401_PORT 0x98
258/* Others */
259#define ESM_PORT_HOST_IRQ 0x18
260
261#define IDR0_DATA_PORT 0x00
262#define IDR1_CRAM_POINTER 0x01
263#define IDR2_CRAM_DATA 0x02
264#define IDR3_WAVE_DATA 0x03
265#define IDR4_WAVE_PTR_LOW 0x04
266#define IDR5_WAVE_PTR_HI 0x05
267#define IDR6_TIMER_CTRL 0x06
268#define IDR7_WAVE_ROMRAM 0x07
269
270#define WRITEABLE_MAP 0xEFFFFF
271#define READABLE_MAP 0x64003F
272
273/* PCI Register */
274
275#define ESM_LEGACY_AUDIO_CONTROL 0x40
276#define ESM_ACPI_COMMAND 0x54
277#define ESM_CONFIG_A 0x50
278#define ESM_CONFIG_B 0x52
279#define ESM_DDMA 0x60
280
281/* Bob Bits */
282#define ESM_BOB_ENABLE 0x0001
283#define ESM_BOB_START 0x0001
284
285/* Host IRQ Control Bits */
286#define ESM_RESET_MAESTRO 0x8000
287#define ESM_RESET_DIRECTSOUND 0x4000
288#define ESM_HIRQ_ClkRun 0x0100
289#define ESM_HIRQ_HW_VOLUME 0x0040
290#define ESM_HIRQ_HARPO 0x0030 /* What's that? */
291#define ESM_HIRQ_ASSP 0x0010
292#define ESM_HIRQ_DSIE 0x0004
293#define ESM_HIRQ_MPU401 0x0002
294#define ESM_HIRQ_SB 0x0001
295
296/* Host IRQ Status Bits */
297#define ESM_MPU401_IRQ 0x02
298#define ESM_SB_IRQ 0x01
299#define ESM_SOUND_IRQ 0x04
300#define ESM_ASSP_IRQ 0x10
301#define ESM_HWVOL_IRQ 0x40
302
303#define ESS_SYSCLK 50000000
304#define ESM_BOB_FREQ 200
305#define ESM_BOB_FREQ_MAX 800
306
307#define ESM_FREQ_ESM1 (49152000L / 1024L) /* default rate 48000 */
308#define ESM_FREQ_ESM2 (50000000L / 1024L)
309
310/* APU Modes: reg 0x00, bit 4-7 */
311#define ESM_APU_MODE_SHIFT 4
312#define ESM_APU_MODE_MASK (0xf << 4)
313#define ESM_APU_OFF 0x00
314#define ESM_APU_16BITLINEAR 0x01 /* 16-Bit Linear Sample Player */
315#define ESM_APU_16BITSTEREO 0x02 /* 16-Bit Stereo Sample Player */
316#define ESM_APU_8BITLINEAR 0x03 /* 8-Bit Linear Sample Player */
317#define ESM_APU_8BITSTEREO 0x04 /* 8-Bit Stereo Sample Player */
318#define ESM_APU_8BITDIFF 0x05 /* 8-Bit Differential Sample Playrer */
319#define ESM_APU_DIGITALDELAY 0x06 /* Digital Delay Line */
320#define ESM_APU_DUALTAP 0x07 /* Dual Tap Reader */
321#define ESM_APU_CORRELATOR 0x08 /* Correlator */
322#define ESM_APU_INPUTMIXER 0x09 /* Input Mixer */
323#define ESM_APU_WAVETABLE 0x0A /* Wave Table Mode */
324#define ESM_APU_SRCONVERTOR 0x0B /* Sample Rate Convertor */
325#define ESM_APU_16BITPINGPONG 0x0C /* 16-Bit Ping-Pong Sample Player */
326#define ESM_APU_RESERVED1 0x0D /* Reserved 1 */
327#define ESM_APU_RESERVED2 0x0E /* Reserved 2 */
328#define ESM_APU_RESERVED3 0x0F /* Reserved 3 */
329
330/* reg 0x00 */
331#define ESM_APU_FILTER_Q_SHIFT 0
332#define ESM_APU_FILTER_Q_MASK (3 << 0)
333/* APU Filtey Q Control */
334#define ESM_APU_FILTER_LESSQ 0x00
335#define ESM_APU_FILTER_MOREQ 0x03
336
337#define ESM_APU_FILTER_TYPE_SHIFT 2
338#define ESM_APU_FILTER_TYPE_MASK (3 << 2)
339#define ESM_APU_ENV_TYPE_SHIFT 8
340#define ESM_APU_ENV_TYPE_MASK (3 << 8)
341#define ESM_APU_ENV_STATE_SHIFT 10
342#define ESM_APU_ENV_STATE_MASK (3 << 10)
343#define ESM_APU_END_CURVE (1 << 12)
344#define ESM_APU_INT_ON_LOOP (1 << 13)
345#define ESM_APU_DMA_ENABLE (1 << 14)
346
347/* reg 0x02 */
348#define ESM_APU_SUBMIX_GROUP_SHIRT 0
349#define ESM_APU_SUBMIX_GROUP_MASK (7 << 0)
350#define ESM_APU_SUBMIX_MODE (1 << 3)
351#define ESM_APU_6dB (1 << 4)
352#define ESM_APU_DUAL_EFFECT (1 << 5)
353#define ESM_APU_EFFECT_CHANNELS_SHIFT 6
354#define ESM_APU_EFFECT_CHANNELS_MASK (3 << 6)
355
356/* reg 0x03 */
357#define ESM_APU_STEP_SIZE_MASK 0x0fff
358
359/* reg 0x04 */
360#define ESM_APU_PHASE_SHIFT 0
361#define ESM_APU_PHASE_MASK (0xff << 0)
362#define ESM_APU_WAVE64K_PAGE_SHIFT 8 /* most 8bit of wave start offset */
363#define ESM_APU_WAVE64K_PAGE_MASK (0xff << 8)
364
365/* reg 0x05 - wave start offset */
366/* reg 0x06 - wave end offset */
367/* reg 0x07 - wave loop length */
368
369/* reg 0x08 */
370#define ESM_APU_EFFECT_GAIN_SHIFT 0
371#define ESM_APU_EFFECT_GAIN_MASK (0xff << 0)
372#define ESM_APU_TREMOLO_DEPTH_SHIFT 8
373#define ESM_APU_TREMOLO_DEPTH_MASK (0xf << 8)
374#define ESM_APU_TREMOLO_RATE_SHIFT 12
375#define ESM_APU_TREMOLO_RATE_MASK (0xf << 12)
376
377/* reg 0x09 */
378/* bit 0-7 amplitude dest? */
379#define ESM_APU_AMPLITUDE_NOW_SHIFT 8
380#define ESM_APU_AMPLITUDE_NOW_MASK (0xff << 8)
381
382/* reg 0x0a */
383#define ESM_APU_POLAR_PAN_SHIFT 0
384#define ESM_APU_POLAR_PAN_MASK (0x3f << 0)
385/* Polar Pan Control */
386#define ESM_APU_PAN_CENTER_CIRCLE 0x00
387#define ESM_APU_PAN_MIDDLE_RADIUS 0x01
388#define ESM_APU_PAN_OUTSIDE_RADIUS 0x02
389
390#define ESM_APU_FILTER_TUNING_SHIFT 8
391#define ESM_APU_FILTER_TUNING_MASK (0xff << 8)
392
393/* reg 0x0b */
394#define ESM_APU_DATA_SRC_A_SHIFT 0
395#define ESM_APU_DATA_SRC_A_MASK (0x7f << 0)
396#define ESM_APU_INV_POL_A (1 << 7)
397#define ESM_APU_DATA_SRC_B_SHIFT 8
398#define ESM_APU_DATA_SRC_B_MASK (0x7f << 8)
399#define ESM_APU_INV_POL_B (1 << 15)
400
401#define ESM_APU_VIBRATO_RATE_SHIFT 0
402#define ESM_APU_VIBRATO_RATE_MASK (0xf << 0)
403#define ESM_APU_VIBRATO_DEPTH_SHIFT 4
404#define ESM_APU_VIBRATO_DEPTH_MASK (0xf << 4)
405#define ESM_APU_VIBRATO_PHASE_SHIFT 8
406#define ESM_APU_VIBRATO_PHASE_MASK (0xff << 8)
407
408/* reg 0x0c */
409#define ESM_APU_RADIUS_SELECT (1 << 6)
410
411/* APU Filter Control */
412#define ESM_APU_FILTER_2POLE_LOPASS 0x00
413#define ESM_APU_FILTER_2POLE_BANDPASS 0x01
414#define ESM_APU_FILTER_2POLE_HIPASS 0x02
415#define ESM_APU_FILTER_1POLE_LOPASS 0x03
416#define ESM_APU_FILTER_1POLE_HIPASS 0x04
417#define ESM_APU_FILTER_OFF 0x05
418
419/* APU ATFP Type */
420#define ESM_APU_ATFP_AMPLITUDE 0x00
421#define ESM_APU_ATFP_TREMELO 0x01
422#define ESM_APU_ATFP_FILTER 0x02
423#define ESM_APU_ATFP_PAN 0x03
424
425/* APU ATFP Flags */
426#define ESM_APU_ATFP_FLG_OFF 0x00
427#define ESM_APU_ATFP_FLG_WAIT 0x01
428#define ESM_APU_ATFP_FLG_DONE 0x02
429#define ESM_APU_ATFP_FLG_INPROCESS 0x03
430
431
432/* capture mixing buffer size */
433#define ESM_MEM_ALIGN 0x1000
434#define ESM_MIXBUF_SIZE 0x400
435
436#define ESM_MODE_PLAY 0
437#define ESM_MODE_CAPTURE 1
438
439
440/* APU use in the driver */
441enum snd_enum_apu_type {
442 ESM_APU_PCM_PLAY,
443 ESM_APU_PCM_CAPTURE,
444 ESM_APU_PCM_RATECONV,
445 ESM_APU_FREE
446};
447
448/* chip type */
449enum {
450 TYPE_MAESTRO, TYPE_MAESTRO2, TYPE_MAESTRO2E
451};
452
453/* DMA Hack! */
454struct esm_memory {
455 struct snd_dma_buffer buf;
456 int empty; /* status */
457 struct list_head list;
458};
459
460/* Playback Channel */
461struct esschan {
462 int running;
463
464 u8 apu[4];
465 u8 apu_mode[4];
466
467 /* playback/capture pcm buffer */
468 struct esm_memory *memory;
469 /* capture mixer buffer */
470 struct esm_memory *mixbuf;
471
472 unsigned int hwptr; /* current hw pointer in bytes */
473 unsigned int count; /* sample counter in bytes */
474 unsigned int dma_size; /* total buffer size in bytes */
475 unsigned int frag_size; /* period size in bytes */
476 unsigned int wav_shift;
477 u16 base[4]; /* offset for ptr */
478
479 /* stereo/16bit flag */
480 unsigned char fmt;
481 int mode; /* playback / capture */
482
483 int bob_freq; /* required timer frequency */
484
485 struct snd_pcm_substream *substream;
486
487 /* linked list */
488 struct list_head list;
489
490#ifdef CONFIG_PM
491 u16 wc_map[4];
492#endif
493};
494
495struct es1968 {
496 /* Module Config */
497 int total_bufsize; /* in bytes */
498
499 int playback_streams, capture_streams;
500
501 unsigned int clock; /* clock */
502 /* for clock measurement */
503 unsigned int in_measurement: 1;
504 unsigned int measure_apu;
505 unsigned int measure_lastpos;
506 unsigned int measure_count;
507
508 /* buffer */
509 struct snd_dma_buffer dma;
510
511 /* Resources... */
512 int irq;
513 unsigned long io_port;
514 int type;
515 struct pci_dev *pci;
516 struct snd_card *card;
517 struct snd_pcm *pcm;
518 int do_pm; /* power-management enabled */
519
520 /* DMA memory block */
521 struct list_head buf_list;
522
523 /* ALSA Stuff */
524 struct snd_ac97 *ac97;
525 struct snd_rawmidi *rmidi;
526
527 spinlock_t reg_lock;
528 unsigned int in_suspend;
529
530 /* Maestro Stuff */
531 u16 maestro_map[32];
532 int bobclient; /* active timer instancs */
533 int bob_freq; /* timer frequency */
534 struct mutex memory_mutex; /* memory lock */
535
536 /* APU states */
537 unsigned char apu[NR_APUS];
538
539 /* active substreams */
540 struct list_head substream_list;
541 spinlock_t substream_lock;
542
543#ifdef CONFIG_PM
544 u16 apu_map[NR_APUS][NR_APU_REGS];
545#endif
546
547#ifdef SUPPORT_JOYSTICK
548 struct gameport *gameport;
549#endif
550
551#ifdef CONFIG_SND_ES1968_INPUT
552 struct input_dev *input_dev;
553 char phys[64]; /* physical device path */
554#else
555 struct snd_kcontrol *master_switch; /* for h/w volume control */
556 struct snd_kcontrol *master_volume;
557#endif
558 struct work_struct hwvol_work;
559
560#ifdef CONFIG_SND_ES1968_RADIO
561 struct snd_tea575x tea;
562#endif
563};
564
565static irqreturn_t snd_es1968_interrupt(int irq, void *dev_id);
566
567static DEFINE_PCI_DEVICE_TABLE(snd_es1968_ids) = {
568 /* Maestro 1 */
569 { 0x1285, 0x0100, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO },
570 /* Maestro 2 */
571 { 0x125d, 0x1968, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO2 },
572 /* Maestro 2E */
573 { 0x125d, 0x1978, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO2E },
574 { 0, }
575};
576
577MODULE_DEVICE_TABLE(pci, snd_es1968_ids);
578
579/* *********************
580 * Low Level Funcs! *
581 *********************/
582
583/* no spinlock */
584static void __maestro_write(struct es1968 *chip, u16 reg, u16 data)
585{
586 outw(reg, chip->io_port + ESM_INDEX);
587 outw(data, chip->io_port + ESM_DATA);
588 chip->maestro_map[reg] = data;
589}
590
591static inline void maestro_write(struct es1968 *chip, u16 reg, u16 data)
592{
593 unsigned long flags;
594 spin_lock_irqsave(&chip->reg_lock, flags);
595 __maestro_write(chip, reg, data);
596 spin_unlock_irqrestore(&chip->reg_lock, flags);
597}
598
599/* no spinlock */
600static u16 __maestro_read(struct es1968 *chip, u16 reg)
601{
602 if (READABLE_MAP & (1 << reg)) {
603 outw(reg, chip->io_port + ESM_INDEX);
604 chip->maestro_map[reg] = inw(chip->io_port + ESM_DATA);
605 }
606 return chip->maestro_map[reg];
607}
608
609static inline u16 maestro_read(struct es1968 *chip, u16 reg)
610{
611 unsigned long flags;
612 u16 result;
613 spin_lock_irqsave(&chip->reg_lock, flags);
614 result = __maestro_read(chip, reg);
615 spin_unlock_irqrestore(&chip->reg_lock, flags);
616 return result;
617}
618
619/* Wait for the codec bus to be free */
620static int snd_es1968_ac97_wait(struct es1968 *chip)
621{
622 int timeout = 100000;
623
624 while (timeout-- > 0) {
625 if (!(inb(chip->io_port + ESM_AC97_INDEX) & 1))
626 return 0;
627 cond_resched();
628 }
629 snd_printd("es1968: ac97 timeout\n");
630 return 1; /* timeout */
631}
632
633static int snd_es1968_ac97_wait_poll(struct es1968 *chip)
634{
635 int timeout = 100000;
636
637 while (timeout-- > 0) {
638 if (!(inb(chip->io_port + ESM_AC97_INDEX) & 1))
639 return 0;
640 }
641 snd_printd("es1968: ac97 timeout\n");
642 return 1; /* timeout */
643}
644
645static void snd_es1968_ac97_write(struct snd_ac97 *ac97, unsigned short reg, unsigned short val)
646{
647 struct es1968 *chip = ac97->private_data;
648
649 snd_es1968_ac97_wait(chip);
650
651 /* Write the bus */
652 outw(val, chip->io_port + ESM_AC97_DATA);
653 /*msleep(1);*/
654 outb(reg, chip->io_port + ESM_AC97_INDEX);
655 /*msleep(1);*/
656}
657
658static unsigned short snd_es1968_ac97_read(struct snd_ac97 *ac97, unsigned short reg)
659{
660 u16 data = 0;
661 struct es1968 *chip = ac97->private_data;
662
663 snd_es1968_ac97_wait(chip);
664
665 outb(reg | 0x80, chip->io_port + ESM_AC97_INDEX);
666 /*msleep(1);*/
667
668 if (!snd_es1968_ac97_wait_poll(chip)) {
669 data = inw(chip->io_port + ESM_AC97_DATA);
670 /*msleep(1);*/
671 }
672
673 return data;
674}
675
676/* no spinlock */
677static void apu_index_set(struct es1968 *chip, u16 index)
678{
679 int i;
680 __maestro_write(chip, IDR1_CRAM_POINTER, index);
681 for (i = 0; i < 1000; i++)
682 if (__maestro_read(chip, IDR1_CRAM_POINTER) == index)
683 return;
684 snd_printd("es1968: APU register select failed. (Timeout)\n");
685}
686
687/* no spinlock */
688static void apu_data_set(struct es1968 *chip, u16 data)
689{
690 int i;
691 for (i = 0; i < 1000; i++) {
692 if (__maestro_read(chip, IDR0_DATA_PORT) == data)
693 return;
694 __maestro_write(chip, IDR0_DATA_PORT, data);
695 }
696 snd_printd("es1968: APU register set probably failed (Timeout)!\n");
697}
698
699/* no spinlock */
700static void __apu_set_register(struct es1968 *chip, u16 channel, u8 reg, u16 data)
701{
702 if (snd_BUG_ON(channel >= NR_APUS))
703 return;
704#ifdef CONFIG_PM
705 chip->apu_map[channel][reg] = data;
706#endif
707 reg |= (channel << 4);
708 apu_index_set(chip, reg);
709 apu_data_set(chip, data);
710}
711
712static void apu_set_register(struct es1968 *chip, u16 channel, u8 reg, u16 data)
713{
714 unsigned long flags;
715 spin_lock_irqsave(&chip->reg_lock, flags);
716 __apu_set_register(chip, channel, reg, data);
717 spin_unlock_irqrestore(&chip->reg_lock, flags);
718}
719
720static u16 __apu_get_register(struct es1968 *chip, u16 channel, u8 reg)
721{
722 if (snd_BUG_ON(channel >= NR_APUS))
723 return 0;
724 reg |= (channel << 4);
725 apu_index_set(chip, reg);
726 return __maestro_read(chip, IDR0_DATA_PORT);
727}
728
729static u16 apu_get_register(struct es1968 *chip, u16 channel, u8 reg)
730{
731 unsigned long flags;
732 u16 v;
733 spin_lock_irqsave(&chip->reg_lock, flags);
734 v = __apu_get_register(chip, channel, reg);
735 spin_unlock_irqrestore(&chip->reg_lock, flags);
736 return v;
737}
738
739#if 0 /* ASSP is not supported */
740
741static void assp_set_register(struct es1968 *chip, u32 reg, u32 value)
742{
743 unsigned long flags;
744
745 spin_lock_irqsave(&chip->reg_lock, flags);
746 outl(reg, chip->io_port + ASSP_INDEX);
747 outl(value, chip->io_port + ASSP_DATA);
748 spin_unlock_irqrestore(&chip->reg_lock, flags);
749}
750
751static u32 assp_get_register(struct es1968 *chip, u32 reg)
752{
753 unsigned long flags;
754 u32 value;
755
756 spin_lock_irqsave(&chip->reg_lock, flags);
757 outl(reg, chip->io_port + ASSP_INDEX);
758 value = inl(chip->io_port + ASSP_DATA);
759 spin_unlock_irqrestore(&chip->reg_lock, flags);
760
761 return value;
762}
763
764#endif
765
766static void wave_set_register(struct es1968 *chip, u16 reg, u16 value)
767{
768 unsigned long flags;
769
770 spin_lock_irqsave(&chip->reg_lock, flags);
771 outw(reg, chip->io_port + WC_INDEX);
772 outw(value, chip->io_port + WC_DATA);
773 spin_unlock_irqrestore(&chip->reg_lock, flags);
774}
775
776static u16 wave_get_register(struct es1968 *chip, u16 reg)
777{
778 unsigned long flags;
779 u16 value;
780
781 spin_lock_irqsave(&chip->reg_lock, flags);
782 outw(reg, chip->io_port + WC_INDEX);
783 value = inw(chip->io_port + WC_DATA);
784 spin_unlock_irqrestore(&chip->reg_lock, flags);
785
786 return value;
787}
788
789/* *******************
790 * Bob the Timer! *
791 *******************/
792
793static void snd_es1968_bob_stop(struct es1968 *chip)
794{
795 u16 reg;
796
797 reg = __maestro_read(chip, 0x11);
798 reg &= ~ESM_BOB_ENABLE;
799 __maestro_write(chip, 0x11, reg);
800 reg = __maestro_read(chip, 0x17);
801 reg &= ~ESM_BOB_START;
802 __maestro_write(chip, 0x17, reg);
803}
804
805static void snd_es1968_bob_start(struct es1968 *chip)
806{
807 int prescale;
808 int divide;
809
810 /* compute ideal interrupt frequency for buffer size & play rate */
811 /* first, find best prescaler value to match freq */
812 for (prescale = 5; prescale < 12; prescale++)
813 if (chip->bob_freq > (ESS_SYSCLK >> (prescale + 9)))
814 break;
815
816 /* next, back off prescaler whilst getting divider into optimum range */
817 divide = 1;
818 while ((prescale > 5) && (divide < 32)) {
819 prescale--;
820 divide <<= 1;
821 }
822 divide >>= 1;
823
824 /* now fine-tune the divider for best match */
825 for (; divide < 31; divide++)
826 if (chip->bob_freq >
827 ((ESS_SYSCLK >> (prescale + 9)) / (divide + 1))) break;
828
829 /* divide = 0 is illegal, but don't let prescale = 4! */
830 if (divide == 0) {
831 divide++;
832 if (prescale > 5)
833 prescale--;
834 } else if (divide > 1)
835 divide--;
836
837 __maestro_write(chip, 6, 0x9000 | (prescale << 5) | divide); /* set reg */
838
839 /* Now set IDR 11/17 */
840 __maestro_write(chip, 0x11, __maestro_read(chip, 0x11) | 1);
841 __maestro_write(chip, 0x17, __maestro_read(chip, 0x17) | 1);
842}
843
844/* call with substream spinlock */
845static void snd_es1968_bob_inc(struct es1968 *chip, int freq)
846{
847 chip->bobclient++;
848 if (chip->bobclient == 1) {
849 chip->bob_freq = freq;
850 snd_es1968_bob_start(chip);
851 } else if (chip->bob_freq < freq) {
852 snd_es1968_bob_stop(chip);
853 chip->bob_freq = freq;
854 snd_es1968_bob_start(chip);
855 }
856}
857
858/* call with substream spinlock */
859static void snd_es1968_bob_dec(struct es1968 *chip)
860{
861 chip->bobclient--;
862 if (chip->bobclient <= 0)
863 snd_es1968_bob_stop(chip);
864 else if (chip->bob_freq > ESM_BOB_FREQ) {
865 /* check reduction of timer frequency */
866 int max_freq = ESM_BOB_FREQ;
867 struct esschan *es;
868 list_for_each_entry(es, &chip->substream_list, list) {
869 if (max_freq < es->bob_freq)
870 max_freq = es->bob_freq;
871 }
872 if (max_freq != chip->bob_freq) {
873 snd_es1968_bob_stop(chip);
874 chip->bob_freq = max_freq;
875 snd_es1968_bob_start(chip);
876 }
877 }
878}
879
880static int
881snd_es1968_calc_bob_rate(struct es1968 *chip, struct esschan *es,
882 struct snd_pcm_runtime *runtime)
883{
884 /* we acquire 4 interrupts per period for precise control.. */
885 int freq = runtime->rate * 4;
886 if (es->fmt & ESS_FMT_STEREO)
887 freq <<= 1;
888 if (es->fmt & ESS_FMT_16BIT)
889 freq <<= 1;
890 freq /= es->frag_size;
891 if (freq < ESM_BOB_FREQ)
892 freq = ESM_BOB_FREQ;
893 else if (freq > ESM_BOB_FREQ_MAX)
894 freq = ESM_BOB_FREQ_MAX;
895 return freq;
896}
897
898
899/*************
900 * PCM Part *
901 *************/
902
903static u32 snd_es1968_compute_rate(struct es1968 *chip, u32 freq)
904{
905 u32 rate = (freq << 16) / chip->clock;
906#if 0 /* XXX: do we need this? */
907 if (rate > 0x10000)
908 rate = 0x10000;
909#endif
910 return rate;
911}
912
913/* get current pointer */
914static inline unsigned int
915snd_es1968_get_dma_ptr(struct es1968 *chip, struct esschan *es)
916{
917 unsigned int offset;
918
919 offset = apu_get_register(chip, es->apu[0], 5);
920
921 offset -= es->base[0];
922
923 return (offset & 0xFFFE); /* hardware is in words */
924}
925
926static void snd_es1968_apu_set_freq(struct es1968 *chip, int apu, int freq)
927{
928 apu_set_register(chip, apu, 2,
929 (apu_get_register(chip, apu, 2) & 0x00FF) |
930 ((freq & 0xff) << 8) | 0x10);
931 apu_set_register(chip, apu, 3, freq >> 8);
932}
933
934/* spin lock held */
935static inline void snd_es1968_trigger_apu(struct es1968 *esm, int apu, int mode)
936{
937 /* set the APU mode */
938 __apu_set_register(esm, apu, 0,
939 (__apu_get_register(esm, apu, 0) & 0xff0f) |
940 (mode << 4));
941}
942
943static void snd_es1968_pcm_start(struct es1968 *chip, struct esschan *es)
944{
945 spin_lock(&chip->reg_lock);
946 __apu_set_register(chip, es->apu[0], 5, es->base[0]);
947 snd_es1968_trigger_apu(chip, es->apu[0], es->apu_mode[0]);
948 if (es->mode == ESM_MODE_CAPTURE) {
949 __apu_set_register(chip, es->apu[2], 5, es->base[2]);
950 snd_es1968_trigger_apu(chip, es->apu[2], es->apu_mode[2]);
951 }
952 if (es->fmt & ESS_FMT_STEREO) {
953 __apu_set_register(chip, es->apu[1], 5, es->base[1]);
954 snd_es1968_trigger_apu(chip, es->apu[1], es->apu_mode[1]);
955 if (es->mode == ESM_MODE_CAPTURE) {
956 __apu_set_register(chip, es->apu[3], 5, es->base[3]);
957 snd_es1968_trigger_apu(chip, es->apu[3], es->apu_mode[3]);
958 }
959 }
960 spin_unlock(&chip->reg_lock);
961}
962
963static void snd_es1968_pcm_stop(struct es1968 *chip, struct esschan *es)
964{
965 spin_lock(&chip->reg_lock);
966 snd_es1968_trigger_apu(chip, es->apu[0], 0);
967 snd_es1968_trigger_apu(chip, es->apu[1], 0);
968 if (es->mode == ESM_MODE_CAPTURE) {
969 snd_es1968_trigger_apu(chip, es->apu[2], 0);
970 snd_es1968_trigger_apu(chip, es->apu[3], 0);
971 }
972 spin_unlock(&chip->reg_lock);
973}
974
975/* set the wavecache control reg */
976static void snd_es1968_program_wavecache(struct es1968 *chip, struct esschan *es,
977 int channel, u32 addr, int capture)
978{
979 u32 tmpval = (addr - 0x10) & 0xFFF8;
980
981 if (! capture) {
982 if (!(es->fmt & ESS_FMT_16BIT))
983 tmpval |= 4; /* 8bit */
984 if (es->fmt & ESS_FMT_STEREO)
985 tmpval |= 2; /* stereo */
986 }
987
988 /* set the wavecache control reg */
989 wave_set_register(chip, es->apu[channel] << 3, tmpval);
990
991#ifdef CONFIG_PM
992 es->wc_map[channel] = tmpval;
993#endif
994}
995
996
997static void snd_es1968_playback_setup(struct es1968 *chip, struct esschan *es,
998 struct snd_pcm_runtime *runtime)
999{
1000 u32 pa;
1001 int high_apu = 0;
1002 int channel, apu;
1003 int i, size;
1004 unsigned long flags;
1005 u32 freq;
1006
1007 size = es->dma_size >> es->wav_shift;
1008
1009 if (es->fmt & ESS_FMT_STEREO)
1010 high_apu++;
1011
1012 for (channel = 0; channel <= high_apu; channel++) {
1013 apu = es->apu[channel];
1014
1015 snd_es1968_program_wavecache(chip, es, channel, es->memory->buf.addr, 0);
1016
1017 /* Offset to PCMBAR */
1018 pa = es->memory->buf.addr;
1019 pa -= chip->dma.addr;
1020 pa >>= 1; /* words */
1021
1022 pa |= 0x00400000; /* System RAM (Bit 22) */
1023
1024 if (es->fmt & ESS_FMT_STEREO) {
1025 /* Enable stereo */
1026 if (channel)
1027 pa |= 0x00800000; /* (Bit 23) */
1028 if (es->fmt & ESS_FMT_16BIT)
1029 pa >>= 1;
1030 }
1031
1032 /* base offset of dma calcs when reading the pointer
1033 on this left one */
1034 es->base[channel] = pa & 0xFFFF;
1035
1036 for (i = 0; i < 16; i++)
1037 apu_set_register(chip, apu, i, 0x0000);
1038
1039 /* Load the buffer into the wave engine */
1040 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xFF) << 8);
1041 apu_set_register(chip, apu, 5, pa & 0xFFFF);
1042 apu_set_register(chip, apu, 6, (pa + size) & 0xFFFF);
1043 /* setting loop == sample len */
1044 apu_set_register(chip, apu, 7, size);
1045
1046 /* clear effects/env.. */
1047 apu_set_register(chip, apu, 8, 0x0000);
1048 /* set amp now to 0xd0 (?), low byte is 'amplitude dest'? */
1049 apu_set_register(chip, apu, 9, 0xD000);
1050
1051 /* clear routing stuff */
1052 apu_set_register(chip, apu, 11, 0x0000);
1053 /* dma on, no envelopes, filter to all 1s) */
1054 apu_set_register(chip, apu, 0, 0x400F);
1055
1056 if (es->fmt & ESS_FMT_16BIT)
1057 es->apu_mode[channel] = ESM_APU_16BITLINEAR;
1058 else
1059 es->apu_mode[channel] = ESM_APU_8BITLINEAR;
1060
1061 if (es->fmt & ESS_FMT_STEREO) {
1062 /* set panning: left or right */
1063 /* Check: different panning. On my Canyon 3D Chipset the
1064 Channels are swapped. I don't know, about the output
1065 to the SPDif Link. Perhaps you have to change this
1066 and not the APU Regs 4-5. */
1067 apu_set_register(chip, apu, 10,
1068 0x8F00 | (channel ? 0 : 0x10));
1069 es->apu_mode[channel] += 1; /* stereo */
1070 } else
1071 apu_set_register(chip, apu, 10, 0x8F08);
1072 }
1073
1074 spin_lock_irqsave(&chip->reg_lock, flags);
1075 /* clear WP interrupts */
1076 outw(1, chip->io_port + 0x04);
1077 /* enable WP ints */
1078 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ);
1079 spin_unlock_irqrestore(&chip->reg_lock, flags);
1080
1081 freq = runtime->rate;
1082 /* set frequency */
1083 if (freq > 48000)
1084 freq = 48000;
1085 if (freq < 4000)
1086 freq = 4000;
1087
1088 /* hmmm.. */
1089 if (!(es->fmt & ESS_FMT_16BIT) && !(es->fmt & ESS_FMT_STEREO))
1090 freq >>= 1;
1091
1092 freq = snd_es1968_compute_rate(chip, freq);
1093
1094 /* Load the frequency, turn on 6dB */
1095 snd_es1968_apu_set_freq(chip, es->apu[0], freq);
1096 snd_es1968_apu_set_freq(chip, es->apu[1], freq);
1097}
1098
1099
1100static void init_capture_apu(struct es1968 *chip, struct esschan *es, int channel,
1101 unsigned int pa, unsigned int bsize,
1102 int mode, int route)
1103{
1104 int i, apu = es->apu[channel];
1105
1106 es->apu_mode[channel] = mode;
1107
1108 /* set the wavecache control reg */
1109 snd_es1968_program_wavecache(chip, es, channel, pa, 1);
1110
1111 /* Offset to PCMBAR */
1112 pa -= chip->dma.addr;
1113 pa >>= 1; /* words */
1114
1115 /* base offset of dma calcs when reading the pointer
1116 on this left one */
1117 es->base[channel] = pa & 0xFFFF;
1118 pa |= 0x00400000; /* bit 22 -> System RAM */
1119
1120 /* Begin loading the APU */
1121 for (i = 0; i < 16; i++)
1122 apu_set_register(chip, apu, i, 0x0000);
1123
1124 /* need to enable subgroups.. and we should probably
1125 have different groups for different /dev/dsps.. */
1126 apu_set_register(chip, apu, 2, 0x8);
1127
1128 /* Load the buffer into the wave engine */
1129 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xFF) << 8);
1130 apu_set_register(chip, apu, 5, pa & 0xFFFF);
1131 apu_set_register(chip, apu, 6, (pa + bsize) & 0xFFFF);
1132 apu_set_register(chip, apu, 7, bsize);
1133 /* clear effects/env.. */
1134 apu_set_register(chip, apu, 8, 0x00F0);
1135 /* amplitude now? sure. why not. */
1136 apu_set_register(chip, apu, 9, 0x0000);
1137 /* set filter tune, radius, polar pan */
1138 apu_set_register(chip, apu, 10, 0x8F08);
1139 /* route input */
1140 apu_set_register(chip, apu, 11, route);
1141 /* dma on, no envelopes, filter to all 1s) */
1142 apu_set_register(chip, apu, 0, 0x400F);
1143}
1144
1145static void snd_es1968_capture_setup(struct es1968 *chip, struct esschan *es,
1146 struct snd_pcm_runtime *runtime)
1147{
1148 int size;
1149 u32 freq;
1150 unsigned long flags;
1151
1152 size = es->dma_size >> es->wav_shift;
1153
1154 /* APU assignments:
1155 0 = mono/left SRC
1156 1 = right SRC
1157 2 = mono/left Input Mixer
1158 3 = right Input Mixer
1159 */
1160 /* data seems to flow from the codec, through an apu into
1161 the 'mixbuf' bit of page, then through the SRC apu
1162 and out to the real 'buffer'. ok. sure. */
1163
1164 /* input mixer (left/mono) */
1165 /* parallel in crap, see maestro reg 0xC [8-11] */
1166 init_capture_apu(chip, es, 2,
1167 es->mixbuf->buf.addr, ESM_MIXBUF_SIZE/4, /* in words */
1168 ESM_APU_INPUTMIXER, 0x14);
1169 /* SRC (left/mono); get input from inputing apu */
1170 init_capture_apu(chip, es, 0, es->memory->buf.addr, size,
1171 ESM_APU_SRCONVERTOR, es->apu[2]);
1172 if (es->fmt & ESS_FMT_STEREO) {
1173 /* input mixer (right) */
1174 init_capture_apu(chip, es, 3,
1175 es->mixbuf->buf.addr + ESM_MIXBUF_SIZE/2,
1176 ESM_MIXBUF_SIZE/4, /* in words */
1177 ESM_APU_INPUTMIXER, 0x15);
1178 /* SRC (right) */
1179 init_capture_apu(chip, es, 1,
1180 es->memory->buf.addr + size*2, size,
1181 ESM_APU_SRCONVERTOR, es->apu[3]);
1182 }
1183
1184 freq = runtime->rate;
1185 /* Sample Rate conversion APUs don't like 0x10000 for their rate */
1186 if (freq > 47999)
1187 freq = 47999;
1188 if (freq < 4000)
1189 freq = 4000;
1190
1191 freq = snd_es1968_compute_rate(chip, freq);
1192
1193 /* Load the frequency, turn on 6dB */
1194 snd_es1968_apu_set_freq(chip, es->apu[0], freq);
1195 snd_es1968_apu_set_freq(chip, es->apu[1], freq);
1196
1197 /* fix mixer rate at 48khz. and its _must_ be 0x10000. */
1198 freq = 0x10000;
1199 snd_es1968_apu_set_freq(chip, es->apu[2], freq);
1200 snd_es1968_apu_set_freq(chip, es->apu[3], freq);
1201
1202 spin_lock_irqsave(&chip->reg_lock, flags);
1203 /* clear WP interrupts */
1204 outw(1, chip->io_port + 0x04);
1205 /* enable WP ints */
1206 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ);
1207 spin_unlock_irqrestore(&chip->reg_lock, flags);
1208}
1209
1210/*******************
1211 * ALSA Interface *
1212 *******************/
1213
1214static int snd_es1968_pcm_prepare(struct snd_pcm_substream *substream)
1215{
1216 struct es1968 *chip = snd_pcm_substream_chip(substream);
1217 struct snd_pcm_runtime *runtime = substream->runtime;
1218 struct esschan *es = runtime->private_data;
1219
1220 es->dma_size = snd_pcm_lib_buffer_bytes(substream);
1221 es->frag_size = snd_pcm_lib_period_bytes(substream);
1222
1223 es->wav_shift = 1; /* maestro handles always 16bit */
1224 es->fmt = 0;
1225 if (snd_pcm_format_width(runtime->format) == 16)
1226 es->fmt |= ESS_FMT_16BIT;
1227 if (runtime->channels > 1) {
1228 es->fmt |= ESS_FMT_STEREO;
1229 if (es->fmt & ESS_FMT_16BIT) /* 8bit is already word shifted */
1230 es->wav_shift++;
1231 }
1232 es->bob_freq = snd_es1968_calc_bob_rate(chip, es, runtime);
1233
1234 switch (es->mode) {
1235 case ESM_MODE_PLAY:
1236 snd_es1968_playback_setup(chip, es, runtime);
1237 break;
1238 case ESM_MODE_CAPTURE:
1239 snd_es1968_capture_setup(chip, es, runtime);
1240 break;
1241 }
1242
1243 return 0;
1244}
1245
1246static int snd_es1968_pcm_trigger(struct snd_pcm_substream *substream, int cmd)
1247{
1248 struct es1968 *chip = snd_pcm_substream_chip(substream);
1249 struct esschan *es = substream->runtime->private_data;
1250
1251 spin_lock(&chip->substream_lock);
1252 switch (cmd) {
1253 case SNDRV_PCM_TRIGGER_START:
1254 case SNDRV_PCM_TRIGGER_RESUME:
1255 if (es->running)
1256 break;
1257 snd_es1968_bob_inc(chip, es->bob_freq);
1258 es->count = 0;
1259 es->hwptr = 0;
1260 snd_es1968_pcm_start(chip, es);
1261 es->running = 1;
1262 break;
1263 case SNDRV_PCM_TRIGGER_STOP:
1264 case SNDRV_PCM_TRIGGER_SUSPEND:
1265 if (! es->running)
1266 break;
1267 snd_es1968_pcm_stop(chip, es);
1268 es->running = 0;
1269 snd_es1968_bob_dec(chip);
1270 break;
1271 }
1272 spin_unlock(&chip->substream_lock);
1273 return 0;
1274}
1275
1276static snd_pcm_uframes_t snd_es1968_pcm_pointer(struct snd_pcm_substream *substream)
1277{
1278 struct es1968 *chip = snd_pcm_substream_chip(substream);
1279 struct esschan *es = substream->runtime->private_data;
1280 unsigned int ptr;
1281
1282 ptr = snd_es1968_get_dma_ptr(chip, es) << es->wav_shift;
1283
1284 return bytes_to_frames(substream->runtime, ptr % es->dma_size);
1285}
1286
1287static struct snd_pcm_hardware snd_es1968_playback = {
1288 .info = (SNDRV_PCM_INFO_MMAP |
1289 SNDRV_PCM_INFO_MMAP_VALID |
1290 SNDRV_PCM_INFO_INTERLEAVED |
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,
1296 .rate_min = 4000,
1297 .rate_max = 48000,
1298 .channels_min = 1,
1299 .channels_max = 2,
1300 .buffer_bytes_max = 65536,
1301 .period_bytes_min = 256,
1302 .period_bytes_max = 65536,
1303 .periods_min = 1,
1304 .periods_max = 1024,
1305 .fifo_size = 0,
1306};
1307
1308static struct snd_pcm_hardware snd_es1968_capture = {
1309 .info = (SNDRV_PCM_INFO_NONINTERLEAVED |
1310 SNDRV_PCM_INFO_MMAP |
1311 SNDRV_PCM_INFO_MMAP_VALID |
1312 SNDRV_PCM_INFO_BLOCK_TRANSFER |
1313 /*SNDRV_PCM_INFO_PAUSE |*/
1314 SNDRV_PCM_INFO_RESUME),
1315 .formats = /*SNDRV_PCM_FMTBIT_U8 |*/ SNDRV_PCM_FMTBIT_S16_LE,
1316 .rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
1317 .rate_min = 4000,
1318 .rate_max = 48000,
1319 .channels_min = 1,
1320 .channels_max = 2,
1321 .buffer_bytes_max = 65536,
1322 .period_bytes_min = 256,
1323 .period_bytes_max = 65536,
1324 .periods_min = 1,
1325 .periods_max = 1024,
1326 .fifo_size = 0,
1327};
1328
1329/* *************************
1330 * DMA memory management *
1331 *************************/
1332
1333/* Because the Maestro can only take addresses relative to the PCM base address
1334 register :( */
1335
1336static int calc_available_memory_size(struct es1968 *chip)
1337{
1338 int max_size = 0;
1339 struct esm_memory *buf;
1340
1341 mutex_lock(&chip->memory_mutex);
1342 list_for_each_entry(buf, &chip->buf_list, list) {
1343 if (buf->empty && buf->buf.bytes > max_size)
1344 max_size = buf->buf.bytes;
1345 }
1346 mutex_unlock(&chip->memory_mutex);
1347 if (max_size >= 128*1024)
1348 max_size = 127*1024;
1349 return max_size;
1350}
1351
1352/* allocate a new memory chunk with the specified size */
1353static struct esm_memory *snd_es1968_new_memory(struct es1968 *chip, int size)
1354{
1355 struct esm_memory *buf;
1356
1357 size = ALIGN(size, ESM_MEM_ALIGN);
1358 mutex_lock(&chip->memory_mutex);
1359 list_for_each_entry(buf, &chip->buf_list, list) {
1360 if (buf->empty && buf->buf.bytes >= size)
1361 goto __found;
1362 }
1363 mutex_unlock(&chip->memory_mutex);
1364 return NULL;
1365
1366__found:
1367 if (buf->buf.bytes > size) {
1368 struct esm_memory *chunk = kmalloc(sizeof(*chunk), GFP_KERNEL);
1369 if (chunk == NULL) {
1370 mutex_unlock(&chip->memory_mutex);
1371 return NULL;
1372 }
1373 chunk->buf = buf->buf;
1374 chunk->buf.bytes -= size;
1375 chunk->buf.area += size;
1376 chunk->buf.addr += size;
1377 chunk->empty = 1;
1378 buf->buf.bytes = size;
1379 list_add(&chunk->list, &buf->list);
1380 }
1381 buf->empty = 0;
1382 mutex_unlock(&chip->memory_mutex);
1383 return buf;
1384}
1385
1386/* free a memory chunk */
1387static void snd_es1968_free_memory(struct es1968 *chip, struct esm_memory *buf)
1388{
1389 struct esm_memory *chunk;
1390
1391 mutex_lock(&chip->memory_mutex);
1392 buf->empty = 1;
1393 if (buf->list.prev != &chip->buf_list) {
1394 chunk = list_entry(buf->list.prev, struct esm_memory, list);
1395 if (chunk->empty) {
1396 chunk->buf.bytes += buf->buf.bytes;
1397 list_del(&buf->list);
1398 kfree(buf);
1399 buf = chunk;
1400 }
1401 }
1402 if (buf->list.next != &chip->buf_list) {
1403 chunk = list_entry(buf->list.next, struct esm_memory, list);
1404 if (chunk->empty) {
1405 buf->buf.bytes += chunk->buf.bytes;
1406 list_del(&chunk->list);
1407 kfree(chunk);
1408 }
1409 }
1410 mutex_unlock(&chip->memory_mutex);
1411}
1412
1413static void snd_es1968_free_dmabuf(struct es1968 *chip)
1414{
1415 struct list_head *p;
1416
1417 if (! chip->dma.area)
1418 return;
1419 snd_dma_reserve_buf(&chip->dma, snd_dma_pci_buf_id(chip->pci));
1420 while ((p = chip->buf_list.next) != &chip->buf_list) {
1421 struct esm_memory *chunk = list_entry(p, struct esm_memory, list);
1422 list_del(p);
1423 kfree(chunk);
1424 }
1425}
1426
1427static int __devinit
1428snd_es1968_init_dmabuf(struct es1968 *chip)
1429{
1430 int err;
1431 struct esm_memory *chunk;
1432
1433 chip->dma.dev.type = SNDRV_DMA_TYPE_DEV;
1434 chip->dma.dev.dev = snd_dma_pci_data(chip->pci);
1435 if (! snd_dma_get_reserved_buf(&chip->dma, snd_dma_pci_buf_id(chip->pci))) {
1436 err = snd_dma_alloc_pages_fallback(SNDRV_DMA_TYPE_DEV,
1437 snd_dma_pci_data(chip->pci),
1438 chip->total_bufsize, &chip->dma);
1439 if (err < 0 || ! chip->dma.area) {
1440 snd_printk(KERN_ERR "es1968: can't allocate dma pages for size %d\n",
1441 chip->total_bufsize);
1442 return -ENOMEM;
1443 }
1444 if ((chip->dma.addr + chip->dma.bytes - 1) & ~((1 << 28) - 1)) {
1445 snd_dma_free_pages(&chip->dma);
1446 snd_printk(KERN_ERR "es1968: DMA buffer beyond 256MB.\n");
1447 return -ENOMEM;
1448 }
1449 }
1450
1451 INIT_LIST_HEAD(&chip->buf_list);
1452 /* allocate an empty chunk */
1453 chunk = kmalloc(sizeof(*chunk), GFP_KERNEL);
1454 if (chunk == NULL) {
1455 snd_es1968_free_dmabuf(chip);
1456 return -ENOMEM;
1457 }
1458 memset(chip->dma.area, 0, ESM_MEM_ALIGN);
1459 chunk->buf = chip->dma;
1460 chunk->buf.area += ESM_MEM_ALIGN;
1461 chunk->buf.addr += ESM_MEM_ALIGN;
1462 chunk->buf.bytes -= ESM_MEM_ALIGN;
1463 chunk->empty = 1;
1464 list_add(&chunk->list, &chip->buf_list);
1465
1466 return 0;
1467}
1468
1469/* setup the dma_areas */
1470/* buffer is extracted from the pre-allocated memory chunk */
1471static int snd_es1968_hw_params(struct snd_pcm_substream *substream,
1472 struct snd_pcm_hw_params *hw_params)
1473{
1474 struct es1968 *chip = snd_pcm_substream_chip(substream);
1475 struct snd_pcm_runtime *runtime = substream->runtime;
1476 struct esschan *chan = runtime->private_data;
1477 int size = params_buffer_bytes(hw_params);
1478
1479 if (chan->memory) {
1480 if (chan->memory->buf.bytes >= size) {
1481 runtime->dma_bytes = size;
1482 return 0;
1483 }
1484 snd_es1968_free_memory(chip, chan->memory);
1485 }
1486 chan->memory = snd_es1968_new_memory(chip, size);
1487 if (chan->memory == NULL) {
1488 // snd_printd("cannot allocate dma buffer: size = %d\n", size);
1489 return -ENOMEM;
1490 }
1491 snd_pcm_set_runtime_buffer(substream, &chan->memory->buf);
1492 return 1; /* area was changed */
1493}
1494
1495/* remove dma areas if allocated */
1496static int snd_es1968_hw_free(struct snd_pcm_substream *substream)
1497{
1498 struct es1968 *chip = snd_pcm_substream_chip(substream);
1499 struct snd_pcm_runtime *runtime = substream->runtime;
1500 struct esschan *chan;
1501
1502 if (runtime->private_data == NULL)
1503 return 0;
1504 chan = runtime->private_data;
1505 if (chan->memory) {
1506 snd_es1968_free_memory(chip, chan->memory);
1507 chan->memory = NULL;
1508 }
1509 return 0;
1510}
1511
1512
1513/*
1514 * allocate APU pair
1515 */
1516static int snd_es1968_alloc_apu_pair(struct es1968 *chip, int type)
1517{
1518 int apu;
1519
1520 for (apu = 0; apu < NR_APUS; apu += 2) {
1521 if (chip->apu[apu] == ESM_APU_FREE &&
1522 chip->apu[apu + 1] == ESM_APU_FREE) {
1523 chip->apu[apu] = chip->apu[apu + 1] = type;
1524 return apu;
1525 }
1526 }
1527 return -EBUSY;
1528}
1529
1530/*
1531 * release APU pair
1532 */
1533static void snd_es1968_free_apu_pair(struct es1968 *chip, int apu)
1534{
1535 chip->apu[apu] = chip->apu[apu + 1] = ESM_APU_FREE;
1536}
1537
1538
1539/******************
1540 * PCM open/close *
1541 ******************/
1542
1543static int snd_es1968_playback_open(struct snd_pcm_substream *substream)
1544{
1545 struct es1968 *chip = snd_pcm_substream_chip(substream);
1546 struct snd_pcm_runtime *runtime = substream->runtime;
1547 struct esschan *es;
1548 int apu1;
1549
1550 /* search 2 APUs */
1551 apu1 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_PLAY);
1552 if (apu1 < 0)
1553 return apu1;
1554
1555 es = kzalloc(sizeof(*es), GFP_KERNEL);
1556 if (!es) {
1557 snd_es1968_free_apu_pair(chip, apu1);
1558 return -ENOMEM;
1559 }
1560
1561 es->apu[0] = apu1;
1562 es->apu[1] = apu1 + 1;
1563 es->apu_mode[0] = 0;
1564 es->apu_mode[1] = 0;
1565 es->running = 0;
1566 es->substream = substream;
1567 es->mode = ESM_MODE_PLAY;
1568
1569 runtime->private_data = es;
1570 runtime->hw = snd_es1968_playback;
1571 runtime->hw.buffer_bytes_max = runtime->hw.period_bytes_max =
1572 calc_available_memory_size(chip);
1573
1574 spin_lock_irq(&chip->substream_lock);
1575 list_add(&es->list, &chip->substream_list);
1576 spin_unlock_irq(&chip->substream_lock);
1577
1578 return 0;
1579}
1580
1581static int snd_es1968_capture_open(struct snd_pcm_substream *substream)
1582{
1583 struct snd_pcm_runtime *runtime = substream->runtime;
1584 struct es1968 *chip = snd_pcm_substream_chip(substream);
1585 struct esschan *es;
1586 int apu1, apu2;
1587
1588 apu1 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_CAPTURE);
1589 if (apu1 < 0)
1590 return apu1;
1591 apu2 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_RATECONV);
1592 if (apu2 < 0) {
1593 snd_es1968_free_apu_pair(chip, apu1);
1594 return apu2;
1595 }
1596
1597 es = kzalloc(sizeof(*es), GFP_KERNEL);
1598 if (!es) {
1599 snd_es1968_free_apu_pair(chip, apu1);
1600 snd_es1968_free_apu_pair(chip, apu2);
1601 return -ENOMEM;
1602 }
1603
1604 es->apu[0] = apu1;
1605 es->apu[1] = apu1 + 1;
1606 es->apu[2] = apu2;
1607 es->apu[3] = apu2 + 1;
1608 es->apu_mode[0] = 0;
1609 es->apu_mode[1] = 0;
1610 es->apu_mode[2] = 0;
1611 es->apu_mode[3] = 0;
1612 es->running = 0;
1613 es->substream = substream;
1614 es->mode = ESM_MODE_CAPTURE;
1615
1616 /* get mixbuffer */
1617 if ((es->mixbuf = snd_es1968_new_memory(chip, ESM_MIXBUF_SIZE)) == NULL) {
1618 snd_es1968_free_apu_pair(chip, apu1);
1619 snd_es1968_free_apu_pair(chip, apu2);
1620 kfree(es);
1621 return -ENOMEM;
1622 }
1623 memset(es->mixbuf->buf.area, 0, ESM_MIXBUF_SIZE);
1624
1625 runtime->private_data = es;
1626 runtime->hw = snd_es1968_capture;
1627 runtime->hw.buffer_bytes_max = runtime->hw.period_bytes_max =
1628 calc_available_memory_size(chip) - 1024; /* keep MIXBUF size */
1629 snd_pcm_hw_constraint_pow2(runtime, 0, SNDRV_PCM_HW_PARAM_BUFFER_BYTES);
1630
1631 spin_lock_irq(&chip->substream_lock);
1632 list_add(&es->list, &chip->substream_list);
1633 spin_unlock_irq(&chip->substream_lock);
1634
1635 return 0;
1636}
1637
1638static int snd_es1968_playback_close(struct snd_pcm_substream *substream)
1639{
1640 struct es1968 *chip = snd_pcm_substream_chip(substream);
1641 struct esschan *es;
1642
1643 if (substream->runtime->private_data == NULL)
1644 return 0;
1645 es = substream->runtime->private_data;
1646 spin_lock_irq(&chip->substream_lock);
1647 list_del(&es->list);
1648 spin_unlock_irq(&chip->substream_lock);
1649 snd_es1968_free_apu_pair(chip, es->apu[0]);
1650 kfree(es);
1651
1652 return 0;
1653}
1654
1655static int snd_es1968_capture_close(struct snd_pcm_substream *substream)
1656{
1657 struct es1968 *chip = snd_pcm_substream_chip(substream);
1658 struct esschan *es;
1659
1660 if (substream->runtime->private_data == NULL)
1661 return 0;
1662 es = substream->runtime->private_data;
1663 spin_lock_irq(&chip->substream_lock);
1664 list_del(&es->list);
1665 spin_unlock_irq(&chip->substream_lock);
1666 snd_es1968_free_memory(chip, es->mixbuf);
1667 snd_es1968_free_apu_pair(chip, es->apu[0]);
1668 snd_es1968_free_apu_pair(chip, es->apu[2]);
1669 kfree(es);
1670
1671 return 0;
1672}
1673
1674static struct snd_pcm_ops snd_es1968_playback_ops = {
1675 .open = snd_es1968_playback_open,
1676 .close = snd_es1968_playback_close,
1677 .ioctl = snd_pcm_lib_ioctl,
1678 .hw_params = snd_es1968_hw_params,
1679 .hw_free = snd_es1968_hw_free,
1680 .prepare = snd_es1968_pcm_prepare,
1681 .trigger = snd_es1968_pcm_trigger,
1682 .pointer = snd_es1968_pcm_pointer,
1683};
1684
1685static struct snd_pcm_ops snd_es1968_capture_ops = {
1686 .open = snd_es1968_capture_open,
1687 .close = snd_es1968_capture_close,
1688 .ioctl = snd_pcm_lib_ioctl,
1689 .hw_params = snd_es1968_hw_params,
1690 .hw_free = snd_es1968_hw_free,
1691 .prepare = snd_es1968_pcm_prepare,
1692 .trigger = snd_es1968_pcm_trigger,
1693 .pointer = snd_es1968_pcm_pointer,
1694};
1695
1696
1697/*
1698 * measure clock
1699 */
1700#define CLOCK_MEASURE_BUFSIZE 16768 /* enough large for a single shot */
1701
1702static void __devinit es1968_measure_clock(struct es1968 *chip)
1703{
1704 int i, apu;
1705 unsigned int pa, offset, t;
1706 struct esm_memory *memory;
1707 struct timeval start_time, stop_time;
1708
1709 if (chip->clock == 0)
1710 chip->clock = 48000; /* default clock value */
1711
1712 /* search 2 APUs (although one apu is enough) */
1713 if ((apu = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_PLAY)) < 0) {
1714 snd_printk(KERN_ERR "Hmm, cannot find empty APU pair!?\n");
1715 return;
1716 }
1717 if ((memory = snd_es1968_new_memory(chip, CLOCK_MEASURE_BUFSIZE)) == NULL) {
1718 snd_printk(KERN_ERR "cannot allocate dma buffer - using default clock %d\n", chip->clock);
1719 snd_es1968_free_apu_pair(chip, apu);
1720 return;
1721 }
1722
1723 memset(memory->buf.area, 0, CLOCK_MEASURE_BUFSIZE);
1724
1725 wave_set_register(chip, apu << 3, (memory->buf.addr - 0x10) & 0xfff8);
1726
1727 pa = (unsigned int)((memory->buf.addr - chip->dma.addr) >> 1);
1728 pa |= 0x00400000; /* System RAM (Bit 22) */
1729
1730 /* initialize apu */
1731 for (i = 0; i < 16; i++)
1732 apu_set_register(chip, apu, i, 0x0000);
1733
1734 apu_set_register(chip, apu, 0, 0x400f);
1735 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xff) << 8);
1736 apu_set_register(chip, apu, 5, pa & 0xffff);
1737 apu_set_register(chip, apu, 6, (pa + CLOCK_MEASURE_BUFSIZE/2) & 0xffff);
1738 apu_set_register(chip, apu, 7, CLOCK_MEASURE_BUFSIZE/2);
1739 apu_set_register(chip, apu, 8, 0x0000);
1740 apu_set_register(chip, apu, 9, 0xD000);
1741 apu_set_register(chip, apu, 10, 0x8F08);
1742 apu_set_register(chip, apu, 11, 0x0000);
1743 spin_lock_irq(&chip->reg_lock);
1744 outw(1, chip->io_port + 0x04); /* clear WP interrupts */
1745 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ); /* enable WP ints */
1746 spin_unlock_irq(&chip->reg_lock);
1747
1748 snd_es1968_apu_set_freq(chip, apu, ((unsigned int)48000 << 16) / chip->clock); /* 48000 Hz */
1749
1750 chip->in_measurement = 1;
1751 chip->measure_apu = apu;
1752 spin_lock_irq(&chip->reg_lock);
1753 snd_es1968_bob_inc(chip, ESM_BOB_FREQ);
1754 __apu_set_register(chip, apu, 5, pa & 0xffff);
1755 snd_es1968_trigger_apu(chip, apu, ESM_APU_16BITLINEAR);
1756 do_gettimeofday(&start_time);
1757 spin_unlock_irq(&chip->reg_lock);
1758 msleep(50);
1759 spin_lock_irq(&chip->reg_lock);
1760 offset = __apu_get_register(chip, apu, 5);
1761 do_gettimeofday(&stop_time);
1762 snd_es1968_trigger_apu(chip, apu, 0); /* stop */
1763 snd_es1968_bob_dec(chip);
1764 chip->in_measurement = 0;
1765 spin_unlock_irq(&chip->reg_lock);
1766
1767 /* check the current position */
1768 offset -= (pa & 0xffff);
1769 offset &= 0xfffe;
1770 offset += chip->measure_count * (CLOCK_MEASURE_BUFSIZE/2);
1771
1772 t = stop_time.tv_sec - start_time.tv_sec;
1773 t *= 1000000;
1774 if (stop_time.tv_usec < start_time.tv_usec)
1775 t -= start_time.tv_usec - stop_time.tv_usec;
1776 else
1777 t += stop_time.tv_usec - start_time.tv_usec;
1778 if (t == 0) {
1779 snd_printk(KERN_ERR "?? calculation error..\n");
1780 } else {
1781 offset *= 1000;
1782 offset = (offset / t) * 1000 + ((offset % t) * 1000) / t;
1783 if (offset < 47500 || offset > 48500) {
1784 if (offset >= 40000 && offset <= 50000)
1785 chip->clock = (chip->clock * offset) / 48000;
1786 }
1787 printk(KERN_INFO "es1968: clocking to %d\n", chip->clock);
1788 }
1789 snd_es1968_free_memory(chip, memory);
1790 snd_es1968_free_apu_pair(chip, apu);
1791}
1792
1793
1794/*
1795 */
1796
1797static void snd_es1968_pcm_free(struct snd_pcm *pcm)
1798{
1799 struct es1968 *esm = pcm->private_data;
1800 snd_es1968_free_dmabuf(esm);
1801 esm->pcm = NULL;
1802}
1803
1804static int __devinit
1805snd_es1968_pcm(struct es1968 *chip, int device)
1806{
1807 struct snd_pcm *pcm;
1808 int err;
1809
1810 /* get DMA buffer */
1811 if ((err = snd_es1968_init_dmabuf(chip)) < 0)
1812 return err;
1813
1814 /* set PCMBAR */
1815 wave_set_register(chip, 0x01FC, chip->dma.addr >> 12);
1816 wave_set_register(chip, 0x01FD, chip->dma.addr >> 12);
1817 wave_set_register(chip, 0x01FE, chip->dma.addr >> 12);
1818 wave_set_register(chip, 0x01FF, chip->dma.addr >> 12);
1819
1820 if ((err = snd_pcm_new(chip->card, "ESS Maestro", device,
1821 chip->playback_streams,
1822 chip->capture_streams, &pcm)) < 0)
1823 return err;
1824
1825 pcm->private_data = chip;
1826 pcm->private_free = snd_es1968_pcm_free;
1827
1828 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_es1968_playback_ops);
1829 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_es1968_capture_ops);
1830
1831 pcm->info_flags = 0;
1832
1833 strcpy(pcm->name, "ESS Maestro");
1834
1835 chip->pcm = pcm;
1836
1837 return 0;
1838}
1839/*
1840 * suppress jitter on some maestros when playing stereo
1841 */
1842static void snd_es1968_suppress_jitter(struct es1968 *chip, struct esschan *es)
1843{
1844 unsigned int cp1;
1845 unsigned int cp2;
1846 unsigned int diff;
1847
1848 cp1 = __apu_get_register(chip, 0, 5);
1849 cp2 = __apu_get_register(chip, 1, 5);
1850 diff = (cp1 > cp2 ? cp1 - cp2 : cp2 - cp1);
1851
1852 if (diff > 1)
1853 __maestro_write(chip, IDR0_DATA_PORT, cp1);
1854}
1855
1856/*
1857 * update pointer
1858 */
1859static void snd_es1968_update_pcm(struct es1968 *chip, struct esschan *es)
1860{
1861 unsigned int hwptr;
1862 unsigned int diff;
1863 struct snd_pcm_substream *subs = es->substream;
1864
1865 if (subs == NULL || !es->running)
1866 return;
1867
1868 hwptr = snd_es1968_get_dma_ptr(chip, es) << es->wav_shift;
1869 hwptr %= es->dma_size;
1870
1871 diff = (es->dma_size + hwptr - es->hwptr) % es->dma_size;
1872
1873 es->hwptr = hwptr;
1874 es->count += diff;
1875
1876 if (es->count > es->frag_size) {
1877 spin_unlock(&chip->substream_lock);
1878 snd_pcm_period_elapsed(subs);
1879 spin_lock(&chip->substream_lock);
1880 es->count %= es->frag_size;
1881 }
1882}
1883
1884/* The hardware volume works by incrementing / decrementing 2 counters
1885 (without wrap around) in response to volume button presses and then
1886 generating an interrupt. The pair of counters is stored in bits 1-3 and 5-7
1887 of a byte wide register. The meaning of bits 0 and 4 is unknown. */
1888static void es1968_update_hw_volume(struct work_struct *work)
1889{
1890 struct es1968 *chip = container_of(work, struct es1968, hwvol_work);
1891 int x, val;
1892
1893 /* Figure out which volume control button was pushed,
1894 based on differences from the default register
1895 values. */
1896 x = inb(chip->io_port + 0x1c) & 0xee;
1897 /* Reset the volume control registers. */
1898 outb(0x88, chip->io_port + 0x1c);
1899 outb(0x88, chip->io_port + 0x1d);
1900 outb(0x88, chip->io_port + 0x1e);
1901 outb(0x88, chip->io_port + 0x1f);
1902
1903 if (chip->in_suspend)
1904 return;
1905
1906#ifndef CONFIG_SND_ES1968_INPUT
1907 if (! chip->master_switch || ! chip->master_volume)
1908 return;
1909
1910 val = snd_ac97_read(chip->ac97, AC97_MASTER);
1911 switch (x) {
1912 case 0x88:
1913 /* mute */
1914 val ^= 0x8000;
1915 break;
1916 case 0xaa:
1917 /* volume up */
1918 if ((val & 0x7f) > 0)
1919 val--;
1920 if ((val & 0x7f00) > 0)
1921 val -= 0x0100;
1922 break;
1923 case 0x66:
1924 /* volume down */
1925 if ((val & 0x7f) < 0x1f)
1926 val++;
1927 if ((val & 0x7f00) < 0x1f00)
1928 val += 0x0100;
1929 break;
1930 }
1931 if (snd_ac97_update(chip->ac97, AC97_MASTER, val))
1932 snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
1933 &chip->master_volume->id);
1934#else
1935 if (!chip->input_dev)
1936 return;
1937
1938 val = 0;
1939 switch (x) {
1940 case 0x88:
1941 /* The counters have not changed, yet we've received a HV
1942 interrupt. According to tests run by various people this
1943 happens when pressing the mute button. */
1944 val = KEY_MUTE;
1945 break;
1946 case 0xaa:
1947 /* counters increased by 1 -> volume up */
1948 val = KEY_VOLUMEUP;
1949 break;
1950 case 0x66:
1951 /* counters decreased by 1 -> volume down */
1952 val = KEY_VOLUMEDOWN;
1953 break;
1954 }
1955
1956 if (val) {
1957 input_report_key(chip->input_dev, val, 1);
1958 input_sync(chip->input_dev);
1959 input_report_key(chip->input_dev, val, 0);
1960 input_sync(chip->input_dev);
1961 }
1962#endif
1963}
1964
1965/*
1966 * interrupt handler
1967 */
1968static irqreturn_t snd_es1968_interrupt(int irq, void *dev_id)
1969{
1970 struct es1968 *chip = dev_id;
1971 u32 event;
1972
1973 if (!(event = inb(chip->io_port + 0x1A)))
1974 return IRQ_NONE;
1975
1976 outw(inw(chip->io_port + 4) & 1, chip->io_port + 4);
1977
1978 if (event & ESM_HWVOL_IRQ)
1979 schedule_work(&chip->hwvol_work);
1980
1981 /* else ack 'em all, i imagine */
1982 outb(0xFF, chip->io_port + 0x1A);
1983
1984 if ((event & ESM_MPU401_IRQ) && chip->rmidi) {
1985 snd_mpu401_uart_interrupt(irq, chip->rmidi->private_data);
1986 }
1987
1988 if (event & ESM_SOUND_IRQ) {
1989 struct esschan *es;
1990 spin_lock(&chip->substream_lock);
1991 list_for_each_entry(es, &chip->substream_list, list) {
1992 if (es->running) {
1993 snd_es1968_update_pcm(chip, es);
1994 if (es->fmt & ESS_FMT_STEREO)
1995 snd_es1968_suppress_jitter(chip, es);
1996 }
1997 }
1998 spin_unlock(&chip->substream_lock);
1999 if (chip->in_measurement) {
2000 unsigned int curp = __apu_get_register(chip, chip->measure_apu, 5);
2001 if (curp < chip->measure_lastpos)
2002 chip->measure_count++;
2003 chip->measure_lastpos = curp;
2004 }
2005 }
2006
2007 return IRQ_HANDLED;
2008}
2009
2010/*
2011 * Mixer stuff
2012 */
2013
2014static int __devinit
2015snd_es1968_mixer(struct es1968 *chip)
2016{
2017 struct snd_ac97_bus *pbus;
2018 struct snd_ac97_template ac97;
2019#ifndef CONFIG_SND_ES1968_INPUT
2020 struct snd_ctl_elem_id elem_id;
2021#endif
2022 int err;
2023 static struct snd_ac97_bus_ops ops = {
2024 .write = snd_es1968_ac97_write,
2025 .read = snd_es1968_ac97_read,
2026 };
2027
2028 if ((err = snd_ac97_bus(chip->card, 0, &ops, NULL, &pbus)) < 0)
2029 return err;
2030 pbus->no_vra = 1; /* ES1968 doesn't need VRA */
2031
2032 memset(&ac97, 0, sizeof(ac97));
2033 ac97.private_data = chip;
2034 if ((err = snd_ac97_mixer(pbus, &ac97, &chip->ac97)) < 0)
2035 return err;
2036
2037#ifndef CONFIG_SND_ES1968_INPUT
2038 /* attach master switch / volumes for h/w volume control */
2039 memset(&elem_id, 0, sizeof(elem_id));
2040 elem_id.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
2041 strcpy(elem_id.name, "Master Playback Switch");
2042 chip->master_switch = snd_ctl_find_id(chip->card, &elem_id);
2043 memset(&elem_id, 0, sizeof(elem_id));
2044 elem_id.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
2045 strcpy(elem_id.name, "Master Playback Volume");
2046 chip->master_volume = snd_ctl_find_id(chip->card, &elem_id);
2047#endif
2048
2049 return 0;
2050}
2051
2052/*
2053 * reset ac97 codec
2054 */
2055
2056static void snd_es1968_ac97_reset(struct es1968 *chip)
2057{
2058 unsigned long ioaddr = chip->io_port;
2059
2060 unsigned short save_ringbus_a;
2061 unsigned short save_68;
2062 unsigned short w;
2063 unsigned int vend;
2064
2065 /* save configuration */
2066 save_ringbus_a = inw(ioaddr + 0x36);
2067
2068 //outw(inw(ioaddr + 0x38) & 0xfffc, ioaddr + 0x38); /* clear second codec id? */
2069 /* set command/status address i/o to 1st codec */
2070 outw(inw(ioaddr + 0x3a) & 0xfffc, ioaddr + 0x3a);
2071 outw(inw(ioaddr + 0x3c) & 0xfffc, ioaddr + 0x3c);
2072
2073 /* disable ac link */
2074 outw(0x0000, ioaddr + 0x36);
2075 save_68 = inw(ioaddr + 0x68);
2076 pci_read_config_word(chip->pci, 0x58, &w); /* something magical with gpio and bus arb. */
2077 pci_read_config_dword(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend);
2078 if (w & 1)
2079 save_68 |= 0x10;
2080 outw(0xfffe, ioaddr + 0x64); /* unmask gpio 0 */
2081 outw(0x0001, ioaddr + 0x68); /* gpio write */
2082 outw(0x0000, ioaddr + 0x60); /* write 0 to gpio 0 */
2083 udelay(20);
2084 outw(0x0001, ioaddr + 0x60); /* write 1 to gpio 1 */
2085 msleep(20);
2086
2087 outw(save_68 | 0x1, ioaddr + 0x68); /* now restore .. */
2088 outw((inw(ioaddr + 0x38) & 0xfffc) | 0x1, ioaddr + 0x38);
2089 outw((inw(ioaddr + 0x3a) & 0xfffc) | 0x1, ioaddr + 0x3a);
2090 outw((inw(ioaddr + 0x3c) & 0xfffc) | 0x1, ioaddr + 0x3c);
2091
2092 /* now the second codec */
2093 /* disable ac link */
2094 outw(0x0000, ioaddr + 0x36);
2095 outw(0xfff7, ioaddr + 0x64); /* unmask gpio 3 */
2096 save_68 = inw(ioaddr + 0x68);
2097 outw(0x0009, ioaddr + 0x68); /* gpio write 0 & 3 ?? */
2098 outw(0x0001, ioaddr + 0x60); /* write 1 to gpio */
2099 udelay(20);
2100 outw(0x0009, ioaddr + 0x60); /* write 9 to gpio */
2101 msleep(500);
2102 //outw(inw(ioaddr + 0x38) & 0xfffc, ioaddr + 0x38);
2103 outw(inw(ioaddr + 0x3a) & 0xfffc, ioaddr + 0x3a);
2104 outw(inw(ioaddr + 0x3c) & 0xfffc, ioaddr + 0x3c);
2105
2106#if 0 /* the loop here needs to be much better if we want it.. */
2107 snd_printk(KERN_INFO "trying software reset\n");
2108 /* try and do a software reset */
2109 outb(0x80 | 0x7c, ioaddr + 0x30);
2110 for (w = 0;; w++) {
2111 if ((inw(ioaddr + 0x30) & 1) == 0) {
2112 if (inb(ioaddr + 0x32) != 0)
2113 break;
2114
2115 outb(0x80 | 0x7d, ioaddr + 0x30);
2116 if (((inw(ioaddr + 0x30) & 1) == 0)
2117 && (inb(ioaddr + 0x32) != 0))
2118 break;
2119 outb(0x80 | 0x7f, ioaddr + 0x30);
2120 if (((inw(ioaddr + 0x30) & 1) == 0)
2121 && (inb(ioaddr + 0x32) != 0))
2122 break;
2123 }
2124
2125 if (w > 10000) {
2126 outb(inb(ioaddr + 0x37) | 0x08, ioaddr + 0x37); /* do a software reset */
2127 msleep(500); /* oh my.. */
2128 outb(inb(ioaddr + 0x37) & ~0x08,
2129 ioaddr + 0x37);
2130 udelay(1);
2131 outw(0x80, ioaddr + 0x30);
2132 for (w = 0; w < 10000; w++) {
2133 if ((inw(ioaddr + 0x30) & 1) == 0)
2134 break;
2135 }
2136 }
2137 }
2138#endif
2139 if (vend == NEC_VERSA_SUBID1 || vend == NEC_VERSA_SUBID2) {
2140 /* turn on external amp? */
2141 outw(0xf9ff, ioaddr + 0x64);
2142 outw(inw(ioaddr + 0x68) | 0x600, ioaddr + 0x68);
2143 outw(0x0209, ioaddr + 0x60);
2144 }
2145
2146 /* restore.. */
2147 outw(save_ringbus_a, ioaddr + 0x36);
2148
2149 /* Turn on the 978 docking chip.
2150 First frob the "master output enable" bit,
2151 then set most of the playback volume control registers to max. */
2152 outb(inb(ioaddr+0xc0)|(1<<5), ioaddr+0xc0);
2153 outb(0xff, ioaddr+0xc3);
2154 outb(0xff, ioaddr+0xc4);
2155 outb(0xff, ioaddr+0xc6);
2156 outb(0xff, ioaddr+0xc8);
2157 outb(0x3f, ioaddr+0xcf);
2158 outb(0x3f, ioaddr+0xd0);
2159}
2160
2161static void snd_es1968_reset(struct es1968 *chip)
2162{
2163 /* Reset */
2164 outw(ESM_RESET_MAESTRO | ESM_RESET_DIRECTSOUND,
2165 chip->io_port + ESM_PORT_HOST_IRQ);
2166 udelay(10);
2167 outw(0x0000, chip->io_port + ESM_PORT_HOST_IRQ);
2168 udelay(10);
2169}
2170
2171/*
2172 * initialize maestro chip
2173 */
2174static void snd_es1968_chip_init(struct es1968 *chip)
2175{
2176 struct pci_dev *pci = chip->pci;
2177 int i;
2178 unsigned long iobase = chip->io_port;
2179 u16 w;
2180 u32 n;
2181
2182 /* We used to muck around with pci config space that
2183 * we had no business messing with. We don't know enough
2184 * about the machine to know which DMA mode is appropriate,
2185 * etc. We were guessing wrong on some machines and making
2186 * them unhappy. We now trust in the BIOS to do things right,
2187 * which almost certainly means a new host of problems will
2188 * arise with broken BIOS implementations. screw 'em.
2189 * We're already intolerant of machines that don't assign
2190 * IRQs.
2191 */
2192
2193 /* Config Reg A */
2194 pci_read_config_word(pci, ESM_CONFIG_A, &w);
2195
2196 w &= ~DMA_CLEAR; /* Clear DMA bits */
2197 w &= ~(PIC_SNOOP1 | PIC_SNOOP2); /* Clear Pic Snoop Mode Bits */
2198 w &= ~SAFEGUARD; /* Safeguard off */
2199 w |= POST_WRITE; /* Posted write */
2200 w |= PCI_TIMING; /* PCI timing on */
2201 /* XXX huh? claims to be reserved.. */
2202 w &= ~SWAP_LR; /* swap left/right
2203 seems to only have effect on SB
2204 Emulation */
2205 w &= ~SUBTR_DECODE; /* Subtractive decode off */
2206
2207 pci_write_config_word(pci, ESM_CONFIG_A, w);
2208
2209 /* Config Reg B */
2210
2211 pci_read_config_word(pci, ESM_CONFIG_B, &w);
2212
2213 w &= ~(1 << 15); /* Turn off internal clock multiplier */
2214 /* XXX how do we know which to use? */
2215 w &= ~(1 << 14); /* External clock */
2216
2217 w &= ~SPDIF_CONFB; /* disable S/PDIF output */
2218 w |= HWV_CONFB; /* HWV on */
2219 w |= DEBOUNCE; /* Debounce off: easier to push the HW buttons */
2220 w &= ~GPIO_CONFB; /* GPIO 4:5 */
2221 w |= CHI_CONFB; /* Disconnect from the CHI. Enabling this made a dell 7500 work. */
2222 w &= ~IDMA_CONFB; /* IDMA off (undocumented) */
2223 w &= ~MIDI_FIX; /* MIDI fix off (undoc) */
2224 w &= ~(1 << 1); /* reserved, always write 0 */
2225 w &= ~IRQ_TO_ISA; /* IRQ to ISA off (undoc) */
2226
2227 pci_write_config_word(pci, ESM_CONFIG_B, w);
2228
2229 /* DDMA off */
2230
2231 pci_read_config_word(pci, ESM_DDMA, &w);
2232 w &= ~(1 << 0);
2233 pci_write_config_word(pci, ESM_DDMA, w);
2234
2235 /*
2236 * Legacy mode
2237 */
2238
2239 pci_read_config_word(pci, ESM_LEGACY_AUDIO_CONTROL, &w);
2240
2241 w |= ESS_DISABLE_AUDIO; /* Disable Legacy Audio */
2242 w &= ~ESS_ENABLE_SERIAL_IRQ; /* Disable SIRQ */
2243 w &= ~(0x1f); /* disable mpu irq/io, game port, fm, SB */
2244
2245 pci_write_config_word(pci, ESM_LEGACY_AUDIO_CONTROL, w);
2246
2247 /* Set up 978 docking control chip. */
2248 pci_read_config_word(pci, 0x58, &w);
2249 w|=1<<2; /* Enable 978. */
2250 w|=1<<3; /* Turn on 978 hardware volume control. */
2251 w&=~(1<<11); /* Turn on 978 mixer volume control. */
2252 pci_write_config_word(pci, 0x58, w);
2253
2254 /* Sound Reset */
2255
2256 snd_es1968_reset(chip);
2257
2258 /*
2259 * Ring Bus Setup
2260 */
2261
2262 /* setup usual 0x34 stuff.. 0x36 may be chip specific */
2263 outw(0xC090, iobase + ESM_RING_BUS_DEST); /* direct sound, stereo */
2264 udelay(20);
2265 outw(0x3000, iobase + ESM_RING_BUS_CONTR_A); /* enable ringbus/serial */
2266 udelay(20);
2267
2268 /*
2269 * Reset the CODEC
2270 */
2271
2272 snd_es1968_ac97_reset(chip);
2273
2274 /* Ring Bus Control B */
2275
2276 n = inl(iobase + ESM_RING_BUS_CONTR_B);
2277 n &= ~RINGB_EN_SPDIF; /* SPDIF off */
2278 //w |= RINGB_EN_2CODEC; /* enable 2nd codec */
2279 outl(n, iobase + ESM_RING_BUS_CONTR_B);
2280
2281 /* Set hardware volume control registers to midpoints.
2282 We can tell which button was pushed based on how they change. */
2283 outb(0x88, iobase+0x1c);
2284 outb(0x88, iobase+0x1d);
2285 outb(0x88, iobase+0x1e);
2286 outb(0x88, iobase+0x1f);
2287
2288 /* it appears some maestros (dell 7500) only work if these are set,
2289 regardless of wether we use the assp or not. */
2290
2291 outb(0, iobase + ASSP_CONTROL_B);
2292 outb(3, iobase + ASSP_CONTROL_A); /* M: Reserved bits... */
2293 outb(0, iobase + ASSP_CONTROL_C); /* M: Disable ASSP, ASSP IRQ's and FM Port */
2294
2295 /*
2296 * set up wavecache
2297 */
2298 for (i = 0; i < 16; i++) {
2299 /* Write 0 into the buffer area 0x1E0->1EF */
2300 outw(0x01E0 + i, iobase + WC_INDEX);
2301 outw(0x0000, iobase + WC_DATA);
2302
2303 /* The 1.10 test program seem to write 0 into the buffer area
2304 * 0x1D0-0x1DF too.*/
2305 outw(0x01D0 + i, iobase + WC_INDEX);
2306 outw(0x0000, iobase + WC_DATA);
2307 }
2308 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2309 (wave_get_register(chip, IDR7_WAVE_ROMRAM) & 0xFF00));
2310 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2311 wave_get_register(chip, IDR7_WAVE_ROMRAM) | 0x100);
2312 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2313 wave_get_register(chip, IDR7_WAVE_ROMRAM) & ~0x200);
2314 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2315 wave_get_register(chip, IDR7_WAVE_ROMRAM) | ~0x400);
2316
2317
2318 maestro_write(chip, IDR2_CRAM_DATA, 0x0000);
2319 /* Now back to the DirectSound stuff */
2320 /* audio serial configuration.. ? */
2321 maestro_write(chip, 0x08, 0xB004);
2322 maestro_write(chip, 0x09, 0x001B);
2323 maestro_write(chip, 0x0A, 0x8000);
2324 maestro_write(chip, 0x0B, 0x3F37);
2325 maestro_write(chip, 0x0C, 0x0098);
2326
2327 /* parallel in, has something to do with recording :) */
2328 maestro_write(chip, 0x0C,
2329 (maestro_read(chip, 0x0C) & ~0xF000) | 0x8000);
2330 /* parallel out */
2331 maestro_write(chip, 0x0C,
2332 (maestro_read(chip, 0x0C) & ~0x0F00) | 0x0500);
2333
2334 maestro_write(chip, 0x0D, 0x7632);
2335
2336 /* Wave cache control on - test off, sg off,
2337 enable, enable extra chans 1Mb */
2338
2339 w = inw(iobase + WC_CONTROL);
2340
2341 w &= ~0xFA00; /* Seems to be reserved? I don't know */
2342 w |= 0xA000; /* reserved... I don't know */
2343 w &= ~0x0200; /* Channels 56,57,58,59 as Extra Play,Rec Channel enable
2344 Seems to crash the Computer if enabled... */
2345 w |= 0x0100; /* Wave Cache Operation Enabled */
2346 w |= 0x0080; /* Channels 60/61 as Placback/Record enabled */
2347 w &= ~0x0060; /* Clear Wavtable Size */
2348 w |= 0x0020; /* Wavetable Size : 1MB */
2349 /* Bit 4 is reserved */
2350 w &= ~0x000C; /* DMA Stuff? I don't understand what the datasheet means */
2351 /* Bit 1 is reserved */
2352 w &= ~0x0001; /* Test Mode off */
2353
2354 outw(w, iobase + WC_CONTROL);
2355
2356 /* Now clear the APU control ram */
2357 for (i = 0; i < NR_APUS; i++) {
2358 for (w = 0; w < NR_APU_REGS; w++)
2359 apu_set_register(chip, i, w, 0);
2360
2361 }
2362}
2363
2364/* Enable IRQ's */
2365static void snd_es1968_start_irq(struct es1968 *chip)
2366{
2367 unsigned short w;
2368 w = ESM_HIRQ_DSIE | ESM_HIRQ_HW_VOLUME;
2369 if (chip->rmidi)
2370 w |= ESM_HIRQ_MPU401;
2371 outb(w, chip->io_port + 0x1A);
2372 outw(w, chip->io_port + ESM_PORT_HOST_IRQ);
2373}
2374
2375#ifdef CONFIG_PM
2376/*
2377 * PM support
2378 */
2379static int es1968_suspend(struct pci_dev *pci, pm_message_t state)
2380{
2381 struct snd_card *card = pci_get_drvdata(pci);
2382 struct es1968 *chip = card->private_data;
2383
2384 if (! chip->do_pm)
2385 return 0;
2386
2387 chip->in_suspend = 1;
2388 cancel_work_sync(&chip->hwvol_work);
2389 snd_power_change_state(card, SNDRV_CTL_POWER_D3hot);
2390 snd_pcm_suspend_all(chip->pcm);
2391 snd_ac97_suspend(chip->ac97);
2392 snd_es1968_bob_stop(chip);
2393
2394 pci_disable_device(pci);
2395 pci_save_state(pci);
2396 pci_set_power_state(pci, pci_choose_state(pci, state));
2397 return 0;
2398}
2399
2400static int es1968_resume(struct pci_dev *pci)
2401{
2402 struct snd_card *card = pci_get_drvdata(pci);
2403 struct es1968 *chip = card->private_data;
2404 struct esschan *es;
2405
2406 if (! chip->do_pm)
2407 return 0;
2408
2409 /* restore all our config */
2410 pci_set_power_state(pci, PCI_D0);
2411 pci_restore_state(pci);
2412 if (pci_enable_device(pci) < 0) {
2413 printk(KERN_ERR "es1968: pci_enable_device failed, "
2414 "disabling device\n");
2415 snd_card_disconnect(card);
2416 return -EIO;
2417 }
2418 pci_set_master(pci);
2419
2420 snd_es1968_chip_init(chip);
2421
2422 /* need to restore the base pointers.. */
2423 if (chip->dma.addr) {
2424 /* set PCMBAR */
2425 wave_set_register(chip, 0x01FC, chip->dma.addr >> 12);
2426 }
2427
2428 snd_es1968_start_irq(chip);
2429
2430 /* restore ac97 state */
2431 snd_ac97_resume(chip->ac97);
2432
2433 list_for_each_entry(es, &chip->substream_list, list) {
2434 switch (es->mode) {
2435 case ESM_MODE_PLAY:
2436 snd_es1968_playback_setup(chip, es, es->substream->runtime);
2437 break;
2438 case ESM_MODE_CAPTURE:
2439 snd_es1968_capture_setup(chip, es, es->substream->runtime);
2440 break;
2441 }
2442 }
2443
2444 /* start timer again */
2445 if (chip->bobclient)
2446 snd_es1968_bob_start(chip);
2447
2448 snd_power_change_state(card, SNDRV_CTL_POWER_D0);
2449 chip->in_suspend = 0;
2450 return 0;
2451}
2452#endif /* CONFIG_PM */
2453
2454#ifdef SUPPORT_JOYSTICK
2455#define JOYSTICK_ADDR 0x200
2456static int __devinit snd_es1968_create_gameport(struct es1968 *chip, int dev)
2457{
2458 struct gameport *gp;
2459 struct resource *r;
2460 u16 val;
2461
2462 if (!joystick[dev])
2463 return -ENODEV;
2464
2465 r = request_region(JOYSTICK_ADDR, 8, "ES1968 gameport");
2466 if (!r)
2467 return -EBUSY;
2468
2469 chip->gameport = gp = gameport_allocate_port();
2470 if (!gp) {
2471 printk(KERN_ERR "es1968: cannot allocate memory for gameport\n");
2472 release_and_free_resource(r);
2473 return -ENOMEM;
2474 }
2475
2476 pci_read_config_word(chip->pci, ESM_LEGACY_AUDIO_CONTROL, &val);
2477 pci_write_config_word(chip->pci, ESM_LEGACY_AUDIO_CONTROL, val | 0x04);
2478
2479 gameport_set_name(gp, "ES1968 Gameport");
2480 gameport_set_phys(gp, "pci%s/gameport0", pci_name(chip->pci));
2481 gameport_set_dev_parent(gp, &chip->pci->dev);
2482 gp->io = JOYSTICK_ADDR;
2483 gameport_set_port_data(gp, r);
2484
2485 gameport_register_port(gp);
2486
2487 return 0;
2488}
2489
2490static void snd_es1968_free_gameport(struct es1968 *chip)
2491{
2492 if (chip->gameport) {
2493 struct resource *r = gameport_get_port_data(chip->gameport);
2494
2495 gameport_unregister_port(chip->gameport);
2496 chip->gameport = NULL;
2497
2498 release_and_free_resource(r);
2499 }
2500}
2501#else
2502static inline int snd_es1968_create_gameport(struct es1968 *chip, int dev) { return -ENOSYS; }
2503static inline void snd_es1968_free_gameport(struct es1968 *chip) { }
2504#endif
2505
2506#ifdef CONFIG_SND_ES1968_INPUT
2507static int __devinit snd_es1968_input_register(struct es1968 *chip)
2508{
2509 struct input_dev *input_dev;
2510 int err;
2511
2512 input_dev = input_allocate_device();
2513 if (!input_dev)
2514 return -ENOMEM;
2515
2516 snprintf(chip->phys, sizeof(chip->phys), "pci-%s/input0",
2517 pci_name(chip->pci));
2518
2519 input_dev->name = chip->card->driver;
2520 input_dev->phys = chip->phys;
2521 input_dev->id.bustype = BUS_PCI;
2522 input_dev->id.vendor = chip->pci->vendor;
2523 input_dev->id.product = chip->pci->device;
2524 input_dev->dev.parent = &chip->pci->dev;
2525
2526 __set_bit(EV_KEY, input_dev->evbit);
2527 __set_bit(KEY_MUTE, input_dev->keybit);
2528 __set_bit(KEY_VOLUMEDOWN, input_dev->keybit);
2529 __set_bit(KEY_VOLUMEUP, input_dev->keybit);
2530
2531 err = input_register_device(input_dev);
2532 if (err) {
2533 input_free_device(input_dev);
2534 return err;
2535 }
2536
2537 chip->input_dev = input_dev;
2538 return 0;
2539}
2540#endif /* CONFIG_SND_ES1968_INPUT */
2541
2542#ifdef CONFIG_SND_ES1968_RADIO
2543#define GPIO_DATA 0x60
2544#define IO_MASK 4 /* mask register offset from GPIO_DATA
2545 bits 1=unmask write to given bit */
2546#define IO_DIR 8 /* direction register offset from GPIO_DATA
2547 bits 0/1=read/write direction */
2548/* mask bits for GPIO lines */
2549#define STR_DATA 0x0040 /* GPIO6 */
2550#define STR_CLK 0x0080 /* GPIO7 */
2551#define STR_WREN 0x0100 /* GPIO8 */
2552#define STR_MOST 0x0200 /* GPIO9 */
2553
2554static void snd_es1968_tea575x_set_pins(struct snd_tea575x *tea, u8 pins)
2555{
2556 struct es1968 *chip = tea->private_data;
2557 unsigned long io = chip->io_port + GPIO_DATA;
2558 u16 val = 0;
2559
2560 val |= (pins & TEA575X_DATA) ? STR_DATA : 0;
2561 val |= (pins & TEA575X_CLK) ? STR_CLK : 0;
2562 val |= (pins & TEA575X_WREN) ? STR_WREN : 0;
2563
2564 outw(val, io);
2565}
2566
2567static u8 snd_es1968_tea575x_get_pins(struct snd_tea575x *tea)
2568{
2569 struct es1968 *chip = tea->private_data;
2570 unsigned long io = chip->io_port + GPIO_DATA;
2571 u16 val = inw(io);
2572
2573 return (val & STR_DATA) ? TEA575X_DATA : 0 |
2574 (val & STR_MOST) ? TEA575X_MOST : 0;
2575}
2576
2577static void snd_es1968_tea575x_set_direction(struct snd_tea575x *tea, bool output)
2578{
2579 struct es1968 *chip = tea->private_data;
2580 unsigned long io = chip->io_port + GPIO_DATA;
2581 u16 odir = inw(io + IO_DIR);
2582
2583 if (output) {
2584 outw(~(STR_DATA | STR_CLK | STR_WREN), io + IO_MASK);
2585 outw(odir | STR_DATA | STR_CLK | STR_WREN, io + IO_DIR);
2586 } else {
2587 outw(~(STR_CLK | STR_WREN | STR_DATA | STR_MOST), io + IO_MASK);
2588 outw((odir & ~(STR_DATA | STR_MOST)) | STR_CLK | STR_WREN, io + IO_DIR);
2589 }
2590}
2591
2592static struct snd_tea575x_ops snd_es1968_tea_ops = {
2593 .set_pins = snd_es1968_tea575x_set_pins,
2594 .get_pins = snd_es1968_tea575x_get_pins,
2595 .set_direction = snd_es1968_tea575x_set_direction,
2596};
2597#endif
2598
2599static int snd_es1968_free(struct es1968 *chip)
2600{
2601 cancel_work_sync(&chip->hwvol_work);
2602#ifdef CONFIG_SND_ES1968_INPUT
2603 if (chip->input_dev)
2604 input_unregister_device(chip->input_dev);
2605#endif
2606
2607 if (chip->io_port) {
2608 if (chip->irq >= 0)
2609 synchronize_irq(chip->irq);
2610 outw(1, chip->io_port + 0x04); /* clear WP interrupts */
2611 outw(0, chip->io_port + ESM_PORT_HOST_IRQ); /* disable IRQ */
2612 }
2613
2614#ifdef CONFIG_SND_ES1968_RADIO
2615 snd_tea575x_exit(&chip->tea);
2616#endif
2617
2618 if (chip->irq >= 0)
2619 free_irq(chip->irq, chip);
2620 snd_es1968_free_gameport(chip);
2621 pci_release_regions(chip->pci);
2622 pci_disable_device(chip->pci);
2623 kfree(chip);
2624 return 0;
2625}
2626
2627static int snd_es1968_dev_free(struct snd_device *device)
2628{
2629 struct es1968 *chip = device->device_data;
2630 return snd_es1968_free(chip);
2631}
2632
2633struct ess_device_list {
2634 unsigned short type; /* chip type */
2635 unsigned short vendor; /* subsystem vendor id */
2636};
2637
2638static struct ess_device_list pm_whitelist[] __devinitdata = {
2639 { TYPE_MAESTRO2E, 0x0e11 }, /* Compaq Armada */
2640 { TYPE_MAESTRO2E, 0x1028 },
2641 { TYPE_MAESTRO2E, 0x103c },
2642 { TYPE_MAESTRO2E, 0x1179 },
2643 { TYPE_MAESTRO2E, 0x14c0 }, /* HP omnibook 4150 */
2644 { TYPE_MAESTRO2E, 0x1558 },
2645};
2646
2647static struct ess_device_list mpu_blacklist[] __devinitdata = {
2648 { TYPE_MAESTRO2, 0x125d },
2649};
2650
2651static int __devinit snd_es1968_create(struct snd_card *card,
2652 struct pci_dev *pci,
2653 int total_bufsize,
2654 int play_streams,
2655 int capt_streams,
2656 int chip_type,
2657 int do_pm,
2658 struct es1968 **chip_ret)
2659{
2660 static struct snd_device_ops ops = {
2661 .dev_free = snd_es1968_dev_free,
2662 };
2663 struct es1968 *chip;
2664 int i, err;
2665
2666 *chip_ret = NULL;
2667
2668 /* enable PCI device */
2669 if ((err = pci_enable_device(pci)) < 0)
2670 return err;
2671 /* check, if we can restrict PCI DMA transfers to 28 bits */
2672 if (pci_set_dma_mask(pci, DMA_BIT_MASK(28)) < 0 ||
2673 pci_set_consistent_dma_mask(pci, DMA_BIT_MASK(28)) < 0) {
2674 snd_printk(KERN_ERR "architecture does not support 28bit PCI busmaster DMA\n");
2675 pci_disable_device(pci);
2676 return -ENXIO;
2677 }
2678
2679 chip = kzalloc(sizeof(*chip), GFP_KERNEL);
2680 if (! chip) {
2681 pci_disable_device(pci);
2682 return -ENOMEM;
2683 }
2684
2685 /* Set Vars */
2686 chip->type = chip_type;
2687 spin_lock_init(&chip->reg_lock);
2688 spin_lock_init(&chip->substream_lock);
2689 INIT_LIST_HEAD(&chip->buf_list);
2690 INIT_LIST_HEAD(&chip->substream_list);
2691 mutex_init(&chip->memory_mutex);
2692 INIT_WORK(&chip->hwvol_work, es1968_update_hw_volume);
2693 chip->card = card;
2694 chip->pci = pci;
2695 chip->irq = -1;
2696 chip->total_bufsize = total_bufsize; /* in bytes */
2697 chip->playback_streams = play_streams;
2698 chip->capture_streams = capt_streams;
2699
2700 if ((err = pci_request_regions(pci, "ESS Maestro")) < 0) {
2701 kfree(chip);
2702 pci_disable_device(pci);
2703 return err;
2704 }
2705 chip->io_port = pci_resource_start(pci, 0);
2706 if (request_irq(pci->irq, snd_es1968_interrupt, IRQF_SHARED,
2707 KBUILD_MODNAME, chip)) {
2708 snd_printk(KERN_ERR "unable to grab IRQ %d\n", pci->irq);
2709 snd_es1968_free(chip);
2710 return -EBUSY;
2711 }
2712 chip->irq = pci->irq;
2713
2714 /* Clear Maestro_map */
2715 for (i = 0; i < 32; i++)
2716 chip->maestro_map[i] = 0;
2717
2718 /* Clear Apu Map */
2719 for (i = 0; i < NR_APUS; i++)
2720 chip->apu[i] = ESM_APU_FREE;
2721
2722 /* just to be sure */
2723 pci_set_master(pci);
2724
2725 if (do_pm > 1) {
2726 /* disable power-management if not on the whitelist */
2727 unsigned short vend;
2728 pci_read_config_word(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend);
2729 for (i = 0; i < (int)ARRAY_SIZE(pm_whitelist); i++) {
2730 if (chip->type == pm_whitelist[i].type &&
2731 vend == pm_whitelist[i].vendor) {
2732 do_pm = 1;
2733 break;
2734 }
2735 }
2736 if (do_pm > 1) {
2737 /* not matched; disabling pm */
2738 printk(KERN_INFO "es1968: not attempting power management.\n");
2739 do_pm = 0;
2740 }
2741 }
2742 chip->do_pm = do_pm;
2743
2744 snd_es1968_chip_init(chip);
2745
2746 if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
2747 snd_es1968_free(chip);
2748 return err;
2749 }
2750
2751 snd_card_set_dev(card, &pci->dev);
2752
2753#ifdef CONFIG_SND_ES1968_RADIO
2754 chip->tea.private_data = chip;
2755 chip->tea.ops = &snd_es1968_tea_ops;
2756 strlcpy(chip->tea.card, "SF64-PCE2", sizeof(chip->tea.card));
2757 sprintf(chip->tea.bus_info, "PCI:%s", pci_name(pci));
2758 if (!snd_tea575x_init(&chip->tea))
2759 printk(KERN_INFO "es1968: detected TEA575x radio\n");
2760#endif
2761
2762 *chip_ret = chip;
2763
2764 return 0;
2765}
2766
2767
2768/*
2769 */
2770static int __devinit snd_es1968_probe(struct pci_dev *pci,
2771 const struct pci_device_id *pci_id)
2772{
2773 static int dev;
2774 struct snd_card *card;
2775 struct es1968 *chip;
2776 unsigned int i;
2777 int err;
2778
2779 if (dev >= SNDRV_CARDS)
2780 return -ENODEV;
2781 if (!enable[dev]) {
2782 dev++;
2783 return -ENOENT;
2784 }
2785
2786 err = snd_card_create(index[dev], id[dev], THIS_MODULE, 0, &card);
2787 if (err < 0)
2788 return err;
2789
2790 if (total_bufsize[dev] < 128)
2791 total_bufsize[dev] = 128;
2792 if (total_bufsize[dev] > 4096)
2793 total_bufsize[dev] = 4096;
2794 if ((err = snd_es1968_create(card, pci,
2795 total_bufsize[dev] * 1024, /* in bytes */
2796 pcm_substreams_p[dev],
2797 pcm_substreams_c[dev],
2798 pci_id->driver_data,
2799 use_pm[dev],
2800 &chip)) < 0) {
2801 snd_card_free(card);
2802 return err;
2803 }
2804 card->private_data = chip;
2805
2806 switch (chip->type) {
2807 case TYPE_MAESTRO2E:
2808 strcpy(card->driver, "ES1978");
2809 strcpy(card->shortname, "ESS ES1978 (Maestro 2E)");
2810 break;
2811 case TYPE_MAESTRO2:
2812 strcpy(card->driver, "ES1968");
2813 strcpy(card->shortname, "ESS ES1968 (Maestro 2)");
2814 break;
2815 case TYPE_MAESTRO:
2816 strcpy(card->driver, "ESM1");
2817 strcpy(card->shortname, "ESS Maestro 1");
2818 break;
2819 }
2820
2821 if ((err = snd_es1968_pcm(chip, 0)) < 0) {
2822 snd_card_free(card);
2823 return err;
2824 }
2825
2826 if ((err = snd_es1968_mixer(chip)) < 0) {
2827 snd_card_free(card);
2828 return err;
2829 }
2830
2831 if (enable_mpu[dev] == 2) {
2832 /* check the black list */
2833 unsigned short vend;
2834 pci_read_config_word(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend);
2835 for (i = 0; i < ARRAY_SIZE(mpu_blacklist); i++) {
2836 if (chip->type == mpu_blacklist[i].type &&
2837 vend == mpu_blacklist[i].vendor) {
2838 enable_mpu[dev] = 0;
2839 break;
2840 }
2841 }
2842 }
2843 if (enable_mpu[dev]) {
2844 if ((err = snd_mpu401_uart_new(card, 0, MPU401_HW_MPU401,
2845 chip->io_port + ESM_MPU401_PORT,
2846 MPU401_INFO_INTEGRATED,
2847 chip->irq, 0, &chip->rmidi)) < 0) {
2848 printk(KERN_WARNING "es1968: skipping MPU-401 MIDI support..\n");
2849 }
2850 }
2851
2852 snd_es1968_create_gameport(chip, dev);
2853
2854#ifdef CONFIG_SND_ES1968_INPUT
2855 err = snd_es1968_input_register(chip);
2856 if (err)
2857 snd_printk(KERN_WARNING "Input device registration "
2858 "failed with error %i", err);
2859#endif
2860
2861 snd_es1968_start_irq(chip);
2862
2863 chip->clock = clock[dev];
2864 if (! chip->clock)
2865 es1968_measure_clock(chip);
2866
2867 sprintf(card->longname, "%s at 0x%lx, irq %i",
2868 card->shortname, chip->io_port, chip->irq);
2869
2870 if ((err = snd_card_register(card)) < 0) {
2871 snd_card_free(card);
2872 return err;
2873 }
2874 pci_set_drvdata(pci, card);
2875 dev++;
2876 return 0;
2877}
2878
2879static void __devexit snd_es1968_remove(struct pci_dev *pci)
2880{
2881 snd_card_free(pci_get_drvdata(pci));
2882 pci_set_drvdata(pci, NULL);
2883}
2884
2885static struct pci_driver driver = {
2886 .name = KBUILD_MODNAME,
2887 .id_table = snd_es1968_ids,
2888 .probe = snd_es1968_probe,
2889 .remove = __devexit_p(snd_es1968_remove),
2890#ifdef CONFIG_PM
2891 .suspend = es1968_suspend,
2892 .resume = es1968_resume,
2893#endif
2894};
2895
2896static int __init alsa_card_es1968_init(void)
2897{
2898 return pci_register_driver(&driver);
2899}
2900
2901static void __exit alsa_card_es1968_exit(void)
2902{
2903 pci_unregister_driver(&driver);
2904}
2905
2906module_init(alsa_card_es1968_init)
2907module_exit(alsa_card_es1968_exit)
1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * Driver for ESS Maestro 1/2/2E Sound Card (started 21.8.99)
4 * Copyright (c) by Matze Braun <MatzeBraun@gmx.de>.
5 * Takashi Iwai <tiwai@suse.de>
6 *
7 * Most of the driver code comes from Zach Brown(zab@redhat.com)
8 * Alan Cox OSS Driver
9 * Rewritted from card-es1938.c source.
10 *
11 * TODO:
12 * Perhaps Synth
13 *
14 * Notes from Zach Brown about the driver code
15 *
16 * Hardware Description
17 *
18 * A working Maestro setup contains the Maestro chip wired to a
19 * codec or 2. In the Maestro we have the APUs, the ASSP, and the
20 * Wavecache. The APUs can be though of as virtual audio routing
21 * channels. They can take data from a number of sources and perform
22 * basic encodings of the data. The wavecache is a storehouse for
23 * PCM data. Typically it deals with PCI and interracts with the
24 * APUs. The ASSP is a wacky DSP like device that ESS is loth
25 * to release docs on. Thankfully it isn't required on the Maestro
26 * until you start doing insane things like FM emulation and surround
27 * encoding. The codecs are almost always AC-97 compliant codecs,
28 * but it appears that early Maestros may have had PT101 (an ESS
29 * part?) wired to them. The only real difference in the Maestro
30 * families is external goop like docking capability, memory for
31 * the ASSP, and initialization differences.
32 *
33 * Driver Operation
34 *
35 * We only drive the APU/Wavecache as typical DACs and drive the
36 * mixers in the codecs. There are 64 APUs. We assign 6 to each
37 * /dev/dsp? device. 2 channels for output, and 4 channels for
38 * input.
39 *
40 * Each APU can do a number of things, but we only really use
41 * 3 basic functions. For playback we use them to convert PCM
42 * data fetched over PCI by the wavecahche into analog data that
43 * is handed to the codec. One APU for mono, and a pair for stereo.
44 * When in stereo, the combination of smarts in the APU and Wavecache
45 * decide which wavecache gets the left or right channel.
46 *
47 * For record we still use the old overly mono system. For each in
48 * coming channel the data comes in from the codec, through a 'input'
49 * APU, through another rate converter APU, and then into memory via
50 * the wavecache and PCI. If its stereo, we mash it back into LRLR in
51 * software. The pass between the 2 APUs is supposedly what requires us
52 * to have a 512 byte buffer sitting around in wavecache/memory.
53 *
54 * The wavecache makes our life even more fun. First off, it can
55 * only address the first 28 bits of PCI address space, making it
56 * useless on quite a few architectures. Secondly, its insane.
57 * It claims to fetch from 4 regions of PCI space, each 4 meg in length.
58 * But that doesn't really work. You can only use 1 region. So all our
59 * allocations have to be in 4meg of each other. Booo. Hiss.
60 * So we have a module parameter, dsps_order, that is the order of
61 * the number of dsps to provide. All their buffer space is allocated
62 * on open time. The sonicvibes OSS routines we inherited really want
63 * power of 2 buffers, so we have all those next to each other, then
64 * 512 byte regions for the recording wavecaches. This ends up
65 * wasting quite a bit of memory. The only fixes I can see would be
66 * getting a kernel allocator that could work in zones, or figuring out
67 * just how to coerce the WP into doing what we want.
68 *
69 * The indirection of the various registers means we have to spinlock
70 * nearly all register accesses. We have the main register indirection
71 * like the wave cache, maestro registers, etc. Then we have beasts
72 * like the APU interface that is indirect registers gotten at through
73 * the main maestro indirection. Ouch. We spinlock around the actual
74 * ports on a per card basis. This means spinlock activity at each IO
75 * operation, but the only IO operation clusters are in non critical
76 * paths and it makes the code far easier to follow. Interrupts are
77 * blocked while holding the locks because the int handler has to
78 * get at some of them :(. The mixer interface doesn't, however.
79 * We also have an OSS state lock that is thrown around in a few
80 * places.
81 */
82
83#include <linux/io.h>
84#include <linux/delay.h>
85#include <linux/interrupt.h>
86#include <linux/init.h>
87#include <linux/pci.h>
88#include <linux/dma-mapping.h>
89#include <linux/slab.h>
90#include <linux/gameport.h>
91#include <linux/module.h>
92#include <linux/mutex.h>
93#include <linux/input.h>
94
95#include <sound/core.h>
96#include <sound/pcm.h>
97#include <sound/mpu401.h>
98#include <sound/ac97_codec.h>
99#include <sound/initval.h>
100
101#ifdef CONFIG_SND_ES1968_RADIO
102#include <media/drv-intf/tea575x.h>
103#endif
104
105#define CARD_NAME "ESS Maestro1/2"
106#define DRIVER_NAME "ES1968"
107
108MODULE_DESCRIPTION("ESS Maestro");
109MODULE_LICENSE("GPL");
110
111#if IS_REACHABLE(CONFIG_GAMEPORT)
112#define SUPPORT_JOYSTICK 1
113#endif
114
115static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; /* Index 1-MAX */
116static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; /* ID for this card */
117static bool enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP; /* Enable this card */
118static int total_bufsize[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 1024 };
119static int pcm_substreams_p[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 4 };
120static int pcm_substreams_c[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 1 };
121static int clock[SNDRV_CARDS];
122static int use_pm[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 2};
123static int enable_mpu[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 2};
124#ifdef SUPPORT_JOYSTICK
125static bool joystick[SNDRV_CARDS];
126#endif
127static int radio_nr[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = -1};
128
129module_param_array(index, int, NULL, 0444);
130MODULE_PARM_DESC(index, "Index value for " CARD_NAME " soundcard.");
131module_param_array(id, charp, NULL, 0444);
132MODULE_PARM_DESC(id, "ID string for " CARD_NAME " soundcard.");
133module_param_array(enable, bool, NULL, 0444);
134MODULE_PARM_DESC(enable, "Enable " CARD_NAME " soundcard.");
135module_param_array(total_bufsize, int, NULL, 0444);
136MODULE_PARM_DESC(total_bufsize, "Total buffer size in kB.");
137module_param_array(pcm_substreams_p, int, NULL, 0444);
138MODULE_PARM_DESC(pcm_substreams_p, "PCM Playback substreams for " CARD_NAME " soundcard.");
139module_param_array(pcm_substreams_c, int, NULL, 0444);
140MODULE_PARM_DESC(pcm_substreams_c, "PCM Capture substreams for " CARD_NAME " soundcard.");
141module_param_array(clock, int, NULL, 0444);
142MODULE_PARM_DESC(clock, "Clock on " CARD_NAME " soundcard. (0 = auto-detect)");
143module_param_array(use_pm, int, NULL, 0444);
144MODULE_PARM_DESC(use_pm, "Toggle power-management. (0 = off, 1 = on, 2 = auto)");
145module_param_array(enable_mpu, int, NULL, 0444);
146MODULE_PARM_DESC(enable_mpu, "Enable MPU401. (0 = off, 1 = on, 2 = auto)");
147#ifdef SUPPORT_JOYSTICK
148module_param_array(joystick, bool, NULL, 0444);
149MODULE_PARM_DESC(joystick, "Enable joystick.");
150#endif
151module_param_array(radio_nr, int, NULL, 0444);
152MODULE_PARM_DESC(radio_nr, "Radio device numbers");
153
154
155
156#define NR_APUS 64
157#define NR_APU_REGS 16
158
159/* NEC Versas ? */
160#define NEC_VERSA_SUBID1 0x80581033
161#define NEC_VERSA_SUBID2 0x803c1033
162
163/* Mode Flags */
164#define ESS_FMT_STEREO 0x01
165#define ESS_FMT_16BIT 0x02
166
167#define DAC_RUNNING 1
168#define ADC_RUNNING 2
169
170/* Values for the ESM_LEGACY_AUDIO_CONTROL */
171
172#define ESS_DISABLE_AUDIO 0x8000
173#define ESS_ENABLE_SERIAL_IRQ 0x4000
174#define IO_ADRESS_ALIAS 0x0020
175#define MPU401_IRQ_ENABLE 0x0010
176#define MPU401_IO_ENABLE 0x0008
177#define GAME_IO_ENABLE 0x0004
178#define FM_IO_ENABLE 0x0002
179#define SB_IO_ENABLE 0x0001
180
181/* Values for the ESM_CONFIG_A */
182
183#define PIC_SNOOP1 0x4000
184#define PIC_SNOOP2 0x2000
185#define SAFEGUARD 0x0800
186#define DMA_CLEAR 0x0700
187#define DMA_DDMA 0x0000
188#define DMA_TDMA 0x0100
189#define DMA_PCPCI 0x0200
190#define POST_WRITE 0x0080
191#define PCI_TIMING 0x0040
192#define SWAP_LR 0x0020
193#define SUBTR_DECODE 0x0002
194
195/* Values for the ESM_CONFIG_B */
196
197#define SPDIF_CONFB 0x0100
198#define HWV_CONFB 0x0080
199#define DEBOUNCE 0x0040
200#define GPIO_CONFB 0x0020
201#define CHI_CONFB 0x0010
202#define IDMA_CONFB 0x0008 /*undoc */
203#define MIDI_FIX 0x0004 /*undoc */
204#define IRQ_TO_ISA 0x0001 /*undoc */
205
206/* Values for Ring Bus Control B */
207#define RINGB_2CODEC_ID_MASK 0x0003
208#define RINGB_DIS_VALIDATION 0x0008
209#define RINGB_EN_SPDIF 0x0010
210#define RINGB_EN_2CODEC 0x0020
211#define RINGB_SING_BIT_DUAL 0x0040
212
213/* ****Port Addresses**** */
214
215/* Write & Read */
216#define ESM_INDEX 0x02
217#define ESM_DATA 0x00
218
219/* AC97 + RingBus */
220#define ESM_AC97_INDEX 0x30
221#define ESM_AC97_DATA 0x32
222#define ESM_RING_BUS_DEST 0x34
223#define ESM_RING_BUS_CONTR_A 0x36
224#define ESM_RING_BUS_CONTR_B 0x38
225#define ESM_RING_BUS_SDO 0x3A
226
227/* WaveCache*/
228#define WC_INDEX 0x10
229#define WC_DATA 0x12
230#define WC_CONTROL 0x14
231
232/* ASSP*/
233#define ASSP_INDEX 0x80
234#define ASSP_MEMORY 0x82
235#define ASSP_DATA 0x84
236#define ASSP_CONTROL_A 0xA2
237#define ASSP_CONTROL_B 0xA4
238#define ASSP_CONTROL_C 0xA6
239#define ASSP_HOSTW_INDEX 0xA8
240#define ASSP_HOSTW_DATA 0xAA
241#define ASSP_HOSTW_IRQ 0xAC
242/* Midi */
243#define ESM_MPU401_PORT 0x98
244/* Others */
245#define ESM_PORT_HOST_IRQ 0x18
246
247#define IDR0_DATA_PORT 0x00
248#define IDR1_CRAM_POINTER 0x01
249#define IDR2_CRAM_DATA 0x02
250#define IDR3_WAVE_DATA 0x03
251#define IDR4_WAVE_PTR_LOW 0x04
252#define IDR5_WAVE_PTR_HI 0x05
253#define IDR6_TIMER_CTRL 0x06
254#define IDR7_WAVE_ROMRAM 0x07
255
256#define WRITEABLE_MAP 0xEFFFFF
257#define READABLE_MAP 0x64003F
258
259/* PCI Register */
260
261#define ESM_LEGACY_AUDIO_CONTROL 0x40
262#define ESM_ACPI_COMMAND 0x54
263#define ESM_CONFIG_A 0x50
264#define ESM_CONFIG_B 0x52
265#define ESM_DDMA 0x60
266
267/* Bob Bits */
268#define ESM_BOB_ENABLE 0x0001
269#define ESM_BOB_START 0x0001
270
271/* Host IRQ Control Bits */
272#define ESM_RESET_MAESTRO 0x8000
273#define ESM_RESET_DIRECTSOUND 0x4000
274#define ESM_HIRQ_ClkRun 0x0100
275#define ESM_HIRQ_HW_VOLUME 0x0040
276#define ESM_HIRQ_HARPO 0x0030 /* What's that? */
277#define ESM_HIRQ_ASSP 0x0010
278#define ESM_HIRQ_DSIE 0x0004
279#define ESM_HIRQ_MPU401 0x0002
280#define ESM_HIRQ_SB 0x0001
281
282/* Host IRQ Status Bits */
283#define ESM_MPU401_IRQ 0x02
284#define ESM_SB_IRQ 0x01
285#define ESM_SOUND_IRQ 0x04
286#define ESM_ASSP_IRQ 0x10
287#define ESM_HWVOL_IRQ 0x40
288
289#define ESS_SYSCLK 50000000
290#define ESM_BOB_FREQ 200
291#define ESM_BOB_FREQ_MAX 800
292
293#define ESM_FREQ_ESM1 (49152000L / 1024L) /* default rate 48000 */
294#define ESM_FREQ_ESM2 (50000000L / 1024L)
295
296/* APU Modes: reg 0x00, bit 4-7 */
297#define ESM_APU_MODE_SHIFT 4
298#define ESM_APU_MODE_MASK (0xf << 4)
299#define ESM_APU_OFF 0x00
300#define ESM_APU_16BITLINEAR 0x01 /* 16-Bit Linear Sample Player */
301#define ESM_APU_16BITSTEREO 0x02 /* 16-Bit Stereo Sample Player */
302#define ESM_APU_8BITLINEAR 0x03 /* 8-Bit Linear Sample Player */
303#define ESM_APU_8BITSTEREO 0x04 /* 8-Bit Stereo Sample Player */
304#define ESM_APU_8BITDIFF 0x05 /* 8-Bit Differential Sample Playrer */
305#define ESM_APU_DIGITALDELAY 0x06 /* Digital Delay Line */
306#define ESM_APU_DUALTAP 0x07 /* Dual Tap Reader */
307#define ESM_APU_CORRELATOR 0x08 /* Correlator */
308#define ESM_APU_INPUTMIXER 0x09 /* Input Mixer */
309#define ESM_APU_WAVETABLE 0x0A /* Wave Table Mode */
310#define ESM_APU_SRCONVERTOR 0x0B /* Sample Rate Convertor */
311#define ESM_APU_16BITPINGPONG 0x0C /* 16-Bit Ping-Pong Sample Player */
312#define ESM_APU_RESERVED1 0x0D /* Reserved 1 */
313#define ESM_APU_RESERVED2 0x0E /* Reserved 2 */
314#define ESM_APU_RESERVED3 0x0F /* Reserved 3 */
315
316/* reg 0x00 */
317#define ESM_APU_FILTER_Q_SHIFT 0
318#define ESM_APU_FILTER_Q_MASK (3 << 0)
319/* APU Filtey Q Control */
320#define ESM_APU_FILTER_LESSQ 0x00
321#define ESM_APU_FILTER_MOREQ 0x03
322
323#define ESM_APU_FILTER_TYPE_SHIFT 2
324#define ESM_APU_FILTER_TYPE_MASK (3 << 2)
325#define ESM_APU_ENV_TYPE_SHIFT 8
326#define ESM_APU_ENV_TYPE_MASK (3 << 8)
327#define ESM_APU_ENV_STATE_SHIFT 10
328#define ESM_APU_ENV_STATE_MASK (3 << 10)
329#define ESM_APU_END_CURVE (1 << 12)
330#define ESM_APU_INT_ON_LOOP (1 << 13)
331#define ESM_APU_DMA_ENABLE (1 << 14)
332
333/* reg 0x02 */
334#define ESM_APU_SUBMIX_GROUP_SHIRT 0
335#define ESM_APU_SUBMIX_GROUP_MASK (7 << 0)
336#define ESM_APU_SUBMIX_MODE (1 << 3)
337#define ESM_APU_6dB (1 << 4)
338#define ESM_APU_DUAL_EFFECT (1 << 5)
339#define ESM_APU_EFFECT_CHANNELS_SHIFT 6
340#define ESM_APU_EFFECT_CHANNELS_MASK (3 << 6)
341
342/* reg 0x03 */
343#define ESM_APU_STEP_SIZE_MASK 0x0fff
344
345/* reg 0x04 */
346#define ESM_APU_PHASE_SHIFT 0
347#define ESM_APU_PHASE_MASK (0xff << 0)
348#define ESM_APU_WAVE64K_PAGE_SHIFT 8 /* most 8bit of wave start offset */
349#define ESM_APU_WAVE64K_PAGE_MASK (0xff << 8)
350
351/* reg 0x05 - wave start offset */
352/* reg 0x06 - wave end offset */
353/* reg 0x07 - wave loop length */
354
355/* reg 0x08 */
356#define ESM_APU_EFFECT_GAIN_SHIFT 0
357#define ESM_APU_EFFECT_GAIN_MASK (0xff << 0)
358#define ESM_APU_TREMOLO_DEPTH_SHIFT 8
359#define ESM_APU_TREMOLO_DEPTH_MASK (0xf << 8)
360#define ESM_APU_TREMOLO_RATE_SHIFT 12
361#define ESM_APU_TREMOLO_RATE_MASK (0xf << 12)
362
363/* reg 0x09 */
364/* bit 0-7 amplitude dest? */
365#define ESM_APU_AMPLITUDE_NOW_SHIFT 8
366#define ESM_APU_AMPLITUDE_NOW_MASK (0xff << 8)
367
368/* reg 0x0a */
369#define ESM_APU_POLAR_PAN_SHIFT 0
370#define ESM_APU_POLAR_PAN_MASK (0x3f << 0)
371/* Polar Pan Control */
372#define ESM_APU_PAN_CENTER_CIRCLE 0x00
373#define ESM_APU_PAN_MIDDLE_RADIUS 0x01
374#define ESM_APU_PAN_OUTSIDE_RADIUS 0x02
375
376#define ESM_APU_FILTER_TUNING_SHIFT 8
377#define ESM_APU_FILTER_TUNING_MASK (0xff << 8)
378
379/* reg 0x0b */
380#define ESM_APU_DATA_SRC_A_SHIFT 0
381#define ESM_APU_DATA_SRC_A_MASK (0x7f << 0)
382#define ESM_APU_INV_POL_A (1 << 7)
383#define ESM_APU_DATA_SRC_B_SHIFT 8
384#define ESM_APU_DATA_SRC_B_MASK (0x7f << 8)
385#define ESM_APU_INV_POL_B (1 << 15)
386
387#define ESM_APU_VIBRATO_RATE_SHIFT 0
388#define ESM_APU_VIBRATO_RATE_MASK (0xf << 0)
389#define ESM_APU_VIBRATO_DEPTH_SHIFT 4
390#define ESM_APU_VIBRATO_DEPTH_MASK (0xf << 4)
391#define ESM_APU_VIBRATO_PHASE_SHIFT 8
392#define ESM_APU_VIBRATO_PHASE_MASK (0xff << 8)
393
394/* reg 0x0c */
395#define ESM_APU_RADIUS_SELECT (1 << 6)
396
397/* APU Filter Control */
398#define ESM_APU_FILTER_2POLE_LOPASS 0x00
399#define ESM_APU_FILTER_2POLE_BANDPASS 0x01
400#define ESM_APU_FILTER_2POLE_HIPASS 0x02
401#define ESM_APU_FILTER_1POLE_LOPASS 0x03
402#define ESM_APU_FILTER_1POLE_HIPASS 0x04
403#define ESM_APU_FILTER_OFF 0x05
404
405/* APU ATFP Type */
406#define ESM_APU_ATFP_AMPLITUDE 0x00
407#define ESM_APU_ATFP_TREMELO 0x01
408#define ESM_APU_ATFP_FILTER 0x02
409#define ESM_APU_ATFP_PAN 0x03
410
411/* APU ATFP Flags */
412#define ESM_APU_ATFP_FLG_OFF 0x00
413#define ESM_APU_ATFP_FLG_WAIT 0x01
414#define ESM_APU_ATFP_FLG_DONE 0x02
415#define ESM_APU_ATFP_FLG_INPROCESS 0x03
416
417
418/* capture mixing buffer size */
419#define ESM_MEM_ALIGN 0x1000
420#define ESM_MIXBUF_SIZE 0x400
421
422#define ESM_MODE_PLAY 0
423#define ESM_MODE_CAPTURE 1
424
425
426/* APU use in the driver */
427enum snd_enum_apu_type {
428 ESM_APU_PCM_PLAY,
429 ESM_APU_PCM_CAPTURE,
430 ESM_APU_PCM_RATECONV,
431 ESM_APU_FREE
432};
433
434/* chip type */
435enum {
436 TYPE_MAESTRO, TYPE_MAESTRO2, TYPE_MAESTRO2E
437};
438
439/* DMA Hack! */
440struct esm_memory {
441 struct snd_dma_buffer buf;
442 int empty; /* status */
443 struct list_head list;
444};
445
446/* Playback Channel */
447struct esschan {
448 int running;
449
450 u8 apu[4];
451 u8 apu_mode[4];
452
453 /* playback/capture pcm buffer */
454 struct esm_memory *memory;
455 /* capture mixer buffer */
456 struct esm_memory *mixbuf;
457
458 unsigned int hwptr; /* current hw pointer in bytes */
459 unsigned int count; /* sample counter in bytes */
460 unsigned int dma_size; /* total buffer size in bytes */
461 unsigned int frag_size; /* period size in bytes */
462 unsigned int wav_shift;
463 u16 base[4]; /* offset for ptr */
464
465 /* stereo/16bit flag */
466 unsigned char fmt;
467 int mode; /* playback / capture */
468
469 int bob_freq; /* required timer frequency */
470
471 struct snd_pcm_substream *substream;
472
473 /* linked list */
474 struct list_head list;
475
476#ifdef CONFIG_PM_SLEEP
477 u16 wc_map[4];
478#endif
479};
480
481struct es1968 {
482 /* Module Config */
483 int total_bufsize; /* in bytes */
484
485 int playback_streams, capture_streams;
486
487 unsigned int clock; /* clock */
488 /* for clock measurement */
489 unsigned int in_measurement: 1;
490 unsigned int measure_apu;
491 unsigned int measure_lastpos;
492 unsigned int measure_count;
493
494 /* buffer */
495 struct snd_dma_buffer dma;
496
497 /* Resources... */
498 int irq;
499 unsigned long io_port;
500 int type;
501 struct pci_dev *pci;
502 struct snd_card *card;
503 struct snd_pcm *pcm;
504 int do_pm; /* power-management enabled */
505
506 /* DMA memory block */
507 struct list_head buf_list;
508
509 /* ALSA Stuff */
510 struct snd_ac97 *ac97;
511 struct snd_rawmidi *rmidi;
512
513 spinlock_t reg_lock;
514 unsigned int in_suspend;
515
516 /* Maestro Stuff */
517 u16 maestro_map[32];
518 int bobclient; /* active timer instancs */
519 int bob_freq; /* timer frequency */
520 struct mutex memory_mutex; /* memory lock */
521
522 /* APU states */
523 unsigned char apu[NR_APUS];
524
525 /* active substreams */
526 struct list_head substream_list;
527 spinlock_t substream_lock;
528
529#ifdef CONFIG_PM_SLEEP
530 u16 apu_map[NR_APUS][NR_APU_REGS];
531#endif
532
533#ifdef SUPPORT_JOYSTICK
534 struct gameport *gameport;
535#endif
536
537#ifdef CONFIG_SND_ES1968_INPUT
538 struct input_dev *input_dev;
539 char phys[64]; /* physical device path */
540#else
541 struct snd_kcontrol *master_switch; /* for h/w volume control */
542 struct snd_kcontrol *master_volume;
543#endif
544 struct work_struct hwvol_work;
545
546#ifdef CONFIG_SND_ES1968_RADIO
547 struct v4l2_device v4l2_dev;
548 struct snd_tea575x tea;
549 unsigned int tea575x_tuner;
550#endif
551};
552
553static irqreturn_t snd_es1968_interrupt(int irq, void *dev_id);
554
555static const struct pci_device_id snd_es1968_ids[] = {
556 /* Maestro 1 */
557 { 0x1285, 0x0100, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO },
558 /* Maestro 2 */
559 { 0x125d, 0x1968, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO2 },
560 /* Maestro 2E */
561 { 0x125d, 0x1978, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO2E },
562 { 0, }
563};
564
565MODULE_DEVICE_TABLE(pci, snd_es1968_ids);
566
567/* *********************
568 * Low Level Funcs! *
569 *********************/
570
571/* no spinlock */
572static void __maestro_write(struct es1968 *chip, u16 reg, u16 data)
573{
574 outw(reg, chip->io_port + ESM_INDEX);
575 outw(data, chip->io_port + ESM_DATA);
576 chip->maestro_map[reg] = data;
577}
578
579static inline void maestro_write(struct es1968 *chip, u16 reg, u16 data)
580{
581 unsigned long flags;
582 spin_lock_irqsave(&chip->reg_lock, flags);
583 __maestro_write(chip, reg, data);
584 spin_unlock_irqrestore(&chip->reg_lock, flags);
585}
586
587/* no spinlock */
588static u16 __maestro_read(struct es1968 *chip, u16 reg)
589{
590 if (READABLE_MAP & (1 << reg)) {
591 outw(reg, chip->io_port + ESM_INDEX);
592 chip->maestro_map[reg] = inw(chip->io_port + ESM_DATA);
593 }
594 return chip->maestro_map[reg];
595}
596
597static inline u16 maestro_read(struct es1968 *chip, u16 reg)
598{
599 unsigned long flags;
600 u16 result;
601 spin_lock_irqsave(&chip->reg_lock, flags);
602 result = __maestro_read(chip, reg);
603 spin_unlock_irqrestore(&chip->reg_lock, flags);
604 return result;
605}
606
607/* Wait for the codec bus to be free */
608static int snd_es1968_ac97_wait(struct es1968 *chip)
609{
610 int timeout = 100000;
611
612 while (timeout-- > 0) {
613 if (!(inb(chip->io_port + ESM_AC97_INDEX) & 1))
614 return 0;
615 cond_resched();
616 }
617 dev_dbg(chip->card->dev, "ac97 timeout\n");
618 return 1; /* timeout */
619}
620
621static int snd_es1968_ac97_wait_poll(struct es1968 *chip)
622{
623 int timeout = 100000;
624
625 while (timeout-- > 0) {
626 if (!(inb(chip->io_port + ESM_AC97_INDEX) & 1))
627 return 0;
628 }
629 dev_dbg(chip->card->dev, "ac97 timeout\n");
630 return 1; /* timeout */
631}
632
633static void snd_es1968_ac97_write(struct snd_ac97 *ac97, unsigned short reg, unsigned short val)
634{
635 struct es1968 *chip = ac97->private_data;
636
637 snd_es1968_ac97_wait(chip);
638
639 /* Write the bus */
640 outw(val, chip->io_port + ESM_AC97_DATA);
641 /*msleep(1);*/
642 outb(reg, chip->io_port + ESM_AC97_INDEX);
643 /*msleep(1);*/
644}
645
646static unsigned short snd_es1968_ac97_read(struct snd_ac97 *ac97, unsigned short reg)
647{
648 u16 data = 0;
649 struct es1968 *chip = ac97->private_data;
650
651 snd_es1968_ac97_wait(chip);
652
653 outb(reg | 0x80, chip->io_port + ESM_AC97_INDEX);
654 /*msleep(1);*/
655
656 if (!snd_es1968_ac97_wait_poll(chip)) {
657 data = inw(chip->io_port + ESM_AC97_DATA);
658 /*msleep(1);*/
659 }
660
661 return data;
662}
663
664/* no spinlock */
665static void apu_index_set(struct es1968 *chip, u16 index)
666{
667 int i;
668 __maestro_write(chip, IDR1_CRAM_POINTER, index);
669 for (i = 0; i < 1000; i++)
670 if (__maestro_read(chip, IDR1_CRAM_POINTER) == index)
671 return;
672 dev_dbg(chip->card->dev, "APU register select failed. (Timeout)\n");
673}
674
675/* no spinlock */
676static void apu_data_set(struct es1968 *chip, u16 data)
677{
678 int i;
679 for (i = 0; i < 1000; i++) {
680 if (__maestro_read(chip, IDR0_DATA_PORT) == data)
681 return;
682 __maestro_write(chip, IDR0_DATA_PORT, data);
683 }
684 dev_dbg(chip->card->dev, "APU register set probably failed (Timeout)!\n");
685}
686
687/* no spinlock */
688static void __apu_set_register(struct es1968 *chip, u16 channel, u8 reg, u16 data)
689{
690 if (snd_BUG_ON(channel >= NR_APUS))
691 return;
692#ifdef CONFIG_PM_SLEEP
693 chip->apu_map[channel][reg] = data;
694#endif
695 reg |= (channel << 4);
696 apu_index_set(chip, reg);
697 apu_data_set(chip, data);
698}
699
700static void apu_set_register(struct es1968 *chip, u16 channel, u8 reg, u16 data)
701{
702 unsigned long flags;
703 spin_lock_irqsave(&chip->reg_lock, flags);
704 __apu_set_register(chip, channel, reg, data);
705 spin_unlock_irqrestore(&chip->reg_lock, flags);
706}
707
708static u16 __apu_get_register(struct es1968 *chip, u16 channel, u8 reg)
709{
710 if (snd_BUG_ON(channel >= NR_APUS))
711 return 0;
712 reg |= (channel << 4);
713 apu_index_set(chip, reg);
714 return __maestro_read(chip, IDR0_DATA_PORT);
715}
716
717static u16 apu_get_register(struct es1968 *chip, u16 channel, u8 reg)
718{
719 unsigned long flags;
720 u16 v;
721 spin_lock_irqsave(&chip->reg_lock, flags);
722 v = __apu_get_register(chip, channel, reg);
723 spin_unlock_irqrestore(&chip->reg_lock, flags);
724 return v;
725}
726
727#if 0 /* ASSP is not supported */
728
729static void assp_set_register(struct es1968 *chip, u32 reg, u32 value)
730{
731 unsigned long flags;
732
733 spin_lock_irqsave(&chip->reg_lock, flags);
734 outl(reg, chip->io_port + ASSP_INDEX);
735 outl(value, chip->io_port + ASSP_DATA);
736 spin_unlock_irqrestore(&chip->reg_lock, flags);
737}
738
739static u32 assp_get_register(struct es1968 *chip, u32 reg)
740{
741 unsigned long flags;
742 u32 value;
743
744 spin_lock_irqsave(&chip->reg_lock, flags);
745 outl(reg, chip->io_port + ASSP_INDEX);
746 value = inl(chip->io_port + ASSP_DATA);
747 spin_unlock_irqrestore(&chip->reg_lock, flags);
748
749 return value;
750}
751
752#endif
753
754static void wave_set_register(struct es1968 *chip, u16 reg, u16 value)
755{
756 unsigned long flags;
757
758 spin_lock_irqsave(&chip->reg_lock, flags);
759 outw(reg, chip->io_port + WC_INDEX);
760 outw(value, chip->io_port + WC_DATA);
761 spin_unlock_irqrestore(&chip->reg_lock, flags);
762}
763
764static u16 wave_get_register(struct es1968 *chip, u16 reg)
765{
766 unsigned long flags;
767 u16 value;
768
769 spin_lock_irqsave(&chip->reg_lock, flags);
770 outw(reg, chip->io_port + WC_INDEX);
771 value = inw(chip->io_port + WC_DATA);
772 spin_unlock_irqrestore(&chip->reg_lock, flags);
773
774 return value;
775}
776
777/* *******************
778 * Bob the Timer! *
779 *******************/
780
781static void snd_es1968_bob_stop(struct es1968 *chip)
782{
783 u16 reg;
784
785 reg = __maestro_read(chip, 0x11);
786 reg &= ~ESM_BOB_ENABLE;
787 __maestro_write(chip, 0x11, reg);
788 reg = __maestro_read(chip, 0x17);
789 reg &= ~ESM_BOB_START;
790 __maestro_write(chip, 0x17, reg);
791}
792
793static void snd_es1968_bob_start(struct es1968 *chip)
794{
795 int prescale;
796 int divide;
797
798 /* compute ideal interrupt frequency for buffer size & play rate */
799 /* first, find best prescaler value to match freq */
800 for (prescale = 5; prescale < 12; prescale++)
801 if (chip->bob_freq > (ESS_SYSCLK >> (prescale + 9)))
802 break;
803
804 /* next, back off prescaler whilst getting divider into optimum range */
805 divide = 1;
806 while ((prescale > 5) && (divide < 32)) {
807 prescale--;
808 divide <<= 1;
809 }
810 divide >>= 1;
811
812 /* now fine-tune the divider for best match */
813 for (; divide < 31; divide++)
814 if (chip->bob_freq >
815 ((ESS_SYSCLK >> (prescale + 9)) / (divide + 1))) break;
816
817 /* divide = 0 is illegal, but don't let prescale = 4! */
818 if (divide == 0) {
819 divide++;
820 if (prescale > 5)
821 prescale--;
822 } else if (divide > 1)
823 divide--;
824
825 __maestro_write(chip, 6, 0x9000 | (prescale << 5) | divide); /* set reg */
826
827 /* Now set IDR 11/17 */
828 __maestro_write(chip, 0x11, __maestro_read(chip, 0x11) | 1);
829 __maestro_write(chip, 0x17, __maestro_read(chip, 0x17) | 1);
830}
831
832/* call with substream spinlock */
833static void snd_es1968_bob_inc(struct es1968 *chip, int freq)
834{
835 chip->bobclient++;
836 if (chip->bobclient == 1) {
837 chip->bob_freq = freq;
838 snd_es1968_bob_start(chip);
839 } else if (chip->bob_freq < freq) {
840 snd_es1968_bob_stop(chip);
841 chip->bob_freq = freq;
842 snd_es1968_bob_start(chip);
843 }
844}
845
846/* call with substream spinlock */
847static void snd_es1968_bob_dec(struct es1968 *chip)
848{
849 chip->bobclient--;
850 if (chip->bobclient <= 0)
851 snd_es1968_bob_stop(chip);
852 else if (chip->bob_freq > ESM_BOB_FREQ) {
853 /* check reduction of timer frequency */
854 int max_freq = ESM_BOB_FREQ;
855 struct esschan *es;
856 list_for_each_entry(es, &chip->substream_list, list) {
857 if (max_freq < es->bob_freq)
858 max_freq = es->bob_freq;
859 }
860 if (max_freq != chip->bob_freq) {
861 snd_es1968_bob_stop(chip);
862 chip->bob_freq = max_freq;
863 snd_es1968_bob_start(chip);
864 }
865 }
866}
867
868static int
869snd_es1968_calc_bob_rate(struct es1968 *chip, struct esschan *es,
870 struct snd_pcm_runtime *runtime)
871{
872 /* we acquire 4 interrupts per period for precise control.. */
873 int freq = runtime->rate * 4;
874 if (es->fmt & ESS_FMT_STEREO)
875 freq <<= 1;
876 if (es->fmt & ESS_FMT_16BIT)
877 freq <<= 1;
878 freq /= es->frag_size;
879 if (freq < ESM_BOB_FREQ)
880 freq = ESM_BOB_FREQ;
881 else if (freq > ESM_BOB_FREQ_MAX)
882 freq = ESM_BOB_FREQ_MAX;
883 return freq;
884}
885
886
887/*************
888 * PCM Part *
889 *************/
890
891static u32 snd_es1968_compute_rate(struct es1968 *chip, u32 freq)
892{
893 u32 rate = (freq << 16) / chip->clock;
894#if 0 /* XXX: do we need this? */
895 if (rate > 0x10000)
896 rate = 0x10000;
897#endif
898 return rate;
899}
900
901/* get current pointer */
902static inline unsigned int
903snd_es1968_get_dma_ptr(struct es1968 *chip, struct esschan *es)
904{
905 unsigned int offset;
906
907 offset = apu_get_register(chip, es->apu[0], 5);
908
909 offset -= es->base[0];
910
911 return (offset & 0xFFFE); /* hardware is in words */
912}
913
914static void snd_es1968_apu_set_freq(struct es1968 *chip, int apu, int freq)
915{
916 apu_set_register(chip, apu, 2,
917 (apu_get_register(chip, apu, 2) & 0x00FF) |
918 ((freq & 0xff) << 8) | 0x10);
919 apu_set_register(chip, apu, 3, freq >> 8);
920}
921
922/* spin lock held */
923static inline void snd_es1968_trigger_apu(struct es1968 *esm, int apu, int mode)
924{
925 /* set the APU mode */
926 __apu_set_register(esm, apu, 0,
927 (__apu_get_register(esm, apu, 0) & 0xff0f) |
928 (mode << 4));
929}
930
931static void snd_es1968_pcm_start(struct es1968 *chip, struct esschan *es)
932{
933 spin_lock(&chip->reg_lock);
934 __apu_set_register(chip, es->apu[0], 5, es->base[0]);
935 snd_es1968_trigger_apu(chip, es->apu[0], es->apu_mode[0]);
936 if (es->mode == ESM_MODE_CAPTURE) {
937 __apu_set_register(chip, es->apu[2], 5, es->base[2]);
938 snd_es1968_trigger_apu(chip, es->apu[2], es->apu_mode[2]);
939 }
940 if (es->fmt & ESS_FMT_STEREO) {
941 __apu_set_register(chip, es->apu[1], 5, es->base[1]);
942 snd_es1968_trigger_apu(chip, es->apu[1], es->apu_mode[1]);
943 if (es->mode == ESM_MODE_CAPTURE) {
944 __apu_set_register(chip, es->apu[3], 5, es->base[3]);
945 snd_es1968_trigger_apu(chip, es->apu[3], es->apu_mode[3]);
946 }
947 }
948 spin_unlock(&chip->reg_lock);
949}
950
951static void snd_es1968_pcm_stop(struct es1968 *chip, struct esschan *es)
952{
953 spin_lock(&chip->reg_lock);
954 snd_es1968_trigger_apu(chip, es->apu[0], 0);
955 snd_es1968_trigger_apu(chip, es->apu[1], 0);
956 if (es->mode == ESM_MODE_CAPTURE) {
957 snd_es1968_trigger_apu(chip, es->apu[2], 0);
958 snd_es1968_trigger_apu(chip, es->apu[3], 0);
959 }
960 spin_unlock(&chip->reg_lock);
961}
962
963/* set the wavecache control reg */
964static void snd_es1968_program_wavecache(struct es1968 *chip, struct esschan *es,
965 int channel, u32 addr, int capture)
966{
967 u32 tmpval = (addr - 0x10) & 0xFFF8;
968
969 if (! capture) {
970 if (!(es->fmt & ESS_FMT_16BIT))
971 tmpval |= 4; /* 8bit */
972 if (es->fmt & ESS_FMT_STEREO)
973 tmpval |= 2; /* stereo */
974 }
975
976 /* set the wavecache control reg */
977 wave_set_register(chip, es->apu[channel] << 3, tmpval);
978
979#ifdef CONFIG_PM_SLEEP
980 es->wc_map[channel] = tmpval;
981#endif
982}
983
984
985static void snd_es1968_playback_setup(struct es1968 *chip, struct esschan *es,
986 struct snd_pcm_runtime *runtime)
987{
988 u32 pa;
989 int high_apu = 0;
990 int channel, apu;
991 int i, size;
992 unsigned long flags;
993 u32 freq;
994
995 size = es->dma_size >> es->wav_shift;
996
997 if (es->fmt & ESS_FMT_STEREO)
998 high_apu++;
999
1000 for (channel = 0; channel <= high_apu; channel++) {
1001 apu = es->apu[channel];
1002
1003 snd_es1968_program_wavecache(chip, es, channel, es->memory->buf.addr, 0);
1004
1005 /* Offset to PCMBAR */
1006 pa = es->memory->buf.addr;
1007 pa -= chip->dma.addr;
1008 pa >>= 1; /* words */
1009
1010 pa |= 0x00400000; /* System RAM (Bit 22) */
1011
1012 if (es->fmt & ESS_FMT_STEREO) {
1013 /* Enable stereo */
1014 if (channel)
1015 pa |= 0x00800000; /* (Bit 23) */
1016 if (es->fmt & ESS_FMT_16BIT)
1017 pa >>= 1;
1018 }
1019
1020 /* base offset of dma calcs when reading the pointer
1021 on this left one */
1022 es->base[channel] = pa & 0xFFFF;
1023
1024 for (i = 0; i < 16; i++)
1025 apu_set_register(chip, apu, i, 0x0000);
1026
1027 /* Load the buffer into the wave engine */
1028 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xFF) << 8);
1029 apu_set_register(chip, apu, 5, pa & 0xFFFF);
1030 apu_set_register(chip, apu, 6, (pa + size) & 0xFFFF);
1031 /* setting loop == sample len */
1032 apu_set_register(chip, apu, 7, size);
1033
1034 /* clear effects/env.. */
1035 apu_set_register(chip, apu, 8, 0x0000);
1036 /* set amp now to 0xd0 (?), low byte is 'amplitude dest'? */
1037 apu_set_register(chip, apu, 9, 0xD000);
1038
1039 /* clear routing stuff */
1040 apu_set_register(chip, apu, 11, 0x0000);
1041 /* dma on, no envelopes, filter to all 1s) */
1042 apu_set_register(chip, apu, 0, 0x400F);
1043
1044 if (es->fmt & ESS_FMT_16BIT)
1045 es->apu_mode[channel] = ESM_APU_16BITLINEAR;
1046 else
1047 es->apu_mode[channel] = ESM_APU_8BITLINEAR;
1048
1049 if (es->fmt & ESS_FMT_STEREO) {
1050 /* set panning: left or right */
1051 /* Check: different panning. On my Canyon 3D Chipset the
1052 Channels are swapped. I don't know, about the output
1053 to the SPDif Link. Perhaps you have to change this
1054 and not the APU Regs 4-5. */
1055 apu_set_register(chip, apu, 10,
1056 0x8F00 | (channel ? 0 : 0x10));
1057 es->apu_mode[channel] += 1; /* stereo */
1058 } else
1059 apu_set_register(chip, apu, 10, 0x8F08);
1060 }
1061
1062 spin_lock_irqsave(&chip->reg_lock, flags);
1063 /* clear WP interrupts */
1064 outw(1, chip->io_port + 0x04);
1065 /* enable WP ints */
1066 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ);
1067 spin_unlock_irqrestore(&chip->reg_lock, flags);
1068
1069 freq = runtime->rate;
1070 /* set frequency */
1071 if (freq > 48000)
1072 freq = 48000;
1073 if (freq < 4000)
1074 freq = 4000;
1075
1076 /* hmmm.. */
1077 if (!(es->fmt & ESS_FMT_16BIT) && !(es->fmt & ESS_FMT_STEREO))
1078 freq >>= 1;
1079
1080 freq = snd_es1968_compute_rate(chip, freq);
1081
1082 /* Load the frequency, turn on 6dB */
1083 snd_es1968_apu_set_freq(chip, es->apu[0], freq);
1084 snd_es1968_apu_set_freq(chip, es->apu[1], freq);
1085}
1086
1087
1088static void init_capture_apu(struct es1968 *chip, struct esschan *es, int channel,
1089 unsigned int pa, unsigned int bsize,
1090 int mode, int route)
1091{
1092 int i, apu = es->apu[channel];
1093
1094 es->apu_mode[channel] = mode;
1095
1096 /* set the wavecache control reg */
1097 snd_es1968_program_wavecache(chip, es, channel, pa, 1);
1098
1099 /* Offset to PCMBAR */
1100 pa -= chip->dma.addr;
1101 pa >>= 1; /* words */
1102
1103 /* base offset of dma calcs when reading the pointer
1104 on this left one */
1105 es->base[channel] = pa & 0xFFFF;
1106 pa |= 0x00400000; /* bit 22 -> System RAM */
1107
1108 /* Begin loading the APU */
1109 for (i = 0; i < 16; i++)
1110 apu_set_register(chip, apu, i, 0x0000);
1111
1112 /* need to enable subgroups.. and we should probably
1113 have different groups for different /dev/dsps.. */
1114 apu_set_register(chip, apu, 2, 0x8);
1115
1116 /* Load the buffer into the wave engine */
1117 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xFF) << 8);
1118 apu_set_register(chip, apu, 5, pa & 0xFFFF);
1119 apu_set_register(chip, apu, 6, (pa + bsize) & 0xFFFF);
1120 apu_set_register(chip, apu, 7, bsize);
1121 /* clear effects/env.. */
1122 apu_set_register(chip, apu, 8, 0x00F0);
1123 /* amplitude now? sure. why not. */
1124 apu_set_register(chip, apu, 9, 0x0000);
1125 /* set filter tune, radius, polar pan */
1126 apu_set_register(chip, apu, 10, 0x8F08);
1127 /* route input */
1128 apu_set_register(chip, apu, 11, route);
1129 /* dma on, no envelopes, filter to all 1s) */
1130 apu_set_register(chip, apu, 0, 0x400F);
1131}
1132
1133static void snd_es1968_capture_setup(struct es1968 *chip, struct esschan *es,
1134 struct snd_pcm_runtime *runtime)
1135{
1136 int size;
1137 u32 freq;
1138 unsigned long flags;
1139
1140 size = es->dma_size >> es->wav_shift;
1141
1142 /* APU assignments:
1143 0 = mono/left SRC
1144 1 = right SRC
1145 2 = mono/left Input Mixer
1146 3 = right Input Mixer
1147 */
1148 /* data seems to flow from the codec, through an apu into
1149 the 'mixbuf' bit of page, then through the SRC apu
1150 and out to the real 'buffer'. ok. sure. */
1151
1152 /* input mixer (left/mono) */
1153 /* parallel in crap, see maestro reg 0xC [8-11] */
1154 init_capture_apu(chip, es, 2,
1155 es->mixbuf->buf.addr, ESM_MIXBUF_SIZE/4, /* in words */
1156 ESM_APU_INPUTMIXER, 0x14);
1157 /* SRC (left/mono); get input from inputing apu */
1158 init_capture_apu(chip, es, 0, es->memory->buf.addr, size,
1159 ESM_APU_SRCONVERTOR, es->apu[2]);
1160 if (es->fmt & ESS_FMT_STEREO) {
1161 /* input mixer (right) */
1162 init_capture_apu(chip, es, 3,
1163 es->mixbuf->buf.addr + ESM_MIXBUF_SIZE/2,
1164 ESM_MIXBUF_SIZE/4, /* in words */
1165 ESM_APU_INPUTMIXER, 0x15);
1166 /* SRC (right) */
1167 init_capture_apu(chip, es, 1,
1168 es->memory->buf.addr + size*2, size,
1169 ESM_APU_SRCONVERTOR, es->apu[3]);
1170 }
1171
1172 freq = runtime->rate;
1173 /* Sample Rate conversion APUs don't like 0x10000 for their rate */
1174 if (freq > 47999)
1175 freq = 47999;
1176 if (freq < 4000)
1177 freq = 4000;
1178
1179 freq = snd_es1968_compute_rate(chip, freq);
1180
1181 /* Load the frequency, turn on 6dB */
1182 snd_es1968_apu_set_freq(chip, es->apu[0], freq);
1183 snd_es1968_apu_set_freq(chip, es->apu[1], freq);
1184
1185 /* fix mixer rate at 48khz. and its _must_ be 0x10000. */
1186 freq = 0x10000;
1187 snd_es1968_apu_set_freq(chip, es->apu[2], freq);
1188 snd_es1968_apu_set_freq(chip, es->apu[3], freq);
1189
1190 spin_lock_irqsave(&chip->reg_lock, flags);
1191 /* clear WP interrupts */
1192 outw(1, chip->io_port + 0x04);
1193 /* enable WP ints */
1194 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ);
1195 spin_unlock_irqrestore(&chip->reg_lock, flags);
1196}
1197
1198/*******************
1199 * ALSA Interface *
1200 *******************/
1201
1202static int snd_es1968_pcm_prepare(struct snd_pcm_substream *substream)
1203{
1204 struct es1968 *chip = snd_pcm_substream_chip(substream);
1205 struct snd_pcm_runtime *runtime = substream->runtime;
1206 struct esschan *es = runtime->private_data;
1207
1208 es->dma_size = snd_pcm_lib_buffer_bytes(substream);
1209 es->frag_size = snd_pcm_lib_period_bytes(substream);
1210
1211 es->wav_shift = 1; /* maestro handles always 16bit */
1212 es->fmt = 0;
1213 if (snd_pcm_format_width(runtime->format) == 16)
1214 es->fmt |= ESS_FMT_16BIT;
1215 if (runtime->channels > 1) {
1216 es->fmt |= ESS_FMT_STEREO;
1217 if (es->fmt & ESS_FMT_16BIT) /* 8bit is already word shifted */
1218 es->wav_shift++;
1219 }
1220 es->bob_freq = snd_es1968_calc_bob_rate(chip, es, runtime);
1221
1222 switch (es->mode) {
1223 case ESM_MODE_PLAY:
1224 snd_es1968_playback_setup(chip, es, runtime);
1225 break;
1226 case ESM_MODE_CAPTURE:
1227 snd_es1968_capture_setup(chip, es, runtime);
1228 break;
1229 }
1230
1231 return 0;
1232}
1233
1234static int snd_es1968_pcm_trigger(struct snd_pcm_substream *substream, int cmd)
1235{
1236 struct es1968 *chip = snd_pcm_substream_chip(substream);
1237 struct esschan *es = substream->runtime->private_data;
1238
1239 spin_lock(&chip->substream_lock);
1240 switch (cmd) {
1241 case SNDRV_PCM_TRIGGER_START:
1242 case SNDRV_PCM_TRIGGER_RESUME:
1243 if (es->running)
1244 break;
1245 snd_es1968_bob_inc(chip, es->bob_freq);
1246 es->count = 0;
1247 es->hwptr = 0;
1248 snd_es1968_pcm_start(chip, es);
1249 es->running = 1;
1250 break;
1251 case SNDRV_PCM_TRIGGER_STOP:
1252 case SNDRV_PCM_TRIGGER_SUSPEND:
1253 if (! es->running)
1254 break;
1255 snd_es1968_pcm_stop(chip, es);
1256 es->running = 0;
1257 snd_es1968_bob_dec(chip);
1258 break;
1259 }
1260 spin_unlock(&chip->substream_lock);
1261 return 0;
1262}
1263
1264static snd_pcm_uframes_t snd_es1968_pcm_pointer(struct snd_pcm_substream *substream)
1265{
1266 struct es1968 *chip = snd_pcm_substream_chip(substream);
1267 struct esschan *es = substream->runtime->private_data;
1268 unsigned int ptr;
1269
1270 ptr = snd_es1968_get_dma_ptr(chip, es) << es->wav_shift;
1271
1272 return bytes_to_frames(substream->runtime, ptr % es->dma_size);
1273}
1274
1275static const struct snd_pcm_hardware snd_es1968_playback = {
1276 .info = (SNDRV_PCM_INFO_MMAP |
1277 SNDRV_PCM_INFO_MMAP_VALID |
1278 SNDRV_PCM_INFO_INTERLEAVED |
1279 SNDRV_PCM_INFO_BLOCK_TRANSFER |
1280 /*SNDRV_PCM_INFO_PAUSE |*/
1281 SNDRV_PCM_INFO_RESUME),
1282 .formats = SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE,
1283 .rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
1284 .rate_min = 4000,
1285 .rate_max = 48000,
1286 .channels_min = 1,
1287 .channels_max = 2,
1288 .buffer_bytes_max = 65536,
1289 .period_bytes_min = 256,
1290 .period_bytes_max = 65536,
1291 .periods_min = 1,
1292 .periods_max = 1024,
1293 .fifo_size = 0,
1294};
1295
1296static const struct snd_pcm_hardware snd_es1968_capture = {
1297 .info = (SNDRV_PCM_INFO_NONINTERLEAVED |
1298 SNDRV_PCM_INFO_MMAP |
1299 SNDRV_PCM_INFO_MMAP_VALID |
1300 SNDRV_PCM_INFO_BLOCK_TRANSFER |
1301 /*SNDRV_PCM_INFO_PAUSE |*/
1302 SNDRV_PCM_INFO_RESUME),
1303 .formats = /*SNDRV_PCM_FMTBIT_U8 |*/ SNDRV_PCM_FMTBIT_S16_LE,
1304 .rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
1305 .rate_min = 4000,
1306 .rate_max = 48000,
1307 .channels_min = 1,
1308 .channels_max = 2,
1309 .buffer_bytes_max = 65536,
1310 .period_bytes_min = 256,
1311 .period_bytes_max = 65536,
1312 .periods_min = 1,
1313 .periods_max = 1024,
1314 .fifo_size = 0,
1315};
1316
1317/* *************************
1318 * DMA memory management *
1319 *************************/
1320
1321/* Because the Maestro can only take addresses relative to the PCM base address
1322 register :( */
1323
1324static int calc_available_memory_size(struct es1968 *chip)
1325{
1326 int max_size = 0;
1327 struct esm_memory *buf;
1328
1329 mutex_lock(&chip->memory_mutex);
1330 list_for_each_entry(buf, &chip->buf_list, list) {
1331 if (buf->empty && buf->buf.bytes > max_size)
1332 max_size = buf->buf.bytes;
1333 }
1334 mutex_unlock(&chip->memory_mutex);
1335 if (max_size >= 128*1024)
1336 max_size = 127*1024;
1337 return max_size;
1338}
1339
1340/* allocate a new memory chunk with the specified size */
1341static struct esm_memory *snd_es1968_new_memory(struct es1968 *chip, int size)
1342{
1343 struct esm_memory *buf;
1344
1345 size = ALIGN(size, ESM_MEM_ALIGN);
1346 mutex_lock(&chip->memory_mutex);
1347 list_for_each_entry(buf, &chip->buf_list, list) {
1348 if (buf->empty && buf->buf.bytes >= size)
1349 goto __found;
1350 }
1351 mutex_unlock(&chip->memory_mutex);
1352 return NULL;
1353
1354__found:
1355 if (buf->buf.bytes > size) {
1356 struct esm_memory *chunk = kmalloc(sizeof(*chunk), GFP_KERNEL);
1357 if (chunk == NULL) {
1358 mutex_unlock(&chip->memory_mutex);
1359 return NULL;
1360 }
1361 chunk->buf = buf->buf;
1362 chunk->buf.bytes -= size;
1363 chunk->buf.area += size;
1364 chunk->buf.addr += size;
1365 chunk->empty = 1;
1366 buf->buf.bytes = size;
1367 list_add(&chunk->list, &buf->list);
1368 }
1369 buf->empty = 0;
1370 mutex_unlock(&chip->memory_mutex);
1371 return buf;
1372}
1373
1374/* free a memory chunk */
1375static void snd_es1968_free_memory(struct es1968 *chip, struct esm_memory *buf)
1376{
1377 struct esm_memory *chunk;
1378
1379 mutex_lock(&chip->memory_mutex);
1380 buf->empty = 1;
1381 if (buf->list.prev != &chip->buf_list) {
1382 chunk = list_entry(buf->list.prev, struct esm_memory, list);
1383 if (chunk->empty) {
1384 chunk->buf.bytes += buf->buf.bytes;
1385 list_del(&buf->list);
1386 kfree(buf);
1387 buf = chunk;
1388 }
1389 }
1390 if (buf->list.next != &chip->buf_list) {
1391 chunk = list_entry(buf->list.next, struct esm_memory, list);
1392 if (chunk->empty) {
1393 buf->buf.bytes += chunk->buf.bytes;
1394 list_del(&chunk->list);
1395 kfree(chunk);
1396 }
1397 }
1398 mutex_unlock(&chip->memory_mutex);
1399}
1400
1401static void snd_es1968_free_dmabuf(struct es1968 *chip)
1402{
1403 struct list_head *p;
1404
1405 if (! chip->dma.area)
1406 return;
1407 snd_dma_free_pages(&chip->dma);
1408 while ((p = chip->buf_list.next) != &chip->buf_list) {
1409 struct esm_memory *chunk = list_entry(p, struct esm_memory, list);
1410 list_del(p);
1411 kfree(chunk);
1412 }
1413}
1414
1415static int
1416snd_es1968_init_dmabuf(struct es1968 *chip)
1417{
1418 int err;
1419 struct esm_memory *chunk;
1420
1421 err = snd_dma_alloc_pages_fallback(SNDRV_DMA_TYPE_DEV,
1422 &chip->pci->dev,
1423 chip->total_bufsize, &chip->dma);
1424 if (err < 0 || ! chip->dma.area) {
1425 dev_err(chip->card->dev,
1426 "can't allocate dma pages for size %d\n",
1427 chip->total_bufsize);
1428 return -ENOMEM;
1429 }
1430 if ((chip->dma.addr + chip->dma.bytes - 1) & ~((1 << 28) - 1)) {
1431 snd_dma_free_pages(&chip->dma);
1432 dev_err(chip->card->dev, "DMA buffer beyond 256MB.\n");
1433 return -ENOMEM;
1434 }
1435
1436 INIT_LIST_HEAD(&chip->buf_list);
1437 /* allocate an empty chunk */
1438 chunk = kmalloc(sizeof(*chunk), GFP_KERNEL);
1439 if (chunk == NULL) {
1440 snd_es1968_free_dmabuf(chip);
1441 return -ENOMEM;
1442 }
1443 memset(chip->dma.area, 0, ESM_MEM_ALIGN);
1444 chunk->buf = chip->dma;
1445 chunk->buf.area += ESM_MEM_ALIGN;
1446 chunk->buf.addr += ESM_MEM_ALIGN;
1447 chunk->buf.bytes -= ESM_MEM_ALIGN;
1448 chunk->empty = 1;
1449 list_add(&chunk->list, &chip->buf_list);
1450
1451 return 0;
1452}
1453
1454/* setup the dma_areas */
1455/* buffer is extracted from the pre-allocated memory chunk */
1456static int snd_es1968_hw_params(struct snd_pcm_substream *substream,
1457 struct snd_pcm_hw_params *hw_params)
1458{
1459 struct es1968 *chip = snd_pcm_substream_chip(substream);
1460 struct snd_pcm_runtime *runtime = substream->runtime;
1461 struct esschan *chan = runtime->private_data;
1462 int size = params_buffer_bytes(hw_params);
1463
1464 if (chan->memory) {
1465 if (chan->memory->buf.bytes >= size) {
1466 runtime->dma_bytes = size;
1467 return 0;
1468 }
1469 snd_es1968_free_memory(chip, chan->memory);
1470 }
1471 chan->memory = snd_es1968_new_memory(chip, size);
1472 if (chan->memory == NULL) {
1473 dev_dbg(chip->card->dev,
1474 "cannot allocate dma buffer: size = %d\n", size);
1475 return -ENOMEM;
1476 }
1477 snd_pcm_set_runtime_buffer(substream, &chan->memory->buf);
1478 return 1; /* area was changed */
1479}
1480
1481/* remove dma areas if allocated */
1482static int snd_es1968_hw_free(struct snd_pcm_substream *substream)
1483{
1484 struct es1968 *chip = snd_pcm_substream_chip(substream);
1485 struct snd_pcm_runtime *runtime = substream->runtime;
1486 struct esschan *chan;
1487
1488 if (runtime->private_data == NULL)
1489 return 0;
1490 chan = runtime->private_data;
1491 if (chan->memory) {
1492 snd_es1968_free_memory(chip, chan->memory);
1493 chan->memory = NULL;
1494 }
1495 return 0;
1496}
1497
1498
1499/*
1500 * allocate APU pair
1501 */
1502static int snd_es1968_alloc_apu_pair(struct es1968 *chip, int type)
1503{
1504 int apu;
1505
1506 for (apu = 0; apu < NR_APUS; apu += 2) {
1507 if (chip->apu[apu] == ESM_APU_FREE &&
1508 chip->apu[apu + 1] == ESM_APU_FREE) {
1509 chip->apu[apu] = chip->apu[apu + 1] = type;
1510 return apu;
1511 }
1512 }
1513 return -EBUSY;
1514}
1515
1516/*
1517 * release APU pair
1518 */
1519static void snd_es1968_free_apu_pair(struct es1968 *chip, int apu)
1520{
1521 chip->apu[apu] = chip->apu[apu + 1] = ESM_APU_FREE;
1522}
1523
1524
1525/******************
1526 * PCM open/close *
1527 ******************/
1528
1529static int snd_es1968_playback_open(struct snd_pcm_substream *substream)
1530{
1531 struct es1968 *chip = snd_pcm_substream_chip(substream);
1532 struct snd_pcm_runtime *runtime = substream->runtime;
1533 struct esschan *es;
1534 int apu1;
1535
1536 /* search 2 APUs */
1537 apu1 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_PLAY);
1538 if (apu1 < 0)
1539 return apu1;
1540
1541 es = kzalloc(sizeof(*es), GFP_KERNEL);
1542 if (!es) {
1543 snd_es1968_free_apu_pair(chip, apu1);
1544 return -ENOMEM;
1545 }
1546
1547 es->apu[0] = apu1;
1548 es->apu[1] = apu1 + 1;
1549 es->apu_mode[0] = 0;
1550 es->apu_mode[1] = 0;
1551 es->running = 0;
1552 es->substream = substream;
1553 es->mode = ESM_MODE_PLAY;
1554
1555 runtime->private_data = es;
1556 runtime->hw = snd_es1968_playback;
1557 runtime->hw.buffer_bytes_max = runtime->hw.period_bytes_max =
1558 calc_available_memory_size(chip);
1559
1560 spin_lock_irq(&chip->substream_lock);
1561 list_add(&es->list, &chip->substream_list);
1562 spin_unlock_irq(&chip->substream_lock);
1563
1564 return 0;
1565}
1566
1567static int snd_es1968_capture_open(struct snd_pcm_substream *substream)
1568{
1569 struct snd_pcm_runtime *runtime = substream->runtime;
1570 struct es1968 *chip = snd_pcm_substream_chip(substream);
1571 struct esschan *es;
1572 int apu1, apu2;
1573
1574 apu1 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_CAPTURE);
1575 if (apu1 < 0)
1576 return apu1;
1577 apu2 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_RATECONV);
1578 if (apu2 < 0) {
1579 snd_es1968_free_apu_pair(chip, apu1);
1580 return apu2;
1581 }
1582
1583 es = kzalloc(sizeof(*es), GFP_KERNEL);
1584 if (!es) {
1585 snd_es1968_free_apu_pair(chip, apu1);
1586 snd_es1968_free_apu_pair(chip, apu2);
1587 return -ENOMEM;
1588 }
1589
1590 es->apu[0] = apu1;
1591 es->apu[1] = apu1 + 1;
1592 es->apu[2] = apu2;
1593 es->apu[3] = apu2 + 1;
1594 es->apu_mode[0] = 0;
1595 es->apu_mode[1] = 0;
1596 es->apu_mode[2] = 0;
1597 es->apu_mode[3] = 0;
1598 es->running = 0;
1599 es->substream = substream;
1600 es->mode = ESM_MODE_CAPTURE;
1601
1602 /* get mixbuffer */
1603 es->mixbuf = snd_es1968_new_memory(chip, ESM_MIXBUF_SIZE);
1604 if (!es->mixbuf) {
1605 snd_es1968_free_apu_pair(chip, apu1);
1606 snd_es1968_free_apu_pair(chip, apu2);
1607 kfree(es);
1608 return -ENOMEM;
1609 }
1610 memset(es->mixbuf->buf.area, 0, ESM_MIXBUF_SIZE);
1611
1612 runtime->private_data = es;
1613 runtime->hw = snd_es1968_capture;
1614 runtime->hw.buffer_bytes_max = runtime->hw.period_bytes_max =
1615 calc_available_memory_size(chip) - 1024; /* keep MIXBUF size */
1616 snd_pcm_hw_constraint_pow2(runtime, 0, SNDRV_PCM_HW_PARAM_BUFFER_BYTES);
1617
1618 spin_lock_irq(&chip->substream_lock);
1619 list_add(&es->list, &chip->substream_list);
1620 spin_unlock_irq(&chip->substream_lock);
1621
1622 return 0;
1623}
1624
1625static int snd_es1968_playback_close(struct snd_pcm_substream *substream)
1626{
1627 struct es1968 *chip = snd_pcm_substream_chip(substream);
1628 struct esschan *es;
1629
1630 if (substream->runtime->private_data == NULL)
1631 return 0;
1632 es = substream->runtime->private_data;
1633 spin_lock_irq(&chip->substream_lock);
1634 list_del(&es->list);
1635 spin_unlock_irq(&chip->substream_lock);
1636 snd_es1968_free_apu_pair(chip, es->apu[0]);
1637 kfree(es);
1638
1639 return 0;
1640}
1641
1642static int snd_es1968_capture_close(struct snd_pcm_substream *substream)
1643{
1644 struct es1968 *chip = snd_pcm_substream_chip(substream);
1645 struct esschan *es;
1646
1647 if (substream->runtime->private_data == NULL)
1648 return 0;
1649 es = substream->runtime->private_data;
1650 spin_lock_irq(&chip->substream_lock);
1651 list_del(&es->list);
1652 spin_unlock_irq(&chip->substream_lock);
1653 snd_es1968_free_memory(chip, es->mixbuf);
1654 snd_es1968_free_apu_pair(chip, es->apu[0]);
1655 snd_es1968_free_apu_pair(chip, es->apu[2]);
1656 kfree(es);
1657
1658 return 0;
1659}
1660
1661static const struct snd_pcm_ops snd_es1968_playback_ops = {
1662 .open = snd_es1968_playback_open,
1663 .close = snd_es1968_playback_close,
1664 .hw_params = snd_es1968_hw_params,
1665 .hw_free = snd_es1968_hw_free,
1666 .prepare = snd_es1968_pcm_prepare,
1667 .trigger = snd_es1968_pcm_trigger,
1668 .pointer = snd_es1968_pcm_pointer,
1669};
1670
1671static const struct snd_pcm_ops snd_es1968_capture_ops = {
1672 .open = snd_es1968_capture_open,
1673 .close = snd_es1968_capture_close,
1674 .hw_params = snd_es1968_hw_params,
1675 .hw_free = snd_es1968_hw_free,
1676 .prepare = snd_es1968_pcm_prepare,
1677 .trigger = snd_es1968_pcm_trigger,
1678 .pointer = snd_es1968_pcm_pointer,
1679};
1680
1681
1682/*
1683 * measure clock
1684 */
1685#define CLOCK_MEASURE_BUFSIZE 16768 /* enough large for a single shot */
1686
1687static void es1968_measure_clock(struct es1968 *chip)
1688{
1689 int i, apu;
1690 unsigned int pa, offset, t;
1691 struct esm_memory *memory;
1692 ktime_t start_time, stop_time;
1693 ktime_t diff;
1694
1695 if (chip->clock == 0)
1696 chip->clock = 48000; /* default clock value */
1697
1698 /* search 2 APUs (although one apu is enough) */
1699 apu = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_PLAY);
1700 if (apu < 0) {
1701 dev_err(chip->card->dev, "Hmm, cannot find empty APU pair!?\n");
1702 return;
1703 }
1704 memory = snd_es1968_new_memory(chip, CLOCK_MEASURE_BUFSIZE);
1705 if (!memory) {
1706 dev_warn(chip->card->dev,
1707 "cannot allocate dma buffer - using default clock %d\n",
1708 chip->clock);
1709 snd_es1968_free_apu_pair(chip, apu);
1710 return;
1711 }
1712
1713 memset(memory->buf.area, 0, CLOCK_MEASURE_BUFSIZE);
1714
1715 wave_set_register(chip, apu << 3, (memory->buf.addr - 0x10) & 0xfff8);
1716
1717 pa = (unsigned int)((memory->buf.addr - chip->dma.addr) >> 1);
1718 pa |= 0x00400000; /* System RAM (Bit 22) */
1719
1720 /* initialize apu */
1721 for (i = 0; i < 16; i++)
1722 apu_set_register(chip, apu, i, 0x0000);
1723
1724 apu_set_register(chip, apu, 0, 0x400f);
1725 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xff) << 8);
1726 apu_set_register(chip, apu, 5, pa & 0xffff);
1727 apu_set_register(chip, apu, 6, (pa + CLOCK_MEASURE_BUFSIZE/2) & 0xffff);
1728 apu_set_register(chip, apu, 7, CLOCK_MEASURE_BUFSIZE/2);
1729 apu_set_register(chip, apu, 8, 0x0000);
1730 apu_set_register(chip, apu, 9, 0xD000);
1731 apu_set_register(chip, apu, 10, 0x8F08);
1732 apu_set_register(chip, apu, 11, 0x0000);
1733 spin_lock_irq(&chip->reg_lock);
1734 outw(1, chip->io_port + 0x04); /* clear WP interrupts */
1735 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ); /* enable WP ints */
1736 spin_unlock_irq(&chip->reg_lock);
1737
1738 snd_es1968_apu_set_freq(chip, apu, ((unsigned int)48000 << 16) / chip->clock); /* 48000 Hz */
1739
1740 chip->in_measurement = 1;
1741 chip->measure_apu = apu;
1742 spin_lock_irq(&chip->reg_lock);
1743 snd_es1968_bob_inc(chip, ESM_BOB_FREQ);
1744 __apu_set_register(chip, apu, 5, pa & 0xffff);
1745 snd_es1968_trigger_apu(chip, apu, ESM_APU_16BITLINEAR);
1746 start_time = ktime_get();
1747 spin_unlock_irq(&chip->reg_lock);
1748 msleep(50);
1749 spin_lock_irq(&chip->reg_lock);
1750 offset = __apu_get_register(chip, apu, 5);
1751 stop_time = ktime_get();
1752 snd_es1968_trigger_apu(chip, apu, 0); /* stop */
1753 snd_es1968_bob_dec(chip);
1754 chip->in_measurement = 0;
1755 spin_unlock_irq(&chip->reg_lock);
1756
1757 /* check the current position */
1758 offset -= (pa & 0xffff);
1759 offset &= 0xfffe;
1760 offset += chip->measure_count * (CLOCK_MEASURE_BUFSIZE/2);
1761
1762 diff = ktime_sub(stop_time, start_time);
1763 t = ktime_to_us(diff);
1764 if (t == 0) {
1765 dev_err(chip->card->dev, "?? calculation error..\n");
1766 } else {
1767 offset *= 1000;
1768 offset = (offset / t) * 1000 + ((offset % t) * 1000) / t;
1769 if (offset < 47500 || offset > 48500) {
1770 if (offset >= 40000 && offset <= 50000)
1771 chip->clock = (chip->clock * offset) / 48000;
1772 }
1773 dev_info(chip->card->dev, "clocking to %d\n", chip->clock);
1774 }
1775 snd_es1968_free_memory(chip, memory);
1776 snd_es1968_free_apu_pair(chip, apu);
1777}
1778
1779
1780/*
1781 */
1782
1783static void snd_es1968_pcm_free(struct snd_pcm *pcm)
1784{
1785 struct es1968 *esm = pcm->private_data;
1786 snd_es1968_free_dmabuf(esm);
1787 esm->pcm = NULL;
1788}
1789
1790static int
1791snd_es1968_pcm(struct es1968 *chip, int device)
1792{
1793 struct snd_pcm *pcm;
1794 int err;
1795
1796 /* get DMA buffer */
1797 err = snd_es1968_init_dmabuf(chip);
1798 if (err < 0)
1799 return err;
1800
1801 /* set PCMBAR */
1802 wave_set_register(chip, 0x01FC, chip->dma.addr >> 12);
1803 wave_set_register(chip, 0x01FD, chip->dma.addr >> 12);
1804 wave_set_register(chip, 0x01FE, chip->dma.addr >> 12);
1805 wave_set_register(chip, 0x01FF, chip->dma.addr >> 12);
1806
1807 err = snd_pcm_new(chip->card, "ESS Maestro", device,
1808 chip->playback_streams,
1809 chip->capture_streams, &pcm);
1810 if (err < 0)
1811 return err;
1812
1813 pcm->private_data = chip;
1814 pcm->private_free = snd_es1968_pcm_free;
1815
1816 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_es1968_playback_ops);
1817 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_es1968_capture_ops);
1818
1819 pcm->info_flags = 0;
1820
1821 strcpy(pcm->name, "ESS Maestro");
1822
1823 chip->pcm = pcm;
1824
1825 return 0;
1826}
1827/*
1828 * suppress jitter on some maestros when playing stereo
1829 */
1830static void snd_es1968_suppress_jitter(struct es1968 *chip, struct esschan *es)
1831{
1832 unsigned int cp1;
1833 unsigned int cp2;
1834 unsigned int diff;
1835
1836 cp1 = __apu_get_register(chip, 0, 5);
1837 cp2 = __apu_get_register(chip, 1, 5);
1838 diff = (cp1 > cp2 ? cp1 - cp2 : cp2 - cp1);
1839
1840 if (diff > 1)
1841 __maestro_write(chip, IDR0_DATA_PORT, cp1);
1842}
1843
1844/*
1845 * update pointer
1846 */
1847static void snd_es1968_update_pcm(struct es1968 *chip, struct esschan *es)
1848{
1849 unsigned int hwptr;
1850 unsigned int diff;
1851 struct snd_pcm_substream *subs = es->substream;
1852
1853 if (subs == NULL || !es->running)
1854 return;
1855
1856 hwptr = snd_es1968_get_dma_ptr(chip, es) << es->wav_shift;
1857 hwptr %= es->dma_size;
1858
1859 diff = (es->dma_size + hwptr - es->hwptr) % es->dma_size;
1860
1861 es->hwptr = hwptr;
1862 es->count += diff;
1863
1864 if (es->count > es->frag_size) {
1865 spin_unlock(&chip->substream_lock);
1866 snd_pcm_period_elapsed(subs);
1867 spin_lock(&chip->substream_lock);
1868 es->count %= es->frag_size;
1869 }
1870}
1871
1872/* The hardware volume works by incrementing / decrementing 2 counters
1873 (without wrap around) in response to volume button presses and then
1874 generating an interrupt. The pair of counters is stored in bits 1-3 and 5-7
1875 of a byte wide register. The meaning of bits 0 and 4 is unknown. */
1876static void es1968_update_hw_volume(struct work_struct *work)
1877{
1878 struct es1968 *chip = container_of(work, struct es1968, hwvol_work);
1879 int x, val;
1880
1881 /* Figure out which volume control button was pushed,
1882 based on differences from the default register
1883 values. */
1884 x = inb(chip->io_port + 0x1c) & 0xee;
1885 /* Reset the volume control registers. */
1886 outb(0x88, chip->io_port + 0x1c);
1887 outb(0x88, chip->io_port + 0x1d);
1888 outb(0x88, chip->io_port + 0x1e);
1889 outb(0x88, chip->io_port + 0x1f);
1890
1891 if (chip->in_suspend)
1892 return;
1893
1894#ifndef CONFIG_SND_ES1968_INPUT
1895 if (! chip->master_switch || ! chip->master_volume)
1896 return;
1897
1898 val = snd_ac97_read(chip->ac97, AC97_MASTER);
1899 switch (x) {
1900 case 0x88:
1901 /* mute */
1902 val ^= 0x8000;
1903 break;
1904 case 0xaa:
1905 /* volume up */
1906 if ((val & 0x7f) > 0)
1907 val--;
1908 if ((val & 0x7f00) > 0)
1909 val -= 0x0100;
1910 break;
1911 case 0x66:
1912 /* volume down */
1913 if ((val & 0x7f) < 0x1f)
1914 val++;
1915 if ((val & 0x7f00) < 0x1f00)
1916 val += 0x0100;
1917 break;
1918 }
1919 if (snd_ac97_update(chip->ac97, AC97_MASTER, val))
1920 snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE,
1921 &chip->master_volume->id);
1922#else
1923 if (!chip->input_dev)
1924 return;
1925
1926 val = 0;
1927 switch (x) {
1928 case 0x88:
1929 /* The counters have not changed, yet we've received a HV
1930 interrupt. According to tests run by various people this
1931 happens when pressing the mute button. */
1932 val = KEY_MUTE;
1933 break;
1934 case 0xaa:
1935 /* counters increased by 1 -> volume up */
1936 val = KEY_VOLUMEUP;
1937 break;
1938 case 0x66:
1939 /* counters decreased by 1 -> volume down */
1940 val = KEY_VOLUMEDOWN;
1941 break;
1942 }
1943
1944 if (val) {
1945 input_report_key(chip->input_dev, val, 1);
1946 input_sync(chip->input_dev);
1947 input_report_key(chip->input_dev, val, 0);
1948 input_sync(chip->input_dev);
1949 }
1950#endif
1951}
1952
1953/*
1954 * interrupt handler
1955 */
1956static irqreturn_t snd_es1968_interrupt(int irq, void *dev_id)
1957{
1958 struct es1968 *chip = dev_id;
1959 u32 event;
1960
1961 event = inb(chip->io_port + 0x1A);
1962 if (!event)
1963 return IRQ_NONE;
1964
1965 outw(inw(chip->io_port + 4) & 1, chip->io_port + 4);
1966
1967 if (event & ESM_HWVOL_IRQ)
1968 schedule_work(&chip->hwvol_work);
1969
1970 /* else ack 'em all, i imagine */
1971 outb(0xFF, chip->io_port + 0x1A);
1972
1973 if ((event & ESM_MPU401_IRQ) && chip->rmidi) {
1974 snd_mpu401_uart_interrupt(irq, chip->rmidi->private_data);
1975 }
1976
1977 if (event & ESM_SOUND_IRQ) {
1978 struct esschan *es;
1979 spin_lock(&chip->substream_lock);
1980 list_for_each_entry(es, &chip->substream_list, list) {
1981 if (es->running) {
1982 snd_es1968_update_pcm(chip, es);
1983 if (es->fmt & ESS_FMT_STEREO)
1984 snd_es1968_suppress_jitter(chip, es);
1985 }
1986 }
1987 spin_unlock(&chip->substream_lock);
1988 if (chip->in_measurement) {
1989 unsigned int curp = __apu_get_register(chip, chip->measure_apu, 5);
1990 if (curp < chip->measure_lastpos)
1991 chip->measure_count++;
1992 chip->measure_lastpos = curp;
1993 }
1994 }
1995
1996 return IRQ_HANDLED;
1997}
1998
1999/*
2000 * Mixer stuff
2001 */
2002
2003static int
2004snd_es1968_mixer(struct es1968 *chip)
2005{
2006 struct snd_ac97_bus *pbus;
2007 struct snd_ac97_template ac97;
2008 int err;
2009 static const struct snd_ac97_bus_ops ops = {
2010 .write = snd_es1968_ac97_write,
2011 .read = snd_es1968_ac97_read,
2012 };
2013
2014 err = snd_ac97_bus(chip->card, 0, &ops, NULL, &pbus);
2015 if (err < 0)
2016 return err;
2017 pbus->no_vra = 1; /* ES1968 doesn't need VRA */
2018
2019 memset(&ac97, 0, sizeof(ac97));
2020 ac97.private_data = chip;
2021 err = snd_ac97_mixer(pbus, &ac97, &chip->ac97);
2022 if (err < 0)
2023 return err;
2024
2025#ifndef CONFIG_SND_ES1968_INPUT
2026 /* attach master switch / volumes for h/w volume control */
2027 chip->master_switch = snd_ctl_find_id_mixer(chip->card,
2028 "Master Playback Switch");
2029 chip->master_volume = snd_ctl_find_id_mixer(chip->card,
2030 "Master Playback Volume");
2031#endif
2032
2033 return 0;
2034}
2035
2036/*
2037 * reset ac97 codec
2038 */
2039
2040static void snd_es1968_ac97_reset(struct es1968 *chip)
2041{
2042 unsigned long ioaddr = chip->io_port;
2043
2044 unsigned short save_ringbus_a;
2045 unsigned short save_68;
2046 unsigned short w;
2047 unsigned int vend;
2048
2049 /* save configuration */
2050 save_ringbus_a = inw(ioaddr + 0x36);
2051
2052 //outw(inw(ioaddr + 0x38) & 0xfffc, ioaddr + 0x38); /* clear second codec id? */
2053 /* set command/status address i/o to 1st codec */
2054 outw(inw(ioaddr + 0x3a) & 0xfffc, ioaddr + 0x3a);
2055 outw(inw(ioaddr + 0x3c) & 0xfffc, ioaddr + 0x3c);
2056
2057 /* disable ac link */
2058 outw(0x0000, ioaddr + 0x36);
2059 save_68 = inw(ioaddr + 0x68);
2060 pci_read_config_word(chip->pci, 0x58, &w); /* something magical with gpio and bus arb. */
2061 pci_read_config_dword(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend);
2062 if (w & 1)
2063 save_68 |= 0x10;
2064 outw(0xfffe, ioaddr + 0x64); /* unmask gpio 0 */
2065 outw(0x0001, ioaddr + 0x68); /* gpio write */
2066 outw(0x0000, ioaddr + 0x60); /* write 0 to gpio 0 */
2067 udelay(20);
2068 outw(0x0001, ioaddr + 0x60); /* write 1 to gpio 1 */
2069 msleep(20);
2070
2071 outw(save_68 | 0x1, ioaddr + 0x68); /* now restore .. */
2072 outw((inw(ioaddr + 0x38) & 0xfffc) | 0x1, ioaddr + 0x38);
2073 outw((inw(ioaddr + 0x3a) & 0xfffc) | 0x1, ioaddr + 0x3a);
2074 outw((inw(ioaddr + 0x3c) & 0xfffc) | 0x1, ioaddr + 0x3c);
2075
2076 /* now the second codec */
2077 /* disable ac link */
2078 outw(0x0000, ioaddr + 0x36);
2079 outw(0xfff7, ioaddr + 0x64); /* unmask gpio 3 */
2080 save_68 = inw(ioaddr + 0x68);
2081 outw(0x0009, ioaddr + 0x68); /* gpio write 0 & 3 ?? */
2082 outw(0x0001, ioaddr + 0x60); /* write 1 to gpio */
2083 udelay(20);
2084 outw(0x0009, ioaddr + 0x60); /* write 9 to gpio */
2085 msleep(500);
2086 //outw(inw(ioaddr + 0x38) & 0xfffc, ioaddr + 0x38);
2087 outw(inw(ioaddr + 0x3a) & 0xfffc, ioaddr + 0x3a);
2088 outw(inw(ioaddr + 0x3c) & 0xfffc, ioaddr + 0x3c);
2089
2090#if 0 /* the loop here needs to be much better if we want it.. */
2091 dev_info(chip->card->dev, "trying software reset\n");
2092 /* try and do a software reset */
2093 outb(0x80 | 0x7c, ioaddr + 0x30);
2094 for (w = 0;; w++) {
2095 if ((inw(ioaddr + 0x30) & 1) == 0) {
2096 if (inb(ioaddr + 0x32) != 0)
2097 break;
2098
2099 outb(0x80 | 0x7d, ioaddr + 0x30);
2100 if (((inw(ioaddr + 0x30) & 1) == 0)
2101 && (inb(ioaddr + 0x32) != 0))
2102 break;
2103 outb(0x80 | 0x7f, ioaddr + 0x30);
2104 if (((inw(ioaddr + 0x30) & 1) == 0)
2105 && (inb(ioaddr + 0x32) != 0))
2106 break;
2107 }
2108
2109 if (w > 10000) {
2110 outb(inb(ioaddr + 0x37) | 0x08, ioaddr + 0x37); /* do a software reset */
2111 msleep(500); /* oh my.. */
2112 outb(inb(ioaddr + 0x37) & ~0x08,
2113 ioaddr + 0x37);
2114 udelay(1);
2115 outw(0x80, ioaddr + 0x30);
2116 for (w = 0; w < 10000; w++) {
2117 if ((inw(ioaddr + 0x30) & 1) == 0)
2118 break;
2119 }
2120 }
2121 }
2122#endif
2123 if (vend == NEC_VERSA_SUBID1 || vend == NEC_VERSA_SUBID2) {
2124 /* turn on external amp? */
2125 outw(0xf9ff, ioaddr + 0x64);
2126 outw(inw(ioaddr + 0x68) | 0x600, ioaddr + 0x68);
2127 outw(0x0209, ioaddr + 0x60);
2128 }
2129
2130 /* restore.. */
2131 outw(save_ringbus_a, ioaddr + 0x36);
2132
2133 /* Turn on the 978 docking chip.
2134 First frob the "master output enable" bit,
2135 then set most of the playback volume control registers to max. */
2136 outb(inb(ioaddr+0xc0)|(1<<5), ioaddr+0xc0);
2137 outb(0xff, ioaddr+0xc3);
2138 outb(0xff, ioaddr+0xc4);
2139 outb(0xff, ioaddr+0xc6);
2140 outb(0xff, ioaddr+0xc8);
2141 outb(0x3f, ioaddr+0xcf);
2142 outb(0x3f, ioaddr+0xd0);
2143}
2144
2145static void snd_es1968_reset(struct es1968 *chip)
2146{
2147 /* Reset */
2148 outw(ESM_RESET_MAESTRO | ESM_RESET_DIRECTSOUND,
2149 chip->io_port + ESM_PORT_HOST_IRQ);
2150 udelay(10);
2151 outw(0x0000, chip->io_port + ESM_PORT_HOST_IRQ);
2152 udelay(10);
2153}
2154
2155/*
2156 * initialize maestro chip
2157 */
2158static void snd_es1968_chip_init(struct es1968 *chip)
2159{
2160 struct pci_dev *pci = chip->pci;
2161 int i;
2162 unsigned long iobase = chip->io_port;
2163 u16 w;
2164 u32 n;
2165
2166 /* We used to muck around with pci config space that
2167 * we had no business messing with. We don't know enough
2168 * about the machine to know which DMA mode is appropriate,
2169 * etc. We were guessing wrong on some machines and making
2170 * them unhappy. We now trust in the BIOS to do things right,
2171 * which almost certainly means a new host of problems will
2172 * arise with broken BIOS implementations. screw 'em.
2173 * We're already intolerant of machines that don't assign
2174 * IRQs.
2175 */
2176
2177 /* Config Reg A */
2178 pci_read_config_word(pci, ESM_CONFIG_A, &w);
2179
2180 w &= ~DMA_CLEAR; /* Clear DMA bits */
2181 w &= ~(PIC_SNOOP1 | PIC_SNOOP2); /* Clear Pic Snoop Mode Bits */
2182 w &= ~SAFEGUARD; /* Safeguard off */
2183 w |= POST_WRITE; /* Posted write */
2184 w |= PCI_TIMING; /* PCI timing on */
2185 /* XXX huh? claims to be reserved.. */
2186 w &= ~SWAP_LR; /* swap left/right
2187 seems to only have effect on SB
2188 Emulation */
2189 w &= ~SUBTR_DECODE; /* Subtractive decode off */
2190
2191 pci_write_config_word(pci, ESM_CONFIG_A, w);
2192
2193 /* Config Reg B */
2194
2195 pci_read_config_word(pci, ESM_CONFIG_B, &w);
2196
2197 w &= ~(1 << 15); /* Turn off internal clock multiplier */
2198 /* XXX how do we know which to use? */
2199 w &= ~(1 << 14); /* External clock */
2200
2201 w &= ~SPDIF_CONFB; /* disable S/PDIF output */
2202 w |= HWV_CONFB; /* HWV on */
2203 w |= DEBOUNCE; /* Debounce off: easier to push the HW buttons */
2204 w &= ~GPIO_CONFB; /* GPIO 4:5 */
2205 w |= CHI_CONFB; /* Disconnect from the CHI. Enabling this made a dell 7500 work. */
2206 w &= ~IDMA_CONFB; /* IDMA off (undocumented) */
2207 w &= ~MIDI_FIX; /* MIDI fix off (undoc) */
2208 w &= ~(1 << 1); /* reserved, always write 0 */
2209 w &= ~IRQ_TO_ISA; /* IRQ to ISA off (undoc) */
2210
2211 pci_write_config_word(pci, ESM_CONFIG_B, w);
2212
2213 /* DDMA off */
2214
2215 pci_read_config_word(pci, ESM_DDMA, &w);
2216 w &= ~(1 << 0);
2217 pci_write_config_word(pci, ESM_DDMA, w);
2218
2219 /*
2220 * Legacy mode
2221 */
2222
2223 pci_read_config_word(pci, ESM_LEGACY_AUDIO_CONTROL, &w);
2224
2225 w |= ESS_DISABLE_AUDIO; /* Disable Legacy Audio */
2226 w &= ~ESS_ENABLE_SERIAL_IRQ; /* Disable SIRQ */
2227 w &= ~(0x1f); /* disable mpu irq/io, game port, fm, SB */
2228
2229 pci_write_config_word(pci, ESM_LEGACY_AUDIO_CONTROL, w);
2230
2231 /* Set up 978 docking control chip. */
2232 pci_read_config_word(pci, 0x58, &w);
2233 w|=1<<2; /* Enable 978. */
2234 w|=1<<3; /* Turn on 978 hardware volume control. */
2235 w&=~(1<<11); /* Turn on 978 mixer volume control. */
2236 pci_write_config_word(pci, 0x58, w);
2237
2238 /* Sound Reset */
2239
2240 snd_es1968_reset(chip);
2241
2242 /*
2243 * Ring Bus Setup
2244 */
2245
2246 /* setup usual 0x34 stuff.. 0x36 may be chip specific */
2247 outw(0xC090, iobase + ESM_RING_BUS_DEST); /* direct sound, stereo */
2248 udelay(20);
2249 outw(0x3000, iobase + ESM_RING_BUS_CONTR_A); /* enable ringbus/serial */
2250 udelay(20);
2251
2252 /*
2253 * Reset the CODEC
2254 */
2255
2256 snd_es1968_ac97_reset(chip);
2257
2258 /* Ring Bus Control B */
2259
2260 n = inl(iobase + ESM_RING_BUS_CONTR_B);
2261 n &= ~RINGB_EN_SPDIF; /* SPDIF off */
2262 //w |= RINGB_EN_2CODEC; /* enable 2nd codec */
2263 outl(n, iobase + ESM_RING_BUS_CONTR_B);
2264
2265 /* Set hardware volume control registers to midpoints.
2266 We can tell which button was pushed based on how they change. */
2267 outb(0x88, iobase+0x1c);
2268 outb(0x88, iobase+0x1d);
2269 outb(0x88, iobase+0x1e);
2270 outb(0x88, iobase+0x1f);
2271
2272 /* it appears some maestros (dell 7500) only work if these are set,
2273 regardless of whether we use the assp or not. */
2274
2275 outb(0, iobase + ASSP_CONTROL_B);
2276 outb(3, iobase + ASSP_CONTROL_A); /* M: Reserved bits... */
2277 outb(0, iobase + ASSP_CONTROL_C); /* M: Disable ASSP, ASSP IRQ's and FM Port */
2278
2279 /*
2280 * set up wavecache
2281 */
2282 for (i = 0; i < 16; i++) {
2283 /* Write 0 into the buffer area 0x1E0->1EF */
2284 outw(0x01E0 + i, iobase + WC_INDEX);
2285 outw(0x0000, iobase + WC_DATA);
2286
2287 /* The 1.10 test program seem to write 0 into the buffer area
2288 * 0x1D0-0x1DF too.*/
2289 outw(0x01D0 + i, iobase + WC_INDEX);
2290 outw(0x0000, iobase + WC_DATA);
2291 }
2292 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2293 (wave_get_register(chip, IDR7_WAVE_ROMRAM) & 0xFF00));
2294 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2295 wave_get_register(chip, IDR7_WAVE_ROMRAM) | 0x100);
2296 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2297 wave_get_register(chip, IDR7_WAVE_ROMRAM) & ~0x200);
2298 wave_set_register(chip, IDR7_WAVE_ROMRAM,
2299 wave_get_register(chip, IDR7_WAVE_ROMRAM) | ~0x400);
2300
2301
2302 maestro_write(chip, IDR2_CRAM_DATA, 0x0000);
2303 /* Now back to the DirectSound stuff */
2304 /* audio serial configuration.. ? */
2305 maestro_write(chip, 0x08, 0xB004);
2306 maestro_write(chip, 0x09, 0x001B);
2307 maestro_write(chip, 0x0A, 0x8000);
2308 maestro_write(chip, 0x0B, 0x3F37);
2309 maestro_write(chip, 0x0C, 0x0098);
2310
2311 /* parallel in, has something to do with recording :) */
2312 maestro_write(chip, 0x0C,
2313 (maestro_read(chip, 0x0C) & ~0xF000) | 0x8000);
2314 /* parallel out */
2315 maestro_write(chip, 0x0C,
2316 (maestro_read(chip, 0x0C) & ~0x0F00) | 0x0500);
2317
2318 maestro_write(chip, 0x0D, 0x7632);
2319
2320 /* Wave cache control on - test off, sg off,
2321 enable, enable extra chans 1Mb */
2322
2323 w = inw(iobase + WC_CONTROL);
2324
2325 w &= ~0xFA00; /* Seems to be reserved? I don't know */
2326 w |= 0xA000; /* reserved... I don't know */
2327 w &= ~0x0200; /* Channels 56,57,58,59 as Extra Play,Rec Channel enable
2328 Seems to crash the Computer if enabled... */
2329 w |= 0x0100; /* Wave Cache Operation Enabled */
2330 w |= 0x0080; /* Channels 60/61 as Placback/Record enabled */
2331 w &= ~0x0060; /* Clear Wavtable Size */
2332 w |= 0x0020; /* Wavetable Size : 1MB */
2333 /* Bit 4 is reserved */
2334 w &= ~0x000C; /* DMA Stuff? I don't understand what the datasheet means */
2335 /* Bit 1 is reserved */
2336 w &= ~0x0001; /* Test Mode off */
2337
2338 outw(w, iobase + WC_CONTROL);
2339
2340 /* Now clear the APU control ram */
2341 for (i = 0; i < NR_APUS; i++) {
2342 for (w = 0; w < NR_APU_REGS; w++)
2343 apu_set_register(chip, i, w, 0);
2344
2345 }
2346}
2347
2348/* Enable IRQ's */
2349static void snd_es1968_start_irq(struct es1968 *chip)
2350{
2351 unsigned short w;
2352 w = ESM_HIRQ_DSIE | ESM_HIRQ_HW_VOLUME;
2353 if (chip->rmidi)
2354 w |= ESM_HIRQ_MPU401;
2355 outb(w, chip->io_port + 0x1A);
2356 outw(w, chip->io_port + ESM_PORT_HOST_IRQ);
2357}
2358
2359#ifdef CONFIG_PM_SLEEP
2360/*
2361 * PM support
2362 */
2363static int es1968_suspend(struct device *dev)
2364{
2365 struct snd_card *card = dev_get_drvdata(dev);
2366 struct es1968 *chip = card->private_data;
2367
2368 if (! chip->do_pm)
2369 return 0;
2370
2371 chip->in_suspend = 1;
2372 cancel_work_sync(&chip->hwvol_work);
2373 snd_power_change_state(card, SNDRV_CTL_POWER_D3hot);
2374 snd_ac97_suspend(chip->ac97);
2375 snd_es1968_bob_stop(chip);
2376 return 0;
2377}
2378
2379static int es1968_resume(struct device *dev)
2380{
2381 struct snd_card *card = dev_get_drvdata(dev);
2382 struct es1968 *chip = card->private_data;
2383 struct esschan *es;
2384
2385 if (! chip->do_pm)
2386 return 0;
2387
2388 snd_es1968_chip_init(chip);
2389
2390 /* need to restore the base pointers.. */
2391 if (chip->dma.addr) {
2392 /* set PCMBAR */
2393 wave_set_register(chip, 0x01FC, chip->dma.addr >> 12);
2394 }
2395
2396 snd_es1968_start_irq(chip);
2397
2398 /* restore ac97 state */
2399 snd_ac97_resume(chip->ac97);
2400
2401 list_for_each_entry(es, &chip->substream_list, list) {
2402 switch (es->mode) {
2403 case ESM_MODE_PLAY:
2404 snd_es1968_playback_setup(chip, es, es->substream->runtime);
2405 break;
2406 case ESM_MODE_CAPTURE:
2407 snd_es1968_capture_setup(chip, es, es->substream->runtime);
2408 break;
2409 }
2410 }
2411
2412 /* start timer again */
2413 if (chip->bobclient)
2414 snd_es1968_bob_start(chip);
2415
2416 snd_power_change_state(card, SNDRV_CTL_POWER_D0);
2417 chip->in_suspend = 0;
2418 return 0;
2419}
2420
2421static SIMPLE_DEV_PM_OPS(es1968_pm, es1968_suspend, es1968_resume);
2422#define ES1968_PM_OPS &es1968_pm
2423#else
2424#define ES1968_PM_OPS NULL
2425#endif /* CONFIG_PM_SLEEP */
2426
2427#ifdef SUPPORT_JOYSTICK
2428#define JOYSTICK_ADDR 0x200
2429static int snd_es1968_create_gameport(struct es1968 *chip, int dev)
2430{
2431 struct gameport *gp;
2432 struct resource *r;
2433 u16 val;
2434
2435 if (!joystick[dev])
2436 return -ENODEV;
2437
2438 r = devm_request_region(&chip->pci->dev, JOYSTICK_ADDR, 8,
2439 "ES1968 gameport");
2440 if (!r)
2441 return -EBUSY;
2442
2443 chip->gameport = gp = gameport_allocate_port();
2444 if (!gp) {
2445 dev_err(chip->card->dev,
2446 "cannot allocate memory for gameport\n");
2447 return -ENOMEM;
2448 }
2449
2450 pci_read_config_word(chip->pci, ESM_LEGACY_AUDIO_CONTROL, &val);
2451 pci_write_config_word(chip->pci, ESM_LEGACY_AUDIO_CONTROL, val | 0x04);
2452
2453 gameport_set_name(gp, "ES1968 Gameport");
2454 gameport_set_phys(gp, "pci%s/gameport0", pci_name(chip->pci));
2455 gameport_set_dev_parent(gp, &chip->pci->dev);
2456 gp->io = JOYSTICK_ADDR;
2457
2458 gameport_register_port(gp);
2459
2460 return 0;
2461}
2462
2463static void snd_es1968_free_gameport(struct es1968 *chip)
2464{
2465 if (chip->gameport) {
2466 gameport_unregister_port(chip->gameport);
2467 chip->gameport = NULL;
2468 }
2469}
2470#else
2471static inline int snd_es1968_create_gameport(struct es1968 *chip, int dev) { return -ENOSYS; }
2472static inline void snd_es1968_free_gameport(struct es1968 *chip) { }
2473#endif
2474
2475#ifdef CONFIG_SND_ES1968_INPUT
2476static int snd_es1968_input_register(struct es1968 *chip)
2477{
2478 struct input_dev *input_dev;
2479 int err;
2480
2481 input_dev = devm_input_allocate_device(&chip->pci->dev);
2482 if (!input_dev)
2483 return -ENOMEM;
2484
2485 snprintf(chip->phys, sizeof(chip->phys), "pci-%s/input0",
2486 pci_name(chip->pci));
2487
2488 input_dev->name = chip->card->driver;
2489 input_dev->phys = chip->phys;
2490 input_dev->id.bustype = BUS_PCI;
2491 input_dev->id.vendor = chip->pci->vendor;
2492 input_dev->id.product = chip->pci->device;
2493 input_dev->dev.parent = &chip->pci->dev;
2494
2495 __set_bit(EV_KEY, input_dev->evbit);
2496 __set_bit(KEY_MUTE, input_dev->keybit);
2497 __set_bit(KEY_VOLUMEDOWN, input_dev->keybit);
2498 __set_bit(KEY_VOLUMEUP, input_dev->keybit);
2499
2500 err = input_register_device(input_dev);
2501 if (err)
2502 return err;
2503
2504 chip->input_dev = input_dev;
2505 return 0;
2506}
2507#endif /* CONFIG_SND_ES1968_INPUT */
2508
2509#ifdef CONFIG_SND_ES1968_RADIO
2510#define GPIO_DATA 0x60
2511#define IO_MASK 4 /* mask register offset from GPIO_DATA
2512 bits 1=unmask write to given bit */
2513#define IO_DIR 8 /* direction register offset from GPIO_DATA
2514 bits 0/1=read/write direction */
2515
2516/* GPIO to TEA575x maps */
2517struct snd_es1968_tea575x_gpio {
2518 u8 data, clk, wren, most;
2519 char *name;
2520};
2521
2522static const struct snd_es1968_tea575x_gpio snd_es1968_tea575x_gpios[] = {
2523 { .data = 6, .clk = 7, .wren = 8, .most = 9, .name = "SF64-PCE2" },
2524 { .data = 7, .clk = 8, .wren = 6, .most = 10, .name = "M56VAP" },
2525};
2526
2527#define get_tea575x_gpio(chip) \
2528 (&snd_es1968_tea575x_gpios[(chip)->tea575x_tuner])
2529
2530
2531static void snd_es1968_tea575x_set_pins(struct snd_tea575x *tea, u8 pins)
2532{
2533 struct es1968 *chip = tea->private_data;
2534 struct snd_es1968_tea575x_gpio gpio = *get_tea575x_gpio(chip);
2535 u16 val = 0;
2536
2537 val |= (pins & TEA575X_DATA) ? (1 << gpio.data) : 0;
2538 val |= (pins & TEA575X_CLK) ? (1 << gpio.clk) : 0;
2539 val |= (pins & TEA575X_WREN) ? (1 << gpio.wren) : 0;
2540
2541 outw(val, chip->io_port + GPIO_DATA);
2542}
2543
2544static u8 snd_es1968_tea575x_get_pins(struct snd_tea575x *tea)
2545{
2546 struct es1968 *chip = tea->private_data;
2547 struct snd_es1968_tea575x_gpio gpio = *get_tea575x_gpio(chip);
2548 u16 val = inw(chip->io_port + GPIO_DATA);
2549 u8 ret = 0;
2550
2551 if (val & (1 << gpio.data))
2552 ret |= TEA575X_DATA;
2553 if (val & (1 << gpio.most))
2554 ret |= TEA575X_MOST;
2555
2556 return ret;
2557}
2558
2559static void snd_es1968_tea575x_set_direction(struct snd_tea575x *tea, bool output)
2560{
2561 struct es1968 *chip = tea->private_data;
2562 unsigned long io = chip->io_port + GPIO_DATA;
2563 u16 odir = inw(io + IO_DIR);
2564 struct snd_es1968_tea575x_gpio gpio = *get_tea575x_gpio(chip);
2565
2566 if (output) {
2567 outw(~((1 << gpio.data) | (1 << gpio.clk) | (1 << gpio.wren)),
2568 io + IO_MASK);
2569 outw(odir | (1 << gpio.data) | (1 << gpio.clk) | (1 << gpio.wren),
2570 io + IO_DIR);
2571 } else {
2572 outw(~((1 << gpio.clk) | (1 << gpio.wren) | (1 << gpio.data) | (1 << gpio.most)),
2573 io + IO_MASK);
2574 outw((odir & ~((1 << gpio.data) | (1 << gpio.most)))
2575 | (1 << gpio.clk) | (1 << gpio.wren), io + IO_DIR);
2576 }
2577}
2578
2579static const struct snd_tea575x_ops snd_es1968_tea_ops = {
2580 .set_pins = snd_es1968_tea575x_set_pins,
2581 .get_pins = snd_es1968_tea575x_get_pins,
2582 .set_direction = snd_es1968_tea575x_set_direction,
2583};
2584#endif
2585
2586static void snd_es1968_free(struct snd_card *card)
2587{
2588 struct es1968 *chip = card->private_data;
2589
2590 cancel_work_sync(&chip->hwvol_work);
2591
2592 if (chip->io_port) {
2593 outw(1, chip->io_port + 0x04); /* clear WP interrupts */
2594 outw(0, chip->io_port + ESM_PORT_HOST_IRQ); /* disable IRQ */
2595 }
2596
2597#ifdef CONFIG_SND_ES1968_RADIO
2598 snd_tea575x_exit(&chip->tea);
2599 v4l2_device_unregister(&chip->v4l2_dev);
2600#endif
2601
2602 snd_es1968_free_gameport(chip);
2603}
2604
2605struct ess_device_list {
2606 unsigned short type; /* chip type */
2607 unsigned short vendor; /* subsystem vendor id */
2608};
2609
2610static const struct ess_device_list pm_allowlist[] = {
2611 { TYPE_MAESTRO2E, 0x0e11 }, /* Compaq Armada */
2612 { TYPE_MAESTRO2E, 0x1028 },
2613 { TYPE_MAESTRO2E, 0x103c },
2614 { TYPE_MAESTRO2E, 0x1179 },
2615 { TYPE_MAESTRO2E, 0x14c0 }, /* HP omnibook 4150 */
2616 { TYPE_MAESTRO2E, 0x1558 },
2617 { TYPE_MAESTRO2E, 0x125d }, /* a PCI card, e.g. Terratec DMX */
2618 { TYPE_MAESTRO2, 0x125d }, /* a PCI card, e.g. SF64-PCE2 */
2619};
2620
2621static const struct ess_device_list mpu_denylist[] = {
2622 { TYPE_MAESTRO2, 0x125d },
2623};
2624
2625static int snd_es1968_create(struct snd_card *card,
2626 struct pci_dev *pci,
2627 int total_bufsize,
2628 int play_streams,
2629 int capt_streams,
2630 int chip_type,
2631 int do_pm,
2632 int radio_nr)
2633{
2634 struct es1968 *chip = card->private_data;
2635 int i, err;
2636
2637 /* enable PCI device */
2638 err = pcim_enable_device(pci);
2639 if (err < 0)
2640 return err;
2641 /* check, if we can restrict PCI DMA transfers to 28 bits */
2642 if (dma_set_mask_and_coherent(&pci->dev, DMA_BIT_MASK(28))) {
2643 dev_err(card->dev,
2644 "architecture does not support 28bit PCI busmaster DMA\n");
2645 return -ENXIO;
2646 }
2647
2648 /* Set Vars */
2649 chip->type = chip_type;
2650 spin_lock_init(&chip->reg_lock);
2651 spin_lock_init(&chip->substream_lock);
2652 INIT_LIST_HEAD(&chip->buf_list);
2653 INIT_LIST_HEAD(&chip->substream_list);
2654 mutex_init(&chip->memory_mutex);
2655 INIT_WORK(&chip->hwvol_work, es1968_update_hw_volume);
2656 chip->card = card;
2657 chip->pci = pci;
2658 chip->irq = -1;
2659 chip->total_bufsize = total_bufsize; /* in bytes */
2660 chip->playback_streams = play_streams;
2661 chip->capture_streams = capt_streams;
2662
2663 err = pci_request_regions(pci, "ESS Maestro");
2664 if (err < 0)
2665 return err;
2666 chip->io_port = pci_resource_start(pci, 0);
2667 if (devm_request_irq(&pci->dev, pci->irq, snd_es1968_interrupt,
2668 IRQF_SHARED, KBUILD_MODNAME, chip)) {
2669 dev_err(card->dev, "unable to grab IRQ %d\n", pci->irq);
2670 return -EBUSY;
2671 }
2672 chip->irq = pci->irq;
2673 card->sync_irq = chip->irq;
2674 card->private_free = snd_es1968_free;
2675
2676 /* Clear Maestro_map */
2677 for (i = 0; i < 32; i++)
2678 chip->maestro_map[i] = 0;
2679
2680 /* Clear Apu Map */
2681 for (i = 0; i < NR_APUS; i++)
2682 chip->apu[i] = ESM_APU_FREE;
2683
2684 /* just to be sure */
2685 pci_set_master(pci);
2686
2687 if (do_pm > 1) {
2688 /* disable power-management if not on the allowlist */
2689 unsigned short vend;
2690 pci_read_config_word(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend);
2691 for (i = 0; i < (int)ARRAY_SIZE(pm_allowlist); i++) {
2692 if (chip->type == pm_allowlist[i].type &&
2693 vend == pm_allowlist[i].vendor) {
2694 do_pm = 1;
2695 break;
2696 }
2697 }
2698 if (do_pm > 1) {
2699 /* not matched; disabling pm */
2700 dev_info(card->dev, "not attempting power management.\n");
2701 do_pm = 0;
2702 }
2703 }
2704 chip->do_pm = do_pm;
2705
2706 snd_es1968_chip_init(chip);
2707
2708#ifdef CONFIG_SND_ES1968_RADIO
2709 /* don't play with GPIOs on laptops */
2710 if (chip->pci->subsystem_vendor != 0x125d)
2711 return 0;
2712 err = v4l2_device_register(&pci->dev, &chip->v4l2_dev);
2713 if (err < 0)
2714 return err;
2715 chip->tea.v4l2_dev = &chip->v4l2_dev;
2716 chip->tea.private_data = chip;
2717 chip->tea.radio_nr = radio_nr;
2718 chip->tea.ops = &snd_es1968_tea_ops;
2719 sprintf(chip->tea.bus_info, "PCI:%s", pci_name(pci));
2720 for (i = 0; i < ARRAY_SIZE(snd_es1968_tea575x_gpios); i++) {
2721 chip->tea575x_tuner = i;
2722 if (!snd_tea575x_init(&chip->tea, THIS_MODULE)) {
2723 dev_info(card->dev, "detected TEA575x radio type %s\n",
2724 get_tea575x_gpio(chip)->name);
2725 strscpy(chip->tea.card, get_tea575x_gpio(chip)->name,
2726 sizeof(chip->tea.card));
2727 break;
2728 }
2729 }
2730#endif
2731 return 0;
2732}
2733
2734
2735/*
2736 */
2737static int __snd_es1968_probe(struct pci_dev *pci,
2738 const struct pci_device_id *pci_id)
2739{
2740 static int dev;
2741 struct snd_card *card;
2742 struct es1968 *chip;
2743 unsigned int i;
2744 int err;
2745
2746 if (dev >= SNDRV_CARDS)
2747 return -ENODEV;
2748 if (!enable[dev]) {
2749 dev++;
2750 return -ENOENT;
2751 }
2752
2753 err = snd_devm_card_new(&pci->dev, index[dev], id[dev], THIS_MODULE,
2754 sizeof(*chip), &card);
2755 if (err < 0)
2756 return err;
2757 chip = card->private_data;
2758
2759 if (total_bufsize[dev] < 128)
2760 total_bufsize[dev] = 128;
2761 if (total_bufsize[dev] > 4096)
2762 total_bufsize[dev] = 4096;
2763 err = snd_es1968_create(card, pci,
2764 total_bufsize[dev] * 1024, /* in bytes */
2765 pcm_substreams_p[dev],
2766 pcm_substreams_c[dev],
2767 pci_id->driver_data,
2768 use_pm[dev],
2769 radio_nr[dev]);
2770 if (err < 0)
2771 return err;
2772
2773 switch (chip->type) {
2774 case TYPE_MAESTRO2E:
2775 strcpy(card->driver, "ES1978");
2776 strcpy(card->shortname, "ESS ES1978 (Maestro 2E)");
2777 break;
2778 case TYPE_MAESTRO2:
2779 strcpy(card->driver, "ES1968");
2780 strcpy(card->shortname, "ESS ES1968 (Maestro 2)");
2781 break;
2782 case TYPE_MAESTRO:
2783 strcpy(card->driver, "ESM1");
2784 strcpy(card->shortname, "ESS Maestro 1");
2785 break;
2786 }
2787
2788 err = snd_es1968_pcm(chip, 0);
2789 if (err < 0)
2790 return err;
2791
2792 err = snd_es1968_mixer(chip);
2793 if (err < 0)
2794 return err;
2795
2796 if (enable_mpu[dev] == 2) {
2797 /* check the deny list */
2798 unsigned short vend;
2799 pci_read_config_word(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend);
2800 for (i = 0; i < ARRAY_SIZE(mpu_denylist); i++) {
2801 if (chip->type == mpu_denylist[i].type &&
2802 vend == mpu_denylist[i].vendor) {
2803 enable_mpu[dev] = 0;
2804 break;
2805 }
2806 }
2807 }
2808 if (enable_mpu[dev]) {
2809 err = snd_mpu401_uart_new(card, 0, MPU401_HW_MPU401,
2810 chip->io_port + ESM_MPU401_PORT,
2811 MPU401_INFO_INTEGRATED |
2812 MPU401_INFO_IRQ_HOOK,
2813 -1, &chip->rmidi);
2814 if (err < 0)
2815 dev_warn(card->dev, "skipping MPU-401 MIDI support..\n");
2816 }
2817
2818 snd_es1968_create_gameport(chip, dev);
2819
2820#ifdef CONFIG_SND_ES1968_INPUT
2821 err = snd_es1968_input_register(chip);
2822 if (err)
2823 dev_warn(card->dev,
2824 "Input device registration failed with error %i", err);
2825#endif
2826
2827 snd_es1968_start_irq(chip);
2828
2829 chip->clock = clock[dev];
2830 if (! chip->clock)
2831 es1968_measure_clock(chip);
2832
2833 sprintf(card->longname, "%s at 0x%lx, irq %i",
2834 card->shortname, chip->io_port, chip->irq);
2835
2836 err = snd_card_register(card);
2837 if (err < 0)
2838 return err;
2839 pci_set_drvdata(pci, card);
2840 dev++;
2841 return 0;
2842}
2843
2844static int snd_es1968_probe(struct pci_dev *pci,
2845 const struct pci_device_id *pci_id)
2846{
2847 return snd_card_free_on_error(&pci->dev, __snd_es1968_probe(pci, pci_id));
2848}
2849
2850static struct pci_driver es1968_driver = {
2851 .name = KBUILD_MODNAME,
2852 .id_table = snd_es1968_ids,
2853 .probe = snd_es1968_probe,
2854 .driver = {
2855 .pm = ES1968_PM_OPS,
2856 },
2857};
2858
2859module_pci_driver(es1968_driver);