Deleted Added
full compact
es137x.c (52046) es137x.c (53413)
1/*
1/*
2 * Support the ENSONIQ AudioPCI board based on the ES1370 and Codec
3 * AK4531.
2 * Support the ENSONIQ AudioPCI board and Creative Labs SoundBlaster PCI
3 * boards based on the ES1370, ES1371 and ES1373 chips.
4 *
4 *
5 * Copyright (c) 1999 Russell Cattelan <cattelan@thebarn.com>
5 * Copyright (c) 1999 Cameron Grant <gandalf@vilnya.demon.co.uk>
6 * Copyright (c) 1998 by Joachim Kuebart. All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 *
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 *
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in
17 * the documentation and/or other materials provided with the
18 * distribution.
19 *
20 * 3. All advertising materials mentioning features or use of this
21 * software must display the following acknowledgement:
22 * This product includes software developed by Joachim Kuebart.
23 *
24 * 4. The name of the author may not be used to endorse or promote
25 * products derived from this software without specific prior
26 * written permission.
27 *
28 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
29 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
30 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
31 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
32 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
33 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
34 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
36 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
37 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
38 * OF THE POSSIBILITY OF SUCH DAMAGE.
39 *
6 * Copyright (c) 1999 Cameron Grant <gandalf@vilnya.demon.co.uk>
7 * Copyright (c) 1998 by Joachim Kuebart. All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 *
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 *
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in
18 * the documentation and/or other materials provided with the
19 * distribution.
20 *
21 * 3. All advertising materials mentioning features or use of this
22 * software must display the following acknowledgement:
23 * This product includes software developed by Joachim Kuebart.
24 *
25 * 4. The name of the author may not be used to endorse or promote
26 * products derived from this software without specific prior
27 * written permission.
28 *
29 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
30 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
31 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
32 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
33 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
34 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
35 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
36 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
37 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
38 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
39 * OF THE POSSIBILITY OF SUCH DAMAGE.
40 *
40 * $FreeBSD: head/sys/dev/sound/pci/es137x.c 52046 1999-10-09 03:50:27Z imp $
41 * $FreeBSD: head/sys/dev/sound/pci/es137x.c 53413 1999-11-19 07:29:10Z roger $
41 */
42
42 */
43
44/*
45 * Part of this code was heavily inspired by the linux driver from
46 * Thomas Sailer (sailer@ife.ee.ethz.ch)
47 * Just about everything has been touched and reworked in some way but
48 * the all the underlying sequences/timing/register values are from
49 * Thomas' code.
50 *
51*/
52
43#include "pci.h"
44#include "pcm.h"
45
46#include <dev/pcm/sound.h>
53#include "pci.h"
54#include "pcm.h"
55
56#include <dev/pcm/sound.h>
47#include <dev/pcm/pci/es1370.h>
57#include <dev/pcm/ac97.h>
58#include <dev/pcm/pci/es137x.h>
48
49#include <pci/pcireg.h>
50#include <pci/pcivar.h>
51
59
60#include <pci/pcireg.h>
61#include <pci/pcivar.h>
62
63#include <sys/sysctl.h>
64
52#if NPCI != 0
53
65#if NPCI != 0
66
67static int debug = 0;
68SYSCTL_INT(_debug, OID_AUTO, es_debug, CTLFLAG_RW, &debug, 0, "");
69
54#define MEM_MAP_REG 0x14
55
56/* PCI IDs of supported chips */
57#define ES1370_PCI_ID 0x50001274
70#define MEM_MAP_REG 0x14
71
72/* PCI IDs of supported chips */
73#define ES1370_PCI_ID 0x50001274
74#define ES1371_PCI_ID 0x13711274
58
59/* device private data */
60struct es_info;
61
75
76/* device private data */
77struct es_info;
78
62struct es_chinfo {
79typedef struct es_chinfo {
63 struct es_info *parent;
64 pcm_channel *channel;
65 snd_dbuf *buffer;
66 int dir;
67 u_int32_t fmt;
80 struct es_info *parent;
81 pcm_channel *channel;
82 snd_dbuf *buffer;
83 int dir;
84 u_int32_t fmt;
68};
85} es_chinfo_t;
69
86
70struct es_info {
87typedef struct es_info {
71 bus_space_tag_t st;
72 bus_space_handle_t sh;
73 bus_dma_tag_t parent_dmat;
74
75 /* Contents of board's registers */
76 u_long ctrl;
77 u_long sctrl;
78 struct es_chinfo pch, rch;
88 bus_space_tag_t st;
89 bus_space_handle_t sh;
90 bus_dma_tag_t parent_dmat;
91
92 /* Contents of board's registers */
93 u_long ctrl;
94 u_long sctrl;
95 struct es_chinfo pch, rch;
79};
96} es_info_t;
80
81/* -------------------------------------------------------------------- */
97
98/* -------------------------------------------------------------------- */
82
83/* prototypes */
99/* prototypes */
100
101static u_int es1371_wait_src_ready(es_info_t *);
102static void es1371_src_write(es_info_t *, u_short, unsigned short);
103static u_int es1371_adc_rate (es_info_t *, u_int, int);
104static u_int es1371_dac1_rate(es_info_t *, u_int, int);
105static u_int es1371_dac2_rate(es_info_t *, u_int, int);
106static void es1371_wrcodec(void *, int, u_int32_t);
107static u_int32_t es1371_rdcodec(void *, u_int32_t);
108static int es1371_init(es_info_t *es);
109static int eschan1371_setspeed(void *data, u_int32_t speed);
110
84static int es_init(struct es_info *);
85static void es_intr(void *);
86static int write_codec(struct es_info *, u_char, u_char);
87
88/* channel interface */
89static void *eschan_init(void *devinfo, snd_dbuf *b, pcm_channel *c, int dir);
111static int es_init(struct es_info *);
112static void es_intr(void *);
113static int write_codec(struct es_info *, u_char, u_char);
114
115/* channel interface */
116static void *eschan_init(void *devinfo, snd_dbuf *b, pcm_channel *c, int dir);
90static int eschan_setdir(void *data, int dir);
91static int eschan_setformat(void *data, u_int32_t format);
92static int eschan_setspeed(void *data, u_int32_t speed);
93static int eschan_setblocksize(void *data, u_int32_t blocksize);
94static int eschan_trigger(void *data, int go);
95static int eschan_getptr(void *data);
117static int eschan_setdir(void *data, int dir);
118static int eschan_setformat(void *data, u_int32_t format);
119static int eschan_setspeed(void *data, u_int32_t speed);
120static int eschan_setblocksize(void *data, u_int32_t blocksize);
121static int eschan_trigger(void *data, int go);
122static int eschan_getptr(void *data);
96static pcmchan_caps *eschan_getcaps(void *data);
97
98static pcmchan_caps es_playcaps = {
99 4000, 48000,
100 AFMT_STEREO | AFMT_U8 | AFMT_S16_LE,
101 AFMT_STEREO | AFMT_S16_LE
102};
103
104static pcmchan_caps es_reccaps = {
105 4000, 48000,
106 AFMT_STEREO | AFMT_U8 | AFMT_S16_LE,
107 AFMT_STEREO | AFMT_S16_LE
108};
109
110static pcm_channel es_chantemplate = {
111 eschan_init,
112 eschan_setdir,
113 eschan_setformat,
114 eschan_setspeed,
115 eschan_setblocksize,
116 eschan_trigger,
117 eschan_getptr,
118 eschan_getcaps,
119};
120
121/* -------------------------------------------------------------------- */
122
123/* The mixer interface */
124
125static int es_mixinit(snd_mixer *m);
126static int es_mixset(snd_mixer *m, unsigned dev, unsigned left, unsigned right);
127static int es_mixsetrecsrc(snd_mixer *m, u_int32_t src);
128
129static snd_mixer es_mixer = {
130 "Ensoniq AudioPCI 1370 mixer",
131 es_mixinit,
132 es_mixset,
133 es_mixsetrecsrc,
134};
135
136static const struct {
137 unsigned volidx:4;
138 unsigned left:4;
139 unsigned right:4;
140 unsigned stereo:1;
141 unsigned recmask:13;
142 unsigned avail:1;
143} mixtable[SOUND_MIXER_NRDEVICES] = {
144 [SOUND_MIXER_VOLUME] = { 0, 0x0, 0x1, 1, 0x0000, 1 },
145 [SOUND_MIXER_PCM] = { 1, 0x2, 0x3, 1, 0x0400, 1 },
146 [SOUND_MIXER_SYNTH] = { 2, 0x4, 0x5, 1, 0x0060, 1 },
147 [SOUND_MIXER_CD] = { 3, 0x6, 0x7, 1, 0x0006, 1 },
148 [SOUND_MIXER_LINE] = { 4, 0x8, 0x9, 1, 0x0018, 1 },
149 [SOUND_MIXER_LINE1] = { 5, 0xa, 0xb, 1, 0x1800, 1 },
150 [SOUND_MIXER_LINE2] = { 6, 0xc, 0x0, 0, 0x0100, 1 },
151 [SOUND_MIXER_LINE3] = { 7, 0xd, 0x0, 0, 0x0200, 1 },
152 [SOUND_MIXER_MIC] = { 8, 0xe, 0x0, 0, 0x0001, 1 },
153 [SOUND_MIXER_OGAIN] = { 9, 0xf, 0x0, 0, 0x0000, 1 } };
154
155static int
156es_mixinit(snd_mixer *m)
157{
158 int i;
159 u_int32_t v;
160
161 v = 0;
162 for (i = 0; i < SOUND_MIXER_NRDEVICES; i++)
163 if (mixtable[i].avail) v |= (1 << i);
164 mix_setdevs(m, v);
165 v = 0;
166 for (i = 0; i < SOUND_MIXER_NRDEVICES; i++)
167 if (mixtable[i].recmask) v |= (1 << i);
168 mix_setrecdevs(m, v);
169 return 0;
170}
171
172static int
173es_mixset(snd_mixer *m, unsigned dev, unsigned left, unsigned right)
174{
175 int l, r, rl, rr;
176
177 if (!mixtable[dev].avail) return -1;
178 l = left;
179 r = mixtable[dev].stereo? right : l;
180 if (mixtable[dev].left == 0xf) {
181 rl = (l < 2)? 0x80 : 7 - (l - 2) / 14;
182 } else {
183 rl = (l < 10)? 0x80 : 15 - (l - 10) / 6;
184 }
185 if (mixtable[dev].stereo) {
186 rr = (r < 10)? 0x80 : 15 - (r - 10) / 6;
187 write_codec(mix_getdevinfo(m), mixtable[dev].right, rr);
188 }
189 write_codec(mix_getdevinfo(m), mixtable[dev].left, rl);
190 return l | (r << 8);
191}
192
193static int
194es_mixsetrecsrc(snd_mixer *m, u_int32_t src)
195{
196 int i, j = 0;
197
198 if (src == 0) src = 1 << SOUND_MIXER_MIC;
199 src &= mix_getrecdevs(m);
200 for (i = 0; i < SOUND_MIXER_NRDEVICES; i++)
201 if ((src & (1 << i)) != 0) j |= mixtable[i].recmask;
202
203 write_codec(mix_getdevinfo(m), CODEC_LIMIX1, j & 0x55);
204 write_codec(mix_getdevinfo(m), CODEC_RIMIX1, j & 0xaa);
205 write_codec(mix_getdevinfo(m), CODEC_LIMIX2, (j >> 8) & 0x17);
206 write_codec(mix_getdevinfo(m), CODEC_RIMIX2, (j >> 8) & 0x0f);
207 write_codec(mix_getdevinfo(m), CODEC_OMIX1, 0x7f);
208 write_codec(mix_getdevinfo(m), CODEC_OMIX2, 0x3f);
209 return src;
210}
211
212static int
213write_codec(struct es_info *es, u_char i, u_char data)
214{
215 int wait = 100; /* 100 msec timeout */
216
217 do {
218 if ((bus_space_read_4(es->st, es->sh, ES1370_REG_STATUS) &
219 STAT_CSTAT) == 0) {
220 bus_space_write_2(es->st, es->sh, ES1370_REG_CODEC,
221 ((u_short)i << CODEC_INDEX_SHIFT) | data);
222 return 0;
223 }
224 DELAY(1000);
225 } while (--wait);
226 printf("pcm: write_codec timed out\n");
227 return -1;
228}
229
230/* -------------------------------------------------------------------- */
231
232/* channel interface */
233static void *
234eschan_init(void *devinfo, snd_dbuf *b, pcm_channel *c, int dir)
235{
236 struct es_info *es = devinfo;
237 struct es_chinfo *ch = (dir == PCMDIR_PLAY)? &es->pch : &es->rch;
238
239 ch->parent = es;
240 ch->channel = c;
241 ch->buffer = b;
242 ch->buffer->bufsize = ES_BUFFSIZE;
243 if (chn_allocbuf(ch->buffer, es->parent_dmat) == -1) return NULL;
244 return ch;
245}
246
247static int
248eschan_setdir(void *data, int dir)
249{
250 struct es_chinfo *ch = data;
251 struct es_info *es = ch->parent;
252
253 if (dir == PCMDIR_PLAY) {
254 bus_space_write_1(es->st, es->sh, ES1370_REG_MEMPAGE,
255 ES1370_REG_DAC2_FRAMEADR >> 8);
256 bus_space_write_4(es->st, es->sh, ES1370_REG_DAC2_FRAMEADR & 0xff,
257 vtophys(ch->buffer->buf));
258 bus_space_write_4(es->st, es->sh, ES1370_REG_DAC2_FRAMECNT & 0xff,
259 (ch->buffer->bufsize >> 2) - 1);
260 } else {
261 bus_space_write_1(es->st, es->sh, ES1370_REG_MEMPAGE,
262 ES1370_REG_ADC_FRAMEADR >> 8);
263 bus_space_write_4(es->st, es->sh, ES1370_REG_ADC_FRAMEADR & 0xff,
264 vtophys(ch->buffer->buf));
265 bus_space_write_4(es->st, es->sh, ES1370_REG_ADC_FRAMECNT & 0xff,
266 (ch->buffer->bufsize >> 2) - 1);
267 }
268 ch->dir = dir;
269 return 0;
270}
271
272static int
273eschan_setformat(void *data, u_int32_t format)
274{
275 struct es_chinfo *ch = data;
276 struct es_info *es = ch->parent;
277
278 if (ch->dir == PCMDIR_PLAY) {
279 es->sctrl &= ~SCTRL_P2FMT;
280 if (format & AFMT_S16_LE) es->sctrl |= SCTRL_P2SEB;
281 if (format & AFMT_STEREO) es->sctrl |= SCTRL_P2SMB;
282 } else {
283 es->sctrl &= ~SCTRL_R1FMT;
284 if (format & AFMT_S16_LE) es->sctrl |= SCTRL_R1SEB;
285 if (format & AFMT_STEREO) es->sctrl |= SCTRL_R1SMB;
286 }
287 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl);
288 ch->fmt = format;
289 return 0;
290}
291
292static int
293eschan_setspeed(void *data, u_int32_t speed)
294{
295 struct es_chinfo *ch = data;
296 struct es_info *es = ch->parent;
297
298 es->ctrl &= ~CTRL_PCLKDIV;
299 es->ctrl |= DAC2_SRTODIV(speed) << CTRL_SH_PCLKDIV;
300 bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl);
301 /* rec/play speeds locked together - should indicate in flags */
302#if 0
303 if (ch->direction == PCMDIR_PLAY) d->rec[0].speed = speed;
304 else d->play[0].speed = speed;
305#endif
306 return speed; /* XXX calc real speed */
307}
308
309static int
310eschan_setblocksize(void *data, u_int32_t blocksize)
311{
312 return blocksize;
313}
314
315static int
316eschan_trigger(void *data, int go)
317{
318 struct es_chinfo *ch = data;
319 struct es_info *es = ch->parent;
320 unsigned cnt = ch->buffer->dl / ch->buffer->sample_size - 1;
321
322 if (ch->dir == PCMDIR_PLAY) {
323 if (go == PCMTRIG_START) {
324 int b = (ch->fmt & AFMT_S16_LE)? 2 : 1;
325 es->ctrl |= CTRL_DAC2_EN;
326 es->sctrl &= ~(SCTRL_P2ENDINC | SCTRL_P2STINC |
327 SCTRL_P2LOOPSEL | SCTRL_P2PAUSE |
328 SCTRL_P2DACSEN);
329 es->sctrl |= SCTRL_P2INTEN | (b << SCTRL_SH_P2ENDINC);
330 bus_space_write_4(es->st, es->sh,
331 ES1370_REG_DAC2_SCOUNT, cnt);
332 } else es->ctrl &= ~CTRL_DAC2_EN;
333 } else {
334 if (go == PCMTRIG_START) {
335 es->ctrl |= CTRL_ADC_EN;
336 es->sctrl &= ~SCTRL_R1LOOPSEL;
337 es->sctrl |= SCTRL_R1INTEN;
338 bus_space_write_4(es->st, es->sh,
339 ES1370_REG_ADC_SCOUNT, cnt);
340 } else es->ctrl &= ~CTRL_ADC_EN;
341 }
342 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl);
343 bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl);
344 return 0;
345}
346
347static int
348eschan_getptr(void *data)
349{
350 struct es_chinfo *ch = data;
351 struct es_info *es = ch->parent;
352 if (ch->dir == PCMDIR_PLAY) {
353 bus_space_write_4(es->st, es->sh, ES1370_REG_MEMPAGE,
354 ES1370_REG_DAC2_FRAMECNT >> 8);
355 return (bus_space_read_4(es->st, es->sh,
356 ES1370_REG_DAC2_FRAMECNT & 0xff) >> 14) & 0x3fffc;
357 } else {
358 bus_space_write_4(es->st, es->sh, ES1370_REG_MEMPAGE,
359 ES1370_REG_ADC_FRAMECNT >> 8);
360 return (bus_space_read_4(es->st, es->sh,
361 ES1370_REG_ADC_FRAMECNT & 0xff) >> 14) & 0x3fffc;
362 }
363}
364
365static pcmchan_caps *
366eschan_getcaps(void *data)
367{
368 struct es_chinfo *ch = data;
369 return (ch->dir == PCMDIR_PLAY)? &es_playcaps : &es_reccaps;
370}
371
372/* The interrupt handler */
373static void
374es_intr (void *p)
375{
376 struct es_info *es = p;
377 unsigned intsrc, sctrl;
378
379 intsrc = bus_space_read_4(es->st, es->sh, ES1370_REG_STATUS);
380 if ((intsrc & STAT_INTR) == 0) return;
381
382 sctrl = es->sctrl;
383 if (intsrc & STAT_ADC) sctrl &= ~SCTRL_R1INTEN;
384 if (intsrc & STAT_DAC1) sctrl &= ~SCTRL_P1INTEN;
385 if (intsrc & STAT_DAC2) sctrl &= ~SCTRL_P2INTEN;
386
387 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, sctrl);
388 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl);
389
390 if (intsrc & STAT_DAC2) chn_intr(es->pch.channel);
391 if (intsrc & STAT_ADC) chn_intr(es->rch.channel);
392}
393
123static pcmchan_caps *eschan_getcaps(void *data);
124
125static pcmchan_caps es_playcaps = {
126 4000, 48000,
127 AFMT_STEREO | AFMT_U8 | AFMT_S16_LE,
128 AFMT_STEREO | AFMT_S16_LE
129};
130
131static pcmchan_caps es_reccaps = {
132 4000, 48000,
133 AFMT_STEREO | AFMT_U8 | AFMT_S16_LE,
134 AFMT_STEREO | AFMT_S16_LE
135};
136
137static pcm_channel es_chantemplate = {
138 eschan_init,
139 eschan_setdir,
140 eschan_setformat,
141 eschan_setspeed,
142 eschan_setblocksize,
143 eschan_trigger,
144 eschan_getptr,
145 eschan_getcaps,
146};
147
148/* -------------------------------------------------------------------- */
149
150/* The mixer interface */
151
152static int es_mixinit(snd_mixer *m);
153static int es_mixset(snd_mixer *m, unsigned dev, unsigned left, unsigned right);
154static int es_mixsetrecsrc(snd_mixer *m, u_int32_t src);
155
156static snd_mixer es_mixer = {
157 "Ensoniq AudioPCI 1370 mixer",
158 es_mixinit,
159 es_mixset,
160 es_mixsetrecsrc,
161};
162
163static const struct {
164 unsigned volidx:4;
165 unsigned left:4;
166 unsigned right:4;
167 unsigned stereo:1;
168 unsigned recmask:13;
169 unsigned avail:1;
170} mixtable[SOUND_MIXER_NRDEVICES] = {
171 [SOUND_MIXER_VOLUME] = { 0, 0x0, 0x1, 1, 0x0000, 1 },
172 [SOUND_MIXER_PCM] = { 1, 0x2, 0x3, 1, 0x0400, 1 },
173 [SOUND_MIXER_SYNTH] = { 2, 0x4, 0x5, 1, 0x0060, 1 },
174 [SOUND_MIXER_CD] = { 3, 0x6, 0x7, 1, 0x0006, 1 },
175 [SOUND_MIXER_LINE] = { 4, 0x8, 0x9, 1, 0x0018, 1 },
176 [SOUND_MIXER_LINE1] = { 5, 0xa, 0xb, 1, 0x1800, 1 },
177 [SOUND_MIXER_LINE2] = { 6, 0xc, 0x0, 0, 0x0100, 1 },
178 [SOUND_MIXER_LINE3] = { 7, 0xd, 0x0, 0, 0x0200, 1 },
179 [SOUND_MIXER_MIC] = { 8, 0xe, 0x0, 0, 0x0001, 1 },
180 [SOUND_MIXER_OGAIN] = { 9, 0xf, 0x0, 0, 0x0000, 1 } };
181
182static int
183es_mixinit(snd_mixer *m)
184{
185 int i;
186 u_int32_t v;
187
188 v = 0;
189 for (i = 0; i < SOUND_MIXER_NRDEVICES; i++)
190 if (mixtable[i].avail) v |= (1 << i);
191 mix_setdevs(m, v);
192 v = 0;
193 for (i = 0; i < SOUND_MIXER_NRDEVICES; i++)
194 if (mixtable[i].recmask) v |= (1 << i);
195 mix_setrecdevs(m, v);
196 return 0;
197}
198
199static int
200es_mixset(snd_mixer *m, unsigned dev, unsigned left, unsigned right)
201{
202 int l, r, rl, rr;
203
204 if (!mixtable[dev].avail) return -1;
205 l = left;
206 r = mixtable[dev].stereo? right : l;
207 if (mixtable[dev].left == 0xf) {
208 rl = (l < 2)? 0x80 : 7 - (l - 2) / 14;
209 } else {
210 rl = (l < 10)? 0x80 : 15 - (l - 10) / 6;
211 }
212 if (mixtable[dev].stereo) {
213 rr = (r < 10)? 0x80 : 15 - (r - 10) / 6;
214 write_codec(mix_getdevinfo(m), mixtable[dev].right, rr);
215 }
216 write_codec(mix_getdevinfo(m), mixtable[dev].left, rl);
217 return l | (r << 8);
218}
219
220static int
221es_mixsetrecsrc(snd_mixer *m, u_int32_t src)
222{
223 int i, j = 0;
224
225 if (src == 0) src = 1 << SOUND_MIXER_MIC;
226 src &= mix_getrecdevs(m);
227 for (i = 0; i < SOUND_MIXER_NRDEVICES; i++)
228 if ((src & (1 << i)) != 0) j |= mixtable[i].recmask;
229
230 write_codec(mix_getdevinfo(m), CODEC_LIMIX1, j & 0x55);
231 write_codec(mix_getdevinfo(m), CODEC_RIMIX1, j & 0xaa);
232 write_codec(mix_getdevinfo(m), CODEC_LIMIX2, (j >> 8) & 0x17);
233 write_codec(mix_getdevinfo(m), CODEC_RIMIX2, (j >> 8) & 0x0f);
234 write_codec(mix_getdevinfo(m), CODEC_OMIX1, 0x7f);
235 write_codec(mix_getdevinfo(m), CODEC_OMIX2, 0x3f);
236 return src;
237}
238
239static int
240write_codec(struct es_info *es, u_char i, u_char data)
241{
242 int wait = 100; /* 100 msec timeout */
243
244 do {
245 if ((bus_space_read_4(es->st, es->sh, ES1370_REG_STATUS) &
246 STAT_CSTAT) == 0) {
247 bus_space_write_2(es->st, es->sh, ES1370_REG_CODEC,
248 ((u_short)i << CODEC_INDEX_SHIFT) | data);
249 return 0;
250 }
251 DELAY(1000);
252 } while (--wait);
253 printf("pcm: write_codec timed out\n");
254 return -1;
255}
256
257/* -------------------------------------------------------------------- */
258
259/* channel interface */
260static void *
261eschan_init(void *devinfo, snd_dbuf *b, pcm_channel *c, int dir)
262{
263 struct es_info *es = devinfo;
264 struct es_chinfo *ch = (dir == PCMDIR_PLAY)? &es->pch : &es->rch;
265
266 ch->parent = es;
267 ch->channel = c;
268 ch->buffer = b;
269 ch->buffer->bufsize = ES_BUFFSIZE;
270 if (chn_allocbuf(ch->buffer, es->parent_dmat) == -1) return NULL;
271 return ch;
272}
273
274static int
275eschan_setdir(void *data, int dir)
276{
277 struct es_chinfo *ch = data;
278 struct es_info *es = ch->parent;
279
280 if (dir == PCMDIR_PLAY) {
281 bus_space_write_1(es->st, es->sh, ES1370_REG_MEMPAGE,
282 ES1370_REG_DAC2_FRAMEADR >> 8);
283 bus_space_write_4(es->st, es->sh, ES1370_REG_DAC2_FRAMEADR & 0xff,
284 vtophys(ch->buffer->buf));
285 bus_space_write_4(es->st, es->sh, ES1370_REG_DAC2_FRAMECNT & 0xff,
286 (ch->buffer->bufsize >> 2) - 1);
287 } else {
288 bus_space_write_1(es->st, es->sh, ES1370_REG_MEMPAGE,
289 ES1370_REG_ADC_FRAMEADR >> 8);
290 bus_space_write_4(es->st, es->sh, ES1370_REG_ADC_FRAMEADR & 0xff,
291 vtophys(ch->buffer->buf));
292 bus_space_write_4(es->st, es->sh, ES1370_REG_ADC_FRAMECNT & 0xff,
293 (ch->buffer->bufsize >> 2) - 1);
294 }
295 ch->dir = dir;
296 return 0;
297}
298
299static int
300eschan_setformat(void *data, u_int32_t format)
301{
302 struct es_chinfo *ch = data;
303 struct es_info *es = ch->parent;
304
305 if (ch->dir == PCMDIR_PLAY) {
306 es->sctrl &= ~SCTRL_P2FMT;
307 if (format & AFMT_S16_LE) es->sctrl |= SCTRL_P2SEB;
308 if (format & AFMT_STEREO) es->sctrl |= SCTRL_P2SMB;
309 } else {
310 es->sctrl &= ~SCTRL_R1FMT;
311 if (format & AFMT_S16_LE) es->sctrl |= SCTRL_R1SEB;
312 if (format & AFMT_STEREO) es->sctrl |= SCTRL_R1SMB;
313 }
314 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl);
315 ch->fmt = format;
316 return 0;
317}
318
319static int
320eschan_setspeed(void *data, u_int32_t speed)
321{
322 struct es_chinfo *ch = data;
323 struct es_info *es = ch->parent;
324
325 es->ctrl &= ~CTRL_PCLKDIV;
326 es->ctrl |= DAC2_SRTODIV(speed) << CTRL_SH_PCLKDIV;
327 bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl);
328 /* rec/play speeds locked together - should indicate in flags */
329#if 0
330 if (ch->direction == PCMDIR_PLAY) d->rec[0].speed = speed;
331 else d->play[0].speed = speed;
332#endif
333 return speed; /* XXX calc real speed */
334}
335
336static int
337eschan_setblocksize(void *data, u_int32_t blocksize)
338{
339 return blocksize;
340}
341
342static int
343eschan_trigger(void *data, int go)
344{
345 struct es_chinfo *ch = data;
346 struct es_info *es = ch->parent;
347 unsigned cnt = ch->buffer->dl / ch->buffer->sample_size - 1;
348
349 if (ch->dir == PCMDIR_PLAY) {
350 if (go == PCMTRIG_START) {
351 int b = (ch->fmt & AFMT_S16_LE)? 2 : 1;
352 es->ctrl |= CTRL_DAC2_EN;
353 es->sctrl &= ~(SCTRL_P2ENDINC | SCTRL_P2STINC |
354 SCTRL_P2LOOPSEL | SCTRL_P2PAUSE |
355 SCTRL_P2DACSEN);
356 es->sctrl |= SCTRL_P2INTEN | (b << SCTRL_SH_P2ENDINC);
357 bus_space_write_4(es->st, es->sh,
358 ES1370_REG_DAC2_SCOUNT, cnt);
359 } else es->ctrl &= ~CTRL_DAC2_EN;
360 } else {
361 if (go == PCMTRIG_START) {
362 es->ctrl |= CTRL_ADC_EN;
363 es->sctrl &= ~SCTRL_R1LOOPSEL;
364 es->sctrl |= SCTRL_R1INTEN;
365 bus_space_write_4(es->st, es->sh,
366 ES1370_REG_ADC_SCOUNT, cnt);
367 } else es->ctrl &= ~CTRL_ADC_EN;
368 }
369 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl);
370 bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl);
371 return 0;
372}
373
374static int
375eschan_getptr(void *data)
376{
377 struct es_chinfo *ch = data;
378 struct es_info *es = ch->parent;
379 if (ch->dir == PCMDIR_PLAY) {
380 bus_space_write_4(es->st, es->sh, ES1370_REG_MEMPAGE,
381 ES1370_REG_DAC2_FRAMECNT >> 8);
382 return (bus_space_read_4(es->st, es->sh,
383 ES1370_REG_DAC2_FRAMECNT & 0xff) >> 14) & 0x3fffc;
384 } else {
385 bus_space_write_4(es->st, es->sh, ES1370_REG_MEMPAGE,
386 ES1370_REG_ADC_FRAMECNT >> 8);
387 return (bus_space_read_4(es->st, es->sh,
388 ES1370_REG_ADC_FRAMECNT & 0xff) >> 14) & 0x3fffc;
389 }
390}
391
392static pcmchan_caps *
393eschan_getcaps(void *data)
394{
395 struct es_chinfo *ch = data;
396 return (ch->dir == PCMDIR_PLAY)? &es_playcaps : &es_reccaps;
397}
398
399/* The interrupt handler */
400static void
401es_intr (void *p)
402{
403 struct es_info *es = p;
404 unsigned intsrc, sctrl;
405
406 intsrc = bus_space_read_4(es->st, es->sh, ES1370_REG_STATUS);
407 if ((intsrc & STAT_INTR) == 0) return;
408
409 sctrl = es->sctrl;
410 if (intsrc & STAT_ADC) sctrl &= ~SCTRL_R1INTEN;
411 if (intsrc & STAT_DAC1) sctrl &= ~SCTRL_P1INTEN;
412 if (intsrc & STAT_DAC2) sctrl &= ~SCTRL_P2INTEN;
413
414 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, sctrl);
415 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl);
416
417 if (intsrc & STAT_DAC2) chn_intr(es->pch.channel);
418 if (intsrc & STAT_ADC) chn_intr(es->rch.channel);
419}
420
421
422/* ES1371 specific code */
423
424#define CODEC_ID_SESHIFT 10
425#define CODEC_ID_SEMASK 0x1f
426
427#define CODEC_PIRD 0x00800000 /* 0 = write AC97 register */
428#define CODEC_PIADD_MASK 0x007f0000
429#define CODEC_PIADD_SHIFT 16
430#define CODEC_PIDAT_MASK 0x0000ffff
431#define CODEC_PIDAT_SHIFT 0
432
433#define CODEC_PORD 0x00800000 /* 0 = write AC97 register */
434#define CODEC_POADD_MASK 0x007f0000
435#define CODEC_POADD_SHIFT 16
436#define CODEC_PODAT_MASK 0x0000ffff
437#define CODEC_PODAT_SHIFT 0
438
439#define CODEC_RDY 0x80000000 /* AC97 read data valid */
440#define CODEC_WIP 0x40000000 /* AC97 write in progress */
441
442#define ES1370_REG_CONTROL 0x00
443#define ES1370_REG_SERIAL_CONTROL 0x20
444#define ES1371_REG_CODEC 0x14
445#define ES1371_REG_LEGACY 0x18 /* W/R: Legacy control/status register */
446#define ES1371_REG_SMPRATE 0x10 /* W/R: Codec rate converter interface register */
447
448#define ES1371_SYNC_RES (1<<14) /* Warm AC97 reset */
449#define ES1371_DIS_R1 (1<<19) /* record channel accumulator update disable */
450#define ES1371_DIS_P2 (1<<20) /* playback channel 2 accumulator update disable */
451#define ES1371_DIS_P1 (1<<21) /* playback channel 1 accumulator update disable */
452#define ES1371_DIS_SRC (1<<22) /* sample rate converter disable */
453#define ES1371_SRC_RAM_BUSY (1<<23) /* R/O: sample rate memory is busy */
454#define ES1371_SRC_RAM_WE (1<<24) /* R/W: read/write control for sample rate converter */
455#define ES1371_SRC_RAM_ADDRO(o) (((o)&0x7f)<<25) /* address of the sample rate converter */
456#define ES1371_SRC_RAM_DATAO(o) (((o)&0xffff)<<0) /* current value of the sample rate converter */
457#define ES1371_SRC_RAM_DATAI(i) (((i)>>0)&0xffff) /* current value of the sample rate converter */
458
459/*
460 * Sample rate converter addresses
461 */
462
463#define ES_SMPREG_DAC1 0x70
464#define ES_SMPREG_DAC2 0x74
465#define ES_SMPREG_ADC 0x78
466#define ES_SMPREG_TRUNC_N 0x00
467#define ES_SMPREG_INT_REGS 0x01
468#define ES_SMPREG_VFREQ_FRAC 0x03
469#define ES_SMPREG_VOL_ADC 0x6c
470#define ES_SMPREG_VOL_DAC1 0x7c
471#define ES_SMPREG_VOL_DAC2 0x7e
472
473
474int
475es1371_init(struct es_info *es)
476{
477 int idx;
478
479 if(debug > 0) printf("es_init\n");
480
481 es->ctrl = 0;
482 es->sctrl = 0;
483 /* initialize the chips */
484 bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl);
485 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl);
486 bus_space_write_4(es->st, es->sh, ES1371_REG_LEGACY, 0);
487 /* AC'97 warm reset to start the bitclk */
488 bus_space_write_4(es->st, es->sh, ES1371_REG_LEGACY, es->ctrl | ES1371_SYNC_RES);
489 DELAY(2000);
490 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL,es->ctrl);
491 /* Init the sample rate converter */
492 bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, ES1371_DIS_SRC);
493 for (idx = 0; idx < 0x80; idx++)
494 es1371_src_write(es, idx, 0);
495 es1371_src_write(es, ES_SMPREG_DAC1 + ES_SMPREG_TRUNC_N, 16 << 4);
496 es1371_src_write(es, ES_SMPREG_DAC1 + ES_SMPREG_INT_REGS, 16 << 10);
497 es1371_src_write(es, ES_SMPREG_DAC2 + ES_SMPREG_TRUNC_N, 16 << 4);
498 es1371_src_write(es, ES_SMPREG_DAC2 + ES_SMPREG_INT_REGS, 16 << 10);
499 es1371_src_write(es, ES_SMPREG_VOL_ADC, 1 << 12);
500 es1371_src_write(es, ES_SMPREG_VOL_ADC + 1, 1 << 12);
501 es1371_src_write(es, ES_SMPREG_VOL_DAC1, 1 << 12);
502 es1371_src_write(es, ES_SMPREG_VOL_DAC1 + 1, 1 << 12);
503 es1371_src_write(es, ES_SMPREG_VOL_DAC2, 1 << 12);
504 es1371_src_write(es, ES_SMPREG_VOL_DAC2 + 1, 1 << 12);
505 es1371_adc_rate (es, 22050, 1);
506 es1371_dac1_rate(es, 22050, 1);
507 es1371_dac2_rate(es, 22050, 1);
508 /* WARNING:
509 * enabling the sample rate converter without properly programming
510 * its parameters causes the chip to lock up (the SRC busy bit will
511 * be stuck high, and I've found no way to rectify this other than
512 * power cycle)
513 */
514 bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE, 0);
515
516 return (0);
517}
518
519void
520es1371_wrcodec(void *s, int addr, u_int32_t data)
521{
522 /* unsigned long flags; */
523 int sl;
524 unsigned t, x;
525 struct es_info *es = (struct es_info*)s;
526
527 if(debug > 0) printf("wrcodec addr 0x%x data 0x%x\n",addr,data);
528
529 for (t = 0; t < 0x1000; t++)
530 if(!(bus_space_read_4(es->st, es->sh,(ES1371_REG_CODEC & CODEC_WIP))))
531 break;
532 sl = spltty();
533 /* save the current state for later */
534 x = bus_space_read_4(es->st, es->sh, ES1371_REG_SMPRATE);
535 /* enable SRC state data in SRC mux */
536 bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE,
537 (es1371_wait_src_ready(s) &
538 (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1)));
539 /* wait for a SAFE time to write addr/data and then do it, dammit */
540 for (t = 0; t < 0x1000; t++)
541 if (( bus_space_read_4(es->st, es->sh, ES1371_REG_SMPRATE) & 0x00070000) == 0x00010000)
542 break;
543
544 if(debug > 2) printf("one b_s_w: 0x%x 0x%x 0x%x\n",es->sh,ES1371_REG_CODEC,
545 ((addr << CODEC_POADD_SHIFT) & CODEC_POADD_MASK) |
546 ((data << CODEC_PODAT_SHIFT) & CODEC_PODAT_MASK));
547
548 bus_space_write_4(es->st, es->sh,ES1371_REG_CODEC,
549 ((addr << CODEC_POADD_SHIFT) & CODEC_POADD_MASK) |
550 ((data << CODEC_PODAT_SHIFT) & CODEC_PODAT_MASK));
551 /* restore SRC reg */
552 es1371_wait_src_ready(s);
553 if(debug > 2) printf("two b_s_w: 0x%x 0x%x 0x%x\n",es->sh,ES1371_REG_SMPRATE,x);
554 bus_space_write_4(es->st, es->sh,ES1371_REG_SMPRATE,x);
555 splx(sl);
556}
557
558u_int32_t
559es1371_rdcodec(void *s, u_int32_t addr)
560{
561 /* unsigned long flags; */
562 int sl;
563 unsigned t, x;
564
565 struct es_info *es = (struct es_info *)s;
566
567 if(debug > 0) printf("rdcodec addr 0x%x ... ",addr);
568
569 for (t = 0; t < 0x1000; t++)
570 if (!(x = bus_space_read_4(es->st,es->sh,ES1371_REG_CODEC) & CODEC_WIP))
571 break;
572 if(debug >0) printf("loop 1 t 0x%x x 0x%x ",t,x);
573
574 sl = spltty();
575
576 /* save the current state for later */
577 x = bus_space_read_4(es->st, es->sh, ES1371_REG_SMPRATE);
578 /* enable SRC state data in SRC mux */
579 bus_space_write_4(es->st, es->sh, ES1371_REG_SMPRATE,
580 (es1371_wait_src_ready(s) &
581 (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1)));
582 /* wait for a SAFE time to write addr/data and then do it, dammit */
583 for (t = 0; t < 0x5000; t++)
584 if (( x = bus_space_read_4(es->st, es->sh, ES1371_REG_SMPRATE) & 0x00070000) == 0x00010000)
585 break;
586 if(debug >0) printf("loop 2 t 0x%x x 0x%x ",t,x);
587 bus_space_write_4(es->st, es->sh,ES1371_REG_CODEC,
588 ((addr << CODEC_POADD_SHIFT) & CODEC_POADD_MASK) | CODEC_PORD);
589
590 /* restore SRC reg */
591 es1371_wait_src_ready(s);
592 bus_space_write_4(es->st,es->sh,ES1371_REG_SMPRATE,x);
593
594 splx(sl);
595
596 /* now wait for the stinkin' data (RDY) */
597 for (t = 0; t < 0x1000; t++)
598 if ((x = bus_space_read_4(es->st,es->sh,ES1371_REG_CODEC)) & CODEC_RDY)
599 break;
600 if(debug > 0) printf("loop 3 t 0x%x 0x%x ret 0x%x\n",t,x,((x & CODEC_PIDAT_MASK) >> CODEC_PIDAT_SHIFT));
601 return ((x & CODEC_PIDAT_MASK) >> CODEC_PIDAT_SHIFT);
602}
603
604
605
606
607static u_int
608es1371_src_read(es_info_t *es, u_short reg){
609
610 unsigned int r;
611
612 r = es1371_wait_src_ready(es) &
613 (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1);
614 r |= ES1371_SRC_RAM_ADDRO(reg);
615 bus_space_write_4(es->st, es->sh,ES1371_REG_SMPRATE,r);
616 return ES1371_SRC_RAM_DATAI(es1371_wait_src_ready(es));
617}
618
619static void
620es1371_src_write(es_info_t *es, u_short reg, u_short data){
621 u_int r;
622
623 r = es1371_wait_src_ready(es) &
624 (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1);
625 r |= ES1371_SRC_RAM_ADDRO(reg) | ES1371_SRC_RAM_DATAO(data);
626 /* printf("es1371_src_write 0x%x 0x%x\n",ES1371_REG_SMPRATE,r | ES1371_SRC_RAM_WE); */
627 bus_space_write_4(es->st, es->sh,ES1371_REG_SMPRATE,r | ES1371_SRC_RAM_WE);
628}
629
630static u_int
631es1371_adc_rate(es_info_t *es, u_int rate, int set){
632 u_int n, truncm, freq, result;
633
634 if (rate > 48000)
635 rate = 48000;
636 if (rate < 4000)
637 rate = 4000;
638 n = rate / 3000;
639 if ((1 << n) & ((1 << 15) | (1 << 13) | (1 << 11) | (1 << 9)))
640 n--;
641 truncm = (21 * n - 1) | 1;
642 freq = ((48000UL << 15) / rate) * n;
643 result = (48000UL << 15) / (freq / n);
644 if (set) {
645 if (rate >= 24000) {
646 if (truncm > 239)
647 truncm = 239;
648 es1371_src_write(es, ES_SMPREG_ADC + ES_SMPREG_TRUNC_N,
649 (((239 - truncm) >> 1) << 9) | (n << 4));
650 } else {
651 if (truncm > 119)
652 truncm = 119;
653 es1371_src_write(es, ES_SMPREG_ADC + ES_SMPREG_TRUNC_N,
654 0x8000 | (((119 - truncm) >> 1) << 9) | (n << 4));
655 }
656 es1371_src_write(es, ES_SMPREG_ADC + ES_SMPREG_INT_REGS,
657 (es1371_src_read(es, ES_SMPREG_ADC + ES_SMPREG_INT_REGS) &
658 0x00ff) | ((freq >> 5) & 0xfc00));
659 es1371_src_write(es, ES_SMPREG_ADC + ES_SMPREG_VFREQ_FRAC, freq & 0x7fff);
660 es1371_src_write(es, ES_SMPREG_VOL_ADC, n << 8);
661 es1371_src_write(es, ES_SMPREG_VOL_ADC + 1, n << 8);
662 }
663 return result;
664}
665
666static u_int
667es1371_dac1_rate(es_info_t *es, u_int rate, int set){
668 u_int freq, r, result;
669
670 if (rate > 48000)
671 rate = 48000;
672 if (rate < 4000)
673 rate = 4000;
674 freq = (rate << 15) / 3000;
675 result = (freq * 3000) >> 15;
676 if (set) {
677 r = (es1371_wait_src_ready(es) & (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1));
678 bus_space_write_4(es->st, es->sh,ES1371_REG_SMPRATE,r);
679 es1371_src_write(es, ES_SMPREG_DAC1 +
680 ES_SMPREG_INT_REGS,
681 (es1371_src_read(es,
682 ES_SMPREG_DAC1 + ES_SMPREG_INT_REGS) & 0x00ff) | ((freq >> 5) & 0xfc00));
683 es1371_src_write(es, ES_SMPREG_DAC1 + ES_SMPREG_VFREQ_FRAC, freq & 0x7fff);
684 r = (es1371_wait_src_ready(es) & (ES1371_DIS_SRC | ES1371_DIS_P2 | ES1371_DIS_R1));
685 bus_space_write_4(es->st, es->sh,ES1371_REG_SMPRATE,r);
686 }
687 return result;
688}
689
690static u_int
691es1371_dac2_rate(es_info_t *es, u_int rate, int set){
692 u_int freq, r, result;
693
694 if (rate > 48000)
695 rate = 48000;
696 if (rate < 4000)
697 rate = 4000;
698 freq = (rate << 15) / 3000;
699 result = (freq * 3000) >> 15;
700 if (set) {
701 r = (es1371_wait_src_ready(es) & (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_P2 | ES1371_DIS_R1));
702 bus_space_write_4(es->st, es->sh,ES1371_REG_SMPRATE,r);
703 /* if(debug > 0) printf("dac2_rate 0x%x\n",bus_space_read_4(es->st, es->sh,ES1371_REG_SMPRATE)); */
704 es1371_src_write(es, ES_SMPREG_DAC2 + ES_SMPREG_INT_REGS,
705 (es1371_src_read(es, ES_SMPREG_DAC2 + ES_SMPREG_INT_REGS) &
706 0x00ff) | ((freq >> 5) & 0xfc00));
707 es1371_src_write(es, ES_SMPREG_DAC2 + ES_SMPREG_VFREQ_FRAC, freq & 0x7fff);
708 r = (es1371_wait_src_ready(es) & (ES1371_DIS_SRC | ES1371_DIS_P1 | ES1371_DIS_R1));
709 bus_space_write_4(es->st, es->sh,ES1371_REG_SMPRATE,r);
710 /* if(debug > 0) printf("dac2_rate 0x%x\n",bus_space_read_4(es->st, es->sh,ES1371_REG_SMPRATE)); */
711 }
712 return result;
713}
714
715
716static u_int
717es1371_wait_src_ready(es_info_t *es){
718 u_int t, r;
719
720 for (t = 0; t < 500; t++) {
721 if (!((r = bus_space_read_4(es->st, es->sh,ES1371_REG_SMPRATE)) & ES1371_SRC_RAM_BUSY)){
722 return r;
723 }
724 DELAY(1000);
725 }
726 printf("es1371: wait source ready timeout 0x%x [0x%x]\n", ES1371_REG_SMPRATE, r);
727 return 0;
728}
729
730
731int
732eschan1371_setspeed(void *data, u_int32_t speed)
733{
734 struct es_chinfo *ch = data;
735 struct es_info *es = ch->parent;
736
737 /* rec/play speeds locked together - should indicate in flags */
738 es1371_dac2_rate(es, speed, 1); /* play */
739 es1371_adc_rate (es, speed, 1); /* record */
740
741 return speed; /* XXX calc real speed */
742}
743
744
745
394/* -------------------------------------------------------------------- */
395
396/*
397 * Probe and attach the card
398 */
399
400static int
401es_init(struct es_info *es)
402{
403 es->ctrl = CTRL_CDC_EN | CTRL_SERR_DIS |
404 (DAC2_SRTODIV(DSP_DEFAULT_SPEED) << CTRL_SH_PCLKDIV);
405 bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl);
406
407 es->sctrl = 0;
408 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl);
409
410 write_codec(es, CODEC_RES_PD, 3);/* No RST, PD */
411 write_codec(es, CODEC_CSEL, 0); /* CODEC ADC and CODEC DAC use
412 * {LR,B}CLK2 and run off the LRCLK2
413 * PLL; program DAC_SYNC=0! */
414 write_codec(es, CODEC_ADSEL, 0);/* Recording source is mixer */
415 write_codec(es, CODEC_MGAIN, 0);/* MIC amp is 0db */
416
417 return 0;
418}
419
420static int
421es_pci_probe(device_t dev)
422{
423 if (pci_get_devid(dev) == ES1370_PCI_ID) {
424 device_set_desc(dev, "AudioPCI ES1370");
425 return 0;
746/* -------------------------------------------------------------------- */
747
748/*
749 * Probe and attach the card
750 */
751
752static int
753es_init(struct es_info *es)
754{
755 es->ctrl = CTRL_CDC_EN | CTRL_SERR_DIS |
756 (DAC2_SRTODIV(DSP_DEFAULT_SPEED) << CTRL_SH_PCLKDIV);
757 bus_space_write_4(es->st, es->sh, ES1370_REG_CONTROL, es->ctrl);
758
759 es->sctrl = 0;
760 bus_space_write_4(es->st, es->sh, ES1370_REG_SERIAL_CONTROL, es->sctrl);
761
762 write_codec(es, CODEC_RES_PD, 3);/* No RST, PD */
763 write_codec(es, CODEC_CSEL, 0); /* CODEC ADC and CODEC DAC use
764 * {LR,B}CLK2 and run off the LRCLK2
765 * PLL; program DAC_SYNC=0! */
766 write_codec(es, CODEC_ADSEL, 0);/* Recording source is mixer */
767 write_codec(es, CODEC_MGAIN, 0);/* MIC amp is 0db */
768
769 return 0;
770}
771
772static int
773es_pci_probe(device_t dev)
774{
775 if (pci_get_devid(dev) == ES1370_PCI_ID) {
776 device_set_desc(dev, "AudioPCI ES1370");
777 return 0;
778 } else if (pci_get_devid(dev) == ES1371_PCI_ID) {
779 device_set_desc(dev, "AudioPCI ES1371");
780 return 0;
426 }
427 return ENXIO;
428}
429
430static int
431es_pci_attach(device_t dev)
432{
433 snddev_info *d;
434 u_int32_t data;
435 struct es_info *es = 0;
436 int type = 0;
437 int regid;
438 struct resource *reg = 0;
439 int mapped;
440 int irqid;
441 struct resource *irq = 0;
442 void *ih = 0;
443 char status[SND_STATUSLEN];
781 }
782 return ENXIO;
783}
784
785static int
786es_pci_attach(device_t dev)
787{
788 snddev_info *d;
789 u_int32_t data;
790 struct es_info *es = 0;
791 int type = 0;
792 int regid;
793 struct resource *reg = 0;
794 int mapped;
795 int irqid;
796 struct resource *irq = 0;
797 void *ih = 0;
798 char status[SND_STATUSLEN];
799 struct ac97_info *codec;
444
445 d = device_get_softc(dev);
446 if ((es = malloc(sizeof *es, M_DEVBUF, M_NOWAIT)) == NULL) {
447 device_printf(dev, "cannot allocate softc\n");
448 return ENXIO;
449 }
450 bzero(es, sizeof *es);
451
452 mapped = 0;
453 data = pci_read_config(dev, PCIR_COMMAND, 2);
454 if (mapped == 0 && (data & PCIM_CMD_MEMEN)) {
455 regid = MEM_MAP_REG;
456 type = SYS_RES_MEMORY;
457 reg = bus_alloc_resource(dev, type, &regid,
458 0, ~0, 1, RF_ACTIVE);
459 if (reg) {
460 es->st = rman_get_bustag(reg);
461 es->sh = rman_get_bushandle(reg);
462 mapped++;
463 }
464 }
465 if (mapped == 0 && (data & PCIM_CMD_PORTEN)) {
466 regid = PCI_MAP_REG_START;
467 type = SYS_RES_IOPORT;
468 reg = bus_alloc_resource(dev, type, &regid,
469 0, ~0, 1, RF_ACTIVE);
470 if (reg) {
471 es->st = rman_get_bustag(reg);
472 es->sh = rman_get_bushandle(reg);
473 mapped++;
474 }
475 }
476 if (mapped == 0) {
477 device_printf(dev, "unable to map register space\n");
478 goto bad;
479 }
800
801 d = device_get_softc(dev);
802 if ((es = malloc(sizeof *es, M_DEVBUF, M_NOWAIT)) == NULL) {
803 device_printf(dev, "cannot allocate softc\n");
804 return ENXIO;
805 }
806 bzero(es, sizeof *es);
807
808 mapped = 0;
809 data = pci_read_config(dev, PCIR_COMMAND, 2);
810 if (mapped == 0 && (data & PCIM_CMD_MEMEN)) {
811 regid = MEM_MAP_REG;
812 type = SYS_RES_MEMORY;
813 reg = bus_alloc_resource(dev, type, &regid,
814 0, ~0, 1, RF_ACTIVE);
815 if (reg) {
816 es->st = rman_get_bustag(reg);
817 es->sh = rman_get_bushandle(reg);
818 mapped++;
819 }
820 }
821 if (mapped == 0 && (data & PCIM_CMD_PORTEN)) {
822 regid = PCI_MAP_REG_START;
823 type = SYS_RES_IOPORT;
824 reg = bus_alloc_resource(dev, type, &regid,
825 0, ~0, 1, RF_ACTIVE);
826 if (reg) {
827 es->st = rman_get_bustag(reg);
828 es->sh = rman_get_bushandle(reg);
829 mapped++;
830 }
831 }
832 if (mapped == 0) {
833 device_printf(dev, "unable to map register space\n");
834 goto bad;
835 }
480
481 if (es_init(es) == -1) {
836
837 if (pci_get_devid(dev) == ES1371_PCI_ID) {
838 if(-1 == es1371_init(es)){
482 device_printf(dev, "unable to initialize the card\n");
839 device_printf(dev, "unable to initialize the card\n");
840 goto bad;
841 }
842 codec = ac97_create(es,(ac97_read *)es1371_rdcodec,(ac97_write *)es1371_wrcodec);
843 if (codec == NULL) goto bad;
844 /* our init routine does everything for us */
845 /* set to NULL; flag mixer_init not to run the ac97_init */
846 /* ac97_mixer.init = NULL; */
847 mixer_init(d, &ac97_mixer, codec);
848 /* change the routine for setting speed */
849 es_chantemplate.setspeed = eschan1371_setspeed;
850 } else if (pci_get_devid(dev) == ES1370_PCI_ID) {
851 if (-1 == es_init(es)){
852 device_printf(dev, "unable to initialize the card\n");
483 goto bad;
853 goto bad;
854 }
855 mixer_init(d, &es_mixer, es);
484 }
856 }
485 mixer_init(d, &es_mixer, es);
857
486
487 irqid = 0;
488 irq = bus_alloc_resource(dev, SYS_RES_IRQ, &irqid,
489 0, ~0, 1, RF_ACTIVE | RF_SHAREABLE);
490 if (!irq
491 || bus_setup_intr(dev, irq, INTR_TYPE_TTY, es_intr, es, &ih)) {
492 device_printf(dev, "unable to map interrupt\n");
493 goto bad;
494 }
495
496 if (bus_dma_tag_create(/*parent*/NULL, /*alignment*/2, /*boundary*/0,
497 /*lowaddr*/BUS_SPACE_MAXADDR_32BIT,
498 /*highaddr*/BUS_SPACE_MAXADDR,
499 /*filter*/NULL, /*filterarg*/NULL,
500 /*maxsize*/ES_BUFFSIZE, /*nsegments*/1, /*maxsegz*/0x3ffff,
501 /*flags*/0, &es->parent_dmat) != 0) {
502 device_printf(dev, "unable to create dma tag\n");
503 goto bad;
504 }
505
506 snprintf(status, SND_STATUSLEN, "at %s 0x%lx irq %ld",
507 (type == SYS_RES_IOPORT)? "io" : "memory",
508 rman_get_start(reg), rman_get_start(irq));
509
510 if (pcm_register(dev, es, 1, 1)) goto bad;
511 pcm_addchan(dev, PCMDIR_REC, &es_chantemplate, es);
512 pcm_addchan(dev, PCMDIR_PLAY, &es_chantemplate, es);
513 pcm_setstatus(dev, status);
514
515 return 0;
516
517 bad:
518 if (es) free(es, M_DEVBUF);
519 if (reg) bus_release_resource(dev, type, regid, reg);
520 if (ih) bus_teardown_intr(dev, irq, ih);
521 if (irq) bus_release_resource(dev, SYS_RES_IRQ, irqid, irq);
522 return ENXIO;
523}
524
525static device_method_t es_methods[] = {
526 /* Device interface */
527 DEVMETHOD(device_probe, es_pci_probe),
528 DEVMETHOD(device_attach, es_pci_attach),
529
530 { 0, 0 }
531};
532
533static driver_t es_driver = {
534 "pcm",
535 es_methods,
536 sizeof(snddev_info),
537};
538
539static devclass_t pcm_devclass;
540
541DRIVER_MODULE(es, pci, es_driver, pcm_devclass, 0, 0);
542
858
859 irqid = 0;
860 irq = bus_alloc_resource(dev, SYS_RES_IRQ, &irqid,
861 0, ~0, 1, RF_ACTIVE | RF_SHAREABLE);
862 if (!irq
863 || bus_setup_intr(dev, irq, INTR_TYPE_TTY, es_intr, es, &ih)) {
864 device_printf(dev, "unable to map interrupt\n");
865 goto bad;
866 }
867
868 if (bus_dma_tag_create(/*parent*/NULL, /*alignment*/2, /*boundary*/0,
869 /*lowaddr*/BUS_SPACE_MAXADDR_32BIT,
870 /*highaddr*/BUS_SPACE_MAXADDR,
871 /*filter*/NULL, /*filterarg*/NULL,
872 /*maxsize*/ES_BUFFSIZE, /*nsegments*/1, /*maxsegz*/0x3ffff,
873 /*flags*/0, &es->parent_dmat) != 0) {
874 device_printf(dev, "unable to create dma tag\n");
875 goto bad;
876 }
877
878 snprintf(status, SND_STATUSLEN, "at %s 0x%lx irq %ld",
879 (type == SYS_RES_IOPORT)? "io" : "memory",
880 rman_get_start(reg), rman_get_start(irq));
881
882 if (pcm_register(dev, es, 1, 1)) goto bad;
883 pcm_addchan(dev, PCMDIR_REC, &es_chantemplate, es);
884 pcm_addchan(dev, PCMDIR_PLAY, &es_chantemplate, es);
885 pcm_setstatus(dev, status);
886
887 return 0;
888
889 bad:
890 if (es) free(es, M_DEVBUF);
891 if (reg) bus_release_resource(dev, type, regid, reg);
892 if (ih) bus_teardown_intr(dev, irq, ih);
893 if (irq) bus_release_resource(dev, SYS_RES_IRQ, irqid, irq);
894 return ENXIO;
895}
896
897static device_method_t es_methods[] = {
898 /* Device interface */
899 DEVMETHOD(device_probe, es_pci_probe),
900 DEVMETHOD(device_attach, es_pci_attach),
901
902 { 0, 0 }
903};
904
905static driver_t es_driver = {
906 "pcm",
907 es_methods,
908 sizeof(snddev_info),
909};
910
911static devclass_t pcm_devclass;
912
913DRIVER_MODULE(es, pci, es_driver, pcm_devclass, 0, 0);
914
915
543#endif /* NPCI != 0 */
916#endif /* NPCI != 0 */