cannam@140: /* cannam@140: * $Id$ cannam@140: * test_w_saw.c cannam@140: * Generate stereo sawtooth waveforms. cannam@140: * cannam@140: * Author: Phil Burk, http://www.softsynth.com cannam@140: * cannam@140: * This program uses PABLIO, the Portable Audio Blocking I/O Library. cannam@140: * PABLIO is built on top of PortAudio, the Portable Audio Library. cannam@140: * cannam@140: * For more information see: http://www.portaudio.com cannam@140: * Copyright (c) 1999-2000 Ross Bencina and Phil Burk cannam@140: * cannam@140: * Permission is hereby granted, free of charge, to any person obtaining cannam@140: * a copy of this software and associated documentation files cannam@140: * (the "Software"), to deal in the Software without restriction, cannam@140: * including without limitation the rights to use, copy, modify, merge, cannam@140: * publish, distribute, sublicense, and/or sell copies of the Software, cannam@140: * and to permit persons to whom the Software is furnished to do so, cannam@140: * subject to the following conditions: cannam@140: * cannam@140: * The above copyright notice and this permission notice shall be cannam@140: * included in all copies or substantial portions of the Software. cannam@140: * cannam@140: * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, cannam@140: * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF cannam@140: * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. cannam@140: * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR cannam@140: * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF cannam@140: * CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION cannam@140: * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. cannam@140: */ cannam@140: cannam@140: /* cannam@140: * The text above constitutes the entire PortAudio license; however, cannam@140: * the PortAudio community also makes the following non-binding requests: cannam@140: * cannam@140: * Any person wishing to distribute modifications to the Software is cannam@140: * requested to send the modifications to the original developer so that cannam@140: * they can be incorporated into the canonical version. It is also cannam@140: * requested that these non-binding requests be included along with the cannam@140: * license above. cannam@140: */ cannam@140: cannam@140: #include cannam@140: #include cannam@140: #include cannam@140: #include "pablio.h" cannam@140: #include cannam@140: cannam@140: #define SAMPLE_RATE (44100) cannam@140: #define NUM_SECONDS (6) cannam@140: #define SAMPLES_PER_FRAME (2) cannam@140: cannam@140: #define FREQUENCY (220.0f) cannam@140: #define PHASE_INCREMENT (2.0f * FREQUENCY / SAMPLE_RATE) cannam@140: #define FRAMES_PER_BLOCK (100) cannam@140: cannam@140: float samples[FRAMES_PER_BLOCK][SAMPLES_PER_FRAME]; cannam@140: float phases[SAMPLES_PER_FRAME]; cannam@140: cannam@140: /*******************************************************************/ cannam@140: int main(void); cannam@140: int main(void) cannam@140: { cannam@140: int i,j; cannam@140: PaError err; cannam@140: PABLIO_Stream *aOutStream; cannam@140: cannam@140: printf("Generate sawtooth waves using PABLIO.\n"); cannam@140: fflush(stdout); cannam@140: cannam@140: /* Open simplified blocking I/O layer on top of PortAudio. */ cannam@140: err = OpenAudioStream( &aOutStream, SAMPLE_RATE, paFloat32, cannam@140: (PABLIO_WRITE | PABLIO_STEREO) ); cannam@140: if( err != paNoError ) goto error; cannam@140: cannam@140: /* Initialize oscillator phases. */ cannam@140: phases[0] = 0.0; cannam@140: phases[1] = 0.0; cannam@140: cannam@140: for( i=0; i<(NUM_SECONDS * SAMPLE_RATE); i += FRAMES_PER_BLOCK ) cannam@140: { cannam@140: /* Generate sawtooth waveforms in a block for efficiency. */ cannam@140: for( j=0; j 1.0f ) phases[0] -= 2.0f; cannam@140: samples[j][0] = phases[0]; cannam@140: cannam@140: /* On the second channel, generate a sawtooth wave a fifth higher. */ cannam@140: phases[1] += PHASE_INCREMENT * (3.0f / 2.0f); cannam@140: if( phases[1] > 1.0f ) phases[1] -= 2.0f; cannam@140: samples[j][1] = phases[1]; cannam@140: } cannam@140: cannam@140: /* Write samples to output. */ cannam@140: WriteAudioStream( aOutStream, samples, FRAMES_PER_BLOCK ); cannam@140: } cannam@140: cannam@140: CloseAudioStream( aOutStream ); cannam@140: cannam@140: printf("Sawtooth sound test complete.\n" ); cannam@140: fflush(stdout); cannam@140: return 0; cannam@140: cannam@140: error: cannam@140: fprintf( stderr, "An error occured while using PABLIO\n" ); cannam@140: fprintf( stderr, "Error number: %d\n", err ); cannam@140: fprintf( stderr, "Error message: %s\n", Pa_GetErrorText( err ) ); cannam@140: return -1; cannam@140: }