autri.c revision 1.35 1 /* $NetBSD: autri.c,v 1.35 2007/10/19 12:00:40 ad Exp $ */
2
3 /*
4 * Copyright (c) 2001 SOMEYA Yoshihiko and KUROSAWA Takahiro.
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 AUTHOR ``AS IS'' AND ANY EXPRESS OR
17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 */
27
28 /*
29 * Trident 4DWAVE-DX/NX, SiS 7018, ALi M5451 Sound Driver
30 *
31 * The register information is taken from the ALSA driver.
32 *
33 * Documentation links:
34 * - ftp://ftp.alsa-project.org/pub/manuals/trident/
35 */
36
37 #include <sys/cdefs.h>
38 __KERNEL_RCSID(0, "$NetBSD: autri.c,v 1.35 2007/10/19 12:00:40 ad Exp $");
39
40 #include "midi.h"
41
42 #include <sys/param.h>
43 #include <sys/systm.h>
44 #include <sys/kernel.h>
45 #include <sys/fcntl.h>
46 #include <sys/malloc.h>
47 #include <sys/device.h>
48 #include <sys/proc.h>
49
50 #include <dev/pci/pcidevs.h>
51 #include <dev/pci/pcireg.h>
52 #include <dev/pci/pcivar.h>
53
54 #include <sys/audioio.h>
55 #include <dev/audio_if.h>
56 #include <dev/midi_if.h>
57 #include <dev/mulaw.h>
58 #include <dev/auconv.h>
59 #include <dev/ic/ac97reg.h>
60 #include <dev/ic/ac97var.h>
61 #include <dev/ic/mpuvar.h>
62
63 #include <sys/bus.h>
64 #include <sys/intr.h>
65
66 #include <dev/pci/autrireg.h>
67 #include <dev/pci/autrivar.h>
68
69 #ifdef AUDIO_DEBUG
70 # define DPRINTF(x) if (autridebug) printf x
71 # define DPRINTFN(n,x) if (autridebug > (n)) printf x
72 int autridebug = 0;
73 #else
74 # define DPRINTF(x)
75 # define DPRINTFN(n,x)
76 #endif
77
78 static int autri_intr(void *);
79
80 #define DMAADDR(p) ((p)->map->dm_segs[0].ds_addr)
81 #define KERNADDR(p) ((void *)((p)->addr))
82
83 static int autri_allocmem(struct autri_softc *, size_t,
84 size_t, struct autri_dma *);
85 static int autri_freemem(struct autri_softc *, struct autri_dma *);
86
87 #define TWRITE1(sc, r, x) bus_space_write_1((sc)->memt, (sc)->memh, (r), (x))
88 #define TWRITE2(sc, r, x) bus_space_write_2((sc)->memt, (sc)->memh, (r), (x))
89 #define TWRITE4(sc, r, x) bus_space_write_4((sc)->memt, (sc)->memh, (r), (x))
90 #define TREAD1(sc, r) bus_space_read_1((sc)->memt, (sc)->memh, (r))
91 #define TREAD2(sc, r) bus_space_read_2((sc)->memt, (sc)->memh, (r))
92 #define TREAD4(sc, r) bus_space_read_4((sc)->memt, (sc)->memh, (r))
93
94 static int autri_attach_codec(void *, struct ac97_codec_if *);
95 static int autri_read_codec(void *, uint8_t, uint16_t *);
96 static int autri_write_codec(void *, uint8_t, uint16_t);
97 static int autri_reset_codec(void *);
98 static enum ac97_host_flags autri_flags_codec(void *);
99
100 static void autri_powerhook(int, void *);
101 static int autri_init(void *);
102 static struct autri_dma *autri_find_dma(struct autri_softc *, void *);
103 static void autri_setup_channel(struct autri_softc *, int,
104 const audio_params_t *param);
105 static void autri_enable_interrupt(struct autri_softc *, int);
106 static void autri_disable_interrupt(struct autri_softc *, int);
107 static void autri_startch(struct autri_softc *, int, int);
108 static void autri_stopch(struct autri_softc *, int, int);
109 static void autri_enable_loop_interrupt(void *);
110 #if 0
111 static void autri_disable_loop_interrupt(void *);
112 #endif
113
114 static int autri_open(void *, int);
115 static int autri_query_encoding(void *, struct audio_encoding *);
116 static int autri_set_params(void *, int, int, audio_params_t *,
117 audio_params_t *, stream_filter_list_t *,
118 stream_filter_list_t *);
119 static int autri_round_blocksize(void *, int, int, const audio_params_t *);
120 static int autri_trigger_output(void *, void *, void *, int,
121 void (*)(void *), void *,
122 const audio_params_t *);
123 static int autri_trigger_input(void *, void *, void *, int,
124 void (*)(void *), void *,
125 const audio_params_t *);
126 static int autri_halt_output(void *);
127 static int autri_halt_input(void *);
128 static int autri_getdev(void *, struct audio_device *);
129 static int autri_mixer_set_port(void *, mixer_ctrl_t *);
130 static int autri_mixer_get_port(void *, mixer_ctrl_t *);
131 static void* autri_malloc(void *, int, size_t, struct malloc_type *, int);
132 static void autri_free(void *, void *, struct malloc_type *);
133 static size_t autri_round_buffersize(void *, int, size_t);
134 static paddr_t autri_mappage(void *, void *, off_t, int);
135 static int autri_get_props(void *);
136 static int autri_query_devinfo(void *, mixer_devinfo_t *);
137
138 static const struct audio_hw_if autri_hw_if = {
139 autri_open,
140 NULL, /* close */
141 NULL, /* drain */
142 autri_query_encoding,
143 autri_set_params,
144 autri_round_blocksize,
145 NULL, /* commit_settings */
146 NULL, /* init_output */
147 NULL, /* init_input */
148 NULL, /* start_output */
149 NULL, /* start_input */
150 autri_halt_output,
151 autri_halt_input,
152 NULL, /* speaker_ctl */
153 autri_getdev,
154 NULL, /* setfd */
155 autri_mixer_set_port,
156 autri_mixer_get_port,
157 autri_query_devinfo,
158 autri_malloc,
159 autri_free,
160 autri_round_buffersize,
161 autri_mappage,
162 autri_get_props,
163 autri_trigger_output,
164 autri_trigger_input,
165 NULL, /* dev_ioctl */
166 NULL, /* powerstate */
167 };
168
169 #if NMIDI > 0
170 static void autri_midi_close(void *);
171 static void autri_midi_getinfo(void *, struct midi_info *);
172 static int autri_midi_open(void *, int, void (*)(void *, int),
173 void (*)(void *), void *);
174 static int autri_midi_output(void *, int);
175
176 static const struct midi_hw_if autri_midi_hw_if = {
177 autri_midi_open,
178 autri_midi_close,
179 autri_midi_output,
180 autri_midi_getinfo,
181 NULL, /* ioctl */
182 };
183 #endif
184
185 #define AUTRI_NFORMATS 8
186 static const struct audio_format autri_formats[AUTRI_NFORMATS] = {
187 {NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
188 2, AUFMT_STEREO, 0, {4000, 48000}},
189 {NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
190 1, AUFMT_MONAURAL, 0, {4000, 48000}},
191 {NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_ULINEAR_LE, 16, 16,
192 2, AUFMT_STEREO, 0, {4000, 48000}},
193 {NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_ULINEAR_LE, 16, 16,
194 1, AUFMT_MONAURAL, 0, {4000, 48000}},
195 {NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_ULINEAR_LE, 8, 8,
196 2, AUFMT_STEREO, 0, {4000, 48000}},
197 {NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_ULINEAR_LE, 8, 8,
198 1, AUFMT_MONAURAL, 0, {4000, 48000}},
199 {NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_SLINEAR_LE, 8, 8,
200 2, AUFMT_STEREO, 0, {4000, 48000}},
201 {NULL, AUMODE_PLAY | AUMODE_RECORD, AUDIO_ENCODING_SLINEAR_LE, 8, 8,
202 1, AUFMT_MONAURAL, 0, {4000, 48000}},
203 };
204
205 /*
206 * register set/clear bit
207 */
208 static inline void
209 autri_reg_set_1(struct autri_softc *sc, int no, uint8_t mask)
210 {
211 bus_space_write_1(sc->memt, sc->memh, no,
212 (bus_space_read_1(sc->memt, sc->memh, no) | mask));
213 }
214
215 static inline void
216 autri_reg_clear_1(struct autri_softc *sc, int no, uint8_t mask)
217 {
218 bus_space_write_1(sc->memt, sc->memh, no,
219 (bus_space_read_1(sc->memt, sc->memh, no) & ~mask));
220 }
221
222 static inline void
223 autri_reg_set_4(struct autri_softc *sc, int no, uint32_t mask)
224 {
225 bus_space_write_4(sc->memt, sc->memh, no,
226 (bus_space_read_4(sc->memt, sc->memh, no) | mask));
227 }
228
229 static inline void
230 autri_reg_clear_4(struct autri_softc *sc, int no, uint32_t mask)
231 {
232 bus_space_write_4(sc->memt, sc->memh, no,
233 (bus_space_read_4(sc->memt, sc->memh, no) & ~mask));
234 }
235
236 /*
237 * AC'97 codec
238 */
239 static int
240 autri_attach_codec(void *sc_, struct ac97_codec_if *codec_if)
241 {
242 struct autri_codec_softc *sc;
243
244 DPRINTF(("autri_attach_codec()\n"));
245 sc = sc_;
246 sc->codec_if = codec_if;
247 return 0;
248 }
249
250 static int
251 autri_read_codec(void *sc_, uint8_t index, uint16_t *data)
252 {
253 struct autri_codec_softc *codec;
254 struct autri_softc *sc;
255 uint32_t status, addr, cmd, busy;
256 uint16_t count;
257
258 codec = sc_;
259 sc = codec->sc;
260 /*DPRINTF(("sc->sc->type : 0x%X",sc->sc->type));*/
261
262 switch (sc->sc_devid) {
263 case AUTRI_DEVICE_ID_4DWAVE_DX:
264 addr = AUTRI_DX_ACR1;
265 cmd = AUTRI_DX_ACR1_CMD_READ;
266 busy = AUTRI_DX_ACR1_BUSY_READ;
267 break;
268 case AUTRI_DEVICE_ID_4DWAVE_NX:
269 addr = AUTRI_NX_ACR2;
270 cmd = AUTRI_NX_ACR2_CMD_READ;
271 busy = AUTRI_NX_ACR2_BUSY_READ | AUTRI_NX_ACR2_RECV_WAIT;
272 break;
273 case AUTRI_DEVICE_ID_SIS_7018:
274 addr = AUTRI_SIS_ACRD;
275 cmd = AUTRI_SIS_ACRD_CMD_READ;
276 busy = AUTRI_SIS_ACRD_BUSY_READ | AUTRI_SIS_ACRD_AUDIO_BUSY;
277 break;
278 case AUTRI_DEVICE_ID_ALI_M5451:
279 if (sc->sc_revision > 0x01)
280 addr = AUTRI_ALI_ACWR;
281 else
282 addr = AUTRI_ALI_ACRD;
283 cmd = AUTRI_ALI_ACRD_CMD_READ;
284 busy = AUTRI_ALI_ACRD_BUSY_READ;
285 break;
286 default:
287 printf("%s: autri_read_codec : unknown device\n",
288 sc->sc_dev.dv_xname);
289 return -1;
290 }
291
292 /* wait for 'Ready to Read' */
293 for (count=0; count<0xffff; count++) {
294 if ((TREAD4(sc, addr) & busy) == 0)
295 break;
296 }
297
298 if (count == 0xffff) {
299 printf("%s: Codec timeout. Busy reading AC'97 codec.\n",
300 sc->sc_dev.dv_xname);
301 return -1;
302 }
303
304 /* send Read Command to AC'97 */
305 TWRITE4(sc, addr, (index & 0x7f) | cmd);
306
307 /* wait for 'Returned data is avalable' */
308 for (count=0; count<0xffff; count++) {
309 status = TREAD4(sc, addr);
310 if ((status & busy) == 0)
311 break;
312 }
313
314 if (count == 0xffff) {
315 printf("%s: Codec timeout. Busy reading AC'97 codec.\n",
316 sc->sc_dev.dv_xname);
317 return -1;
318 }
319
320 *data = (status >> 16) & 0x0000ffff;
321 /*DPRINTF(("autri_read_codec(0x%X) return 0x%X\n",reg,*data));*/
322 return 0;
323 }
324
325 static int
326 autri_write_codec(void *sc_, uint8_t index, uint16_t data)
327 {
328 struct autri_codec_softc *codec;
329 struct autri_softc *sc;
330 uint32_t addr, cmd, busy;
331 uint16_t count;
332
333 codec = sc_;
334 sc = codec->sc;
335 /*DPRINTF(("autri_write_codec(0x%X,0x%X)\n",index,data));*/
336
337 switch (sc->sc_devid) {
338 case AUTRI_DEVICE_ID_4DWAVE_DX:
339 addr = AUTRI_DX_ACR0;
340 cmd = AUTRI_DX_ACR0_CMD_WRITE;
341 busy = AUTRI_DX_ACR0_BUSY_WRITE;
342 break;
343 case AUTRI_DEVICE_ID_4DWAVE_NX:
344 addr = AUTRI_NX_ACR1;
345 cmd = AUTRI_NX_ACR1_CMD_WRITE;
346 busy = AUTRI_NX_ACR1_BUSY_WRITE;
347 break;
348 case AUTRI_DEVICE_ID_SIS_7018:
349 addr = AUTRI_SIS_ACWR;
350 cmd = AUTRI_SIS_ACWR_CMD_WRITE;
351 busy = AUTRI_SIS_ACWR_BUSY_WRITE | AUTRI_SIS_ACWR_AUDIO_BUSY;
352 break;
353 case AUTRI_DEVICE_ID_ALI_M5451:
354 addr = AUTRI_ALI_ACWR;
355 cmd = AUTRI_ALI_ACWR_CMD_WRITE;
356 if (sc->sc_revision > 0x01)
357 cmd |= 0x0100;
358 busy = AUTRI_ALI_ACWR_BUSY_WRITE;
359 break;
360 default:
361 printf("%s: autri_write_codec : unknown device.\n",
362 sc->sc_dev.dv_xname);
363 return -1;
364 }
365
366 /* wait for 'Ready to Write' */
367 for (count=0; count<0xffff; count++) {
368 if ((TREAD4(sc, addr) & busy) == 0)
369 break;
370 }
371
372 if (count == 0xffff) {
373 printf("%s: Codec timeout. Busy writing AC'97 codec\n",
374 sc->sc_dev.dv_xname);
375 return -1;
376 }
377
378 /* send Write Command to AC'97 */
379 TWRITE4(sc, addr, (data << 16) | (index & 0x7f) | cmd);
380
381 return 0;
382 }
383
384 static int
385 autri_reset_codec(void *sc_)
386 {
387 struct autri_codec_softc *codec;
388 struct autri_softc *sc;
389 uint32_t reg, ready;
390 int addr, count;
391
392 codec = sc_;
393 sc = codec->sc;
394 count = 200;
395 DPRINTF(("autri_reset_codec(codec=%p,sc=%p)\n", codec, sc));
396 DPRINTF(("sc->sc_devid=%X\n", sc->sc_devid));
397
398 switch (sc->sc_devid) {
399 case AUTRI_DEVICE_ID_4DWAVE_DX:
400 /* warm reset AC'97 codec */
401 autri_reg_set_4(sc, AUTRI_DX_ACR2, 1);
402 delay(100);
403 /* release reset */
404 autri_reg_clear_4(sc, AUTRI_DX_ACR2, 1);
405 delay(100);
406
407 addr = AUTRI_DX_ACR2;
408 ready = AUTRI_DX_ACR2_CODEC_READY;
409 break;
410 case AUTRI_DEVICE_ID_4DWAVE_NX:
411 /* warm reset AC'97 codec */
412 autri_reg_set_4(sc, AUTRI_NX_ACR0, 1);
413 delay(100);
414 /* release reset */
415 autri_reg_clear_4(sc, AUTRI_NX_ACR0, 1);
416 delay(100);
417
418 addr = AUTRI_NX_ACR0;
419 ready = AUTRI_NX_ACR0_CODEC_READY;
420 break;
421 case AUTRI_DEVICE_ID_SIS_7018:
422 /* cold reset AC'97 codec */
423 autri_reg_set_4(sc, AUTRI_SIS_SCTRL, 2);
424 delay(1000);
425 /* release reset (warm & cold) */
426 autri_reg_clear_4(sc, AUTRI_SIS_SCTRL, 3);
427 delay(2000);
428
429 addr = AUTRI_SIS_SCTRL;
430 ready = AUTRI_SIS_SCTRL_CODEC_READY;
431 break;
432 case AUTRI_DEVICE_ID_ALI_M5451:
433 /* warm reset AC'97 codec */
434 autri_reg_set_4(sc, AUTRI_ALI_SCTRL, 1);
435 delay(100);
436 /* release reset (warm & cold) */
437 autri_reg_clear_4(sc, AUTRI_ALI_SCTRL, 3);
438 delay(100);
439
440 addr = AUTRI_ALI_SCTRL;
441 ready = AUTRI_ALI_SCTRL_CODEC_READY;
442 break;
443 default:
444 printf("%s: autri_reset_codec : unknown device\n",
445 sc->sc_dev.dv_xname);
446 return EOPNOTSUPP;
447 }
448
449 /* wait for 'Codec Ready' */
450 while (count--) {
451 reg = TREAD4(sc, addr);
452 if (reg & ready)
453 break;
454 delay(1000);
455 }
456
457 if (count == 0) {
458 printf("%s: Codec timeout. AC'97 is not ready for operation.\n",
459 sc->sc_dev.dv_xname);
460 return ETIMEDOUT;
461 }
462 return 0;
463 }
464
465 static enum ac97_host_flags
466 autri_flags_codec(void *sc)
467 {
468 return AC97_HOST_DONT_READ;
469 }
470
471 /*
472 *
473 */
474
475 static int
476 autri_match(struct device *parent, struct cfdata *match,
477 void *aux)
478 {
479 struct pci_attach_args *pa;
480
481 pa = (struct pci_attach_args *)aux;
482 switch (PCI_VENDOR(pa->pa_id)) {
483 case PCI_VENDOR_TRIDENT:
484 switch (PCI_PRODUCT(pa->pa_id)) {
485 case PCI_PRODUCT_TRIDENT_4DWAVE_DX:
486 /*
487 * IBM makes a pcn network card and improperly
488 * sets the vendor and product ID's. Avoid matching.
489 */
490 if (PCI_CLASS(pa->pa_class) == PCI_CLASS_NETWORK)
491 return 0;
492 /* FALLTHROUGH */
493 case PCI_PRODUCT_TRIDENT_4DWAVE_NX:
494 return 1;
495 }
496 break;
497 case PCI_VENDOR_SIS:
498 switch (PCI_PRODUCT(pa->pa_id)) {
499 case PCI_PRODUCT_SIS_7018:
500 return 1;
501 }
502 break;
503 case PCI_VENDOR_ALI:
504 switch (PCI_PRODUCT(pa->pa_id)) {
505 case PCI_PRODUCT_ALI_M5451:
506 return 1;
507 }
508 break;
509 }
510
511 return 0;
512 }
513
514 static void
515 autri_attach(struct device *parent, struct device *self, void *aux)
516 {
517 struct autri_softc *sc;
518 struct pci_attach_args *pa;
519 pci_chipset_tag_t pc;
520 struct autri_codec_softc *codec;
521 pci_intr_handle_t ih;
522 char const *intrstr;
523 char devinfo[256];
524 int r;
525 uint32_t reg;
526
527 sc = (struct autri_softc *)self;
528 pa = (struct pci_attach_args *)aux;
529 pc = pa->pa_pc;
530 aprint_naive(": Audio controller\n");
531
532 sc->sc_devid = pa->pa_id;
533 sc->sc_class = pa->pa_class;
534
535 pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo, sizeof(devinfo));
536 sc->sc_revision = PCI_REVISION(pa->pa_class);
537 aprint_normal(": %s (rev. 0x%02x)\n", devinfo, sc->sc_revision);
538
539 /* map register to memory */
540 if (pci_mapreg_map(pa, AUTRI_PCI_MEMORY_BASE,
541 PCI_MAPREG_TYPE_MEM, 0, &sc->memt, &sc->memh, NULL, NULL)) {
542 aprint_error("%s: can't map memory space\n",
543 sc->sc_dev.dv_xname);
544 return;
545 }
546
547 /* map and establish the interrupt */
548 if (pci_intr_map(pa, &ih)) {
549 aprint_error("%s: couldn't map interrupt\n",
550 sc->sc_dev.dv_xname);
551 return;
552 }
553 intrstr = pci_intr_string(pc, ih);
554 sc->sc_ih = pci_intr_establish(pc, ih, IPL_AUDIO, autri_intr, sc);
555 if (sc->sc_ih == NULL) {
556 aprint_error("%s: couldn't establish interrupt",
557 sc->sc_dev.dv_xname);
558 if (intrstr != NULL)
559 aprint_normal(" at %s", intrstr);
560 aprint_normal("\n");
561 return;
562 }
563 aprint_normal("%s: interrupting at %s\n", sc->sc_dev.dv_xname, intrstr);
564
565 sc->sc_dmatag = pa->pa_dmat;
566 sc->sc_pc = pc;
567 sc->sc_pt = pa->pa_tag;
568
569 /* enable the device */
570 reg = pci_conf_read(pc, pa->pa_tag, PCI_COMMAND_STATUS_REG);
571 reg |= (PCI_COMMAND_MEM_ENABLE | PCI_COMMAND_MASTER_ENABLE);
572 pci_conf_write(pc, pa->pa_tag, PCI_COMMAND_STATUS_REG, reg);
573
574 /* initialize the device */
575 autri_init(sc);
576
577 /* attach AC'97 codec */
578 codec = &sc->sc_codec;
579 memcpy(&codec->sc_dev, &sc->sc_dev, sizeof(codec->sc_dev));
580 codec->sc = sc;
581
582 codec->host_if.arg = codec;
583 codec->host_if.attach = autri_attach_codec;
584 codec->host_if.reset = autri_reset_codec;
585 codec->host_if.read = autri_read_codec;
586 codec->host_if.write = autri_write_codec;
587 codec->host_if.flags = autri_flags_codec;
588
589 if ((r = ac97_attach(&codec->host_if, self)) != 0) {
590 aprint_error("%s: can't attach codec (error 0x%X)\n",
591 sc->sc_dev.dv_xname, r);
592 return;
593 }
594
595 audio_attach_mi(&autri_hw_if, sc, &sc->sc_dev);
596
597 #if NMIDI > 0
598 midi_attach_mi(&autri_midi_hw_if, sc, &sc->sc_dev);
599 #endif
600
601 sc->sc_old_power = PWR_RESUME;
602 powerhook_establish(sc->sc_dev.dv_xname, autri_powerhook, sc);
603 }
604
605 CFATTACH_DECL(autri, sizeof(struct autri_softc),
606 autri_match, autri_attach, NULL, NULL);
607
608 static void
609 autri_powerhook(int why, void *addr)
610 {
611 struct autri_softc *sc;
612
613 sc = addr;
614 if (why == PWR_RESUME && sc->sc_old_power == PWR_SUSPEND) {
615 DPRINTF(("PWR_RESUME\n"));
616 autri_init(sc);
617 /*autri_reset_codec(&sc->sc_codec);*/
618 (sc->sc_codec.codec_if->vtbl->restore_ports)(sc->sc_codec.codec_if);
619 }
620 sc->sc_old_power = why;
621 }
622
623 static int
624 autri_init(void *sc_)
625 {
626 struct autri_softc *sc;
627 uint32_t reg;
628 pci_chipset_tag_t pc;
629 pcitag_t pt;
630
631 sc = sc_;
632 pc = sc->sc_pc;
633 pt = sc->sc_pt;
634 DPRINTF(("in autri_init()\n"));
635 DPRINTFN(5,("pci_conf_read(0x40) : 0x%X\n",pci_conf_read(pc,pt,0x40)));
636 DPRINTFN(5,("pci_conf_read(0x44) : 0x%X\n",pci_conf_read(pc,pt,0x44)));
637
638 switch (sc->sc_devid) {
639 case AUTRI_DEVICE_ID_4DWAVE_DX:
640 /* disable Legacy Control */
641 pci_conf_write(pc, pt, AUTRI_PCI_DDMA_CFG,0);
642 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
643 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg & 0xffff0000);
644 delay(100);
645 /* audio engine reset */
646 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
647 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg | 0x00040000);
648 delay(100);
649 /* release reset */
650 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
651 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg & ~0x00040000);
652 delay(100);
653 /* DAC on */
654 autri_reg_set_4(sc,AUTRI_DX_ACR2,0x02);
655 break;
656 case AUTRI_DEVICE_ID_4DWAVE_NX:
657 /* disable Legacy Control */
658 pci_conf_write(pc, pt, AUTRI_PCI_DDMA_CFG,0);
659 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
660 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg & 0xffff0000);
661 delay(100);
662 /* audio engine reset */
663 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
664 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg | 0x00010000);
665 delay(100);
666 /* release reset */
667 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
668 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg & ~0x00010000);
669 delay(100);
670 /* DAC on */
671 autri_reg_set_4(sc,AUTRI_NX_ACR0,0x02);
672 break;
673 case AUTRI_DEVICE_ID_SIS_7018:
674 /* disable Legacy Control */
675 pci_conf_write(pc, pt, AUTRI_PCI_DDMA_CFG,0);
676 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
677 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg & 0xffff0000);
678 delay(100);
679 /* reset Digital Controller */
680 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
681 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg | 0x000c0000);
682 delay(100);
683 /* release reset */
684 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
685 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg & ~0x00040000);
686 delay(100);
687 /* disable AC97 GPIO interrupt */
688 TWRITE1(sc, AUTRI_SIS_ACGPIO, 0);
689 /* enable 64 channel mode */
690 autri_reg_set_4(sc, AUTRI_LFO_GC_CIR, BANK_B_EN);
691 break;
692 case AUTRI_DEVICE_ID_ALI_M5451:
693 /* disable Legacy Control */
694 pci_conf_write(pc, pt, AUTRI_PCI_DDMA_CFG,0);
695 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
696 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg & 0xffff0000);
697 delay(100);
698 /* reset Digital Controller */
699 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
700 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg | 0x000c0000);
701 delay(100);
702 /* release reset */
703 reg = pci_conf_read(pc, pt, AUTRI_PCI_LEGACY_IOBASE);
704 pci_conf_write(pc, pt, AUTRI_PCI_LEGACY_IOBASE, reg & ~0x00040000);
705 delay(100);
706 /* enable PCM input */
707 autri_reg_set_4(sc, AUTRI_ALI_GCONTROL, AUTRI_ALI_GCONTROL_PCM_IN);
708 break;
709 }
710
711 if (sc->sc_devid == AUTRI_DEVICE_ID_ALI_M5451) {
712 sc->sc_play.ch = 0;
713 sc->sc_play.ch_intr = 1;
714 sc->sc_rec.ch = 31;
715 sc->sc_rec.ch_intr = 2;
716 } else {
717 sc->sc_play.ch = 0x20;
718 sc->sc_play.ch_intr = 0x21;
719 sc->sc_rec.ch = 0x22;
720 sc->sc_rec.ch_intr = 0x23;
721 }
722
723 /* clear channel status */
724 TWRITE4(sc, AUTRI_STOP_A, 0xffffffff);
725 TWRITE4(sc, AUTRI_STOP_B, 0xffffffff);
726
727 /* disable channel interrupt */
728 TWRITE4(sc, AUTRI_AINTEN_A, 0);
729 TWRITE4(sc, AUTRI_AINTEN_B, 0);
730
731 #if 0
732 /* TLB */
733 if (sc->sc_devid == AUTRI_DEVICE_ID_4DWAVE_NX) {
734 TWRITE4(sc,AUTRI_NX_TLBC,0);
735 }
736 #endif
737
738 autri_enable_loop_interrupt(sc);
739
740 DPRINTF(("out autri_init()\n"));
741 return 0;
742 }
743
744 static void
745 autri_enable_loop_interrupt(void *sc_)
746 {
747 struct autri_softc *sc;
748 uint32_t reg;
749
750 /*reg = (ENDLP_IE | MIDLP_IE);*/
751 reg = ENDLP_IE;
752 sc = sc_;
753 if (sc->sc_devid == AUTRI_DEVICE_ID_SIS_7018)
754 reg |= BANK_B_EN;
755
756 autri_reg_set_4(sc, AUTRI_LFO_GC_CIR, reg);
757 }
758
759 #if 0
760 static void
761 autri_disable_loop_interrupt(void *sc_)
762 {
763 struct autri_softc *sc;
764 uint32_t reg;
765
766 reg = (ENDLP_IE | MIDLP_IE);
767 sc = sc_;
768 autri_reg_clear_4(sc, AUTRI_LFO_GC_CIR, reg);
769 }
770 #endif
771
772 static int
773 autri_intr(void *p)
774 {
775 struct autri_softc *sc;
776 uint32_t intsrc;
777 uint32_t mask, active[2];
778 int ch, endch;
779 /*
780 u_int32_t reg;
781 u_int32_t cso,eso;
782 */
783 sc = p;
784 intsrc = TREAD4(sc, AUTRI_MISCINT);
785 if ((intsrc & (ADDRESS_IRQ | MPU401_IRQ)) == 0)
786 return 0;
787
788 if (intsrc & ADDRESS_IRQ) {
789
790 active[0] = TREAD4(sc,AUTRI_AIN_A);
791 active[1] = TREAD4(sc,AUTRI_AIN_B);
792
793 if (sc->sc_devid == AUTRI_DEVICE_ID_ALI_M5451) {
794 endch = 32;
795 } else {
796 endch = 64;
797 }
798
799 for (ch = 0; ch < endch; ch++) {
800 mask = 1 << (ch & 0x1f);
801 if (active[(ch & 0x20) ? 1 : 0] & mask) {
802
803 /* clear interrupt */
804 TWRITE4(sc, (ch & 0x20) ? AUTRI_AIN_B : AUTRI_AIN_A, mask);
805 /* disable interrupt */
806 autri_reg_clear_4(sc,(ch & 0x20) ? AUTRI_AINTEN_B : AUTRI_AINTEN_A, mask);
807 #if 0
808 reg = TREAD4(sc,AUTRI_LFO_GC_CIR) & ~0x0000003f;
809 TWRITE4(sc,AUTRI_LFO_GC_CIR, reg | ch);
810
811 if (sc->sc_devid == AUTRI_DEVICE_ID_4DWAVE_NX) {
812 cso = TREAD4(sc, 0xe0) & 0x00ffffff;
813 eso = TREAD4(sc, 0xe8) & 0x00ffffff;
814 } else {
815 cso = (TREAD4(sc, 0xe0) >> 16) & 0x0000ffff;
816 eso = (TREAD4(sc, 0xe8) >> 16) & 0x0000ffff;
817 }
818 /*printf("cso=%d, eso=%d\n",cso,eso);*/
819 #endif
820 if (ch == sc->sc_play.ch_intr) {
821 if (sc->sc_play.intr)
822 sc->sc_play.intr(sc->sc_play.intr_arg);
823 }
824
825 if (ch == sc->sc_rec.ch_intr) {
826 if (sc->sc_rec.intr)
827 sc->sc_rec.intr(sc->sc_rec.intr_arg);
828 }
829
830 /* enable interrupt */
831 autri_reg_set_4(sc, (ch & 0x20) ? AUTRI_AINTEN_B : AUTRI_AINTEN_A, mask);
832 }
833 }
834 }
835
836 if (intsrc & MPU401_IRQ) {
837 /* XXX */
838 }
839
840 autri_reg_set_4(sc,AUTRI_MISCINT,
841 ST_TARGET_REACHED | MIXER_OVERFLOW | MIXER_UNDERFLOW);
842
843 return 1;
844 }
845
846 /*
847 *
848 */
849
850 static int
851 autri_allocmem(struct autri_softc *sc, size_t size, size_t align,
852 struct autri_dma *p)
853 {
854 int error;
855
856 p->size = size;
857 error = bus_dmamem_alloc(sc->sc_dmatag, p->size, align, 0,
858 p->segs, sizeof(p->segs)/sizeof(p->segs[0]),
859 &p->nsegs, BUS_DMA_NOWAIT);
860 if (error)
861 return error;
862
863 error = bus_dmamem_map(sc->sc_dmatag, p->segs, p->nsegs, p->size,
864 &p->addr, BUS_DMA_NOWAIT|BUS_DMA_COHERENT);
865 if (error)
866 goto free;
867
868 error = bus_dmamap_create(sc->sc_dmatag, p->size, 1, p->size,
869 0, BUS_DMA_NOWAIT, &p->map);
870 if (error)
871 goto unmap;
872
873 error = bus_dmamap_load(sc->sc_dmatag, p->map, p->addr, p->size, NULL,
874 BUS_DMA_NOWAIT);
875 if (error)
876 goto destroy;
877 return (0);
878
879 destroy:
880 bus_dmamap_destroy(sc->sc_dmatag, p->map);
881 unmap:
882 bus_dmamem_unmap(sc->sc_dmatag, p->addr, p->size);
883 free:
884 bus_dmamem_free(sc->sc_dmatag, p->segs, p->nsegs);
885 return error;
886 }
887
888 static int
889 autri_freemem(struct autri_softc *sc, struct autri_dma *p)
890 {
891
892 bus_dmamap_unload(sc->sc_dmatag, p->map);
893 bus_dmamap_destroy(sc->sc_dmatag, p->map);
894 bus_dmamem_unmap(sc->sc_dmatag, p->addr, p->size);
895 bus_dmamem_free(sc->sc_dmatag, p->segs, p->nsegs);
896 return 0;
897 }
898
899 static int
900 autri_open(void *addr, int flags)
901 {
902 DPRINTF(("autri_open()\n"));
903 DPRINTFN(5,("MISCINT : 0x%08X\n",
904 TREAD4((struct autri_softc *)addr, AUTRI_MISCINT)));
905 DPRINTFN(5,("LFO_GC_CIR : 0x%08X\n",
906 TREAD4((struct autri_softc *)addr, AUTRI_LFO_GC_CIR)));
907 return 0;
908 }
909
910 static int
911 autri_query_encoding(void *addr, struct audio_encoding *fp)
912 {
913
914 switch (fp->index) {
915 case 0:
916 strcpy(fp->name, AudioEulinear);
917 fp->encoding = AUDIO_ENCODING_ULINEAR;
918 fp->precision = 8;
919 fp->flags = 0;
920 break;
921 case 1:
922 strcpy(fp->name, AudioEmulaw);
923 fp->encoding = AUDIO_ENCODING_ULAW;
924 fp->precision = 8;
925 fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
926 break;
927 case 2:
928 strcpy(fp->name, AudioEalaw);
929 fp->encoding = AUDIO_ENCODING_ALAW;
930 fp->precision = 8;
931 fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
932 break;
933 case 3:
934 strcpy(fp->name, AudioEslinear);
935 fp->encoding = AUDIO_ENCODING_SLINEAR;
936 fp->precision = 8;
937 fp->flags = 0;
938 break;
939 case 4:
940 strcpy(fp->name, AudioEslinear_le);
941 fp->encoding = AUDIO_ENCODING_SLINEAR_LE;
942 fp->precision = 16;
943 fp->flags = 0;
944 break;
945 case 5:
946 strcpy(fp->name, AudioEulinear_le);
947 fp->encoding = AUDIO_ENCODING_ULINEAR_LE;
948 fp->precision = 16;
949 fp->flags = 0;
950 break;
951 case 6:
952 strcpy(fp->name, AudioEslinear_be);
953 fp->encoding = AUDIO_ENCODING_SLINEAR_BE;
954 fp->precision = 16;
955 fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
956 break;
957 case 7:
958 strcpy(fp->name, AudioEulinear_be);
959 fp->encoding = AUDIO_ENCODING_ULINEAR_BE;
960 fp->precision = 16;
961 fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
962 break;
963 default:
964 return EINVAL;
965 }
966
967 return 0;
968 }
969
970 static int
971 autri_set_params(void *addr, int setmode, int usemode,
972 audio_params_t *play, audio_params_t *rec, stream_filter_list_t *pfil,
973 stream_filter_list_t *rfil)
974 {
975 if (setmode & AUMODE_RECORD) {
976 if (auconv_set_converter(autri_formats, AUTRI_NFORMATS,
977 AUMODE_RECORD, rec, FALSE, rfil) < 0)
978 return EINVAL;
979 }
980 if (setmode & AUMODE_PLAY) {
981 if (auconv_set_converter(autri_formats, AUTRI_NFORMATS,
982 AUMODE_PLAY, play, FALSE, pfil) < 0)
983 return EINVAL;
984 }
985 return 0;
986 }
987
988 static int
989 autri_round_blocksize(void *addr, int block,
990 int mode, const audio_params_t *param)
991 {
992 return block & -4;
993 }
994
995 static int
996 autri_halt_output(void *addr)
997 {
998 struct autri_softc *sc;
999
1000 DPRINTF(("autri_halt_output()\n"));
1001 sc = addr;
1002 sc->sc_play.intr = NULL;
1003 autri_stopch(sc, sc->sc_play.ch, sc->sc_play.ch_intr);
1004 autri_disable_interrupt(sc, sc->sc_play.ch_intr);
1005
1006 return 0;
1007 }
1008
1009 static int
1010 autri_halt_input(void *addr)
1011 {
1012 struct autri_softc *sc;
1013
1014 DPRINTF(("autri_halt_input()\n"));
1015 sc = addr;
1016 sc->sc_rec.intr = NULL;
1017 autri_stopch(sc, sc->sc_rec.ch, sc->sc_rec.ch_intr);
1018 autri_disable_interrupt(sc, sc->sc_rec.ch_intr);
1019
1020 return 0;
1021 }
1022
1023 static int
1024 autri_getdev(void *addr, struct audio_device *retp)
1025 {
1026 struct autri_softc *sc;
1027
1028 DPRINTF(("autri_getdev().\n"));
1029 sc = addr;
1030 strncpy(retp->name, "Trident 4DWAVE", sizeof(retp->name));
1031 snprintf(retp->version, sizeof(retp->version), "0x%02x",
1032 PCI_REVISION(sc->sc_class));
1033
1034 switch (sc->sc_devid) {
1035 case AUTRI_DEVICE_ID_4DWAVE_DX:
1036 strncpy(retp->config, "4DWAVE-DX", sizeof(retp->config));
1037 break;
1038 case AUTRI_DEVICE_ID_4DWAVE_NX:
1039 strncpy(retp->config, "4DWAVE-NX", sizeof(retp->config));
1040 break;
1041 case AUTRI_DEVICE_ID_SIS_7018:
1042 strncpy(retp->config, "SiS 7018", sizeof(retp->config));
1043 break;
1044 case AUTRI_DEVICE_ID_ALI_M5451:
1045 strncpy(retp->config, "ALi M5451", sizeof(retp->config));
1046 break;
1047 default:
1048 strncpy(retp->config, "unknown", sizeof(retp->config));
1049 }
1050
1051 return 0;
1052 }
1053
1054 static int
1055 autri_mixer_set_port(void *addr, mixer_ctrl_t *cp)
1056 {
1057 struct autri_softc *sc;
1058
1059 sc = addr;
1060 return sc->sc_codec.codec_if->vtbl->mixer_set_port(
1061 sc->sc_codec.codec_if, cp);
1062 }
1063
1064 static int
1065 autri_mixer_get_port(void *addr, mixer_ctrl_t *cp)
1066 {
1067 struct autri_softc *sc;
1068
1069 sc = addr;
1070 return sc->sc_codec.codec_if->vtbl->mixer_get_port(
1071 sc->sc_codec.codec_if, cp);
1072 }
1073
1074 static int
1075 autri_query_devinfo(void *addr, mixer_devinfo_t *dip)
1076 {
1077 struct autri_softc *sc;
1078
1079 sc = addr;
1080 return sc->sc_codec.codec_if->vtbl->query_devinfo(
1081 sc->sc_codec.codec_if, dip);
1082 }
1083
1084 static void *
1085 autri_malloc(void *addr, int direction, size_t size,
1086 struct malloc_type *pool, int flags)
1087 {
1088 struct autri_softc *sc;
1089 struct autri_dma *p;
1090 int error;
1091
1092 p = malloc(sizeof(*p), pool, flags);
1093 if (!p)
1094 return NULL;
1095 sc = addr;
1096 #if 0
1097 error = autri_allocmem(sc, size, 16, p);
1098 #endif
1099 error = autri_allocmem(sc, size, 0x10000, p);
1100 if (error) {
1101 free(p, pool);
1102 return NULL;
1103 }
1104
1105 p->next = sc->sc_dmas;
1106 sc->sc_dmas = p;
1107 return KERNADDR(p);
1108 }
1109
1110 static void
1111 autri_free(void *addr, void *ptr, struct malloc_type *pool)
1112 {
1113 struct autri_softc *sc;
1114 struct autri_dma **pp, *p;
1115
1116 sc = addr;
1117 for (pp = &sc->sc_dmas; (p = *pp) != NULL; pp = &p->next) {
1118 if (KERNADDR(p) == ptr) {
1119 autri_freemem(sc, p);
1120 *pp = p->next;
1121 free(p, pool);
1122 return;
1123 }
1124 }
1125 }
1126
1127 static struct autri_dma *
1128 autri_find_dma(struct autri_softc *sc, void *addr)
1129 {
1130 struct autri_dma *p;
1131
1132 for (p = sc->sc_dmas; p && KERNADDR(p) != addr; p = p->next)
1133 continue;
1134
1135 return p;
1136 }
1137
1138 static size_t
1139 autri_round_buffersize(void *addr, int direction, size_t size)
1140 {
1141
1142 return size;
1143 }
1144
1145 static paddr_t
1146 autri_mappage(void *addr, void *mem, off_t off, int prot)
1147 {
1148 struct autri_softc *sc;
1149 struct autri_dma *p;
1150
1151 if (off < 0)
1152 return -1;
1153 sc = addr;
1154 p = autri_find_dma(sc, mem);
1155 if (!p)
1156 return -1;
1157
1158 return bus_dmamem_mmap(sc->sc_dmatag, p->segs, p->nsegs,
1159 off, prot, BUS_DMA_WAITOK);
1160 }
1161
1162 static int
1163 autri_get_props(void *addr)
1164 {
1165 return AUDIO_PROP_MMAP | AUDIO_PROP_INDEPENDENT |
1166 AUDIO_PROP_FULLDUPLEX;
1167 }
1168
1169 static void
1170 autri_setup_channel(struct autri_softc *sc, int mode,
1171 const audio_params_t *param)
1172 {
1173 int i, ch, channel;
1174 uint32_t reg, cr[5];
1175 uint32_t cso, eso;
1176 uint32_t delta, dch[2], ctrl;
1177 uint32_t alpha_fms, fm_vol, attribute;
1178
1179 uint32_t dmaaddr, dmalen;
1180 int factor, rvol, cvol;
1181 struct autri_chstatus *chst;
1182
1183 ctrl = AUTRI_CTRL_LOOPMODE;
1184 switch (param->encoding) {
1185 case AUDIO_ENCODING_SLINEAR_BE:
1186 case AUDIO_ENCODING_SLINEAR_LE:
1187 ctrl |= AUTRI_CTRL_SIGNED;
1188 break;
1189 }
1190
1191 factor = 0;
1192 if (param->precision == 16) {
1193 ctrl |= AUTRI_CTRL_16BIT;
1194 factor++;
1195 }
1196
1197 if (param->channels == 2) {
1198 ctrl |= AUTRI_CTRL_STEREO;
1199 factor++;
1200 }
1201
1202 delta = param->sample_rate;
1203 if (delta < 4000)
1204 delta = 4000;
1205 if (delta > 48000)
1206 delta = 48000;
1207
1208 attribute = 0;
1209
1210 dch[1] = ((delta << 12) / 48000) & 0x0000ffff;
1211 if (mode == AUMODE_PLAY) {
1212 chst = &sc->sc_play;
1213 dch[0] = ((delta << 12) / 48000) & 0x0000ffff;
1214 ctrl |= AUTRI_CTRL_WAVEVOL;
1215 } else {
1216 chst = &sc->sc_rec;
1217 dch[0] = ((48000 << 12) / delta) & 0x0000ffff;
1218 if (sc->sc_devid == AUTRI_DEVICE_ID_SIS_7018) {
1219 ctrl |= AUTRI_CTRL_MUTEVOL_SIS;
1220 attribute = AUTRI_ATTR_PCMREC_SIS;
1221 if (delta != 48000)
1222 attribute |= AUTRI_ATTR_ENASRC_SIS;
1223 } else
1224 ctrl |= AUTRI_CTRL_MUTEVOL;
1225 }
1226
1227 dmaaddr = DMAADDR(chst->dma);
1228 cso = alpha_fms = 0;
1229 rvol = cvol = 0x7f;
1230 fm_vol = 0x0 | ((rvol & 0x7f) << 7) | (cvol & 0x7f);
1231
1232 for (ch = 0; ch < 2; ch++) {
1233
1234 if (ch == 0)
1235 dmalen = (chst->length >> factor);
1236 else {
1237 /* channel for interrupt */
1238 dmalen = (chst->blksize >> factor);
1239 if (sc->sc_devid == AUTRI_DEVICE_ID_SIS_7018)
1240 ctrl |= AUTRI_CTRL_MUTEVOL_SIS;
1241 else
1242 ctrl |= AUTRI_CTRL_MUTEVOL;
1243 attribute = 0;
1244 cso = dmalen - 1;
1245 }
1246
1247 eso = dmalen - 1;
1248
1249 switch (sc->sc_devid) {
1250 case AUTRI_DEVICE_ID_4DWAVE_DX:
1251 cr[0] = (cso << 16) | (alpha_fms & 0x0000ffff);
1252 cr[1] = dmaaddr;
1253 cr[2] = (eso << 16) | (dch[ch] & 0x0000ffff);
1254 cr[3] = fm_vol;
1255 cr[4] = ctrl;
1256 break;
1257 case AUTRI_DEVICE_ID_4DWAVE_NX:
1258 cr[0] = (dch[ch] << 24) | (cso & 0x00ffffff);
1259 cr[1] = dmaaddr;
1260 cr[2] = ((dch[ch] << 16) & 0xff000000) | (eso & 0x00ffffff);
1261 cr[3] = (alpha_fms << 16) | (fm_vol & 0x0000ffff);
1262 cr[4] = ctrl;
1263 break;
1264 case AUTRI_DEVICE_ID_SIS_7018:
1265 cr[0] = (cso << 16) | (alpha_fms & 0x0000ffff);
1266 cr[1] = dmaaddr;
1267 cr[2] = (eso << 16) | (dch[ch] & 0x0000ffff);
1268 cr[3] = attribute;
1269 cr[4] = ctrl;
1270 break;
1271 case AUTRI_DEVICE_ID_ALI_M5451:
1272 cr[0] = (cso << 16) | (alpha_fms & 0x0000ffff);
1273 cr[1] = dmaaddr;
1274 cr[2] = (eso << 16) | (dch[ch] & 0x0000ffff);
1275 cr[3] = 0;
1276 cr[4] = ctrl;
1277 break;
1278 }
1279
1280 /* write channel data */
1281 channel = (ch == 0) ? chst->ch : chst->ch_intr;
1282
1283 reg = TREAD4(sc,AUTRI_LFO_GC_CIR) & ~0x0000003f;
1284 TWRITE4(sc,AUTRI_LFO_GC_CIR, reg | channel);
1285
1286 for (i = 0; i < 5; i++) {
1287 TWRITE4(sc, AUTRI_ARAM_CR + i*sizeof(cr[0]), cr[i]);
1288 DPRINTFN(5,("cr[%d] : 0x%08X\n", i, cr[i]));
1289 }
1290
1291 /* Bank A only */
1292 if (channel < 0x20) {
1293 TWRITE4(sc, AUTRI_EBUF1, AUTRI_EMOD_STILL);
1294 TWRITE4(sc, AUTRI_EBUF2, AUTRI_EMOD_STILL);
1295 }
1296 }
1297
1298 }
1299
1300 static int
1301 autri_trigger_output(void *addr, void *start, void *end, int blksize,
1302 void (*intr)(void *), void *arg,
1303 const audio_params_t *param)
1304 {
1305 struct autri_softc *sc;
1306 struct autri_dma *p;
1307
1308 DPRINTFN(5,("autri_trigger_output: sc=%p start=%p end=%p "
1309 "blksize=%d intr=%p(%p)\n", addr, start, end, blksize, intr, arg));
1310 sc = addr;
1311 sc->sc_play.intr = intr;
1312 sc->sc_play.intr_arg = arg;
1313 sc->sc_play.offset = 0;
1314 sc->sc_play.blksize = blksize;
1315 sc->sc_play.length = (char *)end - (char *)start;
1316
1317 p = autri_find_dma(sc, start);
1318 if (!p) {
1319 printf("autri_trigger_output: bad addr %p\n", start);
1320 return (EINVAL);
1321 }
1322
1323 sc->sc_play.dma = p;
1324
1325 /* */
1326 autri_setup_channel(sc, AUMODE_PLAY, param);
1327
1328 /* volume set to no attenuation */
1329 TWRITE4(sc, AUTRI_MUSICVOL_WAVEVOL, 0);
1330
1331 /* enable interrupt */
1332 autri_enable_interrupt(sc, sc->sc_play.ch_intr);
1333
1334 /* start channel */
1335 autri_startch(sc, sc->sc_play.ch, sc->sc_play.ch_intr);
1336
1337 return 0;
1338 }
1339
1340 static int
1341 autri_trigger_input(void *addr, void *start, void *end, int blksize,
1342 void (*intr)(void *), void *arg,
1343 const audio_params_t *param)
1344 {
1345 struct autri_softc *sc;
1346 struct autri_dma *p;
1347
1348 DPRINTFN(5,("autri_trigger_input: sc=%p start=%p end=%p "
1349 "blksize=%d intr=%p(%p)\n", addr, start, end, blksize, intr, arg));
1350 sc = addr;
1351 sc->sc_rec.intr = intr;
1352 sc->sc_rec.intr_arg = arg;
1353 sc->sc_rec.offset = 0;
1354 sc->sc_rec.blksize = blksize;
1355 sc->sc_rec.length = (char *)end - (char *)start;
1356
1357 /* */
1358 p = autri_find_dma(sc, start);
1359 if (!p) {
1360 printf("autri_trigger_input: bad addr %p\n", start);
1361 return (EINVAL);
1362 }
1363
1364 sc->sc_rec.dma = p;
1365
1366 /* */
1367 if (sc->sc_devid == AUTRI_DEVICE_ID_4DWAVE_NX) {
1368 autri_reg_set_4(sc, AUTRI_NX_ACR0, AUTRI_NX_ACR0_PSB_CAPTURE);
1369 TWRITE1(sc, AUTRI_NX_RCI3, AUTRI_NX_RCI3_ENABLE | sc->sc_rec.ch);
1370 }
1371
1372 #if 0
1373 /* 4DWAVE only allows capturing at a 48 kHz rate */
1374 if (sc->sc_devid == AUTRI_DEVICE_ID_4DWAVE_DX ||
1375 sc->sc_devid == AUTRI_DEVICE_ID_4DWAVE_NX)
1376 param->sample_rate = 48000;
1377 #endif
1378
1379 autri_setup_channel(sc, AUMODE_RECORD, param);
1380
1381 /* enable interrupt */
1382 autri_enable_interrupt(sc, sc->sc_rec.ch_intr);
1383
1384 /* start channel */
1385 autri_startch(sc, sc->sc_rec.ch, sc->sc_rec.ch_intr);
1386
1387 return 0;
1388 }
1389
1390 #if 0
1391 static int
1392 autri_halt(struct autri_softc *sc)
1393 {
1394
1395 DPRINTF(("autri_halt().\n"));
1396 /*autri_stopch(sc);*/
1397 autri_disable_interrupt(sc, sc->sc_play.channel);
1398 autri_disable_interrupt(sc, sc->sc_rec.channel);
1399 return 0;
1400 }
1401 #endif
1402
1403 static void
1404 autri_enable_interrupt(struct autri_softc *sc, int ch)
1405 {
1406 int reg;
1407
1408 reg = (ch & 0x20) ? AUTRI_AINTEN_B : AUTRI_AINTEN_A;
1409 ch &= 0x1f;
1410
1411 autri_reg_set_4(sc, reg, 1 << ch);
1412 }
1413
1414 static void
1415 autri_disable_interrupt(struct autri_softc *sc, int ch)
1416 {
1417 int reg;
1418
1419 reg = (ch & 0x20) ? AUTRI_AINTEN_B : AUTRI_AINTEN_A;
1420 ch &= 0x1f;
1421
1422 autri_reg_clear_4(sc, reg, 1 << ch);
1423 }
1424
1425 static void
1426 autri_startch(struct autri_softc *sc, int ch, int ch_intr)
1427 {
1428 int reg;
1429 uint32_t chmask;
1430
1431 reg = (ch & 0x20) ? AUTRI_START_B : AUTRI_START_A;
1432 ch &= 0x1f;
1433 ch_intr &= 0x1f;
1434 chmask = (1 << ch) | (1 << ch_intr);
1435
1436 autri_reg_set_4(sc, reg, chmask);
1437 }
1438
1439 static void
1440 autri_stopch(struct autri_softc *sc, int ch, int ch_intr)
1441 {
1442 int reg;
1443 uint32_t chmask;
1444
1445 reg = (ch & 0x20) ? AUTRI_STOP_B : AUTRI_STOP_A;
1446 ch &= 0x1f;
1447 ch_intr &= 0x1f;
1448 chmask = (1 << ch) | (1 << ch_intr);
1449
1450 autri_reg_set_4(sc, reg, chmask);
1451 }
1452
1453 #if NMIDI > 0
1454 static int
1455 autri_midi_open(void *addr, int flags, void (*iintr)(void *, int),
1456 void (*ointr)(void *), void *arg)
1457 {
1458 struct autri_softc *sc;
1459
1460 DPRINTF(("autri_midi_open()\n"));
1461 sc = addr;
1462 DPRINTFN(5,("MPUR1 : 0x%02X\n", TREAD1(sc, AUTRI_MPUR1)));
1463 DPRINTFN(5,("MPUR2 : 0x%02X\n", TREAD1(sc, AUTRI_MPUR2)));
1464
1465 sc->sc_iintr = iintr;
1466 sc->sc_ointr = ointr;
1467 sc->sc_arg = arg;
1468
1469 if (flags & FREAD)
1470 autri_reg_clear_1(sc, AUTRI_MPUR2, AUTRI_MIDIIN_ENABLE_INTR);
1471
1472 if (flags & FWRITE)
1473 autri_reg_set_1(sc, AUTRI_MPUR2, AUTRI_MIDIOUT_CONNECT);
1474
1475 return 0;
1476 }
1477
1478 static void
1479 autri_midi_close(void *addr)
1480 {
1481 struct autri_softc *sc;
1482
1483 DPRINTF(("autri_midi_close()\n"));
1484 sc = addr;
1485 tsleep(sc, PWAIT, "autri", hz/10); /* give uart a chance to drain */
1486
1487 sc->sc_iintr = NULL;
1488 sc->sc_ointr = NULL;
1489 }
1490
1491 static int
1492 autri_midi_output(void *addr, int d)
1493 {
1494 struct autri_softc *sc;
1495 int x;
1496
1497 sc = addr;
1498 for (x = 0; x != MIDI_BUSY_WAIT; x++) {
1499 if ((TREAD1(sc, AUTRI_MPUR1) & AUTRI_MIDIOUT_READY) == 0) {
1500 TWRITE1(sc, AUTRI_MPUR0, d);
1501 return 0;
1502 }
1503 delay(MIDI_BUSY_DELAY);
1504 }
1505 return EIO;
1506 }
1507
1508 static void
1509 autri_midi_getinfo(void *addr, struct midi_info *mi)
1510 {
1511
1512 mi->name = "4DWAVE MIDI UART";
1513 mi->props = MIDI_PROP_CAN_INPUT;
1514 }
1515
1516 #endif
1517