2 * MPEG1 codec / MPEG2 decoder
3 * Copyright (c) 2000,2001 Fabrice Bellard.
4 * Copyright (c) 2002-2004 Michael Niedermayer <michaelni@gmx.at>
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
29 #include "mpegvideo.h"
31 #include "mpeg12data.h"
38 #define SEQ_END_CODE 0x000001b7
39 #define SEQ_START_CODE 0x000001b3
40 #define GOP_START_CODE 0x000001b8
41 #define PICTURE_START_CODE 0x00000100
42 #define SLICE_MIN_START_CODE 0x00000101
43 #define SLICE_MAX_START_CODE 0x000001af
44 #define EXT_START_CODE 0x000001b5
45 #define USER_START_CODE 0x000001b2
49 #define MBINCR_VLC_BITS 9
50 #define MB_PAT_VLC_BITS 9
51 #define MB_PTYPE_VLC_BITS 6
52 #define MB_BTYPE_VLC_BITS 6
53 #define TEX_VLC_BITS 9
55 #ifdef CONFIG_ENCODERS
56 static void mpeg1_encode_block(MpegEncContext *s,
59 static void mpeg1_encode_motion(MpegEncContext *s, int val, int f_or_b_code); // RAL: f_code parameter added
60 #endif //CONFIG_ENCODERS
61 static inline int mpeg1_decode_block_inter(MpegEncContext *s,
64 static inline int mpeg1_decode_block_intra(MpegEncContext *s,
67 static inline int mpeg1_fast_decode_block_inter(MpegEncContext *s, DCTELEM *block, int n);
68 static inline int mpeg2_decode_block_non_intra(MpegEncContext *s,
71 static inline int mpeg2_decode_block_intra(MpegEncContext *s,
74 static inline int mpeg2_fast_decode_block_non_intra(MpegEncContext *s, DCTELEM *block, int n);
75 static inline int mpeg2_fast_decode_block_intra(MpegEncContext *s, DCTELEM *block, int n);
76 static int mpeg_decode_motion(MpegEncContext *s, int fcode, int pred);
77 static void exchange_uv(MpegEncContext *s);
80 extern int XVMC_field_start(MpegEncContext *s, AVCodecContext *avctx);
81 extern int XVMC_field_end(MpegEncContext *s);
82 extern void XVMC_pack_pblocks(MpegEncContext *s,int cbp);
83 extern void XVMC_init_block(MpegEncContext *s);//set s->block
86 const enum PixelFormat pixfmt_yuv_420[]= {PIX_FMT_YUV420P,-1};
87 const enum PixelFormat pixfmt_yuv_422[]= {PIX_FMT_YUV422P,-1};
88 const enum PixelFormat pixfmt_yuv_444[]= {PIX_FMT_YUV444P,-1};
89 const enum PixelFormat pixfmt_xvmc_mpg2_420[] = {
90 PIX_FMT_XVMC_MPEG2_IDCT,
91 PIX_FMT_XVMC_MPEG2_MC,
93 #ifdef CONFIG_ENCODERS
94 static uint8_t (*mv_penalty)[MAX_MV*2+1]= NULL;
95 static uint8_t fcode_tab[MAX_MV*2+1];
97 static uint32_t uni_mpeg1_ac_vlc_bits[64*64*2];
98 static uint8_t uni_mpeg1_ac_vlc_len [64*64*2];
100 /* simple include everything table for dc, first byte is bits number next 3 are code*/
101 static uint32_t mpeg1_lum_dc_uni[512];
102 static uint32_t mpeg1_chr_dc_uni[512];
104 static uint8_t mpeg1_index_run[2][64];
105 static int8_t mpeg1_max_level[2][64];
106 #endif //CONFIG_ENCODERS
108 static void init_2d_vlc_rl(RLTable *rl, int use_static)
112 init_vlc(&rl->vlc, TEX_VLC_BITS, rl->n + 2,
113 &rl->table_vlc[0][1], 4, 2,
114 &rl->table_vlc[0][0], 4, 2, use_static);
117 rl->rl_vlc[0]= av_mallocz_static(rl->vlc.table_size*sizeof(RL_VLC_ELEM));
119 rl->rl_vlc[0]= av_malloc(rl->vlc.table_size*sizeof(RL_VLC_ELEM));
121 for(i=0; i<rl->vlc.table_size; i++){
122 int code= rl->vlc.table[i][0];
123 int len = rl->vlc.table[i][1];
126 if(len==0){ // illegal code
129 }else if(len<0){ //more bits needed
133 if(code==rl->n){ //esc
136 }else if(code==rl->n+1){ //eob
140 run= rl->table_run [code] + 1;
141 level= rl->table_level[code];
144 rl->rl_vlc[0][i].len= len;
145 rl->rl_vlc[0][i].level= level;
146 rl->rl_vlc[0][i].run= run;
150 #ifdef CONFIG_ENCODERS
151 static void init_uni_ac_vlc(RLTable *rl, uint32_t *uni_ac_vlc_bits, uint8_t *uni_ac_vlc_len){
154 for(i=0; i<128; i++){
157 for(run=0; run<64; run++){
160 int alevel= ABS(level);
161 int sign= (level>>31)&1;
163 if (alevel > rl->max_level[0][run])
166 code= rl->index_run[0][run] + alevel - 1;
168 if (code < 111 /* rl->n */) {
169 /* store the vlc & sign at once */
170 len= mpeg1_vlc[code][1]+1;
171 bits= (mpeg1_vlc[code][0]<<1) + sign;
173 len= mpeg1_vlc[111/*rl->n*/][1]+6;
174 bits= mpeg1_vlc[111/*rl->n*/][0]<<6;
184 bits|= 0x8001 + level + 255;
186 bits|= level & 0xffff;
191 uni_ac_vlc_bits[UNI_AC_ENC_INDEX(run, i)]= bits;
192 uni_ac_vlc_len [UNI_AC_ENC_INDEX(run, i)]= len;
198 static int find_frame_rate_index(MpegEncContext *s){
200 int64_t dmin= INT64_MAX;
204 int64_t n0= 1001LL/frame_rate_tab[i].den*frame_rate_tab[i].num*s->avctx->time_base.num;
205 int64_t n1= 1001LL*s->avctx->time_base.den;
206 if(s->avctx->strict_std_compliance > FF_COMPLIANCE_INOFFICIAL && i>=9) break;
211 s->frame_rate_index= i;
220 static int encode_init(AVCodecContext *avctx)
222 MpegEncContext *s = avctx->priv_data;
224 if(MPV_encode_init(avctx) < 0)
227 if(find_frame_rate_index(s) < 0){
228 if(s->strict_std_compliance > FF_COMPLIANCE_EXPERIMENTAL){
229 av_log(avctx, AV_LOG_ERROR, "MPEG1/2 does not support %d/%d fps\n", avctx->time_base.den, avctx->time_base.num);
232 av_log(avctx, AV_LOG_INFO, "MPEG1/2 does not support %d/%d fps, there may be AV sync issues\n", avctx->time_base.den, avctx->time_base.num);
239 static void put_header(MpegEncContext *s, int header)
241 align_put_bits(&s->pb);
242 put_bits(&s->pb, 16, header>>16);
243 put_bits(&s->pb, 16, header&0xFFFF);
246 /* put sequence header if needed */
247 static void mpeg1_encode_sequence_header(MpegEncContext *s)
249 unsigned int vbv_buffer_size;
253 float best_aspect_error= 1E10;
254 float aspect_ratio= av_q2d(s->avctx->sample_aspect_ratio);
255 int constraint_parameter_flag;
257 if(aspect_ratio==0.0) aspect_ratio= 1.0; //pixel aspect 1:1 (VGA)
259 if (s->current_picture.key_frame) {
260 AVRational framerate= frame_rate_tab[s->frame_rate_index];
262 /* mpeg1 header repeated every gop */
263 put_header(s, SEQ_START_CODE);
265 put_bits(&s->pb, 12, s->width);
266 put_bits(&s->pb, 12, s->height);
269 float error= aspect_ratio;
270 if(s->codec_id == CODEC_ID_MPEG1VIDEO || i <=1)
271 error-= 1.0/mpeg1_aspect[i];
273 error-= av_q2d(mpeg2_aspect[i])*s->height/s->width;
277 if(error < best_aspect_error){
278 best_aspect_error= error;
279 s->aspect_ratio_info= i;
283 put_bits(&s->pb, 4, s->aspect_ratio_info);
284 put_bits(&s->pb, 4, s->frame_rate_index);
286 if(s->avctx->rc_max_rate){
287 v = (s->avctx->rc_max_rate + 399) / 400;
288 if (v > 0x3ffff && s->codec_id == CODEC_ID_MPEG1VIDEO)
294 if(s->avctx->rc_buffer_size)
295 vbv_buffer_size = s->avctx->rc_buffer_size;
297 /* VBV calculation: Scaled so that a VCD has the proper VBV size of 40 kilobytes */
298 vbv_buffer_size = (( 20 * s->bit_rate) / (1151929 / 2)) * 8 * 1024;
299 vbv_buffer_size= (vbv_buffer_size + 16383) / 16384;
301 put_bits(&s->pb, 18, v & 0x3FFFF);
302 put_bits(&s->pb, 1, 1); /* marker */
303 put_bits(&s->pb, 10, vbv_buffer_size & 0x3FF);
305 constraint_parameter_flag=
306 s->width <= 768 && s->height <= 576 &&
307 s->mb_width * s->mb_height <= 396 &&
308 s->mb_width * s->mb_height * framerate.num <= framerate.den*396*25 &&
309 framerate.num <= framerate.den*30 &&
310 s->avctx->me_range && s->avctx->me_range < 128 &&
311 vbv_buffer_size <= 20 &&
313 s->codec_id == CODEC_ID_MPEG1VIDEO;
315 put_bits(&s->pb, 1, constraint_parameter_flag);
317 ff_write_quant_matrix(&s->pb, s->avctx->intra_matrix);
318 ff_write_quant_matrix(&s->pb, s->avctx->inter_matrix);
320 if(s->codec_id == CODEC_ID_MPEG2VIDEO){
321 put_header(s, EXT_START_CODE);
322 put_bits(&s->pb, 4, 1); //seq ext
323 put_bits(&s->pb, 1, 0); //esc
325 if(s->avctx->profile == FF_PROFILE_UNKNOWN){
326 put_bits(&s->pb, 3, 4); //profile
328 put_bits(&s->pb, 3, s->avctx->profile); //profile
331 if(s->avctx->level == FF_LEVEL_UNKNOWN){
332 put_bits(&s->pb, 4, 8); //level
334 put_bits(&s->pb, 4, s->avctx->level); //level
337 put_bits(&s->pb, 1, s->progressive_sequence);
338 put_bits(&s->pb, 2, 1); //chroma format 4:2:0
339 put_bits(&s->pb, 2, 0); //horizontal size ext
340 put_bits(&s->pb, 2, 0); //vertical size ext
341 put_bits(&s->pb, 12, v>>18); //bitrate ext
342 put_bits(&s->pb, 1, 1); //marker
343 put_bits(&s->pb, 8, vbv_buffer_size >>10); //vbv buffer ext
344 put_bits(&s->pb, 1, s->low_delay);
345 put_bits(&s->pb, 2, 0); // frame_rate_ext_n
346 put_bits(&s->pb, 5, 0); // frame_rate_ext_d
349 put_header(s, GOP_START_CODE);
350 put_bits(&s->pb, 1, 0); /* do drop frame */
351 /* time code : we must convert from the real frame rate to a
352 fake mpeg frame rate in case of low frame rate */
353 fps = (framerate.num + framerate.den/2)/ framerate.den;
354 time_code = s->current_picture_ptr->coded_picture_number;
356 s->gop_picture_number = time_code;
357 put_bits(&s->pb, 5, (uint32_t)((time_code / (fps * 3600)) % 24));
358 put_bits(&s->pb, 6, (uint32_t)((time_code / (fps * 60)) % 60));
359 put_bits(&s->pb, 1, 1);
360 put_bits(&s->pb, 6, (uint32_t)((time_code / fps) % 60));
361 put_bits(&s->pb, 6, (uint32_t)((time_code % fps)));
362 put_bits(&s->pb, 1, !!(s->flags & CODEC_FLAG_CLOSED_GOP));
363 put_bits(&s->pb, 1, 0); /* broken link */
367 static inline void encode_mb_skip_run(MpegEncContext *s, int run){
369 put_bits(&s->pb, 11, 0x008);
372 put_bits(&s->pb, mbAddrIncrTable[run][1],
373 mbAddrIncrTable[run][0]);
375 #endif //CONFIG_ENCODERS
377 static void common_init(MpegEncContext *s)
381 s->c_dc_scale_table= mpeg2_dc_scale_table[s->intra_dc_precision];
385 void ff_mpeg1_clean_buffers(MpegEncContext *s){
386 s->last_dc[0] = 1 << (7 + s->intra_dc_precision);
387 s->last_dc[1] = s->last_dc[0];
388 s->last_dc[2] = s->last_dc[0];
389 memset(s->last_mv, 0, sizeof(s->last_mv));
392 #ifdef CONFIG_ENCODERS
394 void ff_mpeg1_encode_slice_header(MpegEncContext *s){
395 put_header(s, SLICE_MIN_START_CODE + s->mb_y);
396 put_bits(&s->pb, 5, s->qscale); /* quantizer scale */
397 put_bits(&s->pb, 1, 0); /* slice extra information */
400 void mpeg1_encode_picture_header(MpegEncContext *s, int picture_number)
402 mpeg1_encode_sequence_header(s);
404 /* mpeg1 picture header */
405 put_header(s, PICTURE_START_CODE);
406 /* temporal reference */
408 // RAL: s->picture_number instead of s->fake_picture_number
409 put_bits(&s->pb, 10, (s->picture_number -
410 s->gop_picture_number) & 0x3ff);
411 put_bits(&s->pb, 3, s->pict_type);
413 s->vbv_delay_ptr= s->pb.buf + put_bits_count(&s->pb)/8;
414 put_bits(&s->pb, 16, 0xFFFF); /* vbv_delay */
416 // RAL: Forward f_code also needed for B frames
417 if (s->pict_type == P_TYPE || s->pict_type == B_TYPE) {
418 put_bits(&s->pb, 1, 0); /* half pel coordinates */
419 if(s->codec_id == CODEC_ID_MPEG1VIDEO)
420 put_bits(&s->pb, 3, s->f_code); /* forward_f_code */
422 put_bits(&s->pb, 3, 7); /* forward_f_code */
425 // RAL: Backward f_code necessary for B frames
426 if (s->pict_type == B_TYPE) {
427 put_bits(&s->pb, 1, 0); /* half pel coordinates */
428 if(s->codec_id == CODEC_ID_MPEG1VIDEO)
429 put_bits(&s->pb, 3, s->b_code); /* backward_f_code */
431 put_bits(&s->pb, 3, 7); /* backward_f_code */
434 put_bits(&s->pb, 1, 0); /* extra bit picture */
436 s->frame_pred_frame_dct = 1;
437 if(s->codec_id == CODEC_ID_MPEG2VIDEO){
438 put_header(s, EXT_START_CODE);
439 put_bits(&s->pb, 4, 8); //pic ext
440 if (s->pict_type == P_TYPE || s->pict_type == B_TYPE) {
441 put_bits(&s->pb, 4, s->f_code);
442 put_bits(&s->pb, 4, s->f_code);
444 put_bits(&s->pb, 8, 255);
446 if (s->pict_type == B_TYPE) {
447 put_bits(&s->pb, 4, s->b_code);
448 put_bits(&s->pb, 4, s->b_code);
450 put_bits(&s->pb, 8, 255);
452 put_bits(&s->pb, 2, s->intra_dc_precision);
454 assert(s->picture_structure == PICT_FRAME);
455 put_bits(&s->pb, 2, s->picture_structure);
456 if (s->progressive_sequence) {
457 put_bits(&s->pb, 1, 0); /* no repeat */
459 put_bits(&s->pb, 1, s->current_picture_ptr->top_field_first);
461 /* XXX: optimize the generation of this flag with entropy
463 s->frame_pred_frame_dct = s->progressive_sequence;
465 put_bits(&s->pb, 1, s->frame_pred_frame_dct);
466 put_bits(&s->pb, 1, s->concealment_motion_vectors);
467 put_bits(&s->pb, 1, s->q_scale_type);
468 put_bits(&s->pb, 1, s->intra_vlc_format);
469 put_bits(&s->pb, 1, s->alternate_scan);
470 put_bits(&s->pb, 1, s->repeat_first_field);
471 s->progressive_frame = s->progressive_sequence;
472 put_bits(&s->pb, 1, s->chroma_420_type=s->progressive_frame);
473 put_bits(&s->pb, 1, s->progressive_frame);
474 put_bits(&s->pb, 1, 0); //composite_display_flag
476 if(s->flags & CODEC_FLAG_SVCD_SCAN_OFFSET){
479 put_header(s, USER_START_CODE);
480 for(i=0; i<sizeof(svcd_scan_offset_placeholder); i++){
481 put_bits(&s->pb, 8, svcd_scan_offset_placeholder[i]);
486 ff_mpeg1_encode_slice_header(s);
489 static inline void put_mb_modes(MpegEncContext *s, int n, int bits,
490 int has_mv, int field_motion)
492 put_bits(&s->pb, n, bits);
493 if (!s->frame_pred_frame_dct) {
495 put_bits(&s->pb, 2, 2 - field_motion); /* motion_type: frame/field */
496 put_bits(&s->pb, 1, s->interlaced_dct);
500 void mpeg1_encode_mb(MpegEncContext *s,
501 DCTELEM block[6][64],
502 int motion_x, int motion_y)
505 const int mb_x = s->mb_x;
506 const int mb_y = s->mb_y;
507 const int first_mb= mb_x == s->resync_mb_x && mb_y == s->resync_mb_y;
512 if (s->block_last_index[i] >= 0)
516 if (cbp == 0 && !first_mb && s->mv_type == MV_TYPE_16X16 &&
517 (mb_x != s->mb_width - 1 || (mb_y != s->mb_height - 1 && s->codec_id == CODEC_ID_MPEG1VIDEO)) &&
518 ((s->pict_type == P_TYPE && (motion_x | motion_y) == 0) ||
519 (s->pict_type == B_TYPE && s->mv_dir == s->last_mv_dir && (((s->mv_dir & MV_DIR_FORWARD) ? ((s->mv[0][0][0] - s->last_mv[0][0][0])|(s->mv[0][0][1] - s->last_mv[0][0][1])) : 0) |
520 ((s->mv_dir & MV_DIR_BACKWARD) ? ((s->mv[1][0][0] - s->last_mv[1][0][0])|(s->mv[1][0][1] - s->last_mv[1][0][1])) : 0)) == 0))) {
522 s->qscale -= s->dquant;
526 if(s->pict_type == P_TYPE){
527 s->last_mv[0][1][0]= s->last_mv[0][0][0]=
528 s->last_mv[0][1][1]= s->last_mv[0][0][1]= 0;
532 assert(s->mb_skip_run == 0);
533 encode_mb_skip_run(s, s->mb_x);
535 encode_mb_skip_run(s, s->mb_skip_run);
538 if (s->pict_type == I_TYPE) {
539 if(s->dquant && cbp){
540 put_mb_modes(s, 2, 1, 0, 0); /* macroblock_type : macroblock_quant = 1 */
541 put_bits(&s->pb, 5, s->qscale);
543 put_mb_modes(s, 1, 1, 0, 0); /* macroblock_type : macroblock_quant = 0 */
544 s->qscale -= s->dquant;
546 s->misc_bits+= get_bits_diff(s);
548 } else if (s->mb_intra) {
549 if(s->dquant && cbp){
550 put_mb_modes(s, 6, 0x01, 0, 0);
551 put_bits(&s->pb, 5, s->qscale);
553 put_mb_modes(s, 5, 0x03, 0, 0);
554 s->qscale -= s->dquant;
556 s->misc_bits+= get_bits_diff(s);
558 memset(s->last_mv, 0, sizeof(s->last_mv));
559 } else if (s->pict_type == P_TYPE) {
560 if(s->mv_type == MV_TYPE_16X16){
562 if ((motion_x|motion_y) == 0) {
564 put_mb_modes(s, 5, 1, 0, 0); /* macroblock_pattern & quant */
565 put_bits(&s->pb, 5, s->qscale);
567 put_mb_modes(s, 2, 1, 0, 0); /* macroblock_pattern only */
569 s->misc_bits+= get_bits_diff(s);
572 put_mb_modes(s, 5, 2, 1, 0); /* motion + cbp */
573 put_bits(&s->pb, 5, s->qscale);
575 put_mb_modes(s, 1, 1, 1, 0); /* motion + cbp */
577 s->misc_bits+= get_bits_diff(s);
578 mpeg1_encode_motion(s, motion_x - s->last_mv[0][0][0], s->f_code); // RAL: f_code parameter added
579 mpeg1_encode_motion(s, motion_y - s->last_mv[0][0][1], s->f_code); // RAL: f_code parameter added
580 s->mv_bits+= get_bits_diff(s);
583 put_bits(&s->pb, 3, 1); /* motion only */
584 if (!s->frame_pred_frame_dct)
585 put_bits(&s->pb, 2, 2); /* motion_type: frame */
586 s->misc_bits+= get_bits_diff(s);
587 mpeg1_encode_motion(s, motion_x - s->last_mv[0][0][0], s->f_code); // RAL: f_code parameter added
588 mpeg1_encode_motion(s, motion_y - s->last_mv[0][0][1], s->f_code); // RAL: f_code parameter added
589 s->qscale -= s->dquant;
590 s->mv_bits+= get_bits_diff(s);
592 s->last_mv[0][1][0]= s->last_mv[0][0][0]= motion_x;
593 s->last_mv[0][1][1]= s->last_mv[0][0][1]= motion_y;
595 assert(!s->frame_pred_frame_dct && s->mv_type == MV_TYPE_FIELD);
599 put_mb_modes(s, 5, 2, 1, 1); /* motion + cbp */
600 put_bits(&s->pb, 5, s->qscale);
602 put_mb_modes(s, 1, 1, 1, 1); /* motion + cbp */
605 put_bits(&s->pb, 3, 1); /* motion only */
606 put_bits(&s->pb, 2, 1); /* motion_type: field */
607 s->qscale -= s->dquant;
609 s->misc_bits+= get_bits_diff(s);
611 put_bits(&s->pb, 1, s->field_select[0][i]);
612 mpeg1_encode_motion(s, s->mv[0][i][0] - s->last_mv[0][i][0] , s->f_code);
613 mpeg1_encode_motion(s, s->mv[0][i][1] - (s->last_mv[0][i][1]>>1), s->f_code);
614 s->last_mv[0][i][0]= s->mv[0][i][0];
615 s->last_mv[0][i][1]= 2*s->mv[0][i][1];
617 s->mv_bits+= get_bits_diff(s);
620 put_bits(&s->pb, mbPatTable[cbp][1], mbPatTable[cbp][0]);
623 static const int mb_type_len[4]={0,3,4,2}; //bak,for,bi
625 if(s->mv_type == MV_TYPE_16X16){
626 if (cbp){ // With coded bloc pattern
628 if(s->mv_dir == MV_DIR_FORWARD)
629 put_mb_modes(s, 6, 3, 1, 0);
631 put_mb_modes(s, mb_type_len[s->mv_dir]+3, 2, 1, 0);
632 put_bits(&s->pb, 5, s->qscale);
634 put_mb_modes(s, mb_type_len[s->mv_dir], 3, 1, 0);
636 }else{ // No coded bloc pattern
637 put_bits(&s->pb, mb_type_len[s->mv_dir], 2);
638 if (!s->frame_pred_frame_dct)
639 put_bits(&s->pb, 2, 2); /* motion_type: frame */
640 s->qscale -= s->dquant;
642 s->misc_bits += get_bits_diff(s);
643 if (s->mv_dir&MV_DIR_FORWARD){
644 mpeg1_encode_motion(s, s->mv[0][0][0] - s->last_mv[0][0][0], s->f_code);
645 mpeg1_encode_motion(s, s->mv[0][0][1] - s->last_mv[0][0][1], s->f_code);
646 s->last_mv[0][0][0]=s->last_mv[0][1][0]= s->mv[0][0][0];
647 s->last_mv[0][0][1]=s->last_mv[0][1][1]= s->mv[0][0][1];
650 if (s->mv_dir&MV_DIR_BACKWARD){
651 mpeg1_encode_motion(s, s->mv[1][0][0] - s->last_mv[1][0][0], s->b_code);
652 mpeg1_encode_motion(s, s->mv[1][0][1] - s->last_mv[1][0][1], s->b_code);
653 s->last_mv[1][0][0]=s->last_mv[1][1][0]= s->mv[1][0][0];
654 s->last_mv[1][0][1]=s->last_mv[1][1][1]= s->mv[1][0][1];
658 assert(s->mv_type == MV_TYPE_FIELD);
659 assert(!s->frame_pred_frame_dct);
660 if (cbp){ // With coded bloc pattern
662 if(s->mv_dir == MV_DIR_FORWARD)
663 put_mb_modes(s, 6, 3, 1, 1);
665 put_mb_modes(s, mb_type_len[s->mv_dir]+3, 2, 1, 1);
666 put_bits(&s->pb, 5, s->qscale);
668 put_mb_modes(s, mb_type_len[s->mv_dir], 3, 1, 1);
670 }else{ // No coded bloc pattern
671 put_bits(&s->pb, mb_type_len[s->mv_dir], 2);
672 put_bits(&s->pb, 2, 1); /* motion_type: field */
673 s->qscale -= s->dquant;
675 s->misc_bits += get_bits_diff(s);
676 if (s->mv_dir&MV_DIR_FORWARD){
678 put_bits(&s->pb, 1, s->field_select[0][i]);
679 mpeg1_encode_motion(s, s->mv[0][i][0] - s->last_mv[0][i][0] , s->f_code);
680 mpeg1_encode_motion(s, s->mv[0][i][1] - (s->last_mv[0][i][1]>>1), s->f_code);
681 s->last_mv[0][i][0]= s->mv[0][i][0];
682 s->last_mv[0][i][1]= 2*s->mv[0][i][1];
686 if (s->mv_dir&MV_DIR_BACKWARD){
688 put_bits(&s->pb, 1, s->field_select[1][i]);
689 mpeg1_encode_motion(s, s->mv[1][i][0] - s->last_mv[1][i][0] , s->b_code);
690 mpeg1_encode_motion(s, s->mv[1][i][1] - (s->last_mv[1][i][1]>>1), s->b_code);
691 s->last_mv[1][i][0]= s->mv[1][i][0];
692 s->last_mv[1][i][1]= 2*s->mv[1][i][1];
697 s->mv_bits += get_bits_diff(s);
699 put_bits(&s->pb, mbPatTable[cbp][1], mbPatTable[cbp][0]);
702 if (cbp & (1 << (5 - i))) {
703 mpeg1_encode_block(s, block[i], i);
708 s->i_tex_bits+= get_bits_diff(s);
710 s->p_tex_bits+= get_bits_diff(s);
714 // RAL: Parameter added: f_or_b_code
715 static void mpeg1_encode_motion(MpegEncContext *s, int val, int f_or_b_code)
717 int code, bit_size, l, bits, range, sign;
723 mbMotionVectorTable[0][1],
724 mbMotionVectorTable[0][0]);
726 bit_size = f_or_b_code - 1;
727 range = 1 << bit_size;
728 /* modulo encoding */
729 l= INT_BIT - 5 - bit_size;
734 code = (val >> bit_size) + 1;
735 bits = val & (range - 1);
740 code = (val >> bit_size) + 1;
741 bits = val & (range - 1);
745 assert(code > 0 && code <= 16);
748 mbMotionVectorTable[code][1],
749 mbMotionVectorTable[code][0]);
751 put_bits(&s->pb, 1, sign);
753 put_bits(&s->pb, bit_size, bits);
758 void ff_mpeg1_encode_init(MpegEncContext *s)
770 init_rl(&rl_mpeg1, 1);
774 mpeg1_max_level[0][i]= rl_mpeg1.max_level[0][i];
775 mpeg1_index_run[0][i]= rl_mpeg1.index_run[0][i];
778 init_uni_ac_vlc(&rl_mpeg1, uni_mpeg1_ac_vlc_bits, uni_mpeg1_ac_vlc_len);
780 /* build unified dc encoding tables */
781 for(i=-255; i<256; i++)
789 index = av_log2(2*adiff);
791 bits= vlc_dc_lum_bits[index] + index;
792 code= (vlc_dc_lum_code[index]<<index) + (diff & ((1 << index) - 1));
793 mpeg1_lum_dc_uni[i+255]= bits + (code<<8);
795 bits= vlc_dc_chroma_bits[index] + index;
796 code= (vlc_dc_chroma_code[index]<<index) + (diff & ((1 << index) - 1));
797 mpeg1_chr_dc_uni[i+255]= bits + (code<<8);
800 mv_penalty= av_mallocz( sizeof(uint8_t)*(MAX_FCODE+1)*(2*MAX_MV+1) );
802 for(f_code=1; f_code<=MAX_FCODE; f_code++){
803 for(mv=-MAX_MV; mv<=MAX_MV; mv++){
806 if(mv==0) len= mbMotionVectorTable[0][1];
808 int val, bit_size, range, code;
810 bit_size = f_code - 1;
811 range = 1 << bit_size;
817 code = (val >> bit_size) + 1;
819 len= mbMotionVectorTable[code][1] + 1 + bit_size;
821 len= mbMotionVectorTable[16][1] + 2 + bit_size;
825 mv_penalty[f_code][mv+MAX_MV]= len;
830 for(f_code=MAX_FCODE; f_code>0; f_code--){
831 for(mv=-(8<<f_code); mv<(8<<f_code); mv++){
832 fcode_tab[mv+MAX_MV]= f_code;
836 s->me.mv_penalty= mv_penalty;
837 s->fcode_tab= fcode_tab;
838 if(s->codec_id == CODEC_ID_MPEG1VIDEO){
845 s->intra_ac_vlc_length=
846 s->inter_ac_vlc_length=
847 s->intra_ac_vlc_last_length=
848 s->inter_ac_vlc_last_length= uni_mpeg1_ac_vlc_len;
851 static inline void encode_dc(MpegEncContext *s, int diff, int component)
853 if(((unsigned) (diff+255)) >= 511){
857 index= av_log2_16bit(-2*diff);
860 index= av_log2_16bit(2*diff);
862 if (component == 0) {
865 vlc_dc_lum_bits[index] + index,
866 (vlc_dc_lum_code[index]<<index) + (diff & ((1 << index) - 1)));
870 vlc_dc_chroma_bits[index] + index,
871 (vlc_dc_chroma_code[index]<<index) + (diff & ((1 << index) - 1)));
874 if (component == 0) {
877 mpeg1_lum_dc_uni[diff+255]&0xFF,
878 mpeg1_lum_dc_uni[diff+255]>>8);
882 mpeg1_chr_dc_uni[diff+255]&0xFF,
883 mpeg1_chr_dc_uni[diff+255]>>8);
888 static void mpeg1_encode_block(MpegEncContext *s,
892 int alevel, level, last_non_zero, dc, diff, i, j, run, last_index, sign;
894 // RLTable *rl = &rl_mpeg1;
896 last_index = s->block_last_index[n];
900 component = (n <= 3 ? 0 : n - 4 + 1);
901 dc = block[0]; /* overflow is impossible */
902 diff = dc - s->last_dc[component];
903 encode_dc(s, diff, component);
904 s->last_dc[component] = dc;
907 if (s->intra_vlc_format)
913 /* encode the first coefficient : needs to be done here because
914 it is handled slightly differently */
916 if (abs(level) == 1) {
917 code = ((uint32_t)level >> 31); /* the sign bit */
918 put_bits(&s->pb, 2, code | 0x02);
927 /* now quantify & encode AC coefs */
928 last_non_zero = i - 1;
930 for(;i<=last_index;i++) {
931 j = s->intra_scantable.permutated[i];
936 dprintf("level[%d]=%d\n", i, level);
938 /* encode using VLC */
940 run = i - last_non_zero - 1;
943 MASK_ABS(sign, alevel)
946 // code = get_rl_index(rl, 0, run, alevel);
947 if (alevel <= mpeg1_max_level[0][run]){
948 code= mpeg1_index_run[0][run] + alevel - 1;
949 /* store the vlc & sign at once */
950 put_bits(&s->pb, mpeg1_vlc[code][1]+1, (mpeg1_vlc[code][0]<<1) + sign);
952 /* escape seems to be pretty rare <5% so i dont optimize it */
953 put_bits(&s->pb, mpeg1_vlc[111/*rl->n*/][1], mpeg1_vlc[111/*rl->n*/][0]);
954 /* escape: only clip in this case */
955 put_bits(&s->pb, 6, run);
956 if(s->codec_id == CODEC_ID_MPEG1VIDEO){
958 put_bits(&s->pb, 8, level & 0xff);
961 put_bits(&s->pb, 16, 0x8001 + level + 255);
963 put_bits(&s->pb, 16, level & 0xffff);
967 put_bits(&s->pb, 12, level & 0xfff);
974 put_bits(&s->pb, 2, 0x2);
976 #endif //CONFIG_ENCODERS
978 /******************************************/
981 static VLC dc_lum_vlc;
982 static VLC dc_chroma_vlc;
984 static VLC mbincr_vlc;
985 static VLC mb_ptype_vlc;
986 static VLC mb_btype_vlc;
987 static VLC mb_pat_vlc;
989 static void init_vlcs(void)
996 init_vlc(&dc_lum_vlc, DC_VLC_BITS, 12,
997 vlc_dc_lum_bits, 1, 1,
998 vlc_dc_lum_code, 2, 2, 1);
999 init_vlc(&dc_chroma_vlc, DC_VLC_BITS, 12,
1000 vlc_dc_chroma_bits, 1, 1,
1001 vlc_dc_chroma_code, 2, 2, 1);
1002 init_vlc(&mv_vlc, MV_VLC_BITS, 17,
1003 &mbMotionVectorTable[0][1], 2, 1,
1004 &mbMotionVectorTable[0][0], 2, 1, 1);
1005 init_vlc(&mbincr_vlc, MBINCR_VLC_BITS, 36,
1006 &mbAddrIncrTable[0][1], 2, 1,
1007 &mbAddrIncrTable[0][0], 2, 1, 1);
1008 init_vlc(&mb_pat_vlc, MB_PAT_VLC_BITS, 64,
1009 &mbPatTable[0][1], 2, 1,
1010 &mbPatTable[0][0], 2, 1, 1);
1012 init_vlc(&mb_ptype_vlc, MB_PTYPE_VLC_BITS, 7,
1013 &table_mb_ptype[0][1], 2, 1,
1014 &table_mb_ptype[0][0], 2, 1, 1);
1015 init_vlc(&mb_btype_vlc, MB_BTYPE_VLC_BITS, 11,
1016 &table_mb_btype[0][1], 2, 1,
1017 &table_mb_btype[0][0], 2, 1, 1);
1018 init_rl(&rl_mpeg1, 1);
1019 init_rl(&rl_mpeg2, 1);
1021 init_2d_vlc_rl(&rl_mpeg1, 1);
1022 init_2d_vlc_rl(&rl_mpeg2, 1);
1026 static inline int get_dmv(MpegEncContext *s)
1028 if(get_bits1(&s->gb))
1029 return 1 - (get_bits1(&s->gb) << 1);
1034 static inline int get_qscale(MpegEncContext *s)
1036 int qscale = get_bits(&s->gb, 5);
1037 if (s->q_scale_type) {
1038 return non_linear_qscale[qscale];
1044 /* motion type (for mpeg2) */
1050 static int mpeg_decode_mb(MpegEncContext *s,
1051 DCTELEM block[12][64])
1053 int i, j, k, cbp, val, mb_type, motion_type;
1054 const int mb_block_count = 4 + (1<< s->chroma_format);
1056 dprintf("decode_mb: x=%d y=%d\n", s->mb_x, s->mb_y);
1058 assert(s->mb_skipped==0);
1060 if (s->mb_skip_run-- != 0) {
1061 if(s->pict_type == I_TYPE){
1062 av_log(s->avctx, AV_LOG_ERROR, "skipped MB in I frame at %d %d\n", s->mb_x, s->mb_y);
1069 s->block_last_index[i] = -1;
1070 if(s->picture_structure == PICT_FRAME)
1071 s->mv_type = MV_TYPE_16X16;
1073 s->mv_type = MV_TYPE_FIELD;
1074 if (s->pict_type == P_TYPE) {
1075 /* if P type, zero motion vector is implied */
1076 s->mv_dir = MV_DIR_FORWARD;
1077 s->mv[0][0][0] = s->mv[0][0][1] = 0;
1078 s->last_mv[0][0][0] = s->last_mv[0][0][1] = 0;
1079 s->last_mv[0][1][0] = s->last_mv[0][1][1] = 0;
1080 s->field_select[0][0]= s->picture_structure - 1;
1082 s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride ]= MB_TYPE_SKIP | MB_TYPE_L0 | MB_TYPE_16x16;
1087 mb_type= s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride - 1];
1089 mb_type= s->current_picture.mb_type[ s->mb_width + (s->mb_y-1)*s->mb_stride - 1]; // FIXME not sure if this is allowed in mpeg at all,
1090 if(IS_INTRA(mb_type))
1093 /* if B type, reuse previous vectors and directions */
1094 s->mv[0][0][0] = s->last_mv[0][0][0];
1095 s->mv[0][0][1] = s->last_mv[0][0][1];
1096 s->mv[1][0][0] = s->last_mv[1][0][0];
1097 s->mv[1][0][1] = s->last_mv[1][0][1];
1099 s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride ]=
1100 mb_type | MB_TYPE_SKIP;
1101 // assert(s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride - 1]&(MB_TYPE_16x16|MB_TYPE_16x8));
1103 if((s->mv[0][0][0]|s->mv[0][0][1]|s->mv[1][0][0]|s->mv[1][0][1])==0)
1110 switch(s->pict_type) {
1113 if (get_bits1(&s->gb) == 0) {
1114 if (get_bits1(&s->gb) == 0){
1115 av_log(s->avctx, AV_LOG_ERROR, "invalid mb type in I Frame at %d %d\n", s->mb_x, s->mb_y);
1118 mb_type = MB_TYPE_QUANT | MB_TYPE_INTRA;
1120 mb_type = MB_TYPE_INTRA;
1124 mb_type = get_vlc2(&s->gb, mb_ptype_vlc.table, MB_PTYPE_VLC_BITS, 1);
1126 av_log(s->avctx, AV_LOG_ERROR, "invalid mb type in P Frame at %d %d\n", s->mb_x, s->mb_y);
1129 mb_type = ptype2mb_type[ mb_type ];
1132 mb_type = get_vlc2(&s->gb, mb_btype_vlc.table, MB_BTYPE_VLC_BITS, 1);
1134 av_log(s->avctx, AV_LOG_ERROR, "invalid mb type in B Frame at %d %d\n", s->mb_x, s->mb_y);
1137 mb_type = btype2mb_type[ mb_type ];
1140 dprintf("mb_type=%x\n", mb_type);
1141 // motion_type = 0; /* avoid warning */
1142 if (IS_INTRA(mb_type)) {
1143 s->dsp.clear_blocks(s->block[0]);
1145 if(!s->chroma_y_shift){
1146 s->dsp.clear_blocks(s->block[6]);
1149 /* compute dct type */
1150 if (s->picture_structure == PICT_FRAME && //FIXME add a interlaced_dct coded var?
1151 !s->frame_pred_frame_dct) {
1152 s->interlaced_dct = get_bits1(&s->gb);
1155 if (IS_QUANT(mb_type))
1156 s->qscale = get_qscale(s);
1158 if (s->concealment_motion_vectors) {
1159 /* just parse them */
1160 if (s->picture_structure != PICT_FRAME)
1161 skip_bits1(&s->gb); /* field select */
1163 s->mv[0][0][0]= s->last_mv[0][0][0]= s->last_mv[0][1][0] =
1164 mpeg_decode_motion(s, s->mpeg_f_code[0][0], s->last_mv[0][0][0]);
1165 s->mv[0][0][1]= s->last_mv[0][0][1]= s->last_mv[0][1][1] =
1166 mpeg_decode_motion(s, s->mpeg_f_code[0][1], s->last_mv[0][0][1]);
1168 skip_bits1(&s->gb); /* marker */
1170 memset(s->last_mv, 0, sizeof(s->last_mv)); /* reset mv prediction */
1173 //one 1 we memcpy blocks in xvmcvideo
1174 if(s->avctx->xvmc_acceleration > 1){
1175 XVMC_pack_pblocks(s,-1);//inter are always full blocks
1182 if (s->codec_id == CODEC_ID_MPEG2VIDEO) {
1183 if(s->flags2 & CODEC_FLAG2_FAST){
1185 mpeg2_fast_decode_block_intra(s, s->pblocks[i], i);
1188 for(i=0;i<mb_block_count;i++) {
1189 if (mpeg2_decode_block_intra(s, s->pblocks[i], i) < 0)
1195 if (mpeg1_decode_block_intra(s, s->pblocks[i], i) < 0)
1200 if (mb_type & MB_TYPE_ZERO_MV){
1201 assert(mb_type & MB_TYPE_CBP);
1203 /* compute dct type */
1204 if (s->picture_structure == PICT_FRAME && //FIXME add a interlaced_dct coded var?
1205 !s->frame_pred_frame_dct) {
1206 s->interlaced_dct = get_bits1(&s->gb);
1209 if (IS_QUANT(mb_type))
1210 s->qscale = get_qscale(s);
1212 s->mv_dir = MV_DIR_FORWARD;
1213 if(s->picture_structure == PICT_FRAME)
1214 s->mv_type = MV_TYPE_16X16;
1216 s->mv_type = MV_TYPE_FIELD;
1217 mb_type |= MB_TYPE_INTERLACED;
1218 s->field_select[0][0]= s->picture_structure - 1;
1220 s->last_mv[0][0][0] = 0;
1221 s->last_mv[0][0][1] = 0;
1222 s->last_mv[0][1][0] = 0;
1223 s->last_mv[0][1][1] = 0;
1227 assert(mb_type & MB_TYPE_L0L1);
1228 //FIXME decide if MBs in field pictures are MB_TYPE_INTERLACED
1229 /* get additionnal motion vector type */
1230 if (s->frame_pred_frame_dct)
1231 motion_type = MT_FRAME;
1233 motion_type = get_bits(&s->gb, 2);
1236 /* compute dct type */
1237 if (s->picture_structure == PICT_FRAME && //FIXME add a interlaced_dct coded var?
1238 !s->frame_pred_frame_dct && HAS_CBP(mb_type)) {
1239 s->interlaced_dct = get_bits1(&s->gb);
1242 if (IS_QUANT(mb_type))
1243 s->qscale = get_qscale(s);
1245 /* motion vectors */
1248 if (USES_LIST(mb_type, i)) {
1249 s->mv_dir |= (MV_DIR_FORWARD >> i);
1250 dprintf("motion_type=%d\n", motion_type);
1251 switch(motion_type) {
1252 case MT_FRAME: /* or MT_16X8 */
1253 if (s->picture_structure == PICT_FRAME) {
1255 mb_type |= MB_TYPE_16x16;
1256 s->mv_type = MV_TYPE_16X16;
1257 s->mv[i][0][0]= s->last_mv[i][0][0]= s->last_mv[i][1][0] =
1258 mpeg_decode_motion(s, s->mpeg_f_code[i][0], s->last_mv[i][0][0]);
1259 s->mv[i][0][1]= s->last_mv[i][0][1]= s->last_mv[i][1][1] =
1260 mpeg_decode_motion(s, s->mpeg_f_code[i][1], s->last_mv[i][0][1]);
1261 /* full_pel: only for mpeg1 */
1262 if (s->full_pel[i]){
1263 s->mv[i][0][0] <<= 1;
1264 s->mv[i][0][1] <<= 1;
1268 mb_type |= MB_TYPE_16x8 | MB_TYPE_INTERLACED;
1269 s->mv_type = MV_TYPE_16X8;
1271 s->field_select[i][j] = get_bits1(&s->gb);
1273 val = mpeg_decode_motion(s, s->mpeg_f_code[i][k],
1274 s->last_mv[i][j][k]);
1275 s->last_mv[i][j][k] = val;
1276 s->mv[i][j][k] = val;
1282 s->mv_type = MV_TYPE_FIELD;
1283 if (s->picture_structure == PICT_FRAME) {
1284 mb_type |= MB_TYPE_16x8 | MB_TYPE_INTERLACED;
1286 s->field_select[i][j] = get_bits1(&s->gb);
1287 val = mpeg_decode_motion(s, s->mpeg_f_code[i][0],
1288 s->last_mv[i][j][0]);
1289 s->last_mv[i][j][0] = val;
1290 s->mv[i][j][0] = val;
1291 dprintf("fmx=%d\n", val);
1292 val = mpeg_decode_motion(s, s->mpeg_f_code[i][1],
1293 s->last_mv[i][j][1] >> 1);
1294 s->last_mv[i][j][1] = val << 1;
1295 s->mv[i][j][1] = val;
1296 dprintf("fmy=%d\n", val);
1299 mb_type |= MB_TYPE_16x16 | MB_TYPE_INTERLACED;
1300 s->field_select[i][0] = get_bits1(&s->gb);
1302 val = mpeg_decode_motion(s, s->mpeg_f_code[i][k],
1303 s->last_mv[i][0][k]);
1304 s->last_mv[i][0][k] = val;
1305 s->last_mv[i][1][k] = val;
1306 s->mv[i][0][k] = val;
1312 int dmx, dmy, mx, my, m;
1314 mx = mpeg_decode_motion(s, s->mpeg_f_code[i][0],
1315 s->last_mv[i][0][0]);
1316 s->last_mv[i][0][0] = mx;
1317 s->last_mv[i][1][0] = mx;
1319 my = mpeg_decode_motion(s, s->mpeg_f_code[i][1],
1320 s->last_mv[i][0][1] >> 1);
1322 s->mv_type = MV_TYPE_DMV;
1325 s->last_mv[i][0][1] = my<<1;
1326 s->last_mv[i][1][1] = my<<1;
1328 s->mv[i][0][0] = mx;
1329 s->mv[i][0][1] = my;
1330 s->mv[i][1][0] = mx;//not used
1331 s->mv[i][1][1] = my;//not used
1333 if (s->picture_structure == PICT_FRAME) {
1334 mb_type |= MB_TYPE_16x16 | MB_TYPE_INTERLACED;
1336 //m = 1 + 2 * s->top_field_first;
1337 m = s->top_field_first ? 1 : 3;
1339 /* top -> top pred */
1340 s->mv[i][2][0] = ((mx * m + (mx > 0)) >> 1) + dmx;
1341 s->mv[i][2][1] = ((my * m + (my > 0)) >> 1) + dmy - 1;
1343 s->mv[i][3][0] = ((mx * m + (mx > 0)) >> 1) + dmx;
1344 s->mv[i][3][1] = ((my * m + (my > 0)) >> 1) + dmy + 1;
1346 mb_type |= MB_TYPE_16x16;
1348 s->mv[i][2][0] = ((mx + (mx > 0)) >> 1) + dmx;
1349 s->mv[i][2][1] = ((my + (my > 0)) >> 1) + dmy;
1350 if(s->picture_structure == PICT_TOP_FIELD)
1358 av_log(s->avctx, AV_LOG_ERROR, "00 motion_type at %d %d\n", s->mb_x, s->mb_y);
1366 if (HAS_CBP(mb_type)) {
1367 s->dsp.clear_blocks(s->block[0]);
1369 if(!s->chroma_y_shift){
1370 s->dsp.clear_blocks(s->block[6]);
1373 cbp = get_vlc2(&s->gb, mb_pat_vlc.table, MB_PAT_VLC_BITS, 1);
1374 if (cbp < 0 || ((cbp == 0) && (s->chroma_format < 2)) ){
1375 av_log(s->avctx, AV_LOG_ERROR, "invalid cbp at %d %d\n", s->mb_x, s->mb_y);
1378 if(mb_block_count > 6){
1379 cbp<<= mb_block_count-6;
1380 cbp |= get_bits(&s->gb, mb_block_count-6);
1384 //on 1 we memcpy blocks in xvmcvideo
1385 if(s->avctx->xvmc_acceleration > 1){
1386 XVMC_pack_pblocks(s,cbp);
1393 if (s->codec_id == CODEC_ID_MPEG2VIDEO) {
1394 if(s->flags2 & CODEC_FLAG2_FAST){
1397 mpeg2_fast_decode_block_non_intra(s, s->pblocks[i], i);
1399 s->block_last_index[i] = -1;
1404 cbp<<= 12-mb_block_count;
1406 for(i=0;i<mb_block_count;i++) {
1407 if ( cbp & (1<<11) ) {
1408 if (mpeg2_decode_block_non_intra(s, s->pblocks[i], i) < 0)
1411 s->block_last_index[i] = -1;
1417 if(s->flags2 & CODEC_FLAG2_FAST){
1420 mpeg1_fast_decode_block_inter(s, s->pblocks[i], i);
1422 s->block_last_index[i] = -1;
1429 if (mpeg1_decode_block_inter(s, s->pblocks[i], i) < 0)
1432 s->block_last_index[i] = -1;
1440 s->block_last_index[i] = -1;
1444 s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride ]= mb_type;
1449 /* as h263, but only 17 codes */
1450 static int mpeg_decode_motion(MpegEncContext *s, int fcode, int pred)
1452 int code, sign, val, l, shift;
1454 code = get_vlc2(&s->gb, mv_vlc.table, MV_VLC_BITS, 2);
1462 sign = get_bits1(&s->gb);
1466 val = (val - 1) << shift;
1467 val |= get_bits(&s->gb, shift);
1474 /* modulo decoding */
1475 l= INT_BIT - 5 - shift;
1480 static inline int decode_dc(GetBitContext *gb, int component)
1484 if (component == 0) {
1485 code = get_vlc2(gb, dc_lum_vlc.table, DC_VLC_BITS, 2);
1487 code = get_vlc2(gb, dc_chroma_vlc.table, DC_VLC_BITS, 2);
1490 av_log(NULL, AV_LOG_ERROR, "invalid dc code at\n");
1496 diff = get_xbits(gb, code);
1501 static inline int mpeg1_decode_block_intra(MpegEncContext *s,
1505 int level, dc, diff, i, j, run;
1507 RLTable *rl = &rl_mpeg1;
1508 uint8_t * const scantable= s->intra_scantable.permutated;
1509 const uint16_t *quant_matrix= s->intra_matrix;
1510 const int qscale= s->qscale;
1513 component = (n <= 3 ? 0 : n - 4 + 1);
1514 diff = decode_dc(&s->gb, component);
1517 dc = s->last_dc[component];
1519 s->last_dc[component] = dc;
1521 dprintf("dc=%d diff=%d\n", dc, diff);
1524 OPEN_READER(re, &s->gb);
1525 /* now quantify & encode AC coefs */
1527 UPDATE_CACHE(re, &s->gb);
1528 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2, 0);
1532 } else if(level != 0) {
1535 level= (level*qscale*quant_matrix[j])>>4;
1537 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1538 LAST_SKIP_BITS(re, &s->gb, 1);
1541 run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6);
1542 UPDATE_CACHE(re, &s->gb);
1543 level = SHOW_SBITS(re, &s->gb, 8); SKIP_BITS(re, &s->gb, 8);
1544 if (level == -128) {
1545 level = SHOW_UBITS(re, &s->gb, 8) - 256; LAST_SKIP_BITS(re, &s->gb, 8);
1546 } else if (level == 0) {
1547 level = SHOW_UBITS(re, &s->gb, 8) ; LAST_SKIP_BITS(re, &s->gb, 8);
1553 level= (level*qscale*quant_matrix[j])>>4;
1557 level= (level*qscale*quant_matrix[j])>>4;
1562 av_log(s->avctx, AV_LOG_ERROR, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y);
1568 CLOSE_READER(re, &s->gb);
1570 s->block_last_index[n] = i;
1574 static inline int mpeg1_decode_block_inter(MpegEncContext *s,
1578 int level, i, j, run;
1579 RLTable *rl = &rl_mpeg1;
1580 uint8_t * const scantable= s->intra_scantable.permutated;
1581 const uint16_t *quant_matrix= s->inter_matrix;
1582 const int qscale= s->qscale;
1585 OPEN_READER(re, &s->gb);
1587 /* special case for the first coef. no need to add a second vlc table */
1588 UPDATE_CACHE(re, &s->gb);
1589 if (((int32_t)GET_CACHE(re, &s->gb)) < 0) {
1590 level= (3*qscale*quant_matrix[0])>>5;
1592 if(GET_CACHE(re, &s->gb)&0x40000000)
1596 SKIP_BITS(re, &s->gb, 2);
1597 if(((int32_t)GET_CACHE(re, &s->gb)) <= (int32_t)0xBFFFFFFF)
1601 /* now quantify & encode AC coefs */
1603 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2, 0);
1608 level= ((level*2+1)*qscale*quant_matrix[j])>>5;
1610 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1611 SKIP_BITS(re, &s->gb, 1);
1614 run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6);
1615 UPDATE_CACHE(re, &s->gb);
1616 level = SHOW_SBITS(re, &s->gb, 8); SKIP_BITS(re, &s->gb, 8);
1617 if (level == -128) {
1618 level = SHOW_UBITS(re, &s->gb, 8) - 256; SKIP_BITS(re, &s->gb, 8);
1619 } else if (level == 0) {
1620 level = SHOW_UBITS(re, &s->gb, 8) ; SKIP_BITS(re, &s->gb, 8);
1626 level= ((level*2+1)*qscale*quant_matrix[j])>>5;
1630 level= ((level*2+1)*qscale*quant_matrix[j])>>5;
1635 av_log(s->avctx, AV_LOG_ERROR, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y);
1640 if(((int32_t)GET_CACHE(re, &s->gb)) <= (int32_t)0xBFFFFFFF)
1642 UPDATE_CACHE(re, &s->gb);
1645 LAST_SKIP_BITS(re, &s->gb, 2);
1646 CLOSE_READER(re, &s->gb);
1648 s->block_last_index[n] = i;
1652 static inline int mpeg1_fast_decode_block_inter(MpegEncContext *s, DCTELEM *block, int n)
1654 int level, i, j, run;
1655 RLTable *rl = &rl_mpeg1;
1656 uint8_t * const scantable= s->intra_scantable.permutated;
1657 const int qscale= s->qscale;
1660 OPEN_READER(re, &s->gb);
1662 /* special case for the first coef. no need to add a second vlc table */
1663 UPDATE_CACHE(re, &s->gb);
1664 if (((int32_t)GET_CACHE(re, &s->gb)) < 0) {
1665 level= (3*qscale)>>1;
1667 if(GET_CACHE(re, &s->gb)&0x40000000)
1671 SKIP_BITS(re, &s->gb, 2);
1672 if(((int32_t)GET_CACHE(re, &s->gb)) <= (int32_t)0xBFFFFFFF)
1676 /* now quantify & encode AC coefs */
1678 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2, 0);
1683 level= ((level*2+1)*qscale)>>1;
1685 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1686 SKIP_BITS(re, &s->gb, 1);
1689 run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6);
1690 UPDATE_CACHE(re, &s->gb);
1691 level = SHOW_SBITS(re, &s->gb, 8); SKIP_BITS(re, &s->gb, 8);
1692 if (level == -128) {
1693 level = SHOW_UBITS(re, &s->gb, 8) - 256; SKIP_BITS(re, &s->gb, 8);
1694 } else if (level == 0) {
1695 level = SHOW_UBITS(re, &s->gb, 8) ; SKIP_BITS(re, &s->gb, 8);
1701 level= ((level*2+1)*qscale)>>1;
1705 level= ((level*2+1)*qscale)>>1;
1711 if(((int32_t)GET_CACHE(re, &s->gb)) <= (int32_t)0xBFFFFFFF)
1713 UPDATE_CACHE(re, &s->gb);
1716 LAST_SKIP_BITS(re, &s->gb, 2);
1717 CLOSE_READER(re, &s->gb);
1719 s->block_last_index[n] = i;
1724 static inline int mpeg2_decode_block_non_intra(MpegEncContext *s,
1728 int level, i, j, run;
1729 RLTable *rl = &rl_mpeg1;
1730 uint8_t * const scantable= s->intra_scantable.permutated;
1731 const uint16_t *quant_matrix;
1732 const int qscale= s->qscale;
1738 OPEN_READER(re, &s->gb);
1741 quant_matrix = s->inter_matrix;
1743 quant_matrix = s->chroma_inter_matrix;
1745 /* special case for the first coef. no need to add a second vlc table */
1746 UPDATE_CACHE(re, &s->gb);
1747 if (((int32_t)GET_CACHE(re, &s->gb)) < 0) {
1748 level= (3*qscale*quant_matrix[0])>>5;
1749 if(GET_CACHE(re, &s->gb)&0x40000000)
1754 SKIP_BITS(re, &s->gb, 2);
1755 if(((int32_t)GET_CACHE(re, &s->gb)) <= (int32_t)0xBFFFFFFF)
1759 /* now quantify & encode AC coefs */
1761 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2, 0);
1766 level= ((level*2+1)*qscale*quant_matrix[j])>>5;
1767 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1768 SKIP_BITS(re, &s->gb, 1);
1771 run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6);
1772 UPDATE_CACHE(re, &s->gb);
1773 level = SHOW_SBITS(re, &s->gb, 12); SKIP_BITS(re, &s->gb, 12);
1778 level= ((-level*2+1)*qscale*quant_matrix[j])>>5;
1781 level= ((level*2+1)*qscale*quant_matrix[j])>>5;
1785 av_log(s->avctx, AV_LOG_ERROR, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y);
1791 if(((int32_t)GET_CACHE(re, &s->gb)) <= (int32_t)0xBFFFFFFF)
1793 UPDATE_CACHE(re, &s->gb);
1796 LAST_SKIP_BITS(re, &s->gb, 2);
1797 CLOSE_READER(re, &s->gb);
1799 block[63] ^= (mismatch & 1);
1801 s->block_last_index[n] = i;
1805 static inline int mpeg2_fast_decode_block_non_intra(MpegEncContext *s,
1809 int level, i, j, run;
1810 RLTable *rl = &rl_mpeg1;
1811 uint8_t * const scantable= s->intra_scantable.permutated;
1812 const int qscale= s->qscale;
1813 OPEN_READER(re, &s->gb);
1816 /* special case for the first coef. no need to add a second vlc table */
1817 UPDATE_CACHE(re, &s->gb);
1818 if (((int32_t)GET_CACHE(re, &s->gb)) < 0) {
1819 level= (3*qscale)>>1;
1820 if(GET_CACHE(re, &s->gb)&0x40000000)
1824 SKIP_BITS(re, &s->gb, 2);
1825 if(((int32_t)GET_CACHE(re, &s->gb)) <= (int32_t)0xBFFFFFFF)
1829 /* now quantify & encode AC coefs */
1831 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2, 0);
1836 level= ((level*2+1)*qscale)>>1;
1837 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1838 SKIP_BITS(re, &s->gb, 1);
1841 run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6);
1842 UPDATE_CACHE(re, &s->gb);
1843 level = SHOW_SBITS(re, &s->gb, 12); SKIP_BITS(re, &s->gb, 12);
1848 level= ((-level*2+1)*qscale)>>1;
1851 level= ((level*2+1)*qscale)>>1;
1856 if(((int32_t)GET_CACHE(re, &s->gb)) <= (int32_t)0xBFFFFFFF)
1858 UPDATE_CACHE(re, &s->gb);
1861 LAST_SKIP_BITS(re, &s->gb, 2);
1862 CLOSE_READER(re, &s->gb);
1863 s->block_last_index[n] = i;
1868 static inline int mpeg2_decode_block_intra(MpegEncContext *s,
1872 int level, dc, diff, i, j, run;
1875 uint8_t * const scantable= s->intra_scantable.permutated;
1876 const uint16_t *quant_matrix;
1877 const int qscale= s->qscale;
1882 quant_matrix = s->intra_matrix;
1885 quant_matrix = s->chroma_intra_matrix;
1886 component = (n&1) + 1;
1888 diff = decode_dc(&s->gb, component);
1891 dc = s->last_dc[component];
1893 s->last_dc[component] = dc;
1894 block[0] = dc << (3 - s->intra_dc_precision);
1895 dprintf("dc=%d\n", block[0]);
1896 mismatch = block[0] ^ 1;
1898 if (s->intra_vlc_format)
1904 OPEN_READER(re, &s->gb);
1905 /* now quantify & encode AC coefs */
1907 UPDATE_CACHE(re, &s->gb);
1908 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2, 0);
1912 } else if(level != 0) {
1915 level= (level*qscale*quant_matrix[j])>>4;
1916 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1917 LAST_SKIP_BITS(re, &s->gb, 1);
1920 run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6);
1921 UPDATE_CACHE(re, &s->gb);
1922 level = SHOW_SBITS(re, &s->gb, 12); SKIP_BITS(re, &s->gb, 12);
1926 level= (-level*qscale*quant_matrix[j])>>4;
1929 level= (level*qscale*quant_matrix[j])>>4;
1933 av_log(s->avctx, AV_LOG_ERROR, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y);
1940 CLOSE_READER(re, &s->gb);
1942 block[63]^= mismatch&1;
1944 s->block_last_index[n] = i;
1948 static inline int mpeg2_fast_decode_block_intra(MpegEncContext *s,
1952 int level, dc, diff, j, run;
1955 uint8_t * scantable= s->intra_scantable.permutated;
1956 const uint16_t *quant_matrix;
1957 const int qscale= s->qscale;
1961 quant_matrix = s->intra_matrix;
1964 quant_matrix = s->chroma_intra_matrix;
1965 component = (n&1) + 1;
1967 diff = decode_dc(&s->gb, component);
1970 dc = s->last_dc[component];
1972 s->last_dc[component] = dc;
1973 block[0] = dc << (3 - s->intra_dc_precision);
1974 if (s->intra_vlc_format)
1980 OPEN_READER(re, &s->gb);
1981 /* now quantify & encode AC coefs */
1983 UPDATE_CACHE(re, &s->gb);
1984 GET_RL_VLC(level, run, re, &s->gb, rl->rl_vlc[0], TEX_VLC_BITS, 2, 0);
1988 } else if(level != 0) {
1991 level= (level*qscale*quant_matrix[j])>>4;
1992 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
1993 LAST_SKIP_BITS(re, &s->gb, 1);
1996 run = SHOW_UBITS(re, &s->gb, 6)+1; LAST_SKIP_BITS(re, &s->gb, 6);
1997 UPDATE_CACHE(re, &s->gb);
1998 level = SHOW_SBITS(re, &s->gb, 12); SKIP_BITS(re, &s->gb, 12);
2002 level= (-level*qscale*quant_matrix[j])>>4;
2005 level= (level*qscale*quant_matrix[j])>>4;
2011 CLOSE_READER(re, &s->gb);
2014 s->block_last_index[n] = scantable - s->intra_scantable.permutated;
2018 typedef struct Mpeg1Context {
2019 MpegEncContext mpeg_enc_ctx;
2020 int mpeg_enc_ctx_allocated; /* true if decoding context allocated */
2021 int repeat_field; /* true if we must repeat the field */
2022 AVPanScan pan_scan; /** some temporary storage for the panscan */
2024 int swap_uv;//indicate VCR2
2025 int save_aspect_info;
2026 AVRational frame_rate_ext; ///< MPEG-2 specific framerate modificator
2030 static int mpeg_decode_init(AVCodecContext *avctx)
2032 Mpeg1Context *s = avctx->priv_data;
2033 MpegEncContext *s2 = &s->mpeg_enc_ctx;
2036 //we need some parmutation to store
2037 //matrixes, until MPV_common_init()
2038 //set the real permutatuon
2040 s2->dsp.idct_permutation[i]=i;
2042 MPV_decode_defaults(s2);
2044 s->mpeg_enc_ctx.avctx= avctx;
2045 s->mpeg_enc_ctx.flags= avctx->flags;
2046 s->mpeg_enc_ctx.flags2= avctx->flags2;
2047 common_init(&s->mpeg_enc_ctx);
2050 s->mpeg_enc_ctx_allocated = 0;
2051 s->mpeg_enc_ctx.picture_number = 0;
2052 s->repeat_field = 0;
2053 s->mpeg_enc_ctx.codec_id= avctx->codec->id;
2057 static void quant_matrix_rebuild(uint16_t *matrix, const uint8_t *old_perm,
2058 const uint8_t *new_perm){
2059 uint16_t temp_matrix[64];
2062 memcpy(temp_matrix,matrix,64*sizeof(uint16_t));
2065 matrix[new_perm[i]] = temp_matrix[old_perm[i]];
2069 //Call this function when we know all parameters
2070 //it may be called in different places for mpeg1 and mpeg2
2071 static int mpeg_decode_postinit(AVCodecContext *avctx){
2072 Mpeg1Context *s1 = avctx->priv_data;
2073 MpegEncContext *s = &s1->mpeg_enc_ctx;
2074 uint8_t old_permutation[64];
2077 (s1->mpeg_enc_ctx_allocated == 0)||
2078 avctx->coded_width != s->width ||
2079 avctx->coded_height != s->height||
2080 s1->save_aspect_info != s->aspect_ratio_info||
2084 if (s1->mpeg_enc_ctx_allocated) {
2085 ParseContext pc= s->parse_context;
2086 s->parse_context.buffer=0;
2088 s->parse_context= pc;
2091 if( (s->width == 0 )||(s->height == 0))
2094 avcodec_set_dimensions(avctx, s->width, s->height);
2095 avctx->bit_rate = s->bit_rate;
2096 s1->save_aspect_info = s->aspect_ratio_info;
2098 //low_delay may be forced, in this case we will have B frames
2099 //that behave like P frames
2100 avctx->has_b_frames = !(s->low_delay);
2102 if(avctx->sub_id==1){//s->codec_id==avctx->codec_id==CODEC_ID
2104 avctx->time_base.den = frame_rate_tab[s->frame_rate_index].num;
2105 avctx->time_base.num= frame_rate_tab[s->frame_rate_index].den;
2107 avctx->sample_aspect_ratio= av_d2q(
2108 1.0/mpeg1_aspect[s->aspect_ratio_info], 255);
2113 &s->avctx->time_base.den,
2114 &s->avctx->time_base.num,
2115 frame_rate_tab[s->frame_rate_index].num * s1->frame_rate_ext.num,
2116 frame_rate_tab[s->frame_rate_index].den * s1->frame_rate_ext.den,
2119 if(s->aspect_ratio_info > 1){
2120 if( (s1->pan_scan.width == 0 )||(s1->pan_scan.height == 0) ){
2121 s->avctx->sample_aspect_ratio=
2123 mpeg2_aspect[s->aspect_ratio_info],
2124 (AVRational){s->width, s->height}
2127 s->avctx->sample_aspect_ratio=
2129 mpeg2_aspect[s->aspect_ratio_info],
2130 (AVRational){s1->pan_scan.width, s1->pan_scan.height}
2134 s->avctx->sample_aspect_ratio=
2135 mpeg2_aspect[s->aspect_ratio_info];
2139 if(avctx->xvmc_acceleration){
2140 avctx->pix_fmt = avctx->get_format(avctx,pixfmt_xvmc_mpg2_420);
2142 if(s->chroma_format < 2){
2143 avctx->pix_fmt = avctx->get_format(avctx,pixfmt_yuv_420);
2145 if(s->chroma_format == 2){
2146 avctx->pix_fmt = avctx->get_format(avctx,pixfmt_yuv_422);
2148 if(s->chroma_format > 2){
2149 avctx->pix_fmt = avctx->get_format(avctx,pixfmt_yuv_444);
2152 //until then pix_fmt may be changed right after codec init
2153 if( avctx->pix_fmt == PIX_FMT_XVMC_MPEG2_IDCT )
2154 if( avctx->idct_algo == FF_IDCT_AUTO )
2155 avctx->idct_algo = FF_IDCT_SIMPLE;
2157 //quantization matrixes may need reordering
2158 //if dct permutation is changed
2159 memcpy(old_permutation,s->dsp.idct_permutation,64*sizeof(uint8_t));
2161 if (MPV_common_init(s) < 0)
2164 quant_matrix_rebuild(s->intra_matrix, old_permutation,s->dsp.idct_permutation);
2165 quant_matrix_rebuild(s->inter_matrix, old_permutation,s->dsp.idct_permutation);
2166 quant_matrix_rebuild(s->chroma_intra_matrix,old_permutation,s->dsp.idct_permutation);
2167 quant_matrix_rebuild(s->chroma_inter_matrix,old_permutation,s->dsp.idct_permutation);
2169 s1->mpeg_enc_ctx_allocated = 1;
2174 static int mpeg1_decode_picture(AVCodecContext *avctx,
2175 const uint8_t *buf, int buf_size)
2177 Mpeg1Context *s1 = avctx->priv_data;
2178 MpegEncContext *s = &s1->mpeg_enc_ctx;
2179 int ref, f_code, vbv_delay;
2181 if(mpeg_decode_postinit(s->avctx) < 0)
2184 init_get_bits(&s->gb, buf, buf_size*8);
2186 ref = get_bits(&s->gb, 10); /* temporal ref */
2187 s->pict_type = get_bits(&s->gb, 3);
2188 if(s->pict_type == 0 || s->pict_type > 3)
2191 vbv_delay= get_bits(&s->gb, 16);
2192 if (s->pict_type == P_TYPE || s->pict_type == B_TYPE) {
2193 s->full_pel[0] = get_bits1(&s->gb);
2194 f_code = get_bits(&s->gb, 3);
2195 if (f_code == 0 && avctx->error_resilience >= FF_ER_COMPLIANT)
2197 s->mpeg_f_code[0][0] = f_code;
2198 s->mpeg_f_code[0][1] = f_code;
2200 if (s->pict_type == B_TYPE) {
2201 s->full_pel[1] = get_bits1(&s->gb);
2202 f_code = get_bits(&s->gb, 3);
2203 if (f_code == 0 && avctx->error_resilience >= FF_ER_COMPLIANT)
2205 s->mpeg_f_code[1][0] = f_code;
2206 s->mpeg_f_code[1][1] = f_code;
2208 s->current_picture.pict_type= s->pict_type;
2209 s->current_picture.key_frame= s->pict_type == I_TYPE;
2211 if(avctx->debug & FF_DEBUG_PICT_INFO)
2212 av_log(avctx, AV_LOG_DEBUG, "vbv_delay %d, ref %d type:%d\n", vbv_delay, ref, s->pict_type);
2220 static void mpeg_decode_sequence_extension(Mpeg1Context *s1)
2222 MpegEncContext *s= &s1->mpeg_enc_ctx;
2223 int horiz_size_ext, vert_size_ext;
2226 skip_bits(&s->gb, 1); /* profil and level esc*/
2227 s->avctx->profile= get_bits(&s->gb, 3);
2228 s->avctx->level= get_bits(&s->gb, 4);
2229 s->progressive_sequence = get_bits1(&s->gb); /* progressive_sequence */
2230 s->chroma_format = get_bits(&s->gb, 2); /* chroma_format 1=420, 2=422, 3=444 */
2231 horiz_size_ext = get_bits(&s->gb, 2);
2232 vert_size_ext = get_bits(&s->gb, 2);
2233 s->width |= (horiz_size_ext << 12);
2234 s->height |= (vert_size_ext << 12);
2235 bit_rate_ext = get_bits(&s->gb, 12); /* XXX: handle it */
2236 s->bit_rate += (bit_rate_ext << 18) * 400;
2237 skip_bits1(&s->gb); /* marker */
2238 s->avctx->rc_buffer_size += get_bits(&s->gb, 8)*1024*16<<10;
2240 s->low_delay = get_bits1(&s->gb);
2241 if(s->flags & CODEC_FLAG_LOW_DELAY) s->low_delay=1;
2243 s1->frame_rate_ext.num = get_bits(&s->gb, 2)+1;
2244 s1->frame_rate_ext.den = get_bits(&s->gb, 5)+1;
2246 dprintf("sequence extension\n");
2247 s->codec_id= s->avctx->codec_id= CODEC_ID_MPEG2VIDEO;
2248 s->avctx->sub_id = 2; /* indicates mpeg2 found */
2250 if(s->avctx->debug & FF_DEBUG_PICT_INFO)
2251 av_log(s->avctx, AV_LOG_DEBUG, "profile: %d, level: %d vbv buffer: %d, bitrate:%d\n",
2252 s->avctx->profile, s->avctx->level, s->avctx->rc_buffer_size, s->bit_rate);
2256 static void mpeg_decode_sequence_display_extension(Mpeg1Context *s1)
2258 MpegEncContext *s= &s1->mpeg_enc_ctx;
2259 int color_description, w, h;
2261 skip_bits(&s->gb, 3); /* video format */
2262 color_description= get_bits1(&s->gb);
2263 if(color_description){
2264 skip_bits(&s->gb, 8); /* color primaries */
2265 skip_bits(&s->gb, 8); /* transfer_characteristics */
2266 skip_bits(&s->gb, 8); /* matrix_coefficients */
2268 w= get_bits(&s->gb, 14);
2269 skip_bits(&s->gb, 1); //marker
2270 h= get_bits(&s->gb, 14);
2271 skip_bits(&s->gb, 1); //marker
2273 s1->pan_scan.width= 16*w;
2274 s1->pan_scan.height=16*h;
2276 if(s->avctx->debug & FF_DEBUG_PICT_INFO)
2277 av_log(s->avctx, AV_LOG_DEBUG, "sde w:%d, h:%d\n", w, h);
2280 static void mpeg_decode_picture_display_extension(Mpeg1Context *s1)
2282 MpegEncContext *s= &s1->mpeg_enc_ctx;
2286 if(s->progressive_sequence){
2287 if(s->repeat_first_field){
2289 if(s->top_field_first)
2293 if(s->picture_structure == PICT_FRAME){
2295 if(s->repeat_first_field)
2299 for(i=0; i<nofco; i++){
2300 s1->pan_scan.position[i][0]= get_sbits(&s->gb, 16);
2301 skip_bits(&s->gb, 1); //marker
2302 s1->pan_scan.position[i][1]= get_sbits(&s->gb, 16);
2303 skip_bits(&s->gb, 1); //marker
2306 if(s->avctx->debug & FF_DEBUG_PICT_INFO)
2307 av_log(s->avctx, AV_LOG_DEBUG, "pde (%d,%d) (%d,%d) (%d,%d)\n",
2308 s1->pan_scan.position[0][0], s1->pan_scan.position[0][1],
2309 s1->pan_scan.position[1][0], s1->pan_scan.position[1][1],
2310 s1->pan_scan.position[2][0], s1->pan_scan.position[2][1]
2314 static void mpeg_decode_quant_matrix_extension(MpegEncContext *s)
2318 dprintf("matrix extension\n");
2320 if (get_bits1(&s->gb)) {
2322 v = get_bits(&s->gb, 8);
2323 j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ];
2324 s->intra_matrix[j] = v;
2325 s->chroma_intra_matrix[j] = v;
2328 if (get_bits1(&s->gb)) {
2330 v = get_bits(&s->gb, 8);
2331 j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ];
2332 s->inter_matrix[j] = v;
2333 s->chroma_inter_matrix[j] = v;
2336 if (get_bits1(&s->gb)) {
2338 v = get_bits(&s->gb, 8);
2339 j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ];
2340 s->chroma_intra_matrix[j] = v;
2343 if (get_bits1(&s->gb)) {
2345 v = get_bits(&s->gb, 8);
2346 j= s->dsp.idct_permutation[ ff_zigzag_direct[i] ];
2347 s->chroma_inter_matrix[j] = v;
2352 static void mpeg_decode_picture_coding_extension(MpegEncContext *s)
2354 s->full_pel[0] = s->full_pel[1] = 0;
2355 s->mpeg_f_code[0][0] = get_bits(&s->gb, 4);
2356 s->mpeg_f_code[0][1] = get_bits(&s->gb, 4);
2357 s->mpeg_f_code[1][0] = get_bits(&s->gb, 4);
2358 s->mpeg_f_code[1][1] = get_bits(&s->gb, 4);
2359 s->intra_dc_precision = get_bits(&s->gb, 2);
2360 s->picture_structure = get_bits(&s->gb, 2);
2361 s->top_field_first = get_bits1(&s->gb);
2362 s->frame_pred_frame_dct = get_bits1(&s->gb);
2363 s->concealment_motion_vectors = get_bits1(&s->gb);
2364 s->q_scale_type = get_bits1(&s->gb);
2365 s->intra_vlc_format = get_bits1(&s->gb);
2366 s->alternate_scan = get_bits1(&s->gb);
2367 s->repeat_first_field = get_bits1(&s->gb);
2368 s->chroma_420_type = get_bits1(&s->gb);
2369 s->progressive_frame = get_bits1(&s->gb);
2371 if(s->picture_structure == PICT_FRAME)
2374 s->first_field ^= 1;
2375 memset(s->mbskip_table, 0, s->mb_stride*s->mb_height);
2378 if(s->alternate_scan){
2379 ff_init_scantable(s->dsp.idct_permutation, &s->inter_scantable , ff_alternate_vertical_scan);
2380 ff_init_scantable(s->dsp.idct_permutation, &s->intra_scantable , ff_alternate_vertical_scan);
2382 ff_init_scantable(s->dsp.idct_permutation, &s->inter_scantable , ff_zigzag_direct);
2383 ff_init_scantable(s->dsp.idct_permutation, &s->intra_scantable , ff_zigzag_direct);
2386 /* composite display not parsed */
2387 dprintf("intra_dc_precision=%d\n", s->intra_dc_precision);
2388 dprintf("picture_structure=%d\n", s->picture_structure);
2389 dprintf("top field first=%d\n", s->top_field_first);
2390 dprintf("repeat first field=%d\n", s->repeat_first_field);
2391 dprintf("conceal=%d\n", s->concealment_motion_vectors);
2392 dprintf("intra_vlc_format=%d\n", s->intra_vlc_format);
2393 dprintf("alternate_scan=%d\n", s->alternate_scan);
2394 dprintf("frame_pred_frame_dct=%d\n", s->frame_pred_frame_dct);
2395 dprintf("progressive_frame=%d\n", s->progressive_frame);
2398 static void mpeg_decode_extension(AVCodecContext *avctx,
2399 const uint8_t *buf, int buf_size)
2401 Mpeg1Context *s1 = avctx->priv_data;
2402 MpegEncContext *s = &s1->mpeg_enc_ctx;
2405 init_get_bits(&s->gb, buf, buf_size*8);
2407 ext_type = get_bits(&s->gb, 4);
2410 mpeg_decode_sequence_extension(s1);
2413 mpeg_decode_sequence_display_extension(s1);
2416 mpeg_decode_quant_matrix_extension(s);
2419 mpeg_decode_picture_display_extension(s1);
2422 mpeg_decode_picture_coding_extension(s);
2427 static void exchange_uv(MpegEncContext *s){
2428 short * tmp = s->pblocks[4];
2429 s->pblocks[4] = s->pblocks[5];
2430 s->pblocks[5] = tmp;
2433 static int mpeg_field_start(MpegEncContext *s){
2434 AVCodecContext *avctx= s->avctx;
2435 Mpeg1Context *s1 = (Mpeg1Context*)s;
2437 /* start frame decoding */
2438 if(s->first_field || s->picture_structure==PICT_FRAME){
2439 if(MPV_frame_start(s, avctx) < 0)
2442 ff_er_frame_start(s);
2444 /* first check if we must repeat the frame */
2445 s->current_picture_ptr->repeat_pict = 0;
2446 if (s->repeat_first_field) {
2447 if (s->progressive_sequence) {
2448 if (s->top_field_first)
2449 s->current_picture_ptr->repeat_pict = 4;
2451 s->current_picture_ptr->repeat_pict = 2;
2452 } else if (s->progressive_frame) {
2453 s->current_picture_ptr->repeat_pict = 1;
2457 *s->current_picture_ptr->pan_scan= s1->pan_scan;
2458 }else{ //second field
2461 if(!s->current_picture_ptr){
2462 av_log(s->avctx, AV_LOG_ERROR, "first field missing\n");
2467 s->current_picture.data[i] = s->current_picture_ptr->data[i];
2468 if(s->picture_structure == PICT_BOTTOM_FIELD){
2469 s->current_picture.data[i] += s->current_picture_ptr->linesize[i];
2474 // MPV_frame_start will call this function too,
2475 // but we need to call it on every field
2476 if(s->avctx->xvmc_acceleration)
2477 XVMC_field_start(s,avctx);
2483 #define DECODE_SLICE_ERROR -1
2484 #define DECODE_SLICE_OK 0
2487 * decodes a slice. MpegEncContext.mb_y must be set to the MB row from the startcode
2488 * @return DECODE_SLICE_ERROR if the slice is damaged<br>
2489 * DECODE_SLICE_OK if this slice is ok<br>
2491 static int mpeg_decode_slice(Mpeg1Context *s1, int mb_y,
2492 const uint8_t **buf, int buf_size)
2494 MpegEncContext *s = &s1->mpeg_enc_ctx;
2495 AVCodecContext *avctx= s->avctx;
2497 const int field_pic= s->picture_structure != PICT_FRAME;
2498 const int lowres= s->avctx->lowres;
2503 if (mb_y<<field_pic >= s->mb_height){
2504 av_log(s->avctx, AV_LOG_ERROR, "slice below image (%d >= %d)\n", mb_y, s->mb_height);
2508 init_get_bits(&s->gb, *buf, buf_size*8);
2510 ff_mpeg1_clean_buffers(s);
2511 s->interlaced_dct = 0;
2513 s->qscale = get_qscale(s);
2516 av_log(s->avctx, AV_LOG_ERROR, "qscale == 0\n");
2520 /* extra slice info */
2521 while (get_bits1(&s->gb) != 0) {
2522 skip_bits(&s->gb, 8);
2528 int code = get_vlc2(&s->gb, mbincr_vlc.table, MBINCR_VLC_BITS, 2);
2530 av_log(s->avctx, AV_LOG_ERROR, "first mb_incr damaged\n");
2537 /* otherwise, stuffing, nothing to do */
2544 s->resync_mb_x= s->mb_x;
2545 s->resync_mb_y= s->mb_y= mb_y;
2547 ff_init_block_index(s);
2549 if (s->mb_y==0 && s->mb_x==0 && (s->first_field || s->picture_structure==PICT_FRAME)) {
2550 if(s->avctx->debug&FF_DEBUG_PICT_INFO){
2551 av_log(s->avctx, AV_LOG_DEBUG, "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",
2552 s->qscale, s->mpeg_f_code[0][0],s->mpeg_f_code[0][1],s->mpeg_f_code[1][0],s->mpeg_f_code[1][1],
2553 s->pict_type == I_TYPE ? "I" : (s->pict_type == P_TYPE ? "P" : (s->pict_type == B_TYPE ? "B" : "S")),
2554 s->progressive_sequence ? "ps" :"", s->progressive_frame ? "pf" : "", s->alternate_scan ? "alt" :"", s->top_field_first ? "top" :"",
2555 s->intra_dc_precision, s->picture_structure, s->frame_pred_frame_dct, s->concealment_motion_vectors,
2556 s->q_scale_type, s->intra_vlc_format, s->repeat_first_field, s->chroma_420_type ? "420" :"");
2562 //one 1 we memcpy blocks in xvmcvideo
2563 if(s->avctx->xvmc_acceleration > 1)
2564 XVMC_init_block(s);//set s->block
2567 ret = mpeg_decode_mb(s, s->block);
2568 s->chroma_qscale= s->qscale;
2570 dprintf("ret=%d\n", ret);
2574 if(s->current_picture.motion_val[0] && !s->encoding){ //note motion_val is normally NULL unless we want to extract the MVs
2575 const int wrap = field_pic ? 2*s->b8_stride : s->b8_stride;
2576 int xy = s->mb_x*2 + s->mb_y*2*wrap;
2577 int motion_x, motion_y, dir, i;
2578 if(field_pic && !s->first_field)
2582 for(dir=0; dir<2; dir++){
2583 if (s->mb_intra || (dir==1 && s->pict_type != B_TYPE)) {
2584 motion_x = motion_y = 0;
2585 }else if (s->mv_type == MV_TYPE_16X16 || (s->mv_type == MV_TYPE_FIELD && field_pic)){
2586 motion_x = s->mv[dir][0][0];
2587 motion_y = s->mv[dir][0][1];
2588 } else /*if ((s->mv_type == MV_TYPE_FIELD) || (s->mv_type == MV_TYPE_16X8))*/ {
2589 motion_x = s->mv[dir][i][0];
2590 motion_y = s->mv[dir][i][1];
2593 s->current_picture.motion_val[dir][xy ][0] = motion_x;
2594 s->current_picture.motion_val[dir][xy ][1] = motion_y;
2595 s->current_picture.motion_val[dir][xy + 1][0] = motion_x;
2596 s->current_picture.motion_val[dir][xy + 1][1] = motion_y;
2597 s->current_picture.ref_index [dir][xy ]=
2598 s->current_picture.ref_index [dir][xy + 1]= s->field_select[dir][i];
2599 assert(s->field_select[dir][i]==0 || s->field_select[dir][i]==1);
2605 s->dest[0] += 16 >> lowres;
2606 s->dest[1] += 16 >> (s->chroma_x_shift + lowres);
2607 s->dest[2] += 16 >> (s->chroma_x_shift + lowres);
2609 MPV_decode_mb(s, s->block);
2611 if (++s->mb_x >= s->mb_width) {
2612 const int mb_size= 16>>s->avctx->lowres;
2614 ff_draw_horiz_band(s, mb_size*s->mb_y, mb_size);
2619 if(s->mb_y<<field_pic >= s->mb_height){
2620 int left= s->gb.size_in_bits - get_bits_count(&s->gb);
2622 if(left < 0 || (left && show_bits(&s->gb, FFMIN(left, 23)))
2623 || (avctx->error_resilience >= FF_ER_AGGRESSIVE && left>8)){
2624 av_log(avctx, AV_LOG_ERROR, "end mismatch left=%d\n", left);
2630 ff_init_block_index(s);
2633 /* skip mb handling */
2634 if (s->mb_skip_run == -1) {
2635 /* read again increment */
2638 int code = get_vlc2(&s->gb, mbincr_vlc.table, MBINCR_VLC_BITS, 2);
2640 av_log(s->avctx, AV_LOG_ERROR, "mb incr damaged\n");
2645 s->mb_skip_run += 33;
2646 }else if(code == 35){
2647 if(s->mb_skip_run != 0 || show_bits(&s->gb, 15) != 0){
2648 av_log(s->avctx, AV_LOG_ERROR, "slice mismatch\n");
2651 goto eos; /* end of slice */
2653 /* otherwise, stuffing, nothing to do */
2655 s->mb_skip_run += code;
2661 eos: // end of slice
2662 *buf += get_bits_count(&s->gb)/8 - 1;
2663 //printf("y %d %d %d %d\n", s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y);
2667 static int slice_decode_thread(AVCodecContext *c, void *arg){
2668 MpegEncContext *s= arg;
2669 const uint8_t *buf= s->gb.buffer;
2670 int mb_y= s->start_mb_y;
2672 s->error_count= 3*(s->end_mb_y - s->start_mb_y)*s->mb_width;
2675 int start_code, ret;
2677 ret= mpeg_decode_slice((Mpeg1Context*)s, mb_y, &buf, s->gb.buffer_end - buf);
2679 //av_log(c, AV_LOG_DEBUG, "ret:%d resync:%d/%d mb:%d/%d ts:%d/%d ec:%d\n",
2680 //ret, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, s->start_mb_y, s->end_mb_y, s->error_count);
2682 if(s->resync_mb_x>=0 && s->resync_mb_y>=0)
2683 ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, AC_ERROR|DC_ERROR|MV_ERROR);
2685 ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x-1, s->mb_y, AC_END|DC_END|MV_END);
2688 if(s->mb_y == s->end_mb_y)
2692 buf = ff_find_start_code(buf, s->gb.buffer_end, &start_code);
2693 mb_y= start_code - SLICE_MIN_START_CODE;
2694 if(mb_y < 0 || mb_y >= s->end_mb_y)
2698 return 0; //not reached
2702 * handles slice ends.
2703 * @return 1 if it seems to be the last slice of
2705 static int slice_end(AVCodecContext *avctx, AVFrame *pict)
2707 Mpeg1Context *s1 = avctx->priv_data;
2708 MpegEncContext *s = &s1->mpeg_enc_ctx;
2710 if (!s1->mpeg_enc_ctx_allocated || !s->current_picture_ptr)
2714 if(s->avctx->xvmc_acceleration)
2717 /* end of slice reached */
2718 if (/*s->mb_y<<field_pic == s->mb_height &&*/ !s->first_field) {
2721 s->current_picture_ptr->qscale_type= FF_QSCALE_TYPE_MPEG2;
2727 if (s->pict_type == B_TYPE || s->low_delay) {
2728 *pict= *(AVFrame*)s->current_picture_ptr;
2729 ff_print_debug_info(s, pict);
2731 s->picture_number++;
2732 /* latency of 1 frame for I and P frames */
2733 /* XXX: use another variable than picture_number */
2734 if (s->last_picture_ptr != NULL) {
2735 *pict= *(AVFrame*)s->last_picture_ptr;
2736 ff_print_debug_info(s, pict);
2746 static int mpeg1_decode_sequence(AVCodecContext *avctx,
2747 const uint8_t *buf, int buf_size)
2749 Mpeg1Context *s1 = avctx->priv_data;
2750 MpegEncContext *s = &s1->mpeg_enc_ctx;
2754 init_get_bits(&s->gb, buf, buf_size*8);
2756 width = get_bits(&s->gb, 12);
2757 height = get_bits(&s->gb, 12);
2758 if (width <= 0 || height <= 0 ||
2759 (width % 2) != 0 || (height % 2) != 0)
2761 s->aspect_ratio_info= get_bits(&s->gb, 4);
2762 if (s->aspect_ratio_info == 0)
2764 s->frame_rate_index = get_bits(&s->gb, 4);
2765 if (s->frame_rate_index == 0 || s->frame_rate_index > 13)
2767 s->bit_rate = get_bits(&s->gb, 18) * 400;
2768 if (get_bits1(&s->gb) == 0) /* marker */
2773 s->avctx->rc_buffer_size= get_bits(&s->gb, 10) * 1024*16;
2774 skip_bits(&s->gb, 1);
2777 if (get_bits1(&s->gb)) {
2779 v = get_bits(&s->gb, 8);
2781 av_log(s->avctx, AV_LOG_ERROR, "intra matrix damaged\n");
2784 j = s->dsp.idct_permutation[ ff_zigzag_direct[i] ];
2785 s->intra_matrix[j] = v;
2786 s->chroma_intra_matrix[j] = v;
2789 dprintf("intra matrix present\n");
2791 dprintf(" %d", s->intra_matrix[s->dsp.idct_permutation[i]]);
2796 j = s->dsp.idct_permutation[i];
2797 v = ff_mpeg1_default_intra_matrix[i];
2798 s->intra_matrix[j] = v;
2799 s->chroma_intra_matrix[j] = v;
2802 if (get_bits1(&s->gb)) {
2804 v = get_bits(&s->gb, 8);
2806 av_log(s->avctx, AV_LOG_ERROR, "inter matrix damaged\n");
2809 j = s->dsp.idct_permutation[ ff_zigzag_direct[i] ];
2810 s->inter_matrix[j] = v;
2811 s->chroma_inter_matrix[j] = v;
2814 dprintf("non intra matrix present\n");
2816 dprintf(" %d", s->inter_matrix[s->dsp.idct_permutation[i]]);
2821 int j= s->dsp.idct_permutation[i];
2822 v = ff_mpeg1_default_non_intra_matrix[i];
2823 s->inter_matrix[j] = v;
2824 s->chroma_inter_matrix[j] = v;
2828 if(show_bits(&s->gb, 23) != 0){
2829 av_log(s->avctx, AV_LOG_ERROR, "sequence header damaged\n");
2833 /* we set mpeg2 parameters so that it emulates mpeg1 */
2834 s->progressive_sequence = 1;
2835 s->progressive_frame = 1;
2836 s->picture_structure = PICT_FRAME;
2837 s->frame_pred_frame_dct = 1;
2838 s->chroma_format = 1;
2839 s->codec_id= s->avctx->codec_id= CODEC_ID_MPEG1VIDEO;
2840 avctx->sub_id = 1; /* indicates mpeg1 */
2841 s->out_format = FMT_MPEG1;
2842 s->swap_uv = 0;//AFAIK VCR2 don't have SEQ_HEADER
2843 if(s->flags & CODEC_FLAG_LOW_DELAY) s->low_delay=1;
2845 if(s->avctx->debug & FF_DEBUG_PICT_INFO)
2846 av_log(s->avctx, AV_LOG_DEBUG, "vbv buffer: %d, bitrate:%d\n",
2847 s->avctx->rc_buffer_size, s->bit_rate);
2852 static int vcr2_init_sequence(AVCodecContext *avctx)
2854 Mpeg1Context *s1 = avctx->priv_data;
2855 MpegEncContext *s = &s1->mpeg_enc_ctx;
2858 /* start new mpeg1 context decoding */
2859 s->out_format = FMT_MPEG1;
2860 if (s1->mpeg_enc_ctx_allocated) {
2863 s->width = avctx->coded_width;
2864 s->height = avctx->coded_height;
2865 avctx->has_b_frames= 0; //true?
2868 if(avctx->xvmc_acceleration){
2869 avctx->pix_fmt = avctx->get_format(avctx,pixfmt_xvmc_mpg2_420);
2871 avctx->pix_fmt = avctx->get_format(avctx,pixfmt_yuv_420);
2874 if( avctx->pix_fmt == PIX_FMT_XVMC_MPEG2_IDCT )
2875 if( avctx->idct_algo == FF_IDCT_AUTO )
2876 avctx->idct_algo = FF_IDCT_SIMPLE;
2878 if (MPV_common_init(s) < 0)
2880 exchange_uv(s);//common init reset pblocks, so we swap them here
2881 s->swap_uv = 1;// in case of xvmc we need to swap uv for each MB
2882 s1->mpeg_enc_ctx_allocated = 1;
2885 int j= s->dsp.idct_permutation[i];
2886 v = ff_mpeg1_default_intra_matrix[i];
2887 s->intra_matrix[j] = v;
2888 s->chroma_intra_matrix[j] = v;
2890 v = ff_mpeg1_default_non_intra_matrix[i];
2891 s->inter_matrix[j] = v;
2892 s->chroma_inter_matrix[j] = v;
2895 s->progressive_sequence = 1;
2896 s->progressive_frame = 1;
2897 s->picture_structure = PICT_FRAME;
2898 s->frame_pred_frame_dct = 1;
2899 s->chroma_format = 1;
2900 s->codec_id= s->avctx->codec_id= CODEC_ID_MPEG2VIDEO;
2901 avctx->sub_id = 2; /* indicates mpeg2 */
2906 static void mpeg_decode_user_data(AVCodecContext *avctx,
2907 const uint8_t *buf, int buf_size)
2914 /* we parse the DTG active format information */
2916 p[0] == 'D' && p[1] == 'T' && p[2] == 'G' && p[3] == '1') {
2930 avctx->dtg_active_format = p[0] & 0x0f;
2935 static void mpeg_decode_gop(AVCodecContext *avctx,
2936 const uint8_t *buf, int buf_size){
2937 Mpeg1Context *s1 = avctx->priv_data;
2938 MpegEncContext *s = &s1->mpeg_enc_ctx;
2940 int drop_frame_flag;
2941 int time_code_hours, time_code_minutes;
2942 int time_code_seconds, time_code_pictures;
2945 init_get_bits(&s->gb, buf, buf_size*8);
2947 drop_frame_flag = get_bits1(&s->gb);
2949 time_code_hours=get_bits(&s->gb,5);
2950 time_code_minutes = get_bits(&s->gb,6);
2951 skip_bits1(&s->gb);//marker bit
2952 time_code_seconds = get_bits(&s->gb,6);
2953 time_code_pictures = get_bits(&s->gb,6);
2955 /*broken_link indicate that after editing the
2956 reference frames of the first B-Frames after GOP I-Frame
2957 are missing (open gop)*/
2958 broken_link = get_bits1(&s->gb);
2960 if(s->avctx->debug & FF_DEBUG_PICT_INFO)
2961 av_log(s->avctx, AV_LOG_DEBUG, "GOP (%2d:%02d:%02d.[%02d]) broken_link=%d\n",
2962 time_code_hours, time_code_minutes, time_code_seconds,
2963 time_code_pictures, broken_link);
2966 * finds the end of the current frame in the bitstream.
2967 * @return the position of the first byte of the next frame, or -1
2969 int ff_mpeg1_find_frame_end(ParseContext *pc, const uint8_t *buf, int buf_size)
2972 uint32_t state= pc->state;
2975 if(!pc->frame_start_found){
2976 for(i=0; i<buf_size; i++){
2977 i= ff_find_start_code(buf+i, buf+buf_size, &state) - buf - 1;
2978 if(state >= SLICE_MIN_START_CODE && state <= SLICE_MAX_START_CODE){
2980 pc->frame_start_found=1;
2986 if(pc->frame_start_found){
2987 /* EOF considered as end of frame */
2990 for(; i<buf_size; i++){
2991 i= ff_find_start_code(buf+i, buf+buf_size, &state) - buf - 1;
2992 if((state&0xFFFFFF00) == 0x100){
2993 if(state < SLICE_MIN_START_CODE || state > SLICE_MAX_START_CODE){
2994 pc->frame_start_found=0;
3002 return END_NOT_FOUND;
3005 /* handle buffering and image synchronisation */
3006 static int mpeg_decode_frame(AVCodecContext *avctx,
3007 void *data, int *data_size,
3008 uint8_t *buf, int buf_size)
3010 Mpeg1Context *s = avctx->priv_data;
3011 const uint8_t *buf_end;
3012 const uint8_t *buf_ptr;
3013 int ret, start_code, input_size;
3014 AVFrame *picture = data;
3015 MpegEncContext *s2 = &s->mpeg_enc_ctx;
3016 dprintf("fill_buffer\n");
3018 if (buf_size == 0) {
3019 /* special case for last picture */
3020 if (s2->low_delay==0 && s2->next_picture_ptr) {
3021 *picture= *(AVFrame*)s2->next_picture_ptr;
3022 s2->next_picture_ptr= NULL;
3024 *data_size = sizeof(AVFrame);
3029 if(s2->flags&CODEC_FLAG_TRUNCATED){
3030 int next= ff_mpeg1_find_frame_end(&s2->parse_context, buf, buf_size);
3032 if( ff_combine_frame(&s2->parse_context, next, &buf, &buf_size) < 0 )
3037 buf_end = buf + buf_size;
3040 if (s->repeat_field % 2 == 1) {
3042 //fprintf(stderr,"\nRepeating last frame: %d -> %d! pict: %d %d", avctx->frame_number-1, avctx->frame_number,
3043 // s2->picture_number, s->repeat_field);
3044 if (avctx->flags & CODEC_FLAG_REPEAT_FIELD) {
3045 *data_size = sizeof(AVPicture);
3051 if(s->mpeg_enc_ctx_allocated==0 && avctx->codec_tag == ff_get_fourcc("VCR2"))
3052 vcr2_init_sequence(avctx);
3057 /* find start next code */
3059 buf_ptr = ff_find_start_code(buf_ptr,buf_end, &start_code);
3060 if (start_code < 0){
3061 if(s2->pict_type != B_TYPE || avctx->skip_frame <= AVDISCARD_DEFAULT){
3062 if(avctx->thread_count > 1){
3065 avctx->execute(avctx, slice_decode_thread, (void**)&(s2->thread_context[0]), NULL, s->slice_count);
3066 for(i=0; i<s->slice_count; i++)
3067 s2->error_count += s2->thread_context[i]->error_count;
3069 if (slice_end(avctx, picture)) {
3070 if(s2->last_picture_ptr || s2->low_delay) //FIXME merge with the stuff in mpeg_decode_slice
3071 *data_size = sizeof(AVPicture);
3074 return FFMAX(0, buf_ptr - buf - s2->parse_context.last_index);
3077 input_size = buf_end - buf_ptr;
3079 if(avctx->debug & FF_DEBUG_STARTCODE){
3080 av_log(avctx, AV_LOG_DEBUG, "%3X at %zd left %d\n", start_code, buf_ptr-buf, input_size);
3083 /* prepare data for next start code */
3084 switch(start_code) {
3085 case SEQ_START_CODE:
3086 mpeg1_decode_sequence(avctx, buf_ptr,
3090 case PICTURE_START_CODE:
3091 /* we have a complete image : we try to decompress it */
3092 mpeg1_decode_picture(avctx,
3093 buf_ptr, input_size);
3095 case EXT_START_CODE:
3096 mpeg_decode_extension(avctx,
3097 buf_ptr, input_size);
3099 case USER_START_CODE:
3100 mpeg_decode_user_data(avctx,
3101 buf_ptr, input_size);
3103 case GOP_START_CODE:
3105 mpeg_decode_gop(avctx,
3106 buf_ptr, input_size);
3109 if (start_code >= SLICE_MIN_START_CODE &&
3110 start_code <= SLICE_MAX_START_CODE) {
3111 int mb_y= start_code - SLICE_MIN_START_CODE;
3113 if(s2->last_picture_ptr==NULL){
3114 /* skip b frames if we dont have reference frames */
3115 if(s2->pict_type==B_TYPE) break;
3116 /* skip P frames if we dont have reference frame no valid header */
3117 if(s2->pict_type==P_TYPE && !s2->first_slice) break;
3119 /* skip b frames if we are in a hurry */
3120 if(avctx->hurry_up && s2->pict_type==B_TYPE) break;
3121 if( (avctx->skip_frame >= AVDISCARD_NONREF && s2->pict_type==B_TYPE)
3122 ||(avctx->skip_frame >= AVDISCARD_NONKEY && s2->pict_type!=I_TYPE)
3123 || avctx->skip_frame >= AVDISCARD_ALL)
3125 /* skip everything if we are in a hurry>=5 */
3126 if(avctx->hurry_up>=5) break;
3128 if (!s->mpeg_enc_ctx_allocated) break;
3130 if(s2->codec_id == CODEC_ID_MPEG2VIDEO){
3131 if(mb_y < avctx->skip_top || mb_y >= s2->mb_height - avctx->skip_bottom)
3135 if(s2->first_slice){
3137 if(mpeg_field_start(s2) < 0)
3141 if(avctx->thread_count > 1){
3142 int threshold= (s2->mb_height*s->slice_count + avctx->thread_count/2) / avctx->thread_count;
3143 if(threshold <= mb_y){
3144 MpegEncContext *thread_context= s2->thread_context[s->slice_count];
3146 thread_context->start_mb_y= mb_y;
3147 thread_context->end_mb_y = s2->mb_height;
3149 s2->thread_context[s->slice_count-1]->end_mb_y= mb_y;
3150 ff_update_duplicate_context(thread_context, s2);
3152 init_get_bits(&thread_context->gb, buf_ptr, input_size*8);
3155 buf_ptr += 2; //FIXME add minimum num of bytes per slice
3157 ret = mpeg_decode_slice(s, mb_y, &buf_ptr, input_size);
3161 if(s2->resync_mb_x>=0 && s2->resync_mb_y>=0)
3162 ff_er_add_slice(s2, s2->resync_mb_x, s2->resync_mb_y, s2->mb_x, s2->mb_y, AC_ERROR|DC_ERROR|MV_ERROR);
3164 ff_er_add_slice(s2, s2->resync_mb_x, s2->resync_mb_y, s2->mb_x-1, s2->mb_y, AC_END|DC_END|MV_END);
3173 static int mpeg_decode_end(AVCodecContext *avctx)
3175 Mpeg1Context *s = avctx->priv_data;
3177 if (s->mpeg_enc_ctx_allocated)
3178 MPV_common_end(&s->mpeg_enc_ctx);
3182 AVCodec mpeg1video_decoder = {
3185 CODEC_ID_MPEG1VIDEO,
3186 sizeof(Mpeg1Context),
3191 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1 | CODEC_CAP_TRUNCATED | CODEC_CAP_DELAY,
3192 .flush= ff_mpeg_flush,
3195 AVCodec mpeg2video_decoder = {
3198 CODEC_ID_MPEG2VIDEO,
3199 sizeof(Mpeg1Context),
3204 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1 | CODEC_CAP_TRUNCATED | CODEC_CAP_DELAY,
3205 .flush= ff_mpeg_flush,
3209 AVCodec mpegvideo_decoder = {
3212 CODEC_ID_MPEG2VIDEO,
3213 sizeof(Mpeg1Context),
3218 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1 | CODEC_CAP_TRUNCATED | CODEC_CAP_DELAY,
3219 .flush= ff_mpeg_flush,
3222 #ifdef CONFIG_ENCODERS
3224 AVCodec mpeg1video_encoder = {
3227 CODEC_ID_MPEG1VIDEO,
3228 sizeof(MpegEncContext),
3232 .supported_framerates= frame_rate_tab+1,
3233 .pix_fmts= (enum PixelFormat[]){PIX_FMT_YUV420P, -1},
3234 .capabilities= CODEC_CAP_DELAY,
3237 AVCodec mpeg2video_encoder = {
3240 CODEC_ID_MPEG2VIDEO,
3241 sizeof(MpegEncContext),
3245 .supported_framerates= frame_rate_tab+1,
3246 .pix_fmts= (enum PixelFormat[]){PIX_FMT_YUV420P, -1},
3247 .capabilities= CODEC_CAP_DELAY,
3252 static int mpeg_mc_decode_init(AVCodecContext *avctx){
3255 if( avctx->thread_count > 1)
3257 if( !(avctx->slice_flags & SLICE_FLAG_CODED_ORDER) )
3259 if( !(avctx->slice_flags & SLICE_FLAG_ALLOW_FIELD) ){
3260 dprintf("mpeg12.c: XvMC decoder will work better if SLICE_FLAG_ALLOW_FIELD is set\n");
3262 mpeg_decode_init(avctx);
3263 s = avctx->priv_data;
3265 avctx->pix_fmt = PIX_FMT_XVMC_MPEG2_IDCT;
3266 avctx->xvmc_acceleration = 2;//2 - the blocks are packed!
3271 AVCodec mpeg_xvmc_decoder = {
3274 CODEC_ID_MPEG2VIDEO_XVMC,
3275 sizeof(Mpeg1Context),
3276 mpeg_mc_decode_init,
3280 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1 | CODEC_CAP_TRUNCATED| CODEC_CAP_HWACCEL | CODEC_CAP_DELAY,
3281 .flush= ff_mpeg_flush,
3286 /* this is ugly i know, but the alternative is too make
3287 hundreds of vars global and prefix them with ff_mpeg1_
3288 which is far uglier. */