Home | History | Annotate | Line # | Download | only in g2
aica.c revision 1.1
      1  1.1  marcus /*	$NetBSD: aica.c,v 1.1 2003/08/24 17:33:29 marcus 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.1  marcus __KERNEL_RCSID(0, "$NetBSD: aica.c,v 1.1 2003/08/24 17:33:29 marcus 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.1  marcus struct {
     86  1.1  marcus 	char	*name;
     87  1.1  marcus 	int 	encoding;
     88  1.1  marcus 	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.1  marcus 	{AudioEslinear_be,	AUDIO_ENCODING_SLINEAR_BE,	16},
     95  1.1  marcus 	{AudioEslinear_le,	AUDIO_ENCODING_SLINEAR_LE,	16},
     96  1.1  marcus };
     97  1.1  marcus 
     98  1.1  marcus int aica_match(struct device *, struct cfdata *, void *);
     99  1.1  marcus void aica_attach(struct device *, struct device *, void *);
    100  1.1  marcus int aica_print(void *, const char *);
    101  1.1  marcus 
    102  1.1  marcus CFATTACH_DECL(aica, sizeof(struct aica_softc), aica_match, aica_attach,
    103  1.1  marcus     NULL, NULL);
    104  1.1  marcus 
    105  1.1  marcus struct audio_device aica_device = {
    106  1.1  marcus 	"Dreamcast Sound",
    107  1.1  marcus 	"",
    108  1.1  marcus 	"aica"
    109  1.1  marcus };
    110  1.1  marcus 
    111  1.1  marcus __inline static void aica_g2fifo_wait(void);
    112  1.1  marcus void aica_enable(struct aica_softc *);
    113  1.1  marcus void aica_disable(struct aica_softc *);
    114  1.1  marcus void aica_memwrite(struct aica_softc *, bus_size_t, u_int32_t *, int);
    115  1.1  marcus void aica_ch2p16write(struct aica_softc *, bus_size_t, u_int16_t *, int);
    116  1.1  marcus void aica_ch2p8write(struct aica_softc *, bus_size_t, u_int8_t *, int);
    117  1.1  marcus void aica_command(struct aica_softc *, u_int32_t);
    118  1.1  marcus void aica_sendparam(struct aica_softc *, u_int32_t, int, int);
    119  1.1  marcus void aica_play(struct aica_softc *, int, int, int, int);
    120  1.1  marcus void aica_fillbuffer(struct aica_softc *);
    121  1.1  marcus 
    122  1.1  marcus /* intr */
    123  1.1  marcus int aica_intr(void *);
    124  1.1  marcus 
    125  1.1  marcus /* for audio */
    126  1.1  marcus int aica_open(void *, int);
    127  1.1  marcus void aica_close(void *);
    128  1.1  marcus int aica_query_encoding(void *, struct audio_encoding *);
    129  1.1  marcus int aica_set_params(void *, int, int, struct audio_params *,
    130  1.1  marcus     struct audio_params *);
    131  1.1  marcus int aica_round_blocksize(void *, int);
    132  1.1  marcus size_t aica_round_buffersize(void *, int, size_t);
    133  1.1  marcus int aica_trigger_output(void *, void *, void *, int, void (*)(void *), void *,
    134  1.1  marcus     struct audio_params *);
    135  1.1  marcus int aica_trigger_input(void *, void *, void *, int, void (*)(void *), void *,
    136  1.1  marcus     struct audio_params *);
    137  1.1  marcus int aica_halt_output(void *);
    138  1.1  marcus int aica_halt_input(void *);
    139  1.1  marcus int aica_getdev(void *, struct audio_device *);
    140  1.1  marcus int aica_set_port(void *, mixer_ctrl_t *);
    141  1.1  marcus int aica_get_port(void *, mixer_ctrl_t *);
    142  1.1  marcus int aica_query_devinfo(void *, mixer_devinfo_t *);
    143  1.1  marcus void aica_encode(int, int, int, int, u_char *, u_short **);
    144  1.1  marcus int aica_get_props(void *);
    145  1.1  marcus 
    146  1.1  marcus struct audio_hw_if aica_hw_if = {
    147  1.1  marcus 	aica_open,
    148  1.1  marcus 	aica_close,
    149  1.1  marcus 	NULL,				/* aica_drain */
    150  1.1  marcus 	aica_query_encoding,
    151  1.1  marcus 	aica_set_params,
    152  1.1  marcus 	aica_round_blocksize,
    153  1.1  marcus 	NULL,				/* aica_commit_setting */
    154  1.1  marcus 	NULL,				/* aica_init_output */
    155  1.1  marcus 	NULL,				/* aica_init_input */
    156  1.1  marcus 	NULL,				/* aica_start_output */
    157  1.1  marcus 	NULL,				/* aica_start_input */
    158  1.1  marcus 	aica_halt_output,
    159  1.1  marcus 	aica_halt_input,
    160  1.1  marcus 	NULL,				/* aica_speaker_ctl */
    161  1.1  marcus 	aica_getdev,
    162  1.1  marcus 	NULL,				/* aica_setfd */
    163  1.1  marcus 	aica_set_port,
    164  1.1  marcus 	aica_get_port,
    165  1.1  marcus 	aica_query_devinfo,
    166  1.1  marcus 	NULL,				/* aica_allocm */
    167  1.1  marcus 	NULL,				/* aica_freem */
    168  1.1  marcus 
    169  1.1  marcus 	aica_round_buffersize,		/* aica_round_buffersize */
    170  1.1  marcus 
    171  1.1  marcus 	NULL,				/* aica_mappage */
    172  1.1  marcus 	aica_get_props,
    173  1.1  marcus 	aica_trigger_output,
    174  1.1  marcus 	aica_trigger_input,
    175  1.1  marcus 	NULL,				/* aica_dev_ioctl */
    176  1.1  marcus };
    177  1.1  marcus 
    178  1.1  marcus int
    179  1.1  marcus aica_match(struct device *parent, struct cfdata *cf, void *aux)
    180  1.1  marcus {
    181  1.1  marcus 	static int aica_matched = 0;
    182  1.1  marcus 
    183  1.1  marcus 	if (aica_matched)
    184  1.1  marcus 		return 0;
    185  1.1  marcus 
    186  1.1  marcus 	aica_matched = 1;
    187  1.1  marcus 	return 1;
    188  1.1  marcus }
    189  1.1  marcus 
    190  1.1  marcus void
    191  1.1  marcus aica_attach(struct device *parent, struct device *self, void *aux)
    192  1.1  marcus {
    193  1.1  marcus 	struct aica_softc *sc = (struct aica_softc *)self;
    194  1.1  marcus 	struct g2bus_attach_args *ga = aux;
    195  1.1  marcus 	int i;
    196  1.1  marcus 
    197  1.1  marcus 	sc->sc_memt = ga->ga_memt;
    198  1.1  marcus 
    199  1.1  marcus 	if (bus_space_map(sc->sc_memt, AICA_REG_ADDR, 0x3000, 0,
    200  1.1  marcus 	    &sc->sc_aica_regh) != 0) {
    201  1.1  marcus 		printf(": can't map AICA register space\n");
    202  1.1  marcus 		return;
    203  1.1  marcus 	}
    204  1.1  marcus 
    205  1.1  marcus 	if (bus_space_map(sc->sc_memt, AICA_RAM_START, AICA_RAM_SIZE, 0,
    206  1.1  marcus 	    &sc->sc_aica_memh) != 0) {
    207  1.1  marcus 		printf(": can't map AICA memory space\n");
    208  1.1  marcus 		return;
    209  1.1  marcus 	}
    210  1.1  marcus 
    211  1.1  marcus 	printf(": ARM7 Sound Processing Unit\n");
    212  1.1  marcus 
    213  1.1  marcus 	aica_disable(sc);
    214  1.1  marcus 
    215  1.1  marcus 	for (i = 0; i < AICA_NCHAN; i++)
    216  1.1  marcus 		bus_space_write_4(sc->sc_memt,sc->sc_aica_regh, i << 7,
    217  1.1  marcus 		    ((bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, i << 7)
    218  1.1  marcus 		    & ~0x4000) | 0x8000));
    219  1.1  marcus 
    220  1.1  marcus 	/* load microcode, and clear memory */
    221  1.1  marcus 	bus_space_set_region_4(sc->sc_memt, sc->sc_aica_memh,
    222  1.1  marcus 	    0, 0, AICA_RAM_SIZE);
    223  1.1  marcus 
    224  1.1  marcus 	aica_memwrite(sc, 0, aica_armcode, sizeof(aica_armcode));
    225  1.1  marcus 
    226  1.1  marcus 	aica_enable(sc);
    227  1.1  marcus 
    228  1.1  marcus 	printf("%s: interrupting at %s\n", sc->sc_dev.dv_xname,
    229  1.1  marcus 	    sysasic_intr_string(IPL_BIO));
    230  1.1  marcus 	sysasic_intr_establish(SYSASIC_EVENT_AICA, IPL_BIO, aica_intr, sc);
    231  1.1  marcus 
    232  1.1  marcus 	audio_attach_mi(&aica_hw_if, sc, &sc->sc_dev);
    233  1.1  marcus 
    234  1.1  marcus 	/* init parameters */
    235  1.1  marcus 	sc->sc_output_master = 255;
    236  1.1  marcus 	sc->sc_output_gain[AICA_VOLUME_LEFT]  = 255;
    237  1.1  marcus 	sc->sc_output_gain[AICA_VOLUME_RIGHT] = 255;
    238  1.1  marcus }
    239  1.1  marcus 
    240  1.1  marcus void
    241  1.1  marcus aica_enable(struct aica_softc *sc)
    242  1.1  marcus {
    243  1.1  marcus 
    244  1.1  marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x28a8, 24);
    245  1.1  marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00,
    246  1.1  marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00) & ~1);
    247  1.1  marcus }
    248  1.1  marcus 
    249  1.1  marcus void
    250  1.1  marcus aica_disable(struct aica_softc *sc)
    251  1.1  marcus {
    252  1.1  marcus 
    253  1.1  marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00,
    254  1.1  marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_regh, 0x2c00) | 1);
    255  1.1  marcus }
    256  1.1  marcus 
    257  1.1  marcus inline static void
    258  1.1  marcus aica_g2fifo_wait()
    259  1.1  marcus {
    260  1.1  marcus 	int i;
    261  1.1  marcus 
    262  1.1  marcus 	i = AICA_TIMEOUT;
    263  1.1  marcus 	while (--i > 0)
    264  1.1  marcus 		if ((*(volatile u_int32_t *)0xa05f688c) & 0x11)
    265  1.1  marcus 			break;
    266  1.1  marcus }
    267  1.1  marcus 
    268  1.1  marcus void
    269  1.1  marcus aica_memwrite(struct aica_softc *sc, bus_size_t offset, u_int32_t *src, int len)
    270  1.1  marcus {
    271  1.1  marcus 	int n;
    272  1.1  marcus 
    273  1.1  marcus 	KASSERT((offset & 3) == 0);
    274  1.1  marcus 	n = (len + 3) / 4;	/* u_int32_t * n (aligned) */
    275  1.1  marcus 
    276  1.1  marcus 	aica_g2fifo_wait();
    277  1.1  marcus 	bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    278  1.1  marcus 	    offset, src, n);
    279  1.1  marcus }
    280  1.1  marcus 
    281  1.1  marcus void
    282  1.1  marcus aica_ch2p16write(struct aica_softc *sc, bus_size_t offset, u_int16_t *src,
    283  1.1  marcus     int len)
    284  1.1  marcus {
    285  1.1  marcus 	union {
    286  1.1  marcus 		u_int32_t w[8];
    287  1.1  marcus 		u_int16_t s[16];
    288  1.1  marcus 	} buf;
    289  1.1  marcus 	u_int16_t *p;
    290  1.1  marcus 	int i;
    291  1.1  marcus 
    292  1.1  marcus 	KASSERT((offset & 3) == 0);
    293  1.1  marcus 
    294  1.1  marcus 	while (len >= 32) {
    295  1.1  marcus 		p = buf.s;
    296  1.1  marcus 		*p++ = *src++; src++;
    297  1.1  marcus 		*p++ = *src++; src++;
    298  1.1  marcus 		*p++ = *src++; src++;
    299  1.1  marcus 		*p++ = *src++; src++;
    300  1.1  marcus 		*p++ = *src++; src++;
    301  1.1  marcus 		*p++ = *src++; src++;
    302  1.1  marcus 		*p++ = *src++; src++;
    303  1.1  marcus 		*p++ = *src++; src++;
    304  1.1  marcus 		*p++ = *src++; src++;
    305  1.1  marcus 		*p++ = *src++; src++;
    306  1.1  marcus 		*p++ = *src++; src++;
    307  1.1  marcus 		*p++ = *src++; src++;
    308  1.1  marcus 		*p++ = *src++; src++;
    309  1.1  marcus 		*p++ = *src++; src++;
    310  1.1  marcus 		*p++ = *src++; src++;
    311  1.1  marcus 		*p++ = *src++; src++;
    312  1.1  marcus 
    313  1.1  marcus 		aica_g2fifo_wait();
    314  1.1  marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    315  1.1  marcus 		    offset, buf.w , 32 / 4);
    316  1.1  marcus 
    317  1.1  marcus 		offset += sizeof(u_int16_t) * 16;
    318  1.1  marcus 		len -= 32;
    319  1.1  marcus 	}
    320  1.1  marcus 
    321  1.1  marcus 	if (len / 2 > 0) {
    322  1.1  marcus 		p = buf.s;
    323  1.1  marcus 		for (i = 0; i < len / 2; i++) {
    324  1.1  marcus 			*p++ = *src++; src++;
    325  1.1  marcus 		}
    326  1.1  marcus 
    327  1.1  marcus 		aica_g2fifo_wait();
    328  1.1  marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    329  1.1  marcus 		    offset, buf.w, len / 4);
    330  1.1  marcus 	}
    331  1.1  marcus }
    332  1.1  marcus 
    333  1.1  marcus void
    334  1.1  marcus aica_ch2p8write(struct aica_softc *sc, bus_size_t offset, u_int8_t *src,
    335  1.1  marcus     int len)
    336  1.1  marcus {
    337  1.1  marcus 	u_int32_t buf[8];
    338  1.1  marcus 	u_int8_t *p;
    339  1.1  marcus 	int i;
    340  1.1  marcus 
    341  1.1  marcus 	KASSERT((offset & 3) == 0);
    342  1.1  marcus 	while (len >= 32) {
    343  1.1  marcus 		p = (u_int8_t *)buf;
    344  1.1  marcus 
    345  1.1  marcus 		*p++ = *src++; src++;
    346  1.1  marcus 		*p++ = *src++; src++;
    347  1.1  marcus 		*p++ = *src++; src++;
    348  1.1  marcus 		*p++ = *src++; src++;
    349  1.1  marcus 		*p++ = *src++; src++;
    350  1.1  marcus 		*p++ = *src++; src++;
    351  1.1  marcus 		*p++ = *src++; src++;
    352  1.1  marcus 		*p++ = *src++; src++;
    353  1.1  marcus 		*p++ = *src++; src++;
    354  1.1  marcus 		*p++ = *src++; src++;
    355  1.1  marcus 		*p++ = *src++; src++;
    356  1.1  marcus 		*p++ = *src++; src++;
    357  1.1  marcus 		*p++ = *src++; src++;
    358  1.1  marcus 		*p++ = *src++; src++;
    359  1.1  marcus 		*p++ = *src++; src++;
    360  1.1  marcus 		*p++ = *src++; src++;
    361  1.1  marcus 		*p++ = *src++; src++;
    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 
    378  1.1  marcus 		aica_g2fifo_wait();
    379  1.1  marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    380  1.1  marcus 		    offset, buf, 32 / 4);
    381  1.1  marcus 
    382  1.1  marcus 		offset += 32;
    383  1.1  marcus 		len -= 32;
    384  1.1  marcus 	}
    385  1.1  marcus 
    386  1.1  marcus 	if (len) {
    387  1.1  marcus 		p = (u_int8_t *)buf;
    388  1.1  marcus 		for (i = 0; i < len; i++)
    389  1.1  marcus 			*p++ = *src++; src++;
    390  1.1  marcus 
    391  1.1  marcus 		aica_g2fifo_wait();
    392  1.1  marcus 		bus_space_write_region_4(sc->sc_memt, sc->sc_aica_memh,
    393  1.1  marcus 		    offset, buf, len / 4);
    394  1.1  marcus 	}
    395  1.1  marcus }
    396  1.1  marcus 
    397  1.1  marcus int
    398  1.1  marcus aica_open(void *addr, int flags)
    399  1.1  marcus {
    400  1.1  marcus 	struct aica_softc *sc = addr;
    401  1.1  marcus 
    402  1.1  marcus 	if (sc->sc_open)
    403  1.1  marcus 		return EBUSY;
    404  1.1  marcus 
    405  1.1  marcus 	sc->sc_intr = NULL;
    406  1.1  marcus 	sc->sc_open = 1;
    407  1.1  marcus 
    408  1.1  marcus 	return 0;
    409  1.1  marcus }
    410  1.1  marcus 
    411  1.1  marcus void
    412  1.1  marcus aica_close(void *addr)
    413  1.1  marcus {
    414  1.1  marcus 	struct aica_softc *sc = addr;
    415  1.1  marcus 
    416  1.1  marcus 	sc->sc_open = 0;
    417  1.1  marcus 	sc->sc_intr = NULL;
    418  1.1  marcus }
    419  1.1  marcus 
    420  1.1  marcus int
    421  1.1  marcus aica_query_encoding(void *addr, struct audio_encoding *fp)
    422  1.1  marcus {
    423  1.1  marcus 	if (fp->index >= sizeof(aica_encodings) / sizeof(aica_encodings[0]))
    424  1.1  marcus 		return EINVAL;
    425  1.1  marcus 
    426  1.1  marcus 	strcpy(fp->name, aica_encodings[fp->index].name);
    427  1.1  marcus 	fp->encoding = aica_encodings[fp->index].encoding;
    428  1.1  marcus 	fp->precision = aica_encodings[fp->index].precision;
    429  1.1  marcus 	fp->flags = 0;
    430  1.1  marcus 
    431  1.1  marcus 	return 0;
    432  1.1  marcus }
    433  1.1  marcus 
    434  1.1  marcus int
    435  1.1  marcus aica_set_params(void *addr, int setmode, int usemode,
    436  1.1  marcus     struct audio_params *play, struct audio_params *rec)
    437  1.1  marcus {
    438  1.1  marcus 	struct aica_softc *sc = addr;
    439  1.1  marcus 
    440  1.1  marcus 	if ((play->channels != 1) &&
    441  1.1  marcus 	    (play->channels != 2))
    442  1.1  marcus 		return EINVAL;
    443  1.1  marcus 
    444  1.1  marcus 	if ((play->precision != 4) &&
    445  1.1  marcus 	    (play->precision != 8) &&
    446  1.1  marcus 	    (play->precision != 16))
    447  1.1  marcus 		return EINVAL;
    448  1.1  marcus 
    449  1.1  marcus 	play->factor = 1;
    450  1.1  marcus 	play->factor_denom = 1;
    451  1.1  marcus 
    452  1.1  marcus 	play->hw_precision = play->precision;
    453  1.1  marcus 	play->hw_channels = play->channels;
    454  1.1  marcus 	play->hw_sample_rate = play->sample_rate;
    455  1.1  marcus 	play->hw_encoding = AUDIO_ENCODING_SLINEAR_LE;
    456  1.1  marcus 
    457  1.1  marcus 	play->sw_code = NULL;
    458  1.1  marcus 
    459  1.1  marcus 	sc->sc_precision = play->hw_precision;
    460  1.1  marcus 	sc->sc_channels = play->hw_channels;
    461  1.1  marcus 	sc->sc_rate = play->hw_sample_rate;
    462  1.1  marcus 	sc->sc_encodings = play->hw_encoding;
    463  1.1  marcus 
    464  1.1  marcus #if 1
    465  1.1  marcus 	/* XXX: limit check */
    466  1.1  marcus 	if ((play->precision == 4) &&
    467  1.1  marcus 	    (play->channels == 1) &&
    468  1.1  marcus 	    (play->sample_rate >= 65536))
    469  1.1  marcus 		return EINVAL;
    470  1.1  marcus 
    471  1.1  marcus 	if ((play->precision == 8) &&
    472  1.1  marcus 	    (play->channels == 1) &&
    473  1.1  marcus 	    (play->sample_rate >= 65536))
    474  1.1  marcus 		return EINVAL;
    475  1.1  marcus #endif
    476  1.1  marcus 
    477  1.1  marcus 	switch (play->encoding) {
    478  1.1  marcus 	case AUDIO_ENCODING_ADPCM:
    479  1.1  marcus 		if (play->precision != 4)
    480  1.1  marcus 			return EINVAL;
    481  1.1  marcus 		if (play->channels != 1)
    482  1.1  marcus 			return EINVAL;
    483  1.1  marcus 
    484  1.1  marcus 		play->hw_encoding = AUDIO_ENCODING_ADPCM;
    485  1.1  marcus 		play->hw_precision = 8;	/* 4? XXX */
    486  1.1  marcus 		sc->sc_precision = 4;
    487  1.1  marcus 		break;
    488  1.1  marcus 
    489  1.1  marcus 	case AUDIO_ENCODING_SLINEAR:
    490  1.1  marcus 		break;
    491  1.1  marcus 	case AUDIO_ENCODING_ULINEAR:
    492  1.1  marcus 		play->sw_code = change_sign8;
    493  1.1  marcus 		break;
    494  1.1  marcus 
    495  1.1  marcus 	case AUDIO_ENCODING_SLINEAR_BE:
    496  1.1  marcus 		if (play->precision == 16)
    497  1.1  marcus 			play->sw_code = swap_bytes;
    498  1.1  marcus 		break;
    499  1.1  marcus 	case AUDIO_ENCODING_SLINEAR_LE:
    500  1.1  marcus 		break;
    501  1.1  marcus 	case AUDIO_ENCODING_ULINEAR_BE:
    502  1.1  marcus 		if (play->precision == 16)
    503  1.1  marcus 			play->sw_code = swap_bytes_change_sign16_le;
    504  1.1  marcus 		break;
    505  1.1  marcus 	case AUDIO_ENCODING_ULINEAR_LE:
    506  1.1  marcus 		if (play->precision == 16)
    507  1.1  marcus 			play->sw_code = change_sign16_le;
    508  1.1  marcus 		break;
    509  1.1  marcus 
    510  1.1  marcus 	case AUDIO_ENCODING_ULAW:
    511  1.1  marcus 		play->sw_code = mulaw_to_slinear16_le;
    512  1.1  marcus 		play->hw_precision = 16;
    513  1.1  marcus 		sc->sc_precision = play->hw_precision;
    514  1.1  marcus 		break;
    515  1.1  marcus 	case AUDIO_ENCODING_ALAW:
    516  1.1  marcus 		play->sw_code = alaw_to_slinear16_le;
    517  1.1  marcus 		play->hw_precision = 16;
    518  1.1  marcus 		sc->sc_precision = play->hw_precision;
    519  1.1  marcus 		break;
    520  1.1  marcus 
    521  1.1  marcus 	default:
    522  1.1  marcus 		return EINVAL;
    523  1.1  marcus 	}
    524  1.1  marcus 
    525  1.1  marcus 	return 0;
    526  1.1  marcus }
    527  1.1  marcus 
    528  1.1  marcus int
    529  1.1  marcus aica_round_blocksize(void *addr, int blk)
    530  1.1  marcus {
    531  1.1  marcus 	struct aica_softc *sc = addr;
    532  1.1  marcus 
    533  1.1  marcus 	switch (sc->sc_precision) {
    534  1.1  marcus 	case 4:
    535  1.1  marcus 		if (sc->sc_channels == 1)
    536  1.1  marcus 			return AICA_DMABUF_SIZE / 4;
    537  1.1  marcus 		else
    538  1.1  marcus 			return AICA_DMABUF_SIZE / 2;
    539  1.1  marcus 		break;
    540  1.1  marcus 	case 8:
    541  1.1  marcus 		if (sc->sc_channels == 1)
    542  1.1  marcus 			return AICA_DMABUF_SIZE / 2;
    543  1.1  marcus 		else
    544  1.1  marcus 			return AICA_DMABUF_SIZE;
    545  1.1  marcus 		break;
    546  1.1  marcus 	case 16:
    547  1.1  marcus 		if (sc->sc_channels == 1)
    548  1.1  marcus 			return AICA_DMABUF_SIZE;
    549  1.1  marcus 		else
    550  1.1  marcus 			return AICA_DMABUF_SIZE * 2;
    551  1.1  marcus 		break;
    552  1.1  marcus 	default:
    553  1.1  marcus 		break;
    554  1.1  marcus 	}
    555  1.1  marcus 
    556  1.1  marcus 	return AICA_DMABUF_SIZE / 4;
    557  1.1  marcus }
    558  1.1  marcus 
    559  1.1  marcus size_t
    560  1.1  marcus aica_round_buffersize(void *addr, int dir, size_t bufsize)
    561  1.1  marcus {
    562  1.1  marcus 
    563  1.1  marcus 	if (dir == AUMODE_PLAY)
    564  1.1  marcus 		return 65536;
    565  1.1  marcus 
    566  1.1  marcus 	return 512;	/* XXX: AUMINBUF */
    567  1.1  marcus }
    568  1.1  marcus 
    569  1.1  marcus void
    570  1.1  marcus aica_command(struct aica_softc *sc, u_int32_t command)
    571  1.1  marcus {
    572  1.1  marcus 
    573  1.1  marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_memh,
    574  1.1  marcus 	    AICA_ARM_CMD_COMMAND, command);
    575  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh, AICA_ARM_CMD_SERIAL,
    576  1.1  marcus 	    bus_space_read_4(sc->sc_memt, sc->sc_aica_memh,
    577  1.1  marcus 	    AICA_ARM_CMD_SERIAL) + 1);
    578  1.1  marcus }
    579  1.1  marcus 
    580  1.1  marcus void
    581  1.1  marcus aica_sendparam(struct aica_softc *sc, u_int32_t command,
    582  1.1  marcus     int32_t lparam, int32_t rparam)
    583  1.1  marcus {
    584  1.1  marcus 
    585  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    586  1.1  marcus 	    AICA_ARM_CMD_LPARAM, lparam);
    587  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    588  1.1  marcus 	    AICA_ARM_CMD_RPARAM, rparam);
    589  1.1  marcus 
    590  1.1  marcus 	aica_command(sc, command);
    591  1.1  marcus }
    592  1.1  marcus 
    593  1.1  marcus void
    594  1.1  marcus aica_play(struct aica_softc *sc, int blksize, int channel, int rate, int prec)
    595  1.1  marcus {
    596  1.1  marcus 
    597  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    598  1.1  marcus 	    AICA_ARM_CMD_BLOCKSIZE, blksize);
    599  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    600  1.1  marcus 	    AICA_ARM_CMD_CHANNEL, channel);
    601  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    602  1.1  marcus 	    AICA_ARM_CMD_RATE, rate);
    603  1.1  marcus 	bus_space_write_4(sc->sc_memt,sc->sc_aica_memh,
    604  1.1  marcus 	    AICA_ARM_CMD_PRECISION, prec);
    605  1.1  marcus 
    606  1.1  marcus 	aica_command(sc, AICA_COMMAND_PLAY);
    607  1.1  marcus }
    608  1.1  marcus 
    609  1.1  marcus void
    610  1.1  marcus aica_fillbuffer(struct aica_softc *sc)
    611  1.1  marcus {
    612  1.1  marcus 
    613  1.1  marcus 	if (sc->sc_channels == 2) {
    614  1.1  marcus 		if (sc->sc_precision == 16) {
    615  1.1  marcus 			aica_ch2p16write(sc,
    616  1.1  marcus 			    AICA_DMABUF_LEFT + sc->sc_nextfill,
    617  1.1  marcus 			    (u_int16_t *)sc->sc_buffer + 0, sc->sc_blksize / 2);
    618  1.1  marcus 			aica_ch2p16write(sc,
    619  1.1  marcus 			    AICA_DMABUF_RIGHT + sc->sc_nextfill,
    620  1.1  marcus 			    (u_int16_t *)sc->sc_buffer + 1, sc->sc_blksize / 2);
    621  1.1  marcus 		} else if (sc->sc_precision == 8) {
    622  1.1  marcus 			aica_ch2p8write(sc, AICA_DMABUF_LEFT + sc->sc_nextfill,
    623  1.1  marcus 			    (u_int8_t *)sc->sc_buffer + 0, sc->sc_blksize / 2);
    624  1.1  marcus 			aica_ch2p8write(sc, AICA_DMABUF_RIGHT + sc->sc_nextfill,
    625  1.1  marcus 			    (u_int8_t *)sc->sc_buffer + 1, sc->sc_blksize / 2);
    626  1.1  marcus 		}
    627  1.1  marcus 	} else {
    628  1.1  marcus 		aica_memwrite(sc, AICA_DMABUF_MONO + sc->sc_nextfill,
    629  1.1  marcus 		    sc->sc_buffer, sc->sc_blksize);
    630  1.1  marcus 	}
    631  1.1  marcus 
    632  1.1  marcus 	(int8_t *)sc->sc_buffer += sc->sc_blksize;
    633  1.1  marcus 	if (sc->sc_buffer >= sc->sc_buffer_end)
    634  1.1  marcus 		sc->sc_buffer = sc->sc_buffer_start;
    635  1.1  marcus 
    636  1.1  marcus 	sc->sc_nextfill ^= sc->sc_blksize / sc->sc_channels;
    637  1.1  marcus }
    638  1.1  marcus 
    639  1.1  marcus int
    640  1.1  marcus aica_intr(void *arg)
    641  1.1  marcus {
    642  1.1  marcus 	struct aica_softc *sc = arg;
    643  1.1  marcus 
    644  1.1  marcus 	aica_fillbuffer(sc);
    645  1.1  marcus 
    646  1.1  marcus 	/* call audio interrupt handler (audio_pint()) */
    647  1.1  marcus 	if (sc->sc_open && sc->sc_intr != NULL) {
    648  1.1  marcus 		(*(sc->sc_intr))(sc->sc_intr_arg);
    649  1.1  marcus 	}
    650  1.1  marcus 
    651  1.1  marcus 	/* clear SPU interrupt */
    652  1.1  marcus 	bus_space_write_4(sc->sc_memt, sc->sc_aica_regh, 0x28bc, 0x20);
    653  1.1  marcus 	return 1;
    654  1.1  marcus }
    655  1.1  marcus 
    656  1.1  marcus int
    657  1.1  marcus aica_trigger_output(void *addr, void *start, void *end, int blksize,
    658  1.1  marcus     void (*intr)(void *), void *arg, struct audio_params *param)
    659  1.1  marcus {
    660  1.1  marcus 	struct aica_softc *sc = addr;
    661  1.1  marcus 
    662  1.1  marcus 	aica_command(sc, AICA_COMMAND_INIT);
    663  1.1  marcus 	tsleep(aica_trigger_output, PWAIT, "aicawait", hz / 20);
    664  1.1  marcus 
    665  1.1  marcus 	sc->sc_buffer_start = sc->sc_buffer = start;
    666  1.1  marcus 	sc->sc_buffer_end = end;
    667  1.1  marcus 	sc->sc_blksize = blksize;
    668  1.1  marcus 	sc->sc_nextfill = 0;
    669  1.1  marcus 
    670  1.1  marcus 	sc->sc_intr = intr;
    671  1.1  marcus 	sc->sc_intr_arg = arg;
    672  1.1  marcus 
    673  1.1  marcus 	/* fill buffers in advance */
    674  1.1  marcus 	aica_intr(sc);
    675  1.1  marcus 	aica_intr(sc);
    676  1.1  marcus 
    677  1.1  marcus 	/* ...and start playing */
    678  1.1  marcus 	aica_play(sc, blksize / sc->sc_channels, sc->sc_channels, sc->sc_rate,
    679  1.1  marcus 	    sc->sc_precision);
    680  1.1  marcus 
    681  1.1  marcus 	return 0;
    682  1.1  marcus }
    683  1.1  marcus 
    684  1.1  marcus int
    685  1.1  marcus aica_trigger_input(void *addr, void *start, void *end, int blksize,
    686  1.1  marcus     void (*intr)(void *), void *arg, struct audio_params *param)
    687  1.1  marcus {
    688  1.1  marcus 
    689  1.1  marcus 	return ENODEV;
    690  1.1  marcus }
    691  1.1  marcus 
    692  1.1  marcus int
    693  1.1  marcus aica_halt_output(void *addr)
    694  1.1  marcus {
    695  1.1  marcus 	struct aica_softc *sc = addr;
    696  1.1  marcus 
    697  1.1  marcus 	aica_command(sc, AICA_COMMAND_STOP);
    698  1.1  marcus 
    699  1.1  marcus 	return 0;
    700  1.1  marcus }
    701  1.1  marcus 
    702  1.1  marcus int
    703  1.1  marcus aica_halt_input(void *addr)
    704  1.1  marcus {
    705  1.1  marcus 
    706  1.1  marcus 	return ENODEV;
    707  1.1  marcus }
    708  1.1  marcus 
    709  1.1  marcus int
    710  1.1  marcus aica_getdev(void *addr, struct audio_device *ret)
    711  1.1  marcus {
    712  1.1  marcus 
    713  1.1  marcus 	*ret = aica_device;
    714  1.1  marcus 	return 0;
    715  1.1  marcus }
    716  1.1  marcus 
    717  1.1  marcus int
    718  1.1  marcus aica_set_port(void *addr, mixer_ctrl_t *mc)
    719  1.1  marcus {
    720  1.1  marcus 	struct aica_softc *sc = addr;
    721  1.1  marcus 
    722  1.1  marcus 	switch (mc->dev) {
    723  1.1  marcus 	case AICA_MASTER_VOL:
    724  1.1  marcus 		sc->sc_output_master =
    725  1.1  marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] & 0xff;
    726  1.1  marcus 		aica_sendparam(sc, AICA_COMMAND_MVOL,
    727  1.1  marcus 		    sc->sc_output_master, sc->sc_output_master);
    728  1.1  marcus 		break;
    729  1.1  marcus 	case AICA_OUTPUT_GAIN:
    730  1.1  marcus 		sc->sc_output_gain[AICA_VOLUME_LEFT] =
    731  1.1  marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT]  & 0xff;
    732  1.1  marcus 		sc->sc_output_gain[AICA_VOLUME_RIGHT] =
    733  1.1  marcus 		    mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] & 0xff;
    734  1.1  marcus 		aica_sendparam(sc, AICA_COMMAND_VOL,
    735  1.1  marcus 		    sc->sc_output_gain[AICA_VOLUME_LEFT],
    736  1.1  marcus 		    sc->sc_output_gain[AICA_VOLUME_RIGHT]);
    737  1.1  marcus 		break;
    738  1.1  marcus 	default:
    739  1.1  marcus 		return EINVAL;
    740  1.1  marcus 	}
    741  1.1  marcus 
    742  1.1  marcus 	return 0;
    743  1.1  marcus }
    744  1.1  marcus 
    745  1.1  marcus int
    746  1.1  marcus aica_get_port(void *addr, mixer_ctrl_t *mc)
    747  1.1  marcus {
    748  1.1  marcus 	struct aica_softc *sc = addr;
    749  1.1  marcus 
    750  1.1  marcus 	switch (mc->dev) {
    751  1.1  marcus 	case AICA_MASTER_VOL:
    752  1.1  marcus 		if (mc->un.value.num_channels != 1)
    753  1.1  marcus 			return EINVAL;
    754  1.1  marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] =
    755  1.1  marcus 		    L16TO256(L256TO16(sc->sc_output_master));
    756  1.1  marcus 		break;
    757  1.1  marcus 	case AICA_OUTPUT_GAIN:
    758  1.1  marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT] =
    759  1.1  marcus 		    sc->sc_output_gain[AICA_VOLUME_LEFT];
    760  1.1  marcus 		mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] =
    761  1.1  marcus 		    sc->sc_output_gain[AICA_VOLUME_RIGHT];
    762  1.1  marcus 		break;
    763  1.1  marcus 	default:
    764  1.1  marcus 		return EINVAL;
    765  1.1  marcus 	}
    766  1.1  marcus 	return 0;
    767  1.1  marcus }
    768  1.1  marcus 
    769  1.1  marcus int
    770  1.1  marcus aica_query_devinfo(void *addr, mixer_devinfo_t *md)
    771  1.1  marcus {
    772  1.1  marcus 
    773  1.1  marcus 	switch (md->index) {
    774  1.1  marcus 	case AICA_MASTER_VOL:
    775  1.1  marcus 		md->type = AUDIO_MIXER_VALUE;
    776  1.1  marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    777  1.1  marcus 		md->prev = md->next = AUDIO_MIXER_LAST;
    778  1.1  marcus 		strcpy(md->label.name, AudioNmaster);
    779  1.1  marcus 		md->un.v.num_channels = 1;
    780  1.1  marcus 		strcpy(md->un.v.units.name, AudioNvolume);
    781  1.1  marcus 		return 0;
    782  1.1  marcus 	case AICA_OUTPUT_GAIN:
    783  1.1  marcus 		md->type = AUDIO_MIXER_VALUE;
    784  1.1  marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    785  1.1  marcus 		md->prev = md->next = AUDIO_MIXER_LAST;
    786  1.1  marcus 		strcpy(md->label.name, AudioNoutput);
    787  1.1  marcus 		md->un.v.num_channels = 2;
    788  1.1  marcus 		strcpy(md->label.name, AudioNvolume);
    789  1.1  marcus 		return 0;
    790  1.1  marcus 	case AICA_OUTPUT_CLASS:
    791  1.1  marcus 		md->type = AUDIO_MIXER_CLASS;
    792  1.1  marcus 		md->mixer_class = AICA_OUTPUT_CLASS;
    793  1.1  marcus 		md->next = md->prev = AUDIO_MIXER_LAST;
    794  1.1  marcus 		strcpy(md->label.name, AudioCoutputs);
    795  1.1  marcus 		return 0;
    796  1.1  marcus 	}
    797  1.1  marcus 
    798  1.1  marcus 	return ENXIO;
    799  1.1  marcus }
    800  1.1  marcus 
    801  1.1  marcus int
    802  1.1  marcus aica_get_props(void *addr)
    803  1.1  marcus {
    804  1.1  marcus 
    805  1.1  marcus 	return 0;
    806  1.1  marcus }
    807