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