interwave.c revision 1.2 1 1.2 jtc /* $NetBSD: interwave.c,v 1.2 1997/10/09 08:03:46 jtc Exp $ */
2 1.1 augustss
3 1.1 augustss /*
4 1.1 augustss * Copyright (c) 1997 The NetBSD Foundation, Inc.
5 1.1 augustss * All rights reserved.
6 1.1 augustss *
7 1.1 augustss * Author: Kari Mettinen
8 1.1 augustss *
9 1.1 augustss * Redistribution and use in source and binary forms, with or without
10 1.1 augustss * modification, are permitted provided that the following conditions
11 1.1 augustss * are met:
12 1.1 augustss * 1. Redistributions of source code must retain the above copyright
13 1.1 augustss * notice, this list of conditions and the following disclaimer.
14 1.1 augustss * 2. Redistributions in binary form must reproduce the above copyright
15 1.1 augustss * notice, this list of conditions and the following disclaimer in the
16 1.1 augustss * documentation and/or other materials provided with the distribution.
17 1.1 augustss * 3. All advertising materials mentioning features or use of this software
18 1.1 augustss * must display the following acknowledgement:
19 1.1 augustss * This product includes software developed by the NetBSD
20 1.1 augustss * Foundation, Inc. and its contributors.
21 1.1 augustss * 4. Neither the name of The NetBSD Foundation nor the names of its
22 1.1 augustss * contributors may be used to endorse or promote products derived
23 1.1 augustss * from this software without specific prior written permission.
24 1.1 augustss *
25 1.1 augustss * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
26 1.1 augustss * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
27 1.1 augustss * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28 1.2 jtc * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
29 1.2 jtc * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30 1.1 augustss * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31 1.1 augustss * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32 1.1 augustss * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
33 1.1 augustss * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34 1.1 augustss * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
35 1.1 augustss * POSSIBILITY OF SUCH DAMAGE.
36 1.1 augustss */
37 1.1 augustss
38 1.1 augustss #include <sys/param.h>
39 1.1 augustss #include <sys/systm.h>
40 1.1 augustss #include <sys/errno.h>
41 1.1 augustss #include <sys/ioctl.h>
42 1.1 augustss #include <sys/syslog.h>
43 1.1 augustss #include <sys/device.h>
44 1.1 augustss #include <sys/proc.h>
45 1.1 augustss #include <sys/buf.h>
46 1.1 augustss #include <sys/fcntl.h>
47 1.1 augustss #include <sys/malloc.h>
48 1.1 augustss #include <sys/kernel.h>
49 1.1 augustss
50 1.1 augustss #include <machine/cpu.h>
51 1.1 augustss #include <machine/intr.h>
52 1.1 augustss #include <machine/pio.h>
53 1.1 augustss #include <machine/cpufunc.h>
54 1.1 augustss #include <sys/audioio.h>
55 1.1 augustss #include <dev/audio_if.h>
56 1.1 augustss #include <dev/mulaw.h>
57 1.1 augustss
58 1.1 augustss #include <dev/isa/isavar.h>
59 1.1 augustss #include <dev/isa/isadmavar.h>
60 1.1 augustss
61 1.1 augustss #include <dev/ic/interwavereg.h>
62 1.1 augustss #include <dev/ic/interwavevar.h>
63 1.1 augustss
64 1.1 augustss
65 1.1 augustss static void iwreset __P((struct iw_softc *, int));
66 1.1 augustss
67 1.1 augustss static int iw_set_speed __P((struct iw_softc *, u_long, char));
68 1.1 augustss static u_long iw_set_format __P((struct iw_softc *, u_long, int));
69 1.1 augustss static void iw_mixer_line_level __P((struct iw_softc *, int, int, int));
70 1.1 augustss static void iw_trigger_dma __P((struct iw_softc *, u_char));
71 1.1 augustss static void iw_stop_dma __P((struct iw_softc *, u_char, u_char));
72 1.1 augustss static void iw_dma_count __P((struct iw_softc *, u_short, int));
73 1.1 augustss static int iwintr __P((void *));
74 1.1 augustss static void iw_meminit __P((struct iw_softc *));
75 1.1 augustss static void iw_mempoke __P((struct iw_softc *, u_long, u_char));
76 1.1 augustss static u_char iw_mempeek __P((struct iw_softc *, u_long));
77 1.1 augustss
78 1.1 augustss #ifdef USE_WAVETABLE
79 1.1 augustss static void iw_set_voice_place __P((struct iw_softc *, u_char, u_long));
80 1.1 augustss static void iw_voice_pan __P((struct iw_softc *, u_char, u_short, u_short));
81 1.1 augustss static void iw_voice_freq __P((struct iw_softc *, u_char, u_long));
82 1.1 augustss static void iw_set_loopmode __P((struct iw_softc *, u_char, u_char, u_char));
83 1.1 augustss static void iw_set_voice_pos __P((struct iw_softc *, u_short, u_long, u_long));
84 1.1 augustss static void iw_start_voice __P((struct iw_softc *, u_char));
85 1.1 augustss static void iw_play_voice __P((struct iw_softc *, u_long, u_long, u_short));
86 1.1 augustss static void iw_stop_voice __P((struct iw_softc *, u_char));
87 1.1 augustss static void iw_move_voice_end __P((struct iw_softc *, u_short, u_long));
88 1.1 augustss static void iw_initvoices __P((struct iw_softc *));
89 1.1 augustss #endif
90 1.1 augustss
91 1.1 augustss struct audio_device iw_device = {
92 1.1 augustss "Am78C201",
93 1.1 augustss "0.1",
94 1.1 augustss "guspnp"
95 1.1 augustss };
96 1.1 augustss
97 1.1 augustss #ifdef AUDIO_DEBUG
98 1.1 augustss int iw_debug;
99 1.1 augustss #define DPRINTF(p) if (iw_debug) printf p
100 1.1 augustss #else
101 1.1 augustss #define DPRINTF(p)
102 1.1 augustss #endif
103 1.1 augustss
104 1.1 augustss static int iw_cc = 1;
105 1.1 augustss #ifdef DIAGNOSTIC
106 1.1 augustss static int outputs = 0;
107 1.1 augustss static int iw_ints = 0;
108 1.1 augustss static int inputs = 0;
109 1.1 augustss static int iw_inints = 0;
110 1.1 augustss #endif
111 1.1 augustss
112 1.1 augustss int
113 1.1 augustss iwintr(arg)
114 1.1 augustss void *arg;
115 1.1 augustss {
116 1.1 augustss struct iw_softc *sc = arg;
117 1.1 augustss int val = 0;
118 1.1 augustss u_char intrs = 0;
119 1.1 augustss
120 1.1 augustss IW_READ_DIRECT_1(6, sc->p2xr_h, intrs); /* UISR */
121 1.1 augustss
122 1.1 augustss /* codec ints */
123 1.1 augustss
124 1.1 augustss /*
125 1.1 augustss * The proper order to do this seems to be to read CSR3 to get the
126 1.1 augustss * int cause and fifo over underrrun status, then deal with the ints
127 1.1 augustss * (new dma set up), and to clear ints by writing the respective bit
128 1.1 augustss * to 0.
129 1.1 augustss */
130 1.1 augustss
131 1.1 augustss /* read what ints happened */
132 1.1 augustss
133 1.1 augustss IW_READ_CODEC_1(CSR3I, intrs);
134 1.1 augustss
135 1.1 augustss /* clear them */
136 1.1 augustss
137 1.1 augustss IW_WRITE_DIRECT_1(2, sc->codec_index_h, 0x00);
138 1.1 augustss
139 1.1 augustss /* and process them */
140 1.1 augustss
141 1.1 augustss if (intrs & 0x20) {
142 1.1 augustss #ifdef DIAGNOSTIC
143 1.1 augustss iw_inints++;
144 1.1 augustss #endif
145 1.1 augustss sc->sc_reclocked = 0;
146 1.1 augustss if (sc->sc_recintr != 0)
147 1.1 augustss sc->sc_recintr(sc->sc_recarg);
148 1.1 augustss val = 1;
149 1.1 augustss }
150 1.1 augustss if (intrs & 0x10) {
151 1.1 augustss #ifdef DIAGNOSTIC
152 1.1 augustss iw_ints++;
153 1.1 augustss #endif
154 1.1 augustss sc->sc_playlocked = 0;
155 1.1 augustss if (sc->sc_playintr != 0)
156 1.1 augustss sc->sc_playintr(sc->sc_playarg);
157 1.1 augustss val = 1;
158 1.1 augustss }
159 1.1 augustss return val;
160 1.1 augustss
161 1.1 augustss }
162 1.1 augustss
163 1.1 augustss void
164 1.1 augustss iwattach(sc)
165 1.1 augustss struct iw_softc *sc;
166 1.1 augustss {
167 1.1 augustss int got_irq = 0;
168 1.1 augustss
169 1.1 augustss DPRINTF(("iwattach sc %p\n", sc));
170 1.1 augustss
171 1.1 augustss sc->cdatap = 1; /* relative offsets in region */
172 1.1 augustss sc->csr1r = 2;
173 1.1 augustss sc->cxdr = 3; /* CPDR or CRDR */
174 1.1 augustss
175 1.1 augustss sc->gmxr = 0; /* sc->p3xr */
176 1.1 augustss sc->gmxdr = 1; /* GMTDR or GMRDR */
177 1.1 augustss sc->svsr = 2;
178 1.1 augustss sc->igidxr = 3;
179 1.1 augustss sc->i16dp = 4;
180 1.1 augustss sc->i8dp = 5;
181 1.1 augustss sc->lmbdr = 7;
182 1.1 augustss
183 1.1 augustss sc->rec_precision = sc->play_precision = 8;
184 1.1 augustss sc->rec_channels = sc->play_channels = 1;
185 1.1 augustss sc->rec_encoding = sc->play_encoding = AUDIO_ENCODING_ULAW;
186 1.1 augustss sc->sc_irate = 8000;
187 1.1 augustss sc->sc_orate = 8000;
188 1.1 augustss
189 1.1 augustss sc->sc_fullduplex = 1;
190 1.1 augustss
191 1.1 augustss sc->sc_reclocked = 0;
192 1.1 augustss sc->sc_playlocked = 0;
193 1.1 augustss
194 1.1 augustss sc->sc_dma_flags = 0;
195 1.1 augustss
196 1.1 augustss /*
197 1.1 augustss * We can only use a few selected irqs, see if we got one from pnp
198 1.1 augustss * code that suits us.
199 1.1 augustss */
200 1.1 augustss
201 1.1 augustss if (sc->sc_irq > 0) {
202 1.1 augustss sc->sc_ih = isa_intr_establish(sc->sc_p2xr_ic,
203 1.1 augustss sc->sc_irq,
204 1.1 augustss IST_EDGE, IPL_AUDIO, iwintr, sc);
205 1.1 augustss got_irq = 1;
206 1.1 augustss }
207 1.1 augustss if (!got_irq) {
208 1.1 augustss printf("\niwattach: couldn't get a suitable irq\n");
209 1.1 augustss return;
210 1.1 augustss }
211 1.1 augustss printf("\n");
212 1.1 augustss iwreset(sc, 0);
213 1.1 augustss iw_set_format(sc, AUDIO_ENCODING_ULAW, 0);
214 1.1 augustss iw_set_format(sc, AUDIO_ENCODING_ULAW, 1);
215 1.1 augustss printf("interwave version %s. using irq %d drqs %d,%d\n",
216 1.1 augustss iw_device.version,
217 1.1 augustss sc->sc_irq, sc->sc_playdrq,
218 1.1 augustss sc->sc_recdrq);
219 1.1 augustss audio_attach_mi(sc->iw_hw_if, 0, sc, &sc->sc_dev);
220 1.1 augustss }
221 1.1 augustss
222 1.1 augustss int
223 1.1 augustss iwopen(sc, flags)
224 1.1 augustss struct iw_softc *sc;
225 1.1 augustss int flags;
226 1.1 augustss {
227 1.1 augustss int s;
228 1.1 augustss
229 1.1 augustss s = splaudio();
230 1.1 augustss if (sc->sc_open) {
231 1.1 augustss splx(s);
232 1.1 augustss DPRINTF(("iwopen: open %x sc %p\n", sc->sc_open, sc));
233 1.1 augustss return EBUSY;
234 1.1 augustss } else
235 1.1 augustss sc->sc_open = 1;
236 1.1 augustss splx(s);
237 1.1 augustss
238 1.1 augustss DPRINTF(("iwopen: open %x sc %p\n", sc->sc_open, sc));
239 1.1 augustss
240 1.1 augustss #ifdef DIAGNOSTIC
241 1.1 augustss outputs = 0;
242 1.1 augustss iw_ints = 0;
243 1.1 augustss inputs = 0;
244 1.1 augustss iw_inints = 0;
245 1.1 augustss #endif
246 1.1 augustss
247 1.1 augustss iwreset(sc, 1);
248 1.1 augustss
249 1.1 augustss /* READ/WRITE or both */
250 1.1 augustss
251 1.1 augustss if (flags == FREAD) {
252 1.1 augustss sc->sc_mode |= IW_READ;
253 1.1 augustss sc->sc_reclocked = 0;
254 1.1 augustss }
255 1.1 augustss if (flags == FWRITE) {
256 1.1 augustss sc->sc_mode |= IW_WRITE;
257 1.1 augustss sc->sc_playlocked = 0;
258 1.1 augustss }
259 1.1 augustss sc->sc_playdma_cnt = 0;
260 1.1 augustss sc->sc_recdma_cnt = 0;
261 1.1 augustss sc->playfirst = 1;
262 1.1 augustss sc->sc_playintr = 0;
263 1.1 augustss sc->sc_recintr = 0;
264 1.1 augustss
265 1.1 augustss return 0;
266 1.1 augustss }
267 1.1 augustss
268 1.1 augustss
269 1.1 augustss
270 1.1 augustss void
271 1.1 augustss iwclose(addr)
272 1.1 augustss void *addr;
273 1.1 augustss {
274 1.1 augustss struct iw_softc *sc = addr;
275 1.1 augustss
276 1.1 augustss DPRINTF(("iwclose sc %p\n", sc));
277 1.1 augustss
278 1.1 augustss #ifdef DIAGNOSTIC
279 1.1 augustss DPRINTF(("iwclose: outputs %d ints %d inputs %d in_ints %d\n",
280 1.1 augustss outputs, iw_ints, inputs, iw_inints));
281 1.1 augustss #endif
282 1.1 augustss
283 1.1 augustss /* close hardware */
284 1.1 augustss sc->sc_open = 0;
285 1.1 augustss sc->sc_flags = 0;
286 1.1 augustss sc->sc_mode = 0;
287 1.1 augustss sc->sc_playlocked = 0;
288 1.1 augustss sc->sc_reclocked = 0;
289 1.1 augustss
290 1.1 augustss iw_stop_dma(sc, IW_DMA_PLAYBACK, 1);
291 1.1 augustss iw_stop_dma(sc, IW_DMA_RECORD, 1);
292 1.1 augustss
293 1.1 augustss sc->sc_playdma_cnt = 0;
294 1.1 augustss sc->sc_recdma_cnt = 0;
295 1.1 augustss }
296 1.1 augustss
297 1.1 augustss #define RAM_STEP 64*1024
298 1.1 augustss
299 1.1 augustss static void
300 1.1 augustss iw_mempoke(sc, addy, val)
301 1.1 augustss struct iw_softc *sc;
302 1.1 augustss u_long addy;
303 1.1 augustss u_char val;
304 1.1 augustss {
305 1.1 augustss IW_WRITE_GENERAL_2(LMALI, (u_short) addy);
306 1.1 augustss IW_WRITE_GENERAL_1(LMAHI, (u_char) (addy >> 16));
307 1.1 augustss
308 1.1 augustss /* Write byte to LMBDR */
309 1.1 augustss IW_WRITE_DIRECT_1(sc->p3xr + 7, sc->p3xr_h, val);
310 1.1 augustss }
311 1.1 augustss
312 1.1 augustss static u_char
313 1.1 augustss iw_mempeek(sc, addy)
314 1.1 augustss struct iw_softc *sc;
315 1.1 augustss u_long addy;
316 1.1 augustss {
317 1.1 augustss u_char ret;
318 1.1 augustss
319 1.1 augustss IW_WRITE_GENERAL_2(LMALI, (u_short) addy);
320 1.1 augustss IW_WRITE_GENERAL_1(LMAHI, (u_char) (addy >> 16));
321 1.1 augustss
322 1.1 augustss IW_READ_DIRECT_1(sc->p3xr + 7, sc->p3xr_h, ret);
323 1.1 augustss return ret; /* return byte from LMBDR */
324 1.1 augustss }
325 1.1 augustss
326 1.1 augustss static void
327 1.1 augustss iw_meminit(sc)
328 1.1 augustss struct iw_softc *sc;
329 1.1 augustss {
330 1.1 augustss u_long bank[4] = {0L, 0L, 0L, 0L};
331 1.1 augustss u_long addr = 0L, base = 0L, cnt = 0L;
332 1.1 augustss u_char i, ram = 0 /* ,memval=0 */ ;
333 1.1 augustss u_short lmcfi;
334 1.1 augustss u_long temppi;
335 1.1 augustss u_long *lpbanks = &temppi;
336 1.1 augustss
337 1.1 augustss IW_WRITE_GENERAL_1(LDMACI, 0x00);
338 1.1 augustss
339 1.1 augustss IW_READ_GENERAL_2(LMCFI, lmcfi); /* 0x52 */
340 1.1 augustss lmcfi |= 0x0A0C;
341 1.1 augustss IW_WRITE_GENERAL_2(LMCFI, lmcfi); /* max addr span */
342 1.1 augustss IW_WRITE_GENERAL_1(LMCI, 0x00);
343 1.1 augustss
344 1.1 augustss /* fifo addresses */
345 1.1 augustss
346 1.1 augustss IW_WRITE_GENERAL_2(LMRFAI, ((4 * 1024 * 1024) >> 8));
347 1.1 augustss IW_WRITE_GENERAL_2(LMPFAI, ((4 * 1024 * 1024 + 16 * 1024) >> 8));
348 1.1 augustss
349 1.1 augustss IW_WRITE_GENERAL_2(LMFSI, 0x000);
350 1.1 augustss
351 1.1 augustss IW_WRITE_GENERAL_2(LDICI, 0x0000);
352 1.1 augustss
353 1.1 augustss while (addr < (16 * 1024 * 1024)) {
354 1.1 augustss iw_mempoke(sc, addr, 0x00);
355 1.1 augustss addr += RAM_STEP;
356 1.1 augustss }
357 1.1 augustss
358 1.1 augustss for (i = 0; i < 4; i++) {
359 1.1 augustss iw_mempoke(sc, base, 0xAA); /* mark start of bank */
360 1.1 augustss iw_mempoke(sc, base + 1L, 0x55);
361 1.1 augustss if (iw_mempeek(sc, base) == 0xAA &&
362 1.1 augustss iw_mempeek(sc, base + 1L) == 0x55)
363 1.1 augustss ram = 1;
364 1.1 augustss if (ram) {
365 1.1 augustss while (cnt < (4 * 1024 * 1024)) {
366 1.1 augustss bank[i] += RAM_STEP;
367 1.1 augustss cnt += RAM_STEP;
368 1.1 augustss addr = base + cnt;
369 1.1 augustss if (iw_mempeek(sc, addr) == 0xAA)
370 1.1 augustss break;
371 1.1 augustss }
372 1.1 augustss }
373 1.1 augustss if (lpbanks != NULL) {
374 1.1 augustss *lpbanks = bank[i];
375 1.1 augustss lpbanks++;
376 1.1 augustss }
377 1.1 augustss bank[i] = bank[i] >> 10;
378 1.1 augustss printf("bank[%d] %ldK : ", i, bank[i]);
379 1.1 augustss base += 4 * 1024 * 1024;
380 1.1 augustss cnt = 0L;
381 1.1 augustss ram = 0;
382 1.1 augustss }
383 1.1 augustss
384 1.1 augustss printf("\n");
385 1.1 augustss
386 1.1 augustss /*
387 1.1 augustss * this is not really useful since GUS PnP supports memory
388 1.1 augustss * configurations that aren't really supported by Interwave...beware
389 1.1 augustss * of holes! Also, we don't use the memory for anything in this
390 1.1 augustss * version of the driver.
391 1.1 augustss *
392 1.1 augustss * we've configured for 4M-4M-4M-4M
393 1.1 augustss */
394 1.1 augustss }
395 1.1 augustss
396 1.1 augustss
397 1.1 augustss static
398 1.1 augustss void
399 1.1 augustss iwreset(sc, warm)
400 1.1 augustss struct iw_softc *sc;
401 1.1 augustss int warm;
402 1.1 augustss {
403 1.1 augustss u_char reg, cmode, val = 0, mixer_image = 0;
404 1.1 augustss
405 1.1 augustss reg = 0; /* XXX gcc -Wall */
406 1.1 augustss
407 1.1 augustss cmode = 0x6c; /* enhanced codec mode (full duplex) */
408 1.1 augustss
409 1.1 augustss /* reset */
410 1.1 augustss
411 1.1 augustss IW_WRITE_GENERAL_1(URSTI, 0x00);
412 1.1 augustss delay(10);
413 1.1 augustss IW_WRITE_GENERAL_1(URSTI, 0x07);
414 1.1 augustss IW_WRITE_GENERAL_1(ICMPTI, 0x1f); /* disable DSP and uici and
415 1.1 augustss * udci writes */
416 1.1 augustss IW_WRITE_GENERAL_1(IDECI, 0x7f); /* enable ints to ISA and
417 1.1 augustss * codec access */
418 1.1 augustss IW_READ_GENERAL_1(IVERI, reg);
419 1.1 augustss IW_WRITE_GENERAL_1(IVERI, reg | 0x01); /* hidden reg lock disable */
420 1.1 augustss IW_WRITE_GENERAL_1(UASBCI, 0x00);
421 1.1 augustss
422 1.1 augustss /* synth enhanced mode (default), 0 active voices, disable ints */
423 1.1 augustss
424 1.1 augustss IW_WRITE_GENERAL_1(SGMI_WR, 0x01); /* enhanced mode, LFOs
425 1.1 augustss * disabled */
426 1.1 augustss for (val = 0; val < 32; val++) {
427 1.1 augustss /* set each synth sound volume to 0 */
428 1.1 augustss IW_WRITE_DIRECT_1(sc->p3xr + 2, sc->p3xr_h, val);
429 1.1 augustss IW_WRITE_GENERAL_1(SVSI_WR, 0x00);
430 1.1 augustss IW_WRITE_GENERAL_2(SASLI_WR, 0x0000);
431 1.1 augustss IW_WRITE_GENERAL_2(SASHI_WR, 0x0000);
432 1.1 augustss IW_WRITE_GENERAL_2(SAELI_WR, 0x0000);
433 1.1 augustss IW_WRITE_GENERAL_2(SAEHI_WR, 0x0000);
434 1.1 augustss IW_WRITE_GENERAL_2(SFCI_WR, 0x0000);
435 1.1 augustss IW_WRITE_GENERAL_1(SACI_WR, 0x02);
436 1.1 augustss IW_WRITE_GENERAL_1(SVSI_WR, 0x00);
437 1.1 augustss IW_WRITE_GENERAL_1(SVEI_WR, 0x00);
438 1.1 augustss IW_WRITE_GENERAL_2(SVLI_WR, 0x0000);
439 1.1 augustss IW_WRITE_GENERAL_1(SVCI_WR, 0x02);
440 1.1 augustss IW_WRITE_GENERAL_1(SMSI_WR, 0x02);
441 1.1 augustss }
442 1.1 augustss
443 1.1 augustss IW_WRITE_GENERAL_1(SAVI_WR, 0x00);
444 1.1 augustss
445 1.1 augustss /* codec mode/init */
446 1.1 augustss
447 1.1 augustss /* first change mode to 1 */
448 1.1 augustss
449 1.1 augustss IW_WRITE_CODEC_1(CMODEI, 0x00);
450 1.1 augustss
451 1.1 augustss /* and mode 3 */
452 1.1 augustss
453 1.1 augustss IW_WRITE_CODEC_1(CMODEI, cmode);
454 1.1 augustss
455 1.1 augustss IW_READ_CODEC_1(CMODEI, reg);
456 1.1 augustss
457 1.1 augustss DPRINTF(("cmode %x\n", reg));
458 1.1 augustss
459 1.1 augustss sc->revision = ((reg & 0x80) >> 3) | (reg & 0x0f);
460 1.1 augustss
461 1.1 augustss IW_WRITE_DIRECT_1(sc->codec_index + 2, sc->p2xr_h, 0x00);
462 1.1 augustss
463 1.1 augustss IW_WRITE_CODEC_1(CFIG1I | IW_MCE, 0x00); /* dma 2 chan access */
464 1.1 augustss IW_WRITE_CODEC_1(CEXTI, 0x00); /* disable ints for now */
465 1.1 augustss
466 1.1 augustss
467 1.1 augustss IW_WRITE_CODEC_1(CLPCTI, 0x00); /* reset playback sample counters */
468 1.1 augustss IW_WRITE_CODEC_1(CUPCTI, 0x00); /* always upper byte last */
469 1.1 augustss IW_WRITE_CODEC_1(CFIG2I, 0x80); /* full voltage range, enable record
470 1.1 augustss * and playback sample counters, and
471 1.1 augustss * don't center output in case or
472 1.1 augustss * FIFO underrun */
473 1.1 augustss IW_WRITE_CODEC_1(CFIG3I, 0xc0); /* enable record/playback irq (still
474 1.1 augustss * turned off from CEXTI), max dma
475 1.1 augustss * rate */
476 1.1 augustss IW_WRITE_CODEC_1(CSR3I, 0x00); /* clear status 3 reg */
477 1.1 augustss
478 1.1 augustss
479 1.1 augustss IW_WRITE_CODEC_1(CLRCTI, 0x00); /* reset record sample counters */
480 1.1 augustss IW_WRITE_CODEC_1(CURCTI, 0x00); /* always upper byte last */
481 1.1 augustss
482 1.1 augustss
483 1.1 augustss IW_READ_GENERAL_1(IVERI, reg);
484 1.1 augustss
485 1.1 augustss sc->vers = reg >> 4;
486 1.1 augustss if (!warm)
487 1.1 augustss sprintf(iw_device.version, "%d.%d", sc->vers, sc->revision);
488 1.1 augustss
489 1.1 augustss IW_WRITE_GENERAL_1(IDECI, 0x7f); /* irqs and codec decode
490 1.1 augustss * enable */
491 1.1 augustss
492 1.1 augustss
493 1.1 augustss /* ports */
494 1.1 augustss
495 1.1 augustss if (!warm) {
496 1.1 augustss iw_mixer_line_level(sc, IW_LINE_OUT, 255, 255);
497 1.1 augustss iw_mixer_line_level(sc, IW_LINE_IN, 0, 0);
498 1.1 augustss iw_mixer_line_level(sc, IW_AUX1, 0, 0);
499 1.1 augustss iw_mixer_line_level(sc, IW_AUX2, 200, 200); /* CD */
500 1.1 augustss sc->sc_dac.off = 0;
501 1.1 augustss iw_mixer_line_level(sc, IW_DAC, 200, 200);
502 1.1 augustss
503 1.1 augustss iw_mixer_line_level(sc, IW_MIC_IN, 0, 0);
504 1.1 augustss iw_mixer_line_level(sc, IW_REC, 0, 0);
505 1.1 augustss iw_mixer_line_level(sc, IW_LOOPBACK, 0, 0);
506 1.1 augustss iw_mixer_line_level(sc, IW_MONO_IN, 0, 0);
507 1.1 augustss
508 1.1 augustss /* mem stuff */
509 1.1 augustss iw_meminit(sc);
510 1.1 augustss
511 1.1 augustss }
512 1.1 augustss IW_WRITE_CODEC_1(CEXTI, 0x02); /* codec int enable */
513 1.1 augustss
514 1.1 augustss /* clear _LDMACI */
515 1.1 augustss
516 1.1 augustss IW_WRITE_GENERAL_1(LDMACI, 0x00);
517 1.1 augustss
518 1.1 augustss /* enable mixer paths */
519 1.1 augustss mixer_image = 0x0c;
520 1.1 augustss IW_WRITE_DIRECT_1(sc->p2xr, sc->p2xr_h, mixer_image);
521 1.1 augustss /*
522 1.1 augustss * enable output, line in. disable mic in bit 0 = 0 -> line in on
523 1.1 augustss * (from codec?) bit 1 = 0 -> output on bit 2 = 1 -> mic in on bit 3
524 1.1 augustss * = 1 -> irq&drq pin enable bit 4 = 1 -> channel interrupts to chan
525 1.1 augustss * 1 bit 5 = 1 -> enable midi loop back bit 6 = 0 -> irq latches
526 1.1 augustss * URCR[2:0] bit 6 = 1 -> dma latches URCR[2:0]
527 1.1 augustss */
528 1.1 augustss
529 1.1 augustss
530 1.1 augustss IW_READ_DIRECT_1(sc->p2xr, sc->p2xr_h, mixer_image);
531 1.1 augustss #ifdef AUDIO_DEBUG
532 1.1 augustss if (!warm)
533 1.1 augustss DPRINTF(("mix image %x \n", mixer_image));
534 1.1 augustss #endif
535 1.1 augustss }
536 1.1 augustss
537 1.1 augustss struct iw_codec_freq {
538 1.1 augustss u_long freq;
539 1.1 augustss u_char bits;
540 1.1 augustss };
541 1.1 augustss
542 1.1 augustss int
543 1.1 augustss iw_set_speed(sc, freq, in)
544 1.1 augustss struct iw_softc *sc;
545 1.1 augustss u_long freq;
546 1.1 augustss char in;
547 1.1 augustss {
548 1.1 augustss u_char var, cfig3, reg;
549 1.1 augustss
550 1.1 augustss static struct iw_codec_freq iw_cf[17] = {
551 1.1 augustss #define FREQ_1 24576000
552 1.1 augustss #define FREQ_2 16934400
553 1.1 augustss #define XTAL1 0
554 1.1 augustss #define XTAL2 1
555 1.1 augustss {5510, 0x00 | XTAL2}, {6620, 0x0E | XTAL2},
556 1.1 augustss {8000, 0x00 | XTAL1}, {9600, 0x0E | XTAL1},
557 1.1 augustss {11025, 0x02 | XTAL2}, {16000, 0x02 | XTAL1},
558 1.1 augustss {18900, 0x04 | XTAL2}, {22050, 0x06 | XTAL2},
559 1.1 augustss {27420, 0x04 | XTAL1}, {32000, 0x06 | XTAL1},
560 1.1 augustss {33075, 0x0C | XTAL2}, {37800, 0x08 | XTAL2},
561 1.1 augustss {38400, 0x0A | XTAL1}, {44100, 0x0A | XTAL2},
562 1.1 augustss {44800, 0x08 | XTAL1}, {48000, 0x0C | XTAL1},
563 1.1 augustss {48000, 0x0C | XTAL1} /* really a dummy for indexing later */
564 1.1 augustss #undef XTAL1
565 1.1 augustss #undef XTAL2
566 1.1 augustss };
567 1.1 augustss
568 1.1 augustss cfig3 = 0; /* XXX gcc -Wall */
569 1.1 augustss
570 1.1 augustss /*
571 1.1 augustss * if the frequency is between 3493Hz and 32KHz we can use a more
572 1.1 augustss * accurate frequency than the ones listed above base on the formula
573 1.1 augustss * FREQ/((16*(48+x))) where FREQ is either FREQ_1 (24576000Hz) or
574 1.1 augustss * FREQ_2 (16934400Hz) and x is the value to be written to either
575 1.1 augustss * CPVFI or CRVFI. To enable this option, bit 2 in CFIG3 needs to be
576 1.1 augustss * set high
577 1.1 augustss *
578 1.1 augustss * NOT IMPLEMENTED!
579 1.1 augustss *
580 1.1 augustss * Note that if you have a 'bad' XTAL_1 (higher than 18.5 MHz), 44.8KHz
581 1.1 augustss * and 38.4KHz modes will provide wrong frequencies to output.
582 1.1 augustss */
583 1.1 augustss
584 1.1 augustss
585 1.1 augustss if (freq > 48000)
586 1.1 augustss freq = 48000;
587 1.1 augustss if (freq < 5510)
588 1.1 augustss freq = 5510;
589 1.1 augustss
590 1.1 augustss /* reset CFIG3[2] */
591 1.1 augustss
592 1.1 augustss IW_READ_CODEC_1(CFIG3I, cfig3);
593 1.1 augustss
594 1.1 augustss cfig3 |= 0xc0; /* not full fifo treshhold */
595 1.1 augustss
596 1.1 augustss DPRINTF(("cfig3i = %x -> ", cfig3));
597 1.1 augustss
598 1.1 augustss cfig3 &= ~0x04;
599 1.1 augustss IW_WRITE_CODEC_1(CFIG3I, cfig3);
600 1.1 augustss IW_READ_CODEC_1(CFIG3I, cfig3);
601 1.1 augustss
602 1.1 augustss DPRINTF(("%x\n", cfig3));
603 1.1 augustss
604 1.1 augustss for (var = 0; var < 16; var++) /* select closest frequency */
605 1.1 augustss if (freq <= iw_cf[var].freq)
606 1.1 augustss break;
607 1.1 augustss if (var != 16)
608 1.1 augustss if (abs(freq - iw_cf[var].freq) > abs(iw_cf[var + 1].freq - freq))
609 1.1 augustss var++;
610 1.1 augustss
611 1.1 augustss if (in)
612 1.1 augustss IW_WRITE_CODEC_1(CRDFI | IW_MCE, sc->recfmtbits | iw_cf[var].bits);
613 1.1 augustss else
614 1.1 augustss IW_WRITE_CODEC_1(CPDFI | IW_MCE, sc->playfmtbits | iw_cf[var].bits);
615 1.1 augustss freq = iw_cf[var].freq;
616 1.1 augustss DPRINTF(("setting %s frequency to %d bits %x \n",
617 1.1 augustss in ? "in" : "out", (int) freq, iw_cf[var].bits));
618 1.1 augustss
619 1.1 augustss IW_READ_CODEC_1(CPDFI, reg);
620 1.1 augustss
621 1.1 augustss DPRINTF((" CPDFI %x ", reg));
622 1.1 augustss
623 1.1 augustss IW_READ_CODEC_1(CRDFI, reg);
624 1.1 augustss
625 1.1 augustss DPRINTF((" CRDFI %x ", reg));
626 1.1 augustss
627 1.1 augustss return freq;
628 1.1 augustss }
629 1.1 augustss
630 1.1 augustss /* Encoding. */
631 1.1 augustss int
632 1.1 augustss iw_query_encoding(addr, fp)
633 1.1 augustss void *addr;
634 1.1 augustss struct audio_encoding *fp;
635 1.1 augustss {
636 1.1 augustss /*
637 1.1 augustss * LINEAR, ALAW, ULAW, ADPCM in HW, we'll use linear unsigned
638 1.1 augustss * hardware mode for all 8-bit modes due to buggy (?) codec.
639 1.1 augustss */
640 1.1 augustss
641 1.1 augustss /*
642 1.1 augustss * except in wavetable synth. there we have only ulaw and 8 and 16
643 1.1 augustss * bit linear data
644 1.1 augustss */
645 1.1 augustss
646 1.1 augustss switch (fp->index) {
647 1.1 augustss case 0:
648 1.1 augustss strcpy(fp->name, AudioEulinear);
649 1.1 augustss fp->encoding = AUDIO_ENCODING_ULINEAR_LE;
650 1.1 augustss fp->precision = 8;
651 1.1 augustss fp->flags = 0;
652 1.1 augustss break;
653 1.1 augustss case 1:
654 1.1 augustss strcpy(fp->name, AudioEmulaw);
655 1.1 augustss fp->encoding = AUDIO_ENCODING_ULAW;
656 1.1 augustss fp->precision = 8;
657 1.1 augustss fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
658 1.1 augustss break;
659 1.1 augustss case 2:
660 1.1 augustss strcpy(fp->name, AudioEalaw);
661 1.1 augustss fp->encoding = AUDIO_ENCODING_ALAW;
662 1.1 augustss fp->precision = 8;
663 1.1 augustss fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
664 1.1 augustss break;
665 1.1 augustss case 3:
666 1.1 augustss strcpy(fp->name, AudioEadpcm);
667 1.1 augustss fp->encoding = AUDIO_ENCODING_ADPCM;
668 1.1 augustss fp->precision = 8; /* really 4 bit */
669 1.1 augustss fp->flags = 0;
670 1.1 augustss break;
671 1.1 augustss case 4:
672 1.1 augustss strcpy(fp->name, AudioElinear_le);
673 1.1 augustss fp->encoding = AUDIO_ENCODING_SLINEAR_LE;
674 1.1 augustss fp->precision = 16;
675 1.1 augustss fp->flags = 0;
676 1.1 augustss break;
677 1.1 augustss case 5:
678 1.1 augustss strcpy(fp->name, AudioElinear_be);
679 1.1 augustss fp->encoding = AUDIO_ENCODING_SLINEAR_BE;
680 1.1 augustss fp->precision = 16;
681 1.1 augustss fp->flags = 0;
682 1.1 augustss break;
683 1.1 augustss default:
684 1.1 augustss return (EINVAL);
685 1.1 augustss /* NOTREACHED */
686 1.1 augustss }
687 1.1 augustss return (0);
688 1.1 augustss }
689 1.1 augustss
690 1.1 augustss
691 1.1 augustss
692 1.1 augustss u_long
693 1.1 augustss iw_set_format(sc, precision, in)
694 1.1 augustss struct iw_softc *sc;
695 1.1 augustss u_long precision;
696 1.1 augustss int in;
697 1.1 augustss {
698 1.1 augustss u_char data;
699 1.1 augustss int encoding, channels;
700 1.1 augustss
701 1.1 augustss encoding = in ? sc->rec_encoding : sc->play_encoding;
702 1.1 augustss channels = in ? sc->rec_channels : sc->play_channels;
703 1.1 augustss
704 1.1 augustss DPRINTF(("iw_set_format\n"));
705 1.1 augustss
706 1.1 augustss switch (encoding) {
707 1.1 augustss case AUDIO_ENCODING_ULAW:
708 1.1 augustss data = 0x00;
709 1.1 augustss break;
710 1.1 augustss
711 1.1 augustss case AUDIO_ENCODING_ALAW:
712 1.1 augustss data = 0x00;
713 1.1 augustss break;
714 1.1 augustss
715 1.1 augustss case AUDIO_ENCODING_SLINEAR_LE:
716 1.1 augustss if (precision == 16)
717 1.1 augustss data = 0x40; /* little endian. 0xc0 is big endian */
718 1.1 augustss else
719 1.1 augustss data = 0x00;
720 1.1 augustss break;
721 1.1 augustss
722 1.1 augustss case AUDIO_ENCODING_SLINEAR_BE:
723 1.1 augustss if (precision == 16)
724 1.1 augustss data = 0xc0;
725 1.1 augustss else
726 1.1 augustss data = 0x00;
727 1.1 augustss break;
728 1.1 augustss
729 1.1 augustss case AUDIO_ENCODING_ADPCM:
730 1.1 augustss data = 0xa0;
731 1.1 augustss break;
732 1.1 augustss
733 1.1 augustss default:
734 1.1 augustss return -1;
735 1.1 augustss }
736 1.1 augustss
737 1.1 augustss if (channels == 2)
738 1.1 augustss data |= 0x10; /* stereo */
739 1.1 augustss
740 1.1 augustss if (in) {
741 1.1 augustss /* in */
742 1.1 augustss sc->recfmtbits = data;
743 1.1 augustss /* This will zero the normal codec frequency,
744 1.1 augustss * iw_set_speed should always be called afterwards.
745 1.1 augustss */
746 1.1 augustss IW_WRITE_CODEC_1(CRDFI | IW_MCE, data);
747 1.1 augustss } else {
748 1.1 augustss /* out */
749 1.1 augustss sc->playfmtbits = data;
750 1.1 augustss IW_WRITE_CODEC_1(CPDFI | IW_MCE, data);
751 1.1 augustss }
752 1.1 augustss
753 1.1 augustss DPRINTF(("formatbits %s %x", in ? "in" : "out", data));
754 1.1 augustss
755 1.1 augustss return encoding;
756 1.1 augustss }
757 1.1 augustss
758 1.1 augustss
759 1.1 augustss
760 1.1 augustss int
761 1.1 augustss iw_set_params(addr, setmode, usemode, p, q)
762 1.1 augustss void *addr;
763 1.1 augustss int setmode;
764 1.1 augustss int usemode;
765 1.1 augustss struct audio_params *p;
766 1.1 augustss struct audio_params *q;
767 1.1 augustss {
768 1.1 augustss struct iw_softc *sc = addr;
769 1.1 augustss void (*swcode)__P((void *, u_char * buf, int cnt)) = NULL;
770 1.1 augustss int factor = 1;
771 1.1 augustss DPRINTF(("iw_setparams: code %d, prec %d, rate %d, chan %d\n",
772 1.1 augustss (int) p->encoding, (int) p->precision, (int) p->sample_rate,
773 1.1 augustss (int) p->channels));
774 1.1 augustss
775 1.1 augustss
776 1.1 augustss switch (p->encoding) {
777 1.1 augustss case AUDIO_ENCODING_ULAW:
778 1.1 augustss if (p->precision != 8)
779 1.1 augustss return EINVAL;
780 1.1 augustss swcode = setmode & AUMODE_PLAY ? mulaw_to_ulinear8 : ulinear8_to_mulaw;
781 1.1 augustss factor = 1;
782 1.1 augustss break;
783 1.1 augustss case AUDIO_ENCODING_ALAW:
784 1.1 augustss if (p->precision != 8)
785 1.1 augustss return EINVAL;
786 1.1 augustss swcode = setmode & AUMODE_PLAY ? alaw_to_ulinear8 : ulinear8_to_alaw;
787 1.1 augustss factor = 1;
788 1.1 augustss break;
789 1.1 augustss case AUDIO_ENCODING_ADPCM:
790 1.1 augustss if (p->precision != 8)
791 1.1 augustss return EINVAL;
792 1.1 augustss else
793 1.1 augustss break;
794 1.1 augustss
795 1.1 augustss case AUDIO_ENCODING_SLINEAR_LE:
796 1.1 augustss case AUDIO_ENCODING_SLINEAR_BE:
797 1.1 augustss if (p->precision != 8 && p->precision != 16)
798 1.1 augustss return EINVAL;
799 1.1 augustss else
800 1.1 augustss break;
801 1.1 augustss
802 1.1 augustss default:
803 1.1 augustss return EINVAL;
804 1.1 augustss
805 1.1 augustss }
806 1.1 augustss
807 1.1 augustss if (setmode & AUMODE_PLAY) {
808 1.1 augustss sc->play_channels = p->channels;
809 1.1 augustss sc->play_encoding = p->encoding;
810 1.1 augustss sc->play_precision = p->precision;
811 1.1 augustss p->factor = factor;
812 1.1 augustss p->sw_code = swcode;
813 1.1 augustss iw_set_format(sc, p->precision, 0);
814 1.1 augustss q->sample_rate = p->sample_rate = sc->sc_orate =
815 1.1 augustss iw_set_speed(sc, p->sample_rate, 0);
816 1.1 augustss } else {
817 1.1 augustss #if 0
818 1.1 augustss q->channels = sc->rec_channels = p->channels;
819 1.1 augustss q->encoding = sc->rec_encoding = p->encoding;
820 1.1 augustss q->precision = sc->rec_precision = p->precision;
821 1.1 augustss #endif
822 1.1 augustss sc->rec_channels = q->channels;
823 1.1 augustss sc->rec_encoding = q->encoding;
824 1.1 augustss sc->rec_precision = q->precision;
825 1.1 augustss q->factor = factor;
826 1.1 augustss q->sw_code = swcode;
827 1.1 augustss
828 1.1 augustss iw_set_format(sc, p->precision, 1);
829 1.1 augustss q->sample_rate = sc->sc_irate =
830 1.1 augustss iw_set_speed(sc, q->sample_rate, 1);
831 1.1 augustss }
832 1.1 augustss return 0;
833 1.1 augustss }
834 1.1 augustss
835 1.1 augustss
836 1.1 augustss int
837 1.1 augustss iw_round_blocksize(addr, blk)
838 1.1 augustss void *addr;
839 1.1 augustss int blk;
840 1.1 augustss {
841 1.1 augustss /* Round to a multiple of the biggest sample size. */
842 1.1 augustss return blk &= -4;
843 1.1 augustss }
844 1.1 augustss
845 1.1 augustss void
846 1.1 augustss iw_mixer_line_level(sc, line, levl, levr)
847 1.1 augustss struct iw_softc *sc;
848 1.1 augustss int line;
849 1.1 augustss int levl, levr;
850 1.1 augustss {
851 1.1 augustss u_char gainl, gainr, attenl, attenr;
852 1.1 augustss
853 1.1 augustss switch (line) {
854 1.1 augustss case IW_REC:
855 1.1 augustss gainl = sc->sc_recsrcbits | (levl >> 4);
856 1.1 augustss gainr = sc->sc_recsrcbits | (levr >> 4);
857 1.1 augustss DPRINTF(("recording with %x", gainl));
858 1.1 augustss IW_WRITE_CODEC_1(CLICI, gainl);
859 1.1 augustss IW_WRITE_CODEC_1(CRICI, gainr);
860 1.1 augustss sc->sc_rec.voll = levl & 0xf0;
861 1.1 augustss sc->sc_rec.volr = levr & 0xf0;
862 1.1 augustss break;
863 1.1 augustss
864 1.1 augustss case IW_AUX1:
865 1.1 augustss
866 1.1 augustss gainl = (255 - levl) >> 3;
867 1.1 augustss gainr = (255 - levr) >> 3;
868 1.1 augustss
869 1.1 augustss /* mute if 0 level */
870 1.1 augustss if (levl == 0)
871 1.1 augustss gainl |= 0x80;
872 1.1 augustss if (levr == 0)
873 1.1 augustss gainr |= 0x80;
874 1.1 augustss
875 1.1 augustss IW_WRITE_CODEC_1(IW_LEFT_AUX1_PORT, gainl);
876 1.1 augustss IW_WRITE_CODEC_1(IW_RIGHT_AUX1_PORT, gainr);
877 1.1 augustss sc->sc_aux1.voll = levl & 0xf8;
878 1.1 augustss sc->sc_aux1.volr = levr & 0xf8;
879 1.1 augustss
880 1.1 augustss break;
881 1.1 augustss
882 1.1 augustss case IW_AUX2:
883 1.1 augustss
884 1.1 augustss gainl = (255 - levl) >> 3;
885 1.1 augustss gainr = (255 - levr) >> 3;
886 1.1 augustss
887 1.1 augustss /* mute if 0 level */
888 1.1 augustss if (levl == 0)
889 1.1 augustss gainl |= 0x80;
890 1.1 augustss if (levr == 0)
891 1.1 augustss gainr |= 0x80;
892 1.1 augustss
893 1.1 augustss IW_WRITE_CODEC_1(IW_LEFT_AUX2_PORT, gainl);
894 1.1 augustss IW_WRITE_CODEC_1(IW_RIGHT_AUX2_PORT, gainr);
895 1.1 augustss sc->sc_aux2.voll = levl & 0xf8;
896 1.1 augustss sc->sc_aux2.volr = levr & 0xf8;
897 1.1 augustss break;
898 1.1 augustss case IW_DAC:
899 1.1 augustss attenl = ((255 - levl) >> 2) | ((levl && !sc->sc_dac.off) ? 0 : 0x80);
900 1.1 augustss attenr = ((255 - levr) >> 2) | ((levr && !sc->sc_dac.off) ? 0 : 0x80);
901 1.1 augustss IW_WRITE_CODEC_1(CLDACI, attenl);
902 1.1 augustss IW_WRITE_CODEC_1(CRDACI, attenr);
903 1.1 augustss sc->sc_dac.voll = levl & 0xfc;
904 1.1 augustss sc->sc_dac.volr = levr & 0xfc;
905 1.1 augustss break;
906 1.1 augustss case IW_LOOPBACK:
907 1.1 augustss attenl = ((255 - levl) & 0xfc) | (levl ? 0x01 : 0);
908 1.1 augustss IW_WRITE_CODEC_1(CLCI, attenl);
909 1.1 augustss sc->sc_loopback.voll = levl & 0xfc;
910 1.1 augustss break;
911 1.1 augustss case IW_LINE_IN:
912 1.1 augustss gainl = (levl >> 3) | (levl ? 0 : 0x80);
913 1.1 augustss gainr = (levr >> 3) | (levr ? 0 : 0x80);
914 1.1 augustss IW_WRITE_CODEC_1(CLLICI, gainl);
915 1.1 augustss IW_WRITE_CODEC_1(CRLICI, gainr);
916 1.1 augustss sc->sc_linein.voll = levl & 0xf8;
917 1.1 augustss sc->sc_linein.volr = levr & 0xf8;
918 1.1 augustss break;
919 1.1 augustss case IW_MIC_IN:
920 1.1 augustss gainl = ((255 - levl) >> 3) | (levl ? 0 : 0x80);
921 1.1 augustss gainr = ((255 - levr) >> 3) | (levr ? 0 : 0x80);
922 1.1 augustss IW_WRITE_CODEC_1(CLMICI, gainl);
923 1.1 augustss IW_WRITE_CODEC_1(CRMICI, gainr);
924 1.1 augustss sc->sc_mic.voll = levl & 0xf8;
925 1.1 augustss sc->sc_mic.volr = levr & 0xf8;
926 1.1 augustss break;
927 1.1 augustss case IW_LINE_OUT:
928 1.1 augustss attenl = ((255 - levl) >> 3) | (levl ? 0 : 0x80);
929 1.1 augustss attenr = ((255 - levr) >> 3) | (levr ? 0 : 0x80);
930 1.1 augustss IW_WRITE_CODEC_1(CLOAI, attenl);
931 1.1 augustss IW_WRITE_CODEC_1(CROAI, attenr);
932 1.1 augustss sc->sc_lineout.voll = levl & 0xf8;
933 1.1 augustss sc->sc_lineout.volr = levr & 0xf8;
934 1.1 augustss break;
935 1.1 augustss case IW_MONO_IN:
936 1.1 augustss attenl = ((255 - levl) >> 4) | (levl ? 0 : 0xc0); /* in/out mute */
937 1.1 augustss IW_WRITE_CODEC_1(CMONOI, attenl);
938 1.1 augustss sc->sc_monoin.voll = levl & 0xf0;
939 1.1 augustss break;
940 1.1 augustss }
941 1.1 augustss }
942 1.1 augustss
943 1.1 augustss int
944 1.1 augustss iw_set_out_port(addr, port)
945 1.1 augustss void *addr;
946 1.1 augustss int port;
947 1.1 augustss {
948 1.1 augustss struct iw_softc *sc = addr;
949 1.1 augustss
950 1.1 augustss if (port != IW_OUTPORT)
951 1.1 augustss return EINVAL;
952 1.1 augustss
953 1.1 augustss sc->out_port = port;
954 1.1 augustss return 0; /* gotta check if this is correct */
955 1.1 augustss }
956 1.1 augustss
957 1.1 augustss
958 1.1 augustss int
959 1.1 augustss iw_get_out_port(addr)
960 1.1 augustss void *addr;
961 1.1 augustss {
962 1.1 augustss struct iw_softc *sc = addr;
963 1.1 augustss
964 1.1 augustss return sc->out_port;
965 1.1 augustss }
966 1.1 augustss
967 1.1 augustss
968 1.1 augustss int
969 1.1 augustss iw_set_in_port(addr, port)
970 1.1 augustss void *addr;
971 1.1 augustss int port;
972 1.1 augustss {
973 1.1 augustss struct iw_softc *sc = addr;
974 1.1 augustss
975 1.1 augustss if (port != IW_MIX_OUT_SRC || port != IW_MIC_IN_SRC ||
976 1.1 augustss port != IW_AUX1_SRC || port != IW_LINE_IN_SRC)
977 1.1 augustss return EINVAL;
978 1.1 augustss
979 1.1 augustss sc->sc_recsrcbits = (u_char) port << 6;
980 1.1 augustss iw_mixer_line_level(sc, IW_REC, sc->sc_rec.voll, sc->sc_rec.volr);
981 1.1 augustss
982 1.1 augustss return 0;
983 1.1 augustss }
984 1.1 augustss
985 1.1 augustss
986 1.1 augustss int
987 1.1 augustss iw_get_in_port(addr)
988 1.1 augustss void *addr;
989 1.1 augustss {
990 1.1 augustss struct iw_softc *sc = addr;
991 1.1 augustss
992 1.1 augustss return sc->in_port;
993 1.1 augustss }
994 1.1 augustss
995 1.1 augustss
996 1.1 augustss int
997 1.1 augustss iw_commit_settings(addr)
998 1.1 augustss void *addr;
999 1.1 augustss {
1000 1.1 augustss return 0;
1001 1.1 augustss }
1002 1.1 augustss
1003 1.1 augustss
1004 1.1 augustss void
1005 1.1 augustss iw_trigger_dma(sc, io)
1006 1.1 augustss struct iw_softc *sc;
1007 1.1 augustss u_char io;
1008 1.1 augustss {
1009 1.1 augustss u_char reg;
1010 1.1 augustss int s;
1011 1.1 augustss
1012 1.1 augustss s = splaudio();
1013 1.1 augustss
1014 1.1 augustss IW_READ_CODEC_1(CSR3I, reg);
1015 1.1 augustss IW_WRITE_CODEC_1(CSR3I, reg & ~(io == IW_DMA_PLAYBACK ? 0x10 : 0x20));
1016 1.1 augustss
1017 1.1 augustss IW_READ_CODEC_1(CFIG1I, reg);
1018 1.1 augustss
1019 1.1 augustss IW_WRITE_CODEC_1(CFIG1I, reg | io);
1020 1.1 augustss
1021 1.1 augustss /* let the counter run */
1022 1.1 augustss IW_READ_CODEC_1(CFIG2I, reg);
1023 1.1 augustss IW_WRITE_CODEC_1(CFIG2I, reg & ~(io << 4));
1024 1.1 augustss
1025 1.1 augustss splx(s);
1026 1.1 augustss }
1027 1.1 augustss
1028 1.1 augustss void
1029 1.1 augustss iw_stop_dma(sc, io, hard)
1030 1.1 augustss struct iw_softc *sc;
1031 1.1 augustss u_char io, hard;
1032 1.1 augustss {
1033 1.1 augustss u_char reg;
1034 1.1 augustss
1035 1.1 augustss /* just stop the counter, no need to flush the fifo */
1036 1.1 augustss IW_READ_CODEC_1(CFIG2I, reg);
1037 1.1 augustss IW_WRITE_CODEC_1(CFIG2I, (reg | (io << 4)));
1038 1.1 augustss
1039 1.1 augustss if (hard) {
1040 1.1 augustss /* unless we're closing the device */
1041 1.1 augustss IW_READ_CODEC_1(CFIG1I, reg);
1042 1.1 augustss IW_WRITE_CODEC_1(CFIG1I, reg & ~io);
1043 1.1 augustss }
1044 1.1 augustss }
1045 1.1 augustss
1046 1.1 augustss void
1047 1.1 augustss iw_dma_count(sc, count, io)
1048 1.1 augustss struct iw_softc *sc;
1049 1.1 augustss u_short count;
1050 1.1 augustss int io;
1051 1.1 augustss {
1052 1.1 augustss if (io == IW_DMA_PLAYBACK) {
1053 1.1 augustss IW_WRITE_CODEC_1(CLPCTI, (u_char) (count & 0x00ff));
1054 1.1 augustss IW_WRITE_CODEC_1(CUPCTI, (u_char) ((count >> 8) & 0x00ff));
1055 1.1 augustss } else {
1056 1.1 augustss IW_WRITE_CODEC_1(CLRCTI, (u_char) (count & 0x00ff));
1057 1.1 augustss IW_WRITE_CODEC_1(CURCTI, (u_char) ((count >> 8) & 0x00ff));
1058 1.1 augustss }
1059 1.1 augustss }
1060 1.1 augustss
1061 1.1 augustss int
1062 1.1 augustss iw_init_output(addr, buf, cc)
1063 1.1 augustss void *addr;
1064 1.1 augustss void *buf;
1065 1.1 augustss int cc;
1066 1.1 augustss {
1067 1.1 augustss struct iw_softc *sc = (struct iw_softc *) addr;
1068 1.1 augustss
1069 1.1 augustss DPRINTF(("iw_init_output\n"));
1070 1.1 augustss
1071 1.1 augustss isa_dmastart(sc->sc_isa, sc->sc_playdrq, buf,
1072 1.1 augustss cc, NULL, DMAMODE_WRITE | DMAMODE_LOOP, BUS_DMA_NOWAIT);
1073 1.1 augustss return 0;
1074 1.1 augustss }
1075 1.1 augustss
1076 1.1 augustss int
1077 1.1 augustss iw_init_input(addr, buf, cc)
1078 1.1 augustss void *addr;
1079 1.1 augustss void *buf;
1080 1.1 augustss int cc;
1081 1.1 augustss {
1082 1.1 augustss struct iw_softc *sc = (struct iw_softc *) addr;
1083 1.1 augustss
1084 1.1 augustss DPRINTF(("iw_init_input\n"));
1085 1.1 augustss
1086 1.1 augustss isa_dmastart(sc->sc_isa, sc->sc_playdrq, buf,
1087 1.1 augustss cc, NULL, DMAMODE_READ | DMAMODE_LOOP, BUS_DMA_NOWAIT);
1088 1.1 augustss return 0;
1089 1.1 augustss }
1090 1.1 augustss
1091 1.1 augustss
1092 1.1 augustss int
1093 1.1 augustss iw_start_output(addr, p, cc, intr, arg)
1094 1.1 augustss void *addr;
1095 1.1 augustss void *p;
1096 1.1 augustss int cc;
1097 1.1 augustss void (*intr)__P((void *));
1098 1.1 augustss void *arg;
1099 1.1 augustss {
1100 1.1 augustss struct iw_softc *sc = addr;
1101 1.1 augustss int counter;
1102 1.1 augustss
1103 1.1 augustss #ifdef AUDIO_DEBUG
1104 1.1 augustss if (sc->sc_playlocked) {
1105 1.1 augustss DPRINTF(("iw_start_output: playback dma already going on\n"));
1106 1.1 augustss /* return 0; */
1107 1.1 augustss }
1108 1.1 augustss #endif
1109 1.1 augustss
1110 1.1 augustss sc->sc_playlocked = 1;
1111 1.1 augustss #ifdef DIAGNOSTIC
1112 1.1 augustss if (!intr) {
1113 1.1 augustss printf("iw_start_output: no callback!\n");
1114 1.1 augustss return 1;
1115 1.1 augustss }
1116 1.1 augustss #endif
1117 1.1 augustss
1118 1.1 augustss sc->sc_playintr = intr;
1119 1.1 augustss sc->sc_playarg = arg;
1120 1.1 augustss sc->sc_dma_flags |= DMAMODE_WRITE;
1121 1.1 augustss sc->sc_playdma_bp = p;
1122 1.1 augustss
1123 1.1 augustss counter = 0;
1124 1.1 augustss
1125 1.1 augustss isa_dmastart(sc->sc_isa, sc->sc_playdrq, sc->sc_playdma_bp,
1126 1.1 augustss cc, NULL, DMAMODE_WRITE, BUS_DMA_NOWAIT);
1127 1.1 augustss
1128 1.1 augustss
1129 1.1 augustss if (sc->play_encoding == AUDIO_ENCODING_ADPCM)
1130 1.1 augustss cc >>= 2;
1131 1.1 augustss if (sc->play_precision == 16)
1132 1.1 augustss cc >>= 1;
1133 1.1 augustss
1134 1.1 augustss
1135 1.1 augustss if (sc->play_channels == 2 && sc->play_encoding != AUDIO_ENCODING_ADPCM)
1136 1.1 augustss cc >>= 1;
1137 1.1 augustss
1138 1.1 augustss cc -= iw_cc;
1139 1.1 augustss
1140 1.1 augustss
1141 1.1 augustss /* iw_dma_access(sc,1); */
1142 1.1 augustss if (cc != sc->sc_playdma_cnt) {
1143 1.1 augustss iw_dma_count(sc, (u_short) cc, IW_DMA_PLAYBACK);
1144 1.1 augustss sc->sc_playdma_cnt = cc;
1145 1.1 augustss
1146 1.1 augustss iw_trigger_dma(sc, IW_DMA_PLAYBACK);
1147 1.1 augustss }
1148 1.1 augustss
1149 1.1 augustss #ifdef DIAGNOSTIC
1150 1.1 augustss if (outputs != iw_ints)
1151 1.1 augustss printf("iw_start_output: out %d, int %d\n", outputs, iw_ints);
1152 1.1 augustss outputs++;
1153 1.1 augustss #endif
1154 1.1 augustss return 0;
1155 1.1 augustss }
1156 1.1 augustss
1157 1.1 augustss
1158 1.1 augustss int
1159 1.1 augustss iw_start_input(addr, p, cc, intr, arg)
1160 1.1 augustss void *addr;
1161 1.1 augustss void *p;
1162 1.1 augustss int cc;
1163 1.1 augustss void (*intr)__P((void *));
1164 1.1 augustss void *arg;
1165 1.1 augustss {
1166 1.1 augustss struct iw_softc *sc = addr;
1167 1.1 augustss int counter;
1168 1.1 augustss
1169 1.1 augustss #if AUDIO_DEBUG
1170 1.1 augustss if (sc->sc_reclocked) {
1171 1.1 augustss DPRINTF(("iw_start_input: record dma already going on\n"));
1172 1.1 augustss /* return 0; */
1173 1.1 augustss }
1174 1.1 augustss #endif
1175 1.1 augustss
1176 1.1 augustss sc->sc_reclocked = 1;
1177 1.1 augustss #ifdef DIAGNOSTIC
1178 1.1 augustss if (!intr) {
1179 1.1 augustss printf("iw_start_input: no callback!\n");
1180 1.1 augustss return 1;
1181 1.1 augustss }
1182 1.1 augustss #endif
1183 1.1 augustss
1184 1.1 augustss
1185 1.1 augustss sc->sc_recintr = intr;
1186 1.1 augustss sc->sc_recarg = arg;
1187 1.1 augustss sc->sc_dma_flags |= DMAMODE_READ;
1188 1.1 augustss sc->sc_recdma_bp = p;
1189 1.1 augustss
1190 1.1 augustss counter = 0;
1191 1.1 augustss
1192 1.1 augustss isa_dmastart(sc->sc_isa, sc->sc_recdrq, sc->sc_recdma_bp,
1193 1.1 augustss cc, NULL, DMAMODE_READ, BUS_DMA_NOWAIT);
1194 1.1 augustss
1195 1.1 augustss
1196 1.1 augustss if (sc->rec_encoding == AUDIO_ENCODING_ADPCM) {
1197 1.1 augustss cc >>= 2;
1198 1.1 augustss }
1199 1.1 augustss if (sc->rec_precision == 16)
1200 1.1 augustss cc >>= 1;
1201 1.1 augustss
1202 1.1 augustss if (sc->rec_channels == 2 && sc->rec_encoding != AUDIO_ENCODING_ADPCM)
1203 1.1 augustss cc >>= 1;
1204 1.1 augustss
1205 1.1 augustss cc -= iw_cc;
1206 1.1 augustss
1207 1.1 augustss /* iw_dma_access(sc,0); */
1208 1.1 augustss if (sc->sc_recdma_cnt != cc) {
1209 1.1 augustss iw_dma_count(sc, (u_short) cc, IW_DMA_RECORD);
1210 1.1 augustss sc->sc_recdma_cnt = cc;
1211 1.1 augustss /* iw_dma_ctrl(sc, IW_DMA_RECORD); */
1212 1.1 augustss iw_trigger_dma(sc, IW_DMA_RECORD);
1213 1.1 augustss }
1214 1.1 augustss
1215 1.1 augustss #ifdef DIAGNOSTIC
1216 1.1 augustss if ((inputs != iw_inints))
1217 1.1 augustss printf("iw_start_input: in %d, inints %d\n", inputs, iw_inints);
1218 1.1 augustss inputs++;
1219 1.1 augustss #endif
1220 1.1 augustss
1221 1.1 augustss return 0;
1222 1.1 augustss }
1223 1.1 augustss
1224 1.1 augustss
1225 1.1 augustss int
1226 1.1 augustss iw_halt_output(addr)
1227 1.1 augustss void *addr;
1228 1.1 augustss {
1229 1.1 augustss struct iw_softc *sc = addr;
1230 1.1 augustss iw_stop_dma(sc, IW_DMA_PLAYBACK, 0);
1231 1.1 augustss /* sc->sc_playlocked = 0; */
1232 1.1 augustss return 0;
1233 1.1 augustss }
1234 1.1 augustss
1235 1.1 augustss
1236 1.1 augustss int
1237 1.1 augustss iw_halt_input(addr)
1238 1.1 augustss void *addr;
1239 1.1 augustss {
1240 1.1 augustss struct iw_softc *sc = addr;
1241 1.1 augustss iw_stop_dma(sc, IW_DMA_RECORD, 0);
1242 1.1 augustss /* sc->sc_reclocked = 0; */
1243 1.1 augustss return 0;
1244 1.1 augustss }
1245 1.1 augustss
1246 1.1 augustss
1247 1.1 augustss int
1248 1.1 augustss iw_cont_output(addr)
1249 1.1 augustss void *addr;
1250 1.1 augustss {
1251 1.1 augustss struct iw_softc *sc = addr;
1252 1.1 augustss #if IW_PIO
1253 1.1 augustss iw_enable_path(sc, IW_DMA_PLAYBACK);
1254 1.1 augustss #else
1255 1.1 augustss iw_trigger_dma(sc, IW_DMA_PLAYBACK);
1256 1.1 augustss #endif
1257 1.1 augustss sc->sc_playlocked = 1;
1258 1.1 augustss return 0;
1259 1.1 augustss }
1260 1.1 augustss
1261 1.1 augustss
1262 1.1 augustss int
1263 1.1 augustss iw_cont_input(addr)
1264 1.1 augustss void *addr;
1265 1.1 augustss {
1266 1.1 augustss struct iw_softc *sc = addr;
1267 1.1 augustss
1268 1.1 augustss #if IW_PIO
1269 1.1 augustss iw_enable_path(sc, IW_DMA_RECORD);
1270 1.1 augustss #else
1271 1.1 augustss iw_trigger_dma(sc, IW_DMA_RECORD);
1272 1.1 augustss #endif
1273 1.1 augustss sc->sc_reclocked = 1;
1274 1.1 augustss return 0;
1275 1.1 augustss }
1276 1.1 augustss
1277 1.1 augustss
1278 1.1 augustss int
1279 1.1 augustss iw_speaker_ctl(addr, newstate)
1280 1.1 augustss void *addr;
1281 1.1 augustss int newstate;
1282 1.1 augustss {
1283 1.1 augustss struct iw_softc *sc = addr;
1284 1.1 augustss u_char reg;
1285 1.1 augustss if (newstate == SPKR_ON) {
1286 1.1 augustss sc->sc_dac.off = 0;
1287 1.1 augustss IW_READ_CODEC_1(CLDACI, reg);
1288 1.1 augustss IW_WRITE_CODEC_1(CLDACI, reg & 0x7f);
1289 1.1 augustss IW_READ_CODEC_1(CRDACI, reg);
1290 1.1 augustss IW_WRITE_CODEC_1(CRDACI, reg & 0x7f);
1291 1.1 augustss } else {
1292 1.1 augustss /* SPKR_OFF */
1293 1.1 augustss sc->sc_dac.off = 1;
1294 1.1 augustss IW_READ_CODEC_1(CLDACI, reg);
1295 1.1 augustss IW_WRITE_CODEC_1(CLDACI, reg | 0x80);
1296 1.1 augustss IW_READ_CODEC_1(CRDACI, reg);
1297 1.1 augustss IW_WRITE_CODEC_1(CRDACI, reg | 0x80);
1298 1.1 augustss }
1299 1.1 augustss return 0;
1300 1.1 augustss }
1301 1.1 augustss
1302 1.1 augustss
1303 1.1 augustss int
1304 1.1 augustss iw_getdev(addr, retp)
1305 1.1 augustss void *addr;
1306 1.1 augustss struct audio_device *retp;
1307 1.1 augustss {
1308 1.1 augustss *retp = iw_device;
1309 1.1 augustss return 0;
1310 1.1 augustss }
1311 1.1 augustss
1312 1.1 augustss
1313 1.1 augustss int
1314 1.1 augustss iw_setfd(addr, flag)
1315 1.1 augustss void *addr;
1316 1.1 augustss int flag;
1317 1.1 augustss {
1318 1.1 augustss return 0;
1319 1.1 augustss }
1320 1.1 augustss
1321 1.1 augustss
1322 1.1 augustss /* Mixer (in/out ports) */
1323 1.1 augustss int
1324 1.1 augustss iw_set_port(addr, cp)
1325 1.1 augustss void *addr;
1326 1.1 augustss mixer_ctrl_t *cp;
1327 1.1 augustss {
1328 1.1 augustss struct iw_softc *sc = addr;
1329 1.1 augustss u_char vall = 0, valr = 0;
1330 1.1 augustss int error = EINVAL;
1331 1.1 augustss
1332 1.1 augustss switch (cp->dev) {
1333 1.1 augustss case IW_MIC_IN_LVL:
1334 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1335 1.1 augustss error = 0;
1336 1.1 augustss if (cp->un.value.num_channels == 1) {
1337 1.1 augustss vall = valr = cp->un.value.level[0];
1338 1.1 augustss } else {
1339 1.1 augustss vall = cp->un.value.level[0];
1340 1.1 augustss valr = cp->un.value.level[1];
1341 1.1 augustss }
1342 1.1 augustss sc->sc_mic.voll = vall;
1343 1.1 augustss sc->sc_mic.volr = valr;
1344 1.1 augustss iw_mixer_line_level(sc, IW_MIC_IN, vall, valr);
1345 1.1 augustss }
1346 1.1 augustss break;
1347 1.1 augustss case IW_AUX1_LVL:
1348 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1349 1.1 augustss error = 0;
1350 1.1 augustss if (cp->un.value.num_channels == 1) {
1351 1.1 augustss vall = valr = cp->un.value.level[0];
1352 1.1 augustss } else {
1353 1.1 augustss vall = cp->un.value.level[0];
1354 1.1 augustss valr = cp->un.value.level[1];
1355 1.1 augustss }
1356 1.1 augustss sc->sc_aux1.voll = vall;
1357 1.1 augustss sc->sc_aux1.volr = valr;
1358 1.1 augustss iw_mixer_line_level(sc, IW_AUX1, vall, valr);
1359 1.1 augustss }
1360 1.1 augustss break;
1361 1.1 augustss case IW_AUX2_LVL:
1362 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1363 1.1 augustss error = 0;
1364 1.1 augustss if (cp->un.value.num_channels == 1) {
1365 1.1 augustss vall = valr = cp->un.value.level[0];
1366 1.1 augustss } else {
1367 1.1 augustss vall = cp->un.value.level[0];
1368 1.1 augustss valr = cp->un.value.level[1];
1369 1.1 augustss }
1370 1.1 augustss sc->sc_aux2.voll = vall;
1371 1.1 augustss sc->sc_aux2.volr = valr;
1372 1.1 augustss iw_mixer_line_level(sc, IW_AUX2, vall, valr);
1373 1.1 augustss }
1374 1.1 augustss break;
1375 1.1 augustss case IW_LINE_IN_LVL:
1376 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1377 1.1 augustss error = 0;
1378 1.1 augustss if (cp->un.value.num_channels == 1) {
1379 1.1 augustss vall = valr = cp->un.value.level[0];
1380 1.1 augustss } else {
1381 1.1 augustss vall = cp->un.value.level[0];
1382 1.1 augustss valr = cp->un.value.level[1];
1383 1.1 augustss }
1384 1.1 augustss sc->sc_linein.voll = vall;
1385 1.1 augustss sc->sc_linein.volr = valr;
1386 1.1 augustss iw_mixer_line_level(sc, IW_LINE_IN, vall, valr);
1387 1.1 augustss }
1388 1.1 augustss break;
1389 1.1 augustss case IW_LINE_OUT_LVL:
1390 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1391 1.1 augustss error = 0;
1392 1.1 augustss if (cp->un.value.num_channels == 1) {
1393 1.1 augustss vall = valr = cp->un.value.level[0];
1394 1.1 augustss } else {
1395 1.1 augustss vall = cp->un.value.level[0];
1396 1.1 augustss valr = cp->un.value.level[1];
1397 1.1 augustss }
1398 1.1 augustss sc->sc_lineout.voll = vall;
1399 1.1 augustss sc->sc_lineout.volr = valr;
1400 1.1 augustss iw_mixer_line_level(sc, IW_LINE_OUT, vall, valr);
1401 1.1 augustss }
1402 1.1 augustss break;
1403 1.1 augustss case IW_REC_LVL:
1404 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1405 1.1 augustss error = 0;
1406 1.1 augustss if (cp->un.value.num_channels == 1) {
1407 1.1 augustss vall = valr = cp->un.value.level[0];
1408 1.1 augustss } else {
1409 1.1 augustss vall = cp->un.value.level[0];
1410 1.1 augustss valr = cp->un.value.level[1];
1411 1.1 augustss }
1412 1.1 augustss sc->sc_rec.voll = vall;
1413 1.1 augustss sc->sc_rec.volr = valr;
1414 1.1 augustss iw_mixer_line_level(sc, IW_REC, vall, valr);
1415 1.1 augustss }
1416 1.1 augustss break;
1417 1.1 augustss
1418 1.1 augustss case IW_DAC_LVL:
1419 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1420 1.1 augustss error = 0;
1421 1.1 augustss if (cp->un.value.num_channels == 1) {
1422 1.1 augustss vall = valr = cp->un.value.level[0];
1423 1.1 augustss } else {
1424 1.1 augustss vall = cp->un.value.level[0];
1425 1.1 augustss valr = cp->un.value.level[1];
1426 1.1 augustss }
1427 1.1 augustss sc->sc_dac.voll = vall;
1428 1.1 augustss sc->sc_dac.volr = valr;
1429 1.1 augustss iw_mixer_line_level(sc, IW_DAC, vall, valr);
1430 1.1 augustss }
1431 1.1 augustss break;
1432 1.1 augustss
1433 1.1 augustss case IW_LOOPBACK_LVL:
1434 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1435 1.1 augustss error = 0;
1436 1.1 augustss if (cp->un.value.num_channels != 1) {
1437 1.1 augustss return EINVAL;
1438 1.1 augustss } else {
1439 1.1 augustss valr = vall = cp->un.value.level[0];
1440 1.1 augustss }
1441 1.1 augustss sc->sc_loopback.voll = vall;
1442 1.1 augustss sc->sc_loopback.volr = valr;
1443 1.1 augustss iw_mixer_line_level(sc, IW_LOOPBACK, vall, valr);
1444 1.1 augustss }
1445 1.1 augustss break;
1446 1.1 augustss
1447 1.1 augustss case IW_MONO_IN_LVL:
1448 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1449 1.1 augustss error = 0;
1450 1.1 augustss if (cp->un.value.num_channels != 1) {
1451 1.1 augustss return EINVAL;
1452 1.1 augustss } else {
1453 1.1 augustss valr = vall = cp->un.value.level[0];
1454 1.1 augustss }
1455 1.1 augustss sc->sc_monoin.voll = vall;
1456 1.1 augustss sc->sc_monoin.volr = valr;
1457 1.1 augustss iw_mixer_line_level(sc, IW_MONO_IN, vall, valr);
1458 1.1 augustss }
1459 1.1 augustss break;
1460 1.1 augustss case IW_RECORD_SOURCE:
1461 1.1 augustss error = 0;
1462 1.1 augustss sc->sc_recsrcbits = cp->un.ord << 6;
1463 1.1 augustss DPRINTF(("record source %d bits %x\n", cp->un.ord, sc->sc_recsrcbits));
1464 1.1 augustss iw_mixer_line_level(sc, IW_REC, sc->sc_rec.voll, sc->sc_rec.volr);
1465 1.1 augustss break;
1466 1.1 augustss }
1467 1.1 augustss
1468 1.1 augustss return error;
1469 1.1 augustss }
1470 1.1 augustss
1471 1.1 augustss
1472 1.1 augustss int
1473 1.1 augustss iw_get_port(addr, cp)
1474 1.1 augustss void *addr;
1475 1.1 augustss mixer_ctrl_t *cp;
1476 1.1 augustss {
1477 1.1 augustss struct iw_softc *sc = addr;
1478 1.1 augustss
1479 1.1 augustss int error = EINVAL;
1480 1.1 augustss
1481 1.1 augustss switch (cp->dev) {
1482 1.1 augustss case IW_MIC_IN_LVL:
1483 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1484 1.1 augustss cp->un.value.num_channels = 2;
1485 1.1 augustss cp->un.value.level[0] = sc->sc_mic.voll;
1486 1.1 augustss cp->un.value.level[1] = sc->sc_mic.volr;
1487 1.1 augustss error = 0;
1488 1.1 augustss }
1489 1.1 augustss break;
1490 1.1 augustss case IW_AUX1_LVL:
1491 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1492 1.1 augustss cp->un.value.num_channels = 2;
1493 1.1 augustss cp->un.value.level[0] = sc->sc_aux1.voll;
1494 1.1 augustss cp->un.value.level[1] = sc->sc_aux1.volr;
1495 1.1 augustss error = 0;
1496 1.1 augustss }
1497 1.1 augustss break;
1498 1.1 augustss case IW_AUX2_LVL:
1499 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1500 1.1 augustss cp->un.value.num_channels = 2;
1501 1.1 augustss cp->un.value.level[0] = sc->sc_aux2.voll;
1502 1.1 augustss cp->un.value.level[1] = sc->sc_aux2.volr;
1503 1.1 augustss error = 0;
1504 1.1 augustss }
1505 1.1 augustss break;
1506 1.1 augustss case IW_LINE_OUT_LVL:
1507 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1508 1.1 augustss cp->un.value.num_channels = 2;
1509 1.1 augustss cp->un.value.level[0] = sc->sc_lineout.voll;
1510 1.1 augustss cp->un.value.level[1] = sc->sc_lineout.volr;
1511 1.1 augustss error = 0;
1512 1.1 augustss }
1513 1.1 augustss break;
1514 1.1 augustss case IW_LINE_IN_LVL:
1515 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1516 1.1 augustss cp->un.value.num_channels = 2;
1517 1.1 augustss cp->un.value.level[0] = sc->sc_linein.voll;
1518 1.1 augustss cp->un.value.level[1] = sc->sc_linein.volr;
1519 1.1 augustss error = 0;
1520 1.1 augustss }
1521 1.1 augustss case IW_REC_LVL:
1522 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1523 1.1 augustss cp->un.value.num_channels = 2;
1524 1.1 augustss cp->un.value.level[0] = sc->sc_rec.voll;
1525 1.1 augustss cp->un.value.level[1] = sc->sc_rec.volr;
1526 1.1 augustss error = 0;
1527 1.1 augustss }
1528 1.1 augustss break;
1529 1.1 augustss
1530 1.1 augustss case IW_DAC_LVL:
1531 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1532 1.1 augustss cp->un.value.num_channels = 2;
1533 1.1 augustss cp->un.value.level[0] = sc->sc_dac.voll;
1534 1.1 augustss cp->un.value.level[1] = sc->sc_dac.volr;
1535 1.1 augustss error = 0;
1536 1.1 augustss }
1537 1.1 augustss break;
1538 1.1 augustss
1539 1.1 augustss case IW_LOOPBACK_LVL:
1540 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1541 1.1 augustss cp->un.value.num_channels = 1;
1542 1.1 augustss cp->un.value.level[0] = sc->sc_loopback.voll;
1543 1.1 augustss error = 0;
1544 1.1 augustss }
1545 1.1 augustss break;
1546 1.1 augustss
1547 1.1 augustss case IW_MONO_IN_LVL:
1548 1.1 augustss if (cp->type == AUDIO_MIXER_VALUE) {
1549 1.1 augustss cp->un.value.num_channels = 1;
1550 1.1 augustss cp->un.value.level[0] = sc->sc_monoin.voll;
1551 1.1 augustss error = 0;
1552 1.1 augustss }
1553 1.1 augustss break;
1554 1.1 augustss case IW_RECORD_SOURCE:
1555 1.1 augustss cp->un.ord = sc->sc_recsrcbits >> 6;
1556 1.1 augustss error = 0;
1557 1.1 augustss break;
1558 1.1 augustss }
1559 1.1 augustss
1560 1.1 augustss return error;
1561 1.1 augustss }
1562 1.1 augustss
1563 1.1 augustss
1564 1.1 augustss
1565 1.1 augustss int
1566 1.1 augustss iw_query_devinfo(addr, dip)
1567 1.1 augustss void *addr;
1568 1.1 augustss mixer_devinfo_t *dip;
1569 1.1 augustss {
1570 1.1 augustss
1571 1.1 augustss switch (dip->index) {
1572 1.1 augustss case IW_MIC_IN_LVL: /* Microphone */
1573 1.1 augustss dip->type = AUDIO_MIXER_VALUE;
1574 1.1 augustss dip->mixer_class = IW_INPUT_CLASS;
1575 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1576 1.1 augustss dip->next = AUDIO_MIXER_LAST;
1577 1.1 augustss strcpy(dip->label.name, AudioNmicrophone);
1578 1.1 augustss dip->un.v.num_channels = 2;
1579 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1580 1.1 augustss break;
1581 1.1 augustss case IW_AUX1_LVL:
1582 1.1 augustss dip->type = AUDIO_MIXER_VALUE;
1583 1.1 augustss dip->mixer_class = IW_INPUT_CLASS;
1584 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1585 1.1 augustss dip->next = AUDIO_MIXER_LAST;
1586 1.1 augustss strcpy(dip->label.name, AudioNline);
1587 1.1 augustss dip->un.v.num_channels = 2;
1588 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1589 1.1 augustss break;
1590 1.1 augustss case IW_AUX2_LVL:
1591 1.1 augustss dip->type = AUDIO_MIXER_VALUE;
1592 1.1 augustss dip->mixer_class = IW_INPUT_CLASS;
1593 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1594 1.1 augustss dip->next = AUDIO_MIXER_LAST;
1595 1.1 augustss strcpy(dip->label.name, AudioNcd);
1596 1.1 augustss dip->un.v.num_channels = 2;
1597 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1598 1.1 augustss break;
1599 1.1 augustss case IW_LINE_OUT_LVL:
1600 1.1 augustss dip->type = AUDIO_MIXER_VALUE;
1601 1.1 augustss dip->mixer_class = IW_OUTPUT_CLASS;
1602 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1603 1.1 augustss dip->next = AUDIO_MIXER_LAST;
1604 1.1 augustss strcpy(dip->label.name, AudioNline);
1605 1.1 augustss dip->un.v.num_channels = 2;
1606 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1607 1.1 augustss break;
1608 1.1 augustss case IW_DAC_LVL:
1609 1.1 augustss dip->type = AUDIO_MIXER_VALUE;
1610 1.1 augustss dip->mixer_class = IW_OUTPUT_CLASS;
1611 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1612 1.1 augustss dip->next = AUDIO_MIXER_LAST;
1613 1.1 augustss strcpy(dip->label.name, AudioNdac);
1614 1.1 augustss dip->un.v.num_channels = 2;
1615 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1616 1.1 augustss break;
1617 1.1 augustss case IW_LINE_IN_LVL:
1618 1.1 augustss dip->type = AUDIO_MIXER_VALUE;
1619 1.1 augustss dip->mixer_class = IW_INPUT_CLASS;
1620 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1621 1.1 augustss dip->next = AUDIO_MIXER_LAST;
1622 1.1 augustss strcpy(dip->label.name, AudioNinput);
1623 1.1 augustss dip->un.v.num_channels = 2;
1624 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1625 1.1 augustss break;
1626 1.1 augustss case IW_MONO_IN_LVL:
1627 1.1 augustss dip->type = AUDIO_MIXER_VALUE;
1628 1.1 augustss dip->mixer_class = IW_INPUT_CLASS;
1629 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1630 1.1 augustss dip->next = AUDIO_MIXER_LAST;
1631 1.1 augustss strcpy(dip->label.name, AudioNmono);
1632 1.1 augustss dip->un.v.num_channels = 1;
1633 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1634 1.1 augustss break;
1635 1.1 augustss
1636 1.1 augustss case IW_REC_LVL: /* record level */
1637 1.1 augustss dip->type = AUDIO_MIXER_VALUE;
1638 1.1 augustss dip->mixer_class = IW_RECORD_CLASS;
1639 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1640 1.1 augustss dip->next = AUDIO_MIXER_LAST;
1641 1.1 augustss strcpy(dip->label.name, AudioNrecord);
1642 1.1 augustss dip->un.v.num_channels = 2;
1643 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1644 1.1 augustss break;
1645 1.1 augustss
1646 1.1 augustss case IW_LOOPBACK_LVL:
1647 1.1 augustss dip->type = AUDIO_MIXER_VALUE;
1648 1.1 augustss dip->mixer_class = IW_RECORD_CLASS;
1649 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1650 1.1 augustss dip->next = AUDIO_MIXER_LAST;
1651 1.1 augustss strcpy(dip->label.name, "filter");
1652 1.1 augustss dip->un.v.num_channels = 1;
1653 1.1 augustss strcpy(dip->un.v.units.name, AudioNvolume);
1654 1.1 augustss break;
1655 1.1 augustss
1656 1.1 augustss case IW_RECORD_SOURCE:
1657 1.1 augustss dip->mixer_class = IW_RECORD_CLASS;
1658 1.1 augustss dip->type = AUDIO_MIXER_ENUM;
1659 1.1 augustss dip->prev = AUDIO_MIXER_LAST;
1660 1.1 augustss dip->next = AUDIO_MIXER_LAST;
1661 1.1 augustss strcpy(dip->label.name, AudioNsource);
1662 1.1 augustss dip->un.e.num_mem = 4;
1663 1.1 augustss strcpy(dip->un.e.member[0].label.name, AudioNline);
1664 1.1 augustss dip->un.e.member[0].ord = IW_LINE_IN_SRC;
1665 1.1 augustss strcpy(dip->un.e.member[1].label.name, "aux1");
1666 1.1 augustss dip->un.e.member[1].ord = IW_AUX1_SRC;
1667 1.1 augustss strcpy(dip->un.e.member[2].label.name, AudioNmicrophone);
1668 1.1 augustss dip->un.e.member[2].ord = IW_MIC_IN_SRC;
1669 1.1 augustss strcpy(dip->un.e.member[3].label.name, AudioNmixerout);
1670 1.1 augustss dip->un.e.member[3].ord = IW_MIX_OUT_SRC;
1671 1.1 augustss break;
1672 1.1 augustss case IW_INPUT_CLASS:
1673 1.1 augustss dip->type = AUDIO_MIXER_CLASS;
1674 1.1 augustss dip->mixer_class = IW_INPUT_CLASS;
1675 1.1 augustss dip->next = dip->prev = AUDIO_MIXER_LAST;
1676 1.1 augustss strcpy(dip->label.name, AudioCInputs);
1677 1.1 augustss break;
1678 1.1 augustss case IW_OUTPUT_CLASS:
1679 1.1 augustss dip->type = AUDIO_MIXER_CLASS;
1680 1.1 augustss dip->mixer_class = IW_OUTPUT_CLASS;
1681 1.1 augustss dip->next = dip->prev = AUDIO_MIXER_LAST;
1682 1.1 augustss strcpy(dip->label.name, AudioCOutputs);
1683 1.1 augustss break;
1684 1.1 augustss case IW_RECORD_CLASS: /* record source class */
1685 1.1 augustss dip->type = AUDIO_MIXER_CLASS;
1686 1.1 augustss dip->mixer_class = IW_RECORD_CLASS;
1687 1.1 augustss dip->next = dip->prev = AUDIO_MIXER_LAST;
1688 1.1 augustss strcpy(dip->label.name, AudioCRecord);
1689 1.1 augustss return 0;
1690 1.1 augustss default:
1691 1.1 augustss return ENXIO;
1692 1.1 augustss }
1693 1.1 augustss return 0;
1694 1.1 augustss }
1695 1.1 augustss
1696 1.1 augustss
1697 1.1 augustss void *
1698 1.1 augustss iw_malloc(addr, size, pool, flags)
1699 1.1 augustss void *addr;
1700 1.1 augustss u_long size;
1701 1.1 augustss int pool;
1702 1.1 augustss int flags;
1703 1.1 augustss {
1704 1.1 augustss struct iw_softc *sc = addr;
1705 1.1 augustss
1706 1.1 augustss return isa_malloc(sc->sc_isa, 4, size, pool, flags);
1707 1.1 augustss }
1708 1.1 augustss
1709 1.1 augustss void
1710 1.1 augustss iw_free(addr, ptr, pool)
1711 1.1 augustss void *addr;
1712 1.1 augustss void *ptr;
1713 1.1 augustss int pool;
1714 1.1 augustss {
1715 1.1 augustss isa_free(ptr, pool);
1716 1.1 augustss }
1717 1.1 augustss
1718 1.1 augustss u_long
1719 1.1 augustss iw_round(addr, size)
1720 1.1 augustss void *addr;
1721 1.1 augustss u_long size;
1722 1.1 augustss {
1723 1.1 augustss if (size > MAX_ISADMA)
1724 1.1 augustss size = MAX_ISADMA;
1725 1.1 augustss return size;
1726 1.1 augustss }
1727 1.1 augustss
1728 1.1 augustss int
1729 1.1 augustss iw_mappage(addr, mem, off, prot)
1730 1.1 augustss void *addr;
1731 1.1 augustss void *mem;
1732 1.1 augustss int off;
1733 1.1 augustss int prot;
1734 1.1 augustss {
1735 1.1 augustss return isa_mappage(mem, off, prot);
1736 1.1 augustss }
1737 1.1 augustss
1738 1.1 augustss int
1739 1.1 augustss iw_get_props(addr)
1740 1.1 augustss void *addr;
1741 1.1 augustss {
1742 1.1 augustss struct iw_softc *sc = addr;
1743 1.1 augustss return AUDIO_PROP_MMAP |
1744 1.1 augustss (sc->sc_fullduplex ? AUDIO_PROP_FULLDUPLEX : 0);
1745 1.1 augustss }
1746