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
32 #include <dev/sound/pcm/sound.h>
34 #include <dev/sound/isa/sb.h>
35 #include <dev/sound/chip.h>
39 SND_DECLARE_FILE("$FreeBSD: src/sys/dev/sound/isa/sb8.c,v 1.62.2.5 2002/12/24 21:17:42 semenu Exp $");
41 #define SB_DEFAULT_BUFSZ 4096
43 static u_int32_t sb_fmt[] = {
47 static struct pcmchan_caps sb200_playcaps = {4000, 23000, sb_fmt, 0};
48 static struct pcmchan_caps sb200_reccaps = {4000, 13000, sb_fmt, 0};
49 static struct pcmchan_caps sb201_playcaps = {4000, 44100, sb_fmt, 0};
50 static struct pcmchan_caps sb201_reccaps = {4000, 15000, sb_fmt, 0};
52 static u_int32_t sbpro_fmt[] = {
54 AFMT_STEREO | AFMT_U8,
57 static struct pcmchan_caps sbpro_playcaps = {4000, 44100, sbpro_fmt, 0};
58 static struct pcmchan_caps sbpro_reccaps = {4000, 44100, sbpro_fmt, 0};
63 struct sb_info *parent;
64 struct pcm_channel *channel;
65 struct snd_dbuf *buffer;
67 u_int32_t fmt, spd, blksz;
72 struct resource *io_base; /* I/O address for the board */
76 bus_dma_tag_t parent_dmat;
80 u_long bd_flags; /* board-specific flags */
81 struct sb_chinfo pch, rch;
84 static int sb_rd(struct sb_info *sb, int reg);
85 static void sb_wr(struct sb_info *sb, int reg, u_int8_t val);
86 static int sb_dspready(struct sb_info *sb);
87 static int sb_cmd(struct sb_info *sb, u_char val);
88 static int sb_cmd1(struct sb_info *sb, u_char cmd, int val);
89 static int sb_cmd2(struct sb_info *sb, u_char cmd, int val);
90 static u_int sb_get_byte(struct sb_info *sb);
91 static void sb_setmixer(struct sb_info *sb, u_int port, u_int value);
92 static int sb_getmixer(struct sb_info *sb, u_int port);
93 static int sb_reset_dsp(struct sb_info *sb);
95 static void sb_intr(void *arg);
96 static int sb_speed(struct sb_chinfo *ch);
97 static int sb_start(struct sb_chinfo *ch);
98 static int sb_stop(struct sb_chinfo *ch);
101 * Common code for the midi and pcm functions
103 * sb_cmd write a single byte to the CMD port.
104 * sb_cmd1 write a CMD + 1 byte arg
105 * sb_cmd2 write a CMD + 2 byte arg
106 * sb_get_byte returns a single byte from the DSP data port
110 sb_lock(struct sb_info *sb) {
112 sbc_lock(device_get_softc(sb->parent_dev));
116 sb_unlock(struct sb_info *sb) {
118 sbc_unlock(device_get_softc(sb->parent_dev));
122 port_rd(struct resource *port, int off)
124 return bus_space_read_1(rman_get_bustag(port), rman_get_bushandle(port), off);
128 port_wr(struct resource *port, int off, u_int8_t data)
130 bus_space_write_1(rman_get_bustag(port), rman_get_bushandle(port), off, data);
134 sb_rd(struct sb_info *sb, int reg)
136 return port_rd(sb->io_base, reg);
140 sb_wr(struct sb_info *sb, int reg, u_int8_t val)
142 port_wr(sb->io_base, reg, val);
146 sb_dspready(struct sb_info *sb)
148 return ((sb_rd(sb, SBDSP_STATUS) & 0x80) == 0);
152 sb_dspwr(struct sb_info *sb, u_char val)
156 for (i = 0; i < 1000; i++) {
157 if (sb_dspready(sb)) {
158 sb_wr(sb, SBDSP_CMD, val);
161 if (i > 10) DELAY((i > 100)? 1000 : 10);
163 printf("sb_dspwr(0x%02x) timed out.\n", val);
168 sb_cmd(struct sb_info *sb, u_char val)
171 printf("sb_cmd: %x\n", val);
173 return sb_dspwr(sb, val);
177 sb_cmd1(struct sb_info *sb, u_char cmd, int val)
180 printf("sb_cmd1: %x, %x\n", cmd, val);
182 if (sb_dspwr(sb, cmd)) {
183 return sb_dspwr(sb, val & 0xff);
188 sb_cmd2(struct sb_info *sb, u_char cmd, int val)
191 printf("sb_cmd2: %x, %x\n", cmd, val);
193 if (sb_dspwr(sb, cmd)) {
194 return sb_dspwr(sb, val & 0xff) &&
195 sb_dspwr(sb, (val >> 8) & 0xff);
200 * in the SB, there is a set of indirect "mixer" registers with
201 * address at offset 4, data at offset 5
203 * we don't need to interlock these, the mixer lock will suffice.
206 sb_setmixer(struct sb_info *sb, u_int port, u_int value)
208 sb_wr(sb, SB_MIX_ADDR, (u_char) (port & 0xff)); /* Select register */
210 sb_wr(sb, SB_MIX_DATA, (u_char) (value & 0xff));
215 sb_getmixer(struct sb_info *sb, u_int port)
219 sb_wr(sb, SB_MIX_ADDR, (u_char) (port & 0xff)); /* Select register */
221 val = sb_rd(sb, SB_MIX_DATA);
228 sb_get_byte(struct sb_info *sb)
232 for (i = 1000; i > 0; i--) {
233 if (sb_rd(sb, DSP_DATA_AVAIL) & 0x80)
234 return sb_rd(sb, DSP_READ);
242 sb_reset_dsp(struct sb_info *sb)
244 sb_wr(sb, SBDSP_RST, 3);
246 sb_wr(sb, SBDSP_RST, 0);
247 if (sb_get_byte(sb) != 0xAA) {
248 DEB(printf("sb_reset_dsp 0x%lx failed\n",
249 rman_get_start(sb->io_base)));
250 return ENXIO; /* Sorry */
256 sb_release_resources(struct sb_info *sb, device_t dev)
260 bus_teardown_intr(dev, sb->irq, sb->ih);
261 bus_release_resource(dev, SYS_RES_IRQ, 0, sb->irq);
265 isa_dma_release(rman_get_start(sb->drq));
266 bus_release_resource(dev, SYS_RES_DRQ, 0, sb->drq);
270 bus_release_resource(dev, SYS_RES_IOPORT, 0, sb->io_base);
273 if (sb->parent_dmat) {
274 bus_dma_tag_destroy(sb->parent_dmat);
281 sb_alloc_resources(struct sb_info *sb, device_t dev)
287 sb->io_base = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid, 0, ~0, 1, RF_ACTIVE);
290 sb->irq = bus_alloc_resource(dev, SYS_RES_IRQ, &rid, 0, ~0, 1, RF_ACTIVE);
293 sb->drq = bus_alloc_resource(dev, SYS_RES_DRQ, &rid, 0, ~0, 1, RF_ACTIVE);
295 if (sb->io_base && sb->drq && sb->irq) {
296 isa_dma_acquire(rman_get_start(sb->drq));
297 isa_dmainit(rman_get_start(sb->drq), sb->bufsize);
303 /************************************************************/
306 sbpromix_init(struct snd_mixer *m)
308 struct sb_info *sb = mix_getdevinfo(m);
310 mix_setdevs(m, SOUND_MASK_SYNTH | SOUND_MASK_PCM | SOUND_MASK_LINE |
311 SOUND_MASK_MIC | SOUND_MASK_CD | SOUND_MASK_VOLUME);
313 mix_setrecdevs(m, SOUND_MASK_LINE | SOUND_MASK_MIC | SOUND_MASK_CD);
315 sb_setmixer(sb, 0, 1); /* reset mixer */
321 sbpromix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right)
323 struct sb_info *sb = mix_getdevinfo(m);
329 case SOUND_MIXER_PCM:
333 case SOUND_MIXER_MIC:
338 case SOUND_MIXER_VOLUME:
342 case SOUND_MIXER_SYNTH:
350 case SOUND_MIXER_LINE:
358 left = (left * max) / 100;
359 right = (dev == SOUND_MIXER_MIC)? left : ((right * max) / 100);
361 val = (dev == SOUND_MIXER_MIC)? (left << 1) : (left << 5 | right << 1);
362 sb_setmixer(sb, reg, val);
364 left = (left * 100) / max;
365 right = (right * 100) / max;
367 return left | (right << 8);
371 sbpromix_setrecsrc(struct snd_mixer *m, u_int32_t src)
373 struct sb_info *sb = mix_getdevinfo(m);
376 if (src == SOUND_MASK_LINE)
378 else if (src == SOUND_MASK_CD)
380 else { /* default: mic */
381 src = SOUND_MASK_MIC;
384 sb_setmixer(sb, RECORD_SRC, recdev | (sb_getmixer(sb, RECORD_SRC) & ~0x07));
389 static kobj_method_t sbpromix_mixer_methods[] = {
390 KOBJMETHOD(mixer_init, sbpromix_init),
391 KOBJMETHOD(mixer_set, sbpromix_set),
392 KOBJMETHOD(mixer_setrecsrc, sbpromix_setrecsrc),
395 MIXER_DECLARE(sbpromix_mixer);
397 /************************************************************/
400 sbmix_init(struct snd_mixer *m)
402 struct sb_info *sb = mix_getdevinfo(m);
404 mix_setdevs(m, SOUND_MASK_SYNTH | SOUND_MASK_PCM | SOUND_MASK_CD | SOUND_MASK_VOLUME);
406 mix_setrecdevs(m, 0);
408 sb_setmixer(sb, 0, 1); /* reset mixer */
414 sbmix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right)
416 struct sb_info *sb = mix_getdevinfo(m);
421 case SOUND_MIXER_VOLUME:
425 case SOUND_MIXER_SYNTH:
433 case SOUND_MIXER_PCM:
442 left = (left * max) / 100;
444 sb_setmixer(sb, reg, left << 1);
446 left = (left * 100) / max;
448 return left | (left << 8);
452 sbmix_setrecsrc(struct snd_mixer *m, u_int32_t src)
457 static kobj_method_t sbmix_mixer_methods[] = {
458 KOBJMETHOD(mixer_init, sbmix_init),
459 KOBJMETHOD(mixer_set, sbmix_set),
460 KOBJMETHOD(mixer_setrecsrc, sbmix_setrecsrc),
463 MIXER_DECLARE(sbmix_mixer);
465 /************************************************************/
470 struct sb_info *sb = (struct sb_info *)arg;
473 if (sndbuf_runsz(sb->pch.buffer) > 0)
474 chn_intr(sb->pch.channel);
476 if (sndbuf_runsz(sb->rch.buffer) > 0)
477 chn_intr(sb->rch.channel);
479 sb_rd(sb, DSP_DATA_AVAIL); /* int ack */
484 sb_speed(struct sb_chinfo *ch)
486 struct sb_info *sb = ch->parent;
487 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
488 int stereo = (ch->fmt & AFMT_STEREO)? 1 : 0;
489 int speed, tmp, thresh, max;
492 if (sb->bd_id >= 0x300) {
493 thresh = stereo? 11025 : 23000;
494 max = stereo? 22050 : 44100;
495 } else if (sb->bd_id > 0x200) {
496 thresh = play? 23000 : 13000;
497 max = play? 44100 : 15000;
500 max = play? 23000 : 13000;
508 sb->bd_flags &= ~BD_F_HISPEED;
510 sb->bd_flags |= BD_F_HISPEED;
512 tmp = 65536 - (256000000 / (speed << stereo));
515 sb_cmd1(sb, 0x40, tconst); /* set time constant */
517 speed = (256000000 / (65536 - tmp)) >> stereo;
525 sb_start(struct sb_chinfo *ch)
527 struct sb_info *sb = ch->parent;
528 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
529 int stereo = (ch->fmt & AFMT_STEREO)? 1 : 0;
537 sb_cmd(sb, DSP_CMD_SPKON);
539 if (sb->bd_flags & BD_F_HISPEED)
540 i = play? 0x90 : 0x98;
542 i = play? 0x1c : 0x2c;
544 sb_setmixer(sb, 0x0e, stereo? 2 : 0);
545 sb_cmd2(sb, 0x48, l);
548 sb->bd_flags |= BD_F_DMARUN;
554 sb_stop(struct sb_chinfo *ch)
556 struct sb_info *sb = ch->parent;
557 int play = (ch->dir == PCMDIR_PLAY)? 1 : 0;
560 if (sb->bd_flags & BD_F_HISPEED)
563 sb_cmd(sb, DSP_CMD_DMAEXIT_8);
566 sb_cmd(sb, DSP_CMD_SPKOFF); /* speaker off */
568 sb->bd_flags &= ~BD_F_DMARUN;
572 /* channel interface */
574 sbchan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir)
576 struct sb_info *sb = devinfo;
577 struct sb_chinfo *ch = (dir == PCMDIR_PLAY)? &sb->pch : &sb->rch;
583 if (sndbuf_alloc(ch->buffer, sb->parent_dmat, sb->bufsize) == -1)
585 sndbuf_isadmasetup(ch->buffer, sb->drq);
590 sbchan_setformat(kobj_t obj, void *data, u_int32_t format)
592 struct sb_chinfo *ch = data;
599 sbchan_setspeed(kobj_t obj, void *data, u_int32_t speed)
601 struct sb_chinfo *ch = data;
608 sbchan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize)
610 struct sb_chinfo *ch = data;
612 ch->blksz = blocksize;
617 sbchan_trigger(kobj_t obj, void *data, int go)
619 struct sb_chinfo *ch = data;
621 if (go == PCMTRIG_EMLDMAWR || go == PCMTRIG_EMLDMARD)
624 sndbuf_isadma(ch->buffer, go);
625 if (go == PCMTRIG_START)
633 sbchan_getptr(kobj_t obj, void *data)
635 struct sb_chinfo *ch = data;
637 return sndbuf_isadmaptr(ch->buffer);
640 static struct pcmchan_caps *
641 sbchan_getcaps(kobj_t obj, void *data)
643 struct sb_chinfo *ch = data;
644 int p = (ch->dir == PCMDIR_PLAY)? 1 : 0;
646 if (ch->parent->bd_id == 0x200)
647 return p? &sb200_playcaps : &sb200_reccaps;
648 if (ch->parent->bd_id < 0x300)
649 return p? &sb201_playcaps : &sb201_reccaps;
650 return p? &sbpro_playcaps : &sbpro_reccaps;
653 static kobj_method_t sbchan_methods[] = {
654 KOBJMETHOD(channel_init, sbchan_init),
655 KOBJMETHOD(channel_setformat, sbchan_setformat),
656 KOBJMETHOD(channel_setspeed, sbchan_setspeed),
657 KOBJMETHOD(channel_setblocksize, sbchan_setblocksize),
658 KOBJMETHOD(channel_trigger, sbchan_trigger),
659 KOBJMETHOD(channel_getptr, sbchan_getptr),
660 KOBJMETHOD(channel_getcaps, sbchan_getcaps),
663 CHANNEL_DECLARE(sbchan);
665 /************************************************************/
668 sb_probe(device_t dev)
671 uintptr_t func, ver, r, f;
673 /* The parent device has already been probed. */
674 r = BUS_READ_IVAR(device_get_parent(dev), dev, 0, &func);
678 r = BUS_READ_IVAR(device_get_parent(dev), dev, 1, &ver);
679 f = (ver & 0xffff0000) >> 16;
681 if ((f & BD_F_ESS) || (ver >= 0x400))
684 snprintf(buf, sizeof buf, "SB DSP %d.%02d", (int) ver >> 8, (int) ver & 0xff);
686 device_set_desc_copy(dev, buf);
692 sb_attach(device_t dev)
695 char status[SND_STATUSLEN];
698 sb = (struct sb_info *)malloc(sizeof *sb, M_DEVBUF, M_NOWAIT | M_ZERO);
702 sb->parent_dev = device_get_parent(dev);
703 BUS_READ_IVAR(device_get_parent(dev), dev, 1, &ver);
704 sb->bd_id = ver & 0x0000ffff;
705 sb->bd_flags = (ver & 0xffff0000) >> 16;
706 sb->bufsize = pcm_getbuffersize(dev, 4096, SB_DEFAULT_BUFSZ, 65536);
708 if (sb_alloc_resources(sb, dev))
710 if (sb_reset_dsp(sb))
712 if (mixer_init(dev, (sb->bd_id < 0x300)? &sbmix_mixer_class : &sbpromix_mixer_class, sb))
714 if (snd_setup_intr(dev, sb->irq, INTR_MPSAFE, sb_intr, sb, &sb->ih))
717 pcm_setflags(dev, pcm_getflags(dev) | SD_F_SIMPLEX);
719 if (bus_dma_tag_create(/*parent*/NULL, /*alignment*/2, /*boundary*/0,
720 /*lowaddr*/BUS_SPACE_MAXADDR_24BIT,
721 /*highaddr*/BUS_SPACE_MAXADDR,
722 /*filter*/NULL, /*filterarg*/NULL,
723 /*maxsize*/sb->bufsize, /*nsegments*/1,
725 /*flags*/0, &sb->parent_dmat) != 0) {
726 device_printf(dev, "unable to create dma tag\n");
730 snprintf(status, SND_STATUSLEN, "at io 0x%lx irq %ld drq %ld bufsz %u",
731 rman_get_start(sb->io_base), rman_get_start(sb->irq), rman_get_start(sb->drq), sb->bufsize);
733 if (pcm_register(dev, sb, 1, 1))
735 pcm_addchan(dev, PCMDIR_REC, &sbchan_class, sb);
736 pcm_addchan(dev, PCMDIR_PLAY, &sbchan_class, sb);
738 pcm_setstatus(dev, status);
743 sb_release_resources(sb, dev);
748 sb_detach(device_t dev)
753 r = pcm_unregister(dev);
757 sb = pcm_getdevinfo(dev);
758 sb_release_resources(sb, dev);
762 static device_method_t sb_methods[] = {
763 /* Device interface */
764 DEVMETHOD(device_probe, sb_probe),
765 DEVMETHOD(device_attach, sb_attach),
766 DEVMETHOD(device_detach, sb_detach),
771 static driver_t sb_driver = {
777 DRIVER_MODULE(snd_sb8, sbc, sb_driver, pcm_devclass, 0, 0);
778 MODULE_DEPEND(snd_sb8, snd_pcm, PCM_MINVER, PCM_PREFVER, PCM_MAXVER);
779 MODULE_DEPEND(snd_sb8, snd_sbc, 1, 1, 1);
780 MODULE_VERSION(snd_sb8, 1);