Home | History | Annotate | Line # | Download | only in dev
vs.c revision 1.39
      1  1.39     isaki /*	$NetBSD: vs.c,v 1.39 2017/07/09 12:49:26 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.39     isaki __KERNEL_RCSID(0, "$NetBSD: vs.c,v 1.39 2017/07/09 12:49:26 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.28      kent static int  vs_trigger_output(void *, void *, void *, int,
     82  1.28      kent 	void (*)(void *), void *, const audio_params_t *);
     83  1.28      kent static int  vs_trigger_input(void *, void *, void *, int,
     84  1.28      kent 	void (*)(void *), void *, const audio_params_t *);
     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.1   minoura 	vs_open,
    114   1.1   minoura 	vs_close,
    115   1.1   minoura 	NULL,			/* drain */
    116   1.1   minoura 	vs_query_encoding,
    117   1.1   minoura 	vs_set_params,
    118   1.1   minoura 	NULL,			/* round_blocksize */
    119   1.1   minoura 	NULL,			/* commit_settings */
    120  1.28      kent 	NULL,			/* init_output */
    121  1.28      kent 	NULL,			/* init_input */
    122  1.28      kent 	NULL,			/* start_output */
    123   1.1   minoura 	NULL,			/* start_input */
    124   1.1   minoura 	vs_halt_output,
    125   1.1   minoura 	vs_halt_input,
    126   1.1   minoura 	NULL,			/* speaker_ctl */
    127   1.1   minoura 	vs_getdev,
    128   1.1   minoura 	NULL,			/* setfd */
    129   1.1   minoura 	vs_set_port,
    130   1.1   minoura 	vs_get_port,
    131   1.1   minoura 	vs_query_devinfo,
    132   1.1   minoura 	vs_allocm,
    133   1.1   minoura 	vs_freem,
    134   1.1   minoura 	vs_round_buffersize,
    135   1.1   minoura 	NULL,			/* mappage */
    136   1.1   minoura 	vs_get_props,
    137   1.1   minoura 	vs_trigger_output,
    138   1.1   minoura 	vs_trigger_input,
    139   1.8  augustss 	NULL,
    140  1.35  jmcneill 	vs_get_locks,
    141   1.1   minoura };
    142   1.1   minoura 
    143   1.1   minoura static struct audio_device vs_device = {
    144   1.1   minoura 	"OKI MSM6258",
    145   1.1   minoura 	"",
    146   1.1   minoura 	"vs"
    147   1.1   minoura };
    148   1.1   minoura 
    149   1.1   minoura struct {
    150   1.1   minoura 	u_long rate;
    151   1.1   minoura 	u_char clk;
    152   1.1   minoura 	u_char den;
    153   1.1   minoura } vs_l2r[] = {
    154   1.2   minoura 	{ VS_RATE_15K, VS_CLK_8MHZ, VS_SRATE_512 },
    155   1.2   minoura 	{ VS_RATE_10K, VS_CLK_8MHZ, VS_SRATE_768 },
    156   1.2   minoura 	{ VS_RATE_7K,  VS_CLK_8MHZ, VS_SRATE_1024},
    157   1.2   minoura 	{ VS_RATE_5K,  VS_CLK_4MHZ, VS_SRATE_768 },
    158   1.2   minoura 	{ VS_RATE_3K,  VS_CLK_4MHZ, VS_SRATE_1024}
    159   1.1   minoura };
    160   1.1   minoura 
    161   1.2   minoura #define NUM_RATE	(sizeof(vs_l2r)/sizeof(vs_l2r[0]))
    162   1.1   minoura 
    163   1.1   minoura static int
    164  1.33     isaki vs_match(device_t parent, cfdata_t cf, void *aux)
    165   1.1   minoura {
    166  1.28      kent 	struct intio_attach_args *ia;
    167   1.1   minoura 
    168  1.28      kent 	ia = aux;
    169  1.26       chs 	if (strcmp(ia->ia_name, "vs") || vs_attached)
    170   1.1   minoura 		return 0;
    171   1.1   minoura 
    172   1.1   minoura 	if (ia->ia_addr == INTIOCF_ADDR_DEFAULT)
    173   1.1   minoura 		ia->ia_addr = VS_ADDR;
    174   1.1   minoura 	if (ia->ia_dma == INTIOCF_DMA_DEFAULT)
    175   1.1   minoura 		ia->ia_dma = VS_DMA;
    176   1.1   minoura 	if (ia->ia_dmaintr == INTIOCF_DMAINTR_DEFAULT)
    177   1.1   minoura 		ia->ia_dmaintr = VS_DMAINTR;
    178   1.1   minoura 
    179   1.1   minoura 	/* fixed parameters */
    180   1.1   minoura 	if (ia->ia_addr != VS_ADDR)
    181   1.1   minoura 		return 0;
    182   1.1   minoura 	if (ia->ia_dma != VS_DMA)
    183   1.1   minoura 		return 0;
    184   1.1   minoura 	if (ia->ia_dmaintr != VS_DMAINTR)
    185   1.1   minoura 		return 0;
    186   1.1   minoura 
    187   1.9     isaki #ifdef VS_DEBUG
    188   1.9     isaki 	vs_debug = 1;
    189   1.1   minoura #ifdef AUDIO_DEBUG
    190   1.1   minoura 	audiodebug = 2;
    191   1.1   minoura #endif
    192   1.9     isaki #endif
    193   1.1   minoura 
    194   1.1   minoura 	return 1;
    195   1.1   minoura }
    196   1.1   minoura 
    197   1.1   minoura static void
    198  1.33     isaki vs_attach(device_t parent, device_t self, void *aux)
    199   1.1   minoura {
    200  1.28      kent 	struct vs_softc *sc;
    201   1.1   minoura 	bus_space_tag_t iot;
    202   1.1   minoura 	bus_space_handle_t ioh;
    203  1.28      kent 	struct intio_attach_args *ia;
    204   1.1   minoura 
    205  1.33     isaki 	sc = device_private(self);
    206  1.33     isaki 	sc->sc_dev = self;
    207  1.28      kent 	ia = aux;
    208  1.26       chs 	vs_attached = 1;
    209  1.26       chs 
    210   1.1   minoura 	printf("\n");
    211  1.28      kent 
    212   1.1   minoura 	/* Re-map the I/O space */
    213   1.1   minoura 	iot = ia->ia_bst;
    214   1.1   minoura 	bus_space_map(iot, ia->ia_addr, 0x2000, BUS_SPACE_MAP_SHIFTED, &ioh);
    215   1.1   minoura 
    216   1.1   minoura 	/* Initialize sc */
    217   1.1   minoura 	sc->sc_iot = iot;
    218   1.1   minoura 	sc->sc_ioh = ioh;
    219   1.1   minoura 	sc->sc_hw_if = &vs_hw_if;
    220  1.31  christos 	sc->sc_addr = (void *) ia->ia_addr;
    221   1.1   minoura 	sc->sc_dmas = NULL;
    222  1.38     isaki 	sc->sc_active = 0;
    223  1.35  jmcneill 	mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
    224  1.35  jmcneill 	mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_SCHED);
    225   1.1   minoura 
    226   1.1   minoura 	/* XXX */
    227   1.1   minoura 	bus_space_map(iot, PPI_ADDR, PPI_MAPSIZE, BUS_SPACE_MAP_SHIFTED,
    228   1.1   minoura 		      &sc->sc_ppi);
    229   1.1   minoura 
    230   1.1   minoura 	/* Initialize DMAC */
    231   1.1   minoura 	sc->sc_dmat = ia->ia_dmat;
    232   1.1   minoura 	sc->sc_dma_ch = dmac_alloc_channel(parent, ia->ia_dma, "vs",
    233   1.1   minoura 		ia->ia_dmaintr,   vs_dmaintr, sc,
    234   1.1   minoura 		ia->ia_dmaintr+1, vs_dmaerrintr, sc);
    235   1.1   minoura 
    236  1.33     isaki 	aprint_normal_dev(self, "MSM6258V ADPCM voice synthesizer\n");
    237   1.1   minoura 
    238  1.33     isaki 	audio_attach_mi(&vs_hw_if, sc, sc->sc_dev);
    239   1.1   minoura }
    240   1.1   minoura 
    241   1.1   minoura /*
    242   1.1   minoura  * vs interrupt handler
    243   1.1   minoura  */
    244   1.1   minoura static int
    245   1.1   minoura vs_dmaintr(void *hdl)
    246   1.1   minoura {
    247  1.28      kent 	struct vs_softc *sc;
    248   1.1   minoura 
    249   1.9     isaki 	DPRINTF(2, ("vs_dmaintr\n"));
    250  1.28      kent 	sc = hdl;
    251  1.35  jmcneill 
    252  1.35  jmcneill 	mutex_spin_enter(&sc->sc_intr_lock);
    253  1.35  jmcneill 
    254   1.1   minoura 	if (sc->sc_pintr) {
    255   1.1   minoura 		/* start next transfer */
    256   1.2   minoura 		sc->sc_current.dmap += sc->sc_current.blksize;
    257   1.2   minoura 		if (sc->sc_current.dmap + sc->sc_current.blksize
    258  1.19     isaki 		    > sc->sc_current.bufsize)
    259   1.1   minoura 			sc->sc_current.dmap -= sc->sc_current.bufsize;
    260  1.19     isaki 		dmac_start_xfer_offset(sc->sc_dma_ch->ch_softc,
    261   1.1   minoura 					sc->sc_current.xfer,
    262   1.1   minoura 					sc->sc_current.dmap,
    263   1.2   minoura 					sc->sc_current.blksize);
    264   1.1   minoura 		sc->sc_pintr(sc->sc_parg);
    265   1.1   minoura 	} else if (sc->sc_rintr) {
    266   1.1   minoura 		/* start next transfer */
    267   1.2   minoura 		sc->sc_current.dmap += sc->sc_current.blksize;
    268   1.2   minoura 		if (sc->sc_current.dmap + sc->sc_current.blksize
    269  1.19     isaki 		    > sc->sc_current.bufsize)
    270   1.6   minoura 			sc->sc_current.dmap -= sc->sc_current.bufsize;
    271  1.19     isaki 		dmac_start_xfer_offset(sc->sc_dma_ch->ch_softc,
    272   1.1   minoura 					sc->sc_current.xfer,
    273   1.1   minoura 					sc->sc_current.dmap,
    274   1.2   minoura 					sc->sc_current.blksize);
    275   1.1   minoura 		sc->sc_rintr(sc->sc_rarg);
    276   1.1   minoura 	} else {
    277  1.19     isaki 		printf("vs_dmaintr: spurious interrupt\n");
    278   1.1   minoura 	}
    279   1.1   minoura 
    280  1.35  jmcneill 	mutex_spin_exit(&sc->sc_intr_lock);
    281  1.35  jmcneill 
    282   1.1   minoura 	return 1;
    283   1.1   minoura }
    284   1.1   minoura 
    285   1.1   minoura static int
    286   1.1   minoura vs_dmaerrintr(void *hdl)
    287   1.1   minoura {
    288  1.28      kent 	struct vs_softc *sc;
    289   1.1   minoura 
    290  1.28      kent 	sc = hdl;
    291  1.33     isaki 	DPRINTF(1, ("%s: DMA transfer error.\n", device_xname(sc->sc_dev)));
    292   1.1   minoura 	/* XXX */
    293  1.11   minoura 	vs_dmaintr(sc);
    294   1.1   minoura 
    295   1.1   minoura 	return 1;
    296   1.1   minoura }
    297   1.1   minoura 
    298   1.1   minoura 
    299   1.1   minoura /*
    300   1.1   minoura  * audio MD layer interfaces
    301   1.1   minoura  */
    302   1.1   minoura 
    303   1.1   minoura static int
    304   1.1   minoura vs_open(void *hdl, int flags)
    305   1.1   minoura {
    306  1.28      kent 	struct vs_softc *sc;
    307   1.1   minoura 
    308   1.9     isaki 	DPRINTF(1, ("vs_open: flags=%d\n", flags));
    309  1.28      kent 	sc = hdl;
    310   1.1   minoura 	sc->sc_pintr = NULL;
    311   1.1   minoura 	sc->sc_rintr = NULL;
    312  1.14     isaki 
    313   1.1   minoura 	return 0;
    314   1.1   minoura }
    315   1.1   minoura 
    316   1.1   minoura static void
    317   1.1   minoura vs_close(void *hdl)
    318   1.1   minoura {
    319  1.28      kent 
    320   1.9     isaki 	DPRINTF(1, ("vs_close\n"));
    321   1.1   minoura }
    322   1.1   minoura 
    323   1.1   minoura static int
    324   1.1   minoura vs_query_encoding(void *hdl, struct audio_encoding *fp)
    325   1.1   minoura {
    326  1.28      kent 
    327   1.9     isaki 	DPRINTF(1, ("vs_query_encoding\n"));
    328  1.10     isaki 
    329  1.39     isaki 	if (fp->index == 0) {
    330  1.39     isaki 		strcpy(fp->name, AudioEslinear_be);
    331  1.39     isaki 		fp->encoding = AUDIO_ENCODING_SLINEAR_BE;
    332  1.39     isaki 		fp->precision = 16;
    333  1.15     isaki 		fp->flags = 0;
    334  1.39     isaki 		return 0;
    335  1.39     isaki 	}
    336  1.39     isaki 	return EINVAL;
    337   1.1   minoura }
    338   1.1   minoura 
    339   1.2   minoura static int
    340   1.1   minoura vs_round_sr(u_long rate)
    341   1.1   minoura {
    342   1.1   minoura 	int i;
    343  1.28      kent 	int diff;
    344  1.28      kent 	int nearest;
    345   1.2   minoura 
    346  1.28      kent 	diff = rate;
    347  1.28      kent 	nearest = 0;
    348   1.2   minoura 	for (i = 0; i < NUM_RATE; i++) {
    349   1.2   minoura 		if (rate >= vs_l2r[i].rate) {
    350   1.2   minoura 			if (rate - vs_l2r[i].rate < diff) {
    351   1.2   minoura 				diff = rate - vs_l2r[i].rate;
    352   1.2   minoura 				nearest = i;
    353   1.2   minoura 			}
    354   1.2   minoura 		} else {
    355   1.2   minoura 			if (vs_l2r[i].rate - rate < diff) {
    356   1.2   minoura 				diff = vs_l2r[i].rate - rate;
    357   1.2   minoura 				nearest = i;
    358   1.2   minoura 			}
    359   1.2   minoura 		}
    360   1.1   minoura 	}
    361   1.2   minoura 	if (diff * 100 / rate > 15)
    362   1.2   minoura 		return -1;
    363   1.2   minoura 	else
    364   1.2   minoura 		return nearest;
    365   1.1   minoura }
    366   1.1   minoura 
    367   1.1   minoura static int
    368   1.1   minoura vs_set_params(void *hdl, int setmode, int usemode,
    369  1.27      kent 	audio_params_t *play, audio_params_t *rec,
    370  1.27      kent 	stream_filter_list_t *pfil, stream_filter_list_t *rfil)
    371   1.1   minoura {
    372  1.28      kent 	struct vs_softc *sc;
    373   1.2   minoura 	int rate;
    374   1.1   minoura 
    375  1.39     isaki 	sc = hdl;
    376  1.39     isaki 
    377  1.39     isaki 	DPRINTF(1, ("vs_set_params: mode=%d enc=%d rate=%d prec=%d ch=%d: ",
    378  1.39     isaki 		setmode, play->encoding, play->sample_rate,
    379  1.39     isaki 		play->precision, play->channels));
    380   1.1   minoura 
    381  1.39     isaki 	if (play->channels != 1) {
    382  1.39     isaki 		DPRINTF(1, ("channels not matched\n"));
    383  1.39     isaki 		return EINVAL;
    384  1.39     isaki 	}
    385  1.39     isaki 
    386  1.39     isaki 	rate = vs_round_sr(play->sample_rate);
    387  1.39     isaki 	if (rate < 0) {
    388  1.39     isaki 		DPRINTF(1, ("rate not matched\n"));
    389  1.39     isaki 		return EINVAL;
    390  1.39     isaki 	}
    391  1.15     isaki 
    392  1.39     isaki 	if (play->encoding != AUDIO_ENCODING_SLINEAR_BE) {
    393  1.39     isaki 		DPRINTF(1, ("encoding not matched\n"));
    394  1.39     isaki 		return EINVAL;
    395  1.39     isaki 	}
    396  1.39     isaki 	if (play->precision != 16) {
    397  1.39     isaki 		DPRINTF(1, ("precision not matched\n"));
    398  1.39     isaki 		return EINVAL;
    399   1.1   minoura 	}
    400   1.1   minoura 
    401  1.39     isaki 	play->encoding = AUDIO_ENCODING_ADPCM;
    402  1.39     isaki 	play->validbits = 4;
    403  1.39     isaki 	play->precision = 4;
    404  1.39     isaki 
    405  1.39     isaki 	pfil->prepend(pfil, msm6258_slinear16_to_adpcm, play);
    406  1.39     isaki 	rfil->prepend(rfil, msm6258_adpcm_to_slinear16, play);
    407  1.39     isaki 
    408  1.39     isaki 	sc->sc_current.prate = rate;
    409  1.39     isaki 	sc->sc_current.rrate = rate;
    410  1.39     isaki 
    411  1.39     isaki 	/* copy to rec because it's !AUDIO_PROP_INDEPENDENT */
    412  1.39     isaki 	*rec = *play;
    413  1.39     isaki 
    414  1.39     isaki 	DPRINTF(1, ("accepted\n"));
    415   1.1   minoura 	return 0;
    416   1.1   minoura }
    417   1.1   minoura 
    418   1.1   minoura static void
    419   1.2   minoura vs_set_sr(struct vs_softc *sc, int rate)
    420   1.1   minoura {
    421  1.28      kent 
    422   1.9     isaki 	DPRINTF(1, ("setting sample rate to %d, %d\n",
    423   1.2   minoura 		 rate, (int)vs_l2r[rate].rate));
    424   1.2   minoura 	bus_space_write_1(sc->sc_iot, sc->sc_ppi, PPI_PORTC,
    425   1.2   minoura 			  (bus_space_read_1 (sc->sc_iot, sc->sc_ppi,
    426   1.2   minoura 					     PPI_PORTC) & 0xf0)
    427   1.2   minoura 			  | vs_l2r[rate].den);
    428   1.2   minoura 	adpcm_chgclk(vs_l2r[rate].clk);
    429   1.1   minoura }
    430   1.1   minoura 
    431   1.1   minoura static inline void
    432   1.1   minoura vs_set_po(struct vs_softc *sc, u_long po)
    433   1.1   minoura {
    434   1.1   minoura 	bus_space_write_1(sc->sc_iot, sc->sc_ppi, PPI_PORTC,
    435   1.1   minoura 			  (bus_space_read_1(sc->sc_iot, sc->sc_ppi, PPI_PORTC)
    436   1.1   minoura 			   & 0xfc) | po);
    437   1.1   minoura }
    438   1.1   minoura 
    439   1.1   minoura static int
    440   1.1   minoura vs_trigger_output(void *hdl, void *start, void *end, int bsize,
    441   1.6   minoura 		  void (*intr)(void *), void *arg,
    442  1.27      kent 		  const audio_params_t *p)
    443   1.1   minoura {
    444  1.28      kent 	struct vs_softc *sc;
    445   1.1   minoura 	struct vs_dma *vd;
    446   1.1   minoura 	struct dmac_dma_xfer *xf;
    447  1.28      kent 	struct dmac_channel_stat *chan;
    448   1.1   minoura 
    449   1.9     isaki 	DPRINTF(2, ("vs_trigger_output: start=%p, bsize=%d, intr=%p, arg=%p\n",
    450   1.1   minoura 		 start, bsize, intr, arg));
    451  1.28      kent 	sc = hdl;
    452  1.28      kent 	chan = sc->sc_dma_ch;
    453   1.1   minoura 	sc->sc_pintr = intr;
    454   1.1   minoura 	sc->sc_parg  = arg;
    455   1.2   minoura 	sc->sc_current.blksize = bsize;
    456  1.32     isaki 	sc->sc_current.bufsize = (char *)end - (char *)start;
    457   1.1   minoura 	sc->sc_current.dmap = 0;
    458   1.1   minoura 
    459   1.1   minoura 	/* Find DMA buffer. */
    460   1.1   minoura 	for (vd = sc->sc_dmas; vd != NULL && KVADDR(vd) != start;
    461   1.1   minoura 	     vd = vd->vd_next)
    462  1.28      kent 		continue;
    463   1.1   minoura 	if (vd == NULL) {
    464   1.1   minoura 		printf("%s: trigger_output: bad addr %p\n",
    465  1.33     isaki 		    device_xname(sc->sc_dev), start);
    466  1.28      kent 		return EINVAL;
    467   1.1   minoura 	}
    468   1.1   minoura 
    469   1.2   minoura 	vs_set_sr(sc, sc->sc_current.prate);
    470   1.1   minoura 	vs_set_po(sc, VS_PANOUT_LR);
    471   1.2   minoura 
    472  1.19     isaki 	xf = dmac_alloc_xfer(chan, sc->sc_dmat, vd->vd_map);
    473   1.1   minoura 	sc->sc_current.xfer = xf;
    474   1.1   minoura 	chan->ch_dcr = (DMAC_DCR_XRM_CSWOH | DMAC_DCR_OTYP_EASYNC |
    475   1.1   minoura 			DMAC_DCR_OPS_8BIT);
    476   1.1   minoura 	chan->ch_ocr = DMAC_OCR_REQG_EXTERNAL;
    477   1.1   minoura 	xf->dx_ocr = DMAC_OCR_DIR_MTD;
    478   1.1   minoura 	xf->dx_scr = DMAC_SCR_MAC_COUNT_UP | DMAC_SCR_DAC_NO_COUNT;
    479   1.1   minoura 	xf->dx_device = sc->sc_addr + MSM6258_DATA*2 + 1;
    480   1.2   minoura 
    481  1.19     isaki 	dmac_load_xfer(chan->ch_softc, xf);
    482  1.19     isaki 	dmac_start_xfer_offset(chan->ch_softc, xf, 0, sc->sc_current.blksize);
    483  1.19     isaki 	bus_space_write_1(sc->sc_iot, sc->sc_ioh, MSM6258_STAT, 2);
    484  1.38     isaki 	sc->sc_active = 1;
    485   1.1   minoura 
    486   1.1   minoura 	return 0;
    487   1.1   minoura }
    488   1.1   minoura 
    489   1.1   minoura static int
    490   1.1   minoura vs_trigger_input(void *hdl, void *start, void *end, int bsize,
    491   1.6   minoura 		 void (*intr)(void *), void *arg,
    492  1.27      kent 		 const audio_params_t *p)
    493   1.1   minoura {
    494  1.28      kent 	struct vs_softc *sc;
    495   1.1   minoura 	struct vs_dma *vd;
    496   1.2   minoura 	struct dmac_dma_xfer *xf;
    497  1.28      kent 	struct dmac_channel_stat *chan;
    498   1.1   minoura 
    499   1.9     isaki 	DPRINTF(2, ("vs_trigger_input: start=%p, bsize=%d, intr=%p, arg=%p\n",
    500   1.1   minoura 		 start, bsize, intr, arg));
    501  1.28      kent 	sc = hdl;
    502  1.28      kent 	chan = sc->sc_dma_ch;
    503   1.1   minoura 	sc->sc_rintr = intr;
    504   1.1   minoura 	sc->sc_rarg  = arg;
    505   1.2   minoura 	sc->sc_current.blksize = bsize;
    506  1.32     isaki 	sc->sc_current.bufsize = (char *)end - (char *)start;
    507   1.1   minoura 	sc->sc_current.dmap = 0;
    508   1.1   minoura 
    509   1.1   minoura 	/* Find DMA buffer. */
    510   1.1   minoura 	for (vd = sc->sc_dmas; vd != NULL && KVADDR(vd) != start;
    511   1.1   minoura 	     vd = vd->vd_next)
    512  1.28      kent 		continue;
    513   1.1   minoura 	if (vd == NULL) {
    514   1.1   minoura 		printf("%s: trigger_output: bad addr %p\n",
    515  1.33     isaki 		    device_xname(sc->sc_dev), start);
    516  1.28      kent 		return EINVAL;
    517   1.1   minoura 	}
    518   1.1   minoura 
    519   1.2   minoura 	vs_set_sr(sc, sc->sc_current.rrate);
    520  1.19     isaki 	xf = dmac_alloc_xfer(chan, sc->sc_dmat, vd->vd_map);
    521   1.2   minoura 	sc->sc_current.xfer = xf;
    522   1.2   minoura 	chan->ch_dcr = (DMAC_DCR_XRM_CSWOH | DMAC_DCR_OTYP_EASYNC |
    523   1.2   minoura 			DMAC_DCR_OPS_8BIT);
    524   1.2   minoura 	chan->ch_ocr = DMAC_OCR_REQG_EXTERNAL;
    525   1.2   minoura 	xf->dx_ocr = DMAC_OCR_DIR_DTM;
    526   1.2   minoura 	xf->dx_scr = DMAC_SCR_MAC_COUNT_UP | DMAC_SCR_DAC_NO_COUNT;
    527   1.2   minoura 	xf->dx_device = sc->sc_addr + MSM6258_DATA*2 + 1;
    528   1.2   minoura 
    529  1.19     isaki 	dmac_load_xfer(chan->ch_softc, xf);
    530  1.19     isaki 	dmac_start_xfer_offset(chan->ch_softc, xf, 0, sc->sc_current.blksize);
    531  1.19     isaki 	bus_space_write_1(sc->sc_iot, sc->sc_ioh, MSM6258_STAT, 4);
    532  1.38     isaki 	sc->sc_active = 1;
    533   1.1   minoura 
    534   1.1   minoura 	return 0;
    535   1.1   minoura }
    536   1.1   minoura 
    537   1.1   minoura static int
    538   1.1   minoura vs_halt_output(void *hdl)
    539   1.1   minoura {
    540  1.28      kent 	struct vs_softc *sc;
    541   1.1   minoura 
    542   1.9     isaki 	DPRINTF(1, ("vs_halt_output\n"));
    543  1.28      kent 	sc = hdl;
    544  1.38     isaki 	if (sc->sc_active) {
    545  1.38     isaki 		/* stop ADPCM play */
    546  1.38     isaki 		dmac_abort_xfer(sc->sc_dma_ch->ch_softc, sc->sc_current.xfer);
    547  1.38     isaki 		bus_space_write_1(sc->sc_iot, sc->sc_ioh, MSM6258_STAT, 1);
    548  1.38     isaki 		sc->sc_active = 0;
    549  1.38     isaki 	}
    550   1.1   minoura 
    551   1.1   minoura 	return 0;
    552   1.1   minoura }
    553   1.1   minoura 
    554   1.1   minoura static int
    555   1.1   minoura vs_halt_input(void *hdl)
    556   1.1   minoura {
    557  1.28      kent 	struct vs_softc *sc;
    558   1.1   minoura 
    559   1.9     isaki 	DPRINTF(1, ("vs_halt_input\n"));
    560  1.28      kent 	sc = hdl;
    561  1.38     isaki 	if (sc->sc_active) {
    562  1.38     isaki 		/* stop ADPCM recoding */
    563  1.38     isaki 		dmac_abort_xfer(sc->sc_dma_ch->ch_softc, sc->sc_current.xfer);
    564  1.38     isaki 		bus_space_write_1(sc->sc_iot, sc->sc_ioh, MSM6258_STAT, 1);
    565  1.38     isaki 		sc->sc_active = 0;
    566  1.38     isaki 	}
    567   1.1   minoura 
    568   1.1   minoura 	return 0;
    569   1.1   minoura }
    570   1.1   minoura 
    571   1.1   minoura static int
    572  1.19     isaki vs_allocmem(struct vs_softc *sc, size_t size, size_t align, size_t boundary,
    573  1.35  jmcneill 	struct vs_dma *vd)
    574   1.1   minoura {
    575  1.35  jmcneill 	int error;
    576   1.1   minoura 
    577   1.1   minoura #ifdef DIAGNOSTIC
    578   1.1   minoura 	if (size > DMAC_MAXSEGSZ)
    579   1.1   minoura 		panic ("vs_allocmem: maximum size exceeded, %d", (int) size);
    580   1.1   minoura #endif
    581   1.1   minoura 
    582   1.1   minoura 	vd->vd_size = size;
    583  1.28      kent 
    584   1.1   minoura 	error = bus_dmamem_alloc(vd->vd_dmat, vd->vd_size, align, boundary,
    585   1.1   minoura 				 vd->vd_segs,
    586   1.1   minoura 				 sizeof (vd->vd_segs) / sizeof (vd->vd_segs[0]),
    587  1.35  jmcneill 				 &vd->vd_nsegs, BUS_DMA_WAITOK);
    588   1.1   minoura 	if (error)
    589   1.1   minoura 		goto out;
    590   1.1   minoura 
    591   1.1   minoura 	error = bus_dmamem_map(vd->vd_dmat, vd->vd_segs, vd->vd_nsegs,
    592   1.1   minoura 			       vd->vd_size, &vd->vd_addr,
    593  1.35  jmcneill 			       BUS_DMA_WAITOK | BUS_DMA_COHERENT);
    594   1.1   minoura 	if (error)
    595   1.1   minoura 		goto free;
    596   1.1   minoura 
    597   1.1   minoura 	error = bus_dmamap_create(vd->vd_dmat, vd->vd_size, 1, DMAC_MAXSEGSZ,
    598  1.35  jmcneill 				  0, BUS_DMA_WAITOK, &vd->vd_map);
    599   1.1   minoura 	if (error)
    600   1.1   minoura 		goto unmap;
    601   1.1   minoura 
    602   1.1   minoura 	error = bus_dmamap_load(vd->vd_dmat, vd->vd_map, vd->vd_addr,
    603  1.35  jmcneill 				vd->vd_size, NULL, BUS_DMA_WAITOK);
    604   1.1   minoura 	if (error)
    605   1.1   minoura 		goto destroy;
    606   1.1   minoura 
    607  1.28      kent 	return 0;
    608   1.1   minoura 
    609   1.1   minoura  destroy:
    610   1.1   minoura 	bus_dmamap_destroy(vd->vd_dmat, vd->vd_map);
    611   1.1   minoura  unmap:
    612   1.1   minoura 	bus_dmamem_unmap(vd->vd_dmat, vd->vd_addr, vd->vd_size);
    613   1.1   minoura  free:
    614   1.1   minoura 	bus_dmamem_free(vd->vd_dmat, vd->vd_segs, vd->vd_nsegs);
    615   1.1   minoura  out:
    616  1.28      kent 	return error;
    617   1.1   minoura }
    618   1.1   minoura 
    619   1.1   minoura static void
    620  1.19     isaki vs_freemem(struct vs_dma *vd)
    621   1.1   minoura {
    622   1.1   minoura 
    623   1.1   minoura 	bus_dmamap_unload(vd->vd_dmat, vd->vd_map);
    624   1.1   minoura 	bus_dmamap_destroy(vd->vd_dmat, vd->vd_map);
    625   1.1   minoura 	bus_dmamem_unmap(vd->vd_dmat, vd->vd_addr, vd->vd_size);
    626   1.1   minoura 	bus_dmamem_free(vd->vd_dmat, vd->vd_segs, vd->vd_nsegs);
    627   1.1   minoura }
    628   1.1   minoura 
    629   1.1   minoura static int
    630   1.1   minoura vs_getdev(void *hdl, struct audio_device *retp)
    631   1.1   minoura {
    632  1.28      kent 
    633   1.9     isaki 	DPRINTF(1, ("vs_getdev\n"));
    634   1.1   minoura 	*retp = vs_device;
    635   1.1   minoura 	return 0;
    636   1.1   minoura }
    637   1.1   minoura 
    638   1.1   minoura static int
    639   1.1   minoura vs_set_port(void *hdl, mixer_ctrl_t *cp)
    640   1.1   minoura {
    641  1.28      kent 
    642   1.9     isaki 	DPRINTF(1, ("vs_set_port\n"));
    643   1.1   minoura 	return 0;
    644   1.1   minoura }
    645   1.1   minoura 
    646   1.1   minoura static int
    647   1.1   minoura vs_get_port(void *hdl, mixer_ctrl_t *cp)
    648   1.1   minoura {
    649  1.28      kent 
    650   1.9     isaki 	DPRINTF(1, ("vs_get_port\n"));
    651   1.1   minoura 	return 0;
    652   1.1   minoura }
    653   1.1   minoura 
    654   1.1   minoura static int
    655   1.1   minoura vs_query_devinfo(void *hdl, mixer_devinfo_t *mi)
    656   1.1   minoura {
    657  1.28      kent 
    658   1.9     isaki 	DPRINTF(1, ("vs_query_devinfo\n"));
    659   1.1   minoura 	switch (mi->index) {
    660   1.1   minoura 	default:
    661   1.1   minoura 		return EINVAL;
    662   1.1   minoura 	}
    663   1.1   minoura 	return 0;
    664   1.1   minoura }
    665   1.1   minoura 
    666   1.1   minoura static void *
    667  1.35  jmcneill vs_allocm(void *hdl, int direction, size_t size)
    668   1.1   minoura {
    669  1.28      kent 	struct vs_softc *sc;
    670   1.1   minoura 	struct vs_dma *vd;
    671   1.1   minoura 	int error;
    672   1.1   minoura 
    673  1.37       chs 	vd = kmem_alloc(sizeof(*vd), KM_SLEEP);
    674  1.28      kent 	sc = hdl;
    675   1.1   minoura 	vd->vd_dmat = sc->sc_dmat;
    676   1.1   minoura 
    677  1.35  jmcneill 	error = vs_allocmem(sc, size, 32, 0, vd);
    678   1.1   minoura 	if (error) {
    679  1.35  jmcneill 		kmem_free(vd, sizeof(*vd));
    680  1.28      kent 		return NULL;
    681   1.1   minoura 	}
    682   1.1   minoura 	vd->vd_next = sc->sc_dmas;
    683   1.1   minoura 	sc->sc_dmas = vd;
    684   1.1   minoura 
    685  1.28      kent 	return KVADDR(vd);
    686   1.1   minoura }
    687   1.1   minoura 
    688   1.1   minoura static void
    689  1.35  jmcneill vs_freem(void *hdl, void *addr, size_t size)
    690   1.1   minoura {
    691  1.28      kent 	struct vs_softc *sc;
    692   1.1   minoura 	struct vs_dma *p, **pp;
    693   1.1   minoura 
    694  1.28      kent 	sc = hdl;
    695   1.1   minoura 	for (pp = &sc->sc_dmas; (p = *pp) != NULL; pp = &p->vd_next) {
    696   1.1   minoura 		if (KVADDR(p) == addr) {
    697   1.1   minoura 			vs_freemem(p);
    698   1.1   minoura 			*pp = p->vd_next;
    699  1.35  jmcneill 			kmem_free(p, sizeof(*p));
    700   1.1   minoura 			return;
    701   1.1   minoura 		}
    702   1.1   minoura 	}
    703   1.1   minoura }
    704   1.1   minoura 
    705   1.1   minoura static size_t
    706   1.1   minoura vs_round_buffersize(void *hdl, int direction, size_t bufsize)
    707   1.1   minoura {
    708  1.28      kent 
    709   1.1   minoura 	if (bufsize > DMAC_MAXSEGSZ)
    710   1.1   minoura 		bufsize = DMAC_MAXSEGSZ;
    711   1.1   minoura 	return bufsize;
    712   1.1   minoura }
    713   1.1   minoura 
    714   1.1   minoura #if 0
    715   1.1   minoura paddr_t
    716  1.19     isaki vs_mappage(void *addr, void *mem, off_t off, int prot)
    717   1.1   minoura {
    718  1.28      kent 	struct vs_softc *sc;
    719   1.1   minoura 	struct vs_dma *p;
    720   1.1   minoura 
    721   1.1   minoura 	if (off < 0)
    722  1.28      kent 		return -1;
    723  1.28      kent 	sc = addr;
    724   1.1   minoura 	for (p = sc->sc_dmas; p != NULL && KVADDR(p) != mem;
    725   1.1   minoura 	     p = p->vd_next)
    726  1.28      kent 		continue;
    727   1.1   minoura 	if (p == NULL) {
    728   1.1   minoura 		printf("%s: mappage: bad addr %p\n",
    729  1.33     isaki 		    device_xname(sc->sc_dev), start);
    730  1.28      kent 		return -1;
    731   1.1   minoura 	}
    732   1.1   minoura 
    733  1.28      kent 	return bus_dmamem_mmap(sc->sc_dmat, p->vd_segs, p->vd_nsegs,
    734  1.28      kent 			       off, prot, BUS_DMA_WAITOK);
    735   1.1   minoura }
    736   1.1   minoura #endif
    737   1.1   minoura 
    738   1.1   minoura static int
    739   1.1   minoura vs_get_props(void *hdl)
    740   1.1   minoura {
    741  1.28      kent 
    742   1.9     isaki 	DPRINTF(1, ("vs_get_props\n"));
    743   1.1   minoura 	return 0 /* | dependent | half duplex | no mmap */;
    744   1.1   minoura }
    745  1.35  jmcneill 
    746  1.35  jmcneill static void
    747  1.35  jmcneill vs_get_locks(void *hdl, kmutex_t **intr, kmutex_t **thread)
    748  1.35  jmcneill {
    749  1.35  jmcneill 	struct vs_softc *sc;
    750  1.35  jmcneill 
    751  1.35  jmcneill 	DPRINTF(1, ("vs_get_locks\n"));
    752  1.35  jmcneill 	sc = hdl;
    753  1.35  jmcneill 	*intr = &sc->sc_intr_lock;
    754  1.35  jmcneill 	*thread = &sc->sc_lock;
    755  1.35  jmcneill }
    756  1.35  jmcneill 
    757   1.1   minoura #endif /* NAUDIO > 0 && NVS > 0*/
    758