git.sesse.net Git - ffmpeg/blob - libavutil/hwcontext_vulkan.c

   1 /*
   2  * This file is part of FFmpeg.
   3  *
   4  * FFmpeg is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * FFmpeg is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with FFmpeg; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  17  */
  18
  19 #include "config.h"
  20 #include "pixdesc.h"
  21 #include "avstring.h"
  22 #include "imgutils.h"
  23 #include "hwcontext.h"
  24 #include "hwcontext_internal.h"
  25 #include "hwcontext_vulkan.h"
  26
  27 #if CONFIG_LIBDRM
  28 #include <unistd.h>
  29 #include <xf86drm.h>
  30 #include <drm_fourcc.h>
  31 #include "hwcontext_drm.h"
  32 #if CONFIG_VAAPI
  33 #include <va/va_drmcommon.h>
  34 #include "hwcontext_vaapi.h"
  35 #endif
  36 #endif
  37
  38 #if CONFIG_CUDA
  39 #include "hwcontext_cuda_internal.h"
  40 #include "cuda_check.h"
  41 #define CHECK_CU(x) FF_CUDA_CHECK_DL(cuda_cu, cu, x)
  42 #endif
  43
  44 typedef struct VulkanExecCtx {
  45     VkCommandPool pool;
  46     VkCommandBuffer buf;
  47     VkQueue queue;
  48     VkFence fence;
  49 } VulkanExecCtx;
  50
  51 typedef struct VulkanDevicePriv {
  52     /* Properties */
  53     VkPhysicalDeviceProperties props;
  54     VkPhysicalDeviceMemoryProperties mprops;
  55
  56     /* Queues */
  57     uint32_t qfs[3];
  58     int num_qfs;
  59
  60     /* Debug callback */
  61     VkDebugUtilsMessengerEXT debug_ctx;
  62
  63     /* Image uploading */
  64     VulkanExecCtx cmd;
  65
  66     /* Extensions */
  67     uint64_t extensions;
  68
  69     /* Settings */
  70     int use_linear_images;
  71
  72     /* Nvidia */
  73     int dev_is_nvidia;
  74 } VulkanDevicePriv;
  75
  76 typedef struct VulkanFramesPriv {
  77     VulkanExecCtx cmd;
  78 } VulkanFramesPriv;
  79
  80 typedef struct AVVkFrameInternal {
  81 #if CONFIG_CUDA
  82     /* Importing external memory into cuda is really expensive so we keep the
  83      * memory imported all the time */
  84     AVBufferRef *cuda_fc_ref; /* Need to keep it around for uninit */
  85     CUexternalMemory ext_mem[AV_NUM_DATA_POINTERS];
  86     CUmipmappedArray cu_mma[AV_NUM_DATA_POINTERS];
  87     CUarray cu_array[AV_NUM_DATA_POINTERS];
  88     CUexternalSemaphore cu_sem[AV_NUM_DATA_POINTERS];
  89 #endif
  90 } AVVkFrameInternal;
  91
  92 #define VK_LOAD_PFN(inst, name) PFN_##name pfn_##name = (PFN_##name)           \
  93                                               vkGetInstanceProcAddr(inst, #name)
  94
  95 #define DEFAULT_USAGE_FLAGS (VK_IMAGE_USAGE_SAMPLED_BIT      |                 \
  96                              VK_IMAGE_USAGE_STORAGE_BIT      |                 \
  97                              VK_IMAGE_USAGE_TRANSFER_SRC_BIT |                 \
  98                              VK_IMAGE_USAGE_TRANSFER_DST_BIT)
  99
 100 #define ADD_VAL_TO_LIST(list, count, val)                                      \
 101     do {                                                                       \
 102         list = av_realloc_array(list, sizeof(*list), ++count);                 \
 103         if (!list) {                                                           \
 104             err = AVERROR(ENOMEM);                                             \
 105             goto fail;                                                         \
 106         }                                                                      \
 107         list[count - 1] = av_strdup(val);                                      \
 108         if (!list[count - 1]) {                                                \
 109             err = AVERROR(ENOMEM);                                             \
 110             goto fail;                                                         \
 111         }                                                                      \
 112     } while(0)
 113
 114 static const struct {
 115     enum AVPixelFormat pixfmt;
 116     const VkFormat vkfmts[3];
 117 } vk_pixfmt_map[] = {
 118     { AV_PIX_FMT_GRAY8,   { VK_FORMAT_R8_UNORM } },
 119     { AV_PIX_FMT_GRAY16,  { VK_FORMAT_R16_UNORM } },
 120     { AV_PIX_FMT_GRAYF32, { VK_FORMAT_R32_SFLOAT } },
 121
 122     { AV_PIX_FMT_NV12, { VK_FORMAT_R8_UNORM, VK_FORMAT_R8G8_UNORM } },
 123     { AV_PIX_FMT_P010, { VK_FORMAT_R16_UNORM, VK_FORMAT_R16G16_UNORM } },
 124     { AV_PIX_FMT_P016, { VK_FORMAT_R16_UNORM, VK_FORMAT_R16G16_UNORM } },
 125
 126     { AV_PIX_FMT_YUV420P, { VK_FORMAT_R8_UNORM, VK_FORMAT_R8_UNORM, VK_FORMAT_R8_UNORM } },
 127     { AV_PIX_FMT_YUV422P, { VK_FORMAT_R8_UNORM, VK_FORMAT_R8_UNORM, VK_FORMAT_R8_UNORM } },
 128     { AV_PIX_FMT_YUV444P, { VK_FORMAT_R8_UNORM, VK_FORMAT_R8_UNORM, VK_FORMAT_R8_UNORM } },
 129
 130     { AV_PIX_FMT_YUV420P16, { VK_FORMAT_R16_UNORM, VK_FORMAT_R16_UNORM, VK_FORMAT_R16_UNORM } },
 131     { AV_PIX_FMT_YUV422P16, { VK_FORMAT_R16_UNORM, VK_FORMAT_R16_UNORM, VK_FORMAT_R16_UNORM } },
 132     { AV_PIX_FMT_YUV444P16, { VK_FORMAT_R16_UNORM, VK_FORMAT_R16_UNORM, VK_FORMAT_R16_UNORM } },
 133
 134     { AV_PIX_FMT_ABGR,   { VK_FORMAT_A8B8G8R8_UNORM_PACK32 } },
 135     { AV_PIX_FMT_BGRA,   { VK_FORMAT_B8G8R8A8_UNORM } },
 136     { AV_PIX_FMT_RGBA,   { VK_FORMAT_R8G8B8A8_UNORM } },
 137     { AV_PIX_FMT_RGB24,  { VK_FORMAT_R8G8B8_UNORM } },
 138     { AV_PIX_FMT_BGR24,  { VK_FORMAT_B8G8R8_UNORM } },
 139     { AV_PIX_FMT_RGB48,  { VK_FORMAT_R16G16B16_UNORM } },
 140     { AV_PIX_FMT_RGBA64, { VK_FORMAT_R16G16B16A16_UNORM } },
 141     { AV_PIX_FMT_RGB565, { VK_FORMAT_R5G6B5_UNORM_PACK16 } },
 142     { AV_PIX_FMT_BGR565, { VK_FORMAT_B5G6R5_UNORM_PACK16 } },
 143     { AV_PIX_FMT_BGR0,   { VK_FORMAT_B8G8R8A8_UNORM } },
 144     { AV_PIX_FMT_0BGR,   { VK_FORMAT_A8B8G8R8_UNORM_PACK32 } },
 145     { AV_PIX_FMT_RGB0,   { VK_FORMAT_R8G8B8A8_UNORM } },
 146
 147     { AV_PIX_FMT_GBRPF32, { VK_FORMAT_R32_SFLOAT, VK_FORMAT_R32_SFLOAT, VK_FORMAT_R32_SFLOAT } },
 148 };
 149
 150 const VkFormat *av_vkfmt_from_pixfmt(enum AVPixelFormat p)
 151 {
 152     for (enum AVPixelFormat i = 0; i < FF_ARRAY_ELEMS(vk_pixfmt_map); i++)
 153         if (vk_pixfmt_map[i].pixfmt == p)
 154             return vk_pixfmt_map[i].vkfmts;
 155     return NULL;
 156 }
 157
 158 static int pixfmt_is_supported(AVVulkanDeviceContext *hwctx, enum AVPixelFormat p,
 159                                int linear)
 160 {
 161     const VkFormat *fmt = av_vkfmt_from_pixfmt(p);
 162     int planes = av_pix_fmt_count_planes(p);
 163
 164     if (!fmt)
 165         return 0;
 166
 167     for (int i = 0; i < planes; i++) {
 168         VkFormatFeatureFlags flags;
 169         VkFormatProperties2 prop = {
 170             .sType = VK_STRUCTURE_TYPE_FORMAT_PROPERTIES_2,
 171         };
 172         vkGetPhysicalDeviceFormatProperties2(hwctx->phys_dev, fmt[i], &prop);
 173         flags = linear ? prop.formatProperties.linearTilingFeatures :
 174                          prop.formatProperties.optimalTilingFeatures;
 175         if (!(flags & DEFAULT_USAGE_FLAGS))
 176             return 0;
 177     }
 178
 179     return 1;
 180 }
 181
 182 enum VulkanExtensions {
 183     EXT_EXTERNAL_DMABUF_MEMORY = 1ULL <<  0, /* VK_EXT_external_memory_dma_buf */
 184     EXT_DRM_MODIFIER_FLAGS     = 1ULL <<  1, /* VK_EXT_image_drm_format_modifier */
 185     EXT_EXTERNAL_FD_MEMORY     = 1ULL <<  2, /* VK_KHR_external_memory_fd */
 186     EXT_EXTERNAL_FD_SEM        = 1ULL <<  3, /* VK_KHR_external_semaphore_fd */
 187
 188     EXT_NO_FLAG                = 1ULL << 63,
 189 };
 190
 191 typedef struct VulkanOptExtension {
 192     const char *name;
 193     uint64_t flag;
 194 } VulkanOptExtension;
 195
 196 static const VulkanOptExtension optional_instance_exts[] = {
 197     { VK_KHR_SURFACE_EXTENSION_NAME, EXT_NO_FLAG },
 198 };
 199
 200 static const VulkanOptExtension optional_device_exts[] = {
 201     { VK_KHR_EXTERNAL_MEMORY_FD_EXTENSION_NAME,               EXT_EXTERNAL_FD_MEMORY,     },
 202     { VK_EXT_EXTERNAL_MEMORY_DMA_BUF_EXTENSION_NAME,          EXT_EXTERNAL_DMABUF_MEMORY, },
 203     { VK_EXT_IMAGE_DRM_FORMAT_MODIFIER_EXTENSION_NAME,        EXT_DRM_MODIFIER_FLAGS,     },
 204     { VK_KHR_EXTERNAL_SEMAPHORE_FD_EXTENSION_NAME,            EXT_EXTERNAL_FD_SEM,        },
 205 };
 206
 207 /* Converts return values to strings */
 208 static const char *vk_ret2str(VkResult res)
 209 {
 210 #define CASE(VAL) case VAL: return #VAL
 211     switch (res) {
 212     CASE(VK_SUCCESS);
 213     CASE(VK_NOT_READY);
 214     CASE(VK_TIMEOUT);
 215     CASE(VK_EVENT_SET);
 216     CASE(VK_EVENT_RESET);
 217     CASE(VK_INCOMPLETE);
 218     CASE(VK_ERROR_OUT_OF_HOST_MEMORY);
 219     CASE(VK_ERROR_OUT_OF_DEVICE_MEMORY);
 220     CASE(VK_ERROR_INITIALIZATION_FAILED);
 221     CASE(VK_ERROR_DEVICE_LOST);
 222     CASE(VK_ERROR_MEMORY_MAP_FAILED);
 223     CASE(VK_ERROR_LAYER_NOT_PRESENT);
 224     CASE(VK_ERROR_EXTENSION_NOT_PRESENT);
 225     CASE(VK_ERROR_FEATURE_NOT_PRESENT);
 226     CASE(VK_ERROR_INCOMPATIBLE_DRIVER);
 227     CASE(VK_ERROR_TOO_MANY_OBJECTS);
 228     CASE(VK_ERROR_FORMAT_NOT_SUPPORTED);
 229     CASE(VK_ERROR_FRAGMENTED_POOL);
 230     CASE(VK_ERROR_SURFACE_LOST_KHR);
 231     CASE(VK_ERROR_NATIVE_WINDOW_IN_USE_KHR);
 232     CASE(VK_SUBOPTIMAL_KHR);
 233     CASE(VK_ERROR_OUT_OF_DATE_KHR);
 234     CASE(VK_ERROR_INCOMPATIBLE_DISPLAY_KHR);
 235     CASE(VK_ERROR_VALIDATION_FAILED_EXT);
 236     CASE(VK_ERROR_INVALID_SHADER_NV);
 237     CASE(VK_ERROR_OUT_OF_POOL_MEMORY);
 238     CASE(VK_ERROR_INVALID_EXTERNAL_HANDLE);
 239     CASE(VK_ERROR_NOT_PERMITTED_EXT);
 240     CASE(VK_ERROR_INVALID_DRM_FORMAT_MODIFIER_PLANE_LAYOUT_EXT);
 241     CASE(VK_ERROR_INVALID_DEVICE_ADDRESS_EXT);
 242     CASE(VK_ERROR_FULL_SCREEN_EXCLUSIVE_MODE_LOST_EXT);
 243     default: return "Unknown error";
 244     }
 245 #undef CASE
 246 }
 247
 248 static VkBool32 vk_dbg_callback(VkDebugUtilsMessageSeverityFlagBitsEXT severity,
 249                                 VkDebugUtilsMessageTypeFlagsEXT messageType,
 250                                 const VkDebugUtilsMessengerCallbackDataEXT *data,
 251                                 void *priv)
 252 {
 253     int l;
 254     AVHWDeviceContext *ctx = priv;
 255
 256     switch (severity) {
 257     case VK_DEBUG_UTILS_MESSAGE_SEVERITY_VERBOSE_BIT_EXT: l = AV_LOG_VERBOSE; break;
 258     case VK_DEBUG_UTILS_MESSAGE_SEVERITY_INFO_BIT_EXT:    l = AV_LOG_INFO;    break;
 259     case VK_DEBUG_UTILS_MESSAGE_SEVERITY_WARNING_BIT_EXT: l = AV_LOG_WARNING; break;
 260     case VK_DEBUG_UTILS_MESSAGE_SEVERITY_ERROR_BIT_EXT:   l = AV_LOG_ERROR;   break;
 261     default:                                              l = AV_LOG_DEBUG;   break;
 262     }
 263
 264     av_log(ctx, l, "%s\n", data->pMessage);
 265     for (int i = 0; i < data->cmdBufLabelCount; i++)
 266         av_log(ctx, l, "\t%i: %s\n", i, data->pCmdBufLabels[i].pLabelName);
 267
 268     return 0;
 269 }
 270
 271 static int check_extensions(AVHWDeviceContext *ctx, int dev, AVDictionary *opts,
 272                             const char * const **dst, uint32_t *num, int debug)
 273 {
 274     const char *tstr;
 275     const char **extension_names = NULL;
 276     VulkanDevicePriv *p = ctx->internal->priv;
 277     AVVulkanDeviceContext *hwctx = ctx->hwctx;
 278     int err = 0, found, extensions_found = 0;
 279
 280     const char *mod;
 281     int optional_exts_num;
 282     uint32_t sup_ext_count;
 283     char *user_exts_str = NULL;
 284     AVDictionaryEntry *user_exts;
 285     VkExtensionProperties *sup_ext;
 286     const VulkanOptExtension *optional_exts;
 287
 288     if (!dev) {
 289         mod = "instance";
 290         optional_exts = optional_instance_exts;
 291         optional_exts_num = FF_ARRAY_ELEMS(optional_instance_exts);
 292         user_exts = av_dict_get(opts, "instance_extensions", NULL, 0);
 293         if (user_exts) {
 294             user_exts_str = av_strdup(user_exts->value);
 295             if (!user_exts_str) {
 296                 err = AVERROR(ENOMEM);
 297                 goto fail;
 298             }
 299         }
 300         vkEnumerateInstanceExtensionProperties(NULL, &sup_ext_count, NULL);
 301         sup_ext = av_malloc_array(sup_ext_count, sizeof(VkExtensionProperties));
 302         if (!sup_ext)
 303             return AVERROR(ENOMEM);
 304         vkEnumerateInstanceExtensionProperties(NULL, &sup_ext_count, sup_ext);
 305     } else {
 306         mod = "device";
 307         optional_exts = optional_device_exts;
 308         optional_exts_num = FF_ARRAY_ELEMS(optional_device_exts);
 309         user_exts = av_dict_get(opts, "device_extensions", NULL, 0);
 310         if (user_exts) {
 311             user_exts_str = av_strdup(user_exts->value);
 312             if (!user_exts_str) {
 313                 err = AVERROR(ENOMEM);
 314                 goto fail;
 315             }
 316         }
 317         vkEnumerateDeviceExtensionProperties(hwctx->phys_dev, NULL,
 318                                              &sup_ext_count, NULL);
 319         sup_ext = av_malloc_array(sup_ext_count, sizeof(VkExtensionProperties));
 320         if (!sup_ext)
 321             return AVERROR(ENOMEM);
 322         vkEnumerateDeviceExtensionProperties(hwctx->phys_dev, NULL,
 323                                              &sup_ext_count, sup_ext);
 324     }
 325
 326     for (int i = 0; i < optional_exts_num; i++) {
 327         tstr = optional_exts[i].name;
 328         found = 0;
 329         for (int j = 0; j < sup_ext_count; j++) {
 330             if (!strcmp(tstr, sup_ext[j].extensionName)) {
 331                 found = 1;
 332                 break;
 333             }
 334         }
 335         if (!found)
 336             continue;
 337
 338         av_log(ctx, AV_LOG_VERBOSE, "Using %s extension \"%s\"\n", mod, tstr);
 339         p->extensions |= optional_exts[i].flag;
 340         ADD_VAL_TO_LIST(extension_names, extensions_found, tstr);
 341     }
 342
 343     if (debug && !dev) {
 344         tstr = VK_EXT_DEBUG_UTILS_EXTENSION_NAME;
 345         found = 0;
 346         for (int j = 0; j < sup_ext_count; j++) {
 347             if (!strcmp(tstr, sup_ext[j].extensionName)) {
 348                 found = 1;
 349                 break;
 350             }
 351         }
 352         if (found) {
 353             av_log(ctx, AV_LOG_VERBOSE, "Using %s extension \"%s\"\n", mod, tstr);
 354             ADD_VAL_TO_LIST(extension_names, extensions_found, tstr);
 355         } else {
 356             av_log(ctx, AV_LOG_ERROR, "Debug extension \"%s\" not found!\n",
 357                    tstr);
 358             err = AVERROR(EINVAL);
 359             goto fail;
 360         }
 361     }
 362
 363     if (user_exts_str) {
 364         char *save, *token = av_strtok(user_exts_str, "+", &save);
 365         while (token) {
 366             found = 0;
 367             for (int j = 0; j < sup_ext_count; j++) {
 368                 if (!strcmp(token, sup_ext[j].extensionName)) {
 369                     found = 1;
 370                     break;
 371                 }
 372             }
 373             if (found) {
 374                 av_log(ctx, AV_LOG_VERBOSE, "Using %s extension \"%s\"\n", mod, tstr);
 375                 ADD_VAL_TO_LIST(extension_names, extensions_found, token);
 376             } else {
 377                 av_log(ctx, AV_LOG_ERROR, "%s extension \"%s\" not found!\n",
 378                        mod, token);
 379                 err = AVERROR(EINVAL);
 380                 goto fail;
 381             }
 382             token = av_strtok(NULL, "+", &save);
 383         }
 384     }
 385
 386     *dst = extension_names;
 387     *num = extensions_found;
 388
 389     av_free(user_exts_str);
 390     av_free(sup_ext);
 391     return 0;
 392
 393 fail:
 394     if (extension_names)
 395         for (int i = 0; i < extensions_found; i++)
 396             av_free((void *)extension_names[i]);
 397     av_free(extension_names);
 398     av_free(user_exts_str);
 399     av_free(sup_ext);
 400     return err;
 401 }
 402
 403 /* Creates a VkInstance */
 404 static int create_instance(AVHWDeviceContext *ctx, AVDictionary *opts)
 405 {
 406     int err = 0;
 407     VkResult ret;
 408     VulkanDevicePriv *p = ctx->internal->priv;
 409     AVVulkanDeviceContext *hwctx = ctx->hwctx;
 410     AVDictionaryEntry *debug_opt = av_dict_get(opts, "debug", NULL, 0);
 411     const int debug_mode = debug_opt && strtol(debug_opt->value, NULL, 10);
 412     VkApplicationInfo application_info = {
 413         .sType              = VK_STRUCTURE_TYPE_APPLICATION_INFO,
 414         .pEngineName        = "libavutil",
 415         .apiVersion         = VK_API_VERSION_1_1,
 416         .engineVersion      = VK_MAKE_VERSION(LIBAVUTIL_VERSION_MAJOR,
 417                                               LIBAVUTIL_VERSION_MINOR,
 418                                               LIBAVUTIL_VERSION_MICRO),
 419     };
 420     VkInstanceCreateInfo inst_props = {
 421         .sType            = VK_STRUCTURE_TYPE_INSTANCE_CREATE_INFO,
 422         .pApplicationInfo = &application_info,
 423     };
 424
 425     /* Check for present/missing extensions */
 426     err = check_extensions(ctx, 0, opts, &inst_props.ppEnabledExtensionNames,
 427                            &inst_props.enabledExtensionCount, debug_mode);
 428     if (err < 0)
 429         return err;
 430
 431     if (debug_mode) {
 432         static const char *layers[] = { "VK_LAYER_KHRONOS_validation" };
 433         inst_props.ppEnabledLayerNames = layers;
 434         inst_props.enabledLayerCount = FF_ARRAY_ELEMS(layers);
 435     }
 436
 437     /* Try to create the instance */
 438     ret = vkCreateInstance(&inst_props, hwctx->alloc, &hwctx->inst);
 439
 440     /* Check for errors */
 441     if (ret != VK_SUCCESS) {
 442         av_log(ctx, AV_LOG_ERROR, "Instance creation failure: %s\n",
 443                vk_ret2str(ret));
 444         for (int i = 0; i < inst_props.enabledExtensionCount; i++)
 445             av_free((void *)inst_props.ppEnabledExtensionNames[i]);
 446         av_free((void *)inst_props.ppEnabledExtensionNames);
 447         return AVERROR_EXTERNAL;
 448     }
 449
 450     if (debug_mode) {
 451         VkDebugUtilsMessengerCreateInfoEXT dbg = {
 452             .sType = VK_STRUCTURE_TYPE_DEBUG_UTILS_MESSENGER_CREATE_INFO_EXT,
 453             .messageSeverity = VK_DEBUG_UTILS_MESSAGE_SEVERITY_VERBOSE_BIT_EXT |
 454                                VK_DEBUG_UTILS_MESSAGE_SEVERITY_INFO_BIT_EXT    |
 455                                VK_DEBUG_UTILS_MESSAGE_SEVERITY_WARNING_BIT_EXT |
 456                                VK_DEBUG_UTILS_MESSAGE_SEVERITY_ERROR_BIT_EXT,
 457             .messageType = VK_DEBUG_UTILS_MESSAGE_TYPE_GENERAL_BIT_EXT    |
 458                            VK_DEBUG_UTILS_MESSAGE_TYPE_VALIDATION_BIT_EXT |
 459                            VK_DEBUG_UTILS_MESSAGE_TYPE_PERFORMANCE_BIT_EXT,
 460             .pfnUserCallback = vk_dbg_callback,
 461             .pUserData = ctx,
 462         };
 463         VK_LOAD_PFN(hwctx->inst, vkCreateDebugUtilsMessengerEXT);
 464
 465         pfn_vkCreateDebugUtilsMessengerEXT(hwctx->inst, &dbg,
 466                                            hwctx->alloc, &p->debug_ctx);
 467     }
 468
 469     hwctx->enabled_inst_extensions = inst_props.ppEnabledExtensionNames;
 470     hwctx->nb_enabled_inst_extensions = inst_props.enabledExtensionCount;
 471
 472     return 0;
 473 }
 474
 475 typedef struct VulkanDeviceSelection {
 476     uint8_t uuid[VK_UUID_SIZE]; /* Will use this first unless !has_uuid */
 477     int has_uuid;
 478     const char *name; /* Will use this second unless NULL */
 479     uint32_t pci_device; /* Will use this third unless 0x0 */
 480     uint32_t vendor_id; /* Last resort to find something deterministic */
 481     int index; /* Finally fall back to index */
 482 } VulkanDeviceSelection;
 483
 484 static const char *vk_dev_type(enum VkPhysicalDeviceType type)
 485 {
 486     switch (type) {
 487     case VK_PHYSICAL_DEVICE_TYPE_INTEGRATED_GPU: return "integrated";
 488     case VK_PHYSICAL_DEVICE_TYPE_DISCRETE_GPU:   return "discrete";
 489     case VK_PHYSICAL_DEVICE_TYPE_VIRTUAL_GPU:    return "virtual";
 490     case VK_PHYSICAL_DEVICE_TYPE_CPU:            return "software";
 491     default:                                     return "unknown";
 492     }
 493 }
 494
 495 /* Finds a device */
 496 static int find_device(AVHWDeviceContext *ctx, VulkanDeviceSelection *select)
 497 {
 498     int err = 0, choice = -1;
 499     uint32_t num;
 500     VkResult ret;
 501     VkPhysicalDevice *devices = NULL;
 502     VkPhysicalDeviceIDProperties *idp = NULL;
 503     VkPhysicalDeviceProperties2 *prop = NULL;
 504     VulkanDevicePriv *p = ctx->internal->priv;
 505     AVVulkanDeviceContext *hwctx = ctx->hwctx;
 506
 507     ret = vkEnumeratePhysicalDevices(hwctx->inst, &num, NULL);
 508     if (ret != VK_SUCCESS || !num) {
 509         av_log(ctx, AV_LOG_ERROR, "No devices found: %s!\n", vk_ret2str(ret));
 510         return AVERROR(ENODEV);
 511     }
 512
 513     devices = av_malloc_array(num, sizeof(VkPhysicalDevice));
 514     if (!devices)
 515         return AVERROR(ENOMEM);
 516
 517     ret = vkEnumeratePhysicalDevices(hwctx->inst, &num, devices);
 518     if (ret != VK_SUCCESS) {
 519         av_log(ctx, AV_LOG_ERROR, "Failed enumerating devices: %s\n",
 520                vk_ret2str(ret));
 521         err = AVERROR(ENODEV);
 522         goto end;
 523     }
 524
 525     prop = av_mallocz_array(num, sizeof(*prop));
 526     if (!prop) {
 527         err = AVERROR(ENOMEM);
 528         goto end;
 529     }
 530
 531     idp = av_mallocz_array(num, sizeof(*idp));
 532     if (!idp) {
 533         err = AVERROR(ENOMEM);
 534         goto end;
 535     }
 536
 537     av_log(ctx, AV_LOG_VERBOSE, "GPU listing:\n");
 538     for (int i = 0; i < num; i++) {
 539         idp[i].sType = VK_STRUCTURE_TYPE_PHYSICAL_DEVICE_ID_PROPERTIES;
 540         prop[i].sType = VK_STRUCTURE_TYPE_PHYSICAL_DEVICE_PROPERTIES_2;
 541         prop[i].pNext = &idp[i];
 542
 543         vkGetPhysicalDeviceProperties2(devices[i], &prop[i]);
 544         av_log(ctx, AV_LOG_VERBOSE, "    %d: %s (%s) (0x%x)\n", i,
 545                prop[i].properties.deviceName,
 546                vk_dev_type(prop[i].properties.deviceType),
 547                prop[i].properties.deviceID);
 548     }
 549
 550     if (select->has_uuid) {
 551         for (int i = 0; i < num; i++) {
 552             if (!strncmp(idp[i].deviceUUID, select->uuid, VK_UUID_SIZE)) {
 553                 choice = i;
 554                 goto end;
 555              }
 556         }
 557         av_log(ctx, AV_LOG_ERROR, "Unable to find device by given UUID!\n");
 558         err = AVERROR(ENODEV);
 559         goto end;
 560     } else if (select->name) {
 561         av_log(ctx, AV_LOG_VERBOSE, "Requested device: %s\n", select->name);
 562         for (int i = 0; i < num; i++) {
 563             if (strstr(prop[i].properties.deviceName, select->name)) {
 564                 choice = i;
 565                 goto end;
 566              }
 567         }
 568         av_log(ctx, AV_LOG_ERROR, "Unable to find device \"%s\"!\n",
 569                select->name);
 570         err = AVERROR(ENODEV);
 571         goto end;
 572     } else if (select->pci_device) {
 573         av_log(ctx, AV_LOG_VERBOSE, "Requested device: 0x%x\n", select->pci_device);
 574         for (int i = 0; i < num; i++) {
 575             if (select->pci_device == prop[i].properties.deviceID) {
 576                 choice = i;
 577                 goto end;
 578             }
 579         }
 580         av_log(ctx, AV_LOG_ERROR, "Unable to find device with PCI ID 0x%x!\n",
 581                select->pci_device);
 582         err = AVERROR(EINVAL);
 583         goto end;
 584     } else if (select->vendor_id) {
 585         av_log(ctx, AV_LOG_VERBOSE, "Requested vendor: 0x%x\n", select->vendor_id);
 586         for (int i = 0; i < num; i++) {
 587             if (select->vendor_id == prop[i].properties.vendorID) {
 588                 choice = i;
 589                 goto end;
 590             }
 591         }
 592         av_log(ctx, AV_LOG_ERROR, "Unable to find device with Vendor ID 0x%x!\n",
 593                select->vendor_id);
 594         err = AVERROR(ENODEV);
 595         goto end;
 596     } else {
 597         if (select->index < num) {
 598             choice = select->index;
 599             goto end;
 600         }
 601         av_log(ctx, AV_LOG_ERROR, "Unable to find device with index %i!\n",
 602                select->index);
 603         err = AVERROR(ENODEV);
 604         goto end;
 605     }
 606
 607 end:
 608     if (choice > -1) {
 609         p->dev_is_nvidia = (prop[choice].properties.vendorID == 0x10de);
 610         hwctx->phys_dev = devices[choice];
 611     }
 612     av_free(devices);
 613     av_free(prop);
 614     av_free(idp);
 615
 616     return err;
 617 }
 618
 619 static int search_queue_families(AVHWDeviceContext *ctx, VkDeviceCreateInfo *cd)
 620 {
 621     uint32_t num;
 622     VkQueueFamilyProperties *qs = NULL;
 623     AVVulkanDeviceContext *hwctx = ctx->hwctx;
 624     int graph_index = -1, comp_index = -1, tx_index = -1;
 625     VkDeviceQueueCreateInfo *pc = (VkDeviceQueueCreateInfo *)cd->pQueueCreateInfos;
 626
 627     /* First get the number of queue families */
 628     vkGetPhysicalDeviceQueueFamilyProperties(hwctx->phys_dev, &num, NULL);
 629     if (!num) {
 630         av_log(ctx, AV_LOG_ERROR, "Failed to get queues!\n");
 631         return AVERROR_EXTERNAL;
 632     }
 633
 634     /* Then allocate memory */
 635     qs = av_malloc_array(num, sizeof(VkQueueFamilyProperties));
 636     if (!qs)
 637         return AVERROR(ENOMEM);
 638
 639     /* Finally retrieve the queue families */
 640     vkGetPhysicalDeviceQueueFamilyProperties(hwctx->phys_dev, &num, qs);
 641
 642 #define SEARCH_FLAGS(expr, out)                                                \
 643     for (int i = 0; i < num; i++) {                                            \
 644         const VkQueueFlagBits flags = qs[i].queueFlags;                        \
 645         if (expr) {                                                            \
 646             out = i;                                                           \
 647             break;                                                             \
 648         }                                                                      \
 649     }
 650
 651     SEARCH_FLAGS(flags & VK_QUEUE_GRAPHICS_BIT, graph_index)
 652
 653     SEARCH_FLAGS((flags &  VK_QUEUE_COMPUTE_BIT) && (i != graph_index),
 654                  comp_index)
 655
 656     SEARCH_FLAGS((flags & VK_QUEUE_TRANSFER_BIT) && (i != graph_index) &&
 657                  (i != comp_index), tx_index)
 658
 659 #undef SEARCH_FLAGS
 660 #define QF_FLAGS(flags)                                                        \
 661     ((flags) & VK_QUEUE_GRAPHICS_BIT      ) ? "(graphics) " : "",              \
 662     ((flags) & VK_QUEUE_COMPUTE_BIT       ) ? "(compute) "  : "",              \
 663     ((flags) & VK_QUEUE_TRANSFER_BIT      ) ? "(transfer) " : "",              \
 664     ((flags) & VK_QUEUE_SPARSE_BINDING_BIT) ? "(sparse) "   : ""
 665
 666     av_log(ctx, AV_LOG_VERBOSE, "Using queue family %i for graphics, "
 667            "flags: %s%s%s%s\n", graph_index, QF_FLAGS(qs[graph_index].queueFlags));
 668
 669     hwctx->queue_family_index      = graph_index;
 670     hwctx->queue_family_tx_index   = graph_index;
 671     hwctx->queue_family_comp_index = graph_index;
 672
 673     pc[cd->queueCreateInfoCount++].queueFamilyIndex = graph_index;
 674
 675     if (comp_index != -1) {
 676         av_log(ctx, AV_LOG_VERBOSE, "Using queue family %i for compute, "
 677                "flags: %s%s%s%s\n", comp_index, QF_FLAGS(qs[comp_index].queueFlags));
 678         hwctx->queue_family_tx_index                    = comp_index;
 679         hwctx->queue_family_comp_index                  = comp_index;
 680         pc[cd->queueCreateInfoCount++].queueFamilyIndex = comp_index;
 681     }
 682
 683     if (tx_index != -1) {
 684         av_log(ctx, AV_LOG_VERBOSE, "Using queue family %i for transfers, "
 685                "flags: %s%s%s%s\n", tx_index, QF_FLAGS(qs[tx_index].queueFlags));
 686         hwctx->queue_family_tx_index                    = tx_index;
 687         pc[cd->queueCreateInfoCount++].queueFamilyIndex = tx_index;
 688     }
 689
 690 #undef QF_FLAGS
 691
 692     av_free(qs);
 693
 694     return 0;
 695 }
 696
 697 static int create_exec_ctx(AVHWDeviceContext *ctx, VulkanExecCtx *cmd,
 698                            int queue_family_index)
 699 {
 700     VkResult ret;
 701     AVVulkanDeviceContext *hwctx = ctx->hwctx;
 702
 703     VkCommandPoolCreateInfo cqueue_create = {
 704         .sType              = VK_STRUCTURE_TYPE_COMMAND_POOL_CREATE_INFO,
 705         .flags              = VK_COMMAND_POOL_CREATE_RESET_COMMAND_BUFFER_BIT,
 706         .queueFamilyIndex   = queue_family_index,
 707     };
 708     VkCommandBufferAllocateInfo cbuf_create = {
 709         .sType              = VK_STRUCTURE_TYPE_COMMAND_BUFFER_ALLOCATE_INFO,
 710         .level              = VK_COMMAND_BUFFER_LEVEL_PRIMARY,
 711         .commandBufferCount = 1,
 712     };
 713
 714     VkFenceCreateInfo fence_spawn = {
 715         .sType = VK_STRUCTURE_TYPE_FENCE_CREATE_INFO,
 716     };
 717
 718     ret = vkCreateFence(hwctx->act_dev, &fence_spawn,
 719                         hwctx->alloc, &cmd->fence);
 720     if (ret != VK_SUCCESS) {
 721         av_log(ctx, AV_LOG_ERROR, "Failed to create frame fence: %s\n",
 722                vk_ret2str(ret));
 723         return AVERROR_EXTERNAL;
 724     }
 725
 726     ret = vkCreateCommandPool(hwctx->act_dev, &cqueue_create,
 727                               hwctx->alloc, &cmd->pool);
 728     if (ret != VK_SUCCESS) {
 729         av_log(ctx, AV_LOG_ERROR, "Command pool creation failure: %s\n",
 730                vk_ret2str(ret));
 731         return AVERROR_EXTERNAL;
 732     }
 733
 734     cbuf_create.commandPool = cmd->pool;
 735
 736     ret = vkAllocateCommandBuffers(hwctx->act_dev, &cbuf_create, &cmd->buf);
 737     if (ret != VK_SUCCESS) {
 738         av_log(ctx, AV_LOG_ERROR, "Command buffer alloc failure: %s\n",
 739                vk_ret2str(ret));
 740         return AVERROR_EXTERNAL;
 741     }
 742
 743     vkGetDeviceQueue(hwctx->act_dev, cqueue_create.queueFamilyIndex, 0,
 744                      &cmd->queue);
 745
 746     return 0;
 747 }
 748
 749 static void free_exec_ctx(AVHWDeviceContext *ctx, VulkanExecCtx *cmd)
 750 {
 751     AVVulkanDeviceContext *hwctx = ctx->hwctx;
 752
 753     if (cmd->fence)
 754         vkDestroyFence(hwctx->act_dev, cmd->fence, hwctx->alloc);
 755     if (cmd->buf)
 756         vkFreeCommandBuffers(hwctx->act_dev, cmd->pool, 1, &cmd->buf);
 757     if (cmd->pool)
 758         vkDestroyCommandPool(hwctx->act_dev, cmd->pool, hwctx->alloc);
 759 }
 760
 761 static void vulkan_device_free(AVHWDeviceContext *ctx)
 762 {
 763     VulkanDevicePriv *p = ctx->internal->priv;
 764     AVVulkanDeviceContext *hwctx = ctx->hwctx;
 765
 766     free_exec_ctx(ctx, &p->cmd);
 767
 768     vkDestroyDevice(hwctx->act_dev, hwctx->alloc);
 769
 770     if (p->debug_ctx) {
 771         VK_LOAD_PFN(hwctx->inst, vkDestroyDebugUtilsMessengerEXT);
 772         pfn_vkDestroyDebugUtilsMessengerEXT(hwctx->inst, p->debug_ctx,
 773                                             hwctx->alloc);
 774     }
 775
 776     vkDestroyInstance(hwctx->inst, hwctx->alloc);
 777
 778     for (int i = 0; i < hwctx->nb_enabled_inst_extensions; i++)
 779         av_free((void *)hwctx->enabled_inst_extensions[i]);
 780     av_free((void *)hwctx->enabled_inst_extensions);
 781
 782     for (int i = 0; i < hwctx->nb_enabled_dev_extensions; i++)
 783         av_free((void *)hwctx->enabled_dev_extensions[i]);
 784     av_free((void *)hwctx->enabled_dev_extensions);
 785 }
 786
 787 static int vulkan_device_create_internal(AVHWDeviceContext *ctx,
 788                                          VulkanDeviceSelection *dev_select,
 789                                          AVDictionary *opts, int flags)
 790 {
 791     int err = 0;
 792     VkResult ret;
 793     AVDictionaryEntry *opt_d;
 794     VulkanDevicePriv *p = ctx->internal->priv;
 795     AVVulkanDeviceContext *hwctx = ctx->hwctx;
 796     VkDeviceQueueCreateInfo queue_create_info[3] = {
 797         {   .sType            = VK_STRUCTURE_TYPE_DEVICE_QUEUE_CREATE_INFO,
 798             .pQueuePriorities = (float []){ 1.0f },
 799             .queueCount       = 1, },
 800         {   .sType            = VK_STRUCTURE_TYPE_DEVICE_QUEUE_CREATE_INFO,
 801             .pQueuePriorities = (float []){ 1.0f },
 802             .queueCount       = 1, },
 803         {   .sType            = VK_STRUCTURE_TYPE_DEVICE_QUEUE_CREATE_INFO,
 804             .pQueuePriorities = (float []){ 1.0f },
 805             .queueCount       = 1, },
 806     };
 807
 808     VkDeviceCreateInfo dev_info = {
 809         .sType                = VK_STRUCTURE_TYPE_DEVICE_CREATE_INFO,
 810         .pQueueCreateInfos    = queue_create_info,
 811         .queueCreateInfoCount = 0,
 812     };
 813
 814     ctx->free = vulkan_device_free;
 815
 816     /* Create an instance if not given one */
 817     if ((err = create_instance(ctx, opts)))
 818         goto end;
 819
 820     /* Find a device (if not given one) */
 821     if ((err = find_device(ctx, dev_select)))
 822         goto end;
 823
 824     vkGetPhysicalDeviceProperties(hwctx->phys_dev, &p->props);
 825     av_log(ctx, AV_LOG_VERBOSE, "Using device: %s\n", p->props.deviceName);
 826     av_log(ctx, AV_LOG_VERBOSE, "Alignments:\n");
 827     av_log(ctx, AV_LOG_VERBOSE, "    optimalBufferCopyOffsetAlignment:   %li\n",
 828            p->props.limits.optimalBufferCopyOffsetAlignment);
 829     av_log(ctx, AV_LOG_VERBOSE, "    optimalBufferCopyRowPitchAlignment: %li\n",
 830            p->props.limits.optimalBufferCopyRowPitchAlignment);
 831     av_log(ctx, AV_LOG_VERBOSE, "    minMemoryMapAlignment:              %li\n",
 832            p->props.limits.minMemoryMapAlignment);
 833
 834     /* Search queue family */
 835     if ((err = search_queue_families(ctx, &dev_info)))
 836         goto end;
 837
 838     if ((err = check_extensions(ctx, 1, opts, &dev_info.ppEnabledExtensionNames,
 839                                 &dev_info.enabledExtensionCount, 0)))
 840         goto end;
 841
 842     ret = vkCreateDevice(hwctx->phys_dev, &dev_info, hwctx->alloc,
 843                          &hwctx->act_dev);
 844
 845     if (ret != VK_SUCCESS) {
 846         av_log(ctx, AV_LOG_ERROR, "Device creation failure: %s\n",
 847                vk_ret2str(ret));
 848         for (int i = 0; i < dev_info.enabledExtensionCount; i++)
 849             av_free((void *)dev_info.ppEnabledExtensionNames[i]);
 850         av_free((void *)dev_info.ppEnabledExtensionNames);
 851         err = AVERROR_EXTERNAL;
 852         goto end;
 853     }
 854
 855     /* Tiled images setting, use them by default */
 856     opt_d = av_dict_get(opts, "linear_images", NULL, 0);
 857     if (opt_d)
 858         p->use_linear_images = strtol(opt_d->value, NULL, 10);
 859
 860     hwctx->enabled_dev_extensions = dev_info.ppEnabledExtensionNames;
 861     hwctx->nb_enabled_dev_extensions = dev_info.enabledExtensionCount;
 862
 863 end:
 864     return err;
 865 }
 866
 867 static int vulkan_device_init(AVHWDeviceContext *ctx)
 868 {
 869     int err;
 870     uint32_t queue_num;
 871     AVVulkanDeviceContext *hwctx = ctx->hwctx;
 872     VulkanDevicePriv *p = ctx->internal->priv;
 873
 874     /* Set device extension flags */
 875     for (int i = 0; i < hwctx->nb_enabled_dev_extensions; i++) {
 876         for (int j = 0; j < FF_ARRAY_ELEMS(optional_device_exts); j++) {
 877             if (!strcmp(hwctx->enabled_dev_extensions[i],
 878                         optional_device_exts[j].name)) {
 879                 p->extensions |= optional_device_exts[j].flag;
 880                 break;
 881             }
 882         }
 883     }
 884
 885     vkGetPhysicalDeviceQueueFamilyProperties(hwctx->phys_dev, &queue_num, NULL);
 886     if (!queue_num) {
 887         av_log(ctx, AV_LOG_ERROR, "Failed to get queues!\n");
 888         return AVERROR_EXTERNAL;
 889     }
 890
 891 #define CHECK_QUEUE(type, n)                                                         \
 892 if (n >= queue_num) {                                                                \
 893     av_log(ctx, AV_LOG_ERROR, "Invalid %s queue index %i (device has %i queues)!\n", \
 894            type, n, queue_num);                                                      \
 895     return AVERROR(EINVAL);                                                          \
 896 }
 897
 898     CHECK_QUEUE("graphics", hwctx->queue_family_index)
 899     CHECK_QUEUE("upload",   hwctx->queue_family_tx_index)
 900     CHECK_QUEUE("compute",  hwctx->queue_family_comp_index)
 901
 902 #undef CHECK_QUEUE
 903
 904     p->qfs[p->num_qfs++] = hwctx->queue_family_index;
 905     if ((hwctx->queue_family_tx_index != hwctx->queue_family_index) &&
 906         (hwctx->queue_family_tx_index != hwctx->queue_family_comp_index))
 907         p->qfs[p->num_qfs++] = hwctx->queue_family_tx_index;
 908     if ((hwctx->queue_family_comp_index != hwctx->queue_family_index) &&
 909         (hwctx->queue_family_comp_index != hwctx->queue_family_tx_index))
 910         p->qfs[p->num_qfs++] = hwctx->queue_family_comp_index;
 911
 912     /* Create exec context - if there's something invalid this will error out */
 913     err = create_exec_ctx(ctx, &p->cmd, hwctx->queue_family_tx_index);
 914     if (err)
 915         return err;
 916
 917     /* Get device capabilities */
 918     vkGetPhysicalDeviceMemoryProperties(hwctx->phys_dev, &p->mprops);
 919
 920     return 0;
 921 }
 922
 923 static int vulkan_device_create(AVHWDeviceContext *ctx, const char *device,
 924                                 AVDictionary *opts, int flags)
 925 {
 926     VulkanDeviceSelection dev_select = { 0 };
 927     if (device && device[0]) {
 928         char *end = NULL;
 929         dev_select.index = strtol(device, &end, 10);
 930         if (end == device) {
 931             dev_select.index = 0;
 932             dev_select.name  = device;
 933         }
 934     }
 935
 936     return vulkan_device_create_internal(ctx, &dev_select, opts, flags);
 937 }
 938
 939 static int vulkan_device_derive(AVHWDeviceContext *ctx,
 940                                 AVHWDeviceContext *src_ctx, int flags)
 941 {
 942     av_unused VulkanDeviceSelection dev_select = { 0 };
 943
 944     /* If there's only one device on the system, then even if its not covered
 945      * by the following checks (e.g. non-PCIe ARM GPU), having an empty
 946      * dev_select will mean it'll get picked. */
 947     switch(src_ctx->type) {
 948 #if CONFIG_LIBDRM
 949 #if CONFIG_VAAPI
 950     case AV_HWDEVICE_TYPE_VAAPI: {
 951         AVVAAPIDeviceContext *src_hwctx = src_ctx->hwctx;
 952
 953         const char *vendor = vaQueryVendorString(src_hwctx->display);
 954         if (!vendor) {
 955             av_log(ctx, AV_LOG_ERROR, "Unable to get device info from VAAPI!\n");
 956             return AVERROR_EXTERNAL;
 957         }
 958
 959         if (strstr(vendor, "Intel"))
 960             dev_select.vendor_id = 0x8086;
 961         if (strstr(vendor, "AMD"))
 962             dev_select.vendor_id = 0x1002;
 963
 964         return vulkan_device_create_internal(ctx, &dev_select, NULL, flags);
 965     }
 966 #endif
 967     case AV_HWDEVICE_TYPE_DRM: {
 968         AVDRMDeviceContext *src_hwctx = src_ctx->hwctx;
 969
 970         drmDevice *drm_dev_info;
 971         int err = drmGetDevice(src_hwctx->fd, &drm_dev_info);
 972         if (err) {
 973             av_log(ctx, AV_LOG_ERROR, "Unable to get device info from DRM fd!\n");
 974             return AVERROR_EXTERNAL;
 975         }
 976
 977         if (drm_dev_info->bustype == DRM_BUS_PCI)
 978             dev_select.pci_device = drm_dev_info->deviceinfo.pci->device_id;
 979
 980         drmFreeDevice(&drm_dev_info);
 981
 982         return vulkan_device_create_internal(ctx, &dev_select, NULL, flags);
 983     }
 984 #endif
 985 #if CONFIG_CUDA
 986     case AV_HWDEVICE_TYPE_CUDA: {
 987         AVHWDeviceContext *cuda_cu = src_ctx;
 988         AVCUDADeviceContext *src_hwctx = src_ctx->hwctx;
 989         AVCUDADeviceContextInternal *cu_internal = src_hwctx->internal;
 990         CudaFunctions *cu = cu_internal->cuda_dl;
 991
 992         int ret = CHECK_CU(cu->cuDeviceGetUuid((CUuuid *)&dev_select.uuid,
 993                                                cu_internal->cuda_device));
 994         if (ret < 0) {
 995             av_log(ctx, AV_LOG_ERROR, "Unable to get UUID from CUDA!\n");
 996             return AVERROR_EXTERNAL;
 997         }
 998
 999         dev_select.has_uuid = 1;
1000
1001         return vulkan_device_create_internal(ctx, &dev_select, NULL, flags);
1002     }
1003 #endif
1004     default:
1005         return AVERROR(ENOSYS);
1006     }
1007 }
1008
1009 static int vulkan_frames_get_constraints(AVHWDeviceContext *ctx,
1010                                          const void *hwconfig,
1011                                          AVHWFramesConstraints *constraints)
1012 {
1013     int count = 0;
1014     AVVulkanDeviceContext *hwctx = ctx->hwctx;
1015     VulkanDevicePriv *p = ctx->internal->priv;
1016
1017     for (enum AVPixelFormat i = 0; i < AV_PIX_FMT_NB; i++)
1018         count += pixfmt_is_supported(hwctx, i, p->use_linear_images);
1019
1020 #if CONFIG_CUDA
1021     if (p->dev_is_nvidia)
1022         count++;
1023 #endif
1024
1025     constraints->valid_sw_formats = av_malloc_array(count + 1,
1026                                                     sizeof(enum AVPixelFormat));
1027     if (!constraints->valid_sw_formats)
1028         return AVERROR(ENOMEM);
1029
1030     count = 0;
1031     for (enum AVPixelFormat i = 0; i < AV_PIX_FMT_NB; i++)
1032         if (pixfmt_is_supported(hwctx, i, p->use_linear_images))
1033             constraints->valid_sw_formats[count++] = i;
1034
1035 #if CONFIG_CUDA
1036     if (p->dev_is_nvidia)
1037         constraints->valid_sw_formats[count++] = AV_PIX_FMT_CUDA;
1038 #endif
1039     constraints->valid_sw_formats[count++] = AV_PIX_FMT_NONE;
1040
1041     constraints->min_width  = 0;
1042     constraints->min_height = 0;
1043     constraints->max_width  = p->props.limits.maxImageDimension2D;
1044     constraints->max_height = p->props.limits.maxImageDimension2D;
1045
1046     constraints->valid_hw_formats = av_malloc_array(2, sizeof(enum AVPixelFormat));
1047     if (!constraints->valid_hw_formats)
1048         return AVERROR(ENOMEM);
1049
1050     constraints->valid_hw_formats[0] = AV_PIX_FMT_VULKAN;
1051     constraints->valid_hw_formats[1] = AV_PIX_FMT_NONE;
1052
1053     return 0;
1054 }
1055
1056 static int alloc_mem(AVHWDeviceContext *ctx, VkMemoryRequirements *req,
1057                      VkMemoryPropertyFlagBits req_flags, void *alloc_extension,
1058                      VkMemoryPropertyFlagBits *mem_flags, VkDeviceMemory *mem)
1059 {
1060     VkResult ret;
1061     int index = -1;
1062     VulkanDevicePriv *p = ctx->internal->priv;
1063     AVVulkanDeviceContext *dev_hwctx = ctx->hwctx;
1064     VkMemoryAllocateInfo alloc_info = {
1065         .sType           = VK_STRUCTURE_TYPE_MEMORY_ALLOCATE_INFO,
1066         .pNext           = alloc_extension,
1067     };
1068
1069     /* Align if we need to */
1070     if (req_flags & VK_MEMORY_PROPERTY_HOST_VISIBLE_BIT)
1071         req->size = FFALIGN(req->size, p->props.limits.minMemoryMapAlignment);
1072
1073     alloc_info.allocationSize = req->size;
1074
1075     /* The vulkan spec requires memory types to be sorted in the "optimal"
1076      * order, so the first matching type we find will be the best/fastest one */
1077     for (int i = 0; i < p->mprops.memoryTypeCount; i++) {
1078         /* The memory type must be supported by the requirements (bitfield) */
1079         if (!(req->memoryTypeBits & (1 << i)))
1080             continue;
1081
1082         /* The memory type flags must include our properties */
1083         if ((p->mprops.memoryTypes[i].propertyFlags & req_flags) != req_flags)
1084             continue;
1085
1086         /* Found a suitable memory type */
1087         index = i;
1088         break;
1089     }
1090
1091     if (index < 0) {
1092         av_log(ctx, AV_LOG_ERROR, "No memory type found for flags 0x%x\n",
1093                req_flags);
1094         return AVERROR(EINVAL);
1095     }
1096
1097     alloc_info.memoryTypeIndex = index;
1098
1099     ret = vkAllocateMemory(dev_hwctx->act_dev, &alloc_info,
1100                            dev_hwctx->alloc, mem);
1101     if (ret != VK_SUCCESS) {
1102         av_log(ctx, AV_LOG_ERROR, "Failed to allocate memory: %s\n",
1103                vk_ret2str(ret));
1104         return AVERROR(ENOMEM);
1105     }
1106
1107     *mem_flags |= p->mprops.memoryTypes[index].propertyFlags;
1108
1109     return 0;
1110 }
1111
1112 static void vulkan_free_internal(AVVkFrameInternal *internal)
1113 {
1114     if (!internal)
1115         return;
1116
1117 #if CONFIG_CUDA
1118     if (internal->cuda_fc_ref) {
1119         AVHWFramesContext *cuda_fc = (AVHWFramesContext *)internal->cuda_fc_ref->data;
1120         int planes = av_pix_fmt_count_planes(cuda_fc->sw_format);
1121         AVHWDeviceContext *cuda_cu = cuda_fc->device_ctx;
1122         AVCUDADeviceContext *cuda_dev = cuda_cu->hwctx;
1123         AVCUDADeviceContextInternal *cu_internal = cuda_dev->internal;
1124         CudaFunctions *cu = cu_internal->cuda_dl;
1125
1126         for (int i = 0; i < planes; i++) {
1127             if (internal->cu_sem[i])
1128                 CHECK_CU(cu->cuDestroyExternalSemaphore(internal->cu_sem[i]));
1129             if (internal->cu_mma[i])
1130                 CHECK_CU(cu->cuMipmappedArrayDestroy(internal->cu_mma[i]));
1131             if (internal->ext_mem[i])
1132                 CHECK_CU(cu->cuDestroyExternalMemory(internal->ext_mem[i]));
1133         }
1134
1135         av_buffer_unref(&internal->cuda_fc_ref);
1136     }
1137 #endif
1138
1139     av_free(internal);
1140 }
1141
1142 static void vulkan_frame_free(void *opaque, uint8_t *data)
1143 {
1144     AVVkFrame *f = (AVVkFrame *)data;
1145     AVHWFramesContext *hwfc = opaque;
1146     AVVulkanDeviceContext *hwctx = hwfc->device_ctx->hwctx;
1147     int planes = av_pix_fmt_count_planes(hwfc->sw_format);
1148
1149     vulkan_free_internal(f->internal);
1150
1151     for (int i = 0; i < planes; i++) {
1152         vkDestroyImage(hwctx->act_dev, f->img[i], hwctx->alloc);
1153         vkFreeMemory(hwctx->act_dev, f->mem[i], hwctx->alloc);
1154         vkDestroySemaphore(hwctx->act_dev, f->sem[i], hwctx->alloc);
1155     }
1156
1157     av_free(f);
1158 }
1159
1160 static int alloc_bind_mem(AVHWFramesContext *hwfc, AVVkFrame *f,
1161                           void *alloc_pnext, size_t alloc_pnext_stride)
1162 {
1163     int err;
1164     VkResult ret;
1165     AVHWDeviceContext *ctx = hwfc->device_ctx;
1166     const int planes = av_pix_fmt_count_planes(hwfc->sw_format);
1167     VkBindImageMemoryInfo bind_info[AV_NUM_DATA_POINTERS] = { { 0 } };
1168
1169     AVVulkanDeviceContext *hwctx = ctx->hwctx;
1170
1171     for (int i = 0; i < planes; i++) {
1172         int use_ded_mem;
1173         VkImageMemoryRequirementsInfo2 req_desc = {
1174             .sType = VK_STRUCTURE_TYPE_IMAGE_MEMORY_REQUIREMENTS_INFO_2,
1175             .image = f->img[i],
1176         };
1177         VkMemoryDedicatedAllocateInfo ded_alloc = {
1178             .sType = VK_STRUCTURE_TYPE_MEMORY_DEDICATED_ALLOCATE_INFO,
1179             .pNext = (void *)(((uint8_t *)alloc_pnext) + i*alloc_pnext_stride),
1180         };
1181         VkMemoryDedicatedRequirements ded_req = {
1182             .sType = VK_STRUCTURE_TYPE_MEMORY_DEDICATED_REQUIREMENTS,
1183         };
1184         VkMemoryRequirements2 req = {
1185             .sType = VK_STRUCTURE_TYPE_MEMORY_REQUIREMENTS_2,
1186             .pNext = &ded_req,
1187         };
1188
1189         vkGetImageMemoryRequirements2(hwctx->act_dev, &req_desc, &req);
1190
1191         /* In case the implementation prefers/requires dedicated allocation */
1192         use_ded_mem = ded_req.prefersDedicatedAllocation |
1193                       ded_req.requiresDedicatedAllocation;
1194         if (use_ded_mem)
1195             ded_alloc.image = f->img[i];
1196
1197         /* Allocate memory */
1198         if ((err = alloc_mem(ctx, &req.memoryRequirements,
1199                              f->tiling == VK_IMAGE_TILING_LINEAR ?
1200                              VK_MEMORY_PROPERTY_HOST_VISIBLE_BIT :
1201                              VK_MEMORY_PROPERTY_DEVICE_LOCAL_BIT,
1202                              use_ded_mem ? &ded_alloc : (void *)ded_alloc.pNext,
1203                              &f->flags, &f->mem[i])))
1204             return err;
1205
1206         f->size[i] = req.memoryRequirements.size;
1207         bind_info[i].sType  = VK_STRUCTURE_TYPE_BIND_IMAGE_MEMORY_INFO;
1208         bind_info[i].image  = f->img[i];
1209         bind_info[i].memory = f->mem[i];
1210     }
1211
1212     /* Bind the allocated memory to the images */
1213     ret = vkBindImageMemory2(hwctx->act_dev, planes, bind_info);
1214     if (ret != VK_SUCCESS) {
1215         av_log(ctx, AV_LOG_ERROR, "Failed to bind memory: %s\n",
1216                vk_ret2str(ret));
1217         return AVERROR_EXTERNAL;
1218     }
1219
1220     return 0;
1221 }
1222
1223 enum PrepMode {
1224     PREP_MODE_WRITE,
1225     PREP_MODE_RO_SHADER,
1226     PREP_MODE_EXTERNAL_EXPORT,
1227 };
1228
1229 static int prepare_frame(AVHWFramesContext *hwfc, VulkanExecCtx *ectx,
1230                          AVVkFrame *frame, enum PrepMode pmode)
1231 {
1232     VkResult ret;
1233     uint32_t dst_qf;
1234     VkImageLayout new_layout;
1235     VkAccessFlags new_access;
1236     AVHWDeviceContext *ctx = hwfc->device_ctx;
1237     AVVulkanDeviceContext *hwctx = ctx->hwctx;
1238     const int planes = av_pix_fmt_count_planes(hwfc->sw_format);
1239
1240     VkImageMemoryBarrier img_bar[AV_NUM_DATA_POINTERS] = { 0 };
1241
1242     VkCommandBufferBeginInfo cmd_start = {
1243         .sType = VK_STRUCTURE_TYPE_COMMAND_BUFFER_BEGIN_INFO,
1244         .flags = VK_COMMAND_BUFFER_USAGE_ONE_TIME_SUBMIT_BIT,
1245     };
1246
1247     VkPipelineStageFlagBits wait_st = VK_PIPELINE_STAGE_TOP_OF_PIPE_BIT;
1248
1249     VkSubmitInfo s_info = {
1250         .sType                = VK_STRUCTURE_TYPE_SUBMIT_INFO,
1251         .commandBufferCount   = 1,
1252         .pCommandBuffers      = &ectx->buf,
1253
1254         .pSignalSemaphores    = frame->sem,
1255         .signalSemaphoreCount = planes,
1256     };
1257
1258     switch (pmode) {
1259     case PREP_MODE_WRITE:
1260         new_layout = VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL;
1261         new_access = VK_ACCESS_TRANSFER_WRITE_BIT;
1262         dst_qf     = VK_QUEUE_FAMILY_IGNORED;
1263         break;
1264     case PREP_MODE_RO_SHADER:
1265         new_layout = VK_IMAGE_LAYOUT_TRANSFER_SRC_OPTIMAL;
1266         new_access = VK_ACCESS_TRANSFER_READ_BIT;
1267         dst_qf     = VK_QUEUE_FAMILY_IGNORED;
1268         break;
1269     case PREP_MODE_EXTERNAL_EXPORT:
1270         new_layout = VK_IMAGE_LAYOUT_GENERAL;
1271         new_access = VK_ACCESS_MEMORY_READ_BIT | VK_ACCESS_MEMORY_WRITE_BIT;
1272         dst_qf     = VK_QUEUE_FAMILY_EXTERNAL_KHR;
1273         s_info.pWaitSemaphores = &frame->sem;
1274         s_info.pWaitDstStageMask = &wait_st;
1275         s_info.waitSemaphoreCount = 1;
1276         break;
1277     }
1278
1279     ret = vkBeginCommandBuffer(ectx->buf, &cmd_start);
1280     if (ret != VK_SUCCESS)
1281         return AVERROR_EXTERNAL;
1282
1283     /* Change the image layout to something more optimal for writes.
1284      * This also signals the newly created semaphore, making it usable
1285      * for synchronization */
1286     for (int i = 0; i < planes; i++) {
1287         img_bar[i].sType = VK_STRUCTURE_TYPE_IMAGE_MEMORY_BARRIER;
1288         img_bar[i].srcAccessMask = 0x0;
1289         img_bar[i].dstAccessMask = new_access;
1290         img_bar[i].oldLayout = frame->layout[i];
1291         img_bar[i].newLayout = new_layout;
1292         img_bar[i].srcQueueFamilyIndex = VK_QUEUE_FAMILY_IGNORED;
1293         img_bar[i].dstQueueFamilyIndex = dst_qf;
1294         img_bar[i].image = frame->img[i];
1295         img_bar[i].subresourceRange.levelCount = 1;
1296         img_bar[i].subresourceRange.layerCount = 1;
1297         img_bar[i].subresourceRange.aspectMask = VK_IMAGE_ASPECT_COLOR_BIT;
1298
1299         frame->layout[i] = img_bar[i].newLayout;
1300         frame->access[i] = img_bar[i].dstAccessMask;
1301     }
1302
1303     vkCmdPipelineBarrier(ectx->buf, VK_PIPELINE_STAGE_TOP_OF_PIPE_BIT,
1304                          VK_PIPELINE_STAGE_TRANSFER_BIT, 0,
1305                          0, NULL, 0, NULL, planes, img_bar);
1306
1307     ret = vkEndCommandBuffer(ectx->buf);
1308     if (ret != VK_SUCCESS)
1309         return AVERROR_EXTERNAL;
1310
1311     ret = vkQueueSubmit(ectx->queue, 1, &s_info, ectx->fence);
1312     if (ret != VK_SUCCESS) {
1313         return AVERROR_EXTERNAL;
1314     } else {
1315         vkWaitForFences(hwctx->act_dev, 1, &ectx->fence, VK_TRUE, UINT64_MAX);
1316         vkResetFences(hwctx->act_dev, 1, &ectx->fence);
1317     }
1318
1319     return 0;
1320 }
1321
1322 static int create_frame(AVHWFramesContext *hwfc, AVVkFrame **frame,
1323                         VkImageTiling tiling, VkImageUsageFlagBits usage,
1324                         void *create_pnext)
1325 {
1326     int err;
1327     VkResult ret;
1328     AVHWDeviceContext *ctx = hwfc->device_ctx;
1329     VulkanDevicePriv *p = ctx->internal->priv;
1330     AVVulkanDeviceContext *hwctx = ctx->hwctx;
1331     enum AVPixelFormat format = hwfc->sw_format;
1332     const VkFormat *img_fmts = av_vkfmt_from_pixfmt(format);
1333     const int planes = av_pix_fmt_count_planes(format);
1334
1335     VkExportSemaphoreCreateInfo ext_sem_info = {
1336         .sType = VK_STRUCTURE_TYPE_EXPORT_SEMAPHORE_CREATE_INFO,
1337         .handleTypes = VK_EXTERNAL_SEMAPHORE_HANDLE_TYPE_OPAQUE_FD_BIT,
1338     };
1339
1340     VkSemaphoreCreateInfo sem_spawn = {
1341         .sType = VK_STRUCTURE_TYPE_SEMAPHORE_CREATE_INFO,
1342         .pNext = p->extensions & EXT_EXTERNAL_FD_SEM ? &ext_sem_info : NULL,
1343     };
1344
1345     AVVkFrame *f = av_vk_frame_alloc();
1346     if (!f) {
1347         av_log(ctx, AV_LOG_ERROR, "Unable to allocate memory for AVVkFrame!\n");
1348         return AVERROR(ENOMEM);
1349     }
1350
1351     /* Create the images */
1352     for (int i = 0; i < planes; i++) {
1353         const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(format);
1354         int w = hwfc->width;
1355         int h = hwfc->height;
1356         const int p_w = i > 0 ? AV_CEIL_RSHIFT(w, desc->log2_chroma_w) : w;
1357         const int p_h = i > 0 ? AV_CEIL_RSHIFT(h, desc->log2_chroma_h) : h;
1358
1359         VkImageCreateInfo image_create_info = {
1360             .sType                 = VK_STRUCTURE_TYPE_IMAGE_CREATE_INFO,
1361             .pNext                 = create_pnext,
1362             .imageType             = VK_IMAGE_TYPE_2D,
1363             .format                = img_fmts[i],
1364             .extent.width          = p_w,
1365             .extent.height         = p_h,
1366             .extent.depth          = 1,
1367             .mipLevels             = 1,
1368             .arrayLayers           = 1,
1369             .flags                 = VK_IMAGE_CREATE_ALIAS_BIT,
1370             .tiling                = tiling,
1371             .initialLayout         = VK_IMAGE_LAYOUT_UNDEFINED,
1372             .usage                 = usage,
1373             .samples               = VK_SAMPLE_COUNT_1_BIT,
1374             .pQueueFamilyIndices   = p->qfs,
1375             .queueFamilyIndexCount = p->num_qfs,
1376             .sharingMode           = p->num_qfs > 1 ? VK_SHARING_MODE_CONCURRENT :
1377                                                       VK_SHARING_MODE_EXCLUSIVE,
1378         };
1379
1380         ret = vkCreateImage(hwctx->act_dev, &image_create_info,
1381                             hwctx->alloc, &f->img[i]);
1382         if (ret != VK_SUCCESS) {
1383             av_log(ctx, AV_LOG_ERROR, "Image creation failure: %s\n",
1384                    vk_ret2str(ret));
1385             err = AVERROR(EINVAL);
1386             goto fail;
1387         }
1388
1389         /* Create semaphore */
1390         ret = vkCreateSemaphore(hwctx->act_dev, &sem_spawn,
1391                                 hwctx->alloc, &f->sem[i]);
1392         if (ret != VK_SUCCESS) {
1393             av_log(hwctx, AV_LOG_ERROR, "Failed to create semaphore: %s\n",
1394                    vk_ret2str(ret));
1395             return AVERROR_EXTERNAL;
1396         }
1397
1398         f->layout[i] = image_create_info.initialLayout;
1399         f->access[i] = 0x0;
1400     }
1401
1402     f->flags     = 0x0;
1403     f->tiling    = tiling;
1404
1405     *frame = f;
1406     return 0;
1407
1408 fail:
1409     vulkan_frame_free(hwfc, (uint8_t *)f);
1410     return err;
1411 }
1412
1413 /* Checks if an export flag is enabled, and if it is ORs it with *iexp */
1414 static void try_export_flags(AVHWFramesContext *hwfc,
1415                              VkExternalMemoryHandleTypeFlags *comp_handle_types,
1416                              VkExternalMemoryHandleTypeFlagBits *iexp,
1417                              VkExternalMemoryHandleTypeFlagBits exp)
1418 {
1419     VkResult ret;
1420     AVVulkanFramesContext *hwctx = hwfc->hwctx;
1421     AVVulkanDeviceContext *dev_hwctx = hwfc->device_ctx->hwctx;
1422     VkExternalImageFormatProperties eprops = {
1423         .sType = VK_STRUCTURE_TYPE_EXTERNAL_IMAGE_FORMAT_PROPERTIES_KHR,
1424     };
1425     VkImageFormatProperties2 props = {
1426         .sType = VK_STRUCTURE_TYPE_IMAGE_FORMAT_PROPERTIES_2,
1427         .pNext = &eprops,
1428     };
1429     VkPhysicalDeviceExternalImageFormatInfo enext = {
1430         .sType = VK_STRUCTURE_TYPE_PHYSICAL_DEVICE_EXTERNAL_IMAGE_FORMAT_INFO,
1431         .handleType = exp,
1432     };
1433     VkPhysicalDeviceImageFormatInfo2 pinfo = {
1434         .sType  = VK_STRUCTURE_TYPE_PHYSICAL_DEVICE_IMAGE_FORMAT_INFO_2,
1435         .pNext  = !exp ? NULL : &enext,
1436         .format = av_vkfmt_from_pixfmt(hwfc->sw_format)[0],
1437         .type   = VK_IMAGE_TYPE_2D,
1438         .tiling = hwctx->tiling,
1439         .usage  = hwctx->usage,
1440         .flags  = VK_IMAGE_CREATE_ALIAS_BIT,
1441     };
1442
1443     ret = vkGetPhysicalDeviceImageFormatProperties2(dev_hwctx->phys_dev,
1444                                                     &pinfo, &props);
1445     if (ret == VK_SUCCESS) {
1446         *iexp |= exp;
1447         *comp_handle_types |= eprops.externalMemoryProperties.compatibleHandleTypes;
1448     }
1449 }
1450
1451 static AVBufferRef *vulkan_pool_alloc(void *opaque, int size)
1452 {
1453     int err;
1454     AVVkFrame *f;
1455     AVBufferRef *avbuf = NULL;
1456     AVHWFramesContext *hwfc = opaque;
1457     AVVulkanFramesContext *hwctx = hwfc->hwctx;
1458     VulkanDevicePriv *p = hwfc->device_ctx->internal->priv;
1459     VkExportMemoryAllocateInfo eminfo[AV_NUM_DATA_POINTERS];
1460     VkExternalMemoryHandleTypeFlags e = 0x0;
1461
1462     VkExternalMemoryImageCreateInfo eiinfo = {
1463         .sType       = VK_STRUCTURE_TYPE_EXTERNAL_MEMORY_IMAGE_CREATE_INFO,
1464         .pNext       = hwctx->create_pnext,
1465     };
1466
1467     if (p->extensions & EXT_EXTERNAL_FD_MEMORY)
1468         try_export_flags(hwfc, &eiinfo.handleTypes, &e,
1469                          VK_EXTERNAL_MEMORY_HANDLE_TYPE_OPAQUE_FD_BIT);
1470
1471     if (p->extensions & EXT_EXTERNAL_DMABUF_MEMORY)
1472         try_export_flags(hwfc, &eiinfo.handleTypes, &e,
1473                          VK_EXTERNAL_MEMORY_HANDLE_TYPE_DMA_BUF_BIT_EXT);
1474
1475     for (int i = 0; i < av_pix_fmt_count_planes(hwfc->sw_format); i++) {
1476         eminfo[i].sType       = VK_STRUCTURE_TYPE_EXPORT_MEMORY_ALLOCATE_INFO;
1477         eminfo[i].pNext       = hwctx->alloc_pnext[i];
1478         eminfo[i].handleTypes = e;
1479     }
1480
1481     err = create_frame(hwfc, &f, hwctx->tiling, hwctx->usage,
1482                        eiinfo.handleTypes ? &eiinfo : NULL);
1483     if (err)
1484         return NULL;
1485
1486     err = alloc_bind_mem(hwfc, f, eminfo, sizeof(*eminfo));
1487     if (err)
1488         goto fail;
1489
1490     err = prepare_frame(hwfc, &p->cmd, f, PREP_MODE_WRITE);
1491     if (err)
1492         goto fail;
1493
1494     avbuf = av_buffer_create((uint8_t *)f, sizeof(AVVkFrame),
1495                              vulkan_frame_free, hwfc, 0);
1496     if (!avbuf)
1497         goto fail;
1498
1499     return avbuf;
1500
1501 fail:
1502     vulkan_frame_free(hwfc, (uint8_t *)f);
1503     return NULL;
1504 }
1505
1506 static void vulkan_frames_uninit(AVHWFramesContext *hwfc)
1507 {
1508     VulkanFramesPriv *fp = hwfc->internal->priv;
1509
1510     free_exec_ctx(hwfc->device_ctx, &fp->cmd);
1511 }
1512
1513 static int vulkan_frames_init(AVHWFramesContext *hwfc)
1514 {
1515     int err;
1516     AVVkFrame *f;
1517     AVVulkanFramesContext *hwctx = hwfc->hwctx;
1518     VulkanFramesPriv *fp = hwfc->internal->priv;
1519     AVVulkanDeviceContext *dev_hwctx = hwfc->device_ctx->hwctx;
1520     VulkanDevicePriv *p = hwfc->device_ctx->internal->priv;
1521
1522     if (hwfc->pool)
1523         return 0;
1524
1525     /* Default pool flags */
1526     hwctx->tiling = hwctx->tiling ? hwctx->tiling : p->use_linear_images ?
1527                     VK_IMAGE_TILING_LINEAR : VK_IMAGE_TILING_OPTIMAL;
1528
1529     hwctx->usage |= DEFAULT_USAGE_FLAGS;
1530
1531     err = create_exec_ctx(hwfc->device_ctx, &fp->cmd,
1532                           dev_hwctx->queue_family_tx_index);
1533     if (err)
1534         return err;
1535
1536     /* Test to see if allocation will fail */
1537     err = create_frame(hwfc, &f, hwctx->tiling, hwctx->usage,
1538                        hwctx->create_pnext);
1539     if (err) {
1540         free_exec_ctx(hwfc->device_ctx, &p->cmd);
1541         return err;
1542     }
1543
1544     vulkan_frame_free(hwfc, (uint8_t *)f);
1545
1546     hwfc->internal->pool_internal = av_buffer_pool_init2(sizeof(AVVkFrame),
1547                                                          hwfc, vulkan_pool_alloc,
1548                                                          NULL);
1549     if (!hwfc->internal->pool_internal) {
1550         free_exec_ctx(hwfc->device_ctx, &p->cmd);
1551         return AVERROR(ENOMEM);
1552     }
1553
1554     return 0;
1555 }
1556
1557 static int vulkan_get_buffer(AVHWFramesContext *hwfc, AVFrame *frame)
1558 {
1559     frame->buf[0] = av_buffer_pool_get(hwfc->pool);
1560     if (!frame->buf[0])
1561         return AVERROR(ENOMEM);
1562
1563     frame->data[0] = frame->buf[0]->data;
1564     frame->format  = AV_PIX_FMT_VULKAN;
1565     frame->width   = hwfc->width;
1566     frame->height  = hwfc->height;
1567
1568     return 0;
1569 }
1570
1571 static int vulkan_transfer_get_formats(AVHWFramesContext *hwfc,
1572                                        enum AVHWFrameTransferDirection dir,
1573                                        enum AVPixelFormat **formats)
1574 {
1575     enum AVPixelFormat *fmts = av_malloc_array(2, sizeof(*fmts));
1576     if (!fmts)
1577         return AVERROR(ENOMEM);
1578
1579     fmts[0] = hwfc->sw_format;
1580     fmts[1] = AV_PIX_FMT_NONE;
1581
1582     *formats = fmts;
1583     return 0;
1584 }
1585
1586 typedef struct VulkanMapping {
1587     AVVkFrame *frame;
1588     int flags;
1589 } VulkanMapping;
1590
1591 static void vulkan_unmap_frame(AVHWFramesContext *hwfc, HWMapDescriptor *hwmap)
1592 {
1593     VulkanMapping *map = hwmap->priv;
1594     AVVulkanDeviceContext *hwctx = hwfc->device_ctx->hwctx;
1595     const int planes = av_pix_fmt_count_planes(hwfc->sw_format);
1596
1597     /* Check if buffer needs flushing */
1598     if ((map->flags & AV_HWFRAME_MAP_WRITE) &&
1599         !(map->frame->flags & VK_MEMORY_PROPERTY_HOST_COHERENT_BIT)) {
1600         VkResult ret;
1601         VkMappedMemoryRange flush_ranges[AV_NUM_DATA_POINTERS] = { { 0 } };
1602
1603         for (int i = 0; i < planes; i++) {
1604             flush_ranges[i].sType  = VK_STRUCTURE_TYPE_MAPPED_MEMORY_RANGE;
1605             flush_ranges[i].memory = map->frame->mem[i];
1606             flush_ranges[i].size   = VK_WHOLE_SIZE;
1607         }
1608
1609         ret = vkFlushMappedMemoryRanges(hwctx->act_dev, planes,
1610                                         flush_ranges);
1611         if (ret != VK_SUCCESS) {
1612             av_log(hwfc, AV_LOG_ERROR, "Failed to flush memory: %s\n",
1613                    vk_ret2str(ret));
1614         }
1615     }
1616
1617     for (int i = 0; i < planes; i++)
1618         vkUnmapMemory(hwctx->act_dev, map->frame->mem[i]);
1619
1620     av_free(map);
1621 }
1622
1623 static int vulkan_map_frame_to_mem(AVHWFramesContext *hwfc, AVFrame *dst,
1624                                    const AVFrame *src, int flags)
1625 {
1626     VkResult ret;
1627     int err, mapped_mem_count = 0;
1628     AVVkFrame *f = (AVVkFrame *)src->data[0];
1629     AVVulkanDeviceContext *hwctx = hwfc->device_ctx->hwctx;
1630     const int planes = av_pix_fmt_count_planes(hwfc->sw_format);
1631
1632     VulkanMapping *map = av_mallocz(sizeof(VulkanMapping));
1633     if (!map)
1634         return AVERROR(EINVAL);
1635
1636     if (src->format != AV_PIX_FMT_VULKAN) {
1637         av_log(hwfc, AV_LOG_ERROR, "Cannot map from pixel format %s!\n",
1638                av_get_pix_fmt_name(src->format));
1639         err = AVERROR(EINVAL);
1640         goto fail;
1641     }
1642
1643     if (!(f->flags & VK_MEMORY_PROPERTY_HOST_VISIBLE_BIT) ||
1644         !(f->tiling == VK_IMAGE_TILING_LINEAR)) {
1645         av_log(hwfc, AV_LOG_ERROR, "Unable to map frame, not host visible "
1646                "and linear!\n");
1647         err = AVERROR(EINVAL);
1648         goto fail;
1649     }
1650
1651     dst->width  = src->width;
1652     dst->height = src->height;
1653
1654     for (int i = 0; i < planes; i++) {
1655         ret = vkMapMemory(hwctx->act_dev, f->mem[i], 0,
1656                           VK_WHOLE_SIZE, 0, (void **)&dst->data[i]);
1657         if (ret != VK_SUCCESS) {
1658             av_log(hwfc, AV_LOG_ERROR, "Failed to map image memory: %s\n",
1659                 vk_ret2str(ret));
1660             err = AVERROR_EXTERNAL;
1661             goto fail;
1662         }
1663         mapped_mem_count++;
1664     }
1665
1666     /* Check if the memory contents matter */
1667     if (((flags & AV_HWFRAME_MAP_READ) || !(flags & AV_HWFRAME_MAP_OVERWRITE)) &&
1668         !(f->flags & VK_MEMORY_PROPERTY_HOST_COHERENT_BIT)) {
1669         VkMappedMemoryRange map_mem_ranges[AV_NUM_DATA_POINTERS] = { { 0 } };
1670         for (int i = 0; i < planes; i++) {
1671             map_mem_ranges[i].sType = VK_STRUCTURE_TYPE_MAPPED_MEMORY_RANGE;
1672             map_mem_ranges[i].size = VK_WHOLE_SIZE;
1673             map_mem_ranges[i].memory = f->mem[i];
1674         }
1675
1676         ret = vkInvalidateMappedMemoryRanges(hwctx->act_dev, planes,
1677                                              map_mem_ranges);
1678         if (ret != VK_SUCCESS) {
1679             av_log(hwfc, AV_LOG_ERROR, "Failed to invalidate memory: %s\n",
1680                    vk_ret2str(ret));
1681             err = AVERROR_EXTERNAL;
1682             goto fail;
1683         }
1684     }
1685
1686     for (int i = 0; i < planes; i++) {
1687         VkImageSubresource sub = {
1688             .aspectMask = VK_IMAGE_ASPECT_COLOR_BIT,
1689         };
1690         VkSubresourceLayout layout;
1691         vkGetImageSubresourceLayout(hwctx->act_dev, f->img[i], &sub, &layout);
1692         dst->linesize[i] = layout.rowPitch;
1693     }
1694
1695     map->frame = f;
1696     map->flags = flags;
1697
1698     err = ff_hwframe_map_create(src->hw_frames_ctx, dst, src,
1699                                 &vulkan_unmap_frame, map);
1700     if (err < 0)
1701         goto fail;
1702
1703     return 0;
1704
1705 fail:
1706     for (int i = 0; i < mapped_mem_count; i++)
1707         vkUnmapMemory(hwctx->act_dev, f->mem[i]);
1708
1709     av_free(map);
1710     return err;
1711 }
1712
1713 #if CONFIG_LIBDRM
1714 static void vulkan_unmap_from(AVHWFramesContext *hwfc, HWMapDescriptor *hwmap)
1715 {
1716     VulkanMapping *map = hwmap->priv;
1717     AVVulkanDeviceContext *hwctx = hwfc->device_ctx->hwctx;
1718     const int planes = av_pix_fmt_count_planes(hwfc->sw_format);
1719
1720     for (int i = 0; i < planes; i++) {
1721         vkDestroyImage(hwctx->act_dev, map->frame->img[i], hwctx->alloc);
1722         vkFreeMemory(hwctx->act_dev, map->frame->mem[i], hwctx->alloc);
1723         vkDestroySemaphore(hwctx->act_dev, map->frame->sem[i], hwctx->alloc);
1724     }
1725
1726     av_freep(&map->frame);
1727 }
1728
1729 static const struct {
1730     uint32_t drm_fourcc;
1731     VkFormat vk_format;
1732 } vulkan_drm_format_map[] = {
1733     { DRM_FORMAT_R8,       VK_FORMAT_R8_UNORM       },
1734     { DRM_FORMAT_R16,      VK_FORMAT_R16_UNORM      },
1735     { DRM_FORMAT_GR88,     VK_FORMAT_R8G8_UNORM     },
1736     { DRM_FORMAT_RG88,     VK_FORMAT_R8G8_UNORM     },
1737     { DRM_FORMAT_GR1616,   VK_FORMAT_R16G16_UNORM   },
1738     { DRM_FORMAT_RG1616,   VK_FORMAT_R16G16_UNORM   },
1739     { DRM_FORMAT_ARGB8888, VK_FORMAT_B8G8R8A8_UNORM },
1740     { DRM_FORMAT_XRGB8888, VK_FORMAT_B8G8R8A8_UNORM },
1741     { DRM_FORMAT_ABGR8888, VK_FORMAT_R8G8B8A8_UNORM },
1742     { DRM_FORMAT_XBGR8888, VK_FORMAT_R8G8B8A8_UNORM },
1743 };
1744
1745 static inline VkFormat drm_to_vulkan_fmt(uint32_t drm_fourcc)
1746 {
1747     for (int i = 0; i < FF_ARRAY_ELEMS(vulkan_drm_format_map); i++)
1748         if (vulkan_drm_format_map[i].drm_fourcc == drm_fourcc)
1749             return vulkan_drm_format_map[i].vk_format;
1750     return VK_FORMAT_UNDEFINED;
1751 }
1752
1753 static int vulkan_map_from_drm_frame_desc(AVHWFramesContext *hwfc, AVVkFrame **frame,
1754                                           AVDRMFrameDescriptor *desc)
1755 {
1756     int err = 0;
1757     VkResult ret;
1758     AVVkFrame *f;
1759     int bind_counts = 0;
1760     AVHWDeviceContext *ctx = hwfc->device_ctx;
1761     AVVulkanDeviceContext *hwctx = ctx->hwctx;
1762     VulkanDevicePriv *p = ctx->internal->priv;
1763     const AVPixFmtDescriptor *fmt_desc = av_pix_fmt_desc_get(hwfc->sw_format);
1764     const int has_modifiers = p->extensions & EXT_DRM_MODIFIER_FLAGS;
1765     VkSubresourceLayout plane_data[AV_NUM_DATA_POINTERS] = { 0 };
1766     VkBindImageMemoryInfo bind_info[AV_NUM_DATA_POINTERS] = { 0 };
1767     VkBindImagePlaneMemoryInfo plane_info[AV_NUM_DATA_POINTERS] = { 0 };
1768     VkExternalMemoryHandleTypeFlagBits htype = VK_EXTERNAL_MEMORY_HANDLE_TYPE_DMA_BUF_BIT_EXT;
1769
1770     VK_LOAD_PFN(hwctx->inst, vkGetMemoryFdPropertiesKHR);
1771
1772     for (int i = 0; i < desc->nb_layers; i++) {
1773         if (drm_to_vulkan_fmt(desc->layers[i].format) == VK_FORMAT_UNDEFINED) {
1774             av_log(ctx, AV_LOG_ERROR, "Unsupported DMABUF layer format %#08x!\n",
1775                    desc->layers[i].format);
1776             return AVERROR(EINVAL);
1777         }
1778     }
1779
1780     if (!(f = av_vk_frame_alloc())) {
1781         av_log(ctx, AV_LOG_ERROR, "Unable to allocate memory for AVVkFrame!\n");
1782         err = AVERROR(ENOMEM);
1783         goto fail;
1784     }
1785
1786     for (int i = 0; i < desc->nb_objects; i++) {
1787         VkMemoryFdPropertiesKHR fdmp = {
1788             .sType = VK_STRUCTURE_TYPE_MEMORY_FD_PROPERTIES_KHR,
1789         };
1790         VkMemoryRequirements req = {
1791             .size = desc->objects[i].size,
1792         };
1793         VkImportMemoryFdInfoKHR idesc = {
1794             .sType      = VK_STRUCTURE_TYPE_IMPORT_MEMORY_FD_INFO_KHR,
1795             .handleType = htype,
1796             .fd         = dup(desc->objects[i].fd),
1797         };
1798
1799         ret = pfn_vkGetMemoryFdPropertiesKHR(hwctx->act_dev, htype,
1800                                              idesc.fd, &fdmp);
1801         if (ret != VK_SUCCESS) {
1802             av_log(hwfc, AV_LOG_ERROR, "Failed to get FD properties: %s\n",
1803                    vk_ret2str(ret));
1804             err = AVERROR_EXTERNAL;
1805             close(idesc.fd);
1806             goto fail;
1807         }
1808
1809         req.memoryTypeBits = fdmp.memoryTypeBits;
1810
1811         err = alloc_mem(ctx, &req, VK_MEMORY_PROPERTY_DEVICE_LOCAL_BIT,
1812                         &idesc, &f->flags, &f->mem[i]);
1813         if (err) {
1814             close(idesc.fd);
1815             return err;
1816         }
1817
1818         f->size[i] = desc->objects[i].size;
1819     }
1820
1821     f->tiling = has_modifiers ? VK_IMAGE_TILING_DRM_FORMAT_MODIFIER_EXT :
1822                 desc->objects[0].format_modifier == DRM_FORMAT_MOD_LINEAR ?
1823                 VK_IMAGE_TILING_LINEAR : VK_IMAGE_TILING_OPTIMAL;
1824
1825     for (int i = 0; i < desc->nb_layers; i++) {
1826         const int planes = desc->layers[i].nb_planes;
1827         const int signal_p = has_modifiers && (planes > 1);
1828
1829         VkImageDrmFormatModifierExplicitCreateInfoEXT drm_info = {
1830             .sType = VK_STRUCTURE_TYPE_IMAGE_DRM_FORMAT_MODIFIER_EXPLICIT_CREATE_INFO_EXT,
1831             .drmFormatModifier = desc->objects[0].format_modifier,
1832             .drmFormatModifierPlaneCount = planes,
1833             .pPlaneLayouts = (const VkSubresourceLayout *)&plane_data,
1834         };
1835
1836         VkExternalMemoryImageCreateInfo einfo = {
1837             .sType       = VK_STRUCTURE_TYPE_EXTERNAL_MEMORY_IMAGE_CREATE_INFO,
1838             .pNext       = has_modifiers ? &drm_info : NULL,
1839             .handleTypes = htype,
1840         };
1841
1842         VkSemaphoreCreateInfo sem_spawn = {
1843             .sType = VK_STRUCTURE_TYPE_SEMAPHORE_CREATE_INFO,
1844         };
1845
1846         const int p_w = i > 0 ? AV_CEIL_RSHIFT(hwfc->width, fmt_desc->log2_chroma_w) : hwfc->width;
1847         const int p_h = i > 0 ? AV_CEIL_RSHIFT(hwfc->height, fmt_desc->log2_chroma_h) : hwfc->height;
1848
1849         VkImageCreateInfo image_create_info = {
1850             .sType                 = VK_STRUCTURE_TYPE_IMAGE_CREATE_INFO,
1851             .pNext                 = &einfo,
1852             .imageType             = VK_IMAGE_TYPE_2D,
1853             .format                = drm_to_vulkan_fmt(desc->layers[i].format),
1854             .extent.width          = p_w,
1855             .extent.height         = p_h,
1856             .extent.depth          = 1,
1857             .mipLevels             = 1,
1858             .arrayLayers           = 1,
1859             .flags                 = VK_IMAGE_CREATE_ALIAS_BIT,
1860             .tiling                = f->tiling,
1861             .initialLayout         = VK_IMAGE_LAYOUT_UNDEFINED, /* specs say so */
1862             .usage                 = DEFAULT_USAGE_FLAGS,
1863             .samples               = VK_SAMPLE_COUNT_1_BIT,
1864             .pQueueFamilyIndices   = p->qfs,
1865             .queueFamilyIndexCount = p->num_qfs,
1866             .sharingMode           = p->num_qfs > 1 ? VK_SHARING_MODE_CONCURRENT :
1867                                                       VK_SHARING_MODE_EXCLUSIVE,
1868         };
1869
1870         for (int j = 0; j < planes; j++) {
1871             plane_data[j].offset     = desc->layers[i].planes[j].offset;
1872             plane_data[j].rowPitch   = desc->layers[i].planes[j].pitch;
1873             plane_data[j].size       = 0; /* The specs say so for all 3 */
1874             plane_data[j].arrayPitch = 0;
1875             plane_data[j].depthPitch = 0;
1876         }
1877
1878         /* Create image */
1879         ret = vkCreateImage(hwctx->act_dev, &image_create_info,
1880                             hwctx->alloc, &f->img[i]);
1881         if (ret != VK_SUCCESS) {
1882             av_log(ctx, AV_LOG_ERROR, "Image creation failure: %s\n",
1883                    vk_ret2str(ret));
1884             err = AVERROR(EINVAL);
1885             goto fail;
1886         }
1887
1888         ret = vkCreateSemaphore(hwctx->act_dev, &sem_spawn,
1889                                 hwctx->alloc, &f->sem[i]);
1890         if (ret != VK_SUCCESS) {
1891             av_log(hwctx, AV_LOG_ERROR, "Failed to create semaphore: %s\n",
1892                    vk_ret2str(ret));
1893             return AVERROR_EXTERNAL;
1894         }
1895
1896         /* We'd import a semaphore onto the one we created using
1897          * vkImportSemaphoreFdKHR but unfortunately neither DRM nor VAAPI
1898          * offer us anything we could import and sync with, so instead
1899          * just signal the semaphore we created. */
1900
1901         f->layout[i] = image_create_info.initialLayout;
1902         f->access[i] = 0x0;
1903
1904         for (int j = 0; j < planes; j++) {
1905             VkImageAspectFlagBits aspect = j == 0 ? VK_IMAGE_ASPECT_MEMORY_PLANE_0_BIT_EXT :
1906                                            j == 1 ? VK_IMAGE_ASPECT_MEMORY_PLANE_1_BIT_EXT :
1907                                                     VK_IMAGE_ASPECT_MEMORY_PLANE_2_BIT_EXT;
1908
1909             plane_info[bind_counts].sType = VK_STRUCTURE_TYPE_BIND_IMAGE_PLANE_MEMORY_INFO;
1910             plane_info[bind_counts].planeAspect = aspect;
1911
1912             bind_info[bind_counts].sType  = VK_STRUCTURE_TYPE_BIND_IMAGE_MEMORY_INFO;
1913             bind_info[bind_counts].pNext  = signal_p ? &plane_info[bind_counts] : NULL;
1914             bind_info[bind_counts].image  = f->img[i];
1915             bind_info[bind_counts].memory = f->mem[desc->layers[i].planes[j].object_index];
1916             bind_info[bind_counts].memoryOffset = desc->layers[i].planes[j].offset;
1917             bind_counts++;
1918         }
1919     }
1920
1921     /* Bind the allocated memory to the images */
1922     ret = vkBindImageMemory2(hwctx->act_dev, bind_counts, bind_info);
1923     if (ret != VK_SUCCESS) {
1924         av_log(ctx, AV_LOG_ERROR, "Failed to bind memory: %s\n",
1925                vk_ret2str(ret));
1926         return AVERROR_EXTERNAL;
1927     }
1928
1929     /* NOTE: This is completely uneccesary and unneeded once we can import
1930      * semaphores from DRM. Otherwise we have to activate the semaphores.
1931      * We're reusing the exec context that's also used for uploads/downloads. */
1932     err = prepare_frame(hwfc, &p->cmd, f, PREP_MODE_RO_SHADER);
1933     if (err)
1934         goto fail;
1935
1936     *frame = f;
1937
1938     return 0;
1939
1940 fail:
1941     for (int i = 0; i < desc->nb_layers; i++) {
1942         vkDestroyImage(hwctx->act_dev, f->img[i], hwctx->alloc);
1943         vkDestroySemaphore(hwctx->act_dev, f->sem[i], hwctx->alloc);
1944     }
1945     for (int i = 0; i < desc->nb_objects; i++)
1946         vkFreeMemory(hwctx->act_dev, f->mem[i], hwctx->alloc);
1947
1948     av_free(f);
1949
1950     return err;
1951 }
1952
1953 static int vulkan_map_from_drm(AVHWFramesContext *hwfc, AVFrame *dst,
1954                                const AVFrame *src, int flags)
1955 {
1956     int err = 0;
1957     AVVkFrame *f;
1958     VulkanMapping *map = NULL;
1959
1960     err = vulkan_map_from_drm_frame_desc(hwfc, &f,
1961                                          (AVDRMFrameDescriptor *)src->data[0]);
1962     if (err)
1963         return err;
1964
1965     /* The unmapping function will free this */
1966     dst->data[0] = (uint8_t *)f;
1967     dst->width   = src->width;
1968     dst->height  = src->height;
1969
1970     map = av_mallocz(sizeof(VulkanMapping));
1971     if (!map)
1972         goto fail;
1973
1974     map->frame = f;
1975     map->flags = flags;
1976
1977     err = ff_hwframe_map_create(dst->hw_frames_ctx, dst, src,
1978                                 &vulkan_unmap_from, map);
1979     if (err < 0)
1980         goto fail;
1981
1982     av_log(hwfc, AV_LOG_DEBUG, "Mapped DRM object to Vulkan!\n");
1983
1984     return 0;
1985
1986 fail:
1987     vulkan_frame_free(hwfc->device_ctx->hwctx, (uint8_t *)f);
1988     av_free(map);
1989     return err;
1990 }
1991
1992 #if CONFIG_VAAPI
1993 static int vulkan_map_from_vaapi(AVHWFramesContext *dst_fc,
1994                                  AVFrame *dst, const AVFrame *src,
1995                                  int flags)
1996 {
1997     int err;
1998     AVFrame *tmp = av_frame_alloc();
1999     AVHWFramesContext *vaapi_fc = (AVHWFramesContext*)src->hw_frames_ctx->data;
2000     AVVAAPIDeviceContext *vaapi_ctx = vaapi_fc->device_ctx->hwctx;
2001     VASurfaceID surface_id = (VASurfaceID)(uintptr_t)src->data[3];
2002
2003     if (!tmp)
2004         return AVERROR(ENOMEM);
2005
2006     /* We have to sync since like the previous comment said, no semaphores */
2007     vaSyncSurface(vaapi_ctx->display, surface_id);
2008
2009     tmp->format = AV_PIX_FMT_DRM_PRIME;
2010
2011     err = av_hwframe_map(tmp, src, flags);
2012     if (err < 0)
2013         goto fail;
2014
2015     err = vulkan_map_from_drm(dst_fc, dst, tmp, flags);
2016     if (err < 0)
2017         goto fail;
2018
2019     err = ff_hwframe_map_replace(dst, src);
2020
2021 fail:
2022     av_frame_free(&tmp);
2023     return err;
2024 }
2025 #endif
2026 #endif
2027
2028 #if CONFIG_CUDA
2029 static int vulkan_export_to_cuda(AVHWFramesContext *hwfc,
2030                                  AVBufferRef *cuda_hwfc,
2031                                  const AVFrame *frame)
2032 {
2033     int err;
2034     VkResult ret;
2035     AVVkFrame *dst_f;
2036     AVVkFrameInternal *dst_int;
2037     AVHWDeviceContext *ctx = hwfc->device_ctx;
2038     AVVulkanDeviceContext *hwctx = ctx->hwctx;
2039     const int planes = av_pix_fmt_count_planes(hwfc->sw_format);
2040     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(hwfc->sw_format);
2041     VK_LOAD_PFN(hwctx->inst, vkGetMemoryFdKHR);
2042     VK_LOAD_PFN(hwctx->inst, vkGetSemaphoreFdKHR);
2043
2044     AVHWFramesContext *cuda_fc = (AVHWFramesContext*)cuda_hwfc->data;
2045     AVHWDeviceContext *cuda_cu = cuda_fc->device_ctx;
2046     AVCUDADeviceContext *cuda_dev = cuda_cu->hwctx;
2047     AVCUDADeviceContextInternal *cu_internal = cuda_dev->internal;
2048     CudaFunctions *cu = cu_internal->cuda_dl;
2049     CUarray_format cufmt = desc->comp[0].depth > 8 ? CU_AD_FORMAT_UNSIGNED_INT16 :
2050                                                      CU_AD_FORMAT_UNSIGNED_INT8;
2051
2052     dst_f = (AVVkFrame *)frame->data[0];
2053
2054     dst_int = dst_f->internal;
2055     if (!dst_int || !dst_int->cuda_fc_ref) {
2056         if (!dst_f->internal)
2057             dst_f->internal = dst_int = av_mallocz(sizeof(*dst_f->internal));
2058
2059         if (!dst_int) {
2060             err = AVERROR(ENOMEM);
2061             goto fail;
2062         }
2063
2064         dst_int->cuda_fc_ref = av_buffer_ref(cuda_hwfc);
2065         if (!dst_int->cuda_fc_ref) {
2066             err = AVERROR(ENOMEM);
2067             goto fail;
2068         }
2069
2070         for (int i = 0; i < planes; i++) {
2071             CUDA_EXTERNAL_MEMORY_MIPMAPPED_ARRAY_DESC tex_desc = {
2072                 .offset = 0,
2073                 .arrayDesc = {
2074                     .Width  = i > 0 ? AV_CEIL_RSHIFT(hwfc->width, desc->log2_chroma_w)
2075                                     : hwfc->width,
2076                     .Height = i > 0 ? AV_CEIL_RSHIFT(hwfc->height, desc->log2_chroma_h)
2077                                     : hwfc->height,
2078                     .Depth = 0,
2079                     .Format = cufmt,
2080                     .NumChannels = 1 + ((planes == 2) && i),
2081                     .Flags = 0,
2082                 },
2083                 .numLevels = 1,
2084             };
2085             CUDA_EXTERNAL_MEMORY_HANDLE_DESC ext_desc = {
2086                 .type = CU_EXTERNAL_MEMORY_HANDLE_TYPE_OPAQUE_FD,
2087                 .size = dst_f->size[i],
2088             };
2089             VkMemoryGetFdInfoKHR export_info = {
2090                 .sType      = VK_STRUCTURE_TYPE_MEMORY_GET_FD_INFO_KHR,
2091                 .memory     = dst_f->mem[i],
2092                 .handleType = VK_EXTERNAL_MEMORY_HANDLE_TYPE_OPAQUE_FD_BIT_KHR,
2093             };
2094             VkSemaphoreGetFdInfoKHR sem_export = {
2095                 .sType = VK_STRUCTURE_TYPE_SEMAPHORE_GET_FD_INFO_KHR,
2096                 .semaphore = dst_f->sem[i],
2097                 .handleType = VK_EXTERNAL_SEMAPHORE_HANDLE_TYPE_OPAQUE_FD_BIT,
2098             };
2099             CUDA_EXTERNAL_SEMAPHORE_HANDLE_DESC ext_sem_desc = {
2100                 .type = CU_EXTERNAL_SEMAPHORE_HANDLE_TYPE_OPAQUE_FD,
2101             };
2102
2103             ret = pfn_vkGetMemoryFdKHR(hwctx->act_dev, &export_info,
2104                                        &ext_desc.handle.fd);
2105             if (ret != VK_SUCCESS) {
2106                 av_log(hwfc, AV_LOG_ERROR, "Unable to export the image as a FD!\n");
2107                 err = AVERROR_EXTERNAL;
2108                 goto fail;
2109             }
2110
2111             ret = CHECK_CU(cu->cuImportExternalMemory(&dst_int->ext_mem[i], &ext_desc));
2112             if (ret < 0) {
2113                 err = AVERROR_EXTERNAL;
2114                 goto fail;
2115             }
2116
2117             ret = CHECK_CU(cu->cuExternalMemoryGetMappedMipmappedArray(&dst_int->cu_mma[i],
2118                                                                        dst_int->ext_mem[i],
2119                                                                        &tex_desc));
2120             if (ret < 0) {
2121                 err = AVERROR_EXTERNAL;
2122                 goto fail;
2123             }
2124
2125             ret = CHECK_CU(cu->cuMipmappedArrayGetLevel(&dst_int->cu_array[i],
2126                                                         dst_int->cu_mma[i], 0));
2127             if (ret < 0) {
2128                 err = AVERROR_EXTERNAL;
2129                 goto fail;
2130             }
2131
2132             ret = pfn_vkGetSemaphoreFdKHR(hwctx->act_dev, &sem_export,
2133                                           &ext_sem_desc.handle.fd);
2134             if (ret != VK_SUCCESS) {
2135                 av_log(ctx, AV_LOG_ERROR, "Failed to export semaphore: %s\n",
2136                        vk_ret2str(ret));
2137                 err = AVERROR_EXTERNAL;
2138                 goto fail;
2139             }
2140
2141             ret = CHECK_CU(cu->cuImportExternalSemaphore(&dst_int->cu_sem[i],
2142                                                          &ext_sem_desc));
2143             if (ret < 0) {
2144                 err = AVERROR_EXTERNAL;
2145                 goto fail;
2146             }
2147         }
2148     }
2149
2150     return 0;
2151
2152 fail:
2153     return err;
2154 }
2155
2156 static int vulkan_transfer_data_from_cuda(AVHWFramesContext *hwfc,
2157                                           AVFrame *dst, const AVFrame *src)
2158 {
2159     int err;
2160     VkResult ret;
2161     CUcontext dummy;
2162     AVVkFrame *dst_f;
2163     AVVkFrameInternal *dst_int;
2164     const int planes = av_pix_fmt_count_planes(hwfc->sw_format);
2165     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(hwfc->sw_format);
2166
2167     AVHWFramesContext *cuda_fc = (AVHWFramesContext*)src->hw_frames_ctx->data;
2168     AVHWDeviceContext *cuda_cu = cuda_fc->device_ctx;
2169     AVCUDADeviceContext *cuda_dev = cuda_cu->hwctx;
2170     AVCUDADeviceContextInternal *cu_internal = cuda_dev->internal;
2171     CudaFunctions *cu = cu_internal->cuda_dl;
2172     CUDA_EXTERNAL_SEMAPHORE_WAIT_PARAMS s_w_par[AV_NUM_DATA_POINTERS] = { 0 };
2173     CUDA_EXTERNAL_SEMAPHORE_SIGNAL_PARAMS s_s_par[AV_NUM_DATA_POINTERS] = { 0 };
2174
2175     ret = CHECK_CU(cu->cuCtxPushCurrent(cuda_dev->cuda_ctx));
2176     if (ret < 0) {
2177         err = AVERROR_EXTERNAL;
2178         goto fail;
2179     }
2180
2181     dst_f = (AVVkFrame *)dst->data[0];
2182
2183     ret = vulkan_export_to_cuda(hwfc, src->hw_frames_ctx, dst);
2184     if (ret < 0) {
2185         goto fail;
2186     }
2187     dst_int = dst_f->internal;
2188
2189     ret = CHECK_CU(cu->cuWaitExternalSemaphoresAsync(dst_int->cu_sem, s_w_par,
2190                                                      planes, cuda_dev->stream));
2191     if (ret < 0) {
2192         err = AVERROR_EXTERNAL;
2193         goto fail;
2194     }
2195
2196     for (int i = 0; i < planes; i++) {
2197         CUDA_MEMCPY2D cpy = {
2198             .srcMemoryType = CU_MEMORYTYPE_DEVICE,
2199             .srcDevice     = (CUdeviceptr)src->data[i],
2200             .srcPitch      = src->linesize[i],
2201             .srcY          = 0,
2202
2203             .dstMemoryType = CU_MEMORYTYPE_ARRAY,
2204             .dstArray      = dst_int->cu_array[i],
2205             .WidthInBytes  = (i > 0 ? AV_CEIL_RSHIFT(hwfc->width, desc->log2_chroma_w)
2206                                     : hwfc->width) * desc->comp[i].step,
2207             .Height        = i > 0 ? AV_CEIL_RSHIFT(hwfc->height, desc->log2_chroma_h)
2208                                    : hwfc->height,
2209         };
2210
2211         ret = CHECK_CU(cu->cuMemcpy2DAsync(&cpy, cuda_dev->stream));
2212         if (ret < 0) {
2213             err = AVERROR_EXTERNAL;
2214             goto fail;
2215         }
2216     }
2217
2218     ret = CHECK_CU(cu->cuSignalExternalSemaphoresAsync(dst_int->cu_sem, s_s_par,
2219                                                        planes, cuda_dev->stream));
2220     if (ret < 0) {
2221         err = AVERROR_EXTERNAL;
2222         goto fail;
2223     }
2224
2225     CHECK_CU(cu->cuCtxPopCurrent(&dummy));
2226
2227     av_log(hwfc, AV_LOG_VERBOSE, "Transfered CUDA image to Vulkan!\n");
2228
2229     return 0;
2230
2231 fail:
2232     CHECK_CU(cu->cuCtxPopCurrent(&dummy));
2233     vulkan_free_internal(dst_int);
2234     dst_f->internal = NULL;
2235     av_buffer_unref(&dst->buf[0]);
2236     return err;
2237 }
2238 #endif
2239
2240 static int vulkan_map_to(AVHWFramesContext *hwfc, AVFrame *dst,
2241                          const AVFrame *src, int flags)
2242 {
2243     av_unused VulkanDevicePriv *p = hwfc->device_ctx->internal->priv;
2244
2245     switch (src->format) {
2246 #if CONFIG_LIBDRM
2247 #if CONFIG_VAAPI
2248     case AV_PIX_FMT_VAAPI:
2249         if (p->extensions & EXT_EXTERNAL_DMABUF_MEMORY)
2250             return vulkan_map_from_vaapi(hwfc, dst, src, flags);
2251 #endif
2252     case AV_PIX_FMT_DRM_PRIME:
2253         if (p->extensions & EXT_EXTERNAL_DMABUF_MEMORY)
2254             return vulkan_map_from_drm(hwfc, dst, src, flags);
2255 #endif
2256     default:
2257         return AVERROR(ENOSYS);
2258     }
2259 }
2260
2261 #if CONFIG_LIBDRM
2262 typedef struct VulkanDRMMapping {
2263     AVDRMFrameDescriptor drm_desc;
2264     AVVkFrame *source;
2265 } VulkanDRMMapping;
2266
2267 static void vulkan_unmap_to_drm(AVHWFramesContext *hwfc, HWMapDescriptor *hwmap)
2268 {
2269     AVDRMFrameDescriptor *drm_desc = hwmap->priv;
2270
2271     for (int i = 0; i < drm_desc->nb_objects; i++)
2272         close(drm_desc->objects[i].fd);
2273
2274     av_free(drm_desc);
2275 }
2276
2277 static inline uint32_t vulkan_fmt_to_drm(VkFormat vkfmt)
2278 {
2279     for (int i = 0; i < FF_ARRAY_ELEMS(vulkan_drm_format_map); i++)
2280         if (vulkan_drm_format_map[i].vk_format == vkfmt)
2281             return vulkan_drm_format_map[i].drm_fourcc;
2282     return DRM_FORMAT_INVALID;
2283 }
2284
2285 static int vulkan_map_to_drm(AVHWFramesContext *hwfc, AVFrame *dst,
2286                              const AVFrame *src, int flags)
2287 {
2288     int err = 0;
2289     VkResult ret;
2290     AVVkFrame *f = (AVVkFrame *)src->data[0];
2291     VulkanDevicePriv *p = hwfc->device_ctx->internal->priv;
2292     AVVulkanDeviceContext *hwctx = hwfc->device_ctx->hwctx;
2293     const int planes = av_pix_fmt_count_planes(hwfc->sw_format);
2294     VK_LOAD_PFN(hwctx->inst, vkGetMemoryFdKHR);
2295     VkImageDrmFormatModifierPropertiesEXT drm_mod = {
2296         .sType = VK_STRUCTURE_TYPE_IMAGE_DRM_FORMAT_MODIFIER_PROPERTIES_EXT,
2297     };
2298
2299     AVDRMFrameDescriptor *drm_desc = av_mallocz(sizeof(*drm_desc));
2300     if (!drm_desc)
2301         return AVERROR(ENOMEM);
2302
2303     err = prepare_frame(hwfc, &p->cmd, f, PREP_MODE_EXTERNAL_EXPORT);
2304     if (err < 0)
2305         goto end;
2306
2307     err = ff_hwframe_map_create(src->hw_frames_ctx, dst, src, &vulkan_unmap_to_drm, drm_desc);
2308     if (err < 0)
2309         goto end;
2310
2311     if (p->extensions & EXT_DRM_MODIFIER_FLAGS) {
2312         VK_LOAD_PFN(hwctx->inst, vkGetImageDrmFormatModifierPropertiesEXT);
2313         ret = pfn_vkGetImageDrmFormatModifierPropertiesEXT(hwctx->act_dev, f->img[0],
2314                                                            &drm_mod);
2315         if (ret != VK_SUCCESS) {
2316             av_log(hwfc, AV_LOG_ERROR, "Failed to retrieve DRM format modifier!\n");
2317             err = AVERROR_EXTERNAL;
2318             goto end;
2319         }
2320     }
2321
2322     for (int i = 0; (i < planes) && (f->mem[i]); i++) {
2323         VkMemoryGetFdInfoKHR export_info = {
2324             .sType      = VK_STRUCTURE_TYPE_MEMORY_GET_FD_INFO_KHR,
2325             .memory     = f->mem[i],
2326             .handleType = VK_EXTERNAL_MEMORY_HANDLE_TYPE_DMA_BUF_BIT_EXT,
2327         };
2328
2329         ret = pfn_vkGetMemoryFdKHR(hwctx->act_dev, &export_info,
2330                                    &drm_desc->objects[i].fd);
2331         if (ret != VK_SUCCESS) {
2332             av_log(hwfc, AV_LOG_ERROR, "Unable to export the image as a FD!\n");
2333             err = AVERROR_EXTERNAL;
2334             goto end;
2335         }
2336
2337         drm_desc->nb_objects++;
2338         drm_desc->objects[i].size = f->size[i];
2339         drm_desc->objects[i].format_modifier = drm_mod.drmFormatModifier;
2340     }
2341
2342     drm_desc->nb_layers = planes;
2343     for (int i = 0; i < drm_desc->nb_layers; i++) {
2344         VkSubresourceLayout layout;
2345         VkImageSubresource sub = {
2346             .aspectMask = p->extensions & EXT_DRM_MODIFIER_FLAGS ?
2347                           VK_IMAGE_ASPECT_MEMORY_PLANE_0_BIT_EXT :
2348                           VK_IMAGE_ASPECT_COLOR_BIT,
2349         };
2350         VkFormat plane_vkfmt = av_vkfmt_from_pixfmt(hwfc->sw_format)[i];
2351
2352         drm_desc->layers[i].format    = vulkan_fmt_to_drm(plane_vkfmt);
2353         drm_desc->layers[i].nb_planes = 1;
2354
2355         if (drm_desc->layers[i].format == DRM_FORMAT_INVALID) {
2356             av_log(hwfc, AV_LOG_ERROR, "Cannot map to DRM layer, unsupported!\n");
2357             err = AVERROR_PATCHWELCOME;
2358             goto end;
2359         }
2360
2361         drm_desc->layers[i].planes[0].object_index = FFMIN(i, drm_desc->nb_objects - 1);
2362
2363         if (f->tiling == VK_IMAGE_TILING_OPTIMAL)
2364             continue;
2365
2366         vkGetImageSubresourceLayout(hwctx->act_dev, f->img[i], &sub, &layout);
2367         drm_desc->layers[i].planes[0].offset       = layout.offset;
2368         drm_desc->layers[i].planes[0].pitch        = layout.rowPitch;
2369     }
2370
2371     dst->width   = src->width;
2372     dst->height  = src->height;
2373     dst->data[0] = (uint8_t *)drm_desc;
2374
2375     av_log(hwfc, AV_LOG_VERBOSE, "Mapped AVVkFrame to a DRM object!\n");
2376
2377     return 0;
2378
2379 end:
2380     av_free(drm_desc);
2381     return err;
2382 }
2383
2384 #if CONFIG_VAAPI
2385 static int vulkan_map_to_vaapi(AVHWFramesContext *hwfc, AVFrame *dst,
2386                                const AVFrame *src, int flags)
2387 {
2388     int err;
2389     AVFrame *tmp = av_frame_alloc();
2390     if (!tmp)
2391         return AVERROR(ENOMEM);
2392
2393     tmp->format = AV_PIX_FMT_DRM_PRIME;
2394
2395     err = vulkan_map_to_drm(hwfc, tmp, src, flags);
2396     if (err < 0)
2397         goto fail;
2398
2399     err = av_hwframe_map(dst, tmp, flags);
2400     if (err < 0)
2401         goto fail;
2402
2403     err = ff_hwframe_map_replace(dst, src);
2404
2405 fail:
2406     av_frame_free(&tmp);
2407     return err;
2408 }
2409 #endif
2410 #endif
2411
2412 static int vulkan_map_from(AVHWFramesContext *hwfc, AVFrame *dst,
2413                            const AVFrame *src, int flags)
2414 {
2415     av_unused VulkanDevicePriv *p = hwfc->device_ctx->internal->priv;
2416
2417     switch (dst->format) {
2418 #if CONFIG_LIBDRM
2419     case AV_PIX_FMT_DRM_PRIME:
2420         if (p->extensions & EXT_EXTERNAL_DMABUF_MEMORY)
2421             return vulkan_map_to_drm(hwfc, dst, src, flags);
2422 #if CONFIG_VAAPI
2423     case AV_PIX_FMT_VAAPI:
2424         if (p->extensions & EXT_EXTERNAL_DMABUF_MEMORY)
2425             return vulkan_map_to_vaapi(hwfc, dst, src, flags);
2426 #endif
2427 #endif
2428     default:
2429         return vulkan_map_frame_to_mem(hwfc, dst, src, flags);
2430     }
2431 }
2432
2433 typedef struct ImageBuffer {
2434     VkBuffer buf;
2435     VkDeviceMemory mem;
2436     VkMemoryPropertyFlagBits flags;
2437 } ImageBuffer;
2438
2439 static void free_buf(AVHWDeviceContext *ctx, ImageBuffer *buf)
2440 {
2441     AVVulkanDeviceContext *hwctx = ctx->hwctx;
2442     if (!buf)
2443         return;
2444
2445     vkDestroyBuffer(hwctx->act_dev, buf->buf, hwctx->alloc);
2446     vkFreeMemory(hwctx->act_dev, buf->mem, hwctx->alloc);
2447 }
2448
2449 static int create_buf(AVHWDeviceContext *ctx, ImageBuffer *buf, int height,
2450                       int *stride, VkBufferUsageFlags usage,
2451                       VkMemoryPropertyFlagBits flags, void *create_pnext,
2452                       void *alloc_pnext)
2453 {
2454     int err;
2455     VkResult ret;
2456     VkMemoryRequirements req;
2457     AVVulkanDeviceContext *hwctx = ctx->hwctx;
2458     VulkanDevicePriv *p = ctx->internal->priv;
2459
2460     VkBufferCreateInfo buf_spawn = {
2461         .sType       = VK_STRUCTURE_TYPE_BUFFER_CREATE_INFO,
2462         .pNext       = create_pnext,
2463         .usage       = usage,
2464         .sharingMode = VK_SHARING_MODE_EXCLUSIVE,
2465     };
2466
2467     *stride = FFALIGN(*stride, p->props.limits.optimalBufferCopyRowPitchAlignment);
2468     buf_spawn.size = height*(*stride);
2469
2470     ret = vkCreateBuffer(hwctx->act_dev, &buf_spawn, NULL, &buf->buf);
2471     if (ret != VK_SUCCESS) {
2472         av_log(ctx, AV_LOG_ERROR, "Failed to create buffer: %s\n",
2473                vk_ret2str(ret));
2474         return AVERROR_EXTERNAL;
2475     }
2476
2477     vkGetBufferMemoryRequirements(hwctx->act_dev, buf->buf, &req);
2478
2479     err = alloc_mem(ctx, &req, flags, alloc_pnext, &buf->flags, &buf->mem);
2480     if (err)
2481         return err;
2482
2483     ret = vkBindBufferMemory(hwctx->act_dev, buf->buf, buf->mem, 0);
2484     if (ret != VK_SUCCESS) {
2485         av_log(ctx, AV_LOG_ERROR, "Failed to bind memory to buffer: %s\n",
2486                vk_ret2str(ret));
2487         free_buf(ctx, buf);
2488         return AVERROR_EXTERNAL;
2489     }
2490
2491     return 0;
2492 }
2493
2494 static int map_buffers(AVHWDeviceContext *ctx, ImageBuffer *buf, uint8_t *mem[],
2495                        int nb_buffers, int invalidate)
2496 {
2497     VkResult ret;
2498     AVVulkanDeviceContext *hwctx = ctx->hwctx;
2499     VkMappedMemoryRange invalidate_ctx[AV_NUM_DATA_POINTERS];
2500     int invalidate_count = 0;
2501
2502     for (int i = 0; i < nb_buffers; i++) {
2503         ret = vkMapMemory(hwctx->act_dev, buf[i].mem, 0,
2504                           VK_WHOLE_SIZE, 0, (void **)&mem[i]);
2505         if (ret != VK_SUCCESS) {
2506             av_log(ctx, AV_LOG_ERROR, "Failed to map buffer memory: %s\n",
2507                    vk_ret2str(ret));
2508             return AVERROR_EXTERNAL;
2509         }
2510     }
2511
2512     if (!invalidate)
2513         return 0;
2514
2515     for (int i = 0; i < nb_buffers; i++) {
2516         const VkMappedMemoryRange ival_buf = {
2517             .sType  = VK_STRUCTURE_TYPE_MAPPED_MEMORY_RANGE,
2518             .memory = buf[i].mem,
2519             .size   = VK_WHOLE_SIZE,
2520         };
2521         if (buf[i].flags & VK_MEMORY_PROPERTY_HOST_COHERENT_BIT)
2522             continue;
2523         invalidate_ctx[invalidate_count++] = ival_buf;
2524     }
2525
2526     if (invalidate_count) {
2527         ret = vkInvalidateMappedMemoryRanges(hwctx->act_dev, invalidate_count,
2528                                              invalidate_ctx);
2529         if (ret != VK_SUCCESS)
2530             av_log(ctx, AV_LOG_WARNING, "Failed to invalidate memory: %s\n",
2531                    vk_ret2str(ret));
2532     }
2533
2534     return 0;
2535 }
2536
2537 static int unmap_buffers(AVHWDeviceContext *ctx, ImageBuffer *buf,
2538                          int nb_buffers, int flush)
2539 {
2540     int err = 0;
2541     VkResult ret;
2542     AVVulkanDeviceContext *hwctx = ctx->hwctx;
2543     VkMappedMemoryRange flush_ctx[AV_NUM_DATA_POINTERS];
2544     int flush_count = 0;
2545
2546     if (flush) {
2547         for (int i = 0; i < nb_buffers; i++) {
2548             const VkMappedMemoryRange flush_buf = {
2549                 .sType  = VK_STRUCTURE_TYPE_MAPPED_MEMORY_RANGE,
2550                 .memory = buf[i].mem,
2551                 .size   = VK_WHOLE_SIZE,
2552             };
2553             if (buf[i].flags & VK_MEMORY_PROPERTY_HOST_COHERENT_BIT)
2554                 continue;
2555             flush_ctx[flush_count++] = flush_buf;
2556         }
2557     }
2558
2559     if (flush_count) {
2560         ret = vkFlushMappedMemoryRanges(hwctx->act_dev, flush_count, flush_ctx);
2561         if (ret != VK_SUCCESS) {
2562             av_log(ctx, AV_LOG_ERROR, "Failed to flush memory: %s\n",
2563                     vk_ret2str(ret));
2564             err = AVERROR_EXTERNAL; /* We still want to try to unmap them */
2565         }
2566     }
2567
2568     for (int i = 0; i < nb_buffers; i++)
2569         vkUnmapMemory(hwctx->act_dev, buf[i].mem);
2570
2571     return err;
2572 }
2573
2574 static int transfer_image_buf(AVHWDeviceContext *ctx, AVVkFrame *frame,
2575                               ImageBuffer *buffer, const int *buf_stride, int w,
2576                               int h, enum AVPixelFormat pix_fmt, int to_buf)
2577 {
2578     VkResult ret;
2579     AVVulkanDeviceContext *hwctx = ctx->hwctx;
2580     VulkanDevicePriv *s = ctx->internal->priv;
2581
2582     int bar_num = 0;
2583     VkPipelineStageFlagBits sem_wait_dst[AV_NUM_DATA_POINTERS];
2584
2585     const int planes = av_pix_fmt_count_planes(pix_fmt);
2586     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(pix_fmt);
2587
2588     VkCommandBufferBeginInfo cmd_start = {
2589         .sType = VK_STRUCTURE_TYPE_COMMAND_BUFFER_BEGIN_INFO,
2590         .flags = VK_COMMAND_BUFFER_USAGE_ONE_TIME_SUBMIT_BIT,
2591     };
2592
2593     VkImageMemoryBarrier img_bar[AV_NUM_DATA_POINTERS] = { 0 };
2594
2595     VkSubmitInfo s_info = {
2596         .sType                = VK_STRUCTURE_TYPE_SUBMIT_INFO,
2597         .commandBufferCount   = 1,
2598         .pCommandBuffers      = &s->cmd.buf,
2599         .pSignalSemaphores    = frame->sem,
2600         .pWaitSemaphores      = frame->sem,
2601         .pWaitDstStageMask    = sem_wait_dst,
2602         .signalSemaphoreCount = planes,
2603         .waitSemaphoreCount   = planes,
2604     };
2605
2606     ret = vkBeginCommandBuffer(s->cmd.buf, &cmd_start);
2607     if (ret != VK_SUCCESS) {
2608         av_log(ctx, AV_LOG_ERROR, "Unable to init command buffer: %s\n",
2609                vk_ret2str(ret));
2610         return AVERROR_EXTERNAL;
2611     }
2612
2613     /* Change the image layout to something more optimal for transfers */
2614     for (int i = 0; i < planes; i++) {
2615         VkImageLayout new_layout = to_buf ? VK_IMAGE_LAYOUT_TRANSFER_SRC_OPTIMAL :
2616                                             VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL;
2617         VkAccessFlags new_access = to_buf ? VK_ACCESS_TRANSFER_READ_BIT :
2618                                             VK_ACCESS_TRANSFER_WRITE_BIT;
2619
2620         sem_wait_dst[i] = VK_PIPELINE_STAGE_TOP_OF_PIPE_BIT;
2621
2622         /* If the layout matches and we have read access skip the barrier */
2623         if ((frame->layout[i] == new_layout) && (frame->access[i] & new_access))
2624             continue;
2625
2626         img_bar[bar_num].sType = VK_STRUCTURE_TYPE_IMAGE_MEMORY_BARRIER;
2627         img_bar[bar_num].srcAccessMask = 0x0;
2628         img_bar[bar_num].dstAccessMask = new_access;
2629         img_bar[bar_num].oldLayout = frame->layout[i];
2630         img_bar[bar_num].newLayout = new_layout;
2631         img_bar[bar_num].srcQueueFamilyIndex = VK_QUEUE_FAMILY_IGNORED;
2632         img_bar[bar_num].dstQueueFamilyIndex = VK_QUEUE_FAMILY_IGNORED;
2633         img_bar[bar_num].image = frame->img[i];
2634         img_bar[bar_num].subresourceRange.levelCount = 1;
2635         img_bar[bar_num].subresourceRange.layerCount = 1;
2636         img_bar[bar_num].subresourceRange.aspectMask = VK_IMAGE_ASPECT_COLOR_BIT;
2637
2638         frame->layout[i] = img_bar[bar_num].newLayout;
2639         frame->access[i] = img_bar[bar_num].dstAccessMask;
2640
2641         bar_num++;
2642     }
2643
2644     if (bar_num)
2645         vkCmdPipelineBarrier(s->cmd.buf, VK_PIPELINE_STAGE_TOP_OF_PIPE_BIT,
2646                              VK_PIPELINE_STAGE_TRANSFER_BIT, 0,
2647                              0, NULL, 0, NULL, bar_num, img_bar);
2648
2649     /* Schedule a copy for each plane */
2650     for (int i = 0; i < planes; i++) {
2651         const int p_w = i > 0 ? AV_CEIL_RSHIFT(w, desc->log2_chroma_w) : w;
2652         const int p_h = i > 0 ? AV_CEIL_RSHIFT(h, desc->log2_chroma_h) : h;
2653         VkBufferImageCopy buf_reg = {
2654             .bufferOffset = 0,
2655             /* Buffer stride isn't in bytes, it's in samples, the implementation
2656              * uses the image's VkFormat to know how many bytes per sample
2657              * the buffer has. So we have to convert by dividing. Stupid.
2658              * Won't work with YUVA or other planar formats with alpha. */
2659             .bufferRowLength = buf_stride[i] / desc->comp[i].step,
2660             .bufferImageHeight = p_h,
2661             .imageSubresource.layerCount = 1,
2662             .imageSubresource.aspectMask = VK_IMAGE_ASPECT_COLOR_BIT,
2663             .imageOffset = { 0, 0, 0, },
2664             .imageExtent = { p_w, p_h, 1, },
2665         };
2666
2667         if (to_buf)
2668             vkCmdCopyImageToBuffer(s->cmd.buf, frame->img[i], frame->layout[i],
2669                                    buffer[i].buf, 1, &buf_reg);
2670         else
2671             vkCmdCopyBufferToImage(s->cmd.buf, buffer[i].buf, frame->img[i],
2672                                    frame->layout[i], 1, &buf_reg);
2673     }
2674
2675     ret = vkEndCommandBuffer(s->cmd.buf);
2676     if (ret != VK_SUCCESS) {
2677         av_log(ctx, AV_LOG_ERROR, "Unable to finish command buffer: %s\n",
2678                vk_ret2str(ret));
2679         return AVERROR_EXTERNAL;
2680     }
2681
2682     /* Wait for the download/upload to finish if uploading, otherwise the
2683      * semaphore will take care of synchronization when uploading */
2684     ret = vkQueueSubmit(s->cmd.queue, 1, &s_info, s->cmd.fence);
2685     if (ret != VK_SUCCESS) {
2686         av_log(ctx, AV_LOG_ERROR, "Unable to submit command buffer: %s\n",
2687                vk_ret2str(ret));
2688         return AVERROR_EXTERNAL;
2689     } else {
2690         vkWaitForFences(hwctx->act_dev, 1, &s->cmd.fence, VK_TRUE, UINT64_MAX);
2691         vkResetFences(hwctx->act_dev, 1, &s->cmd.fence);
2692     }
2693
2694     return 0;
2695 }
2696
2697 /* Technically we can use VK_EXT_external_memory_host to upload and download,
2698  * however the alignment requirements make this unfeasible as both the pointer
2699  * and the size of each plane need to be aligned to the minimum alignment
2700  * requirement, which on all current implementations (anv, radv) is 4096.
2701  * If the requirement gets relaxed (unlikely) this can easily be implemented. */
2702 static int vulkan_transfer_data_from_mem(AVHWFramesContext *hwfc, AVFrame *dst,
2703                                          const AVFrame *src)
2704 {
2705     int err = 0;
2706     AVFrame tmp;
2707     AVVkFrame *f = (AVVkFrame *)dst->data[0];
2708     AVHWDeviceContext *dev_ctx = hwfc->device_ctx;
2709     ImageBuffer buf[AV_NUM_DATA_POINTERS] = { { 0 } };
2710     const int planes = av_pix_fmt_count_planes(src->format);
2711     int log2_chroma = av_pix_fmt_desc_get(src->format)->log2_chroma_h;
2712
2713     if ((src->format != AV_PIX_FMT_NONE && !av_vkfmt_from_pixfmt(src->format))) {
2714         av_log(hwfc, AV_LOG_ERROR, "Unsupported source pixel format!\n");
2715         return AVERROR(EINVAL);
2716     }
2717
2718     if (src->width > hwfc->width || src->height > hwfc->height)
2719         return AVERROR(EINVAL);
2720
2721     /* For linear, host visiable images */
2722     if (f->tiling == VK_IMAGE_TILING_LINEAR &&
2723         f->flags & VK_MEMORY_PROPERTY_HOST_VISIBLE_BIT) {
2724         AVFrame *map = av_frame_alloc();
2725         if (!map)
2726             return AVERROR(ENOMEM);
2727         map->format = src->format;
2728
2729         err = vulkan_map_frame_to_mem(hwfc, map, dst, AV_HWFRAME_MAP_WRITE);
2730         if (err)
2731             goto end;
2732
2733         err = av_frame_copy(map, src);
2734         av_frame_free(&map);
2735         goto end;
2736     }
2737
2738     /* Create buffers */
2739     for (int i = 0; i < planes; i++) {
2740         int h = src->height;
2741         int p_height = i > 0 ? AV_CEIL_RSHIFT(h, log2_chroma) : h;
2742
2743         tmp.linesize[i] = FFABS(src->linesize[i]);
2744         err = create_buf(dev_ctx, &buf[i], p_height,
2745                          &tmp.linesize[i], VK_BUFFER_USAGE_TRANSFER_SRC_BIT,
2746                          VK_MEMORY_PROPERTY_HOST_VISIBLE_BIT, NULL, NULL);
2747         if (err)
2748             goto end;
2749     }
2750
2751     /* Map, copy image to buffer, unmap */
2752     if ((err = map_buffers(dev_ctx, buf, tmp.data, planes, 0)))
2753         goto end;
2754
2755     av_image_copy(tmp.data, tmp.linesize, (const uint8_t **)src->data,
2756                   src->linesize, src->format, src->width, src->height);
2757
2758     if ((err = unmap_buffers(dev_ctx, buf, planes, 1)))
2759         goto end;
2760
2761     /* Copy buffers to image */
2762     err = transfer_image_buf(dev_ctx, f, buf, tmp.linesize,
2763                              src->width, src->height, src->format, 0);
2764
2765 end:
2766     for (int i = 0; i < planes; i++)
2767         free_buf(dev_ctx, &buf[i]);
2768
2769     return err;
2770 }
2771
2772 static int vulkan_transfer_data_to(AVHWFramesContext *hwfc, AVFrame *dst,
2773                                         const AVFrame *src)
2774 {
2775     av_unused VulkanDevicePriv *p = hwfc->device_ctx->internal->priv;
2776
2777     switch (src->format) {
2778 #if CONFIG_CUDA
2779     case AV_PIX_FMT_CUDA:
2780         if ((p->extensions & EXT_EXTERNAL_FD_MEMORY) &&
2781             (p->extensions & EXT_EXTERNAL_FD_SEM))
2782             return vulkan_transfer_data_from_cuda(hwfc, dst, src);
2783 #endif
2784     default:
2785         if (src->hw_frames_ctx)
2786             return AVERROR(ENOSYS);
2787         else
2788             return vulkan_transfer_data_from_mem(hwfc, dst, src);
2789     }
2790 }
2791
2792 #if CONFIG_CUDA
2793 static int vulkan_transfer_data_to_cuda(AVHWFramesContext *hwfc, AVFrame *dst,
2794                                       const AVFrame *src)
2795 {
2796     int err;
2797     VkResult ret;
2798     CUcontext dummy;
2799     AVVkFrame *dst_f;
2800     AVVkFrameInternal *dst_int;
2801     const int planes = av_pix_fmt_count_planes(hwfc->sw_format);
2802     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(hwfc->sw_format);
2803
2804     AVHWFramesContext *cuda_fc = (AVHWFramesContext*)dst->hw_frames_ctx->data;
2805     AVHWDeviceContext *cuda_cu = cuda_fc->device_ctx;
2806     AVCUDADeviceContext *cuda_dev = cuda_cu->hwctx;
2807     AVCUDADeviceContextInternal *cu_internal = cuda_dev->internal;
2808     CudaFunctions *cu = cu_internal->cuda_dl;
2809
2810     ret = CHECK_CU(cu->cuCtxPushCurrent(cuda_dev->cuda_ctx));
2811     if (ret < 0) {
2812         err = AVERROR_EXTERNAL;
2813         goto fail;
2814     }
2815
2816     dst_f = (AVVkFrame *)src->data[0];
2817
2818     err = vulkan_export_to_cuda(hwfc, dst->hw_frames_ctx, src);
2819     if (err < 0) {
2820         goto fail;
2821     }
2822
2823     dst_int = dst_f->internal;
2824
2825     for (int i = 0; i < planes; i++) {
2826         CUDA_MEMCPY2D cpy = {
2827             .dstMemoryType = CU_MEMORYTYPE_DEVICE,
2828             .dstDevice     = (CUdeviceptr)dst->data[i],
2829             .dstPitch      = dst->linesize[i],
2830             .dstY          = 0,
2831
2832             .srcMemoryType = CU_MEMORYTYPE_ARRAY,
2833             .srcArray      = dst_int->cu_array[i],
2834             .WidthInBytes  = (i > 0 ? AV_CEIL_RSHIFT(hwfc->width, desc->log2_chroma_w)
2835                                     : hwfc->width) * desc->comp[i].step,
2836             .Height        = i > 0 ? AV_CEIL_RSHIFT(hwfc->height, desc->log2_chroma_h)
2837                                    : hwfc->height,
2838         };
2839
2840         ret = CHECK_CU(cu->cuMemcpy2DAsync(&cpy, cuda_dev->stream));
2841         if (ret < 0) {
2842             err = AVERROR_EXTERNAL;
2843             goto fail;
2844         }
2845     }
2846
2847     CHECK_CU(cu->cuCtxPopCurrent(&dummy));
2848
2849     av_log(hwfc, AV_LOG_VERBOSE, "Transfered Vulkan image to CUDA!\n");
2850
2851     return 0;
2852
2853 fail:
2854     CHECK_CU(cu->cuCtxPopCurrent(&dummy));
2855     vulkan_free_internal(dst_int);
2856     dst_f->internal = NULL;
2857     av_buffer_unref(&dst->buf[0]);
2858     return err;
2859 }
2860 #endif
2861
2862 static int vulkan_transfer_data_to_mem(AVHWFramesContext *hwfc, AVFrame *dst,
2863                                        const AVFrame *src)
2864 {
2865     int err = 0;
2866     AVFrame tmp;
2867     AVVkFrame *f = (AVVkFrame *)src->data[0];
2868     AVHWDeviceContext *dev_ctx = hwfc->device_ctx;
2869     ImageBuffer buf[AV_NUM_DATA_POINTERS] = { { 0 } };
2870     const int planes = av_pix_fmt_count_planes(dst->format);
2871     int log2_chroma = av_pix_fmt_desc_get(dst->format)->log2_chroma_h;
2872
2873     if (dst->width > hwfc->width || dst->height > hwfc->height)
2874         return AVERROR(EINVAL);
2875
2876     /* For linear, host visiable images */
2877     if (f->tiling == VK_IMAGE_TILING_LINEAR &&
2878         f->flags & VK_MEMORY_PROPERTY_HOST_VISIBLE_BIT) {
2879         AVFrame *map = av_frame_alloc();
2880         if (!map)
2881             return AVERROR(ENOMEM);
2882         map->format = dst->format;
2883
2884         err = vulkan_map_frame_to_mem(hwfc, map, src, AV_HWFRAME_MAP_READ);
2885         if (err)
2886             return err;
2887
2888         err = av_frame_copy(dst, map);
2889         av_frame_free(&map);
2890         return err;
2891     }
2892
2893     /* Create buffers */
2894     for (int i = 0; i < planes; i++) {
2895         int h = dst->height;
2896         int p_height = i > 0 ? AV_CEIL_RSHIFT(h, log2_chroma) : h;
2897
2898         tmp.linesize[i] = FFABS(dst->linesize[i]);
2899         err = create_buf(dev_ctx, &buf[i], p_height,
2900                          &tmp.linesize[i], VK_BUFFER_USAGE_TRANSFER_DST_BIT,
2901                          VK_MEMORY_PROPERTY_HOST_VISIBLE_BIT, NULL, NULL);
2902     }
2903
2904     /* Copy image to buffer */
2905     if ((err = transfer_image_buf(dev_ctx, f, buf, tmp.linesize,
2906                                   dst->width, dst->height, dst->format, 1)))
2907         goto end;
2908
2909     /* Map, copy buffer to frame, unmap */
2910     if ((err = map_buffers(dev_ctx, buf, tmp.data, planes, 1)))
2911         goto end;
2912
2913     av_image_copy(dst->data, dst->linesize, (const uint8_t **)tmp.data,
2914                   tmp.linesize, dst->format, dst->width, dst->height);
2915
2916     err = unmap_buffers(dev_ctx, buf, planes, 0);
2917
2918 end:
2919     for (int i = 0; i < planes; i++)
2920         free_buf(dev_ctx, &buf[i]);
2921
2922     return err;
2923 }
2924
2925 static int vulkan_transfer_data_from(AVHWFramesContext *hwfc, AVFrame *dst,
2926                                      const AVFrame *src)
2927 {
2928     av_unused VulkanDevicePriv *p = hwfc->device_ctx->internal->priv;
2929
2930     switch (dst->format) {
2931 #if CONFIG_CUDA
2932     case AV_PIX_FMT_CUDA:
2933         if ((p->extensions & EXT_EXTERNAL_FD_MEMORY) &&
2934             (p->extensions & EXT_EXTERNAL_FD_SEM))
2935             return vulkan_transfer_data_to_cuda(hwfc, dst, src);
2936 #endif
2937     default:
2938         if (dst->hw_frames_ctx)
2939             return AVERROR(ENOSYS);
2940         else
2941             return vulkan_transfer_data_to_mem(hwfc, dst, src);
2942     }
2943 }
2944
2945 AVVkFrame *av_vk_frame_alloc(void)
2946 {
2947     return av_mallocz(sizeof(AVVkFrame));
2948 }
2949
2950 const HWContextType ff_hwcontext_type_vulkan = {
2951     .type                   = AV_HWDEVICE_TYPE_VULKAN,
2952     .name                   = "Vulkan",
2953
2954     .device_hwctx_size      = sizeof(AVVulkanDeviceContext),
2955     .device_priv_size       = sizeof(VulkanDevicePriv),
2956     .frames_hwctx_size      = sizeof(AVVulkanFramesContext),
2957     .frames_priv_size       = sizeof(VulkanFramesPriv),
2958
2959     .device_init            = &vulkan_device_init,
2960     .device_create          = &vulkan_device_create,
2961     .device_derive          = &vulkan_device_derive,
2962
2963     .frames_get_constraints = &vulkan_frames_get_constraints,
2964     .frames_init            = vulkan_frames_init,
2965     .frames_get_buffer      = vulkan_get_buffer,
2966     .frames_uninit          = vulkan_frames_uninit,
2967
2968     .transfer_get_formats   = vulkan_transfer_get_formats,
2969     .transfer_data_to       = vulkan_transfer_data_to,
2970     .transfer_data_from     = vulkan_transfer_data_from,
2971
2972     .map_to                 = vulkan_map_to,
2973     .map_from               = vulkan_map_from,
2974
2975     .pix_fmts = (const enum AVPixelFormat []) {
2976         AV_PIX_FMT_VULKAN,
2977         AV_PIX_FMT_NONE
2978     },
2979 };