Home | History | Annotate | Line # | Download | only in g2
aica.c revision 1.8
      1  1.8  tsutsui /*	$NetBSD: aica.c,v 1.8 2005/02/19 15:37:34 tsutsui Exp $	*/
      2  1.1   marcus 
      3  1.1   marcus /*
      4  1.1   marcus  * Copyright (c) 2003 SHIMIZU Ryo <ryo (at) misakimix.org>
      5  1.1   marcus  * All rights reserved.
      6  1.1   marcus  *
      7  1.1   marcus  * Redistribution and use in source and binary forms, with or without
      8  1.1   marcus  * modification, are permitted provided that the following conditions
      9  1.1   marcus  * are met:
     10  1.1   marcus  *
     11  1.1   marcus  * 1. Redistributions of source code must retain the above copyright
     12  1.1   marcus  *    notice, this list of conditions and the following disclaimer.
     13  1.1   marcus  * 2. Redistributions in binary form must reproduce the above copyright
     14  1.1   marcus  *    notice, this list of conditions and the following disclaimer in the
     15  1.1   marcus  *    documentation and/or other materials provided with the distribution.
     16  1.1   marcus  * 3. The name of the author may not be used to endorse or promote products
     17  1.1   marcus  *    derived from this software without specific prior written permission.
     18  1.1   marcus  *
     19  1.1   marcus  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     20  1.1   marcus  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     21  1.1   marcus  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     22  1.1   marcus  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     23  1.1   marcus  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     24  1.1   marcus  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     25  1.1   marcus  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     26  1.1   marcus  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     27  1.1   marcus  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
     28  1.1   marcus  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     29  1.1   marcus  */
     30  1.1   marcus 
     31  1.1   marcus #include <sys/cdefs.h>
     32  1.8  tsutsui __KERNEL_RCSID(0, "$NetBSD: aica.c,v 1.8 2005/02/19 15:37:34 tsutsui Exp $");
     33  1.1   marcus 
     34  1.1   marcus #include <sys/param.h>
     35  1.1   marcus #include <sys/systm.h>
     36  1.1   marcus #include <sys/kernel.h>
     37  1.1   marcus #include <sys/proc.h>
     38  1.1   marcus #include <sys/audioio.h>
     39  1.1   marcus 
     40  1.1   marcus #include <dev/audio_if.h>
     41  1.1   marcus #include <dev/mulaw.h>
     42  1.1   marcus #include <dev/auconv.h>
     43  1.1   marcus 
     44  1.1   marcus #include <machine/bus.h>
     45  1.1   marcus #include <machine/sysasicvar.h>
     46  1.1   marcus 
     47  1.1   marcus #include <dreamcast/dev/g2/g2busvar.h>
     48  1.1   marcus #include <dreamcast/dev/g2/aicavar.h>
     49  1.1   marcus #include <dreamcast/dev/microcode/aica_armcode.h>
     50  1.1   marcus 
     51  1.1   marcus #define	AICA_REG_ADDR	0x00700000
     52  1.1   marcus #define	AICA_RAM_START	0x00800000
     53  1.1   marcus #define	AICA_RAM_SIZE	0x00200000
     54  1.1   marcus #define	AICA_NCHAN	64
     55  1.1   marcus #define	AICA_TIMEOUT	0x1800
     56  1.1   marcus 
     57  1.1   marcus struct aica_softc {
     58  1.1   marcus 	struct device		sc_dev;		/* base device */
     59  1.1   marcus 	bus_space_tag_t		sc_memt;
     60  1.1   marcus 	bus_space_handle_t	sc_aica_regh;
     61  1.1   marcus 	bus_space_handle_t	sc_aica_memh;
     62  1.1   marcus 
     63  1.1   marcus 	/* audio property */
     64  1.1   marcus 	int			sc_open;
     65  1.1   marcus 	int			sc_encodings;
     66  1.1   marcus 	int			sc_precision;
     67  1.1   marcus 	int			sc_channels;
     68  1.1   marcus 	int			sc_rate;
     69  1.1   marcus 	void			(*sc_intr)(void *);
     70  1.1   marcus 	void			*sc_intr_arg;
     71  1.1   marcus 
     72  1.1   marcus 	int			sc_output_master;
     73  1.1   marcus 	int			sc_output_gain[2];
     74  1.1   marcus #define	AICA_VOLUME_LEFT	0
     75  1.1   marcus #define	AICA_VOLUME_RIGHT	1
     76  1.1   marcus 
     77  1.1   marcus 	/* work for output */
     78  1.1   marcus 	void			*sc_buffer;
     79  1.1   marcus 	void			*sc_buffer_start;
     80  1.1   marcus 	void			*sc_buffer_end;
     81  1.1   marcus 	int			sc_blksize;
     82  1.1   marcus 	int			sc_nextfill;
     83  1.1   marcus };
     84  1.1   marcus 
     85  1.6     kent const struct {
     86  1.1   marcus 	char	*name;
     87  1.6     kent 	int	encoding;
     88  1.6     kent 	int	precision;
     89  1.1   marcus } aica_encodings[] = {
     90  1.1   marcus 	{AudioEadpcm,		AUDIO_ENCODING_ADPCM,		4},
     91  1.1   marcus 	{AudioEslinear,		AUDIO_ENCODING_SLINEAR,		8},
     92  1.1   marcus 	{AudioEulinear,		AUDIO_ENCODING_ULINEAR,		8},
     93  1.1   marcus 	{AudioEmulaw,		AUDIO_ENCODING_ULAW,		8},
     94  1.2   marcus 	{AudioEalaw,		AUDIO_ENCODING_ALAW,		8},
     95  1.1   marcus 	{AudioEslinear_be,	AUDIO_ENCODING_SLINEAR_BE,	16},
     96  1.1   marcus 	{AudioEslinear_le,	AUDIO_ENCODING_SLINEAR_LE,	16},
     97  1.2   marcus 	{AudioEulinear_be,	AUDIO_ENCODING_ULINEAR_BE,	16},
     98  1.2   marcus 	{AudioEulinear_le,	AUDIO_ENCODING_ULINEAR_LE,	16},
     99  1.1   marcus };
    100  1.1   marcus 
    101  1.6     kent #define AICA_NFORMATS	5
    102  1.6     kent static const struct audio_format aica_formats[AICA_NFORMATS] = {
    103  1.6     kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_ADPCM, 4, 4,
    104  1.6     kent 	 1, AUFMT_MONAURAL, 0, {1, 65536}},
    105  1.6     kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
    106  1.6     kent 	 1, AUFMT_MONAURAL, 0, {1, 65536}},
    107  1.6     kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
    108  1.6     kent 	 2, AUFMT_STEREO, 0, {1, 65536}},
    109  1.6     kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 8, 8,
    110  1.6     kent 	 1, AUFMT_MONAURAL, 0, {1, 65536}},
    111  1.6     kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 8, 8,
    112  1.6     kent 	 2, AUFMT_STEREO, 0, {1, 65536}},
    113  1.6     kent };
    114  1.6     kent 
    115  1.1   marcus int aica_match(struct device *, struct cfdata *, void *);
    116  1.1   marcus void aica_attach(struct device *, struct device *, void *);
    117  1.1   marcus int aica_print(void *, const char *);
    118  1.1   marcus 
    119  1.1   marcus CFATTACH_DECL(aica, sizeof(struct aica_softc), aica_match, aica_attach,
    120  1.1   marcus     NULL, NULL);
    121  1.1   marcus 
    122  1.6     kent const struct audio_device aica_device = {
    123  1.1   marcus 	"Dreamcast Sound",
    124  1.1   marcus 	"",
    125  1.1   marcus 	"aica"
    126  1.1   marcus };
    127  1.1   marcus 
    128  1.1   marcus __inline static void aica_g2fifo_wait(void);
    129  1.1   marcus void aica_enable(struct aica_softc *);
    130  1.1   marcus void aica_disable(struct aica_softc *);
    131  1.7     kent void aica_memwrite(struct aica_softc *, bus_size_t, uint32_t *, int);
    132  1.7     kent void aica_ch2p16write(struct aica_softc *, bus_size_t, uint16_t *, int);
    133  1.7     kent void aica_ch2p8write(struct aica_softc *, bus_size_t, uint8_t *, int);
    134  1.7     kent void aica_command(struct aica_softc *, uint32_t);
    135  1.7     kent void aica_sendparam(struct aica_softc *, uint32_t, int, int);
    136  1.1   marcus void aica_play(struct aica_softc *, int, int, int, int);
    137  1.1   marcus void aica_fillbuffer(struct aica_softc *);
    138  1.1   marcus 
    139  1.1   marcus /* intr */
    140  1.1   marcus int aica_intr(void *);
    141  1.1   marcus 
    142  1.1   marcus /* for audio */
    143  1.1   marcus int aica_open(void *, int);
    144  1.1   marcus void aica_close(void *);
    145  1.1   marcus int aica_query_encoding(void *, struct audio_encoding *);
    146  1.6     kent int aica_set_params(void *, int, int, audio_params_t *,
    147  1.6     kent     audio_params_t *, stream_filter_list_t *, stream_filter_list_t *);
    148  1.6     kent int aica_round_blocksize(void *, int, int, const audio_params_t *);
    149  1.1   marcus size_t aica_round_buffersize(void *, int, size_t);
    150  1.1   marcus int aica_trigger_output(void *, void *, void *, int, void (*)(void *), void *,
    151  1.6     kent     const audio_params_t *);
    152  1.1   marcus int aica_trigger_input(void *, void *, void *, int, void (*)(void *), void *,
    153  1.6     kent     const audio_params_t *);
    154  1.1   marcus int aica_halt_output(void *);
    155  1.1   marcus int aica_halt_input(void *);
    156  1.1   marcus int aica_getdev(void *, struct audio_device *);
    157  1.1   marcus int aica_set_port(void *, mixer_ctrl_t *);
    158  1.1   marcus int aica_get_port(void *, mixer_ctrl_t *);
    159  1.1   marcus int aica_query_devinfo(void *, mixer_devinfo_t *);
    160  1.1   marcus void aica_encode(int, int, int, int, u_char *, u_short **);
    161  1.1   marcus int aica_get_props(void *);
    162  1.1   marcus 
    163  1.5     yamt const struct audio_hw_if aica_hw_if = {
    164  1.1   marcus 	aica_open,
    165  1.1   marcus 	aica_close,
    166  1.1   marcus 	NULL,				/* aica_drain */
    167  1.1   marcus 	aica_query_encoding,
    168  1.1   marcus 	aica_set_params,
    169  1.1   marcus 	aica_round_blocksize,
    170  1.1   marcus 	NULL,				/* aica_commit_setting */
    171  1.1   marcus 	NULL,				/* aica_init_output */
    172  1.1   marcus 	NULL,				/* aica_init_input */
    173  1.1   marcus 	NULL,				/* aica_start_output */
    174  1.1   marcus 	NULL,				/* aica_start_input */
    175  1.1   marcus 	aica_halt_output,
    176  1.1   marcus 	aica_halt_input,
    177  1.1   marcus 	NULL,				/* aica_speaker_ctl */
    178  1.1   marcus 	aica_getdev,
    179  1.1   marcus 	NULL,				/* aica_setfd */
    180  1.1   marcus 	aica_set_port,
    181  1.1   marcus 	aica_get_port,
    182  1.1   marcus 	aica_query_devinfo,
    183  1.1   marcus 	NULL,				/* aica_allocm */
    184  1.1   marcus 	NULL,				/* aica_freem */
    185  1.1   marcus 
    186  1.1   marcus 	aica_round_buffersize,		/* aica_round_buffersize */
    187  1.1   marcus 
    188  1.1   marcus 	NULL,				/* aica_mappage */
    189  1.1   marcus 	aica_get_props,
    190  1.1   marcus 	aica_trigger_output,
    191  1.1   marcus 	aica_trigger_input,
    192  1.1   marcus 	NULL,				/* aica_dev_ioctl */
    193  1.1   marcus };
    194  1.1   marcus 
    195  1.1   marcus int
    196  1.1   marcus aica_match(struct device *parent, struct cfdata *cf, void *aux)
    197  1.1   marcus {
    198  1.1   marcus 	static int aica_matched = 0;
    199  1.1   marcus 
    200  1.1   marcus 	if (aica_matched)
    201  1.1   marcus 		return 0;
    202  1.1   marcus 
    203  1.1   marcus 	aica_matched = 1;
    204  1.1   marcus 	return 1;
    205  1.1   marcus }
    206  1.1   marcus 
    207  1.1   marcus void
    208  1.1   marcus aica_attach(struct device *parent, struct device *self, void *aux)
    209  1.1   marcus {
    210  1.7     kent 	struct aica_softc *sc;
    211  1.7     kent 	struct g2bus_attach_args *ga;
    212  1.1   marcus 	int i;
    213  1.1   marcus 
    214  1.7     kent 	sc = (struct aica_softc *)self;
    215  1.7     kent 	ga = aux;
    216  1.1   marcus 	sc->sc_memt = ga->ga_memt;
    217  1.1   marcus 
    218  1.1   marcus 	if (bus_space_map(sc->sc_memt, AICA_REG_ADDR, 0x3000, 0,
    219  1.1   marcus 	    &sc->sc_aica_regh) != 0) {
    220  1.1   marcus 		printf(": can't map AICA register space\n");
    221  1.1   marcus 		return;
    222  1.1   marcus 	}
    223  1.1   marcus 
    224  1.1   marcus 	if (bus_space_map(sc->sc_memt, AICA_RAM_START, AICA_RAM_SIZE, 0,
    225  1.1   marcus 	    &sc->sc_aica_memh) != 0) {
    226  1.1   marcus 		printf(": can't map AICA memory space\n");
    227  1.1   marcus 		return;
    228  1.1   marcus 	}
    229  1.1   marcus 
    230  1.1   marcus 	printf(": ARM7 Sound Processing Unit\n");
    231  1.1   marcus 
    232  1.1   marcus 	aica_disable(sc);
    233  1.1   marcus 
    234  1.1   marcus 	for (i = 0; i < AICA_NCHAN; i++)
    235  1.1   marcus 		bus_space_write_4(sc->sc_memt,sc->sc_aica_regh, i << 7,
    236  1.1   marcus 		    ((bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, i << 7)
    237  1.1   marcus 		    & ~0x4000) | 0x8000));
    238  1.1   marcus 
    239  1.1   marcus 	/* load microcode, and clear memory */
    240  1.1   marcus 	bus_space_set_region_4(sc->sc_memt, sc->sc_aica_memh,
    241  1.1   marcus 	    0, 0, AICA_RAM_SIZE);
    242  1.1   marcus 
    243  1.1   marcus 	aica_memwrite(sc, 0, aica_armcode, sizeof(aica_armcode));
    244  1.1   marcus 
    245  1.1   marcus 	aica_enable(sc);
    246  1.1   marcus 
    247  1.1   marcus 	printf("%s: interrupting at %s\n", sc->sc_dev.dv_xname,
    248  1.1   marcus 	    sysasic_intr_string(IPL_BIO));
    249  1.1   marcus 	sysasic_intr_establish(SYSASIC_EVENT_AICA, IPL_BIO, aica_intr, sc);
    250  1.1   marcus 
    251  1.1   marcus 	audio_attach_mi(&aica_hw_if, sc, &sc->sc_dev);
    252  1.1   marcus 
    253  1.1   marcus 	/* init parameters */
    254  1.1   marcus 	sc->sc_output_master = 255;
    255  1.1   marcus 	sc->sc_output_gain[AICA_VOLUME_LEFT]  = 255;
    256  1.1   marcus 	sc->sc_output_gain[AICA_VOLUME_RIGHT] = 255;
    257  1.1   marcus }
    258  1.1   marcus 
    259  1.1   marcus void
    260  1.1   marcus aica_enable(struct aica_softc *sc)
    261  1.1   marcus {
    262  1.1   marcus 
    263  1.1   marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x28a8, 24);
    264  1.1   marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00,
    265  1.1   marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00) & ~1);
    266  1.1   marcus }
    267  1.1   marcus 
    268  1.1   marcus void
    269  1.1   marcus aica_disable(struct aica_softc *sc)
    270  1.1   marcus {
    271  1.1   marcus 
    272  1.1   marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00,
    273  1.1   marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00) | 1);
    274  1.1   marcus }
    275  1.1   marcus 
    276  1.1   marcus inline static void
    277  1.8  tsutsui aica_g2fifo_wait(void)
    278  1.1   marcus {
    279  1.1   marcus 	int i;
    280  1.1   marcus 
    281  1.1   marcus 	i = AICA_TIMEOUT;
    282  1.1   marcus 	while (--i > 0)
    283  1.7     kent 		if ((*(volatile uint32_t *)0xa05f688c) & 0x11)
    284  1.1   marcus 			break;
    285  1.1   marcus }
    286  1.1   marcus 
    287  1.1   marcus void
    288  1.7     kent aica_memwrite(struct aica_softc *sc, bus_size_t offset, uint32_t *src, int len)
    289  1.1   marcus {
    290  1.1   marcus 	int n;
    291  1.1   marcus 
    292  1.1   marcus 	KASSERT((offset & 3) == 0);
    293  1.7     kent 	n = (len + 3) / 4;	/* uint32_t * n (aligned) */
    294  1.1   marcus 
    295  1.1   marcus 	aica_g2fifo_wait();
    296  1.1   marcus 	bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    297  1.1   marcus 	    offset, src, n);
    298  1.1   marcus }
    299  1.1   marcus 
    300  1.1   marcus void
    301  1.7     kent aica_ch2p16write(struct aica_softc *sc, bus_size_t offset, uint16_t *src,
    302  1.1   marcus     int len)
    303  1.1   marcus {
    304  1.1   marcus 	union {
    305  1.7     kent 		uint32_t w[8];
    306  1.7     kent 		uint16_t s[16];
    307  1.1   marcus 	} buf;
    308  1.7     kent 	uint16_t *p;
    309  1.1   marcus 	int i;
    310  1.1   marcus 
    311  1.1   marcus 	KASSERT((offset & 3) == 0);
    312  1.1   marcus 
    313  1.1   marcus 	while (len >= 32) {
    314  1.1   marcus 		p = buf.s;
    315  1.1   marcus 		*p++ = *src++; src++;
    316  1.1   marcus 		*p++ = *src++; src++;
    317  1.1   marcus 		*p++ = *src++; src++;
    318  1.1   marcus 		*p++ = *src++; src++;
    319  1.1   marcus 		*p++ = *src++; src++;
    320  1.1   marcus 		*p++ = *src++; src++;
    321  1.1   marcus 		*p++ = *src++; src++;
    322  1.1   marcus 		*p++ = *src++; src++;
    323  1.1   marcus 		*p++ = *src++; src++;
    324  1.1   marcus 		*p++ = *src++; src++;
    325  1.1   marcus 		*p++ = *src++; src++;
    326  1.1   marcus 		*p++ = *src++; src++;
    327  1.1   marcus 		*p++ = *src++; src++;
    328  1.1   marcus 		*p++ = *src++; src++;
    329  1.1   marcus 		*p++ = *src++; src++;
    330  1.1   marcus 		*p++ = *src++; src++;
    331  1.1   marcus 
    332  1.1   marcus 		aica_g2fifo_wait();
    333  1.1   marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    334  1.1   marcus 		    offset, buf.w , 32 / 4);
    335  1.1   marcus 
    336  1.7     kent 		offset += sizeof(uint16_t) * 16;
    337  1.1   marcus 		len -= 32;
    338  1.1   marcus 	}
    339  1.1   marcus 
    340  1.1   marcus 	if (len / 2 > 0) {
    341  1.1   marcus 		p = buf.s;
    342  1.1   marcus 		for (i = 0; i < len / 2; i++) {
    343  1.1   marcus 			*p++ = *src++; src++;
    344  1.1   marcus 		}
    345  1.1   marcus 
    346  1.1   marcus 		aica_g2fifo_wait();
    347  1.1   marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    348  1.1   marcus 		    offset, buf.w, len / 4);
    349  1.1   marcus 	}
    350  1.1   marcus }
    351  1.1   marcus 
    352  1.1   marcus void
    353  1.7     kent aica_ch2p8write(struct aica_softc *sc, bus_size_t offset, uint8_t *src,
    354  1.1   marcus     int len)
    355  1.1   marcus {
    356  1.7     kent 	uint32_t buf[8];
    357  1.7     kent 	uint8_t *p;
    358  1.1   marcus 	int i;
    359  1.1   marcus 
    360  1.1   marcus 	KASSERT((offset & 3) == 0);
    361  1.1   marcus 	while (len >= 32) {
    362  1.7     kent 		p = (uint8_t *)buf;
    363  1.7     kent 
    364  1.1   marcus 		*p++ = *src++; src++;
    365  1.1   marcus 		*p++ = *src++; src++;
    366  1.1   marcus 		*p++ = *src++; src++;
    367  1.1   marcus 		*p++ = *src++; src++;
    368  1.1   marcus 		*p++ = *src++; src++;
    369  1.1   marcus 		*p++ = *src++; src++;
    370  1.1   marcus 		*p++ = *src++; src++;
    371  1.1   marcus 		*p++ = *src++; src++;
    372  1.1   marcus 		*p++ = *src++; src++;
    373  1.1   marcus 		*p++ = *src++; src++;
    374  1.1   marcus 		*p++ = *src++; src++;
    375  1.1   marcus 		*p++ = *src++; src++;
    376  1.1   marcus 		*p++ = *src++; src++;
    377  1.1   marcus 		*p++ = *src++; src++;
    378  1.1   marcus 		*p++ = *src++; src++;
    379  1.1   marcus 		*p++ = *src++; src++;
    380  1.1   marcus 		*p++ = *src++; src++;
    381  1.1   marcus 		*p++ = *src++; src++;
    382  1.1   marcus 		*p++ = *src++; src++;
    383  1.1   marcus 		*p++ = *src++; src++;
    384  1.1   marcus 		*p++ = *src++; src++;
    385  1.1   marcus 		*p++ = *src++; src++;
    386  1.1   marcus 		*p++ = *src++; src++;
    387  1.1   marcus 		*p++ = *src++; src++;
    388  1.1   marcus 		*p++ = *src++; src++;
    389  1.1   marcus 		*p++ = *src++; src++;
    390  1.1   marcus 		*p++ = *src++; src++;
    391  1.1   marcus 		*p++ = *src++; src++;
    392  1.1   marcus 		*p++ = *src++; src++;
    393  1.1   marcus 		*p++ = *src++; src++;
    394  1.1   marcus 		*p++ = *src++; src++;
    395  1.1   marcus 		*p++ = *src++; src++;
    396  1.1   marcus 
    397  1.1   marcus 		aica_g2fifo_wait();
    398  1.1   marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    399  1.1   marcus 		    offset, buf, 32 / 4);
    400  1.1   marcus 
    401  1.1   marcus 		offset += 32;
    402  1.1   marcus 		len -= 32;
    403  1.1   marcus 	}
    404  1.1   marcus 
    405  1.1   marcus 	if (len) {
    406  1.7     kent 		p = (uint8_t *)buf;
    407  1.1   marcus 		for (i = 0; i < len; i++)
    408  1.1   marcus 			*p++ = *src++; src++;
    409  1.1   marcus 
    410  1.1   marcus 		aica_g2fifo_wait();
    411  1.1   marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    412  1.1   marcus 		    offset, buf, len / 4);
    413  1.1   marcus 	}
    414  1.1   marcus }
    415  1.1   marcus 
    416  1.1   marcus int
    417  1.1   marcus aica_open(void *addr, int flags)
    418  1.1   marcus {
    419  1.7     kent 	struct aica_softc *sc;
    420  1.1   marcus 
    421  1.7     kent 	sc = addr;
    422  1.1   marcus 	if (sc->sc_open)
    423  1.1   marcus 		return EBUSY;
    424  1.1   marcus 
    425  1.1   marcus 	sc->sc_intr = NULL;
    426  1.1   marcus 	sc->sc_open = 1;
    427  1.1   marcus 
    428  1.1   marcus 	return 0;
    429  1.1   marcus }
    430  1.1   marcus 
    431  1.1   marcus void
    432  1.1   marcus aica_close(void *addr)
    433  1.1   marcus {
    434  1.7     kent 	struct aica_softc *sc;
    435  1.1   marcus 
    436  1.7     kent 	sc = addr;
    437  1.1   marcus 	sc->sc_open = 0;
    438  1.1   marcus 	sc->sc_intr = NULL;
    439  1.1   marcus }
    440  1.1   marcus 
    441  1.1   marcus int
    442  1.1   marcus aica_query_encoding(void *addr, struct audio_encoding *fp)
    443  1.1   marcus {
    444  1.1   marcus 	if (fp->index >= sizeof(aica_encodings) / sizeof(aica_encodings[0]))
    445  1.1   marcus 		return EINVAL;
    446  1.1   marcus 
    447  1.1   marcus 	strcpy(fp->name, aica_encodings[fp->index].name);
    448  1.1   marcus 	fp->encoding = aica_encodings[fp->index].encoding;
    449  1.1   marcus 	fp->precision = aica_encodings[fp->index].precision;
    450  1.1   marcus 	fp->flags = 0;
    451  1.1   marcus 
    452  1.1   marcus 	return 0;
    453  1.1   marcus }
    454  1.1   marcus 
    455  1.1   marcus int
    456  1.1   marcus aica_set_params(void *addr, int setmode, int usemode,
    457  1.6     kent     audio_params_t *play, audio_params_t *rec,
    458  1.6     kent     stream_filter_list_t *pfil, stream_filter_list_t *rfil)
    459  1.1   marcus {
    460  1.7     kent 	struct aica_softc *sc;
    461  1.6     kent 	const audio_params_t *hw;
    462  1.6     kent 	int i;
    463  1.1   marcus 
    464  1.6     kent 	i = auconv_set_converter(aica_formats, AICA_NFORMATS,
    465  1.6     kent 				 AUMODE_PLAY, play, FALSE, pfil);
    466  1.6     kent 	if (i < 0)
    467  1.1   marcus 		return EINVAL;
    468  1.6     kent 	hw = pfil->req_size > 0 ? &pfil->filters[0].param : play;
    469  1.7     kent 	sc = addr;
    470  1.6     kent 	sc->sc_precision = hw->precision;
    471  1.6     kent 	sc->sc_channels = hw->channels;
    472  1.6     kent 	sc->sc_rate = hw->sample_rate;
    473  1.6     kent 	sc->sc_encodings = hw->encoding;
    474  1.1   marcus 	return 0;
    475  1.1   marcus }
    476  1.1   marcus 
    477  1.1   marcus int
    478  1.6     kent aica_round_blocksize(void *addr, int blk, int mode, const audio_params_t *param)
    479  1.1   marcus {
    480  1.7     kent 	struct aica_softc *sc;
    481  1.1   marcus 
    482  1.7     kent 	sc = addr;
    483  1.1   marcus 	switch (sc->sc_precision) {
    484  1.1   marcus 	case 4:
    485  1.1   marcus 		if (sc->sc_channels == 1)
    486  1.1   marcus 			return AICA_DMABUF_SIZE / 4;
    487  1.1   marcus 		else
    488  1.1   marcus 			return AICA_DMABUF_SIZE / 2;
    489  1.1   marcus 		break;
    490  1.1   marcus 	case 8:
    491  1.1   marcus 		if (sc->sc_channels == 1)
    492  1.1   marcus 			return AICA_DMABUF_SIZE / 2;
    493  1.1   marcus 		else
    494  1.1   marcus 			return AICA_DMABUF_SIZE;
    495  1.1   marcus 		break;
    496  1.1   marcus 	case 16:
    497  1.1   marcus 		if (sc->sc_channels == 1)
    498  1.1   marcus 			return AICA_DMABUF_SIZE;
    499  1.1   marcus 		else
    500  1.1   marcus 			return AICA_DMABUF_SIZE * 2;
    501  1.1   marcus 		break;
    502  1.1   marcus 	default:
    503  1.1   marcus 		break;
    504  1.1   marcus 	}
    505  1.1   marcus 
    506  1.1   marcus 	return AICA_DMABUF_SIZE / 4;
    507  1.1   marcus }
    508  1.1   marcus 
    509  1.1   marcus size_t
    510  1.1   marcus aica_round_buffersize(void *addr, int dir, size_t bufsize)
    511  1.1   marcus {
    512  1.1   marcus 
    513  1.1   marcus 	if (dir == AUMODE_PLAY)
    514  1.1   marcus 		return 65536;
    515  1.1   marcus 
    516  1.1   marcus 	return 512;	/* XXX: AUMINBUF */
    517  1.1   marcus }
    518  1.1   marcus 
    519  1.1   marcus void
    520  1.7     kent aica_command(struct aica_softc *sc, uint32_t command)
    521  1.1   marcus {
    522  1.1   marcus 
    523  1.1   marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_memh,
    524  1.1   marcus 	    AICA_ARM_CMD_COMMAND, command);
    525  1.1   marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh, AICA_ARM_CMD_SERIAL,
    526  1.1   marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_memh,
    527  1.1   marcus 	    AICA_ARM_CMD_SERIAL) + 1);
    528  1.1   marcus }
    529  1.1   marcus 
    530  1.1   marcus void
    531  1.7     kent aica_sendparam(struct aica_softc *sc, uint32_t command,
    532  1.1   marcus     int32_t lparam, int32_t rparam)
    533  1.1   marcus {
    534  1.1   marcus 
    535  1.1   marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    536  1.1   marcus 	    AICA_ARM_CMD_LPARAM, lparam);
    537  1.1   marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    538  1.1   marcus 	    AICA_ARM_CMD_RPARAM, rparam);
    539  1.1   marcus 
    540  1.1   marcus 	aica_command(sc, command);
    541  1.1   marcus }
    542  1.1   marcus 
    543  1.1   marcus void
    544  1.1   marcus aica_play(struct aica_softc *sc, int blksize, int channel, int rate, int prec)
    545  1.1   marcus {
    546  1.1   marcus 
    547  1.1   marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    548  1.1   marcus 	    AICA_ARM_CMD_BLOCKSIZE, blksize);
    549  1.1   marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    550  1.1   marcus 	    AICA_ARM_CMD_CHANNEL, channel);
    551  1.1   marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    552  1.1   marcus 	    AICA_ARM_CMD_RATE, rate);
    553  1.1   marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    554  1.1   marcus 	    AICA_ARM_CMD_PRECISION, prec);
    555  1.1   marcus 
    556  1.1   marcus 	aica_command(sc, AICA_COMMAND_PLAY);
    557  1.1   marcus }
    558  1.1   marcus 
    559  1.1   marcus void
    560  1.1   marcus aica_fillbuffer(struct aica_softc *sc)
    561  1.1   marcus {
    562  1.1   marcus 
    563  1.1   marcus 	if (sc->sc_channels == 2) {
    564  1.1   marcus 		if (sc->sc_precision == 16) {
    565  1.1   marcus 			aica_ch2p16write(sc,
    566  1.1   marcus 			    AICA_DMABUF_LEFT + sc->sc_nextfill,
    567  1.7     kent 			    (uint16_t *)sc->sc_buffer + 0, sc->sc_blksize / 2);
    568  1.1   marcus 			aica_ch2p16write(sc,
    569  1.1   marcus 			    AICA_DMABUF_RIGHT + sc->sc_nextfill,
    570  1.7     kent 			    (uint16_t *)sc->sc_buffer + 1, sc->sc_blksize / 2);
    571  1.1   marcus 		} else if (sc->sc_precision == 8) {
    572  1.1   marcus 			aica_ch2p8write(sc, AICA_DMABUF_LEFT + sc->sc_nextfill,
    573  1.7     kent 			    (uint8_t *)sc->sc_buffer + 0, sc->sc_blksize / 2);
    574  1.1   marcus 			aica_ch2p8write(sc, AICA_DMABUF_RIGHT + sc->sc_nextfill,
    575  1.7     kent 			    (uint8_t *)sc->sc_buffer + 1, sc->sc_blksize / 2);
    576  1.1   marcus 		}
    577  1.1   marcus 	} else {
    578  1.1   marcus 		aica_memwrite(sc, AICA_DMABUF_MONO + sc->sc_nextfill,
    579  1.1   marcus 		    sc->sc_buffer, sc->sc_blksize);
    580  1.1   marcus 	}
    581  1.1   marcus 
    582  1.1   marcus 	(int8_t *)sc->sc_buffer += sc->sc_blksize;
    583  1.1   marcus 	if (sc->sc_buffer >= sc->sc_buffer_end)
    584  1.1   marcus 		sc->sc_buffer = sc->sc_buffer_start;
    585  1.1   marcus 
    586  1.1   marcus 	sc->sc_nextfill ^= sc->sc_blksize / sc->sc_channels;
    587  1.1   marcus }
    588  1.1   marcus 
    589  1.1   marcus int
    590  1.1   marcus aica_intr(void *arg)
    591  1.1   marcus {
    592  1.7     kent 	struct aica_softc *sc;
    593  1.1   marcus 
    594  1.7     kent 	sc = arg;
    595  1.1   marcus 	aica_fillbuffer(sc);
    596  1.1   marcus 
    597  1.1   marcus 	/* call audio interrupt handler (audio_pint()) */
    598  1.1   marcus 	if (sc->sc_open && sc->sc_intr != NULL) {
    599  1.1   marcus 		(*(sc->sc_intr))(sc->sc_intr_arg);
    600  1.1   marcus 	}
    601  1.1   marcus 
    602  1.1   marcus 	/* clear SPU interrupt */
    603  1.1   marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x28bc, 0x20);
    604  1.1   marcus 	return 1;
    605  1.1   marcus }
    606  1.1   marcus 
    607  1.1   marcus int
    608  1.1   marcus aica_trigger_output(void *addr, void *start, void *end, int blksize,
    609  1.6     kent     void (*intr)(void *), void *arg, const audio_params_t *param)
    610  1.1   marcus {
    611  1.7     kent 	struct aica_softc *sc;
    612  1.1   marcus 
    613  1.7     kent 	sc = addr;
    614  1.1   marcus 	aica_command(sc, AICA_COMMAND_INIT);
    615  1.1   marcus 	tsleep(aica_trigger_output, PWAIT, "aicawait", hz / 20);
    616  1.1   marcus 
    617  1.1   marcus 	sc->sc_buffer_start = sc->sc_buffer = start;
    618  1.1   marcus 	sc->sc_buffer_end = end;
    619  1.1   marcus 	sc->sc_blksize = blksize;
    620  1.1   marcus 	sc->sc_nextfill = 0;
    621  1.1   marcus 
    622  1.1   marcus 	sc->sc_intr = intr;
    623  1.1   marcus 	sc->sc_intr_arg = arg;
    624  1.1   marcus 
    625  1.1   marcus 	/* fill buffers in advance */
    626  1.1   marcus 	aica_intr(sc);
    627  1.1   marcus 	aica_intr(sc);
    628  1.1   marcus 
    629  1.1   marcus 	/* ...and start playing */
    630  1.1   marcus 	aica_play(sc, blksize / sc->sc_channels, sc->sc_channels, sc->sc_rate,
    631  1.1   marcus 	    sc->sc_precision);
    632  1.1   marcus 
    633  1.1   marcus 	return 0;
    634  1.1   marcus }
    635  1.1   marcus 
    636  1.1   marcus int
    637  1.1   marcus aica_trigger_input(void *addr, void *start, void *end, int blksize,
    638  1.6     kent     void (*intr)(void *), void *arg, const audio_params_t *param)
    639  1.1   marcus {
    640  1.1   marcus 
    641  1.1   marcus 	return ENODEV;
    642  1.1   marcus }
    643  1.1   marcus 
    644  1.1   marcus int
    645  1.1   marcus aica_halt_output(void *addr)
    646  1.1   marcus {
    647  1.7     kent 	struct aica_softc *sc;
    648  1.1   marcus 
    649  1.7     kent 	sc = addr;
    650  1.1   marcus 	aica_command(sc, AICA_COMMAND_STOP);
    651  1.1   marcus 	return 0;
    652  1.1   marcus }
    653  1.1   marcus 
    654  1.1   marcus int
    655  1.1   marcus aica_halt_input(void *addr)
    656  1.1   marcus {
    657  1.1   marcus 
    658  1.1   marcus 	return ENODEV;
    659  1.1   marcus }
    660  1.1   marcus 
    661  1.1   marcus int
    662  1.1   marcus aica_getdev(void *addr, struct audio_device *ret)
    663  1.1   marcus {
    664  1.1   marcus 
    665  1.1   marcus 	*ret = aica_device;
    666  1.1   marcus 	return 0;
    667  1.1   marcus }
    668  1.1   marcus 
    669  1.1   marcus int
    670  1.1   marcus aica_set_port(void *addr, mixer_ctrl_t *mc)
    671  1.1   marcus {
    672  1.7     kent 	struct aica_softc *sc;
    673  1.1   marcus 
    674  1.7     kent 	sc = addr;
    675  1.1   marcus 	switch (mc->dev) {
    676  1.1   marcus 	case AICA_MASTER_VOL:
    677  1.1   marcus 		sc->sc_output_master =
    678  1.1   marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] & 0xff;
    679  1.1   marcus 		aica_sendparam(sc, AICA_COMMAND_MVOL,
    680  1.1   marcus 		    sc->sc_output_master, sc->sc_output_master);
    681  1.1   marcus 		break;
    682  1.1   marcus 	case AICA_OUTPUT_GAIN:
    683  1.1   marcus 		sc->sc_output_gain[AICA_VOLUME_LEFT] =
    684  1.1   marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT]  & 0xff;
    685  1.1   marcus 		sc->sc_output_gain[AICA_VOLUME_RIGHT] =
    686  1.1   marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] & 0xff;
    687  1.1   marcus 		aica_sendparam(sc, AICA_COMMAND_VOL,
    688  1.1   marcus 		    sc->sc_output_gain[AICA_VOLUME_LEFT],
    689  1.1   marcus 		    sc->sc_output_gain[AICA_VOLUME_RIGHT]);
    690  1.1   marcus 		break;
    691  1.1   marcus 	default:
    692  1.1   marcus 		return EINVAL;
    693  1.1   marcus 	}
    694  1.1   marcus 
    695  1.1   marcus 	return 0;
    696  1.1   marcus }
    697  1.1   marcus 
    698  1.1   marcus int
    699  1.1   marcus aica_get_port(void *addr, mixer_ctrl_t *mc)
    700  1.1   marcus {
    701  1.7     kent 	struct aica_softc *sc;
    702  1.1   marcus 
    703  1.7     kent 	sc = addr;
    704  1.1   marcus 	switch (mc->dev) {
    705  1.1   marcus 	case AICA_MASTER_VOL:
    706  1.1   marcus 		if (mc->un.value.num_channels != 1)
    707  1.1   marcus 			return EINVAL;
    708  1.1   marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] =
    709  1.1   marcus 		    L16TO256(L256TO16(sc->sc_output_master));
    710  1.1   marcus 		break;
    711  1.1   marcus 	case AICA_OUTPUT_GAIN:
    712  1.1   marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT] =
    713  1.1   marcus 		    sc->sc_output_gain[AICA_VOLUME_LEFT];
    714  1.1   marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] =
    715  1.1   marcus 		    sc->sc_output_gain[AICA_VOLUME_RIGHT];
    716  1.1   marcus 		break;
    717  1.1   marcus 	default:
    718  1.1   marcus 		return EINVAL;
    719  1.1   marcus 	}
    720  1.1   marcus 	return 0;
    721  1.1   marcus }
    722  1.1   marcus 
    723  1.1   marcus int
    724  1.1   marcus aica_query_devinfo(void *addr, mixer_devinfo_t *md)
    725  1.1   marcus {
    726  1.1   marcus 
    727  1.1   marcus 	switch (md->index) {
    728  1.1   marcus 	case AICA_MASTER_VOL:
    729  1.1   marcus 		md->type = AUDIO_MIXER_VALUE;
    730  1.1   marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    731  1.1   marcus 		md->prev = md->next = AUDIO_MIXER_LAST;
    732  1.1   marcus 		strcpy(md->label.name, AudioNmaster);
    733  1.1   marcus 		md->un.v.num_channels = 1;
    734  1.1   marcus 		strcpy(md->un.v.units.name, AudioNvolume);
    735  1.1   marcus 		return 0;
    736  1.1   marcus 	case AICA_OUTPUT_GAIN:
    737  1.1   marcus 		md->type = AUDIO_MIXER_VALUE;
    738  1.1   marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    739  1.1   marcus 		md->prev = md->next = AUDIO_MIXER_LAST;
    740  1.1   marcus 		strcpy(md->label.name, AudioNoutput);
    741  1.1   marcus 		md->un.v.num_channels = 2;
    742  1.1   marcus 		strcpy(md->label.name, AudioNvolume);
    743  1.1   marcus 		return 0;
    744  1.1   marcus 	case AICA_OUTPUT_CLASS:
    745  1.1   marcus 		md->type = AUDIO_MIXER_CLASS;
    746  1.1   marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    747  1.1   marcus 		md->next = md->prev = AUDIO_MIXER_LAST;
    748  1.1   marcus 		strcpy(md->label.name, AudioCoutputs);
    749  1.1   marcus 		return 0;
    750  1.1   marcus 	}
    751  1.1   marcus 
    752  1.1   marcus 	return ENXIO;
    753  1.1   marcus }
    754  1.1   marcus 
    755  1.1   marcus int
    756  1.1   marcus aica_get_props(void *addr)
    757  1.1   marcus {
    758  1.1   marcus 
    759  1.1   marcus 	return 0;
    760  1.1   marcus }
    761