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