2 * Copyright (c) 1999 Cameron Grant <cg@freebsd.org>
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.79.2.1 2005/12/30 19:55:53 netchild Exp $
32 * $DragonFly: src/sys/dev/sound/isa/sb8.c,v 1.7 2007/01/04 21:47:02 corecode Exp $
35 #include <dev/sound/pcm/sound.h>
37 #include <dev/sound/isa/sb.h>
38 #include <dev/sound/chip.h>
40 #include <bus/isa/isavar.h>
44 SND_DECLARE_FILE("$DragonFly: src/sys/dev/sound/isa/sb8.c,v 1.7 2007/01/04 21:47:02 corecode Exp $");
46 #define SB_DEFAULT_BUFSZ 4096
48 static u_int32_t sb_fmt[] = {
52 static struct pcmchan_caps sb200_playcaps = {4000, 23000, sb_fmt, 0};
53 static struct pcmchan_caps sb200_reccaps = {4000, 13000, sb_fmt, 0};
54 static struct pcmchan_caps sb201_playcaps = {4000, 44100, sb_fmt, 0};
55 static struct pcmchan_caps sb201_reccaps = {4000, 15000, sb_fmt, 0};
57 static u_int32_t sbpro_fmt[] = {
59 AFMT_STEREO | AFMT_U8,
62 static struct pcmchan_caps sbpro_playcaps = {4000, 44100, sbpro_fmt, 0};
63 static struct pcmchan_caps sbpro_reccaps = {4000, 44100, sbpro_fmt, 0};
68 struct sb_info *parent;
69 struct pcm_channel *channel;
70 struct snd_dbuf *buffer;
72 u_int32_t fmt, spd, blksz;
77 struct resource *io_base; /* I/O address for the board */
81 bus_dma_tag_t parent_dmat;
85 u_long bd_flags; /* board-specific flags */
86 struct sb_chinfo pch, rch;
89 static int sb_rd(struct sb_info *sb, int reg);
90 static void sb_wr(struct sb_info *sb, int reg, u_int8_t val);
91 static int sb_dspready(struct sb_info *sb);
92 static int sb_cmd(struct sb_info *sb, u_char val);
93 static int sb_cmd1(struct sb_info *sb, u_char cmd, int val);
94 static int sb_cmd2(struct sb_info *sb, u_char cmd, int val);
95 static u_int sb_get_byte(struct sb_info *sb);
96 static void sb_setmixer(struct sb_info *sb, u_int port, u_int value);
97 static int sb_getmixer(struct sb_info *sb, u_int port);
98 static int sb_reset_dsp(struct sb_info *sb);
100 static void sb_intr(void *arg);
101 static int sb_speed(struct sb_chinfo *ch);
102 static int sb_start(struct sb_chinfo *ch);
103 static int sb_stop(struct sb_chinfo *ch);
106 * Common code for the midi and pcm functions
108 * sb_cmd write a single byte to the CMD port.
109 * sb_cmd1 write a CMD + 1 byte arg
110 * sb_cmd2 write a CMD + 2 byte arg
111 * sb_get_byte returns a single byte from the DSP data port
115 sb_lock(struct sb_info *sb) {
117 sbc_lock(device_get_softc(sb->parent_dev));
121 sb_unlock(struct sb_info *sb) {
123 sbc_unlock(device_get_softc(sb->parent_dev));
127 port_rd(struct resource *port, int off)
129 return bus_space_read_1(rman_get_bustag(port), rman_get_bushandle(port), off);
133 port_wr(struct resource *port, int off, u_int8_t data)
135 bus_space_write_1(rman_get_bustag(port), rman_get_bushandle(port), off, data);
139 sb_rd(struct sb_info *sb, int reg)
141 return port_rd(sb->io_base, reg);
145 sb_wr(struct sb_info *sb, int reg, u_int8_t val)
147 port_wr(sb->io_base, reg, val);
151 sb_dspready(struct sb_info *sb)
153 return ((sb_rd(sb, SBDSP_STATUS) & 0x80) == 0);
157 sb_dspwr(struct sb_info *sb, u_char val)
161 for (i = 0; i < 1000; i++) {
162 if (sb_dspready(sb)) {
163 sb_wr(sb, SBDSP_CMD, val);
166 if (i > 10) DELAY((i > 100)? 1000 : 10);
168 kprintf("sb_dspwr(0x%02x) timed out.\n", val);
173 sb_cmd(struct sb_info *sb, u_char val)
176 kprintf("sb_cmd: %x\n", val);
178 return sb_dspwr(sb, val);
182 sb_cmd1(struct sb_info *sb, u_char cmd, int val)
185 kprintf("sb_cmd1: %x, %x\n", cmd, val);
187 if (sb_dspwr(sb, cmd)) {
188 return sb_dspwr(sb, val & 0xff);
193 sb_cmd2(struct sb_info *sb, u_char cmd, int val)
196 kprintf("sb_cmd2: %x, %x\n", cmd, val);
198 if (sb_dspwr(sb, cmd)) {
199 return sb_dspwr(sb, val & 0xff) &&
200 sb_dspwr(sb, (val >> 8) & 0xff);
205 * in the SB, there is a set of indirect "mixer" registers with
206 * address at offset 4, data at offset 5
208 * we don't need to interlock these, the mixer lock will suffice.
211 sb_setmixer(struct sb_info *sb, u_int port, u_int value)
213 sb_wr(sb, SB_MIX_ADDR, (u_char) (port & 0xff)); /* Select register */
215 sb_wr(sb, SB_MIX_DATA, (u_char) (value & 0xff));
220 sb_getmixer(struct sb_info *sb, u_int port)
224 sb_wr(sb, SB_MIX_ADDR, (u_char) (port & 0xff)); /* Select register */
226 val = sb_rd(sb, SB_MIX_DATA);
233 sb_get_byte(struct sb_info *sb)
237 for (i = 1000; i > 0; i--) {
238 if (sb_rd(sb, DSP_DATA_AVAIL) & 0x80)
239 return sb_rd(sb, DSP_READ);
247 sb_reset_dsp(struct sb_info *sb)
249 sb_wr(sb, SBDSP_RST, 3);
251 sb_wr(sb, SBDSP_RST, 0);
252 if (sb_get_byte(sb) != 0xAA) {
253 DEB(kprintf("sb_reset_dsp 0x%lx failed\n",
254 rman_get_start(sb->io_base)));
255 return ENXIO; /* Sorry */
261 sb_release_resources(struct sb_info *sb, device_t dev)
265 bus_teardown_intr(dev, sb->irq, sb->ih);
266 bus_release_resource(dev, SYS_RES_IRQ, 0, sb->irq);
270 isa_dma_release(rman_get_start(sb->drq));
271 bus_release_resource(dev, SYS_RES_DRQ, 0, sb->drq);
275 bus_release_resource(dev, SYS_RES_IOPORT, 0, sb->io_base);
278 if (sb->parent_dmat) {
279 bus_dma_tag_destroy(sb->parent_dmat);
286 sb_alloc_resources(struct sb_info *sb, device_t dev)
292 sb->io_base = bus_alloc_resource_any(dev, SYS_RES_IOPORT,
296 sb->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ,
300 sb->drq = bus_alloc_resource_any(dev, SYS_RES_DRQ,
303 if (sb->io_base && sb->drq && sb->irq) {
304 isa_dma_acquire(rman_get_start(sb->drq));
305 isa_dmainit(rman_get_start(sb->drq), sb->bufsize);
311 /************************************************************/
314 sbpromix_init(struct snd_mixer *m)
316 struct sb_info *sb = mix_getdevinfo(m);
318 mix_setdevs(m, SOUND_MASK_SYNTH | SOUND_MASK_PCM | SOUND_MASK_LINE |
319 SOUND_MASK_MIC | SOUND_MASK_CD | SOUND_MASK_VOLUME);
321 mix_setrecdevs(m, SOUND_MASK_LINE | SOUND_MASK_MIC | SOUND_MASK_CD);
323 sb_setmixer(sb, 0, 1); /* reset mixer */
329 sbpromix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right)
331 struct sb_info *sb = mix_getdevinfo(m);
337 case SOUND_MIXER_PCM:
341 case SOUND_MIXER_MIC:
346 case SOUND_MIXER_VOLUME:
350 case SOUND_MIXER_SYNTH:
358 case SOUND_MIXER_LINE:
366 left = (left * max) / 100;
367 right = (dev == SOUND_MIXER_MIC)? left : ((right * max) / 100);
369 val = (dev == SOUND_MIXER_MIC)? (left << 1) : (left << 5 | right << 1);
370 sb_setmixer(sb, reg, val);
372 left = (left * 100) / max;
373 right = (right * 100) / max;
375 return left | (right << 8);
379 sbpromix_setrecsrc(struct snd_mixer *m, u_int32_t src)
381 struct sb_info *sb = mix_getdevinfo(m);
384 if (src == SOUND_MASK_LINE)
386 else if (src == SOUND_MASK_CD)
388 else { /* default: mic */
389 src = SOUND_MASK_MIC;
392 sb_setmixer(sb, RECORD_SRC, recdev | (sb_getmixer(sb, RECORD_SRC) & ~0x07));
397 static kobj_method_t sbpromix_mixer_methods[] = {
398 KOBJMETHOD(mixer_init, sbpromix_init),
399 KOBJMETHOD(mixer_set, sbpromix_set),
400 KOBJMETHOD(mixer_setrecsrc, sbpromix_setrecsrc),
403 MIXER_DECLARE(sbpromix_mixer);
405 /************************************************************/
408 sbmix_init(struct snd_mixer *m)
410 struct sb_info *sb = mix_getdevinfo(m);
412 mix_setdevs(m, SOUND_MASK_SYNTH | SOUND_MASK_PCM | SOUND_MASK_CD | SOUND_MASK_VOLUME);
414 mix_setrecdevs(m, 0);
416 sb_setmixer(sb, 0, 1); /* reset mixer */
422 sbmix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right)
424 struct sb_info *sb = mix_getdevinfo(m);
429 case SOUND_MIXER_VOLUME:
433 case SOUND_MIXER_SYNTH:
441 case SOUND_MIXER_PCM:
450 left = (left * max) / 100;
452 sb_setmixer(sb, reg, left << 1);
454 left = (left * 100) / max;
456 return left | (left << 8);
460 sbmix_setrecsrc(struct snd_mixer *m, u_int32_t src)
465 static kobj_method_t sbmix_mixer_methods[] = {
466 KOBJMETHOD(mixer_init, sbmix_init),
467 KOBJMETHOD(mixer_set, sbmix_set),
468 KOBJMETHOD(mixer_setrecsrc, sbmix_setrecsrc),
471 MIXER_DECLARE(sbmix_mixer);
473 /************************************************************/
478 struct sb_info *sb = (struct sb_info *)arg;
481 if (sndbuf_runsz(sb->pch.buffer) > 0) {
483 chn_intr(sb->pch.channel);
487 if (sndbuf_runsz(sb->rch.buffer) > 0) {
489 chn_intr(sb->rch.channel);
493 sb_rd(sb, DSP_DATA_AVAIL); /* int ack */
498 sb_speed(struct sb_chinfo *ch)
500 struct sb_info *sb = ch->parent;
501 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
502 int stereo = (ch->fmt & AFMT_STEREO)? 1 : 0;
503 int speed, tmp, thresh, max;
506 if (sb->bd_id >= 0x300) {
507 thresh = stereo? 11025 : 23000;
508 max = stereo? 22050 : 44100;
509 } else if (sb->bd_id > 0x200) {
510 thresh = play? 23000 : 13000;
511 max = play? 44100 : 15000;
514 max = play? 23000 : 13000;
522 sb->bd_flags &= ~BD_F_HISPEED;
524 sb->bd_flags |= BD_F_HISPEED;
526 tmp = 65536 - (256000000 / (speed << stereo));
529 sb_cmd1(sb, 0x40, tconst); /* set time constant */
531 speed = (256000000 / (65536 - tmp)) >> stereo;
539 sb_start(struct sb_chinfo *ch)
541 struct sb_info *sb = ch->parent;
542 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
543 int stereo = (ch->fmt & AFMT_STEREO)? 1 : 0;
551 sb_cmd(sb, DSP_CMD_SPKON);
553 if (sb->bd_flags & BD_F_HISPEED)
554 i = play? 0x90 : 0x98;
556 i = play? 0x1c : 0x2c;
558 sb_setmixer(sb, 0x0e, stereo? 2 : 0);
559 sb_cmd2(sb, 0x48, l);
562 sb->bd_flags |= BD_F_DMARUN;
568 sb_stop(struct sb_chinfo *ch)
570 struct sb_info *sb = ch->parent;
571 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
574 if (sb->bd_flags & BD_F_HISPEED)
579 * NOTE: DSP_CMD_DMAEXIT_8 does not work with old
582 sb_cmd(sb, DSP_CMD_DMAEXIT_8);
588 sb_cmd(sb, DSP_CMD_SPKOFF); /* speaker off */
590 sb->bd_flags &= ~BD_F_DMARUN;
594 /* channel interface */
596 sbchan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir)
598 struct sb_info *sb = devinfo;
599 struct sb_chinfo *ch = (dir == PCMDIR_PLAY)? &sb->pch : &sb->rch;
605 if (sndbuf_alloc(ch->buffer, sb->parent_dmat, sb->bufsize) != 0)
607 sndbuf_dmasetup(ch->buffer, sb->drq);
612 sbchan_setformat(kobj_t obj, void *data, u_int32_t format)
614 struct sb_chinfo *ch = data;
621 sbchan_setspeed(kobj_t obj, void *data, u_int32_t speed)
623 struct sb_chinfo *ch = data;
630 sbchan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize)
632 struct sb_chinfo *ch = data;
634 ch->blksz = blocksize;
639 sbchan_trigger(kobj_t obj, void *data, int go)
641 struct sb_chinfo *ch = data;
643 if (go == PCMTRIG_EMLDMAWR || go == PCMTRIG_EMLDMARD)
646 sndbuf_dma(ch->buffer, go);
647 if (go == PCMTRIG_START)
655 sbchan_getptr(kobj_t obj, void *data)
657 struct sb_chinfo *ch = data;
659 return sndbuf_dmaptr(ch->buffer);
662 static struct pcmchan_caps *
663 sbchan_getcaps(kobj_t obj, void *data)
665 struct sb_chinfo *ch = data;
666 int p = (ch->dir == PCMDIR_PLAY)? 1 : 0;
668 if (ch->parent->bd_id == 0x200)
669 return p? &sb200_playcaps : &sb200_reccaps;
670 if (ch->parent->bd_id < 0x300)
671 return p? &sb201_playcaps : &sb201_reccaps;
672 return p? &sbpro_playcaps : &sbpro_reccaps;
675 static kobj_method_t sbchan_methods[] = {
676 KOBJMETHOD(channel_init, sbchan_init),
677 KOBJMETHOD(channel_setformat, sbchan_setformat),
678 KOBJMETHOD(channel_setspeed, sbchan_setspeed),
679 KOBJMETHOD(channel_setblocksize, sbchan_setblocksize),
680 KOBJMETHOD(channel_trigger, sbchan_trigger),
681 KOBJMETHOD(channel_getptr, sbchan_getptr),
682 KOBJMETHOD(channel_getcaps, sbchan_getcaps),
685 CHANNEL_DECLARE(sbchan);
687 /************************************************************/
690 sb_probe(device_t dev)
693 uintptr_t func, ver, r, f;
695 /* The parent device has already been probed. */
696 r = BUS_READ_IVAR(device_get_parent(dev), dev, 0, &func);
700 r = BUS_READ_IVAR(device_get_parent(dev), dev, 1, &ver);
701 f = (ver & 0xffff0000) >> 16;
703 if ((f & BD_F_ESS) || (ver >= 0x400))
706 ksnprintf(buf, sizeof buf, "SB DSP %d.%02d", (int) ver >> 8, (int) ver & 0xff);
708 device_set_desc_copy(dev, buf);
714 sb_attach(device_t dev)
717 char status[SND_STATUSLEN];
720 sb = (struct sb_info *)kmalloc(sizeof *sb, M_DEVBUF, M_NOWAIT | M_ZERO);
724 sb->parent_dev = device_get_parent(dev);
725 BUS_READ_IVAR(device_get_parent(dev), dev, 1, &ver);
726 sb->bd_id = ver & 0x0000ffff;
727 sb->bd_flags = (ver & 0xffff0000) >> 16;
728 sb->bufsize = pcm_getbuffersize(dev, 4096, SB_DEFAULT_BUFSZ, 65536);
730 if (sb_alloc_resources(sb, dev))
732 if (sb_reset_dsp(sb))
734 if (mixer_init(dev, (sb->bd_id < 0x300)? &sbmix_mixer_class : &sbpromix_mixer_class, sb))
736 if (snd_setup_intr(dev, sb->irq, 0, sb_intr, sb, &sb->ih))
739 pcm_setflags(dev, pcm_getflags(dev) | SD_F_SIMPLEX);
741 if (bus_dma_tag_create(/*parent*/NULL, /*alignment*/2, /*boundary*/0,
742 /*lowaddr*/BUS_SPACE_MAXADDR_24BIT,
743 /*highaddr*/BUS_SPACE_MAXADDR,
744 /*filter*/NULL, /*filterarg*/NULL,
745 /*maxsize*/sb->bufsize, /*nsegments*/1,
746 /*maxsegz*/0x3ffff, /*flags*/0,
747 &sb->parent_dmat) != 0) {
748 device_printf(dev, "unable to create dma tag\n");
752 ksnprintf(status, SND_STATUSLEN, "at io 0x%lx irq %ld drq %ld bufsz %u %s",
753 rman_get_start(sb->io_base), rman_get_start(sb->irq),
754 rman_get_start(sb->drq), sb->bufsize, PCM_KLDSTRING(snd_sb8));
756 if (pcm_register(dev, sb, 1, 1))
758 pcm_addchan(dev, PCMDIR_REC, &sbchan_class, sb);
759 pcm_addchan(dev, PCMDIR_PLAY, &sbchan_class, sb);
761 pcm_setstatus(dev, status);
766 sb_release_resources(sb, dev);
771 sb_detach(device_t dev)
776 r = pcm_unregister(dev);
780 sb = pcm_getdevinfo(dev);
781 sb_release_resources(sb, dev);
785 static device_method_t sb_methods[] = {
786 /* Device interface */
787 DEVMETHOD(device_probe, sb_probe),
788 DEVMETHOD(device_attach, sb_attach),
789 DEVMETHOD(device_detach, sb_detach),
794 static driver_t sb_driver = {
800 DRIVER_MODULE(snd_sb8, sbc, sb_driver, pcm_devclass, 0, 0);
801 MODULE_DEPEND(snd_sb8, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER);
802 MODULE_DEPEND(snd_sb8, snd_sbc, 1, 1, 1);
803 MODULE_VERSION(snd_sb8, 1);