NetBSD/sys/dev/sbus/cs4231_sbus.c

548 lines
14 KiB
C

/* $NetBSD: cs4231_sbus.c,v 1.18 2002/03/12 04:48:29 uwe Exp $ */
/*-
* Copyright (c) 1998, 1999, 2002 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Paul Kranenburg.
*
* 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.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the NetBSD
* Foundation, Inc. and its contributors.
* 4. Neither the name of The NetBSD Foundation nor the names of its
* contributors may be used to endorse or promote products derived
* from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. 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 FOUNDATION 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.
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: cs4231_sbus.c,v 1.18 2002/03/12 04:48:29 uwe Exp $");
#include "audio.h"
#if NAUDIO > 0
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/errno.h>
#include <sys/device.h>
#include <sys/malloc.h>
#include <machine/bus.h>
#include <machine/intr.h>
#include <dev/sbus/sbusvar.h>
#include <sys/audioio.h>
#include <dev/audio_if.h>
#include <dev/ic/ad1848reg.h>
#include <dev/ic/cs4231reg.h>
#include <dev/ic/ad1848var.h>
#include <dev/ic/cs4231var.h>
#include <dev/ic/apcdmareg.h>
#ifdef AUDIO_DEBUG
int cs4231_sbus_debug = 0;
#define DPRINTF(x) if (cs4231_sbus_debug) printf x
#else
#define DPRINTF(x)
#endif
/* where APC DMA registers are located */
#define CS4231_APCDMA_OFFSET 16
/* interrupt enable bits except those specific for playback/capture */
#define APC_ENABLE (APC_EI | APC_IE | APC_EIE)
struct cs4231_sbus_softc {
struct cs4231_softc sc_cs4231;
struct sbusdev sc_sd; /* sbus device */
volatile struct apc_dma *sc_dmareg; /* DMA controller registers */
};
static int cs4231_sbus_match(struct device *, struct cfdata *, void *);
static void cs4231_sbus_attach(struct device *, struct device *, void *);
struct cfattach audiocs_sbus_ca = {
sizeof(struct cs4231_sbus_softc), cs4231_sbus_match, cs4231_sbus_attach
};
/* audio_hw_if methods specific to apc dma */
static int cs4231_sbus_trigger_output(void *, void *, void *, int,
void (*)(void *), void *,
struct audio_params *);
static int cs4231_sbus_trigger_input(void *, void *, void *, int,
void (*)(void *), void *,
struct audio_params *);
static int cs4231_sbus_halt_output(void *);
static int cs4231_sbus_halt_input(void *);
struct audio_hw_if audiocs_sbus_hw_if = {
cs4231_open,
cs4231_close,
NULL, /* drain */
ad1848_query_encoding,
ad1848_set_params,
cs4231_round_blocksize,
ad1848_commit_settings,
NULL, /* init_output */
NULL, /* init_input */
NULL, /* start_output */
NULL, /* start_input */
cs4231_sbus_halt_output,
cs4231_sbus_halt_input,
NULL, /* speaker_ctl */
cs4231_getdev,
NULL, /* setfd */
cs4231_set_port,
cs4231_get_port,
cs4231_query_devinfo,
cs4231_malloc,
cs4231_free,
cs4231_round_buffersize,
NULL, /* mappage */
cs4231_get_props,
cs4231_sbus_trigger_output,
cs4231_sbus_trigger_input,
NULL, /* dev_ioctl */
};
#ifdef AUDIO_DEBUG
static void cs4231_sbus_regdump(char *, struct cs4231_sbus_softc *);
#endif
static int cs4231_sbus_intr(void *);
static int
cs4231_sbus_match(parent, cf, aux)
struct device *parent;
struct cfdata *cf;
void *aux;
{
struct sbus_attach_args *sa = aux;
return (strcmp(sa->sa_name, AUDIOCS_PROM_NAME) == 0);
}
static void
cs4231_sbus_attach(parent, self, aux)
struct device *parent, *self;
void *aux;
{
struct cs4231_sbus_softc *sbsc = (struct cs4231_sbus_softc *)self;
struct cs4231_softc *sc = &sbsc->sc_cs4231;
struct sbus_attach_args *sa = aux;
bus_space_handle_t bh;
sc->sc_bustag = sa->sa_bustag;
sc->sc_dmatag = sa->sa_dmatag;
/*
* Map my registers in, if they aren't already in virtual
* address space.
*/
if (sa->sa_npromvaddrs) {
bh = (bus_space_handle_t)sa->sa_promvaddrs[0];
} else {
if (sbus_bus_map(sa->sa_bustag,
sa->sa_slot, sa->sa_offset, sa->sa_size,
BUS_SPACE_MAP_LINEAR, &bh) != 0) {
printf("%s @ sbus: cannot map registers\n",
self->dv_xname);
return;
}
}
sbsc->sc_dmareg =
(volatile struct apc_dma *)(u_long)(bh + CS4231_APCDMA_OFFSET);
cs4231_common_attach(sc, bh);
printf("\n");
sbus_establish(&sbsc->sc_sd, &sc->sc_ad1848.sc_dev);
/* Establish interrupt channel */
if (sa->sa_nintr)
bus_intr_establish(sa->sa_bustag,
sa->sa_pri, IPL_AUDIO, 0,
cs4231_sbus_intr, sbsc);
audio_attach_mi(&audiocs_sbus_hw_if, sbsc, &sc->sc_ad1848.sc_dev);
}
#ifdef AUDIO_DEBUG
static void
cs4231_sbus_regdump(label, sc)
char *label;
struct cs4231_sbus_softc *sc;
{
char bits[128];
volatile struct apc_dma *dma = sc->sc_dmareg;
printf("cs4231regdump(%s): regs:", label);
printf("dmapva: 0x%x; ", dma->dmapva);
printf("dmapc: 0x%x; ", dma->dmapc);
printf("dmapnva: 0x%x; ", dma->dmapnva);
printf("dmapnc: 0x%x\n", dma->dmapnc);
printf("dmacva: 0x%x; ", dma->dmacva);
printf("dmacc: 0x%x; ", dma->dmacc);
printf("dmacnva: 0x%x; ", dma->dmacnva);
printf("dmacnc: 0x%x\n", dma->dmacnc);
printf("apc_dmacsr=%s\n",
bitmask_snprintf(dma->dmacsr, APC_BITS, bits, sizeof(bits)));
ad1848_dump_regs(&sc->sc_cs4231.sc_ad1848);
}
#endif /* AUDIO_DEBUG */
static int
cs4231_sbus_trigger_output(addr, start, end, blksize, intr, arg, param)
void *addr;
void *start, *end;
int blksize;
void (*intr)(void *);
void *arg;
struct audio_params *param;
{
struct cs4231_sbus_softc *sbsc = addr;
struct cs4231_softc *sc = &sbsc->sc_cs4231;
struct cs_transfer *t = &sc->sc_playback;
volatile struct apc_dma *dma = sbsc->sc_dmareg;
u_int32_t csr;
bus_addr_t dmaaddr;
bus_size_t dmasize;
int ret;
#ifdef AUDIO_DEBUG
char bits[128];
#endif
ret = cs4231_transfer_init(sc, t, &dmaaddr, &dmasize,
start, end, blksize, intr, arg);
if (ret != 0)
return (ret);
DPRINTF(("trigger_output: csr=%s\n",
bitmask_snprintf(csr, APC_BITS, bits, sizeof(bits))));
DPRINTF(("trigger_output: was: %x %d, %x %d\n",
dma->dmapva, dma->dmapc, dma->dmapnva, dma->dmapnc));
/* load first block */
dma->dmapnva = (u_int32_t)dmaaddr;
dma->dmapnc = (u_int32_t)dmasize;
DPRINTF(("trigger_output: 1st: %x %d, %x %d\n",
dma->dmapva, dma->dmapc, dma->dmapnva, dma->dmapnc));
csr = dma->dmacsr;
if ((csr & PDMA_GO) == 0 || (csr & APC_PPAUSE) != 0) {
int cfg;
dma->dmacsr &= ~(APC_PPAUSE | APC_PMIE | APC_INTR_MASK);
csr = dma->dmacsr & ~APC_INTR_MASK;
csr |= APC_ENABLE | APC_PIE | APC_PMIE | PDMA_GO;
dma->dmacsr = csr;
ad_write(&sc->sc_ad1848, SP_LOWER_BASE_COUNT, 0xff);
ad_write(&sc->sc_ad1848, SP_UPPER_BASE_COUNT, 0xff);
cfg = ad_read(&sc->sc_ad1848, SP_INTERFACE_CONFIG);
ad_write(&sc->sc_ad1848, SP_INTERFACE_CONFIG,
(cfg | PLAYBACK_ENABLE));
} else {
DPRINTF(("trigger_output: already: csr=%s\n",
bitmask_snprintf(csr, APC_BITS, bits, sizeof(bits))));
}
/* load next block if we can */
if (dma->dmacsr & APC_PD) {
cs4231_transfer_advance(t, &dmaaddr, &dmasize);
dma->dmapnva = (u_int32_t)dmaaddr;
dma->dmapnc = (u_int32_t)dmasize;
DPRINTF(("trigger_output: 2nd: %x %d, %x %d\n",
dma->dmapva, dma->dmapc, dma->dmapnva, dma->dmapnc));
}
return (0);
}
static int
cs4231_sbus_halt_output(addr)
void *addr;
{
struct cs4231_sbus_softc *sbsc = addr;
struct cs4231_softc *sc = &sbsc->sc_cs4231;
volatile struct apc_dma *dma = sbsc->sc_dmareg;
u_int32_t csr;
int cfg;
#ifdef AUDIO_DEBUG
char bits[128];
#endif
sc->sc_playback.t_active = 0;
csr = dma->dmacsr;
DPRINTF(("halt_output: csr=%s\n",
bitmask_snprintf(dma->dmacsr, APC_BITS, bits, sizeof(bits))));
csr &= ~APC_INTR_MASK; /* do not clear interrupts accidentally */
csr |= APC_PPAUSE; /* pause playback (let current complete) */
dma->dmacsr = csr;
/* let the curernt transfer complete */
if (csr & PDMA_GO)
do {
csr = dma->dmacsr;
DPRINTF(("halt_output: csr=%s\n",
bitmask_snprintf(dma->dmacsr, APC_BITS,
bits, sizeof(bits))));
} while ((csr & APC_PM) == 0);
cfg = ad_read(&sc->sc_ad1848, SP_INTERFACE_CONFIG);
ad_write(&sc->sc_ad1848, SP_INTERFACE_CONFIG,(cfg & ~PLAYBACK_ENABLE));
return (0);
}
/* NB: we don't enable APC_CMIE and won't use APC_CM */
static int
cs4231_sbus_trigger_input(addr, start, end, blksize, intr, arg, param)
void *addr;
void *start, *end;
int blksize;
void (*intr)(void *);
void *arg;
struct audio_params *param;
{
struct cs4231_sbus_softc *sbsc = addr;
struct cs4231_softc *sc = &sbsc->sc_cs4231;
struct cs_transfer *t = &sc->sc_capture;
volatile struct apc_dma *dma = sbsc->sc_dmareg;
u_int32_t csr;
bus_addr_t dmaaddr;
bus_size_t dmasize;
int ret;
#ifdef AUDIO_DEBUG
char bits[128];
#endif
ret = cs4231_transfer_init(sc, t, &dmaaddr, &dmasize,
start, end, blksize, intr, arg);
if (ret != 0)
return (ret);
DPRINTF(("trigger_input: csr=%s\n",
bitmask_snprintf(csr, APC_BITS, bits, sizeof(bits))));
DPRINTF(("trigger_input: was: %x %d, %x %d\n",
dma->dmacva, dma->dmacc, dma->dmacnva, dma->dmacnc));
/* supply first block */
dma->dmacnva = (u_int32_t)dmaaddr;
dma->dmacnc = (u_int32_t)dmasize;
DPRINTF(("trigger_input: 1st: %x %d, %x %d\n",
dma->dmacva, dma->dmacc, dma->dmacnva, dma->dmacnc));
csr = dma->dmacsr;
if ((csr & CDMA_GO) == 0 || (csr & APC_CPAUSE) != 0) {
int cfg;
dma->dmacsr &= ~(APC_CPAUSE | APC_CMIE | APC_INTR_MASK);
csr = dma->dmacsr & ~APC_INTR_MASK;
csr |= APC_ENABLE | APC_CIE | CDMA_GO;
dma->dmacsr = csr;
ad_write(&sc->sc_ad1848, CS_LOWER_REC_CNT, 0xff);
ad_write(&sc->sc_ad1848, CS_UPPER_REC_CNT, 0xff);
cfg = ad_read(&sc->sc_ad1848, SP_INTERFACE_CONFIG);
ad_write(&sc->sc_ad1848, SP_INTERFACE_CONFIG,
(cfg | CAPTURE_ENABLE));
} else {
DPRINTF(("trigger_input: already: csr=%s\n",
bitmask_snprintf(csr, APC_BITS, bits, sizeof(bits))));
}
/* supply next block if we can */
if (dma->dmacsr & APC_CD) {
cs4231_transfer_advance(t, &dmaaddr, &dmasize);
dma->dmacnva = (u_int32_t)dmaaddr;
dma->dmacnc = (u_int32_t)dmasize;
DPRINTF(("trigger_input: 2nd: %x %d, %x %d\n",
dma->dmacva, dma->dmacc, dma->dmacnva, dma->dmacnc));
}
return (0);
}
static int
cs4231_sbus_halt_input(addr)
void *addr;
{
struct cs4231_sbus_softc *sbsc = addr;
struct cs4231_softc *sc = &sbsc->sc_cs4231;
volatile struct apc_dma *dma = sbsc->sc_dmareg;
u_int32_t csr;
int cfg;
#ifdef AUDIO_DEBUG
char bits[128];
#endif
sc->sc_capture.t_active = 0;
csr = dma->dmacsr;
DPRINTF(("halt_input: csr=%s\n",
bitmask_snprintf(dma->dmacsr, APC_BITS, bits, sizeof(bits))));
csr &= ~APC_INTR_MASK; /* do not clear interrupts accidentally */
csr |= APC_CPAUSE;
dma->dmacsr = csr;
/* let the curernt transfer complete */
if (csr & CDMA_GO)
do {
csr = dma->dmacsr;
DPRINTF(("halt_input: csr=%s\n",
bitmask_snprintf(dma->dmacsr, APC_BITS,
bits, sizeof(bits))));
} while ((csr & APC_CM) == 0);
cfg = ad_read(&sc->sc_ad1848, SP_INTERFACE_CONFIG);
ad_write(&sc->sc_ad1848, SP_INTERFACE_CONFIG, (cfg & ~CAPTURE_ENABLE));
return (0);
}
static int
cs4231_sbus_intr(arg)
void *arg;
{
struct cs4231_sbus_softc *sbsc = arg;
struct cs4231_softc *sc = &sbsc->sc_cs4231;
volatile struct apc_dma *dma = sbsc->sc_dmareg;
u_int32_t csr;
int status;
bus_addr_t dmaaddr;
bus_size_t dmasize;
int served;
#if defined(AUDIO_DEBUG) || defined(DIAGNOSTIC)
char bits[128];
#endif
csr = dma->dmacsr;
if ((csr & APC_INTR_MASK) == 0) /* any interrupt pedning? */
return (0);
dma->dmacsr = csr; /* write back DMA status to clear interrupt */
++sc->sc_intrcnt.ev_count;
served = 0;
#ifdef AUDIO_DEBUG
if (cs4231_sbus_debug > 1)
cs4231_sbus_regdump("audiointr", sbsc);
#endif
status = ADREAD(&sc->sc_ad1848, AD1848_STATUS);
DPRINTF(("%s: status: %s\n", sc->sc_ad1848.sc_dev.dv_xname,
bitmask_snprintf(status, AD_R2_BITS, bits, sizeof(bits))));
if (status & INTERRUPT_STATUS) {
#ifdef AUDIO_DEBUG
int reason;
reason = ad_read(&sc->sc_ad1848, CS_IRQ_STATUS);
DPRINTF(("%s: i24: %s\n", sc->sc_ad1848.sc_dev.dv_xname,
bitmask_snprintf(reason, CS_I24_BITS, bits, sizeof(bits))));
#endif
/* clear ad1848 interrupt */
ADWRITE(&sc->sc_ad1848, AD1848_STATUS, 0);
}
if (csr & APC_CI) {
if (csr & APC_CD) { /* can supply new block */
struct cs_transfer *t = &sc->sc_capture;
cs4231_transfer_advance(t, &dmaaddr, &dmasize);
dma->dmacnva = (u_int32_t)dmaaddr;
dma->dmacnc = (u_int32_t)dmasize;
if (t->t_intr != NULL)
(*t->t_intr)(t->t_arg);
++t->t_intrcnt.ev_count;
served = 1;
}
}
if (csr & APC_PMI) {
if (!sc->sc_playback.t_active)
served = 1; /* draining in halt_output() */
}
if (csr & APC_PI) {
if (csr & APC_PD) { /* can load new block */
struct cs_transfer *t = &sc->sc_playback;
if (t->t_active) {
cs4231_transfer_advance(t, &dmaaddr, &dmasize);
dma->dmapnva = (u_int32_t)dmaaddr;
dma->dmapnc = (u_int32_t)dmasize;
}
if (t->t_intr != NULL)
(*t->t_intr)(t->t_arg);
++t->t_intrcnt.ev_count;
served = 1;
}
}
/* got an interrupt we don't know how to handle */
if (!served) {
#ifdef DIAGNOSTIC
printf("%s: unhandled csr=%s\n", sc->sc_ad1848.sc_dev.dv_xname,
bitmask_snprintf(csr, APC_BITS, bits, sizeof(bits)));
#endif
/* evcnt? */
}
return (1);
}
#endif /* NAUDIO > 0 */