1 /*- 2 * Copyright (c) 1999 Cameron Grant <cg@freebsd.org> 3 * All rights reserved. 4 * 5 * Derived from the public domain Linux driver 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHERIN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THEPOSSIBILITY OF 26 * SUCH DAMAGE. 27 * 28 * $FreeBSD: src/sys/dev/sound/pci/neomagic.c,v 1.34.2.1 2005/12/30 19:55:53 netchild Exp $ 29 * $DragonFly: src/sys/dev/sound/pci/neomagic.c,v 1.7 2007/01/04 21:47:02 corecode Exp $ 30 */ 31 32 #include <dev/sound/pcm/sound.h> 33 #include <dev/sound/pcm/ac97.h> 34 #include <dev/sound/pci/neomagic.h> 35 #include <dev/sound/pci/neomagic-coeff.h> 36 37 #include <bus/pci/pcireg.h> 38 #include <bus/pci/pcivar.h> 39 40 SND_DECLARE_FILE("$DragonFly: src/sys/dev/sound/pci/neomagic.c,v 1.7 2007/01/04 21:47:02 corecode Exp $"); 41 42 /* -------------------------------------------------------------------- */ 43 44 #define NM_BUFFSIZE 16384 45 46 #define NM256AV_PCI_ID 0x800510c8 47 #define NM256ZX_PCI_ID 0x800610c8 48 49 struct sc_info; 50 51 /* channel registers */ 52 struct sc_chinfo { 53 int active, spd, dir, fmt; 54 u_int32_t blksize, wmark; 55 struct snd_dbuf *buffer; 56 struct pcm_channel *channel; 57 struct sc_info *parent; 58 }; 59 60 /* device private data */ 61 struct sc_info { 62 device_t dev; 63 u_int32_t type; 64 65 struct resource *reg, *irq, *buf; 66 int regid, irqid, bufid; 67 void *ih; 68 69 u_int32_t ac97_base, ac97_status, ac97_busy; 70 u_int32_t buftop, pbuf, rbuf, cbuf, acbuf; 71 u_int32_t playint, recint, misc1int, misc2int; 72 u_int32_t irsz, badintr; 73 74 struct sc_chinfo pch, rch; 75 }; 76 77 /* -------------------------------------------------------------------- */ 78 79 /* 80 * prototypes 81 */ 82 83 /* stuff */ 84 static int nm_loadcoeff(struct sc_info *sc, int dir, int num); 85 static int nm_setch(struct sc_chinfo *ch); 86 static int nm_init(struct sc_info *); 87 static void nm_intr(void *); 88 89 /* talk to the card */ 90 static u_int32_t nm_rd(struct sc_info *, int, int); 91 static void nm_wr(struct sc_info *, int, u_int32_t, int); 92 static u_int32_t nm_rdbuf(struct sc_info *, int, int); 93 static void nm_wrbuf(struct sc_info *, int, u_int32_t, int); 94 95 static u_int32_t badcards[] = { 96 0x0007103c, 97 0x008f1028, 98 0x00dd1014, 99 0x8005110a, 100 }; 101 #define NUM_BADCARDS (sizeof(badcards) / sizeof(u_int32_t)) 102 103 /* The actual rates supported by the card. */ 104 static int samplerates[9] = { 105 8000, 106 11025, 107 16000, 108 22050, 109 24000, 110 32000, 111 44100, 112 48000, 113 99999999 114 }; 115 116 /* -------------------------------------------------------------------- */ 117 118 static u_int32_t nm_fmt[] = { 119 AFMT_U8, 120 AFMT_STEREO | AFMT_U8, 121 AFMT_S16_LE, 122 AFMT_STEREO | AFMT_S16_LE, 123 0 124 }; 125 static struct pcmchan_caps nm_caps = {4000, 48000, nm_fmt, 0}; 126 127 /* -------------------------------------------------------------------- */ 128 129 /* Hardware */ 130 static u_int32_t 131 nm_rd(struct sc_info *sc, int regno, int size) 132 { 133 bus_space_tag_t st = rman_get_bustag(sc->reg); 134 bus_space_handle_t sh = rman_get_bushandle(sc->reg); 135 136 switch (size) { 137 case 1: 138 return bus_space_read_1(st, sh, regno); 139 case 2: 140 return bus_space_read_2(st, sh, regno); 141 case 4: 142 return bus_space_read_4(st, sh, regno); 143 default: 144 return 0xffffffff; 145 } 146 } 147 148 static void 149 nm_wr(struct sc_info *sc, int regno, u_int32_t data, int size) 150 { 151 bus_space_tag_t st = rman_get_bustag(sc->reg); 152 bus_space_handle_t sh = rman_get_bushandle(sc->reg); 153 154 switch (size) { 155 case 1: 156 bus_space_write_1(st, sh, regno, data); 157 break; 158 case 2: 159 bus_space_write_2(st, sh, regno, data); 160 break; 161 case 4: 162 bus_space_write_4(st, sh, regno, data); 163 break; 164 } 165 } 166 167 static u_int32_t 168 nm_rdbuf(struct sc_info *sc, int regno, int size) 169 { 170 bus_space_tag_t st = rman_get_bustag(sc->buf); 171 bus_space_handle_t sh = rman_get_bushandle(sc->buf); 172 173 switch (size) { 174 case 1: 175 return bus_space_read_1(st, sh, regno); 176 case 2: 177 return bus_space_read_2(st, sh, regno); 178 case 4: 179 return bus_space_read_4(st, sh, regno); 180 default: 181 return 0xffffffff; 182 } 183 } 184 185 static void 186 nm_wrbuf(struct sc_info *sc, int regno, u_int32_t data, int size) 187 { 188 bus_space_tag_t st = rman_get_bustag(sc->buf); 189 bus_space_handle_t sh = rman_get_bushandle(sc->buf); 190 191 switch (size) { 192 case 1: 193 bus_space_write_1(st, sh, regno, data); 194 break; 195 case 2: 196 bus_space_write_2(st, sh, regno, data); 197 break; 198 case 4: 199 bus_space_write_4(st, sh, regno, data); 200 break; 201 } 202 } 203 204 /* -------------------------------------------------------------------- */ 205 /* ac97 codec */ 206 static int 207 nm_waitcd(struct sc_info *sc) 208 { 209 int cnt = 10; 210 int fail = 1; 211 212 while (cnt-- > 0) { 213 if (nm_rd(sc, sc->ac97_status, 2) & sc->ac97_busy) { 214 DELAY(100); 215 } else { 216 fail = 0; 217 break; 218 } 219 } 220 return (fail); 221 } 222 223 static u_int32_t 224 nm_initcd(kobj_t obj, void *devinfo) 225 { 226 struct sc_info *sc = (struct sc_info *)devinfo; 227 228 nm_wr(sc, 0x6c0, 0x01, 1); 229 #if 0 230 /* 231 * The following code-line may cause a hang for some chipsets, see 232 * PR 56617. 233 * In case of a bugreport without this line have a look at the PR and 234 * conditionize the code-line based upon the specific version of 235 * the chip. 236 */ 237 nm_wr(sc, 0x6cc, 0x87, 1); 238 #endif 239 nm_wr(sc, 0x6cc, 0x80, 1); 240 nm_wr(sc, 0x6cc, 0x00, 1); 241 return 1; 242 } 243 244 static int 245 nm_rdcd(kobj_t obj, void *devinfo, int regno) 246 { 247 struct sc_info *sc = (struct sc_info *)devinfo; 248 u_int32_t x; 249 250 if (!nm_waitcd(sc)) { 251 x = nm_rd(sc, sc->ac97_base + regno, 2); 252 DELAY(1000); 253 return x; 254 } else { 255 device_printf(sc->dev, "ac97 codec not ready\n"); 256 return -1; 257 } 258 } 259 260 static int 261 nm_wrcd(kobj_t obj, void *devinfo, int regno, u_int32_t data) 262 { 263 struct sc_info *sc = (struct sc_info *)devinfo; 264 int cnt = 3; 265 266 if (!nm_waitcd(sc)) { 267 while (cnt-- > 0) { 268 nm_wr(sc, sc->ac97_base + regno, data, 2); 269 if (!nm_waitcd(sc)) { 270 DELAY(1000); 271 return 0; 272 } 273 } 274 } 275 device_printf(sc->dev, "ac97 codec not ready\n"); 276 return -1; 277 } 278 279 static kobj_method_t nm_ac97_methods[] = { 280 KOBJMETHOD(ac97_init, nm_initcd), 281 KOBJMETHOD(ac97_read, nm_rdcd), 282 KOBJMETHOD(ac97_write, nm_wrcd), 283 { 0, 0 } 284 }; 285 AC97_DECLARE(nm_ac97); 286 287 /* -------------------------------------------------------------------- */ 288 289 static void 290 nm_ackint(struct sc_info *sc, u_int32_t num) 291 { 292 if (sc->type == NM256AV_PCI_ID) { 293 nm_wr(sc, NM_INT_REG, num << 1, 2); 294 } else if (sc->type == NM256ZX_PCI_ID) { 295 nm_wr(sc, NM_INT_REG, num, 4); 296 } 297 } 298 299 static int 300 nm_loadcoeff(struct sc_info *sc, int dir, int num) 301 { 302 int ofs, sz, i; 303 u_int32_t addr; 304 305 addr = (dir == PCMDIR_PLAY)? 0x01c : 0x21c; 306 if (dir == PCMDIR_REC) 307 num += 8; 308 sz = coefficientSizes[num]; 309 ofs = 0; 310 while (num-- > 0) 311 ofs+= coefficientSizes[num]; 312 for (i = 0; i < sz; i++) 313 nm_wrbuf(sc, sc->cbuf + i, coefficients[ofs + i], 1); 314 nm_wr(sc, addr, sc->cbuf, 4); 315 if (dir == PCMDIR_PLAY) 316 sz--; 317 nm_wr(sc, addr + 4, sc->cbuf + sz, 4); 318 return 0; 319 } 320 321 static int 322 nm_setch(struct sc_chinfo *ch) 323 { 324 struct sc_info *sc = ch->parent; 325 u_int32_t base; 326 u_int8_t x; 327 328 for (x = 0; x < 8; x++) 329 if (ch->spd < (samplerates[x] + samplerates[x + 1]) / 2) 330 break; 331 332 if (x == 8) return 1; 333 334 ch->spd = samplerates[x]; 335 nm_loadcoeff(sc, ch->dir, x); 336 337 x <<= 4; 338 x &= NM_RATE_MASK; 339 if (ch->fmt & AFMT_16BIT) x |= NM_RATE_BITS_16; 340 if (ch->fmt & AFMT_STEREO) x |= NM_RATE_STEREO; 341 342 base = (ch->dir == PCMDIR_PLAY)? NM_PLAYBACK_REG_OFFSET : NM_RECORD_REG_OFFSET; 343 nm_wr(sc, base + NM_RATE_REG_OFFSET, x, 1); 344 return 0; 345 } 346 347 /* channel interface */ 348 static void * 349 nmchan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir) 350 { 351 struct sc_info *sc = devinfo; 352 struct sc_chinfo *ch; 353 u_int32_t chnbuf; 354 355 chnbuf = (dir == PCMDIR_PLAY)? sc->pbuf : sc->rbuf; 356 ch = (dir == PCMDIR_PLAY)? &sc->pch : &sc->rch; 357 ch->active = 0; 358 ch->blksize = 0; 359 ch->wmark = 0; 360 ch->buffer = b; 361 sndbuf_setup(ch->buffer, (u_int8_t *)rman_get_virtual(sc->buf) + chnbuf, NM_BUFFSIZE); 362 if (bootverbose) 363 device_printf(sc->dev, "%s buf %p\n", (dir == PCMDIR_PLAY)? 364 "play" : "rec", sndbuf_getbuf(ch->buffer)); 365 ch->parent = sc; 366 ch->channel = c; 367 ch->dir = dir; 368 return ch; 369 } 370 371 static int 372 nmchan_free(kobj_t obj, void *data) 373 { 374 return 0; 375 } 376 377 static int 378 nmchan_setformat(kobj_t obj, void *data, u_int32_t format) 379 { 380 struct sc_chinfo *ch = data; 381 382 ch->fmt = format; 383 return nm_setch(ch); 384 } 385 386 static int 387 nmchan_setspeed(kobj_t obj, void *data, u_int32_t speed) 388 { 389 struct sc_chinfo *ch = data; 390 391 ch->spd = speed; 392 return nm_setch(ch)? 0 : ch->spd; 393 } 394 395 static int 396 nmchan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize) 397 { 398 struct sc_chinfo *ch = data; 399 400 ch->blksize = blocksize; 401 402 return blocksize; 403 } 404 405 static int 406 nmchan_trigger(kobj_t obj, void *data, int go) 407 { 408 struct sc_chinfo *ch = data; 409 struct sc_info *sc = ch->parent; 410 int ssz; 411 412 if (go == PCMTRIG_EMLDMAWR || go == PCMTRIG_EMLDMARD) 413 return 0; 414 415 ssz = (ch->fmt & AFMT_16BIT)? 2 : 1; 416 if (ch->fmt & AFMT_STEREO) 417 ssz <<= 1; 418 419 if (ch->dir == PCMDIR_PLAY) { 420 if (go == PCMTRIG_START) { 421 ch->active = 1; 422 ch->wmark = ch->blksize; 423 nm_wr(sc, NM_PBUFFER_START, sc->pbuf, 4); 424 nm_wr(sc, NM_PBUFFER_END, sc->pbuf + NM_BUFFSIZE - ssz, 4); 425 nm_wr(sc, NM_PBUFFER_CURRP, sc->pbuf, 4); 426 nm_wr(sc, NM_PBUFFER_WMARK, sc->pbuf + ch->wmark, 4); 427 nm_wr(sc, NM_PLAYBACK_ENABLE_REG, NM_PLAYBACK_FREERUN | 428 NM_PLAYBACK_ENABLE_FLAG, 1); 429 nm_wr(sc, NM_AUDIO_MUTE_REG, 0, 2); 430 } else { 431 ch->active = 0; 432 nm_wr(sc, NM_PLAYBACK_ENABLE_REG, 0, 1); 433 nm_wr(sc, NM_AUDIO_MUTE_REG, NM_AUDIO_MUTE_BOTH, 2); 434 } 435 } else { 436 if (go == PCMTRIG_START) { 437 ch->active = 1; 438 ch->wmark = ch->blksize; 439 nm_wr(sc, NM_RECORD_ENABLE_REG, NM_RECORD_FREERUN | 440 NM_RECORD_ENABLE_FLAG, 1); 441 nm_wr(sc, NM_RBUFFER_START, sc->rbuf, 4); 442 nm_wr(sc, NM_RBUFFER_END, sc->rbuf + NM_BUFFSIZE, 4); 443 nm_wr(sc, NM_RBUFFER_CURRP, sc->rbuf, 4); 444 nm_wr(sc, NM_RBUFFER_WMARK, sc->rbuf + ch->wmark, 4); 445 } else { 446 ch->active = 0; 447 nm_wr(sc, NM_RECORD_ENABLE_REG, 0, 1); 448 } 449 } 450 return 0; 451 } 452 453 static int 454 nmchan_getptr(kobj_t obj, void *data) 455 { 456 struct sc_chinfo *ch = data; 457 struct sc_info *sc = ch->parent; 458 459 if (ch->dir == PCMDIR_PLAY) 460 return nm_rd(sc, NM_PBUFFER_CURRP, 4) - sc->pbuf; 461 else 462 return nm_rd(sc, NM_RBUFFER_CURRP, 4) - sc->rbuf; 463 } 464 465 static struct pcmchan_caps * 466 nmchan_getcaps(kobj_t obj, void *data) 467 { 468 return &nm_caps; 469 } 470 471 static kobj_method_t nmchan_methods[] = { 472 KOBJMETHOD(channel_init, nmchan_init), 473 KOBJMETHOD(channel_free, nmchan_free), 474 KOBJMETHOD(channel_setformat, nmchan_setformat), 475 KOBJMETHOD(channel_setspeed, nmchan_setspeed), 476 KOBJMETHOD(channel_setblocksize, nmchan_setblocksize), 477 KOBJMETHOD(channel_trigger, nmchan_trigger), 478 KOBJMETHOD(channel_getptr, nmchan_getptr), 479 KOBJMETHOD(channel_getcaps, nmchan_getcaps), 480 { 0, 0 } 481 }; 482 CHANNEL_DECLARE(nmchan); 483 484 /* The interrupt handler */ 485 static void 486 nm_intr(void *p) 487 { 488 struct sc_info *sc = (struct sc_info *)p; 489 int status, x; 490 491 status = nm_rd(sc, NM_INT_REG, sc->irsz); 492 if (status == 0) 493 return; 494 495 if (status & sc->playint) { 496 status &= ~sc->playint; 497 sc->pch.wmark += sc->pch.blksize; 498 sc->pch.wmark %= NM_BUFFSIZE; 499 nm_wr(sc, NM_PBUFFER_WMARK, sc->pbuf + sc->pch.wmark, 4); 500 501 nm_ackint(sc, sc->playint); 502 chn_intr(sc->pch.channel); 503 } 504 if (status & sc->recint) { 505 status &= ~sc->recint; 506 sc->rch.wmark += sc->rch.blksize; 507 sc->rch.wmark %= NM_BUFFSIZE; 508 nm_wr(sc, NM_RBUFFER_WMARK, sc->rbuf + sc->rch.wmark, 4); 509 510 nm_ackint(sc, sc->recint); 511 chn_intr(sc->rch.channel); 512 } 513 if (status & sc->misc1int) { 514 status &= ~sc->misc1int; 515 nm_ackint(sc, sc->misc1int); 516 x = nm_rd(sc, 0x400, 1); 517 nm_wr(sc, 0x400, x | 2, 1); 518 device_printf(sc->dev, "misc int 1\n"); 519 } 520 if (status & sc->misc2int) { 521 status &= ~sc->misc2int; 522 nm_ackint(sc, sc->misc2int); 523 x = nm_rd(sc, 0x400, 1); 524 nm_wr(sc, 0x400, x & ~2, 1); 525 device_printf(sc->dev, "misc int 2\n"); 526 } 527 if (status) { 528 nm_ackint(sc, status); 529 device_printf(sc->dev, "unknown int\n"); 530 } 531 } 532 533 /* -------------------------------------------------------------------- */ 534 535 /* 536 * Probe and attach the card 537 */ 538 539 static int 540 nm_init(struct sc_info *sc) 541 { 542 u_int32_t ofs, i; 543 544 if (sc->type == NM256AV_PCI_ID) { 545 sc->ac97_base = NM_MIXER_OFFSET; 546 sc->ac97_status = NM_MIXER_STATUS_OFFSET; 547 sc->ac97_busy = NM_MIXER_READY_MASK; 548 549 sc->buftop = 2560 * 1024; 550 551 sc->irsz = 2; 552 sc->playint = NM_PLAYBACK_INT; 553 sc->recint = NM_RECORD_INT; 554 sc->misc1int = NM_MISC_INT_1; 555 sc->misc2int = NM_MISC_INT_2; 556 } else if (sc->type == NM256ZX_PCI_ID) { 557 sc->ac97_base = NM_MIXER_OFFSET; 558 sc->ac97_status = NM2_MIXER_STATUS_OFFSET; 559 sc->ac97_busy = NM2_MIXER_READY_MASK; 560 561 sc->buftop = (nm_rd(sc, 0xa0b, 2)? 6144 : 4096) * 1024; 562 563 sc->irsz = 4; 564 sc->playint = NM2_PLAYBACK_INT; 565 sc->recint = NM2_RECORD_INT; 566 sc->misc1int = NM2_MISC_INT_1; 567 sc->misc2int = NM2_MISC_INT_2; 568 } else return -1; 569 sc->badintr = 0; 570 ofs = sc->buftop - 0x0400; 571 sc->buftop -= 0x1400; 572 573 if (bootverbose) 574 device_printf(sc->dev, "buftop is 0x%08x\n", sc->buftop); 575 if ((nm_rdbuf(sc, ofs, 4) & NM_SIG_MASK) == NM_SIGNATURE) { 576 i = nm_rdbuf(sc, ofs + 4, 4); 577 if (i != 0 && i != 0xffffffff) { 578 if (bootverbose) 579 device_printf(sc->dev, "buftop is changed to 0x%08x\n", i); 580 sc->buftop = i; 581 } 582 } 583 584 sc->cbuf = sc->buftop - NM_MAX_COEFFICIENT; 585 sc->rbuf = sc->cbuf - NM_BUFFSIZE; 586 sc->pbuf = sc->rbuf - NM_BUFFSIZE; 587 sc->acbuf = sc->pbuf - (NM_TOTAL_COEFF_COUNT * 4); 588 589 nm_wr(sc, 0, 0x11, 1); 590 nm_wr(sc, NM_RECORD_ENABLE_REG, 0, 1); 591 nm_wr(sc, 0x214, 0, 2); 592 593 return 0; 594 } 595 596 static int 597 nm_pci_probe(device_t dev) 598 { 599 struct sc_info *sc = NULL; 600 char *s = NULL; 601 u_int32_t subdev, i, data; 602 603 subdev = (pci_get_subdevice(dev) << 16) | pci_get_subvendor(dev); 604 switch (pci_get_devid(dev)) { 605 case NM256AV_PCI_ID: 606 i = 0; 607 while ((i < NUM_BADCARDS) && (badcards[i] != subdev)) 608 i++; 609 610 /* Try to catch other non-ac97 cards */ 611 612 if (i == NUM_BADCARDS) { 613 sc = kmalloc(sizeof(*sc), M_DEVBUF, M_WAITOK | M_ZERO); 614 data = pci_read_config(dev, PCIR_COMMAND, 2); 615 pci_write_config(dev, PCIR_COMMAND, data | 616 PCIM_CMD_PORTEN | PCIM_CMD_MEMEN | 617 PCIM_CMD_BUSMASTEREN, 2); 618 619 sc->regid = PCIR_BAR(1); 620 sc->reg = bus_alloc_resource_any(dev, SYS_RES_MEMORY, 621 &sc->regid, 622 RF_ACTIVE); 623 624 if (!sc->reg) { 625 device_printf(dev, "unable to map register space\n"); 626 pci_write_config(dev, PCIR_COMMAND, data, 2); 627 kfree(sc, M_DEVBUF); 628 return ENXIO; 629 } 630 631 /* 632 * My Panasonic CF-M2EV needs resetting device 633 * before checking mixer is present or not. 634 * t.ichinoseki@nifty.com. 635 */ 636 nm_wr(sc, 0, 0x11, 1); /* reset device */ 637 if ((nm_rd(sc, NM_MIXER_PRESENCE, 2) & 638 NM_PRESENCE_MASK) != NM_PRESENCE_VALUE) { 639 i = 0; /* non-ac97 card, but not listed */ 640 DEB(device_printf(dev, "subdev = 0x%x - badcard?\n", 641 subdev)); 642 } 643 pci_write_config(dev, PCIR_COMMAND, data, 2); 644 bus_release_resource(dev, SYS_RES_MEMORY, sc->regid, 645 sc->reg); 646 kfree(sc, M_DEVBUF); 647 } 648 649 if (i == NUM_BADCARDS) 650 s = "NeoMagic 256AV"; 651 DEB(else) 652 DEB(device_printf(dev, "this is a non-ac97 NM256AV, not attaching\n")); 653 654 break; 655 656 case NM256ZX_PCI_ID: 657 s = "NeoMagic 256ZX"; 658 break; 659 } 660 661 if (s) device_set_desc(dev, s); 662 return s? 0 : ENXIO; 663 } 664 665 static int 666 nm_pci_attach(device_t dev) 667 { 668 u_int32_t data; 669 struct sc_info *sc; 670 struct ac97_info *codec = 0; 671 char status[SND_STATUSLEN]; 672 673 sc = kmalloc(sizeof(*sc), M_DEVBUF, M_WAITOK | M_ZERO); 674 sc->dev = dev; 675 sc->type = pci_get_devid(dev); 676 677 data = pci_read_config(dev, PCIR_COMMAND, 2); 678 data |= (PCIM_CMD_PORTEN|PCIM_CMD_MEMEN|PCIM_CMD_BUSMASTEREN); 679 pci_write_config(dev, PCIR_COMMAND, data, 2); 680 data = pci_read_config(dev, PCIR_COMMAND, 2); 681 682 sc->bufid = PCIR_BAR(0); 683 sc->buf = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &sc->bufid, 684 RF_ACTIVE); 685 sc->regid = PCIR_BAR(1); 686 sc->reg = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &sc->regid, 687 RF_ACTIVE); 688 689 if (!sc->buf || !sc->reg) { 690 device_printf(dev, "unable to map register space\n"); 691 goto bad; 692 } 693 694 if (nm_init(sc) == -1) { 695 device_printf(dev, "unable to initialize the card\n"); 696 goto bad; 697 } 698 699 codec = AC97_CREATE(dev, sc, nm_ac97); 700 if (codec == NULL) goto bad; 701 if (mixer_init(dev, ac97_getmixerclass(), codec) == -1) goto bad; 702 703 sc->irqid = 0; 704 sc->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->irqid, 705 RF_ACTIVE | RF_SHAREABLE); 706 if (!sc->irq || snd_setup_intr(dev, sc->irq, 0, nm_intr, sc, &sc->ih)) { 707 device_printf(dev, "unable to map interrupt\n"); 708 goto bad; 709 } 710 711 ksnprintf(status, SND_STATUSLEN, "at memory 0x%lx, 0x%lx irq %ld %s", 712 rman_get_start(sc->buf), rman_get_start(sc->reg), 713 rman_get_start(sc->irq),PCM_KLDSTRING(snd_neomagic)); 714 715 if (pcm_register(dev, sc, 1, 1)) goto bad; 716 pcm_addchan(dev, PCMDIR_REC, &nmchan_class, sc); 717 pcm_addchan(dev, PCMDIR_PLAY, &nmchan_class, sc); 718 pcm_setstatus(dev, status); 719 720 return 0; 721 722 bad: 723 if (codec) ac97_destroy(codec); 724 if (sc->buf) bus_release_resource(dev, SYS_RES_MEMORY, sc->bufid, sc->buf); 725 if (sc->reg) bus_release_resource(dev, SYS_RES_MEMORY, sc->regid, sc->reg); 726 if (sc->ih) bus_teardown_intr(dev, sc->irq, sc->ih); 727 if (sc->irq) bus_release_resource(dev, SYS_RES_IRQ, sc->irqid, sc->irq); 728 kfree(sc, M_DEVBUF); 729 return ENXIO; 730 } 731 732 static int 733 nm_pci_detach(device_t dev) 734 { 735 int r; 736 struct sc_info *sc; 737 738 r = pcm_unregister(dev); 739 if (r) 740 return r; 741 742 sc = pcm_getdevinfo(dev); 743 bus_release_resource(dev, SYS_RES_MEMORY, sc->bufid, sc->buf); 744 bus_release_resource(dev, SYS_RES_MEMORY, sc->regid, sc->reg); 745 bus_teardown_intr(dev, sc->irq, sc->ih); 746 bus_release_resource(dev, SYS_RES_IRQ, sc->irqid, sc->irq); 747 kfree(sc, M_DEVBUF); 748 749 return 0; 750 } 751 752 static int 753 nm_pci_suspend(device_t dev) 754 { 755 struct sc_info *sc; 756 757 sc = pcm_getdevinfo(dev); 758 759 /* stop playing */ 760 if (sc->pch.active) { 761 nm_wr(sc, NM_PLAYBACK_ENABLE_REG, 0, 1); 762 nm_wr(sc, NM_AUDIO_MUTE_REG, NM_AUDIO_MUTE_BOTH, 2); 763 } 764 /* stop recording */ 765 if (sc->rch.active) { 766 nm_wr(sc, NM_RECORD_ENABLE_REG, 0, 1); 767 } 768 return 0; 769 } 770 771 static int 772 nm_pci_resume(device_t dev) 773 { 774 struct sc_info *sc; 775 776 sc = pcm_getdevinfo(dev); 777 778 /* 779 * Reinit audio device. 780 * Don't call nm_init(). It would change buftop if X ran or 781 * is running. This makes playing and recording buffer address 782 * shift but these buffers of channel layer are not changed. 783 * As a result of this inconsistency, periodic noise will be 784 * generated while playing. 785 */ 786 nm_wr(sc, 0, 0x11, 1); 787 nm_wr(sc, 0x214, 0, 2); 788 789 /* Reinit mixer */ 790 if (mixer_reinit(dev) == -1) { 791 device_printf(dev, "unable to reinitialize the mixer\n"); 792 return ENXIO; 793 } 794 /* restart playing */ 795 if (sc->pch.active) { 796 nm_wr(sc, NM_PLAYBACK_ENABLE_REG, NM_PLAYBACK_FREERUN | 797 NM_PLAYBACK_ENABLE_FLAG, 1); 798 nm_wr(sc, NM_AUDIO_MUTE_REG, 0, 2); 799 } 800 /* restart recording */ 801 if (sc->rch.active) { 802 nm_wr(sc, NM_RECORD_ENABLE_REG, NM_RECORD_FREERUN | 803 NM_RECORD_ENABLE_FLAG, 1); 804 } 805 return 0; 806 } 807 808 static device_method_t nm_methods[] = { 809 /* Device interface */ 810 DEVMETHOD(device_probe, nm_pci_probe), 811 DEVMETHOD(device_attach, nm_pci_attach), 812 DEVMETHOD(device_detach, nm_pci_detach), 813 DEVMETHOD(device_suspend, nm_pci_suspend), 814 DEVMETHOD(device_resume, nm_pci_resume), 815 { 0, 0 } 816 }; 817 818 static driver_t nm_driver = { 819 "pcm", 820 nm_methods, 821 PCM_SOFTC_SIZE, 822 }; 823 824 DRIVER_MODULE(snd_neomagic, pci, nm_driver, pcm_devclass, 0, 0); 825 MODULE_DEPEND(snd_neomagic, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER); 826 MODULE_VERSION(snd_neomagic, 1); 827