4a33adea08903749680a1fb6baf32674352e48e3
[ffmpeg.git] / libavcodec / qsvenc.c
1 /*
2  * Intel MediaSDK QSV encoder utility functions
3  *
4  * copyright (c) 2013 Yukinori Yamazoe
5  * copyright (c) 2015 Anton Khirnov
6  *
7  * This file is part of Libav.
8  *
9  * Libav is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * Libav is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with Libav; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22  */
23
24 #include <string.h>
25 #include <sys/types.h>
26 #include <mfx/mfxvideo.h>
27
28 #include "libavutil/common.h"
29 #include "libavutil/mem.h"
30 #include "libavutil/log.h"
31 #include "libavutil/time.h"
32 #include "libavutil/imgutils.h"
33
34 #include "avcodec.h"
35 #include "internal.h"
36 #include "qsv.h"
37 #include "qsv_internal.h"
38 #include "qsvenc.h"
39
40 static const struct {
41     mfxU16 profile;
42     const char *name;
43 } profile_names[] = {
44     { MFX_PROFILE_AVC_BASELINE,                 "baseline"              },
45     { MFX_PROFILE_AVC_MAIN,                     "main"                  },
46     { MFX_PROFILE_AVC_EXTENDED,                 "extended"              },
47     { MFX_PROFILE_AVC_HIGH,                     "high"                  },
48 #if QSV_VERSION_ATLEAST(1, 15)
49     { MFX_PROFILE_AVC_HIGH_422,                 "high 422"              },
50 #endif
51 #if QSV_VERSION_ATLEAST(1, 4)
52     { MFX_PROFILE_AVC_CONSTRAINED_BASELINE,     "constrained baseline"  },
53     { MFX_PROFILE_AVC_CONSTRAINED_HIGH,         "constrained high"      },
54     { MFX_PROFILE_AVC_PROGRESSIVE_HIGH,         "progressive high"      },
55 #endif
56     { MFX_PROFILE_MPEG2_SIMPLE,                 "simple"                },
57     { MFX_PROFILE_MPEG2_MAIN,                   "main"                  },
58     { MFX_PROFILE_MPEG2_HIGH,                   "high"                  },
59     { MFX_PROFILE_VC1_SIMPLE,                   "simple"                },
60     { MFX_PROFILE_VC1_MAIN,                     "main"                  },
61     { MFX_PROFILE_VC1_ADVANCED,                 "advanced"              },
62 #if QSV_VERSION_ATLEAST(1, 8)
63     { MFX_PROFILE_HEVC_MAIN,                    "main"                  },
64     { MFX_PROFILE_HEVC_MAIN10,                  "main10"                },
65     { MFX_PROFILE_HEVC_MAINSP,                  "mainsp"                },
66 #endif
67 };
68
69 static const char *print_profile(mfxU16 profile)
70 {
71     int i;
72     for (i = 0; i < FF_ARRAY_ELEMS(profile_names); i++)
73         if (profile == profile_names[i].profile)
74             return profile_names[i].name;
75     return "unknown";
76 }
77
78 static const struct {
79     mfxU16      rc_mode;
80     const char *name;
81 } rc_names[] = {
82     { MFX_RATECONTROL_CBR,     "CBR" },
83     { MFX_RATECONTROL_VBR,     "VBR" },
84     { MFX_RATECONTROL_CQP,     "CQP" },
85     { MFX_RATECONTROL_AVBR,    "AVBR" },
86 #if QSV_HAVE_LA
87     { MFX_RATECONTROL_LA,      "LA" },
88 #endif
89 #if QSV_HAVE_ICQ
90     { MFX_RATECONTROL_ICQ,     "ICQ" },
91     { MFX_RATECONTROL_LA_ICQ,  "LA_ICQ" },
92 #endif
93 #if QSV_HAVE_VCM
94     { MFX_RATECONTROL_VCM,     "VCM" },
95 #endif
96 #if QSV_VERSION_ATLEAST(1, 10)
97     { MFX_RATECONTROL_LA_EXT,  "LA_EXT" },
98 #endif
99 #if QSV_HAVE_LA_HRD
100     { MFX_RATECONTROL_LA_HRD,  "LA_HRD" },
101 #endif
102 #if QSV_HAVE_QVBR
103     { MFX_RATECONTROL_QVBR,    "QVBR" },
104 #endif
105 };
106
107 static const char *print_ratecontrol(mfxU16 rc_mode)
108 {
109     int i;
110     for (i = 0; i < FF_ARRAY_ELEMS(rc_names); i++)
111         if (rc_mode == rc_names[i].rc_mode)
112             return rc_names[i].name;
113     return "unknown";
114 }
115
116 static const char *print_threestate(mfxU16 val)
117 {
118     if (val == MFX_CODINGOPTION_ON)
119         return "ON";
120     else if (val == MFX_CODINGOPTION_OFF)
121         return "OFF";
122     return "unknown";
123 }
124
125 static void dump_video_param(AVCodecContext *avctx, QSVEncContext *q,
126                              mfxExtBuffer **coding_opts)
127 {
128     mfxInfoMFX *info = &q->param.mfx;
129
130     mfxExtCodingOption   *co = (mfxExtCodingOption*)coding_opts[0];
131 #if QSV_HAVE_CO2
132     mfxExtCodingOption2 *co2 = (mfxExtCodingOption2*)coding_opts[1];
133 #endif
134 #if QSV_HAVE_CO3
135     mfxExtCodingOption3 *co3 = (mfxExtCodingOption3*)coding_opts[2];
136 #endif
137
138     av_log(avctx, AV_LOG_VERBOSE, "profile: %s; level: %"PRIu16"\n",
139            print_profile(info->CodecProfile), info->CodecLevel);
140
141     av_log(avctx, AV_LOG_VERBOSE, "GopPicSize: %"PRIu16"; GopRefDist: %"PRIu16"; GopOptFlag: ",
142            info->GopPicSize, info->GopRefDist);
143     if (info->GopOptFlag & MFX_GOP_CLOSED)
144         av_log(avctx, AV_LOG_VERBOSE, "closed ");
145     if (info->GopOptFlag & MFX_GOP_STRICT)
146         av_log(avctx, AV_LOG_VERBOSE, "strict ");
147     av_log(avctx, AV_LOG_VERBOSE, "; IdrInterval: %"PRIu16"\n", info->IdrInterval);
148
149     av_log(avctx, AV_LOG_VERBOSE, "TargetUsage: %"PRIu16"; RateControlMethod: %s\n",
150            info->TargetUsage, print_ratecontrol(info->RateControlMethod));
151
152     if (info->RateControlMethod == MFX_RATECONTROL_CBR ||
153         info->RateControlMethod == MFX_RATECONTROL_VBR
154 #if QSV_HAVE_VCM
155         || info->RateControlMethod == MFX_RATECONTROL_VCM
156 #endif
157         ) {
158         av_log(avctx, AV_LOG_VERBOSE,
159                "InitialDelayInKB: %"PRIu16"; TargetKbps: %"PRIu16"; MaxKbps: %"PRIu16"\n",
160                info->InitialDelayInKB, info->TargetKbps, info->MaxKbps);
161     } else if (info->RateControlMethod == MFX_RATECONTROL_CQP) {
162         av_log(avctx, AV_LOG_VERBOSE, "QPI: %"PRIu16"; QPP: %"PRIu16"; QPB: %"PRIu16"\n",
163                info->QPI, info->QPP, info->QPB);
164     } else if (info->RateControlMethod == MFX_RATECONTROL_AVBR) {
165         av_log(avctx, AV_LOG_VERBOSE,
166                "TargetKbps: %"PRIu16"; Accuracy: %"PRIu16"; Convergence: %"PRIu16"\n",
167                info->TargetKbps, info->Accuracy, info->Convergence);
168     }
169 #if QSV_HAVE_LA
170     else if (info->RateControlMethod == MFX_RATECONTROL_LA
171 #if QSV_HAVE_LA_HRD
172              || info->RateControlMethod == MFX_RATECONTROL_LA_HRD
173 #endif
174              ) {
175         av_log(avctx, AV_LOG_VERBOSE,
176                "TargetKbps: %"PRIu16"; LookAheadDepth: %"PRIu16"\n",
177                info->TargetKbps, co2->LookAheadDepth);
178     }
179 #endif
180 #if QSV_HAVE_ICQ
181     else if (info->RateControlMethod == MFX_RATECONTROL_ICQ) {
182         av_log(avctx, AV_LOG_VERBOSE, "ICQQuality: %"PRIu16"\n", info->ICQQuality);
183     } else if (info->RateControlMethod == MFX_RATECONTROL_LA_ICQ) {
184         av_log(avctx, AV_LOG_VERBOSE, "ICQQuality: %"PRIu16"; LookAheadDepth: %"PRIu16"\n",
185                info->ICQQuality, co2->LookAheadDepth);
186     }
187 #endif
188 #if QSV_HAVE_QVBR
189     else if (info->RateControlMethod == MFX_RATECONTROL_QVBR) {
190         av_log(avctx, AV_LOG_VERBOSE, "QVBRQuality: %"PRIu16"\n",
191                co3->QVBRQuality);
192     }
193 #endif
194
195     av_log(avctx, AV_LOG_VERBOSE, "NumSlice: %"PRIu16"; NumRefFrame: %"PRIu16"\n",
196            info->NumSlice, info->NumRefFrame);
197     av_log(avctx, AV_LOG_VERBOSE, "RateDistortionOpt: %s\n",
198            print_threestate(co->RateDistortionOpt));
199
200 #if QSV_HAVE_CO2
201     av_log(avctx, AV_LOG_VERBOSE,
202            "RecoveryPointSEI: %s IntRefType: %"PRIu16"; IntRefCycleSize: %"PRIu16"; IntRefQPDelta: %"PRId16"\n",
203            print_threestate(co->RecoveryPointSEI), co2->IntRefType, co2->IntRefCycleSize, co2->IntRefQPDelta);
204
205     av_log(avctx, AV_LOG_VERBOSE, "MaxFrameSize: %"PRIu16"; ", co2->MaxFrameSize);
206 #if QSV_HAVE_MAX_SLICE_SIZE
207     av_log(avctx, AV_LOG_VERBOSE, "MaxSliceSize: %"PRIu16"; ", co2->MaxSliceSize);
208 #endif
209     av_log(avctx, AV_LOG_VERBOSE, "\n");
210
211     av_log(avctx, AV_LOG_VERBOSE,
212            "BitrateLimit: %s; MBBRC: %s; ExtBRC: %s\n",
213            print_threestate(co2->BitrateLimit), print_threestate(co2->MBBRC),
214            print_threestate(co2->ExtBRC));
215
216 #if QSV_HAVE_TRELLIS
217     av_log(avctx, AV_LOG_VERBOSE, "Trellis: ");
218     if (co2->Trellis & MFX_TRELLIS_OFF) {
219         av_log(avctx, AV_LOG_VERBOSE, "off");
220     } else if (!co2->Trellis) {
221         av_log(avctx, AV_LOG_VERBOSE, "auto");
222     } else {
223         if (co2->Trellis & MFX_TRELLIS_I) av_log(avctx, AV_LOG_VERBOSE, "I");
224         if (co2->Trellis & MFX_TRELLIS_P) av_log(avctx, AV_LOG_VERBOSE, "P");
225         if (co2->Trellis & MFX_TRELLIS_B) av_log(avctx, AV_LOG_VERBOSE, "B");
226     }
227     av_log(avctx, AV_LOG_VERBOSE, "\n");
228 #endif
229
230 #if QSV_VERSION_ATLEAST(1, 8)
231     av_log(avctx, AV_LOG_VERBOSE,
232            "RepeatPPS: %s; NumMbPerSlice: %"PRIu16"; LookAheadDS: ",
233            print_threestate(co2->RepeatPPS), co2->NumMbPerSlice);
234     switch (co2->LookAheadDS) {
235     case MFX_LOOKAHEAD_DS_OFF: av_log(avctx, AV_LOG_VERBOSE, "off");     break;
236     case MFX_LOOKAHEAD_DS_2x:  av_log(avctx, AV_LOG_VERBOSE, "2x");      break;
237     case MFX_LOOKAHEAD_DS_4x:  av_log(avctx, AV_LOG_VERBOSE, "4x");      break;
238     default:                   av_log(avctx, AV_LOG_VERBOSE, "unknown"); break;
239     }
240     av_log(avctx, AV_LOG_VERBOSE, "\n");
241
242     av_log(avctx, AV_LOG_VERBOSE, "AdaptiveI: %s; AdaptiveB: %s; BRefType: ",
243            print_threestate(co2->AdaptiveI), print_threestate(co2->AdaptiveB));
244     switch (co2->BRefType) {
245     case MFX_B_REF_OFF:     av_log(avctx, AV_LOG_VERBOSE, "off");       break;
246     case MFX_B_REF_PYRAMID: av_log(avctx, AV_LOG_VERBOSE, "pyramid");   break;
247     default:                av_log(avctx, AV_LOG_VERBOSE, "auto");      break;
248     }
249     av_log(avctx, AV_LOG_VERBOSE, "\n");
250 #endif
251
252 #if QSV_VERSION_ATLEAST(1, 9)
253     av_log(avctx, AV_LOG_VERBOSE,
254            "MinQPI: %"PRIu8"; MaxQPI: %"PRIu8"; MinQPP: %"PRIu8"; MaxQPP: %"PRIu8"; MinQPB: %"PRIu8"; MaxQPB: %"PRIu8"\n",
255            co2->MinQPI, co2->MaxQPI, co2->MinQPP, co2->MaxQPP, co2->MinQPB, co2->MaxQPB);
256 #endif
257 #endif
258
259     if (avctx->codec_id == AV_CODEC_ID_H264) {
260         av_log(avctx, AV_LOG_VERBOSE, "Entropy coding: %s; MaxDecFrameBuffering: %"PRIu16"\n",
261                co->CAVLC == MFX_CODINGOPTION_ON ? "CAVLC" : "CABAC", co->MaxDecFrameBuffering);
262         av_log(avctx, AV_LOG_VERBOSE,
263                "NalHrdConformance: %s; SingleSeiNalUnit: %s; VuiVclHrdParameters: %s VuiNalHrdParameters: %s\n",
264                print_threestate(co->NalHrdConformance), print_threestate(co->SingleSeiNalUnit),
265                print_threestate(co->VuiVclHrdParameters), print_threestate(co->VuiNalHrdParameters));
266     }
267 }
268
269 static int select_rc_mode(AVCodecContext *avctx, QSVEncContext *q)
270 {
271     const char *rc_desc;
272     mfxU16      rc_mode;
273
274     int want_la     = q->la_depth >= 0;
275     int want_qscale = !!(avctx->flags & AV_CODEC_FLAG_QSCALE);
276     int want_vcm    = q->vcm;
277
278     if (want_la && !QSV_HAVE_LA) {
279         av_log(avctx, AV_LOG_ERROR,
280                "Lookahead ratecontrol mode requested, but is not supported by this SDK version\n");
281         return AVERROR(ENOSYS);
282     }
283     if (want_vcm && !QSV_HAVE_VCM) {
284         av_log(avctx, AV_LOG_ERROR,
285                "VCM ratecontrol mode requested, but is not supported by this SDK version\n");
286         return AVERROR(ENOSYS);
287     }
288
289     if (want_la + want_qscale + want_vcm > 1) {
290         av_log(avctx, AV_LOG_ERROR,
291                "More than one of: { constant qscale, lookahead, VCM } requested, "
292                "only one of them can be used at a time.\n");
293         return AVERROR(EINVAL);
294     }
295
296     if (want_qscale) {
297         rc_mode = MFX_RATECONTROL_CQP;
298         rc_desc = "constant quantization parameter (CQP)";
299     }
300 #if QSV_HAVE_VCM
301     else if (want_vcm) {
302         rc_mode = MFX_RATECONTROL_VCM;
303         rc_desc = "video conferencing mode (VCM)";
304     }
305 #endif
306 #if QSV_HAVE_LA
307     else if (want_la) {
308         rc_mode = MFX_RATECONTROL_LA;
309         rc_desc = "VBR with lookahead (LA)";
310
311 #if QSV_HAVE_ICQ
312         if (avctx->global_quality > 0) {
313             rc_mode = MFX_RATECONTROL_LA_ICQ;
314             rc_desc = "intelligent constant quality with lookahead (LA_ICQ)";
315         }
316 #endif
317     }
318 #endif
319 #if QSV_HAVE_ICQ
320     else if (avctx->global_quality > 0) {
321         rc_mode = MFX_RATECONTROL_ICQ;
322         rc_desc = "intelligent constant quality (ICQ)";
323     }
324 #endif
325     else if (avctx->rc_max_rate == avctx->bit_rate) {
326         rc_mode = MFX_RATECONTROL_CBR;
327         rc_desc = "constant bitrate (CBR)";
328     } else if (!avctx->rc_max_rate) {
329         rc_mode = MFX_RATECONTROL_AVBR;
330         rc_desc = "average variable bitrate (AVBR)";
331     } else {
332         rc_mode = MFX_RATECONTROL_VBR;
333         rc_desc = "variable bitrate (VBR)";
334     }
335
336     q->param.mfx.RateControlMethod = rc_mode;
337     av_log(avctx, AV_LOG_VERBOSE, "Using the %s ratecontrol method\n", rc_desc);
338
339     return 0;
340 }
341
342 static int rc_supported(QSVEncContext *q)
343 {
344     mfxVideoParam param_out = { .mfx.CodecId = q->param.mfx.CodecId };
345     mfxStatus ret;
346
347     ret = MFXVideoENCODE_Query(q->session, &q->param, &param_out);
348     if (ret < 0 ||
349         param_out.mfx.RateControlMethod != q->param.mfx.RateControlMethod)
350         return 0;
351     return 1;
352 }
353
354 static int init_video_param(AVCodecContext *avctx, QSVEncContext *q)
355 {
356     float quant;
357     int ret;
358
359     ret = ff_qsv_codec_id_to_mfx(avctx->codec_id);
360     if (ret < 0)
361         return AVERROR_BUG;
362     q->param.mfx.CodecId = ret;
363
364     q->width_align = avctx->codec_id == AV_CODEC_ID_HEVC ? 32 : 16;
365
366     if (avctx->level > 0)
367         q->param.mfx.CodecLevel = avctx->level;
368
369     q->param.mfx.CodecProfile       = q->profile;
370     q->param.mfx.TargetUsage        = q->preset;
371     q->param.mfx.GopPicSize         = FFMAX(0, avctx->gop_size);
372     q->param.mfx.GopRefDist         = FFMAX(-1, avctx->max_b_frames) + 1;
373     q->param.mfx.GopOptFlag         = avctx->flags & AV_CODEC_FLAG_CLOSED_GOP ?
374                                       MFX_GOP_CLOSED : 0;
375     q->param.mfx.IdrInterval        = q->idr_interval;
376     q->param.mfx.NumSlice           = avctx->slices;
377     q->param.mfx.NumRefFrame        = FFMAX(0, avctx->refs);
378     q->param.mfx.EncodedOrder       = 0;
379     q->param.mfx.BufferSizeInKB     = 0;
380
381     q->param.mfx.FrameInfo.FourCC         = MFX_FOURCC_NV12;
382     q->param.mfx.FrameInfo.Width          = FFALIGN(avctx->width, q->width_align);
383     q->param.mfx.FrameInfo.Height         = FFALIGN(avctx->height, 32);
384     q->param.mfx.FrameInfo.CropX          = 0;
385     q->param.mfx.FrameInfo.CropY          = 0;
386     q->param.mfx.FrameInfo.CropW          = avctx->width;
387     q->param.mfx.FrameInfo.CropH          = avctx->height;
388     q->param.mfx.FrameInfo.AspectRatioW   = avctx->sample_aspect_ratio.num;
389     q->param.mfx.FrameInfo.AspectRatioH   = avctx->sample_aspect_ratio.den;
390     q->param.mfx.FrameInfo.PicStruct      = MFX_PICSTRUCT_PROGRESSIVE;
391     q->param.mfx.FrameInfo.ChromaFormat   = MFX_CHROMAFORMAT_YUV420;
392     q->param.mfx.FrameInfo.BitDepthLuma   = 8;
393     q->param.mfx.FrameInfo.BitDepthChroma = 8;
394
395     if (avctx->framerate.den > 0 && avctx->framerate.num > 0) {
396         q->param.mfx.FrameInfo.FrameRateExtN = avctx->framerate.num;
397         q->param.mfx.FrameInfo.FrameRateExtD = avctx->framerate.den;
398     } else {
399         q->param.mfx.FrameInfo.FrameRateExtN  = avctx->time_base.den;
400         q->param.mfx.FrameInfo.FrameRateExtD  = avctx->time_base.num;
401     }
402
403     ret = select_rc_mode(avctx, q);
404     if (ret < 0)
405         return ret;
406
407     switch (q->param.mfx.RateControlMethod) {
408     case MFX_RATECONTROL_CBR:
409     case MFX_RATECONTROL_VBR:
410 #if QSV_HAVE_VCM
411     case MFX_RATECONTROL_VCM:
412 #endif
413         q->param.mfx.InitialDelayInKB = avctx->rc_initial_buffer_occupancy / 1000;
414         q->param.mfx.TargetKbps       = avctx->bit_rate / 1000;
415         q->param.mfx.MaxKbps          = avctx->rc_max_rate / 1000;
416         break;
417     case MFX_RATECONTROL_CQP:
418         quant = avctx->global_quality / FF_QP2LAMBDA;
419
420         q->param.mfx.QPI = av_clip(quant * fabs(avctx->i_quant_factor) + avctx->i_quant_offset, 0, 51);
421         q->param.mfx.QPP = av_clip(quant, 0, 51);
422         q->param.mfx.QPB = av_clip(quant * fabs(avctx->b_quant_factor) + avctx->b_quant_offset, 0, 51);
423
424         break;
425     case MFX_RATECONTROL_AVBR:
426         q->param.mfx.TargetKbps  = avctx->bit_rate / 1000;
427         q->param.mfx.Convergence = q->avbr_convergence;
428         q->param.mfx.Accuracy    = q->avbr_accuracy;
429         break;
430 #if QSV_HAVE_LA
431     case MFX_RATECONTROL_LA:
432         q->param.mfx.TargetKbps  = avctx->bit_rate / 1000;
433         q->extco2.LookAheadDepth = q->la_depth;
434         break;
435 #if QSV_HAVE_ICQ
436     case MFX_RATECONTROL_LA_ICQ:
437         q->extco2.LookAheadDepth = q->la_depth;
438     case MFX_RATECONTROL_ICQ:
439         q->param.mfx.ICQQuality  = avctx->global_quality;
440         break;
441 #endif
442 #endif
443     }
444
445     // the HEVC encoder plugin currently fails if coding options
446     // are provided
447     if (avctx->codec_id != AV_CODEC_ID_HEVC) {
448         q->extco.Header.BufferId      = MFX_EXTBUFF_CODING_OPTION;
449         q->extco.Header.BufferSz      = sizeof(q->extco);
450         q->extco.CAVLC                = avctx->coder_type == FF_CODER_TYPE_VLC ?
451                                         MFX_CODINGOPTION_ON : MFX_CODINGOPTION_UNKNOWN;
452
453         if (q->rdo >= 0)
454             q->extco.RateDistortionOpt = q->rdo > 0 ? MFX_CODINGOPTION_ON : MFX_CODINGOPTION_OFF;
455
456         if (avctx->codec_id == AV_CODEC_ID_H264) {
457             if (avctx->strict_std_compliance != FF_COMPLIANCE_NORMAL)
458                 q->extco.NalHrdConformance = avctx->strict_std_compliance > FF_COMPLIANCE_NORMAL ?
459                                              MFX_CODINGOPTION_ON : MFX_CODINGOPTION_OFF;
460
461             if (q->single_sei_nal_unit >= 0)
462                 q->extco.SingleSeiNalUnit = q->single_sei_nal_unit ? MFX_CODINGOPTION_ON : MFX_CODINGOPTION_OFF;
463             if (q->recovery_point_sei >= 0)
464                 q->extco.RecoveryPointSEI = q->recovery_point_sei ? MFX_CODINGOPTION_ON : MFX_CODINGOPTION_OFF;
465             q->extco.MaxDecFrameBuffering = q->max_dec_frame_buffering;
466         }
467
468         q->extparam_internal[q->nb_extparam_internal++] = (mfxExtBuffer *)&q->extco;
469
470 #if QSV_HAVE_CO2
471         if (avctx->codec_id == AV_CODEC_ID_H264) {
472             q->extco2.Header.BufferId     = MFX_EXTBUFF_CODING_OPTION2;
473             q->extco2.Header.BufferSz     = sizeof(q->extco2);
474
475             if (q->int_ref_type >= 0)
476                 q->extco2.IntRefType = q->int_ref_type;
477             if (q->int_ref_cycle_size >= 0)
478                 q->extco2.IntRefCycleSize = q->int_ref_cycle_size;
479             if (q->int_ref_qp_delta != INT16_MIN)
480                 q->extco2.IntRefQPDelta = q->int_ref_qp_delta;
481
482             if (q->bitrate_limit >= 0)
483                 q->extco2.BitrateLimit = q->bitrate_limit ? MFX_CODINGOPTION_ON : MFX_CODINGOPTION_OFF;
484             if (q->mbbrc >= 0)
485                 q->extco2.MBBRC = q->mbbrc ? MFX_CODINGOPTION_ON : MFX_CODINGOPTION_OFF;
486             if (q->extbrc >= 0)
487                 q->extco2.ExtBRC = q->extbrc ? MFX_CODINGOPTION_ON : MFX_CODINGOPTION_OFF;
488
489             if (q->max_frame_size >= 0)
490                 q->extco2.MaxFrameSize = q->max_frame_size;
491 #if QSV_HAVE_MAX_SLICE_SIZE
492             if (q->max_slice_size >= 0)
493                 q->extco2.MaxSliceSize = q->max_slice_size;
494 #endif
495
496 #if QSV_HAVE_TRELLIS
497             q->extco2.Trellis = q->trellis;
498 #endif
499
500 #if QSV_HAVE_BREF_TYPE
501             if (avctx->b_frame_strategy >= 0)
502                 q->extco2.BRefType = avctx->b_frame_strategy ? MFX_B_REF_PYRAMID : MFX_B_REF_OFF;
503             if (q->adaptive_i >= 0)
504                 q->extco2.AdaptiveI = q->adaptive_i ? MFX_CODINGOPTION_ON : MFX_CODINGOPTION_OFF;
505             if (q->adaptive_b >= 0)
506                 q->extco2.AdaptiveB = q->adaptive_b ? MFX_CODINGOPTION_ON : MFX_CODINGOPTION_OFF;
507 #endif
508
509             q->extparam_internal[q->nb_extparam_internal++] = (mfxExtBuffer *)&q->extco2;
510         }
511 #endif
512     }
513
514     if (!rc_supported(q)) {
515         av_log(avctx, AV_LOG_ERROR,
516                "Selected ratecontrol mode is not supported by the QSV "
517                "runtime. Choose a different mode.\n");
518         return AVERROR(ENOSYS);
519     }
520
521     return 0;
522 }
523
524 static int qsv_retrieve_enc_params(AVCodecContext *avctx, QSVEncContext *q)
525 {
526     AVCPBProperties *cpb_props;
527
528     uint8_t sps_buf[128];
529     uint8_t pps_buf[128];
530
531     mfxExtCodingOptionSPSPPS extradata = {
532         .Header.BufferId = MFX_EXTBUFF_CODING_OPTION_SPSPPS,
533         .Header.BufferSz = sizeof(extradata),
534         .SPSBuffer = sps_buf, .SPSBufSize = sizeof(sps_buf),
535         .PPSBuffer = pps_buf, .PPSBufSize = sizeof(pps_buf)
536     };
537
538     mfxExtCodingOption co = {
539         .Header.BufferId = MFX_EXTBUFF_CODING_OPTION,
540         .Header.BufferSz = sizeof(co),
541     };
542 #if QSV_HAVE_CO2
543     mfxExtCodingOption2 co2 = {
544         .Header.BufferId = MFX_EXTBUFF_CODING_OPTION2,
545         .Header.BufferSz = sizeof(co2),
546     };
547 #endif
548 #if QSV_HAVE_CO3
549     mfxExtCodingOption3 co3 = {
550         .Header.BufferId = MFX_EXTBUFF_CODING_OPTION3,
551         .Header.BufferSz = sizeof(co3),
552     };
553 #endif
554
555     mfxExtBuffer *ext_buffers[] = {
556         (mfxExtBuffer*)&extradata,
557         (mfxExtBuffer*)&co,
558 #if QSV_HAVE_CO2
559         (mfxExtBuffer*)&co2,
560 #endif
561 #if QSV_HAVE_CO3
562         (mfxExtBuffer*)&co3,
563 #endif
564     };
565
566     int need_pps = avctx->codec_id != AV_CODEC_ID_MPEG2VIDEO;
567     int ret;
568
569     q->param.ExtParam    = ext_buffers;
570     q->param.NumExtParam = FF_ARRAY_ELEMS(ext_buffers);
571
572     ret = MFXVideoENCODE_GetVideoParam(q->session, &q->param);
573     if (ret < 0)
574         return ff_qsv_error(ret);
575
576     q->packet_size = q->param.mfx.BufferSizeInKB * 1000;
577
578     if (!extradata.SPSBufSize || (need_pps && !extradata.PPSBufSize)) {
579         av_log(avctx, AV_LOG_ERROR, "No extradata returned from libmfx.\n");
580         return AVERROR_UNKNOWN;
581     }
582
583     avctx->extradata = av_malloc(extradata.SPSBufSize + need_pps * extradata.PPSBufSize +
584                                  AV_INPUT_BUFFER_PADDING_SIZE);
585     if (!avctx->extradata)
586         return AVERROR(ENOMEM);
587
588     memcpy(avctx->extradata,                        sps_buf, extradata.SPSBufSize);
589     if (need_pps)
590         memcpy(avctx->extradata + extradata.SPSBufSize, pps_buf, extradata.PPSBufSize);
591     avctx->extradata_size = extradata.SPSBufSize + need_pps * extradata.PPSBufSize;
592     memset(avctx->extradata + avctx->extradata_size, 0, AV_INPUT_BUFFER_PADDING_SIZE);
593
594     cpb_props = ff_add_cpb_side_data(avctx);
595     if (!cpb_props)
596         return AVERROR(ENOMEM);
597     cpb_props->max_bitrate = avctx->rc_max_rate;
598     cpb_props->min_bitrate = avctx->rc_min_rate;
599     cpb_props->avg_bitrate = avctx->bit_rate;
600     cpb_props->buffer_size = avctx->rc_buffer_size;
601
602     dump_video_param(avctx, q, ext_buffers + 1);
603
604     return 0;
605 }
606
607 static int qsv_init_opaque_alloc(AVCodecContext *avctx, QSVEncContext *q)
608 {
609     AVQSVContext *qsv = avctx->hwaccel_context;
610     mfxFrameSurface1 *surfaces;
611     int nb_surfaces, i;
612
613     nb_surfaces = qsv->nb_opaque_surfaces + q->req.NumFrameSuggested + q->async_depth;
614
615     q->opaque_alloc_buf = av_buffer_allocz(sizeof(*surfaces) * nb_surfaces);
616     if (!q->opaque_alloc_buf)
617         return AVERROR(ENOMEM);
618
619     q->opaque_surfaces = av_malloc_array(nb_surfaces, sizeof(*q->opaque_surfaces));
620     if (!q->opaque_surfaces)
621         return AVERROR(ENOMEM);
622
623     surfaces = (mfxFrameSurface1*)q->opaque_alloc_buf->data;
624     for (i = 0; i < nb_surfaces; i++) {
625         surfaces[i].Info      = q->req.Info;
626         q->opaque_surfaces[i] = surfaces + i;
627     }
628
629     q->opaque_alloc.Header.BufferId = MFX_EXTBUFF_OPAQUE_SURFACE_ALLOCATION;
630     q->opaque_alloc.Header.BufferSz = sizeof(q->opaque_alloc);
631     q->opaque_alloc.In.Surfaces     = q->opaque_surfaces;
632     q->opaque_alloc.In.NumSurface   = nb_surfaces;
633     q->opaque_alloc.In.Type         = q->req.Type;
634
635     q->extparam_internal[q->nb_extparam_internal++] = (mfxExtBuffer *)&q->opaque_alloc;
636
637     qsv->nb_opaque_surfaces = nb_surfaces;
638     qsv->opaque_surfaces    = q->opaque_alloc_buf;
639     qsv->opaque_alloc_type  = q->req.Type;
640
641     return 0;
642 }
643
644 int ff_qsv_enc_init(AVCodecContext *avctx, QSVEncContext *q)
645 {
646     int opaque_alloc = 0;
647     int ret;
648
649     q->param.IOPattern  = MFX_IOPATTERN_IN_SYSTEM_MEMORY;
650     q->param.AsyncDepth = q->async_depth;
651
652     q->async_fifo = av_fifo_alloc((1 + q->async_depth) *
653                                   (sizeof(AVPacket) + sizeof(mfxSyncPoint) + sizeof(mfxBitstream*)));
654     if (!q->async_fifo)
655         return AVERROR(ENOMEM);
656
657     if (avctx->hwaccel_context) {
658         AVQSVContext *qsv = avctx->hwaccel_context;
659
660         q->session         = qsv->session;
661         q->param.IOPattern = qsv->iopattern;
662
663         opaque_alloc = qsv->opaque_alloc;
664     }
665
666     if (!q->session) {
667         ret = ff_qsv_init_internal_session(avctx, &q->internal_session,
668                                            q->load_plugins);
669         if (ret < 0)
670             return ret;
671
672         q->session = q->internal_session;
673     }
674
675     ret = init_video_param(avctx, q);
676     if (ret < 0)
677         return ret;
678
679     ret = MFXVideoENCODE_QueryIOSurf(q->session, &q->param, &q->req);
680     if (ret < 0) {
681         av_log(avctx, AV_LOG_ERROR, "Error querying the encoding parameters\n");
682         return ff_qsv_error(ret);
683     }
684
685     if (opaque_alloc) {
686         ret = qsv_init_opaque_alloc(avctx, q);
687         if (ret < 0)
688             return ret;
689     }
690
691     if (avctx->hwaccel_context) {
692         AVQSVContext *qsv = avctx->hwaccel_context;
693         int i, j;
694
695         q->extparam = av_mallocz_array(qsv->nb_ext_buffers + q->nb_extparam_internal,
696                                        sizeof(*q->extparam));
697         if (!q->extparam)
698             return AVERROR(ENOMEM);
699
700         q->param.ExtParam = q->extparam;
701         for (i = 0; i < qsv->nb_ext_buffers; i++)
702             q->param.ExtParam[i] = qsv->ext_buffers[i];
703         q->param.NumExtParam = qsv->nb_ext_buffers;
704
705         for (i = 0; i < q->nb_extparam_internal; i++) {
706             for (j = 0; j < qsv->nb_ext_buffers; j++) {
707                 if (qsv->ext_buffers[j]->BufferId == q->extparam_internal[i]->BufferId)
708                     break;
709             }
710             if (j < qsv->nb_ext_buffers)
711                 continue;
712
713             q->param.ExtParam[q->param.NumExtParam++] = q->extparam_internal[i];
714         }
715     } else {
716         q->param.ExtParam    = q->extparam_internal;
717         q->param.NumExtParam = q->nb_extparam_internal;
718     }
719
720     ret = MFXVideoENCODE_Init(q->session, &q->param);
721     if (ret < 0) {
722         av_log(avctx, AV_LOG_ERROR, "Error initializing the encoder\n");
723         return ff_qsv_error(ret);
724     }
725
726     ret = qsv_retrieve_enc_params(avctx, q);
727     if (ret < 0) {
728         av_log(avctx, AV_LOG_ERROR, "Error retrieving encoding parameters.\n");
729         return ret;
730     }
731
732     q->avctx = avctx;
733
734     return 0;
735 }
736
737 static void clear_unused_frames(QSVEncContext *q)
738 {
739     QSVFrame *cur = q->work_frames;
740     while (cur) {
741         if (cur->surface && !cur->surface->Data.Locked) {
742             cur->surface = NULL;
743             av_frame_unref(cur->frame);
744         }
745         cur = cur->next;
746     }
747 }
748
749 static int get_free_frame(QSVEncContext *q, QSVFrame **f)
750 {
751     QSVFrame *frame, **last;
752
753     clear_unused_frames(q);
754
755     frame = q->work_frames;
756     last  = &q->work_frames;
757     while (frame) {
758         if (!frame->surface) {
759             *f = frame;
760             return 0;
761         }
762
763         last  = &frame->next;
764         frame = frame->next;
765     }
766
767     frame = av_mallocz(sizeof(*frame));
768     if (!frame)
769         return AVERROR(ENOMEM);
770     frame->frame = av_frame_alloc();
771     if (!frame->frame) {
772         av_freep(&frame);
773         return AVERROR(ENOMEM);
774     }
775     *last = frame;
776
777     *f = frame;
778
779     return 0;
780 }
781
782 static int submit_frame(QSVEncContext *q, const AVFrame *frame,
783                         mfxFrameSurface1 **surface)
784 {
785     QSVFrame *qf;
786     int ret;
787
788     ret = get_free_frame(q, &qf);
789     if (ret < 0)
790         return ret;
791
792     if (frame->format == AV_PIX_FMT_QSV) {
793         ret = av_frame_ref(qf->frame, frame);
794         if (ret < 0)
795             return ret;
796
797         qf->surface = (mfxFrameSurface1*)qf->frame->data[3];
798     } else {
799         /* make a copy if the input is not padded as libmfx requires */
800         if (frame->height & 31 || frame->linesize[0] & (q->width_align - 1)) {
801             qf->frame->height = FFALIGN(frame->height, 32);
802             qf->frame->width  = FFALIGN(frame->width, q->width_align);
803
804             ret = ff_get_buffer(q->avctx, qf->frame, AV_GET_BUFFER_FLAG_REF);
805             if (ret < 0)
806                 return ret;
807
808             qf->frame->height = frame->height;
809             qf->frame->width  = frame->width;
810             ret = av_frame_copy(qf->frame, frame);
811             if (ret < 0) {
812                 av_frame_unref(qf->frame);
813                 return ret;
814             }
815         } else {
816             ret = av_frame_ref(qf->frame, frame);
817             if (ret < 0)
818                 return ret;
819         }
820
821         qf->surface_internal.Info = q->param.mfx.FrameInfo;
822
823         qf->surface_internal.Info.PicStruct =
824             !frame->interlaced_frame ? MFX_PICSTRUCT_PROGRESSIVE :
825             frame->top_field_first   ? MFX_PICSTRUCT_FIELD_TFF :
826                                        MFX_PICSTRUCT_FIELD_BFF;
827         if (frame->repeat_pict == 1)
828             qf->surface_internal.Info.PicStruct |= MFX_PICSTRUCT_FIELD_REPEATED;
829         else if (frame->repeat_pict == 2)
830             qf->surface_internal.Info.PicStruct |= MFX_PICSTRUCT_FRAME_DOUBLING;
831         else if (frame->repeat_pict == 4)
832             qf->surface_internal.Info.PicStruct |= MFX_PICSTRUCT_FRAME_TRIPLING;
833
834         qf->surface_internal.Data.PitchLow  = qf->frame->linesize[0];
835         qf->surface_internal.Data.Y         = qf->frame->data[0];
836         qf->surface_internal.Data.UV        = qf->frame->data[1];
837
838         qf->surface = &qf->surface_internal;
839     }
840
841     qf->surface->Data.TimeStamp = av_rescale_q(frame->pts, q->avctx->time_base, (AVRational){1, 90000});
842
843     *surface = qf->surface;
844
845     return 0;
846 }
847
848 static void print_interlace_msg(AVCodecContext *avctx, QSVEncContext *q)
849 {
850     if (q->param.mfx.CodecId == MFX_CODEC_AVC) {
851         if (q->param.mfx.CodecProfile == MFX_PROFILE_AVC_BASELINE ||
852             q->param.mfx.CodecLevel < MFX_LEVEL_AVC_21 ||
853             q->param.mfx.CodecLevel > MFX_LEVEL_AVC_41)
854             av_log(avctx, AV_LOG_WARNING,
855                    "Interlaced coding is supported"
856                    " at Main/High Profile Level 2.1-4.1\n");
857     }
858 }
859
860 static int encode_frame(AVCodecContext *avctx, QSVEncContext *q,
861                         const AVFrame *frame)
862 {
863     AVPacket new_pkt = { 0 };
864     mfxBitstream *bs;
865
866     mfxFrameSurface1 *surf = NULL;
867     mfxSyncPoint sync      = NULL;
868     int ret;
869
870     if (frame) {
871         ret = submit_frame(q, frame, &surf);
872         if (ret < 0) {
873             av_log(avctx, AV_LOG_ERROR, "Error submitting the frame for encoding.\n");
874             return ret;
875         }
876     }
877
878     ret = av_new_packet(&new_pkt, q->packet_size);
879     if (ret < 0) {
880         av_log(avctx, AV_LOG_ERROR, "Error allocating the output packet\n");
881         return ret;
882     }
883
884     bs = av_mallocz(sizeof(*bs));
885     if (!bs) {
886         av_packet_unref(&new_pkt);
887         return AVERROR(ENOMEM);
888     }
889     bs->Data      = new_pkt.data;
890     bs->MaxLength = new_pkt.size;
891
892     do {
893         ret = MFXVideoENCODE_EncodeFrameAsync(q->session, NULL, surf, bs, &sync);
894         if (ret == MFX_WRN_DEVICE_BUSY)
895             av_usleep(1);
896     } while (ret > 0);
897
898     if (ret < 0) {
899         av_packet_unref(&new_pkt);
900         av_freep(&bs);
901         return (ret == MFX_ERR_MORE_DATA) ? 0 : ff_qsv_error(ret);
902     }
903
904     if (ret == MFX_WRN_INCOMPATIBLE_VIDEO_PARAM && frame->interlaced_frame)
905         print_interlace_msg(avctx, q);
906
907     if (sync) {
908         av_fifo_generic_write(q->async_fifo, &new_pkt, sizeof(new_pkt), NULL);
909         av_fifo_generic_write(q->async_fifo, &sync,    sizeof(sync),    NULL);
910         av_fifo_generic_write(q->async_fifo, &bs,      sizeof(bs),    NULL);
911     } else {
912         av_packet_unref(&new_pkt);
913         av_freep(&bs);
914     }
915
916     return 0;
917 }
918
919 int ff_qsv_encode(AVCodecContext *avctx, QSVEncContext *q,
920                   AVPacket *pkt, const AVFrame *frame, int *got_packet)
921 {
922     int ret;
923
924     ret = encode_frame(avctx, q, frame);
925     if (ret < 0)
926         return ret;
927
928     if (!av_fifo_space(q->async_fifo) ||
929         (!frame && av_fifo_size(q->async_fifo))) {
930         AVPacket new_pkt;
931         mfxBitstream *bs;
932         mfxSyncPoint sync;
933
934         av_fifo_generic_read(q->async_fifo, &new_pkt, sizeof(new_pkt), NULL);
935         av_fifo_generic_read(q->async_fifo, &sync,    sizeof(sync),    NULL);
936         av_fifo_generic_read(q->async_fifo, &bs,      sizeof(bs),      NULL);
937
938         do {
939             ret = MFXVideoCORE_SyncOperation(q->session, sync, 1000);
940         } while (ret == MFX_WRN_IN_EXECUTION);
941
942         new_pkt.dts  = av_rescale_q(bs->DecodeTimeStamp, (AVRational){1, 90000}, avctx->time_base);
943         new_pkt.pts  = av_rescale_q(bs->TimeStamp,       (AVRational){1, 90000}, avctx->time_base);
944         new_pkt.size = bs->DataLength;
945
946         if (bs->FrameType & MFX_FRAMETYPE_IDR ||
947             bs->FrameType & MFX_FRAMETYPE_xIDR)
948             new_pkt.flags |= AV_PKT_FLAG_KEY;
949
950 #if FF_API_CODED_FRAME
951 FF_DISABLE_DEPRECATION_WARNINGS
952         if (bs->FrameType & MFX_FRAMETYPE_I || bs->FrameType & MFX_FRAMETYPE_xI)
953             avctx->coded_frame->pict_type = AV_PICTURE_TYPE_I;
954         else if (bs->FrameType & MFX_FRAMETYPE_P || bs->FrameType & MFX_FRAMETYPE_xP)
955             avctx->coded_frame->pict_type = AV_PICTURE_TYPE_P;
956         else if (bs->FrameType & MFX_FRAMETYPE_B || bs->FrameType & MFX_FRAMETYPE_xB)
957             avctx->coded_frame->pict_type = AV_PICTURE_TYPE_B;
958 FF_ENABLE_DEPRECATION_WARNINGS
959 #endif
960
961         av_freep(&bs);
962
963         if (pkt->data) {
964             if (pkt->size < new_pkt.size) {
965                 av_log(avctx, AV_LOG_ERROR, "Submitted buffer not large enough: %d < %d\n",
966                        pkt->size, new_pkt.size);
967                 av_packet_unref(&new_pkt);
968                 return AVERROR(EINVAL);
969             }
970
971             memcpy(pkt->data, new_pkt.data, new_pkt.size);
972             pkt->size = new_pkt.size;
973
974             ret = av_packet_copy_props(pkt, &new_pkt);
975             av_packet_unref(&new_pkt);
976             if (ret < 0)
977                 return ret;
978         } else
979             *pkt = new_pkt;
980
981         *got_packet = 1;
982     }
983
984     return 0;
985 }
986
987 int ff_qsv_enc_close(AVCodecContext *avctx, QSVEncContext *q)
988 {
989     QSVFrame *cur;
990
991     if (q->session)
992         MFXVideoENCODE_Close(q->session);
993     if (q->internal_session)
994         MFXClose(q->internal_session);
995     q->session          = NULL;
996     q->internal_session = NULL;
997
998     cur = q->work_frames;
999     while (cur) {
1000         q->work_frames = cur->next;
1001         av_frame_free(&cur->frame);
1002         av_freep(&cur);
1003         cur = q->work_frames;
1004     }
1005
1006     while (q->async_fifo && av_fifo_size(q->async_fifo)) {
1007         AVPacket pkt;
1008         mfxSyncPoint sync;
1009         mfxBitstream *bs;
1010
1011         av_fifo_generic_read(q->async_fifo, &pkt,  sizeof(pkt),  NULL);
1012         av_fifo_generic_read(q->async_fifo, &sync, sizeof(sync), NULL);
1013         av_fifo_generic_read(q->async_fifo, &bs,   sizeof(bs),   NULL);
1014
1015         av_freep(&bs);
1016         av_packet_unref(&pkt);
1017     }
1018     av_fifo_free(q->async_fifo);
1019     q->async_fifo = NULL;
1020
1021     av_freep(&q->opaque_surfaces);
1022     av_buffer_unref(&q->opaque_alloc_buf);
1023
1024     av_freep(&q->extparam);
1025
1026     return 0;
1027 }