annotate src/libsamplerate-0.1.9/tests/simple_test.c @ 134:41e769c91eca

Add Capnp and KJ builds for OSX
author Chris Cannam <cannam@all-day-breakfast.com>
date Tue, 25 Oct 2016 14:48:23 +0100
parents 4a7071416412
children
rev   line source
cannam@126 1 /*
cannam@126 2 ** Copyright (c) 2002-2016, Erik de Castro Lopo <erikd@mega-nerd.com>
cannam@126 3 ** All rights reserved.
cannam@126 4 **
cannam@126 5 ** This code is released under 2-clause BSD license. Please see the
cannam@126 6 ** file at : https://github.com/erikd/libsamplerate/blob/master/COPYING
cannam@126 7 */
cannam@126 8
cannam@126 9 #include <stdio.h>
cannam@126 10 #include <stdlib.h>
cannam@126 11 #include <string.h>
cannam@126 12 #include <math.h>
cannam@126 13
cannam@126 14 #include <samplerate.h>
cannam@126 15
cannam@126 16 #include "util.h"
cannam@126 17
cannam@126 18 #define BUFFER_LEN 2048
cannam@126 19
cannam@126 20 static void simple_test (int converter, double ratio) ;
cannam@126 21
cannam@126 22 int
cannam@126 23 main (void)
cannam@126 24 { static double src_ratios [] =
cannam@126 25 { 1.0001, 0.099, 0.1, 0.33333333, 0.789, 1.9, 3.1, 9.9
cannam@126 26 } ;
cannam@126 27
cannam@126 28 int k ;
cannam@126 29
cannam@126 30 puts ("") ;
cannam@126 31
cannam@126 32 puts (" Zero Order Hold interpolator :") ;
cannam@126 33 for (k = 0 ; k < ARRAY_LEN (src_ratios) ; k++)
cannam@126 34 simple_test (SRC_ZERO_ORDER_HOLD, src_ratios [k]) ;
cannam@126 35
cannam@126 36 puts (" Linear interpolator :") ;
cannam@126 37 for (k = 0 ; k < ARRAY_LEN (src_ratios) ; k++)
cannam@126 38 simple_test (SRC_LINEAR, src_ratios [k]) ;
cannam@126 39
cannam@126 40 puts (" Sinc interpolator :") ;
cannam@126 41 for (k = 0 ; k < ARRAY_LEN (src_ratios) ; k++)
cannam@126 42 simple_test (SRC_SINC_FASTEST, src_ratios [k]) ;
cannam@126 43
cannam@126 44 puts ("") ;
cannam@126 45
cannam@126 46 return 0 ;
cannam@126 47 } /* main */
cannam@126 48
cannam@126 49 static void
cannam@126 50 simple_test (int converter, double src_ratio)
cannam@126 51 { static float input [BUFFER_LEN], output [BUFFER_LEN] ;
cannam@126 52
cannam@126 53 SRC_DATA src_data ;
cannam@126 54
cannam@126 55 int input_len, output_len, error, terminate ;
cannam@126 56
cannam@126 57 printf ("\tsimple_test (SRC ratio = %6.4f) ........... ", src_ratio) ;
cannam@126 58 fflush (stdout) ;
cannam@126 59
cannam@126 60 /* Calculate maximun input and output lengths. */
cannam@126 61 if (src_ratio >= 1.0)
cannam@126 62 { output_len = BUFFER_LEN ;
cannam@126 63 input_len = (int) floor (BUFFER_LEN / src_ratio) ;
cannam@126 64 }
cannam@126 65 else
cannam@126 66 { input_len = BUFFER_LEN ;
cannam@126 67 output_len = (int) floor (BUFFER_LEN * src_ratio) ;
cannam@126 68 } ;
cannam@126 69
cannam@126 70 /* Reduce input_len by 10 so output is longer than necessary. */
cannam@126 71 input_len -= 10 ;
cannam@126 72
cannam@126 73 if (output_len > BUFFER_LEN)
cannam@126 74 { printf ("\n\nLine %d : output_len > BUFFER_LEN\n\n", __LINE__) ;
cannam@126 75 exit (1) ;
cannam@126 76 } ;
cannam@126 77
cannam@126 78 memset (&src_data, 0, sizeof (src_data)) ;
cannam@126 79
cannam@126 80 src_data.data_in = input ;
cannam@126 81 src_data.input_frames = input_len ;
cannam@126 82
cannam@126 83 src_data.src_ratio = src_ratio ;
cannam@126 84
cannam@126 85 src_data.data_out = output ;
cannam@126 86 src_data.output_frames = BUFFER_LEN ;
cannam@126 87
cannam@126 88 if ((error = src_simple (&src_data, converter, 1)))
cannam@126 89 { printf ("\n\nLine %d : %s\n\n", __LINE__, src_strerror (error)) ;
cannam@126 90 exit (1) ;
cannam@126 91 } ;
cannam@126 92
cannam@126 93 terminate = (int) ceil ((src_ratio >= 1.0) ? src_ratio : 1.0 / src_ratio) ;
cannam@126 94
cannam@126 95 if (fabs (src_data.output_frames_gen - src_ratio * input_len) > 2 * terminate)
cannam@126 96 { printf ("\n\nLine %d : bad output data length %ld should be %d.\n", __LINE__,
cannam@126 97 src_data.output_frames_gen, (int) floor (src_ratio * input_len)) ;
cannam@126 98 printf ("\tsrc_ratio : %.4f\n", src_ratio) ;
cannam@126 99 printf ("\tinput_len : %d\n\toutput_len : %d\n\n", input_len, output_len) ;
cannam@126 100 exit (1) ;
cannam@126 101 } ;
cannam@126 102
cannam@126 103 puts ("ok") ;
cannam@126 104
cannam@126 105 return ;
cannam@126 106 } /* simple_test */
cannam@126 107