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