Home | History | Annotate | Line # | Download | only in dev
aucc.c revision 1.1
      1  1.1  is #undef AUDIO_DEBUG
      2  1.1  is /*
      3  1.1  is  * Copyright (c) 1997 Stephan Thesing
      4  1.1  is  * All rights reserved.
      5  1.1  is  *
      6  1.1  is  * Redistribution and use in source and binary forms, with or without
      7  1.1  is  * modification, are permitted provided that the following conditions
      8  1.1  is  * are met:
      9  1.1  is  * 1. Redistributions of source code must retain the above copyright
     10  1.1  is  *    notice, this list of conditions and the following disclaimer.
     11  1.1  is  * 2. Redistributions in binary form must reproduce the above copyright
     12  1.1  is  *    notice, this list of conditions and the following disclaimer in the
     13  1.1  is  *    documentation and/or other materials provided with the distribution.
     14  1.1  is  * 3. All advertising materials mentioning features or use of this software
     15  1.1  is  *    must display the following acknowledgement:
     16  1.1  is  *      This product includes software developed by Stephan Thesing.
     17  1.1  is  * 4. The name of the author may not be used to endorse or promote products
     18  1.1  is  *    derived from this software without specific prior written permission
     19  1.1  is  *
     20  1.1  is  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     21  1.1  is  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     22  1.1  is  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     23  1.1  is  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     24  1.1  is  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     25  1.1  is  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     26  1.1  is  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     27  1.1  is  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     28  1.1  is  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     29  1.1  is  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     30  1.1  is  */
     31  1.1  is 
     32  1.1  is #include "aucc.h"
     33  1.1  is #if NAUCC > 0
     34  1.1  is 
     35  1.1  is #include <sys/param.h>
     36  1.1  is #include <sys/systm.h>
     37  1.1  is #include <sys/errno.h>
     38  1.1  is #include <sys/ioctl.h>
     39  1.1  is #include <sys/device.h>
     40  1.1  is #include <sys/proc.h>
     41  1.1  is #include <machine/cpu.h>
     42  1.1  is 
     43  1.1  is #include <sys/audioio.h>
     44  1.1  is #include <dev/audio_if.h>
     45  1.1  is #include <amiga/amiga/cc.h>
     46  1.1  is #include <amiga/amiga/custom.h>
     47  1.1  is #include <amiga/amiga/device.h>
     48  1.1  is #include <amiga/dev/auccvar.h>
     49  1.1  is 
     50  1.1  is #ifdef AUDIO_DEBUG
     51  1.1  is /*extern printf __P((const char *,...));*/
     52  1.1  is int     auccdebug = 1;
     53  1.1  is #define DPRINTF(x)      if (auccdebug) printf x
     54  1.1  is #else
     55  1.1  is #define DPRINTF(x)
     56  1.1  is #endif
     57  1.1  is 
     58  1.1  is #ifdef splaudio
     59  1.1  is #undef splaudio
     60  1.1  is #endif
     61  1.1  is 
     62  1.1  is #define splaudio() spl4();
     63  1.1  is 
     64  1.1  is /* clock frequency.. */
     65  1.1  is extern int eclockfreq;
     66  1.1  is 
     67  1.1  is 
     68  1.1  is /* hw audio ch */
     69  1.1  is extern struct audio_channel channel[4];
     70  1.1  is 
     71  1.1  is 
     72  1.1  is /*
     73  1.1  is  * Software state.
     74  1.1  is  */
     75  1.1  is struct aucc_softc {
     76  1.1  is 	struct	device sc_dev;		/* base device */
     77  1.1  is 
     78  1.1  is 	int	sc_open;		/* single use device */
     79  1.1  is 	aucc_data_t sc_channel[4];	/* per channel freq, ... */
     80  1.1  is 	u_int	sc_encoding;		/* encoding AUDIO_ENCODING_.*/
     81  1.1  is 	int	sc_channels;		/* # of channels used */
     82  1.1  is 
     83  1.1  is 	int	sc_intrcnt;		/* interrupt count */
     84  1.1  is 	int	sc_channelmask;  	/* which channels are used ? */
     85  1.1  is };
     86  1.1  is 
     87  1.1  is /* interrupt interfaces */
     88  1.1  is void aucc_inthdl __P((int));
     89  1.1  is 
     90  1.1  is /* forward declarations */
     91  1.1  is static int init_aucc __P((struct aucc_softc *));
     92  1.1  is static u_int freqtoper  __P((u_int));
     93  1.1  is static u_int pertofreq  __P((u_int));
     94  1.1  is 
     95  1.1  is /* autoconfiguration driver */
     96  1.1  is void	auccattach __P((struct device *, struct device *, void *));
     97  1.1  is int	auccmatch __P((struct device *, struct cfdata *, void *));
     98  1.1  is 
     99  1.1  is struct cfattach aucc_ca = {
    100  1.1  is 	sizeof(struct aucc_softc),
    101  1.1  is 	auccmatch,
    102  1.1  is 	auccattach
    103  1.1  is };
    104  1.1  is 
    105  1.1  is struct	cfdriver aucc_cd = {
    106  1.1  is 	NULL, "aucc", DV_DULL, NULL, 0
    107  1.1  is };
    108  1.1  is 
    109  1.1  is struct audio_device aucc_device = {
    110  1.1  is 	"Amiga-audio",
    111  1.1  is 	"x",
    112  1.1  is 	"aucc"
    113  1.1  is };
    114  1.1  is 
    115  1.1  is 
    116  1.1  is struct aucc_softc *aucc=NULL;
    117  1.1  is 
    118  1.1  is 
    119  1.1  is unsigned char ulaw_to_lin[] = {
    120  1.1  is   0x82, 0x86, 0x8a, 0x8e, 0x92, 0x96, 0x9a, 0x9e, 0xa2, 0xa6, 0xaa, 0xae, 0xb2, 0xb6, 0xba, 0xbe,
    121  1.1  is   0xc1, 0xc3, 0xc5, 0xc7, 0xc9, 0xcb, 0xcd, 0xcf, 0xd1, 0xd3, 0xd5, 0xd7, 0xd9, 0xdb, 0xdd, 0xdf,
    122  1.1  is   0xe1, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9, 0xea, 0xeb, 0xec, 0xed, 0xee, 0xef, 0xf0,
    123  1.1  is   0xf0, 0xf1, 0xf1, 0xf2, 0xf2, 0xf3, 0xf3, 0xf4, 0xf4, 0xf5, 0xf5, 0xf6, 0xf6, 0xf7, 0xf7, 0xf8,
    124  1.1  is   0xf8, 0xf8, 0xf9, 0xf9, 0xf9, 0xf9, 0xfa, 0xfa, 0xfa, 0xfa, 0xfb, 0xfb, 0xfb, 0xfb, 0xfc, 0xfc,
    125  1.1  is   0xfc, 0xfc, 0xfc, 0xfc, 0xfd, 0xfd, 0xfd, 0xfd, 0xfd, 0xfd, 0xfd, 0xfd, 0xfe, 0xfe, 0xfe, 0xfe,
    126  1.1  is   0xfe, 0xfe, 0xfe, 0xfe, 0xfe, 0xfe, 0xfe, 0xfe, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
    127  1.1  is   0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00,
    128  1.1  is   0x7d, 0x79, 0x75, 0x71, 0x6d, 0x69, 0x65, 0x61, 0x5d, 0x59, 0x55, 0x51, 0x4d, 0x49, 0x45, 0x41,
    129  1.1  is   0x3e, 0x3c, 0x3a, 0x38, 0x36, 0x34, 0x32, 0x30, 0x2e, 0x2c, 0x2a, 0x28, 0x26, 0x24, 0x22, 0x20,
    130  1.1  is   0x1e, 0x1d, 0x1c, 0x1b, 0x1a, 0x19, 0x18, 0x17, 0x16, 0x15, 0x14, 0x13, 0x12, 0x11, 0x10, 0x0f,
    131  1.1  is   0x0f, 0x0e, 0x0e, 0x0d, 0x0d, 0x0c, 0x0c, 0x0b, 0x0b, 0x0a, 0x0a, 0x09, 0x09, 0x08, 0x08, 0x07,
    132  1.1  is   0x07, 0x07, 0x06, 0x06, 0x06, 0x06, 0x05, 0x05, 0x05, 0x05, 0x04, 0x04, 0x04, 0x04, 0x03, 0x03,
    133  1.1  is   0x03, 0x03, 0x03, 0x03, 0x02, 0x02, 0x02, 0x02, 0x02, 0x02, 0x02, 0x02, 0x01, 0x01, 0x01, 0x01,
    134  1.1  is   0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
    135  1.1  is   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
    136  1.1  is };
    137  1.1  is 
    138  1.1  is /*
    139  1.1  is  * Define our interface to the higher level audio driver.
    140  1.1  is  */
    141  1.1  is int	aucc_open __P((dev_t, int));
    142  1.1  is void	aucc_close __P((void *));
    143  1.1  is int	aucc_set_in_sr __P((void *, u_long));
    144  1.1  is u_long	aucc_get_in_sr __P((void *));
    145  1.1  is int	aucc_set_out_sr __P((void *, u_long));
    146  1.1  is u_long	aucc_get_out_sr __P((void *));
    147  1.1  is int	aucc_query_encoding __P((void *, struct audio_encoding *));
    148  1.1  is int	aucc_set_encoding __P((void *, u_int));
    149  1.1  is int	aucc_get_encoding __P((void *));
    150  1.1  is int	aucc_set_precision __P((void *, u_int));
    151  1.1  is int	aucc_get_precision __P((void *));
    152  1.1  is int	aucc_set_channels __P((void *, int));
    153  1.1  is int	aucc_get_channels __P((void *));
    154  1.1  is int	aucc_round_blocksize __P((void *, int));
    155  1.1  is int	aucc_set_out_port __P((void *, int));
    156  1.1  is int	aucc_get_out_port __P((void *));
    157  1.1  is int	aucc_set_in_port __P((void *, int));
    158  1.1  is int	aucc_get_in_port __P((void *));
    159  1.1  is int	aucc_commit_settings __P((void *));
    160  1.1  is u_int	aucc_get_silence __P((int));
    161  1.1  is int	aucc_start_output __P((void *, void *, int, void (*)(void *),
    162  1.1  is 				  void *));
    163  1.1  is int	aucc_start_input __P((void *, void *, int, void (*)(void *),
    164  1.1  is 				 void *));
    165  1.1  is int	aucc_halt_output __P((void *));
    166  1.1  is int	aucc_halt_input __P((void *));
    167  1.1  is int	aucc_cont_output __P((void *));
    168  1.1  is int	aucc_cont_input __P((void *));
    169  1.1  is int	aucc_getdev __P((void *, struct audio_device *));
    170  1.1  is int	aucc_setfd __P((void *, int));
    171  1.1  is int	aucc_set_port __P((void *, mixer_ctrl_t *));
    172  1.1  is int	aucc_get_port __P((void *, mixer_ctrl_t *));
    173  1.1  is int	aucc_query_devinfo __P((void *, mixer_devinfo_t *));
    174  1.1  is void	aucc_encode __P((int, u_char *, char *, int));
    175  1.1  is int	aucc_set_params __P((void *, int, struct audio_params *,
    176  1.1  is 	    struct audio_params *));
    177  1.1  is 
    178  1.1  is struct audio_hw_if sa_hw_if = {
    179  1.1  is 	aucc_open,
    180  1.1  is 	aucc_close,
    181  1.1  is 	NULL,
    182  1.1  is 	aucc_query_encoding,
    183  1.1  is 	aucc_set_params,
    184  1.1  is 	aucc_round_blocksize,
    185  1.1  is 	aucc_set_out_port,
    186  1.1  is 	aucc_get_out_port,
    187  1.1  is 	aucc_set_in_port,
    188  1.1  is 	aucc_get_in_port,
    189  1.1  is 	aucc_commit_settings,
    190  1.1  is 	aucc_start_output,
    191  1.1  is 	aucc_start_input,
    192  1.1  is 	aucc_halt_output,
    193  1.1  is 	aucc_halt_input,
    194  1.1  is 	aucc_cont_output,
    195  1.1  is 	aucc_cont_input,
    196  1.1  is 	NULL,
    197  1.1  is 	aucc_getdev,
    198  1.1  is 	aucc_setfd,
    199  1.1  is 	aucc_set_port,
    200  1.1  is 	aucc_get_port,
    201  1.1  is 	aucc_query_devinfo,
    202  1.1  is 	0,
    203  1.1  is 	0
    204  1.1  is };
    205  1.1  is 
    206  1.1  is /* autoconfig routines */
    207  1.1  is 
    208  1.1  is int
    209  1.1  is auccmatch(pdp, cfp, aux)
    210  1.1  is 	struct device *pdp;
    211  1.1  is 	struct cfdata *cfp;
    212  1.1  is 	void *aux;
    213  1.1  is {
    214  1.1  is 	if (matchname((char *)aux, "aucc") &&
    215  1.1  is #ifdef DRACO
    216  1.1  is 	    !is_draco() &&
    217  1.1  is #endif
    218  1.1  is 	    (cfp->cf_unit == 0))
    219  1.1  is 		return 1;
    220  1.1  is 
    221  1.1  is 	return 0;
    222  1.1  is }
    223  1.1  is 
    224  1.1  is /*
    225  1.1  is  * Audio chip found.
    226  1.1  is  */
    227  1.1  is void
    228  1.1  is auccattach(parent, self, args)
    229  1.1  is 	struct device *parent, *self;
    230  1.1  is 	void *args;
    231  1.1  is {
    232  1.1  is 	register struct aucc_softc *sc = (struct aucc_softc *)self;
    233  1.1  is 	register int i;
    234  1.1  is 
    235  1.1  is 	printf("\n");
    236  1.1  is 
    237  1.1  is 	if((i=init_aucc(sc))) {
    238  1.1  is 		printf("audio: no chipmem\n");
    239  1.1  is 		return;
    240  1.1  is 	}
    241  1.1  is 
    242  1.1  is 	if (audio_hardware_attach(&sa_hw_if, sc) != 0)
    243  1.1  is 		printf("audio: could not attach to audio pseudo-device driver\n");
    244  1.1  is 	/* XXX: no way to return error, if init fails */
    245  1.1  is }
    246  1.1  is 
    247  1.1  is 
    248  1.1  is static int
    249  1.1  is init_aucc(sc)
    250  1.1  is 	struct aucc_softc *sc;
    251  1.1  is {
    252  1.1  is 	register int i, err=0;
    253  1.1  is 
    254  1.1  is 	/* init values per channel */
    255  1.1  is  	for (i=0;i<4;i++) {
    256  1.1  is 		sc->sc_channel[i].nd_freq=8000;
    257  1.1  is 		sc->sc_channel[i].nd_per=freqtoper(8000);
    258  1.1  is 		sc->sc_channel[i].nd_busy=0;
    259  1.1  is 		sc->sc_channel[i].nd_dma=alloc_chipmem(AUDIO_BUF_SIZE*2);
    260  1.1  is 		if (sc->sc_channel[i].nd_dma==NULL)
    261  1.1  is 			err=1;
    262  1.1  is 	 	sc->sc_channel[i].nd_dmalength=0;
    263  1.1  is 		sc->sc_channel[i].nd_volume=64;
    264  1.1  is 		sc->sc_channel[i].nd_intr=NULL;
    265  1.1  is 		sc->sc_channel[i].nd_intrdata=NULL;
    266  1.1  is 		DPRINTF(("dma buffer for channel %d is %p\n", i,
    267  1.1  is 		    sc->sc_channel[i].nd_dma));
    268  1.1  is 
    269  1.1  is 	}
    270  1.1  is 
    271  1.1  is 	if (err) {
    272  1.1  is 		for(i=0;i<4;i++)
    273  1.1  is 			if (sc->sc_channel[i].nd_dma)
    274  1.1  is 				free_chipmem(sc->sc_channel[i].nd_dma);
    275  1.1  is 	}
    276  1.1  is 
    277  1.1  is 	sc->sc_channels=4;
    278  1.1  is 	sc->sc_channelmask=0xf;
    279  1.1  is 
    280  1.1  is 	custom.intena = 0x78; /* clear interrupts */
    281  1.1  is 	custom.dmacon = 0x0f; /* clear dma */
    282  1.1  is 
    283  1.1  is 	sc->sc_encoding=AUDIO_ENCODING_ULAW;
    284  1.1  is 
    285  1.1  is 	return err;
    286  1.1  is 
    287  1.1  is }
    288  1.1  is 
    289  1.1  is int
    290  1.1  is aucc_open(dev, flags)
    291  1.1  is 	dev_t dev;
    292  1.1  is 	int flags;
    293  1.1  is {
    294  1.1  is 	register struct aucc_softc *sc;
    295  1.1  is 	int unit = AUDIOUNIT(dev);
    296  1.1  is 	register int i;
    297  1.1  is 
    298  1.1  is 	DPRINTF(("sa_open: unit %d\n",unit));
    299  1.1  is 
    300  1.1  is 	if (unit >= aucc_cd.cd_ndevs)
    301  1.1  is 		return (ENODEV);
    302  1.1  is 	if ((sc = aucc_cd.cd_devs[unit]) == NULL)
    303  1.1  is 		return (ENXIO);
    304  1.1  is 	if (sc->sc_open)
    305  1.1  is 		return (EBUSY);
    306  1.1  is 	sc->sc_open = 1;
    307  1.1  is 	for (i=0;i<4;i++) {
    308  1.1  is 		sc->sc_channel[i].nd_intr=NULL;
    309  1.1  is 		sc->sc_channel[i].nd_intrdata=NULL;
    310  1.1  is 	}
    311  1.1  is 	aucc=sc;
    312  1.1  is 
    313  1.1  is 	sc->sc_channels=4;
    314  1.1  is 	sc->sc_channelmask=0xf;
    315  1.1  is 
    316  1.1  is 	DPRINTF(("saopen: ok -> sc=0x%p\n",sc));
    317  1.1  is 
    318  1.1  is 	return (0);
    319  1.1  is }
    320  1.1  is 
    321  1.1  is void
    322  1.1  is aucc_close(addr)
    323  1.1  is 	void *addr;
    324  1.1  is {
    325  1.1  is 	register struct aucc_softc *sc = addr;
    326  1.1  is 
    327  1.1  is 	DPRINTF(("sa_close: sc=0x%p\n", sc));
    328  1.1  is 	/*
    329  1.1  is 	 * halt i/o, clear open flag, and done.
    330  1.1  is 	 */
    331  1.1  is 	aucc_halt_output(sc);
    332  1.1  is 	sc->sc_open = 0;
    333  1.1  is 
    334  1.1  is 	DPRINTF(("sa_close: closed.\n"));
    335  1.1  is }
    336  1.1  is 
    337  1.1  is int
    338  1.1  is aucc_set_in_sr(addr, sr)
    339  1.1  is 	void *addr;
    340  1.1  is 	u_long sr;
    341  1.1  is {
    342  1.1  is 	/* no input possible.. */
    343  1.1  is 	return EINVAL;
    344  1.1  is }
    345  1.1  is 
    346  1.1  is u_long
    347  1.1  is aucc_get_in_sr(addr)
    348  1.1  is 	void *addr;
    349  1.1  is {
    350  1.1  is 	return 0; /* no input possible */
    351  1.1  is }
    352  1.1  is 
    353  1.1  is int
    354  1.1  is aucc_set_out_sr(addr, sr)
    355  1.1  is 	void *addr;
    356  1.1  is 	u_long sr;
    357  1.1  is {
    358  1.1  is 	struct aucc_softc *sc=addr;
    359  1.1  is 	u_long per;
    360  1.1  is 	register int i;
    361  1.1  is 
    362  1.1  is 	per=freqtoper(sr);
    363  1.1  is 	if (per>0xffff)
    364  1.1  is 		return EINVAL;
    365  1.1  is 	sr=pertofreq(per);
    366  1.1  is 
    367  1.1  is 	for (i=0;i<4;i++) {
    368  1.1  is 		sc->sc_channel[i].nd_freq=sr;
    369  1.1  is 		sc->sc_channel[i].nd_per=per;
    370  1.1  is 	}
    371  1.1  is 
    372  1.1  is 	return(0);
    373  1.1  is }
    374  1.1  is 
    375  1.1  is u_long
    376  1.1  is aucc_get_out_sr(addr)
    377  1.1  is 	void *addr;
    378  1.1  is {
    379  1.1  is 	/* hmmm, rate is always rate of channel 0 */
    380  1.1  is 	return ((struct aucc_softc *)addr)->sc_channel[0].nd_freq;
    381  1.1  is }
    382  1.1  is 
    383  1.1  is int
    384  1.1  is aucc_query_encoding(addr, fp)
    385  1.1  is 	void *addr;
    386  1.1  is 	struct audio_encoding *fp;
    387  1.1  is {
    388  1.1  is 	switch (fp->index) {
    389  1.1  is 	case 0:
    390  1.1  is 		strcpy(fp->name, AudioElinear);
    391  1.1  is 		fp->encoding = AUDIO_ENCODING_LINEAR;
    392  1.1  is 		fp->precision = 8;
    393  1.1  is 		fp->flags = 0;
    394  1.1  is 		break;
    395  1.1  is 	case 1:
    396  1.1  is 		strcpy(fp->name, AudioEmulaw);
    397  1.1  is 		fp->encoding = AUDIO_ENCODING_ULAW;
    398  1.1  is 		fp->precision = 8;
    399  1.1  is 		fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
    400  1.1  is 		break;
    401  1.1  is 
    402  1.1  is 	default:
    403  1.1  is 		return(EINVAL);
    404  1.1  is 		/*NOTREACHED*/
    405  1.1  is 	}
    406  1.1  is 	return(0);
    407  1.1  is }
    408  1.1  is 
    409  1.1  is int
    410  1.1  is aucc_set_params(addr, mode, p, q)
    411  1.1  is 	void *addr;
    412  1.1  is 	int mode;
    413  1.1  is 	struct  audio_params *p, *q;
    414  1.1  is {
    415  1.1  is 	switch (p->encoding) {
    416  1.1  is 	case AUDIO_ENCODING_ULAW:
    417  1.1  is 	case AUDIO_ENCODING_LINEAR:
    418  1.1  is 		break;
    419  1.1  is 	default:
    420  1.1  is 		return EINVAL;
    421  1.1  is 		/* NOTREADCHED */
    422  1.1  is 	}
    423  1.1  is 
    424  1.1  is 	if (p->precision != 8)
    425  1.1  is 		return EINVAL;
    426  1.1  is 
    427  1.1  is 	if ((p->channels<1) || (p->channels>4))
    428  1.1  is 		return(EINVAL);
    429  1.1  is 
    430  1.1  is 	q->encoding = p->encoding;
    431  1.1  is 	q->precision = p->precision;
    432  1.1  is 	q->channels = p->channels;
    433  1.1  is 
    434  1.1  is 	return 0;
    435  1.1  is }
    436  1.1  is 
    437  1.1  is int
    438  1.1  is aucc_get_encoding(addr)
    439  1.1  is 	void *addr;
    440  1.1  is {
    441  1.1  is 	return ((struct aucc_softc *)addr)->sc_encoding;
    442  1.1  is }
    443  1.1  is 
    444  1.1  is int
    445  1.1  is aucc_get_precision(addr)
    446  1.1  is 	void *addr;
    447  1.1  is {
    448  1.1  is 	return(8);
    449  1.1  is }
    450  1.1  is 
    451  1.1  is int
    452  1.1  is aucc_get_channels(addr)
    453  1.1  is 	void *addr;
    454  1.1  is {
    455  1.1  is 	return ((struct aucc_softc *)addr)->sc_channels;
    456  1.1  is }
    457  1.1  is 
    458  1.1  is int
    459  1.1  is aucc_round_blocksize(addr, blk)
    460  1.1  is 	void *addr;
    461  1.1  is 	int blk;
    462  1.1  is {
    463  1.1  is 
    464  1.1  is 
    465  1.1  is 	return blk>AUDIO_BUF_SIZE?AUDIO_BUF_SIZE:blk; /* round up to even size */
    466  1.1  is }
    467  1.1  is 
    468  1.1  is int
    469  1.1  is aucc_set_out_port(addr, port) /* can set channels  */
    470  1.1  is 	void *addr;
    471  1.1  is 	int port;
    472  1.1  is {
    473  1.1  is 	register struct aucc_softc *sc = addr;
    474  1.1  is 
    475  1.1  is 	/* port is mask for channels 0..3 */
    476  1.1  is 	if ((port<0)||(port>15))
    477  1.1  is 		return EINVAL;
    478  1.1  is 
    479  1.1  is 	sc->sc_channelmask=port;
    480  1.1  is 
    481  1.1  is 	return(0);
    482  1.1  is }
    483  1.1  is 
    484  1.1  is int
    485  1.1  is aucc_get_out_port(addr)
    486  1.1  is 	void *addr;
    487  1.1  is {
    488  1.1  is 	register struct aucc_softc *sc = addr;
    489  1.1  is 
    490  1.1  is 	return sc->sc_channelmask;
    491  1.1  is }
    492  1.1  is 
    493  1.1  is int
    494  1.1  is aucc_set_in_port(addr, port)
    495  1.1  is 	void *addr;
    496  1.1  is 	int port;
    497  1.1  is {
    498  1.1  is 	return(EINVAL); /* no input possible */
    499  1.1  is 
    500  1.1  is }
    501  1.1  is 
    502  1.1  is int
    503  1.1  is aucc_get_in_port(addr)
    504  1.1  is 	void *addr;
    505  1.1  is {
    506  1.1  is 	return(0);
    507  1.1  is }
    508  1.1  is 
    509  1.1  is int
    510  1.1  is aucc_commit_settings(addr)
    511  1.1  is 	void *addr;
    512  1.1  is {
    513  1.1  is 	register struct aucc_softc *sc = addr;
    514  1.1  is 	register int i;
    515  1.1  is 
    516  1.1  is 	DPRINTF(("sa_commit.\n"));
    517  1.1  is 
    518  1.1  is 	for (i=0;i<4;i++) {
    519  1.1  is 		custom.aud[i].vol=sc->sc_channel[i].nd_volume;
    520  1.1  is 		custom.aud[i].per=sc->sc_channel[i].nd_per;
    521  1.1  is 	}
    522  1.1  is 
    523  1.1  is 	DPRINTF(("commit done\n"));
    524  1.1  is 
    525  1.1  is 	return(0);
    526  1.1  is }
    527  1.1  is 
    528  1.1  is u_int
    529  1.1  is aucc_get_silence(enc)
    530  1.1  is 	int enc;
    531  1.1  is {
    532  1.1  is 	switch (enc) {
    533  1.1  is 	case AUDIO_ENCODING_ULAW:
    534  1.1  is 		return 0x7f;
    535  1.1  is 		break;
    536  1.1  is 	case AUDIO_ENCODING_LINEAR:
    537  1.1  is 		return 0;
    538  1.1  is 		break;
    539  1.1  is 	default:
    540  1.1  is 		return 0;
    541  1.1  is 		break;
    542  1.1  is 	}
    543  1.1  is }
    544  1.1  is 
    545  1.1  is 
    546  1.1  is static int masks[4] = {1,3,7,15}; /* masks for n first channels */
    547  1.1  is static int masks2[4] = {1,2,4,8};
    548  1.1  is 
    549  1.1  is int
    550  1.1  is aucc_start_output(addr, p, cc, intr, arg)
    551  1.1  is 	void *addr;
    552  1.1  is 	void *p;
    553  1.1  is 	int cc;
    554  1.1  is 	void (*intr) __P((void *));
    555  1.1  is 	void *arg;
    556  1.1  is {
    557  1.1  is 	register struct aucc_softc *sc = addr;
    558  1.1  is 	register int mask=sc->sc_channelmask;
    559  1.1  is 	register int i,j=0;
    560  1.1  is 	register u_short *dmap;
    561  1.1  is 	register u_char *pp, *to;
    562  1.1  is 
    563  1.1  is 
    564  1.1  is 	dmap=NULL;
    565  1.1  is 
    566  1.1  is 	DPRINTF(("sa_start_output: cc=%d %p (%p)\n", cc, intr, arg));
    567  1.1  is 
    568  1.1  is 	mask &=masks[sc->sc_channels-1]; /* we use first sc_channels channels */
    569  1.1  is 	if (mask==0) /* active and used channels are disjoint */
    570  1.1  is 		return EINVAL;
    571  1.1  is 
    572  1.1  is 	for (i=0;i<4;i++) { /* channels available ? */
    573  1.1  is 		if ((masks2[i]&mask)&&(sc->sc_channel[i].nd_busy))
    574  1.1  is 			return EBUSY; /* channel is busy */
    575  1.1  is 		if (channel[i].isaudio==-1)
    576  1.1  is 			return EBUSY; /* system uses them */
    577  1.1  is 	}
    578  1.1  is 
    579  1.1  is 	/* enable interrupt on 1st channel */
    580  1.1  is 	for (i=0;i<4;i++) {
    581  1.1  is 		if (masks2[i]&mask) {
    582  1.1  is 			DPRINTF(("first channel is %d\n",i));
    583  1.1  is 			j=i;
    584  1.1  is 			sc->sc_channel[i].nd_intr=intr;
    585  1.1  is 			sc->sc_channel[i].nd_intrdata=arg;
    586  1.1  is 			dmap=sc->sc_channel[i].nd_dma;
    587  1.1  is 			break;
    588  1.1  is 		}
    589  1.1  is 	}
    590  1.1  is 
    591  1.1  is 	DPRINTF(("dmap is %p, mask=0x%x\n",dmap,mask));
    592  1.1  is 
    593  1.1  is 	/* copy data to dma buffer */
    594  1.1  is 
    595  1.1  is 
    596  1.1  is 	to=(u_char *)dmap;
    597  1.1  is 	pp=(u_char *)p;
    598  1.1  is 	aucc_encode(sc->sc_encoding, pp, to, cc);
    599  1.1  is 
    600  1.1  is 
    601  1.1  is 	/* disable ints, dma for channels, until all parameters set */
    602  1.1  is 	/* XXX custom.dmacon=mask;*/
    603  1.1  is 	custom.intreq=mask<<7;
    604  1.1  is 	custom.intena=mask<<7;
    605  1.1  is 
    606  1.1  is 
    607  1.1  is 	/* dma buffers: we use same buffer 4 all channels */
    608  1.1  is 	/* write dma location and length */
    609  1.1  is 	for (i=0;i<4;i++) {
    610  1.1  is 		if (masks2[i]&mask) {
    611  1.1  is 			DPRINTF(("turning channel %d on\n",i));
    612  1.1  is 			/*  sc->sc_channel[i].nd_busy=1;*/
    613  1.1  is 			channel[i].isaudio=1;
    614  1.1  is 			channel[i].play_count=1;
    615  1.1  is 			channel[i].handler=NULL;
    616  1.1  is 			custom.aud[i].per=sc->sc_channel[i].nd_per;
    617  1.1  is 			custom.aud[i].vol=sc->sc_channel[i].nd_volume;
    618  1.1  is 			if (custom.aud[i].lc==PREP_DMA_MEM(dmap))
    619  1.1  is 				custom.aud[i].lc =
    620  1.1  is 				    PREP_DMA_MEM(dmap+AUDIO_BUF_SIZE);
    621  1.1  is 			else
    622  1.1  is 				custom.aud[i].lc = PREP_DMA_MEM(dmap);
    623  1.1  is 
    624  1.1  is 			custom.aud[i].len=cc>>1;
    625  1.1  is 			sc->sc_channel[i].nd_mask=mask;
    626  1.1  is 			DPRINTF(("per is %d, vol is %d, len is %d\n",\
    627  1.1  is sc->sc_channel[i].nd_per, sc->sc_channel[i].nd_volume, cc>>1));
    628  1.1  is 
    629  1.1  is 		}
    630  1.1  is 	}
    631  1.1  is 
    632  1.1  is 	channel[j].handler=aucc_inthdl;
    633  1.1  is 
    634  1.1  is 	/* enable ints */
    635  1.1  is 	custom.intena=INTF_SETCLR|INTF_INTEN| (masks2[j]<<7);
    636  1.1  is 
    637  1.1  is 	DPRINTF(("enabled ints: 0x%x\n",(masks2[j]<<7)));
    638  1.1  is 
    639  1.1  is 	/* enable dma */
    640  1.1  is 	custom.dmacon=DMAF_SETCLR|DMAF_MASTER|mask;
    641  1.1  is 
    642  1.1  is 	DPRINTF(("enabled dma, mask=0x%x\n",mask));
    643  1.1  is 
    644  1.1  is 	return(0);
    645  1.1  is }
    646  1.1  is 
    647  1.1  is /* ARGSUSED */
    648  1.1  is int
    649  1.1  is aucc_start_input(addr, p, cc, intr, arg)
    650  1.1  is 	void *addr;
    651  1.1  is 	void *p;
    652  1.1  is 	int cc;
    653  1.1  is 	void (*intr) __P((void *));
    654  1.1  is 	void *arg;
    655  1.1  is {
    656  1.1  is 
    657  1.1  is 	return ENXIO; /* no input */
    658  1.1  is }
    659  1.1  is 
    660  1.1  is int
    661  1.1  is aucc_halt_output(addr)
    662  1.1  is 	void *addr;
    663  1.1  is {
    664  1.1  is 	register struct aucc_softc *sc = addr;
    665  1.1  is 	register int i;
    666  1.1  is 
    667  1.1  is 	/* XXX only halt, if input is also halted ?? */
    668  1.1  is 	/* stop dma, etc */
    669  1.1  is 	custom.intena=INTF_AUD0|INTF_AUD1|INTF_AUD2|INTF_AUD3;
    670  1.1  is 	custom.dmacon = DMAF_AUD0|DMAF_AUD1|DMAF_AUD2|DMAF_AUD3;
    671  1.1  is 	/* mark every busy unit idle */
    672  1.1  is 	for (i=0;i<4;i++) {
    673  1.1  is 		sc->sc_channel[i].nd_busy=sc->sc_channel[i].nd_mask=0;
    674  1.1  is 		channel[i].isaudio=0;
    675  1.1  is 		channel[i].play_count=0;
    676  1.1  is 	}
    677  1.1  is 
    678  1.1  is 	return(0);
    679  1.1  is }
    680  1.1  is 
    681  1.1  is int
    682  1.1  is aucc_halt_input(addr)
    683  1.1  is 	void *addr;
    684  1.1  is {
    685  1.1  is 	/* no input */
    686  1.1  is 
    687  1.1  is 	return ENXIO;
    688  1.1  is }
    689  1.1  is 
    690  1.1  is int
    691  1.1  is aucc_cont_output(addr)
    692  1.1  is 	void *addr;
    693  1.1  is {
    694  1.1  is 	DPRINTF(("aucc_cont_output: never called, what should it do?!\n"));
    695  1.1  is 	/* reenable DMA XXX */
    696  1.1  is 	return ENXIO;
    697  1.1  is }
    698  1.1  is 
    699  1.1  is int
    700  1.1  is aucc_cont_input(addr)
    701  1.1  is 	void *addr;
    702  1.1  is {
    703  1.1  is 	DPRINTF(("aucc_cont_input: never called, what should it do?!\n"));
    704  1.1  is 	return(0);
    705  1.1  is }
    706  1.1  is 
    707  1.1  is int
    708  1.1  is aucc_getdev(addr, retp)
    709  1.1  is         void *addr;
    710  1.1  is         struct audio_device *retp;
    711  1.1  is {
    712  1.1  is         *retp = aucc_device;
    713  1.1  is         return 0;
    714  1.1  is }
    715  1.1  is 
    716  1.1  is int
    717  1.1  is aucc_setfd(addr, flag)
    718  1.1  is         void *addr;
    719  1.1  is         int flag;
    720  1.1  is {
    721  1.1  is         return flag?EINVAL:0; /* Always half-duplex */
    722  1.1  is }
    723  1.1  is 
    724  1.1  is int
    725  1.1  is aucc_set_port(addr, cp)
    726  1.1  is 	void *addr;
    727  1.1  is 	mixer_ctrl_t *cp;
    728  1.1  is {
    729  1.1  is 	register struct aucc_softc *sc = addr;
    730  1.1  is 	register int i,j;
    731  1.1  is 
    732  1.1  is 	DPRINTF(("aucc_set_port: port=%d", cp->dev));
    733  1.1  is 
    734  1.1  is 	switch (cp->type) {
    735  1.1  is 	case AUDIO_MIXER_SET:
    736  1.1  is 		if (cp->dev!=AUCC_CHANNELS)
    737  1.1  is 			return EINVAL;
    738  1.1  is 		i=cp->un.mask;
    739  1.1  is 		if ((i<1)||(i>15))
    740  1.1  is 			return EINVAL;
    741  1.1  is 		sc->sc_channelmask=i;
    742  1.1  is 		break;
    743  1.1  is 
    744  1.1  is 	case AUDIO_MIXER_VALUE:
    745  1.1  is 		i=cp->un.value.num_channels;
    746  1.1  is 		if ((i<1)||(i>4))
    747  1.1  is 			return EINVAL;
    748  1.1  is 
    749  1.1  is 		if (cp->dev!=AUCC_VOLUME)
    750  1.1  is 			return EINVAL;
    751  1.1  is 
    752  1.1  is 		/* set volume for channel 0..i-1 */
    753  1.1  is 		for (j=0;j<i;j++)
    754  1.1  is 	 		sc->sc_channel[j].nd_volume=cp->un.value.level[j]>>2;
    755  1.1  is 			break;
    756  1.1  is 
    757  1.1  is 	default:
    758  1.1  is 		return EINVAL;
    759  1.1  is 		break;
    760  1.1  is 	}
    761  1.1  is 	return 0;
    762  1.1  is }
    763  1.1  is 
    764  1.1  is 
    765  1.1  is int
    766  1.1  is aucc_get_port(addr, cp)
    767  1.1  is 	void *addr;
    768  1.1  is 	mixer_ctrl_t *cp;
    769  1.1  is {
    770  1.1  is 	register struct aucc_softc *sc = addr;
    771  1.1  is 	register int i,j;
    772  1.1  is 
    773  1.1  is 	DPRINTF(("aucc_get_port: port=%d", cp->dev));
    774  1.1  is 
    775  1.1  is 	switch (cp->type) {
    776  1.1  is 	case AUDIO_MIXER_SET:
    777  1.1  is 		if (cp->dev!=AUCC_CHANNELS)
    778  1.1  is 			return EINVAL;
    779  1.1  is 		cp->un.mask=sc->sc_channelmask;
    780  1.1  is 		break;
    781  1.1  is 
    782  1.1  is 	case AUDIO_MIXER_VALUE:
    783  1.1  is 		i = cp->un.value.num_channels;
    784  1.1  is 		if ((i<1)||(i>4))
    785  1.1  is 			return EINVAL;
    786  1.1  is 
    787  1.1  is 		for (j=0;j<i;j++)
    788  1.1  is 			cp->un.value.level[j]=sc->sc_channel[j].nd_volume<<2;
    789  1.1  is 		break;
    790  1.1  is 
    791  1.1  is 	default:
    792  1.1  is 		return EINVAL;
    793  1.1  is 	}
    794  1.1  is 	return 0;
    795  1.1  is }
    796  1.1  is 
    797  1.1  is 
    798  1.1  is int
    799  1.1  is aucc_query_devinfo(addr, dip)
    800  1.1  is 	void *addr;
    801  1.1  is 	register mixer_devinfo_t *dip;
    802  1.1  is {
    803  1.1  is 	register int i;
    804  1.1  is 
    805  1.1  is 	switch(dip->index) {
    806  1.1  is 	case AUCC_CHANNELS:
    807  1.1  is 		dip->type = AUDIO_MIXER_SET;
    808  1.1  is 		dip->mixer_class = AUCC_OUTPUT_CLASS;
    809  1.1  is 		dip->prev = dip->next = AUDIO_MIXER_LAST;
    810  1.1  is                 strcpy(dip->label.name, AudioNspeaker);
    811  1.1  is 		for (i=0;i<16;i++) {
    812  1.1  is 			sprintf(dip->un.s.member[i].label.name,
    813  1.1  is 			    "channelmask%d", i);
    814  1.1  is 			dip->un.s.member[i].mask = i;
    815  1.1  is 		}
    816  1.1  is 		dip->un.s.num_mem = 16;
    817  1.1  is 		break;
    818  1.1  is 
    819  1.1  is 	case AUCC_VOLUME:
    820  1.1  is 		dip->type = AUDIO_MIXER_VALUE;
    821  1.1  is 		dip->mixer_class = AUCC_OUTPUT_CLASS;
    822  1.1  is 		dip->prev = dip->next = AUDIO_MIXER_LAST;
    823  1.1  is 		strcpy(dip->label.name, AudioNspeaker);
    824  1.1  is 		dip->un.v.num_channels = 4;
    825  1.1  is 		strcpy(dip->un.v.units.name, AudioNvolume);
    826  1.1  is 		break;
    827  1.1  is 
    828  1.1  is 	case AUCC_OUTPUT_CLASS:
    829  1.1  is 		dip->type = AUDIO_MIXER_CLASS;
    830  1.1  is 		dip->mixer_class = AUCC_OUTPUT_CLASS;
    831  1.1  is 		dip->next = dip->prev = AUDIO_MIXER_LAST;
    832  1.1  is 		strcpy(dip->label.name, AudioCOutputs);
    833  1.1  is 		break;
    834  1.1  is 	default:
    835  1.1  is 		return ENXIO;
    836  1.1  is 		/*NOTREACHED*/
    837  1.1  is 	}
    838  1.1  is 
    839  1.1  is 	DPRINTF(("AUDIO_MIXER_DEVINFO: name=%s\n", dip->label.name));
    840  1.1  is 
    841  1.1  is 	return(0);
    842  1.1  is }
    843  1.1  is 
    844  1.1  is 
    845  1.1  is /* audio int handler */
    846  1.1  is void
    847  1.1  is aucc_inthdl(int ch)
    848  1.1  is {
    849  1.1  is 	register int i;
    850  1.1  is 	register int mask=aucc->sc_channel[ch].nd_mask;
    851  1.1  is 
    852  1.1  is 	/* for all channels in this maskgroup:
    853  1.1  is 	   disable dma, int
    854  1.1  is 	   mark idle */
    855  1.1  is 	DPRINTF(("inthandler called, channel %d, mask 0x%x\n",ch,mask));
    856  1.1  is 
    857  1.1  is 	custom.intreq=mask<<7; /* clear request */
    858  1.1  is 	/* XXX: maybe we can leave ints and/or DMA on, if another sample has to be played?*/
    859  1.1  is 	custom.intena=mask<<7;
    860  1.1  is 	/*
    861  1.1  is 	 * XXX custom.dmacon=mask; NO!!!
    862  1.1  is 	 */
    863  1.1  is 	for (i=0;i<4;i++) {
    864  1.1  is 		if (masks2[i]&&mask) {
    865  1.1  is 			DPRINTF(("marking channel %d idle\n",i));
    866  1.1  is 			aucc->sc_channel[i].nd_busy=0;
    867  1.1  is 			aucc->sc_channel[i].nd_mask=0;
    868  1.1  is 			channel[i].isaudio=channel[i].play_count=0;
    869  1.1  is 		}
    870  1.1  is 	}
    871  1.1  is 
    872  1.1  is 	/* call handler */
    873  1.1  is 	if (aucc->sc_channel[ch].nd_intr) {
    874  1.1  is 		DPRINTF(("calling %p\n",aucc->sc_channel[ch].nd_intr));
    875  1.1  is 		(*(aucc->sc_channel[ch].nd_intr))(aucc->sc_channel[ch].nd_intrdata);
    876  1.1  is 	}
    877  1.1  is 	else DPRINTF(("zero int handler\n"));
    878  1.1  is 	DPRINTF(("ints done\n"));
    879  1.1  is }
    880  1.1  is 
    881  1.1  is 
    882  1.1  is 
    883  1.1  is 
    884  1.1  is /* transform frequency to period, adjust bounds */
    885  1.1  is static u_int
    886  1.1  is freqtoper(u_int freq)
    887  1.1  is {
    888  1.1  is 	u_int per=eclockfreq*5/freq;
    889  1.1  is 
    890  1.1  is 	if (per<124)
    891  1.1  is 		per=124; /* must have at least 124 ticks between samples */
    892  1.1  is 
    893  1.1  is 	return per;
    894  1.1  is }
    895  1.1  is 
    896  1.1  is /* transform period to frequency */
    897  1.1  is static u_int
    898  1.1  is pertofreq(u_int per)
    899  1.1  is {
    900  1.1  is 	u_int freq=eclockfreq*5/per;
    901  1.1  is 
    902  1.1  is 
    903  1.1  is 	return freq;
    904  1.1  is }
    905  1.1  is 
    906  1.1  is 
    907  1.1  is 
    908  1.1  is void
    909  1.1  is aucc_encode(enc, p, q, i)
    910  1.1  is 	int enc;
    911  1.1  is 	u_char *p;
    912  1.1  is 	char *q;
    913  1.1  is 	int i;
    914  1.1  is {
    915  1.1  is 	int off=0;
    916  1.1  is 	u_char *tab=NULL;
    917  1.1  is 
    918  1.1  is 
    919  1.1  is 
    920  1.1  is 	switch (enc) {
    921  1.1  is 	case AUDIO_ENCODING_ULAW:
    922  1.1  is 		tab=ulaw_to_lin;
    923  1.1  is 		break;
    924  1.1  is 	case AUDIO_ENCODING_ULINEAR:
    925  1.1  is 		off=-128;
    926  1.1  is 		/* FALLTHROUGH */
    927  1.1  is 	case AUDIO_ENCODING_LINEAR:
    928  1.1  is 		break;
    929  1.1  is 	default:
    930  1.1  is 		return;
    931  1.1  is 	}
    932  1.1  is 
    933  1.1  is 	if (tab)
    934  1.1  is 		while (i--)
    935  1.1  is 			*q++ = tab[*p++];
    936  1.1  is 	else
    937  1.1  is 		while (i--)
    938  1.1  is 			*q++ = *p++ + off;
    939  1.1  is 
    940  1.1  is }
    941  1.1  is 
    942  1.1  is #endif /* NAUCC > 0 */
    943