diff options
author | cg <cg@FreeBSD.org> | 1999-09-28 20:00:06 +0000 |
---|---|---|
committer | cg <cg@FreeBSD.org> | 1999-09-28 20:00:06 +0000 |
commit | 378e4ff407df270d76c97341a64686471dff87bd (patch) | |
tree | f24cfaf1a3be9c9eca802001de9947ef5589057b /sys/dev/sound/isa/ad1816.c | |
parent | 199022b99427101c61dc5973e775ca58b25fec82 (diff) | |
download | FreeBSD-src-378e4ff407df270d76c97341a64686471dff87bd.zip FreeBSD-src-378e4ff407df270d76c97341a64686471dff87bd.tar.gz |
seperate the ad1816 driver from the mss driver since it shares no code
Diffstat (limited to 'sys/dev/sound/isa/ad1816.c')
-rw-r--r-- | sys/dev/sound/isa/ad1816.c | 622 |
1 files changed, 622 insertions, 0 deletions
diff --git a/sys/dev/sound/isa/ad1816.c b/sys/dev/sound/isa/ad1816.c new file mode 100644 index 0000000..a069f6d --- /dev/null +++ b/sys/dev/sound/isa/ad1816.c @@ -0,0 +1,622 @@ +/* + * Copyright (c) 1999 Cameron Grant <gandalf@vilnya.demon.co.uk> + * Copyright Luigi Rizzo, 1997,1998 + * Copyright by Hannu Savolainen 1994, 1995 + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * $FreeBSD$ + */ + +#include <dev/pcm/sound.h> + +#if NPCM > 0 && NPNP > 0 + +#include <dev/pcm/isa/ad1816.h> + +struct ad1816_info; + +struct ad1816_chinfo { + struct ad1816_info *parent; + pcm_channel *channel; + snd_dbuf *buffer; + int dir; +}; + +struct ad1816_info { + struct resource *io_base; /* primary I/O address for the board */ + int io_rid; + struct resource *irq; + int irq_rid; + struct resource *drq1; /* play */ + int drq1_rid; + struct resource *drq2; /* rec */ + int drq2_rid; + bus_dma_tag_t parent_dmat; + + struct ad1816_chinfo pch, rch; +}; + +static driver_intr_t ad1816_intr; +static int ad1816_probe(device_t dev); +static int ad1816_attach(device_t dev); + +/* IO primitives */ +static int ad1816_wait_init(struct ad1816_info *ad1816, int x); +static u_short ad1816_read(struct ad1816_info *ad1816, u_int reg); +static void ad1816_write(struct ad1816_info *ad1816, u_int reg, u_short data); + +static int ad1816mix_init(snd_mixer *m); +static int ad1816mix_set(snd_mixer *m, unsigned dev, unsigned left, unsigned right); +static int ad1816mix_setrecsrc(snd_mixer *m, u_int32_t src); +static snd_mixer ad1816_mixer = { + "ad1816 mixer", + ad1816mix_init, + ad1816mix_set, + ad1816mix_setrecsrc, +}; + +static devclass_t pcm_devclass; + +/* channel interface */ +static void *ad1816chan_init(void *devinfo, snd_dbuf *b, pcm_channel *c, int dir); +static int ad1816chan_setdir(void *data, int dir); +static int ad1816chan_setformat(void *data, u_int32_t format); +static int ad1816chan_setspeed(void *data, u_int32_t speed); +static int ad1816chan_setblocksize(void *data, u_int32_t blocksize); +static int ad1816chan_trigger(void *data, int go); +static int ad1816chan_getptr(void *data); +static pcmchan_caps *ad1816chan_getcaps(void *data); + +static pcmchan_caps ad1816_caps = { + 4000, 55200, + AFMT_STEREO | AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW, + AFMT_STEREO | AFMT_S16_LE +}; + +static pcm_channel ad1816_chantemplate = { + ad1816chan_init, + ad1816chan_setdir, + ad1816chan_setformat, + ad1816chan_setspeed, + ad1816chan_setblocksize, + ad1816chan_trigger, + ad1816chan_getptr, + ad1816chan_getcaps, +}; + +#define FULL_DUPLEX(x) (pcm_getflags(x) & SD_F_SIMPLEX) +#define AD1816_MUTE 31 /* value for mute */ + +static int +port_rd(struct resource *port, int off) +{ + if (port) + return bus_space_read_1(rman_get_bustag(port), + rman_get_bushandle(port), + off); + else + return -1; +} + +static void +port_wr(struct resource *port, int off, u_int8_t data) +{ + if (port) + return bus_space_write_1(rman_get_bustag(port), + rman_get_bushandle(port), + off, data); +} + +static int +io_rd(struct ad1816_info *ad1816, int reg) +{ + return port_rd(ad1816->io_base, reg); +} + +static void +io_wr(struct ad1816_info *ad1816, int reg, u_int8_t data) +{ + return port_wr(ad1816->io_base, reg, data); +} + +static void +ad1816_intr(void *arg) +{ + struct ad1816_info *ad1816 = (struct ad1816_info *)arg; + unsigned char c, served = 0; + + /* get interupt status */ + c = io_rd(ad1816, AD1816_INT); + + /* check for stray interupts */ + if (c & ~(AD1816_INTRCI | AD1816_INTRPI)) { + printf("pcm: stray int (%x)\n", c); + c &= AD1816_INTRCI | AD1816_INTRPI; + } + /* check for capture interupt */ + if (ad1816->rch.buffer->dl && (c & AD1816_INTRCI)) { + chn_intr(ad1816->rch.channel); + served |= AD1816_INTRCI; /* cp served */ + } + /* check for playback interupt */ + if (ad1816->pch.buffer->dl && (c & AD1816_INTRPI)) { + chn_intr(ad1816->pch.channel); + served |= AD1816_INTRPI; /* pb served */ + } + if (served == 0) { + /* this probably means this is not a (working) ad1816 chip, */ + /* or an error in dma handling */ + printf("pcm: int without reason (%x)\n", c); + c = 0; + } else c &= ~served; + io_wr(ad1816, AD1816_INT, c); + c = io_rd(ad1816, AD1816_INT); + if (c != 0) printf("pcm: int clear failed (%x)\n", c); +} + +static int +ad1816_wait_init(struct ad1816_info *ad1816, int x) +{ + int n = 0; /* to shut up the compiler... */ + + for (; x--;) + if ((n = (io_rd(ad1816, AD1816_ALE) & AD1816_BUSY)) == 0) DELAY(10); + else return n; + printf("ad1816_wait_init failed 0x%02x.\n", n); + return -1; +} + +static unsigned short +ad1816_read(struct ad1816_info *ad1816, unsigned int reg) +{ + int flags; + u_short x = 0; + + /* we don't want to be blocked here */ + flags = spltty(); + if (ad1816_wait_init(ad1816, 100) == -1) return 0; + io_wr(ad1816, AD1816_ALE, 0); + io_wr(ad1816, AD1816_ALE, (reg & AD1816_ALEMASK)); + if (ad1816_wait_init(ad1816, 100) == -1) return 0; + x = (io_rd(ad1816, AD1816_HIGH) << 8) | io_rd(ad1816, AD1816_LOW); + splx(flags); + return x; +} + +static void +ad1816_write(struct ad1816_info *ad1816, unsigned int reg, unsigned short data) +{ + int flags; + + flags = spltty(); + if (ad1816_wait_init(ad1816, 100) == -1) return; + io_wr(ad1816, AD1816_ALE, (reg & AD1816_ALEMASK)); + io_wr(ad1816, AD1816_LOW, (data & 0x000000ff)); + io_wr(ad1816, AD1816_HIGH, (data & 0x0000ff00) >> 8); + splx(flags); +} + +static int +ad1816mix_init(snd_mixer *m) +{ + mix_setdevs(m, AD1816_MIXER_DEVICES); + mix_setrecdevs(m, AD1816_REC_DEVICES); + return 0; +} + +static int +ad1816mix_set(snd_mixer *m, unsigned dev, unsigned left, unsigned right) +{ + struct ad1816_info *ad1816 = mix_getdevinfo(m); + u_short reg = 0; + + /* Scale volumes */ + left = AD1816_MUTE - (AD1816_MUTE * left) / 100; + right = AD1816_MUTE - (AD1816_MUTE * right) / 100; + + reg = (left << 8) | right; + + /* do channel selective muting if volume is zero */ + if (left == AD1816_MUTE) reg |= 0x8000; + if (right == AD1816_MUTE) reg |= 0x0080; + + switch (dev) { + case SOUND_MIXER_VOLUME: /* Register 14 master volume */ + ad1816_write(ad1816, 14, reg); + break; + + case SOUND_MIXER_CD: /* Register 15 cd */ + case SOUND_MIXER_LINE1: + ad1816_write(ad1816, 15, reg); + break; + + case SOUND_MIXER_SYNTH: /* Register 16 synth */ + ad1816_write(ad1816, 16, reg); + break; + + case SOUND_MIXER_PCM: /* Register 4 pcm */ + ad1816_write(ad1816, 4, reg); + break; + + case SOUND_MIXER_LINE: + case SOUND_MIXER_LINE3: /* Register 18 line in */ + ad1816_write(ad1816, 18, reg); + break; + + case SOUND_MIXER_MIC: /* Register 19 mic volume */ + ad1816_write(ad1816, 19, reg & ~0xff); /* mic is mono */ + break; + + case SOUND_MIXER_IGAIN: + /* and now to something completely different ... */ + ad1816_write(ad1816, 20, ((ad1816_read(ad1816, 20) & ~0x0f0f) + | (((AD1816_MUTE - left) / 2) << 8) /* four bits of adc gain */ + | ((AD1816_MUTE - right) / 2))); + break; + + default: + printf("ad1816_mixer_set(): unknown device.\n"); + break; + } + + return left | (right << 8); +} + +static int +ad1816mix_setrecsrc(snd_mixer *m, u_int32_t src) +{ + struct ad1816_info *ad1816 = mix_getdevinfo(m); + int dev; + + switch (src) { + case SOUND_MASK_LINE: + case SOUND_MASK_LINE3: + dev = 0x00; + break; + + case SOUND_MASK_CD: + case SOUND_MASK_LINE1: + dev = 0x20; + break; + + case SOUND_MASK_MIC: + default: + dev = 0x50; + src = SOUND_MASK_MIC; + } + + dev |= dev << 8; + ad1816_write(ad1816, 20, (ad1816_read(ad1816, 20) & ~0x7070) | dev); + return src; +} + +/* channel interface */ +static void * +ad1816chan_init(void *devinfo, snd_dbuf *b, pcm_channel *c, int dir) +{ + struct ad1816_info *ad1816 = devinfo; + struct ad1816_chinfo *ch = (dir == PCMDIR_PLAY)? &ad1816->pch : &ad1816->rch; + + ch->parent = ad1816; + ch->channel = c; + ch->buffer = b; + ch->buffer->bufsize = DSP_BUFFSIZE; + if (chn_allocbuf(ch->buffer, ad1816->parent_dmat) == -1) return NULL; + return ch; +} + +static int +ad1816chan_setdir(void *data, int dir) +{ + struct ad1816_chinfo *ch = data; + struct ad1816_info *ad1816 = ch->parent; + + ch->buffer->chan = rman_get_start((dir == PCMDIR_PLAY)? + ad1816->drq1 : ad1816->drq2); + ch->dir = dir; + return 0; +} + +static int +ad1816chan_setformat(void *data, u_int32_t format) +{ + struct ad1816_chinfo *ch = data; + struct ad1816_info *ad1816 = ch->parent; + + int fmt = AD1816_U8, reg; + if (ch->dir == PCMDIR_PLAY) { + reg = AD1816_PLAY; + ad1816_write(ad1816, 8, 0x0000); /* reset base and current counter */ + ad1816_write(ad1816, 9, 0x0000); /* for playback and capture */ + } else { + reg = AD1816_CAPT; + ad1816_write(ad1816, 10, 0x0000); + ad1816_write(ad1816, 11, 0x0000); + } + switch (format & ~AFMT_STEREO) { + case AFMT_A_LAW: + fmt = AD1816_ALAW; + break; + + case AFMT_MU_LAW: + fmt = AD1816_MULAW; + break; + + case AFMT_S16_LE: + fmt = AD1816_S16LE; + break; + + case AFMT_S16_BE: + fmt = AD1816_S16BE; + break; + + case AFMT_U8: + fmt = AD1816_U8; + break; + } + if (format & AFMT_STEREO) fmt |= AD1816_STEREO; + io_wr(ad1816, reg, fmt); + return format; +} + +static int +ad1816chan_setspeed(void *data, u_int32_t speed) +{ + struct ad1816_chinfo *ch = data; + struct ad1816_info *ad1816 = ch->parent; + + RANGE(speed, 4000, 55200); + ad1816_write(ad1816, (ch->dir == PCMDIR_PLAY)? 2 : 3, speed); + return speed; +} + +static int +ad1816chan_setblocksize(void *data, u_int32_t blocksize) +{ + return blocksize; +} + +static int +ad1816chan_trigger(void *data, int go) +{ + struct ad1816_chinfo *ch = data; + struct ad1816_info *ad1816 = ch->parent; + int wr, reg; + + buf_isadma(ch->buffer, go); + wr = (ch->dir == PCMDIR_PLAY); + reg = wr? AD1816_PLAY : AD1816_CAPT; + switch (go) { + case PCMTRIG_START: + /* start only if not already running */ + if (!(io_rd(ad1816, reg) & AD1816_ENABLE)) { + int cnt = ((ch->buffer->dl) >> 2) - 1; + ad1816_write(ad1816, wr? 8 : 10, cnt); /* count */ + ad1816_write(ad1816, 1, ad1816_read(ad1816, 1) | + (wr? 0x8000 : 0x4000)); /* enable int */ + /* enable playback */ + io_wr(ad1816, reg, io_rd(ad1816, reg) | AD1816_ENABLE); + if (!(io_rd(ad1816, reg) & AD1816_ENABLE)) + printf("ad1816: failed to start %s DMA!\n", + wr? "play" : "rec"); + } + break; + + case PCMTRIG_STOP: + case PCMTRIG_ABORT: /* XXX check this... */ + /* we don't test here if it is running... */ + if (wr) { + ad1816_write(ad1816, 1, ad1816_read(ad1816, 1) & + ~(wr? 0x8000 : 0x4000)); + /* disable int */ + io_wr(ad1816, reg, io_rd(ad1816, reg) & ~AD1816_ENABLE); + /* disable playback */ + if (io_rd(ad1816, reg) & AD1816_ENABLE) + printf("ad1816: failed to stop %s DMA!\n", + wr? "play" : "rec"); + ad1816_write(ad1816, wr? 8 : 10, 0); /* reset base cnt */ + ad1816_write(ad1816, wr? 9 : 11, 0); /* reset cur cnt */ + } + break; + } + return 0; +} + +static int +ad1816chan_getptr(void *data) +{ + struct ad1816_chinfo *ch = data; + return buf_isadmaptr(ch->buffer); +} + +static pcmchan_caps * +ad1816chan_getcaps(void *data) +{ + return &ad1816_caps; +} + +static void +ad1816_release_resources(struct ad1816_info *ad1816, device_t dev) +{ + if (ad1816->irq) { + bus_release_resource(dev, SYS_RES_IRQ, ad1816->irq_rid, + ad1816->irq); + ad1816->irq = 0; + } + if (ad1816->drq1) { + bus_release_resource(dev, SYS_RES_DRQ, ad1816->drq1_rid, + ad1816->drq1); + ad1816->drq1 = 0; + } + if (ad1816->drq2) { + bus_release_resource(dev, SYS_RES_DRQ, ad1816->drq2_rid, + ad1816->drq2); + ad1816->drq2 = 0; + } + if (ad1816->io_base) { + bus_release_resource(dev, SYS_RES_IOPORT, ad1816->io_rid, + ad1816->io_base); + ad1816->io_base = 0; + } + free(ad1816, M_DEVBUF); +} + +static int +ad1816_alloc_resources(struct ad1816_info *ad1816, device_t dev) +{ + int ok = 1, pdma, rdma; + if (!ad1816->io_base) + ad1816->io_base = bus_alloc_resource(dev, SYS_RES_IOPORT, &ad1816->io_rid, + 0, ~0, 1, RF_ACTIVE); + if (!ad1816->irq) + ad1816->irq = bus_alloc_resource(dev, SYS_RES_IRQ, &ad1816->irq_rid, + 0, ~0, 1, RF_ACTIVE); + if (!ad1816->drq1) + ad1816->drq1 = bus_alloc_resource(dev, SYS_RES_DRQ, &ad1816->drq1_rid, + 0, ~0, 1, RF_ACTIVE); + if (ad1816->drq2_rid >= 0 && !ad1816->drq2) + ad1816->drq2 = bus_alloc_resource(dev, SYS_RES_DRQ, &ad1816->drq2_rid, + 0, ~0, 1, RF_ACTIVE); + + if (!ad1816->io_base || !ad1816->drq1 || !ad1816->irq) ok = 0; + if (ad1816->drq2_rid >= 0 && !ad1816->drq2) ok = 0; + + if (ok) { + pdma = rman_get_start(ad1816->drq1); + isa_dma_acquire(pdma); + isa_dmainit(pdma, DSP_BUFFSIZE); + if (ad1816->drq2) { + rdma = rman_get_start(ad1816->drq2); + isa_dma_acquire(rdma); + isa_dmainit(rdma, DSP_BUFFSIZE); + } else rdma = pdma; + if (pdma == rdma) + pcm_setflags(dev, pcm_getflags(dev) | SD_F_SIMPLEX); + } + return ok; +} + +static int +ad1816_init(struct ad1816_info *ad1816, device_t dev) +{ + ad1816_write(ad1816, 1, 0x2); /* disable interrupts */ + ad1816_write(ad1816, 32, 0x90F0); /* SoundSys Mode, split fmt */ + + ad1816_write(ad1816, 5, 0x8080); /* FM volume mute */ + ad1816_write(ad1816, 6, 0x8080); /* I2S1 volume mute */ + ad1816_write(ad1816, 7, 0x8080); /* I2S0 volume mute */ + ad1816_write(ad1816, 17, 0x8888); /* VID Volume mute */ + ad1816_write(ad1816, 20, 0x5050); /* recsrc mic, agc off */ + /* adc gain is set to 0 */ + + return 0; +} + +static int +ad1816_probe(device_t dev) +{ + char *s = NULL; + u_int32_t logical_id = isa_get_logicalid(dev); + + switch (logical_id) { + case 0x80719304: /* ADS7180 */ + s = "Terratec Soundsystem BASE 1"; + break; + } + + if (s) { + device_set_desc(dev, s); + return 0; + } + return ENXIO; +} + +static int +ad1816_attach(device_t dev) +{ + struct ad1816_info *ad1816; + snddev_info *d = device_get_softc(dev); + void *ih; + char status[SND_STATUSLEN]; + + ad1816 = (struct ad1816_info *)malloc(sizeof *ad1816, M_DEVBUF, M_NOWAIT); + if (!ad1816) return ENXIO; + bzero(ad1816, sizeof *ad1816); + + ad1816->io_rid = 2; + ad1816->irq_rid = 0; + ad1816->drq1_rid = 0; + ad1816->drq2_rid = 1; + + if (!ad1816_alloc_resources(ad1816, dev)) goto no; + ad1816_init(ad1816, dev); + mixer_init(d, &ad1816_mixer, ad1816); + bus_setup_intr(dev, ad1816->irq, INTR_TYPE_TTY, ad1816_intr, ad1816, &ih); + if (bus_dma_tag_create(/*parent*/NULL, /*alignment*/2, /*boundary*/0, + /*lowaddr*/BUS_SPACE_MAXADDR_24BIT, + /*highaddr*/BUS_SPACE_MAXADDR, + /*filter*/NULL, /*filterarg*/NULL, + /*maxsize*/DSP_BUFFSIZE, /*nsegments*/1, + /*maxsegz*/0x3ffff, + /*flags*/0, &ad1816->parent_dmat) != 0) { + device_printf(dev, "unable to create dma tag\n"); + goto no; + } + snprintf(status, SND_STATUSLEN, "at io 0x%lx irq %ld drq %ld", + rman_get_start(ad1816->io_base), + rman_get_start(ad1816->irq), + rman_get_start(ad1816->drq1)); + if (FULL_DUPLEX(dev)) snprintf(status + strlen(status), + SND_STATUSLEN - strlen(status), ":%ld", + rman_get_start(ad1816->drq1)); + + if (pcm_register(dev, ad1816, 1, 1)) goto no; + pcm_addchan(dev, PCMDIR_REC, &ad1816_chantemplate, ad1816); + pcm_addchan(dev, PCMDIR_PLAY, &ad1816_chantemplate, ad1816); + pcm_setstatus(dev, status); + + return 0; +no: + ad1816_release_resources(ad1816, dev); + return ENXIO; + +} + +static device_method_t ad1816_methods[] = { + /* Device interface */ + DEVMETHOD(device_probe, ad1816_probe), + DEVMETHOD(device_attach, ad1816_attach), + + { 0, 0 } +}; + +static driver_t ad1816_driver = { + "pcm", + ad1816_methods, + sizeof(snddev_info), +}; + +DRIVER_MODULE(mss, isa, ad1816_driver, pcm_devclass, 0, 0); + +#endif |