]> git.sesse.net Git - ffmpeg/blob - libavcodec/av1dec.c
avcodec/av1dec: add a reference to the raw frame header to AV1Frames
[ffmpeg] / libavcodec / av1dec.c
1 /*
2  * AV1 video decoder
3  *
4  * This file is part of FFmpeg.
5  *
6  * FFmpeg is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * FFmpeg is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with FFmpeg; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19  */
20
21 #include "libavutil/pixdesc.h"
22 #include "avcodec.h"
23 #include "av1dec.h"
24 #include "bytestream.h"
25 #include "hwconfig.h"
26 #include "internal.h"
27 #include "profiles.h"
28
29 static uint32_t inverse_recenter(int r, uint32_t v)
30 {
31     if (v > 2 * r)
32         return v;
33     else if (v & 1)
34         return r - ((v + 1) >> 1);
35     else
36         return r + (v >> 1);
37 }
38
39 static uint32_t decode_unsigned_subexp_with_ref(uint32_t sub_exp,
40                                                 int mx, int r)
41 {
42     if ((r << 1) <= mx) {
43         return inverse_recenter(r, sub_exp);
44     } else {
45         return mx - 1 - inverse_recenter(mx - 1 - r, sub_exp);
46     }
47 }
48
49 static int32_t decode_signed_subexp_with_ref(uint32_t sub_exp, int low,
50                                              int high, int r)
51 {
52     int32_t x = decode_unsigned_subexp_with_ref(sub_exp, high - low, r - low);
53     return x + low;
54 }
55
56 static void read_global_param(AV1DecContext *s, int type, int ref, int idx)
57 {
58     uint8_t primary_frame, prev_frame;
59     uint32_t abs_bits, prec_bits, round, prec_diff, sub, mx;
60     int32_t r, prev_gm_param;
61
62     primary_frame = s->raw_frame_header->primary_ref_frame;
63     prev_frame = s->raw_frame_header->ref_frame_idx[primary_frame];
64     abs_bits = AV1_GM_ABS_ALPHA_BITS;
65     prec_bits = AV1_GM_ALPHA_PREC_BITS;
66
67     /* setup_past_independence() sets PrevGmParams to default values. We can
68      * simply point to the current's frame gm_params as they will be initialized
69      * with defaults at this point.
70      */
71     if (s->raw_frame_header->primary_ref_frame == AV1_PRIMARY_REF_NONE)
72         prev_gm_param = s->cur_frame.gm_params[ref][idx];
73     else
74         prev_gm_param = s->ref[prev_frame].gm_params[ref][idx];
75
76     if (idx < 2) {
77         if (type == AV1_WARP_MODEL_TRANSLATION) {
78             abs_bits = AV1_GM_ABS_TRANS_ONLY_BITS -
79                 !s->raw_frame_header->allow_high_precision_mv;
80             prec_bits = AV1_GM_TRANS_ONLY_PREC_BITS -
81                 !s->raw_frame_header->allow_high_precision_mv;
82         } else {
83             abs_bits = AV1_GM_ABS_TRANS_BITS;
84             prec_bits = AV1_GM_TRANS_PREC_BITS;
85         }
86     }
87     round = (idx % 3) == 2 ? (1 << AV1_WARPEDMODEL_PREC_BITS) : 0;
88     prec_diff = AV1_WARPEDMODEL_PREC_BITS - prec_bits;
89     sub = (idx % 3) == 2 ? (1 << prec_bits) : 0;
90     mx = 1 << abs_bits;
91     r = (prev_gm_param >> prec_diff) - sub;
92
93     s->cur_frame.gm_params[ref][idx] =
94         (decode_signed_subexp_with_ref(s->raw_frame_header->gm_params[ref][idx],
95                                        -mx, mx + 1, r) << prec_diff) + round;
96 }
97
98 /**
99 * update gm type/params, since cbs already implemented part of this funcation,
100 * so we don't need to full implement spec.
101 */
102 static void global_motion_params(AV1DecContext *s)
103 {
104     const AV1RawFrameHeader *header = s->raw_frame_header;
105     int type, ref;
106
107     for (ref = AV1_REF_FRAME_LAST; ref <= AV1_REF_FRAME_ALTREF; ref++) {
108         s->cur_frame.gm_type[ref] = AV1_WARP_MODEL_IDENTITY;
109         for (int i = 0; i < 6; i++)
110             s->cur_frame.gm_params[ref][i] = (i % 3 == 2) ?
111                                              1 << AV1_WARPEDMODEL_PREC_BITS : 0;
112     }
113     if (header->frame_type == AV1_FRAME_KEY ||
114         header->frame_type == AV1_FRAME_INTRA_ONLY)
115         return;
116
117     for (ref = AV1_REF_FRAME_LAST; ref <= AV1_REF_FRAME_ALTREF; ref++) {
118         if (header->is_global[ref]) {
119             if (header->is_rot_zoom[ref]) {
120                 type = AV1_WARP_MODEL_ROTZOOM;
121             } else {
122                 type = header->is_translation[ref] ? AV1_WARP_MODEL_TRANSLATION
123                                                    : AV1_WARP_MODEL_AFFINE;
124             }
125         } else {
126             type = AV1_WARP_MODEL_IDENTITY;
127         }
128         s->cur_frame.gm_type[ref] = type;
129
130         if (type >= AV1_WARP_MODEL_ROTZOOM) {
131             read_global_param(s, type, ref, 2);
132             read_global_param(s, type, ref, 3);
133             if (type == AV1_WARP_MODEL_AFFINE) {
134                 read_global_param(s, type, ref, 4);
135                 read_global_param(s, type, ref, 5);
136             } else {
137                 s->cur_frame.gm_params[ref][4] = -s->cur_frame.gm_params[ref][3];
138                 s->cur_frame.gm_params[ref][5] = s->cur_frame.gm_params[ref][2];
139             }
140         }
141         if (type >= AV1_WARP_MODEL_TRANSLATION) {
142             read_global_param(s, type, ref, 0);
143             read_global_param(s, type, ref, 1);
144         }
145     }
146 }
147
148 static int get_relative_dist(const AV1RawSequenceHeader *seq,
149                              unsigned int a, unsigned int b)
150 {
151     unsigned int diff = a - b;
152     unsigned int m = 1 << seq->order_hint_bits_minus_1;
153     return (diff & (m - 1)) - (diff & m);
154 }
155
156 static void skip_mode_params(AV1DecContext *s)
157 {
158     const AV1RawFrameHeader *header = s->raw_frame_header;
159     const AV1RawSequenceHeader *seq = s->raw_seq;
160
161     int forward_idx,  backward_idx;
162     int forward_hint, backward_hint;
163     int second_forward_idx, second_forward_hint;
164     int ref_hint, dist, i;
165
166     if (!header->skip_mode_present)
167         return;
168
169     forward_idx  = -1;
170     backward_idx = -1;
171     for (i = 0; i < AV1_REFS_PER_FRAME; i++) {
172         ref_hint = s->ref[header->ref_frame_idx[i]].order_hint;
173         dist = get_relative_dist(seq, ref_hint, header->order_hint);
174         if (dist < 0) {
175             if (forward_idx < 0 ||
176                 get_relative_dist(seq, ref_hint, forward_hint) > 0) {
177                 forward_idx  = i;
178                 forward_hint = ref_hint;
179             }
180         } else if (dist > 0) {
181             if (backward_idx < 0 ||
182                 get_relative_dist(seq, ref_hint, backward_hint) < 0) {
183                 backward_idx  = i;
184                 backward_hint = ref_hint;
185             }
186         }
187     }
188
189     if (forward_idx < 0) {
190         return;
191     } else if (backward_idx >= 0) {
192         s->cur_frame.skip_mode_frame_idx[0] =
193             AV1_REF_FRAME_LAST + FFMIN(forward_idx, backward_idx);
194         s->cur_frame.skip_mode_frame_idx[1] =
195             AV1_REF_FRAME_LAST + FFMAX(forward_idx, backward_idx);
196         return;
197     }
198
199     second_forward_idx = -1;
200     for (i = 0; i < AV1_REFS_PER_FRAME; i++) {
201         ref_hint = s->ref[header->ref_frame_idx[i]].order_hint;
202         if (get_relative_dist(seq, ref_hint, forward_hint) < 0) {
203             if (second_forward_idx < 0 ||
204                 get_relative_dist(seq, ref_hint, second_forward_hint) > 0) {
205                 second_forward_idx  = i;
206                 second_forward_hint = ref_hint;
207             }
208         }
209     }
210
211     if (second_forward_idx < 0)
212         return;
213
214     s->cur_frame.skip_mode_frame_idx[0] =
215         AV1_REF_FRAME_LAST + FFMIN(forward_idx, second_forward_idx);
216     s->cur_frame.skip_mode_frame_idx[1] =
217         AV1_REF_FRAME_LAST + FFMAX(forward_idx, second_forward_idx);
218 }
219
220 static void coded_lossless_param(AV1DecContext *s)
221 {
222     const AV1RawFrameHeader *header = s->raw_frame_header;
223     int i;
224
225     if (header->delta_q_y_dc || header->delta_q_u_ac ||
226         header->delta_q_u_dc || header->delta_q_v_ac ||
227         header->delta_q_v_dc) {
228         s->cur_frame.coded_lossless = 0;
229         return;
230     }
231
232     s->cur_frame.coded_lossless = 1;
233     for (i = 0; i < AV1_MAX_SEGMENTS; i++) {
234         int qindex;
235         if (header->feature_enabled[i][AV1_SEG_LVL_ALT_Q]) {
236             qindex = (header->base_q_idx +
237                       header->feature_value[i][AV1_SEG_LVL_ALT_Q]);
238         } else {
239             qindex = header->base_q_idx;
240         }
241         qindex = av_clip_uintp2(qindex, 8);
242
243         if (qindex) {
244             s->cur_frame.coded_lossless = 0;
245             return;
246         }
247     }
248 }
249
250 static int init_tile_data(AV1DecContext *s)
251
252 {
253     int cur_tile_num =
254         s->raw_frame_header->tile_cols * s->raw_frame_header->tile_rows;
255     if (s->tile_num < cur_tile_num) {
256         int ret = av_reallocp_array(&s->tile_group_info, cur_tile_num,
257                                     sizeof(TileGroupInfo));
258         if (ret < 0) {
259             s->tile_num = 0;
260             return ret;
261         }
262     }
263     s->tile_num = cur_tile_num;
264
265     return 0;
266 }
267
268 static int get_tiles_info(AVCodecContext *avctx, const AV1RawTileGroup *tile_group)
269 {
270     AV1DecContext *s = avctx->priv_data;
271     GetByteContext gb;
272     uint16_t tile_num, tile_row, tile_col;
273     uint32_t size = 0, size_bytes = 0;
274
275     bytestream2_init(&gb, tile_group->tile_data.data,
276                      tile_group->tile_data.data_size);
277     s->tg_start = tile_group->tg_start;
278     s->tg_end = tile_group->tg_end;
279
280     for (tile_num = tile_group->tg_start; tile_num <= tile_group->tg_end; tile_num++) {
281         tile_row = tile_num / s->raw_frame_header->tile_cols;
282         tile_col = tile_num % s->raw_frame_header->tile_cols;
283
284         if (tile_num == tile_group->tg_end) {
285             s->tile_group_info[tile_num].tile_size = bytestream2_get_bytes_left(&gb);
286             s->tile_group_info[tile_num].tile_offset = bytestream2_tell(&gb);
287             s->tile_group_info[tile_num].tile_row = tile_row;
288             s->tile_group_info[tile_num].tile_column = tile_col;
289             return 0;
290         }
291         size_bytes = s->raw_frame_header->tile_size_bytes_minus1 + 1;
292         if (bytestream2_get_bytes_left(&gb) < size_bytes)
293             return AVERROR_INVALIDDATA;
294         size = 0;
295         for (int i = 0; i < size_bytes; i++)
296             size |= bytestream2_get_byteu(&gb) << 8 * i;
297         if (bytestream2_get_bytes_left(&gb) <= size)
298             return AVERROR_INVALIDDATA;
299         size++;
300
301         s->tile_group_info[tile_num].tile_size = size;
302         s->tile_group_info[tile_num].tile_offset = bytestream2_tell(&gb);
303         s->tile_group_info[tile_num].tile_row = tile_row;
304         s->tile_group_info[tile_num].tile_column = tile_col;
305
306         bytestream2_skipu(&gb, size);
307     }
308
309     return 0;
310
311 }
312
313 static int get_pixel_format(AVCodecContext *avctx)
314 {
315     AV1DecContext *s = avctx->priv_data;
316     const AV1RawSequenceHeader *seq = s->raw_seq;
317     uint8_t bit_depth;
318     int ret;
319     enum AVPixelFormat pix_fmt = AV_PIX_FMT_NONE;
320 #define HWACCEL_MAX (CONFIG_AV1_DXVA2_HWACCEL + \
321                      CONFIG_AV1_D3D11VA_HWACCEL * 2 + \
322                      CONFIG_AV1_NVDEC_HWACCEL + \
323                      CONFIG_AV1_VAAPI_HWACCEL)
324     enum AVPixelFormat pix_fmts[HWACCEL_MAX + 2], *fmtp = pix_fmts;
325
326     if (seq->seq_profile == 2 && seq->color_config.high_bitdepth)
327         bit_depth = seq->color_config.twelve_bit ? 12 : 10;
328     else if (seq->seq_profile <= 2)
329         bit_depth = seq->color_config.high_bitdepth ? 10 : 8;
330     else {
331         av_log(avctx, AV_LOG_ERROR,
332                "Unknown AV1 profile %d.\n", seq->seq_profile);
333         return -1;
334     }
335
336     if (!seq->color_config.mono_chrome) {
337         // 4:4:4 x:0 y:0, 4:2:2 x:1 y:0, 4:2:0 x:1 y:1
338         if (seq->color_config.subsampling_x == 0 &&
339             seq->color_config.subsampling_y == 0) {
340             if (bit_depth == 8)
341                 pix_fmt = AV_PIX_FMT_YUV444P;
342             else if (bit_depth == 10)
343                 pix_fmt = AV_PIX_FMT_YUV444P10;
344             else if (bit_depth == 12)
345                 pix_fmt = AV_PIX_FMT_YUV444P12;
346             else
347                 av_log(avctx, AV_LOG_WARNING, "Unknown AV1 pixel format.\n");
348         } else if (seq->color_config.subsampling_x == 1 &&
349                    seq->color_config.subsampling_y == 0) {
350             if (bit_depth == 8)
351                 pix_fmt = AV_PIX_FMT_YUV422P;
352             else if (bit_depth == 10)
353                 pix_fmt = AV_PIX_FMT_YUV422P10;
354             else if (bit_depth == 12)
355                 pix_fmt = AV_PIX_FMT_YUV422P12;
356             else
357                 av_log(avctx, AV_LOG_WARNING, "Unknown AV1 pixel format.\n");
358         } else if (seq->color_config.subsampling_x == 1 &&
359                    seq->color_config.subsampling_y == 1) {
360             if (bit_depth == 8)
361                 pix_fmt = AV_PIX_FMT_YUV420P;
362             else if (bit_depth == 10)
363                 pix_fmt = AV_PIX_FMT_YUV420P10;
364             else if (bit_depth == 12)
365                 pix_fmt = AV_PIX_FMT_YUV420P12;
366             else
367                 av_log(avctx, AV_LOG_WARNING, "Unknown AV1 pixel format.\n");
368         }
369     } else {
370         if (seq->color_config.subsampling_x == 1 &&
371             seq->color_config.subsampling_y == 1)
372             pix_fmt = AV_PIX_FMT_YUV440P;
373         else
374             av_log(avctx, AV_LOG_WARNING, "Unknown AV1 pixel format.\n");
375     }
376
377     av_log(avctx, AV_LOG_DEBUG, "AV1 decode get format: %s.\n",
378            av_get_pix_fmt_name(pix_fmt));
379
380     if (pix_fmt == AV_PIX_FMT_NONE)
381         return -1;
382     s->pix_fmt = pix_fmt;
383
384     switch (s->pix_fmt) {
385     case AV_PIX_FMT_YUV420P:
386 #if CONFIG_AV1_DXVA2_HWACCEL
387         *fmtp++ = AV_PIX_FMT_DXVA2_VLD;
388 #endif
389 #if CONFIG_AV1_D3D11VA_HWACCEL
390         *fmtp++ = AV_PIX_FMT_D3D11VA_VLD;
391         *fmtp++ = AV_PIX_FMT_D3D11;
392 #endif
393 #if CONFIG_AV1_NVDEC_HWACCEL
394         *fmtp++ = AV_PIX_FMT_CUDA;
395 #endif
396 #if CONFIG_AV1_VAAPI_HWACCEL
397         *fmtp++ = AV_PIX_FMT_VAAPI;
398 #endif
399         break;
400     case AV_PIX_FMT_YUV420P10:
401 #if CONFIG_AV1_DXVA2_HWACCEL
402         *fmtp++ = AV_PIX_FMT_DXVA2_VLD;
403 #endif
404 #if CONFIG_AV1_D3D11VA_HWACCEL
405         *fmtp++ = AV_PIX_FMT_D3D11VA_VLD;
406         *fmtp++ = AV_PIX_FMT_D3D11;
407 #endif
408 #if CONFIG_AV1_NVDEC_HWACCEL
409         *fmtp++ = AV_PIX_FMT_CUDA;
410 #endif
411 #if CONFIG_AV1_VAAPI_HWACCEL
412         *fmtp++ = AV_PIX_FMT_VAAPI;
413 #endif
414         break;
415     }
416
417     *fmtp++ = s->pix_fmt;
418     *fmtp = AV_PIX_FMT_NONE;
419
420     ret = ff_thread_get_format(avctx, pix_fmts);
421     if (ret < 0)
422         return ret;
423
424     /**
425      * check if the HW accel is inited correctly. If not, return un-implemented.
426      * Since now the av1 decoder doesn't support native decode, if it will be
427      * implemented in the future, need remove this check.
428      */
429     if (!avctx->hwaccel) {
430         av_log(avctx, AV_LOG_ERROR, "Your platform doesn't suppport"
431                " hardware accelerated AV1 decoding.\n");
432         return AVERROR(ENOSYS);
433     }
434
435     avctx->pix_fmt = ret;
436
437     return 0;
438 }
439
440 static void av1_frame_unref(AVCodecContext *avctx, AV1Frame *f)
441 {
442     ff_thread_release_buffer(avctx, &f->tf);
443     av_buffer_unref(&f->hwaccel_priv_buf);
444     f->hwaccel_picture_private = NULL;
445     av_buffer_unref(&f->header_ref);
446     f->raw_frame_header = NULL;
447     f->spatial_id = f->temporal_id = 0;
448     f->order_hint = 0;
449     memset(f->skip_mode_frame_idx, 0,
450            2 * sizeof(uint8_t));
451     f->coded_lossless = 0;
452 }
453
454 static int av1_frame_ref(AVCodecContext *avctx, AV1Frame *dst, const AV1Frame *src)
455 {
456     int ret;
457
458     ret = ff_thread_ref_frame(&dst->tf, &src->tf);
459     if (ret < 0)
460         return ret;
461
462     dst->header_ref = av_buffer_ref(src->header_ref);
463     if (!dst->header_ref)
464         goto fail;
465
466     dst->raw_frame_header = src->raw_frame_header;
467
468     if (src->hwaccel_picture_private) {
469         dst->hwaccel_priv_buf = av_buffer_ref(src->hwaccel_priv_buf);
470         if (!dst->hwaccel_priv_buf)
471             goto fail;
472         dst->hwaccel_picture_private = dst->hwaccel_priv_buf->data;
473     }
474
475     dst->spatial_id = src->spatial_id;
476     dst->temporal_id = src->temporal_id;
477     memcpy(dst->gm_type,
478            src->gm_type,
479            AV1_NUM_REF_FRAMES * sizeof(uint8_t));
480     memcpy(dst->gm_params,
481            src->gm_params,
482            AV1_NUM_REF_FRAMES * 6 * sizeof(int32_t));
483     dst->order_hint = src->order_hint;
484     memcpy(dst->skip_mode_frame_idx,
485            src->skip_mode_frame_idx,
486            2 * sizeof(uint8_t));
487     dst->coded_lossless = src->coded_lossless;
488
489     return 0;
490
491 fail:
492     av1_frame_unref(avctx, dst);
493     return AVERROR(ENOMEM);
494 }
495
496 static av_cold int av1_decode_free(AVCodecContext *avctx)
497 {
498     AV1DecContext *s = avctx->priv_data;
499
500     for (int i = 0; i < FF_ARRAY_ELEMS(s->ref); i++) {
501         av1_frame_unref(avctx, &s->ref[i]);
502         av_frame_free(&s->ref[i].tf.f);
503     }
504     av1_frame_unref(avctx, &s->cur_frame);
505     av_frame_free(&s->cur_frame.tf.f);
506
507     av_buffer_unref(&s->seq_ref);
508     av_buffer_unref(&s->header_ref);
509     av_freep(&s->tile_group_info);
510
511     ff_cbs_fragment_free(&s->current_obu);
512     ff_cbs_close(&s->cbc);
513
514     return 0;
515 }
516
517 static int set_context_with_sequence(AVCodecContext *avctx,
518                                      const AV1RawSequenceHeader *seq)
519 {
520     int width = seq->max_frame_width_minus_1 + 1;
521     int height = seq->max_frame_height_minus_1 + 1;
522
523     avctx->profile = seq->seq_profile;
524     avctx->level = seq->seq_level_idx[0];
525
526     avctx->color_range =
527         seq->color_config.color_range ? AVCOL_RANGE_JPEG : AVCOL_RANGE_MPEG;
528     avctx->color_primaries = seq->color_config.color_primaries;
529     avctx->colorspace = seq->color_config.color_primaries;
530     avctx->color_trc = seq->color_config.transfer_characteristics;
531
532     switch (seq->color_config.chroma_sample_position) {
533     case AV1_CSP_VERTICAL:
534         avctx->chroma_sample_location = AVCHROMA_LOC_LEFT;
535         break;
536     case AV1_CSP_COLOCATED:
537         avctx->chroma_sample_location = AVCHROMA_LOC_TOPLEFT;
538         break;
539     }
540
541     if (avctx->width != width || avctx->height != height) {
542         int ret = ff_set_dimensions(avctx, width, height);
543         if (ret < 0)
544             return ret;
545     }
546     avctx->sample_aspect_ratio = (AVRational) { 1, 1 };
547
548     if (seq->timing_info.num_units_in_display_tick &&
549         seq->timing_info.time_scale) {
550         av_reduce(&avctx->framerate.den, &avctx->framerate.num,
551                   seq->timing_info.num_units_in_display_tick,
552                   seq->timing_info.time_scale,
553                   INT_MAX);
554         if (seq->timing_info.equal_picture_interval)
555             avctx->ticks_per_frame = seq->timing_info.num_ticks_per_picture_minus_1 + 1;
556     }
557
558     return 0;
559 }
560
561 static int update_context_with_frame_header(AVCodecContext *avctx,
562                                             const AV1RawFrameHeader *header)
563 {
564     AVRational aspect_ratio;
565     int width = header->frame_width_minus_1 + 1;
566     int height = header->frame_height_minus_1 + 1;
567     int r_width = header->render_width_minus_1 + 1;
568     int r_height = header->render_height_minus_1 + 1;
569     int ret;
570
571     if (avctx->width != width || avctx->height != height) {
572         ret = ff_set_dimensions(avctx, width, height);
573         if (ret < 0)
574             return ret;
575     }
576
577     av_reduce(&aspect_ratio.num, &aspect_ratio.den,
578               (int64_t)height * r_width,
579               (int64_t)width * r_height,
580               INT_MAX);
581
582     if (av_cmp_q(avctx->sample_aspect_ratio, aspect_ratio)) {
583         ret = ff_set_sar(avctx, aspect_ratio);
584         if (ret < 0)
585             return ret;
586     }
587
588     return 0;
589 }
590
591 static av_cold int av1_decode_init(AVCodecContext *avctx)
592 {
593     AV1DecContext *s = avctx->priv_data;
594     AV1RawSequenceHeader *seq;
595     int ret;
596
597     s->avctx = avctx;
598     s->pix_fmt = AV_PIX_FMT_NONE;
599
600     for (int i = 0; i < FF_ARRAY_ELEMS(s->ref); i++) {
601         s->ref[i].tf.f = av_frame_alloc();
602         if (!s->ref[i].tf.f) {
603             av_log(avctx, AV_LOG_ERROR,
604                    "Failed to allocate reference frame buffer %d.\n", i);
605             return AVERROR(ENOMEM);
606         }
607     }
608
609     s->cur_frame.tf.f = av_frame_alloc();
610     if (!s->cur_frame.tf.f) {
611         av_log(avctx, AV_LOG_ERROR,
612                "Failed to allocate current frame buffer.\n");
613         return AVERROR(ENOMEM);
614     }
615
616     ret = ff_cbs_init(&s->cbc, AV_CODEC_ID_AV1, avctx);
617     if (ret < 0)
618         return ret;
619
620     if (avctx->extradata && avctx->extradata_size) {
621         ret = ff_cbs_read(s->cbc, &s->current_obu, avctx->extradata,
622                           avctx->extradata_size);
623         if (ret < 0) {
624             av_log(avctx, AV_LOG_WARNING, "Failed to read extradata.\n");
625             return ret;
626         }
627
628         seq = ((CodedBitstreamAV1Context *)(s->cbc->priv_data))->sequence_header;
629         if (!seq) {
630             av_log(avctx, AV_LOG_WARNING, "No sequence header available.\n");
631             goto end;
632         }
633
634         ret = set_context_with_sequence(avctx, seq);
635         if (ret < 0) {
636             av_log(avctx, AV_LOG_WARNING, "Failed to set decoder context.\n");
637             goto end;
638         }
639
640         end:
641         ff_cbs_fragment_reset(&s->current_obu);
642     }
643
644     return ret;
645 }
646
647 static int av1_frame_alloc(AVCodecContext *avctx, AV1Frame *f)
648 {
649     AV1DecContext *s = avctx->priv_data;
650     AV1RawFrameHeader *header= s->raw_frame_header;
651     AVFrame *frame;
652     int ret;
653
654     f->header_ref = av_buffer_ref(s->header_ref);
655     if (!f->header_ref)
656         return AVERROR(ENOMEM);
657
658     f->raw_frame_header = s->raw_frame_header;
659
660     ret = update_context_with_frame_header(avctx, header);
661     if (ret < 0) {
662         av_log(avctx, AV_LOG_ERROR, "Failed to update context with frame header\n");
663         return ret;
664     }
665
666     if ((ret = ff_thread_get_buffer(avctx, &f->tf, AV_GET_BUFFER_FLAG_REF)) < 0)
667         return ret;
668
669     frame = f->tf.f;
670     frame->key_frame = header->frame_type == AV1_FRAME_KEY;
671
672     switch (header->frame_type) {
673     case AV1_FRAME_KEY:
674     case AV1_FRAME_INTRA_ONLY:
675         frame->pict_type = AV_PICTURE_TYPE_I;
676         break;
677     case AV1_FRAME_INTER:
678         frame->pict_type = AV_PICTURE_TYPE_P;
679         break;
680     case AV1_FRAME_SWITCH:
681         frame->pict_type = AV_PICTURE_TYPE_SP;
682         break;
683     }
684
685     if (avctx->hwaccel) {
686         const AVHWAccel *hwaccel = avctx->hwaccel;
687         if (hwaccel->frame_priv_data_size) {
688             f->hwaccel_priv_buf =
689                 av_buffer_allocz(hwaccel->frame_priv_data_size);
690             if (!f->hwaccel_priv_buf)
691                 goto fail;
692             f->hwaccel_picture_private = f->hwaccel_priv_buf->data;
693         }
694     }
695     return 0;
696
697 fail:
698     av1_frame_unref(avctx, f);
699     return AVERROR(ENOMEM);
700 }
701
702 static int set_output_frame(AVCodecContext *avctx, AVFrame *frame,
703                             const AVPacket *pkt, int *got_frame)
704 {
705     AV1DecContext *s = avctx->priv_data;
706     const AVFrame *srcframe = s->cur_frame.tf.f;
707     int ret;
708
709     ret = av_frame_ref(frame, srcframe);
710     if (ret < 0)
711         return ret;
712
713     frame->pts = pkt->pts;
714     frame->pkt_dts = pkt->dts;
715     frame->pkt_size = pkt->size;
716
717     *got_frame = 1;
718
719     return 0;
720 }
721
722 static int update_reference_list(AVCodecContext *avctx)
723 {
724     AV1DecContext *s = avctx->priv_data;
725     const AV1RawFrameHeader *header = s->raw_frame_header;
726     int ret;
727
728     for (int i = 0; i < AV1_NUM_REF_FRAMES; i++) {
729         if (header->refresh_frame_flags & (1 << i)) {
730             if (s->ref[i].tf.f->buf[0])
731                 av1_frame_unref(avctx, &s->ref[i]);
732             if ((ret = av1_frame_ref(avctx, &s->ref[i], &s->cur_frame)) < 0) {
733                 av_log(avctx, AV_LOG_ERROR,
734                        "Failed to update frame %d in reference list\n", i);
735                 return ret;
736             }
737         }
738     }
739     return 0;
740 }
741
742 static int get_current_frame(AVCodecContext *avctx)
743 {
744     AV1DecContext *s = avctx->priv_data;
745     int ret;
746
747     if (s->cur_frame.tf.f->buf[0])
748         av1_frame_unref(avctx, &s->cur_frame);
749
750     ret = av1_frame_alloc(avctx, &s->cur_frame);
751     if (ret < 0) {
752         av_log(avctx, AV_LOG_ERROR,
753                "Failed to allocate space for current frame.\n");
754         return ret;
755     }
756
757     ret = init_tile_data(s);
758     if (ret < 0) {
759         av_log(avctx, AV_LOG_ERROR, "Failed to init tile data.\n");
760         return ret;
761     }
762
763     global_motion_params(s);
764     skip_mode_params(s);
765     coded_lossless_param(s);
766
767     return ret;
768 }
769
770 static int av1_decode_frame(AVCodecContext *avctx, void *frame,
771                             int *got_frame, AVPacket *pkt)
772 {
773     AV1DecContext *s = avctx->priv_data;
774     AV1RawTileGroup *raw_tile_group = NULL;
775     int ret;
776
777     ret = ff_cbs_read_packet(s->cbc, &s->current_obu, pkt);
778     if (ret < 0) {
779         av_log(avctx, AV_LOG_ERROR, "Failed to read packet.\n");
780         goto end;
781     }
782     av_log(avctx, AV_LOG_DEBUG, "Total obu for this frame:%d.\n",
783            s->current_obu.nb_units);
784
785     for (int i = 0; i < s->current_obu.nb_units; i++) {
786         CodedBitstreamUnit *unit = &s->current_obu.units[i];
787         AV1RawOBU *obu = unit->content;
788         const AV1RawOBUHeader *header;
789
790         if (!obu)
791             continue;
792
793         header = &obu->header;
794         av_log(avctx, AV_LOG_DEBUG, "Obu idx:%d, obu type:%d.\n", i, unit->type);
795
796         switch (unit->type) {
797         case AV1_OBU_SEQUENCE_HEADER:
798             av_buffer_unref(&s->seq_ref);
799             s->seq_ref = av_buffer_ref(unit->content_ref);
800             if (!s->seq_ref) {
801                 ret = AVERROR(ENOMEM);
802                 goto end;
803             }
804
805             s->raw_seq = &obu->obu.sequence_header;
806
807             ret = set_context_with_sequence(avctx, s->raw_seq);
808             if (ret < 0) {
809                 av_log(avctx, AV_LOG_ERROR, "Failed to set context.\n");
810                 s->raw_seq = NULL;
811                 goto end;
812             }
813
814             if (s->pix_fmt == AV_PIX_FMT_NONE) {
815                 ret = get_pixel_format(avctx);
816                 if (ret < 0) {
817                     av_log(avctx, AV_LOG_ERROR,
818                            "Failed to get pixel format.\n");
819                     s->raw_seq = NULL;
820                     goto end;
821                 }
822             }
823
824             if (avctx->hwaccel && avctx->hwaccel->decode_params) {
825                 ret = avctx->hwaccel->decode_params(avctx, unit->type, unit->data,
826                                                     unit->data_size);
827                 if (ret < 0) {
828                     av_log(avctx, AV_LOG_ERROR, "HW accel decode params fail.\n");
829                     s->raw_seq = NULL;
830                     goto end;
831                 }
832             }
833             break;
834         case AV1_OBU_REDUNDANT_FRAME_HEADER:
835             if (s->raw_frame_header)
836                 break;
837         // fall-through
838         case AV1_OBU_FRAME:
839         case AV1_OBU_FRAME_HEADER:
840             if (!s->raw_seq) {
841                 av_log(avctx, AV_LOG_ERROR, "Missing Sequence Header.\n");
842                 ret = AVERROR_INVALIDDATA;
843                 goto end;
844             }
845
846             av_buffer_unref(&s->header_ref);
847             s->header_ref = av_buffer_ref(unit->content_ref);
848             if (!s->header_ref) {
849                 ret = AVERROR(ENOMEM);
850                 goto end;
851             }
852
853             if (unit->type == AV1_OBU_FRAME)
854                 s->raw_frame_header = &obu->obu.frame.header;
855             else
856                 s->raw_frame_header = &obu->obu.frame_header;
857
858             if (s->raw_frame_header->show_existing_frame) {
859                 if (s->cur_frame.tf.f->buf[0])
860                     av1_frame_unref(avctx, &s->cur_frame);
861
862                 ret = av1_frame_ref(avctx, &s->cur_frame,
863                                     &s->ref[s->raw_frame_header->frame_to_show_map_idx]);
864                 if (ret < 0) {
865                     av_log(avctx, AV_LOG_ERROR, "Failed to get reference frame.\n");
866                     goto end;
867                 }
868
869                 ret = update_reference_list(avctx);
870                 if (ret < 0) {
871                     av_log(avctx, AV_LOG_ERROR, "Failed to update reference list.\n");
872                     goto end;
873                 }
874
875                 ret = set_output_frame(avctx, frame, pkt, got_frame);
876                 if (ret < 0)
877                     av_log(avctx, AV_LOG_ERROR, "Set output frame error.\n");
878
879                 s->raw_frame_header = NULL;
880
881                 goto end;
882             }
883
884             ret = get_current_frame(avctx);
885             if (ret < 0) {
886                 av_log(avctx, AV_LOG_ERROR, "Get current frame error\n");
887                 goto end;
888             }
889
890             s->cur_frame.spatial_id  = header->spatial_id;
891             s->cur_frame.temporal_id = header->temporal_id;
892
893             s->cur_frame.order_hint = s->raw_frame_header->order_hint;
894
895             if (avctx->hwaccel) {
896                 ret = avctx->hwaccel->start_frame(avctx, unit->data,
897                                                   unit->data_size);
898                 if (ret < 0) {
899                     av_log(avctx, AV_LOG_ERROR, "HW accel start frame fail.\n");
900                     goto end;
901                 }
902             }
903             if (unit->type != AV1_OBU_FRAME)
904                 break;
905         // fall-through
906         case AV1_OBU_TILE_GROUP:
907             if (!s->raw_frame_header) {
908                 av_log(avctx, AV_LOG_ERROR, "Missing Frame Header.\n");
909                 ret = AVERROR_INVALIDDATA;
910                 goto end;
911             }
912
913             if (unit->type == AV1_OBU_FRAME)
914                 raw_tile_group = &obu->obu.frame.tile_group;
915             else
916                 raw_tile_group = &obu->obu.tile_group;
917
918             ret = get_tiles_info(avctx, raw_tile_group);
919             if (ret < 0)
920                 goto end;
921
922             if (avctx->hwaccel) {
923                 ret = avctx->hwaccel->decode_slice(avctx,
924                                                    raw_tile_group->tile_data.data,
925                                                    raw_tile_group->tile_data.data_size);
926                 if (ret < 0) {
927                     av_log(avctx, AV_LOG_ERROR,
928                            "HW accel decode slice fail.\n");
929                     goto end;
930                 }
931             }
932             break;
933         case AV1_OBU_TILE_LIST:
934         case AV1_OBU_TEMPORAL_DELIMITER:
935         case AV1_OBU_PADDING:
936         case AV1_OBU_METADATA:
937             break;
938         default:
939             av_log(avctx, AV_LOG_DEBUG,
940                    "Unknown obu type: %d (%"SIZE_SPECIFIER" bits).\n",
941                    unit->type, unit->data_size);
942         }
943
944         if (raw_tile_group && (s->tile_num == raw_tile_group->tg_end + 1)) {
945             if (avctx->hwaccel) {
946                 ret = avctx->hwaccel->end_frame(avctx);
947                 if (ret < 0) {
948                     av_log(avctx, AV_LOG_ERROR, "HW accel end frame fail.\n");
949                     goto end;
950                 }
951             }
952
953             ret = update_reference_list(avctx);
954             if (ret < 0) {
955                 av_log(avctx, AV_LOG_ERROR, "Failed to update reference list.\n");
956                 goto end;
957             }
958
959             if (s->raw_frame_header->show_frame) {
960                 ret = set_output_frame(avctx, frame, pkt, got_frame);
961                 if (ret < 0) {
962                     av_log(avctx, AV_LOG_ERROR, "Set output frame error\n");
963                     goto end;
964                 }
965             }
966             raw_tile_group = NULL;
967             s->raw_frame_header = NULL;
968         }
969     }
970
971 end:
972     ff_cbs_fragment_reset(&s->current_obu);
973     if (ret < 0)
974         s->raw_frame_header = NULL;
975     return ret;
976 }
977
978 static void av1_decode_flush(AVCodecContext *avctx)
979 {
980     AV1DecContext *s = avctx->priv_data;
981
982     for (int i = 0; i < FF_ARRAY_ELEMS(s->ref); i++)
983         av1_frame_unref(avctx, &s->ref[i]);
984
985     av1_frame_unref(avctx, &s->cur_frame);
986     s->raw_frame_header = NULL;
987     s->raw_seq = NULL;
988
989     ff_cbs_flush(s->cbc);
990 }
991
992 AVCodec ff_av1_decoder = {
993     .name                  = "av1",
994     .long_name             = NULL_IF_CONFIG_SMALL("Alliance for Open Media AV1"),
995     .type                  = AVMEDIA_TYPE_VIDEO,
996     .id                    = AV_CODEC_ID_AV1,
997     .priv_data_size        = sizeof(AV1DecContext),
998     .init                  = av1_decode_init,
999     .close                 = av1_decode_free,
1000     .decode                = av1_decode_frame,
1001     .capabilities          = AV_CODEC_CAP_DR1 | AV_CODEC_CAP_AVOID_PROBING,
1002     .caps_internal         = FF_CODEC_CAP_INIT_THREADSAFE |
1003                              FF_CODEC_CAP_INIT_CLEANUP |
1004                              FF_CODEC_CAP_SETS_PKT_DTS,
1005     .flush                 = av1_decode_flush,
1006     .profiles              = NULL_IF_CONFIG_SMALL(ff_av1_profiles),
1007     .hw_configs            = (const AVCodecHWConfigInternal * []) {
1008 #if CONFIG_AV1_DXVA2_HWACCEL
1009         HWACCEL_DXVA2(av1),
1010 #endif
1011 #if CONFIG_AV1_D3D11VA_HWACCEL
1012         HWACCEL_D3D11VA(av1),
1013 #endif
1014 #if CONFIG_AV1_D3D11VA2_HWACCEL
1015         HWACCEL_D3D11VA2(av1),
1016 #endif
1017 #if CONFIG_AV1_NVDEC_HWACCEL
1018         HWACCEL_NVDEC(av1),
1019 #endif
1020 #if CONFIG_AV1_VAAPI_HWACCEL
1021         HWACCEL_VAAPI(av1),
1022 #endif
1023         NULL
1024     },
1025 };