bwdsp.c revision 1.1 1 /* $NetBSD: bwdsp.c,v 1.1 2024/01/22 21:28:15 jmcneill Exp $ */
2
3 /*-
4 * Copyright (c) 2024 Jared McNeill <jmcneill (at) invisible.ca>
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
21 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
22 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
23 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
24 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30 __KERNEL_RCSID(0, "$NetBSD: bwdsp.c,v 1.1 2024/01/22 21:28:15 jmcneill Exp $");
31
32 #include <sys/param.h>
33 #include <sys/bus.h>
34 #include <sys/cpu.h>
35 #include <sys/device.h>
36 #include <sys/kmem.h>
37
38 #include <sys/audioio.h>
39 #include <dev/audio/audio_if.h>
40 #include <dev/audio/audio_dai.h>
41
42 #include "mainbus.h"
43 #include "bwai.h"
44
45 #define BWDSP_MAP_FLAGS BUS_DMA_NOCACHE
46
47 #define DSP_CONTROL_STATUS 0x0a
48 #define DSP_CONTROL_STATUS_DSPINT __BIT(7)
49 #define DSP_CONTROL_STATUS_ARINT __BIT(5)
50 #define DSP_CONTROL_STATUS_AIDINTMASK __BIT(4)
51 #define DSP_CONTROL_STATUS_AIDINT __BIT(3)
52 #define DSP_CONTROL_STATUS_HALT __BIT(2)
53 #define DSP_CONTROL_STATUS_PIINT __BIT(1)
54 #define DSP_DMA_START_ADDR_H 0x30
55 #define DSP_DMA_START_ADDR_L 0x32
56 #define DSP_DMA_CONTROL_LENGTH 0x36
57 #define DSP_DMA_CONTROL_LENGTH_CTRL __BIT(15)
58 #define DSP_DMA_CONTROL_LENGTH_NUM_CLS __BITS(14,0)
59
60 #define DSP_DMA_ALIGN 32
61 #define DSP_DMA_MAX_BUFSIZE (DSP_DMA_CONTROL_LENGTH_NUM_CLS * 32)
62
63 struct bwdsp_dma {
64 LIST_ENTRY(bwdsp_dma) dma_list;
65 bus_dmamap_t dma_map;
66 void *dma_addr;
67 size_t dma_size;
68 bus_dma_segment_t dma_segs[1];
69 int dma_nsegs;
70 };
71
72 struct bwdsp_softc {
73 device_t sc_dev;
74 bus_space_tag_t sc_bst;
75 bus_space_handle_t sc_bsh;
76 bus_dma_tag_t sc_dmat;
77
78 LIST_HEAD(, bwdsp_dma) sc_dmalist;
79
80 kmutex_t sc_lock;
81 kmutex_t sc_intr_lock;
82
83 struct audio_format sc_format;
84
85 audio_dai_tag_t sc_dai;
86 };
87
88 #define RD2(sc, reg) \
89 bus_space_read_2((sc)->sc_bst, (sc)->sc_bsh, (reg))
90 #define WR2(sc, reg, val) \
91 bus_space_write_2((sc)->sc_bst, (sc)->sc_bsh, (reg), (val))
92
93 static int
94 bwdsp_allocdma(struct bwdsp_softc *sc, size_t size,
95 size_t align, struct bwdsp_dma *dma)
96 {
97 int error;
98
99 dma->dma_size = size;
100 error = bus_dmamem_alloc(sc->sc_dmat, dma->dma_size, align, 0,
101 dma->dma_segs, 1, &dma->dma_nsegs, BUS_DMA_WAITOK);
102 if (error)
103 return error;
104
105 error = bus_dmamem_map(sc->sc_dmat, dma->dma_segs, dma->dma_nsegs,
106 dma->dma_size, &dma->dma_addr, BUS_DMA_WAITOK | BWDSP_MAP_FLAGS);
107 if (error)
108 goto free;
109
110 error = bus_dmamap_create(sc->sc_dmat, dma->dma_size, dma->dma_nsegs,
111 dma->dma_size, 0, BUS_DMA_WAITOK, &dma->dma_map);
112 if (error)
113 goto unmap;
114
115 error = bus_dmamap_load(sc->sc_dmat, dma->dma_map, dma->dma_addr,
116 dma->dma_size, NULL, BUS_DMA_WAITOK);
117 if (error)
118 goto destroy;
119
120 return 0;
121
122 destroy:
123 bus_dmamap_destroy(sc->sc_dmat, dma->dma_map);
124 unmap:
125 bus_dmamem_unmap(sc->sc_dmat, dma->dma_addr, dma->dma_size);
126 free:
127 bus_dmamem_free(sc->sc_dmat, dma->dma_segs, dma->dma_nsegs);
128
129 return error;
130 }
131
132 static void
133 bwdsp_freedma(struct bwdsp_softc *sc, struct bwdsp_dma *dma)
134 {
135 bus_dmamap_unload(sc->sc_dmat, dma->dma_map);
136 bus_dmamap_destroy(sc->sc_dmat, dma->dma_map);
137 bus_dmamem_unmap(sc->sc_dmat, dma->dma_addr, dma->dma_size);
138 bus_dmamem_free(sc->sc_dmat, dma->dma_segs, dma->dma_nsegs);
139 }
140
141 static int
142 bwdsp_query_format(void *priv, audio_format_query_t *afp)
143 {
144 struct bwdsp_softc * const sc = priv;
145
146 return audio_query_format(&sc->sc_format, 1, afp);
147 }
148
149 static int
150 bwdsp_set_format(void *priv, int setmode,
151 const audio_params_t *play, const audio_params_t *rec,
152 audio_filter_reg_t *pfil, audio_filter_reg_t *rfil)
153 {
154 struct bwdsp_softc * const sc = priv;
155
156 return audio_dai_mi_set_format(sc->sc_dai, setmode, play, rec,
157 pfil, rfil);
158 }
159
160 static int
161 bwdsp_set_port(void *priv, mixer_ctrl_t *mc)
162 {
163 struct bwdsp_softc * const sc = priv;
164
165 return audio_dai_set_port(sc->sc_dai, mc);
166 }
167
168 static int
169 bwdsp_get_port(void *priv, mixer_ctrl_t *mc)
170 {
171 struct bwdsp_softc * const sc = priv;
172
173 return audio_dai_get_port(sc->sc_dai, mc);
174 }
175
176 static int
177 bwdsp_query_devinfo(void *priv, mixer_devinfo_t *di)
178 {
179 struct bwdsp_softc * const sc = priv;
180
181 return audio_dai_query_devinfo(sc->sc_dai, di);
182 }
183
184 static void *
185 bwdsp_allocm(void *priv, int dir, size_t size)
186 {
187 struct bwdsp_softc * const sc = priv;
188 struct bwdsp_dma *dma;
189 int error;
190
191 dma = kmem_alloc(sizeof(*dma), KM_SLEEP);
192
193 error = bwdsp_allocdma(sc, size, DSP_DMA_ALIGN, dma);
194 if (error) {
195 kmem_free(dma, sizeof(*dma));
196 device_printf(sc->sc_dev, "couldn't allocate DMA memory (%d)\n",
197 error);
198 return NULL;
199 }
200
201 LIST_INSERT_HEAD(&sc->sc_dmalist, dma, dma_list);
202
203 return dma->dma_addr;
204 }
205
206 static void
207 bwdsp_freem(void *priv, void *addr, size_t size)
208 {
209 struct bwdsp_softc * const sc = priv;
210 struct bwdsp_dma *dma;
211
212 LIST_FOREACH(dma, &sc->sc_dmalist, dma_list)
213 if (dma->dma_addr == addr) {
214 bwdsp_freedma(sc, dma);
215 LIST_REMOVE(dma, dma_list);
216 kmem_free(dma, sizeof(*dma));
217 break;
218 }
219 }
220
221 static int
222 bwdsp_getdev(void *priv, struct audio_device *adev)
223 {
224 snprintf(adev->name, sizeof(adev->name), "Broadway DSP");
225 snprintf(adev->version, sizeof(adev->version), "");
226 snprintf(adev->config, sizeof(adev->config), "bwdsp");
227
228 return 0;
229 }
230
231 static int
232 bwdsp_get_props(void *priv)
233 {
234 return AUDIO_PROP_PLAYBACK;
235 }
236
237 static int
238 bwdsp_round_blocksize(void *priv, int bs, int mode,
239 const audio_params_t *params)
240 {
241 bs = roundup(bs, DSP_DMA_ALIGN);
242 if (bs > DSP_DMA_MAX_BUFSIZE) {
243 bs = DSP_DMA_MAX_BUFSIZE;
244 }
245 return bs;
246 }
247
248 static size_t
249 bwdsp_round_buffersize(void *priv, int dir, size_t bufsize)
250 {
251 if (bufsize > DSP_DMA_MAX_BUFSIZE) {
252 bufsize = DSP_DMA_MAX_BUFSIZE;
253 }
254 return bufsize;
255 }
256
257 static void
258 bwdsp_transfer(struct bwdsp_softc *sc, uint32_t phys_addr, size_t bufsize)
259 {
260 if (bufsize != 0) {
261 WR2(sc, DSP_DMA_START_ADDR_H, phys_addr >> 16);
262 WR2(sc, DSP_DMA_START_ADDR_L, phys_addr & 0xffff);
263 WR2(sc, DSP_DMA_CONTROL_LENGTH,
264 DSP_DMA_CONTROL_LENGTH_CTRL | (bufsize / 32));
265 } else {
266 WR2(sc, DSP_DMA_CONTROL_LENGTH, 0);
267 }
268 }
269
270 static int
271 bwdsp_trigger_output(void *priv, void *start, void *end, int blksize,
272 void (*intr)(void *), void *intrarg, const audio_params_t *params)
273 {
274 struct bwdsp_softc * const sc = priv;
275 struct bwdsp_dma *dma;
276 bus_addr_t pstart;
277 bus_size_t psize;
278 int error;
279
280 pstart = 0;
281 psize = (uintptr_t)end - (uintptr_t)start;
282
283 LIST_FOREACH(dma, &sc->sc_dmalist, dma_list)
284 if (dma->dma_addr == start) {
285 pstart = dma->dma_map->dm_segs[0].ds_addr;
286 break;
287 }
288 if (pstart == 0) {
289 device_printf(sc->sc_dev, "bad addr %p\n", start);
290 return EINVAL;
291 }
292
293 error = audio_dai_trigger(sc->sc_dai, start, end, blksize,
294 intr, intrarg, params, AUMODE_PLAY);
295 if (error != 0) {
296 return error;
297 }
298
299 /* Start DMA transfer */
300 bwdsp_transfer(sc, pstart, psize);
301
302 return 0;
303 }
304
305 static int
306 bwdsp_halt_output(void *priv)
307 {
308 struct bwdsp_softc * const sc = priv;
309
310 /* Stop DMA transfer */
311 bwdsp_transfer(sc, 0, 0);
312
313 return audio_dai_halt(sc->sc_dai, AUMODE_PLAY);
314 }
315
316 static void
317 bwdsp_get_locks(void *priv, kmutex_t **intr, kmutex_t **thread)
318 {
319 struct bwdsp_softc * const sc = priv;
320
321 *intr = &sc->sc_intr_lock;
322 *thread = &sc->sc_lock;
323 }
324
325 static const struct audio_hw_if bwdsp_hw_if = {
326 .query_format = bwdsp_query_format,
327 .set_format = bwdsp_set_format,
328 .allocm = bwdsp_allocm,
329 .freem = bwdsp_freem,
330 .getdev = bwdsp_getdev,
331 .set_port = bwdsp_set_port,
332 .get_port = bwdsp_get_port,
333 .query_devinfo = bwdsp_query_devinfo,
334 .get_props = bwdsp_get_props,
335 .round_blocksize = bwdsp_round_blocksize,
336 .round_buffersize = bwdsp_round_buffersize,
337 .trigger_output = bwdsp_trigger_output,
338 .halt_output = bwdsp_halt_output,
339 .get_locks = bwdsp_get_locks,
340 };
341
342 static int
343 bwdsp_intr(void *priv)
344 {
345 struct bwdsp_softc * const sc = priv;
346 uint16_t val;
347
348 val = RD2(sc, DSP_CONTROL_STATUS);
349 if ((val & DSP_CONTROL_STATUS_AIDINT) != 0) {
350 /* Acknowledge audio interrupt */
351 val &= ~(DSP_CONTROL_STATUS_DSPINT |
352 DSP_CONTROL_STATUS_ARINT |
353 DSP_CONTROL_STATUS_PIINT);
354 WR2(sc, DSP_CONTROL_STATUS, val);
355 }
356
357 return 1;
358 }
359
360 static void
361 bwdsp_late_attach(device_t dev)
362 {
363 struct bwdsp_softc * const sc = device_private(dev);
364
365 sc->sc_dai = bwai_dsp_init(&sc->sc_intr_lock);
366 if (sc->sc_dai == NULL) {
367 aprint_error_dev(dev, "can't find bwai device\n");
368 return;
369 }
370
371 audio_attach_mi(&bwdsp_hw_if, sc, dev);
372 }
373
374 static int
375 bwdsp_match(device_t parent, cfdata_t cf, void *aux)
376 {
377 struct mainbus_attach_args * const maa = aux;
378
379 return strcmp(maa->maa_name, "bwdsp") == 0;
380 }
381
382 static void
383 bwdsp_attach(device_t parent, device_t self, void *aux)
384 {
385 struct bwdsp_softc * const sc = device_private(self);
386 struct mainbus_attach_args * const maa = aux;
387 bus_addr_t addr = maa->maa_addr;
388 bus_size_t size = 0x200;
389 uint16_t val;
390
391 sc->sc_dev = self;
392 sc->sc_bst = maa->maa_bst;
393 if (bus_space_map(sc->sc_bst, addr, size, 0, &sc->sc_bsh) != 0) {
394 aprint_error(": couldn't map registers\n");
395 return;
396 }
397 sc->sc_dmat = maa->maa_dmat;
398 LIST_INIT(&sc->sc_dmalist);
399 mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
400 mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_SCHED);
401
402 aprint_naive("\n");
403 aprint_normal(": DSP\n");
404
405 sc->sc_format.mode = AUMODE_PLAY;
406 sc->sc_format.encoding = AUDIO_ENCODING_SLINEAR_BE;
407 sc->sc_format.validbits = 16;
408 sc->sc_format.precision = 16;
409 sc->sc_format.channels = 2;
410 sc->sc_format.channel_mask = AUFMT_STEREO;
411 sc->sc_format.frequency_type = 1;
412 sc->sc_format.frequency[0] = 48000;
413
414 val = RD2(sc, DSP_CONTROL_STATUS);
415 val |= DSP_CONTROL_STATUS_AIDINTMASK;
416 val |= DSP_CONTROL_STATUS_PIINT;
417 WR2(sc, DSP_CONTROL_STATUS, val);
418
419 intr_establish(maa->maa_irq, IST_LEVEL, IPL_AUDIO, bwdsp_intr, sc);
420
421 config_defer(self, bwdsp_late_attach);
422 }
423
424 CFATTACH_DECL_NEW(bwdsp, sizeof(struct bwdsp_softc),
425 bwdsp_match, bwdsp_attach, NULL, NULL);
426