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