genericopenlibs/liboil/src/dct/fdct8x8s_s16.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 
       
    33 #include <liboil/liboilfunction.h>
       
    34 #include <liboil/liboilfuncs.h>
       
    35 #include "liboil/dct/dct.h"
       
    36 
       
    37 
       
    38 
       
    39 #define C0_9808 0.980785280
       
    40 #define C0_9239 0.923879532
       
    41 #define C0_8315 0.831469612
       
    42 #define C0_7071 0.707106781
       
    43 #define C0_5556 0.555570233
       
    44 #define C0_3827 0.382683432
       
    45 #define C0_1951 0.195090322
       
    46 
       
    47 /**
       
    48  * oil_fdct8x8s_s16:
       
    49  * @d_8x8:
       
    50  * @ds:
       
    51  * @s_8x8:
       
    52  * @ss:
       
    53  *
       
    54  * Performs a 2-D Forward Discrete Cosine Transform on @s_8x8 and places
       
    55  * the result in @d_8x8.
       
    56  *
       
    57  * This function uses an alternate scaling used by RTjpeg.
       
    58  */
       
    59 OIL_DEFINE_CLASS(fdct8x8s_s16,
       
    60     "int16_t *d_8x8, int ds, int16_t *s_8x8, int ss");
       
    61 
       
    62 #if defined(oil_fdct8x8_f64) && defined(oil_conv8x8_s16_f64)
       
    63 static void
       
    64 fdct8x8s_s16_ref (int16_t *dest, int dstr, const int16_t *src, int sstr)
       
    65 {
       
    66 	double s[64], d[64];
       
    67 	double scale[8] = {
       
    68 		4*C0_7071,
       
    69 		4*C0_9808,
       
    70 		4*C0_9239,
       
    71 		4*C0_8315,
       
    72 		4*C0_7071,
       
    73 		4*C0_5556,
       
    74 		4*C0_3827,
       
    75 		4*C0_1951,
       
    76 	};
       
    77 	int i,j;
       
    78 
       
    79 	for(i=0;i<8;i++){
       
    80 		for(j=0;j<8;j++){
       
    81 			s[8*i+j] = OIL_GET (src,sstr*i+j*sizeof(int16_t), int16_t);
       
    82 		}
       
    83 	}
       
    84 
       
    85 	oil_fdct8x8_f64(d,8*sizeof(double),s,8*sizeof(double));
       
    86 
       
    87 	for(i=0;i<8;i++){
       
    88 		for(j=0;j<8;j++){
       
    89 			d[8*i+j] *= scale[i] * scale[j];
       
    90 		}
       
    91 	}
       
    92 
       
    93 	oil_conv8x8_s16_f64(dest,dstr,d,8*sizeof(double));
       
    94 }
       
    95 
       
    96 OIL_DEFINE_IMPL_REF (fdct8x8s_s16_ref, fdct8x8s_s16);
       
    97 #endif
       
    98 
       
    99 
       
   100 
       
   101 
       
   102 #ifdef	__SYMBIAN32__
       
   103  
       
   104 OilFunctionClass* __oil_function_class_fdct8x8s_s16() {
       
   105 		return &_oil_function_class_fdct8x8s_s16;
       
   106 }
       
   107 #endif
       
   108 
       
   109 
       
   110 
       
   111 #ifdef	__SYMBIAN32__
       
   112  
       
   113 OilFunctionImpl* __oil_function_impl_fdct8x8s_s16_ref() {
       
   114 		return &_oil_function_impl_fdct8x8s_s16_ref;
       
   115 }
       
   116 #endif
       
   117 
       
   118 
       
   119 
       
   120 #ifdef	__SYMBIAN32__
       
   121  
       
   122 EXPORT_C void** _oil_function_class_ptr_fdct8x8s_s16 ()	{
       
   123 	oil_function_class_ptr_fdct8x8s_s16 = __oil_function_class_fdct8x8s_s16();
       
   124 	return &oil_function_class_ptr_fdct8x8s_s16->func;
       
   125 	}
       
   126 #endif
       
   127