gmc_altivec.c
上传用户:wstnjxml
上传日期:2014-04-03
资源大小:7248k
文件大小:6k
源码类别:

Windows CE

开发平台:

C/C++

  1. /*
  2.  * GMC (Global Motion Compensation)
  3.  * AltiVec-enabled
  4.  * Copyright (c) 2003 Romain Dolbeau <romain@dolbeau.org>
  5.  *
  6.  * This library is free software; you can redistribute it and/or
  7.  * modify it under the terms of the GNU Lesser General Public
  8.  * License as published by the Free Software Foundation; either
  9.  * version 2 of the License, or (at your option) any later version.
  10.  *
  11.  * This library is distributed in the hope that it will be useful,
  12.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14.  * Lesser General Public License for more details.
  15.  *
  16.  * You should have received a copy of the GNU Lesser General Public
  17.  * License along with this library; if not, write to the Free Software
  18.  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19.  */
  20. #include "../dsputil.h"
  21. #include "gcc_fixes.h"
  22. #include "dsputil_altivec.h"
  23. /*
  24.   altivec-enhanced gmc1. ATM this code assume stride is a multiple of 8,
  25.   to preserve proper dst alignement.
  26. */
  27. #define GMC1_PERF_COND (h==8)
  28. void gmc1_altivec(uint8_t *dst /* align 8 */, uint8_t *src /* align1 */, int stride, int h, int x16, int y16, int rounder)
  29. {
  30. POWERPC_PERF_DECLARE(altivec_gmc1_num, GMC1_PERF_COND);
  31. #ifdef ALTIVEC_USE_REFERENCE_C_CODE
  32.     const int A=(16-x16)*(16-y16);
  33.     const int B=(   x16)*(16-y16);
  34.     const int C=(16-x16)*(   y16);
  35.     const int D=(   x16)*(   y16);
  36.     int i;
  37. POWERPC_PERF_START_COUNT(altivec_gmc1_num, GMC1_PERF_COND);
  38.     
  39.     for(i=0; i<h; i++)
  40.     {
  41.         dst[0]= (A*src[0] + B*src[1] + C*src[stride+0] + D*src[stride+1] + rounder)>>8;
  42.         dst[1]= (A*src[1] + B*src[2] + C*src[stride+1] + D*src[stride+2] + rounder)>>8;
  43.         dst[2]= (A*src[2] + B*src[3] + C*src[stride+2] + D*src[stride+3] + rounder)>>8;
  44.         dst[3]= (A*src[3] + B*src[4] + C*src[stride+3] + D*src[stride+4] + rounder)>>8;
  45.         dst[4]= (A*src[4] + B*src[5] + C*src[stride+4] + D*src[stride+5] + rounder)>>8;
  46.         dst[5]= (A*src[5] + B*src[6] + C*src[stride+5] + D*src[stride+6] + rounder)>>8;
  47.         dst[6]= (A*src[6] + B*src[7] + C*src[stride+6] + D*src[stride+7] + rounder)>>8;
  48.         dst[7]= (A*src[7] + B*src[8] + C*src[stride+7] + D*src[stride+8] + rounder)>>8;
  49.         dst+= stride;
  50.         src+= stride;
  51.     }
  52. POWERPC_PERF_STOP_COUNT(altivec_gmc1_num, GMC1_PERF_COND);
  53. #else /* ALTIVEC_USE_REFERENCE_C_CODE */
  54.     const unsigned short __attribute__ ((aligned(16))) rounder_a[8] =
  55.       {rounder, rounder, rounder, rounder,
  56.        rounder, rounder, rounder, rounder};
  57.     const unsigned short __attribute__ ((aligned(16))) ABCD[8] =
  58.       {
  59.         (16-x16)*(16-y16), /* A */
  60.         (   x16)*(16-y16), /* B */
  61.         (16-x16)*(   y16), /* C */
  62.         (   x16)*(   y16), /* D */
  63.         0, 0, 0, 0         /* padding */
  64.       };
  65.     register const_vector unsigned char vczero = (const_vector unsigned char)vec_splat_u8(0);
  66.     register const_vector unsigned short vcsr8 = (const_vector unsigned short)vec_splat_u16(8);
  67.     register vector unsigned char dstv, dstv2, src_0, src_1, srcvA, srcvB, srcvC, srcvD;
  68.     register vector unsigned short Av, Bv, Cv, Dv, rounderV, tempA, tempB, tempC, tempD;
  69.     int i;
  70.     unsigned long dst_odd = (unsigned long)dst & 0x0000000F;
  71.     unsigned long src_really_odd = (unsigned long)src & 0x0000000F;
  72. POWERPC_PERF_START_COUNT(altivec_gmc1_num, GMC1_PERF_COND);
  73.     tempA = vec_ld(0, (unsigned short*)ABCD);
  74.     Av = vec_splat(tempA, 0);
  75.     Bv = vec_splat(tempA, 1);
  76.     Cv = vec_splat(tempA, 2);
  77.     Dv = vec_splat(tempA, 3);
  78.     rounderV = vec_ld(0, (unsigned short*)rounder_a);
  79.     
  80.     // we'll be able to pick-up our 9 char elements
  81.     // at src from those 32 bytes
  82.     // we load the first batch here, as inside the loop
  83.     // we can re-use 'src+stride' from one iteration
  84.     // as the 'src' of the next.
  85.     src_0 = vec_ld(0, src);
  86.     src_1 = vec_ld(16, src);
  87.     srcvA = vec_perm(src_0, src_1, vec_lvsl(0, src));
  88.     
  89.     if (src_really_odd != 0x0000000F)
  90.     { // if src & 0xF == 0xF, then (src+1) is properly aligned on the second vector.
  91.       srcvB = vec_perm(src_0, src_1, vec_lvsl(1, src));
  92.     }
  93.     else
  94.     {
  95.       srcvB = src_1;
  96.     }
  97.     srcvA = vec_mergeh(vczero, srcvA);
  98.     srcvB = vec_mergeh(vczero, srcvB);
  99.     
  100.     for(i=0; i<h; i++)
  101.     {
  102.       dst_odd = (unsigned long)dst & 0x0000000F;
  103.       src_really_odd = (((unsigned long)src) + stride) & 0x0000000F;
  104.       
  105.       dstv = vec_ld(0, dst);
  106.       
  107.       // we we'll be able to pick-up our 9 char elements
  108.       // at src + stride from those 32 bytes
  109.       // then reuse the resulting 2 vectors srvcC and srcvD
  110.       // as the next srcvA and srcvB
  111.       src_0 = vec_ld(stride + 0, src);
  112.       src_1 = vec_ld(stride + 16, src);
  113.       srcvC = vec_perm(src_0, src_1, vec_lvsl(stride + 0, src));
  114.       
  115.       if (src_really_odd != 0x0000000F)
  116.       { // if src & 0xF == 0xF, then (src+1) is properly aligned on the second vector.
  117.         srcvD = vec_perm(src_0, src_1, vec_lvsl(stride + 1, src));
  118.       }
  119.       else
  120.       {
  121.         srcvD = src_1;
  122.       }
  123.       
  124.       srcvC = vec_mergeh(vczero, srcvC);
  125.       srcvD = vec_mergeh(vczero, srcvD);
  126.       
  127.       // OK, now we (finally) do the math :-)
  128.       // those four instructions replaces 32 int muls & 32 int adds.
  129.       // isn't AltiVec nice ?
  130.       tempA = vec_mladd((vector unsigned short)srcvA, Av, rounderV);
  131.       tempB = vec_mladd((vector unsigned short)srcvB, Bv, tempA);
  132.       tempC = vec_mladd((vector unsigned short)srcvC, Cv, tempB);
  133.       tempD = vec_mladd((vector unsigned short)srcvD, Dv, tempC);
  134.       
  135.       srcvA = srcvC;
  136.       srcvB = srcvD;
  137.       
  138.       tempD = vec_sr(tempD, vcsr8);
  139.       
  140.       dstv2 = vec_pack(tempD, (vector unsigned short)vczero);
  141.       
  142.       if (dst_odd)
  143.       {
  144.         dstv2 = vec_perm(dstv, dstv2, vcprm(0,1,s0,s1));
  145.       }
  146.       else
  147.       {
  148.         dstv2 = vec_perm(dstv, dstv2, vcprm(s0,s1,2,3));
  149.       }
  150.       
  151.       vec_st(dstv2, 0, dst);
  152.       
  153.       dst += stride;
  154.       src += stride;
  155.     }
  156. POWERPC_PERF_STOP_COUNT(altivec_gmc1_num, GMC1_PERF_COND);
  157. #endif /* ALTIVEC_USE_REFERENCE_C_CODE */
  158. }