bus_dma.c revision 1.20 1 1.20 lukem /* $NetBSD: bus_dma.c,v 1.20 2003/07/15 02:15:02 lukem Exp $ */
2 1.1 ragge
3 1.1 ragge /*-
4 1.1 ragge * Copyright (c) 1996, 1997, 1998 The NetBSD Foundation, Inc.
5 1.1 ragge * All rights reserved.
6 1.1 ragge *
7 1.1 ragge * This code is derived from software contributed to The NetBSD Foundation
8 1.1 ragge * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
9 1.1 ragge * NASA Ames Research Center.
10 1.1 ragge *
11 1.1 ragge * Redistribution and use in source and binary forms, with or without
12 1.1 ragge * modification, are permitted provided that the following conditions
13 1.1 ragge * are met:
14 1.1 ragge * 1. Redistributions of source code must retain the above copyright
15 1.1 ragge * notice, this list of conditions and the following disclaimer.
16 1.1 ragge * 2. Redistributions in binary form must reproduce the above copyright
17 1.1 ragge * notice, this list of conditions and the following disclaimer in the
18 1.1 ragge * documentation and/or other materials provided with the distribution.
19 1.1 ragge * 3. All advertising materials mentioning features or use of this software
20 1.1 ragge * must display the following acknowledgement:
21 1.1 ragge * This product includes software developed by the NetBSD
22 1.1 ragge * Foundation, Inc. and its contributors.
23 1.1 ragge * 4. Neither the name of The NetBSD Foundation nor the names of its
24 1.1 ragge * contributors may be used to endorse or promote products derived
25 1.1 ragge * from this software without specific prior written permission.
26 1.1 ragge *
27 1.1 ragge * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 1.1 ragge * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 1.1 ragge * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 1.1 ragge * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 1.1 ragge * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 1.1 ragge * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 1.1 ragge * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 1.1 ragge * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 1.1 ragge * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 1.1 ragge * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 1.1 ragge * POSSIBILITY OF SUCH DAMAGE.
38 1.1 ragge */
39 1.1 ragge /*
40 1.1 ragge * bus_dma routines for vax. File copied from arm32/bus_dma.c.
41 1.1 ragge * NetBSD: bus_dma.c,v 1.11 1998/09/21 22:53:35 thorpej Exp
42 1.1 ragge */
43 1.20 lukem
44 1.20 lukem #include <sys/cdefs.h>
45 1.20 lukem __KERNEL_RCSID(0, "$NetBSD: bus_dma.c,v 1.20 2003/07/15 02:15:02 lukem Exp $");
46 1.1 ragge
47 1.1 ragge #include <sys/param.h>
48 1.1 ragge #include <sys/systm.h>
49 1.1 ragge #include <sys/kernel.h>
50 1.1 ragge #include <sys/proc.h>
51 1.1 ragge #include <sys/buf.h>
52 1.1 ragge #include <sys/reboot.h>
53 1.1 ragge #include <sys/conf.h>
54 1.1 ragge #include <sys/file.h>
55 1.1 ragge #include <sys/malloc.h>
56 1.1 ragge #include <sys/mbuf.h>
57 1.1 ragge #include <sys/vnode.h>
58 1.1 ragge #include <sys/device.h>
59 1.1 ragge
60 1.1 ragge #include <uvm/uvm_extern.h>
61 1.1 ragge
62 1.1 ragge #define _VAX_BUS_DMA_PRIVATE
63 1.1 ragge #include <machine/bus.h>
64 1.1 ragge
65 1.1 ragge #include <machine/ka43.h>
66 1.1 ragge #include <machine/sid.h>
67 1.1 ragge
68 1.16 matt extern paddr_t avail_start, avail_end;
69 1.16 matt extern vaddr_t virtual_avail;
70 1.1 ragge
71 1.1 ragge int _bus_dmamap_load_buffer __P((bus_dma_tag_t, bus_dmamap_t, void *,
72 1.6 matt bus_size_t, struct proc *, int, vaddr_t *, int *, int));
73 1.1 ragge int _bus_dma_inrange __P((bus_dma_segment_t *, int, bus_addr_t));
74 1.1 ragge int _bus_dmamem_alloc_range __P((bus_dma_tag_t, bus_size_t, bus_size_t,
75 1.1 ragge bus_size_t, bus_dma_segment_t*, int, int *, int, vaddr_t, vaddr_t));
76 1.1 ragge /*
77 1.1 ragge * Common function for DMA map creation. May be called by bus-specific
78 1.1 ragge * DMA map creation functions.
79 1.1 ragge */
80 1.1 ragge int
81 1.1 ragge _bus_dmamap_create(t, size, nsegments, maxsegsz, boundary, flags, dmamp)
82 1.1 ragge bus_dma_tag_t t;
83 1.1 ragge bus_size_t size;
84 1.1 ragge int nsegments;
85 1.1 ragge bus_size_t maxsegsz;
86 1.1 ragge bus_size_t boundary;
87 1.1 ragge int flags;
88 1.1 ragge bus_dmamap_t *dmamp;
89 1.1 ragge {
90 1.1 ragge struct vax_bus_dmamap *map;
91 1.1 ragge void *mapstore;
92 1.1 ragge size_t mapsize;
93 1.1 ragge
94 1.1 ragge #ifdef DEBUG_DMA
95 1.1 ragge printf("dmamap_create: t=%p size=%lx nseg=%x msegsz=%lx boundary=%lx flags=%x\n",
96 1.1 ragge t, size, nsegments, maxsegsz, boundary, flags);
97 1.1 ragge #endif /* DEBUG_DMA */
98 1.1 ragge
99 1.1 ragge /*
100 1.1 ragge * Allocate and initialize the DMA map. The end of the map
101 1.1 ragge * is a variable-sized array of segments, so we allocate enough
102 1.1 ragge * room for them in one shot.
103 1.1 ragge *
104 1.1 ragge * Note we don't preserve the WAITOK or NOWAIT flags. Preservation
105 1.1 ragge * of ALLOCNOW notifies others that we've reserved these resources,
106 1.1 ragge * and they are not to be freed.
107 1.1 ragge *
108 1.1 ragge * The bus_dmamap_t includes one bus_dma_segment_t, hence
109 1.1 ragge * the (nsegments - 1).
110 1.1 ragge */
111 1.1 ragge mapsize = sizeof(struct vax_bus_dmamap) +
112 1.1 ragge (sizeof(bus_dma_segment_t) * (nsegments - 1));
113 1.1 ragge if ((mapstore = malloc(mapsize, M_DMAMAP,
114 1.1 ragge (flags & BUS_DMA_NOWAIT) ? M_NOWAIT : M_WAITOK)) == NULL)
115 1.1 ragge return (ENOMEM);
116 1.1 ragge
117 1.1 ragge bzero(mapstore, mapsize);
118 1.1 ragge map = (struct vax_bus_dmamap *)mapstore;
119 1.1 ragge map->_dm_size = size;
120 1.1 ragge map->_dm_segcnt = nsegments;
121 1.1 ragge map->_dm_maxsegsz = maxsegsz;
122 1.1 ragge map->_dm_boundary = boundary;
123 1.1 ragge map->_dm_flags = flags & ~(BUS_DMA_WAITOK|BUS_DMA_NOWAIT);
124 1.1 ragge map->dm_mapsize = 0; /* no valid mappings */
125 1.1 ragge map->dm_nsegs = 0;
126 1.1 ragge
127 1.1 ragge *dmamp = map;
128 1.1 ragge #ifdef DEBUG_DMA
129 1.1 ragge printf("dmamap_create:map=%p\n", map);
130 1.1 ragge #endif /* DEBUG_DMA */
131 1.1 ragge return (0);
132 1.1 ragge }
133 1.1 ragge
134 1.1 ragge /*
135 1.1 ragge * Common function for DMA map destruction. May be called by bus-specific
136 1.1 ragge * DMA map destruction functions.
137 1.1 ragge */
138 1.1 ragge void
139 1.1 ragge _bus_dmamap_destroy(t, map)
140 1.1 ragge bus_dma_tag_t t;
141 1.1 ragge bus_dmamap_t map;
142 1.1 ragge {
143 1.1 ragge
144 1.1 ragge #ifdef DEBUG_DMA
145 1.1 ragge printf("dmamap_destroy: t=%p map=%p\n", t, map);
146 1.1 ragge #endif /* DEBUG_DMA */
147 1.1 ragge #ifdef DIAGNOSTIC
148 1.1 ragge if (map->dm_nsegs > 0)
149 1.1 ragge printf("bus_dmamap_destroy() called for map with valid mappings\n");
150 1.1 ragge #endif /* DIAGNOSTIC */
151 1.1 ragge free(map, M_DEVBUF);
152 1.1 ragge }
153 1.1 ragge
154 1.1 ragge /*
155 1.1 ragge * Common function for loading a DMA map with a linear buffer. May
156 1.1 ragge * be called by bus-specific DMA map load functions.
157 1.1 ragge */
158 1.1 ragge int
159 1.1 ragge _bus_dmamap_load(t, map, buf, buflen, p, flags)
160 1.1 ragge bus_dma_tag_t t;
161 1.1 ragge bus_dmamap_t map;
162 1.1 ragge void *buf;
163 1.1 ragge bus_size_t buflen;
164 1.1 ragge struct proc *p;
165 1.1 ragge int flags;
166 1.1 ragge {
167 1.6 matt vaddr_t lastaddr;
168 1.1 ragge int seg, error;
169 1.1 ragge
170 1.1 ragge #ifdef DEBUG_DMA
171 1.1 ragge printf("dmamap_load: t=%p map=%p buf=%p len=%lx p=%p f=%d\n",
172 1.1 ragge t, map, buf, buflen, p, flags);
173 1.1 ragge #endif /* DEBUG_DMA */
174 1.1 ragge
175 1.1 ragge /*
176 1.1 ragge * Make sure that on error condition we return "no valid mappings".
177 1.1 ragge */
178 1.1 ragge map->dm_mapsize = 0;
179 1.1 ragge map->dm_nsegs = 0;
180 1.1 ragge
181 1.1 ragge if (buflen > map->_dm_size)
182 1.1 ragge return (EINVAL);
183 1.1 ragge
184 1.1 ragge seg = 0;
185 1.1 ragge error = _bus_dmamap_load_buffer(t, map, buf, buflen, p, flags,
186 1.1 ragge &lastaddr, &seg, 1);
187 1.1 ragge if (error == 0) {
188 1.1 ragge map->dm_mapsize = buflen;
189 1.1 ragge map->dm_nsegs = seg + 1;
190 1.1 ragge }
191 1.1 ragge #ifdef DEBUG_DMA
192 1.1 ragge printf("dmamap_load: error=%d\n", error);
193 1.1 ragge #endif /* DEBUG_DMA */
194 1.1 ragge return (error);
195 1.1 ragge }
196 1.1 ragge
197 1.1 ragge /*
198 1.1 ragge * Like _bus_dmamap_load(), but for mbufs.
199 1.1 ragge */
200 1.1 ragge int
201 1.1 ragge _bus_dmamap_load_mbuf(t, map, m0, flags)
202 1.1 ragge bus_dma_tag_t t;
203 1.1 ragge bus_dmamap_t map;
204 1.1 ragge struct mbuf *m0;
205 1.1 ragge int flags;
206 1.1 ragge {
207 1.6 matt vaddr_t lastaddr;
208 1.1 ragge int seg, error, first;
209 1.1 ragge struct mbuf *m;
210 1.1 ragge
211 1.1 ragge #ifdef DEBUG_DMA
212 1.1 ragge printf("dmamap_load_mbuf: t=%p map=%p m0=%p f=%d\n",
213 1.1 ragge t, map, m0, flags);
214 1.1 ragge #endif /* DEBUG_DMA */
215 1.1 ragge
216 1.1 ragge /*
217 1.1 ragge * Make sure that on error condition we return "no valid mappings."
218 1.1 ragge */
219 1.1 ragge map->dm_mapsize = 0;
220 1.1 ragge map->dm_nsegs = 0;
221 1.1 ragge
222 1.1 ragge #ifdef DIAGNOSTIC
223 1.1 ragge if ((m0->m_flags & M_PKTHDR) == 0)
224 1.1 ragge panic("_bus_dmamap_load_mbuf: no packet header");
225 1.1 ragge #endif /* DIAGNOSTIC */
226 1.1 ragge
227 1.1 ragge if (m0->m_pkthdr.len > map->_dm_size)
228 1.1 ragge return (EINVAL);
229 1.1 ragge
230 1.1 ragge first = 1;
231 1.1 ragge seg = 0;
232 1.1 ragge error = 0;
233 1.1 ragge for (m = m0; m != NULL && error == 0; m = m->m_next) {
234 1.1 ragge error = _bus_dmamap_load_buffer(t, map, m->m_data, m->m_len,
235 1.1 ragge NULL, flags, &lastaddr, &seg, first);
236 1.1 ragge first = 0;
237 1.1 ragge }
238 1.1 ragge if (error == 0) {
239 1.1 ragge map->dm_mapsize = m0->m_pkthdr.len;
240 1.1 ragge map->dm_nsegs = seg + 1;
241 1.1 ragge }
242 1.1 ragge #ifdef DEBUG_DMA
243 1.1 ragge printf("dmamap_load_mbuf: error=%d\n", error);
244 1.1 ragge #endif /* DEBUG_DMA */
245 1.1 ragge return (error);
246 1.1 ragge }
247 1.1 ragge
248 1.1 ragge /*
249 1.1 ragge * Like _bus_dmamap_load(), but for uios.
250 1.1 ragge */
251 1.1 ragge int
252 1.1 ragge _bus_dmamap_load_uio(t, map, uio, flags)
253 1.1 ragge bus_dma_tag_t t;
254 1.1 ragge bus_dmamap_t map;
255 1.1 ragge struct uio *uio;
256 1.1 ragge int flags;
257 1.1 ragge {
258 1.6 matt vaddr_t lastaddr;
259 1.1 ragge int seg, i, error, first;
260 1.1 ragge bus_size_t minlen, resid;
261 1.1 ragge struct proc *p = NULL;
262 1.1 ragge struct iovec *iov;
263 1.1 ragge caddr_t addr;
264 1.1 ragge
265 1.1 ragge /*
266 1.1 ragge * Make sure that on error condition we return "no valid mappings."
267 1.1 ragge */
268 1.1 ragge map->dm_mapsize = 0;
269 1.1 ragge map->dm_nsegs = 0;
270 1.1 ragge
271 1.1 ragge resid = uio->uio_resid;
272 1.1 ragge iov = uio->uio_iov;
273 1.1 ragge
274 1.1 ragge if (uio->uio_segflg == UIO_USERSPACE) {
275 1.19 fvdl p = uio->uio_procp;
276 1.1 ragge #ifdef DIAGNOSTIC
277 1.1 ragge if (p == NULL)
278 1.1 ragge panic("_bus_dmamap_load_uio: USERSPACE but no proc");
279 1.1 ragge #endif
280 1.1 ragge }
281 1.1 ragge
282 1.1 ragge first = 1;
283 1.1 ragge seg = 0;
284 1.1 ragge error = 0;
285 1.1 ragge for (i = 0; i < uio->uio_iovcnt && resid != 0 && error == 0; i++) {
286 1.1 ragge /*
287 1.1 ragge * Now at the first iovec to load. Load each iovec
288 1.1 ragge * until we have exhausted the residual count.
289 1.1 ragge */
290 1.1 ragge minlen = resid < iov[i].iov_len ? resid : iov[i].iov_len;
291 1.1 ragge addr = (caddr_t)iov[i].iov_base;
292 1.1 ragge
293 1.1 ragge error = _bus_dmamap_load_buffer(t, map, addr, minlen,
294 1.1 ragge p, flags, &lastaddr, &seg, first);
295 1.1 ragge first = 0;
296 1.1 ragge
297 1.1 ragge resid -= minlen;
298 1.1 ragge }
299 1.1 ragge if (error == 0) {
300 1.1 ragge map->dm_mapsize = uio->uio_resid;
301 1.1 ragge map->dm_nsegs = seg + 1;
302 1.1 ragge }
303 1.1 ragge return (error);
304 1.1 ragge }
305 1.1 ragge
306 1.1 ragge /*
307 1.1 ragge * Like _bus_dmamap_load(), but for raw memory allocated with
308 1.1 ragge * bus_dmamem_alloc().
309 1.1 ragge */
310 1.1 ragge int
311 1.1 ragge _bus_dmamap_load_raw(t, map, segs, nsegs, size, flags)
312 1.1 ragge bus_dma_tag_t t;
313 1.1 ragge bus_dmamap_t map;
314 1.1 ragge bus_dma_segment_t *segs;
315 1.1 ragge int nsegs;
316 1.1 ragge bus_size_t size;
317 1.1 ragge int flags;
318 1.1 ragge {
319 1.1 ragge
320 1.1 ragge panic("_bus_dmamap_load_raw: not implemented");
321 1.1 ragge }
322 1.1 ragge
323 1.1 ragge /*
324 1.1 ragge * Common function for unloading a DMA map. May be called by
325 1.1 ragge * bus-specific DMA map unload functions.
326 1.1 ragge */
327 1.1 ragge void
328 1.1 ragge _bus_dmamap_unload(t, map)
329 1.1 ragge bus_dma_tag_t t;
330 1.1 ragge bus_dmamap_t map;
331 1.1 ragge {
332 1.1 ragge
333 1.1 ragge #ifdef DEBUG_DMA
334 1.1 ragge printf("dmamap_unload: t=%p map=%p\n", t, map);
335 1.1 ragge #endif /* DEBUG_DMA */
336 1.1 ragge
337 1.1 ragge /*
338 1.1 ragge * No resources to free; just mark the mappings as
339 1.1 ragge * invalid.
340 1.1 ragge */
341 1.1 ragge map->dm_mapsize = 0;
342 1.1 ragge map->dm_nsegs = 0;
343 1.1 ragge }
344 1.1 ragge
345 1.1 ragge /*
346 1.1 ragge * Common function for DMA map synchronization. May be called
347 1.1 ragge * by bus-specific DMA map synchronization functions.
348 1.1 ragge */
349 1.1 ragge void
350 1.1 ragge _bus_dmamap_sync(t, map, offset, len, ops)
351 1.1 ragge bus_dma_tag_t t;
352 1.1 ragge bus_dmamap_t map;
353 1.1 ragge bus_addr_t offset;
354 1.1 ragge bus_size_t len;
355 1.1 ragge int ops;
356 1.1 ragge {
357 1.1 ragge #ifdef DEBUG_DMA
358 1.1 ragge printf("dmamap_sync: t=%p map=%p offset=%lx len=%lx ops=%x\n",
359 1.1 ragge t, map, offset, len, ops);
360 1.1 ragge #endif /* DEBUG_DMA */
361 1.1 ragge /*
362 1.1 ragge * A vax only has snoop-cache, so this routine is a no-op.
363 1.1 ragge */
364 1.1 ragge return;
365 1.1 ragge }
366 1.1 ragge
367 1.1 ragge /*
368 1.1 ragge * Common function for DMA-safe memory allocation. May be called
369 1.1 ragge * by bus-specific DMA memory allocation functions.
370 1.1 ragge */
371 1.1 ragge
372 1.1 ragge int
373 1.1 ragge _bus_dmamem_alloc(t, size, alignment, boundary, segs, nsegs, rsegs, flags)
374 1.1 ragge bus_dma_tag_t t;
375 1.1 ragge bus_size_t size, alignment, boundary;
376 1.1 ragge bus_dma_segment_t *segs;
377 1.1 ragge int nsegs;
378 1.1 ragge int *rsegs;
379 1.1 ragge int flags;
380 1.1 ragge {
381 1.1 ragge int error;
382 1.1 ragge
383 1.1 ragge error = (_bus_dmamem_alloc_range(t, size, alignment, boundary,
384 1.1 ragge segs, nsegs, rsegs, flags, round_page(avail_start),
385 1.1 ragge trunc_page(avail_end)));
386 1.1 ragge return(error);
387 1.1 ragge }
388 1.1 ragge
389 1.1 ragge /*
390 1.1 ragge * Common function for freeing DMA-safe memory. May be called by
391 1.1 ragge * bus-specific DMA memory free functions.
392 1.1 ragge */
393 1.1 ragge void
394 1.1 ragge _bus_dmamem_free(t, segs, nsegs)
395 1.1 ragge bus_dma_tag_t t;
396 1.1 ragge bus_dma_segment_t *segs;
397 1.1 ragge int nsegs;
398 1.1 ragge {
399 1.12 chs struct vm_page *m;
400 1.1 ragge bus_addr_t addr;
401 1.1 ragge struct pglist mlist;
402 1.1 ragge int curseg;
403 1.1 ragge
404 1.1 ragge #ifdef DEBUG_DMA
405 1.1 ragge printf("dmamem_free: t=%p segs=%p nsegs=%x\n", t, segs, nsegs);
406 1.1 ragge #endif /* DEBUG_DMA */
407 1.1 ragge
408 1.1 ragge /*
409 1.1 ragge * Build a list of pages to free back to the VM system.
410 1.1 ragge */
411 1.1 ragge TAILQ_INIT(&mlist);
412 1.1 ragge for (curseg = 0; curseg < nsegs; curseg++) {
413 1.1 ragge for (addr = segs[curseg].ds_addr;
414 1.1 ragge addr < (segs[curseg].ds_addr + segs[curseg].ds_len);
415 1.1 ragge addr += PAGE_SIZE) {
416 1.1 ragge m = PHYS_TO_VM_PAGE(addr);
417 1.1 ragge TAILQ_INSERT_TAIL(&mlist, m, pageq);
418 1.1 ragge }
419 1.1 ragge }
420 1.1 ragge uvm_pglistfree(&mlist);
421 1.1 ragge }
422 1.1 ragge
423 1.1 ragge /*
424 1.1 ragge * Common function for mapping DMA-safe memory. May be called by
425 1.1 ragge * bus-specific DMA memory map functions.
426 1.1 ragge */
427 1.1 ragge int
428 1.1 ragge _bus_dmamem_map(t, segs, nsegs, size, kvap, flags)
429 1.1 ragge bus_dma_tag_t t;
430 1.1 ragge bus_dma_segment_t *segs;
431 1.1 ragge int nsegs;
432 1.1 ragge size_t size;
433 1.1 ragge caddr_t *kvap;
434 1.1 ragge int flags;
435 1.1 ragge {
436 1.6 matt vaddr_t va;
437 1.1 ragge bus_addr_t addr;
438 1.1 ragge int curseg;
439 1.1 ragge
440 1.1 ragge /*
441 1.1 ragge * Special case (but common):
442 1.1 ragge * If there is only one physical segment then the already-mapped
443 1.1 ragge * virtual address is returned, since all physical memory is already
444 1.1 ragge * in the beginning of kernel virtual memory.
445 1.1 ragge */
446 1.1 ragge if (nsegs == 1) {
447 1.1 ragge *kvap = (caddr_t)(segs[0].ds_addr | KERNBASE);
448 1.1 ragge /*
449 1.1 ragge * KA43 (3100/m76) must have its DMA-safe memory accessed
450 1.1 ragge * through DIAGMEM. Remap it here.
451 1.1 ragge */
452 1.1 ragge if (vax_boardtype == VAX_BTYP_43) {
453 1.1 ragge pmap_map((vaddr_t)*kvap, segs[0].ds_addr|KA43_DIAGMEM,
454 1.1 ragge (segs[0].ds_addr|KA43_DIAGMEM) + size,
455 1.1 ragge VM_PROT_READ|VM_PROT_WRITE);
456 1.1 ragge }
457 1.1 ragge return 0;
458 1.1 ragge }
459 1.1 ragge size = round_page(size);
460 1.1 ragge va = uvm_km_valloc(kernel_map, size);
461 1.1 ragge
462 1.1 ragge if (va == 0)
463 1.1 ragge return (ENOMEM);
464 1.1 ragge
465 1.1 ragge *kvap = (caddr_t)va;
466 1.1 ragge
467 1.1 ragge for (curseg = 0; curseg < nsegs; curseg++) {
468 1.1 ragge for (addr = segs[curseg].ds_addr;
469 1.1 ragge addr < (segs[curseg].ds_addr + segs[curseg].ds_len);
470 1.17 thorpej addr += PAGE_SIZE, va += PAGE_SIZE, size -= PAGE_SIZE) {
471 1.1 ragge if (size == 0)
472 1.1 ragge panic("_bus_dmamem_map: size botch");
473 1.1 ragge if (vax_boardtype == VAX_BTYP_43)
474 1.1 ragge addr |= KA43_DIAGMEM;
475 1.2 thorpej pmap_enter(pmap_kernel(), va, addr,
476 1.5 thorpej VM_PROT_READ | VM_PROT_WRITE,
477 1.5 thorpej VM_PROT_READ | VM_PROT_WRITE | PMAP_WIRED);
478 1.1 ragge }
479 1.1 ragge }
480 1.13 chris pmap_update(pmap_kernel());
481 1.1 ragge return (0);
482 1.1 ragge }
483 1.1 ragge
484 1.1 ragge /*
485 1.1 ragge * Common function for unmapping DMA-safe memory. May be called by
486 1.1 ragge * bus-specific DMA memory unmapping functions.
487 1.1 ragge */
488 1.1 ragge void
489 1.1 ragge _bus_dmamem_unmap(t, kva, size)
490 1.1 ragge bus_dma_tag_t t;
491 1.1 ragge caddr_t kva;
492 1.1 ragge size_t size;
493 1.1 ragge {
494 1.1 ragge
495 1.1 ragge #ifdef DEBUG_DMA
496 1.1 ragge printf("dmamem_unmap: t=%p kva=%p size=%x\n", t, kva, size);
497 1.1 ragge #endif /* DEBUG_DMA */
498 1.1 ragge #ifdef DIAGNOSTIC
499 1.1 ragge if ((u_long)kva & PGOFSET)
500 1.1 ragge panic("_bus_dmamem_unmap");
501 1.1 ragge #endif /* DIAGNOSTIC */
502 1.1 ragge
503 1.1 ragge /* Avoid free'ing if not mapped */
504 1.1 ragge if (kva >= (caddr_t)virtual_avail)
505 1.6 matt uvm_km_free(kernel_map, (vaddr_t)kva, round_page(size));
506 1.1 ragge }
507 1.1 ragge
508 1.1 ragge /*
509 1.1 ragge * Common functin for mmap(2)'ing DMA-safe memory. May be called by
510 1.1 ragge * bus-specific DMA mmap(2)'ing functions.
511 1.1 ragge */
512 1.7 simonb paddr_t
513 1.1 ragge _bus_dmamem_mmap(t, segs, nsegs, off, prot, flags)
514 1.1 ragge bus_dma_tag_t t;
515 1.1 ragge bus_dma_segment_t *segs;
516 1.7 simonb int nsegs;
517 1.7 simonb off_t off;
518 1.7 simonb int prot, flags;
519 1.1 ragge {
520 1.1 ragge int i;
521 1.1 ragge
522 1.1 ragge for (i = 0; i < nsegs; i++) {
523 1.1 ragge #ifdef DIAGNOSTIC
524 1.1 ragge if (off & PGOFSET)
525 1.1 ragge panic("_bus_dmamem_mmap: offset unaligned");
526 1.1 ragge if (segs[i].ds_addr & PGOFSET)
527 1.1 ragge panic("_bus_dmamem_mmap: segment unaligned");
528 1.1 ragge if (segs[i].ds_len & PGOFSET)
529 1.1 ragge panic("_bus_dmamem_mmap: segment size not multiple"
530 1.1 ragge " of page size");
531 1.1 ragge #endif /* DIAGNOSTIC */
532 1.1 ragge if (off >= segs[i].ds_len) {
533 1.1 ragge off -= segs[i].ds_len;
534 1.1 ragge continue;
535 1.1 ragge }
536 1.1 ragge
537 1.1 ragge return (btop((u_long)segs[i].ds_addr + off));
538 1.1 ragge }
539 1.1 ragge
540 1.1 ragge /* Page not found. */
541 1.1 ragge return (-1);
542 1.1 ragge }
543 1.1 ragge
544 1.1 ragge /**********************************************************************
545 1.1 ragge * DMA utility functions
546 1.1 ragge **********************************************************************/
547 1.1 ragge
548 1.1 ragge /*
549 1.1 ragge * Utility function to load a linear buffer. lastaddrp holds state
550 1.1 ragge * between invocations (for multiple-buffer loads). segp contains
551 1.1 ragge * the starting segment on entrace, and the ending segment on exit.
552 1.1 ragge * first indicates if this is the first invocation of this function.
553 1.1 ragge */
554 1.1 ragge int
555 1.1 ragge _bus_dmamap_load_buffer(t, map, buf, buflen, p, flags, lastaddrp, segp, first)
556 1.1 ragge bus_dma_tag_t t;
557 1.1 ragge bus_dmamap_t map;
558 1.1 ragge void *buf;
559 1.1 ragge bus_size_t buflen;
560 1.1 ragge struct proc *p;
561 1.1 ragge int flags;
562 1.6 matt vaddr_t *lastaddrp;
563 1.1 ragge int *segp;
564 1.1 ragge int first;
565 1.1 ragge {
566 1.1 ragge bus_size_t sgsize;
567 1.1 ragge bus_addr_t curaddr, lastaddr, baddr, bmask;
568 1.6 matt vaddr_t vaddr = (vaddr_t)buf;
569 1.1 ragge int seg;
570 1.1 ragge pmap_t pmap;
571 1.1 ragge
572 1.1 ragge #ifdef DEBUG_DMA
573 1.1 ragge printf("_bus_dmamem_load_buffer(buf=%p, len=%lx, flags=%d, 1st=%d)\n",
574 1.1 ragge buf, buflen, flags, first);
575 1.1 ragge #endif /* DEBUG_DMA */
576 1.1 ragge
577 1.1 ragge if (p != NULL)
578 1.1 ragge pmap = p->p_vmspace->vm_map.pmap;
579 1.1 ragge else
580 1.1 ragge pmap = pmap_kernel();
581 1.1 ragge
582 1.1 ragge lastaddr = *lastaddrp;
583 1.1 ragge bmask = ~(map->_dm_boundary - 1);
584 1.1 ragge
585 1.1 ragge for (seg = *segp; buflen > 0; ) {
586 1.1 ragge /*
587 1.1 ragge * Get the physical address for this segment.
588 1.1 ragge */
589 1.3 thorpej (void) pmap_extract(pmap, (vaddr_t)vaddr, &curaddr);
590 1.1 ragge
591 1.1 ragge #if 0
592 1.1 ragge /*
593 1.1 ragge * Make sure we're in an allowed DMA range.
594 1.1 ragge */
595 1.1 ragge if (t->_ranges != NULL &&
596 1.1 ragge _bus_dma_inrange(t->_ranges, t->_nranges, curaddr) == 0)
597 1.1 ragge return (EINVAL);
598 1.1 ragge #endif
599 1.1 ragge
600 1.1 ragge /*
601 1.1 ragge * Compute the segment size, and adjust counts.
602 1.1 ragge */
603 1.17 thorpej sgsize = PAGE_SIZE - ((u_long)vaddr & PGOFSET);
604 1.1 ragge if (buflen < sgsize)
605 1.1 ragge sgsize = buflen;
606 1.1 ragge
607 1.1 ragge /*
608 1.1 ragge * Make sure we don't cross any boundaries.
609 1.1 ragge */
610 1.1 ragge if (map->_dm_boundary > 0) {
611 1.1 ragge baddr = (curaddr + map->_dm_boundary) & bmask;
612 1.1 ragge if (sgsize > (baddr - curaddr))
613 1.1 ragge sgsize = (baddr - curaddr);
614 1.1 ragge }
615 1.1 ragge
616 1.1 ragge /*
617 1.1 ragge * Insert chunk into a segment, coalescing with
618 1.1 ragge * previous segment if possible.
619 1.1 ragge */
620 1.1 ragge if (first) {
621 1.1 ragge map->dm_segs[seg].ds_addr = curaddr;
622 1.1 ragge map->dm_segs[seg].ds_len = sgsize;
623 1.1 ragge first = 0;
624 1.1 ragge } else {
625 1.1 ragge if (curaddr == lastaddr &&
626 1.1 ragge (map->dm_segs[seg].ds_len + sgsize) <=
627 1.1 ragge map->_dm_maxsegsz &&
628 1.1 ragge (map->_dm_boundary == 0 ||
629 1.1 ragge (map->dm_segs[seg].ds_addr & bmask) ==
630 1.1 ragge (curaddr & bmask)))
631 1.1 ragge map->dm_segs[seg].ds_len += sgsize;
632 1.1 ragge else {
633 1.1 ragge if (++seg >= map->_dm_segcnt)
634 1.1 ragge break;
635 1.1 ragge map->dm_segs[seg].ds_addr = curaddr;
636 1.1 ragge map->dm_segs[seg].ds_len = sgsize;
637 1.1 ragge }
638 1.1 ragge }
639 1.1 ragge
640 1.1 ragge lastaddr = curaddr + sgsize;
641 1.1 ragge vaddr += sgsize;
642 1.1 ragge buflen -= sgsize;
643 1.1 ragge }
644 1.1 ragge
645 1.1 ragge *segp = seg;
646 1.1 ragge *lastaddrp = lastaddr;
647 1.1 ragge
648 1.1 ragge /*
649 1.1 ragge * Did we fit?
650 1.1 ragge */
651 1.1 ragge if (buflen != 0)
652 1.1 ragge return (EFBIG); /* XXX better return value here? */
653 1.1 ragge return (0);
654 1.1 ragge }
655 1.1 ragge
656 1.1 ragge /*
657 1.1 ragge * Check to see if the specified page is in an allowed DMA range.
658 1.1 ragge */
659 1.1 ragge int
660 1.1 ragge _bus_dma_inrange(ranges, nranges, curaddr)
661 1.1 ragge bus_dma_segment_t *ranges;
662 1.1 ragge int nranges;
663 1.1 ragge bus_addr_t curaddr;
664 1.1 ragge {
665 1.1 ragge bus_dma_segment_t *ds;
666 1.1 ragge int i;
667 1.1 ragge
668 1.1 ragge for (i = 0, ds = ranges; i < nranges; i++, ds++) {
669 1.1 ragge if (curaddr >= ds->ds_addr &&
670 1.1 ragge round_page(curaddr) <= (ds->ds_addr + ds->ds_len))
671 1.1 ragge return (1);
672 1.1 ragge }
673 1.1 ragge
674 1.1 ragge return (0);
675 1.1 ragge }
676 1.1 ragge
677 1.1 ragge /*
678 1.1 ragge * Allocate physical memory from the given physical address range.
679 1.1 ragge * Called by DMA-safe memory allocation methods.
680 1.1 ragge */
681 1.1 ragge int
682 1.1 ragge _bus_dmamem_alloc_range(t, size, alignment, boundary, segs, nsegs, rsegs,
683 1.1 ragge flags, low, high)
684 1.1 ragge bus_dma_tag_t t;
685 1.1 ragge bus_size_t size, alignment, boundary;
686 1.1 ragge bus_dma_segment_t *segs;
687 1.1 ragge int nsegs;
688 1.1 ragge int *rsegs;
689 1.1 ragge int flags;
690 1.6 matt vaddr_t low;
691 1.6 matt vaddr_t high;
692 1.1 ragge {
693 1.6 matt vaddr_t curaddr, lastaddr;
694 1.12 chs struct vm_page *m;
695 1.1 ragge struct pglist mlist;
696 1.1 ragge int curseg, error;
697 1.1 ragge
698 1.1 ragge #ifdef DEBUG_DMA
699 1.1 ragge printf("alloc_range: t=%p size=%lx align=%lx boundary=%lx segs=%p nsegs=%x rsegs=%p flags=%x lo=%lx hi=%lx\n",
700 1.1 ragge t, size, alignment, boundary, segs, nsegs, rsegs, flags, low, high);
701 1.1 ragge #endif /* DEBUG_DMA */
702 1.1 ragge
703 1.1 ragge /* Always round the size. */
704 1.1 ragge size = round_page(size);
705 1.1 ragge
706 1.1 ragge /*
707 1.1 ragge * Allocate pages from the VM system.
708 1.1 ragge */
709 1.1 ragge error = uvm_pglistalloc(size, low, high, alignment, boundary,
710 1.1 ragge &mlist, nsegs, (flags & BUS_DMA_NOWAIT) == 0);
711 1.1 ragge if (error)
712 1.1 ragge return (error);
713 1.1 ragge
714 1.1 ragge /*
715 1.1 ragge * Compute the location, size, and number of segments actually
716 1.1 ragge * returned by the VM code.
717 1.1 ragge */
718 1.1 ragge m = mlist.tqh_first;
719 1.1 ragge curseg = 0;
720 1.1 ragge lastaddr = segs[curseg].ds_addr = VM_PAGE_TO_PHYS(m);
721 1.1 ragge segs[curseg].ds_len = PAGE_SIZE;
722 1.1 ragge #ifdef DEBUG_DMA
723 1.1 ragge printf("alloc: page %lx\n", lastaddr);
724 1.1 ragge #endif /* DEBUG_DMA */
725 1.1 ragge m = m->pageq.tqe_next;
726 1.1 ragge
727 1.1 ragge for (; m != NULL; m = m->pageq.tqe_next) {
728 1.1 ragge curaddr = VM_PAGE_TO_PHYS(m);
729 1.1 ragge #ifdef DIAGNOSTIC
730 1.1 ragge if (curaddr < low || curaddr >= high) {
731 1.10 soren printf("uvm_pglistalloc returned non-sensical"
732 1.1 ragge " address 0x%lx\n", curaddr);
733 1.1 ragge panic("_bus_dmamem_alloc_range");
734 1.1 ragge }
735 1.1 ragge #endif /* DIAGNOSTIC */
736 1.1 ragge #ifdef DEBUG_DMA
737 1.1 ragge printf("alloc: page %lx\n", curaddr);
738 1.1 ragge #endif /* DEBUG_DMA */
739 1.1 ragge if (curaddr == (lastaddr + PAGE_SIZE))
740 1.1 ragge segs[curseg].ds_len += PAGE_SIZE;
741 1.1 ragge else {
742 1.1 ragge curseg++;
743 1.1 ragge segs[curseg].ds_addr = curaddr;
744 1.1 ragge segs[curseg].ds_len = PAGE_SIZE;
745 1.1 ragge }
746 1.1 ragge lastaddr = curaddr;
747 1.1 ragge }
748 1.1 ragge
749 1.1 ragge *rsegs = curseg + 1;
750 1.1 ragge
751 1.1 ragge return (0);
752 1.1 ragge }
753 1.4 ragge
754 1.4 ragge /*
755 1.4 ragge * "generic" DMA struct, nothing special.
756 1.4 ragge */
757 1.4 ragge struct vax_bus_dma_tag vax_bus_dma_tag = {
758 1.4 ragge NULL,
759 1.4 ragge 0,
760 1.4 ragge 0,
761 1.4 ragge 0,
762 1.4 ragge 0,
763 1.4 ragge 0,
764 1.4 ragge _bus_dmamap_create,
765 1.4 ragge _bus_dmamap_destroy,
766 1.4 ragge _bus_dmamap_load,
767 1.4 ragge _bus_dmamap_load_mbuf,
768 1.4 ragge _bus_dmamap_load_uio,
769 1.4 ragge _bus_dmamap_load_raw,
770 1.4 ragge _bus_dmamap_unload,
771 1.4 ragge _bus_dmamap_sync,
772 1.4 ragge _bus_dmamem_alloc,
773 1.4 ragge _bus_dmamem_free,
774 1.4 ragge _bus_dmamem_map,
775 1.4 ragge _bus_dmamem_unmap,
776 1.4 ragge _bus_dmamem_mmap,
777 1.4 ragge };
778