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 43MODULE_AUTHOR("Kyle McMartin <kyle@parisc-linux.org>, Thibaut Varene <t-bone@parisc-linux.org>"); 44MODULE_DESCRIPTION("Analog Devices AD1889 ALSA sound driver"); 45MODULE_LICENSE("GPL"); 46MODULE_SUPPORTED_DEVICE("{{Analog Devices,AD1889}}"); 47 48static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; 49module_param_array(index, int, NULL, 0444); 50MODULE_PARM_DESC(index, "Index value for the AD1889 soundcard."); 51 52static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; 53module_param_array(id, charp, NULL, 0444); 54MODULE_PARM_DESC(id, "ID string for the AD1889 soundcard."); 55 56static bool enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP; 57module_param_array(enable, bool, NULL, 0444); 58MODULE_PARM_DESC(enable, "Enable AD1889 soundcard."); 59 60static char *ac97_quirk[SNDRV_CARDS]; 61module_param_array(ac97_quirk, charp, NULL, 0444); 62MODULE_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 */ 68struct ad1889_register_state { 69 u16 reg; /* reg setup */ 70 u32 addr; /* dma base address */ 71 unsigned long size; /* DMA buffer size */ 72}; 73 74struct 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 97static inline u16 98ad1889_readw(struct snd_ad1889 *chip, unsigned reg) 99{ 100 return readw(chip->iobase + reg); 101} 102 103static inline void 104ad1889_writew(struct snd_ad1889 *chip, unsigned reg, u16 val) 105{ 106 writew(val, chip->iobase + reg); 107} 108 109static inline u32 110ad1889_readl(struct snd_ad1889 *chip, unsigned reg) 111{ 112 return readl(chip->iobase + reg); 113} 114 115static inline void 116ad1889_writel(struct snd_ad1889 *chip, unsigned reg, u32 val) 117{ 118 writel(val, chip->iobase + reg); 119} 120 121static inline void 122ad1889_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 131static inline void 132ad1889_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 140static inline void 141ad1889_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 147static inline void 148ad1889_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 154static inline void 155ad1889_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 161static inline void 162ad1889_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 168static inline void 169ad1889_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 175static inline void 176ad1889_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 182static void 183ad1889_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 228static u16 229snd_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 235static void 236snd_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 242static int 243snd_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 260static 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 277static 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 294static int 295snd_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 306static int 307snd_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 318static int 319snd_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 326static int 327snd_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 334static int 335snd_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 384static int 385snd_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 */ 435static int 436snd_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 */ 476static int 477snd_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 */ 511static snd_pcm_uframes_t 512snd_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 */ 530static snd_pcm_uframes_t 531snd_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 548static 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 556static 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 564static irqreturn_t 565snd_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 592static int 593snd_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 621static void 622snd_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 702static void 703snd_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 709static 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 720static void 721snd_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 744static void 745snd_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 751static void 752snd_ad1889_ac97_free(struct snd_ac97 *ac97) 753{ 754 struct snd_ad1889 *chip = ac97->private_data; 755 chip->ac97 = NULL; 756} 757 758static int 759snd_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 791static int 792snd_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 813skip_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 821static int 822snd_ad1889_dev_free(struct snd_device *device) 823{ 824 struct snd_ad1889 *chip = device->device_data; 825 return snd_ad1889_free(chip); 826} 827 828static int 829snd_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 842static int 843snd_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 919free_and_ret: 920 kfree(chip); 921 pci_disable_device(pci); 922 923 return err; 924} 925 926static int 927snd_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 986free_and_ret: 987 snd_card_free(card); 988 return err; 989} 990 991static void 992snd_ad1889_remove(struct pci_dev *pci) 993{ 994 snd_card_free(pci_get_drvdata(pci)); 995} 996 997static const struct pci_device_id snd_ad1889_ids[] = { 998 { PCI_DEVICE(PCI_VENDOR_ID_ANALOG_DEVICES, PCI_DEVICE_ID_AD1889JS) }, 999 { 0, }, 1000}; 1001MODULE_DEVICE_TABLE(pci, snd_ad1889_ids); 1002 1003static 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 1010module_pci_driver(ad1889_pci_driver); 1011