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