cannam@85: /* cannam@85: ** Copyright (C) 2007-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 "sfconfig.h" cannam@85: cannam@85: #include cannam@85: #include cannam@85: #include cannam@85: #include cannam@85: cannam@85: #include cannam@85: cannam@85: #include cannam@85: cannam@85: #include "utils.h" cannam@85: #include "dft_cmp.h" cannam@85: cannam@85: #define SAMPLE_RATE 16000 cannam@85: #define DATA_LENGTH (SAMPLE_RATE / 8) cannam@85: cannam@85: static float data_out [DATA_LENGTH] ; cannam@85: cannam@85: static inline float cannam@85: max_float (float a, float b) cannam@85: { return a > b ? a : b ; cannam@85: } /* max_float */ cannam@85: cannam@85: static void cannam@85: vorbis_test (void) cannam@85: { static float float_data [DFT_DATA_LENGTH] ; cannam@85: const char * filename = "vorbis_test.oga" ; cannam@85: SNDFILE * file ; cannam@85: SF_INFO sfinfo ; cannam@85: float max_abs = 0.0 ; cannam@85: unsigned k ; cannam@85: cannam@85: print_test_name ("vorbis_test", filename) ; cannam@85: cannam@85: /* Generate float data. */ cannam@85: gen_windowed_sine_float (float_data, ARRAY_LEN (float_data), 1.0) ; cannam@85: cannam@85: /* Set up output file type. */ cannam@85: memset (&sfinfo, 0, sizeof (sfinfo)) ; cannam@85: sfinfo.format = SF_FORMAT_OGG | SF_FORMAT_VORBIS ; cannam@85: sfinfo.channels = 1 ; cannam@85: sfinfo.samplerate = SAMPLE_RATE ; cannam@85: cannam@85: /* Write the output file. */ cannam@85: cannam@85: /* The Vorbis encoder has a bug on PowerPC and X86-64 with sample rates cannam@85: ** <= 22050. Increasing the sample rate to 32000 avoids triggering it. cannam@85: ** See https://trac.xiph.org/ticket/1229 cannam@85: */ cannam@85: if ((file = sf_open (filename, SFM_WRITE, &sfinfo)) == NULL) cannam@85: { const char * errstr ; cannam@85: cannam@85: errstr = sf_strerror (NULL) ; cannam@85: if (strstr (errstr, "Sample rate chosen is known to trigger a Vorbis") == NULL) cannam@85: { printf ("Line %d: sf_open (SFM_WRITE) failed : %s\n", __LINE__, errstr) ; cannam@85: dump_log_buffer (NULL) ; cannam@85: exit (1) ; cannam@85: } ; cannam@85: cannam@85: printf ("\n Sample rate -> 32kHz ") ; cannam@85: sfinfo.samplerate = 32000 ; cannam@85: cannam@85: file = test_open_file_or_die (filename, SFM_WRITE, &sfinfo, SF_TRUE, __LINE__) ; cannam@85: } ; cannam@85: cannam@85: test_write_float_or_die (file, 0, float_data, ARRAY_LEN (float_data), __LINE__) ; cannam@85: sf_close (file) ; cannam@85: cannam@85: memset (float_data, 0, sizeof (float_data)) ; cannam@85: cannam@85: /* Read the file back in again. */ cannam@85: memset (&sfinfo, 0, sizeof (sfinfo)) ; cannam@85: file = test_open_file_or_die (filename, SFM_READ, &sfinfo, SF_FALSE, __LINE__) ; cannam@85: test_read_float_or_die (file, 0, float_data, ARRAY_LEN (float_data), __LINE__) ; cannam@85: sf_close (file) ; cannam@85: cannam@85: for (k = 0 ; k < ARRAY_LEN (float_data) ; k ++) cannam@85: max_abs = max_float (max_abs, fabs (float_data [k])) ; cannam@85: cannam@85: if (max_abs > 1.021) cannam@85: { printf ("\n\n Error : max_abs %f should be < 1.021.\n\n", max_abs) ; cannam@85: exit (1) ; cannam@85: } ; cannam@85: cannam@85: puts ("ok") ; cannam@85: unlink (filename) ; cannam@85: } /* vorbis_test */ cannam@85: cannam@85: static void cannam@85: vorbis_quality_test (void) cannam@85: { /* cannam@85: ** Encode two files, one at quality 0.3 and one at quality 0.5 and then cannam@85: ** make sure that the quality 0.3 files is the smaller of the two. cannam@85: */ cannam@85: const char * q3_fname = "q3_vorbis.oga" ; cannam@85: const char * q5_fname = "q5_vorbis.oga" ; cannam@85: cannam@85: SNDFILE *q3_file, *q5_file ; cannam@85: SF_INFO sfinfo ; cannam@85: int q3_size, q5_size ; cannam@85: double quality ; cannam@85: int k ; cannam@85: cannam@85: print_test_name (__func__, "q[35]_vorbis.oga") ; cannam@85: cannam@85: memset (&sfinfo, 0, sizeof (sfinfo)) ; cannam@85: cannam@85: /* Set up output file type. */ cannam@85: sfinfo.format = SF_FORMAT_OGG | SF_FORMAT_VORBIS ; cannam@85: sfinfo.channels = 1 ; cannam@85: sfinfo.samplerate = SAMPLE_RATE ; cannam@85: cannam@85: /* Write the output file. */ cannam@85: q3_file = test_open_file_or_die (q3_fname, SFM_WRITE, &sfinfo, SF_FALSE, __LINE__) ; cannam@85: q5_file = test_open_file_or_die (q5_fname, SFM_WRITE, &sfinfo, SF_FALSE, __LINE__) ; cannam@85: cannam@85: quality = 0.3 ; cannam@85: sf_command (q3_file, SFC_SET_VBR_ENCODING_QUALITY, &quality, sizeof (quality)) ; cannam@85: quality = 0.5 ; cannam@85: sf_command (q5_file, SFC_SET_VBR_ENCODING_QUALITY, &quality, sizeof (quality)) ; cannam@85: cannam@85: for (k = 0 ; k < 5 ; k++) cannam@85: { gen_lowpass_noise_float (data_out, ARRAY_LEN (data_out)) ; cannam@85: test_write_float_or_die (q3_file, 0, data_out, ARRAY_LEN (data_out), __LINE__) ; cannam@85: test_write_float_or_die (q5_file, 0, data_out, ARRAY_LEN (data_out), __LINE__) ; cannam@85: } ; cannam@85: cannam@85: sf_close (q3_file) ; cannam@85: sf_close (q5_file) ; cannam@85: cannam@85: q3_size = file_length (q3_fname) ; cannam@85: q5_size = file_length (q5_fname) ; cannam@85: cannam@85: if (q3_size >= q5_size) cannam@85: { printf ("\n\nLine %d : q3 size (%d) >= q5 size (%d)\n\n", __LINE__, q3_size, q5_size) ; cannam@85: exit (1) ; cannam@85: } ; cannam@85: cannam@85: puts ("ok") ; cannam@85: unlink (q3_fname) ; cannam@85: unlink (q5_fname) ; cannam@85: } /* vorbis_quality_test */ cannam@85: cannam@85: cannam@85: cannam@85: int cannam@85: main (void) cannam@85: { cannam@85: if (HAVE_EXTERNAL_LIBS) cannam@85: { vorbis_test () ; cannam@85: vorbis_quality_test () ; cannam@85: } cannam@85: else cannam@85: puts (" No Ogg/Vorbis tests because Ogg/Vorbis support was not compiled in.") ; cannam@85: cannam@85: return 0 ; cannam@85: } /* main */