7b1b3b1ebe4cb6c15007856008a7d3456dd18099
[platform/upstream/gstreamer.git] / ext / vulkan / vkupload.c
1 /*
2  * GStreamer
3  * Copyright (C) 2016 Matthew Waters <matthew@centricular.com>
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Library General Public
7  * License as published by the Free Software Foundation; either
8  * version 2 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Library General Public License for more details.
14  *
15  * You should have received a copy of the GNU Library General Public
16  * License along with this library; if not, write to the
17  * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
18  * Boston, MA 02110-1301, USA.
19  */
20
21 /**
22  * SECTION:element-vulkanupload
23  * @title: vulkanupload
24  *
25  * vulkanupload uploads data into Vulkan memory objects.
26  */
27
28 #ifdef HAVE_CONFIG_H
29 #include "config.h"
30 #endif
31
32 #include <string.h>
33
34 #include "vkupload.h"
35
36 GST_DEBUG_CATEGORY (gst_debug_vulkan_upload);
37 #define GST_CAT_DEFAULT gst_debug_vulkan_upload
38
39 static GstCaps *
40 _set_caps_features_with_passthrough (const GstCaps * caps,
41     const gchar * feature_name, GstCapsFeatures * passthrough)
42 {
43   guint i, j, m, n;
44   GstCaps *tmp;
45
46   tmp = gst_caps_copy (caps);
47
48   n = gst_caps_get_size (caps);
49   for (i = 0; i < n; i++) {
50     GstCapsFeatures *features, *orig_features;
51
52     orig_features = gst_caps_get_features (caps, i);
53     features = gst_caps_features_new (feature_name, NULL);
54
55     m = gst_caps_features_get_size (orig_features);
56     for (j = 0; j < m; j++) {
57       const gchar *feature = gst_caps_features_get_nth (orig_features, j);
58
59       /* if we already have the features */
60       if (gst_caps_features_contains (features, feature))
61         continue;
62
63       if (g_strcmp0 (feature, GST_CAPS_FEATURE_MEMORY_SYSTEM_MEMORY) == 0)
64         continue;
65
66       if (passthrough && gst_caps_features_contains (passthrough, feature)) {
67         gst_caps_features_add (features, feature);
68       }
69     }
70
71     gst_caps_set_features (tmp, i, features);
72   }
73
74   return tmp;
75 }
76
77 struct BufferUpload
78 {
79   GstVulkanUpload *upload;
80 };
81
82 static gpointer
83 _buffer_new_impl (GstVulkanUpload * upload)
84 {
85   struct BufferUpload *raw = g_new0 (struct BufferUpload, 1);
86
87   raw->upload = upload;
88
89   return raw;
90 }
91
92 static GstCaps *
93 _buffer_transform_caps (gpointer impl, GstPadDirection direction,
94     GstCaps * caps)
95 {
96   return gst_caps_ref (caps);
97 }
98
99 static gboolean
100 _buffer_set_caps (gpointer impl, GstCaps * in_caps, GstCaps * out_caps)
101 {
102   return TRUE;
103 }
104
105 static void
106 _buffer_propose_allocation (gpointer impl, GstQuery * decide_query,
107     GstQuery * query)
108 {
109   struct BufferUpload *raw = impl;
110   gboolean need_pool;
111   GstCaps *caps;
112   GstVideoInfo info;
113   guint size;
114   GstBufferPool *pool = NULL;
115
116   gst_query_parse_allocation (query, &caps, &need_pool);
117
118   if (caps == NULL)
119     return;
120
121   if (!gst_video_info_from_caps (&info, caps))
122     return;
123
124   /* the normal size of a frame */
125   size = info.size;
126
127   if (need_pool) {
128     GstStructure *config;
129
130     pool = gst_vulkan_buffer_pool_new (raw->upload->device);
131
132     config = gst_buffer_pool_get_config (pool);
133     gst_buffer_pool_config_set_params (config, caps, size, 0, 0);
134
135     if (!gst_buffer_pool_set_config (pool, config)) {
136       g_object_unref (pool);
137       return;
138     }
139   }
140
141   gst_query_add_allocation_pool (query, pool, size, 1, 0);
142   if (pool)
143     g_object_unref (pool);
144
145   return;
146 }
147
148 static GstFlowReturn
149 _buffer_perform (gpointer impl, GstBuffer * inbuf, GstBuffer ** outbuf)
150 {
151   if (!gst_is_vulkan_buffer_memory (gst_buffer_peek_memory (inbuf, 0)))
152     return GST_FLOW_ERROR;
153
154   *outbuf = inbuf;
155
156   return GST_FLOW_OK;
157 }
158
159 static void
160 _buffer_free (gpointer impl)
161 {
162   g_free (impl);
163 }
164
165 static GstStaticCaps _buffer_in_templ =
166     GST_STATIC_CAPS ("video/x-raw(" GST_CAPS_FEATURE_MEMORY_VULKAN_BUFFER ") ;"
167     "video/x-raw");
168 static GstStaticCaps _buffer_out_templ =
169 GST_STATIC_CAPS ("video/x-raw(" GST_CAPS_FEATURE_MEMORY_VULKAN_BUFFER ")");
170
171 static const struct UploadMethod buffer_upload = {
172   "VulkanBuffer",
173   &_buffer_in_templ,
174   &_buffer_out_templ,
175   _buffer_new_impl,
176   _buffer_transform_caps,
177   _buffer_set_caps,
178   _buffer_propose_allocation,
179   _buffer_perform,
180   _buffer_free,
181 };
182
183 struct RawToBufferUpload
184 {
185   GstVulkanUpload *upload;
186
187   GstVideoInfo in_info;
188   GstVideoInfo out_info;
189
190   GstBufferPool *pool;
191   gboolean pool_active;
192
193   gsize alloc_sizes[GST_VIDEO_MAX_PLANES];
194 };
195
196 static gpointer
197 _raw_to_buffer_new_impl (GstVulkanUpload * upload)
198 {
199   struct RawToBufferUpload *raw = g_new0 (struct RawToBufferUpload, 1);
200
201   raw->upload = upload;
202
203   return raw;
204 }
205
206 static GstCaps *
207 _raw_to_buffer_transform_caps (gpointer impl, GstPadDirection direction,
208     GstCaps * caps)
209 {
210   GstCaps *ret;
211
212   if (direction == GST_PAD_SINK) {
213     ret =
214         _set_caps_features_with_passthrough (caps,
215         GST_CAPS_FEATURE_MEMORY_VULKAN_BUFFER, NULL);
216   } else {
217     ret =
218         _set_caps_features_with_passthrough (caps,
219         GST_CAPS_FEATURE_MEMORY_SYSTEM_MEMORY, NULL);
220   }
221
222   return ret;
223 }
224
225 static gboolean
226 _raw_to_buffer_set_caps (gpointer impl, GstCaps * in_caps, GstCaps * out_caps)
227 {
228   struct RawToBufferUpload *raw = impl;
229   guint out_width, out_height;
230   guint i;
231
232   if (!gst_video_info_from_caps (&raw->in_info, in_caps))
233     return FALSE;
234
235   if (!gst_video_info_from_caps (&raw->out_info, out_caps))
236     return FALSE;
237
238   out_width = GST_VIDEO_INFO_WIDTH (&raw->out_info);
239   out_height = GST_VIDEO_INFO_HEIGHT (&raw->out_info);
240
241   for (i = 0; i < GST_VIDEO_INFO_N_PLANES (&raw->out_info); i++) {
242     GstVideoFormat v_format = GST_VIDEO_INFO_FORMAT (&raw->out_info);
243     GstVulkanImageMemory *img_mem;
244     VkFormat vk_format;
245
246     vk_format = gst_vulkan_format_from_video_format (v_format, i);
247
248     img_mem = (GstVulkanImageMemory *)
249         gst_vulkan_image_memory_alloc (raw->upload->device, vk_format,
250         out_width, out_height, VK_IMAGE_TILING_OPTIMAL,
251         VK_IMAGE_USAGE_TRANSFER_DST_BIT | VK_IMAGE_USAGE_INPUT_ATTACHMENT_BIT,
252         VK_MEMORY_PROPERTY_DEVICE_LOCAL_BIT);
253
254     raw->alloc_sizes[i] = img_mem->requirements.size;
255
256     gst_memory_unref (GST_MEMORY_CAST (img_mem));
257   }
258
259   return TRUE;
260 }
261
262 static void
263 _raw_to_buffer_propose_allocation (gpointer impl, GstQuery * decide_query,
264     GstQuery * query)
265 {
266   /* a little trickery with the impl pointer */
267   _buffer_propose_allocation (impl, decide_query, query);
268 }
269
270 static GstFlowReturn
271 _raw_to_buffer_perform (gpointer impl, GstBuffer * inbuf, GstBuffer ** outbuf)
272 {
273   struct RawToBufferUpload *raw = impl;
274   GstVideoFrame v_frame;
275   GstFlowReturn ret;
276   guint i;
277
278   if (!raw->pool) {
279     GstStructure *config;
280     guint min = 0, max = 0;
281     gsize size = 1;
282
283     raw->pool = gst_vulkan_buffer_pool_new (raw->upload->device);
284     config = gst_buffer_pool_get_config (raw->pool);
285     gst_buffer_pool_config_set_params (config, raw->upload->out_caps, size, min,
286         max);
287     gst_buffer_pool_set_config (raw->pool, config);
288   }
289   if (!raw->pool_active) {
290     gst_buffer_pool_set_active (raw->pool, TRUE);
291     raw->pool_active = TRUE;
292   }
293
294   if ((ret =
295           gst_buffer_pool_acquire_buffer (raw->pool, outbuf,
296               NULL)) != GST_FLOW_OK)
297     goto out;
298
299   if (!gst_video_frame_map (&v_frame, &raw->in_info, inbuf, GST_MAP_READ)) {
300     GST_ELEMENT_ERROR (raw->upload, RESOURCE, NOT_FOUND,
301         ("%s", "Failed to map input buffer"), NULL);
302     return GST_FLOW_ERROR;
303   }
304
305   for (i = 0; i < GST_VIDEO_INFO_N_PLANES (&raw->out_info); i++) {
306     GstMapInfo map_info;
307     gsize plane_size;
308     GstMemory *mem;
309
310     mem = gst_buffer_peek_memory (*outbuf, i);
311     if (!gst_memory_map (GST_MEMORY_CAST (mem), &map_info, GST_MAP_WRITE)) {
312       GST_ELEMENT_ERROR (raw->upload, RESOURCE, NOT_FOUND,
313           ("%s", "Failed to map output memory"), NULL);
314       gst_buffer_unref (*outbuf);
315       *outbuf = NULL;
316       ret = GST_FLOW_ERROR;
317       goto out;
318     }
319
320     plane_size =
321         GST_VIDEO_INFO_PLANE_STRIDE (&raw->out_info,
322         i) * GST_VIDEO_INFO_COMP_HEIGHT (&raw->out_info, i);
323     g_assert (plane_size < map_info.size);
324     memcpy (map_info.data, v_frame.data[i], plane_size);
325
326     gst_memory_unmap (GST_MEMORY_CAST (mem), &map_info);
327   }
328
329   gst_video_frame_unmap (&v_frame);
330
331   ret = GST_FLOW_OK;
332
333 out:
334   return ret;
335 }
336
337 static void
338 _raw_to_buffer_free (gpointer impl)
339 {
340   struct RawToBufferUpload *raw = impl;
341
342   if (raw->pool) {
343     if (raw->pool_active) {
344       gst_buffer_pool_set_active (raw->pool, FALSE);
345     }
346     raw->pool_active = FALSE;
347     gst_object_unref (raw->pool);
348     raw->pool = NULL;
349   }
350
351   g_free (impl);
352 }
353
354 static GstStaticCaps _raw_to_buffer_in_templ = GST_STATIC_CAPS ("video/x-raw");
355 static GstStaticCaps _raw_to_buffer_out_templ =
356 GST_STATIC_CAPS ("video/x-raw(" GST_CAPS_FEATURE_MEMORY_VULKAN_BUFFER ")");
357
358 static const struct UploadMethod raw_to_buffer_upload = {
359   "RawToVulkanBuffer",
360   &_raw_to_buffer_in_templ,
361   &_raw_to_buffer_out_templ,
362   _raw_to_buffer_new_impl,
363   _raw_to_buffer_transform_caps,
364   _raw_to_buffer_set_caps,
365   _raw_to_buffer_propose_allocation,
366   _raw_to_buffer_perform,
367   _raw_to_buffer_free,
368 };
369
370 struct BufferToImageUpload
371 {
372   GstVulkanUpload *upload;
373
374   GstVideoInfo in_info;
375   GstVideoInfo out_info;
376
377   GstBufferPool *pool;
378   gboolean pool_active;
379
380   GstVulkanCommandPool *cmd_pool;
381   GstVulkanTrashList *trash_list;
382 };
383
384 static gpointer
385 _buffer_to_image_new_impl (GstVulkanUpload * upload)
386 {
387   struct BufferToImageUpload *raw = g_new0 (struct BufferToImageUpload, 1);
388
389   raw->upload = upload;
390   raw->trash_list = gst_vulkan_trash_fence_list_new ();
391
392   return raw;
393 }
394
395 static GstCaps *
396 _buffer_to_image_transform_caps (gpointer impl, GstPadDirection direction,
397     GstCaps * caps)
398 {
399   GstCaps *ret;
400
401   if (direction == GST_PAD_SINK) {
402     ret =
403         _set_caps_features_with_passthrough (caps,
404         GST_CAPS_FEATURE_MEMORY_VULKAN_IMAGE, NULL);
405   } else {
406     ret =
407         _set_caps_features_with_passthrough (caps,
408         GST_CAPS_FEATURE_MEMORY_VULKAN_BUFFER, NULL);
409   }
410
411   return ret;
412 }
413
414 static gboolean
415 _buffer_to_image_set_caps (gpointer impl, GstCaps * in_caps, GstCaps * out_caps)
416 {
417   struct BufferToImageUpload *raw = impl;
418
419   if (!gst_video_info_from_caps (&raw->in_info, in_caps))
420     return FALSE;
421
422   if (!gst_video_info_from_caps (&raw->out_info, out_caps))
423     return FALSE;
424
425   return TRUE;
426 }
427
428 static void
429 _buffer_to_image_propose_allocation (gpointer impl, GstQuery * decide_query,
430     GstQuery * query)
431 {
432   /* a little trickery with the impl pointer */
433   _buffer_propose_allocation (impl, decide_query, query);
434 }
435
436 static GstFlowReturn
437 _buffer_to_image_perform (gpointer impl, GstBuffer * inbuf, GstBuffer ** outbuf)
438 {
439   struct BufferToImageUpload *raw = impl;
440   GstFlowReturn ret;
441   GError *error = NULL;
442   VkResult err;
443   GstVulkanCommandBuffer *cmd_buf;
444   guint i;
445
446   if (!raw->cmd_pool) {
447     if (!(raw->cmd_pool =
448             gst_vulkan_queue_create_command_pool (raw->upload->queue,
449                 &error))) {
450       goto error;
451     }
452   }
453
454   if (!(cmd_buf = gst_vulkan_command_pool_create (raw->cmd_pool, &error)))
455     goto error;
456
457   if (!raw->pool) {
458     GstStructure *config;
459     guint min = 0, max = 0;
460     gsize size = 1;
461
462     raw->pool = gst_vulkan_image_buffer_pool_new (raw->upload->device);
463     config = gst_buffer_pool_get_config (raw->pool);
464     gst_buffer_pool_config_set_params (config, raw->upload->out_caps, size, min,
465         max);
466     gst_buffer_pool_set_config (raw->pool, config);
467   }
468   if (!raw->pool_active) {
469     gst_buffer_pool_set_active (raw->pool, TRUE);
470     raw->pool_active = TRUE;
471   }
472
473   if ((ret =
474           gst_buffer_pool_acquire_buffer (raw->pool, outbuf,
475               NULL)) != GST_FLOW_OK)
476     goto out;
477
478   {
479     /* *INDENT-OFF* */
480     VkCommandBufferBeginInfo cmd_buf_info = {
481         .sType = VK_STRUCTURE_TYPE_COMMAND_BUFFER_BEGIN_INFO,
482         .pNext = NULL,
483         .flags = VK_COMMAND_BUFFER_USAGE_ONE_TIME_SUBMIT_BIT,
484         .pInheritanceInfo = NULL
485     };
486     /* *INDENT-ON* */
487
488     gst_vulkan_command_buffer_lock (cmd_buf);
489     err = vkBeginCommandBuffer (cmd_buf->cmd, &cmd_buf_info);
490     if (gst_vulkan_error_to_g_error (err, &error, "vkBeginCommandBuffer") < 0)
491       goto unlock_error;
492   }
493
494   for (i = 0; i < GST_VIDEO_INFO_N_PLANES (&raw->out_info); i++) {
495     VkBufferImageCopy region;
496     GstMemory *in_mem, *out_mem;
497     GstVulkanBufferMemory *buf_mem;
498     GstVulkanImageMemory *img_mem;
499     VkImageMemoryBarrier image_memory_barrier;
500     VkBufferMemoryBarrier buffer_memory_barrier;
501
502     in_mem = gst_buffer_peek_memory (inbuf, i);
503     if (!gst_is_vulkan_buffer_memory (in_mem)) {
504       GST_WARNING_OBJECT (raw->upload, "Input is not a GstVulkanBufferMemory");
505       goto unlock_error;
506     }
507     buf_mem = (GstVulkanBufferMemory *) in_mem;
508
509     out_mem = gst_buffer_peek_memory (*outbuf, i);
510     if (!gst_is_vulkan_image_memory (out_mem)) {
511       GST_WARNING_OBJECT (raw->upload, "Output is not a GstVulkanImageMemory");
512       goto unlock_error;
513     }
514     img_mem = (GstVulkanImageMemory *) out_mem;
515
516     /* *INDENT-OFF* */
517     region = (VkBufferImageCopy) {
518         .bufferOffset = 0,
519         .bufferRowLength = GST_VIDEO_INFO_COMP_WIDTH (&raw->in_info, i),
520         .bufferImageHeight = GST_VIDEO_INFO_COMP_HEIGHT (&raw->in_info, i),
521         .imageSubresource = {
522             .aspectMask = VK_IMAGE_ASPECT_COLOR_BIT,
523             .mipLevel = 0,
524             .baseArrayLayer = 0,
525             .layerCount = 1,
526         },
527         .imageOffset = { .x = 0, .y = 0, .z = 0, },
528         .imageExtent = {
529             .width = GST_VIDEO_INFO_COMP_WIDTH (&raw->out_info, i),
530             .height = GST_VIDEO_INFO_COMP_HEIGHT (&raw->out_info, i),
531             .depth = 1,
532         }
533     };
534
535     image_memory_barrier = (VkImageMemoryBarrier) {
536         .sType = VK_STRUCTURE_TYPE_IMAGE_MEMORY_BARRIER,
537         .pNext = NULL,
538         .srcAccessMask = img_mem->barrier.parent.access_flags,
539         .dstAccessMask = VK_ACCESS_TRANSFER_WRITE_BIT,
540         .oldLayout = img_mem->barrier.image_layout,
541         .newLayout = VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL,
542         /* FIXME: implement exclusive transfers */
543         .srcQueueFamilyIndex = 0,
544         .dstQueueFamilyIndex = 0,
545         .image = img_mem->image,
546         .subresourceRange = img_mem->barrier.subresource_range
547     };
548
549     buffer_memory_barrier = (VkBufferMemoryBarrier) {
550         .sType = VK_STRUCTURE_TYPE_BUFFER_MEMORY_BARRIER,
551         .pNext = NULL,
552         .srcAccessMask = buf_mem->barrier.parent.access_flags,
553         .dstAccessMask = VK_ACCESS_TRANSFER_READ_BIT,
554         /* FIXME: implement exclusive transfers */
555         .srcQueueFamilyIndex = 0,
556         .dstQueueFamilyIndex = 0,
557         .buffer = buf_mem->buffer,
558         .offset = region.bufferOffset,
559         .size = region.bufferRowLength * region.bufferImageHeight
560     };
561     /* *INDENT-ON* */
562
563     vkCmdPipelineBarrier (cmd_buf->cmd,
564         buf_mem->barrier.parent.pipeline_stages | img_mem->barrier.
565         parent.pipeline_stages, VK_PIPELINE_STAGE_TRANSFER_BIT, 0, 0, NULL, 1,
566         &buffer_memory_barrier, 1, &image_memory_barrier);
567
568     buf_mem->barrier.parent.pipeline_stages = VK_PIPELINE_STAGE_TRANSFER_BIT;
569     buf_mem->barrier.parent.access_flags = buffer_memory_barrier.dstAccessMask;
570
571     img_mem->barrier.parent.pipeline_stages = VK_PIPELINE_STAGE_TRANSFER_BIT;
572     img_mem->barrier.parent.access_flags = image_memory_barrier.dstAccessMask;
573     img_mem->barrier.image_layout = VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL;
574
575     vkCmdCopyBufferToImage (cmd_buf->cmd, buf_mem->buffer, img_mem->image,
576         img_mem->barrier.image_layout, 1, &region);
577   }
578
579   err = vkEndCommandBuffer (cmd_buf->cmd);
580   gst_vulkan_command_buffer_unlock (cmd_buf);
581   if (gst_vulkan_error_to_g_error (err, &error, "vkEndCommandBuffer") < 0)
582     goto error;
583
584   {
585     VkSubmitInfo submit_info = { 0, };
586     VkPipelineStageFlags stages = VK_PIPELINE_STAGE_BOTTOM_OF_PIPE_BIT;
587     GstVulkanFence *fence;
588
589     /* *INDENT-OFF* */
590     submit_info = (VkSubmitInfo) {
591         .sType = VK_STRUCTURE_TYPE_SUBMIT_INFO,
592         .pNext = NULL,
593         .waitSemaphoreCount = 0,
594         .pWaitSemaphores = NULL,
595         .pWaitDstStageMask = &stages,
596         .commandBufferCount = 1,
597         .pCommandBuffers = &cmd_buf->cmd,
598         .signalSemaphoreCount = 0,
599         .pSignalSemaphores = NULL
600     };
601     /* *INDENT-ON* */
602
603     fence = gst_vulkan_fence_new (raw->upload->device, 0, &error);
604     if (!fence)
605       goto error;
606
607     err =
608         vkQueueSubmit (raw->upload->queue->queue, 1, &submit_info,
609         GST_VULKAN_FENCE_FENCE (fence));
610     if (gst_vulkan_error_to_g_error (err, &error, "vkQueueSubmit") < 0)
611       goto error;
612
613     gst_vulkan_trash_list_add (raw->trash_list,
614         gst_vulkan_trash_new_mini_object_unref (fence,
615             GST_MINI_OBJECT_CAST (cmd_buf)));
616   }
617
618   gst_vulkan_trash_list_gc (raw->trash_list);
619
620   ret = GST_FLOW_OK;
621
622 out:
623   return ret;
624
625 unlock_error:
626   if (cmd_buf) {
627     gst_vulkan_command_buffer_unlock (cmd_buf);
628     gst_vulkan_command_buffer_unref (cmd_buf);
629   }
630 error:
631   if (error) {
632     GST_WARNING_OBJECT (raw->upload, "Error: %s", error->message);
633     g_clear_error (&error);
634   }
635   gst_clear_buffer (outbuf);
636   ret = GST_FLOW_ERROR;
637   goto out;
638 }
639
640 static void
641 _buffer_to_image_free (gpointer impl)
642 {
643   struct BufferToImageUpload *raw = impl;
644
645   if (raw->pool) {
646     if (raw->pool_active) {
647       gst_buffer_pool_set_active (raw->pool, FALSE);
648     }
649     raw->pool_active = FALSE;
650     gst_object_unref (raw->pool);
651     raw->pool = NULL;
652   }
653
654   if (raw->cmd_pool)
655     gst_object_unref (raw->cmd_pool);
656   raw->cmd_pool = NULL;
657
658   if (!gst_vulkan_trash_list_wait (raw->trash_list, -1))
659     GST_WARNING_OBJECT (raw->upload,
660         "Failed to wait for all fences to complete " "before shutting down");
661   gst_object_unref (raw->trash_list);
662   raw->trash_list = NULL;
663
664   g_free (impl);
665 }
666
667 static GstStaticCaps _buffer_to_image_in_templ =
668 GST_STATIC_CAPS ("video/x-raw(" GST_CAPS_FEATURE_MEMORY_VULKAN_BUFFER ")");
669 static GstStaticCaps _buffer_to_image_out_templ =
670 GST_STATIC_CAPS ("video/x-raw(" GST_CAPS_FEATURE_MEMORY_VULKAN_IMAGE ")");
671
672 static const struct UploadMethod buffer_to_image_upload = {
673   "BufferToVulkanImage",
674   &_buffer_to_image_in_templ,
675   &_buffer_to_image_out_templ,
676   _buffer_to_image_new_impl,
677   _buffer_to_image_transform_caps,
678   _buffer_to_image_set_caps,
679   _buffer_to_image_propose_allocation,
680   _buffer_to_image_perform,
681   _buffer_to_image_free,
682 };
683
684 struct RawToImageUpload
685 {
686   GstVulkanUpload *upload;
687
688   GstVideoInfo in_info;
689   GstVideoInfo out_info;
690
691   GstBufferPool *pool;
692   gboolean pool_active;
693
694   GstBufferPool *in_pool;
695   gboolean in_pool_active;
696
697   GstVulkanCommandPool *cmd_pool;
698   GstVulkanTrashList *trash_list;
699 };
700
701 static gpointer
702 _raw_to_image_new_impl (GstVulkanUpload * upload)
703 {
704   struct RawToImageUpload *raw = g_new0 (struct RawToImageUpload, 1);
705
706   raw->upload = upload;
707   raw->trash_list = gst_vulkan_trash_fence_list_new ();
708
709   return raw;
710 }
711
712 static GstCaps *
713 _raw_to_image_transform_caps (gpointer impl, GstPadDirection direction,
714     GstCaps * caps)
715 {
716   GstCaps *ret;
717
718   if (direction == GST_PAD_SINK) {
719     ret =
720         _set_caps_features_with_passthrough (caps,
721         GST_CAPS_FEATURE_MEMORY_VULKAN_IMAGE, NULL);
722   } else {
723     ret =
724         _set_caps_features_with_passthrough (caps,
725         GST_CAPS_FEATURE_MEMORY_SYSTEM_MEMORY, NULL);
726   }
727
728   return ret;
729 }
730
731 static gboolean
732 _raw_to_image_set_caps (gpointer impl, GstCaps * in_caps, GstCaps * out_caps)
733 {
734   struct RawToImageUpload *raw = impl;
735
736   if (!gst_video_info_from_caps (&raw->in_info, in_caps))
737     return FALSE;
738
739   if (!gst_video_info_from_caps (&raw->out_info, out_caps))
740     return FALSE;
741
742   if (raw->in_pool) {
743     if (raw->in_pool_active) {
744       gst_buffer_pool_set_active (raw->in_pool, FALSE);
745     }
746     raw->in_pool_active = FALSE;
747     gst_object_unref (raw->in_pool);
748     raw->in_pool = NULL;
749   }
750
751   return TRUE;
752 }
753
754 static void
755 _raw_to_image_propose_allocation (gpointer impl, GstQuery * decide_query,
756     GstQuery * query)
757 {
758   /* a little trickery with the impl pointer */
759   _buffer_propose_allocation (impl, decide_query, query);
760 }
761
762 static GstFlowReturn
763 _raw_to_image_perform (gpointer impl, GstBuffer * inbuf, GstBuffer ** outbuf)
764 {
765   struct RawToImageUpload *raw = impl;
766   GstFlowReturn ret;
767   GstBuffer *in_vk_copy = NULL;
768   GstVulkanCommandBuffer *cmd_buf;
769   GError *error = NULL;
770   VkResult err;
771   guint i;
772
773   if (!raw->cmd_pool) {
774     if (!(raw->cmd_pool =
775             gst_vulkan_queue_create_command_pool (raw->upload->queue,
776                 &error))) {
777       goto error;
778     }
779   }
780
781   if (!(cmd_buf = gst_vulkan_command_pool_create (raw->cmd_pool, &error)))
782     goto error;
783
784   if (!raw->pool) {
785     GstStructure *config;
786     guint min = 0, max = 0;
787     gsize size = 1;
788
789     raw->pool = gst_vulkan_image_buffer_pool_new (raw->upload->device);
790     config = gst_buffer_pool_get_config (raw->pool);
791     gst_buffer_pool_config_set_params (config, raw->upload->out_caps, size, min,
792         max);
793     gst_buffer_pool_set_config (raw->pool, config);
794   }
795   if (!raw->pool_active) {
796     gst_buffer_pool_set_active (raw->pool, TRUE);
797     raw->pool_active = TRUE;
798   }
799
800   if ((ret =
801           gst_buffer_pool_acquire_buffer (raw->pool, outbuf,
802               NULL)) != GST_FLOW_OK)
803     goto out;
804
805   {
806     /* *INDENT-OFF* */
807     VkCommandBufferBeginInfo cmd_buf_info = {
808         .sType = VK_STRUCTURE_TYPE_COMMAND_BUFFER_BEGIN_INFO,
809         .pNext = NULL,
810         .flags = VK_COMMAND_BUFFER_USAGE_ONE_TIME_SUBMIT_BIT,
811         .pInheritanceInfo = NULL
812     };
813     /* *INDENT-ON* */
814
815     gst_vulkan_command_buffer_lock (cmd_buf);
816     err = vkBeginCommandBuffer (cmd_buf->cmd, &cmd_buf_info);
817     if (gst_vulkan_error_to_g_error (err, &error, "vkBeginCommandBuffer") < 0)
818       return FALSE;
819   }
820
821   for (i = 0; i < GST_VIDEO_INFO_N_PLANES (&raw->out_info); i++) {
822     VkBufferImageCopy region;
823     GstMemory *in_mem, *out_mem;
824     GstVulkanBufferMemory *buf_mem;
825     GstVulkanImageMemory *img_mem;
826     VkImageMemoryBarrier image_memory_barrier;
827     VkBufferMemoryBarrier buffer_memory_barrier;
828
829     in_mem = gst_buffer_peek_memory (inbuf, i);
830     if (gst_is_vulkan_buffer_memory (in_mem)) {
831       GST_TRACE_OBJECT (raw->upload, "Input is a GstVulkanBufferMemory");
832       buf_mem = (GstVulkanBufferMemory *) in_mem;
833     } else if (in_vk_copy) {
834       GST_TRACE_OBJECT (raw->upload,
835           "Have buffer copy of GstVulkanBufferMemory");
836       in_mem = gst_buffer_peek_memory (in_vk_copy, i);
837       g_assert (gst_is_vulkan_buffer_memory (in_mem));
838       buf_mem = (GstVulkanBufferMemory *) in_mem;
839     } else {
840       GstVideoFrame in_frame, out_frame;
841
842       GST_TRACE_OBJECT (raw->upload,
843           "Copying input to a new GstVulkanBufferMemory");
844       if (!raw->in_pool) {
845         GstStructure *config;
846         guint min = 0, max = 0;
847         gsize size = 1;
848
849         raw->in_pool = gst_vulkan_buffer_pool_new (raw->upload->device);
850         config = gst_buffer_pool_get_config (raw->pool);
851         gst_buffer_pool_config_set_params (config, raw->upload->in_caps, size,
852             min, max);
853         gst_buffer_pool_set_config (raw->in_pool, config);
854       }
855       if (!raw->in_pool_active) {
856         gst_buffer_pool_set_active (raw->in_pool, TRUE);
857         raw->in_pool_active = TRUE;
858       }
859
860       if ((ret =
861               gst_buffer_pool_acquire_buffer (raw->in_pool, &in_vk_copy,
862                   NULL)) != GST_FLOW_OK) {
863         goto unlock_error;
864       }
865
866       if (!gst_video_frame_map (&in_frame, &raw->in_info, inbuf, GST_MAP_READ)) {
867         GST_WARNING_OBJECT (raw->upload, "Failed to map input buffer");
868         goto unlock_error;
869       }
870
871       if (!gst_video_frame_map (&out_frame, &raw->in_info, in_vk_copy,
872               GST_MAP_WRITE)) {
873         gst_video_frame_unmap (&in_frame);
874         GST_WARNING_OBJECT (raw->upload, "Failed to map input buffer");
875         goto unlock_error;
876       }
877
878       if (!gst_video_frame_copy (&out_frame, &in_frame)) {
879         gst_video_frame_unmap (&in_frame);
880         gst_video_frame_unmap (&out_frame);
881         GST_WARNING_OBJECT (raw->upload, "Failed to copy input buffer");
882         goto unlock_error;
883       }
884
885       gst_video_frame_unmap (&in_frame);
886       gst_video_frame_unmap (&out_frame);
887
888       in_mem = gst_buffer_peek_memory (in_vk_copy, i);
889       buf_mem = (GstVulkanBufferMemory *) in_mem;
890     }
891
892     out_mem = gst_buffer_peek_memory (*outbuf, i);
893     if (!gst_is_vulkan_image_memory (out_mem)) {
894       GST_WARNING_OBJECT (raw->upload, "Output is not a GstVulkanImageMemory");
895       goto unlock_error;
896     }
897     img_mem = (GstVulkanImageMemory *) out_mem;
898
899     /* *INDENT-OFF* */
900     region = (VkBufferImageCopy) {
901         .bufferOffset = 0,
902         .bufferRowLength = GST_VIDEO_INFO_COMP_WIDTH (&raw->in_info, i),
903         .bufferImageHeight = GST_VIDEO_INFO_COMP_HEIGHT (&raw->in_info, i),
904         .imageSubresource = {
905             .aspectMask = VK_IMAGE_ASPECT_COLOR_BIT,
906             .mipLevel = 0,
907             .baseArrayLayer = 0,
908             .layerCount = 1,
909         },
910         .imageOffset = { .x = 0, .y = 0, .z = 0, },
911         .imageExtent = {
912             .width = GST_VIDEO_INFO_COMP_WIDTH (&raw->out_info, i),
913             .height = GST_VIDEO_INFO_COMP_HEIGHT (&raw->out_info, i),
914             .depth = 1,
915         }
916     };
917
918     buffer_memory_barrier = (VkBufferMemoryBarrier) {
919         .sType = VK_STRUCTURE_TYPE_BUFFER_MEMORY_BARRIER,
920         .pNext = NULL,
921         .srcAccessMask = buf_mem->barrier.parent.access_flags,
922         .dstAccessMask = VK_ACCESS_TRANSFER_READ_BIT,
923         /* FIXME: implement exclusive transfers */
924         .srcQueueFamilyIndex = 0,
925         .dstQueueFamilyIndex = 0,
926         .buffer = buf_mem->buffer,
927         .offset = region.bufferOffset,
928         .size = region.bufferRowLength * region.bufferImageHeight,
929     };
930
931     image_memory_barrier = (VkImageMemoryBarrier) {
932         .sType = VK_STRUCTURE_TYPE_IMAGE_MEMORY_BARRIER,
933         .pNext = NULL,
934         .srcAccessMask = img_mem->barrier.parent.access_flags,
935         .dstAccessMask = VK_ACCESS_TRANSFER_WRITE_BIT,
936         .oldLayout = img_mem->barrier.image_layout,
937         .newLayout = VK_IMAGE_LAYOUT_TRANSFER_DST_OPTIMAL,
938         /* FIXME: implement exclusive transfers */
939         .srcQueueFamilyIndex = 0,
940         .dstQueueFamilyIndex = 0,
941         .image = img_mem->image,
942         .subresourceRange = img_mem->barrier.subresource_range,
943     };
944     /* *INDENT-ON* */
945
946     vkCmdPipelineBarrier (cmd_buf->cmd,
947         buf_mem->barrier.parent.pipeline_stages | img_mem->barrier.
948         parent.pipeline_stages, VK_PIPELINE_STAGE_TRANSFER_BIT, 0, 0, NULL, 1,
949         &buffer_memory_barrier, 1, &image_memory_barrier);
950
951     buf_mem->barrier.parent.pipeline_stages = VK_PIPELINE_STAGE_TRANSFER_BIT;
952     buf_mem->barrier.parent.access_flags = buffer_memory_barrier.dstAccessMask;
953
954     img_mem->barrier.parent.pipeline_stages = VK_PIPELINE_STAGE_TRANSFER_BIT;
955     img_mem->barrier.parent.access_flags = image_memory_barrier.dstAccessMask;
956     img_mem->barrier.image_layout = image_memory_barrier.newLayout;
957
958     vkCmdCopyBufferToImage (cmd_buf->cmd, buf_mem->buffer, img_mem->image,
959         img_mem->barrier.image_layout, 1, &region);
960   }
961
962   err = vkEndCommandBuffer (cmd_buf->cmd);
963   gst_vulkan_command_buffer_unlock (cmd_buf);
964   if (gst_vulkan_error_to_g_error (err, &error, "vkEndCommandBuffer") < 0) {
965     goto error;
966   }
967
968   {
969     VkSubmitInfo submit_info = { 0, };
970     GstVulkanFence *fence;
971
972     /* *INDENT-OFF* */
973     submit_info = (VkSubmitInfo) {
974         .sType = VK_STRUCTURE_TYPE_SUBMIT_INFO,
975         .pNext = NULL,
976         .waitSemaphoreCount = 0,
977         .pWaitSemaphores = NULL,
978         .pWaitDstStageMask = NULL,
979         .commandBufferCount = 1,
980         .pCommandBuffers = &cmd_buf->cmd,
981         .signalSemaphoreCount = 0,
982         .pSignalSemaphores = NULL,
983     };
984     /* *INDENT-ON* */
985
986     fence = gst_vulkan_fence_new (raw->upload->device, 0, &error);
987     if (!fence)
988       goto error;
989
990     err =
991         vkQueueSubmit (raw->upload->queue->queue, 1, &submit_info,
992         GST_VULKAN_FENCE_FENCE (fence));
993     if (gst_vulkan_error_to_g_error (err, &error, "vkQueueSubmit") < 0)
994       goto error;
995
996     gst_vulkan_trash_list_add (raw->trash_list,
997         gst_vulkan_trash_new_mini_object_unref (fence,
998             GST_MINI_OBJECT_CAST (cmd_buf)));
999   }
1000
1001   gst_vulkan_trash_list_gc (raw->trash_list);
1002
1003   ret = GST_FLOW_OK;
1004
1005 out:
1006   if (in_vk_copy)
1007     gst_buffer_unref (in_vk_copy);
1008
1009   return ret;
1010
1011 unlock_error:
1012   if (cmd_buf) {
1013     gst_vulkan_command_buffer_lock (cmd_buf);
1014     gst_vulkan_command_buffer_unref (cmd_buf);
1015   }
1016 error:
1017   if (error) {
1018     GST_WARNING_OBJECT (raw->upload, "Error: %s", error->message);
1019     g_clear_error (&error);
1020   }
1021   gst_clear_buffer (outbuf);
1022   ret = GST_FLOW_ERROR;
1023   goto out;
1024 }
1025
1026 static void
1027 _raw_to_image_free (gpointer impl)
1028 {
1029   struct RawToImageUpload *raw = impl;
1030
1031   if (raw->pool) {
1032     if (raw->pool_active) {
1033       gst_buffer_pool_set_active (raw->pool, FALSE);
1034     }
1035     raw->pool_active = FALSE;
1036     gst_object_unref (raw->pool);
1037     raw->pool = NULL;
1038   }
1039
1040   if (raw->in_pool) {
1041     if (raw->in_pool_active) {
1042       gst_buffer_pool_set_active (raw->in_pool, FALSE);
1043     }
1044     raw->in_pool_active = FALSE;
1045     gst_object_unref (raw->in_pool);
1046     raw->in_pool = NULL;
1047   }
1048
1049   if (raw->cmd_pool)
1050     gst_object_unref (raw->cmd_pool);
1051   raw->cmd_pool = NULL;
1052
1053   if (!gst_vulkan_trash_list_wait (raw->trash_list, -1))
1054     GST_WARNING_OBJECT (raw->upload,
1055         "Failed to wait for all fences to complete " "before shutting down");
1056   gst_object_unref (raw->trash_list);
1057   raw->trash_list = NULL;
1058
1059   g_free (impl);
1060 }
1061
1062 static GstStaticCaps _raw_to_image_in_templ = GST_STATIC_CAPS ("video/x-raw");
1063 static GstStaticCaps _raw_to_image_out_templ =
1064 GST_STATIC_CAPS ("video/x-raw(" GST_CAPS_FEATURE_MEMORY_VULKAN_IMAGE ")");
1065
1066 static const struct UploadMethod raw_to_image_upload = {
1067   "RawToVulkanImage",
1068   &_raw_to_image_in_templ,
1069   &_raw_to_image_out_templ,
1070   _raw_to_image_new_impl,
1071   _raw_to_image_transform_caps,
1072   _raw_to_image_set_caps,
1073   _raw_to_image_propose_allocation,
1074   _raw_to_image_perform,
1075   _raw_to_image_free,
1076 };
1077
1078 static const struct UploadMethod *upload_methods[] = {
1079   &buffer_upload,
1080   &raw_to_buffer_upload,
1081   &raw_to_image_upload,
1082   &buffer_to_image_upload,
1083 };
1084
1085 static GstCaps *
1086 _get_input_template_caps (void)
1087 {
1088   GstCaps *ret = NULL;
1089   gint i;
1090
1091   /* FIXME: cache this and invalidate on changes to upload_methods */
1092   for (i = 0; i < G_N_ELEMENTS (upload_methods); i++) {
1093     GstCaps *template = gst_static_caps_get (upload_methods[i]->in_template);
1094     ret = ret == NULL ? template : gst_caps_merge (ret, template);
1095   }
1096
1097   ret = gst_caps_simplify (ret);
1098
1099   return ret;
1100 }
1101
1102 static GstCaps *
1103 _get_output_template_caps (void)
1104 {
1105   GstCaps *ret = NULL;
1106   gint i;
1107
1108   /* FIXME: cache this and invalidate on changes to upload_methods */
1109   for (i = 0; i < G_N_ELEMENTS (upload_methods); i++) {
1110     GstCaps *template = gst_static_caps_get (upload_methods[i]->out_template);
1111     ret = ret == NULL ? template : gst_caps_merge (ret, template);
1112   }
1113
1114   ret = gst_caps_simplify (ret);
1115
1116   return ret;
1117 }
1118
1119 static void gst_vulkan_upload_finalize (GObject * object);
1120 static void gst_vulkan_upload_set_property (GObject * object, guint prop_id,
1121     const GValue * value, GParamSpec * param_spec);
1122 static void gst_vulkan_upload_get_property (GObject * object, guint prop_id,
1123     GValue * value, GParamSpec * param_spec);
1124
1125 static gboolean gst_vulkan_upload_query (GstBaseTransform * bt,
1126     GstPadDirection direction, GstQuery * query);
1127 static void gst_vulkan_upload_set_context (GstElement * element,
1128     GstContext * context);
1129 static GstStateChangeReturn gst_vulkan_upload_change_state (GstElement *
1130     element, GstStateChange transition);
1131
1132 static gboolean gst_vulkan_upload_set_caps (GstBaseTransform * bt,
1133     GstCaps * in_caps, GstCaps * out_caps);
1134 static GstCaps *gst_vulkan_upload_transform_caps (GstBaseTransform * bt,
1135     GstPadDirection direction, GstCaps * caps, GstCaps * filter);
1136 static gboolean gst_vulkan_upload_propose_allocation (GstBaseTransform * bt,
1137     GstQuery * decide_query, GstQuery * query);
1138 static gboolean gst_vulkan_upload_decide_allocation (GstBaseTransform * bt,
1139     GstQuery * query);
1140 static GstFlowReturn gst_vulkan_upload_transform (GstBaseTransform * bt,
1141     GstBuffer * inbuf, GstBuffer * outbuf);
1142 static GstFlowReturn gst_vulkan_upload_prepare_output_buffer (GstBaseTransform *
1143     bt, GstBuffer * inbuf, GstBuffer ** outbuf);
1144
1145 enum
1146 {
1147   PROP_0,
1148 };
1149
1150 enum
1151 {
1152   SIGNAL_0,
1153   LAST_SIGNAL
1154 };
1155
1156 /* static guint gst_vulkan_upload_signals[LAST_SIGNAL] = { 0 }; */
1157
1158 #define gst_vulkan_upload_parent_class parent_class
1159 G_DEFINE_TYPE_WITH_CODE (GstVulkanUpload, gst_vulkan_upload,
1160     GST_TYPE_BASE_TRANSFORM, GST_DEBUG_CATEGORY_INIT (gst_debug_vulkan_upload,
1161         "vulkanupload", 0, "Vulkan Uploader"));
1162
1163 static void
1164 gst_vulkan_upload_class_init (GstVulkanUploadClass * klass)
1165 {
1166   GObjectClass *gobject_class;
1167   GstElementClass *gstelement_class;
1168   GstBaseTransformClass *gstbasetransform_class;
1169
1170   gobject_class = (GObjectClass *) klass;
1171   gstelement_class = (GstElementClass *) klass;
1172   gstbasetransform_class = (GstBaseTransformClass *) klass;
1173
1174   gobject_class->set_property = gst_vulkan_upload_set_property;
1175   gobject_class->get_property = gst_vulkan_upload_get_property;
1176
1177   gst_element_class_set_metadata (gstelement_class, "Vulkan Uploader",
1178       "Filter/Video", "A Vulkan data uploader",
1179       "Matthew Waters <matthew@centricular.com>");
1180
1181   {
1182     GstCaps *caps;
1183
1184     caps = _get_input_template_caps ();
1185     gst_element_class_add_pad_template (gstelement_class,
1186         gst_pad_template_new ("sink", GST_PAD_SINK, GST_PAD_ALWAYS, caps));
1187     gst_caps_unref (caps);
1188
1189     caps = _get_output_template_caps ();
1190     gst_element_class_add_pad_template (gstelement_class,
1191         gst_pad_template_new ("src", GST_PAD_SRC, GST_PAD_ALWAYS, caps));
1192     gst_caps_unref (caps);
1193   }
1194
1195   gobject_class->finalize = gst_vulkan_upload_finalize;
1196
1197   gstelement_class->change_state = gst_vulkan_upload_change_state;
1198   gstelement_class->set_context = gst_vulkan_upload_set_context;
1199   gstbasetransform_class->query = GST_DEBUG_FUNCPTR (gst_vulkan_upload_query);
1200   gstbasetransform_class->set_caps = gst_vulkan_upload_set_caps;
1201   gstbasetransform_class->transform_caps = gst_vulkan_upload_transform_caps;
1202   gstbasetransform_class->propose_allocation =
1203       gst_vulkan_upload_propose_allocation;
1204   gstbasetransform_class->decide_allocation =
1205       gst_vulkan_upload_decide_allocation;
1206   gstbasetransform_class->transform = gst_vulkan_upload_transform;
1207   gstbasetransform_class->prepare_output_buffer =
1208       gst_vulkan_upload_prepare_output_buffer;
1209 }
1210
1211 static void
1212 gst_vulkan_upload_init (GstVulkanUpload * vk_upload)
1213 {
1214   guint i, n;
1215
1216   n = G_N_ELEMENTS (upload_methods);
1217   vk_upload->upload_impls = g_malloc (sizeof (gpointer) * n);
1218   for (i = 0; i < n; i++) {
1219     vk_upload->upload_impls[i] = upload_methods[i]->new_impl (vk_upload);
1220   }
1221 }
1222
1223 static void
1224 gst_vulkan_upload_finalize (GObject * object)
1225 {
1226   GstVulkanUpload *vk_upload = GST_VULKAN_UPLOAD (object);
1227   guint i;
1228
1229   gst_caps_replace (&vk_upload->in_caps, NULL);
1230   gst_caps_replace (&vk_upload->out_caps, NULL);
1231
1232   for (i = 0; i < G_N_ELEMENTS (upload_methods); i++) {
1233     upload_methods[i]->free (vk_upload->upload_impls[i]);
1234   }
1235   g_free (vk_upload->upload_impls);
1236   vk_upload->upload_impls = NULL;
1237
1238   G_OBJECT_CLASS (parent_class)->finalize (object);
1239 }
1240
1241 static void
1242 gst_vulkan_upload_set_property (GObject * object, guint prop_id,
1243     const GValue * value, GParamSpec * pspec)
1244 {
1245 //  GstVulkanUpload *vk_upload = GST_VULKAN_UPLOAD (object);
1246
1247   switch (prop_id) {
1248     default:
1249       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
1250       break;
1251   }
1252 }
1253
1254 static void
1255 gst_vulkan_upload_get_property (GObject * object, guint prop_id,
1256     GValue * value, GParamSpec * pspec)
1257 {
1258 //  GstVulkanUpload *vk_upload = GST_VULKAN_UPLOAD (object);
1259
1260   switch (prop_id) {
1261     default:
1262       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
1263       break;
1264   }
1265 }
1266
1267 static gboolean
1268 gst_vulkan_upload_query (GstBaseTransform * bt, GstPadDirection direction,
1269     GstQuery * query)
1270 {
1271   GstVulkanUpload *vk_upload = GST_VULKAN_UPLOAD (bt);
1272
1273   switch (GST_QUERY_TYPE (query)) {
1274     case GST_QUERY_CONTEXT:{
1275       if (gst_vulkan_handle_context_query (GST_ELEMENT (vk_upload), query,
1276               NULL, vk_upload->instance, vk_upload->device))
1277         return TRUE;
1278
1279       if (gst_vulkan_queue_handle_context_query (GST_ELEMENT (vk_upload), query,
1280               vk_upload->queue))
1281         return TRUE;
1282
1283       break;
1284     }
1285     default:
1286       break;
1287   }
1288
1289   return GST_BASE_TRANSFORM_CLASS (parent_class)->query (bt, direction, query);
1290 }
1291
1292 static void
1293 gst_vulkan_upload_set_context (GstElement * element, GstContext * context)
1294 {
1295   GstVulkanUpload *vk_upload = GST_VULKAN_UPLOAD (element);
1296
1297   gst_vulkan_handle_set_context (element, context, NULL, &vk_upload->instance);
1298
1299   GST_ELEMENT_CLASS (parent_class)->set_context (element, context);
1300 }
1301
1302 struct choose_data
1303 {
1304   GstVulkanUpload *upload;
1305   GstVulkanQueue *queue;
1306 };
1307
1308 static gboolean
1309 _choose_queue (GstVulkanDevice * device, GstVulkanQueue * queue,
1310     struct choose_data *data)
1311 {
1312   guint flags =
1313       device->physical_device->queue_family_props[queue->family].queueFlags;
1314
1315   if ((flags & VK_QUEUE_GRAPHICS_BIT) != 0) {
1316     if (data->queue)
1317       gst_object_unref (data->queue);
1318     data->queue = gst_object_ref (queue);
1319     return FALSE;
1320   }
1321
1322   return TRUE;
1323 }
1324
1325 static GstVulkanQueue *
1326 _find_graphics_queue (GstVulkanUpload * upload)
1327 {
1328   struct choose_data data;
1329
1330   data.upload = upload;
1331   data.queue = NULL;
1332
1333   gst_vulkan_device_foreach_queue (upload->device,
1334       (GstVulkanDeviceForEachQueueFunc) _choose_queue, &data);
1335
1336   return data.queue;
1337 }
1338
1339 static GstStateChangeReturn
1340 gst_vulkan_upload_change_state (GstElement * element, GstStateChange transition)
1341 {
1342   GstVulkanUpload *vk_upload = GST_VULKAN_UPLOAD (element);
1343   GstStateChangeReturn ret = GST_STATE_CHANGE_SUCCESS;
1344
1345   GST_DEBUG ("changing state: %s => %s",
1346       gst_element_state_get_name (GST_STATE_TRANSITION_CURRENT (transition)),
1347       gst_element_state_get_name (GST_STATE_TRANSITION_NEXT (transition)));
1348
1349   switch (transition) {
1350     case GST_STATE_CHANGE_NULL_TO_READY:
1351       break;
1352     case GST_STATE_CHANGE_READY_TO_PAUSED:
1353       if (!gst_vulkan_ensure_element_data (element, NULL, &vk_upload->instance)) {
1354         GST_ELEMENT_ERROR (vk_upload, RESOURCE, NOT_FOUND,
1355             ("Failed to retreive vulkan instance"), (NULL));
1356         return GST_STATE_CHANGE_FAILURE;
1357       }
1358       if (!gst_vulkan_device_run_context_query (GST_ELEMENT (vk_upload),
1359               &vk_upload->device)) {
1360         GError *error = NULL;
1361         GST_DEBUG_OBJECT (vk_upload, "No device retrieved from peer elements");
1362         if (!(vk_upload->device =
1363                 gst_vulkan_instance_create_device (vk_upload->instance,
1364                     &error))) {
1365           GST_ELEMENT_ERROR (vk_upload, RESOURCE, NOT_FOUND,
1366               ("Failed to create vulkan device"), ("%s",
1367                   error ? error->message : ""));
1368           g_clear_error (&error);
1369           return GST_STATE_CHANGE_FAILURE;
1370         }
1371       }
1372
1373       if (!gst_vulkan_queue_run_context_query (GST_ELEMENT (vk_upload),
1374               &vk_upload->queue)) {
1375         GST_DEBUG_OBJECT (vk_upload, "No queue retrieved from peer elements");
1376         vk_upload->queue = _find_graphics_queue (vk_upload);
1377       }
1378       if (!vk_upload->queue) {
1379         GST_ELEMENT_ERROR (vk_upload, RESOURCE, NOT_FOUND,
1380             ("Failed to create/retrieve vulkan queue"), (NULL));
1381         return GST_STATE_CHANGE_FAILURE;
1382       }
1383       break;
1384     case GST_STATE_CHANGE_PAUSED_TO_PLAYING:
1385       break;
1386     default:
1387       break;
1388   }
1389
1390   ret = GST_ELEMENT_CLASS (parent_class)->change_state (element, transition);
1391   if (ret == GST_STATE_CHANGE_FAILURE)
1392     return ret;
1393
1394   switch (transition) {
1395     case GST_STATE_CHANGE_PLAYING_TO_PAUSED:
1396       break;
1397     case GST_STATE_CHANGE_PAUSED_TO_READY:
1398       if (vk_upload->queue)
1399         gst_object_unref (vk_upload->queue);
1400       vk_upload->queue = NULL;
1401       if (vk_upload->device)
1402         gst_object_unref (vk_upload->device);
1403       vk_upload->device = NULL;
1404       if (vk_upload->instance)
1405         gst_object_unref (vk_upload->instance);
1406       vk_upload->instance = NULL;
1407       break;
1408     case GST_STATE_CHANGE_READY_TO_NULL:
1409       break;
1410     default:
1411       break;
1412   }
1413
1414   return ret;
1415 }
1416
1417 static GstCaps *
1418 gst_vulkan_upload_transform_caps (GstBaseTransform * bt,
1419     GstPadDirection direction, GstCaps * caps, GstCaps * filter)
1420 {
1421   GstVulkanUpload *vk_upload = GST_VULKAN_UPLOAD (bt);
1422   GstCaps *result, *tmp;
1423   gint i;
1424
1425   tmp = gst_caps_new_empty ();
1426
1427   for (i = 0; i < G_N_ELEMENTS (upload_methods); i++) {
1428     GstCaps *tmp2;
1429     GstCaps *templ;
1430
1431     if (direction == GST_PAD_SINK) {
1432       templ = gst_static_caps_get (upload_methods[i]->in_template);
1433     } else {
1434       templ = gst_static_caps_get (upload_methods[i]->out_template);
1435     }
1436     if (!gst_caps_can_intersect (caps, templ)) {
1437       gst_caps_unref (templ);
1438       continue;
1439     }
1440     gst_caps_unref (templ);
1441
1442     tmp2 = upload_methods[i]->transform_caps (vk_upload->upload_impls[i],
1443         direction, caps);
1444
1445     if (tmp2)
1446       tmp = gst_caps_merge (tmp, tmp2);
1447   }
1448
1449   if (filter) {
1450     result = gst_caps_intersect_full (filter, tmp, GST_CAPS_INTERSECT_FIRST);
1451     gst_caps_unref (tmp);
1452   } else {
1453     result = tmp;
1454   }
1455
1456   return result;
1457 }
1458
1459 static gboolean
1460 gst_vulkan_upload_set_caps (GstBaseTransform * bt, GstCaps * in_caps,
1461     GstCaps * out_caps)
1462 {
1463   GstVulkanUpload *vk_upload = GST_VULKAN_UPLOAD (bt);
1464   gboolean found_method = FALSE;
1465   guint i;
1466
1467   gst_caps_replace (&vk_upload->in_caps, in_caps);
1468   gst_caps_replace (&vk_upload->out_caps, out_caps);
1469
1470   for (i = 0; i < G_N_ELEMENTS (upload_methods); i++) {
1471     GstCaps *templ;
1472
1473     templ = gst_static_caps_get (upload_methods[i]->in_template);
1474     if (!gst_caps_can_intersect (in_caps, templ)) {
1475       gst_caps_unref (templ);
1476       continue;
1477     }
1478     gst_caps_unref (templ);
1479
1480     templ = gst_static_caps_get (upload_methods[i]->out_template);
1481     if (!gst_caps_can_intersect (out_caps, templ)) {
1482       gst_caps_unref (templ);
1483       continue;
1484     }
1485     gst_caps_unref (templ);
1486
1487     if (!upload_methods[i]->set_caps (vk_upload->upload_impls[i], in_caps,
1488             out_caps))
1489       continue;
1490
1491     GST_LOG_OBJECT (bt, "uploader %s accepted caps in: %" GST_PTR_FORMAT
1492         " out: %" GST_PTR_FORMAT, upload_methods[i]->name, in_caps, out_caps);
1493
1494     vk_upload->current_impl = i;
1495     found_method = TRUE;
1496     break;
1497   }
1498
1499   GST_DEBUG_OBJECT (bt,
1500       "set caps in: %" GST_PTR_FORMAT " out: %" GST_PTR_FORMAT, in_caps,
1501       out_caps);
1502
1503   return found_method;
1504 }
1505
1506 static gboolean
1507 gst_vulkan_upload_propose_allocation (GstBaseTransform * bt,
1508     GstQuery * decide_query, GstQuery * query)
1509 {
1510   GstVulkanUpload *vk_upload = GST_VULKAN_UPLOAD (bt);
1511   guint i;
1512
1513   for (i = 0; i < G_N_ELEMENTS (upload_methods); i++) {
1514     GstCaps *templ;
1515
1516     templ = gst_static_caps_get (upload_methods[i]->in_template);
1517     if (!gst_caps_can_intersect (vk_upload->in_caps, templ)) {
1518       gst_caps_unref (templ);
1519       continue;
1520     }
1521     gst_caps_unref (templ);
1522
1523     templ = gst_static_caps_get (upload_methods[i]->out_template);
1524     if (!gst_caps_can_intersect (vk_upload->out_caps, templ)) {
1525       gst_caps_unref (templ);
1526       continue;
1527     }
1528     gst_caps_unref (templ);
1529
1530     upload_methods[i]->propose_allocation (vk_upload->upload_impls[i],
1531         decide_query, query);
1532   }
1533
1534   return TRUE;
1535 }
1536
1537 static gboolean
1538 gst_vulkan_upload_decide_allocation (GstBaseTransform * bt, GstQuery * query)
1539 {
1540   return TRUE;
1541 }
1542
1543 static gboolean
1544 _upload_find_method (GstVulkanUpload * vk_upload)
1545 {
1546   vk_upload->current_impl++;
1547
1548   if (vk_upload->current_impl >= G_N_ELEMENTS (upload_methods))
1549     return FALSE;
1550
1551   GST_DEBUG_OBJECT (vk_upload, "attempting upload with uploader %s",
1552       upload_methods[vk_upload->current_impl]->name);
1553
1554   return TRUE;
1555 }
1556
1557 static GstFlowReturn
1558 gst_vulkan_upload_prepare_output_buffer (GstBaseTransform * bt,
1559     GstBuffer * inbuf, GstBuffer ** outbuf)
1560 {
1561   GstBaseTransformClass *bclass = GST_BASE_TRANSFORM_GET_CLASS (bt);
1562   GstVulkanUpload *vk_upload = GST_VULKAN_UPLOAD (bt);
1563   GstFlowReturn ret;
1564
1565 restart:
1566   {
1567     gpointer method_impl;
1568     const struct UploadMethod *method;
1569
1570     method = upload_methods[vk_upload->current_impl];
1571     method_impl = vk_upload->upload_impls[vk_upload->current_impl];
1572
1573     ret = method->perform (method_impl, inbuf, outbuf);
1574     if (ret != GST_FLOW_OK) {
1575     next_method:
1576       if (!_upload_find_method (vk_upload)) {
1577         GST_ELEMENT_ERROR (bt, RESOURCE, NOT_FOUND,
1578             ("Could not find suitable uploader"), (NULL));
1579         return GST_FLOW_ERROR;
1580       }
1581
1582       method = upload_methods[vk_upload->current_impl];
1583       method_impl = vk_upload->upload_impls[vk_upload->current_impl];
1584       if (!method->set_caps (method_impl, vk_upload->in_caps,
1585               vk_upload->out_caps))
1586         /* try the next method */
1587         goto next_method;
1588
1589       /* try the uploading with the next method */
1590       goto restart;
1591     }
1592   }
1593
1594   if (ret == GST_FLOW_OK) {
1595     /* basetransform doesn't unref if they're the same */
1596     if (inbuf != *outbuf)
1597       bclass->copy_metadata (bt, inbuf, *outbuf);
1598   }
1599
1600   return ret;
1601 }
1602
1603 static GstFlowReturn
1604 gst_vulkan_upload_transform (GstBaseTransform * bt, GstBuffer * inbuf,
1605     GstBuffer * outbuf)
1606 {
1607   return GST_FLOW_OK;
1608 }