diff -r 000000000000 -r bde4ae8d615e os/ossrv/genericopenlibs/liboil/src/simdpack/scalarmult.c --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/os/ossrv/genericopenlibs/liboil/src/simdpack/scalarmult.c Fri Jun 15 03:10:57 2012 +0200 @@ -0,0 +1,413 @@ +/* + * LIBOIL - Library of Optimized Inner Loops + * Copyright (c) 2003,2004 David A. Schleef + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED + * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, + * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES + * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR + * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, + * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING + * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE + * POSSIBILITY OF SUCH DAMAGE. + */ +//Portions Copyright (c) 2008-2009 Nokia Corporation and/or its subsidiary(-ies). All rights reserved. + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include +#include "liboil/simdpack/simdpack.h" + +#ifdef __SYMBIAN32__ +#ifdef __WINSCW__ +#pragma warn_emptydecl off +#endif//__WINSCW__ +#endif//__SYMBIAN32__ + +#define SCALARMULT_DEFINE_UNROLL2(type) \ +static void scalarmult_ ## type ## _unroll2( \ + oil_type_ ## type *dest, int dstr, \ + oil_type_ ## type *src, int sstr, \ + oil_type_ ## type *val, int n) \ +{ \ + if(n&1) { \ + *dest = *src * *val; \ + OIL_INCREMENT(dest, dstr); \ + OIL_INCREMENT(src, sstr); \ + } \ + n /= 2; \ + while(n>0){ \ + *dest = *src * *val; \ + OIL_INCREMENT(dest,dstr); \ + OIL_INCREMENT(src,sstr); \ + *dest = *src * *val; \ + OIL_INCREMENT(dest,dstr); \ + OIL_INCREMENT(src,sstr); \ + n--; \ + } \ +} \ +OIL_DEFINE_IMPL (scalarmult_ ## type ## _unroll2, scalarmult_ ## type); + +SCALARMULT_DEFINE_UNROLL2 (s8); +SCALARMULT_DEFINE_UNROLL2 (u8); +SCALARMULT_DEFINE_UNROLL2 (s16); +SCALARMULT_DEFINE_UNROLL2 (u16); +SCALARMULT_DEFINE_UNROLL2 (s32); +SCALARMULT_DEFINE_UNROLL2 (u32); +SCALARMULT_DEFINE_UNROLL2 (f32); +SCALARMULT_DEFINE_UNROLL2 (f64); + +#define SCALARMULT_DEFINE_UNROLL2x(type) \ +static void scalarmult_ ## type ## _unroll2x( \ + oil_type_ ## type *dest, int dstr, \ + oil_type_ ## type *src, int sstr, \ + oil_type_ ## type *val, int n) \ +{ \ + oil_type_ ## type *dest2; \ + oil_type_ ## type *src2; \ + int i; \ + if(n&1) { \ + *dest = *src * *val; \ + OIL_INCREMENT(dest, dstr); \ + OIL_INCREMENT(src, sstr); \ + } \ + src2 = OIL_OFFSET(src, sstr); \ + dest2 = OIL_OFFSET(dest, dstr); \ + n /= 2; \ + sstr *= 2; \ + dstr *= 2; \ + for(i=0;i0){ \ + *dest = *src * *val; \ + OIL_INCREMENT(dest,dstr); \ + OIL_INCREMENT(src,sstr); \ + *dest = *src * *val; \ + OIL_INCREMENT(dest,dstr); \ + OIL_INCREMENT(src,sstr); \ + *dest = *src * *val; \ + OIL_INCREMENT(dest,dstr); \ + OIL_INCREMENT(src,sstr); \ + *dest = *src * *val; \ + OIL_INCREMENT(dest,dstr); \ + OIL_INCREMENT(src,sstr); \ + n--; \ + } \ +} \ +OIL_DEFINE_IMPL (scalarmult_ ## type ## _unroll4, scalarmult_ ## type); + +SCALARMULT_DEFINE_UNROLL4 (s8); +SCALARMULT_DEFINE_UNROLL4 (u8); +SCALARMULT_DEFINE_UNROLL4 (s16); +SCALARMULT_DEFINE_UNROLL4 (u16); +SCALARMULT_DEFINE_UNROLL4 (s32); +SCALARMULT_DEFINE_UNROLL4 (u32); +SCALARMULT_DEFINE_UNROLL4 (f32); +SCALARMULT_DEFINE_UNROLL4 (f64); + + + + + +#define SCALARMULT_DEFINE_X(type) \ +static void scalarmult_ ## type ## _x( \ + oil_type_ ## type *dest, int dstr, \ + oil_type_ ## type *src, int sstr, \ + oil_type_ ## type *val, int n) \ +{ \ + int i; \ + for(i=0;i+1