]> git.sesse.net Git - ffmpeg/blob - libavcodec/h264.c
h264: Parse registered data SEI message and AFD value
[ffmpeg] / libavcodec / h264.c
1 /*
2  * H.26L/H.264/AVC/JVT/14496-10/... decoder
3  * Copyright (c) 2003 Michael Niedermayer <michaelni@gmx.at>
4  *
5  * This file is part of Libav.
6  *
7  * Libav is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * Libav is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with Libav; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 /**
23  * @file
24  * H.264 / AVC / MPEG4 part10 codec.
25  * @author Michael Niedermayer <michaelni@gmx.at>
26  */
27
28 #include "libavutil/avassert.h"
29 #include "libavutil/display.h"
30 #include "libavutil/imgutils.h"
31 #include "libavutil/opt.h"
32 #include "libavutil/stereo3d.h"
33 #include "libavutil/timer.h"
34 #include "internal.h"
35 #include "cabac.h"
36 #include "cabac_functions.h"
37 #include "error_resilience.h"
38 #include "avcodec.h"
39 #include "h264.h"
40 #include "h264data.h"
41 #include "h264chroma.h"
42 #include "h264_mvpred.h"
43 #include "golomb.h"
44 #include "mathops.h"
45 #include "me_cmp.h"
46 #include "mpegutils.h"
47 #include "rectangle.h"
48 #include "svq3.h"
49 #include "thread.h"
50
51 #include <assert.h>
52
53 const uint16_t ff_h264_mb_sizes[4] = { 256, 384, 512, 768 };
54
55 static void h264_er_decode_mb(void *opaque, int ref, int mv_dir, int mv_type,
56                               int (*mv)[2][4][2],
57                               int mb_x, int mb_y, int mb_intra, int mb_skipped)
58 {
59     H264Context *h = opaque;
60     H264SliceContext *sl = &h->slice_ctx[0];
61
62     sl->mb_x = mb_x;
63     sl->mb_y = mb_y;
64     sl->mb_xy = mb_x + mb_y * h->mb_stride;
65     memset(sl->non_zero_count_cache, 0, sizeof(sl->non_zero_count_cache));
66     assert(ref >= 0);
67     /* FIXME: It is possible albeit uncommon that slice references
68      * differ between slices. We take the easy approach and ignore
69      * it for now. If this turns out to have any relevance in
70      * practice then correct remapping should be added. */
71     if (ref >= sl->ref_count[0])
72         ref = 0;
73     fill_rectangle(&h->cur_pic.ref_index[0][4 * sl->mb_xy],
74                    2, 2, 2, ref, 1);
75     fill_rectangle(&sl->ref_cache[0][scan8[0]], 4, 4, 8, ref, 1);
76     fill_rectangle(sl->mv_cache[0][scan8[0]], 4, 4, 8,
77                    pack16to32((*mv)[0][0][0], (*mv)[0][0][1]), 4);
78     assert(!FRAME_MBAFF(h));
79     ff_h264_hl_decode_mb(h, &h->slice_ctx[0]);
80 }
81
82 void ff_h264_draw_horiz_band(const H264Context *h, H264SliceContext *sl,
83                              int y, int height)
84 {
85     AVCodecContext *avctx = h->avctx;
86     const AVFrame   *src  = h->cur_pic.f;
87     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(avctx->pix_fmt);
88     int vshift = desc->log2_chroma_h;
89     const int field_pic = h->picture_structure != PICT_FRAME;
90     if (field_pic) {
91         height <<= 1;
92         y      <<= 1;
93     }
94
95     height = FFMIN(height, avctx->height - y);
96
97     if (field_pic && h->first_field && !(avctx->slice_flags & SLICE_FLAG_ALLOW_FIELD))
98         return;
99
100     if (avctx->draw_horiz_band) {
101         int offset[AV_NUM_DATA_POINTERS];
102         int i;
103
104         offset[0] = y * src->linesize[0];
105         offset[1] =
106         offset[2] = (y >> vshift) * src->linesize[1];
107         for (i = 3; i < AV_NUM_DATA_POINTERS; i++)
108             offset[i] = 0;
109
110         emms_c();
111
112         avctx->draw_horiz_band(avctx, src, offset,
113                                y, h->picture_structure, height);
114     }
115 }
116
117 /**
118  * Check if the top & left blocks are available if needed and
119  * change the dc mode so it only uses the available blocks.
120  */
121 int ff_h264_check_intra4x4_pred_mode(const H264Context *h, H264SliceContext *sl)
122 {
123     static const int8_t top[12] = {
124         -1, 0, LEFT_DC_PRED, -1, -1, -1, -1, -1, 0
125     };
126     static const int8_t left[12] = {
127         0, -1, TOP_DC_PRED, 0, -1, -1, -1, 0, -1, DC_128_PRED
128     };
129     int i;
130
131     if (!(sl->top_samples_available & 0x8000)) {
132         for (i = 0; i < 4; i++) {
133             int status = top[sl->intra4x4_pred_mode_cache[scan8[0] + i]];
134             if (status < 0) {
135                 av_log(h->avctx, AV_LOG_ERROR,
136                        "top block unavailable for requested intra4x4 mode %d at %d %d\n",
137                        status, sl->mb_x, sl->mb_y);
138                 return AVERROR_INVALIDDATA;
139             } else if (status) {
140                 sl->intra4x4_pred_mode_cache[scan8[0] + i] = status;
141             }
142         }
143     }
144
145     if ((sl->left_samples_available & 0x8888) != 0x8888) {
146         static const int mask[4] = { 0x8000, 0x2000, 0x80, 0x20 };
147         for (i = 0; i < 4; i++)
148             if (!(sl->left_samples_available & mask[i])) {
149                 int status = left[sl->intra4x4_pred_mode_cache[scan8[0] + 8 * i]];
150                 if (status < 0) {
151                     av_log(h->avctx, AV_LOG_ERROR,
152                            "left block unavailable for requested intra4x4 mode %d at %d %d\n",
153                            status, sl->mb_x, sl->mb_y);
154                     return AVERROR_INVALIDDATA;
155                 } else if (status) {
156                     sl->intra4x4_pred_mode_cache[scan8[0] + 8 * i] = status;
157                 }
158             }
159     }
160
161     return 0;
162 } // FIXME cleanup like ff_h264_check_intra_pred_mode
163
164 /**
165  * Check if the top & left blocks are available if needed and
166  * change the dc mode so it only uses the available blocks.
167  */
168 int ff_h264_check_intra_pred_mode(const H264Context *h, H264SliceContext *sl,
169                                   int mode, int is_chroma)
170 {
171     static const int8_t top[4]  = { LEFT_DC_PRED8x8, 1, -1, -1 };
172     static const int8_t left[5] = { TOP_DC_PRED8x8, -1,  2, -1, DC_128_PRED8x8 };
173
174     if (mode > 3U) {
175         av_log(h->avctx, AV_LOG_ERROR,
176                "out of range intra chroma pred mode at %d %d\n",
177                sl->mb_x, sl->mb_y);
178         return AVERROR_INVALIDDATA;
179     }
180
181     if (!(sl->top_samples_available & 0x8000)) {
182         mode = top[mode];
183         if (mode < 0) {
184             av_log(h->avctx, AV_LOG_ERROR,
185                    "top block unavailable for requested intra mode at %d %d\n",
186                    sl->mb_x, sl->mb_y);
187             return AVERROR_INVALIDDATA;
188         }
189     }
190
191     if ((sl->left_samples_available & 0x8080) != 0x8080) {
192         mode = left[mode];
193         if (is_chroma && (sl->left_samples_available & 0x8080)) {
194             // mad cow disease mode, aka MBAFF + constrained_intra_pred
195             mode = ALZHEIMER_DC_L0T_PRED8x8 +
196                    (!(sl->left_samples_available & 0x8000)) +
197                    2 * (mode == DC_128_PRED8x8);
198         }
199         if (mode < 0) {
200             av_log(h->avctx, AV_LOG_ERROR,
201                    "left block unavailable for requested intra mode at %d %d\n",
202                    sl->mb_x, sl->mb_y);
203             return AVERROR_INVALIDDATA;
204         }
205     }
206
207     return mode;
208 }
209
210 const uint8_t *ff_h264_decode_nal(H264Context *h, H264SliceContext *sl,
211                                   const uint8_t *src,
212                                   int *dst_length, int *consumed, int length)
213 {
214     int i, si, di;
215     uint8_t *dst;
216
217     // src[0]&0x80; // forbidden bit
218     h->nal_ref_idc   = src[0] >> 5;
219     h->nal_unit_type = src[0] & 0x1F;
220
221     src++;
222     length--;
223
224 #define STARTCODE_TEST                                                  \
225     if (i + 2 < length && src[i + 1] == 0 && src[i + 2] <= 3) {         \
226         if (src[i + 2] != 3) {                                          \
227             /* startcode, so we must be past the end */                 \
228             length = i;                                                 \
229         }                                                               \
230         break;                                                          \
231     }
232
233 #if HAVE_FAST_UNALIGNED
234 #define FIND_FIRST_ZERO                                                 \
235     if (i > 0 && !src[i])                                               \
236         i--;                                                            \
237     while (src[i])                                                      \
238         i++
239
240 #if HAVE_FAST_64BIT
241     for (i = 0; i + 1 < length; i += 9) {
242         if (!((~AV_RN64A(src + i) &
243                (AV_RN64A(src + i) - 0x0100010001000101ULL)) &
244               0x8000800080008080ULL))
245             continue;
246         FIND_FIRST_ZERO;
247         STARTCODE_TEST;
248         i -= 7;
249     }
250 #else
251     for (i = 0; i + 1 < length; i += 5) {
252         if (!((~AV_RN32A(src + i) &
253                (AV_RN32A(src + i) - 0x01000101U)) &
254               0x80008080U))
255             continue;
256         FIND_FIRST_ZERO;
257         STARTCODE_TEST;
258         i -= 3;
259     }
260 #endif
261 #else
262     for (i = 0; i + 1 < length; i += 2) {
263         if (src[i])
264             continue;
265         if (i > 0 && src[i - 1] == 0)
266             i--;
267         STARTCODE_TEST;
268     }
269 #endif
270
271     if (i >= length - 1) { // no escaped 0
272         *dst_length = length;
273         *consumed   = length + 1; // +1 for the header
274         return src;
275     }
276
277     av_fast_malloc(&sl->rbsp_buffer, &sl->rbsp_buffer_size,
278                    length + FF_INPUT_BUFFER_PADDING_SIZE);
279     dst = sl->rbsp_buffer;
280
281     if (!dst)
282         return NULL;
283
284     memcpy(dst, src, i);
285     si = di = i;
286     while (si + 2 < length) {
287         // remove escapes (very rare 1:2^22)
288         if (src[si + 2] > 3) {
289             dst[di++] = src[si++];
290             dst[di++] = src[si++];
291         } else if (src[si] == 0 && src[si + 1] == 0) {
292             if (src[si + 2] == 3) { // escape
293                 dst[di++]  = 0;
294                 dst[di++]  = 0;
295                 si        += 3;
296                 continue;
297             } else // next start code
298                 goto nsc;
299         }
300
301         dst[di++] = src[si++];
302     }
303     while (si < length)
304         dst[di++] = src[si++];
305
306 nsc:
307     memset(dst + di, 0, FF_INPUT_BUFFER_PADDING_SIZE);
308
309     *dst_length = di;
310     *consumed   = si + 1; // +1 for the header
311     /* FIXME store exact number of bits in the getbitcontext
312      * (it is needed for decoding) */
313     return dst;
314 }
315
316 /**
317  * Identify the exact end of the bitstream
318  * @return the length of the trailing, or 0 if damaged
319  */
320 static int decode_rbsp_trailing(H264Context *h, const uint8_t *src)
321 {
322     int v = *src;
323     int r;
324
325     ff_tlog(h->avctx, "rbsp trailing %X\n", v);
326
327     for (r = 1; r < 9; r++) {
328         if (v & 1)
329             return r;
330         v >>= 1;
331     }
332     return 0;
333 }
334
335 void ff_h264_free_tables(H264Context *h)
336 {
337     int i;
338
339     av_freep(&h->intra4x4_pred_mode);
340     av_freep(&h->chroma_pred_mode_table);
341     av_freep(&h->cbp_table);
342     av_freep(&h->mvd_table[0]);
343     av_freep(&h->mvd_table[1]);
344     av_freep(&h->direct_table);
345     av_freep(&h->non_zero_count);
346     av_freep(&h->slice_table_base);
347     h->slice_table = NULL;
348     av_freep(&h->list_counts);
349
350     av_freep(&h->mb2b_xy);
351     av_freep(&h->mb2br_xy);
352
353     av_buffer_pool_uninit(&h->qscale_table_pool);
354     av_buffer_pool_uninit(&h->mb_type_pool);
355     av_buffer_pool_uninit(&h->motion_val_pool);
356     av_buffer_pool_uninit(&h->ref_index_pool);
357
358     for (i = 0; i < h->nb_slice_ctx; i++) {
359         H264SliceContext *sl = &h->slice_ctx[i];
360
361         av_freep(&sl->dc_val_base);
362         av_freep(&sl->er.mb_index2xy);
363         av_freep(&sl->er.error_status_table);
364         av_freep(&sl->er.er_temp_buffer);
365
366         av_freep(&sl->bipred_scratchpad);
367         av_freep(&sl->edge_emu_buffer);
368         av_freep(&sl->top_borders[0]);
369         av_freep(&sl->top_borders[1]);
370
371         sl->bipred_scratchpad_allocated = 0;
372         sl->edge_emu_buffer_allocated   = 0;
373         sl->top_borders_allocated[0]    = 0;
374         sl->top_borders_allocated[1]    = 0;
375     }
376 }
377
378 int ff_h264_alloc_tables(H264Context *h)
379 {
380     const int big_mb_num = h->mb_stride * (h->mb_height + 1);
381     const int row_mb_num = h->mb_stride * 2 * h->avctx->thread_count;
382     int x, y;
383
384     FF_ALLOCZ_OR_GOTO(h->avctx, h->intra4x4_pred_mode,
385                       row_mb_num * 8 * sizeof(uint8_t), fail)
386     h->slice_ctx[0].intra4x4_pred_mode = h->intra4x4_pred_mode;
387
388     FF_ALLOCZ_OR_GOTO(h->avctx, h->non_zero_count,
389                       big_mb_num * 48 * sizeof(uint8_t), fail)
390     FF_ALLOCZ_OR_GOTO(h->avctx, h->slice_table_base,
391                       (big_mb_num + h->mb_stride) * sizeof(*h->slice_table_base), fail)
392     FF_ALLOCZ_OR_GOTO(h->avctx, h->cbp_table,
393                       big_mb_num * sizeof(uint16_t), fail)
394     FF_ALLOCZ_OR_GOTO(h->avctx, h->chroma_pred_mode_table,
395                       big_mb_num * sizeof(uint8_t), fail)
396     FF_ALLOCZ_OR_GOTO(h->avctx, h->mvd_table[0],
397                       16 * row_mb_num * sizeof(uint8_t), fail);
398     FF_ALLOCZ_OR_GOTO(h->avctx, h->mvd_table[1],
399                       16 * row_mb_num * sizeof(uint8_t), fail);
400     h->slice_ctx[0].mvd_table[0] = h->mvd_table[0];
401     h->slice_ctx[0].mvd_table[1] = h->mvd_table[1];
402
403     FF_ALLOCZ_OR_GOTO(h->avctx, h->direct_table,
404                       4 * big_mb_num * sizeof(uint8_t), fail);
405     FF_ALLOCZ_OR_GOTO(h->avctx, h->list_counts,
406                       big_mb_num * sizeof(uint8_t), fail)
407
408     memset(h->slice_table_base, -1,
409            (big_mb_num + h->mb_stride) * sizeof(*h->slice_table_base));
410     h->slice_table = h->slice_table_base + h->mb_stride * 2 + 1;
411
412     FF_ALLOCZ_OR_GOTO(h->avctx, h->mb2b_xy,
413                       big_mb_num * sizeof(uint32_t), fail);
414     FF_ALLOCZ_OR_GOTO(h->avctx, h->mb2br_xy,
415                       big_mb_num * sizeof(uint32_t), fail);
416     for (y = 0; y < h->mb_height; y++)
417         for (x = 0; x < h->mb_width; x++) {
418             const int mb_xy = x + y * h->mb_stride;
419             const int b_xy  = 4 * x + 4 * y * h->b_stride;
420
421             h->mb2b_xy[mb_xy]  = b_xy;
422             h->mb2br_xy[mb_xy] = 8 * (FMO ? mb_xy : (mb_xy % (2 * h->mb_stride)));
423         }
424
425     if (!h->dequant4_coeff[0])
426         h264_init_dequant_tables(h);
427
428     return 0;
429
430 fail:
431     ff_h264_free_tables(h);
432     return AVERROR(ENOMEM);
433 }
434
435 /**
436  * Init context
437  * Allocate buffers which are not shared amongst multiple threads.
438  */
439 int ff_h264_slice_context_init(H264Context *h, H264SliceContext *sl)
440 {
441     ERContext *er = &sl->er;
442     int mb_array_size = h->mb_height * h->mb_stride;
443     int y_size  = (2 * h->mb_width + 1) * (2 * h->mb_height + 1);
444     int c_size  = h->mb_stride * (h->mb_height + 1);
445     int yc_size = y_size + 2   * c_size;
446     int x, y, i;
447
448     sl->ref_cache[0][scan8[5]  + 1] =
449     sl->ref_cache[0][scan8[7]  + 1] =
450     sl->ref_cache[0][scan8[13] + 1] =
451     sl->ref_cache[1][scan8[5]  + 1] =
452     sl->ref_cache[1][scan8[7]  + 1] =
453     sl->ref_cache[1][scan8[13] + 1] = PART_NOT_AVAILABLE;
454
455     if (CONFIG_ERROR_RESILIENCE) {
456         /* init ER */
457         er->avctx          = h->avctx;
458         er->decode_mb      = h264_er_decode_mb;
459         er->opaque         = h;
460         er->quarter_sample = 1;
461
462         er->mb_num      = h->mb_num;
463         er->mb_width    = h->mb_width;
464         er->mb_height   = h->mb_height;
465         er->mb_stride   = h->mb_stride;
466         er->b8_stride   = h->mb_width * 2 + 1;
467
468         // error resilience code looks cleaner with this
469         FF_ALLOCZ_OR_GOTO(h->avctx, er->mb_index2xy,
470                           (h->mb_num + 1) * sizeof(int), fail);
471
472         for (y = 0; y < h->mb_height; y++)
473             for (x = 0; x < h->mb_width; x++)
474                 er->mb_index2xy[x + y * h->mb_width] = x + y * h->mb_stride;
475
476         er->mb_index2xy[h->mb_height * h->mb_width] = (h->mb_height - 1) *
477                                                       h->mb_stride + h->mb_width;
478
479         FF_ALLOCZ_OR_GOTO(h->avctx, er->error_status_table,
480                           mb_array_size * sizeof(uint8_t), fail);
481
482         FF_ALLOC_OR_GOTO(h->avctx, er->er_temp_buffer,
483                          h->mb_height * h->mb_stride, fail);
484
485         FF_ALLOCZ_OR_GOTO(h->avctx, sl->dc_val_base,
486                           yc_size * sizeof(int16_t), fail);
487         er->dc_val[0] = sl->dc_val_base + h->mb_width * 2 + 2;
488         er->dc_val[1] = sl->dc_val_base + y_size + h->mb_stride + 1;
489         er->dc_val[2] = er->dc_val[1] + c_size;
490         for (i = 0; i < yc_size; i++)
491             sl->dc_val_base[i] = 1024;
492     }
493
494     return 0;
495
496 fail:
497     return AVERROR(ENOMEM); // ff_h264_free_tables will clean up for us
498 }
499
500 static int decode_nal_units(H264Context *h, const uint8_t *buf, int buf_size,
501                             int parse_extradata);
502
503 int ff_h264_decode_extradata(H264Context *h)
504 {
505     AVCodecContext *avctx = h->avctx;
506     int ret;
507
508     if (avctx->extradata[0] == 1) {
509         int i, cnt, nalsize;
510         unsigned char *p = avctx->extradata;
511
512         h->is_avc = 1;
513
514         if (avctx->extradata_size < 7) {
515             av_log(avctx, AV_LOG_ERROR,
516                    "avcC %d too short\n", avctx->extradata_size);
517             return AVERROR_INVALIDDATA;
518         }
519         /* sps and pps in the avcC always have length coded with 2 bytes,
520          * so put a fake nal_length_size = 2 while parsing them */
521         h->nal_length_size = 2;
522         // Decode sps from avcC
523         cnt = *(p + 5) & 0x1f; // Number of sps
524         p  += 6;
525         for (i = 0; i < cnt; i++) {
526             nalsize = AV_RB16(p) + 2;
527             if (p - avctx->extradata + nalsize > avctx->extradata_size)
528                 return AVERROR_INVALIDDATA;
529             ret = decode_nal_units(h, p, nalsize, 1);
530             if (ret < 0) {
531                 av_log(avctx, AV_LOG_ERROR,
532                        "Decoding sps %d from avcC failed\n", i);
533                 return ret;
534             }
535             p += nalsize;
536         }
537         // Decode pps from avcC
538         cnt = *(p++); // Number of pps
539         for (i = 0; i < cnt; i++) {
540             nalsize = AV_RB16(p) + 2;
541             if (p - avctx->extradata + nalsize > avctx->extradata_size)
542                 return AVERROR_INVALIDDATA;
543             ret = decode_nal_units(h, p, nalsize, 1);
544             if (ret < 0) {
545                 av_log(avctx, AV_LOG_ERROR,
546                        "Decoding pps %d from avcC failed\n", i);
547                 return ret;
548             }
549             p += nalsize;
550         }
551         // Store right nal length size that will be used to parse all other nals
552         h->nal_length_size = (avctx->extradata[4] & 0x03) + 1;
553     } else {
554         h->is_avc = 0;
555         ret = decode_nal_units(h, avctx->extradata, avctx->extradata_size, 1);
556         if (ret < 0)
557             return ret;
558     }
559     return 0;
560 }
561
562 static int h264_init_context(AVCodecContext *avctx, H264Context *h)
563 {
564     int i;
565
566     h->avctx                 = avctx;
567     h->dequant_coeff_pps     = -1;
568
569     h->picture_structure     = PICT_FRAME;
570     h->slice_context_count   = 1;
571     h->workaround_bugs       = avctx->workaround_bugs;
572     h->flags                 = avctx->flags;
573     h->prev_poc_msb          = 1 << 16;
574     h->x264_build            = -1;
575     h->recovery_frame        = -1;
576     h->frame_recovered       = 0;
577
578     h->next_outputed_poc = INT_MIN;
579     for (i = 0; i < MAX_DELAYED_PIC_COUNT; i++)
580         h->last_pocs[i] = INT_MIN;
581
582     ff_h264_reset_sei(h);
583
584     avctx->chroma_sample_location = AVCHROMA_LOC_LEFT;
585
586     h->nb_slice_ctx = (avctx->active_thread_type & FF_THREAD_SLICE) ?  H264_MAX_THREADS : 1;
587     h->slice_ctx = av_mallocz_array(h->nb_slice_ctx, sizeof(*h->slice_ctx));
588     if (!h->slice_ctx) {
589         h->nb_slice_ctx = 0;
590         return AVERROR(ENOMEM);
591     }
592
593     for (i = 0; i < H264_MAX_PICTURE_COUNT; i++) {
594         h->DPB[i].f = av_frame_alloc();
595         if (!h->DPB[i].f)
596             return AVERROR(ENOMEM);
597     }
598
599     h->cur_pic.f = av_frame_alloc();
600     if (!h->cur_pic.f)
601         return AVERROR(ENOMEM);
602
603     for (i = 0; i < h->nb_slice_ctx; i++)
604         h->slice_ctx[i].h264 = h;
605
606     return 0;
607 }
608
609 av_cold int ff_h264_decode_init(AVCodecContext *avctx)
610 {
611     H264Context *h = avctx->priv_data;
612     int ret;
613
614     ret = h264_init_context(avctx, h);
615     if (ret < 0)
616         return ret;
617
618     /* set defaults */
619     if (!avctx->has_b_frames)
620         h->low_delay = 1;
621
622     ff_h264_decode_init_vlc();
623
624     ff_init_cabac_states();
625
626     if (avctx->codec_id == AV_CODEC_ID_H264) {
627         if (avctx->ticks_per_frame == 1)
628             h->avctx->framerate.num *= 2;
629         avctx->ticks_per_frame = 2;
630     }
631
632     if (avctx->extradata_size > 0 && avctx->extradata) {
633        ret = ff_h264_decode_extradata(h);
634        if (ret < 0) {
635            ff_h264_free_context(h);
636            return ret;
637        }
638     }
639
640     if (h->sps.bitstream_restriction_flag &&
641         h->avctx->has_b_frames < h->sps.num_reorder_frames) {
642         h->avctx->has_b_frames = h->sps.num_reorder_frames;
643         h->low_delay           = 0;
644     }
645
646     avctx->internal->allocate_progress = 1;
647
648     if (h->enable_er) {
649         av_log(avctx, AV_LOG_WARNING,
650                "Error resilience is enabled. It is unsafe and unsupported and may crash. "
651                "Use it at your own risk\n");
652     }
653
654     return 0;
655 }
656
657 static int decode_init_thread_copy(AVCodecContext *avctx)
658 {
659     H264Context *h = avctx->priv_data;
660     int ret;
661
662     if (!avctx->internal->is_copy)
663         return 0;
664
665     memset(h, 0, sizeof(*h));
666
667     ret = h264_init_context(avctx, h);
668     if (ret < 0)
669         return ret;
670
671     h->context_initialized = 0;
672
673     return 0;
674 }
675
676 /**
677  * Run setup operations that must be run after slice header decoding.
678  * This includes finding the next displayed frame.
679  *
680  * @param h h264 master context
681  * @param setup_finished enough NALs have been read that we can call
682  * ff_thread_finish_setup()
683  */
684 static void decode_postinit(H264Context *h, int setup_finished)
685 {
686     H264Picture *out = h->cur_pic_ptr;
687     H264Picture *cur = h->cur_pic_ptr;
688     int i, pics, out_of_order, out_idx;
689     int invalid = 0, cnt = 0;
690
691     h->cur_pic_ptr->f->pict_type = h->pict_type;
692
693     if (h->next_output_pic)
694         return;
695
696     if (cur->field_poc[0] == INT_MAX || cur->field_poc[1] == INT_MAX) {
697         /* FIXME: if we have two PAFF fields in one packet, we can't start
698          * the next thread here. If we have one field per packet, we can.
699          * The check in decode_nal_units() is not good enough to find this
700          * yet, so we assume the worst for now. */
701         // if (setup_finished)
702         //    ff_thread_finish_setup(h->avctx);
703         return;
704     }
705
706     cur->f->interlaced_frame = 0;
707     cur->f->repeat_pict      = 0;
708
709     /* Signal interlacing information externally. */
710     /* Prioritize picture timing SEI information over used
711      * decoding process if it exists. */
712
713     if (h->sps.pic_struct_present_flag) {
714         switch (h->sei_pic_struct) {
715         case SEI_PIC_STRUCT_FRAME:
716             break;
717         case SEI_PIC_STRUCT_TOP_FIELD:
718         case SEI_PIC_STRUCT_BOTTOM_FIELD:
719             cur->f->interlaced_frame = 1;
720             break;
721         case SEI_PIC_STRUCT_TOP_BOTTOM:
722         case SEI_PIC_STRUCT_BOTTOM_TOP:
723             if (FIELD_OR_MBAFF_PICTURE(h))
724                 cur->f->interlaced_frame = 1;
725             else
726                 // try to flag soft telecine progressive
727                 cur->f->interlaced_frame = h->prev_interlaced_frame;
728             break;
729         case SEI_PIC_STRUCT_TOP_BOTTOM_TOP:
730         case SEI_PIC_STRUCT_BOTTOM_TOP_BOTTOM:
731             /* Signal the possibility of telecined film externally
732              * (pic_struct 5,6). From these hints, let the applications
733              * decide if they apply deinterlacing. */
734             cur->f->repeat_pict = 1;
735             break;
736         case SEI_PIC_STRUCT_FRAME_DOUBLING:
737             cur->f->repeat_pict = 2;
738             break;
739         case SEI_PIC_STRUCT_FRAME_TRIPLING:
740             cur->f->repeat_pict = 4;
741             break;
742         }
743
744         if ((h->sei_ct_type & 3) &&
745             h->sei_pic_struct <= SEI_PIC_STRUCT_BOTTOM_TOP)
746             cur->f->interlaced_frame = (h->sei_ct_type & (1 << 1)) != 0;
747     } else {
748         /* Derive interlacing flag from used decoding process. */
749         cur->f->interlaced_frame = FIELD_OR_MBAFF_PICTURE(h);
750     }
751     h->prev_interlaced_frame = cur->f->interlaced_frame;
752
753     if (cur->field_poc[0] != cur->field_poc[1]) {
754         /* Derive top_field_first from field pocs. */
755         cur->f->top_field_first = cur->field_poc[0] < cur->field_poc[1];
756     } else {
757         if (cur->f->interlaced_frame || h->sps.pic_struct_present_flag) {
758             /* Use picture timing SEI information. Even if it is a
759              * information of a past frame, better than nothing. */
760             if (h->sei_pic_struct == SEI_PIC_STRUCT_TOP_BOTTOM ||
761                 h->sei_pic_struct == SEI_PIC_STRUCT_TOP_BOTTOM_TOP)
762                 cur->f->top_field_first = 1;
763             else
764                 cur->f->top_field_first = 0;
765         } else {
766             /* Most likely progressive */
767             cur->f->top_field_first = 0;
768         }
769     }
770
771     if (h->sei_frame_packing_present &&
772         h->frame_packing_arrangement_type >= 0 &&
773         h->frame_packing_arrangement_type <= 6 &&
774         h->content_interpretation_type > 0 &&
775         h->content_interpretation_type < 3) {
776         AVStereo3D *stereo = av_stereo3d_create_side_data(cur->f);
777         if (!stereo)
778             return;
779
780         switch (h->frame_packing_arrangement_type) {
781         case 0:
782             stereo->type = AV_STEREO3D_CHECKERBOARD;
783             break;
784         case 1:
785             stereo->type = AV_STEREO3D_COLUMNS;
786             break;
787         case 2:
788             stereo->type = AV_STEREO3D_LINES;
789             break;
790         case 3:
791             if (h->quincunx_subsampling)
792                 stereo->type = AV_STEREO3D_SIDEBYSIDE_QUINCUNX;
793             else
794                 stereo->type = AV_STEREO3D_SIDEBYSIDE;
795             break;
796         case 4:
797             stereo->type = AV_STEREO3D_TOPBOTTOM;
798             break;
799         case 5:
800             stereo->type = AV_STEREO3D_FRAMESEQUENCE;
801             break;
802         case 6:
803             stereo->type = AV_STEREO3D_2D;
804             break;
805         }
806
807         if (h->content_interpretation_type == 2)
808             stereo->flags = AV_STEREO3D_FLAG_INVERT;
809     }
810
811     if (h->sei_display_orientation_present &&
812         (h->sei_anticlockwise_rotation || h->sei_hflip || h->sei_vflip)) {
813         double angle = h->sei_anticlockwise_rotation * 360 / (double) (1 << 16);
814         AVFrameSideData *rotation = av_frame_new_side_data(cur->f,
815                                                            AV_FRAME_DATA_DISPLAYMATRIX,
816                                                            sizeof(int32_t) * 9);
817         if (!rotation)
818             return;
819
820         av_display_rotation_set((int32_t *)rotation->data, angle);
821         av_display_matrix_flip((int32_t *)rotation->data,
822                                h->sei_hflip, h->sei_vflip);
823     }
824
825     if (h->sei_reguserdata_afd_present) {
826         AVFrameSideData *sd = av_frame_new_side_data(cur->f, AV_FRAME_DATA_AFD,
827                                                      sizeof(uint8_t));
828         if (!sd)
829             return;
830
831         *sd->data = h->active_format_description;
832         h->sei_reguserdata_afd_present = 0;
833     }
834
835     // FIXME do something with unavailable reference frames
836
837     /* Sort B-frames into display order */
838
839     if (h->sps.bitstream_restriction_flag &&
840         h->avctx->has_b_frames < h->sps.num_reorder_frames) {
841         h->avctx->has_b_frames = h->sps.num_reorder_frames;
842         h->low_delay           = 0;
843     }
844
845     if (h->avctx->strict_std_compliance >= FF_COMPLIANCE_STRICT &&
846         !h->sps.bitstream_restriction_flag) {
847         h->avctx->has_b_frames = MAX_DELAYED_PIC_COUNT - 1;
848         h->low_delay           = 0;
849     }
850
851     pics = 0;
852     while (h->delayed_pic[pics])
853         pics++;
854
855     assert(pics <= MAX_DELAYED_PIC_COUNT);
856
857     h->delayed_pic[pics++] = cur;
858     if (cur->reference == 0)
859         cur->reference = DELAYED_PIC_REF;
860
861     /* Frame reordering. This code takes pictures from coding order and sorts
862      * them by their incremental POC value into display order. It supports POC
863      * gaps, MMCO reset codes and random resets.
864      * A "display group" can start either with a IDR frame (f.key_frame = 1),
865      * and/or can be closed down with a MMCO reset code. In sequences where
866      * there is no delay, we can't detect that (since the frame was already
867      * output to the user), so we also set h->mmco_reset to detect the MMCO
868      * reset code.
869      * FIXME: if we detect insufficient delays (as per h->avctx->has_b_frames),
870      * we increase the delay between input and output. All frames affected by
871      * the lag (e.g. those that should have been output before another frame
872      * that we already returned to the user) will be dropped. This is a bug
873      * that we will fix later. */
874     for (i = 0; i < MAX_DELAYED_PIC_COUNT; i++) {
875         cnt     += out->poc < h->last_pocs[i];
876         invalid += out->poc == INT_MIN;
877     }
878     if (!h->mmco_reset && !cur->f->key_frame &&
879         cnt + invalid == MAX_DELAYED_PIC_COUNT && cnt > 0) {
880         h->mmco_reset = 2;
881         if (pics > 1)
882             h->delayed_pic[pics - 2]->mmco_reset = 2;
883     }
884     if (h->mmco_reset || cur->f->key_frame) {
885         for (i = 0; i < MAX_DELAYED_PIC_COUNT; i++)
886             h->last_pocs[i] = INT_MIN;
887         cnt     = 0;
888         invalid = MAX_DELAYED_PIC_COUNT;
889     }
890     out     = h->delayed_pic[0];
891     out_idx = 0;
892     for (i = 1; i < MAX_DELAYED_PIC_COUNT &&
893                 h->delayed_pic[i] &&
894                 !h->delayed_pic[i - 1]->mmco_reset &&
895                 !h->delayed_pic[i]->f->key_frame;
896          i++)
897         if (h->delayed_pic[i]->poc < out->poc) {
898             out     = h->delayed_pic[i];
899             out_idx = i;
900         }
901     if (h->avctx->has_b_frames == 0 &&
902         (h->delayed_pic[0]->f->key_frame || h->mmco_reset))
903         h->next_outputed_poc = INT_MIN;
904     out_of_order = !out->f->key_frame && !h->mmco_reset &&
905                    (out->poc < h->next_outputed_poc);
906
907     if (h->sps.bitstream_restriction_flag &&
908         h->avctx->has_b_frames >= h->sps.num_reorder_frames) {
909     } else if (out_of_order && pics - 1 == h->avctx->has_b_frames &&
910                h->avctx->has_b_frames < MAX_DELAYED_PIC_COUNT) {
911         if (invalid + cnt < MAX_DELAYED_PIC_COUNT) {
912             h->avctx->has_b_frames = FFMAX(h->avctx->has_b_frames, cnt);
913         }
914         h->low_delay = 0;
915     } else if (h->low_delay &&
916                ((h->next_outputed_poc != INT_MIN &&
917                  out->poc > h->next_outputed_poc + 2) ||
918                 cur->f->pict_type == AV_PICTURE_TYPE_B)) {
919         h->low_delay = 0;
920         h->avctx->has_b_frames++;
921     }
922
923     if (pics > h->avctx->has_b_frames) {
924         out->reference &= ~DELAYED_PIC_REF;
925         // for frame threading, the owner must be the second field's thread or
926         // else the first thread can release the picture and reuse it unsafely
927         for (i = out_idx; h->delayed_pic[i]; i++)
928             h->delayed_pic[i] = h->delayed_pic[i + 1];
929     }
930     memmove(h->last_pocs, &h->last_pocs[1],
931             sizeof(*h->last_pocs) * (MAX_DELAYED_PIC_COUNT - 1));
932     h->last_pocs[MAX_DELAYED_PIC_COUNT - 1] = cur->poc;
933     if (!out_of_order && pics > h->avctx->has_b_frames) {
934         h->next_output_pic = out;
935         if (out->mmco_reset) {
936             if (out_idx > 0) {
937                 h->next_outputed_poc                    = out->poc;
938                 h->delayed_pic[out_idx - 1]->mmco_reset = out->mmco_reset;
939             } else {
940                 h->next_outputed_poc = INT_MIN;
941             }
942         } else {
943             if (out_idx == 0 && pics > 1 && h->delayed_pic[0]->f->key_frame) {
944                 h->next_outputed_poc = INT_MIN;
945             } else {
946                 h->next_outputed_poc = out->poc;
947             }
948         }
949         h->mmco_reset = 0;
950     } else {
951         av_log(h->avctx, AV_LOG_DEBUG, "no picture\n");
952     }
953
954     if (h->next_output_pic) {
955         if (h->next_output_pic->recovered) {
956             // We have reached an recovery point and all frames after it in
957             // display order are "recovered".
958             h->frame_recovered |= FRAME_RECOVERED_SEI;
959         }
960         h->next_output_pic->recovered |= !!(h->frame_recovered & FRAME_RECOVERED_SEI);
961     }
962
963     if (setup_finished && !h->avctx->hwaccel) {
964         ff_thread_finish_setup(h->avctx);
965
966         if (h->avctx->active_thread_type & FF_THREAD_FRAME)
967             h->setup_finished = 1;
968     }
969 }
970
971 int ff_pred_weight_table(H264Context *h, H264SliceContext *sl)
972 {
973     int list, i;
974     int luma_def, chroma_def;
975
976     sl->use_weight             = 0;
977     sl->use_weight_chroma      = 0;
978     sl->luma_log2_weight_denom = get_ue_golomb(&sl->gb);
979     if (h->sps.chroma_format_idc)
980         sl->chroma_log2_weight_denom = get_ue_golomb(&sl->gb);
981     luma_def   = 1 << sl->luma_log2_weight_denom;
982     chroma_def = 1 << sl->chroma_log2_weight_denom;
983
984     for (list = 0; list < 2; list++) {
985         sl->luma_weight_flag[list]   = 0;
986         sl->chroma_weight_flag[list] = 0;
987         for (i = 0; i < sl->ref_count[list]; i++) {
988             int luma_weight_flag, chroma_weight_flag;
989
990             luma_weight_flag = get_bits1(&sl->gb);
991             if (luma_weight_flag) {
992                 sl->luma_weight[i][list][0] = get_se_golomb(&sl->gb);
993                 sl->luma_weight[i][list][1] = get_se_golomb(&sl->gb);
994                 if (sl->luma_weight[i][list][0] != luma_def ||
995                     sl->luma_weight[i][list][1] != 0) {
996                     sl->use_weight             = 1;
997                     sl->luma_weight_flag[list] = 1;
998                 }
999             } else {
1000                 sl->luma_weight[i][list][0] = luma_def;
1001                 sl->luma_weight[i][list][1] = 0;
1002             }
1003
1004             if (h->sps.chroma_format_idc) {
1005                 chroma_weight_flag = get_bits1(&sl->gb);
1006                 if (chroma_weight_flag) {
1007                     int j;
1008                     for (j = 0; j < 2; j++) {
1009                         sl->chroma_weight[i][list][j][0] = get_se_golomb(&sl->gb);
1010                         sl->chroma_weight[i][list][j][1] = get_se_golomb(&sl->gb);
1011                         if (sl->chroma_weight[i][list][j][0] != chroma_def ||
1012                             sl->chroma_weight[i][list][j][1] != 0) {
1013                             sl->use_weight_chroma        = 1;
1014                             sl->chroma_weight_flag[list] = 1;
1015                         }
1016                     }
1017                 } else {
1018                     int j;
1019                     for (j = 0; j < 2; j++) {
1020                         sl->chroma_weight[i][list][j][0] = chroma_def;
1021                         sl->chroma_weight[i][list][j][1] = 0;
1022                     }
1023                 }
1024             }
1025         }
1026         if (sl->slice_type_nos != AV_PICTURE_TYPE_B)
1027             break;
1028     }
1029     sl->use_weight = sl->use_weight || sl->use_weight_chroma;
1030     return 0;
1031 }
1032
1033 /**
1034  * instantaneous decoder refresh.
1035  */
1036 static void idr(H264Context *h)
1037 {
1038     ff_h264_remove_all_refs(h);
1039     h->prev_frame_num        =
1040     h->prev_frame_num_offset =
1041     h->prev_poc_msb          =
1042     h->prev_poc_lsb          = 0;
1043 }
1044
1045 /* forget old pics after a seek */
1046 void ff_h264_flush_change(H264Context *h)
1047 {
1048     int i;
1049     for (i = 0; i < MAX_DELAYED_PIC_COUNT; i++)
1050         h->last_pocs[i] = INT_MIN;
1051     h->next_outputed_poc = INT_MIN;
1052     h->prev_interlaced_frame = 1;
1053     idr(h);
1054     if (h->cur_pic_ptr)
1055         h->cur_pic_ptr->reference = 0;
1056     h->first_field = 0;
1057     ff_h264_reset_sei(h);
1058     h->recovery_frame = -1;
1059     h->frame_recovered = 0;
1060 }
1061
1062 /* forget old pics after a seek */
1063 static void flush_dpb(AVCodecContext *avctx)
1064 {
1065     H264Context *h = avctx->priv_data;
1066     int i;
1067
1068     memset(h->delayed_pic, 0, sizeof(h->delayed_pic));
1069
1070     ff_h264_flush_change(h);
1071
1072     for (i = 0; i < H264_MAX_PICTURE_COUNT; i++)
1073         ff_h264_unref_picture(h, &h->DPB[i]);
1074     h->cur_pic_ptr = NULL;
1075     ff_h264_unref_picture(h, &h->cur_pic);
1076
1077     h->mb_y = 0;
1078
1079     ff_h264_free_tables(h);
1080     h->context_initialized = 0;
1081 }
1082
1083 int ff_init_poc(H264Context *h, int pic_field_poc[2], int *pic_poc)
1084 {
1085     const int max_frame_num = 1 << h->sps.log2_max_frame_num;
1086     int field_poc[2];
1087
1088     h->frame_num_offset = h->prev_frame_num_offset;
1089     if (h->frame_num < h->prev_frame_num)
1090         h->frame_num_offset += max_frame_num;
1091
1092     if (h->sps.poc_type == 0) {
1093         const int max_poc_lsb = 1 << h->sps.log2_max_poc_lsb;
1094
1095         if (h->poc_lsb < h->prev_poc_lsb &&
1096             h->prev_poc_lsb - h->poc_lsb >= max_poc_lsb / 2)
1097             h->poc_msb = h->prev_poc_msb + max_poc_lsb;
1098         else if (h->poc_lsb > h->prev_poc_lsb &&
1099                  h->prev_poc_lsb - h->poc_lsb < -max_poc_lsb / 2)
1100             h->poc_msb = h->prev_poc_msb - max_poc_lsb;
1101         else
1102             h->poc_msb = h->prev_poc_msb;
1103         field_poc[0] =
1104         field_poc[1] = h->poc_msb + h->poc_lsb;
1105         if (h->picture_structure == PICT_FRAME)
1106             field_poc[1] += h->delta_poc_bottom;
1107     } else if (h->sps.poc_type == 1) {
1108         int abs_frame_num, expected_delta_per_poc_cycle, expectedpoc;
1109         int i;
1110
1111         if (h->sps.poc_cycle_length != 0)
1112             abs_frame_num = h->frame_num_offset + h->frame_num;
1113         else
1114             abs_frame_num = 0;
1115
1116         if (h->nal_ref_idc == 0 && abs_frame_num > 0)
1117             abs_frame_num--;
1118
1119         expected_delta_per_poc_cycle = 0;
1120         for (i = 0; i < h->sps.poc_cycle_length; i++)
1121             // FIXME integrate during sps parse
1122             expected_delta_per_poc_cycle += h->sps.offset_for_ref_frame[i];
1123
1124         if (abs_frame_num > 0) {
1125             int poc_cycle_cnt          = (abs_frame_num - 1) / h->sps.poc_cycle_length;
1126             int frame_num_in_poc_cycle = (abs_frame_num - 1) % h->sps.poc_cycle_length;
1127
1128             expectedpoc = poc_cycle_cnt * expected_delta_per_poc_cycle;
1129             for (i = 0; i <= frame_num_in_poc_cycle; i++)
1130                 expectedpoc = expectedpoc + h->sps.offset_for_ref_frame[i];
1131         } else
1132             expectedpoc = 0;
1133
1134         if (h->nal_ref_idc == 0)
1135             expectedpoc = expectedpoc + h->sps.offset_for_non_ref_pic;
1136
1137         field_poc[0] = expectedpoc + h->delta_poc[0];
1138         field_poc[1] = field_poc[0] + h->sps.offset_for_top_to_bottom_field;
1139
1140         if (h->picture_structure == PICT_FRAME)
1141             field_poc[1] += h->delta_poc[1];
1142     } else {
1143         int poc = 2 * (h->frame_num_offset + h->frame_num);
1144
1145         if (!h->nal_ref_idc)
1146             poc--;
1147
1148         field_poc[0] = poc;
1149         field_poc[1] = poc;
1150     }
1151
1152     if (h->picture_structure != PICT_BOTTOM_FIELD)
1153         pic_field_poc[0] = field_poc[0];
1154     if (h->picture_structure != PICT_TOP_FIELD)
1155         pic_field_poc[1] = field_poc[1];
1156     *pic_poc = FFMIN(pic_field_poc[0], pic_field_poc[1]);
1157
1158     return 0;
1159 }
1160
1161 /**
1162  * Compute profile from profile_idc and constraint_set?_flags.
1163  *
1164  * @param sps SPS
1165  *
1166  * @return profile as defined by FF_PROFILE_H264_*
1167  */
1168 int ff_h264_get_profile(SPS *sps)
1169 {
1170     int profile = sps->profile_idc;
1171
1172     switch (sps->profile_idc) {
1173     case FF_PROFILE_H264_BASELINE:
1174         // constraint_set1_flag set to 1
1175         profile |= (sps->constraint_set_flags & 1 << 1) ? FF_PROFILE_H264_CONSTRAINED : 0;
1176         break;
1177     case FF_PROFILE_H264_HIGH_10:
1178     case FF_PROFILE_H264_HIGH_422:
1179     case FF_PROFILE_H264_HIGH_444_PREDICTIVE:
1180         // constraint_set3_flag set to 1
1181         profile |= (sps->constraint_set_flags & 1 << 3) ? FF_PROFILE_H264_INTRA : 0;
1182         break;
1183     }
1184
1185     return profile;
1186 }
1187
1188 int ff_set_ref_count(H264Context *h, H264SliceContext *sl)
1189 {
1190     int ref_count[2], list_count;
1191     int num_ref_idx_active_override_flag, max_refs;
1192
1193     // set defaults, might be overridden a few lines later
1194     ref_count[0] = h->pps.ref_count[0];
1195     ref_count[1] = h->pps.ref_count[1];
1196
1197     if (sl->slice_type_nos != AV_PICTURE_TYPE_I) {
1198         if (sl->slice_type_nos == AV_PICTURE_TYPE_B)
1199             sl->direct_spatial_mv_pred = get_bits1(&sl->gb);
1200         num_ref_idx_active_override_flag = get_bits1(&sl->gb);
1201
1202         if (num_ref_idx_active_override_flag) {
1203             ref_count[0] = get_ue_golomb(&sl->gb) + 1;
1204             if (ref_count[0] < 1)
1205                 return AVERROR_INVALIDDATA;
1206             if (sl->slice_type_nos == AV_PICTURE_TYPE_B) {
1207                 ref_count[1] = get_ue_golomb(&sl->gb) + 1;
1208                 if (ref_count[1] < 1)
1209                     return AVERROR_INVALIDDATA;
1210             }
1211         }
1212
1213         if (sl->slice_type_nos == AV_PICTURE_TYPE_B)
1214             list_count = 2;
1215         else
1216             list_count = 1;
1217     } else {
1218         list_count   = 0;
1219         ref_count[0] = ref_count[1] = 0;
1220     }
1221
1222     max_refs = h->picture_structure == PICT_FRAME ? 16 : 32;
1223
1224     if (ref_count[0] > max_refs || ref_count[1] > max_refs) {
1225         av_log(h->avctx, AV_LOG_ERROR, "reference overflow\n");
1226         sl->ref_count[0] = sl->ref_count[1] = 0;
1227         return AVERROR_INVALIDDATA;
1228     }
1229
1230     if (list_count   != sl->list_count   ||
1231         ref_count[0] != sl->ref_count[0] ||
1232         ref_count[1] != sl->ref_count[1]) {
1233         sl->ref_count[0] = ref_count[0];
1234         sl->ref_count[1] = ref_count[1];
1235         sl->list_count   = list_count;
1236         return 1;
1237     }
1238
1239     return 0;
1240 }
1241
1242 static int find_start_code(const uint8_t *buf, int buf_size,
1243                            int buf_index, int next_avc)
1244 {
1245     // start code prefix search
1246     for (; buf_index + 3 < next_avc; buf_index++)
1247         // This should always succeed in the first iteration.
1248         if (buf[buf_index]     == 0 &&
1249             buf[buf_index + 1] == 0 &&
1250             buf[buf_index + 2] == 1)
1251             break;
1252
1253     if (buf_index + 3 >= buf_size)
1254         return buf_size;
1255
1256     return buf_index + 3;
1257 }
1258
1259 static int get_avc_nalsize(H264Context *h, const uint8_t *buf,
1260                            int buf_size, int *buf_index)
1261 {
1262     int i, nalsize = 0;
1263
1264     if (*buf_index >= buf_size - h->nal_length_size)
1265         return -1;
1266
1267     for (i = 0; i < h->nal_length_size; i++)
1268         nalsize = (nalsize << 8) | buf[(*buf_index)++];
1269     if (nalsize <= 0 || nalsize > buf_size - *buf_index) {
1270         av_log(h->avctx, AV_LOG_ERROR,
1271                "AVC: nal size %d\n", nalsize);
1272         return -1;
1273     }
1274     return nalsize;
1275 }
1276
1277 static int get_bit_length(H264Context *h, const uint8_t *buf,
1278                           const uint8_t *ptr, int dst_length,
1279                           int i, int next_avc)
1280 {
1281     if ((h->workaround_bugs & FF_BUG_AUTODETECT) && i + 3 < next_avc &&
1282         buf[i]     == 0x00 && buf[i + 1] == 0x00 &&
1283         buf[i + 2] == 0x01 && buf[i + 3] == 0xE0)
1284         h->workaround_bugs |= FF_BUG_TRUNCATED;
1285
1286     if (!(h->workaround_bugs & FF_BUG_TRUNCATED))
1287         while (dst_length > 0 && ptr[dst_length - 1] == 0)
1288             dst_length--;
1289
1290     if (!dst_length)
1291         return 0;
1292
1293     return 8 * dst_length - decode_rbsp_trailing(h, ptr + dst_length - 1);
1294 }
1295
1296 static int get_last_needed_nal(H264Context *h, const uint8_t *buf, int buf_size)
1297 {
1298     int next_avc    = h->is_avc ? 0 : buf_size;
1299     int nal_index   = 0;
1300     int buf_index   = 0;
1301     int nals_needed = 0;
1302
1303     while(1) {
1304         GetBitContext gb;
1305         int nalsize = 0;
1306         int dst_length, bit_length, consumed;
1307         const uint8_t *ptr;
1308
1309         if (buf_index >= next_avc) {
1310             nalsize = get_avc_nalsize(h, buf, buf_size, &buf_index);
1311             if (nalsize < 0)
1312                 break;
1313             next_avc = buf_index + nalsize;
1314         } else {
1315             buf_index = find_start_code(buf, buf_size, buf_index, next_avc);
1316             if (buf_index >= buf_size)
1317                 break;
1318         }
1319
1320         ptr = ff_h264_decode_nal(h, &h->slice_ctx[0], buf + buf_index, &dst_length, &consumed,
1321                                  next_avc - buf_index);
1322
1323         if (!ptr || dst_length < 0)
1324             return AVERROR_INVALIDDATA;
1325
1326         buf_index += consumed;
1327
1328         bit_length = get_bit_length(h, buf, ptr, dst_length,
1329                                     buf_index, next_avc);
1330         nal_index++;
1331
1332         /* packets can sometimes contain multiple PPS/SPS,
1333          * e.g. two PAFF field pictures in one packet, or a demuxer
1334          * which splits NALs strangely if so, when frame threading we
1335          * can't start the next thread until we've read all of them */
1336         switch (h->nal_unit_type) {
1337         case NAL_SPS:
1338         case NAL_PPS:
1339             nals_needed = nal_index;
1340             break;
1341         case NAL_DPA:
1342         case NAL_IDR_SLICE:
1343         case NAL_SLICE:
1344             init_get_bits(&gb, ptr, bit_length);
1345             if (!get_ue_golomb(&gb))
1346                 nals_needed = nal_index;
1347         }
1348     }
1349
1350     return nals_needed;
1351 }
1352
1353 static int decode_nal_units(H264Context *h, const uint8_t *buf, int buf_size,
1354                             int parse_extradata)
1355 {
1356     AVCodecContext *const avctx = h->avctx;
1357     H264SliceContext *sl;
1358     int buf_index;
1359     unsigned context_count;
1360     int next_avc;
1361     int nals_needed = 0; ///< number of NALs that need decoding before the next frame thread starts
1362     int nal_index;
1363     int ret = 0;
1364
1365     h->max_contexts = h->slice_context_count;
1366     if (!(avctx->flags2 & CODEC_FLAG2_CHUNKS)) {
1367         h->current_slice = 0;
1368         if (!h->first_field)
1369             h->cur_pic_ptr = NULL;
1370         ff_h264_reset_sei(h);
1371     }
1372
1373     if (avctx->active_thread_type & FF_THREAD_FRAME)
1374         nals_needed = get_last_needed_nal(h, buf, buf_size);
1375
1376     {
1377         buf_index     = 0;
1378         context_count = 0;
1379         next_avc      = h->is_avc ? 0 : buf_size;
1380         nal_index     = 0;
1381         for (;;) {
1382             int consumed;
1383             int dst_length;
1384             int bit_length;
1385             const uint8_t *ptr;
1386             int nalsize = 0;
1387             int err;
1388
1389             if (buf_index >= next_avc) {
1390                 nalsize = get_avc_nalsize(h, buf, buf_size, &buf_index);
1391                 if (nalsize < 0)
1392                     break;
1393                 next_avc = buf_index + nalsize;
1394             } else {
1395                 buf_index = find_start_code(buf, buf_size, buf_index, next_avc);
1396                 if (buf_index >= buf_size)
1397                     break;
1398                 if (buf_index >= next_avc)
1399                     continue;
1400             }
1401
1402             sl = &h->slice_ctx[context_count];
1403
1404             ptr = ff_h264_decode_nal(h, sl, buf + buf_index, &dst_length,
1405                                      &consumed, next_avc - buf_index);
1406             if (!ptr || dst_length < 0) {
1407                 ret = -1;
1408                 goto end;
1409             }
1410
1411             bit_length = get_bit_length(h, buf, ptr, dst_length,
1412                                         buf_index + consumed, next_avc);
1413
1414             if (h->avctx->debug & FF_DEBUG_STARTCODE)
1415                 av_log(h->avctx, AV_LOG_DEBUG,
1416                        "NAL %d at %d/%d length %d\n",
1417                        h->nal_unit_type, buf_index, buf_size, dst_length);
1418
1419             if (h->is_avc && (nalsize != consumed) && nalsize)
1420                 av_log(h->avctx, AV_LOG_DEBUG,
1421                        "AVC: Consumed only %d bytes instead of %d\n",
1422                        consumed, nalsize);
1423
1424             buf_index += consumed;
1425             nal_index++;
1426
1427             if (avctx->skip_frame >= AVDISCARD_NONREF &&
1428                 h->nal_ref_idc == 0 &&
1429                 h->nal_unit_type != NAL_SEI)
1430                 continue;
1431
1432 again:
1433             /* Ignore every NAL unit type except PPS and SPS during extradata
1434              * parsing. Decoding slices is not possible in codec init
1435              * with frame-mt */
1436             if (parse_extradata && HAVE_THREADS &&
1437                 (h->avctx->active_thread_type & FF_THREAD_FRAME) &&
1438                 (h->nal_unit_type != NAL_PPS &&
1439                  h->nal_unit_type != NAL_SPS)) {
1440                 if (h->nal_unit_type < NAL_AUD ||
1441                     h->nal_unit_type > NAL_AUXILIARY_SLICE)
1442                     av_log(avctx, AV_LOG_INFO,
1443                            "Ignoring NAL unit %d during extradata parsing\n",
1444                            h->nal_unit_type);
1445                 h->nal_unit_type = NAL_FF_IGNORE;
1446             }
1447             err = 0;
1448             switch (h->nal_unit_type) {
1449             case NAL_IDR_SLICE:
1450                 if (h->nal_unit_type != NAL_IDR_SLICE) {
1451                     av_log(h->avctx, AV_LOG_ERROR,
1452                            "Invalid mix of idr and non-idr slices\n");
1453                     ret = -1;
1454                     goto end;
1455                 }
1456                 idr(h); // FIXME ensure we don't lose some frames if there is reordering
1457             case NAL_SLICE:
1458                 init_get_bits(&sl->gb, ptr, bit_length);
1459
1460                 if ((err = ff_h264_decode_slice_header(h, sl)))
1461                     break;
1462
1463                 if (h->sei_recovery_frame_cnt >= 0 && h->recovery_frame < 0) {
1464                     h->recovery_frame = (h->frame_num + h->sei_recovery_frame_cnt) &
1465                                         ((1 << h->sps.log2_max_frame_num) - 1);
1466                 }
1467
1468                 h->cur_pic_ptr->f->key_frame |=
1469                     (h->nal_unit_type == NAL_IDR_SLICE) ||
1470                     (h->sei_recovery_frame_cnt >= 0);
1471
1472                 if (h->nal_unit_type == NAL_IDR_SLICE ||
1473                     h->recovery_frame == h->frame_num) {
1474                     h->recovery_frame         = -1;
1475                     h->cur_pic_ptr->recovered = 1;
1476                 }
1477                 // If we have an IDR, all frames after it in decoded order are
1478                 // "recovered".
1479                 if (h->nal_unit_type == NAL_IDR_SLICE)
1480                     h->frame_recovered |= FRAME_RECOVERED_IDR;
1481                 h->cur_pic_ptr->recovered |= !!(h->frame_recovered & FRAME_RECOVERED_IDR);
1482
1483                 if (h->current_slice == 1) {
1484                     if (!(avctx->flags2 & CODEC_FLAG2_CHUNKS))
1485                         decode_postinit(h, nal_index >= nals_needed);
1486
1487                     if (h->avctx->hwaccel &&
1488                         (ret = h->avctx->hwaccel->start_frame(h->avctx, NULL, 0)) < 0)
1489                         return ret;
1490                 }
1491
1492                 if (sl->redundant_pic_count == 0 &&
1493                     (avctx->skip_frame < AVDISCARD_NONREF ||
1494                      h->nal_ref_idc) &&
1495                     (avctx->skip_frame < AVDISCARD_BIDIR  ||
1496                      sl->slice_type_nos != AV_PICTURE_TYPE_B) &&
1497                     (avctx->skip_frame < AVDISCARD_NONKEY ||
1498                      sl->slice_type_nos == AV_PICTURE_TYPE_I) &&
1499                     avctx->skip_frame < AVDISCARD_ALL) {
1500                     if (avctx->hwaccel) {
1501                         ret = avctx->hwaccel->decode_slice(avctx,
1502                                                            &buf[buf_index - consumed],
1503                                                            consumed);
1504                         if (ret < 0)
1505                             return ret;
1506                     } else
1507                         context_count++;
1508                 }
1509                 break;
1510             case NAL_DPA:
1511             case NAL_DPB:
1512             case NAL_DPC:
1513                 avpriv_request_sample(avctx, "data partitioning");
1514                 ret = AVERROR(ENOSYS);
1515                 goto end;
1516                 break;
1517             case NAL_SEI:
1518                 init_get_bits(&h->gb, ptr, bit_length);
1519                 ret = ff_h264_decode_sei(h);
1520                 if (ret < 0 && (h->avctx->err_recognition & AV_EF_EXPLODE))
1521                     goto end;
1522                 break;
1523             case NAL_SPS:
1524                 init_get_bits(&h->gb, ptr, bit_length);
1525                 ret = ff_h264_decode_seq_parameter_set(h);
1526                 if (ret < 0 && h->is_avc && (nalsize != consumed) && nalsize) {
1527                     av_log(h->avctx, AV_LOG_DEBUG,
1528                            "SPS decoding failure, trying again with the complete NAL\n");
1529                     init_get_bits(&h->gb, buf + buf_index + 1 - consumed,
1530                                   8 * (nalsize - 1));
1531                     ff_h264_decode_seq_parameter_set(h);
1532                 }
1533
1534                 break;
1535             case NAL_PPS:
1536                 init_get_bits(&h->gb, ptr, bit_length);
1537                 ret = ff_h264_decode_picture_parameter_set(h, bit_length);
1538                 if (ret < 0 && (h->avctx->err_recognition & AV_EF_EXPLODE))
1539                     goto end;
1540                 break;
1541             case NAL_AUD:
1542             case NAL_END_SEQUENCE:
1543             case NAL_END_STREAM:
1544             case NAL_FILLER_DATA:
1545             case NAL_SPS_EXT:
1546             case NAL_AUXILIARY_SLICE:
1547                 break;
1548             case NAL_FF_IGNORE:
1549                 break;
1550             default:
1551                 av_log(avctx, AV_LOG_DEBUG, "Unknown NAL code: %d (%d bits)\n",
1552                        h->nal_unit_type, bit_length);
1553             }
1554
1555             if (context_count == h->max_contexts) {
1556                 ret = ff_h264_execute_decode_slices(h, context_count);
1557                 if (ret < 0 && (h->avctx->err_recognition & AV_EF_EXPLODE))
1558                     goto end;
1559                 context_count = 0;
1560             }
1561
1562             if (err < 0) {
1563                 av_log(h->avctx, AV_LOG_ERROR, "decode_slice_header error\n");
1564                 sl->ref_count[0] = sl->ref_count[1] = sl->list_count = 0;
1565             } else if (err == 1) {
1566                 /* Slice could not be decoded in parallel mode, restart. Note
1567                  * that rbsp_buffer is not transferred, but since we no longer
1568                  * run in parallel mode this should not be an issue. */
1569                 sl               = &h->slice_ctx[0];
1570                 goto again;
1571             }
1572         }
1573     }
1574     if (context_count) {
1575         ret = ff_h264_execute_decode_slices(h, context_count);
1576         if (ret < 0 && (h->avctx->err_recognition & AV_EF_EXPLODE))
1577             goto end;
1578     }
1579
1580     ret = 0;
1581 end:
1582     /* clean up */
1583     if (h->cur_pic_ptr && !h->droppable) {
1584         ff_thread_report_progress(&h->cur_pic_ptr->tf, INT_MAX,
1585                                   h->picture_structure == PICT_BOTTOM_FIELD);
1586     }
1587
1588     return (ret < 0) ? ret : buf_index;
1589 }
1590
1591 /**
1592  * Return the number of bytes consumed for building the current frame.
1593  */
1594 static int get_consumed_bytes(int pos, int buf_size)
1595 {
1596     if (pos == 0)
1597         pos = 1;        // avoid infinite loops (I doubt that is needed but...)
1598     if (pos + 10 > buf_size)
1599         pos = buf_size; // oops ;)
1600
1601     return pos;
1602 }
1603
1604 static int output_frame(H264Context *h, AVFrame *dst, AVFrame *src)
1605 {
1606     int i;
1607     int ret = av_frame_ref(dst, src);
1608     if (ret < 0)
1609         return ret;
1610
1611     if (!h->sps.crop)
1612         return 0;
1613
1614     for (i = 0; i < 3; i++) {
1615         int hshift = (i > 0) ? h->chroma_x_shift : 0;
1616         int vshift = (i > 0) ? h->chroma_y_shift : 0;
1617         int off    = ((h->sps.crop_left >> hshift) << h->pixel_shift) +
1618                      (h->sps.crop_top >> vshift) * dst->linesize[i];
1619         dst->data[i] += off;
1620     }
1621     return 0;
1622 }
1623
1624 static int h264_decode_frame(AVCodecContext *avctx, void *data,
1625                              int *got_frame, AVPacket *avpkt)
1626 {
1627     const uint8_t *buf = avpkt->data;
1628     int buf_size       = avpkt->size;
1629     H264Context *h     = avctx->priv_data;
1630     AVFrame *pict      = data;
1631     int buf_index      = 0;
1632     int ret;
1633
1634     h->flags = avctx->flags;
1635     h->setup_finished = 0;
1636
1637     /* end of stream, output what is still in the buffers */
1638 out:
1639     if (buf_size == 0) {
1640         H264Picture *out;
1641         int i, out_idx;
1642
1643         h->cur_pic_ptr = NULL;
1644
1645         // FIXME factorize this with the output code below
1646         out     = h->delayed_pic[0];
1647         out_idx = 0;
1648         for (i = 1;
1649              h->delayed_pic[i] &&
1650              !h->delayed_pic[i]->f->key_frame &&
1651              !h->delayed_pic[i]->mmco_reset;
1652              i++)
1653             if (h->delayed_pic[i]->poc < out->poc) {
1654                 out     = h->delayed_pic[i];
1655                 out_idx = i;
1656             }
1657
1658         for (i = out_idx; h->delayed_pic[i]; i++)
1659             h->delayed_pic[i] = h->delayed_pic[i + 1];
1660
1661         if (out) {
1662             ret = output_frame(h, pict, out->f);
1663             if (ret < 0)
1664                 return ret;
1665             *got_frame = 1;
1666         }
1667
1668         return buf_index;
1669     }
1670
1671     buf_index = decode_nal_units(h, buf, buf_size, 0);
1672     if (buf_index < 0)
1673         return AVERROR_INVALIDDATA;
1674
1675     if (!h->cur_pic_ptr && h->nal_unit_type == NAL_END_SEQUENCE) {
1676         buf_size = 0;
1677         goto out;
1678     }
1679
1680     if (!(avctx->flags2 & CODEC_FLAG2_CHUNKS) && !h->cur_pic_ptr) {
1681         if (avctx->skip_frame >= AVDISCARD_NONREF)
1682             return 0;
1683         av_log(avctx, AV_LOG_ERROR, "no frame!\n");
1684         return AVERROR_INVALIDDATA;
1685     }
1686
1687     if (!(avctx->flags2 & CODEC_FLAG2_CHUNKS) ||
1688         (h->mb_y >= h->mb_height && h->mb_height)) {
1689         if (avctx->flags2 & CODEC_FLAG2_CHUNKS)
1690             decode_postinit(h, 1);
1691
1692         ff_h264_field_end(h, &h->slice_ctx[0], 0);
1693
1694         *got_frame = 0;
1695         if (h->next_output_pic && ((avctx->flags & CODEC_FLAG_OUTPUT_CORRUPT) ||
1696                                    h->next_output_pic->recovered)) {
1697             if (!h->next_output_pic->recovered)
1698                 h->next_output_pic->f->flags |= AV_FRAME_FLAG_CORRUPT;
1699
1700             ret = output_frame(h, pict, h->next_output_pic->f);
1701             if (ret < 0)
1702                 return ret;
1703             *got_frame = 1;
1704         }
1705     }
1706
1707     assert(pict->buf[0] || !*got_frame);
1708
1709     return get_consumed_bytes(buf_index, buf_size);
1710 }
1711
1712 av_cold void ff_h264_free_context(H264Context *h)
1713 {
1714     int i;
1715
1716     ff_h264_free_tables(h);
1717
1718     for (i = 0; i < H264_MAX_PICTURE_COUNT; i++) {
1719         ff_h264_unref_picture(h, &h->DPB[i]);
1720         av_frame_free(&h->DPB[i].f);
1721     }
1722
1723     h->cur_pic_ptr = NULL;
1724
1725     for (i = 0; i < h->nb_slice_ctx; i++)
1726         av_freep(&h->slice_ctx[i].rbsp_buffer);
1727     av_freep(&h->slice_ctx);
1728     h->nb_slice_ctx = 0;
1729
1730     for (i = 0; i < MAX_SPS_COUNT; i++)
1731         av_freep(h->sps_buffers + i);
1732
1733     for (i = 0; i < MAX_PPS_COUNT; i++)
1734         av_freep(h->pps_buffers + i);
1735 }
1736
1737 static av_cold int h264_decode_end(AVCodecContext *avctx)
1738 {
1739     H264Context *h = avctx->priv_data;
1740
1741     ff_h264_free_context(h);
1742
1743     ff_h264_unref_picture(h, &h->cur_pic);
1744     av_frame_free(&h->cur_pic.f);
1745
1746     return 0;
1747 }
1748
1749 #define OFFSET(x) offsetof(H264Context, x)
1750 #define VD AV_OPT_FLAG_VIDEO_PARAM | AV_OPT_FLAG_DECODING_PARAM
1751 static const AVOption h264_options[] = {
1752     { "enable_er", "Enable error resilience on damaged frames (unsafe)", OFFSET(enable_er), AV_OPT_TYPE_INT, { .i64 = 0 }, 0, 1, VD },
1753     { NULL },
1754 };
1755
1756 static const AVClass h264_class = {
1757     .class_name = "h264",
1758     .item_name  = av_default_item_name,
1759     .option     = h264_options,
1760     .version    = LIBAVUTIL_VERSION_INT,
1761 };
1762
1763 static const AVProfile profiles[] = {
1764     { FF_PROFILE_H264_BASELINE,             "Baseline"              },
1765     { FF_PROFILE_H264_CONSTRAINED_BASELINE, "Constrained Baseline"  },
1766     { FF_PROFILE_H264_MAIN,                 "Main"                  },
1767     { FF_PROFILE_H264_EXTENDED,             "Extended"              },
1768     { FF_PROFILE_H264_HIGH,                 "High"                  },
1769     { FF_PROFILE_H264_HIGH_10,              "High 10"               },
1770     { FF_PROFILE_H264_HIGH_10_INTRA,        "High 10 Intra"         },
1771     { FF_PROFILE_H264_HIGH_422,             "High 4:2:2"            },
1772     { FF_PROFILE_H264_HIGH_422_INTRA,       "High 4:2:2 Intra"      },
1773     { FF_PROFILE_H264_HIGH_444,             "High 4:4:4"            },
1774     { FF_PROFILE_H264_HIGH_444_PREDICTIVE,  "High 4:4:4 Predictive" },
1775     { FF_PROFILE_H264_HIGH_444_INTRA,       "High 4:4:4 Intra"      },
1776     { FF_PROFILE_H264_CAVLC_444,            "CAVLC 4:4:4"           },
1777     { FF_PROFILE_UNKNOWN },
1778 };
1779
1780 AVCodec ff_h264_decoder = {
1781     .name                  = "h264",
1782     .long_name             = NULL_IF_CONFIG_SMALL("H.264 / AVC / MPEG-4 AVC / MPEG-4 part 10"),
1783     .type                  = AVMEDIA_TYPE_VIDEO,
1784     .id                    = AV_CODEC_ID_H264,
1785     .priv_data_size        = sizeof(H264Context),
1786     .init                  = ff_h264_decode_init,
1787     .close                 = h264_decode_end,
1788     .decode                = h264_decode_frame,
1789     .capabilities          = /*CODEC_CAP_DRAW_HORIZ_BAND |*/ CODEC_CAP_DR1 |
1790                              CODEC_CAP_DELAY | CODEC_CAP_SLICE_THREADS |
1791                              CODEC_CAP_FRAME_THREADS,
1792     .flush                 = flush_dpb,
1793     .init_thread_copy      = ONLY_IF_THREADS_ENABLED(decode_init_thread_copy),
1794     .update_thread_context = ONLY_IF_THREADS_ENABLED(ff_h264_update_thread_context),
1795     .profiles              = NULL_IF_CONFIG_SMALL(profiles),
1796     .priv_class            = &h264_class,
1797 };