1 /*- 2 * Copyright (c) 2001 Orion Hodson <oho@acm.org> 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHERIN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THEPOSSIBILITY OF 24 * SUCH DAMAGE. 25 */ 26 27 /* 28 * als4000.c - driver for the Avance Logic ALS 4000 chipset. 29 * 30 * The ALS4000 is effectively an SB16 with a PCI interface. 31 * 32 * This driver derives from ALS4000a.PDF, Bart Hartgers alsa driver, and 33 * SB16 register descriptions. 34 */ 35 36 #ifdef HAVE_KERNEL_OPTION_HEADERS 37 #include "opt_snd.h" 38 #endif 39 40 #include <dev/sound/pcm/sound.h> 41 #include <dev/sound/isa/sb.h> 42 #include <dev/sound/pci/als4000.h> 43 44 #include <dev/pci/pcireg.h> 45 #include <dev/pci/pcivar.h> 46 47 #include "mixer_if.h" 48 49 SND_DECLARE_FILE("$FreeBSD$"); 50 51 /* Debugging macro's */ 52 #undef DEB 53 #ifndef DEB 54 #define DEB(x) /* x */ 55 #endif /* DEB */ 56 57 #define ALS_DEFAULT_BUFSZ 16384 58 59 /* ------------------------------------------------------------------------- */ 60 /* Structures */ 61 62 struct sc_info; 63 64 struct sc_chinfo { 65 struct sc_info *parent; 66 struct pcm_channel *channel; 67 struct snd_dbuf *buffer; 68 u_int32_t format, speed, phys_buf, bps; 69 u_int32_t dma_active:1, dma_was_active:1; 70 u_int8_t gcr_fifo_status; 71 int dir; 72 }; 73 74 struct sc_info { 75 device_t dev; 76 bus_space_tag_t st; 77 bus_space_handle_t sh; 78 bus_dma_tag_t parent_dmat; 79 struct resource *reg, *irq; 80 int regid, irqid; 81 void *ih; 82 struct mtx *lock; 83 84 unsigned int bufsz; 85 struct sc_chinfo pch, rch; 86 }; 87 88 /* Channel caps */ 89 90 static u_int32_t als_format[] = { 91 SND_FORMAT(AFMT_U8, 1, 0), 92 SND_FORMAT(AFMT_U8, 2, 0), 93 SND_FORMAT(AFMT_S16_LE, 1, 0), 94 SND_FORMAT(AFMT_S16_LE, 2, 0), 95 0 96 }; 97 98 /* 99 * I don't believe this rotten soundcard can do 48k, really, 100 * trust me. 101 */ 102 static struct pcmchan_caps als_caps = { 4000, 44100, als_format, 0 }; 103 104 /* ------------------------------------------------------------------------- */ 105 /* Register Utilities */ 106 107 static u_int32_t 108 als_gcr_rd(struct sc_info *sc, int index) 109 { 110 bus_space_write_1(sc->st, sc->sh, ALS_GCR_INDEX, index); 111 return bus_space_read_4(sc->st, sc->sh, ALS_GCR_DATA); 112 } 113 114 static void 115 als_gcr_wr(struct sc_info *sc, int index, int data) 116 { 117 bus_space_write_1(sc->st, sc->sh, ALS_GCR_INDEX, index); 118 bus_space_write_4(sc->st, sc->sh, ALS_GCR_DATA, data); 119 } 120 121 static u_int8_t 122 als_intr_rd(struct sc_info *sc) 123 { 124 return bus_space_read_1(sc->st, sc->sh, ALS_SB_MPU_IRQ); 125 } 126 127 static void 128 als_intr_wr(struct sc_info *sc, u_int8_t data) 129 { 130 bus_space_write_1(sc->st, sc->sh, ALS_SB_MPU_IRQ, data); 131 } 132 133 static u_int8_t 134 als_mix_rd(struct sc_info *sc, u_int8_t index) 135 { 136 bus_space_write_1(sc->st, sc->sh, ALS_MIXER_INDEX, index); 137 return bus_space_read_1(sc->st, sc->sh, ALS_MIXER_DATA); 138 } 139 140 static void 141 als_mix_wr(struct sc_info *sc, u_int8_t index, u_int8_t data) 142 { 143 bus_space_write_1(sc->st, sc->sh, ALS_MIXER_INDEX, index); 144 bus_space_write_1(sc->st, sc->sh, ALS_MIXER_DATA, data); 145 } 146 147 static void 148 als_esp_wr(struct sc_info *sc, u_int8_t data) 149 { 150 u_int32_t tries, v; 151 152 tries = 1000; 153 do { 154 v = bus_space_read_1(sc->st, sc->sh, ALS_ESP_WR_STATUS); 155 if (~v & 0x80) 156 break; 157 DELAY(20); 158 } while (--tries != 0); 159 160 if (tries == 0) 161 device_printf(sc->dev, "als_esp_wr timeout"); 162 163 bus_space_write_1(sc->st, sc->sh, ALS_ESP_WR_DATA, data); 164 } 165 166 static int 167 als_esp_reset(struct sc_info *sc) 168 { 169 u_int32_t tries, u, v; 170 171 bus_space_write_1(sc->st, sc->sh, ALS_ESP_RST, 1); 172 DELAY(10); 173 bus_space_write_1(sc->st, sc->sh, ALS_ESP_RST, 0); 174 DELAY(30); 175 176 tries = 1000; 177 do { 178 u = bus_space_read_1(sc->st, sc->sh, ALS_ESP_RD_STATUS8); 179 if (u & 0x80) { 180 v = bus_space_read_1(sc->st, sc->sh, ALS_ESP_RD_DATA); 181 if (v == 0xaa) 182 return 0; 183 else 184 break; 185 } 186 DELAY(20); 187 } while (--tries != 0); 188 189 if (tries == 0) 190 device_printf(sc->dev, "als_esp_reset timeout"); 191 return 1; 192 } 193 194 static u_int8_t 195 als_ack_read(struct sc_info *sc, u_int8_t addr) 196 { 197 u_int8_t r = bus_space_read_1(sc->st, sc->sh, addr); 198 return r; 199 } 200 201 /* ------------------------------------------------------------------------- */ 202 /* Common pcm channel implementation */ 203 204 static void * 205 alschan_init(kobj_t obj, void *devinfo, 206 struct snd_dbuf *b, struct pcm_channel *c, int dir) 207 { 208 struct sc_info *sc = devinfo; 209 struct sc_chinfo *ch; 210 211 snd_mtxlock(sc->lock); 212 if (dir == PCMDIR_PLAY) { 213 ch = &sc->pch; 214 ch->gcr_fifo_status = ALS_GCR_FIFO0_STATUS; 215 } else { 216 ch = &sc->rch; 217 ch->gcr_fifo_status = ALS_GCR_FIFO1_STATUS; 218 } 219 ch->dir = dir; 220 ch->parent = sc; 221 ch->channel = c; 222 ch->bps = 1; 223 ch->format = SND_FORMAT(AFMT_U8, 1, 0); 224 ch->speed = DSP_DEFAULT_SPEED; 225 ch->buffer = b; 226 snd_mtxunlock(sc->lock); 227 228 if (sndbuf_alloc(ch->buffer, sc->parent_dmat, 0, sc->bufsz) != 0) 229 return NULL; 230 231 return ch; 232 } 233 234 static int 235 alschan_setformat(kobj_t obj, void *data, u_int32_t format) 236 { 237 struct sc_chinfo *ch = data; 238 239 ch->format = format; 240 return 0; 241 } 242 243 static u_int32_t 244 alschan_setspeed(kobj_t obj, void *data, u_int32_t speed) 245 { 246 struct sc_chinfo *ch = data, *other; 247 struct sc_info *sc = ch->parent; 248 249 other = (ch->dir == PCMDIR_PLAY) ? &sc->rch : &sc->pch; 250 251 /* Deny request if other dma channel is active */ 252 if (other->dma_active) { 253 ch->speed = other->speed; 254 return other->speed; 255 } 256 257 ch->speed = speed; 258 return speed; 259 } 260 261 static u_int32_t 262 alschan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize) 263 { 264 struct sc_chinfo *ch = data; 265 struct sc_info *sc = ch->parent; 266 267 if (blocksize > sc->bufsz / 2) { 268 blocksize = sc->bufsz / 2; 269 } 270 sndbuf_resize(ch->buffer, 2, blocksize); 271 return blocksize; 272 } 273 274 static u_int32_t 275 alschan_getptr(kobj_t obj, void *data) 276 { 277 struct sc_chinfo *ch = data; 278 struct sc_info *sc = ch->parent; 279 int32_t pos, sz; 280 281 snd_mtxlock(sc->lock); 282 pos = als_gcr_rd(ch->parent, ch->gcr_fifo_status) & 0xffff; 283 snd_mtxunlock(sc->lock); 284 sz = sndbuf_getsize(ch->buffer); 285 return (2 * sz - pos - 1) % sz; 286 } 287 288 static struct pcmchan_caps* 289 alschan_getcaps(kobj_t obj, void *data) 290 { 291 return &als_caps; 292 } 293 294 static void 295 als_set_speed(struct sc_chinfo *ch) 296 { 297 struct sc_info *sc = ch->parent; 298 struct sc_chinfo *other; 299 300 other = (ch->dir == PCMDIR_PLAY) ? &sc->rch : &sc->pch; 301 if (other->dma_active == 0) { 302 als_esp_wr(sc, ALS_ESP_SAMPLE_RATE); 303 als_esp_wr(sc, ch->speed >> 8); 304 als_esp_wr(sc, ch->speed & 0xff); 305 } else { 306 DEB(printf("speed locked at %d (tried %d)\n", 307 other->speed, ch->speed)); 308 } 309 } 310 311 /* ------------------------------------------------------------------------- */ 312 /* Playback channel implementation */ 313 314 #define ALS_8BIT_CMD(x, y) { (x), (y), DSP_DMA8, DSP_CMD_DMAPAUSE_8 } 315 #define ALS_16BIT_CMD(x, y) { (x), (y), DSP_DMA16, DSP_CMD_DMAPAUSE_16 } 316 317 struct playback_command { 318 u_int32_t pcm_format; /* newpcm format */ 319 u_int8_t format_val; /* sb16 format value */ 320 u_int8_t dma_prog; /* sb16 dma program */ 321 u_int8_t dma_stop; /* sb16 stop register */ 322 } static const playback_cmds[] = { 323 ALS_8BIT_CMD(SND_FORMAT(AFMT_U8, 1, 0), DSP_MODE_U8MONO), 324 ALS_8BIT_CMD(SND_FORMAT(AFMT_U8, 2, 0), DSP_MODE_U8STEREO), 325 ALS_16BIT_CMD(SND_FORMAT(AFMT_S16_LE, 1, 0), DSP_MODE_S16MONO), 326 ALS_16BIT_CMD(SND_FORMAT(AFMT_S16_LE, 2, 0), DSP_MODE_S16STEREO), 327 }; 328 329 static const struct playback_command* 330 als_get_playback_command(u_int32_t format) 331 { 332 u_int32_t i, n; 333 334 n = sizeof(playback_cmds) / sizeof(playback_cmds[0]); 335 for (i = 0; i < n; i++) { 336 if (playback_cmds[i].pcm_format == format) { 337 return &playback_cmds[i]; 338 } 339 } 340 DEB(printf("als_get_playback_command: invalid format 0x%08x\n", 341 format)); 342 return &playback_cmds[0]; 343 } 344 345 static void 346 als_playback_start(struct sc_chinfo *ch) 347 { 348 const struct playback_command *p; 349 struct sc_info *sc = ch->parent; 350 u_int32_t buf, bufsz, count, dma_prog; 351 352 buf = sndbuf_getbufaddr(ch->buffer); 353 bufsz = sndbuf_getsize(ch->buffer); 354 count = bufsz / 2; 355 if (ch->format & AFMT_16BIT) 356 count /= 2; 357 count--; 358 359 als_esp_wr(sc, DSP_CMD_SPKON); 360 als_set_speed(ch); 361 362 als_gcr_wr(sc, ALS_GCR_DMA0_START, buf); 363 als_gcr_wr(sc, ALS_GCR_DMA0_MODE, (bufsz - 1) | 0x180000); 364 365 p = als_get_playback_command(ch->format); 366 dma_prog = p->dma_prog | DSP_F16_DAC | DSP_F16_AUTO | DSP_F16_FIFO_ON; 367 368 als_esp_wr(sc, dma_prog); 369 als_esp_wr(sc, p->format_val); 370 als_esp_wr(sc, count & 0xff); 371 als_esp_wr(sc, count >> 8); 372 373 ch->dma_active = 1; 374 } 375 376 static int 377 als_playback_stop(struct sc_chinfo *ch) 378 { 379 const struct playback_command *p; 380 struct sc_info *sc = ch->parent; 381 u_int32_t active; 382 383 active = ch->dma_active; 384 if (active) { 385 p = als_get_playback_command(ch->format); 386 als_esp_wr(sc, p->dma_stop); 387 } 388 ch->dma_active = 0; 389 return active; 390 } 391 392 static int 393 alspchan_trigger(kobj_t obj, void *data, int go) 394 { 395 struct sc_chinfo *ch = data; 396 struct sc_info *sc = ch->parent; 397 398 if (!PCMTRIG_COMMON(go)) 399 return 0; 400 401 snd_mtxlock(sc->lock); 402 switch(go) { 403 case PCMTRIG_START: 404 als_playback_start(ch); 405 break; 406 case PCMTRIG_STOP: 407 case PCMTRIG_ABORT: 408 als_playback_stop(ch); 409 break; 410 default: 411 break; 412 } 413 snd_mtxunlock(sc->lock); 414 return 0; 415 } 416 417 static kobj_method_t alspchan_methods[] = { 418 KOBJMETHOD(channel_init, alschan_init), 419 KOBJMETHOD(channel_setformat, alschan_setformat), 420 KOBJMETHOD(channel_setspeed, alschan_setspeed), 421 KOBJMETHOD(channel_setblocksize, alschan_setblocksize), 422 KOBJMETHOD(channel_trigger, alspchan_trigger), 423 KOBJMETHOD(channel_getptr, alschan_getptr), 424 KOBJMETHOD(channel_getcaps, alschan_getcaps), 425 KOBJMETHOD_END 426 }; 427 CHANNEL_DECLARE(alspchan); 428 429 /* ------------------------------------------------------------------------- */ 430 /* Capture channel implementation */ 431 432 static u_int8_t 433 als_get_fifo_format(struct sc_info *sc, u_int32_t format) 434 { 435 switch (format) { 436 case SND_FORMAT(AFMT_U8, 1, 0): 437 return ALS_FIFO1_8BIT; 438 case SND_FORMAT(AFMT_U8, 2, 0): 439 return ALS_FIFO1_8BIT | ALS_FIFO1_STEREO; 440 case SND_FORMAT(AFMT_S16_LE, 1, 0): 441 return ALS_FIFO1_SIGNED; 442 case SND_FORMAT(AFMT_S16_LE, 2, 0): 443 return ALS_FIFO1_SIGNED | ALS_FIFO1_STEREO; 444 } 445 device_printf(sc->dev, "format not found: 0x%08x\n", format); 446 return ALS_FIFO1_8BIT; 447 } 448 449 static void 450 als_capture_start(struct sc_chinfo *ch) 451 { 452 struct sc_info *sc = ch->parent; 453 u_int32_t buf, bufsz, count, dma_prog; 454 455 buf = sndbuf_getbufaddr(ch->buffer); 456 bufsz = sndbuf_getsize(ch->buffer); 457 count = bufsz / 2; 458 if (ch->format & AFMT_16BIT) 459 count /= 2; 460 count--; 461 462 als_esp_wr(sc, DSP_CMD_SPKON); 463 als_set_speed(ch); 464 465 als_gcr_wr(sc, ALS_GCR_FIFO1_START, buf); 466 als_gcr_wr(sc, ALS_GCR_FIFO1_COUNT, (bufsz - 1)); 467 468 als_mix_wr(sc, ALS_FIFO1_LENGTH_LO, count & 0xff); 469 als_mix_wr(sc, ALS_FIFO1_LENGTH_HI, count >> 8); 470 471 dma_prog = ALS_FIFO1_RUN | als_get_fifo_format(sc, ch->format); 472 als_mix_wr(sc, ALS_FIFO1_CONTROL, dma_prog); 473 474 ch->dma_active = 1; 475 } 476 477 static int 478 als_capture_stop(struct sc_chinfo *ch) 479 { 480 struct sc_info *sc = ch->parent; 481 u_int32_t active; 482 483 active = ch->dma_active; 484 if (active) { 485 als_mix_wr(sc, ALS_FIFO1_CONTROL, ALS_FIFO1_STOP); 486 } 487 ch->dma_active = 0; 488 return active; 489 } 490 491 static int 492 alsrchan_trigger(kobj_t obj, void *data, int go) 493 { 494 struct sc_chinfo *ch = data; 495 struct sc_info *sc = ch->parent; 496 497 snd_mtxlock(sc->lock); 498 switch(go) { 499 case PCMTRIG_START: 500 als_capture_start(ch); 501 break; 502 case PCMTRIG_STOP: 503 case PCMTRIG_ABORT: 504 als_capture_stop(ch); 505 break; 506 } 507 snd_mtxunlock(sc->lock); 508 return 0; 509 } 510 511 static kobj_method_t alsrchan_methods[] = { 512 KOBJMETHOD(channel_init, alschan_init), 513 KOBJMETHOD(channel_setformat, alschan_setformat), 514 KOBJMETHOD(channel_setspeed, alschan_setspeed), 515 KOBJMETHOD(channel_setblocksize, alschan_setblocksize), 516 KOBJMETHOD(channel_trigger, alsrchan_trigger), 517 KOBJMETHOD(channel_getptr, alschan_getptr), 518 KOBJMETHOD(channel_getcaps, alschan_getcaps), 519 KOBJMETHOD_END 520 }; 521 CHANNEL_DECLARE(alsrchan); 522 523 /* ------------------------------------------------------------------------- */ 524 /* Mixer related */ 525 526 /* 527 * ALS4000 has an sb16 mixer, with some additional controls that we do 528 * not yet a means to support. 529 */ 530 531 struct sb16props { 532 u_int8_t lreg; 533 u_int8_t rreg; 534 u_int8_t bits; 535 u_int8_t oselect; 536 u_int8_t iselect; /* left input mask */ 537 } static const amt[SOUND_MIXER_NRDEVICES] = { 538 [SOUND_MIXER_VOLUME] = { 0x30, 0x31, 5, 0x00, 0x00 }, 539 [SOUND_MIXER_PCM] = { 0x32, 0x33, 5, 0x00, 0x00 }, 540 [SOUND_MIXER_SYNTH] = { 0x34, 0x35, 5, 0x60, 0x40 }, 541 [SOUND_MIXER_CD] = { 0x36, 0x37, 5, 0x06, 0x04 }, 542 [SOUND_MIXER_LINE] = { 0x38, 0x39, 5, 0x18, 0x10 }, 543 [SOUND_MIXER_MIC] = { 0x3a, 0x00, 5, 0x01, 0x01 }, 544 [SOUND_MIXER_SPEAKER] = { 0x3b, 0x00, 2, 0x00, 0x00 }, 545 [SOUND_MIXER_IGAIN] = { 0x3f, 0x40, 2, 0x00, 0x00 }, 546 [SOUND_MIXER_OGAIN] = { 0x41, 0x42, 2, 0x00, 0x00 }, 547 /* The following have register values but no h/w implementation */ 548 [SOUND_MIXER_TREBLE] = { 0x44, 0x45, 4, 0x00, 0x00 }, 549 [SOUND_MIXER_BASS] = { 0x46, 0x47, 4, 0x00, 0x00 } 550 }; 551 552 static int 553 alsmix_init(struct snd_mixer *m) 554 { 555 u_int32_t i, v; 556 557 for (i = v = 0; i < SOUND_MIXER_NRDEVICES; i++) { 558 if (amt[i].bits) v |= 1 << i; 559 } 560 mix_setdevs(m, v); 561 562 for (i = v = 0; i < SOUND_MIXER_NRDEVICES; i++) { 563 if (amt[i].iselect) v |= 1 << i; 564 } 565 mix_setrecdevs(m, v); 566 return 0; 567 } 568 569 static int 570 alsmix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right) 571 { 572 struct sc_info *sc = mix_getdevinfo(m); 573 u_int32_t r, l, v, mask; 574 575 /* Fill upper n bits in mask with 1's */ 576 mask = ((1 << amt[dev].bits) - 1) << (8 - amt[dev].bits); 577 578 l = (left * mask / 100) & mask; 579 v = als_mix_rd(sc, amt[dev].lreg) & ~mask; 580 als_mix_wr(sc, amt[dev].lreg, l | v); 581 582 if (amt[dev].rreg) { 583 r = (right * mask / 100) & mask; 584 v = als_mix_rd(sc, amt[dev].rreg) & ~mask; 585 als_mix_wr(sc, amt[dev].rreg, r | v); 586 } else { 587 r = 0; 588 } 589 590 /* Zero gain does not mute channel from output, but this does. */ 591 v = als_mix_rd(sc, SB16_OMASK); 592 if (l == 0 && r == 0) { 593 v &= ~amt[dev].oselect; 594 } else { 595 v |= amt[dev].oselect; 596 } 597 als_mix_wr(sc, SB16_OMASK, v); 598 return 0; 599 } 600 601 static u_int32_t 602 alsmix_setrecsrc(struct snd_mixer *m, u_int32_t src) 603 { 604 struct sc_info *sc = mix_getdevinfo(m); 605 u_int32_t i, l, r; 606 607 for (i = l = r = 0; i < SOUND_MIXER_NRDEVICES; i++) { 608 if (src & (1 << i)) { 609 if (amt[i].iselect == 1) { /* microphone */ 610 l |= amt[i].iselect; 611 r |= amt[i].iselect; 612 } else { 613 l |= amt[i].iselect; 614 r |= amt[i].iselect >> 1; 615 } 616 } 617 } 618 619 als_mix_wr(sc, SB16_IMASK_L, l); 620 als_mix_wr(sc, SB16_IMASK_R, r); 621 return src; 622 } 623 624 static kobj_method_t als_mixer_methods[] = { 625 KOBJMETHOD(mixer_init, alsmix_init), 626 KOBJMETHOD(mixer_set, alsmix_set), 627 KOBJMETHOD(mixer_setrecsrc, alsmix_setrecsrc), 628 KOBJMETHOD_END 629 }; 630 MIXER_DECLARE(als_mixer); 631 632 /* ------------------------------------------------------------------------- */ 633 /* Interrupt Handler */ 634 635 static void 636 als_intr(void *p) 637 { 638 struct sc_info *sc = (struct sc_info *)p; 639 u_int8_t intr, sb_status; 640 641 snd_mtxlock(sc->lock); 642 intr = als_intr_rd(sc); 643 644 if (intr & 0x80) { 645 snd_mtxunlock(sc->lock); 646 chn_intr(sc->pch.channel); 647 snd_mtxlock(sc->lock); 648 } 649 650 if (intr & 0x40) { 651 snd_mtxunlock(sc->lock); 652 chn_intr(sc->rch.channel); 653 snd_mtxlock(sc->lock); 654 } 655 656 /* ACK interrupt in PCI core */ 657 als_intr_wr(sc, intr); 658 659 /* ACK interrupt in SB core */ 660 sb_status = als_mix_rd(sc, IRQ_STAT); 661 662 if (sb_status & ALS_IRQ_STATUS8) 663 als_ack_read(sc, ALS_ESP_RD_STATUS8); 664 if (sb_status & ALS_IRQ_STATUS16) 665 als_ack_read(sc, ALS_ESP_RD_STATUS16); 666 if (sb_status & ALS_IRQ_MPUIN) 667 als_ack_read(sc, ALS_MIDI_DATA); 668 if (sb_status & ALS_IRQ_CR1E) 669 als_ack_read(sc, ALS_CR1E_ACK_PORT); 670 671 snd_mtxunlock(sc->lock); 672 return; 673 } 674 675 /* ------------------------------------------------------------------------- */ 676 /* H/W initialization */ 677 678 static int 679 als_init(struct sc_info *sc) 680 { 681 u_int32_t i, v; 682 683 /* Reset Chip */ 684 if (als_esp_reset(sc)) { 685 return 1; 686 } 687 688 /* Enable write on DMA_SETUP register */ 689 v = als_mix_rd(sc, ALS_SB16_CONFIG); 690 als_mix_wr(sc, ALS_SB16_CONFIG, v | 0x80); 691 692 /* Select DMA0 */ 693 als_mix_wr(sc, ALS_SB16_DMA_SETUP, 0x01); 694 695 /* Disable write on DMA_SETUP register */ 696 als_mix_wr(sc, ALS_SB16_CONFIG, v & 0x7f); 697 698 /* Enable interrupts */ 699 v = als_gcr_rd(sc, ALS_GCR_MISC); 700 als_gcr_wr(sc, ALS_GCR_MISC, v | 0x28000); 701 702 /* Black out GCR DMA registers */ 703 for (i = 0x91; i <= 0x96; i++) { 704 als_gcr_wr(sc, i, 0); 705 } 706 707 /* Emulation mode */ 708 v = als_gcr_rd(sc, ALS_GCR_DMA_EMULATION); 709 als_gcr_wr(sc, ALS_GCR_DMA_EMULATION, v); 710 DEB(printf("GCR_DMA_EMULATION 0x%08x\n", v)); 711 return 0; 712 } 713 714 static void 715 als_uninit(struct sc_info *sc) 716 { 717 /* Disable interrupts */ 718 als_gcr_wr(sc, ALS_GCR_MISC, 0); 719 } 720 721 /* ------------------------------------------------------------------------- */ 722 /* Probe and attach card */ 723 724 static int 725 als_pci_probe(device_t dev) 726 { 727 if (pci_get_devid(dev) == ALS_PCI_ID0) { 728 device_set_desc(dev, "Avance Logic ALS4000"); 729 return BUS_PROBE_DEFAULT; 730 } 731 return ENXIO; 732 } 733 734 static void 735 als_resource_free(device_t dev, struct sc_info *sc) 736 { 737 if (sc->reg) { 738 bus_release_resource(dev, SYS_RES_IOPORT, sc->regid, sc->reg); 739 sc->reg = 0; 740 } 741 if (sc->ih) { 742 bus_teardown_intr(dev, sc->irq, sc->ih); 743 sc->ih = 0; 744 } 745 if (sc->irq) { 746 bus_release_resource(dev, SYS_RES_IRQ, sc->irqid, sc->irq); 747 sc->irq = 0; 748 } 749 if (sc->parent_dmat) { 750 bus_dma_tag_destroy(sc->parent_dmat); 751 sc->parent_dmat = 0; 752 } 753 if (sc->lock) { 754 snd_mtxfree(sc->lock); 755 sc->lock = NULL; 756 } 757 } 758 759 static int 760 als_resource_grab(device_t dev, struct sc_info *sc) 761 { 762 sc->regid = PCIR_BAR(0); 763 sc->reg = bus_alloc_resource(dev, SYS_RES_IOPORT, &sc->regid, 0, ~0, 764 ALS_CONFIG_SPACE_BYTES, RF_ACTIVE); 765 if (sc->reg == 0) { 766 device_printf(dev, "unable to allocate register space\n"); 767 goto bad; 768 } 769 sc->st = rman_get_bustag(sc->reg); 770 sc->sh = rman_get_bushandle(sc->reg); 771 772 sc->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->irqid, 773 RF_ACTIVE | RF_SHAREABLE); 774 if (sc->irq == 0) { 775 device_printf(dev, "unable to allocate interrupt\n"); 776 goto bad; 777 } 778 779 if (snd_setup_intr(dev, sc->irq, INTR_MPSAFE, als_intr, 780 sc, &sc->ih)) { 781 device_printf(dev, "unable to setup interrupt\n"); 782 goto bad; 783 } 784 785 sc->bufsz = pcm_getbuffersize(dev, 4096, ALS_DEFAULT_BUFSZ, 65536); 786 787 if (bus_dma_tag_create(/*parent*/bus_get_dma_tag(dev), 788 /*alignment*/2, /*boundary*/0, 789 /*lowaddr*/BUS_SPACE_MAXADDR_24BIT, 790 /*highaddr*/BUS_SPACE_MAXADDR, 791 /*filter*/NULL, /*filterarg*/NULL, 792 /*maxsize*/sc->bufsz, 793 /*nsegments*/1, /*maxsegz*/0x3ffff, 794 /*flags*/0, /*lockfunc*/NULL, 795 /*lockarg*/NULL, &sc->parent_dmat) != 0) { 796 device_printf(dev, "unable to create dma tag\n"); 797 goto bad; 798 } 799 return 0; 800 bad: 801 als_resource_free(dev, sc); 802 return ENXIO; 803 } 804 805 static int 806 als_pci_attach(device_t dev) 807 { 808 struct sc_info *sc; 809 char status[SND_STATUSLEN]; 810 811 sc = malloc(sizeof(*sc), M_DEVBUF, M_WAITOK | M_ZERO); 812 sc->lock = snd_mtxcreate(device_get_nameunit(dev), "snd_als4000 softc"); 813 sc->dev = dev; 814 815 pci_enable_busmaster(dev); 816 /* 817 * By default the power to the various components on the 818 * ALS4000 is entirely controlled by the pci powerstate. We 819 * could attempt finer grained control by setting GCR6.31. 820 */ 821 if (pci_get_powerstate(dev) != PCI_POWERSTATE_D0) { 822 /* Reset the power state. */ 823 device_printf(dev, "chip is in D%d power mode " 824 "-- setting to D0\n", pci_get_powerstate(dev)); 825 pci_set_powerstate(dev, PCI_POWERSTATE_D0); 826 } 827 828 if (als_resource_grab(dev, sc)) { 829 device_printf(dev, "failed to allocate resources\n"); 830 goto bad_attach; 831 } 832 833 if (als_init(sc)) { 834 device_printf(dev, "failed to initialize hardware\n"); 835 goto bad_attach; 836 } 837 838 if (mixer_init(dev, &als_mixer_class, sc)) { 839 device_printf(dev, "failed to initialize mixer\n"); 840 goto bad_attach; 841 } 842 843 if (pcm_register(dev, sc, 1, 1)) { 844 device_printf(dev, "failed to register pcm entries\n"); 845 goto bad_attach; 846 } 847 848 pcm_addchan(dev, PCMDIR_PLAY, &alspchan_class, sc); 849 pcm_addchan(dev, PCMDIR_REC, &alsrchan_class, sc); 850 851 snprintf(status, SND_STATUSLEN, "at io 0x%lx irq %ld %s", 852 rman_get_start(sc->reg), rman_get_start(sc->irq),PCM_KLDSTRING(snd_als4000)); 853 pcm_setstatus(dev, status); 854 return 0; 855 856 bad_attach: 857 als_resource_free(dev, sc); 858 free(sc, M_DEVBUF); 859 return ENXIO; 860 } 861 862 static int 863 als_pci_detach(device_t dev) 864 { 865 struct sc_info *sc; 866 int r; 867 868 r = pcm_unregister(dev); 869 if (r) 870 return r; 871 872 sc = pcm_getdevinfo(dev); 873 als_uninit(sc); 874 als_resource_free(dev, sc); 875 free(sc, M_DEVBUF); 876 return 0; 877 } 878 879 static int 880 als_pci_suspend(device_t dev) 881 { 882 struct sc_info *sc = pcm_getdevinfo(dev); 883 884 snd_mtxlock(sc->lock); 885 sc->pch.dma_was_active = als_playback_stop(&sc->pch); 886 sc->rch.dma_was_active = als_capture_stop(&sc->rch); 887 als_uninit(sc); 888 snd_mtxunlock(sc->lock); 889 return 0; 890 } 891 892 static int 893 als_pci_resume(device_t dev) 894 { 895 struct sc_info *sc = pcm_getdevinfo(dev); 896 897 898 snd_mtxlock(sc->lock); 899 if (als_init(sc) != 0) { 900 device_printf(dev, "unable to reinitialize the card\n"); 901 snd_mtxunlock(sc->lock); 902 return ENXIO; 903 } 904 905 if (mixer_reinit(dev) != 0) { 906 device_printf(dev, "unable to reinitialize the mixer\n"); 907 snd_mtxunlock(sc->lock); 908 return ENXIO; 909 } 910 911 if (sc->pch.dma_was_active) { 912 als_playback_start(&sc->pch); 913 } 914 915 if (sc->rch.dma_was_active) { 916 als_capture_start(&sc->rch); 917 } 918 snd_mtxunlock(sc->lock); 919 920 return 0; 921 } 922 923 static device_method_t als_methods[] = { 924 /* Device interface */ 925 DEVMETHOD(device_probe, als_pci_probe), 926 DEVMETHOD(device_attach, als_pci_attach), 927 DEVMETHOD(device_detach, als_pci_detach), 928 DEVMETHOD(device_suspend, als_pci_suspend), 929 DEVMETHOD(device_resume, als_pci_resume), 930 { 0, 0 } 931 }; 932 933 static driver_t als_driver = { 934 "pcm", 935 als_methods, 936 PCM_SOFTC_SIZE, 937 }; 938 939 DRIVER_MODULE(snd_als4000, pci, als_driver, pcm_devclass, 0, 0); 940 MODULE_DEPEND(snd_als4000, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER); 941 MODULE_VERSION(snd_als4000, 1); 942