Home | History | Annotate | Line # | Download | only in dev
vs.c revision 1.50
      1  1.50     isaki /*	$NetBSD: vs.c,v 1.50 2019/03/16 12:09:57 isaki Exp $	*/
      2   1.1   minoura 
      3   1.1   minoura /*
      4   1.1   minoura  * Copyright (c) 2001 Tetsuya Isaki. All rights reserved.
      5   1.1   minoura  *
      6   1.1   minoura  * Redistribution and use in source and binary forms, with or without
      7   1.1   minoura  * modification, are permitted provided that the following conditions
      8   1.1   minoura  * are met:
      9   1.1   minoura  * 1. Redistributions of source code must retain the above copyright
     10   1.1   minoura  *    notice, this list of conditions and the following disclaimer.
     11   1.1   minoura  * 2. Redistributions in binary form must reproduce the above copyright
     12   1.1   minoura  *    notice, this list of conditions and the following disclaimer in the
     13   1.1   minoura  *    documentation and/or other materials provided with the distribution.
     14   1.1   minoura  *
     15   1.1   minoura  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     16   1.1   minoura  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     17   1.1   minoura  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     18   1.1   minoura  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     19   1.1   minoura  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
     20   1.1   minoura  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     21   1.1   minoura  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
     22   1.1   minoura  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     23   1.1   minoura  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     24   1.1   minoura  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     25   1.1   minoura  * SUCH DAMAGE.
     26   1.1   minoura  */
     27   1.1   minoura 
     28   1.1   minoura /*
     29   1.1   minoura  * VS - OKI MSM6258 ADPCM voice synthesizer device driver.
     30   1.1   minoura  */
     31  1.22     lukem 
     32  1.22     lukem #include <sys/cdefs.h>
     33  1.50     isaki __KERNEL_RCSID(0, "$NetBSD: vs.c,v 1.50 2019/03/16 12:09:57 isaki Exp $");
     34   1.1   minoura 
     35   1.1   minoura #include "audio.h"
     36   1.1   minoura #include "vs.h"
     37   1.1   minoura #if NAUDIO > 0 && NVS > 0
     38   1.1   minoura 
     39   1.1   minoura #include <sys/param.h>
     40   1.1   minoura #include <sys/systm.h>
     41   1.1   minoura #include <sys/device.h>
     42  1.35  jmcneill #include <sys/kmem.h>
     43   1.1   minoura 
     44   1.1   minoura #include <sys/audioio.h>
     45   1.1   minoura #include <dev/audio_if.h>
     46  1.27      kent #include <dev/mulaw.h>
     47   1.1   minoura 
     48   1.1   minoura #include <machine/bus.h>
     49   1.1   minoura #include <machine/cpu.h>
     50   1.1   minoura 
     51   1.1   minoura #include <dev/ic/msm6258var.h>
     52   1.1   minoura 
     53   1.1   minoura #include <arch/x68k/dev/dmacvar.h>
     54   1.1   minoura #include <arch/x68k/dev/intiovar.h>
     55  1.24   minoura #include <arch/x68k/dev/opmvar.h>
     56   1.1   minoura 
     57   1.1   minoura #include <arch/x68k/dev/vsvar.h>
     58   1.1   minoura 
     59   1.1   minoura #ifdef VS_DEBUG
     60  1.28      kent #define DPRINTF(y,x)	if (vs_debug >= (y)) printf x
     61   1.9     isaki static int vs_debug;
     62   1.1   minoura #ifdef AUDIO_DEBUG
     63   1.1   minoura extern int audiodebug;
     64   1.1   minoura #endif
     65   1.1   minoura #else
     66   1.9     isaki #define DPRINTF(y,x)
     67   1.1   minoura #endif
     68   1.1   minoura 
     69  1.33     isaki static int  vs_match(device_t, cfdata_t, void *);
     70  1.33     isaki static void vs_attach(device_t, device_t, void *);
     71   1.1   minoura 
     72  1.28      kent static int  vs_dmaintr(void *);
     73  1.28      kent static int  vs_dmaerrintr(void *);
     74   1.1   minoura 
     75   1.1   minoura /* MI audio layer interface */
     76  1.28      kent static int  vs_open(void *, int);
     77  1.28      kent static void vs_close(void *);
     78  1.28      kent static int  vs_query_encoding(void *, struct audio_encoding *);
     79  1.28      kent static int  vs_set_params(void *, int, int, audio_params_t *,
     80  1.28      kent 	audio_params_t *, stream_filter_list_t *, stream_filter_list_t *);
     81  1.43     isaki static int  vs_init_output(void *, void *, int);
     82  1.43     isaki static int  vs_init_input(void *, void *, int);
     83  1.43     isaki static int  vs_start_input(void *, void *, int, void (*)(void *), void *);
     84  1.43     isaki static int  vs_start_output(void *, void *, int, void (*)(void *), void *);
     85  1.28      kent static int  vs_halt_output(void *);
     86  1.28      kent static int  vs_halt_input(void *);
     87  1.35  jmcneill static int  vs_allocmem(struct vs_softc *, size_t, size_t, size_t,
     88  1.28      kent 	struct vs_dma *);
     89  1.28      kent static void vs_freemem(struct vs_dma *);
     90  1.28      kent static int  vs_getdev(void *, struct audio_device *);
     91  1.28      kent static int  vs_set_port(void *, mixer_ctrl_t *);
     92  1.28      kent static int  vs_get_port(void *, mixer_ctrl_t *);
     93  1.28      kent static int  vs_query_devinfo(void *, mixer_devinfo_t *);
     94  1.35  jmcneill static void *vs_allocm(void *, int, size_t);
     95  1.35  jmcneill static void vs_freem(void *, void *, size_t);
     96  1.28      kent static size_t vs_round_buffersize(void *, int, size_t);
     97  1.28      kent static int  vs_get_props(void *);
     98  1.35  jmcneill static void vs_get_locks(void *, kmutex_t **, kmutex_t **);
     99   1.1   minoura 
    100   1.1   minoura /* lower functions */
    101   1.2   minoura static int vs_round_sr(u_long);
    102  1.28      kent static void vs_set_sr(struct vs_softc *, int);
    103  1.28      kent static inline void vs_set_po(struct vs_softc *, u_long);
    104   1.1   minoura 
    105  1.20     isaki extern struct cfdriver vs_cd;
    106   1.1   minoura 
    107  1.33     isaki CFATTACH_DECL_NEW(vs, sizeof(struct vs_softc),
    108  1.18   thorpej     vs_match, vs_attach, NULL, NULL);
    109   1.1   minoura 
    110  1.26       chs static int vs_attached;
    111  1.26       chs 
    112  1.25      yamt static const struct audio_hw_if vs_hw_if = {
    113  1.50     isaki 	.open			= vs_open,
    114  1.50     isaki 	.close			= vs_close,
    115  1.50     isaki 	.query_encoding		= vs_query_encoding,
    116  1.50     isaki 	.set_params		= vs_set_params,
    117  1.50     isaki 	.init_output		= vs_init_output,
    118  1.50     isaki 	.init_input		= vs_init_input,
    119  1.50     isaki 	.start_output		= vs_start_output,
    120  1.50     isaki 	.start_input		= vs_start_input,
    121  1.50     isaki 	.halt_output		= vs_halt_output,
    122  1.50     isaki 	.halt_input		= vs_halt_input,
    123  1.50     isaki 	.getdev			= vs_getdev,
    124  1.50     isaki 	.set_port		= vs_set_port,
    125  1.50     isaki 	.get_port		= vs_get_port,
    126  1.50     isaki 	.query_devinfo		= vs_query_devinfo,
    127  1.50     isaki 	.allocm			= vs_allocm,
    128  1.50     isaki 	.freem			= vs_freem,
    129  1.50     isaki 	.round_buffersize	= vs_round_buffersize,
    130  1.50     isaki 	.get_props		= vs_get_props,
    131  1.50     isaki 	.get_locks		= vs_get_locks,
    132   1.1   minoura };
    133   1.1   minoura 
    134   1.1   minoura static struct audio_device vs_device = {
    135   1.1   minoura 	"OKI MSM6258",
    136   1.1   minoura 	"",
    137   1.1   minoura 	"vs"
    138   1.1   minoura };
    139   1.1   minoura 
    140   1.1   minoura struct {
    141   1.1   minoura 	u_long rate;
    142   1.1   minoura 	u_char clk;
    143   1.1   minoura 	u_char den;
    144   1.1   minoura } vs_l2r[] = {
    145   1.2   minoura 	{ VS_RATE_15K, VS_CLK_8MHZ, VS_SRATE_512 },
    146   1.2   minoura 	{ VS_RATE_10K, VS_CLK_8MHZ, VS_SRATE_768 },
    147   1.2   minoura 	{ VS_RATE_7K,  VS_CLK_8MHZ, VS_SRATE_1024},
    148   1.2   minoura 	{ VS_RATE_5K,  VS_CLK_4MHZ, VS_SRATE_768 },
    149   1.2   minoura 	{ VS_RATE_3K,  VS_CLK_4MHZ, VS_SRATE_1024}
    150   1.1   minoura };
    151   1.1   minoura 
    152   1.2   minoura #define NUM_RATE	(sizeof(vs_l2r)/sizeof(vs_l2r[0]))
    153   1.1   minoura 
    154   1.1   minoura static int
    155  1.33     isaki vs_match(device_t parent, cfdata_t cf, void *aux)
    156   1.1   minoura {
    157  1.28      kent 	struct intio_attach_args *ia;
    158   1.1   minoura 
    159  1.28      kent 	ia = aux;
    160  1.26       chs 	if (strcmp(ia->ia_name, "vs") || vs_attached)
    161   1.1   minoura 		return 0;
    162   1.1   minoura 
    163   1.1   minoura 	if (ia->ia_addr == INTIOCF_ADDR_DEFAULT)
    164   1.1   minoura 		ia->ia_addr = VS_ADDR;
    165   1.1   minoura 	if (ia->ia_dma == INTIOCF_DMA_DEFAULT)
    166   1.1   minoura 		ia->ia_dma = VS_DMA;
    167   1.1   minoura 	if (ia->ia_dmaintr == INTIOCF_DMAINTR_DEFAULT)
    168   1.1   minoura 		ia->ia_dmaintr = VS_DMAINTR;
    169   1.1   minoura 
    170   1.1   minoura 	/* fixed parameters */
    171   1.1   minoura 	if (ia->ia_addr != VS_ADDR)
    172   1.1   minoura 		return 0;
    173   1.1   minoura 	if (ia->ia_dma != VS_DMA)
    174   1.1   minoura 		return 0;
    175   1.1   minoura 	if (ia->ia_dmaintr != VS_DMAINTR)
    176   1.1   minoura 		return 0;
    177   1.1   minoura 
    178   1.9     isaki #ifdef VS_DEBUG
    179   1.9     isaki 	vs_debug = 1;
    180   1.1   minoura #ifdef AUDIO_DEBUG
    181   1.1   minoura 	audiodebug = 2;
    182   1.1   minoura #endif
    183   1.9     isaki #endif
    184   1.1   minoura 
    185   1.1   minoura 	return 1;
    186   1.1   minoura }
    187   1.1   minoura 
    188   1.1   minoura static void
    189  1.33     isaki vs_attach(device_t parent, device_t self, void *aux)
    190   1.1   minoura {
    191  1.28      kent 	struct vs_softc *sc;
    192   1.1   minoura 	bus_space_tag_t iot;
    193   1.1   minoura 	bus_space_handle_t ioh;
    194  1.28      kent 	struct intio_attach_args *ia;
    195   1.1   minoura 
    196  1.33     isaki 	sc = device_private(self);
    197  1.33     isaki 	sc->sc_dev = self;
    198  1.28      kent 	ia = aux;
    199  1.26       chs 	vs_attached = 1;
    200  1.26       chs 
    201   1.1   minoura 	printf("\n");
    202  1.28      kent 
    203   1.1   minoura 	/* Re-map the I/O space */
    204   1.1   minoura 	iot = ia->ia_bst;
    205   1.1   minoura 	bus_space_map(iot, ia->ia_addr, 0x2000, BUS_SPACE_MAP_SHIFTED, &ioh);
    206   1.1   minoura 
    207   1.1   minoura 	/* Initialize sc */
    208   1.1   minoura 	sc->sc_iot = iot;
    209   1.1   minoura 	sc->sc_ioh = ioh;
    210   1.1   minoura 	sc->sc_hw_if = &vs_hw_if;
    211  1.31  christos 	sc->sc_addr = (void *) ia->ia_addr;
    212   1.1   minoura 	sc->sc_dmas = NULL;
    213  1.47     isaki 	sc->sc_prev_vd = NULL;
    214  1.38     isaki 	sc->sc_active = 0;
    215  1.35  jmcneill 	mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
    216  1.35  jmcneill 	mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_SCHED);
    217   1.1   minoura 
    218   1.1   minoura 	/* XXX */
    219   1.1   minoura 	bus_space_map(iot, PPI_ADDR, PPI_MAPSIZE, BUS_SPACE_MAP_SHIFTED,
    220   1.1   minoura 		      &sc->sc_ppi);
    221   1.1   minoura 
    222   1.1   minoura 	/* Initialize DMAC */
    223   1.1   minoura 	sc->sc_dmat = ia->ia_dmat;
    224   1.1   minoura 	sc->sc_dma_ch = dmac_alloc_channel(parent, ia->ia_dma, "vs",
    225   1.1   minoura 		ia->ia_dmaintr,   vs_dmaintr, sc,
    226  1.46     isaki 		ia->ia_dmaintr+1, vs_dmaerrintr, sc,
    227  1.46     isaki 		(DMAC_DCR_XRM_CSWOH | DMAC_DCR_OTYP_EASYNC | DMAC_DCR_OPS_8BIT),
    228  1.46     isaki 		(DMAC_OCR_SIZE_BYTE | DMAC_OCR_REQG_EXTERNAL));
    229   1.1   minoura 
    230  1.33     isaki 	aprint_normal_dev(self, "MSM6258V ADPCM voice synthesizer\n");
    231   1.1   minoura 
    232  1.33     isaki 	audio_attach_mi(&vs_hw_if, sc, sc->sc_dev);
    233   1.1   minoura }
    234   1.1   minoura 
    235   1.1   minoura /*
    236   1.1   minoura  * vs interrupt handler
    237   1.1   minoura  */
    238   1.1   minoura static int
    239   1.1   minoura vs_dmaintr(void *hdl)
    240   1.1   minoura {
    241  1.28      kent 	struct vs_softc *sc;
    242   1.1   minoura 
    243   1.9     isaki 	DPRINTF(2, ("vs_dmaintr\n"));
    244  1.28      kent 	sc = hdl;
    245  1.35  jmcneill 
    246  1.35  jmcneill 	mutex_spin_enter(&sc->sc_intr_lock);
    247  1.35  jmcneill 
    248   1.1   minoura 	if (sc->sc_pintr) {
    249   1.1   minoura 		sc->sc_pintr(sc->sc_parg);
    250   1.1   minoura 	} else if (sc->sc_rintr) {
    251   1.1   minoura 		sc->sc_rintr(sc->sc_rarg);
    252   1.1   minoura 	} else {
    253  1.19     isaki 		printf("vs_dmaintr: spurious interrupt\n");
    254   1.1   minoura 	}
    255   1.1   minoura 
    256  1.35  jmcneill 	mutex_spin_exit(&sc->sc_intr_lock);
    257  1.35  jmcneill 
    258   1.1   minoura 	return 1;
    259   1.1   minoura }
    260   1.1   minoura 
    261   1.1   minoura static int
    262   1.1   minoura vs_dmaerrintr(void *hdl)
    263   1.1   minoura {
    264  1.28      kent 	struct vs_softc *sc;
    265   1.1   minoura 
    266  1.28      kent 	sc = hdl;
    267  1.33     isaki 	DPRINTF(1, ("%s: DMA transfer error.\n", device_xname(sc->sc_dev)));
    268   1.1   minoura 	/* XXX */
    269  1.11   minoura 	vs_dmaintr(sc);
    270   1.1   minoura 
    271   1.1   minoura 	return 1;
    272   1.1   minoura }
    273   1.1   minoura 
    274   1.1   minoura 
    275   1.1   minoura /*
    276   1.1   minoura  * audio MD layer interfaces
    277   1.1   minoura  */
    278   1.1   minoura 
    279   1.1   minoura static int
    280   1.1   minoura vs_open(void *hdl, int flags)
    281   1.1   minoura {
    282  1.28      kent 	struct vs_softc *sc;
    283   1.1   minoura 
    284   1.9     isaki 	DPRINTF(1, ("vs_open: flags=%d\n", flags));
    285  1.28      kent 	sc = hdl;
    286   1.1   minoura 	sc->sc_pintr = NULL;
    287   1.1   minoura 	sc->sc_rintr = NULL;
    288  1.47     isaki 	sc->sc_active = 0;
    289  1.14     isaki 
    290   1.1   minoura 	return 0;
    291   1.1   minoura }
    292   1.1   minoura 
    293   1.1   minoura static void
    294   1.1   minoura vs_close(void *hdl)
    295   1.1   minoura {
    296  1.28      kent 
    297   1.9     isaki 	DPRINTF(1, ("vs_close\n"));
    298   1.1   minoura }
    299   1.1   minoura 
    300   1.1   minoura static int
    301   1.1   minoura vs_query_encoding(void *hdl, struct audio_encoding *fp)
    302   1.1   minoura {
    303  1.28      kent 
    304   1.9     isaki 	DPRINTF(1, ("vs_query_encoding\n"));
    305  1.10     isaki 
    306  1.39     isaki 	if (fp->index == 0) {
    307  1.41     isaki 		strcpy(fp->name, AudioEslinear);
    308  1.41     isaki 		fp->encoding = AUDIO_ENCODING_SLINEAR;
    309  1.41     isaki 		fp->precision = 8;
    310  1.42     isaki 		fp->flags = 0;
    311  1.42     isaki 		return 0;
    312  1.42     isaki 	}
    313  1.42     isaki 	if (fp->index == 1) {
    314  1.39     isaki 		strcpy(fp->name, AudioEslinear_be);
    315  1.39     isaki 		fp->encoding = AUDIO_ENCODING_SLINEAR_BE;
    316  1.39     isaki 		fp->precision = 16;
    317  1.15     isaki 		fp->flags = 0;
    318  1.39     isaki 		return 0;
    319  1.39     isaki 	}
    320  1.39     isaki 	return EINVAL;
    321   1.1   minoura }
    322   1.1   minoura 
    323   1.2   minoura static int
    324   1.1   minoura vs_round_sr(u_long rate)
    325   1.1   minoura {
    326   1.1   minoura 	int i;
    327  1.28      kent 	int diff;
    328  1.28      kent 	int nearest;
    329   1.2   minoura 
    330  1.28      kent 	diff = rate;
    331  1.28      kent 	nearest = 0;
    332   1.2   minoura 	for (i = 0; i < NUM_RATE; i++) {
    333   1.2   minoura 		if (rate >= vs_l2r[i].rate) {
    334   1.2   minoura 			if (rate - vs_l2r[i].rate < diff) {
    335   1.2   minoura 				diff = rate - vs_l2r[i].rate;
    336   1.2   minoura 				nearest = i;
    337   1.2   minoura 			}
    338   1.2   minoura 		} else {
    339   1.2   minoura 			if (vs_l2r[i].rate - rate < diff) {
    340   1.2   minoura 				diff = vs_l2r[i].rate - rate;
    341   1.2   minoura 				nearest = i;
    342   1.2   minoura 			}
    343   1.2   minoura 		}
    344   1.1   minoura 	}
    345   1.2   minoura 	if (diff * 100 / rate > 15)
    346   1.2   minoura 		return -1;
    347   1.2   minoura 	else
    348   1.2   minoura 		return nearest;
    349   1.1   minoura }
    350   1.1   minoura 
    351   1.1   minoura static int
    352   1.1   minoura vs_set_params(void *hdl, int setmode, int usemode,
    353  1.27      kent 	audio_params_t *play, audio_params_t *rec,
    354  1.27      kent 	stream_filter_list_t *pfil, stream_filter_list_t *rfil)
    355   1.1   minoura {
    356  1.28      kent 	struct vs_softc *sc;
    357  1.48     isaki 	audio_params_t hw;
    358  1.47     isaki 	stream_filter_factory_t *pconv;
    359  1.47     isaki 	stream_filter_factory_t *rconv;
    360   1.2   minoura 	int rate;
    361   1.1   minoura 
    362  1.39     isaki 	sc = hdl;
    363  1.39     isaki 
    364  1.39     isaki 	DPRINTF(1, ("vs_set_params: mode=%d enc=%d rate=%d prec=%d ch=%d: ",
    365  1.39     isaki 		setmode, play->encoding, play->sample_rate,
    366  1.39     isaki 		play->precision, play->channels));
    367   1.1   minoura 
    368  1.41     isaki 	/* *play and *rec are identical because !AUDIO_PROP_INDEPENDENT */
    369  1.41     isaki 
    370  1.39     isaki 	if (play->channels != 1) {
    371  1.39     isaki 		DPRINTF(1, ("channels not matched\n"));
    372  1.39     isaki 		return EINVAL;
    373  1.39     isaki 	}
    374  1.39     isaki 
    375  1.39     isaki 	rate = vs_round_sr(play->sample_rate);
    376  1.39     isaki 	if (rate < 0) {
    377  1.39     isaki 		DPRINTF(1, ("rate not matched\n"));
    378  1.39     isaki 		return EINVAL;
    379  1.39     isaki 	}
    380  1.15     isaki 
    381  1.42     isaki 	if (play->precision == 8 && play->encoding == AUDIO_ENCODING_SLINEAR) {
    382  1.47     isaki 		pconv = msm6258_linear8_to_adpcm;
    383  1.47     isaki 		rconv = msm6258_adpcm_to_linear8;
    384  1.42     isaki 	} else if (play->precision == 16 &&
    385  1.42     isaki 	           play->encoding == AUDIO_ENCODING_SLINEAR_BE) {
    386  1.47     isaki 		pconv = msm6258_slinear16_to_adpcm;
    387  1.47     isaki 		rconv = msm6258_adpcm_to_slinear16;
    388  1.42     isaki 	} else {
    389  1.41     isaki 		DPRINTF(1, ("prec/enc not matched\n"));
    390  1.39     isaki 		return EINVAL;
    391  1.39     isaki 	}
    392  1.40       nat 
    393  1.44     isaki 	sc->sc_current.rate = rate;
    394  1.39     isaki 
    395  1.41     isaki 	/* pfil and rfil are independent even if !AUDIO_PROP_INDEPENDENT */
    396  1.41     isaki 
    397  1.47     isaki 	if ((setmode & AUMODE_PLAY) != 0) {
    398  1.48     isaki 		hw = *play;
    399  1.48     isaki 		hw.encoding = AUDIO_ENCODING_ADPCM;
    400  1.48     isaki 		hw.precision = 4;
    401  1.48     isaki 		hw.validbits = 4;
    402  1.48     isaki 		pfil->prepend(pfil, pconv, &hw);
    403  1.47     isaki 	}
    404  1.47     isaki 	if ((setmode & AUMODE_RECORD) != 0) {
    405  1.48     isaki 		hw = *rec;
    406  1.48     isaki 		hw.encoding = AUDIO_ENCODING_ADPCM;
    407  1.48     isaki 		hw.precision = 4;
    408  1.48     isaki 		hw.validbits = 4;
    409  1.48     isaki 		rfil->prepend(rfil, rconv, &hw);
    410  1.47     isaki 	}
    411  1.39     isaki 
    412  1.39     isaki 	DPRINTF(1, ("accepted\n"));
    413   1.1   minoura 	return 0;
    414   1.1   minoura }
    415   1.1   minoura 
    416   1.1   minoura static void
    417   1.2   minoura vs_set_sr(struct vs_softc *sc, int rate)
    418   1.1   minoura {
    419  1.28      kent 
    420   1.9     isaki 	DPRINTF(1, ("setting sample rate to %d, %d\n",
    421   1.2   minoura 		 rate, (int)vs_l2r[rate].rate));
    422   1.2   minoura 	bus_space_write_1(sc->sc_iot, sc->sc_ppi, PPI_PORTC,
    423   1.2   minoura 			  (bus_space_read_1 (sc->sc_iot, sc->sc_ppi,
    424   1.2   minoura 					     PPI_PORTC) & 0xf0)
    425   1.2   minoura 			  | vs_l2r[rate].den);
    426   1.2   minoura 	adpcm_chgclk(vs_l2r[rate].clk);
    427   1.1   minoura }
    428   1.1   minoura 
    429   1.1   minoura static inline void
    430   1.1   minoura vs_set_po(struct vs_softc *sc, u_long po)
    431   1.1   minoura {
    432   1.1   minoura 	bus_space_write_1(sc->sc_iot, sc->sc_ppi, PPI_PORTC,
    433   1.1   minoura 			  (bus_space_read_1(sc->sc_iot, sc->sc_ppi, PPI_PORTC)
    434   1.1   minoura 			   & 0xfc) | po);
    435   1.1   minoura }
    436   1.1   minoura 
    437   1.1   minoura static int
    438  1.43     isaki vs_init_output(void *hdl, void *buffer, int size)
    439  1.43     isaki {
    440  1.43     isaki 	struct vs_softc *sc;
    441  1.43     isaki 
    442  1.43     isaki 	DPRINTF(1, ("%s\n", __func__));
    443  1.43     isaki 	sc = hdl;
    444  1.43     isaki 
    445  1.43     isaki 	/* Set rate and pan */
    446  1.44     isaki 	vs_set_sr(sc, sc->sc_current.rate);
    447  1.43     isaki 	vs_set_po(sc, VS_PANOUT_LR);
    448  1.43     isaki 
    449  1.43     isaki 	return 0;
    450  1.43     isaki }
    451  1.43     isaki 
    452  1.43     isaki static int
    453  1.43     isaki vs_init_input(void *hdl, void *buffer, int size)
    454  1.43     isaki {
    455  1.43     isaki 	struct vs_softc *sc;
    456  1.43     isaki 
    457  1.43     isaki 	DPRINTF(1, ("%s\n", __func__));
    458  1.43     isaki 	sc = hdl;
    459  1.43     isaki 
    460  1.43     isaki 	/* Set rate */
    461  1.44     isaki 	vs_set_sr(sc, sc->sc_current.rate);
    462  1.43     isaki 
    463  1.43     isaki 	return 0;
    464  1.43     isaki }
    465  1.43     isaki 
    466  1.43     isaki static int
    467  1.43     isaki vs_start_output(void *hdl, void *block, int blksize, void (*intr)(void *),
    468  1.43     isaki 	void *arg)
    469   1.1   minoura {
    470  1.28      kent 	struct vs_softc *sc;
    471   1.1   minoura 	struct vs_dma *vd;
    472  1.28      kent 	struct dmac_channel_stat *chan;
    473   1.1   minoura 
    474  1.43     isaki 	DPRINTF(2, ("%s: block=%p blksize=%d\n", __func__, block, blksize));
    475  1.28      kent 	sc = hdl;
    476  1.43     isaki 
    477   1.1   minoura 	sc->sc_pintr = intr;
    478   1.1   minoura 	sc->sc_parg  = arg;
    479   1.1   minoura 
    480  1.47     isaki 	/* Find DMA buffer. */
    481  1.47     isaki 	for (vd = sc->sc_dmas; vd != NULL; vd = vd->vd_next) {
    482  1.47     isaki 		if (KVADDR(vd) <= block && block < KVADDR_END(vd)
    483  1.47     isaki 			break;
    484  1.47     isaki 	}
    485  1.47     isaki 	if (vd == NULL) {
    486  1.47     isaki 		printf("%s: start_output: bad addr %p\n",
    487  1.47     isaki 		    device_xname(sc->sc_dev), block);
    488  1.47     isaki 		return EINVAL;
    489  1.47     isaki 	}
    490   1.2   minoura 
    491  1.43     isaki 	chan = sc->sc_dma_ch;
    492   1.2   minoura 
    493  1.47     isaki 	if (vd != sc->sc_prev_vd) {
    494  1.47     isaki 		sc->sc_current.xfer = dmac_prepare_xfer(chan, sc->sc_dmat,
    495  1.47     isaki 		    vd->vd_map, DMAC_OCR_DIR_MTD,
    496  1.47     isaki 		    (DMAC_SCR_MAC_COUNT_UP | DMAC_SCR_DAC_NO_COUNT),
    497  1.47     isaki 		    sc->sc_addr + MSM6258_DATA * 2 + 1);
    498  1.47     isaki 		sc->sc_prev_vd = vd;
    499  1.47     isaki 	}
    500  1.47     isaki 	dmac_start_xfer_offset(chan->ch_softc, sc->sc_current.xfer,
    501  1.47     isaki 	    (int)block - (int)KVADDR(vd), blksize);
    502  1.47     isaki 
    503  1.47     isaki 	if (sc->sc_active == 0) {
    504  1.49     isaki 		bus_space_write_1(sc->sc_iot, sc->sc_ioh,
    505  1.49     isaki 			MSM6258_CMD, MSM6258_CMD_PLAY_START);
    506  1.47     isaki 		sc->sc_active = 1;
    507  1.47     isaki 	}
    508   1.1   minoura 
    509   1.1   minoura 	return 0;
    510   1.1   minoura }
    511   1.1   minoura 
    512   1.1   minoura static int
    513  1.43     isaki vs_start_input(void *hdl, void *block, int blksize, void (*intr)(void *),
    514  1.43     isaki 	void *arg)
    515   1.1   minoura {
    516  1.28      kent 	struct vs_softc *sc;
    517   1.1   minoura 	struct vs_dma *vd;
    518  1.28      kent 	struct dmac_channel_stat *chan;
    519   1.1   minoura 
    520  1.43     isaki 	DPRINTF(2, ("%s: block=%p blksize=%d\n", __func__, block, blksize));
    521  1.28      kent 	sc = hdl;
    522  1.43     isaki 
    523   1.1   minoura 	sc->sc_rintr = intr;
    524   1.1   minoura 	sc->sc_rarg  = arg;
    525   1.1   minoura 
    526  1.47     isaki 	/* Find DMA buffer. */
    527  1.47     isaki 	for (vd = sc->sc_dmas; vd != NULL; vd = vd->vd_next) {
    528  1.47     isaki 		if (KVADDR(vd) <= block && block < KVADDR_END(vd)
    529  1.47     isaki 			break;
    530  1.47     isaki 	}
    531  1.47     isaki 	if (vd == NULL) {
    532  1.47     isaki 		printf("%s: start_output: bad addr %p\n",
    533  1.47     isaki 		    device_xname(sc->sc_dev), block);
    534  1.47     isaki 		return EINVAL;
    535  1.47     isaki 	}
    536   1.1   minoura 
    537  1.43     isaki 	chan = sc->sc_dma_ch;
    538   1.2   minoura 
    539  1.47     isaki 	if (vd != sc->sc_prev_vd) {
    540  1.47     isaki 		sc->sc_current.xfer = dmac_prepare_xfer(chan, sc->sc_dmat,
    541  1.47     isaki 		    vd->vd_map, DMAC_OCR_DIR_DTM,
    542  1.47     isaki 		    (DMAC_SCR_MAC_COUNT_UP | DMAC_SCR_DAC_NO_COUNT),
    543  1.47     isaki 		    sc->sc_addr + MSM6258_DATA * 2 + 1);
    544  1.47     isaki 		sc->sc_prev_vd = vd;
    545  1.47     isaki 	}
    546  1.47     isaki 	dmac_start_xfer_offset(chan->ch_softc, sc->sc_current.xfer,
    547  1.47     isaki 	    (int)block - (int)KVADDR(vd), blksize);
    548  1.47     isaki 
    549  1.47     isaki 	if (sc->sc_active == 0) {
    550  1.49     isaki 		bus_space_write_1(sc->sc_iot, sc->sc_ioh,
    551  1.49     isaki 			MSM6258_CMD, MSM6258_CMD_REC_START);
    552  1.47     isaki 		sc->sc_active = 1;
    553  1.47     isaki 	}
    554   1.1   minoura 
    555   1.1   minoura 	return 0;
    556   1.1   minoura }
    557   1.1   minoura 
    558   1.1   minoura static int
    559   1.1   minoura vs_halt_output(void *hdl)
    560   1.1   minoura {
    561  1.28      kent 	struct vs_softc *sc;
    562   1.1   minoura 
    563   1.9     isaki 	DPRINTF(1, ("vs_halt_output\n"));
    564  1.28      kent 	sc = hdl;
    565  1.38     isaki 	if (sc->sc_active) {
    566  1.38     isaki 		/* stop ADPCM play */
    567  1.38     isaki 		dmac_abort_xfer(sc->sc_dma_ch->ch_softc, sc->sc_current.xfer);
    568  1.49     isaki 		bus_space_write_1(sc->sc_iot, sc->sc_ioh,
    569  1.49     isaki 			MSM6258_CMD, MSM6258_CMD_STOP);
    570  1.38     isaki 		sc->sc_active = 0;
    571  1.38     isaki 	}
    572   1.1   minoura 
    573   1.1   minoura 	return 0;
    574   1.1   minoura }
    575   1.1   minoura 
    576   1.1   minoura static int
    577   1.1   minoura vs_halt_input(void *hdl)
    578   1.1   minoura {
    579  1.28      kent 	struct vs_softc *sc;
    580   1.1   minoura 
    581   1.9     isaki 	DPRINTF(1, ("vs_halt_input\n"));
    582  1.28      kent 	sc = hdl;
    583  1.38     isaki 	if (sc->sc_active) {
    584  1.38     isaki 		/* stop ADPCM recoding */
    585  1.38     isaki 		dmac_abort_xfer(sc->sc_dma_ch->ch_softc, sc->sc_current.xfer);
    586  1.49     isaki 		bus_space_write_1(sc->sc_iot, sc->sc_ioh,
    587  1.49     isaki 			MSM6258_CMD, MSM6258_CMD_STOP);
    588  1.38     isaki 		sc->sc_active = 0;
    589  1.38     isaki 	}
    590   1.1   minoura 
    591   1.1   minoura 	return 0;
    592   1.1   minoura }
    593   1.1   minoura 
    594   1.1   minoura static int
    595  1.19     isaki vs_allocmem(struct vs_softc *sc, size_t size, size_t align, size_t boundary,
    596  1.35  jmcneill 	struct vs_dma *vd)
    597   1.1   minoura {
    598  1.35  jmcneill 	int error;
    599   1.1   minoura 
    600   1.1   minoura #ifdef DIAGNOSTIC
    601   1.1   minoura 	if (size > DMAC_MAXSEGSZ)
    602   1.1   minoura 		panic ("vs_allocmem: maximum size exceeded, %d", (int) size);
    603   1.1   minoura #endif
    604   1.1   minoura 
    605   1.1   minoura 	vd->vd_size = size;
    606  1.28      kent 
    607   1.1   minoura 	error = bus_dmamem_alloc(vd->vd_dmat, vd->vd_size, align, boundary,
    608   1.1   minoura 				 vd->vd_segs,
    609   1.1   minoura 				 sizeof (vd->vd_segs) / sizeof (vd->vd_segs[0]),
    610  1.35  jmcneill 				 &vd->vd_nsegs, BUS_DMA_WAITOK);
    611   1.1   minoura 	if (error)
    612   1.1   minoura 		goto out;
    613   1.1   minoura 
    614   1.1   minoura 	error = bus_dmamem_map(vd->vd_dmat, vd->vd_segs, vd->vd_nsegs,
    615   1.1   minoura 			       vd->vd_size, &vd->vd_addr,
    616  1.35  jmcneill 			       BUS_DMA_WAITOK | BUS_DMA_COHERENT);
    617   1.1   minoura 	if (error)
    618   1.1   minoura 		goto free;
    619   1.1   minoura 
    620   1.1   minoura 	error = bus_dmamap_create(vd->vd_dmat, vd->vd_size, 1, DMAC_MAXSEGSZ,
    621  1.35  jmcneill 				  0, BUS_DMA_WAITOK, &vd->vd_map);
    622   1.1   minoura 	if (error)
    623   1.1   minoura 		goto unmap;
    624   1.1   minoura 
    625   1.1   minoura 	error = bus_dmamap_load(vd->vd_dmat, vd->vd_map, vd->vd_addr,
    626  1.35  jmcneill 				vd->vd_size, NULL, BUS_DMA_WAITOK);
    627   1.1   minoura 	if (error)
    628   1.1   minoura 		goto destroy;
    629   1.1   minoura 
    630  1.28      kent 	return 0;
    631   1.1   minoura 
    632   1.1   minoura  destroy:
    633   1.1   minoura 	bus_dmamap_destroy(vd->vd_dmat, vd->vd_map);
    634   1.1   minoura  unmap:
    635   1.1   minoura 	bus_dmamem_unmap(vd->vd_dmat, vd->vd_addr, vd->vd_size);
    636   1.1   minoura  free:
    637   1.1   minoura 	bus_dmamem_free(vd->vd_dmat, vd->vd_segs, vd->vd_nsegs);
    638   1.1   minoura  out:
    639  1.28      kent 	return error;
    640   1.1   minoura }
    641   1.1   minoura 
    642   1.1   minoura static void
    643  1.19     isaki vs_freemem(struct vs_dma *vd)
    644   1.1   minoura {
    645   1.1   minoura 
    646   1.1   minoura 	bus_dmamap_unload(vd->vd_dmat, vd->vd_map);
    647   1.1   minoura 	bus_dmamap_destroy(vd->vd_dmat, vd->vd_map);
    648   1.1   minoura 	bus_dmamem_unmap(vd->vd_dmat, vd->vd_addr, vd->vd_size);
    649   1.1   minoura 	bus_dmamem_free(vd->vd_dmat, vd->vd_segs, vd->vd_nsegs);
    650   1.1   minoura }
    651   1.1   minoura 
    652   1.1   minoura static int
    653   1.1   minoura vs_getdev(void *hdl, struct audio_device *retp)
    654   1.1   minoura {
    655  1.28      kent 
    656   1.9     isaki 	DPRINTF(1, ("vs_getdev\n"));
    657   1.1   minoura 	*retp = vs_device;
    658   1.1   minoura 	return 0;
    659   1.1   minoura }
    660   1.1   minoura 
    661   1.1   minoura static int
    662   1.1   minoura vs_set_port(void *hdl, mixer_ctrl_t *cp)
    663   1.1   minoura {
    664  1.28      kent 
    665   1.9     isaki 	DPRINTF(1, ("vs_set_port\n"));
    666   1.1   minoura 	return 0;
    667   1.1   minoura }
    668   1.1   minoura 
    669   1.1   minoura static int
    670   1.1   minoura vs_get_port(void *hdl, mixer_ctrl_t *cp)
    671   1.1   minoura {
    672  1.28      kent 
    673   1.9     isaki 	DPRINTF(1, ("vs_get_port\n"));
    674   1.1   minoura 	return 0;
    675   1.1   minoura }
    676   1.1   minoura 
    677   1.1   minoura static int
    678   1.1   minoura vs_query_devinfo(void *hdl, mixer_devinfo_t *mi)
    679   1.1   minoura {
    680  1.28      kent 
    681   1.9     isaki 	DPRINTF(1, ("vs_query_devinfo\n"));
    682   1.1   minoura 	switch (mi->index) {
    683   1.1   minoura 	default:
    684   1.1   minoura 		return EINVAL;
    685   1.1   minoura 	}
    686   1.1   minoura 	return 0;
    687   1.1   minoura }
    688   1.1   minoura 
    689   1.1   minoura static void *
    690  1.35  jmcneill vs_allocm(void *hdl, int direction, size_t size)
    691   1.1   minoura {
    692  1.28      kent 	struct vs_softc *sc;
    693   1.1   minoura 	struct vs_dma *vd;
    694   1.1   minoura 	int error;
    695   1.1   minoura 
    696  1.37       chs 	vd = kmem_alloc(sizeof(*vd), KM_SLEEP);
    697  1.28      kent 	sc = hdl;
    698   1.1   minoura 	vd->vd_dmat = sc->sc_dmat;
    699   1.1   minoura 
    700  1.35  jmcneill 	error = vs_allocmem(sc, size, 32, 0, vd);
    701   1.1   minoura 	if (error) {
    702  1.35  jmcneill 		kmem_free(vd, sizeof(*vd));
    703  1.28      kent 		return NULL;
    704   1.1   minoura 	}
    705   1.1   minoura 	vd->vd_next = sc->sc_dmas;
    706   1.1   minoura 	sc->sc_dmas = vd;
    707   1.1   minoura 
    708  1.28      kent 	return KVADDR(vd);
    709   1.1   minoura }
    710   1.1   minoura 
    711   1.1   minoura static void
    712  1.35  jmcneill vs_freem(void *hdl, void *addr, size_t size)
    713   1.1   minoura {
    714  1.28      kent 	struct vs_softc *sc;
    715   1.1   minoura 	struct vs_dma *p, **pp;
    716   1.1   minoura 
    717  1.28      kent 	sc = hdl;
    718   1.1   minoura 	for (pp = &sc->sc_dmas; (p = *pp) != NULL; pp = &p->vd_next) {
    719   1.1   minoura 		if (KVADDR(p) == addr) {
    720   1.1   minoura 			vs_freemem(p);
    721   1.1   minoura 			*pp = p->vd_next;
    722  1.35  jmcneill 			kmem_free(p, sizeof(*p));
    723   1.1   minoura 			return;
    724   1.1   minoura 		}
    725   1.1   minoura 	}
    726   1.1   minoura }
    727   1.1   minoura 
    728   1.1   minoura static size_t
    729   1.1   minoura vs_round_buffersize(void *hdl, int direction, size_t bufsize)
    730   1.1   minoura {
    731  1.28      kent 
    732   1.1   minoura 	if (bufsize > DMAC_MAXSEGSZ)
    733   1.1   minoura 		bufsize = DMAC_MAXSEGSZ;
    734   1.1   minoura 	return bufsize;
    735   1.1   minoura }
    736   1.1   minoura 
    737   1.1   minoura #if 0
    738   1.1   minoura paddr_t
    739  1.19     isaki vs_mappage(void *addr, void *mem, off_t off, int prot)
    740   1.1   minoura {
    741  1.28      kent 	struct vs_softc *sc;
    742   1.1   minoura 	struct vs_dma *p;
    743   1.1   minoura 
    744   1.1   minoura 	if (off < 0)
    745  1.28      kent 		return -1;
    746  1.28      kent 	sc = addr;
    747   1.1   minoura 	for (p = sc->sc_dmas; p != NULL && KVADDR(p) != mem;
    748   1.1   minoura 	     p = p->vd_next)
    749  1.28      kent 		continue;
    750   1.1   minoura 	if (p == NULL) {
    751   1.1   minoura 		printf("%s: mappage: bad addr %p\n",
    752  1.33     isaki 		    device_xname(sc->sc_dev), start);
    753  1.28      kent 		return -1;
    754   1.1   minoura 	}
    755   1.1   minoura 
    756  1.28      kent 	return bus_dmamem_mmap(sc->sc_dmat, p->vd_segs, p->vd_nsegs,
    757  1.28      kent 			       off, prot, BUS_DMA_WAITOK);
    758   1.1   minoura }
    759   1.1   minoura #endif
    760   1.1   minoura 
    761   1.1   minoura static int
    762   1.1   minoura vs_get_props(void *hdl)
    763   1.1   minoura {
    764  1.28      kent 
    765   1.9     isaki 	DPRINTF(1, ("vs_get_props\n"));
    766   1.1   minoura 	return 0 /* | dependent | half duplex | no mmap */;
    767   1.1   minoura }
    768  1.35  jmcneill 
    769  1.35  jmcneill static void
    770  1.35  jmcneill vs_get_locks(void *hdl, kmutex_t **intr, kmutex_t **thread)
    771  1.35  jmcneill {
    772  1.35  jmcneill 	struct vs_softc *sc;
    773  1.35  jmcneill 
    774  1.35  jmcneill 	DPRINTF(1, ("vs_get_locks\n"));
    775  1.35  jmcneill 	sc = hdl;
    776  1.35  jmcneill 	*intr = &sc->sc_intr_lock;
    777  1.35  jmcneill 	*thread = &sc->sc_lock;
    778  1.35  jmcneill }
    779  1.35  jmcneill 
    780   1.1   minoura #endif /* NAUDIO > 0 && NVS > 0*/
    781