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