2 * Copyright (c) 1999 Cameron Grant <gandalf@vilnya.demon.co.uk>
3 * Copyright 1997,1998 Luigi Rizzo.
5 * Derived from files in the Voxware 3.5 distribution,
6 * Copyright by Hannu Savolainen 1994, under the same copyright
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * $FreeBSD: src/sys/dev/sound/isa/sb8.c,v 1.62.2.5 2002/12/24 21:17:42 semenu Exp $
32 * $DragonFly: src/sys/dev/sound/isa/sb8.c,v 1.2 2003/06/17 04:28:30 dillon Exp $
35 #include <dev/sound/pcm/sound.h>
37 #include <dev/sound/isa/sb.h>
38 #include <dev/sound/chip.h>
42 SND_DECLARE_FILE("$DragonFly: src/sys/dev/sound/isa/sb8.c,v 1.2 2003/06/17 04:28:30 dillon Exp $");
44 #define SB_DEFAULT_BUFSZ 4096
46 static u_int32_t sb_fmt[] = {
50 static struct pcmchan_caps sb200_playcaps = {4000, 23000, sb_fmt, 0};
51 static struct pcmchan_caps sb200_reccaps = {4000, 13000, sb_fmt, 0};
52 static struct pcmchan_caps sb201_playcaps = {4000, 44100, sb_fmt, 0};
53 static struct pcmchan_caps sb201_reccaps = {4000, 15000, sb_fmt, 0};
55 static u_int32_t sbpro_fmt[] = {
57 AFMT_STEREO | AFMT_U8,
60 static struct pcmchan_caps sbpro_playcaps = {4000, 44100, sbpro_fmt, 0};
61 static struct pcmchan_caps sbpro_reccaps = {4000, 44100, sbpro_fmt, 0};
66 struct sb_info *parent;
67 struct pcm_channel *channel;
68 struct snd_dbuf *buffer;
70 u_int32_t fmt, spd, blksz;
75 struct resource *io_base; /* I/O address for the board */
79 bus_dma_tag_t parent_dmat;
83 u_long bd_flags; /* board-specific flags */
84 struct sb_chinfo pch, rch;
87 static int sb_rd(struct sb_info *sb, int reg);
88 static void sb_wr(struct sb_info *sb, int reg, u_int8_t val);
89 static int sb_dspready(struct sb_info *sb);
90 static int sb_cmd(struct sb_info *sb, u_char val);
91 static int sb_cmd1(struct sb_info *sb, u_char cmd, int val);
92 static int sb_cmd2(struct sb_info *sb, u_char cmd, int val);
93 static u_int sb_get_byte(struct sb_info *sb);
94 static void sb_setmixer(struct sb_info *sb, u_int port, u_int value);
95 static int sb_getmixer(struct sb_info *sb, u_int port);
96 static int sb_reset_dsp(struct sb_info *sb);
98 static void sb_intr(void *arg);
99 static int sb_speed(struct sb_chinfo *ch);
100 static int sb_start(struct sb_chinfo *ch);
101 static int sb_stop(struct sb_chinfo *ch);
104 * Common code for the midi and pcm functions
106 * sb_cmd write a single byte to the CMD port.
107 * sb_cmd1 write a CMD + 1 byte arg
108 * sb_cmd2 write a CMD + 2 byte arg
109 * sb_get_byte returns a single byte from the DSP data port
113 sb_lock(struct sb_info *sb) {
115 sbc_lock(device_get_softc(sb->parent_dev));
119 sb_unlock(struct sb_info *sb) {
121 sbc_unlock(device_get_softc(sb->parent_dev));
125 port_rd(struct resource *port, int off)
127 return bus_space_read_1(rman_get_bustag(port), rman_get_bushandle(port), off);
131 port_wr(struct resource *port, int off, u_int8_t data)
133 bus_space_write_1(rman_get_bustag(port), rman_get_bushandle(port), off, data);
137 sb_rd(struct sb_info *sb, int reg)
139 return port_rd(sb->io_base, reg);
143 sb_wr(struct sb_info *sb, int reg, u_int8_t val)
145 port_wr(sb->io_base, reg, val);
149 sb_dspready(struct sb_info *sb)
151 return ((sb_rd(sb, SBDSP_STATUS) & 0x80) == 0);
155 sb_dspwr(struct sb_info *sb, u_char val)
159 for (i = 0; i < 1000; i++) {
160 if (sb_dspready(sb)) {
161 sb_wr(sb, SBDSP_CMD, val);
164 if (i > 10) DELAY((i > 100)? 1000 : 10);
166 printf("sb_dspwr(0x%02x) timed out.\n", val);
171 sb_cmd(struct sb_info *sb, u_char val)
174 printf("sb_cmd: %x\n", val);
176 return sb_dspwr(sb, val);
180 sb_cmd1(struct sb_info *sb, u_char cmd, int val)
183 printf("sb_cmd1: %x, %x\n", cmd, val);
185 if (sb_dspwr(sb, cmd)) {
186 return sb_dspwr(sb, val & 0xff);
191 sb_cmd2(struct sb_info *sb, u_char cmd, int val)
194 printf("sb_cmd2: %x, %x\n", cmd, val);
196 if (sb_dspwr(sb, cmd)) {
197 return sb_dspwr(sb, val & 0xff) &&
198 sb_dspwr(sb, (val >> 8) & 0xff);
203 * in the SB, there is a set of indirect "mixer" registers with
204 * address at offset 4, data at offset 5
206 * we don't need to interlock these, the mixer lock will suffice.
209 sb_setmixer(struct sb_info *sb, u_int port, u_int value)
211 sb_wr(sb, SB_MIX_ADDR, (u_char) (port & 0xff)); /* Select register */
213 sb_wr(sb, SB_MIX_DATA, (u_char) (value & 0xff));
218 sb_getmixer(struct sb_info *sb, u_int port)
222 sb_wr(sb, SB_MIX_ADDR, (u_char) (port & 0xff)); /* Select register */
224 val = sb_rd(sb, SB_MIX_DATA);
231 sb_get_byte(struct sb_info *sb)
235 for (i = 1000; i > 0; i--) {
236 if (sb_rd(sb, DSP_DATA_AVAIL) & 0x80)
237 return sb_rd(sb, DSP_READ);
245 sb_reset_dsp(struct sb_info *sb)
247 sb_wr(sb, SBDSP_RST, 3);
249 sb_wr(sb, SBDSP_RST, 0);
250 if (sb_get_byte(sb) != 0xAA) {
251 DEB(printf("sb_reset_dsp 0x%lx failed\n",
252 rman_get_start(sb->io_base)));
253 return ENXIO; /* Sorry */
259 sb_release_resources(struct sb_info *sb, device_t dev)
263 bus_teardown_intr(dev, sb->irq, sb->ih);
264 bus_release_resource(dev, SYS_RES_IRQ, 0, sb->irq);
268 isa_dma_release(rman_get_start(sb->drq));
269 bus_release_resource(dev, SYS_RES_DRQ, 0, sb->drq);
273 bus_release_resource(dev, SYS_RES_IOPORT, 0, sb->io_base);
276 if (sb->parent_dmat) {
277 bus_dma_tag_destroy(sb->parent_dmat);
284 sb_alloc_resources(struct sb_info *sb, device_t dev)
290 sb->io_base = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid, 0, ~0, 1, RF_ACTIVE);
293 sb->irq = bus_alloc_resource(dev, SYS_RES_IRQ, &rid, 0, ~0, 1, RF_ACTIVE);
296 sb->drq = bus_alloc_resource(dev, SYS_RES_DRQ, &rid, 0, ~0, 1, RF_ACTIVE);
298 if (sb->io_base && sb->drq && sb->irq) {
299 isa_dma_acquire(rman_get_start(sb->drq));
300 isa_dmainit(rman_get_start(sb->drq), sb->bufsize);
306 /************************************************************/
309 sbpromix_init(struct snd_mixer *m)
311 struct sb_info *sb = mix_getdevinfo(m);
313 mix_setdevs(m, SOUND_MASK_SYNTH | SOUND_MASK_PCM | SOUND_MASK_LINE |
314 SOUND_MASK_MIC | SOUND_MASK_CD | SOUND_MASK_VOLUME);
316 mix_setrecdevs(m, SOUND_MASK_LINE | SOUND_MASK_MIC | SOUND_MASK_CD);
318 sb_setmixer(sb, 0, 1); /* reset mixer */
324 sbpromix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right)
326 struct sb_info *sb = mix_getdevinfo(m);
332 case SOUND_MIXER_PCM:
336 case SOUND_MIXER_MIC:
341 case SOUND_MIXER_VOLUME:
345 case SOUND_MIXER_SYNTH:
353 case SOUND_MIXER_LINE:
361 left = (left * max) / 100;
362 right = (dev == SOUND_MIXER_MIC)? left : ((right * max) / 100);
364 val = (dev == SOUND_MIXER_MIC)? (left << 1) : (left << 5 | right << 1);
365 sb_setmixer(sb, reg, val);
367 left = (left * 100) / max;
368 right = (right * 100) / max;
370 return left | (right << 8);
374 sbpromix_setrecsrc(struct snd_mixer *m, u_int32_t src)
376 struct sb_info *sb = mix_getdevinfo(m);
379 if (src == SOUND_MASK_LINE)
381 else if (src == SOUND_MASK_CD)
383 else { /* default: mic */
384 src = SOUND_MASK_MIC;
387 sb_setmixer(sb, RECORD_SRC, recdev | (sb_getmixer(sb, RECORD_SRC) & ~0x07));
392 static kobj_method_t sbpromix_mixer_methods[] = {
393 KOBJMETHOD(mixer_init, sbpromix_init),
394 KOBJMETHOD(mixer_set, sbpromix_set),
395 KOBJMETHOD(mixer_setrecsrc, sbpromix_setrecsrc),
398 MIXER_DECLARE(sbpromix_mixer);
400 /************************************************************/
403 sbmix_init(struct snd_mixer *m)
405 struct sb_info *sb = mix_getdevinfo(m);
407 mix_setdevs(m, SOUND_MASK_SYNTH | SOUND_MASK_PCM | SOUND_MASK_CD | SOUND_MASK_VOLUME);
409 mix_setrecdevs(m, 0);
411 sb_setmixer(sb, 0, 1); /* reset mixer */
417 sbmix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right)
419 struct sb_info *sb = mix_getdevinfo(m);
424 case SOUND_MIXER_VOLUME:
428 case SOUND_MIXER_SYNTH:
436 case SOUND_MIXER_PCM:
445 left = (left * max) / 100;
447 sb_setmixer(sb, reg, left << 1);
449 left = (left * 100) / max;
451 return left | (left << 8);
455 sbmix_setrecsrc(struct snd_mixer *m, u_int32_t src)
460 static kobj_method_t sbmix_mixer_methods[] = {
461 KOBJMETHOD(mixer_init, sbmix_init),
462 KOBJMETHOD(mixer_set, sbmix_set),
463 KOBJMETHOD(mixer_setrecsrc, sbmix_setrecsrc),
466 MIXER_DECLARE(sbmix_mixer);
468 /************************************************************/
473 struct sb_info *sb = (struct sb_info *)arg;
476 if (sndbuf_runsz(sb->pch.buffer) > 0)
477 chn_intr(sb->pch.channel);
479 if (sndbuf_runsz(sb->rch.buffer) > 0)
480 chn_intr(sb->rch.channel);
482 sb_rd(sb, DSP_DATA_AVAIL); /* int ack */
487 sb_speed(struct sb_chinfo *ch)
489 struct sb_info *sb = ch->parent;
490 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
491 int stereo = (ch->fmt & AFMT_STEREO)? 1 : 0;
492 int speed, tmp, thresh, max;
495 if (sb->bd_id >= 0x300) {
496 thresh = stereo? 11025 : 23000;
497 max = stereo? 22050 : 44100;
498 } else if (sb->bd_id > 0x200) {
499 thresh = play? 23000 : 13000;
500 max = play? 44100 : 15000;
503 max = play? 23000 : 13000;
511 sb->bd_flags &= ~BD_F_HISPEED;
513 sb->bd_flags |= BD_F_HISPEED;
515 tmp = 65536 - (256000000 / (speed << stereo));
518 sb_cmd1(sb, 0x40, tconst); /* set time constant */
520 speed = (256000000 / (65536 - tmp)) >> stereo;
528 sb_start(struct sb_chinfo *ch)
530 struct sb_info *sb = ch->parent;
531 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
532 int stereo = (ch->fmt & AFMT_STEREO)? 1 : 0;
540 sb_cmd(sb, DSP_CMD_SPKON);
542 if (sb->bd_flags & BD_F_HISPEED)
543 i = play? 0x90 : 0x98;
545 i = play? 0x1c : 0x2c;
547 sb_setmixer(sb, 0x0e, stereo? 2 : 0);
548 sb_cmd2(sb, 0x48, l);
551 sb->bd_flags |= BD_F_DMARUN;
557 sb_stop(struct sb_chinfo *ch)
559 struct sb_info *sb = ch->parent;
560 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
563 if (sb->bd_flags & BD_F_HISPEED)
566 sb_cmd(sb, DSP_CMD_DMAEXIT_8);
569 sb_cmd(sb, DSP_CMD_SPKOFF); /* speaker off */
571 sb->bd_flags &= ~BD_F_DMARUN;
575 /* channel interface */
577 sbchan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir)
579 struct sb_info *sb = devinfo;
580 struct sb_chinfo *ch = (dir == PCMDIR_PLAY)? &sb->pch : &sb->rch;
586 if (sndbuf_alloc(ch->buffer, sb->parent_dmat, sb->bufsize) == -1)
588 sndbuf_isadmasetup(ch->buffer, sb->drq);
593 sbchan_setformat(kobj_t obj, void *data, u_int32_t format)
595 struct sb_chinfo *ch = data;
602 sbchan_setspeed(kobj_t obj, void *data, u_int32_t speed)
604 struct sb_chinfo *ch = data;
611 sbchan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize)
613 struct sb_chinfo *ch = data;
615 ch->blksz = blocksize;
620 sbchan_trigger(kobj_t obj, void *data, int go)
622 struct sb_chinfo *ch = data;
624 if (go == PCMTRIG_EMLDMAWR || go == PCMTRIG_EMLDMARD)
627 sndbuf_isadma(ch->buffer, go);
628 if (go == PCMTRIG_START)
636 sbchan_getptr(kobj_t obj, void *data)
638 struct sb_chinfo *ch = data;
640 return sndbuf_isadmaptr(ch->buffer);
643 static struct pcmchan_caps *
644 sbchan_getcaps(kobj_t obj, void *data)
646 struct sb_chinfo *ch = data;
647 int p = (ch->dir == PCMDIR_PLAY)? 1 : 0;
649 if (ch->parent->bd_id == 0x200)
650 return p? &sb200_playcaps : &sb200_reccaps;
651 if (ch->parent->bd_id < 0x300)
652 return p? &sb201_playcaps : &sb201_reccaps;
653 return p? &sbpro_playcaps : &sbpro_reccaps;
656 static kobj_method_t sbchan_methods[] = {
657 KOBJMETHOD(channel_init, sbchan_init),
658 KOBJMETHOD(channel_setformat, sbchan_setformat),
659 KOBJMETHOD(channel_setspeed, sbchan_setspeed),
660 KOBJMETHOD(channel_setblocksize, sbchan_setblocksize),
661 KOBJMETHOD(channel_trigger, sbchan_trigger),
662 KOBJMETHOD(channel_getptr, sbchan_getptr),
663 KOBJMETHOD(channel_getcaps, sbchan_getcaps),
666 CHANNEL_DECLARE(sbchan);
668 /************************************************************/
671 sb_probe(device_t dev)
674 uintptr_t func, ver, r, f;
676 /* The parent device has already been probed. */
677 r = BUS_READ_IVAR(device_get_parent(dev), dev, 0, &func);
681 r = BUS_READ_IVAR(device_get_parent(dev), dev, 1, &ver);
682 f = (ver & 0xffff0000) >> 16;
684 if ((f & BD_F_ESS) || (ver >= 0x400))
687 snprintf(buf, sizeof buf, "SB DSP %d.%02d", (int) ver >> 8, (int) ver & 0xff);
689 device_set_desc_copy(dev, buf);
695 sb_attach(device_t dev)
698 char status[SND_STATUSLEN];
701 sb = (struct sb_info *)malloc(sizeof *sb, M_DEVBUF, M_NOWAIT | M_ZERO);
705 sb->parent_dev = device_get_parent(dev);
706 BUS_READ_IVAR(device_get_parent(dev), dev, 1, &ver);
707 sb->bd_id = ver & 0x0000ffff;
708 sb->bd_flags = (ver & 0xffff0000) >> 16;
709 sb->bufsize = pcm_getbuffersize(dev, 4096, SB_DEFAULT_BUFSZ, 65536);
711 if (sb_alloc_resources(sb, dev))
713 if (sb_reset_dsp(sb))
715 if (mixer_init(dev, (sb->bd_id < 0x300)? &sbmix_mixer_class : &sbpromix_mixer_class, sb))
717 if (snd_setup_intr(dev, sb->irq, INTR_MPSAFE, sb_intr, sb, &sb->ih))
720 pcm_setflags(dev, pcm_getflags(dev) | SD_F_SIMPLEX);
722 if (bus_dma_tag_create(/*parent*/NULL, /*alignment*/2, /*boundary*/0,
723 /*lowaddr*/BUS_SPACE_MAXADDR_24BIT,
724 /*highaddr*/BUS_SPACE_MAXADDR,
725 /*filter*/NULL, /*filterarg*/NULL,
726 /*maxsize*/sb->bufsize, /*nsegments*/1,
728 /*flags*/0, &sb->parent_dmat) != 0) {
729 device_printf(dev, "unable to create dma tag\n");
733 snprintf(status, SND_STATUSLEN, "at io 0x%lx irq %ld drq %ld bufsz %u",
734 rman_get_start(sb->io_base), rman_get_start(sb->irq), rman_get_start(sb->drq), sb->bufsize);
736 if (pcm_register(dev, sb, 1, 1))
738 pcm_addchan(dev, PCMDIR_REC, &sbchan_class, sb);
739 pcm_addchan(dev, PCMDIR_PLAY, &sbchan_class, sb);
741 pcm_setstatus(dev, status);
746 sb_release_resources(sb, dev);
751 sb_detach(device_t dev)
756 r = pcm_unregister(dev);
760 sb = pcm_getdevinfo(dev);
761 sb_release_resources(sb, dev);
765 static device_method_t sb_methods[] = {
766 /* Device interface */
767 DEVMETHOD(device_probe, sb_probe),
768 DEVMETHOD(device_attach, sb_attach),
769 DEVMETHOD(device_detach, sb_detach),
774 static driver_t sb_driver = {
780 DRIVER_MODULE(snd_sb8, sbc, sb_driver, pcm_devclass, 0, 0);
781 MODULE_DEPEND(snd_sb8, snd_pcm, PCM_MINVER, PCM_PREFVER, PCM_MAXVER);
782 MODULE_DEPEND(snd_sb8, snd_sbc, 1, 1, 1);
783 MODULE_VERSION(snd_sb8, 1);