Home | History | Annotate | Line # | Download | only in g2
aica.c revision 1.22
      1  1.22  jmcneill /*	$NetBSD: aica.c,v 1.22 2011/11/23 23:07:29 jmcneill 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 2011/11/23 23:07:29 jmcneill 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.1    marcus 	return 0;
    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