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