1 /*- 2 * Copyright (c) 1999 Cameron Grant <cg@freebsd.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 #ifdef HAVE_KERNEL_OPTION_HEADERS 28 #include "opt_snd.h" 29 #endif 30 31 #include <dev/sound/pcm/sound.h> 32 #include <dev/sound/pcm/ac97.h> 33 #include <dev/sound/pci/t4dwave.h> 34 35 #include <bus/pci/pcireg.h> 36 #include <bus/pci/pcivar.h> 37 38 SND_DECLARE_FILE("$FreeBSD: head/sys/dev/sound/pci/t4dwave.c 254263 2013-08-12 23:30:01Z scottl $"); 39 40 /* -------------------------------------------------------------------- */ 41 42 #define TDX_PCI_ID 0x20001023 43 #define TNX_PCI_ID 0x20011023 44 #define ALI_PCI_ID 0x545110b9 45 #define SPA_PCI_ID 0x70181039 46 47 #define TR_DEFAULT_BUFSZ 0x1000 48 /* For ALi M5451 the DMA transfer size appears to be fixed to 64k. */ 49 #define ALI_BUFSZ 0x10000 50 #define TR_BUFALGN 0x8 51 #define TR_TIMEOUT_CDC 0xffff 52 #define TR_MAXHWCH 64 53 #define ALI_MAXHWCH 32 54 #define TR_MAXPLAYCH 4 55 #define ALI_MAXPLAYCH 1 56 /* 57 * Though, it's not clearly documented in the 4DWAVE datasheet, the 58 * DX and NX chips can't handle DMA addresses located above 1GB as the 59 * LBA (loop begin address) register which holds the DMA base address 60 * is 32-bit, but the two MSBs are used for other purposes. 61 */ 62 #define TR_MAXADDR ((1U << 30) - 1) 63 #define ALI_MAXADDR ((1U << 31) - 1) 64 65 struct tr_info; 66 67 /* channel registers */ 68 struct tr_chinfo { 69 u_int32_t cso, alpha, fms, fmc, ec; 70 u_int32_t lba; 71 u_int32_t eso, delta; 72 u_int32_t rvol, cvol; 73 u_int32_t gvsel, pan, vol, ctrl; 74 u_int32_t active:1, was_active:1; 75 int index, bufhalf; 76 struct snd_dbuf *buffer; 77 struct pcm_channel *channel; 78 struct tr_info *parent; 79 }; 80 81 struct tr_rchinfo { 82 u_int32_t delta; 83 u_int32_t active:1, was_active:1; 84 struct snd_dbuf *buffer; 85 struct pcm_channel *channel; 86 struct tr_info *parent; 87 }; 88 89 /* device private data */ 90 struct tr_info { 91 u_int32_t type; 92 u_int32_t rev; 93 94 bus_space_tag_t st; 95 bus_space_handle_t sh; 96 bus_dma_tag_t parent_dmat; 97 98 struct resource *reg, *irq; 99 int regtype, regid, irqid; 100 void *ih; 101 102 struct lock *lock; 103 104 u_int32_t hwchns; 105 u_int32_t playchns; 106 unsigned int bufsz; 107 108 struct tr_chinfo chinfo[TR_MAXPLAYCH]; 109 struct tr_rchinfo recchinfo; 110 }; 111 112 /* -------------------------------------------------------------------- */ 113 114 static u_int32_t tr_recfmt[] = { 115 SND_FORMAT(AFMT_U8, 1, 0), 116 SND_FORMAT(AFMT_U8, 2, 0), 117 SND_FORMAT(AFMT_S8, 1, 0), 118 SND_FORMAT(AFMT_S8, 2, 0), 119 SND_FORMAT(AFMT_S16_LE, 1, 0), 120 SND_FORMAT(AFMT_S16_LE, 2, 0), 121 SND_FORMAT(AFMT_U16_LE, 1, 0), 122 SND_FORMAT(AFMT_U16_LE, 2, 0), 123 0 124 }; 125 static struct pcmchan_caps tr_reccaps = {4000, 48000, tr_recfmt, 0}; 126 127 static u_int32_t tr_playfmt[] = { 128 SND_FORMAT(AFMT_U8, 1, 0), 129 SND_FORMAT(AFMT_U8, 2, 0), 130 SND_FORMAT(AFMT_S8, 1, 0), 131 SND_FORMAT(AFMT_S8, 2, 0), 132 SND_FORMAT(AFMT_S16_LE, 1, 0), 133 SND_FORMAT(AFMT_S16_LE, 2, 0), 134 SND_FORMAT(AFMT_U16_LE, 1, 0), 135 SND_FORMAT(AFMT_U16_LE, 2, 0), 136 0 137 }; 138 static struct pcmchan_caps tr_playcaps = {4000, 48000, tr_playfmt, 0}; 139 140 /* -------------------------------------------------------------------- */ 141 142 /* Hardware */ 143 144 static u_int32_t 145 tr_rd(struct tr_info *tr, int regno, int size) 146 { 147 switch(size) { 148 case 1: 149 return bus_space_read_1(tr->st, tr->sh, regno); 150 case 2: 151 return bus_space_read_2(tr->st, tr->sh, regno); 152 case 4: 153 return bus_space_read_4(tr->st, tr->sh, regno); 154 default: 155 return 0xffffffff; 156 } 157 } 158 159 static void 160 tr_wr(struct tr_info *tr, int regno, u_int32_t data, int size) 161 { 162 switch(size) { 163 case 1: 164 bus_space_write_1(tr->st, tr->sh, regno, data); 165 break; 166 case 2: 167 bus_space_write_2(tr->st, tr->sh, regno, data); 168 break; 169 case 4: 170 bus_space_write_4(tr->st, tr->sh, regno, data); 171 break; 172 } 173 } 174 175 /* -------------------------------------------------------------------- */ 176 /* ac97 codec */ 177 178 static int 179 tr_rdcd(kobj_t obj, void *devinfo, int regno) 180 { 181 struct tr_info *tr = (struct tr_info *)devinfo; 182 int i, j, treg, trw; 183 184 switch (tr->type) { 185 case SPA_PCI_ID: 186 treg=SPA_REG_CODECRD; 187 trw=SPA_CDC_RWSTAT; 188 break; 189 case ALI_PCI_ID: 190 if (tr->rev > 0x01) 191 treg=TDX_REG_CODECWR; 192 else 193 treg=TDX_REG_CODECRD; 194 trw=TDX_CDC_RWSTAT; 195 break; 196 case TDX_PCI_ID: 197 treg=TDX_REG_CODECRD; 198 trw=TDX_CDC_RWSTAT; 199 break; 200 case TNX_PCI_ID: 201 treg=(regno & 0x100)? TNX_REG_CODEC2RD : TNX_REG_CODEC1RD; 202 trw=TNX_CDC_RWSTAT; 203 break; 204 default: 205 kprintf("!!! tr_rdcd defaulted !!!\n"); 206 return -1; 207 } 208 209 i = j = 0; 210 211 regno &= 0x7f; 212 snd_mtxlock(tr->lock); 213 if (tr->type == ALI_PCI_ID) { 214 u_int32_t chk1, chk2; 215 j = trw; 216 for (i = TR_TIMEOUT_CDC; (i > 0) && (j & trw); i--) 217 j = tr_rd(tr, treg, 4); 218 if (i > 0) { 219 chk1 = tr_rd(tr, 0xc8, 4); 220 chk2 = tr_rd(tr, 0xc8, 4); 221 for (i = TR_TIMEOUT_CDC; (i > 0) && (chk1 == chk2); 222 i--) 223 chk2 = tr_rd(tr, 0xc8, 4); 224 } 225 } 226 if (tr->type != ALI_PCI_ID || i > 0) { 227 tr_wr(tr, treg, regno | trw, 4); 228 j=trw; 229 for (i=TR_TIMEOUT_CDC; (i > 0) && (j & trw); i--) 230 j=tr_rd(tr, treg, 4); 231 } 232 snd_mtxunlock(tr->lock); 233 if (i == 0) kprintf("codec timeout during read of register %x\n", regno); 234 return (j >> TR_CDC_DATA) & 0xffff; 235 } 236 237 static int 238 tr_wrcd(kobj_t obj, void *devinfo, int regno, u_int32_t data) 239 { 240 struct tr_info *tr = (struct tr_info *)devinfo; 241 int i, j, treg, trw; 242 243 switch (tr->type) { 244 case SPA_PCI_ID: 245 treg=SPA_REG_CODECWR; 246 trw=SPA_CDC_RWSTAT; 247 break; 248 case ALI_PCI_ID: 249 case TDX_PCI_ID: 250 treg=TDX_REG_CODECWR; 251 trw=TDX_CDC_RWSTAT; 252 break; 253 case TNX_PCI_ID: 254 treg=TNX_REG_CODECWR; 255 trw=TNX_CDC_RWSTAT | ((regno & 0x100)? TNX_CDC_SEC : 0); 256 break; 257 default: 258 kprintf("!!! tr_wrcd defaulted !!!"); 259 return -1; 260 } 261 262 i = 0; 263 264 regno &= 0x7f; 265 #if 0 266 printf("tr_wrcd: reg %x was %x", regno, tr_rdcd(devinfo, regno)); 267 #endif 268 j=trw; 269 snd_mtxlock(tr->lock); 270 if (tr->type == ALI_PCI_ID) { 271 j = trw; 272 for (i = TR_TIMEOUT_CDC; (i > 0) && (j & trw); i--) 273 j = tr_rd(tr, treg, 4); 274 if (i > 0) { 275 u_int32_t chk1, chk2; 276 chk1 = tr_rd(tr, 0xc8, 4); 277 chk2 = tr_rd(tr, 0xc8, 4); 278 for (i = TR_TIMEOUT_CDC; (i > 0) && (chk1 == chk2); 279 i--) 280 chk2 = tr_rd(tr, 0xc8, 4); 281 } 282 } 283 if (tr->type != ALI_PCI_ID || i > 0) { 284 for (i=TR_TIMEOUT_CDC; (i>0) && (j & trw); i--) 285 j=tr_rd(tr, treg, 4); 286 if (tr->type == ALI_PCI_ID && tr->rev > 0x01) 287 trw |= 0x0100; 288 tr_wr(tr, treg, (data << TR_CDC_DATA) | regno | trw, 4); 289 } 290 #if 0 291 printf(" - wrote %x, now %x\n", data, tr_rdcd(devinfo, regno)); 292 #endif 293 snd_mtxunlock(tr->lock); 294 if (i==0) kprintf("codec timeout writing %x, data %x\n", regno, data); 295 return (i > 0)? 0 : -1; 296 } 297 298 static kobj_method_t tr_ac97_methods[] = { 299 KOBJMETHOD(ac97_read, tr_rdcd), 300 KOBJMETHOD(ac97_write, tr_wrcd), 301 KOBJMETHOD_END 302 }; 303 AC97_DECLARE(tr_ac97); 304 305 /* -------------------------------------------------------------------- */ 306 /* playback channel interrupts */ 307 308 #if 0 309 static u_int32_t 310 tr_testint(struct tr_chinfo *ch) 311 { 312 struct tr_info *tr = ch->parent; 313 int bank, chan; 314 315 bank = (ch->index & 0x20) ? 1 : 0; 316 chan = ch->index & 0x1f; 317 return tr_rd(tr, bank? TR_REG_ADDRINTB : TR_REG_ADDRINTA, 4) & (1 << chan); 318 } 319 #endif 320 321 static void 322 tr_clrint(struct tr_chinfo *ch) 323 { 324 struct tr_info *tr = ch->parent; 325 int bank, chan; 326 327 bank = (ch->index & 0x20) ? 1 : 0; 328 chan = ch->index & 0x1f; 329 tr_wr(tr, bank? TR_REG_ADDRINTB : TR_REG_ADDRINTA, 1 << chan, 4); 330 } 331 332 static void 333 tr_enaint(struct tr_chinfo *ch, int enable) 334 { 335 struct tr_info *tr = ch->parent; 336 u_int32_t i, reg; 337 int bank, chan; 338 339 snd_mtxlock(tr->lock); 340 bank = (ch->index & 0x20) ? 1 : 0; 341 chan = ch->index & 0x1f; 342 reg = bank? TR_REG_INTENB : TR_REG_INTENA; 343 344 i = tr_rd(tr, reg, 4); 345 i &= ~(1 << chan); 346 i |= (enable? 1 : 0) << chan; 347 348 tr_clrint(ch); 349 tr_wr(tr, reg, i, 4); 350 snd_mtxunlock(tr->lock); 351 } 352 353 /* playback channels */ 354 355 static void 356 tr_selch(struct tr_chinfo *ch) 357 { 358 struct tr_info *tr = ch->parent; 359 int i; 360 361 i = tr_rd(tr, TR_REG_CIR, 4); 362 i &= ~TR_CIR_MASK; 363 i |= ch->index & 0x3f; 364 tr_wr(tr, TR_REG_CIR, i, 4); 365 } 366 367 static void 368 tr_startch(struct tr_chinfo *ch) 369 { 370 struct tr_info *tr = ch->parent; 371 int bank, chan; 372 373 bank = (ch->index & 0x20) ? 1 : 0; 374 chan = ch->index & 0x1f; 375 tr_wr(tr, bank? TR_REG_STARTB : TR_REG_STARTA, 1 << chan, 4); 376 } 377 378 static void 379 tr_stopch(struct tr_chinfo *ch) 380 { 381 struct tr_info *tr = ch->parent; 382 int bank, chan; 383 384 bank = (ch->index & 0x20) ? 1 : 0; 385 chan = ch->index & 0x1f; 386 tr_wr(tr, bank? TR_REG_STOPB : TR_REG_STOPA, 1 << chan, 4); 387 } 388 389 static void 390 tr_wrch(struct tr_chinfo *ch) 391 { 392 struct tr_info *tr = ch->parent; 393 u_int32_t cr[TR_CHN_REGS], i; 394 395 ch->gvsel &= 0x00000001; 396 ch->fmc &= 0x00000003; 397 ch->fms &= 0x0000000f; 398 ch->ctrl &= 0x0000000f; 399 ch->pan &= 0x0000007f; 400 ch->rvol &= 0x0000007f; 401 ch->cvol &= 0x0000007f; 402 ch->vol &= 0x000000ff; 403 ch->ec &= 0x00000fff; 404 ch->alpha &= 0x00000fff; 405 ch->delta &= 0x0000ffff; 406 if (tr->type == ALI_PCI_ID) 407 ch->lba &= ALI_MAXADDR; 408 else 409 ch->lba &= TR_MAXADDR; 410 411 cr[1]=ch->lba; 412 cr[3]=(ch->fmc<<14) | (ch->rvol<<7) | (ch->cvol); 413 cr[4]=(ch->gvsel<<31) | (ch->pan<<24) | (ch->vol<<16) | (ch->ctrl<<12) | (ch->ec); 414 415 switch (tr->type) { 416 case SPA_PCI_ID: 417 case ALI_PCI_ID: 418 case TDX_PCI_ID: 419 ch->cso &= 0x0000ffff; 420 ch->eso &= 0x0000ffff; 421 cr[0]=(ch->cso<<16) | (ch->alpha<<4) | (ch->fms); 422 cr[2]=(ch->eso<<16) | (ch->delta); 423 break; 424 case TNX_PCI_ID: 425 ch->cso &= 0x00ffffff; 426 ch->eso &= 0x00ffffff; 427 cr[0]=((ch->delta & 0xff)<<24) | (ch->cso); 428 cr[2]=((ch->delta>>8)<<24) | (ch->eso); 429 cr[3]|=(ch->alpha<<20) | (ch->fms<<16) | (ch->fmc<<14); 430 break; 431 default: 432 /* shouldn't occur */ 433 cr[0] = 0; /* avoid gcc warnings */ 434 cr[2] = 0; /* avoid gcc warnings */ 435 break; 436 } 437 snd_mtxlock(tr->lock); 438 tr_selch(ch); 439 for (i=0; i<TR_CHN_REGS; i++) 440 tr_wr(tr, TR_REG_CHNBASE+(i<<2), cr[i], 4); 441 snd_mtxunlock(tr->lock); 442 } 443 444 static void 445 tr_rdch(struct tr_chinfo *ch) 446 { 447 struct tr_info *tr = ch->parent; 448 u_int32_t cr[5], i; 449 450 snd_mtxlock(tr->lock); 451 tr_selch(ch); 452 for (i=0; i<5; i++) 453 cr[i]=tr_rd(tr, TR_REG_CHNBASE+(i<<2), 4); 454 snd_mtxunlock(tr->lock); 455 456 457 if (tr->type == ALI_PCI_ID) 458 ch->lba=(cr[1] & ALI_MAXADDR); 459 else 460 ch->lba=(cr[1] & TR_MAXADDR); 461 ch->fmc= (cr[3] & 0x0000c000) >> 14; 462 ch->rvol= (cr[3] & 0x00003f80) >> 7; 463 ch->cvol= (cr[3] & 0x0000007f); 464 ch->gvsel= (cr[4] & 0x80000000) >> 31; 465 ch->pan= (cr[4] & 0x7f000000) >> 24; 466 ch->vol= (cr[4] & 0x00ff0000) >> 16; 467 ch->ctrl= (cr[4] & 0x0000f000) >> 12; 468 ch->ec= (cr[4] & 0x00000fff); 469 switch(tr->type) { 470 case SPA_PCI_ID: 471 case ALI_PCI_ID: 472 case TDX_PCI_ID: 473 ch->cso= (cr[0] & 0xffff0000) >> 16; 474 ch->alpha= (cr[0] & 0x0000fff0) >> 4; 475 ch->fms= (cr[0] & 0x0000000f); 476 ch->eso= (cr[2] & 0xffff0000) >> 16; 477 ch->delta= (cr[2] & 0x0000ffff); 478 break; 479 case TNX_PCI_ID: 480 ch->cso= (cr[0] & 0x00ffffff); 481 ch->eso= (cr[2] & 0x00ffffff); 482 ch->delta= ((cr[2] & 0xff000000) >> 16) | ((cr[0] & 0xff000000) >> 24); 483 ch->alpha= (cr[3] & 0xfff00000) >> 20; 484 ch->fms= (cr[3] & 0x000f0000) >> 16; 485 break; 486 } 487 } 488 489 static u_int32_t 490 tr_fmttobits(u_int32_t fmt) 491 { 492 u_int32_t bits; 493 494 bits = 0; 495 bits |= (fmt & AFMT_SIGNED)? 0x2 : 0; 496 bits |= (AFMT_CHANNEL(fmt) > 1)? 0x4 : 0; 497 bits |= (fmt & AFMT_16BIT)? 0x8 : 0; 498 499 return bits; 500 } 501 502 /* -------------------------------------------------------------------- */ 503 /* channel interface */ 504 505 static void * 506 trpchan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir) 507 { 508 struct tr_info *tr = devinfo; 509 struct tr_chinfo *ch; 510 511 KASSERT(dir == PCMDIR_PLAY, ("trpchan_init: bad direction")); 512 ch = &tr->chinfo[tr->playchns]; 513 ch->index = tr->playchns++; 514 ch->buffer = b; 515 ch->parent = tr; 516 ch->channel = c; 517 if (sndbuf_alloc(ch->buffer, tr->parent_dmat, 0, tr->bufsz) != 0) 518 return NULL; 519 520 return ch; 521 } 522 523 static int 524 trpchan_setformat(kobj_t obj, void *data, u_int32_t format) 525 { 526 struct tr_chinfo *ch = data; 527 528 ch->ctrl = tr_fmttobits(format) | 0x01; 529 530 return 0; 531 } 532 533 static u_int32_t 534 trpchan_setspeed(kobj_t obj, void *data, u_int32_t speed) 535 { 536 struct tr_chinfo *ch = data; 537 538 ch->delta = (speed << 12) / 48000; 539 return (ch->delta * 48000) >> 12; 540 } 541 542 static u_int32_t 543 trpchan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize) 544 { 545 struct tr_chinfo *ch = data; 546 547 sndbuf_resize(ch->buffer, 2, blocksize); 548 return blocksize; 549 } 550 551 static int 552 trpchan_trigger(kobj_t obj, void *data, int go) 553 { 554 struct tr_chinfo *ch = data; 555 556 if (!PCMTRIG_COMMON(go)) 557 return 0; 558 559 if (go == PCMTRIG_START) { 560 ch->fmc = 3; 561 ch->fms = 0; 562 ch->ec = 0; 563 ch->alpha = 0; 564 ch->lba = sndbuf_getbufaddr(ch->buffer); 565 ch->cso = 0; 566 ch->eso = (sndbuf_getsize(ch->buffer) / sndbuf_getalign(ch->buffer)) - 1; 567 ch->rvol = ch->cvol = 0x7f; 568 ch->gvsel = 0; 569 ch->pan = 0; 570 ch->vol = 0; 571 ch->bufhalf = 0; 572 tr_wrch(ch); 573 tr_enaint(ch, 1); 574 tr_startch(ch); 575 ch->active = 1; 576 } else { 577 tr_stopch(ch); 578 ch->active = 0; 579 } 580 581 return 0; 582 } 583 584 static u_int32_t 585 trpchan_getptr(kobj_t obj, void *data) 586 { 587 struct tr_chinfo *ch = data; 588 589 tr_rdch(ch); 590 return ch->cso * sndbuf_getalign(ch->buffer); 591 } 592 593 static struct pcmchan_caps * 594 trpchan_getcaps(kobj_t obj, void *data) 595 { 596 return &tr_playcaps; 597 } 598 599 static kobj_method_t trpchan_methods[] = { 600 KOBJMETHOD(channel_init, trpchan_init), 601 KOBJMETHOD(channel_setformat, trpchan_setformat), 602 KOBJMETHOD(channel_setspeed, trpchan_setspeed), 603 KOBJMETHOD(channel_setblocksize, trpchan_setblocksize), 604 KOBJMETHOD(channel_trigger, trpchan_trigger), 605 KOBJMETHOD(channel_getptr, trpchan_getptr), 606 KOBJMETHOD(channel_getcaps, trpchan_getcaps), 607 KOBJMETHOD_END 608 }; 609 CHANNEL_DECLARE(trpchan); 610 611 /* -------------------------------------------------------------------- */ 612 /* rec channel interface */ 613 614 static void * 615 trrchan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir) 616 { 617 struct tr_info *tr = devinfo; 618 struct tr_rchinfo *ch; 619 620 KASSERT(dir == PCMDIR_REC, ("trrchan_init: bad direction")); 621 ch = &tr->recchinfo; 622 ch->buffer = b; 623 ch->parent = tr; 624 ch->channel = c; 625 if (sndbuf_alloc(ch->buffer, tr->parent_dmat, 0, tr->bufsz) != 0) 626 return NULL; 627 628 return ch; 629 } 630 631 static int 632 trrchan_setformat(kobj_t obj, void *data, u_int32_t format) 633 { 634 struct tr_rchinfo *ch = data; 635 struct tr_info *tr = ch->parent; 636 u_int32_t i, bits; 637 638 bits = tr_fmttobits(format); 639 /* set # of samples between interrupts */ 640 i = (sndbuf_runsz(ch->buffer) >> ((bits & 0x08)? 1 : 0)) - 1; 641 tr_wr(tr, TR_REG_SBBL, i | (i << 16), 4); 642 /* set sample format */ 643 i = 0x18 | (bits << 4); 644 tr_wr(tr, TR_REG_SBCTRL, i, 1); 645 646 return 0; 647 } 648 649 static u_int32_t 650 trrchan_setspeed(kobj_t obj, void *data, u_int32_t speed) 651 { 652 struct tr_rchinfo *ch = data; 653 struct tr_info *tr = ch->parent; 654 655 /* setup speed */ 656 ch->delta = (48000 << 12) / speed; 657 tr_wr(tr, TR_REG_SBDELTA, ch->delta, 2); 658 659 /* return closest possible speed */ 660 return (48000 << 12) / ch->delta; 661 } 662 663 static u_int32_t 664 trrchan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize) 665 { 666 struct tr_rchinfo *ch = data; 667 668 sndbuf_resize(ch->buffer, 2, blocksize); 669 670 return blocksize; 671 } 672 673 static int 674 trrchan_trigger(kobj_t obj, void *data, int go) 675 { 676 struct tr_rchinfo *ch = data; 677 struct tr_info *tr = ch->parent; 678 u_int32_t i; 679 680 if (!PCMTRIG_COMMON(go)) 681 return 0; 682 683 if (go == PCMTRIG_START) { 684 /* set up dma mode regs */ 685 tr_wr(tr, TR_REG_DMAR15, 0, 1); 686 i = tr_rd(tr, TR_REG_DMAR11, 1) & 0x03; 687 tr_wr(tr, TR_REG_DMAR11, i | 0x54, 1); 688 /* set up base address */ 689 tr_wr(tr, TR_REG_DMAR0, sndbuf_getbufaddr(ch->buffer), 4); 690 /* set up buffer size */ 691 i = tr_rd(tr, TR_REG_DMAR4, 4) & ~0x00ffffff; 692 tr_wr(tr, TR_REG_DMAR4, i | (sndbuf_runsz(ch->buffer) - 1), 4); 693 /* start */ 694 tr_wr(tr, TR_REG_SBCTRL, tr_rd(tr, TR_REG_SBCTRL, 1) | 1, 1); 695 ch->active = 1; 696 } else { 697 tr_wr(tr, TR_REG_SBCTRL, tr_rd(tr, TR_REG_SBCTRL, 1) & ~7, 1); 698 ch->active = 0; 699 } 700 701 /* return 0 if ok */ 702 return 0; 703 } 704 705 static u_int32_t 706 trrchan_getptr(kobj_t obj, void *data) 707 { 708 struct tr_rchinfo *ch = data; 709 struct tr_info *tr = ch->parent; 710 711 /* return current byte offset of channel */ 712 return tr_rd(tr, TR_REG_DMAR0, 4) - sndbuf_getbufaddr(ch->buffer); 713 } 714 715 static struct pcmchan_caps * 716 trrchan_getcaps(kobj_t obj, void *data) 717 { 718 return &tr_reccaps; 719 } 720 721 static kobj_method_t trrchan_methods[] = { 722 KOBJMETHOD(channel_init, trrchan_init), 723 KOBJMETHOD(channel_setformat, trrchan_setformat), 724 KOBJMETHOD(channel_setspeed, trrchan_setspeed), 725 KOBJMETHOD(channel_setblocksize, trrchan_setblocksize), 726 KOBJMETHOD(channel_trigger, trrchan_trigger), 727 KOBJMETHOD(channel_getptr, trrchan_getptr), 728 KOBJMETHOD(channel_getcaps, trrchan_getcaps), 729 KOBJMETHOD_END 730 }; 731 CHANNEL_DECLARE(trrchan); 732 733 /* -------------------------------------------------------------------- */ 734 /* The interrupt handler */ 735 736 static void 737 tr_intr(void *p) 738 { 739 struct tr_info *tr = (struct tr_info *)p; 740 struct tr_chinfo *ch; 741 u_int32_t active, mask, bufhalf, chnum, intsrc; 742 int tmp; 743 744 intsrc = tr_rd(tr, TR_REG_MISCINT, 4); 745 if (intsrc & TR_INT_ADDR) { 746 chnum = 0; 747 while (chnum < tr->hwchns) { 748 mask = 0x00000001; 749 active = tr_rd(tr, (chnum < 32)? TR_REG_ADDRINTA : TR_REG_ADDRINTB, 4); 750 bufhalf = tr_rd(tr, (chnum < 32)? TR_REG_CSPF_A : TR_REG_CSPF_B, 4); 751 if (active) { 752 do { 753 if (active & mask) { 754 tmp = (bufhalf & mask)? 1 : 0; 755 if (chnum < tr->playchns) { 756 ch = &tr->chinfo[chnum]; 757 /* printf("%d @ %d, ", chnum, trpchan_getptr(NULL, ch)); */ 758 if (ch->bufhalf != tmp) { 759 chn_intr(ch->channel); 760 ch->bufhalf = tmp; 761 } 762 } 763 } 764 chnum++; 765 mask <<= 1; 766 } while (chnum & 31); 767 } else 768 chnum += 32; 769 770 tr_wr(tr, (chnum <= 32)? TR_REG_ADDRINTA : TR_REG_ADDRINTB, active, 4); 771 } 772 } 773 if (intsrc & TR_INT_SB) { 774 chn_intr(tr->recchinfo.channel); 775 tr_rd(tr, TR_REG_SBR9, 1); 776 tr_rd(tr, TR_REG_SBR10, 1); 777 } 778 } 779 780 /* -------------------------------------------------------------------- */ 781 782 /* 783 * Probe and attach the card 784 */ 785 786 static int 787 tr_init(struct tr_info *tr) 788 { 789 switch (tr->type) { 790 case SPA_PCI_ID: 791 tr_wr(tr, SPA_REG_GPIO, 0, 4); 792 tr_wr(tr, SPA_REG_CODECST, SPA_RST_OFF, 4); 793 break; 794 case TDX_PCI_ID: 795 tr_wr(tr, TDX_REG_CODECST, TDX_CDC_ON, 4); 796 break; 797 case TNX_PCI_ID: 798 tr_wr(tr, TNX_REG_CODECST, TNX_CDC_ON, 4); 799 break; 800 } 801 802 tr_wr(tr, TR_REG_CIR, TR_CIR_MIDENA | TR_CIR_ADDRENA, 4); 803 return 0; 804 } 805 806 static int 807 tr_pci_probe(device_t dev) 808 { 809 switch (pci_get_devid(dev)) { 810 case SPA_PCI_ID: 811 device_set_desc(dev, "SiS 7018"); 812 return BUS_PROBE_DEFAULT; 813 case ALI_PCI_ID: 814 device_set_desc(dev, "Acer Labs M5451"); 815 return BUS_PROBE_DEFAULT; 816 case TDX_PCI_ID: 817 device_set_desc(dev, "Trident 4DWave DX"); 818 return BUS_PROBE_DEFAULT; 819 case TNX_PCI_ID: 820 device_set_desc(dev, "Trident 4DWave NX"); 821 return BUS_PROBE_DEFAULT; 822 } 823 824 return ENXIO; 825 } 826 827 static int 828 tr_pci_attach(device_t dev) 829 { 830 struct tr_info *tr; 831 struct ac97_info *codec = 0; 832 bus_addr_t lowaddr; 833 int i, dacn; 834 char status[SND_STATUSLEN]; 835 #ifdef __sparc64__ 836 device_t *children; 837 int nchildren; 838 u_int32_t data; 839 #endif 840 841 tr = kmalloc(sizeof(*tr), M_DEVBUF, M_WAITOK | M_ZERO); 842 tr->type = pci_get_devid(dev); 843 tr->rev = pci_get_revid(dev); 844 tr->lock = snd_mtxcreate(device_get_nameunit(dev), "snd_t4dwave softc"); 845 846 if (resource_int_value(device_get_name(dev), device_get_unit(dev), 847 "dac", &i) == 0) { 848 if (i < 1) 849 dacn = 1; 850 else if (i > TR_MAXPLAYCH) 851 dacn = TR_MAXPLAYCH; 852 else 853 dacn = i; 854 } else { 855 switch (tr->type) { 856 case ALI_PCI_ID: 857 dacn = ALI_MAXPLAYCH; 858 break; 859 default: 860 dacn = TR_MAXPLAYCH; 861 break; 862 } 863 } 864 865 pci_enable_busmaster(dev); 866 867 tr->regid = PCIR_BAR(0); 868 tr->regtype = SYS_RES_IOPORT; 869 tr->reg = bus_alloc_resource_any(dev, tr->regtype, &tr->regid, 870 RF_ACTIVE); 871 if (tr->reg) { 872 tr->st = rman_get_bustag(tr->reg); 873 tr->sh = rman_get_bushandle(tr->reg); 874 } else { 875 device_printf(dev, "unable to map register space\n"); 876 goto bad; 877 } 878 879 if (tr_init(tr) == -1) { 880 device_printf(dev, "unable to initialize the card\n"); 881 goto bad; 882 } 883 tr->playchns = 0; 884 885 codec = AC97_CREATE(dev, tr, tr_ac97); 886 if (codec == NULL) goto bad; 887 if (mixer_init(dev, ac97_getmixerclass(), codec) == -1) goto bad; 888 889 tr->irqid = 0; 890 tr->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &tr->irqid, 891 RF_ACTIVE | RF_SHAREABLE); 892 if (!tr->irq || snd_setup_intr(dev, tr->irq, 0, tr_intr, tr, &tr->ih)) { 893 device_printf(dev, "unable to map interrupt\n"); 894 goto bad; 895 } 896 897 if (tr->type == ALI_PCI_ID) { 898 /* 899 * The M5451 generates 31 bit of DMA and in order to do 900 * 32-bit DMA, the 31st bit can be set via its accompanying 901 * ISA bridge. Note that we can't predict whether bus_dma(9) 902 * will actually supply us with a 32-bit buffer and even when 903 * using a low address of BUS_SPACE_MAXADDR_32BIT for both 904 * we might end up with the play buffer being in the 32-bit 905 * range while the record buffer isn't or vice versa. So we 906 * limit enabling the 31st bit to sparc64, where the IOMMU 907 * guarantees that we're using a 32-bit address (and in turn 908 * requires it). 909 */ 910 lowaddr = ALI_MAXADDR; 911 #ifdef __sparc64__ 912 if (device_get_children(device_get_parent(dev), &children, 913 &nchildren) == 0) { 914 for (i = 0; i < nchildren; i++) { 915 if (pci_get_devid(children[i]) == 0x153310b9) { 916 lowaddr = BUS_SPACE_MAXADDR_32BIT; 917 data = pci_read_config(children[i], 918 0x7e, 1); 919 if (bootverbose) 920 device_printf(dev, 921 "M1533 0x7e: 0x%x -> ", 922 data); 923 data |= 0x1; 924 if (bootverbose) 925 kprintf("0x%x\n", data); 926 pci_write_config(children[i], 0x7e, 927 data, 1); 928 break; 929 } 930 } 931 } 932 kfree(children, M_TEMP); 933 #endif 934 tr->hwchns = ALI_MAXHWCH; 935 tr->bufsz = ALI_BUFSZ; 936 } else { 937 lowaddr = TR_MAXADDR; 938 tr->hwchns = TR_MAXHWCH; 939 tr->bufsz = pcm_getbuffersize(dev, 4096, TR_DEFAULT_BUFSZ, 940 65536); 941 } 942 943 if (bus_dma_tag_create(/*parent*/bus_get_dma_tag(dev), 944 /*alignment*/TR_BUFALGN, 945 /*boundary*/0, 946 /*lowaddr*/lowaddr, 947 /*highaddr*/BUS_SPACE_MAXADDR, 948 /*filter*/NULL, /*filterarg*/NULL, 949 /*maxsize*/tr->bufsz, /*nsegments*/1, /*maxsegz*/tr->bufsz, 950 /*flags*/0, 951 &tr->parent_dmat) != 0) { 952 device_printf(dev, "unable to create dma tag\n"); 953 goto bad; 954 } 955 956 ksnprintf(status, 64, "at io 0x%lx irq %ld %s", 957 rman_get_start(tr->reg), rman_get_start(tr->irq),PCM_KLDSTRING(snd_t4dwave)); 958 959 if (pcm_register(dev, tr, dacn, 1)) 960 goto bad; 961 pcm_addchan(dev, PCMDIR_REC, &trrchan_class, tr); 962 for (i = 0; i < dacn; i++) 963 pcm_addchan(dev, PCMDIR_PLAY, &trpchan_class, tr); 964 pcm_setstatus(dev, status); 965 966 return 0; 967 968 bad: 969 if (codec) ac97_destroy(codec); 970 if (tr->reg) bus_release_resource(dev, tr->regtype, tr->regid, tr->reg); 971 if (tr->ih) bus_teardown_intr(dev, tr->irq, tr->ih); 972 if (tr->irq) bus_release_resource(dev, SYS_RES_IRQ, tr->irqid, tr->irq); 973 if (tr->parent_dmat) bus_dma_tag_destroy(tr->parent_dmat); 974 if (tr->lock) snd_mtxfree(tr->lock); 975 kfree(tr, M_DEVBUF); 976 return ENXIO; 977 } 978 979 static int 980 tr_pci_detach(device_t dev) 981 { 982 int r; 983 struct tr_info *tr; 984 985 r = pcm_unregister(dev); 986 if (r) 987 return r; 988 989 tr = pcm_getdevinfo(dev); 990 bus_release_resource(dev, tr->regtype, tr->regid, tr->reg); 991 bus_teardown_intr(dev, tr->irq, tr->ih); 992 bus_release_resource(dev, SYS_RES_IRQ, tr->irqid, tr->irq); 993 bus_dma_tag_destroy(tr->parent_dmat); 994 snd_mtxfree(tr->lock); 995 kfree(tr, M_DEVBUF); 996 997 return 0; 998 } 999 1000 static int 1001 tr_pci_suspend(device_t dev) 1002 { 1003 int i; 1004 struct tr_info *tr; 1005 1006 tr = pcm_getdevinfo(dev); 1007 1008 for (i = 0; i < tr->playchns; i++) { 1009 tr->chinfo[i].was_active = tr->chinfo[i].active; 1010 if (tr->chinfo[i].active) { 1011 trpchan_trigger(NULL, &tr->chinfo[i], PCMTRIG_STOP); 1012 } 1013 } 1014 1015 tr->recchinfo.was_active = tr->recchinfo.active; 1016 if (tr->recchinfo.active) { 1017 trrchan_trigger(NULL, &tr->recchinfo, PCMTRIG_STOP); 1018 } 1019 1020 return 0; 1021 } 1022 1023 static int 1024 tr_pci_resume(device_t dev) 1025 { 1026 int i; 1027 struct tr_info *tr; 1028 1029 tr = pcm_getdevinfo(dev); 1030 1031 if (tr_init(tr) == -1) { 1032 device_printf(dev, "unable to initialize the card\n"); 1033 return ENXIO; 1034 } 1035 1036 if (mixer_reinit(dev) == -1) { 1037 device_printf(dev, "unable to initialize the mixer\n"); 1038 return ENXIO; 1039 } 1040 1041 for (i = 0; i < tr->playchns; i++) { 1042 if (tr->chinfo[i].was_active) { 1043 trpchan_trigger(NULL, &tr->chinfo[i], PCMTRIG_START); 1044 } 1045 } 1046 1047 if (tr->recchinfo.was_active) { 1048 trrchan_trigger(NULL, &tr->recchinfo, PCMTRIG_START); 1049 } 1050 1051 return 0; 1052 } 1053 1054 static device_method_t tr_methods[] = { 1055 /* Device interface */ 1056 DEVMETHOD(device_probe, tr_pci_probe), 1057 DEVMETHOD(device_attach, tr_pci_attach), 1058 DEVMETHOD(device_detach, tr_pci_detach), 1059 DEVMETHOD(device_suspend, tr_pci_suspend), 1060 DEVMETHOD(device_resume, tr_pci_resume), 1061 { 0, 0 } 1062 }; 1063 1064 static driver_t tr_driver = { 1065 "pcm", 1066 tr_methods, 1067 PCM_SOFTC_SIZE, 1068 }; 1069 1070 DRIVER_MODULE(snd_t4dwave, pci, tr_driver, pcm_devclass, NULL, NULL); 1071 MODULE_DEPEND(snd_t4dwave, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER); 1072 MODULE_VERSION(snd_t4dwave, 1); 1073