genericopenlibs/liboil/src/i386/conv_3dnow.c
changeset 18 47c74d1534e1
equal deleted inserted replaced
0:e4d67989cc36 18:47c74d1534e1
       
     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 //Portions Copyright (c)  2008-2009 Nokia Corporation and/or its subsidiary(-ies). All rights reserved. 
       
    28 
       
    29 #ifdef HAVE_CONFIG_H
       
    30 #include "config.h"
       
    31 #endif
       
    32 #include <liboil/liboilfunction.h>
       
    33 #include <liboil/liboilclasses.h>
       
    34 
       
    35 
       
    36 /* suboptimal */
       
    37 static void
       
    38 conv_f32_s16_3dnow (float *dst, int dst_stride, int16_t * src, int src_stride,
       
    39     int n)
       
    40 {
       
    41 #if !defined(__WINSCW__) && !defined(__WINS__)      
       
    42   int i;
       
    43 
       
    44   for (i = 0; i < n; i++) {
       
    45     asm volatile ("  movswl 0(%0), %%eax \n"
       
    46         "  movd %%eax, %%mm0 \n"
       
    47         "  pi2fd %%mm0, %%mm0 \n" "  movd %%mm0, 0(%1) \n"
       
    48         ::"r" (src), "r" (dst)
       
    49         :"eax");
       
    50 
       
    51     dst = OIL_OFFSET (dst, dst_stride);
       
    52     src = OIL_OFFSET (src, src_stride);
       
    53   }
       
    54   asm volatile ("emms");
       
    55 #endif
       
    56 }
       
    57 
       
    58 OIL_DEFINE_IMPL_FULL (conv_f32_s16_3dnow, conv_f32_s16, OIL_IMPL_FLAG_MMX|OIL_IMPL_FLAG_3DNOW);
       
    59 
       
    60 #ifdef ENABLE_BROKEN_IMPLS
       
    61 /* suboptimal */
       
    62 /* This appears to fail because of differences in rounding of half
       
    63  * integers. */
       
    64 static void
       
    65 conv_s32_f32_3dnow (int32_t * dst, int dst_stride, float *src, int src_stride,
       
    66     int n)
       
    67 {
       
    68   int i;
       
    69   const float constants[][2] = {
       
    70     { 0.5,  0.5},
       
    71     {-1.0, -1.0}
       
    72   };
       
    73 
       
    74   for (i = 0; i < n; i++) {
       
    75     asm volatile (
       
    76         "  movq 0(%0), %%mm0 \n"
       
    77         "  pxor %%mm1, %%mm1 \n"
       
    78         "  pfcmpgt %%mm0, %%mm1 \n"
       
    79         "  movq %%mm0, %%mm2 \n"
       
    80         "  pfadd 0(%2), %%mm0 \n"
       
    81         "  pfcmpeq %%mm0, %%mm2 \n"
       
    82         "  pandn %%mm1, %%mm2 \n"
       
    83         "  pf2id %%mm0, %%mm0 \n"
       
    84         "  paddd %%mm2, %%mm0 \n"
       
    85         "  movd %%mm0, 0(%1) \n"
       
    86         :
       
    87         :"r" (src), "r" (dst), "r" (constants)
       
    88         );
       
    89 
       
    90     dst = OIL_OFFSET (dst, dst_stride);
       
    91     src = OIL_OFFSET (src, src_stride);
       
    92   }
       
    93   asm volatile ("emms");
       
    94 }
       
    95 
       
    96 OIL_DEFINE_IMPL_FULL (conv_s32_f32_3dnow, conv_s32_f32, OIL_IMPL_FLAG_MMX|OIL_IMPL_FLAG_3DNOW);
       
    97 #endif
       
    98 
       
    99 
       
   100 
       
   101 #ifdef	__SYMBIAN32__
       
   102  
       
   103 OilFunctionImpl* __oil_function_impl_conv_f32_s16_3dnow, conv_f32_s16() {
       
   104 		return &_oil_function_impl_conv_f32_s16_3dnow, conv_f32_s16;
       
   105 }
       
   106 #endif
       
   107 
       
   108 #ifdef	__SYMBIAN32__
       
   109  
       
   110 OilFunctionImpl* __oil_function_impl_conv_s32_f32_3dnow, conv_s32_f32() {
       
   111 		return &_oil_function_impl_conv_s32_f32_3dnow, conv_s32_f32;
       
   112 }
       
   113 #endif
       
   114