xref: /rockchip-linux_mpp/mpp/codec/dec/av1/av1d_parser.c (revision 437bfbeb9567cca9cd9080e3f6954aa9d6a94f18)
1 /*
2  * Copyright 2021 Rockchip Electronics Co. LTD
3  *
4  * Licensed under the Apache License, Version 2.0 (the "License");
5  * you may not use this file except in compliance with the License.
6  * You may obtain a copy of the License at
7  *
8  *      http://www.apache.org/licenses/LICENSE-2.0
9  *
10  * Unless required by applicable law or agreed to in writing, software
11  * distributed under the License is distributed on an "AS IS" BASIS,
12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13  * See the License for the specific language governing permissions and
14  * limitations under the License.
15  */
16 
17 #define MODULE_TAG "av1d_parser"
18 
19 #include <stdlib.h>
20 #include <string.h>
21 
22 #include "mpp_env.h"
23 #include "mpp_mem.h"
24 #include "mpp_debug.h"
25 #include "mpp_common.h"
26 #include "mpp_compat_impl.h"
27 #include "rk_hdr_meta_com.h"
28 
29 #include "mpp_bitread.h"
30 #include "mpp_packet_impl.h"
31 
32 #include "av1d_parser.h"
33 #include "mpp_dec_cb_param.h"
34 #include "mpp_frame_impl.h"
35 
36 RK_U32 av1d_debug = 0;
37 
38 static const RK_S16 div_lut[AV1_DIV_LUT_NUM] = {
39     16384, 16320, 16257, 16194, 16132, 16070, 16009, 15948, 15888, 15828, 15768,
40     15709, 15650, 15592, 15534, 15477, 15420, 15364, 15308, 15252, 15197, 15142,
41     15087, 15033, 14980, 14926, 14873, 14821, 14769, 14717, 14665, 14614, 14564,
42     14513, 14463, 14413, 14364, 14315, 14266, 14218, 14170, 14122, 14075, 14028,
43     13981, 13935, 13888, 13843, 13797, 13752, 13707, 13662, 13618, 13574, 13530,
44     13487, 13443, 13400, 13358, 13315, 13273, 13231, 13190, 13148, 13107, 13066,
45     13026, 12985, 12945, 12906, 12866, 12827, 12788, 12749, 12710, 12672, 12633,
46     12596, 12558, 12520, 12483, 12446, 12409, 12373, 12336, 12300, 12264, 12228,
47     12193, 12157, 12122, 12087, 12053, 12018, 11984, 11950, 11916, 11882, 11848,
48     11815, 11782, 11749, 11716, 11683, 11651, 11619, 11586, 11555, 11523, 11491,
49     11460, 11429, 11398, 11367, 11336, 11305, 11275, 11245, 11215, 11185, 11155,
50     11125, 11096, 11067, 11038, 11009, 10980, 10951, 10923, 10894, 10866, 10838,
51     10810, 10782, 10755, 10727, 10700, 10673, 10645, 10618, 10592, 10565, 10538,
52     10512, 10486, 10460, 10434, 10408, 10382, 10356, 10331, 10305, 10280, 10255,
53     10230, 10205, 10180, 10156, 10131, 10107, 10082, 10058, 10034, 10010, 9986,
54     9963,  9939,  9916,  9892,  9869,  9846,  9823,  9800,  9777,  9754,  9732,
55     9709,  9687,  9664,  9642,  9620,  9598,  9576,  9554,  9533,  9511,  9489,
56     9468,  9447,  9425,  9404,  9383,  9362,  9341,  9321,  9300,  9279,  9259,
57     9239,  9218,  9198,  9178,  9158,  9138,  9118,  9098,  9079,  9059,  9039,
58     9020,  9001,  8981,  8962,  8943,  8924,  8905,  8886,  8867,  8849,  8830,
59     8812,  8793,  8775,  8756,  8738,  8720,  8702,  8684,  8666,  8648,  8630,
60     8613,  8595,  8577,  8560,  8542,  8525,  8508,  8490,  8473,  8456,  8439,
61     8422,  8405,  8389,  8372,  8355,  8339,  8322,  8306,  8289,  8273,  8257,
62     8240,  8224,  8208,  8192
63 };
64 
65 /**
66  * Clip a signed integer into the -(2^p),(2^p-1) range.
67  * @param  a value to clip
68  * @param  p bit position to clip at
69  * @return clipped value
70  */
mpp_clip_uintp2(RK_S32 a,RK_S32 p)71 static   RK_U32 mpp_clip_uintp2(RK_S32 a, RK_S32 p)
72 {
73     if (a & ~((1 << p) - 1)) return -a >> 31 & ((1 << p) - 1);
74     else                   return  a;
75 }
76 
77 static const Av1UnitType unit_types[] = {
78     AV1_OBU_TEMPORAL_DELIMITER,
79     AV1_OBU_SEQUENCE_HEADER,
80     AV1_OBU_FRAME_HEADER,
81     AV1_OBU_TILE_GROUP,
82     AV1_OBU_METADATA,
83     AV1_OBU_FRAME,
84 };
85 
get_pixel_format(Av1CodecContext * ctx)86 static MPP_RET get_pixel_format(Av1CodecContext *ctx)
87 {
88     AV1Context *s = ctx->priv_data;
89     const AV1RawSequenceHeader *seq = s->sequence_header;
90     uint8_t bit_depth = 8;;
91     MPP_RET ret = MPP_OK;
92     MppFrameFormat pix_fmt = MPP_FMT_BUTT;
93 
94     if (seq->seq_profile == 2 && seq->color_config.high_bitdepth)
95         bit_depth = seq->color_config.twelve_bit ? 12 : 10;
96     else if (seq->seq_profile <= 2)
97         bit_depth = seq->color_config.high_bitdepth ? 10 : 8;
98     else {
99         mpp_err_f("Unknown AV1 profile %d.\n", seq->seq_profile);
100         return -1;
101     }
102 
103     if (!seq->color_config.mono_chrome) {
104         // 4:4:4 x:0 y:0, 4:2:2 x:1 y:0, 4:2:0 x:1 y:1
105         if (seq->color_config.subsampling_x == 0 &&
106             seq->color_config.subsampling_y == 0) {
107             mpp_err_f("no support yuv444 AV1 pixel format.\n");
108             return -1;
109         } else if (seq->color_config.subsampling_x == 1 &&
110                    seq->color_config.subsampling_y == 0) {
111             if (bit_depth == 8)
112                 pix_fmt = MPP_FMT_YUV422P;
113             else {
114                 mpp_err_f("no support yuv422 bit depth > 8\n");
115                 return -1;
116             }
117         } else if (seq->color_config.subsampling_x == 1 &&
118                    seq->color_config.subsampling_y == 1) {
119             if (bit_depth == 8)
120                 pix_fmt = MPP_FMT_YUV420SP;
121             else if (bit_depth == 10) {
122                 pix_fmt = MPP_FMT_YUV420SP_10BIT;
123                 /* rk3588, allow user config 8bit for 10bit source. */
124                 if ((mpp_get_soc_type() == ROCKCHIP_SOC_RK3588) &&
125                     (ctx->usr_set_fmt & MPP_FRAME_FMT_MASK) == MPP_FMT_YUV420SP &&
126                     (s->cfg->base.out_fmt & MPP_FRAME_FMT_MASK) == MPP_FMT_YUV420SP)
127                     pix_fmt = MPP_FMT_YUV420SP;
128             } else {
129                 mpp_err_f("no support MPP_FMT_YUV420SP bit depth > 8\n");
130                 return -1;
131             }
132         }
133     } else {
134         mpp_err_f("no supprot PIX_FMT_GRAY pixel format.\n");
135         return -1;
136     }
137 
138 
139     if (pix_fmt == MPP_FMT_BUTT)
140         return -1;
141     ctx->pix_fmt = pix_fmt;
142     s->bit_depth = bit_depth;
143     return ret;
144 }
145 
inverse_recenter(RK_S32 r,RK_U32 v)146 static RK_U32 inverse_recenter(RK_S32 r, RK_U32 v)
147 {
148     if ((RK_S32)v > 2 * r)
149         return v;
150     else if (v & 1)
151         return r - ((v + 1) >> 1);
152     else
153         return r + (v >> 1);
154 }
155 
decode_unsigned_subexp_with_ref(RK_U32 sub_exp,RK_S32 mx,RK_S32 r)156 static RK_U32 decode_unsigned_subexp_with_ref(RK_U32 sub_exp,
157                                               RK_S32 mx, RK_S32 r)
158 {
159     if ((r << 1) <= mx) {
160         return inverse_recenter(r, sub_exp);
161     } else {
162         return mx - 1 - inverse_recenter(mx - 1 - r, sub_exp);
163     }
164 }
165 
decode_signed_subexp_with_ref(RK_U32 sub_exp,RK_S32 low,RK_S32 high,RK_S32 r)166 static RK_S32 decode_signed_subexp_with_ref(RK_U32 sub_exp, RK_S32 low,
167                                             RK_S32 high, RK_S32 r)
168 {
169     RK_S32 x = decode_unsigned_subexp_with_ref(sub_exp, high - low, r - low);
170     return x + low;
171 }
172 
read_global_param(AV1Context * s,RK_S32 type,RK_S32 ref,RK_S32 idx)173 static void read_global_param(AV1Context *s, RK_S32 type, RK_S32 ref, RK_S32 idx)
174 {
175     uint8_t primary_frame, prev_frame;
176     RK_U32 abs_bits, prec_bits, round, prec_diff, sub, mx;
177     RK_S32 r, prev_gm_param;
178 
179     primary_frame = s->raw_frame_header->primary_ref_frame;
180     prev_frame = s->raw_frame_header->ref_frame_idx[primary_frame];
181     abs_bits = AV1_GM_ABS_ALPHA_BITS;
182     prec_bits = AV1_GM_ALPHA_PREC_BITS;
183 
184     /* setup_past_independence() sets PrevGmParams to default values. We can
185      * simply point to the current's frame gm_params as they will be initialized
186      * with defaults at this point.
187      */
188     if (s->raw_frame_header->primary_ref_frame == AV1_PRIMARY_REF_NONE)
189         prev_gm_param = s->cur_frame.gm_params[ref].wmmat[idx];
190     else
191         prev_gm_param = s->ref[prev_frame].gm_params[ref].wmmat[idx];
192 
193     if (idx < 2) {
194         if (type == AV1_WARP_MODEL_TRANSLATION) {
195             abs_bits = AV1_GM_ABS_TRANS_ONLY_BITS -
196                        !s->raw_frame_header->allow_high_precision_mv;
197             prec_bits = AV1_GM_TRANS_ONLY_PREC_BITS -
198                         !s->raw_frame_header->allow_high_precision_mv;
199         } else {
200             abs_bits = AV1_GM_ABS_TRANS_BITS;
201             prec_bits = AV1_GM_TRANS_PREC_BITS;
202         }
203     }
204     round = (idx % 3) == 2 ? (1 << AV1_WARPEDMODEL_PREC_BITS) : 0;
205     prec_diff = AV1_WARPEDMODEL_PREC_BITS - prec_bits;
206     sub = (idx % 3) == 2 ? (1 << prec_bits) : 0;
207     mx = 1 << abs_bits;
208     r = (prev_gm_param >> prec_diff) - sub;
209 
210     s->cur_frame.gm_params[ref].wmmat_val[idx] =
211         decode_signed_subexp_with_ref(s->raw_frame_header->gm_params[ref][idx],
212                                       -mx, mx + 1, r);
213     s->cur_frame.gm_params[ref].wmmat[idx] =
214         (s->cur_frame.gm_params[ref].wmmat_val[idx] << prec_diff) + round;
215 }
216 
round_two(RK_U64 x,RK_U16 n)217 static RK_U16 round_two(RK_U64 x, RK_U16 n)
218 {
219     if (n == 0)
220         return x;
221     return ((x + ((RK_U64)1 << (n - 1))) >> n);
222 }
223 
round_two_signed(RK_S64 x,RK_U16 n)224 static RK_S64 round_two_signed(RK_S64 x, RK_U16 n)
225 {
226     return ((x < 0) ? -((RK_S64)round_two(-x, n)) : (RK_S64)round_two(x, n));
227 }
228 
229 /**
230  * Resolve divisor process.
231  * see spec 7.11.3.7
232  */
resolve_divisor(RK_U32 d,RK_S16 * shift)233 static RK_S16 resolve_divisor(RK_U32 d, RK_S16 *shift)
234 {
235     RK_S32 e, f;
236 
237     *shift = mpp_log2(d);
238     e = d - (1 << (*shift));
239     if (*shift > AV1_DIV_LUT_BITS)
240         f = round_two(e, *shift - AV1_DIV_LUT_BITS);
241     else
242         f = e << (AV1_DIV_LUT_BITS - (*shift));
243 
244     *shift += AV1_DIV_LUT_PREC_BITS;
245 
246     return div_lut[f];
247 }
248 
249 /**
250  * check if global motion params is valid.
251  * see spec 7.11.3.6
252  */
get_shear_params_valid(AV1Context * s,RK_S32 idx)253 static RK_U8 get_shear_params_valid(AV1Context *s, RK_S32 idx)
254 {
255     RK_S16 alpha, beta, gamma, delta, divf, divs;
256     RK_S64 v, w;
257     RK_S32 *param = &s->cur_frame.gm_params[idx].wmmat[0];
258 
259     if (param[2] < 0)
260         return 0;
261 
262     alpha = MPP_CLIP3(INT16_MIN, INT16_MAX, param[2] - (1 << AV1_WARPEDMODEL_PREC_BITS));
263     beta  = MPP_CLIP3(INT16_MIN, INT16_MAX, param[3]);
264     divf  = resolve_divisor(MPP_ABS(param[2]), &divs) * (param[2] < 0 ? -1 : 1);
265     v     = (RK_S64)param[4] * (1 << AV1_WARPEDMODEL_PREC_BITS);
266     w     = (RK_S64)param[3] * param[4];
267     gamma = MPP_CLIP3(INT16_MIN, INT16_MAX, (RK_S32)round_two_signed((v * divf), divs));
268     delta = MPP_CLIP3(INT16_MIN, INT16_MAX, param[5] - (RK_S32)round_two_signed((w * divf), divs) -
269                       (1 << AV1_WARPEDMODEL_PREC_BITS));
270 
271     alpha = round_two_signed(alpha, AV1_WARP_PARAM_REDUCE_BITS) << AV1_WARP_PARAM_REDUCE_BITS;
272     beta  = round_two_signed(beta,  AV1_WARP_PARAM_REDUCE_BITS) << AV1_WARP_PARAM_REDUCE_BITS;
273     gamma = round_two_signed(gamma, AV1_WARP_PARAM_REDUCE_BITS) << AV1_WARP_PARAM_REDUCE_BITS;
274     delta = round_two_signed(delta, AV1_WARP_PARAM_REDUCE_BITS) << AV1_WARP_PARAM_REDUCE_BITS;
275 
276     s->cur_frame.gm_params[idx].alpha = alpha;
277     s->cur_frame.gm_params[idx].beta = beta;
278     s->cur_frame.gm_params[idx].gamma = gamma;
279     s->cur_frame.gm_params[idx].delta = delta;
280 
281     if ((4 * MPP_ABS(alpha) + 7 * MPP_ABS(beta)) >= (1 << AV1_WARPEDMODEL_PREC_BITS) ||
282         (4 * MPP_ABS(gamma) + 4 * MPP_ABS(delta)) >= (1 << AV1_WARPEDMODEL_PREC_BITS))
283         return 0;
284 
285     return 1;
286 }
287 
288 /**
289 * update gm type/params, since cbs already implemented part of this funcation,
290 * so we don't need to full implement spec.
291 */
global_motion_params(AV1Context * s)292 static void global_motion_params(AV1Context *s)
293 {
294     const AV1RawFrameHeader *header = s->raw_frame_header;
295     RK_S32 type, ref;
296     RK_S32 i = 0;
297     AV1Context *ctx = s;
298 
299     for (ref = AV1_REF_FRAME_LAST; ref <= AV1_REF_FRAME_ALTREF; ref++) {
300         s->cur_frame.gm_params[ref].wmtype = AV1_WARP_MODEL_IDENTITY;
301         for (i = 0; i < 6; i++)
302             s->cur_frame.gm_params[ref].wmmat[i] = (i % 3 == 2) ?
303                                                    1 << AV1_WARPEDMODEL_PREC_BITS : 0;
304     }
305     if (header->frame_type == AV1_FRAME_KEY ||
306         header->frame_type == AV1_FRAME_INTRA_ONLY)
307         return;
308 
309     for (ref = AV1_REF_FRAME_LAST; ref <= AV1_REF_FRAME_ALTREF; ref++) {
310         RK_U8 ref_uses_scaling = ctx->frame_width != ctx->ref_s[ref].frame_width ||
311                                  ctx->frame_height != ctx->ref_s[ref].frame_height;
312         RK_U32 shear_params_valid = 0;
313 
314         if (header->is_global[ref]) {
315             if (header->is_rot_zoom[ref]) {
316                 type = AV1_WARP_MODEL_ROTZOOM;
317             } else {
318                 type = header->is_translation[ref] ? AV1_WARP_MODEL_TRANSLATION
319                        : AV1_WARP_MODEL_AFFINE;
320             }
321         } else {
322             type = AV1_WARP_MODEL_IDENTITY;
323         }
324         s->cur_frame.gm_params[ref].wmtype = type;
325 
326         if (type >= AV1_WARP_MODEL_ROTZOOM) {
327             read_global_param(s, type, ref, 2);
328             read_global_param(s, type, ref, 3);
329             if (type == AV1_WARP_MODEL_AFFINE) {
330                 read_global_param(s, type, ref, 4);
331                 read_global_param(s, type, ref, 5);
332             } else {
333                 s->cur_frame.gm_params[ref].wmmat[4] = -s->cur_frame.gm_params[ref].wmmat[3];
334                 s->cur_frame.gm_params[ref].wmmat[5] = s->cur_frame.gm_params[ref].wmmat[2];
335             }
336         }
337         if (type >= AV1_WARP_MODEL_TRANSLATION) {
338             read_global_param(s, type, ref, 0);
339             read_global_param(s, type, ref, 1);
340         }
341 
342         if (type <= AV1_WARP_MODEL_AFFINE)
343             shear_params_valid = get_shear_params_valid(ctx, ref);
344 
345         if (!shear_params_valid || ref_uses_scaling) {
346             ctx->cur_frame.gm_params[ref].alpha = -32768;
347             ctx->cur_frame.gm_params[ref].beta  = -32768;
348             ctx->cur_frame.gm_params[ref].gamma = -32768;
349             ctx->cur_frame.gm_params[ref].delta = -32768;
350         }
351         av1d_dbg(AV1D_DBG_HEADER, "ref %d alpa %d beta %d gamma %d delta %d\n",
352                  ref,
353                  ctx->cur_frame.gm_params[ref].alpha,
354                  ctx->cur_frame.gm_params[ref].beta,
355                  ctx->cur_frame.gm_params[ref].gamma,
356                  ctx->cur_frame.gm_params[ref].delta);
357     }
358 }
359 
get_relative_dist(const AV1RawSequenceHeader * seq,RK_U32 a,RK_U32 b)360 static RK_S32 get_relative_dist(const AV1RawSequenceHeader *seq,
361                                 RK_U32 a, RK_U32 b)
362 {
363     RK_U32 diff = a - b;
364     RK_U32 m = 1 << seq->order_hint_bits_minus_1;
365     return (diff & (m - 1)) - (diff & m);
366 }
367 
skip_mode_params(AV1Context * s)368 static void skip_mode_params(AV1Context *s)
369 {
370     const AV1RawFrameHeader *header = s->raw_frame_header;
371     const AV1RawSequenceHeader *seq = s->sequence_header;
372 
373     RK_S32 forward_idx,  backward_idx;
374     RK_S32 forward_hint, backward_hint;
375     RK_S32 second_forward_idx, second_forward_hint;
376     RK_S32 ref_hint, dist, i;
377 
378     if (!header->skip_mode_present)
379         return;
380 
381     forward_idx  = -1;
382     backward_idx = -1;
383     forward_hint = -1;
384     backward_hint = -1;
385     for (i = 0; i < AV1_REFS_PER_FRAME; i++) {
386         ref_hint = s->ref[header->ref_frame_idx[i]].order_hint;
387         dist = get_relative_dist(seq, ref_hint, header->order_hint);
388         if (dist < 0) {
389             if (forward_idx < 0 ||
390                 get_relative_dist(seq, ref_hint, forward_hint) > 0) {
391                 forward_idx  = i;
392                 forward_hint = ref_hint;
393             }
394         } else if (dist > 0) {
395             if (backward_idx < 0 ||
396                 get_relative_dist(seq, ref_hint, backward_hint) < 0) {
397                 backward_idx  = i;
398                 backward_hint = ref_hint;
399             }
400         }
401     }
402 
403     if (forward_idx < 0) {
404         return;
405     } else if (backward_idx >= 0) {
406         s->cur_frame.skip_mode_frame_idx[0] =
407             AV1_REF_FRAME_LAST + MPP_MIN(forward_idx, backward_idx);
408         s->cur_frame.skip_mode_frame_idx[1] =
409             AV1_REF_FRAME_LAST + MPP_MAX(forward_idx, backward_idx);
410         return;
411     }
412 
413     second_forward_idx = -1;
414     for (i = 0; i < AV1_REFS_PER_FRAME; i++) {
415         ref_hint = s->ref[header->ref_frame_idx[i]].order_hint;
416         if (get_relative_dist(seq, ref_hint, forward_hint) < 0) {
417             if (second_forward_idx < 0 ||
418                 get_relative_dist(seq, ref_hint, second_forward_hint) > 0) {
419                 second_forward_idx  = i;
420                 second_forward_hint = ref_hint;
421             }
422         }
423     }
424 
425     if (second_forward_idx < 0)
426         return;
427 
428     s->cur_frame.skip_mode_frame_idx[0] =
429         AV1_REF_FRAME_LAST + MPP_MIN(forward_idx, second_forward_idx);
430     s->cur_frame.skip_mode_frame_idx[1] =
431         AV1_REF_FRAME_LAST + MPP_MAX(forward_idx, second_forward_idx);
432 }
433 
coded_lossless_param(AV1Context * s)434 static void coded_lossless_param(AV1Context *s)
435 {
436     const AV1RawFrameHeader *header = s->raw_frame_header;
437     RK_S32 i;
438 
439     if (header->delta_q_y_dc || header->delta_q_u_ac ||
440         header->delta_q_u_dc || header->delta_q_v_ac ||
441         header->delta_q_v_dc) {
442         s->cur_frame.coded_lossless = 0;
443         return;
444     }
445 
446     s->cur_frame.coded_lossless = 1;
447     for (i = 0; i < AV1_MAX_SEGMENTS; i++) {
448         RK_S32 qindex;
449         if (header->feature_enabled[i][AV1_SEG_LVL_ALT_Q]) {
450             qindex = (header->base_q_idx +
451                       header->feature_value[i][AV1_SEG_LVL_ALT_Q]);
452         } else {
453             qindex = header->base_q_idx;
454         }
455         qindex = mpp_clip_uintp2(qindex, 8);
456 
457         if (qindex) {
458             s->cur_frame.coded_lossless = 0;
459             return;
460         }
461     }
462 }
463 
load_grain_params(AV1Context * s)464 static void load_grain_params(AV1Context *s)
465 {
466     const AV1RawFrameHeader *header = s->raw_frame_header;
467     const AV1RawFilmGrainParams *film_grain = &header->film_grain, *src;
468     AV1RawFilmGrainParams *dst = &s->cur_frame.film_grain;
469 
470     if (!film_grain->apply_grain)
471         return;
472 
473     if (film_grain->update_grain) {
474         memcpy(dst, film_grain, sizeof(*dst));
475         return;
476     }
477 
478     src = &s->ref[film_grain->film_grain_params_ref_idx].film_grain;
479 
480     memcpy(dst, src, sizeof(*dst));
481     dst->grain_seed = film_grain->grain_seed;
482 }
483 
484 typedef struct GetByteCxt_t {
485     const uint8_t *buffer, *buffer_end, *buffer_start;
486 } GetByteCxt;
bytestream_init(GetByteCxt * g,const uint8_t * buf,int buf_size)487 void bytestream_init(GetByteCxt *g,
488                      const uint8_t *buf,
489                      int buf_size)
490 {
491     mpp_assert(buf_size >= 0);
492     g->buffer       = buf;
493     g->buffer_start = buf;
494     g->buffer_end   = buf + buf_size;
495 }
496 
bytestream_get_bytes_left(GetByteCxt * g)497 static int bytestream_get_bytes_left(GetByteCxt *g)
498 {
499     return g->buffer_end - g->buffer;
500 }
501 
bytestream_skipu(GetByteCxt * g,unsigned int size)502 static void bytestream_skipu(GetByteCxt *g, unsigned int size)
503 {
504     g->buffer += size;
505 }
506 
bytestream_tell(GetByteCxt * g)507 static int bytestream_tell(GetByteCxt *g)
508 {
509     return (int)(g->buffer - g->buffer_start);
510 }
511 
bytestream_get_byteu(GetByteCxt * g)512 static int bytestream_get_byteu(GetByteCxt *g)
513 {
514     int tmp;
515     tmp = g->buffer[0];
516     g->buffer++;
517     return tmp;
518 }
519 
get_tiles_info(Av1CodecContext * ctx,const AV1RawTileGroup * tile_group)520 static RK_S32 get_tiles_info(Av1CodecContext *ctx, const AV1RawTileGroup *tile_group)
521 {
522     AV1Context *s = ctx->priv_data;
523     GetByteCxt gb;
524     RK_S16 tile_num;
525     RK_S32 size = 0, size_bytes = 0;
526     RK_S32 i;
527 
528     bytestream_init(&gb, tile_group->tile_data.data,
529                     tile_group->tile_data.data_size);
530 
531     if (s->tile_offset)
532         s->tile_offset += tile_group->tile_data.offset;
533 
534     for (tile_num = tile_group->tg_start; tile_num <= tile_group->tg_end; tile_num++) {
535         if (tile_num == tile_group->tg_end) {
536             s->tile_offset_start[tile_num] = bytestream_tell(&gb) + s->tile_offset;
537             s->tile_offset_end[tile_num] = bytestream_tell(&gb) + bytestream_get_bytes_left(&gb) + s->tile_offset;
538             s->tile_offset = s->tile_offset_end[tile_num];
539             return 0;
540         }
541         size_bytes = s->raw_frame_header->tile_size_bytes_minus1 + 1;
542         if (bytestream_get_bytes_left(&gb) < size_bytes)
543             return MPP_ERR_VALUE;
544         size = 0;
545         for (i = 0; i < size_bytes; i++)
546             size |= bytestream_get_byteu(&gb) << 8 * i;
547         if (bytestream_get_bytes_left(&gb) <= size)
548             return MPP_ERR_VALUE;
549         size++;
550 
551         s->tile_offset_start[tile_num] = bytestream_tell(&gb) + s->tile_offset;
552 
553         s->tile_offset_end[tile_num] = bytestream_tell(&gb) + size + s->tile_offset;
554 
555         bytestream_skipu(&gb, size);
556     }
557 
558     return 0;
559 
560 }
561 
av1d_frame_unref(Av1CodecContext * ctx,AV1Frame * f)562 static void av1d_frame_unref(Av1CodecContext *ctx, AV1Frame *f)
563 {
564     AV1Context *s = ctx->priv_data;
565     f->raw_frame_header = NULL;
566     f->spatial_id = f->temporal_id = 0;
567     memset(f->skip_mode_frame_idx, 0,
568            2 * sizeof(uint8_t));
569     memset(&f->film_grain, 0, sizeof(f->film_grain));
570 
571     f->coded_lossless = 0;
572 
573     if (!f->ref || f->ref->ref_count <= 0 || f->slot_index >= 0x7f) {
574         mpp_err("ref count alreay is zero");
575         return;
576     }
577 
578     f->ref->ref_count--;
579     av1d_dbg(AV1D_DBG_REF, "ref %p, f->ref->ref_count %d, ref->invisible= %d", f->ref, f->ref->ref_count, f->ref->invisible);
580     if (!f->ref->ref_count) {
581         if (f->slot_index < 0x7f) {
582             av1d_dbg(AV1D_DBG_REF, "clr f->slot_index = %d",  f->slot_index);
583             /* if pic no output for disaplay when ref_cnt
584                clear we will free this buffer directly,
585                maybe cause some frame can't display    */
586             // if (f->ref->invisible && !f->ref->is_output) {
587             if (!f->ref->is_output) {
588                 MppBuffer framebuf = NULL;
589                 mpp_buf_slot_get_prop(s->slots, f->slot_index, SLOT_BUFFER, &framebuf);
590                 av1d_dbg(AV1D_DBG_REF, "free framebuf prt %p", framebuf);
591                 if (framebuf)
592                     mpp_buffer_put(framebuf);
593                 f->ref->invisible = 0;
594             }
595             mpp_buf_slot_clr_flag(s->slots, f->slot_index, SLOT_CODEC_USE);
596         }
597         f->slot_index = 0xff;
598         mpp_free(f->ref);
599         f->ref = NULL;
600     }
601     f->ref = NULL;
602 }
603 
604 
set_output_frame(Av1CodecContext * ctx)605 static MPP_RET set_output_frame(Av1CodecContext *ctx)
606 {
607     AV1Context *s = ctx->priv_data;
608     MppFrame frame = NULL;
609     MPP_RET ret = MPP_OK;
610 
611     // TODO: all layers
612     if (s->operating_point_idc &&
613         mpp_log2(s->operating_point_idc >> 8) > s->cur_frame.spatial_id)
614         return 0;
615     mpp_buf_slot_get_prop(s->slots, s->cur_frame.slot_index, SLOT_FRAME_PTR, &frame);
616     if (s->hdr_dynamic_meta && s->hdr_dynamic) {
617         mpp_frame_set_hdr_dynamic_meta(frame, s->hdr_dynamic_meta);
618         s->hdr_dynamic = 0;
619         if (s->raw_frame_header->show_existing_frame)
620             fill_hdr_meta_to_frame(frame, MPP_VIDEO_CodingAV1);
621     }
622     mpp_frame_set_pts(frame, s->pts);
623     mpp_frame_set_dts(frame, s->dts);
624     mpp_buf_slot_set_flag(s->slots, s->cur_frame.slot_index, SLOT_QUEUE_USE);
625     mpp_buf_slot_enqueue(s->slots, s->cur_frame.slot_index, QUEUE_DISPLAY);
626     s->cur_frame.ref->is_output = 1;
627 
628     return ret;
629 }
630 
av1d_frame_ref(Av1CodecContext * ctx,AV1Frame * dst,const AV1Frame * src)631 static RK_S32 av1d_frame_ref(Av1CodecContext *ctx, AV1Frame *dst, const AV1Frame *src)
632 {
633     AV1Context *s = ctx->priv_data;
634     MppFrameImpl *impl_frm = (MppFrameImpl *)dst->f;
635     dst->spatial_id = src->spatial_id;
636     dst->temporal_id = src->temporal_id;
637     dst->order_hint  = src->order_hint;
638 
639     memcpy(dst->gm_params,
640            src->gm_params,
641            sizeof(src->gm_params));
642     memcpy(dst->skip_mode_frame_idx,
643            src->skip_mode_frame_idx,
644            2 * sizeof(uint8_t));
645     memcpy(&dst->film_grain,
646            &src->film_grain,
647            sizeof(dst->film_grain));
648     dst->coded_lossless = src->coded_lossless;
649 
650     if (src->slot_index >= 0x7f) {
651         mpp_err("av1d_ref_frame is vaild");
652         return -1;
653     }
654 
655     dst->slot_index = src->slot_index;
656     dst->ref = src->ref;
657     dst->ref->ref_count++;
658 
659     mpp_buf_slot_get_prop(s->slots, src->slot_index, SLOT_FRAME, &dst->f);
660     impl_frm->buffer = NULL; //parser no need process hal buf
661 
662 
663     return 0;
664 }
665 
update_reference_list(Av1CodecContext * ctx)666 static MPP_RET update_reference_list(Av1CodecContext *ctx)
667 {
668     AV1Context *s = ctx->priv_data;
669     const AV1RawFrameHeader *header = s->raw_frame_header;
670     MPP_RET ret = MPP_OK;
671     RK_S32 i = 0;
672     RK_S32 lst2_buf_idx;
673     RK_S32 lst3_buf_idx;
674     RK_S32 gld_buf_idx;
675     RK_S32 alt_buf_idx;
676     RK_S32 lst_buf_idx;
677     RK_S32 bwd_buf_idx;
678     RK_S32 alt2_buf_idx;
679 
680     for (i = 0; i < AV1_NUM_REF_FRAMES; i++) {
681         if (header->refresh_frame_flags & (1 << i)) {
682             s->ref_s[i] = (AV1ReferenceFrameState) {
683                 .valid = 1,
684                  .frame_id = header->current_frame_id,
685                   .upscaled_width = s->upscaled_width,
686                    .frame_width = s->frame_width,
687                     .frame_height = s->frame_height,
688                      .render_width = s->render_width,
689                       .render_height = s->render_height,
690                        .frame_type = header->frame_type,
691                         .subsampling_x = s->sequence_header->color_config.subsampling_x,
692                          .subsampling_y = s->sequence_header->color_config.subsampling_y,
693                           .bit_depth = s->bit_depth,
694                            .order_hint = s->order_hint,
695             };
696             memcpy(s->ref_s[i].loop_filter_ref_deltas, header->loop_filter_ref_deltas,
697                    sizeof(header->loop_filter_ref_deltas));
698             memcpy(s->ref_s[i].loop_filter_mode_deltas, header->loop_filter_mode_deltas,
699                    sizeof(header->loop_filter_mode_deltas));
700             memcpy(s->ref_s[i].feature_enabled, header->feature_enabled,
701                    sizeof(header->feature_enabled));
702             memcpy(s->ref_s[i].feature_value, header->feature_value,
703                    sizeof(header->feature_value));
704         }
705     }
706 
707     if (!header->show_existing_frame) {
708         lst2_buf_idx = s->raw_frame_header->ref_frame_idx[AV1_REF_FRAME_LAST2 - AV1_REF_FRAME_LAST];
709         lst3_buf_idx = s->raw_frame_header->ref_frame_idx[AV1_REF_FRAME_LAST3 - AV1_REF_FRAME_LAST];
710         gld_buf_idx =  s->raw_frame_header->ref_frame_idx[AV1_REF_FRAME_GOLDEN - AV1_REF_FRAME_LAST];
711         alt_buf_idx =  s->raw_frame_header->ref_frame_idx[AV1_REF_FRAME_ALTREF - AV1_REF_FRAME_LAST];
712         lst_buf_idx =  s->raw_frame_header->ref_frame_idx[AV1_REF_FRAME_LAST - AV1_REF_FRAME_LAST];
713         bwd_buf_idx =  s->raw_frame_header->ref_frame_idx[AV1_REF_FRAME_BWDREF - AV1_REF_FRAME_LAST];
714         alt2_buf_idx = s->raw_frame_header->ref_frame_idx[AV1_REF_FRAME_ALTREF2 - AV1_REF_FRAME_LAST];
715 
716         s->cur_frame.ref->lst2_frame_offset = s->ref[lst2_buf_idx].order_hint;
717         s->cur_frame.ref->lst3_frame_offset = s->ref[lst3_buf_idx].order_hint;
718         s->cur_frame.ref->gld_frame_offset  = s->ref[gld_buf_idx].order_hint;
719         s->cur_frame.ref->alt_frame_offset  = s->ref[alt_buf_idx].order_hint;
720         s->cur_frame.ref->lst_frame_offset  = s->ref[lst_buf_idx].order_hint;
721         s->cur_frame.ref->bwd_frame_offset  = s->ref[bwd_buf_idx].order_hint;
722         s->cur_frame.ref->alt2_frame_offset = s->ref[alt2_buf_idx].order_hint;
723     }
724 
725     for (i = 0; i < AV1_NUM_REF_FRAMES; i++) {
726         av1d_dbg(AV1D_DBG_REF, "header->refresh_frame_flags = %d",
727                  header->refresh_frame_flags);
728         if (header->refresh_frame_flags & (1 << i)) {
729             av1d_dbg(AV1D_DBG_REF, "av1 ref idx %d s->ref[%d].slot_index %d",
730                      i, i, s->ref[i].slot_index);
731             if (s->ref[i].ref)
732                 av1d_frame_unref(ctx, &s->ref[i]);
733 
734             if ((ret = av1d_frame_ref(ctx, &s->ref[i], &s->cur_frame)) < 0) {
735                 mpp_err_f("Failed to update frame %d in reference list\n", i);
736                 return ret;
737             }
738         }
739     }
740     return ret;
741 }
742 
hor_align_16(RK_U32 val)743 static RK_U32 hor_align_16(RK_U32 val)
744 {
745     return MPP_ALIGN(val, 16);
746 }
747 
get_current_frame(Av1CodecContext * ctx)748 static MPP_RET get_current_frame(Av1CodecContext *ctx)
749 {
750     AV1Context *s = ctx->priv_data;
751     MPP_RET ret = MPP_OK;
752     AV1Frame *frame = &s->cur_frame;
753     RK_U32 value;
754 
755     if (frame->ref)
756         av1d_frame_unref(ctx, frame);
757 
758     mpp_frame_set_meta(frame->f, NULL);
759     mpp_frame_set_width(frame->f, s->frame_width);
760     mpp_frame_set_height(frame->f, s->frame_height);
761 
762     /*
763      * rk3588, user can set 8bit for 10bit source.
764      * If user config 8bit output when input video is 10bti,
765      * here should set hor_stride according to 8bit.
766      */
767     if (MPP_FRAME_FMT_IS_YUV_10BIT(ctx->pix_fmt))
768         mpp_frame_set_hor_stride(frame->f, MPP_ALIGN(s->frame_width * s->bit_depth / 8, 8));
769     else
770         mpp_frame_set_hor_stride(frame->f, MPP_ALIGN(s->frame_width, 8));
771 
772     mpp_frame_set_ver_stride(frame->f, MPP_ALIGN(s->frame_height, 8));
773     mpp_frame_set_errinfo(frame->f, 0);
774     mpp_frame_set_discard(frame->f, 0);
775     mpp_frame_set_pts(frame->f, s->pts);
776     mpp_frame_set_dts(frame->f, s->dts);
777 
778     mpp_frame_set_color_trc(frame->f, ctx->color_trc);
779     mpp_frame_set_color_primaries(frame->f, ctx->color_primaries);
780     mpp_frame_set_colorspace(frame->f, ctx->colorspace);
781     mpp_frame_set_color_range(frame->f, ctx->color_range);
782 
783     mpp_frame_set_mastering_display(frame->f, s->mastering_display);
784     mpp_frame_set_content_light(frame->f, s->content_light);
785 
786     if (MPP_FRAME_FMT_IS_FBC(s->cfg->base.out_fmt)) {
787         RK_U32 fbc_hdr_stride = MPP_ALIGN(ctx->width, 64);
788 
789         mpp_slots_set_prop(s->slots, SLOTS_HOR_ALIGN, hor_align_16);
790         if (s->bit_depth == 10) {
791             if ((ctx->pix_fmt & MPP_FRAME_FMT_MASK) == MPP_FMT_YUV420SP ||
792                 (ctx->pix_fmt & MPP_FRAME_FMT_MASK) == MPP_FMT_YUV420SP_10BIT)
793                 ctx->pix_fmt = MPP_FMT_YUV420SP_10BIT;
794             else
795                 mpp_err("422p 10bit no support");
796         }
797 
798         ctx->pix_fmt |= s->cfg->base.out_fmt & (MPP_FRAME_FBC_MASK);
799         mpp_frame_set_offset_x(frame->f, 0);
800         mpp_frame_set_offset_y(frame->f, 0);
801         if (mpp_get_soc_type() == ROCKCHIP_SOC_RK3588)
802             mpp_frame_set_ver_stride(frame->f, MPP_ALIGN(ctx->height, 8) + 28);
803 
804         if (*compat_ext_fbc_hdr_256_odd)
805             fbc_hdr_stride = MPP_ALIGN(ctx->width, 256) | 256;
806 
807         mpp_frame_set_fbc_hdr_stride(frame->f, fbc_hdr_stride);
808     } else if (MPP_FRAME_FMT_IS_TILE(s->cfg->base.out_fmt)) {
809         ctx->pix_fmt |= s->cfg->base.out_fmt & (MPP_FRAME_TILE_FLAG);
810     }
811 
812     if (s->is_hdr)
813         ctx->pix_fmt |= MPP_FRAME_HDR;
814 
815     mpp_frame_set_fmt(frame->f, ctx->pix_fmt);
816 
817     if (s->cfg->base.enable_thumbnail && s->hw_info && s->hw_info->cap_down_scale)
818         mpp_frame_set_thumbnail_en(frame->f, s->cfg->base.enable_thumbnail);
819     else
820         mpp_frame_set_thumbnail_en(frame->f, 0);
821 
822     value = 4;
823     mpp_slots_set_prop(s->slots, SLOTS_NUMERATOR, &value);
824     value = 1;
825     mpp_slots_set_prop(s->slots, SLOTS_DENOMINATOR, &value);
826     mpp_buf_slot_get_unused(s->slots, &frame->slot_index);
827     av1d_dbg(AV1D_DBG_REF, "get frame->slot_index %d", frame->slot_index);
828     mpp_buf_slot_set_prop(s->slots, frame->slot_index, SLOT_FRAME, frame->f);
829     mpp_buf_slot_set_flag(s->slots, frame->slot_index, SLOT_CODEC_USE);
830     mpp_buf_slot_set_flag(s->slots, frame->slot_index, SLOT_HAL_OUTPUT);
831 
832     frame->ref = mpp_calloc(RefInfo, 1);
833     frame->ref->ref_count++;
834     frame->ref->is_intra_frame = !s->raw_frame_header->frame_type;
835     frame->ref->intra_only     = (s->raw_frame_header->frame_type == 2);
836     frame->ref->is_output = 0;
837     if (!s->raw_frame_header->show_frame && !s->raw_frame_header->showable_frame) {
838         frame->ref->invisible = 1;
839     }
840 
841     if (ret < 0) {
842         mpp_err_f("Failed to allocate space for current frame.\n");
843         return ret;
844     }
845 
846     /*  ret = init_tile_data(s);
847       if (ret < 0) {
848           mpp_err_f( "Failed to init tile data.\n");
849           return ret;
850       }*/
851     global_motion_params(s);
852     skip_mode_params(s);
853     coded_lossless_param(s);
854     load_grain_params(s);
855 
856     return ret;
857 }
858 
av1d_parser_init(Av1CodecContext * ctx,ParserCfg * init)859 MPP_RET av1d_parser_init(Av1CodecContext *ctx, ParserCfg *init)
860 {
861     MPP_RET ret = MPP_OK;
862     RK_S32 i = 0;
863     av1d_dbg_func("enter ctx %p\n", ctx);
864     AV1Context *s = mpp_calloc(AV1Context, 1);
865     ctx->priv_data = (void*)s;
866     if (!ctx->priv_data) {
867         mpp_err("av1d codec context malloc fail");
868         return MPP_ERR_NOMEM;
869     }
870 
871     s->seq_ref = mpp_calloc(AV1RawSequenceHeader, 1);
872 
873     s->unit_types = unit_types;
874     s->nb_unit_types = MPP_ARRAY_ELEMS(unit_types);
875     s->packet_slots = init->packet_slots;
876     s->slots = init->frame_slots;
877     s->cfg = init->cfg;
878     s->hw_info = init->hw_info;
879     mpp_buf_slot_setup(s->slots, 25);
880 
881     mpp_env_get_u32("av1d_debug", &av1d_debug, 0);
882     for (i = 0; i < AV1_NUM_REF_FRAMES; i++) {
883         mpp_frame_init(&s->ref[i].f);
884         if (!s->ref[i].f) {
885             mpp_err("Failed to allocate frame buffer %d\n", i);
886             return MPP_ERR_NOMEM;
887         }
888         s->ref[i].slot_index = 0x7f;
889         s->ref[i].ref = NULL;
890     }
891 
892     mpp_frame_init(&s->cur_frame.f);
893     s->cur_frame.ref = NULL;
894     s->cur_frame.slot_index = 0xff;
895     if (!s->cur_frame.f) {
896         mpp_err("Failed to allocate frame buffer %d\n", i);
897         return MPP_ERR_NOMEM;
898     }
899     s->cdfs = &s->default_cdfs;
900     s->cdfs_ndvc = &s->default_cdfs_ndvc;
901     AV1SetDefaultCDFs(s->cdfs, s->cdfs_ndvc);
902 
903     return MPP_OK;
904 
905     av1d_dbg_func("leave ctx %p\n", ctx);
906 
907     return ret;
908 }
909 
av1d_parser_deinit(Av1CodecContext * ctx)910 MPP_RET av1d_parser_deinit(Av1CodecContext *ctx)
911 {
912     MPP_RET ret = MPP_OK;
913     RK_U32 i = 0;
914 
915     AV1Context *s = ctx->priv_data;
916     for ( i = 0; i < MPP_ARRAY_ELEMS(s->ref); i++) {
917         if (s->ref[i].ref) {
918             av1d_frame_unref(ctx, &s->ref[i]);
919         }
920         mpp_frame_deinit(&s->ref[i].f);
921         s->ref[i].f = NULL;
922     }
923     if (s->cur_frame.ref) {
924         av1d_frame_unref(ctx, &s->cur_frame);
925     }
926     mpp_frame_deinit(&s->cur_frame.f);
927 
928     mpp_av1_fragment_reset(&s->current_obu);
929     MPP_FREE(s->current_obu.units);
930     MPP_FREE(s->frame_header);
931     MPP_FREE(s->seq_ref);
932     MPP_FREE((s->hdr_dynamic_meta));
933     MPP_FREE(ctx->priv_data);
934     return MPP_OK;
935 
936     av1d_dbg_func("leave ctx %p\n", ctx);
937 
938     return ret;
939 }
940 
av1d_parser_frame(Av1CodecContext * ctx,HalDecTask * task)941 MPP_RET av1d_parser_frame(Av1CodecContext *ctx, HalDecTask *task)
942 {
943     RK_U8 *data = NULL;
944     RK_S32 size = 0;
945     AV1Context *s = ctx->priv_data;
946     AV1RawTileGroup *raw_tile_group = NULL;
947     MPP_RET ret = MPP_OK;
948     RK_S32 i;
949 
950     av1d_dbg_func("enter ctx %p\n", ctx);
951     task->valid = 0;
952 
953     data = (RK_U8 *)mpp_packet_get_pos(ctx->pkt);
954     size = (RK_S32)mpp_packet_get_length(ctx->pkt);
955 
956     s->pts = mpp_packet_get_pts(ctx->pkt);
957     s->dts = mpp_packet_get_dts(ctx->pkt);
958 
959     s->current_obu.data = data;
960     s->current_obu.data_size = size;
961     s->tile_offset = 0;
962     ret = mpp_av1_split_fragment(s, &s->current_obu, 0);
963     if (ret < 0) {
964         return ret;
965     }
966     ret = mpp_av1_read_fragment_content(s, &s->current_obu);
967     if (ret < 0) {
968         return ret;
969     }
970 
971     for (i = 0; i < s->current_obu.nb_units; i++) {
972         Av1ObuUnit *unit = &s->current_obu.units[i];
973         AV1RawOBU  *obu = unit->content;
974         const AV1RawOBUHeader *header;
975 
976         if (!obu)
977             continue;
978 
979         header = &obu->header;
980 
981         switch (unit->type) {
982         case AV1_OBU_SEQUENCE_HEADER:
983             memcpy(s->seq_ref, &obu->obu.sequence_header, sizeof(AV1RawSequenceHeader));
984             s->sequence_header = s->seq_ref;
985             ret = mpp_av1_set_context_with_sequence(ctx, s->sequence_header);
986             if (ret < 0) {
987                 mpp_err_f("Failed to set context.\n");
988                 s->sequence_header = NULL;
989                 goto end;
990             }
991 
992             s->operating_point_idc = s->sequence_header->operating_point_idc[s->operating_point];
993 
994             ret = get_pixel_format(ctx);
995             if (ret < 0) {
996                 mpp_err_f("Failed to get pixel format.\n");
997                 s->sequence_header = NULL;
998                 goto end;
999             }
1000             break;
1001         case AV1_OBU_REDUNDANT_FRAME_HEADER:
1002             if (s->raw_frame_header)
1003                 break;
1004             // fall-through
1005         case AV1_OBU_FRAME:
1006         case AV1_OBU_FRAME_HEADER:
1007             if (!s->sequence_header) {
1008                 mpp_err_f("Missing Sequence Header.\n");
1009                 ret = MPP_ERR_VALUE;
1010                 goto end;
1011             }
1012 
1013             if (unit->type == AV1_OBU_FRAME)
1014                 s->raw_frame_header = &obu->obu.frame.header;
1015             else
1016                 s->raw_frame_header = &obu->obu.frame_header;
1017 
1018             if (s->raw_frame_header->show_existing_frame) {
1019                 if (s->cur_frame.ref) {
1020                     av1d_frame_unref(ctx, &s->cur_frame);
1021                 }
1022 
1023                 ret = av1d_frame_ref(ctx, &s->cur_frame,
1024                                      &s->ref[s->raw_frame_header->frame_to_show_map_idx]);
1025 
1026                 if (ret < 0) {
1027                     mpp_err_f("Failed to get reference frame.\n");
1028                     goto end;
1029                 }
1030 
1031                 ret = update_reference_list(ctx);
1032                 if (ret < 0) {
1033                     mpp_err_f("Failed to update reference list.\n");
1034                     goto end;
1035                 }
1036                 ret = set_output_frame(ctx);
1037                 if (ret < 0)
1038                     mpp_err_f("Set output frame error.\n");
1039 
1040                 s->raw_frame_header = NULL;
1041 
1042                 goto end;
1043             }
1044             ret = get_current_frame(ctx);
1045             if (ret < 0) {
1046                 mpp_err_f("Get current frame error\n");
1047                 goto end;
1048             }
1049             s->cur_frame.spatial_id  = header->spatial_id;
1050             s->cur_frame.temporal_id = header->temporal_id;
1051             s->cur_frame.order_hint  = s->raw_frame_header->order_hint;
1052 
1053             if (unit->type != AV1_OBU_FRAME)
1054                 break;
1055             // fall-through
1056         case AV1_OBU_TILE_GROUP:
1057             if (!s->raw_frame_header) {
1058                 mpp_err_f("Missing Frame Header.\n");
1059                 ret = MPP_ERR_VALUE;
1060                 goto end;
1061             }
1062 
1063             if (unit->type == AV1_OBU_FRAME)
1064                 raw_tile_group = &obu->obu.frame.tile_group;
1065             else
1066                 raw_tile_group = &obu->obu.tile_group;
1067 
1068             ret = get_tiles_info(ctx, raw_tile_group);
1069             if (ret < 0)
1070                 goto end;
1071 
1072             break;
1073         case AV1_OBU_TILE_LIST:
1074         case AV1_OBU_TEMPORAL_DELIMITER:
1075         case AV1_OBU_PADDING:
1076         case AV1_OBU_METADATA:
1077             break;
1078         default:
1079             av1d_dbg(AV1D_DBG_HEADER, "Unknown obu type: %d (%d bits).\n",
1080                      unit->type, unit->data_size);
1081         }
1082 
1083         if (raw_tile_group && (s->tile_num == raw_tile_group->tg_end + 1)) {
1084             RK_U32 j;
1085 
1086             av1d_parser2_syntax(ctx);
1087             task->syntax.data = (void*)&ctx->pic_params;
1088             task->syntax.number = 1;
1089             task->valid = 1;
1090             task->output = s->cur_frame.slot_index;
1091             task->input_packet = ctx->pkt;
1092 
1093             for (j = 0; j < AV1_REFS_PER_FRAME; j++) {
1094                 int8_t ref_idx = s->raw_frame_header->ref_frame_idx[j];
1095                 if (s->ref[ref_idx].slot_index < 0x7f) {
1096                     mpp_buf_slot_set_flag(s->slots, s->ref[ref_idx].slot_index, SLOT_HAL_INPUT);
1097                     MppFrame mframe = NULL;
1098                     task->refer[j] = s->ref[ref_idx].slot_index;
1099                     mpp_buf_slot_get_prop(s->slots, task->refer[j], SLOT_FRAME_PTR, &mframe);
1100                     if (mframe)
1101                         task->flags.ref_err |= mpp_frame_get_errinfo(mframe);
1102                 } else {
1103                     task->refer[j] = -1;
1104                 }
1105             }
1106             ret = update_reference_list(ctx);
1107             if (ret < 0) {
1108                 mpp_err_f("Failed to update reference list.\n");
1109                 goto end;
1110             }
1111 
1112             if (s->raw_frame_header->show_frame) {
1113                 ret = set_output_frame(ctx);
1114                 if (ret < 0) {
1115                     mpp_err_f("Set output frame error\n");
1116                     goto end;
1117                 }
1118             }
1119             raw_tile_group = NULL;
1120             s->raw_frame_header = NULL;
1121         }
1122     }
1123 
1124     if (s->eos) {
1125         task->flags.eos = 1;
1126     }
1127 end:
1128     mpp_av1_fragment_reset(&s->current_obu);
1129     if (ret < 0)
1130         s->raw_frame_header = NULL;
1131 
1132     av1d_dbg_func("leave ctx %p\n", ctx);
1133     return ret;
1134 }
1135 
av1d_parser_update(Av1CodecContext * ctx,void * info)1136 void av1d_parser_update(Av1CodecContext *ctx, void *info)
1137 {
1138     AV1Context* c_ctx = (AV1Context*)ctx->priv_data;
1139     DecCbHalDone *cb = (DecCbHalDone*)info;
1140     RK_U8 *data = (RK_U8*)cb->task;
1141     RK_U32 i;
1142     const RK_U32 mv_cdf_offset = offsetof(AV1CDFs, mv_cdf);
1143     const RK_U32 mv_cdf_size = sizeof(MvCDFs);
1144     const RK_U32 mv_cdf_end_offset = mv_cdf_offset + mv_cdf_size;
1145     const RK_U32 cdf_size = sizeof(AV1CDFs);
1146 
1147     av1d_dbg_func("enter ctx %p\n", ctx);
1148     if (!c_ctx->disable_frame_end_update_cdf) {
1149         for (i = 0; i < NUM_REF_FRAMES; i++) {
1150             if (c_ctx->refresh_frame_flags & (1 << i)) {
1151                 /* 1. get cdfs */
1152                 Av1GetCDFs(c_ctx, i);
1153                 {
1154                     RK_U8 *cdf_base = (RK_U8 *)c_ctx->cdfs;
1155                     RK_U8 *cdf_ndvc_base = (RK_U8 *)c_ctx->cdfs_ndvc;
1156                     /* 2. read cdfs from memory*/
1157                     if (c_ctx->frame_is_intra) {
1158                         memcpy(cdf_base, data, mv_cdf_offset);
1159                         // Read intrabc MV context
1160                         memcpy(cdf_ndvc_base, data + mv_cdf_offset, mv_cdf_size);
1161                         memcpy(cdf_base + mv_cdf_end_offset, data + mv_cdf_end_offset,
1162                                cdf_size - mv_cdf_end_offset);
1163                     } else {
1164                         memcpy(cdf_base, data, cdf_size);
1165                     }
1166                 }
1167                 /* 3. store cdfs*/
1168                 Av1StoreCDFs(c_ctx, c_ctx->refresh_frame_flags);
1169                 break;
1170             }
1171         }
1172     }
1173 
1174     av1d_dbg_func("leave ctx %p\n", ctx);
1175 }
1176 
av1d_paser_reset(Av1CodecContext * ctx)1177 MPP_RET av1d_paser_reset(Av1CodecContext *ctx)
1178 {
1179     (void)ctx;
1180     MPP_RET ret = MPP_OK;
1181     RK_U32 i = 0;
1182     AV1Context *s = ctx->priv_data;
1183 
1184     av1d_dbg_func("enter ctx %p\n", ctx);
1185     for ( i = 0; i < MPP_ARRAY_ELEMS(s->ref); i++) {
1186         AV1Frame *f = &s->ref[i];
1187 
1188         if (f->ref)
1189             av1d_frame_unref(ctx, &s->ref[i]);
1190     }
1191 
1192     if (s->cur_frame.ref) {
1193         av1d_frame_unref(ctx, &s->cur_frame);
1194     }
1195 
1196     ctx->frame_header = 0;
1197     ctx->stream_offset = 0;
1198     ctx->eos = 0;
1199 
1200     av1d_dbg_func("leave ctx %p\n", ctx);
1201     return ret;
1202 
1203 }
1204 
1205 
leb128(BitReadCtx_t * gb)1206 static inline int64_t leb128(BitReadCtx_t *gb)
1207 {
1208     int64_t ret = 0;
1209     RK_S32 byte = 0;
1210     RK_S32 i;
1211 
1212     for (i = 0; i < 8; i++) {
1213         mpp_read_bits(gb, 8, &byte);
1214         ret |= (int64_t)(byte & 0x7f) << (i * 7);
1215         if (!(byte & 0x80))
1216             break;
1217     }
1218     return ret;
1219 }
1220 
parse_obu_header(uint8_t * buf,RK_S32 buf_size,int64_t * obu_size,RK_S32 * start_pos,RK_S32 * type,RK_S32 * temporal_id,RK_S32 * spatial_id)1221 static inline RK_S32 parse_obu_header(uint8_t *buf, RK_S32 buf_size,
1222                                       int64_t *obu_size, RK_S32 *start_pos, RK_S32 *type,
1223                                       RK_S32 *temporal_id, RK_S32 *spatial_id)
1224 {
1225     BitReadCtx_t gb;
1226     RK_S32 extension_flag, has_size_flag;
1227     int64_t size;
1228     RK_S32 value = 0;
1229     mpp_set_bitread_ctx(&gb, buf, MPP_MIN(buf_size, MAX_OBU_HEADER_SIZE));
1230 
1231     mpp_read_bits(&gb, 1, &value);
1232     if (value != 0) // obu_forbidden_bit
1233         return MPP_ERR_PROTOL;
1234 
1235     mpp_read_bits(&gb, 4, type);
1236     mpp_read_bits(&gb, 1, &extension_flag);
1237     mpp_read_bits(&gb, 1, &has_size_flag);
1238     mpp_skip_bits(&gb, 1); // obu_reserved_1bit
1239 
1240     if (extension_flag) {
1241         mpp_read_bits(&gb, 3, temporal_id);
1242         mpp_read_bits(&gb, 2, spatial_id);
1243         mpp_skip_bits(&gb, 3); // extension_header_reserved_3bits
1244     } else {
1245         *temporal_id = *spatial_id = 0;
1246     }
1247 
1248     *obu_size  = has_size_flag ? leb128(&gb)
1249                  : buf_size - 1 - extension_flag;
1250 
1251     if (mpp_get_bits_left(&gb) < 0)
1252         return MPP_ERR_PROTOL;
1253 
1254     *start_pos = mpp_get_bits_count(&gb) / 8;
1255 
1256     size = *obu_size + *start_pos;
1257 
1258     if (size > buf_size)
1259         return MPP_ERR_PROTOL;
1260 
1261     return size;
1262 
1263 }
1264 
av1_extract_obu(AV1OBU * obu,uint8_t * buf,RK_S32 length)1265 RK_S32 av1_extract_obu(AV1OBU *obu, uint8_t *buf, RK_S32 length)
1266 {
1267     int64_t obu_size;
1268     RK_S32 start_pos, type, temporal_id, spatial_id;
1269     RK_S32 len;
1270 
1271     len = parse_obu_header(buf, length, &obu_size, &start_pos,
1272                            &type, &temporal_id, &spatial_id);
1273     if (len < 0)
1274         return len;
1275 
1276     obu->type        = type;
1277     obu->temporal_id = temporal_id;
1278     obu->spatial_id  = spatial_id;
1279 
1280     obu->data     = buf + start_pos;
1281     obu->size     = obu_size;
1282     obu->raw_data = buf;
1283     obu->raw_size = len;
1284 
1285     av1d_dbg(AV1D_DBG_STRMIN, "obu_type: %d, temporal_id: %d, spatial_id: %d, payload size: %d\n",
1286              obu->type, obu->temporal_id, obu->spatial_id, obu->size);
1287 
1288     return len;
1289 }
1290 
av1d_split_frame(Av1CodecContext * ctx,RK_U8 ** out_data,RK_S32 * out_size,RK_U8 * data,RK_S32 size)1291 RK_S32 av1d_split_frame(Av1CodecContext *ctx,
1292                         RK_U8 **out_data, RK_S32 *out_size,
1293                         RK_U8 *data, RK_S32 size)
1294 {
1295     (void)out_data;
1296     (void)out_size;
1297 
1298     AV1OBU obu;
1299     uint8_t *ptr = data, *end = data + size;
1300     av1d_dbg_func("enter ctx %p\n", ctx);
1301 
1302     *out_data = data;
1303 
1304     while (ptr < end) {
1305         RK_S32 len = av1_extract_obu(&obu, ptr, size);
1306         if (len < 0)
1307             break;
1308         if (obu.type == AV1_OBU_FRAME_HEADER || obu.type == AV1_OBU_FRAME ||
1309             ((obu.type == AV1_OBU_TEMPORAL_DELIMITER || obu.type == AV1_OBU_METADATA ||
1310               obu.type == AV1_OBU_SEQUENCE_HEADER) && ctx->frame_header))
1311             ctx->frame_header ++;
1312         if (ctx->frame_header == 2) {
1313             *out_size = (RK_S32)(ptr - data);
1314             ctx->new_frame = 1;
1315             ctx->frame_header = 0;
1316             return ptr - data;
1317         }
1318         if (obu.type == AV1_OBU_FRAME) {
1319             ptr      += len;
1320             size     -= len;
1321             *out_size = (RK_S32)(ptr - data);
1322             ctx->new_frame = 1;
1323             ctx->frame_header = 0;
1324             return ptr - data;
1325         }
1326         ptr      += len;
1327         size -= len;
1328     }
1329 
1330     *out_size = (RK_S32)(ptr - data);
1331 
1332     return ptr - data;
1333 
1334     av1d_dbg_func("leave ctx %p\n", ctx);
1335 
1336     return 0;
1337 }
1338 
av1d_get_frame_stream(Av1CodecContext * ctx,RK_U8 * buf,RK_S32 length)1339 MPP_RET av1d_get_frame_stream(Av1CodecContext *ctx, RK_U8 *buf, RK_S32 length)
1340 {
1341     MPP_RET ret = MPP_OK;
1342     av1d_dbg_func("enter ctx %p\n", ctx);
1343     RK_S32 buff_size = 0;
1344     RK_U8 *data = NULL;
1345     RK_S32 size = 0;
1346     RK_S32 offset = ctx->stream_offset;
1347 
1348     data = (RK_U8 *)mpp_packet_get_data(ctx->pkt);
1349     size = (RK_S32)mpp_packet_get_size(ctx->pkt);
1350 
1351     if ((length + offset) > size) {
1352         mpp_packet_deinit(&ctx->pkt);
1353         buff_size = length + offset + 10 * 1024;
1354         data = mpp_realloc(data, RK_U8, buff_size);
1355         mpp_packet_init(&ctx->pkt, (void *)data, buff_size);
1356         mpp_packet_set_size(ctx->pkt, buff_size);
1357         ctx->stream_size = buff_size;
1358     }
1359 
1360     memcpy(data + offset, buf, length);
1361     ctx->stream_offset += length;
1362     mpp_packet_set_length(ctx->pkt, ctx->stream_offset);
1363 
1364     av1d_dbg_func("leave ctx %p\n", ctx);
1365     return ret;
1366 
1367 }
1368 
av1d_split_init(Av1CodecContext * ctx)1369 MPP_RET av1d_split_init(Av1CodecContext *ctx)
1370 {
1371     MPP_RET ret = MPP_OK;
1372     (void)ctx;
1373 
1374     av1d_dbg_func("enter ctx %p\n", ctx);
1375 
1376     av1d_dbg_func("leave ctx %p\n", ctx);
1377     return ret;
1378 }
1379