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