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