Home | History | Annotate | Line # | Download | only in g2
aica.c revision 1.5.2.2
      1  1.5.2.2    kent /*	$NetBSD: aica.c,v 1.5.2.2 2005/01/09 08:42:44 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.5.2.2    kent __KERNEL_RCSID(0, "$NetBSD: aica.c,v 1.5.2.2 2005/01/09 08:42:44 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.5.2.1    kent const struct {
     86      1.1  marcus 	char	*name;
     87  1.5.2.1    kent 	int	encoding;
     88  1.5.2.1    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.5.2.1    kent #define AICA_NFORMATS	5
    102  1.5.2.1    kent static const struct audio_format aica_formats[AICA_NFORMATS] = {
    103  1.5.2.1    kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_ADPCM, 4, 4,
    104  1.5.2.1    kent 	 1, AUFMT_MONAURAL, 0, {1, 65536}},
    105  1.5.2.1    kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
    106  1.5.2.1    kent 	 1, AUFMT_MONAURAL, 0, {1, 65536}},
    107  1.5.2.1    kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
    108  1.5.2.1    kent 	 2, AUFMT_STEREO, 0, {1, 65536}},
    109  1.5.2.1    kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 8, 8,
    110  1.5.2.1    kent 	 1, AUFMT_MONAURAL, 0, {1, 65536}},
    111  1.5.2.1    kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 8, 8,
    112  1.5.2.1    kent 	 2, AUFMT_STEREO, 0, {1, 65536}},
    113  1.5.2.1    kent };
    114  1.5.2.1    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.5.2.1    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.5.2.1    kent int aica_set_params(void *, int, int, audio_params_t *,
    147  1.5.2.1    kent     audio_params_t *, stream_filter_list_t *, stream_filter_list_t *);
    148  1.5.2.2    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.5.2.1    kent     const audio_params_t *);
    152      1.1  marcus int aica_trigger_input(void *, void *, void *, int, void (*)(void *), void *,
    153  1.5.2.1    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.5.2.1    kent     audio_params_t *play, audio_params_t *rec,
    454  1.5.2.1    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.5.2.1    kent 	const audio_params_t *hw;
    458  1.5.2.1    kent 	int i;
    459      1.1  marcus 
    460  1.5.2.1    kent 	i = auconv_set_converter(aica_formats, AICA_NFORMATS,
    461  1.5.2.1    kent 				 AUMODE_PLAY, play, FALSE, pfil);
    462  1.5.2.1    kent 	if (i < 0)
    463      1.1  marcus 		return EINVAL;
    464  1.5.2.1    kent 	hw = pfil->req_size > 0 ? &pfil->filters[0].param : play;
    465  1.5.2.1    kent 	sc->sc_precision = hw->precision;
    466  1.5.2.1    kent 	sc->sc_channels = hw->channels;
    467  1.5.2.1    kent 	sc->sc_rate = hw->sample_rate;
    468  1.5.2.1    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.5.2.2    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.5.2.1    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.5.2.1    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