src/gallium/drivers/llvmpipe/lp_texture.c

   1 /**************************************************************************
   2  *
   3  * Copyright 2006 VMware, Inc.
   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 VMWARE 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   * Authors:
  29   *   Keith Whitwell <keithw@vmware.com>
  30   *   Michel Dänzer <daenzer@vmware.com>
  31   */
  32
  33 #include <stdio.h>
  34
  35 #include "pipe/p_context.h"
  36 #include "pipe/p_defines.h"
  37
  38 #include "util/u_inlines.h"
  39 #include "util/u_cpu_detect.h"
  40 #include "util/u_format.h"
  41 #include "util/u_math.h"
  42 #include "util/u_memory.h"
  43 #include "util/simple_list.h"
  44 #include "util/u_transfer.h"
  45
  46 #include "lp_context.h"
  47 #include "lp_flush.h"
  48 #include "lp_screen.h"
  49 #include "lp_texture.h"
  50 #include "lp_setup.h"
  51 #include "lp_state.h"
  52 #include "lp_rast.h"
  53
  54 #include "state_tracker/sw_winsys.h"
  55
  56
  57 #ifdef DEBUG
  58 static struct llvmpipe_resource resource_list;
  59 #endif
  60 static unsigned id_counter = 0;
  61
  62
  63 /**
  64  * Conventional allocation path for non-display textures:
  65  * Compute strides and allocate data (unless asked not to).
  66  */
  67 static boolean
  68 llvmpipe_texture_layout(struct llvmpipe_screen *screen,
  69                         struct llvmpipe_resource *lpr,
  70                         boolean allocate)
  71 {
  72    struct pipe_resource *pt = &lpr->base;
  73    unsigned level;
  74    unsigned width = pt->width0;
  75    unsigned height = pt->height0;
  76    unsigned depth = pt->depth0;
  77    uint64_t total_size = 0;
  78    unsigned layers = pt->array_size;
  79    /* XXX:
  80     * This alignment here (same for displaytarget) was added for the purpose of
  81     * ARB_map_buffer_alignment. I am not convinced it's needed for non-buffer
  82     * resources. Otherwise we'd want the max of cacheline size and 16 (max size
  83     * of a block for all formats) though this should not be strictly necessary
  84     * neither. In any case it can only affect compressed or 1d textures.
  85     */
  86    unsigned mip_align = MAX2(64, util_cpu_caps.cacheline);
  87
  88    assert(LP_MAX_TEXTURE_2D_LEVELS <= LP_MAX_TEXTURE_LEVELS);
  89    assert(LP_MAX_TEXTURE_3D_LEVELS <= LP_MAX_TEXTURE_LEVELS);
  90
  91    for (level = 0; level <= pt->last_level; level++) {
  92       uint64_t mipsize;
  93       unsigned align_x, align_y, nblocksx, nblocksy, block_size, num_slices;
  94
  95       /* Row stride and image stride */
  96
  97       /* For non-compressed formats we need 4x4 pixel alignment
  98        * so we can read/write LP_RASTER_BLOCK_SIZE when rendering to them.
  99        * We also want cache line size in x direction,
 100        * otherwise same cache line could end up in multiple threads.
 101        * For explicit 1d resources however we reduce this to 4x1 and
 102        * handle specially in render output code (as we need to do special
 103        * handling there for buffers in any case).
 104        */
 105       if (util_format_is_compressed(pt->format))
 106          align_x = align_y = 1;
 107       else {
 108          align_x = LP_RASTER_BLOCK_SIZE;
 109          if (llvmpipe_resource_is_1d(&lpr->base))
 110             align_y = 1;
 111          else
 112             align_y = LP_RASTER_BLOCK_SIZE;
 113       }
 114
 115       nblocksx = util_format_get_nblocksx(pt->format,
 116                                           align(width, align_x));
 117       nblocksy = util_format_get_nblocksy(pt->format,
 118                                           align(height, align_y));
 119       block_size = util_format_get_blocksize(pt->format);
 120
 121       if (util_format_is_compressed(pt->format))
 122          lpr->row_stride[level] = nblocksx * block_size;
 123       else
 124          lpr->row_stride[level] = align(nblocksx * block_size, util_cpu_caps.cacheline);
 125
 126       /* if row_stride * height > LP_MAX_TEXTURE_SIZE */
 127       if ((uint64_t)lpr->row_stride[level] * nblocksy > LP_MAX_TEXTURE_SIZE) {
 128          /* image too large */
 129          goto fail;
 130       }
 131
 132       lpr->img_stride[level] = lpr->row_stride[level] * nblocksy;
 133
 134       /* Number of 3D image slices, cube faces or texture array layers */
 135       if (lpr->base.target == PIPE_TEXTURE_CUBE) {
 136          assert(layers == 6);
 137       }
 138
 139       if (lpr->base.target == PIPE_TEXTURE_3D)
 140          num_slices = depth;
 141       else if (lpr->base.target == PIPE_TEXTURE_1D_ARRAY ||
 142                lpr->base.target == PIPE_TEXTURE_2D_ARRAY ||
 143                lpr->base.target == PIPE_TEXTURE_CUBE ||
 144                lpr->base.target == PIPE_TEXTURE_CUBE_ARRAY)
 145          num_slices = layers;
 146       else
 147          num_slices = 1;
 148
 149       /* if img_stride * num_slices_faces > LP_MAX_TEXTURE_SIZE */
 150       mipsize = (uint64_t)lpr->img_stride[level] * num_slices;
 151       if (mipsize > LP_MAX_TEXTURE_SIZE) {
 152          /* volume too large */
 153          goto fail;
 154       }
 155
 156       lpr->mip_offsets[level] = total_size;
 157
 158       total_size += align((unsigned)mipsize, mip_align);
 159       if (total_size > LP_MAX_TEXTURE_SIZE) {
 160          goto fail;
 161       }
 162
 163       /* Compute size of next mipmap level */
 164       width = u_minify(width, 1);
 165       height = u_minify(height, 1);
 166       depth = u_minify(depth, 1);
 167    }
 168
 169    if (allocate) {
 170       lpr->tex_data = align_malloc(total_size, mip_align);
 171       if (!lpr->tex_data) {
 172          return FALSE;
 173       }
 174       else {
 175          memset(lpr->tex_data, 0, total_size);
 176       }
 177    }
 178
 179    return TRUE;
 180
 181 fail:
 182    return FALSE;
 183 }
 184
 185
 186 /**
 187  * Check the size of the texture specified by 'res'.
 188  * \return TRUE if OK, FALSE if too large.
 189  */
 190 static boolean
 191 llvmpipe_can_create_resource(struct pipe_screen *screen,
 192                              const struct pipe_resource *res)
 193 {
 194    struct llvmpipe_resource lpr;
 195    memset(&lpr, 0, sizeof(lpr));
 196    lpr.base = *res;
 197    return llvmpipe_texture_layout(llvmpipe_screen(screen), &lpr, false);
 198 }
 199
 200
 201 static boolean
 202 llvmpipe_displaytarget_layout(struct llvmpipe_screen *screen,
 203                               struct llvmpipe_resource *lpr,
 204                               const void *map_front_private)
 205 {
 206    struct sw_winsys *winsys = screen->winsys;
 207
 208    /* Round up the surface size to a multiple of the tile size to
 209     * avoid tile clipping.
 210     */
 211    const unsigned width = MAX2(1, align(lpr->base.width0, TILE_SIZE));
 212    const unsigned height = MAX2(1, align(lpr->base.height0, TILE_SIZE));
 213
 214    lpr->dt = winsys->displaytarget_create(winsys,
 215                                           lpr->base.bind,
 216                                           lpr->base.format,
 217                                           width, height,
 218                                           64,
 219                                           map_front_private,
 220                                           &lpr->row_stride[0] );
 221
 222    if (lpr->dt == NULL)
 223       return FALSE;
 224
 225    if (!map_front_private) {
 226       void *map = winsys->displaytarget_map(winsys, lpr->dt,
 227                                             PIPE_TRANSFER_WRITE);
 228
 229       if (map)
 230          memset(map, 0, height * lpr->row_stride[0]);
 231
 232       winsys->displaytarget_unmap(winsys, lpr->dt);
 233    }
 234
 235    return TRUE;
 236 }
 237
 238
 239 static struct pipe_resource *
 240 llvmpipe_resource_create_front(struct pipe_screen *_screen,
 241                                const struct pipe_resource *templat,
 242                                const void *map_front_private)
 243 {
 244    struct llvmpipe_screen *screen = llvmpipe_screen(_screen);
 245    struct llvmpipe_resource *lpr = CALLOC_STRUCT(llvmpipe_resource);
 246    if (!lpr)
 247       return NULL;
 248
 249    lpr->base = *templat;
 250    pipe_reference_init(&lpr->base.reference, 1);
 251    lpr->base.screen = &screen->base;
 252
 253    /* assert(lpr->base.bind); */
 254
 255    if (llvmpipe_resource_is_texture(&lpr->base)) {
 256       if (lpr->base.bind & (PIPE_BIND_DISPLAY_TARGET |
 257                             PIPE_BIND_SCANOUT |
 258                             PIPE_BIND_SHARED)) {
 259          /* displayable surface */
 260          if (!llvmpipe_displaytarget_layout(screen, lpr, map_front_private))
 261             goto fail;
 262       }
 263       else {
 264          /* texture map */
 265          if (!llvmpipe_texture_layout(screen, lpr, true))
 266             goto fail;
 267       }
 268    }
 269    else {
 270       /* other data (vertex buffer, const buffer, etc) */
 271       const uint bytes = templat->width0;
 272       assert(util_format_get_blocksize(templat->format) == 1);
 273       assert(templat->height0 == 1);
 274       assert(templat->depth0 == 1);
 275       assert(templat->last_level == 0);
 276       /*
 277        * Reserve some extra storage since if we'd render to a buffer we
 278        * read/write always LP_RASTER_BLOCK_SIZE pixels, but the element
 279        * offset doesn't need to be aligned to LP_RASTER_BLOCK_SIZE.
 280        */
 281       lpr->data = align_malloc(bytes + (LP_RASTER_BLOCK_SIZE - 1) * 4 * sizeof(float), 64);
 282
 283       /*
 284        * buffers don't really have stride but it's probably safer
 285        * (for code doing same calculations for buffers and textures)
 286        * to put something sane in there.
 287        */
 288       lpr->row_stride[0] = bytes;
 289       if (!lpr->data)
 290          goto fail;
 291       memset(lpr->data, 0, bytes);
 292    }
 293
 294    lpr->id = id_counter++;
 295
 296 #ifdef DEBUG
 297    insert_at_tail(&resource_list, lpr);
 298 #endif
 299
 300    return &lpr->base;
 301
 302  fail:
 303    FREE(lpr);
 304    return NULL;
 305 }
 306 static struct pipe_resource *
 307 llvmpipe_resource_create(struct pipe_screen *_screen,
 308                          const struct pipe_resource *templat)
 309 {
 310    return llvmpipe_resource_create_front(_screen, templat, NULL);
 311 }
 312
 313 static void
 314 llvmpipe_resource_destroy(struct pipe_screen *pscreen,
 315                           struct pipe_resource *pt)
 316 {
 317    struct llvmpipe_screen *screen = llvmpipe_screen(pscreen);
 318    struct llvmpipe_resource *lpr = llvmpipe_resource(pt);
 319
 320    if (lpr->dt) {
 321       /* display target */
 322       struct sw_winsys *winsys = screen->winsys;
 323       winsys->displaytarget_destroy(winsys, lpr->dt);
 324    }
 325    else if (llvmpipe_resource_is_texture(pt)) {
 326       /* free linear image data */
 327       if (lpr->tex_data) {
 328          align_free(lpr->tex_data);
 329          lpr->tex_data = NULL;
 330       }
 331    }
 332    else if (!lpr->userBuffer) {
 333       assert(lpr->data);
 334       align_free(lpr->data);
 335    }
 336
 337 #ifdef DEBUG
 338    if (lpr->next)
 339       remove_from_list(lpr);
 340 #endif
 341
 342    FREE(lpr);
 343 }
 344
 345
 346 /**
 347  * Map a resource for read/write.
 348  */
 349 void *
 350 llvmpipe_resource_map(struct pipe_resource *resource,
 351                       unsigned level,
 352                       unsigned layer,
 353                       enum lp_texture_usage tex_usage)
 354 {
 355    struct llvmpipe_resource *lpr = llvmpipe_resource(resource);
 356    uint8_t *map;
 357
 358    assert(level < LP_MAX_TEXTURE_LEVELS);
 359    assert(layer < (u_minify(resource->depth0, level) + resource->array_size - 1));
 360
 361    assert(tex_usage == LP_TEX_USAGE_READ ||
 362           tex_usage == LP_TEX_USAGE_READ_WRITE ||
 363           tex_usage == LP_TEX_USAGE_WRITE_ALL);
 364
 365    if (lpr->dt) {
 366       /* display target */
 367       struct llvmpipe_screen *screen = llvmpipe_screen(resource->screen);
 368       struct sw_winsys *winsys = screen->winsys;
 369       unsigned dt_usage;
 370
 371       if (tex_usage == LP_TEX_USAGE_READ) {
 372          dt_usage = PIPE_TRANSFER_READ;
 373       }
 374       else {
 375          dt_usage = PIPE_TRANSFER_READ_WRITE;
 376       }
 377
 378       assert(level == 0);
 379       assert(layer == 0);
 380
 381       /* FIXME: keep map count? */
 382       map = winsys->displaytarget_map(winsys, lpr->dt, dt_usage);
 383
 384       /* install this linear image in texture data structure */
 385       lpr->tex_data = map;
 386
 387       return map;
 388    }
 389    else if (llvmpipe_resource_is_texture(resource)) {
 390
 391       map = llvmpipe_get_texture_image_address(lpr, layer, level);
 392       return map;
 393    }
 394    else {
 395       return lpr->data;
 396    }
 397 }
 398
 399
 400 /**
 401  * Unmap a resource.
 402  */
 403 void
 404 llvmpipe_resource_unmap(struct pipe_resource *resource,
 405                        unsigned level,
 406                        unsigned layer)
 407 {
 408    struct llvmpipe_resource *lpr = llvmpipe_resource(resource);
 409
 410    if (lpr->dt) {
 411       /* display target */
 412       struct llvmpipe_screen *lp_screen = llvmpipe_screen(resource->screen);
 413       struct sw_winsys *winsys = lp_screen->winsys;
 414
 415       assert(level == 0);
 416       assert(layer == 0);
 417
 418       winsys->displaytarget_unmap(winsys, lpr->dt);
 419    }
 420 }
 421
 422
 423 void *
 424 llvmpipe_resource_data(struct pipe_resource *resource)
 425 {
 426    struct llvmpipe_resource *lpr = llvmpipe_resource(resource);
 427
 428    assert(!llvmpipe_resource_is_texture(resource));
 429
 430    return lpr->data;
 431 }
 432
 433
 434 static struct pipe_resource *
 435 llvmpipe_resource_from_handle(struct pipe_screen *screen,
 436                               const struct pipe_resource *template,
 437                               struct winsys_handle *whandle,
 438                               unsigned usage)
 439 {
 440    struct sw_winsys *winsys = llvmpipe_screen(screen)->winsys;
 441    struct llvmpipe_resource *lpr;
 442
 443    /* XXX Seems like from_handled depth textures doesn't work that well */
 444
 445    lpr = CALLOC_STRUCT(llvmpipe_resource);
 446    if (!lpr) {
 447       goto no_lpr;
 448    }
 449
 450    lpr->base = *template;
 451    pipe_reference_init(&lpr->base.reference, 1);
 452    lpr->base.screen = screen;
 453
 454    /*
 455     * Looks like unaligned displaytargets work just fine,
 456     * at least sampler/render ones.
 457     */
 458 #if 0
 459    assert(lpr->base.width0 == width);
 460    assert(lpr->base.height0 == height);
 461 #endif
 462
 463    lpr->dt = winsys->displaytarget_from_handle(winsys,
 464                                                template,
 465                                                whandle,
 466                                                &lpr->row_stride[0]);
 467    if (!lpr->dt) {
 468       goto no_dt;
 469    }
 470
 471    lpr->id = id_counter++;
 472
 473 #ifdef DEBUG
 474    insert_at_tail(&resource_list, lpr);
 475 #endif
 476
 477    return &lpr->base;
 478
 479 no_dt:
 480    FREE(lpr);
 481 no_lpr:
 482    return NULL;
 483 }
 484
 485
 486 static boolean
 487 llvmpipe_resource_get_handle(struct pipe_screen *screen,
 488                             struct pipe_resource *pt,
 489                             struct winsys_handle *whandle,
 490                              unsigned usage)
 491 {
 492    struct sw_winsys *winsys = llvmpipe_screen(screen)->winsys;
 493    struct llvmpipe_resource *lpr = llvmpipe_resource(pt);
 494
 495    assert(lpr->dt);
 496    if (!lpr->dt)
 497       return FALSE;
 498
 499    return winsys->displaytarget_get_handle(winsys, lpr->dt, whandle);
 500 }
 501
 502
 503 static void *
 504 llvmpipe_transfer_map( struct pipe_context *pipe,
 505                        struct pipe_resource *resource,
 506                        unsigned level,
 507                        unsigned usage,
 508                        const struct pipe_box *box,
 509                        struct pipe_transfer **transfer )
 510 {
 511    struct llvmpipe_context *llvmpipe = llvmpipe_context(pipe);
 512    struct llvmpipe_screen *screen = llvmpipe_screen(pipe->screen);
 513    struct llvmpipe_resource *lpr = llvmpipe_resource(resource);
 514    struct llvmpipe_transfer *lpt;
 515    struct pipe_transfer *pt;
 516    ubyte *map;
 517    enum pipe_format format;
 518    enum lp_texture_usage tex_usage;
 519    const char *mode;
 520
 521    assert(resource);
 522    assert(level <= resource->last_level);
 523
 524    /*
 525     * Transfers, like other pipe operations, must happen in order, so flush the
 526     * context if necessary.
 527     */
 528    if (!(usage & PIPE_TRANSFER_UNSYNCHRONIZED)) {
 529       boolean read_only = !(usage & PIPE_TRANSFER_WRITE);
 530       boolean do_not_block = !!(usage & PIPE_TRANSFER_DONTBLOCK);
 531       if (!llvmpipe_flush_resource(pipe, resource,
 532                                    level,
 533                                    read_only,
 534                                    TRUE, /* cpu_access */
 535                                    do_not_block,
 536                                    __FUNCTION__)) {
 537          /*
 538           * It would have blocked, but state tracker requested no to.
 539           */
 540          assert(do_not_block);
 541          return NULL;
 542       }
 543    }
 544
 545    /* Check if we're mapping a current constant buffer */
 546    if ((usage & PIPE_TRANSFER_WRITE) &&
 547        (resource->bind & PIPE_BIND_CONSTANT_BUFFER)) {
 548       unsigned i;
 549       for (i = 0; i < ARRAY_SIZE(llvmpipe->constants[PIPE_SHADER_FRAGMENT]); ++i) {
 550          if (resource == llvmpipe->constants[PIPE_SHADER_FRAGMENT][i].buffer) {
 551             /* constants may have changed */
 552             llvmpipe->dirty |= LP_NEW_FS_CONSTANTS;
 553             break;
 554          }
 555       }
 556    }
 557
 558    lpt = CALLOC_STRUCT(llvmpipe_transfer);
 559    if (!lpt)
 560       return NULL;
 561    pt = &lpt->base;
 562    pipe_resource_reference(&pt->resource, resource);
 563    pt->box = *box;
 564    pt->level = level;
 565    pt->stride = lpr->row_stride[level];
 566    pt->layer_stride = lpr->img_stride[level];
 567    pt->usage = usage;
 568    *transfer = pt;
 569
 570    assert(level < LP_MAX_TEXTURE_LEVELS);
 571
 572    /*
 573    printf("tex_transfer_map(%d, %d  %d x %d of %d x %d,  usage %d )\n",
 574           transfer->x, transfer->y, transfer->width, transfer->height,
 575           transfer->texture->width0,
 576           transfer->texture->height0,
 577           transfer->usage);
 578    */
 579
 580    if (usage == PIPE_TRANSFER_READ) {
 581       tex_usage = LP_TEX_USAGE_READ;
 582       mode = "read";
 583    }
 584    else {
 585       tex_usage = LP_TEX_USAGE_READ_WRITE;
 586       mode = "read/write";
 587    }
 588
 589    if (0) {
 590       printf("transfer map tex %u  mode %s\n", lpr->id, mode);
 591    }
 592
 593    format = lpr->base.format;
 594
 595    map = llvmpipe_resource_map(resource,
 596                                level,
 597                                box->z,
 598                                tex_usage);
 599
 600
 601    /* May want to do different things here depending on read/write nature
 602     * of the map:
 603     */
 604    if (usage & PIPE_TRANSFER_WRITE) {
 605       /* Do something to notify sharing contexts of a texture change.
 606        */
 607       screen->timestamp++;
 608    }
 609
 610    map +=
 611       box->y / util_format_get_blockheight(format) * pt->stride +
 612       box->x / util_format_get_blockwidth(format) * util_format_get_blocksize(format);
 613
 614    return map;
 615 }
 616
 617
 618 static void
 619 llvmpipe_transfer_unmap(struct pipe_context *pipe,
 620                         struct pipe_transfer *transfer)
 621 {
 622    assert(transfer->resource);
 623
 624    llvmpipe_resource_unmap(transfer->resource,
 625                            transfer->level,
 626                            transfer->box.z);
 627
 628    /* Effectively do the texture_update work here - if texture images
 629     * needed post-processing to put them into hardware layout, this is
 630     * where it would happen.  For llvmpipe, nothing to do.
 631     */
 632    assert (transfer->resource);
 633    pipe_resource_reference(&transfer->resource, NULL);
 634    FREE(transfer);
 635 }
 636
 637 unsigned int
 638 llvmpipe_is_resource_referenced( struct pipe_context *pipe,
 639                                  struct pipe_resource *presource,
 640                                  unsigned level)
 641 {
 642    struct llvmpipe_context *llvmpipe = llvmpipe_context( pipe );
 643    if (!(presource->bind & (PIPE_BIND_DEPTH_STENCIL |
 644                             PIPE_BIND_RENDER_TARGET |
 645                             PIPE_BIND_SAMPLER_VIEW)))
 646       return LP_UNREFERENCED;
 647
 648    return lp_setup_is_resource_referenced(llvmpipe->setup, presource);
 649 }
 650
 651
 652 /**
 653  * Returns the largest possible alignment for a format in llvmpipe
 654  */
 655 unsigned
 656 llvmpipe_get_format_alignment( enum pipe_format format )
 657 {
 658    const struct util_format_description *desc = util_format_description(format);
 659    unsigned size = 0;
 660    unsigned bytes;
 661    unsigned i;
 662
 663    for (i = 0; i < desc->nr_channels; ++i) {
 664       size += desc->channel[i].size;
 665    }
 666
 667    bytes = size / 8;
 668
 669    if (!util_is_power_of_two(bytes)) {
 670       bytes /= desc->nr_channels;
 671    }
 672
 673    if (bytes % 2 || bytes < 1) {
 674       return 1;
 675    } else {
 676       return bytes;
 677    }
 678 }
 679
 680
 681 /**
 682  * Create buffer which wraps user-space data.
 683  * XXX unreachable.
 684  */
 685 struct pipe_resource *
 686 llvmpipe_user_buffer_create(struct pipe_screen *screen,
 687                             void *ptr,
 688                             unsigned bytes,
 689                             unsigned bind_flags)
 690 {
 691    struct llvmpipe_resource *buffer;
 692
 693    buffer = CALLOC_STRUCT(llvmpipe_resource);
 694    if (!buffer)
 695       return NULL;
 696
 697    pipe_reference_init(&buffer->base.reference, 1);
 698    buffer->base.screen = screen;
 699    buffer->base.format = PIPE_FORMAT_R8_UNORM; /* ?? */
 700    buffer->base.bind = bind_flags;
 701    buffer->base.usage = PIPE_USAGE_IMMUTABLE;
 702    buffer->base.flags = 0;
 703    buffer->base.width0 = bytes;
 704    buffer->base.height0 = 1;
 705    buffer->base.depth0 = 1;
 706    buffer->base.array_size = 1;
 707    buffer->userBuffer = TRUE;
 708    buffer->data = ptr;
 709
 710    return &buffer->base;
 711 }
 712
 713
 714 /**
 715  * Compute size (in bytes) need to store a texture image / mipmap level,
 716  * for just one cube face, one array layer or one 3D texture slice
 717  */
 718 static unsigned
 719 tex_image_face_size(const struct llvmpipe_resource *lpr, unsigned level)
 720 {
 721    return lpr->img_stride[level];
 722 }
 723
 724
 725 /**
 726  * Return pointer to a 2D texture image/face/slice.
 727  * No tiled/linear conversion is done.
 728  */
 729 ubyte *
 730 llvmpipe_get_texture_image_address(struct llvmpipe_resource *lpr,
 731                                    unsigned face_slice, unsigned level)
 732 {
 733    unsigned offset;
 734
 735    assert(llvmpipe_resource_is_texture(&lpr->base));
 736
 737    offset = lpr->mip_offsets[level];
 738
 739    if (face_slice > 0)
 740       offset += face_slice * tex_image_face_size(lpr, level);
 741
 742    return (ubyte *) lpr->tex_data + offset;
 743 }
 744
 745
 746 /**
 747  * Return size of resource in bytes
 748  */
 749 unsigned
 750 llvmpipe_resource_size(const struct pipe_resource *resource)
 751 {
 752    const struct llvmpipe_resource *lpr = llvmpipe_resource_const(resource);
 753    unsigned size = 0;
 754
 755    if (llvmpipe_resource_is_texture(resource)) {
 756       /* Note this will always return 0 for displaytarget resources */
 757       size = lpr->total_alloc_size;
 758    }
 759    else {
 760       size = resource->width0;
 761    }
 762    return size;
 763 }
 764
 765
 766 #ifdef DEBUG
 767 void
 768 llvmpipe_print_resources(void)
 769 {
 770    struct llvmpipe_resource *lpr;
 771    unsigned n = 0, total = 0;
 772
 773    debug_printf("LLVMPIPE: current resources:\n");
 774    foreach(lpr, &resource_list) {
 775       unsigned size = llvmpipe_resource_size(&lpr->base);
 776       debug_printf("resource %u at %p, size %ux%ux%u: %u bytes, refcount %u\n",
 777                    lpr->id, (void *) lpr,
 778                    lpr->base.width0, lpr->base.height0, lpr->base.depth0,
 779                    size, lpr->base.reference.count);
 780       total += size;
 781       n++;
 782    }
 783    debug_printf("LLVMPIPE: total size of %u resources: %u\n", n, total);
 784 }
 785 #endif
 786
 787
 788 void
 789 llvmpipe_init_screen_resource_funcs(struct pipe_screen *screen)
 790 {
 791 #ifdef DEBUG
 792    /* init linked list for tracking resources */
 793    {
 794       static boolean first_call = TRUE;
 795       if (first_call) {
 796          memset(&resource_list, 0, sizeof(resource_list));
 797          make_empty_list(&resource_list);
 798          first_call = FALSE;
 799       }
 800    }
 801 #endif
 802
 803    screen->resource_create = llvmpipe_resource_create;
 804 /*   screen->resource_create_front = llvmpipe_resource_create_front; */
 805    screen->resource_destroy = llvmpipe_resource_destroy;
 806    screen->resource_from_handle = llvmpipe_resource_from_handle;
 807    screen->resource_get_handle = llvmpipe_resource_get_handle;
 808    screen->can_create_resource = llvmpipe_can_create_resource;
 809 }
 810
 811
 812 void
 813 llvmpipe_init_context_resource_funcs(struct pipe_context *pipe)
 814 {
 815    pipe->transfer_map = llvmpipe_transfer_map;
 816    pipe->transfer_unmap = llvmpipe_transfer_unmap;
 817
 818    pipe->transfer_flush_region = u_default_transfer_flush_region;
 819    pipe->buffer_subdata = u_default_buffer_subdata;
 820    pipe->texture_subdata = u_default_texture_subdata;
 821 }