1/*- 2 * Copyright (c) 2001 Scott Long <scottl@freebsd.org> 3 * Copyright (c) 2001 Darrell Anderson <anderson@cs.duke.edu> 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 23 * LIABILITY, 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 * Maestro-3/Allegro FreeBSD pcm sound driver 30 * 31 * executive status summary: 32 * (+) /dev/dsp multiple concurrent play channels. 33 * (+) /dev/dsp config (speed, mono/stereo, 8/16 bit). 34 * (+) /dev/mixer sets left/right volumes. 35 * (+) /dev/dsp recording works. Tested successfully with the cdrom channel 36 * (+) apm suspend/resume works, and works properly!. 37 * (-) hardware volme controls don't work =-( 38 * (-) setblocksize() does nothing. 39 * 40 * The real credit goes to: 41 * 42 * Zach Brown for his Linux driver core and helpful technical comments. 43 * <zab@zabbo.net>, http://www.zabbo.net/maestro3 44 * 45 * Cameron Grant created the pcm framework used here nearly verbatim. 46 * <cg@freebsd.org>, http://people.freebsd.org/~cg/template.c 47 * 48 * Taku YAMAMOTO for his Maestro-1/2 FreeBSD driver and sanity reference. 49 * <taku@cent.saitama-u.ac.jp> 50 * 51 * ESS docs explained a few magic registers and numbers. 52 * http://virgo.caltech.edu/~dmoore/maestro3.pdf.gz 53 */ 54 55#ifdef HAVE_KERNEL_OPTION_HEADERS 56#include "opt_snd.h" 57#endif 58 59#include <dev/sound/pcm/sound.h> 60#include <dev/sound/pcm/ac97.h> 61 62#include <dev/pci/pcireg.h> 63#include <dev/pci/pcivar.h> 64 65#define M3_MODEL 1 66 67#include <dev/sound/pci/allegro_reg.h> 68#include <dev/sound/pci/allegro_code.h> 69 70SND_DECLARE_FILE("$FreeBSD$"); 71 72/* -------------------------------------------------------------------- */ 73 74enum {CHANGE=0, CALL=1, INTR=2, BORING=3, NONE=-1}; 75#ifndef M3_DEBUG_LEVEL 76#define M3_DEBUG_LEVEL NONE 77#endif 78#define M3_DEBUG(level, _msg) {if ((level) <= M3_DEBUG_LEVEL) {printf _msg;}} 79 80/* -------------------------------------------------------------------- */ 81enum { 82 ESS_ALLEGRO_1, 83 ESS_MAESTRO3 84}; 85 86static struct m3_card_type { 87 u_int32_t pci_id; int which; int delay1; int delay2; char *name; 88} m3_card_types[] = { 89 { 0x1988125d, ESS_ALLEGRO_1, 50, 800, "ESS Technology Allegro-1" }, 90 { 0x1998125d, ESS_MAESTRO3, 20, 500, "ESS Technology Maestro3" }, 91 { 0x199a125d, ESS_MAESTRO3, 20, 500, "ESS Technology Maestro3" }, 92 { 0, 0, 0, 0, NULL } 93}; 94 95#define M3_BUFSIZE_MIN 4096 96#define M3_BUFSIZE_MAX 65536 97#define M3_BUFSIZE_DEFAULT 4096 98#define M3_PCHANS 4 /* create /dev/dsp0.[0-N] to use more than one */ 99#define M3_RCHANS 1 100#define M3_MAXADDR ((1 << 27) - 1) 101#define M3_DEFAULT_VOL 0x6800 102 103struct sc_info; 104 105struct sc_pchinfo { 106 u_int32_t spd; 107 u_int32_t fmt; 108 struct snd_dbuf *buffer; 109 struct pcm_channel *channel; 110 struct sc_info *parent; 111 u_int32_t bufsize; 112 u_int32_t dac_data; 113 u_int32_t dac_idx; 114 u_int32_t active; 115 u_int32_t ptr; 116 u_int32_t prevptr; 117}; 118 119struct sc_rchinfo { 120 u_int32_t spd; 121 u_int32_t fmt; 122 struct snd_dbuf *buffer; 123 struct pcm_channel *channel; 124 struct sc_info *parent; 125 u_int32_t bufsize; 126 u_int32_t adc_data; 127 u_int32_t adc_idx; 128 u_int32_t active; 129 u_int32_t ptr; 130 u_int32_t prevptr; 131}; 132 133struct sc_info { 134 device_t dev; 135 u_int32_t type; 136 int which; 137 int delay1; 138 int delay2; 139 140 bus_space_tag_t st; 141 bus_space_handle_t sh; 142 bus_dma_tag_t parent_dmat; 143 144 struct resource *reg; 145 struct resource *irq; 146 int regtype; 147 int regid; 148 int irqid; 149 void *ih; 150 151 struct sc_pchinfo pch[M3_PCHANS]; 152 struct sc_rchinfo rch[M3_RCHANS]; 153 int pch_cnt; 154 int rch_cnt; 155 int pch_active_cnt; 156 unsigned int bufsz; 157 u_int16_t *savemem; 158 159 struct mtx *sc_lock; 160}; 161 162#define M3_LOCK(_sc) snd_mtxlock((_sc)->sc_lock) 163#define M3_UNLOCK(_sc) snd_mtxunlock((_sc)->sc_lock) 164#define M3_LOCK_ASSERT(_sc) snd_mtxassert((_sc)->sc_lock) 165 166/* -------------------------------------------------------------------- */ 167 168/* play channel interface */ 169static void *m3_pchan_init(kobj_t, void *, struct snd_dbuf *, struct pcm_channel *, int); 170static int m3_pchan_free(kobj_t, void *); 171static int m3_pchan_setformat(kobj_t, void *, u_int32_t); 172static u_int32_t m3_pchan_setspeed(kobj_t, void *, u_int32_t); 173static u_int32_t m3_pchan_setblocksize(kobj_t, void *, u_int32_t); 174static int m3_pchan_trigger(kobj_t, void *, int); 175static int m3_pchan_trigger_locked(kobj_t, void *, int); 176static u_int32_t m3_pchan_getptr_internal(struct sc_pchinfo *); 177static u_int32_t m3_pchan_getptr(kobj_t, void *); 178static struct pcmchan_caps *m3_pchan_getcaps(kobj_t, void *); 179 180/* record channel interface */ 181static void *m3_rchan_init(kobj_t, void *, struct snd_dbuf *, struct pcm_channel *, int); 182static int m3_rchan_free(kobj_t, void *); 183static int m3_rchan_setformat(kobj_t, void *, u_int32_t); 184static u_int32_t m3_rchan_setspeed(kobj_t, void *, u_int32_t); 185static u_int32_t m3_rchan_setblocksize(kobj_t, void *, u_int32_t); 186static int m3_rchan_trigger(kobj_t, void *, int); 187static int m3_rchan_trigger_locked(kobj_t, void *, int); 188static u_int32_t m3_rchan_getptr_internal(struct sc_rchinfo *); 189static u_int32_t m3_rchan_getptr(kobj_t, void *); 190static struct pcmchan_caps *m3_rchan_getcaps(kobj_t, void *); 191 192static int m3_chan_active(struct sc_info *); 193 194/* talk to the codec - called from ac97.c */ 195static u_int32_t m3_initcd(kobj_t, void *); 196static int m3_rdcd(kobj_t, void *, int); 197static int m3_wrcd(kobj_t, void *, int, u_int32_t); 198 199/* stuff */ 200static void m3_intr(void *); 201static int m3_power(struct sc_info *, int); 202static int m3_init(struct sc_info *); 203static int m3_uninit(struct sc_info *); 204static u_int8_t m3_assp_halt(struct sc_info *); 205static void m3_config(struct sc_info *); 206static void m3_amp_enable(struct sc_info *); 207static void m3_enable_ints(struct sc_info *); 208static void m3_codec_reset(struct sc_info *); 209 210/* -------------------------------------------------------------------- */ 211/* Codec descriptor */ 212static kobj_method_t m3_codec_methods[] = { 213 KOBJMETHOD(ac97_init, m3_initcd), 214 KOBJMETHOD(ac97_read, m3_rdcd), 215 KOBJMETHOD(ac97_write, m3_wrcd), 216 KOBJMETHOD_END 217}; 218AC97_DECLARE(m3_codec); 219 220/* -------------------------------------------------------------------- */ 221/* channel descriptors */ 222 223static u_int32_t m3_playfmt[] = { 224 SND_FORMAT(AFMT_U8, 1, 0), 225 SND_FORMAT(AFMT_U8, 2, 0), 226 SND_FORMAT(AFMT_S16_LE, 1, 0), 227 SND_FORMAT(AFMT_S16_LE, 2, 0), 228 0 229}; 230static struct pcmchan_caps m3_playcaps = {8000, 48000, m3_playfmt, 0}; 231 232static kobj_method_t m3_pch_methods[] = { 233 KOBJMETHOD(channel_init, m3_pchan_init), 234 KOBJMETHOD(channel_setformat, m3_pchan_setformat), 235 KOBJMETHOD(channel_setspeed, m3_pchan_setspeed), 236 KOBJMETHOD(channel_setblocksize, m3_pchan_setblocksize), 237 KOBJMETHOD(channel_trigger, m3_pchan_trigger), 238 KOBJMETHOD(channel_getptr, m3_pchan_getptr), 239 KOBJMETHOD(channel_getcaps, m3_pchan_getcaps), 240 KOBJMETHOD(channel_free, m3_pchan_free), 241 KOBJMETHOD_END 242}; 243CHANNEL_DECLARE(m3_pch); 244 245static u_int32_t m3_recfmt[] = { 246 SND_FORMAT(AFMT_U8, 1, 0), 247 SND_FORMAT(AFMT_U8, 2, 0), 248 SND_FORMAT(AFMT_S16_LE, 1, 0), 249 SND_FORMAT(AFMT_S16_LE, 2, 0), 250 0 251}; 252static struct pcmchan_caps m3_reccaps = {8000, 48000, m3_recfmt, 0}; 253 254static kobj_method_t m3_rch_methods[] = { 255 KOBJMETHOD(channel_init, m3_rchan_init), 256 KOBJMETHOD(channel_setformat, m3_rchan_setformat), 257 KOBJMETHOD(channel_setspeed, m3_rchan_setspeed), 258 KOBJMETHOD(channel_setblocksize, m3_rchan_setblocksize), 259 KOBJMETHOD(channel_trigger, m3_rchan_trigger), 260 KOBJMETHOD(channel_getptr, m3_rchan_getptr), 261 KOBJMETHOD(channel_getcaps, m3_rchan_getcaps), 262 KOBJMETHOD(channel_free, m3_rchan_free), 263 KOBJMETHOD_END 264}; 265CHANNEL_DECLARE(m3_rch); 266 267/* -------------------------------------------------------------------- */ 268/* some i/o convenience functions */ 269 270#define m3_rd_1(sc, regno) bus_space_read_1(sc->st, sc->sh, regno) 271#define m3_rd_2(sc, regno) bus_space_read_2(sc->st, sc->sh, regno) 272#define m3_rd_4(sc, regno) bus_space_read_4(sc->st, sc->sh, regno) 273#define m3_wr_1(sc, regno, data) bus_space_write_1(sc->st, sc->sh, regno, data) 274#define m3_wr_2(sc, regno, data) bus_space_write_2(sc->st, sc->sh, regno, data) 275#define m3_wr_4(sc, regno, data) bus_space_write_4(sc->st, sc->sh, regno, data) 276#define m3_rd_assp_code(sc, index) \ 277 m3_rd_assp(sc, MEMTYPE_INTERNAL_CODE, index) 278#define m3_wr_assp_code(sc, index, data) \ 279 m3_wr_assp(sc, MEMTYPE_INTERNAL_CODE, index, data) 280#define m3_rd_assp_data(sc, index) \ 281 m3_rd_assp(sc, MEMTYPE_INTERNAL_DATA, index) 282#define m3_wr_assp_data(sc, index, data) \ 283 m3_wr_assp(sc, MEMTYPE_INTERNAL_DATA, index, data) 284 285static __inline u_int16_t 286m3_rd_assp(struct sc_info *sc, u_int16_t region, u_int16_t index) 287{ 288 m3_wr_2(sc, DSP_PORT_MEMORY_TYPE, region & MEMTYPE_MASK); 289 m3_wr_2(sc, DSP_PORT_MEMORY_INDEX, index); 290 return m3_rd_2(sc, DSP_PORT_MEMORY_DATA); 291} 292 293static __inline void 294m3_wr_assp(struct sc_info *sc, u_int16_t region, u_int16_t index, 295 u_int16_t data) 296{ 297 m3_wr_2(sc, DSP_PORT_MEMORY_TYPE, region & MEMTYPE_MASK); 298 m3_wr_2(sc, DSP_PORT_MEMORY_INDEX, index); 299 m3_wr_2(sc, DSP_PORT_MEMORY_DATA, data); 300} 301 302static __inline int 303m3_wait(struct sc_info *sc) 304{ 305 int i; 306 307 for (i=0 ; i<20 ; i++) { 308 if ((m3_rd_1(sc, CODEC_STATUS) & 1) == 0) { 309 return 0; 310 } 311 DELAY(2); 312 } 313 return -1; 314} 315 316/* -------------------------------------------------------------------- */ 317/* ac97 codec */ 318 319static u_int32_t 320m3_initcd(kobj_t kobj, void *devinfo) 321{ 322 struct sc_info *sc = (struct sc_info *)devinfo; 323 u_int32_t data; 324 325 M3_DEBUG(CALL, ("m3_initcd\n")); 326 327 /* init ac-link */ 328 329 data = m3_rd_1(sc, CODEC_COMMAND); 330 return ((data & 0x1) ? 0 : 1); 331} 332 333static int 334m3_rdcd(kobj_t kobj, void *devinfo, int regno) 335{ 336 struct sc_info *sc = (struct sc_info *)devinfo; 337 u_int32_t data; 338 339 if (m3_wait(sc)) { 340 device_printf(sc->dev, "m3_rdcd timed out.\n"); 341 return -1; 342 } 343 m3_wr_1(sc, CODEC_COMMAND, (regno & 0x7f) | 0x80); 344 DELAY(50); /* ac97 cycle = 20.8 usec */ 345 if (m3_wait(sc)) { 346 device_printf(sc->dev, "m3_rdcd timed out.\n"); 347 return -1; 348 } 349 data = m3_rd_2(sc, CODEC_DATA); 350 return data; 351} 352 353static int 354m3_wrcd(kobj_t kobj, void *devinfo, int regno, u_int32_t data) 355{ 356 struct sc_info *sc = (struct sc_info *)devinfo; 357 if (m3_wait(sc)) { 358 device_printf(sc->dev, "m3_wrcd timed out.\n"); 359 return -1; 360 } 361 m3_wr_2(sc, CODEC_DATA, data); 362 m3_wr_1(sc, CODEC_COMMAND, regno & 0x7f); 363 DELAY(50); /* ac97 cycle = 20.8 usec */ 364 return 0; 365} 366 367/* -------------------------------------------------------------------- */ 368/* play channel interface */ 369 370#define LO(x) (((x) & 0x0000ffff) ) 371#define HI(x) (((x) & 0xffff0000) >> 16) 372 373static void * 374m3_pchan_init(kobj_t kobj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir) 375{ 376 struct sc_info *sc = devinfo; 377 struct sc_pchinfo *ch; 378 u_int32_t bus_addr, i; 379 int idx, data_bytes, dac_data; 380 int dsp_in_size, dsp_out_size, dsp_in_buf, dsp_out_buf; 381 382 struct data_word { 383 u_int16_t addr, val; 384 } pv[] = { 385 {CDATA_LEFT_VOLUME, M3_DEFAULT_VOL}, 386 {CDATA_RIGHT_VOLUME, M3_DEFAULT_VOL}, 387 {SRC3_DIRECTION_OFFSET, 0} , 388 {SRC3_DIRECTION_OFFSET + 3, 0x0000}, 389 {SRC3_DIRECTION_OFFSET + 4, 0}, 390 {SRC3_DIRECTION_OFFSET + 5, 0}, 391 {SRC3_DIRECTION_OFFSET + 6, 0}, 392 {SRC3_DIRECTION_OFFSET + 7, 0}, 393 {SRC3_DIRECTION_OFFSET + 8, 0}, 394 {SRC3_DIRECTION_OFFSET + 9, 0}, 395 {SRC3_DIRECTION_OFFSET + 10, 0x8000}, 396 {SRC3_DIRECTION_OFFSET + 11, 0xFF00}, 397 {SRC3_DIRECTION_OFFSET + 13, 0}, 398 {SRC3_DIRECTION_OFFSET + 14, 0}, 399 {SRC3_DIRECTION_OFFSET + 15, 0}, 400 {SRC3_DIRECTION_OFFSET + 16, 8}, 401 {SRC3_DIRECTION_OFFSET + 17, 50*2}, 402 {SRC3_DIRECTION_OFFSET + 18, MINISRC_BIQUAD_STAGE - 1}, 403 {SRC3_DIRECTION_OFFSET + 20, 0}, 404 {SRC3_DIRECTION_OFFSET + 21, 0} 405 }; 406 407 M3_LOCK(sc); 408 idx = sc->pch_cnt; /* dac instance number, no active reuse! */ 409 M3_DEBUG(CHANGE, ("m3_pchan_init(dac=%d)\n", idx)); 410 411 if (dir != PCMDIR_PLAY) { 412 M3_UNLOCK(sc); 413 device_printf(sc->dev, "m3_pchan_init not PCMDIR_PLAY\n"); 414 return (NULL); 415 } 416 417 data_bytes = (((MINISRC_TMP_BUFFER_SIZE & ~1) + 418 (MINISRC_IN_BUFFER_SIZE & ~1) + 419 (MINISRC_OUT_BUFFER_SIZE & ~1) + 4) + 255) &~ 255; 420 dac_data = 0x1100 + (data_bytes * idx); 421 422 dsp_in_size = MINISRC_IN_BUFFER_SIZE - (0x20 * 2); 423 dsp_out_size = MINISRC_OUT_BUFFER_SIZE - (0x20 * 2); 424 dsp_in_buf = dac_data + (MINISRC_TMP_BUFFER_SIZE/2); 425 dsp_out_buf = dsp_in_buf + (dsp_in_size/2) + 1; 426 427 ch = &sc->pch[idx]; 428 ch->dac_idx = idx; 429 ch->dac_data = dac_data; 430 if (ch->dac_data + data_bytes/2 >= 0x1c00) { 431 M3_UNLOCK(sc); 432 device_printf(sc->dev, "m3_pchan_init: revb mem exhausted\n"); 433 return (NULL); 434 } 435 436 ch->buffer = b; 437 ch->parent = sc; 438 ch->channel = c; 439 ch->fmt = SND_FORMAT(AFMT_U8, 1, 0); 440 ch->spd = DSP_DEFAULT_SPEED; 441 M3_UNLOCK(sc); /* XXX */ 442 if (sndbuf_alloc(ch->buffer, sc->parent_dmat, 0, sc->bufsz) != 0) { 443 device_printf(sc->dev, "m3_pchan_init chn_allocbuf failed\n"); 444 return (NULL); 445 } 446 M3_LOCK(sc); 447 ch->bufsize = sndbuf_getsize(ch->buffer); 448 449 /* host dma buffer pointers */ 450 bus_addr = sndbuf_getbufaddr(ch->buffer); 451 if (bus_addr & 3) { 452 device_printf(sc->dev, "m3_pchan_init unaligned bus_addr\n"); 453 bus_addr = (bus_addr + 4) & ~3; 454 } 455 m3_wr_assp_data(sc, ch->dac_data + CDATA_HOST_SRC_ADDRL, LO(bus_addr)); 456 m3_wr_assp_data(sc, ch->dac_data + CDATA_HOST_SRC_ADDRH, HI(bus_addr)); 457 m3_wr_assp_data(sc, ch->dac_data + CDATA_HOST_SRC_END_PLUS_1L, 458 LO(bus_addr + ch->bufsize)); 459 m3_wr_assp_data(sc, ch->dac_data + CDATA_HOST_SRC_END_PLUS_1H, 460 HI(bus_addr + ch->bufsize)); 461 m3_wr_assp_data(sc, ch->dac_data + CDATA_HOST_SRC_CURRENTL, 462 LO(bus_addr)); 463 m3_wr_assp_data(sc, ch->dac_data + CDATA_HOST_SRC_CURRENTH, 464 HI(bus_addr)); 465 466 /* dsp buffers */ 467 m3_wr_assp_data(sc, ch->dac_data + CDATA_IN_BUF_BEGIN, dsp_in_buf); 468 m3_wr_assp_data(sc, ch->dac_data + CDATA_IN_BUF_END_PLUS_1, 469 dsp_in_buf + dsp_in_size/2); 470 m3_wr_assp_data(sc, ch->dac_data + CDATA_IN_BUF_HEAD, dsp_in_buf); 471 m3_wr_assp_data(sc, ch->dac_data + CDATA_IN_BUF_TAIL, dsp_in_buf); 472 m3_wr_assp_data(sc, ch->dac_data + CDATA_OUT_BUF_BEGIN, dsp_out_buf); 473 m3_wr_assp_data(sc, ch->dac_data + CDATA_OUT_BUF_END_PLUS_1, 474 dsp_out_buf + dsp_out_size/2); 475 m3_wr_assp_data(sc, ch->dac_data + CDATA_OUT_BUF_HEAD, dsp_out_buf); 476 m3_wr_assp_data(sc, ch->dac_data + CDATA_OUT_BUF_TAIL, dsp_out_buf); 477 478 /* some per client initializers */ 479 m3_wr_assp_data(sc, ch->dac_data + SRC3_DIRECTION_OFFSET + 12, 480 ch->dac_data + 40 + 8); 481 m3_wr_assp_data(sc, ch->dac_data + SRC3_DIRECTION_OFFSET + 19, 482 0x400 + MINISRC_COEF_LOC); 483 /* enable or disable low pass filter? (0xff if rate> 45000) */ 484 m3_wr_assp_data(sc, ch->dac_data + SRC3_DIRECTION_OFFSET + 22, 0); 485 /* tell it which way dma is going? */ 486 m3_wr_assp_data(sc, ch->dac_data + CDATA_DMA_CONTROL, 487 DMACONTROL_AUTOREPEAT + DMAC_PAGE3_SELECTOR + 488 DMAC_BLOCKF_SELECTOR); 489 490 /* set an armload of static initializers */ 491 for(i = 0 ; i < (sizeof(pv) / sizeof(pv[0])) ; i++) { 492 m3_wr_assp_data(sc, ch->dac_data + pv[i].addr, pv[i].val); 493 } 494 495 /* put us in the packed task lists */ 496 m3_wr_assp_data(sc, KDATA_INSTANCE0_MINISRC + 497 (sc->pch_cnt + sc->rch_cnt), 498 ch->dac_data >> DP_SHIFT_COUNT); 499 m3_wr_assp_data(sc, KDATA_DMA_XFER0 + (sc->pch_cnt + sc->rch_cnt), 500 ch->dac_data >> DP_SHIFT_COUNT); 501 m3_wr_assp_data(sc, KDATA_MIXER_XFER0 + sc->pch_cnt, 502 ch->dac_data >> DP_SHIFT_COUNT); 503 504 /* gotta start before stop */ 505 m3_pchan_trigger_locked(NULL, ch, PCMTRIG_START); 506 /* silence noise on load */ 507 m3_pchan_trigger_locked(NULL, ch, PCMTRIG_STOP); 508 509 sc->pch_cnt++; 510 M3_UNLOCK(sc); 511 512 return (ch); 513} 514 515static int 516m3_pchan_free(kobj_t kobj, void *chdata) 517{ 518 struct sc_pchinfo *ch = chdata; 519 struct sc_info *sc = ch->parent; 520 521 M3_LOCK(sc); 522 M3_DEBUG(CHANGE, ("m3_pchan_free(dac=%d)\n", ch->dac_idx)); 523 524 /* 525 * should remove this exact instance from the packed lists, but all 526 * are released at once (and in a stopped state) so this is ok. 527 */ 528 m3_wr_assp_data(sc, KDATA_INSTANCE0_MINISRC + 529 (sc->pch_cnt - 1) + sc->rch_cnt, 0); 530 m3_wr_assp_data(sc, KDATA_DMA_XFER0 + 531 (sc->pch_cnt - 1) + sc->rch_cnt, 0); 532 m3_wr_assp_data(sc, KDATA_MIXER_XFER0 + (sc->pch_cnt-1), 0); 533 sc->pch_cnt--; 534 M3_UNLOCK(sc); 535 536 return (0); 537} 538 539static int 540m3_pchan_setformat(kobj_t kobj, void *chdata, u_int32_t format) 541{ 542 struct sc_pchinfo *ch = chdata; 543 struct sc_info *sc = ch->parent; 544 u_int32_t data; 545 546 M3_LOCK(sc); 547 M3_DEBUG(CHANGE, 548 ("m3_pchan_setformat(dac=%d, format=0x%x{%s-%s})\n", 549 ch->dac_idx, format, 550 format & (AFMT_U8|AFMT_S8) ? "8bit":"16bit", 551 (AFMT_CHANNEL(format) > 1) ? "STEREO":"MONO")); 552 553 /* mono word */ 554 data = (AFMT_CHANNEL(format) > 1)? 0 : 1; 555 m3_wr_assp_data(sc, ch->dac_data + SRC3_MODE_OFFSET, data); 556 557 /* 8bit word */ 558 data = ((format & AFMT_U8) || (format & AFMT_S8)) ? 1 : 0; 559 m3_wr_assp_data(sc, ch->dac_data + SRC3_WORD_LENGTH_OFFSET, data); 560 561 ch->fmt = format; 562 M3_UNLOCK(sc); 563 564 return (0); 565} 566 567static u_int32_t 568m3_pchan_setspeed(kobj_t kobj, void *chdata, u_int32_t speed) 569{ 570 struct sc_pchinfo *ch = chdata; 571 struct sc_info *sc = ch->parent; 572 u_int32_t freq; 573 574 M3_LOCK(sc); 575 M3_DEBUG(CHANGE, ("m3_pchan_setspeed(dac=%d, speed=%d)\n", 576 ch->dac_idx, speed)); 577 578 if ((freq = ((speed << 15) + 24000) / 48000) != 0) { 579 freq--; 580 } 581 582 m3_wr_assp_data(sc, ch->dac_data + CDATA_FREQUENCY, freq); 583 ch->spd = speed; 584 M3_UNLOCK(sc); 585 586 /* return closest possible speed */ 587 return (speed); 588} 589 590static u_int32_t 591m3_pchan_setblocksize(kobj_t kobj, void *chdata, u_int32_t blocksize) 592{ 593 struct sc_pchinfo *ch = chdata; 594 595 M3_DEBUG(CHANGE, ("m3_pchan_setblocksize(dac=%d, blocksize=%d)\n", 596 ch->dac_idx, blocksize)); 597 598 return (sndbuf_getblksz(ch->buffer)); 599} 600 601static int 602m3_pchan_trigger(kobj_t kobj, void *chdata, int go) 603{ 604 struct sc_pchinfo *ch = chdata; 605 struct sc_info *sc = ch->parent; 606 int ret; 607 608 if (!PCMTRIG_COMMON(go)) 609 return (0); 610 611 M3_LOCK(sc); 612 ret = m3_pchan_trigger_locked(kobj, chdata, go); 613 M3_UNLOCK(sc); 614 615 return (ret); 616} 617 618static int 619m3_chan_active(struct sc_info *sc) 620{ 621 int i, ret; 622 623 ret = 0; 624 625 for (i = 0; i < sc->pch_cnt; i++) 626 ret += sc->pch[i].active; 627 628 for (i = 0; i < sc->rch_cnt; i++) 629 ret += sc->rch[i].active; 630 631 return (ret); 632} 633 634static int 635m3_pchan_trigger_locked(kobj_t kobj, void *chdata, int go) 636{ 637 struct sc_pchinfo *ch = chdata; 638 struct sc_info *sc = ch->parent; 639 u_int32_t data; 640 641 M3_LOCK_ASSERT(sc); 642 M3_DEBUG(go == PCMTRIG_START ? CHANGE : 643 go == PCMTRIG_STOP ? CHANGE : 644 go == PCMTRIG_ABORT ? CHANGE : 645 CALL, 646 ("m3_pchan_trigger(dac=%d, go=0x%x{%s})\n", ch->dac_idx, go, 647 go == PCMTRIG_START ? "PCMTRIG_START" : 648 go == PCMTRIG_STOP ? "PCMTRIG_STOP" : 649 go == PCMTRIG_ABORT ? "PCMTRIG_ABORT" : "ignore")); 650 651 switch(go) { 652 case PCMTRIG_START: 653 if (ch->active) { 654 return 0; 655 } 656 ch->active = 1; 657 ch->ptr = 0; 658 ch->prevptr = 0; 659 sc->pch_active_cnt++; 660 661 /*[[inc_timer_users]]*/ 662 if (m3_chan_active(sc) == 1) { 663 m3_wr_assp_data(sc, KDATA_TIMER_COUNT_RELOAD, 240); 664 m3_wr_assp_data(sc, KDATA_TIMER_COUNT_CURRENT, 240); 665 data = m3_rd_2(sc, HOST_INT_CTRL); 666 m3_wr_2(sc, HOST_INT_CTRL, data | CLKRUN_GEN_ENABLE); 667 } 668 669 m3_wr_assp_data(sc, ch->dac_data + CDATA_INSTANCE_READY, 1); 670 m3_wr_assp_data(sc, KDATA_MIXER_TASK_NUMBER, 671 sc->pch_active_cnt); 672 break; 673 674 case PCMTRIG_STOP: 675 case PCMTRIG_ABORT: 676 if (ch->active == 0) { 677 return 0; 678 } 679 ch->active = 0; 680 sc->pch_active_cnt--; 681 682 /* XXX should the channel be drained? */ 683 /*[[dec_timer_users]]*/ 684 if (m3_chan_active(sc) == 0) { 685 m3_wr_assp_data(sc, KDATA_TIMER_COUNT_RELOAD, 0); 686 m3_wr_assp_data(sc, KDATA_TIMER_COUNT_CURRENT, 0); 687 data = m3_rd_2(sc, HOST_INT_CTRL); 688 m3_wr_2(sc, HOST_INT_CTRL, data & ~CLKRUN_GEN_ENABLE); 689 } 690 691 m3_wr_assp_data(sc, ch->dac_data + CDATA_INSTANCE_READY, 0); 692 m3_wr_assp_data(sc, KDATA_MIXER_TASK_NUMBER, 693 sc->pch_active_cnt); 694 break; 695 696 case PCMTRIG_EMLDMAWR: 697 /* got play irq, transfer next buffer - ignore if using dma */ 698 case PCMTRIG_EMLDMARD: 699 /* got rec irq, transfer next buffer - ignore if using dma */ 700 default: 701 break; 702 } 703 return 0; 704} 705 706static u_int32_t 707m3_pchan_getptr_internal(struct sc_pchinfo *ch) 708{ 709 struct sc_info *sc = ch->parent; 710 u_int32_t hi, lo, bus_base, bus_crnt; 711 712 bus_base = sndbuf_getbufaddr(ch->buffer); 713 hi = m3_rd_assp_data(sc, ch->dac_data + CDATA_HOST_SRC_CURRENTH); 714 lo = m3_rd_assp_data(sc, ch->dac_data + CDATA_HOST_SRC_CURRENTL); 715 bus_crnt = lo | (hi << 16); 716 717 M3_DEBUG(CALL, ("m3_pchan_getptr(dac=%d) result=%d\n", 718 ch->dac_idx, bus_crnt - bus_base)); 719 720 return (bus_crnt - bus_base); /* current byte offset of channel */ 721} 722 723static u_int32_t 724m3_pchan_getptr(kobj_t kobj, void *chdata) 725{ 726 struct sc_pchinfo *ch = chdata; 727 struct sc_info *sc = ch->parent; 728 u_int32_t ptr; 729 730 M3_LOCK(sc); 731 ptr = ch->ptr; 732 M3_UNLOCK(sc); 733 734 return (ptr); 735} 736 737static struct pcmchan_caps * 738m3_pchan_getcaps(kobj_t kobj, void *chdata) 739{ 740 struct sc_pchinfo *ch = chdata; 741 742 M3_DEBUG(CALL, ("m3_pchan_getcaps(dac=%d)\n", ch->dac_idx)); 743 744 return &m3_playcaps; 745} 746 747/* -------------------------------------------------------------------- */ 748/* rec channel interface */ 749 750static void * 751m3_rchan_init(kobj_t kobj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir) 752{ 753 struct sc_info *sc = devinfo; 754 struct sc_rchinfo *ch; 755 u_int32_t bus_addr, i; 756 757 int idx, data_bytes, adc_data; 758 int dsp_in_size, dsp_out_size, dsp_in_buf, dsp_out_buf; 759 760 struct data_word { 761 u_int16_t addr, val; 762 } rv[] = { 763 {CDATA_LEFT_VOLUME, M3_DEFAULT_VOL}, 764 {CDATA_RIGHT_VOLUME, M3_DEFAULT_VOL}, 765 {SRC3_DIRECTION_OFFSET, 1}, 766 {SRC3_DIRECTION_OFFSET + 3, 0x0000}, 767 {SRC3_DIRECTION_OFFSET + 4, 0}, 768 {SRC3_DIRECTION_OFFSET + 5, 0}, 769 {SRC3_DIRECTION_OFFSET + 6, 0}, 770 {SRC3_DIRECTION_OFFSET + 7, 0}, 771 {SRC3_DIRECTION_OFFSET + 8, 0}, 772 {SRC3_DIRECTION_OFFSET + 9, 0}, 773 {SRC3_DIRECTION_OFFSET + 10, 0x8000}, 774 {SRC3_DIRECTION_OFFSET + 11, 0xFF00}, 775 {SRC3_DIRECTION_OFFSET + 13, 0}, 776 {SRC3_DIRECTION_OFFSET + 14, 0}, 777 {SRC3_DIRECTION_OFFSET + 15, 0}, 778 {SRC3_DIRECTION_OFFSET + 16, 50}, 779 {SRC3_DIRECTION_OFFSET + 17, 8}, 780 {SRC3_DIRECTION_OFFSET + 18, 0}, 781 {SRC3_DIRECTION_OFFSET + 19, 0}, 782 {SRC3_DIRECTION_OFFSET + 20, 0}, 783 {SRC3_DIRECTION_OFFSET + 21, 0}, 784 {SRC3_DIRECTION_OFFSET + 22, 0xff} 785 }; 786 787 M3_LOCK(sc); 788 idx = sc->rch_cnt; /* adc instance number, no active reuse! */ 789 M3_DEBUG(CHANGE, ("m3_rchan_init(adc=%d)\n", idx)); 790 791 if (dir != PCMDIR_REC) { 792 M3_UNLOCK(sc); 793 device_printf(sc->dev, "m3_pchan_init not PCMDIR_REC\n"); 794 return (NULL); 795 } 796 797 data_bytes = (((MINISRC_TMP_BUFFER_SIZE & ~1) + 798 (MINISRC_IN_BUFFER_SIZE & ~1) + 799 (MINISRC_OUT_BUFFER_SIZE & ~1) + 4) + 255) &~ 255; 800 adc_data = 0x1100 + (data_bytes * idx) + data_bytes/2; 801 dsp_in_size = MINISRC_IN_BUFFER_SIZE + (0x10 * 2); 802 dsp_out_size = MINISRC_OUT_BUFFER_SIZE - (0x10 * 2); 803 dsp_in_buf = adc_data + (MINISRC_TMP_BUFFER_SIZE / 2); 804 dsp_out_buf = dsp_in_buf + (dsp_in_size / 2) + 1; 805 806 ch = &sc->rch[idx]; 807 ch->adc_idx = idx; 808 ch->adc_data = adc_data; 809 if (ch->adc_data + data_bytes/2 >= 0x1c00) { 810 M3_UNLOCK(sc); 811 device_printf(sc->dev, "m3_rchan_init: revb mem exhausted\n"); 812 return (NULL); 813 } 814 815 ch->buffer = b; 816 ch->parent = sc; 817 ch->channel = c; 818 ch->fmt = SND_FORMAT(AFMT_U8, 1, 0); 819 ch->spd = DSP_DEFAULT_SPEED; 820 M3_UNLOCK(sc); /* XXX */ 821 if (sndbuf_alloc(ch->buffer, sc->parent_dmat, 0, sc->bufsz) != 0) { 822 device_printf(sc->dev, "m3_rchan_init chn_allocbuf failed\n"); 823 return (NULL); 824 } 825 M3_LOCK(sc); 826 ch->bufsize = sndbuf_getsize(ch->buffer); 827 828 /* host dma buffer pointers */ 829 bus_addr = sndbuf_getbufaddr(ch->buffer); 830 if (bus_addr & 3) { 831 device_printf(sc->dev, "m3_rchan_init unaligned bus_addr\n"); 832 bus_addr = (bus_addr + 4) & ~3; 833 } 834 m3_wr_assp_data(sc, ch->adc_data + CDATA_HOST_SRC_ADDRL, LO(bus_addr)); 835 m3_wr_assp_data(sc, ch->adc_data + CDATA_HOST_SRC_ADDRH, HI(bus_addr)); 836 m3_wr_assp_data(sc, ch->adc_data + CDATA_HOST_SRC_END_PLUS_1L, 837 LO(bus_addr + ch->bufsize)); 838 m3_wr_assp_data(sc, ch->adc_data + CDATA_HOST_SRC_END_PLUS_1H, 839 HI(bus_addr + ch->bufsize)); 840 m3_wr_assp_data(sc, ch->adc_data + CDATA_HOST_SRC_CURRENTL, 841 LO(bus_addr)); 842 m3_wr_assp_data(sc, ch->adc_data + CDATA_HOST_SRC_CURRENTH, 843 HI(bus_addr)); 844 845 /* dsp buffers */ 846 m3_wr_assp_data(sc, ch->adc_data + CDATA_IN_BUF_BEGIN, dsp_in_buf); 847 m3_wr_assp_data(sc, ch->adc_data + CDATA_IN_BUF_END_PLUS_1, 848 dsp_in_buf + dsp_in_size/2); 849 m3_wr_assp_data(sc, ch->adc_data + CDATA_IN_BUF_HEAD, dsp_in_buf); 850 m3_wr_assp_data(sc, ch->adc_data + CDATA_IN_BUF_TAIL, dsp_in_buf); 851 m3_wr_assp_data(sc, ch->adc_data + CDATA_OUT_BUF_BEGIN, dsp_out_buf); 852 m3_wr_assp_data(sc, ch->adc_data + CDATA_OUT_BUF_END_PLUS_1, 853 dsp_out_buf + dsp_out_size/2); 854 m3_wr_assp_data(sc, ch->adc_data + CDATA_OUT_BUF_HEAD, dsp_out_buf); 855 m3_wr_assp_data(sc, ch->adc_data + CDATA_OUT_BUF_TAIL, dsp_out_buf); 856 857 /* some per client initializers */ 858 m3_wr_assp_data(sc, ch->adc_data + SRC3_DIRECTION_OFFSET + 12, 859 ch->adc_data + 40 + 8); 860 m3_wr_assp_data(sc, ch->adc_data + CDATA_DMA_CONTROL, 861 DMACONTROL_DIRECTION + DMACONTROL_AUTOREPEAT + 862 DMAC_PAGE3_SELECTOR + DMAC_BLOCKF_SELECTOR); 863 864 /* set an armload of static initializers */ 865 for(i = 0 ; i < (sizeof(rv) / sizeof(rv[0])) ; i++) { 866 m3_wr_assp_data(sc, ch->adc_data + rv[i].addr, rv[i].val); 867 } 868 869 /* put us in the packed task lists */ 870 m3_wr_assp_data(sc, KDATA_INSTANCE0_MINISRC + 871 (sc->pch_cnt + sc->rch_cnt), 872 ch->adc_data >> DP_SHIFT_COUNT); 873 m3_wr_assp_data(sc, KDATA_DMA_XFER0 + (sc->pch_cnt + sc->rch_cnt), 874 ch->adc_data >> DP_SHIFT_COUNT); 875 m3_wr_assp_data(sc, KDATA_ADC1_XFER0 + sc->rch_cnt, 876 ch->adc_data >> DP_SHIFT_COUNT); 877 878 /* gotta start before stop */ 879 m3_rchan_trigger_locked(NULL, ch, PCMTRIG_START); 880 /* stop on init */ 881 m3_rchan_trigger_locked(NULL, ch, PCMTRIG_STOP); 882 883 sc->rch_cnt++; 884 M3_UNLOCK(sc); 885 886 return (ch); 887} 888 889static int 890m3_rchan_free(kobj_t kobj, void *chdata) 891{ 892 struct sc_rchinfo *ch = chdata; 893 struct sc_info *sc = ch->parent; 894 895 M3_LOCK(sc); 896 M3_DEBUG(CHANGE, ("m3_rchan_free(adc=%d)\n", ch->adc_idx)); 897 898 /* 899 * should remove this exact instance from the packed lists, but all 900 * are released at once (and in a stopped state) so this is ok. 901 */ 902 m3_wr_assp_data(sc, KDATA_INSTANCE0_MINISRC + 903 (sc->rch_cnt - 1) + sc->pch_cnt, 0); 904 m3_wr_assp_data(sc, KDATA_DMA_XFER0 + 905 (sc->rch_cnt - 1) + sc->pch_cnt, 0); 906 m3_wr_assp_data(sc, KDATA_ADC1_XFER0 + (sc->rch_cnt - 1), 0); 907 sc->rch_cnt--; 908 M3_UNLOCK(sc); 909 910 return (0); 911} 912 913static int 914m3_rchan_setformat(kobj_t kobj, void *chdata, u_int32_t format) 915{ 916 struct sc_rchinfo *ch = chdata; 917 struct sc_info *sc = ch->parent; 918 u_int32_t data; 919 920 M3_LOCK(sc); 921 M3_DEBUG(CHANGE, 922 ("m3_rchan_setformat(dac=%d, format=0x%x{%s-%s})\n", 923 ch->adc_idx, format, 924 format & (AFMT_U8|AFMT_S8) ? "8bit":"16bit", 925 (AFMT_CHANNEL(format) > 1) ? "STEREO":"MONO")); 926 927 /* mono word */ 928 data = (AFMT_CHANNEL(format) > 1) ? 0 : 1; 929 m3_wr_assp_data(sc, ch->adc_data + SRC3_MODE_OFFSET, data); 930 931 /* 8bit word */ 932 data = ((format & AFMT_U8) || (format & AFMT_S8)) ? 1 : 0; 933 m3_wr_assp_data(sc, ch->adc_data + SRC3_WORD_LENGTH_OFFSET, data); 934 ch->fmt = format; 935 M3_UNLOCK(sc); 936 937 return (0); 938} 939 940static u_int32_t 941m3_rchan_setspeed(kobj_t kobj, void *chdata, u_int32_t speed) 942{ 943 struct sc_rchinfo *ch = chdata; 944 struct sc_info *sc = ch->parent; 945 u_int32_t freq; 946 947 M3_LOCK(sc); 948 M3_DEBUG(CHANGE, ("m3_rchan_setspeed(adc=%d, speed=%d)\n", 949 ch->adc_idx, speed)); 950 951 if ((freq = ((speed << 15) + 24000) / 48000) != 0) { 952 freq--; 953 } 954 955 m3_wr_assp_data(sc, ch->adc_data + CDATA_FREQUENCY, freq); 956 ch->spd = speed; 957 M3_UNLOCK(sc); 958 959 /* return closest possible speed */ 960 return (speed); 961} 962 963static u_int32_t 964m3_rchan_setblocksize(kobj_t kobj, void *chdata, u_int32_t blocksize) 965{ 966 struct sc_rchinfo *ch = chdata; 967 968 M3_DEBUG(CHANGE, ("m3_rchan_setblocksize(adc=%d, blocksize=%d)\n", 969 ch->adc_idx, blocksize)); 970 971 return (sndbuf_getblksz(ch->buffer)); 972} 973 974static int 975m3_rchan_trigger(kobj_t kobj, void *chdata, int go) 976{ 977 struct sc_rchinfo *ch = chdata; 978 struct sc_info *sc = ch->parent; 979 int ret; 980 981 if (!PCMTRIG_COMMON(go)) 982 return (0); 983 984 M3_LOCK(sc); 985 ret = m3_rchan_trigger_locked(kobj, chdata, go); 986 M3_UNLOCK(sc); 987 988 return (ret); 989} 990 991static int 992m3_rchan_trigger_locked(kobj_t kobj, void *chdata, int go) 993{ 994 struct sc_rchinfo *ch = chdata; 995 struct sc_info *sc = ch->parent; 996 u_int32_t data; 997 998 M3_LOCK_ASSERT(sc); 999 M3_DEBUG(go == PCMTRIG_START ? CHANGE : 1000 go == PCMTRIG_STOP ? CHANGE : 1001 go == PCMTRIG_ABORT ? CHANGE : 1002 CALL, 1003 ("m3_rchan_trigger(adc=%d, go=0x%x{%s})\n", ch->adc_idx, go, 1004 go == PCMTRIG_START ? "PCMTRIG_START" : 1005 go == PCMTRIG_STOP ? "PCMTRIG_STOP" : 1006 go == PCMTRIG_ABORT ? "PCMTRIG_ABORT" : "ignore")); 1007 1008 switch(go) { 1009 case PCMTRIG_START: 1010 if (ch->active) { 1011 return 0; 1012 } 1013 ch->active = 1; 1014 ch->ptr = 0; 1015 ch->prevptr = 0; 1016 1017 /*[[inc_timer_users]]*/ 1018 if (m3_chan_active(sc) == 1) { 1019 m3_wr_assp_data(sc, KDATA_TIMER_COUNT_RELOAD, 240); 1020 m3_wr_assp_data(sc, KDATA_TIMER_COUNT_CURRENT, 240); 1021 data = m3_rd_2(sc, HOST_INT_CTRL); 1022 m3_wr_2(sc, HOST_INT_CTRL, data | CLKRUN_GEN_ENABLE); 1023 } 1024 1025 m3_wr_assp_data(sc, KDATA_ADC1_REQUEST, 1); 1026 m3_wr_assp_data(sc, ch->adc_data + CDATA_INSTANCE_READY, 1); 1027 break; 1028 1029 case PCMTRIG_STOP: 1030 case PCMTRIG_ABORT: 1031 if (ch->active == 0) { 1032 return 0; 1033 } 1034 ch->active = 0; 1035 1036 /*[[dec_timer_users]]*/ 1037 if (m3_chan_active(sc) == 0) { 1038 m3_wr_assp_data(sc, KDATA_TIMER_COUNT_RELOAD, 0); 1039 m3_wr_assp_data(sc, KDATA_TIMER_COUNT_CURRENT, 0); 1040 data = m3_rd_2(sc, HOST_INT_CTRL); 1041 m3_wr_2(sc, HOST_INT_CTRL, data & ~CLKRUN_GEN_ENABLE); 1042 } 1043 1044 m3_wr_assp_data(sc, ch->adc_data + CDATA_INSTANCE_READY, 0); 1045 m3_wr_assp_data(sc, KDATA_ADC1_REQUEST, 0); 1046 break; 1047 1048 case PCMTRIG_EMLDMAWR: 1049 /* got play irq, transfer next buffer - ignore if using dma */ 1050 case PCMTRIG_EMLDMARD: 1051 /* got rec irq, transfer next buffer - ignore if using dma */ 1052 default: 1053 break; 1054 } 1055 return 0; 1056} 1057 1058static u_int32_t 1059m3_rchan_getptr_internal(struct sc_rchinfo *ch) 1060{ 1061 struct sc_info *sc = ch->parent; 1062 u_int32_t hi, lo, bus_base, bus_crnt; 1063 1064 bus_base = sndbuf_getbufaddr(ch->buffer); 1065 hi = m3_rd_assp_data(sc, ch->adc_data + CDATA_HOST_SRC_CURRENTH); 1066 lo = m3_rd_assp_data(sc, ch->adc_data + CDATA_HOST_SRC_CURRENTL); 1067 bus_crnt = lo | (hi << 16); 1068 1069 M3_DEBUG(CALL, ("m3_rchan_getptr(adc=%d) result=%d\n", 1070 ch->adc_idx, bus_crnt - bus_base)); 1071 1072 return (bus_crnt - bus_base); /* current byte offset of channel */ 1073} 1074 1075static u_int32_t 1076m3_rchan_getptr(kobj_t kobj, void *chdata) 1077{ 1078 struct sc_rchinfo *ch = chdata; 1079 struct sc_info *sc = ch->parent; 1080 u_int32_t ptr; 1081 1082 M3_LOCK(sc); 1083 ptr = ch->ptr; 1084 M3_UNLOCK(sc); 1085 1086 return (ptr); 1087} 1088 1089static struct pcmchan_caps * 1090m3_rchan_getcaps(kobj_t kobj, void *chdata) 1091{ 1092 struct sc_rchinfo *ch = chdata; 1093 1094 M3_DEBUG(CALL, ("m3_rchan_getcaps(adc=%d)\n", ch->adc_idx)); 1095 1096 return &m3_reccaps; 1097} 1098 1099/* -------------------------------------------------------------------- */ 1100/* The interrupt handler */ 1101 1102static void 1103m3_intr(void *p) 1104{ 1105 struct sc_info *sc = (struct sc_info *)p; 1106 struct sc_pchinfo *pch; 1107 struct sc_rchinfo *rch; 1108 u_int32_t status, ctl, i, delta; 1109 1110 M3_DEBUG(INTR, ("m3_intr\n")); 1111 1112 M3_LOCK(sc); 1113 status = m3_rd_1(sc, HOST_INT_STATUS); 1114 if (!status) { 1115 M3_UNLOCK(sc); 1116 return; 1117 } 1118 1119 m3_wr_1(sc, HOST_INT_STATUS, 0xff); /* ack the int? */ 1120 1121 if (status & HV_INT_PENDING) { 1122 u_int8_t event; 1123 1124 event = m3_rd_1(sc, HW_VOL_COUNTER_MASTER); 1125 switch (event) { 1126 case 0x99: 1127 mixer_hwvol_mute(sc->dev); 1128 break; 1129 case 0xaa: 1130 mixer_hwvol_step(sc->dev, 1, 1); 1131 break; 1132 case 0x66: 1133 mixer_hwvol_step(sc->dev, -1, -1); 1134 break; 1135 case 0x88: 1136 break; 1137 default: 1138 device_printf(sc->dev, "Unknown HWVOL event\n"); 1139 } 1140 m3_wr_1(sc, HW_VOL_COUNTER_MASTER, 0x88); 1141 1142 } 1143 1144 if (status & ASSP_INT_PENDING) { 1145 ctl = m3_rd_1(sc, ASSP_CONTROL_B); 1146 if (!(ctl & STOP_ASSP_CLOCK)) { 1147 ctl = m3_rd_1(sc, ASSP_HOST_INT_STATUS); 1148 if (ctl & DSP2HOST_REQ_TIMER) { 1149 m3_wr_1(sc, ASSP_HOST_INT_STATUS, 1150 DSP2HOST_REQ_TIMER); 1151 /*[[ess_update_ptr]]*/ 1152 goto m3_handle_channel_intr; 1153 } 1154 } 1155 } 1156 1157 goto m3_handle_channel_intr_out; 1158 1159m3_handle_channel_intr: 1160 for (i=0 ; i<sc->pch_cnt ; i++) { 1161 pch = &sc->pch[i]; 1162 if (pch->active) { 1163 pch->ptr = m3_pchan_getptr_internal(pch); 1164 delta = pch->bufsize + pch->ptr - pch->prevptr; 1165 delta %= pch->bufsize; 1166 if (delta < sndbuf_getblksz(pch->buffer)) 1167 continue; 1168 pch->prevptr = pch->ptr; 1169 M3_UNLOCK(sc); 1170 chn_intr(pch->channel); 1171 M3_LOCK(sc); 1172 } 1173 } 1174 for (i=0 ; i<sc->rch_cnt ; i++) { 1175 rch = &sc->rch[i]; 1176 if (rch->active) { 1177 rch->ptr = m3_rchan_getptr_internal(rch); 1178 delta = rch->bufsize + rch->ptr - rch->prevptr; 1179 delta %= rch->bufsize; 1180 if (delta < sndbuf_getblksz(rch->buffer)) 1181 continue; 1182 rch->prevptr = rch->ptr; 1183 M3_UNLOCK(sc); 1184 chn_intr(rch->channel); 1185 M3_LOCK(sc); 1186 } 1187 } 1188 1189m3_handle_channel_intr_out: 1190 M3_UNLOCK(sc); 1191} 1192 1193/* -------------------------------------------------------------------- */ 1194/* stuff */ 1195 1196static int 1197m3_power(struct sc_info *sc, int state) 1198{ 1199 u_int32_t data; 1200 1201 M3_DEBUG(CHANGE, ("m3_power(%d)\n", state)); 1202 M3_LOCK_ASSERT(sc); 1203 1204 data = pci_read_config(sc->dev, 0x34, 1); 1205 if (pci_read_config(sc->dev, data, 1) == 1) { 1206 pci_write_config(sc->dev, data + 4, state, 1); 1207 } 1208 1209 return 0; 1210} 1211 1212static int 1213m3_init(struct sc_info *sc) 1214{ 1215 u_int32_t data, i, size; 1216 u_int8_t reset_state; 1217 1218 M3_LOCK_ASSERT(sc); 1219 M3_DEBUG(CHANGE, ("m3_init\n")); 1220 1221 /* diable legacy emulations. */ 1222 data = pci_read_config(sc->dev, PCI_LEGACY_AUDIO_CTRL, 2); 1223 data |= DISABLE_LEGACY; 1224 pci_write_config(sc->dev, PCI_LEGACY_AUDIO_CTRL, data, 2); 1225 1226 m3_config(sc); 1227 1228 reset_state = m3_assp_halt(sc); 1229 1230 m3_codec_reset(sc); 1231 1232 /* [m3_assp_init] */ 1233 /* zero kernel data */ 1234 size = REV_B_DATA_MEMORY_UNIT_LENGTH * NUM_UNITS_KERNEL_DATA; 1235 for(i = 0 ; i < size / 2 ; i++) { 1236 m3_wr_assp_data(sc, KDATA_BASE_ADDR + i, 0); 1237 } 1238 /* zero mixer data? */ 1239 size = REV_B_DATA_MEMORY_UNIT_LENGTH * NUM_UNITS_KERNEL_DATA; 1240 for(i = 0 ; i < size / 2 ; i++) { 1241 m3_wr_assp_data(sc, KDATA_BASE_ADDR2 + i, 0); 1242 } 1243 /* init dma pointer */ 1244 m3_wr_assp_data(sc, KDATA_CURRENT_DMA, 1245 KDATA_DMA_XFER0); 1246 /* write kernel into code memory */ 1247 size = sizeof(gaw_kernel_vect_code); 1248 for(i = 0 ; i < size / 2; i++) { 1249 m3_wr_assp_code(sc, REV_B_CODE_MEMORY_BEGIN + i, 1250 gaw_kernel_vect_code[i]); 1251 } 1252 /* 1253 * We only have this one client and we know that 0x400 is free in 1254 * our kernel's mem map, so lets just drop it there. It seems that 1255 * the minisrc doesn't need vectors, so we won't bother with them.. 1256 */ 1257 size = sizeof(gaw_minisrc_code_0400); 1258 for(i = 0 ; i < size / 2; i++) { 1259 m3_wr_assp_code(sc, 0x400 + i, gaw_minisrc_code_0400[i]); 1260 } 1261 /* write the coefficients for the low pass filter? */ 1262 size = sizeof(minisrc_lpf); 1263 for(i = 0; i < size / 2 ; i++) { 1264 m3_wr_assp_code(sc,0x400 + MINISRC_COEF_LOC + i, 1265 minisrc_lpf[i]); 1266 } 1267 m3_wr_assp_code(sc, 0x400 + MINISRC_COEF_LOC + size, 0x8000); 1268 /* the minisrc is the only thing on our task list */ 1269 m3_wr_assp_data(sc, KDATA_TASK0, 0x400); 1270 /* init the mixer number */ 1271 m3_wr_assp_data(sc, KDATA_MIXER_TASK_NUMBER, 0); 1272 /* extreme kernel master volume */ 1273 m3_wr_assp_data(sc, KDATA_DAC_LEFT_VOLUME, M3_DEFAULT_VOL); 1274 m3_wr_assp_data(sc, KDATA_DAC_RIGHT_VOLUME, M3_DEFAULT_VOL); 1275 1276 m3_amp_enable(sc); 1277 1278 /* [m3_assp_client_init] (only one client at index 0) */ 1279 for (i=0x1100 ; i<0x1c00 ; i++) { 1280 m3_wr_assp_data(sc, i, 0); /* zero entire dac/adc area */ 1281 } 1282 1283 /* [m3_assp_continue] */ 1284 m3_wr_1(sc, DSP_PORT_CONTROL_REG_B, reset_state | REGB_ENABLE_RESET); 1285 1286 return 0; 1287} 1288 1289static int 1290m3_uninit(struct sc_info *sc) 1291{ 1292 M3_DEBUG(CHANGE, ("m3_uninit\n")); 1293 return 0; 1294} 1295 1296/* -------------------------------------------------------------------- */ 1297/* Probe and attach the card */ 1298 1299static int 1300m3_pci_probe(device_t dev) 1301{ 1302 struct m3_card_type *card; 1303 1304 M3_DEBUG(CALL, ("m3_pci_probe(0x%x)\n", pci_get_devid(dev))); 1305 1306 for (card = m3_card_types ; card->pci_id ; card++) { 1307 if (pci_get_devid(dev) == card->pci_id) { 1308 device_set_desc(dev, card->name); 1309 return BUS_PROBE_DEFAULT; 1310 } 1311 } 1312 return ENXIO; 1313} 1314 1315static int 1316m3_pci_attach(device_t dev) 1317{ 1318 struct sc_info *sc; 1319 struct ac97_info *codec = NULL; 1320 char status[SND_STATUSLEN]; 1321 struct m3_card_type *card; 1322 int i, len, dacn, adcn; 1323 1324 M3_DEBUG(CALL, ("m3_pci_attach\n")); 1325 1326 sc = malloc(sizeof(*sc), M_DEVBUF, M_WAITOK | M_ZERO); 1327 sc->dev = dev; 1328 sc->type = pci_get_devid(dev); 1329 sc->sc_lock = snd_mtxcreate(device_get_nameunit(dev), 1330 "snd_maestro3 softc"); 1331 for (card = m3_card_types ; card->pci_id ; card++) { 1332 if (sc->type == card->pci_id) { 1333 sc->which = card->which; 1334 sc->delay1 = card->delay1; 1335 sc->delay2 = card->delay2; 1336 break; 1337 } 1338 } 1339 1340 if (resource_int_value(device_get_name(dev), device_get_unit(dev), 1341 "dac", &i) == 0) { 1342 if (i < 1) 1343 dacn = 1; 1344 else if (i > M3_PCHANS) 1345 dacn = M3_PCHANS; 1346 else 1347 dacn = i; 1348 } else 1349 dacn = M3_PCHANS; 1350 1351 adcn = M3_RCHANS; 1352 1353 pci_enable_busmaster(dev); 1354 1355 sc->regid = PCIR_BAR(0); 1356 sc->regtype = SYS_RES_MEMORY; 1357 sc->reg = bus_alloc_resource_any(dev, sc->regtype, &sc->regid, 1358 RF_ACTIVE); 1359 if (!sc->reg) { 1360 sc->regtype = SYS_RES_IOPORT; 1361 sc->reg = bus_alloc_resource_any(dev, sc->regtype, &sc->regid, 1362 RF_ACTIVE); 1363 } 1364 if (!sc->reg) { 1365 device_printf(dev, "unable to allocate register space\n"); 1366 goto bad; 1367 } 1368 sc->st = rman_get_bustag(sc->reg); 1369 sc->sh = rman_get_bushandle(sc->reg); 1370 1371 sc->irqid = 0; 1372 sc->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->irqid, 1373 RF_ACTIVE | RF_SHAREABLE); 1374 if (!sc->irq) { 1375 device_printf(dev, "unable to allocate interrupt\n"); 1376 goto bad; 1377 } 1378 1379 if (snd_setup_intr(dev, sc->irq, INTR_MPSAFE, m3_intr, sc, &sc->ih)) { 1380 device_printf(dev, "unable to setup interrupt\n"); 1381 goto bad; 1382 } 1383 1384 sc->bufsz = pcm_getbuffersize(dev, M3_BUFSIZE_MIN, M3_BUFSIZE_DEFAULT, 1385 M3_BUFSIZE_MAX); 1386 1387 if (bus_dma_tag_create( 1388 bus_get_dma_tag(dev), /* parent */ 1389 2, 0, /* alignment, boundary */ 1390 M3_MAXADDR, /* lowaddr */ 1391 BUS_SPACE_MAXADDR, /* highaddr */ 1392 NULL, NULL, /* filtfunc, filtfuncarg */ 1393 sc->bufsz, /* maxsize */ 1394 1, /* nsegments */ 1395 0x3ffff, /* maxsegz */ 1396 0, /* flags */ 1397 NULL, /* lockfunc */ 1398 NULL, /* lockfuncarg */ 1399 &sc->parent_dmat) != 0) { 1400 device_printf(dev, "unable to create dma tag\n"); 1401 goto bad; 1402 } 1403 1404 M3_LOCK(sc); 1405 m3_power(sc, 0); /* power up */ 1406 /* init chip */ 1407 i = m3_init(sc); 1408 M3_UNLOCK(sc); 1409 if (i == -1) { 1410 device_printf(dev, "unable to initialize the card\n"); 1411 goto bad; 1412 } 1413 1414 /* create/init mixer */ 1415 codec = AC97_CREATE(dev, sc, m3_codec); 1416 if (codec == NULL) { 1417 device_printf(dev, "ac97_create error\n"); 1418 goto bad; 1419 } 1420 if (mixer_init(dev, ac97_getmixerclass(), codec)) { 1421 device_printf(dev, "mixer_init error\n"); 1422 goto bad; 1423 } 1424 1425 m3_enable_ints(sc); 1426 1427 if (pcm_register(dev, sc, dacn, adcn)) { 1428 device_printf(dev, "pcm_register error\n"); 1429 goto bad; 1430 } 1431 for (i=0 ; i<dacn ; i++) { 1432 if (pcm_addchan(dev, PCMDIR_PLAY, &m3_pch_class, sc)) { 1433 device_printf(dev, "pcm_addchan (play) error\n"); 1434 goto bad; 1435 } 1436 } 1437 for (i=0 ; i<adcn ; i++) { 1438 if (pcm_addchan(dev, PCMDIR_REC, &m3_rch_class, sc)) { 1439 device_printf(dev, "pcm_addchan (rec) error\n"); 1440 goto bad; 1441 } 1442 } 1443 snprintf(status, SND_STATUSLEN, "at %s 0x%lx irq %ld %s", 1444 (sc->regtype == SYS_RES_IOPORT)? "io" : "memory", 1445 rman_get_start(sc->reg), rman_get_start(sc->irq), 1446 PCM_KLDSTRING(snd_maestro3)); 1447 if (pcm_setstatus(dev, status)) { 1448 device_printf(dev, "attach: pcm_setstatus error\n"); 1449 goto bad; 1450 } 1451 1452 mixer_hwvol_init(dev); 1453 1454 /* Create the buffer for saving the card state during suspend */ 1455 len = sizeof(u_int16_t) * (REV_B_CODE_MEMORY_LENGTH + 1456 REV_B_DATA_MEMORY_LENGTH); 1457 sc->savemem = (u_int16_t*)malloc(len, M_DEVBUF, M_WAITOK | M_ZERO); 1458 1459 return 0; 1460 1461 bad: 1462 if (codec) 1463 ac97_destroy(codec); 1464 if (sc->ih) 1465 bus_teardown_intr(dev, sc->irq, sc->ih); 1466 if (sc->irq) 1467 bus_release_resource(dev, SYS_RES_IRQ, sc->irqid, sc->irq); 1468 if (sc->reg) 1469 bus_release_resource(dev, sc->regtype, sc->regid, sc->reg); 1470 if (sc->parent_dmat) 1471 bus_dma_tag_destroy(sc->parent_dmat); 1472 if (sc->sc_lock) 1473 snd_mtxfree(sc->sc_lock); 1474 free(sc, M_DEVBUF); 1475 return ENXIO; 1476} 1477 1478static int 1479m3_pci_detach(device_t dev) 1480{ 1481 struct sc_info *sc = pcm_getdevinfo(dev); 1482 int r; 1483 1484 M3_DEBUG(CALL, ("m3_pci_detach\n")); 1485 1486 if ((r = pcm_unregister(dev)) != 0) { 1487 return r; 1488 } 1489 1490 M3_LOCK(sc); 1491 m3_uninit(sc); /* shutdown chip */ 1492 m3_power(sc, 3); /* power off */ 1493 M3_UNLOCK(sc); 1494 1495 bus_teardown_intr(dev, sc->irq, sc->ih); 1496 bus_release_resource(dev, SYS_RES_IRQ, sc->irqid, sc->irq); 1497 bus_release_resource(dev, sc->regtype, sc->regid, sc->reg); 1498 bus_dma_tag_destroy(sc->parent_dmat); 1499 1500 free(sc->savemem, M_DEVBUF); 1501 snd_mtxfree(sc->sc_lock); 1502 free(sc, M_DEVBUF); 1503 return 0; 1504} 1505 1506static int 1507m3_pci_suspend(device_t dev) 1508{ 1509 struct sc_info *sc = pcm_getdevinfo(dev); 1510 int i, index = 0; 1511 1512 M3_DEBUG(CHANGE, ("m3_pci_suspend\n")); 1513 1514 M3_LOCK(sc); 1515 for (i=0 ; i<sc->pch_cnt ; i++) { 1516 if (sc->pch[i].active) { 1517 m3_pchan_trigger_locked(NULL, &sc->pch[i], 1518 PCMTRIG_STOP); 1519 } 1520 } 1521 for (i=0 ; i<sc->rch_cnt ; i++) { 1522 if (sc->rch[i].active) { 1523 m3_rchan_trigger_locked(NULL, &sc->rch[i], 1524 PCMTRIG_STOP); 1525 } 1526 } 1527 DELAY(10 * 1000); /* give things a chance to stop */ 1528 1529 /* Disable interrupts */ 1530 m3_wr_2(sc, HOST_INT_CTRL, 0); 1531 m3_wr_1(sc, ASSP_CONTROL_C, 0); 1532 1533 m3_assp_halt(sc); 1534 1535 /* Save the state of the ASSP */ 1536 for (i = REV_B_CODE_MEMORY_BEGIN; i <= REV_B_CODE_MEMORY_END; i++) 1537 sc->savemem[index++] = m3_rd_assp_code(sc, i); 1538 for (i = REV_B_DATA_MEMORY_BEGIN; i <= REV_B_DATA_MEMORY_END; i++) 1539 sc->savemem[index++] = m3_rd_assp_data(sc, i); 1540 1541 /* Power down the card to D3 state */ 1542 m3_power(sc, 3); 1543 M3_UNLOCK(sc); 1544 1545 return 0; 1546} 1547 1548static int 1549m3_pci_resume(device_t dev) 1550{ 1551 struct sc_info *sc = pcm_getdevinfo(dev); 1552 int i, index = 0; 1553 u_int8_t reset_state; 1554 1555 M3_DEBUG(CHANGE, ("m3_pci_resume\n")); 1556 1557 M3_LOCK(sc); 1558 /* Power the card back to D0 */ 1559 m3_power(sc, 0); 1560 1561 m3_config(sc); 1562 1563 reset_state = m3_assp_halt(sc); 1564 1565 m3_codec_reset(sc); 1566 1567 /* Restore the ASSP state */ 1568 for (i = REV_B_CODE_MEMORY_BEGIN; i <= REV_B_CODE_MEMORY_END; i++) 1569 m3_wr_assp_code(sc, i, sc->savemem[index++]); 1570 for (i = REV_B_DATA_MEMORY_BEGIN; i <= REV_B_DATA_MEMORY_END; i++) 1571 m3_wr_assp_data(sc, i, sc->savemem[index++]); 1572 1573 /* Restart the DMA engine */ 1574 m3_wr_assp_data(sc, KDATA_DMA_ACTIVE, 0); 1575 1576 /* [m3_assp_continue] */ 1577 m3_wr_1(sc, DSP_PORT_CONTROL_REG_B, reset_state | REGB_ENABLE_RESET); 1578 1579 m3_amp_enable(sc); 1580 1581 m3_enable_ints(sc); 1582 1583 M3_UNLOCK(sc); /* XXX */ 1584 if (mixer_reinit(dev) == -1) { 1585 device_printf(dev, "unable to reinitialize the mixer\n"); 1586 return (ENXIO); 1587 } 1588 M3_LOCK(sc); 1589 1590 /* Turn the channels back on */ 1591 for (i=0 ; i<sc->pch_cnt ; i++) { 1592 if (sc->pch[i].active) { 1593 m3_pchan_trigger_locked(NULL, &sc->pch[i], 1594 PCMTRIG_START); 1595 } 1596 } 1597 for (i=0 ; i<sc->rch_cnt ; i++) { 1598 if (sc->rch[i].active) { 1599 m3_rchan_trigger_locked(NULL, &sc->rch[i], 1600 PCMTRIG_START); 1601 } 1602 } 1603 1604 M3_UNLOCK(sc); 1605 return 0; 1606} 1607 1608static int 1609m3_pci_shutdown(device_t dev) 1610{ 1611 struct sc_info *sc = pcm_getdevinfo(dev); 1612 1613 M3_DEBUG(CALL, ("m3_pci_shutdown\n")); 1614 1615 M3_LOCK(sc); 1616 m3_power(sc, 3); /* power off */ 1617 M3_UNLOCK(sc); 1618 1619 return 0; 1620} 1621 1622static u_int8_t 1623m3_assp_halt(struct sc_info *sc) 1624{ 1625 u_int8_t data, reset_state; 1626 1627 M3_LOCK_ASSERT(sc); 1628 1629 data = m3_rd_1(sc, DSP_PORT_CONTROL_REG_B); 1630 reset_state = data & ~REGB_STOP_CLOCK; /* remember for continue */ 1631 DELAY(10 * 1000); 1632 m3_wr_1(sc, DSP_PORT_CONTROL_REG_B, reset_state & ~REGB_ENABLE_RESET); 1633 DELAY(10 * 1000); /* necessary? */ 1634 1635 return reset_state; 1636} 1637 1638static void 1639m3_config(struct sc_info *sc) 1640{ 1641 u_int32_t data, hv_cfg; 1642 int hint; 1643 1644 M3_LOCK_ASSERT(sc); 1645 1646 M3_UNLOCK(sc); 1647 /* 1648 * The volume buttons can be wired up via two different sets of pins. 1649 * This presents a problem since we can't tell which way it's 1650 * configured. Allow the user to set a hint in order to twiddle 1651 * the proper bits. 1652 */ 1653 if (resource_int_value(device_get_name(sc->dev), 1654 device_get_unit(sc->dev), 1655 "hwvol_config", &hint) == 0) 1656 hv_cfg = (hint > 0) ? HV_BUTTON_FROM_GD : 0; 1657 else 1658 hv_cfg = HV_BUTTON_FROM_GD; 1659 M3_LOCK(sc); 1660 1661 data = pci_read_config(sc->dev, PCI_ALLEGRO_CONFIG, 4); 1662 data &= ~HV_BUTTON_FROM_GD; 1663 data |= REDUCED_DEBOUNCE | HV_CTRL_ENABLE | hv_cfg; 1664 data |= PM_CTRL_ENABLE | CLK_DIV_BY_49 | USE_PCI_TIMING; 1665 pci_write_config(sc->dev, PCI_ALLEGRO_CONFIG, data, 4); 1666 1667 m3_wr_1(sc, ASSP_CONTROL_B, RESET_ASSP); 1668 data = pci_read_config(sc->dev, PCI_ALLEGRO_CONFIG, 4); 1669 data &= ~INT_CLK_SELECT; 1670 if (sc->which == ESS_MAESTRO3) { 1671 data &= ~INT_CLK_MULT_ENABLE; 1672 data |= INT_CLK_SRC_NOT_PCI; 1673 } 1674 data &= ~(CLK_MULT_MODE_SELECT | CLK_MULT_MODE_SELECT_2); 1675 pci_write_config(sc->dev, PCI_ALLEGRO_CONFIG, data, 4); 1676 1677 if (sc->which == ESS_ALLEGRO_1) { 1678 data = pci_read_config(sc->dev, PCI_USER_CONFIG, 4); 1679 data |= IN_CLK_12MHZ_SELECT; 1680 pci_write_config(sc->dev, PCI_USER_CONFIG, data, 4); 1681 } 1682 1683 data = m3_rd_1(sc, ASSP_CONTROL_A); 1684 data &= ~(DSP_CLK_36MHZ_SELECT | ASSP_CLK_49MHZ_SELECT); 1685 data |= ASSP_CLK_49MHZ_SELECT; /*XXX assumes 49MHZ dsp XXX*/ 1686 data |= ASSP_0_WS_ENABLE; 1687 m3_wr_1(sc, ASSP_CONTROL_A, data); 1688 1689 m3_wr_1(sc, ASSP_CONTROL_B, RUN_ASSP); 1690} 1691 1692static void 1693m3_enable_ints(struct sc_info *sc) 1694{ 1695 u_int8_t data; 1696 1697 m3_wr_2(sc, HOST_INT_CTRL, ASSP_INT_ENABLE | HV_INT_ENABLE); 1698 data = m3_rd_1(sc, ASSP_CONTROL_C); 1699 m3_wr_1(sc, ASSP_CONTROL_C, data | ASSP_HOST_INT_ENABLE); 1700} 1701 1702static void 1703m3_amp_enable(struct sc_info *sc) 1704{ 1705 u_int32_t gpo, polarity_port, polarity; 1706 u_int16_t data; 1707 1708 M3_LOCK_ASSERT(sc); 1709 1710 switch (sc->which) { 1711 case ESS_ALLEGRO_1: 1712 polarity_port = 0x1800; 1713 break; 1714 case ESS_MAESTRO3: 1715 polarity_port = 0x1100; 1716 break; 1717 default: 1718 panic("bad sc->which"); 1719 } 1720 gpo = (polarity_port >> 8) & 0x0f; 1721 polarity = polarity_port >> 12; 1722 polarity = !polarity; /* enable */ 1723 polarity = polarity << gpo; 1724 gpo = 1 << gpo; 1725 m3_wr_2(sc, GPIO_MASK, ~gpo); 1726 data = m3_rd_2(sc, GPIO_DIRECTION); 1727 m3_wr_2(sc, GPIO_DIRECTION, data | gpo); 1728 data = GPO_SECONDARY_AC97 | GPO_PRIMARY_AC97 | polarity; 1729 m3_wr_2(sc, GPIO_DATA, data); 1730 m3_wr_2(sc, GPIO_MASK, ~0); 1731} 1732 1733static void 1734m3_codec_reset(struct sc_info *sc) 1735{ 1736 u_int16_t data, dir; 1737 int retry = 0; 1738 1739 M3_LOCK_ASSERT(sc); 1740 do { 1741 data = m3_rd_2(sc, GPIO_DIRECTION); 1742 dir = data | 0x10; /* assuming pci bus master? */ 1743 1744 /* [[remote_codec_config]] */ 1745 data = m3_rd_2(sc, RING_BUS_CTRL_B); 1746 m3_wr_2(sc, RING_BUS_CTRL_B, data & ~SECOND_CODEC_ID_MASK); 1747 data = m3_rd_2(sc, SDO_OUT_DEST_CTRL); 1748 m3_wr_2(sc, SDO_OUT_DEST_CTRL, data & ~COMMAND_ADDR_OUT); 1749 data = m3_rd_2(sc, SDO_IN_DEST_CTRL); 1750 m3_wr_2(sc, SDO_IN_DEST_CTRL, data & ~STATUS_ADDR_IN); 1751 1752 m3_wr_2(sc, RING_BUS_CTRL_A, IO_SRAM_ENABLE); 1753 DELAY(20); 1754 1755 m3_wr_2(sc, GPIO_DIRECTION, dir & ~GPO_PRIMARY_AC97); 1756 m3_wr_2(sc, GPIO_MASK, ~GPO_PRIMARY_AC97); 1757 m3_wr_2(sc, GPIO_DATA, 0); 1758 m3_wr_2(sc, GPIO_DIRECTION, dir | GPO_PRIMARY_AC97); 1759 DELAY(sc->delay1 * 1000); /*delay1 (ALLEGRO:50, MAESTRO3:20)*/ 1760 m3_wr_2(sc, GPIO_DATA, GPO_PRIMARY_AC97); 1761 DELAY(5); 1762 m3_wr_2(sc, RING_BUS_CTRL_A, IO_SRAM_ENABLE | 1763 SERIAL_AC_LINK_ENABLE); 1764 m3_wr_2(sc, GPIO_MASK, ~0); 1765 DELAY(sc->delay2 * 1000); /*delay2 (ALLEGRO:800, MAESTRO3:500)*/ 1766 1767 /* [[try read vendor]] */ 1768 data = m3_rdcd(NULL, sc, 0x7c); 1769 if ((data == 0) || (data == 0xffff)) { 1770 retry++; 1771 if (retry > 3) { 1772 device_printf(sc->dev, "Codec reset failed\n"); 1773 break; 1774 } 1775 device_printf(sc->dev, "Codec reset retry\n"); 1776 } else retry = 0; 1777 } while (retry); 1778} 1779 1780static device_method_t m3_methods[] = { 1781 DEVMETHOD(device_probe, m3_pci_probe), 1782 DEVMETHOD(device_attach, m3_pci_attach), 1783 DEVMETHOD(device_detach, m3_pci_detach), 1784 DEVMETHOD(device_suspend, m3_pci_suspend), 1785 DEVMETHOD(device_resume, m3_pci_resume), 1786 DEVMETHOD(device_shutdown, m3_pci_shutdown), 1787 { 0, 0 } 1788}; 1789 1790static driver_t m3_driver = { 1791 "pcm", 1792 m3_methods, 1793 PCM_SOFTC_SIZE, 1794}; 1795 1796DRIVER_MODULE(snd_maestro3, pci, m3_driver, pcm_devclass, 0, 0); 1797MODULE_DEPEND(snd_maestro3, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER); 1798MODULE_VERSION(snd_maestro3, 1); 1799