Chris@0: /* Chris@0: ** Copyright (C) 2003-2011 Erik de Castro Lopo Chris@0: ** Chris@0: ** This program is free software; you can redistribute it and/or modify Chris@0: ** it under the terms of the GNU General Public License as published by Chris@0: ** the Free Software Foundation; either version 2 of the License, or Chris@0: ** (at your option) any later version. Chris@0: ** Chris@0: ** This program is distributed in the hope that it will be useful, Chris@0: ** but WITHOUT ANY WARRANTY; without even the implied warranty of Chris@0: ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Chris@0: ** GNU General Public License for more details. Chris@0: ** Chris@0: ** You should have received a copy of the GNU General Public License Chris@0: ** along with this program; if not, write to the Free Software Chris@0: ** Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA. Chris@0: */ Chris@0: Chris@0: #include Chris@0: #include Chris@0: #include Chris@0: Chris@0: #include Chris@0: Chris@0: #include "util.h" Chris@0: Chris@0: #define BUFFER_LEN 10000 Chris@0: Chris@0: static void float_to_short_test (void) ; Chris@0: static void short_to_float_test (void) ; Chris@0: Chris@0: static void float_to_int_test (void) ; Chris@0: static void int_to_float_test (void) ; Chris@0: Chris@0: int Chris@0: main (void) Chris@0: { Chris@0: puts ("") ; Chris@0: Chris@0: float_to_short_test () ; Chris@0: short_to_float_test () ; Chris@0: Chris@0: float_to_int_test () ; Chris@0: int_to_float_test () ; Chris@0: Chris@0: puts ("") ; Chris@0: Chris@0: return 0 ; Chris@0: } /* main */ Chris@0: Chris@0: /*===================================================================================== Chris@0: */ Chris@0: Chris@0: static void Chris@0: float_to_short_test (void) Chris@0: { Chris@0: static float fpos [] = Chris@0: { 0.95, 0.99, 1.0, 1.01, 1.1, 2.0, 11.1, 111.1, 2222.2, 33333.3 Chris@0: } ; Chris@0: static float fneg [] = Chris@0: { -0.95, -0.99, -1.0, -1.01, -1.1, -2.0, -11.1, -111.1, -2222.2, -33333.3 Chris@0: } ; Chris@0: Chris@0: static short out [MAX (ARRAY_LEN (fpos), ARRAY_LEN (fneg))] ; Chris@0: Chris@0: int k ; Chris@0: Chris@0: printf ("\tfloat_to_short_test ............................. ") ; Chris@0: Chris@0: src_float_to_short_array (fpos, out, ARRAY_LEN (fpos)) ; Chris@0: Chris@0: for (k = 0 ; k < ARRAY_LEN (fpos) ; k++) Chris@0: if (out [k] < 30000) Chris@0: { printf ("\n\n\tLine %d : out [%d] == %d\n", __LINE__, k, out [k]) ; Chris@0: exit (1) ; Chris@0: } ; Chris@0: Chris@0: src_float_to_short_array (fneg, out, ARRAY_LEN (fneg)) ; Chris@0: Chris@0: for (k = 0 ; k < ARRAY_LEN (fneg) ; k++) Chris@0: if (out [k] > -30000) Chris@0: { printf ("\n\n\tLine %d : out [%d] == %d\n", __LINE__, k, out [k]) ; Chris@0: exit (1) ; Chris@0: } ; Chris@0: Chris@0: puts ("ok") ; Chris@0: Chris@0: return ; Chris@0: } /* float_to_short_test */ Chris@0: Chris@0: /*------------------------------------------------------------------------------------- Chris@0: */ Chris@0: Chris@0: static void Chris@0: short_to_float_test (void) Chris@0: { Chris@0: static short input [BUFFER_LEN] ; Chris@0: static short output [BUFFER_LEN] ; Chris@0: static float temp [BUFFER_LEN] ; Chris@0: Chris@0: int k ; Chris@0: Chris@0: printf ("\tshort_to_float_test ............................. ") ; Chris@0: Chris@0: for (k = 0 ; k < ARRAY_LEN (input) ; k++) Chris@0: input [k] = (k * 0x8000) / ARRAY_LEN (input) ; Chris@0: Chris@0: src_short_to_float_array (input, temp, ARRAY_LEN (temp)) ; Chris@0: src_float_to_short_array (temp, output, ARRAY_LEN (output)) ; Chris@0: Chris@0: for (k = 0 ; k < ARRAY_LEN (input) ; k++) Chris@0: if (ABS (input [k] - output [k]) > 0) Chris@0: { printf ("\n\n\tLine %d : index %d %d -> %d\n", __LINE__, k, input [k], output [k]) ; Chris@0: exit (1) ; Chris@0: } ; Chris@0: Chris@0: puts ("ok") ; Chris@0: Chris@0: return ; Chris@0: } /* short_to_float_test */ Chris@0: Chris@0: /*===================================================================================== Chris@0: */ Chris@0: Chris@0: static void Chris@0: float_to_int_test (void) Chris@0: { Chris@0: static float fpos [] = Chris@0: { 0.95, 0.99, 1.0, 1.01, 1.1, 2.0, 11.1, 111.1, 2222.2, 33333.3 Chris@0: } ; Chris@0: static float fneg [] = Chris@0: { -0.95, -0.99, -1.0, -1.01, -1.1, -2.0, -11.1, -111.1, -2222.2, -33333.3 Chris@0: } ; Chris@0: Chris@0: static int out [MAX (ARRAY_LEN (fpos), ARRAY_LEN (fneg))] ; Chris@0: Chris@0: int k ; Chris@0: Chris@0: printf ("\tfloat_to_int_test ............................... ") ; Chris@0: Chris@0: src_float_to_int_array (fpos, out, ARRAY_LEN (fpos)) ; Chris@0: Chris@0: for (k = 0 ; k < ARRAY_LEN (fpos) ; k++) Chris@0: if (out [k] < 30000 * 0x10000) Chris@0: { printf ("\n\n\tLine %d : out [%d] == %d\n", __LINE__, k, out [k]) ; Chris@0: exit (1) ; Chris@0: } ; Chris@0: Chris@0: src_float_to_int_array (fneg, out, ARRAY_LEN (fneg)) ; Chris@0: Chris@0: for (k = 0 ; k < ARRAY_LEN (fneg) ; k++) Chris@0: if (out [k] > -30000 * 0x1000) Chris@0: { printf ("\n\n\tLine %d : out [%d] == %d\n", __LINE__, k, out [k]) ; Chris@0: exit (1) ; Chris@0: } ; Chris@0: Chris@0: puts ("ok") ; Chris@0: Chris@0: return ; Chris@0: } /* float_to_int_test */ Chris@0: Chris@0: /*------------------------------------------------------------------------------------- Chris@0: */ Chris@0: Chris@0: static void Chris@0: int_to_float_test (void) Chris@0: { Chris@0: static int input [BUFFER_LEN] ; Chris@0: static int output [BUFFER_LEN] ; Chris@0: static float temp [BUFFER_LEN] ; Chris@0: Chris@0: int k ; Chris@0: Chris@0: printf ("\tint_to_float_test ............................... ") ; Chris@0: Chris@0: for (k = 0 ; k < ARRAY_LEN (input) ; k++) Chris@0: input [k] = (k * 0x80000000) / ARRAY_LEN (input) ; Chris@0: Chris@0: src_int_to_float_array (input, temp, ARRAY_LEN (temp)) ; Chris@0: src_float_to_int_array (temp, output, ARRAY_LEN (output)) ; Chris@0: Chris@0: for (k = 0 ; k < ARRAY_LEN (input) ; k++) Chris@0: if (ABS (input [k] - output [k]) > 0) Chris@0: { printf ("\n\n\tLine %d : index %d %d -> %d\n", __LINE__, k, input [k], output [k]) ; Chris@0: exit (1) ; Chris@0: } ; Chris@0: Chris@0: puts ("ok") ; Chris@0: Chris@0: return ; Chris@0: } /* int_to_float_test */ Chris@0: