Home | History | Annotate | Line # | Download | only in vax
bus_dma.c revision 1.21
      1 /*	$NetBSD: bus_dma.c,v 1.21 2004/11/28 17:34:46 thorpej 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 2004/11/28 17:34:46 thorpej 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_valloc(kernel_map, size);
    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 		uvm_km_free(kernel_map, (vaddr_t)kva, round_page(size));
    508 }
    509 
    510 /*
    511  * Common functin for mmap(2)'ing DMA-safe memory.  May be called by
    512  * bus-specific DMA mmap(2)'ing functions.
    513  */
    514 paddr_t
    515 _bus_dmamem_mmap(t, segs, nsegs, off, prot, flags)
    516 	bus_dma_tag_t t;
    517 	bus_dma_segment_t *segs;
    518 	int nsegs;
    519 	off_t off;
    520 	int prot, flags;
    521 {
    522 	int i;
    523 
    524 	for (i = 0; i < nsegs; i++) {
    525 #ifdef DIAGNOSTIC
    526 		if (off & PGOFSET)
    527 			panic("_bus_dmamem_mmap: offset unaligned");
    528 		if (segs[i].ds_addr & PGOFSET)
    529 			panic("_bus_dmamem_mmap: segment unaligned");
    530 		if (segs[i].ds_len & PGOFSET)
    531 			panic("_bus_dmamem_mmap: segment size not multiple"
    532 			    " of page size");
    533 #endif	/* DIAGNOSTIC */
    534 		if (off >= segs[i].ds_len) {
    535 			off -= segs[i].ds_len;
    536 			continue;
    537 		}
    538 
    539 		return (btop((u_long)segs[i].ds_addr + off));
    540 	}
    541 
    542 	/* Page not found. */
    543 	return (-1);
    544 }
    545 
    546 /**********************************************************************
    547  * DMA utility functions
    548  **********************************************************************/
    549 
    550 /*
    551  * Utility function to load a linear buffer.  lastaddrp holds state
    552  * between invocations (for multiple-buffer loads).  segp contains
    553  * the starting segment on entrace, and the ending segment on exit.
    554  * first indicates if this is the first invocation of this function.
    555  */
    556 int
    557 _bus_dmamap_load_buffer(t, map, buf, buflen, p, flags, lastaddrp, segp, first)
    558 	bus_dma_tag_t t;
    559 	bus_dmamap_t map;
    560 	void *buf;
    561 	bus_size_t buflen;
    562 	struct proc *p;
    563 	int flags;
    564 	vaddr_t *lastaddrp;
    565 	int *segp;
    566 	int first;
    567 {
    568 	bus_size_t sgsize;
    569 	bus_addr_t curaddr, lastaddr, baddr, bmask;
    570 	vaddr_t vaddr = (vaddr_t)buf;
    571 	int seg;
    572 	pmap_t pmap;
    573 
    574 #ifdef DEBUG_DMA
    575 	printf("_bus_dmamem_load_buffer(buf=%p, len=%lx, flags=%d, 1st=%d)\n",
    576 	    buf, buflen, flags, first);
    577 #endif	/* DEBUG_DMA */
    578 
    579 	if (p != NULL)
    580 		pmap = p->p_vmspace->vm_map.pmap;
    581 	else
    582 		pmap = pmap_kernel();
    583 
    584 	lastaddr = *lastaddrp;
    585 	bmask  = ~(map->_dm_boundary - 1);
    586 
    587 	for (seg = *segp; buflen > 0; ) {
    588 		/*
    589 		 * Get the physical address for this segment.
    590 		 */
    591 		(void) pmap_extract(pmap, (vaddr_t)vaddr, &curaddr);
    592 
    593 #if 0
    594 		/*
    595 		 * Make sure we're in an allowed DMA range.
    596 		 */
    597 		if (t->_ranges != NULL &&
    598 		    _bus_dma_inrange(t->_ranges, t->_nranges, curaddr) == 0)
    599 			return (EINVAL);
    600 #endif
    601 
    602 		/*
    603 		 * Compute the segment size, and adjust counts.
    604 		 */
    605 		sgsize = PAGE_SIZE - ((u_long)vaddr & PGOFSET);
    606 		if (buflen < sgsize)
    607 			sgsize = buflen;
    608 
    609 		/*
    610 		 * Make sure we don't cross any boundaries.
    611 		 */
    612 		if (map->_dm_boundary > 0) {
    613 			baddr = (curaddr + map->_dm_boundary) & bmask;
    614 			if (sgsize > (baddr - curaddr))
    615 				sgsize = (baddr - curaddr);
    616 		}
    617 
    618 		/*
    619 		 * Insert chunk into a segment, coalescing with
    620 		 * previous segment if possible.
    621 		 */
    622 		if (first) {
    623 			map->dm_segs[seg].ds_addr = curaddr;
    624 			map->dm_segs[seg].ds_len = sgsize;
    625 			first = 0;
    626 		} else {
    627 			if (curaddr == lastaddr &&
    628 			    (map->dm_segs[seg].ds_len + sgsize) <=
    629 			     map->_dm_maxsegsz &&
    630 			    (map->_dm_boundary == 0 ||
    631 			     (map->dm_segs[seg].ds_addr & bmask) ==
    632 			     (curaddr & bmask)))
    633 				map->dm_segs[seg].ds_len += sgsize;
    634 			else {
    635 				if (++seg >= map->_dm_segcnt)
    636 					break;
    637 				map->dm_segs[seg].ds_addr = curaddr;
    638 				map->dm_segs[seg].ds_len = sgsize;
    639 			}
    640 		}
    641 
    642 		lastaddr = curaddr + sgsize;
    643 		vaddr += sgsize;
    644 		buflen -= sgsize;
    645 	}
    646 
    647 	*segp = seg;
    648 	*lastaddrp = lastaddr;
    649 
    650 	/*
    651 	 * Did we fit?
    652 	 */
    653 	if (buflen != 0)
    654 		return (EFBIG);		/* XXX better return value here? */
    655 	return (0);
    656 }
    657 
    658 /*
    659  * Check to see if the specified page is in an allowed DMA range.
    660  */
    661 int
    662 _bus_dma_inrange(ranges, nranges, curaddr)
    663 	bus_dma_segment_t *ranges;
    664 	int nranges;
    665 	bus_addr_t curaddr;
    666 {
    667 	bus_dma_segment_t *ds;
    668 	int i;
    669 
    670 	for (i = 0, ds = ranges; i < nranges; i++, ds++) {
    671 		if (curaddr >= ds->ds_addr &&
    672 		    round_page(curaddr) <= (ds->ds_addr + ds->ds_len))
    673 			return (1);
    674 	}
    675 
    676 	return (0);
    677 }
    678 
    679 /*
    680  * Allocate physical memory from the given physical address range.
    681  * Called by DMA-safe memory allocation methods.
    682  */
    683 int
    684 _bus_dmamem_alloc_range(t, size, alignment, boundary, segs, nsegs, rsegs,
    685     flags, low, high)
    686 	bus_dma_tag_t t;
    687 	bus_size_t size, alignment, boundary;
    688 	bus_dma_segment_t *segs;
    689 	int nsegs;
    690 	int *rsegs;
    691 	int flags;
    692 	vaddr_t low;
    693 	vaddr_t high;
    694 {
    695 	vaddr_t curaddr, lastaddr;
    696 	struct vm_page *m;
    697 	struct pglist mlist;
    698 	int curseg, error;
    699 
    700 #ifdef DEBUG_DMA
    701 	printf("alloc_range: t=%p size=%lx align=%lx boundary=%lx segs=%p nsegs=%x rsegs=%p flags=%x lo=%lx hi=%lx\n",
    702 	    t, size, alignment, boundary, segs, nsegs, rsegs, flags, low, high);
    703 #endif	/* DEBUG_DMA */
    704 
    705 	/* Always round the size. */
    706 	size = round_page(size);
    707 
    708 	/*
    709 	 * Allocate pages from the VM system.
    710 	 */
    711 	error = uvm_pglistalloc(size, low, high, alignment, boundary,
    712 	    &mlist, nsegs, (flags & BUS_DMA_NOWAIT) == 0);
    713 	if (error)
    714 		return (error);
    715 
    716 	/*
    717 	 * Compute the location, size, and number of segments actually
    718 	 * returned by the VM code.
    719 	 */
    720 	m = mlist.tqh_first;
    721 	curseg = 0;
    722 	lastaddr = segs[curseg].ds_addr = VM_PAGE_TO_PHYS(m);
    723 	segs[curseg].ds_len = PAGE_SIZE;
    724 #ifdef DEBUG_DMA
    725 		printf("alloc: page %lx\n", lastaddr);
    726 #endif	/* DEBUG_DMA */
    727 	m = m->pageq.tqe_next;
    728 
    729 	for (; m != NULL; m = m->pageq.tqe_next) {
    730 		curaddr = VM_PAGE_TO_PHYS(m);
    731 #ifdef DIAGNOSTIC
    732 		if (curaddr < low || curaddr >= high) {
    733 			printf("uvm_pglistalloc returned non-sensical"
    734 			    " address 0x%lx\n", curaddr);
    735 			panic("_bus_dmamem_alloc_range");
    736 		}
    737 #endif	/* DIAGNOSTIC */
    738 #ifdef DEBUG_DMA
    739 		printf("alloc: page %lx\n", curaddr);
    740 #endif	/* DEBUG_DMA */
    741 		if (curaddr == (lastaddr + PAGE_SIZE))
    742 			segs[curseg].ds_len += PAGE_SIZE;
    743 		else {
    744 			curseg++;
    745 			segs[curseg].ds_addr = curaddr;
    746 			segs[curseg].ds_len = PAGE_SIZE;
    747 		}
    748 		lastaddr = curaddr;
    749 	}
    750 
    751 	*rsegs = curseg + 1;
    752 
    753 	return (0);
    754 }
    755 
    756 /*
    757  * "generic" DMA struct, nothing special.
    758  */
    759 struct vax_bus_dma_tag vax_bus_dma_tag = {
    760 	NULL,
    761 	0,
    762 	0,
    763 	0,
    764 	0,
    765 	0,
    766 	_bus_dmamap_create,
    767 	_bus_dmamap_destroy,
    768 	_bus_dmamap_load,
    769 	_bus_dmamap_load_mbuf,
    770 	_bus_dmamap_load_uio,
    771 	_bus_dmamap_load_raw,
    772 	_bus_dmamap_unload,
    773 	_bus_dmamap_sync,
    774 	_bus_dmamem_alloc,
    775 	_bus_dmamem_free,
    776 	_bus_dmamem_map,
    777 	_bus_dmamem_unmap,
    778 	_bus_dmamem_mmap,
    779 };
    780