Home | History | Annotate | Line # | Download | only in pad
pad.c revision 1.10.6.1
      1 /*	$NetBSD: pad.c,v 1.10.6.1 2008/12/11 19:49:30 ad Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2007 Jared D. McNeill <jmcneill (at) invisible.ca>
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  *
     16  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     17  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     18  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     19  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     20  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     21  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     22  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     23  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     24  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     25  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     26  * POSSIBILITY OF SUCH DAMAGE.
     27  */
     28 
     29 #include <sys/cdefs.h>
     30 __KERNEL_RCSID(0, "$NetBSD: pad.c,v 1.10.6.1 2008/12/11 19:49:30 ad Exp $");
     31 
     32 #include <sys/types.h>
     33 #include <sys/param.h>
     34 #include <sys/conf.h>
     35 #include <sys/buf.h>
     36 #include <sys/kmem.h>
     37 #include <sys/kernel.h>
     38 #include <sys/device.h>
     39 #include <sys/proc.h>
     40 #include <sys/condvar.h>
     41 #include <sys/select.h>
     42 #include <sys/audioio.h>
     43 #include <sys/vnode.h>
     44 #include <sys/atomic.h>
     45 
     46 #include <dev/audio_if.h>
     47 #include <dev/audiovar.h>
     48 #include <dev/auconv.h>
     49 
     50 #include <dev/pad/padvar.h>
     51 #include <dev/pad/padvol.h>
     52 
     53 #define PADUNIT(x)	minor(x)
     54 
     55 extern struct cfdriver pad_cd;
     56 
     57 static struct audio_device pad_device = {
     58 	"Pseudo Audio",
     59 	"1.0",
     60 	"pad",
     61 };
     62 
     63 typedef struct pad_block {
     64 	uint8_t		*pb_ptr;
     65 	int		pb_len;
     66 } pad_block_t;
     67 
     68 enum {
     69 	PAD_OUTPUT_CLASS,
     70 	PAD_INPUT_CLASS,
     71 	PAD_OUTPUT_MASTER_VOLUME,
     72 	PAD_INPUT_DAC_VOLUME,
     73 	PAD_ENUM_LAST,
     74 };
     75 
     76 static int	pad_match(device_t, cfdata_t, void *);
     77 static void	pad_attach(device_t, device_t, void *);
     78 static int	pad_detach(device_t, int);
     79 static void	pad_childdet(device_t, device_t);
     80 
     81 static int	pad_query_encoding(void *, struct audio_encoding *);
     82 static int	pad_set_params(void *, int, int,
     83 				audio_params_t *, audio_params_t *,
     84 				stream_filter_list_t *, stream_filter_list_t *);
     85 static int	pad_start_output(void *, void *, int,
     86 				    void (*)(void *), void *);
     87 static int	pad_start_input(void *, void *, int,
     88 				   void (*)(void *), void *);
     89 static int	pad_halt_output(void *);
     90 static int	pad_halt_input(void *);
     91 static int	pad_getdev(void *, struct audio_device *);
     92 static int	pad_set_port(void *, mixer_ctrl_t *);
     93 static int	pad_get_port(void *, mixer_ctrl_t *);
     94 static int	pad_query_devinfo(void *, mixer_devinfo_t *);
     95 static int	pad_get_props(void *);
     96 static int	pad_round_blocksize(void *, int, int, const audio_params_t *);
     97 static void	pad_get_locks(void *, kmutex_t **, kmutex_t **);
     98 
     99 static const struct audio_hw_if pad_hw_if = {
    100 	.query_encoding = pad_query_encoding,
    101 	.set_params = pad_set_params,
    102 	.start_output = pad_start_output,
    103 	.start_input = pad_start_input,
    104 	.halt_output = pad_halt_output,
    105 	.halt_input = pad_halt_input,
    106 	.getdev = pad_getdev,
    107 	.set_port = pad_set_port,
    108 	.get_port = pad_get_port,
    109 	.query_devinfo = pad_query_devinfo,
    110 	.get_props = pad_get_props,
    111 	.round_blocksize = pad_round_blocksize,
    112 	.get_locks = pad_get_locks,
    113 };
    114 
    115 #define PAD_NFORMATS	1
    116 static const struct audio_format pad_formats[PAD_NFORMATS] = {
    117 	{ NULL, AUMODE_PLAY|AUMODE_RECORD, AUDIO_ENCODING_SLINEAR_LE, 16, 16,
    118 	  2, AUFMT_STEREO, 1, { 44100 } },
    119 };
    120 
    121 extern void	padattach(int);
    122 
    123 static int		pad_add_block(pad_softc_t *, uint8_t *, int);
    124 static int		pad_get_block(pad_softc_t *, pad_block_t *, int);
    125 
    126 dev_type_open(pad_open);
    127 dev_type_close(pad_close);
    128 dev_type_read(pad_read);
    129 
    130 const struct cdevsw pad_cdevsw = {
    131 	.d_open = pad_open,
    132 	.d_close = pad_close,
    133 	.d_read = pad_read,
    134 	.d_write = nowrite,
    135 	.d_ioctl = noioctl,
    136 	.d_stop = nostop,
    137 	.d_tty = notty,
    138 	.d_poll = nopoll,
    139 	.d_mmap = nommap,
    140 	.d_kqfilter = nokqfilter,
    141 	.d_flag = D_OTHER | D_MPSAFE,
    142 };
    143 
    144 CFATTACH_DECL2_NEW(pad, sizeof(pad_softc_t), pad_match, pad_attach, pad_detach,
    145     NULL, NULL, pad_childdet);
    146 
    147 void
    148 padattach(int n)
    149 {
    150 	int i, err;
    151 	cfdata_t cf;
    152 
    153 #ifdef DEBUG
    154 	printf("pad: requested %d units\n", n);
    155 #endif
    156 
    157 	err = config_cfattach_attach(pad_cd.cd_name, &pad_ca);
    158 	if (err) {
    159 		aprint_error("%s: couldn't register cfattach: %d\n",
    160 		    pad_cd.cd_name, err);
    161 		config_cfdriver_detach(&pad_cd);
    162 		return;
    163 	}
    164 
    165 	for (i = 0; i < n; i++) {
    166 		cf = kmem_alloc(sizeof(struct cfdata), KM_SLEEP);
    167 		if (cf == NULL) {
    168 			aprint_error("%s: couldn't allocate cfdata\n",
    169 			    pad_cd.cd_name);
    170 			continue;
    171 		}
    172 		cf->cf_name = pad_cd.cd_name;
    173 		cf->cf_atname = pad_cd.cd_name;
    174 		cf->cf_unit = i;
    175 		cf->cf_fstate = FSTATE_STAR;
    176 
    177 		(void)config_attach_pseudo(cf);
    178 	}
    179 
    180 	return;
    181 }
    182 
    183 static int
    184 pad_add_block(pad_softc_t *sc, uint8_t *blk, int blksize)
    185 {
    186 	int l;
    187 
    188 	KASSERT(mutex_owned(&sc->sc_lock));
    189 
    190 	if (sc->sc_buflen + blksize > PAD_BUFSIZE)
    191 		return ENOBUFS;
    192 
    193 	if (sc->sc_wpos + blksize <= PAD_BUFSIZE)
    194 		memcpy(sc->sc_audiobuf + sc->sc_wpos, blk, blksize);
    195 	else {
    196 		l = PAD_BUFSIZE - sc->sc_wpos;
    197 		memcpy(sc->sc_audiobuf + sc->sc_wpos, blk, l);
    198 		memcpy(sc->sc_audiobuf, blk + l, blksize - l);
    199 	}
    200 
    201 	sc->sc_wpos += blksize;
    202 	if (sc->sc_wpos > PAD_BUFSIZE)
    203 		sc->sc_wpos -= PAD_BUFSIZE;
    204 
    205 	sc->sc_buflen += blksize;
    206 
    207 	return 0;
    208 }
    209 
    210 static int
    211 pad_get_block(pad_softc_t *sc, pad_block_t *pb, int blksize)
    212 {
    213 	int l;
    214 
    215 	KASSERT(mutex_owned(&sc->sc_lock));
    216 	KASSERT(pb != NULL);
    217 
    218 	if (sc->sc_buflen < blksize)
    219 		return ERESTART;
    220 
    221 	pb->pb_ptr = (sc->sc_audiobuf + sc->sc_rpos);
    222 	if (sc->sc_rpos + blksize < PAD_BUFSIZE) {
    223 		pb->pb_len = blksize;
    224 		sc->sc_rpos += blksize;
    225 	} else {
    226 		l = PAD_BUFSIZE - sc->sc_rpos;
    227 		pb->pb_len = l;
    228 		sc->sc_rpos = 0;
    229 	}
    230 	sc->sc_buflen -= pb->pb_len;
    231 
    232 	return 0;
    233 }
    234 
    235 static int
    236 pad_match(device_t parent, cfdata_t data, void *opaque)
    237 {
    238 
    239 	return 1;
    240 }
    241 
    242 static void
    243 pad_childdet(device_t self, device_t child)
    244 {
    245 	pad_softc_t *sc = device_private(self);
    246 
    247 	sc->sc_audiodev = NULL;
    248 }
    249 
    250 static void
    251 pad_attach(device_t parent, device_t self, void *opaque)
    252 {
    253 	pad_softc_t *sc = device_private(self);
    254 
    255 	aprint_normal_dev(self, "outputs: 44100Hz, 16-bit, stereo\n");
    256 
    257 	sc->sc_dev = self;
    258 	sc->sc_open = 0;
    259 	if (auconv_create_encodings(pad_formats, PAD_NFORMATS,
    260 	    &sc->sc_encodings) != 0) {
    261 		aprint_error_dev(self, "couldn't create encodings\n");
    262 		return;
    263 	}
    264 
    265 	cv_init(&sc->sc_condvar, device_xname(self));
    266 	mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
    267 	mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_NONE);
    268 
    269 	sc->sc_swvol = 255;
    270 	sc->sc_buflen = 0;
    271 	sc->sc_rpos = sc->sc_wpos = 0;
    272 	sc->sc_audiodev = (void *)audio_attach_mi(&pad_hw_if, sc, sc->sc_dev);
    273 
    274 	if (!pmf_device_register(self, NULL, NULL))
    275 		aprint_error_dev(self, "couldn't establish power handler\n");
    276 
    277 	return;
    278 }
    279 
    280 static int
    281 pad_detach(device_t self, int flags)
    282 {
    283 	pad_softc_t *sc = device_private(self);
    284 	int cmaj, mn, rc;
    285 
    286 	cmaj = cdevsw_lookup_major(&pad_cdevsw);
    287 	mn = device_unit(self);
    288 	vdevgone(cmaj, mn, mn, VCHR);
    289 
    290 	if ((rc = config_detach_children(self, flags)) != 0)
    291 		return rc;
    292 
    293 	pmf_device_deregister(self);
    294 
    295 	mutex_destroy(&sc->sc_lock);
    296 	mutex_destroy(&sc->sc_intr_lock);
    297 	cv_destroy(&sc->sc_condvar);
    298 
    299 	auconv_delete_encodings(sc->sc_encodings);
    300 
    301 	return 0;
    302 }
    303 
    304 int
    305 pad_open(dev_t dev, int flags, int fmt, struct lwp *l)
    306 {
    307 	pad_softc_t *sc;
    308 
    309 	sc = device_lookup_private(&pad_cd, PADUNIT(dev));
    310 	if (sc == NULL)
    311 		return ENODEV;
    312 
    313 	if (atomic_swap_uint(&sc->sc_open, 1) != 0) {
    314 		return EBUSY;
    315 	}
    316 
    317 	return 0;
    318 }
    319 
    320 int
    321 pad_close(dev_t dev, int flags, int fmt, struct lwp *l)
    322 {
    323 	pad_softc_t *sc;
    324 
    325 	sc = device_lookup_private(&pad_cd, PADUNIT(dev));
    326 	if (sc == NULL)
    327 		return ENODEV;
    328 
    329 	KASSERT(sc->sc_open > 0);
    330 	sc->sc_open = 0;
    331 
    332 	return 0;
    333 }
    334 
    335 int
    336 pad_read(dev_t dev, struct uio *uio, int flags)
    337 {
    338 	pad_softc_t *sc;
    339 	pad_block_t pb;
    340 	void (*intr)(void *);
    341 	void *intrarg;
    342 	int err;
    343 
    344 	sc = device_lookup_private(&pad_cd, PADUNIT(dev));
    345 	if (sc == NULL)
    346 		return ENODEV;
    347 
    348 	err = 0;
    349 
    350 	mutex_enter(&sc->sc_lock);
    351 	intr = sc->sc_intr;
    352 	intrarg = sc->sc_intrarg;
    353 	while (uio->uio_resid > 0 && !err) {
    354 		err = pad_get_block(sc, &pb, min(uio->uio_resid, PAD_BLKSIZE));
    355 		if (!err) {
    356 			mutex_exit(&sc->sc_lock);
    357 			err = uiomove(pb.pb_ptr, pb.pb_len, uio);
    358 			mutex_enter(&sc->sc_lock);
    359 			continue;
    360 		}
    361 		if (intr) {
    362 			mutex_enter(&sc->sc_intr_lock);
    363 			(*intr)(intrarg);
    364 			mutex_exit(&sc->sc_intr_lock);
    365 			intr = sc->sc_intr;
    366 			intrarg = sc->sc_intrarg;
    367 			err = 0;
    368 			continue;
    369 		}
    370 		err = cv_wait_sig(&sc->sc_condvar, &sc->sc_lock);
    371 		if (err != 0) {
    372 			mutex_exit(&sc->sc_lock);
    373 			return err;
    374 		}
    375 		intr = sc->sc_intr;
    376 		intrarg = sc->sc_intrarg;
    377 	}
    378 	if (intr) {
    379 		mutex_enter(&sc->sc_intr_lock);
    380 		(*intr)(intrarg);
    381 		mutex_exit(&sc->sc_intr_lock);
    382 	}
    383 	mutex_exit(&sc->sc_lock);
    384 
    385 	return err;
    386 }
    387 
    388 static int
    389 pad_query_encoding(void *opaque, struct audio_encoding *ae)
    390 {
    391 	pad_softc_t *sc;
    392 
    393 	sc = (pad_softc_t *)opaque;
    394 
    395 	KASSERT(mutex_owned(&sc->sc_lock));
    396 
    397 	return auconv_query_encoding(sc->sc_encodings, ae);
    398 }
    399 
    400 static int
    401 pad_set_params(void *opaque, int setmode, int usemode,
    402     audio_params_t *play, audio_params_t *rec,
    403     stream_filter_list_t *pfil, stream_filter_list_t *rfil)
    404 {
    405 	pad_softc_t *sc;
    406 
    407 	sc = (pad_softc_t *)opaque;
    408 
    409 	KASSERT(mutex_owned(&sc->sc_lock));
    410 
    411 	if (auconv_set_converter(pad_formats, PAD_NFORMATS, AUMODE_PLAY,
    412 	    play, true, pfil) < 0)
    413 		return EINVAL;
    414 	if (auconv_set_converter(pad_formats, PAD_NFORMATS, AUMODE_RECORD,
    415 	    rec, true, rfil) < 0)
    416 		return EINVAL;
    417 
    418 	if (pfil->req_size > 0)
    419 		play = &pfil->filters[0].param;
    420 	switch (play->encoding) {
    421 	case AUDIO_ENCODING_SLINEAR_LE:
    422 		if (play->precision == 16 && play->validbits == 16)
    423 			pfil->prepend(pfil, pad_vol_slinear16_le, play);
    424 		break;
    425 	case AUDIO_ENCODING_SLINEAR_BE:
    426 		if (play->precision == 16 && play->validbits == 16)
    427 			pfil->prepend(pfil, pad_vol_slinear16_be, play);
    428 		break;
    429 	default:
    430 		break;
    431 	}
    432 
    433 	return 0;
    434 }
    435 
    436 static int
    437 pad_start_output(void *opaque, void *block, int blksize,
    438     void (*intr)(void *), void *intrarg)
    439 {
    440 	pad_softc_t *sc;
    441 	int err;
    442 
    443 	sc = (pad_softc_t *)opaque;
    444 
    445 	KASSERT(mutex_owned(&sc->sc_lock));
    446 
    447 	sc->sc_intr = intr;
    448 	sc->sc_intrarg = intrarg;
    449 	sc->sc_blksize = blksize;
    450 
    451 	err = pad_add_block(sc, block, blksize);
    452 
    453 	cv_broadcast(&sc->sc_condvar);
    454 
    455 	return err;
    456 }
    457 
    458 static int
    459 pad_start_input(void *opaque, void *block, int blksize,
    460     void (*intr)(void *), void *intrarg)
    461 {
    462 	pad_softc_t *sc;
    463 
    464 	sc = (pad_softc_t *)opaque;
    465 
    466 	KASSERT(mutex_owned(&sc->sc_lock));
    467 
    468 	return EOPNOTSUPP;
    469 }
    470 
    471 static int
    472 pad_halt_output(void *opaque)
    473 {
    474 	pad_softc_t *sc;
    475 
    476 	sc = (pad_softc_t *)opaque;
    477 
    478 	KASSERT(mutex_owned(&sc->sc_lock));
    479 
    480 	sc->sc_intr = NULL;
    481 	sc->sc_intrarg = NULL;
    482 	sc->sc_buflen = 0;
    483 	sc->sc_rpos = sc->sc_wpos = 0;
    484 
    485 	return 0;
    486 }
    487 
    488 static int
    489 pad_halt_input(void *opaque)
    490 {
    491 	pad_softc_t *sc;
    492 
    493 	sc = (pad_softc_t *)opaque;
    494 
    495 	KASSERT(mutex_owned(&sc->sc_lock));
    496 
    497 	return 0;
    498 }
    499 
    500 static int
    501 pad_getdev(void *opaque, struct audio_device *ret)
    502 {
    503 	pad_softc_t *sc;
    504 
    505 	sc = (pad_softc_t *)opaque;
    506 
    507 	KASSERT(mutex_owned(&sc->sc_lock));
    508 
    509 	*ret = pad_device;
    510 
    511 	return 0;
    512 }
    513 
    514 static int
    515 pad_set_port(void *opaque, mixer_ctrl_t *mc)
    516 {
    517 	pad_softc_t *sc;
    518 
    519 	sc = (pad_softc_t *)opaque;
    520 
    521 	KASSERT(mutex_owned(&sc->sc_lock));
    522 
    523 	switch (mc->dev) {
    524 	case PAD_OUTPUT_MASTER_VOLUME:
    525 	case PAD_INPUT_DAC_VOLUME:
    526 		sc->sc_swvol = mc->un.value.level[AUDIO_MIXER_LEVEL_MONO];
    527 		return 0;
    528 	}
    529 
    530 	return ENXIO;
    531 }
    532 
    533 static int
    534 pad_get_port(void *opaque, mixer_ctrl_t *mc)
    535 {
    536 	pad_softc_t *sc;
    537 
    538 	sc = (pad_softc_t *)opaque;
    539 
    540 	KASSERT(mutex_owned(&sc->sc_lock));
    541 
    542 	switch (mc->dev) {
    543 	case PAD_OUTPUT_MASTER_VOLUME:
    544 	case PAD_INPUT_DAC_VOLUME:
    545 		mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_swvol;
    546 		return 0;
    547 	}
    548 
    549 	return ENXIO;
    550 }
    551 
    552 static int
    553 pad_query_devinfo(void *opaque, mixer_devinfo_t *di)
    554 {
    555 	pad_softc_t *sc;
    556 
    557 	sc = (pad_softc_t *)opaque;
    558 
    559 	KASSERT(mutex_owned(&sc->sc_lock));
    560 
    561 	switch (di->index) {
    562 	case PAD_OUTPUT_CLASS:
    563 		di->mixer_class = PAD_OUTPUT_CLASS;
    564 		strcpy(di->label.name, AudioCoutputs);
    565 		di->type = AUDIO_MIXER_CLASS;
    566 		di->next = di->prev = AUDIO_MIXER_LAST;
    567 		return 0;
    568 	case PAD_INPUT_CLASS:
    569 		di->mixer_class = PAD_INPUT_CLASS;
    570 		strcpy(di->label.name, AudioCinputs);
    571 		di->type = AUDIO_MIXER_CLASS;
    572 		di->next = di->prev = AUDIO_MIXER_LAST;
    573 		return 0;
    574 	case PAD_OUTPUT_MASTER_VOLUME:
    575 		di->mixer_class = PAD_OUTPUT_CLASS;
    576 		strcpy(di->label.name, AudioNmaster);
    577 		di->type = AUDIO_MIXER_VALUE;
    578 		di->next = di->prev = AUDIO_MIXER_LAST;
    579 		di->un.v.num_channels = 1;
    580 		strcpy(di->un.v.units.name, AudioNvolume);
    581 		return 0;
    582 	case PAD_INPUT_DAC_VOLUME:
    583 		di->mixer_class = PAD_INPUT_CLASS;
    584 		strcpy(di->label.name, AudioNdac);
    585 		di->type = AUDIO_MIXER_VALUE;
    586 		di->next = di->prev = AUDIO_MIXER_LAST;
    587 		di->un.v.num_channels = 1;
    588 		strcpy(di->un.v.units.name, AudioNvolume);
    589 		return 0;
    590 	}
    591 
    592 	return ENXIO;
    593 }
    594 
    595 static int
    596 pad_get_props(void *opaque)
    597 {
    598 	pad_softc_t *sc;
    599 
    600 	sc = (pad_softc_t *)opaque;
    601 
    602 	KASSERT(mutex_owned(&sc->sc_lock));
    603 
    604 	return 0;
    605 }
    606 
    607 static int
    608 pad_round_blocksize(void *opaque, int blksize, int mode,
    609     const audio_params_t *p)
    610 {
    611 	pad_softc_t *sc;
    612 
    613 	sc = (pad_softc_t *)opaque;
    614 
    615 	KASSERT(mutex_owned(&sc->sc_lock));
    616 
    617 	return PAD_BLKSIZE;
    618 }
    619 
    620 static void
    621 pad_get_locks(void *opaque, kmutex_t **intr, kmutex_t **thread)
    622 {
    623 	struct pad_softc *sc;
    624 
    625 	sc = (pad_softc_t *)opaque;
    626 
    627 	*intr = &sc->sc_intr_lock;
    628 	*thread = &sc->sc_lock;
    629 }
    630