Home | History | Annotate | Line # | Download | only in g2
aica.c revision 1.6
      1  1.6    kent /*	$NetBSD: aica.c,v 1.6 2005/01/10 22:01:36 kent 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.6    kent __KERNEL_RCSID(0, "$NetBSD: aica.c,v 1.6 2005/01/10 22:01:36 kent 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.1  marcus void aica_memwrite(struct aica_softc *, bus_size_t, u_int32_t *, int);
    132  1.1  marcus void aica_ch2p16write(struct aica_softc *, bus_size_t, u_int16_t *, int);
    133  1.1  marcus void aica_ch2p8write(struct aica_softc *, bus_size_t, u_int8_t *, int);
    134  1.1  marcus void aica_command(struct aica_softc *, u_int32_t);
    135  1.1  marcus void aica_sendparam(struct aica_softc *, u_int32_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.1  marcus 	struct aica_softc *sc = (struct aica_softc *)self;
    211  1.1  marcus 	struct g2bus_attach_args *ga = aux;
    212  1.1  marcus 	int i;
    213  1.1  marcus 
    214  1.1  marcus 	sc->sc_memt = ga->ga_memt;
    215  1.1  marcus 
    216  1.1  marcus 	if (bus_space_map(sc->sc_memt, AICA_REG_ADDR, 0x3000, 0,
    217  1.1  marcus 	    &sc->sc_aica_regh) != 0) {
    218  1.1  marcus 		printf(": can't map AICA register space\n");
    219  1.1  marcus 		return;
    220  1.1  marcus 	}
    221  1.1  marcus 
    222  1.1  marcus 	if (bus_space_map(sc->sc_memt, AICA_RAM_START, AICA_RAM_SIZE, 0,
    223  1.1  marcus 	    &sc->sc_aica_memh) != 0) {
    224  1.1  marcus 		printf(": can't map AICA memory space\n");
    225  1.1  marcus 		return;
    226  1.1  marcus 	}
    227  1.1  marcus 
    228  1.1  marcus 	printf(": ARM7 Sound Processing Unit\n");
    229  1.1  marcus 
    230  1.1  marcus 	aica_disable(sc);
    231  1.1  marcus 
    232  1.1  marcus 	for (i = 0; i < AICA_NCHAN; i++)
    233  1.1  marcus 		bus_space_write_4(sc->sc_memt,sc->sc_aica_regh, i << 7,
    234  1.1  marcus 		    ((bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, i << 7)
    235  1.1  marcus 		    & ~0x4000) | 0x8000));
    236  1.1  marcus 
    237  1.1  marcus 	/* load microcode, and clear memory */
    238  1.1  marcus 	bus_space_set_region_4(sc->sc_memt, sc->sc_aica_memh,
    239  1.1  marcus 	    0, 0, AICA_RAM_SIZE);
    240  1.1  marcus 
    241  1.1  marcus 	aica_memwrite(sc, 0, aica_armcode, sizeof(aica_armcode));
    242  1.1  marcus 
    243  1.1  marcus 	aica_enable(sc);
    244  1.1  marcus 
    245  1.1  marcus 	printf("%s: interrupting at %s\n", sc->sc_dev.dv_xname,
    246  1.1  marcus 	    sysasic_intr_string(IPL_BIO));
    247  1.1  marcus 	sysasic_intr_establish(SYSASIC_EVENT_AICA, IPL_BIO, aica_intr, sc);
    248  1.1  marcus 
    249  1.1  marcus 	audio_attach_mi(&aica_hw_if, sc, &sc->sc_dev);
    250  1.1  marcus 
    251  1.1  marcus 	/* init parameters */
    252  1.1  marcus 	sc->sc_output_master = 255;
    253  1.1  marcus 	sc->sc_output_gain[AICA_VOLUME_LEFT]  = 255;
    254  1.1  marcus 	sc->sc_output_gain[AICA_VOLUME_RIGHT] = 255;
    255  1.1  marcus }
    256  1.1  marcus 
    257  1.1  marcus void
    258  1.1  marcus aica_enable(struct aica_softc *sc)
    259  1.1  marcus {
    260  1.1  marcus 
    261  1.1  marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x28a8, 24);
    262  1.1  marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00,
    263  1.1  marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00) & ~1);
    264  1.1  marcus }
    265  1.1  marcus 
    266  1.1  marcus void
    267  1.1  marcus aica_disable(struct aica_softc *sc)
    268  1.1  marcus {
    269  1.1  marcus 
    270  1.1  marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00,
    271  1.1  marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00) | 1);
    272  1.1  marcus }
    273  1.1  marcus 
    274  1.1  marcus inline static void
    275  1.1  marcus aica_g2fifo_wait()
    276  1.1  marcus {
    277  1.1  marcus 	int i;
    278  1.1  marcus 
    279  1.1  marcus 	i = AICA_TIMEOUT;
    280  1.1  marcus 	while (--i > 0)
    281  1.1  marcus 		if ((*(volatile u_int32_t *)0xa05f688c) & 0x11)
    282  1.1  marcus 			break;
    283  1.1  marcus }
    284  1.1  marcus 
    285  1.1  marcus void
    286  1.1  marcus aica_memwrite(struct aica_softc *sc, bus_size_t offset, u_int32_t *src, int len)
    287  1.1  marcus {
    288  1.1  marcus 	int n;
    289  1.1  marcus 
    290  1.1  marcus 	KASSERT((offset & 3) == 0);
    291  1.1  marcus 	n = (len + 3) / 4;	/* u_int32_t * n (aligned) */
    292  1.1  marcus 
    293  1.1  marcus 	aica_g2fifo_wait();
    294  1.1  marcus 	bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    295  1.1  marcus 	    offset, src, n);
    296  1.1  marcus }
    297  1.1  marcus 
    298  1.1  marcus void
    299  1.1  marcus aica_ch2p16write(struct aica_softc *sc, bus_size_t offset, u_int16_t *src,
    300  1.1  marcus     int len)
    301  1.1  marcus {
    302  1.1  marcus 	union {
    303  1.1  marcus 		u_int32_t w[8];
    304  1.1  marcus 		u_int16_t s[16];
    305  1.1  marcus 	} buf;
    306  1.1  marcus 	u_int16_t *p;
    307  1.1  marcus 	int i;
    308  1.1  marcus 
    309  1.1  marcus 	KASSERT((offset & 3) == 0);
    310  1.1  marcus 
    311  1.1  marcus 	while (len >= 32) {
    312  1.1  marcus 		p = buf.s;
    313  1.1  marcus 		*p++ = *src++; src++;
    314  1.1  marcus 		*p++ = *src++; src++;
    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 
    330  1.1  marcus 		aica_g2fifo_wait();
    331  1.1  marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    332  1.1  marcus 		    offset, buf.w , 32 / 4);
    333  1.1  marcus 
    334  1.1  marcus 		offset += sizeof(u_int16_t) * 16;
    335  1.1  marcus 		len -= 32;
    336  1.1  marcus 	}
    337  1.1  marcus 
    338  1.1  marcus 	if (len / 2 > 0) {
    339  1.1  marcus 		p = buf.s;
    340  1.1  marcus 		for (i = 0; i < len / 2; i++) {
    341  1.1  marcus 			*p++ = *src++; src++;
    342  1.1  marcus 		}
    343  1.1  marcus 
    344  1.1  marcus 		aica_g2fifo_wait();
    345  1.1  marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    346  1.1  marcus 		    offset, buf.w, len / 4);
    347  1.1  marcus 	}
    348  1.1  marcus }
    349  1.1  marcus 
    350  1.1  marcus void
    351  1.1  marcus aica_ch2p8write(struct aica_softc *sc, bus_size_t offset, u_int8_t *src,
    352  1.1  marcus     int len)
    353  1.1  marcus {
    354  1.1  marcus 	u_int32_t buf[8];
    355  1.1  marcus 	u_int8_t *p;
    356  1.1  marcus 	int i;
    357  1.1  marcus 
    358  1.1  marcus 	KASSERT((offset & 3) == 0);
    359  1.1  marcus 	while (len >= 32) {
    360  1.1  marcus 		p = (u_int8_t *)buf;
    361  1.1  marcus 
    362  1.1  marcus 		*p++ = *src++; src++;
    363  1.1  marcus 		*p++ = *src++; src++;
    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 
    395  1.1  marcus 		aica_g2fifo_wait();
    396  1.1  marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    397  1.1  marcus 		    offset, buf, 32 / 4);
    398  1.1  marcus 
    399  1.1  marcus 		offset += 32;
    400  1.1  marcus 		len -= 32;
    401  1.1  marcus 	}
    402  1.1  marcus 
    403  1.1  marcus 	if (len) {
    404  1.1  marcus 		p = (u_int8_t *)buf;
    405  1.1  marcus 		for (i = 0; i < len; i++)
    406  1.1  marcus 			*p++ = *src++; src++;
    407  1.1  marcus 
    408  1.1  marcus 		aica_g2fifo_wait();
    409  1.1  marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    410  1.1  marcus 		    offset, buf, len / 4);
    411  1.1  marcus 	}
    412  1.1  marcus }
    413  1.1  marcus 
    414  1.1  marcus int
    415  1.1  marcus aica_open(void *addr, int flags)
    416  1.1  marcus {
    417  1.1  marcus 	struct aica_softc *sc = addr;
    418  1.1  marcus 
    419  1.1  marcus 	if (sc->sc_open)
    420  1.1  marcus 		return EBUSY;
    421  1.1  marcus 
    422  1.1  marcus 	sc->sc_intr = NULL;
    423  1.1  marcus 	sc->sc_open = 1;
    424  1.1  marcus 
    425  1.1  marcus 	return 0;
    426  1.1  marcus }
    427  1.1  marcus 
    428  1.1  marcus void
    429  1.1  marcus aica_close(void *addr)
    430  1.1  marcus {
    431  1.1  marcus 	struct aica_softc *sc = addr;
    432  1.1  marcus 
    433  1.1  marcus 	sc->sc_open = 0;
    434  1.1  marcus 	sc->sc_intr = NULL;
    435  1.1  marcus }
    436  1.1  marcus 
    437  1.1  marcus int
    438  1.1  marcus aica_query_encoding(void *addr, struct audio_encoding *fp)
    439  1.1  marcus {
    440  1.1  marcus 	if (fp->index >= sizeof(aica_encodings) / sizeof(aica_encodings[0]))
    441  1.1  marcus 		return EINVAL;
    442  1.1  marcus 
    443  1.1  marcus 	strcpy(fp->name, aica_encodings[fp->index].name);
    444  1.1  marcus 	fp->encoding = aica_encodings[fp->index].encoding;
    445  1.1  marcus 	fp->precision = aica_encodings[fp->index].precision;
    446  1.1  marcus 	fp->flags = 0;
    447  1.1  marcus 
    448  1.1  marcus 	return 0;
    449  1.1  marcus }
    450  1.1  marcus 
    451  1.1  marcus int
    452  1.1  marcus aica_set_params(void *addr, int setmode, int usemode,
    453  1.6    kent     audio_params_t *play, audio_params_t *rec,
    454  1.6    kent     stream_filter_list_t *pfil, stream_filter_list_t *rfil)
    455  1.1  marcus {
    456  1.1  marcus 	struct aica_softc *sc = addr;
    457  1.6    kent 	const audio_params_t *hw;
    458  1.6    kent 	int i;
    459  1.1  marcus 
    460  1.6    kent 	i = auconv_set_converter(aica_formats, AICA_NFORMATS,
    461  1.6    kent 				 AUMODE_PLAY, play, FALSE, pfil);
    462  1.6    kent 	if (i < 0)
    463  1.1  marcus 		return EINVAL;
    464  1.6    kent 	hw = pfil->req_size > 0 ? &pfil->filters[0].param : play;
    465  1.6    kent 	sc->sc_precision = hw->precision;
    466  1.6    kent 	sc->sc_channels = hw->channels;
    467  1.6    kent 	sc->sc_rate = hw->sample_rate;
    468  1.6    kent 	sc->sc_encodings = hw->encoding;
    469  1.1  marcus 	return 0;
    470  1.1  marcus }
    471  1.1  marcus 
    472  1.1  marcus int
    473  1.6    kent aica_round_blocksize(void *addr, int blk, int mode, const audio_params_t *param)
    474  1.1  marcus {
    475  1.1  marcus 	struct aica_softc *sc = addr;
    476  1.1  marcus 
    477  1.1  marcus 	switch (sc->sc_precision) {
    478  1.1  marcus 	case 4:
    479  1.1  marcus 		if (sc->sc_channels == 1)
    480  1.1  marcus 			return AICA_DMABUF_SIZE / 4;
    481  1.1  marcus 		else
    482  1.1  marcus 			return AICA_DMABUF_SIZE / 2;
    483  1.1  marcus 		break;
    484  1.1  marcus 	case 8:
    485  1.1  marcus 		if (sc->sc_channels == 1)
    486  1.1  marcus 			return AICA_DMABUF_SIZE / 2;
    487  1.1  marcus 		else
    488  1.1  marcus 			return AICA_DMABUF_SIZE;
    489  1.1  marcus 		break;
    490  1.1  marcus 	case 16:
    491  1.1  marcus 		if (sc->sc_channels == 1)
    492  1.1  marcus 			return AICA_DMABUF_SIZE;
    493  1.1  marcus 		else
    494  1.1  marcus 			return AICA_DMABUF_SIZE * 2;
    495  1.1  marcus 		break;
    496  1.1  marcus 	default:
    497  1.1  marcus 		break;
    498  1.1  marcus 	}
    499  1.1  marcus 
    500  1.1  marcus 	return AICA_DMABUF_SIZE / 4;
    501  1.1  marcus }
    502  1.1  marcus 
    503  1.1  marcus size_t
    504  1.1  marcus aica_round_buffersize(void *addr, int dir, size_t bufsize)
    505  1.1  marcus {
    506  1.1  marcus 
    507  1.1  marcus 	if (dir == AUMODE_PLAY)
    508  1.1  marcus 		return 65536;
    509  1.1  marcus 
    510  1.1  marcus 	return 512;	/* XXX: AUMINBUF */
    511  1.1  marcus }
    512  1.1  marcus 
    513  1.1  marcus void
    514  1.1  marcus aica_command(struct aica_softc *sc, u_int32_t command)
    515  1.1  marcus {
    516  1.1  marcus 
    517  1.1  marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_memh,
    518  1.1  marcus 	    AICA_ARM_CMD_COMMAND, command);
    519  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh, AICA_ARM_CMD_SERIAL,
    520  1.1  marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_memh,
    521  1.1  marcus 	    AICA_ARM_CMD_SERIAL) + 1);
    522  1.1  marcus }
    523  1.1  marcus 
    524  1.1  marcus void
    525  1.1  marcus aica_sendparam(struct aica_softc *sc, u_int32_t command,
    526  1.1  marcus     int32_t lparam, int32_t rparam)
    527  1.1  marcus {
    528  1.1  marcus 
    529  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    530  1.1  marcus 	    AICA_ARM_CMD_LPARAM, lparam);
    531  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    532  1.1  marcus 	    AICA_ARM_CMD_RPARAM, rparam);
    533  1.1  marcus 
    534  1.1  marcus 	aica_command(sc, command);
    535  1.1  marcus }
    536  1.1  marcus 
    537  1.1  marcus void
    538  1.1  marcus aica_play(struct aica_softc *sc, int blksize, int channel, int rate, int prec)
    539  1.1  marcus {
    540  1.1  marcus 
    541  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    542  1.1  marcus 	    AICA_ARM_CMD_BLOCKSIZE, blksize);
    543  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    544  1.1  marcus 	    AICA_ARM_CMD_CHANNEL, channel);
    545  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    546  1.1  marcus 	    AICA_ARM_CMD_RATE, rate);
    547  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    548  1.1  marcus 	    AICA_ARM_CMD_PRECISION, prec);
    549  1.1  marcus 
    550  1.1  marcus 	aica_command(sc, AICA_COMMAND_PLAY);
    551  1.1  marcus }
    552  1.1  marcus 
    553  1.1  marcus void
    554  1.1  marcus aica_fillbuffer(struct aica_softc *sc)
    555  1.1  marcus {
    556  1.1  marcus 
    557  1.1  marcus 	if (sc->sc_channels == 2) {
    558  1.1  marcus 		if (sc->sc_precision == 16) {
    559  1.1  marcus 			aica_ch2p16write(sc,
    560  1.1  marcus 			    AICA_DMABUF_LEFT + sc->sc_nextfill,
    561  1.1  marcus 			    (u_int16_t *)sc->sc_buffer + 0, sc->sc_blksize / 2);
    562  1.1  marcus 			aica_ch2p16write(sc,
    563  1.1  marcus 			    AICA_DMABUF_RIGHT + sc->sc_nextfill,
    564  1.1  marcus 			    (u_int16_t *)sc->sc_buffer + 1, sc->sc_blksize / 2);
    565  1.1  marcus 		} else if (sc->sc_precision == 8) {
    566  1.1  marcus 			aica_ch2p8write(sc, AICA_DMABUF_LEFT + sc->sc_nextfill,
    567  1.1  marcus 			    (u_int8_t *)sc->sc_buffer + 0, sc->sc_blksize / 2);
    568  1.1  marcus 			aica_ch2p8write(sc, AICA_DMABUF_RIGHT + sc->sc_nextfill,
    569  1.1  marcus 			    (u_int8_t *)sc->sc_buffer + 1, sc->sc_blksize / 2);
    570  1.1  marcus 		}
    571  1.1  marcus 	} else {
    572  1.1  marcus 		aica_memwrite(sc, AICA_DMABUF_MONO + sc->sc_nextfill,
    573  1.1  marcus 		    sc->sc_buffer, sc->sc_blksize);
    574  1.1  marcus 	}
    575  1.1  marcus 
    576  1.1  marcus 	(int8_t *)sc->sc_buffer += sc->sc_blksize;
    577  1.1  marcus 	if (sc->sc_buffer >= sc->sc_buffer_end)
    578  1.1  marcus 		sc->sc_buffer = sc->sc_buffer_start;
    579  1.1  marcus 
    580  1.1  marcus 	sc->sc_nextfill ^= sc->sc_blksize / sc->sc_channels;
    581  1.1  marcus }
    582  1.1  marcus 
    583  1.1  marcus int
    584  1.1  marcus aica_intr(void *arg)
    585  1.1  marcus {
    586  1.1  marcus 	struct aica_softc *sc = arg;
    587  1.1  marcus 
    588  1.1  marcus 	aica_fillbuffer(sc);
    589  1.1  marcus 
    590  1.1  marcus 	/* call audio interrupt handler (audio_pint()) */
    591  1.1  marcus 	if (sc->sc_open && sc->sc_intr != NULL) {
    592  1.1  marcus 		(*(sc->sc_intr))(sc->sc_intr_arg);
    593  1.1  marcus 	}
    594  1.1  marcus 
    595  1.1  marcus 	/* clear SPU interrupt */
    596  1.1  marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x28bc, 0x20);
    597  1.1  marcus 	return 1;
    598  1.1  marcus }
    599  1.1  marcus 
    600  1.1  marcus int
    601  1.1  marcus aica_trigger_output(void *addr, void *start, void *end, int blksize,
    602  1.6    kent     void (*intr)(void *), void *arg, const audio_params_t *param)
    603  1.1  marcus {
    604  1.1  marcus 	struct aica_softc *sc = addr;
    605  1.1  marcus 
    606  1.1  marcus 	aica_command(sc, AICA_COMMAND_INIT);
    607  1.1  marcus 	tsleep(aica_trigger_output, PWAIT, "aicawait", hz / 20);
    608  1.1  marcus 
    609  1.1  marcus 	sc->sc_buffer_start = sc->sc_buffer = start;
    610  1.1  marcus 	sc->sc_buffer_end = end;
    611  1.1  marcus 	sc->sc_blksize = blksize;
    612  1.1  marcus 	sc->sc_nextfill = 0;
    613  1.1  marcus 
    614  1.1  marcus 	sc->sc_intr = intr;
    615  1.1  marcus 	sc->sc_intr_arg = arg;
    616  1.1  marcus 
    617  1.1  marcus 	/* fill buffers in advance */
    618  1.1  marcus 	aica_intr(sc);
    619  1.1  marcus 	aica_intr(sc);
    620  1.1  marcus 
    621  1.1  marcus 	/* ...and start playing */
    622  1.1  marcus 	aica_play(sc, blksize / sc->sc_channels, sc->sc_channels, sc->sc_rate,
    623  1.1  marcus 	    sc->sc_precision);
    624  1.1  marcus 
    625  1.1  marcus 	return 0;
    626  1.1  marcus }
    627  1.1  marcus 
    628  1.1  marcus int
    629  1.1  marcus aica_trigger_input(void *addr, void *start, void *end, int blksize,
    630  1.6    kent     void (*intr)(void *), void *arg, const audio_params_t *param)
    631  1.1  marcus {
    632  1.1  marcus 
    633  1.1  marcus 	return ENODEV;
    634  1.1  marcus }
    635  1.1  marcus 
    636  1.1  marcus int
    637  1.1  marcus aica_halt_output(void *addr)
    638  1.1  marcus {
    639  1.1  marcus 	struct aica_softc *sc = addr;
    640  1.1  marcus 
    641  1.1  marcus 	aica_command(sc, AICA_COMMAND_STOP);
    642  1.1  marcus 
    643  1.1  marcus 	return 0;
    644  1.1  marcus }
    645  1.1  marcus 
    646  1.1  marcus int
    647  1.1  marcus aica_halt_input(void *addr)
    648  1.1  marcus {
    649  1.1  marcus 
    650  1.1  marcus 	return ENODEV;
    651  1.1  marcus }
    652  1.1  marcus 
    653  1.1  marcus int
    654  1.1  marcus aica_getdev(void *addr, struct audio_device *ret)
    655  1.1  marcus {
    656  1.1  marcus 
    657  1.1  marcus 	*ret = aica_device;
    658  1.1  marcus 	return 0;
    659  1.1  marcus }
    660  1.1  marcus 
    661  1.1  marcus int
    662  1.1  marcus aica_set_port(void *addr, mixer_ctrl_t *mc)
    663  1.1  marcus {
    664  1.1  marcus 	struct aica_softc *sc = addr;
    665  1.1  marcus 
    666  1.1  marcus 	switch (mc->dev) {
    667  1.1  marcus 	case AICA_MASTER_VOL:
    668  1.1  marcus 		sc->sc_output_master =
    669  1.1  marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] & 0xff;
    670  1.1  marcus 		aica_sendparam(sc, AICA_COMMAND_MVOL,
    671  1.1  marcus 		    sc->sc_output_master, sc->sc_output_master);
    672  1.1  marcus 		break;
    673  1.1  marcus 	case AICA_OUTPUT_GAIN:
    674  1.1  marcus 		sc->sc_output_gain[AICA_VOLUME_LEFT] =
    675  1.1  marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT]  & 0xff;
    676  1.1  marcus 		sc->sc_output_gain[AICA_VOLUME_RIGHT] =
    677  1.1  marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] & 0xff;
    678  1.1  marcus 		aica_sendparam(sc, AICA_COMMAND_VOL,
    679  1.1  marcus 		    sc->sc_output_gain[AICA_VOLUME_LEFT],
    680  1.1  marcus 		    sc->sc_output_gain[AICA_VOLUME_RIGHT]);
    681  1.1  marcus 		break;
    682  1.1  marcus 	default:
    683  1.1  marcus 		return EINVAL;
    684  1.1  marcus 	}
    685  1.1  marcus 
    686  1.1  marcus 	return 0;
    687  1.1  marcus }
    688  1.1  marcus 
    689  1.1  marcus int
    690  1.1  marcus aica_get_port(void *addr, mixer_ctrl_t *mc)
    691  1.1  marcus {
    692  1.1  marcus 	struct aica_softc *sc = addr;
    693  1.1  marcus 
    694  1.1  marcus 	switch (mc->dev) {
    695  1.1  marcus 	case AICA_MASTER_VOL:
    696  1.1  marcus 		if (mc->un.value.num_channels != 1)
    697  1.1  marcus 			return EINVAL;
    698  1.1  marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] =
    699  1.1  marcus 		    L16TO256(L256TO16(sc->sc_output_master));
    700  1.1  marcus 		break;
    701  1.1  marcus 	case AICA_OUTPUT_GAIN:
    702  1.1  marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT] =
    703  1.1  marcus 		    sc->sc_output_gain[AICA_VOLUME_LEFT];
    704  1.1  marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] =
    705  1.1  marcus 		    sc->sc_output_gain[AICA_VOLUME_RIGHT];
    706  1.1  marcus 		break;
    707  1.1  marcus 	default:
    708  1.1  marcus 		return EINVAL;
    709  1.1  marcus 	}
    710  1.1  marcus 	return 0;
    711  1.1  marcus }
    712  1.1  marcus 
    713  1.1  marcus int
    714  1.1  marcus aica_query_devinfo(void *addr, mixer_devinfo_t *md)
    715  1.1  marcus {
    716  1.1  marcus 
    717  1.1  marcus 	switch (md->index) {
    718  1.1  marcus 	case AICA_MASTER_VOL:
    719  1.1  marcus 		md->type = AUDIO_MIXER_VALUE;
    720  1.1  marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    721  1.1  marcus 		md->prev = md->next = AUDIO_MIXER_LAST;
    722  1.1  marcus 		strcpy(md->label.name, AudioNmaster);
    723  1.1  marcus 		md->un.v.num_channels = 1;
    724  1.1  marcus 		strcpy(md->un.v.units.name, AudioNvolume);
    725  1.1  marcus 		return 0;
    726  1.1  marcus 	case AICA_OUTPUT_GAIN:
    727  1.1  marcus 		md->type = AUDIO_MIXER_VALUE;
    728  1.1  marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    729  1.1  marcus 		md->prev = md->next = AUDIO_MIXER_LAST;
    730  1.1  marcus 		strcpy(md->label.name, AudioNoutput);
    731  1.1  marcus 		md->un.v.num_channels = 2;
    732  1.1  marcus 		strcpy(md->label.name, AudioNvolume);
    733  1.1  marcus 		return 0;
    734  1.1  marcus 	case AICA_OUTPUT_CLASS:
    735  1.1  marcus 		md->type = AUDIO_MIXER_CLASS;
    736  1.1  marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    737  1.1  marcus 		md->next = md->prev = AUDIO_MIXER_LAST;
    738  1.1  marcus 		strcpy(md->label.name, AudioCoutputs);
    739  1.1  marcus 		return 0;
    740  1.1  marcus 	}
    741  1.1  marcus 
    742  1.1  marcus 	return ENXIO;
    743  1.1  marcus }
    744  1.1  marcus 
    745  1.1  marcus int
    746  1.1  marcus aica_get_props(void *addr)
    747  1.1  marcus {
    748  1.1  marcus 
    749  1.1  marcus 	return 0;
    750  1.1  marcus }
    751