xref: /netbsd-src/sys/dev/ebus/cs4231_ebus.c (revision 5e4c038a45edbc7d63b7c2daa76e29f88b64a4e3)
1 /*	$NetBSD: cs4231_ebus.c,v 1.6 2002/04/04 17:41:09 uwe Exp $ */
2 
3 /*
4  * Copyright (c) 2002 Valeriy E. Ushakov
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  * 3. The name of the author may not be used to endorse or promote products
16  *    derived from this software without specific prior written permission
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29 
30 #include <sys/param.h>
31 #include <sys/systm.h>
32 #include <sys/errno.h>
33 #include <sys/device.h>
34 #include <sys/malloc.h>
35 
36 #include <machine/autoconf.h>
37 #include <machine/cpu.h>
38 #include <dev/ebus/ebusreg.h>
39 #include <dev/ebus/ebusvar.h>
40 
41 #include <sys/audioio.h>
42 #include <dev/audio_if.h>
43 
44 #include <dev/ic/ad1848reg.h>
45 #include <dev/ic/cs4231reg.h>
46 #include <dev/ic/ad1848var.h>
47 #include <dev/ic/cs4231var.h>
48 
49 #ifdef AUDIO_DEBUG
50 int cs4231_ebus_debug = 0;
51 #define DPRINTF(x)	if (cs4231_ebus_debug) printf x
52 #else
53 #define DPRINTF(x)
54 #endif
55 
56 
57 struct cs4231_ebus_softc {
58 	struct cs4231_softc sc_cs4231;
59 
60 	bus_space_tag_t sc_bt;
61 	bus_space_handle_t sc_pdmareg; /* playback DMA */
62 	bus_space_handle_t sc_cdmareg; /* record DMA */
63 };
64 
65 
66 void	cs4231_ebus_attach(struct device *, struct device *, void *);
67 int	cs4231_ebus_match(struct device *, struct cfdata *, void *);
68 
69 struct cfattach audiocs_ebus_ca = {
70 	sizeof(struct cs4231_ebus_softc), cs4231_ebus_match, cs4231_ebus_attach
71 };
72 
73 
74 /* audio_hw_if methods specific to ebus dma */
75 static int	cs4231_ebus_trigger_output(void *, void *, void *, int,
76 					   void (*)(void *), void *,
77 					   struct audio_params *);
78 static int	cs4231_ebus_trigger_input(void *, void *, void *, int,
79 					  void (*)(void *), void *,
80 					  struct audio_params *);
81 static int	cs4231_ebus_halt_output(void *);
82 static int	cs4231_ebus_halt_input(void *);
83 
84 struct audio_hw_if audiocs_ebus_hw_if = {
85 	cs4231_open,
86 	cs4231_close,
87 	NULL,			/* drain */
88 	ad1848_query_encoding,
89 	ad1848_set_params,
90 	cs4231_round_blocksize,
91 	ad1848_commit_settings,
92 	NULL,			/* init_output */
93 	NULL,			/* init_input */
94 	NULL,			/* start_output */
95 	NULL,			/* start_input */
96 	cs4231_ebus_halt_output,
97 	cs4231_ebus_halt_input,
98 	NULL,			/* speaker_ctl */
99 	cs4231_getdev,
100 	NULL,			/* setfd */
101 	cs4231_set_port,
102 	cs4231_get_port,
103 	cs4231_query_devinfo,
104 	cs4231_malloc,
105 	cs4231_free,
106 	cs4231_round_buffersize,
107 	NULL,			/* mappage */
108 	cs4231_get_props,
109 	cs4231_ebus_trigger_output,
110 	cs4231_ebus_trigger_input,
111 	NULL,			/* dev_ioctl */
112 };
113 
114 #ifdef AUDIO_DEBUG
115 static void	cs4231_ebus_regdump(char *, struct cs4231_ebus_softc *);
116 #endif
117 
118 static int	cs4231_ebus_dma_reset(bus_space_tag_t, bus_space_handle_t);
119 static int	cs4231_ebus_trigger_transfer(struct cs4231_softc *,
120 			struct cs_transfer *,
121 			bus_space_tag_t, bus_space_handle_t,
122 			int, void *, void *, int, void (*)(void *), void *,
123 			struct audio_params *);
124 static void	cs4231_ebus_dma_advance(struct cs_transfer *,
125 					bus_space_tag_t, bus_space_handle_t);
126 static int	cs4231_ebus_dma_intr(struct cs_transfer *,
127 				     bus_space_tag_t, bus_space_handle_t);
128 static int	cs4231_ebus_intr(void *);
129 
130 
131 int
132 cs4231_ebus_match(parent, cf, aux)
133 	struct device *parent;
134 	struct cfdata *cf;
135 	void *aux;
136 {
137 	struct ebus_attach_args *ea = aux;
138 
139 	if (strcmp(ea->ea_name, AUDIOCS_PROM_NAME) == 0)
140 		return (1);
141 #ifdef __sparc__		/* XXX: Krups */
142 	if (strcmp(ea->ea_name, "sound") == 0)
143 		return (1);
144 #endif
145 
146 	return (0);
147 }
148 
149 
150 void
151 cs4231_ebus_attach(parent, self, aux)
152 	struct device *parent, *self;
153 	void *aux;
154 {
155 	struct cs4231_ebus_softc *ebsc = (struct cs4231_ebus_softc *)self;
156 	struct cs4231_softc *sc = &ebsc->sc_cs4231;
157 	struct ebus_attach_args *ea = aux;
158 	bus_space_handle_t bh;
159 	int i;
160 
161 	sc->sc_bustag = ebsc->sc_bt = ea->ea_bustag;
162 	sc->sc_dmatag = ea->ea_dmatag;
163 
164 	/*
165 	 * These are the register we get from the prom:
166 	 *	- CS4231 registers
167 	 *	- Playback EBus DMA controller
168 	 *	- Capture EBus DMA controller
169 	 *	- AUXIO audio register (codec powerdown)
170 	 *
171 	 * Map my registers in, if they aren't already in virtual
172 	 * address space.
173 	 */
174 	if (bus_space_map(ea->ea_bustag, EBUS_ADDR_FROM_REG(&ea->ea_reg[0]),
175 		ea->ea_reg[0].size, 0, &bh) != 0) {
176 		printf(": unable to map registers\n");
177 		return;
178 	}
179 
180 	/* XXX: map playback DMA registers (we just know where they are) */
181 	if (bus_space_map(ea->ea_bustag,
182 			  BUS_ADDR(0x14, 0x702000), /* XXX: magic num */
183 			  EBUS_DMAC_SIZE,
184 			  0, &ebsc->sc_pdmareg) != 0)
185 	{
186 		printf(": unable to map playback DMA registers\n");
187 		return;
188 	}
189 
190 	/* XXX: map capture DMA registers (we just know where they are) */
191 	if (bus_space_map(ea->ea_bustag,
192 			  BUS_ADDR(0x14, 0x704000), /* XXX: magic num */
193 			  EBUS_DMAC_SIZE,
194 			  0, &ebsc->sc_cdmareg) != 0)
195 	{
196 		printf(": unable to map capture DMA registers\n");
197 		return;
198 	}
199 
200 	/* establish interrupt channels */
201 	for (i = 0; i < ea->ea_nintr; ++i)
202 		bus_intr_establish(ea->ea_bustag,
203 				   ea->ea_intr[i], IPL_AUDIO, 0,
204 				   cs4231_ebus_intr, ebsc);
205 
206 	cs4231_common_attach(sc, bh);
207 	printf("\n");
208 
209 	/* XXX: todo: move to cs4231_common_attach, pass hw_if as arg? */
210 	audio_attach_mi(&audiocs_ebus_hw_if, sc, &sc->sc_ad1848.sc_dev);
211 }
212 
213 
214 #ifdef AUDIO_DEBUG
215 static void
216 cs4231_ebus_regdump(label, ebsc)
217 	char *label;
218 	struct cs4231_ebus_softc *ebsc;
219 {
220 	/* char bits[128]; */
221 
222 	printf("cs4231regdump(%s): regs:", label);
223 	/* XXX: dump ebus dma and aux registers */
224 	ad1848_dump_regs(&ebsc->sc_cs4231.sc_ad1848);
225 }
226 #endif /* AUDIO_DEBUG */
227 
228 
229 /* XXX: nothing CS4231-specific in this code... */
230 static int
231 cs4231_ebus_dma_reset(dt, dh)
232 	bus_space_tag_t dt;
233 	bus_space_handle_t dh;
234 {
235 	u_int32_t csr;
236 	int timo;
237 
238 	/* reset, also clear TC, just in case */
239 	bus_space_write_4(dt, dh, EBUS_DMAC_DCSR, EBDMA_RESET | EBDMA_TC);
240 
241 	for (timo = 50000; timo != 0; --timo) {
242 		csr = bus_space_read_4(dt, dh, EBUS_DMAC_DCSR);
243 		if ((csr & (EBDMA_CYC_PEND | EBDMA_DRAIN)) == 0)
244 			break;
245 	}
246 
247 	if (timo == 0) {
248 		char bits[128];
249 
250 		printf("cs4231_ebus_dma_reset: timed out: csr=%s\n",
251 		       bitmask_snprintf(csr, EBUS_DCSR_BITS,
252 					bits, sizeof(bits)));
253 		return (ETIMEDOUT);
254 	}
255 
256 	bus_space_write_4(dt, dh, EBUS_DMAC_DCSR, csr & ~EBDMA_RESET);
257 	return (0);
258 }
259 
260 
261 static void
262 cs4231_ebus_dma_advance(t, dt, dh)
263 	struct cs_transfer *t;
264 	bus_space_tag_t dt;
265 	bus_space_handle_t dh;
266 {
267 	bus_addr_t dmaaddr;
268 	bus_size_t dmasize;
269 
270 	cs4231_transfer_advance(t, &dmaaddr, &dmasize);
271 
272 	bus_space_write_4(dt, dh, EBUS_DMAC_DNBR, (u_int32_t)dmasize);
273 	bus_space_write_4(dt, dh, EBUS_DMAC_DNAR, (u_int32_t)dmaaddr);
274 }
275 
276 
277 /*
278  * Trigger transfer "t" using DMA controller "dmac".
279  * "iswrite" defines direction of the transfer.
280  */
281 static int
282 cs4231_ebus_trigger_transfer(sc, t, dt, dh, iswrite,
283 			     start, end, blksize,
284 			     intr, arg, param)
285 	struct cs4231_softc *sc;
286 	struct cs_transfer *t;
287 	bus_space_tag_t dt;
288 	bus_space_handle_t dh;
289 	int iswrite;
290 	void *start, *end;
291 	int blksize;
292 	void (*intr)(void *);
293 	void *arg;
294 	struct audio_params *param;
295 {
296 	u_int32_t csr;
297 	bus_addr_t dmaaddr;
298 	bus_size_t dmasize;
299 	int ret;
300 
301 	ret = cs4231_transfer_init(sc, t, &dmaaddr, &dmasize,
302 				   start, end, blksize, intr, arg);
303 	if (ret != 0)
304 		return (ret);
305 
306 	ret = cs4231_ebus_dma_reset(dt, dh);
307 	if (ret != 0)
308 		return (ret);
309 
310 	csr = bus_space_read_4(dt, dh, EBUS_DMAC_DCSR);
311 	bus_space_write_4(dt, dh, EBUS_DMAC_DCSR,
312 			  csr | EBDMA_EN_NEXT | (iswrite ? EBDMA_WRITE : 0)
313 			  | EBDMA_EN_DMA | EBDMA_EN_CNT | EBDMA_INT_EN);
314 
315 	/* first load: propagated to DACR/DBCR */
316 	bus_space_write_4(dt, dh, EBUS_DMAC_DNBR, (u_int32_t)dmasize);
317 	bus_space_write_4(dt, dh, EBUS_DMAC_DNAR, (u_int32_t)dmaaddr);
318 
319 	/* next load: goes to DNAR/DNBR */
320 	cs4231_ebus_dma_advance(t, dt, dh);
321 
322 	return (0);
323 }
324 
325 
326 static int
327 cs4231_ebus_trigger_output(addr, start, end, blksize, intr, arg, param)
328 	void *addr;
329 	void *start, *end;
330 	int blksize;
331 	void (*intr)(void *);
332 	void *arg;
333 	struct audio_params *param;
334 {
335 	struct cs4231_ebus_softc *ebsc = addr;
336 	struct cs4231_softc *sc = &ebsc->sc_cs4231;
337 	int cfg, ret;
338 
339 	ret = cs4231_ebus_trigger_transfer(sc, &sc->sc_playback,
340 					   ebsc->sc_bt, ebsc->sc_pdmareg,
341 					   0, /* iswrite */
342 					   start, end, blksize,
343 					   intr, arg, param);
344 	if (ret != 0)
345 		return (ret);
346 
347 	ad_write(&sc->sc_ad1848, SP_LOWER_BASE_COUNT, 0xff);
348 	ad_write(&sc->sc_ad1848, SP_UPPER_BASE_COUNT, 0xff);
349 
350 	cfg = ad_read(&sc->sc_ad1848, SP_INTERFACE_CONFIG);
351 	ad_write(&sc->sc_ad1848, SP_INTERFACE_CONFIG, cfg | PLAYBACK_ENABLE);
352 
353 	return (0);
354 }
355 
356 
357 static int
358 cs4231_ebus_trigger_input(addr, start, end, blksize, intr, arg, param)
359 	void *addr;
360 	void *start, *end;
361 	int blksize;
362 	void (*intr)(void *);
363 	void *arg;
364 	struct audio_params *param;
365 {
366 	struct cs4231_ebus_softc *ebsc = addr;
367 	struct cs4231_softc *sc = &ebsc->sc_cs4231;
368 	int cfg, ret;
369 
370 	ret = cs4231_ebus_trigger_transfer(sc, &sc->sc_capture,
371 					   ebsc->sc_bt, ebsc->sc_cdmareg,
372 					   1, /* iswrite */
373 					   start, end, blksize,
374 					   intr, arg, param);
375 	if (ret != 0)
376 		return (ret);
377 
378 	ad_write(&sc->sc_ad1848, CS_LOWER_REC_CNT, 0xff);
379 	ad_write(&sc->sc_ad1848, CS_UPPER_REC_CNT, 0xff);
380 
381 	cfg = ad_read(&sc->sc_ad1848, SP_INTERFACE_CONFIG);
382 	ad_write(&sc->sc_ad1848, SP_INTERFACE_CONFIG, cfg | CAPTURE_ENABLE);
383 
384 	return (0);
385 }
386 
387 
388 static int
389 cs4231_ebus_halt_output(addr)
390 	void *addr;
391 {
392 	struct cs4231_ebus_softc *ebsc = addr;
393 	struct cs4231_softc *sc = &ebsc->sc_cs4231;
394 	u_int32_t csr;
395 	int cfg;
396 
397 	sc->sc_playback.t_active = 0;
398 
399 	csr = bus_space_read_4(ebsc->sc_bt, ebsc->sc_pdmareg, EBUS_DMAC_DCSR);
400 	bus_space_write_4(ebsc->sc_bt, ebsc->sc_pdmareg, EBUS_DMAC_DCSR,
401 			  csr & ~EBDMA_EN_DMA);
402 
403 	cfg = ad_read(&sc->sc_ad1848, SP_INTERFACE_CONFIG);
404 	ad_write(&sc->sc_ad1848, SP_INTERFACE_CONFIG,
405 		 cfg & ~PLAYBACK_ENABLE);
406 
407 	return (0);
408 }
409 
410 
411 static int
412 cs4231_ebus_halt_input(addr)
413 	void *addr;
414 {
415 	struct cs4231_ebus_softc *ebsc = addr;
416 	struct cs4231_softc *sc = &ebsc->sc_cs4231;
417 	u_int32_t csr;
418 	int cfg;
419 
420 	sc->sc_capture.t_active = 0;
421 
422 	csr = bus_space_read_4(ebsc->sc_bt, ebsc->sc_cdmareg, EBUS_DMAC_DCSR);
423 	bus_space_write_4(ebsc->sc_bt, ebsc->sc_cdmareg, EBUS_DMAC_DCSR,
424 			  csr & ~EBDMA_EN_DMA);
425 
426 	cfg = ad_read(&sc->sc_ad1848, SP_INTERFACE_CONFIG);
427 	ad_write(&sc->sc_ad1848, SP_INTERFACE_CONFIG,
428 		 cfg & ~CAPTURE_ENABLE);
429 
430 	return (0);
431 }
432 
433 
434 static int
435 cs4231_ebus_dma_intr(t, dt, dh)
436 	struct cs_transfer *t;
437 	bus_space_tag_t dt;
438 	bus_space_handle_t dh;
439 {
440 	u_int32_t csr;
441 #ifdef AUDIO_DEBUG
442 	char bits[128];
443 #endif
444 
445 	/* read DMA status, clear TC bit by writing it back */
446 	csr = bus_space_read_4(dt, dh, EBUS_DMAC_DCSR);
447 	bus_space_write_4(dt, dh, EBUS_DMAC_DCSR, csr);
448 	DPRINTF(("audiocs: %s dcsr=%s\n", t->t_name,
449 		 bitmask_snprintf(csr, EBUS_DCSR_BITS, bits, sizeof(bits))));
450 
451 	if (csr & EBDMA_ERR_PEND) {
452 		++t->t_ierrcnt.ev_count;
453 		printf("audiocs: %s DMA error, resetting\n", t->t_name);
454 		cs4231_ebus_dma_reset(dt, dh);
455 		/* how to notify audio(9)??? */
456 		return (1);
457 	}
458 
459 	if ((csr & EBDMA_INT_PEND) == 0)
460 		return (0);
461 
462 	++t->t_intrcnt.ev_count;
463 
464 	if ((csr & EBDMA_TC) == 0) { /* can this happen? */
465 		printf("audiocs: %s INT_PEND but !TC\n", t->t_name);
466 		return (1);
467 	}
468 
469 	if (!t->t_active)
470 		return (1);
471 
472 	cs4231_ebus_dma_advance(t, dt, dh);
473 
474 	/* call audio(9) framework while dma is chugging along */
475 	if (t->t_intr != NULL)
476 		(*t->t_intr)(t->t_arg);
477 	return (1);
478 }
479 
480 
481 static int
482 cs4231_ebus_intr(arg)
483 	void *arg;
484 {
485 	struct cs4231_ebus_softc *ebsc = arg;
486 	struct cs4231_softc *sc = &ebsc->sc_cs4231;
487 	int status;
488 	int ret;
489 #ifdef AUDIO_DEBUG
490 	char bits[128];
491 #endif
492 
493 	status = ADREAD(&sc->sc_ad1848, AD1848_STATUS);
494 
495 #ifdef AUDIO_DEBUG
496 	if (cs4231_ebus_debug > 1)
497 		cs4231_ebus_regdump("audiointr", ebsc);
498 
499 	DPRINTF(("%s: status: %s\n", sc->sc_ad1848.sc_dev.dv_xname,
500 		 bitmask_snprintf(status, AD_R2_BITS, bits, sizeof(bits))));
501 #endif
502 
503 	if (status & INTERRUPT_STATUS) {
504 #ifdef AUDIO_DEBUG
505 		int reason;
506 
507 		reason = ad_read(&sc->sc_ad1848, CS_IRQ_STATUS);
508 		DPRINTF(("%s: i24: %s\n", sc->sc_ad1848.sc_dev.dv_xname,
509 		  bitmask_snprintf(reason, CS_I24_BITS, bits, sizeof(bits))));
510 #endif
511 		/* clear interrupt from ad1848 */
512 		ADWRITE(&sc->sc_ad1848, AD1848_STATUS, 0);
513 	}
514 
515 	ret = 0;
516 
517 	if (cs4231_ebus_dma_intr(&sc->sc_capture,
518 				 ebsc->sc_bt, ebsc->sc_cdmareg) != 0)
519 	{
520 		++sc->sc_intrcnt.ev_count;
521 		ret = 1;
522 	}
523 
524 	if (cs4231_ebus_dma_intr(&sc->sc_playback,
525 				 ebsc->sc_bt, ebsc->sc_pdmareg) != 0)
526 	{
527 		++sc->sc_intrcnt.ev_count;
528 		ret = 1;
529 	}
530 
531 	return (ret);
532 }
533