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 $
34 #include <dev/sound/pcm/sound.h>
36 #include <dev/sound/isa/sb.h>
37 #include <dev/sound/chip.h>
39 #include <bus/isa/isavar.h>
43 SND_DECLARE_FILE("$DragonFly: src/sys/dev/sound/isa/sb8.c,v 1.7 2007/01/04 21:47:02 corecode Exp $");
45 #define SB_DEFAULT_BUFSZ 4096
47 static u_int32_t sb_fmt[] = {
51 static struct pcmchan_caps sb200_playcaps = {4000, 23000, sb_fmt, 0};
52 static struct pcmchan_caps sb200_reccaps = {4000, 13000, sb_fmt, 0};
53 static struct pcmchan_caps sb201_playcaps = {4000, 44100, sb_fmt, 0};
54 static struct pcmchan_caps sb201_reccaps = {4000, 15000, sb_fmt, 0};
56 static u_int32_t sbpro_fmt[] = {
58 AFMT_STEREO | AFMT_U8,
61 static struct pcmchan_caps sbpro_playcaps = {4000, 44100, sbpro_fmt, 0};
62 static struct pcmchan_caps sbpro_reccaps = {4000, 44100, sbpro_fmt, 0};
67 struct sb_info *parent;
68 struct pcm_channel *channel;
69 struct snd_dbuf *buffer;
71 u_int32_t fmt, spd, blksz;
76 struct resource *io_base; /* I/O address for the board */
80 bus_dma_tag_t parent_dmat;
84 u_long bd_flags; /* board-specific flags */
85 struct sb_chinfo pch, rch;
88 static int sb_rd(struct sb_info *sb, int reg);
89 static void sb_wr(struct sb_info *sb, int reg, u_int8_t val);
90 static int sb_dspready(struct sb_info *sb);
91 static int sb_cmd(struct sb_info *sb, u_char val);
92 static int sb_cmd1(struct sb_info *sb, u_char cmd, int val);
93 static int sb_cmd2(struct sb_info *sb, u_char cmd, int val);
94 static u_int sb_get_byte(struct sb_info *sb);
95 static void sb_setmixer(struct sb_info *sb, u_int port, u_int value);
96 static int sb_getmixer(struct sb_info *sb, u_int port);
97 static int sb_reset_dsp(struct sb_info *sb);
99 static void sb_intr(void *arg);
100 static int sb_speed(struct sb_chinfo *ch);
101 static int sb_start(struct sb_chinfo *ch);
102 static int sb_stop(struct sb_chinfo *ch);
105 * Common code for the midi and pcm functions
107 * sb_cmd write a single byte to the CMD port.
108 * sb_cmd1 write a CMD + 1 byte arg
109 * sb_cmd2 write a CMD + 2 byte arg
110 * sb_get_byte returns a single byte from the DSP data port
114 sb_lock(struct sb_info *sb) {
116 sbc_lock(device_get_softc(sb->parent_dev));
120 sb_unlock(struct sb_info *sb) {
122 sbc_unlock(device_get_softc(sb->parent_dev));
126 port_rd(struct resource *port, int off)
128 return bus_space_read_1(rman_get_bustag(port), rman_get_bushandle(port), off);
132 port_wr(struct resource *port, int off, u_int8_t data)
134 bus_space_write_1(rman_get_bustag(port), rman_get_bushandle(port), off, data);
138 sb_rd(struct sb_info *sb, int reg)
140 return port_rd(sb->io_base, reg);
144 sb_wr(struct sb_info *sb, int reg, u_int8_t val)
146 port_wr(sb->io_base, reg, val);
150 sb_dspready(struct sb_info *sb)
152 return ((sb_rd(sb, SBDSP_STATUS) & 0x80) == 0);
156 sb_dspwr(struct sb_info *sb, u_char val)
160 for (i = 0; i < 1000; i++) {
161 if (sb_dspready(sb)) {
162 sb_wr(sb, SBDSP_CMD, val);
165 if (i > 10) DELAY((i > 100)? 1000 : 10);
167 kprintf("sb_dspwr(0x%02x) timed out.\n", val);
172 sb_cmd(struct sb_info *sb, u_char val)
175 kprintf("sb_cmd: %x\n", val);
177 return sb_dspwr(sb, val);
181 sb_cmd1(struct sb_info *sb, u_char cmd, int val)
184 kprintf("sb_cmd1: %x, %x\n", cmd, val);
186 if (sb_dspwr(sb, cmd)) {
187 return sb_dspwr(sb, val & 0xff);
192 sb_cmd2(struct sb_info *sb, u_char cmd, int val)
195 kprintf("sb_cmd2: %x, %x\n", cmd, val);
197 if (sb_dspwr(sb, cmd)) {
198 return sb_dspwr(sb, val & 0xff) &&
199 sb_dspwr(sb, (val >> 8) & 0xff);
204 * in the SB, there is a set of indirect "mixer" registers with
205 * address at offset 4, data at offset 5
207 * we don't need to interlock these, the mixer lock will suffice.
210 sb_setmixer(struct sb_info *sb, u_int port, u_int value)
212 sb_wr(sb, SB_MIX_ADDR, (u_char) (port & 0xff)); /* Select register */
214 sb_wr(sb, SB_MIX_DATA, (u_char) (value & 0xff));
219 sb_getmixer(struct sb_info *sb, u_int port)
223 sb_wr(sb, SB_MIX_ADDR, (u_char) (port & 0xff)); /* Select register */
225 val = sb_rd(sb, SB_MIX_DATA);
232 sb_get_byte(struct sb_info *sb)
236 for (i = 1000; i > 0; i--) {
237 if (sb_rd(sb, DSP_DATA_AVAIL) & 0x80)
238 return sb_rd(sb, DSP_READ);
246 sb_reset_dsp(struct sb_info *sb)
248 sb_wr(sb, SBDSP_RST, 3);
250 sb_wr(sb, SBDSP_RST, 0);
251 if (sb_get_byte(sb) != 0xAA) {
252 DEB(kprintf("sb_reset_dsp 0x%lx failed\n",
253 rman_get_start(sb->io_base)));
254 return ENXIO; /* Sorry */
260 sb_release_resources(struct sb_info *sb, device_t dev)
264 bus_teardown_intr(dev, sb->irq, sb->ih);
265 bus_release_resource(dev, SYS_RES_IRQ, 0, sb->irq);
269 isa_dma_release(rman_get_start(sb->drq));
270 bus_release_resource(dev, SYS_RES_DRQ, 0, sb->drq);
274 bus_release_resource(dev, SYS_RES_IOPORT, 0, sb->io_base);
277 if (sb->parent_dmat) {
278 bus_dma_tag_destroy(sb->parent_dmat);
285 sb_alloc_resources(struct sb_info *sb, device_t dev)
291 sb->io_base = bus_alloc_resource_any(dev, SYS_RES_IOPORT,
295 sb->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ,
299 sb->drq = bus_alloc_resource_any(dev, SYS_RES_DRQ,
302 if (sb->io_base && sb->drq && sb->irq) {
303 isa_dma_acquire(rman_get_start(sb->drq));
304 isa_dmainit(rman_get_start(sb->drq), sb->bufsize);
310 /************************************************************/
313 sbpromix_init(struct snd_mixer *m)
315 struct sb_info *sb = mix_getdevinfo(m);
317 mix_setdevs(m, SOUND_MASK_SYNTH | SOUND_MASK_PCM | SOUND_MASK_LINE |
318 SOUND_MASK_MIC | SOUND_MASK_CD | SOUND_MASK_VOLUME);
320 mix_setrecdevs(m, SOUND_MASK_LINE | SOUND_MASK_MIC | SOUND_MASK_CD);
322 sb_setmixer(sb, 0, 1); /* reset mixer */
328 sbpromix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right)
330 struct sb_info *sb = mix_getdevinfo(m);
336 case SOUND_MIXER_PCM:
340 case SOUND_MIXER_MIC:
345 case SOUND_MIXER_VOLUME:
349 case SOUND_MIXER_SYNTH:
357 case SOUND_MIXER_LINE:
365 left = (left * max) / 100;
366 right = (dev == SOUND_MIXER_MIC)? left : ((right * max) / 100);
368 val = (dev == SOUND_MIXER_MIC)? (left << 1) : (left << 5 | right << 1);
369 sb_setmixer(sb, reg, val);
371 left = (left * 100) / max;
372 right = (right * 100) / max;
374 return left | (right << 8);
378 sbpromix_setrecsrc(struct snd_mixer *m, u_int32_t src)
380 struct sb_info *sb = mix_getdevinfo(m);
383 if (src == SOUND_MASK_LINE)
385 else if (src == SOUND_MASK_CD)
387 else { /* default: mic */
388 src = SOUND_MASK_MIC;
391 sb_setmixer(sb, RECORD_SRC, recdev | (sb_getmixer(sb, RECORD_SRC) & ~0x07));
396 static kobj_method_t sbpromix_mixer_methods[] = {
397 KOBJMETHOD(mixer_init, sbpromix_init),
398 KOBJMETHOD(mixer_set, sbpromix_set),
399 KOBJMETHOD(mixer_setrecsrc, sbpromix_setrecsrc),
402 MIXER_DECLARE(sbpromix_mixer);
404 /************************************************************/
407 sbmix_init(struct snd_mixer *m)
409 struct sb_info *sb = mix_getdevinfo(m);
411 mix_setdevs(m, SOUND_MASK_SYNTH | SOUND_MASK_PCM | SOUND_MASK_CD | SOUND_MASK_VOLUME);
413 mix_setrecdevs(m, 0);
415 sb_setmixer(sb, 0, 1); /* reset mixer */
421 sbmix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right)
423 struct sb_info *sb = mix_getdevinfo(m);
428 case SOUND_MIXER_VOLUME:
432 case SOUND_MIXER_SYNTH:
440 case SOUND_MIXER_PCM:
449 left = (left * max) / 100;
451 sb_setmixer(sb, reg, left << 1);
453 left = (left * 100) / max;
455 return left | (left << 8);
459 sbmix_setrecsrc(struct snd_mixer *m, u_int32_t src)
464 static kobj_method_t sbmix_mixer_methods[] = {
465 KOBJMETHOD(mixer_init, sbmix_init),
466 KOBJMETHOD(mixer_set, sbmix_set),
467 KOBJMETHOD(mixer_setrecsrc, sbmix_setrecsrc),
470 MIXER_DECLARE(sbmix_mixer);
472 /************************************************************/
477 struct sb_info *sb = (struct sb_info *)arg;
480 if (sndbuf_runsz(sb->pch.buffer) > 0) {
482 chn_intr(sb->pch.channel);
486 if (sndbuf_runsz(sb->rch.buffer) > 0) {
488 chn_intr(sb->rch.channel);
492 sb_rd(sb, DSP_DATA_AVAIL); /* int ack */
497 sb_speed(struct sb_chinfo *ch)
499 struct sb_info *sb = ch->parent;
500 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
501 int stereo = (ch->fmt & AFMT_STEREO)? 1 : 0;
502 int speed, tmp, thresh, max;
505 if (sb->bd_id >= 0x300) {
506 thresh = stereo? 11025 : 23000;
507 max = stereo? 22050 : 44100;
508 } else if (sb->bd_id > 0x200) {
509 thresh = play? 23000 : 13000;
510 max = play? 44100 : 15000;
513 max = play? 23000 : 13000;
521 sb->bd_flags &= ~BD_F_HISPEED;
523 sb->bd_flags |= BD_F_HISPEED;
525 tmp = 65536 - (256000000 / (speed << stereo));
528 sb_cmd1(sb, 0x40, tconst); /* set time constant */
530 speed = (256000000 / (65536 - tmp)) >> stereo;
538 sb_start(struct sb_chinfo *ch)
540 struct sb_info *sb = ch->parent;
541 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
542 int stereo = (ch->fmt & AFMT_STEREO)? 1 : 0;
550 sb_cmd(sb, DSP_CMD_SPKON);
552 if (sb->bd_flags & BD_F_HISPEED)
553 i = play? 0x90 : 0x98;
555 i = play? 0x1c : 0x2c;
557 sb_setmixer(sb, 0x0e, stereo? 2 : 0);
558 sb_cmd2(sb, 0x48, l);
561 sb->bd_flags |= BD_F_DMARUN;
567 sb_stop(struct sb_chinfo *ch)
569 struct sb_info *sb = ch->parent;
570 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
573 if (sb->bd_flags & BD_F_HISPEED)
578 * NOTE: DSP_CMD_DMAEXIT_8 does not work with old
581 sb_cmd(sb, DSP_CMD_DMAEXIT_8);
587 sb_cmd(sb, DSP_CMD_SPKOFF); /* speaker off */
589 sb->bd_flags &= ~BD_F_DMARUN;
593 /* channel interface */
595 sbchan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir)
597 struct sb_info *sb = devinfo;
598 struct sb_chinfo *ch = (dir == PCMDIR_PLAY)? &sb->pch : &sb->rch;
604 if (sndbuf_alloc(ch->buffer, sb->parent_dmat, sb->bufsize) != 0)
606 sndbuf_dmasetup(ch->buffer, sb->drq);
611 sbchan_setformat(kobj_t obj, void *data, u_int32_t format)
613 struct sb_chinfo *ch = data;
620 sbchan_setspeed(kobj_t obj, void *data, u_int32_t speed)
622 struct sb_chinfo *ch = data;
629 sbchan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize)
631 struct sb_chinfo *ch = data;
633 ch->blksz = blocksize;
638 sbchan_trigger(kobj_t obj, void *data, int go)
640 struct sb_chinfo *ch = data;
642 if (go == PCMTRIG_EMLDMAWR || go == PCMTRIG_EMLDMARD)
645 sndbuf_dma(ch->buffer, go);
646 if (go == PCMTRIG_START)
654 sbchan_getptr(kobj_t obj, void *data)
656 struct sb_chinfo *ch = data;
658 return sndbuf_dmaptr(ch->buffer);
661 static struct pcmchan_caps *
662 sbchan_getcaps(kobj_t obj, void *data)
664 struct sb_chinfo *ch = data;
665 int p = (ch->dir == PCMDIR_PLAY)? 1 : 0;
667 if (ch->parent->bd_id == 0x200)
668 return p? &sb200_playcaps : &sb200_reccaps;
669 if (ch->parent->bd_id < 0x300)
670 return p? &sb201_playcaps : &sb201_reccaps;
671 return p? &sbpro_playcaps : &sbpro_reccaps;
674 static kobj_method_t sbchan_methods[] = {
675 KOBJMETHOD(channel_init, sbchan_init),
676 KOBJMETHOD(channel_setformat, sbchan_setformat),
677 KOBJMETHOD(channel_setspeed, sbchan_setspeed),
678 KOBJMETHOD(channel_setblocksize, sbchan_setblocksize),
679 KOBJMETHOD(channel_trigger, sbchan_trigger),
680 KOBJMETHOD(channel_getptr, sbchan_getptr),
681 KOBJMETHOD(channel_getcaps, sbchan_getcaps),
684 CHANNEL_DECLARE(sbchan);
686 /************************************************************/
689 sb_probe(device_t dev)
692 uintptr_t func, ver, r, f;
694 /* The parent device has already been probed. */
695 r = BUS_READ_IVAR(device_get_parent(dev), dev, 0, &func);
699 r = BUS_READ_IVAR(device_get_parent(dev), dev, 1, &ver);
700 f = (ver & 0xffff0000) >> 16;
702 if ((f & BD_F_ESS) || (ver >= 0x400))
705 ksnprintf(buf, sizeof buf, "SB DSP %d.%02d", (int) ver >> 8, (int) ver & 0xff);
707 device_set_desc_copy(dev, buf);
713 sb_attach(device_t dev)
716 char status[SND_STATUSLEN];
719 sb = kmalloc(sizeof *sb, M_DEVBUF, M_WAITOK | M_ZERO);
720 sb->parent_dev = device_get_parent(dev);
721 BUS_READ_IVAR(device_get_parent(dev), dev, 1, &ver);
722 sb->bd_id = ver & 0x0000ffff;
723 sb->bd_flags = (ver & 0xffff0000) >> 16;
724 sb->bufsize = pcm_getbuffersize(dev, 4096, SB_DEFAULT_BUFSZ, 65536);
726 if (sb_alloc_resources(sb, dev))
728 if (sb_reset_dsp(sb))
730 if (mixer_init(dev, (sb->bd_id < 0x300)? &sbmix_mixer_class : &sbpromix_mixer_class, sb))
732 if (snd_setup_intr(dev, sb->irq, 0, sb_intr, sb, &sb->ih))
735 pcm_setflags(dev, pcm_getflags(dev) | SD_F_SIMPLEX);
737 if (bus_dma_tag_create(/*parent*/NULL, /*alignment*/2, /*boundary*/0,
738 /*lowaddr*/BUS_SPACE_MAXADDR_24BIT,
739 /*highaddr*/BUS_SPACE_MAXADDR,
740 /*filter*/NULL, /*filterarg*/NULL,
741 /*maxsize*/sb->bufsize, /*nsegments*/1,
742 /*maxsegz*/0x3ffff, /*flags*/0,
743 &sb->parent_dmat) != 0) {
744 device_printf(dev, "unable to create dma tag\n");
748 ksnprintf(status, SND_STATUSLEN, "at io 0x%lx irq %ld drq %ld bufsz %u %s",
749 rman_get_start(sb->io_base), rman_get_start(sb->irq),
750 rman_get_start(sb->drq), sb->bufsize, PCM_KLDSTRING(snd_sb8));
752 if (pcm_register(dev, sb, 1, 1))
754 pcm_addchan(dev, PCMDIR_REC, &sbchan_class, sb);
755 pcm_addchan(dev, PCMDIR_PLAY, &sbchan_class, sb);
757 pcm_setstatus(dev, status);
762 sb_release_resources(sb, dev);
767 sb_detach(device_t dev)
772 r = pcm_unregister(dev);
776 sb = pcm_getdevinfo(dev);
777 sb_release_resources(sb, dev);
781 static device_method_t sb_methods[] = {
782 /* Device interface */
783 DEVMETHOD(device_probe, sb_probe),
784 DEVMETHOD(device_attach, sb_attach),
785 DEVMETHOD(device_detach, sb_detach),
790 static driver_t sb_driver = {
796 DRIVER_MODULE(snd_sb8, sbc, sb_driver, pcm_devclass, NULL, NULL);
797 MODULE_DEPEND(snd_sb8, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER);
798 MODULE_DEPEND(snd_sb8, snd_sbc, 1, 1, 1);
799 MODULE_VERSION(snd_sb8, 1);