annotate src/portaudio_20140130/test/patest_wire.c @ 39:7ddb4fc30dac

Current stable PortAudio source
author Chris Cannam
date Tue, 18 Oct 2016 13:11:05 +0100
parents
children
rev   line source
Chris@39 1 /** @file patest_wire.c
Chris@39 2 @ingroup test_src
Chris@39 3 @brief Pass input directly to output.
Chris@39 4
Chris@39 5 Note that some HW devices, for example many ISA audio cards
Chris@39 6 on PCs, do NOT support full duplex! For a PC, you normally need
Chris@39 7 a PCI based audio card such as the SBLive.
Chris@39 8
Chris@39 9 @author Phil Burk http://www.softsynth.com
Chris@39 10
Chris@39 11 While adapting to V19-API, I excluded configs with framesPerCallback=0
Chris@39 12 because of an assert in file pa_common/pa_process.c. Pieter, Oct 9, 2003.
Chris@39 13
Chris@39 14 */
Chris@39 15 /*
Chris@39 16 * $Id: patest_wire.c 1843 2012-06-22 21:58:10Z philburk $
Chris@39 17 *
Chris@39 18 * This program uses the PortAudio Portable Audio Library.
Chris@39 19 * For more information see: http://www.portaudio.com
Chris@39 20 * Copyright (c) 1999-2000 Ross Bencina and Phil Burk
Chris@39 21 *
Chris@39 22 * Permission is hereby granted, free of charge, to any person obtaining
Chris@39 23 * a copy of this software and associated documentation files
Chris@39 24 * (the "Software"), to deal in the Software without restriction,
Chris@39 25 * including without limitation the rights to use, copy, modify, merge,
Chris@39 26 * publish, distribute, sublicense, and/or sell copies of the Software,
Chris@39 27 * and to permit persons to whom the Software is furnished to do so,
Chris@39 28 * subject to the following conditions:
Chris@39 29 *
Chris@39 30 * The above copyright notice and this permission notice shall be
Chris@39 31 * included in all copies or substantial portions of the Software.
Chris@39 32 *
Chris@39 33 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
Chris@39 34 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
Chris@39 35 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
Chris@39 36 * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR
Chris@39 37 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF
Chris@39 38 * CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
Chris@39 39 * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
Chris@39 40 */
Chris@39 41
Chris@39 42 /*
Chris@39 43 * The text above constitutes the entire PortAudio license; however,
Chris@39 44 * the PortAudio community also makes the following non-binding requests:
Chris@39 45 *
Chris@39 46 * Any person wishing to distribute modifications to the Software is
Chris@39 47 * requested to send the modifications to the original developer so that
Chris@39 48 * they can be incorporated into the canonical version. It is also
Chris@39 49 * requested that these non-binding requests be included along with the
Chris@39 50 * license above.
Chris@39 51 */
Chris@39 52
Chris@39 53 #include <stdio.h>
Chris@39 54 #include <math.h>
Chris@39 55 #include "portaudio.h"
Chris@39 56
Chris@39 57 #define SAMPLE_RATE (44100)
Chris@39 58
Chris@39 59 typedef struct WireConfig_s
Chris@39 60 {
Chris@39 61 int isInputInterleaved;
Chris@39 62 int isOutputInterleaved;
Chris@39 63 int numInputChannels;
Chris@39 64 int numOutputChannels;
Chris@39 65 int framesPerCallback;
Chris@39 66 /* count status flags */
Chris@39 67 int numInputUnderflows;
Chris@39 68 int numInputOverflows;
Chris@39 69 int numOutputUnderflows;
Chris@39 70 int numOutputOverflows;
Chris@39 71 int numPrimingOutputs;
Chris@39 72 int numCallbacks;
Chris@39 73 } WireConfig_t;
Chris@39 74
Chris@39 75 #define USE_FLOAT_INPUT (1)
Chris@39 76 #define USE_FLOAT_OUTPUT (1)
Chris@39 77
Chris@39 78 /* Latencies set to defaults. */
Chris@39 79
Chris@39 80 #if USE_FLOAT_INPUT
Chris@39 81 #define INPUT_FORMAT paFloat32
Chris@39 82 typedef float INPUT_SAMPLE;
Chris@39 83 #else
Chris@39 84 #define INPUT_FORMAT paInt16
Chris@39 85 typedef short INPUT_SAMPLE;
Chris@39 86 #endif
Chris@39 87
Chris@39 88 #if USE_FLOAT_OUTPUT
Chris@39 89 #define OUTPUT_FORMAT paFloat32
Chris@39 90 typedef float OUTPUT_SAMPLE;
Chris@39 91 #else
Chris@39 92 #define OUTPUT_FORMAT paInt16
Chris@39 93 typedef short OUTPUT_SAMPLE;
Chris@39 94 #endif
Chris@39 95
Chris@39 96 double gInOutScaler = 1.0;
Chris@39 97 #define CONVERT_IN_TO_OUT(in) ((OUTPUT_SAMPLE) ((in) * gInOutScaler))
Chris@39 98
Chris@39 99 #define INPUT_DEVICE (Pa_GetDefaultInputDevice())
Chris@39 100 #define OUTPUT_DEVICE (Pa_GetDefaultOutputDevice())
Chris@39 101
Chris@39 102 static PaError TestConfiguration( WireConfig_t *config );
Chris@39 103
Chris@39 104 static int wireCallback( const void *inputBuffer, void *outputBuffer,
Chris@39 105 unsigned long framesPerBuffer,
Chris@39 106 const PaStreamCallbackTimeInfo* timeInfo,
Chris@39 107 PaStreamCallbackFlags statusFlags,
Chris@39 108 void *userData );
Chris@39 109
Chris@39 110 /* This routine will be called by the PortAudio engine when audio is needed.
Chris@39 111 ** It may be called at interrupt level on some machines so don't do anything
Chris@39 112 ** that could mess up the system like calling malloc() or free().
Chris@39 113 */
Chris@39 114
Chris@39 115 static int wireCallback( const void *inputBuffer, void *outputBuffer,
Chris@39 116 unsigned long framesPerBuffer,
Chris@39 117 const PaStreamCallbackTimeInfo* timeInfo,
Chris@39 118 PaStreamCallbackFlags statusFlags,
Chris@39 119 void *userData )
Chris@39 120 {
Chris@39 121 INPUT_SAMPLE *in;
Chris@39 122 OUTPUT_SAMPLE *out;
Chris@39 123 int inStride;
Chris@39 124 int outStride;
Chris@39 125 int inDone = 0;
Chris@39 126 int outDone = 0;
Chris@39 127 WireConfig_t *config = (WireConfig_t *) userData;
Chris@39 128 unsigned int i;
Chris@39 129 int inChannel, outChannel;
Chris@39 130
Chris@39 131 /* This may get called with NULL inputBuffer during initial setup. */
Chris@39 132 if( inputBuffer == NULL) return 0;
Chris@39 133
Chris@39 134 /* Count flags */
Chris@39 135 if( (statusFlags & paInputUnderflow) != 0 ) config->numInputUnderflows += 1;
Chris@39 136 if( (statusFlags & paInputOverflow) != 0 ) config->numInputOverflows += 1;
Chris@39 137 if( (statusFlags & paOutputUnderflow) != 0 ) config->numOutputUnderflows += 1;
Chris@39 138 if( (statusFlags & paOutputOverflow) != 0 ) config->numOutputOverflows += 1;
Chris@39 139 if( (statusFlags & paPrimingOutput) != 0 ) config->numPrimingOutputs += 1;
Chris@39 140 config->numCallbacks += 1;
Chris@39 141
Chris@39 142 inChannel=0, outChannel=0;
Chris@39 143 while( !(inDone && outDone) )
Chris@39 144 {
Chris@39 145 if( config->isInputInterleaved )
Chris@39 146 {
Chris@39 147 in = ((INPUT_SAMPLE*)inputBuffer) + inChannel;
Chris@39 148 inStride = config->numInputChannels;
Chris@39 149 }
Chris@39 150 else
Chris@39 151 {
Chris@39 152 in = ((INPUT_SAMPLE**)inputBuffer)[inChannel];
Chris@39 153 inStride = 1;
Chris@39 154 }
Chris@39 155
Chris@39 156 if( config->isOutputInterleaved )
Chris@39 157 {
Chris@39 158 out = ((OUTPUT_SAMPLE*)outputBuffer) + outChannel;
Chris@39 159 outStride = config->numOutputChannels;
Chris@39 160 }
Chris@39 161 else
Chris@39 162 {
Chris@39 163 out = ((OUTPUT_SAMPLE**)outputBuffer)[outChannel];
Chris@39 164 outStride = 1;
Chris@39 165 }
Chris@39 166
Chris@39 167 for( i=0; i<framesPerBuffer; i++ )
Chris@39 168 {
Chris@39 169 *out = CONVERT_IN_TO_OUT( *in );
Chris@39 170 out += outStride;
Chris@39 171 in += inStride;
Chris@39 172 }
Chris@39 173
Chris@39 174 if(inChannel < (config->numInputChannels - 1)) inChannel++;
Chris@39 175 else inDone = 1;
Chris@39 176 if(outChannel < (config->numOutputChannels - 1)) outChannel++;
Chris@39 177 else outDone = 1;
Chris@39 178 }
Chris@39 179 return 0;
Chris@39 180 }
Chris@39 181
Chris@39 182 /*******************************************************************/
Chris@39 183 int main(void);
Chris@39 184 int main(void)
Chris@39 185 {
Chris@39 186 PaError err = paNoError;
Chris@39 187 WireConfig_t CONFIG;
Chris@39 188 WireConfig_t *config = &CONFIG;
Chris@39 189 int configIndex = 0;;
Chris@39 190
Chris@39 191 err = Pa_Initialize();
Chris@39 192 if( err != paNoError ) goto error;
Chris@39 193
Chris@39 194 printf("Please connect audio signal to input and listen for it on output!\n");
Chris@39 195 printf("input format = %lu\n", INPUT_FORMAT );
Chris@39 196 printf("output format = %lu\n", OUTPUT_FORMAT );
Chris@39 197 printf("input device ID = %d\n", INPUT_DEVICE );
Chris@39 198 printf("output device ID = %d\n", OUTPUT_DEVICE );
Chris@39 199
Chris@39 200 if( INPUT_FORMAT == OUTPUT_FORMAT )
Chris@39 201 {
Chris@39 202 gInOutScaler = 1.0;
Chris@39 203 }
Chris@39 204 else if( (INPUT_FORMAT == paInt16) && (OUTPUT_FORMAT == paFloat32) )
Chris@39 205 {
Chris@39 206 gInOutScaler = 1.0/32768.0;
Chris@39 207 }
Chris@39 208 else if( (INPUT_FORMAT == paFloat32) && (OUTPUT_FORMAT == paInt16) )
Chris@39 209 {
Chris@39 210 gInOutScaler = 32768.0;
Chris@39 211 }
Chris@39 212
Chris@39 213 for( config->isInputInterleaved = 0; config->isInputInterleaved < 2; config->isInputInterleaved++ )
Chris@39 214 {
Chris@39 215 for( config->isOutputInterleaved = 0; config->isOutputInterleaved < 2; config->isOutputInterleaved++ )
Chris@39 216 {
Chris@39 217 for( config->numInputChannels = 1; config->numInputChannels < 3; config->numInputChannels++ )
Chris@39 218 {
Chris@39 219 for( config->numOutputChannels = 1; config->numOutputChannels < 3; config->numOutputChannels++ )
Chris@39 220 {
Chris@39 221 /* If framesPerCallback = 0, assertion fails in file pa_common/pa_process.c, line 1413: EX. */
Chris@39 222 for( config->framesPerCallback = 64; config->framesPerCallback < 129; config->framesPerCallback += 64 )
Chris@39 223 {
Chris@39 224 printf("-----------------------------------------------\n" );
Chris@39 225 printf("Configuration #%d\n", configIndex++ );
Chris@39 226 err = TestConfiguration( config );
Chris@39 227 /* Give user a chance to bail out. */
Chris@39 228 if( err == 1 )
Chris@39 229 {
Chris@39 230 err = paNoError;
Chris@39 231 goto done;
Chris@39 232 }
Chris@39 233 else if( err != paNoError ) goto error;
Chris@39 234 }
Chris@39 235 }
Chris@39 236 }
Chris@39 237 }
Chris@39 238 }
Chris@39 239
Chris@39 240 done:
Chris@39 241 Pa_Terminate();
Chris@39 242 printf("Full duplex sound test complete.\n"); fflush(stdout);
Chris@39 243 printf("Hit ENTER to quit.\n"); fflush(stdout);
Chris@39 244 getchar();
Chris@39 245 return 0;
Chris@39 246
Chris@39 247 error:
Chris@39 248 Pa_Terminate();
Chris@39 249 fprintf( stderr, "An error occured while using the portaudio stream\n" );
Chris@39 250 fprintf( stderr, "Error number: %d\n", err );
Chris@39 251 fprintf( stderr, "Error message: %s\n", Pa_GetErrorText( err ) );
Chris@39 252 printf("Hit ENTER to quit.\n"); fflush(stdout);
Chris@39 253 getchar();
Chris@39 254 return -1;
Chris@39 255 }
Chris@39 256
Chris@39 257 static PaError TestConfiguration( WireConfig_t *config )
Chris@39 258 {
Chris@39 259 int c;
Chris@39 260 PaError err = paNoError;
Chris@39 261 PaStream *stream;
Chris@39 262 PaStreamParameters inputParameters, outputParameters;
Chris@39 263
Chris@39 264 printf("input %sinterleaved!\n", (config->isInputInterleaved ? " " : "NOT ") );
Chris@39 265 printf("output %sinterleaved!\n", (config->isOutputInterleaved ? " " : "NOT ") );
Chris@39 266 printf("input channels = %d\n", config->numInputChannels );
Chris@39 267 printf("output channels = %d\n", config->numOutputChannels );
Chris@39 268 printf("framesPerCallback = %d\n", config->framesPerCallback );
Chris@39 269
Chris@39 270 inputParameters.device = INPUT_DEVICE; /* default input device */
Chris@39 271 if (inputParameters.device == paNoDevice) {
Chris@39 272 fprintf(stderr,"Error: No default input device.\n");
Chris@39 273 goto error;
Chris@39 274 }
Chris@39 275 inputParameters.channelCount = config->numInputChannels;
Chris@39 276 inputParameters.sampleFormat = INPUT_FORMAT | (config->isInputInterleaved ? 0 : paNonInterleaved);
Chris@39 277 inputParameters.suggestedLatency = Pa_GetDeviceInfo( inputParameters.device )->defaultLowInputLatency;
Chris@39 278 inputParameters.hostApiSpecificStreamInfo = NULL;
Chris@39 279
Chris@39 280 outputParameters.device = OUTPUT_DEVICE; /* default output device */
Chris@39 281 if (outputParameters.device == paNoDevice) {
Chris@39 282 fprintf(stderr,"Error: No default output device.\n");
Chris@39 283 goto error;
Chris@39 284 }
Chris@39 285 outputParameters.channelCount = config->numOutputChannels;
Chris@39 286 outputParameters.sampleFormat = OUTPUT_FORMAT | (config->isOutputInterleaved ? 0 : paNonInterleaved);
Chris@39 287 outputParameters.suggestedLatency = Pa_GetDeviceInfo( outputParameters.device )->defaultLowOutputLatency;
Chris@39 288 outputParameters.hostApiSpecificStreamInfo = NULL;
Chris@39 289
Chris@39 290 config->numInputUnderflows = 0;
Chris@39 291 config->numInputOverflows = 0;
Chris@39 292 config->numOutputUnderflows = 0;
Chris@39 293 config->numOutputOverflows = 0;
Chris@39 294 config->numPrimingOutputs = 0;
Chris@39 295 config->numCallbacks = 0;
Chris@39 296
Chris@39 297 err = Pa_OpenStream(
Chris@39 298 &stream,
Chris@39 299 &inputParameters,
Chris@39 300 &outputParameters,
Chris@39 301 SAMPLE_RATE,
Chris@39 302 config->framesPerCallback, /* frames per buffer */
Chris@39 303 paClipOff, /* we won't output out of range samples so don't bother clipping them */
Chris@39 304 wireCallback,
Chris@39 305 config );
Chris@39 306 if( err != paNoError ) goto error;
Chris@39 307
Chris@39 308 err = Pa_StartStream( stream );
Chris@39 309 if( err != paNoError ) goto error;
Chris@39 310
Chris@39 311 printf("Now recording and playing. - Hit ENTER for next configuration, or 'q' to quit.\n"); fflush(stdout);
Chris@39 312 c = getchar();
Chris@39 313
Chris@39 314 printf("Closing stream.\n");
Chris@39 315 err = Pa_CloseStream( stream );
Chris@39 316 if( err != paNoError ) goto error;
Chris@39 317
Chris@39 318 #define CHECK_FLAG_COUNT(member) \
Chris@39 319 if( config->member > 0 ) printf("FLAGS SET: " #member " = %d\n", config->member );
Chris@39 320 CHECK_FLAG_COUNT( numInputUnderflows );
Chris@39 321 CHECK_FLAG_COUNT( numInputOverflows );
Chris@39 322 CHECK_FLAG_COUNT( numOutputUnderflows );
Chris@39 323 CHECK_FLAG_COUNT( numOutputOverflows );
Chris@39 324 CHECK_FLAG_COUNT( numPrimingOutputs );
Chris@39 325 printf("number of callbacks = %d\n", config->numCallbacks );
Chris@39 326
Chris@39 327 if( c == 'q' ) return 1;
Chris@39 328
Chris@39 329 error:
Chris@39 330 return err;
Chris@39 331 }