es137x.c revision 60958
150724Scg/* 253413Sroger * Support the ENSONIQ AudioPCI board and Creative Labs SoundBlaster PCI 353413Sroger * boards based on the ES1370, ES1371 and ES1373 chips. 450724Scg * 553413Sroger * Copyright (c) 1999 Russell Cattelan <cattelan@thebarn.com> 650724Scg * Copyright (c) 1999 Cameron Grant <gandalf@vilnya.demon.co.uk> 750724Scg * Copyright (c) 1998 by Joachim Kuebart. All rights reserved. 850724Scg * 950724Scg * Redistribution and use in source and binary forms, with or without 1050724Scg * modification, are permitted provided that the following conditions 1150724Scg * are met: 1250724Scg * 1350724Scg * 1. Redistributions of source code must retain the above copyright 1450724Scg * notice, this list of conditions and the following disclaimer. 1550724Scg * 1650724Scg * 2. Redistributions in binary form must reproduce the above copyright 1750724Scg * notice, this list of conditions and the following disclaimer in 1850724Scg * the documentation and/or other materials provided with the 1950724Scg * distribution. 2050724Scg * 2150724Scg * 3. All advertising materials mentioning features or use of this 2250724Scg * software must display the following acknowledgement: 2350724Scg * This product includes software developed by Joachim Kuebart. 2450724Scg * 2550724Scg * 4. The name of the author may not be used to endorse or promote 2650724Scg * products derived from this software without specific prior 2750724Scg * written permission. 2850724Scg * 2950724Scg * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED 3050724Scg * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 3150724Scg * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE 3250724Scg * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, 3350724Scg * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 3450724Scg * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 3550724Scg * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 3650724Scg * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 3750724Scg * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 3850724Scg * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 3950724Scg * OF THE POSSIBILITY OF SUCH DAMAGE. 4050724Scg * 4150733Speter * $FreeBSD: head/sys/dev/sound/pci/es137x.c 60958 2000-05-26 21:15:47Z cg $ 4250724Scg */ 4350724Scg 4453413Sroger/* 4553413Sroger * Part of this code was heavily inspired by the linux driver from 4653413Sroger * Thomas Sailer (sailer@ife.ee.ethz.ch) 4754831Scg * Just about everything has been touched and reworked in some way but 4854831Scg * the all the underlying sequences/timing/register values are from 4953413Sroger * Thomas' code. 5053413Sroger * 5153413Sroger*/ 5253413Sroger 5353465Scg#include <dev/sound/pcm/sound.h> 5453465Scg#include <dev/sound/pcm/ac97.h> 5553465Scg#include <dev/sound/pci/es137x.h> 5650724Scg 5750724Scg#include <pci/pcireg.h> 5850724Scg#include <pci/pcivar.h> 5950724Scg 6053413Sroger#include <sys/sysctl.h> 6153413Sroger 6253413Srogerstatic int debug = 0; 6353413SrogerSYSCTL_INT(_debug, OID_AUTO, es_debug, CTLFLAG_RW, &debug, 0, ""); 6453413Sroger 6550724Scg#define MEM_MAP_REG 0x14 6650724Scg 6750724Scg/* PCI IDs of supported chips */ 6850724Scg#define ES1370_PCI_ID 0x50001274 6953413Sroger#define ES1371_PCI_ID 0x13711274 7056154Speter#define ES1371_PCI_ID2 0x13713274 7150724Scg 7259019Scg#define ES_BUFFSIZE 4096 7359019Scg 7450724Scg/* device private data */ 7550724Scgstruct es_info; 7650724Scg 7755209Scgstruct es_chinfo { 7850724Scg struct es_info *parent; 7950724Scg pcm_channel *channel; 8050724Scg snd_dbuf *buffer; 8154831Scg int dir, num; 8250724Scg u_int32_t fmt; 8355209Scg}; 8450724Scg 8555209Scgstruct es_info { 8650724Scg bus_space_tag_t st; 8750724Scg bus_space_handle_t sh; 8850724Scg bus_dma_tag_t parent_dmat; 8950724Scg 9059019Scg device_t dev; 9154831Scg int num; 9250724Scg /* Contents of board's registers */ 9350724Scg u_long ctrl; 9450724Scg u_long sctrl; 9550724Scg struct es_chinfo pch, rch; 9655209Scg}; 9750724Scg 9850724Scg/* -------------------------------------------------------------------- */ 9954831Scg 10053413Sroger/* prototypes */ 10154831Scgstatic void es_intr(void *); 10250724Scg 10354831Scgstatic void es1371_wrcodec(void *, int, u_int32_t); 10454831Scgstatic u_int32_t es1371_rdcodec(void *, int); 10555209Scgstatic u_int es1371_wait_src_ready(struct es_info *); 10655209Scgstatic void es1371_src_write(struct es_info *, u_short, unsigned short); 10755209Scgstatic u_int es1371_adc_rate(struct es_info *, u_int, int); 10855209Scgstatic u_int es1371_dac_rate(struct es_info *, u_int, int); 10955209Scgstatic int es1371_init(struct es_info *es, int); 11054831Scgstatic int es1370_init(struct es_info *); 11154831Scgstatic int es1370_wrcodec(struct es_info *, u_char, u_char); 11250724Scg 11350724Scg/* channel interface */ 11450724Scgstatic void *eschan_init(void *devinfo, snd_dbuf *b, pcm_channel *c, int dir); 11554831Scgstatic int eschan_setdir(void *data, int dir); 11654831Scgstatic int eschan_setformat(void *data, u_int32_t format); 11754831Scgstatic int eschan1370_setspeed(void *data, u_int32_t speed); 11855209Scgstatic int eschan1371_setspeed(void *data, u_int32_t speed); 11954831Scgstatic int eschan_setblocksize(void *data, u_int32_t blocksize); 12054831Scgstatic int eschan_trigger(void *data, int go); 12154831Scgstatic int eschan_getptr(void *data); 12250724Scgstatic pcmchan_caps *eschan_getcaps(void *data); 12350724Scg 12450724Scgstatic pcmchan_caps es_playcaps = { 12550724Scg 4000, 48000, 12650724Scg AFMT_STEREO | AFMT_U8 | AFMT_S16_LE, 12750724Scg AFMT_STEREO | AFMT_S16_LE 12850724Scg}; 12950724Scg 13050724Scgstatic pcmchan_caps es_reccaps = { 13150724Scg 4000, 48000, 13250724Scg AFMT_STEREO | AFMT_U8 | AFMT_S16_LE, 13350724Scg AFMT_STEREO | AFMT_S16_LE 13450724Scg}; 13550724Scg 13654831Scgstatic pcm_channel es1370_chantemplate = { 13750724Scg eschan_init, 13850724Scg eschan_setdir, 13950724Scg eschan_setformat, 14054831Scg eschan1370_setspeed, 14150724Scg eschan_setblocksize, 14250724Scg eschan_trigger, 14350724Scg eschan_getptr, 14450724Scg eschan_getcaps, 14550724Scg}; 14650724Scg 14754831Scgstatic pcm_channel es1371_chantemplate = { 14854831Scg eschan_init, 14954831Scg eschan_setdir, 15054831Scg eschan_setformat, 15154831Scg eschan1371_setspeed, 15254831Scg eschan_setblocksize, 15354831Scg eschan_trigger, 15454831Scg eschan_getptr, 15554831Scg eschan_getcaps, 15654831Scg}; 15754831Scg 15850724Scg/* -------------------------------------------------------------------- */ 15950724Scg 16054831Scg/* The es1370 mixer interface */ 16150724Scg 16254831Scgstatic int es1370_mixinit(snd_mixer *m); 16354831Scgstatic int es1370_mixset(snd_mixer *m, unsigned dev, unsigned left, unsigned right); 16454831Scgstatic int es1370_mixsetrecsrc(snd_mixer *m, u_int32_t src); 16550724Scg 16654831Scgstatic snd_mixer es1370_mixer = { 16754831Scg "AudioPCI 1370 mixer", 16854831Scg es1370_mixinit, 16954831Scg es1370_mixset, 17054831Scg es1370_mixsetrecsrc, 17150724Scg}; 17250724Scg 17350724Scgstatic const struct { 17450724Scg unsigned volidx:4; 17550724Scg unsigned left:4; 17650724Scg unsigned right:4; 17750724Scg unsigned stereo:1; 17850724Scg unsigned recmask:13; 17950724Scg unsigned avail:1; 18050724Scg} mixtable[SOUND_MIXER_NRDEVICES] = { 18150724Scg [SOUND_MIXER_VOLUME] = { 0, 0x0, 0x1, 1, 0x0000, 1 }, 18250724Scg [SOUND_MIXER_PCM] = { 1, 0x2, 0x3, 1, 0x0400, 1 }, 18350724Scg [SOUND_MIXER_SYNTH] = { 2, 0x4, 0x5, 1, 0x0060, 1 }, 18450724Scg [SOUND_MIXER_CD] = { 3, 0x6, 0x7, 1, 0x0006, 1 }, 18550724Scg [SOUND_MIXER_LINE] = { 4, 0x8, 0x9, 1, 0x0018, 1 }, 18650724Scg [SOUND_MIXER_LINE1] = { 5, 0xa, 0xb, 1, 0x1800, 1 }, 18750724Scg [SOUND_MIXER_LINE2] = { 6, 0xc, 0x0, 0, 0x0100, 1 }, 18850724Scg [SOUND_MIXER_LINE3] = { 7, 0xd, 0x0, 0, 0x0200, 1 }, 18950724Scg [SOUND_MIXER_MIC] = { 8, 0xe, 0x0, 0, 0x0001, 1 }, 19054831Scg [SOUND_MIXER_OGAIN] = { 9, 0xf, 0x0, 0, 0x0000, 1 } 19154831Scg}; 19250724Scg 19350724Scgstatic int 19454831Scges1370_mixinit(snd_mixer *m) 19550724Scg{ 19650724Scg int i; 19750724Scg u_int32_t v; 19850724Scg 19950724Scg v = 0; 20050724Scg for (i = 0; i < SOUND_MIXER_NRDEVICES; i++) 20150724Scg if (mixtable[i].avail) v |= (1 << i); 20250724Scg mix_setdevs(m, v); 20350724Scg v = 0; 20450724Scg for (i = 0; i < SOUND_MIXER_NRDEVICES; i++) 20550724Scg if (mixtable[i].recmask) v |= (1 << i); 20650724Scg mix_setrecdevs(m, v); 20750724Scg return 0; 20850724Scg} 20950724Scg 21050724Scgstatic int 21154831Scges1370_mixset(snd_mixer *m, unsigned dev, unsigned left, unsigned right) 21250724Scg{ 21350724Scg int l, r, rl, rr; 21450724Scg 21550724Scg if (!mixtable[dev].avail) return -1; 21650724Scg l = left; 21750724Scg r = mixtable[dev].stereo? right : l; 21850724Scg if (mixtable[dev].left == 0xf) { 21950724Scg rl = (l < 2)? 0x80 : 7 - (l - 2) / 14; 22050724Scg } else { 22150724Scg rl = (l < 10)? 0x80 : 15 - (l - 10) / 6; 22250724Scg } 22350724Scg if (mixtable[dev].stereo) { 22450724Scg rr = (r < 10)? 0x80 : 15 - (r - 10) / 6; 22554831Scg es1370_wrcodec(mix_getdevinfo(m), mixtable[dev].right, rr); 22650724Scg } 22754831Scg es1370_wrcodec(mix_getdevinfo(m), mixtable[dev].left, rl); 22850724Scg return l | (r << 8); 22950724Scg} 23050724Scg 23150724Scgstatic int 23254831Scges1370_mixsetrecsrc(snd_mixer *m, u_int32_t src) 23350724Scg{ 23450724Scg int i, j = 0; 23550724Scg 23650724Scg if (src == 0) src = 1 << SOUND_MIXER_MIC; 23750724Scg src &= mix_getrecdevs(m); 23850724Scg for (i = 0; i < SOUND_MIXER_NRDEVICES; i++) 23950724Scg if ((src & (1 << i)) != 0) j |= mixtable[i].recmask; 24050724Scg 24154831Scg es1370_wrcodec(mix_getdevinfo(m), CODEC_LIMIX1, j & 0x55); 24254831Scg es1370_wrcodec(mix_getdevinfo(m), CODEC_RIMIX1, j & 0xaa); 24354831Scg es1370_wrcodec(mix_getdevinfo(m), CODEC_LIMIX2, (j >> 8) & 0x17); 24454831Scg es1370_wrcodec(mix_getdevinfo(m), CODEC_RIMIX2, (j >> 8) & 0x0f); 24554831Scg es1370_wrcodec(mix_getdevinfo(m), CODEC_OMIX1, 0x7f); 24654831Scg es1370_wrcodec(mix_getdevinfo(m), CODEC_OMIX2, 0x3f); 24750724Scg return src; 24850724Scg} 24950724Scg 25050724Scgstatic int 25154831Scges1370_wrcodec(struct es_info *es, u_char i, u_char data) 25250724Scg{ 25350724Scg int wait = 100; /* 100 msec timeout */ 25450724Scg 25550724Scg do { 25650724Scg if ((bus_space_read_4(es->st, es->sh, ES1370_REG_STATUS) & 25750724Scg STAT_CSTAT) == 0) { 25850724Scg bus_space_write_2(es->st, es->sh, ES1370_REG_CODEC, 25950724Scg ((u_short)i << CODEC_INDEX_SHIFT) | data); 26050724Scg return 0; 26150724Scg } 26250724Scg DELAY(1000); 26350724Scg } while (--wait); 26454831Scg printf("pcm: es1370_wrcodec timed out\n"); 26550724Scg return -1; 26650724Scg} 26750724Scg 26850724Scg/* -------------------------------------------------------------------- */ 26950724Scg 27050724Scg/* channel interface */ 27150724Scgstatic void * 27250724Scgeschan_init(void *devinfo, snd_dbuf *b, pcm_channel *c, int dir) 27350724Scg{ 27450724Scg struct es_info *es = devinfo; 27550724Scg struct es_chinfo *ch = (dir == PCMDIR_PLAY)? &es->pch : &es->rch; 27650724Scg 27750724Scg ch->parent = es; 27850724Scg ch->channel = c; 27950724Scg ch->buffer = b; 28050724Scg ch->buffer->bufsize = ES_BUFFSIZE; 28154831Scg ch->num = ch->parent->num++; 28250724Scg if (chn_allocbuf(ch->buffer, es->parent_dmat) == -1) return NULL; 28350724Scg return ch; 28450724Scg} 28550724Scg 28650724Scgstatic int 28750724Scgeschan_setdir(void *data, int dir) 28850724Scg{ 28950724Scg struct es_chinfo *ch = data; 29050724Scg struct es_info *es = ch->parent; 29150724Scg 29250724Scg if (dir == PCMDIR_PLAY) { 29350724Scg bus_space_write_1(es->st, es->sh, ES1370_REG_MEMPAGE, 29450724Scg ES1370_REG_DAC2_FRAMEADR >> 8); 29550724Scg bus_space_write_4(es->st, es->sh, ES1370_REG_DAC2_FRAMEADR & 0xff, 29650724Scg vtophys(ch->buffer->buf)); 29750724Scg bus_space_write_4(es->st, es->sh, ES1370_REG_DAC2_FRAMECNT & 0xff, 29850724Scg (ch->buffer->bufsize >> 2) - 1); 29950724Scg } else { 30050724Scg bus_space_write_1(es->st, es->sh, ES1370_REG_MEMPAGE, 30150724Scg ES1370_REG_ADC_FRAMEADR >> 8); 30250724Scg bus_space_write_4(es->st, es->sh, ES1370_REG_ADC_FRAMEADR & 0xff, 30350724Scg vtophys(ch->buffer->buf)); 30450724Scg bus_space_write_4(es->st, es->sh, ES1370_REG_ADC_FRAMECNT & 0xff, 30550724Scg (ch->buffer->bufsize >> 2) - 1); 30650724Scg } 30750724Scg ch->dir = dir; 30850724Scg return 0; 30950724Scg} 31050724Scg 31150724Scgstatic int 31250724Scgeschan_setformat(void *data, u_int32_t format) 31350724Scg{ 31450724Scg struct es_chinfo *ch = data; 31550724Scg struct es_info *es = ch->parent; 31650724Scg 31750724Scg if (ch->dir == PCMDIR_PLAY) { 31850724Scg es->sctrl &= ~SCTRL_P2FMT; 31950724Scg if (format & AFMT_S16_LE) es->sctrl |= SCTRL_P2SEB; 32050724Scg if (format & AFMT_STEREO) es->sctrl |= SCTRL_P2SMB; 32150724Scg } else { 32250724Scg es->sctrl &= ~SCTRL_R1FMT; 32350724Scg if (format & AFMT_S16_LE) es->sctrl |= SCTRL_R1SEB; 32450724Scg if (format & AFMT_STEREO) es->sctrl |= SCTRL_R1SMB; 32550724Scg } 32650724Scg bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl); 32750724Scg ch->fmt = format; 32850724Scg return 0; 32950724Scg} 33050724Scg 33150724Scgstatic int 33254831Scgeschan1370_setspeed(void *data, u_int32_t speed) 33350724Scg{ 33450724Scg struct es_chinfo *ch = data; 33550724Scg struct es_info *es = ch->parent; 33650724Scg 33750724Scg es->ctrl &= ~CTRL_PCLKDIV; 33850724Scg es->ctrl |= DAC2_SRTODIV(speed) << CTRL_SH_PCLKDIV; 33950724Scg bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl); 34050724Scg /* rec/play speeds locked together - should indicate in flags */ 34150724Scg return speed; /* XXX calc real speed */ 34250724Scg} 34350724Scg 34454831Scgint 34554831Scgeschan1371_setspeed(void *data, u_int32_t speed) 34654831Scg{ 34754831Scg struct es_chinfo *ch = data; 34854831Scg struct es_info *es = ch->parent; 34954831Scg 35054831Scg if (ch->dir == PCMDIR_PLAY) { 35154831Scg return es1371_dac_rate(es, speed, 3 - ch->num); /* play */ 35254831Scg } else { 35354831Scg return es1371_adc_rate(es, speed, 1); /* record */ 35454831Scg } 35554831Scg} 35654831Scg 35750724Scgstatic int 35850724Scgeschan_setblocksize(void *data, u_int32_t blocksize) 35950724Scg{ 36050724Scg return blocksize; 36150724Scg} 36250724Scg 36350724Scgstatic int 36450724Scgeschan_trigger(void *data, int go) 36550724Scg{ 36650724Scg struct es_chinfo *ch = data; 36750724Scg struct es_info *es = ch->parent; 36860958Scg unsigned ss, cnt; 36950724Scg 37060958Scg if (go == PCMTRIG_EMLDMAWR || go == PCMTRIG_EMLDMARD) 37160958Scg return 0; 37260958Scg 37360958Scg ss = 1; 37460958Scg ss <<= (ch->fmt & AFMT_STEREO)? 1 : 0; 37560958Scg ss <<= (ch->fmt & AFMT_16BIT)? 1 : 0; 37660958Scg cnt = ch->buffer->dl / ss - 1; 37760958Scg 37850724Scg if (ch->dir == PCMDIR_PLAY) { 37950724Scg if (go == PCMTRIG_START) { 38050724Scg int b = (ch->fmt & AFMT_S16_LE)? 2 : 1; 38150724Scg es->ctrl |= CTRL_DAC2_EN; 38250724Scg es->sctrl &= ~(SCTRL_P2ENDINC | SCTRL_P2STINC | 38350724Scg SCTRL_P2LOOPSEL | SCTRL_P2PAUSE | 38450724Scg SCTRL_P2DACSEN); 38550724Scg es->sctrl |= SCTRL_P2INTEN | (b << SCTRL_SH_P2ENDINC); 38650724Scg bus_space_write_4(es->st, es->sh, 38750724Scg ES1370_REG_DAC2_SCOUNT, cnt); 38859323Scg /* start at beginning of buffer */ 38959323Scg bus_space_write_4(es->st, es->sh, ES1370_REG_MEMPAGE, 39059323Scg ES1370_REG_DAC2_FRAMECNT >> 8); 39159323Scg bus_space_write_4(es->st, es->sh, 39259323Scg ES1370_REG_DAC2_FRAMECNT & 0xff, 39359323Scg (ch->buffer->bufsize >> 2) - 1); 39450724Scg } else es->ctrl &= ~CTRL_DAC2_EN; 39550724Scg } else { 39650724Scg if (go == PCMTRIG_START) { 39750724Scg es->ctrl |= CTRL_ADC_EN; 39850724Scg es->sctrl &= ~SCTRL_R1LOOPSEL; 39950724Scg es->sctrl |= SCTRL_R1INTEN; 40050724Scg bus_space_write_4(es->st, es->sh, 40150724Scg ES1370_REG_ADC_SCOUNT, cnt); 40259323Scg /* start at beginning of buffer */ 40359323Scg bus_space_write_4(es->st, es->sh, ES1370_REG_MEMPAGE, 40459323Scg ES1370_REG_ADC_FRAMECNT >> 8); 40559323Scg bus_space_write_4(es->st, es->sh, 40659323Scg ES1370_REG_ADC_FRAMECNT & 0xff, 40759323Scg (ch->buffer->bufsize >> 2) - 1); 40850724Scg } else es->ctrl &= ~CTRL_ADC_EN; 40950724Scg } 41050724Scg bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl); 41150724Scg bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl); 41250724Scg return 0; 41350724Scg} 41450724Scg 41550724Scgstatic int 41650724Scgeschan_getptr(void *data) 41750724Scg{ 41850724Scg struct es_chinfo *ch = data; 41950724Scg struct es_info *es = ch->parent; 42059323Scg u_int32_t reg, cnt; 42159323Scg 42259323Scg if (ch->dir == PCMDIR_PLAY) 42359323Scg reg = ES1370_REG_DAC2_FRAMECNT; 42459323Scg else 42559323Scg reg = ES1370_REG_ADC_FRAMECNT; 42659323Scg 42759323Scg bus_space_write_4(es->st, es->sh, ES1370_REG_MEMPAGE, reg >> 8); 42859323Scg cnt = bus_space_read_4(es->st, es->sh, reg & 0x000000ff) >> 16; 42959323Scg /* cnt is longwords */ 43059323Scg return cnt << 2; 43150724Scg} 43250724Scg 43350724Scgstatic pcmchan_caps * 43450724Scgeschan_getcaps(void *data) 43550724Scg{ 43650724Scg struct es_chinfo *ch = data; 43750724Scg return (ch->dir == PCMDIR_PLAY)? &es_playcaps : &es_reccaps; 43850724Scg} 43950724Scg 44050724Scg/* The interrupt handler */ 44150724Scgstatic void 44254831Scges_intr(void *p) 44350724Scg{ 44450724Scg struct es_info *es = p; 44550724Scg unsigned intsrc, sctrl; 44650724Scg 44750724Scg intsrc = bus_space_read_4(es->st, es->sh, ES1370_REG_STATUS); 44850724Scg if ((intsrc & STAT_INTR) == 0) return; 44950724Scg 45050724Scg sctrl = es->sctrl; 45150724Scg if (intsrc & STAT_ADC) sctrl &= ~SCTRL_R1INTEN; 45250724Scg if (intsrc & STAT_DAC1) sctrl &= ~SCTRL_P1INTEN; 45350724Scg if (intsrc & STAT_DAC2) sctrl &= ~SCTRL_P2INTEN; 45450724Scg 45550724Scg bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, sctrl); 45650724Scg bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl); 45750724Scg 45854831Scg if (intsrc & STAT_ADC) chn_intr(es->rch.channel); 45954831Scg if (intsrc & STAT_DAC1); 46050724Scg if (intsrc & STAT_DAC2) chn_intr(es->pch.channel); 46150724Scg} 46250724Scg 46354831Scg/* ES1370 specific */ 46454831Scgstatic int 46554831Scges1370_init(struct es_info *es) 46654831Scg{ 46754831Scg es->ctrl = CTRL_CDC_EN | CTRL_SERR_DIS | 46854831Scg (DAC2_SRTODIV(DSP_DEFAULT_SPEED) << CTRL_SH_PCLKDIV); 46954831Scg bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl); 47053413Sroger 47154831Scg es->sctrl = 0; 47254831Scg bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl); 47353413Sroger 47454831Scg es1370_wrcodec(es, CODEC_RES_PD, 3);/* No RST, PD */ 47554831Scg es1370_wrcodec(es, CODEC_CSEL, 0); /* CODEC ADC and CODEC DAC use 47654831Scg * {LR,B}CLK2 and run off the LRCLK2 47754831Scg * PLL; program DAC_SYNC=0! */ 47854831Scg es1370_wrcodec(es, CODEC_ADSEL, 0);/* Recording source is mixer */ 47954831Scg es1370_wrcodec(es, CODEC_MGAIN, 0);/* MIC amp is 0db */ 48053413Sroger 48154831Scg return 0; 48254831Scg} 48353413Sroger 48454831Scg/* ES1371 specific */ 48553413Srogerint 48655209Scges1371_init(struct es_info *es, int rev) 48753413Sroger{ 48853413Sroger int idx; 48953413Sroger 49054831Scg if (debug > 0) printf("es_init\n"); 49154831Scg 49254831Scg es->num = 0; 49353413Sroger es->ctrl = 0; 49453413Sroger es->sctrl = 0; 49553413Sroger /* initialize the chips */ 49655209Scg if (rev == 7 || rev >= 9) { 49755209Scg#define ES1371_BINTSUMM_OFF 0x07 49855209Scg bus_space_write_4(es->st, es->sh, ES1371_BINTSUMM_OFF, 0x20); 49955209Scg if (debug > 0) printf("es_init rev == 7 || rev >= 9\n"); 50055209Scg } else { /* pre ac97 2.1 card */ 50155209Scg bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl); 50255209Scg if (debug > 0) printf("es_init pre ac97 2.1\n"); 50355209Scg } 50453413Sroger bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl); 50553413Sroger bus_space_write_4(es->st, es->sh, ES1371_REG_LEGACY, 0); 50653413Sroger /* AC'97 warm reset to start the bitclk */ 50753413Sroger bus_space_write_4(es->st, es->sh, ES1371_REG_LEGACY, es->ctrl | ES1371_SYNC_RES); 50853413Sroger DELAY(2000); 50955204Scg bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->ctrl); 51053413Sroger /* Init the sample rate converter */ 51153413Sroger bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, ES1371_DIS_SRC); 51253413Sroger for (idx = 0; idx < 0x80; idx++) 51354831Scg es1371_src_write(es, idx, 0); 51453413Sroger es1371_src_write(es, ES_SMPREG_DAC1 + ES_SMPREG_TRUNC_N, 16 << 4); 51553413Sroger es1371_src_write(es, ES_SMPREG_DAC1 + ES_SMPREG_INT_REGS, 16 << 10); 51653413Sroger es1371_src_write(es, ES_SMPREG_DAC2 + ES_SMPREG_TRUNC_N, 16 << 4); 51753413Sroger es1371_src_write(es, ES_SMPREG_DAC2 + ES_SMPREG_INT_REGS, 16 << 10); 51853413Sroger es1371_src_write(es, ES_SMPREG_VOL_ADC, 1 << 12); 51953413Sroger es1371_src_write(es, ES_SMPREG_VOL_ADC + 1, 1 << 12); 52053413Sroger es1371_src_write(es, ES_SMPREG_VOL_DAC1, 1 << 12); 52153413Sroger es1371_src_write(es, ES_SMPREG_VOL_DAC1 + 1, 1 << 12); 52253413Sroger es1371_src_write(es, ES_SMPREG_VOL_DAC2, 1 << 12); 52353413Sroger es1371_src_write(es, ES_SMPREG_VOL_DAC2 + 1, 1 << 12); 52453413Sroger es1371_adc_rate (es, 22050, 1); 52554831Scg es1371_dac_rate (es, 22050, 1); 52654831Scg es1371_dac_rate (es, 22050, 2); 52753413Sroger /* WARNING: 52853413Sroger * enabling the sample rate converter without properly programming 52953413Sroger * its parameters causes the chip to lock up (the SRC busy bit will 53053413Sroger * be stuck high, and I've found no way to rectify this other than 53153413Sroger * power cycle) 53253413Sroger */ 53353413Sroger bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, 0); 53453413Sroger 53553413Sroger return (0); 53653413Sroger} 53753413Sroger 53854831Scgstatic void 53953413Srogeres1371_wrcodec(void *s, int addr, u_int32_t data) 54053413Sroger{ 54154831Scg int sl; 54254831Scg unsigned t, x; 54353413Sroger struct es_info *es = (struct es_info*)s; 54453413Sroger 54554831Scg if (debug > 0) printf("wrcodec addr 0x%x data 0x%x\n", addr, data); 54653413Sroger 54753413Sroger for (t = 0; t < 0x1000; t++) 54854831Scg if (!(bus_space_read_4(es->st, es->sh,(ES1371_REG_CODEC & CODEC_WIP)))) 54953413Sroger break; 55053413Sroger sl = spltty(); 55153413Sroger /* save the current state for later */ 55254831Scg x = bus_space_read_4(es->st, es->sh, ES1371_REG_SMPRATE); 55353413Sroger /* enable SRC state data in SRC mux */ 55453413Sroger bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, 55554831Scg (es1371_wait_src_ready(s) & 55654831Scg (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1))); 55753413Sroger /* wait for a SAFE time to write addr/data and then do it, dammit */ 55853413Sroger for (t = 0; t < 0x1000; t++) 55954831Scg if ((bus_space_read_4(es->st, es->sh, ES1371_REG_SMPRATE) & 0x00070000) == 0x00010000) 56054831Scg break; 56154831Scg 56254831Scg if (debug > 2) printf("one b_s_w: 0x%x 0x%x 0x%x\n", es->sh, ES1371_REG_CODEC, 56353413Sroger ((addr << CODEC_POADD_SHIFT) & CODEC_POADD_MASK) | 56453413Sroger ((data << CODEC_PODAT_SHIFT) & CODEC_PODAT_MASK)); 56554831Scg 56653413Sroger bus_space_write_4(es->st, es->sh,ES1371_REG_CODEC, 56753413Sroger ((addr << CODEC_POADD_SHIFT) & CODEC_POADD_MASK) | 56853413Sroger ((data << CODEC_PODAT_SHIFT) & CODEC_PODAT_MASK)); 56953413Sroger /* restore SRC reg */ 57053413Sroger es1371_wait_src_ready(s); 57154831Scg if (debug > 2) printf("two b_s_w: 0x%x 0x%x 0x%x\n", es->sh, ES1371_REG_SMPRATE, x); 57254831Scg bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, x); 57353413Sroger splx(sl); 57453413Sroger} 57553413Sroger 57654831Scgstatic u_int32_t 57754831Scges1371_rdcodec(void *s, int addr) 57853413Sroger{ 57954831Scg int sl; 58054831Scg unsigned t, x; 58154831Scg struct es_info *es = (struct es_info *)s; 58253413Sroger 58354831Scg if (debug > 0) printf("rdcodec addr 0x%x ... ", addr); 58453413Sroger 58554831Scg for (t = 0; t < 0x1000; t++) 58654831Scg if (!(x = bus_space_read_4(es->st, es->sh, ES1371_REG_CODEC) & CODEC_WIP)) 58754831Scg break; 58854831Scg if (debug > 0) printf("loop 1 t 0x%x x 0x%x ", t, x); 58953413Sroger 59054831Scg sl = spltty(); 59153413Sroger 59254831Scg /* save the current state for later */ 59354831Scg x = bus_space_read_4(es->st, es->sh, ES1371_REG_SMPRATE); 59454831Scg /* enable SRC state data in SRC mux */ 59554831Scg bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, 59654831Scg (es1371_wait_src_ready(s) & 59754831Scg (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1))); 59854831Scg /* wait for a SAFE time to write addr/data and then do it, dammit */ 59954831Scg for (t = 0; t < 0x5000; t++) 60054831Scg if ((x = bus_space_read_4(es->st, es->sh, ES1371_REG_SMPRATE) & 0x00070000) == 0x00010000) 60154831Scg break; 60254831Scg if (debug > 0) printf("loop 2 t 0x%x x 0x%x ", t, x); 60354831Scg bus_space_write_4(es->st, es->sh, ES1371_REG_CODEC, 60454831Scg ((addr << CODEC_POADD_SHIFT) & CODEC_POADD_MASK) | CODEC_PORD); 60553413Sroger 60654831Scg /* restore SRC reg */ 60754831Scg es1371_wait_src_ready(s); 60854831Scg bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, x); 60953413Sroger 61054831Scg splx(sl); 61153413Sroger 61254831Scg /* now wait for the stinkin' data (RDY) */ 61354831Scg for (t = 0; t < 0x1000; t++) 61454831Scg if ((x = bus_space_read_4(es->st, es->sh, ES1371_REG_CODEC)) & CODEC_RDY) 61554831Scg break; 61654831Scg if (debug > 0) printf("loop 3 t 0x%x 0x%x ret 0x%x\n", t, x, ((x & CODEC_PIDAT_MASK) >> CODEC_PIDAT_SHIFT)); 61754831Scg return ((x & CODEC_PIDAT_MASK) >> CODEC_PIDAT_SHIFT); 61853413Sroger} 61953413Sroger 62053413Srogerstatic u_int 62155209Scges1371_src_read(struct es_info *es, u_short reg) 62254831Scg{ 62354831Scg unsigned int r; 62453413Sroger 62554831Scg r = es1371_wait_src_ready(es) & 62654831Scg (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1); 62754831Scg r |= ES1371_SRC_RAM_ADDRO(reg); 62854831Scg bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE,r); 62954831Scg return ES1371_SRC_RAM_DATAI(es1371_wait_src_ready(es)); 63053413Sroger} 63153413Sroger 63253413Srogerstatic void 63355209Scges1371_src_write(struct es_info *es, u_short reg, u_short data){ 63453413Sroger u_int r; 63553413Sroger 63653413Sroger r = es1371_wait_src_ready(es) & 63754831Scg (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1); 63853413Sroger r |= ES1371_SRC_RAM_ADDRO(reg) | ES1371_SRC_RAM_DATAO(data); 63953413Sroger /* printf("es1371_src_write 0x%x 0x%x\n",ES1371_REG_SMPRATE,r | ES1371_SRC_RAM_WE); */ 64054831Scg bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, r | ES1371_SRC_RAM_WE); 64153413Sroger} 64253413Sroger 64354831Scgstatic u_int 64455209Scges1371_adc_rate(struct es_info *es, u_int rate, int set) 64554831Scg{ 64654831Scg u_int n, truncm, freq, result; 64754831Scg 64854831Scg if (rate > 48000) rate = 48000; 64954831Scg if (rate < 4000) rate = 4000; 65054831Scg n = rate / 3000; 65154831Scg if ((1 << n) & ((1 << 15) | (1 << 13) | (1 << 11) | (1 << 9))) 65254831Scg n--; 65354831Scg truncm = (21 * n - 1) | 1; 65454831Scg freq = ((48000UL << 15) / rate) * n; 65554831Scg result = (48000UL << 15) / (freq / n); 65654831Scg if (set) { 65754831Scg if (rate >= 24000) { 65854831Scg if (truncm > 239) truncm = 239; 65954831Scg es1371_src_write(es, ES_SMPREG_ADC + ES_SMPREG_TRUNC_N, 66054831Scg (((239 - truncm) >> 1) << 9) | (n << 4)); 66154831Scg } else { 66254831Scg if (truncm > 119) truncm = 119; 66354831Scg es1371_src_write(es, ES_SMPREG_ADC + ES_SMPREG_TRUNC_N, 66454831Scg 0x8000 | (((119 - truncm) >> 1) << 9) | (n << 4)); 66554831Scg } 66654831Scg es1371_src_write(es, ES_SMPREG_ADC + ES_SMPREG_INT_REGS, 66754831Scg (es1371_src_read(es, ES_SMPREG_ADC + ES_SMPREG_INT_REGS) & 66854831Scg 0x00ff) | ((freq >> 5) & 0xfc00)); 66954831Scg es1371_src_write(es, ES_SMPREG_ADC + ES_SMPREG_VFREQ_FRAC, freq & 0x7fff); 67054831Scg es1371_src_write(es, ES_SMPREG_VOL_ADC, n << 8); 67154831Scg es1371_src_write(es, ES_SMPREG_VOL_ADC + 1, n << 8); 67253413Sroger } 67353413Sroger return result; 67453413Sroger} 67553413Sroger 67653413Srogerstatic u_int 67755209Scges1371_dac_rate(struct es_info *es, u_int rate, int set) 67854831Scg{ 67954831Scg u_int freq, r, result, dac, dis; 68053413Sroger 68154831Scg if (rate > 48000) rate = 48000; 68254831Scg if (rate < 4000) rate = 4000; 68354831Scg freq = (rate << 15) / 3000; 68454831Scg result = (freq * 3000) >> 15; 68554831Scg if (set) { 68654831Scg dac = (set == 1)? ES_SMPREG_DAC1 : ES_SMPREG_DAC2; 68754831Scg dis = (set == 1)? ES1371_DIS_P2 : ES1371_DIS_P1; 68854831Scg 68954831Scg r = (es1371_wait_src_ready(es) & (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1)); 69054831Scg bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, r); 69154831Scg es1371_src_write(es, dac + ES_SMPREG_INT_REGS, 69254831Scg (es1371_src_read(es, dac + ES_SMPREG_INT_REGS) & 0x00ff) | ((freq >> 5) & 0xfc00)); 69354831Scg es1371_src_write(es, dac + ES_SMPREG_VFREQ_FRAC, freq & 0x7fff); 69454831Scg r = (es1371_wait_src_ready(es) & (ES1371_DIS_SRC | dis | ES1371_DIS_R1)); 69554831Scg bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, r); 69654831Scg } 69754831Scg return result; 69853413Sroger} 69953413Sroger 70053413Srogerstatic u_int 70155209Scges1371_wait_src_ready(struct es_info *es) 70254831Scg{ 70354831Scg u_int t, r; 70453413Sroger 70554831Scg for (t = 0; t < 500; t++) { 70654831Scg if (!((r = bus_space_read_4(es->st, es->sh, ES1371_REG_SMPRATE)) & ES1371_SRC_RAM_BUSY)) 70754831Scg return r; 70854831Scg DELAY(1000); 70954831Scg } 71054831Scg printf("es1371: wait src ready timeout 0x%x [0x%x]\n", ES1371_REG_SMPRATE, r); 71154831Scg return 0; 71253413Sroger} 71353413Sroger 71450724Scg/* -------------------------------------------------------------------- */ 71550724Scg 71650724Scg/* 71750724Scg * Probe and attach the card 71850724Scg */ 71950724Scg 72050724Scgstatic int 72150724Scges_pci_probe(device_t dev) 72250724Scg{ 72350724Scg if (pci_get_devid(dev) == ES1370_PCI_ID) { 72450724Scg device_set_desc(dev, "AudioPCI ES1370"); 72550724Scg return 0; 72656154Speter } else if (pci_get_devid(dev) == ES1371_PCI_ID || 72756154Speter pci_get_devid(dev) == ES1371_PCI_ID2) { 72853413Sroger device_set_desc(dev, "AudioPCI ES1371"); 72953413Sroger return 0; 73050724Scg } 73150724Scg return ENXIO; 73250724Scg} 73350724Scg 73450724Scgstatic int 73550724Scges_pci_attach(device_t dev) 73650724Scg{ 73750724Scg snddev_info *d; 73850724Scg u_int32_t data; 73950724Scg struct es_info *es = 0; 74050724Scg int type = 0; 74150724Scg int regid; 74250724Scg struct resource *reg = 0; 74350724Scg int mapped; 74450724Scg int irqid; 74550724Scg struct resource *irq = 0; 74650724Scg void *ih = 0; 74750724Scg char status[SND_STATUSLEN]; 74853413Sroger struct ac97_info *codec; 74954831Scg pcm_channel *ct = NULL; 75050724Scg 75150724Scg d = device_get_softc(dev); 75250724Scg if ((es = malloc(sizeof *es, M_DEVBUF, M_NOWAIT)) == NULL) { 75350724Scg device_printf(dev, "cannot allocate softc\n"); 75450724Scg return ENXIO; 75550724Scg } 75650724Scg bzero(es, sizeof *es); 75750724Scg 75859019Scg es->dev = dev; 75950724Scg mapped = 0; 76050724Scg data = pci_read_config(dev, PCIR_COMMAND, 2); 76155426Scg data |= (PCIM_CMD_PORTEN|PCIM_CMD_MEMEN|PCIM_CMD_BUSMASTEREN); 76255426Scg pci_write_config(dev, PCIR_COMMAND, data, 2); 76355426Scg data = pci_read_config(dev, PCIR_COMMAND, 2); 76450724Scg if (mapped == 0 && (data & PCIM_CMD_MEMEN)) { 76550724Scg regid = MEM_MAP_REG; 76650724Scg type = SYS_RES_MEMORY; 76750724Scg reg = bus_alloc_resource(dev, type, ®id, 76850724Scg 0, ~0, 1, RF_ACTIVE); 76950724Scg if (reg) { 77050724Scg es->st = rman_get_bustag(reg); 77150724Scg es->sh = rman_get_bushandle(reg); 77250724Scg mapped++; 77350724Scg } 77450724Scg } 77550724Scg if (mapped == 0 && (data & PCIM_CMD_PORTEN)) { 77650724Scg regid = PCI_MAP_REG_START; 77750724Scg type = SYS_RES_IOPORT; 77850724Scg reg = bus_alloc_resource(dev, type, ®id, 77950724Scg 0, ~0, 1, RF_ACTIVE); 78050724Scg if (reg) { 78150724Scg es->st = rman_get_bustag(reg); 78250724Scg es->sh = rman_get_bushandle(reg); 78350724Scg mapped++; 78450724Scg } 78550724Scg } 78650724Scg if (mapped == 0) { 78750724Scg device_printf(dev, "unable to map register space\n"); 78850724Scg goto bad; 78950724Scg } 79054831Scg 79156154Speter if (pci_get_devid(dev) == ES1371_PCI_ID || 79256154Speter pci_get_devid(dev) == ES1371_PCI_ID2) { 79355209Scg if(-1 == es1371_init(es, pci_get_revid(dev))) { 79454831Scg device_printf(dev, "unable to initialize the card\n"); 79554831Scg goto bad; 79654831Scg } 79758384Scg codec = ac97_create(dev, es, NULL, es1371_rdcodec, es1371_wrcodec); 79854831Scg if (codec == NULL) goto bad; 79954831Scg /* our init routine does everything for us */ 80054831Scg /* set to NULL; flag mixer_init not to run the ac97_init */ 80154831Scg /* ac97_mixer.init = NULL; */ 80258905Scg if (mixer_init(d, &ac97_mixer, codec) == -1) goto bad; 80354831Scg ct = &es1371_chantemplate; 80454831Scg } else if (pci_get_devid(dev) == ES1370_PCI_ID) { 80554831Scg if (-1 == es1370_init(es)) { 80654831Scg device_printf(dev, "unable to initialize the card\n"); 80754831Scg goto bad; 80854831Scg } 80954831Scg mixer_init(d, &es1370_mixer, es); 81054831Scg ct = &es1370_chantemplate; 81154831Scg } else goto bad; 81250724Scg 81350724Scg irqid = 0; 81450724Scg irq = bus_alloc_resource(dev, SYS_RES_IRQ, &irqid, 81552046Simp 0, ~0, 1, RF_ACTIVE | RF_SHAREABLE); 81650724Scg if (!irq 81750724Scg || bus_setup_intr(dev, irq, INTR_TYPE_TTY, es_intr, es, &ih)) { 81850724Scg device_printf(dev, "unable to map interrupt\n"); 81950724Scg goto bad; 82050724Scg } 82150724Scg 82250724Scg if (bus_dma_tag_create(/*parent*/NULL, /*alignment*/2, /*boundary*/0, 82350724Scg /*lowaddr*/BUS_SPACE_MAXADDR_32BIT, 82450724Scg /*highaddr*/BUS_SPACE_MAXADDR, 82550724Scg /*filter*/NULL, /*filterarg*/NULL, 82650724Scg /*maxsize*/ES_BUFFSIZE, /*nsegments*/1, /*maxsegz*/0x3ffff, 82750724Scg /*flags*/0, &es->parent_dmat) != 0) { 82850724Scg device_printf(dev, "unable to create dma tag\n"); 82950724Scg goto bad; 83050724Scg } 83150724Scg 83250724Scg snprintf(status, SND_STATUSLEN, "at %s 0x%lx irq %ld", 83350724Scg (type == SYS_RES_IOPORT)? "io" : "memory", 83450724Scg rman_get_start(reg), rman_get_start(irq)); 83550724Scg 83650724Scg if (pcm_register(dev, es, 1, 1)) goto bad; 83754831Scg pcm_addchan(dev, PCMDIR_REC, ct, es); 83854831Scg pcm_addchan(dev, PCMDIR_PLAY, ct, es); 83950724Scg pcm_setstatus(dev, status); 84050724Scg 84150724Scg return 0; 84250724Scg 84350724Scg bad: 84450724Scg if (es) free(es, M_DEVBUF); 84550724Scg if (reg) bus_release_resource(dev, type, regid, reg); 84650724Scg if (ih) bus_teardown_intr(dev, irq, ih); 84750724Scg if (irq) bus_release_resource(dev, SYS_RES_IRQ, irqid, irq); 84850724Scg return ENXIO; 84950724Scg} 85050724Scg 85150724Scgstatic device_method_t es_methods[] = { 85250724Scg /* Device interface */ 85350724Scg DEVMETHOD(device_probe, es_pci_probe), 85450724Scg DEVMETHOD(device_attach, es_pci_attach), 85550724Scg 85650724Scg { 0, 0 } 85750724Scg}; 85850724Scg 85950724Scgstatic driver_t es_driver = { 86050724Scg "pcm", 86150724Scg es_methods, 86250724Scg sizeof(snddev_info), 86350724Scg}; 86450724Scg 86550724Scgstatic devclass_t pcm_devclass; 86650724Scg 86750724ScgDRIVER_MODULE(es, pci, es_driver, pcm_devclass, 0, 0); 868