3 * Copyright (c) 2001 Fabrice Bellard.
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 #include "mpegvideo.h"
24 #define PRINT_QP(a, b) {}
26 #define PRINT_QP(a, b) printf(a, b)
30 //#define PRINT_FRAME_TIME
31 #ifdef PRINT_FRAME_TIME
32 static inline long long rdtsc()
35 asm volatile( "rdtsc\n\t"
38 // printf("%d\n", int(l/1000));
43 static int h263_decode_init(AVCodecContext *avctx)
45 MpegEncContext *s = avctx->priv_data;
48 s->out_format = FMT_H263;
50 s->width = avctx->width;
51 s->height = avctx->height;
52 s->workaround_bugs= avctx->workaround_bugs;
56 s->progressive_sequence=1;
57 s->decode_mb= ff_h263_decode_mb;
59 /* select sub codec */
60 switch(avctx->codec->id) {
65 s->time_increment_bits = 4; /* default value for broken headers */
67 s->has_b_frames = 1; //default, might be overriden in the vol header during header parsing
69 case CODEC_ID_MSMPEG4V1:
74 case CODEC_ID_MSMPEG4V2:
79 case CODEC_ID_MSMPEG4V3:
100 s->codec_id= avctx->codec->id;
102 /* for h263, we allocate the images after having read the header */
103 if (avctx->codec->id != CODEC_ID_H263 && avctx->codec->id != CODEC_ID_MPEG4)
104 if (MPV_common_init(s) < 0)
108 ff_msmpeg4_decode_init(s);
110 h263_decode_init_vlc(s);
115 static int h263_decode_end(AVCodecContext *avctx)
117 MpegEncContext *s = avctx->priv_data;
124 * retunrs the number of bytes consumed for building the current frame
126 static int get_consumed_bytes(MpegEncContext *s, int buf_size){
127 int pos= (get_bits_count(&s->gb)+7)>>3;
129 if(s->divx_version>=500){
130 //we would have to scan through the whole buf to handle the weird reordering ...
132 }else if(s->flags&CODEC_FLAG_TRUNCATED){
133 pos -= s->parse_context.last_index;
134 if(pos<0) pos=0; // padding is not really read so this might be -1
137 if(pos==0) pos=1; //avoid infinite loops (i doubt thats needed but ...)
138 if(pos+10>buf_size) pos=buf_size; // oops ;)
144 static int decode_slice(MpegEncContext *s){
145 s->last_resync_gb= s->gb;
146 s->first_slice_line= 1;
148 s->resync_mb_x= s->mb_x;
149 s->resync_mb_y= s->mb_y;
151 s->y_dc_scale= s->y_dc_scale_table[ s->qscale ];
152 s->c_dc_scale= s->c_dc_scale_table[ s->qscale ];
154 if(s->partitioned_frame){
155 const int qscale= s->qscale;
157 if(s->codec_id==CODEC_ID_MPEG4){
158 if(ff_mpeg4_decode_partitions(s) < 0)
162 /* restore variables which where modified */
163 s->first_slice_line=1;
164 s->mb_x= s->resync_mb_x;
165 s->mb_y= s->resync_mb_y;
167 s->y_dc_scale= s->y_dc_scale_table[ s->qscale ];
168 s->c_dc_scale= s->c_dc_scale_table[ s->qscale ];
171 for(; s->mb_y < s->mb_height; s->mb_y++) {
172 /* per-row end of slice checks */
173 if(s->msmpeg4_version){
174 if(s->resync_mb_y + s->slice_height == s->mb_y){
175 const int xy= s->mb_x + s->mb_y*s->mb_width;
176 s->error_status_table[xy-1]|= AC_END|DC_END|MV_END;
181 if(s->msmpeg4_version==1){
187 ff_init_block_index(s);
188 for(; s->mb_x < s->mb_width; s->mb_x++) {
191 ff_update_block_index(s);
193 if(s->resync_mb_x == s->mb_x && s->resync_mb_y+1 == s->mb_y){
194 s->first_slice_line=0;
198 s->dsp.clear_blocks(s->block[0]);
200 s->mv_dir = MV_DIR_FORWARD;
201 s->mv_type = MV_TYPE_16X16;
203 //printf("%d %d %06X\n", ret, get_bits_count(&s->gb), show_bits(&s->gb, 24));
204 ret= s->decode_mb(s, s->block);
206 PRINT_QP("%2d", s->qscale);
207 MPV_decode_mb(s, s->block);
210 const int xy= s->mb_x + s->mb_y*s->mb_width;
212 //printf("%d %d %d %06X\n", s->mb_x, s->mb_y, s->gb.size*8 - get_bits_count(&s->gb), show_bits(&s->gb, 24));
213 s->error_status_table[xy]|= AC_END;
214 if(!s->partitioned_frame)
215 s->error_status_table[xy]|= MV_END|DC_END;
217 s->padding_bug_score--;
219 if(++s->mb_x >= s->mb_width){
221 ff_draw_horiz_band(s);
225 }else if(ret==SLICE_NOEND){
226 fprintf(stderr,"Slice mismatch at MB: %d\n", xy);
229 fprintf(stderr,"Error at MB: %d\n", xy);
230 s->error_status_table[xy]|= AC_ERROR;
231 if(!s->partitioned_frame)
232 s->error_status_table[xy]|= DC_ERROR|MV_ERROR;
238 ff_draw_horiz_band(s);
240 PRINT_QP("%s", "\n");
245 assert(s->mb_x==0 && s->mb_y==s->mb_height);
247 /* try to detect the padding bug */
248 if( s->codec_id==CODEC_ID_MPEG4
249 && (s->workaround_bugs&FF_BUG_AUTODETECT)
250 && s->gb.size*8 - get_bits_count(&s->gb) >=0
251 && s->gb.size*8 - get_bits_count(&s->gb) < 48
253 && !s->data_partitioning){
255 const int bits_count= get_bits_count(&s->gb);
256 const int bits_left = s->gb.size*8 - bits_count;
258 if(bits_left==0 || bits_left>8){
259 s->padding_bug_score++;
260 } else if(bits_left != 1){
261 int v= show_bits(&s->gb, 8);
262 v|= 0x7F >> (7-(bits_count&7));
265 s->padding_bug_score--;
267 s->padding_bug_score++;
270 if(s->padding_bug_score > -2)
271 s->workaround_bugs |= FF_BUG_NO_PADDING;
273 s->workaround_bugs &= ~FF_BUG_NO_PADDING;
276 // handle formats which dont have unique end markers
277 if(s->msmpeg4_version || (s->workaround_bugs&FF_BUG_NO_PADDING)){ //FIXME perhaps solve this more cleanly
278 int left= s->gb.size*8 - get_bits_count(&s->gb);
281 /* no markers in M$ crap */
282 if(s->msmpeg4_version && s->pict_type==I_TYPE)
285 /* buggy padding but the frame should still end approximately at the bitstream end */
286 if((s->workaround_bugs&FF_BUG_NO_PADDING) && s->error_resilience>=3)
288 else if((s->workaround_bugs&FF_BUG_NO_PADDING))
289 max_extra+= 256*256*256*64;
292 fprintf(stderr, "discarding %d junk bits at end, next would be %X\n", left, show_bits(&s->gb, 24));
295 fprintf(stderr, "overreading %d bits\n", -left);
297 s->error_status_table[s->mb_num-1]|= AC_END|MV_END|DC_END;
302 fprintf(stderr, "slice end not reached but screenspace end (%d left %06X)\n",
303 s->gb.size*8 - get_bits_count(&s->gb),
304 show_bits(&s->gb, 24));
309 * finds the end of the current frame in the bitstream.
310 * @return the position of the first byte of the next frame, or -1
312 static int mpeg4_find_frame_end(MpegEncContext *s, UINT8 *buf, int buf_size){
313 ParseContext *pc= &s->parse_context;
317 vop_found= pc->frame_start_found;
322 for(i=0; i<buf_size; i++){
323 state= (state<<8) | buf[i];
332 for(; i<buf_size; i++){
333 state= (state<<8) | buf[i];
334 if((state&0xFFFFFF00) == 0x100){
335 pc->frame_start_found=0;
340 pc->frame_start_found= vop_found;
345 static int h263_decode_frame(AVCodecContext *avctx,
346 void *data, int *data_size,
347 UINT8 *buf, int buf_size)
349 MpegEncContext *s = avctx->priv_data;
351 AVVideoFrame *pict = data;
354 #ifdef PRINT_FRAME_TIME
355 uint64_t time= rdtsc();
358 printf("*****frame %d size=%d\n", avctx->frame_number, buf_size);
359 printf("bytes=%x %x %x %x\n", buf[0], buf[1], buf[2], buf[3]);
361 s->flags= avctx->flags;
365 /* no supplementary picture */
370 if(s->flags&CODEC_FLAG_TRUNCATED){
372 ParseContext *pc= &s->parse_context;
374 pc->last_index= pc->index;
376 if(s->codec_id==CODEC_ID_MPEG4){
377 next= mpeg4_find_frame_end(s, buf, buf_size);
379 fprintf(stderr, "this codec doesnt support truncated bitstreams\n");
383 if(buf_size + FF_INPUT_BUFFER_PADDING_SIZE + pc->index > pc->buffer_size){
384 pc->buffer_size= buf_size + pc->index + 10*1024;
385 pc->buffer= realloc(pc->buffer, pc->buffer_size);
388 memcpy(&pc->buffer[pc->index], buf, buf_size);
389 pc->index += buf_size;
394 if(next + FF_INPUT_BUFFER_PADDING_SIZE + pc->index > pc->buffer_size){
395 pc->buffer_size= next + pc->index + 10*1024;
396 pc->buffer= realloc(pc->buffer, pc->buffer_size);
399 memcpy(&pc->buffer[pc->index], buf, next + FF_INPUT_BUFFER_PADDING_SIZE );
402 buf_size= pc->last_index + next;
408 if(s->bitstream_buffer_size && buf_size<20){ //divx 5.01+ frame reorder
409 init_get_bits(&s->gb, s->bitstream_buffer, s->bitstream_buffer_size);
411 init_get_bits(&s->gb, buf, buf_size);
412 s->bitstream_buffer_size=0;
414 if (!s->context_initialized) {
415 if (MPV_common_init(s) < 0) //we need the idct permutaton for reading a custom matrix
420 if (s->h263_msmpeg4) {
421 ret = msmpeg4_decode_picture_header(s);
422 } else if (s->h263_pred) {
423 if(s->avctx->extradata_size && s->picture_number==0){
426 init_get_bits(&gb, s->avctx->extradata, s->avctx->extradata_size);
427 ret = ff_mpeg4_decode_picture_header(s, &gb);
429 ret = ff_mpeg4_decode_picture_header(s, &s->gb);
431 if(s->flags& CODEC_FLAG_LOW_DELAY)
434 s->has_b_frames= !s->low_delay;
435 } else if (s->h263_intel) {
436 ret = intel_h263_decode_picture_header(s);
438 ret = h263_decode_picture_header(s);
440 avctx->has_b_frames= s->has_b_frames;
442 if(s->workaround_bugs&FF_BUG_AUTODETECT){
443 if(s->avctx->fourcc == ff_get_fourcc("XVIX"))
444 s->workaround_bugs|= FF_BUG_XVID_ILACE;
446 if(s->avctx->fourcc == ff_get_fourcc("MP4S"))
447 s->workaround_bugs|= FF_BUG_AC_VLC;
449 if(s->avctx->fourcc == ff_get_fourcc("M4S2"))
450 s->workaround_bugs|= FF_BUG_AC_VLC;
452 if(s->avctx->fourcc == ff_get_fourcc("UMP4")){
453 s->workaround_bugs|= FF_BUG_UMP4;
454 s->workaround_bugs|= FF_BUG_AC_VLC;
458 s->workaround_bugs|= FF_BUG_QPEL_CHROMA;
461 if(s->avctx->fourcc == ff_get_fourcc("XVID") && s->xvid_build==0)
462 s->workaround_bugs|= FF_BUG_QPEL_CHROMA;
464 if(s->avctx->fourcc == ff_get_fourcc("XVID") && s->xvid_build==0)
465 s->padding_bug_score= 256*256*256*64;
467 if(s->xvid_build && s->xvid_build<=1)
468 s->workaround_bugs|= FF_BUG_QPEL_CHROMA;
470 //printf("padding_bug_score: %d\n", s->padding_bug_score);
472 if(s->divx_version==500)
473 s->workaround_bugs|= FF_BUG_NO_PADDING;
475 /* very ugly XVID padding bug detection FIXME/XXX solve this differently
476 * lets hope this at least works
478 if( s->resync_marker==0 && s->data_partitioning==0 && s->divx_version==0
479 && s->codec_id==CODEC_ID_MPEG4 && s->vo_type==0)
480 s->workaround_bugs|= FF_BUG_NO_PADDING;
482 if(s->lavc_build && s->lavc_build<4609) //FIXME not sure about the version num but a 4609 file seems ok
483 s->workaround_bugs|= FF_BUG_NO_PADDING;
488 #if 0 // dump bits per frame / qp / complexity
491 if(!f) f=fopen("rate_qp_cplx.txt", "w");
492 fprintf(f, "%d %d %f\n", buf_size, s->qscale, buf_size*(double)s->qscale);
496 /* After H263 & mpeg4 header decode we have the height, width,*/
497 /* and other parameters. So then we could init the picture */
498 /* FIXME: By the way H263 decoder is evolving it should have */
499 /* an H263EncContext */
500 if(s->aspected_height)
501 new_aspect= s->aspected_width*s->width / (float)(s->height*s->aspected_height);
505 if ( s->width != avctx->width || s->height != avctx->height
506 || ABS(new_aspect - avctx->aspect_ratio) > 0.001) {
507 /* H.263 could change picture size any time */
509 s->context_initialized=0;
511 if (!s->context_initialized) {
512 avctx->width = s->width;
513 avctx->height = s->height;
514 avctx->aspect_ratio= new_aspect;
519 if((s->codec_id==CODEC_ID_H263 || s->codec_id==CODEC_ID_H263P))
520 s->gob_index = ff_h263_get_gob_height(s);
522 if(ret==FRAME_SKIPED) return get_consumed_bytes(s, buf_size);
523 /* skip if the header was thrashed */
525 fprintf(stderr, "header damaged\n");
530 s->current_picture.pict_type= s->pict_type;
531 s->current_picture.key_frame= s->pict_type == I_TYPE;
533 /* skip b frames if we dont have reference frames */
534 if(s->num_available_buffers<2 && s->pict_type==B_TYPE) return get_consumed_bytes(s, buf_size);
535 /* skip b frames if we are in a hurry */
536 if(avctx->hurry_up && s->pict_type==B_TYPE) return get_consumed_bytes(s, buf_size);
537 /* skip everything if we are in a hurry>=5 */
538 if(avctx->hurry_up>=5) return get_consumed_bytes(s, buf_size);
540 if(s->next_p_frame_damaged){
541 if(s->pict_type==B_TYPE)
542 return get_consumed_bytes(s, buf_size);
544 s->next_p_frame_damaged=0;
547 if(MPV_frame_start(s, avctx) < 0)
551 printf("qscale=%d\n", s->qscale);
554 if(s->error_resilience)
555 memset(s->error_status_table, MV_ERROR|AC_ERROR|DC_ERROR|VP_START|AC_END|DC_END|MV_END, s->mb_num*sizeof(UINT8));
557 /* decode each macroblock */
561 s->block_wrap[3]= s->mb_width*2 + 2;
563 s->block_wrap[5]= s->mb_width + 2;
568 s->error_status_table[0]|= VP_START;
569 while(s->mb_y<s->mb_height && s->gb.size*8 - get_bits_count(&s->gb)>16){
570 if(s->msmpeg4_version){
571 if(s->mb_x!=0 || (s->mb_y%s->slice_height)!=0)
574 if(ff_h263_resync(s)<0)
578 if(s->msmpeg4_version!=4 && s->h263_pred)
579 ff_mpeg4_clean_buffers(s);
583 s->error_status_table[s->resync_mb_x + s->resync_mb_y*s->mb_width]|= VP_START;
586 if (s->h263_msmpeg4 && s->msmpeg4_version<4 && s->pict_type==I_TYPE)
587 if(msmpeg4_decode_ext_header(s, buf_size) < 0){
588 s->error_status_table[s->mb_num-1]= AC_ERROR|DC_ERROR|MV_ERROR;
591 /* divx 5.01+ bistream reorder stuff */
592 if(s->codec_id==CODEC_ID_MPEG4 && s->bitstream_buffer_size==0 && s->divx_version>=500){
593 int current_pos= get_bits_count(&s->gb)>>3;
595 if( buf_size - current_pos > 5
596 && buf_size - current_pos < BITSTREAM_BUFFER_SIZE){
598 int startcode_found=0;
599 for(i=current_pos; i<buf_size-3; i++){
600 if(buf[i]==0 && buf[i+1]==0 && buf[i+2]==1 && buf[i+3]==0xB6){
606 memcpy(s->bitstream_buffer, buf + current_pos, buf_size - current_pos);
607 s->bitstream_buffer_size= buf_size - current_pos;
612 if(s->error_resilience){
613 int error=0, num_end_markers=0;
614 for(i=0; i<s->mb_num; i++){
615 int status= s->error_status_table[i];
617 if(i%s->mb_width == 0) printf("\n");
618 printf("%2X ", status);
620 if(status==0) continue;
622 if(status&(DC_ERROR|AC_ERROR|MV_ERROR))
636 if(num_end_markers || error){
637 fprintf(stderr, "concealing errors\n");
638 //printf("type:%d\n", s->pict_type);
639 ff_error_resilience(s);
644 #if 0 //dirty show MVs, we should export the MV tables and write a filter to show them
648 for(mb_y=0; mb_y<s->mb_height; mb_y++){
651 for(mb_x=0; mb_x<s->mb_width; mb_x++){
653 uint8_t *ptr= s->last_picture.data[0];
654 int xy= 1 + mb_x*2 + (mb_y*2 + 1)*(s->mb_width*2 + 2);
655 int mx= (s->motion_val[xy][0]>>1) + x;
656 int my= (s->motion_val[xy][1]>>1) + y;
662 if(mx>=s->width) mx= s->width -1;
663 if(my>=s->height) my= s->height-1;
665 if(ABS(my-y) > max) max= ABS(my-y);
666 /* the ugliest linedrawing routine ... */
667 for(i=0; i<max; i++){
668 int x1= x + (mx-x)*i/max;
669 int y1= y + (my-y)*i/max;
670 ptr[y1*s->linesize + x1]+=100;
672 ptr[y*s->linesize + x]+=100;
673 s->mbskip_table[mb_x + mb_y*s->mb_width]=0;
679 if(s->pict_type==B_TYPE || (!s->has_b_frames)){
680 *pict= *(AVVideoFrame*)&s->current_picture;
682 *pict= *(AVVideoFrame*)&s->last_picture;
685 /* Return the Picture timestamp as the frame number */
686 /* we substract 1 because it is added on utils.c */
687 avctx->frame_number = s->picture_number - 1;
689 /* dont output the last pic after seeking
690 note we allready added +1 for the current pix in MPV_frame_end(s) */
691 if(s->num_available_buffers>=2 || (!s->has_b_frames))
692 *data_size = sizeof(AVVideoFrame);
693 #ifdef PRINT_FRAME_TIME
694 printf("%Ld\n", rdtsc()-time);
696 return get_consumed_bytes(s, buf_size);
699 AVCodec mpeg4_decoder = {
703 sizeof(MpegEncContext),
708 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1 | CODEC_CAP_TRUNCATED,
711 AVCodec h263_decoder = {
715 sizeof(MpegEncContext),
720 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1,
723 AVCodec msmpeg4v1_decoder = {
727 sizeof(MpegEncContext),
732 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1,
735 AVCodec msmpeg4v2_decoder = {
739 sizeof(MpegEncContext),
744 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1,
747 AVCodec msmpeg4v3_decoder = {
751 sizeof(MpegEncContext),
756 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1,
759 AVCodec wmv1_decoder = {
763 sizeof(MpegEncContext),
768 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1,
771 AVCodec wmv2_decoder = {
775 sizeof(MpegEncContext),
780 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1,
783 AVCodec h263i_decoder = {
787 sizeof(MpegEncContext),
792 CODEC_CAP_DRAW_HORIZ_BAND | CODEC_CAP_DR1,