cannam@125: /* cannam@125: ** Copyright (C) 2002-2014 Erik de Castro Lopo cannam@125: ** cannam@125: ** This program is free software; you can redistribute it and/or modify cannam@125: ** it under the terms of the GNU General Public License as published by cannam@125: ** the Free Software Foundation; either version 2 of the License, or cannam@125: ** (at your option) any later version. cannam@125: ** cannam@125: ** This program is distributed in the hope that it will be useful, cannam@125: ** but WITHOUT ANY WARRANTY; without even the implied warranty of cannam@125: ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the cannam@125: ** GNU General Public License for more details. cannam@125: ** cannam@125: ** You should have received a copy of the GNU General Public License cannam@125: ** along with this program; if not, write to the Free Software cannam@125: ** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. cannam@125: */ cannam@125: cannam@125: #include "sfconfig.h" cannam@125: cannam@125: #include cannam@125: #include cannam@125: #include cannam@125: #include cannam@125: cannam@125: #if HAVE_UNISTD_H cannam@125: #include cannam@125: #endif cannam@125: cannam@125: #include cannam@125: cannam@125: #include "utils.h" cannam@125: cannam@125: #define BUFFER_SIZE (10000) cannam@125: cannam@125: #ifndef M_PI cannam@125: #define M_PI 3.14159265358979323846264338 cannam@125: #endif cannam@125: cannam@125: static void dwvw_test (const char *filename, int format, int bit_width) ; cannam@125: cannam@125: int cannam@125: main (void) cannam@125: { cannam@125: dwvw_test ("dwvw12.raw", SF_FORMAT_RAW | SF_FORMAT_DWVW_12, 12) ; cannam@125: dwvw_test ("dwvw16.raw", SF_FORMAT_RAW | SF_FORMAT_DWVW_16, 16) ; cannam@125: dwvw_test ("dwvw24.raw", SF_FORMAT_RAW | SF_FORMAT_DWVW_24, 24) ; cannam@125: cannam@125: return 0 ; cannam@125: } /* main */ cannam@125: cannam@125: static void cannam@125: dwvw_test (const char *filename, int format, int bit_width) cannam@125: { static int write_buf [BUFFER_SIZE] ; cannam@125: static int read_buf [BUFFER_SIZE] ; cannam@125: cannam@125: SNDFILE *file ; cannam@125: SF_INFO sfinfo ; cannam@125: double value ; cannam@125: int k, bit_mask ; cannam@125: cannam@125: srand (123456) ; cannam@125: cannam@125: /* Only want to grab the top bit_width bits. */ cannam@125: bit_mask = arith_shift_left (-1, 32 - bit_width) ; cannam@125: cannam@125: print_test_name ("dwvw_test", filename) ; cannam@125: cannam@125: sf_info_setup (&sfinfo, format, 44100, 1) ; cannam@125: cannam@125: file = test_open_file_or_die (filename, SFM_WRITE, &sfinfo, SF_TRUE, __LINE__) ; cannam@125: cannam@125: /* Generate random.frames. */ cannam@125: for (k = 0 ; k < BUFFER_SIZE / 2 ; k++) cannam@125: { value = 0x7FFFFFFF * sin (123.0 / sfinfo.samplerate * 2 * k * M_PI) ; cannam@125: write_buf [k] = bit_mask & lrint (value) ; cannam@125: } ; cannam@125: cannam@125: for ( ; k < BUFFER_SIZE ; k++) cannam@125: write_buf [k] = bit_mask & (arith_shift_left (rand (), 11) ^ (rand () >> 11)) ; cannam@125: cannam@125: sf_write_int (file, write_buf, BUFFER_SIZE) ; cannam@125: sf_close (file) ; cannam@125: cannam@125: file = test_open_file_or_die (filename, SFM_READ, &sfinfo, SF_TRUE, __LINE__) ; cannam@125: cannam@125: if ((k = sf_read_int (file, read_buf, BUFFER_SIZE)) != BUFFER_SIZE) cannam@125: { printf ("Error (line %d) : Only read %d/%d.frames.\n", __LINE__, k, BUFFER_SIZE) ; cannam@125: exit (1) ; cannam@125: } cannam@125: cannam@125: for (k = 0 ; k < BUFFER_SIZE ; k++) cannam@125: { if (read_buf [k] != write_buf [k]) cannam@125: { printf ("Error (line %d) : %d != %d at position %d/%d\n", __LINE__, cannam@125: write_buf [k] >> (32 - bit_width), read_buf [k] >> (32 - bit_width), cannam@125: k, BUFFER_SIZE) ; cannam@125: oct_save_int (write_buf, read_buf, BUFFER_SIZE) ; cannam@125: exit (1) ; cannam@125: } ; cannam@125: } ; cannam@125: cannam@125: sf_close (file) ; cannam@125: cannam@125: unlink (filename) ; cannam@125: printf ("ok\n") ; cannam@125: cannam@125: return ; cannam@125: } /* dwvw_test */ cannam@125: