[svn] / branches / dev-api-4 / xvidcore / src / motion / motion_est.c Repository:
ViewVC logotype

Diff of /branches/dev-api-4/xvidcore/src/motion/motion_est.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1054, Mon Jun 9 13:55:56 2003 UTC revision 1107, Sat Aug 2 15:08:48 2003 UTC
# Line 21  Line 21 
21   *  along with this program ; if not, write to the Free Software   *  along with this program ; if not, write to the Free Software
22   *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA   *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
23   *   *
24   * $Id: motion_est.c,v 1.58.2.17 2003-06-09 13:54:37 edgomez Exp $   * $Id: motion_est.c,v 1.58.2.24 2003-08-02 15:08:39 edgomez Exp $
25   *   *
26   ****************************************************************************/   ****************************************************************************/
27    
# Line 40  Line 40 
40  #include "motion_est.h"  #include "motion_est.h"
41  #include "motion.h"  #include "motion.h"
42  #include "sad.h"  #include "sad.h"
43    #include "gmc.h"
44  #include "../utils/emms.h"  #include "../utils/emms.h"
45  #include "../dct/fdct.h"  #include "../dct/fdct.h"
46    
# Line 71  Line 72 
72  #define CHECK_CANDIDATE(X,Y,D) { \  #define CHECK_CANDIDATE(X,Y,D) { \
73  CheckCandidate((X),(Y), (D), &iDirection, data ); }  CheckCandidate((X),(Y), (D), &iDirection, data ); }
74    
75    
76  /*****************************************************************************  /*****************************************************************************
77   * Code   * Code
78   ****************************************************************************/   ****************************************************************************/
# Line 334  Line 336 
336          sad += (data->lambda16 * t * sad)>>10;          sad += (data->lambda16 * t * sad)>>10;
337          data->temp[1] += (data->lambda8 * t * (data->temp[1] + NEIGH_8X8_BIAS))>>10;          data->temp[1] += (data->lambda8 * t * (data->temp[1] + NEIGH_8X8_BIAS))>>10;
338    
339          if (data->chroma) sad += ChromaSAD((xc >> 1) + roundtab_79[xc & 0x3],          if (data->chroma && sad < data->iMinSAD[0])
340                    sad += ChromaSAD((xc >> 1) + roundtab_79[xc & 0x3],
341                                                                             (yc >> 1) + roundtab_79[yc & 0x3], data);                                                                             (yc >> 1) + roundtab_79[yc & 0x3], data);
342    
343          if (sad < data->iMinSAD[0]) {          if (sad < data->iMinSAD[0]) {
# Line 444  Line 447 
447          sad = sad16(data->Cur, Reference, data->iEdgedWidth, 256*4096);          sad = sad16(data->Cur, Reference, data->iEdgedWidth, 256*4096);
448          sad += (data->lambda16 * t * sad)>>10;          sad += (data->lambda16 * t * sad)>>10;
449    
450          if (data->chroma) sad += ChromaSAD((xc >> 1) + roundtab_79[xc & 0x3],          if (data->chroma && sad < *data->iMinSAD)
451                    sad += ChromaSAD((xc >> 1) + roundtab_79[xc & 0x3],
452                                                                                  (yc >> 1) + roundtab_79[yc & 0x3], data);                                                                                  (yc >> 1) + roundtab_79[yc & 0x3], data);
453    
454          if (sad < *(data->iMinSAD)) {          if (sad < *(data->iMinSAD)) {
# Line 455  Line 459 
459  }  }
460    
461  static void  static void
462    CheckCandidate16I(const int x, const int y, const int Direction, int * const dir, const SearchData * const data)
463    {
464            int sad;
465    //      int xc, yc;
466            const uint8_t * Reference;
467    //      VECTOR * current;
468    
469            if ( (x > data->max_dx) || ( x < data->min_dx)
470                    || (y > data->max_dy) || (y < data->min_dy) ) return;
471    
472            Reference = GetReference(x, y, data);
473    //      xc = x; yc = y;
474    
475            sad = sad16(data->Cur, Reference, data->iEdgedWidth, 256*4096);
476    //      sad += d_mv_bits(x, y, data->predMV, data->iFcode, 0, 0);
477    
478    /*      if (data->chroma) sad += ChromaSAD((xc >> 1) + roundtab_79[xc & 0x3],
479                                                                                    (yc >> 1) + roundtab_79[yc & 0x3], data);
480    */
481    
482            if (sad < data->iMinSAD[0]) {
483                    data->iMinSAD[0] = sad;
484                    data->currentMV[0].x = x; data->currentMV[0].y = y;
485                    *dir = Direction;
486            }
487    }
488    
489    static void
490  CheckCandidate32I(const int x, const int y, const int Direction, int * const dir, const SearchData * const data)  CheckCandidate32I(const int x, const int y, const int Direction, int * const dir, const SearchData * const data)
491  {  {
492          /* maximum speed - for P/B/I decision */          /* maximum speed - for P/B/I decision */
# Line 463  Line 495 
495          if ( (x > data->max_dx) || (x < data->min_dx)          if ( (x > data->max_dx) || (x < data->min_dx)
496                  || (y > data->max_dy) || (y < data->min_dy) ) return;                  || (y > data->max_dy) || (y < data->min_dy) ) return;
497    
498          sad = sad32v_c(data->Cur, data->RefP[0] + (x>>1) + (y>>1)*(data->iEdgedWidth),          sad = sad32v_c(data->Cur, data->RefP[0] + (x>>1) + (y>>1)*((int)data->iEdgedWidth),
499                                          data->iEdgedWidth, data->temp+1);                                          data->iEdgedWidth, data->temp+1);
500    
501          if (sad < *(data->iMinSAD)) {          if (sad < *(data->iMinSAD)) {
# Line 516  Line 548 
548          sad = sad16bi(data->Cur, ReferenceF, ReferenceB, data->iEdgedWidth);          sad = sad16bi(data->Cur, ReferenceF, ReferenceB, data->iEdgedWidth);
549          sad += (data->lambda16 * t * sad)>>10;          sad += (data->lambda16 * t * sad)>>10;
550    
551          if (data->chroma) sad += ChromaSAD2((xcf >> 1) + roundtab_79[xcf & 0x3],          if (data->chroma && sad < *data->iMinSAD)
552                    sad += ChromaSAD2((xcf >> 1) + roundtab_79[xcf & 0x3],
553                                                                                  (ycf >> 1) + roundtab_79[ycf & 0x3],                                                                                  (ycf >> 1) + roundtab_79[ycf & 0x3],
554                                                                                  (xcb >> 1) + roundtab_79[xcb & 0x3],                                                                                  (xcb >> 1) + roundtab_79[xcb & 0x3],
555                                                                                  (ycb >> 1) + roundtab_79[ycb & 0x3], data);                                                                                  (ycb >> 1) + roundtab_79[ycb & 0x3], data);
# Line 576  Line 609 
609    
610          sad += (data->lambda16 * d_mv_bits(x, y, zeroMV, 1, 0, 0) * sad)>>10;          sad += (data->lambda16 * d_mv_bits(x, y, zeroMV, 1, 0, 0) * sad)>>10;
611    
612          if (data->chroma) sad += ChromaSAD2((xcf >> 3) + roundtab_76[xcf & 0xf],          if (data->chroma && sad < *data->iMinSAD)
613                    sad += ChromaSAD2((xcf >> 3) + roundtab_76[xcf & 0xf],
614                                                                                  (ycf >> 3) + roundtab_76[ycf & 0xf],                                                                                  (ycf >> 3) + roundtab_76[ycf & 0xf],
615                                                                                  (xcb >> 3) + roundtab_76[xcb & 0xf],                                                                                  (xcb >> 3) + roundtab_76[xcb & 0xf],
616                                                                                  (ycb >> 3) + roundtab_76[ycb & 0xf], data);                                                                                  (ycb >> 3) + roundtab_76[ycb & 0xf], data);
# Line 628  Line 662 
662          sad = sad16bi(data->Cur, ReferenceF, ReferenceB, data->iEdgedWidth);          sad = sad16bi(data->Cur, ReferenceF, ReferenceB, data->iEdgedWidth);
663          sad += (data->lambda16 * d_mv_bits(x, y, zeroMV, 1, 0, 0) * sad)>>10;          sad += (data->lambda16 * d_mv_bits(x, y, zeroMV, 1, 0, 0) * sad)>>10;
664    
665          if (data->chroma) sad += ChromaSAD2((xcf >> 3) + roundtab_76[xcf & 0xf],          if (data->chroma && sad < *data->iMinSAD)
666                    sad += ChromaSAD2((xcf >> 3) + roundtab_76[xcf & 0xf],
667                                                                                  (ycf >> 3) + roundtab_76[ycf & 0xf],                                                                                  (ycf >> 3) + roundtab_76[ycf & 0xf],
668                                                                                  (xcb >> 3) + roundtab_76[xcb & 0xf],                                                                                  (xcb >> 3) + roundtab_76[xcb & 0xf],
669                                                                                  (ycb >> 3) + roundtab_76[ycb & 0xf], data);                                                                                  (ycb >> 3) + roundtab_76[ycb & 0xf], data);
# Line 667  Line 702 
702          for(i = 0; i < 4; i++) {          for(i = 0; i < 4; i++) {
703                  int s = 8*((i&1) + (i>>1)*data->iEdgedWidth);                  int s = 8*((i&1) + (i>>1)*data->iEdgedWidth);
704                  transfer_8to16subro(in, data->Cur + s, ptr + s, data->iEdgedWidth);                  transfer_8to16subro(in, data->Cur + s, ptr + s, data->iEdgedWidth);
705                  bits += data->temp[i] = Block_CalcBits(coeff, in, data->iQuant, data->quant_type, &cbp, i);                  bits += data->temp[i] = Block_CalcBits(coeff, in, data->dctSpace + 128, data->iQuant, data->quant_type, &cbp, i);
706          }          }
707    
708          bits += t = BITS_MULT*d_mv_bits(x, y, data->predMV, data->iFcode, data->qpel^data->qpel_precision, 0);          bits += t = BITS_MULT*d_mv_bits(x, y, data->predMV, data->iFcode, data->qpel^data->qpel_precision, 0);
709    
710            if (data->temp[0] + t < data->iMinSAD[1]) {
711                    data->iMinSAD[1] = data->temp[0] + t; current[1].x = x; current[1].y = y; data->cbp[1] = (data->cbp[1]&~32) | cbp&32; }
712            if (data->temp[1] < data->iMinSAD[2]) {
713                    data->iMinSAD[2] = data->temp[1]; current[2].x = x; current[2].y = y; data->cbp[1] = (data->cbp[1]&~16) | cbp&16; }
714            if (data->temp[2] < data->iMinSAD[3]) {
715                    data->iMinSAD[3] = data->temp[2]; current[3].x = x; current[3].y = y; data->cbp[1] = (data->cbp[1]&~8) | cbp&8; }
716            if (data->temp[3] < data->iMinSAD[4]) {
717                    data->iMinSAD[4] = data->temp[3]; current[4].x = x; current[4].y = y; data->cbp[1] = (data->cbp[1]&~4) | cbp&4; }
718    
719          bits += BITS_MULT*xvid_cbpy_tab[15-(cbp>>2)].len;          bits += BITS_MULT*xvid_cbpy_tab[15-(cbp>>2)].len;
720    
721          if (bits >= data->iMinSAD[0]) return;          if (bits >= data->iMinSAD[0]) return;
# Line 681  Line 725 
725          yc = (yc >> 1) + roundtab_79[yc & 0x3];          yc = (yc >> 1) + roundtab_79[yc & 0x3];
726    
727          /* chroma U */          /* chroma U */
728          ptr = interpolate8x8_switch2(data->RefQ + 64, data->RefP[4], 0, 0, xc, yc,  data->iEdgedWidth/2, data->rounding);          ptr = interpolate8x8_switch2(data->RefQ, data->RefP[4], 0, 0, xc, yc, data->iEdgedWidth/2, data->rounding);
729          transfer_8to16subro(in, ptr, data->CurU, data->iEdgedWidth/2);          transfer_8to16subro(in, data->CurU, ptr, data->iEdgedWidth/2);
730          bits += Block_CalcBits(coeff, in, data->iQuant, data->quant_type, &cbp, 4);          bits += Block_CalcBits(coeff, in, data->dctSpace + 128, data->iQuant, data->quant_type, &cbp, 4);
731          if (bits >= data->iMinSAD[0]) return;          if (bits >= data->iMinSAD[0]) return;
732    
733          /* chroma V */          /* chroma V */
734          ptr = interpolate8x8_switch2(data->RefQ + 64, data->RefP[5], 0, 0, xc, yc,  data->iEdgedWidth/2, data->rounding);          ptr = interpolate8x8_switch2(data->RefQ, data->RefP[5], 0, 0, xc, yc, data->iEdgedWidth/2, data->rounding);
735          transfer_8to16subro(in, ptr, data->CurV, data->iEdgedWidth/2);          transfer_8to16subro(in, data->CurV, ptr, data->iEdgedWidth/2);
736          bits += Block_CalcBits(coeff, in, data->iQuant, data->quant_type, &cbp, 5);          bits += Block_CalcBits(coeff, in, data->dctSpace + 128, data->iQuant, data->quant_type, &cbp, 5);
737    
738          bits += BITS_MULT*mcbpc_inter_tab[(MODE_INTER & 7) | ((cbp & 3) << 3)].len;          bits += BITS_MULT*mcbpc_inter_tab[(MODE_INTER & 7) | ((cbp & 3) << 3)].len;
739    
# Line 697  Line 741 
741                  data->iMinSAD[0] = bits;                  data->iMinSAD[0] = bits;
742                  current[0].x = x; current[0].y = y;                  current[0].x = x; current[0].y = y;
743                  *dir = Direction;                  *dir = Direction;
744                    *data->cbp = cbp;
745          }          }
   
         if (data->temp[0] + t < data->iMinSAD[1]) {  
                 data->iMinSAD[1] = data->temp[0] + t; current[1].x = x; current[1].y = y; }  
         if (data->temp[1] < data->iMinSAD[2]) {  
                 data->iMinSAD[2] = data->temp[1]; current[2].x = x; current[2].y = y; }  
         if (data->temp[2] < data->iMinSAD[3]) {  
                 data->iMinSAD[3] = data->temp[2]; current[3].x = x; current[3].y = y; }  
         if (data->temp[3] < data->iMinSAD[4]) {  
                 data->iMinSAD[4] = data->temp[3]; current[4].x = x; current[4].y = y; }  
   
746  }  }
747    
748  static void  static void
749  CheckCandidateBits8(const int x, const int y, const int Direction, int * const dir, const SearchData * const data)  CheckCandidateBits8(const int x, const int y, const int Direction, int * const dir, const SearchData * const data)
750  {  {
# Line 731  Line 767 
767          }          }
768    
769          transfer_8to16subro(in, data->Cur, ptr, data->iEdgedWidth);          transfer_8to16subro(in, data->Cur, ptr, data->iEdgedWidth);
770          bits = Block_CalcBits(coeff, in, data->iQuant, data->quant_type, &cbp, 5);          bits = Block_CalcBits(coeff, in, data->dctSpace + 128, data->iQuant, data->quant_type, &cbp, 5);
771          bits += BITS_MULT*d_mv_bits(x, y, data->predMV, data->iFcode, data->qpel^data->qpel_precision, 0);          bits += BITS_MULT*d_mv_bits(x, y, data->predMV, data->iFcode, data->qpel^data->qpel_precision, 0);
772    
773          if (bits < data->iMinSAD[0]) {          if (bits < data->iMinSAD[0]) {
774                  data->temp[0] = cbp;                  *data->cbp = cbp;
775                  data->iMinSAD[0] = bits;                  data->iMinSAD[0] = bits;
776                  current[0].x = x; current[0].y = y;                  current[0].x = x; current[0].y = y;
777                  *dir = Direction;                  *dir = Direction;
# Line 943  Line 979 
979  }  }
980    
981  static __inline void  static __inline void
982    ZeroMacroblockP(MACROBLOCK *pMB, const int32_t sad)
983    {
984            pMB->mode = MODE_INTER;
985            pMB->mvs[0] = pMB->mvs[1] = pMB->mvs[2] = pMB->mvs[3] = zeroMV;
986            pMB->qmvs[0] = pMB->qmvs[1] = pMB->qmvs[2] = pMB->qmvs[3] = zeroMV;
987            pMB->sad16 = pMB->sad8[0] = pMB->sad8[1] = pMB->sad8[2] = pMB->sad8[3] = sad;
988    }
989    
990    static __inline void
991  ModeDecision(SearchData * const Data,  ModeDecision(SearchData * const Data,
992                          MACROBLOCK * const pMB,                          MACROBLOCK * const pMB,
993                          const MACROBLOCK * const pMBs,                          const MACROBLOCK * const pMBs,
# Line 952  Line 997 
997                          const uint32_t VopFlags,                          const uint32_t VopFlags,
998                          const uint32_t VolFlags,                          const uint32_t VolFlags,
999                          const IMAGE * const pCurrent,                          const IMAGE * const pCurrent,
1000                          const IMAGE * const pRef)                          const IMAGE * const pRef,
1001                            const IMAGE * const vGMC,
1002                            const int coding_type)
1003  {  {
1004          int mode = MODE_INTER;          int mode = MODE_INTER;
1005            int mcsel = 0;
1006          int inter4v = (VopFlags & XVID_VOP_INTER4V) && (pMB->dquant == 0);          int inter4v = (VopFlags & XVID_VOP_INTER4V) && (pMB->dquant == 0);
1007          const uint32_t iQuant = pMB->quant;          const uint32_t iQuant = pMB->quant;
1008    
1009          const int skip_possible = (!(VolFlags & XVID_VOL_GMC)) && (pMB->dquant == 0);          const int skip_possible = (coding_type == P_VOP) && (pMB->dquant == 0);
1010    
1011          if (!(VopFlags & XVID_VOP_MODEDECISION_BITS)) { /* normal, fast, SAD-based mode decision */          pMB->mcsel = 0;
1012    
1013            if (!(VopFlags & XVID_VOP_MODEDECISION_RD)) { /* normal, fast, SAD-based mode decision */
1014                  int sad;                  int sad;
1015                  int InterBias = MV16_INTER_BIAS;                  int InterBias = MV16_INTER_BIAS;
1016                  if (inter4v == 0 || Data->iMinSAD[0] < Data->iMinSAD[1] + Data->iMinSAD[2] +                  if (inter4v == 0 || Data->iMinSAD[0] < Data->iMinSAD[1] + Data->iMinSAD[2] +
# Line 982  Line 1032 
1032                                          sad = 0;                                          sad = 0;
1033                                  }                                  }
1034    
1035                    /* mcsel */
1036                    if (coding_type == S_VOP) {
1037    
1038                            int32_t iSAD = sad16(Data->Cur,
1039                                    vGMC->y + 16*y*Data->iEdgedWidth + 16*x, Data->iEdgedWidth, 65536);
1040    
1041                            if (Data->chroma) {
1042                                    iSAD += sad8(Data->CurU, vGMC->u + 8*y*(Data->iEdgedWidth/2) + 8*x, Data->iEdgedWidth/2);
1043                                    iSAD += sad8(Data->CurV, vGMC->v + 8*y*(Data->iEdgedWidth/2) + 8*x, Data->iEdgedWidth/2);
1044                            }
1045    
1046                            if (iSAD <= sad) {              /* mode decision GMC */
1047                                    mode = MODE_INTER;
1048                                    mcsel = 1;
1049                                    sad = iSAD;
1050                            }
1051    
1052                    }
1053    
1054                  /* intra decision */                  /* intra decision */
1055    
1056                  if (iQuant > 8) InterBias += 100 * (iQuant - 8); /* to make high quants work */                  if (iQuant > 8) InterBias += 100 * (iQuant - 8); /* to make high quants work */
# Line 990  Line 1059 
1059                  if (x != 0)                  if (x != 0)
1060                          if ((pMB - 1)->mode == MODE_INTRA ) InterBias -= 80;                          if ((pMB - 1)->mode == MODE_INTRA ) InterBias -= 80;
1061    
1062                  if (Data->chroma) InterBias += 50; /* dev8(chroma) ??? */                  if (Data->chroma) InterBias += 50; /* dev8(chroma) ??? <-- yes, we need dev8 (no big difference though) */
1063                  if (Data->rrv) InterBias *= 4;                  if (Data->rrv) InterBias *= 4;
1064    
1065                  if (InterBias < pMB->sad16) {                  if (InterBias < sad) {
1066                          int32_t deviation;                          int32_t deviation;
1067                          if (!Data->rrv) deviation = dev16(Data->Cur, Data->iEdgedWidth);                          if (!Data->rrv)
1068                          else deviation = dev16(Data->Cur, Data->iEdgedWidth) +                                  deviation = dev16(Data->Cur, Data->iEdgedWidth);
1069                            else
1070                                    deviation = dev16(Data->Cur, Data->iEdgedWidth) + /* dev32() */
1071                                  dev16(Data->Cur+16, Data->iEdgedWidth) +                                  dev16(Data->Cur+16, Data->iEdgedWidth) +
1072                                  dev16(Data->Cur + 16*Data->iEdgedWidth, Data->iEdgedWidth) +                                  dev16(Data->Cur + 16*Data->iEdgedWidth, Data->iEdgedWidth) +
1073                                  dev16(Data->Cur+16+16*Data->iEdgedWidth, Data->iEdgedWidth);                                  dev16(Data->Cur+16+16*Data->iEdgedWidth, Data->iEdgedWidth);
# Line 1004  Line 1075 
1075                          if (deviation < (sad - InterBias)) mode = MODE_INTRA;                          if (deviation < (sad - InterBias)) mode = MODE_INTRA;
1076                  }                  }
1077    
1078                    pMB->cbp = 63;
1079                    pMB->sad16 = pMB->sad8[0] = pMB->sad8[1] = pMB->sad8[2] = pMB->sad8[3] = sad;
1080    
1081          } else { /* BITS */          } else { /* BITS */
1082    
1083                  int bits, intra, i;                  int bits, intra, i, cbp, c[2] = {0, 0};
1084                  VECTOR backup[5], *v;                  VECTOR backup[5], *v;
1085                  Data->iQuant = iQuant;                  Data->iQuant = iQuant;
1086                    Data->cbp = c;
1087    
1088                  v = Data->qpel ? Data->currentQMV : Data->currentMV;                  v = Data->qpel ? Data->currentQMV : Data->currentMV;
1089                  for (i = 0; i < 5; i++) {                  for (i = 0; i < 5; i++) {
# Line 1017  Line 1092 
1092                  }                  }
1093    
1094                  bits = CountMBBitsInter(Data, pMBs, x, y, pParam, MotionFlags);                  bits = CountMBBitsInter(Data, pMBs, x, y, pParam, MotionFlags);
1095                  if (bits == 0)                  cbp = *Data->cbp;
1096                          mode = MODE_INTER; /* quick stop */  
1097                  else {                  if (coding_type == S_VOP) {
1098                            int bits_gmc;
1099                            *Data->iMinSAD = bits += BITS_MULT*1; /* mcsel */
1100                            bits_gmc = CountMBBitsGMC(Data, vGMC, x, y);
1101                            if (bits_gmc < bits) {
1102                                    mcsel = 1;
1103                                    *Data->iMinSAD = bits = bits_gmc;
1104                                    mode = MODE_INTER;
1105                                    cbp = *Data->cbp;
1106                            }
1107                    }
1108    
1109                          if (inter4v) {                          if (inter4v) {
1110                                  int bits_inter4v = CountMBBitsInter4v(Data, pMB, pMBs, x, y, pParam, MotionFlags, backup);                          int bits_4v;
1111                                  if (bits_inter4v < bits) { Data->iMinSAD[0] = bits = bits_inter4v; mode = MODE_INTER4V; }                          bits_4v = CountMBBitsInter4v(Data, pMB, pMBs, x, y, pParam, MotionFlags, backup);
1112                            if (bits_4v < bits) {
1113                                    Data->iMinSAD[0] = bits = bits_4v;
1114                                    mode = MODE_INTER4V;
1115                                    cbp = *Data->cbp;
1116                            }
1117                          }                          }
1118    
1119                          intra = CountMBBitsIntra(Data);                          intra = CountMBBitsIntra(Data);
1120                    if (intra < bits) {
1121                          if (intra < bits) { *Data->iMinSAD = bits = intra; mode = MODE_INTRA; }                          *Data->iMinSAD = bits = intra;
1122                            mode = MODE_INTRA;
1123                  }                  }
1124    
1125                    pMB->sad16 = pMB->sad8[0] = pMB->sad8[1] = pMB->sad8[2] = pMB->sad8[3] = 0;
1126                    pMB->cbp = cbp;
1127          }          }
1128    
1129          if (Data->rrv) {          if (Data->rrv) {
# Line 1036  Line 1131 
1131                          Data->currentMV[0].y = RRV_MV_SCALEDOWN(Data->currentMV[0].y);                          Data->currentMV[0].y = RRV_MV_SCALEDOWN(Data->currentMV[0].y);
1132          }          }
1133    
1134          if (mode == MODE_INTER) {          if (mode == MODE_INTER && mcsel == 0) {
1135                  pMB->mvs[0] = pMB->mvs[1] = pMB->mvs[2] = pMB->mvs[3] = Data->currentMV[0];                  pMB->mvs[0] = pMB->mvs[1] = pMB->mvs[2] = pMB->mvs[3] = Data->currentMV[0];
                 pMB->sad16 = pMB->sad8[0] = pMB->sad8[1] = pMB->sad8[2] = pMB->sad8[3] = Data->iMinSAD[0];  
1136    
1137                  if(Data->qpel) {                  if(Data->qpel) {
1138                          pMB->qmvs[0] = pMB->qmvs[1]                          pMB->qmvs[0] = pMB->qmvs[1]
# Line 1050  Line 1144 
1144                          pMB->pmvs[0].y = Data->currentMV[0].y - Data->predMV.y;                          pMB->pmvs[0].y = Data->currentMV[0].y - Data->predMV.y;
1145                  }                  }
1146    
1147          } else if (mode == MODE_INTER4V)          } else if (mode == MODE_INTER ) { // but mcsel == 1
1148                  pMB->sad16 = Data->iMinSAD[0];  
1149                    pMB->mcsel = 1;
1150                    if (Data->qpel) {
1151                            pMB->qmvs[0] = pMB->qmvs[1] = pMB->qmvs[2] = pMB->qmvs[3] = pMB->amv;
1152                            pMB->mvs[0].x = pMB->mvs[1].x = pMB->mvs[2].x = pMB->mvs[3].x = pMB->amv.x/2;
1153                            pMB->mvs[0].y = pMB->mvs[1].y = pMB->mvs[2].y = pMB->mvs[3].y = pMB->amv.y/2;
1154                    } else
1155                            pMB->mvs[0] = pMB->mvs[1] = pMB->mvs[2] = pMB->mvs[3] = pMB->amv;
1156    
1157            } else
1158                    if (mode == MODE_INTER4V) ; /* anything here? */
1159          else /* INTRA, NOT_CODED */          else /* INTRA, NOT_CODED */
1160                  SkipMacroblockP(pMB, 0);                  SkipMacroblockP(pMB, 0);
1161    
# Line 1065  Line 1169 
1169                                   const IMAGE * const pRefH,                                   const IMAGE * const pRefH,
1170                                   const IMAGE * const pRefV,                                   const IMAGE * const pRefV,
1171                                   const IMAGE * const pRefHV,                                   const IMAGE * const pRefHV,
1172                                    const IMAGE * const pGMC,
1173                                   const uint32_t iLimit)                                   const uint32_t iLimit)
1174  {  {
1175          MACROBLOCK *const pMBs = current->mbs;          MACROBLOCK *const pMBs = current->mbs;
# Line 1079  Line 1184 
1184          uint32_t x, y;          uint32_t x, y;
1185          uint32_t iIntra = 0;          uint32_t iIntra = 0;
1186          int32_t quant = current->quant, sad00;          int32_t quant = current->quant, sad00;
1187          int skip_thresh = \          int skip_thresh = INITIAL_SKIP_THRESH * \
                 INITIAL_SKIP_THRESH * \  
1188                  (current->vop_flags & XVID_VOP_REDUCED ? 4:1) * \                  (current->vop_flags & XVID_VOP_REDUCED ? 4:1) * \
1189                  (current->vop_flags & XVID_VOP_MODEDECISION_BITS ? 2:1);                  (current->vop_flags & XVID_VOP_MODEDECISION_RD ? 2:1);
1190    
1191          /* some pre-initialized thingies for SearchP */          /* some pre-initialized thingies for SearchP */
1192          int32_t temp[8];          int32_t temp[8];
1193          VECTOR currentMV[5];          VECTOR currentMV[5];
1194          VECTOR currentQMV[5];          VECTOR currentQMV[5];
1195          int32_t iMinSAD[5];          int32_t iMinSAD[5];
1196          DECLARE_ALIGNED_MATRIX(dct_space, 2, 64, int16_t, CACHE_LINE);          DECLARE_ALIGNED_MATRIX(dct_space, 3, 64, int16_t, CACHE_LINE);
1197          SearchData Data;          SearchData Data;
1198          memset(&Data, 0, sizeof(SearchData));          memset(&Data, 0, sizeof(SearchData));
1199          Data.iEdgedWidth = iEdgedWidth;          Data.iEdgedWidth = iEdgedWidth;
# Line 1100  Line 1204 
1204          Data.iFcode = current->fcode;          Data.iFcode = current->fcode;
1205          Data.rounding = pParam->m_rounding_type;          Data.rounding = pParam->m_rounding_type;
1206          Data.qpel = (current->vol_flags & XVID_VOL_QUARTERPEL ? 1:0);          Data.qpel = (current->vol_flags & XVID_VOL_QUARTERPEL ? 1:0);
1207          Data.chroma = MotionFlags & XVID_ME_CHROMA16;          Data.chroma = MotionFlags & XVID_ME_CHROMA_PVOP;
1208          Data.rrv = (current->vop_flags & XVID_VOP_REDUCED ? 1:0);          Data.rrv = (current->vop_flags & XVID_VOP_REDUCED) ? 1:0;
1209          Data.dctSpace = dct_space;          Data.dctSpace = dct_space;
1210          Data.quant_type = !(pParam->vol_flags & XVID_VOL_MPEGQUANT);          Data.quant_type = !(pParam->vol_flags & XVID_VOL_MPEGQUANT);
1211    
# Line 1147  Line 1251 
1251    
1252                          /* initial skip decision */                          /* initial skip decision */
1253                          /* no early skip for GMC (global vector = skip vector is unknown!)  */                          /* no early skip for GMC (global vector = skip vector is unknown!)  */
1254                          if (!(current->vol_flags & XVID_VOL_GMC))       { /* no fast SKIP for S(GMC)-VOPs */                          if (current->coding_type != S_VOP)      { /* no fast SKIP for S(GMC)-VOPs */
1255                                  if (pMB->dquant == 0 && sad00 < pMB->quant * skip_thresh)                                  if (pMB->dquant == 0 && sad00 < pMB->quant * skip_thresh)
1256                                          if (Data.chroma || SkipDecisionP(pCurrent, pRef, x, y, iEdgedWidth/2, pMB->quant, Data.rrv)) {                                          if (Data.chroma || SkipDecisionP(pCurrent, pRef, x, y, iEdgedWidth/2, pMB->quant, Data.rrv)) {
1257                                                  SkipMacroblockP(pMB, sad00);                                                  SkipMacroblockP(pMB, sad00);
# Line 1155  Line 1259 
1259                                          }                                          }
1260                          }                          }
1261    
1262                            if ((current->vop_flags & XVID_VOP_CARTOON) &&
1263                                    (sad00 < pMB->quant * 4 * skip_thresh)) { /* favorize (0,0) vector for cartoons */
1264                                    ZeroMacroblockP(pMB, sad00);
1265                                    continue;
1266                            }
1267    
1268                          SearchP(pRef, pRefH->y, pRefV->y, pRefHV->y, pCurrent, x,                          SearchP(pRef, pRefH->y, pRefV->y, pRefHV->y, pCurrent, x,
1269                                          y, MotionFlags, current->vop_flags, current->vol_flags,                                          y, MotionFlags, current->vop_flags, current->vol_flags,
1270                                          &Data, pParam, pMBs, reference->mbs, pMB);                                          &Data, pParam, pMBs, reference->mbs, pMB);
1271    
1272                          ModeDecision(&Data, pMB, pMBs, x, y, pParam,                          ModeDecision(&Data, pMB, pMBs, x, y, pParam,
1273                                                   MotionFlags, current->vop_flags, current->vol_flags,                                                   MotionFlags, current->vop_flags, current->vol_flags,
1274                                                   pCurrent, pRef);                                                   pCurrent, pRef, pGMC, current->coding_type);
1275    
1276                          if (pMB->mode == MODE_INTRA)                          if (pMB->mode == MODE_INTRA)
1277                                  if (++iIntra > iLimit) return 1;                                  if (++iIntra > iLimit) return 1;
1278                  }                  }
1279          }          }
1280    
1281          if (current->vol_flags & XVID_VOL_GMC ) /* GMC only for S(GMC)-VOPs */  //      if (current->vol_flags & XVID_VOL_GMC ) /* GMC only for S(GMC)-VOPs */
1282          {  //      {
1283                  current->warp = GlobalMotionEst( pMBs, pParam, current, reference, pRefH, pRefV, pRefHV);  //              current->warp = GlobalMotionEst( pMBs, pParam, current, reference, pRefH, pRefV, pRefHV);
1284          }  //      }
1285          return 0;          return 0;
1286  }  }
1287    
# Line 1290  Line 1400 
1400          Data->iMinSAD[3] = pMB->sad8[2];          Data->iMinSAD[3] = pMB->sad8[2];
1401          Data->iMinSAD[4] = pMB->sad8[3];          Data->iMinSAD[4] = pMB->sad8[3];
1402    
1403          if ((!(VopFlags & XVID_VOP_MODEDECISION_BITS)) || (x | y)) {          if ((!(VopFlags & XVID_VOP_MODEDECISION_RD)) && (x | y)) {
1404                  threshA = Data->temp[0]; /* that's where we keep this SAD atm */                  threshA = Data->temp[0]; /* that's where we keep this SAD atm */
1405                  if (threshA < 512) threshA = 512;                  if (threshA < 512) threshA = 512;
1406                  else if (threshA > 1024) threshA = 1024;                  else if (threshA > 1024) threshA = 1024;
# Line 1389  Line 1499 
1499                  Search8(Data, 2*x, 2*y + 1, MotionFlags, pParam, pMB, pMBs, 2, &Data8);                  Search8(Data, 2*x, 2*y + 1, MotionFlags, pParam, pMB, pMBs, 2, &Data8);
1500                  Search8(Data, 2*x + 1, 2*y + 1, MotionFlags, pParam, pMB, pMBs, 3, &Data8);                  Search8(Data, 2*x + 1, 2*y + 1, MotionFlags, pParam, pMB, pMBs, 3, &Data8);
1501    
1502                  if ((Data->chroma) && (!(VopFlags & XVID_VOP_MODEDECISION_BITS))) {                  if ((Data->chroma) && (!(VopFlags & XVID_VOP_MODEDECISION_RD))) {
1503                          /* chroma is only used for comparsion to INTER. if the comparsion will be done in BITS domain, it will not be used */                          /* chroma is only used for comparsion to INTER. if the comparsion will be done in BITS domain, it will not be used */
1504                          int sumx = 0, sumy = 0;                          int sumx = 0, sumy = 0;
1505    
# Line 1455  Line 1565 
1565                  if (!Data->rrv) CheckCandidate = CheckCandidate8;                  if (!Data->rrv) CheckCandidate = CheckCandidate8;
1566                  else CheckCandidate = CheckCandidate16no4v;                  else CheckCandidate = CheckCandidate16no4v;
1567    
1568                  if (MotionFlags & XVID_ME_EXTSEARCH8 && (!(MotionFlags & XVID_ME_EXTSEARCH_BITS))) {                  if (MotionFlags & XVID_ME_EXTSEARCH8 && (!(MotionFlags & XVID_ME_EXTSEARCH_RD))) {
1569                          int32_t temp_sad = *(Data->iMinSAD); /* store current MinSAD */                          int32_t temp_sad = *(Data->iMinSAD); /* store current MinSAD */
1570    
1571                          MainSearchFunc *MainSearchPtr;                          MainSearchFunc *MainSearchPtr;
# Line 2004  Line 2114 
2114          Data.lambda16 = lambda_vec16[frame->quant];          Data.lambda16 = lambda_vec16[frame->quant];
2115          Data.qpel = pParam->vol_flags & XVID_VOL_QUARTERPEL;          Data.qpel = pParam->vol_flags & XVID_VOL_QUARTERPEL;
2116          Data.rounding = 0;          Data.rounding = 0;
2117          Data.chroma = frame->motion_flags & XVID_ME_CHROMA8;          Data.chroma = frame->motion_flags & XVID_ME_CHROMA_BVOP;
2118          Data.temp = temp;          Data.temp = temp;
2119    
2120          Data.RefQ = f_refV->u; /* a good place, also used in MC (for similar purpose) */          Data.RefQ = f_refV->u; /* a good place, also used in MC (for similar purpose) */
# Line 2161  Line 2271 
2271          }          }
2272  }  }
2273    
2274  #define INTRA_THRESH    1700  #define INTRA_THRESH    2200
2275  #define INTER_THRESH    1200  #define INTER_THRESH    50
2276    #define INTRA_THRESH2   95
2277    
2278  int  int
2279  MEanalysis(     const IMAGE * const pRef,  MEanalysis(     const IMAGE * const pRef,
2280                          const FRAMEINFO * const Current,                          const FRAMEINFO * const Current,
2281                          const MBParam * const pParam,                          const MBParam * const pParam,
2282                          const int maxIntra, /* maximum number if non-I frames */                          const int maxIntra, //maximum number if non-I frames
2283                          const int intraCount, /* number of non-I frames after last I frame; 0 if we force P/B frame */                          const int intraCount, //number of non-I frames after last I frame; 0 if we force P/B frame
2284                          const int bCount,  /* number of B frames in a row */                          const int bCount, // number of B frames in a row
2285                          const int b_thresh)                          const int b_thresh)
2286  {  {
2287          uint32_t x, y, intra = 0;          uint32_t x, y, intra = 0;
2288          int sSAD = 0;          int sSAD = 0;
2289          MACROBLOCK * const pMBs = Current->mbs;          MACROBLOCK * const pMBs = Current->mbs;
2290          const IMAGE * const pCurrent = &Current->image;          const IMAGE * const pCurrent = &Current->image;
2291          int IntraThresh = INTRA_THRESH, InterThresh = INTER_THRESH + 10*b_thresh;          int IntraThresh = INTRA_THRESH, InterThresh = INTER_THRESH + b_thresh;
2292          int s = 0, blocks = 0;          int blocks = 0;
2293            int complexity = 0;
2294    
2295          int32_t iMinSAD[5], temp[5];          int32_t iMinSAD[5], temp[5];
2296          VECTOR currentMV[5];          VECTOR currentMV[5];
# Line 2191  Line 2303 
2303          CheckCandidate = CheckCandidate32I;          CheckCandidate = CheckCandidate32I;
2304    
2305          if (intraCount != 0) {          if (intraCount != 0) {
2306                  if (intraCount < 10) /* we're right after an I frame */                  if (intraCount < 10) // we're right after an I frame
2307                          IntraThresh += 15* (intraCount - 10) * (intraCount - 10);                          IntraThresh += 15* (intraCount - 10) * (intraCount - 10);
2308                  else                  else
2309                          if ( 5*(maxIntra - intraCount) < maxIntra) /* we're close to maximum. 2 sec when max is 10 sec */                          if ( 5*(maxIntra - intraCount) < maxIntra) // we're close to maximum. 2 sec when max is 10 sec
2310                                  IntraThresh -= (IntraThresh * (maxIntra - 8*(maxIntra - intraCount)))/maxIntra;                                  IntraThresh -= (IntraThresh * (maxIntra - 8*(maxIntra - intraCount)))/maxIntra;
2311          }          }
2312    
2313          InterThresh -= (350 - 8*b_thresh) * bCount;          InterThresh -= 12 * bCount;
2314          if (InterThresh < 300 + 5*b_thresh) InterThresh = 300 + 5*b_thresh;          if (InterThresh < 15 + b_thresh) InterThresh = 15 + b_thresh;
2315    
2316          if (sadInit) (*sadInit) ();          if (sadInit) (*sadInit) ();
2317    
2318          for (y = 1; y < pParam->mb_height-1; y += 2) {          for (y = 1; y < pParam->mb_height-1; y += 2) {
2319                  for (x = 1; x < pParam->mb_width-1; x += 2) {                  for (x = 1; x < pParam->mb_width-1; x += 2) {
2320                          int i;                          int i;
2321                          blocks += 4;                          blocks += 10;
2322    
2323                          if (bCount == 0) pMBs[x + y * pParam->mb_width].mvs[0] = zeroMV;                          if (bCount == 0) pMBs[x + y * pParam->mb_width].mvs[0] = zeroMV;
2324                          else { /* extrapolation of the vector found for last frame */                          else { //extrapolation of the vector found for last frame
2325                                  pMBs[x + y * pParam->mb_width].mvs[0].x =                                  pMBs[x + y * pParam->mb_width].mvs[0].x =
2326                                          (pMBs[x + y * pParam->mb_width].mvs[0].x * (bCount+1) ) / bCount;                                          (pMBs[x + y * pParam->mb_width].mvs[0].x * (bCount+1) ) / bCount;
2327                                  pMBs[x + y * pParam->mb_width].mvs[0].y =                                  pMBs[x + y * pParam->mb_width].mvs[0].y =
# Line 2221  Line 2333 
2333                          for (i = 0; i < 4; i++) {                          for (i = 0; i < 4; i++) {
2334                                  int dev;                                  int dev;
2335                                  MACROBLOCK *pMB = &pMBs[x+(i&1) + (y+(i>>1)) * pParam->mb_width];                                  MACROBLOCK *pMB = &pMBs[x+(i&1) + (y+(i>>1)) * pParam->mb_width];
                                 if (pMB->sad16 > IntraThresh) {  
2336                                          dev = dev16(pCurrent->y + (x + (i&1) + (y + (i>>1)) * pParam->edged_width) * 16,                                          dev = dev16(pCurrent->y + (x + (i&1) + (y + (i>>1)) * pParam->edged_width) * 16,
2337                                                                          pParam->edged_width);                                                                          pParam->edged_width);
2338    
2339                                    complexity += dev;
2340                                          if (dev + IntraThresh < pMB->sad16) {                                          if (dev + IntraThresh < pMB->sad16) {
2341                                                  pMB->mode = MODE_INTRA;                                                  pMB->mode = MODE_INTRA;
2342                                                  if (++intra > ((pParam->mb_height-2)*(pParam->mb_width-2))/2) return I_VOP;                                                  if (++intra > ((pParam->mb_height-2)*(pParam->mb_width-2))/2) return I_VOP;
2343                                          }                                          }
2344                                  }  
2345                                  if (pMB->mvs[0].x == 0 && pMB->mvs[0].y == 0) s++;                                  if (pMB->mvs[0].x == 0 && pMB->mvs[0].y == 0)
2346                                            if (dev > 500 && pMB->sad16 < 1000)
2347                                                    sSAD += 1000;
2348    
2349                                  sSAD += pMB->sad16;                                  sSAD += pMB->sad16;
2350                          }                          }
2351                  }                  }
2352          }          }
2353            complexity >>= 7;
2354    
2355          sSAD /= blocks;          sSAD /= complexity + 4*blocks;
   
         if (b_thresh < 20) {  
                 s = (10*s) / blocks;  
                 if (s > 4) sSAD += (s - 2) * (40 - 2*b_thresh); /* static block - looks bad when in bframe... */  
         }  
2356    
2357            if (intraCount > 12 && sSAD > INTRA_THRESH2 ) return I_VOP;
2358          if (sSAD > InterThresh ) return P_VOP;          if (sSAD > InterThresh ) return P_VOP;
2359          emms();          emms();
2360          return B_VOP;          return B_VOP;
2361  }  }
2362    
2363    
 static WARPPOINTS  
 GlobalMotionEst(const MACROBLOCK * const pMBs,  
                                 const MBParam * const pParam,  
                                 const FRAMEINFO * const current,  
                                 const FRAMEINFO * const reference,  
                                 const IMAGE * const pRefH,  
                                 const IMAGE * const pRefV,  
                                 const IMAGE * const pRefHV      )  
 {  
   
         const int deltax=8;             /* upper bound for difference between a MV and it's neighbour MVs */  
         const int deltay=8;  
         const int grad=512;             /* lower bound for deviation in MB */  
   
         WARPPOINTS gmc;  
   
         uint32_t mx, my;  
   
         int MBh = pParam->mb_height;  
         int MBw = pParam->mb_width;  
   
         int *MBmask= calloc(MBh*MBw,sizeof(int));  
         double DtimesF[4] = { 0.,0., 0., 0. };  
         double sol[4] = { 0., 0., 0., 0. };  
         double a,b,c,n,denom;  
         double meanx,meany;  
         int num,oldnum;  
   
         if (!MBmask) {  fprintf(stderr,"Mem error\n");  
                                         gmc.duv[0].x= gmc.duv[0].y =  
                                                 gmc.duv[1].x= gmc.duv[1].y =  
                                                 gmc.duv[2].x= gmc.duv[2].y = 0;  
                                         return gmc; }  
   
         /* filter mask of all blocks */  
   
         for (my = 1; my < (uint32_t)MBh-1; my++)  
         for (mx = 1; mx < (uint32_t)MBw-1; mx++)  
         {  
                 const int mbnum = mx + my * MBw;  
                 const MACROBLOCK *pMB = &pMBs[mbnum];  
                 const VECTOR mv = pMB->mvs[0];  
   
                 if (pMB->mode == MODE_INTRA || pMB->mode == MODE_NOT_CODED)  
                         continue;  
   
                 if ( ( (abs(mv.x -   (pMB-1)->mvs[0].x) < deltax) && (abs(mv.y -   (pMB-1)->mvs[0].y) < deltay) )  
                 &&   ( (abs(mv.x -   (pMB+1)->mvs[0].x) < deltax) && (abs(mv.y -   (pMB+1)->mvs[0].y) < deltay) )  
                 &&   ( (abs(mv.x - (pMB-MBw)->mvs[0].x) < deltax) && (abs(mv.y - (pMB-MBw)->mvs[0].y) < deltay) )  
                 &&   ( (abs(mv.x - (pMB+MBw)->mvs[0].x) < deltax) && (abs(mv.y - (pMB+MBw)->mvs[0].y) < deltay) ) )  
                         MBmask[mbnum]=1;  
         }  
   
         for (my = 1; my < (uint32_t)MBh-1; my++)  
         for (mx = 1; mx < (uint32_t)MBw-1; mx++)  
         {  
                 const uint8_t *const pCur = current->image.y + 16*my*pParam->edged_width + 16*mx;  
   
                 const int mbnum = mx + my * MBw;  
                 if (!MBmask[mbnum])  
                         continue;  
   
                 if (sad16 ( pCur, pCur+1 , pParam->edged_width, 65536) <= (uint32_t)grad )  
                         MBmask[mbnum] = 0;  
                 if (sad16 ( pCur, pCur+pParam->edged_width, pParam->edged_width, 65536) <= (uint32_t)grad )  
                         MBmask[mbnum] = 0;  
   
         }  
   
         emms();  
   
         do {            /* until convergence */  
   
         a = b = c = n = 0;  
         DtimesF[0] = DtimesF[1] = DtimesF[2] = DtimesF[3] = 0.;  
         for (my = 0; my < (uint32_t)MBh; my++)  
                 for (mx = 0; mx < (uint32_t)MBw; mx++)  
                 {  
                         const int mbnum = mx + my * MBw;  
                         const MACROBLOCK *pMB = &pMBs[mbnum];  
                         const VECTOR mv = pMB->mvs[0];  
   
                         if (!MBmask[mbnum])  
                                 continue;  
   
                         n++;  
                         a += 16*mx+8;  
                         b += 16*my+8;  
                         c += (16*mx+8)*(16*mx+8)+(16*my+8)*(16*my+8);  
   
                         DtimesF[0] += (double)mv.x;  
                         DtimesF[1] += (double)mv.x*(16*mx+8) + (double)mv.y*(16*my+8);  
                         DtimesF[2] += (double)mv.x*(16*my+8) - (double)mv.y*(16*mx+8);  
                         DtimesF[3] += (double)mv.y;  
                 }  
   
         denom = a*a+b*b-c*n;  
   
 /* Solve the system:    sol = (D'*E*D)^{-1} D'*E*F   */  
 /* D'*E*F has been calculated in the same loop as matrix */  
   
         sol[0] = -c*DtimesF[0] + a*DtimesF[1] + b*DtimesF[2];  
         sol[1] =  a*DtimesF[0] - n*DtimesF[1]                + b*DtimesF[3];  
         sol[2] =  b*DtimesF[0]                - n*DtimesF[2] - a*DtimesF[3];  
         sol[3] =                 b*DtimesF[1] - a*DtimesF[2] - c*DtimesF[3];  
   
         sol[0] /= denom;  
         sol[1] /= denom;  
         sol[2] /= denom;  
         sol[3] /= denom;  
   
         meanx = meany = 0.;  
         oldnum = 0;  
         for (my = 0; my < (uint32_t)MBh; my++)  
                 for (mx = 0; mx < (uint32_t)MBw; mx++)  
                 {  
                         const int mbnum = mx + my * MBw;  
                         const MACROBLOCK *pMB = &pMBs[mbnum];  
                         const VECTOR mv = pMB->mvs[0];  
   
                         if (!MBmask[mbnum])  
                                 continue;  
   
                         oldnum++;  
                         meanx += fabs(( sol[0] + (16*mx+8)*sol[1] + (16*my+8)*sol[2] ) - mv.x );  
                         meany += fabs(( sol[3] - (16*mx+8)*sol[2] + (16*my+8)*sol[1] ) - mv.y );  
                 }  
   
         if (4*meanx > oldnum)   /* better fit than 0.25 is useless */  
                 meanx /= oldnum;  
         else  
                 meanx = 0.25;  
   
         if (4*meany > oldnum)  
                 meany /= oldnum;  
         else  
                 meany = 0.25;  
   
 /*      fprintf(stderr,"sol = (%8.5f, %8.5f, %8.5f, %8.5f)\n",sol[0],sol[1],sol[2],sol[3]);  
         fprintf(stderr,"meanx = %8.5f  meany = %8.5f   %d\n",meanx,meany, oldnum);  
 */  
         num = 0;  
         for (my = 0; my < (uint32_t)MBh; my++)  
                 for (mx = 0; mx < (uint32_t)MBw; mx++)  
                 {  
                         const int mbnum = mx + my * MBw;  
                         const MACROBLOCK *pMB = &pMBs[mbnum];  
                         const VECTOR mv = pMB->mvs[0];  
   
                         if (!MBmask[mbnum])  
                                 continue;  
   
                         if  ( ( fabs(( sol[0] + (16*mx+8)*sol[1] + (16*my+8)*sol[2] ) - mv.x ) > meanx )  
                                 || ( fabs(( sol[3] - (16*mx+8)*sol[2] + (16*my+8)*sol[1] ) - mv.y ) > meany ) )  
                                 MBmask[mbnum]=0;  
                         else  
                                 num++;  
                 }  
   
         } while ( (oldnum != num) && (num>=4) );  
   
         if (num < 4)  
         {  
                 gmc.duv[0].x= gmc.duv[0].y= gmc.duv[1].x= gmc.duv[1].y= gmc.duv[2].x= gmc.duv[2].y=0;  
         } else {  
   
                 gmc.duv[0].x=(int)(sol[0]+0.5);  
                 gmc.duv[0].y=(int)(sol[3]+0.5);  
   
                 gmc.duv[1].x=(int)(sol[1]*pParam->width+0.5);  
                 gmc.duv[1].y=(int)(-sol[2]*pParam->width+0.5);  
   
                 gmc.duv[2].x=0;  
                 gmc.duv[2].y=0;  
         }  
 /*      fprintf(stderr,"wp1 = ( %4d, %4d)  wp2 = ( %4d, %4d) \n", gmc.duv[0].x, gmc.duv[0].y, gmc.duv[1].x, gmc.duv[1].y); */  
   
         free(MBmask);  
   
         return gmc;  
 }  
   
2364  /* functions which perform BITS-based search/bitcount */  /* functions which perform BITS-based search/bitcount */
2365    
2366  static int  static int
# Line 2452  Line 2382 
2382                  Data->qpel_precision = 1;                  Data->qpel_precision = 1;
2383                  CheckCandidateBits16(Data->currentQMV[0].x, Data->currentQMV[0].y, 255, &iDirection, Data);                  CheckCandidateBits16(Data->currentQMV[0].x, Data->currentQMV[0].y, 255, &iDirection, Data);
2384    
2385                  if (MotionFlags & (XVID_ME_HALFPELREFINE16_BITS | XVID_ME_EXTSEARCH_BITS)) { /* we have to prepare for halfpixel-precision search */                  if (MotionFlags & (XVID_ME_HALFPELREFINE16_RD | XVID_ME_EXTSEARCH_RD)) { /* we have to prepare for halfpixel-precision search */
2386                          for(i = 0; i < 5; i++) bsad[i] = Data->iMinSAD[i];                          for(i = 0; i < 5; i++) bsad[i] = Data->iMinSAD[i];
2387                          get_range(&Data->min_dx, &Data->max_dx, &Data->min_dy, &Data->max_dy, x, y, 16,                          get_range(&Data->min_dx, &Data->max_dx, &Data->min_dy, &Data->max_dy, x, y, 16,
2388                                                  pParam->width, pParam->height, Data->iFcode - Data->qpel, 0, Data->rrv);                                                  pParam->width, pParam->height, Data->iFcode - Data->qpel, 0, Data->rrv);
# Line 2466  Line 2396 
2396                  CheckCandidateBits16(Data->currentMV[0].x, Data->currentMV[0].y, 255, &iDirection, Data);                  CheckCandidateBits16(Data->currentMV[0].x, Data->currentMV[0].y, 255, &iDirection, Data);
2397          }          }
2398    
2399          if (MotionFlags&XVID_ME_EXTSEARCH_BITS) SquareSearch(Data->currentMV->x, Data->currentMV->y, Data, iDirection);          if (MotionFlags&XVID_ME_EXTSEARCH_RD) SquareSearch(Data->currentMV->x, Data->currentMV->y, Data, iDirection);
2400    
2401          if (MotionFlags&XVID_ME_HALFPELREFINE16_BITS) SubpelRefine(Data);          if (MotionFlags&XVID_ME_HALFPELREFINE16_RD) SubpelRefine(Data);
2402    
2403          if (Data->qpel) {          if (Data->qpel) {
2404                  if (MotionFlags&(XVID_ME_EXTSEARCH_BITS | XVID_ME_HALFPELREFINE16_BITS)) { /* there was halfpel-precision search */                  if (MotionFlags&(XVID_ME_EXTSEARCH_RD | XVID_ME_HALFPELREFINE16_RD)) { /* there was halfpel-precision search */
2405                          for(i = 0; i < 5; i++) if (bsad[i] > Data->iMinSAD[i]) {                          for(i = 0; i < 5; i++) if (bsad[i] > Data->iMinSAD[i]) {
2406                                  Data->currentQMV[i].x = 2 * Data->currentMV[i].x; /* we have found a better match */                                  Data->currentQMV[i].x = 2 * Data->currentMV[i].x; /* we have found a better match */
2407                                  Data->currentQMV[i].y = 2 * Data->currentMV[i].y;                                  Data->currentQMV[i].y = 2 * Data->currentMV[i].y;
# Line 2482  Line 2412 
2412                          get_range(&Data->min_dx, &Data->max_dx, &Data->min_dy, &Data->max_dy, x, y, 16,                          get_range(&Data->min_dx, &Data->max_dx, &Data->min_dy, &Data->max_dy, x, y, 16,
2413                                          pParam->width, pParam->height, Data->iFcode, 1, 0);                                          pParam->width, pParam->height, Data->iFcode, 1, 0);
2414                  }                  }
2415                  if (MotionFlags&XVID_ME_QUARTERPELREFINE16_BITS) SubpelRefine(Data);                  if (MotionFlags&XVID_ME_QUARTERPELREFINE16_RD) SubpelRefine(Data);
2416          }          }
2417    
2418          if (MotionFlags&XVID_ME_CHECKPREDICTION_BITS) { /* let's check vector equal to prediction */          if (MotionFlags&XVID_ME_CHECKPREDICTION_RD) { /* let's check vector equal to prediction */
2419                  VECTOR * v = Data->qpel ? Data->currentQMV : Data->currentMV;                  VECTOR * v = Data->qpel ? Data->currentQMV : Data->currentMV;
2420                  if (!(Data->predMV.x == v->x && Data->predMV.y == v->y))                  if (!(Data->predMV.x == v->x && Data->predMV.y == v->y))
2421                          CheckCandidateBits16(Data->predMV.x, Data->predMV.y, 255, &iDirection, Data);                          CheckCandidateBits16(Data->predMV.x, Data->predMV.y, 255, &iDirection, Data);
# Line 2520  Line 2450 
2450                  Data8->RefP[2] = Data->RefP[2] + 8*((i&1) + (i>>1)*Data->iEdgedWidth);                  Data8->RefP[2] = Data->RefP[2] + 8*((i&1) + (i>>1)*Data->iEdgedWidth);
2451                  Data8->RefP[1] = Data->RefP[1] + 8*((i&1) + (i>>1)*Data->iEdgedWidth);                  Data8->RefP[1] = Data->RefP[1] + 8*((i&1) + (i>>1)*Data->iEdgedWidth);
2452                  Data8->RefP[3] = Data->RefP[3] + 8*((i&1) + (i>>1)*Data->iEdgedWidth);                  Data8->RefP[3] = Data->RefP[3] + 8*((i&1) + (i>>1)*Data->iEdgedWidth);
2453                    *Data8->cbp = (Data->cbp[1] & (1<<(5-i))) ? 1:0; // copy corresponding cbp bit
2454    //              *Data8->cbp = 1;
2455    
2456                  if(Data->qpel) {                  if(Data->qpel) {
2457                          Data8->predMV = get_qpmv2(pMBs, pParam->mb_width, 0, x, y, i);                          Data8->predMV = get_qpmv2(pMBs, pParam->mb_width, 0, x, y, i);
# Line 2545  Line 2477 
2477                  }                  }
2478    
2479                  if (Data8->qpel) {                  if (Data8->qpel) {
2480                          if (MotionFlags&XVID_ME_HALFPELREFINE8_BITS || (MotionFlags&XVID_ME_EXTSEARCH8 && MotionFlags&XVID_ME_EXTSEARCH_BITS)) { /* halfpixel motion search follows */                          if (MotionFlags&XVID_ME_HALFPELREFINE8_RD || (MotionFlags&XVID_ME_EXTSEARCH8 && MotionFlags&XVID_ME_EXTSEARCH_RD)) { /* halfpixel motion search follows */
2481                                  int32_t s = *Data8->iMinSAD;                                  int32_t s = *Data8->iMinSAD;
2482                                  Data8->currentMV->x = Data8->currentQMV->x/2;                                  Data8->currentMV->x = Data8->currentQMV->x/2;
2483                                  Data8->currentMV->y = Data8->currentQMV->y/2;                                  Data8->currentMV->y = Data8->currentQMV->y/2;
# Line 2556  Line 2488 
2488                                  if (Data8->currentQMV->x & 1 || Data8->currentQMV->y & 1)                                  if (Data8->currentQMV->x & 1 || Data8->currentQMV->y & 1)
2489                                          CheckCandidateBits8(Data8->currentMV->x, Data8->currentMV->y, 255, &iDirection, Data8);                                          CheckCandidateBits8(Data8->currentMV->x, Data8->currentMV->y, 255, &iDirection, Data8);
2490    
2491                                  if (MotionFlags & XVID_ME_EXTSEARCH8 && MotionFlags & XVID_ME_EXTSEARCH_BITS)                                  if (MotionFlags & XVID_ME_EXTSEARCH8 && MotionFlags & XVID_ME_EXTSEARCH_RD)
2492                                          SquareSearch(Data8->currentMV->x, Data8->currentMV->x, Data8, 255);                                          SquareSearch(Data8->currentMV->x, Data8->currentMV->x, Data8, 255);
2493    
2494                                  if (MotionFlags & XVID_ME_HALFPELREFINE8_BITS)                                  if (MotionFlags & XVID_ME_HALFPELREFINE8_RD)
2495                                          SubpelRefine(Data8);                                          SubpelRefine(Data8);
2496    
2497                                  if(s > *Data8->iMinSAD) { /* we have found a better match */                                  if(s > *Data8->iMinSAD) { /* we have found a better match */
# Line 2572  Line 2504 
2504                                                          pParam->width, pParam->height, Data8->iFcode, 1, 0);                                                          pParam->width, pParam->height, Data8->iFcode, 1, 0);
2505    
2506                          }                          }
2507                          if (MotionFlags & XVID_ME_QUARTERPELREFINE8_BITS) SubpelRefine(Data8);                          if (MotionFlags & XVID_ME_QUARTERPELREFINE8_RD) SubpelRefine(Data8);
2508    
2509                  } else { /* not qpel */                  } else { /* not qpel */
2510    
2511                          if (MotionFlags & XVID_ME_EXTSEARCH8 && MotionFlags & XVID_ME_EXTSEARCH_BITS) /* extsearch */                          if (MotionFlags & XVID_ME_EXTSEARCH8 && MotionFlags & XVID_ME_EXTSEARCH_RD) /* extsearch */
2512                                  SquareSearch(Data8->currentMV->x, Data8->currentMV->x, Data8, 255);                                  SquareSearch(Data8->currentMV->x, Data8->currentMV->x, Data8, 255);
2513    
2514                          if (MotionFlags & XVID_ME_HALFPELREFINE8_BITS)                          if (MotionFlags & XVID_ME_HALFPELREFINE8_RD)
2515                                  SubpelRefine(Data8); /* halfpel refinement */                                  SubpelRefine(Data8); /* halfpel refinement */
2516                  }                  }
2517    
2518                  /* checking vector equal to predicion */                  /* checking vector equal to predicion */
2519                  if (i != 0 && MotionFlags & XVID_ME_CHECKPREDICTION_BITS) {                  if (i != 0 && MotionFlags & XVID_ME_CHECKPREDICTION_RD) {
2520                          const VECTOR * v = Data->qpel ? Data8->currentQMV : Data8->currentMV;                          const VECTOR * v = Data->qpel ? Data8->currentQMV : Data8->currentMV;
2521                          if (!MVequal(*v, Data8->predMV))                          if (!MVequal(*v, Data8->predMV))
2522                                  CheckCandidateBits8(Data8->predMV.x, Data8->predMV.y, 255, &iDirection, Data8);                                  CheckCandidateBits8(Data8->predMV.x, Data8->predMV.y, 255, &iDirection, Data8);
# Line 2608  Line 2540 
2540                  }                  }
2541                  pMB->mvs[i] = *Data8->currentMV;                  pMB->mvs[i] = *Data8->currentMV;
2542                  pMB->sad8[i] = 4 * *Data8->iMinSAD;                  pMB->sad8[i] = 4 * *Data8->iMinSAD;
2543                  if (Data8->temp[0]) cbp |= 1 << (5 - i);                  if (Data8->cbp[0]) cbp |= 1 << (5 - i);
2544    
2545          } /* /for all luma blocks */          } /* end - for all luma blocks */
2546    
2547          bits += BITS_MULT*xvid_cbpy_tab[15-(cbp>>2)].len;          bits += BITS_MULT*xvid_cbpy_tab[15-(cbp>>2)].len;
2548    
# Line 2621  Line 2553 
2553          /* chroma U */          /* chroma U */
2554          ptr = interpolate8x8_switch2(Data->RefQ + 64, Data->RefP[4], 0, 0, sumx, sumy, Data->iEdgedWidth/2, Data->rounding);          ptr = interpolate8x8_switch2(Data->RefQ + 64, Data->RefP[4], 0, 0, sumx, sumy, Data->iEdgedWidth/2, Data->rounding);
2555          transfer_8to16subro(in, Data->CurU, ptr, Data->iEdgedWidth/2);          transfer_8to16subro(in, Data->CurU, ptr, Data->iEdgedWidth/2);
2556          bits += Block_CalcBits(coeff, in, Data->iQuant, Data->quant_type, &cbp, 4);          bits += Block_CalcBits(coeff, in, Data->dctSpace + 128, Data->iQuant, Data->quant_type, &cbp, 4);
2557    
2558          if (bits >= *Data->iMinSAD) return bits;          if (bits >= *Data->iMinSAD) return bits;
2559    
2560          /* chroma V */          /* chroma V */
2561          ptr = interpolate8x8_switch2(Data->RefQ + 64, Data->RefP[5], 0, 0, sumx, sumy, Data->iEdgedWidth/2, Data->rounding);          ptr = interpolate8x8_switch2(Data->RefQ + 64, Data->RefP[5], 0, 0, sumx, sumy, Data->iEdgedWidth/2, Data->rounding);
2562          transfer_8to16subro(in, Data->CurV, ptr, Data->iEdgedWidth/2);          transfer_8to16subro(in, Data->CurV, ptr, Data->iEdgedWidth/2);
2563          bits += Block_CalcBits(coeff, in, Data->iQuant, Data->quant_type, &cbp, 5);          bits += Block_CalcBits(coeff, in, Data->dctSpace + 128, Data->iQuant, Data->quant_type, &cbp, 5);
2564    
2565          bits += BITS_MULT*mcbpc_inter_tab[(MODE_INTER4V & 7) | ((cbp & 3) << 3)].len;          bits += BITS_MULT*mcbpc_inter_tab[(MODE_INTER4V & 7) | ((cbp & 3) << 3)].len;
2566    
2567            *Data->cbp = cbp;
2568          return bits;          return bits;
2569  }  }
2570    
# Line 2645  Line 2578 
2578          for(i = 0; i < 4; i++) {          for(i = 0; i < 4; i++) {
2579                  int s = 8*((i&1) + (i>>1)*Data->iEdgedWidth);                  int s = 8*((i&1) + (i>>1)*Data->iEdgedWidth);
2580                  transfer_8to16copy(in, Data->Cur + s, Data->iEdgedWidth);                  transfer_8to16copy(in, Data->Cur + s, Data->iEdgedWidth);
2581                  bits += Block_CalcBitsIntra(coeff, in, Data->iQuant, Data->quant_type, &cbp, i, &dc);                  bits += Block_CalcBitsIntra(coeff, in, Data->dctSpace + 128, Data->iQuant, Data->quant_type, &cbp, i, &dc);
2582    
2583                  if (bits >= Data->iMinSAD[0]) return bits;                  if (bits >= Data->iMinSAD[0]) return bits;
2584          }          }
# Line 2654  Line 2587 
2587    
2588          /*chroma U */          /*chroma U */
2589          transfer_8to16copy(in, Data->CurU, Data->iEdgedWidth/2);          transfer_8to16copy(in, Data->CurU, Data->iEdgedWidth/2);
2590          bits += Block_CalcBitsIntra(coeff, in, Data->iQuant, Data->quant_type, &cbp, 4, &dc);          bits += Block_CalcBitsIntra(coeff, in, Data->dctSpace + 128, Data->iQuant, Data->quant_type, &cbp, 4, &dc);
2591    
2592          if (bits >= Data->iMinSAD[0]) return bits;          if (bits >= Data->iMinSAD[0]) return bits;
2593    
2594          /* chroma V */          /* chroma V */
2595          transfer_8to16copy(in, Data->CurV, Data->iEdgedWidth/2);          transfer_8to16copy(in, Data->CurV, Data->iEdgedWidth/2);
2596          bits += Block_CalcBitsIntra(coeff, in, Data->iQuant, Data->quant_type, &cbp, 5, &dc);          bits += Block_CalcBitsIntra(coeff, in, Data->dctSpace + 128, Data->iQuant, Data->quant_type, &cbp, 5, &dc);
2597    
2598          bits += BITS_MULT*mcbpc_inter_tab[(MODE_INTRA & 7) | ((cbp & 3) << 3)].len;          bits += BITS_MULT*mcbpc_inter_tab[(MODE_INTRA & 7) | ((cbp & 3) << 3)].len;
2599    
2600          return bits;          return bits;
2601  }  }
2602    
2603    static int
2604    CountMBBitsGMC(const SearchData * const Data, const IMAGE * const vGMC, const int x, const int y)
2605    {
2606            int bits = BITS_MULT*1; /* this one is mcsel */
2607            int cbp = 0, i;
2608            int16_t *in = Data->dctSpace, * coeff = Data->dctSpace + 64;
2609    
2610            for(i = 0; i < 4; i++) {
2611                    int s = 8*((i&1) + (i>>1)*Data->iEdgedWidth);
2612                    transfer_8to16subro(in, Data->Cur + s, vGMC->y + s + 16*(x+y*Data->iEdgedWidth), Data->iEdgedWidth);
2613                    bits += Block_CalcBits(coeff, in, Data->dctSpace + 128, Data->iQuant, Data->quant_type, &cbp, i);
2614                    if (bits >= Data->iMinSAD[0]) return bits;
2615            }
2616    
2617            bits += BITS_MULT*xvid_cbpy_tab[15-(cbp>>2)].len;
2618    
2619            /*chroma U */
2620            transfer_8to16subro(in, Data->CurU, vGMC->u + 8*(x+y*(Data->iEdgedWidth/2)), Data->iEdgedWidth/2);
2621            bits += Block_CalcBits(coeff, in, Data->dctSpace + 128, Data->iQuant, Data->quant_type, &cbp, 4);
2622    
2623            if (bits >= Data->iMinSAD[0]) return bits;
2624    
2625            /* chroma V */
2626            transfer_8to16subro(in, Data->CurV , vGMC->v + 8*(x+y*(Data->iEdgedWidth/2)), Data->iEdgedWidth/2);
2627            bits += Block_CalcBits(coeff, in, Data->dctSpace + 128, Data->iQuant, Data->quant_type, &cbp, 5);
2628    
2629            bits += BITS_MULT*mcbpc_inter_tab[(MODE_INTER & 7) | ((cbp & 3) << 3)].len;
2630    
2631            *Data->cbp = cbp;
2632    
2633            return bits;
2634    }
2635    
2636    
2637    
2638    
2639    static __inline void
2640    GMEanalyzeMB (  const uint8_t * const pCur,
2641                                    const uint8_t * const pRef,
2642                                    const uint8_t * const pRefH,
2643                                    const uint8_t * const pRefV,
2644                                    const uint8_t * const pRefHV,
2645                                    const int x,
2646                                    const int y,
2647                                    const MBParam * const pParam,
2648                                    MACROBLOCK * const pMBs,
2649                                    SearchData * const Data)
2650    {
2651    
2652            int i=0;
2653            MACROBLOCK * const pMB = &pMBs[x + y * pParam->mb_width];
2654    
2655            Data->iMinSAD[0] = MV_MAX_ERROR;
2656    
2657            Data->predMV = get_pmv2(pMBs, pParam->mb_width, 0, x, y, 0);
2658    
2659            get_range(&Data->min_dx, &Data->max_dx, &Data->min_dy, &Data->max_dy, x, y, 16,
2660                                    pParam->width, pParam->height, 16, 0, 0);
2661    
2662            Data->Cur = pCur + 16*(x + y * pParam->edged_width);
2663            Data->RefP[0] = pRef + 16*(x + y * pParam->edged_width);
2664            Data->RefP[1] = pRefV + 16*(x + y * pParam->edged_width);
2665            Data->RefP[2] = pRefH + 16*(x + y * pParam->edged_width);
2666            Data->RefP[3] = pRefHV + 16*(x + y * pParam->edged_width);
2667    
2668            Data->currentMV[0].x = Data->currentMV[0].y = 0;
2669            CheckCandidate16I(0, 0, 255, &i, Data);
2670    
2671            if ( (Data->predMV.x !=0) || (Data->predMV.y != 0) )
2672                    CheckCandidate16I(Data->predMV.x, Data->predMV.y, 255, &i, Data);
2673    
2674            AdvDiamondSearch(Data->currentMV[0].x, Data->currentMV[0].y, Data, 255);
2675    
2676            SubpelRefine(Data);
2677    
2678    
2679            /* for QPel halfpel positions are worse than in halfpel mode :( */
2680    /*      if (Data->qpel) {
2681                    Data->currentQMV->x = 2*Data->currentMV->x;
2682                    Data->currentQMV->y = 2*Data->currentMV->y;
2683                    Data->qpel_precision = 1;
2684                    get_range(&Data->min_dx, &Data->max_dx, &Data->min_dy, &Data->max_dy, x, y, 16,
2685                                            pParam->width, pParam->height, iFcode, 1, 0);
2686                    SubpelRefine(Data);
2687            }
2688    */
2689    
2690            pMB->mvs[0] = pMB->mvs[1] = pMB->mvs[2] = pMB->mvs[3] = Data->currentMV[0];
2691            pMB->sad16 = Data->iMinSAD[0];
2692            pMB->mode = MODE_INTER;
2693            pMB->sad16 += 10*d_mv_bits(pMB->mvs[0].x, pMB->mvs[0].y, Data->predMV, Data->iFcode, 0, 0);
2694            return;
2695    }
2696    
2697    void
2698    GMEanalysis(const MBParam * const pParam,
2699                            const FRAMEINFO * const current,
2700                            const FRAMEINFO * const reference,
2701                            const IMAGE * const pRefH,
2702                            const IMAGE * const pRefV,
2703                            const IMAGE * const pRefHV)
2704    {
2705            uint32_t x, y;
2706            MACROBLOCK * const pMBs = current->mbs;
2707            const IMAGE * const pCurrent = &current->image;
2708            const IMAGE * const pReference = &reference->image;
2709    
2710            int32_t iMinSAD[5], temp[5];
2711            VECTOR currentMV[5];
2712            SearchData Data;
2713            memset(&Data, 0, sizeof(SearchData));
2714    
2715            Data.iEdgedWidth = pParam->edged_width;
2716            Data.rounding = pParam->m_rounding_type;
2717    
2718            Data.currentMV = &currentMV[0];
2719            Data.iMinSAD = &iMinSAD[0];
2720            Data.iFcode = current->fcode;
2721            Data.temp = temp;
2722    
2723            CheckCandidate = CheckCandidate16I;
2724    
2725            if (sadInit) (*sadInit) ();
2726    
2727            for (y = 0; y < pParam->mb_height; y ++) {
2728                    for (x = 0; x < pParam->mb_width; x ++) {
2729    
2730                            GMEanalyzeMB(pCurrent->y, pReference->y, pRefH->y, pRefV->y, pRefHV->y, x, y, pParam, pMBs, &Data);
2731                    }
2732            }
2733            return;
2734    }
2735    
2736    
2737    WARPPOINTS
2738    GlobalMotionEst(MACROBLOCK * const pMBs,
2739                                    const MBParam * const pParam,
2740                                    const FRAMEINFO * const current,
2741                                    const FRAMEINFO * const reference,
2742                                    const IMAGE * const pRefH,
2743                                    const IMAGE * const pRefV,
2744                                    const IMAGE * const pRefHV)
2745    {
2746    
2747            const int deltax=8;             // upper bound for difference between a MV and it's neighbour MVs
2748            const int deltay=8;
2749            const unsigned int gradx=512;           // lower bound for gradient in MB (ignore "flat" blocks)
2750            const unsigned int grady=512;
2751    
2752            double sol[4] = { 0., 0., 0., 0. };
2753    
2754            WARPPOINTS gmc;
2755    
2756            uint32_t mx, my;
2757    
2758            int MBh = pParam->mb_height;
2759            int MBw = pParam->mb_width;
2760            const int minblocks = 9; //MBh*MBw/32+3;                /* just some reasonable number 3% + 3 */
2761            const int maxblocks = MBh*MBw/4;                /* just some reasonable number 3% + 3 */
2762    
2763            int num=0;
2764            int oldnum;
2765    
2766            gmc.duv[0].x = gmc.duv[0].y = gmc.duv[1].x = gmc.duv[1].y = gmc.duv[2].x = gmc.duv[2].y = 0;
2767    
2768            GMEanalysis(pParam,current, reference, pRefH, pRefV, pRefHV);
2769    
2770            /* block based ME isn't done, yet, so do a quick presearch */
2771    
2772    // filter mask of all blocks
2773    
2774            for (my = 0; my < (uint32_t)MBh; my++)
2775            for (mx = 0; mx < (uint32_t)MBw; mx++)
2776            {
2777                    const int mbnum = mx + my * MBw;
2778                            pMBs[mbnum].mcsel = 0;
2779            }
2780    
2781    
2782            for (my = 1; my < (uint32_t)MBh-1; my++) /* ignore boundary blocks */
2783            for (mx = 1; mx < (uint32_t)MBw-1; mx++) /* theirs MVs are often wrong */
2784            {
2785                    const int mbnum = mx + my * MBw;
2786                    MACROBLOCK *const pMB = &pMBs[mbnum];
2787                    const VECTOR mv = pMB->mvs[0];
2788    
2789                    /* don't use object boundaries */
2790                    if   ( (abs(mv.x -   (pMB-1)->mvs[0].x) < deltax)
2791                            && (abs(mv.y -   (pMB-1)->mvs[0].y) < deltay)
2792                            && (abs(mv.x -   (pMB+1)->mvs[0].x) < deltax)
2793                            && (abs(mv.y -   (pMB+1)->mvs[0].y) < deltay)
2794                            && (abs(mv.x - (pMB-MBw)->mvs[0].x) < deltax)
2795                            && (abs(mv.y - (pMB-MBw)->mvs[0].y) < deltay)
2796                            && (abs(mv.x - (pMB+MBw)->mvs[0].x) < deltax)
2797                            && (abs(mv.y - (pMB+MBw)->mvs[0].y) < deltay) )
2798                    {       const int iEdgedWidth = pParam->edged_width;
2799                            const uint8_t *const pCur = current->image.y + 16*(my*iEdgedWidth + mx);
2800                            if ( (sad16 ( pCur, pCur+1 , iEdgedWidth, 65536) >= gradx )
2801                             &&  (sad16 ( pCur, pCur+iEdgedWidth, iEdgedWidth, 65536) >= grady ) )
2802                             {      pMB->mcsel = 1;
2803                                    num++;
2804                             }
2805    
2806                    /* only use "structured" blocks */
2807                    }
2808            }
2809            emms();
2810    
2811            /*      further filtering would be possible, but during iteration, remaining
2812                    outliers usually are removed, too */
2813    
2814            if (num>= minblocks)
2815            do {            /* until convergence */
2816                    double DtimesF[4];
2817                    double a,b,c,n,invdenom;
2818                    double meanx,meany;
2819    
2820                    a = b = c = n = 0;
2821                    DtimesF[0] = DtimesF[1] = DtimesF[2] = DtimesF[3] = 0.;
2822                    for (my = 1; my < (uint32_t)MBh-1; my++)
2823                    for (mx = 1; mx < (uint32_t)MBw-1; mx++)
2824                    {
2825                            const int mbnum = mx + my * MBw;
2826                            const VECTOR mv = pMBs[mbnum].mvs[0];
2827    
2828                            if (!pMBs[mbnum].mcsel)
2829                                    continue;
2830    
2831                            n++;
2832                            a += 16*mx+8;
2833                            b += 16*my+8;
2834                            c += (16*mx+8)*(16*mx+8)+(16*my+8)*(16*my+8);
2835    
2836                            DtimesF[0] += (double)mv.x;
2837                            DtimesF[1] += (double)mv.x*(16*mx+8) + (double)mv.y*(16*my+8);
2838                            DtimesF[2] += (double)mv.x*(16*my+8) - (double)mv.y*(16*mx+8);
2839                            DtimesF[3] += (double)mv.y;
2840                    }
2841    
2842            invdenom = a*a+b*b-c*n;
2843    
2844    /* Solve the system:    sol = (D'*E*D)^{-1} D'*E*F   */
2845    /* D'*E*F has been calculated in the same loop as matrix */
2846    
2847            sol[0] = -c*DtimesF[0] + a*DtimesF[1] + b*DtimesF[2];
2848            sol[1] =  a*DtimesF[0] - n*DtimesF[1]                           + b*DtimesF[3];
2849            sol[2] =  b*DtimesF[0]                          - n*DtimesF[2] - a*DtimesF[3];
2850            sol[3] =                                 b*DtimesF[1] - a*DtimesF[2] - c*DtimesF[3];
2851    
2852            sol[0] /= invdenom;
2853            sol[1] /= invdenom;
2854            sol[2] /= invdenom;
2855            sol[3] /= invdenom;
2856    
2857            meanx = meany = 0.;
2858            oldnum = 0;
2859            for (my = 1; my < (uint32_t)MBh-1; my++)
2860                    for (mx = 1; mx < (uint32_t)MBw-1; mx++)
2861                    {
2862                            const int mbnum = mx + my * MBw;
2863                            const VECTOR mv = pMBs[mbnum].mvs[0];
2864    
2865                            if (!pMBs[mbnum].mcsel)
2866                                    continue;
2867    
2868                            oldnum++;
2869                            meanx += fabs(( sol[0] + (16*mx+8)*sol[1] + (16*my+8)*sol[2] ) - (double)mv.x );
2870                            meany += fabs(( sol[3] - (16*mx+8)*sol[2] + (16*my+8)*sol[1] ) - (double)mv.y );
2871                    }
2872    
2873            if (4*meanx > oldnum)   /* better fit than 0.25 (=1/4pel) is useless */
2874                    meanx /= oldnum;
2875            else
2876                    meanx = 0.25;
2877    
2878            if (4*meany > oldnum)
2879                    meany /= oldnum;
2880            else
2881                    meany = 0.25;
2882    
2883            num = 0;
2884            for (my = 0; my < (uint32_t)MBh; my++)
2885                    for (mx = 0; mx < (uint32_t)MBw; mx++)
2886                    {
2887                            const int mbnum = mx + my * MBw;
2888                            const VECTOR mv = pMBs[mbnum].mvs[0];
2889    
2890                            if (!pMBs[mbnum].mcsel)
2891                                    continue;
2892    
2893                            if  ( ( fabs(( sol[0] + (16*mx+8)*sol[1] + (16*my+8)*sol[2] ) - (double)mv.x ) > meanx )
2894                                    || ( fabs(( sol[3] - (16*mx+8)*sol[2] + (16*my+8)*sol[1] ) - (double)mv.y ) > meany ) )
2895                                    pMBs[mbnum].mcsel=0;
2896                            else
2897                                    num++;
2898                    }
2899    
2900            } while ( (oldnum != num) && (num>= minblocks) );
2901    
2902            if (num < minblocks)
2903            {
2904                    const int iEdgedWidth = pParam->edged_width;
2905                    num = 0;
2906    
2907    /*              fprintf(stderr,"Warning! Unreliable GME (%d/%d blocks), falling back to translation.\n",num,MBh*MBw);
2908    */
2909                    gmc.duv[0].x= gmc.duv[0].y= gmc.duv[1].x= gmc.duv[1].y= gmc.duv[2].x= gmc.duv[2].y=0;
2910    
2911                    if (!(current->motion_flags & XVID_ME_GME_REFINE))
2912                            return gmc;
2913    
2914                    for (my = 1; my < (uint32_t)MBh-1; my++) /* ignore boundary blocks */
2915                    for (mx = 1; mx < (uint32_t)MBw-1; mx++) /* theirs MVs are often wrong */
2916                    {
2917                            const int mbnum = mx + my * MBw;
2918                            MACROBLOCK *const pMB = &pMBs[mbnum];
2919                            const uint8_t *const pCur = current->image.y + 16*(my*iEdgedWidth + mx);
2920                            if ( (sad16 ( pCur, pCur+1 , iEdgedWidth, 65536) >= gradx )
2921                             &&  (sad16 ( pCur, pCur+iEdgedWidth, iEdgedWidth, 65536) >= grady ) )
2922                             {      pMB->mcsel = 1;
2923                                    gmc.duv[0].x += pMB->mvs[0].x;
2924                                    gmc.duv[0].y += pMB->mvs[0].y;
2925                                    num++;
2926                             }
2927                    }
2928    
2929                    if (gmc.duv[0].x)
2930                            gmc.duv[0].x /= num;
2931                    if (gmc.duv[0].y)
2932                            gmc.duv[0].y /= num;
2933            } else {
2934    
2935                    gmc.duv[0].x=(int)(sol[0]+0.5);
2936                    gmc.duv[0].y=(int)(sol[3]+0.5);
2937    
2938                    gmc.duv[1].x=(int)(sol[1]*pParam->width+0.5);
2939                    gmc.duv[1].y=(int)(-sol[2]*pParam->width+0.5);
2940    
2941                    gmc.duv[2].x=-gmc.duv[1].y;             /* two warp points only */
2942                    gmc.duv[2].y=gmc.duv[1].x;
2943            }
2944            if (num>maxblocks)
2945            {       for (my = 1; my < (uint32_t)MBh-1; my++)
2946                    for (mx = 1; mx < (uint32_t)MBw-1; mx++)
2947                    {
2948                            const int mbnum = mx + my * MBw;
2949                            if (pMBs[mbnum-1].mcsel)
2950                                    pMBs[mbnum].mcsel=0;
2951                            else
2952                                    if (pMBs[mbnum-MBw].mcsel)
2953                                            pMBs[mbnum].mcsel=0;
2954                    }
2955            }
2956            return gmc;
2957    }
2958    
2959    int
2960    GlobalMotionEstRefine(
2961                                    WARPPOINTS *const startwp,
2962                                    MACROBLOCK * const pMBs,
2963                                    const MBParam * const pParam,
2964                                    const FRAMEINFO * const current,
2965                                    const FRAMEINFO * const reference,
2966                                    const IMAGE * const pCurr,
2967                                    const IMAGE * const pRef,
2968                                    const IMAGE * const pRefH,
2969                                    const IMAGE * const pRefV,
2970                                    const IMAGE * const pRefHV)
2971    {
2972            uint8_t* GMCblock = (uint8_t*)malloc(16*pParam->edged_width);
2973            WARPPOINTS bestwp=*startwp;
2974            WARPPOINTS centerwp,currwp;
2975            int gmcminSAD=0;
2976            int gmcSAD=0;
2977            int direction;
2978    //      int mx,my;
2979    
2980    /* use many blocks... */
2981    /*              for (my = 0; my < (uint32_t)pParam->mb_height; my++)
2982                    for (mx = 0; mx < (uint32_t)pParam->mb_width; mx++)
2983                    {
2984                            const int mbnum = mx + my * pParam->mb_width;
2985                            pMBs[mbnum].mcsel=1;
2986                    }
2987    */
2988    
2989    /* or rather don't use too many blocks... */
2990    /*
2991                    for (my = 1; my < (uint32_t)MBh-1; my++)
2992                    for (mx = 1; mx < (uint32_t)MBw-1; mx++)
2993                    {
2994                            const int mbnum = mx + my * MBw;
2995                            if (MBmask[mbnum-1])
2996                                    MBmask[mbnum-1]=0;
2997                            else
2998                                    if (MBmask[mbnum-MBw])
2999                                            MBmask[mbnum-1]=0;
3000    
3001                    }
3002    */
3003                    gmcminSAD = globalSAD(&bestwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3004    
3005                    if ( (reference->coding_type == S_VOP)
3006                            && ( (reference->warp.duv[1].x != bestwp.duv[1].x)
3007                              || (reference->warp.duv[1].y != bestwp.duv[1].y)
3008                              || (reference->warp.duv[0].x != bestwp.duv[0].x)
3009                              || (reference->warp.duv[0].y != bestwp.duv[0].y)
3010                              || (reference->warp.duv[2].x != bestwp.duv[2].x)
3011                              || (reference->warp.duv[2].y != bestwp.duv[2].y) ) )
3012                    {
3013                            gmcSAD = globalSAD(&reference->warp, pParam, pMBs,
3014                                                                    current, pRef, pCurr, GMCblock);
3015    
3016                            if (gmcSAD < gmcminSAD)
3017                            {       bestwp = reference->warp;
3018                                    gmcminSAD = gmcSAD;
3019                            }
3020                    }
3021    
3022            do {
3023                    direction = 0;
3024                    centerwp = bestwp;
3025    
3026                    currwp = centerwp;
3027    
3028                    currwp.duv[0].x--;
3029                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3030                    if (gmcSAD < gmcminSAD)
3031                    {       bestwp = currwp;
3032                            gmcminSAD = gmcSAD;
3033                            direction = 1;
3034                    }
3035                    else
3036                    {
3037                    currwp = centerwp; currwp.duv[0].x++;
3038                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3039                    if (gmcSAD < gmcminSAD)
3040                    {       bestwp = currwp;
3041                            gmcminSAD = gmcSAD;
3042                            direction = 2;
3043                    }
3044                    }
3045                    if (direction) continue;
3046    
3047                    currwp = centerwp; currwp.duv[0].y--;
3048                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3049                    if (gmcSAD < gmcminSAD)
3050                    {       bestwp = currwp;
3051                            gmcminSAD = gmcSAD;
3052                            direction = 4;
3053                    }
3054                    else
3055                    {
3056                    currwp = centerwp; currwp.duv[0].y++;
3057                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3058                    if (gmcSAD < gmcminSAD)
3059                    {       bestwp = currwp;
3060                            gmcminSAD = gmcSAD;
3061                            direction = 8;
3062                    }
3063                    }
3064                    if (direction) continue;
3065    
3066                    currwp = centerwp; currwp.duv[1].x++;
3067                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3068                    if (gmcSAD < gmcminSAD)
3069                    {       bestwp = currwp;
3070                            gmcminSAD = gmcSAD;
3071                            direction = 32;
3072                    }
3073                    currwp.duv[2].y++;
3074                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3075                    if (gmcSAD < gmcminSAD)
3076                    {       bestwp = currwp;
3077                            gmcminSAD = gmcSAD;
3078                            direction = 1024;
3079                    }
3080    
3081                    currwp = centerwp; currwp.duv[1].x--;
3082                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3083                    if (gmcSAD < gmcminSAD)
3084                    {       bestwp = currwp;
3085                            gmcminSAD = gmcSAD;
3086                            direction = 16;
3087                    }
3088                    else
3089                    {
3090                    currwp = centerwp; currwp.duv[1].x++;
3091                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3092                    if (gmcSAD < gmcminSAD)
3093                    {       bestwp = currwp;
3094                            gmcminSAD = gmcSAD;
3095                            direction = 32;
3096                    }
3097                    }
3098                    if (direction) continue;
3099    
3100    
3101                    currwp = centerwp; currwp.duv[1].y--;
3102                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3103                    if (gmcSAD < gmcminSAD)
3104                    {       bestwp = currwp;
3105                            gmcminSAD = gmcSAD;
3106                            direction = 64;
3107                    }
3108                    else
3109                    {
3110                    currwp = centerwp; currwp.duv[1].y++;
3111                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3112                    if (gmcSAD < gmcminSAD)
3113                    {       bestwp = currwp;
3114                            gmcminSAD = gmcSAD;
3115                            direction = 128;
3116                    }
3117                    }
3118                    if (direction) continue;
3119    
3120                    currwp = centerwp; currwp.duv[2].x--;
3121                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3122                    if (gmcSAD < gmcminSAD)
3123                    {       bestwp = currwp;
3124                            gmcminSAD = gmcSAD;
3125                            direction = 256;
3126                    }
3127                    else
3128                    {
3129                    currwp = centerwp; currwp.duv[2].x++;
3130                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3131                    if (gmcSAD < gmcminSAD)
3132                    {       bestwp = currwp;
3133                            gmcminSAD = gmcSAD;
3134                            direction = 512;
3135                    }
3136                    }
3137                    if (direction) continue;
3138    
3139                    currwp = centerwp; currwp.duv[2].y--;
3140                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3141                    if (gmcSAD < gmcminSAD)
3142                    {       bestwp = currwp;
3143                            gmcminSAD = gmcSAD;
3144                            direction = 1024;
3145                    }
3146                    else
3147                    {
3148                    currwp = centerwp; currwp.duv[2].y++;
3149                    gmcSAD = globalSAD(&currwp, pParam, pMBs, current, pRef, pCurr, GMCblock);
3150                    if (gmcSAD < gmcminSAD)
3151                    {       bestwp = currwp;
3152                            gmcminSAD = gmcSAD;
3153                            direction = 2048;
3154                    }
3155                    }
3156            } while (direction);
3157            free(GMCblock);
3158    
3159            *startwp = bestwp;
3160    
3161            return gmcminSAD;
3162    }
3163    
3164    int
3165    globalSAD(const WARPPOINTS *const wp,
3166                      const MBParam * const pParam,
3167                      const MACROBLOCK * const pMBs,
3168                      const FRAMEINFO * const current,
3169                      const IMAGE * const pRef,
3170                      const IMAGE * const pCurr,
3171                      uint8_t *const GMCblock)
3172    {
3173            NEW_GMC_DATA gmc_data;
3174            int iSAD, gmcSAD=0;
3175            int num=0;
3176            unsigned int mx, my;
3177    
3178            generate_GMCparameters( 3, 3, wp, pParam->width, pParam->height, &gmc_data);
3179    
3180            for (my = 0; my < (uint32_t)pParam->mb_height; my++)
3181                    for (mx = 0; mx < (uint32_t)pParam->mb_width; mx++) {
3182    
3183                    const int mbnum = mx + my * pParam->mb_width;
3184                    const int iEdgedWidth = pParam->edged_width;
3185    
3186                    if (!pMBs[mbnum].mcsel)
3187                            continue;
3188    
3189                    gmc_data.predict_16x16(&gmc_data, GMCblock,
3190                                                    pRef->y,
3191                                                    iEdgedWidth,
3192                                                    iEdgedWidth,
3193                                                    mx, my,
3194                                                    pParam->m_rounding_type);
3195    
3196                    iSAD = sad16 ( pCurr->y + 16*(my*iEdgedWidth + mx),
3197                                                    GMCblock , iEdgedWidth, 65536);
3198                    iSAD -= pMBs[mbnum].sad16;
3199    
3200                    if (iSAD<0)
3201                            gmcSAD += iSAD;
3202                    num++;
3203            }
3204            return gmcSAD;
3205    }
3206    
Legend:
Removed from v.1054  
changed lines
  Added in v.1107
No admin address has been configured
 ViewVC Help
Powered by ViewVC 1.0.4