1 /********************************************************************* 2 * 3 * Linux multisound pinnacle/fiji driver for ALSA. 4 * 5 * 2002/06/30 Karsten Wiese: 6 * for now this is only used to build a pinnacle / fiji driver. 7 * the OSS parent of this code is designed to also support 8 * the multisound classic via the file msnd_classic.c. 9 * to make it easier for some brave heart to implemt classic 10 * support in alsa, i left all the MSND_CLASSIC tokens in this file. 11 * but for now this untested & undone. 12 * 13 * 14 * ripped from linux kernel 2.4.18 by Karsten Wiese. 15 * 16 * the following is a copy of the 2.4.18 OSS FREE file-heading comment: 17 * 18 * Turtle Beach MultiSound Sound Card Driver for Linux 19 * msnd_pinnacle.c / msnd_classic.c 20 * 21 * -- If MSND_CLASSIC is defined: 22 * 23 * -> driver for Turtle Beach Classic/Monterey/Tahiti 24 * 25 * -- Else 26 * 27 * -> driver for Turtle Beach Pinnacle/Fiji 28 * 29 * 12-3-2000 Modified IO port validation Steve Sycamore 30 * 31 * Copyright (C) 1998 Andrew Veliath 32 * 33 * This program is free software; you can redistribute it and/or modify 34 * it under the terms of the GNU General Public License as published by 35 * the Free Software Foundation; either version 2 of the License, or 36 * (at your option) any later version. 37 * 38 * This program is distributed in the hope that it will be useful, 39 * but WITHOUT ANY WARRANTY; without even the implied warranty of 40 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 41 * GNU General Public License for more details. 42 * 43 * You should have received a copy of the GNU General Public License 44 * along with this program; if not, write to the Free Software 45 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 46 * 47 ********************************************************************/ 48 49 #include <linux/kernel.h> 50 #include <linux/module.h> 51 #include <linux/interrupt.h> 52 #include <linux/types.h> 53 #include <linux/delay.h> 54 #include <linux/ioport.h> 55 #include <linux/firmware.h> 56 #include <linux/isa.h> 57 #include <linux/isapnp.h> 58 #include <linux/irq.h> 59 #include <linux/io.h> 60 61 #include <sound/core.h> 62 #include <sound/initval.h> 63 #include <sound/asound.h> 64 #include <sound/pcm.h> 65 #include <sound/mpu401.h> 66 67 #ifdef MSND_CLASSIC 68 # ifndef __alpha__ 69 # define SLOWIO 70 # endif 71 #endif 72 #include "msnd.h" 73 #ifdef MSND_CLASSIC 74 # include "msnd_classic.h" 75 # define LOGNAME "msnd_classic" 76 #else 77 # include "msnd_pinnacle.h" 78 # define LOGNAME "snd_msnd_pinnacle" 79 #endif 80 81 static void __devinit set_default_audio_parameters(struct snd_msnd *chip) 82 { 83 chip->play_sample_size = DEFSAMPLESIZE; 84 chip->play_sample_rate = DEFSAMPLERATE; 85 chip->play_channels = DEFCHANNELS; 86 chip->capture_sample_size = DEFSAMPLESIZE; 87 chip->capture_sample_rate = DEFSAMPLERATE; 88 chip->capture_channels = DEFCHANNELS; 89 } 90 91 static void snd_msnd_eval_dsp_msg(struct snd_msnd *chip, u16 wMessage) 92 { 93 switch (HIBYTE(wMessage)) { 94 case HIMT_PLAY_DONE: { 95 if (chip->banksPlayed < 3) 96 snd_printdd("%08X: HIMT_PLAY_DONE: %i\n", 97 (unsigned)jiffies, LOBYTE(wMessage)); 98 99 if (chip->last_playbank == LOBYTE(wMessage)) { 100 snd_printdd("chip.last_playbank == LOBYTE(wMessage)\n"); 101 break; 102 } 103 chip->banksPlayed++; 104 105 if (test_bit(F_WRITING, &chip->flags)) 106 snd_msnd_DAPQ(chip, 0); 107 108 chip->last_playbank = LOBYTE(wMessage); 109 chip->playDMAPos += chip->play_period_bytes; 110 if (chip->playDMAPos > chip->playLimit) 111 chip->playDMAPos = 0; 112 snd_pcm_period_elapsed(chip->playback_substream); 113 114 break; 115 } 116 case HIMT_RECORD_DONE: 117 if (chip->last_recbank == LOBYTE(wMessage)) 118 break; 119 chip->last_recbank = LOBYTE(wMessage); 120 chip->captureDMAPos += chip->capturePeriodBytes; 121 if (chip->captureDMAPos > (chip->captureLimit)) 122 chip->captureDMAPos = 0; 123 124 if (test_bit(F_READING, &chip->flags)) 125 snd_msnd_DARQ(chip, chip->last_recbank); 126 127 snd_pcm_period_elapsed(chip->capture_substream); 128 break; 129 130 case HIMT_DSP: 131 switch (LOBYTE(wMessage)) { 132 #ifndef MSND_CLASSIC 133 case HIDSP_PLAY_UNDER: 134 #endif 135 case HIDSP_INT_PLAY_UNDER: 136 snd_printd(KERN_WARNING LOGNAME ": Play underflow %i\n", 137 chip->banksPlayed); 138 if (chip->banksPlayed > 2) 139 clear_bit(F_WRITING, &chip->flags); 140 break; 141 142 case HIDSP_INT_RECORD_OVER: 143 snd_printd(KERN_WARNING LOGNAME ": Record overflow\n"); 144 clear_bit(F_READING, &chip->flags); 145 break; 146 147 default: 148 snd_printd(KERN_WARNING LOGNAME 149 ": DSP message %d 0x%02x\n", 150 LOBYTE(wMessage), LOBYTE(wMessage)); 151 break; 152 } 153 break; 154 155 case HIMT_MIDI_IN_UCHAR: 156 if (chip->msndmidi_mpu) 157 snd_msndmidi_input_read(chip->msndmidi_mpu); 158 break; 159 160 default: 161 snd_printd(KERN_WARNING LOGNAME ": HIMT message %d 0x%02x\n", 162 HIBYTE(wMessage), HIBYTE(wMessage)); 163 break; 164 } 165 } 166 167 static irqreturn_t snd_msnd_interrupt(int irq, void *dev_id) 168 { 169 struct snd_msnd *chip = dev_id; 170 void *pwDSPQData = chip->mappedbase + DSPQ_DATA_BUFF; 171 172 /* Send ack to DSP */ 173 /* inb(chip->io + HP_RXL); */ 174 175 /* Evaluate queued DSP messages */ 176 while (readw(chip->DSPQ + JQS_wTail) != readw(chip->DSPQ + JQS_wHead)) { 177 u16 wTmp; 178 179 snd_msnd_eval_dsp_msg(chip, 180 readw(pwDSPQData + 2 * readw(chip->DSPQ + JQS_wHead))); 181 182 wTmp = readw(chip->DSPQ + JQS_wHead) + 1; 183 if (wTmp > readw(chip->DSPQ + JQS_wSize)) 184 writew(0, chip->DSPQ + JQS_wHead); 185 else 186 writew(wTmp, chip->DSPQ + JQS_wHead); 187 } 188 /* Send ack to DSP */ 189 inb(chip->io + HP_RXL); 190 return IRQ_HANDLED; 191 } 192 193 194 static int snd_msnd_reset_dsp(long io, unsigned char *info) 195 { 196 int timeout = 100; 197 198 outb(HPDSPRESET_ON, io + HP_DSPR); 199 msleep(1); 200 #ifndef MSND_CLASSIC 201 if (info) 202 *info = inb(io + HP_INFO); 203 #endif 204 outb(HPDSPRESET_OFF, io + HP_DSPR); 205 msleep(1); 206 while (timeout-- > 0) { 207 if (inb(io + HP_CVR) == HP_CVR_DEF) 208 return 0; 209 msleep(1); 210 } 211 snd_printk(KERN_ERR LOGNAME ": Cannot reset DSP\n"); 212 213 return -EIO; 214 } 215 216 static int __devinit snd_msnd_probe(struct snd_card *card) 217 { 218 struct snd_msnd *chip = card->private_data; 219 unsigned char info; 220 #ifndef MSND_CLASSIC 221 char *xv, *rev = NULL; 222 char *pin = "TB Pinnacle", *fiji = "TB Fiji"; 223 char *pinfiji = "TB Pinnacle/Fiji"; 224 #endif 225 226 if (!request_region(chip->io, DSP_NUMIO, "probing")) { 227 snd_printk(KERN_ERR LOGNAME ": I/O port conflict\n"); 228 return -ENODEV; 229 } 230 231 if (snd_msnd_reset_dsp(chip->io, &info) < 0) { 232 release_region(chip->io, DSP_NUMIO); 233 return -ENODEV; 234 } 235 236 #ifdef MSND_CLASSIC 237 strcpy(card->shortname, "Classic/Tahiti/Monterey"); 238 strcpy(card->longname, "Turtle Beach Multisound"); 239 printk(KERN_INFO LOGNAME ": %s, " 240 "I/O 0x%lx-0x%lx, IRQ %d, memory mapped to 0x%lX-0x%lX\n", 241 card->shortname, 242 chip->io, chip->io + DSP_NUMIO - 1, 243 chip->irq, 244 chip->base, chip->base + 0x7fff); 245 #else 246 switch (info >> 4) { 247 case 0xf: 248 xv = "<= 1.15"; 249 break; 250 case 0x1: 251 xv = "1.18/1.2"; 252 break; 253 case 0x2: 254 xv = "1.3"; 255 break; 256 case 0x3: 257 xv = "1.4"; 258 break; 259 default: 260 xv = "unknown"; 261 break; 262 } 263 264 switch (info & 0x7) { 265 case 0x0: 266 rev = "I"; 267 strcpy(card->shortname, pin); 268 break; 269 case 0x1: 270 rev = "F"; 271 strcpy(card->shortname, pin); 272 break; 273 case 0x2: 274 rev = "G"; 275 strcpy(card->shortname, pin); 276 break; 277 case 0x3: 278 rev = "H"; 279 strcpy(card->shortname, pin); 280 break; 281 case 0x4: 282 rev = "E"; 283 strcpy(card->shortname, fiji); 284 break; 285 case 0x5: 286 rev = "C"; 287 strcpy(card->shortname, fiji); 288 break; 289 case 0x6: 290 rev = "D"; 291 strcpy(card->shortname, fiji); 292 break; 293 case 0x7: 294 rev = "A-B (Fiji) or A-E (Pinnacle)"; 295 strcpy(card->shortname, pinfiji); 296 break; 297 } 298 strcpy(card->longname, "Turtle Beach Multisound Pinnacle"); 299 printk(KERN_INFO LOGNAME ": %s revision %s, Xilinx version %s, " 300 "I/O 0x%lx-0x%lx, IRQ %d, memory mapped to 0x%lX-0x%lX\n", 301 card->shortname, 302 rev, xv, 303 chip->io, chip->io + DSP_NUMIO - 1, 304 chip->irq, 305 chip->base, chip->base + 0x7fff); 306 #endif 307 308 release_region(chip->io, DSP_NUMIO); 309 return 0; 310 } 311 312 static int snd_msnd_init_sma(struct snd_msnd *chip) 313 { 314 static int initted; 315 u16 mastVolLeft, mastVolRight; 316 unsigned long flags; 317 318 #ifdef MSND_CLASSIC 319 outb(chip->memid, chip->io + HP_MEMM); 320 #endif 321 outb(HPBLKSEL_0, chip->io + HP_BLKS); 322 /* Motorola 56k shared memory base */ 323 chip->SMA = chip->mappedbase + SMA_STRUCT_START; 324 325 if (initted) { 326 mastVolLeft = readw(chip->SMA + SMA_wCurrMastVolLeft); 327 mastVolRight = readw(chip->SMA + SMA_wCurrMastVolRight); 328 } else 329 mastVolLeft = mastVolRight = 0; 330 memset_io(chip->mappedbase, 0, 0x8000); 331 332 /* Critical section: bank 1 access */ 333 spin_lock_irqsave(&chip->lock, flags); 334 outb(HPBLKSEL_1, chip->io + HP_BLKS); 335 memset_io(chip->mappedbase, 0, 0x8000); 336 outb(HPBLKSEL_0, chip->io + HP_BLKS); 337 spin_unlock_irqrestore(&chip->lock, flags); 338 339 /* Digital audio play queue */ 340 chip->DAPQ = chip->mappedbase + DAPQ_OFFSET; 341 snd_msnd_init_queue(chip->DAPQ, DAPQ_DATA_BUFF, DAPQ_BUFF_SIZE); 342 343 /* Digital audio record queue */ 344 chip->DARQ = chip->mappedbase + DARQ_OFFSET; 345 snd_msnd_init_queue(chip->DARQ, DARQ_DATA_BUFF, DARQ_BUFF_SIZE); 346 347 /* MIDI out queue */ 348 chip->MODQ = chip->mappedbase + MODQ_OFFSET; 349 snd_msnd_init_queue(chip->MODQ, MODQ_DATA_BUFF, MODQ_BUFF_SIZE); 350 351 /* MIDI in queue */ 352 chip->MIDQ = chip->mappedbase + MIDQ_OFFSET; 353 snd_msnd_init_queue(chip->MIDQ, MIDQ_DATA_BUFF, MIDQ_BUFF_SIZE); 354 355 /* DSP -> host message queue */ 356 chip->DSPQ = chip->mappedbase + DSPQ_OFFSET; 357 snd_msnd_init_queue(chip->DSPQ, DSPQ_DATA_BUFF, DSPQ_BUFF_SIZE); 358 359 /* Setup some DSP values */ 360 #ifndef MSND_CLASSIC 361 writew(1, chip->SMA + SMA_wCurrPlayFormat); 362 writew(chip->play_sample_size, chip->SMA + SMA_wCurrPlaySampleSize); 363 writew(chip->play_channels, chip->SMA + SMA_wCurrPlayChannels); 364 writew(chip->play_sample_rate, chip->SMA + SMA_wCurrPlaySampleRate); 365 #endif 366 writew(chip->play_sample_rate, chip->SMA + SMA_wCalFreqAtoD); 367 writew(mastVolLeft, chip->SMA + SMA_wCurrMastVolLeft); 368 writew(mastVolRight, chip->SMA + SMA_wCurrMastVolRight); 369 #ifndef MSND_CLASSIC 370 writel(0x00010000, chip->SMA + SMA_dwCurrPlayPitch); 371 writel(0x00000001, chip->SMA + SMA_dwCurrPlayRate); 372 #endif 373 writew(0x303, chip->SMA + SMA_wCurrInputTagBits); 374 375 initted = 1; 376 377 return 0; 378 } 379 380 381 static int upload_dsp_code(struct snd_card *card) 382 { 383 struct snd_msnd *chip = card->private_data; 384 const struct firmware *init_fw = NULL, *perm_fw = NULL; 385 int err; 386 387 outb(HPBLKSEL_0, chip->io + HP_BLKS); 388 389 err = request_firmware(&init_fw, INITCODEFILE, card->dev); 390 if (err < 0) { 391 printk(KERN_ERR LOGNAME ": Error loading " INITCODEFILE); 392 goto cleanup1; 393 } 394 err = request_firmware(&perm_fw, PERMCODEFILE, card->dev); 395 if (err < 0) { 396 printk(KERN_ERR LOGNAME ": Error loading " PERMCODEFILE); 397 goto cleanup; 398 } 399 400 memcpy_toio(chip->mappedbase, perm_fw->data, perm_fw->size); 401 if (snd_msnd_upload_host(chip, init_fw->data, init_fw->size) < 0) { 402 printk(KERN_WARNING LOGNAME ": Error uploading to DSP\n"); 403 err = -ENODEV; 404 goto cleanup; 405 } 406 printk(KERN_INFO LOGNAME ": DSP firmware uploaded\n"); 407 err = 0; 408 409 cleanup: 410 release_firmware(perm_fw); 411 cleanup1: 412 release_firmware(init_fw); 413 return err; 414 } 415 416 #ifdef MSND_CLASSIC 417 static void reset_proteus(struct snd_msnd *chip) 418 { 419 outb(HPPRORESET_ON, chip->io + HP_PROR); 420 msleep(TIME_PRO_RESET); 421 outb(HPPRORESET_OFF, chip->io + HP_PROR); 422 msleep(TIME_PRO_RESET_DONE); 423 } 424 #endif 425 426 static int snd_msnd_initialize(struct snd_card *card) 427 { 428 struct snd_msnd *chip = card->private_data; 429 int err, timeout; 430 431 #ifdef MSND_CLASSIC 432 outb(HPWAITSTATE_0, chip->io + HP_WAIT); 433 outb(HPBITMODE_16, chip->io + HP_BITM); 434 435 reset_proteus(chip); 436 #endif 437 err = snd_msnd_init_sma(chip); 438 if (err < 0) { 439 printk(KERN_WARNING LOGNAME ": Cannot initialize SMA\n"); 440 return err; 441 } 442 443 err = snd_msnd_reset_dsp(chip->io, NULL); 444 if (err < 0) 445 return err; 446 447 err = upload_dsp_code(card); 448 if (err < 0) { 449 printk(KERN_WARNING LOGNAME ": Cannot upload DSP code\n"); 450 return err; 451 } 452 453 timeout = 200; 454 455 while (readw(chip->mappedbase)) { 456 msleep(1); 457 if (!timeout--) { 458 snd_printd(KERN_ERR LOGNAME ": DSP reset timeout\n"); 459 return -EIO; 460 } 461 } 462 463 snd_msndmix_setup(chip); 464 return 0; 465 } 466 467 static int snd_msnd_dsp_full_reset(struct snd_card *card) 468 { 469 struct snd_msnd *chip = card->private_data; 470 int rv; 471 472 if (test_bit(F_RESETTING, &chip->flags) || ++chip->nresets > 10) 473 return 0; 474 475 set_bit(F_RESETTING, &chip->flags); 476 snd_msnd_dsp_halt(chip, NULL); /* Unconditionally halt */ 477 478 rv = snd_msnd_initialize(card); 479 if (rv) 480 printk(KERN_WARNING LOGNAME ": DSP reset failed\n"); 481 snd_msndmix_force_recsrc(chip, 0); 482 clear_bit(F_RESETTING, &chip->flags); 483 return rv; 484 } 485 486 static int snd_msnd_dev_free(struct snd_device *device) 487 { 488 snd_printdd("snd_msnd_chip_free()\n"); 489 return 0; 490 } 491 492 static int snd_msnd_send_dsp_cmd_chk(struct snd_msnd *chip, u8 cmd) 493 { 494 if (snd_msnd_send_dsp_cmd(chip, cmd) == 0) 495 return 0; 496 snd_msnd_dsp_full_reset(chip->card); 497 return snd_msnd_send_dsp_cmd(chip, cmd); 498 } 499 500 static int __devinit snd_msnd_calibrate_adc(struct snd_msnd *chip, u16 srate) 501 { 502 snd_printdd("snd_msnd_calibrate_adc(%i)\n", srate); 503 writew(srate, chip->SMA + SMA_wCalFreqAtoD); 504 if (chip->calibrate_signal == 0) 505 writew(readw(chip->SMA + SMA_wCurrHostStatusFlags) 506 | 0x0001, chip->SMA + SMA_wCurrHostStatusFlags); 507 else 508 writew(readw(chip->SMA + SMA_wCurrHostStatusFlags) 509 & ~0x0001, chip->SMA + SMA_wCurrHostStatusFlags); 510 if (snd_msnd_send_word(chip, 0, 0, HDEXAR_CAL_A_TO_D) == 0 && 511 snd_msnd_send_dsp_cmd_chk(chip, HDEX_AUX_REQ) == 0) { 512 schedule_timeout_interruptible(msecs_to_jiffies(333)); 513 return 0; 514 } 515 printk(KERN_WARNING LOGNAME ": ADC calibration failed\n"); 516 return -EIO; 517 } 518 519 /* 520 * ALSA callback function, called when attempting to open the MIDI device. 521 */ 522 static int snd_msnd_mpu401_open(struct snd_mpu401 *mpu) 523 { 524 snd_msnd_enable_irq(mpu->private_data); 525 snd_msnd_send_dsp_cmd(mpu->private_data, HDEX_MIDI_IN_START); 526 return 0; 527 } 528 529 static void snd_msnd_mpu401_close(struct snd_mpu401 *mpu) 530 { 531 snd_msnd_send_dsp_cmd(mpu->private_data, HDEX_MIDI_IN_STOP); 532 snd_msnd_disable_irq(mpu->private_data); 533 } 534 535 static long mpu_io[SNDRV_CARDS] = SNDRV_DEFAULT_PORT; 536 static int mpu_irq[SNDRV_CARDS] = SNDRV_DEFAULT_IRQ; 537 538 static int __devinit snd_msnd_attach(struct snd_card *card) 539 { 540 struct snd_msnd *chip = card->private_data; 541 int err; 542 static struct snd_device_ops ops = { 543 .dev_free = snd_msnd_dev_free, 544 }; 545 546 err = request_irq(chip->irq, snd_msnd_interrupt, 0, card->shortname, 547 chip); 548 if (err < 0) { 549 printk(KERN_ERR LOGNAME ": Couldn't grab IRQ %d\n", chip->irq); 550 return err; 551 } 552 if (request_region(chip->io, DSP_NUMIO, card->shortname) == NULL) { 553 free_irq(chip->irq, chip); 554 return -EBUSY; 555 } 556 557 if (!request_mem_region(chip->base, BUFFSIZE, card->shortname)) { 558 printk(KERN_ERR LOGNAME 559 ": unable to grab memory region 0x%lx-0x%lx\n", 560 chip->base, chip->base + BUFFSIZE - 1); 561 release_region(chip->io, DSP_NUMIO); 562 free_irq(chip->irq, chip); 563 return -EBUSY; 564 } 565 chip->mappedbase = ioremap_nocache(chip->base, 0x8000); 566 if (!chip->mappedbase) { 567 printk(KERN_ERR LOGNAME 568 ": unable to map memory region 0x%lx-0x%lx\n", 569 chip->base, chip->base + BUFFSIZE - 1); 570 err = -EIO; 571 goto err_release_region; 572 } 573 574 err = snd_msnd_dsp_full_reset(card); 575 if (err < 0) 576 goto err_release_region; 577 578 /* Register device */ 579 err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops); 580 if (err < 0) 581 goto err_release_region; 582 583 err = snd_msnd_pcm(card, 0, NULL); 584 if (err < 0) { 585 printk(KERN_ERR LOGNAME ": error creating new PCM device\n"); 586 goto err_release_region; 587 } 588 589 err = snd_msndmix_new(card); 590 if (err < 0) { 591 printk(KERN_ERR LOGNAME ": error creating new Mixer device\n"); 592 goto err_release_region; 593 } 594 595 596 if (mpu_io[0] != SNDRV_AUTO_PORT) { 597 struct snd_mpu401 *mpu; 598 599 err = snd_mpu401_uart_new(card, 0, MPU401_HW_MPU401, 600 mpu_io[0], 601 MPU401_MODE_INPUT | 602 MPU401_MODE_OUTPUT, 603 mpu_irq[0], 604 &chip->rmidi); 605 if (err < 0) { 606 printk(KERN_ERR LOGNAME 607 ": error creating new Midi device\n"); 608 goto err_release_region; 609 } 610 mpu = chip->rmidi->private_data; 611 612 mpu->open_input = snd_msnd_mpu401_open; 613 mpu->close_input = snd_msnd_mpu401_close; 614 mpu->private_data = chip; 615 } 616 617 disable_irq(chip->irq); 618 snd_msnd_calibrate_adc(chip, chip->play_sample_rate); 619 snd_msndmix_force_recsrc(chip, 0); 620 621 err = snd_card_register(card); 622 if (err < 0) 623 goto err_release_region; 624 625 return 0; 626 627 err_release_region: 628 if (chip->mappedbase) 629 iounmap(chip->mappedbase); 630 release_mem_region(chip->base, BUFFSIZE); 631 release_region(chip->io, DSP_NUMIO); 632 free_irq(chip->irq, chip); 633 return err; 634 } 635 636 637 static void __devexit snd_msnd_unload(struct snd_card *card) 638 { 639 struct snd_msnd *chip = card->private_data; 640 641 iounmap(chip->mappedbase); 642 release_mem_region(chip->base, BUFFSIZE); 643 release_region(chip->io, DSP_NUMIO); 644 free_irq(chip->irq, chip); 645 snd_card_free(card); 646 } 647 648 #ifndef MSND_CLASSIC 649 650 /* Pinnacle/Fiji Logical Device Configuration */ 651 652 static int __devinit snd_msnd_write_cfg(int cfg, int reg, int value) 653 { 654 outb(reg, cfg); 655 outb(value, cfg + 1); 656 if (value != inb(cfg + 1)) { 657 printk(KERN_ERR LOGNAME ": snd_msnd_write_cfg: I/O error\n"); 658 return -EIO; 659 } 660 return 0; 661 } 662 663 static int __devinit snd_msnd_write_cfg_io0(int cfg, int num, u16 io) 664 { 665 if (snd_msnd_write_cfg(cfg, IREG_LOGDEVICE, num)) 666 return -EIO; 667 if (snd_msnd_write_cfg(cfg, IREG_IO0_BASEHI, HIBYTE(io))) 668 return -EIO; 669 if (snd_msnd_write_cfg(cfg, IREG_IO0_BASELO, LOBYTE(io))) 670 return -EIO; 671 return 0; 672 } 673 674 static int __devinit snd_msnd_write_cfg_io1(int cfg, int num, u16 io) 675 { 676 if (snd_msnd_write_cfg(cfg, IREG_LOGDEVICE, num)) 677 return -EIO; 678 if (snd_msnd_write_cfg(cfg, IREG_IO1_BASEHI, HIBYTE(io))) 679 return -EIO; 680 if (snd_msnd_write_cfg(cfg, IREG_IO1_BASELO, LOBYTE(io))) 681 return -EIO; 682 return 0; 683 } 684 685 static int __devinit snd_msnd_write_cfg_irq(int cfg, int num, u16 irq) 686 { 687 if (snd_msnd_write_cfg(cfg, IREG_LOGDEVICE, num)) 688 return -EIO; 689 if (snd_msnd_write_cfg(cfg, IREG_IRQ_NUMBER, LOBYTE(irq))) 690 return -EIO; 691 if (snd_msnd_write_cfg(cfg, IREG_IRQ_TYPE, IRQTYPE_EDGE)) 692 return -EIO; 693 return 0; 694 } 695 696 static int __devinit snd_msnd_write_cfg_mem(int cfg, int num, int mem) 697 { 698 u16 wmem; 699 700 mem >>= 8; 701 wmem = (u16)(mem & 0xfff); 702 if (snd_msnd_write_cfg(cfg, IREG_LOGDEVICE, num)) 703 return -EIO; 704 if (snd_msnd_write_cfg(cfg, IREG_MEMBASEHI, HIBYTE(wmem))) 705 return -EIO; 706 if (snd_msnd_write_cfg(cfg, IREG_MEMBASELO, LOBYTE(wmem))) 707 return -EIO; 708 if (wmem && snd_msnd_write_cfg(cfg, IREG_MEMCONTROL, 709 MEMTYPE_HIADDR | MEMTYPE_16BIT)) 710 return -EIO; 711 return 0; 712 } 713 714 static int __devinit snd_msnd_activate_logical(int cfg, int num) 715 { 716 if (snd_msnd_write_cfg(cfg, IREG_LOGDEVICE, num)) 717 return -EIO; 718 if (snd_msnd_write_cfg(cfg, IREG_ACTIVATE, LD_ACTIVATE)) 719 return -EIO; 720 return 0; 721 } 722 723 static int __devinit snd_msnd_write_cfg_logical(int cfg, int num, u16 io0, 724 u16 io1, u16 irq, int mem) 725 { 726 if (snd_msnd_write_cfg(cfg, IREG_LOGDEVICE, num)) 727 return -EIO; 728 if (snd_msnd_write_cfg_io0(cfg, num, io0)) 729 return -EIO; 730 if (snd_msnd_write_cfg_io1(cfg, num, io1)) 731 return -EIO; 732 if (snd_msnd_write_cfg_irq(cfg, num, irq)) 733 return -EIO; 734 if (snd_msnd_write_cfg_mem(cfg, num, mem)) 735 return -EIO; 736 if (snd_msnd_activate_logical(cfg, num)) 737 return -EIO; 738 return 0; 739 } 740 741 static int __devinit snd_msnd_pinnacle_cfg_reset(int cfg) 742 { 743 int i; 744 745 /* Reset devices if told to */ 746 printk(KERN_INFO LOGNAME ": Resetting all devices\n"); 747 for (i = 0; i < 4; ++i) 748 if (snd_msnd_write_cfg_logical(cfg, i, 0, 0, 0, 0)) 749 return -EIO; 750 751 return 0; 752 } 753 #endif 754 755 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; /* Index 0-MAX */ 756 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; /* ID for this card */ 757 758 module_param_array(index, int, NULL, S_IRUGO); 759 MODULE_PARM_DESC(index, "Index value for msnd_pinnacle soundcard."); 760 module_param_array(id, charp, NULL, S_IRUGO); 761 MODULE_PARM_DESC(id, "ID string for msnd_pinnacle soundcard."); 762 763 static long io[SNDRV_CARDS] = SNDRV_DEFAULT_PORT; 764 static int irq[SNDRV_CARDS] = SNDRV_DEFAULT_IRQ; 765 static long mem[SNDRV_CARDS] = SNDRV_DEFAULT_PORT; 766 767 #ifndef MSND_CLASSIC 768 static long cfg[SNDRV_CARDS] = SNDRV_DEFAULT_PORT; 769 770 /* Extra Peripheral Configuration (Default: Disable) */ 771 static long ide_io0[SNDRV_CARDS] = SNDRV_DEFAULT_PORT; 772 static long ide_io1[SNDRV_CARDS] = SNDRV_DEFAULT_PORT; 773 static int ide_irq[SNDRV_CARDS] = SNDRV_DEFAULT_IRQ; 774 775 static long joystick_io[SNDRV_CARDS] = SNDRV_DEFAULT_PORT; 776 /* If we have the digital daugherboard... */ 777 static int digital[SNDRV_CARDS]; 778 779 /* Extra Peripheral Configuration */ 780 static int reset[SNDRV_CARDS]; 781 #endif 782 783 static int write_ndelay[SNDRV_CARDS] = { [0 ... (SNDRV_CARDS-1)] = 1 }; 784 785 static int calibrate_signal; 786 787 #ifdef CONFIG_PNP 788 static int isapnp[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP; 789 module_param_array(isapnp, bool, NULL, 0444); 790 MODULE_PARM_DESC(isapnp, "ISA PnP detection for specified soundcard."); 791 #define has_isapnp(x) isapnp[x] 792 #else 793 #define has_isapnp(x) 0 794 #endif 795 796 MODULE_AUTHOR("Karsten Wiese <annabellesgarden@yahoo.de>"); 797 MODULE_DESCRIPTION("Turtle Beach " LONGNAME " Linux Driver"); 798 MODULE_LICENSE("GPL"); 799 MODULE_FIRMWARE(INITCODEFILE); 800 MODULE_FIRMWARE(PERMCODEFILE); 801 802 module_param_array(io, long, NULL, S_IRUGO); 803 MODULE_PARM_DESC(io, "IO port #"); 804 module_param_array(irq, int, NULL, S_IRUGO); 805 module_param_array(mem, long, NULL, S_IRUGO); 806 module_param_array(write_ndelay, int, NULL, S_IRUGO); 807 module_param(calibrate_signal, int, S_IRUGO); 808 #ifndef MSND_CLASSIC 809 module_param_array(digital, int, NULL, S_IRUGO); 810 module_param_array(cfg, long, NULL, S_IRUGO); 811 module_param_array(reset, int, 0, S_IRUGO); 812 module_param_array(mpu_io, long, NULL, S_IRUGO); 813 module_param_array(mpu_irq, int, NULL, S_IRUGO); 814 module_param_array(ide_io0, long, NULL, S_IRUGO); 815 module_param_array(ide_io1, long, NULL, S_IRUGO); 816 module_param_array(ide_irq, int, NULL, S_IRUGO); 817 module_param_array(joystick_io, long, NULL, S_IRUGO); 818 #endif 819 820 821 static int __devinit snd_msnd_isa_match(struct device *pdev, unsigned int i) 822 { 823 if (io[i] == SNDRV_AUTO_PORT) 824 return 0; 825 826 if (irq[i] == SNDRV_AUTO_PORT || mem[i] == SNDRV_AUTO_PORT) { 827 printk(KERN_WARNING LOGNAME ": io, irq and mem must be set\n"); 828 return 0; 829 } 830 831 #ifdef MSND_CLASSIC 832 if (!(io[i] == 0x290 || 833 io[i] == 0x260 || 834 io[i] == 0x250 || 835 io[i] == 0x240 || 836 io[i] == 0x230 || 837 io[i] == 0x220 || 838 io[i] == 0x210 || 839 io[i] == 0x3e0)) { 840 printk(KERN_ERR LOGNAME ": \"io\" - DSP I/O base must be set " 841 " to 0x210, 0x220, 0x230, 0x240, 0x250, 0x260, 0x290, " 842 "or 0x3E0\n"); 843 return 0; 844 } 845 #else 846 if (io[i] < 0x100 || io[i] > 0x3e0 || (io[i] % 0x10) != 0) { 847 printk(KERN_ERR LOGNAME 848 ": \"io\" - DSP I/O base must within the range 0x100 " 849 "to 0x3E0 and must be evenly divisible by 0x10\n"); 850 return 0; 851 } 852 #endif /* MSND_CLASSIC */ 853 854 if (!(irq[i] == 5 || 855 irq[i] == 7 || 856 irq[i] == 9 || 857 irq[i] == 10 || 858 irq[i] == 11 || 859 irq[i] == 12)) { 860 printk(KERN_ERR LOGNAME 861 ": \"irq\" - must be set to 5, 7, 9, 10, 11 or 12\n"); 862 return 0; 863 } 864 865 if (!(mem[i] == 0xb0000 || 866 mem[i] == 0xc8000 || 867 mem[i] == 0xd0000 || 868 mem[i] == 0xd8000 || 869 mem[i] == 0xe0000 || 870 mem[i] == 0xe8000)) { 871 printk(KERN_ERR LOGNAME ": \"mem\" - must be set to " 872 "0xb0000, 0xc8000, 0xd0000, 0xd8000, 0xe0000 or " 873 "0xe8000\n"); 874 return 0; 875 } 876 877 #ifndef MSND_CLASSIC 878 if (cfg[i] == SNDRV_AUTO_PORT) { 879 printk(KERN_INFO LOGNAME ": Assuming PnP mode\n"); 880 } else if (cfg[i] != 0x250 && cfg[i] != 0x260 && cfg[i] != 0x270) { 881 printk(KERN_INFO LOGNAME 882 ": Config port must be 0x250, 0x260 or 0x270 " 883 "(or unspecified for PnP mode)\n"); 884 return 0; 885 } 886 #endif /* MSND_CLASSIC */ 887 888 return 1; 889 } 890 891 static int __devinit snd_msnd_isa_probe(struct device *pdev, unsigned int idx) 892 { 893 int err; 894 struct snd_card *card; 895 struct snd_msnd *chip; 896 897 if (has_isapnp(idx) 898 #ifndef MSND_CLASSIC 899 || cfg[idx] == SNDRV_AUTO_PORT 900 #endif 901 ) { 902 printk(KERN_INFO LOGNAME ": Assuming PnP mode\n"); 903 return -ENODEV; 904 } 905 906 err = snd_card_create(index[idx], id[idx], THIS_MODULE, 907 sizeof(struct snd_msnd), &card); 908 if (err < 0) 909 return err; 910 911 snd_card_set_dev(card, pdev); 912 chip = card->private_data; 913 chip->card = card; 914 915 #ifdef MSND_CLASSIC 916 switch (irq[idx]) { 917 case 5: 918 chip->irqid = HPIRQ_5; break; 919 case 7: 920 chip->irqid = HPIRQ_7; break; 921 case 9: 922 chip->irqid = HPIRQ_9; break; 923 case 10: 924 chip->irqid = HPIRQ_10; break; 925 case 11: 926 chip->irqid = HPIRQ_11; break; 927 case 12: 928 chip->irqid = HPIRQ_12; break; 929 } 930 931 switch (mem[idx]) { 932 case 0xb0000: 933 chip->memid = HPMEM_B000; break; 934 case 0xc8000: 935 chip->memid = HPMEM_C800; break; 936 case 0xd0000: 937 chip->memid = HPMEM_D000; break; 938 case 0xd8000: 939 chip->memid = HPMEM_D800; break; 940 case 0xe0000: 941 chip->memid = HPMEM_E000; break; 942 case 0xe8000: 943 chip->memid = HPMEM_E800; break; 944 } 945 #else 946 printk(KERN_INFO LOGNAME ": Non-PnP mode: configuring at port 0x%lx\n", 947 cfg[idx]); 948 949 if (!request_region(cfg[idx], 2, "Pinnacle/Fiji Config")) { 950 printk(KERN_ERR LOGNAME ": Config port 0x%lx conflict\n", 951 cfg[idx]); 952 snd_card_free(card); 953 return -EIO; 954 } 955 if (reset[idx]) 956 if (snd_msnd_pinnacle_cfg_reset(cfg[idx])) { 957 err = -EIO; 958 goto cfg_error; 959 } 960 961 /* DSP */ 962 err = snd_msnd_write_cfg_logical(cfg[idx], 0, 963 io[idx], 0, 964 irq[idx], mem[idx]); 965 966 if (err) 967 goto cfg_error; 968 969 /* The following are Pinnacle specific */ 970 971 /* MPU */ 972 if (mpu_io[idx] != SNDRV_AUTO_PORT 973 && mpu_irq[idx] != SNDRV_AUTO_IRQ) { 974 printk(KERN_INFO LOGNAME 975 ": Configuring MPU to I/O 0x%lx IRQ %d\n", 976 mpu_io[idx], mpu_irq[idx]); 977 err = snd_msnd_write_cfg_logical(cfg[idx], 1, 978 mpu_io[idx], 0, 979 mpu_irq[idx], 0); 980 981 if (err) 982 goto cfg_error; 983 } 984 985 /* IDE */ 986 if (ide_io0[idx] != SNDRV_AUTO_PORT 987 && ide_io1[idx] != SNDRV_AUTO_PORT 988 && ide_irq[idx] != SNDRV_AUTO_IRQ) { 989 printk(KERN_INFO LOGNAME 990 ": Configuring IDE to I/O 0x%lx, 0x%lx IRQ %d\n", 991 ide_io0[idx], ide_io1[idx], ide_irq[idx]); 992 err = snd_msnd_write_cfg_logical(cfg[idx], 2, 993 ide_io0[idx], ide_io1[idx], 994 ide_irq[idx], 0); 995 996 if (err) 997 goto cfg_error; 998 } 999 1000 /* Joystick */ 1001 if (joystick_io[idx] != SNDRV_AUTO_PORT) { 1002 printk(KERN_INFO LOGNAME 1003 ": Configuring joystick to I/O 0x%lx\n", 1004 joystick_io[idx]); 1005 err = snd_msnd_write_cfg_logical(cfg[idx], 3, 1006 joystick_io[idx], 0, 1007 0, 0); 1008 1009 if (err) 1010 goto cfg_error; 1011 } 1012 release_region(cfg[idx], 2); 1013 1014 #endif /* MSND_CLASSIC */ 1015 1016 set_default_audio_parameters(chip); 1017 #ifdef MSND_CLASSIC 1018 chip->type = msndClassic; 1019 #else 1020 chip->type = msndPinnacle; 1021 #endif 1022 chip->io = io[idx]; 1023 chip->irq = irq[idx]; 1024 chip->base = mem[idx]; 1025 1026 chip->calibrate_signal = calibrate_signal ? 1 : 0; 1027 chip->recsrc = 0; 1028 chip->dspq_data_buff = DSPQ_DATA_BUFF; 1029 chip->dspq_buff_size = DSPQ_BUFF_SIZE; 1030 if (write_ndelay[idx]) 1031 clear_bit(F_DISABLE_WRITE_NDELAY, &chip->flags); 1032 else 1033 set_bit(F_DISABLE_WRITE_NDELAY, &chip->flags); 1034 #ifndef MSND_CLASSIC 1035 if (digital[idx]) 1036 set_bit(F_HAVEDIGITAL, &chip->flags); 1037 #endif 1038 spin_lock_init(&chip->lock); 1039 err = snd_msnd_probe(card); 1040 if (err < 0) { 1041 printk(KERN_ERR LOGNAME ": Probe failed\n"); 1042 snd_card_free(card); 1043 return err; 1044 } 1045 1046 err = snd_msnd_attach(card); 1047 if (err < 0) { 1048 printk(KERN_ERR LOGNAME ": Attach failed\n"); 1049 snd_card_free(card); 1050 return err; 1051 } 1052 dev_set_drvdata(pdev, card); 1053 1054 return 0; 1055 1056 #ifndef MSND_CLASSIC 1057 cfg_error: 1058 release_region(cfg[idx], 2); 1059 snd_card_free(card); 1060 return err; 1061 #endif 1062 } 1063 1064 static int __devexit snd_msnd_isa_remove(struct device *pdev, unsigned int dev) 1065 { 1066 snd_msnd_unload(dev_get_drvdata(pdev)); 1067 dev_set_drvdata(pdev, NULL); 1068 return 0; 1069 } 1070 1071 #define DEV_NAME "msnd-pinnacle" 1072 1073 static struct isa_driver snd_msnd_driver = { 1074 .match = snd_msnd_isa_match, 1075 .probe = snd_msnd_isa_probe, 1076 .remove = __devexit_p(snd_msnd_isa_remove), 1077 /* FIXME: suspend, resume */ 1078 .driver = { 1079 .name = DEV_NAME 1080 }, 1081 }; 1082 1083 #ifdef CONFIG_PNP 1084 static int __devinit snd_msnd_pnp_detect(struct pnp_card_link *pcard, 1085 const struct pnp_card_device_id *pid) 1086 { 1087 static int idx; 1088 struct pnp_dev *pnp_dev; 1089 struct pnp_dev *mpu_dev; 1090 struct snd_card *card; 1091 struct snd_msnd *chip; 1092 int ret; 1093 1094 for ( ; idx < SNDRV_CARDS; idx++) { 1095 if (has_isapnp(idx)) 1096 break; 1097 } 1098 if (idx >= SNDRV_CARDS) 1099 return -ENODEV; 1100 1101 /* 1102 * Check that we still have room for another sound card ... 1103 */ 1104 pnp_dev = pnp_request_card_device(pcard, pid->devs[0].id, NULL); 1105 if (!pnp_dev) 1106 return -ENODEV; 1107 1108 mpu_dev = pnp_request_card_device(pcard, pid->devs[1].id, NULL); 1109 if (!mpu_dev) 1110 return -ENODEV; 1111 1112 if (!pnp_is_active(pnp_dev) && pnp_activate_dev(pnp_dev) < 0) { 1113 printk(KERN_INFO "msnd_pinnacle: device is inactive\n"); 1114 return -EBUSY; 1115 } 1116 1117 if (!pnp_is_active(mpu_dev) && pnp_activate_dev(mpu_dev) < 0) { 1118 printk(KERN_INFO "msnd_pinnacle: MPU device is inactive\n"); 1119 return -EBUSY; 1120 } 1121 1122 /* 1123 * Create a new ALSA sound card entry, in anticipation 1124 * of detecting our hardware ... 1125 */ 1126 ret = snd_card_create(index[idx], id[idx], THIS_MODULE, 1127 sizeof(struct snd_msnd), &card); 1128 if (ret < 0) 1129 return ret; 1130 1131 chip = card->private_data; 1132 chip->card = card; 1133 snd_card_set_dev(card, &pcard->card->dev); 1134 1135 /* 1136 * Read the correct parameters off the ISA PnP bus ... 1137 */ 1138 io[idx] = pnp_port_start(pnp_dev, 0); 1139 irq[idx] = pnp_irq(pnp_dev, 0); 1140 mem[idx] = pnp_mem_start(pnp_dev, 0); 1141 mpu_io[idx] = pnp_port_start(mpu_dev, 0); 1142 mpu_irq[idx] = pnp_irq(mpu_dev, 0); 1143 1144 set_default_audio_parameters(chip); 1145 #ifdef MSND_CLASSIC 1146 chip->type = msndClassic; 1147 #else 1148 chip->type = msndPinnacle; 1149 #endif 1150 chip->io = io[idx]; 1151 chip->irq = irq[idx]; 1152 chip->base = mem[idx]; 1153 1154 chip->calibrate_signal = calibrate_signal ? 1 : 0; 1155 chip->recsrc = 0; 1156 chip->dspq_data_buff = DSPQ_DATA_BUFF; 1157 chip->dspq_buff_size = DSPQ_BUFF_SIZE; 1158 if (write_ndelay[idx]) 1159 clear_bit(F_DISABLE_WRITE_NDELAY, &chip->flags); 1160 else 1161 set_bit(F_DISABLE_WRITE_NDELAY, &chip->flags); 1162 #ifndef MSND_CLASSIC 1163 if (digital[idx]) 1164 set_bit(F_HAVEDIGITAL, &chip->flags); 1165 #endif 1166 spin_lock_init(&chip->lock); 1167 ret = snd_msnd_probe(card); 1168 if (ret < 0) { 1169 printk(KERN_ERR LOGNAME ": Probe failed\n"); 1170 goto _release_card; 1171 } 1172 1173 ret = snd_msnd_attach(card); 1174 if (ret < 0) { 1175 printk(KERN_ERR LOGNAME ": Attach failed\n"); 1176 goto _release_card; 1177 } 1178 1179 pnp_set_card_drvdata(pcard, card); 1180 ++idx; 1181 return 0; 1182 1183 _release_card: 1184 snd_card_free(card); 1185 return ret; 1186 } 1187 1188 static void __devexit snd_msnd_pnp_remove(struct pnp_card_link *pcard) 1189 { 1190 snd_msnd_unload(pnp_get_card_drvdata(pcard)); 1191 pnp_set_card_drvdata(pcard, NULL); 1192 } 1193 1194 static int isa_registered; 1195 static int pnp_registered; 1196 1197 static struct pnp_card_device_id msnd_pnpids[] = { 1198 /* Pinnacle PnP */ 1199 { .id = "BVJ0440", .devs = { { "TBS0000" }, { "TBS0001" } } }, 1200 { .id = "" } /* end */ 1201 }; 1202 1203 MODULE_DEVICE_TABLE(pnp_card, msnd_pnpids); 1204 1205 static struct pnp_card_driver msnd_pnpc_driver = { 1206 .flags = PNP_DRIVER_RES_DO_NOT_CHANGE, 1207 .name = "msnd_pinnacle", 1208 .id_table = msnd_pnpids, 1209 .probe = snd_msnd_pnp_detect, 1210 .remove = __devexit_p(snd_msnd_pnp_remove), 1211 }; 1212 #endif /* CONFIG_PNP */ 1213 1214 static int __init snd_msnd_init(void) 1215 { 1216 int err; 1217 1218 err = isa_register_driver(&snd_msnd_driver, SNDRV_CARDS); 1219 #ifdef CONFIG_PNP 1220 if (!err) 1221 isa_registered = 1; 1222 1223 err = pnp_register_card_driver(&msnd_pnpc_driver); 1224 if (!err) 1225 pnp_registered = 1; 1226 1227 if (isa_registered) 1228 err = 0; 1229 #endif 1230 return err; 1231 } 1232 1233 static void __exit snd_msnd_exit(void) 1234 { 1235 #ifdef CONFIG_PNP 1236 if (pnp_registered) 1237 pnp_unregister_card_driver(&msnd_pnpc_driver); 1238 if (isa_registered) 1239 #endif 1240 isa_unregister_driver(&snd_msnd_driver); 1241 } 1242 1243 module_init(snd_msnd_init); 1244 module_exit(snd_msnd_exit); 1245 1246