src/gallium/auxiliary/pipebuffer/pb_bufmgr_cache.c

   1 /**************************************************************************
   2  *
   3  * Copyright 2007-2008 Tungsten Graphics, Inc., Cedar Park, Texas.
   4  * All Rights Reserved.
   5  *
   6  * Permission is hereby granted, free of charge, to any person obtaining a
   7  * copy of this software and associated documentation files (the
   8  * "Software"), to deal in the Software without restriction, including
   9  * without limitation the rights to use, copy, modify, merge, publish,
  10  * distribute, sub license, and/or sell copies of the Software, and to
  11  * permit persons to whom the Software is furnished to do so, subject to
  12  * the following conditions:
  13  *
  14  * The above copyright notice and this permission notice (including the
  15  * next paragraph) shall be included in all copies or substantial portions
  16  * of the Software.
  17  *
  18  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  19  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  20  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
  21  * IN NO EVENT SHALL TUNGSTEN GRAPHICS AND/OR ITS SUPPLIERS BE LIABLE FOR
  22  * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
  23  * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
  24  * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  25  *
  26  **************************************************************************/
  27
  28 /**
  29  * \file
  30  * Buffer cache.
  31  *
  32  * \author Jose Fonseca <jrfonseca-at-tungstengraphics-dot-com>
  33  * \author Thomas Hellström <thomas-at-tungstengraphics-dot-com>
  34  */
  35
  36
  37 #include "pipe/p_compiler.h"
  38 #include "util/u_debug.h"
  39 #include "os/os_thread.h"
  40 #include "util/u_memory.h"
  41 #include "util/u_double_list.h"
  42 #include "util/u_time.h"
  43
  44 #include "pb_buffer.h"
  45 #include "pb_bufmgr.h"
  46
  47
  48 /**
  49  * Convenience macro (type safe).
  50  */
  51 #define SUPER(__derived) (&(__derived)->base)
  52
  53
  54 struct pb_cache_manager;
  55
  56
  57 /**
  58  * Wrapper around a pipe buffer which adds delayed destruction.
  59  */
  60 struct pb_cache_buffer
  61 {
  62    struct pb_buffer base;
  63
  64    struct pb_buffer *buffer;
  65    struct pb_cache_manager *mgr;
  66
  67    /** Caching time interval */
  68    int64_t start, end;
  69
  70    struct list_head head;
  71 };
  72
  73
  74 struct pb_cache_manager
  75 {
  76    struct pb_manager base;
  77
  78    struct pb_manager *provider;
  79    unsigned usecs;
  80
  81    pipe_mutex mutex;
  82
  83    struct list_head delayed;
  84    pb_size numDelayed;
  85 };
  86
  87
  88 static INLINE struct pb_cache_buffer *
  89 pb_cache_buffer(struct pb_buffer *buf)
  90 {
  91    assert(buf);
  92    return (struct pb_cache_buffer *)buf;
  93 }
  94
  95
  96 static INLINE struct pb_cache_manager *
  97 pb_cache_manager(struct pb_manager *mgr)
  98 {
  99    assert(mgr);
 100    return (struct pb_cache_manager *)mgr;
 101 }
 102
 103
 104 /**
 105  * Actually destroy the buffer.
 106  */
 107 static INLINE void
 108 _pb_cache_buffer_destroy(struct pb_cache_buffer *buf)
 109 {
 110    struct pb_cache_manager *mgr = buf->mgr;
 111
 112    LIST_DEL(&buf->head);
 113    assert(mgr->numDelayed);
 114    --mgr->numDelayed;
 115    assert(!pipe_is_referenced(&buf->base.base.reference));
 116    pb_reference(&buf->buffer, NULL);
 117    FREE(buf);
 118 }
 119
 120
 121 /**
 122  * Free as many cache buffers from the list head as possible.
 123  */
 124 static void
 125 _pb_cache_buffer_list_check_free(struct pb_cache_manager *mgr)
 126 {
 127    struct list_head *curr, *next;
 128    struct pb_cache_buffer *buf;
 129    int64_t now;
 130
 131    now = os_time_get();
 132
 133    curr = mgr->delayed.next;
 134    next = curr->next;
 135    while(curr != &mgr->delayed) {
 136       buf = LIST_ENTRY(struct pb_cache_buffer, curr, head);
 137
 138       if(!os_time_timeout(buf->start, buf->end, now))
 139          break;
 140
 141       _pb_cache_buffer_destroy(buf);
 142
 143       curr = next;
 144       next = curr->next;
 145    }
 146 }
 147
 148
 149 static void
 150 pb_cache_buffer_destroy(struct pb_buffer *_buf)
 151 {
 152    struct pb_cache_buffer *buf = pb_cache_buffer(_buf);
 153    struct pb_cache_manager *mgr = buf->mgr;
 154
 155    pipe_mutex_lock(mgr->mutex);
 156    assert(!pipe_is_referenced(&buf->base.base.reference));
 157
 158    _pb_cache_buffer_list_check_free(mgr);
 159
 160    buf->start = os_time_get();
 161    buf->end = buf->start + mgr->usecs;
 162    LIST_ADDTAIL(&buf->head, &mgr->delayed);
 163    ++mgr->numDelayed;
 164    pipe_mutex_unlock(mgr->mutex);
 165 }
 166
 167
 168 static void *
 169 pb_cache_buffer_map(struct pb_buffer *_buf,
 170                     unsigned flags, void *flush_ctx)
 171 {
 172    struct pb_cache_buffer *buf = pb_cache_buffer(_buf);
 173    return pb_map(buf->buffer, flags, flush_ctx);
 174 }
 175
 176
 177 static void
 178 pb_cache_buffer_unmap(struct pb_buffer *_buf)
 179 {
 180    struct pb_cache_buffer *buf = pb_cache_buffer(_buf);
 181    pb_unmap(buf->buffer);
 182 }
 183
 184
 185 static enum pipe_error
 186 pb_cache_buffer_validate(struct pb_buffer *_buf,
 187                          struct pb_validate *vl,
 188                          unsigned flags)
 189 {
 190    struct pb_cache_buffer *buf = pb_cache_buffer(_buf);
 191    return pb_validate(buf->buffer, vl, flags);
 192 }
 193
 194
 195 static void
 196 pb_cache_buffer_fence(struct pb_buffer *_buf,
 197                       struct pipe_fence_handle *fence)
 198 {
 199    struct pb_cache_buffer *buf = pb_cache_buffer(_buf);
 200    pb_fence(buf->buffer, fence);
 201 }
 202
 203
 204 static void
 205 pb_cache_buffer_get_base_buffer(struct pb_buffer *_buf,
 206                               struct pb_buffer **base_buf,
 207                               pb_size *offset)
 208 {
 209    struct pb_cache_buffer *buf = pb_cache_buffer(_buf);
 210    pb_get_base_buffer(buf->buffer, base_buf, offset);
 211 }
 212
 213
 214 const struct pb_vtbl
 215 pb_cache_buffer_vtbl = {
 216       pb_cache_buffer_destroy,
 217       pb_cache_buffer_map,
 218       pb_cache_buffer_unmap,
 219       pb_cache_buffer_validate,
 220       pb_cache_buffer_fence,
 221       pb_cache_buffer_get_base_buffer
 222 };
 223
 224
 225 static INLINE int
 226 pb_cache_is_buffer_compat(struct pb_cache_buffer *buf,
 227                           pb_size size,
 228                           const struct pb_desc *desc)
 229 {
 230    void *map;
 231
 232    if(buf->base.base.size < size)
 233       return 0;
 234
 235    /* be lenient with size */
 236    if(buf->base.base.size >= 2*size)
 237       return 0;
 238
 239    if(!pb_check_alignment(desc->alignment, buf->base.base.alignment))
 240       return 0;
 241
 242    if(!pb_check_usage(desc->usage, buf->base.base.usage))
 243       return 0;
 244
 245    map = pb_map(buf->buffer, PB_USAGE_DONTBLOCK, NULL);
 246    if (!map) {
 247       return -1;
 248    }
 249
 250    pb_unmap(buf->buffer);
 251
 252    return 1;
 253 }
 254
 255
 256 static struct pb_buffer *
 257 pb_cache_manager_create_buffer(struct pb_manager *_mgr,
 258                                pb_size size,
 259                                const struct pb_desc *desc)
 260 {
 261    struct pb_cache_manager *mgr = pb_cache_manager(_mgr);
 262    struct pb_cache_buffer *buf;
 263    struct pb_cache_buffer *curr_buf;
 264    struct list_head *curr, *next;
 265    int64_t now;
 266    int ret = 0;
 267
 268    pipe_mutex_lock(mgr->mutex);
 269
 270    buf = NULL;
 271    curr = mgr->delayed.next;
 272    next = curr->next;
 273
 274    /* search in the expired buffers, freeing them in the process */
 275    now = os_time_get();
 276    while(curr != &mgr->delayed) {
 277       curr_buf = LIST_ENTRY(struct pb_cache_buffer, curr, head);
 278       if(!buf && (ret = pb_cache_is_buffer_compat(curr_buf, size, desc) > 0))
 279          buf = curr_buf;
 280       else if(os_time_timeout(curr_buf->start, curr_buf->end, now))
 281          _pb_cache_buffer_destroy(curr_buf);
 282       else
 283          /* This buffer (and all hereafter) are still hot in cache */
 284          break;
 285       if (ret == -1)
 286          break;
 287       curr = next;
 288       next = curr->next;
 289    }
 290
 291    /* keep searching in the hot buffers */
 292    if(!buf && ret != -1) {
 293       while(curr != &mgr->delayed) {
 294          curr_buf = LIST_ENTRY(struct pb_cache_buffer, curr, head);
 295          ret = pb_cache_is_buffer_compat(curr_buf, size, desc);
 296          if (ret > 0) {
 297             buf = curr_buf;
 298             break;
 299          }
 300          if (ret == -1)
 301             break;
 302          /* no need to check the timeout here */
 303          curr = next;
 304          next = curr->next;
 305       }
 306    }
 307
 308    if(buf) {
 309       LIST_DEL(&buf->head);
 310       pipe_mutex_unlock(mgr->mutex);
 311       /* Increase refcount */
 312       pipe_reference_init(&buf->base.base.reference, 1);
 313       return &buf->base;
 314    }
 315
 316    pipe_mutex_unlock(mgr->mutex);
 317
 318    buf = CALLOC_STRUCT(pb_cache_buffer);
 319    if(!buf)
 320       return NULL;
 321
 322    buf->buffer = mgr->provider->create_buffer(mgr->provider, size, desc);
 323    if(!buf->buffer) {
 324       FREE(buf);
 325       return NULL;
 326    }
 327
 328    assert(pipe_is_referenced(&buf->buffer->base.reference));
 329    assert(pb_check_alignment(desc->alignment, buf->buffer->base.alignment));
 330    assert(pb_check_usage(desc->usage, buf->buffer->base.usage));
 331    assert(buf->buffer->base.size >= size);
 332
 333    pipe_reference_init(&buf->base.base.reference, 1);
 334    buf->base.base.alignment = buf->buffer->base.alignment;
 335    buf->base.base.usage = buf->buffer->base.usage;
 336    buf->base.base.size = buf->buffer->base.size;
 337
 338    buf->base.vtbl = &pb_cache_buffer_vtbl;
 339    buf->mgr = mgr;
 340
 341    return &buf->base;
 342 }
 343
 344
 345 static void
 346 pb_cache_manager_flush(struct pb_manager *_mgr)
 347 {
 348    struct pb_cache_manager *mgr = pb_cache_manager(_mgr);
 349    struct list_head *curr, *next;
 350    struct pb_cache_buffer *buf;
 351
 352    pipe_mutex_lock(mgr->mutex);
 353    curr = mgr->delayed.next;
 354    next = curr->next;
 355    while(curr != &mgr->delayed) {
 356       buf = LIST_ENTRY(struct pb_cache_buffer, curr, head);
 357       _pb_cache_buffer_destroy(buf);
 358       curr = next;
 359       next = curr->next;
 360    }
 361    pipe_mutex_unlock(mgr->mutex);
 362
 363    assert(mgr->provider->flush);
 364    if(mgr->provider->flush)
 365       mgr->provider->flush(mgr->provider);
 366 }
 367
 368
 369 static void
 370 pb_cache_manager_destroy(struct pb_manager *mgr)
 371 {
 372    pb_cache_manager_flush(mgr);
 373    FREE(mgr);
 374 }
 375
 376
 377 struct pb_manager *
 378 pb_cache_manager_create(struct pb_manager *provider,
 379                         unsigned usecs)
 380 {
 381    struct pb_cache_manager *mgr;
 382
 383    if(!provider)
 384       return NULL;
 385
 386    mgr = CALLOC_STRUCT(pb_cache_manager);
 387    if (!mgr)
 388       return NULL;
 389
 390    mgr->base.destroy = pb_cache_manager_destroy;
 391    mgr->base.create_buffer = pb_cache_manager_create_buffer;
 392    mgr->base.flush = pb_cache_manager_flush;
 393    mgr->provider = provider;
 394    mgr->usecs = usecs;
 395    LIST_INITHEAD(&mgr->delayed);
 396    mgr->numDelayed = 0;
 397    pipe_mutex_init(mgr->mutex);
 398
 399    return &mgr->base;
 400 }