2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
4 * Copyright (c) 1999 Cameron Grant <cg@freebsd.org>
5 * Copyright (c) 1997,1998 Luigi Rizzo
6 * Copyright (c) 1994,1995 Hannu Savolainen
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 #ifdef HAVE_KERNEL_OPTION_HEADERS
35 #include <dev/sound/pcm/sound.h>
36 #include <dev/sound/isa/ad1816.h>
38 #include <isa/isavar.h>
42 SND_DECLARE_FILE("$FreeBSD$");
46 struct ad1816_chinfo {
47 struct ad1816_info *parent;
48 struct pcm_channel *channel;
49 struct snd_dbuf *buffer;
54 struct resource *io_base; /* primary I/O address for the board */
58 struct resource *drq1; /* play */
60 struct resource *drq2; /* rec */
63 bus_dma_tag_t parent_dmat;
67 struct ad1816_chinfo pch, rch;
70 static u_int32_t ad1816_fmt[] = {
71 SND_FORMAT(AFMT_U8, 1, 0),
72 SND_FORMAT(AFMT_U8, 2, 0),
73 SND_FORMAT(AFMT_S16_LE, 1, 0),
74 SND_FORMAT(AFMT_S16_LE, 2, 0),
75 SND_FORMAT(AFMT_MU_LAW, 1, 0),
76 SND_FORMAT(AFMT_MU_LAW, 2, 0),
77 SND_FORMAT(AFMT_A_LAW, 1, 0),
78 SND_FORMAT(AFMT_A_LAW, 2, 0),
82 static struct pcmchan_caps ad1816_caps = {4000, 55200, ad1816_fmt, 0};
84 #define AD1816_MUTE 31 /* value for mute */
87 ad1816_lock(struct ad1816_info *ad1816)
89 snd_mtxlock(ad1816->lock);
93 ad1816_unlock(struct ad1816_info *ad1816)
95 snd_mtxunlock(ad1816->lock);
99 port_rd(struct resource *port, int off)
102 return bus_space_read_1(rman_get_bustag(port),
103 rman_get_bushandle(port),
110 port_wr(struct resource *port, int off, u_int8_t data)
113 bus_space_write_1(rman_get_bustag(port),
114 rman_get_bushandle(port),
119 io_rd(struct ad1816_info *ad1816, int reg)
121 return port_rd(ad1816->io_base, reg);
125 io_wr(struct ad1816_info *ad1816, int reg, u_int8_t data)
127 port_wr(ad1816->io_base, reg, data);
131 ad1816_intr(void *arg)
133 struct ad1816_info *ad1816 = (struct ad1816_info *)arg;
134 unsigned char c, served = 0;
137 /* get interrupt status */
138 c = io_rd(ad1816, AD1816_INT);
140 /* check for stray interrupts */
141 if (c & ~(AD1816_INTRCI | AD1816_INTRPI)) {
142 printf("pcm: stray int (%x)\n", c);
143 c &= AD1816_INTRCI | AD1816_INTRPI;
145 /* check for capture interrupt */
146 if (sndbuf_runsz(ad1816->rch.buffer) && (c & AD1816_INTRCI)) {
147 ad1816_unlock(ad1816);
148 chn_intr(ad1816->rch.channel);
150 served |= AD1816_INTRCI; /* cp served */
152 /* check for playback interrupt */
153 if (sndbuf_runsz(ad1816->pch.buffer) && (c & AD1816_INTRPI)) {
154 ad1816_unlock(ad1816);
155 chn_intr(ad1816->pch.channel);
157 served |= AD1816_INTRPI; /* pb served */
160 /* this probably means this is not a (working) ad1816 chip, */
161 /* or an error in dma handling */
162 printf("pcm: int without reason (%x)\n", c);
165 io_wr(ad1816, AD1816_INT, c);
166 c = io_rd(ad1816, AD1816_INT);
167 if (c != 0) printf("pcm: int clear failed (%x)\n", c);
168 ad1816_unlock(ad1816);
172 ad1816_wait_init(struct ad1816_info *ad1816, int x)
174 int n = 0; /* to shut up the compiler... */
177 if ((n = (io_rd(ad1816, AD1816_ALE) & AD1816_BUSY)) == 0) DELAY(10);
179 printf("ad1816_wait_init failed 0x%02x.\n", n);
183 static unsigned short
184 ad1816_read(struct ad1816_info *ad1816, unsigned int reg)
188 if (ad1816_wait_init(ad1816, 100) == -1) return 0;
189 io_wr(ad1816, AD1816_ALE, 0);
190 io_wr(ad1816, AD1816_ALE, (reg & AD1816_ALEMASK));
191 if (ad1816_wait_init(ad1816, 100) == -1) return 0;
192 x = (io_rd(ad1816, AD1816_HIGH) << 8) | io_rd(ad1816, AD1816_LOW);
197 ad1816_write(struct ad1816_info *ad1816, unsigned int reg, unsigned short data)
199 if (ad1816_wait_init(ad1816, 100) == -1) return;
200 io_wr(ad1816, AD1816_ALE, (reg & AD1816_ALEMASK));
201 io_wr(ad1816, AD1816_LOW, (data & 0x000000ff));
202 io_wr(ad1816, AD1816_HIGH, (data & 0x0000ff00) >> 8);
205 /* -------------------------------------------------------------------- */
208 ad1816mix_init(struct snd_mixer *m)
210 mix_setdevs(m, AD1816_MIXER_DEVICES);
211 mix_setrecdevs(m, AD1816_REC_DEVICES);
216 ad1816mix_set(struct snd_mixer *m, unsigned dev, unsigned left, unsigned right)
218 struct ad1816_info *ad1816 = mix_getdevinfo(m);
222 left = AD1816_MUTE - (AD1816_MUTE * left) / 100;
223 right = AD1816_MUTE - (AD1816_MUTE * right) / 100;
225 reg = (left << 8) | right;
227 /* do channel selective muting if volume is zero */
228 if (left == AD1816_MUTE) reg |= 0x8000;
229 if (right == AD1816_MUTE) reg |= 0x0080;
233 case SOUND_MIXER_VOLUME: /* Register 14 master volume */
234 ad1816_write(ad1816, 14, reg);
237 case SOUND_MIXER_CD: /* Register 15 cd */
238 case SOUND_MIXER_LINE1:
239 ad1816_write(ad1816, 15, reg);
242 case SOUND_MIXER_SYNTH: /* Register 16 synth */
243 ad1816_write(ad1816, 16, reg);
246 case SOUND_MIXER_PCM: /* Register 4 pcm */
247 ad1816_write(ad1816, 4, reg);
250 case SOUND_MIXER_LINE:
251 case SOUND_MIXER_LINE3: /* Register 18 line in */
252 ad1816_write(ad1816, 18, reg);
255 case SOUND_MIXER_MIC: /* Register 19 mic volume */
256 ad1816_write(ad1816, 19, reg & ~0xff); /* mic is mono */
259 case SOUND_MIXER_IGAIN:
260 /* and now to something completely different ... */
261 ad1816_write(ad1816, 20, ((ad1816_read(ad1816, 20) & ~0x0f0f)
262 | (((AD1816_MUTE - left) / 2) << 8) /* four bits of adc gain */
263 | ((AD1816_MUTE - right) / 2)));
267 printf("ad1816_mixer_set(): unknown device.\n");
270 ad1816_unlock(ad1816);
272 left = ((AD1816_MUTE - left) * 100) / AD1816_MUTE;
273 right = ((AD1816_MUTE - right) * 100) / AD1816_MUTE;
275 return left | (right << 8);
279 ad1816mix_setrecsrc(struct snd_mixer *m, u_int32_t src)
281 struct ad1816_info *ad1816 = mix_getdevinfo(m);
285 case SOUND_MASK_LINE:
286 case SOUND_MASK_LINE3:
291 case SOUND_MASK_LINE1:
298 src = SOUND_MASK_MIC;
303 ad1816_write(ad1816, 20, (ad1816_read(ad1816, 20) & ~0x7070) | dev);
304 ad1816_unlock(ad1816);
308 static kobj_method_t ad1816mixer_methods[] = {
309 KOBJMETHOD(mixer_init, ad1816mix_init),
310 KOBJMETHOD(mixer_set, ad1816mix_set),
311 KOBJMETHOD(mixer_setrecsrc, ad1816mix_setrecsrc),
314 MIXER_DECLARE(ad1816mixer);
316 /* -------------------------------------------------------------------- */
317 /* channel interface */
319 ad1816chan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b, struct pcm_channel *c, int dir)
321 struct ad1816_info *ad1816 = devinfo;
322 struct ad1816_chinfo *ch = (dir == PCMDIR_PLAY)? &ad1816->pch : &ad1816->rch;
328 if (sndbuf_alloc(ch->buffer, ad1816->parent_dmat, 0, ad1816->bufsize) != 0)
331 sndbuf_dmasetup(ch->buffer, (dir == PCMDIR_PLAY) ? ad1816->drq1 :
333 if (SND_DMA(ch->buffer))
334 sndbuf_dmasetdir(ch->buffer, dir);
340 ad1816chan_setformat(kobj_t obj, void *data, u_int32_t format)
342 struct ad1816_chinfo *ch = data;
343 struct ad1816_info *ad1816 = ch->parent;
344 int fmt = AD1816_U8, reg;
347 if (ch->dir == PCMDIR_PLAY) {
349 ad1816_write(ad1816, 8, 0x0000); /* reset base and current counter */
350 ad1816_write(ad1816, 9, 0x0000); /* for playback and capture */
353 ad1816_write(ad1816, 10, 0x0000);
354 ad1816_write(ad1816, 11, 0x0000);
356 switch (AFMT_ENCODING(format)) {
377 if (AFMT_CHANNEL(format) > 1) fmt |= AD1816_STEREO;
378 io_wr(ad1816, reg, fmt);
379 ad1816_unlock(ad1816);
388 ad1816chan_setspeed(kobj_t obj, void *data, u_int32_t speed)
390 struct ad1816_chinfo *ch = data;
391 struct ad1816_info *ad1816 = ch->parent;
393 RANGE(speed, 4000, 55200);
395 ad1816_write(ad1816, (ch->dir == PCMDIR_PLAY)? 2 : 3, speed);
396 ad1816_unlock(ad1816);
401 ad1816chan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize)
403 struct ad1816_chinfo *ch = data;
405 ch->blksz = blocksize;
410 ad1816chan_trigger(kobj_t obj, void *data, int go)
412 struct ad1816_chinfo *ch = data;
413 struct ad1816_info *ad1816 = ch->parent;
416 if (!PCMTRIG_COMMON(go))
419 sndbuf_dma(ch->buffer, go);
420 wr = (ch->dir == PCMDIR_PLAY);
421 reg = wr? AD1816_PLAY : AD1816_CAPT;
425 /* start only if not already running */
426 if (!(io_rd(ad1816, reg) & AD1816_ENABLE)) {
427 int cnt = ((ch->blksz) >> 2) - 1;
428 ad1816_write(ad1816, wr? 8 : 10, cnt); /* count */
429 ad1816_write(ad1816, wr? 9 : 11, 0); /* reset cur cnt */
430 ad1816_write(ad1816, 1, ad1816_read(ad1816, 1) |
431 (wr? 0x8000 : 0x4000)); /* enable int */
432 /* enable playback */
433 io_wr(ad1816, reg, io_rd(ad1816, reg) | AD1816_ENABLE);
434 if (!(io_rd(ad1816, reg) & AD1816_ENABLE))
435 printf("ad1816: failed to start %s DMA!\n",
441 case PCMTRIG_ABORT: /* XXX check this... */
442 /* we don't test here if it is running... */
444 ad1816_write(ad1816, 1, ad1816_read(ad1816, 1) &
445 ~(wr? 0x8000 : 0x4000));
447 io_wr(ad1816, reg, io_rd(ad1816, reg) & ~AD1816_ENABLE);
448 /* disable playback */
449 if (io_rd(ad1816, reg) & AD1816_ENABLE)
450 printf("ad1816: failed to stop %s DMA!\n",
452 ad1816_write(ad1816, wr? 8 : 10, 0); /* reset base cnt */
453 ad1816_write(ad1816, wr? 9 : 11, 0); /* reset cur cnt */
457 ad1816_unlock(ad1816);
462 ad1816chan_getptr(kobj_t obj, void *data)
464 struct ad1816_chinfo *ch = data;
465 return sndbuf_dmaptr(ch->buffer);
468 static struct pcmchan_caps *
469 ad1816chan_getcaps(kobj_t obj, void *data)
474 static kobj_method_t ad1816chan_methods[] = {
475 KOBJMETHOD(channel_init, ad1816chan_init),
476 KOBJMETHOD(channel_setformat, ad1816chan_setformat),
477 KOBJMETHOD(channel_setspeed, ad1816chan_setspeed),
478 KOBJMETHOD(channel_setblocksize, ad1816chan_setblocksize),
479 KOBJMETHOD(channel_trigger, ad1816chan_trigger),
480 KOBJMETHOD(channel_getptr, ad1816chan_getptr),
481 KOBJMETHOD(channel_getcaps, ad1816chan_getcaps),
484 CHANNEL_DECLARE(ad1816chan);
486 /* -------------------------------------------------------------------- */
489 ad1816_release_resources(struct ad1816_info *ad1816, device_t dev)
493 bus_teardown_intr(dev, ad1816->irq, ad1816->ih);
494 bus_release_resource(dev, SYS_RES_IRQ, ad1816->irq_rid, ad1816->irq);
498 isa_dma_release(rman_get_start(ad1816->drq1));
499 bus_release_resource(dev, SYS_RES_DRQ, ad1816->drq1_rid, ad1816->drq1);
503 isa_dma_release(rman_get_start(ad1816->drq2));
504 bus_release_resource(dev, SYS_RES_DRQ, ad1816->drq2_rid, ad1816->drq2);
507 if (ad1816->io_base) {
508 bus_release_resource(dev, SYS_RES_IOPORT, ad1816->io_rid, ad1816->io_base);
509 ad1816->io_base = NULL;
511 if (ad1816->parent_dmat) {
512 bus_dma_tag_destroy(ad1816->parent_dmat);
513 ad1816->parent_dmat = 0;
516 snd_mtxfree(ad1816->lock);
518 free(ad1816, M_DEVBUF);
522 ad1816_alloc_resources(struct ad1816_info *ad1816, device_t dev)
524 int ok = 1, pdma, rdma;
526 if (!ad1816->io_base)
527 ad1816->io_base = bus_alloc_resource_any(dev,
528 SYS_RES_IOPORT, &ad1816->io_rid, RF_ACTIVE);
530 ad1816->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ,
531 &ad1816->irq_rid, RF_ACTIVE);
533 ad1816->drq1 = bus_alloc_resource_any(dev, SYS_RES_DRQ,
534 &ad1816->drq1_rid, RF_ACTIVE);
536 ad1816->drq2 = bus_alloc_resource_any(dev, SYS_RES_DRQ,
537 &ad1816->drq2_rid, RF_ACTIVE);
539 if (!ad1816->io_base || !ad1816->drq1 || !ad1816->irq) ok = 0;
542 pdma = rman_get_start(ad1816->drq1);
543 isa_dma_acquire(pdma);
544 isa_dmainit(pdma, ad1816->bufsize);
546 rdma = rman_get_start(ad1816->drq2);
547 isa_dma_acquire(rdma);
548 isa_dmainit(rdma, ad1816->bufsize);
552 pcm_setflags(dev, pcm_getflags(dev) | SD_F_SIMPLEX);
559 ad1816_init(struct ad1816_info *ad1816, device_t dev)
561 ad1816_write(ad1816, 1, 0x2); /* disable interrupts */
562 ad1816_write(ad1816, 32, 0x90F0); /* SoundSys Mode, split fmt */
564 ad1816_write(ad1816, 5, 0x8080); /* FM volume mute */
565 ad1816_write(ad1816, 6, 0x8080); /* I2S1 volume mute */
566 ad1816_write(ad1816, 7, 0x8080); /* I2S0 volume mute */
567 ad1816_write(ad1816, 17, 0x8888); /* VID Volume mute */
568 ad1816_write(ad1816, 20, 0x5050); /* recsrc mic, agc off */
569 /* adc gain is set to 0 */
575 ad1816_probe(device_t dev)
578 u_int32_t logical_id = isa_get_logicalid(dev);
580 switch (logical_id) {
581 case 0x80719304: /* ADS7180 */
584 case 0x50719304: /* ADS7150 */
590 device_set_desc(dev, s);
591 return BUS_PROBE_DEFAULT;
597 ad1816_attach(device_t dev)
599 struct ad1816_info *ad1816;
600 char status[SND_STATUSLEN], status2[SND_STATUSLEN];
602 ad1816 = malloc(sizeof(*ad1816), M_DEVBUF, M_WAITOK | M_ZERO);
603 ad1816->lock = snd_mtxcreate(device_get_nameunit(dev),
607 ad1816->drq1_rid = 0;
608 ad1816->drq2_rid = 1;
609 ad1816->bufsize = pcm_getbuffersize(dev, 4096, DSP_BUFFSIZE, 65536);
611 if (!ad1816_alloc_resources(ad1816, dev)) goto no;
612 ad1816_init(ad1816, dev);
613 if (mixer_init(dev, &ad1816mixer_class, ad1816)) goto no;
615 snd_setup_intr(dev, ad1816->irq, 0, ad1816_intr, ad1816, &ad1816->ih);
616 if (bus_dma_tag_create(/*parent*/bus_get_dma_tag(dev), /*alignment*/2,
618 /*lowaddr*/BUS_SPACE_MAXADDR_24BIT,
619 /*highaddr*/BUS_SPACE_MAXADDR,
620 /*filter*/NULL, /*filterarg*/NULL,
621 /*maxsize*/ad1816->bufsize, /*nsegments*/1,
623 /*flags*/0, /*lockfunc*/busdma_lock_mutex,
624 /*lockarg*/ &Giant, &ad1816->parent_dmat) != 0) {
625 device_printf(dev, "unable to create dma tag\n");
629 snprintf(status2, SND_STATUSLEN, ":%jd", rman_get_start(ad1816->drq2));
633 snprintf(status, SND_STATUSLEN, "at io 0x%jx irq %jd drq %jd%s bufsz %u %s",
634 rman_get_start(ad1816->io_base),
635 rman_get_start(ad1816->irq),
636 rman_get_start(ad1816->drq1),
639 PCM_KLDSTRING(snd_ad1816));
641 if (pcm_register(dev, ad1816, 1, 1)) goto no;
642 pcm_addchan(dev, PCMDIR_REC, &ad1816chan_class, ad1816);
643 pcm_addchan(dev, PCMDIR_PLAY, &ad1816chan_class, ad1816);
644 pcm_setstatus(dev, status);
648 ad1816_release_resources(ad1816, dev);
655 ad1816_detach(device_t dev)
658 struct ad1816_info *ad1816;
660 r = pcm_unregister(dev);
664 ad1816 = pcm_getdevinfo(dev);
665 ad1816_release_resources(ad1816, dev);
669 static device_method_t ad1816_methods[] = {
670 /* Device interface */
671 DEVMETHOD(device_probe, ad1816_probe),
672 DEVMETHOD(device_attach, ad1816_attach),
673 DEVMETHOD(device_detach, ad1816_detach),
678 static driver_t ad1816_driver = {
684 DRIVER_MODULE(snd_ad1816, isa, ad1816_driver, pcm_devclass, 0, 0);
685 DRIVER_MODULE(snd_ad1816, acpi, ad1816_driver, pcm_devclass, 0, 0);
686 MODULE_DEPEND(snd_ad1816, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER);
687 MODULE_VERSION(snd_ad1816, 1);