Add the rt linux 4.1.3-rt3 as base
[kvmfornfv.git] / kernel / drivers / gpu / drm / cirrus / cirrus_ttm.c
1 /*
2  * Copyright 2012 Red Hat Inc.
3  *
4  * Permission is hereby granted, free of charge, to any person obtaining a
5  * copy of this software and associated documentation files (the
6  * "Software"), to deal in the Software without restriction, including
7  * without limitation the rights to use, copy, modify, merge, publish,
8  * distribute, sub license, and/or sell copies of the Software, and to
9  * permit persons to whom the Software is furnished to do so, subject to
10  * the following conditions:
11  *
12  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
13  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
14  * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
15  * THE COPYRIGHT HOLDERS, AUTHORS AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM,
16  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
17  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
18  * USE OR OTHER DEALINGS IN THE SOFTWARE.
19  *
20  * The above copyright notice and this permission notice (including the
21  * next paragraph) shall be included in all copies or substantial portions
22  * of the Software.
23  *
24  */
25 /*
26  * Authors: Dave Airlie <airlied@redhat.com>
27  */
28 #include <drm/drmP.h>
29 #include "cirrus_drv.h"
30 #include <ttm/ttm_page_alloc.h>
31
32 static inline struct cirrus_device *
33 cirrus_bdev(struct ttm_bo_device *bd)
34 {
35         return container_of(bd, struct cirrus_device, ttm.bdev);
36 }
37
38 static int
39 cirrus_ttm_mem_global_init(struct drm_global_reference *ref)
40 {
41         return ttm_mem_global_init(ref->object);
42 }
43
44 static void
45 cirrus_ttm_mem_global_release(struct drm_global_reference *ref)
46 {
47         ttm_mem_global_release(ref->object);
48 }
49
50 static int cirrus_ttm_global_init(struct cirrus_device *cirrus)
51 {
52         struct drm_global_reference *global_ref;
53         int r;
54
55         global_ref = &cirrus->ttm.mem_global_ref;
56         global_ref->global_type = DRM_GLOBAL_TTM_MEM;
57         global_ref->size = sizeof(struct ttm_mem_global);
58         global_ref->init = &cirrus_ttm_mem_global_init;
59         global_ref->release = &cirrus_ttm_mem_global_release;
60         r = drm_global_item_ref(global_ref);
61         if (r != 0) {
62                 DRM_ERROR("Failed setting up TTM memory accounting "
63                           "subsystem.\n");
64                 return r;
65         }
66
67         cirrus->ttm.bo_global_ref.mem_glob =
68                 cirrus->ttm.mem_global_ref.object;
69         global_ref = &cirrus->ttm.bo_global_ref.ref;
70         global_ref->global_type = DRM_GLOBAL_TTM_BO;
71         global_ref->size = sizeof(struct ttm_bo_global);
72         global_ref->init = &ttm_bo_global_init;
73         global_ref->release = &ttm_bo_global_release;
74         r = drm_global_item_ref(global_ref);
75         if (r != 0) {
76                 DRM_ERROR("Failed setting up TTM BO subsystem.\n");
77                 drm_global_item_unref(&cirrus->ttm.mem_global_ref);
78                 return r;
79         }
80         return 0;
81 }
82
83 static void
84 cirrus_ttm_global_release(struct cirrus_device *cirrus)
85 {
86         if (cirrus->ttm.mem_global_ref.release == NULL)
87                 return;
88
89         drm_global_item_unref(&cirrus->ttm.bo_global_ref.ref);
90         drm_global_item_unref(&cirrus->ttm.mem_global_ref);
91         cirrus->ttm.mem_global_ref.release = NULL;
92 }
93
94
95 static void cirrus_bo_ttm_destroy(struct ttm_buffer_object *tbo)
96 {
97         struct cirrus_bo *bo;
98
99         bo = container_of(tbo, struct cirrus_bo, bo);
100
101         drm_gem_object_release(&bo->gem);
102         kfree(bo);
103 }
104
105 static bool cirrus_ttm_bo_is_cirrus_bo(struct ttm_buffer_object *bo)
106 {
107         if (bo->destroy == &cirrus_bo_ttm_destroy)
108                 return true;
109         return false;
110 }
111
112 static int
113 cirrus_bo_init_mem_type(struct ttm_bo_device *bdev, uint32_t type,
114                      struct ttm_mem_type_manager *man)
115 {
116         switch (type) {
117         case TTM_PL_SYSTEM:
118                 man->flags = TTM_MEMTYPE_FLAG_MAPPABLE;
119                 man->available_caching = TTM_PL_MASK_CACHING;
120                 man->default_caching = TTM_PL_FLAG_CACHED;
121                 break;
122         case TTM_PL_VRAM:
123                 man->func = &ttm_bo_manager_func;
124                 man->flags = TTM_MEMTYPE_FLAG_FIXED |
125                         TTM_MEMTYPE_FLAG_MAPPABLE;
126                 man->available_caching = TTM_PL_FLAG_UNCACHED |
127                         TTM_PL_FLAG_WC;
128                 man->default_caching = TTM_PL_FLAG_WC;
129                 break;
130         default:
131                 DRM_ERROR("Unsupported memory type %u\n", (unsigned)type);
132                 return -EINVAL;
133         }
134         return 0;
135 }
136
137 static void
138 cirrus_bo_evict_flags(struct ttm_buffer_object *bo, struct ttm_placement *pl)
139 {
140         struct cirrus_bo *cirrusbo = cirrus_bo(bo);
141
142         if (!cirrus_ttm_bo_is_cirrus_bo(bo))
143                 return;
144
145         cirrus_ttm_placement(cirrusbo, TTM_PL_FLAG_SYSTEM);
146         *pl = cirrusbo->placement;
147 }
148
149 static int cirrus_bo_verify_access(struct ttm_buffer_object *bo, struct file *filp)
150 {
151         struct cirrus_bo *cirrusbo = cirrus_bo(bo);
152
153         return drm_vma_node_verify_access(&cirrusbo->gem.vma_node, filp);
154 }
155
156 static int cirrus_ttm_io_mem_reserve(struct ttm_bo_device *bdev,
157                                   struct ttm_mem_reg *mem)
158 {
159         struct ttm_mem_type_manager *man = &bdev->man[mem->mem_type];
160         struct cirrus_device *cirrus = cirrus_bdev(bdev);
161
162         mem->bus.addr = NULL;
163         mem->bus.offset = 0;
164         mem->bus.size = mem->num_pages << PAGE_SHIFT;
165         mem->bus.base = 0;
166         mem->bus.is_iomem = false;
167         if (!(man->flags & TTM_MEMTYPE_FLAG_MAPPABLE))
168                 return -EINVAL;
169         switch (mem->mem_type) {
170         case TTM_PL_SYSTEM:
171                 /* system memory */
172                 return 0;
173         case TTM_PL_VRAM:
174                 mem->bus.offset = mem->start << PAGE_SHIFT;
175                 mem->bus.base = pci_resource_start(cirrus->dev->pdev, 0);
176                 mem->bus.is_iomem = true;
177                 break;
178         default:
179                 return -EINVAL;
180                 break;
181         }
182         return 0;
183 }
184
185 static void cirrus_ttm_io_mem_free(struct ttm_bo_device *bdev, struct ttm_mem_reg *mem)
186 {
187 }
188
189 static int cirrus_bo_move(struct ttm_buffer_object *bo,
190                        bool evict, bool interruptible,
191                        bool no_wait_gpu,
192                        struct ttm_mem_reg *new_mem)
193 {
194         int r;
195         r = ttm_bo_move_memcpy(bo, evict, no_wait_gpu, new_mem);
196         return r;
197 }
198
199
200 static void cirrus_ttm_backend_destroy(struct ttm_tt *tt)
201 {
202         ttm_tt_fini(tt);
203         kfree(tt);
204 }
205
206 static struct ttm_backend_func cirrus_tt_backend_func = {
207         .destroy = &cirrus_ttm_backend_destroy,
208 };
209
210
211 static struct ttm_tt *cirrus_ttm_tt_create(struct ttm_bo_device *bdev,
212                                  unsigned long size, uint32_t page_flags,
213                                  struct page *dummy_read_page)
214 {
215         struct ttm_tt *tt;
216
217         tt = kzalloc(sizeof(struct ttm_tt), GFP_KERNEL);
218         if (tt == NULL)
219                 return NULL;
220         tt->func = &cirrus_tt_backend_func;
221         if (ttm_tt_init(tt, bdev, size, page_flags, dummy_read_page)) {
222                 kfree(tt);
223                 return NULL;
224         }
225         return tt;
226 }
227
228 static int cirrus_ttm_tt_populate(struct ttm_tt *ttm)
229 {
230         return ttm_pool_populate(ttm);
231 }
232
233 static void cirrus_ttm_tt_unpopulate(struct ttm_tt *ttm)
234 {
235         ttm_pool_unpopulate(ttm);
236 }
237
238 struct ttm_bo_driver cirrus_bo_driver = {
239         .ttm_tt_create = cirrus_ttm_tt_create,
240         .ttm_tt_populate = cirrus_ttm_tt_populate,
241         .ttm_tt_unpopulate = cirrus_ttm_tt_unpopulate,
242         .init_mem_type = cirrus_bo_init_mem_type,
243         .evict_flags = cirrus_bo_evict_flags,
244         .move = cirrus_bo_move,
245         .verify_access = cirrus_bo_verify_access,
246         .io_mem_reserve = &cirrus_ttm_io_mem_reserve,
247         .io_mem_free = &cirrus_ttm_io_mem_free,
248 };
249
250 int cirrus_mm_init(struct cirrus_device *cirrus)
251 {
252         int ret;
253         struct drm_device *dev = cirrus->dev;
254         struct ttm_bo_device *bdev = &cirrus->ttm.bdev;
255
256         ret = cirrus_ttm_global_init(cirrus);
257         if (ret)
258                 return ret;
259
260         ret = ttm_bo_device_init(&cirrus->ttm.bdev,
261                                  cirrus->ttm.bo_global_ref.ref.object,
262                                  &cirrus_bo_driver,
263                                  dev->anon_inode->i_mapping,
264                                  DRM_FILE_PAGE_OFFSET,
265                                  true);
266         if (ret) {
267                 DRM_ERROR("Error initialising bo driver; %d\n", ret);
268                 return ret;
269         }
270
271         ret = ttm_bo_init_mm(bdev, TTM_PL_VRAM,
272                              cirrus->mc.vram_size >> PAGE_SHIFT);
273         if (ret) {
274                 DRM_ERROR("Failed ttm VRAM init: %d\n", ret);
275                 return ret;
276         }
277
278         cirrus->fb_mtrr = arch_phys_wc_add(pci_resource_start(dev->pdev, 0),
279                                            pci_resource_len(dev->pdev, 0));
280
281         cirrus->mm_inited = true;
282         return 0;
283 }
284
285 void cirrus_mm_fini(struct cirrus_device *cirrus)
286 {
287         if (!cirrus->mm_inited)
288                 return;
289
290         ttm_bo_device_release(&cirrus->ttm.bdev);
291
292         cirrus_ttm_global_release(cirrus);
293
294         arch_phys_wc_del(cirrus->fb_mtrr);
295         cirrus->fb_mtrr = 0;
296 }
297
298 void cirrus_ttm_placement(struct cirrus_bo *bo, int domain)
299 {
300         u32 c = 0;
301         unsigned i;
302         bo->placement.placement = bo->placements;
303         bo->placement.busy_placement = bo->placements;
304         if (domain & TTM_PL_FLAG_VRAM)
305                 bo->placements[c++].flags = TTM_PL_FLAG_WC | TTM_PL_FLAG_UNCACHED | TTM_PL_FLAG_VRAM;
306         if (domain & TTM_PL_FLAG_SYSTEM)
307                 bo->placements[c++].flags = TTM_PL_MASK_CACHING | TTM_PL_FLAG_SYSTEM;
308         if (!c)
309                 bo->placements[c++].flags = TTM_PL_MASK_CACHING | TTM_PL_FLAG_SYSTEM;
310         bo->placement.num_placement = c;
311         bo->placement.num_busy_placement = c;
312         for (i = 0; i < c; ++i) {
313                 bo->placements[i].fpfn = 0;
314                 bo->placements[i].lpfn = 0;
315         }
316 }
317
318 int cirrus_bo_create(struct drm_device *dev, int size, int align,
319                   uint32_t flags, struct cirrus_bo **pcirrusbo)
320 {
321         struct cirrus_device *cirrus = dev->dev_private;
322         struct cirrus_bo *cirrusbo;
323         size_t acc_size;
324         int ret;
325
326         cirrusbo = kzalloc(sizeof(struct cirrus_bo), GFP_KERNEL);
327         if (!cirrusbo)
328                 return -ENOMEM;
329
330         ret = drm_gem_object_init(dev, &cirrusbo->gem, size);
331         if (ret) {
332                 kfree(cirrusbo);
333                 return ret;
334         }
335
336         cirrusbo->bo.bdev = &cirrus->ttm.bdev;
337
338         cirrus_ttm_placement(cirrusbo, TTM_PL_FLAG_VRAM | TTM_PL_FLAG_SYSTEM);
339
340         acc_size = ttm_bo_dma_acc_size(&cirrus->ttm.bdev, size,
341                                        sizeof(struct cirrus_bo));
342
343         ret = ttm_bo_init(&cirrus->ttm.bdev, &cirrusbo->bo, size,
344                           ttm_bo_type_device, &cirrusbo->placement,
345                           align >> PAGE_SHIFT, false, NULL, acc_size,
346                           NULL, NULL, cirrus_bo_ttm_destroy);
347         if (ret)
348                 return ret;
349
350         *pcirrusbo = cirrusbo;
351         return 0;
352 }
353
354 static inline u64 cirrus_bo_gpu_offset(struct cirrus_bo *bo)
355 {
356         return bo->bo.offset;
357 }
358
359 int cirrus_bo_pin(struct cirrus_bo *bo, u32 pl_flag, u64 *gpu_addr)
360 {
361         int i, ret;
362
363         if (bo->pin_count) {
364                 bo->pin_count++;
365                 if (gpu_addr)
366                         *gpu_addr = cirrus_bo_gpu_offset(bo);
367         }
368
369         cirrus_ttm_placement(bo, pl_flag);
370         for (i = 0; i < bo->placement.num_placement; i++)
371                 bo->placements[i].flags |= TTM_PL_FLAG_NO_EVICT;
372         ret = ttm_bo_validate(&bo->bo, &bo->placement, false, false);
373         if (ret)
374                 return ret;
375
376         bo->pin_count = 1;
377         if (gpu_addr)
378                 *gpu_addr = cirrus_bo_gpu_offset(bo);
379         return 0;
380 }
381
382 int cirrus_bo_push_sysram(struct cirrus_bo *bo)
383 {
384         int i, ret;
385         if (!bo->pin_count) {
386                 DRM_ERROR("unpin bad %p\n", bo);
387                 return 0;
388         }
389         bo->pin_count--;
390         if (bo->pin_count)
391                 return 0;
392
393         if (bo->kmap.virtual)
394                 ttm_bo_kunmap(&bo->kmap);
395
396         cirrus_ttm_placement(bo, TTM_PL_FLAG_SYSTEM);
397         for (i = 0; i < bo->placement.num_placement ; i++)
398                 bo->placements[i].flags |= TTM_PL_FLAG_NO_EVICT;
399
400         ret = ttm_bo_validate(&bo->bo, &bo->placement, false, false);
401         if (ret) {
402                 DRM_ERROR("pushing to VRAM failed\n");
403                 return ret;
404         }
405         return 0;
406 }
407
408 int cirrus_mmap(struct file *filp, struct vm_area_struct *vma)
409 {
410         struct drm_file *file_priv;
411         struct cirrus_device *cirrus;
412
413         if (unlikely(vma->vm_pgoff < DRM_FILE_PAGE_OFFSET))
414                 return -EINVAL;
415
416         file_priv = filp->private_data;
417         cirrus = file_priv->minor->dev->dev_private;
418         return ttm_bo_mmap(filp, vma, &cirrus->ttm.bdev);
419 }