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