src/gallium/drivers/panfrost/pan_resource.c

   1 /**************************************************************************
   2  *
   3  * Copyright 2008 VMware, Inc.
   4  * Copyright 2014 Broadcom
   5  * Copyright 2018 Alyssa Rosenzweig
   6  * All Rights Reserved.
   7  *
   8  * Permission is hereby granted, free of charge, to any person obtaining a
   9  * copy of this software and associated documentation files (the
  10  * "Software"), to deal in the Software without restriction, including
  11  * without limitation the rights to use, copy, modify, merge, publish,
  12  * distribute, sub license, and/or sell copies of the Software, and to
  13  * permit persons to whom the Software is furnished to do so, subject to
  14  * the following conditions:
  15  *
  16  * The above copyright notice and this permission notice (including the
  17  * next paragraph) shall be included in all copies or substantial portions
  18  * of the Software.
  19  *
  20  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  21  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  22  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
  23  * IN NO EVENT SHALL VMWARE AND/OR ITS SUPPLIERS BE LIABLE FOR
  24  * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
  25  * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
  26  * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  27  *
  28  **************************************************************************/
  29
  30 #include <xf86drm.h>
  31 #include <fcntl.h>
  32 #include "drm-uapi/drm_fourcc.h"
  33
  34 #include "state_tracker/winsys_handle.h"
  35 #include "util/u_format.h"
  36 #include "util/u_memory.h"
  37 #include "util/u_surface.h"
  38 #include "util/u_transfer.h"
  39 #include "util/u_transfer_helper.h"
  40
  41 #include "pan_context.h"
  42 #include "pan_screen.h"
  43 #include "pan_resource.h"
  44 #include "pan_swizzle.h"
  45
  46 static struct pipe_resource *
  47 panfrost_resource_from_handle(struct pipe_screen *pscreen,
  48                               const struct pipe_resource *templat,
  49                               struct winsys_handle *whandle,
  50                               unsigned usage)
  51 {
  52         struct panfrost_screen *screen = pan_screen(pscreen);
  53         struct panfrost_resource *rsc;
  54         struct pipe_resource *prsc;
  55
  56         assert(whandle->type == WINSYS_HANDLE_TYPE_FD);
  57
  58         rsc = CALLOC_STRUCT(panfrost_resource);
  59         if (!rsc)
  60                 return NULL;
  61
  62         prsc = &rsc->base;
  63
  64         *prsc = *templat;
  65
  66         pipe_reference_init(&prsc->reference, 1);
  67         prsc->screen = pscreen;
  68
  69         rsc->bo = screen->driver->import_bo(screen, whandle);
  70
  71         return prsc;
  72 }
  73
  74 static boolean
  75 panfrost_resource_get_handle(struct pipe_screen *pscreen,
  76                              struct pipe_context *ctx,
  77                              struct pipe_resource *pt,
  78                              struct winsys_handle *handle,
  79                              unsigned usage)
  80 {
  81         struct panfrost_screen *screen = pan_screen(pscreen);
  82         struct panfrost_resource *rsrc = (struct panfrost_resource *) pt;
  83         struct renderonly_scanout *scanout = rsrc->scanout;
  84         int bytes_per_pixel = util_format_get_blocksize(rsrc->base.format);
  85         int stride = bytes_per_pixel * rsrc->base.width0; /* TODO: Alignment? */
  86
  87         handle->stride = stride;
  88         handle->modifier = DRM_FORMAT_MOD_INVALID;
  89
  90         if (handle->type == WINSYS_HANDLE_TYPE_SHARED) {
  91                 printf("Missed shared handle\n");
  92                 return FALSE;
  93         } else if (handle->type == WINSYS_HANDLE_TYPE_KMS) {
  94                 if (renderonly_get_handle(scanout, handle)) {
  95                         return TRUE;
  96                 } else {
  97                         printf("Missed nonrenderonly KMS handle for resource %p with scanout %p\n", pt, scanout);
  98                         return FALSE;
  99                 }
 100         } else if (handle->type == WINSYS_HANDLE_TYPE_FD) {
 101                 if (scanout) {
 102                         struct drm_prime_handle args = {
 103                                 .handle = scanout->handle,
 104                                 .flags = DRM_CLOEXEC,
 105                         };
 106
 107                         int ret = drmIoctl(screen->ro->kms_fd, DRM_IOCTL_PRIME_HANDLE_TO_FD, &args);
 108                         if (ret == -1)
 109                                 return FALSE;
 110
 111                         handle->handle = args.fd;
 112
 113                         return TRUE;
 114                 } else {
 115                         printf("Missed nonscanout FD handle\n");
 116                         assert(0);
 117                         return FALSE;
 118                 }
 119         }
 120
 121         return FALSE;
 122 }
 123
 124 static void
 125 panfrost_flush_resource(struct pipe_context *pctx, struct pipe_resource *prsc)
 126 {
 127         //fprintf(stderr, "TODO %s\n", __func__);
 128 }
 129
 130 static void
 131 panfrost_blit(struct pipe_context *pipe,
 132               const struct pipe_blit_info *info)
 133 {
 134         /* STUB */
 135         printf("Skipping blit XXX\n");
 136         return;
 137 }
 138
 139 static struct pipe_surface *
 140 panfrost_create_surface(struct pipe_context *pipe,
 141                         struct pipe_resource *pt,
 142                         const struct pipe_surface *surf_tmpl)
 143 {
 144         struct pipe_surface *ps = NULL;
 145
 146         ps = CALLOC_STRUCT(pipe_surface);
 147
 148         if (ps) {
 149                 pipe_reference_init(&ps->reference, 1);
 150                 pipe_resource_reference(&ps->texture, pt);
 151                 ps->context = pipe;
 152                 ps->format = surf_tmpl->format;
 153
 154                 if (pt->target != PIPE_BUFFER) {
 155                         assert(surf_tmpl->u.tex.level <= pt->last_level);
 156                         ps->width = u_minify(pt->width0, surf_tmpl->u.tex.level);
 157                         ps->height = u_minify(pt->height0, surf_tmpl->u.tex.level);
 158                         ps->u.tex.level = surf_tmpl->u.tex.level;
 159                         ps->u.tex.first_layer = surf_tmpl->u.tex.first_layer;
 160                         ps->u.tex.last_layer = surf_tmpl->u.tex.last_layer;
 161                 } else {
 162                         /* setting width as number of elements should get us correct renderbuffer width */
 163                         ps->width = surf_tmpl->u.buf.last_element - surf_tmpl->u.buf.first_element + 1;
 164                         ps->height = pt->height0;
 165                         ps->u.buf.first_element = surf_tmpl->u.buf.first_element;
 166                         ps->u.buf.last_element = surf_tmpl->u.buf.last_element;
 167                         assert(ps->u.buf.first_element <= ps->u.buf.last_element);
 168                         assert(ps->u.buf.last_element < ps->width);
 169                 }
 170         }
 171
 172         return ps;
 173 }
 174
 175 static void
 176 panfrost_surface_destroy(struct pipe_context *pipe,
 177                          struct pipe_surface *surf)
 178 {
 179         assert(surf->texture);
 180         pipe_resource_reference(&surf->texture, NULL);
 181         free(surf);
 182 }
 183
 184 static struct panfrost_bo *
 185 panfrost_create_bo(struct panfrost_screen *screen, const struct pipe_resource *template)
 186 {
 187         struct panfrost_bo *bo = CALLOC_STRUCT(panfrost_bo);
 188
 189         /* Calculate the size of the bo */
 190
 191         int bytes_per_pixel = util_format_get_blocksize(template->format);
 192         int stride = bytes_per_pixel * template->width0; /* TODO: Alignment? */
 193         size_t sz = stride;
 194
 195         if (template->height0) sz *= template->height0;
 196         if (template->depth0) sz *= template->depth0;
 197
 198         /* Tiling textures is almost always faster, unless we only use it once */
 199         bo->tiled = (template->usage != PIPE_USAGE_STREAM) && (template->bind & PIPE_BIND_SAMPLER_VIEW);
 200
 201         if (bo->tiled) {
 202                 /* For tiled, we don't map directly, so just malloc any old buffer */
 203
 204                 for (int l = 0; l < (template->last_level + 1); ++l) {
 205                         bo->cpu[l] = malloc(sz);
 206                         sz >>= 2;
 207                 }
 208         } else {
 209                 /* But for linear, we can! */
 210
 211                 struct pb_slab_entry *entry = pb_slab_alloc(&screen->slabs, sz, HEAP_TEXTURE);
 212                 struct panfrost_memory_entry *p_entry = (struct panfrost_memory_entry *) entry;
 213                 struct panfrost_memory *backing = (struct panfrost_memory *) entry->slab;
 214                 bo->entry[0] = p_entry;
 215                 bo->cpu[0] = backing->cpu + p_entry->offset;
 216                 bo->gpu[0] = backing->gpu + p_entry->offset;
 217
 218                 /* TODO: Mipmap */
 219         }
 220
 221         return bo;
 222 }
 223
 224 static struct pipe_resource *
 225 panfrost_resource_create(struct pipe_screen *screen,
 226                          const struct pipe_resource *template)
 227 {
 228         struct panfrost_resource *so = CALLOC_STRUCT(panfrost_resource);
 229         struct panfrost_screen *pscreen = (struct panfrost_screen *) screen;
 230
 231         so->base = *template;
 232         so->base.screen = screen;
 233
 234         pipe_reference_init(&so->base.reference, 1);
 235
 236         /* Make sure we're familiar */
 237         switch (template->target) {
 238                 case PIPE_BUFFER:
 239                 case PIPE_TEXTURE_1D:
 240                 case PIPE_TEXTURE_2D:
 241                 case PIPE_TEXTURE_3D:
 242                 case PIPE_TEXTURE_RECT:
 243                         break;
 244                 default:
 245                         fprintf(stderr, "Unknown texture target %d\n", template->target);
 246                         assert(0);
 247         }
 248
 249         if ((template->bind & PIPE_BIND_RENDER_TARGET) || (template->bind & PIPE_BIND_DEPTH_STENCIL)) {
 250                 if (template->bind & PIPE_BIND_DISPLAY_TARGET ||
 251                     template->bind & PIPE_BIND_SCANOUT ||
 252                     template->bind & PIPE_BIND_SHARED) {
 253                         struct pipe_resource scanout_templat = *template;
 254                         struct renderonly_scanout *scanout;
 255                         struct winsys_handle handle;
 256
 257                         /* TODO: align width0 and height0? */
 258
 259                         scanout = renderonly_scanout_for_resource(&scanout_templat,
 260                                                                   pscreen->ro, &handle);
 261                         if (!scanout)
 262                                 return NULL;
 263
 264                         assert(handle.type == WINSYS_HANDLE_TYPE_FD);
 265                         /* TODO: handle modifiers? */
 266                         so = pan_resource(screen->resource_from_handle(screen, template,
 267                                                                          &handle,
 268                                                                          PIPE_HANDLE_USAGE_FRAMEBUFFER_WRITE));
 269                         close(handle.handle);
 270                         if (!so)
 271                                 return NULL;
 272
 273                         so->scanout = scanout;
 274                         pscreen->display_target = so;
 275                 } else {
 276                         so->bo = panfrost_create_bo(pscreen, template);
 277                 }
 278         } else {
 279                 so->bo = panfrost_create_bo(pscreen, template);
 280         }
 281
 282         return (struct pipe_resource *)so;
 283 }
 284
 285 static void
 286 panfrost_destroy_bo(struct panfrost_screen *screen, struct panfrost_bo *pbo)
 287 {
 288         struct panfrost_bo *bo = (struct panfrost_bo *)pbo;
 289
 290         if (bo->entry[0] != NULL) {
 291                 /* Most allocations have an entry to free */
 292                 bo->entry[0]->freed = true;
 293                 pb_slab_free(&screen->slabs, &bo->entry[0]->base);
 294         }
 295
 296         if (bo->tiled) {
 297                 /* Tiled has a malloc'd CPU, so just plain ol' free needed */
 298
 299                 for (int l = 0; bo->cpu[l]; l++) {
 300                         free(bo->cpu[l]);
 301                 }
 302         }
 303
 304         if (bo->has_afbc) {
 305                 /* TODO */
 306                 printf("--leaking afbc (%d bytes)--\n", bo->afbc_metadata_size);
 307         }
 308
 309         if (bo->has_checksum) {
 310                 /* TODO */
 311                 printf("--leaking checksum (%zd bytes)--\n", bo->checksum_slab.size);
 312         }
 313 }
 314
 315 static void
 316 panfrost_resource_destroy(struct pipe_screen *screen,
 317                           struct pipe_resource *pt)
 318 {
 319         struct panfrost_screen *pscreen = panfrost_screen(screen);
 320         struct panfrost_resource *rsrc = (struct panfrost_resource *) pt;
 321
 322         if (rsrc->scanout)
 323                 renderonly_scanout_destroy(rsrc->scanout, pscreen->ro);
 324
 325         if (rsrc->bo)
 326                 panfrost_destroy_bo(pscreen, rsrc->bo);
 327
 328         FREE(rsrc);
 329 }
 330
 331 static uint8_t *
 332 panfrost_map_bo(struct panfrost_context *ctx, struct pipe_transfer *transfer)
 333 {
 334         struct panfrost_bo *bo = (struct panfrost_bo *)pan_resource(transfer->resource)->bo;
 335
 336         /* If non-zero level, it's a mipmapped resource and needs to be treated as such */
 337         bo->is_mipmap |= transfer->level;
 338
 339         if (transfer->usage & PIPE_TRANSFER_MAP_DIRECTLY && bo->tiled) {
 340                 /* We cannot directly map tiled textures */
 341                 return NULL;
 342         }
 343
 344         if (transfer->resource->bind & PIPE_BIND_DEPTH_STENCIL) {
 345                 /* Mipmapped readpixels?! */
 346                 assert(transfer->level == 0);
 347
 348                 /* Set the CPU mapping to that of the depth/stencil buffer in memory, untiled */
 349                 bo->cpu[transfer->level] = ctx->depth_stencil_buffer.cpu;
 350         }
 351
 352         return bo->cpu[transfer->level];
 353 }
 354
 355 static void *
 356 panfrost_transfer_map(struct pipe_context *pctx,
 357                       struct pipe_resource *resource,
 358                       unsigned level,
 359                       unsigned usage,  /* a combination of PIPE_TRANSFER_x */
 360                       const struct pipe_box *box,
 361                       struct pipe_transfer **out_transfer)
 362 {
 363         struct panfrost_context *ctx = pan_context(pctx);
 364         int bytes_per_pixel = util_format_get_blocksize(resource->format);
 365         int stride = bytes_per_pixel * resource->width0; /* TODO: Alignment? */
 366         uint8_t *cpu;
 367
 368         struct pipe_transfer *transfer = CALLOC_STRUCT(pipe_transfer);
 369         transfer->level = level;
 370         transfer->usage = usage;
 371         transfer->box = *box;
 372         transfer->stride = stride;
 373         assert(!transfer->box.z);
 374
 375         pipe_resource_reference(&transfer->resource, resource);
 376
 377         *out_transfer = transfer;
 378
 379         if (resource->bind & PIPE_BIND_DISPLAY_TARGET ||
 380             resource->bind & PIPE_BIND_SCANOUT ||
 381             resource->bind & PIPE_BIND_SHARED) {
 382                 /* Mipmapped readpixels?! */
 383                 assert(level == 0);
 384
 385                 /* Force a flush -- kill the pipeline */
 386                 panfrost_flush(pctx, NULL, PIPE_FLUSH_END_OF_FRAME);
 387         }
 388
 389         cpu = panfrost_map_bo(ctx, transfer);
 390         if (cpu == NULL)
 391                 return NULL;
 392
 393         return cpu + transfer->box.x * bytes_per_pixel + transfer->box.y * stride;
 394 }
 395
 396 static void
 397 panfrost_tile_texture(struct panfrost_screen *screen, struct panfrost_resource *rsrc, int level)
 398 {
 399         struct panfrost_bo *bo = (struct panfrost_bo *)rsrc->bo;
 400         int bytes_per_pixel = util_format_get_blocksize(rsrc->base.format);
 401         int stride = bytes_per_pixel * rsrc->base.width0; /* TODO: Alignment? */
 402
 403         int width = rsrc->base.width0 >> level;
 404         int height = rsrc->base.height0 >> level;
 405
 406         /* Estimate swizzled bitmap size. Slight overestimates are fine.
 407          * Underestimates will result in memory corruption or worse. */
 408
 409         int swizzled_sz = panfrost_swizzled_size(width, height, bytes_per_pixel);
 410
 411         /* Allocate the transfer given that known size but do not copy */
 412         struct pb_slab_entry *entry = pb_slab_alloc(&screen->slabs, swizzled_sz, HEAP_TEXTURE);
 413         struct panfrost_memory_entry *p_entry = (struct panfrost_memory_entry *) entry;
 414         struct panfrost_memory *backing = (struct panfrost_memory *) entry->slab;
 415         uint8_t *swizzled = backing->cpu + p_entry->offset;
 416
 417         /* Save the entry. But if there was already an entry here (from a
 418          * previous upload of the resource), free that one so we don't leak */
 419
 420         if (bo->entry[level] != NULL) {
 421                 bo->entry[level]->freed = true;
 422                 pb_slab_free(&screen->slabs, &bo->entry[level]->base);
 423         }
 424
 425         bo->entry[level] = p_entry;
 426         bo->gpu[level] = backing->gpu + p_entry->offset;
 427
 428         /* Run actual texture swizzle, writing directly to the mapped
 429          * GPU chunk we allocated */
 430
 431         panfrost_texture_swizzle(width, height, bytes_per_pixel, stride, bo->cpu[level], swizzled);
 432 }
 433
 434 static void
 435 panfrost_unmap_bo(struct panfrost_context *ctx,
 436                          struct pipe_transfer *transfer)
 437 {
 438         struct panfrost_bo *bo = (struct panfrost_bo *)pan_resource(transfer->resource)->bo;
 439
 440         if (transfer->usage & PIPE_TRANSFER_WRITE) {
 441                 if (transfer->resource->target == PIPE_TEXTURE_2D) {
 442                         struct panfrost_resource *prsrc = (struct panfrost_resource *) transfer->resource;
 443
 444                         /* Gallium thinks writeback happens here; instead, this is our cue to tile */
 445                         if (bo->has_afbc) {
 446                                 printf("Warning: writes to afbc surface can't possibly work out well for you...\n");
 447                         } else if (bo->tiled) {
 448                                 struct pipe_context *gallium = (struct pipe_context *) ctx;
 449                                 struct panfrost_screen *screen = pan_screen(gallium->screen);
 450                                 panfrost_tile_texture(screen, prsrc, transfer->level);
 451                         }
 452                 }
 453         }
 454 }
 455
 456 static void
 457 panfrost_transfer_unmap(struct pipe_context *pctx,
 458                         struct pipe_transfer *transfer)
 459 {
 460         struct panfrost_context *ctx = pan_context(pctx);
 461
 462         panfrost_unmap_bo(ctx, transfer);
 463
 464         /* Derefence the resource */
 465         pipe_resource_reference(&transfer->resource, NULL);
 466
 467         /* Transfer itself is CALLOCed at the moment */
 468         free(transfer);
 469 }
 470
 471 static struct pb_slab *
 472 panfrost_slab_alloc(void *priv, unsigned heap, unsigned entry_size, unsigned group_index)
 473 {
 474         struct panfrost_screen *screen = (struct panfrost_screen *) priv;
 475         struct panfrost_memory *mem = CALLOC_STRUCT(panfrost_memory);
 476
 477         size_t slab_size = (1 << (MAX_SLAB_ENTRY_SIZE + 1));
 478
 479         mem->slab.num_entries = slab_size / entry_size;
 480         mem->slab.num_free = mem->slab.num_entries;
 481
 482         LIST_INITHEAD(&mem->slab.free);
 483         for (unsigned i = 0; i < mem->slab.num_entries; ++i) {
 484                 /* Create a slab entry */
 485                 struct panfrost_memory_entry *entry = CALLOC_STRUCT(panfrost_memory_entry);
 486                 entry->offset = entry_size * i;
 487
 488                 entry->base.slab = &mem->slab;
 489                 entry->base.group_index = group_index;
 490
 491                 LIST_ADDTAIL(&entry->base.head, &mem->slab.free);
 492         }
 493
 494         /* Actually allocate the memory from kernel-space. Mapped, same_va, no
 495          * special flags */
 496
 497         screen->driver->allocate_slab(screen, mem, slab_size / 4096, true, 0, 0, 0);
 498
 499         return &mem->slab;
 500 }
 501
 502 static bool
 503 panfrost_slab_can_reclaim(void *priv, struct pb_slab_entry *entry)
 504 {
 505         struct panfrost_memory_entry *p_entry = (struct panfrost_memory_entry *) entry;
 506         return p_entry->freed;
 507 }
 508
 509 static void
 510 panfrost_slab_free(void *priv, struct pb_slab *slab)
 511 {
 512         /* STUB */
 513         //struct panfrost_memory *mem = (struct panfrost_memory *) slab;
 514         printf("stub: Tried to free slab\n");
 515 }
 516
 517 static void
 518 panfrost_invalidate_resource(struct pipe_context *pctx, struct pipe_resource *prsc)
 519 {
 520         //fprintf(stderr, "TODO %s\n", __func__);
 521 }
 522
 523 static const struct u_transfer_vtbl transfer_vtbl = {
 524         .resource_create          = panfrost_resource_create,
 525         .resource_destroy         = panfrost_resource_destroy,
 526         .transfer_map             = panfrost_transfer_map,
 527         .transfer_unmap           = panfrost_transfer_unmap,
 528         .transfer_flush_region    = u_default_transfer_flush_region,
 529         //.get_internal_format      = panfrost_resource_get_internal_format,
 530         //.set_stencil              = panfrost_resource_set_stencil,
 531         //.get_stencil              = panfrost_resource_get_stencil,
 532 };
 533
 534 void
 535 panfrost_resource_screen_init(struct panfrost_screen *pscreen)
 536 {
 537         //pscreen->base.resource_create_with_modifiers =
 538         //        panfrost_resource_create_with_modifiers;
 539         pscreen->base.resource_create = u_transfer_helper_resource_create;
 540         pscreen->base.resource_destroy = u_transfer_helper_resource_destroy;
 541         pscreen->base.resource_from_handle = panfrost_resource_from_handle;
 542         pscreen->base.resource_get_handle = panfrost_resource_get_handle;
 543         pscreen->base.transfer_helper = u_transfer_helper_create(&transfer_vtbl,
 544                                                             true, true,
 545                                                             true, true);
 546
 547         pb_slabs_init(&pscreen->slabs,
 548                         MIN_SLAB_ENTRY_SIZE,
 549                         MAX_SLAB_ENTRY_SIZE,
 550
 551                         3, /* Number of heaps */
 552
 553                         pscreen,
 554
 555                         panfrost_slab_can_reclaim,
 556                         panfrost_slab_alloc,
 557                         panfrost_slab_free);
 558 }
 559
 560 void
 561 panfrost_resource_context_init(struct pipe_context *pctx)
 562 {
 563         pctx->transfer_map = u_transfer_helper_transfer_map;
 564         pctx->transfer_flush_region = u_transfer_helper_transfer_flush_region;
 565         pctx->transfer_unmap = u_transfer_helper_transfer_unmap;
 566         pctx->buffer_subdata = u_default_buffer_subdata;
 567         pctx->create_surface = panfrost_create_surface;
 568         pctx->surface_destroy = panfrost_surface_destroy;
 569         pctx->resource_copy_region = util_resource_copy_region;
 570         pctx->blit = panfrost_blit;
 571         //pctx->generate_mipmap = panfrost_generate_mipmap;
 572         pctx->flush_resource = panfrost_flush_resource;
 573         pctx->invalidate_resource = panfrost_invalidate_resource;
 574         pctx->transfer_flush_region = u_transfer_helper_transfer_flush_region;
 575         pctx->buffer_subdata = u_default_buffer_subdata;
 576         pctx->texture_subdata = u_default_texture_subdata;
 577 }