开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 多媒体 > 流媒体/Mpeg4/MP4 > 查看源码
mpegvideo.c
资源名称：X264CODEC.rar　[点击查看]
上传用户：lctgjx
上传日期：2022-06-04
资源大小：8887k
文件大小：89k
源码类别：

流媒体/Mpeg4/MP4

开发平台：

Visual C++

mpegvideo.c：源码内容
  1. /*
  2.  * The simplest mpeg encoder (well, it was the simplest!)
  3.  * Copyright (c) 2000,2001 Fabrice Bellard.
  4.  * Copyright (c) 2002-2004 Michael Niedermayer <michaelni@gmx.at>
  5.  *
  6.  * 4MV & hq & B-frame encoding stuff by Michael Niedermayer <michaelni@gmx.at>
  7.  *
  8.  * This file is part of FFmpeg.
  9.  *
  10.  * FFmpeg is free software; you can redistribute it and/or
  11.  * modify it under the terms of the GNU Lesser General Public
  12.  * License as published by the Free Software Foundation; either
  13.  * version 2.1 of the License, or (at your option) any later version.
  14.  *
  15.  * FFmpeg is distributed in the hope that it will be useful,
  16.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  18.  * Lesser General Public License for more details.
  19.  *
  20.  * You should have received a copy of the GNU Lesser General Public
  21.  * License along with FFmpeg; if not, write to the Free Software
  22.  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  23.  */
  25. /**
  26.  * @file mpegvideo.c
  27.  * The simplest mpeg encoder (well, it was the simplest!).
  28.  */
  30. #include "avcodec.h"
  31. #include "dsputil.h"
  32. #include "mpegvideo.h"
  33. #include "mpegvideo_common.h"
  34. #include "mjpegenc.h"
  35. #include "msmpeg4.h"
  36. #include "faandct.h"
  37. #include "internal.h"
  38. #include <limits.h>
  40. //#undef NDEBUG
  41. //#include <assert.h>
  43. static void dct_unquantize_mpeg1_intra_c(MpegEncContext *s,
  44.                                    DCTELEM *block, int n, int qscale);
  45. static void dct_unquantize_mpeg1_inter_c(MpegEncContext *s,
  46.                                    DCTELEM *block, int n, int qscale);
  47. static void dct_unquantize_mpeg2_intra_c(MpegEncContext *s,
  48.                                    DCTELEM *block, int n, int qscale);
  49. static void dct_unquantize_mpeg2_intra_bitexact(MpegEncContext *s,
  50.                                    DCTELEM *block, int n, int qscale);
  51. static void dct_unquantize_mpeg2_inter_c(MpegEncContext *s,
  52.                                    DCTELEM *block, int n, int qscale);
  53. static void dct_unquantize_h263_intra_c(MpegEncContext *s,
  54.                                   DCTELEM *block, int n, int qscale);
  55. static void dct_unquantize_h263_inter_c(MpegEncContext *s,
  56.                                   DCTELEM *block, int n, int qscale);
  58. extern int  XVMC_field_start(MpegEncContext*s, AVCodecContext *avctx);
  59. extern void XVMC_field_end(MpegEncContext *s);
  60. extern void XVMC_decode_mb(MpegEncContext *s);
  63. /* enable all paranoid tests for rounding, overflows, etc... */
  64. //#define PARANOID
  66. //#define DEBUG
  69. static const uint8_t ff_default_chroma_qscale_table[32]={
  70. //  0  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
  71.     0, 1, 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31
  72. };
  74. const uint8_t ff_mpeg1_dc_scale_table[128]={
  75. //  0  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
  76.     8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
  77.     8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
  78.     8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
  79.     8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
  80. };
  83. const uint8_t *ff_find_start_code(const uint8_t * restrict p, const uint8_t *end, uint32_t * restrict state){
  84.     int i;
  86.     assert(p<=end);
  87.     if(p>=end)
  88.         return end;
  90.     for(i=0; i<3; i++){
  91.         uint32_t tmp= *state << 8;
  92.         *state= tmp + *(p++);
  93.         if(tmp == 0x100 || p==end)
  94.             return p;
  95.     }
  97.     while(p<end){
  98.         if     (p[-1] > 1      ) p+= 3;
  99.         else if(p[-2]          ) p+= 2;
  100.         else if(p[-3]|(p[-1]-1)) p++;
  101.         else{
  102.             p++;
  103.             break;
  104.         }
  105.     }
  107.     p= FFMIN(p, end)-4;
  108.     *state= AV_RB32(p);
  110.     return p+4;
  111. }
  113. /* init common dct for both encoder and decoder */
  114. int ff_dct_common_init(MpegEncContext *s)
  115. {
  116.     s->dct_unquantize_h263_intra = dct_unquantize_h263_intra_c;
  117.     s->dct_unquantize_h263_inter = dct_unquantize_h263_inter_c;
  118.     s->dct_unquantize_mpeg1_intra = dct_unquantize_mpeg1_intra_c;
  119.     s->dct_unquantize_mpeg1_inter = dct_unquantize_mpeg1_inter_c;
  120.     s->dct_unquantize_mpeg2_intra = dct_unquantize_mpeg2_intra_c;
  121.     if(s->flags & CODEC_FLAG_BITEXACT)
  122.         s->dct_unquantize_mpeg2_intra = dct_unquantize_mpeg2_intra_bitexact;
  123.     s->dct_unquantize_mpeg2_inter = dct_unquantize_mpeg2_inter_c;
  125. #if defined(HAVE_MMX)
  126.     MPV_common_init_mmx(s);
  127. #elif defined(ARCH_ALPHA)
  128.     MPV_common_init_axp(s);
  129. #elif defined(CONFIG_MLIB)
  130.     MPV_common_init_mlib(s);
  131. #elif defined(HAVE_MMI)
  132.     MPV_common_init_mmi(s);
  133. #elif defined(ARCH_ARMV4L)
  134.     MPV_common_init_armv4l(s);
  135. #elif defined(HAVE_ALTIVEC)
  136.     MPV_common_init_altivec(s);
  137. #elif defined(ARCH_BFIN)
  138.     MPV_common_init_bfin(s);
  139. #endif
  141.     /* load & permutate scantables
  142.        note: only wmv uses different ones
  143.     */
  144.     if(s->alternate_scan){
  145.         ff_init_scantable(s->dsp.idct_permutation, &s->inter_scantable  , ff_alternate_vertical_scan);
  146.         ff_init_scantable(s->dsp.idct_permutation, &s->intra_scantable  , ff_alternate_vertical_scan);
  147.     }else{
  148.         ff_init_scantable(s->dsp.idct_permutation, &s->inter_scantable  , ff_zigzag_direct);
  149.         ff_init_scantable(s->dsp.idct_permutation, &s->intra_scantable  , ff_zigzag_direct);
  150.     }
  151.     ff_init_scantable(s->dsp.idct_permutation, &s->intra_h_scantable, ff_alternate_horizontal_scan);
  152.     ff_init_scantable(s->dsp.idct_permutation, &s->intra_v_scantable, ff_alternate_vertical_scan);
  154.     return 0;
  155. }
  157. void copy_picture(Picture *dst, Picture *src){
  158.     *dst = *src;
  159.     dst->type= FF_BUFFER_TYPE_COPY;
  160. }
  162. /**
  163.  * allocates a Picture
  164.  * The pixels are allocated/set by calling get_buffer() if shared=0
  165.  */
  166. int alloc_picture(MpegEncContext *s, Picture *pic, int shared){
  167.     const int big_mb_num= s->mb_stride*(s->mb_height+1) + 1; //the +1 is needed so memset(,,stride*height) does not sig11
  168.     const int mb_array_size= s->mb_stride*s->mb_height;
  169.     const int b8_array_size= s->b8_stride*s->mb_height*2;
  170.     const int b4_array_size= s->b4_stride*s->mb_height*4;
  171.     int i;
  172.     int r= -1;
  174.     if(shared){
  175.         assert(pic->data[0]);
  176.         assert(pic->type == 0 || pic->type == FF_BUFFER_TYPE_SHARED);
  177.         pic->type= FF_BUFFER_TYPE_SHARED;
  178.     }else{
  179.         assert(!pic->data[0]);
  181.         r= s->avctx->get_buffer(s->avctx, (AVFrame*)pic);
  183.         if(r<0 || !pic->age || !pic->type || !pic->data[0]){
  184.             av_log(s->avctx, AV_LOG_ERROR, "get_buffer() failed (%d %d %d %p)n", r, pic->age, pic->type, pic->data[0]);
  185.             return -1;
  186.         }
  188.         if(s->linesize && (s->linesize != pic->linesize[0] || s->uvlinesize != pic->linesize[1])){
  189.             av_log(s->avctx, AV_LOG_ERROR, "get_buffer() failed (stride changed)n");
  190.             s->avctx->release_buffer(s->avctx, (AVFrame*)pic);
  191.             return -1;
  192.         }
  194.         if(pic->linesize[1] != pic->linesize[2]){
  195.             av_log(s->avctx, AV_LOG_ERROR, "get_buffer() failed (uv stride mismatch)n");
  196.             s->avctx->release_buffer(s->avctx, (AVFrame*)pic);
  197.             return -1;
  198.         }
  200.         s->linesize  = pic->linesize[0];
  201.         s->uvlinesize= pic->linesize[1];
  202.     }
  204.     if(pic->qscale_table==NULL){
  205.         if (s->encoding) {
  206.             CHECKED_ALLOCZ(pic->mb_var   , mb_array_size * sizeof(int16_t))
  207.             CHECKED_ALLOCZ(pic->mc_mb_var, mb_array_size * sizeof(int16_t))
  208.             CHECKED_ALLOCZ(pic->mb_mean  , mb_array_size * sizeof(int8_t))
  209.         }
  211.         CHECKED_ALLOCZ(pic->mbskip_table , mb_array_size * sizeof(uint8_t)+2) //the +2 is for the slice end check
  212.         CHECKED_ALLOCZ(pic->qscale_table , mb_array_size * sizeof(uint8_t))
  213.         CHECKED_ALLOCZ(pic->mb_type_base , (big_mb_num + s->mb_stride) * sizeof(uint32_t))
  214.         pic->mb_type= pic->mb_type_base + 2*s->mb_stride+1;
  215.         if(s->out_format == FMT_H264){
  216.             for(i=0; i<2; i++){
  217.                 CHECKED_ALLOCZ(pic->motion_val_base[i], 2 * (b4_array_size+4)  * sizeof(int16_t))
  218.                 pic->motion_val[i]= pic->motion_val_base[i]+4;
  219.                 CHECKED_ALLOCZ(pic->ref_index[i], b8_array_size * sizeof(uint8_t))
  220.             }
  221.             pic->motion_subsample_log2= 2;
  222.         }else if(s->out_format == FMT_H263 || s->encoding || (s->avctx->debug&FF_DEBUG_MV) || (s->avctx->debug_mv)){
  223.             for(i=0; i<2; i++){
  224.                 CHECKED_ALLOCZ(pic->motion_val_base[i], 2 * (b8_array_size+4) * sizeof(int16_t))
  225.                 pic->motion_val[i]= pic->motion_val_base[i]+4;
  226.                 CHECKED_ALLOCZ(pic->ref_index[i], b8_array_size * sizeof(uint8_t))
  227.             }
  228.             pic->motion_subsample_log2= 3;
  229.         }
  230.         if(s->avctx->debug&FF_DEBUG_DCT_COEFF) {
  231.             CHECKED_ALLOCZ(pic->dct_coeff, 64 * mb_array_size * sizeof(DCTELEM)*6)
  232.         }
  233.         pic->qstride= s->mb_stride;
  234.         CHECKED_ALLOCZ(pic->pan_scan , 1 * sizeof(AVPanScan))
  235.     }
  237.     /* It might be nicer if the application would keep track of these
  238.      * but it would require an API change. */
  239.     memmove(s->prev_pict_types+1, s->prev_pict_types, PREV_PICT_TYPES_BUFFER_SIZE-1);
  240.     s->prev_pict_types[0]= s->dropable ? FF_B_TYPE : s->pict_type;
  241.     if(pic->age < PREV_PICT_TYPES_BUFFER_SIZE && s->prev_pict_types[pic->age] == FF_B_TYPE)
  242.         pic->age= INT_MAX; // Skipped MBs in B-frames are quite rare in MPEG-1/2 and it is a bit tricky to skip them anyway.
  244.     return 0;
  245. fail: //for the CHECKED_ALLOCZ macro
  246.     if(r>=0)
  247.         s->avctx->release_buffer(s->avctx, (AVFrame*)pic);
  248.     return -1;
  249. }
  251. /**
  252.  * deallocates a picture
  253.  */
  254. static void free_picture(MpegEncContext *s, Picture *pic){
  255.     int i;
  257.     if(pic->data[0] && pic->type!=FF_BUFFER_TYPE_SHARED){
  258.         s->avctx->release_buffer(s->avctx, (AVFrame*)pic);
  259.     }
  261.     av_freep(&pic->mb_var);
  262.     av_freep(&pic->mc_mb_var);
  263.     av_freep(&pic->mb_mean);
  264.     av_freep(&pic->mbskip_table);
  265.     av_freep(&pic->qscale_table);
  266.     av_freep(&pic->mb_type_base);
  267.     av_freep(&pic->dct_coeff);
  268.     av_freep(&pic->pan_scan);
  269.     pic->mb_type= NULL;
  270.     for(i=0; i<2; i++){
  271.         av_freep(&pic->motion_val_base[i]);
  272.         av_freep(&pic->ref_index[i]);
  273.     }
  275.     if(pic->type == FF_BUFFER_TYPE_SHARED){
  276.         for(i=0; i<4; i++){
  277.             pic->base[i]=
  278.             pic->data[i]= NULL;
  279.         }
  280.         pic->type= 0;
  281.     }
  282. }
  284. static int init_duplicate_context(MpegEncContext *s, MpegEncContext *base){
  285.     int i;
  287.     // edge emu needs blocksize + filter length - 1 (=17x17 for halfpel / 21x21 for h264)
  288.     CHECKED_ALLOCZ(s->allocated_edge_emu_buffer, (s->width+64)*2*21*2); //(width + edge + align)*interlaced*MBsize*tolerance
  289.     s->edge_emu_buffer= s->allocated_edge_emu_buffer + (s->width+64)*2*21;
  291.      //FIXME should be linesize instead of s->width*2 but that is not known before get_buffer()
  292.     CHECKED_ALLOCZ(s->me.scratchpad,  (s->width+64)*4*16*2*sizeof(uint8_t))
  293.     s->rd_scratchpad=   s->me.scratchpad;
  294.     s->b_scratchpad=    s->me.scratchpad;
  295.     s->obmc_scratchpad= s->me.scratchpad + 16;
  296.     if (s->encoding) {
  297.         CHECKED_ALLOCZ(s->me.map      , ME_MAP_SIZE*sizeof(uint32_t))
  298.         CHECKED_ALLOCZ(s->me.score_map, ME_MAP_SIZE*sizeof(uint32_t))
  299.         if(s->avctx->noise_reduction){
  300.             CHECKED_ALLOCZ(s->dct_error_sum, 2 * 64 * sizeof(int))
  301.         }
  302.     }
  303.     CHECKED_ALLOCZ(s->blocks, 64*12*2 * sizeof(DCTELEM))
  304.     s->block= s->blocks[0];
  306.     for(i=0;i<12;i++){
  307.         s->pblocks[i] = (short *)(&s->block[i]);
  308.     }
  309.     return 0;
  310. fail:
  311.     return -1; //free() through MPV_common_end()
  312. }
  314. static void free_duplicate_context(MpegEncContext *s){
  315.     if(s==NULL) return;
  317.     av_freep(&s->allocated_edge_emu_buffer); s->edge_emu_buffer= NULL;
  318.     av_freep(&s->me.scratchpad);
  319.     s->rd_scratchpad=
  320.     s->b_scratchpad=
  321.     s->obmc_scratchpad= NULL;
  323.     av_freep(&s->dct_error_sum);
  324.     av_freep(&s->me.map);
  325.     av_freep(&s->me.score_map);
  326.     av_freep(&s->blocks);
  327.     s->block= NULL;
  328. }
  330. static void backup_duplicate_context(MpegEncContext *bak, MpegEncContext *src){
  331. #define COPY(a) bak->a= src->a
  332.     COPY(allocated_edge_emu_buffer);
  333.     COPY(edge_emu_buffer);
  334.     COPY(me.scratchpad);
  335.     COPY(rd_scratchpad);
  336.     COPY(b_scratchpad);
  337.     COPY(obmc_scratchpad);
  338.     COPY(me.map);
  339.     COPY(me.score_map);
  340.     COPY(blocks);
  341.     COPY(block);
  342.     COPY(start_mb_y);
  343.     COPY(end_mb_y);
  344.     COPY(me.map_generation);
  345.     COPY(pb);
  346.     COPY(dct_error_sum);
  347.     COPY(dct_count[0]);
  348.     COPY(dct_count[1]);
  349. #undef COPY
  350. }
  352. void ff_update_duplicate_context(MpegEncContext *dst, MpegEncContext *src){
  353.     MpegEncContext bak;
  354.     int i;
  355.     //FIXME copy only needed parts
  356. //START_TIMER
  357.     backup_duplicate_context(&bak, dst);
  358.     memcpy(dst, src, sizeof(MpegEncContext));
  359.     backup_duplicate_context(dst, &bak);
  360.     for(i=0;i<12;i++){
  361.         dst->pblocks[i] = (short *)(&dst->block[i]);
  362.     }
  363. //STOP_TIMER("update_duplicate_context") //about 10k cycles / 0.01 sec for 1000frames on 1ghz with 2 threads
  364. }
  366. /**
  367.  * sets the given MpegEncContext to common defaults (same for encoding and decoding).
  368.  * the changed fields will not depend upon the prior state of the MpegEncContext.
  369.  */
  370. void MPV_common_defaults(MpegEncContext *s){
  371.     s->y_dc_scale_table=
  372.     s->c_dc_scale_table= ff_mpeg1_dc_scale_table;
  373.     s->chroma_qscale_table= ff_default_chroma_qscale_table;
  374.     s->progressive_frame= 1;
  375.     s->progressive_sequence= 1;
  376.     s->picture_structure= PICT_FRAME;
  378.     s->coded_picture_number = 0;
  379.     s->picture_number = 0;
  380.     s->input_picture_number = 0;
  382.     s->picture_in_gop_number = 0;
  384.     s->f_code = 1;
  385.     s->b_code = 1;
  386. }
  388. /**
  389.  * sets the given MpegEncContext to defaults for decoding.
  390.  * the changed fields will not depend upon the prior state of the MpegEncContext.
  391.  */
  392. void MPV_decode_defaults(MpegEncContext *s){
  393.     MPV_common_defaults(s);
  394. }
  396. /**
  397.  * init common structure for both encoder and decoder.
  398.  * this assumes that some variables like width/height are already set
  399.  */
  400. int MPV_common_init(MpegEncContext *s)
  401. {
  402.     int y_size, c_size, yc_size, i, mb_array_size, mv_table_size, x, y, threads;
  404.     s->mb_height = (s->height + 15) / 16;
  406.     if(s->avctx->thread_count > MAX_THREADS || (s->avctx->thread_count > s->mb_height && s->mb_height)){
  407.         av_log(s->avctx, AV_LOG_ERROR, "too many threadsn");
  408.         return -1;
  409.     }
  411.     if((s->width || s->height) && avcodec_check_dimensions(s->avctx, s->width, s->height))
  412.         return -1;
  414. //    dsputil_init(&s->dsp, s->avctx);
  415.     ff_dct_common_init(s);
  417.     s->flags= s->avctx->flags;
  418.     s->flags2= s->avctx->flags2;
  420.     s->mb_width  = (s->width  + 15) / 16;
  421.     s->mb_stride = s->mb_width + 1;
  422.     s->b8_stride = s->mb_width*2 + 1;
  423.     s->b4_stride = s->mb_width*4 + 1;
  424.     mb_array_size= s->mb_height * s->mb_stride;
  425.     mv_table_size= (s->mb_height+2) * s->mb_stride + 1;
  427.     /* set chroma shifts */
  428.     avcodec_get_chroma_sub_sample(s->avctx->pix_fmt,&(s->chroma_x_shift),
  429.                                                     &(s->chroma_y_shift) );
  431.     /* set default edge pos, will be overriden in decode_header if needed */
  432.     s->h_edge_pos= s->mb_width*16;
  433.     s->v_edge_pos= s->mb_height*16;
  435.     s->mb_num = s->mb_width * s->mb_height;
  437.     s->block_wrap[0]=
  438.     s->block_wrap[1]=
  439.     s->block_wrap[2]=
  440.     s->block_wrap[3]= s->b8_stride;
  441.     s->block_wrap[4]=
  442.     s->block_wrap[5]= s->mb_stride;
  444.     y_size = s->b8_stride * (2 * s->mb_height + 1);
  445.     c_size = s->mb_stride * (s->mb_height + 1);
  446.     yc_size = y_size + 2 * c_size;
  448.     /* convert fourcc to upper case */
  449.     s->codec_tag=          toupper( s->avctx->codec_tag     &0xFF)
  450.                         + (toupper((s->avctx->codec_tag>>8 )&0xFF)<<8 )
  451.                         + (toupper((s->avctx->codec_tag>>16)&0xFF)<<16)
  452.                         + (toupper((s->avctx->codec_tag>>24)&0xFF)<<24);
  454.     s->stream_codec_tag=          toupper( s->avctx->stream_codec_tag     &0xFF)
  455.                                + (toupper((s->avctx->stream_codec_tag>>8 )&0xFF)<<8 )
  456.                                + (toupper((s->avctx->stream_codec_tag>>16)&0xFF)<<16)
  457.                                + (toupper((s->avctx->stream_codec_tag>>24)&0xFF)<<24);
  459.     s->avctx->coded_frame= (AVFrame*)&s->current_picture;
  461.     CHECKED_ALLOCZ(s->mb_index2xy, (s->mb_num+1)*sizeof(int)) //error ressilience code looks cleaner with this
  462.     for(y=0; y<s->mb_height; y++){
  463.         for(x=0; x<s->mb_width; x++){
  464.             s->mb_index2xy[ x + y*s->mb_width ] = x + y*s->mb_stride;
  465.         }
  466.     }
  467.     s->mb_index2xy[ s->mb_height*s->mb_width ] = (s->mb_height-1)*s->mb_stride + s->mb_width; //FIXME really needed?
  469.     if (s->encoding) {
  470.         /* Allocate MV tables */
  471.         CHECKED_ALLOCZ(s->p_mv_table_base            , mv_table_size * 2 * sizeof(int16_t))
  472.         CHECKED_ALLOCZ(s->b_forw_mv_table_base       , mv_table_size * 2 * sizeof(int16_t))
  473.         CHECKED_ALLOCZ(s->b_back_mv_table_base       , mv_table_size * 2 * sizeof(int16_t))
  474.         CHECKED_ALLOCZ(s->b_bidir_forw_mv_table_base , mv_table_size * 2 * sizeof(int16_t))
  475.         CHECKED_ALLOCZ(s->b_bidir_back_mv_table_base , mv_table_size * 2 * sizeof(int16_t))
  476.         CHECKED_ALLOCZ(s->b_direct_mv_table_base     , mv_table_size * 2 * sizeof(int16_t))
  477.         s->p_mv_table           = s->p_mv_table_base            + s->mb_stride + 1;
  478.         s->b_forw_mv_table      = s->b_forw_mv_table_base       + s->mb_stride + 1;
  479.         s->b_back_mv_table      = s->b_back_mv_table_base       + s->mb_stride + 1;
  480.         s->b_bidir_forw_mv_table= s->b_bidir_forw_mv_table_base + s->mb_stride + 1;
  481.         s->b_bidir_back_mv_table= s->b_bidir_back_mv_table_base + s->mb_stride + 1;
  482.         s->b_direct_mv_table    = s->b_direct_mv_table_base     + s->mb_stride + 1;
  484.         if(s->msmpeg4_version){
  485.             CHECKED_ALLOCZ(s->ac_stats, 2*2*(MAX_LEVEL+1)*(MAX_RUN+1)*2*sizeof(int));
  486.         }
  487.         CHECKED_ALLOCZ(s->avctx->stats_out, 256);
  489.         /* Allocate MB type table */
  490.         CHECKED_ALLOCZ(s->mb_type  , mb_array_size * sizeof(uint16_t)) //needed for encoding
  492.         CHECKED_ALLOCZ(s->lambda_table, mb_array_size * sizeof(int))
  494.         CHECKED_ALLOCZ(s->q_intra_matrix, 64*32 * sizeof(int))
  495.         CHECKED_ALLOCZ(s->q_inter_matrix, 64*32 * sizeof(int))
  496.         CHECKED_ALLOCZ(s->q_intra_matrix16, 64*32*2 * sizeof(uint16_t))
  497.         CHECKED_ALLOCZ(s->q_inter_matrix16, 64*32*2 * sizeof(uint16_t))
  498.         CHECKED_ALLOCZ(s->input_picture, MAX_PICTURE_COUNT * sizeof(Picture*))
  499.         CHECKED_ALLOCZ(s->reordered_input_picture, MAX_PICTURE_COUNT * sizeof(Picture*))
  501.         if(s->avctx->noise_reduction){
  502.             CHECKED_ALLOCZ(s->dct_offset, 2 * 64 * sizeof(uint16_t))
  503.         }
  504.     }
  505.     CHECKED_ALLOCZ(s->picture, MAX_PICTURE_COUNT * sizeof(Picture))
  507.     CHECKED_ALLOCZ(s->error_status_table, mb_array_size*sizeof(uint8_t))
  509.     if(s->codec_id==CODEC_ID_MPEG4 || (s->flags & CODEC_FLAG_INTERLACED_ME)){
  510.         /* interlaced direct mode decoding tables */
  511.             for(i=0; i<2; i++){
  512.                 int j, k;
  513.                 for(j=0; j<2; j++){
  514.                     for(k=0; k<2; k++){
  515.                         CHECKED_ALLOCZ(s->b_field_mv_table_base[i][j][k]     , mv_table_size * 2 * sizeof(int16_t))
  516.                         s->b_field_mv_table[i][j][k]    = s->b_field_mv_table_base[i][j][k]     + s->mb_stride + 1;
  517.                     }
  518.                     CHECKED_ALLOCZ(s->b_field_select_table[i][j]     , mb_array_size * 2 * sizeof(uint8_t))
  519.                     CHECKED_ALLOCZ(s->p_field_mv_table_base[i][j]     , mv_table_size * 2 * sizeof(int16_t))
  520.                     s->p_field_mv_table[i][j]    = s->p_field_mv_table_base[i][j]     + s->mb_stride + 1;
  521.                 }
  522.                 CHECKED_ALLOCZ(s->p_field_select_table[i]      , mb_array_size * 2 * sizeof(uint8_t))
  523.             }
  524.     }
  525.     if (s->out_format == FMT_H263) {
  526.         /* ac values */
  527.         CHECKED_ALLOCZ(s->ac_val_base, yc_size * sizeof(int16_t) * 16);
  528.         s->ac_val[0] = s->ac_val_base + s->b8_stride + 1;
  529.         s->ac_val[1] = s->ac_val_base + y_size + s->mb_stride + 1;
  530.         s->ac_val[2] = s->ac_val[1] + c_size;
  532.         /* cbp values */
  533.         CHECKED_ALLOCZ(s->coded_block_base, y_size);
  534.         s->coded_block= s->coded_block_base + s->b8_stride + 1;
  536.         /* cbp, ac_pred, pred_dir */
  537.         CHECKED_ALLOCZ(s->cbp_table  , mb_array_size * sizeof(uint8_t))
  538.         CHECKED_ALLOCZ(s->pred_dir_table, mb_array_size * sizeof(uint8_t))
  539.     }
  541.     if (s->h263_pred || s->h263_plus || !s->encoding) {
  542.         /* dc values */
  543.         //MN: we need these for error resilience of intra-frames
  544.         CHECKED_ALLOCZ(s->dc_val_base, yc_size * sizeof(int16_t));
  545.         s->dc_val[0] = s->dc_val_base + s->b8_stride + 1;
  546.         s->dc_val[1] = s->dc_val_base + y_size + s->mb_stride + 1;
  547.         s->dc_val[2] = s->dc_val[1] + c_size;
  548.         for(i=0;i<yc_size;i++)
  549.             s->dc_val_base[i] = 1024;
  550.     }
  552.     /* which mb is a intra block */
  553.     CHECKED_ALLOCZ(s->mbintra_table, mb_array_size);
  554.     memset(s->mbintra_table, 1, mb_array_size);
  556.     /* init macroblock skip table */
  557.     CHECKED_ALLOCZ(s->mbskip_table, mb_array_size+2);
  558.     //Note the +1 is for a quicker mpeg4 slice_end detection
  559.     CHECKED_ALLOCZ(s->prev_pict_types, PREV_PICT_TYPES_BUFFER_SIZE);
  561.     s->parse_context.state= -1;
  562.     if((s->avctx->debug&(FF_DEBUG_VIS_QP|FF_DEBUG_VIS_MB_TYPE)) || (s->avctx->debug_mv)){
  563.        s->visualization_buffer[0] = av_malloc((s->mb_width*16 + 2*EDGE_WIDTH) * s->mb_height*16 + 2*EDGE_WIDTH);
  564.        s->visualization_buffer[1] = av_malloc((s->mb_width*8 + EDGE_WIDTH) * s->mb_height*8 + EDGE_WIDTH);
  565.        s->visualization_buffer[2] = av_malloc((s->mb_width*8 + EDGE_WIDTH) * s->mb_height*8 + EDGE_WIDTH);
  566.     }
  568.     s->context_initialized = 1;
  570.     s->thread_context[0]= s;
  571.     threads = s->avctx->thread_count;
  573.     for(i=1; i<threads; i++){
  574.         s->thread_context[i]= av_malloc(sizeof(MpegEncContext));
  575.         memcpy(s->thread_context[i], s, sizeof(MpegEncContext));
  576.     }
  578.     for(i=0; i<threads; i++){
  579.         if(init_duplicate_context(s->thread_context[i], s) < 0)
  580.            goto fail;
  581.         s->thread_context[i]->start_mb_y= (s->mb_height*(i  ) + s->avctx->thread_count/2) / s->avctx->thread_count;
  582.         s->thread_context[i]->end_mb_y  = (s->mb_height*(i+1) + s->avctx->thread_count/2) / s->avctx->thread_count;
  583.     }
  585.     return 0;
  586.  fail:
  587.     MPV_common_end(s);
  588.     return -1;
  589. }
  591. /* init common structure for both encoder and decoder */
  592. void MPV_common_end(MpegEncContext *s)
  593. {
  594.     int i, j, k;
  596.     for(i=0; i<s->avctx->thread_count; i++){
  597.         free_duplicate_context(s->thread_context[i]);
  598.     }
  599.     for(i=1; i<s->avctx->thread_count; i++){
  600.         av_freep(&s->thread_context[i]);
  601.     }
  603.     av_freep(&s->parse_context.buffer);
  604.     s->parse_context.buffer_size=0;
  606.     av_freep(&s->mb_type);
  607.     av_freep(&s->p_mv_table_base);
  608.     av_freep(&s->b_forw_mv_table_base);
  609.     av_freep(&s->b_back_mv_table_base);
  610.     av_freep(&s->b_bidir_forw_mv_table_base);
  611.     av_freep(&s->b_bidir_back_mv_table_base);
  612.     av_freep(&s->b_direct_mv_table_base);
  613.     s->p_mv_table= NULL;
  614.     s->b_forw_mv_table= NULL;
  615.     s->b_back_mv_table= NULL;
  616.     s->b_bidir_forw_mv_table= NULL;
  617.     s->b_bidir_back_mv_table= NULL;
  618.     s->b_direct_mv_table= NULL;
  619.     for(i=0; i<2; i++){
  620.         for(j=0; j<2; j++){
  621.             for(k=0; k<2; k++){
  622.                 av_freep(&s->b_field_mv_table_base[i][j][k]);
  623.                 s->b_field_mv_table[i][j][k]=NULL;
  624.             }
  625.             av_freep(&s->b_field_select_table[i][j]);
  626.             av_freep(&s->p_field_mv_table_base[i][j]);
  627.             s->p_field_mv_table[i][j]=NULL;
  628.         }
  629.         av_freep(&s->p_field_select_table[i]);
  630.     }
  632.     av_freep(&s->dc_val_base);
  633.     av_freep(&s->ac_val_base);
  634.     av_freep(&s->coded_block_base);
  635.     av_freep(&s->mbintra_table);
  636.     av_freep(&s->cbp_table);
  637.     av_freep(&s->pred_dir_table);
  639.     av_freep(&s->mbskip_table);
  640.     av_freep(&s->prev_pict_types);
  641.     av_freep(&s->bitstream_buffer);
  642.     s->allocated_bitstream_buffer_size=0;
  644.     av_freep(&s->avctx->stats_out);
  645.     av_freep(&s->ac_stats);
  646.     av_freep(&s->error_status_table);
  647.     av_freep(&s->mb_index2xy);
  648.     av_freep(&s->lambda_table);
  649.     av_freep(&s->q_intra_matrix);
  650.     av_freep(&s->q_inter_matrix);
  651.     av_freep(&s->q_intra_matrix16);
  652.     av_freep(&s->q_inter_matrix16);
  653.     av_freep(&s->input_picture);
  654.     av_freep(&s->reordered_input_picture);
  655.     av_freep(&s->dct_offset);
  657.     if(s->picture){
  658.         for(i=0; i<MAX_PICTURE_COUNT; i++){
  659.             free_picture(s, &s->picture[i]);
  660.         }
  661.     }
  662.     av_freep(&s->picture);
  663.     s->context_initialized = 0;
  664.     s->last_picture_ptr=
  665.     s->next_picture_ptr=
  666.     s->current_picture_ptr= NULL;
  667.     s->linesize= s->uvlinesize= 0;
  669.     for(i=0; i<3; i++)
  670.         av_freep(&s->visualization_buffer[i]);
  672.     avcodec_default_free_buffers(s->avctx);
  673. }
  675. void init_rl(RLTable *rl, uint8_t static_store[2][2*MAX_RUN + MAX_LEVEL + 3])
  676. {
  677.     int8_t max_level[MAX_RUN+1], max_run[MAX_LEVEL+1];
  678.     uint8_t index_run[MAX_RUN+1];
  679.     int last, run, level, start, end, i;
  681.     /* If table is static, we can quit if rl->max_level[0] is not NULL */
  682.     if(static_store && rl->max_level[0])
  683.         return;
  685.     /* compute max_level[], max_run[] and index_run[] */
  686.     for(last=0;last<2;last++) {
  687.         if (last == 0) {
  688.             start = 0;
  689.             end = rl->last;
  690.         } else {
  691.             start = rl->last;
  692.             end = rl->n;
  693.         }
  695.         memset(max_level, 0, MAX_RUN + 1);
  696.         memset(max_run, 0, MAX_LEVEL + 1);
  697.         memset(index_run, rl->n, MAX_RUN + 1);
  698.         for(i=start;i<end;i++) {
  699.             run = rl->table_run[i];
  700.             level = rl->table_level[i];
  701.             if (index_run[run] == rl->n)
  702.                 index_run[run] = i;
  703.             if (level > max_level[run])
  704.                 max_level[run] = level;
  705.             if (run > max_run[level])
  706.                 max_run[level] = run;
  707.         }
  708.         if(static_store)
  709.             rl->max_level[last] = static_store[last];
  710.         else
  711.             rl->max_level[last] = av_malloc(MAX_RUN + 1);
  712.         memcpy(rl->max_level[last], max_level, MAX_RUN + 1);
  713.         if(static_store)
  714.             rl->max_run[last] = static_store[last] + MAX_RUN + 1;
  715.         else
  716.             rl->max_run[last] = av_malloc(MAX_LEVEL + 1);
  717.         memcpy(rl->max_run[last], max_run, MAX_LEVEL + 1);
  718.         if(static_store)
  719.             rl->index_run[last] = static_store[last] + MAX_RUN + MAX_LEVEL + 2;
  720.         else
  721.             rl->index_run[last] = av_malloc(MAX_RUN + 1);
  722.         memcpy(rl->index_run[last], index_run, MAX_RUN + 1);
  723.     }
  724. }
  726. void init_vlc_rl(RLTable *rl)
  727. {
  728.     int i, q;
  730.     for(q=0; q<32; q++){
  731.         int qmul= q*2;
  732.         int qadd= (q-1)|1;
  734.         if(q==0){
  735.             qmul=1;
  736.             qadd=0;
  737.         }
  738.         for(i=0; i<rl->vlc.table_size; i++){
  739.             int code= rl->vlc.table[i][0];
  740.             int len = rl->vlc.table[i][1];
  741.             int level, run;
  743.             if(len==0){ // illegal code
  744.                 run= 66;
  745.                 level= MAX_LEVEL;
  746.             }else if(len<0){ //more bits needed
  747.                 run= 0;
  748.                 level= code;
  749.             }else{
  750.                 if(code==rl->n){ //esc
  751.                     run= 66;
  752.                     level= 0;
  753.                 }else{
  754.                     run=   rl->table_run  [code] + 1;
  755.                     level= rl->table_level[code] * qmul + qadd;
  756.                     if(code >= rl->last) run+=192;
  757.                 }
  758.             }
  759.             rl->rl_vlc[q][i].len= len;
  760.             rl->rl_vlc[q][i].level= level;
  761.             rl->rl_vlc[q][i].run= run;
  762.         }
  763.     }
  764. }
  766. int ff_find_unused_picture(MpegEncContext *s, int shared){
  767.     int i;
  769.     if(shared){
  770.         for(i=0; i<MAX_PICTURE_COUNT; i++){
  771.             if(s->picture[i].data[0]==NULL && s->picture[i].type==0) return i;
  772.         }
  773.     }else{
  774.         for(i=0; i<MAX_PICTURE_COUNT; i++){
  775.             if(s->picture[i].data[0]==NULL && s->picture[i].type!=0) return i; //FIXME
  776.         }
  777.         for(i=0; i<MAX_PICTURE_COUNT; i++){
  778.             if(s->picture[i].data[0]==NULL) return i;
  779.         }
  780.     }
  782.     av_log(s->avctx, AV_LOG_FATAL, "Internal error, picture buffer overflown");
  783.     /* We could return -1, but the codec would crash trying to draw into a
  784.      * non-existing frame anyway. This is safer than waiting for a random crash.
  785.      * Also the return of this is never useful, an encoder must only allocate
  786.      * as much as allowed in the specification. This has no relationship to how
  787.      * much libavcodec could allocate (and MAX_PICTURE_COUNT is always large
  788.      * enough for such valid streams).
  789.      * Plus, a decoder has to check stream validity and remove frames if too
  790.      * many reference frames are around. Waiting for "OOM" is not correct at
  791.      * all. Similarly, missing reference frames have to be replaced by
  792.      * interpolated/MC frames, anything else is a bug in the codec ...
  793.      */
  794.     abort();
  795.     return -1;
  796. }
  798. static void update_noise_reduction(MpegEncContext *s){
  799.     int intra, i;
  801.     for(intra=0; intra<2; intra++){
  802.         if(s->dct_count[intra] > (1<<16)){
  803.             for(i=0; i<64; i++){
  804.                 s->dct_error_sum[intra][i] >>=1;
  805.             }
  806.             s->dct_count[intra] >>= 1;
  807.         }
  809.         for(i=0; i<64; i++){
  810.             s->dct_offset[intra][i]= (s->avctx->noise_reduction * s->dct_count[intra] + s->dct_error_sum[intra][i]/2) / (s->dct_error_sum[intra][i]+1);
  811.         }
  812.     }
  813. }
  815. /**
  816.  * generic function for encode/decode called after coding/decoding the header and before a frame is coded/decoded
  817.  */
  818. int MPV_frame_start(MpegEncContext *s, AVCodecContext *avctx)
  819. {
  820.     int i;
  821.     AVFrame *pic;
  822.     s->mb_skipped = 0;
  824.     assert(s->last_picture_ptr==NULL || s->out_format != FMT_H264 || s->codec_id == CODEC_ID_SVQ3);
  826.     /* mark&release old frames */
  827.     if (s->pict_type != FF_B_TYPE && s->last_picture_ptr && s->last_picture_ptr != s->next_picture_ptr && s->last_picture_ptr->data[0]) {
  828.       if(s->out_format != FMT_H264 || s->codec_id == CODEC_ID_SVQ3){
  829.         avctx->release_buffer(avctx, (AVFrame*)s->last_picture_ptr);
  831.         /* release forgotten pictures */
  832.         /* if(mpeg124/h263) */
  833.         if(!s->encoding){
  834.             for(i=0; i<MAX_PICTURE_COUNT; i++){
  835.                 if(s->picture[i].data[0] && &s->picture[i] != s->next_picture_ptr && s->picture[i].reference){
  836.                     av_log(avctx, AV_LOG_ERROR, "releasing zombie picturen");
  837.                     avctx->release_buffer(avctx, (AVFrame*)&s->picture[i]);
  838.                 }
  839.             }
  840.         }
  841.       }
  842.     }
  843. alloc:
  844.     if(!s->encoding){
  845.         /* release non reference frames */
  846.         for(i=0; i<MAX_PICTURE_COUNT; i++){
  847.             if(s->picture[i].data[0] && !s->picture[i].reference /*&& s->picture[i].type!=FF_BUFFER_TYPE_SHARED*/){
  848.                 s->avctx->release_buffer(s->avctx, (AVFrame*)&s->picture[i]);
  849.             }
  850.         }
  852.         if(s->current_picture_ptr && s->current_picture_ptr->data[0]==NULL)
  853.             pic= (AVFrame*)s->current_picture_ptr; //we already have a unused image (maybe it was set before reading the header)
  854.         else{
  855.             i= ff_find_unused_picture(s, 0);
  856.             pic= (AVFrame*)&s->picture[i];
  857.         }
  859.         pic->reference= 0;
  860.         if (!s->dropable){
  861.             if (s->codec_id == CODEC_ID_H264)
  862.                 pic->reference = s->picture_structure;
  863.             else if (s->pict_type != FF_B_TYPE)
  864.                 pic->reference = 3;
  865.         }
  867.         pic->coded_picture_number= s->coded_picture_number++;
  869.         if( alloc_picture(s, (Picture*)pic, 0) < 0)
  870.             return -1;
  872.         s->current_picture_ptr= (Picture*)pic;
  873.         s->current_picture_ptr->top_field_first= s->top_field_first; //FIXME use only the vars from current_pic
  874.         s->current_picture_ptr->interlaced_frame= !s->progressive_frame && !s->progressive_sequence;
  875.     }
  877.     s->current_picture_ptr->pict_type= s->pict_type;
  878. //    if(s->flags && CODEC_FLAG_QSCALE)
  879.   //      s->current_picture_ptr->quality= s->new_picture_ptr->quality;
  880.     s->current_picture_ptr->key_frame= s->pict_type == FF_I_TYPE;
  882.     copy_picture(&s->current_picture, s->current_picture_ptr);
  884.     if (s->pict_type != FF_B_TYPE) {
  885.         s->last_picture_ptr= s->next_picture_ptr;
  886.         if(!s->dropable)
  887.             s->next_picture_ptr= s->current_picture_ptr;
  888.     }
  889. /*    av_log(s->avctx, AV_LOG_DEBUG, "L%p N%p C%p L%p N%p C%p type:%d drop:%dn", s->last_picture_ptr, s->next_picture_ptr,s->current_picture_ptr,
  890.         s->last_picture_ptr    ? s->last_picture_ptr->data[0] : NULL,
  891.         s->next_picture_ptr    ? s->next_picture_ptr->data[0] : NULL,
  892.         s->current_picture_ptr ? s->current_picture_ptr->data[0] : NULL,
  893.         s->pict_type, s->dropable);*/
  895.     if(s->last_picture_ptr) copy_picture(&s->last_picture, s->last_picture_ptr);
  896.     if(s->next_picture_ptr) copy_picture(&s->next_picture, s->next_picture_ptr);
  898.     if(s->pict_type != FF_I_TYPE && (s->last_picture_ptr==NULL || s->last_picture_ptr->data[0]==NULL) && !s->dropable){
  899.         av_log(avctx, AV_LOG_ERROR, "warning: first frame is no keyframen");
  900.         assert(s->pict_type != FF_B_TYPE); //these should have been dropped if we don't have a reference
  901.         goto alloc;
  902.     }
  904.     assert(s->pict_type == FF_I_TYPE || (s->last_picture_ptr && s->last_picture_ptr->data[0]));
  906.     if(s->picture_structure!=PICT_FRAME && s->out_format != FMT_H264){
  907.         int i;
  908.         for(i=0; i<4; i++){
  909.             if(s->picture_structure == PICT_BOTTOM_FIELD){
  910.                  s->current_picture.data[i] += s->current_picture.linesize[i];
  911.             }
  912.             s->current_picture.linesize[i] *= 2;
  913.             s->last_picture.linesize[i] *=2;
  914.             s->next_picture.linesize[i] *=2;
  915.         }
  916.     }
  918.     s->hurry_up= s->avctx->hurry_up;
  919.     s->error_resilience= avctx->error_resilience;
  921.     /* set dequantizer, we can't do it during init as it might change for mpeg4
  922.        and we can't do it in the header decode as init is not called for mpeg4 there yet */
  923.     if(s->mpeg_quant || s->codec_id == CODEC_ID_MPEG2VIDEO){
  924.         s->dct_unquantize_intra = s->dct_unquantize_mpeg2_intra;
  925.         s->dct_unquantize_inter = s->dct_unquantize_mpeg2_inter;
  926.     }else if(s->out_format == FMT_H263 || s->out_format == FMT_H261){
  927.         s->dct_unquantize_intra = s->dct_unquantize_h263_intra;
  928.         s->dct_unquantize_inter = s->dct_unquantize_h263_inter;
  929.     }else{
  930.         s->dct_unquantize_intra = s->dct_unquantize_mpeg1_intra;
  931.         s->dct_unquantize_inter = s->dct_unquantize_mpeg1_inter;
  932.     }
  934.     if(s->dct_error_sum){
  935.         assert(s->avctx->noise_reduction && s->encoding);
  937.         update_noise_reduction(s);
  938.     }
  940. #ifdef HAVE_XVMC
  941.     if(s->avctx->xvmc_acceleration)
  942.         return XVMC_field_start(s, avctx);
  943. #endif
  944.     return 0;
  945. }
  947. /* generic function for encode/decode called after a frame has been coded/decoded */
  948. void MPV_frame_end(MpegEncContext *s)
  949. {
  950.     int i;
  951.     /* draw edge for correct motion prediction if outside */
  952. #ifdef HAVE_XVMC
  953. //just to make sure that all data is rendered.
  954.     if(s->avctx->xvmc_acceleration){
  955.         XVMC_field_end(s);
  956.     }else
  957. #endif
  958.     if(s->unrestricted_mv && s->current_picture.reference && !s->intra_only && !(s->flags&CODEC_FLAG_EMU_EDGE)) {
  959.             s->dsp.draw_edges(s->current_picture.data[0], s->linesize  , s->h_edge_pos   , s->v_edge_pos   , EDGE_WIDTH  );
  960.             s->dsp.draw_edges(s->current_picture.data[1], s->uvlinesize, s->h_edge_pos>>1, s->v_edge_pos>>1, EDGE_WIDTH/2);
  961.             s->dsp.draw_edges(s->current_picture.data[2], s->uvlinesize, s->h_edge_pos>>1, s->v_edge_pos>>1, EDGE_WIDTH/2);
  962.     }
  963.     emms_c();
  965.     s->last_pict_type    = s->pict_type;
  966.     s->last_lambda_for[s->pict_type]= s->current_picture_ptr->quality;
  967.     if(s->pict_type!=FF_B_TYPE){
  968.         s->last_non_b_pict_type= s->pict_type;
  969.     }
  970. #if 0
  971.         /* copy back current_picture variables */
  972.     for(i=0; i<MAX_PICTURE_COUNT; i++){
  973.         if(s->picture[i].data[0] == s->current_picture.data[0]){
  974.             s->picture[i]= s->current_picture;
  975.             break;
  976.         }
  977.     }
  978.     assert(i<MAX_PICTURE_COUNT);
  979. #endif
  981.     if(s->encoding){
  982.         /* release non-reference frames */
  983.         for(i=0; i<MAX_PICTURE_COUNT; i++){
  984.             if(s->picture[i].data[0] && !s->picture[i].reference /*&& s->picture[i].type!=FF_BUFFER_TYPE_SHARED*/){
  985.                 s->avctx->release_buffer(s->avctx, (AVFrame*)&s->picture[i]);
  986.             }
  987.         }
  988.     }
  989.     // clear copies, to avoid confusion
  990. #if 0
  991.     memset(&s->last_picture, 0, sizeof(Picture));
  992.     memset(&s->next_picture, 0, sizeof(Picture));
  993.     memset(&s->current_picture, 0, sizeof(Picture));
  994. #endif
  995.     s->avctx->coded_frame= (AVFrame*)s->current_picture_ptr;
  996. }
  998. /**
  999.  * draws an line from (ex, ey) -> (sx, sy).
  1000.  * @param w width of the image
  1001.  * @param h height of the image
  1002.  * @param stride stride/linesize of the image
  1003.  * @param color color of the arrow
  1004.  */
  1005. static void draw_line(uint8_t *buf, int sx, int sy, int ex, int ey, int w, int h, int stride, int color){
  1006.     int x, y, fr, f;
  1008.     sx= av_clip(sx, 0, w-1);
  1009.     sy= av_clip(sy, 0, h-1);
  1010.     ex= av_clip(ex, 0, w-1);
  1011.     ey= av_clip(ey, 0, h-1);
  1013.     buf[sy*stride + sx]+= color;
  1015.     if(FFABS(ex - sx) > FFABS(ey - sy)){
  1016.         if(sx > ex){
  1017.             FFSWAP(int, sx, ex);
  1018.             FFSWAP(int, sy, ey);
  1019.         }
  1020.         buf+= sx + sy*stride;
  1021.         ex-= sx;
  1022.         f= ((ey-sy)<<16)/ex;
  1023.         for(x= 0; x <= ex; x++){
  1024.             y = (x*f)>>16;
  1025.             fr= (x*f)&0xFFFF;
  1026.             buf[ y   *stride + x]+= (color*(0x10000-fr))>>16;
  1027.             buf[(y+1)*stride + x]+= (color*         fr )>>16;
  1028.         }
  1029.     }else{
  1030.         if(sy > ey){
  1031.             FFSWAP(int, sx, ex);
  1032.             FFSWAP(int, sy, ey);
  1033.         }
  1034.         buf+= sx + sy*stride;
  1035.         ey-= sy;
  1036.         if(ey) f= ((ex-sx)<<16)/ey;
  1037.         else   f= 0;
  1038.         for(y= 0; y <= ey; y++){
  1039.             x = (y*f)>>16;
  1040.             fr= (y*f)&0xFFFF;
  1041.             buf[y*stride + x  ]+= (color*(0x10000-fr))>>16;
  1042.             buf[y*stride + x+1]+= (color*         fr )>>16;
  1043.         }
  1044.     }
  1045. }
  1047. /**
  1048.  * draws an arrow from (ex, ey) -> (sx, sy).
  1049.  * @param w width of the image
  1050.  * @param h height of the image
  1051.  * @param stride stride/linesize of the image
  1052.  * @param color color of the arrow
  1053.  */
  1054. static void draw_arrow(uint8_t *buf, int sx, int sy, int ex, int ey, int w, int h, int stride, int color){
  1055.     int dx,dy;
  1057.     sx= av_clip(sx, -100, w+100);
  1058.     sy= av_clip(sy, -100, h+100);
  1059.     ex= av_clip(ex, -100, w+100);
  1060.     ey= av_clip(ey, -100, h+100);
  1062.     dx= ex - sx;
  1063.     dy= ey - sy;
  1065.     if(dx*dx + dy*dy > 3*3){
  1066.         int rx=  dx + dy;
  1067.         int ry= -dx + dy;
  1068.         int length= ff_sqrt((rx*rx + ry*ry)<<8);
  1070.         //FIXME subpixel accuracy
  1071.         rx= ROUNDED_DIV(rx*3<<4, length);
  1072.         ry= ROUNDED_DIV(ry*3<<4, length);
  1074.         draw_line(buf, sx, sy, sx + rx, sy + ry, w, h, stride, color);
  1075.         draw_line(buf, sx, sy, sx - ry, sy + rx, w, h, stride, color);
  1076.     }
  1077.     draw_line(buf, sx, sy, ex, ey, w, h, stride, color);
  1078. }
  1080. /**
  1081.  * prints debuging info for the given picture.
  1082.  */
  1083. void ff_print_debug_info(MpegEncContext *s, AVFrame *pict){
  1085.     if(!pict || !pict->mb_type) return;
  1087.     if(s->avctx->debug&(FF_DEBUG_SKIP | FF_DEBUG_QP | FF_DEBUG_MB_TYPE)){
  1088.         int x,y;
  1090.         av_log(s->avctx,AV_LOG_DEBUG,"New frame, type: ");
  1091.         switch (pict->pict_type) {
  1092.             case FF_I_TYPE: av_log(s->avctx,AV_LOG_DEBUG,"In"); break;
  1093.             case FF_P_TYPE: av_log(s->avctx,AV_LOG_DEBUG,"Pn"); break;
  1094.             case FF_B_TYPE: av_log(s->avctx,AV_LOG_DEBUG,"Bn"); break;
  1095.             case FF_S_TYPE: av_log(s->avctx,AV_LOG_DEBUG,"Sn"); break;
  1096.             case FF_SI_TYPE: av_log(s->avctx,AV_LOG_DEBUG,"SIn"); break;
  1097.             case FF_SP_TYPE: av_log(s->avctx,AV_LOG_DEBUG,"SPn"); break;
  1098.         }
  1099.         for(y=0; y<s->mb_height; y++){
  1100.             for(x=0; x<s->mb_width; x++){
  1101.                 if(s->avctx->debug&FF_DEBUG_SKIP){
  1102.                     int count= s->mbskip_table[x + y*s->mb_stride];
  1103.                     if(count>9) count=9;
  1104.                     av_log(s->avctx, AV_LOG_DEBUG, "%1d", count);
  1105.                 }
  1106.                 if(s->avctx->debug&FF_DEBUG_QP){
  1107.                     av_log(s->avctx, AV_LOG_DEBUG, "%2d", pict->qscale_table[x + y*s->mb_stride]);
  1108.                 }
  1109.                 if(s->avctx->debug&FF_DEBUG_MB_TYPE){
  1110.                     int mb_type= pict->mb_type[x + y*s->mb_stride];
  1111.                     //Type & MV direction
  1112.                     if(IS_PCM(mb_type))
  1113.                         av_log(s->avctx, AV_LOG_DEBUG, "P");
  1114.                     else if(IS_INTRA(mb_type) && IS_ACPRED(mb_type))
  1115.                         av_log(s->avctx, AV_LOG_DEBUG, "A");
  1116.                     else if(IS_INTRA4x4(mb_type))
  1117.                         av_log(s->avctx, AV_LOG_DEBUG, "i");
  1118.                     else if(IS_INTRA16x16(mb_type))
  1119.                         av_log(s->avctx, AV_LOG_DEBUG, "I");
  1120.                     else if(IS_DIRECT(mb_type) && IS_SKIP(mb_type))
  1121.                         av_log(s->avctx, AV_LOG_DEBUG, "d");
  1122.                     else if(IS_DIRECT(mb_type))
  1123.                         av_log(s->avctx, AV_LOG_DEBUG, "D");
  1124.                     else if(IS_GMC(mb_type) && IS_SKIP(mb_type))
  1125.                         av_log(s->avctx, AV_LOG_DEBUG, "g");
  1126.                     else if(IS_GMC(mb_type))
  1127.                         av_log(s->avctx, AV_LOG_DEBUG, "G");
  1128.                     else if(IS_SKIP(mb_type))
  1129.                         av_log(s->avctx, AV_LOG_DEBUG, "S");
  1130.                     else if(!USES_LIST(mb_type, 1))
  1131.                         av_log(s->avctx, AV_LOG_DEBUG, ">");
  1132.                     else if(!USES_LIST(mb_type, 0))
  1133.                         av_log(s->avctx, AV_LOG_DEBUG, "<");
  1134.                     else{
  1135.                         assert(USES_LIST(mb_type, 0) && USES_LIST(mb_type, 1));
  1136.                         av_log(s->avctx, AV_LOG_DEBUG, "X");
  1137.                     }
  1139.                     //segmentation
  1140.                     if(IS_8X8(mb_type))
  1141.                         av_log(s->avctx, AV_LOG_DEBUG, "+");
  1142.                     else if(IS_16X8(mb_type))
  1143.                         av_log(s->avctx, AV_LOG_DEBUG, "-");
  1144.                     else if(IS_8X16(mb_type))
  1145.                         av_log(s->avctx, AV_LOG_DEBUG, "|");
  1146.                     else if(IS_INTRA(mb_type) || IS_16X16(mb_type))
  1147.                         av_log(s->avctx, AV_LOG_DEBUG, " ");
  1148.                     else
  1149.                         av_log(s->avctx, AV_LOG_DEBUG, "?");
  1152.                     if(IS_INTERLACED(mb_type) && s->codec_id == CODEC_ID_H264)
  1153.                         av_log(s->avctx, AV_LOG_DEBUG, "=");
  1154.                     else
  1155.                         av_log(s->avctx, AV_LOG_DEBUG, " ");
  1156.                 }
  1157. //                av_log(s->avctx, AV_LOG_DEBUG, " ");
  1158.             }
  1159.             av_log(s->avctx, AV_LOG_DEBUG, "n");
  1160.         }
  1161.     }
  1163.     if((s->avctx->debug&(FF_DEBUG_VIS_QP|FF_DEBUG_VIS_MB_TYPE)) || (s->avctx->debug_mv)){
  1164.         const int shift= 1 + s->quarter_sample;
  1165.         int mb_y;
  1166.         uint8_t *ptr;
  1167.         int i;
  1168.         int h_chroma_shift, v_chroma_shift;
  1169.         const int width = s->avctx->width;
  1170.         const int height= s->avctx->height;
  1171.         const int mv_sample_log2= 4 - pict->motion_subsample_log2;
  1172.         const int mv_stride= (s->mb_width << mv_sample_log2) + (s->codec_id == CODEC_ID_H264 ? 0 : 1);
  1173.         s->low_delay=0; //needed to see the vectors without trashing the buffers
  1175.         avcodec_get_chroma_sub_sample(s->avctx->pix_fmt, &h_chroma_shift, &v_chroma_shift);
  1176.         for(i=0; i<3; i++){
  1177.             memcpy(s->visualization_buffer[i], pict->data[i], (i==0) ? pict->linesize[i]*height:pict->linesize[i]*height >> v_chroma_shift);
  1178.             pict->data[i]= s->visualization_buffer[i];
  1179.         }
  1180.         pict->type= FF_BUFFER_TYPE_COPY;
  1181.         ptr= pict->data[0];
  1183.         for(mb_y=0; mb_y<s->mb_height; mb_y++){
  1184.             int mb_x;
  1185.             for(mb_x=0; mb_x<s->mb_width; mb_x++){
  1186.                 const int mb_index= mb_x + mb_y*s->mb_stride;
  1187.                 if((s->avctx->debug_mv) && pict->motion_val){
  1188.                   int type;
  1189.                   for(type=0; type<3; type++){
  1190.                     int direction = 0;
  1191.                     switch (type) {
  1192.                       case 0: if ((!(s->avctx->debug_mv&FF_DEBUG_VIS_MV_P_FOR)) || (pict->pict_type!=FF_P_TYPE))
  1193.                                 continue;
  1194.                               direction = 0;
  1195.                               break;
  1196.                       case 1: if ((!(s->avctx->debug_mv&FF_DEBUG_VIS_MV_B_FOR)) || (pict->pict_type!=FF_B_TYPE))
  1197.                                 continue;
  1198.                               direction = 0;
  1199.                               break;
  1200.                       case 2: if ((!(s->avctx->debug_mv&FF_DEBUG_VIS_MV_B_BACK)) || (pict->pict_type!=FF_B_TYPE))
  1201.                                 continue;
  1202.                               direction = 1;
  1203.                               break;
  1204.                     }
  1205.                     if(!USES_LIST(pict->mb_type[mb_index], direction))
  1206.                         continue;
  1208.                     if(IS_8X8(pict->mb_type[mb_index])){
  1209.                       int i;
  1210.                       for(i=0; i<4; i++){
  1211.                         int sx= mb_x*16 + 4 + 8*(i&1);
  1212.                         int sy= mb_y*16 + 4 + 8*(i>>1);
  1213.                         int xy= (mb_x*2 + (i&1) + (mb_y*2 + (i>>1))*mv_stride) << (mv_sample_log2-1);
  1214.                         int mx= (pict->motion_val[direction][xy][0]>>shift) + sx;
  1215.                         int my= (pict->motion_val[direction][xy][1]>>shift) + sy;
  1216.                         draw_arrow(ptr, sx, sy, mx, my, width, height, s->linesize, 100);
  1217.                       }
  1218.                     }else if(IS_16X8(pict->mb_type[mb_index])){
  1219.                       int i;
  1220.                       for(i=0; i<2; i++){
  1221.                         int sx=mb_x*16 + 8;
  1222.                         int sy=mb_y*16 + 4 + 8*i;
  1223.                         int xy= (mb_x*2 + (mb_y*2 + i)*mv_stride) << (mv_sample_log2-1);
  1224.                         int mx=(pict->motion_val[direction][xy][0]>>shift);
  1225.                         int my=(pict->motion_val[direction][xy][1]>>shift);
  1227.                         if(IS_INTERLACED(pict->mb_type[mb_index]))
  1228.                             my*=2;
  1230.                         draw_arrow(ptr, sx, sy, mx+sx, my+sy, width, height, s->linesize, 100);
  1231.                       }
  1232.                     }else if(IS_8X16(pict->mb_type[mb_index])){
  1233.                       int i;
  1234.                       for(i=0; i<2; i++){
  1235.                         int sx=mb_x*16 + 4 + 8*i;
  1236.                         int sy=mb_y*16 + 8;
  1237.                         int xy= (mb_x*2 + i + mb_y*2*mv_stride) << (mv_sample_log2-1);
  1238.                         int mx=(pict->motion_val[direction][xy][0]>>shift);
  1239.                         int my=(pict->motion_val[direction][xy][1]>>shift);
  1241.                         if(IS_INTERLACED(pict->mb_type[mb_index]))
  1242.                             my*=2;
  1244.                         draw_arrow(ptr, sx, sy, mx+sx, my+sy, width, height, s->linesize, 100);
  1245.                       }
  1246.                     }else{
  1247.                       int sx= mb_x*16 + 8;
  1248.                       int sy= mb_y*16 + 8;
  1249.                       int xy= (mb_x + mb_y*mv_stride) << mv_sample_log2;
  1250.                       int mx= (pict->motion_val[direction][xy][0]>>shift) + sx;
  1251.                       int my= (pict->motion_val[direction][xy][1]>>shift) + sy;
  1252.                       draw_arrow(ptr, sx, sy, mx, my, width, height, s->linesize, 100);
  1253.                     }
  1254.                   }
  1255.                 }
  1256.                 if((s->avctx->debug&FF_DEBUG_VIS_QP) && pict->motion_val){
  1257.                     uint64_t c= (pict->qscale_table[mb_index]*128/31) * 0x0101010101010101;
  1258.                     int y;
  1259.                     for(y=0; y<8; y++){
  1260.                         *(uint64_t*)(pict->data[1] + 8*mb_x + (8*mb_y + y)*pict->linesize[1])= c;
  1261.                         *(uint64_t*)(pict->data[2] + 8*mb_x + (8*mb_y + y)*pict->linesize[2])= c;
  1262.                     }
  1263.                 }
  1264.                 if((s->avctx->debug&FF_DEBUG_VIS_MB_TYPE) && pict->motion_val){
  1265.                     int mb_type= pict->mb_type[mb_index];
  1266.                     uint64_t u,v;
  1267.                     int y;
  1268. #define COLOR(theta, r)
  1269. u= (int)(128 + r*cos(theta*3.141592/180));
  1270. v= (int)(128 + r*sin(theta*3.141592/180));
  1273.                     u=v=128;
  1274.                     if(IS_PCM(mb_type)){
  1275.                         COLOR(120,48)
  1276.                     }else if((IS_INTRA(mb_type) && IS_ACPRED(mb_type)) || IS_INTRA16x16(mb_type)){
  1277.                         COLOR(30,48)
  1278.                     }else if(IS_INTRA4x4(mb_type)){
  1279.                         COLOR(90,48)
  1280.                     }else if(IS_DIRECT(mb_type) && IS_SKIP(mb_type)){
  1281. //                        COLOR(120,48)
  1282.                     }else if(IS_DIRECT(mb_type)){
  1283.                         COLOR(150,48)
  1284.                     }else if(IS_GMC(mb_type) && IS_SKIP(mb_type)){
  1285.                         COLOR(170,48)
  1286.                     }else if(IS_GMC(mb_type)){
  1287.                         COLOR(190,48)
  1288.                     }else if(IS_SKIP(mb_type)){
  1289. //                        COLOR(180,48)
  1290.                     }else if(!USES_LIST(mb_type, 1)){
  1291.                         COLOR(240,48)
  1292.                     }else if(!USES_LIST(mb_type, 0)){
  1293.                         COLOR(0,48)
  1294.                     }else{
  1295.                         assert(USES_LIST(mb_type, 0) && USES_LIST(mb_type, 1));
  1296.                         COLOR(300,48)
  1297.                     }
  1299.                     u*= 0x0101010101010101;
  1300.                     v*= 0x0101010101010101;
  1301.                     for(y=0; y<8; y++){
  1302.                         *(uint64_t*)(pict->data[1] + 8*mb_x + (8*mb_y + y)*pict->linesize[1])= u;
  1303.                         *(uint64_t*)(pict->data[2] + 8*mb_x + (8*mb_y + y)*pict->linesize[2])= v;
  1304.                     }
  1306.                     //segmentation
  1307.                     if(IS_8X8(mb_type) || IS_16X8(mb_type)){
  1308.                         *(uint64_t*)(pict->data[0] + 16*mb_x + 0 + (16*mb_y + 8)*pict->linesize[0])^= 0x8080808080808080;
  1309.                         *(uint64_t*)(pict->data[0] + 16*mb_x + 8 + (16*mb_y + 8)*pict->linesize[0])^= 0x8080808080808080;
  1310.                     }
  1311.                     if(IS_8X8(mb_type) || IS_8X16(mb_type)){
  1312.                         for(y=0; y<16; y++)
  1313.                             pict->data[0][16*mb_x + 8 + (16*mb_y + y)*pict->linesize[0]]^= 0x80;
  1314.                     }
  1315.                     if(IS_8X8(mb_type) && mv_sample_log2 >= 2){
  1316.                         int dm= 1 << (mv_sample_log2-2);
  1317.                         for(i=0; i<4; i++){
  1318.                             int sx= mb_x*16 + 8*(i&1);
  1319.                             int sy= mb_y*16 + 8*(i>>1);
  1320.                             int xy= (mb_x*2 + (i&1) + (mb_y*2 + (i>>1))*mv_stride) << (mv_sample_log2-1);
  1321.                             //FIXME bidir
  1322.                             int32_t *mv = (int32_t*)&pict->motion_val[0][xy];
  1323.                             if(mv[0] != mv[dm] || mv[dm*mv_stride] != mv[dm*(mv_stride+1)])
  1324.                                 for(y=0; y<8; y++)
  1325.                                     pict->data[0][sx + 4 + (sy + y)*pict->linesize[0]]^= 0x80;
  1326.                             if(mv[0] != mv[dm*mv_stride] || mv[dm] != mv[dm*(mv_stride+1)])
  1327.                                 *(uint64_t*)(pict->data[0] + sx + (sy + 4)*pict->linesize[0])^= 0x8080808080808080;
  1328.                         }
  1329.                     }
  1331.                     if(IS_INTERLACED(mb_type) && s->codec_id == CODEC_ID_H264){
  1332.                         // hmm
  1333.                     }
  1334.                 }
  1335.                 s->mbskip_table[mb_index]=0;
  1336.             }
  1337.         }
  1338.     }
  1339. }
  1341. static inline int hpel_motion_lowres(MpegEncContext *s,
  1342.                                   uint8_t *dest, uint8_t *src,
  1343.                                   int field_based, int field_select,
  1344.                                   int src_x, int src_y,
  1345.                                   int width, int height, int stride,
  1346.                                   int h_edge_pos, int v_edge_pos,
  1347.                                   int w, int h, h264_chroma_mc_func *pix_op,
  1348.                                   int motion_x, int motion_y)
  1349. {
  1350.     const int lowres= s->avctx->lowres;
  1351.     const int s_mask= (2<<lowres)-1;
  1352.     int emu=0;
  1353.     int sx, sy;
  1355.     if(s->quarter_sample){
  1356.         motion_x/=2;
  1357.         motion_y/=2;
  1358.     }
  1360.     sx= motion_x & s_mask;
  1361.     sy= motion_y & s_mask;
  1362.     src_x += motion_x >> (lowres+1);
  1363.     src_y += motion_y >> (lowres+1);
  1365.     src += src_y * stride + src_x;
  1367.     if(   (unsigned)src_x > h_edge_pos                 - (!!sx) - w
  1368.        || (unsigned)src_y >(v_edge_pos >> field_based) - (!!sy) - h){
  1369.         ff_emulated_edge_mc(s->edge_emu_buffer, src, s->linesize, w+1, (h+1)<<field_based,
  1370.                             src_x, src_y<<field_based, h_edge_pos, v_edge_pos);
  1371.         src= s->edge_emu_buffer;
  1372.         emu=1;
  1373.     }
  1375.     sx <<= 2 - lowres;
  1376.     sy <<= 2 - lowres;
  1377.     if(field_select)
  1378.         src += s->linesize;
  1379.     pix_op[lowres](dest, src, stride, h, sx, sy);
  1380.     return emu;
  1381. }
  1383. /* apply one mpeg motion vector to the three components */
  1384. static av_always_inline void mpeg_motion_lowres(MpegEncContext *s,
  1385.                                uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,
  1386.                                int field_based, int bottom_field, int field_select,
  1387.                                uint8_t **ref_picture, h264_chroma_mc_func *pix_op,
  1388.                                int motion_x, int motion_y, int h)
  1389. {
  1390.     uint8_t *ptr_y, *ptr_cb, *ptr_cr;
  1391.     int mx, my, src_x, src_y, uvsrc_x, uvsrc_y, uvlinesize, linesize, sx, sy, uvsx, uvsy;
  1392.     const int lowres= s->avctx->lowres;
  1393.     const int block_s= 8>>lowres;
  1394.     const int s_mask= (2<<lowres)-1;
  1395.     const int h_edge_pos = s->h_edge_pos >> lowres;
  1396.     const int v_edge_pos = s->v_edge_pos >> lowres;
  1397.     linesize   = s->current_picture.linesize[0] << field_based;
  1398.     uvlinesize = s->current_picture.linesize[1] << field_based;
  1400.     if(s->quarter_sample){ //FIXME obviously not perfect but qpel wont work in lowres anyway
  1401.         motion_x/=2;
  1402.         motion_y/=2;
  1403.     }
  1405.     if(field_based){
  1406.         motion_y += (bottom_field - field_select)*((1<<lowres)-1);
  1407.     }
  1409.     sx= motion_x & s_mask;
  1410.     sy= motion_y & s_mask;
  1411.     src_x = s->mb_x*2*block_s               + (motion_x >> (lowres+1));
  1412.     src_y =(s->mb_y*2*block_s>>field_based) + (motion_y >> (lowres+1));
  1414.     if (s->out_format == FMT_H263) {
  1415.         uvsx = ((motion_x>>1) & s_mask) | (sx&1);
  1416.         uvsy = ((motion_y>>1) & s_mask) | (sy&1);
  1417.         uvsrc_x = src_x>>1;
  1418.         uvsrc_y = src_y>>1;
  1419.     }else if(s->out_format == FMT_H261){//even chroma mv's are full pel in H261
  1420.         mx = motion_x / 4;
  1421.         my = motion_y / 4;
  1422.         uvsx = (2*mx) & s_mask;
  1423.         uvsy = (2*my) & s_mask;
  1424.         uvsrc_x = s->mb_x*block_s               + (mx >> lowres);
  1425.         uvsrc_y = s->mb_y*block_s               + (my >> lowres);
  1426.     } else {
  1427.         mx = motion_x / 2;
  1428.         my = motion_y / 2;
  1429.         uvsx = mx & s_mask;
  1430.         uvsy = my & s_mask;
  1431.         uvsrc_x = s->mb_x*block_s               + (mx >> (lowres+1));
  1432.         uvsrc_y =(s->mb_y*block_s>>field_based) + (my >> (lowres+1));
  1433.     }
  1435.     ptr_y  = ref_picture[0] + src_y * linesize + src_x;
  1436.     ptr_cb = ref_picture[1] + uvsrc_y * uvlinesize + uvsrc_x;
  1437.     ptr_cr = ref_picture[2] + uvsrc_y * uvlinesize + uvsrc_x;
  1439.     if(   (unsigned)src_x > h_edge_pos                 - (!!sx) - 2*block_s
  1440.        || (unsigned)src_y >(v_edge_pos >> field_based) - (!!sy) - h){
  1441.             ff_emulated_edge_mc(s->edge_emu_buffer, ptr_y, s->linesize, 17, 17+field_based,
  1442.                              src_x, src_y<<field_based, h_edge_pos, v_edge_pos);
  1443.             ptr_y = s->edge_emu_buffer;
  1444.             if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
  1445.                 uint8_t *uvbuf= s->edge_emu_buffer+18*s->linesize;
  1446.                 ff_emulated_edge_mc(uvbuf  , ptr_cb, s->uvlinesize, 9, 9+field_based,
  1447.                                  uvsrc_x, uvsrc_y<<field_based, h_edge_pos>>1, v_edge_pos>>1);
  1448.                 ff_emulated_edge_mc(uvbuf+16, ptr_cr, s->uvlinesize, 9, 9+field_based,
  1449.                                  uvsrc_x, uvsrc_y<<field_based, h_edge_pos>>1, v_edge_pos>>1);
  1450.                 ptr_cb= uvbuf;
  1451.                 ptr_cr= uvbuf+16;
  1452.             }
  1453.     }
  1455.     if(bottom_field){ //FIXME use this for field pix too instead of the obnoxious hack which changes picture.data
  1456.         dest_y += s->linesize;
  1457.         dest_cb+= s->uvlinesize;
  1458.         dest_cr+= s->uvlinesize;
  1459.     }
  1461.     if(field_select){
  1462.         ptr_y += s->linesize;
  1463.         ptr_cb+= s->uvlinesize;
  1464.         ptr_cr+= s->uvlinesize;
  1465.     }
  1467.     sx <<= 2 - lowres;
  1468.     sy <<= 2 - lowres;
  1469.     pix_op[lowres-1](dest_y, ptr_y, linesize, h, sx, sy);
  1471.     if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
  1472.         uvsx <<= 2 - lowres;
  1473.         uvsy <<= 2 - lowres;
  1474.         pix_op[lowres](dest_cb, ptr_cb, uvlinesize, h >> s->chroma_y_shift, uvsx, uvsy);
  1475.         pix_op[lowres](dest_cr, ptr_cr, uvlinesize, h >> s->chroma_y_shift, uvsx, uvsy);
  1476.     }
  1477.     //FIXME h261 lowres loop filter
  1478. }
  1480. static inline void chroma_4mv_motion_lowres(MpegEncContext *s,
  1481.                                      uint8_t *dest_cb, uint8_t *dest_cr,
  1482.                                      uint8_t **ref_picture,
  1483.                                      h264_chroma_mc_func *pix_op,
  1484.                                      int mx, int my){
  1485.     const int lowres= s->avctx->lowres;
  1486.     const int block_s= 8>>lowres;
  1487.     const int s_mask= (2<<lowres)-1;
  1488.     const int h_edge_pos = s->h_edge_pos >> (lowres+1);
  1489.     const int v_edge_pos = s->v_edge_pos >> (lowres+1);
  1490.     int emu=0, src_x, src_y, offset, sx, sy;
  1491.     uint8_t *ptr;
  1493.     if(s->quarter_sample){
  1494.         mx/=2;
  1495.         my/=2;
  1496.     }
  1498.     /* In case of 8X8, we construct a single chroma motion vector
  1499.        with a special rounding */
  1500.     mx= ff_h263_round_chroma(mx);
  1501.     my= ff_h263_round_chroma(my);
  1503.     sx= mx & s_mask;
  1504.     sy= my & s_mask;
  1505.     src_x = s->mb_x*block_s + (mx >> (lowres+1));
  1506.     src_y = s->mb_y*block_s + (my >> (lowres+1));
  1508.     offset = src_y * s->uvlinesize + src_x;
  1509.     ptr = ref_picture[1] + offset;
  1510.     if(s->flags&CODEC_FLAG_EMU_EDGE){
  1511.         if(   (unsigned)src_x > h_edge_pos - (!!sx) - block_s
  1512.            || (unsigned)src_y > v_edge_pos - (!!sy) - block_s){
  1513.             ff_emulated_edge_mc(s->edge_emu_buffer, ptr, s->uvlinesize, 9, 9, src_x, src_y, h_edge_pos, v_edge_pos);
  1514.             ptr= s->edge_emu_buffer;
  1515.             emu=1;
  1516.         }
  1517.     }
  1518.     sx <<= 2 - lowres;
  1519.     sy <<= 2 - lowres;
  1520.     pix_op[lowres](dest_cb, ptr, s->uvlinesize, block_s, sx, sy);
  1522.     ptr = ref_picture[2] + offset;
  1523.     if(emu){
  1524.         ff_emulated_edge_mc(s->edge_emu_buffer, ptr, s->uvlinesize, 9, 9, src_x, src_y, h_edge_pos, v_edge_pos);
  1525.         ptr= s->edge_emu_buffer;
  1526.     }
  1527.     pix_op[lowres](dest_cr, ptr, s->uvlinesize, block_s, sx, sy);
  1528. }
  1530. /**
  1531.  * motion compensation of a single macroblock
  1532.  * @param s context
  1533.  * @param dest_y luma destination pointer
  1534.  * @param dest_cb chroma cb/u destination pointer
  1535.  * @param dest_cr chroma cr/v destination pointer
  1536.  * @param dir direction (0->forward, 1->backward)
  1537.  * @param ref_picture array[3] of pointers to the 3 planes of the reference picture
  1538.  * @param pic_op halfpel motion compensation function (average or put normally)
  1539.  * the motion vectors are taken from s->mv and the MV type from s->mv_type
  1540.  */
  1541. static inline void MPV_motion_lowres(MpegEncContext *s,
  1542.                               uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,
  1543.                               int dir, uint8_t **ref_picture,
  1544.                               h264_chroma_mc_func *pix_op)
  1545. {
  1546.     int mx, my;
  1547.     int mb_x, mb_y, i;
  1548.     const int lowres= s->avctx->lowres;
  1549.     const int block_s= 8>>lowres;
  1551.     mb_x = s->mb_x;
  1552.     mb_y = s->mb_y;
  1554.     switch(s->mv_type) {
  1555.     case MV_TYPE_16X16:
  1556.         mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
  1557.                     0, 0, 0,
  1558.                     ref_picture, pix_op,
  1559.                     s->mv[dir][0][0], s->mv[dir][0][1], 2*block_s);
  1560.         break;
  1561.     case MV_TYPE_8X8:
  1562.         mx = 0;
  1563.         my = 0;
  1564.             for(i=0;i<4;i++) {
  1565.                 hpel_motion_lowres(s, dest_y + ((i & 1) + (i >> 1) * s->linesize)*block_s,
  1566.                             ref_picture[0], 0, 0,
  1567.                             (2*mb_x + (i & 1))*block_s, (2*mb_y + (i >>1))*block_s,
  1568.                             s->width, s->height, s->linesize,
  1569.                             s->h_edge_pos >> lowres, s->v_edge_pos >> lowres,
  1570.                             block_s, block_s, pix_op,
  1571.                             s->mv[dir][i][0], s->mv[dir][i][1]);
  1573.                 mx += s->mv[dir][i][0];
  1574.                 my += s->mv[dir][i][1];
  1575.             }
  1577.         if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY))
  1578.             chroma_4mv_motion_lowres(s, dest_cb, dest_cr, ref_picture, pix_op, mx, my);
  1579.         break;
  1580.     case MV_TYPE_FIELD:
  1581.         if (s->picture_structure == PICT_FRAME) {
  1582.             /* top field */
  1583.             mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
  1584.                         1, 0, s->field_select[dir][0],
  1585.                         ref_picture, pix_op,
  1586.                         s->mv[dir][0][0], s->mv[dir][0][1], block_s);
  1587.             /* bottom field */
  1588.             mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
  1589.                         1, 1, s->field_select[dir][1],
  1590.                         ref_picture, pix_op,
  1591.                         s->mv[dir][1][0], s->mv[dir][1][1], block_s);
  1592.         } else {
  1593.             if(s->picture_structure != s->field_select[dir][0] + 1 && s->pict_type != FF_B_TYPE && !s->first_field){
  1594.                 ref_picture= s->current_picture_ptr->data;
  1595.             }
  1597.             mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
  1598.                         0, 0, s->field_select[dir][0],
  1599.                         ref_picture, pix_op,
  1600.                         s->mv[dir][0][0], s->mv[dir][0][1], 2*block_s);
  1601.         }
  1602.         break;
  1603.     case MV_TYPE_16X8:
  1604.         for(i=0; i<2; i++){
  1605.             uint8_t ** ref2picture;
  1607.             if(s->picture_structure == s->field_select[dir][i] + 1 || s->pict_type == FF_B_TYPE || s->first_field){
  1608.                 ref2picture= ref_picture;
  1609.             }else{
  1610.                 ref2picture= s->current_picture_ptr->data;
  1611.             }
  1613.             mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
  1614.                         0, 0, s->field_select[dir][i],
  1615.                         ref2picture, pix_op,
  1616.                         s->mv[dir][i][0], s->mv[dir][i][1] + 2*block_s*i, block_s);
  1618.             dest_y += 2*block_s*s->linesize;
  1619.             dest_cb+= (2*block_s>>s->chroma_y_shift)*s->uvlinesize;
  1620.             dest_cr+= (2*block_s>>s->chroma_y_shift)*s->uvlinesize;
  1621.         }
  1622.         break;
  1623.     case MV_TYPE_DMV:
  1624.         if(s->picture_structure == PICT_FRAME){
  1625.             for(i=0; i<2; i++){
  1626.                 int j;
  1627.                 for(j=0; j<2; j++){
  1628.                     mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
  1629.                                 1, j, j^i,
  1630.                                 ref_picture, pix_op,
  1631.                                 s->mv[dir][2*i + j][0], s->mv[dir][2*i + j][1], block_s);
  1632.                 }
  1633.                 pix_op = s->dsp.avg_h264_chroma_pixels_tab;
  1634.             }
  1635.         }else{
  1636.             for(i=0; i<2; i++){
  1637.                 mpeg_motion_lowres(s, dest_y, dest_cb, dest_cr,
  1638.                             0, 0, s->picture_structure != i+1,
  1639.                             ref_picture, pix_op,
  1640.                             s->mv[dir][2*i][0],s->mv[dir][2*i][1],2*block_s);
  1642.                 // after put we make avg of the same block
  1643.                 pix_op = s->dsp.avg_h264_chroma_pixels_tab;
  1645.                 //opposite parity is always in the same frame if this is second field
  1646.                 if(!s->first_field){
  1647.                     ref_picture = s->current_picture_ptr->data;
  1648.                 }
  1649.             }
  1650.         }
  1651.     break;
  1652.     default: assert(0);
  1653.     }
  1654. }
  1656. /* put block[] to dest[] */
  1657. static inline void put_dct(MpegEncContext *s,
  1658.                            DCTELEM *block, int i, uint8_t *dest, int line_size, int qscale)
  1659. {
  1660.     s->dct_unquantize_intra(s, block, i, qscale);
  1661.     s->dsp.idct_put (dest, line_size, block);
  1662. }
  1664. /* add block[] to dest[] */
  1665. static inline void add_dct(MpegEncContext *s,
  1666.                            DCTELEM *block, int i, uint8_t *dest, int line_size)
  1667. {
  1668.     if (s->block_last_index[i] >= 0) {
  1669.         s->dsp.idct_add (dest, line_size, block);
  1670.     }
  1671. }
  1673. static inline void add_dequant_dct(MpegEncContext *s,
  1674.                            DCTELEM *block, int i, uint8_t *dest, int line_size, int qscale)
  1675. {
  1676.     if (s->block_last_index[i] >= 0) {
  1677.         s->dct_unquantize_inter(s, block, i, qscale);
  1679.         s->dsp.idct_add (dest, line_size, block);
  1680.     }
  1681. }
  1683. /**
  1684.  * cleans dc, ac, coded_block for the current non intra MB
  1685.  */
  1686. void ff_clean_intra_table_entries(MpegEncContext *s)
  1687. {
  1688.     int wrap = s->b8_stride;
  1689.     int xy = s->block_index[0];
  1691.     s->dc_val[0][xy           ] =
  1692.     s->dc_val[0][xy + 1       ] =
  1693.     s->dc_val[0][xy     + wrap] =
  1694.     s->dc_val[0][xy + 1 + wrap] = 1024;
  1695.     /* ac pred */
  1696.     memset(s->ac_val[0][xy       ], 0, 32 * sizeof(int16_t));
  1697.     memset(s->ac_val[0][xy + wrap], 0, 32 * sizeof(int16_t));
  1698.     if (s->msmpeg4_version>=3) {
  1699.         s->coded_block[xy           ] =
  1700.         s->coded_block[xy + 1       ] =
  1701.         s->coded_block[xy     + wrap] =
  1702.         s->coded_block[xy + 1 + wrap] = 0;
  1703.     }
  1704.     /* chroma */
  1705.     wrap = s->mb_stride;
  1706.     xy = s->mb_x + s->mb_y * wrap;
  1707.     s->dc_val[1][xy] =
  1708.     s->dc_val[2][xy] = 1024;
  1709.     /* ac pred */
  1710.     memset(s->ac_val[1][xy], 0, 16 * sizeof(int16_t));
  1711.     memset(s->ac_val[2][xy], 0, 16 * sizeof(int16_t));
  1713.     s->mbintra_table[xy]= 0;
  1714. }
  1716. /* generic function called after a macroblock has been parsed by the
  1717.    decoder or after it has been encoded by the encoder.
  1719.    Important variables used:
  1720.    s->mb_intra : true if intra macroblock
  1721.    s->mv_dir   : motion vector direction
  1722.    s->mv_type  : motion vector type
  1723.    s->mv       : motion vector
  1724.    s->interlaced_dct : true if interlaced dct used (mpeg2)
  1725.  */
  1726. static av_always_inline
  1727. void MPV_decode_mb_internal(MpegEncContext *s, DCTELEM block[12][64],
  1728.                             int lowres_flag, int is_mpeg12)
  1729. {
  1730.     int mb_x, mb_y;
  1731.     const int mb_xy = s->mb_y * s->mb_stride + s->mb_x;
  1732. #ifdef HAVE_XVMC
  1733.     if(s->avctx->xvmc_acceleration){
  1734.         XVMC_decode_mb(s);//xvmc uses pblocks
  1735.         return;
  1736.     }
  1737. #endif
  1739.     mb_x = s->mb_x;
  1740.     mb_y = s->mb_y;
  1742.     if(s->avctx->debug&FF_DEBUG_DCT_COEFF) {
  1743.        /* save DCT coefficients */
  1744.        int i,j;
  1745.        DCTELEM *dct = &s->current_picture.dct_coeff[mb_xy*64*6];
  1746.        for(i=0; i<6; i++)
  1747.            for(j=0; j<64; j++)
  1748.                *dct++ = block[i][s->dsp.idct_permutation[j]];
  1749.     }
  1751.     s->current_picture.qscale_table[mb_xy]= s->qscale;
  1753.     /* update DC predictors for P macroblocks */
  1754.     if (!s->mb_intra) {
  1755.         if (!is_mpeg12 && (s->h263_pred || s->h263_aic)) {
  1756.             if(s->mbintra_table[mb_xy])
  1757.                 ff_clean_intra_table_entries(s);
  1758.         } else {
  1759.             s->last_dc[0] =
  1760.             s->last_dc[1] =
  1761.             s->last_dc[2] = 128 << s->intra_dc_precision;
  1762.         }
  1763.     }
  1764.     else if (!is_mpeg12 && (s->h263_pred || s->h263_aic))
  1765.         s->mbintra_table[mb_xy]=1;
  1767.     if ((s->flags&CODEC_FLAG_PSNR) || !(s->encoding && (s->intra_only || s->pict_type==FF_B_TYPE) && s->avctx->mb_decision != FF_MB_DECISION_RD)) { //FIXME precalc
  1768.         uint8_t *dest_y, *dest_cb, *dest_cr;
  1769.         int dct_linesize, dct_offset;
  1770.         op_pixels_func (*op_pix)[4];
  1771.         qpel_mc_func (*op_qpix)[16];
  1772.         const int linesize= s->current_picture.linesize[0]; //not s->linesize as this would be wrong for field pics
  1773.         const int uvlinesize= s->current_picture.linesize[1];
  1774.         const int readable= s->pict_type != FF_B_TYPE || s->encoding || s->avctx->draw_horiz_band || lowres_flag;
  1775.         const int block_size= lowres_flag ? 8>>s->avctx->lowres : 8;
  1777.         /* avoid copy if macroblock skipped in last frame too */
  1778.         /* skip only during decoding as we might trash the buffers during encoding a bit */
  1779.         if(!s->encoding){
  1780.             uint8_t *mbskip_ptr = &s->mbskip_table[mb_xy];
  1781.             const int age= s->current_picture.age;
  1783.             assert(age);
  1785.             if (s->mb_skipped) {
  1786.                 s->mb_skipped= 0;
  1787.                 assert(s->pict_type!=FF_I_TYPE);
  1789.                 (*mbskip_ptr) ++; /* indicate that this time we skipped it */
  1790.                 if(*mbskip_ptr >99) *mbskip_ptr= 99;
  1792.                 /* if previous was skipped too, then nothing to do !  */
  1793.                 if (*mbskip_ptr >= age && s->current_picture.reference){
  1794.                     return;
  1795.                 }
  1796.             } else if(!s->current_picture.reference){
  1797.                 (*mbskip_ptr) ++; /* increase counter so the age can be compared cleanly */
  1798.                 if(*mbskip_ptr >99) *mbskip_ptr= 99;
  1799.             } else{
  1800.                 *mbskip_ptr = 0; /* not skipped */
  1801.             }
  1802.         }
  1804.         dct_linesize = linesize << s->interlaced_dct;
  1805.         dct_offset =(s->interlaced_dct)? linesize : linesize*block_size;
  1807.         if(readable){
  1808.             dest_y=  s->dest[0];
  1809.             dest_cb= s->dest[1];
  1810.             dest_cr= s->dest[2];
  1811.         }else{
  1812.             dest_y = s->b_scratchpad;
  1813.             dest_cb= s->b_scratchpad+16*linesize;
  1814.             dest_cr= s->b_scratchpad+32*linesize;
  1815.         }
  1817.         if (!s->mb_intra) {
  1818.             /* motion handling */
  1819.             /* decoding or more than one mb_type (MC was already done otherwise) */
  1820.             if(!s->encoding){
  1821.                 if(lowres_flag){
  1822.                     h264_chroma_mc_func *op_pix = s->dsp.put_h264_chroma_pixels_tab;
  1824.                     if (s->mv_dir & MV_DIR_FORWARD) {
  1825.                         MPV_motion_lowres(s, dest_y, dest_cb, dest_cr, 0, s->last_picture.data, op_pix);
  1826.                         op_pix = s->dsp.avg_h264_chroma_pixels_tab;
  1827.                     }
  1828.                     if (s->mv_dir & MV_DIR_BACKWARD) {
  1829.                         MPV_motion_lowres(s, dest_y, dest_cb, dest_cr, 1, s->next_picture.data, op_pix);
  1830.                     }
  1831.                 }else{
  1832.                     op_qpix= s->me.qpel_put;
  1833.                     if ((!s->no_rounding) || s->pict_type==FF_B_TYPE){
  1834.                         op_pix = s->dsp.put_pixels_tab;
  1835.                     }else{
  1836.                         op_pix = s->dsp.put_no_rnd_pixels_tab;
  1837.                     }
  1838.                     if (s->mv_dir & MV_DIR_FORWARD) {
  1839.                         MPV_motion(s, dest_y, dest_cb, dest_cr, 0, s->last_picture.data, op_pix, op_qpix);
  1840.                         op_pix = s->dsp.avg_pixels_tab;
  1841.                         op_qpix= s->me.qpel_avg;
  1842.                     }
  1843.                     if (s->mv_dir & MV_DIR_BACKWARD) {
  1844.                         MPV_motion(s, dest_y, dest_cb, dest_cr, 1, s->next_picture.data, op_pix, op_qpix);
  1845.                     }
  1846.                 }
  1847.             }
  1849.             /* skip dequant / idct if we are really late ;) */
  1850.             if(s->hurry_up>1) goto skip_idct;
  1851.             if(s->avctx->skip_idct){
  1852.                 if(  (s->avctx->skip_idct >= AVDISCARD_NONREF && s->pict_type == FF_B_TYPE)
  1853.                    ||(s->avctx->skip_idct >= AVDISCARD_NONKEY && s->pict_type != FF_I_TYPE)
  1854.                    || s->avctx->skip_idct >= AVDISCARD_ALL)
  1855.                     goto skip_idct;
  1856.             }
  1858.             /* add dct residue */
  1859.             if(s->encoding || !(   s->h263_msmpeg4 || s->codec_id==CODEC_ID_MPEG1VIDEO || s->codec_id==CODEC_ID_MPEG2VIDEO
  1860.                                 || (s->codec_id==CODEC_ID_MPEG4 && !s->mpeg_quant))){
  1861.                 add_dequant_dct(s, block[0], 0, dest_y                          , dct_linesize, s->qscale);
  1862.                 add_dequant_dct(s, block[1], 1, dest_y              + block_size, dct_linesize, s->qscale);
  1863.                 add_dequant_dct(s, block[2], 2, dest_y + dct_offset             , dct_linesize, s->qscale);
  1864.                 add_dequant_dct(s, block[3], 3, dest_y + dct_offset + block_size, dct_linesize, s->qscale);
  1866.                 if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
  1867.                     if (s->chroma_y_shift){
  1868.                         add_dequant_dct(s, block[4], 4, dest_cb, uvlinesize, s->chroma_qscale);
  1869.                         add_dequant_dct(s, block[5], 5, dest_cr, uvlinesize, s->chroma_qscale);
  1870.                     }else{
  1871.                         dct_linesize >>= 1;
  1872.                         dct_offset >>=1;
  1873.                         add_dequant_dct(s, block[4], 4, dest_cb,              dct_linesize, s->chroma_qscale);
  1874.                         add_dequant_dct(s, block[5], 5, dest_cr,              dct_linesize, s->chroma_qscale);
  1875.                         add_dequant_dct(s, block[6], 6, dest_cb + dct_offset, dct_linesize, s->chroma_qscale);
  1876.                         add_dequant_dct(s, block[7], 7, dest_cr + dct_offset, dct_linesize, s->chroma_qscale);
  1877.                     }
  1878.                 }
  1879.             } else if(is_mpeg12 || (s->codec_id != CODEC_ID_WMV2)){
  1880.                 add_dct(s, block[0], 0, dest_y                          , dct_linesize);
  1881.                 add_dct(s, block[1], 1, dest_y              + block_size, dct_linesize);
  1882.                 add_dct(s, block[2], 2, dest_y + dct_offset             , dct_linesize);
  1883.                 add_dct(s, block[3], 3, dest_y + dct_offset + block_size, dct_linesize);
  1885.                 if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
  1886.                     if(s->chroma_y_shift){//Chroma420
  1887.                         add_dct(s, block[4], 4, dest_cb, uvlinesize);
  1888.                         add_dct(s, block[5], 5, dest_cr, uvlinesize);
  1889.                     }else{
  1890.                         //chroma422
  1891.                         dct_linesize = uvlinesize << s->interlaced_dct;
  1892.                         dct_offset =(s->interlaced_dct)? uvlinesize : uvlinesize*8;
  1894.                         add_dct(s, block[4], 4, dest_cb, dct_linesize);
  1895.                         add_dct(s, block[5], 5, dest_cr, dct_linesize);
  1896.                         add_dct(s, block[6], 6, dest_cb+dct_offset, dct_linesize);
  1897.                         add_dct(s, block[7], 7, dest_cr+dct_offset, dct_linesize);
  1898.                         if(!s->chroma_x_shift){//Chroma444
  1899.                             add_dct(s, block[8], 8, dest_cb+8, dct_linesize);
  1900.                             add_dct(s, block[9], 9, dest_cr+8, dct_linesize);
  1901.                             add_dct(s, block[10], 10, dest_cb+8+dct_offset, dct_linesize);
  1902.                             add_dct(s, block[11], 11, dest_cr+8+dct_offset, dct_linesize);
  1903.                         }
  1904.                     }
  1905.                 }//fi gray
  1906.             }
  1907.             else if (1) {
  1908. //                ff_wmv2_add_mb(s, block, dest_y, dest_cb, dest_cr);
  1909.             }
  1910.         } else {
  1911.             /* dct only in intra block */
  1912.             if(s->encoding || !(s->codec_id==CODEC_ID_MPEG1VIDEO || s->codec_id==CODEC_ID_MPEG2VIDEO)){
  1913.                 put_dct(s, block[0], 0, dest_y                          , dct_linesize, s->qscale);
  1914.                 put_dct(s, block[1], 1, dest_y              + block_size, dct_linesize, s->qscale);
  1915.                 put_dct(s, block[2], 2, dest_y + dct_offset             , dct_linesize, s->qscale);
  1916.                 put_dct(s, block[3], 3, dest_y + dct_offset + block_size, dct_linesize, s->qscale);
  1918.                 if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
  1919.                     if(s->chroma_y_shift){
  1920.                         put_dct(s, block[4], 4, dest_cb, uvlinesize, s->chroma_qscale);
  1921.                         put_dct(s, block[5], 5, dest_cr, uvlinesize, s->chroma_qscale);
  1922.                     }else{
  1923.                         dct_offset >>=1;
  1924.                         dct_linesize >>=1;
  1925.                         put_dct(s, block[4], 4, dest_cb,              dct_linesize, s->chroma_qscale);
  1926.                         put_dct(s, block[5], 5, dest_cr,              dct_linesize, s->chroma_qscale);
  1927.                         put_dct(s, block[6], 6, dest_cb + dct_offset, dct_linesize, s->chroma_qscale);
  1928.                         put_dct(s, block[7], 7, dest_cr + dct_offset, dct_linesize, s->chroma_qscale);
  1929.                     }
  1930.                 }
  1931.             }else{
  1932.                 s->dsp.idct_put(dest_y                          , dct_linesize, block[0]);
  1933.                 s->dsp.idct_put(dest_y              + block_size, dct_linesize, block[1]);
  1934.                 s->dsp.idct_put(dest_y + dct_offset             , dct_linesize, block[2]);
  1935.                 s->dsp.idct_put(dest_y + dct_offset + block_size, dct_linesize, block[3]);
  1937.                 if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
  1938.                     if(s->chroma_y_shift){
  1939.                         s->dsp.idct_put(dest_cb, uvlinesize, block[4]);
  1940.                         s->dsp.idct_put(dest_cr, uvlinesize, block[5]);
  1941.                     }else{
  1943.                         dct_linesize = uvlinesize << s->interlaced_dct;
  1944.                         dct_offset =(s->interlaced_dct)? uvlinesize : uvlinesize*8;
  1946.                         s->dsp.idct_put(dest_cb,              dct_linesize, block[4]);
  1947.                         s->dsp.idct_put(dest_cr,              dct_linesize, block[5]);
  1948.                         s->dsp.idct_put(dest_cb + dct_offset, dct_linesize, block[6]);
  1949.                         s->dsp.idct_put(dest_cr + dct_offset, dct_linesize, block[7]);
  1950.                         if(!s->chroma_x_shift){//Chroma444
  1951.                             s->dsp.idct_put(dest_cb + 8,              dct_linesize, block[8]);
  1952.                             s->dsp.idct_put(dest_cr + 8,              dct_linesize, block[9]);
  1953.                             s->dsp.idct_put(dest_cb + 8 + dct_offset, dct_linesize, block[10]);
  1954.                             s->dsp.idct_put(dest_cr + 8 + dct_offset, dct_linesize, block[11]);
  1955.                         }
  1956.                     }
  1957.                 }//gray
  1958.             }
  1959.         }
  1960. skip_idct:
  1961.         if(!readable){
  1962.             s->dsp.put_pixels_tab[0][0](s->dest[0], dest_y ,   linesize,16);
  1963.             s->dsp.put_pixels_tab[s->chroma_x_shift][0](s->dest[1], dest_cb, uvlinesize,16 >> s->chroma_y_shift);
  1964.             s->dsp.put_pixels_tab[s->chroma_x_shift][0](s->dest[2], dest_cr, uvlinesize,16 >> s->chroma_y_shift);
  1965.         }
  1966.     }
  1967. }
  1969. void MPV_decode_mb(MpegEncContext *s, DCTELEM block[12][64]){
  1970. #ifndef CONFIG_SMALL
  1971.     if(s->out_format == FMT_MPEG1) {
  1972.         if(s->avctx->lowres) MPV_decode_mb_internal(s, block, 1, 1);
  1973.         else                 MPV_decode_mb_internal(s, block, 0, 1);
  1974.     } else
  1975. #endif
  1976.     if(s->avctx->lowres) MPV_decode_mb_internal(s, block, 1, 0);
  1977.     else                  MPV_decode_mb_internal(s, block, 0, 0);
  1978. }
  1980. /**
  1981.  *
  1982.  * @param h is the normal height, this will be reduced automatically if needed for the last row
  1983.  */
  1984. void ff_draw_horiz_band(MpegEncContext *s, int y, int h){
  1985.     if (s->avctx->draw_horiz_band) {
  1986.         AVFrame *src;
  1987.         int offset[4];
  1989.         if(s->picture_structure != PICT_FRAME){
  1990.             h <<= 1;
  1991.             y <<= 1;
  1992.             if(s->first_field  && !(s->avctx->slice_flags&SLICE_FLAG_ALLOW_FIELD)) return;
  1993.         }
  1995.         h= FFMIN(h, s->avctx->height - y);
  1997.         if(s->pict_type==FF_B_TYPE || s->low_delay || (s->avctx->slice_flags&SLICE_FLAG_CODED_ORDER))
  1998.             src= (AVFrame*)s->current_picture_ptr;
  1999.         else if(s->last_picture_ptr)
  2000.             src= (AVFrame*)s->last_picture_ptr;
  2001.         else
  2002.             return;
  2004.         if(s->pict_type==FF_B_TYPE && s->picture_structure == PICT_FRAME && s->out_format != FMT_H264){
  2005.             offset[0]=
  2006.             offset[1]=
  2007.             offset[2]=
  2008.             offset[3]= 0;
  2009.         }else{
  2010.             offset[0]= y * s->linesize;
  2011.             offset[1]=
  2012.             offset[2]= (y >> s->chroma_y_shift) * s->uvlinesize;
  2013.             offset[3]= 0;
  2014.         }
  2016.         emms_c();
  2018.         s->avctx->draw_horiz_band(s->avctx, src, offset,
  2019.                                   y, s->picture_structure, h);
  2020.     }
  2021. }
  2023. void ff_init_block_index(MpegEncContext *s){ //FIXME maybe rename
  2024.     const int linesize= s->current_picture.linesize[0]; //not s->linesize as this would be wrong for field pics
  2025.     const int uvlinesize= s->current_picture.linesize[1];
  2026.     const int mb_size= 4 - s->avctx->lowres;
  2028.     s->block_index[0]= s->b8_stride*(s->mb_y*2    ) - 2 + s->mb_x*2;
  2029.     s->block_index[1]= s->b8_stride*(s->mb_y*2    ) - 1 + s->mb_x*2;
  2030.     s->block_index[2]= s->b8_stride*(s->mb_y*2 + 1) - 2 + s->mb_x*2;
  2031.     s->block_index[3]= s->b8_stride*(s->mb_y*2 + 1) - 1 + s->mb_x*2;
  2032.     s->block_index[4]= s->mb_stride*(s->mb_y + 1)                + s->b8_stride*s->mb_height*2 + s->mb_x - 1;
  2033.     s->block_index[5]= s->mb_stride*(s->mb_y + s->mb_height + 2) + s->b8_stride*s->mb_height*2 + s->mb_x - 1;
  2034.     //block_index is not used by mpeg2, so it is not affected by chroma_format
  2036.     s->dest[0] = s->current_picture.data[0] + ((s->mb_x - 1) << mb_size);
  2037.     s->dest[1] = s->current_picture.data[1] + ((s->mb_x - 1) << (mb_size - s->chroma_x_shift));
  2038.     s->dest[2] = s->current_picture.data[2] + ((s->mb_x - 1) << (mb_size - s->chroma_x_shift));
  2040.     if(!(s->pict_type==FF_B_TYPE && s->avctx->draw_horiz_band && s->picture_structure==PICT_FRAME))
  2041.     {
  2042.         s->dest[0] += s->mb_y *   linesize << mb_size;
  2043.         s->dest[1] += s->mb_y * uvlinesize << (mb_size - s->chroma_y_shift);
  2044.         s->dest[2] += s->mb_y * uvlinesize << (mb_size - s->chroma_y_shift);
  2045.     }
  2046. }
  2048. void ff_mpeg_flush(AVCodecContext *avctx){
  2049.     int i;
  2050.     MpegEncContext *s = avctx->priv_data;
  2052.     if(s==NULL || s->picture==NULL)
  2053.         return;
  2055.     for(i=0; i<MAX_PICTURE_COUNT; i++){
  2056.        if(s->picture[i].data[0] && (   s->picture[i].type == FF_BUFFER_TYPE_INTERNAL
  2057.                                     || s->picture[i].type == FF_BUFFER_TYPE_USER))
  2058.         avctx->release_buffer(avctx, (AVFrame*)&s->picture[i]);
  2059.     }
  2060.     s->current_picture_ptr = s->last_picture_ptr = s->next_picture_ptr = NULL;
  2062.     s->mb_x= s->mb_y= 0;
  2064.     s->parse_context.state= -1;
  2065.     s->parse_context.frame_start_found= 0;
  2066.     s->parse_context.overread= 0;
  2067.     s->parse_context.overread_index= 0;
  2068.     s->parse_context.index= 0;
  2069.     s->parse_context.last_index= 0;
  2070.     s->bitstream_buffer_size=0;
  2071.     s->pp_time=0;
  2072. }
  2074. static void dct_unquantize_mpeg1_intra_c(MpegEncContext *s,
  2075.                                    DCTELEM *block, int n, int qscale)
  2076. {
  2077.     int i, level, nCoeffs;
  2078.     const uint16_t *quant_matrix;
  2080.     nCoeffs= s->block_last_index[n];
  2082.     if (n < 4)
  2083.         block[0] = block[0] * s->y_dc_scale;
  2084.     else
  2085.         block[0] = block[0] * s->c_dc_scale;
  2086.     /* XXX: only mpeg1 */
  2087.     quant_matrix = s->intra_matrix;
  2088.     for(i=1;i<=nCoeffs;i++) {
  2089.         int j= s->intra_scantable.permutated[i];
  2090.         level = block[j];
  2091.         if (level) {
  2092.             if (level < 0) {
  2093.                 level = -level;
  2094.                 level = (int)(level * qscale * quant_matrix[j]) >> 3;
  2095.                 level = (level - 1) | 1;
  2096.                 level = -level;
  2097.             } else {
  2098.                 level = (int)(level * qscale * quant_matrix[j]) >> 3;
  2099.                 level = (level - 1) | 1;
  2100.             }
  2101.             block[j] = level;
  2102.         }
  2103.     }
  2104. }
  2106. static void dct_unquantize_mpeg1_inter_c(MpegEncContext *s,
  2107.                                    DCTELEM *block, int n, int qscale)
  2108. {
  2109.     int i, level, nCoeffs;
  2110.     const uint16_t *quant_matrix;
  2112.     nCoeffs= s->block_last_index[n];
  2114.     quant_matrix = s->inter_matrix;
  2115.     for(i=0; i<=nCoeffs; i++) {
  2116.         int j= s->intra_scantable.permutated[i];
  2117.         level = block[j];
  2118.         if (level) {
  2119.             if (level < 0) {
  2120.                 level = -level;
  2121.                 level = (((level << 1) + 1) * qscale *
  2122.                          ((int) (quant_matrix[j]))) >> 4;
  2123.                 level = (level - 1) | 1;
  2124.                 level = -level;
  2125.             } else {
  2126.                 level = (((level << 1) + 1) * qscale *
  2127.                          ((int) (quant_matrix[j]))) >> 4;
  2128.                 level = (level - 1) | 1;
  2129.             }
  2130.             block[j] = level;
  2131.         }
  2132.     }
  2133. }
  2135. static void dct_unquantize_mpeg2_intra_c(MpegEncContext *s,
  2136.                                    DCTELEM *block, int n, int qscale)
  2137. {
  2138.     int i, level, nCoeffs;
  2139.     const uint16_t *quant_matrix;
  2141.     if(s->alternate_scan) nCoeffs= 63;
  2142.     else nCoeffs= s->block_last_index[n];
  2144.     if (n < 4)
  2145.         block[0] = block[0] * s->y_dc_scale;
  2146.     else
  2147.         block[0] = block[0] * s->c_dc_scale;
  2148.     quant_matrix = s->intra_matrix;
  2149.     for(i=1;i<=nCoeffs;i++) {
  2150.         int j= s->intra_scantable.permutated[i];
  2151.         level = block[j];
  2152.         if (level) {
  2153.             if (level < 0) {
  2154.                 level = -level;
  2155.                 level = (int)(level * qscale * quant_matrix[j]) >> 3;
  2156.                 level = -level;
  2157.             } else {
  2158.                 level = (int)(level * qscale * quant_matrix[j]) >> 3;
  2159.             }
  2160.             block[j] = level;
  2161.         }
  2162.     }
  2163. }
  2165. static void dct_unquantize_mpeg2_intra_bitexact(MpegEncContext *s,
  2166.                                    DCTELEM *block, int n, int qscale)
  2167. {
  2168.     int i, level, nCoeffs;
  2169.     const uint16_t *quant_matrix;
  2170.     int sum=-1;
  2172.     if(s->alternate_scan) nCoeffs= 63;
  2173.     else nCoeffs= s->block_last_index[n];
  2175.     if (n < 4)
  2176.         block[0] = block[0] * s->y_dc_scale;
  2177.     else
  2178.         block[0] = block[0] * s->c_dc_scale;
  2179.     quant_matrix = s->intra_matrix;
  2180.     for(i=1;i<=nCoeffs;i++) {
  2181.         int j= s->intra_scantable.permutated[i];
  2182.         level = block[j];
  2183.         if (level) {
  2184.             if (level < 0) {
  2185.                 level = -level;
  2186.                 level = (int)(level * qscale * quant_matrix[j]) >> 3;
  2187.                 level = -level;
  2188.             } else {
  2189.                 level = (int)(level * qscale * quant_matrix[j]) >> 3;
  2190.             }
  2191.             block[j] = level;
  2192.             sum+=level;
  2193.         }
  2194.     }
  2195.     block[63]^=sum&1;
  2196. }
  2198. static void dct_unquantize_mpeg2_inter_c(MpegEncContext *s,
  2199.                                    DCTELEM *block, int n, int qscale)
  2200. {
  2201.     int i, level, nCoeffs;
  2202.     const uint16_t *quant_matrix;
  2203.     int sum=-1;
  2205.     if(s->alternate_scan) nCoeffs= 63;
  2206.     else nCoeffs= s->block_last_index[n];
  2208.     quant_matrix = s->inter_matrix;
  2209.     for(i=0; i<=nCoeffs; i++) {
  2210.         int j= s->intra_scantable.permutated[i];
  2211.         level = block[j];
  2212.         if (level) {
  2213.             if (level < 0) {
  2214.                 level = -level;
  2215.                 level = (((level << 1) + 1) * qscale *
  2216.                          ((int) (quant_matrix[j]))) >> 4;
  2217.                 level = -level;
  2218.             } else {
  2219.                 level = (((level << 1) + 1) * qscale *
  2220.                          ((int) (quant_matrix[j]))) >> 4;
  2221.             }
  2222.             block[j] = level;
  2223.             sum+=level;
  2224.         }
  2225.     }
  2226.     block[63]^=sum&1;
  2227. }
  2229. static void dct_unquantize_h263_intra_c(MpegEncContext *s,
  2230.                                   DCTELEM *block, int n, int qscale)
  2231. {
  2232.     int i, level, qmul, qadd;
  2233.     int nCoeffs;
  2235.     assert(s->block_last_index[n]>=0);
  2237.     qmul = qscale << 1;
  2239.     if (!s->h263_aic) {
  2240.         if (n < 4)
  2241.             block[0] = block[0] * s->y_dc_scale;
  2242.         else
  2243.             block[0] = block[0] * s->c_dc_scale;
  2244.         qadd = (qscale - 1) | 1;
  2245.     }else{
  2246.         qadd = 0;
  2247.     }
  2248.     if(s->ac_pred)
  2249.         nCoeffs=63;
  2250.     else
  2251.         nCoeffs= s->inter_scantable.raster_end[ s->block_last_index[n] ];
  2253.     for(i=1; i<=nCoeffs; i++) {
  2254.         level = block[i];
  2255.         if (level) {
  2256.             if (level < 0) {
  2257.                 level = level * qmul - qadd;
  2258.             } else {
  2259.                 level = level * qmul + qadd;
  2260.             }
  2261.             block[i] = level;
  2262.         }
  2263.     }
  2264. }
  2266. static void dct_unquantize_h263_inter_c(MpegEncContext *s,
  2267.                                   DCTELEM *block, int n, int qscale)
  2268. {
  2269.     int i, level, qmul, qadd;
  2270.     int nCoeffs;
  2272.     assert(s->block_last_index[n]>=0);
  2274.     qadd = (qscale - 1) | 1;
  2275.     qmul = qscale << 1;
  2277.     nCoeffs= s->inter_scantable.raster_end[ s->block_last_index[n] ];
  2279.     for(i=0; i<=nCoeffs; i++) {
  2280.         level = block[i];
  2281.         if (level) {
  2282.             if (level < 0) {
  2283.                 level = level * qmul - qadd;
  2284.             } else {
  2285.                 level = level * qmul + qadd;
  2286.             }
  2287.             block[i] = level;
  2288.         }
  2289.     }
  2290. }
  2292. /**
  2293.  * set qscale and update qscale dependent variables.
  2294.  */
  2295. void ff_set_qscale(MpegEncContext * s, int qscale)
  2296. {
  2297.     if (qscale < 1)
  2298.         qscale = 1;
  2299.     else if (qscale > 31)
  2300.         qscale = 31;
  2302.     s->qscale = qscale;
  2303.     s->chroma_qscale= s->chroma_qscale_table[qscale];
  2305.     s->y_dc_scale= s->y_dc_scale_table[ qscale ];
  2306.     s->c_dc_scale= s->c_dc_scale_table[ s->chroma_qscale ];
  2307. }