332866a2db890ea98d5b83a215080353576e2237
[libav.git] / libavcodec / h264_refs.c
1 /*
2 * H.26L/H.264/AVC/JVT/14496-10/... reference picture handling
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 reference picture handling.
25 * @author Michael Niedermayer <michaelni@gmx.at>
26 */
27
28 #include "internal.h"
29 #include "avcodec.h"
30 #include "h264.h"
31 #include "golomb.h"
32 #include "mpegutils.h"
33
34 #include <assert.h>
35
36 #define COPY_PICTURE(dst, src) \
37 do {\
38 *(dst) = *(src);\
39 (dst)->f.extended_data = (dst)->f.data;\
40 (dst)->tf.f = &(dst)->f;\
41 } while (0)
42
43
44 static void pic_as_field(H264Picture *pic, const int parity){
45 int i;
46 for (i = 0; i < 4; ++i) {
47 if (parity == PICT_BOTTOM_FIELD)
48 pic->f.data[i] += pic->f.linesize[i];
49 pic->reference = parity;
50 pic->f.linesize[i] *= 2;
51 }
52 pic->poc= pic->field_poc[parity == PICT_BOTTOM_FIELD];
53 }
54
55 static int split_field_copy(H264Picture *dest, H264Picture *src, int parity, int id_add)
56 {
57 int match = !!(src->reference & parity);
58
59 if (match) {
60 COPY_PICTURE(dest, src);
61 if (parity != PICT_FRAME) {
62 pic_as_field(dest, parity);
63 dest->pic_id *= 2;
64 dest->pic_id += id_add;
65 }
66 }
67
68 return match;
69 }
70
71 static int build_def_list(H264Picture *def, int def_len,
72 H264Picture **in, int len, int is_long, int sel)
73 {
74 int i[2] = { 0 };
75 int index = 0;
76
77 while ((i[0] < len || i[1] < len) && index < def_len) {
78 while (i[0] < len && !(in[i[0]] && (in[i[0]]->reference & sel)))
79 i[0]++;
80 while (i[1] < len && !(in[i[1]] && (in[i[1]]->reference & (sel ^ 3))))
81 i[1]++;
82 if (i[0] < len && index < def_len) {
83 in[i[0]]->pic_id = is_long ? i[0] : in[i[0]]->frame_num;
84 split_field_copy(&def[index++], in[i[0]++], sel, 1);
85 }
86 if (i[1] < len && index < def_len) {
87 in[i[1]]->pic_id = is_long ? i[1] : in[i[1]]->frame_num;
88 split_field_copy(&def[index++], in[i[1]++], sel ^ 3, 0);
89 }
90 }
91
92 return index;
93 }
94
95 static int add_sorted(H264Picture **sorted, H264Picture **src, int len, int limit, int dir)
96 {
97 int i, best_poc;
98 int out_i = 0;
99
100 for (;;) {
101 best_poc = dir ? INT_MIN : INT_MAX;
102
103 for (i = 0; i < len; i++) {
104 const int poc = src[i]->poc;
105 if (((poc > limit) ^ dir) && ((poc < best_poc) ^ dir)) {
106 best_poc = poc;
107 sorted[out_i] = src[i];
108 }
109 }
110 if (best_poc == (dir ? INT_MIN : INT_MAX))
111 break;
112 limit = sorted[out_i++]->poc - dir;
113 }
114 return out_i;
115 }
116
117 int ff_h264_fill_default_ref_list(H264Context *h)
118 {
119 int i, len;
120
121 if (h->slice_type_nos == AV_PICTURE_TYPE_B) {
122 H264Picture *sorted[32];
123 int cur_poc, list;
124 int lens[2];
125
126 if (FIELD_PICTURE(h))
127 cur_poc = h->cur_pic_ptr->field_poc[h->picture_structure == PICT_BOTTOM_FIELD];
128 else
129 cur_poc = h->cur_pic_ptr->poc;
130
131 for (list = 0; list < 2; list++) {
132 len = add_sorted(sorted, h->short_ref, h->short_ref_count, cur_poc, 1 ^ list);
133 len += add_sorted(sorted + len, h->short_ref, h->short_ref_count, cur_poc, 0 ^ list);
134 assert(len <= 32);
135
136 len = build_def_list(h->default_ref_list[list], FF_ARRAY_ELEMS(h->default_ref_list[0]),
137 sorted, len, 0, h->picture_structure);
138 len += build_def_list(h->default_ref_list[list] + len,
139 FF_ARRAY_ELEMS(h->default_ref_list[0]) - len,
140 h->long_ref, 16, 1, h->picture_structure);
141
142 if (len < h->ref_count[list])
143 memset(&h->default_ref_list[list][len], 0, sizeof(H264Picture) * (h->ref_count[list] - len));
144 lens[list] = len;
145 }
146
147 if (lens[0] == lens[1] && lens[1] > 1) {
148 for (i = 0; i < lens[0] &&
149 h->default_ref_list[0][i].f.buf[0]->buffer ==
150 h->default_ref_list[1][i].f.buf[0]->buffer; i++);
151 if (i == lens[0]) {
152 H264Picture tmp;
153 COPY_PICTURE(&tmp, &h->default_ref_list[1][0]);
154 COPY_PICTURE(&h->default_ref_list[1][0], &h->default_ref_list[1][1]);
155 COPY_PICTURE(&h->default_ref_list[1][1], &tmp);
156 }
157 }
158 } else {
159 len = build_def_list(h->default_ref_list[0], FF_ARRAY_ELEMS(h->default_ref_list[0]),
160 h->short_ref, h->short_ref_count, 0, h->picture_structure);
161 len += build_def_list(h->default_ref_list[0] + len,
162 FF_ARRAY_ELEMS(h->default_ref_list[0]) - len,
163 h-> long_ref, 16, 1, h->picture_structure);
164
165 if (len < h->ref_count[0])
166 memset(&h->default_ref_list[0][len], 0, sizeof(H264Picture) * (h->ref_count[0] - len));
167 }
168 #ifdef TRACE
169 for (i = 0; i < h->ref_count[0]; i++) {
170 tprintf(h->avctx, "List0: %s fn:%d 0x%p\n",
171 (h->default_ref_list[0][i].long_ref ? "LT" : "ST"),
172 h->default_ref_list[0][i].pic_id,
173 h->default_ref_list[0][i].f.data[0]);
174 }
175 if (h->slice_type_nos == AV_PICTURE_TYPE_B) {
176 for (i = 0; i < h->ref_count[1]; i++) {
177 tprintf(h->avctx, "List1: %s fn:%d 0x%p\n",
178 (h->default_ref_list[1][i].long_ref ? "LT" : "ST"),
179 h->default_ref_list[1][i].pic_id,
180 h->default_ref_list[1][i].f.data[0]);
181 }
182 }
183 #endif
184 return 0;
185 }
186
187 static void print_short_term(H264Context *h);
188 static void print_long_term(H264Context *h);
189
190 /**
191 * Extract structure information about the picture described by pic_num in
192 * the current decoding context (frame or field). Note that pic_num is
193 * picture number without wrapping (so, 0<=pic_num<max_pic_num).
194 * @param pic_num picture number for which to extract structure information
195 * @param structure one of PICT_XXX describing structure of picture
196 * with pic_num
197 * @return frame number (short term) or long term index of picture
198 * described by pic_num
199 */
200 static int pic_num_extract(H264Context *h, int pic_num, int *structure)
201 {
202 *structure = h->picture_structure;
203 if (FIELD_PICTURE(h)) {
204 if (!(pic_num & 1))
205 /* opposite field */
206 *structure ^= PICT_FRAME;
207 pic_num >>= 1;
208 }
209
210 return pic_num;
211 }
212
213 int ff_h264_decode_ref_pic_list_reordering(H264Context *h)
214 {
215 int list, index, pic_structure, i;
216
217 print_short_term(h);
218 print_long_term(h);
219
220 for (list = 0; list < h->list_count; list++) {
221 for (i = 0; i < h->ref_count[list]; i++)
222 COPY_PICTURE(&h->ref_list[list][i], &h->default_ref_list[list][i]);
223
224 if (get_bits1(&h->gb)) { // ref_pic_list_modification_flag_l[01]
225 int pred = h->curr_pic_num;
226
227 for (index = 0; ; index++) {
228 unsigned int modification_of_pic_nums_idc = get_ue_golomb_31(&h->gb);
229 unsigned int pic_id;
230 int i;
231 H264Picture *ref = NULL;
232
233 if (modification_of_pic_nums_idc == 3)
234 break;
235
236 if (index >= h->ref_count[list]) {
237 av_log(h->avctx, AV_LOG_ERROR, "reference count overflow\n");
238 return -1;
239 }
240
241 switch (modification_of_pic_nums_idc) {
242 case 0:
243 case 1: {
244 const unsigned int abs_diff_pic_num = get_ue_golomb(&h->gb) + 1;
245 int frame_num;
246
247 if (abs_diff_pic_num > h->max_pic_num) {
248 av_log(h->avctx, AV_LOG_ERROR,
249 "abs_diff_pic_num overflow\n");
250 return AVERROR_INVALIDDATA;
251 }
252
253 if (modification_of_pic_nums_idc == 0)
254 pred -= abs_diff_pic_num;
255 else
256 pred += abs_diff_pic_num;
257 pred &= h->max_pic_num - 1;
258
259 frame_num = pic_num_extract(h, pred, &pic_structure);
260
261 for (i = h->short_ref_count - 1; i >= 0; i--) {
262 ref = h->short_ref[i];
263 assert(ref->reference);
264 assert(!ref->long_ref);
265 if (ref->frame_num == frame_num &&
266 (ref->reference & pic_structure))
267 break;
268 }
269 if (i >= 0)
270 ref->pic_id = pred;
271 break;
272 }
273 case 2: {
274 int long_idx;
275 pic_id = get_ue_golomb(&h->gb); // long_term_pic_idx
276
277 long_idx = pic_num_extract(h, pic_id, &pic_structure);
278
279 if (long_idx > 31) {
280 av_log(h->avctx, AV_LOG_ERROR,
281 "long_term_pic_idx overflow\n");
282 return AVERROR_INVALIDDATA;
283 }
284 ref = h->long_ref[long_idx];
285 assert(!(ref && !ref->reference));
286 if (ref && (ref->reference & pic_structure)) {
287 ref->pic_id = pic_id;
288 assert(ref->long_ref);
289 i = 0;
290 } else {
291 i = -1;
292 }
293 break;
294 }
295 default:
296 av_log(h->avctx, AV_LOG_ERROR,
297 "illegal modification_of_pic_nums_idc %u\n",
298 modification_of_pic_nums_idc);
299 return AVERROR_INVALIDDATA;
300 }
301
302 if (i < 0) {
303 av_log(h->avctx, AV_LOG_ERROR,
304 "reference picture missing during reorder\n");
305 memset(&h->ref_list[list][index], 0, sizeof(H264Picture)); // FIXME
306 } else {
307 for (i = index; i + 1 < h->ref_count[list]; i++) {
308 if (ref->long_ref == h->ref_list[list][i].long_ref &&
309 ref->pic_id == h->ref_list[list][i].pic_id)
310 break;
311 }
312 for (; i > index; i--) {
313 COPY_PICTURE(&h->ref_list[list][i], &h->ref_list[list][i - 1]);
314 }
315 COPY_PICTURE(&h->ref_list[list][index], ref);
316 if (FIELD_PICTURE(h)) {
317 pic_as_field(&h->ref_list[list][index], pic_structure);
318 }
319 }
320 }
321 }
322 }
323 for (list = 0; list < h->list_count; list++) {
324 for (index = 0; index < h->ref_count[list]; index++) {
325 if (!h->ref_list[list][index].f.buf[0]) {
326 av_log(h->avctx, AV_LOG_ERROR, "Missing reference picture\n");
327 if (h->default_ref_list[list][0].f.buf[0])
328 COPY_PICTURE(&h->ref_list[list][index], &h->default_ref_list[list][0]);
329 else
330 return -1;
331 }
332 }
333 }
334
335 return 0;
336 }
337
338 void ff_h264_fill_mbaff_ref_list(H264Context *h)
339 {
340 int list, i, j;
341 for (list = 0; list < 2; list++) { //FIXME try list_count
342 for (i = 0; i < h->ref_count[list]; i++) {
343 H264Picture *frame = &h->ref_list[list][i];
344 H264Picture *field = &h->ref_list[list][16 + 2 * i];
345 COPY_PICTURE(field, frame);
346 for (j = 0; j < 3; j++)
347 field[0].f.linesize[j] <<= 1;
348 field[0].reference = PICT_TOP_FIELD;
349 field[0].poc = field[0].field_poc[0];
350 COPY_PICTURE(field + 1, field);
351 for (j = 0; j < 3; j++)
352 field[1].f.data[j] += frame->f.linesize[j];
353 field[1].reference = PICT_BOTTOM_FIELD;
354 field[1].poc = field[1].field_poc[1];
355
356 h->luma_weight[16 + 2 * i][list][0] = h->luma_weight[16 + 2 * i + 1][list][0] = h->luma_weight[i][list][0];
357 h->luma_weight[16 + 2 * i][list][1] = h->luma_weight[16 + 2 * i + 1][list][1] = h->luma_weight[i][list][1];
358 for (j = 0; j < 2; j++) {
359 h->chroma_weight[16 + 2 * i][list][j][0] = h->chroma_weight[16 + 2 * i + 1][list][j][0] = h->chroma_weight[i][list][j][0];
360 h->chroma_weight[16 + 2 * i][list][j][1] = h->chroma_weight[16 + 2 * i + 1][list][j][1] = h->chroma_weight[i][list][j][1];
361 }
362 }
363 }
364 }
365
366 /**
367 * Mark a picture as no longer needed for reference. The refmask
368 * argument allows unreferencing of individual fields or the whole frame.
369 * If the picture becomes entirely unreferenced, but is being held for
370 * display purposes, it is marked as such.
371 * @param refmask mask of fields to unreference; the mask is bitwise
372 * anded with the reference marking of pic
373 * @return non-zero if pic becomes entirely unreferenced (except possibly
374 * for display purposes) zero if one of the fields remains in
375 * reference
376 */
377 static inline int unreference_pic(H264Context *h, H264Picture *pic, int refmask)
378 {
379 int i;
380 if (pic->reference &= refmask) {
381 return 0;
382 } else {
383 for(i = 0; h->delayed_pic[i]; i++)
384 if(pic == h->delayed_pic[i]){
385 pic->reference = DELAYED_PIC_REF;
386 break;
387 }
388 return 1;
389 }
390 }
391
392 /**
393 * Find a H264Picture in the short term reference list by frame number.
394 * @param frame_num frame number to search for
395 * @param idx the index into h->short_ref where returned picture is found
396 * undefined if no picture found.
397 * @return pointer to the found picture, or NULL if no pic with the provided
398 * frame number is found
399 */
400 static H264Picture *find_short(H264Context *h, int frame_num, int *idx)
401 {
402 int i;
403
404 for (i = 0; i < h->short_ref_count; i++) {
405 H264Picture *pic = h->short_ref[i];
406 if (h->avctx->debug & FF_DEBUG_MMCO)
407 av_log(h->avctx, AV_LOG_DEBUG, "%d %d %p\n", i, pic->frame_num, pic);
408 if (pic->frame_num == frame_num) {
409 *idx = i;
410 return pic;
411 }
412 }
413 return NULL;
414 }
415
416 /**
417 * Remove a picture from the short term reference list by its index in
418 * that list. This does no checking on the provided index; it is assumed
419 * to be valid. Other list entries are shifted down.
420 * @param i index into h->short_ref of picture to remove.
421 */
422 static void remove_short_at_index(H264Context *h, int i)
423 {
424 assert(i >= 0 && i < h->short_ref_count);
425 h->short_ref[i] = NULL;
426 if (--h->short_ref_count)
427 memmove(&h->short_ref[i], &h->short_ref[i + 1],
428 (h->short_ref_count - i) * sizeof(H264Picture*));
429 }
430
431 /**
432 *
433 * @return the removed picture or NULL if an error occurs
434 */
435 static H264Picture *remove_short(H264Context *h, int frame_num, int ref_mask)
436 {
437 H264Picture *pic;
438 int i;
439
440 if (h->avctx->debug & FF_DEBUG_MMCO)
441 av_log(h->avctx, AV_LOG_DEBUG, "remove short %d count %d\n", frame_num, h->short_ref_count);
442
443 pic = find_short(h, frame_num, &i);
444 if (pic) {
445 if (unreference_pic(h, pic, ref_mask))
446 remove_short_at_index(h, i);
447 }
448
449 return pic;
450 }
451
452 /**
453 * Remove a picture from the long term reference list by its index in
454 * that list.
455 * @return the removed picture or NULL if an error occurs
456 */
457 static H264Picture *remove_long(H264Context *h, int i, int ref_mask)
458 {
459 H264Picture *pic;
460
461 pic = h->long_ref[i];
462 if (pic) {
463 if (unreference_pic(h, pic, ref_mask)) {
464 assert(h->long_ref[i]->long_ref == 1);
465 h->long_ref[i]->long_ref = 0;
466 h->long_ref[i] = NULL;
467 h->long_ref_count--;
468 }
469 }
470
471 return pic;
472 }
473
474 void ff_h264_remove_all_refs(H264Context *h)
475 {
476 int i;
477
478 for (i = 0; i < 16; i++) {
479 remove_long(h, i, 0);
480 }
481 assert(h->long_ref_count == 0);
482
483 for (i = 0; i < h->short_ref_count; i++) {
484 unreference_pic(h, h->short_ref[i], 0);
485 h->short_ref[i] = NULL;
486 }
487 h->short_ref_count = 0;
488 }
489
490 /**
491 * print short term list
492 */
493 static void print_short_term(H264Context *h)
494 {
495 uint32_t i;
496 if (h->avctx->debug & FF_DEBUG_MMCO) {
497 av_log(h->avctx, AV_LOG_DEBUG, "short term list:\n");
498 for (i = 0; i < h->short_ref_count; i++) {
499 H264Picture *pic = h->short_ref[i];
500 av_log(h->avctx, AV_LOG_DEBUG, "%d fn:%d poc:%d %p\n",
501 i, pic->frame_num, pic->poc, pic->f.data[0]);
502 }
503 }
504 }
505
506 /**
507 * print long term list
508 */
509 static void print_long_term(H264Context *h)
510 {
511 uint32_t i;
512 if (h->avctx->debug & FF_DEBUG_MMCO) {
513 av_log(h->avctx, AV_LOG_DEBUG, "long term list:\n");
514 for (i = 0; i < 16; i++) {
515 H264Picture *pic = h->long_ref[i];
516 if (pic) {
517 av_log(h->avctx, AV_LOG_DEBUG, "%d fn:%d poc:%d %p\n",
518 i, pic->frame_num, pic->poc, pic->f.data[0]);
519 }
520 }
521 }
522 }
523
524 static int check_opcodes(MMCO *mmco1, MMCO *mmco2, int n_mmcos)
525 {
526 int i;
527
528 for (i = 0; i < n_mmcos; i++) {
529 if (mmco1[i].opcode != mmco2[i].opcode)
530 return -1;
531 }
532
533 return 0;
534 }
535
536 int ff_generate_sliding_window_mmcos(H264Context *h, int first_slice)
537 {
538 MMCO mmco_temp[MAX_MMCO_COUNT], *mmco = first_slice ? h->mmco : mmco_temp;
539 int mmco_index = 0, i = 0;
540
541 assert(h->long_ref_count + h->short_ref_count <= h->sps.ref_frame_count);
542
543 if (h->short_ref_count &&
544 h->long_ref_count + h->short_ref_count == h->sps.ref_frame_count &&
545 !(FIELD_PICTURE(h) && !h->first_field && h->cur_pic_ptr->reference)) {
546 mmco[0].opcode = MMCO_SHORT2UNUSED;
547 mmco[0].short_pic_num = h->short_ref[h->short_ref_count - 1]->frame_num;
548 mmco_index = 1;
549 if (FIELD_PICTURE(h)) {
550 mmco[0].short_pic_num *= 2;
551 mmco[1].opcode = MMCO_SHORT2UNUSED;
552 mmco[1].short_pic_num = mmco[0].short_pic_num + 1;
553 mmco_index = 2;
554 }
555 }
556
557 if (first_slice) {
558 h->mmco_index = mmco_index;
559 } else if (!first_slice && mmco_index >= 0 &&
560 (mmco_index != h->mmco_index ||
561 (i = check_opcodes(h->mmco, mmco_temp, mmco_index)))) {
562 av_log(h->avctx, AV_LOG_ERROR,
563 "Inconsistent MMCO state between slices [%d, %d, %d]\n",
564 mmco_index, h->mmco_index, i);
565 return AVERROR_INVALIDDATA;
566 }
567 return 0;
568 }
569
570 int ff_h264_execute_ref_pic_marking(H264Context *h, MMCO *mmco, int mmco_count)
571 {
572 int i, av_uninit(j);
573 int current_ref_assigned = 0, err = 0;
574 H264Picture *av_uninit(pic);
575
576 if ((h->avctx->debug & FF_DEBUG_MMCO) && mmco_count == 0)
577 av_log(h->avctx, AV_LOG_DEBUG, "no mmco here\n");
578
579 for (i = 0; i < mmco_count; i++) {
580 int av_uninit(structure), av_uninit(frame_num);
581 if (h->avctx->debug & FF_DEBUG_MMCO)
582 av_log(h->avctx, AV_LOG_DEBUG, "mmco:%d %d %d\n", h->mmco[i].opcode,
583 h->mmco[i].short_pic_num, h->mmco[i].long_arg);
584
585 if (mmco[i].opcode == MMCO_SHORT2UNUSED ||
586 mmco[i].opcode == MMCO_SHORT2LONG) {
587 frame_num = pic_num_extract(h, mmco[i].short_pic_num, &structure);
588 pic = find_short(h, frame_num, &j);
589 if (!pic) {
590 if (mmco[i].opcode != MMCO_SHORT2LONG ||
591 !h->long_ref[mmco[i].long_arg] ||
592 h->long_ref[mmco[i].long_arg]->frame_num != frame_num) {
593 av_log(h->avctx, AV_LOG_ERROR, "mmco: unref short failure\n");
594 err = AVERROR_INVALIDDATA;
595 }
596 continue;
597 }
598 }
599
600 switch (mmco[i].opcode) {
601 case MMCO_SHORT2UNUSED:
602 if (h->avctx->debug & FF_DEBUG_MMCO)
603 av_log(h->avctx, AV_LOG_DEBUG, "mmco: unref short %d count %d\n",
604 h->mmco[i].short_pic_num, h->short_ref_count);
605 remove_short(h, frame_num, structure ^ PICT_FRAME);
606 break;
607 case MMCO_SHORT2LONG:
608 if (h->long_ref[mmco[i].long_arg] != pic)
609 remove_long(h, mmco[i].long_arg, 0);
610
611 remove_short_at_index(h, j);
612 h->long_ref[ mmco[i].long_arg ] = pic;
613 if (h->long_ref[mmco[i].long_arg]) {
614 h->long_ref[mmco[i].long_arg]->long_ref = 1;
615 h->long_ref_count++;
616 }
617 break;
618 case MMCO_LONG2UNUSED:
619 j = pic_num_extract(h, mmco[i].long_arg, &structure);
620 pic = h->long_ref[j];
621 if (pic) {
622 remove_long(h, j, structure ^ PICT_FRAME);
623 } else if (h->avctx->debug & FF_DEBUG_MMCO)
624 av_log(h->avctx, AV_LOG_DEBUG, "mmco: unref long failure\n");
625 break;
626 case MMCO_LONG:
627 // Comment below left from previous code as it is an interresting note.
628 /* First field in pair is in short term list or
629 * at a different long term index.
630 * This is not allowed; see 7.4.3.3, notes 2 and 3.
631 * Report the problem and keep the pair where it is,
632 * and mark this field valid.
633 */
634 if (h->short_ref[0] == h->cur_pic_ptr)
635 remove_short_at_index(h, 0);
636
637 if (h->long_ref[mmco[i].long_arg] != h->cur_pic_ptr) {
638 remove_long(h, mmco[i].long_arg, 0);
639
640 h->long_ref[mmco[i].long_arg] = h->cur_pic_ptr;
641 h->long_ref[mmco[i].long_arg]->long_ref = 1;
642 h->long_ref_count++;
643 }
644
645 h->cur_pic_ptr->reference |= h->picture_structure;
646 current_ref_assigned = 1;
647 break;
648 case MMCO_SET_MAX_LONG:
649 assert(mmco[i].long_arg <= 16);
650 // just remove the long term which index is greater than new max
651 for (j = mmco[i].long_arg; j < 16; j++) {
652 remove_long(h, j, 0);
653 }
654 break;
655 case MMCO_RESET:
656 while (h->short_ref_count) {
657 remove_short(h, h->short_ref[0]->frame_num, 0);
658 }
659 for (j = 0; j < 16; j++) {
660 remove_long(h, j, 0);
661 }
662 h->frame_num = h->cur_pic_ptr->frame_num = 0;
663 h->mmco_reset = 1;
664 h->cur_pic_ptr->mmco_reset = 1;
665 break;
666 default: assert(0);
667 }
668 }
669
670 if (!current_ref_assigned) {
671 /* Second field of complementary field pair; the first field of
672 * which is already referenced. If short referenced, it
673 * should be first entry in short_ref. If not, it must exist
674 * in long_ref; trying to put it on the short list here is an
675 * error in the encoded bit stream (ref: 7.4.3.3, NOTE 2 and 3).
676 */
677 if (h->short_ref_count && h->short_ref[0] == h->cur_pic_ptr) {
678 /* Just mark the second field valid */
679 h->cur_pic_ptr->reference = PICT_FRAME;
680 } else if (h->cur_pic_ptr->long_ref) {
681 av_log(h->avctx, AV_LOG_ERROR, "illegal short term reference "
682 "assignment for second field "
683 "in complementary field pair "
684 "(first field is long term)\n");
685 err = AVERROR_INVALIDDATA;
686 } else {
687 pic = remove_short(h, h->cur_pic_ptr->frame_num, 0);
688 if (pic) {
689 av_log(h->avctx, AV_LOG_ERROR, "illegal short term buffer state detected\n");
690 err = AVERROR_INVALIDDATA;
691 }
692
693 if (h->short_ref_count)
694 memmove(&h->short_ref[1], &h->short_ref[0],
695 h->short_ref_count * sizeof(H264Picture*));
696
697 h->short_ref[0] = h->cur_pic_ptr;
698 h->short_ref_count++;
699 h->cur_pic_ptr->reference |= h->picture_structure;
700 }
701 }
702
703 if (h->long_ref_count + h->short_ref_count -
704 (h->short_ref[0] == h->cur_pic_ptr) > h->sps.ref_frame_count) {
705
706 /* We have too many reference frames, probably due to corrupted
707 * stream. Need to discard one frame. Prevents overrun of the
708 * short_ref and long_ref buffers.
709 */
710 av_log(h->avctx, AV_LOG_ERROR,
711 "number of reference frames (%d+%d) exceeds max (%d; probably "
712 "corrupt input), discarding one\n",
713 h->long_ref_count, h->short_ref_count, h->sps.ref_frame_count);
714 err = AVERROR_INVALIDDATA;
715
716 if (h->long_ref_count && !h->short_ref_count) {
717 for (i = 0; i < 16; ++i)
718 if (h->long_ref[i])
719 break;
720
721 assert(i < 16);
722 remove_long(h, i, 0);
723 } else {
724 pic = h->short_ref[h->short_ref_count - 1];
725 remove_short(h, pic->frame_num, 0);
726 }
727 }
728
729 print_short_term(h);
730 print_long_term(h);
731 return (h->avctx->err_recognition & AV_EF_EXPLODE) ? err : 0;
732 }
733
734 int ff_h264_decode_ref_pic_marking(H264Context *h, GetBitContext *gb,
735 int first_slice)
736 {
737 int i, ret;
738 MMCO mmco_temp[MAX_MMCO_COUNT], *mmco = first_slice ? h->mmco : mmco_temp;
739 int mmco_index = 0;
740
741 if (h->nal_unit_type == NAL_IDR_SLICE) { // FIXME fields
742 skip_bits1(gb); // broken_link
743 if (get_bits1(gb)) {
744 mmco[0].opcode = MMCO_LONG;
745 mmco[0].long_arg = 0;
746 mmco_index = 1;
747 }
748 } else {
749 if (get_bits1(gb)) { // adaptive_ref_pic_marking_mode_flag
750 for (i = 0; i < MAX_MMCO_COUNT; i++) {
751 MMCOOpcode opcode = get_ue_golomb_31(gb);
752
753 mmco[i].opcode = opcode;
754 if (opcode == MMCO_SHORT2UNUSED || opcode == MMCO_SHORT2LONG) {
755 mmco[i].short_pic_num =
756 (h->curr_pic_num - get_ue_golomb(gb) - 1) &
757 (h->max_pic_num - 1);
758 #if 0
759 if (mmco[i].short_pic_num >= h->short_ref_count ||
760 h->short_ref[ mmco[i].short_pic_num ] == NULL){
761 av_log(s->avctx, AV_LOG_ERROR,
762 "illegal short ref in memory management control "
763 "operation %d\n", mmco);
764 return -1;
765 }
766 #endif
767 }
768 if (opcode == MMCO_SHORT2LONG || opcode == MMCO_LONG2UNUSED ||
769 opcode == MMCO_LONG || opcode == MMCO_SET_MAX_LONG) {
770 unsigned int long_arg = get_ue_golomb_31(gb);
771 if (long_arg >= 32 ||
772 (long_arg >= 16 && !(opcode == MMCO_SET_MAX_LONG &&
773 long_arg == 16) &&
774 !(opcode == MMCO_LONG2UNUSED && FIELD_PICTURE(h)))) {
775 av_log(h->avctx, AV_LOG_ERROR,
776 "illegal long ref in memory management control "
777 "operation %d\n", opcode);
778 return -1;
779 }
780 mmco[i].long_arg = long_arg;
781 }
782
783 if (opcode > (unsigned) MMCO_LONG) {
784 av_log(h->avctx, AV_LOG_ERROR,
785 "illegal memory management control operation %d\n",
786 opcode);
787 return -1;
788 }
789 if (opcode == MMCO_END)
790 break;
791 }
792 mmco_index = i;
793 } else {
794 if (first_slice) {
795 ret = ff_generate_sliding_window_mmcos(h, first_slice);
796 if (ret < 0 && h->avctx->err_recognition & AV_EF_EXPLODE)
797 return ret;
798 }
799 mmco_index = -1;
800 }
801 }
802
803 if (first_slice && mmco_index != -1) {
804 h->mmco_index = mmco_index;
805 } else if (!first_slice && mmco_index >= 0 &&
806 (mmco_index != h->mmco_index ||
807 check_opcodes(h->mmco, mmco_temp, mmco_index))) {
808 av_log(h->avctx, AV_LOG_ERROR,
809 "Inconsistent MMCO state between slices [%d, %d]\n",
810 mmco_index, h->mmco_index);
811 return AVERROR_INVALIDDATA;
812 }
813
814 return 0;
815 }