ess.c revision 1.40 1 1.40 mycroft /* $NetBSD: ess.c,v 1.40 1999/03/17 02:39:59 mycroft Exp $ */
2 1.1 augustss
3 1.1 augustss /*
4 1.1 augustss * Copyright 1997
5 1.1 augustss * Digital Equipment Corporation. All rights reserved.
6 1.1 augustss *
7 1.1 augustss * This software is furnished under license and may be used and
8 1.1 augustss * copied only in accordance with the following terms and conditions.
9 1.1 augustss * Subject to these conditions, you may download, copy, install,
10 1.1 augustss * use, modify and distribute this software in source and/or binary
11 1.1 augustss * form. No title or ownership is transferred hereby.
12 1.1 augustss *
13 1.1 augustss * 1) Any source code used, modified or distributed must reproduce
14 1.1 augustss * and retain this copyright notice and list of conditions as
15 1.1 augustss * they appear in the source file.
16 1.1 augustss *
17 1.1 augustss * 2) No right is granted to use any trade name, trademark, or logo of
18 1.1 augustss * Digital Equipment Corporation. Neither the "Digital Equipment
19 1.1 augustss * Corporation" name nor any trademark or logo of Digital Equipment
20 1.1 augustss * Corporation may be used to endorse or promote products derived
21 1.1 augustss * from this software without the prior written permission of
22 1.1 augustss * Digital Equipment Corporation.
23 1.1 augustss *
24 1.1 augustss * 3) This software is provided "AS-IS" and any express or implied
25 1.1 augustss * warranties, including but not limited to, any implied warranties
26 1.1 augustss * of merchantability, fitness for a particular purpose, or
27 1.1 augustss * non-infringement are disclaimed. In no event shall DIGITAL be
28 1.1 augustss * liable for any damages whatsoever, and in particular, DIGITAL
29 1.1 augustss * shall not be liable for special, indirect, consequential, or
30 1.1 augustss * incidental damages or damages for lost profits, loss of
31 1.1 augustss * revenue or loss of use, whether such damages arise in contract,
32 1.1 augustss * negligence, tort, under statute, in equity, at law or otherwise,
33 1.1 augustss * even if advised of the possibility of such damage.
34 1.1 augustss */
35 1.1 augustss
36 1.1 augustss /*
37 1.1 augustss **++
38 1.1 augustss **
39 1.1 augustss ** ess.c
40 1.1 augustss **
41 1.1 augustss ** FACILITY:
42 1.1 augustss **
43 1.1 augustss ** DIGITAL Network Appliance Reference Design (DNARD)
44 1.1 augustss **
45 1.1 augustss ** MODULE DESCRIPTION:
46 1.1 augustss **
47 1.1 augustss ** This module contains the device driver for the ESS
48 1.1 augustss ** Technologies 1888/1887/888 sound chip. The code in sbdsp.c was
49 1.1 augustss ** used as a reference point when implementing this driver.
50 1.1 augustss **
51 1.1 augustss ** AUTHORS:
52 1.1 augustss **
53 1.1 augustss ** Blair Fidler Software Engineering Australia
54 1.1 augustss ** Gold Coast, Australia.
55 1.1 augustss **
56 1.1 augustss ** CREATION DATE:
57 1.1 augustss **
58 1.1 augustss ** March 10, 1997.
59 1.1 augustss **
60 1.1 augustss ** MODIFICATION HISTORY:
61 1.1 augustss **
62 1.19 mycroft ** Heavily modified by Lennart Augustsson and Charles M. Hannum for
63 1.19 mycroft ** bus_dma, changes to audio interface, and many bug fixes.
64 1.34 mycroft ** ESS1788 support by Nathan J. Williams and Charles M. Hannum.
65 1.1 augustss **--
66 1.1 augustss */
67 1.1 augustss
68 1.1 augustss #include <sys/param.h>
69 1.1 augustss #include <sys/systm.h>
70 1.1 augustss #include <sys/errno.h>
71 1.1 augustss #include <sys/ioctl.h>
72 1.1 augustss #include <sys/syslog.h>
73 1.1 augustss #include <sys/device.h>
74 1.1 augustss #include <sys/proc.h>
75 1.1 augustss
76 1.1 augustss #include <machine/cpu.h>
77 1.1 augustss #include <machine/intr.h>
78 1.6 augustss #include <machine/bus.h>
79 1.1 augustss
80 1.1 augustss #include <sys/audioio.h>
81 1.1 augustss #include <dev/audio_if.h>
82 1.1 augustss #include <dev/auconv.h>
83 1.1 augustss #include <dev/mulaw.h>
84 1.1 augustss
85 1.1 augustss #include <dev/isa/isavar.h>
86 1.1 augustss #include <dev/isa/isadmavar.h>
87 1.1 augustss
88 1.1 augustss #include <dev/isa/essvar.h>
89 1.1 augustss #include <dev/isa/essreg.h>
90 1.1 augustss
91 1.1 augustss #ifdef AUDIO_DEBUG
92 1.1 augustss #define DPRINTF(x) if (essdebug) printf x
93 1.2 augustss #define DPRINTFN(n,x) if (essdebug>(n)) printf x
94 1.1 augustss int essdebug = 0;
95 1.1 augustss #else
96 1.1 augustss #define DPRINTF(x)
97 1.2 augustss #define DPRINTFN(n,x)
98 1.1 augustss #endif
99 1.1 augustss
100 1.2 augustss #if 0
101 1.2 augustss unsigned uuu;
102 1.2 augustss #define EREAD1(t, h, a) (uuu=bus_space_read_1(t, h, a),printf("EREAD %02x=%02x\n", ((int)h&0xfff)+a, uuu),uuu)
103 1.2 augustss #define EWRITE1(t, h, a, d) (printf("EWRITE %02x=%02x\n", ((int)h & 0xfff)+a, d), bus_space_write_1(t, h, a, d))
104 1.2 augustss #else
105 1.2 augustss #define EREAD1(t, h, a) bus_space_read_1(t, h, a)
106 1.2 augustss #define EWRITE1(t, h, a, d) bus_space_write_1(t, h, a, d)
107 1.2 augustss #endif
108 1.1 augustss
109 1.2 augustss
110 1.2 augustss int ess_setup_sc __P((struct ess_softc *, int));
111 1.1 augustss
112 1.1 augustss int ess_open __P((void *, int));
113 1.33 nathanw void ess_1788_close __P((void *));
114 1.33 nathanw void ess_1888_close __P((void *));
115 1.1 augustss int ess_getdev __P((void *, struct audio_device *));
116 1.1 augustss int ess_drain __P((void *));
117 1.1 augustss
118 1.1 augustss int ess_query_encoding __P((void *, struct audio_encoding *));
119 1.1 augustss
120 1.1 augustss int ess_set_params __P((void *, int, int, struct audio_params *,
121 1.19 mycroft struct audio_params *));
122 1.1 augustss
123 1.1 augustss int ess_round_blocksize __P((void *, int));
124 1.1 augustss
125 1.36 mycroft int ess_audio1_trigger_output __P((void *, void *, void *, int,
126 1.34 mycroft void (*)(void *), void *, struct audio_params *));
127 1.36 mycroft int ess_audio2_trigger_output __P((void *, void *, void *, int,
128 1.34 mycroft void (*)(void *), void *, struct audio_params *));
129 1.36 mycroft int ess_audio1_trigger_input __P((void *, void *, void *, int,
130 1.34 mycroft void (*)(void *), void *, struct audio_params *));
131 1.39 mycroft int ess_audio1_halt __P((void *));
132 1.39 mycroft int ess_audio2_halt __P((void *));
133 1.36 mycroft int ess_audio1_intr __P((void *));
134 1.36 mycroft int ess_audio2_intr __P((void *));
135 1.1 augustss
136 1.1 augustss int ess_speaker_ctl __P((void *, int));
137 1.1 augustss
138 1.1 augustss int ess_getdev __P((void *, struct audio_device *));
139 1.1 augustss
140 1.1 augustss int ess_set_port __P((void *, mixer_ctrl_t *));
141 1.1 augustss int ess_get_port __P((void *, mixer_ctrl_t *));
142 1.1 augustss
143 1.30 mycroft void *ess_malloc __P((void *, int, size_t, int, int));
144 1.4 augustss void ess_free __P((void *, void *, int));
145 1.30 mycroft size_t ess_round_buffersize __P((void *, int, size_t));
146 1.4 augustss int ess_mappage __P((void *, void *, int, int));
147 1.4 augustss
148 1.4 augustss
149 1.1 augustss int ess_query_devinfo __P((void *, mixer_devinfo_t *));
150 1.36 mycroft int ess_1788_get_props __P((void *));
151 1.36 mycroft int ess_1888_get_props __P((void *));
152 1.1 augustss
153 1.4 augustss void ess_speaker_on __P((struct ess_softc *));
154 1.4 augustss void ess_speaker_off __P((struct ess_softc *));
155 1.1 augustss
156 1.1 augustss int ess_config_addr __P((struct ess_softc *));
157 1.4 augustss void ess_config_irq __P((struct ess_softc *));
158 1.4 augustss void ess_config_drq __P((struct ess_softc *));
159 1.4 augustss void ess_setup __P((struct ess_softc *));
160 1.1 augustss int ess_identify __P((struct ess_softc *));
161 1.1 augustss
162 1.1 augustss int ess_reset __P((struct ess_softc *));
163 1.1 augustss void ess_set_gain __P((struct ess_softc *, int, int));
164 1.33 nathanw int ess_set_in_port __P((struct ess_softc *, int));
165 1.1 augustss int ess_set_in_ports __P((struct ess_softc *, int));
166 1.1 augustss u_int ess_srtotc __P((u_int));
167 1.1 augustss u_int ess_srtofc __P((u_int));
168 1.1 augustss u_char ess_get_dsp_status __P((struct ess_softc *));
169 1.1 augustss u_char ess_dsp_read_ready __P((struct ess_softc *));
170 1.1 augustss u_char ess_dsp_write_ready __P((struct ess_softc *sc));
171 1.1 augustss int ess_rdsp __P((struct ess_softc *));
172 1.1 augustss int ess_wdsp __P((struct ess_softc *, u_char));
173 1.1 augustss u_char ess_read_x_reg __P((struct ess_softc *, u_char));
174 1.1 augustss int ess_write_x_reg __P((struct ess_softc *, u_char, u_char));
175 1.1 augustss void ess_clear_xreg_bits __P((struct ess_softc *, u_char, u_char));
176 1.1 augustss void ess_set_xreg_bits __P((struct ess_softc *, u_char, u_char));
177 1.1 augustss u_char ess_read_mix_reg __P((struct ess_softc *, u_char));
178 1.1 augustss void ess_write_mix_reg __P((struct ess_softc *, u_char, u_char));
179 1.1 augustss void ess_clear_mreg_bits __P((struct ess_softc *, u_char, u_char));
180 1.1 augustss void ess_set_mreg_bits __P((struct ess_softc *, u_char, u_char));
181 1.1 augustss
182 1.1 augustss static char *essmodel[] = {
183 1.1 augustss "unsupported",
184 1.1 augustss "1888",
185 1.1 augustss "1887",
186 1.33 nathanw "888",
187 1.33 nathanw "1788"
188 1.1 augustss };
189 1.1 augustss
190 1.1 augustss struct audio_device ess_device = {
191 1.1 augustss "ESS Technology",
192 1.1 augustss "x",
193 1.1 augustss "ess"
194 1.1 augustss };
195 1.1 augustss
196 1.1 augustss /*
197 1.1 augustss * Define our interface to the higher level audio driver.
198 1.1 augustss */
199 1.1 augustss
200 1.33 nathanw struct audio_hw_if ess_1788_hw_if = {
201 1.1 augustss ess_open,
202 1.33 nathanw ess_1788_close,
203 1.6 augustss ess_drain,
204 1.1 augustss ess_query_encoding,
205 1.1 augustss ess_set_params,
206 1.1 augustss ess_round_blocksize,
207 1.1 augustss NULL,
208 1.19 mycroft NULL,
209 1.19 mycroft NULL,
210 1.19 mycroft NULL,
211 1.19 mycroft NULL,
212 1.39 mycroft ess_audio1_halt,
213 1.39 mycroft ess_audio1_halt,
214 1.1 augustss ess_speaker_ctl,
215 1.1 augustss ess_getdev,
216 1.1 augustss NULL,
217 1.1 augustss ess_set_port,
218 1.1 augustss ess_get_port,
219 1.1 augustss ess_query_devinfo,
220 1.4 augustss ess_malloc,
221 1.4 augustss ess_free,
222 1.30 mycroft ess_round_buffersize,
223 1.33 nathanw ess_mappage,
224 1.36 mycroft ess_1788_get_props,
225 1.36 mycroft ess_audio1_trigger_output,
226 1.36 mycroft ess_audio1_trigger_input,
227 1.33 nathanw };
228 1.33 nathanw
229 1.33 nathanw struct audio_hw_if ess_1888_hw_if = {
230 1.33 nathanw ess_open,
231 1.33 nathanw ess_1888_close,
232 1.33 nathanw ess_drain,
233 1.33 nathanw ess_query_encoding,
234 1.33 nathanw ess_set_params,
235 1.33 nathanw ess_round_blocksize,
236 1.33 nathanw NULL,
237 1.33 nathanw NULL,
238 1.33 nathanw NULL,
239 1.33 nathanw NULL,
240 1.33 nathanw NULL,
241 1.39 mycroft ess_audio2_halt,
242 1.39 mycroft ess_audio1_halt,
243 1.33 nathanw ess_speaker_ctl,
244 1.33 nathanw ess_getdev,
245 1.33 nathanw NULL,
246 1.33 nathanw ess_set_port,
247 1.33 nathanw ess_get_port,
248 1.33 nathanw ess_query_devinfo,
249 1.33 nathanw ess_malloc,
250 1.33 nathanw ess_free,
251 1.33 nathanw ess_round_buffersize,
252 1.33 nathanw ess_mappage,
253 1.36 mycroft ess_1888_get_props,
254 1.36 mycroft ess_audio2_trigger_output,
255 1.36 mycroft ess_audio1_trigger_input,
256 1.1 augustss };
257 1.1 augustss
258 1.1 augustss #ifdef AUDIO_DEBUG
259 1.1 augustss void ess_printsc __P((struct ess_softc *));
260 1.1 augustss void ess_dump_mixer __P((struct ess_softc *));
261 1.1 augustss
262 1.1 augustss void
263 1.1 augustss ess_printsc(sc)
264 1.1 augustss struct ess_softc *sc;
265 1.1 augustss {
266 1.1 augustss int i;
267 1.1 augustss
268 1.1 augustss printf("open %d iobase 0x%x outport %u inport %u speaker %s\n",
269 1.1 augustss (int)sc->sc_open, sc->sc_iobase, sc->out_port,
270 1.1 augustss sc->in_port, sc->spkr_state ? "on" : "off");
271 1.1 augustss
272 1.35 mycroft printf("audio1: dmachan %d irq %d nintr %lu intr %p arg %p\n",
273 1.34 mycroft sc->sc_audio1.drq, sc->sc_audio1.irq, sc->sc_audio1.nintr,
274 1.34 mycroft sc->sc_audio1.intr, sc->sc_audio1.arg);
275 1.1 augustss
276 1.35 mycroft if (sc->sc_model != ESS_1788) {
277 1.35 mycroft printf("audio2: dmachan %d irq %d nintr %lu intr %p arg %p\n",
278 1.34 mycroft sc->sc_audio2.drq, sc->sc_audio2.irq, sc->sc_audio2.nintr,
279 1.34 mycroft sc->sc_audio2.intr, sc->sc_audio2.arg);
280 1.35 mycroft }
281 1.1 augustss
282 1.1 augustss printf("gain:");
283 1.33 nathanw for (i = 0; i < sc->ndevs; i++)
284 1.1 augustss printf(" %u,%u", sc->gain[i][ESS_LEFT], sc->gain[i][ESS_RIGHT]);
285 1.1 augustss printf("\n");
286 1.1 augustss }
287 1.1 augustss
288 1.1 augustss void
289 1.1 augustss ess_dump_mixer(sc)
290 1.1 augustss struct ess_softc *sc;
291 1.1 augustss {
292 1.1 augustss printf("ESS_DAC_PLAY_VOL: mix reg 0x%02x=0x%02x\n",
293 1.34 mycroft 0x7C, ess_read_mix_reg(sc, 0x7C));
294 1.1 augustss printf("ESS_MIC_PLAY_VOL: mix reg 0x%02x=0x%02x\n",
295 1.1 augustss 0x1A, ess_read_mix_reg(sc, 0x1A));
296 1.1 augustss printf("ESS_LINE_PLAY_VOL: mix reg 0x%02x=0x%02x\n",
297 1.1 augustss 0x3E, ess_read_mix_reg(sc, 0x3E));
298 1.1 augustss printf("ESS_SYNTH_PLAY_VOL: mix reg 0x%02x=0x%02x\n",
299 1.1 augustss 0x36, ess_read_mix_reg(sc, 0x36));
300 1.1 augustss printf("ESS_CD_PLAY_VOL: mix reg 0x%02x=0x%02x\n",
301 1.1 augustss 0x38, ess_read_mix_reg(sc, 0x38));
302 1.1 augustss printf("ESS_AUXB_PLAY_VOL: mix reg 0x%02x=0x%02x\n",
303 1.1 augustss 0x3A, ess_read_mix_reg(sc, 0x3A));
304 1.1 augustss printf("ESS_MASTER_VOL: mix reg 0x%02x=0x%02x\n",
305 1.1 augustss 0x32, ess_read_mix_reg(sc, 0x32));
306 1.1 augustss printf("ESS_PCSPEAKER_VOL: mix reg 0x%02x=0x%02x\n",
307 1.1 augustss 0x3C, ess_read_mix_reg(sc, 0x3C));
308 1.1 augustss printf("ESS_DAC_REC_VOL: mix reg 0x%02x=0x%02x\n",
309 1.1 augustss 0x69, ess_read_mix_reg(sc, 0x69));
310 1.1 augustss printf("ESS_MIC_REC_VOL: mix reg 0x%02x=0x%02x\n",
311 1.1 augustss 0x68, ess_read_mix_reg(sc, 0x68));
312 1.1 augustss printf("ESS_LINE_REC_VOL: mix reg 0x%02x=0x%02x\n",
313 1.1 augustss 0x6E, ess_read_mix_reg(sc, 0x6E));
314 1.1 augustss printf("ESS_SYNTH_REC_VOL: mix reg 0x%02x=0x%02x\n",
315 1.1 augustss 0x6B, ess_read_mix_reg(sc, 0x6B));
316 1.1 augustss printf("ESS_CD_REC_VOL: mix reg 0x%02x=0x%02x\n",
317 1.1 augustss 0x6A, ess_read_mix_reg(sc, 0x6A));
318 1.1 augustss printf("ESS_AUXB_REC_VOL: mix reg 0x%02x=0x%02x\n",
319 1.1 augustss 0x6C, ess_read_mix_reg(sc, 0x6C));
320 1.1 augustss printf("ESS_RECORD_VOL: x reg 0x%02x=0x%02x\n",
321 1.1 augustss 0xB4, ess_read_x_reg(sc, 0xB4));
322 1.1 augustss printf("Audio 1 play vol (unused): mix reg 0x%02x=0x%02x\n",
323 1.1 augustss 0x14, ess_read_mix_reg(sc, 0x14));
324 1.1 augustss
325 1.1 augustss printf("ESS_MIC_PREAMP: x reg 0x%02x=0x%02x\n",
326 1.1 augustss ESS_XCMD_PREAMP_CTRL, ess_read_x_reg(sc, ESS_XCMD_PREAMP_CTRL));
327 1.1 augustss printf("ESS_RECORD_MONITOR: x reg 0x%02x=0x%02x\n",
328 1.1 augustss ESS_XCMD_AUDIO_CTRL, ess_read_x_reg(sc, ESS_XCMD_AUDIO_CTRL));
329 1.1 augustss printf("Record source: mix reg 0x%02x=0x%02x, 0x%02x=0x%02x\n",
330 1.34 mycroft ESS_MREG_ADC_SOURCE, ess_read_mix_reg(sc, ESS_MREG_ADC_SOURCE),
331 1.34 mycroft ESS_MREG_AUDIO2_CTRL2, ess_read_mix_reg(sc, ESS_MREG_AUDIO2_CTRL2));
332 1.1 augustss }
333 1.1 augustss
334 1.1 augustss #endif
335 1.1 augustss
336 1.1 augustss /*
337 1.1 augustss * Configure the ESS chip for the desired audio base address.
338 1.1 augustss */
339 1.1 augustss int
340 1.1 augustss ess_config_addr(sc)
341 1.1 augustss struct ess_softc *sc;
342 1.1 augustss {
343 1.1 augustss int iobase = sc->sc_iobase;
344 1.1 augustss bus_space_tag_t iot = sc->sc_iot;
345 1.1 augustss
346 1.1 augustss /*
347 1.1 augustss * Configure using the System Control Register method. This
348 1.1 augustss * method is used when the AMODE line is tied high, which is
349 1.1 augustss * the case for the Shark, but not for the evaluation board.
350 1.1 augustss */
351 1.1 augustss
352 1.1 augustss bus_space_handle_t scr_access_ioh;
353 1.1 augustss bus_space_handle_t scr_ioh;
354 1.1 augustss u_short scr_value;
355 1.1 augustss
356 1.1 augustss /*
357 1.1 augustss * Set the SCR bit to enable audio.
358 1.1 augustss */
359 1.1 augustss scr_value = ESS_SCR_AUDIO_ENABLE;
360 1.1 augustss
361 1.1 augustss /*
362 1.1 augustss * Set the SCR bits necessary to select the specified audio
363 1.1 augustss * base address.
364 1.1 augustss */
365 1.1 augustss switch(iobase) {
366 1.1 augustss case 0x220:
367 1.1 augustss scr_value |= ESS_SCR_AUDIO_220;
368 1.1 augustss break;
369 1.1 augustss case 0x230:
370 1.1 augustss scr_value |= ESS_SCR_AUDIO_230;
371 1.1 augustss break;
372 1.1 augustss case 0x240:
373 1.1 augustss scr_value |= ESS_SCR_AUDIO_240;
374 1.1 augustss break;
375 1.1 augustss case 0x250:
376 1.1 augustss scr_value |= ESS_SCR_AUDIO_250;
377 1.1 augustss break;
378 1.1 augustss default:
379 1.1 augustss printf("ess: configured iobase 0x%x invalid\n", iobase);
380 1.1 augustss return (1);
381 1.1 augustss break;
382 1.1 augustss }
383 1.1 augustss
384 1.1 augustss /*
385 1.1 augustss * Get a mapping for the System Control Register (SCR) access
386 1.1 augustss * registers and the SCR data registers.
387 1.1 augustss */
388 1.1 augustss if (bus_space_map(iot, ESS_SCR_ACCESS_BASE, ESS_SCR_ACCESS_PORTS,
389 1.1 augustss 0, &scr_access_ioh)) {
390 1.1 augustss printf("ess: can't map SCR access registers\n");
391 1.1 augustss return (1);
392 1.1 augustss }
393 1.1 augustss if (bus_space_map(iot, ESS_SCR_BASE, ESS_SCR_PORTS,
394 1.1 augustss 0, &scr_ioh)) {
395 1.1 augustss printf("ess: can't map SCR registers\n");
396 1.1 augustss bus_space_unmap(iot, scr_access_ioh, ESS_SCR_ACCESS_PORTS);
397 1.1 augustss return (1);
398 1.1 augustss }
399 1.1 augustss
400 1.1 augustss /* Unlock the SCR. */
401 1.2 augustss EWRITE1(iot, scr_access_ioh, ESS_SCR_UNLOCK, 0);
402 1.1 augustss
403 1.1 augustss /* Write the base address information into SCR[0]. */
404 1.2 augustss EWRITE1(iot, scr_ioh, ESS_SCR_INDEX, 0);
405 1.2 augustss EWRITE1(iot, scr_ioh, ESS_SCR_DATA, scr_value);
406 1.1 augustss
407 1.1 augustss /* Lock the SCR. */
408 1.2 augustss EWRITE1(iot, scr_access_ioh, ESS_SCR_LOCK, 0);
409 1.1 augustss
410 1.1 augustss /* Unmap the SCR access ports and the SCR data ports. */
411 1.1 augustss bus_space_unmap(iot, scr_access_ioh, ESS_SCR_ACCESS_PORTS);
412 1.1 augustss bus_space_unmap(iot, scr_ioh, ESS_SCR_PORTS);
413 1.1 augustss
414 1.1 augustss return 0;
415 1.1 augustss }
416 1.1 augustss
417 1.1 augustss
418 1.1 augustss /*
419 1.1 augustss * Configure the ESS chip for the desired IRQ and DMA channels.
420 1.2 augustss * ESS ISA
421 1.2 augustss * --------
422 1.2 augustss * IRQA irq9
423 1.2 augustss * IRQB irq5
424 1.2 augustss * IRQC irq7
425 1.2 augustss * IRQD irq10
426 1.2 augustss * IRQE irq15
427 1.4 augustss *
428 1.2 augustss * DRQA drq0
429 1.2 augustss * DRQB drq1
430 1.2 augustss * DRQC drq3
431 1.2 augustss * DRQD drq5
432 1.1 augustss */
433 1.1 augustss void
434 1.4 augustss ess_config_irq(sc)
435 1.1 augustss struct ess_softc *sc;
436 1.1 augustss {
437 1.4 augustss int v;
438 1.1 augustss
439 1.4 augustss DPRINTFN(2,("ess_config_irq\n"));
440 1.4 augustss
441 1.34 mycroft if (sc->sc_model == ESS_1887 &&
442 1.34 mycroft sc->sc_audio1.irq == sc->sc_audio2.irq) {
443 1.4 augustss /* Use new method, both interrupts are the same. */
444 1.4 augustss v = ESS_IS_SELECT_IRQ; /* enable intrs */
445 1.34 mycroft switch (sc->sc_audio2.irq) {
446 1.4 augustss case 5:
447 1.4 augustss v |= ESS_IS_INTRB;
448 1.4 augustss break;
449 1.4 augustss case 7:
450 1.4 augustss v |= ESS_IS_INTRC;
451 1.4 augustss break;
452 1.4 augustss case 9:
453 1.4 augustss v |= ESS_IS_INTRA;
454 1.4 augustss break;
455 1.4 augustss case 10:
456 1.4 augustss v |= ESS_IS_INTRD;
457 1.4 augustss break;
458 1.4 augustss case 15:
459 1.4 augustss v |= ESS_IS_INTRE;
460 1.4 augustss break;
461 1.4 augustss #ifdef DIAGNOSTIC
462 1.4 augustss default:
463 1.4 augustss printf("ess_config_irq: configured irq %d not supported for Audio 1\n",
464 1.34 mycroft sc->sc_audio1.irq);
465 1.4 augustss return;
466 1.4 augustss #endif
467 1.4 augustss }
468 1.4 augustss /* Set the IRQ */
469 1.4 augustss ess_write_mix_reg(sc, ESS_MREG_INTR_ST, v);
470 1.34 mycroft return;
471 1.34 mycroft }
472 1.34 mycroft
473 1.34 mycroft /* Configure Audio 1 (record) for the appropriate IRQ line. */
474 1.34 mycroft v = ESS_IRQ_CTRL_MASK | ESS_IRQ_CTRL_EXT; /* All intrs on */
475 1.34 mycroft switch (sc->sc_audio1.irq) {
476 1.34 mycroft case 5:
477 1.34 mycroft v |= ESS_IRQ_CTRL_INTRB;
478 1.34 mycroft break;
479 1.34 mycroft case 7:
480 1.34 mycroft v |= ESS_IRQ_CTRL_INTRC;
481 1.34 mycroft break;
482 1.34 mycroft case 9:
483 1.34 mycroft v |= ESS_IRQ_CTRL_INTRA;
484 1.34 mycroft break;
485 1.34 mycroft case 10:
486 1.34 mycroft v |= ESS_IRQ_CTRL_INTRD;
487 1.34 mycroft break;
488 1.34 mycroft #ifdef DIAGNOSTIC
489 1.34 mycroft default:
490 1.34 mycroft printf("ess: configured irq %d not supported for Audio 1\n",
491 1.34 mycroft sc->sc_audio1.irq);
492 1.34 mycroft return;
493 1.34 mycroft #endif
494 1.4 augustss }
495 1.34 mycroft ess_write_x_reg(sc, ESS_XCMD_IRQ_CTRL, v);
496 1.34 mycroft
497 1.34 mycroft if (sc->sc_model == ESS_1788)
498 1.34 mycroft return;
499 1.34 mycroft
500 1.34 mycroft /* irq2 is hardwired to 15 in this mode */
501 1.34 mycroft ess_set_mreg_bits(sc, ESS_MREG_AUDIO2_CTRL2,
502 1.34 mycroft ESS_AUDIO2_CTRL2_IRQ2_ENABLE);
503 1.34 mycroft /* Use old method. */
504 1.34 mycroft ess_write_mix_reg(sc, ESS_MREG_INTR_ST, ESS_IS_ES1888);
505 1.4 augustss }
506 1.4 augustss
507 1.4 augustss
508 1.4 augustss void
509 1.4 augustss ess_config_drq(sc)
510 1.4 augustss struct ess_softc *sc;
511 1.4 augustss {
512 1.4 augustss int v;
513 1.4 augustss
514 1.4 augustss DPRINTFN(2,("ess_config_drq\n"));
515 1.4 augustss
516 1.4 augustss /* Configure Audio 1 (record) for DMA on the appropriate channel. */
517 1.4 augustss v = ESS_DRQ_CTRL_PU | ESS_DRQ_CTRL_EXT;
518 1.34 mycroft switch (sc->sc_audio1.drq) {
519 1.4 augustss case 0:
520 1.4 augustss v |= ESS_DRQ_CTRL_DRQA;
521 1.1 augustss break;
522 1.4 augustss case 1:
523 1.4 augustss v |= ESS_DRQ_CTRL_DRQB;
524 1.1 augustss break;
525 1.4 augustss case 3:
526 1.4 augustss v |= ESS_DRQ_CTRL_DRQC;
527 1.1 augustss break;
528 1.2 augustss #ifdef DIAGNOSTIC
529 1.1 augustss default:
530 1.4 augustss printf("ess_config_drq: configured dma chan %d not supported for Audio 1\n",
531 1.34 mycroft sc->sc_audio1.drq);
532 1.1 augustss return;
533 1.5 augustss #endif
534 1.4 augustss }
535 1.4 augustss /* Set DRQ1 */
536 1.4 augustss ess_write_x_reg(sc, ESS_XCMD_DRQ_CTRL, v);
537 1.4 augustss
538 1.34 mycroft if (sc->sc_model == ESS_1788)
539 1.34 mycroft return;
540 1.34 mycroft
541 1.34 mycroft /* Configure DRQ2 */
542 1.34 mycroft v = ESS_AUDIO2_CTRL3_DRQ_PD;
543 1.34 mycroft switch (sc->sc_audio2.drq) {
544 1.34 mycroft case 0:
545 1.34 mycroft v |= ESS_AUDIO2_CTRL3_DRQA;
546 1.34 mycroft break;
547 1.34 mycroft case 1:
548 1.34 mycroft v |= ESS_AUDIO2_CTRL3_DRQB;
549 1.34 mycroft break;
550 1.34 mycroft case 3:
551 1.34 mycroft v |= ESS_AUDIO2_CTRL3_DRQC;
552 1.34 mycroft break;
553 1.34 mycroft case 5:
554 1.37 mycroft v |= ESS_AUDIO2_CTRL3_DRQD;
555 1.34 mycroft break;
556 1.2 augustss #ifdef DIAGNOSTIC
557 1.34 mycroft default:
558 1.34 mycroft printf("ess_config_drq: configured dma chan %d not supported for Audio 2\n",
559 1.34 mycroft sc->sc_audio2.drq);
560 1.34 mycroft return;
561 1.5 augustss #endif
562 1.1 augustss }
563 1.34 mycroft ess_write_mix_reg(sc, ESS_MREG_AUDIO2_CTRL3, v);
564 1.34 mycroft /* Enable DMA 2 */
565 1.34 mycroft ess_set_mreg_bits(sc, ESS_MREG_AUDIO2_CTRL2,
566 1.34 mycroft ESS_AUDIO2_CTRL2_DMA_ENABLE);
567 1.4 augustss }
568 1.4 augustss
569 1.4 augustss /*
570 1.4 augustss * Set up registers after a reset.
571 1.4 augustss */
572 1.4 augustss void
573 1.4 augustss ess_setup(sc)
574 1.4 augustss struct ess_softc *sc;
575 1.4 augustss {
576 1.18 mycroft
577 1.4 augustss ess_config_irq(sc);
578 1.4 augustss ess_config_drq(sc);
579 1.2 augustss
580 1.4 augustss DPRINTFN(2,("ess_setup: done\n"));
581 1.1 augustss }
582 1.1 augustss
583 1.1 augustss /*
584 1.1 augustss * Determine the model of ESS chip we are talking to. Currently we
585 1.1 augustss * only support ES1888, ES1887 and ES888. The method of determining
586 1.1 augustss * the chip is based on the information on page 27 of the ES1887 data
587 1.1 augustss * sheet.
588 1.1 augustss *
589 1.1 augustss * This routine sets the values of sc->sc_model and sc->sc_version.
590 1.1 augustss */
591 1.1 augustss int
592 1.1 augustss ess_identify(sc)
593 1.1 augustss struct ess_softc *sc;
594 1.1 augustss {
595 1.1 augustss u_char reg1;
596 1.1 augustss u_char reg2;
597 1.1 augustss u_char reg3;
598 1.1 augustss
599 1.1 augustss sc->sc_model = ESS_UNSUPPORTED;
600 1.1 augustss sc->sc_version = 0;
601 1.1 augustss
602 1.1 augustss
603 1.1 augustss /*
604 1.1 augustss * 1. Check legacy ID bytes. These should be 0x68 0x8n, where
605 1.1 augustss * n >= 8 for an ES1887 or an ES888. Other values indicate
606 1.1 augustss * earlier (unsupported) chips.
607 1.1 augustss */
608 1.1 augustss ess_wdsp(sc, ESS_ACMD_LEGACY_ID);
609 1.1 augustss
610 1.1 augustss if ((reg1 = ess_rdsp(sc)) != 0x68) {
611 1.1 augustss printf("ess: First ID byte wrong (0x%02x)\n", reg1);
612 1.1 augustss return 1;
613 1.1 augustss }
614 1.1 augustss
615 1.1 augustss reg2 = ess_rdsp(sc);
616 1.1 augustss if (((reg2 & 0xf0) != 0x80) ||
617 1.1 augustss ((reg2 & 0x0f) < 8)) {
618 1.1 augustss printf("ess: Second ID byte wrong (0x%02x)\n", reg2);
619 1.1 augustss return 1;
620 1.1 augustss }
621 1.1 augustss
622 1.1 augustss /*
623 1.1 augustss * Store the ID bytes as the version.
624 1.1 augustss */
625 1.1 augustss sc->sc_version = (reg1 << 8) + reg2;
626 1.1 augustss
627 1.1 augustss
628 1.1 augustss /*
629 1.1 augustss * 2. Verify we can change bit 2 in mixer register 0x64. This
630 1.1 augustss * should be possible on all supported chips.
631 1.1 augustss */
632 1.33 nathanw reg1 = ess_read_mix_reg(sc, ESS_MREG_VOLUME_CTRL);
633 1.1 augustss reg2 = reg1 ^ 0x04; /* toggle bit 2 */
634 1.1 augustss
635 1.33 nathanw ess_write_mix_reg(sc, ESS_MREG_VOLUME_CTRL, reg2);
636 1.1 augustss
637 1.33 nathanw if (ess_read_mix_reg(sc, ESS_MREG_VOLUME_CTRL) != reg2) {
638 1.1 augustss printf("ess: Hardware error (unable to toggle bit 2 of mixer register 0x64)\n");
639 1.1 augustss return 1;
640 1.1 augustss }
641 1.1 augustss
642 1.1 augustss /*
643 1.1 augustss * Restore the original value of mixer register 0x64.
644 1.1 augustss */
645 1.33 nathanw ess_write_mix_reg(sc, ESS_MREG_VOLUME_CTRL, reg1);
646 1.1 augustss
647 1.1 augustss
648 1.1 augustss /*
649 1.4 augustss * 3. Verify we can change the value of mixer register
650 1.4 augustss * ESS_MREG_SAMPLE_RATE.
651 1.33 nathanw * This is possible on the 1888/1887/888, but not on the 1788.
652 1.4 augustss * It is not necessary to restore the value of this mixer register.
653 1.1 augustss */
654 1.4 augustss reg1 = ess_read_mix_reg(sc, ESS_MREG_SAMPLE_RATE);
655 1.1 augustss reg2 = reg1 ^ 0xff; /* toggle all bits */
656 1.1 augustss
657 1.4 augustss ess_write_mix_reg(sc, ESS_MREG_SAMPLE_RATE, reg2);
658 1.1 augustss
659 1.4 augustss if (ess_read_mix_reg(sc, ESS_MREG_SAMPLE_RATE) != reg2) {
660 1.34 mycroft /* If we got this far before failing, it's a 1788. */
661 1.34 mycroft sc->sc_model = ESS_1788;
662 1.1 augustss } else {
663 1.1 augustss /*
664 1.33 nathanw * 4. Determine if we can change bit 5 in mixer register 0x64.
665 1.33 nathanw * This determines whether we have an ES1887:
666 1.1 augustss *
667 1.33 nathanw * - can change indicates ES1887
668 1.33 nathanw * - can't change indicates ES1888 or ES888
669 1.1 augustss */
670 1.33 nathanw reg1 = ess_read_mix_reg(sc, ESS_MREG_VOLUME_CTRL);
671 1.33 nathanw reg2 = reg1 ^ 0x20; /* toggle bit 5 */
672 1.33 nathanw
673 1.33 nathanw ess_write_mix_reg(sc, ESS_MREG_VOLUME_CTRL, reg2);
674 1.33 nathanw
675 1.33 nathanw if (ess_read_mix_reg(sc, ESS_MREG_VOLUME_CTRL) == reg2) {
676 1.33 nathanw sc->sc_model = ESS_1887;
677 1.1 augustss
678 1.33 nathanw /*
679 1.33 nathanw * Restore the original value of mixer register 0x64.
680 1.33 nathanw */
681 1.33 nathanw ess_write_mix_reg(sc, ESS_MREG_VOLUME_CTRL, reg1);
682 1.33 nathanw } else {
683 1.33 nathanw /*
684 1.33 nathanw * 5. Determine if we can change the value of mixer
685 1.33 nathanw * register 0x69 independently of mixer register
686 1.33 nathanw * 0x68. This determines which chip we have:
687 1.33 nathanw *
688 1.33 nathanw * - can modify idependently indicates ES888
689 1.33 nathanw * - register 0x69 is an alias of 0x68 indicates ES1888
690 1.33 nathanw */
691 1.33 nathanw reg1 = ess_read_mix_reg(sc, 0x68);
692 1.33 nathanw reg2 = ess_read_mix_reg(sc, 0x69);
693 1.33 nathanw reg3 = reg2 ^ 0xff; /* toggle all bits */
694 1.33 nathanw
695 1.33 nathanw /*
696 1.33 nathanw * Write different values to each register.
697 1.33 nathanw */
698 1.33 nathanw ess_write_mix_reg(sc, 0x68, reg2);
699 1.33 nathanw ess_write_mix_reg(sc, 0x69, reg3);
700 1.33 nathanw
701 1.34 mycroft if (ess_read_mix_reg(sc, 0x68) == reg2 &&
702 1.34 mycroft ess_read_mix_reg(sc, 0x69) == reg3)
703 1.33 nathanw sc->sc_model = ESS_888;
704 1.33 nathanw else
705 1.33 nathanw sc->sc_model = ESS_1888;
706 1.1 augustss
707 1.33 nathanw /*
708 1.33 nathanw * Restore the original value of the registers.
709 1.33 nathanw */
710 1.33 nathanw ess_write_mix_reg(sc, 0x68, reg1);
711 1.33 nathanw ess_write_mix_reg(sc, 0x69, reg2);
712 1.33 nathanw }
713 1.1 augustss }
714 1.1 augustss
715 1.1 augustss return 0;
716 1.1 augustss }
717 1.1 augustss
718 1.1 augustss
719 1.1 augustss int
720 1.2 augustss ess_setup_sc(sc, doinit)
721 1.1 augustss struct ess_softc *sc;
722 1.1 augustss int doinit;
723 1.1 augustss {
724 1.1 augustss /* Reset the chip. */
725 1.4 augustss if (ess_reset(sc) != 0) {
726 1.4 augustss DPRINTF(("ess_setup_sc: couldn't reset chip\n"));
727 1.1 augustss return (1);
728 1.1 augustss }
729 1.1 augustss
730 1.1 augustss /* Identify the ESS chip, and check that it is supported. */
731 1.1 augustss if (ess_identify(sc)) {
732 1.1 augustss DPRINTF(("ess_setup_sc: couldn't identify\n"));
733 1.1 augustss return (1);
734 1.1 augustss }
735 1.1 augustss
736 1.1 augustss return (0);
737 1.1 augustss }
738 1.1 augustss
739 1.1 augustss /*
740 1.1 augustss * Probe for the ESS hardware.
741 1.1 augustss */
742 1.1 augustss int
743 1.2 augustss essmatch(sc)
744 1.2 augustss struct ess_softc *sc;
745 1.1 augustss {
746 1.2 augustss if (!ESS_BASE_VALID(sc->sc_iobase)) {
747 1.2 augustss printf("ess: configured iobase 0x%x invalid\n", sc->sc_iobase);
748 1.1 augustss return (0);
749 1.1 augustss }
750 1.1 augustss
751 1.4 augustss /* Configure the ESS chip for the desired audio base address. */
752 1.4 augustss if (ess_config_addr(sc))
753 1.4 augustss return (0);
754 1.4 augustss
755 1.2 augustss if (ess_setup_sc(sc, 1))
756 1.2 augustss return (0);
757 1.1 augustss
758 1.1 augustss if (sc->sc_model == ESS_UNSUPPORTED) {
759 1.1 augustss DPRINTF(("ess: Unsupported model\n"));
760 1.4 augustss return (0);
761 1.1 augustss }
762 1.1 augustss
763 1.1 augustss /* Check that requested DMA channels are valid and different. */
764 1.34 mycroft if (!ESS_DRQ1_VALID(sc->sc_audio1.drq)) {
765 1.34 mycroft printf("ess: record drq %d invalid\n", sc->sc_audio1.drq);
766 1.4 augustss return (0);
767 1.1 augustss }
768 1.40 mycroft if (!isa_drq_isfree(sc->sc_ic, sc->sc_audio1.drq))
769 1.40 mycroft return (0);
770 1.33 nathanw if (sc->sc_model != ESS_1788) {
771 1.34 mycroft if (!ESS_DRQ2_VALID(sc->sc_audio2.drq, sc->sc_model)) {
772 1.34 mycroft printf("ess: play drq %d invalid\n", sc->sc_audio2.drq);
773 1.33 nathanw return (0);
774 1.33 nathanw }
775 1.34 mycroft if (sc->sc_audio1.drq == sc->sc_audio2.drq) {
776 1.34 mycroft printf("ess: play and record drq both %d\n",
777 1.34 mycroft sc->sc_audio1.drq);
778 1.33 nathanw return (0);
779 1.33 nathanw }
780 1.40 mycroft if (!isa_drq_isfree(sc->sc_ic, sc->sc_audio2.drq))
781 1.40 mycroft return (0);
782 1.34 mycroft }
783 1.1 augustss
784 1.34 mycroft /*
785 1.34 mycroft * The 1887 has an additional IRQ mode where both channels are mapped
786 1.34 mycroft * to the same IRQ.
787 1.34 mycroft */
788 1.34 mycroft if (sc->sc_model == ESS_1887 &&
789 1.34 mycroft sc->sc_audio1.irq == sc->sc_audio2.irq &&
790 1.34 mycroft ESS_IRQ12_VALID(sc->sc_audio1.irq))
791 1.34 mycroft goto irq_not1888;
792 1.34 mycroft
793 1.34 mycroft /* Check that requested IRQ lines are valid and different. */
794 1.34 mycroft if (!ESS_IRQ1_VALID(sc->sc_audio1.irq)) {
795 1.34 mycroft printf("ess: record irq %d invalid\n", sc->sc_audio1.irq);
796 1.34 mycroft return (0);
797 1.33 nathanw }
798 1.34 mycroft if (sc->sc_model != ESS_1788) {
799 1.34 mycroft if (!ESS_IRQ2_VALID(sc->sc_audio2.irq)) {
800 1.34 mycroft printf("ess: play irq %d invalid\n", sc->sc_audio2.irq);
801 1.33 nathanw return (0);
802 1.33 nathanw }
803 1.34 mycroft if (sc->sc_audio1.irq == sc->sc_audio2.irq) {
804 1.34 mycroft printf("ess: play and record irq both %d\n",
805 1.34 mycroft sc->sc_audio1.irq);
806 1.4 augustss return (0);
807 1.4 augustss }
808 1.4 augustss }
809 1.1 augustss
810 1.34 mycroft irq_not1888:
811 1.1 augustss /* XXX should we check IRQs as well? */
812 1.1 augustss
813 1.2 augustss return (1);
814 1.1 augustss }
815 1.1 augustss
816 1.1 augustss
817 1.1 augustss /*
818 1.1 augustss * Attach hardware to driver, attach hardware driver to audio
819 1.4 augustss * pseudo-device driver.
820 1.1 augustss */
821 1.1 augustss void
822 1.2 augustss essattach(sc)
823 1.2 augustss struct ess_softc *sc;
824 1.1 augustss {
825 1.24 augustss struct audio_attach_args arg;
826 1.1 augustss struct audio_params pparams, rparams;
827 1.34 mycroft int i;
828 1.34 mycroft u_int v;
829 1.1 augustss
830 1.2 augustss if (ess_setup_sc(sc, 0)) {
831 1.1 augustss printf("%s: setup failed\n", sc->sc_dev.dv_xname);
832 1.1 augustss return;
833 1.1 augustss }
834 1.1 augustss
835 1.34 mycroft sc->sc_audio1.ih = isa_intr_establish(sc->sc_ic,
836 1.34 mycroft sc->sc_audio1.irq, sc->sc_audio1.ist, IPL_AUDIO,
837 1.36 mycroft ess_audio1_intr, sc);
838 1.34 mycroft if (isa_dmamap_create(sc->sc_ic, sc->sc_audio1.drq,
839 1.34 mycroft MAX_ISADMA, BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW)) {
840 1.1 augustss printf("%s: can't create map for drq %d\n",
841 1.34 mycroft sc->sc_dev.dv_xname, sc->sc_audio1.drq);
842 1.1 augustss return;
843 1.1 augustss }
844 1.33 nathanw
845 1.33 nathanw if (sc->sc_model != ESS_1788) {
846 1.34 mycroft sc->sc_audio2.ih = isa_intr_establish(sc->sc_ic,
847 1.34 mycroft sc->sc_audio2.irq, sc->sc_audio2.ist, IPL_AUDIO,
848 1.36 mycroft ess_audio2_intr, sc);
849 1.34 mycroft if (isa_dmamap_create(sc->sc_ic, sc->sc_audio2.drq,
850 1.34 mycroft MAX_ISADMA, BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW)) {
851 1.33 nathanw printf("%s: can't create map for drq %d\n",
852 1.34 mycroft sc->sc_dev.dv_xname, sc->sc_audio2.drq);
853 1.33 nathanw return;
854 1.33 nathanw }
855 1.1 augustss }
856 1.1 augustss
857 1.1 augustss printf(" ESS Technology ES%s [version 0x%04x]\n",
858 1.1 augustss essmodel[sc->sc_model], sc->sc_version);
859 1.1 augustss
860 1.1 augustss /*
861 1.1 augustss * Set record and play parameters to default values defined in
862 1.1 augustss * generic audio driver.
863 1.1 augustss */
864 1.1 augustss pparams = audio_default;
865 1.1 augustss rparams = audio_default;
866 1.34 mycroft ess_set_params(sc, AUMODE_RECORD|AUMODE_PLAY, 0, &pparams, &rparams);
867 1.1 augustss
868 1.1 augustss /* Do a hardware reset on the mixer. */
869 1.1 augustss ess_write_mix_reg(sc, ESS_MIX_RESET, ESS_MIX_RESET);
870 1.1 augustss
871 1.34 mycroft /*
872 1.34 mycroft * Set volume of Audio 1 to zero and disable Audio 1 DAC input
873 1.34 mycroft * to playback mixer, since playback is always through Audio 2.
874 1.34 mycroft */
875 1.34 mycroft if (sc->sc_model != ESS_1788)
876 1.34 mycroft ess_write_mix_reg(sc, ESS_MREG_VOLUME_VOICE, 0);
877 1.34 mycroft ess_wdsp(sc, ESS_ACMD_DISABLE_SPKR);
878 1.1 augustss
879 1.33 nathanw if (sc->sc_model == ESS_1788) {
880 1.34 mycroft ess_write_mix_reg(sc, ESS_MREG_ADC_SOURCE, ESS_SOURCE_MIC);
881 1.34 mycroft sc->in_port = ESS_SOURCE_MIC;
882 1.34 mycroft sc->ndevs = ESS_1788_NDEVS;
883 1.33 nathanw } else {
884 1.33 nathanw /*
885 1.33 nathanw * Set hardware record source to use output of the record
886 1.33 nathanw * mixer. We do the selection of record source in software by
887 1.33 nathanw * setting the gain of the unused sources to zero. (See
888 1.33 nathanw * ess_set_in_ports.)
889 1.33 nathanw */
890 1.33 nathanw ess_write_mix_reg(sc, ESS_MREG_ADC_SOURCE, ESS_SOURCE_MIXER);
891 1.34 mycroft sc->in_mask = 1 << ESS_MIC_REC_VOL;
892 1.34 mycroft sc->ndevs = ESS_1888_NDEVS;
893 1.34 mycroft ess_clear_mreg_bits(sc, ESS_MREG_AUDIO2_CTRL2, 0x10);
894 1.34 mycroft ess_set_mreg_bits(sc, ESS_MREG_AUDIO2_CTRL2, 0x08);
895 1.33 nathanw }
896 1.1 augustss
897 1.1 augustss /*
898 1.1 augustss * Set gain on each mixer device to a sensible value.
899 1.1 augustss * Devices not normally used are turned off, and other devices
900 1.25 augustss * are set to 50% volume.
901 1.1 augustss */
902 1.33 nathanw for (i = 0; i < sc->ndevs; i++) {
903 1.34 mycroft switch (i) {
904 1.1 augustss case ESS_MIC_PLAY_VOL:
905 1.1 augustss case ESS_LINE_PLAY_VOL:
906 1.1 augustss case ESS_CD_PLAY_VOL:
907 1.1 augustss case ESS_AUXB_PLAY_VOL:
908 1.1 augustss case ESS_DAC_REC_VOL:
909 1.1 augustss case ESS_LINE_REC_VOL:
910 1.1 augustss case ESS_SYNTH_REC_VOL:
911 1.1 augustss case ESS_CD_REC_VOL:
912 1.1 augustss case ESS_AUXB_REC_VOL:
913 1.1 augustss v = 0;
914 1.1 augustss break;
915 1.1 augustss default:
916 1.25 augustss v = ESS_4BIT_GAIN(AUDIO_MAX_GAIN / 2);
917 1.1 augustss break;
918 1.1 augustss }
919 1.1 augustss sc->gain[i][ESS_LEFT] = sc->gain[i][ESS_RIGHT] = v;
920 1.1 augustss ess_set_gain(sc, i, 1);
921 1.1 augustss }
922 1.1 augustss
923 1.4 augustss ess_setup(sc);
924 1.2 augustss
925 1.1 augustss /* Disable the speaker until the device is opened. */
926 1.1 augustss ess_speaker_off(sc);
927 1.1 augustss sc->spkr_state = SPKR_OFF;
928 1.1 augustss
929 1.1 augustss sprintf(ess_device.name, "ES%s", essmodel[sc->sc_model]);
930 1.1 augustss sprintf(ess_device.version, "0x%04x", sc->sc_version);
931 1.1 augustss
932 1.34 mycroft if (sc->sc_model == ESS_1788)
933 1.34 mycroft audio_attach_mi(&ess_1788_hw_if, sc, &sc->sc_dev);
934 1.33 nathanw else
935 1.34 mycroft audio_attach_mi(&ess_1888_hw_if, sc, &sc->sc_dev);
936 1.24 augustss
937 1.24 augustss arg.type = AUDIODEV_TYPE_OPL;
938 1.24 augustss arg.hwif = 0;
939 1.24 augustss arg.hdl = 0;
940 1.24 augustss (void)config_found(&sc->sc_dev, &arg, audioprint);
941 1.2 augustss
942 1.2 augustss #ifdef AUDIO_DEBUG
943 1.26 augustss if (essdebug > 0)
944 1.26 augustss ess_printsc(sc);
945 1.2 augustss #endif
946 1.1 augustss }
947 1.1 augustss
948 1.1 augustss /*
949 1.1 augustss * Various routines to interface to higher level audio driver
950 1.1 augustss */
951 1.1 augustss
952 1.1 augustss int
953 1.1 augustss ess_open(addr, flags)
954 1.1 augustss void *addr;
955 1.1 augustss int flags;
956 1.1 augustss {
957 1.1 augustss struct ess_softc *sc = addr;
958 1.1 augustss
959 1.34 mycroft DPRINTF(("ess_open: sc=%p\n", sc));
960 1.1 augustss
961 1.1 augustss if (sc->sc_open != 0 || ess_reset(sc) != 0)
962 1.1 augustss return ENXIO;
963 1.1 augustss
964 1.6 augustss ess_setup(sc); /* because we did a reset */
965 1.1 augustss
966 1.1 augustss sc->sc_open = 1;
967 1.1 augustss
968 1.1 augustss DPRINTF(("ess_open: opened\n"));
969 1.1 augustss
970 1.1 augustss return (0);
971 1.1 augustss }
972 1.1 augustss
973 1.1 augustss void
974 1.33 nathanw ess_1788_close(addr)
975 1.1 augustss void *addr;
976 1.1 augustss {
977 1.1 augustss struct ess_softc *sc = addr;
978 1.1 augustss
979 1.33 nathanw DPRINTF(("ess_1788_close: sc=%p\n", sc));
980 1.1 augustss
981 1.1 augustss ess_speaker_off(sc);
982 1.1 augustss sc->spkr_state = SPKR_OFF;
983 1.34 mycroft
984 1.39 mycroft ess_audio1_halt(sc);
985 1.34 mycroft
986 1.33 nathanw sc->sc_open = 0;
987 1.34 mycroft DPRINTF(("ess_1788_close: closed\n"));
988 1.33 nathanw }
989 1.33 nathanw
990 1.33 nathanw void
991 1.33 nathanw ess_1888_close(addr)
992 1.33 nathanw void *addr;
993 1.33 nathanw {
994 1.33 nathanw struct ess_softc *sc = addr;
995 1.31 mycroft
996 1.34 mycroft DPRINTF(("ess_1888_close: sc=%p\n", sc));
997 1.31 mycroft
998 1.33 nathanw ess_speaker_off(sc);
999 1.33 nathanw sc->spkr_state = SPKR_OFF;
1000 1.34 mycroft
1001 1.39 mycroft ess_audio1_halt(sc);
1002 1.39 mycroft ess_audio2_halt(sc);
1003 1.34 mycroft
1004 1.31 mycroft sc->sc_open = 0;
1005 1.34 mycroft DPRINTF(("ess_1888_close: closed\n"));
1006 1.1 augustss }
1007 1.1 augustss
1008 1.6 augustss /*
1009 1.6 augustss * Wait for FIFO to drain, and analog section to settle.
1010 1.33 nathanw * XXX should check FIFO empty bit.
1011 1.6 augustss */
1012 1.6 augustss int
1013 1.6 augustss ess_drain(addr)
1014 1.6 augustss void *addr;
1015 1.6 augustss {
1016 1.6 augustss extern int hz; /* XXX */
1017 1.6 augustss
1018 1.9 mycroft tsleep(addr, PWAIT | PCATCH, "essdr", hz/20); /* XXX */
1019 1.6 augustss return (0);
1020 1.6 augustss }
1021 1.6 augustss
1022 1.25 augustss /* XXX should use reference count */
1023 1.1 augustss int
1024 1.4 augustss ess_speaker_ctl(addr, newstate)
1025 1.4 augustss void *addr;
1026 1.4 augustss int newstate;
1027 1.4 augustss {
1028 1.4 augustss struct ess_softc *sc = addr;
1029 1.4 augustss
1030 1.4 augustss if ((newstate == SPKR_ON) && (sc->spkr_state == SPKR_OFF)) {
1031 1.4 augustss ess_speaker_on(sc);
1032 1.4 augustss sc->spkr_state = SPKR_ON;
1033 1.4 augustss }
1034 1.4 augustss if ((newstate == SPKR_OFF) && (sc->spkr_state == SPKR_ON)) {
1035 1.4 augustss ess_speaker_off(sc);
1036 1.4 augustss sc->spkr_state = SPKR_OFF;
1037 1.4 augustss }
1038 1.4 augustss return (0);
1039 1.4 augustss }
1040 1.4 augustss
1041 1.4 augustss int
1042 1.1 augustss ess_getdev(addr, retp)
1043 1.1 augustss void *addr;
1044 1.1 augustss struct audio_device *retp;
1045 1.1 augustss {
1046 1.1 augustss *retp = ess_device;
1047 1.1 augustss return (0);
1048 1.1 augustss }
1049 1.1 augustss
1050 1.1 augustss int
1051 1.1 augustss ess_query_encoding(addr, fp)
1052 1.1 augustss void *addr;
1053 1.1 augustss struct audio_encoding *fp;
1054 1.1 augustss {
1055 1.1 augustss /*struct ess_softc *sc = addr;*/
1056 1.1 augustss
1057 1.1 augustss switch (fp->index) {
1058 1.1 augustss case 0:
1059 1.1 augustss strcpy(fp->name, AudioEulinear);
1060 1.1 augustss fp->encoding = AUDIO_ENCODING_ULINEAR;
1061 1.1 augustss fp->precision = 8;
1062 1.1 augustss fp->flags = 0;
1063 1.1 augustss return (0);
1064 1.1 augustss case 1:
1065 1.1 augustss strcpy(fp->name, AudioEmulaw);
1066 1.1 augustss fp->encoding = AUDIO_ENCODING_ULAW;
1067 1.1 augustss fp->precision = 8;
1068 1.1 augustss fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
1069 1.1 augustss return (0);
1070 1.1 augustss case 2:
1071 1.1 augustss strcpy(fp->name, AudioEalaw);
1072 1.4 augustss fp->encoding = AUDIO_ENCODING_ALAW;
1073 1.1 augustss fp->precision = 8;
1074 1.1 augustss fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
1075 1.1 augustss return (0);
1076 1.1 augustss case 3:
1077 1.4 augustss strcpy(fp->name, AudioEslinear);
1078 1.4 augustss fp->encoding = AUDIO_ENCODING_SLINEAR;
1079 1.1 augustss fp->precision = 8;
1080 1.1 augustss fp->flags = 0;
1081 1.1 augustss return (0);
1082 1.33 nathanw case 4:
1083 1.1 augustss strcpy(fp->name, AudioEslinear_le);
1084 1.1 augustss fp->encoding = AUDIO_ENCODING_SLINEAR_LE;
1085 1.1 augustss fp->precision = 16;
1086 1.1 augustss fp->flags = 0;
1087 1.1 augustss return (0);
1088 1.1 augustss case 5:
1089 1.1 augustss strcpy(fp->name, AudioEulinear_le);
1090 1.1 augustss fp->encoding = AUDIO_ENCODING_ULINEAR_LE;
1091 1.1 augustss fp->precision = 16;
1092 1.1 augustss fp->flags = 0;
1093 1.1 augustss return (0);
1094 1.1 augustss case 6:
1095 1.1 augustss strcpy(fp->name, AudioEslinear_be);
1096 1.1 augustss fp->encoding = AUDIO_ENCODING_SLINEAR_BE;
1097 1.1 augustss fp->precision = 16;
1098 1.1 augustss fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
1099 1.1 augustss return (0);
1100 1.1 augustss case 7:
1101 1.1 augustss strcpy(fp->name, AudioEulinear_be);
1102 1.1 augustss fp->encoding = AUDIO_ENCODING_ULINEAR_BE;
1103 1.1 augustss fp->precision = 16;
1104 1.1 augustss fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
1105 1.1 augustss return (0);
1106 1.1 augustss default:
1107 1.1 augustss return EINVAL;
1108 1.1 augustss }
1109 1.1 augustss return (0);
1110 1.1 augustss }
1111 1.1 augustss
1112 1.1 augustss int
1113 1.8 mycroft ess_set_params(addr, setmode, usemode, play, rec)
1114 1.1 augustss void *addr;
1115 1.8 mycroft int setmode, usemode;
1116 1.8 mycroft struct audio_params *play, *rec;
1117 1.1 augustss {
1118 1.1 augustss struct ess_softc *sc = addr;
1119 1.8 mycroft struct audio_params *p;
1120 1.8 mycroft int mode;
1121 1.19 mycroft int rate;
1122 1.1 augustss
1123 1.4 augustss DPRINTF(("ess_set_params: set=%d use=%d\n", setmode, usemode));
1124 1.4 augustss
1125 1.15 mycroft /*
1126 1.15 mycroft * The ES1887 manual (page 39, `Full-Duplex DMA Mode') claims that in
1127 1.15 mycroft * full-duplex operation the sample rates must be the same for both
1128 1.16 mycroft * channels. This appears to be false; the only bit in common is the
1129 1.16 mycroft * clock source selection. However, we'll be conservative here.
1130 1.16 mycroft * - mycroft
1131 1.15 mycroft */
1132 1.19 mycroft if (play->sample_rate != rec->sample_rate &&
1133 1.19 mycroft usemode == (AUMODE_PLAY | AUMODE_RECORD)) {
1134 1.19 mycroft if (setmode == AUMODE_PLAY) {
1135 1.13 mycroft rec->sample_rate = play->sample_rate;
1136 1.13 mycroft setmode |= AUMODE_RECORD;
1137 1.19 mycroft } else if (setmode == AUMODE_RECORD) {
1138 1.13 mycroft play->sample_rate = rec->sample_rate;
1139 1.13 mycroft setmode |= AUMODE_PLAY;
1140 1.13 mycroft } else
1141 1.13 mycroft return (EINVAL);
1142 1.13 mycroft }
1143 1.13 mycroft
1144 1.17 mycroft for (mode = AUMODE_RECORD; mode != -1;
1145 1.17 mycroft mode = mode == AUMODE_RECORD ? AUMODE_PLAY : -1) {
1146 1.1 augustss if ((setmode & mode) == 0)
1147 1.1 augustss continue;
1148 1.1 augustss
1149 1.8 mycroft p = mode == AUMODE_PLAY ? play : rec;
1150 1.1 augustss
1151 1.17 mycroft if (p->sample_rate < ESS_MINRATE ||
1152 1.17 mycroft p->sample_rate > ESS_MAXRATE ||
1153 1.17 mycroft (p->precision != 8 && p->precision != 16) ||
1154 1.17 mycroft (p->channels != 1 && p->channels != 2))
1155 1.17 mycroft return (EINVAL);
1156 1.1 augustss
1157 1.17 mycroft p->factor = 1;
1158 1.17 mycroft p->sw_code = 0;
1159 1.1 augustss switch (p->encoding) {
1160 1.1 augustss case AUDIO_ENCODING_SLINEAR_BE:
1161 1.17 mycroft case AUDIO_ENCODING_ULINEAR_BE:
1162 1.1 augustss if (p->precision == 16)
1163 1.17 mycroft p->sw_code = swap_bytes;
1164 1.17 mycroft break;
1165 1.1 augustss case AUDIO_ENCODING_SLINEAR_LE:
1166 1.1 augustss case AUDIO_ENCODING_ULINEAR_LE:
1167 1.1 augustss break;
1168 1.1 augustss case AUDIO_ENCODING_ULAW:
1169 1.17 mycroft if (mode == AUMODE_PLAY) {
1170 1.17 mycroft p->factor = 2;
1171 1.17 mycroft p->sw_code = mulaw_to_ulinear16;
1172 1.17 mycroft } else
1173 1.17 mycroft p->sw_code = ulinear8_to_mulaw;
1174 1.17 mycroft break;
1175 1.1 augustss case AUDIO_ENCODING_ALAW:
1176 1.17 mycroft if (mode == AUMODE_PLAY) {
1177 1.17 mycroft p->factor = 2;
1178 1.17 mycroft p->sw_code = alaw_to_ulinear16;
1179 1.17 mycroft } else
1180 1.17 mycroft p->sw_code = ulinear8_to_alaw;
1181 1.17 mycroft break;
1182 1.1 augustss default:
1183 1.17 mycroft return (EINVAL);
1184 1.17 mycroft }
1185 1.19 mycroft }
1186 1.17 mycroft
1187 1.19 mycroft if (usemode == AUMODE_RECORD)
1188 1.19 mycroft rate = rec->sample_rate;
1189 1.19 mycroft else
1190 1.19 mycroft rate = play->sample_rate;
1191 1.19 mycroft
1192 1.34 mycroft ess_write_x_reg(sc, ESS_XCMD_SAMPLE_RATE, ess_srtotc(rate));
1193 1.34 mycroft ess_write_x_reg(sc, ESS_XCMD_FILTER_CLOCK, ess_srtofc(rate));
1194 1.34 mycroft
1195 1.33 nathanw if (sc->sc_model != ESS_1788) {
1196 1.33 nathanw ess_write_mix_reg(sc, ESS_MREG_SAMPLE_RATE, ess_srtotc(rate));
1197 1.33 nathanw ess_write_mix_reg(sc, ESS_MREG_FILTER_CLOCK, ess_srtofc(rate));
1198 1.33 nathanw }
1199 1.1 augustss
1200 1.1 augustss return (0);
1201 1.1 augustss }
1202 1.1 augustss
1203 1.1 augustss int
1204 1.36 mycroft ess_audio1_trigger_output(addr, start, end, blksize, intr, arg, param)
1205 1.33 nathanw void *addr;
1206 1.33 nathanw void *start, *end;
1207 1.33 nathanw int blksize;
1208 1.33 nathanw void (*intr) __P((void *));
1209 1.33 nathanw void *arg;
1210 1.33 nathanw struct audio_params *param;
1211 1.33 nathanw {
1212 1.33 nathanw struct ess_softc *sc = addr;
1213 1.39 mycroft u_int8_t reg;
1214 1.33 nathanw
1215 1.36 mycroft DPRINTFN(1, ("ess_audio1_trigger_output: sc=%p start=%p end=%p blksize=%d intr=%p(%p)\n",
1216 1.34 mycroft addr, start, end, blksize, intr, arg));
1217 1.33 nathanw
1218 1.34 mycroft if (sc->sc_audio1.active)
1219 1.36 mycroft panic("ess_audio1_trigger_output: already running");
1220 1.39 mycroft
1221 1.34 mycroft sc->sc_audio1.active = 1;
1222 1.34 mycroft sc->sc_audio1.intr = intr;
1223 1.34 mycroft sc->sc_audio1.arg = arg;
1224 1.33 nathanw
1225 1.39 mycroft reg = ess_read_x_reg(sc, ESS_XCMD_AUDIO_CTRL);
1226 1.34 mycroft if (param->channels == 2) {
1227 1.39 mycroft reg &= ~ESS_AUDIO_CTRL_MONO;
1228 1.39 mycroft reg |= ESS_AUDIO_CTRL_STEREO;
1229 1.33 nathanw } else {
1230 1.39 mycroft reg |= ESS_AUDIO_CTRL_MONO;
1231 1.39 mycroft reg &= ~ESS_AUDIO_CTRL_STEREO;
1232 1.33 nathanw }
1233 1.39 mycroft ess_write_x_reg(sc, ESS_XCMD_AUDIO_CTRL, reg);
1234 1.33 nathanw
1235 1.39 mycroft reg = ess_read_x_reg(sc, ESS_XCMD_AUDIO1_CTRL1);
1236 1.39 mycroft if (param->precision * param->factor == 16)
1237 1.39 mycroft reg |= ESS_AUDIO1_CTRL1_FIFO_SIZE;
1238 1.39 mycroft else
1239 1.39 mycroft reg &= ~ESS_AUDIO1_CTRL1_FIFO_SIZE;
1240 1.39 mycroft if (param->channels == 2)
1241 1.39 mycroft reg |= ESS_AUDIO1_CTRL1_FIFO_STEREO;
1242 1.39 mycroft else
1243 1.39 mycroft reg &= ~ESS_AUDIO1_CTRL1_FIFO_STEREO;
1244 1.34 mycroft if (param->encoding == AUDIO_ENCODING_SLINEAR_BE ||
1245 1.34 mycroft param->encoding == AUDIO_ENCODING_SLINEAR_LE)
1246 1.39 mycroft reg |= ESS_AUDIO1_CTRL1_FIFO_SIGNED;
1247 1.34 mycroft else
1248 1.39 mycroft reg &= ~ESS_AUDIO1_CTRL1_FIFO_SIGNED;
1249 1.39 mycroft reg |= ESS_AUDIO1_CTRL1_FIFO_CONNECT;
1250 1.39 mycroft ess_write_x_reg(sc, ESS_XCMD_AUDIO1_CTRL1, reg);
1251 1.33 nathanw
1252 1.34 mycroft isa_dmastart(sc->sc_ic, sc->sc_audio1.drq, start,
1253 1.34 mycroft (char *)end - (char *)start, NULL,
1254 1.34 mycroft DMAMODE_WRITE | DMAMODE_LOOPDEMAND, BUS_DMA_NOWAIT);
1255 1.33 nathanw
1256 1.33 nathanw /* Program transfer count registers with 2's complement of count. */
1257 1.33 nathanw blksize = -blksize;
1258 1.33 nathanw ess_write_x_reg(sc, ESS_XCMD_XFER_COUNTLO, blksize);
1259 1.33 nathanw ess_write_x_reg(sc, ESS_XCMD_XFER_COUNTHI, blksize >> 8);
1260 1.33 nathanw
1261 1.38 mycroft /* Use 4 bytes per output DMA. */
1262 1.39 mycroft ess_set_xreg_bits(sc, ESS_XCMD_DEMAND_CTRL, ESS_DEMAND_CTRL_DEMAND_4);
1263 1.33 nathanw
1264 1.33 nathanw /* Start auto-init DMA */
1265 1.34 mycroft ess_wdsp(sc, ESS_ACMD_ENABLE_SPKR);
1266 1.39 mycroft reg = ess_read_x_reg(sc, ESS_XCMD_AUDIO1_CTRL2);
1267 1.39 mycroft reg &= ~(ESS_AUDIO1_CTRL2_DMA_READ | ESS_AUDIO1_CTRL2_ADC_ENABLE);
1268 1.39 mycroft reg |= ESS_AUDIO1_CTRL2_FIFO_ENABLE | ESS_AUDIO1_CTRL2_AUTO_INIT;
1269 1.39 mycroft ess_write_x_reg(sc, ESS_XCMD_AUDIO1_CTRL2, reg);
1270 1.33 nathanw
1271 1.33 nathanw return (0);
1272 1.33 nathanw }
1273 1.33 nathanw
1274 1.33 nathanw int
1275 1.36 mycroft ess_audio2_trigger_output(addr, start, end, blksize, intr, arg, param)
1276 1.1 augustss void *addr;
1277 1.19 mycroft void *start, *end;
1278 1.19 mycroft int blksize;
1279 1.19 mycroft void (*intr) __P((void *));
1280 1.19 mycroft void *arg;
1281 1.19 mycroft struct audio_params *param;
1282 1.1 augustss {
1283 1.1 augustss struct ess_softc *sc = addr;
1284 1.39 mycroft u_int8_t reg;
1285 1.1 augustss
1286 1.36 mycroft DPRINTFN(1, ("ess_audio2_trigger_output: sc=%p start=%p end=%p blksize=%d intr=%p(%p)\n",
1287 1.34 mycroft addr, start, end, blksize, intr, arg));
1288 1.19 mycroft
1289 1.34 mycroft if (sc->sc_audio2.active)
1290 1.36 mycroft panic("ess_audio2_trigger_output: already running");
1291 1.39 mycroft
1292 1.34 mycroft sc->sc_audio2.active = 1;
1293 1.34 mycroft sc->sc_audio2.intr = intr;
1294 1.34 mycroft sc->sc_audio2.arg = arg;
1295 1.1 augustss
1296 1.39 mycroft reg = ess_read_mix_reg(sc, ESS_MREG_AUDIO2_CTRL2);
1297 1.19 mycroft if (param->precision * param->factor == 16)
1298 1.39 mycroft reg |= ESS_AUDIO2_CTRL2_FIFO_SIZE;
1299 1.17 mycroft else
1300 1.39 mycroft reg &= ~ESS_AUDIO2_CTRL2_FIFO_SIZE;
1301 1.19 mycroft if (param->channels == 2)
1302 1.39 mycroft reg |= ESS_AUDIO2_CTRL2_CHANNELS;
1303 1.17 mycroft else
1304 1.39 mycroft reg &= ~ESS_AUDIO2_CTRL2_CHANNELS;
1305 1.19 mycroft if (param->encoding == AUDIO_ENCODING_SLINEAR_BE ||
1306 1.34 mycroft param->encoding == AUDIO_ENCODING_SLINEAR_LE)
1307 1.39 mycroft reg |= ESS_AUDIO2_CTRL2_FIFO_SIGNED;
1308 1.17 mycroft else
1309 1.39 mycroft reg &= ~ESS_AUDIO2_CTRL2_FIFO_SIGNED;
1310 1.39 mycroft ess_write_mix_reg(sc, ESS_MREG_AUDIO2_CTRL2, reg);
1311 1.6 augustss
1312 1.34 mycroft isa_dmastart(sc->sc_ic, sc->sc_audio2.drq, start,
1313 1.34 mycroft (char *)end - (char *)start, NULL,
1314 1.34 mycroft DMAMODE_WRITE | DMAMODE_LOOPDEMAND, BUS_DMA_NOWAIT);
1315 1.1 augustss
1316 1.34 mycroft if (IS16BITDRQ(sc->sc_audio2.drq))
1317 1.19 mycroft blksize >>= 1; /* use word count for 16 bit DMA */
1318 1.6 augustss /* Program transfer count registers with 2's complement of count. */
1319 1.19 mycroft blksize = -blksize;
1320 1.19 mycroft ess_write_mix_reg(sc, ESS_MREG_XFER_COUNTLO, blksize);
1321 1.19 mycroft ess_write_mix_reg(sc, ESS_MREG_XFER_COUNTHI, blksize >> 8);
1322 1.1 augustss
1323 1.39 mycroft reg = ess_read_mix_reg(sc, ESS_MREG_AUDIO2_CTRL1);
1324 1.34 mycroft if (IS16BITDRQ(sc->sc_audio2.drq))
1325 1.39 mycroft reg |= ESS_AUDIO2_CTRL1_XFER_SIZE;
1326 1.18 mycroft else
1327 1.39 mycroft reg &= ~ESS_AUDIO2_CTRL1_XFER_SIZE;
1328 1.39 mycroft reg |= ESS_AUDIO2_CTRL1_DEMAND_8;
1329 1.39 mycroft reg |= ESS_AUDIO2_CTRL1_DAC_ENABLE | ESS_AUDIO2_CTRL1_FIFO_ENABLE |
1330 1.39 mycroft ESS_AUDIO2_CTRL1_AUTO_INIT;
1331 1.39 mycroft ess_write_mix_reg(sc, ESS_MREG_AUDIO2_CTRL1, reg);
1332 1.34 mycroft
1333 1.33 nathanw return (0);
1334 1.33 nathanw }
1335 1.33 nathanw
1336 1.33 nathanw int
1337 1.36 mycroft ess_audio1_trigger_input(addr, start, end, blksize, intr, arg, param)
1338 1.33 nathanw void *addr;
1339 1.33 nathanw void *start, *end;
1340 1.33 nathanw int blksize;
1341 1.33 nathanw void (*intr) __P((void *));
1342 1.33 nathanw void *arg;
1343 1.33 nathanw struct audio_params *param;
1344 1.33 nathanw {
1345 1.33 nathanw struct ess_softc *sc = addr;
1346 1.39 mycroft u_int8_t reg;
1347 1.33 nathanw
1348 1.36 mycroft DPRINTFN(1, ("ess_audio1_trigger_input: sc=%p start=%p end=%p blksize=%d intr=%p(%p)\n",
1349 1.34 mycroft addr, start, end, blksize, intr, arg));
1350 1.33 nathanw
1351 1.34 mycroft if (sc->sc_audio1.active)
1352 1.36 mycroft panic("ess_audio1_trigger_input: already running");
1353 1.39 mycroft
1354 1.34 mycroft sc->sc_audio1.active = 1;
1355 1.34 mycroft sc->sc_audio1.intr = intr;
1356 1.34 mycroft sc->sc_audio1.arg = arg;
1357 1.19 mycroft
1358 1.39 mycroft reg = ess_read_x_reg(sc, ESS_XCMD_AUDIO_CTRL);
1359 1.19 mycroft if (param->channels == 2) {
1360 1.39 mycroft reg &= ~ESS_AUDIO_CTRL_MONO;
1361 1.39 mycroft reg |= ESS_AUDIO_CTRL_STEREO;
1362 1.17 mycroft } else {
1363 1.39 mycroft reg |= ESS_AUDIO_CTRL_MONO;
1364 1.39 mycroft reg &= ~ESS_AUDIO_CTRL_STEREO;
1365 1.17 mycroft }
1366 1.39 mycroft ess_write_x_reg(sc, ESS_XCMD_AUDIO_CTRL, reg);
1367 1.17 mycroft
1368 1.39 mycroft reg = ess_read_x_reg(sc, ESS_XCMD_AUDIO1_CTRL1);
1369 1.39 mycroft if (param->precision * param->factor == 16)
1370 1.39 mycroft reg |= ESS_AUDIO1_CTRL1_FIFO_SIZE;
1371 1.39 mycroft else
1372 1.39 mycroft reg &= ~ESS_AUDIO1_CTRL1_FIFO_SIZE;
1373 1.39 mycroft if (param->channels == 2)
1374 1.39 mycroft reg |= ESS_AUDIO1_CTRL1_FIFO_STEREO;
1375 1.39 mycroft else
1376 1.39 mycroft reg &= ~ESS_AUDIO1_CTRL1_FIFO_STEREO;
1377 1.19 mycroft if (param->encoding == AUDIO_ENCODING_SLINEAR_BE ||
1378 1.34 mycroft param->encoding == AUDIO_ENCODING_SLINEAR_LE)
1379 1.39 mycroft reg |= ESS_AUDIO1_CTRL1_FIFO_SIGNED;
1380 1.17 mycroft else
1381 1.39 mycroft reg &= ~ESS_AUDIO1_CTRL1_FIFO_SIGNED;
1382 1.39 mycroft reg |= ESS_AUDIO1_CTRL1_FIFO_CONNECT;
1383 1.39 mycroft ess_write_x_reg(sc, ESS_XCMD_AUDIO1_CTRL1, reg);
1384 1.17 mycroft
1385 1.34 mycroft isa_dmastart(sc->sc_ic, sc->sc_audio1.drq, start,
1386 1.34 mycroft (char *)end - (char *)start, NULL,
1387 1.34 mycroft DMAMODE_READ | DMAMODE_LOOPDEMAND, BUS_DMA_NOWAIT);
1388 1.11 mycroft
1389 1.10 mycroft /* Program transfer count registers with 2's complement of count. */
1390 1.19 mycroft blksize = -blksize;
1391 1.19 mycroft ess_write_x_reg(sc, ESS_XCMD_XFER_COUNTLO, blksize);
1392 1.19 mycroft ess_write_x_reg(sc, ESS_XCMD_XFER_COUNTHI, blksize >> 8);
1393 1.1 augustss
1394 1.18 mycroft /* Use 4 bytes per input DMA. */
1395 1.39 mycroft ess_set_xreg_bits(sc, ESS_XCMD_DEMAND_CTRL, ESS_DEMAND_CTRL_DEMAND_4);
1396 1.18 mycroft
1397 1.10 mycroft /* Start auto-init DMA */
1398 1.39 mycroft ess_wdsp(sc, ESS_ACMD_DISABLE_SPKR);
1399 1.39 mycroft reg = ess_read_x_reg(sc, ESS_XCMD_AUDIO1_CTRL2);
1400 1.39 mycroft reg |= ESS_AUDIO1_CTRL2_DMA_READ | ESS_AUDIO1_CTRL2_ADC_ENABLE;
1401 1.39 mycroft reg |= ESS_AUDIO1_CTRL2_FIFO_ENABLE | ESS_AUDIO1_CTRL2_AUTO_INIT;
1402 1.39 mycroft ess_write_x_reg(sc, ESS_XCMD_AUDIO1_CTRL2, reg);
1403 1.1 augustss
1404 1.1 augustss return (0);
1405 1.1 augustss }
1406 1.1 augustss
1407 1.34 mycroft int
1408 1.39 mycroft ess_audio1_halt(addr)
1409 1.33 nathanw void *addr;
1410 1.33 nathanw {
1411 1.33 nathanw struct ess_softc *sc = addr;
1412 1.33 nathanw
1413 1.39 mycroft DPRINTF(("ess_audio1_halt: sc=%p\n", sc));
1414 1.34 mycroft
1415 1.34 mycroft if (sc->sc_audio1.active) {
1416 1.34 mycroft ess_clear_xreg_bits(sc, ESS_XCMD_AUDIO1_CTRL2,
1417 1.34 mycroft ESS_AUDIO1_CTRL2_FIFO_ENABLE);
1418 1.34 mycroft isa_dmaabort(sc->sc_ic, sc->sc_audio1.drq);
1419 1.34 mycroft sc->sc_audio1.active = 0;
1420 1.33 nathanw }
1421 1.33 nathanw
1422 1.33 nathanw return (0);
1423 1.33 nathanw }
1424 1.33 nathanw
1425 1.1 augustss int
1426 1.39 mycroft ess_audio2_halt(addr)
1427 1.1 augustss void *addr;
1428 1.1 augustss {
1429 1.1 augustss struct ess_softc *sc = addr;
1430 1.1 augustss
1431 1.39 mycroft DPRINTF(("ess_audio2_halt: sc=%p\n", sc));
1432 1.34 mycroft
1433 1.34 mycroft if (sc->sc_audio2.active) {
1434 1.31 mycroft ess_clear_mreg_bits(sc, ESS_MREG_AUDIO2_CTRL1,
1435 1.31 mycroft ESS_AUDIO2_CTRL1_DAC_ENABLE |
1436 1.31 mycroft ESS_AUDIO2_CTRL1_FIFO_ENABLE);
1437 1.34 mycroft isa_dmaabort(sc->sc_ic, sc->sc_audio2.drq);
1438 1.34 mycroft sc->sc_audio2.active = 0;
1439 1.33 nathanw }
1440 1.33 nathanw
1441 1.33 nathanw return (0);
1442 1.33 nathanw }
1443 1.33 nathanw
1444 1.33 nathanw int
1445 1.36 mycroft ess_audio1_intr(arg)
1446 1.1 augustss void *arg;
1447 1.1 augustss {
1448 1.1 augustss struct ess_softc *sc = arg;
1449 1.36 mycroft u_char x;
1450 1.1 augustss
1451 1.36 mycroft DPRINTFN(1,("ess_audio1_intr: intr=%p\n", sc->sc_audio1.intr));
1452 1.1 augustss
1453 1.36 mycroft /* clear interrupt on Audio channel 1*/
1454 1.36 mycroft x = EREAD1(sc->sc_iot, sc->sc_ioh, ESS_CLEAR_INTR);
1455 1.10 mycroft
1456 1.36 mycroft sc->sc_audio1.nintr++;
1457 1.1 augustss
1458 1.39 mycroft if (sc->sc_audio1.active) {
1459 1.36 mycroft (*sc->sc_audio1.intr)(sc->sc_audio1.arg);
1460 1.39 mycroft return (1);
1461 1.39 mycroft } else
1462 1.34 mycroft return (0);
1463 1.1 augustss }
1464 1.1 augustss
1465 1.1 augustss int
1466 1.36 mycroft ess_audio2_intr(arg)
1467 1.1 augustss void *arg;
1468 1.1 augustss {
1469 1.1 augustss struct ess_softc *sc = arg;
1470 1.34 mycroft
1471 1.36 mycroft DPRINTFN(1,("ess_audio2_intr: intr=%p\n", sc->sc_audio2.intr));
1472 1.34 mycroft
1473 1.36 mycroft /* clear interrupt on Audio channel 2 */
1474 1.36 mycroft ess_clear_mreg_bits(sc, ESS_MREG_AUDIO2_CTRL2,
1475 1.36 mycroft ESS_AUDIO2_CTRL2_IRQ_LATCH);
1476 1.1 augustss
1477 1.36 mycroft sc->sc_audio2.nintr++;
1478 1.1 augustss
1479 1.39 mycroft if (sc->sc_audio2.active) {
1480 1.36 mycroft (*sc->sc_audio2.intr)(sc->sc_audio2.arg);
1481 1.39 mycroft return (1);
1482 1.39 mycroft } else
1483 1.33 nathanw return (0);
1484 1.1 augustss }
1485 1.1 augustss
1486 1.1 augustss int
1487 1.1 augustss ess_round_blocksize(addr, blk)
1488 1.1 augustss void *addr;
1489 1.1 augustss int blk;
1490 1.1 augustss {
1491 1.4 augustss return (blk & -8); /* round for max DMA size */
1492 1.1 augustss }
1493 1.1 augustss
1494 1.1 augustss int
1495 1.1 augustss ess_set_port(addr, cp)
1496 1.1 augustss void *addr;
1497 1.1 augustss mixer_ctrl_t *cp;
1498 1.1 augustss {
1499 1.1 augustss struct ess_softc *sc = addr;
1500 1.1 augustss int lgain, rgain;
1501 1.1 augustss
1502 1.4 augustss DPRINTFN(5,("ess_set_port: port=%d num_channels=%d\n",
1503 1.4 augustss cp->dev, cp->un.value.num_channels));
1504 1.1 augustss
1505 1.1 augustss switch (cp->dev) {
1506 1.1 augustss /*
1507 1.1 augustss * The following mixer ports are all stereo. If we get a
1508 1.1 augustss * single-channel gain value passed in, then we duplicate it
1509 1.1 augustss * to both left and right channels.
1510 1.1 augustss */
1511 1.1 augustss case ESS_MASTER_VOL:
1512 1.1 augustss case ESS_DAC_PLAY_VOL:
1513 1.1 augustss case ESS_MIC_PLAY_VOL:
1514 1.1 augustss case ESS_LINE_PLAY_VOL:
1515 1.1 augustss case ESS_SYNTH_PLAY_VOL:
1516 1.1 augustss case ESS_CD_PLAY_VOL:
1517 1.1 augustss case ESS_AUXB_PLAY_VOL:
1518 1.1 augustss case ESS_RECORD_VOL:
1519 1.1 augustss if (cp->type != AUDIO_MIXER_VALUE)
1520 1.1 augustss return EINVAL;
1521 1.1 augustss
1522 1.1 augustss switch (cp->un.value.num_channels) {
1523 1.1 augustss case 1:
1524 1.1 augustss lgain = rgain = ESS_4BIT_GAIN(
1525 1.1 augustss cp->un.value.level[AUDIO_MIXER_LEVEL_MONO]);
1526 1.1 augustss break;
1527 1.1 augustss case 2:
1528 1.1 augustss lgain = ESS_4BIT_GAIN(
1529 1.1 augustss cp->un.value.level[AUDIO_MIXER_LEVEL_LEFT]);
1530 1.1 augustss rgain = ESS_4BIT_GAIN(
1531 1.1 augustss cp->un.value.level[AUDIO_MIXER_LEVEL_RIGHT]);
1532 1.1 augustss break;
1533 1.1 augustss default:
1534 1.1 augustss return EINVAL;
1535 1.1 augustss }
1536 1.1 augustss
1537 1.1 augustss sc->gain[cp->dev][ESS_LEFT] = lgain;
1538 1.1 augustss sc->gain[cp->dev][ESS_RIGHT] = rgain;
1539 1.1 augustss ess_set_gain(sc, cp->dev, 1);
1540 1.34 mycroft return (0);
1541 1.1 augustss
1542 1.1 augustss /*
1543 1.1 augustss * The PC speaker port is mono. If we get a stereo gain value
1544 1.1 augustss * passed in, then we return EINVAL.
1545 1.1 augustss */
1546 1.1 augustss case ESS_PCSPEAKER_VOL:
1547 1.1 augustss if (cp->un.value.num_channels != 1)
1548 1.1 augustss return EINVAL;
1549 1.1 augustss
1550 1.34 mycroft sc->gain[cp->dev][ESS_LEFT] = sc->gain[cp->dev][ESS_RIGHT] =
1551 1.1 augustss ESS_3BIT_GAIN(cp->un.value.level[AUDIO_MIXER_LEVEL_MONO]);
1552 1.1 augustss ess_set_gain(sc, cp->dev, 1);
1553 1.34 mycroft return (0);
1554 1.1 augustss
1555 1.1 augustss case ESS_RECORD_SOURCE:
1556 1.34 mycroft if (sc->sc_model == ESS_1788) {
1557 1.34 mycroft if (cp->type == AUDIO_MIXER_ENUM)
1558 1.34 mycroft return (ess_set_in_port(sc, cp->un.ord));
1559 1.34 mycroft else
1560 1.34 mycroft return (EINVAL);
1561 1.34 mycroft } else {
1562 1.34 mycroft if (cp->type == AUDIO_MIXER_SET)
1563 1.34 mycroft return (ess_set_in_ports(sc, cp->un.mask));
1564 1.34 mycroft else
1565 1.34 mycroft return (EINVAL);
1566 1.34 mycroft }
1567 1.34 mycroft return (0);
1568 1.1 augustss
1569 1.1 augustss case ESS_RECORD_MONITOR:
1570 1.1 augustss if (cp->type != AUDIO_MIXER_ENUM)
1571 1.1 augustss return EINVAL;
1572 1.1 augustss
1573 1.1 augustss if (cp->un.ord)
1574 1.1 augustss /* Enable monitor */
1575 1.1 augustss ess_set_xreg_bits(sc, ESS_XCMD_AUDIO_CTRL,
1576 1.1 augustss ESS_AUDIO_CTRL_MONITOR);
1577 1.1 augustss else
1578 1.1 augustss /* Disable monitor */
1579 1.1 augustss ess_clear_xreg_bits(sc, ESS_XCMD_AUDIO_CTRL,
1580 1.1 augustss ESS_AUDIO_CTRL_MONITOR);
1581 1.34 mycroft return (0);
1582 1.1 augustss }
1583 1.1 augustss
1584 1.34 mycroft if (sc->sc_model == ESS_1788)
1585 1.34 mycroft return (EINVAL);
1586 1.1 augustss
1587 1.1 augustss switch (cp->dev) {
1588 1.33 nathanw case ESS_DAC_REC_VOL:
1589 1.33 nathanw case ESS_MIC_REC_VOL:
1590 1.33 nathanw case ESS_LINE_REC_VOL:
1591 1.33 nathanw case ESS_SYNTH_REC_VOL:
1592 1.33 nathanw case ESS_CD_REC_VOL:
1593 1.33 nathanw case ESS_AUXB_REC_VOL:
1594 1.34 mycroft if (cp->type != AUDIO_MIXER_VALUE)
1595 1.33 nathanw return EINVAL;
1596 1.34 mycroft
1597 1.34 mycroft switch (cp->un.value.num_channels) {
1598 1.34 mycroft case 1:
1599 1.34 mycroft lgain = rgain = ESS_4BIT_GAIN(
1600 1.34 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_MONO]);
1601 1.34 mycroft break;
1602 1.34 mycroft case 2:
1603 1.34 mycroft lgain = ESS_4BIT_GAIN(
1604 1.34 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_LEFT]);
1605 1.34 mycroft rgain = ESS_4BIT_GAIN(
1606 1.34 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_RIGHT]);
1607 1.34 mycroft break;
1608 1.34 mycroft default:
1609 1.34 mycroft return EINVAL;
1610 1.34 mycroft }
1611 1.34 mycroft
1612 1.34 mycroft sc->gain[cp->dev][ESS_LEFT] = lgain;
1613 1.34 mycroft sc->gain[cp->dev][ESS_RIGHT] = rgain;
1614 1.34 mycroft ess_set_gain(sc, cp->dev, 1);
1615 1.34 mycroft return (0);
1616 1.34 mycroft
1617 1.34 mycroft case ESS_MIC_PREAMP:
1618 1.34 mycroft if (cp->type != AUDIO_MIXER_ENUM)
1619 1.34 mycroft return EINVAL;
1620 1.34 mycroft
1621 1.34 mycroft if (cp->un.ord)
1622 1.34 mycroft /* Enable microphone preamp */
1623 1.34 mycroft ess_set_xreg_bits(sc, ESS_XCMD_PREAMP_CTRL,
1624 1.34 mycroft ESS_PREAMP_CTRL_ENABLE);
1625 1.34 mycroft else
1626 1.34 mycroft /* Disable microphone preamp */
1627 1.34 mycroft ess_clear_xreg_bits(sc, ESS_XCMD_PREAMP_CTRL,
1628 1.34 mycroft ESS_PREAMP_CTRL_ENABLE);
1629 1.34 mycroft return (0);
1630 1.34 mycroft }
1631 1.34 mycroft
1632 1.34 mycroft return (EINVAL);
1633 1.34 mycroft }
1634 1.34 mycroft
1635 1.34 mycroft int
1636 1.34 mycroft ess_get_port(addr, cp)
1637 1.34 mycroft void *addr;
1638 1.34 mycroft mixer_ctrl_t *cp;
1639 1.34 mycroft {
1640 1.34 mycroft struct ess_softc *sc = addr;
1641 1.34 mycroft
1642 1.34 mycroft DPRINTFN(5,("ess_get_port: port=%d\n", cp->dev));
1643 1.34 mycroft
1644 1.34 mycroft switch (cp->dev) {
1645 1.34 mycroft case ESS_MASTER_VOL:
1646 1.1 augustss case ESS_DAC_PLAY_VOL:
1647 1.1 augustss case ESS_MIC_PLAY_VOL:
1648 1.1 augustss case ESS_LINE_PLAY_VOL:
1649 1.1 augustss case ESS_SYNTH_PLAY_VOL:
1650 1.1 augustss case ESS_CD_PLAY_VOL:
1651 1.1 augustss case ESS_AUXB_PLAY_VOL:
1652 1.1 augustss case ESS_RECORD_VOL:
1653 1.1 augustss switch (cp->un.value.num_channels) {
1654 1.1 augustss case 1:
1655 1.1 augustss cp->un.value.level[AUDIO_MIXER_LEVEL_MONO] =
1656 1.1 augustss sc->gain[cp->dev][ESS_LEFT];
1657 1.1 augustss break;
1658 1.1 augustss case 2:
1659 1.1 augustss cp->un.value.level[AUDIO_MIXER_LEVEL_LEFT] =
1660 1.1 augustss sc->gain[cp->dev][ESS_LEFT];
1661 1.1 augustss cp->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] =
1662 1.1 augustss sc->gain[cp->dev][ESS_RIGHT];
1663 1.1 augustss break;
1664 1.1 augustss default:
1665 1.1 augustss return EINVAL;
1666 1.1 augustss }
1667 1.34 mycroft return (0);
1668 1.1 augustss
1669 1.34 mycroft case ESS_PCSPEAKER_VOL:
1670 1.34 mycroft if (cp->un.value.num_channels != 1)
1671 1.33 nathanw return EINVAL;
1672 1.34 mycroft
1673 1.34 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_MONO] =
1674 1.34 mycroft sc->gain[cp->dev][ESS_LEFT];
1675 1.34 mycroft return (0);
1676 1.1 augustss
1677 1.1 augustss case ESS_RECORD_SOURCE:
1678 1.33 nathanw if (sc->sc_model == ESS_1788)
1679 1.33 nathanw cp->un.ord = sc->in_port;
1680 1.33 nathanw else
1681 1.33 nathanw cp->un.mask = sc->in_mask;
1682 1.34 mycroft return (0);
1683 1.1 augustss
1684 1.1 augustss case ESS_RECORD_MONITOR:
1685 1.1 augustss cp->un.ord = (ess_read_x_reg(sc, ESS_XCMD_AUDIO_CTRL) &
1686 1.1 augustss ESS_AUDIO_CTRL_MONITOR) ? 1 : 0;
1687 1.34 mycroft return (0);
1688 1.34 mycroft }
1689 1.34 mycroft
1690 1.34 mycroft if (sc->sc_model == ESS_1788)
1691 1.34 mycroft return (EINVAL);
1692 1.34 mycroft
1693 1.34 mycroft switch (cp->dev) {
1694 1.34 mycroft case ESS_DAC_REC_VOL:
1695 1.34 mycroft case ESS_MIC_REC_VOL:
1696 1.34 mycroft case ESS_LINE_REC_VOL:
1697 1.34 mycroft case ESS_SYNTH_REC_VOL:
1698 1.34 mycroft case ESS_CD_REC_VOL:
1699 1.34 mycroft case ESS_AUXB_REC_VOL:
1700 1.34 mycroft switch (cp->un.value.num_channels) {
1701 1.34 mycroft case 1:
1702 1.34 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_MONO] =
1703 1.34 mycroft sc->gain[cp->dev][ESS_LEFT];
1704 1.34 mycroft break;
1705 1.34 mycroft case 2:
1706 1.34 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_LEFT] =
1707 1.34 mycroft sc->gain[cp->dev][ESS_LEFT];
1708 1.34 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] =
1709 1.34 mycroft sc->gain[cp->dev][ESS_RIGHT];
1710 1.34 mycroft break;
1711 1.34 mycroft default:
1712 1.34 mycroft return EINVAL;
1713 1.34 mycroft }
1714 1.34 mycroft return (0);
1715 1.1 augustss
1716 1.34 mycroft case ESS_MIC_PREAMP:
1717 1.34 mycroft cp->un.ord = (ess_read_x_reg(sc, ESS_XCMD_PREAMP_CTRL) &
1718 1.34 mycroft ESS_PREAMP_CTRL_ENABLE) ? 1 : 0;
1719 1.34 mycroft return (0);
1720 1.1 augustss }
1721 1.1 augustss
1722 1.34 mycroft return (EINVAL);
1723 1.1 augustss }
1724 1.1 augustss
1725 1.1 augustss int
1726 1.1 augustss ess_query_devinfo(addr, dip)
1727 1.1 augustss void *addr;
1728 1.1 augustss mixer_devinfo_t *dip;
1729 1.1 augustss {
1730 1.1 augustss struct ess_softc *sc = addr;
1731 1.1 augustss
1732 1.4 augustss DPRINTFN(5,("ess_query_devinfo: model=%d index=%d\n",
1733 1.4 augustss sc->sc_model, dip->index));
1734 1.1 augustss
1735 1.1 augustss /*
1736 1.1 augustss * REVISIT: There are some slight differences between the
1737 1.1 augustss * mixers on the different ESS chips, which can
1738 1.1 augustss * be sorted out using the chip model rather than a
1739 1.1 augustss * separate mixer model.
1740 1.1 augustss * This is currently coded assuming an ES1887; we
1741 1.1 augustss * need to work out which bits are not applicable to
1742 1.1 augustss * the other models (1888 and 888).
1743 1.1 augustss */
1744 1.1 augustss switch (dip->index) {
1745 1.1 augustss case ESS_DAC_PLAY_VOL:
1746 1.1 augustss dip->mixer_class = ESS_INPUT_CLASS;
1747 1.27 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1748 1.1 augustss strcpy(dip->label.name, AudioNdac);
1749 1.27 mycroft dip->type = AUDIO_MIXER_VALUE;
1750 1.1 augustss dip->un.v.num_channels = 2;
1751 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1752 1.1 augustss return (0);
1753 1.1 augustss
1754 1.1 augustss case ESS_MIC_PLAY_VOL:
1755 1.1 augustss dip->mixer_class = ESS_INPUT_CLASS;
1756 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1757 1.33 nathanw if (sc->sc_model == ESS_1788)
1758 1.33 nathanw dip->next = AUDIO_MIXER_LAST;
1759 1.33 nathanw else
1760 1.33 nathanw dip->next = ESS_MIC_PREAMP;
1761 1.1 augustss strcpy(dip->label.name, AudioNmicrophone);
1762 1.27 mycroft dip->type = AUDIO_MIXER_VALUE;
1763 1.1 augustss dip->un.v.num_channels = 2;
1764 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1765 1.1 augustss return (0);
1766 1.1 augustss
1767 1.1 augustss case ESS_LINE_PLAY_VOL:
1768 1.1 augustss dip->mixer_class = ESS_INPUT_CLASS;
1769 1.27 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1770 1.1 augustss strcpy(dip->label.name, AudioNline);
1771 1.27 mycroft dip->type = AUDIO_MIXER_VALUE;
1772 1.1 augustss dip->un.v.num_channels = 2;
1773 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1774 1.1 augustss return (0);
1775 1.1 augustss
1776 1.1 augustss case ESS_SYNTH_PLAY_VOL:
1777 1.1 augustss dip->mixer_class = ESS_INPUT_CLASS;
1778 1.27 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1779 1.1 augustss strcpy(dip->label.name, AudioNfmsynth);
1780 1.27 mycroft dip->type = AUDIO_MIXER_VALUE;
1781 1.1 augustss dip->un.v.num_channels = 2;
1782 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1783 1.1 augustss return (0);
1784 1.1 augustss
1785 1.1 augustss case ESS_CD_PLAY_VOL:
1786 1.1 augustss dip->mixer_class = ESS_INPUT_CLASS;
1787 1.27 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1788 1.1 augustss strcpy(dip->label.name, AudioNcd);
1789 1.27 mycroft dip->type = AUDIO_MIXER_VALUE;
1790 1.1 augustss dip->un.v.num_channels = 2;
1791 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1792 1.1 augustss return (0);
1793 1.1 augustss
1794 1.1 augustss case ESS_AUXB_PLAY_VOL:
1795 1.1 augustss dip->mixer_class = ESS_INPUT_CLASS;
1796 1.27 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1797 1.1 augustss strcpy(dip->label.name, "auxb");
1798 1.27 mycroft dip->type = AUDIO_MIXER_VALUE;
1799 1.1 augustss dip->un.v.num_channels = 2;
1800 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1801 1.1 augustss return (0);
1802 1.1 augustss
1803 1.1 augustss case ESS_INPUT_CLASS:
1804 1.1 augustss dip->mixer_class = ESS_INPUT_CLASS;
1805 1.1 augustss dip->next = dip->prev = AUDIO_MIXER_LAST;
1806 1.1 augustss strcpy(dip->label.name, AudioCinputs);
1807 1.27 mycroft dip->type = AUDIO_MIXER_CLASS;
1808 1.1 augustss return (0);
1809 1.1 augustss
1810 1.1 augustss case ESS_MASTER_VOL:
1811 1.1 augustss dip->mixer_class = ESS_OUTPUT_CLASS;
1812 1.27 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1813 1.1 augustss strcpy(dip->label.name, AudioNmaster);
1814 1.27 mycroft dip->type = AUDIO_MIXER_VALUE;
1815 1.1 augustss dip->un.v.num_channels = 2;
1816 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1817 1.1 augustss return (0);
1818 1.1 augustss
1819 1.1 augustss case ESS_PCSPEAKER_VOL:
1820 1.1 augustss dip->mixer_class = ESS_OUTPUT_CLASS;
1821 1.27 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1822 1.1 augustss strcpy(dip->label.name, "pc_speaker");
1823 1.27 mycroft dip->type = AUDIO_MIXER_VALUE;
1824 1.1 augustss dip->un.v.num_channels = 1;
1825 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1826 1.1 augustss return (0);
1827 1.1 augustss
1828 1.1 augustss case ESS_OUTPUT_CLASS:
1829 1.1 augustss dip->mixer_class = ESS_OUTPUT_CLASS;
1830 1.1 augustss dip->next = dip->prev = AUDIO_MIXER_LAST;
1831 1.1 augustss strcpy(dip->label.name, AudioCoutputs);
1832 1.27 mycroft dip->type = AUDIO_MIXER_CLASS;
1833 1.1 augustss return (0);
1834 1.1 augustss
1835 1.1 augustss case ESS_RECORD_VOL:
1836 1.1 augustss dip->mixer_class = ESS_RECORD_CLASS;
1837 1.27 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1838 1.1 augustss strcpy(dip->label.name, AudioNrecord);
1839 1.27 mycroft dip->type = AUDIO_MIXER_VALUE;
1840 1.1 augustss dip->un.v.num_channels = 2;
1841 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1842 1.1 augustss return (0);
1843 1.1 augustss
1844 1.1 augustss case ESS_RECORD_SOURCE:
1845 1.34 mycroft dip->mixer_class = ESS_RECORD_CLASS;
1846 1.27 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1847 1.1 augustss strcpy(dip->label.name, AudioNsource);
1848 1.33 nathanw if (sc->sc_model == ESS_1788) {
1849 1.34 mycroft /*
1850 1.34 mycroft * The 1788 doesn't use the input mixer control that
1851 1.34 mycroft * the 1888 uses, because it's a pain when you only
1852 1.34 mycroft * have one mixer.
1853 1.34 mycroft * Perhaps it could be emulated by keeping both sets of
1854 1.34 mycroft * gain values, and doing a `context switch' of the
1855 1.34 mycroft * mixer registers when shifting from playing to
1856 1.34 mycroft * recording.
1857 1.33 nathanw */
1858 1.33 nathanw dip->type = AUDIO_MIXER_ENUM;
1859 1.33 nathanw dip->un.e.num_mem = 4;
1860 1.33 nathanw strcpy(dip->un.e.member[0].label.name, AudioNmicrophone);
1861 1.33 nathanw dip->un.e.member[0].ord = ESS_SOURCE_MIC;
1862 1.33 nathanw strcpy(dip->un.e.member[1].label.name, AudioNline);
1863 1.33 nathanw dip->un.e.member[1].ord = ESS_SOURCE_LINE;
1864 1.33 nathanw strcpy(dip->un.e.member[2].label.name, AudioNcd);
1865 1.33 nathanw dip->un.e.member[2].ord = ESS_SOURCE_CD;
1866 1.33 nathanw strcpy(dip->un.e.member[3].label.name, AudioNmixerout);
1867 1.33 nathanw dip->un.e.member[3].ord = ESS_SOURCE_MIXER;
1868 1.33 nathanw } else {
1869 1.33 nathanw dip->type = AUDIO_MIXER_SET;
1870 1.33 nathanw dip->un.s.num_mem = 6;
1871 1.33 nathanw strcpy(dip->un.s.member[0].label.name, AudioNdac);
1872 1.33 nathanw dip->un.s.member[0].mask = 1 << ESS_DAC_REC_VOL;
1873 1.33 nathanw strcpy(dip->un.s.member[1].label.name, AudioNmicrophone);
1874 1.33 nathanw dip->un.s.member[1].mask = 1 << ESS_MIC_REC_VOL;
1875 1.33 nathanw strcpy(dip->un.s.member[2].label.name, AudioNline);
1876 1.33 nathanw dip->un.s.member[2].mask = 1 << ESS_LINE_REC_VOL;
1877 1.33 nathanw strcpy(dip->un.s.member[3].label.name, AudioNfmsynth);
1878 1.33 nathanw dip->un.s.member[3].mask = 1 << ESS_SYNTH_REC_VOL;
1879 1.33 nathanw strcpy(dip->un.s.member[4].label.name, AudioNcd);
1880 1.33 nathanw dip->un.s.member[4].mask = 1 << ESS_CD_REC_VOL;
1881 1.33 nathanw strcpy(dip->un.s.member[5].label.name, "auxb");
1882 1.33 nathanw dip->un.s.member[5].mask = 1 << ESS_AUXB_REC_VOL;
1883 1.33 nathanw }
1884 1.1 augustss return (0);
1885 1.1 augustss
1886 1.1 augustss case ESS_RECORD_CLASS:
1887 1.1 augustss dip->mixer_class = ESS_RECORD_CLASS;
1888 1.1 augustss dip->next = dip->prev = AUDIO_MIXER_LAST;
1889 1.1 augustss strcpy(dip->label.name, AudioCrecord);
1890 1.27 mycroft dip->type = AUDIO_MIXER_CLASS;
1891 1.1 augustss return (0);
1892 1.1 augustss
1893 1.1 augustss case ESS_RECORD_MONITOR:
1894 1.1 augustss dip->prev = dip->next = AUDIO_MIXER_LAST;
1895 1.1 augustss strcpy(dip->label.name, AudioNmonitor);
1896 1.1 augustss dip->type = AUDIO_MIXER_ENUM;
1897 1.27 mycroft dip->mixer_class = ESS_MONITOR_CLASS;
1898 1.1 augustss dip->un.e.num_mem = 2;
1899 1.1 augustss strcpy(dip->un.e.member[0].label.name, AudioNoff);
1900 1.1 augustss dip->un.e.member[0].ord = 0;
1901 1.1 augustss strcpy(dip->un.e.member[1].label.name, AudioNon);
1902 1.1 augustss dip->un.e.member[1].ord = 1;
1903 1.1 augustss return (0);
1904 1.1 augustss
1905 1.1 augustss case ESS_MONITOR_CLASS:
1906 1.1 augustss dip->mixer_class = ESS_MONITOR_CLASS;
1907 1.1 augustss dip->next = dip->prev = AUDIO_MIXER_LAST;
1908 1.1 augustss strcpy(dip->label.name, AudioCmonitor);
1909 1.27 mycroft dip->type = AUDIO_MIXER_CLASS;
1910 1.1 augustss return (0);
1911 1.1 augustss }
1912 1.1 augustss
1913 1.34 mycroft if (sc->sc_model == ESS_1788)
1914 1.34 mycroft return (ENXIO);
1915 1.34 mycroft
1916 1.34 mycroft switch (dip->index) {
1917 1.34 mycroft case ESS_DAC_REC_VOL:
1918 1.34 mycroft dip->mixer_class = ESS_RECORD_CLASS;
1919 1.34 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1920 1.34 mycroft strcpy(dip->label.name, AudioNdac);
1921 1.34 mycroft dip->type = AUDIO_MIXER_VALUE;
1922 1.34 mycroft dip->un.v.num_channels = 2;
1923 1.34 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1924 1.34 mycroft return (0);
1925 1.34 mycroft
1926 1.34 mycroft case ESS_MIC_REC_VOL:
1927 1.34 mycroft dip->mixer_class = ESS_RECORD_CLASS;
1928 1.34 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1929 1.34 mycroft strcpy(dip->label.name, AudioNmicrophone);
1930 1.34 mycroft dip->type = AUDIO_MIXER_VALUE;
1931 1.34 mycroft dip->un.v.num_channels = 2;
1932 1.34 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1933 1.34 mycroft return (0);
1934 1.34 mycroft
1935 1.34 mycroft case ESS_LINE_REC_VOL:
1936 1.34 mycroft dip->mixer_class = ESS_RECORD_CLASS;
1937 1.34 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1938 1.34 mycroft strcpy(dip->label.name, AudioNline);
1939 1.34 mycroft dip->type = AUDIO_MIXER_VALUE;
1940 1.34 mycroft dip->un.v.num_channels = 2;
1941 1.34 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1942 1.34 mycroft return (0);
1943 1.34 mycroft
1944 1.34 mycroft case ESS_SYNTH_REC_VOL:
1945 1.34 mycroft dip->mixer_class = ESS_RECORD_CLASS;
1946 1.34 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1947 1.34 mycroft strcpy(dip->label.name, AudioNfmsynth);
1948 1.34 mycroft dip->type = AUDIO_MIXER_VALUE;
1949 1.34 mycroft dip->un.v.num_channels = 2;
1950 1.34 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1951 1.34 mycroft return (0);
1952 1.34 mycroft
1953 1.34 mycroft case ESS_CD_REC_VOL:
1954 1.34 mycroft dip->mixer_class = ESS_RECORD_CLASS;
1955 1.34 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1956 1.34 mycroft strcpy(dip->label.name, AudioNcd);
1957 1.34 mycroft dip->type = AUDIO_MIXER_VALUE;
1958 1.34 mycroft dip->un.v.num_channels = 2;
1959 1.34 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1960 1.34 mycroft return (0);
1961 1.34 mycroft
1962 1.34 mycroft case ESS_AUXB_REC_VOL:
1963 1.34 mycroft dip->mixer_class = ESS_RECORD_CLASS;
1964 1.34 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1965 1.34 mycroft strcpy(dip->label.name, "auxb");
1966 1.34 mycroft dip->type = AUDIO_MIXER_VALUE;
1967 1.34 mycroft dip->un.v.num_channels = 2;
1968 1.34 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1969 1.34 mycroft return (0);
1970 1.34 mycroft
1971 1.34 mycroft case ESS_MIC_PREAMP:
1972 1.34 mycroft dip->mixer_class = ESS_INPUT_CLASS;
1973 1.34 mycroft dip->prev = ESS_MIC_PLAY_VOL;
1974 1.34 mycroft dip->next = AUDIO_MIXER_LAST;
1975 1.34 mycroft strcpy(dip->label.name, AudioNpreamp);
1976 1.34 mycroft dip->type = AUDIO_MIXER_ENUM;
1977 1.34 mycroft dip->un.e.num_mem = 2;
1978 1.34 mycroft strcpy(dip->un.e.member[0].label.name, AudioNoff);
1979 1.34 mycroft dip->un.e.member[0].ord = 0;
1980 1.34 mycroft strcpy(dip->un.e.member[1].label.name, AudioNon);
1981 1.34 mycroft dip->un.e.member[1].ord = 1;
1982 1.34 mycroft return (0);
1983 1.34 mycroft }
1984 1.34 mycroft
1985 1.4 augustss return (ENXIO);
1986 1.4 augustss }
1987 1.4 augustss
1988 1.4 augustss void *
1989 1.30 mycroft ess_malloc(addr, direction, size, pool, flags)
1990 1.4 augustss void *addr;
1991 1.30 mycroft int direction;
1992 1.30 mycroft size_t size;
1993 1.30 mycroft int pool, flags;
1994 1.4 augustss {
1995 1.4 augustss struct ess_softc *sc = addr;
1996 1.30 mycroft int drq;
1997 1.4 augustss
1998 1.40 mycroft if (sc->sc_model != ESS_1788 && direction == AUMODE_PLAY)
1999 1.34 mycroft drq = sc->sc_audio2.drq;
2000 1.30 mycroft else
2001 1.34 mycroft drq = sc->sc_audio1.drq;
2002 1.30 mycroft return (isa_malloc(sc->sc_ic, drq, size, pool, flags));
2003 1.4 augustss }
2004 1.4 augustss
2005 1.4 augustss void
2006 1.4 augustss ess_free(addr, ptr, pool)
2007 1.4 augustss void *addr;
2008 1.4 augustss void *ptr;
2009 1.4 augustss int pool;
2010 1.4 augustss {
2011 1.4 augustss isa_free(ptr, pool);
2012 1.4 augustss }
2013 1.4 augustss
2014 1.30 mycroft size_t
2015 1.30 mycroft ess_round_buffersize(addr, direction, size)
2016 1.4 augustss void *addr;
2017 1.30 mycroft int direction;
2018 1.30 mycroft size_t size;
2019 1.4 augustss {
2020 1.4 augustss if (size > MAX_ISADMA)
2021 1.4 augustss size = MAX_ISADMA;
2022 1.30 mycroft return (size);
2023 1.4 augustss }
2024 1.4 augustss
2025 1.4 augustss int
2026 1.4 augustss ess_mappage(addr, mem, off, prot)
2027 1.4 augustss void *addr;
2028 1.34 mycroft void *mem;
2029 1.34 mycroft int off;
2030 1.4 augustss int prot;
2031 1.4 augustss {
2032 1.4 augustss return (isa_mappage(mem, off, prot));
2033 1.1 augustss }
2034 1.1 augustss
2035 1.1 augustss int
2036 1.36 mycroft ess_1788_get_props(addr)
2037 1.36 mycroft void *addr;
2038 1.36 mycroft {
2039 1.36 mycroft
2040 1.36 mycroft return (AUDIO_PROP_MMAP | AUDIO_PROP_INDEPENDENT);
2041 1.36 mycroft }
2042 1.36 mycroft
2043 1.36 mycroft int
2044 1.36 mycroft ess_1888_get_props(addr)
2045 1.1 augustss void *addr;
2046 1.1 augustss {
2047 1.14 mycroft
2048 1.36 mycroft return (AUDIO_PROP_MMAP | AUDIO_PROP_INDEPENDENT | AUDIO_PROP_FULLDUPLEX);
2049 1.1 augustss }
2050 1.1 augustss
2051 1.1 augustss /* ============================================
2052 1.1 augustss * Generic functions for ess, not used by audio h/w i/f
2053 1.1 augustss * =============================================
2054 1.1 augustss */
2055 1.1 augustss
2056 1.1 augustss /*
2057 1.1 augustss * Reset the chip.
2058 1.1 augustss * Return non-zero if the chip isn't detected.
2059 1.1 augustss */
2060 1.1 augustss int
2061 1.1 augustss ess_reset(sc)
2062 1.1 augustss struct ess_softc *sc;
2063 1.1 augustss {
2064 1.1 augustss bus_space_tag_t iot = sc->sc_iot;
2065 1.1 augustss bus_space_handle_t ioh = sc->sc_ioh;
2066 1.1 augustss
2067 1.40 mycroft sc->sc_audio1.active = 0;
2068 1.40 mycroft sc->sc_audio2.active = 0;
2069 1.1 augustss
2070 1.4 augustss EWRITE1(iot, ioh, ESS_DSP_RESET, ESS_RESET_EXT);
2071 1.1 augustss delay(10000);
2072 1.2 augustss EWRITE1(iot, ioh, ESS_DSP_RESET, 0);
2073 1.1 augustss if (ess_rdsp(sc) != ESS_MAGIC)
2074 1.4 augustss return (1);
2075 1.1 augustss
2076 1.4 augustss /* Enable access to the ESS extension commands. */
2077 1.1 augustss ess_wdsp(sc, ESS_ACMD_ENABLE_EXT);
2078 1.1 augustss
2079 1.1 augustss return (0);
2080 1.1 augustss }
2081 1.1 augustss
2082 1.1 augustss void
2083 1.1 augustss ess_set_gain(sc, port, on)
2084 1.1 augustss struct ess_softc *sc;
2085 1.1 augustss int port;
2086 1.1 augustss int on;
2087 1.1 augustss {
2088 1.1 augustss int gain, left, right;
2089 1.1 augustss int mix;
2090 1.1 augustss int src;
2091 1.1 augustss int stereo;
2092 1.1 augustss
2093 1.1 augustss /*
2094 1.1 augustss * Most gain controls are found in the mixer registers and
2095 1.1 augustss * are stereo. Any that are not, must set mix and stereo as
2096 1.1 augustss * required.
2097 1.1 augustss */
2098 1.1 augustss mix = 1;
2099 1.1 augustss stereo = 1;
2100 1.1 augustss
2101 1.1 augustss switch (port) {
2102 1.1 augustss case ESS_MASTER_VOL:
2103 1.33 nathanw src = ESS_MREG_VOLUME_MASTER;
2104 1.1 augustss break;
2105 1.1 augustss case ESS_DAC_PLAY_VOL:
2106 1.33 nathanw if (sc->sc_model == ESS_1788)
2107 1.33 nathanw src = ESS_MREG_VOLUME_VOICE;
2108 1.33 nathanw else
2109 1.33 nathanw src = 0x7C;
2110 1.1 augustss break;
2111 1.1 augustss case ESS_MIC_PLAY_VOL:
2112 1.33 nathanw src = ESS_MREG_VOLUME_MIC;
2113 1.1 augustss break;
2114 1.1 augustss case ESS_LINE_PLAY_VOL:
2115 1.33 nathanw src = ESS_MREG_VOLUME_LINE;
2116 1.1 augustss break;
2117 1.1 augustss case ESS_SYNTH_PLAY_VOL:
2118 1.33 nathanw src = ESS_MREG_VOLUME_SYNTH;
2119 1.1 augustss break;
2120 1.1 augustss case ESS_CD_PLAY_VOL:
2121 1.33 nathanw src = ESS_MREG_VOLUME_CD;
2122 1.1 augustss break;
2123 1.1 augustss case ESS_AUXB_PLAY_VOL:
2124 1.33 nathanw src = ESS_MREG_VOLUME_AUXB;
2125 1.1 augustss break;
2126 1.1 augustss case ESS_PCSPEAKER_VOL:
2127 1.33 nathanw src = ESS_MREG_VOLUME_PCSPKR;
2128 1.1 augustss stereo = 0;
2129 1.1 augustss break;
2130 1.1 augustss case ESS_DAC_REC_VOL:
2131 1.1 augustss src = 0x69;
2132 1.1 augustss break;
2133 1.1 augustss case ESS_MIC_REC_VOL:
2134 1.1 augustss src = 0x68;
2135 1.1 augustss break;
2136 1.1 augustss case ESS_LINE_REC_VOL:
2137 1.1 augustss src = 0x6E;
2138 1.1 augustss break;
2139 1.1 augustss case ESS_SYNTH_REC_VOL:
2140 1.1 augustss src = 0x6B;
2141 1.1 augustss break;
2142 1.1 augustss case ESS_CD_REC_VOL:
2143 1.1 augustss src = 0x6A;
2144 1.1 augustss break;
2145 1.1 augustss case ESS_AUXB_REC_VOL:
2146 1.1 augustss src = 0x6C;
2147 1.1 augustss break;
2148 1.1 augustss case ESS_RECORD_VOL:
2149 1.33 nathanw src = ESS_XCMD_VOLIN_CTRL;
2150 1.1 augustss mix = 0;
2151 1.1 augustss break;
2152 1.1 augustss default:
2153 1.1 augustss return;
2154 1.1 augustss }
2155 1.1 augustss
2156 1.33 nathanw /* 1788 doesn't have a separate recording mixer */
2157 1.34 mycroft if (sc->sc_model == ESS_1788 && mix && src > 0x62)
2158 1.34 mycroft return;
2159 1.33 nathanw
2160 1.1 augustss if (on) {
2161 1.1 augustss left = sc->gain[port][ESS_LEFT];
2162 1.1 augustss right = sc->gain[port][ESS_RIGHT];
2163 1.1 augustss } else {
2164 1.1 augustss left = right = 0;
2165 1.1 augustss }
2166 1.1 augustss
2167 1.1 augustss if (stereo)
2168 1.1 augustss gain = ESS_STEREO_GAIN(left, right);
2169 1.1 augustss else
2170 1.1 augustss gain = ESS_MONO_GAIN(left);
2171 1.1 augustss
2172 1.1 augustss if (mix)
2173 1.1 augustss ess_write_mix_reg(sc, src, gain);
2174 1.1 augustss else
2175 1.1 augustss ess_write_x_reg(sc, src, gain);
2176 1.1 augustss }
2177 1.1 augustss
2178 1.33 nathanw /* Set the input device on devices without an input mixer. */
2179 1.33 nathanw int
2180 1.33 nathanw ess_set_in_port(sc, ord)
2181 1.33 nathanw struct ess_softc *sc;
2182 1.33 nathanw int ord;
2183 1.33 nathanw {
2184 1.33 nathanw mixer_devinfo_t di;
2185 1.34 mycroft int i;
2186 1.33 nathanw
2187 1.33 nathanw DPRINTF(("ess_set_in_port: ord=0x%x\n", ord));
2188 1.33 nathanw
2189 1.33 nathanw /*
2190 1.33 nathanw * Get the device info for the record source control,
2191 1.33 nathanw * including the list of available sources.
2192 1.33 nathanw */
2193 1.33 nathanw di.index = ESS_RECORD_SOURCE;
2194 1.33 nathanw if (ess_query_devinfo(sc, &di))
2195 1.33 nathanw return EINVAL;
2196 1.33 nathanw
2197 1.34 mycroft /* See if the given ord value was anywhere in the list. */
2198 1.33 nathanw for (i = 0; i < di.un.e.num_mem; i++) {
2199 1.34 mycroft if (ord == di.un.e.member[i].ord)
2200 1.33 nathanw break;
2201 1.33 nathanw }
2202 1.34 mycroft if (i == di.un.e.num_mem)
2203 1.34 mycroft return EINVAL;
2204 1.33 nathanw
2205 1.34 mycroft ess_write_mix_reg(sc, ESS_MREG_ADC_SOURCE, ord);
2206 1.33 nathanw
2207 1.34 mycroft sc->in_port = ord;
2208 1.33 nathanw return (0);
2209 1.33 nathanw }
2210 1.33 nathanw
2211 1.33 nathanw /* Set the input device levels on input-mixer-enabled devices. */
2212 1.1 augustss int
2213 1.1 augustss ess_set_in_ports(sc, mask)
2214 1.1 augustss struct ess_softc *sc;
2215 1.1 augustss int mask;
2216 1.1 augustss {
2217 1.1 augustss mixer_devinfo_t di;
2218 1.34 mycroft int i, port;
2219 1.1 augustss
2220 1.1 augustss DPRINTF(("ess_set_in_ports: mask=0x%x\n", mask));
2221 1.1 augustss
2222 1.1 augustss /*
2223 1.1 augustss * Get the device info for the record source control,
2224 1.1 augustss * including the list of available sources.
2225 1.1 augustss */
2226 1.1 augustss di.index = ESS_RECORD_SOURCE;
2227 1.1 augustss if (ess_query_devinfo(sc, &di))
2228 1.1 augustss return EINVAL;
2229 1.1 augustss
2230 1.1 augustss /*
2231 1.1 augustss * Set or disable the record volume control for each of the
2232 1.1 augustss * possible sources.
2233 1.1 augustss */
2234 1.33 nathanw for (i = 0; i < di.un.s.num_mem; i++) {
2235 1.1 augustss /*
2236 1.1 augustss * Calculate the source port number from its mask.
2237 1.1 augustss */
2238 1.34 mycroft port = ffs(di.un.s.member[i].mask);
2239 1.1 augustss
2240 1.1 augustss /*
2241 1.1 augustss * Set the source gain:
2242 1.1 augustss * to the current value if source is enabled
2243 1.1 augustss * to zero if source is disabled
2244 1.1 augustss */
2245 1.1 augustss ess_set_gain(sc, port, mask & di.un.s.member[i].mask);
2246 1.1 augustss }
2247 1.1 augustss
2248 1.1 augustss sc->in_mask = mask;
2249 1.1 augustss return (0);
2250 1.1 augustss }
2251 1.1 augustss
2252 1.1 augustss void
2253 1.1 augustss ess_speaker_on(sc)
2254 1.1 augustss struct ess_softc *sc;
2255 1.1 augustss {
2256 1.1 augustss /* Disable mute on left- and right-master volume. */
2257 1.33 nathanw ess_clear_mreg_bits(sc, ESS_MREG_VOLUME_LEFT, ESS_VOLUME_MUTE);
2258 1.33 nathanw ess_clear_mreg_bits(sc, ESS_MREG_VOLUME_RIGHT, ESS_VOLUME_MUTE);
2259 1.1 augustss }
2260 1.1 augustss
2261 1.1 augustss void
2262 1.1 augustss ess_speaker_off(sc)
2263 1.1 augustss struct ess_softc *sc;
2264 1.1 augustss {
2265 1.1 augustss /* Enable mute on left- and right-master volume. */
2266 1.33 nathanw ess_set_mreg_bits(sc, ESS_MREG_VOLUME_LEFT, ESS_VOLUME_MUTE);
2267 1.33 nathanw ess_set_mreg_bits(sc, ESS_MREG_VOLUME_RIGHT, ESS_VOLUME_MUTE);
2268 1.1 augustss }
2269 1.1 augustss
2270 1.1 augustss /*
2271 1.1 augustss * Calculate the time constant for the requested sampling rate.
2272 1.1 augustss */
2273 1.1 augustss u_int
2274 1.1 augustss ess_srtotc(rate)
2275 1.1 augustss u_int rate;
2276 1.1 augustss {
2277 1.1 augustss u_int tc;
2278 1.1 augustss
2279 1.1 augustss /* The following formulae are from the ESS data sheet. */
2280 1.12 mycroft if (rate <= 22050)
2281 1.1 augustss tc = 128 - 397700L / rate;
2282 1.1 augustss else
2283 1.1 augustss tc = 256 - 795500L / rate;
2284 1.1 augustss
2285 1.1 augustss return (tc);
2286 1.1 augustss }
2287 1.1 augustss
2288 1.1 augustss
2289 1.1 augustss /*
2290 1.1 augustss * Calculate the filter constant for the reuqested sampling rate.
2291 1.1 augustss */
2292 1.1 augustss u_int
2293 1.1 augustss ess_srtofc(rate)
2294 1.1 augustss u_int rate;
2295 1.1 augustss {
2296 1.1 augustss /*
2297 1.1 augustss * The following formula is derived from the information in
2298 1.1 augustss * the ES1887 data sheet, based on a roll-off frequency of
2299 1.1 augustss * 87%.
2300 1.1 augustss */
2301 1.1 augustss return (256 - 200279L / rate);
2302 1.1 augustss }
2303 1.1 augustss
2304 1.1 augustss
2305 1.1 augustss /*
2306 1.1 augustss * Return the status of the DSP.
2307 1.1 augustss */
2308 1.1 augustss u_char
2309 1.1 augustss ess_get_dsp_status(sc)
2310 1.1 augustss struct ess_softc *sc;
2311 1.1 augustss {
2312 1.34 mycroft return (EREAD1(sc->sc_iot, sc->sc_ioh, ESS_DSP_RW_STATUS));
2313 1.1 augustss }
2314 1.1 augustss
2315 1.1 augustss
2316 1.1 augustss /*
2317 1.1 augustss * Return the read status of the DSP: 1 -> DSP ready for reading
2318 1.1 augustss * 0 -> DSP not ready for reading
2319 1.1 augustss */
2320 1.1 augustss u_char
2321 1.1 augustss ess_dsp_read_ready(sc)
2322 1.1 augustss struct ess_softc *sc;
2323 1.1 augustss {
2324 1.34 mycroft return ((ess_get_dsp_status(sc) & ESS_DSP_READ_READY) ? 1 : 0);
2325 1.1 augustss }
2326 1.1 augustss
2327 1.1 augustss
2328 1.1 augustss /*
2329 1.1 augustss * Return the write status of the DSP: 1 -> DSP ready for writing
2330 1.1 augustss * 0 -> DSP not ready for writing
2331 1.1 augustss */
2332 1.1 augustss u_char
2333 1.1 augustss ess_dsp_write_ready(sc)
2334 1.1 augustss struct ess_softc *sc;
2335 1.1 augustss {
2336 1.34 mycroft return ((ess_get_dsp_status(sc) & ESS_DSP_WRITE_BUSY) ? 0 : 1);
2337 1.1 augustss }
2338 1.1 augustss
2339 1.1 augustss
2340 1.1 augustss /*
2341 1.1 augustss * Read a byte from the DSP.
2342 1.1 augustss */
2343 1.1 augustss int
2344 1.1 augustss ess_rdsp(sc)
2345 1.1 augustss struct ess_softc *sc;
2346 1.1 augustss {
2347 1.1 augustss bus_space_tag_t iot = sc->sc_iot;
2348 1.1 augustss bus_space_handle_t ioh = sc->sc_ioh;
2349 1.1 augustss int i;
2350 1.1 augustss
2351 1.1 augustss for (i = ESS_READ_TIMEOUT; i > 0; --i) {
2352 1.1 augustss if (ess_dsp_read_ready(sc)) {
2353 1.2 augustss i = EREAD1(iot, ioh, ESS_DSP_READ);
2354 1.2 augustss DPRINTFN(8,("ess_rdsp() = 0x%02x\n", i));
2355 1.1 augustss return i;
2356 1.1 augustss } else
2357 1.1 augustss delay(10);
2358 1.1 augustss }
2359 1.1 augustss
2360 1.1 augustss DPRINTF(("ess_rdsp: timed out\n"));
2361 1.1 augustss return (-1);
2362 1.1 augustss }
2363 1.1 augustss
2364 1.1 augustss /*
2365 1.1 augustss * Write a byte to the DSP.
2366 1.1 augustss */
2367 1.1 augustss int
2368 1.1 augustss ess_wdsp(sc, v)
2369 1.1 augustss struct ess_softc *sc;
2370 1.1 augustss u_char v;
2371 1.1 augustss {
2372 1.1 augustss bus_space_tag_t iot = sc->sc_iot;
2373 1.1 augustss bus_space_handle_t ioh = sc->sc_ioh;
2374 1.1 augustss int i;
2375 1.2 augustss
2376 1.2 augustss DPRINTFN(8,("ess_wdsp(0x%02x)\n", v));
2377 1.2 augustss
2378 1.1 augustss for (i = ESS_WRITE_TIMEOUT; i > 0; --i) {
2379 1.1 augustss if (ess_dsp_write_ready(sc)) {
2380 1.2 augustss EWRITE1(iot, ioh, ESS_DSP_WRITE, v);
2381 1.1 augustss return (0);
2382 1.1 augustss } else
2383 1.1 augustss delay(10);
2384 1.1 augustss }
2385 1.1 augustss
2386 1.1 augustss DPRINTF(("ess_wdsp(0x%02x): timed out\n", v));
2387 1.1 augustss return (-1);
2388 1.1 augustss }
2389 1.1 augustss
2390 1.1 augustss /*
2391 1.1 augustss * Write a value to one of the ESS extended registers.
2392 1.1 augustss */
2393 1.1 augustss int
2394 1.1 augustss ess_write_x_reg(sc, reg, val)
2395 1.1 augustss struct ess_softc *sc;
2396 1.1 augustss u_char reg;
2397 1.1 augustss u_char val;
2398 1.1 augustss {
2399 1.1 augustss int error;
2400 1.1 augustss
2401 1.2 augustss DPRINTFN(2,("ess_write_x_reg: %02x=%02x\n", reg, val));
2402 1.1 augustss if ((error = ess_wdsp(sc, reg)) == 0)
2403 1.1 augustss error = ess_wdsp(sc, val);
2404 1.1 augustss
2405 1.1 augustss return error;
2406 1.1 augustss }
2407 1.1 augustss
2408 1.1 augustss /*
2409 1.1 augustss * Read the value of one of the ESS extended registers.
2410 1.1 augustss */
2411 1.1 augustss u_char
2412 1.1 augustss ess_read_x_reg(sc, reg)
2413 1.1 augustss struct ess_softc *sc;
2414 1.1 augustss u_char reg;
2415 1.1 augustss {
2416 1.1 augustss int error;
2417 1.2 augustss int val;
2418 1.1 augustss
2419 1.1 augustss if ((error = ess_wdsp(sc, 0xC0)) == 0)
2420 1.1 augustss error = ess_wdsp(sc, reg);
2421 1.1 augustss if (error)
2422 1.1 augustss DPRINTF(("Error reading extended register 0x%02x\n", reg));
2423 1.1 augustss /* REVISIT: what if an error is returned above? */
2424 1.2 augustss val = ess_rdsp(sc);
2425 1.33 nathanw DPRINTFN(2,("ess_read_x_reg: %02x=%02x\n", reg, val));
2426 1.2 augustss return val;
2427 1.1 augustss }
2428 1.1 augustss
2429 1.1 augustss void
2430 1.1 augustss ess_clear_xreg_bits(sc, reg, mask)
2431 1.1 augustss struct ess_softc *sc;
2432 1.1 augustss u_char reg;
2433 1.1 augustss u_char mask;
2434 1.1 augustss {
2435 1.1 augustss if (ess_write_x_reg(sc, reg, ess_read_x_reg(sc, reg) & ~mask) == -1)
2436 1.1 augustss DPRINTF(("Error clearing bits in extended register 0x%02x\n",
2437 1.1 augustss reg));
2438 1.1 augustss }
2439 1.1 augustss
2440 1.1 augustss void
2441 1.1 augustss ess_set_xreg_bits(sc, reg, mask)
2442 1.1 augustss struct ess_softc *sc;
2443 1.1 augustss u_char reg;
2444 1.1 augustss u_char mask;
2445 1.1 augustss {
2446 1.1 augustss if (ess_write_x_reg(sc, reg, ess_read_x_reg(sc, reg) | mask) == -1)
2447 1.1 augustss DPRINTF(("Error setting bits in extended register 0x%02x\n",
2448 1.1 augustss reg));
2449 1.1 augustss }
2450 1.1 augustss
2451 1.1 augustss
2452 1.1 augustss /*
2453 1.1 augustss * Write a value to one of the ESS mixer registers.
2454 1.1 augustss */
2455 1.1 augustss void
2456 1.1 augustss ess_write_mix_reg(sc, reg, val)
2457 1.1 augustss struct ess_softc *sc;
2458 1.1 augustss u_char reg;
2459 1.1 augustss u_char val;
2460 1.1 augustss {
2461 1.1 augustss bus_space_tag_t iot = sc->sc_iot;
2462 1.1 augustss bus_space_handle_t ioh = sc->sc_ioh;
2463 1.1 augustss int s;
2464 1.1 augustss
2465 1.2 augustss DPRINTFN(2,("ess_write_mix_reg: %x=%x\n", reg, val));
2466 1.4 augustss
2467 1.1 augustss s = splaudio();
2468 1.2 augustss EWRITE1(iot, ioh, ESS_MIX_REG_SELECT, reg);
2469 1.2 augustss EWRITE1(iot, ioh, ESS_MIX_REG_DATA, val);
2470 1.1 augustss splx(s);
2471 1.1 augustss }
2472 1.1 augustss
2473 1.1 augustss /*
2474 1.1 augustss * Read the value of one of the ESS mixer registers.
2475 1.1 augustss */
2476 1.1 augustss u_char
2477 1.1 augustss ess_read_mix_reg(sc, reg)
2478 1.1 augustss struct ess_softc *sc;
2479 1.1 augustss u_char reg;
2480 1.1 augustss {
2481 1.1 augustss bus_space_tag_t iot = sc->sc_iot;
2482 1.1 augustss bus_space_handle_t ioh = sc->sc_ioh;
2483 1.1 augustss int s;
2484 1.1 augustss u_char val;
2485 1.1 augustss
2486 1.1 augustss s = splaudio();
2487 1.2 augustss EWRITE1(iot, ioh, ESS_MIX_REG_SELECT, reg);
2488 1.2 augustss val = EREAD1(iot, ioh, ESS_MIX_REG_DATA);
2489 1.4 augustss splx(s);
2490 1.1 augustss
2491 1.2 augustss DPRINTFN(2,("ess_read_mix_reg: %x=%x\n", reg, val));
2492 1.1 augustss return val;
2493 1.1 augustss }
2494 1.1 augustss
2495 1.1 augustss void
2496 1.1 augustss ess_clear_mreg_bits(sc, reg, mask)
2497 1.1 augustss struct ess_softc *sc;
2498 1.1 augustss u_char reg;
2499 1.1 augustss u_char mask;
2500 1.1 augustss {
2501 1.1 augustss ess_write_mix_reg(sc, reg, ess_read_mix_reg(sc, reg) & ~mask);
2502 1.1 augustss }
2503 1.1 augustss
2504 1.1 augustss void
2505 1.1 augustss ess_set_mreg_bits(sc, reg, mask)
2506 1.1 augustss struct ess_softc *sc;
2507 1.1 augustss u_char reg;
2508 1.1 augustss u_char mask;
2509 1.1 augustss {
2510 1.1 augustss ess_write_mix_reg(sc, reg, ess_read_mix_reg(sc, reg) | mask);
2511 1.1 augustss }
2512