Home | History | Annotate | Line # | Download | only in usb
usb_mem.c revision 1.53
      1 /*	$NetBSD: usb_mem.c,v 1.53 2012/06/10 06:15:54 mrg Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1998 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Lennart Augustsson (lennart (at) augustsson.net) at
      9  * Carlstedt Research & Technology.
     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 /*
     34  * USB DMA memory allocation.
     35  * We need to allocate a lot of small (many 8 byte, some larger)
     36  * memory blocks that can be used for DMA.  Using the bus_dma
     37  * routines directly would incur large overheads in space and time.
     38  */
     39 
     40 #include <sys/cdefs.h>
     41 __KERNEL_RCSID(0, "$NetBSD: usb_mem.c,v 1.53 2012/06/10 06:15:54 mrg Exp $");
     42 
     43 #ifdef _KERNEL_OPT
     44 #include "opt_usb.h"
     45 #endif
     46 
     47 #include <sys/param.h>
     48 #include <sys/systm.h>
     49 #include <sys/kernel.h>
     50 #include <sys/malloc.h>
     51 #include <sys/queue.h>
     52 #include <sys/device.h>		/* for usbdivar.h */
     53 #include <sys/bus.h>
     54 #include <sys/cpu.h>
     55 #include <sys/once.h>
     56 
     57 #include <sys/extent.h>
     58 
     59 #ifdef DIAGNOSTIC
     60 #include <sys/proc.h>
     61 #endif
     62 
     63 #include <dev/usb/usb.h>
     64 #include <dev/usb/usbdi.h>
     65 #include <dev/usb/usbdivar.h>	/* just for usb_dma_t */
     66 #include <dev/usb/usb_mem.h>
     67 
     68 #ifdef USB_DEBUG
     69 #define DPRINTF(x)	if (usbdebug) printf x
     70 #define DPRINTFN(n,x)	if (usbdebug>(n)) printf x
     71 extern int usbdebug;
     72 #else
     73 #define DPRINTF(x)
     74 #define DPRINTFN(n,x)
     75 #endif
     76 
     77 #define USB_MEM_SMALL 64
     78 #define USB_MEM_CHUNKS 64
     79 #define USB_MEM_BLOCK (USB_MEM_SMALL * USB_MEM_CHUNKS)
     80 
     81 /* This struct is overlayed on free fragments. */
     82 struct usb_frag_dma {
     83 	usb_dma_block_t *block;
     84 	u_int offs;
     85 	LIST_ENTRY(usb_frag_dma) next;
     86 };
     87 
     88 Static usbd_status	usb_block_allocmem(bus_dma_tag_t, size_t, size_t,
     89 					   usb_dma_block_t **);
     90 Static void		usb_block_freemem(usb_dma_block_t *);
     91 
     92 LIST_HEAD(usb_dma_block_qh, usb_dma_block);
     93 Static struct usb_dma_block_qh usb_blk_freelist =
     94 	LIST_HEAD_INITIALIZER(usb_blk_freelist);
     95 kmutex_t usb_blk_lock;
     96 
     97 #ifdef DEBUG
     98 Static struct usb_dma_block_qh usb_blk_fraglist =
     99 	LIST_HEAD_INITIALIZER(usb_blk_fraglist);
    100 Static struct usb_dma_block_qh usb_blk_fulllist =
    101 	LIST_HEAD_INITIALIZER(usb_blk_fulllist);
    102 #endif
    103 Static u_int usb_blk_nfree = 0;
    104 /* XXX should have different free list for different tags (for speed) */
    105 Static LIST_HEAD(, usb_frag_dma) usb_frag_freelist =
    106 	LIST_HEAD_INITIALIZER(usb_frag_freelist);
    107 
    108 Static int usb_mem_init(void);
    109 
    110 Static int
    111 usb_mem_init(void)
    112 {
    113 
    114 	mutex_init(&usb_blk_lock, MUTEX_DEFAULT, IPL_NONE);
    115 	return 0;
    116 }
    117 
    118 Static usbd_status
    119 usb_block_allocmem(bus_dma_tag_t tag, size_t size, size_t align,
    120 		   usb_dma_block_t **dmap)
    121 {
    122 	usb_dma_block_t *b;
    123 	int error;
    124 
    125 	DPRINTFN(5, ("usb_block_allocmem: size=%zu align=%zu\n", size, align));
    126 
    127 #ifdef DIAGNOSTIC
    128 	if (cpu_intr_p()) {
    129 		printf("usb_block_allocmem: in interrupt context, size=%lu\n",
    130 		    (unsigned long) size);
    131 	}
    132 #endif
    133 
    134 	KASSERT(mutex_owned(&usb_blk_lock));
    135 
    136 	/* First check the free list. */
    137 	LIST_FOREACH(b, &usb_blk_freelist, next) {
    138 		if (b->tag == tag && b->size >= size && b->align >= align) {
    139 			LIST_REMOVE(b, next);
    140 			usb_blk_nfree--;
    141 			*dmap = b;
    142 			DPRINTFN(6,("usb_block_allocmem: free list size=%zu\n",
    143 			    b->size));
    144 			return (USBD_NORMAL_COMPLETION);
    145 		}
    146 	}
    147 
    148 #ifdef DIAGNOSTIC
    149 	if (cpu_intr_p()) {
    150 		printf("usb_block_allocmem: in interrupt context, failed\n");
    151 		return (USBD_NOMEM);
    152 	}
    153 #endif
    154 
    155 	DPRINTFN(6, ("usb_block_allocmem: no free\n"));
    156 	b = malloc(sizeof *b, M_USB, M_NOWAIT | M_ZERO);
    157 	if (b == NULL)
    158 		return (USBD_NOMEM);
    159 
    160 	b->tag = tag;
    161 	b->size = size;
    162 	b->align = align;
    163 	error = bus_dmamem_alloc(tag, b->size, align, 0,
    164 				 b->segs, __arraycount(b->segs),
    165 				 &b->nsegs, BUS_DMA_NOWAIT);
    166 	if (error)
    167 		goto free0;
    168 
    169 	error = bus_dmamem_map(tag, b->segs, b->nsegs, b->size,
    170 			       &b->kaddr, BUS_DMA_NOWAIT|BUS_DMA_COHERENT);
    171 	if (error)
    172 		goto free1;
    173 
    174 	error = bus_dmamap_create(tag, b->size, 1, b->size,
    175 				  0, BUS_DMA_NOWAIT, &b->map);
    176 	if (error)
    177 		goto unmap;
    178 
    179 	error = bus_dmamap_load(tag, b->map, b->kaddr, b->size, NULL,
    180 				BUS_DMA_NOWAIT);
    181 	if (error)
    182 		goto destroy;
    183 
    184 	*dmap = b;
    185 #ifdef USB_FRAG_DMA_WORKAROUND
    186 	memset(b->kaddr, 0, b->size);
    187 #endif
    188 	return (USBD_NORMAL_COMPLETION);
    189 
    190  destroy:
    191 	bus_dmamap_destroy(tag, b->map);
    192  unmap:
    193 	bus_dmamem_unmap(tag, b->kaddr, b->size);
    194  free1:
    195 	bus_dmamem_free(tag, b->segs, b->nsegs);
    196  free0:
    197 	free(b, M_USB);
    198 	return (USBD_NOMEM);
    199 }
    200 
    201 #if 0
    202 void
    203 usb_block_real_freemem(usb_dma_block_t *b)
    204 {
    205 #ifdef DIAGNOSTIC
    206 	if (cpu_intr_p()) {
    207 		printf("usb_block_real_freemem: in interrupt context\n");
    208 		return;
    209 	}
    210 #endif
    211 	bus_dmamap_unload(b->tag, b->map);
    212 	bus_dmamap_destroy(b->tag, b->map);
    213 	bus_dmamem_unmap(b->tag, b->kaddr, b->size);
    214 	bus_dmamem_free(b->tag, b->segs, b->nsegs);
    215 	free(p, M_USB);
    216 }
    217 #endif
    218 
    219 #ifdef DEBUG
    220 static bool
    221 usb_valid_block_p(usb_dma_block_t *b, struct usb_dma_block_qh *qh)
    222 {
    223 	usb_dma_block_t *xb;
    224 	LIST_FOREACH(xb, qh, next) {
    225 		if (xb == b)
    226 			return true;
    227 	}
    228 	return false;
    229 }
    230 #endif
    231 
    232 /*
    233  * Do not free the memory unconditionally since we might be called
    234  * from an interrupt context and that is BAD.
    235  * XXX when should we really free?
    236  */
    237 Static void
    238 usb_block_freemem(usb_dma_block_t *b)
    239 {
    240 
    241 	KASSERT(mutex_owned(&usb_blk_lock));
    242 
    243 	DPRINTFN(6, ("usb_block_freemem: size=%zu\n", b->size));
    244 #ifdef DEBUG
    245 	LIST_REMOVE(b, next);
    246 #endif
    247 	LIST_INSERT_HEAD(&usb_blk_freelist, b, next);
    248 	usb_blk_nfree++;
    249 }
    250 
    251 usbd_status
    252 usb_allocmem(usbd_bus_handle bus, size_t size, size_t align, usb_dma_t *p)
    253 {
    254 	bus_dma_tag_t tag = bus->dmatag;
    255 	usbd_status err;
    256 	struct usb_frag_dma *f;
    257 	usb_dma_block_t *b;
    258 	int i;
    259 	static ONCE_DECL(init_control);
    260 
    261 	RUN_ONCE(&init_control, usb_mem_init);
    262 
    263 	/* If the request is large then just use a full block. */
    264 	if (size > USB_MEM_SMALL || align > USB_MEM_SMALL) {
    265 		DPRINTFN(1, ("usb_allocmem: large alloc %d\n", (int)size));
    266 		size = (size + USB_MEM_BLOCK - 1) & ~(USB_MEM_BLOCK - 1);
    267 		mutex_enter(&usb_blk_lock);
    268 		err = usb_block_allocmem(tag, size, align, &p->block);
    269 		if (!err) {
    270 #ifdef DEBUG
    271 			LIST_INSERT_HEAD(&usb_blk_fulllist, p->block, next);
    272 #endif
    273 			p->block->flags = USB_DMA_FULLBLOCK;
    274 			p->offs = 0;
    275 		}
    276 		mutex_exit(&usb_blk_lock);
    277 		return (err);
    278 	}
    279 
    280 	mutex_enter(&usb_blk_lock);
    281 	/* Check for free fragments. */
    282 	LIST_FOREACH(f, &usb_frag_freelist, next) {
    283 		KDASSERTMSG(usb_valid_block_p(f->block, &usb_blk_fraglist),
    284 		    "%s: usb frag %p: unknown block pointer %p",
    285 		     __func__, f, f->block);
    286 		if (f->block->tag == tag)
    287 			break;
    288 	}
    289 	if (f == NULL) {
    290 		DPRINTFN(1, ("usb_allocmem: adding fragments\n"));
    291 		err = usb_block_allocmem(tag, USB_MEM_BLOCK, USB_MEM_SMALL,&b);
    292 		if (err) {
    293 			mutex_exit(&usb_blk_lock);
    294 			return (err);
    295 		}
    296 #ifdef DEBUG
    297 		LIST_INSERT_HEAD(&usb_blk_fraglist, b, next);
    298 #endif
    299 		b->flags = 0;
    300 		for (i = 0; i < USB_MEM_BLOCK; i += USB_MEM_SMALL) {
    301 			f = (struct usb_frag_dma *)((char *)b->kaddr + i);
    302 			f->block = b;
    303 			f->offs = i;
    304 			LIST_INSERT_HEAD(&usb_frag_freelist, f, next);
    305 #ifdef USB_FRAG_DMA_WORKAROUND
    306 			i += 1 * USB_MEM_SMALL;
    307 #endif
    308 		}
    309 		f = LIST_FIRST(&usb_frag_freelist);
    310 	}
    311 	p->block = f->block;
    312 	p->offs = f->offs;
    313 #ifdef USB_FRAG_DMA_WORKAROUND
    314 	p->offs += USB_MEM_SMALL;
    315 #endif
    316 	p->block->flags &= ~USB_DMA_RESERVE;
    317 	LIST_REMOVE(f, next);
    318 	mutex_exit(&usb_blk_lock);
    319 	DPRINTFN(5, ("usb_allocmem: use frag=%p size=%d\n", f, (int)size));
    320 	return (USBD_NORMAL_COMPLETION);
    321 }
    322 
    323 void
    324 usb_freemem(usbd_bus_handle bus, usb_dma_t *p)
    325 {
    326 	struct usb_frag_dma *f;
    327 
    328 	mutex_enter(&usb_blk_lock);
    329 	if (p->block->flags & USB_DMA_FULLBLOCK) {
    330 		KDASSERTMSG(usb_valid_block_p(p->block, &usb_blk_fulllist),
    331 		    "%s: dma %p: invalid block pointer %p",
    332 		     __func__, p, p->block);
    333 		DPRINTFN(1, ("usb_freemem: large free\n"));
    334 		usb_block_freemem(p->block);
    335 		mutex_exit(&usb_blk_lock);
    336 		return;
    337 	}
    338 	KDASSERTMSG(usb_valid_block_p(p->block, &usb_blk_fraglist),
    339 	    "%s: dma %p: invalid block pointer %p",
    340 	     __func__, p, p->block);
    341 	//usb_syncmem(p, 0, USB_MEM_SMALL, BUS_DMASYNC_POSTREAD);
    342 	f = KERNADDR(p, 0);
    343 #ifdef USB_FRAG_DMA_WORKAROUND
    344 	f = (void *)((uintptr_t)f - USB_MEM_SMALL);
    345 #endif
    346 	f->block = p->block;
    347 	f->offs = p->offs;
    348 #ifdef USB_FRAG_DMA_WORKAROUND
    349 	f->offs -= USB_MEM_SMALL;
    350 #endif
    351 	LIST_INSERT_HEAD(&usb_frag_freelist, f, next);
    352 	mutex_exit(&usb_blk_lock);
    353 	DPRINTFN(5, ("usb_freemem: frag=%p\n", f));
    354 }
    355 
    356 void
    357 usb_syncmem(usb_dma_t *p, bus_addr_t offset, bus_size_t len, int ops)
    358 {
    359 	bus_dmamap_sync(p->block->tag, p->block->map, p->offs + offset,
    360 	    len, ops);
    361 }
    362 
    363 
    364 usbd_status
    365 usb_reserve_allocm(struct usb_dma_reserve *rs, usb_dma_t *dma, u_int32_t size)
    366 {
    367 	int error;
    368 	u_long start;
    369 	bus_addr_t baddr;
    370 
    371 	if (rs->vaddr == 0 || size > USB_MEM_RESERVE)
    372 		return USBD_NOMEM;
    373 
    374 	dma->block = malloc(sizeof *dma->block, M_USB, M_ZERO | M_NOWAIT);
    375 	if (dma->block == NULL)
    376 		return USBD_NOMEM;
    377 
    378 	error = extent_alloc(rs->extent, size, PAGE_SIZE, 0,
    379 	    EX_NOWAIT, &start);
    380 
    381 	if (error != 0) {
    382 		aprint_error_dev(rs->dv,
    383 		    "usb_reserve_allocm of size %u failed (error %d)\n",
    384 		    size, error);
    385 		return USBD_NOMEM;
    386 	}
    387 
    388 	baddr = start;
    389 	dma->offs = baddr - rs->paddr;
    390 	dma->block->flags = USB_DMA_RESERVE;
    391 	dma->block->align = PAGE_SIZE;
    392 	dma->block->size = size;
    393 	dma->block->nsegs = 1;
    394 	/* XXX segs appears to be unused */
    395 	dma->block->segs[0] = rs->map->dm_segs[0];
    396 	dma->block->map = rs->map;
    397 	dma->block->kaddr = rs->vaddr;
    398 	dma->block->tag = rs->dtag;
    399 
    400 	return USBD_NORMAL_COMPLETION;
    401 }
    402 
    403 void
    404 usb_reserve_freem(struct usb_dma_reserve *rs, usb_dma_t *dma)
    405 {
    406 	int error;
    407 
    408 	error = extent_free(rs->extent,
    409 	    (u_long)(rs->paddr + dma->offs), dma->block->size, 0);
    410 	free(dma->block, M_USB);
    411 }
    412 
    413 int
    414 usb_setup_reserve(device_t dv, struct usb_dma_reserve *rs, bus_dma_tag_t dtag,
    415 		  size_t size)
    416 {
    417 	int error, nseg;
    418 	bus_dma_segment_t seg;
    419 
    420 	rs->dtag = dtag;
    421 	rs->size = size;
    422 	rs->dv = dv;
    423 
    424 	error = bus_dmamem_alloc(dtag, USB_MEM_RESERVE, PAGE_SIZE, 0,
    425 	    &seg, 1, &nseg, BUS_DMA_NOWAIT);
    426 	if (error != 0)
    427 		return error;
    428 
    429 	error = bus_dmamem_map(dtag, &seg, nseg, USB_MEM_RESERVE,
    430 	    &rs->vaddr, BUS_DMA_NOWAIT|BUS_DMA_COHERENT);
    431 	if (error != 0)
    432 		goto freeit;
    433 
    434 	error = bus_dmamap_create(dtag, USB_MEM_RESERVE, 1,
    435 	    USB_MEM_RESERVE, 0, BUS_DMA_NOWAIT, &rs->map);
    436 	if (error != 0)
    437 		goto unmap;
    438 
    439 	error = bus_dmamap_load(dtag, rs->map, rs->vaddr, USB_MEM_RESERVE,
    440 	    NULL, BUS_DMA_NOWAIT);
    441 	if (error != 0)
    442 		goto destroy;
    443 
    444 	rs->paddr = rs->map->dm_segs[0].ds_addr;
    445 	rs->extent = extent_create(device_xname(dv), (u_long)rs->paddr,
    446 	    (u_long)(rs->paddr + USB_MEM_RESERVE - 1), 0, 0, 0);
    447 	if (rs->extent == NULL) {
    448 		rs->vaddr = 0;
    449 		return ENOMEM;
    450 	}
    451 
    452 	return 0;
    453 
    454  destroy:
    455 	bus_dmamap_destroy(dtag, rs->map);
    456  unmap:
    457 	bus_dmamem_unmap(dtag, rs->vaddr, size);
    458  freeit:
    459 	bus_dmamem_free(dtag, &seg, nseg);
    460 
    461 	rs->vaddr = 0;
    462 
    463 	return error;
    464 }
    465