1 /* $NetBSD: esa.c,v 1.8 2002/01/23 11:27:59 pooka Exp $ */ 2 3 /* 4 * Copyright (c) 2001, 2002 Jared D. McNeill <jmcneill@invisible.yi.org> 5 * All rights reserved. 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. The name of the author may not be used to endorse or promote products 13 * derived from this software without specific prior written permission. 14 * 15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, 20 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 21 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED 22 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, 23 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 25 * SUCH DAMAGE. 26 */ 27 28 /* 29 * ESS Allegro-1 / Maestro3 Audio Driver 30 * 31 * Based on the FreeBSD maestro3 driver and the NetBSD eap driver. 32 * Original driver by Don Kim. 33 */ 34 35 #include <sys/types.h> 36 #include <sys/errno.h> 37 #include <sys/null.h> 38 #include <sys/param.h> 39 #include <sys/systm.h> 40 #include <sys/malloc.h> 41 #include <sys/device.h> 42 #include <sys/conf.h> 43 #include <sys/exec.h> 44 #include <sys/select.h> 45 #include <sys/audioio.h> 46 47 #include <machine/bus.h> 48 #include <machine/intr.h> 49 50 #include <dev/pci/pcidevs.h> 51 #include <dev/pci/pcivar.h> 52 53 #include <dev/audio_if.h> 54 #include <dev/mulaw.h> 55 #include <dev/auconv.h> 56 #include <dev/ic/ac97var.h> 57 #include <dev/ic/ac97reg.h> 58 59 #include <dev/pci/esareg.h> 60 #include <dev/pci/esadsp.h> 61 #include <dev/pci/esavar.h> 62 63 #define PCI_CBIO 0x10 64 65 #define ESA_DAC_DATA 0x1100 66 67 enum { 68 ESS_ALLEGRO1, 69 ESS_MAESTRO3 70 }; 71 72 static struct esa_card_type { 73 u_int16_t pci_vendor_id; 74 u_int16_t pci_product_id; 75 int type; 76 int delay1, delay2; 77 } esa_card_types[] = { 78 { PCI_VENDOR_ESSTECH, PCI_PRODUCT_ESSTECH_ALLEGRO1, 79 ESS_ALLEGRO1, 50, 800 }, 80 { PCI_VENDOR_ESSTECH, PCI_PRODUCT_ESSTECH_MAESTRO3, 81 ESS_MAESTRO3, 20, 500 }, 82 { PCI_VENDOR_ESSTECH, PCI_PRODUCT_ESSTECH_MAESTRO3_2, 83 ESS_MAESTRO3, 20, 500 }, 84 { 0, 0, 0, 0, 0 } 85 }; 86 87 struct audio_device esa_device = { 88 "ESS Allegro", 89 "", 90 "esa" 91 }; 92 93 int esa_match(struct device *, struct cfdata *, void *); 94 void esa_attach(struct device *, struct device *, void *); 95 int esa_detach(struct device *, int); 96 97 /* audio(9) functions */ 98 int esa_open(void *, int); 99 void esa_close(void *); 100 int esa_query_encoding(void *, struct audio_encoding *); 101 int esa_set_params(void *, int, int, struct audio_params *, 102 struct audio_params *); 103 int esa_round_blocksize(void *, int); 104 int esa_init_output(void *, void *, int); 105 int esa_halt_output(void *); 106 int esa_halt_input(void *); 107 int esa_set_port(void *, mixer_ctrl_t *); 108 int esa_get_port(void *, mixer_ctrl_t *); 109 int esa_query_devinfo(void *, mixer_devinfo_t *); 110 void * esa_malloc(void *, int, size_t, int, int); 111 void esa_free(void *, void *, int); 112 int esa_getdev(void *, struct audio_device *); 113 size_t esa_round_buffersize(void *, int, size_t); 114 int esa_get_props(void *); 115 int esa_trigger_output(void *, void *, void *, int, 116 void (*)(void *), void *, 117 struct audio_params *); 118 int esa_trigger_input(void *, void *, void *, int, 119 void (*)(void *), void *, 120 struct audio_params *); 121 122 int esa_intr(void *); 123 int esa_allocmem(struct esa_softc *, size_t, size_t, 124 struct esa_dma *); 125 int esa_freemem(struct esa_softc *, struct esa_dma *); 126 paddr_t esa_mappage(void *addr, void *mem, off_t off, int prot); 127 128 /* Supporting subroutines */ 129 u_int16_t esa_read_assp(struct esa_softc *, u_int16_t, u_int16_t); 130 void esa_write_assp(struct esa_softc *, u_int16_t, u_int16_t, 131 u_int16_t); 132 int esa_init_codec(struct esa_softc *); 133 int esa_attach_codec(void *, struct ac97_codec_if *); 134 int esa_read_codec(void *, u_int8_t, u_int16_t *); 135 int esa_write_codec(void *, u_int8_t, u_int16_t); 136 void esa_reset_codec(void *); 137 enum ac97_host_flags esa_flags_codec(void *); 138 int esa_wait(struct esa_softc *); 139 int esa_init(struct esa_softc *); 140 void esa_config(struct esa_softc *); 141 u_int8_t esa_assp_halt(struct esa_softc *); 142 void esa_codec_reset(struct esa_softc *); 143 int esa_amp_enable(struct esa_softc *); 144 void esa_enable_interrupts(struct esa_softc *); 145 u_int32_t esa_get_pointer(struct esa_softc *, struct esa_channel *); 146 147 /* power management */ 148 int esa_power(struct esa_softc *, int); 149 void esa_powerhook(int, void *); 150 int esa_suspend(struct esa_softc *); 151 int esa_resume(struct esa_softc *); 152 153 struct device * audio_attach_mi_lkm(struct audio_hw_if *, void *, 154 struct device *); 155 156 static audio_encoding_t esa_encoding[] = { 157 { 0, AudioEulinear, AUDIO_ENCODING_ULINEAR, 8, 0 }, 158 { 1, AudioEmulaw, AUDIO_ENCODING_ULAW, 8, 159 AUDIO_ENCODINGFLAG_EMULATED }, 160 { 2, AudioEalaw, AUDIO_ENCODING_ALAW, 8, AUDIO_ENCODINGFLAG_EMULATED }, 161 { 3, AudioEslinear, AUDIO_ENCODING_SLINEAR, 8, 162 AUDIO_ENCODINGFLAG_EMULATED }, /* XXX: Are you sure? */ 163 { 4, AudioEslinear_le, AUDIO_ENCODING_SLINEAR_LE, 16, 0 }, 164 { 5, AudioEulinear_le, AUDIO_ENCODING_ULINEAR_LE, 16, 165 AUDIO_ENCODINGFLAG_EMULATED }, 166 { 6, AudioEslinear_be, AUDIO_ENCODING_SLINEAR_BE, 16, 167 AUDIO_ENCODINGFLAG_EMULATED }, 168 { 7, AudioEulinear_be, AUDIO_ENCODING_ULINEAR_BE, 16, 169 AUDIO_ENCODINGFLAG_EMULATED } 170 }; 171 172 #define ESA_NENCODINGS 8 173 174 struct audio_hw_if esa_hw_if = { 175 esa_open, 176 esa_close, 177 NULL, /* drain */ 178 esa_query_encoding, 179 esa_set_params, 180 esa_round_blocksize, 181 NULL, /* commit_settings */ 182 esa_init_output, 183 NULL, /* esa_init_input */ 184 NULL, /* start_output */ 185 NULL, /* start_input */ 186 esa_halt_output, 187 esa_halt_input, 188 NULL, /* speaker_ctl */ 189 esa_getdev, 190 NULL, /* getfd */ 191 esa_set_port, 192 esa_get_port, 193 esa_query_devinfo, 194 esa_malloc, 195 esa_free, 196 esa_round_buffersize, 197 esa_mappage, 198 esa_get_props, 199 esa_trigger_output, 200 esa_trigger_input 201 }; 202 203 struct cfattach esa_ca = { 204 sizeof(struct esa_softc), esa_match, esa_attach, 205 esa_detach, /*esa_activate*/ NULL 206 }; 207 208 /* 209 * audio(9) functions 210 */ 211 212 int 213 esa_open(void *hdl, int flags) 214 { 215 216 return (0); 217 } 218 219 void 220 esa_close(void *hdl) 221 { 222 223 return; 224 } 225 226 int 227 esa_query_encoding(void *hdl, struct audio_encoding *ae) 228 { 229 230 if (ae->index < 0 || ae->index >= ESA_NENCODINGS) 231 return (EINVAL); 232 *ae = esa_encoding[ae->index]; 233 234 return (0); 235 } 236 237 int 238 esa_set_params(void *hdl, int setmode, int usemode, struct audio_params *play, 239 struct audio_params *rec) 240 { 241 struct esa_softc *sc = hdl; 242 struct esa_channel *ch; 243 struct audio_params *p; 244 u_int32_t data; 245 u_int32_t freq; 246 int mode; 247 248 for (mode = AUMODE_RECORD; mode != -1; 249 mode = (mode == AUMODE_RECORD) ? AUMODE_PLAY : -1) { 250 if ((setmode & mode) == 0) 251 continue; 252 253 switch (mode) { 254 case AUMODE_PLAY: 255 p = play; 256 ch = &sc->play; 257 break; 258 case AUMODE_RECORD: 259 p = rec; 260 ch = &sc->rec; 261 break; 262 } 263 264 if (p->sample_rate < ESA_MINRATE || 265 p->sample_rate > ESA_MAXRATE || 266 (p->precision != 8 && p->precision != 16) || 267 (p->channels < 1 && p->channels > 2)) 268 return (EINVAL); 269 270 p->factor = 1; 271 p->sw_code = 0; 272 273 switch(p->encoding) { 274 case AUDIO_ENCODING_SLINEAR_BE: 275 if (p->precision == 16) 276 p->sw_code = swap_bytes; 277 else 278 p->sw_code = change_sign8; 279 break; 280 case AUDIO_ENCODING_SLINEAR_LE: 281 if (p->precision != 16) 282 p->sw_code = change_sign8; 283 break; 284 case AUDIO_ENCODING_ULINEAR_BE: 285 if (p->precision == 16) { 286 if (mode == AUMODE_PLAY) 287 p->sw_code = 288 swap_bytes_change_sign16_le; 289 else 290 p->sw_code = 291 change_sign16_swap_bytes_le; 292 } 293 break; 294 case AUDIO_ENCODING_ULINEAR_LE: 295 if (p->precision == 16) 296 p->sw_code = change_sign16_le; 297 break; 298 case AUDIO_ENCODING_ULAW: 299 if (mode == AUMODE_PLAY) { 300 p->factor = 2; 301 p->sw_code = mulaw_to_slinear16_le; 302 } else 303 p->sw_code = ulinear8_to_mulaw; 304 break; 305 case AUDIO_ENCODING_ALAW: 306 if (mode == AUMODE_PLAY) { 307 p->factor = 2; 308 p->sw_code = alaw_to_slinear16_le; 309 } else 310 p->sw_code = ulinear8_to_alaw; 311 break; 312 default: 313 return (EINVAL); 314 } 315 316 if (p->channels == 1) 317 data = 1; 318 else 319 data = 0; 320 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 321 ch->data_offset + ESA_SRC3_MODE_OFFSET, 322 data); 323 324 if (play->precision * play->factor == 8) 325 data = 1; 326 else 327 data = 0; 328 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 329 ch->data_offset + ESA_SRC3_WORD_LENGTH_OFFSET, 330 data); 331 332 if ((freq = ((p->sample_rate << 15) + 24000) / 48000) != 0) { 333 freq--; 334 } 335 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 336 ch->data_offset + ESA_CDATA_FREQUENCY, freq); 337 } 338 339 return (0); 340 } 341 342 int 343 esa_round_blocksize(void *hdl, int bs) 344 { 345 struct esa_softc *sc = hdl; 346 347 sc->play.blksize = sc->rec.blksize = 4096; 348 349 return (sc->play.blksize); 350 } 351 352 int 353 esa_init_output(void *hdl, void *buffer, int size) 354 { 355 356 return (0); 357 } 358 359 int 360 esa_halt_output(void *hdl) 361 { 362 struct esa_softc *sc = hdl; 363 364 if (sc->play.active == 0) 365 return (0); 366 367 sc->play.active = 0; 368 369 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 370 ESA_KDATA_INSTANCE0_MINISRC, 0); 371 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_DMA_XFER0, 0); 372 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_MIXER_XFER0, 0); 373 374 return (0); 375 } 376 377 int 378 esa_halt_input(void *hdl) 379 { 380 struct esa_softc *sc = hdl; 381 bus_space_tag_t iot = sc->sc_iot; 382 bus_space_handle_t ioh = sc->sc_ioh; 383 u_int32_t data; 384 385 if (sc->rec.active == 0) 386 return (0); 387 388 sc->rec.active = 0; 389 390 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 391 ESA_KDATA_TIMER_COUNT_RELOAD, 0); 392 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_TIMER_COUNT_CURRENT, 0); 393 data = bus_space_read_2(iot, ioh, ESA_HOST_INT_CTRL); 394 bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL, data & ~ESA_CLKRUN_GEN_ENABLE); 395 396 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, sc->rec.data_offset + 397 ESA_CDATA_INSTANCE_READY, 0); 398 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_ADC1_REQUEST, 0); 399 400 return (0); 401 } 402 403 void * 404 esa_malloc(void *hdl, int direction, size_t size, int type, int flags) 405 { 406 struct esa_softc *sc = hdl; 407 struct esa_dma *p; 408 int error; 409 410 p = malloc(sizeof(*p), type, flags); 411 if (!p) 412 return (0); 413 error = esa_allocmem(sc, size, 16, p); 414 if (error) { 415 free(p, type); 416 printf("%s: esa_malloc: not enough memory\n", 417 sc->sc_dev.dv_xname); 418 return (0); 419 } 420 p->next = sc->sc_dmas; 421 sc->sc_dmas = p; 422 423 return (KERNADDR(p)); 424 } 425 426 void 427 esa_free(void *hdl, void *addr, int type) 428 { 429 struct esa_softc *sc = hdl; 430 struct esa_dma *p; 431 struct esa_dma **pp; 432 433 for (pp = &sc->sc_dmas; (p = *pp) != NULL; pp = &p->next) 434 if (KERNADDR(p) == addr) { 435 esa_freemem(sc, p); 436 *pp = p->next; 437 free(p, type); 438 return; 439 } 440 } 441 442 int 443 esa_getdev(void *hdl, struct audio_device *ret) 444 { 445 446 *ret = esa_device; 447 448 return (0); 449 } 450 451 int 452 esa_set_port(void *hdl, mixer_ctrl_t *mc) 453 { 454 struct esa_softc *sc = hdl; 455 456 return (sc->codec_if->vtbl->mixer_set_port(sc->codec_if, mc)); 457 } 458 459 int 460 esa_get_port(void *hdl, mixer_ctrl_t *mc) 461 { 462 struct esa_softc *sc = hdl; 463 464 return (sc->codec_if->vtbl->mixer_get_port(sc->codec_if, mc)); 465 } 466 467 int 468 esa_query_devinfo(void *hdl, mixer_devinfo_t *di) 469 { 470 struct esa_softc *sc = hdl; 471 472 return (sc->codec_if->vtbl->query_devinfo(sc->codec_if, di)); 473 } 474 475 size_t 476 esa_round_buffersize(void *hdl, int direction, size_t bufsize) 477 { 478 struct esa_softc *sc = hdl; 479 480 sc->play.bufsize = sc->rec.bufsize = 65536; 481 482 return (sc->play.bufsize); 483 } 484 485 int 486 esa_get_props(void *hdl) 487 { 488 489 return (AUDIO_PROP_MMAP | AUDIO_PROP_INDEPENDENT | AUDIO_PROP_FULLDUPLEX); 490 } 491 492 int 493 esa_trigger_output(void *hdl, void *start, void *end, int blksize, 494 void (*intr)(void *), void *intrarg, 495 struct audio_params *param) 496 { 497 struct esa_softc *sc = hdl; 498 struct esa_dma *p; 499 bus_space_tag_t iot = sc->sc_iot; 500 bus_space_handle_t ioh = sc->sc_ioh; 501 u_int32_t data; 502 u_int32_t bufaddr; 503 u_int32_t i; 504 size_t size; 505 int data_bytes = (((ESA_MINISRC_TMP_BUFFER_SIZE & ~1) + 506 (ESA_MINISRC_IN_BUFFER_SIZE & ~1) + 507 (ESA_MINISRC_OUT_BUFFER_SIZE & ~1) + 4) + 255) 508 &~ 255; 509 int dac_data = ESA_DAC_DATA + data_bytes; 510 int dsp_in_size = ESA_MINISRC_IN_BUFFER_SIZE - (0x20 * 2); 511 int dsp_out_size = ESA_MINISRC_OUT_BUFFER_SIZE - (0x20 * 2); 512 int dsp_in_buf = dac_data + (ESA_MINISRC_TMP_BUFFER_SIZE / 2); 513 int dsp_out_buf = dsp_in_buf + (dsp_in_size / 2) + 1; 514 sc->play.data_offset = dac_data; 515 516 if (sc->play.active) 517 return (EINVAL); 518 519 for (p = sc->sc_dmas; p && KERNADDR(p) != start; p = p->next) 520 ; 521 if (!p) { 522 printf("%s: esa_trigger_output: bad addr %p\n", 523 sc->sc_dev.dv_xname, start); 524 return (EINVAL); 525 } 526 527 sc->play.active = 1; 528 sc->play.intr = intr; 529 sc->play.arg = intrarg; 530 sc->play.pos = 0; 531 sc->play.count = 0; 532 sc->play.buf = start; 533 size = (size_t)(((caddr_t)end - (caddr_t)start)); 534 bufaddr = DMAADDR(p); 535 sc->play.start = bufaddr; 536 537 #define LO(x) ((x) & 0x0000ffff) 538 #define HI(x) ((x) >> 16) 539 540 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 541 ESA_CDATA_HOST_SRC_ADDRL, LO(bufaddr)); 542 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 543 ESA_CDATA_HOST_SRC_ADDRH, HI(bufaddr)); 544 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 545 ESA_CDATA_HOST_SRC_END_PLUS_1L, LO(bufaddr + size)); 546 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 547 ESA_CDATA_HOST_SRC_END_PLUS_1H, HI(bufaddr + size)); 548 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 549 ESA_CDATA_HOST_SRC_CURRENTL, LO(bufaddr)); 550 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 551 ESA_CDATA_HOST_SRC_CURRENTH, HI(bufaddr)); 552 553 /* DSP buffers */ 554 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 555 ESA_CDATA_IN_BUF_BEGIN, dsp_in_buf); 556 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 557 ESA_CDATA_IN_BUF_END_PLUS_1, dsp_in_buf + (dsp_in_size / 2)); 558 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 559 ESA_CDATA_IN_BUF_HEAD, dsp_in_buf); 560 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 561 ESA_CDATA_IN_BUF_TAIL, dsp_in_buf); 562 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 563 ESA_CDATA_OUT_BUF_BEGIN, dsp_out_buf); 564 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 565 ESA_CDATA_OUT_BUF_END_PLUS_1, dsp_out_buf + (dsp_out_size / 2)); 566 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 567 ESA_CDATA_OUT_BUF_HEAD, dsp_out_buf); 568 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 569 ESA_CDATA_OUT_BUF_TAIL, dsp_out_buf); 570 571 /* Some per-client initializers */ 572 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 573 ESA_SRC3_DIRECTION_OFFSET + 12, dac_data + 40 + 8); 574 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 575 ESA_SRC3_DIRECTION_OFFSET + 19, 0x400 + ESA_MINISRC_COEF_LOC); 576 /* Enable or disable low-pass filter? (0xff if rate > 45000) */ 577 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 578 ESA_SRC3_DIRECTION_OFFSET + 22, 0); 579 /* Tell it which way DMA is going */ 580 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 581 ESA_CDATA_DMA_CONTROL, 582 ESA_DMACONTROL_AUTOREPEAT + ESA_DMAC_PAGE3_SELECTOR + 583 ESA_DMAC_BLOCKF_SELECTOR); 584 585 /* Set an armload of static initializers */ 586 for (i = 0; i < (sizeof(esa_playvals) / sizeof(esa_playvals[0])); i++) 587 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 588 esa_playvals[i].addr, esa_playvals[i].val); 589 590 /* Put us in the packed task lists */ 591 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 592 ESA_KDATA_INSTANCE0_MINISRC, 593 dac_data >> ESA_DP_SHIFT_COUNT); 594 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_DMA_XFER0, 595 dac_data >> ESA_DP_SHIFT_COUNT); 596 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_MIXER_XFER0, 597 dac_data >> ESA_DP_SHIFT_COUNT); 598 #undef LO 599 #undef HI 600 601 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 602 ESA_KDATA_TIMER_COUNT_RELOAD, 240); 603 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 604 ESA_KDATA_TIMER_COUNT_CURRENT, 240); 605 data = bus_space_read_2(iot, ioh, ESA_HOST_INT_CTRL); 606 bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL, 607 data | ESA_CLKRUN_GEN_ENABLE); 608 609 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, dac_data + 610 ESA_CDATA_INSTANCE_READY, 1); 611 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 612 ESA_KDATA_MIXER_TASK_NUMBER, 1); 613 614 return (0); 615 } 616 617 int 618 esa_trigger_input(void *hdl, void *start, void *end, int blksize, 619 void (*intr)(void *), void *intrarg, 620 struct audio_params *param) 621 { 622 struct esa_softc *sc = hdl; 623 struct esa_dma *p; 624 bus_space_tag_t iot = sc->sc_iot; 625 bus_space_handle_t ioh = sc->sc_ioh; 626 u_int32_t data; 627 u_int32_t bufaddr; 628 u_int32_t i; 629 size_t size; 630 int data_bytes = (((ESA_MINISRC_TMP_BUFFER_SIZE & ~1) + 631 (ESA_MINISRC_IN_BUFFER_SIZE & ~1) + 632 (ESA_MINISRC_OUT_BUFFER_SIZE & ~1) + 4) + 255) 633 &~ 255; 634 int adc_data = ESA_DAC_DATA + data_bytes + (data_bytes / 2); 635 int dsp_in_size = ESA_MINISRC_IN_BUFFER_SIZE - (0x10 * 2); 636 int dsp_out_size = ESA_MINISRC_OUT_BUFFER_SIZE - (0x10 * 2); 637 int dsp_in_buf = adc_data + (ESA_MINISRC_TMP_BUFFER_SIZE / 2); 638 int dsp_out_buf = dsp_in_buf + (dsp_in_size / 2) + 1; 639 sc->rec.data_offset = adc_data; 640 641 if (sc->rec.active) 642 return (EINVAL); 643 644 for (p = sc->sc_dmas; p && KERNADDR(p) != start; p = p->next) 645 ; 646 if (!p) { 647 printf("%s: esa_trigger_input: bad addr %p\n", 648 sc->sc_dev.dv_xname, start); 649 return (EINVAL); 650 } 651 652 sc->rec.active = 1; 653 sc->rec.intr = intr; 654 sc->rec.arg = intrarg; 655 sc->rec.pos = 0; 656 sc->rec.count = 0; 657 sc->rec.buf = start; 658 size = (size_t)(((caddr_t)end - (caddr_t)start)); 659 bufaddr = DMAADDR(p); 660 sc->rec.start = bufaddr; 661 662 #define LO(x) ((x) & 0x0000ffff) 663 #define HI(x) ((x) >> 16) 664 665 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 666 ESA_CDATA_HOST_SRC_ADDRL, LO(bufaddr)); 667 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 668 ESA_CDATA_HOST_SRC_ADDRH, HI(bufaddr)); 669 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 670 ESA_CDATA_HOST_SRC_END_PLUS_1L, LO(bufaddr + size)); 671 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 672 ESA_CDATA_HOST_SRC_END_PLUS_1H, HI(bufaddr + size)); 673 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 674 ESA_CDATA_HOST_SRC_CURRENTL, LO(bufaddr)); 675 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 676 ESA_CDATA_HOST_SRC_CURRENTH, HI(bufaddr)); 677 678 /* DSP buffers */ 679 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 680 ESA_CDATA_IN_BUF_BEGIN, dsp_in_buf); 681 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 682 ESA_CDATA_IN_BUF_END_PLUS_1, dsp_in_buf + (dsp_in_size / 2)); 683 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 684 ESA_CDATA_IN_BUF_HEAD, dsp_in_buf); 685 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 686 ESA_CDATA_IN_BUF_TAIL, dsp_in_buf); 687 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 688 ESA_CDATA_OUT_BUF_BEGIN, dsp_out_buf); 689 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 690 ESA_CDATA_OUT_BUF_END_PLUS_1, dsp_out_buf + (dsp_out_size / 2)); 691 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 692 ESA_CDATA_OUT_BUF_HEAD, dsp_out_buf); 693 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 694 ESA_CDATA_OUT_BUF_TAIL, dsp_out_buf); 695 696 /* Some per-client initializers */ 697 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 698 ESA_SRC3_DIRECTION_OFFSET + 12, adc_data + 40 + 8); 699 /* Tell it which way DMA is going */ 700 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 701 ESA_CDATA_DMA_CONTROL, 702 ESA_DMACONTROL_DIRECTION + ESA_DMACONTROL_AUTOREPEAT + 703 ESA_DMAC_PAGE3_SELECTOR + ESA_DMAC_BLOCKF_SELECTOR); 704 705 /* Set an armload of static initializers */ 706 for (i = 0; i < (sizeof(esa_recvals) / sizeof(esa_recvals[0])); i++) 707 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 708 esa_recvals[i].addr, esa_recvals[i].val); 709 710 /* Put us in the packed task lists */ 711 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 712 ESA_KDATA_INSTANCE0_MINISRC, 713 adc_data >> ESA_DP_SHIFT_COUNT); 714 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_DMA_XFER0, 715 adc_data >> ESA_DP_SHIFT_COUNT); 716 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_ADC1_XFER0, 717 adc_data >> ESA_DP_SHIFT_COUNT); 718 #undef LO 719 #undef HI 720 721 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 722 ESA_KDATA_TIMER_COUNT_RELOAD, 240); 723 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 724 ESA_KDATA_TIMER_COUNT_CURRENT, 240); 725 data = bus_space_read_2(iot, ioh, ESA_HOST_INT_CTRL); 726 bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL, 727 data | ESA_CLKRUN_GEN_ENABLE); 728 729 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_ADC1_REQUEST, 1); 730 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, adc_data + 731 ESA_CDATA_INSTANCE_READY, 1); 732 733 return (0); 734 } 735 736 /* Interrupt handler */ 737 738 int 739 esa_intr(void *hdl) 740 { 741 struct esa_softc *sc = hdl; 742 bus_space_tag_t iot = sc->sc_iot; 743 bus_space_handle_t ioh = sc->sc_ioh; 744 u_int32_t status, ctl; 745 u_int32_t pos; 746 u_int32_t diff; 747 u_int32_t play_blksize = sc->play.blksize; 748 u_int32_t play_bufsize = sc->play.bufsize; 749 u_int32_t rec_blksize = sc->rec.blksize; 750 u_int32_t rec_bufsize = sc->rec.bufsize; 751 752 status = bus_space_read_1(iot, ioh, ESA_HOST_INT_STATUS); 753 if (!status) 754 return (0); 755 756 /* ack the interrupt */ 757 bus_space_write_1(iot, ioh, ESA_HOST_INT_STATUS, 0xff); 758 759 if (status & ESA_HV_INT_PENDING) { 760 u_int8_t event; 761 762 printf("%s: hardware volume interrupt\n", sc->sc_dev.dv_xname); 763 event = bus_space_read_1(iot, ioh, ESA_HW_VOL_COUNTER_MASTER); 764 switch(event) { 765 case 0x99: 766 case 0xaa: 767 case 0x66: 768 case 0x88: 769 printf("%s: esa_intr: FIXME\n", sc->sc_dev.dv_xname); 770 break; 771 default: 772 printf("%s: unknown hwvol event 0x%02x\n", 773 sc->sc_dev.dv_xname, event); 774 break; 775 } 776 bus_space_write_1(iot, ioh, ESA_HW_VOL_COUNTER_MASTER, 0x88); 777 } 778 779 if (status & ESA_ASSP_INT_PENDING) { 780 ctl = bus_space_read_1(iot, ioh, ESA_ASSP_CONTROL_B); 781 if (!(ctl & ESA_STOP_ASSP_CLOCK)) { 782 ctl = bus_space_read_1(iot, ioh, 783 ESA_ASSP_HOST_INT_STATUS); 784 if (ctl & ESA_DSP2HOST_REQ_TIMER) { 785 bus_space_write_1(iot, ioh, 786 ESA_ASSP_HOST_INT_STATUS, 787 ESA_DSP2HOST_REQ_TIMER); 788 if (sc->play.active) { 789 pos = esa_get_pointer(sc, &sc->play) 790 % play_bufsize; 791 diff = (play_bufsize + pos - sc->play.pos) 792 % play_bufsize; 793 sc->play.pos = pos; 794 sc->play.count += diff; 795 while(sc->play.count >= play_blksize) { 796 sc->play.count -= play_blksize; 797 (*sc->play.intr)(sc->play.arg); 798 } 799 } 800 if (sc->rec.active) { 801 pos = esa_get_pointer(sc, &sc->rec) 802 % rec_bufsize; 803 diff = (rec_bufsize + pos - sc->rec.pos) 804 % rec_bufsize; 805 sc->rec.pos = pos; 806 sc->rec.count += diff; 807 while(sc->rec.count >= rec_blksize) { 808 sc->rec.count -= rec_blksize; 809 (*sc->rec.intr)(sc->rec.arg); 810 } 811 } 812 } 813 } 814 } 815 816 return (1); 817 } 818 819 int 820 esa_allocmem(struct esa_softc *sc, size_t size, size_t align, 821 struct esa_dma *p) 822 { 823 int error; 824 825 p->size = size; 826 error = bus_dmamem_alloc(sc->sc_dmat, p->size, align, 0, 827 p->segs, sizeof(p->segs) / sizeof(p->segs[0]), 828 &p->nsegs, BUS_DMA_NOWAIT); 829 if (error) 830 return (error); 831 832 error = bus_dmamem_map(sc->sc_dmat, p->segs, p->nsegs, p->size, 833 &p->addr, BUS_DMA_NOWAIT | BUS_DMA_COHERENT); 834 if (error) 835 goto free; 836 837 error = bus_dmamap_create(sc->sc_dmat, p->size, 1, p->size, 0, 838 BUS_DMA_NOWAIT, &p->map); 839 if (error) 840 goto unmap; 841 842 error = bus_dmamap_load(sc->sc_dmat, p->map, p->addr, p->size, NULL, 843 BUS_DMA_NOWAIT); 844 if (error) 845 goto destroy; 846 847 return (0); 848 849 destroy: 850 bus_dmamap_destroy(sc->sc_dmat, p->map); 851 unmap: 852 bus_dmamem_unmap(sc->sc_dmat, p->addr, p->size); 853 free: 854 bus_dmamem_free(sc->sc_dmat, p->segs, p->nsegs); 855 856 return (error); 857 } 858 859 int 860 esa_freemem(struct esa_softc *sc, struct esa_dma *p) 861 { 862 863 bus_dmamap_unload(sc->sc_dmat, p->map); 864 bus_dmamap_destroy(sc->sc_dmat, p->map); 865 bus_dmamem_unmap(sc->sc_dmat, p->addr, p->size); 866 bus_dmamem_free(sc->sc_dmat, p->segs, p->nsegs); 867 868 return (0); 869 } 870 871 /* 872 * Supporting Subroutines 873 */ 874 875 int 876 esa_match(struct device *dev, struct cfdata *match, void *aux) 877 { 878 struct pci_attach_args *pa = (struct pci_attach_args *)aux; 879 880 switch(PCI_VENDOR(pa->pa_id)) { 881 case PCI_VENDOR_ESSTECH: 882 switch(PCI_PRODUCT(pa->pa_id)) { 883 case PCI_PRODUCT_ESSTECH_ALLEGRO1: 884 case PCI_PRODUCT_ESSTECH_MAESTRO3: 885 case PCI_PRODUCT_ESSTECH_MAESTRO3_2: 886 return (1); 887 } 888 } 889 890 return (0); 891 } 892 893 void 894 esa_attach(struct device *parent, struct device *self, void *aux) 895 { 896 struct esa_softc *sc = (struct esa_softc *)self; 897 struct pci_attach_args *pa = (struct pci_attach_args *)aux; 898 pcitag_t tag = pa->pa_tag; 899 pci_chipset_tag_t pc = pa->pa_pc; 900 pci_intr_handle_t ih; 901 struct esa_card_type *card; 902 const char *intrstr; 903 u_int32_t data; 904 char devinfo[256]; 905 int revision, len; 906 907 pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo); 908 revision = PCI_REVISION(pa->pa_class); 909 printf(": %s (rev. 0x%02x)\n", devinfo, revision); 910 911 for (card = esa_card_types; card->pci_vendor_id; card++) 912 if (PCI_VENDOR(pa->pa_id) == card->pci_vendor_id && 913 PCI_PRODUCT(pa->pa_id) == card->pci_product_id) { 914 sc->type = card->type; 915 sc->delay1 = card->delay1; 916 sc->delay2 = card->delay2; 917 break; 918 } 919 920 data = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG); 921 data |= (PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MEM_ENABLE 922 | PCI_COMMAND_MASTER_ENABLE); 923 pci_conf_write(pc, tag, PCI_COMMAND_STATUS_REG, data); 924 925 /* Map I/O register */ 926 if (pci_mapreg_map(pa, PCI_CBIO, PCI_MAPREG_TYPE_IO, 0, 927 &sc->sc_iot, &sc->sc_ioh, &sc->sc_iob, &sc->sc_ios)) { 928 printf("%s: can't map i/o space\n", sc->sc_dev.dv_xname); 929 return; 930 } 931 932 /* Initialize softc */ 933 sc->sc_tag = tag; 934 sc->sc_pct = pc; 935 sc->sc_dmat = pa->pa_dmat; 936 937 /* Map and establish an interrupt */ 938 if (pci_intr_map(pa, &ih)) { 939 printf("%s: can't map interrupt\n", sc->sc_dev.dv_xname); 940 return; 941 } 942 intrstr = pci_intr_string(pc, ih); 943 sc->sc_ih = pci_intr_establish(pc, ih, IPL_AUDIO, esa_intr, self); 944 if (sc->sc_ih == NULL) { 945 printf("%s: can't establish interrupt", sc->sc_dev.dv_xname); 946 if (intrstr != NULL) 947 printf(" at %s", intrstr); 948 printf("\n"); 949 return; 950 } 951 printf("%s: interrupting at %s\n", sc->sc_dev.dv_xname, intrstr); 952 953 /* Power up chip */ 954 esa_power(sc, PCI_PMCSR_STATE_D0); 955 956 /* Init chip */ 957 if (esa_init(sc) == -1) { 958 printf("%s: esa_attach: unable to initialize the card\n", 959 sc->sc_dev.dv_xname); 960 return; 961 } 962 963 /* create suspend save area */ 964 len = sizeof(u_int16_t) * (ESA_REV_B_CODE_MEMORY_LENGTH 965 + ESA_REV_B_DATA_MEMORY_LENGTH + 1); 966 sc->savemem = (u_int16_t *)malloc(len, M_DEVBUF, M_NOWAIT | M_ZERO); 967 if (sc->savemem == NULL) { 968 printf("%s: unable to allocate suspend buffer\n", 969 sc->sc_dev.dv_xname); 970 return; 971 } 972 973 /* 974 * Every card I've seen has had their channels swapped with respect 975 * to the mixer. Ie: 976 * $ mixerctl -w outputs.master=0,191 977 * Would result in the _right_ speaker being turned off. 978 * 979 * So, we will swap the left and right mixer channels to compensate 980 * for this. 981 */ 982 sc->codec_flags |= AC97_HOST_SWAPPED_CHANNELS; 983 sc->codec_flags |= AC97_HOST_DONT_READ; 984 985 /* Attach AC97 host interface */ 986 sc->host_if.arg = self; 987 sc->host_if.attach = esa_attach_codec; 988 sc->host_if.read = esa_read_codec; 989 sc->host_if.write = esa_write_codec; 990 sc->host_if.reset = esa_reset_codec; 991 sc->host_if.flags = esa_flags_codec; 992 993 if (ac97_attach(&sc->host_if) != 0) 994 return; 995 996 sc->sc_audiodev = audio_attach_mi(&esa_hw_if, self, &sc->sc_dev); 997 998 sc->powerhook = powerhook_establish(esa_powerhook, sc); 999 if (sc->powerhook == NULL) 1000 printf("%s: WARNING: unable to establish powerhook\n", 1001 sc->sc_dev.dv_xname); 1002 1003 return; 1004 } 1005 1006 int 1007 esa_detach(struct device *self, int flags) 1008 { 1009 struct esa_softc *sc = (struct esa_softc *)self; 1010 int rv = 0; 1011 1012 if (sc->sc_audiodev != NULL) 1013 rv = config_detach(sc->sc_audiodev, flags); 1014 if (rv) 1015 return (rv); 1016 1017 if (sc->sc_ih != NULL) 1018 pci_intr_disestablish(sc->sc_pct, sc->sc_ih); 1019 if (sc->sc_ios) 1020 bus_space_unmap(sc->sc_iot, sc->sc_ioh, sc->sc_ios); 1021 1022 free(sc->savemem, M_DEVBUF); 1023 1024 return (0); 1025 } 1026 1027 u_int16_t 1028 esa_read_assp(struct esa_softc *sc, u_int16_t region, u_int16_t index) 1029 { 1030 u_int16_t data; 1031 bus_space_tag_t iot = sc->sc_iot; 1032 bus_space_handle_t ioh = sc->sc_ioh; 1033 1034 bus_space_write_2(iot, ioh, ESA_DSP_PORT_MEMORY_TYPE, 1035 region & ESA_MEMTYPE_MASK); 1036 bus_space_write_2(iot, ioh, ESA_DSP_PORT_MEMORY_INDEX, index); 1037 data = bus_space_read_2(iot, ioh, ESA_DSP_PORT_MEMORY_DATA); 1038 1039 return (data); 1040 } 1041 1042 void 1043 esa_write_assp(struct esa_softc *sc, u_int16_t region, u_int16_t index, 1044 u_int16_t data) 1045 { 1046 bus_space_tag_t iot = sc->sc_iot; 1047 bus_space_handle_t ioh = sc->sc_ioh; 1048 1049 bus_space_write_2(iot, ioh, ESA_DSP_PORT_MEMORY_TYPE, 1050 region & ESA_MEMTYPE_MASK); 1051 bus_space_write_2(iot, ioh, ESA_DSP_PORT_MEMORY_INDEX, index); 1052 bus_space_write_2(iot, ioh, ESA_DSP_PORT_MEMORY_DATA, data); 1053 1054 return; 1055 } 1056 1057 int 1058 esa_init_codec(struct esa_softc *sc) 1059 { 1060 bus_space_tag_t iot = sc->sc_iot; 1061 bus_space_handle_t ioh = sc->sc_ioh; 1062 u_int32_t data; 1063 1064 data = bus_space_read_1(iot, ioh, ESA_CODEC_COMMAND); 1065 1066 return ((data & 0x1) ? 0 : 1); 1067 } 1068 1069 int 1070 esa_attach_codec(void *aux, struct ac97_codec_if *codec_if) 1071 { 1072 struct esa_softc *sc = aux; 1073 1074 sc->codec_if = codec_if; 1075 1076 return (0); 1077 } 1078 1079 int 1080 esa_read_codec(void *aux, u_int8_t reg, u_int16_t *result) 1081 { 1082 struct esa_softc *sc = aux; 1083 bus_space_tag_t iot = sc->sc_iot; 1084 bus_space_handle_t ioh = sc->sc_ioh; 1085 1086 if (esa_wait(sc)) 1087 printf("%s: esa_read_codec: timed out\n", sc->sc_dev.dv_xname); 1088 bus_space_write_1(iot, ioh, ESA_CODEC_COMMAND, (reg & 0x7f) | 0x80); 1089 delay(50); 1090 if (esa_wait(sc)) 1091 printf("%s: esa_read_codec: timed out\n", sc->sc_dev.dv_xname); 1092 *result = bus_space_read_2(iot, ioh, ESA_CODEC_DATA); 1093 1094 return (0); 1095 } 1096 1097 int 1098 esa_write_codec(void *aux, u_int8_t reg, u_int16_t data) 1099 { 1100 struct esa_softc *sc = aux; 1101 bus_space_tag_t iot = sc->sc_iot; 1102 bus_space_handle_t ioh = sc->sc_ioh; 1103 1104 if (esa_wait(sc)) { 1105 printf("%s: esa_write_codec: timed out\n", sc->sc_dev.dv_xname); 1106 return (-1); 1107 } 1108 bus_space_write_2(iot, ioh, ESA_CODEC_DATA, data); 1109 bus_space_write_1(iot, ioh, ESA_CODEC_COMMAND, reg & 0x7f); 1110 delay(50); 1111 1112 return (0); 1113 } 1114 1115 void 1116 esa_reset_codec(void *aux) 1117 { 1118 1119 return; 1120 } 1121 1122 enum ac97_host_flags 1123 esa_flags_codec(void *aux) 1124 { 1125 struct esa_softc *sc = aux; 1126 1127 return (sc->codec_flags); 1128 } 1129 1130 int 1131 esa_wait(struct esa_softc *sc) 1132 { 1133 int i, val; 1134 bus_space_tag_t iot = sc->sc_iot; 1135 bus_space_handle_t ioh = sc->sc_ioh; 1136 1137 for (i = 0; i < 20; i++) { 1138 val = bus_space_read_1(iot, ioh, ESA_CODEC_STATUS); 1139 if ((val & 1) == 0) 1140 return (0); 1141 delay(2); 1142 } 1143 1144 return (-1); 1145 } 1146 1147 int 1148 esa_init(struct esa_softc *sc) 1149 { 1150 bus_space_tag_t iot = sc->sc_iot; 1151 bus_space_handle_t ioh = sc->sc_ioh; 1152 pcitag_t tag = sc->sc_tag; 1153 pci_chipset_tag_t pc = sc->sc_pct; 1154 u_int32_t data, i, size; 1155 u_int8_t reset_state; 1156 int data_bytes = (((ESA_MINISRC_TMP_BUFFER_SIZE & ~1) + 1157 (ESA_MINISRC_IN_BUFFER_SIZE & ~1) + 1158 (ESA_MINISRC_OUT_BUFFER_SIZE & ~1) + 4) + 255) 1159 &~ 255; 1160 1161 /* Disable legacy emulation */ 1162 data = pci_conf_read(pc, tag, PCI_LEGACY_AUDIO_CTRL); 1163 data |= DISABLE_LEGACY; 1164 pci_conf_write(pc, tag, PCI_LEGACY_AUDIO_CTRL, data); 1165 1166 esa_config(sc); 1167 1168 reset_state = esa_assp_halt(sc); 1169 1170 esa_init_codec(sc); 1171 esa_codec_reset(sc); 1172 1173 /* Zero kernel and mixer data */ 1174 size = ESA_REV_B_DATA_MEMORY_UNIT_LENGTH * ESA_NUM_UNITS_KERNEL_DATA; 1175 for (i = 0; i < size / 2; i++) { 1176 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 1177 ESA_KDATA_BASE_ADDR + i, 0); 1178 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 1179 ESA_KDATA_BASE_ADDR2 + i, 0); 1180 } 1181 1182 /* Init DMA pointer */ 1183 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_CURRENT_DMA, 1184 ESA_KDATA_DMA_XFER0); 1185 1186 /* Write kernel code into memory */ 1187 size = sizeof(esa_assp_kernel_image); 1188 for (i = 0; i < size / 2; i++) 1189 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_CODE, 1190 ESA_REV_B_CODE_MEMORY_BEGIN + i, esa_assp_kernel_image[i]); 1191 1192 size = sizeof(esa_assp_minisrc_image); 1193 for (i = 0; i < size / 2; i++) 1194 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_CODE, 0x400 + i, 1195 esa_assp_minisrc_image[i]); 1196 1197 /* Write the coefficients for the low pass filter */ 1198 size = sizeof(esa_minisrc_lpf_image); 1199 for (i = 0; i < size / 2; i++) 1200 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_CODE, 1201 0x400 + ESA_MINISRC_COEF_LOC + i, esa_minisrc_lpf_image[i]); 1202 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_CODE, 1203 0x400 + ESA_MINISRC_COEF_LOC + size, 0x8000); 1204 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_TASK0, 0x400); 1205 /* Init the mixer number */ 1206 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 1207 ESA_KDATA_MIXER_TASK_NUMBER, 0); 1208 /* Extreme kernel master volume */ 1209 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_DAC_LEFT_VOLUME, 1210 ESA_ARB_VOLUME); 1211 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, 1212 ESA_KDATA_DAC_RIGHT_VOLUME, ESA_ARB_VOLUME); 1213 1214 if (esa_amp_enable(sc)) 1215 return (-1); 1216 1217 /* Zero entire DAC/ADC area */ 1218 for (i = 0x1100; i < 0x1c00; i++) 1219 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, i, 0); 1220 1221 /* set some sane defaults */ 1222 sc->play.data_offset = ESA_DAC_DATA + data_bytes; 1223 sc->rec.data_offset = ESA_DAC_DATA + data_bytes + (data_bytes / 2); 1224 1225 esa_enable_interrupts(sc); 1226 1227 bus_space_write_1(iot, ioh, ESA_DSP_PORT_CONTROL_REG_B, 1228 reset_state | ESA_REGB_ENABLE_RESET); 1229 1230 return (0); 1231 } 1232 1233 void 1234 esa_config(struct esa_softc *sc) 1235 { 1236 bus_space_tag_t iot = sc->sc_iot; 1237 bus_space_handle_t ioh = sc->sc_ioh; 1238 pcitag_t tag = sc->sc_tag; 1239 pci_chipset_tag_t pc = sc->sc_pct; 1240 u_int32_t data; 1241 1242 data = pci_conf_read(pc, tag, ESA_PCI_ALLEGRO_CONFIG); 1243 data &= ESA_REDUCED_DEBOUNCE; 1244 data |= ESA_PM_CTRL_ENABLE | ESA_CLK_DIV_BY_49 | ESA_USE_PCI_TIMING; 1245 pci_conf_write(pc, tag, ESA_PCI_ALLEGRO_CONFIG, data); 1246 1247 bus_space_write_1(iot, ioh, ESA_ASSP_CONTROL_B, ESA_RESET_ASSP); 1248 data = pci_conf_read(pc, tag, ESA_PCI_ALLEGRO_CONFIG); 1249 data &= ~ESA_INT_CLK_SELECT; 1250 if (sc->type == ESS_MAESTRO3) { 1251 data &= ~ESA_INT_CLK_MULT_ENABLE; 1252 data |= ESA_INT_CLK_SRC_NOT_PCI; 1253 } 1254 data &= ~(ESA_CLK_MULT_MODE_SELECT | ESA_CLK_MULT_MODE_SELECT_2); 1255 pci_conf_write(pc, tag, ESA_PCI_ALLEGRO_CONFIG, data); 1256 1257 if (sc->type == ESS_ALLEGRO1) { 1258 data = pci_conf_read(pc, tag, ESA_PCI_USER_CONFIG); 1259 data |= ESA_IN_CLK_12MHZ_SELECT; 1260 pci_conf_write(pc, tag, ESA_PCI_USER_CONFIG, data); 1261 } 1262 1263 data = bus_space_read_1(iot, ioh, ESA_ASSP_CONTROL_A); 1264 data &= ~(ESA_DSP_CLK_36MHZ_SELECT | ESA_ASSP_CLK_49MHZ_SELECT); 1265 data |= ESA_ASSP_CLK_49MHZ_SELECT; /* XXX: Assumes 49MHz DSP */ 1266 data |= ESA_ASSP_0_WS_ENABLE; 1267 bus_space_write_1(iot, ioh, ESA_ASSP_CONTROL_A, data); 1268 1269 bus_space_write_1(iot, ioh, ESA_ASSP_CONTROL_B, ESA_RUN_ASSP); 1270 1271 return; 1272 } 1273 1274 u_int8_t 1275 esa_assp_halt(struct esa_softc *sc) 1276 { 1277 bus_space_tag_t iot = sc->sc_iot; 1278 bus_space_handle_t ioh = sc->sc_ioh; 1279 u_int8_t data, reset_state; 1280 1281 data = bus_space_read_1(iot, ioh, ESA_DSP_PORT_CONTROL_REG_B); 1282 reset_state = data & ~ESA_REGB_STOP_CLOCK; 1283 delay(10000); /* XXX use tsleep */ 1284 bus_space_write_1(iot, ioh, ESA_DSP_PORT_CONTROL_REG_B, 1285 reset_state & ~ESA_REGB_ENABLE_RESET); 1286 delay(10000); /* XXX use tsleep */ 1287 1288 return (reset_state); 1289 } 1290 1291 void 1292 esa_codec_reset(struct esa_softc *sc) 1293 { 1294 bus_space_tag_t iot = sc->sc_iot; 1295 bus_space_handle_t ioh = sc->sc_ioh; 1296 u_int16_t data, dir; 1297 int retry = 0; 1298 1299 do { 1300 data = bus_space_read_2(iot, ioh, ESA_GPIO_DIRECTION); 1301 dir = data | 0x10; /* assuming pci bus master? */ 1302 1303 /* remote codec config */ 1304 data = bus_space_read_2(iot, ioh, ESA_RING_BUS_CTRL_B); 1305 bus_space_write_2(iot, ioh, ESA_RING_BUS_CTRL_B, 1306 data & ~ESA_SECOND_CODEC_ID_MASK); 1307 data = bus_space_read_2(iot, ioh, ESA_SDO_OUT_DEST_CTRL); 1308 bus_space_write_2(iot, ioh, ESA_SDO_OUT_DEST_CTRL, 1309 data & ~ESA_COMMAND_ADDR_OUT); 1310 data = bus_space_read_2(iot, ioh, ESA_SDO_IN_DEST_CTRL); 1311 bus_space_write_2(iot, ioh, ESA_SDO_IN_DEST_CTRL, 1312 data & ~ESA_STATUS_ADDR_IN); 1313 1314 bus_space_write_2(iot, ioh, ESA_RING_BUS_CTRL_A, 1315 ESA_IO_SRAM_ENABLE); 1316 delay(20); 1317 1318 bus_space_write_2(iot, ioh, ESA_GPIO_DIRECTION, 1319 dir & ~ESA_GPO_PRIMARY_AC97); 1320 bus_space_write_2(iot, ioh, ESA_GPIO_MASK, 1321 ~ESA_GPO_PRIMARY_AC97); 1322 bus_space_write_2(iot, ioh, ESA_GPIO_DATA, 0); 1323 bus_space_write_2(iot, ioh, ESA_GPIO_DIRECTION, 1324 dir | ESA_GPO_PRIMARY_AC97); 1325 delay(sc->delay1 * 1000); 1326 bus_space_write_2(iot, ioh, ESA_GPIO_DATA, 1327 ESA_GPO_PRIMARY_AC97); 1328 delay(5); 1329 bus_space_write_2(iot, ioh, ESA_RING_BUS_CTRL_A, 1330 ESA_IO_SRAM_ENABLE | ESA_SERIAL_AC_LINK_ENABLE); 1331 bus_space_write_2(iot, ioh, ESA_GPIO_MASK, ~0); 1332 delay(sc->delay2 * 1000); 1333 1334 esa_read_codec(sc, 0x7c, &data); 1335 if ((data == 0) || (data == 0xffff)) { 1336 retry++; 1337 if (retry > 3) { 1338 printf("%s: esa_codec_reset: failed\n", 1339 sc->sc_dev.dv_xname); 1340 break; 1341 } 1342 printf("%s: esa_codec_reset: retrying\n", 1343 sc->sc_dev.dv_xname); 1344 } else 1345 retry = 0; 1346 } while (retry); 1347 1348 return; 1349 } 1350 1351 int 1352 esa_amp_enable(struct esa_softc *sc) 1353 { 1354 bus_space_tag_t iot = sc->sc_iot; 1355 bus_space_handle_t ioh = sc->sc_ioh; 1356 u_int32_t gpo, polarity_port, polarity; 1357 u_int16_t data; 1358 1359 switch (sc->type) { 1360 case ESS_ALLEGRO1: 1361 polarity_port = 0x1800; 1362 break; 1363 case ESS_MAESTRO3: 1364 polarity_port = 0x1100; 1365 break; 1366 default: 1367 printf("%s: esa_amp_enable: Unknown chip type!!!\n", 1368 sc->sc_dev.dv_xname); 1369 return (1); 1370 } 1371 1372 gpo = (polarity_port >> 8) & 0x0f; 1373 polarity = polarity_port >> 12; 1374 polarity = !polarity; /* Enable */ 1375 polarity = polarity << gpo; 1376 gpo = 1 << gpo; 1377 bus_space_write_2(iot, ioh, ESA_GPIO_MASK, ~gpo); 1378 data = bus_space_read_2(iot, ioh, ESA_GPIO_DIRECTION); 1379 bus_space_write_2(iot, ioh, ESA_GPIO_DIRECTION, data | gpo); 1380 data = ESA_GPO_SECONDARY_AC97 | ESA_GPO_PRIMARY_AC97 | polarity; 1381 bus_space_write_2(iot, ioh, ESA_GPIO_DATA, data); 1382 bus_space_write_2(iot, ioh, ESA_GPIO_MASK, ~0); 1383 1384 return (0); 1385 } 1386 1387 void 1388 esa_enable_interrupts(struct esa_softc *sc) 1389 { 1390 bus_space_tag_t iot = sc->sc_iot; 1391 bus_space_handle_t ioh = sc->sc_ioh; 1392 u_int8_t data; 1393 1394 bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL, 1395 ESA_ASSP_INT_ENABLE | ESA_HV_INT_ENABLE); 1396 data = bus_space_read_1(iot, ioh, ESA_ASSP_CONTROL_C); 1397 bus_space_write_1(iot, ioh, ESA_ASSP_CONTROL_C, 1398 data | ESA_ASSP_HOST_INT_ENABLE); 1399 } 1400 1401 int 1402 esa_power(struct esa_softc *sc, int state) 1403 { 1404 pcitag_t tag = sc->sc_tag; 1405 pci_chipset_tag_t pc = sc->sc_pct; 1406 pcireg_t data; 1407 int pmcapreg; 1408 1409 if (pci_get_capability(pc, tag, PCI_CAP_PWRMGMT, &pmcapreg, 0)) { 1410 data = pci_conf_read(pc, tag, pmcapreg + 4); 1411 if ((data && PCI_PMCSR_STATE_MASK) != state) 1412 pci_conf_write(pc, tag, pmcapreg + 4, state); 1413 } 1414 1415 return (0); 1416 } 1417 1418 void 1419 esa_powerhook(int why, void *hdl) 1420 { 1421 struct esa_softc *sc = (struct esa_softc *)hdl; 1422 1423 switch (why) { 1424 case PWR_SUSPEND: 1425 case PWR_STANDBY: 1426 esa_suspend(sc); 1427 break; 1428 case PWR_RESUME: 1429 esa_resume(sc); 1430 (sc->codec_if->vtbl->restore_ports)(sc->codec_if); 1431 break; 1432 } 1433 } 1434 1435 int 1436 esa_suspend(struct esa_softc *sc) 1437 { 1438 bus_space_tag_t iot = sc->sc_iot; 1439 bus_space_handle_t ioh = sc->sc_ioh; 1440 int x, i, index; 1441 1442 index = 0; 1443 1444 x = splaudio(); 1445 esa_halt_output(sc); 1446 delay(10000); 1447 splx(x); 1448 1449 bus_space_write_2(iot, ioh, ESA_HOST_INT_CTRL, 0); 1450 bus_space_write_1(iot, ioh, ESA_ASSP_CONTROL_C, 0); 1451 1452 esa_assp_halt(sc); 1453 1454 /* Save ASSP state */ 1455 for (i = ESA_REV_B_CODE_MEMORY_BEGIN; i <= ESA_REV_B_CODE_MEMORY_END; 1456 i++) 1457 sc->savemem[index++] = esa_read_assp(sc, 1458 ESA_MEMTYPE_INTERNAL_CODE, i); 1459 for (i = ESA_REV_B_DATA_MEMORY_BEGIN; i <= ESA_REV_B_DATA_MEMORY_END; 1460 i++) 1461 sc->savemem[index++] = esa_read_assp(sc, 1462 ESA_MEMTYPE_INTERNAL_DATA, i); 1463 1464 esa_power(sc, PCI_PMCSR_STATE_D3); 1465 1466 return (0); 1467 } 1468 1469 int 1470 esa_resume(struct esa_softc *sc) { 1471 bus_space_tag_t iot = sc->sc_iot; 1472 bus_space_handle_t ioh = sc->sc_ioh; 1473 int i, index; 1474 u_int8_t reset_state; 1475 1476 index = 0; 1477 1478 esa_power(sc, PCI_PMCSR_STATE_D0); 1479 delay(10000); 1480 1481 esa_config(sc); 1482 1483 reset_state = esa_assp_halt(sc); 1484 1485 /* restore ASSP */ 1486 for (i = ESA_REV_B_CODE_MEMORY_BEGIN; i <= ESA_REV_B_CODE_MEMORY_END; 1487 i++) 1488 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_CODE, i, 1489 sc->savemem[index++]); 1490 for (i = ESA_REV_B_DATA_MEMORY_BEGIN; i <= ESA_REV_B_DATA_MEMORY_END; 1491 i++) 1492 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, i, 1493 sc->savemem[index++]); 1494 1495 esa_write_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, ESA_KDATA_DMA_ACTIVE, 0); 1496 bus_space_write_1(iot, ioh, ESA_DSP_PORT_CONTROL_REG_B, 1497 reset_state | ESA_REGB_ENABLE_RESET); 1498 1499 esa_enable_interrupts(sc); 1500 esa_amp_enable(sc); 1501 1502 return (0); 1503 } 1504 1505 u_int32_t 1506 esa_get_pointer(struct esa_softc *sc, struct esa_channel *ch) 1507 { 1508 u_int16_t hi = 0, lo = 0; 1509 u_int32_t addr; 1510 int data_offset = ch->data_offset; 1511 1512 hi = esa_read_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, data_offset + 1513 ESA_CDATA_HOST_SRC_CURRENTH); 1514 lo = esa_read_assp(sc, ESA_MEMTYPE_INTERNAL_DATA, data_offset + 1515 ESA_CDATA_HOST_SRC_CURRENTL); 1516 1517 addr = lo | ((u_int32_t)hi << 16); 1518 return (addr - ch->start); 1519 } 1520 1521 paddr_t 1522 esa_mappage(void *addr, void *mem, off_t off, int prot) 1523 { 1524 struct esa_softc *sc = addr; 1525 struct esa_dma *p; 1526 1527 if (off < 0) 1528 return (-1); 1529 for (p = sc->sc_dmas; p && KERNADDR(p) != mem; p = p->next) 1530 ; 1531 if (!p) 1532 return (-1); 1533 return (bus_dmamem_mmap(sc->sc_dmat, p->segs, p->nsegs, 1534 off, prot, BUS_DMA_WAITOK)); 1535 } 1536