aica.c revision 1.2 1 1.2 marcus /* $NetBSD: aica.c,v 1.2 2003/08/24 19:44:29 marcus Exp $ */
2 1.1 marcus
3 1.1 marcus /*
4 1.1 marcus * Copyright (c) 2003 SHIMIZU Ryo <ryo (at) misakimix.org>
5 1.1 marcus * All rights reserved.
6 1.1 marcus *
7 1.1 marcus * Redistribution and use in source and binary forms, with or without
8 1.1 marcus * modification, are permitted provided that the following conditions
9 1.1 marcus * are met:
10 1.1 marcus *
11 1.1 marcus * 1. Redistributions of source code must retain the above copyright
12 1.1 marcus * notice, this list of conditions and the following disclaimer.
13 1.1 marcus * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 marcus * notice, this list of conditions and the following disclaimer in the
15 1.1 marcus * documentation and/or other materials provided with the distribution.
16 1.1 marcus * 3. The name of the author may not be used to endorse or promote products
17 1.1 marcus * derived from this software without specific prior written permission.
18 1.1 marcus *
19 1.1 marcus * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 1.1 marcus * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 1.1 marcus * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 1.1 marcus * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 1.1 marcus * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 1.1 marcus * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 1.1 marcus * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 1.1 marcus * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 1.1 marcus * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
28 1.1 marcus * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 1.1 marcus */
30 1.1 marcus
31 1.1 marcus #include <sys/cdefs.h>
32 1.2 marcus __KERNEL_RCSID(0, "$NetBSD: aica.c,v 1.2 2003/08/24 19:44:29 marcus Exp $");
33 1.1 marcus
34 1.1 marcus #include <sys/param.h>
35 1.1 marcus #include <sys/systm.h>
36 1.1 marcus #include <sys/kernel.h>
37 1.1 marcus #include <sys/proc.h>
38 1.1 marcus #include <sys/audioio.h>
39 1.1 marcus
40 1.1 marcus #include <dev/audio_if.h>
41 1.1 marcus #include <dev/mulaw.h>
42 1.1 marcus #include <dev/auconv.h>
43 1.1 marcus
44 1.1 marcus #include <machine/bus.h>
45 1.1 marcus #include <machine/sysasicvar.h>
46 1.1 marcus
47 1.1 marcus #include <dreamcast/dev/g2/g2busvar.h>
48 1.1 marcus #include <dreamcast/dev/g2/aicavar.h>
49 1.1 marcus #include <dreamcast/dev/microcode/aica_armcode.h>
50 1.1 marcus
51 1.1 marcus #define AICA_REG_ADDR 0x00700000
52 1.1 marcus #define AICA_RAM_START 0x00800000
53 1.1 marcus #define AICA_RAM_SIZE 0x00200000
54 1.1 marcus #define AICA_NCHAN 64
55 1.1 marcus #define AICA_TIMEOUT 0x1800
56 1.1 marcus
57 1.1 marcus struct aica_softc {
58 1.1 marcus struct device sc_dev; /* base device */
59 1.1 marcus bus_space_tag_t sc_memt;
60 1.1 marcus bus_space_handle_t sc_aica_regh;
61 1.1 marcus bus_space_handle_t sc_aica_memh;
62 1.1 marcus
63 1.1 marcus /* audio property */
64 1.1 marcus int sc_open;
65 1.1 marcus int sc_encodings;
66 1.1 marcus int sc_precision;
67 1.1 marcus int sc_channels;
68 1.1 marcus int sc_rate;
69 1.1 marcus void (*sc_intr)(void *);
70 1.1 marcus void *sc_intr_arg;
71 1.1 marcus
72 1.1 marcus int sc_output_master;
73 1.1 marcus int sc_output_gain[2];
74 1.1 marcus #define AICA_VOLUME_LEFT 0
75 1.1 marcus #define AICA_VOLUME_RIGHT 1
76 1.1 marcus
77 1.1 marcus /* work for output */
78 1.1 marcus void *sc_buffer;
79 1.1 marcus void *sc_buffer_start;
80 1.1 marcus void *sc_buffer_end;
81 1.1 marcus int sc_blksize;
82 1.1 marcus int sc_nextfill;
83 1.1 marcus };
84 1.1 marcus
85 1.1 marcus struct {
86 1.1 marcus char *name;
87 1.1 marcus int encoding;
88 1.1 marcus int precision;
89 1.1 marcus } aica_encodings[] = {
90 1.1 marcus {AudioEadpcm, AUDIO_ENCODING_ADPCM, 4},
91 1.1 marcus {AudioEslinear, AUDIO_ENCODING_SLINEAR, 8},
92 1.1 marcus {AudioEulinear, AUDIO_ENCODING_ULINEAR, 8},
93 1.1 marcus {AudioEmulaw, AUDIO_ENCODING_ULAW, 8},
94 1.2 marcus {AudioEalaw, AUDIO_ENCODING_ALAW, 8},
95 1.1 marcus {AudioEslinear_be, AUDIO_ENCODING_SLINEAR_BE, 16},
96 1.1 marcus {AudioEslinear_le, AUDIO_ENCODING_SLINEAR_LE, 16},
97 1.2 marcus {AudioEulinear_be, AUDIO_ENCODING_ULINEAR_BE, 16},
98 1.2 marcus {AudioEulinear_le, AUDIO_ENCODING_ULINEAR_LE, 16},
99 1.1 marcus };
100 1.1 marcus
101 1.1 marcus int aica_match(struct device *, struct cfdata *, void *);
102 1.1 marcus void aica_attach(struct device *, struct device *, void *);
103 1.1 marcus int aica_print(void *, const char *);
104 1.1 marcus
105 1.1 marcus CFATTACH_DECL(aica, sizeof(struct aica_softc), aica_match, aica_attach,
106 1.1 marcus NULL, NULL);
107 1.1 marcus
108 1.1 marcus struct audio_device aica_device = {
109 1.1 marcus "Dreamcast Sound",
110 1.1 marcus "",
111 1.1 marcus "aica"
112 1.1 marcus };
113 1.1 marcus
114 1.1 marcus __inline static void aica_g2fifo_wait(void);
115 1.1 marcus void aica_enable(struct aica_softc *);
116 1.1 marcus void aica_disable(struct aica_softc *);
117 1.1 marcus void aica_memwrite(struct aica_softc *, bus_size_t, u_int32_t *, int);
118 1.1 marcus void aica_ch2p16write(struct aica_softc *, bus_size_t, u_int16_t *, int);
119 1.1 marcus void aica_ch2p8write(struct aica_softc *, bus_size_t, u_int8_t *, int);
120 1.1 marcus void aica_command(struct aica_softc *, u_int32_t);
121 1.1 marcus void aica_sendparam(struct aica_softc *, u_int32_t, int, int);
122 1.1 marcus void aica_play(struct aica_softc *, int, int, int, int);
123 1.1 marcus void aica_fillbuffer(struct aica_softc *);
124 1.1 marcus
125 1.1 marcus /* intr */
126 1.1 marcus int aica_intr(void *);
127 1.1 marcus
128 1.1 marcus /* for audio */
129 1.1 marcus int aica_open(void *, int);
130 1.1 marcus void aica_close(void *);
131 1.1 marcus int aica_query_encoding(void *, struct audio_encoding *);
132 1.1 marcus int aica_set_params(void *, int, int, struct audio_params *,
133 1.1 marcus struct audio_params *);
134 1.1 marcus int aica_round_blocksize(void *, int);
135 1.1 marcus size_t aica_round_buffersize(void *, int, size_t);
136 1.1 marcus int aica_trigger_output(void *, void *, void *, int, void (*)(void *), void *,
137 1.1 marcus struct audio_params *);
138 1.1 marcus int aica_trigger_input(void *, void *, void *, int, void (*)(void *), void *,
139 1.1 marcus struct audio_params *);
140 1.1 marcus int aica_halt_output(void *);
141 1.1 marcus int aica_halt_input(void *);
142 1.1 marcus int aica_getdev(void *, struct audio_device *);
143 1.1 marcus int aica_set_port(void *, mixer_ctrl_t *);
144 1.1 marcus int aica_get_port(void *, mixer_ctrl_t *);
145 1.1 marcus int aica_query_devinfo(void *, mixer_devinfo_t *);
146 1.1 marcus void aica_encode(int, int, int, int, u_char *, u_short **);
147 1.1 marcus int aica_get_props(void *);
148 1.1 marcus
149 1.1 marcus struct audio_hw_if aica_hw_if = {
150 1.1 marcus aica_open,
151 1.1 marcus aica_close,
152 1.1 marcus NULL, /* aica_drain */
153 1.1 marcus aica_query_encoding,
154 1.1 marcus aica_set_params,
155 1.1 marcus aica_round_blocksize,
156 1.1 marcus NULL, /* aica_commit_setting */
157 1.1 marcus NULL, /* aica_init_output */
158 1.1 marcus NULL, /* aica_init_input */
159 1.1 marcus NULL, /* aica_start_output */
160 1.1 marcus NULL, /* aica_start_input */
161 1.1 marcus aica_halt_output,
162 1.1 marcus aica_halt_input,
163 1.1 marcus NULL, /* aica_speaker_ctl */
164 1.1 marcus aica_getdev,
165 1.1 marcus NULL, /* aica_setfd */
166 1.1 marcus aica_set_port,
167 1.1 marcus aica_get_port,
168 1.1 marcus aica_query_devinfo,
169 1.1 marcus NULL, /* aica_allocm */
170 1.1 marcus NULL, /* aica_freem */
171 1.1 marcus
172 1.1 marcus aica_round_buffersize, /* aica_round_buffersize */
173 1.1 marcus
174 1.1 marcus NULL, /* aica_mappage */
175 1.1 marcus aica_get_props,
176 1.1 marcus aica_trigger_output,
177 1.1 marcus aica_trigger_input,
178 1.1 marcus NULL, /* aica_dev_ioctl */
179 1.1 marcus };
180 1.1 marcus
181 1.1 marcus int
182 1.1 marcus aica_match(struct device *parent, struct cfdata *cf, void *aux)
183 1.1 marcus {
184 1.1 marcus static int aica_matched = 0;
185 1.1 marcus
186 1.1 marcus if (aica_matched)
187 1.1 marcus return 0;
188 1.1 marcus
189 1.1 marcus aica_matched = 1;
190 1.1 marcus return 1;
191 1.1 marcus }
192 1.1 marcus
193 1.1 marcus void
194 1.1 marcus aica_attach(struct device *parent, struct device *self, void *aux)
195 1.1 marcus {
196 1.1 marcus struct aica_softc *sc = (struct aica_softc *)self;
197 1.1 marcus struct g2bus_attach_args *ga = aux;
198 1.1 marcus int i;
199 1.1 marcus
200 1.1 marcus sc->sc_memt = ga->ga_memt;
201 1.1 marcus
202 1.1 marcus if (bus_space_map(sc->sc_memt, AICA_REG_ADDR, 0x3000, 0,
203 1.1 marcus &sc->sc_aica_regh) != 0) {
204 1.1 marcus printf(": can't map AICA register space\n");
205 1.1 marcus return;
206 1.1 marcus }
207 1.1 marcus
208 1.1 marcus if (bus_space_map(sc->sc_memt, AICA_RAM_START, AICA_RAM_SIZE, 0,
209 1.1 marcus &sc->sc_aica_memh) != 0) {
210 1.1 marcus printf(": can't map AICA memory space\n");
211 1.1 marcus return;
212 1.1 marcus }
213 1.1 marcus
214 1.1 marcus printf(": ARM7 Sound Processing Unit\n");
215 1.1 marcus
216 1.1 marcus aica_disable(sc);
217 1.1 marcus
218 1.1 marcus for (i = 0; i < AICA_NCHAN; i++)
219 1.1 marcus bus_space_write_4(sc->sc_memt,sc->sc_aica_regh, i << 7,
220 1.1 marcus ((bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, i << 7)
221 1.1 marcus & ~0x4000) | 0x8000));
222 1.1 marcus
223 1.1 marcus /* load microcode, and clear memory */
224 1.1 marcus bus_space_set_region_4(sc->sc_memt, sc->sc_aica_memh,
225 1.1 marcus 0, 0, AICA_RAM_SIZE);
226 1.1 marcus
227 1.1 marcus aica_memwrite(sc, 0, aica_armcode, sizeof(aica_armcode));
228 1.1 marcus
229 1.1 marcus aica_enable(sc);
230 1.1 marcus
231 1.1 marcus printf("%s: interrupting at %s\n", sc->sc_dev.dv_xname,
232 1.1 marcus sysasic_intr_string(IPL_BIO));
233 1.1 marcus sysasic_intr_establish(SYSASIC_EVENT_AICA, IPL_BIO, aica_intr, sc);
234 1.1 marcus
235 1.1 marcus audio_attach_mi(&aica_hw_if, sc, &sc->sc_dev);
236 1.1 marcus
237 1.1 marcus /* init parameters */
238 1.1 marcus sc->sc_output_master = 255;
239 1.1 marcus sc->sc_output_gain[AICA_VOLUME_LEFT] = 255;
240 1.1 marcus sc->sc_output_gain[AICA_VOLUME_RIGHT] = 255;
241 1.1 marcus }
242 1.1 marcus
243 1.1 marcus void
244 1.1 marcus aica_enable(struct aica_softc *sc)
245 1.1 marcus {
246 1.1 marcus
247 1.1 marcus bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x28a8, 24);
248 1.1 marcus bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00,
249 1.1 marcus bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00) & ~1);
250 1.1 marcus }
251 1.1 marcus
252 1.1 marcus void
253 1.1 marcus aica_disable(struct aica_softc *sc)
254 1.1 marcus {
255 1.1 marcus
256 1.1 marcus bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00,
257 1.1 marcus bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00) | 1);
258 1.1 marcus }
259 1.1 marcus
260 1.1 marcus inline static void
261 1.1 marcus aica_g2fifo_wait()
262 1.1 marcus {
263 1.1 marcus int i;
264 1.1 marcus
265 1.1 marcus i = AICA_TIMEOUT;
266 1.1 marcus while (--i > 0)
267 1.1 marcus if ((*(volatile u_int32_t *)0xa05f688c) & 0x11)
268 1.1 marcus break;
269 1.1 marcus }
270 1.1 marcus
271 1.1 marcus void
272 1.1 marcus aica_memwrite(struct aica_softc *sc, bus_size_t offset, u_int32_t *src, int len)
273 1.1 marcus {
274 1.1 marcus int n;
275 1.1 marcus
276 1.1 marcus KASSERT((offset & 3) == 0);
277 1.1 marcus n = (len + 3) / 4; /* u_int32_t * n (aligned) */
278 1.1 marcus
279 1.1 marcus aica_g2fifo_wait();
280 1.1 marcus bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
281 1.1 marcus offset, src, n);
282 1.1 marcus }
283 1.1 marcus
284 1.1 marcus void
285 1.1 marcus aica_ch2p16write(struct aica_softc *sc, bus_size_t offset, u_int16_t *src,
286 1.1 marcus int len)
287 1.1 marcus {
288 1.1 marcus union {
289 1.1 marcus u_int32_t w[8];
290 1.1 marcus u_int16_t s[16];
291 1.1 marcus } buf;
292 1.1 marcus u_int16_t *p;
293 1.1 marcus int i;
294 1.1 marcus
295 1.1 marcus KASSERT((offset & 3) == 0);
296 1.1 marcus
297 1.1 marcus while (len >= 32) {
298 1.1 marcus p = buf.s;
299 1.1 marcus *p++ = *src++; src++;
300 1.1 marcus *p++ = *src++; src++;
301 1.1 marcus *p++ = *src++; src++;
302 1.1 marcus *p++ = *src++; src++;
303 1.1 marcus *p++ = *src++; src++;
304 1.1 marcus *p++ = *src++; src++;
305 1.1 marcus *p++ = *src++; src++;
306 1.1 marcus *p++ = *src++; src++;
307 1.1 marcus *p++ = *src++; src++;
308 1.1 marcus *p++ = *src++; src++;
309 1.1 marcus *p++ = *src++; src++;
310 1.1 marcus *p++ = *src++; src++;
311 1.1 marcus *p++ = *src++; src++;
312 1.1 marcus *p++ = *src++; src++;
313 1.1 marcus *p++ = *src++; src++;
314 1.1 marcus *p++ = *src++; src++;
315 1.1 marcus
316 1.1 marcus aica_g2fifo_wait();
317 1.1 marcus bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
318 1.1 marcus offset, buf.w , 32 / 4);
319 1.1 marcus
320 1.1 marcus offset += sizeof(u_int16_t) * 16;
321 1.1 marcus len -= 32;
322 1.1 marcus }
323 1.1 marcus
324 1.1 marcus if (len / 2 > 0) {
325 1.1 marcus p = buf.s;
326 1.1 marcus for (i = 0; i < len / 2; i++) {
327 1.1 marcus *p++ = *src++; src++;
328 1.1 marcus }
329 1.1 marcus
330 1.1 marcus aica_g2fifo_wait();
331 1.1 marcus bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
332 1.1 marcus offset, buf.w, len / 4);
333 1.1 marcus }
334 1.1 marcus }
335 1.1 marcus
336 1.1 marcus void
337 1.1 marcus aica_ch2p8write(struct aica_softc *sc, bus_size_t offset, u_int8_t *src,
338 1.1 marcus int len)
339 1.1 marcus {
340 1.1 marcus u_int32_t buf[8];
341 1.1 marcus u_int8_t *p;
342 1.1 marcus int i;
343 1.1 marcus
344 1.1 marcus KASSERT((offset & 3) == 0);
345 1.1 marcus while (len >= 32) {
346 1.1 marcus p = (u_int8_t *)buf;
347 1.1 marcus
348 1.1 marcus *p++ = *src++; src++;
349 1.1 marcus *p++ = *src++; src++;
350 1.1 marcus *p++ = *src++; src++;
351 1.1 marcus *p++ = *src++; src++;
352 1.1 marcus *p++ = *src++; src++;
353 1.1 marcus *p++ = *src++; src++;
354 1.1 marcus *p++ = *src++; src++;
355 1.1 marcus *p++ = *src++; src++;
356 1.1 marcus *p++ = *src++; src++;
357 1.1 marcus *p++ = *src++; src++;
358 1.1 marcus *p++ = *src++; src++;
359 1.1 marcus *p++ = *src++; src++;
360 1.1 marcus *p++ = *src++; src++;
361 1.1 marcus *p++ = *src++; src++;
362 1.1 marcus *p++ = *src++; src++;
363 1.1 marcus *p++ = *src++; src++;
364 1.1 marcus *p++ = *src++; src++;
365 1.1 marcus *p++ = *src++; src++;
366 1.1 marcus *p++ = *src++; src++;
367 1.1 marcus *p++ = *src++; src++;
368 1.1 marcus *p++ = *src++; src++;
369 1.1 marcus *p++ = *src++; src++;
370 1.1 marcus *p++ = *src++; src++;
371 1.1 marcus *p++ = *src++; src++;
372 1.1 marcus *p++ = *src++; src++;
373 1.1 marcus *p++ = *src++; src++;
374 1.1 marcus *p++ = *src++; src++;
375 1.1 marcus *p++ = *src++; src++;
376 1.1 marcus *p++ = *src++; src++;
377 1.1 marcus *p++ = *src++; src++;
378 1.1 marcus *p++ = *src++; src++;
379 1.1 marcus *p++ = *src++; src++;
380 1.1 marcus
381 1.1 marcus aica_g2fifo_wait();
382 1.1 marcus bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
383 1.1 marcus offset, buf, 32 / 4);
384 1.1 marcus
385 1.1 marcus offset += 32;
386 1.1 marcus len -= 32;
387 1.1 marcus }
388 1.1 marcus
389 1.1 marcus if (len) {
390 1.1 marcus p = (u_int8_t *)buf;
391 1.1 marcus for (i = 0; i < len; i++)
392 1.1 marcus *p++ = *src++; src++;
393 1.1 marcus
394 1.1 marcus aica_g2fifo_wait();
395 1.1 marcus bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
396 1.1 marcus offset, buf, len / 4);
397 1.1 marcus }
398 1.1 marcus }
399 1.1 marcus
400 1.1 marcus int
401 1.1 marcus aica_open(void *addr, int flags)
402 1.1 marcus {
403 1.1 marcus struct aica_softc *sc = addr;
404 1.1 marcus
405 1.1 marcus if (sc->sc_open)
406 1.1 marcus return EBUSY;
407 1.1 marcus
408 1.1 marcus sc->sc_intr = NULL;
409 1.1 marcus sc->sc_open = 1;
410 1.1 marcus
411 1.1 marcus return 0;
412 1.1 marcus }
413 1.1 marcus
414 1.1 marcus void
415 1.1 marcus aica_close(void *addr)
416 1.1 marcus {
417 1.1 marcus struct aica_softc *sc = addr;
418 1.1 marcus
419 1.1 marcus sc->sc_open = 0;
420 1.1 marcus sc->sc_intr = NULL;
421 1.1 marcus }
422 1.1 marcus
423 1.1 marcus int
424 1.1 marcus aica_query_encoding(void *addr, struct audio_encoding *fp)
425 1.1 marcus {
426 1.1 marcus if (fp->index >= sizeof(aica_encodings) / sizeof(aica_encodings[0]))
427 1.1 marcus return EINVAL;
428 1.1 marcus
429 1.1 marcus strcpy(fp->name, aica_encodings[fp->index].name);
430 1.1 marcus fp->encoding = aica_encodings[fp->index].encoding;
431 1.1 marcus fp->precision = aica_encodings[fp->index].precision;
432 1.1 marcus fp->flags = 0;
433 1.1 marcus
434 1.1 marcus return 0;
435 1.1 marcus }
436 1.1 marcus
437 1.1 marcus int
438 1.1 marcus aica_set_params(void *addr, int setmode, int usemode,
439 1.1 marcus struct audio_params *play, struct audio_params *rec)
440 1.1 marcus {
441 1.1 marcus struct aica_softc *sc = addr;
442 1.1 marcus
443 1.1 marcus if ((play->channels != 1) &&
444 1.1 marcus (play->channels != 2))
445 1.1 marcus return EINVAL;
446 1.1 marcus
447 1.1 marcus if ((play->precision != 4) &&
448 1.1 marcus (play->precision != 8) &&
449 1.1 marcus (play->precision != 16))
450 1.1 marcus return EINVAL;
451 1.1 marcus
452 1.1 marcus play->factor = 1;
453 1.1 marcus play->factor_denom = 1;
454 1.1 marcus
455 1.1 marcus play->hw_precision = play->precision;
456 1.1 marcus play->hw_channels = play->channels;
457 1.1 marcus play->hw_sample_rate = play->sample_rate;
458 1.1 marcus play->hw_encoding = AUDIO_ENCODING_SLINEAR_LE;
459 1.1 marcus
460 1.1 marcus play->sw_code = NULL;
461 1.1 marcus
462 1.1 marcus sc->sc_precision = play->hw_precision;
463 1.1 marcus sc->sc_channels = play->hw_channels;
464 1.1 marcus sc->sc_rate = play->hw_sample_rate;
465 1.1 marcus sc->sc_encodings = play->hw_encoding;
466 1.1 marcus
467 1.1 marcus #if 1
468 1.1 marcus /* XXX: limit check */
469 1.1 marcus if ((play->precision == 4) &&
470 1.1 marcus (play->channels == 1) &&
471 1.1 marcus (play->sample_rate >= 65536))
472 1.1 marcus return EINVAL;
473 1.1 marcus
474 1.1 marcus if ((play->precision == 8) &&
475 1.1 marcus (play->channels == 1) &&
476 1.1 marcus (play->sample_rate >= 65536))
477 1.1 marcus return EINVAL;
478 1.1 marcus #endif
479 1.1 marcus
480 1.1 marcus switch (play->encoding) {
481 1.1 marcus case AUDIO_ENCODING_ADPCM:
482 1.1 marcus if (play->precision != 4)
483 1.1 marcus return EINVAL;
484 1.1 marcus if (play->channels != 1)
485 1.1 marcus return EINVAL;
486 1.1 marcus
487 1.1 marcus play->hw_encoding = AUDIO_ENCODING_ADPCM;
488 1.1 marcus play->hw_precision = 8; /* 4? XXX */
489 1.1 marcus sc->sc_precision = 4;
490 1.1 marcus break;
491 1.1 marcus
492 1.1 marcus case AUDIO_ENCODING_SLINEAR:
493 1.1 marcus break;
494 1.1 marcus case AUDIO_ENCODING_ULINEAR:
495 1.1 marcus play->sw_code = change_sign8;
496 1.1 marcus break;
497 1.1 marcus
498 1.1 marcus case AUDIO_ENCODING_SLINEAR_BE:
499 1.1 marcus if (play->precision == 16)
500 1.1 marcus play->sw_code = swap_bytes;
501 1.1 marcus break;
502 1.1 marcus case AUDIO_ENCODING_SLINEAR_LE:
503 1.1 marcus break;
504 1.1 marcus case AUDIO_ENCODING_ULINEAR_BE:
505 1.1 marcus if (play->precision == 16)
506 1.1 marcus play->sw_code = swap_bytes_change_sign16_le;
507 1.1 marcus break;
508 1.1 marcus case AUDIO_ENCODING_ULINEAR_LE:
509 1.1 marcus if (play->precision == 16)
510 1.1 marcus play->sw_code = change_sign16_le;
511 1.1 marcus break;
512 1.1 marcus
513 1.1 marcus case AUDIO_ENCODING_ULAW:
514 1.1 marcus play->sw_code = mulaw_to_slinear16_le;
515 1.1 marcus play->hw_precision = 16;
516 1.1 marcus sc->sc_precision = play->hw_precision;
517 1.1 marcus break;
518 1.1 marcus case AUDIO_ENCODING_ALAW:
519 1.1 marcus play->sw_code = alaw_to_slinear16_le;
520 1.1 marcus play->hw_precision = 16;
521 1.1 marcus sc->sc_precision = play->hw_precision;
522 1.1 marcus break;
523 1.1 marcus
524 1.1 marcus default:
525 1.1 marcus return EINVAL;
526 1.1 marcus }
527 1.1 marcus
528 1.1 marcus return 0;
529 1.1 marcus }
530 1.1 marcus
531 1.1 marcus int
532 1.1 marcus aica_round_blocksize(void *addr, int blk)
533 1.1 marcus {
534 1.1 marcus struct aica_softc *sc = addr;
535 1.1 marcus
536 1.1 marcus switch (sc->sc_precision) {
537 1.1 marcus case 4:
538 1.1 marcus if (sc->sc_channels == 1)
539 1.1 marcus return AICA_DMABUF_SIZE / 4;
540 1.1 marcus else
541 1.1 marcus return AICA_DMABUF_SIZE / 2;
542 1.1 marcus break;
543 1.1 marcus case 8:
544 1.1 marcus if (sc->sc_channels == 1)
545 1.1 marcus return AICA_DMABUF_SIZE / 2;
546 1.1 marcus else
547 1.1 marcus return AICA_DMABUF_SIZE;
548 1.1 marcus break;
549 1.1 marcus case 16:
550 1.1 marcus if (sc->sc_channels == 1)
551 1.1 marcus return AICA_DMABUF_SIZE;
552 1.1 marcus else
553 1.1 marcus return AICA_DMABUF_SIZE * 2;
554 1.1 marcus break;
555 1.1 marcus default:
556 1.1 marcus break;
557 1.1 marcus }
558 1.1 marcus
559 1.1 marcus return AICA_DMABUF_SIZE / 4;
560 1.1 marcus }
561 1.1 marcus
562 1.1 marcus size_t
563 1.1 marcus aica_round_buffersize(void *addr, int dir, size_t bufsize)
564 1.1 marcus {
565 1.1 marcus
566 1.1 marcus if (dir == AUMODE_PLAY)
567 1.1 marcus return 65536;
568 1.1 marcus
569 1.1 marcus return 512; /* XXX: AUMINBUF */
570 1.1 marcus }
571 1.1 marcus
572 1.1 marcus void
573 1.1 marcus aica_command(struct aica_softc *sc, u_int32_t command)
574 1.1 marcus {
575 1.1 marcus
576 1.1 marcus bus_space_write_4(sc->sc_memt, sc->sc_aica_memh,
577 1.1 marcus AICA_ARM_CMD_COMMAND, command);
578 1.1 marcus bus_space_write_4(sc->sc_memt,sc->sc_aica_memh, AICA_ARM_CMD_SERIAL,
579 1.1 marcus bus_space_read_4(sc->sc_memt, sc->sc_aica_memh,
580 1.1 marcus AICA_ARM_CMD_SERIAL) + 1);
581 1.1 marcus }
582 1.1 marcus
583 1.1 marcus void
584 1.1 marcus aica_sendparam(struct aica_softc *sc, u_int32_t command,
585 1.1 marcus int32_t lparam, int32_t rparam)
586 1.1 marcus {
587 1.1 marcus
588 1.1 marcus bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
589 1.1 marcus AICA_ARM_CMD_LPARAM, lparam);
590 1.1 marcus bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
591 1.1 marcus AICA_ARM_CMD_RPARAM, rparam);
592 1.1 marcus
593 1.1 marcus aica_command(sc, command);
594 1.1 marcus }
595 1.1 marcus
596 1.1 marcus void
597 1.1 marcus aica_play(struct aica_softc *sc, int blksize, int channel, int rate, int prec)
598 1.1 marcus {
599 1.1 marcus
600 1.1 marcus bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
601 1.1 marcus AICA_ARM_CMD_BLOCKSIZE, blksize);
602 1.1 marcus bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
603 1.1 marcus AICA_ARM_CMD_CHANNEL, channel);
604 1.1 marcus bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
605 1.1 marcus AICA_ARM_CMD_RATE, rate);
606 1.1 marcus bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
607 1.1 marcus AICA_ARM_CMD_PRECISION, prec);
608 1.1 marcus
609 1.1 marcus aica_command(sc, AICA_COMMAND_PLAY);
610 1.1 marcus }
611 1.1 marcus
612 1.1 marcus void
613 1.1 marcus aica_fillbuffer(struct aica_softc *sc)
614 1.1 marcus {
615 1.1 marcus
616 1.1 marcus if (sc->sc_channels == 2) {
617 1.1 marcus if (sc->sc_precision == 16) {
618 1.1 marcus aica_ch2p16write(sc,
619 1.1 marcus AICA_DMABUF_LEFT + sc->sc_nextfill,
620 1.1 marcus (u_int16_t *)sc->sc_buffer + 0, sc->sc_blksize / 2);
621 1.1 marcus aica_ch2p16write(sc,
622 1.1 marcus AICA_DMABUF_RIGHT + sc->sc_nextfill,
623 1.1 marcus (u_int16_t *)sc->sc_buffer + 1, sc->sc_blksize / 2);
624 1.1 marcus } else if (sc->sc_precision == 8) {
625 1.1 marcus aica_ch2p8write(sc, AICA_DMABUF_LEFT + sc->sc_nextfill,
626 1.1 marcus (u_int8_t *)sc->sc_buffer + 0, sc->sc_blksize / 2);
627 1.1 marcus aica_ch2p8write(sc, AICA_DMABUF_RIGHT + sc->sc_nextfill,
628 1.1 marcus (u_int8_t *)sc->sc_buffer + 1, sc->sc_blksize / 2);
629 1.1 marcus }
630 1.1 marcus } else {
631 1.1 marcus aica_memwrite(sc, AICA_DMABUF_MONO + sc->sc_nextfill,
632 1.1 marcus sc->sc_buffer, sc->sc_blksize);
633 1.1 marcus }
634 1.1 marcus
635 1.1 marcus (int8_t *)sc->sc_buffer += sc->sc_blksize;
636 1.1 marcus if (sc->sc_buffer >= sc->sc_buffer_end)
637 1.1 marcus sc->sc_buffer = sc->sc_buffer_start;
638 1.1 marcus
639 1.1 marcus sc->sc_nextfill ^= sc->sc_blksize / sc->sc_channels;
640 1.1 marcus }
641 1.1 marcus
642 1.1 marcus int
643 1.1 marcus aica_intr(void *arg)
644 1.1 marcus {
645 1.1 marcus struct aica_softc *sc = arg;
646 1.1 marcus
647 1.1 marcus aica_fillbuffer(sc);
648 1.1 marcus
649 1.1 marcus /* call audio interrupt handler (audio_pint()) */
650 1.1 marcus if (sc->sc_open && sc->sc_intr != NULL) {
651 1.1 marcus (*(sc->sc_intr))(sc->sc_intr_arg);
652 1.1 marcus }
653 1.1 marcus
654 1.1 marcus /* clear SPU interrupt */
655 1.1 marcus bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x28bc, 0x20);
656 1.1 marcus return 1;
657 1.1 marcus }
658 1.1 marcus
659 1.1 marcus int
660 1.1 marcus aica_trigger_output(void *addr, void *start, void *end, int blksize,
661 1.1 marcus void (*intr)(void *), void *arg, struct audio_params *param)
662 1.1 marcus {
663 1.1 marcus struct aica_softc *sc = addr;
664 1.1 marcus
665 1.1 marcus aica_command(sc, AICA_COMMAND_INIT);
666 1.1 marcus tsleep(aica_trigger_output, PWAIT, "aicawait", hz / 20);
667 1.1 marcus
668 1.1 marcus sc->sc_buffer_start = sc->sc_buffer = start;
669 1.1 marcus sc->sc_buffer_end = end;
670 1.1 marcus sc->sc_blksize = blksize;
671 1.1 marcus sc->sc_nextfill = 0;
672 1.1 marcus
673 1.1 marcus sc->sc_intr = intr;
674 1.1 marcus sc->sc_intr_arg = arg;
675 1.1 marcus
676 1.1 marcus /* fill buffers in advance */
677 1.1 marcus aica_intr(sc);
678 1.1 marcus aica_intr(sc);
679 1.1 marcus
680 1.1 marcus /* ...and start playing */
681 1.1 marcus aica_play(sc, blksize / sc->sc_channels, sc->sc_channels, sc->sc_rate,
682 1.1 marcus sc->sc_precision);
683 1.1 marcus
684 1.1 marcus return 0;
685 1.1 marcus }
686 1.1 marcus
687 1.1 marcus int
688 1.1 marcus aica_trigger_input(void *addr, void *start, void *end, int blksize,
689 1.1 marcus void (*intr)(void *), void *arg, struct audio_params *param)
690 1.1 marcus {
691 1.1 marcus
692 1.1 marcus return ENODEV;
693 1.1 marcus }
694 1.1 marcus
695 1.1 marcus int
696 1.1 marcus aica_halt_output(void *addr)
697 1.1 marcus {
698 1.1 marcus struct aica_softc *sc = addr;
699 1.1 marcus
700 1.1 marcus aica_command(sc, AICA_COMMAND_STOP);
701 1.1 marcus
702 1.1 marcus return 0;
703 1.1 marcus }
704 1.1 marcus
705 1.1 marcus int
706 1.1 marcus aica_halt_input(void *addr)
707 1.1 marcus {
708 1.1 marcus
709 1.1 marcus return ENODEV;
710 1.1 marcus }
711 1.1 marcus
712 1.1 marcus int
713 1.1 marcus aica_getdev(void *addr, struct audio_device *ret)
714 1.1 marcus {
715 1.1 marcus
716 1.1 marcus *ret = aica_device;
717 1.1 marcus return 0;
718 1.1 marcus }
719 1.1 marcus
720 1.1 marcus int
721 1.1 marcus aica_set_port(void *addr, mixer_ctrl_t *mc)
722 1.1 marcus {
723 1.1 marcus struct aica_softc *sc = addr;
724 1.1 marcus
725 1.1 marcus switch (mc->dev) {
726 1.1 marcus case AICA_MASTER_VOL:
727 1.1 marcus sc->sc_output_master =
728 1.1 marcus mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] & 0xff;
729 1.1 marcus aica_sendparam(sc, AICA_COMMAND_MVOL,
730 1.1 marcus sc->sc_output_master, sc->sc_output_master);
731 1.1 marcus break;
732 1.1 marcus case AICA_OUTPUT_GAIN:
733 1.1 marcus sc->sc_output_gain[AICA_VOLUME_LEFT] =
734 1.1 marcus mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT] & 0xff;
735 1.1 marcus sc->sc_output_gain[AICA_VOLUME_RIGHT] =
736 1.1 marcus mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] & 0xff;
737 1.1 marcus aica_sendparam(sc, AICA_COMMAND_VOL,
738 1.1 marcus sc->sc_output_gain[AICA_VOLUME_LEFT],
739 1.1 marcus sc->sc_output_gain[AICA_VOLUME_RIGHT]);
740 1.1 marcus break;
741 1.1 marcus default:
742 1.1 marcus return EINVAL;
743 1.1 marcus }
744 1.1 marcus
745 1.1 marcus return 0;
746 1.1 marcus }
747 1.1 marcus
748 1.1 marcus int
749 1.1 marcus aica_get_port(void *addr, mixer_ctrl_t *mc)
750 1.1 marcus {
751 1.1 marcus struct aica_softc *sc = addr;
752 1.1 marcus
753 1.1 marcus switch (mc->dev) {
754 1.1 marcus case AICA_MASTER_VOL:
755 1.1 marcus if (mc->un.value.num_channels != 1)
756 1.1 marcus return EINVAL;
757 1.1 marcus mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] =
758 1.1 marcus L16TO256(L256TO16(sc->sc_output_master));
759 1.1 marcus break;
760 1.1 marcus case AICA_OUTPUT_GAIN:
761 1.1 marcus mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT] =
762 1.1 marcus sc->sc_output_gain[AICA_VOLUME_LEFT];
763 1.1 marcus mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] =
764 1.1 marcus sc->sc_output_gain[AICA_VOLUME_RIGHT];
765 1.1 marcus break;
766 1.1 marcus default:
767 1.1 marcus return EINVAL;
768 1.1 marcus }
769 1.1 marcus return 0;
770 1.1 marcus }
771 1.1 marcus
772 1.1 marcus int
773 1.1 marcus aica_query_devinfo(void *addr, mixer_devinfo_t *md)
774 1.1 marcus {
775 1.1 marcus
776 1.1 marcus switch (md->index) {
777 1.1 marcus case AICA_MASTER_VOL:
778 1.1 marcus md->type = AUDIO_MIXER_VALUE;
779 1.1 marcus md->mixer_class = AICA_OUTPUT_CLASS;
780 1.1 marcus md->prev = md->next = AUDIO_MIXER_LAST;
781 1.1 marcus strcpy(md->label.name, AudioNmaster);
782 1.1 marcus md->un.v.num_channels = 1;
783 1.1 marcus strcpy(md->un.v.units.name, AudioNvolume);
784 1.1 marcus return 0;
785 1.1 marcus case AICA_OUTPUT_GAIN:
786 1.1 marcus md->type = AUDIO_MIXER_VALUE;
787 1.1 marcus md->mixer_class = AICA_OUTPUT_CLASS;
788 1.1 marcus md->prev = md->next = AUDIO_MIXER_LAST;
789 1.1 marcus strcpy(md->label.name, AudioNoutput);
790 1.1 marcus md->un.v.num_channels = 2;
791 1.1 marcus strcpy(md->label.name, AudioNvolume);
792 1.1 marcus return 0;
793 1.1 marcus case AICA_OUTPUT_CLASS:
794 1.1 marcus md->type = AUDIO_MIXER_CLASS;
795 1.1 marcus md->mixer_class = AICA_OUTPUT_CLASS;
796 1.1 marcus md->next = md->prev = AUDIO_MIXER_LAST;
797 1.1 marcus strcpy(md->label.name, AudioCoutputs);
798 1.1 marcus return 0;
799 1.1 marcus }
800 1.1 marcus
801 1.1 marcus return ENXIO;
802 1.1 marcus }
803 1.1 marcus
804 1.1 marcus int
805 1.1 marcus aica_get_props(void *addr)
806 1.1 marcus {
807 1.1 marcus
808 1.1 marcus return 0;
809 1.1 marcus }
810