annotate src/portaudio_20140130/test/patest_latency.c @ 167:bd3cc4d1df30

Add FFTW 3.3.8 source, and a Linux build
author Chris Cannam <cannam@all-day-breakfast.com>
date Tue, 19 Nov 2019 14:52:55 +0000
parents e3d5853d5918
children
rev   line source
cannam@124 1 /** @file
cannam@124 2 @ingroup test_src
cannam@124 3 @brief Hear the latency caused by big buffers.
cannam@124 4 Play a sine wave and change frequency based on letter input.
cannam@124 5 @author Phil Burk <philburk@softsynth.com>, and Darren Gibbs
cannam@124 6 */
cannam@124 7 /*
cannam@124 8 * $Id: patest_latency.c 1368 2008-03-01 00:38:27Z rossb $
cannam@124 9 *
cannam@124 10 * This program uses the PortAudio Portable Audio Library.
cannam@124 11 * For more information see: http://www.portaudio.com
cannam@124 12 * Copyright (c) 1999-2000 Ross Bencina and Phil Burk
cannam@124 13 *
cannam@124 14 * Permission is hereby granted, free of charge, to any person obtaining
cannam@124 15 * a copy of this software and associated documentation files
cannam@124 16 * (the "Software"), to deal in the Software without restriction,
cannam@124 17 * including without limitation the rights to use, copy, modify, merge,
cannam@124 18 * publish, distribute, sublicense, and/or sell copies of the Software,
cannam@124 19 * and to permit persons to whom the Software is furnished to do so,
cannam@124 20 * subject to the following conditions:
cannam@124 21 *
cannam@124 22 * The above copyright notice and this permission notice shall be
cannam@124 23 * included in all copies or substantial portions of the Software.
cannam@124 24 *
cannam@124 25 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
cannam@124 26 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
cannam@124 27 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
cannam@124 28 * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR
cannam@124 29 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF
cannam@124 30 * CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
cannam@124 31 * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
cannam@124 32 */
cannam@124 33
cannam@124 34 /*
cannam@124 35 * The text above constitutes the entire PortAudio license; however,
cannam@124 36 * the PortAudio community also makes the following non-binding requests:
cannam@124 37 *
cannam@124 38 * Any person wishing to distribute modifications to the Software is
cannam@124 39 * requested to send the modifications to the original developer so that
cannam@124 40 * they can be incorporated into the canonical version. It is also
cannam@124 41 * requested that these non-binding requests be included along with the
cannam@124 42 * license above.
cannam@124 43 */
cannam@124 44
cannam@124 45 #include <stdio.h>
cannam@124 46 #include <math.h>
cannam@124 47 #include "portaudio.h"
cannam@124 48
cannam@124 49 #define OUTPUT_DEVICE (Pa_GetDefaultOutputDevice())
cannam@124 50 #define SAMPLE_RATE (44100)
cannam@124 51 #define FRAMES_PER_BUFFER (64)
cannam@124 52
cannam@124 53 #define MIN_FREQ (100.0f)
cannam@124 54 #define CalcPhaseIncrement(freq) ((freq)/SAMPLE_RATE)
cannam@124 55 #ifndef M_PI
cannam@124 56 #define M_PI (3.14159265)
cannam@124 57 #endif
cannam@124 58 #define TABLE_SIZE (400)
cannam@124 59
cannam@124 60 typedef struct
cannam@124 61 {
cannam@124 62 float sine[TABLE_SIZE + 1]; /* add one for guard point for interpolation */
cannam@124 63 float phase_increment;
cannam@124 64 float left_phase;
cannam@124 65 float right_phase;
cannam@124 66 }
cannam@124 67 paTestData;
cannam@124 68
cannam@124 69 float LookupSine( paTestData *data, float phase );
cannam@124 70 /* Convert phase between and 1.0 to sine value
cannam@124 71 * using linear interpolation.
cannam@124 72 */
cannam@124 73 float LookupSine( paTestData *data, float phase )
cannam@124 74 {
cannam@124 75 float fIndex = phase*TABLE_SIZE;
cannam@124 76 int index = (int) fIndex;
cannam@124 77 float fract = fIndex - index;
cannam@124 78 float lo = data->sine[index];
cannam@124 79 float hi = data->sine[index+1];
cannam@124 80 float val = lo + fract*(hi-lo);
cannam@124 81 return val;
cannam@124 82 }
cannam@124 83
cannam@124 84 /* This routine will be called by the PortAudio engine when audio is needed.
cannam@124 85 ** It may called at interrupt level on some machines so don't do anything
cannam@124 86 ** that could mess up the system like calling malloc() or free().
cannam@124 87 */
cannam@124 88 static int patestCallback( const void *inputBuffer, void *outputBuffer,
cannam@124 89 unsigned long framesPerBuffer,
cannam@124 90 const PaStreamCallbackTimeInfo* timeInfo,
cannam@124 91 PaStreamCallbackFlags statusFlags,
cannam@124 92 void *userData )
cannam@124 93 {
cannam@124 94 paTestData *data = (paTestData*)userData;
cannam@124 95 float *out = (float*)outputBuffer;
cannam@124 96 int i;
cannam@124 97
cannam@124 98 (void) inputBuffer; /* Prevent unused variable warning. */
cannam@124 99
cannam@124 100 for( i=0; i<framesPerBuffer; i++ )
cannam@124 101 {
cannam@124 102 *out++ = LookupSine(data, data->left_phase); /* left */
cannam@124 103 *out++ = LookupSine(data, data->right_phase); /* right */
cannam@124 104 data->left_phase += data->phase_increment;
cannam@124 105 if( data->left_phase >= 1.0f ) data->left_phase -= 1.0f;
cannam@124 106 data->right_phase += (data->phase_increment * 1.5f); /* fifth above */
cannam@124 107 if( data->right_phase >= 1.0f ) data->right_phase -= 1.0f;
cannam@124 108 }
cannam@124 109 return 0;
cannam@124 110 }
cannam@124 111
cannam@124 112 /*******************************************************************/
cannam@124 113 int main(void);
cannam@124 114 int main(void)
cannam@124 115 {
cannam@124 116 PaStream *stream;
cannam@124 117 PaStreamParameters outputParameters;
cannam@124 118 PaError err;
cannam@124 119 paTestData data;
cannam@124 120 int i;
cannam@124 121 int done = 0;
cannam@124 122
cannam@124 123 printf("PortAudio Test: enter letter then hit ENTER.\n" );
cannam@124 124 /* initialise sinusoidal wavetable */
cannam@124 125 for( i=0; i<TABLE_SIZE; i++ )
cannam@124 126 {
cannam@124 127 data.sine[i] = 0.90f * (float) sin( ((double)i/(double)TABLE_SIZE) * M_PI * 2. );
cannam@124 128 }
cannam@124 129 data.sine[TABLE_SIZE] = data.sine[0]; /* set guard point. */
cannam@124 130 data.left_phase = data.right_phase = 0.0;
cannam@124 131 data.phase_increment = CalcPhaseIncrement(MIN_FREQ);
cannam@124 132
cannam@124 133 err = Pa_Initialize();
cannam@124 134 if( err != paNoError ) goto error;
cannam@124 135 printf("PortAudio Test: output device = %d\n", OUTPUT_DEVICE );
cannam@124 136
cannam@124 137 outputParameters.device = OUTPUT_DEVICE;
cannam@124 138 if (outputParameters.device == paNoDevice) {
cannam@124 139 fprintf(stderr,"Error: No default output device.\n");
cannam@124 140 goto error;
cannam@124 141 }
cannam@124 142 outputParameters.channelCount = 2; /* stereo output */
cannam@124 143 outputParameters.sampleFormat = paFloat32; /* 32 bit floating point output */
cannam@124 144 outputParameters.suggestedLatency = Pa_GetDeviceInfo( outputParameters.device )->defaultLowOutputLatency;
cannam@124 145 outputParameters.hostApiSpecificStreamInfo = NULL;
cannam@124 146
cannam@124 147 printf("Requested output latency = %.4f seconds.\n", outputParameters.suggestedLatency );
cannam@124 148 printf("%d frames per buffer.\n.", FRAMES_PER_BUFFER );
cannam@124 149
cannam@124 150 err = Pa_OpenStream(
cannam@124 151 &stream,
cannam@124 152 NULL, /* no input */
cannam@124 153 &outputParameters,
cannam@124 154 SAMPLE_RATE,
cannam@124 155 FRAMES_PER_BUFFER,
cannam@124 156 paClipOff|paDitherOff, /* we won't output out of range samples so don't bother clipping them */
cannam@124 157 patestCallback,
cannam@124 158 &data );
cannam@124 159 if( err != paNoError ) goto error;
cannam@124 160
cannam@124 161 err = Pa_StartStream( stream );
cannam@124 162 if( err != paNoError ) goto error;
cannam@124 163 printf("Play ASCII keyboard. Hit 'q' to stop. (Use RETURN key on Mac)\n");
cannam@124 164 fflush(stdout);
cannam@124 165 while ( !done )
cannam@124 166 {
cannam@124 167 float freq;
cannam@124 168 int index;
cannam@124 169 char c;
cannam@124 170 do
cannam@124 171 {
cannam@124 172 c = getchar();
cannam@124 173 }
cannam@124 174 while( c < ' '); /* Strip white space and control chars. */
cannam@124 175
cannam@124 176 if( c == 'q' ) done = 1;
cannam@124 177 index = c % 26;
cannam@124 178 freq = MIN_FREQ + (index * 40.0);
cannam@124 179 data.phase_increment = CalcPhaseIncrement(freq);
cannam@124 180 }
cannam@124 181 printf("Call Pa_StopStream()\n");
cannam@124 182 err = Pa_StopStream( stream );
cannam@124 183 if( err != paNoError ) goto error;
cannam@124 184 Pa_Terminate();
cannam@124 185 printf("Test finished.\n");
cannam@124 186 return err;
cannam@124 187 error:
cannam@124 188 Pa_Terminate();
cannam@124 189 fprintf( stderr, "An error occured while using the portaudio stream\n" );
cannam@124 190 fprintf( stderr, "Error number: %d\n", err );
cannam@124 191 fprintf( stderr, "Error message: %s\n", Pa_GetErrorText( err ) );
cannam@124 192 return err;
cannam@124 193 }