d72a71bff218553106f69d489cf7caf34ed59b9a
[sfrench/cifs-2.6.git] / drivers / gpu / drm / radeon / radeon_object.c
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 <linux/list.h>
33 #include <drm/drmP.h>
34 #include "radeon_drm.h"
35 #include "radeon.h"
36
37
38 int radeon_ttm_init(struct radeon_device *rdev);
39 void radeon_ttm_fini(struct radeon_device *rdev);
40 static void radeon_bo_clear_surface_reg(struct radeon_bo *bo);
41
42 /*
43  * To exclude mutual BO access we rely on bo_reserve exclusion, as all
44  * function are calling it.
45  */
46
47 static void radeon_ttm_bo_destroy(struct ttm_buffer_object *tbo)
48 {
49         struct radeon_bo *bo;
50
51         bo = container_of(tbo, struct radeon_bo, tbo);
52         mutex_lock(&bo->rdev->gem.mutex);
53         list_del_init(&bo->list);
54         mutex_unlock(&bo->rdev->gem.mutex);
55         radeon_bo_clear_surface_reg(bo);
56         kfree(bo);
57 }
58
59 bool radeon_ttm_bo_is_radeon_bo(struct ttm_buffer_object *bo)
60 {
61         if (bo->destroy == &radeon_ttm_bo_destroy)
62                 return true;
63         return false;
64 }
65
66 void radeon_ttm_placement_from_domain(struct radeon_bo *rbo, u32 domain)
67 {
68         u32 c = 0;
69
70         rbo->placement.fpfn = 0;
71         rbo->placement.lpfn = 0;
72         rbo->placement.placement = rbo->placements;
73         rbo->placement.busy_placement = rbo->placements;
74         if (domain & RADEON_GEM_DOMAIN_VRAM)
75                 rbo->placements[c++] = TTM_PL_FLAG_WC | TTM_PL_FLAG_UNCACHED |
76                                         TTM_PL_FLAG_VRAM;
77         if (domain & RADEON_GEM_DOMAIN_GTT)
78                 rbo->placements[c++] = TTM_PL_MASK_CACHING | TTM_PL_FLAG_TT;
79         if (domain & RADEON_GEM_DOMAIN_CPU)
80                 rbo->placements[c++] = TTM_PL_MASK_CACHING | TTM_PL_FLAG_SYSTEM;
81         if (!c)
82                 rbo->placements[c++] = TTM_PL_MASK_CACHING | TTM_PL_FLAG_SYSTEM;
83         rbo->placement.num_placement = c;
84         rbo->placement.num_busy_placement = c;
85 }
86
87 int radeon_bo_create(struct radeon_device *rdev, struct drm_gem_object *gobj,
88                         unsigned long size, bool kernel, u32 domain,
89                         struct radeon_bo **bo_ptr)
90 {
91         struct radeon_bo *bo;
92         enum ttm_bo_type type;
93         int r;
94
95         if (unlikely(rdev->mman.bdev.dev_mapping == NULL)) {
96                 rdev->mman.bdev.dev_mapping = rdev->ddev->dev_mapping;
97         }
98         if (kernel) {
99                 type = ttm_bo_type_kernel;
100         } else {
101                 type = ttm_bo_type_device;
102         }
103         *bo_ptr = NULL;
104         bo = kzalloc(sizeof(struct radeon_bo), GFP_KERNEL);
105         if (bo == NULL)
106                 return -ENOMEM;
107         bo->rdev = rdev;
108         bo->gobj = gobj;
109         bo->surface_reg = -1;
110         INIT_LIST_HEAD(&bo->list);
111
112         radeon_ttm_placement_from_domain(bo, domain);
113         /* Kernel allocation are uninterruptible */
114         r = ttm_bo_init(&rdev->mman.bdev, &bo->tbo, size, type,
115                         &bo->placement, 0, 0, !kernel, NULL, size,
116                         &radeon_ttm_bo_destroy);
117         if (unlikely(r != 0)) {
118                 if (r != -ERESTARTSYS)
119                         dev_err(rdev->dev,
120                                 "object_init failed for (%lu, 0x%08X)\n",
121                                 size, domain);
122                 return r;
123         }
124         *bo_ptr = bo;
125         if (gobj) {
126                 mutex_lock(&bo->rdev->gem.mutex);
127                 list_add_tail(&bo->list, &rdev->gem.objects);
128                 mutex_unlock(&bo->rdev->gem.mutex);
129         }
130         return 0;
131 }
132
133 int radeon_bo_kmap(struct radeon_bo *bo, void **ptr)
134 {
135         bool is_iomem;
136         int r;
137
138         if (bo->kptr) {
139                 if (ptr) {
140                         *ptr = bo->kptr;
141                 }
142                 return 0;
143         }
144         r = ttm_bo_kmap(&bo->tbo, 0, bo->tbo.num_pages, &bo->kmap);
145         if (r) {
146                 return r;
147         }
148         bo->kptr = ttm_kmap_obj_virtual(&bo->kmap, &is_iomem);
149         if (ptr) {
150                 *ptr = bo->kptr;
151         }
152         radeon_bo_check_tiling(bo, 0, 0);
153         return 0;
154 }
155
156 void radeon_bo_kunmap(struct radeon_bo *bo)
157 {
158         if (bo->kptr == NULL)
159                 return;
160         bo->kptr = NULL;
161         radeon_bo_check_tiling(bo, 0, 0);
162         ttm_bo_kunmap(&bo->kmap);
163 }
164
165 void radeon_bo_unref(struct radeon_bo **bo)
166 {
167         struct ttm_buffer_object *tbo;
168
169         if ((*bo) == NULL)
170                 return;
171         tbo = &((*bo)->tbo);
172         ttm_bo_unref(&tbo);
173         if (tbo == NULL)
174                 *bo = NULL;
175 }
176
177 int radeon_bo_pin(struct radeon_bo *bo, u32 domain, u64 *gpu_addr)
178 {
179         int r, i;
180
181         radeon_ttm_placement_from_domain(bo, domain);
182         if (bo->pin_count) {
183                 bo->pin_count++;
184                 if (gpu_addr)
185                         *gpu_addr = radeon_bo_gpu_offset(bo);
186                 return 0;
187         }
188         radeon_ttm_placement_from_domain(bo, domain);
189         for (i = 0; i < bo->placement.num_placement; i++)
190                 bo->placements[i] |= TTM_PL_FLAG_NO_EVICT;
191         r = ttm_bo_validate(&bo->tbo, &bo->placement, false, false);
192         if (likely(r == 0)) {
193                 bo->pin_count = 1;
194                 if (gpu_addr != NULL)
195                         *gpu_addr = radeon_bo_gpu_offset(bo);
196         }
197         if (unlikely(r != 0))
198                 dev_err(bo->rdev->dev, "%p pin failed\n", bo);
199         return r;
200 }
201
202 int radeon_bo_unpin(struct radeon_bo *bo)
203 {
204         int r, i;
205
206         if (!bo->pin_count) {
207                 dev_warn(bo->rdev->dev, "%p unpin not necessary\n", bo);
208                 return 0;
209         }
210         bo->pin_count--;
211         if (bo->pin_count)
212                 return 0;
213         for (i = 0; i < bo->placement.num_placement; i++)
214                 bo->placements[i] &= ~TTM_PL_FLAG_NO_EVICT;
215         r = ttm_bo_validate(&bo->tbo, &bo->placement, false, false);
216         if (unlikely(r != 0))
217                 dev_err(bo->rdev->dev, "%p validate failed for unpin\n", bo);
218         return r;
219 }
220
221 int radeon_bo_evict_vram(struct radeon_device *rdev)
222 {
223         /* late 2.6.33 fix IGP hibernate - we need pm ops to do this correct */
224         if (0 && (rdev->flags & RADEON_IS_IGP)) {
225                 if (rdev->mc.igp_sideport_enabled == false)
226                         /* Useless to evict on IGP chips */
227                         return 0;
228         }
229         return ttm_bo_evict_mm(&rdev->mman.bdev, TTM_PL_VRAM);
230 }
231
232 void radeon_bo_force_delete(struct radeon_device *rdev)
233 {
234         struct radeon_bo *bo, *n;
235         struct drm_gem_object *gobj;
236
237         if (list_empty(&rdev->gem.objects)) {
238                 return;
239         }
240         dev_err(rdev->dev, "Userspace still has active objects !\n");
241         list_for_each_entry_safe(bo, n, &rdev->gem.objects, list) {
242                 mutex_lock(&rdev->ddev->struct_mutex);
243                 gobj = bo->gobj;
244                 dev_err(rdev->dev, "%p %p %lu %lu force free\n",
245                         gobj, bo, (unsigned long)gobj->size,
246                         *((unsigned long *)&gobj->refcount));
247                 mutex_lock(&bo->rdev->gem.mutex);
248                 list_del_init(&bo->list);
249                 mutex_unlock(&bo->rdev->gem.mutex);
250                 radeon_bo_unref(&bo);
251                 gobj->driver_private = NULL;
252                 drm_gem_object_unreference(gobj);
253                 mutex_unlock(&rdev->ddev->struct_mutex);
254         }
255 }
256
257 int radeon_bo_init(struct radeon_device *rdev)
258 {
259         /* Add an MTRR for the VRAM */
260         rdev->mc.vram_mtrr = mtrr_add(rdev->mc.aper_base, rdev->mc.aper_size,
261                         MTRR_TYPE_WRCOMB, 1);
262         DRM_INFO("Detected VRAM RAM=%lluM, BAR=%lluM\n",
263                 rdev->mc.mc_vram_size >> 20,
264                 (unsigned long long)rdev->mc.aper_size >> 20);
265         DRM_INFO("RAM width %dbits %cDR\n",
266                         rdev->mc.vram_width, rdev->mc.vram_is_ddr ? 'D' : 'S');
267         return radeon_ttm_init(rdev);
268 }
269
270 void radeon_bo_fini(struct radeon_device *rdev)
271 {
272         radeon_ttm_fini(rdev);
273 }
274
275 void radeon_bo_list_add_object(struct radeon_bo_list *lobj,
276                                 struct list_head *head)
277 {
278         if (lobj->wdomain) {
279                 list_add(&lobj->list, head);
280         } else {
281                 list_add_tail(&lobj->list, head);
282         }
283 }
284
285 int radeon_bo_list_reserve(struct list_head *head)
286 {
287         struct radeon_bo_list *lobj;
288         int r;
289
290         list_for_each_entry(lobj, head, list){
291                 r = radeon_bo_reserve(lobj->bo, false);
292                 if (unlikely(r != 0))
293                         return r;
294         }
295         return 0;
296 }
297
298 void radeon_bo_list_unreserve(struct list_head *head)
299 {
300         struct radeon_bo_list *lobj;
301
302         list_for_each_entry(lobj, head, list) {
303                 /* only unreserve object we successfully reserved */
304                 if (radeon_bo_is_reserved(lobj->bo))
305                         radeon_bo_unreserve(lobj->bo);
306         }
307 }
308
309 int radeon_bo_list_validate(struct list_head *head, void *fence)
310 {
311         struct radeon_bo_list *lobj;
312         struct radeon_bo *bo;
313         struct radeon_fence *old_fence = NULL;
314         int r;
315
316         r = radeon_bo_list_reserve(head);
317         if (unlikely(r != 0)) {
318                 return r;
319         }
320         list_for_each_entry(lobj, head, list) {
321                 bo = lobj->bo;
322                 if (!bo->pin_count) {
323                         if (lobj->wdomain) {
324                                 radeon_ttm_placement_from_domain(bo,
325                                                                 lobj->wdomain);
326                         } else {
327                                 radeon_ttm_placement_from_domain(bo,
328                                                                 lobj->rdomain);
329                         }
330                         r = ttm_bo_validate(&bo->tbo, &bo->placement,
331                                                 true, false);
332                         if (unlikely(r))
333                                 return r;
334                 }
335                 lobj->gpu_offset = radeon_bo_gpu_offset(bo);
336                 lobj->tiling_flags = bo->tiling_flags;
337                 if (fence) {
338                         old_fence = (struct radeon_fence *)bo->tbo.sync_obj;
339                         bo->tbo.sync_obj = radeon_fence_ref(fence);
340                         bo->tbo.sync_obj_arg = NULL;
341                 }
342                 if (old_fence) {
343                         radeon_fence_unref(&old_fence);
344                 }
345         }
346         return 0;
347 }
348
349 void radeon_bo_list_unvalidate(struct list_head *head, void *fence)
350 {
351         struct radeon_bo_list *lobj;
352         struct radeon_fence *old_fence;
353
354         if (fence)
355                 list_for_each_entry(lobj, head, list) {
356                         old_fence = to_radeon_fence(lobj->bo->tbo.sync_obj);
357                         if (old_fence == fence) {
358                                 lobj->bo->tbo.sync_obj = NULL;
359                                 radeon_fence_unref(&old_fence);
360                         }
361                 }
362         radeon_bo_list_unreserve(head);
363 }
364
365 int radeon_bo_fbdev_mmap(struct radeon_bo *bo,
366                              struct vm_area_struct *vma)
367 {
368         return ttm_fbdev_mmap(vma, &bo->tbo);
369 }
370
371 int radeon_bo_get_surface_reg(struct radeon_bo *bo)
372 {
373         struct radeon_device *rdev = bo->rdev;
374         struct radeon_surface_reg *reg;
375         struct radeon_bo *old_object;
376         int steal;
377         int i;
378
379         BUG_ON(!atomic_read(&bo->tbo.reserved));
380
381         if (!bo->tiling_flags)
382                 return 0;
383
384         if (bo->surface_reg >= 0) {
385                 reg = &rdev->surface_regs[bo->surface_reg];
386                 i = bo->surface_reg;
387                 goto out;
388         }
389
390         steal = -1;
391         for (i = 0; i < RADEON_GEM_MAX_SURFACES; i++) {
392
393                 reg = &rdev->surface_regs[i];
394                 if (!reg->bo)
395                         break;
396
397                 old_object = reg->bo;
398                 if (old_object->pin_count == 0)
399                         steal = i;
400         }
401
402         /* if we are all out */
403         if (i == RADEON_GEM_MAX_SURFACES) {
404                 if (steal == -1)
405                         return -ENOMEM;
406                 /* find someone with a surface reg and nuke their BO */
407                 reg = &rdev->surface_regs[steal];
408                 old_object = reg->bo;
409                 /* blow away the mapping */
410                 DRM_DEBUG("stealing surface reg %d from %p\n", steal, old_object);
411                 ttm_bo_unmap_virtual(&old_object->tbo);
412                 old_object->surface_reg = -1;
413                 i = steal;
414         }
415
416         bo->surface_reg = i;
417         reg->bo = bo;
418
419 out:
420         radeon_set_surface_reg(rdev, i, bo->tiling_flags, bo->pitch,
421                                bo->tbo.mem.mm_node->start << PAGE_SHIFT,
422                                bo->tbo.num_pages << PAGE_SHIFT);
423         return 0;
424 }
425
426 static void radeon_bo_clear_surface_reg(struct radeon_bo *bo)
427 {
428         struct radeon_device *rdev = bo->rdev;
429         struct radeon_surface_reg *reg;
430
431         if (bo->surface_reg == -1)
432                 return;
433
434         reg = &rdev->surface_regs[bo->surface_reg];
435         radeon_clear_surface_reg(rdev, bo->surface_reg);
436
437         reg->bo = NULL;
438         bo->surface_reg = -1;
439 }
440
441 int radeon_bo_set_tiling_flags(struct radeon_bo *bo,
442                                 uint32_t tiling_flags, uint32_t pitch)
443 {
444         int r;
445
446         r = radeon_bo_reserve(bo, false);
447         if (unlikely(r != 0))
448                 return r;
449         bo->tiling_flags = tiling_flags;
450         bo->pitch = pitch;
451         radeon_bo_unreserve(bo);
452         return 0;
453 }
454
455 void radeon_bo_get_tiling_flags(struct radeon_bo *bo,
456                                 uint32_t *tiling_flags,
457                                 uint32_t *pitch)
458 {
459         BUG_ON(!atomic_read(&bo->tbo.reserved));
460         if (tiling_flags)
461                 *tiling_flags = bo->tiling_flags;
462         if (pitch)
463                 *pitch = bo->pitch;
464 }
465
466 int radeon_bo_check_tiling(struct radeon_bo *bo, bool has_moved,
467                                 bool force_drop)
468 {
469         BUG_ON(!atomic_read(&bo->tbo.reserved));
470
471         if (!(bo->tiling_flags & RADEON_TILING_SURFACE))
472                 return 0;
473
474         if (force_drop) {
475                 radeon_bo_clear_surface_reg(bo);
476                 return 0;
477         }
478
479         if (bo->tbo.mem.mem_type != TTM_PL_VRAM) {
480                 if (!has_moved)
481                         return 0;
482
483                 if (bo->surface_reg >= 0)
484                         radeon_bo_clear_surface_reg(bo);
485                 return 0;
486         }
487
488         if ((bo->surface_reg >= 0) && !has_moved)
489                 return 0;
490
491         return radeon_bo_get_surface_reg(bo);
492 }
493
494 void radeon_bo_move_notify(struct ttm_buffer_object *bo,
495                            struct ttm_mem_reg *mem)
496 {
497         struct radeon_bo *rbo;
498         if (!radeon_ttm_bo_is_radeon_bo(bo))
499                 return;
500         rbo = container_of(bo, struct radeon_bo, tbo);
501         radeon_bo_check_tiling(rbo, 0, 1);
502 }
503
504 void radeon_bo_fault_reserve_notify(struct ttm_buffer_object *bo)
505 {
506         struct radeon_bo *rbo;
507         if (!radeon_ttm_bo_is_radeon_bo(bo))
508                 return;
509         rbo = container_of(bo, struct radeon_bo, tbo);
510         radeon_bo_check_tiling(rbo, 0, 0);
511 }