9da55c97fd500cf9ca42c85f251b97c6416e6125
[libav.git] / libavcodec / vaapi_encode.c
1 /*
2 * This file is part of Libav.
3 *
4 * Libav 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 * Libav 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 Libav; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
17 */
18
19 #include <inttypes.h>
20 #include <string.h>
21
22 #include "libavutil/avassert.h"
23 #include "libavutil/common.h"
24 #include "libavutil/log.h"
25 #include "libavutil/pixdesc.h"
26
27 #include "vaapi_encode.h"
28 #include "avcodec.h"
29
30 static const char *picture_type_name[] = { "IDR", "I", "P", "B" };
31
32 static int vaapi_encode_make_packed_header(AVCodecContext *avctx,
33 VAAPIEncodePicture *pic,
34 int type, char *data, size_t bit_len)
35 {
36 VAAPIEncodeContext *ctx = avctx->priv_data;
37 VAStatus vas;
38 VABufferID param_buffer, data_buffer;
39 VAEncPackedHeaderParameterBuffer params = {
40 .type = type,
41 .bit_length = bit_len,
42 .has_emulation_bytes = 1,
43 };
44
45 av_assert0(pic->nb_param_buffers + 2 <= MAX_PARAM_BUFFERS);
46
47 vas = vaCreateBuffer(ctx->hwctx->display, ctx->va_context,
48 VAEncPackedHeaderParameterBufferType,
49 sizeof(params), 1, &params, &param_buffer);
50 if (vas != VA_STATUS_SUCCESS) {
51 av_log(avctx, AV_LOG_ERROR, "Failed to create parameter buffer "
52 "for packed header (type %d): %d (%s).\n",
53 type, vas, vaErrorStr(vas));
54 return AVERROR(EIO);
55 }
56 pic->param_buffers[pic->nb_param_buffers++] = param_buffer;
57
58 vas = vaCreateBuffer(ctx->hwctx->display, ctx->va_context,
59 VAEncPackedHeaderDataBufferType,
60 (bit_len + 7) / 8, 1, data, &data_buffer);
61 if (vas != VA_STATUS_SUCCESS) {
62 av_log(avctx, AV_LOG_ERROR, "Failed to create data buffer "
63 "for packed header (type %d): %d (%s).\n",
64 type, vas, vaErrorStr(vas));
65 return AVERROR(EIO);
66 }
67 pic->param_buffers[pic->nb_param_buffers++] = data_buffer;
68
69 av_log(avctx, AV_LOG_DEBUG, "Packed header buffer (%d) is %#x/%#x "
70 "(%zu bits).\n", type, param_buffer, data_buffer, bit_len);
71 return 0;
72 }
73
74 static int vaapi_encode_make_param_buffer(AVCodecContext *avctx,
75 VAAPIEncodePicture *pic,
76 int type, char *data, size_t len)
77 {
78 VAAPIEncodeContext *ctx = avctx->priv_data;
79 VAStatus vas;
80 VABufferID buffer;
81
82 av_assert0(pic->nb_param_buffers + 1 <= MAX_PARAM_BUFFERS);
83
84 vas = vaCreateBuffer(ctx->hwctx->display, ctx->va_context,
85 type, len, 1, data, &buffer);
86 if (vas != VA_STATUS_SUCCESS) {
87 av_log(avctx, AV_LOG_ERROR, "Failed to create parameter buffer "
88 "(type %d): %d (%s).\n", type, vas, vaErrorStr(vas));
89 return AVERROR(EIO);
90 }
91 pic->param_buffers[pic->nb_param_buffers++] = buffer;
92
93 av_log(avctx, AV_LOG_DEBUG, "Param buffer (%d) is %#x.\n",
94 type, buffer);
95 return 0;
96 }
97
98 static int vaapi_encode_wait(AVCodecContext *avctx,
99 VAAPIEncodePicture *pic)
100 {
101 VAAPIEncodeContext *ctx = avctx->priv_data;
102 VAStatus vas;
103
104 av_assert0(pic->encode_issued);
105
106 if (pic->encode_complete) {
107 // Already waited for this picture.
108 return 0;
109 }
110
111 av_log(avctx, AV_LOG_DEBUG, "Sync to pic %"PRId64"/%"PRId64" "
112 "(recon surface %#x).\n", pic->display_order,
113 pic->encode_order, pic->recon_surface);
114
115 vas = vaSyncSurface(ctx->hwctx->display, pic->recon_surface);
116 if (vas != VA_STATUS_SUCCESS) {
117 av_log(avctx, AV_LOG_ERROR, "Failed to sync to picture completion: "
118 "%d (%s).\n", vas, vaErrorStr(vas));
119 return AVERROR(EIO);
120 }
121
122 // Input is definitely finished with now.
123 av_frame_free(&pic->input_image);
124
125 pic->encode_complete = 1;
126 return 0;
127 }
128
129 static int vaapi_encode_issue(AVCodecContext *avctx,
130 VAAPIEncodePicture *pic)
131 {
132 VAAPIEncodeContext *ctx = avctx->priv_data;
133 VAAPIEncodeSlice *slice;
134 VAStatus vas;
135 int err, i;
136 char data[MAX_PARAM_BUFFER_SIZE];
137 size_t bit_len;
138
139 av_log(avctx, AV_LOG_DEBUG, "Issuing encode for pic %"PRId64"/%"PRId64" "
140 "as type %s.\n", pic->display_order, pic->encode_order,
141 picture_type_name[pic->type]);
142 if (pic->nb_refs == 0) {
143 av_log(avctx, AV_LOG_DEBUG, "No reference pictures.\n");
144 } else {
145 av_log(avctx, AV_LOG_DEBUG, "Refers to:");
146 for (i = 0; i < pic->nb_refs; i++) {
147 av_log(avctx, AV_LOG_DEBUG, " %"PRId64"/%"PRId64,
148 pic->refs[i]->display_order, pic->refs[i]->encode_order);
149 }
150 av_log(avctx, AV_LOG_DEBUG, ".\n");
151 }
152
153 av_assert0(pic->input_available && !pic->encode_issued);
154 for (i = 0; i < pic->nb_refs; i++) {
155 av_assert0(pic->refs[i]);
156 // If we are serialised then the references must have already
157 // completed. If not, they must have been issued but need not
158 // have completed yet.
159 if (ctx->issue_mode == ISSUE_MODE_SERIALISE_EVERYTHING)
160 av_assert0(pic->refs[i]->encode_complete);
161 else
162 av_assert0(pic->refs[i]->encode_issued);
163 }
164
165 av_log(avctx, AV_LOG_DEBUG, "Input surface is %#x.\n", pic->input_surface);
166
167 pic->recon_image = av_frame_alloc();
168 if (!pic->recon_image) {
169 err = AVERROR(ENOMEM);
170 goto fail;
171 }
172
173 err = av_hwframe_get_buffer(ctx->recon_frames_ref, pic->recon_image, 0);
174 if (err < 0) {
175 err = AVERROR(ENOMEM);
176 goto fail;
177 }
178 pic->recon_surface = (VASurfaceID)(uintptr_t)pic->recon_image->data[3];
179 av_log(avctx, AV_LOG_DEBUG, "Recon surface is %#x.\n", pic->recon_surface);
180
181 vas = vaCreateBuffer(ctx->hwctx->display, ctx->va_context,
182 VAEncCodedBufferType,
183 MAX_OUTPUT_BUFFER_SIZE, 1, 0,
184 &pic->output_buffer);
185 if (vas != VA_STATUS_SUCCESS) {
186 av_log(avctx, AV_LOG_ERROR, "Failed to create bitstream "
187 "output buffer: %d (%s).\n", vas, vaErrorStr(vas));
188 err = AVERROR(ENOMEM);
189 goto fail;
190 }
191 av_log(avctx, AV_LOG_DEBUG, "Output buffer is %#x.\n",
192 pic->output_buffer);
193
194 if (ctx->codec->picture_params_size > 0) {
195 pic->codec_picture_params = av_malloc(ctx->codec->picture_params_size);
196 if (!pic->codec_picture_params)
197 goto fail;
198 memcpy(pic->codec_picture_params, ctx->codec_picture_params,
199 ctx->codec->picture_params_size);
200 } else {
201 av_assert0(!ctx->codec_picture_params);
202 }
203
204 pic->nb_param_buffers = 0;
205
206 if (pic->encode_order == 0) {
207 // Global parameter buffers are set on the first picture only.
208
209 for (i = 0; i < ctx->nb_global_params; i++) {
210 err = vaapi_encode_make_param_buffer(avctx, pic,
211 VAEncMiscParameterBufferType,
212 (char*)ctx->global_params[i],
213 ctx->global_params_size[i]);
214 if (err < 0)
215 goto fail;
216 }
217 }
218
219 if (pic->type == PICTURE_TYPE_IDR && ctx->codec->init_sequence_params) {
220 err = vaapi_encode_make_param_buffer(avctx, pic,
221 VAEncSequenceParameterBufferType,
222 ctx->codec_sequence_params,
223 ctx->codec->sequence_params_size);
224 if (err < 0)
225 goto fail;
226 }
227
228 if (ctx->codec->init_picture_params) {
229 err = ctx->codec->init_picture_params(avctx, pic);
230 if (err < 0) {
231 av_log(avctx, AV_LOG_ERROR, "Failed to initialise picture "
232 "parameters: %d.\n", err);
233 goto fail;
234 }
235 err = vaapi_encode_make_param_buffer(avctx, pic,
236 VAEncPictureParameterBufferType,
237 pic->codec_picture_params,
238 ctx->codec->picture_params_size);
239 if (err < 0)
240 goto fail;
241 }
242
243 if (pic->type == PICTURE_TYPE_IDR) {
244 if (ctx->codec->write_sequence_header) {
245 bit_len = 8 * sizeof(data);
246 err = ctx->codec->write_sequence_header(avctx, data, &bit_len);
247 if (err < 0) {
248 av_log(avctx, AV_LOG_ERROR, "Failed to write per-sequence "
249 "header: %d.\n", err);
250 goto fail;
251 }
252 err = vaapi_encode_make_packed_header(avctx, pic,
253 ctx->codec->sequence_header_type,
254 data, bit_len);
255 if (err < 0)
256 goto fail;
257 }
258 }
259
260 if (ctx->codec->write_picture_header) {
261 bit_len = 8 * sizeof(data);
262 err = ctx->codec->write_picture_header(avctx, pic, data, &bit_len);
263 if (err < 0) {
264 av_log(avctx, AV_LOG_ERROR, "Failed to write per-picture "
265 "header: %d.\n", err);
266 goto fail;
267 }
268 err = vaapi_encode_make_packed_header(avctx, pic,
269 ctx->codec->picture_header_type,
270 data, bit_len);
271 if (err < 0)
272 goto fail;
273 }
274
275 if (ctx->codec->write_extra_buffer) {
276 for (i = 0;; i++) {
277 size_t len = sizeof(data);
278 int type;
279 err = ctx->codec->write_extra_buffer(avctx, pic, i, &type,
280 data, &len);
281 if (err == AVERROR_EOF)
282 break;
283 if (err < 0) {
284 av_log(avctx, AV_LOG_ERROR, "Failed to write extra "
285 "buffer %d: %d.\n", i, err);
286 goto fail;
287 }
288
289 err = vaapi_encode_make_param_buffer(avctx, pic, type,
290 data, len);
291 if (err < 0)
292 goto fail;
293 }
294 }
295
296 av_assert0(pic->nb_slices <= MAX_PICTURE_SLICES);
297 for (i = 0; i < pic->nb_slices; i++) {
298 slice = av_mallocz(sizeof(*slice));
299 if (!slice) {
300 err = AVERROR(ENOMEM);
301 goto fail;
302 }
303 pic->slices[i] = slice;
304
305 if (ctx->codec->slice_params_size > 0) {
306 slice->codec_slice_params = av_mallocz(ctx->codec->slice_params_size);
307 if (!slice->codec_slice_params) {
308 err = AVERROR(ENOMEM);
309 goto fail;
310 }
311 }
312
313 if (ctx->codec->init_slice_params) {
314 err = ctx->codec->init_slice_params(avctx, pic, slice);
315 if (err < 0) {
316 av_log(avctx, AV_LOG_ERROR, "Failed to initalise slice "
317 "parameters: %d.\n", err);
318 goto fail;
319 }
320 }
321
322 if (ctx->codec->write_slice_header) {
323 bit_len = 8 * sizeof(data);
324 err = ctx->codec->write_slice_header(avctx, pic, slice,
325 data, &bit_len);
326 if (err < 0) {
327 av_log(avctx, AV_LOG_ERROR, "Failed to write per-slice "
328 "header: %d.\n", err);
329 goto fail;
330 }
331 err = vaapi_encode_make_packed_header(avctx, pic,
332 ctx->codec->slice_header_type,
333 data, bit_len);
334 if (err < 0)
335 goto fail;
336 }
337
338 if (ctx->codec->init_slice_params) {
339 err = vaapi_encode_make_param_buffer(avctx, pic,
340 VAEncSliceParameterBufferType,
341 slice->codec_slice_params,
342 ctx->codec->slice_params_size);
343 if (err < 0)
344 goto fail;
345 }
346 }
347
348 vas = vaBeginPicture(ctx->hwctx->display, ctx->va_context,
349 pic->input_surface);
350 if (vas != VA_STATUS_SUCCESS) {
351 av_log(avctx, AV_LOG_ERROR, "Failed to begin picture encode issue: "
352 "%d (%s).\n", vas, vaErrorStr(vas));
353 err = AVERROR(EIO);
354 goto fail_with_picture;
355 }
356
357 vas = vaRenderPicture(ctx->hwctx->display, ctx->va_context,
358 pic->param_buffers, pic->nb_param_buffers);
359 if (vas != VA_STATUS_SUCCESS) {
360 av_log(avctx, AV_LOG_ERROR, "Failed to upload encode parameters: "
361 "%d (%s).\n", vas, vaErrorStr(vas));
362 err = AVERROR(EIO);
363 goto fail_with_picture;
364 }
365
366 vas = vaEndPicture(ctx->hwctx->display, ctx->va_context);
367 if (vas != VA_STATUS_SUCCESS) {
368 av_log(avctx, AV_LOG_ERROR, "Failed to end picture encode issue: "
369 "%d (%s).\n", vas, vaErrorStr(vas));
370 err = AVERROR(EIO);
371 goto fail_at_end;
372 }
373
374 pic->encode_issued = 1;
375
376 if (ctx->issue_mode == ISSUE_MODE_SERIALISE_EVERYTHING)
377 return vaapi_encode_wait(avctx, pic);
378 else
379 return 0;
380
381 fail_with_picture:
382 vaEndPicture(ctx->hwctx->display, ctx->va_context);
383 fail:
384 for(i = 0; i < pic->nb_param_buffers; i++)
385 vaDestroyBuffer(ctx->hwctx->display, pic->param_buffers[i]);
386 fail_at_end:
387 av_freep(&pic->codec_picture_params);
388 av_frame_free(&pic->recon_image);
389 return err;
390 }
391
392 static int vaapi_encode_output(AVCodecContext *avctx,
393 VAAPIEncodePicture *pic, AVPacket *pkt)
394 {
395 VAAPIEncodeContext *ctx = avctx->priv_data;
396 VACodedBufferSegment *buf_list, *buf;
397 VAStatus vas;
398 int err;
399
400 err = vaapi_encode_wait(avctx, pic);
401 if (err < 0)
402 return err;
403
404 buf_list = NULL;
405 vas = vaMapBuffer(ctx->hwctx->display, pic->output_buffer,
406 (void**)&buf_list);
407 if (vas != VA_STATUS_SUCCESS) {
408 av_log(avctx, AV_LOG_ERROR, "Failed to map output buffers: "
409 "%d (%s).\n", vas, vaErrorStr(vas));
410 err = AVERROR(EIO);
411 goto fail;
412 }
413
414 for (buf = buf_list; buf; buf = buf->next) {
415 av_log(avctx, AV_LOG_DEBUG, "Output buffer: %u bytes "
416 "(status %08x).\n", buf->size, buf->status);
417
418 err = av_new_packet(pkt, buf->size);
419 if (err < 0)
420 goto fail;
421
422 memcpy(pkt->data, buf->buf, buf->size);
423 }
424
425 if (pic->type == PICTURE_TYPE_IDR)
426 pkt->flags |= AV_PKT_FLAG_KEY;
427
428 pkt->pts = pic->pts;
429
430 vas = vaUnmapBuffer(ctx->hwctx->display, pic->output_buffer);
431 if (vas != VA_STATUS_SUCCESS) {
432 av_log(avctx, AV_LOG_ERROR, "Failed to unmap output buffers: "
433 "%d (%s).\n", vas, vaErrorStr(vas));
434 err = AVERROR(EIO);
435 goto fail;
436 }
437
438 vaDestroyBuffer(ctx->hwctx->display, pic->output_buffer);
439 pic->output_buffer = VA_INVALID_ID;
440
441 av_log(avctx, AV_LOG_DEBUG, "Output read for pic %"PRId64"/%"PRId64".\n",
442 pic->display_order, pic->encode_order);
443 return 0;
444
445 fail:
446 if (pic->output_buffer != VA_INVALID_ID) {
447 vaUnmapBuffer(ctx->hwctx->display, pic->output_buffer);
448 vaDestroyBuffer(ctx->hwctx->display, pic->output_buffer);
449 pic->output_buffer = VA_INVALID_ID;
450 }
451 return err;
452 }
453
454 static int vaapi_encode_discard(AVCodecContext *avctx,
455 VAAPIEncodePicture *pic)
456 {
457 VAAPIEncodeContext *ctx = avctx->priv_data;
458
459 vaapi_encode_wait(avctx, pic);
460
461 if (pic->output_buffer != VA_INVALID_ID) {
462 av_log(avctx, AV_LOG_DEBUG, "Discard output for pic "
463 "%"PRId64"/%"PRId64".\n",
464 pic->display_order, pic->encode_order);
465
466 vaDestroyBuffer(ctx->hwctx->display, pic->output_buffer);
467 pic->output_buffer = VA_INVALID_ID;
468 }
469
470 return 0;
471 }
472
473 static VAAPIEncodePicture *vaapi_encode_alloc(void)
474 {
475 VAAPIEncodePicture *pic;
476
477 pic = av_mallocz(sizeof(*pic));
478 if (!pic)
479 return NULL;
480
481 pic->input_surface = VA_INVALID_ID;
482 pic->recon_surface = VA_INVALID_ID;
483 pic->output_buffer = VA_INVALID_ID;
484
485 return pic;
486 }
487
488 static int vaapi_encode_free(AVCodecContext *avctx,
489 VAAPIEncodePicture *pic)
490 {
491 int i;
492
493 if (pic->encode_issued)
494 vaapi_encode_discard(avctx, pic);
495
496 for (i = 0; i < pic->nb_slices; i++) {
497 av_freep(&pic->slices[i]->priv_data);
498 av_freep(&pic->slices[i]->codec_slice_params);
499 av_freep(&pic->slices[i]);
500 }
501 av_freep(&pic->codec_picture_params);
502
503 av_frame_free(&pic->input_image);
504 av_frame_free(&pic->recon_image);
505
506 // Output buffer should already be destroyed.
507 av_assert0(pic->output_buffer == VA_INVALID_ID);
508
509 av_freep(&pic->priv_data);
510 av_freep(&pic->codec_picture_params);
511
512 av_free(pic);
513
514 return 0;
515 }
516
517 static int vaapi_encode_step(AVCodecContext *avctx,
518 VAAPIEncodePicture *target)
519 {
520 VAAPIEncodeContext *ctx = avctx->priv_data;
521 VAAPIEncodePicture *pic;
522 int i, err;
523
524 if (ctx->issue_mode == ISSUE_MODE_SERIALISE_EVERYTHING ||
525 ctx->issue_mode == ISSUE_MODE_MINIMISE_LATENCY) {
526 // These two modes are equivalent, except that we wait for
527 // immediate completion on each operation if serialised.
528
529 if (!target) {
530 // No target, nothing to do yet.
531 return 0;
532 }
533
534 if (target->encode_complete) {
535 // Already done.
536 return 0;
537 }
538
539 pic = target;
540 for (i = 0; i < pic->nb_refs; i++) {
541 if (!pic->refs[i]->encode_complete) {
542 err = vaapi_encode_step(avctx, pic->refs[i]);
543 if (err < 0)
544 return err;
545 }
546 }
547
548 err = vaapi_encode_issue(avctx, pic);
549 if (err < 0)
550 return err;
551
552 } else if (ctx->issue_mode == ISSUE_MODE_MAXIMISE_THROUGHPUT) {
553 int activity;
554
555 do {
556 activity = 0;
557 for (pic = ctx->pic_start; pic; pic = pic->next) {
558 if (!pic->input_available || pic->encode_issued)
559 continue;
560 for (i = 0; i < pic->nb_refs; i++) {
561 if (!pic->refs[i]->encode_issued)
562 break;
563 }
564 if (i < pic->nb_refs)
565 continue;
566 err = vaapi_encode_issue(avctx, pic);
567 if (err < 0)
568 return err;
569 activity = 1;
570 }
571 } while(activity);
572
573 if (target) {
574 av_assert0(target->encode_issued && "broken dependencies?");
575 }
576
577 } else {
578 av_assert0(0);
579 }
580
581 return 0;
582 }
583
584 static int vaapi_encode_get_next(AVCodecContext *avctx,
585 VAAPIEncodePicture **pic_out)
586 {
587 VAAPIEncodeContext *ctx = avctx->priv_data;
588 VAAPIEncodePicture *start, *end, *pic;
589 int i;
590
591 for (pic = ctx->pic_start; pic; pic = pic->next) {
592 if (pic->next)
593 av_assert0(pic->display_order + 1 == pic->next->display_order);
594 if (pic->display_order == ctx->input_order) {
595 *pic_out = pic;
596 return 0;
597 }
598 }
599
600 if (ctx->input_order == 0) {
601 // First frame is always an IDR frame.
602 av_assert0(!ctx->pic_start && !ctx->pic_end);
603
604 pic = vaapi_encode_alloc();
605 if (!pic)
606 return AVERROR(ENOMEM);
607
608 pic->type = PICTURE_TYPE_IDR;
609 pic->display_order = 0;
610 pic->encode_order = 0;
611
612 ctx->pic_start = ctx->pic_end = pic;
613
614 *pic_out = pic;
615 return 0;
616 }
617
618 pic = vaapi_encode_alloc();
619 if (!pic)
620 return AVERROR(ENOMEM);
621
622 if (ctx->p_per_i == 0 || ctx->p_counter == ctx->p_per_i) {
623 if (ctx->i_per_idr == 0 || ctx->i_counter == ctx->i_per_idr) {
624 pic->type = PICTURE_TYPE_IDR;
625 ctx->i_counter = 0;
626 } else {
627 pic->type = PICTURE_TYPE_I;
628 ++ctx->i_counter;
629 }
630 ctx->p_counter = 0;
631 } else {
632 pic->type = PICTURE_TYPE_P;
633 pic->refs[0] = ctx->pic_end;
634 pic->nb_refs = 1;
635 ++ctx->p_counter;
636 }
637 start = end = pic;
638
639 if (pic->type != PICTURE_TYPE_IDR) {
640 // If that was not an IDR frame, add B-frames display-before and
641 // encode-after it.
642
643 for (i = 0; i < ctx->b_per_p; i++) {
644 pic = vaapi_encode_alloc();
645 if (!pic)
646 goto fail;
647
648 pic->type = PICTURE_TYPE_B;
649 pic->refs[0] = ctx->pic_end;
650 pic->refs[1] = end;
651 pic->nb_refs = 2;
652
653 pic->next = start;
654 pic->display_order = ctx->input_order + ctx->b_per_p - i - 1;
655 pic->encode_order = pic->display_order + 1;
656 start = pic;
657 }
658 }
659
660 for (i = 0, pic = start; pic; i++, pic = pic->next) {
661 pic->display_order = ctx->input_order + i;
662 if (end->type == PICTURE_TYPE_IDR)
663 pic->encode_order = ctx->input_order + i;
664 else if (pic == end)
665 pic->encode_order = ctx->input_order;
666 else
667 pic->encode_order = ctx->input_order + i + 1;
668 }
669
670 av_assert0(ctx->pic_end);
671 ctx->pic_end->next = start;
672 ctx->pic_end = end;
673
674 *pic_out = start;
675
676 av_log(avctx, AV_LOG_DEBUG, "Pictures:");
677 for (pic = ctx->pic_start; pic; pic = pic->next) {
678 av_log(avctx, AV_LOG_DEBUG, " %s (%"PRId64"/%"PRId64")",
679 picture_type_name[pic->type],
680 pic->display_order, pic->encode_order);
681 }
682 av_log(avctx, AV_LOG_DEBUG, "\n");
683
684 return 0;
685
686 fail:
687 while (start) {
688 pic = start->next;
689 vaapi_encode_free(avctx, start);
690 start = pic;
691 }
692 return AVERROR(ENOMEM);
693 }
694
695 static int vaapi_encode_mangle_end(AVCodecContext *avctx)
696 {
697 VAAPIEncodeContext *ctx = avctx->priv_data;
698 VAAPIEncodePicture *pic, *last_pic, *next;
699
700 // Find the last picture we actually have input for.
701 for (pic = ctx->pic_start; pic; pic = pic->next) {
702 if (!pic->input_available)
703 break;
704 last_pic = pic;
705 }
706
707 if (pic) {
708 av_assert0(last_pic);
709
710 if (last_pic->type == PICTURE_TYPE_B) {
711 // Some fixing up is required. Change the type of this
712 // picture to P, then modify preceding B references which
713 // point beyond it to point at it instead.
714
715 last_pic->type = PICTURE_TYPE_P;
716 last_pic->encode_order = last_pic->refs[1]->encode_order;
717
718 for (pic = ctx->pic_start; pic != last_pic; pic = pic->next) {
719 if (pic->type == PICTURE_TYPE_B &&
720 pic->refs[1] == last_pic->refs[1])
721 pic->refs[1] = last_pic;
722 }
723
724 last_pic->nb_refs = 1;
725 last_pic->refs[1] = NULL;
726 } else {
727 // We can use the current structure (no references point
728 // beyond the end), but there are unused pics to discard.
729 }
730
731 // Discard all following pics, they will never be used.
732 for (pic = last_pic->next; pic; pic = next) {
733 next = pic->next;
734 vaapi_encode_free(avctx, pic);
735 }
736
737 last_pic->next = NULL;
738 ctx->pic_end = last_pic;
739
740 } else {
741 // Input is available for all pictures, so we don't need to
742 // mangle anything.
743 }
744
745 av_log(avctx, AV_LOG_DEBUG, "Pictures at end of stream:");
746 for (pic = ctx->pic_start; pic; pic = pic->next) {
747 av_log(avctx, AV_LOG_DEBUG, " %s (%"PRId64"/%"PRId64")",
748 picture_type_name[pic->type],
749 pic->display_order, pic->encode_order);
750 }
751 av_log(avctx, AV_LOG_DEBUG, "\n");
752
753 return 0;
754 }
755
756 static int vaapi_encode_clear_old(AVCodecContext *avctx)
757 {
758 VAAPIEncodeContext *ctx = avctx->priv_data;
759 VAAPIEncodePicture *pic, *old;
760 int i;
761
762 while (ctx->pic_start != ctx->pic_end) {
763 old = ctx->pic_start;
764 if (old->encode_order > ctx->output_order)
765 break;
766
767 for (pic = old->next; pic; pic = pic->next) {
768 if (pic->encode_complete)
769 continue;
770 for (i = 0; i < pic->nb_refs; i++) {
771 if (pic->refs[i] == old) {
772 // We still need this picture because it's referred to
773 // directly by a later one, so it and all following
774 // pictures have to stay.
775 return 0;
776 }
777 }
778 }
779
780 pic = ctx->pic_start;
781 ctx->pic_start = pic->next;
782 vaapi_encode_free(avctx, pic);
783 }
784
785 return 0;
786 }
787
788 int ff_vaapi_encode2(AVCodecContext *avctx, AVPacket *pkt,
789 const AVFrame *input_image, int *got_packet)
790 {
791 VAAPIEncodeContext *ctx = avctx->priv_data;
792 VAAPIEncodePicture *pic;
793 int err;
794
795 if (input_image) {
796 av_log(avctx, AV_LOG_DEBUG, "Encode frame: %ux%u (%"PRId64").\n",
797 input_image->width, input_image->height, input_image->pts);
798
799 err = vaapi_encode_get_next(avctx, &pic);
800 if (err) {
801 av_log(avctx, AV_LOG_ERROR, "Input setup failed: %d.\n", err);
802 return err;
803 }
804
805 pic->input_image = av_frame_alloc();
806 if (!pic->input_image) {
807 err = AVERROR(ENOMEM);
808 goto fail;
809 }
810 err = av_frame_ref(pic->input_image, input_image);
811 if (err < 0)
812 goto fail;
813 pic->input_surface = (VASurfaceID)(uintptr_t)input_image->data[3];
814 pic->pts = input_image->pts;
815
816 if (ctx->input_order == 0)
817 ctx->first_pts = pic->pts;
818 if (ctx->input_order == ctx->decode_delay)
819 ctx->dts_pts_diff = pic->pts - ctx->first_pts;
820 if (ctx->output_delay > 0)
821 ctx->ts_ring[ctx->input_order % (3 * ctx->output_delay)] = pic->pts;
822
823 pic->input_available = 1;
824
825 } else {
826 if (!ctx->end_of_stream) {
827 err = vaapi_encode_mangle_end(avctx);
828 if (err < 0)
829 goto fail;
830 ctx->end_of_stream = 1;
831 }
832 }
833
834 ++ctx->input_order;
835 ++ctx->output_order;
836 av_assert0(ctx->output_order + ctx->output_delay + 1 == ctx->input_order);
837
838 for (pic = ctx->pic_start; pic; pic = pic->next)
839 if (pic->encode_order == ctx->output_order)
840 break;
841
842 // pic can be null here if we don't have a specific target in this
843 // iteration. We might still issue encodes if things can be overlapped,
844 // even though we don't intend to output anything.
845
846 err = vaapi_encode_step(avctx, pic);
847 if (err < 0) {
848 av_log(avctx, AV_LOG_ERROR, "Encode failed: %d.\n", err);
849 goto fail;
850 }
851
852 if (!pic) {
853 *got_packet = 0;
854 } else {
855 err = vaapi_encode_output(avctx, pic, pkt);
856 if (err < 0) {
857 av_log(avctx, AV_LOG_ERROR, "Output failed: %d.\n", err);
858 goto fail;
859 }
860
861 if (ctx->output_delay == 0) {
862 pkt->dts = pkt->pts;
863 } else if (ctx->output_order < ctx->decode_delay) {
864 if (ctx->ts_ring[ctx->output_order] < INT64_MIN + ctx->dts_pts_diff)
865 pkt->dts = INT64_MIN;
866 else
867 pkt->dts = ctx->ts_ring[ctx->output_order] - ctx->dts_pts_diff;
868 } else {
869 pkt->dts = ctx->ts_ring[(ctx->output_order - ctx->decode_delay) %
870 (3 * ctx->output_delay)];
871 }
872
873 *got_packet = 1;
874 }
875
876 err = vaapi_encode_clear_old(avctx);
877 if (err < 0) {
878 av_log(avctx, AV_LOG_ERROR, "List clearing failed: %d.\n", err);
879 goto fail;
880 }
881
882 return 0;
883
884 fail:
885 // Unclear what to clean up on failure. There are probably some things we
886 // could do usefully clean up here, but for now just leave them for uninit()
887 // to do instead.
888 return err;
889 }
890
891 static av_cold int vaapi_encode_check_config(AVCodecContext *avctx)
892 {
893 VAAPIEncodeContext *ctx = avctx->priv_data;
894 VAStatus vas;
895 int i, n, err;
896 VAProfile *profiles = NULL;
897 VAEntrypoint *entrypoints = NULL;
898 VAConfigAttrib attr[] = {
899 { VAConfigAttribRateControl },
900 { VAConfigAttribEncMaxRefFrames },
901 };
902
903 n = vaMaxNumProfiles(ctx->hwctx->display);
904 profiles = av_malloc_array(n, sizeof(VAProfile));
905 if (!profiles) {
906 err = AVERROR(ENOMEM);
907 goto fail;
908 }
909 vas = vaQueryConfigProfiles(ctx->hwctx->display, profiles, &n);
910 if (vas != VA_STATUS_SUCCESS) {
911 av_log(ctx, AV_LOG_ERROR, "Failed to query profiles: %d (%s).\n",
912 vas, vaErrorStr(vas));
913 err = AVERROR(ENOSYS);
914 goto fail;
915 }
916 for (i = 0; i < n; i++) {
917 if (profiles[i] == ctx->va_profile)
918 break;
919 }
920 if (i >= n) {
921 av_log(ctx, AV_LOG_ERROR, "Encoding profile not found (%d).\n",
922 ctx->va_profile);
923 err = AVERROR(ENOSYS);
924 goto fail;
925 }
926
927 n = vaMaxNumEntrypoints(ctx->hwctx->display);
928 entrypoints = av_malloc_array(n, sizeof(VAEntrypoint));
929 if (!entrypoints) {
930 err = AVERROR(ENOMEM);
931 goto fail;
932 }
933 vas = vaQueryConfigEntrypoints(ctx->hwctx->display, ctx->va_profile,
934 entrypoints, &n);
935 if (vas != VA_STATUS_SUCCESS) {
936 av_log(ctx, AV_LOG_ERROR, "Failed to query entrypoints for "
937 "profile %u: %d (%s).\n", ctx->va_profile,
938 vas, vaErrorStr(vas));
939 err = AVERROR(ENOSYS);
940 goto fail;
941 }
942 for (i = 0; i < n; i++) {
943 if (entrypoints[i] == ctx->va_entrypoint)
944 break;
945 }
946 if (i >= n) {
947 av_log(ctx, AV_LOG_ERROR, "Encoding entrypoint not found "
948 "(%d / %d).\n", ctx->va_profile, ctx->va_entrypoint);
949 err = AVERROR(ENOSYS);
950 goto fail;
951 }
952
953 vas = vaGetConfigAttributes(ctx->hwctx->display,
954 ctx->va_profile, ctx->va_entrypoint,
955 attr, FF_ARRAY_ELEMS(attr));
956 if (vas != VA_STATUS_SUCCESS) {
957 av_log(avctx, AV_LOG_ERROR, "Failed to fetch config "
958 "attributes: %d (%s).\n", vas, vaErrorStr(vas));
959 return AVERROR(EINVAL);
960 }
961
962 for (i = 0; i < FF_ARRAY_ELEMS(attr); i++) {
963 if (attr[i].value == VA_ATTRIB_NOT_SUPPORTED) {
964 // Unfortunately we have to treat this as "don't know" and hope
965 // for the best, because the Intel MJPEG encoder returns this
966 // for all the interesting attributes.
967 continue;
968 }
969 switch (attr[i].type) {
970 case VAConfigAttribRateControl:
971 if (!(ctx->va_rc_mode & attr[i].value)) {
972 av_log(avctx, AV_LOG_ERROR, "Rate control mode is not "
973 "supported: %x\n", attr[i].value);
974 err = AVERROR(EINVAL);
975 goto fail;
976 }
977 break;
978 case VAConfigAttribEncMaxRefFrames:
979 {
980 unsigned int ref_l0 = attr[i].value & 0xffff;
981 unsigned int ref_l1 = (attr[i].value >> 16) & 0xffff;
982
983 if (avctx->gop_size > 1 && ref_l0 < 1) {
984 av_log(avctx, AV_LOG_ERROR, "P frames are not "
985 "supported (%x).\n", attr[i].value);
986 err = AVERROR(EINVAL);
987 goto fail;
988 }
989 if (avctx->max_b_frames > 0 && ref_l1 < 1) {
990 av_log(avctx, AV_LOG_ERROR, "B frames are not "
991 "supported (%x).\n", attr[i].value);
992 err = AVERROR(EINVAL);
993 goto fail;
994 }
995 }
996 break;
997 }
998 }
999
1000 err = 0;
1001 fail:
1002 av_freep(&profiles);
1003 av_freep(&entrypoints);
1004 return err;
1005 }
1006
1007 av_cold int ff_vaapi_encode_init(AVCodecContext *avctx,
1008 const VAAPIEncodeType *type)
1009 {
1010 VAAPIEncodeContext *ctx = avctx->priv_data;
1011 AVVAAPIFramesContext *recon_hwctx = NULL;
1012 AVVAAPIHWConfig *hwconfig = NULL;
1013 AVHWFramesConstraints *constraints = NULL;
1014 enum AVPixelFormat recon_format;
1015 VAStatus vas;
1016 int err, i;
1017
1018 if (!avctx->hw_frames_ctx) {
1019 av_log(avctx, AV_LOG_ERROR, "A hardware frames reference is "
1020 "required to associate the encoding device.\n");
1021 return AVERROR(EINVAL);
1022 }
1023
1024 ctx->codec = type;
1025 ctx->codec_options = ctx->codec_options_data;
1026
1027 ctx->va_config = VA_INVALID_ID;
1028 ctx->va_context = VA_INVALID_ID;
1029
1030 ctx->priv_data = av_mallocz(type->priv_data_size);
1031 if (!ctx->priv_data) {
1032 err = AVERROR(ENOMEM);
1033 goto fail;
1034 }
1035
1036 ctx->input_frames_ref = av_buffer_ref(avctx->hw_frames_ctx);
1037 if (!ctx->input_frames_ref) {
1038 err = AVERROR(ENOMEM);
1039 goto fail;
1040 }
1041 ctx->input_frames = (AVHWFramesContext*)ctx->input_frames_ref->data;
1042
1043 ctx->device_ref = av_buffer_ref(ctx->input_frames->device_ref);
1044 if (!ctx->device_ref) {
1045 err = AVERROR(ENOMEM);
1046 goto fail;
1047 }
1048 ctx->device = (AVHWDeviceContext*)ctx->device_ref->data;
1049 ctx->hwctx = ctx->device->hwctx;
1050
1051 err = ctx->codec->init(avctx);
1052 if (err < 0)
1053 goto fail;
1054
1055 err = vaapi_encode_check_config(avctx);
1056 if (err < 0)
1057 goto fail;
1058
1059 vas = vaCreateConfig(ctx->hwctx->display,
1060 ctx->va_profile, ctx->va_entrypoint,
1061 ctx->config_attributes, ctx->nb_config_attributes,
1062 &ctx->va_config);
1063 if (vas != VA_STATUS_SUCCESS) {
1064 av_log(avctx, AV_LOG_ERROR, "Failed to create encode pipeline "
1065 "configuration: %d (%s).\n", vas, vaErrorStr(vas));
1066 err = AVERROR(EIO);
1067 goto fail;
1068 }
1069
1070 hwconfig = av_hwdevice_hwconfig_alloc(ctx->device_ref);
1071 if (!hwconfig) {
1072 err = AVERROR(ENOMEM);
1073 goto fail;
1074 }
1075 hwconfig->config_id = ctx->va_config;
1076
1077 constraints = av_hwdevice_get_hwframe_constraints(ctx->device_ref,
1078 hwconfig);
1079 if (!constraints) {
1080 err = AVERROR(ENOMEM);
1081 goto fail;
1082 }
1083
1084 // Probably we can use the input surface format as the surface format
1085 // of the reconstructed frames. If not, we just pick the first (only?)
1086 // format in the valid list and hope that it all works.
1087 recon_format = AV_PIX_FMT_NONE;
1088 if (constraints->valid_sw_formats) {
1089 for (i = 0; constraints->valid_sw_formats[i] != AV_PIX_FMT_NONE; i++) {
1090 if (ctx->input_frames->sw_format ==
1091 constraints->valid_sw_formats[i]) {
1092 recon_format = ctx->input_frames->sw_format;
1093 break;
1094 }
1095 }
1096 if (recon_format == AV_PIX_FMT_NONE)
1097 recon_format = constraints->valid_sw_formats[i];
1098 } else {
1099 // No idea what to use; copy input format.
1100 recon_format = ctx->input_frames->sw_format;
1101 }
1102 av_log(avctx, AV_LOG_DEBUG, "Using %s as format of "
1103 "reconstructed frames.\n", av_get_pix_fmt_name(recon_format));
1104
1105 if (ctx->aligned_width < constraints->min_width ||
1106 ctx->aligned_height < constraints->min_height ||
1107 ctx->aligned_width > constraints->max_width ||
1108 ctx->aligned_height > constraints->max_height) {
1109 av_log(avctx, AV_LOG_ERROR, "Hardware does not support encoding at "
1110 "size %dx%d (constraints: width %d-%d height %d-%d).\n",
1111 ctx->aligned_width, ctx->aligned_height,
1112 constraints->min_width, constraints->max_width,
1113 constraints->min_height, constraints->max_height);
1114 err = AVERROR(EINVAL);
1115 goto fail;
1116 }
1117
1118 av_freep(&hwconfig);
1119 av_hwframe_constraints_free(&constraints);
1120
1121 ctx->recon_frames_ref = av_hwframe_ctx_alloc(ctx->device_ref);
1122 if (!ctx->recon_frames_ref) {
1123 err = AVERROR(ENOMEM);
1124 goto fail;
1125 }
1126 ctx->recon_frames = (AVHWFramesContext*)ctx->recon_frames_ref->data;
1127
1128 ctx->recon_frames->format = AV_PIX_FMT_VAAPI;
1129 ctx->recon_frames->sw_format = recon_format;
1130 ctx->recon_frames->width = ctx->aligned_width;
1131 ctx->recon_frames->height = ctx->aligned_height;
1132 ctx->recon_frames->initial_pool_size = ctx->nb_recon_frames;
1133
1134 err = av_hwframe_ctx_init(ctx->recon_frames_ref);
1135 if (err < 0) {
1136 av_log(avctx, AV_LOG_ERROR, "Failed to initialise reconstructed "
1137 "frame context: %d.\n", err);
1138 goto fail;
1139 }
1140 recon_hwctx = ctx->recon_frames->hwctx;
1141
1142 vas = vaCreateContext(ctx->hwctx->display, ctx->va_config,
1143 ctx->aligned_width, ctx->aligned_height,
1144 VA_PROGRESSIVE,
1145 recon_hwctx->surface_ids,
1146 recon_hwctx->nb_surfaces,
1147 &ctx->va_context);
1148 if (vas != VA_STATUS_SUCCESS) {
1149 av_log(avctx, AV_LOG_ERROR, "Failed to create encode pipeline "
1150 "context: %d (%s).\n", vas, vaErrorStr(vas));
1151 err = AVERROR(EIO);
1152 goto fail;
1153 }
1154
1155 ctx->input_order = 0;
1156 ctx->output_delay = avctx->max_b_frames;
1157 ctx->decode_delay = 1;
1158 ctx->output_order = - ctx->output_delay - 1;
1159
1160 if (ctx->codec->sequence_params_size > 0) {
1161 ctx->codec_sequence_params =
1162 av_mallocz(ctx->codec->sequence_params_size);
1163 if (!ctx->codec_sequence_params) {
1164 err = AVERROR(ENOMEM);
1165 goto fail;
1166 }
1167 }
1168 if (ctx->codec->picture_params_size > 0) {
1169 ctx->codec_picture_params =
1170 av_mallocz(ctx->codec->picture_params_size);
1171 if (!ctx->codec_picture_params) {
1172 err = AVERROR(ENOMEM);
1173 goto fail;
1174 }
1175 }
1176
1177 if (ctx->codec->init_sequence_params) {
1178 err = ctx->codec->init_sequence_params(avctx);
1179 if (err < 0) {
1180 av_log(avctx, AV_LOG_ERROR, "Codec sequence initialisation "
1181 "failed: %d.\n", err);
1182 goto fail;
1183 }
1184 }
1185
1186 // All I are IDR for now.
1187 ctx->i_per_idr = 0;
1188 ctx->p_per_i = ((avctx->gop_size + avctx->max_b_frames) /
1189 (avctx->max_b_frames + 1));
1190 ctx->b_per_p = avctx->max_b_frames;
1191
1192 // This should be configurable somehow. (Needs testing on a machine
1193 // where it actually overlaps properly, though.)
1194 ctx->issue_mode = ISSUE_MODE_MAXIMISE_THROUGHPUT;
1195
1196 return 0;
1197
1198 fail:
1199 av_freep(&hwconfig);
1200 av_hwframe_constraints_free(&constraints);
1201 ff_vaapi_encode_close(avctx);
1202 return err;
1203 }
1204
1205 av_cold int ff_vaapi_encode_close(AVCodecContext *avctx)
1206 {
1207 VAAPIEncodeContext *ctx = avctx->priv_data;
1208 VAAPIEncodePicture *pic, *next;
1209
1210 for (pic = ctx->pic_start; pic; pic = next) {
1211 next = pic->next;
1212 vaapi_encode_free(avctx, pic);
1213 }
1214
1215 if (ctx->va_context != VA_INVALID_ID) {
1216 vaDestroyContext(ctx->hwctx->display, ctx->va_context);
1217 ctx->va_context = VA_INVALID_ID;
1218 }
1219
1220 if (ctx->va_config != VA_INVALID_ID) {
1221 vaDestroyConfig(ctx->hwctx->display, ctx->va_config);
1222 ctx->va_config = VA_INVALID_ID;
1223 }
1224
1225 if (ctx->codec->close)
1226 ctx->codec->close(avctx);
1227
1228 av_freep(&ctx->codec_sequence_params);
1229 av_freep(&ctx->codec_picture_params);
1230
1231 av_buffer_unref(&ctx->recon_frames_ref);
1232 av_buffer_unref(&ctx->input_frames_ref);
1233 av_buffer_unref(&ctx->device_ref);
1234
1235 av_freep(&ctx->priv_data);
1236
1237 return 0;
1238 }