xref: /openbmc/linux/sound/pci/ad1889.c (revision 890f0b0d)
1 // SPDX-License-Identifier: GPL-2.0-only
2 /* Analog Devices 1889 audio driver
3  *
4  * This is a driver for the AD1889 PCI audio chipset found
5  * on the HP PA-RISC [BCJ]-xxx0 workstations.
6  *
7  * Copyright (C) 2004-2005, Kyle McMartin <kyle@parisc-linux.org>
8  * Copyright (C) 2005, Thibaut Varene <varenet@parisc-linux.org>
9  *   Based on the OSS AD1889 driver by Randolph Chung <tausq@debian.org>
10  *
11  * TODO:
12  *	Do we need to take care of CCS register?
13  *	Maybe we could use finer grained locking (separate locks for pb/cap)?
14  * Wishlist:
15  *	Control Interface (mixer) support
16  *	Better AC97 support (VSR...)?
17  *	PM support
18  *	MIDI support
19  *	Game Port support
20  *	SG DMA support (this will need *a lot* of work)
21  */
22 
23 #include <linux/init.h>
24 #include <linux/pci.h>
25 #include <linux/dma-mapping.h>
26 #include <linux/slab.h>
27 #include <linux/interrupt.h>
28 #include <linux/compiler.h>
29 #include <linux/delay.h>
30 #include <linux/module.h>
31 #include <linux/io.h>
32 
33 #include <sound/core.h>
34 #include <sound/pcm.h>
35 #include <sound/initval.h>
36 #include <sound/ac97_codec.h>
37 
38 #include "ad1889.h"
39 #include "ac97/ac97_id.h"
40 
41 #define	AD1889_DRVVER	"Version: 1.7"
42 
43 MODULE_AUTHOR("Kyle McMartin <kyle@parisc-linux.org>, Thibaut Varene <t-bone@parisc-linux.org>");
44 MODULE_DESCRIPTION("Analog Devices AD1889 ALSA sound driver");
45 MODULE_LICENSE("GPL");
46 MODULE_SUPPORTED_DEVICE("{{Analog Devices,AD1889}}");
47 
48 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;
49 module_param_array(index, int, NULL, 0444);
50 MODULE_PARM_DESC(index, "Index value for the AD1889 soundcard.");
51 
52 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;
53 module_param_array(id, charp, NULL, 0444);
54 MODULE_PARM_DESC(id, "ID string for the AD1889 soundcard.");
55 
56 static bool enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP;
57 module_param_array(enable, bool, NULL, 0444);
58 MODULE_PARM_DESC(enable, "Enable AD1889 soundcard.");
59 
60 static char *ac97_quirk[SNDRV_CARDS];
61 module_param_array(ac97_quirk, charp, NULL, 0444);
62 MODULE_PARM_DESC(ac97_quirk, "AC'97 workaround for strange hardware.");
63 
64 #define DEVNAME "ad1889"
65 #define PFX	DEVNAME ": "
66 
67 /* keep track of some hw registers */
68 struct ad1889_register_state {
69 	u16 reg;	/* reg setup */
70 	u32 addr;	/* dma base address */
71 	unsigned long size;	/* DMA buffer size */
72 };
73 
74 struct snd_ad1889 {
75 	struct snd_card *card;
76 	struct pci_dev *pci;
77 
78 	int irq;
79 	unsigned long bar;
80 	void __iomem *iobase;
81 
82 	struct snd_ac97 *ac97;
83 	struct snd_ac97_bus *ac97_bus;
84 	struct snd_pcm *pcm;
85 	struct snd_info_entry *proc;
86 
87 	struct snd_pcm_substream *psubs;
88 	struct snd_pcm_substream *csubs;
89 
90 	/* playback register state */
91 	struct ad1889_register_state wave;
92 	struct ad1889_register_state ramc;
93 
94 	spinlock_t lock;
95 };
96 
97 static inline u16
98 ad1889_readw(struct snd_ad1889 *chip, unsigned reg)
99 {
100 	return readw(chip->iobase + reg);
101 }
102 
103 static inline void
104 ad1889_writew(struct snd_ad1889 *chip, unsigned reg, u16 val)
105 {
106 	writew(val, chip->iobase + reg);
107 }
108 
109 static inline u32
110 ad1889_readl(struct snd_ad1889 *chip, unsigned reg)
111 {
112 	return readl(chip->iobase + reg);
113 }
114 
115 static inline void
116 ad1889_writel(struct snd_ad1889 *chip, unsigned reg, u32 val)
117 {
118 	writel(val, chip->iobase + reg);
119 }
120 
121 static inline void
122 ad1889_unmute(struct snd_ad1889 *chip)
123 {
124 	u16 st;
125 	st = ad1889_readw(chip, AD_DS_WADA) &
126 		~(AD_DS_WADA_RWAM | AD_DS_WADA_LWAM);
127 	ad1889_writew(chip, AD_DS_WADA, st);
128 	ad1889_readw(chip, AD_DS_WADA);
129 }
130 
131 static inline void
132 ad1889_mute(struct snd_ad1889 *chip)
133 {
134 	u16 st;
135 	st = ad1889_readw(chip, AD_DS_WADA) | AD_DS_WADA_RWAM | AD_DS_WADA_LWAM;
136 	ad1889_writew(chip, AD_DS_WADA, st);
137 	ad1889_readw(chip, AD_DS_WADA);
138 }
139 
140 static inline void
141 ad1889_load_adc_buffer_address(struct snd_ad1889 *chip, u32 address)
142 {
143 	ad1889_writel(chip, AD_DMA_ADCBA, address);
144 	ad1889_writel(chip, AD_DMA_ADCCA, address);
145 }
146 
147 static inline void
148 ad1889_load_adc_buffer_count(struct snd_ad1889 *chip, u32 count)
149 {
150 	ad1889_writel(chip, AD_DMA_ADCBC, count);
151 	ad1889_writel(chip, AD_DMA_ADCCC, count);
152 }
153 
154 static inline void
155 ad1889_load_adc_interrupt_count(struct snd_ad1889 *chip, u32 count)
156 {
157 	ad1889_writel(chip, AD_DMA_ADCIB, count);
158 	ad1889_writel(chip, AD_DMA_ADCIC, count);
159 }
160 
161 static inline void
162 ad1889_load_wave_buffer_address(struct snd_ad1889 *chip, u32 address)
163 {
164 	ad1889_writel(chip, AD_DMA_WAVBA, address);
165 	ad1889_writel(chip, AD_DMA_WAVCA, address);
166 }
167 
168 static inline void
169 ad1889_load_wave_buffer_count(struct snd_ad1889 *chip, u32 count)
170 {
171 	ad1889_writel(chip, AD_DMA_WAVBC, count);
172 	ad1889_writel(chip, AD_DMA_WAVCC, count);
173 }
174 
175 static inline void
176 ad1889_load_wave_interrupt_count(struct snd_ad1889 *chip, u32 count)
177 {
178 	ad1889_writel(chip, AD_DMA_WAVIB, count);
179 	ad1889_writel(chip, AD_DMA_WAVIC, count);
180 }
181 
182 static void
183 ad1889_channel_reset(struct snd_ad1889 *chip, unsigned int channel)
184 {
185 	u16 reg;
186 
187 	if (channel & AD_CHAN_WAV) {
188 		/* Disable wave channel */
189 		reg = ad1889_readw(chip, AD_DS_WSMC) & ~AD_DS_WSMC_WAEN;
190 		ad1889_writew(chip, AD_DS_WSMC, reg);
191 		chip->wave.reg = reg;
192 
193 		/* disable IRQs */
194 		reg = ad1889_readw(chip, AD_DMA_WAV);
195 		reg &= AD_DMA_IM_DIS;
196 		reg &= ~AD_DMA_LOOP;
197 		ad1889_writew(chip, AD_DMA_WAV, reg);
198 
199 		/* clear IRQ and address counters and pointers */
200 		ad1889_load_wave_buffer_address(chip, 0x0);
201 		ad1889_load_wave_buffer_count(chip, 0x0);
202 		ad1889_load_wave_interrupt_count(chip, 0x0);
203 
204 		/* flush */
205 		ad1889_readw(chip, AD_DMA_WAV);
206 	}
207 
208 	if (channel & AD_CHAN_ADC) {
209 		/* Disable ADC channel */
210 		reg = ad1889_readw(chip, AD_DS_RAMC) & ~AD_DS_RAMC_ADEN;
211 		ad1889_writew(chip, AD_DS_RAMC, reg);
212 		chip->ramc.reg = reg;
213 
214 		reg = ad1889_readw(chip, AD_DMA_ADC);
215 		reg &= AD_DMA_IM_DIS;
216 		reg &= ~AD_DMA_LOOP;
217 		ad1889_writew(chip, AD_DMA_ADC, reg);
218 
219 		ad1889_load_adc_buffer_address(chip, 0x0);
220 		ad1889_load_adc_buffer_count(chip, 0x0);
221 		ad1889_load_adc_interrupt_count(chip, 0x0);
222 
223 		/* flush */
224 		ad1889_readw(chip, AD_DMA_ADC);
225 	}
226 }
227 
228 static u16
229 snd_ad1889_ac97_read(struct snd_ac97 *ac97, unsigned short reg)
230 {
231 	struct snd_ad1889 *chip = ac97->private_data;
232 	return ad1889_readw(chip, AD_AC97_BASE + reg);
233 }
234 
235 static void
236 snd_ad1889_ac97_write(struct snd_ac97 *ac97, unsigned short reg, unsigned short val)
237 {
238 	struct snd_ad1889 *chip = ac97->private_data;
239 	ad1889_writew(chip, AD_AC97_BASE + reg, val);
240 }
241 
242 static int
243 snd_ad1889_ac97_ready(struct snd_ad1889 *chip)
244 {
245 	int retry = 400; /* average needs 352 msec */
246 
247 	while (!(ad1889_readw(chip, AD_AC97_ACIC) & AD_AC97_ACIC_ACRDY)
248 			&& --retry)
249 		usleep_range(1000, 2000);
250 	if (!retry) {
251 		dev_err(chip->card->dev, "[%s] Link is not ready.\n",
252 			__func__);
253 		return -EIO;
254 	}
255 	dev_dbg(chip->card->dev, "[%s] ready after %d ms\n", __func__, 400 - retry);
256 
257 	return 0;
258 }
259 
260 static const struct snd_pcm_hardware snd_ad1889_playback_hw = {
261 	.info = SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
262 		SNDRV_PCM_INFO_MMAP_VALID | SNDRV_PCM_INFO_BLOCK_TRANSFER,
263 	.formats = SNDRV_PCM_FMTBIT_S16_LE,
264 	.rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
265 	.rate_min = 8000,	/* docs say 7000, but we're lazy */
266 	.rate_max = 48000,
267 	.channels_min = 1,
268 	.channels_max = 2,
269 	.buffer_bytes_max = BUFFER_BYTES_MAX,
270 	.period_bytes_min = PERIOD_BYTES_MIN,
271 	.period_bytes_max = PERIOD_BYTES_MAX,
272 	.periods_min = PERIODS_MIN,
273 	.periods_max = PERIODS_MAX,
274 	/*.fifo_size = 0,*/
275 };
276 
277 static const struct snd_pcm_hardware snd_ad1889_capture_hw = {
278 	.info = SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
279 		SNDRV_PCM_INFO_MMAP_VALID | SNDRV_PCM_INFO_BLOCK_TRANSFER,
280 	.formats = SNDRV_PCM_FMTBIT_S16_LE,
281 	.rates = SNDRV_PCM_RATE_48000,
282 	.rate_min = 48000,	/* docs say we could to VSR, but we're lazy */
283 	.rate_max = 48000,
284 	.channels_min = 1,
285 	.channels_max = 2,
286 	.buffer_bytes_max = BUFFER_BYTES_MAX,
287 	.period_bytes_min = PERIOD_BYTES_MIN,
288 	.period_bytes_max = PERIOD_BYTES_MAX,
289 	.periods_min = PERIODS_MIN,
290 	.periods_max = PERIODS_MAX,
291 	/*.fifo_size = 0,*/
292 };
293 
294 static int
295 snd_ad1889_playback_open(struct snd_pcm_substream *ss)
296 {
297 	struct snd_ad1889 *chip = snd_pcm_substream_chip(ss);
298 	struct snd_pcm_runtime *rt = ss->runtime;
299 
300 	chip->psubs = ss;
301 	rt->hw = snd_ad1889_playback_hw;
302 
303 	return 0;
304 }
305 
306 static int
307 snd_ad1889_capture_open(struct snd_pcm_substream *ss)
308 {
309 	struct snd_ad1889 *chip = snd_pcm_substream_chip(ss);
310 	struct snd_pcm_runtime *rt = ss->runtime;
311 
312 	chip->csubs = ss;
313 	rt->hw = snd_ad1889_capture_hw;
314 
315 	return 0;
316 }
317 
318 static int
319 snd_ad1889_playback_close(struct snd_pcm_substream *ss)
320 {
321 	struct snd_ad1889 *chip = snd_pcm_substream_chip(ss);
322 	chip->psubs = NULL;
323 	return 0;
324 }
325 
326 static int
327 snd_ad1889_capture_close(struct snd_pcm_substream *ss)
328 {
329 	struct snd_ad1889 *chip = snd_pcm_substream_chip(ss);
330 	chip->csubs = NULL;
331 	return 0;
332 }
333 
334 static int
335 snd_ad1889_playback_prepare(struct snd_pcm_substream *ss)
336 {
337 	struct snd_ad1889 *chip = snd_pcm_substream_chip(ss);
338 	struct snd_pcm_runtime *rt = ss->runtime;
339 	unsigned int size = snd_pcm_lib_buffer_bytes(ss);
340 	unsigned int count = snd_pcm_lib_period_bytes(ss);
341 	u16 reg;
342 
343 	ad1889_channel_reset(chip, AD_CHAN_WAV);
344 
345 	reg = ad1889_readw(chip, AD_DS_WSMC);
346 
347 	/* Mask out 16-bit / Stereo */
348 	reg &= ~(AD_DS_WSMC_WA16 | AD_DS_WSMC_WAST);
349 
350 	if (snd_pcm_format_width(rt->format) == 16)
351 		reg |= AD_DS_WSMC_WA16;
352 
353 	if (rt->channels > 1)
354 		reg |= AD_DS_WSMC_WAST;
355 
356 	/* let's make sure we don't clobber ourselves */
357 	spin_lock_irq(&chip->lock);
358 
359 	chip->wave.size = size;
360 	chip->wave.reg = reg;
361 	chip->wave.addr = rt->dma_addr;
362 
363 	ad1889_writew(chip, AD_DS_WSMC, chip->wave.reg);
364 
365 	/* Set sample rates on the codec */
366 	ad1889_writew(chip, AD_DS_WAS, rt->rate);
367 
368 	/* Set up DMA */
369 	ad1889_load_wave_buffer_address(chip, chip->wave.addr);
370 	ad1889_load_wave_buffer_count(chip, size);
371 	ad1889_load_wave_interrupt_count(chip, count);
372 
373 	/* writes flush */
374 	ad1889_readw(chip, AD_DS_WSMC);
375 
376 	spin_unlock_irq(&chip->lock);
377 
378 	dev_dbg(chip->card->dev,
379 		"prepare playback: addr = 0x%x, count = %u, size = %u, reg = 0x%x, rate = %u\n",
380 		chip->wave.addr, count, size, reg, rt->rate);
381 	return 0;
382 }
383 
384 static int
385 snd_ad1889_capture_prepare(struct snd_pcm_substream *ss)
386 {
387 	struct snd_ad1889 *chip = snd_pcm_substream_chip(ss);
388 	struct snd_pcm_runtime *rt = ss->runtime;
389 	unsigned int size = snd_pcm_lib_buffer_bytes(ss);
390 	unsigned int count = snd_pcm_lib_period_bytes(ss);
391 	u16 reg;
392 
393 	ad1889_channel_reset(chip, AD_CHAN_ADC);
394 
395 	reg = ad1889_readw(chip, AD_DS_RAMC);
396 
397 	/* Mask out 16-bit / Stereo */
398 	reg &= ~(AD_DS_RAMC_AD16 | AD_DS_RAMC_ADST);
399 
400 	if (snd_pcm_format_width(rt->format) == 16)
401 		reg |= AD_DS_RAMC_AD16;
402 
403 	if (rt->channels > 1)
404 		reg |= AD_DS_RAMC_ADST;
405 
406 	/* let's make sure we don't clobber ourselves */
407 	spin_lock_irq(&chip->lock);
408 
409 	chip->ramc.size = size;
410 	chip->ramc.reg = reg;
411 	chip->ramc.addr = rt->dma_addr;
412 
413 	ad1889_writew(chip, AD_DS_RAMC, chip->ramc.reg);
414 
415 	/* Set up DMA */
416 	ad1889_load_adc_buffer_address(chip, chip->ramc.addr);
417 	ad1889_load_adc_buffer_count(chip, size);
418 	ad1889_load_adc_interrupt_count(chip, count);
419 
420 	/* writes flush */
421 	ad1889_readw(chip, AD_DS_RAMC);
422 
423 	spin_unlock_irq(&chip->lock);
424 
425 	dev_dbg(chip->card->dev,
426 		"prepare capture: addr = 0x%x, count = %u, size = %u, reg = 0x%x, rate = %u\n",
427 		chip->ramc.addr, count, size, reg, rt->rate);
428 	return 0;
429 }
430 
431 /* this is called in atomic context with IRQ disabled.
432    Must be as fast as possible and not sleep.
433    DMA should be *triggered* by this call.
434    The WSMC "WAEN" bit triggers DMA Wave On/Off */
435 static int
436 snd_ad1889_playback_trigger(struct snd_pcm_substream *ss, int cmd)
437 {
438 	u16 wsmc;
439 	struct snd_ad1889 *chip = snd_pcm_substream_chip(ss);
440 
441 	wsmc = ad1889_readw(chip, AD_DS_WSMC);
442 
443 	switch (cmd) {
444 	case SNDRV_PCM_TRIGGER_START:
445 		/* enable DMA loop & interrupts */
446 		ad1889_writew(chip, AD_DMA_WAV, AD_DMA_LOOP | AD_DMA_IM_CNT);
447 		wsmc |= AD_DS_WSMC_WAEN;
448 		/* 1 to clear CHSS bit */
449 		ad1889_writel(chip, AD_DMA_CHSS, AD_DMA_CHSS_WAVS);
450 		ad1889_unmute(chip);
451 		break;
452 	case SNDRV_PCM_TRIGGER_STOP:
453 		ad1889_mute(chip);
454 		wsmc &= ~AD_DS_WSMC_WAEN;
455 		break;
456 	default:
457 		snd_BUG();
458 		return -EINVAL;
459 	}
460 
461 	chip->wave.reg = wsmc;
462 	ad1889_writew(chip, AD_DS_WSMC, wsmc);
463 	ad1889_readw(chip, AD_DS_WSMC);	/* flush */
464 
465 	/* reset the chip when STOP - will disable IRQs */
466 	if (cmd == SNDRV_PCM_TRIGGER_STOP)
467 		ad1889_channel_reset(chip, AD_CHAN_WAV);
468 
469 	return 0;
470 }
471 
472 /* this is called in atomic context with IRQ disabled.
473    Must be as fast as possible and not sleep.
474    DMA should be *triggered* by this call.
475    The RAMC "ADEN" bit triggers DMA ADC On/Off */
476 static int
477 snd_ad1889_capture_trigger(struct snd_pcm_substream *ss, int cmd)
478 {
479 	u16 ramc;
480 	struct snd_ad1889 *chip = snd_pcm_substream_chip(ss);
481 
482 	ramc = ad1889_readw(chip, AD_DS_RAMC);
483 
484 	switch (cmd) {
485 	case SNDRV_PCM_TRIGGER_START:
486 		/* enable DMA loop & interrupts */
487 		ad1889_writew(chip, AD_DMA_ADC, AD_DMA_LOOP | AD_DMA_IM_CNT);
488 		ramc |= AD_DS_RAMC_ADEN;
489 		/* 1 to clear CHSS bit */
490 		ad1889_writel(chip, AD_DMA_CHSS, AD_DMA_CHSS_ADCS);
491 		break;
492 	case SNDRV_PCM_TRIGGER_STOP:
493 		ramc &= ~AD_DS_RAMC_ADEN;
494 		break;
495 	default:
496 		return -EINVAL;
497 	}
498 
499 	chip->ramc.reg = ramc;
500 	ad1889_writew(chip, AD_DS_RAMC, ramc);
501 	ad1889_readw(chip, AD_DS_RAMC);	/* flush */
502 
503 	/* reset the chip when STOP - will disable IRQs */
504 	if (cmd == SNDRV_PCM_TRIGGER_STOP)
505 		ad1889_channel_reset(chip, AD_CHAN_ADC);
506 
507 	return 0;
508 }
509 
510 /* Called in atomic context with IRQ disabled */
511 static snd_pcm_uframes_t
512 snd_ad1889_playback_pointer(struct snd_pcm_substream *ss)
513 {
514 	size_t ptr = 0;
515 	struct snd_ad1889 *chip = snd_pcm_substream_chip(ss);
516 
517 	if (unlikely(!(chip->wave.reg & AD_DS_WSMC_WAEN)))
518 		return 0;
519 
520 	ptr = ad1889_readl(chip, AD_DMA_WAVCA);
521 	ptr -= chip->wave.addr;
522 
523 	if (snd_BUG_ON(ptr >= chip->wave.size))
524 		return 0;
525 
526 	return bytes_to_frames(ss->runtime, ptr);
527 }
528 
529 /* Called in atomic context with IRQ disabled */
530 static snd_pcm_uframes_t
531 snd_ad1889_capture_pointer(struct snd_pcm_substream *ss)
532 {
533 	size_t ptr = 0;
534 	struct snd_ad1889 *chip = snd_pcm_substream_chip(ss);
535 
536 	if (unlikely(!(chip->ramc.reg & AD_DS_RAMC_ADEN)))
537 		return 0;
538 
539 	ptr = ad1889_readl(chip, AD_DMA_ADCCA);
540 	ptr -= chip->ramc.addr;
541 
542 	if (snd_BUG_ON(ptr >= chip->ramc.size))
543 		return 0;
544 
545 	return bytes_to_frames(ss->runtime, ptr);
546 }
547 
548 static const struct snd_pcm_ops snd_ad1889_playback_ops = {
549 	.open = snd_ad1889_playback_open,
550 	.close = snd_ad1889_playback_close,
551 	.prepare = snd_ad1889_playback_prepare,
552 	.trigger = snd_ad1889_playback_trigger,
553 	.pointer = snd_ad1889_playback_pointer,
554 };
555 
556 static const struct snd_pcm_ops snd_ad1889_capture_ops = {
557 	.open = snd_ad1889_capture_open,
558 	.close = snd_ad1889_capture_close,
559 	.prepare = snd_ad1889_capture_prepare,
560 	.trigger = snd_ad1889_capture_trigger,
561 	.pointer = snd_ad1889_capture_pointer,
562 };
563 
564 static irqreturn_t
565 snd_ad1889_interrupt(int irq, void *dev_id)
566 {
567 	unsigned long st;
568 	struct snd_ad1889 *chip = dev_id;
569 
570 	st = ad1889_readl(chip, AD_DMA_DISR);
571 
572 	/* clear ISR */
573 	ad1889_writel(chip, AD_DMA_DISR, st);
574 
575 	st &= AD_INTR_MASK;
576 
577 	if (unlikely(!st))
578 		return IRQ_NONE;
579 
580 	if (st & (AD_DMA_DISR_PMAI|AD_DMA_DISR_PTAI))
581 		dev_dbg(chip->card->dev,
582 			"Unexpected master or target abort interrupt!\n");
583 
584 	if ((st & AD_DMA_DISR_WAVI) && chip->psubs)
585 		snd_pcm_period_elapsed(chip->psubs);
586 	if ((st & AD_DMA_DISR_ADCI) && chip->csubs)
587 		snd_pcm_period_elapsed(chip->csubs);
588 
589 	return IRQ_HANDLED;
590 }
591 
592 static int
593 snd_ad1889_pcm_init(struct snd_ad1889 *chip, int device)
594 {
595 	int err;
596 	struct snd_pcm *pcm;
597 
598 	err = snd_pcm_new(chip->card, chip->card->driver, device, 1, 1, &pcm);
599 	if (err < 0)
600 		return err;
601 
602 	snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK,
603 			&snd_ad1889_playback_ops);
604 	snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE,
605 			&snd_ad1889_capture_ops);
606 
607 	pcm->private_data = chip;
608 	pcm->info_flags = 0;
609 	strcpy(pcm->name, chip->card->shortname);
610 
611 	chip->pcm = pcm;
612 	chip->psubs = NULL;
613 	chip->csubs = NULL;
614 
615 	snd_pcm_set_managed_buffer_all(pcm, SNDRV_DMA_TYPE_DEV, &chip->pci->dev,
616 				       BUFFER_BYTES_MAX / 2, BUFFER_BYTES_MAX);
617 
618 	return 0;
619 }
620 
621 static void
622 snd_ad1889_proc_read(struct snd_info_entry *entry, struct snd_info_buffer *buffer)
623 {
624 	struct snd_ad1889 *chip = entry->private_data;
625 	u16 reg;
626 	int tmp;
627 
628 	reg = ad1889_readw(chip, AD_DS_WSMC);
629 	snd_iprintf(buffer, "Wave output: %s\n",
630 			(reg & AD_DS_WSMC_WAEN) ? "enabled" : "disabled");
631 	snd_iprintf(buffer, "Wave Channels: %s\n",
632 			(reg & AD_DS_WSMC_WAST) ? "stereo" : "mono");
633 	snd_iprintf(buffer, "Wave Quality: %d-bit linear\n",
634 			(reg & AD_DS_WSMC_WA16) ? 16 : 8);
635 
636 	/* WARQ is at offset 12 */
637 	tmp = (reg & AD_DS_WSMC_WARQ) ?
638 		((((reg & AD_DS_WSMC_WARQ) >> 12) & 0x01) ? 12 : 18) : 4;
639 	tmp /= (reg & AD_DS_WSMC_WAST) ? 2 : 1;
640 
641 	snd_iprintf(buffer, "Wave FIFO: %d %s words\n\n", tmp,
642 			(reg & AD_DS_WSMC_WAST) ? "stereo" : "mono");
643 
644 
645 	snd_iprintf(buffer, "Synthesis output: %s\n",
646 			reg & AD_DS_WSMC_SYEN ? "enabled" : "disabled");
647 
648 	/* SYRQ is at offset 4 */
649 	tmp = (reg & AD_DS_WSMC_SYRQ) ?
650 		((((reg & AD_DS_WSMC_SYRQ) >> 4) & 0x01) ? 12 : 18) : 4;
651 	tmp /= (reg & AD_DS_WSMC_WAST) ? 2 : 1;
652 
653 	snd_iprintf(buffer, "Synthesis FIFO: %d %s words\n\n", tmp,
654 			(reg & AD_DS_WSMC_WAST) ? "stereo" : "mono");
655 
656 	reg = ad1889_readw(chip, AD_DS_RAMC);
657 	snd_iprintf(buffer, "ADC input: %s\n",
658 			(reg & AD_DS_RAMC_ADEN) ? "enabled" : "disabled");
659 	snd_iprintf(buffer, "ADC Channels: %s\n",
660 			(reg & AD_DS_RAMC_ADST) ? "stereo" : "mono");
661 	snd_iprintf(buffer, "ADC Quality: %d-bit linear\n",
662 			(reg & AD_DS_RAMC_AD16) ? 16 : 8);
663 
664 	/* ACRQ is at offset 4 */
665 	tmp = (reg & AD_DS_RAMC_ACRQ) ?
666 		((((reg & AD_DS_RAMC_ACRQ) >> 4) & 0x01) ? 12 : 18) : 4;
667 	tmp /= (reg & AD_DS_RAMC_ADST) ? 2 : 1;
668 
669 	snd_iprintf(buffer, "ADC FIFO: %d %s words\n\n", tmp,
670 			(reg & AD_DS_RAMC_ADST) ? "stereo" : "mono");
671 
672 	snd_iprintf(buffer, "Resampler input: %s\n",
673 			reg & AD_DS_RAMC_REEN ? "enabled" : "disabled");
674 
675 	/* RERQ is at offset 12 */
676 	tmp = (reg & AD_DS_RAMC_RERQ) ?
677 		((((reg & AD_DS_RAMC_RERQ) >> 12) & 0x01) ? 12 : 18) : 4;
678 	tmp /= (reg & AD_DS_RAMC_ADST) ? 2 : 1;
679 
680 	snd_iprintf(buffer, "Resampler FIFO: %d %s words\n\n", tmp,
681 			(reg & AD_DS_WSMC_WAST) ? "stereo" : "mono");
682 
683 
684 	/* doc says LSB represents -1.5dB, but the max value (-94.5dB)
685 	suggests that LSB is -3dB, which is more coherent with the logarithmic
686 	nature of the dB scale */
687 	reg = ad1889_readw(chip, AD_DS_WADA);
688 	snd_iprintf(buffer, "Left: %s, -%d dB\n",
689 			(reg & AD_DS_WADA_LWAM) ? "mute" : "unmute",
690 			((reg & AD_DS_WADA_LWAA) >> 8) * 3);
691 	reg = ad1889_readw(chip, AD_DS_WADA);
692 	snd_iprintf(buffer, "Right: %s, -%d dB\n",
693 			(reg & AD_DS_WADA_RWAM) ? "mute" : "unmute",
694 			(reg & AD_DS_WADA_RWAA) * 3);
695 
696 	reg = ad1889_readw(chip, AD_DS_WAS);
697 	snd_iprintf(buffer, "Wave samplerate: %u Hz\n", reg);
698 	reg = ad1889_readw(chip, AD_DS_RES);
699 	snd_iprintf(buffer, "Resampler samplerate: %u Hz\n", reg);
700 }
701 
702 static void
703 snd_ad1889_proc_init(struct snd_ad1889 *chip)
704 {
705 	snd_card_ro_proc_new(chip->card, chip->card->driver,
706 			     chip, snd_ad1889_proc_read);
707 }
708 
709 static const struct ac97_quirk ac97_quirks[] = {
710 	{
711 		.subvendor = 0x11d4,	/* AD */
712 		.subdevice = 0x1889,	/* AD1889 */
713 		.codec_id = AC97_ID_AD1819,
714 		.name = "AD1889",
715 		.type = AC97_TUNE_HP_ONLY
716 	},
717 	{ } /* terminator */
718 };
719 
720 static void
721 snd_ad1889_ac97_xinit(struct snd_ad1889 *chip)
722 {
723 	u16 reg;
724 
725 	reg = ad1889_readw(chip, AD_AC97_ACIC);
726 	reg |= AD_AC97_ACIC_ACRD;		/* Reset Disable */
727 	ad1889_writew(chip, AD_AC97_ACIC, reg);
728 	ad1889_readw(chip, AD_AC97_ACIC);	/* flush posted write */
729 	udelay(10);
730 	/* Interface Enable */
731 	reg |= AD_AC97_ACIC_ACIE;
732 	ad1889_writew(chip, AD_AC97_ACIC, reg);
733 
734 	snd_ad1889_ac97_ready(chip);
735 
736 	/* Audio Stream Output | Variable Sample Rate Mode */
737 	reg = ad1889_readw(chip, AD_AC97_ACIC);
738 	reg |= AD_AC97_ACIC_ASOE | AD_AC97_ACIC_VSRM;
739 	ad1889_writew(chip, AD_AC97_ACIC, reg);
740 	ad1889_readw(chip, AD_AC97_ACIC); /* flush posted write */
741 
742 }
743 
744 static void
745 snd_ad1889_ac97_bus_free(struct snd_ac97_bus *bus)
746 {
747 	struct snd_ad1889 *chip = bus->private_data;
748 	chip->ac97_bus = NULL;
749 }
750 
751 static void
752 snd_ad1889_ac97_free(struct snd_ac97 *ac97)
753 {
754 	struct snd_ad1889 *chip = ac97->private_data;
755 	chip->ac97 = NULL;
756 }
757 
758 static int
759 snd_ad1889_ac97_init(struct snd_ad1889 *chip, const char *quirk_override)
760 {
761 	int err;
762 	struct snd_ac97_template ac97;
763 	static const struct snd_ac97_bus_ops ops = {
764 		.write = snd_ad1889_ac97_write,
765 		.read = snd_ad1889_ac97_read,
766 	};
767 
768 	/* doing that here, it works. */
769 	snd_ad1889_ac97_xinit(chip);
770 
771 	err = snd_ac97_bus(chip->card, 0, &ops, chip, &chip->ac97_bus);
772 	if (err < 0)
773 		return err;
774 
775 	chip->ac97_bus->private_free = snd_ad1889_ac97_bus_free;
776 
777 	memset(&ac97, 0, sizeof(ac97));
778 	ac97.private_data = chip;
779 	ac97.private_free = snd_ad1889_ac97_free;
780 	ac97.pci = chip->pci;
781 
782 	err = snd_ac97_mixer(chip->ac97_bus, &ac97, &chip->ac97);
783 	if (err < 0)
784 		return err;
785 
786 	snd_ac97_tune_hardware(chip->ac97, ac97_quirks, quirk_override);
787 
788 	return 0;
789 }
790 
791 static int
792 snd_ad1889_free(struct snd_ad1889 *chip)
793 {
794 	if (chip->irq < 0)
795 		goto skip_hw;
796 
797 	spin_lock_irq(&chip->lock);
798 
799 	ad1889_mute(chip);
800 
801 	/* Turn off interrupt on count and zero DMA registers */
802 	ad1889_channel_reset(chip, AD_CHAN_WAV | AD_CHAN_ADC);
803 
804 	/* clear DISR. If we don't, we'd better jump off the Eiffel Tower */
805 	ad1889_writel(chip, AD_DMA_DISR, AD_DMA_DISR_PTAI | AD_DMA_DISR_PMAI);
806 	ad1889_readl(chip, AD_DMA_DISR);	/* flush, dammit! */
807 
808 	spin_unlock_irq(&chip->lock);
809 
810 	if (chip->irq >= 0)
811 		free_irq(chip->irq, chip);
812 
813 skip_hw:
814 	iounmap(chip->iobase);
815 	pci_release_regions(chip->pci);
816 	pci_disable_device(chip->pci);
817 	kfree(chip);
818 	return 0;
819 }
820 
821 static int
822 snd_ad1889_dev_free(struct snd_device *device)
823 {
824 	struct snd_ad1889 *chip = device->device_data;
825 	return snd_ad1889_free(chip);
826 }
827 
828 static int
829 snd_ad1889_init(struct snd_ad1889 *chip)
830 {
831 	ad1889_writew(chip, AD_DS_CCS, AD_DS_CCS_CLKEN); /* turn on clock */
832 	ad1889_readw(chip, AD_DS_CCS);	/* flush posted write */
833 
834 	usleep_range(10000, 11000);
835 
836 	/* enable Master and Target abort interrupts */
837 	ad1889_writel(chip, AD_DMA_DISR, AD_DMA_DISR_PMAE | AD_DMA_DISR_PTAE);
838 
839 	return 0;
840 }
841 
842 static int
843 snd_ad1889_create(struct snd_card *card,
844 		  struct pci_dev *pci,
845 		  struct snd_ad1889 **rchip)
846 {
847 	int err;
848 
849 	struct snd_ad1889 *chip;
850 	static const struct snd_device_ops ops = {
851 		.dev_free = snd_ad1889_dev_free,
852 	};
853 
854 	*rchip = NULL;
855 
856 	if ((err = pci_enable_device(pci)) < 0)
857 		return err;
858 
859 	/* check PCI availability (32bit DMA) */
860 	if (dma_set_mask(&pci->dev, DMA_BIT_MASK(32)) < 0 ||
861 	    dma_set_coherent_mask(&pci->dev, DMA_BIT_MASK(32)) < 0) {
862 		dev_err(card->dev, "error setting 32-bit DMA mask.\n");
863 		pci_disable_device(pci);
864 		return -ENXIO;
865 	}
866 
867 	/* allocate chip specific data with zero-filled memory */
868 	if ((chip = kzalloc(sizeof(*chip), GFP_KERNEL)) == NULL) {
869 		pci_disable_device(pci);
870 		return -ENOMEM;
871 	}
872 
873 	chip->card = card;
874 	card->private_data = chip;
875 	chip->pci = pci;
876 	chip->irq = -1;
877 
878 	/* (1) PCI resource allocation */
879 	if ((err = pci_request_regions(pci, card->driver)) < 0)
880 		goto free_and_ret;
881 
882 	chip->bar = pci_resource_start(pci, 0);
883 	chip->iobase = pci_ioremap_bar(pci, 0);
884 	if (chip->iobase == NULL) {
885 		dev_err(card->dev, "unable to reserve region.\n");
886 		err = -EBUSY;
887 		goto free_and_ret;
888 	}
889 
890 	pci_set_master(pci);
891 
892 	spin_lock_init(&chip->lock);	/* only now can we call ad1889_free */
893 
894 	if (request_irq(pci->irq, snd_ad1889_interrupt,
895 			IRQF_SHARED, KBUILD_MODNAME, chip)) {
896 		dev_err(card->dev, "cannot obtain IRQ %d\n", pci->irq);
897 		snd_ad1889_free(chip);
898 		return -EBUSY;
899 	}
900 
901 	chip->irq = pci->irq;
902 	card->sync_irq = chip->irq;
903 
904 	/* (2) initialization of the chip hardware */
905 	if ((err = snd_ad1889_init(chip)) < 0) {
906 		snd_ad1889_free(chip);
907 		return err;
908 	}
909 
910 	if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
911 		snd_ad1889_free(chip);
912 		return err;
913 	}
914 
915 	*rchip = chip;
916 
917 	return 0;
918 
919 free_and_ret:
920 	kfree(chip);
921 	pci_disable_device(pci);
922 
923 	return err;
924 }
925 
926 static int
927 snd_ad1889_probe(struct pci_dev *pci,
928 		 const struct pci_device_id *pci_id)
929 {
930 	int err;
931 	static int devno;
932 	struct snd_card *card;
933 	struct snd_ad1889 *chip;
934 
935 	/* (1) */
936 	if (devno >= SNDRV_CARDS)
937 		return -ENODEV;
938 	if (!enable[devno]) {
939 		devno++;
940 		return -ENOENT;
941 	}
942 
943 	/* (2) */
944 	err = snd_card_new(&pci->dev, index[devno], id[devno], THIS_MODULE,
945 			   0, &card);
946 	/* XXX REVISIT: we can probably allocate chip in this call */
947 	if (err < 0)
948 		return err;
949 
950 	strcpy(card->driver, "AD1889");
951 	strcpy(card->shortname, "Analog Devices AD1889");
952 
953 	/* (3) */
954 	err = snd_ad1889_create(card, pci, &chip);
955 	if (err < 0)
956 		goto free_and_ret;
957 
958 	/* (4) */
959 	sprintf(card->longname, "%s at 0x%lx irq %i",
960 		card->shortname, chip->bar, chip->irq);
961 
962 	/* (5) */
963 	/* register AC97 mixer */
964 	err = snd_ad1889_ac97_init(chip, ac97_quirk[devno]);
965 	if (err < 0)
966 		goto free_and_ret;
967 
968 	err = snd_ad1889_pcm_init(chip, 0);
969 	if (err < 0)
970 		goto free_and_ret;
971 
972 	/* register proc interface */
973 	snd_ad1889_proc_init(chip);
974 
975 	/* (6) */
976 	err = snd_card_register(card);
977 	if (err < 0)
978 		goto free_and_ret;
979 
980 	/* (7) */
981 	pci_set_drvdata(pci, card);
982 
983 	devno++;
984 	return 0;
985 
986 free_and_ret:
987 	snd_card_free(card);
988 	return err;
989 }
990 
991 static void
992 snd_ad1889_remove(struct pci_dev *pci)
993 {
994 	snd_card_free(pci_get_drvdata(pci));
995 }
996 
997 static const struct pci_device_id snd_ad1889_ids[] = {
998 	{ PCI_DEVICE(PCI_VENDOR_ID_ANALOG_DEVICES, PCI_DEVICE_ID_AD1889JS) },
999 	{ 0, },
1000 };
1001 MODULE_DEVICE_TABLE(pci, snd_ad1889_ids);
1002 
1003 static struct pci_driver ad1889_pci_driver = {
1004 	.name = KBUILD_MODNAME,
1005 	.id_table = snd_ad1889_ids,
1006 	.probe = snd_ad1889_probe,
1007 	.remove = snd_ad1889_remove,
1008 };
1009 
1010 module_pci_driver(ad1889_pci_driver);
1011