yading@10: /*
yading@10:  * MPEG4 decoder / encoder common code.
yading@10:  * Copyright (c) 2000,2001 Fabrice Bellard
yading@10:  * Copyright (c) 2002-2010 Michael Niedermayer <michaelni@gmx.at>
yading@10:  *
yading@10:  * This file is part of FFmpeg.
yading@10:  *
yading@10:  * FFmpeg is free software; you can redistribute it and/or
yading@10:  * modify it under the terms of the GNU Lesser General Public
yading@10:  * License as published by the Free Software Foundation; either
yading@10:  * version 2.1 of the License, or (at your option) any later version.
yading@10:  *
yading@10:  * FFmpeg is distributed in the hope that it will be useful,
yading@10:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
yading@10:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
yading@10:  * Lesser General Public License for more details.
yading@10:  *
yading@10:  * You should have received a copy of the GNU Lesser General Public
yading@10:  * License along with FFmpeg; if not, write to the Free Software
yading@10:  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
yading@10:  */
yading@10: 
yading@10: #include "mpegvideo.h"
yading@10: #include "mpeg4video.h"
yading@10: #include "mpeg4data.h"
yading@10: 
yading@10: uint8_t ff_mpeg4_static_rl_table_store[3][2][2*MAX_RUN + MAX_LEVEL + 3];
yading@10: 
yading@10: int ff_mpeg4_get_video_packet_prefix_length(MpegEncContext *s){
yading@10:     switch(s->pict_type){
yading@10:         case AV_PICTURE_TYPE_I:
yading@10:             return 16;
yading@10:         case AV_PICTURE_TYPE_P:
yading@10:         case AV_PICTURE_TYPE_S:
yading@10:             return s->f_code+15;
yading@10:         case AV_PICTURE_TYPE_B:
yading@10:             return FFMAX3(s->f_code, s->b_code, 2) + 15;
yading@10:         default:
yading@10:             return -1;
yading@10:     }
yading@10: }
yading@10: 
yading@10: void ff_mpeg4_clean_buffers(MpegEncContext *s)
yading@10: {
yading@10:     int c_wrap, c_xy, l_wrap, l_xy;
yading@10: 
yading@10:     l_wrap= s->b8_stride;
yading@10:     l_xy= (2*s->mb_y-1)*l_wrap + s->mb_x*2 - 1;
yading@10:     c_wrap= s->mb_stride;
yading@10:     c_xy= (s->mb_y-1)*c_wrap + s->mb_x - 1;
yading@10: 
yading@10: #if 0
yading@10:     /* clean DC */
yading@10:     memsetw(s->dc_val[0] + l_xy, 1024, l_wrap*2+1);
yading@10:     memsetw(s->dc_val[1] + c_xy, 1024, c_wrap+1);
yading@10:     memsetw(s->dc_val[2] + c_xy, 1024, c_wrap+1);
yading@10: #endif
yading@10: 
yading@10:     /* clean AC */
yading@10:     memset(s->ac_val[0] + l_xy, 0, (l_wrap*2+1)*16*sizeof(int16_t));
yading@10:     memset(s->ac_val[1] + c_xy, 0, (c_wrap  +1)*16*sizeof(int16_t));
yading@10:     memset(s->ac_val[2] + c_xy, 0, (c_wrap  +1)*16*sizeof(int16_t));
yading@10: 
yading@10:     /* clean MV */
yading@10:     // we can't clear the MVs as they might be needed by a b frame
yading@10: //    memset(s->motion_val + l_xy, 0, (l_wrap*2+1)*2*sizeof(int16_t));
yading@10: //    memset(s->motion_val, 0, 2*sizeof(int16_t)*(2 + s->mb_width*2)*(2 + s->mb_height*2));
yading@10:     s->last_mv[0][0][0]=
yading@10:     s->last_mv[0][0][1]=
yading@10:     s->last_mv[1][0][0]=
yading@10:     s->last_mv[1][0][1]= 0;
yading@10: }
yading@10: 
yading@10: #define tab_size ((signed)FF_ARRAY_ELEMS(s->direct_scale_mv[0]))
yading@10: #define tab_bias (tab_size/2)
yading@10: 
yading@10: //used by mpeg4 and rv10 decoder
yading@10: void ff_mpeg4_init_direct_mv(MpegEncContext *s){
yading@10:     int i;
yading@10:     for(i=0; i<tab_size; i++){
yading@10:         s->direct_scale_mv[0][i] = (i-tab_bias)*s->pb_time/s->pp_time;
yading@10:         s->direct_scale_mv[1][i] = (i-tab_bias)*(s->pb_time-s->pp_time)/s->pp_time;
yading@10:     }
yading@10: }
yading@10: 
yading@10: static inline void ff_mpeg4_set_one_direct_mv(MpegEncContext *s, int mx, int my, int i){
yading@10:     int xy= s->block_index[i];
yading@10:     uint16_t time_pp= s->pp_time;
yading@10:     uint16_t time_pb= s->pb_time;
yading@10:     int p_mx, p_my;
yading@10: 
yading@10:     p_mx = s->next_picture.motion_val[0][xy][0];
yading@10:     if((unsigned)(p_mx + tab_bias) < tab_size){
yading@10:         s->mv[0][i][0] = s->direct_scale_mv[0][p_mx + tab_bias] + mx;
yading@10:         s->mv[1][i][0] = mx ? s->mv[0][i][0] - p_mx
yading@10:                             : s->direct_scale_mv[1][p_mx + tab_bias];
yading@10:     }else{
yading@10:         s->mv[0][i][0] = p_mx*time_pb/time_pp + mx;
yading@10:         s->mv[1][i][0] = mx ? s->mv[0][i][0] - p_mx
yading@10:                             : p_mx*(time_pb - time_pp)/time_pp;
yading@10:     }
yading@10:     p_my = s->next_picture.motion_val[0][xy][1];
yading@10:     if((unsigned)(p_my + tab_bias) < tab_size){
yading@10:         s->mv[0][i][1] = s->direct_scale_mv[0][p_my + tab_bias] + my;
yading@10:         s->mv[1][i][1] = my ? s->mv[0][i][1] - p_my
yading@10:                             : s->direct_scale_mv[1][p_my + tab_bias];
yading@10:     }else{
yading@10:         s->mv[0][i][1] = p_my*time_pb/time_pp + my;
yading@10:         s->mv[1][i][1] = my ? s->mv[0][i][1] - p_my
yading@10:                             : p_my*(time_pb - time_pp)/time_pp;
yading@10:     }
yading@10: }
yading@10: 
yading@10: #undef tab_size
yading@10: #undef tab_bias
yading@10: 
yading@10: /**
yading@10:  *
yading@10:  * @return the mb_type
yading@10:  */
yading@10: int ff_mpeg4_set_direct_mv(MpegEncContext *s, int mx, int my){
yading@10:     const int mb_index= s->mb_x + s->mb_y*s->mb_stride;
yading@10:     const int colocated_mb_type = s->next_picture.mb_type[mb_index];
yading@10:     uint16_t time_pp;
yading@10:     uint16_t time_pb;
yading@10:     int i;
yading@10: 
yading@10:     //FIXME avoid divides
yading@10:     // try special case with shifts for 1 and 3 B-frames?
yading@10: 
yading@10:     if(IS_8X8(colocated_mb_type)){
yading@10:         s->mv_type = MV_TYPE_8X8;
yading@10:         for(i=0; i<4; i++){
yading@10:             ff_mpeg4_set_one_direct_mv(s, mx, my, i);
yading@10:         }
yading@10:         return MB_TYPE_DIRECT2 | MB_TYPE_8x8 | MB_TYPE_L0L1;
yading@10:     } else if(IS_INTERLACED(colocated_mb_type)){
yading@10:         s->mv_type = MV_TYPE_FIELD;
yading@10:         for(i=0; i<2; i++){
yading@10:             int field_select = s->next_picture.ref_index[0][4 * mb_index + 2 * i];
yading@10:             s->field_select[0][i]= field_select;
yading@10:             s->field_select[1][i]= i;
yading@10:             if(s->top_field_first){
yading@10:                 time_pp= s->pp_field_time - field_select + i;
yading@10:                 time_pb= s->pb_field_time - field_select + i;
yading@10:             }else{
yading@10:                 time_pp= s->pp_field_time + field_select - i;
yading@10:                 time_pb= s->pb_field_time + field_select - i;
yading@10:             }
yading@10:             s->mv[0][i][0] = s->p_field_mv_table[i][0][mb_index][0]*time_pb/time_pp + mx;
yading@10:             s->mv[0][i][1] = s->p_field_mv_table[i][0][mb_index][1]*time_pb/time_pp + my;
yading@10:             s->mv[1][i][0] = mx ? s->mv[0][i][0] - s->p_field_mv_table[i][0][mb_index][0]
yading@10:                                 : s->p_field_mv_table[i][0][mb_index][0]*(time_pb - time_pp)/time_pp;
yading@10:             s->mv[1][i][1] = my ? s->mv[0][i][1] - s->p_field_mv_table[i][0][mb_index][1]
yading@10:                                 : s->p_field_mv_table[i][0][mb_index][1]*(time_pb - time_pp)/time_pp;
yading@10:         }
yading@10:         return MB_TYPE_DIRECT2 | MB_TYPE_16x8 | MB_TYPE_L0L1 | MB_TYPE_INTERLACED;
yading@10:     }else{
yading@10:         ff_mpeg4_set_one_direct_mv(s, mx, my, 0);
yading@10:         s->mv[0][1][0] = s->mv[0][2][0] = s->mv[0][3][0] = s->mv[0][0][0];
yading@10:         s->mv[0][1][1] = s->mv[0][2][1] = s->mv[0][3][1] = s->mv[0][0][1];
yading@10:         s->mv[1][1][0] = s->mv[1][2][0] = s->mv[1][3][0] = s->mv[1][0][0];
yading@10:         s->mv[1][1][1] = s->mv[1][2][1] = s->mv[1][3][1] = s->mv[1][0][1];
yading@10:         if((s->avctx->workaround_bugs & FF_BUG_DIRECT_BLOCKSIZE) || !s->quarter_sample)
yading@10:             s->mv_type= MV_TYPE_16X16;
yading@10:         else
yading@10:             s->mv_type= MV_TYPE_8X8;
yading@10:         return MB_TYPE_DIRECT2 | MB_TYPE_16x16 | MB_TYPE_L0L1; //Note see prev line
yading@10:     }
yading@10: }