Home | History | Annotate | Line # | Download | only in g2
aica.c revision 1.22.8.1
      1      1.22  jmcneill /*	$NetBSD: aica.c,v 1.22.8.1 2017/12/03 11:36:01 jdolecek 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.22  jmcneill __KERNEL_RCSID(0, "$NetBSD: aica.c,v 1.22.8.1 2017/12/03 11:36:01 jdolecek Exp $");
     33       1.1    marcus 
     34       1.1    marcus #include <sys/param.h>
     35       1.1    marcus #include <sys/systm.h>
     36      1.17        he #include <sys/device.h>
     37       1.1    marcus #include <sys/kernel.h>
     38       1.1    marcus #include <sys/proc.h>
     39       1.1    marcus #include <sys/audioio.h>
     40      1.21    dyoung #include <sys/bus.h>
     41       1.1    marcus 
     42       1.1    marcus #include <dev/audio_if.h>
     43       1.1    marcus #include <dev/mulaw.h>
     44       1.1    marcus #include <dev/auconv.h>
     45       1.1    marcus 
     46       1.1    marcus #include <machine/sysasicvar.h>
     47       1.1    marcus 
     48       1.1    marcus #include <dreamcast/dev/g2/g2busvar.h>
     49       1.1    marcus #include <dreamcast/dev/g2/aicavar.h>
     50       1.1    marcus #include <dreamcast/dev/microcode/aica_armcode.h>
     51       1.1    marcus 
     52       1.1    marcus #define	AICA_REG_ADDR	0x00700000
     53       1.1    marcus #define	AICA_RAM_START	0x00800000
     54       1.1    marcus #define	AICA_RAM_SIZE	0x00200000
     55       1.1    marcus #define	AICA_NCHAN	64
     56       1.1    marcus #define	AICA_TIMEOUT	0x1800
     57       1.1    marcus 
     58       1.1    marcus struct aica_softc {
     59      1.20   tsutsui 	device_t		sc_dev;		/* base device */
     60      1.22  jmcneill 	kmutex_t		sc_lock;
     61      1.22  jmcneill 	kmutex_t		sc_intr_lock;
     62       1.1    marcus 	bus_space_tag_t		sc_memt;
     63       1.1    marcus 	bus_space_handle_t	sc_aica_regh;
     64       1.1    marcus 	bus_space_handle_t	sc_aica_memh;
     65       1.1    marcus 
     66       1.1    marcus 	/* audio property */
     67       1.1    marcus 	int			sc_open;
     68       1.1    marcus 	int			sc_encodings;
     69       1.1    marcus 	int			sc_precision;
     70       1.1    marcus 	int			sc_channels;
     71       1.1    marcus 	int			sc_rate;
     72       1.1    marcus 	void			(*sc_intr)(void *);
     73       1.1    marcus 	void			*sc_intr_arg;
     74       1.1    marcus 
     75       1.1    marcus 	int			sc_output_master;
     76       1.1    marcus 	int			sc_output_gain[2];
     77       1.1    marcus #define	AICA_VOLUME_LEFT	0
     78       1.1    marcus #define	AICA_VOLUME_RIGHT	1
     79       1.1    marcus 
     80       1.1    marcus 	/* work for output */
     81       1.1    marcus 	void			*sc_buffer;
     82       1.1    marcus 	void			*sc_buffer_start;
     83       1.1    marcus 	void			*sc_buffer_end;
     84       1.1    marcus 	int			sc_blksize;
     85       1.1    marcus 	int			sc_nextfill;
     86       1.1    marcus };
     87       1.1    marcus 
     88       1.6      kent const struct {
     89       1.9        he 	const char *name;
     90       1.6      kent 	int	encoding;
     91       1.6      kent 	int	precision;
     92       1.1    marcus } aica_encodings[] = {
     93       1.1    marcus 	{AudioEadpcm,		AUDIO_ENCODING_ADPCM,		4},
     94       1.1    marcus 	{AudioEslinear,		AUDIO_ENCODING_SLINEAR,		8},
     95       1.1    marcus 	{AudioEulinear,		AUDIO_ENCODING_ULINEAR,		8},
     96       1.1    marcus 	{AudioEmulaw,		AUDIO_ENCODING_ULAW,		8},
     97       1.2    marcus 	{AudioEalaw,		AUDIO_ENCODING_ALAW,		8},
     98       1.1    marcus 	{AudioEslinear_be,	AUDIO_ENCODING_SLINEAR_BE,	16},
     99       1.1    marcus 	{AudioEslinear_le,	AUDIO_ENCODING_SLINEAR_LE,	16},
    100       1.2    marcus 	{AudioEulinear_be,	AUDIO_ENCODING_ULINEAR_BE,	16},
    101       1.2    marcus 	{AudioEulinear_le,	AUDIO_ENCODING_ULINEAR_LE,	16},
    102       1.1    marcus };
    103       1.1    marcus 
    104       1.6      kent #define AICA_NFORMATS	5
    105       1.6      kent static const struct audio_format aica_formats[AICA_NFORMATS] = {
    106       1.6      kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_ADPCM, 4, 4,
    107       1.6      kent 	 1, AUFMT_MONAURAL, 0, {1, 65536}},
    108       1.6      kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
    109       1.6      kent 	 1, AUFMT_MONAURAL, 0, {1, 65536}},
    110       1.6      kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
    111       1.6      kent 	 2, AUFMT_STEREO, 0, {1, 65536}},
    112       1.6      kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 8, 8,
    113       1.6      kent 	 1, AUFMT_MONAURAL, 0, {1, 65536}},
    114       1.6      kent 	{NULL, AUMODE_PLAY, AUDIO_ENCODING_SLINEAR_LE, 8, 8,
    115       1.6      kent 	 2, AUFMT_STEREO, 0, {1, 65536}},
    116       1.6      kent };
    117       1.6      kent 
    118      1.20   tsutsui int aica_match(device_t, cfdata_t, void *);
    119      1.20   tsutsui void aica_attach(device_t, device_t, void *);
    120       1.1    marcus int aica_print(void *, const char *);
    121       1.1    marcus 
    122      1.20   tsutsui CFATTACH_DECL_NEW(aica, sizeof(struct aica_softc), aica_match, aica_attach,
    123       1.1    marcus     NULL, NULL);
    124       1.1    marcus 
    125       1.6      kent const struct audio_device aica_device = {
    126       1.1    marcus 	"Dreamcast Sound",
    127       1.1    marcus 	"",
    128       1.1    marcus 	"aica"
    129       1.1    marcus };
    130       1.1    marcus 
    131      1.11     perry inline static void aica_g2fifo_wait(void);
    132       1.1    marcus void aica_enable(struct aica_softc *);
    133       1.1    marcus void aica_disable(struct aica_softc *);
    134       1.7      kent void aica_memwrite(struct aica_softc *, bus_size_t, uint32_t *, int);
    135       1.7      kent void aica_ch2p16write(struct aica_softc *, bus_size_t, uint16_t *, int);
    136       1.7      kent void aica_ch2p8write(struct aica_softc *, bus_size_t, uint8_t *, int);
    137       1.7      kent void aica_command(struct aica_softc *, uint32_t);
    138       1.7      kent void aica_sendparam(struct aica_softc *, uint32_t, int, int);
    139       1.1    marcus void aica_play(struct aica_softc *, int, int, int, int);
    140       1.1    marcus void aica_fillbuffer(struct aica_softc *);
    141       1.1    marcus 
    142       1.1    marcus /* intr */
    143       1.1    marcus int aica_intr(void *);
    144       1.1    marcus 
    145       1.1    marcus /* for audio */
    146       1.1    marcus int aica_open(void *, int);
    147       1.1    marcus void aica_close(void *);
    148       1.1    marcus int aica_query_encoding(void *, struct audio_encoding *);
    149       1.6      kent int aica_set_params(void *, int, int, audio_params_t *,
    150       1.6      kent     audio_params_t *, stream_filter_list_t *, stream_filter_list_t *);
    151       1.6      kent int aica_round_blocksize(void *, int, int, const audio_params_t *);
    152       1.1    marcus size_t aica_round_buffersize(void *, int, size_t);
    153       1.1    marcus int aica_trigger_output(void *, void *, void *, int, void (*)(void *), void *,
    154       1.6      kent     const audio_params_t *);
    155       1.1    marcus int aica_trigger_input(void *, void *, void *, int, void (*)(void *), void *,
    156       1.6      kent     const audio_params_t *);
    157       1.1    marcus int aica_halt_output(void *);
    158       1.1    marcus int aica_halt_input(void *);
    159       1.1    marcus int aica_getdev(void *, struct audio_device *);
    160       1.1    marcus int aica_set_port(void *, mixer_ctrl_t *);
    161       1.1    marcus int aica_get_port(void *, mixer_ctrl_t *);
    162       1.1    marcus int aica_query_devinfo(void *, mixer_devinfo_t *);
    163       1.1    marcus void aica_encode(int, int, int, int, u_char *, u_short **);
    164       1.1    marcus int aica_get_props(void *);
    165      1.22  jmcneill void aica_get_locks(void *, kmutex_t **, kmutex_t **);
    166       1.1    marcus 
    167       1.5      yamt const struct audio_hw_if aica_hw_if = {
    168       1.1    marcus 	aica_open,
    169       1.1    marcus 	aica_close,
    170       1.1    marcus 	NULL,				/* aica_drain */
    171       1.1    marcus 	aica_query_encoding,
    172       1.1    marcus 	aica_set_params,
    173       1.1    marcus 	aica_round_blocksize,
    174       1.1    marcus 	NULL,				/* aica_commit_setting */
    175       1.1    marcus 	NULL,				/* aica_init_output */
    176       1.1    marcus 	NULL,				/* aica_init_input */
    177       1.1    marcus 	NULL,				/* aica_start_output */
    178       1.1    marcus 	NULL,				/* aica_start_input */
    179       1.1    marcus 	aica_halt_output,
    180       1.1    marcus 	aica_halt_input,
    181       1.1    marcus 	NULL,				/* aica_speaker_ctl */
    182       1.1    marcus 	aica_getdev,
    183       1.1    marcus 	NULL,				/* aica_setfd */
    184       1.1    marcus 	aica_set_port,
    185       1.1    marcus 	aica_get_port,
    186       1.1    marcus 	aica_query_devinfo,
    187       1.1    marcus 	NULL,				/* aica_allocm */
    188       1.1    marcus 	NULL,				/* aica_freem */
    189       1.1    marcus 
    190       1.1    marcus 	aica_round_buffersize,		/* aica_round_buffersize */
    191       1.1    marcus 
    192       1.1    marcus 	NULL,				/* aica_mappage */
    193       1.1    marcus 	aica_get_props,
    194       1.1    marcus 	aica_trigger_output,
    195       1.1    marcus 	aica_trigger_input,
    196       1.1    marcus 	NULL,				/* aica_dev_ioctl */
    197      1.22  jmcneill 	aica_get_locks,
    198       1.1    marcus };
    199       1.1    marcus 
    200       1.1    marcus int
    201      1.20   tsutsui aica_match(device_t parent, cfdata_t cf, void *aux)
    202       1.1    marcus {
    203       1.1    marcus 	static int aica_matched = 0;
    204       1.1    marcus 
    205       1.1    marcus 	if (aica_matched)
    206       1.1    marcus 		return 0;
    207       1.1    marcus 
    208       1.1    marcus 	aica_matched = 1;
    209       1.1    marcus 	return 1;
    210       1.1    marcus }
    211       1.1    marcus 
    212       1.1    marcus void
    213      1.20   tsutsui aica_attach(device_t parent, device_t self, void *aux)
    214       1.1    marcus {
    215       1.7      kent 	struct aica_softc *sc;
    216       1.7      kent 	struct g2bus_attach_args *ga;
    217       1.1    marcus 	int i;
    218       1.1    marcus 
    219      1.20   tsutsui 	sc = device_private(self);
    220       1.7      kent 	ga = aux;
    221      1.20   tsutsui 	sc->sc_dev = self;
    222       1.1    marcus 	sc->sc_memt = ga->ga_memt;
    223       1.1    marcus 
    224      1.22  jmcneill 	mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
    225      1.22  jmcneill 	mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_SCHED);
    226      1.22  jmcneill 
    227       1.1    marcus 	if (bus_space_map(sc->sc_memt, AICA_REG_ADDR, 0x3000, 0,
    228       1.1    marcus 	    &sc->sc_aica_regh) != 0) {
    229      1.20   tsutsui 		aprint_error(": can't map AICA register space\n");
    230       1.1    marcus 		return;
    231       1.1    marcus 	}
    232       1.1    marcus 
    233       1.1    marcus 	if (bus_space_map(sc->sc_memt, AICA_RAM_START, AICA_RAM_SIZE, 0,
    234       1.1    marcus 	    &sc->sc_aica_memh) != 0) {
    235      1.20   tsutsui 		aprint_error(": can't map AICA memory space\n");
    236       1.1    marcus 		return;
    237       1.1    marcus 	}
    238       1.1    marcus 
    239      1.20   tsutsui 	aprint_normal(": ARM7 Sound Processing Unit\n");
    240       1.1    marcus 
    241       1.1    marcus 	aica_disable(sc);
    242       1.1    marcus 
    243       1.1    marcus 	for (i = 0; i < AICA_NCHAN; i++)
    244       1.1    marcus 		bus_space_write_4(sc->sc_memt,sc->sc_aica_regh, i << 7,
    245       1.1    marcus 		    ((bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, i << 7)
    246       1.1    marcus 		    & ~0x4000) | 0x8000));
    247       1.1    marcus 
    248       1.1    marcus 	/* load microcode, and clear memory */
    249       1.1    marcus 	bus_space_set_region_4(sc->sc_memt, sc->sc_aica_memh,
    250      1.15    marcus 	    0, 0, AICA_RAM_SIZE / 4);
    251       1.1    marcus 
    252       1.1    marcus 	aica_memwrite(sc, 0, aica_armcode, sizeof(aica_armcode));
    253       1.1    marcus 
    254       1.1    marcus 	aica_enable(sc);
    255       1.1    marcus 
    256      1.20   tsutsui 	aprint_normal_dev(self, "interrupting at %s\n",
    257      1.18    marcus 	    sysasic_intr_string(SYSASIC_IRL9));
    258      1.14   tsutsui 	sysasic_intr_establish(SYSASIC_EVENT_AICA, IPL_BIO, SYSASIC_IRL9,
    259      1.14   tsutsui 	    aica_intr, sc);
    260       1.1    marcus 
    261      1.20   tsutsui 	audio_attach_mi(&aica_hw_if, sc, self);
    262       1.1    marcus 
    263       1.1    marcus 	/* init parameters */
    264       1.1    marcus 	sc->sc_output_master = 255;
    265       1.1    marcus 	sc->sc_output_gain[AICA_VOLUME_LEFT]  = 255;
    266       1.1    marcus 	sc->sc_output_gain[AICA_VOLUME_RIGHT] = 255;
    267       1.1    marcus }
    268       1.1    marcus 
    269       1.1    marcus void
    270       1.1    marcus aica_enable(struct aica_softc *sc)
    271       1.1    marcus {
    272       1.1    marcus 
    273       1.1    marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x28a8, 24);
    274       1.1    marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00,
    275       1.1    marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00) & ~1);
    276       1.1    marcus }
    277       1.1    marcus 
    278       1.1    marcus void
    279       1.1    marcus aica_disable(struct aica_softc *sc)
    280       1.1    marcus {
    281       1.1    marcus 
    282       1.1    marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00,
    283       1.1    marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00) | 1);
    284       1.1    marcus }
    285       1.1    marcus 
    286       1.1    marcus inline static void
    287       1.8   tsutsui aica_g2fifo_wait(void)
    288       1.1    marcus {
    289       1.1    marcus 	int i;
    290       1.1    marcus 
    291       1.1    marcus 	i = AICA_TIMEOUT;
    292       1.1    marcus 	while (--i > 0)
    293       1.7      kent 		if ((*(volatile uint32_t *)0xa05f688c) & 0x11)
    294       1.1    marcus 			break;
    295       1.1    marcus }
    296       1.1    marcus 
    297       1.1    marcus void
    298       1.7      kent aica_memwrite(struct aica_softc *sc, bus_size_t offset, uint32_t *src, int len)
    299       1.1    marcus {
    300       1.1    marcus 	int n;
    301       1.1    marcus 
    302       1.1    marcus 	KASSERT((offset & 3) == 0);
    303       1.7      kent 	n = (len + 3) / 4;	/* uint32_t * n (aligned) */
    304       1.1    marcus 
    305       1.1    marcus 	aica_g2fifo_wait();
    306       1.1    marcus 	bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    307       1.1    marcus 	    offset, src, n);
    308       1.1    marcus }
    309       1.1    marcus 
    310       1.1    marcus void
    311       1.7      kent aica_ch2p16write(struct aica_softc *sc, bus_size_t offset, uint16_t *src,
    312       1.1    marcus     int len)
    313       1.1    marcus {
    314       1.1    marcus 	union {
    315       1.7      kent 		uint32_t w[8];
    316       1.7      kent 		uint16_t s[16];
    317       1.1    marcus 	} buf;
    318       1.7      kent 	uint16_t *p;
    319       1.1    marcus 	int i;
    320       1.1    marcus 
    321       1.1    marcus 	KASSERT((offset & 3) == 0);
    322       1.1    marcus 
    323       1.1    marcus 	while (len >= 32) {
    324       1.1    marcus 		p = buf.s;
    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 		*p++ = *src++; src++;
    332       1.1    marcus 		*p++ = *src++; src++;
    333       1.1    marcus 		*p++ = *src++; src++;
    334       1.1    marcus 		*p++ = *src++; src++;
    335       1.1    marcus 		*p++ = *src++; src++;
    336       1.1    marcus 		*p++ = *src++; src++;
    337       1.1    marcus 		*p++ = *src++; src++;
    338       1.1    marcus 		*p++ = *src++; src++;
    339       1.1    marcus 		*p++ = *src++; src++;
    340       1.1    marcus 		*p++ = *src++; src++;
    341       1.1    marcus 
    342       1.1    marcus 		aica_g2fifo_wait();
    343       1.1    marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    344       1.1    marcus 		    offset, buf.w , 32 / 4);
    345       1.1    marcus 
    346       1.7      kent 		offset += sizeof(uint16_t) * 16;
    347       1.1    marcus 		len -= 32;
    348       1.1    marcus 	}
    349       1.1    marcus 
    350       1.1    marcus 	if (len / 2 > 0) {
    351       1.1    marcus 		p = buf.s;
    352       1.1    marcus 		for (i = 0; i < len / 2; i++) {
    353       1.1    marcus 			*p++ = *src++; src++;
    354       1.1    marcus 		}
    355       1.1    marcus 
    356       1.1    marcus 		aica_g2fifo_wait();
    357       1.1    marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    358       1.1    marcus 		    offset, buf.w, len / 4);
    359       1.1    marcus 	}
    360       1.1    marcus }
    361       1.1    marcus 
    362       1.1    marcus void
    363       1.7      kent aica_ch2p8write(struct aica_softc *sc, bus_size_t offset, uint8_t *src,
    364       1.1    marcus     int len)
    365       1.1    marcus {
    366       1.7      kent 	uint32_t buf[8];
    367       1.7      kent 	uint8_t *p;
    368       1.1    marcus 	int i;
    369       1.1    marcus 
    370       1.1    marcus 	KASSERT((offset & 3) == 0);
    371       1.1    marcus 	while (len >= 32) {
    372       1.7      kent 		p = (uint8_t *)buf;
    373       1.7      kent 
    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 		*p++ = *src++; src++;
    397       1.1    marcus 		*p++ = *src++; src++;
    398       1.1    marcus 		*p++ = *src++; src++;
    399       1.1    marcus 		*p++ = *src++; src++;
    400       1.1    marcus 		*p++ = *src++; src++;
    401       1.1    marcus 		*p++ = *src++; src++;
    402       1.1    marcus 		*p++ = *src++; src++;
    403       1.1    marcus 		*p++ = *src++; src++;
    404       1.1    marcus 		*p++ = *src++; src++;
    405       1.1    marcus 		*p++ = *src++; src++;
    406       1.1    marcus 
    407       1.1    marcus 		aica_g2fifo_wait();
    408       1.1    marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    409       1.1    marcus 		    offset, buf, 32 / 4);
    410       1.1    marcus 
    411       1.1    marcus 		offset += 32;
    412       1.1    marcus 		len -= 32;
    413       1.1    marcus 	}
    414       1.1    marcus 
    415       1.1    marcus 	if (len) {
    416       1.7      kent 		p = (uint8_t *)buf;
    417       1.1    marcus 		for (i = 0; i < len; i++)
    418       1.1    marcus 			*p++ = *src++; src++;
    419       1.1    marcus 
    420       1.1    marcus 		aica_g2fifo_wait();
    421       1.1    marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    422       1.1    marcus 		    offset, buf, len / 4);
    423       1.1    marcus 	}
    424       1.1    marcus }
    425       1.1    marcus 
    426       1.1    marcus int
    427       1.1    marcus aica_open(void *addr, int flags)
    428       1.1    marcus {
    429       1.7      kent 	struct aica_softc *sc;
    430       1.1    marcus 
    431       1.7      kent 	sc = addr;
    432       1.1    marcus 	if (sc->sc_open)
    433       1.1    marcus 		return EBUSY;
    434       1.1    marcus 
    435       1.1    marcus 	sc->sc_intr = NULL;
    436       1.1    marcus 	sc->sc_open = 1;
    437       1.1    marcus 
    438       1.1    marcus 	return 0;
    439       1.1    marcus }
    440       1.1    marcus 
    441       1.1    marcus void
    442       1.1    marcus aica_close(void *addr)
    443       1.1    marcus {
    444       1.7      kent 	struct aica_softc *sc;
    445       1.1    marcus 
    446       1.7      kent 	sc = addr;
    447       1.1    marcus 	sc->sc_open = 0;
    448       1.1    marcus 	sc->sc_intr = NULL;
    449       1.1    marcus }
    450       1.1    marcus 
    451       1.1    marcus int
    452       1.1    marcus aica_query_encoding(void *addr, struct audio_encoding *fp)
    453       1.1    marcus {
    454       1.1    marcus 	if (fp->index >= sizeof(aica_encodings) / sizeof(aica_encodings[0]))
    455       1.1    marcus 		return EINVAL;
    456       1.1    marcus 
    457       1.1    marcus 	strcpy(fp->name, aica_encodings[fp->index].name);
    458       1.1    marcus 	fp->encoding = aica_encodings[fp->index].encoding;
    459       1.1    marcus 	fp->precision = aica_encodings[fp->index].precision;
    460       1.1    marcus 	fp->flags = 0;
    461       1.1    marcus 
    462       1.1    marcus 	return 0;
    463       1.1    marcus }
    464       1.1    marcus 
    465       1.1    marcus int
    466       1.1    marcus aica_set_params(void *addr, int setmode, int usemode,
    467       1.6      kent     audio_params_t *play, audio_params_t *rec,
    468       1.6      kent     stream_filter_list_t *pfil, stream_filter_list_t *rfil)
    469       1.1    marcus {
    470       1.7      kent 	struct aica_softc *sc;
    471       1.6      kent 	const audio_params_t *hw;
    472       1.6      kent 	int i;
    473       1.1    marcus 
    474       1.6      kent 	i = auconv_set_converter(aica_formats, AICA_NFORMATS,
    475      1.13   thorpej 				 AUMODE_PLAY, play, false, pfil);
    476       1.6      kent 	if (i < 0)
    477       1.1    marcus 		return EINVAL;
    478       1.6      kent 	hw = pfil->req_size > 0 ? &pfil->filters[0].param : play;
    479       1.7      kent 	sc = addr;
    480       1.6      kent 	sc->sc_precision = hw->precision;
    481       1.6      kent 	sc->sc_channels = hw->channels;
    482       1.6      kent 	sc->sc_rate = hw->sample_rate;
    483       1.6      kent 	sc->sc_encodings = hw->encoding;
    484       1.1    marcus 	return 0;
    485       1.1    marcus }
    486       1.1    marcus 
    487       1.1    marcus int
    488       1.6      kent aica_round_blocksize(void *addr, int blk, int mode, const audio_params_t *param)
    489       1.1    marcus {
    490      1.19   tsutsui #if 0	/* XXX this has not worked since kent-audio1 merge? */
    491       1.7      kent 	struct aica_softc *sc;
    492       1.1    marcus 
    493       1.7      kent 	sc = addr;
    494       1.1    marcus 	switch (sc->sc_precision) {
    495       1.1    marcus 	case 4:
    496       1.1    marcus 		if (sc->sc_channels == 1)
    497       1.1    marcus 			return AICA_DMABUF_SIZE / 4;
    498       1.1    marcus 		else
    499       1.1    marcus 			return AICA_DMABUF_SIZE / 2;
    500       1.1    marcus 		break;
    501       1.1    marcus 	case 8:
    502       1.1    marcus 		if (sc->sc_channels == 1)
    503       1.1    marcus 			return AICA_DMABUF_SIZE / 2;
    504       1.1    marcus 		else
    505       1.1    marcus 			return AICA_DMABUF_SIZE;
    506       1.1    marcus 		break;
    507       1.1    marcus 	case 16:
    508       1.1    marcus 		if (sc->sc_channels == 1)
    509       1.1    marcus 			return AICA_DMABUF_SIZE;
    510       1.1    marcus 		else
    511       1.1    marcus 			return AICA_DMABUF_SIZE * 2;
    512       1.1    marcus 		break;
    513       1.1    marcus 	default:
    514       1.1    marcus 		break;
    515       1.1    marcus 	}
    516       1.1    marcus 
    517      1.19   tsutsui #endif
    518       1.1    marcus 	return AICA_DMABUF_SIZE / 4;
    519       1.1    marcus }
    520       1.1    marcus 
    521       1.1    marcus size_t
    522       1.1    marcus aica_round_buffersize(void *addr, int dir, size_t bufsize)
    523       1.1    marcus {
    524       1.1    marcus 
    525       1.1    marcus 	if (dir == AUMODE_PLAY)
    526       1.1    marcus 		return 65536;
    527       1.1    marcus 
    528       1.1    marcus 	return 512;	/* XXX: AUMINBUF */
    529       1.1    marcus }
    530       1.1    marcus 
    531       1.1    marcus void
    532       1.7      kent aica_command(struct aica_softc *sc, uint32_t command)
    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_COMMAND, command);
    537       1.1    marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh, AICA_ARM_CMD_SERIAL,
    538       1.1    marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_memh,
    539       1.1    marcus 	    AICA_ARM_CMD_SERIAL) + 1);
    540       1.1    marcus }
    541       1.1    marcus 
    542       1.1    marcus void
    543       1.7      kent aica_sendparam(struct aica_softc *sc, uint32_t command,
    544       1.1    marcus     int32_t lparam, int32_t rparam)
    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_LPARAM, lparam);
    549       1.1    marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    550       1.1    marcus 	    AICA_ARM_CMD_RPARAM, rparam);
    551       1.1    marcus 
    552       1.1    marcus 	aica_command(sc, command);
    553       1.1    marcus }
    554       1.1    marcus 
    555       1.1    marcus void
    556       1.1    marcus aica_play(struct aica_softc *sc, int blksize, int channel, int rate, int prec)
    557       1.1    marcus {
    558       1.1    marcus 
    559       1.1    marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    560       1.1    marcus 	    AICA_ARM_CMD_BLOCKSIZE, blksize);
    561       1.1    marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    562       1.1    marcus 	    AICA_ARM_CMD_CHANNEL, channel);
    563       1.1    marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    564       1.1    marcus 	    AICA_ARM_CMD_RATE, rate);
    565       1.1    marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    566       1.1    marcus 	    AICA_ARM_CMD_PRECISION, prec);
    567       1.1    marcus 
    568       1.1    marcus 	aica_command(sc, AICA_COMMAND_PLAY);
    569       1.1    marcus }
    570       1.1    marcus 
    571       1.1    marcus void
    572       1.1    marcus aica_fillbuffer(struct aica_softc *sc)
    573       1.1    marcus {
    574       1.1    marcus 
    575       1.1    marcus 	if (sc->sc_channels == 2) {
    576       1.1    marcus 		if (sc->sc_precision == 16) {
    577       1.1    marcus 			aica_ch2p16write(sc,
    578       1.1    marcus 			    AICA_DMABUF_LEFT + sc->sc_nextfill,
    579       1.7      kent 			    (uint16_t *)sc->sc_buffer + 0, sc->sc_blksize / 2);
    580       1.1    marcus 			aica_ch2p16write(sc,
    581       1.1    marcus 			    AICA_DMABUF_RIGHT + sc->sc_nextfill,
    582       1.7      kent 			    (uint16_t *)sc->sc_buffer + 1, sc->sc_blksize / 2);
    583       1.1    marcus 		} else if (sc->sc_precision == 8) {
    584       1.1    marcus 			aica_ch2p8write(sc, AICA_DMABUF_LEFT + sc->sc_nextfill,
    585       1.7      kent 			    (uint8_t *)sc->sc_buffer + 0, sc->sc_blksize / 2);
    586       1.1    marcus 			aica_ch2p8write(sc, AICA_DMABUF_RIGHT + sc->sc_nextfill,
    587       1.7      kent 			    (uint8_t *)sc->sc_buffer + 1, sc->sc_blksize / 2);
    588       1.1    marcus 		}
    589       1.1    marcus 	} else {
    590       1.1    marcus 		aica_memwrite(sc, AICA_DMABUF_MONO + sc->sc_nextfill,
    591       1.1    marcus 		    sc->sc_buffer, sc->sc_blksize);
    592       1.1    marcus 	}
    593       1.1    marcus 
    594      1.12     skrll 	sc->sc_buffer = (int8_t *)sc->sc_buffer + sc->sc_blksize;
    595       1.1    marcus 	if (sc->sc_buffer >= sc->sc_buffer_end)
    596       1.1    marcus 		sc->sc_buffer = sc->sc_buffer_start;
    597       1.1    marcus 
    598       1.1    marcus 	sc->sc_nextfill ^= sc->sc_blksize / sc->sc_channels;
    599       1.1    marcus }
    600       1.1    marcus 
    601       1.1    marcus int
    602       1.1    marcus aica_intr(void *arg)
    603       1.1    marcus {
    604       1.7      kent 	struct aica_softc *sc;
    605       1.1    marcus 
    606       1.7      kent 	sc = arg;
    607      1.22  jmcneill 
    608      1.22  jmcneill 	mutex_spin_enter(&sc->sc_intr_lock);
    609      1.22  jmcneill 
    610       1.1    marcus 	aica_fillbuffer(sc);
    611       1.1    marcus 
    612       1.1    marcus 	/* call audio interrupt handler (audio_pint()) */
    613       1.1    marcus 	if (sc->sc_open && sc->sc_intr != NULL) {
    614       1.1    marcus 		(*(sc->sc_intr))(sc->sc_intr_arg);
    615       1.1    marcus 	}
    616       1.1    marcus 
    617       1.1    marcus 	/* clear SPU interrupt */
    618       1.1    marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x28bc, 0x20);
    619      1.22  jmcneill 
    620      1.22  jmcneill 	mutex_spin_exit(&sc->sc_intr_lock);
    621      1.22  jmcneill 
    622       1.1    marcus 	return 1;
    623       1.1    marcus }
    624       1.1    marcus 
    625       1.1    marcus int
    626       1.1    marcus aica_trigger_output(void *addr, void *start, void *end, int blksize,
    627       1.6      kent     void (*intr)(void *), void *arg, const audio_params_t *param)
    628       1.1    marcus {
    629       1.7      kent 	struct aica_softc *sc;
    630       1.1    marcus 
    631       1.7      kent 	sc = addr;
    632       1.1    marcus 	aica_command(sc, AICA_COMMAND_INIT);
    633       1.1    marcus 	tsleep(aica_trigger_output, PWAIT, "aicawait", hz / 20);
    634       1.1    marcus 
    635       1.1    marcus 	sc->sc_buffer_start = sc->sc_buffer = start;
    636       1.1    marcus 	sc->sc_buffer_end = end;
    637       1.1    marcus 	sc->sc_blksize = blksize;
    638       1.1    marcus 	sc->sc_nextfill = 0;
    639       1.1    marcus 
    640       1.1    marcus 	sc->sc_intr = intr;
    641       1.1    marcus 	sc->sc_intr_arg = arg;
    642       1.1    marcus 
    643       1.1    marcus 	/* fill buffers in advance */
    644       1.1    marcus 	aica_intr(sc);
    645       1.1    marcus 	aica_intr(sc);
    646       1.1    marcus 
    647       1.1    marcus 	/* ...and start playing */
    648       1.1    marcus 	aica_play(sc, blksize / sc->sc_channels, sc->sc_channels, sc->sc_rate,
    649       1.1    marcus 	    sc->sc_precision);
    650       1.1    marcus 
    651       1.1    marcus 	return 0;
    652       1.1    marcus }
    653       1.1    marcus 
    654       1.1    marcus int
    655       1.1    marcus aica_trigger_input(void *addr, void *start, void *end, int blksize,
    656       1.6      kent     void (*intr)(void *), void *arg, const audio_params_t *param)
    657       1.1    marcus {
    658       1.1    marcus 
    659       1.1    marcus 	return ENODEV;
    660       1.1    marcus }
    661       1.1    marcus 
    662       1.1    marcus int
    663       1.1    marcus aica_halt_output(void *addr)
    664       1.1    marcus {
    665       1.7      kent 	struct aica_softc *sc;
    666       1.1    marcus 
    667       1.7      kent 	sc = addr;
    668       1.1    marcus 	aica_command(sc, AICA_COMMAND_STOP);
    669       1.1    marcus 	return 0;
    670       1.1    marcus }
    671       1.1    marcus 
    672       1.1    marcus int
    673       1.1    marcus aica_halt_input(void *addr)
    674       1.1    marcus {
    675       1.1    marcus 
    676       1.1    marcus 	return ENODEV;
    677       1.1    marcus }
    678       1.1    marcus 
    679       1.1    marcus int
    680       1.1    marcus aica_getdev(void *addr, struct audio_device *ret)
    681       1.1    marcus {
    682       1.1    marcus 
    683       1.1    marcus 	*ret = aica_device;
    684       1.1    marcus 	return 0;
    685       1.1    marcus }
    686       1.1    marcus 
    687       1.1    marcus int
    688       1.1    marcus aica_set_port(void *addr, mixer_ctrl_t *mc)
    689       1.1    marcus {
    690       1.7      kent 	struct aica_softc *sc;
    691       1.1    marcus 
    692       1.7      kent 	sc = addr;
    693       1.1    marcus 	switch (mc->dev) {
    694       1.1    marcus 	case AICA_MASTER_VOL:
    695       1.1    marcus 		sc->sc_output_master =
    696       1.1    marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] & 0xff;
    697       1.1    marcus 		aica_sendparam(sc, AICA_COMMAND_MVOL,
    698       1.1    marcus 		    sc->sc_output_master, sc->sc_output_master);
    699       1.1    marcus 		break;
    700       1.1    marcus 	case AICA_OUTPUT_GAIN:
    701       1.1    marcus 		sc->sc_output_gain[AICA_VOLUME_LEFT] =
    702       1.1    marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT]  & 0xff;
    703       1.1    marcus 		sc->sc_output_gain[AICA_VOLUME_RIGHT] =
    704       1.1    marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] & 0xff;
    705       1.1    marcus 		aica_sendparam(sc, AICA_COMMAND_VOL,
    706       1.1    marcus 		    sc->sc_output_gain[AICA_VOLUME_LEFT],
    707       1.1    marcus 		    sc->sc_output_gain[AICA_VOLUME_RIGHT]);
    708       1.1    marcus 		break;
    709       1.1    marcus 	default:
    710       1.1    marcus 		return EINVAL;
    711       1.1    marcus 	}
    712       1.1    marcus 
    713       1.1    marcus 	return 0;
    714       1.1    marcus }
    715       1.1    marcus 
    716       1.1    marcus int
    717       1.1    marcus aica_get_port(void *addr, mixer_ctrl_t *mc)
    718       1.1    marcus {
    719       1.7      kent 	struct aica_softc *sc;
    720       1.1    marcus 
    721       1.7      kent 	sc = addr;
    722       1.1    marcus 	switch (mc->dev) {
    723       1.1    marcus 	case AICA_MASTER_VOL:
    724       1.1    marcus 		if (mc->un.value.num_channels != 1)
    725       1.1    marcus 			return EINVAL;
    726       1.1    marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] =
    727       1.1    marcus 		    L16TO256(L256TO16(sc->sc_output_master));
    728       1.1    marcus 		break;
    729       1.1    marcus 	case AICA_OUTPUT_GAIN:
    730       1.1    marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT] =
    731       1.1    marcus 		    sc->sc_output_gain[AICA_VOLUME_LEFT];
    732       1.1    marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] =
    733       1.1    marcus 		    sc->sc_output_gain[AICA_VOLUME_RIGHT];
    734       1.1    marcus 		break;
    735       1.1    marcus 	default:
    736       1.1    marcus 		return EINVAL;
    737       1.1    marcus 	}
    738       1.1    marcus 	return 0;
    739       1.1    marcus }
    740       1.1    marcus 
    741       1.1    marcus int
    742       1.1    marcus aica_query_devinfo(void *addr, mixer_devinfo_t *md)
    743       1.1    marcus {
    744       1.1    marcus 
    745       1.1    marcus 	switch (md->index) {
    746       1.1    marcus 	case AICA_MASTER_VOL:
    747       1.1    marcus 		md->type = AUDIO_MIXER_VALUE;
    748       1.1    marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    749       1.1    marcus 		md->prev = md->next = AUDIO_MIXER_LAST;
    750       1.1    marcus 		strcpy(md->label.name, AudioNmaster);
    751       1.1    marcus 		md->un.v.num_channels = 1;
    752       1.1    marcus 		strcpy(md->un.v.units.name, AudioNvolume);
    753       1.1    marcus 		return 0;
    754       1.1    marcus 	case AICA_OUTPUT_GAIN:
    755       1.1    marcus 		md->type = AUDIO_MIXER_VALUE;
    756       1.1    marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    757       1.1    marcus 		md->prev = md->next = AUDIO_MIXER_LAST;
    758       1.1    marcus 		strcpy(md->label.name, AudioNoutput);
    759       1.1    marcus 		md->un.v.num_channels = 2;
    760       1.1    marcus 		strcpy(md->label.name, AudioNvolume);
    761       1.1    marcus 		return 0;
    762       1.1    marcus 	case AICA_OUTPUT_CLASS:
    763       1.1    marcus 		md->type = AUDIO_MIXER_CLASS;
    764       1.1    marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    765       1.1    marcus 		md->next = md->prev = AUDIO_MIXER_LAST;
    766       1.1    marcus 		strcpy(md->label.name, AudioCoutputs);
    767       1.1    marcus 		return 0;
    768       1.1    marcus 	}
    769       1.1    marcus 
    770       1.1    marcus 	return ENXIO;
    771       1.1    marcus }
    772       1.1    marcus 
    773       1.1    marcus int
    774       1.1    marcus aica_get_props(void *addr)
    775       1.1    marcus {
    776       1.1    marcus 
    777  1.22.8.1  jdolecek 	return AUDIO_PROP_PLAYBACK;
    778       1.1    marcus }
    779      1.22  jmcneill 
    780      1.22  jmcneill void
    781      1.22  jmcneill aica_get_locks(void *addr, kmutex_t **intr, kmutex_t **thread)
    782      1.22  jmcneill {
    783      1.22  jmcneill 	struct aica_softc *sc;
    784      1.22  jmcneill 
    785      1.22  jmcneill 	sc = addr;
    786      1.22  jmcneill 	*intr = &sc->sc_intr_lock;
    787      1.22  jmcneill 	*thread = &sc->sc_lock;
    788      1.22  jmcneill }
    789