1 /* 2 * Copyright (c) 2005 Topspin Communications. All rights reserved. 3 * Copyright (c) 2005 Cisco Systems. All rights reserved. 4 * Copyright (c) 2005 Mellanox Technologies. All rights reserved. 5 * 6 * This software is available to you under a choice of one of two 7 * licenses. You may choose to be licensed under the terms of the GNU 8 * General Public License (GPL) Version 2, available from the file 9 * COPYING in the main directory of this source tree, or the 10 * OpenIB.org BSD license below: 11 * 12 * Redistribution and use in source and binary forms, with or 13 * without modification, are permitted provided that the following 14 * conditions are met: 15 * 16 * - Redistributions of source code must retain the above 17 * copyright notice, this list of conditions and the following 18 * disclaimer. 19 * 20 * - Redistributions in binary form must reproduce the above 21 * copyright notice, this list of conditions and the following 22 * disclaimer in the documentation and/or other materials 23 * provided with the distribution. 24 * 25 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 26 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF 27 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 28 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS 29 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN 30 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN 31 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE 32 * SOFTWARE. 33 */ 34 35 #include <linux/mm.h> 36 #include <linux/dma-mapping.h> 37 #include <linux/sched/signal.h> 38 #include <linux/sched/mm.h> 39 #include <linux/export.h> 40 #include <linux/slab.h> 41 #include <linux/pagemap.h> 42 #include <rdma/ib_umem_odp.h> 43 44 #include "uverbs.h" 45 46 static void __ib_umem_release(struct ib_device *dev, struct ib_umem *umem, int dirty) 47 { 48 struct sg_page_iter sg_iter; 49 struct page *page; 50 51 if (umem->nmap > 0) 52 ib_dma_unmap_sg(dev, umem->sg_head.sgl, umem->sg_nents, 53 DMA_BIDIRECTIONAL); 54 55 for_each_sg_page(umem->sg_head.sgl, &sg_iter, umem->sg_nents, 0) { 56 page = sg_page_iter_page(&sg_iter); 57 unpin_user_pages_dirty_lock(&page, 1, umem->writable && dirty); 58 } 59 60 sg_free_table(&umem->sg_head); 61 } 62 63 /* ib_umem_add_sg_table - Add N contiguous pages to scatter table 64 * 65 * sg: current scatterlist entry 66 * page_list: array of npage struct page pointers 67 * npages: number of pages in page_list 68 * max_seg_sz: maximum segment size in bytes 69 * nents: [out] number of entries in the scatterlist 70 * 71 * Return new end of scatterlist 72 */ 73 static struct scatterlist *ib_umem_add_sg_table(struct scatterlist *sg, 74 struct page **page_list, 75 unsigned long npages, 76 unsigned int max_seg_sz, 77 int *nents) 78 { 79 unsigned long first_pfn; 80 unsigned long i = 0; 81 bool update_cur_sg = false; 82 bool first = !sg_page(sg); 83 84 /* Check if new page_list is contiguous with end of previous page_list. 85 * sg->length here is a multiple of PAGE_SIZE and sg->offset is 0. 86 */ 87 if (!first && (page_to_pfn(sg_page(sg)) + (sg->length >> PAGE_SHIFT) == 88 page_to_pfn(page_list[0]))) 89 update_cur_sg = true; 90 91 while (i != npages) { 92 unsigned long len; 93 struct page *first_page = page_list[i]; 94 95 first_pfn = page_to_pfn(first_page); 96 97 /* Compute the number of contiguous pages we have starting 98 * at i 99 */ 100 for (len = 0; i != npages && 101 first_pfn + len == page_to_pfn(page_list[i]) && 102 len < (max_seg_sz >> PAGE_SHIFT); 103 len++) 104 i++; 105 106 /* Squash N contiguous pages from page_list into current sge */ 107 if (update_cur_sg) { 108 if ((max_seg_sz - sg->length) >= (len << PAGE_SHIFT)) { 109 sg_set_page(sg, sg_page(sg), 110 sg->length + (len << PAGE_SHIFT), 111 0); 112 update_cur_sg = false; 113 continue; 114 } 115 update_cur_sg = false; 116 } 117 118 /* Squash N contiguous pages into next sge or first sge */ 119 if (!first) 120 sg = sg_next(sg); 121 122 (*nents)++; 123 sg_set_page(sg, first_page, len << PAGE_SHIFT, 0); 124 first = false; 125 } 126 127 return sg; 128 } 129 130 /** 131 * ib_umem_find_best_pgsz - Find best HW page size to use for this MR 132 * 133 * @umem: umem struct 134 * @pgsz_bitmap: bitmap of HW supported page sizes 135 * @virt: IOVA 136 * 137 * This helper is intended for HW that support multiple page 138 * sizes but can do only a single page size in an MR. 139 * 140 * Returns 0 if the umem requires page sizes not supported by 141 * the driver to be mapped. Drivers always supporting PAGE_SIZE 142 * or smaller will never see a 0 result. 143 */ 144 unsigned long ib_umem_find_best_pgsz(struct ib_umem *umem, 145 unsigned long pgsz_bitmap, 146 unsigned long virt) 147 { 148 struct scatterlist *sg; 149 unsigned int best_pg_bit; 150 unsigned long va, pgoff; 151 dma_addr_t mask; 152 int i; 153 154 /* At minimum, drivers must support PAGE_SIZE or smaller */ 155 if (WARN_ON(!(pgsz_bitmap & GENMASK(PAGE_SHIFT, 0)))) 156 return 0; 157 158 va = virt; 159 /* max page size not to exceed MR length */ 160 mask = roundup_pow_of_two(umem->length); 161 /* offset into first SGL */ 162 pgoff = umem->address & ~PAGE_MASK; 163 164 for_each_sg(umem->sg_head.sgl, sg, umem->nmap, i) { 165 /* Walk SGL and reduce max page size if VA/PA bits differ 166 * for any address. 167 */ 168 mask |= (sg_dma_address(sg) + pgoff) ^ va; 169 va += sg_dma_len(sg) - pgoff; 170 /* Except for the last entry, the ending iova alignment sets 171 * the maximum possible page size as the low bits of the iova 172 * must be zero when starting the next chunk. 173 */ 174 if (i != (umem->nmap - 1)) 175 mask |= va; 176 pgoff = 0; 177 } 178 best_pg_bit = rdma_find_pg_bit(mask, pgsz_bitmap); 179 180 return BIT_ULL(best_pg_bit); 181 } 182 EXPORT_SYMBOL(ib_umem_find_best_pgsz); 183 184 /** 185 * ib_umem_get - Pin and DMA map userspace memory. 186 * 187 * @device: IB device to connect UMEM 188 * @addr: userspace virtual address to start at 189 * @size: length of region to pin 190 * @access: IB_ACCESS_xxx flags for memory being pinned 191 */ 192 struct ib_umem *ib_umem_get(struct ib_device *device, unsigned long addr, 193 size_t size, int access) 194 { 195 struct ib_umem *umem; 196 struct page **page_list; 197 unsigned long lock_limit; 198 unsigned long new_pinned; 199 unsigned long cur_base; 200 unsigned long dma_attr = 0; 201 struct mm_struct *mm; 202 unsigned long npages; 203 int ret; 204 struct scatterlist *sg; 205 unsigned int gup_flags = FOLL_WRITE; 206 207 /* 208 * If the combination of the addr and size requested for this memory 209 * region causes an integer overflow, return error. 210 */ 211 if (((addr + size) < addr) || 212 PAGE_ALIGN(addr + size) < (addr + size)) 213 return ERR_PTR(-EINVAL); 214 215 if (!can_do_mlock()) 216 return ERR_PTR(-EPERM); 217 218 if (access & IB_ACCESS_ON_DEMAND) 219 return ERR_PTR(-EOPNOTSUPP); 220 221 umem = kzalloc(sizeof(*umem), GFP_KERNEL); 222 if (!umem) 223 return ERR_PTR(-ENOMEM); 224 umem->ibdev = device; 225 umem->length = size; 226 umem->address = addr; 227 umem->writable = ib_access_writable(access); 228 umem->owning_mm = mm = current->mm; 229 mmgrab(mm); 230 231 page_list = (struct page **) __get_free_page(GFP_KERNEL); 232 if (!page_list) { 233 ret = -ENOMEM; 234 goto umem_kfree; 235 } 236 237 npages = ib_umem_num_pages(umem); 238 if (npages == 0 || npages > UINT_MAX) { 239 ret = -EINVAL; 240 goto out; 241 } 242 243 lock_limit = rlimit(RLIMIT_MEMLOCK) >> PAGE_SHIFT; 244 245 new_pinned = atomic64_add_return(npages, &mm->pinned_vm); 246 if (new_pinned > lock_limit && !capable(CAP_IPC_LOCK)) { 247 atomic64_sub(npages, &mm->pinned_vm); 248 ret = -ENOMEM; 249 goto out; 250 } 251 252 cur_base = addr & PAGE_MASK; 253 254 ret = sg_alloc_table(&umem->sg_head, npages, GFP_KERNEL); 255 if (ret) 256 goto vma; 257 258 if (!umem->writable) 259 gup_flags |= FOLL_FORCE; 260 261 sg = umem->sg_head.sgl; 262 263 while (npages) { 264 cond_resched(); 265 ret = pin_user_pages_fast(cur_base, 266 min_t(unsigned long, npages, 267 PAGE_SIZE / 268 sizeof(struct page *)), 269 gup_flags | FOLL_LONGTERM, page_list); 270 if (ret < 0) 271 goto umem_release; 272 273 cur_base += ret * PAGE_SIZE; 274 npages -= ret; 275 276 sg = ib_umem_add_sg_table(sg, page_list, ret, 277 dma_get_max_seg_size(device->dma_device), 278 &umem->sg_nents); 279 } 280 281 sg_mark_end(sg); 282 283 if (access & IB_ACCESS_RELAXED_ORDERING) 284 dma_attr |= DMA_ATTR_WEAK_ORDERING; 285 286 umem->nmap = 287 ib_dma_map_sg_attrs(device, umem->sg_head.sgl, umem->sg_nents, 288 DMA_BIDIRECTIONAL, dma_attr); 289 290 if (!umem->nmap) { 291 ret = -ENOMEM; 292 goto umem_release; 293 } 294 295 ret = 0; 296 goto out; 297 298 umem_release: 299 __ib_umem_release(device, umem, 0); 300 vma: 301 atomic64_sub(ib_umem_num_pages(umem), &mm->pinned_vm); 302 out: 303 free_page((unsigned long) page_list); 304 umem_kfree: 305 if (ret) { 306 mmdrop(umem->owning_mm); 307 kfree(umem); 308 } 309 return ret ? ERR_PTR(ret) : umem; 310 } 311 EXPORT_SYMBOL(ib_umem_get); 312 313 /** 314 * ib_umem_release - release memory pinned with ib_umem_get 315 * @umem: umem struct to release 316 */ 317 void ib_umem_release(struct ib_umem *umem) 318 { 319 if (!umem) 320 return; 321 if (umem->is_odp) 322 return ib_umem_odp_release(to_ib_umem_odp(umem)); 323 324 __ib_umem_release(umem->ibdev, umem, 1); 325 326 atomic64_sub(ib_umem_num_pages(umem), &umem->owning_mm->pinned_vm); 327 mmdrop(umem->owning_mm); 328 kfree(umem); 329 } 330 EXPORT_SYMBOL(ib_umem_release); 331 332 int ib_umem_page_count(struct ib_umem *umem) 333 { 334 int i, n = 0; 335 struct scatterlist *sg; 336 337 for_each_sg(umem->sg_head.sgl, sg, umem->nmap, i) 338 n += sg_dma_len(sg) >> PAGE_SHIFT; 339 340 return n; 341 } 342 EXPORT_SYMBOL(ib_umem_page_count); 343 344 /* 345 * Copy from the given ib_umem's pages to the given buffer. 346 * 347 * umem - the umem to copy from 348 * offset - offset to start copying from 349 * dst - destination buffer 350 * length - buffer length 351 * 352 * Returns 0 on success, or an error code. 353 */ 354 int ib_umem_copy_from(void *dst, struct ib_umem *umem, size_t offset, 355 size_t length) 356 { 357 size_t end = offset + length; 358 int ret; 359 360 if (offset > umem->length || length > umem->length - offset) { 361 pr_err("ib_umem_copy_from not in range. offset: %zd umem length: %zd end: %zd\n", 362 offset, umem->length, end); 363 return -EINVAL; 364 } 365 366 ret = sg_pcopy_to_buffer(umem->sg_head.sgl, umem->sg_nents, dst, length, 367 offset + ib_umem_offset(umem)); 368 369 if (ret < 0) 370 return ret; 371 else if (ret != length) 372 return -EINVAL; 373 else 374 return 0; 375 } 376 EXPORT_SYMBOL(ib_umem_copy_from); 377