2 * Copyright © 2014-2017 Broadcom
4 * Permission is hereby granted, free of charge, to any person obtaining a
5 * copy of this software and associated documentation files (the "Software"),
6 * to deal in the Software without restriction, including without limitation
7 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, subject to the following conditions:
11 * The above copyright notice and this permission notice (including the next
12 * paragraph) shall be included in all copies or substantial portions of the
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
29 #include <xf86drmMode.h>
31 #include "util/u_hash_table.h"
32 #include "util/u_memory.h"
33 #include "util/ralloc.h"
35 #include "vc5_context.h"
36 #include "vc5_screen.h"
46 static bool dump_stats
= false;
49 vc5_bo_cache_free_all(struct vc5_bo_cache
*cache
);
52 vc5_bo_dump_stats(struct vc5_screen
*screen
)
54 struct vc5_bo_cache
*cache
= &screen
->bo_cache
;
56 fprintf(stderr
, " BOs allocated: %d\n", screen
->bo_count
);
57 fprintf(stderr
, " BOs size: %dkb\n", screen
->bo_size
/ 1024);
58 fprintf(stderr
, " BOs cached: %d\n", cache
->bo_count
);
59 fprintf(stderr
, " BOs cached size: %dkb\n", cache
->bo_size
/ 1024);
61 if (!list_empty(&cache
->time_list
)) {
62 struct vc5_bo
*first
= LIST_ENTRY(struct vc5_bo
,
63 cache
->time_list
.next
,
65 struct vc5_bo
*last
= LIST_ENTRY(struct vc5_bo
,
66 cache
->time_list
.prev
,
69 fprintf(stderr
, " oldest cache time: %ld\n",
70 (long)first
->free_time
);
71 fprintf(stderr
, " newest cache time: %ld\n",
72 (long)last
->free_time
);
75 clock_gettime(CLOCK_MONOTONIC
, &time
);
76 fprintf(stderr
, " now: %ld\n",
82 vc5_bo_remove_from_cache(struct vc5_bo_cache
*cache
, struct vc5_bo
*bo
)
84 list_del(&bo
->time_list
);
85 list_del(&bo
->size_list
);
87 cache
->bo_size
-= bo
->size
;
90 static struct vc5_bo
*
91 vc5_bo_from_cache(struct vc5_screen
*screen
, uint32_t size
, const char *name
)
93 struct vc5_bo_cache
*cache
= &screen
->bo_cache
;
94 uint32_t page_index
= size
/ 4096 - 1;
96 if (cache
->size_list_size
<= page_index
)
99 struct vc5_bo
*bo
= NULL
;
100 mtx_lock(&cache
->lock
);
101 if (!list_empty(&cache
->size_list
[page_index
])) {
102 bo
= LIST_ENTRY(struct vc5_bo
, cache
->size_list
[page_index
].next
,
105 /* Check that the BO has gone idle. If not, then we want to
106 * allocate something new instead, since we assume that the
107 * user will proceed to CPU map it and fill it with stuff.
109 if (!vc5_bo_wait(bo
, 0, NULL
)) {
110 mtx_unlock(&cache
->lock
);
114 pipe_reference_init(&bo
->reference
, 1);
115 vc5_bo_remove_from_cache(cache
, bo
);
119 mtx_unlock(&cache
->lock
);
124 vc5_bo_alloc(struct vc5_screen
*screen
, uint32_t size
, const char *name
)
129 size
= align(size
, 4096);
131 bo
= vc5_bo_from_cache(screen
, size
, name
);
134 fprintf(stderr
, "Allocated %s %dkb from cache:\n",
136 vc5_bo_dump_stats(screen
);
141 bo
= CALLOC_STRUCT(vc5_bo
);
145 pipe_reference_init(&bo
->reference
, 1);
154 bool cleared_and_retried
= false;
155 struct drm_vc5_create_bo create
= {
159 ret
= vc5_ioctl(screen
->fd
, DRM_IOCTL_VC5_CREATE_BO
, &create
);
160 bo
->handle
= create
.handle
;
161 bo
->offset
= create
.offset
;
164 if (!list_empty(&screen
->bo_cache
.time_list
) &&
165 !cleared_and_retried
) {
166 cleared_and_retried
= true;
167 vc5_bo_cache_free_all(&screen
->bo_cache
);
176 screen
->bo_size
+= bo
->size
;
178 fprintf(stderr
, "Allocated %s %dkb:\n", name
, size
/ 1024);
179 vc5_bo_dump_stats(screen
);
186 vc5_bo_last_unreference(struct vc5_bo
*bo
)
188 struct vc5_screen
*screen
= bo
->screen
;
190 struct timespec time
;
191 clock_gettime(CLOCK_MONOTONIC
, &time
);
192 mtx_lock(&screen
->bo_cache
.lock
);
193 vc5_bo_last_unreference_locked_timed(bo
, time
.tv_sec
);
194 mtx_unlock(&screen
->bo_cache
.lock
);
198 vc5_bo_free(struct vc5_bo
*bo
)
200 struct vc5_screen
*screen
= bo
->screen
;
203 if (using_vc5_simulator
&& bo
->name
&&
204 strcmp(bo
->name
, "winsys") == 0) {
207 munmap(bo
->map
, bo
->size
);
208 VG(VALGRIND_FREELIKE_BLOCK(bo
->map
, 0));
212 struct drm_gem_close c
;
213 memset(&c
, 0, sizeof(c
));
214 c
.handle
= bo
->handle
;
215 int ret
= vc5_ioctl(screen
->fd
, DRM_IOCTL_GEM_CLOSE
, &c
);
217 fprintf(stderr
, "close object %d: %s\n", bo
->handle
, strerror(errno
));
220 screen
->bo_size
-= bo
->size
;
223 fprintf(stderr
, "Freed %s%s%dkb:\n",
224 bo
->name
? bo
->name
: "",
227 vc5_bo_dump_stats(screen
);
234 free_stale_bos(struct vc5_screen
*screen
, time_t time
)
236 struct vc5_bo_cache
*cache
= &screen
->bo_cache
;
237 bool freed_any
= false;
239 list_for_each_entry_safe(struct vc5_bo
, bo
, &cache
->time_list
,
241 if (dump_stats
&& !freed_any
) {
242 fprintf(stderr
, "Freeing stale BOs:\n");
243 vc5_bo_dump_stats(screen
);
247 /* If it's more than a second old, free it. */
248 if (time
- bo
->free_time
> 2) {
249 vc5_bo_remove_from_cache(cache
, bo
);
256 if (dump_stats
&& freed_any
) {
257 fprintf(stderr
, "Freed stale BOs:\n");
258 vc5_bo_dump_stats(screen
);
263 vc5_bo_cache_free_all(struct vc5_bo_cache
*cache
)
265 mtx_lock(&cache
->lock
);
266 list_for_each_entry_safe(struct vc5_bo
, bo
, &cache
->time_list
,
268 vc5_bo_remove_from_cache(cache
, bo
);
271 mtx_unlock(&cache
->lock
);
275 vc5_bo_last_unreference_locked_timed(struct vc5_bo
*bo
, time_t time
)
277 struct vc5_screen
*screen
= bo
->screen
;
278 struct vc5_bo_cache
*cache
= &screen
->bo_cache
;
279 uint32_t page_index
= bo
->size
/ 4096 - 1;
286 if (cache
->size_list_size
<= page_index
) {
287 struct list_head
*new_list
=
288 ralloc_array(screen
, struct list_head
, page_index
+ 1);
290 /* Move old list contents over (since the array has moved, and
291 * therefore the pointers to the list heads have to change).
293 for (int i
= 0; i
< cache
->size_list_size
; i
++) {
294 struct list_head
*old_head
= &cache
->size_list
[i
];
295 if (list_empty(old_head
))
296 list_inithead(&new_list
[i
]);
298 new_list
[i
].next
= old_head
->next
;
299 new_list
[i
].prev
= old_head
->prev
;
300 new_list
[i
].next
->prev
= &new_list
[i
];
301 new_list
[i
].prev
->next
= &new_list
[i
];
304 for (int i
= cache
->size_list_size
; i
< page_index
+ 1; i
++)
305 list_inithead(&new_list
[i
]);
307 cache
->size_list
= new_list
;
308 cache
->size_list_size
= page_index
+ 1;
311 bo
->free_time
= time
;
312 list_addtail(&bo
->size_list
, &cache
->size_list
[page_index
]);
313 list_addtail(&bo
->time_list
, &cache
->time_list
);
315 cache
->bo_size
+= bo
->size
;
317 fprintf(stderr
, "Freed %s %dkb to cache:\n",
318 bo
->name
, bo
->size
/ 1024);
319 vc5_bo_dump_stats(screen
);
323 free_stale_bos(screen
, time
);
326 static struct vc5_bo
*
327 vc5_bo_open_handle(struct vc5_screen
*screen
,
328 uint32_t winsys_stride
,
329 uint32_t handle
, uint32_t size
)
335 mtx_lock(&screen
->bo_handles_mutex
);
337 bo
= util_hash_table_get(screen
->bo_handles
, (void*)(uintptr_t)handle
);
339 pipe_reference(NULL
, &bo
->reference
);
343 bo
= CALLOC_STRUCT(vc5_bo
);
344 pipe_reference_init(&bo
->reference
, 1);
351 #ifdef USE_VC5_SIMULATOR
352 vc5_simulator_open_from_handle(screen
->fd
, winsys_stride
,
353 bo
->handle
, bo
->size
);
354 bo
->map
= malloc(bo
->size
);
357 struct drm_vc5_get_bo_offset get
= {
360 int ret
= vc5_ioctl(screen
->fd
, DRM_IOCTL_VC5_GET_BO_OFFSET
, &get
);
362 fprintf(stderr
, "Failed to get BO offset: %s\n",
368 bo
->offset
= get
.offset
;
369 assert(bo
->offset
!= 0);
371 util_hash_table_set(screen
->bo_handles
, (void *)(uintptr_t)handle
, bo
);
374 mtx_unlock(&screen
->bo_handles_mutex
);
379 vc5_bo_open_name(struct vc5_screen
*screen
, uint32_t name
,
380 uint32_t winsys_stride
)
382 struct drm_gem_open o
= {
385 int ret
= vc5_ioctl(screen
->fd
, DRM_IOCTL_GEM_OPEN
, &o
);
387 fprintf(stderr
, "Failed to open bo %d: %s\n",
388 name
, strerror(errno
));
392 return vc5_bo_open_handle(screen
, winsys_stride
, o
.handle
, o
.size
);
396 vc5_bo_open_dmabuf(struct vc5_screen
*screen
, int fd
, uint32_t winsys_stride
)
399 int ret
= drmPrimeFDToHandle(screen
->fd
, fd
, &handle
);
402 fprintf(stderr
, "Failed to get vc5 handle for dmabuf %d\n", fd
);
406 /* Determine the size of the bo we were handed. */
407 size
= lseek(fd
, 0, SEEK_END
);
409 fprintf(stderr
, "Couldn't get size of dmabuf fd %d.\n", fd
);
413 return vc5_bo_open_handle(screen
, winsys_stride
, handle
, size
);
417 vc5_bo_get_dmabuf(struct vc5_bo
*bo
)
420 int ret
= drmPrimeHandleToFD(bo
->screen
->fd
, bo
->handle
,
423 fprintf(stderr
, "Failed to export gem bo %d to dmabuf\n",
428 mtx_lock(&bo
->screen
->bo_handles_mutex
);
430 util_hash_table_set(bo
->screen
->bo_handles
, (void *)(uintptr_t)bo
->handle
, bo
);
431 mtx_unlock(&bo
->screen
->bo_handles_mutex
);
437 vc5_bo_flink(struct vc5_bo
*bo
, uint32_t *name
)
439 struct drm_gem_flink flink
= {
440 .handle
= bo
->handle
,
442 int ret
= vc5_ioctl(bo
->screen
->fd
, DRM_IOCTL_GEM_FLINK
, &flink
);
444 fprintf(stderr
, "Failed to flink bo %d: %s\n",
445 bo
->handle
, strerror(errno
));
456 static int vc5_wait_bo_ioctl(int fd
, uint32_t handle
, uint64_t timeout_ns
)
458 struct drm_vc5_wait_bo wait
= {
460 .timeout_ns
= timeout_ns
,
462 int ret
= vc5_ioctl(fd
, DRM_IOCTL_VC5_WAIT_BO
, &wait
);
471 vc5_bo_wait(struct vc5_bo
*bo
, uint64_t timeout_ns
, const char *reason
)
473 struct vc5_screen
*screen
= bo
->screen
;
475 if (unlikely(V3D_DEBUG
& V3D_DEBUG_PERF
) && timeout_ns
&& reason
) {
476 if (vc5_wait_bo_ioctl(screen
->fd
, bo
->handle
, 0) == -ETIME
) {
477 fprintf(stderr
, "Blocking on %s BO for %s\n",
482 int ret
= vc5_wait_bo_ioctl(screen
->fd
, bo
->handle
, timeout_ns
);
485 fprintf(stderr
, "wait failed: %d\n", ret
);
496 vc5_bo_map_unsynchronized(struct vc5_bo
*bo
)
504 struct drm_vc5_mmap_bo map
;
505 memset(&map
, 0, sizeof(map
));
506 map
.handle
= bo
->handle
;
507 ret
= vc5_ioctl(bo
->screen
->fd
, DRM_IOCTL_VC5_MMAP_BO
, &map
);
510 fprintf(stderr
, "map ioctl failure\n");
514 bo
->map
= mmap(NULL
, bo
->size
, PROT_READ
| PROT_WRITE
, MAP_SHARED
,
515 bo
->screen
->fd
, offset
);
516 if (bo
->map
== MAP_FAILED
) {
517 fprintf(stderr
, "mmap of bo %d (offset 0x%016llx, size %d) failed\n",
518 bo
->handle
, (long long)offset
, bo
->size
);
521 VG(VALGRIND_MALLOCLIKE_BLOCK(bo
->map
, bo
->size
, 0, false));
527 vc5_bo_map(struct vc5_bo
*bo
)
529 void *map
= vc5_bo_map_unsynchronized(bo
);
531 bool ok
= vc5_bo_wait(bo
, PIPE_TIMEOUT_INFINITE
, "bo map");
533 fprintf(stderr
, "BO wait for map failed\n");
541 vc5_bufmgr_destroy(struct pipe_screen
*pscreen
)
543 struct vc5_screen
*screen
= vc5_screen(pscreen
);
544 struct vc5_bo_cache
*cache
= &screen
->bo_cache
;
546 vc5_bo_cache_free_all(cache
);
549 fprintf(stderr
, "BO stats after screen destroy:\n");
550 vc5_bo_dump_stats(screen
);