sys/arm/arm/busdma_machdep.c

   1 /*-
   2  * Copyright (c) 2004 Olivier Houchard
   3  * Copyright (c) 2002 Peter Grehan
   4  * Copyright (c) 1997, 1998 Justin T. Gibbs.
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions, and the following disclaimer,
  12  *    without modification, immediately at the beginning of the file.
  13  * 2. The name of the author may not be used to endorse or promote products
  14  *    derived from this software without specific prior written permission.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
  20  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26  * SUCH DAMAGE.
  27  *
  28  *   From i386/busdma_machdep.c,v 1.26 2002/04/19 22:58:09 alfred
  29  */
  30
  31 #include <sys/cdefs.h>
  32 __FBSDID("$FreeBSD$");
  33
  34 /*
  35  * MacPPC bus dma support routines
  36  */
  37
  38 #define _ARM32_BUS_DMA_PRIVATE
  39 #include <sys/param.h>
  40 #include <sys/systm.h>
  41 #include <sys/malloc.h>
  42 #include <sys/bus.h>
  43 #include <sys/interrupt.h>
  44 #include <sys/lock.h>
  45 #include <sys/proc.h>
  46 #include <sys/mutex.h>
  47 #include <sys/mbuf.h>
  48 #include <sys/uio.h>
  49 #include <sys/ktr.h>
  50 #include <sys/kernel.h>
  51
  52 #include <vm/vm.h>
  53 #include <vm/vm_page.h>
  54 #include <vm/vm_map.h>
  55
  56 #include <machine/atomic.h>
  57 #include <machine/bus.h>
  58 #include <machine/cpufunc.h>
  59
  60 struct bus_dma_tag {
  61         bus_dma_tag_t           parent;
  62         bus_size_t              alignment;
  63         bus_size_t              boundary;
  64         bus_addr_t              lowaddr;
  65         bus_addr_t              highaddr;
  66         bus_dma_filter_t        *filter;
  67         void                    *filterarg;
  68         bus_size_t              maxsize;
  69         u_int                   nsegments;
  70         bus_size_t              maxsegsz;
  71         int                     flags;
  72         int                     ref_count;
  73         int                     map_count;
  74         bus_dma_lock_t          *lockfunc;
  75         void                    *lockfuncarg;
  76         /*
  77          * DMA range for this tag.  If the page doesn't fall within
  78          * one of these ranges, an error is returned.  The caller
  79          * may then decide what to do with the transfer.  If the
  80          * range pointer is NULL, it is ignored.
  81          */
  82         struct arm32_dma_range  *ranges;
  83         int                     _nranges;
  84 };
  85
  86 #define DMAMAP_LINEAR           0x1
  87 #define DMAMAP_MBUF             0x2
  88 #define DMAMAP_UIO              0x4
  89 #define DMAMAP_ALLOCATED        0x10
  90 #define DMAMAP_TYPE_MASK        (DMAMAP_LINEAR|DMAMAP_MBUF|DMAMAP_UIO)
  91 #define DMAMAP_COHERENT         0x8
  92 struct bus_dmamap {
  93         bus_dma_tag_t   dmat;
  94         int             flags;
  95         void            *buffer;
  96         void            *origbuffer;
  97         void            *allocbuffer;
  98         TAILQ_ENTRY(bus_dmamap) freelist;
  99         int             len;
 100 };
 101
 102 static TAILQ_HEAD(,bus_dmamap) dmamap_freelist =
 103         TAILQ_HEAD_INITIALIZER(dmamap_freelist);
 104
 105 #define BUSDMA_STATIC_MAPS      500
 106 static struct bus_dmamap map_pool[BUSDMA_STATIC_MAPS];
 107
 108 static struct mtx busdma_mtx;
 109
 110 MTX_SYSINIT(busdma_mtx, &busdma_mtx, "busdma lock", MTX_DEF);
 111
 112 static void
 113 arm_dmamap_freelist_init(void *dummy)
 114 {
 115         int i;
 116
 117         for (i = 0; i < BUSDMA_STATIC_MAPS; i++)
 118                 TAILQ_INSERT_HEAD(&dmamap_freelist, &map_pool[i], freelist);
 119 }
 120
 121 SYSINIT(busdma, SI_SUB_VM, SI_ORDER_ANY, arm_dmamap_freelist_init, NULL);
 122
 123 /*
 124  * Check to see if the specified page is in an allowed DMA range.
 125  */
 126
 127 static __inline int
 128 bus_dmamap_load_buffer(bus_dma_tag_t dmat, bus_dma_segment_t *segs,
 129     bus_dmamap_t map, void *buf, bus_size_t buflen, struct pmap *pmap,
 130     int flags, vm_offset_t *lastaddrp, int *segp);
 131
 132 static __inline struct arm32_dma_range *
 133 _bus_dma_inrange(struct arm32_dma_range *ranges, int nranges,
 134     bus_addr_t curaddr)
 135 {
 136         struct arm32_dma_range *dr;
 137         int i;
 138
 139         for (i = 0, dr = ranges; i < nranges; i++, dr++) {
 140                 if (curaddr >= dr->dr_sysbase &&
 141                     round_page(curaddr) <= (dr->dr_sysbase + dr->dr_len))
 142                         return (dr);
 143         }
 144
 145         return (NULL);
 146 }
 147 /*
 148  * Convenience function for manipulating driver locks from busdma (during
 149  * busdma_swi, for example).  Drivers that don't provide their own locks
 150  * should specify &Giant to dmat->lockfuncarg.  Drivers that use their own
 151  * non-mutex locking scheme don't have to use this at all.
 152  */
 153 void
 154 busdma_lock_mutex(void *arg, bus_dma_lock_op_t op)
 155 {
 156         struct mtx *dmtx;
 157
 158         dmtx = (struct mtx *)arg;
 159         switch (op) {
 160         case BUS_DMA_LOCK:
 161                 mtx_lock(dmtx);
 162                 break;
 163         case BUS_DMA_UNLOCK:
 164                 mtx_unlock(dmtx);
 165                 break;
 166         default:
 167                 panic("Unknown operation 0x%x for busdma_lock_mutex!", op);
 168         }
 169 }
 170
 171 /*
 172  * dflt_lock should never get called.  It gets put into the dma tag when
 173  * lockfunc == NULL, which is only valid if the maps that are associated
 174  * with the tag are meant to never be defered.
 175  * XXX Should have a way to identify which driver is responsible here.
 176  */
 177 static void
 178 dflt_lock(void *arg, bus_dma_lock_op_t op)
 179 {
 180 #ifdef INVARIANTS
 181         panic("driver error: busdma dflt_lock called");
 182 #else
 183         printf("DRIVER_ERROR: busdma dflt_lock called\n");
 184 #endif
 185 }
 186
 187 static __inline bus_dmamap_t
 188 _busdma_alloc_dmamap(void)
 189 {
 190         bus_dmamap_t map;
 191
 192         mtx_lock(&busdma_mtx);
 193         map = TAILQ_FIRST(&dmamap_freelist);
 194         if (map)
 195                 TAILQ_REMOVE(&dmamap_freelist, map, freelist);
 196         mtx_unlock(&busdma_mtx);
 197         if (!map) {
 198                 map = malloc(sizeof(*map), M_DEVBUF, M_NOWAIT);
 199                 if (map)
 200                         map->flags = DMAMAP_ALLOCATED;
 201         } else
 202                 map->flags = 0;
 203         return (map);
 204 }
 205
 206 static __inline void
 207 _busdma_free_dmamap(bus_dmamap_t map)
 208 {
 209         if (map->flags & DMAMAP_ALLOCATED)
 210                 free(map, M_DEVBUF);
 211         else {
 212                 mtx_lock(&busdma_mtx);
 213                 TAILQ_INSERT_HEAD(&dmamap_freelist, map, freelist);
 214                 mtx_unlock(&busdma_mtx);
 215         }
 216 }
 217
 218 /*
 219  * Allocate a device specific dma_tag.
 220  */
 221 #define SEG_NB 1024
 222
 223 int
 224 bus_dma_tag_create(bus_dma_tag_t parent, bus_size_t alignment,
 225                    bus_size_t boundary, bus_addr_t lowaddr,
 226                    bus_addr_t highaddr, bus_dma_filter_t *filter,
 227                    void *filterarg, bus_size_t maxsize, int nsegments,
 228                    bus_size_t maxsegsz, int flags, bus_dma_lock_t *lockfunc,
 229                    void *lockfuncarg, bus_dma_tag_t *dmat)
 230 {
 231         bus_dma_tag_t newtag;
 232         int error = 0;
 233         /* Return a NULL tag on failure */
 234         *dmat = NULL;
 235
 236         newtag = (bus_dma_tag_t)malloc(sizeof(*newtag), M_DEVBUF, M_NOWAIT);
 237         if (newtag == NULL) {
 238                 CTR4(KTR_BUSDMA, "%s returned tag %p tag flags 0x%x error %d",
 239                     __func__, newtag, 0, error);
 240                 return (ENOMEM);
 241         }
 242
 243         newtag->parent = parent;
 244         newtag->alignment = alignment;
 245         newtag->boundary = boundary;
 246         newtag->lowaddr = trunc_page((vm_offset_t)lowaddr) + (PAGE_SIZE - 1);
 247         newtag->highaddr = trunc_page((vm_offset_t)highaddr) + (PAGE_SIZE - 1);
 248         newtag->filter = filter;
 249         newtag->filterarg = filterarg;
 250         newtag->maxsize = maxsize;
 251         newtag->nsegments = nsegments;
 252         newtag->maxsegsz = maxsegsz;
 253         newtag->flags = flags;
 254         newtag->ref_count = 1; /* Count ourself */
 255         newtag->map_count = 0;
 256         newtag->ranges = bus_dma_get_range();
 257         newtag->_nranges = bus_dma_get_range_nb();
 258         if (lockfunc != NULL) {
 259                 newtag->lockfunc = lockfunc;
 260                 newtag->lockfuncarg = lockfuncarg;
 261         } else {
 262                 newtag->lockfunc = dflt_lock;
 263                 newtag->lockfuncarg = NULL;
 264         }
 265         /*
 266          * Take into account any restrictions imposed by our parent tag
 267          */
 268         if (parent != NULL) {
 269                 newtag->lowaddr = min(parent->lowaddr, newtag->lowaddr);
 270                 newtag->highaddr = max(parent->highaddr, newtag->highaddr);
 271                 if (newtag->boundary == 0)
 272                         newtag->boundary = parent->boundary;
 273                 else if (parent->boundary != 0)
 274                         newtag->boundary = min(parent->boundary,
 275                                                newtag->boundary);
 276                 if (newtag->filter == NULL) {
 277                         /*
 278                          * Short circuit looking at our parent directly
 279                          * since we have encapsulated all of its information
 280                          */
 281                         newtag->filter = parent->filter;
 282                         newtag->filterarg = parent->filterarg;
 283                         newtag->parent = parent->parent;
 284                 }
 285                 if (newtag->parent != NULL)
 286                         atomic_add_int(&parent->ref_count, 1);
 287         }
 288
 289         *dmat = newtag;
 290         CTR4(KTR_BUSDMA, "%s returned tag %p tag flags 0x%x error %d",
 291             __func__, newtag, (newtag != NULL ? newtag->flags : 0), error);
 292
 293         return (error);
 294 }
 295
 296 int
 297 bus_dma_tag_destroy(bus_dma_tag_t dmat)
 298 {
 299 #ifdef KTR
 300         bus_dma_tag_t dmat_copy = dmat;
 301 #endif
 302
 303         if (dmat != NULL) {
 304
 305                 if (dmat->map_count != 0)
 306                         return (EBUSY);
 307
 308                 while (dmat != NULL) {
 309                         bus_dma_tag_t parent;
 310
 311                         parent = dmat->parent;
 312                         atomic_subtract_int(&dmat->ref_count, 1);
 313                         if (dmat->ref_count == 0) {
 314                                 free(dmat, M_DEVBUF);
 315                                 /*
 316                                  * Last reference count, so
 317                                  * release our reference
 318                                  * count on our parent.
 319                                  */
 320                                 dmat = parent;
 321                         } else
 322                                 dmat = NULL;
 323                 }
 324         }
 325         CTR2(KTR_BUSDMA, "%s tag %p", __func__, dmat_copy);
 326
 327         return (0);
 328 }
 329
 330 /*
 331  * Allocate a handle for mapping from kva/uva/physical
 332  * address space into bus device space.
 333  */
 334 int
 335 bus_dmamap_create(bus_dma_tag_t dmat, int flags, bus_dmamap_t *mapp)
 336 {
 337         bus_dmamap_t newmap;
 338 #ifdef KTR
 339         int error = 0;
 340 #endif
 341
 342         newmap = _busdma_alloc_dmamap();
 343         if (newmap == NULL) {
 344                 CTR3(KTR_BUSDMA, "%s: tag %p error %d", __func__, dmat, ENOMEM);
 345                 return (ENOMEM);
 346         }
 347         *mapp = newmap;
 348         newmap->dmat = dmat;
 349         newmap->allocbuffer = NULL;
 350         dmat->map_count++;
 351
 352         CTR4(KTR_BUSDMA, "%s: tag %p tag flags 0x%x error %d",
 353             __func__, dmat, dmat->flags, error);
 354
 355         return (0);
 356 }
 357
 358 /*
 359  * Destroy a handle for mapping from kva/uva/physical
 360  * address space into bus device space.
 361  */
 362 int
 363 bus_dmamap_destroy(bus_dma_tag_t dmat, bus_dmamap_t map)
 364 {
 365
 366         _busdma_free_dmamap(map);
 367         dmat->map_count--;
 368         CTR2(KTR_BUSDMA, "%s: tag %p error 0", __func__, dmat);
 369         return (0);
 370 }
 371
 372 /*
 373  * Allocate a piece of memory that can be efficiently mapped into
 374  * bus device space based on the constraints lited in the dma tag.
 375  * A dmamap to for use with dmamap_load is also allocated.
 376  */
 377 int
 378 bus_dmamem_alloc(bus_dma_tag_t dmat, void** vaddr, int flags,
 379                  bus_dmamap_t *mapp)
 380 {
 381         bus_dmamap_t newmap = NULL;
 382
 383         int mflags;
 384
 385         if (flags & BUS_DMA_NOWAIT)
 386                 mflags = M_NOWAIT;
 387         else
 388                 mflags = M_WAITOK;
 389         if (flags & BUS_DMA_ZERO)
 390                 mflags |= M_ZERO;
 391
 392         newmap = _busdma_alloc_dmamap();
 393         if (newmap == NULL) {
 394                 CTR4(KTR_BUSDMA, "%s: tag %p tag flags 0x%x error %d",
 395                     __func__, dmat, dmat->flags, ENOMEM);
 396                 return (ENOMEM);
 397         }
 398         dmat->map_count++;
 399         *mapp = newmap;
 400         newmap->dmat = dmat;
 401
 402         if (dmat->maxsize <= PAGE_SIZE) {
 403                 *vaddr = malloc(dmat->maxsize, M_DEVBUF, mflags);
 404         } else {
 405                 /*
 406                  * XXX Use Contigmalloc until it is merged into this facility
 407                  *     and handles multi-seg allocations.  Nobody is doing
 408                  *     multi-seg allocations yet though.
 409                  */
 410                 *vaddr = contigmalloc(dmat->maxsize, M_DEVBUF, mflags,
 411                     0ul, dmat->lowaddr, dmat->alignment? dmat->alignment : 1ul,
 412                     dmat->boundary);
 413         }
 414         if (*vaddr == NULL) {
 415                 if (newmap != NULL) {
 416                         _busdma_free_dmamap(newmap);
 417                         dmat->map_count--;
 418                 }
 419                 *mapp = NULL;
 420                 return (ENOMEM);
 421         }
 422         if (flags & BUS_DMA_COHERENT) {
 423                 void *tmpaddr = arm_remap_nocache(
 424                     (void *)((vm_offset_t)*vaddr &~ PAGE_MASK),
 425                     dmat->maxsize + ((vm_offset_t)*vaddr & PAGE_MASK));
 426
 427                 if (tmpaddr) {
 428                         tmpaddr = (void *)((vm_offset_t)(tmpaddr) +
 429                             ((vm_offset_t)*vaddr & PAGE_MASK));
 430                         newmap->origbuffer = *vaddr;
 431                         newmap->allocbuffer = tmpaddr;
 432                         cpu_idcache_wbinv_range((vm_offset_t)*vaddr,
 433                             dmat->maxsize);
 434                         *vaddr = tmpaddr;
 435                 } else
 436                         newmap->origbuffer = newmap->allocbuffer = NULL;
 437         } else
 438                 newmap->origbuffer = newmap->allocbuffer = NULL;
 439         return (0);
 440 }
 441
 442 /*
 443  * Free a piece of memory and it's allocated dmamap, that was allocated
 444  * via bus_dmamem_alloc.  Make the same choice for free/contigfree.
 445  */
 446 void
 447 bus_dmamem_free(bus_dma_tag_t dmat, void *vaddr, bus_dmamap_t map)
 448 {
 449         if (map->allocbuffer) {
 450                 KASSERT(map->allocbuffer == vaddr,
 451                     ("Trying to freeing the wrong DMA buffer"));
 452                 vaddr = map->origbuffer;
 453                 arm_unmap_nocache(map->allocbuffer, dmat->maxsize);
 454         }
 455         if (dmat->maxsize <= PAGE_SIZE)
 456                 free(vaddr, M_DEVBUF);
 457         else {
 458                 contigfree(vaddr, dmat->maxsize, M_DEVBUF);
 459         }
 460         dmat->map_count--;
 461         _busdma_free_dmamap(map);
 462         CTR3(KTR_BUSDMA, "%s: tag %p flags 0x%x", __func__, dmat, dmat->flags);
 463 }
 464
 465 /*
 466  * Utility function to load a linear buffer.  lastaddrp holds state
 467  * between invocations (for multiple-buffer loads).  segp contains
 468  * the starting segment on entrance, and the ending segment on exit.
 469  * first indicates if this is the first invocation of this function.
 470  */
 471 static __inline int
 472 bus_dmamap_load_buffer(bus_dma_tag_t dmat, bus_dma_segment_t *segs,
 473     bus_dmamap_t map, void *buf, bus_size_t buflen, struct pmap *pmap,
 474     int flags, vm_offset_t *lastaddrp, int *segp)
 475 {
 476         bus_size_t sgsize;
 477         bus_addr_t curaddr, lastaddr, baddr, bmask;
 478         vm_offset_t vaddr = (vm_offset_t)buf;
 479         int seg;
 480         int error = 0;
 481         pd_entry_t *pde;
 482         pt_entry_t pte;
 483         pt_entry_t *ptep;
 484
 485         lastaddr = *lastaddrp;
 486         bmask = ~(dmat->boundary - 1);
 487
 488         CTR3(KTR_BUSDMA, "lowaddr= %d boundary= %d, "
 489             "alignment= %d", dmat->lowaddr, dmat->boundary, dmat->alignment);
 490
 491         for (seg = *segp; buflen > 0 ; ) {
 492                 /*
 493                  * Get the physical address for this segment.
 494                  *
 495                  * XXX Don't support checking for coherent mappings
 496                  * XXX in user address space.
 497                  */
 498                 if (__predict_true(pmap == pmap_kernel())) {
 499                         (void) pmap_get_pde_pte(pmap, vaddr, &pde, &ptep);
 500                         if (__predict_false(pmap_pde_section(pde))) {
 501                                 curaddr = (*pde & L1_S_FRAME) |
 502                                     (vaddr & L1_S_OFFSET);
 503                                 if (*pde & L1_S_CACHE_MASK) {
 504                                         map->flags &=
 505                                             ~DMAMAP_COHERENT;
 506                                 }
 507                         } else {
 508                                 pte = *ptep;
 509                                 KASSERT((pte & L2_TYPE_MASK) != L2_TYPE_INV,
 510                                     ("INV type"));
 511                                 if (__predict_false((pte & L2_TYPE_MASK)
 512                                                     == L2_TYPE_L)) {
 513                                         curaddr = (pte & L2_L_FRAME) |
 514                                             (vaddr & L2_L_OFFSET);
 515                                         if (pte & L2_L_CACHE_MASK) {
 516                                                 map->flags &=
 517                                                     ~DMAMAP_COHERENT;
 518
 519                                         }
 520                                 } else {
 521                                         curaddr = (pte & L2_S_FRAME) |
 522                                             (vaddr & L2_S_OFFSET);
 523                                         if (pte & L2_S_CACHE_MASK) {
 524                                                 map->flags &=
 525                                                     ~DMAMAP_COHERENT;
 526                                         }
 527                                 }
 528                         }
 529                 } else {
 530                         curaddr = pmap_extract(pmap, vaddr);
 531                         map->flags &= ~DMAMAP_COHERENT;
 532                 }
 533
 534                 if (dmat->ranges) {
 535                         struct arm32_dma_range *dr;
 536
 537                         dr = _bus_dma_inrange(dmat->ranges, dmat->_nranges,
 538                             curaddr);
 539                         if (dr == NULL)
 540                                 return (EINVAL);
 541                         /*
 542                          * In a valid DMA range.  Translate the physical
 543                          * memory address to an address in the DMA window.
 544                          */
 545                         curaddr = (curaddr - dr->dr_sysbase) + dr->dr_busbase;
 546
 547                 }
 548                 /*
 549                  * Compute the segment size, and adjust counts.
 550                  */
 551                 sgsize = PAGE_SIZE - ((u_long)curaddr & PAGE_MASK);
 552                 if (buflen < sgsize)
 553                         sgsize = buflen;
 554
 555                 /*
 556                  * Make sure we don't cross any boundaries.
 557                  */
 558                 if (dmat->boundary > 0) {
 559                         baddr = (curaddr + dmat->boundary) & bmask;
 560                         if (sgsize > (baddr - curaddr))
 561                                 sgsize = (baddr - curaddr);
 562                 }
 563
 564                 /*
 565                  * Insert chunk into a segment, coalescing with
 566                  * the previous segment if possible.
 567                  */
 568                 if (seg >= 0 && curaddr == lastaddr &&
 569                     (segs[seg].ds_len + sgsize) <= dmat->maxsegsz &&
 570                     (dmat->boundary == 0 ||
 571                      (segs[seg].ds_addr & bmask) ==
 572                      (curaddr & bmask))) {
 573                         segs[seg].ds_len += sgsize;
 574                         goto segdone;
 575                 } else {
 576                         if (++seg >= dmat->nsegments)
 577                                 break;
 578                         segs[seg].ds_addr = curaddr;
 579                         segs[seg].ds_len = sgsize;
 580                 }
 581                 if (error)
 582                         break;
 583 segdone:
 584                 lastaddr = curaddr + sgsize;
 585                 vaddr += sgsize;
 586                 buflen -= sgsize;
 587         }
 588
 589         *segp = seg;
 590         *lastaddrp = lastaddr;
 591
 592         /*
 593          * Did we fit?
 594          */
 595         if (buflen != 0)
 596                 error = EFBIG; /* XXX better return value here? */
 597         return (error);
 598 }
 599
 600 /*
 601  * Map the buffer buf into bus space using the dmamap map.
 602  */
 603 int
 604 bus_dmamap_load(bus_dma_tag_t dmat, bus_dmamap_t map, void *buf,
 605                 bus_size_t buflen, bus_dmamap_callback_t *callback,
 606                 void *callback_arg, int flags)
 607 {
 608         vm_offset_t     lastaddr = 0;
 609         int             error, nsegs = -1;
 610 #ifdef __CC_SUPPORTS_DYNAMIC_ARRAY_INIT
 611         bus_dma_segment_t dm_segments[dmat->nsegments];
 612 #else
 613         bus_dma_segment_t dm_segments[BUS_DMAMAP_NSEGS];
 614 #endif
 615
 616         KASSERT(dmat != NULL, ("dmatag is NULL"));
 617         KASSERT(map != NULL, ("dmamap is NULL"));
 618         map->flags &= ~DMAMAP_TYPE_MASK;
 619         map->flags |= DMAMAP_LINEAR|DMAMAP_COHERENT;
 620         map->buffer = buf;
 621         map->len = buflen;
 622         error = bus_dmamap_load_buffer(dmat,
 623             dm_segments, map, buf, buflen, kernel_pmap,
 624             flags, &lastaddr, &nsegs);
 625         if (error)
 626                 (*callback)(callback_arg, NULL, 0, error);
 627         else
 628                 (*callback)(callback_arg, dm_segments, nsegs + 1, error);
 629
 630         CTR5(KTR_BUSDMA, "%s: tag %p tag flags 0x%x error %d nsegs %d",
 631             __func__, dmat, dmat->flags, nsegs + 1, error);
 632
 633         return (0);
 634 }
 635
 636 /*
 637  * Like bus_dmamap_load(), but for mbufs.
 638  */
 639 int
 640 bus_dmamap_load_mbuf(bus_dma_tag_t dmat, bus_dmamap_t map, struct mbuf *m0,
 641                      bus_dmamap_callback2_t *callback, void *callback_arg,
 642                      int flags)
 643 {
 644 #ifdef __CC_SUPPORTS_DYNAMIC_ARRAY_INIT
 645         bus_dma_segment_t dm_segments[dmat->nsegments];
 646 #else
 647         bus_dma_segment_t dm_segments[BUS_DMAMAP_NSEGS];
 648 #endif
 649         int nsegs = -1, error = 0;
 650
 651         M_ASSERTPKTHDR(m0);
 652
 653         map->flags &= ~DMAMAP_TYPE_MASK;
 654         map->flags |= DMAMAP_MBUF | DMAMAP_COHERENT;
 655         map->buffer = m0;
 656         map->len = 0;
 657         if (m0->m_pkthdr.len <= dmat->maxsize) {
 658                 vm_offset_t lastaddr = 0;
 659                 struct mbuf *m;
 660
 661                 for (m = m0; m != NULL && error == 0; m = m->m_next) {
 662                         if (m->m_len > 0) {
 663                                 error = bus_dmamap_load_buffer(dmat,
 664                                     dm_segments, map, m->m_data, m->m_len,
 665                                     pmap_kernel(), flags, &lastaddr, &nsegs);
 666                                 map->len += m->m_len;
 667                         }
 668                 }
 669         } else {
 670                 error = EINVAL;
 671         }
 672
 673         if (error) {
 674                 /*
 675                  * force "no valid mappings" on error in callback.
 676                  */
 677                 (*callback)(callback_arg, dm_segments, 0, 0, error);
 678         } else {
 679                 (*callback)(callback_arg, dm_segments, nsegs + 1,
 680                     m0->m_pkthdr.len, error);
 681         }
 682         CTR5(KTR_BUSDMA, "%s: tag %p tag flags 0x%x error %d nsegs %d",
 683             __func__, dmat, dmat->flags, error, nsegs + 1);
 684
 685         return (error);
 686 }
 687
 688 int
 689 bus_dmamap_load_mbuf_sg(bus_dma_tag_t dmat, bus_dmamap_t map,
 690                         struct mbuf *m0, bus_dma_segment_t *segs, int *nsegs,
 691                         int flags)
 692 {
 693         int error = 0;
 694         M_ASSERTPKTHDR(m0);
 695
 696         flags |= BUS_DMA_NOWAIT;
 697         *nsegs = -1;
 698         map->flags &= ~DMAMAP_TYPE_MASK;
 699         map->flags |= DMAMAP_MBUF | DMAMAP_COHERENT;
 700         map->buffer = m0;
 701         map->len = 0;
 702         if (m0->m_pkthdr.len <= dmat->maxsize) {
 703                 vm_offset_t lastaddr = 0;
 704                 struct mbuf *m;
 705
 706                 for (m = m0; m != NULL && error == 0; m = m->m_next) {
 707                         if (m->m_len > 0) {
 708                                 error = bus_dmamap_load_buffer(dmat, segs, map,
 709                                                 m->m_data, m->m_len,
 710                                                 pmap_kernel(), flags, &lastaddr,
 711                                                 nsegs);
 712                                 map->len += m->m_len;
 713                         }
 714                 }
 715         } else {
 716                 error = EINVAL;
 717         }
 718
 719         /* XXX FIXME: Having to increment nsegs is really annoying */
 720         ++*nsegs;
 721         CTR5(KTR_BUSDMA, "%s: tag %p tag flags 0x%x error %d nsegs %d",
 722             __func__, dmat, dmat->flags, error, *nsegs);
 723         return (error);
 724 }
 725
 726 /*
 727  * Like bus_dmamap_load(), but for uios.
 728  */
 729 int
 730 bus_dmamap_load_uio(bus_dma_tag_t dmat, bus_dmamap_t map, struct uio *uio,
 731     bus_dmamap_callback2_t *callback, void *callback_arg,
 732     int flags)
 733 {
 734         vm_offset_t lastaddr;
 735 #ifdef __CC_SUPPORTS_DYNAMIC_ARRAY_INIT
 736         bus_dma_segment_t dm_segments[dmat->nsegments];
 737 #else
 738         bus_dma_segment_t dm_segments[BUS_DMAMAP_NSEGS];
 739 #endif
 740         int nsegs, i, error;
 741         bus_size_t resid;
 742         struct iovec *iov;
 743         struct pmap *pmap;
 744
 745         resid = uio->uio_resid;
 746         iov = uio->uio_iov;
 747         map->flags &= ~DMAMAP_TYPE_MASK;
 748         map->flags |= DMAMAP_UIO|DMAMAP_COHERENT;
 749         map->buffer = uio;
 750         map->len = 0;
 751
 752         if (uio->uio_segflg == UIO_USERSPACE) {
 753                 KASSERT(uio->uio_td != NULL,
 754                     ("bus_dmamap_load_uio: USERSPACE but no proc"));
 755                 pmap = vmspace_pmap(uio->uio_td->td_proc->p_vmspace);
 756         } else
 757                 pmap = kernel_pmap;
 758
 759         error = 0;
 760         nsegs = -1;
 761         for (i = 0; i < uio->uio_iovcnt && resid != 0 && !error; i++) {
 762                 /*
 763                  * Now at the first iovec to load.  Load each iovec
 764                  * until we have exhausted the residual count.
 765                  */
 766                 bus_size_t minlen =
 767                     resid < iov[i].iov_len ? resid : iov[i].iov_len;
 768                 caddr_t addr = (caddr_t) iov[i].iov_base;
 769
 770                 if (minlen > 0) {
 771                         error = bus_dmamap_load_buffer(dmat, dm_segments, map,
 772                             addr, minlen, pmap, flags, &lastaddr, &nsegs);
 773
 774                         map->len += minlen;
 775                         resid -= minlen;
 776                 }
 777         }
 778
 779         if (error) {
 780                 /*
 781                  * force "no valid mappings" on error in callback.
 782                  */
 783                 (*callback)(callback_arg, dm_segments, 0, 0, error);
 784         } else {
 785                 (*callback)(callback_arg, dm_segments, nsegs+1,
 786                     uio->uio_resid, error);
 787         }
 788
 789         CTR5(KTR_BUSDMA, "%s: tag %p tag flags 0x%x error %d nsegs %d",
 790             __func__, dmat, dmat->flags, error, nsegs + 1);
 791         return (error);
 792 }
 793
 794 /*
 795  * Release the mapping held by map.
 796  */
 797 void
 798 _bus_dmamap_unload(bus_dma_tag_t dmat, bus_dmamap_t map)
 799 {
 800         map->flags &= ~DMAMAP_TYPE_MASK;
 801         return;
 802 }
 803
 804 static __inline void
 805 bus_dmamap_sync_buf(void *buf, int len, bus_dmasync_op_t op)
 806 {
 807
 808         if (op & BUS_DMASYNC_PREWRITE)
 809                 cpu_dcache_wb_range((vm_offset_t)buf, len);
 810         if (op & BUS_DMASYNC_PREREAD) {
 811                 if ((vm_offset_t)buf & arm_dcache_align_mask)
 812                         cpu_dcache_wbinv_range((vm_offset_t)buf &
 813                             ~arm_dcache_align_mask, arm_dcache_align);
 814                 if (((vm_offset_t)buf + len) & arm_dcache_align_mask)
 815                         cpu_dcache_wbinv_range(((vm_offset_t)buf + len) &
 816                             ~arm_dcache_align_mask, arm_dcache_align);
 817         }
 818         if (op & BUS_DMASYNC_POSTREAD)
 819                 cpu_dcache_inv_range((vm_offset_t)buf, len);
 820 }
 821
 822 void
 823 _bus_dmamap_sync(bus_dma_tag_t dmat, bus_dmamap_t map, bus_dmasync_op_t op)
 824 {
 825         struct mbuf *m;
 826         struct uio *uio;
 827         int resid;
 828         struct iovec *iov;
 829
 830         if (op == BUS_DMASYNC_POSTWRITE)
 831                 return;
 832         if (map->flags & DMAMAP_COHERENT)
 833                 return;
 834         if ((op && BUS_DMASYNC_POSTREAD) && (map->len >= 2 * PAGE_SIZE)) {
 835                 cpu_dcache_wbinv_all();
 836                 return;
 837         }
 838         CTR3(KTR_BUSDMA, "%s: op %x flags %x", __func__, op, map->flags);
 839         switch(map->flags & DMAMAP_TYPE_MASK) {
 840         case DMAMAP_LINEAR:
 841                 bus_dmamap_sync_buf(map->buffer, map->len, op);
 842                 break;
 843         case DMAMAP_MBUF:
 844                 m = map->buffer;
 845                 while (m) {
 846                         if (m->m_len > 0)
 847                                 bus_dmamap_sync_buf(m->m_data, m->m_len, op);
 848                         m = m->m_next;
 849                 }
 850                 break;
 851         case DMAMAP_UIO:
 852                 uio = map->buffer;
 853                 iov = uio->uio_iov;
 854                 resid = uio->uio_resid;
 855                 for (int i = 0; i < uio->uio_iovcnt && resid != 0; i++) {
 856                         bus_size_t minlen = resid < iov[i].iov_len ? resid :
 857                             iov[i].iov_len;
 858                         if (minlen > 0) {
 859                                 bus_dmamap_sync_buf(iov[i].iov_base, minlen,
 860                                     op);
 861                                 resid -= minlen;
 862                         }
 863                 }
 864                 break;
 865         default:
 866                 break;
 867         }
 868         cpu_drain_writebuf();
 869 }