1 /*
2 * MPEG-1/2 decoder
3 * Copyright (c) 2000, 2001 Fabrice Bellard
4 * Copyright (c) 2002-2013 Michael Niedermayer <michaelni@gmx.at>
5 *
6 * This file is part of FFmpeg.
7 *
8 * FFmpeg is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * FFmpeg is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with FFmpeg; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21 */
22
23 /**
24 * @file
25 * MPEG-1/2 decoder
26 */
27
28 #define UNCHECKED_BITSTREAM_READER 1
29 #include <inttypes.h>
30
31 #include "libavutil/attributes.h"
32 #include "libavutil/imgutils.h"
33 #include "libavutil/internal.h"
34 #include "libavutil/mem_internal.h"
35 #include "libavutil/stereo3d.h"
36 #include "libavutil/video_enc_params.h"
37
38 #include "avcodec.h"
39 #include "bytestream.h"
40 #include "error_resilience.h"
41 #include "hwconfig.h"
42 #include "idctdsp.h"
43 #include "internal.h"
44 #include "mpeg_er.h"
45 #include "mpeg12.h"
46 #include "mpeg12data.h"
47 #include "mpegutils.h"
48 #include "mpegvideo.h"
49 #include "mpegvideodata.h"
50 #include "profiles.h"
51 #include "thread.h"
52 #include "version.h"
53 #include "xvmc_internal.h"
54
55 #define A53_MAX_CC_COUNT 2000
56
57 typedef struct Mpeg1Context {
58 MpegEncContext mpeg_enc_ctx;
59 int mpeg_enc_ctx_allocated; /* true if decoding context allocated */
60 int repeat_field; /* true if we must repeat the field */
61 AVPanScan pan_scan; /* some temporary storage for the panscan */
62 AVStereo3D stereo3d;
63 int has_stereo3d;
64 AVBufferRef *a53_buf_ref;
65 uint8_t afd;
66 int has_afd;
67 int slice_count;
68 AVRational save_aspect;
69 int save_width, save_height, save_progressive_seq;
70 int rc_buffer_size;
71 AVRational frame_rate_ext; /* MPEG-2 specific framerate modificator */
72 int sync; /* Did we reach a sync point like a GOP/SEQ/KEYFrame? */
73 int tmpgexs;
74 int first_slice;
75 int extradata_decoded;
76 } Mpeg1Context;
77
78 #define MB_TYPE_ZERO_MV 0x20000000
79
80 static const uint32_t ptype2mb_type[7] = {
81 MB_TYPE_INTRA,
82 MB_TYPE_L0 | MB_TYPE_CBP | MB_TYPE_ZERO_MV | MB_TYPE_16x16,
83 MB_TYPE_L0,
84 MB_TYPE_L0 | MB_TYPE_CBP,
85 MB_TYPE_QUANT | MB_TYPE_INTRA,
86 MB_TYPE_QUANT | MB_TYPE_L0 | MB_TYPE_CBP | MB_TYPE_ZERO_MV | MB_TYPE_16x16,
87 MB_TYPE_QUANT | MB_TYPE_L0 | MB_TYPE_CBP,
88 };
89
90 static const uint32_t btype2mb_type[11] = {
91 MB_TYPE_INTRA,
92 MB_TYPE_L1,
93 MB_TYPE_L1 | MB_TYPE_CBP,
94 MB_TYPE_L0,
95 MB_TYPE_L0 | MB_TYPE_CBP,
96 MB_TYPE_L0L1,
97 MB_TYPE_L0L1 | MB_TYPE_CBP,
98 MB_TYPE_QUANT | MB_TYPE_INTRA,
99 MB_TYPE_QUANT | MB_TYPE_L1 | MB_TYPE_CBP,
100 MB_TYPE_QUANT | MB_TYPE_L0 | MB_TYPE_CBP,
101 MB_TYPE_QUANT | MB_TYPE_L0L1 | MB_TYPE_CBP,
102 };
103
104 /* as H.263, but only 17 codes */
mpeg_decode_motion(MpegEncContext * s,int fcode,int pred)105 static int mpeg_decode_motion(MpegEncContext *s, int fcode, int pred)
106 {
107 int code, sign, val, shift;
108
109 code = get_vlc2(&s->gb, ff_mv_vlc.table, MV_VLC_BITS, 2);
110 if (code == 0)
111 return pred;
112 if (code < 0)
113 return 0xffff;
114
115 sign = get_bits1(&s->gb);
116 shift = fcode - 1;
117 val = code;
118 if (shift) {
119 val = (val - 1) << shift;
120 val |= get_bits(&s->gb, shift);
121 val++;
122 }
123 if (sign)
124 val = -val;
125 val += pred;
126
127 /* modulo decoding */
128 return sign_extend(val, 5 + shift);
129 }
130
131 #define MAX_INDEX (64 - 1)
132 #define check_scantable_index(ctx, x) \
133 do { \
134 if ((x) > MAX_INDEX) { \
135 av_log(ctx->avctx, AV_LOG_ERROR, "ac-tex damaged at %d %d\n", \
136 ctx->mb_x, ctx->mb_y); \
137 return AVERROR_INVALIDDATA; \
138 } \
139 } while (0)
140
mpeg1_decode_block_inter(MpegEncContext * s,int16_t * block,int n)141 static inline int mpeg1_decode_block_inter(MpegEncContext *s,
142 int16_t *block, int n)
143 {
144 int level, i, j, run;
145 RLTable *rl = &ff_rl_mpeg1;
146 uint8_t *const scantable = s->intra_scantable.permutated;
147 const uint16_t *quant_matrix = s->inter_matrix;
148 const int qscale = s->qscale;
149
150 {
151 OPEN_READER(re, &s->gb);
152 i = -1;
153 // special case for first coefficient, no need to add second VLC table
154 UPDATE_CACHE(re, &s->gb);
155 if (((int32_t) GET_CACHE(re, &s->gb)) < 0) {
156 level = (3 * qscale * quant_matrix[0]) >> 5;
157 level = (level - 1) | 1;
158 if (GET_CACHE(re, &s->gb) & 0x40000000)
159 level = -level;
160 block[0] = level;
161 i++;
162 SKIP_BITS(re, &s->gb, 2);
163 if (((int32_t) GET_CACHE(re, &s->gb)) <= (int32_t) 0xBFFFFFFF)
164 goto end;
165 }
166 /* now quantify & encode AC coefficients */
167 for (;;) {
168 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0],
169 TEX_VLC_BITS, 2, 0);
170
171 if (level != 0) {
172 i += run;
173 if (i > MAX_INDEX)
174 break;
175 j = scantable[i];
176 level = ((level * 2 + 1) * qscale * quant_matrix[j]) >> 5;
177 level = (level - 1) | 1;
178 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) -
179 SHOW_SBITS(re, &s->gb, 1);
180 SKIP_BITS(re, &s->gb, 1);
181 } else {
182 /* escape */
183 run = SHOW_UBITS(re, &s->gb, 6) + 1;
184 LAST_SKIP_BITS(re, &s->gb, 6);
185 UPDATE_CACHE(re, &s->gb);
186 level = SHOW_SBITS(re, &s->gb, 8);
187 SKIP_BITS(re, &s->gb, 8);
188 if (level == -128) {
189 level = SHOW_UBITS(re, &s->gb, 8) - 256;
190 SKIP_BITS(re, &s->gb, 8);
191 } else if (level == 0) {
192 level = SHOW_UBITS(re, &s->gb, 8);
193 SKIP_BITS(re, &s->gb, 8);
194 }
195 i += run;
196 if (i > MAX_INDEX)
197 break;
198 j = scantable[i];
199 if (level < 0) {
200 level = -level;
201 level = ((level * 2 + 1) * qscale * quant_matrix[j]) >> 5;
202 level = (level - 1) | 1;
203 level = -level;
204 } else {
205 level = ((level * 2 + 1) * qscale * quant_matrix[j]) >> 5;
206 level = (level - 1) | 1;
207 }
208 }
209
210 block[j] = level;
211 if (((int32_t) GET_CACHE(re, &s->gb)) <= (int32_t) 0xBFFFFFFF)
212 break;
213 UPDATE_CACHE(re, &s->gb);
214 }
215 end:
216 LAST_SKIP_BITS(re, &s->gb, 2);
217 CLOSE_READER(re, &s->gb);
218 }
219
220 check_scantable_index(s, i);
221
222 s->block_last_index[n] = i;
223 return 0;
224 }
225
226 /**
227 * Changing this would eat up any speed benefits it has.
228 * Do not use "fast" flag if you need the code to be robust.
229 */
mpeg1_fast_decode_block_inter(MpegEncContext * s,int16_t * block,int n)230 static inline int mpeg1_fast_decode_block_inter(MpegEncContext *s,
231 int16_t *block, int n)
232 {
233 int level, i, j, run;
234 RLTable *rl = &ff_rl_mpeg1;
235 uint8_t *const scantable = s->intra_scantable.permutated;
236 const int qscale = s->qscale;
237
238 {
239 OPEN_READER(re, &s->gb);
240 i = -1;
241 // Special case for first coefficient, no need to add second VLC table.
242 UPDATE_CACHE(re, &s->gb);
243 if (((int32_t) GET_CACHE(re, &s->gb)) < 0) {
244 level = (3 * qscale) >> 1;
245 level = (level - 1) | 1;
246 if (GET_CACHE(re, &s->gb) & 0x40000000)
247 level = -level;
248 block[0] = level;
249 i++;
250 SKIP_BITS(re, &s->gb, 2);
251 if (((int32_t) GET_CACHE(re, &s->gb)) <= (int32_t) 0xBFFFFFFF)
252 goto end;
253 }
254
255 /* now quantify & encode AC coefficients */
256 for (;;) {
257 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0],
258 TEX_VLC_BITS, 2, 0);
259
260 if (level != 0) {
261 i += run;
262 if (i > MAX_INDEX)
263 break;
264 j = scantable[i];
265 level = ((level * 2 + 1) * qscale) >> 1;
266 level = (level - 1) | 1;
267 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) -
268 SHOW_SBITS(re, &s->gb, 1);
269 SKIP_BITS(re, &s->gb, 1);
270 } else {
271 /* escape */
272 run = SHOW_UBITS(re, &s->gb, 6) + 1;
273 LAST_SKIP_BITS(re, &s->gb, 6);
274 UPDATE_CACHE(re, &s->gb);
275 level = SHOW_SBITS(re, &s->gb, 8);
276 SKIP_BITS(re, &s->gb, 8);
277 if (level == -128) {
278 level = SHOW_UBITS(re, &s->gb, 8) - 256;
279 SKIP_BITS(re, &s->gb, 8);
280 } else if (level == 0) {
281 level = SHOW_UBITS(re, &s->gb, 8);
282 SKIP_BITS(re, &s->gb, 8);
283 }
284 i += run;
285 if (i > MAX_INDEX)
286 break;
287 j = scantable[i];
288 if (level < 0) {
289 level = -level;
290 level = ((level * 2 + 1) * qscale) >> 1;
291 level = (level - 1) | 1;
292 level = -level;
293 } else {
294 level = ((level * 2 + 1) * qscale) >> 1;
295 level = (level - 1) | 1;
296 }
297 }
298
299 block[j] = level;
300 if (((int32_t) GET_CACHE(re, &s->gb)) <= (int32_t) 0xBFFFFFFF)
301 break;
302 UPDATE_CACHE(re, &s->gb);
303 }
304 end:
305 LAST_SKIP_BITS(re, &s->gb, 2);
306 CLOSE_READER(re, &s->gb);
307 }
308
309 check_scantable_index(s, i);
310
311 s->block_last_index[n] = i;
312 return 0;
313 }
314
mpeg2_decode_block_non_intra(MpegEncContext * s,int16_t * block,int n)315 static inline int mpeg2_decode_block_non_intra(MpegEncContext *s,
316 int16_t *block, int n)
317 {
318 int level, i, j, run;
319 RLTable *rl = &ff_rl_mpeg1;
320 uint8_t *const scantable = s->intra_scantable.permutated;
321 const uint16_t *quant_matrix;
322 const int qscale = s->qscale;
323 int mismatch;
324
325 mismatch = 1;
326
327 {
328 OPEN_READER(re, &s->gb);
329 i = -1;
330 if (n < 4)
331 quant_matrix = s->inter_matrix;
332 else
333 quant_matrix = s->chroma_inter_matrix;
334
335 // Special case for first coefficient, no need to add second VLC table.
336 UPDATE_CACHE(re, &s->gb);
337 if (((int32_t) GET_CACHE(re, &s->gb)) < 0) {
338 level = (3 * qscale * quant_matrix[0]) >> 5;
339 if (GET_CACHE(re, &s->gb) & 0x40000000)
340 level = -level;
341 block[0] = level;
342 mismatch ^= level;
343 i++;
344 SKIP_BITS(re, &s->gb, 2);
345 if (((int32_t) GET_CACHE(re, &s->gb)) <= (int32_t) 0xBFFFFFFF)
346 goto end;
347 }
348
349 /* now quantify & encode AC coefficients */
350 for (;;) {
351 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0],
352 TEX_VLC_BITS, 2, 0);
353
354 if (level != 0) {
355 i += run;
356 if (i > MAX_INDEX)
357 break;
358 j = scantable[i];
359 level = ((level * 2 + 1) * qscale * quant_matrix[j]) >> 5;
360 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) -
361 SHOW_SBITS(re, &s->gb, 1);
362 SKIP_BITS(re, &s->gb, 1);
363 } else {
364 /* escape */
365 run = SHOW_UBITS(re, &s->gb, 6) + 1;
366 LAST_SKIP_BITS(re, &s->gb, 6);
367 UPDATE_CACHE(re, &s->gb);
368 level = SHOW_SBITS(re, &s->gb, 12);
369 SKIP_BITS(re, &s->gb, 12);
370
371 i += run;
372 if (i > MAX_INDEX)
373 break;
374 j = scantable[i];
375 if (level < 0) {
376 level = ((-level * 2 + 1) * qscale * quant_matrix[j]) >> 5;
377 level = -level;
378 } else {
379 level = ((level * 2 + 1) * qscale * quant_matrix[j]) >> 5;
380 }
381 }
382
383 mismatch ^= level;
384 block[j] = level;
385 if (((int32_t) GET_CACHE(re, &s->gb)) <= (int32_t) 0xBFFFFFFF)
386 break;
387 UPDATE_CACHE(re, &s->gb);
388 }
389 end:
390 LAST_SKIP_BITS(re, &s->gb, 2);
391 CLOSE_READER(re, &s->gb);
392 }
393 block[63] ^= (mismatch & 1);
394
395 check_scantable_index(s, i);
396
397 s->block_last_index[n] = i;
398 return 0;
399 }
400
401 /**
402 * Changing this would eat up any speed benefits it has.
403 * Do not use "fast" flag if you need the code to be robust.
404 */
mpeg2_fast_decode_block_non_intra(MpegEncContext * s,int16_t * block,int n)405 static inline int mpeg2_fast_decode_block_non_intra(MpegEncContext *s,
406 int16_t *block, int n)
407 {
408 int level, i, j, run;
409 RLTable *rl = &ff_rl_mpeg1;
410 uint8_t *const scantable = s->intra_scantable.permutated;
411 const int qscale = s->qscale;
412 OPEN_READER(re, &s->gb);
413 i = -1;
414
415 // special case for first coefficient, no need to add second VLC table
416 UPDATE_CACHE(re, &s->gb);
417 if (((int32_t) GET_CACHE(re, &s->gb)) < 0) {
418 level = (3 * qscale) >> 1;
419 if (GET_CACHE(re, &s->gb) & 0x40000000)
420 level = -level;
421 block[0] = level;
422 i++;
423 SKIP_BITS(re, &s->gb, 2);
424 if (((int32_t) GET_CACHE(re, &s->gb)) <= (int32_t) 0xBFFFFFFF)
425 goto end;
426 }
427
428 /* now quantify & encode AC coefficients */
429 for (;;) {
430 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2, 0);
431
432 if (level != 0) {
433 i += run;
434 if (i > MAX_INDEX)
435 break;
436 j = scantable[i];
437 level = ((level * 2 + 1) * qscale) >> 1;
438 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) -
439 SHOW_SBITS(re, &s->gb, 1);
440 SKIP_BITS(re, &s->gb, 1);
441 } else {
442 /* escape */
443 run = SHOW_UBITS(re, &s->gb, 6) + 1;
444 LAST_SKIP_BITS(re, &s->gb, 6);
445 UPDATE_CACHE(re, &s->gb);
446 level = SHOW_SBITS(re, &s->gb, 12);
447 SKIP_BITS(re, &s->gb, 12);
448
449 i += run;
450 if (i > MAX_INDEX)
451 break;
452 j = scantable[i];
453 if (level < 0) {
454 level = ((-level * 2 + 1) * qscale) >> 1;
455 level = -level;
456 } else {
457 level = ((level * 2 + 1) * qscale) >> 1;
458 }
459 }
460
461 block[j] = level;
462 if (((int32_t) GET_CACHE(re, &s->gb)) <= (int32_t) 0xBFFFFFFF || i > 63)
463 break;
464
465 UPDATE_CACHE(re, &s->gb);
466 }
467 end:
468 LAST_SKIP_BITS(re, &s->gb, 2);
469 CLOSE_READER(re, &s->gb);
470
471 check_scantable_index(s, i);
472
473 s->block_last_index[n] = i;
474 return 0;
475 }
476
mpeg2_decode_block_intra(MpegEncContext * s,int16_t * block,int n)477 static inline int mpeg2_decode_block_intra(MpegEncContext *s,
478 int16_t *block, int n)
479 {
480 int level, dc, diff, i, j, run;
481 int component;
482 RLTable *rl;
483 uint8_t *const scantable = s->intra_scantable.permutated;
484 const uint16_t *quant_matrix;
485 const int qscale = s->qscale;
486 int mismatch;
487
488 /* DC coefficient */
489 if (n < 4) {
490 quant_matrix = s->intra_matrix;
491 component = 0;
492 } else {
493 quant_matrix = s->chroma_intra_matrix;
494 component = (n & 1) + 1;
495 }
496 diff = decode_dc(&s->gb, component);
497 dc = s->last_dc[component];
498 dc += diff;
499 s->last_dc[component] = dc;
500 block[0] = dc * (1 << (3 - s->intra_dc_precision));
501 ff_tlog(s->avctx, "dc=%d\n", block[0]);
502 mismatch = block[0] ^ 1;
503 i = 0;
504 if (s->intra_vlc_format)
505 rl = &ff_rl_mpeg2;
506 else
507 rl = &ff_rl_mpeg1;
508
509 {
510 OPEN_READER(re, &s->gb);
511 /* now quantify & encode AC coefficients */
512 for (;;) {
513 UPDATE_CACHE(re, &s->gb);
514 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0],
515 TEX_VLC_BITS, 2, 0);
516
517 if (level == 127) {
518 break;
519 } else if (level != 0) {
520 i += run;
521 if (i > MAX_INDEX)
522 break;
523 j = scantable[i];
524 level = (level * qscale * quant_matrix[j]) >> 4;
525 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) -
526 SHOW_SBITS(re, &s->gb, 1);
527 LAST_SKIP_BITS(re, &s->gb, 1);
528 } else {
529 /* escape */
530 run = SHOW_UBITS(re, &s->gb, 6) + 1;
531 SKIP_BITS(re, &s->gb, 6);
532 level = SHOW_SBITS(re, &s->gb, 12);
533 LAST_SKIP_BITS(re, &s->gb, 12);
534 i += run;
535 if (i > MAX_INDEX)
536 break;
537 j = scantable[i];
538 if (level < 0) {
539 level = (-level * qscale * quant_matrix[j]) >> 4;
540 level = -level;
541 } else {
542 level = (level * qscale * quant_matrix[j]) >> 4;
543 }
544 }
545
546 mismatch ^= level;
547 block[j] = level;
548 }
549 CLOSE_READER(re, &s->gb);
550 }
551 block[63] ^= mismatch & 1;
552
553 check_scantable_index(s, i);
554
555 s->block_last_index[n] = i;
556 return 0;
557 }
558
559 /**
560 * Changing this would eat up any speed benefits it has.
561 * Do not use "fast" flag if you need the code to be robust.
562 */
mpeg2_fast_decode_block_intra(MpegEncContext * s,int16_t * block,int n)563 static inline int mpeg2_fast_decode_block_intra(MpegEncContext *s,
564 int16_t *block, int n)
565 {
566 int level, dc, diff, i, j, run;
567 int component;
568 RLTable *rl;
569 uint8_t *const scantable = s->intra_scantable.permutated;
570 const uint16_t *quant_matrix;
571 const int qscale = s->qscale;
572
573 /* DC coefficient */
574 if (n < 4) {
575 quant_matrix = s->intra_matrix;
576 component = 0;
577 } else {
578 quant_matrix = s->chroma_intra_matrix;
579 component = (n & 1) + 1;
580 }
581 diff = decode_dc(&s->gb, component);
582 dc = s->last_dc[component];
583 dc += diff;
584 s->last_dc[component] = dc;
585 block[0] = dc * (1 << (3 - s->intra_dc_precision));
586 i = 0;
587 if (s->intra_vlc_format)
588 rl = &ff_rl_mpeg2;
589 else
590 rl = &ff_rl_mpeg1;
591
592 {
593 OPEN_READER(re, &s->gb);
594 /* now quantify & encode AC coefficients */
595 for (;;) {
596 UPDATE_CACHE(re, &s->gb);
597 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0],
598 TEX_VLC_BITS, 2, 0);
599
600 if (level >= 64 || i > 63) {
601 break;
602 } else if (level != 0) {
603 i += run;
604 j = scantable[i];
605 level = (level * qscale * quant_matrix[j]) >> 4;
606 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) -
607 SHOW_SBITS(re, &s->gb, 1);
608 LAST_SKIP_BITS(re, &s->gb, 1);
609 } else {
610 /* escape */
611 run = SHOW_UBITS(re, &s->gb, 6) + 1;
612 SKIP_BITS(re, &s->gb, 6);
613 level = SHOW_SBITS(re, &s->gb, 12);
614 LAST_SKIP_BITS(re, &s->gb, 12);
615 i += run;
616 j = scantable[i];
617 if (level < 0) {
618 level = (-level * qscale * quant_matrix[j]) >> 4;
619 level = -level;
620 } else {
621 level = (level * qscale * quant_matrix[j]) >> 4;
622 }
623 }
624
625 block[j] = level;
626 }
627 CLOSE_READER(re, &s->gb);
628 }
629
630 check_scantable_index(s, i);
631
632 s->block_last_index[n] = i;
633 return 0;
634 }
635
636 /******************************************/
637 /* decoding */
638
get_dmv(MpegEncContext * s)639 static inline int get_dmv(MpegEncContext *s)
640 {
641 if (get_bits1(&s->gb))
642 return 1 - (get_bits1(&s->gb) << 1);
643 else
644 return 0;
645 }
646
647 /* motion type (for MPEG-2) */
648 #define MT_FIELD 1
649 #define MT_FRAME 2
650 #define MT_16X8 2
651 #define MT_DMV 3
652
mpeg_decode_mb(MpegEncContext * s,int16_t block[12][64])653 static int mpeg_decode_mb(MpegEncContext *s, int16_t block[12][64])
654 {
655 int i, j, k, cbp, val, mb_type, motion_type;
656 const int mb_block_count = 4 + (1 << s->chroma_format);
657 int ret;
658
659 ff_tlog(s->avctx, "decode_mb: x=%d y=%d\n", s->mb_x, s->mb_y);
660
661 av_assert2(s->mb_skipped == 0);
662
663 if (s->mb_skip_run-- != 0) {
664 if (s->pict_type == AV_PICTURE_TYPE_P) {
665 s->mb_skipped = 1;
666 s->current_picture.mb_type[s->mb_x + s->mb_y * s->mb_stride] =
667 MB_TYPE_SKIP | MB_TYPE_L0 | MB_TYPE_16x16;
668 } else {
669 int mb_type;
670
671 if (s->mb_x)
672 mb_type = s->current_picture.mb_type[s->mb_x + s->mb_y * s->mb_stride - 1];
673 else
674 // FIXME not sure if this is allowed in MPEG at all
675 mb_type = s->current_picture.mb_type[s->mb_width + (s->mb_y - 1) * s->mb_stride - 1];
676 if (IS_INTRA(mb_type)) {
677 av_log(s->avctx, AV_LOG_ERROR, "skip with previntra\n");
678 return AVERROR_INVALIDDATA;
679 }
680 s->current_picture.mb_type[s->mb_x + s->mb_y * s->mb_stride] =
681 mb_type | MB_TYPE_SKIP;
682
683 if ((s->mv[0][0][0] | s->mv[0][0][1] | s->mv[1][0][0] | s->mv[1][0][1]) == 0)
684 s->mb_skipped = 1;
685 }
686
687 return 0;
688 }
689
690 switch (s->pict_type) {
691 default:
692 case AV_PICTURE_TYPE_I:
693 if (get_bits1(&s->gb) == 0) {
694 if (get_bits1(&s->gb) == 0) {
695 av_log(s->avctx, AV_LOG_ERROR,
696 "Invalid mb type in I-frame at %d %d\n",
697 s->mb_x, s->mb_y);
698 return AVERROR_INVALIDDATA;
699 }
700 mb_type = MB_TYPE_QUANT | MB_TYPE_INTRA;
701 } else {
702 mb_type = MB_TYPE_INTRA;
703 }
704 break;
705 case AV_PICTURE_TYPE_P:
706 mb_type = get_vlc2(&s->gb, ff_mb_ptype_vlc.table, MB_PTYPE_VLC_BITS, 1);
707 if (mb_type < 0) {
708 av_log(s->avctx, AV_LOG_ERROR,
709 "Invalid mb type in P-frame at %d %d\n", s->mb_x, s->mb_y);
710 return AVERROR_INVALIDDATA;
711 }
712 mb_type = ptype2mb_type[mb_type];
713 break;
714 case AV_PICTURE_TYPE_B:
715 mb_type = get_vlc2(&s->gb, ff_mb_btype_vlc.table, MB_BTYPE_VLC_BITS, 1);
716 if (mb_type < 0) {
717 av_log(s->avctx, AV_LOG_ERROR,
718 "Invalid mb type in B-frame at %d %d\n", s->mb_x, s->mb_y);
719 return AVERROR_INVALIDDATA;
720 }
721 mb_type = btype2mb_type[mb_type];
722 break;
723 }
724 ff_tlog(s->avctx, "mb_type=%x\n", mb_type);
725 // motion_type = 0; /* avoid warning */
726 if (IS_INTRA(mb_type)) {
727 s->bdsp.clear_blocks(s->block[0]);
728
729 if (!s->chroma_y_shift)
730 s->bdsp.clear_blocks(s->block[6]);
731
732 /* compute DCT type */
733 // FIXME: add an interlaced_dct coded var?
734 if (s->picture_structure == PICT_FRAME &&
735 !s->frame_pred_frame_dct)
736 s->interlaced_dct = get_bits1(&s->gb);
737
738 if (IS_QUANT(mb_type))
739 s->qscale = mpeg_get_qscale(s);
740
741 if (s->concealment_motion_vectors) {
742 /* just parse them */
743 if (s->picture_structure != PICT_FRAME)
744 skip_bits1(&s->gb); /* field select */
745
746 s->mv[0][0][0] =
747 s->last_mv[0][0][0] =
748 s->last_mv[0][1][0] = mpeg_decode_motion(s, s->mpeg_f_code[0][0],
749 s->last_mv[0][0][0]);
750 s->mv[0][0][1] =
751 s->last_mv[0][0][1] =
752 s->last_mv[0][1][1] = mpeg_decode_motion(s, s->mpeg_f_code[0][1],
753 s->last_mv[0][0][1]);
754
755 check_marker(s->avctx, &s->gb, "after concealment_motion_vectors");
756 } else {
757 /* reset mv prediction */
758 memset(s->last_mv, 0, sizeof(s->last_mv));
759 }
760 s->mb_intra = 1;
761 // if 1, we memcpy blocks in xvmcvideo
762 if ((CONFIG_MPEG1_XVMC_HWACCEL || CONFIG_MPEG2_XVMC_HWACCEL) && s->pack_pblocks)
763 ff_xvmc_pack_pblocks(s, -1); // inter are always full blocks
764
765 if (s->codec_id == AV_CODEC_ID_MPEG2VIDEO) {
766 if (s->avctx->flags2 & AV_CODEC_FLAG2_FAST) {
767 for (i = 0; i < 6; i++)
768 mpeg2_fast_decode_block_intra(s, *s->pblocks[i], i);
769 } else {
770 for (i = 0; i < mb_block_count; i++)
771 if ((ret = mpeg2_decode_block_intra(s, *s->pblocks[i], i)) < 0)
772 return ret;
773 }
774 } else {
775 for (i = 0; i < 6; i++) {
776 ret = ff_mpeg1_decode_block_intra(&s->gb,
777 s->intra_matrix,
778 s->intra_scantable.permutated,
779 s->last_dc, *s->pblocks[i],
780 i, s->qscale);
781 if (ret < 0) {
782 av_log(s->avctx, AV_LOG_ERROR, "ac-tex damaged at %d %d\n",
783 s->mb_x, s->mb_y);
784 return ret;
785 }
786
787 s->block_last_index[i] = ret;
788 }
789 }
790 } else {
791 if (mb_type & MB_TYPE_ZERO_MV) {
792 av_assert2(mb_type & MB_TYPE_CBP);
793
794 s->mv_dir = MV_DIR_FORWARD;
795 if (s->picture_structure == PICT_FRAME) {
796 if (s->picture_structure == PICT_FRAME
797 && !s->frame_pred_frame_dct)
798 s->interlaced_dct = get_bits1(&s->gb);
799 s->mv_type = MV_TYPE_16X16;
800 } else {
801 s->mv_type = MV_TYPE_FIELD;
802 mb_type |= MB_TYPE_INTERLACED;
803 s->field_select[0][0] = s->picture_structure - 1;
804 }
805
806 if (IS_QUANT(mb_type))
807 s->qscale = mpeg_get_qscale(s);
808
809 s->last_mv[0][0][0] = 0;
810 s->last_mv[0][0][1] = 0;
811 s->last_mv[0][1][0] = 0;
812 s->last_mv[0][1][1] = 0;
813 s->mv[0][0][0] = 0;
814 s->mv[0][0][1] = 0;
815 } else {
816 av_assert2(mb_type & MB_TYPE_L0L1);
817 // FIXME decide if MBs in field pictures are MB_TYPE_INTERLACED
818 /* get additional motion vector type */
819 if (s->picture_structure == PICT_FRAME && s->frame_pred_frame_dct) {
820 motion_type = MT_FRAME;
821 } else {
822 motion_type = get_bits(&s->gb, 2);
823 if (s->picture_structure == PICT_FRAME && HAS_CBP(mb_type))
824 s->interlaced_dct = get_bits1(&s->gb);
825 }
826
827 if (IS_QUANT(mb_type))
828 s->qscale = mpeg_get_qscale(s);
829
830 /* motion vectors */
831 s->mv_dir = (mb_type >> 13) & 3;
832 ff_tlog(s->avctx, "motion_type=%d\n", motion_type);
833 switch (motion_type) {
834 case MT_FRAME: /* or MT_16X8 */
835 if (s->picture_structure == PICT_FRAME) {
836 mb_type |= MB_TYPE_16x16;
837 s->mv_type = MV_TYPE_16X16;
838 for (i = 0; i < 2; i++) {
839 if (USES_LIST(mb_type, i)) {
840 /* MT_FRAME */
841 s->mv[i][0][0] =
842 s->last_mv[i][0][0] =
843 s->last_mv[i][1][0] =
844 mpeg_decode_motion(s, s->mpeg_f_code[i][0],
845 s->last_mv[i][0][0]);
846 s->mv[i][0][1] =
847 s->last_mv[i][0][1] =
848 s->last_mv[i][1][1] =
849 mpeg_decode_motion(s, s->mpeg_f_code[i][1],
850 s->last_mv[i][0][1]);
851 /* full_pel: only for MPEG-1 */
852 if (s->full_pel[i]) {
853 s->mv[i][0][0] *= 2;
854 s->mv[i][0][1] *= 2;
855 }
856 }
857 }
858 } else {
859 mb_type |= MB_TYPE_16x8 | MB_TYPE_INTERLACED;
860 s->mv_type = MV_TYPE_16X8;
861 for (i = 0; i < 2; i++) {
862 if (USES_LIST(mb_type, i)) {
863 /* MT_16X8 */
864 for (j = 0; j < 2; j++) {
865 s->field_select[i][j] = get_bits1(&s->gb);
866 for (k = 0; k < 2; k++) {
867 val = mpeg_decode_motion(s, s->mpeg_f_code[i][k],
868 s->last_mv[i][j][k]);
869 s->last_mv[i][j][k] = val;
870 s->mv[i][j][k] = val;
871 }
872 }
873 }
874 }
875 }
876 break;
877 case MT_FIELD:
878 s->mv_type = MV_TYPE_FIELD;
879 if (s->picture_structure == PICT_FRAME) {
880 mb_type |= MB_TYPE_16x8 | MB_TYPE_INTERLACED;
881 for (i = 0; i < 2; i++) {
882 if (USES_LIST(mb_type, i)) {
883 for (j = 0; j < 2; j++) {
884 s->field_select[i][j] = get_bits1(&s->gb);
885 val = mpeg_decode_motion(s, s->mpeg_f_code[i][0],
886 s->last_mv[i][j][0]);
887 s->last_mv[i][j][0] = val;
888 s->mv[i][j][0] = val;
889 ff_tlog(s->avctx, "fmx=%d\n", val);
890 val = mpeg_decode_motion(s, s->mpeg_f_code[i][1],
891 s->last_mv[i][j][1] >> 1);
892 s->last_mv[i][j][1] = 2 * val;
893 s->mv[i][j][1] = val;
894 ff_tlog(s->avctx, "fmy=%d\n", val);
895 }
896 }
897 }
898 } else {
899 av_assert0(!s->progressive_sequence);
900 mb_type |= MB_TYPE_16x16 | MB_TYPE_INTERLACED;
901 for (i = 0; i < 2; i++) {
902 if (USES_LIST(mb_type, i)) {
903 s->field_select[i][0] = get_bits1(&s->gb);
904 for (k = 0; k < 2; k++) {
905 val = mpeg_decode_motion(s, s->mpeg_f_code[i][k],
906 s->last_mv[i][0][k]);
907 s->last_mv[i][0][k] = val;
908 s->last_mv[i][1][k] = val;
909 s->mv[i][0][k] = val;
910 }
911 }
912 }
913 }
914 break;
915 case MT_DMV:
916 if (s->progressive_sequence){
917 av_log(s->avctx, AV_LOG_ERROR, "MT_DMV in progressive_sequence\n");
918 return AVERROR_INVALIDDATA;
919 }
920 s->mv_type = MV_TYPE_DMV;
921 for (i = 0; i < 2; i++) {
922 if (USES_LIST(mb_type, i)) {
923 int dmx, dmy, mx, my, m;
924 const int my_shift = s->picture_structure == PICT_FRAME;
925
926 mx = mpeg_decode_motion(s, s->mpeg_f_code[i][0],
927 s->last_mv[i][0][0]);
928 s->last_mv[i][0][0] = mx;
929 s->last_mv[i][1][0] = mx;
930 dmx = get_dmv(s);
931 my = mpeg_decode_motion(s, s->mpeg_f_code[i][1],
932 s->last_mv[i][0][1] >> my_shift);
933 dmy = get_dmv(s);
934
935
936 s->last_mv[i][0][1] = my * (1 << my_shift);
937 s->last_mv[i][1][1] = my * (1 << my_shift);
938
939 s->mv[i][0][0] = mx;
940 s->mv[i][0][1] = my;
941 s->mv[i][1][0] = mx; // not used
942 s->mv[i][1][1] = my; // not used
943
944 if (s->picture_structure == PICT_FRAME) {
945 mb_type |= MB_TYPE_16x16 | MB_TYPE_INTERLACED;
946
947 // m = 1 + 2 * s->top_field_first;
948 m = s->top_field_first ? 1 : 3;
949
950 /* top -> top pred */
951 s->mv[i][2][0] = ((mx * m + (mx > 0)) >> 1) + dmx;
952 s->mv[i][2][1] = ((my * m + (my > 0)) >> 1) + dmy - 1;
953 m = 4 - m;
954 s->mv[i][3][0] = ((mx * m + (mx > 0)) >> 1) + dmx;
955 s->mv[i][3][1] = ((my * m + (my > 0)) >> 1) + dmy + 1;
956 } else {
957 mb_type |= MB_TYPE_16x16;
958
959 s->mv[i][2][0] = ((mx + (mx > 0)) >> 1) + dmx;
960 s->mv[i][2][1] = ((my + (my > 0)) >> 1) + dmy;
961 if (s->picture_structure == PICT_TOP_FIELD)
962 s->mv[i][2][1]--;
963 else
964 s->mv[i][2][1]++;
965 }
966 }
967 }
968 break;
969 default:
970 av_log(s->avctx, AV_LOG_ERROR,
971 "00 motion_type at %d %d\n", s->mb_x, s->mb_y);
972 return AVERROR_INVALIDDATA;
973 }
974 }
975
976 s->mb_intra = 0;
977 if (HAS_CBP(mb_type)) {
978 s->bdsp.clear_blocks(s->block[0]);
979
980 cbp = get_vlc2(&s->gb, ff_mb_pat_vlc.table, MB_PAT_VLC_BITS, 1);
981 if (mb_block_count > 6) {
982 cbp *= 1 << mb_block_count - 6;
983 cbp |= get_bits(&s->gb, mb_block_count - 6);
984 s->bdsp.clear_blocks(s->block[6]);
985 }
986 if (cbp <= 0) {
987 av_log(s->avctx, AV_LOG_ERROR,
988 "invalid cbp %d at %d %d\n", cbp, s->mb_x, s->mb_y);
989 return AVERROR_INVALIDDATA;
990 }
991
992 // if 1, we memcpy blocks in xvmcvideo
993 if ((CONFIG_MPEG1_XVMC_HWACCEL || CONFIG_MPEG2_XVMC_HWACCEL) && s->pack_pblocks)
994 ff_xvmc_pack_pblocks(s, cbp);
995
996 if (s->codec_id == AV_CODEC_ID_MPEG2VIDEO) {
997 if (s->avctx->flags2 & AV_CODEC_FLAG2_FAST) {
998 for (i = 0; i < 6; i++) {
999 if (cbp & 32)
1000 mpeg2_fast_decode_block_non_intra(s, *s->pblocks[i], i);
1001 else
1002 s->block_last_index[i] = -1;
1003 cbp += cbp;
1004 }
1005 } else {
1006 cbp <<= 12 - mb_block_count;
1007
1008 for (i = 0; i < mb_block_count; i++) {
1009 if (cbp & (1 << 11)) {
1010 if ((ret = mpeg2_decode_block_non_intra(s, *s->pblocks[i], i)) < 0)
1011 return ret;
1012 } else {
1013 s->block_last_index[i] = -1;
1014 }
1015 cbp += cbp;
1016 }
1017 }
1018 } else {
1019 if (s->avctx->flags2 & AV_CODEC_FLAG2_FAST) {
1020 for (i = 0; i < 6; i++) {
1021 if (cbp & 32)
1022 mpeg1_fast_decode_block_inter(s, *s->pblocks[i], i);
1023 else
1024 s->block_last_index[i] = -1;
1025 cbp += cbp;
1026 }
1027 } else {
1028 for (i = 0; i < 6; i++) {
1029 if (cbp & 32) {
1030 if ((ret = mpeg1_decode_block_inter(s, *s->pblocks[i], i)) < 0)
1031 return ret;
1032 } else {
1033 s->block_last_index[i] = -1;
1034 }
1035 cbp += cbp;
1036 }
1037 }
1038 }
1039 } else {
1040 for (i = 0; i < 12; i++)
1041 s->block_last_index[i] = -1;
1042 }
1043 }
1044
1045 s->current_picture.mb_type[s->mb_x + s->mb_y * s->mb_stride] = mb_type;
1046
1047 return 0;
1048 }
1049
mpeg_decode_init(AVCodecContext * avctx)1050 static av_cold int mpeg_decode_init(AVCodecContext *avctx)
1051 {
1052 Mpeg1Context *s = avctx->priv_data;
1053 MpegEncContext *s2 = &s->mpeg_enc_ctx;
1054
1055 if ( avctx->codec_tag != AV_RL32("VCR2")
1056 && avctx->codec_tag != AV_RL32("BW10"))
1057 avctx->coded_width = avctx->coded_height = 0; // do not trust dimensions from input
1058 ff_mpv_decode_init(s2, avctx);
1059
1060 /* we need some permutation to store matrices,
1061 * until the decoder sets the real permutation. */
1062 ff_mpv_idct_init(s2);
1063 ff_mpeg12_common_init(&s->mpeg_enc_ctx);
1064 ff_mpeg12_init_vlcs();
1065
1066 s2->chroma_format = 1;
1067 s->mpeg_enc_ctx_allocated = 0;
1068 s->mpeg_enc_ctx.picture_number = 0;
1069 s->repeat_field = 0;
1070 s->mpeg_enc_ctx.codec_id = avctx->codec->id;
1071 avctx->color_range = AVCOL_RANGE_MPEG;
1072 return 0;
1073 }
1074
1075 #if HAVE_THREADS
mpeg_decode_update_thread_context(AVCodecContext * avctx,const AVCodecContext * avctx_from)1076 static int mpeg_decode_update_thread_context(AVCodecContext *avctx,
1077 const AVCodecContext *avctx_from)
1078 {
1079 Mpeg1Context *ctx = avctx->priv_data, *ctx_from = avctx_from->priv_data;
1080 MpegEncContext *s = &ctx->mpeg_enc_ctx, *s1 = &ctx_from->mpeg_enc_ctx;
1081 int err;
1082
1083 if (avctx == avctx_from ||
1084 !ctx_from->mpeg_enc_ctx_allocated ||
1085 !s1->context_initialized)
1086 return 0;
1087
1088 err = ff_mpeg_update_thread_context(avctx, avctx_from);
1089 if (err)
1090 return err;
1091
1092 if (!ctx->mpeg_enc_ctx_allocated)
1093 memcpy(s + 1, s1 + 1, sizeof(Mpeg1Context) - sizeof(MpegEncContext));
1094
1095 if (!(s->pict_type == AV_PICTURE_TYPE_B || s->low_delay))
1096 s->picture_number++;
1097
1098 return 0;
1099 }
1100 #endif
1101
quant_matrix_rebuild(uint16_t * matrix,const uint8_t * old_perm,const uint8_t * new_perm)1102 static void quant_matrix_rebuild(uint16_t *matrix, const uint8_t *old_perm,
1103 const uint8_t *new_perm)
1104 {
1105 uint16_t temp_matrix[64];
1106 int i;
1107
1108 memcpy(temp_matrix, matrix, 64 * sizeof(uint16_t));
1109
1110 for (i = 0; i < 64; i++)
1111 matrix[new_perm[i]] = temp_matrix[old_perm[i]];
1112 }
1113
1114 static const enum AVPixelFormat mpeg1_hwaccel_pixfmt_list_420[] = {
1115 #if CONFIG_MPEG1_NVDEC_HWACCEL
1116 AV_PIX_FMT_CUDA,
1117 #endif
1118 #if CONFIG_MPEG1_XVMC_HWACCEL
1119 AV_PIX_FMT_XVMC,
1120 #endif
1121 #if CONFIG_MPEG1_VDPAU_HWACCEL
1122 AV_PIX_FMT_VDPAU,
1123 #endif
1124 AV_PIX_FMT_YUV420P,
1125 AV_PIX_FMT_NONE
1126 };
1127
1128 static const enum AVPixelFormat mpeg2_hwaccel_pixfmt_list_420[] = {
1129 #if CONFIG_MPEG2_NVDEC_HWACCEL
1130 AV_PIX_FMT_CUDA,
1131 #endif
1132 #if CONFIG_MPEG2_XVMC_HWACCEL
1133 AV_PIX_FMT_XVMC,
1134 #endif
1135 #if CONFIG_MPEG2_VDPAU_HWACCEL
1136 AV_PIX_FMT_VDPAU,
1137 #endif
1138 #if CONFIG_MPEG2_DXVA2_HWACCEL
1139 AV_PIX_FMT_DXVA2_VLD,
1140 #endif
1141 #if CONFIG_MPEG2_D3D11VA_HWACCEL
1142 AV_PIX_FMT_D3D11VA_VLD,
1143 AV_PIX_FMT_D3D11,
1144 #endif
1145 #if CONFIG_MPEG2_VAAPI_HWACCEL
1146 AV_PIX_FMT_VAAPI,
1147 #endif
1148 #if CONFIG_MPEG2_VIDEOTOOLBOX_HWACCEL
1149 AV_PIX_FMT_VIDEOTOOLBOX,
1150 #endif
1151 AV_PIX_FMT_YUV420P,
1152 AV_PIX_FMT_NONE
1153 };
1154
1155 static const enum AVPixelFormat mpeg12_pixfmt_list_422[] = {
1156 AV_PIX_FMT_YUV422P,
1157 AV_PIX_FMT_NONE
1158 };
1159
1160 static const enum AVPixelFormat mpeg12_pixfmt_list_444[] = {
1161 AV_PIX_FMT_YUV444P,
1162 AV_PIX_FMT_NONE
1163 };
1164
mpeg_get_pixelformat(AVCodecContext * avctx)1165 static enum AVPixelFormat mpeg_get_pixelformat(AVCodecContext *avctx)
1166 {
1167 Mpeg1Context *s1 = avctx->priv_data;
1168 MpegEncContext *s = &s1->mpeg_enc_ctx;
1169 const enum AVPixelFormat *pix_fmts;
1170
1171 if (CONFIG_GRAY && (avctx->flags & AV_CODEC_FLAG_GRAY))
1172 return AV_PIX_FMT_GRAY8;
1173
1174 if (s->chroma_format < 2)
1175 pix_fmts = avctx->codec_id == AV_CODEC_ID_MPEG1VIDEO ?
1176 mpeg1_hwaccel_pixfmt_list_420 :
1177 mpeg2_hwaccel_pixfmt_list_420;
1178 else if (s->chroma_format == 2)
1179 pix_fmts = mpeg12_pixfmt_list_422;
1180 else
1181 pix_fmts = mpeg12_pixfmt_list_444;
1182
1183 return ff_thread_get_format(avctx, pix_fmts);
1184 }
1185
setup_hwaccel_for_pixfmt(AVCodecContext * avctx)1186 static void setup_hwaccel_for_pixfmt(AVCodecContext *avctx)
1187 {
1188 // until then pix_fmt may be changed right after codec init
1189 if (avctx->hwaccel)
1190 if (avctx->idct_algo == FF_IDCT_AUTO)
1191 avctx->idct_algo = FF_IDCT_NONE;
1192
1193 if (avctx->hwaccel && avctx->pix_fmt == AV_PIX_FMT_XVMC) {
1194 Mpeg1Context *s1 = avctx->priv_data;
1195 MpegEncContext *s = &s1->mpeg_enc_ctx;
1196
1197 s->pack_pblocks = 1;
1198 }
1199 }
1200
1201 /* Call this function when we know all parameters.
1202 * It may be called in different places for MPEG-1 and MPEG-2. */
mpeg_decode_postinit(AVCodecContext * avctx)1203 static int mpeg_decode_postinit(AVCodecContext *avctx)
1204 {
1205 Mpeg1Context *s1 = avctx->priv_data;
1206 MpegEncContext *s = &s1->mpeg_enc_ctx;
1207 uint8_t old_permutation[64];
1208 int ret;
1209
1210 if (avctx->codec_id == AV_CODEC_ID_MPEG1VIDEO) {
1211 // MPEG-1 aspect
1212 AVRational aspect_inv = av_d2q(ff_mpeg1_aspect[s->aspect_ratio_info], 255);
1213 avctx->sample_aspect_ratio = (AVRational) { aspect_inv.den, aspect_inv.num };
1214 } else { // MPEG-2
1215 // MPEG-2 aspect
1216 if (s->aspect_ratio_info > 1) {
1217 AVRational dar =
1218 av_mul_q(av_div_q(ff_mpeg2_aspect[s->aspect_ratio_info],
1219 (AVRational) { s1->pan_scan.width,
1220 s1->pan_scan.height }),
1221 (AVRational) { s->width, s->height });
1222
1223 /* We ignore the spec here and guess a bit as reality does not
1224 * match the spec, see for example res_change_ffmpeg_aspect.ts
1225 * and sequence-display-aspect.mpg.
1226 * issue1613, 621, 562 */
1227 if ((s1->pan_scan.width == 0) || (s1->pan_scan.height == 0) ||
1228 (av_cmp_q(dar, (AVRational) { 4, 3 }) &&
1229 av_cmp_q(dar, (AVRational) { 16, 9 }))) {
1230 s->avctx->sample_aspect_ratio =
1231 av_div_q(ff_mpeg2_aspect[s->aspect_ratio_info],
1232 (AVRational) { s->width, s->height });
1233 } else {
1234 s->avctx->sample_aspect_ratio =
1235 av_div_q(ff_mpeg2_aspect[s->aspect_ratio_info],
1236 (AVRational) { s1->pan_scan.width, s1->pan_scan.height });
1237 // issue1613 4/3 16/9 -> 16/9
1238 // res_change_ffmpeg_aspect.ts 4/3 225/44 ->4/3
1239 // widescreen-issue562.mpg 4/3 16/9 -> 16/9
1240 // s->avctx->sample_aspect_ratio = av_mul_q(s->avctx->sample_aspect_ratio, (AVRational) {s->width, s->height});
1241 ff_dlog(avctx, "aspect A %d/%d\n",
1242 ff_mpeg2_aspect[s->aspect_ratio_info].num,
1243 ff_mpeg2_aspect[s->aspect_ratio_info].den);
1244 ff_dlog(avctx, "aspect B %d/%d\n", s->avctx->sample_aspect_ratio.num,
1245 s->avctx->sample_aspect_ratio.den);
1246 }
1247 } else {
1248 s->avctx->sample_aspect_ratio =
1249 ff_mpeg2_aspect[s->aspect_ratio_info];
1250 }
1251 } // MPEG-2
1252
1253 if (av_image_check_sar(s->width, s->height,
1254 avctx->sample_aspect_ratio) < 0) {
1255 av_log(avctx, AV_LOG_WARNING, "ignoring invalid SAR: %u/%u\n",
1256 avctx->sample_aspect_ratio.num,
1257 avctx->sample_aspect_ratio.den);
1258 avctx->sample_aspect_ratio = (AVRational){ 0, 1 };
1259 }
1260
1261 if ((s1->mpeg_enc_ctx_allocated == 0) ||
1262 avctx->coded_width != s->width ||
1263 avctx->coded_height != s->height ||
1264 s1->save_width != s->width ||
1265 s1->save_height != s->height ||
1266 av_cmp_q(s1->save_aspect, s->avctx->sample_aspect_ratio) ||
1267 (s1->save_progressive_seq != s->progressive_sequence && FFALIGN(s->height, 16) != FFALIGN(s->height, 32)) ||
1268 0) {
1269 if (s1->mpeg_enc_ctx_allocated) {
1270 ParseContext pc = s->parse_context;
1271 s->parse_context.buffer = 0;
1272 ff_mpv_common_end(s);
1273 s->parse_context = pc;
1274 s1->mpeg_enc_ctx_allocated = 0;
1275 }
1276
1277 ret = ff_set_dimensions(avctx, s->width, s->height);
1278 if (ret < 0)
1279 return ret;
1280
1281 if (avctx->codec_id == AV_CODEC_ID_MPEG2VIDEO && s->bit_rate) {
1282 avctx->rc_max_rate = s->bit_rate;
1283 } else if (avctx->codec_id == AV_CODEC_ID_MPEG1VIDEO && s->bit_rate &&
1284 (s->bit_rate != 0x3FFFF*400 || s->vbv_delay != 0xFFFF)) {
1285 avctx->bit_rate = s->bit_rate;
1286 }
1287 s1->save_aspect = s->avctx->sample_aspect_ratio;
1288 s1->save_width = s->width;
1289 s1->save_height = s->height;
1290 s1->save_progressive_seq = s->progressive_sequence;
1291
1292 /* low_delay may be forced, in this case we will have B-frames
1293 * that behave like P-frames. */
1294 avctx->has_b_frames = !s->low_delay;
1295
1296 if (avctx->codec_id == AV_CODEC_ID_MPEG1VIDEO) {
1297 // MPEG-1 fps
1298 avctx->framerate = ff_mpeg12_frame_rate_tab[s->frame_rate_index];
1299 avctx->ticks_per_frame = 1;
1300
1301 avctx->chroma_sample_location = AVCHROMA_LOC_CENTER;
1302 } else { // MPEG-2
1303 // MPEG-2 fps
1304 av_reduce(&s->avctx->framerate.num,
1305 &s->avctx->framerate.den,
1306 ff_mpeg12_frame_rate_tab[s->frame_rate_index].num * s1->frame_rate_ext.num,
1307 ff_mpeg12_frame_rate_tab[s->frame_rate_index].den * s1->frame_rate_ext.den,
1308 1 << 30);
1309 avctx->ticks_per_frame = 2;
1310
1311 switch (s->chroma_format) {
1312 case 1: avctx->chroma_sample_location = AVCHROMA_LOC_LEFT; break;
1313 case 2:
1314 case 3: avctx->chroma_sample_location = AVCHROMA_LOC_TOPLEFT; break;
1315 default: av_assert0(0);
1316 }
1317 } // MPEG-2
1318
1319 avctx->pix_fmt = mpeg_get_pixelformat(avctx);
1320 setup_hwaccel_for_pixfmt(avctx);
1321
1322 /* Quantization matrices may need reordering
1323 * if DCT permutation is changed. */
1324 memcpy(old_permutation, s->idsp.idct_permutation, 64 * sizeof(uint8_t));
1325
1326 ff_mpv_idct_init(s);
1327 if ((ret = ff_mpv_common_init(s)) < 0)
1328 return ret;
1329
1330 quant_matrix_rebuild(s->intra_matrix, old_permutation, s->idsp.idct_permutation);
1331 quant_matrix_rebuild(s->inter_matrix, old_permutation, s->idsp.idct_permutation);
1332 quant_matrix_rebuild(s->chroma_intra_matrix, old_permutation, s->idsp.idct_permutation);
1333 quant_matrix_rebuild(s->chroma_inter_matrix, old_permutation, s->idsp.idct_permutation);
1334
1335 s1->mpeg_enc_ctx_allocated = 1;
1336 }
1337 return 0;
1338 }
1339
mpeg1_decode_picture(AVCodecContext * avctx,const uint8_t * buf,int buf_size)1340 static int mpeg1_decode_picture(AVCodecContext *avctx, const uint8_t *buf,
1341 int buf_size)
1342 {
1343 Mpeg1Context *s1 = avctx->priv_data;
1344 MpegEncContext *s = &s1->mpeg_enc_ctx;
1345 int ref, f_code, vbv_delay;
1346
1347 init_get_bits(&s->gb, buf, buf_size * 8);
1348
1349 ref = get_bits(&s->gb, 10); /* temporal ref */
1350 s->pict_type = get_bits(&s->gb, 3);
1351 if (s->pict_type == 0 || s->pict_type > 3)
1352 return AVERROR_INVALIDDATA;
1353
1354 vbv_delay = get_bits(&s->gb, 16);
1355 s->vbv_delay = vbv_delay;
1356 if (s->pict_type == AV_PICTURE_TYPE_P ||
1357 s->pict_type == AV_PICTURE_TYPE_B) {
1358 s->full_pel[0] = get_bits1(&s->gb);
1359 f_code = get_bits(&s->gb, 3);
1360 if (f_code == 0 && (avctx->err_recognition & (AV_EF_BITSTREAM|AV_EF_COMPLIANT)))
1361 return AVERROR_INVALIDDATA;
1362 f_code += !f_code;
1363 s->mpeg_f_code[0][0] = f_code;
1364 s->mpeg_f_code[0][1] = f_code;
1365 }
1366 if (s->pict_type == AV_PICTURE_TYPE_B) {
1367 s->full_pel[1] = get_bits1(&s->gb);
1368 f_code = get_bits(&s->gb, 3);
1369 if (f_code == 0 && (avctx->err_recognition & (AV_EF_BITSTREAM|AV_EF_COMPLIANT)))
1370 return AVERROR_INVALIDDATA;
1371 f_code += !f_code;
1372 s->mpeg_f_code[1][0] = f_code;
1373 s->mpeg_f_code[1][1] = f_code;
1374 }
1375 s->current_picture.f->pict_type = s->pict_type;
1376 s->current_picture.f->key_frame = s->pict_type == AV_PICTURE_TYPE_I;
1377
1378 if (avctx->debug & FF_DEBUG_PICT_INFO)
1379 av_log(avctx, AV_LOG_DEBUG,
1380 "vbv_delay %d, ref %d type:%d\n", vbv_delay, ref, s->pict_type);
1381
1382 s->y_dc_scale = 8;
1383 s->c_dc_scale = 8;
1384 return 0;
1385 }
1386
mpeg_decode_sequence_extension(Mpeg1Context * s1)1387 static void mpeg_decode_sequence_extension(Mpeg1Context *s1)
1388 {
1389 MpegEncContext *s = &s1->mpeg_enc_ctx;
1390 int horiz_size_ext, vert_size_ext;
1391 int bit_rate_ext;
1392 AVCPBProperties *cpb_props;
1393
1394 skip_bits(&s->gb, 1); /* profile and level esc*/
1395 s->avctx->profile = get_bits(&s->gb, 3);
1396 s->avctx->level = get_bits(&s->gb, 4);
1397 s->progressive_sequence = get_bits1(&s->gb); /* progressive_sequence */
1398 s->chroma_format = get_bits(&s->gb, 2); /* chroma_format 1=420, 2=422, 3=444 */
1399
1400 if (!s->chroma_format) {
1401 s->chroma_format = 1;
1402 av_log(s->avctx, AV_LOG_WARNING, "Chroma format invalid\n");
1403 }
1404
1405 horiz_size_ext = get_bits(&s->gb, 2);
1406 vert_size_ext = get_bits(&s->gb, 2);
1407 s->width |= (horiz_size_ext << 12);
1408 s->height |= (vert_size_ext << 12);
1409 bit_rate_ext = get_bits(&s->gb, 12); /* XXX: handle it */
1410 s->bit_rate += (bit_rate_ext << 18) * 400LL;
1411 check_marker(s->avctx, &s->gb, "after bit rate extension");
1412 s1->rc_buffer_size += get_bits(&s->gb, 8) * 1024 * 16 << 10;
1413
1414 s->low_delay = get_bits1(&s->gb);
1415 if (s->avctx->flags & AV_CODEC_FLAG_LOW_DELAY)
1416 s->low_delay = 1;
1417
1418 s1->frame_rate_ext.num = get_bits(&s->gb, 2) + 1;
1419 s1->frame_rate_ext.den = get_bits(&s->gb, 5) + 1;
1420
1421 ff_dlog(s->avctx, "sequence extension\n");
1422 s->codec_id = s->avctx->codec_id = AV_CODEC_ID_MPEG2VIDEO;
1423
1424 if (cpb_props = ff_add_cpb_side_data(s->avctx)) {
1425 cpb_props->buffer_size = s1->rc_buffer_size;
1426 if (s->bit_rate != 0x3FFFF*400)
1427 cpb_props->max_bitrate = s->bit_rate;
1428 }
1429
1430 if (s->avctx->debug & FF_DEBUG_PICT_INFO)
1431 av_log(s->avctx, AV_LOG_DEBUG,
1432 "profile: %d, level: %d ps: %d cf:%d vbv buffer: %d, bitrate:%"PRId64"\n",
1433 s->avctx->profile, s->avctx->level, s->progressive_sequence, s->chroma_format,
1434 s1->rc_buffer_size, s->bit_rate);
1435 }
1436
mpeg_decode_sequence_display_extension(Mpeg1Context * s1)1437 static void mpeg_decode_sequence_display_extension(Mpeg1Context *s1)
1438 {
1439 MpegEncContext *s = &s1->mpeg_enc_ctx;
1440 int color_description, w, h;
1441
1442 skip_bits(&s->gb, 3); /* video format */
1443 color_description = get_bits1(&s->gb);
1444 if (color_description) {
1445 s->avctx->color_primaries = get_bits(&s->gb, 8);
1446 s->avctx->color_trc = get_bits(&s->gb, 8);
1447 s->avctx->colorspace = get_bits(&s->gb, 8);
1448 }
1449 w = get_bits(&s->gb, 14);
1450 skip_bits(&s->gb, 1); // marker
1451 h = get_bits(&s->gb, 14);
1452 // remaining 3 bits are zero padding
1453
1454 s1->pan_scan.width = 16 * w;
1455 s1->pan_scan.height = 16 * h;
1456
1457 if (s->avctx->debug & FF_DEBUG_PICT_INFO)
1458 av_log(s->avctx, AV_LOG_DEBUG, "sde w:%d, h:%d\n", w, h);
1459 }
1460
mpeg_decode_picture_display_extension(Mpeg1Context * s1)1461 static void mpeg_decode_picture_display_extension(Mpeg1Context *s1)
1462 {
1463 MpegEncContext *s = &s1->mpeg_enc_ctx;
1464 int i, nofco;
1465
1466 nofco = 1;
1467 if (s->progressive_sequence) {
1468 if (s->repeat_first_field) {
1469 nofco++;
1470 if (s->top_field_first)
1471 nofco++;
1472 }
1473 } else {
1474 if (s->picture_structure == PICT_FRAME) {
1475 nofco++;
1476 if (s->repeat_first_field)
1477 nofco++;
1478 }
1479 }
1480 for (i = 0; i < nofco; i++) {
1481 s1->pan_scan.position[i][0] = get_sbits(&s->gb, 16);
1482 skip_bits(&s->gb, 1); // marker
1483 s1->pan_scan.position[i][1] = get_sbits(&s->gb, 16);
1484 skip_bits(&s->gb, 1); // marker
1485 }
1486
1487 if (s->avctx->debug & FF_DEBUG_PICT_INFO)
1488 av_log(s->avctx, AV_LOG_DEBUG,
1489 "pde (%"PRId16",%"PRId16") (%"PRId16",%"PRId16") (%"PRId16",%"PRId16")\n",
1490 s1->pan_scan.position[0][0], s1->pan_scan.position[0][1],
1491 s1->pan_scan.position[1][0], s1->pan_scan.position[1][1],
1492 s1->pan_scan.position[2][0], s1->pan_scan.position[2][1]);
1493 }
1494
load_matrix(MpegEncContext * s,uint16_t matrix0[64],uint16_t matrix1[64],int intra)1495 static int load_matrix(MpegEncContext *s, uint16_t matrix0[64],
1496 uint16_t matrix1[64], int intra)
1497 {
1498 int i;
1499
1500 for (i = 0; i < 64; i++) {
1501 int j = s->idsp.idct_permutation[ff_zigzag_direct[i]];
1502 int v = get_bits(&s->gb, 8);
1503 if (v == 0) {
1504 av_log(s->avctx, AV_LOG_ERROR, "matrix damaged\n");
1505 return AVERROR_INVALIDDATA;
1506 }
1507 if (intra && i == 0 && v != 8) {
1508 av_log(s->avctx, AV_LOG_DEBUG, "intra matrix specifies invalid DC quantizer %d, ignoring\n", v);
1509 v = 8; // needed by pink.mpg / issue1046
1510 }
1511 matrix0[j] = v;
1512 if (matrix1)
1513 matrix1[j] = v;
1514 }
1515 return 0;
1516 }
1517
mpeg_decode_quant_matrix_extension(MpegEncContext * s)1518 static void mpeg_decode_quant_matrix_extension(MpegEncContext *s)
1519 {
1520 ff_dlog(s->avctx, "matrix extension\n");
1521
1522 if (get_bits1(&s->gb))
1523 load_matrix(s, s->chroma_intra_matrix, s->intra_matrix, 1);
1524 if (get_bits1(&s->gb))
1525 load_matrix(s, s->chroma_inter_matrix, s->inter_matrix, 0);
1526 if (get_bits1(&s->gb))
1527 load_matrix(s, s->chroma_intra_matrix, NULL, 1);
1528 if (get_bits1(&s->gb))
1529 load_matrix(s, s->chroma_inter_matrix, NULL, 0);
1530 }
1531
mpeg_decode_picture_coding_extension(Mpeg1Context * s1)1532 static void mpeg_decode_picture_coding_extension(Mpeg1Context *s1)
1533 {
1534 MpegEncContext *s = &s1->mpeg_enc_ctx;
1535
1536 s->full_pel[0] = s->full_pel[1] = 0;
1537 s->mpeg_f_code[0][0] = get_bits(&s->gb, 4);
1538 s->mpeg_f_code[0][1] = get_bits(&s->gb, 4);
1539 s->mpeg_f_code[1][0] = get_bits(&s->gb, 4);
1540 s->mpeg_f_code[1][1] = get_bits(&s->gb, 4);
1541 if (!s->pict_type && s1->mpeg_enc_ctx_allocated) {
1542 av_log(s->avctx, AV_LOG_ERROR,
1543 "Missing picture start code, guessing missing values\n");
1544 if (s->mpeg_f_code[1][0] == 15 && s->mpeg_f_code[1][1] == 15) {
1545 if (s->mpeg_f_code[0][0] == 15 && s->mpeg_f_code[0][1] == 15)
1546 s->pict_type = AV_PICTURE_TYPE_I;
1547 else
1548 s->pict_type = AV_PICTURE_TYPE_P;
1549 } else
1550 s->pict_type = AV_PICTURE_TYPE_B;
1551 s->current_picture.f->pict_type = s->pict_type;
1552 s->current_picture.f->key_frame = s->pict_type == AV_PICTURE_TYPE_I;
1553 }
1554 s->mpeg_f_code[0][0] += !s->mpeg_f_code[0][0];
1555 s->mpeg_f_code[0][1] += !s->mpeg_f_code[0][1];
1556 s->mpeg_f_code[1][0] += !s->mpeg_f_code[1][0];
1557 s->mpeg_f_code[1][1] += !s->mpeg_f_code[1][1];
1558
1559 s->intra_dc_precision = get_bits(&s->gb, 2);
1560 s->picture_structure = get_bits(&s->gb, 2);
1561 s->top_field_first = get_bits1(&s->gb);
1562 s->frame_pred_frame_dct = get_bits1(&s->gb);
1563 s->concealment_motion_vectors = get_bits1(&s->gb);
1564 s->q_scale_type = get_bits1(&s->gb);
1565 s->intra_vlc_format = get_bits1(&s->gb);
1566 s->alternate_scan = get_bits1(&s->gb);
1567 s->repeat_first_field = get_bits1(&s->gb);
1568 s->chroma_420_type = get_bits1(&s->gb);
1569 s->progressive_frame = get_bits1(&s->gb);
1570
1571 if (s->alternate_scan) {
1572 ff_init_scantable(s->idsp.idct_permutation, &s->inter_scantable, ff_alternate_vertical_scan);
1573 ff_init_scantable(s->idsp.idct_permutation, &s->intra_scantable, ff_alternate_vertical_scan);
1574 } else {
1575 ff_init_scantable(s->idsp.idct_permutation, &s->inter_scantable, ff_zigzag_direct);
1576 ff_init_scantable(s->idsp.idct_permutation, &s->intra_scantable, ff_zigzag_direct);
1577 }
1578
1579 /* composite display not parsed */
1580 ff_dlog(s->avctx, "intra_dc_precision=%d\n", s->intra_dc_precision);
1581 ff_dlog(s->avctx, "picture_structure=%d\n", s->picture_structure);
1582 ff_dlog(s->avctx, "top field first=%d\n", s->top_field_first);
1583 ff_dlog(s->avctx, "repeat first field=%d\n", s->repeat_first_field);
1584 ff_dlog(s->avctx, "conceal=%d\n", s->concealment_motion_vectors);
1585 ff_dlog(s->avctx, "intra_vlc_format=%d\n", s->intra_vlc_format);
1586 ff_dlog(s->avctx, "alternate_scan=%d\n", s->alternate_scan);
1587 ff_dlog(s->avctx, "frame_pred_frame_dct=%d\n", s->frame_pred_frame_dct);
1588 ff_dlog(s->avctx, "progressive_frame=%d\n", s->progressive_frame);
1589 }
1590
mpeg_field_start(MpegEncContext * s,const uint8_t * buf,int buf_size)1591 static int mpeg_field_start(MpegEncContext *s, const uint8_t *buf, int buf_size)
1592 {
1593 AVCodecContext *avctx = s->avctx;
1594 Mpeg1Context *s1 = (Mpeg1Context *) s;
1595 int ret;
1596
1597 if (!(avctx->flags2 & AV_CODEC_FLAG2_CHUNKS)) {
1598 if (s->mb_width * s->mb_height * 11LL / (33 * 2 * 8) > buf_size)
1599 return AVERROR_INVALIDDATA;
1600 }
1601
1602 /* start frame decoding */
1603 if (s->first_field || s->picture_structure == PICT_FRAME) {
1604 AVFrameSideData *pan_scan;
1605
1606 if ((ret = ff_mpv_frame_start(s, avctx)) < 0)
1607 return ret;
1608
1609 ff_mpeg_er_frame_start(s);
1610
1611 /* first check if we must repeat the frame */
1612 s->current_picture_ptr->f->repeat_pict = 0;
1613 if (s->repeat_first_field) {
1614 if (s->progressive_sequence) {
1615 if (s->top_field_first)
1616 s->current_picture_ptr->f->repeat_pict = 4;
1617 else
1618 s->current_picture_ptr->f->repeat_pict = 2;
1619 } else if (s->progressive_frame) {
1620 s->current_picture_ptr->f->repeat_pict = 1;
1621 }
1622 }
1623
1624 pan_scan = av_frame_new_side_data(s->current_picture_ptr->f,
1625 AV_FRAME_DATA_PANSCAN,
1626 sizeof(s1->pan_scan));
1627 if (!pan_scan)
1628 return AVERROR(ENOMEM);
1629 memcpy(pan_scan->data, &s1->pan_scan, sizeof(s1->pan_scan));
1630
1631 if (s1->a53_buf_ref) {
1632 AVFrameSideData *sd = av_frame_new_side_data_from_buf(
1633 s->current_picture_ptr->f, AV_FRAME_DATA_A53_CC,
1634 s1->a53_buf_ref);
1635 if (!sd)
1636 av_buffer_unref(&s1->a53_buf_ref);
1637 s1->a53_buf_ref = NULL;
1638 }
1639
1640 if (s1->has_stereo3d) {
1641 AVStereo3D *stereo = av_stereo3d_create_side_data(s->current_picture_ptr->f);
1642 if (!stereo)
1643 return AVERROR(ENOMEM);
1644
1645 *stereo = s1->stereo3d;
1646 s1->has_stereo3d = 0;
1647 }
1648
1649 if (s1->has_afd) {
1650 AVFrameSideData *sd =
1651 av_frame_new_side_data(s->current_picture_ptr->f,
1652 AV_FRAME_DATA_AFD, 1);
1653 if (!sd)
1654 return AVERROR(ENOMEM);
1655
1656 *sd->data = s1->afd;
1657 s1->has_afd = 0;
1658 }
1659
1660 if (HAVE_THREADS && (avctx->active_thread_type & FF_THREAD_FRAME))
1661 ff_thread_finish_setup(avctx);
1662 } else { // second field
1663 int i;
1664
1665 if (!s->current_picture_ptr) {
1666 av_log(s->avctx, AV_LOG_ERROR, "first field missing\n");
1667 return AVERROR_INVALIDDATA;
1668 }
1669
1670 if (s->avctx->hwaccel) {
1671 if ((ret = s->avctx->hwaccel->end_frame(s->avctx)) < 0) {
1672 av_log(avctx, AV_LOG_ERROR,
1673 "hardware accelerator failed to decode first field\n");
1674 return ret;
1675 }
1676 }
1677
1678 for (i = 0; i < 4; i++) {
1679 s->current_picture.f->data[i] = s->current_picture_ptr->f->data[i];
1680 if (s->picture_structure == PICT_BOTTOM_FIELD)
1681 s->current_picture.f->data[i] +=
1682 s->current_picture_ptr->f->linesize[i];
1683 }
1684 }
1685
1686 if (avctx->hwaccel) {
1687 if ((ret = avctx->hwaccel->start_frame(avctx, buf, buf_size)) < 0)
1688 return ret;
1689 }
1690
1691 return 0;
1692 }
1693
1694 #define DECODE_SLICE_ERROR -1
1695 #define DECODE_SLICE_OK 0
1696
1697 /**
1698 * Decode a slice.
1699 * MpegEncContext.mb_y must be set to the MB row from the startcode.
1700 * @return DECODE_SLICE_ERROR if the slice is damaged,
1701 * DECODE_SLICE_OK if this slice is OK
1702 */
mpeg_decode_slice(MpegEncContext * s,int mb_y,const uint8_t ** buf,int buf_size)1703 static int mpeg_decode_slice(MpegEncContext *s, int mb_y,
1704 const uint8_t **buf, int buf_size)
1705 {
1706 AVCodecContext *avctx = s->avctx;
1707 const int lowres = s->avctx->lowres;
1708 const int field_pic = s->picture_structure != PICT_FRAME;
1709 int ret;
1710
1711 s->resync_mb_x =
1712 s->resync_mb_y = -1;
1713
1714 av_assert0(mb_y < s->mb_height);
1715
1716 init_get_bits(&s->gb, *buf, buf_size * 8);
1717 if (s->codec_id != AV_CODEC_ID_MPEG1VIDEO && s->mb_height > 2800/16)
1718 skip_bits(&s->gb, 3);
1719
1720 ff_mpeg1_clean_buffers(s);
1721 s->interlaced_dct = 0;
1722
1723 s->qscale = mpeg_get_qscale(s);
1724
1725 if (s->qscale == 0) {
1726 av_log(s->avctx, AV_LOG_ERROR, "qscale == 0\n");
1727 return AVERROR_INVALIDDATA;
1728 }
1729
1730 /* extra slice info */
1731 if (skip_1stop_8data_bits(&s->gb) < 0)
1732 return AVERROR_INVALIDDATA;
1733
1734 s->mb_x = 0;
1735
1736 if (mb_y == 0 && s->codec_tag == AV_RL32("SLIF")) {
1737 skip_bits1(&s->gb);
1738 } else {
1739 while (get_bits_left(&s->gb) > 0) {
1740 int code = get_vlc2(&s->gb, ff_mbincr_vlc.table,
1741 MBINCR_VLC_BITS, 2);
1742 if (code < 0) {
1743 av_log(s->avctx, AV_LOG_ERROR, "first mb_incr damaged\n");
1744 return AVERROR_INVALIDDATA;
1745 }
1746 if (code >= 33) {
1747 if (code == 33)
1748 s->mb_x += 33;
1749 /* otherwise, stuffing, nothing to do */
1750 } else {
1751 s->mb_x += code;
1752 break;
1753 }
1754 }
1755 }
1756
1757 if (s->mb_x >= (unsigned) s->mb_width) {
1758 av_log(s->avctx, AV_LOG_ERROR, "initial skip overflow\n");
1759 return AVERROR_INVALIDDATA;
1760 }
1761
1762 if (avctx->hwaccel && avctx->hwaccel->decode_slice) {
1763 const uint8_t *buf_end, *buf_start = *buf - 4; /* include start_code */
1764 int start_code = -1;
1765 buf_end = avpriv_find_start_code(buf_start + 2, *buf + buf_size, &start_code);
1766 if (buf_end < *buf + buf_size)
1767 buf_end -= 4;
1768 s->mb_y = mb_y;
1769 if (avctx->hwaccel->decode_slice(avctx, buf_start, buf_end - buf_start) < 0)
1770 return DECODE_SLICE_ERROR;
1771 *buf = buf_end;
1772 return DECODE_SLICE_OK;
1773 }
1774
1775 s->resync_mb_x = s->mb_x;
1776 s->resync_mb_y = s->mb_y = mb_y;
1777 s->mb_skip_run = 0;
1778 ff_init_block_index(s);
1779
1780 if (s->mb_y == 0 && s->mb_x == 0 && (s->first_field || s->picture_structure == PICT_FRAME)) {
1781 if (s->avctx->debug & FF_DEBUG_PICT_INFO) {
1782 av_log(s->avctx, AV_LOG_DEBUG,
1783 "qp:%d fc:%2d%2d%2d%2d %s %s %s %s %s dc:%d pstruct:%d fdct:%d cmv:%d qtype:%d ivlc:%d rff:%d %s\n",
1784 s->qscale,
1785 s->mpeg_f_code[0][0], s->mpeg_f_code[0][1],
1786 s->mpeg_f_code[1][0], s->mpeg_f_code[1][1],
1787 s->pict_type == AV_PICTURE_TYPE_I ? "I" :
1788 (s->pict_type == AV_PICTURE_TYPE_P ? "P" :
1789 (s->pict_type == AV_PICTURE_TYPE_B ? "B" : "S")),
1790 s->progressive_sequence ? "ps" : "",
1791 s->progressive_frame ? "pf" : "",
1792 s->alternate_scan ? "alt" : "",
1793 s->top_field_first ? "top" : "",
1794 s->intra_dc_precision, s->picture_structure,
1795 s->frame_pred_frame_dct, s->concealment_motion_vectors,
1796 s->q_scale_type, s->intra_vlc_format,
1797 s->repeat_first_field, s->chroma_420_type ? "420" : "");
1798 }
1799 }
1800
1801 for (;;) {
1802 // If 1, we memcpy blocks in xvmcvideo.
1803 if ((CONFIG_MPEG1_XVMC_HWACCEL || CONFIG_MPEG2_XVMC_HWACCEL) && s->pack_pblocks)
1804 ff_xvmc_init_block(s); // set s->block
1805
1806 if ((ret = mpeg_decode_mb(s, s->block)) < 0)
1807 return ret;
1808
1809 // Note motion_val is normally NULL unless we want to extract the MVs.
1810 if (s->current_picture.motion_val[0] && !s->encoding) {
1811 const int wrap = s->b8_stride;
1812 int xy = s->mb_x * 2 + s->mb_y * 2 * wrap;
1813 int b8_xy = 4 * (s->mb_x + s->mb_y * s->mb_stride);
1814 int motion_x, motion_y, dir, i;
1815
1816 for (i = 0; i < 2; i++) {
1817 for (dir = 0; dir < 2; dir++) {
1818 if (s->mb_intra ||
1819 (dir == 1 && s->pict_type != AV_PICTURE_TYPE_B)) {
1820 motion_x = motion_y = 0;
1821 } else if (s->mv_type == MV_TYPE_16X16 ||
1822 (s->mv_type == MV_TYPE_FIELD && field_pic)) {
1823 motion_x = s->mv[dir][0][0];
1824 motion_y = s->mv[dir][0][1];
1825 } else { /* if ((s->mv_type == MV_TYPE_FIELD) || (s->mv_type == MV_TYPE_16X8)) */
1826 motion_x = s->mv[dir][i][0];
1827 motion_y = s->mv[dir][i][1];
1828 }
1829
1830 s->current_picture.motion_val[dir][xy][0] = motion_x;
1831 s->current_picture.motion_val[dir][xy][1] = motion_y;
1832 s->current_picture.motion_val[dir][xy + 1][0] = motion_x;
1833 s->current_picture.motion_val[dir][xy + 1][1] = motion_y;
1834 s->current_picture.ref_index [dir][b8_xy] =
1835 s->current_picture.ref_index [dir][b8_xy + 1] = s->field_select[dir][i];
1836 av_assert2(s->field_select[dir][i] == 0 ||
1837 s->field_select[dir][i] == 1);
1838 }
1839 xy += wrap;
1840 b8_xy += 2;
1841 }
1842 }
1843
1844 s->dest[0] += 16 >> lowres;
1845 s->dest[1] +=(16 >> lowres) >> s->chroma_x_shift;
1846 s->dest[2] +=(16 >> lowres) >> s->chroma_x_shift;
1847
1848 ff_mpv_reconstruct_mb(s, s->block);
1849
1850 if (++s->mb_x >= s->mb_width) {
1851 const int mb_size = 16 >> s->avctx->lowres;
1852 int left;
1853
1854 ff_mpeg_draw_horiz_band(s, mb_size * (s->mb_y >> field_pic), mb_size);
1855 ff_mpv_report_decode_progress(s);
1856
1857 s->mb_x = 0;
1858 s->mb_y += 1 << field_pic;
1859
1860 if (s->mb_y >= s->mb_height) {
1861 int left = get_bits_left(&s->gb);
1862 int is_d10 = s->chroma_format == 2 &&
1863 s->pict_type == AV_PICTURE_TYPE_I &&
1864 avctx->profile == 0 && avctx->level == 5 &&
1865 s->intra_dc_precision == 2 &&
1866 s->q_scale_type == 1 && s->alternate_scan == 0 &&
1867 s->progressive_frame == 0
1868 /* vbv_delay == 0xBBB || 0xE10 */;
1869
1870 if (left >= 32 && !is_d10) {
1871 GetBitContext gb = s->gb;
1872 align_get_bits(&gb);
1873 if (show_bits(&gb, 24) == 0x060E2B) {
1874 av_log(avctx, AV_LOG_DEBUG, "Invalid MXF data found in video stream\n");
1875 is_d10 = 1;
1876 }
1877 if (left > 32 && show_bits_long(&gb, 32) == 0x201) {
1878 av_log(avctx, AV_LOG_DEBUG, "skipping m704 alpha (unsupported)\n");
1879 goto eos;
1880 }
1881 }
1882
1883 if (left < 0 ||
1884 (left && show_bits(&s->gb, FFMIN(left, 23)) && !is_d10) ||
1885 ((avctx->err_recognition & (AV_EF_BITSTREAM | AV_EF_AGGRESSIVE)) && left > 8)) {
1886 av_log(avctx, AV_LOG_ERROR, "end mismatch left=%d %0X at %d %d\n",
1887 left, left>0 ? show_bits(&s->gb, FFMIN(left, 23)) : 0, s->mb_x, s->mb_y);
1888 return AVERROR_INVALIDDATA;
1889 } else
1890 goto eos;
1891 }
1892 // There are some files out there which are missing the last slice
1893 // in cases where the slice is completely outside the visible
1894 // area, we detect this here instead of running into the end expecting
1895 // more data
1896 left = get_bits_left(&s->gb);
1897 if (s->mb_y >= ((s->height + 15) >> 4) &&
1898 !s->progressive_sequence &&
1899 left <= 25 &&
1900 left >= 0 &&
1901 s->mb_skip_run == -1 &&
1902 (!left || show_bits(&s->gb, left) == 0))
1903 goto eos;
1904
1905 ff_init_block_index(s);
1906 }
1907
1908 /* skip mb handling */
1909 if (s->mb_skip_run == -1) {
1910 /* read increment again */
1911 s->mb_skip_run = 0;
1912 for (;;) {
1913 int code = get_vlc2(&s->gb, ff_mbincr_vlc.table,
1914 MBINCR_VLC_BITS, 2);
1915 if (code < 0) {
1916 av_log(s->avctx, AV_LOG_ERROR, "mb incr damaged\n");
1917 return AVERROR_INVALIDDATA;
1918 }
1919 if (code >= 33) {
1920 if (code == 33) {
1921 s->mb_skip_run += 33;
1922 } else if (code == 35) {
1923 if (s->mb_skip_run != 0 || show_bits(&s->gb, 15) != 0) {
1924 av_log(s->avctx, AV_LOG_ERROR, "slice mismatch\n");
1925 return AVERROR_INVALIDDATA;
1926 }
1927 goto eos; /* end of slice */
1928 }
1929 /* otherwise, stuffing, nothing to do */
1930 } else {
1931 s->mb_skip_run += code;
1932 break;
1933 }
1934 }
1935 if (s->mb_skip_run) {
1936 int i;
1937 if (s->pict_type == AV_PICTURE_TYPE_I) {
1938 av_log(s->avctx, AV_LOG_ERROR,
1939 "skipped MB in I-frame at %d %d\n", s->mb_x, s->mb_y);
1940 return AVERROR_INVALIDDATA;
1941 }
1942
1943 /* skip mb */
1944 s->mb_intra = 0;
1945 for (i = 0; i < 12; i++)
1946 s->block_last_index[i] = -1;
1947 if (s->picture_structure == PICT_FRAME)
1948 s->mv_type = MV_TYPE_16X16;
1949 else
1950 s->mv_type = MV_TYPE_FIELD;
1951 if (s->pict_type == AV_PICTURE_TYPE_P) {
1952 /* if P type, zero motion vector is implied */
1953 s->mv_dir = MV_DIR_FORWARD;
1954 s->mv[0][0][0] = s->mv[0][0][1] = 0;
1955 s->last_mv[0][0][0] = s->last_mv[0][0][1] = 0;
1956 s->last_mv[0][1][0] = s->last_mv[0][1][1] = 0;
1957 s->field_select[0][0] = (s->picture_structure - 1) & 1;
1958 } else {
1959 /* if B type, reuse previous vectors and directions */
1960 s->mv[0][0][0] = s->last_mv[0][0][0];
1961 s->mv[0][0][1] = s->last_mv[0][0][1];
1962 s->mv[1][0][0] = s->last_mv[1][0][0];
1963 s->mv[1][0][1] = s->last_mv[1][0][1];
1964 s->field_select[0][0] = (s->picture_structure - 1) & 1;
1965 s->field_select[1][0] = (s->picture_structure - 1) & 1;
1966 }
1967 }
1968 }
1969 }
1970 eos: // end of slice
1971 if (get_bits_left(&s->gb) < 0) {
1972 av_log(s, AV_LOG_ERROR, "overread %d\n", -get_bits_left(&s->gb));
1973 return AVERROR_INVALIDDATA;
1974 }
1975 *buf += (get_bits_count(&s->gb) - 1) / 8;
1976 ff_dlog(s, "Slice start:%d %d end:%d %d\n", s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y);
1977 return 0;
1978 }
1979
slice_decode_thread(AVCodecContext * c,void * arg)1980 static int slice_decode_thread(AVCodecContext *c, void *arg)
1981 {
1982 MpegEncContext *s = *(void **) arg;
1983 const uint8_t *buf = s->gb.buffer;
1984 int mb_y = s->start_mb_y;
1985 const int field_pic = s->picture_structure != PICT_FRAME;
1986
1987 s->er.error_count = (3 * (s->end_mb_y - s->start_mb_y) * s->mb_width) >> field_pic;
1988
1989 for (;;) {
1990 uint32_t start_code;
1991 int ret;
1992
1993 ret = mpeg_decode_slice(s, mb_y, &buf, s->gb.buffer_end - buf);
1994 emms_c();
1995 ff_dlog(c, "ret:%d resync:%d/%d mb:%d/%d ts:%d/%d ec:%d\n",
1996 ret, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y,
1997 s->start_mb_y, s->end_mb_y, s->er.error_count);
1998 if (ret < 0) {
1999 if (c->err_recognition & AV_EF_EXPLODE)
2000 return ret;
2001 if (s->resync_mb_x >= 0 && s->resync_mb_y >= 0)
2002 ff_er_add_slice(&s->er, s->resync_mb_x, s->resync_mb_y,
2003 s->mb_x, s->mb_y,
2004 ER_AC_ERROR | ER_DC_ERROR | ER_MV_ERROR);
2005 } else {
2006 ff_er_add_slice(&s->er, s->resync_mb_x, s->resync_mb_y,
2007 s->mb_x - 1, s->mb_y,
2008 ER_AC_END | ER_DC_END | ER_MV_END);
2009 }
2010
2011 if (s->mb_y == s->end_mb_y)
2012 return 0;
2013
2014 start_code = -1;
2015 buf = avpriv_find_start_code(buf, s->gb.buffer_end, &start_code);
2016 if (start_code < SLICE_MIN_START_CODE || start_code > SLICE_MAX_START_CODE)
2017 return AVERROR_INVALIDDATA;
2018 mb_y = start_code - SLICE_MIN_START_CODE;
2019 if (s->codec_id != AV_CODEC_ID_MPEG1VIDEO && s->mb_height > 2800/16)
2020 mb_y += (*buf&0xE0)<<2;
2021 mb_y <<= field_pic;
2022 if (s->picture_structure == PICT_BOTTOM_FIELD)
2023 mb_y++;
2024 if (mb_y >= s->end_mb_y)
2025 return AVERROR_INVALIDDATA;
2026 }
2027 }
2028
2029 /**
2030 * Handle slice ends.
2031 * @return 1 if it seems to be the last slice
2032 */
slice_end(AVCodecContext * avctx,AVFrame * pict)2033 static int slice_end(AVCodecContext *avctx, AVFrame *pict)
2034 {
2035 Mpeg1Context *s1 = avctx->priv_data;
2036 MpegEncContext *s = &s1->mpeg_enc_ctx;
2037
2038 if (!s1->mpeg_enc_ctx_allocated || !s->current_picture_ptr)
2039 return 0;
2040
2041 if (s->avctx->hwaccel) {
2042 int ret = s->avctx->hwaccel->end_frame(s->avctx);
2043 if (ret < 0) {
2044 av_log(avctx, AV_LOG_ERROR,
2045 "hardware accelerator failed to decode picture\n");
2046 return ret;
2047 }
2048 }
2049
2050 /* end of slice reached */
2051 if (/* s->mb_y << field_pic == s->mb_height && */ !s->first_field && !s1->first_slice) {
2052 /* end of image */
2053
2054 ff_er_frame_end(&s->er);
2055
2056 ff_mpv_frame_end(s);
2057
2058 if (s->pict_type == AV_PICTURE_TYPE_B || s->low_delay) {
2059 int ret = av_frame_ref(pict, s->current_picture_ptr->f);
2060 if (ret < 0)
2061 return ret;
2062 ff_print_debug_info(s, s->current_picture_ptr, pict);
2063 ff_mpv_export_qp_table(s, pict, s->current_picture_ptr, FF_QSCALE_TYPE_MPEG2);
2064 } else {
2065 if (avctx->active_thread_type & FF_THREAD_FRAME)
2066 s->picture_number++;
2067 /* latency of 1 frame for I- and P-frames */
2068 /* XXX: use another variable than picture_number */
2069 if (s->last_picture_ptr) {
2070 int ret = av_frame_ref(pict, s->last_picture_ptr->f);
2071 if (ret < 0)
2072 return ret;
2073 ff_print_debug_info(s, s->last_picture_ptr, pict);
2074 ff_mpv_export_qp_table(s, pict, s->last_picture_ptr, FF_QSCALE_TYPE_MPEG2);
2075 }
2076 }
2077
2078 return 1;
2079 } else {
2080 return 0;
2081 }
2082 }
2083
mpeg1_decode_sequence(AVCodecContext * avctx,const uint8_t * buf,int buf_size)2084 static int mpeg1_decode_sequence(AVCodecContext *avctx,
2085 const uint8_t *buf, int buf_size)
2086 {
2087 Mpeg1Context *s1 = avctx->priv_data;
2088 MpegEncContext *s = &s1->mpeg_enc_ctx;
2089 int width, height;
2090 int i, v, j;
2091
2092 init_get_bits(&s->gb, buf, buf_size * 8);
2093
2094 width = get_bits(&s->gb, 12);
2095 height = get_bits(&s->gb, 12);
2096 if (width == 0 || height == 0) {
2097 av_log(avctx, AV_LOG_WARNING,
2098 "Invalid horizontal or vertical size value.\n");
2099 if (avctx->err_recognition & (AV_EF_BITSTREAM | AV_EF_COMPLIANT))
2100 return AVERROR_INVALIDDATA;
2101 }
2102 s->aspect_ratio_info = get_bits(&s->gb, 4);
2103 if (s->aspect_ratio_info == 0) {
2104 av_log(avctx, AV_LOG_ERROR, "aspect ratio has forbidden 0 value\n");
2105 if (avctx->err_recognition & (AV_EF_BITSTREAM | AV_EF_COMPLIANT))
2106 return AVERROR_INVALIDDATA;
2107 }
2108 s->frame_rate_index = get_bits(&s->gb, 4);
2109 if (s->frame_rate_index == 0 || s->frame_rate_index > 13) {
2110 av_log(avctx, AV_LOG_WARNING,
2111 "frame_rate_index %d is invalid\n", s->frame_rate_index);
2112 s->frame_rate_index = 1;
2113 }
2114 s->bit_rate = get_bits(&s->gb, 18) * 400LL;
2115 if (check_marker(s->avctx, &s->gb, "in sequence header") == 0) {
2116 return AVERROR_INVALIDDATA;
2117 }
2118
2119 s1->rc_buffer_size = get_bits(&s->gb, 10) * 1024 * 16;
2120 skip_bits(&s->gb, 1);
2121
2122 /* get matrix */
2123 if (get_bits1(&s->gb)) {
2124 load_matrix(s, s->chroma_intra_matrix, s->intra_matrix, 1);
2125 } else {
2126 for (i = 0; i < 64; i++) {
2127 j = s->idsp.idct_permutation[i];
2128 v = ff_mpeg1_default_intra_matrix[i];
2129 s->intra_matrix[j] = v;
2130 s->chroma_intra_matrix[j] = v;
2131 }
2132 }
2133 if (get_bits1(&s->gb)) {
2134 load_matrix(s, s->chroma_inter_matrix, s->inter_matrix, 0);
2135 } else {
2136 for (i = 0; i < 64; i++) {
2137 int j = s->idsp.idct_permutation[i];
2138 v = ff_mpeg1_default_non_intra_matrix[i];
2139 s->inter_matrix[j] = v;
2140 s->chroma_inter_matrix[j] = v;
2141 }
2142 }
2143
2144 if (show_bits(&s->gb, 23) != 0) {
2145 av_log(s->avctx, AV_LOG_ERROR, "sequence header damaged\n");
2146 return AVERROR_INVALIDDATA;
2147 }
2148
2149 s->width = width;
2150 s->height = height;
2151
2152 /* We set MPEG-2 parameters so that it emulates MPEG-1. */
2153 s->progressive_sequence = 1;
2154 s->progressive_frame = 1;
2155 s->picture_structure = PICT_FRAME;
2156 s->first_field = 0;
2157 s->frame_pred_frame_dct = 1;
2158 s->chroma_format = 1;
2159 s->codec_id =
2160 s->avctx->codec_id = AV_CODEC_ID_MPEG1VIDEO;
2161 s->out_format = FMT_MPEG1;
2162 s->swap_uv = 0; // AFAIK VCR2 does not have SEQ_HEADER
2163 if (s->avctx->flags & AV_CODEC_FLAG_LOW_DELAY)
2164 s->low_delay = 1;
2165
2166 if (s->avctx->debug & FF_DEBUG_PICT_INFO)
2167 av_log(s->avctx, AV_LOG_DEBUG, "vbv buffer: %d, bitrate:%"PRId64", aspect_ratio_info: %d \n",
2168 s1->rc_buffer_size, s->bit_rate, s->aspect_ratio_info);
2169
2170 return 0;
2171 }
2172
vcr2_init_sequence(AVCodecContext * avctx)2173 static int vcr2_init_sequence(AVCodecContext *avctx)
2174 {
2175 Mpeg1Context *s1 = avctx->priv_data;
2176 MpegEncContext *s = &s1->mpeg_enc_ctx;
2177 int i, v, ret;
2178
2179 /* start new MPEG-1 context decoding */
2180 s->out_format = FMT_MPEG1;
2181 if (s1->mpeg_enc_ctx_allocated) {
2182 ff_mpv_common_end(s);
2183 s1->mpeg_enc_ctx_allocated = 0;
2184 }
2185 s->width = avctx->coded_width;
2186 s->height = avctx->coded_height;
2187 avctx->has_b_frames = 0; // true?
2188 s->low_delay = 1;
2189
2190 avctx->pix_fmt = mpeg_get_pixelformat(avctx);
2191 setup_hwaccel_for_pixfmt(avctx);
2192
2193 ff_mpv_idct_init(s);
2194 if ((ret = ff_mpv_common_init(s)) < 0)
2195 return ret;
2196 s1->mpeg_enc_ctx_allocated = 1;
2197
2198 for (i = 0; i < 64; i++) {
2199 int j = s->idsp.idct_permutation[i];
2200 v = ff_mpeg1_default_intra_matrix[i];
2201 s->intra_matrix[j] = v;
2202 s->chroma_intra_matrix[j] = v;
2203
2204 v = ff_mpeg1_default_non_intra_matrix[i];
2205 s->inter_matrix[j] = v;
2206 s->chroma_inter_matrix[j] = v;
2207 }
2208
2209 s->progressive_sequence = 1;
2210 s->progressive_frame = 1;
2211 s->picture_structure = PICT_FRAME;
2212 s->first_field = 0;
2213 s->frame_pred_frame_dct = 1;
2214 s->chroma_format = 1;
2215 if (s->codec_tag == AV_RL32("BW10")) {
2216 s->codec_id = s->avctx->codec_id = AV_CODEC_ID_MPEG1VIDEO;
2217 } else {
2218 s->swap_uv = 1; // in case of xvmc we need to swap uv for each MB
2219 s->codec_id = s->avctx->codec_id = AV_CODEC_ID_MPEG2VIDEO;
2220 }
2221 s1->save_width = s->width;
2222 s1->save_height = s->height;
2223 s1->save_progressive_seq = s->progressive_sequence;
2224 return 0;
2225 }
2226
mpeg_decode_a53_cc(AVCodecContext * avctx,const uint8_t * p,int buf_size)2227 static int mpeg_decode_a53_cc(AVCodecContext *avctx,
2228 const uint8_t *p, int buf_size)
2229 {
2230 Mpeg1Context *s1 = avctx->priv_data;
2231
2232 if (buf_size >= 6 &&
2233 p[0] == 'G' && p[1] == 'A' && p[2] == '9' && p[3] == '4' &&
2234 p[4] == 3 && (p[5] & 0x40)) {
2235 /* extract A53 Part 4 CC data */
2236 int cc_count = p[5] & 0x1f;
2237 if (cc_count > 0 && buf_size >= 7 + cc_count * 3) {
2238 int old_size = s1->a53_buf_ref ? s1->a53_buf_ref->size : 0;
2239 const uint64_t new_size = (old_size + cc_count
2240 * UINT64_C(3));
2241 int ret;
2242
2243 if (new_size > 3*A53_MAX_CC_COUNT)
2244 return AVERROR(EINVAL);
2245
2246 ret = av_buffer_realloc(&s1->a53_buf_ref, new_size);
2247 if (ret >= 0)
2248 memcpy(s1->a53_buf_ref->data + old_size, p + 7, cc_count * UINT64_C(3));
2249
2250 avctx->properties |= FF_CODEC_PROPERTY_CLOSED_CAPTIONS;
2251 }
2252 return 1;
2253 } else if (buf_size >= 2 &&
2254 p[0] == 0x03 && (p[1]&0x7f) == 0x01) {
2255 /* extract SCTE-20 CC data */
2256 GetBitContext gb;
2257 int cc_count = 0;
2258 int i, ret;
2259
2260 init_get_bits(&gb, p + 2, buf_size - 2);
2261 cc_count = get_bits(&gb, 5);
2262 if (cc_count > 0) {
2263 int old_size = s1->a53_buf_ref ? s1->a53_buf_ref->size : 0;
2264 const uint64_t new_size = (old_size + cc_count
2265 * UINT64_C(3));
2266 if (new_size > 3*A53_MAX_CC_COUNT)
2267 return AVERROR(EINVAL);
2268
2269 ret = av_buffer_realloc(&s1->a53_buf_ref, new_size);
2270 if (ret >= 0) {
2271 uint8_t field, cc1, cc2;
2272 uint8_t *cap = s1->a53_buf_ref->data;
2273
2274 memset(s1->a53_buf_ref->data + old_size, 0, cc_count * 3);
2275 for (i = 0; i < cc_count && get_bits_left(&gb) >= 26; i++) {
2276 skip_bits(&gb, 2); // priority
2277 field = get_bits(&gb, 2);
2278 skip_bits(&gb, 5); // line_offset
2279 cc1 = get_bits(&gb, 8);
2280 cc2 = get_bits(&gb, 8);
2281 skip_bits(&gb, 1); // marker
2282
2283 if (!field) { // forbidden
2284 cap[0] = cap[1] = cap[2] = 0x00;
2285 } else {
2286 field = (field == 2 ? 1 : 0);
2287 if (!s1->mpeg_enc_ctx.top_field_first) field = !field;
2288 cap[0] = 0x04 | field;
2289 cap[1] = ff_reverse[cc1];
2290 cap[2] = ff_reverse[cc2];
2291 }
2292 cap += 3;
2293 }
2294 }
2295 avctx->properties |= FF_CODEC_PROPERTY_CLOSED_CAPTIONS;
2296 }
2297 return 1;
2298 } else if (buf_size >= 11 &&
2299 p[0] == 'C' && p[1] == 'C' && p[2] == 0x01 && p[3] == 0xf8) {
2300 /* extract DVD CC data
2301 *
2302 * uint32_t user_data_start_code 0x000001B2 (big endian)
2303 * uint16_t user_identifier 0x4343 "CC"
2304 * uint8_t user_data_type_code 0x01
2305 * uint8_t caption_block_size 0xF8
2306 * uint8_t
2307 * bit 7 caption_odd_field_first 1=odd field (CC1/CC2) first 0=even field (CC3/CC4) first
2308 * bit 6 caption_filler 0
2309 * bit 5:1 caption_block_count number of caption blocks (pairs of caption words = frames). Most DVDs use 15 per start of GOP.
2310 * bit 0 caption_extra_field_added 1=one additional caption word
2311 *
2312 * struct caption_field_block {
2313 * uint8_t
2314 * bit 7:1 caption_filler 0x7F (all 1s)
2315 * bit 0 caption_field_odd 1=odd field (this is CC1/CC2) 0=even field (this is CC3/CC4)
2316 * uint8_t caption_first_byte
2317 * uint8_t caption_second_byte
2318 * } caption_block[(caption_block_count * 2) + caption_extra_field_added];
2319 *
2320 * Some DVDs encode caption data for both fields with caption_field_odd=1. The only way to decode the fields
2321 * correctly is to start on the field indicated by caption_odd_field_first and count between odd/even fields.
2322 * Don't assume that the first caption word is the odd field. There do exist MPEG files in the wild that start
2323 * on the even field. There also exist DVDs in the wild that encode an odd field count and the
2324 * caption_extra_field_added/caption_odd_field_first bits change per packet to allow that. */
2325 int cc_count = 0;
2326 int i, ret;
2327 // There is a caption count field in the data, but it is often
2328 // incorrect. So count the number of captions present.
2329 for (i = 5; i + 6 <= buf_size && ((p[i] & 0xfe) == 0xfe); i += 6)
2330 cc_count++;
2331 // Transform the DVD format into A53 Part 4 format
2332 if (cc_count > 0) {
2333 int old_size = s1->a53_buf_ref ? s1->a53_buf_ref->size : 0;
2334 const uint64_t new_size = (old_size + cc_count
2335 * UINT64_C(6));
2336 if (new_size > 3*A53_MAX_CC_COUNT)
2337 return AVERROR(EINVAL);
2338
2339 ret = av_buffer_realloc(&s1->a53_buf_ref, new_size);
2340 if (ret >= 0) {
2341 uint8_t field1 = !!(p[4] & 0x80);
2342 uint8_t *cap = s1->a53_buf_ref->data;
2343 p += 5;
2344 for (i = 0; i < cc_count; i++) {
2345 cap[0] = (p[0] == 0xff && field1) ? 0xfc : 0xfd;
2346 cap[1] = p[1];
2347 cap[2] = p[2];
2348 cap[3] = (p[3] == 0xff && !field1) ? 0xfc : 0xfd;
2349 cap[4] = p[4];
2350 cap[5] = p[5];
2351 cap += 6;
2352 p += 6;
2353 }
2354 }
2355 avctx->properties |= FF_CODEC_PROPERTY_CLOSED_CAPTIONS;
2356 }
2357 return 1;
2358 }
2359 return 0;
2360 }
2361
mpeg_decode_user_data(AVCodecContext * avctx,const uint8_t * p,int buf_size)2362 static void mpeg_decode_user_data(AVCodecContext *avctx,
2363 const uint8_t *p, int buf_size)
2364 {
2365 Mpeg1Context *s = avctx->priv_data;
2366 const uint8_t *buf_end = p + buf_size;
2367 Mpeg1Context *s1 = avctx->priv_data;
2368
2369 #if 0
2370 int i;
2371 for(i=0; !(!p[i-2] && !p[i-1] && p[i]==1) && i<buf_size; i++){
2372 av_log(avctx, AV_LOG_ERROR, "%c", p[i]);
2373 }
2374 av_log(avctx, AV_LOG_ERROR, "\n");
2375 #endif
2376
2377 if (buf_size > 29){
2378 int i;
2379 for(i=0; i<20; i++)
2380 if (!memcmp(p+i, "\0TMPGEXS\0", 9)){
2381 s->tmpgexs= 1;
2382 }
2383 }
2384 /* we parse the DTG active format information */
2385 if (buf_end - p >= 5 &&
2386 p[0] == 'D' && p[1] == 'T' && p[2] == 'G' && p[3] == '1') {
2387 int flags = p[4];
2388 p += 5;
2389 if (flags & 0x80) {
2390 /* skip event id */
2391 p += 2;
2392 }
2393 if (flags & 0x40) {
2394 if (buf_end - p < 1)
2395 return;
2396 s1->has_afd = 1;
2397 s1->afd = p[0] & 0x0f;
2398 }
2399 } else if (buf_end - p >= 6 &&
2400 p[0] == 'J' && p[1] == 'P' && p[2] == '3' && p[3] == 'D' &&
2401 p[4] == 0x03) { // S3D_video_format_length
2402 // the 0x7F mask ignores the reserved_bit value
2403 const uint8_t S3D_video_format_type = p[5] & 0x7F;
2404
2405 if (S3D_video_format_type == 0x03 ||
2406 S3D_video_format_type == 0x04 ||
2407 S3D_video_format_type == 0x08 ||
2408 S3D_video_format_type == 0x23) {
2409
2410 s1->has_stereo3d = 1;
2411
2412 switch (S3D_video_format_type) {
2413 case 0x03:
2414 s1->stereo3d.type = AV_STEREO3D_SIDEBYSIDE;
2415 break;
2416 case 0x04:
2417 s1->stereo3d.type = AV_STEREO3D_TOPBOTTOM;
2418 break;
2419 case 0x08:
2420 s1->stereo3d.type = AV_STEREO3D_2D;
2421 break;
2422 case 0x23:
2423 s1->stereo3d.type = AV_STEREO3D_SIDEBYSIDE_QUINCUNX;
2424 break;
2425 }
2426 }
2427 } else if (mpeg_decode_a53_cc(avctx, p, buf_size)) {
2428 return;
2429 }
2430 }
2431
mpeg_decode_gop(AVCodecContext * avctx,const uint8_t * buf,int buf_size)2432 static void mpeg_decode_gop(AVCodecContext *avctx,
2433 const uint8_t *buf, int buf_size)
2434 {
2435 Mpeg1Context *s1 = avctx->priv_data;
2436 MpegEncContext *s = &s1->mpeg_enc_ctx;
2437 int broken_link;
2438 int64_t tc;
2439
2440 init_get_bits(&s->gb, buf, buf_size * 8);
2441
2442 tc = s-> timecode_frame_start = get_bits(&s->gb, 25);
2443
2444 #if FF_API_PRIVATE_OPT
2445 FF_DISABLE_DEPRECATION_WARNINGS
2446 avctx->timecode_frame_start = tc;
2447 FF_ENABLE_DEPRECATION_WARNINGS
2448 #endif
2449
2450 s->closed_gop = get_bits1(&s->gb);
2451 /* broken_link indicates that after editing the
2452 * reference frames of the first B-Frames after GOP I-Frame
2453 * are missing (open gop) */
2454 broken_link = get_bits1(&s->gb);
2455
2456 if (s->avctx->debug & FF_DEBUG_PICT_INFO) {
2457 char tcbuf[AV_TIMECODE_STR_SIZE];
2458 av_timecode_make_mpeg_tc_string(tcbuf, tc);
2459 av_log(s->avctx, AV_LOG_DEBUG,
2460 "GOP (%s) closed_gop=%d broken_link=%d\n",
2461 tcbuf, s->closed_gop, broken_link);
2462 }
2463 }
2464
decode_chunks(AVCodecContext * avctx,AVFrame * picture,int * got_output,const uint8_t * buf,int buf_size)2465 static int decode_chunks(AVCodecContext *avctx, AVFrame *picture,
2466 int *got_output, const uint8_t *buf, int buf_size)
2467 {
2468 Mpeg1Context *s = avctx->priv_data;
2469 MpegEncContext *s2 = &s->mpeg_enc_ctx;
2470 const uint8_t *buf_ptr = buf;
2471 const uint8_t *buf_end = buf + buf_size;
2472 int ret, input_size;
2473 int last_code = 0, skip_frame = 0;
2474 int picture_start_code_seen = 0;
2475
2476 for (;;) {
2477 /* find next start code */
2478 uint32_t start_code = -1;
2479 buf_ptr = avpriv_find_start_code(buf_ptr, buf_end, &start_code);
2480 if (start_code > 0x1ff) {
2481 if (!skip_frame) {
2482 if (HAVE_THREADS &&
2483 (avctx->active_thread_type & FF_THREAD_SLICE) &&
2484 !avctx->hwaccel) {
2485 int i;
2486 av_assert0(avctx->thread_count > 1);
2487
2488 avctx->execute(avctx, slice_decode_thread,
2489 &s2->thread_context[0], NULL,
2490 s->slice_count, sizeof(void *));
2491 for (i = 0; i < s->slice_count; i++)
2492 s2->er.error_count += s2->thread_context[i]->er.error_count;
2493 }
2494
2495 ret = slice_end(avctx, picture);
2496 if (ret < 0)
2497 return ret;
2498 else if (ret) {
2499 // FIXME: merge with the stuff in mpeg_decode_slice
2500 if (s2->last_picture_ptr || s2->low_delay || s2->pict_type == AV_PICTURE_TYPE_B)
2501 *got_output = 1;
2502 }
2503 }
2504 s2->pict_type = 0;
2505
2506 if (avctx->err_recognition & AV_EF_EXPLODE && s2->er.error_count)
2507 return AVERROR_INVALIDDATA;
2508
2509 return FFMAX(0, buf_ptr - buf - s2->parse_context.last_index);
2510 }
2511
2512 input_size = buf_end - buf_ptr;
2513
2514 if (avctx->debug & FF_DEBUG_STARTCODE)
2515 av_log(avctx, AV_LOG_DEBUG, "%3"PRIX32" at %"PTRDIFF_SPECIFIER" left %d\n",
2516 start_code, buf_ptr - buf, input_size);
2517
2518 /* prepare data for next start code */
2519 switch (start_code) {
2520 case SEQ_START_CODE:
2521 if (last_code == 0) {
2522 mpeg1_decode_sequence(avctx, buf_ptr, input_size);
2523 if (buf != avctx->extradata)
2524 s->sync = 1;
2525 } else {
2526 av_log(avctx, AV_LOG_ERROR,
2527 "ignoring SEQ_START_CODE after %X\n", last_code);
2528 if (avctx->err_recognition & AV_EF_EXPLODE)
2529 return AVERROR_INVALIDDATA;
2530 }
2531 break;
2532
2533 case PICTURE_START_CODE:
2534 if (picture_start_code_seen && s2->picture_structure == PICT_FRAME) {
2535 /* If it's a frame picture, there can't be more than one picture header.
2536 Yet, it does happen and we need to handle it. */
2537 av_log(avctx, AV_LOG_WARNING, "ignoring extra picture following a frame-picture\n");
2538 break;
2539 }
2540 picture_start_code_seen = 1;
2541
2542 if (s2->width <= 0 || s2->height <= 0) {
2543 av_log(avctx, AV_LOG_ERROR, "Invalid frame dimensions %dx%d.\n",
2544 s2->width, s2->height);
2545 return AVERROR_INVALIDDATA;
2546 }
2547
2548 if (s->tmpgexs){
2549 s2->intra_dc_precision= 3;
2550 s2->intra_matrix[0]= 1;
2551 }
2552 if (HAVE_THREADS && (avctx->active_thread_type & FF_THREAD_SLICE) &&
2553 !avctx->hwaccel && s->slice_count) {
2554 int i;
2555
2556 avctx->execute(avctx, slice_decode_thread,
2557 s2->thread_context, NULL,
2558 s->slice_count, sizeof(void *));
2559 for (i = 0; i < s->slice_count; i++)
2560 s2->er.error_count += s2->thread_context[i]->er.error_count;
2561 s->slice_count = 0;
2562 }
2563 if (last_code == 0 || last_code == SLICE_MIN_START_CODE) {
2564 ret = mpeg_decode_postinit(avctx);
2565 if (ret < 0) {
2566 av_log(avctx, AV_LOG_ERROR,
2567 "mpeg_decode_postinit() failure\n");
2568 return ret;
2569 }
2570
2571 /* We have a complete image: we try to decompress it. */
2572 if (mpeg1_decode_picture(avctx, buf_ptr, input_size) < 0)
2573 s2->pict_type = 0;
2574 s->first_slice = 1;
2575 last_code = PICTURE_START_CODE;
2576 } else {
2577 av_log(avctx, AV_LOG_ERROR,
2578 "ignoring pic after %X\n", last_code);
2579 if (avctx->err_recognition & AV_EF_EXPLODE)
2580 return AVERROR_INVALIDDATA;
2581 }
2582 break;
2583 case EXT_START_CODE:
2584 init_get_bits(&s2->gb, buf_ptr, input_size * 8);
2585
2586 switch (get_bits(&s2->gb, 4)) {
2587 case 0x1:
2588 if (last_code == 0) {
2589 mpeg_decode_sequence_extension(s);
2590 } else {
2591 av_log(avctx, AV_LOG_ERROR,
2592 "ignoring seq ext after %X\n", last_code);
2593 if (avctx->err_recognition & AV_EF_EXPLODE)
2594 return AVERROR_INVALIDDATA;
2595 }
2596 break;
2597 case 0x2:
2598 mpeg_decode_sequence_display_extension(s);
2599 break;
2600 case 0x3:
2601 mpeg_decode_quant_matrix_extension(s2);
2602 break;
2603 case 0x7:
2604 mpeg_decode_picture_display_extension(s);
2605 break;
2606 case 0x8:
2607 if (last_code == PICTURE_START_CODE) {
2608 mpeg_decode_picture_coding_extension(s);
2609 } else {
2610 av_log(avctx, AV_LOG_ERROR,
2611 "ignoring pic cod ext after %X\n", last_code);
2612 if (avctx->err_recognition & AV_EF_EXPLODE)
2613 return AVERROR_INVALIDDATA;
2614 }
2615 break;
2616 }
2617 break;
2618 case USER_START_CODE:
2619 mpeg_decode_user_data(avctx, buf_ptr, input_size);
2620 break;
2621 case GOP_START_CODE:
2622 if (last_code == 0) {
2623 s2->first_field = 0;
2624 mpeg_decode_gop(avctx, buf_ptr, input_size);
2625 s->sync = 1;
2626 } else {
2627 av_log(avctx, AV_LOG_ERROR,
2628 "ignoring GOP_START_CODE after %X\n", last_code);
2629 if (avctx->err_recognition & AV_EF_EXPLODE)
2630 return AVERROR_INVALIDDATA;
2631 }
2632 break;
2633 default:
2634 if (start_code >= SLICE_MIN_START_CODE &&
2635 start_code <= SLICE_MAX_START_CODE && last_code == PICTURE_START_CODE) {
2636 if (s2->progressive_sequence && !s2->progressive_frame) {
2637 s2->progressive_frame = 1;
2638 av_log(s2->avctx, AV_LOG_ERROR,
2639 "interlaced frame in progressive sequence, ignoring\n");
2640 }
2641
2642 if (s2->picture_structure == 0 ||
2643 (s2->progressive_frame && s2->picture_structure != PICT_FRAME)) {
2644 av_log(s2->avctx, AV_LOG_ERROR,
2645 "picture_structure %d invalid, ignoring\n",
2646 s2->picture_structure);
2647 s2->picture_structure = PICT_FRAME;
2648 }
2649
2650 if (s2->progressive_sequence && !s2->frame_pred_frame_dct)
2651 av_log(s2->avctx, AV_LOG_WARNING, "invalid frame_pred_frame_dct\n");
2652
2653 if (s2->picture_structure == PICT_FRAME) {
2654 s2->first_field = 0;
2655 s2->v_edge_pos = 16 * s2->mb_height;
2656 } else {
2657 s2->first_field ^= 1;
2658 s2->v_edge_pos = 8 * s2->mb_height;
2659 memset(s2->mbskip_table, 0, s2->mb_stride * s2->mb_height);
2660 }
2661 }
2662 if (start_code >= SLICE_MIN_START_CODE &&
2663 start_code <= SLICE_MAX_START_CODE && last_code != 0) {
2664 const int field_pic = s2->picture_structure != PICT_FRAME;
2665 int mb_y = start_code - SLICE_MIN_START_CODE;
2666 last_code = SLICE_MIN_START_CODE;
2667 if (s2->codec_id != AV_CODEC_ID_MPEG1VIDEO && s2->mb_height > 2800/16)
2668 mb_y += (*buf_ptr&0xE0)<<2;
2669
2670 mb_y <<= field_pic;
2671 if (s2->picture_structure == PICT_BOTTOM_FIELD)
2672 mb_y++;
2673
2674 if (buf_end - buf_ptr < 2) {
2675 av_log(s2->avctx, AV_LOG_ERROR, "slice too small\n");
2676 return AVERROR_INVALIDDATA;
2677 }
2678
2679 if (mb_y >= s2->mb_height) {
2680 av_log(s2->avctx, AV_LOG_ERROR,
2681 "slice below image (%d >= %d)\n", mb_y, s2->mb_height);
2682 return AVERROR_INVALIDDATA;
2683 }
2684
2685 if (!s2->last_picture_ptr) {
2686 /* Skip B-frames if we do not have reference frames and
2687 * GOP is not closed. */
2688 if (s2->pict_type == AV_PICTURE_TYPE_B) {
2689 if (!s2->closed_gop) {
2690 skip_frame = 1;
2691 av_log(s2->avctx, AV_LOG_DEBUG,
2692 "Skipping B slice due to open GOP\n");
2693 break;
2694 }
2695 }
2696 }
2697 if (s2->pict_type == AV_PICTURE_TYPE_I || (s2->avctx->flags2 & AV_CODEC_FLAG2_SHOW_ALL))
2698 s->sync = 1;
2699 if (!s2->next_picture_ptr) {
2700 /* Skip P-frames if we do not have a reference frame or
2701 * we have an invalid header. */
2702 if (s2->pict_type == AV_PICTURE_TYPE_P && !s->sync) {
2703 skip_frame = 1;
2704 av_log(s2->avctx, AV_LOG_DEBUG,
2705 "Skipping P slice due to !sync\n");
2706 break;
2707 }
2708 }
2709 if ((avctx->skip_frame >= AVDISCARD_NONREF &&
2710 s2->pict_type == AV_PICTURE_TYPE_B) ||
2711 (avctx->skip_frame >= AVDISCARD_NONKEY &&
2712 s2->pict_type != AV_PICTURE_TYPE_I) ||
2713 avctx->skip_frame >= AVDISCARD_ALL) {
2714 skip_frame = 1;
2715 break;
2716 }
2717
2718 if (!s->mpeg_enc_ctx_allocated)
2719 break;
2720
2721 if (s2->codec_id == AV_CODEC_ID_MPEG2VIDEO) {
2722 if (mb_y < avctx->skip_top ||
2723 mb_y >= s2->mb_height - avctx->skip_bottom)
2724 break;
2725 }
2726
2727 if (!s2->pict_type) {
2728 av_log(avctx, AV_LOG_ERROR, "Missing picture start code\n");
2729 if (avctx->err_recognition & AV_EF_EXPLODE)
2730 return AVERROR_INVALIDDATA;
2731 break;
2732 }
2733
2734 if (s->first_slice) {
2735 skip_frame = 0;
2736 s->first_slice = 0;
2737 if ((ret = mpeg_field_start(s2, buf, buf_size)) < 0)
2738 return ret;
2739 }
2740 if (!s2->current_picture_ptr) {
2741 av_log(avctx, AV_LOG_ERROR,
2742 "current_picture not initialized\n");
2743 return AVERROR_INVALIDDATA;
2744 }
2745
2746 if (HAVE_THREADS &&
2747 (avctx->active_thread_type & FF_THREAD_SLICE) &&
2748 !avctx->hwaccel) {
2749 int threshold = (s2->mb_height * s->slice_count +
2750 s2->slice_context_count / 2) /
2751 s2->slice_context_count;
2752 av_assert0(avctx->thread_count > 1);
2753 if (threshold <= mb_y) {
2754 MpegEncContext *thread_context = s2->thread_context[s->slice_count];
2755
2756 thread_context->start_mb_y = mb_y;
2757 thread_context->end_mb_y = s2->mb_height;
2758 if (s->slice_count) {
2759 s2->thread_context[s->slice_count - 1]->end_mb_y = mb_y;
2760 ret = ff_update_duplicate_context(thread_context, s2);
2761 if (ret < 0)
2762 return ret;
2763 }
2764 init_get_bits(&thread_context->gb, buf_ptr, input_size * 8);
2765 s->slice_count++;
2766 }
2767 buf_ptr += 2; // FIXME add minimum number of bytes per slice
2768 } else {
2769 ret = mpeg_decode_slice(s2, mb_y, &buf_ptr, input_size);
2770 emms_c();
2771
2772 if (ret < 0) {
2773 if (avctx->err_recognition & AV_EF_EXPLODE)
2774 return ret;
2775 if (s2->resync_mb_x >= 0 && s2->resync_mb_y >= 0)
2776 ff_er_add_slice(&s2->er, s2->resync_mb_x,
2777 s2->resync_mb_y, s2->mb_x, s2->mb_y,
2778 ER_AC_ERROR | ER_DC_ERROR | ER_MV_ERROR);
2779 } else {
2780 ff_er_add_slice(&s2->er, s2->resync_mb_x,
2781 s2->resync_mb_y, s2->mb_x - 1, s2->mb_y,
2782 ER_AC_END | ER_DC_END | ER_MV_END);
2783 }
2784 }
2785 }
2786 break;
2787 }
2788 }
2789 }
2790
mpeg_decode_frame(AVCodecContext * avctx,void * data,int * got_output,AVPacket * avpkt)2791 static int mpeg_decode_frame(AVCodecContext *avctx, void *data,
2792 int *got_output, AVPacket *avpkt)
2793 {
2794 const uint8_t *buf = avpkt->data;
2795 int ret;
2796 int buf_size = avpkt->size;
2797 Mpeg1Context *s = avctx->priv_data;
2798 AVFrame *picture = data;
2799 MpegEncContext *s2 = &s->mpeg_enc_ctx;
2800
2801 if (buf_size == 0 || (buf_size == 4 && AV_RB32(buf) == SEQ_END_CODE)) {
2802 /* special case for last picture */
2803 if (s2->low_delay == 0 && s2->next_picture_ptr) {
2804 int ret = av_frame_ref(picture, s2->next_picture_ptr->f);
2805 if (ret < 0)
2806 return ret;
2807
2808 s2->next_picture_ptr = NULL;
2809
2810 *got_output = 1;
2811 }
2812 return buf_size;
2813 }
2814
2815 if (s2->avctx->flags & AV_CODEC_FLAG_TRUNCATED) {
2816 int next = ff_mpeg1_find_frame_end(&s2->parse_context, buf,
2817 buf_size, NULL);
2818
2819 if (ff_combine_frame(&s2->parse_context, next,
2820 (const uint8_t **) &buf, &buf_size) < 0)
2821 return buf_size;
2822 }
2823
2824 s2->codec_tag = avpriv_toupper4(avctx->codec_tag);
2825 if (s->mpeg_enc_ctx_allocated == 0 && ( s2->codec_tag == AV_RL32("VCR2")
2826 || s2->codec_tag == AV_RL32("BW10")
2827 ))
2828 vcr2_init_sequence(avctx);
2829
2830 s->slice_count = 0;
2831
2832 if (avctx->extradata && !s->extradata_decoded) {
2833 ret = decode_chunks(avctx, picture, got_output,
2834 avctx->extradata, avctx->extradata_size);
2835 if (*got_output) {
2836 av_log(avctx, AV_LOG_ERROR, "picture in extradata\n");
2837 av_frame_unref(picture);
2838 *got_output = 0;
2839 }
2840 s->extradata_decoded = 1;
2841 if (ret < 0 && (avctx->err_recognition & AV_EF_EXPLODE)) {
2842 s2->current_picture_ptr = NULL;
2843 return ret;
2844 }
2845 }
2846
2847 ret = decode_chunks(avctx, picture, got_output, buf, buf_size);
2848 if (ret<0 || *got_output) {
2849 s2->current_picture_ptr = NULL;
2850
2851 if (s2->timecode_frame_start != -1 && *got_output) {
2852 char tcbuf[AV_TIMECODE_STR_SIZE];
2853 AVFrameSideData *tcside = av_frame_new_side_data(picture,
2854 AV_FRAME_DATA_GOP_TIMECODE,
2855 sizeof(int64_t));
2856 if (!tcside)
2857 return AVERROR(ENOMEM);
2858 memcpy(tcside->data, &s2->timecode_frame_start, sizeof(int64_t));
2859
2860 av_timecode_make_mpeg_tc_string(tcbuf, s2->timecode_frame_start);
2861 av_dict_set(&picture->metadata, "timecode", tcbuf, 0);
2862
2863 s2->timecode_frame_start = -1;
2864 }
2865 }
2866
2867 return ret;
2868 }
2869
flush(AVCodecContext * avctx)2870 static void flush(AVCodecContext *avctx)
2871 {
2872 Mpeg1Context *s = avctx->priv_data;
2873
2874 s->sync = 0;
2875
2876 ff_mpeg_flush(avctx);
2877 }
2878
mpeg_decode_end(AVCodecContext * avctx)2879 static av_cold int mpeg_decode_end(AVCodecContext *avctx)
2880 {
2881 Mpeg1Context *s = avctx->priv_data;
2882
2883 if (s->mpeg_enc_ctx_allocated)
2884 ff_mpv_common_end(&s->mpeg_enc_ctx);
2885 av_buffer_unref(&s->a53_buf_ref);
2886 return 0;
2887 }
2888
2889 AVCodec ff_mpeg1video_decoder = {
2890 .name = "mpeg1video",
2891 .long_name = NULL_IF_CONFIG_SMALL("MPEG-1 video"),
2892 .type = AVMEDIA_TYPE_VIDEO,
2893 .id = AV_CODEC_ID_MPEG1VIDEO,
2894 .priv_data_size = sizeof(Mpeg1Context),
2895 .init = mpeg_decode_init,
2896 .close = mpeg_decode_end,
2897 .decode = mpeg_decode_frame,
2898 .capabilities = AV_CODEC_CAP_DRAW_HORIZ_BAND | AV_CODEC_CAP_DR1 |
2899 AV_CODEC_CAP_TRUNCATED | AV_CODEC_CAP_DELAY |
2900 AV_CODEC_CAP_SLICE_THREADS,
2901 .caps_internal = FF_CODEC_CAP_INIT_THREADSAFE |
2902 FF_CODEC_CAP_SKIP_FRAME_FILL_PARAM,
2903 .flush = flush,
2904 .max_lowres = 3,
2905 .update_thread_context = ONLY_IF_THREADS_ENABLED(mpeg_decode_update_thread_context),
2906 .hw_configs = (const AVCodecHWConfigInternal *const []) {
2907 #if CONFIG_MPEG1_NVDEC_HWACCEL
2908 HWACCEL_NVDEC(mpeg1),
2909 #endif
2910 #if CONFIG_MPEG1_VDPAU_HWACCEL
2911 HWACCEL_VDPAU(mpeg1),
2912 #endif
2913 #if CONFIG_MPEG1_VIDEOTOOLBOX_HWACCEL
2914 HWACCEL_VIDEOTOOLBOX(mpeg1),
2915 #endif
2916 #if CONFIG_MPEG1_XVMC_HWACCEL
2917 HWACCEL_XVMC(mpeg1),
2918 #endif
2919 NULL
2920 },
2921 };
2922
2923 AVCodec ff_mpeg2video_decoder = {
2924 .name = "mpeg2video",
2925 .long_name = NULL_IF_CONFIG_SMALL("MPEG-2 video"),
2926 .type = AVMEDIA_TYPE_VIDEO,
2927 .id = AV_CODEC_ID_MPEG2VIDEO,
2928 .priv_data_size = sizeof(Mpeg1Context),
2929 .init = mpeg_decode_init,
2930 .close = mpeg_decode_end,
2931 .decode = mpeg_decode_frame,
2932 .capabilities = AV_CODEC_CAP_DRAW_HORIZ_BAND | AV_CODEC_CAP_DR1 |
2933 AV_CODEC_CAP_TRUNCATED | AV_CODEC_CAP_DELAY |
2934 AV_CODEC_CAP_SLICE_THREADS,
2935 .caps_internal = FF_CODEC_CAP_INIT_THREADSAFE |
2936 FF_CODEC_CAP_SKIP_FRAME_FILL_PARAM,
2937 .flush = flush,
2938 .max_lowres = 3,
2939 .profiles = NULL_IF_CONFIG_SMALL(ff_mpeg2_video_profiles),
2940 .hw_configs = (const AVCodecHWConfigInternal *const []) {
2941 #if CONFIG_MPEG2_DXVA2_HWACCEL
2942 HWACCEL_DXVA2(mpeg2),
2943 #endif
2944 #if CONFIG_MPEG2_D3D11VA_HWACCEL
2945 HWACCEL_D3D11VA(mpeg2),
2946 #endif
2947 #if CONFIG_MPEG2_D3D11VA2_HWACCEL
2948 HWACCEL_D3D11VA2(mpeg2),
2949 #endif
2950 #if CONFIG_MPEG2_NVDEC_HWACCEL
2951 HWACCEL_NVDEC(mpeg2),
2952 #endif
2953 #if CONFIG_MPEG2_VAAPI_HWACCEL
2954 HWACCEL_VAAPI(mpeg2),
2955 #endif
2956 #if CONFIG_MPEG2_VDPAU_HWACCEL
2957 HWACCEL_VDPAU(mpeg2),
2958 #endif
2959 #if CONFIG_MPEG2_VIDEOTOOLBOX_HWACCEL
2960 HWACCEL_VIDEOTOOLBOX(mpeg2),
2961 #endif
2962 #if CONFIG_MPEG2_XVMC_HWACCEL
2963 HWACCEL_XVMC(mpeg2),
2964 #endif
2965 NULL
2966 },
2967 };
2968
2969 //legacy decoder
2970 AVCodec ff_mpegvideo_decoder = {
2971 .name = "mpegvideo",
2972 .long_name = NULL_IF_CONFIG_SMALL("MPEG-1 video"),
2973 .type = AVMEDIA_TYPE_VIDEO,
2974 .id = AV_CODEC_ID_MPEG2VIDEO,
2975 .priv_data_size = sizeof(Mpeg1Context),
2976 .init = mpeg_decode_init,
2977 .close = mpeg_decode_end,
2978 .decode = mpeg_decode_frame,
2979 .capabilities = AV_CODEC_CAP_DRAW_HORIZ_BAND | AV_CODEC_CAP_DR1 | AV_CODEC_CAP_TRUNCATED | AV_CODEC_CAP_DELAY | AV_CODEC_CAP_SLICE_THREADS,
2980 .caps_internal = FF_CODEC_CAP_INIT_THREADSAFE |
2981 FF_CODEC_CAP_SKIP_FRAME_FILL_PARAM,
2982 .flush = flush,
2983 .max_lowres = 3,
2984 };
2985
2986 typedef struct IPUContext {
2987 MpegEncContext m;
2988
2989 int flags;
2990 DECLARE_ALIGNED(32, int16_t, block)[6][64];
2991 } IPUContext;
2992
ipu_decode_frame(AVCodecContext * avctx,void * data,int * got_frame,AVPacket * avpkt)2993 static int ipu_decode_frame(AVCodecContext *avctx, void *data,
2994 int *got_frame, AVPacket *avpkt)
2995 {
2996 IPUContext *s = avctx->priv_data;
2997 MpegEncContext *m = &s->m;
2998 GetBitContext *gb = &m->gb;
2999 AVFrame * const frame = data;
3000 int ret;
3001
3002 ret = ff_get_buffer(avctx, frame, 0);
3003 if (ret < 0)
3004 return ret;
3005
3006 ret = init_get_bits8(gb, avpkt->data, avpkt->size);
3007 if (ret < 0)
3008 return ret;
3009
3010 s->flags = get_bits(gb, 8);
3011 m->intra_dc_precision = s->flags & 3;
3012 m->q_scale_type = !!(s->flags & 0x40);
3013 m->intra_vlc_format = !!(s->flags & 0x20);
3014 m->alternate_scan = !!(s->flags & 0x10);
3015
3016 if (s->flags & 0x10) {
3017 ff_init_scantable(m->idsp.idct_permutation, &m->inter_scantable, ff_alternate_vertical_scan);
3018 ff_init_scantable(m->idsp.idct_permutation, &m->intra_scantable, ff_alternate_vertical_scan);
3019 } else {
3020 ff_init_scantable(m->idsp.idct_permutation, &m->inter_scantable, ff_zigzag_direct);
3021 ff_init_scantable(m->idsp.idct_permutation, &m->intra_scantable, ff_zigzag_direct);
3022 }
3023
3024 m->last_dc[0] = m->last_dc[1] = m->last_dc[2] = 1 << (7 + (s->flags & 3));
3025 m->qscale = 1;
3026
3027 for (int y = 0; y < avctx->height; y += 16) {
3028 int intraquant;
3029
3030 for (int x = 0; x < avctx->width; x += 16) {
3031 if (x || y) {
3032 if (!get_bits1(gb))
3033 return AVERROR_INVALIDDATA;
3034 }
3035 if (get_bits1(gb)) {
3036 intraquant = 0;
3037 } else {
3038 if (!get_bits1(gb))
3039 return AVERROR_INVALIDDATA;
3040 intraquant = 1;
3041 }
3042
3043 if (s->flags & 4)
3044 skip_bits1(gb);
3045
3046 if (intraquant)
3047 m->qscale = mpeg_get_qscale(m);
3048
3049 memset(s->block, 0, sizeof(s->block));
3050
3051 for (int n = 0; n < 6; n++) {
3052 if (s->flags & 0x80) {
3053 ret = ff_mpeg1_decode_block_intra(&m->gb,
3054 m->intra_matrix,
3055 m->intra_scantable.permutated,
3056 m->last_dc, s->block[n],
3057 n, m->qscale);
3058 if (ret >= 0)
3059 m->block_last_index[n] = ret;
3060 } else {
3061 ret = mpeg2_decode_block_intra(m, s->block[n], n);
3062 }
3063
3064 if (ret < 0)
3065 return ret;
3066 }
3067
3068 m->idsp.idct_put(frame->data[0] + y * frame->linesize[0] + x,
3069 frame->linesize[0], s->block[0]);
3070 m->idsp.idct_put(frame->data[0] + y * frame->linesize[0] + x + 8,
3071 frame->linesize[0], s->block[1]);
3072 m->idsp.idct_put(frame->data[0] + (y + 8) * frame->linesize[0] + x,
3073 frame->linesize[0], s->block[2]);
3074 m->idsp.idct_put(frame->data[0] + (y + 8) * frame->linesize[0] + x + 8,
3075 frame->linesize[0], s->block[3]);
3076 m->idsp.idct_put(frame->data[1] + (y >> 1) * frame->linesize[1] + (x >> 1),
3077 frame->linesize[1], s->block[4]);
3078 m->idsp.idct_put(frame->data[2] + (y >> 1) * frame->linesize[2] + (x >> 1),
3079 frame->linesize[2], s->block[5]);
3080 }
3081 }
3082
3083 align_get_bits(gb);
3084 if (get_bits_left(gb) != 32)
3085 return AVERROR_INVALIDDATA;
3086
3087 frame->pict_type = AV_PICTURE_TYPE_I;
3088 frame->key_frame = 1;
3089 *got_frame = 1;
3090
3091 return avpkt->size;
3092 }
3093
ipu_decode_init(AVCodecContext * avctx)3094 static av_cold int ipu_decode_init(AVCodecContext *avctx)
3095 {
3096 IPUContext *s = avctx->priv_data;
3097 MpegEncContext *m = &s->m;
3098
3099 avctx->pix_fmt = AV_PIX_FMT_YUV420P;
3100
3101 ff_mpv_decode_init(m, avctx);
3102 ff_mpv_idct_init(m);
3103 ff_mpeg12_common_init(m);
3104 ff_mpeg12_init_vlcs();
3105
3106 for (int i = 0; i < 64; i++) {
3107 int j = m->idsp.idct_permutation[i];
3108 int v = ff_mpeg1_default_intra_matrix[i];
3109 m->intra_matrix[j] = v;
3110 m->chroma_intra_matrix[j] = v;
3111 }
3112
3113 for (int i = 0; i < 64; i++) {
3114 int j = m->idsp.idct_permutation[i];
3115 int v = ff_mpeg1_default_non_intra_matrix[i];
3116 m->inter_matrix[j] = v;
3117 m->chroma_inter_matrix[j] = v;
3118 }
3119
3120 return 0;
3121 }
3122
ipu_decode_end(AVCodecContext * avctx)3123 static av_cold int ipu_decode_end(AVCodecContext *avctx)
3124 {
3125 IPUContext *s = avctx->priv_data;
3126
3127 ff_mpv_common_end(&s->m);
3128
3129 return 0;
3130 }
3131
3132 AVCodec ff_ipu_decoder = {
3133 .name = "ipu",
3134 .long_name = NULL_IF_CONFIG_SMALL("IPU Video"),
3135 .type = AVMEDIA_TYPE_VIDEO,
3136 .id = AV_CODEC_ID_IPU,
3137 .priv_data_size = sizeof(IPUContext),
3138 .init = ipu_decode_init,
3139 .decode = ipu_decode_frame,
3140 .close = ipu_decode_end,
3141 .capabilities = AV_CODEC_CAP_DR1,
3142 .caps_internal = FF_CODEC_CAP_INIT_THREADSAFE | FF_CODEC_CAP_INIT_CLEANUP,
3143 };
3144