liboil/simdpack/clip_fast.c

   1 /*
   2  * LIBOIL - Library of Optimized Inner Loops
   3  * Copyright (c) 2003,2004 David A. Schleef <ds@schleef.org>
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  17  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
  19  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  20  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  21  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  23  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
  24  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  25  * POSSIBILITY OF SUCH DAMAGE.
  26  */
  27
  28 #ifdef HAVE_CONFIG_H
  29 #include "config.h"
  30 #endif
  31
  32 #include <liboil/liboilfunction.h>
  33 #include <liboil/simdpack/simdpack.h>
  34
  35 /* This is a suprisingly fast implementation of clipping
  36  * in straight C.  It would be difficult to do it faster in asm
  37  * without specialized opcodes. */
  38
  39 static void
  40 clip_s16_fast (int16_t *dest, int dstr, int16_t *src, int sstr, int n,
  41     int16_t *low, int16_t *hi)
  42 {
  43         int i;
  44         int32_t x;
  45
  46         for(i=0;i<n;i++){
  47                 x = OIL_GET(src,i*sstr, int16_t);
  48                 x = x - (((x-*low)>>31)&(x-*low)) + (((*hi-x)>>31)&(*hi-x));
  49                 OIL_GET(dest,i*dstr, int16_t) = x;
  50         }
  51 }
  52
  53 OIL_DEFINE_IMPL (clip_s16_fast, clip_s16);
  54
  55 static void
  56 clip_s16_fast2 (int16_t *dest, int dstr, int16_t *src, int sstr, int n,
  57     int16_t *low, int16_t *hi)
  58 {
  59         int32_t x1, x2;
  60
  61         if (n&1) {
  62                 x1 = *src;
  63                 OIL_INCREMENT(src,sstr);
  64                 x1 -= (((x1-*low)>>31)&(x1-*low));
  65                 *dest = x1 + (((*hi-x1)>>31)&(*hi-x1));
  66                 OIL_INCREMENT(dest,dstr);
  67                 n--;
  68         }
  69         while(n>0){
  70                 x1 = *src;
  71                 OIL_INCREMENT(src,sstr);
  72                  x2 = *src;
  73                  OIL_INCREMENT(src,sstr);
  74                 x1 -= (((x1-*low)>>31)&(x1-*low));
  75                  x2 -= (((x2-*low)>>31)&(x2-*low));
  76                 *dest = x1 + (((*hi-x1)>>31)&(*hi-x1));
  77                 OIL_INCREMENT(dest,dstr);
  78                  *dest = x2 + (((*hi-x2)>>31)&(*hi-x2));
  79                  OIL_INCREMENT(dest,dstr);
  80                 n-=2;
  81         }
  82 }
  83 OIL_DEFINE_IMPL (clip_s16_fast2, clip_s16);
  84
  85
  86
  87
  88 #if 0
  89 /* broken */
  90
  91 /* This trick clips
  92  * the range min^(1<<31) to max^(1<<31) incorrectly with int32_t.
  93  * Thus the use of int64_t. */
  94
  95 static void
  96 clip_s32_fast (int32_t *dest, int dstr, int32_t *src, int sstr, int n,
  97     int32_t *low, int32_t *hi)
  98 {
  99         int i;
 100         int64_t x;
 101
 102         for(i=0;i<n;i++){
 103                 x = OIL_GET(src,i*sstr,int32_t);
 104                 x = x - (((x-*low)>>63)&(x-*low)) + (((*hi-x)>>63)&(*hi-x));
 105                 OIL_GET(dest,i*dstr,int32_t) = x;
 106         }
 107 }
 108
 109 OIL_DEFINE_IMPL (clip_s32_fast, clip_s32);
 110 #endif
 111
 112