haltwo.c revision 1.15 1 1.15 tsutsui /* $NetBSD: haltwo.c,v 1.15 2008/08/24 13:03:39 tsutsui Exp $ */
2 1.1 lonewolf
3 1.1 lonewolf /*
4 1.1 lonewolf * Copyright (c) 2003 Ilpo Ruotsalainen
5 1.1 lonewolf * All rights reserved.
6 1.1 lonewolf *
7 1.1 lonewolf * Redistribution and use in source and binary forms, with or without
8 1.1 lonewolf * modification, are permitted provided that the following conditions
9 1.1 lonewolf * are met:
10 1.1 lonewolf * 1. Redistributions of source code must retain the above copyright
11 1.1 lonewolf * notice, this list of conditions and the following disclaimer.
12 1.1 lonewolf * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 lonewolf * notice, this list of conditions and the following disclaimer in the
14 1.1 lonewolf * documentation and/or other materials provided with the distribution.
15 1.1 lonewolf * 3. The name of the author may not be used to endorse or promote products
16 1.1 lonewolf * derived from this software without specific prior written permission.
17 1.1 lonewolf *
18 1.1 lonewolf * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19 1.1 lonewolf * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20 1.1 lonewolf * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21 1.1 lonewolf * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22 1.1 lonewolf * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23 1.1 lonewolf * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 1.1 lonewolf * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 1.1 lonewolf * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 1.1 lonewolf * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27 1.1 lonewolf * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 1.1 lonewolf *
29 1.1 lonewolf * <<Id: LICENSE_GC,v 1.1 2001/10/01 23:24:05 cgd Exp>>
30 1.1 lonewolf */
31 1.1 lonewolf
32 1.1 lonewolf #include <sys/cdefs.h>
33 1.15 tsutsui __KERNEL_RCSID(0, "$NetBSD: haltwo.c,v 1.15 2008/08/24 13:03:39 tsutsui Exp $");
34 1.1 lonewolf
35 1.1 lonewolf #include <sys/param.h>
36 1.1 lonewolf #include <sys/systm.h>
37 1.1 lonewolf #include <sys/device.h>
38 1.1 lonewolf #include <sys/audioio.h>
39 1.1 lonewolf #include <sys/malloc.h>
40 1.1 lonewolf #include <dev/audio_if.h>
41 1.1 lonewolf #include <dev/auconv.h>
42 1.1 lonewolf #include <dev/mulaw.h>
43 1.1 lonewolf
44 1.1 lonewolf #include <uvm/uvm_extern.h>
45 1.1 lonewolf
46 1.1 lonewolf #include <machine/bus.h>
47 1.11 rumble #include <machine/sysconf.h>
48 1.1 lonewolf
49 1.1 lonewolf #include <sgimips/hpc/hpcvar.h>
50 1.1 lonewolf #include <sgimips/hpc/hpcreg.h>
51 1.1 lonewolf
52 1.1 lonewolf #include <sgimips/hpc/haltworeg.h>
53 1.1 lonewolf #include <sgimips/hpc/haltwovar.h>
54 1.1 lonewolf
55 1.1 lonewolf #ifdef AUDIO_DEBUG
56 1.1 lonewolf #define DPRINTF(x) printf x
57 1.1 lonewolf #else
58 1.1 lonewolf #define DPRINTF(x)
59 1.1 lonewolf #endif
60 1.1 lonewolf
61 1.1 lonewolf static int haltwo_query_encoding(void *, struct audio_encoding *);
62 1.6 kent static int haltwo_set_params(void *, int, int, audio_params_t *,
63 1.6 kent audio_params_t *, stream_filter_list_t *, stream_filter_list_t *);
64 1.6 kent static int haltwo_round_blocksize(void *, int, int, const audio_params_t *);
65 1.1 lonewolf static int haltwo_halt_output(void *);
66 1.1 lonewolf static int haltwo_halt_input(void *);
67 1.1 lonewolf static int haltwo_getdev(void *, struct audio_device *);
68 1.1 lonewolf static int haltwo_set_port(void *, mixer_ctrl_t *);
69 1.1 lonewolf static int haltwo_get_port(void *, mixer_ctrl_t *);
70 1.1 lonewolf static int haltwo_query_devinfo(void *, mixer_devinfo_t *);
71 1.1 lonewolf static void *haltwo_malloc(void *, int, size_t, struct malloc_type *, int);
72 1.1 lonewolf static void haltwo_free(void *, void *, struct malloc_type *);
73 1.1 lonewolf static int haltwo_get_props(void *);
74 1.1 lonewolf static int haltwo_trigger_output(void *, void *, void *, int, void (*)(void *),
75 1.6 kent void *, const audio_params_t *);
76 1.1 lonewolf static int haltwo_trigger_input(void *, void *, void *, int, void (*)(void *),
77 1.6 kent void *, const audio_params_t *);
78 1.15 tsutsui static void haltwo_shutdown(void *);
79 1.1 lonewolf
80 1.4 yamt static const struct audio_hw_if haltwo_hw_if = {
81 1.6 kent NULL, /* open */
82 1.6 kent NULL, /* close */
83 1.1 lonewolf NULL, /* drain */
84 1.1 lonewolf haltwo_query_encoding,
85 1.1 lonewolf haltwo_set_params,
86 1.1 lonewolf haltwo_round_blocksize,
87 1.1 lonewolf NULL, /* commit_settings */
88 1.1 lonewolf NULL, /* init_output */
89 1.1 lonewolf NULL, /* init_input */
90 1.1 lonewolf NULL, /* start_output */
91 1.1 lonewolf NULL, /* start_input */
92 1.1 lonewolf haltwo_halt_output,
93 1.1 lonewolf haltwo_halt_input,
94 1.1 lonewolf NULL, /* speaker_ctl */
95 1.1 lonewolf haltwo_getdev,
96 1.1 lonewolf NULL, /* setfd */
97 1.1 lonewolf haltwo_set_port,
98 1.1 lonewolf haltwo_get_port,
99 1.1 lonewolf haltwo_query_devinfo,
100 1.1 lonewolf haltwo_malloc,
101 1.1 lonewolf haltwo_free,
102 1.1 lonewolf NULL, /* round_buffersize */
103 1.1 lonewolf NULL, /* mappage */
104 1.1 lonewolf haltwo_get_props,
105 1.1 lonewolf haltwo_trigger_output,
106 1.1 lonewolf haltwo_trigger_input,
107 1.1 lonewolf NULL /* dev_ioctl */
108 1.1 lonewolf };
109 1.1 lonewolf
110 1.1 lonewolf static const struct audio_device haltwo_device = {
111 1.2 tsutsui "HAL2",
112 1.2 tsutsui "",
113 1.2 tsutsui "haltwo"
114 1.1 lonewolf };
115 1.1 lonewolf
116 1.1 lonewolf static int haltwo_match(struct device *, struct cfdata *, void *);
117 1.1 lonewolf static void haltwo_attach(struct device *, struct device *, void *);
118 1.1 lonewolf static int haltwo_intr(void *);
119 1.1 lonewolf
120 1.1 lonewolf CFATTACH_DECL(haltwo, sizeof(struct haltwo_softc),
121 1.1 lonewolf haltwo_match, haltwo_attach, NULL, NULL);
122 1.1 lonewolf
123 1.1 lonewolf #define haltwo_write(sc,type,off,val) \
124 1.1 lonewolf bus_space_write_4(sc->sc_st, sc->sc_##type##_sh, off, val)
125 1.1 lonewolf
126 1.1 lonewolf #define haltwo_read(sc,type,off) \
127 1.1 lonewolf bus_space_read_4(sc->sc_st, sc->sc_##type##_sh, off)
128 1.1 lonewolf
129 1.1 lonewolf static void
130 1.1 lonewolf haltwo_write_indirect(struct haltwo_softc *sc, uint32_t ireg, uint16_t low,
131 1.1 lonewolf uint16_t high)
132 1.1 lonewolf {
133 1.2 tsutsui
134 1.1 lonewolf haltwo_write(sc, ctl, HAL2_REG_CTL_IDR0, low);
135 1.1 lonewolf haltwo_write(sc, ctl, HAL2_REG_CTL_IDR1, high);
136 1.1 lonewolf haltwo_write(sc, ctl, HAL2_REG_CTL_IDR2, 0);
137 1.1 lonewolf haltwo_write(sc, ctl, HAL2_REG_CTL_IDR3, 0);
138 1.1 lonewolf haltwo_write(sc, ctl, HAL2_REG_CTL_IAR, ireg);
139 1.1 lonewolf
140 1.1 lonewolf while (haltwo_read(sc, ctl, HAL2_REG_CTL_ISR) & HAL2_ISR_TSTATUS)
141 1.7 kent continue;
142 1.1 lonewolf }
143 1.1 lonewolf
144 1.1 lonewolf static void
145 1.1 lonewolf haltwo_read_indirect(struct haltwo_softc *sc, uint32_t ireg, uint16_t *low,
146 1.1 lonewolf uint16_t *high)
147 1.1 lonewolf {
148 1.2 tsutsui
149 1.1 lonewolf haltwo_write(sc, ctl, HAL2_REG_CTL_IAR,
150 1.1 lonewolf ireg | HAL2_IAR_READ);
151 1.1 lonewolf
152 1.1 lonewolf while (haltwo_read(sc, ctl, HAL2_REG_CTL_ISR) & HAL2_ISR_TSTATUS)
153 1.7 kent continue;
154 1.1 lonewolf
155 1.1 lonewolf if (low)
156 1.1 lonewolf *low = haltwo_read(sc, ctl, HAL2_REG_CTL_IDR0);
157 1.2 tsutsui
158 1.1 lonewolf if (high)
159 1.1 lonewolf *high = haltwo_read(sc, ctl, HAL2_REG_CTL_IDR1);
160 1.1 lonewolf }
161 1.1 lonewolf
162 1.1 lonewolf static int
163 1.1 lonewolf haltwo_init_codec(struct haltwo_softc *sc, struct haltwo_codec *codec)
164 1.1 lonewolf {
165 1.1 lonewolf int err;
166 1.1 lonewolf int rseg;
167 1.7 kent size_t allocsz;
168 1.1 lonewolf
169 1.7 kent allocsz = sizeof(struct hpc_dma_desc) * HALTWO_MAX_DMASEGS;
170 1.1 lonewolf KASSERT(allocsz <= PAGE_SIZE);
171 1.1 lonewolf
172 1.1 lonewolf err = bus_dmamem_alloc(sc->sc_dma_tag, allocsz, 0, 0, &codec->dma_seg,
173 1.1 lonewolf 1, &rseg, BUS_DMA_NOWAIT);
174 1.1 lonewolf if (err)
175 1.1 lonewolf goto out;
176 1.1 lonewolf
177 1.1 lonewolf err = bus_dmamem_map(sc->sc_dma_tag, &codec->dma_seg, rseg, allocsz,
178 1.12 christos (void **)&codec->dma_descs, BUS_DMA_NOWAIT);
179 1.1 lonewolf if (err)
180 1.1 lonewolf goto out_free;
181 1.1 lonewolf
182 1.1 lonewolf err = bus_dmamap_create(sc->sc_dma_tag, allocsz, 1, PAGE_SIZE, 0,
183 1.1 lonewolf BUS_DMA_NOWAIT, &codec->dma_map);
184 1.1 lonewolf if (err)
185 1.1 lonewolf goto out_free;
186 1.1 lonewolf
187 1.1 lonewolf err = bus_dmamap_load(sc->sc_dma_tag, codec->dma_map, codec->dma_descs,
188 1.1 lonewolf allocsz, NULL, BUS_DMA_NOWAIT);
189 1.1 lonewolf if (err)
190 1.1 lonewolf goto out_destroy;
191 1.1 lonewolf
192 1.1 lonewolf DPRINTF(("haltwo_init_codec: allocated %d descriptors (%d bytes)"
193 1.1 lonewolf " at %p\n", HALTWO_MAX_DMASEGS, allocsz, codec->dma_descs));
194 1.1 lonewolf
195 1.1 lonewolf memset(codec->dma_descs, 0, allocsz);
196 1.1 lonewolf
197 1.7 kent return 0;
198 1.1 lonewolf
199 1.1 lonewolf out_destroy:
200 1.1 lonewolf bus_dmamap_destroy(sc->sc_dma_tag, codec->dma_map);
201 1.1 lonewolf out_free:
202 1.1 lonewolf bus_dmamem_free(sc->sc_dma_tag, &codec->dma_seg, rseg);
203 1.1 lonewolf out:
204 1.1 lonewolf DPRINTF(("haltwo_init_codec failed: %d\n",err));
205 1.1 lonewolf
206 1.7 kent return err;
207 1.1 lonewolf }
208 1.1 lonewolf
209 1.1 lonewolf static void
210 1.1 lonewolf haltwo_setup_dma(struct haltwo_softc *sc, struct haltwo_codec *codec,
211 1.1 lonewolf struct haltwo_dmabuf *dmabuf, size_t len, int blksize,
212 1.1 lonewolf void (*intr)(void *), void *intrarg)
213 1.1 lonewolf {
214 1.1 lonewolf int i;
215 1.1 lonewolf bus_dma_segment_t *segp;
216 1.1 lonewolf struct hpc_dma_desc *descp;
217 1.7 kent int next_intr;
218 1.2 tsutsui
219 1.1 lonewolf KASSERT(len % blksize == 0);
220 1.1 lonewolf
221 1.7 kent next_intr = blksize;
222 1.1 lonewolf codec->intr = intr;
223 1.1 lonewolf codec->intr_arg = intrarg;
224 1.1 lonewolf
225 1.1 lonewolf segp = dmabuf->dma_map->dm_segs;
226 1.1 lonewolf descp = codec->dma_descs;
227 1.1 lonewolf
228 1.1 lonewolf /* Build descriptor chain for looping DMA, triggering interrupt every
229 1.1 lonewolf * blksize bytes */
230 1.1 lonewolf for (i = 0; i < dmabuf->dma_map->dm_nsegs; i++) {
231 1.3 sekiya descp->hpc3_hdd_bufptr = segp->ds_addr;
232 1.3 sekiya descp->hpc3_hdd_ctl = segp->ds_len;
233 1.1 lonewolf
234 1.1 lonewolf KASSERT(next_intr >= segp->ds_len);
235 1.1 lonewolf
236 1.1 lonewolf if (next_intr == segp->ds_len) {
237 1.1 lonewolf /* Generate intr after this DMA buffer */
238 1.5 rumble descp->hpc3_hdd_ctl |= HPC3_HDD_CTL_INTR;
239 1.1 lonewolf next_intr = blksize;
240 1.2 tsutsui } else
241 1.1 lonewolf next_intr -= segp->ds_len;
242 1.1 lonewolf
243 1.1 lonewolf if (i < dmabuf->dma_map->dm_nsegs - 1)
244 1.1 lonewolf descp->hdd_descptr = codec->dma_seg.ds_addr +
245 1.1 lonewolf sizeof(struct hpc_dma_desc) * (i + 1);
246 1.1 lonewolf else
247 1.1 lonewolf descp->hdd_descptr = codec->dma_seg.ds_addr;
248 1.1 lonewolf
249 1.1 lonewolf DPRINTF(("haltwo_setup_dma: hdd_bufptr = %x hdd_ctl = %x"
250 1.3 sekiya " hdd_descptr = %x\n", descp->hpc3_hdd_bufptr,
251 1.3 sekiya descp->hpc3_hdd_ctl, descp->hdd_descptr));
252 1.1 lonewolf
253 1.1 lonewolf segp++;
254 1.1 lonewolf descp++;
255 1.1 lonewolf }
256 1.1 lonewolf
257 1.1 lonewolf bus_dmamap_sync(sc->sc_dma_tag, codec->dma_map, 0,
258 1.1 lonewolf codec->dma_map->dm_mapsize, BUS_DMASYNC_PREWRITE);
259 1.1 lonewolf }
260 1.1 lonewolf
261 1.1 lonewolf static int
262 1.1 lonewolf haltwo_match(struct device *parent, struct cfdata *cf, void *aux)
263 1.1 lonewolf {
264 1.7 kent struct hpc_attach_args *haa;
265 1.10 rumble uint32_t rev;
266 1.1 lonewolf
267 1.7 kent haa = aux;
268 1.8 sekiya if (strcmp(haa->ha_name, cf->cf_name))
269 1.8 sekiya return 0;
270 1.10 rumble
271 1.13 he if ( platform.badaddr((void *)(vaddr_t)(haa->ha_sh + haa->ha_devoff),
272 1.11 rumble sizeof(u_int32_t)) )
273 1.8 sekiya return 0;
274 1.1 lonewolf
275 1.11 rumble if ( platform.badaddr(
276 1.13 he (void *)(vaddr_t)(haa->ha_sh + haa->ha_devoff + HAL2_REG_CTL_REV),
277 1.10 rumble sizeof(u_int32_t)) )
278 1.10 rumble return 0;
279 1.10 rumble
280 1.10 rumble rev = *(uint32_t *)MIPS_PHYS_TO_KSEG1(haa->ha_sh + haa->ha_devoff +
281 1.10 rumble HAL2_REG_CTL_REV);
282 1.10 rumble
283 1.10 rumble /* This bit is inverted, the test is correct */
284 1.10 rumble if (rev & HAL2_REV_AUDIO_PRESENT_N)
285 1.10 rumble return 0;
286 1.10 rumble
287 1.8 sekiya return 1;
288 1.1 lonewolf }
289 1.1 lonewolf
290 1.1 lonewolf static void
291 1.1 lonewolf haltwo_attach(struct device *parent, struct device *self, void *aux)
292 1.1 lonewolf {
293 1.7 kent struct haltwo_softc *sc;
294 1.7 kent struct hpc_attach_args *haa;
295 1.1 lonewolf uint32_t rev;
296 1.2 tsutsui
297 1.7 kent sc = (void *)self;
298 1.7 kent haa = aux;
299 1.1 lonewolf sc->sc_st = haa->ha_st;
300 1.1 lonewolf sc->sc_dma_tag = haa->ha_dmat;
301 1.1 lonewolf
302 1.1 lonewolf if (bus_space_subregion(haa->ha_st, haa->ha_sh, haa->ha_devoff,
303 1.5 rumble HPC3_PBUS_CH0_DEVREGS_SIZE, &sc->sc_ctl_sh)) {
304 1.1 lonewolf aprint_error(": unable to map control registers\n");
305 1.1 lonewolf return;
306 1.1 lonewolf }
307 1.1 lonewolf
308 1.5 rumble if (bus_space_subregion(haa->ha_st, haa->ha_sh, HPC3_PBUS_CH2_DEVREGS,
309 1.5 rumble HPC3_PBUS_CH2_DEVREGS_SIZE, &sc->sc_vol_sh)) {
310 1.1 lonewolf aprint_error(": unable to map volume registers\n");
311 1.1 lonewolf return;
312 1.1 lonewolf }
313 1.1 lonewolf
314 1.1 lonewolf if (bus_space_subregion(haa->ha_st, haa->ha_sh, haa->ha_dmaoff,
315 1.5 rumble HPC3_PBUS_DMAREGS_SIZE, &sc->sc_dma_sh)) {
316 1.1 lonewolf aprint_error(": unable to map DMA registers\n");
317 1.1 lonewolf return;
318 1.1 lonewolf }
319 1.1 lonewolf
320 1.1 lonewolf haltwo_write(sc, ctl, HAL2_REG_CTL_ISR, 0);
321 1.1 lonewolf haltwo_write(sc, ctl, HAL2_REG_CTL_ISR,
322 1.1 lonewolf HAL2_ISR_GLOBAL_RESET_N | HAL2_ISR_CODEC_RESET_N);
323 1.1 lonewolf haltwo_write_indirect(sc, HAL2_IREG_RELAY_C, HAL2_RELAY_C_STATE, 0);
324 1.1 lonewolf
325 1.1 lonewolf rev = haltwo_read(sc, ctl, HAL2_REG_CTL_REV);
326 1.1 lonewolf
327 1.1 lonewolf if (cpu_intr_establish(haa->ha_irq, IPL_AUDIO, haltwo_intr, sc)
328 1.1 lonewolf == NULL) {
329 1.1 lonewolf aprint_error(": unable to establish interrupt\n");
330 1.1 lonewolf return;
331 1.1 lonewolf }
332 1.1 lonewolf
333 1.1 lonewolf aprint_naive(": Audio controller\n");
334 1.1 lonewolf
335 1.1 lonewolf aprint_normal(": HAL2 revision %d.%d.%d\n", (rev & 0x7000) >> 12,
336 1.1 lonewolf (rev & 0x00F0) >> 4, rev & 0x000F);
337 1.1 lonewolf
338 1.1 lonewolf if (haltwo_init_codec(sc, &sc->sc_dac)) {
339 1.1 lonewolf aprint_error(
340 1.1 lonewolf "haltwo_attach: unable to create DMA descriptor list\n");
341 1.1 lonewolf return;
342 1.1 lonewolf }
343 1.1 lonewolf
344 1.1 lonewolf /* XXX Magic PBUS CFGDMA values from Linux HAL2 driver XXX */
345 1.5 rumble bus_space_write_4(haa->ha_st, haa->ha_sh, HPC3_PBUS_CH0_CFGDMA,
346 1.1 lonewolf 0x8208844);
347 1.5 rumble bus_space_write_4(haa->ha_st, haa->ha_sh, HPC3_PBUS_CH1_CFGDMA,
348 1.1 lonewolf 0x8208844);
349 1.1 lonewolf
350 1.1 lonewolf /* Unmute output */
351 1.1 lonewolf /* XXX Add mute/unmute support to mixer ops? XXX */
352 1.1 lonewolf haltwo_write_indirect(sc, HAL2_IREG_DAC_C2, 0, 0);
353 1.1 lonewolf
354 1.1 lonewolf /* Set master volume to zero */
355 1.1 lonewolf sc->sc_vol_left = sc->sc_vol_right = 0;
356 1.1 lonewolf haltwo_write(sc, vol, HAL2_REG_VOL_LEFT, sc->sc_vol_left);
357 1.1 lonewolf haltwo_write(sc, vol, HAL2_REG_VOL_RIGHT, sc->sc_vol_right);
358 1.1 lonewolf
359 1.1 lonewolf audio_attach_mi(&haltwo_hw_if, sc, &sc->sc_dev);
360 1.15 tsutsui
361 1.15 tsutsui sc->sc_sdhook = shutdownhook_establish(haltwo_shutdown, sc);
362 1.15 tsutsui if (sc->sc_sdhook == NULL)
363 1.15 tsutsui aprint_error_dev(self,
364 1.15 tsutsui "WARNING: unable to establish shutdown hook\n");
365 1.1 lonewolf }
366 1.1 lonewolf
367 1.1 lonewolf static int
368 1.1 lonewolf haltwo_intr(void *v)
369 1.1 lonewolf {
370 1.7 kent struct haltwo_softc *sc;
371 1.7 kent int ret;
372 1.1 lonewolf
373 1.7 kent sc = v;
374 1.7 kent ret = 0;
375 1.5 rumble if (bus_space_read_4(sc->sc_st, sc->sc_dma_sh, HPC3_PBUS_CH0_CTL)
376 1.5 rumble & HPC3_PBUS_DMACTL_IRQ) {
377 1.2 tsutsui sc->sc_dac.intr(sc->sc_dac.intr_arg);
378 1.1 lonewolf
379 1.2 tsutsui ret = 1;
380 1.2 tsutsui } else
381 1.2 tsutsui DPRINTF(("haltwo_intr: Huh?\n"));
382 1.1 lonewolf
383 1.7 kent return ret;
384 1.1 lonewolf }
385 1.1 lonewolf
386 1.1 lonewolf static int
387 1.1 lonewolf haltwo_query_encoding(void *v, struct audio_encoding *e)
388 1.1 lonewolf {
389 1.2 tsutsui
390 1.1 lonewolf switch (e->index) {
391 1.1 lonewolf case 0:
392 1.1 lonewolf strcpy(e->name, AudioEslinear_le);
393 1.1 lonewolf e->encoding = AUDIO_ENCODING_SLINEAR_LE;
394 1.1 lonewolf e->precision = 16;
395 1.1 lonewolf e->flags = 0;
396 1.1 lonewolf break;
397 1.2 tsutsui
398 1.1 lonewolf case 1:
399 1.1 lonewolf strcpy(e->name, AudioEslinear_be);
400 1.1 lonewolf e->encoding = AUDIO_ENCODING_SLINEAR_BE;
401 1.1 lonewolf e->precision = 16;
402 1.1 lonewolf e->flags = 0;
403 1.1 lonewolf break;
404 1.1 lonewolf
405 1.1 lonewolf case 2:
406 1.1 lonewolf strcpy(e->name, AudioEmulaw);
407 1.1 lonewolf e->encoding = AUDIO_ENCODING_ULAW;
408 1.1 lonewolf e->precision = 8;
409 1.1 lonewolf e->flags = AUDIO_ENCODINGFLAG_EMULATED;
410 1.1 lonewolf break;
411 1.2 tsutsui
412 1.1 lonewolf default:
413 1.7 kent return EINVAL;
414 1.1 lonewolf }
415 1.2 tsutsui
416 1.7 kent return 0;
417 1.1 lonewolf }
418 1.1 lonewolf
419 1.1 lonewolf static int
420 1.6 kent haltwo_set_params(void *v, int setmode, int usemode,
421 1.6 kent audio_params_t *play, audio_params_t *rec,
422 1.6 kent stream_filter_list_t *pfil, stream_filter_list_t *rfil)
423 1.1 lonewolf {
424 1.6 kent audio_params_t hw;
425 1.7 kent struct haltwo_softc *sc;
426 1.1 lonewolf int master, inc, mod;
427 1.1 lonewolf uint16_t tmp;
428 1.1 lonewolf
429 1.7 kent sc = v;
430 1.6 kent if (play->sample_rate < 4000)
431 1.6 kent play->sample_rate = 4000;
432 1.6 kent if (play->sample_rate > 48000)
433 1.6 kent play->sample_rate = 48000;
434 1.2 tsutsui
435 1.6 kent if (44100 % play->sample_rate < 48000 % play->sample_rate)
436 1.6 kent master = 44100;
437 1.6 kent else
438 1.6 kent master = 48000;
439 1.6 kent
440 1.6 kent /* HAL2 specification 3.1.2.21: Codecs should be driven with INC/MOD
441 1.6 kent * fractions equivalent to 4/N, where N is a positive integer. */
442 1.6 kent inc = 4;
443 1.6 kent mod = master * inc / play->sample_rate;
444 1.6 kent
445 1.6 kent /* Fixup upper layers idea of HW sample rate to the actual final rate */
446 1.6 kent play->sample_rate = master * inc / mod;
447 1.6 kent
448 1.6 kent DPRINTF(("haltwo_set_params: master = %d inc = %d mod = %d"
449 1.6 kent " sample_rate = %ld\n", master, inc, mod,
450 1.6 kent play->sample_rate));
451 1.6 kent
452 1.6 kent hw = *play;
453 1.1 lonewolf switch (play->encoding) {
454 1.1 lonewolf case AUDIO_ENCODING_ULAW:
455 1.1 lonewolf if (play->precision != 8)
456 1.7 kent return EINVAL;
457 1.1 lonewolf
458 1.6 kent hw.encoding = AUDIO_ENCODING_SLINEAR_LE;
459 1.6 kent pfil->append(pfil, mulaw_to_linear16, &hw);
460 1.6 kent play = &hw;
461 1.1 lonewolf break;
462 1.1 lonewolf case AUDIO_ENCODING_SLINEAR_BE:
463 1.1 lonewolf case AUDIO_ENCODING_SLINEAR_LE:
464 1.1 lonewolf break;
465 1.1 lonewolf
466 1.1 lonewolf default:
467 1.7 kent return EINVAL;
468 1.1 lonewolf }
469 1.6 kent /* play points HW encoding */
470 1.1 lonewolf
471 1.1 lonewolf /* Setup samplerate to HW */
472 1.1 lonewolf haltwo_write_indirect(sc, HAL2_IREG_BRES1_C1,
473 1.1 lonewolf master == 44100 ? 1 : 0, 0);
474 1.1 lonewolf /* XXX Documentation disagrees but this seems to work XXX */
475 1.1 lonewolf haltwo_write_indirect(sc, HAL2_IREG_BRES1_C2,
476 1.1 lonewolf inc, 0xFFFF & (inc - mod - 1));
477 1.1 lonewolf
478 1.1 lonewolf /* Setup endianness to HW */
479 1.1 lonewolf haltwo_read_indirect(sc, HAL2_IREG_DMA_END, &tmp, NULL);
480 1.6 kent if (play->encoding == AUDIO_ENCODING_SLINEAR_LE)
481 1.1 lonewolf tmp |= HAL2_DMA_END_CODECTX;
482 1.1 lonewolf else
483 1.1 lonewolf tmp &= ~HAL2_DMA_END_CODECTX;
484 1.1 lonewolf haltwo_write_indirect(sc, HAL2_IREG_DMA_END, tmp, 0);
485 1.1 lonewolf
486 1.1 lonewolf /* Set PBUS channel, Bresenham clock source, number of channels to HW */
487 1.1 lonewolf haltwo_write_indirect(sc, HAL2_IREG_DAC_C1,
488 1.1 lonewolf (0 << HAL2_C1_DMA_SHIFT) |
489 1.1 lonewolf (1 << HAL2_C1_CLKID_SHIFT) |
490 1.6 kent (play->channels << HAL2_C1_DATAT_SHIFT), 0);
491 1.1 lonewolf
492 1.1 lonewolf DPRINTF(("haltwo_set_params: hw_encoding = %d hw_channels = %d\n",
493 1.6 kent play->encoding, play->channels));
494 1.1 lonewolf
495 1.7 kent return 0;
496 1.1 lonewolf }
497 1.1 lonewolf
498 1.1 lonewolf static int
499 1.6 kent haltwo_round_blocksize(void *v, int blocksize,
500 1.6 kent int mode, const audio_params_t *param)
501 1.1 lonewolf {
502 1.2 tsutsui
503 1.1 lonewolf /* XXX Make this smarter and support DMA descriptor chaining XXX */
504 1.1 lonewolf /* XXX Rounding to nearest PAGE_SIZE might work? XXX */
505 1.1 lonewolf return PAGE_SIZE;
506 1.1 lonewolf }
507 1.1 lonewolf
508 1.1 lonewolf static int
509 1.1 lonewolf haltwo_halt_output(void *v)
510 1.1 lonewolf {
511 1.7 kent struct haltwo_softc *sc;
512 1.1 lonewolf
513 1.7 kent sc = v;
514 1.1 lonewolf /* Disable PBUS DMA */
515 1.5 rumble bus_space_write_4(sc->sc_st, sc->sc_dma_sh, HPC3_PBUS_CH0_CTL,
516 1.5 rumble HPC3_PBUS_DMACTL_ACT_LD);
517 1.1 lonewolf
518 1.7 kent return 0;
519 1.1 lonewolf }
520 1.1 lonewolf
521 1.1 lonewolf static int
522 1.1 lonewolf haltwo_halt_input(void *v)
523 1.1 lonewolf {
524 1.2 tsutsui
525 1.7 kent return ENXIO;
526 1.1 lonewolf }
527 1.1 lonewolf
528 1.1 lonewolf static int
529 1.1 lonewolf haltwo_getdev(void *v, struct audio_device *dev)
530 1.1 lonewolf {
531 1.2 tsutsui
532 1.1 lonewolf *dev = haltwo_device;
533 1.7 kent return 0;
534 1.1 lonewolf }
535 1.1 lonewolf
536 1.1 lonewolf static int
537 1.1 lonewolf haltwo_set_port(void *v, mixer_ctrl_t *mc)
538 1.1 lonewolf {
539 1.7 kent struct haltwo_softc *sc;
540 1.1 lonewolf int lval, rval;
541 1.2 tsutsui
542 1.1 lonewolf if (mc->type != AUDIO_MIXER_VALUE)
543 1.7 kent return EINVAL;
544 1.1 lonewolf
545 1.1 lonewolf if (mc->un.value.num_channels == 1)
546 1.1 lonewolf lval = rval = mc->un.value.level[AUDIO_MIXER_LEVEL_MONO];
547 1.1 lonewolf else if (mc->un.value.num_channels == 2) {
548 1.1 lonewolf lval = mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT];
549 1.1 lonewolf rval = mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT];
550 1.1 lonewolf } else
551 1.7 kent return EINVAL;
552 1.1 lonewolf
553 1.7 kent sc = v;
554 1.1 lonewolf switch (mc->dev) {
555 1.1 lonewolf case HALTWO_MASTER_VOL:
556 1.1 lonewolf sc->sc_vol_left = lval;
557 1.1 lonewolf sc->sc_vol_right = rval;
558 1.1 lonewolf
559 1.1 lonewolf haltwo_write(sc, vol, HAL2_REG_VOL_LEFT,
560 1.1 lonewolf sc->sc_vol_left);
561 1.1 lonewolf haltwo_write(sc, vol, HAL2_REG_VOL_RIGHT,
562 1.1 lonewolf sc->sc_vol_right);
563 1.1 lonewolf break;
564 1.1 lonewolf
565 1.1 lonewolf default:
566 1.7 kent return EINVAL;
567 1.1 lonewolf }
568 1.1 lonewolf
569 1.7 kent return 0;
570 1.1 lonewolf }
571 1.1 lonewolf
572 1.1 lonewolf static int
573 1.1 lonewolf haltwo_get_port(void *v, mixer_ctrl_t *mc)
574 1.1 lonewolf {
575 1.7 kent struct haltwo_softc *sc;
576 1.1 lonewolf int l, r;
577 1.2 tsutsui
578 1.1 lonewolf switch (mc->dev) {
579 1.1 lonewolf case HALTWO_MASTER_VOL:
580 1.7 kent sc = v;
581 1.1 lonewolf l = sc->sc_vol_left;
582 1.1 lonewolf r = sc->sc_vol_right;
583 1.1 lonewolf break;
584 1.1 lonewolf
585 1.1 lonewolf default:
586 1.7 kent return EINVAL;
587 1.1 lonewolf }
588 1.1 lonewolf
589 1.1 lonewolf if (mc->un.value.num_channels == 1)
590 1.1 lonewolf mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = (l+r) / 2;
591 1.1 lonewolf else if (mc->un.value.num_channels == 2) {
592 1.1 lonewolf mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT] = l;
593 1.1 lonewolf mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] = r;
594 1.1 lonewolf } else
595 1.7 kent return EINVAL;
596 1.1 lonewolf
597 1.7 kent return 0;
598 1.1 lonewolf }
599 1.1 lonewolf
600 1.1 lonewolf static int
601 1.1 lonewolf haltwo_query_devinfo(void *v, mixer_devinfo_t *dev)
602 1.1 lonewolf {
603 1.2 tsutsui
604 1.1 lonewolf switch (dev->index) {
605 1.1 lonewolf /* Mixer values */
606 1.1 lonewolf case HALTWO_MASTER_VOL:
607 1.1 lonewolf dev->type = AUDIO_MIXER_VALUE;
608 1.1 lonewolf dev->mixer_class = HALTWO_OUTPUT_CLASS;
609 1.1 lonewolf dev->prev = dev->next = AUDIO_MIXER_LAST;
610 1.1 lonewolf strcpy(dev->label.name, AudioNmaster);
611 1.1 lonewolf dev->un.v.num_channels = 2;
612 1.1 lonewolf strcpy(dev->un.v.units.name, AudioNvolume);
613 1.1 lonewolf break;
614 1.1 lonewolf
615 1.1 lonewolf /* Mixer classes */
616 1.1 lonewolf case HALTWO_OUTPUT_CLASS:
617 1.1 lonewolf dev->type = AUDIO_MIXER_CLASS;
618 1.1 lonewolf dev->mixer_class = HALTWO_OUTPUT_CLASS;
619 1.1 lonewolf dev->next = dev->prev = AUDIO_MIXER_LAST;
620 1.1 lonewolf strcpy(dev->label.name, AudioCoutputs);
621 1.1 lonewolf break;
622 1.1 lonewolf
623 1.1 lonewolf default:
624 1.7 kent return EINVAL;
625 1.1 lonewolf }
626 1.1 lonewolf
627 1.7 kent return 0;
628 1.1 lonewolf }
629 1.1 lonewolf
630 1.1 lonewolf static int
631 1.1 lonewolf haltwo_alloc_dmamem(struct haltwo_softc *sc, size_t size,
632 1.1 lonewolf struct haltwo_dmabuf *p)
633 1.1 lonewolf {
634 1.1 lonewolf int err;
635 1.1 lonewolf
636 1.1 lonewolf p->size = size;
637 1.1 lonewolf
638 1.1 lonewolf /* XXX Check align/boundary XXX */
639 1.1 lonewolf /* XXX Pass flags and use them instead BUS_DMA_NOWAIT? XXX */
640 1.1 lonewolf err = bus_dmamem_alloc(sc->sc_dma_tag, p->size, 0, 0, p->dma_segs,
641 1.1 lonewolf HALTWO_MAX_DMASEGS, &p->dma_segcount, BUS_DMA_NOWAIT);
642 1.1 lonewolf if (err)
643 1.1 lonewolf goto out;
644 1.1 lonewolf
645 1.1 lonewolf /* XXX BUS_DMA_COHERENT? XXX */
646 1.1 lonewolf err = bus_dmamem_map(sc->sc_dma_tag, p->dma_segs, p->dma_segcount,
647 1.1 lonewolf p->size, &p->kern_addr, BUS_DMA_NOWAIT | BUS_DMA_COHERENT);
648 1.1 lonewolf if (err)
649 1.1 lonewolf goto out_free;
650 1.1 lonewolf
651 1.1 lonewolf /* XXX Just guessing ... XXX */
652 1.1 lonewolf err = bus_dmamap_create(sc->sc_dma_tag, p->size, HALTWO_MAX_DMASEGS,
653 1.1 lonewolf PAGE_SIZE, 0, BUS_DMA_NOWAIT, &p->dma_map);
654 1.1 lonewolf if (err)
655 1.1 lonewolf goto out_free;
656 1.1 lonewolf
657 1.1 lonewolf err = bus_dmamap_load(sc->sc_dma_tag, p->dma_map, p->kern_addr,
658 1.1 lonewolf p->size, NULL, BUS_DMA_NOWAIT);
659 1.1 lonewolf if (err)
660 1.1 lonewolf goto out_destroy;
661 1.1 lonewolf
662 1.1 lonewolf return 0;
663 1.1 lonewolf
664 1.1 lonewolf out_destroy:
665 1.1 lonewolf bus_dmamap_destroy(sc->sc_dma_tag, p->dma_map);
666 1.1 lonewolf out_free:
667 1.1 lonewolf bus_dmamem_free(sc->sc_dma_tag, p->dma_segs, p->dma_segcount);
668 1.1 lonewolf out:
669 1.1 lonewolf DPRINTF(("haltwo_alloc_dmamem failed: %d\n",err));
670 1.1 lonewolf
671 1.1 lonewolf return err;
672 1.1 lonewolf }
673 1.1 lonewolf
674 1.1 lonewolf static void *
675 1.1 lonewolf haltwo_malloc(void *v, int direction, size_t size, struct malloc_type *type,
676 1.1 lonewolf int flags)
677 1.1 lonewolf {
678 1.7 kent struct haltwo_softc *sc;
679 1.1 lonewolf struct haltwo_dmabuf *p;
680 1.1 lonewolf
681 1.1 lonewolf DPRINTF(("haltwo_malloc size = %d\n", size));
682 1.7 kent sc = v;
683 1.1 lonewolf p = malloc(sizeof(struct haltwo_dmabuf), type, flags);
684 1.1 lonewolf if (!p)
685 1.1 lonewolf return 0;
686 1.1 lonewolf
687 1.1 lonewolf if (haltwo_alloc_dmamem(sc, size, p)) {
688 1.1 lonewolf free(p, type);
689 1.1 lonewolf return 0;
690 1.1 lonewolf }
691 1.1 lonewolf
692 1.1 lonewolf p->next = sc->sc_dma_bufs;
693 1.1 lonewolf sc->sc_dma_bufs = p;
694 1.1 lonewolf
695 1.1 lonewolf return p->kern_addr;
696 1.1 lonewolf }
697 1.1 lonewolf
698 1.1 lonewolf static void
699 1.1 lonewolf haltwo_free(void *v, void *addr, struct malloc_type *type)
700 1.1 lonewolf {
701 1.7 kent struct haltwo_softc *sc;
702 1.7 kent struct haltwo_dmabuf *p, **pp;
703 1.1 lonewolf
704 1.7 kent sc = v;
705 1.1 lonewolf for (pp = &sc->sc_dma_bufs; (p = *pp) != NULL; pp = &p->next) {
706 1.1 lonewolf if (p->kern_addr == addr) {
707 1.1 lonewolf *pp = p->next;
708 1.1 lonewolf free(p, type);
709 1.1 lonewolf return;
710 1.1 lonewolf }
711 1.1 lonewolf }
712 1.1 lonewolf
713 1.1 lonewolf panic("haltwo_free: buffer not in list");
714 1.1 lonewolf }
715 1.1 lonewolf
716 1.1 lonewolf static int
717 1.1 lonewolf haltwo_get_props(void *v)
718 1.1 lonewolf {
719 1.2 tsutsui
720 1.7 kent return 0;
721 1.1 lonewolf }
722 1.1 lonewolf
723 1.1 lonewolf static int
724 1.1 lonewolf haltwo_trigger_output(void *v, void *start, void *end, int blksize,
725 1.6 kent void (*intr)(void *), void *intrarg, const audio_params_t *param)
726 1.1 lonewolf {
727 1.7 kent struct haltwo_softc *sc;
728 1.1 lonewolf struct haltwo_dmabuf *p;
729 1.1 lonewolf uint16_t tmp;
730 1.1 lonewolf uint32_t ctrl;
731 1.1 lonewolf unsigned int fifobeg, fifoend, highwater;
732 1.1 lonewolf
733 1.1 lonewolf DPRINTF(("haltwo_trigger_output start = %p end = %p blksize = %d"
734 1.2 tsutsui " param = %p\n", start, end, blksize, param));
735 1.7 kent sc = v;
736 1.1 lonewolf for (p = sc->sc_dma_bufs; p != NULL; p = p->next)
737 1.1 lonewolf if (p->kern_addr == start)
738 1.1 lonewolf break;
739 1.1 lonewolf
740 1.1 lonewolf if (p == NULL) {
741 1.1 lonewolf printf("haltwo_trigger_output: buffer not in list\n");
742 1.2 tsutsui
743 1.7 kent return EINVAL;
744 1.1 lonewolf }
745 1.1 lonewolf
746 1.1 lonewolf /* Disable PBUS DMA */
747 1.5 rumble bus_space_write_4(sc->sc_st, sc->sc_dma_sh, HPC3_PBUS_CH0_CTL,
748 1.5 rumble HPC3_PBUS_DMACTL_ACT_LD);
749 1.1 lonewolf
750 1.1 lonewolf /* Disable HAL2 codec DMA */
751 1.1 lonewolf haltwo_read_indirect(sc, HAL2_IREG_DMA_PORT_EN, &tmp, NULL);
752 1.1 lonewolf haltwo_write_indirect(sc, HAL2_IREG_DMA_PORT_EN,
753 1.1 lonewolf tmp & ~HAL2_DMA_PORT_EN_CODECTX, 0);
754 1.1 lonewolf
755 1.1 lonewolf haltwo_setup_dma(sc, &sc->sc_dac, p, (char *)end - (char *)start,
756 1.1 lonewolf blksize, intr, intrarg);
757 1.1 lonewolf
758 1.6 kent highwater = (param->channels * 4) >> 1;
759 1.1 lonewolf fifobeg = 0;
760 1.6 kent fifoend = (param->channels * 8) >> 3;
761 1.1 lonewolf
762 1.1 lonewolf DPRINTF(("haltwo_trigger_output: hw_channels = %d highwater = %d"
763 1.2 tsutsui " fifobeg = %d fifoend = %d\n", param->hw_channels, highwater,
764 1.2 tsutsui fifobeg, fifoend));
765 1.1 lonewolf
766 1.5 rumble ctrl = HPC3_PBUS_DMACTL_RT
767 1.5 rumble | HPC3_PBUS_DMACTL_ACT_LD
768 1.5 rumble | (highwater << HPC3_PBUS_DMACTL_HIGHWATER_SHIFT)
769 1.5 rumble | (fifobeg << HPC3_PBUS_DMACTL_FIFOBEG_SHIFT)
770 1.5 rumble | (fifoend << HPC3_PBUS_DMACTL_FIFOEND_SHIFT);
771 1.1 lonewolf
772 1.1 lonewolf /* Using PBUS CH0 for DAC DMA */
773 1.1 lonewolf haltwo_write_indirect(sc, HAL2_IREG_DMA_DRV, 1, 0);
774 1.1 lonewolf
775 1.1 lonewolf /* HAL2 is ready for action, now setup PBUS for DMA transfer */
776 1.5 rumble bus_space_write_4(sc->sc_st, sc->sc_dma_sh, HPC3_PBUS_CH0_DP,
777 1.1 lonewolf sc->sc_dac.dma_seg.ds_addr);
778 1.5 rumble bus_space_write_4(sc->sc_st, sc->sc_dma_sh, HPC3_PBUS_CH0_CTL,
779 1.5 rumble ctrl | HPC3_PBUS_DMACTL_ACT);
780 1.1 lonewolf
781 1.1 lonewolf /* Both HAL2 and PBUS have been setup, now start it up */
782 1.1 lonewolf haltwo_read_indirect(sc, HAL2_IREG_DMA_PORT_EN, &tmp, NULL);
783 1.1 lonewolf haltwo_write_indirect(sc, HAL2_IREG_DMA_PORT_EN,
784 1.1 lonewolf tmp | HAL2_DMA_PORT_EN_CODECTX, 0);
785 1.2 tsutsui
786 1.7 kent return 0;
787 1.1 lonewolf }
788 1.1 lonewolf
789 1.1 lonewolf static int
790 1.1 lonewolf haltwo_trigger_input(void *v, void *start, void *end, int blksize,
791 1.6 kent void (*intr)(void *), void *intrarg, const audio_params_t *param)
792 1.1 lonewolf {
793 1.7 kent struct haltwo_softc *sc;
794 1.1 lonewolf struct haltwo_dmabuf *p;
795 1.2 tsutsui
796 1.1 lonewolf DPRINTF(("haltwo_trigger_input start = %p end = %p blksize = %d\n",
797 1.2 tsutsui start, end, blksize));
798 1.7 kent sc = v;
799 1.1 lonewolf for (p = sc->sc_dma_bufs; p != NULL; p = p->next)
800 1.1 lonewolf if (p->kern_addr == start)
801 1.1 lonewolf break;
802 1.1 lonewolf
803 1.1 lonewolf if (p == NULL) {
804 1.1 lonewolf printf("haltwo_trigger_input: buffer not in list\n");
805 1.2 tsutsui
806 1.7 kent return EINVAL;
807 1.1 lonewolf }
808 1.1 lonewolf
809 1.1 lonewolf #if 0
810 1.1 lonewolf haltwo_setup_dma(sc, &sc->sc_adc, p, (char *)end - (char *)start,
811 1.1 lonewolf blksize, intr, intrarg);
812 1.1 lonewolf #endif
813 1.2 tsutsui
814 1.7 kent return ENXIO;
815 1.1 lonewolf }
816 1.15 tsutsui
817 1.15 tsutsui void
818 1.15 tsutsui haltwo_shutdown(void *arg)
819 1.15 tsutsui {
820 1.15 tsutsui struct haltwo_softc *sc = arg;
821 1.15 tsutsui
822 1.15 tsutsui haltwo_write(sc, ctl, HAL2_REG_CTL_ISR, 0);
823 1.15 tsutsui haltwo_write(sc, ctl, HAL2_REG_CTL_ISR,
824 1.15 tsutsui HAL2_ISR_GLOBAL_RESET_N | HAL2_ISR_CODEC_RESET_N);
825 1.15 tsutsui }
826