1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3 *
4 * Copyright (c) 2001 Orion Hodson <oho@acm.org>
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 AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHERIN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THEPOSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 /*
30 * als4000.c - driver for the Avance Logic ALS 4000 chipset.
31 *
32 * The ALS4000 is effectively an SB16 with a PCI interface.
33 *
34 * This driver derives from ALS4000a.PDF, Bart Hartgers alsa driver, and
35 * SB16 register descriptions.
36 */
37
38 #ifdef HAVE_KERNEL_OPTION_HEADERS
39 #include "opt_snd.h"
40 #endif
41
42 #include <dev/sound/pcm/sound.h>
43 #include <dev/sound/isa/sb.h>
44 #include <dev/sound/pci/als4000.h>
45
46 #include <dev/pci/pcireg.h>
47 #include <dev/pci/pcivar.h>
48
49 #include "mixer_if.h"
50
51 SND_DECLARE_FILE("$FreeBSD$");
52
53 /* Debugging macro's */
54 #undef DEB
55 #ifndef DEB
56 #define DEB(x) /* x */
57 #endif /* DEB */
58
59 #define ALS_DEFAULT_BUFSZ 16384
60
61 /* ------------------------------------------------------------------------- */
62 /* Structures */
63
64 struct sc_info;
65
66 struct sc_chinfo {
67 struct sc_info *parent;
68 struct pcm_channel *channel;
69 struct snd_dbuf *buffer;
70 u_int32_t format, speed, phys_buf, bps;
71 u_int32_t dma_active:1, dma_was_active:1;
72 u_int8_t gcr_fifo_status;
73 int dir;
74 };
75
76 struct sc_info {
77 device_t dev;
78 bus_space_tag_t st;
79 bus_space_handle_t sh;
80 bus_dma_tag_t parent_dmat;
81 struct resource *reg, *irq;
82 int regid, irqid;
83 void *ih;
84 struct mtx *lock;
85
86 unsigned int bufsz;
87 struct sc_chinfo pch, rch;
88 };
89
90 /* Channel caps */
91
92 static u_int32_t als_format[] = {
93 SND_FORMAT(AFMT_U8, 1, 0),
94 SND_FORMAT(AFMT_U8, 2, 0),
95 SND_FORMAT(AFMT_S16_LE, 1, 0),
96 SND_FORMAT(AFMT_S16_LE, 2, 0),
97 0
98 };
99
100 /*
101 * I don't believe this rotten soundcard can do 48k, really,
102 * trust me.
103 */
104 static struct pcmchan_caps als_caps = { 4000, 44100, als_format, 0 };
105
106 /* ------------------------------------------------------------------------- */
107 /* Register Utilities */
108
109 static u_int32_t
110 als_gcr_rd(struct sc_info *sc, int index)
111 {
112 bus_space_write_1(sc->st, sc->sh, ALS_GCR_INDEX, index);
113 return bus_space_read_4(sc->st, sc->sh, ALS_GCR_DATA);
114 }
115
116 static void
117 als_gcr_wr(struct sc_info *sc, int index, int data)
118 {
119 bus_space_write_1(sc->st, sc->sh, ALS_GCR_INDEX, index);
120 bus_space_write_4(sc->st, sc->sh, ALS_GCR_DATA, data);
121 }
122
123 static u_int8_t
124 als_intr_rd(struct sc_info *sc)
125 {
126 return bus_space_read_1(sc->st, sc->sh, ALS_SB_MPU_IRQ);
127 }
128
129 static void
130 als_intr_wr(struct sc_info *sc, u_int8_t data)
131 {
132 bus_space_write_1(sc->st, sc->sh, ALS_SB_MPU_IRQ, data);
133 }
134
135 static u_int8_t
136 als_mix_rd(struct sc_info *sc, u_int8_t index)
137 {
138 bus_space_write_1(sc->st, sc->sh, ALS_MIXER_INDEX, index);
139 return bus_space_read_1(sc->st, sc->sh, ALS_MIXER_DATA);
140 }
141
142 static void
143 als_mix_wr(struct sc_info *sc, u_int8_t index, u_int8_t data)
144 {
145 bus_space_write_1(sc->st, sc->sh, ALS_MIXER_INDEX, index);
146 bus_space_write_1(sc->st, sc->sh, ALS_MIXER_DATA, data);
147 }
148
149 static void
150 als_esp_wr(struct sc_info *sc, u_int8_t data)
151 {
152 u_int32_t tries, v;
153
154 tries = 1000;
155 do {
156 v = bus_space_read_1(sc->st, sc->sh, ALS_ESP_WR_STATUS);
157 if (~v & 0x80)
158 break;
159 DELAY(20);
160 } while (--tries != 0);
161
162 if (tries == 0)
163 device_printf(sc->dev, "als_esp_wr timeout");
164
165 bus_space_write_1(sc->st, sc->sh, ALS_ESP_WR_DATA, data);
166 }
167
168 static int
169 als_esp_reset(struct sc_info *sc)
170 {
171 u_int32_t tries, u, v;
172
173 bus_space_write_1(sc->st, sc->sh, ALS_ESP_RST, 1);
174 DELAY(10);
175 bus_space_write_1(sc->st, sc->sh, ALS_ESP_RST, 0);
176 DELAY(30);
177
178 tries = 1000;
179 do {
180 u = bus_space_read_1(sc->st, sc->sh, ALS_ESP_RD_STATUS8);
181 if (u & 0x80) {
182 v = bus_space_read_1(sc->st, sc->sh, ALS_ESP_RD_DATA);
183 if (v == 0xaa)
184 return 0;
185 else
186 break;
187 }
188 DELAY(20);
189 } while (--tries != 0);
190
191 if (tries == 0)
192 device_printf(sc->dev, "als_esp_reset timeout");
193 return 1;
194 }
195
196 static u_int8_t
197 als_ack_read(struct sc_info *sc, u_int8_t addr)
198 {
199 u_int8_t r = bus_space_read_1(sc->st, sc->sh, addr);
200 return r;
201 }
202
203 /* ------------------------------------------------------------------------- */
204 /* Common pcm channel implementation */
205
206 static void *
207 alschan_init(kobj_t obj, void *devinfo,
208 struct snd_dbuf *b, struct pcm_channel *c, int dir)
209 {
210 struct sc_info *sc = devinfo;
211 struct sc_chinfo *ch;
212
213 snd_mtxlock(sc->lock);
214 if (dir == PCMDIR_PLAY) {
215 ch = &sc->pch;
216 ch->gcr_fifo_status = ALS_GCR_FIFO0_STATUS;
217 } else {
218 ch = &sc->rch;
219 ch->gcr_fifo_status = ALS_GCR_FIFO1_STATUS;
220 }
221 ch->dir = dir;
222 ch->parent = sc;
223 ch->channel = c;
224 ch->bps = 1;
225 ch->format = SND_FORMAT(AFMT_U8, 1, 0);
226 ch->speed = DSP_DEFAULT_SPEED;
227 ch->buffer = b;
228 snd_mtxunlock(sc->lock);
229
230 if (sndbuf_alloc(ch->buffer, sc->parent_dmat, 0, sc->bufsz) != 0)
231 return NULL;
232
233 return ch;
234 }
235
236 static int
237 alschan_setformat(kobj_t obj, void *data, u_int32_t format)
238 {
239 struct sc_chinfo *ch = data;
240
241 ch->format = format;
242 return 0;
243 }
244
245 static u_int32_t
246 alschan_setspeed(kobj_t obj, void *data, u_int32_t speed)
247 {
248 struct sc_chinfo *ch = data, *other;
249 struct sc_info *sc = ch->parent;
250
251 other = (ch->dir == PCMDIR_PLAY) ? &sc->rch : &sc->pch;
252
253 /* Deny request if other dma channel is active */
254 if (other->dma_active) {
255 ch->speed = other->speed;
256 return other->speed;
257 }
258
259 ch->speed = speed;
260 return speed;
261 }
262
263 static u_int32_t
264 alschan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize)
265 {
266 struct sc_chinfo *ch = data;
267 struct sc_info *sc = ch->parent;
268
269 if (blocksize > sc->bufsz / 2) {
270 blocksize = sc->bufsz / 2;
271 }
272 sndbuf_resize(ch->buffer, 2, blocksize);
273 return blocksize;
274 }
275
276 static u_int32_t
277 alschan_getptr(kobj_t obj, void *data)
278 {
279 struct sc_chinfo *ch = data;
280 struct sc_info *sc = ch->parent;
281 int32_t pos, sz;
282
283 snd_mtxlock(sc->lock);
284 pos = als_gcr_rd(ch->parent, ch->gcr_fifo_status) & 0xffff;
285 snd_mtxunlock(sc->lock);
286 sz = sndbuf_getsize(ch->buffer);
287 return (2 * sz - pos - 1) % sz;
288 }
289
290 static struct pcmchan_caps*
291 alschan_getcaps(kobj_t obj, void *data)
292 {
293 return &als_caps;
294 }
295
296 static void
297 als_set_speed(struct sc_chinfo *ch)
298 {
299 struct sc_info *sc = ch->parent;
300 struct sc_chinfo *other;
301
302 other = (ch->dir == PCMDIR_PLAY) ? &sc->rch : &sc->pch;
303 if (other->dma_active == 0) {
304 als_esp_wr(sc, ALS_ESP_SAMPLE_RATE);
305 als_esp_wr(sc, ch->speed >> 8);
306 als_esp_wr(sc, ch->speed & 0xff);
307 } else {
308 DEB(printf("speed locked at %d (tried %d)\n",
309 other->speed, ch->speed));
310 }
311 }
312
313 /* ------------------------------------------------------------------------- */
314 /* Playback channel implementation */
315 #define ALS_8BIT_CMD(x, y) { (x), (y), DSP_DMA8, DSP_CMD_DMAPAUSE_8 }
316 #define ALS_16BIT_CMD(x, y) { (x), (y), DSP_DMA16, DSP_CMD_DMAPAUSE_16 }
317
318 struct playback_command {
319 u_int32_t pcm_format; /* newpcm format */
320 u_int8_t format_val; /* sb16 format value */
321 u_int8_t dma_prog; /* sb16 dma program */
322 u_int8_t dma_stop; /* sb16 stop register */
323 } static const playback_cmds[] = {
324 ALS_8BIT_CMD(SND_FORMAT(AFMT_U8, 1, 0), DSP_MODE_U8MONO),
325 ALS_8BIT_CMD(SND_FORMAT(AFMT_U8, 2, 0), DSP_MODE_U8STEREO),
326 ALS_16BIT_CMD(SND_FORMAT(AFMT_S16_LE, 1, 0), DSP_MODE_S16MONO),
327 ALS_16BIT_CMD(SND_FORMAT(AFMT_S16_LE, 2, 0), DSP_MODE_S16STEREO),
328 };
329
330 static const struct playback_command*
331 als_get_playback_command(u_int32_t format)
332 {
333 u_int32_t i, n;
334
335 n = sizeof(playback_cmds) / sizeof(playback_cmds[0]);
336 for (i = 0; i < n; i++) {
337 if (playback_cmds[i].pcm_format == format) {
338 return &playback_cmds[i];
339 }
340 }
341 DEB(printf("als_get_playback_command: invalid format 0x%08x\n",
342 format));
343 return &playback_cmds[0];
344 }
345
346 static void
347 als_playback_start(struct sc_chinfo *ch)
348 {
349 const struct playback_command *p;
350 struct sc_info *sc = ch->parent;
351 u_int32_t buf, bufsz, count, dma_prog;
352
353 buf = sndbuf_getbufaddr(ch->buffer);
354 bufsz = sndbuf_getsize(ch->buffer);
355 count = bufsz / 2;
356 if (ch->format & AFMT_16BIT)
357 count /= 2;
358 count--;
359
360 als_esp_wr(sc, DSP_CMD_SPKON);
361 als_set_speed(ch);
362
363 als_gcr_wr(sc, ALS_GCR_DMA0_START, buf);
364 als_gcr_wr(sc, ALS_GCR_DMA0_MODE, (bufsz - 1) | 0x180000);
365
366 p = als_get_playback_command(ch->format);
367 dma_prog = p->dma_prog | DSP_F16_DAC | DSP_F16_AUTO | DSP_F16_FIFO_ON;
368
369 als_esp_wr(sc, dma_prog);
370 als_esp_wr(sc, p->format_val);
371 als_esp_wr(sc, count & 0xff);
372 als_esp_wr(sc, count >> 8);
373
374 ch->dma_active = 1;
375 }
376
377 static int
378 als_playback_stop(struct sc_chinfo *ch)
379 {
380 const struct playback_command *p;
381 struct sc_info *sc = ch->parent;
382 u_int32_t active;
383
384 active = ch->dma_active;
385 if (active) {
386 p = als_get_playback_command(ch->format);
387 als_esp_wr(sc, p->dma_stop);
388 }
389 ch->dma_active = 0;
390 return active;
391 }
392
393 static int
394 alspchan_trigger(kobj_t obj, void *data, int go)
395 {
396 struct sc_chinfo *ch = data;
397 struct sc_info *sc = ch->parent;
398
399 if (!PCMTRIG_COMMON(go))
400 return 0;
401
402 snd_mtxlock(sc->lock);
403 switch(go) {
404 case PCMTRIG_START:
405 als_playback_start(ch);
406 break;
407 case PCMTRIG_STOP:
408 case PCMTRIG_ABORT:
409 als_playback_stop(ch);
410 break;
411 default:
412 break;
413 }
414 snd_mtxunlock(sc->lock);
415 return 0;
416 }
417
418 static kobj_method_t alspchan_methods[] = {
419 KOBJMETHOD(channel_init, alschan_init),
420 KOBJMETHOD(channel_setformat, alschan_setformat),
421 KOBJMETHOD(channel_setspeed, alschan_setspeed),
422 KOBJMETHOD(channel_setblocksize, alschan_setblocksize),
423 KOBJMETHOD(channel_trigger, alspchan_trigger),
424 KOBJMETHOD(channel_getptr, alschan_getptr),
425 KOBJMETHOD(channel_getcaps, alschan_getcaps),
426 KOBJMETHOD_END
427 };
428 CHANNEL_DECLARE(alspchan);
429
430 /* ------------------------------------------------------------------------- */
431 /* Capture channel implementation */
432
433 static u_int8_t
434 als_get_fifo_format(struct sc_info *sc, u_int32_t format)
435 {
436 switch (format) {
437 case SND_FORMAT(AFMT_U8, 1, 0):
438 return ALS_FIFO1_8BIT;
439 case SND_FORMAT(AFMT_U8, 2, 0):
440 return ALS_FIFO1_8BIT | ALS_FIFO1_STEREO;
441 case SND_FORMAT(AFMT_S16_LE, 1, 0):
442 return ALS_FIFO1_SIGNED;
443 case SND_FORMAT(AFMT_S16_LE, 2, 0):
444 return ALS_FIFO1_SIGNED | ALS_FIFO1_STEREO;
445 }
446 device_printf(sc->dev, "format not found: 0x%08x\n", format);
447 return ALS_FIFO1_8BIT;
448 }
449
450 static void
451 als_capture_start(struct sc_chinfo *ch)
452 {
453 struct sc_info *sc = ch->parent;
454 u_int32_t buf, bufsz, count, dma_prog;
455
456 buf = sndbuf_getbufaddr(ch->buffer);
457 bufsz = sndbuf_getsize(ch->buffer);
458 count = bufsz / 2;
459 if (ch->format & AFMT_16BIT)
460 count /= 2;
461 count--;
462
463 als_esp_wr(sc, DSP_CMD_SPKON);
464 als_set_speed(ch);
465
466 als_gcr_wr(sc, ALS_GCR_FIFO1_START, buf);
467 als_gcr_wr(sc, ALS_GCR_FIFO1_COUNT, (bufsz - 1));
468
469 als_mix_wr(sc, ALS_FIFO1_LENGTH_LO, count & 0xff);
470 als_mix_wr(sc, ALS_FIFO1_LENGTH_HI, count >> 8);
471
472 dma_prog = ALS_FIFO1_RUN | als_get_fifo_format(sc, ch->format);
473 als_mix_wr(sc, ALS_FIFO1_CONTROL, dma_prog);
474
475 ch->dma_active = 1;
476 }
477
478 static int
479 als_capture_stop(struct sc_chinfo *ch)
480 {
481 struct sc_info *sc = ch->parent;
482 u_int32_t active;
483
484 active = ch->dma_active;
485 if (active) {
486 als_mix_wr(sc, ALS_FIFO1_CONTROL, ALS_FIFO1_STOP);
487 }
488 ch->dma_active = 0;
489 return active;
490 }
491
492 static int
493 alsrchan_trigger(kobj_t obj, void *data, int go)
494 {
495 struct sc_chinfo *ch = data;
496 struct sc_info *sc = ch->parent;
497
498 snd_mtxlock(sc->lock);
499 switch(go) {
500 case PCMTRIG_START:
501 als_capture_start(ch);
502 break;
503 case PCMTRIG_STOP:
504 case PCMTRIG_ABORT:
505 als_capture_stop(ch);
506 break;
507 }
508 snd_mtxunlock(sc->lock);
509 return 0;
510 }
511
512 static kobj_method_t alsrchan_methods[] = {
513 KOBJMETHOD(channel_init, alschan_init),
514 KOBJMETHOD(channel_setformat, alschan_setformat),
515 KOBJMETHOD(channel_setspeed, alschan_setspeed),
516 KOBJMETHOD(channel_setblocksize, alschan_setblocksize),
517 KOBJMETHOD(channel_trigger, alsrchan_trigger),
518 KOBJMETHOD(channel_getptr, alschan_getptr),
519 KOBJMETHOD(channel_getcaps, alschan_getcaps),
520 KOBJMETHOD_END
521 };
522 CHANNEL_DECLARE(alsrchan);
523
524 /* ------------------------------------------------------------------------- */
525 /* Mixer related */
526
527 /*
528 * ALS4000 has an sb16 mixer, with some additional controls that we do
529 * not yet a means to support.
530 */
531
532 struct sb16props {
533 u_int8_t lreg;
534 u_int8_t rreg;
535 u_int8_t bits;
536 u_int8_t oselect;
537 u_int8_t iselect; /* left input mask */
538 } static const amt[SOUND_MIXER_NRDEVICES] = {
539 [SOUND_MIXER_VOLUME] = { 0x30, 0x31, 5, 0x00, 0x00 },
540 [SOUND_MIXER_PCM] = { 0x32, 0x33, 5, 0x00, 0x00 },
541 [SOUND_MIXER_SYNTH] = { 0x34, 0x35, 5, 0x60, 0x40 },
542 [SOUND_MIXER_CD] = { 0x36, 0x37, 5, 0x06, 0x04 },
543 [SOUND_MIXER_LINE] = { 0x38, 0x39, 5, 0x18, 0x10 },
544 [SOUND_MIXER_MIC] = { 0x3a, 0x00, 5, 0x01, 0x01 },
545 [SOUND_MIXER_SPEAKER] = { 0x3b, 0x00, 2, 0x00, 0x00 },
546 [SOUND_MIXER_IGAIN] = { 0x3f, 0x40, 2, 0x00, 0x00 },
547 [SOUND_MIXER_OGAIN] = { 0x41, 0x42, 2, 0x00, 0x00 },
548 /* The following have register values but no h/w implementation */
549 [SOUND_MIXER_TREBLE] = { 0x44, 0x45, 4, 0x00, 0x00 },
550 [SOUND_MIXER_BASS] = { 0x46, 0x47, 4, 0x00, 0x00 }
551 };
552
553 static int
554 alsmix_init(struct snd_mixer *m)
555 {
556 u_int32_t i, v;
557
558 for (i = v = 0; i < SOUND_MIXER_NRDEVICES; i++) {
559 if (amt[i].bits) v |= 1 << i;
560 }
561 mix_setdevs(m, v);
562
563 for (i = v = 0; i < SOUND_MIXER_NRDEVICES; i++) {
564 if (amt[i].iselect) v |= 1 << i;
565 }
566 mix_setrecdevs(m, v);
567 return 0;
568 }
569
570 static int
571 alsmix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right)
572 {
573 struct sc_info *sc = mix_getdevinfo(m);
574 u_int32_t r, l, v, mask;
575
576 /* Fill upper n bits in mask with 1's */
577 mask = ((1 << amt[dev].bits) - 1) << (8 - amt[dev].bits);
578
579 l = (left * mask / 100) & mask;
580 v = als_mix_rd(sc, amt[dev].lreg) & ~mask;
581 als_mix_wr(sc, amt[dev].lreg, l | v);
582
583 if (amt[dev].rreg) {
584 r = (right * mask / 100) & mask;
585 v = als_mix_rd(sc, amt[dev].rreg) & ~mask;
586 als_mix_wr(sc, amt[dev].rreg, r | v);
587 } else {
588 r = 0;
589 }
590
591 /* Zero gain does not mute channel from output, but this does. */
592 v = als_mix_rd(sc, SB16_OMASK);
593 if (l == 0 && r == 0) {
594 v &= ~amt[dev].oselect;
595 } else {
596 v |= amt[dev].oselect;
597 }
598 als_mix_wr(sc, SB16_OMASK, v);
599 return 0;
600 }
601
602 static u_int32_t
603 alsmix_setrecsrc(struct snd_mixer *m, u_int32_t src)
604 {
605 struct sc_info *sc = mix_getdevinfo(m);
606 u_int32_t i, l, r;
607
608 for (i = l = r = 0; i < SOUND_MIXER_NRDEVICES; i++) {
609 if (src & (1 << i)) {
610 if (amt[i].iselect == 1) { /* microphone */
611 l |= amt[i].iselect;
612 r |= amt[i].iselect;
613 } else {
614 l |= amt[i].iselect;
615 r |= amt[i].iselect >> 1;
616 }
617 }
618 }
619
620 als_mix_wr(sc, SB16_IMASK_L, l);
621 als_mix_wr(sc, SB16_IMASK_R, r);
622 return src;
623 }
624
625 static kobj_method_t als_mixer_methods[] = {
626 KOBJMETHOD(mixer_init, alsmix_init),
627 KOBJMETHOD(mixer_set, alsmix_set),
628 KOBJMETHOD(mixer_setrecsrc, alsmix_setrecsrc),
629 KOBJMETHOD_END
630 };
631 MIXER_DECLARE(als_mixer);
632
633 /* ------------------------------------------------------------------------- */
634 /* Interrupt Handler */
635
636 static void
637 als_intr(void *p)
638 {
639 struct sc_info *sc = (struct sc_info *)p;
640 u_int8_t intr, sb_status;
641
642 snd_mtxlock(sc->lock);
643 intr = als_intr_rd(sc);
644
645 if (intr & 0x80) {
646 snd_mtxunlock(sc->lock);
647 chn_intr(sc->pch.channel);
648 snd_mtxlock(sc->lock);
649 }
650
651 if (intr & 0x40) {
652 snd_mtxunlock(sc->lock);
653 chn_intr(sc->rch.channel);
654 snd_mtxlock(sc->lock);
655 }
656
657 /* ACK interrupt in PCI core */
658 als_intr_wr(sc, intr);
659
660 /* ACK interrupt in SB core */
661 sb_status = als_mix_rd(sc, IRQ_STAT);
662
663 if (sb_status & ALS_IRQ_STATUS8)
664 als_ack_read(sc, ALS_ESP_RD_STATUS8);
665 if (sb_status & ALS_IRQ_STATUS16)
666 als_ack_read(sc, ALS_ESP_RD_STATUS16);
667 if (sb_status & ALS_IRQ_MPUIN)
668 als_ack_read(sc, ALS_MIDI_DATA);
669 if (sb_status & ALS_IRQ_CR1E)
670 als_ack_read(sc, ALS_CR1E_ACK_PORT);
671
672 snd_mtxunlock(sc->lock);
673 return;
674 }
675
676 /* ------------------------------------------------------------------------- */
677 /* H/W initialization */
678
679 static int
680 als_init(struct sc_info *sc)
681 {
682 u_int32_t i, v;
683
684 /* Reset Chip */
685 if (als_esp_reset(sc)) {
686 return 1;
687 }
688
689 /* Enable write on DMA_SETUP register */
690 v = als_mix_rd(sc, ALS_SB16_CONFIG);
691 als_mix_wr(sc, ALS_SB16_CONFIG, v | 0x80);
692
693 /* Select DMA0 */
694 als_mix_wr(sc, ALS_SB16_DMA_SETUP, 0x01);
695
696 /* Disable write on DMA_SETUP register */
697 als_mix_wr(sc, ALS_SB16_CONFIG, v & 0x7f);
698
699 /* Enable interrupts */
700 v = als_gcr_rd(sc, ALS_GCR_MISC);
701 als_gcr_wr(sc, ALS_GCR_MISC, v | 0x28000);
702
703 /* Black out GCR DMA registers */
704 for (i = 0x91; i <= 0x96; i++) {
705 als_gcr_wr(sc, i, 0);
706 }
707
708 /* Emulation mode */
709 v = als_gcr_rd(sc, ALS_GCR_DMA_EMULATION);
710 als_gcr_wr(sc, ALS_GCR_DMA_EMULATION, v);
711 DEB(printf("GCR_DMA_EMULATION 0x%08x\n", v));
712 return 0;
713 }
714
715 static void
716 als_uninit(struct sc_info *sc)
717 {
718 /* Disable interrupts */
719 als_gcr_wr(sc, ALS_GCR_MISC, 0);
720 }
721
722 /* ------------------------------------------------------------------------- */
723 /* Probe and attach card */
724
725 static int
726 als_pci_probe(device_t dev)
727 {
728 if (pci_get_devid(dev) == ALS_PCI_ID0) {
729 device_set_desc(dev, "Avance Logic ALS4000");
730 return BUS_PROBE_DEFAULT;
731 }
732 return ENXIO;
733 }
734
735 static void
736 als_resource_free(device_t dev, struct sc_info *sc)
737 {
738 if (sc->reg) {
739 bus_release_resource(dev, SYS_RES_IOPORT, sc->regid, sc->reg);
740 sc->reg = NULL;
741 }
742 if (sc->ih) {
743 bus_teardown_intr(dev, sc->irq, sc->ih);
744 sc->ih = NULL;
745 }
746 if (sc->irq) {
747 bus_release_resource(dev, SYS_RES_IRQ, sc->irqid, sc->irq);
748 sc->irq = NULL;
749 }
750 if (sc->parent_dmat) {
751 bus_dma_tag_destroy(sc->parent_dmat);
752 sc->parent_dmat = 0;
753 }
754 if (sc->lock) {
755 snd_mtxfree(sc->lock);
756 sc->lock = NULL;
757 }
758 }
759
760 static int
761 als_resource_grab(device_t dev, struct sc_info *sc)
762 {
763 sc->regid = PCIR_BAR(0);
764 sc->reg = bus_alloc_resource_any(dev, SYS_RES_IOPORT, &sc->regid,
765 RF_ACTIVE);
766 if (sc->reg == NULL) {
767 device_printf(dev, "unable to allocate register space\n");
768 goto bad;
769 }
770 sc->st = rman_get_bustag(sc->reg);
771 sc->sh = rman_get_bushandle(sc->reg);
772
773 sc->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->irqid,
774 RF_ACTIVE | RF_SHAREABLE);
775 if (sc->irq == NULL) {
776 device_printf(dev, "unable to allocate interrupt\n");
777 goto bad;
778 }
779
780 if (snd_setup_intr(dev, sc->irq, INTR_MPSAFE, als_intr,
781 sc, &sc->ih)) {
782 device_printf(dev, "unable to setup interrupt\n");
783 goto bad;
784 }
785
786 sc->bufsz = pcm_getbuffersize(dev, 4096, ALS_DEFAULT_BUFSZ, 65536);
787
788 if (bus_dma_tag_create(/*parent*/bus_get_dma_tag(dev),
789 /*alignment*/2, /*boundary*/0,
790 /*lowaddr*/BUS_SPACE_MAXADDR_24BIT,
791 /*highaddr*/BUS_SPACE_MAXADDR,
792 /*filter*/NULL, /*filterarg*/NULL,
793 /*maxsize*/sc->bufsz,
794 /*nsegments*/1, /*maxsegz*/0x3ffff,
795 /*flags*/0, /*lockfunc*/NULL,
796 /*lockarg*/NULL, &sc->parent_dmat) != 0) {
797 device_printf(dev, "unable to create dma tag\n");
798 goto bad;
799 }
800 return 0;
801 bad:
802 als_resource_free(dev, sc);
803 return ENXIO;
804 }
805
806 static int
807 als_pci_attach(device_t dev)
808 {
809 struct sc_info *sc;
810 char status[SND_STATUSLEN];
811
812 sc = malloc(sizeof(*sc), M_DEVBUF, M_WAITOK | M_ZERO);
813 sc->lock = snd_mtxcreate(device_get_nameunit(dev), "snd_als4000 softc");
814 sc->dev = dev;
815
816 pci_enable_busmaster(dev);
817 /*
818 * By default the power to the various components on the
819 * ALS4000 is entirely controlled by the pci powerstate. We
820 * could attempt finer grained control by setting GCR6.31.
821 */
822 if (pci_get_powerstate(dev) != PCI_POWERSTATE_D0) {
823 /* Reset the power state. */
824 device_printf(dev, "chip is in D%d power mode "
825 "-- setting to D0\n", pci_get_powerstate(dev));
826 pci_set_powerstate(dev, PCI_POWERSTATE_D0);
827 }
828
829 if (als_resource_grab(dev, sc)) {
830 device_printf(dev, "failed to allocate resources\n");
831 goto bad_attach;
832 }
833
834 if (als_init(sc)) {
835 device_printf(dev, "failed to initialize hardware\n");
836 goto bad_attach;
837 }
838
839 if (mixer_init(dev, &als_mixer_class, sc)) {
840 device_printf(dev, "failed to initialize mixer\n");
841 goto bad_attach;
842 }
843
844 if (pcm_register(dev, sc, 1, 1)) {
845 device_printf(dev, "failed to register pcm entries\n");
846 goto bad_attach;
847 }
848
849 pcm_addchan(dev, PCMDIR_PLAY, &alspchan_class, sc);
850 pcm_addchan(dev, PCMDIR_REC, &alsrchan_class, sc);
851
852 snprintf(status, SND_STATUSLEN, "at io 0x%jx irq %jd %s",
853 rman_get_start(sc->reg), rman_get_start(sc->irq),PCM_KLDSTRING(snd_als4000));
854 pcm_setstatus(dev, status);
855 return 0;
856
857 bad_attach:
858 als_resource_free(dev, sc);
859 free(sc, M_DEVBUF);
860 return ENXIO;
861 }
862
863 static int
864 als_pci_detach(device_t dev)
865 {
866 struct sc_info *sc;
867 int r;
868
869 r = pcm_unregister(dev);
870 if (r)
871 return r;
872
873 sc = pcm_getdevinfo(dev);
874 als_uninit(sc);
875 als_resource_free(dev, sc);
876 free(sc, M_DEVBUF);
877 return 0;
878 }
879
880 static int
881 als_pci_suspend(device_t dev)
882 {
883 struct sc_info *sc = pcm_getdevinfo(dev);
884
885 snd_mtxlock(sc->lock);
886 sc->pch.dma_was_active = als_playback_stop(&sc->pch);
887 sc->rch.dma_was_active = als_capture_stop(&sc->rch);
888 als_uninit(sc);
889 snd_mtxunlock(sc->lock);
890 return 0;
891 }
892
893 static int
894 als_pci_resume(device_t dev)
895 {
896 struct sc_info *sc = pcm_getdevinfo(dev);
897
898 snd_mtxlock(sc->lock);
899 if (als_init(sc) != 0) {
900 device_printf(dev, "unable to reinitialize the card\n");
901 snd_mtxunlock(sc->lock);
902 return ENXIO;
903 }
904
905 if (mixer_reinit(dev) != 0) {
906 device_printf(dev, "unable to reinitialize the mixer\n");
907 snd_mtxunlock(sc->lock);
908 return ENXIO;
909 }
910
911 if (sc->pch.dma_was_active) {
912 als_playback_start(&sc->pch);
913 }
914
915 if (sc->rch.dma_was_active) {
916 als_capture_start(&sc->rch);
917 }
918 snd_mtxunlock(sc->lock);
919
920 return 0;
921 }
922
923 static device_method_t als_methods[] = {
924 /* Device interface */
925 DEVMETHOD(device_probe, als_pci_probe),
926 DEVMETHOD(device_attach, als_pci_attach),
927 DEVMETHOD(device_detach, als_pci_detach),
928 DEVMETHOD(device_suspend, als_pci_suspend),
929 DEVMETHOD(device_resume, als_pci_resume),
930 { 0, 0 }
931 };
932
933 static driver_t als_driver = {
934 "pcm",
935 als_methods,
936 PCM_SOFTC_SIZE,
937 };
938
939 DRIVER_MODULE(snd_als4000, pci, als_driver, 0, 0);
940 MODULE_DEPEND(snd_als4000, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER);
941 MODULE_VERSION(snd_als4000, 1);
Cache object: f8f39c0d14a7425655542d4cc7f60c30
|