ascaudio.c revision 1.8 1 /* $NetBSD: ascaudio.c,v 1.8 2025/05/12 00:37:24 nat Exp $ */
2
3 /*-
4 * Copyright (c) 2017, 2023 Nathanial Sloss <nathanialsloss (at) yahoo.com.au>
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
17 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
18 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
20 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 /* Based on pad(4) and asc(4) */
30
31 #include <sys/cdefs.h>
32 __KERNEL_RCSID(0, "$NetBSD: ascaudio.c,v 1.8 2025/05/12 00:37:24 nat Exp $");
33
34 #include <sys/types.h>
35 #include <sys/param.h>
36 #include <sys/conf.h>
37 #include <sys/buf.h>
38 #include <sys/kauth.h>
39 #include <sys/kmem.h>
40 #include <sys/kernel.h>
41 #include <sys/device.h>
42 #include <sys/proc.h>
43 #include <sys/audioio.h>
44 #include <sys/module.h>
45 #include <sys/atomic.h>
46
47 #include <uvm/uvm_extern.h>
48
49 #include <dev/audio/audio_if.h>
50 #include <dev/audio/audiovar.h>
51
52 #include <machine/autoconf.h>
53 #include <machine/cpu.h>
54 #include <machine/bus.h>
55 #include <machine/viareg.h>
56
57 #include <mac68k/dev/pm_direct.h>
58 #include <mac68k/obio/ascaudiovar.h>
59 #include <mac68k/obio/ascreg.h>
60 #include <mac68k/obio/obiovar.h>
61
62 #define MAC68K_ASCAUDIO_BASE 0x50f14000
63 #define MAC68K_IIFX_ASCAUDIO_BASE 0x50f10000
64 #define MAC68K_ASCAUDIO_LEN 0x2000
65
66 #define BUFSIZE 32768
67 #define PLAYBLKSIZE 8192
68 #define RECBLKSIZE 8192
69
70 #define ASC_VIA_CLR_INTR() via_reg(VIA2, vIFR) = V2IF_ASC
71
72 static int ascaudiomatch(device_t, cfdata_t, void *);
73 static void ascaudioattach(device_t, device_t, void *);
74
75 CFATTACH_DECL_NEW(ascaudio, sizeof(struct ascaudio_softc),
76 ascaudiomatch, ascaudioattach, NULL, NULL);
77
78 extern struct cfdriver ascaudio_cd;
79
80 dev_type_open(ascaudioopen);
81 dev_type_close(ascaudioclose);
82 dev_type_read(ascaudioread);
83 dev_type_write(ascaudiowrite);
84 dev_type_ioctl(ascaudioioctl);
85
86 const struct cdevsw ascaudio_cdevsw = {
87 .d_open = ascaudioopen,
88 .d_close = ascaudioclose,
89 .d_read = ascaudioread,
90 .d_write = ascaudiowrite,
91 .d_ioctl = ascaudioioctl,
92 .d_stop = nostop,
93 .d_tty = notty,
94 .d_poll = nopoll,
95 .d_mmap = nommap,
96 .d_kqfilter = nokqfilter,
97 .d_discard = nodiscard,
98 .d_flag = 0
99 };
100
101 static int ascaudio_query_format(void *, struct audio_format_query *);
102 static int ascaudio_set_format(void *, int,
103 const audio_params_t *, const audio_params_t *,
104 audio_filter_reg_t *, audio_filter_reg_t *);
105 static int ascaudio_start_output(void *, void *, int,
106 void (*)(void *), void *);
107 static int ascaudio_start_input(void *, void *, int,
108 void (*)(void *), void *);
109 static int ascaudio_halt(void *);
110 static int ascaudio_set_port(void *, mixer_ctrl_t *);
111 static int ascaudio_get_port(void *, mixer_ctrl_t *);
112 static int ascaudio_getdev(void *, struct audio_device *);
113 static int ascaudio_query_devinfo(void *, mixer_devinfo_t *);
114 static int ascaudio_get_props(void *);
115 static int
116 ascaudio_round_blocksize(void *, int, int, const audio_params_t *);
117 static void ascaudio_get_locks(void *, kmutex_t **, kmutex_t **);
118 static void ascaudio_intr(void *);
119 static int ascaudio_intr_est(void *);
120 static void ascaudio_intr_enable(void);
121 static void ascaudio_done_output(void *);
122 static void ascaudio_done_input(void *);
123 static void configure_dfac(uint8_t);
124
125 static const struct audio_hw_if ascaudio_hw_if = {
126 .query_format = ascaudio_query_format,
127 .set_format = ascaudio_set_format,
128 .start_output = ascaudio_start_output,
129 .start_input = ascaudio_start_input,
130 .halt_output = ascaudio_halt,
131 .halt_input = ascaudio_halt,
132 .set_port = ascaudio_set_port,
133 .get_port = ascaudio_get_port,
134 .getdev = ascaudio_getdev,
135 .query_devinfo = ascaudio_query_devinfo,
136 .get_props = ascaudio_get_props,
137 .round_blocksize = ascaudio_round_blocksize,
138 .get_locks = ascaudio_get_locks,
139 };
140
141 enum {
142 ASC_OUTPUT_CLASS,
143 ASC_INPUT_CLASS,
144 ASC_OUTPUT_MASTER_VOLUME,
145 ASC_INPUT_DAC_VOLUME,
146 ASC_ENUM_LAST,
147 };
148
149 static int
150 ascaudiomatch(device_t parent, cfdata_t cf, void *aux)
151 {
152 struct obio_attach_args *oa = (struct obio_attach_args *)aux;
153 bus_addr_t addr;
154 bus_space_handle_t bsh;
155 int rval = 0;
156
157 if (oa->oa_addr != (-1))
158 addr = (bus_addr_t)oa->oa_addr;
159 else if (current_mac_model->machineid == MACH_MACTV)
160 return 0;
161 else if (current_mac_model->machineid == MACH_MACIIFX)
162 addr = (bus_addr_t)MAC68K_IIFX_ASCAUDIO_BASE;
163 else
164 addr = (bus_addr_t)MAC68K_ASCAUDIO_BASE;
165
166 if (bus_space_map(oa->oa_tag, addr, MAC68K_ASCAUDIO_LEN, 0, &bsh))
167 return (0);
168
169 if (mac68k_bus_space_probe(oa->oa_tag, bsh, 0, 1)) {
170 rval = 1;
171 } else
172 rval = 0;
173
174 bus_space_unmap(oa->oa_tag, bsh, MAC68K_ASCAUDIO_LEN);
175
176 return rval;
177 }
178
179 static void
180 ascaudioattach(device_t parent, device_t self, void *aux)
181 {
182 struct ascaudio_softc *sc = device_private(self);
183 struct obio_attach_args *oa = (struct obio_attach_args *)aux;
184 bus_addr_t addr;
185 uint8_t tmp;
186
187 sc->sc_dev = self;
188 sc->sc_tag = oa->oa_tag;
189
190 if (oa->oa_addr != (-1))
191 addr = (bus_addr_t)oa->oa_addr;
192 else if (current_mac_model->machineid == MACH_MACIIFX)
193 addr = (bus_addr_t)MAC68K_IIFX_ASCAUDIO_BASE;
194 else
195 addr = (bus_addr_t)MAC68K_ASCAUDIO_BASE;
196 if (bus_space_map(sc->sc_tag, addr, MAC68K_ASCAUDIO_LEN, 0,
197 &sc->sc_handle)) {
198 printf(": can't map memory space\n");
199 return;
200 }
201
202 /* Pull in the options flags. */
203 sc->sc_options = ((device_cfdata(self)->cf_flags) &
204 ASCAUDIO_OPTIONS_MASK);
205
206 sc->sc_playbuf = kmem_alloc(BUFSIZE, KM_SLEEP);
207 sc->sc_recbuf = kmem_alloc(BUFSIZE, KM_SLEEP);
208 sc->sc_rptr = sc->sc_recbuf;
209 sc->sc_getptr = sc->sc_recbuf;
210 sc->sc_wptr = sc->sc_playbuf;
211 sc->sc_putptr = sc->sc_playbuf;
212
213 bus_space_write_1(sc->sc_tag, sc->sc_handle, ASCMODE, MODESTOP);
214
215 sc->sc_ver = bus_space_read_1(oa->oa_tag, sc->sc_handle, 0x800);
216
217 if (sc->sc_options & HIGHQUALITY) {
218 tmp = bus_space_read_1(sc->sc_tag, sc->sc_handle, ASCRATE);
219 switch (tmp) {
220 case 2:
221 sc->sc_rate = 22050;
222 break;
223 case 3:
224 sc->sc_rate = 44100;
225 break;
226 default:
227 sc->sc_rate = 22254;
228 break;
229 }
230
231 tmp = bus_space_read_1(sc->sc_tag, sc->sc_handle, ASCTRL);
232 if (tmp & STEREO)
233 sc->sc_speakers = 2;
234 else
235 sc->sc_speakers = 1;
236
237 } else {
238 __USE(tmp);
239 sc->sc_rate = 22254;
240 sc->sc_speakers = 1;
241 }
242
243 if (sc->sc_options & LOWQUALITY) {
244 sc->sc_slowcpu = true;
245 if (sc->sc_slowcpu)
246 sc->sc_rate /= 2;
247 }
248
249 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2)
250 printf(": Enhanced Apple Sound Chip");
251 else
252 printf(": Apple Sound Chip");
253
254 if (oa->oa_addr != (-1))
255 printf(" at %x", oa->oa_addr);
256 printf("\n");
257
258 bus_space_write_1(sc->sc_tag, sc->sc_handle, ASCMODE, MODESTOP);
259
260 if (mac68k_machine.aux_interrupts) {
261 intr_establish(ascaudio_intr_est, sc, ASCIRQ);
262 } else {
263 via2_register_irq(VIA2_ASC, ascaudio_intr, sc);
264 }
265 ascaudio_intr_enable();
266
267 mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
268 mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_AUDIO);
269 callout_init(&sc->sc_pcallout, CALLOUT_MPSAFE);
270 callout_setfunc(&sc->sc_pcallout, ascaudio_done_output, sc);
271 callout_init(&sc->sc_rcallout, CALLOUT_MPSAFE);
272 callout_setfunc(&sc->sc_rcallout, ascaudio_done_input, sc);
273
274 sc->sc_vol = 180;
275 sc->sc_recvol = 255;
276
277 sc->sc_audiodev = audio_attach_mi(&ascaudio_hw_if, sc, sc->sc_dev);
278
279 if (!pmf_device_register(sc->sc_dev, NULL, NULL))
280 aprint_error_dev(sc->sc_dev,
281 "couldn't establish power handler\n");
282
283 if (sc->sc_ver != EASC_VER && sc->sc_ver != EASC_VER2)
284 return;
285
286 if (sc->sc_options & HIGHQUALITY)
287 tmp = CDQUALITY;
288 else
289 tmp = MACDEFAULTS;
290
291 bus_space_write_1(sc->sc_tag, sc->sc_handle, FIFOCTRLA, tmp);
292 bus_space_write_1(sc->sc_tag, sc->sc_handle, FIFOCTRLB, tmp);
293
294 }
295
296 int
297 ascaudioopen(dev_t dev, int flag, int mode, struct lwp *l)
298 {
299 struct ascaudio_softc *sc;
300
301 sc = device_lookup_private(&ascaudio_cd, ASCAUDIOUNIT(dev));
302 if (sc == NULL)
303 return (ENXIO);
304 if (sc->sc_open)
305 return (EBUSY);
306 sc->sc_open = 1;
307
308 return (0);
309 }
310
311 int
312 ascaudioclose(dev_t dev, int flag, int mode, struct lwp *l)
313 {
314 struct ascaudio_softc *sc;
315
316 sc = device_lookup_private(&ascaudio_cd, ASCAUDIOUNIT(dev));
317 sc->sc_open = 0;
318
319 return (0);
320 }
321
322 int
323 ascaudioread(dev_t dev, struct uio *uio, int ioflag)
324 {
325 return (ENXIO);
326 }
327
328 int
329 ascaudiowrite(dev_t dev, struct uio *uio, int ioflag)
330 {
331 return (ENXIO);
332 }
333
334 int
335 ascaudioioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l)
336 {
337 int error;
338 #ifdef notyet
339 struct ascaudio_softc *sc;
340 int unit = ASCAUDIOUNIT(dev);
341
342 sc = device_lookup_private(&ascaudio_cd, unit);
343 #endif
344 error = 0;
345
346 switch (cmd) {
347 default:
348 error = EINVAL;
349 break;
350 }
351 return (error);
352 }
353
354 #define ASCAUDIO_NFORMATS 2
355 static int
356 ascaudio_query_format(void *opaque, struct audio_format_query *ae)
357 {
358 struct ascaudio_softc *sc = opaque;
359
360 const struct audio_format asc_formats[ASCAUDIO_NFORMATS] = {
361 { .mode = AUMODE_PLAY,
362 .encoding = AUDIO_ENCODING_SLINEAR_BE,
363 .validbits = 8,
364 .precision = 8,
365 .channels = sc->sc_speakers,
366 .channel_mask = sc->sc_speakers == 2 ? AUFMT_STEREO :
367 AUFMT_MONAURAL,
368 .frequency_type = 1,
369 .frequency = { sc->sc_rate }, },
370 { .mode = AUMODE_RECORD,
371 .encoding = AUDIO_ENCODING_SLINEAR_BE,
372 .validbits = 8,
373 .precision = 8,
374 .channels = 1,
375 .channel_mask = AUFMT_MONAURAL,
376 .frequency_type = 1,
377 .frequency = { 11025 }, }
378 };
379
380 return audio_query_format(asc_formats, ASCAUDIO_NFORMATS, ae);
381 }
382
383 static int
384 ascaudio_set_format(void *opaque, int setmode,
385 const audio_params_t *play, const audio_params_t *rec,
386 audio_filter_reg_t *pfil, audio_filter_reg_t *rfil)
387 {
388 struct ascaudio_softc *sc = opaque;
389
390 KASSERT(mutex_owned(&sc->sc_lock));
391
392 return 0;
393 }
394
395 static int
396 ascaudio_start_output(void *opaque, void *block, int blksize,
397 void (*intr)(void *), void *intrarg)
398 {
399 struct ascaudio_softc *sc;
400 uint8_t *loc, tmp;
401 int total;
402
403 sc = (struct ascaudio_softc *)opaque;
404 if (!sc)
405 return (ENODEV);
406
407 sc->sc_pintr = intr;
408 sc->sc_pintrarg = intrarg;
409
410 loc = block;
411 if (bus_space_read_1(sc->sc_tag, sc->sc_handle, ASCMODE) !=
412 MODEFIFO) {
413 bus_space_write_1(sc->sc_tag, sc->sc_handle, ASCMODE, MODESTOP);
414
415 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2) {
416 /* disable half interrupts channel a */
417 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQA,
418 DISABLEHALFIRQ);
419 /* Disable half interrupts channel b */
420 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQB,
421 DISABLEHALFIRQ);
422 configure_dfac(DFAC_DISABLE);
423 }
424
425 bus_space_write_1(sc->sc_tag, sc->sc_handle, ASCTEST, 0);
426 bus_space_write_1(sc->sc_tag, sc->sc_handle, FIFOPARAM,
427 CLEARFIFO);
428 tmp = 0;
429 bus_space_write_1(sc->sc_tag, sc->sc_handle, APLAYREC, tmp);
430
431 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2) {
432 /* enable interrupts channel b */
433 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQB, 0);
434 }
435 }
436
437 /* set the volume. */
438 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2) {
439 /* DO NOT CHANGE THESE VALUES UNLESS TESTED.
440 CAN BE VERY LOUD!!!! */
441 tmp = sc->sc_vol >> 5;
442 KASSERT(tmp <= MACOS_HIGH_VOL);
443 bus_space_write_1(sc->sc_tag, sc->sc_handle, A_LEFT_VOL, tmp);
444 bus_space_write_1(sc->sc_tag, sc->sc_handle, B_LEFT_VOL, tmp);
445 bus_space_write_1(sc->sc_tag, sc->sc_handle, A_RIGHT_VOL, tmp);
446 bus_space_write_1(sc->sc_tag, sc->sc_handle, B_RIGHT_VOL, tmp);
447 }
448 bus_space_write_1(sc->sc_tag, sc->sc_handle, INTVOL, sc->sc_vol);
449
450 total = blksize;
451 if (sc->sc_putptr + blksize >= sc->sc_playbuf + BUFSIZE)
452 total = sc->sc_playbuf + BUFSIZE - sc->sc_putptr;
453
454 if (total) {
455 memcpy(sc->sc_putptr, loc, total);
456 sc->sc_putptr += total;
457 loc += total;
458 }
459
460 total = blksize - total;
461 if (total) {
462 sc->sc_putptr = sc->sc_playbuf;
463 memcpy(sc->sc_playbuf, loc, total);
464 sc->sc_putptr += total;
465 }
466
467 sc->sc_avail += blksize;
468 if (sc->sc_avail > BUFSIZE)
469 sc->sc_avail = BUFSIZE;
470
471 /* start fifo playback */
472 bus_space_write_1(sc->sc_tag, sc->sc_handle, ASCMODE, MODEFIFO);
473
474 return 0;
475 }
476
477 static int
478 ascaudio_start_input(void *opaque, void *block, int blksize,
479 void (*intr)(void *), void *intrarg)
480 {
481 struct ascaudio_softc *sc;
482 uint8_t tmp;
483 int total;
484
485 sc = (struct ascaudio_softc *)opaque;
486 if (!sc)
487 return (ENODEV);
488
489 uint8_t *loc;
490 loc = block;
491
492 sc->sc_rintr = intr;
493 sc->sc_rintrarg = intrarg;
494
495 if (bus_space_read_1(sc->sc_tag, sc->sc_handle, ASCMODE) !=
496 MODEFIFO) {
497 bus_space_write_1(sc->sc_tag, sc->sc_handle, ASCMODE, MODESTOP);
498
499 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2) {
500 /* disable half interrupts channel a */
501 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQA,
502 DISABLEHALFIRQ);
503 /* Disable half interrupts channel b */
504 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQB,
505 DISABLEHALFIRQ);
506 /*
507 * Set up dfac for microphone.
508 * DO NOT SET BITS 5-7 due to loud feedback squeal.
509 */
510 configure_dfac(DFAC_GAIN_HIGH);
511 }
512
513 bus_space_write_1(sc->sc_tag, sc->sc_handle, ASCTEST, 0);
514
515 /* start fifo playback */
516 bus_space_write_1(sc->sc_tag, sc->sc_handle, ASCMODE, MODEFIFO);
517
518 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2) {
519 /* enable interrupts channel a */
520 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQA, 0);
521 }
522
523 bus_space_write_1(sc->sc_tag, sc->sc_handle, FIFOPARAM,
524 CLEARFIFO);
525
526 #if 0
527 bus_space_write_4(sc->sc_tag, sc->sc_handle, FIFO_A_ALT, 0);
528 bus_space_write_4(sc->sc_tag, sc->sc_handle, FIFO_B_ALT, 0);
529 #endif
530
531 bus_space_write_1(sc->sc_tag, sc->sc_handle, FIFOPARAM,
532 CLEARFIFO | NONCOMP);
533
534 tmp = RECORDA;
535 bus_space_write_1(sc->sc_tag, sc->sc_handle, APLAYREC, tmp);
536
537 #if 0
538 int i;
539 for (i = 0; i < 0x400; i++) {
540 bus_space_read_1(sc->sc_tag, sc->sc_handle, FIFO_A);
541 bus_space_read_1(sc->sc_tag, sc->sc_handle, FIFO_B);
542 }
543 #endif
544
545 return 0;
546 }
547
548 /* set the volume. */
549 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2) {
550 /* DO NOT CHANGE THESE VALUES UNLESS TESTED.
551 CAN BE VERY LOUD!!!! */
552 tmp = sc->sc_recvol >> 5;
553 KASSERT(tmp <= MACOS_HIGH_VOL);
554 bus_space_write_1(sc->sc_tag, sc->sc_handle, A_LEFT_VOL, tmp);
555 bus_space_write_1(sc->sc_tag, sc->sc_handle, B_LEFT_VOL, tmp);
556 bus_space_write_1(sc->sc_tag, sc->sc_handle, A_RIGHT_VOL, tmp);
557 bus_space_write_1(sc->sc_tag, sc->sc_handle, B_RIGHT_VOL, tmp);
558 }
559 bus_space_write_1(sc->sc_tag, sc->sc_handle, INTVOL, sc->sc_recvol);
560
561 total = blksize;
562 if (sc->sc_getptr + blksize >= sc->sc_recbuf + BUFSIZE)
563 total = sc->sc_recbuf + BUFSIZE - sc->sc_getptr;
564
565 if (total) {
566 memcpy(loc, sc->sc_getptr, total);
567 sc->sc_getptr += total;
568 loc += total;
569 }
570
571 total = blksize - total;
572 if (total) {
573 sc->sc_getptr = sc->sc_recbuf;
574 memcpy(loc, sc->sc_getptr, total);
575 sc->sc_getptr += total;
576 }
577
578 sc->sc_recavail -= blksize;
579
580 return 0;
581 }
582
583 static int
584 ascaudio_halt(void *opaque)
585 {
586 ascaudio_softc_t *sc;
587
588 sc = (ascaudio_softc_t *)opaque;
589
590 KASSERT(mutex_owned(&sc->sc_lock));
591
592 callout_halt(&sc->sc_pcallout, &sc->sc_intr_lock);
593 callout_halt(&sc->sc_rcallout, &sc->sc_intr_lock);
594
595 bus_space_write_1(sc->sc_tag, sc->sc_handle, ASCMODE, MODESTOP);
596
597 sc->sc_pintr = NULL;
598 sc->sc_pintrarg = NULL;
599 sc->sc_rintr = NULL;
600 sc->sc_rintrarg = NULL;
601
602 sc->sc_avail = 0;
603 sc->sc_recavail = 0;
604
605 bus_space_write_1(sc->sc_tag, sc->sc_handle, FIFOPARAM, CLEARFIFO);
606
607 sc->sc_rptr = sc->sc_recbuf;
608 sc->sc_getptr = sc->sc_recbuf;
609 sc->sc_wptr = sc->sc_playbuf;
610 sc->sc_putptr = sc->sc_playbuf;
611
612 if (sc->sc_ver != EASC_VER && sc->sc_ver != EASC_VER2)
613 return 0;
614
615 configure_dfac(DFAC_DISABLE);
616
617 /* disable half interrupts channel a */
618 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQA, DISABLEHALFIRQ);
619 /* disable half interrupts channel b */
620 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQB, DISABLEHALFIRQ);
621
622 return 0;
623 }
624
625 static int
626 ascaudio_getdev(void *opaque, struct audio_device *ret)
627 {
628 strlcpy(ret->name, "Apple ASC Audio", sizeof(ret->name));
629 strlcpy(ret->version, osrelease, sizeof(ret->version));
630 strlcpy(ret->config, "ascaudio", sizeof(ret->config));
631
632 return 0;
633 }
634
635 static int
636 ascaudio_set_port(void *opaque, mixer_ctrl_t *mc)
637 {
638 struct ascaudio_softc *sc = opaque;
639
640 KASSERT(mutex_owned(&sc->sc_lock));
641
642 switch (mc->dev) {
643 case ASC_OUTPUT_MASTER_VOLUME:
644 if (mc->un.value.num_channels != 1)
645 return EINVAL;
646 sc->sc_vol = mc->un.value.level[AUDIO_MIXER_LEVEL_MONO];
647 return 0;
648 case ASC_INPUT_DAC_VOLUME:
649 if (mc->un.value.num_channels != 1)
650 return EINVAL;
651 sc->sc_recvol = mc->un.value.level[AUDIO_MIXER_LEVEL_MONO];
652 return 0;
653 }
654
655 return ENXIO;
656 }
657
658 static int
659 ascaudio_get_port(void *opaque, mixer_ctrl_t *mc)
660 {
661 struct ascaudio_softc *sc = opaque;
662
663 KASSERT(mutex_owned(&sc->sc_lock));
664
665 switch (mc->dev) {
666 case ASC_OUTPUT_MASTER_VOLUME:
667 if (mc->un.value.num_channels != 1)
668 return EINVAL;
669 mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_vol;
670 return 0;
671 case ASC_INPUT_DAC_VOLUME:
672 if (mc->un.value.num_channels != 1)
673 return EINVAL;
674 mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_recvol;
675 return 0;
676 }
677
678 return ENXIO;
679 }
680
681 static int
682 ascaudio_query_devinfo(void *opaque, mixer_devinfo_t *di)
683 {
684 ascaudio_softc_t *sc __diagused;
685
686 sc = (ascaudio_softc_t *)opaque;
687
688 KASSERT(mutex_owned(&sc->sc_lock));
689
690 switch (di->index) {
691 case ASC_OUTPUT_CLASS:
692 di->mixer_class = ASC_OUTPUT_CLASS;
693 strcpy(di->label.name, AudioCoutputs);
694 di->type = AUDIO_MIXER_CLASS;
695 di->next = di->prev = AUDIO_MIXER_LAST;
696 return 0;
697 case ASC_INPUT_CLASS:
698 di->mixer_class = ASC_INPUT_CLASS;
699 strcpy(di->label.name, AudioCinputs);
700 di->type = AUDIO_MIXER_CLASS;
701 di->next = di->prev = AUDIO_MIXER_LAST;
702 return 0;
703 case ASC_OUTPUT_MASTER_VOLUME:
704 di->mixer_class = ASC_OUTPUT_CLASS;
705 strcpy(di->label.name, AudioNmaster);
706 di->type = AUDIO_MIXER_VALUE;
707 di->next = di->prev = AUDIO_MIXER_LAST;
708 di->un.v.num_channels = 1;
709 strcpy(di->un.v.units.name, AudioNvolume);
710 return 0;
711 case ASC_INPUT_DAC_VOLUME:
712 di->mixer_class = ASC_INPUT_CLASS;
713 strcpy(di->label.name, AudioNdac);
714 di->type = AUDIO_MIXER_VALUE;
715 di->next = di->prev = AUDIO_MIXER_LAST;
716 di->un.v.num_channels = 1;
717 strcpy(di->un.v.units.name, AudioNvolume);
718 return 0;
719 }
720
721 return ENXIO;
722 }
723
724 static int
725 ascaudio_get_props(void *opaque)
726 {
727
728 return AUDIO_PROP_PLAYBACK | AUDIO_PROP_CAPTURE |
729 AUDIO_PROP_INDEPENDENT;
730 }
731
732 static int
733 ascaudio_round_blocksize(void *opaque, int blksize, int mode,
734 const audio_params_t *p)
735 {
736 ascaudio_softc_t *sc __diagused;
737
738 sc = (ascaudio_softc_t *)opaque;
739 KASSERT(mutex_owned(&sc->sc_lock));
740
741 if (mode == AUMODE_PLAY)
742 return PLAYBLKSIZE;
743 else
744 return RECBLKSIZE;
745 }
746
747 static void
748 ascaudio_get_locks(void *opaque, kmutex_t **intr, kmutex_t **thread)
749 {
750 ascaudio_softc_t *sc;
751
752 sc = (ascaudio_softc_t *)opaque;
753
754 *intr = &sc->sc_intr_lock;
755 *thread = &sc->sc_lock;
756 }
757
758 static int
759 ascaudio_intr_est(void *arg)
760 {
761 ascaudio_intr(arg);
762
763 return 0;
764 }
765
766 static void
767 ascaudio_intr(void *arg)
768 {
769 struct ascaudio_softc *sc = arg;
770 uint8_t val;
771 int loc_a, loc_b, total, count, i;
772
773 if (!sc)
774 return;
775
776 if (!sc->sc_pintr && !sc->sc_rintr)
777 return;
778
779 mutex_enter(&sc->sc_intr_lock);
780
781 count = 0x200;
782 if (sc->sc_rintr) {
783 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2)
784 bus_space_write_1(sc->sc_tag, sc->sc_handle,
785 IRQA, DISABLEHALFIRQ);
786
787 total = count;
788 if (sc->sc_rptr + count >= sc->sc_recbuf + BUFSIZE)
789 count = sc->sc_recbuf + BUFSIZE - sc->sc_rptr;
790 while (total) {
791 if (sc->sc_ver == EASC_VER2) {
792 loc_a = FIFO_A_ALT;
793 loc_b = FIFO_B_ALT;
794 } else {
795 loc_a = FIFO_A;
796 loc_b = 0;
797 }
798 for (i = 0; i < count; i++) {
799 val = bus_space_read_1(sc->sc_tag,
800 sc->sc_handle, loc_a);
801 val ^= 0x80;
802 *sc->sc_rptr++ = val;
803 if (loc_b) {
804 (void)bus_space_read_1
805 (sc->sc_tag, sc->sc_handle, loc_b);
806 }
807 }
808 if (sc->sc_rptr >= sc->sc_recbuf + BUFSIZE)
809 sc->sc_rptr = sc->sc_recbuf;
810 total -= count;
811 sc->sc_recavail += count;
812 count = total;
813 }
814
815 if (sc->sc_recavail > BUFSIZE)
816 sc->sc_recavail = BUFSIZE;
817
818 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2)
819 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQA, 0);
820
821 goto more;
822 }
823
824 count = 0x200;
825 if (sc->sc_slowcpu)
826 count /= 2;
827
828 if (sc->sc_avail < count) {
829 if (sc->sc_avail) {
830 count = sc->sc_avail;
831 goto fill_fifo;
832 }
833 if (sc->sc_pintr) {
834 for (i = 0; i < 0x200; i++) {
835 bus_space_write_1(sc->sc_tag,
836 sc->sc_handle, FIFO_A, 0x80);
837 bus_space_write_1(sc->sc_tag,
838 sc->sc_handle, FIFO_B, 0x80);
839 }
840 } else {
841 if (sc->sc_slowcpu)
842 count *= 2;
843 for (i = 0; i < count; i++) {
844 bus_space_write_1(sc->sc_tag,
845 sc->sc_handle, FIFO_B, 0x80);
846 }
847 }
848 goto more;
849 }
850
851 fill_fifo:
852 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2)
853 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQB,
854 DISABLEHALFIRQ);
855
856 total = count;
857 if (sc->sc_wptr + count >= sc->sc_playbuf + BUFSIZE)
858 count = sc->sc_playbuf + BUFSIZE - sc->sc_wptr;
859
860 while (total) {
861 if (sc->sc_slowcpu) {
862 for (i = 0; i < count; i++) {
863 val = *sc->sc_wptr++;
864 val ^= 0x80;
865 bus_space_write_1(sc->sc_tag,
866 sc->sc_handle, FIFO_A, val);
867 bus_space_write_1(sc->sc_tag,
868 sc->sc_handle, FIFO_B, val);
869 bus_space_write_1(sc->sc_tag,
870 sc->sc_handle, FIFO_A, val);
871 bus_space_write_1(sc->sc_tag,
872 sc->sc_handle, FIFO_B, val);
873 }
874 } else {
875 for (i = 0; i < count; i++) {
876 val = *sc->sc_wptr++;
877 val ^= 0x80;
878 bus_space_write_1(sc->sc_tag,
879 sc->sc_handle, FIFO_A, val);
880 bus_space_write_1(sc->sc_tag,
881 sc->sc_handle, FIFO_B, val);
882 }
883 }
884 if (sc->sc_wptr >= sc->sc_playbuf + BUFSIZE)
885 sc->sc_wptr = sc->sc_playbuf;
886 total -= count;
887 sc->sc_avail -= count;
888 count = total;
889 }
890 if (sc->sc_ver == EASC_VER || sc->sc_ver == EASC_VER2)
891 bus_space_write_1(sc->sc_tag, sc->sc_handle, IRQB, 0);
892
893 more:
894 if (sc->sc_pintr && (sc->sc_avail <= PLAYBLKSIZE))
895 callout_schedule(&sc->sc_pcallout, 0);
896
897 if (sc->sc_rintr && (sc->sc_recavail >= RECBLKSIZE))
898 callout_schedule(&sc->sc_rcallout, 0);
899
900 mutex_exit(&sc->sc_intr_lock);
901 }
902
903 static void
904 ascaudio_intr_enable(void)
905 {
906 int s;
907
908 s = splhigh();
909 if (VIA2 == VIA2OFF)
910 via2_reg(vIER) = 0x80 | V2IF_ASC;
911 else
912 via2_reg(rIER) = 0x80 | V2IF_ASC;
913 splx(s);
914 }
915
916 static void
917 ascaudio_done_output(void *arg)
918 {
919 struct ascaudio_softc *sc = arg;
920
921 mutex_enter(&sc->sc_intr_lock);
922 if (sc->sc_pintr)
923 (*sc->sc_pintr)(sc->sc_pintrarg);
924 mutex_exit(&sc->sc_intr_lock);
925 }
926
927 static void
928 ascaudio_done_input(void *arg)
929 {
930 struct ascaudio_softc *sc = arg;
931
932 mutex_enter(&sc->sc_intr_lock);
933 if (sc->sc_rintr)
934 (*sc->sc_rintr)(sc->sc_rintrarg);
935 mutex_exit(&sc->sc_intr_lock);
936 }
937 static void
938 configure_dfac(uint8_t config)
939 {
940 int i;
941
942 if (pmHardware == PM_HW_PB5XX)
943 return; /* These macs use the pm to configure dfac */
944
945 for (i = 0; i < 8; i++) {
946 via_reg(VIA2, vBufB) &= ~DFAC_CLOCK;
947
948 if (config & 0x1)
949 via_reg(VIA2, vBufB) |= DFAC_DATA;
950 else
951 via_reg(VIA2, vBufB) &= ~DFAC_DATA;
952
953 via_reg(VIA2, vBufB) |= DFAC_CLOCK;
954 config >>= 1;
955 }
956 via_reg(VIA2, vBufB) &= ~DFAC_CLOCK;
957 via_reg(VIA2, vBufB) |= DFAC_LATCH;
958 via_reg(VIA2, vBufB) &= ~DFAC_LATCH;
959 }
960
961 #ifdef _MODULE
962
963 MODULE(MODULE_CLASS_DRIVER, ascaudio, "audio");
964
965 static const struct cfiattrdata audiobuscf_iattrdata = {
966 "audiobus", 0, { { NULL, NULL, 0 }, }
967 };
968 static const struct cfiattrdata * const ascaudio_attrs[] = {
969 &audiobuscf_iattrdata, NULL
970 };
971
972 CFDRIVER_DECL(ascaudio, DV_DULL, ascaud_attrs);
973 extern struct cfattach ascaudio_ca;
974 static int ascaudioloc[] = { -1, -1 };
975
976 static struct cfdata ascaudio_cfdata[] = {
977 {
978 .cf_name = "ascaudio",
979 .cf_atname = "ascaudio",
980 .cf_unit = 0,
981 .cf_fstate = FSTATE_STAR,
982 .cf_loc = ascaudioloc,
983 .cf_flags = 0,
984 .cf_pspec = NULL,
985 },
986 { NULL, NULL, 0, 0, NULL, 0, NULL }
987 };
988
989 static int
990 ascaudio_modcmd(modcmd_t cmd, void *arg)
991 {
992 devmajor_t cmajor = NODEVMAJOR, bmajor = NODEVMAJOR;
993 int error;
994
995 switch (cmd) {
996 case MODULE_CMD_INIT:
997 error = config_cfdriver_attach(&ascaudio_cd);
998 if (error) {
999 return error;
1000 }
1001
1002 error = config_cfattach_attach(ascaudio_cd.cd_name, &ascaud_ca);
1003 if (error) {
1004 config_cfdriver_detach(&ascaudio_cd);
1005 aprint_error("%s: unable to register cfattach\n",
1006 ascaudio_cd.cd_name);
1007
1008 return error;
1009 }
1010
1011 error = config_cfdata_attach(ascaudio_cfdata, 1);
1012 if (error) {
1013 config_cfattach_detach(ascaudio_cd.cd_name, &ascaud_ca);
1014 config_cfdriver_detach(&ascaudio_cd);
1015 aprint_error("%s: unable to register cfdata\n",
1016 ascaudio_cd.cd_name);
1017
1018 return error;
1019 }
1020
1021 error = devsw_attach(ascaudio_cd.cd_name, NULL, &bmajor,
1022 &ascaudio_cdevsw, &cmajor);
1023 if (error) {
1024 error = config_cfdata_detach(ascaudio_cfdata);
1025 if (error) {
1026 return error;
1027 }
1028 config_cfattach_detach(ascaudio_cd.cd_name, &ascaud_ca);
1029 config_cfdriver_detach(&ascaudio_cd);
1030 aprint_error("%s: unable to register devsw\n",
1031 ascaudio_cd.cd_name);
1032
1033 return error;
1034 }
1035
1036 (void)config_attach_pseudo(ascaudio_cfdata);
1037
1038 return 0;
1039 case MODULE_CMD_FINI:
1040 error = config_cfdata_detach(ascaudio_cfdata);
1041 if (error) {
1042 return error;
1043 }
1044
1045 config_cfattach_detach(ascaudio_cd.cd_name, &ascaud_ca);
1046 config_cfdriver_detach(&ascaudio_cd);
1047 devsw_detach(NULL, &ascaudio_cdevsw);
1048
1049 return 0;
1050 default:
1051 return ENOTTY;
1052 }
1053 }
1054
1055 #endif
1056