mpegvideo_common.h
上传用户:jylinhe
上传日期:2022-07-11
资源大小:334k
文件大小:34k
源码类别:

多媒体编程

开发平台:

Visual 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.  */
  24. /**
  25.  * @file mpegvideo_common.h
  26.  * The simplest mpeg encoder (well, it was the simplest!).
  27.  */
  28. #ifndef AVCODEC_MPEGVIDEO_COMMON_H
  29. #define AVCODEC_MPEGVIDEO_COMMON_H
  30. #include "avcodec.h"
  31. #include "dsputil.h"
  32. #include "mpegvideo.h"
  33. //#include "mjpegenc.h"
  34. //#include "msmpeg4.h"
  35. //#include "faandct.h"
  36. #include <limits.h>
  37. int dct_quantize_c(MpegEncContext *s, DCTELEM *block, int n, int qscale, int *overflow);
  38. int dct_quantize_trellis_c(MpegEncContext *s, DCTELEM *block, int n, int qscale, int *overflow);
  39. void  denoise_dct_c(MpegEncContext *s, DCTELEM *block);
  40. /**
  41.  * allocates a Picture
  42.  * The pixels are allocated/set by calling get_buffer() if shared=0
  43.  */
  44. int alloc_picture(MpegEncContext *s, Picture *pic, int shared);
  45. /**
  46.  * sets the given MpegEncContext to common defaults (same for encoding and decoding).
  47.  * the changed fields will not depend upon the prior state of the MpegEncContext.
  48.  */
  49. void MPV_common_defaults(MpegEncContext *s);
  50. static inline void gmc1_motion(MpegEncContext *s,
  51.                                uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,
  52.                                uint8_t **ref_picture)
  53. {
  54.     uint8_t *ptr;
  55.     int offset, src_x, src_y, linesize, uvlinesize;
  56.     int motion_x, motion_y;
  57.     int emu=0;
  58.     motion_x= s->sprite_offset[0][0];
  59.     motion_y= s->sprite_offset[0][1];
  60.     src_x = s->mb_x * 16 + (motion_x >> (s->sprite_warping_accuracy+1));
  61.     src_y = s->mb_y * 16 + (motion_y >> (s->sprite_warping_accuracy+1));
  62.     motion_x<<=(3-s->sprite_warping_accuracy);
  63.     motion_y<<=(3-s->sprite_warping_accuracy);
  64.     src_x = av_clip(src_x, -16, s->width);
  65.     if (src_x == s->width)
  66.         motion_x =0;
  67.     src_y = av_clip(src_y, -16, s->height);
  68.     if (src_y == s->height)
  69.         motion_y =0;
  70.     linesize = s->linesize;
  71.     uvlinesize = s->uvlinesize;
  72.     ptr = ref_picture[0] + (src_y * linesize) + src_x;
  73.     if(s->flags&CODEC_FLAG_EMU_EDGE){
  74.         if(   src_x >= s->h_edge_pos - 17
  75.            || src_y >= s->v_edge_pos - 17){
  76.             ff_emulated_edge_mc(s->edge_emu_buffer, ptr, linesize, 17, 17, src_x, src_y, s->h_edge_pos, s->v_edge_pos);
  77.             ptr= s->edge_emu_buffer;
  78.         }
  79.     }
  80.     if((motion_x|motion_y)&7){
  81.         s->dsp.gmc1(dest_y  , ptr  , linesize, 16, motion_x&15, motion_y&15, 128 - s->no_rounding);
  82.         s->dsp.gmc1(dest_y+8, ptr+8, linesize, 16, motion_x&15, motion_y&15, 128 - s->no_rounding);
  83.     }else{
  84.         int dxy;
  85.         dxy= ((motion_x>>3)&1) | ((motion_y>>2)&2);
  86.         if (s->no_rounding){
  87.             s->dsp.put_no_rnd_pixels_tab[0][dxy](dest_y, ptr, linesize, 16);
  88.         }else{
  89.             s->dsp.put_pixels_tab       [0][dxy](dest_y, ptr, linesize, 16);
  90.         }
  91.     }
  92.     if(ENABLE_GRAY && s->flags&CODEC_FLAG_GRAY) return;
  93.     motion_x= s->sprite_offset[1][0];
  94.     motion_y= s->sprite_offset[1][1];
  95.     src_x = s->mb_x * 8 + (motion_x >> (s->sprite_warping_accuracy+1));
  96.     src_y = s->mb_y * 8 + (motion_y >> (s->sprite_warping_accuracy+1));
  97.     motion_x<<=(3-s->sprite_warping_accuracy);
  98.     motion_y<<=(3-s->sprite_warping_accuracy);
  99.     src_x = av_clip(src_x, -8, s->width>>1);
  100.     if (src_x == s->width>>1)
  101.         motion_x =0;
  102.     src_y = av_clip(src_y, -8, s->height>>1);
  103.     if (src_y == s->height>>1)
  104.         motion_y =0;
  105.     offset = (src_y * uvlinesize) + src_x;
  106.     ptr = ref_picture[1] + offset;
  107.     if(s->flags&CODEC_FLAG_EMU_EDGE){
  108.         if(   src_x >= (s->h_edge_pos>>1) - 9
  109.            || src_y >= (s->v_edge_pos>>1) - 9){
  110.             ff_emulated_edge_mc(s->edge_emu_buffer, ptr, uvlinesize, 9, 9, src_x, src_y, s->h_edge_pos>>1, s->v_edge_pos>>1);
  111.             ptr= s->edge_emu_buffer;
  112.             emu=1;
  113.         }
  114.     }
  115.     s->dsp.gmc1(dest_cb, ptr, uvlinesize, 8, motion_x&15, motion_y&15, 128 - s->no_rounding);
  116.     ptr = ref_picture[2] + offset;
  117.     if(emu){
  118.         ff_emulated_edge_mc(s->edge_emu_buffer, ptr, uvlinesize, 9, 9, src_x, src_y, s->h_edge_pos>>1, s->v_edge_pos>>1);
  119.         ptr= s->edge_emu_buffer;
  120.     }
  121.     s->dsp.gmc1(dest_cr, ptr, uvlinesize, 8, motion_x&15, motion_y&15, 128 - s->no_rounding);
  122.     return;
  123. }
  124. static inline void gmc_motion(MpegEncContext *s,
  125.                                uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,
  126.                                uint8_t **ref_picture)
  127. {
  128.     uint8_t *ptr;
  129.     int linesize, uvlinesize;
  130.     const int a= s->sprite_warping_accuracy;
  131.     int ox, oy;
  132.     linesize = s->linesize;
  133.     uvlinesize = s->uvlinesize;
  134.     ptr = ref_picture[0];
  135.     ox= s->sprite_offset[0][0] + s->sprite_delta[0][0]*s->mb_x*16 + s->sprite_delta[0][1]*s->mb_y*16;
  136.     oy= s->sprite_offset[0][1] + s->sprite_delta[1][0]*s->mb_x*16 + s->sprite_delta[1][1]*s->mb_y*16;
  137.     s->dsp.gmc(dest_y, ptr, linesize, 16,
  138.            ox,
  139.            oy,
  140.            s->sprite_delta[0][0], s->sprite_delta[0][1],
  141.            s->sprite_delta[1][0], s->sprite_delta[1][1],
  142.            a+1, (1<<(2*a+1)) - s->no_rounding,
  143.            s->h_edge_pos, s->v_edge_pos);
  144.     s->dsp.gmc(dest_y+8, ptr, linesize, 16,
  145.            ox + s->sprite_delta[0][0]*8,
  146.            oy + s->sprite_delta[1][0]*8,
  147.            s->sprite_delta[0][0], s->sprite_delta[0][1],
  148.            s->sprite_delta[1][0], s->sprite_delta[1][1],
  149.            a+1, (1<<(2*a+1)) - s->no_rounding,
  150.            s->h_edge_pos, s->v_edge_pos);
  151.     if(ENABLE_GRAY && s->flags&CODEC_FLAG_GRAY) return;
  152.     ox= s->sprite_offset[1][0] + s->sprite_delta[0][0]*s->mb_x*8 + s->sprite_delta[0][1]*s->mb_y*8;
  153.     oy= s->sprite_offset[1][1] + s->sprite_delta[1][0]*s->mb_x*8 + s->sprite_delta[1][1]*s->mb_y*8;
  154.     ptr = ref_picture[1];
  155.     s->dsp.gmc(dest_cb, ptr, uvlinesize, 8,
  156.            ox,
  157.            oy,
  158.            s->sprite_delta[0][0], s->sprite_delta[0][1],
  159.            s->sprite_delta[1][0], s->sprite_delta[1][1],
  160.            a+1, (1<<(2*a+1)) - s->no_rounding,
  161.            s->h_edge_pos>>1, s->v_edge_pos>>1);
  162.     ptr = ref_picture[2];
  163.     s->dsp.gmc(dest_cr, ptr, uvlinesize, 8,
  164.            ox,
  165.            oy,
  166.            s->sprite_delta[0][0], s->sprite_delta[0][1],
  167.            s->sprite_delta[1][0], s->sprite_delta[1][1],
  168.            a+1, (1<<(2*a+1)) - s->no_rounding,
  169.            s->h_edge_pos>>1, s->v_edge_pos>>1);
  170. }
  171. static inline int hpel_motion(MpegEncContext *s,
  172.                                   uint8_t *dest, uint8_t *src,
  173.                                   int field_based, int field_select,
  174.                                   int src_x, int src_y,
  175.                                   int width, int height, int stride,
  176.                                   int h_edge_pos, int v_edge_pos,
  177.                                   int w, int h, op_pixels_func *pix_op,
  178.                                   int motion_x, int motion_y)
  179. {
  180.     int dxy;
  181.     int emu=0;
  182.     dxy = ((motion_y & 1) << 1) | (motion_x & 1);
  183.     src_x += motion_x >> 1;
  184.     src_y += motion_y >> 1;
  185.     /* WARNING: do no forget half pels */
  186.     src_x = av_clip(src_x, -16, width); //FIXME unneeded for emu?
  187.     if (src_x == width)
  188.         dxy &= ~1;
  189.     src_y = av_clip(src_y, -16, height);
  190.     if (src_y == height)
  191.         dxy &= ~2;
  192.     src += src_y * stride + src_x;
  193.     if(s->unrestricted_mv && (s->flags&CODEC_FLAG_EMU_EDGE)){
  194.         if(   src_x > h_edge_pos - (motion_x&1) - w
  195.            || src_y > v_edge_pos - (motion_y&1) - h){
  196.             ff_emulated_edge_mc(s->edge_emu_buffer, src, s->linesize, w+1, (h+1)<<field_based,
  197.                              src_x, src_y<<field_based, h_edge_pos, s->v_edge_pos);
  198.             src= s->edge_emu_buffer;
  199.             emu=1;
  200.         }
  201.     }
  202.     if(field_select)
  203.         src += s->linesize;
  204.     pix_op[dxy](dest, src, stride, h);
  205.     return emu;
  206. }
  207. static av_always_inline
  208. void mpeg_motion_internal(MpegEncContext *s,
  209.                  uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,
  210.                  int field_based, int bottom_field, int field_select,
  211.                  uint8_t **ref_picture, op_pixels_func (*pix_op)[4],
  212.                  int motion_x, int motion_y, int h, int is_mpeg12)
  213. {
  214.     uint8_t *ptr_y, *ptr_cb, *ptr_cr;
  215.     int dxy, uvdxy, mx, my, src_x, src_y,
  216.         uvsrc_x, uvsrc_y, v_edge_pos, uvlinesize, linesize;
  217. #if 0
  218. if(s->quarter_sample)
  219. {
  220.     motion_x>>=1;
  221.     motion_y>>=1;
  222. }
  223. #endif
  224.     v_edge_pos = s->v_edge_pos >> field_based;
  225.     linesize   = s->current_picture.linesize[0] << field_based;
  226.     uvlinesize = s->current_picture.linesize[1] << field_based;
  227.     dxy = ((motion_y & 1) << 1) | (motion_x & 1);
  228.     src_x = s->mb_x* 16               + (motion_x >> 1);
  229.     src_y =(s->mb_y<<(4-field_based)) + (motion_y >> 1);
  230.     if (!is_mpeg12 && s->out_format == FMT_H263) {
  231.         if((s->workaround_bugs & FF_BUG_HPEL_CHROMA) && field_based){
  232.             mx = (motion_x>>1)|(motion_x&1);
  233.             my = motion_y >>1;
  234.             uvdxy = ((my & 1) << 1) | (mx & 1);
  235.             uvsrc_x = s->mb_x* 8               + (mx >> 1);
  236.             uvsrc_y = (s->mb_y<<(3-field_based)) + (my >> 1);
  237.         }else{
  238.             uvdxy = dxy | (motion_y & 2) | ((motion_x & 2) >> 1);
  239.             uvsrc_x = src_x>>1;
  240.             uvsrc_y = src_y>>1;
  241.         }
  242.     }else if(!is_mpeg12 && s->out_format == FMT_H261){//even chroma mv's are full pel in H261
  243.         mx = motion_x / 4;
  244.         my = motion_y / 4;
  245.         uvdxy = 0;
  246.         uvsrc_x = s->mb_x*8 + mx;
  247.         uvsrc_y = s->mb_y*8 + my;
  248.     } else {
  249.         if(s->chroma_y_shift){
  250.             mx = motion_x / 2;
  251.             my = motion_y / 2;
  252.             uvdxy = ((my & 1) << 1) | (mx & 1);
  253.             uvsrc_x = s->mb_x* 8               + (mx >> 1);
  254.             uvsrc_y = (s->mb_y<<(3-field_based)) + (my >> 1);
  255.         } else {
  256.             if(s->chroma_x_shift){
  257.             //Chroma422
  258.                 mx = motion_x / 2;
  259.                 uvdxy = ((motion_y & 1) << 1) | (mx & 1);
  260.                 uvsrc_x = s->mb_x* 8           + (mx >> 1);
  261.                 uvsrc_y = src_y;
  262.             } else {
  263.             //Chroma444
  264.                 uvdxy = dxy;
  265.                 uvsrc_x = src_x;
  266.                 uvsrc_y = src_y;
  267.             }
  268.         }
  269.     }
  270.     ptr_y  = ref_picture[0] + src_y * linesize + src_x;
  271.     ptr_cb = ref_picture[1] + uvsrc_y * uvlinesize + uvsrc_x;
  272.     ptr_cr = ref_picture[2] + uvsrc_y * uvlinesize + uvsrc_x;
  273.     if(   src_x > s->h_edge_pos - (motion_x&1) - 16
  274.        || src_y >    v_edge_pos - (motion_y&1) - h){
  275.             if(is_mpeg12 || s->codec_id == CODEC_ID_MPEG2VIDEO ||
  276.                s->codec_id == CODEC_ID_MPEG1VIDEO){
  277.                 av_log(s->avctx,AV_LOG_DEBUG,
  278.                         "MPEG motion vector out of boundaryn");
  279.                 return ;
  280.             }
  281.             ff_emulated_edge_mc(s->edge_emu_buffer, ptr_y, s->linesize,
  282.                                 17, 17+field_based,
  283.                                 src_x, src_y<<field_based,
  284.                                 s->h_edge_pos, s->v_edge_pos);
  285.             ptr_y = s->edge_emu_buffer;
  286.             if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
  287.                 uint8_t *uvbuf= s->edge_emu_buffer+18*s->linesize;
  288.                 ff_emulated_edge_mc(uvbuf ,
  289.                                     ptr_cb, s->uvlinesize,
  290.                                     9, 9+field_based,
  291.                                     uvsrc_x, uvsrc_y<<field_based,
  292.                                     s->h_edge_pos>>1, s->v_edge_pos>>1);
  293.                 ff_emulated_edge_mc(uvbuf+16,
  294.                                     ptr_cr, s->uvlinesize,
  295.                                     9, 9+field_based,
  296.                                     uvsrc_x, uvsrc_y<<field_based,
  297.                                     s->h_edge_pos>>1, s->v_edge_pos>>1);
  298.                 ptr_cb= uvbuf;
  299.                 ptr_cr= uvbuf+16;
  300.             }
  301.     }
  302.     if(bottom_field){ //FIXME use this for field pix too instead of the obnoxious hack which changes picture.data
  303.         dest_y += s->linesize;
  304.         dest_cb+= s->uvlinesize;
  305.         dest_cr+= s->uvlinesize;
  306.     }
  307.     if(field_select){
  308.         ptr_y += s->linesize;
  309.         ptr_cb+= s->uvlinesize;
  310.         ptr_cr+= s->uvlinesize;
  311.     }
  312.     pix_op[0][dxy](dest_y, ptr_y, linesize, h);
  313.     if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
  314.         pix_op[s->chroma_x_shift][uvdxy]
  315.                 (dest_cb, ptr_cb, uvlinesize, h >> s->chroma_y_shift);
  316.         pix_op[s->chroma_x_shift][uvdxy]
  317.                 (dest_cr, ptr_cr, uvlinesize, h >> s->chroma_y_shift);
  318.     }
  319.     
  320. /*if(!is_mpeg12 && (ENABLE_H261_ENCODER || ENABLE_H261_DECODER) && s->out_format == FMT_H261)
  321. {
  322.         ff_h261_loop_filter(s);
  323.     }*/
  324. }
  325. /* apply one mpeg motion vector to the three components */
  326. static av_always_inline
  327. void mpeg_motion(MpegEncContext *s,
  328.                  uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,
  329.                  int field_based, int bottom_field, int field_select,
  330.                  uint8_t **ref_picture, op_pixels_func (*pix_op)[4],
  331.                  int motion_x, int motion_y, int h)
  332. {
  333. #ifndef CONFIG_SMALL
  334.     if(s->out_format == FMT_MPEG1)
  335.         mpeg_motion_internal(s, dest_y, dest_cb, dest_cr, field_based,
  336.                     bottom_field, field_select, ref_picture, pix_op,
  337.                     motion_x, motion_y, h, 1);
  338.     else
  339. #endif
  340.         mpeg_motion_internal(s, dest_y, dest_cb, dest_cr, field_based,
  341.                     bottom_field, field_select, ref_picture, pix_op,
  342.                     motion_x, motion_y, h, 0);
  343. }
  344. //FIXME move to dsputil, avg variant, 16x16 version
  345. static inline void put_obmc(uint8_t *dst, uint8_t *src[5], int stride){
  346.     int x;
  347.     uint8_t * const top   = src[1];
  348.     uint8_t * const left  = src[2];
  349.     uint8_t * const mid   = src[0];
  350.     uint8_t * const right = src[3];
  351.     uint8_t * const bottom= src[4];
  352. #define OBMC_FILTER(x, t, l, m, r, b)
  353.     dst[x]= (t*top[x] + l*left[x] + m*mid[x] + r*right[x] + b*bottom[x] + 4)>>3
  354. #define OBMC_FILTER4(x, t, l, m, r, b)
  355.     OBMC_FILTER(x         , t, l, m, r, b);
  356.     OBMC_FILTER(x+1       , t, l, m, r, b);
  357.     OBMC_FILTER(x  +stride, t, l, m, r, b);
  358.     OBMC_FILTER(x+1+stride, t, l, m, r, b);
  359.     x=0;
  360.     OBMC_FILTER (x  , 2, 2, 4, 0, 0);
  361.     OBMC_FILTER (x+1, 2, 1, 5, 0, 0);
  362.     OBMC_FILTER4(x+2, 2, 1, 5, 0, 0);
  363.     OBMC_FILTER4(x+4, 2, 0, 5, 1, 0);
  364.     OBMC_FILTER (x+6, 2, 0, 5, 1, 0);
  365.     OBMC_FILTER (x+7, 2, 0, 4, 2, 0);
  366.     x+= stride;
  367.     OBMC_FILTER (x  , 1, 2, 5, 0, 0);
  368.     OBMC_FILTER (x+1, 1, 2, 5, 0, 0);
  369.     OBMC_FILTER (x+6, 1, 0, 5, 2, 0);
  370.     OBMC_FILTER (x+7, 1, 0, 5, 2, 0);
  371.     x+= stride;
  372.     OBMC_FILTER4(x  , 1, 2, 5, 0, 0);
  373.     OBMC_FILTER4(x+2, 1, 1, 6, 0, 0);
  374.     OBMC_FILTER4(x+4, 1, 0, 6, 1, 0);
  375.     OBMC_FILTER4(x+6, 1, 0, 5, 2, 0);
  376.     x+= 2*stride;
  377.     OBMC_FILTER4(x  , 0, 2, 5, 0, 1);
  378.     OBMC_FILTER4(x+2, 0, 1, 6, 0, 1);
  379.     OBMC_FILTER4(x+4, 0, 0, 6, 1, 1);
  380.     OBMC_FILTER4(x+6, 0, 0, 5, 2, 1);
  381.     x+= 2*stride;
  382.     OBMC_FILTER (x  , 0, 2, 5, 0, 1);
  383.     OBMC_FILTER (x+1, 0, 2, 5, 0, 1);
  384.     OBMC_FILTER4(x+2, 0, 1, 5, 0, 2);
  385.     OBMC_FILTER4(x+4, 0, 0, 5, 1, 2);
  386.     OBMC_FILTER (x+6, 0, 0, 5, 2, 1);
  387.     OBMC_FILTER (x+7, 0, 0, 5, 2, 1);
  388.     x+= stride;
  389.     OBMC_FILTER (x  , 0, 2, 4, 0, 2);
  390.     OBMC_FILTER (x+1, 0, 1, 5, 0, 2);
  391.     OBMC_FILTER (x+6, 0, 0, 5, 1, 2);
  392.     OBMC_FILTER (x+7, 0, 0, 4, 2, 2);
  393. }
  394. /* obmc for 1 8x8 luma block */
  395. static inline void obmc_motion(MpegEncContext *s,
  396.                                uint8_t *dest, uint8_t *src,
  397.                                int src_x, int src_y,
  398.                                op_pixels_func *pix_op,
  399.                                int16_t mv[5][2]/* mid top left right bottom*/)
  400. #define MID    0
  401. {
  402.     int i;
  403.     uint8_t *ptr[5];
  404.     assert(s->quarter_sample==0);
  405.     for(i=0; i<5; i++){
  406.         if(i && mv[i][0]==mv[MID][0] && mv[i][1]==mv[MID][1]){
  407.             ptr[i]= ptr[MID];
  408.         }else{
  409.             ptr[i]= s->obmc_scratchpad + 8*(i&1) + s->linesize*8*(i>>1);
  410.             hpel_motion(s, ptr[i], src, 0, 0,
  411.                         src_x, src_y,
  412.                         s->width, s->height, s->linesize,
  413.                         s->h_edge_pos, s->v_edge_pos,
  414.                         8, 8, pix_op,
  415.                         mv[i][0], mv[i][1]);
  416.         }
  417.     }
  418.     put_obmc(dest, ptr, s->linesize);
  419. }
  420. static inline void qpel_motion(MpegEncContext *s,
  421.                                uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,
  422.                                int field_based, int bottom_field, int field_select,
  423.                                uint8_t **ref_picture, op_pixels_func (*pix_op)[4],
  424.                                qpel_mc_func (*qpix_op)[16],
  425.                                int motion_x, int motion_y, int h)
  426. {
  427.     uint8_t *ptr_y, *ptr_cb, *ptr_cr;
  428.     int dxy, uvdxy, mx, my, src_x, src_y, uvsrc_x, uvsrc_y, v_edge_pos, linesize, uvlinesize;
  429.     dxy = ((motion_y & 3) << 2) | (motion_x & 3);
  430.     src_x = s->mb_x *  16                 + (motion_x >> 2);
  431.     src_y = s->mb_y * (16 >> field_based) + (motion_y >> 2);
  432.     v_edge_pos = s->v_edge_pos >> field_based;
  433.     linesize = s->linesize << field_based;
  434.     uvlinesize = s->uvlinesize << field_based;
  435.     if(field_based){
  436.         mx= motion_x/2;
  437.         my= motion_y>>1;
  438.     }else if(s->workaround_bugs&FF_BUG_QPEL_CHROMA2){
  439.         static const int rtab[8]= {0,0,1,1,0,0,0,1};
  440.         mx= (motion_x>>1) + rtab[motion_x&7];
  441.         my= (motion_y>>1) + rtab[motion_y&7];
  442.     }else if(s->workaround_bugs&FF_BUG_QPEL_CHROMA){
  443.         mx= (motion_x>>1)|(motion_x&1);
  444.         my= (motion_y>>1)|(motion_y&1);
  445.     }else{
  446.         mx= motion_x/2;
  447.         my= motion_y/2;
  448.     }
  449.     mx= (mx>>1)|(mx&1);
  450.     my= (my>>1)|(my&1);
  451.     uvdxy= (mx&1) | ((my&1)<<1);
  452.     mx>>=1;
  453.     my>>=1;
  454.     uvsrc_x = s->mb_x *  8                 + mx;
  455.     uvsrc_y = s->mb_y * (8 >> field_based) + my;
  456.     ptr_y  = ref_picture[0] +   src_y *   linesize +   src_x;
  457.     ptr_cb = ref_picture[1] + uvsrc_y * uvlinesize + uvsrc_x;
  458.     ptr_cr = ref_picture[2] + uvsrc_y * uvlinesize + uvsrc_x;
  459.     if(   src_x > s->h_edge_pos - (motion_x&3) - 16
  460.        || src_y >    v_edge_pos - (motion_y&3) - h  ){
  461.         ff_emulated_edge_mc(s->edge_emu_buffer, ptr_y, s->linesize,
  462.                             17, 17+field_based, src_x, src_y<<field_based,
  463.                             s->h_edge_pos, s->v_edge_pos);
  464.         ptr_y= s->edge_emu_buffer;
  465.         if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
  466.             uint8_t *uvbuf= s->edge_emu_buffer + 18*s->linesize;
  467.             ff_emulated_edge_mc(uvbuf, ptr_cb, s->uvlinesize,
  468.                                 9, 9 + field_based,
  469.                                 uvsrc_x, uvsrc_y<<field_based,
  470.                                 s->h_edge_pos>>1, s->v_edge_pos>>1);
  471.             ff_emulated_edge_mc(uvbuf + 16, ptr_cr, s->uvlinesize,
  472.                                 9, 9 + field_based,
  473.                                 uvsrc_x, uvsrc_y<<field_based,
  474.                                 s->h_edge_pos>>1, s->v_edge_pos>>1);
  475.             ptr_cb= uvbuf;
  476.             ptr_cr= uvbuf + 16;
  477.         }
  478.     }
  479.     if(!field_based)
  480.         qpix_op[0][dxy](dest_y, ptr_y, linesize);
  481.     else{
  482.         if(bottom_field){
  483.             dest_y += s->linesize;
  484.             dest_cb+= s->uvlinesize;
  485.             dest_cr+= s->uvlinesize;
  486.         }
  487.         if(field_select){
  488.             ptr_y  += s->linesize;
  489.             ptr_cb += s->uvlinesize;
  490.             ptr_cr += s->uvlinesize;
  491.         }
  492.         //damn interlaced mode
  493.         //FIXME boundary mirroring is not exactly correct here
  494.         qpix_op[1][dxy](dest_y  , ptr_y  , linesize);
  495.         qpix_op[1][dxy](dest_y+8, ptr_y+8, linesize);
  496.     }
  497.     if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY)){
  498.         pix_op[1][uvdxy](dest_cr, ptr_cr, uvlinesize, h >> 1);
  499.         pix_op[1][uvdxy](dest_cb, ptr_cb, uvlinesize, h >> 1);
  500.     }
  501. }
  502. /**
  503.  * h263 chroma 4mv motion compensation.
  504.  */
  505. static inline void chroma_4mv_motion(MpegEncContext *s,
  506.                                      uint8_t *dest_cb, uint8_t *dest_cr,
  507.                                      uint8_t **ref_picture,
  508.                                      op_pixels_func *pix_op,
  509.                                      int mx, int my){
  510.     int dxy, emu=0, src_x, src_y, offset;
  511.     uint8_t *ptr;
  512.     /* In case of 8X8, we construct a single chroma motion vector
  513.        with a special rounding */
  514.     mx= ff_h263_round_chroma(mx);
  515.     my= ff_h263_round_chroma(my);
  516.     dxy = ((my & 1) << 1) | (mx & 1);
  517.     mx >>= 1;
  518.     my >>= 1;
  519.     src_x = s->mb_x * 8 + mx;
  520.     src_y = s->mb_y * 8 + my;
  521.     src_x = av_clip(src_x, -8, s->width/2);
  522.     if (src_x == s->width/2)
  523.         dxy &= ~1;
  524.     src_y = av_clip(src_y, -8, s->height/2);
  525.     if (src_y == s->height/2)
  526.         dxy &= ~2;
  527.     offset = (src_y * (s->uvlinesize)) + src_x;
  528.     ptr = ref_picture[1] + offset;
  529.     if(s->flags&CODEC_FLAG_EMU_EDGE){
  530.         if(   src_x > (s->h_edge_pos>>1) - (dxy &1) - 8
  531.            || src_y > (s->v_edge_pos>>1) - (dxy>>1) - 8){
  532.             ff_emulated_edge_mc(s->edge_emu_buffer, ptr, s->uvlinesize,
  533.                                 9, 9, src_x, src_y,
  534.                                 s->h_edge_pos>>1, s->v_edge_pos>>1);
  535.             ptr= s->edge_emu_buffer;
  536.             emu=1;
  537.         }
  538.     }
  539.     pix_op[dxy](dest_cb, ptr, s->uvlinesize, 8);
  540.     ptr = ref_picture[2] + offset;
  541.     if(emu){
  542.         ff_emulated_edge_mc(s->edge_emu_buffer, ptr, s->uvlinesize,
  543.                             9, 9, src_x, src_y,
  544.                             s->h_edge_pos>>1, s->v_edge_pos>>1);
  545.         ptr= s->edge_emu_buffer;
  546.     }
  547.     pix_op[dxy](dest_cr, ptr, s->uvlinesize, 8);
  548. }
  549. static inline void prefetch_motion(MpegEncContext *s, uint8_t **pix, int dir){
  550.     /* fetch pixels for estimated mv 4 macroblocks ahead
  551.      * optimized for 64byte cache lines */
  552.     const int shift = s->quarter_sample ? 2 : 1;
  553.     const int mx= (s->mv[dir][0][0]>>shift) + 16*s->mb_x + 8;
  554.     const int my= (s->mv[dir][0][1]>>shift) + 16*s->mb_y;
  555.     int off= mx + (my + (s->mb_x&3)*4)*s->linesize + 64;
  556.     s->dsp.prefetch(pix[0]+off, s->linesize, 4);
  557.     off= (mx>>1) + ((my>>1) + (s->mb_x&7))*s->uvlinesize + 64;
  558.     s->dsp.prefetch(pix[1]+off, pix[2]-pix[1], 2);
  559. }
  560. /**
  561.  * motion compensation of a single macroblock
  562.  * @param s context
  563.  * @param dest_y luma destination pointer
  564.  * @param dest_cb chroma cb/u destination pointer
  565.  * @param dest_cr chroma cr/v destination pointer
  566.  * @param dir direction (0->forward, 1->backward)
  567.  * @param ref_picture array[3] of pointers to the 3 planes of the reference picture
  568.  * @param pic_op halfpel motion compensation function (average or put normally)
  569.  * @param pic_op qpel motion compensation function (average or put normally)
  570.  * the motion vectors are taken from s->mv and the MV type from s->mv_type
  571.  */
  572. static av_always_inline void MPV_motion_internal(MpegEncContext *s,
  573.                               uint8_t *dest_y, uint8_t *dest_cb,
  574.                               uint8_t *dest_cr, int dir,
  575.                               uint8_t **ref_picture,
  576.                               op_pixels_func (*pix_op)[4],
  577.                               qpel_mc_func (*qpix_op)[16], int is_mpeg12)
  578. {
  579.     int dxy, mx, my, src_x, src_y, motion_x, motion_y;
  580.     int mb_x, mb_y, i;
  581.     uint8_t *ptr, *dest;
  582.     mb_x = s->mb_x;
  583.     mb_y = s->mb_y;
  584.     prefetch_motion(s, ref_picture, dir);
  585.     if(!is_mpeg12 && s->obmc && s->pict_type != FF_B_TYPE){
  586.         int16_t mv_cache[4][4][2];
  587.         const int xy= s->mb_x + s->mb_y*s->mb_stride;
  588.         const int mot_stride= s->b8_stride;
  589.         const int mot_xy= mb_x*2 + mb_y*2*mot_stride;
  590.         assert(!s->mb_skipped);
  591.         memcpy(mv_cache[1][1], s->current_picture.motion_val[0][mot_xy           ], sizeof(int16_t)*4);
  592.         memcpy(mv_cache[2][1], s->current_picture.motion_val[0][mot_xy+mot_stride], sizeof(int16_t)*4);
  593.         memcpy(mv_cache[3][1], s->current_picture.motion_val[0][mot_xy+mot_stride], sizeof(int16_t)*4);
  594.         if(mb_y==0 || IS_INTRA(s->current_picture.mb_type[xy-s->mb_stride])){
  595.             memcpy(mv_cache[0][1], mv_cache[1][1], sizeof(int16_t)*4);
  596.         }else{
  597.             memcpy(mv_cache[0][1], s->current_picture.motion_val[0][mot_xy-mot_stride], sizeof(int16_t)*4);
  598.         }
  599.         if(mb_x==0 || IS_INTRA(s->current_picture.mb_type[xy-1])){
  600.             *(int32_t*)mv_cache[1][0]= *(int32_t*)mv_cache[1][1];
  601.             *(int32_t*)mv_cache[2][0]= *(int32_t*)mv_cache[2][1];
  602.         }else{
  603.             *(int32_t*)mv_cache[1][0]= *(int32_t*)s->current_picture.motion_val[0][mot_xy-1];
  604.             *(int32_t*)mv_cache[2][0]= *(int32_t*)s->current_picture.motion_val[0][mot_xy-1+mot_stride];
  605.         }
  606.         if(mb_x+1>=s->mb_width || IS_INTRA(s->current_picture.mb_type[xy+1])){
  607.             *(int32_t*)mv_cache[1][3]= *(int32_t*)mv_cache[1][2];
  608.             *(int32_t*)mv_cache[2][3]= *(int32_t*)mv_cache[2][2];
  609.         }else{
  610.             *(int32_t*)mv_cache[1][3]= *(int32_t*)s->current_picture.motion_val[0][mot_xy+2];
  611.             *(int32_t*)mv_cache[2][3]= *(int32_t*)s->current_picture.motion_val[0][mot_xy+2+mot_stride];
  612.         }
  613.         mx = 0;
  614.         my = 0;
  615.         for(i=0;i<4;i++) {
  616.             const int x= (i&1)+1;
  617.             const int y= (i>>1)+1;
  618.             int16_t mv[5][2]= {
  619.                 {mv_cache[y][x  ][0], mv_cache[y][x  ][1]},
  620.                 {mv_cache[y-1][x][0], mv_cache[y-1][x][1]},
  621.                 {mv_cache[y][x-1][0], mv_cache[y][x-1][1]},
  622.                 {mv_cache[y][x+1][0], mv_cache[y][x+1][1]},
  623.                 {mv_cache[y+1][x][0], mv_cache[y+1][x][1]}};
  624.             //FIXME cleanup
  625.             obmc_motion(s, dest_y + ((i & 1) * 8) + (i >> 1) * 8 * s->linesize,
  626.                         ref_picture[0],
  627.                         mb_x * 16 + (i & 1) * 8, mb_y * 16 + (i >>1) * 8,
  628.                         pix_op[1],
  629.                         mv);
  630.             mx += mv[0][0];
  631.             my += mv[0][1];
  632.         }
  633.         if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY))
  634.             chroma_4mv_motion(s, dest_cb, dest_cr, ref_picture, pix_op[1], mx, my);
  635.         return;
  636.     }
  637.     switch(s->mv_type) {
  638.     case MV_TYPE_16X16:
  639.         if(s->mcsel){
  640.             if(s->real_sprite_warping_points==1){
  641.                 gmc1_motion(s, dest_y, dest_cb, dest_cr,
  642.                             ref_picture);
  643.             }else{
  644.                 gmc_motion(s, dest_y, dest_cb, dest_cr,
  645.                             ref_picture);
  646.             }
  647.         }else if(!is_mpeg12 && s->quarter_sample){
  648.             qpel_motion(s, dest_y, dest_cb, dest_cr,
  649.                         0, 0, 0,
  650.                         ref_picture, pix_op, qpix_op,
  651.                         s->mv[dir][0][0], s->mv[dir][0][1], 16);
  652.         }
  653. /*else if(!is_mpeg12 && ENABLE_WMV2 && s->mspel)
  654. {
  655.             ff_mspel_motion(s, dest_y, dest_cb, dest_cr,
  656.                         ref_picture, pix_op,
  657.                         s->mv[dir][0][0], s->mv[dir][0][1], 16);
  658.         }*/
  659. else
  660.         {
  661.             mpeg_motion(s, dest_y, dest_cb, dest_cr,
  662.                         0, 0, 0,
  663.                         ref_picture, pix_op,
  664.                         s->mv[dir][0][0], s->mv[dir][0][1], 16);
  665.         }
  666.         break;
  667.     case MV_TYPE_8X8:
  668.     if (!is_mpeg12) {
  669.         mx = 0;
  670.         my = 0;
  671.         if(s->quarter_sample){
  672.             for(i=0;i<4;i++) {
  673.                 motion_x = s->mv[dir][i][0];
  674.                 motion_y = s->mv[dir][i][1];
  675.                 dxy = ((motion_y & 3) << 2) | (motion_x & 3);
  676.                 src_x = mb_x * 16 + (motion_x >> 2) + (i & 1) * 8;
  677.                 src_y = mb_y * 16 + (motion_y >> 2) + (i >>1) * 8;
  678.                 /* WARNING: do no forget half pels */
  679.                 src_x = av_clip(src_x, -16, s->width);
  680.                 if (src_x == s->width)
  681.                     dxy &= ~3;
  682.                 src_y = av_clip(src_y, -16, s->height);
  683.                 if (src_y == s->height)
  684.                     dxy &= ~12;
  685.                 ptr = ref_picture[0] + (src_y * s->linesize) + (src_x);
  686.                 if(s->flags&CODEC_FLAG_EMU_EDGE){
  687.                     if(   src_x > s->h_edge_pos - (motion_x&3) - 8
  688.                        || src_y > s->v_edge_pos - (motion_y&3) - 8 ){
  689.                         ff_emulated_edge_mc(s->edge_emu_buffer, ptr,
  690.                                             s->linesize, 9, 9,
  691.                                             src_x, src_y,
  692.                                             s->h_edge_pos, s->v_edge_pos);
  693.                         ptr= s->edge_emu_buffer;
  694.                     }
  695.                 }
  696.                 dest = dest_y + ((i & 1) * 8) + (i >> 1) * 8 * s->linesize;
  697.                 qpix_op[1][dxy](dest, ptr, s->linesize);
  698.                 mx += s->mv[dir][i][0]/2;
  699.                 my += s->mv[dir][i][1]/2;
  700.             }
  701.         }else{
  702.             for(i=0;i<4;i++) {
  703.                 hpel_motion(s, dest_y + ((i & 1) * 8) + (i >> 1) * 8 * s->linesize,
  704.                             ref_picture[0], 0, 0,
  705.                             mb_x * 16 + (i & 1) * 8, mb_y * 16 + (i >>1) * 8,
  706.                             s->width, s->height, s->linesize,
  707.                             s->h_edge_pos, s->v_edge_pos,
  708.                             8, 8, pix_op[1],
  709.                             s->mv[dir][i][0], s->mv[dir][i][1]);
  710.                 mx += s->mv[dir][i][0];
  711.                 my += s->mv[dir][i][1];
  712.             }
  713.         }
  714.         if(!ENABLE_GRAY || !(s->flags&CODEC_FLAG_GRAY))
  715.             chroma_4mv_motion(s, dest_cb, dest_cr, ref_picture, pix_op[1], mx, my);
  716.     }
  717.         break;
  718.     case MV_TYPE_FIELD:
  719.         if (s->picture_structure == PICT_FRAME) {
  720.             if(!is_mpeg12 && s->quarter_sample){
  721.                 for(i=0; i<2; i++){
  722.                     qpel_motion(s, dest_y, dest_cb, dest_cr,
  723.                                 1, i, s->field_select[dir][i],
  724.                                 ref_picture, pix_op, qpix_op,
  725.                                 s->mv[dir][i][0], s->mv[dir][i][1], 8);
  726.                 }
  727.             }else{
  728.                 /* top field */
  729.                 mpeg_motion(s, dest_y, dest_cb, dest_cr,
  730.                             1, 0, s->field_select[dir][0],
  731.                             ref_picture, pix_op,
  732.                             s->mv[dir][0][0], s->mv[dir][0][1], 8);
  733.                 /* bottom field */
  734.                 mpeg_motion(s, dest_y, dest_cb, dest_cr,
  735.                             1, 1, s->field_select[dir][1],
  736.                             ref_picture, pix_op,
  737.                             s->mv[dir][1][0], s->mv[dir][1][1], 8);
  738.             }
  739.         } else {
  740.             if(s->picture_structure != s->field_select[dir][0] + 1 && s->pict_type != FF_B_TYPE && !s->first_field){
  741.                 ref_picture= s->current_picture_ptr->data;
  742.             }
  743.             mpeg_motion(s, dest_y, dest_cb, dest_cr,
  744.                         0, 0, s->field_select[dir][0],
  745.                         ref_picture, pix_op,
  746.                         s->mv[dir][0][0], s->mv[dir][0][1], 16);
  747.         }
  748.         break;
  749.     case MV_TYPE_16X8:
  750.         for(i=0; i<2; i++){
  751.             uint8_t ** ref2picture;
  752.             if(s->picture_structure == s->field_select[dir][i] + 1
  753.                || s->pict_type == FF_B_TYPE || s->first_field){
  754.                 ref2picture= ref_picture;
  755.             }else{
  756.                 ref2picture= s->current_picture_ptr->data;
  757.             }
  758.             mpeg_motion(s, dest_y, dest_cb, dest_cr,
  759.                         0, 0, s->field_select[dir][i],
  760.                         ref2picture, pix_op,
  761.                         s->mv[dir][i][0], s->mv[dir][i][1] + 16*i, 8);
  762.             dest_y += 16*s->linesize;
  763.             dest_cb+= (16>>s->chroma_y_shift)*s->uvlinesize;
  764.             dest_cr+= (16>>s->chroma_y_shift)*s->uvlinesize;
  765.         }
  766.         break;
  767.     case MV_TYPE_DMV:
  768.         if(s->picture_structure == PICT_FRAME){
  769.             for(i=0; i<2; i++){
  770.                 int j;
  771.                 for(j=0; j<2; j++){
  772.                     mpeg_motion(s, dest_y, dest_cb, dest_cr,
  773.                                 1, j, j^i,
  774.                                 ref_picture, pix_op,
  775.                                 s->mv[dir][2*i + j][0], s->mv[dir][2*i + j][1], 8);
  776.                 }
  777.                 pix_op = s->dsp.avg_pixels_tab;
  778.             }
  779.         }else{
  780.             for(i=0; i<2; i++){
  781.                 mpeg_motion(s, dest_y, dest_cb, dest_cr,
  782.                             0, 0, s->picture_structure != i+1,
  783.                             ref_picture, pix_op,
  784.                             s->mv[dir][2*i][0],s->mv[dir][2*i][1],16);
  785.                 // after put we make avg of the same block
  786.                 pix_op=s->dsp.avg_pixels_tab;
  787.                 //opposite parity is always in the same frame if this is second field
  788.                 if(!s->first_field){
  789.                     ref_picture = s->current_picture_ptr->data;
  790.                 }
  791.             }
  792.         }
  793.     break;
  794.     default: assert(0);
  795.     }
  796. }
  797. static inline void MPV_motion(MpegEncContext *s,
  798.                               uint8_t *dest_y, uint8_t *dest_cb,
  799.                               uint8_t *dest_cr, int dir,
  800.                               uint8_t **ref_picture,
  801.                               op_pixels_func (*pix_op)[4],
  802.                               qpel_mc_func (*qpix_op)[16])
  803. {
  804. #ifndef CONFIG_SMALL
  805.     if(s->out_format == FMT_MPEG1)
  806.         MPV_motion_internal(s, dest_y, dest_cb, dest_cr, dir,
  807.                             ref_picture, pix_op, qpix_op, 1);
  808.     else
  809. #endif
  810.         MPV_motion_internal(s, dest_y, dest_cb, dest_cr, dir,
  811.                             ref_picture, pix_op, qpix_op, 0);
  812. }
  813. #endif /* AVCODEC_MPEGVIDEO_COMMON_H */