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