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