Home | History | Annotate | Line # | Download | only in dev
toccata.c revision 1.1
      1  1.1  is /* $NetBSD: toccata.c,v 1.1 2002/01/21 22:13:26 is Exp $ */
      2  1.1  is 
      3  1.1  is /*-
      4  1.1  is  * Copyright (c) 1998, 1999, 2001, 2002 The NetBSD Foundation, Inc.
      5  1.1  is  * All rights reserved.
      6  1.1  is  *
      7  1.1  is  * This code is derived from software contributed to The NetBSD Foundation
      8  1.1  is  * by Paul Kranenburg and Ignatios Souvatzis.
      9  1.1  is  *
     10  1.1  is  * Redistribution and use in source and binary forms, with or without
     11  1.1  is  * modification, are permitted provided that the following conditions
     12  1.1  is  * are met:
     13  1.1  is  * 1. Redistributions of source code must retain the above copyright
     14  1.1  is  *    notice, this list of conditions and the following disclaimer.
     15  1.1  is  * 2. Redistributions in binary form must reproduce the above copyright
     16  1.1  is  *    notice, this list of conditions and the following disclaimer in the
     17  1.1  is  *    documentation and/or other materials provided with the distribution.
     18  1.1  is  * 3. All advertising materials mentioning features or use of this software
     19  1.1  is  *    must display the following acknowledgement:
     20  1.1  is  *        This product includes software developed by the NetBSD
     21  1.1  is  *        Foundation, Inc. and its contributors.
     22  1.1  is  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  1.1  is  *    contributors may be used to endorse or promote products derived
     24  1.1  is  *    from this software without specific prior written permission.
     25  1.1  is  *
     26  1.1  is  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  1.1  is  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  1.1  is  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  1.1  is  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  1.1  is  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  1.1  is  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  1.1  is  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  1.1  is  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  1.1  is  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  1.1  is  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  1.1  is  * POSSIBILITY OF SUCH DAMAGE.
     37  1.1  is  */
     38  1.1  is 
     39  1.1  is #include <sys/types.h>
     40  1.1  is #include <sys/param.h>
     41  1.1  is #include <sys/systm.h>
     42  1.1  is #include <sys/kernel.h>
     43  1.1  is #include <sys/device.h>
     44  1.1  is #include <sys/fcntl.h>		/* FREAD */
     45  1.1  is 
     46  1.1  is #include <machine/bus.h>
     47  1.1  is 
     48  1.1  is #include <sys/audioio.h>
     49  1.1  is #include <dev/audio_if.h>
     50  1.1  is 
     51  1.1  is 
     52  1.1  is #include <dev/ic/ad1848reg.h>
     53  1.1  is #include <dev/ic/ad1848var.h>
     54  1.1  is 
     55  1.1  is #include <amiga/dev/zbusvar.h>
     56  1.1  is #include <amiga/amiga/isr.h>
     57  1.1  is 
     58  1.1  is 
     59  1.1  is /* Register offsets. XXX All of this is guesswork. */
     60  1.1  is 
     61  1.1  is /*
     62  1.1  is  * The Toccata board consists of: GALs for ZBus AutoConfig(tm) glue, GALs
     63  1.1  is  * that interface the FIFO chips and the audio codec chip to the ZBus,
     64  1.1  is  * an AD1848 (or AD1845), and 2 Integrated Device Technology 7202LA
     65  1.1  is  * (1024x9bit FIFO) chips.
     66  1.1  is  */
     67  1.1  is 
     68  1.1  is #define TOCC_FIFO_STAT	0x1ffe
     69  1.1  is #define TOCC_FIFO_DATA	0x2000
     70  1.1  is 
     71  1.1  is /*
     72  1.1  is  * I don't know whether the AD1848 PIO data registers are connected... and
     73  1.1  is  * at 2 or 3 accesses to read or write a data byte in the best case, I better
     74  1.1  is  * don't even think about it. The AD1848 address/status and data port are
     75  1.1  is  * here:
     76  1.1  is  */
     77  1.1  is #define TOCC_CODEC_ADDR	0x67FF
     78  1.1  is #define TOCC_CODEC_STAT	TOCC_CODEC_ADDR
     79  1.1  is #define TOCC_CODEC_REG	0x6801
     80  1.1  is 
     81  1.1  is /* fifo status bits, read */
     82  1.1  is 
     83  1.1  is #define TOCC_FIFO_INT	0x80	/* active low; together with one of those: */
     84  1.1  is 
     85  1.1  is #define TOCC_FIFO_PBHE	0x08	/* playback fifo is half empty (active high) */
     86  1.1  is #define TOCC_FIFO_CPHF	0x04	/* capture fifo is half full (active high) */
     87  1.1  is 
     88  1.1  is /* fifo status bits, write */
     89  1.1  is 
     90  1.1  is /*
     91  1.1  is  * seems to work like this:
     92  1.1  is  * init: write 2; delay; write 1
     93  1.1  is  *
     94  1.1  is  * capture: write 1; write 1+4+8+0x40	(0x4D)
     95  1.1  is  * capt. int: read 512 bytes out of fifo.
     96  1.1  is  * capt. int off by writing 1+4+8	(0x0D)
     97  1.1  is  *
     98  1.1  is  * playback: write 1; write 1 + 0x10;	(0x11)
     99  1.1  is  * 3/4 fill fifo with silence; init codec;
    100  1.1  is  * write 1+4+0x10+0x80			(0x95)
    101  1.1  is  * pb int: write 512 bytes to fifo
    102  1.1  is  * pb int off by writing 1+4+0x10	(0x15)
    103  1.1  is  */
    104  1.1  is 
    105  1.1  is #define TOCC_RST	0x02
    106  1.1  is #define TOCC_ACT	0x01
    107  1.1  is #define TOCC_MAGIC	0x04
    108  1.1  is 
    109  1.1  is #define TOCC_PB_INTENA	0x80
    110  1.1  is #define TOCC_PB_FILL	0x10
    111  1.1  is 
    112  1.1  is #define TOCC_PB_PREP	(TOCC_ACT + TOCC_PB_FILL)
    113  1.1  is #define TOCC_PB_TAIL	(TOCC_PB_PREP + TOCC_MAGIC)
    114  1.1  is #define TOCC_PB_MAIN	(TOCC_PB_TAIL + TOCC_PB_INTENA)
    115  1.1  is 
    116  1.1  is #define TOCC_CP_INTENA	0x40
    117  1.1  is #define TOCC_CP_RUN	0x08
    118  1.1  is 
    119  1.1  is #define TOCC_CP_TAIL	(TOCC_ACT + TOCC_CP_RUN)
    120  1.1  is #define TOCC_CP_MAIN	(TOCC_CP_TAIL + TOCC_CP_INTENA + TOCC_MAGIC)
    121  1.1  is 
    122  1.1  is /*
    123  1.1  is  * For the port stuff. Similar to the cs4231 table, but MONO is not wired
    124  1.1  is  * on the Toccata, which was designed for the AD1848. Also we know how
    125  1.1  is  * to handle input.
    126  1.1  is  */
    127  1.1  is 
    128  1.1  is #define TOCCATA_INPUT_CLASS	0
    129  1.1  is #define TOCCATA_OUTPUT_CLASS	1
    130  1.1  is #define TOCCATA_MONITOR_CLASS	2
    131  1.1  is #define TOCCATA_RECORD_CLASS	3
    132  1.1  is 
    133  1.1  is #define TOCCATA_RECORD_SOURCE	4
    134  1.1  is #define TOCCATA_REC_LVL		5
    135  1.1  is 
    136  1.1  is #define TOCCATA_MIC_IN_LVL	6
    137  1.1  is 
    138  1.1  is #define TOCCATA_AUX1_LVL	7
    139  1.1  is #define TOCCATA_AUX1_MUTE	8
    140  1.1  is 
    141  1.1  is #define TOCCATA_AUX2_LVL	9
    142  1.1  is #define TOCCATA_AUX2_MUTE	10
    143  1.1  is 
    144  1.1  is #define TOCCATA_MONITOR_LVL	11
    145  1.1  is #define TOCCATA_MONITOR_MUTE	12
    146  1.1  is #define TOCCATA_OUTPUT_LVL	13
    147  1.1  is 
    148  1.1  is /* only on AD1845 in mode 2 */
    149  1.1  is 
    150  1.1  is #define TOCCATA_LINE_IN_LVL	14
    151  1.1  is #define TOCCATA_LINE_IN_MUTE	15
    152  1.1  is 
    153  1.1  is /* special, need support */
    154  1.1  is #define TOCCATA_MIC_LVL		16
    155  1.1  is #define TOCCATA_MIC_MUTE	17
    156  1.1  is 
    157  1.1  is 
    158  1.1  is 
    159  1.1  is /* prototypes */
    160  1.1  is 
    161  1.1  is int toccata_intr(void *);
    162  1.1  is int toccata_readreg(struct ad1848_softc *, int);
    163  1.1  is void toccata_writereg(struct ad1848_softc *, int, int);
    164  1.1  is 
    165  1.1  is int toccata_round_blocksize(void *, int);
    166  1.1  is size_t toccata_round_buffersize(void *, int, size_t);
    167  1.1  is 
    168  1.1  is int toccata_open(void *, int);
    169  1.1  is void toccata_close(void *);
    170  1.1  is int toccata_getdev(void *, struct audio_device *);
    171  1.1  is int toccata_get_props(void *);
    172  1.1  is 
    173  1.1  is int toccata_halt_input(void *);
    174  1.1  is int toccata_halt_output(void *);
    175  1.1  is int toccata_start_input(void *, void *, int, void (*)(void *), void *);
    176  1.1  is int toccata_start_output(void *, void *, int, void (*)(void *), void *);
    177  1.1  is 
    178  1.1  is /* I suspect  those should be in a shared file */
    179  1.1  is int toccata_set_port(void *, mixer_ctrl_t *);
    180  1.1  is int toccata_get_port(void *, mixer_ctrl_t *);
    181  1.1  is int toccata_query_devinfo(void *, mixer_devinfo_t *);
    182  1.1  is 
    183  1.1  is struct audio_hw_if audiocs_hw_if = {
    184  1.1  is 	toccata_open,
    185  1.1  is 	toccata_close,
    186  1.1  is 	0,	/*
    187  1.1  is 		 * XXX toccata_drain could be written:
    188  1.1  is 		 * sleep for play interupt. This loses less then 512 bytes of
    189  1.1  is 		 * sample data, otherwise up to 1024.
    190  1.1  is 		 */
    191  1.1  is 	ad1848_query_encoding,
    192  1.1  is 	ad1848_set_params,
    193  1.1  is 	toccata_round_blocksize,
    194  1.1  is 	ad1848_commit_settings,
    195  1.1  is 	0,	/* init_output */	/* XXX need this to prefill? */
    196  1.1  is 	0,	/* init_input */
    197  1.1  is 	toccata_start_output,
    198  1.1  is 	toccata_start_input,
    199  1.1  is 	toccata_halt_output,
    200  1.1  is 	toccata_halt_input,
    201  1.1  is 	0,	/* speaker */
    202  1.1  is 	toccata_getdev,
    203  1.1  is 	0,	/* setfd */
    204  1.1  is 	toccata_set_port,
    205  1.1  is 	toccata_get_port,
    206  1.1  is 	toccata_query_devinfo,
    207  1.1  is 	0,	/* alloc/free */
    208  1.1  is 	0,
    209  1.1  is 	toccata_round_buffersize, /* round_buffer */
    210  1.1  is 	0,	/* mappage */
    211  1.1  is 	toccata_get_props,
    212  1.1  is 	0,	/* trigger_output */
    213  1.1  is 	0,
    214  1.1  is };
    215  1.1  is 
    216  1.1  is struct toccata_softc {
    217  1.1  is 	struct ad1848_softc	sc_ad;
    218  1.1  is 	struct isr		sc_isr;
    219  1.1  is 	volatile u_int8_t	*sc_boardp; /* only need a few addresses! */
    220  1.1  is 
    221  1.1  is 	void			(*sc_captmore)(void *);
    222  1.1  is 	void			 *sc_captarg;
    223  1.1  is 	void			 *sc_captbuf;
    224  1.1  is 	int			sc_captbufsz;
    225  1.1  is 
    226  1.1  is 	void			(*sc_playmore)(void *);
    227  1.1  is 	void			 *sc_playarg;
    228  1.1  is };
    229  1.1  is 
    230  1.1  is int toccata_match (struct device *, struct cfdata *, void *);
    231  1.1  is void toccata_attach (struct device *, struct device *, void *);
    232  1.1  is 
    233  1.1  is struct cfattach toccata_ca = {
    234  1.1  is         sizeof(struct toccata_softc), toccata_match, toccata_attach
    235  1.1  is };
    236  1.1  is 
    237  1.1  is int
    238  1.1  is toccata_match(struct device *parent, struct cfdata *cfp, void *aux) {
    239  1.1  is 	struct zbus_args *zap;
    240  1.1  is 
    241  1.1  is 	zap = aux;
    242  1.1  is 
    243  1.1  is 	if (zap->manid != 18260)
    244  1.1  is 		return (0);
    245  1.1  is 
    246  1.1  is 	if (zap->prodid != 12)
    247  1.1  is 		return (0);
    248  1.1  is 
    249  1.1  is 	return (1);
    250  1.1  is }
    251  1.1  is 
    252  1.1  is void
    253  1.1  is toccata_attach(struct device *parent, struct device *self, void *aux) {
    254  1.1  is 	struct toccata_softc *sc;
    255  1.1  is 	struct ad1848_softc *asc;
    256  1.1  is 	struct zbus_args *zap;
    257  1.1  is 
    258  1.1  is 	volatile u_int8_t *boardp;
    259  1.1  is 
    260  1.1  is 	sc = (struct toccata_softc *)self;
    261  1.1  is 	asc = &sc->sc_ad;
    262  1.1  is 	zap = aux;
    263  1.1  is 
    264  1.1  is 	boardp = (volatile u_int8_t *)zap->va;
    265  1.1  is 	sc->sc_boardp = boardp;
    266  1.1  is 
    267  1.1  is 	*boardp = TOCC_RST;
    268  1.1  is 	delay(500000);		/* look up value */
    269  1.1  is 	*boardp = TOCC_ACT;
    270  1.1  is 
    271  1.1  is 	asc->parent = sc;
    272  1.1  is 	asc->sc_readreg = toccata_readreg;
    273  1.1  is 	asc->sc_writereg = toccata_writereg;
    274  1.1  is 
    275  1.1  is 	asc->chip_name = "ad1848";
    276  1.1  is 	asc->mode = 1;
    277  1.1  is 	ad1848_attach(asc);
    278  1.1  is 	printf("\n");
    279  1.1  is 
    280  1.1  is 	sc->sc_captbuf = 0;
    281  1.1  is 	sc->sc_playmore = 0;
    282  1.1  is 
    283  1.1  is 	sc->sc_isr.isr_ipl = 6;
    284  1.1  is 	sc->sc_isr.isr_arg = sc;
    285  1.1  is 	sc->sc_isr.isr_intr = toccata_intr;
    286  1.1  is 	add_isr(&sc->sc_isr);
    287  1.1  is 
    288  1.1  is 	audio_attach_mi(&audiocs_hw_if, sc, &asc->sc_dev);
    289  1.1  is 
    290  1.1  is }
    291  1.1  is 
    292  1.1  is /* interupt handler */
    293  1.1  is 
    294  1.1  is int
    295  1.1  is toccata_intr(void *tag) {
    296  1.1  is 	struct toccata_softc *sc;
    297  1.1  is 	u_int8_t *buf;
    298  1.1  is 	volatile u_int8_t *fifo;
    299  1.1  is 	u_int8_t status;
    300  1.1  is 	int i;
    301  1.1  is 
    302  1.1  is 	sc = tag;
    303  1.1  is 	status = *(sc->sc_boardp);
    304  1.1  is 
    305  1.1  is 	if (status & TOCC_FIFO_INT)	/* active low */
    306  1.1  is 		return 0;
    307  1.1  is 
    308  1.1  is 	if (status & TOCC_FIFO_PBHE) {
    309  1.1  is 		if (sc->sc_playmore) {
    310  1.1  is 			(*sc->sc_playmore)(sc->sc_playarg);
    311  1.1  is 			return 1;
    312  1.1  is 		}
    313  1.1  is 	} else if (status & TOCC_FIFO_CPHF) {
    314  1.1  is 		if (sc->sc_captbuf) {
    315  1.1  is 			buf = sc->sc_captbuf;
    316  1.1  is 			fifo = sc->sc_boardp + TOCC_FIFO_DATA;
    317  1.1  is 
    318  1.1  is 			for (i = sc->sc_captbufsz/4 - 1; i>=0; --i) {
    319  1.1  is 				*buf++ = *fifo;
    320  1.1  is 				*buf++ = *fifo;
    321  1.1  is 				*buf++ = *fifo;
    322  1.1  is 				*buf++ = *fifo;
    323  1.1  is 			}
    324  1.1  is 
    325  1.1  is 			/* XXX if (sc->sc_captmore) { */
    326  1.1  is 			(*sc->sc_captmore)(sc->sc_captarg);
    327  1.1  is 			return 1;
    328  1.1  is 		}
    329  1.1  is 	}
    330  1.1  is 
    331  1.1  is 	/*
    332  1.1  is 	 * Something is wrong; switch interupts off to avoid wedging the
    333  1.1  is 	 * machine, and notify the alpha tester.
    334  1.1  is 	 * Normally, the halt_* functions should have switched off the
    335  1.1  is 	 * FIFO interupt.
    336  1.1  is 	 */
    337  1.1  is #ifdef DEBUG
    338  1.1  is 	printf("%s: got unexpected interupt %x\n", sc->sc_ad.sc_dev, status);
    339  1.1  is #endif
    340  1.1  is 	*sc->sc_boardp = TOCC_ACT;
    341  1.1  is 	return 1;
    342  1.1  is }
    343  1.1  is 
    344  1.1  is /* support for ad1848 functions */
    345  1.1  is 
    346  1.1  is int
    347  1.1  is toccata_readreg(struct ad1848_softc *asc, int offset) {
    348  1.1  is 	struct toccata_softc *sc = (struct toccata_softc *)asc;
    349  1.1  is 
    350  1.1  is 	return (*(sc->sc_boardp + TOCC_CODEC_ADDR +
    351  1.1  is 		offset * (TOCC_CODEC_REG - TOCC_CODEC_ADDR)));
    352  1.1  is }
    353  1.1  is 
    354  1.1  is void
    355  1.1  is toccata_writereg(struct ad1848_softc *asc, int offset, int value) {
    356  1.1  is 	struct toccata_softc *sc = (struct toccata_softc *)asc;
    357  1.1  is 
    358  1.1  is 	*(sc->sc_boardp + TOCC_CODEC_ADDR +
    359  1.1  is 		offset * (TOCC_CODEC_REG - TOCC_CODEC_ADDR)) = value;
    360  1.1  is }
    361  1.1  is 
    362  1.1  is /* our own copy of open/close; we don't ever enable the ad1848 interupts */
    363  1.1  is int
    364  1.1  is toccata_open(void *addr, int flags) {
    365  1.1  is 	struct toccata_softc *sc;
    366  1.1  is 	struct ad1848_softc *asc;
    367  1.1  is 
    368  1.1  is 	sc = addr;
    369  1.1  is 	asc = &sc->sc_ad;
    370  1.1  is 
    371  1.1  is 	asc->open_mode = flags;
    372  1.1  is 	/* If recording && monitoring, the playback part is also used. */
    373  1.1  is 	if (flags & FREAD && asc->mute[AD1848_MONITOR_CHANNEL] == 0)
    374  1.1  is 		ad1848_mute_wave_output(asc, WAVE_UNMUTE1, 1);
    375  1.1  is 
    376  1.1  is #ifdef AUDIO_DEBUG
    377  1.1  is         if (ad1848debug)
    378  1.1  is                 ad1848_dump_regs(asc);
    379  1.1  is #endif
    380  1.1  is 
    381  1.1  is         return 0;
    382  1.1  is }
    383  1.1  is 
    384  1.1  is void
    385  1.1  is toccata_close(void *addr) {
    386  1.1  is 	struct toccata_softc *sc = addr;
    387  1.1  is         struct ad1848_softc *asc = &sc->sc_ad;
    388  1.1  is 	unsigned reg;
    389  1.1  is 
    390  1.1  is         asc->open_mode = 0;
    391  1.1  is 
    392  1.1  is         ad1848_mute_wave_output(asc, WAVE_UNMUTE1, 0);
    393  1.1  is 
    394  1.1  is 	reg = ad_read(&sc->sc_ad, SP_INTERFACE_CONFIG);
    395  1.1  is 	ad_write(&sc->sc_ad, SP_INTERFACE_CONFIG,
    396  1.1  is 		(reg & ~(CAPTURE_ENABLE|PLAYBACK_ENABLE)));
    397  1.1  is 
    398  1.1  is         /* Disable interrupts */
    399  1.1  is 	*sc->sc_boardp = TOCC_ACT;
    400  1.1  is #ifdef AUDIO_DEBUG
    401  1.1  is         if (ad1848debug)
    402  1.1  is                 ad1848_dump_regs(asc);
    403  1.1  is #endif
    404  1.1  is }
    405  1.1  is 
    406  1.1  is int
    407  1.1  is toccata_round_blocksize(void *addr, int blk) {
    408  1.1  is 	int ret;
    409  1.1  is 
    410  1.1  is 	ret = blk > 512 ? 512 : (blk & -4);
    411  1.1  is 
    412  1.1  is 	return ret;
    413  1.1  is }
    414  1.1  is 
    415  1.1  is size_t
    416  1.1  is toccata_round_buffersize(void *addr, int direction, size_t suggested) {
    417  1.1  is 	int ret;
    418  1.1  is 
    419  1.1  is 	ret = suggested & -4;
    420  1.1  is 
    421  1.1  is 	return (ret);
    422  1.1  is }
    423  1.1  is 
    424  1.1  is struct audio_device toccata_device = {
    425  1.1  is 	"toccata", "x", "audio"
    426  1.1  is };
    427  1.1  is 
    428  1.1  is int
    429  1.1  is toccata_getdev(void *addr, struct audio_device *retp) {
    430  1.1  is 	*retp = toccata_device;
    431  1.1  is 	return (0);
    432  1.1  is }
    433  1.1  is 
    434  1.1  is int
    435  1.1  is toccata_get_props(void *addr) {
    436  1.1  is 	return (0);
    437  1.1  is }
    438  1.1  is 
    439  1.1  is int
    440  1.1  is toccata_halt_input(void *addr) {
    441  1.1  is 	struct toccata_softc *sc;
    442  1.1  is 	struct ad1848_softc *asc;
    443  1.1  is 	unsigned reg;
    444  1.1  is 
    445  1.1  is 	sc = addr;
    446  1.1  is 	asc = &sc->sc_ad;
    447  1.1  is 
    448  1.1  is 	/* we're half_duplex; be brutal */
    449  1.1  is 	*sc->sc_boardp = TOCC_CP_TAIL;
    450  1.1  is 	sc->sc_captmore = 0;
    451  1.1  is 	sc->sc_captbuf = 0;
    452  1.1  is 
    453  1.1  is 	reg = ad_read(&sc->sc_ad, SP_INTERFACE_CONFIG);
    454  1.1  is 	ad_write(&sc->sc_ad, SP_INTERFACE_CONFIG, (reg & ~CAPTURE_ENABLE));
    455  1.1  is 
    456  1.1  is 	return 0;
    457  1.1  is }
    458  1.1  is 
    459  1.1  is int
    460  1.1  is toccata_start_input(void *addr, void *block, int blksize,
    461  1.1  is 	void (*intr)(void *), void *intrarg) {
    462  1.1  is 
    463  1.1  is 	struct toccata_softc *sc;
    464  1.1  is 	unsigned reg;
    465  1.1  is 	volatile u_int8_t *cmd;
    466  1.1  is 
    467  1.1  is 	sc = addr;
    468  1.1  is 	cmd = sc->sc_boardp;
    469  1.1  is 
    470  1.1  is 	if (sc->sc_captmore == 0) {
    471  1.1  is 
    472  1.1  is 		/* we're half-duplex, be brutal */
    473  1.1  is 		*cmd = TOCC_ACT;
    474  1.1  is 		*cmd = TOCC_CP_MAIN;
    475  1.1  is 
    476  1.1  is 		reg = ad_read(&sc->sc_ad, SP_INTERFACE_CONFIG);
    477  1.1  is 		ad_write(&sc->sc_ad, SP_INTERFACE_CONFIG,
    478  1.1  is 		    (reg | CAPTURE_ENABLE));
    479  1.1  is 
    480  1.1  is 	}
    481  1.1  is 
    482  1.1  is 	sc->sc_captarg = intrarg;
    483  1.1  is 	sc->sc_captmore = intr;
    484  1.1  is 	sc->sc_captbuf = (u_int8_t *)block;
    485  1.1  is 	sc->sc_captbufsz = blksize;
    486  1.1  is 
    487  1.1  is 	return 0;
    488  1.1  is }
    489  1.1  is 
    490  1.1  is int
    491  1.1  is toccata_halt_output(void *addr) {
    492  1.1  is 	struct toccata_softc *sc;
    493  1.1  is 	struct ad1848_softc *asc;
    494  1.1  is 	unsigned reg;
    495  1.1  is 
    496  1.1  is 	sc = addr;
    497  1.1  is 	asc = &sc->sc_ad;
    498  1.1  is 
    499  1.1  is 	/* we're half_duplex; be brutal */
    500  1.1  is 	*sc->sc_boardp = TOCC_PB_TAIL;
    501  1.1  is 	sc->sc_playmore = 0;
    502  1.1  is 
    503  1.1  is 	reg = ad_read(&sc->sc_ad, SP_INTERFACE_CONFIG);
    504  1.1  is 	ad_write(&sc->sc_ad, SP_INTERFACE_CONFIG, (reg & ~PLAYBACK_ENABLE));
    505  1.1  is 
    506  1.1  is 	return 0;
    507  1.1  is }
    508  1.1  is 
    509  1.1  is int
    510  1.1  is toccata_start_output(void *addr, void *block, int blksize,
    511  1.1  is 	void (*intr)(void*), void *intrarg) {
    512  1.1  is 
    513  1.1  is 	struct toccata_softc *sc;
    514  1.1  is 	unsigned reg;
    515  1.1  is 	int i;
    516  1.1  is 	volatile u_int8_t *cmd, *fifo;
    517  1.1  is 	u_int8_t *buf;
    518  1.1  is 
    519  1.1  is 	sc = addr;
    520  1.1  is 	buf = block;
    521  1.1  is 
    522  1.1  is 	cmd = sc->sc_boardp;
    523  1.1  is 	fifo = sc->sc_boardp + TOCC_FIFO_DATA;
    524  1.1  is 
    525  1.1  is 	if (sc->sc_playmore == 0) {
    526  1.1  is 		*cmd = TOCC_ACT;
    527  1.1  is 		*cmd = TOCC_PB_PREP;
    528  1.1  is 	}
    529  1.1  is 
    530  1.1  is 	/*
    531  1.1  is 	 * We rounded the blocksize to a multiple of 4 bytes. Modest
    532  1.1  is 	 * unrolling saves 2% of cputime playing 48000 16bit stereo
    533  1.1  is 	 * on 68040/25MHz.
    534  1.1  is 	 */
    535  1.1  is 
    536  1.1  is 	for (i = blksize/4 - 1; i>=0; --i) {
    537  1.1  is 		*fifo = *buf++;
    538  1.1  is 		*fifo = *buf++;
    539  1.1  is 		*fifo = *buf++;
    540  1.1  is 		*fifo = *buf++;
    541  1.1  is 	}
    542  1.1  is 
    543  1.1  is 	if (sc->sc_playmore == 0) {
    544  1.1  is 		reg = ad_read(&sc->sc_ad, SP_INTERFACE_CONFIG);
    545  1.1  is 		ad_write(&sc->sc_ad, SP_INTERFACE_CONFIG,
    546  1.1  is 		    (reg | PLAYBACK_ENABLE));
    547  1.1  is 
    548  1.1  is 		/* we're half-duplex, be brutal */
    549  1.1  is 		*sc->sc_boardp = TOCC_PB_MAIN;
    550  1.1  is 	}
    551  1.1  is 
    552  1.1  is 	sc->sc_playarg = intrarg;
    553  1.1  is 	sc->sc_playmore = intr;
    554  1.1  is 
    555  1.1  is 	return 0;
    556  1.1  is }
    557  1.1  is 
    558  1.1  is static ad1848_devmap_t csmapping[] = {
    559  1.1  is 	{ TOCCATA_MIC_IN_LVL, AD1848_KIND_MICGAIN, -1 },
    560  1.1  is 	{ TOCCATA_AUX1_LVL, AD1848_KIND_LVL, AD1848_AUX1_CHANNEL },
    561  1.1  is 	{ TOCCATA_AUX1_MUTE, AD1848_KIND_MUTE, AD1848_AUX1_CHANNEL },
    562  1.1  is 	{ TOCCATA_AUX2_LVL, AD1848_KIND_LVL, AD1848_AUX2_CHANNEL },
    563  1.1  is 	{ TOCCATA_AUX2_MUTE, AD1848_KIND_MUTE, AD1848_AUX2_CHANNEL },
    564  1.1  is 	{ TOCCATA_OUTPUT_LVL, AD1848_KIND_LVL, AD1848_DAC_CHANNEL },
    565  1.1  is 	{ TOCCATA_MONITOR_LVL, AD1848_KIND_LVL, AD1848_MONITOR_CHANNEL },
    566  1.1  is 	{ TOCCATA_MONITOR_MUTE, AD1848_KIND_MUTE, AD1848_MONITOR_CHANNEL },
    567  1.1  is 	{ TOCCATA_REC_LVL, AD1848_KIND_RECORDGAIN, -1 },
    568  1.1  is 	{ TOCCATA_RECORD_SOURCE, AD1848_KIND_RECORDSOURCE, -1 },
    569  1.1  is /* only in mode 2: */
    570  1.1  is 	{ TOCCATA_LINE_IN_LVL, AD1848_KIND_LVL, AD1848_LINE_CHANNEL },
    571  1.1  is 	{ TOCCATA_LINE_IN_MUTE, AD1848_KIND_MUTE, AD1848_LINE_CHANNEL },
    572  1.1  is };
    573  1.1  is 
    574  1.1  is #define nummap (sizeof(csmapping) / sizeof(csmapping[0]))
    575  1.1  is 
    576  1.1  is int
    577  1.1  is toccata_set_port(void *addr, mixer_ctrl_t *cp) {
    578  1.1  is 	struct ad1848_softc *ac = addr;
    579  1.1  is 
    580  1.1  is 	/* printf("set_port(%d)\n", cp->dev); */
    581  1.1  is 	return (ad1848_mixer_set_port(ac, csmapping,
    582  1.1  is 		ac->mode == 2 ? nummap : nummap - 2, cp));
    583  1.1  is }
    584  1.1  is 
    585  1.1  is int
    586  1.1  is toccata_get_port(void *addr, mixer_ctrl_t *cp) {
    587  1.1  is 	struct ad1848_softc *ac = addr;
    588  1.1  is 
    589  1.1  is 	/* printf("get_port(%d)\n", cp->dev); */
    590  1.1  is 	return (ad1848_mixer_get_port(ac, csmapping,
    591  1.1  is 		ac->mode == 2 ? nummap : nummap - 2, cp));
    592  1.1  is }
    593  1.1  is 
    594  1.1  is int
    595  1.1  is toccata_query_devinfo(void *addr, mixer_devinfo_t *dip) {
    596  1.1  is 
    597  1.1  is 	printf("toccata_query_devinfo(%2d)\n", dip->index);
    598  1.1  is 
    599  1.1  is 	switch(dip->index) {
    600  1.1  is 	case TOCCATA_MIC_IN_LVL:	/* Microphone */
    601  1.1  is 		dip->type = AUDIO_MIXER_VALUE;
    602  1.1  is 		dip->mixer_class = TOCCATA_INPUT_CLASS;
    603  1.1  is 		dip->prev = dip->next = AUDIO_MIXER_LAST;
    604  1.1  is 		strcpy(dip->label.name, AudioNmicrophone);
    605  1.1  is 		dip->un.v.num_channels = 1;
    606  1.1  is 		strcpy(dip->un.v.units.name, AudioNvolume);
    607  1.1  is 		break;
    608  1.1  is #if 0
    609  1.1  is 
    610  1.1  is 	case TOCCATA_MONO_LVL:	/* mono/microphone mixer */
    611  1.1  is 		dip->type = AUDIO_MIXER_VALUE;
    612  1.1  is 		dip->mixer_class = TOCCATA_INPUT_CLASS;
    613  1.1  is 		dip->prev = AUDIO_MIXER_LAST;
    614  1.1  is 		dip->next = TOCCATA_MONO_MUTE;
    615  1.1  is 		strcpy(dip->label.name, AudioNmicrophone);
    616  1.1  is 		dip->un.v.num_channels = 1;
    617  1.1  is 		strcpy(dip->un.v.units.name, AudioNvolume);
    618  1.1  is 		break;
    619  1.1  is #endif
    620  1.1  is 
    621  1.1  is 	case TOCCATA_AUX1_LVL:		/*  dacout */
    622  1.1  is 		dip->type = AUDIO_MIXER_VALUE;
    623  1.1  is 		dip->mixer_class = TOCCATA_INPUT_CLASS;
    624  1.1  is 		dip->prev = AUDIO_MIXER_LAST;
    625  1.1  is 		dip->next = TOCCATA_AUX1_MUTE;
    626  1.1  is 		strcpy(dip->label.name, "aux1");
    627  1.1  is 		dip->un.v.num_channels = 2;
    628  1.1  is 		strcpy(dip->un.v.units.name, AudioNvolume);
    629  1.1  is 		break;
    630  1.1  is 
    631  1.1  is 	case TOCCATA_AUX1_MUTE:
    632  1.1  is 		dip->mixer_class = TOCCATA_INPUT_CLASS;
    633  1.1  is 		dip->type = AUDIO_MIXER_ENUM;
    634  1.1  is 		dip->prev = TOCCATA_AUX1_LVL;
    635  1.1  is 		dip->next = AUDIO_MIXER_LAST;
    636  1.1  is 		goto mute;
    637  1.1  is 
    638  1.1  is 
    639  1.1  is 
    640  1.1  is 	case TOCCATA_AUX2_LVL:
    641  1.1  is 		dip->type = AUDIO_MIXER_VALUE;
    642  1.1  is 		dip->mixer_class = TOCCATA_INPUT_CLASS;
    643  1.1  is 		dip->prev = AUDIO_MIXER_LAST;
    644  1.1  is 		dip->next = TOCCATA_AUX2_MUTE;
    645  1.1  is 		strcpy(dip->label.name, "aux2");
    646  1.1  is 		dip->un.v.num_channels = 2;
    647  1.1  is 		strcpy(dip->un.v.units.name, AudioNvolume);
    648  1.1  is 		break;
    649  1.1  is 
    650  1.1  is 	case TOCCATA_AUX2_MUTE:
    651  1.1  is 		dip->mixer_class = TOCCATA_INPUT_CLASS;
    652  1.1  is 		dip->type = AUDIO_MIXER_ENUM;
    653  1.1  is 		dip->prev = TOCCATA_AUX2_LVL;
    654  1.1  is 		dip->next = AUDIO_MIXER_LAST;
    655  1.1  is 		goto mute;
    656  1.1  is 
    657  1.1  is 
    658  1.1  is 	case TOCCATA_MONITOR_LVL:	/* monitor level */
    659  1.1  is 		dip->type = AUDIO_MIXER_VALUE;
    660  1.1  is 		dip->mixer_class = TOCCATA_MONITOR_CLASS;
    661  1.1  is 		dip->next = TOCCATA_MONITOR_MUTE;
    662  1.1  is 		dip->prev = AUDIO_MIXER_LAST;
    663  1.1  is 		strcpy(dip->label.name, AudioNmonitor);
    664  1.1  is 		dip->un.v.num_channels = 1;
    665  1.1  is 		strcpy(dip->un.v.units.name, AudioNvolume);
    666  1.1  is 		break;
    667  1.1  is 
    668  1.1  is 	case TOCCATA_OUTPUT_LVL:	/* output volume */
    669  1.1  is 		dip->type = AUDIO_MIXER_VALUE;
    670  1.1  is 		dip->mixer_class = TOCCATA_OUTPUT_CLASS;
    671  1.1  is 		dip->prev = dip->next = AUDIO_MIXER_LAST;
    672  1.1  is 		strcpy(dip->label.name, AudioNmaster);
    673  1.1  is 		dip->un.v.num_channels = 2;
    674  1.1  is 		strcpy(dip->un.v.units.name, AudioNvolume);
    675  1.1  is 		break;
    676  1.1  is #if 0
    677  1.1  is 	case TOCCATA_LINE_IN_LVL:	/* line */
    678  1.1  is 		dip->type = AUDIO_MIXER_VALUE;
    679  1.1  is 		dip->mixer_class = TOCCATA_INPUT_CLASS;
    680  1.1  is 		dip->prev = AUDIO_MIXER_LAST;
    681  1.1  is 		dip->next = TOCCATA_LINE_IN_MUTE;
    682  1.1  is 		strcpy(dip->label.name, AudioNline);
    683  1.1  is 		dip->un.v.num_channels = 2;
    684  1.1  is 		strcpy(dip->un.v.units.name, AudioNvolume);
    685  1.1  is 		break;
    686  1.1  is 
    687  1.1  is 	case TOCCATA_LINE_IN_MUTE:
    688  1.1  is 		dip->mixer_class = TOCCATA_INPUT_CLASS;
    689  1.1  is 		dip->type = AUDIO_MIXER_ENUM;
    690  1.1  is 		dip->prev = TOCCATA_LINE_IN_LVL;
    691  1.1  is 		dip->next = AUDIO_MIXER_LAST;
    692  1.1  is 		goto mute;
    693  1.1  is #endif
    694  1.1  is 	case TOCCATA_MONITOR_MUTE:
    695  1.1  is 		dip->mixer_class = TOCCATA_MONITOR_CLASS;
    696  1.1  is 		dip->type = AUDIO_MIXER_ENUM;
    697  1.1  is 		dip->prev = TOCCATA_MONITOR_LVL;
    698  1.1  is 		dip->next = AUDIO_MIXER_LAST;
    699  1.1  is 	mute:
    700  1.1  is 		strcpy(dip->label.name, AudioNmute);
    701  1.1  is 		dip->un.e.num_mem = 2;
    702  1.1  is 		strcpy(dip->un.e.member[0].label.name, AudioNoff);
    703  1.1  is 		dip->un.e.member[0].ord = 0;
    704  1.1  is 		strcpy(dip->un.e.member[1].label.name, AudioNon);
    705  1.1  is 		dip->un.e.member[1].ord = 1;
    706  1.1  is 		break;
    707  1.1  is 
    708  1.1  is 	case TOCCATA_REC_LVL:	/* record level */
    709  1.1  is 		dip->type = AUDIO_MIXER_VALUE;
    710  1.1  is 		dip->mixer_class = TOCCATA_INPUT_CLASS;
    711  1.1  is 		dip->prev = AUDIO_MIXER_LAST;
    712  1.1  is 		dip->next = TOCCATA_RECORD_SOURCE;
    713  1.1  is 		strcpy(dip->label.name, AudioNrecord);
    714  1.1  is 		dip->un.v.num_channels = 2;
    715  1.1  is 		strcpy(dip->un.v.units.name, AudioNvolume);
    716  1.1  is 		break;
    717  1.1  is 
    718  1.1  is 	case TOCCATA_RECORD_SOURCE:
    719  1.1  is 		dip->mixer_class = TOCCATA_RECORD_CLASS;
    720  1.1  is 		dip->type = AUDIO_MIXER_ENUM;
    721  1.1  is 		dip->prev = TOCCATA_REC_LVL;
    722  1.1  is 		dip->next = AUDIO_MIXER_LAST;
    723  1.1  is 		strcpy(dip->label.name, AudioNsource);
    724  1.1  is 		dip->un.e.num_mem = 4;
    725  1.1  is 		strcpy(dip->un.e.member[0].label.name, AudioNmicrophone);
    726  1.1  is 		dip->un.e.member[1].ord = MIC_IN_PORT;
    727  1.1  is 		strcpy(dip->un.e.member[1].label.name, AudioNline);
    728  1.1  is 		dip->un.e.member[3].ord = LINE_IN_PORT;
    729  1.1  is 		strcpy(dip->un.e.member[2].label.name, "aux1");
    730  1.1  is 		dip->un.e.member[2].ord = AUX1_IN_PORT;
    731  1.1  is 		strcpy(dip->un.e.member[3].label.name, AudioNoutput);
    732  1.1  is 		dip->un.e.member[0].ord = DAC_IN_PORT;
    733  1.1  is 		break;
    734  1.1  is 
    735  1.1  is 	case TOCCATA_INPUT_CLASS:		/* input class descriptor */
    736  1.1  is 		dip->type = AUDIO_MIXER_CLASS;
    737  1.1  is 		dip->mixer_class = TOCCATA_INPUT_CLASS;
    738  1.1  is 		dip->next = dip->prev = AUDIO_MIXER_LAST;
    739  1.1  is 		strcpy(dip->label.name, AudioCinputs);
    740  1.1  is 		break;
    741  1.1  is 
    742  1.1  is 	case TOCCATA_OUTPUT_CLASS:		/* output class descriptor */
    743  1.1  is 		dip->type = AUDIO_MIXER_CLASS;
    744  1.1  is 		dip->mixer_class = TOCCATA_OUTPUT_CLASS;
    745  1.1  is 		dip->next = dip->prev = AUDIO_MIXER_LAST;
    746  1.1  is 		strcpy(dip->label.name, AudioCoutputs);
    747  1.1  is 		break;
    748  1.1  is 
    749  1.1  is 	case TOCCATA_MONITOR_CLASS:		/* monitor class descriptor */
    750  1.1  is 		dip->type = AUDIO_MIXER_CLASS;
    751  1.1  is 		dip->mixer_class = TOCCATA_MONITOR_CLASS;
    752  1.1  is 		dip->next = dip->prev = AUDIO_MIXER_LAST;
    753  1.1  is 		strcpy(dip->label.name, AudioCmonitor);
    754  1.1  is 		break;
    755  1.1  is 
    756  1.1  is 	case TOCCATA_RECORD_CLASS:		/* record source class */
    757  1.1  is 		dip->type = AUDIO_MIXER_CLASS;
    758  1.1  is 		dip->mixer_class = TOCCATA_RECORD_CLASS;
    759  1.1  is 		dip->next = dip->prev = AUDIO_MIXER_LAST;
    760  1.1  is 		strcpy(dip->label.name, AudioCrecord);
    761  1.1  is 		break;
    762  1.1  is 
    763  1.1  is 	default:
    764  1.1  is 		return ENXIO;
    765  1.1  is 		/*NOTREACHED*/
    766  1.1  is 	}
    767  1.1  is 
    768  1.1  is 	return (0);
    769  1.1  is }
    770