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