1 /*
2  * Copyright 2009 Jerome Glisse.
3  * All Rights Reserved.
4  *
5  * Permission is hereby granted, free of charge, to any person obtaining a
6  * copy of this software and associated documentation files (the
7  * "Software"), to deal in the Software without restriction, including
8  * without limitation the rights to use, copy, modify, merge, publish,
9  * distribute, sub license, and/or sell copies of the Software, and to
10  * permit persons to whom the Software is furnished to do so, subject to
11  * the following conditions:
12  *
13  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
14  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
15  * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
16  * THE COPYRIGHT HOLDERS, AUTHORS AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM,
17  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
18  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
19  * USE OR OTHER DEALINGS IN THE SOFTWARE.
20  *
21  * The above copyright notice and this permission notice (including the
22  * next paragraph) shall be included in all copies or substantial portions
23  * of the Software.
24  *
25  */
26 /*
27  * Authors:
28  *    Jerome Glisse <glisse@freedesktop.org>
29  *    Thomas Hellstrom <thomas-at-tungstengraphics-dot-com>
30  *    Dave Airlie
31  */
32 #include <ttm/ttm_bo_api.h>
33 #include <ttm/ttm_bo_driver.h>
34 #include <ttm/ttm_placement.h>
35 #include <ttm/ttm_module.h>
36 #include <ttm/ttm_page_alloc.h>
37 #include <drm/drmP.h>
38 #include <drm/radeon_drm.h>
39 #include <linux/seq_file.h>
40 #include <linux/slab.h>
41 #include <linux/swiotlb.h>
42 #include <linux/swap.h>
43 #include <linux/pagemap.h>
44 #include <linux/debugfs.h>
45 #include "radeon_reg.h"
46 #include "radeon.h"
47 
48 #define DRM_FILE_PAGE_OFFSET (0x100000000ULL >> PAGE_SHIFT)
49 
50 static int radeon_ttm_debugfs_init(struct radeon_device *rdev);
51 static void radeon_ttm_debugfs_fini(struct radeon_device *rdev);
52 
53 static struct radeon_device *radeon_get_rdev(struct ttm_bo_device *bdev)
54 {
55 	struct radeon_mman *mman;
56 	struct radeon_device *rdev;
57 
58 	mman = container_of(bdev, struct radeon_mman, bdev);
59 	rdev = container_of(mman, struct radeon_device, mman);
60 	return rdev;
61 }
62 
63 
64 /*
65  * Global memory.
66  */
67 static int radeon_ttm_mem_global_init(struct drm_global_reference *ref)
68 {
69 	return ttm_mem_global_init(ref->object);
70 }
71 
72 static void radeon_ttm_mem_global_release(struct drm_global_reference *ref)
73 {
74 	ttm_mem_global_release(ref->object);
75 }
76 
77 static int radeon_ttm_global_init(struct radeon_device *rdev)
78 {
79 	struct drm_global_reference *global_ref;
80 	int r;
81 
82 	rdev->mman.mem_global_referenced = false;
83 	global_ref = &rdev->mman.mem_global_ref;
84 	global_ref->global_type = DRM_GLOBAL_TTM_MEM;
85 	global_ref->size = sizeof(struct ttm_mem_global);
86 	global_ref->init = &radeon_ttm_mem_global_init;
87 	global_ref->release = &radeon_ttm_mem_global_release;
88 	r = drm_global_item_ref(global_ref);
89 	if (r != 0) {
90 		DRM_ERROR("Failed setting up TTM memory accounting "
91 			  "subsystem.\n");
92 		return r;
93 	}
94 
95 	rdev->mman.bo_global_ref.mem_glob =
96 		rdev->mman.mem_global_ref.object;
97 	global_ref = &rdev->mman.bo_global_ref.ref;
98 	global_ref->global_type = DRM_GLOBAL_TTM_BO;
99 	global_ref->size = sizeof(struct ttm_bo_global);
100 	global_ref->init = &ttm_bo_global_init;
101 	global_ref->release = &ttm_bo_global_release;
102 	r = drm_global_item_ref(global_ref);
103 	if (r != 0) {
104 		DRM_ERROR("Failed setting up TTM BO subsystem.\n");
105 		drm_global_item_unref(&rdev->mman.mem_global_ref);
106 		return r;
107 	}
108 
109 	rdev->mman.mem_global_referenced = true;
110 	return 0;
111 }
112 
113 static void radeon_ttm_global_fini(struct radeon_device *rdev)
114 {
115 	if (rdev->mman.mem_global_referenced) {
116 		drm_global_item_unref(&rdev->mman.bo_global_ref.ref);
117 		drm_global_item_unref(&rdev->mman.mem_global_ref);
118 		rdev->mman.mem_global_referenced = false;
119 	}
120 }
121 
122 static int radeon_invalidate_caches(struct ttm_bo_device *bdev, uint32_t flags)
123 {
124 	return 0;
125 }
126 
127 static int radeon_init_mem_type(struct ttm_bo_device *bdev, uint32_t type,
128 				struct ttm_mem_type_manager *man)
129 {
130 	struct radeon_device *rdev;
131 
132 	rdev = radeon_get_rdev(bdev);
133 
134 	switch (type) {
135 	case TTM_PL_SYSTEM:
136 		/* System memory */
137 		man->flags = TTM_MEMTYPE_FLAG_MAPPABLE;
138 		man->available_caching = TTM_PL_MASK_CACHING;
139 		man->default_caching = TTM_PL_FLAG_CACHED;
140 		break;
141 	case TTM_PL_TT:
142 		man->func = &ttm_bo_manager_func;
143 		man->gpu_offset = rdev->mc.gtt_start;
144 		man->available_caching = TTM_PL_MASK_CACHING;
145 		man->default_caching = TTM_PL_FLAG_CACHED;
146 		man->flags = TTM_MEMTYPE_FLAG_MAPPABLE | TTM_MEMTYPE_FLAG_CMA;
147 #if __OS_HAS_AGP
148 		if (rdev->flags & RADEON_IS_AGP) {
149 			if (!rdev->ddev->agp) {
150 				DRM_ERROR("AGP is not enabled for memory type %u\n",
151 					  (unsigned)type);
152 				return -EINVAL;
153 			}
154 			if (!rdev->ddev->agp->cant_use_aperture)
155 				man->flags = TTM_MEMTYPE_FLAG_MAPPABLE;
156 			man->available_caching = TTM_PL_FLAG_UNCACHED |
157 						 TTM_PL_FLAG_WC;
158 			man->default_caching = TTM_PL_FLAG_WC;
159 		}
160 #endif
161 		break;
162 	case TTM_PL_VRAM:
163 		/* "On-card" video ram */
164 		man->func = &ttm_bo_manager_func;
165 		man->gpu_offset = rdev->mc.vram_start;
166 		man->flags = TTM_MEMTYPE_FLAG_FIXED |
167 			     TTM_MEMTYPE_FLAG_MAPPABLE;
168 		man->available_caching = TTM_PL_FLAG_UNCACHED | TTM_PL_FLAG_WC;
169 		man->default_caching = TTM_PL_FLAG_WC;
170 		break;
171 	default:
172 		DRM_ERROR("Unsupported memory type %u\n", (unsigned)type);
173 		return -EINVAL;
174 	}
175 	return 0;
176 }
177 
178 static void radeon_evict_flags(struct ttm_buffer_object *bo,
179 				struct ttm_placement *placement)
180 {
181 	static struct ttm_place placements = {
182 		.fpfn = 0,
183 		.lpfn = 0,
184 		.flags = TTM_PL_MASK_CACHING | TTM_PL_FLAG_SYSTEM
185 	};
186 
187 	struct radeon_bo *rbo;
188 
189 	if (!radeon_ttm_bo_is_radeon_bo(bo)) {
190 		placement->placement = &placements;
191 		placement->busy_placement = &placements;
192 		placement->num_placement = 1;
193 		placement->num_busy_placement = 1;
194 		return;
195 	}
196 	rbo = container_of(bo, struct radeon_bo, tbo);
197 	switch (bo->mem.mem_type) {
198 	case TTM_PL_VRAM:
199 		if (rbo->rdev->ring[radeon_copy_ring_index(rbo->rdev)].ready == false)
200 			radeon_ttm_placement_from_domain(rbo, RADEON_GEM_DOMAIN_CPU);
201 		else if (rbo->rdev->mc.visible_vram_size < rbo->rdev->mc.real_vram_size &&
202 			 bo->mem.start < (rbo->rdev->mc.visible_vram_size >> PAGE_SHIFT)) {
203 			unsigned fpfn = rbo->rdev->mc.visible_vram_size >> PAGE_SHIFT;
204 			int i;
205 
206 			/* Try evicting to the CPU inaccessible part of VRAM
207 			 * first, but only set GTT as busy placement, so this
208 			 * BO will be evicted to GTT rather than causing other
209 			 * BOs to be evicted from VRAM
210 			 */
211 			radeon_ttm_placement_from_domain(rbo, RADEON_GEM_DOMAIN_VRAM |
212 							 RADEON_GEM_DOMAIN_GTT);
213 			rbo->placement.num_busy_placement = 0;
214 			for (i = 0; i < rbo->placement.num_placement; i++) {
215 				if (rbo->placements[i].flags & TTM_PL_FLAG_VRAM) {
216 					if (rbo->placements[0].fpfn < fpfn)
217 						rbo->placements[0].fpfn = fpfn;
218 				} else {
219 					rbo->placement.busy_placement =
220 						&rbo->placements[i];
221 					rbo->placement.num_busy_placement = 1;
222 				}
223 			}
224 		} else
225 			radeon_ttm_placement_from_domain(rbo, RADEON_GEM_DOMAIN_GTT);
226 		break;
227 	case TTM_PL_TT:
228 	default:
229 		radeon_ttm_placement_from_domain(rbo, RADEON_GEM_DOMAIN_CPU);
230 	}
231 	*placement = rbo->placement;
232 }
233 
234 static int radeon_verify_access(struct ttm_buffer_object *bo, struct file *filp)
235 {
236 	struct radeon_bo *rbo = container_of(bo, struct radeon_bo, tbo);
237 
238 	return drm_vma_node_verify_access(&rbo->gem_base.vma_node, filp);
239 }
240 
241 static void radeon_move_null(struct ttm_buffer_object *bo,
242 			     struct ttm_mem_reg *new_mem)
243 {
244 	struct ttm_mem_reg *old_mem = &bo->mem;
245 
246 	BUG_ON(old_mem->mm_node != NULL);
247 	*old_mem = *new_mem;
248 	new_mem->mm_node = NULL;
249 }
250 
251 static int radeon_move_blit(struct ttm_buffer_object *bo,
252 			bool evict, bool no_wait_gpu,
253 			struct ttm_mem_reg *new_mem,
254 			struct ttm_mem_reg *old_mem)
255 {
256 	struct radeon_device *rdev;
257 	uint64_t old_start, new_start;
258 	struct radeon_fence *fence;
259 	unsigned num_pages;
260 	int r, ridx;
261 
262 	rdev = radeon_get_rdev(bo->bdev);
263 	ridx = radeon_copy_ring_index(rdev);
264 	old_start = old_mem->start << PAGE_SHIFT;
265 	new_start = new_mem->start << PAGE_SHIFT;
266 
267 	switch (old_mem->mem_type) {
268 	case TTM_PL_VRAM:
269 		old_start += rdev->mc.vram_start;
270 		break;
271 	case TTM_PL_TT:
272 		old_start += rdev->mc.gtt_start;
273 		break;
274 	default:
275 		DRM_ERROR("Unknown placement %d\n", old_mem->mem_type);
276 		return -EINVAL;
277 	}
278 	switch (new_mem->mem_type) {
279 	case TTM_PL_VRAM:
280 		new_start += rdev->mc.vram_start;
281 		break;
282 	case TTM_PL_TT:
283 		new_start += rdev->mc.gtt_start;
284 		break;
285 	default:
286 		DRM_ERROR("Unknown placement %d\n", old_mem->mem_type);
287 		return -EINVAL;
288 	}
289 	if (!rdev->ring[ridx].ready) {
290 		DRM_ERROR("Trying to move memory with ring turned off.\n");
291 		return -EINVAL;
292 	}
293 
294 	BUILD_BUG_ON((PAGE_SIZE % RADEON_GPU_PAGE_SIZE) != 0);
295 
296 	num_pages = new_mem->num_pages * (PAGE_SIZE / RADEON_GPU_PAGE_SIZE);
297 	fence = radeon_copy(rdev, old_start, new_start, num_pages, bo->resv);
298 	if (IS_ERR(fence))
299 		return PTR_ERR(fence);
300 
301 	r = ttm_bo_move_accel_cleanup(bo, &fence->base,
302 				      evict, no_wait_gpu, new_mem);
303 	radeon_fence_unref(&fence);
304 	return r;
305 }
306 
307 static int radeon_move_vram_ram(struct ttm_buffer_object *bo,
308 				bool evict, bool interruptible,
309 				bool no_wait_gpu,
310 				struct ttm_mem_reg *new_mem)
311 {
312 	struct radeon_device *rdev;
313 	struct ttm_mem_reg *old_mem = &bo->mem;
314 	struct ttm_mem_reg tmp_mem;
315 	struct ttm_place placements;
316 	struct ttm_placement placement;
317 	int r;
318 
319 	rdev = radeon_get_rdev(bo->bdev);
320 	tmp_mem = *new_mem;
321 	tmp_mem.mm_node = NULL;
322 	placement.num_placement = 1;
323 	placement.placement = &placements;
324 	placement.num_busy_placement = 1;
325 	placement.busy_placement = &placements;
326 	placements.fpfn = 0;
327 	placements.lpfn = 0;
328 	placements.flags = TTM_PL_MASK_CACHING | TTM_PL_FLAG_TT;
329 	r = ttm_bo_mem_space(bo, &placement, &tmp_mem,
330 			     interruptible, no_wait_gpu);
331 	if (unlikely(r)) {
332 		return r;
333 	}
334 
335 	r = ttm_tt_set_placement_caching(bo->ttm, tmp_mem.placement);
336 	if (unlikely(r)) {
337 		goto out_cleanup;
338 	}
339 
340 	r = ttm_tt_bind(bo->ttm, &tmp_mem);
341 	if (unlikely(r)) {
342 		goto out_cleanup;
343 	}
344 	r = radeon_move_blit(bo, true, no_wait_gpu, &tmp_mem, old_mem);
345 	if (unlikely(r)) {
346 		goto out_cleanup;
347 	}
348 	r = ttm_bo_move_ttm(bo, true, no_wait_gpu, new_mem);
349 out_cleanup:
350 	ttm_bo_mem_put(bo, &tmp_mem);
351 	return r;
352 }
353 
354 static int radeon_move_ram_vram(struct ttm_buffer_object *bo,
355 				bool evict, bool interruptible,
356 				bool no_wait_gpu,
357 				struct ttm_mem_reg *new_mem)
358 {
359 	struct radeon_device *rdev;
360 	struct ttm_mem_reg *old_mem = &bo->mem;
361 	struct ttm_mem_reg tmp_mem;
362 	struct ttm_placement placement;
363 	struct ttm_place placements;
364 	int r;
365 
366 	rdev = radeon_get_rdev(bo->bdev);
367 	tmp_mem = *new_mem;
368 	tmp_mem.mm_node = NULL;
369 	placement.num_placement = 1;
370 	placement.placement = &placements;
371 	placement.num_busy_placement = 1;
372 	placement.busy_placement = &placements;
373 	placements.fpfn = 0;
374 	placements.lpfn = 0;
375 	placements.flags = TTM_PL_MASK_CACHING | TTM_PL_FLAG_TT;
376 	r = ttm_bo_mem_space(bo, &placement, &tmp_mem,
377 			     interruptible, no_wait_gpu);
378 	if (unlikely(r)) {
379 		return r;
380 	}
381 	r = ttm_bo_move_ttm(bo, true, no_wait_gpu, &tmp_mem);
382 	if (unlikely(r)) {
383 		goto out_cleanup;
384 	}
385 	r = radeon_move_blit(bo, true, no_wait_gpu, new_mem, old_mem);
386 	if (unlikely(r)) {
387 		goto out_cleanup;
388 	}
389 out_cleanup:
390 	ttm_bo_mem_put(bo, &tmp_mem);
391 	return r;
392 }
393 
394 static int radeon_bo_move(struct ttm_buffer_object *bo,
395 			bool evict, bool interruptible,
396 			bool no_wait_gpu,
397 			struct ttm_mem_reg *new_mem)
398 {
399 	struct radeon_device *rdev;
400 	struct ttm_mem_reg *old_mem = &bo->mem;
401 	int r;
402 
403 	rdev = radeon_get_rdev(bo->bdev);
404 	if (old_mem->mem_type == TTM_PL_SYSTEM && bo->ttm == NULL) {
405 		radeon_move_null(bo, new_mem);
406 		return 0;
407 	}
408 	if ((old_mem->mem_type == TTM_PL_TT &&
409 	     new_mem->mem_type == TTM_PL_SYSTEM) ||
410 	    (old_mem->mem_type == TTM_PL_SYSTEM &&
411 	     new_mem->mem_type == TTM_PL_TT)) {
412 		/* bind is enough */
413 		radeon_move_null(bo, new_mem);
414 		return 0;
415 	}
416 	if (!rdev->ring[radeon_copy_ring_index(rdev)].ready ||
417 	    rdev->asic->copy.copy == NULL) {
418 		/* use memcpy */
419 		goto memcpy;
420 	}
421 
422 	if (old_mem->mem_type == TTM_PL_VRAM &&
423 	    new_mem->mem_type == TTM_PL_SYSTEM) {
424 		r = radeon_move_vram_ram(bo, evict, interruptible,
425 					no_wait_gpu, new_mem);
426 	} else if (old_mem->mem_type == TTM_PL_SYSTEM &&
427 		   new_mem->mem_type == TTM_PL_VRAM) {
428 		r = radeon_move_ram_vram(bo, evict, interruptible,
429 					    no_wait_gpu, new_mem);
430 	} else {
431 		r = radeon_move_blit(bo, evict, no_wait_gpu, new_mem, old_mem);
432 	}
433 
434 	if (r) {
435 memcpy:
436 		r = ttm_bo_move_memcpy(bo, evict, no_wait_gpu, new_mem);
437 		if (r) {
438 			return r;
439 		}
440 	}
441 
442 	/* update statistics */
443 	atomic64_add((u64)bo->num_pages << PAGE_SHIFT, &rdev->num_bytes_moved);
444 	return 0;
445 }
446 
447 static int radeon_ttm_io_mem_reserve(struct ttm_bo_device *bdev, struct ttm_mem_reg *mem)
448 {
449 	struct ttm_mem_type_manager *man = &bdev->man[mem->mem_type];
450 	struct radeon_device *rdev = radeon_get_rdev(bdev);
451 
452 	mem->bus.addr = NULL;
453 	mem->bus.offset = 0;
454 	mem->bus.size = mem->num_pages << PAGE_SHIFT;
455 	mem->bus.base = 0;
456 	mem->bus.is_iomem = false;
457 	if (!(man->flags & TTM_MEMTYPE_FLAG_MAPPABLE))
458 		return -EINVAL;
459 	switch (mem->mem_type) {
460 	case TTM_PL_SYSTEM:
461 		/* system memory */
462 		return 0;
463 	case TTM_PL_TT:
464 #if __OS_HAS_AGP
465 		if (rdev->flags & RADEON_IS_AGP) {
466 			/* RADEON_IS_AGP is set only if AGP is active */
467 			mem->bus.offset = mem->start << PAGE_SHIFT;
468 			mem->bus.base = rdev->mc.agp_base;
469 			mem->bus.is_iomem = !rdev->ddev->agp->cant_use_aperture;
470 		}
471 #endif
472 		break;
473 	case TTM_PL_VRAM:
474 		mem->bus.offset = mem->start << PAGE_SHIFT;
475 		/* check if it's visible */
476 		if ((mem->bus.offset + mem->bus.size) > rdev->mc.visible_vram_size)
477 			return -EINVAL;
478 		mem->bus.base = rdev->mc.aper_base;
479 		mem->bus.is_iomem = true;
480 #ifdef __alpha__
481 		/*
482 		 * Alpha: use bus.addr to hold the ioremap() return,
483 		 * so we can modify bus.base below.
484 		 */
485 		if (mem->placement & TTM_PL_FLAG_WC)
486 			mem->bus.addr =
487 				ioremap_wc(mem->bus.base + mem->bus.offset,
488 					   mem->bus.size);
489 		else
490 			mem->bus.addr =
491 				ioremap_nocache(mem->bus.base + mem->bus.offset,
492 						mem->bus.size);
493 
494 		/*
495 		 * Alpha: Use just the bus offset plus
496 		 * the hose/domain memory base for bus.base.
497 		 * It then can be used to build PTEs for VRAM
498 		 * access, as done in ttm_bo_vm_fault().
499 		 */
500 		mem->bus.base = (mem->bus.base & 0x0ffffffffUL) +
501 			rdev->ddev->hose->dense_mem_base;
502 #endif
503 		break;
504 	default:
505 		return -EINVAL;
506 	}
507 	return 0;
508 }
509 
510 static void radeon_ttm_io_mem_free(struct ttm_bo_device *bdev, struct ttm_mem_reg *mem)
511 {
512 }
513 
514 /*
515  * TTM backend functions.
516  */
517 struct radeon_ttm_tt {
518 	struct ttm_dma_tt		ttm;
519 	struct radeon_device		*rdev;
520 	u64				offset;
521 
522 	uint64_t			userptr;
523 	struct mm_struct		*usermm;
524 	uint32_t			userflags;
525 };
526 
527 /* prepare the sg table with the user pages */
528 static int radeon_ttm_tt_pin_userptr(struct ttm_tt *ttm)
529 {
530 	struct radeon_device *rdev = radeon_get_rdev(ttm->bdev);
531 	struct radeon_ttm_tt *gtt = (void *)ttm;
532 	unsigned pinned = 0, nents;
533 	int r;
534 
535 	int write = !(gtt->userflags & RADEON_GEM_USERPTR_READONLY);
536 	enum dma_data_direction direction = write ?
537 		DMA_BIDIRECTIONAL : DMA_TO_DEVICE;
538 
539 	if (current->mm != gtt->usermm)
540 		return -EPERM;
541 
542 	if (gtt->userflags & RADEON_GEM_USERPTR_ANONONLY) {
543 		/* check that we only pin down anonymous memory
544 		   to prevent problems with writeback */
545 		unsigned long end = gtt->userptr + ttm->num_pages * PAGE_SIZE;
546 		struct vm_area_struct *vma;
547 		vma = find_vma(gtt->usermm, gtt->userptr);
548 		if (!vma || vma->vm_file || vma->vm_end < end)
549 			return -EPERM;
550 	}
551 
552 	do {
553 		unsigned num_pages = ttm->num_pages - pinned;
554 		uint64_t userptr = gtt->userptr + pinned * PAGE_SIZE;
555 		struct page **pages = ttm->pages + pinned;
556 
557 		r = get_user_pages(current, current->mm, userptr, num_pages,
558 				   write, 0, pages, NULL);
559 		if (r < 0)
560 			goto release_pages;
561 
562 		pinned += r;
563 
564 	} while (pinned < ttm->num_pages);
565 
566 	r = sg_alloc_table_from_pages(ttm->sg, ttm->pages, ttm->num_pages, 0,
567 				      ttm->num_pages << PAGE_SHIFT,
568 				      GFP_KERNEL);
569 	if (r)
570 		goto release_sg;
571 
572 	r = -ENOMEM;
573 	nents = dma_map_sg(rdev->dev, ttm->sg->sgl, ttm->sg->nents, direction);
574 	if (nents != ttm->sg->nents)
575 		goto release_sg;
576 
577 	drm_prime_sg_to_page_addr_arrays(ttm->sg, ttm->pages,
578 					 gtt->ttm.dma_address, ttm->num_pages);
579 
580 	return 0;
581 
582 release_sg:
583 	kfree(ttm->sg);
584 
585 release_pages:
586 	release_pages(ttm->pages, pinned, 0);
587 	return r;
588 }
589 
590 static void radeon_ttm_tt_unpin_userptr(struct ttm_tt *ttm)
591 {
592 	struct radeon_device *rdev = radeon_get_rdev(ttm->bdev);
593 	struct radeon_ttm_tt *gtt = (void *)ttm;
594 	struct scatterlist *sg;
595 	int i;
596 
597 	int write = !(gtt->userflags & RADEON_GEM_USERPTR_READONLY);
598 	enum dma_data_direction direction = write ?
599 		DMA_BIDIRECTIONAL : DMA_TO_DEVICE;
600 
601 	/* free the sg table and pages again */
602 	dma_unmap_sg(rdev->dev, ttm->sg->sgl, ttm->sg->nents, direction);
603 
604 	for_each_sg(ttm->sg->sgl, sg, ttm->sg->nents, i) {
605 		struct page *page = sg_page(sg);
606 
607 		if (!(gtt->userflags & RADEON_GEM_USERPTR_READONLY))
608 			set_page_dirty(page);
609 
610 		mark_page_accessed(page);
611 		page_cache_release(page);
612 	}
613 
614 	sg_free_table(ttm->sg);
615 }
616 
617 static int radeon_ttm_backend_bind(struct ttm_tt *ttm,
618 				   struct ttm_mem_reg *bo_mem)
619 {
620 	struct radeon_ttm_tt *gtt = (void*)ttm;
621 	uint32_t flags = RADEON_GART_PAGE_VALID | RADEON_GART_PAGE_READ |
622 		RADEON_GART_PAGE_WRITE;
623 	int r;
624 
625 	if (gtt->userptr) {
626 		radeon_ttm_tt_pin_userptr(ttm);
627 		flags &= ~RADEON_GART_PAGE_WRITE;
628 	}
629 
630 	gtt->offset = (unsigned long)(bo_mem->start << PAGE_SHIFT);
631 	if (!ttm->num_pages) {
632 		WARN(1, "nothing to bind %lu pages for mreg %p back %p!\n",
633 		     ttm->num_pages, bo_mem, ttm);
634 	}
635 	if (ttm->caching_state == tt_cached)
636 		flags |= RADEON_GART_PAGE_SNOOP;
637 	r = radeon_gart_bind(gtt->rdev, gtt->offset, ttm->num_pages,
638 			     ttm->pages, gtt->ttm.dma_address, flags);
639 	if (r) {
640 		DRM_ERROR("failed to bind %lu pages at 0x%08X\n",
641 			  ttm->num_pages, (unsigned)gtt->offset);
642 		return r;
643 	}
644 	return 0;
645 }
646 
647 static int radeon_ttm_backend_unbind(struct ttm_tt *ttm)
648 {
649 	struct radeon_ttm_tt *gtt = (void *)ttm;
650 
651 	radeon_gart_unbind(gtt->rdev, gtt->offset, ttm->num_pages);
652 
653 	if (gtt->userptr)
654 		radeon_ttm_tt_unpin_userptr(ttm);
655 
656 	return 0;
657 }
658 
659 static void radeon_ttm_backend_destroy(struct ttm_tt *ttm)
660 {
661 	struct radeon_ttm_tt *gtt = (void *)ttm;
662 
663 	ttm_dma_tt_fini(&gtt->ttm);
664 	kfree(gtt);
665 }
666 
667 static struct ttm_backend_func radeon_backend_func = {
668 	.bind = &radeon_ttm_backend_bind,
669 	.unbind = &radeon_ttm_backend_unbind,
670 	.destroy = &radeon_ttm_backend_destroy,
671 };
672 
673 static struct ttm_tt *radeon_ttm_tt_create(struct ttm_bo_device *bdev,
674 				    unsigned long size, uint32_t page_flags,
675 				    struct page *dummy_read_page)
676 {
677 	struct radeon_device *rdev;
678 	struct radeon_ttm_tt *gtt;
679 
680 	rdev = radeon_get_rdev(bdev);
681 #if __OS_HAS_AGP
682 	if (rdev->flags & RADEON_IS_AGP) {
683 		return ttm_agp_tt_create(bdev, rdev->ddev->agp->bridge,
684 					 size, page_flags, dummy_read_page);
685 	}
686 #endif
687 
688 	gtt = kzalloc(sizeof(struct radeon_ttm_tt), GFP_KERNEL);
689 	if (gtt == NULL) {
690 		return NULL;
691 	}
692 	gtt->ttm.ttm.func = &radeon_backend_func;
693 	gtt->rdev = rdev;
694 	if (ttm_dma_tt_init(&gtt->ttm, bdev, size, page_flags, dummy_read_page)) {
695 		kfree(gtt);
696 		return NULL;
697 	}
698 	return &gtt->ttm.ttm;
699 }
700 
701 static struct radeon_ttm_tt *radeon_ttm_tt_to_gtt(struct ttm_tt *ttm)
702 {
703 	if (!ttm || ttm->func != &radeon_backend_func)
704 		return NULL;
705 	return (struct radeon_ttm_tt *)ttm;
706 }
707 
708 static int radeon_ttm_tt_populate(struct ttm_tt *ttm)
709 {
710 	struct radeon_ttm_tt *gtt = radeon_ttm_tt_to_gtt(ttm);
711 	struct radeon_device *rdev;
712 	unsigned i;
713 	int r;
714 	bool slave = !!(ttm->page_flags & TTM_PAGE_FLAG_SG);
715 
716 	if (ttm->state != tt_unpopulated)
717 		return 0;
718 
719 	if (gtt && gtt->userptr) {
720 		ttm->sg = kcalloc(1, sizeof(struct sg_table), GFP_KERNEL);
721 		if (!ttm->sg)
722 			return -ENOMEM;
723 
724 		ttm->page_flags |= TTM_PAGE_FLAG_SG;
725 		ttm->state = tt_unbound;
726 		return 0;
727 	}
728 
729 	if (slave && ttm->sg) {
730 		drm_prime_sg_to_page_addr_arrays(ttm->sg, ttm->pages,
731 						 gtt->ttm.dma_address, ttm->num_pages);
732 		ttm->state = tt_unbound;
733 		return 0;
734 	}
735 
736 	rdev = radeon_get_rdev(ttm->bdev);
737 #if __OS_HAS_AGP
738 	if (rdev->flags & RADEON_IS_AGP) {
739 		return ttm_agp_tt_populate(ttm);
740 	}
741 #endif
742 
743 #ifdef CONFIG_SWIOTLB
744 	if (swiotlb_nr_tbl()) {
745 		return ttm_dma_populate(&gtt->ttm, rdev->dev);
746 	}
747 #endif
748 
749 	r = ttm_pool_populate(ttm);
750 	if (r) {
751 		return r;
752 	}
753 
754 	for (i = 0; i < ttm->num_pages; i++) {
755 		gtt->ttm.dma_address[i] = pci_map_page(rdev->pdev, ttm->pages[i],
756 						       0, PAGE_SIZE,
757 						       PCI_DMA_BIDIRECTIONAL);
758 		if (pci_dma_mapping_error(rdev->pdev, gtt->ttm.dma_address[i])) {
759 			while (--i) {
760 				pci_unmap_page(rdev->pdev, gtt->ttm.dma_address[i],
761 					       PAGE_SIZE, PCI_DMA_BIDIRECTIONAL);
762 				gtt->ttm.dma_address[i] = 0;
763 			}
764 			ttm_pool_unpopulate(ttm);
765 			return -EFAULT;
766 		}
767 	}
768 	return 0;
769 }
770 
771 static void radeon_ttm_tt_unpopulate(struct ttm_tt *ttm)
772 {
773 	struct radeon_device *rdev;
774 	struct radeon_ttm_tt *gtt = radeon_ttm_tt_to_gtt(ttm);
775 	unsigned i;
776 	bool slave = !!(ttm->page_flags & TTM_PAGE_FLAG_SG);
777 
778 	if (gtt && gtt->userptr) {
779 		kfree(ttm->sg);
780 		ttm->page_flags &= ~TTM_PAGE_FLAG_SG;
781 		return;
782 	}
783 
784 	if (slave)
785 		return;
786 
787 	rdev = radeon_get_rdev(ttm->bdev);
788 #if __OS_HAS_AGP
789 	if (rdev->flags & RADEON_IS_AGP) {
790 		ttm_agp_tt_unpopulate(ttm);
791 		return;
792 	}
793 #endif
794 
795 #ifdef CONFIG_SWIOTLB
796 	if (swiotlb_nr_tbl()) {
797 		ttm_dma_unpopulate(&gtt->ttm, rdev->dev);
798 		return;
799 	}
800 #endif
801 
802 	for (i = 0; i < ttm->num_pages; i++) {
803 		if (gtt->ttm.dma_address[i]) {
804 			pci_unmap_page(rdev->pdev, gtt->ttm.dma_address[i],
805 				       PAGE_SIZE, PCI_DMA_BIDIRECTIONAL);
806 		}
807 	}
808 
809 	ttm_pool_unpopulate(ttm);
810 }
811 
812 int radeon_ttm_tt_set_userptr(struct ttm_tt *ttm, uint64_t addr,
813 			      uint32_t flags)
814 {
815 	struct radeon_ttm_tt *gtt = radeon_ttm_tt_to_gtt(ttm);
816 
817 	if (gtt == NULL)
818 		return -EINVAL;
819 
820 	gtt->userptr = addr;
821 	gtt->usermm = current->mm;
822 	gtt->userflags = flags;
823 	return 0;
824 }
825 
826 bool radeon_ttm_tt_has_userptr(struct ttm_tt *ttm)
827 {
828 	struct radeon_ttm_tt *gtt = radeon_ttm_tt_to_gtt(ttm);
829 
830 	if (gtt == NULL)
831 		return false;
832 
833 	return !!gtt->userptr;
834 }
835 
836 bool radeon_ttm_tt_is_readonly(struct ttm_tt *ttm)
837 {
838 	struct radeon_ttm_tt *gtt = radeon_ttm_tt_to_gtt(ttm);
839 
840 	if (gtt == NULL)
841 		return false;
842 
843 	return !!(gtt->userflags & RADEON_GEM_USERPTR_READONLY);
844 }
845 
846 static struct ttm_bo_driver radeon_bo_driver = {
847 	.ttm_tt_create = &radeon_ttm_tt_create,
848 	.ttm_tt_populate = &radeon_ttm_tt_populate,
849 	.ttm_tt_unpopulate = &radeon_ttm_tt_unpopulate,
850 	.invalidate_caches = &radeon_invalidate_caches,
851 	.init_mem_type = &radeon_init_mem_type,
852 	.evict_flags = &radeon_evict_flags,
853 	.move = &radeon_bo_move,
854 	.verify_access = &radeon_verify_access,
855 	.move_notify = &radeon_bo_move_notify,
856 	.fault_reserve_notify = &radeon_bo_fault_reserve_notify,
857 	.io_mem_reserve = &radeon_ttm_io_mem_reserve,
858 	.io_mem_free = &radeon_ttm_io_mem_free,
859 };
860 
861 int radeon_ttm_init(struct radeon_device *rdev)
862 {
863 	int r;
864 
865 	r = radeon_ttm_global_init(rdev);
866 	if (r) {
867 		return r;
868 	}
869 	/* No others user of address space so set it to 0 */
870 	r = ttm_bo_device_init(&rdev->mman.bdev,
871 			       rdev->mman.bo_global_ref.ref.object,
872 			       &radeon_bo_driver,
873 			       rdev->ddev->anon_inode->i_mapping,
874 			       DRM_FILE_PAGE_OFFSET,
875 			       rdev->need_dma32);
876 	if (r) {
877 		DRM_ERROR("failed initializing buffer object driver(%d).\n", r);
878 		return r;
879 	}
880 	rdev->mman.initialized = true;
881 	r = ttm_bo_init_mm(&rdev->mman.bdev, TTM_PL_VRAM,
882 				rdev->mc.real_vram_size >> PAGE_SHIFT);
883 	if (r) {
884 		DRM_ERROR("Failed initializing VRAM heap.\n");
885 		return r;
886 	}
887 	/* Change the size here instead of the init above so only lpfn is affected */
888 	radeon_ttm_set_active_vram_size(rdev, rdev->mc.visible_vram_size);
889 
890 	r = radeon_bo_create(rdev, 256 * 1024, PAGE_SIZE, true,
891 			     RADEON_GEM_DOMAIN_VRAM, 0, NULL,
892 			     NULL, &rdev->stollen_vga_memory);
893 	if (r) {
894 		return r;
895 	}
896 	r = radeon_bo_reserve(rdev->stollen_vga_memory, false);
897 	if (r)
898 		return r;
899 	r = radeon_bo_pin(rdev->stollen_vga_memory, RADEON_GEM_DOMAIN_VRAM, NULL);
900 	radeon_bo_unreserve(rdev->stollen_vga_memory);
901 	if (r) {
902 		radeon_bo_unref(&rdev->stollen_vga_memory);
903 		return r;
904 	}
905 	DRM_INFO("radeon: %uM of VRAM memory ready\n",
906 		 (unsigned) (rdev->mc.real_vram_size / (1024 * 1024)));
907 	r = ttm_bo_init_mm(&rdev->mman.bdev, TTM_PL_TT,
908 				rdev->mc.gtt_size >> PAGE_SHIFT);
909 	if (r) {
910 		DRM_ERROR("Failed initializing GTT heap.\n");
911 		return r;
912 	}
913 	DRM_INFO("radeon: %uM of GTT memory ready.\n",
914 		 (unsigned)(rdev->mc.gtt_size / (1024 * 1024)));
915 
916 	r = radeon_ttm_debugfs_init(rdev);
917 	if (r) {
918 		DRM_ERROR("Failed to init debugfs\n");
919 		return r;
920 	}
921 	return 0;
922 }
923 
924 void radeon_ttm_fini(struct radeon_device *rdev)
925 {
926 	int r;
927 
928 	if (!rdev->mman.initialized)
929 		return;
930 	radeon_ttm_debugfs_fini(rdev);
931 	if (rdev->stollen_vga_memory) {
932 		r = radeon_bo_reserve(rdev->stollen_vga_memory, false);
933 		if (r == 0) {
934 			radeon_bo_unpin(rdev->stollen_vga_memory);
935 			radeon_bo_unreserve(rdev->stollen_vga_memory);
936 		}
937 		radeon_bo_unref(&rdev->stollen_vga_memory);
938 	}
939 	ttm_bo_clean_mm(&rdev->mman.bdev, TTM_PL_VRAM);
940 	ttm_bo_clean_mm(&rdev->mman.bdev, TTM_PL_TT);
941 	ttm_bo_device_release(&rdev->mman.bdev);
942 	radeon_gart_fini(rdev);
943 	radeon_ttm_global_fini(rdev);
944 	rdev->mman.initialized = false;
945 	DRM_INFO("radeon: ttm finalized\n");
946 }
947 
948 /* this should only be called at bootup or when userspace
949  * isn't running */
950 void radeon_ttm_set_active_vram_size(struct radeon_device *rdev, u64 size)
951 {
952 	struct ttm_mem_type_manager *man;
953 
954 	if (!rdev->mman.initialized)
955 		return;
956 
957 	man = &rdev->mman.bdev.man[TTM_PL_VRAM];
958 	/* this just adjusts TTM size idea, which sets lpfn to the correct value */
959 	man->size = size >> PAGE_SHIFT;
960 }
961 
962 static struct vm_operations_struct radeon_ttm_vm_ops;
963 static const struct vm_operations_struct *ttm_vm_ops = NULL;
964 
965 static int radeon_ttm_fault(struct vm_area_struct *vma, struct vm_fault *vmf)
966 {
967 	struct ttm_buffer_object *bo;
968 	struct radeon_device *rdev;
969 	int r;
970 
971 	bo = (struct ttm_buffer_object *)vma->vm_private_data;
972 	if (bo == NULL) {
973 		return VM_FAULT_NOPAGE;
974 	}
975 	rdev = radeon_get_rdev(bo->bdev);
976 	down_read(&rdev->pm.mclk_lock);
977 	r = ttm_vm_ops->fault(vma, vmf);
978 	up_read(&rdev->pm.mclk_lock);
979 	return r;
980 }
981 
982 int radeon_mmap(struct file *filp, struct vm_area_struct *vma)
983 {
984 	struct drm_file *file_priv;
985 	struct radeon_device *rdev;
986 	int r;
987 
988 	if (unlikely(vma->vm_pgoff < DRM_FILE_PAGE_OFFSET)) {
989 		return -EINVAL;
990 	}
991 
992 	file_priv = filp->private_data;
993 	rdev = file_priv->minor->dev->dev_private;
994 	if (rdev == NULL) {
995 		return -EINVAL;
996 	}
997 	r = ttm_bo_mmap(filp, vma, &rdev->mman.bdev);
998 	if (unlikely(r != 0)) {
999 		return r;
1000 	}
1001 	if (unlikely(ttm_vm_ops == NULL)) {
1002 		ttm_vm_ops = vma->vm_ops;
1003 		radeon_ttm_vm_ops = *ttm_vm_ops;
1004 		radeon_ttm_vm_ops.fault = &radeon_ttm_fault;
1005 	}
1006 	vma->vm_ops = &radeon_ttm_vm_ops;
1007 	return 0;
1008 }
1009 
1010 #if defined(CONFIG_DEBUG_FS)
1011 
1012 static int radeon_mm_dump_table(struct seq_file *m, void *data)
1013 {
1014 	struct drm_info_node *node = (struct drm_info_node *)m->private;
1015 	unsigned ttm_pl = *(int *)node->info_ent->data;
1016 	struct drm_device *dev = node->minor->dev;
1017 	struct radeon_device *rdev = dev->dev_private;
1018 	struct drm_mm *mm = (struct drm_mm *)rdev->mman.bdev.man[ttm_pl].priv;
1019 	int ret;
1020 	struct ttm_bo_global *glob = rdev->mman.bdev.glob;
1021 
1022 	spin_lock(&glob->lru_lock);
1023 	ret = drm_mm_dump_table(m, mm);
1024 	spin_unlock(&glob->lru_lock);
1025 	return ret;
1026 }
1027 
1028 static int ttm_pl_vram = TTM_PL_VRAM;
1029 static int ttm_pl_tt = TTM_PL_TT;
1030 
1031 static struct drm_info_list radeon_ttm_debugfs_list[] = {
1032 	{"radeon_vram_mm", radeon_mm_dump_table, 0, &ttm_pl_vram},
1033 	{"radeon_gtt_mm", radeon_mm_dump_table, 0, &ttm_pl_tt},
1034 	{"ttm_page_pool", ttm_page_alloc_debugfs, 0, NULL},
1035 #ifdef CONFIG_SWIOTLB
1036 	{"ttm_dma_page_pool", ttm_dma_page_alloc_debugfs, 0, NULL}
1037 #endif
1038 };
1039 
1040 static int radeon_ttm_vram_open(struct inode *inode, struct file *filep)
1041 {
1042 	struct radeon_device *rdev = inode->i_private;
1043 	i_size_write(inode, rdev->mc.mc_vram_size);
1044 	filep->private_data = inode->i_private;
1045 	return 0;
1046 }
1047 
1048 static ssize_t radeon_ttm_vram_read(struct file *f, char __user *buf,
1049 				    size_t size, loff_t *pos)
1050 {
1051 	struct radeon_device *rdev = f->private_data;
1052 	ssize_t result = 0;
1053 	int r;
1054 
1055 	if (size & 0x3 || *pos & 0x3)
1056 		return -EINVAL;
1057 
1058 	while (size) {
1059 		unsigned long flags;
1060 		uint32_t value;
1061 
1062 		if (*pos >= rdev->mc.mc_vram_size)
1063 			return result;
1064 
1065 		spin_lock_irqsave(&rdev->mmio_idx_lock, flags);
1066 		WREG32(RADEON_MM_INDEX, ((uint32_t)*pos) | 0x80000000);
1067 		if (rdev->family >= CHIP_CEDAR)
1068 			WREG32(EVERGREEN_MM_INDEX_HI, *pos >> 31);
1069 		value = RREG32(RADEON_MM_DATA);
1070 		spin_unlock_irqrestore(&rdev->mmio_idx_lock, flags);
1071 
1072 		r = put_user(value, (uint32_t *)buf);
1073 		if (r)
1074 			return r;
1075 
1076 		result += 4;
1077 		buf += 4;
1078 		*pos += 4;
1079 		size -= 4;
1080 	}
1081 
1082 	return result;
1083 }
1084 
1085 static const struct file_operations radeon_ttm_vram_fops = {
1086 	.owner = THIS_MODULE,
1087 	.open = radeon_ttm_vram_open,
1088 	.read = radeon_ttm_vram_read,
1089 	.llseek = default_llseek
1090 };
1091 
1092 static int radeon_ttm_gtt_open(struct inode *inode, struct file *filep)
1093 {
1094 	struct radeon_device *rdev = inode->i_private;
1095 	i_size_write(inode, rdev->mc.gtt_size);
1096 	filep->private_data = inode->i_private;
1097 	return 0;
1098 }
1099 
1100 static ssize_t radeon_ttm_gtt_read(struct file *f, char __user *buf,
1101 				   size_t size, loff_t *pos)
1102 {
1103 	struct radeon_device *rdev = f->private_data;
1104 	ssize_t result = 0;
1105 	int r;
1106 
1107 	while (size) {
1108 		loff_t p = *pos / PAGE_SIZE;
1109 		unsigned off = *pos & ~PAGE_MASK;
1110 		size_t cur_size = min_t(size_t, size, PAGE_SIZE - off);
1111 		struct page *page;
1112 		void *ptr;
1113 
1114 		if (p >= rdev->gart.num_cpu_pages)
1115 			return result;
1116 
1117 		page = rdev->gart.pages[p];
1118 		if (page) {
1119 			ptr = kmap(page);
1120 			ptr += off;
1121 
1122 			r = copy_to_user(buf, ptr, cur_size);
1123 			kunmap(rdev->gart.pages[p]);
1124 		} else
1125 			r = clear_user(buf, cur_size);
1126 
1127 		if (r)
1128 			return -EFAULT;
1129 
1130 		result += cur_size;
1131 		buf += cur_size;
1132 		*pos += cur_size;
1133 		size -= cur_size;
1134 	}
1135 
1136 	return result;
1137 }
1138 
1139 static const struct file_operations radeon_ttm_gtt_fops = {
1140 	.owner = THIS_MODULE,
1141 	.open = radeon_ttm_gtt_open,
1142 	.read = radeon_ttm_gtt_read,
1143 	.llseek = default_llseek
1144 };
1145 
1146 #endif
1147 
1148 static int radeon_ttm_debugfs_init(struct radeon_device *rdev)
1149 {
1150 #if defined(CONFIG_DEBUG_FS)
1151 	unsigned count;
1152 
1153 	struct drm_minor *minor = rdev->ddev->primary;
1154 	struct dentry *ent, *root = minor->debugfs_root;
1155 
1156 	ent = debugfs_create_file("radeon_vram", S_IFREG | S_IRUGO, root,
1157 				  rdev, &radeon_ttm_vram_fops);
1158 	if (IS_ERR(ent))
1159 		return PTR_ERR(ent);
1160 	rdev->mman.vram = ent;
1161 
1162 	ent = debugfs_create_file("radeon_gtt", S_IFREG | S_IRUGO, root,
1163 				  rdev, &radeon_ttm_gtt_fops);
1164 	if (IS_ERR(ent))
1165 		return PTR_ERR(ent);
1166 	rdev->mman.gtt = ent;
1167 
1168 	count = ARRAY_SIZE(radeon_ttm_debugfs_list);
1169 
1170 #ifdef CONFIG_SWIOTLB
1171 	if (!swiotlb_nr_tbl())
1172 		--count;
1173 #endif
1174 
1175 	return radeon_debugfs_add_files(rdev, radeon_ttm_debugfs_list, count);
1176 #else
1177 
1178 	return 0;
1179 #endif
1180 }
1181 
1182 static void radeon_ttm_debugfs_fini(struct radeon_device *rdev)
1183 {
1184 #if defined(CONFIG_DEBUG_FS)
1185 
1186 	debugfs_remove(rdev->mman.vram);
1187 	rdev->mman.vram = NULL;
1188 
1189 	debugfs_remove(rdev->mman.gtt);
1190 	rdev->mman.gtt = NULL;
1191 #endif
1192 }
1193