[Portaudio] Fw: Simple app: "PortOggIO"

[Ross Bencina]

[I recieved this email as a bounce -- I don't know why it didn't make it 
through, but I'm forwarding it to the list...]

From: Tatsh
Subject: Simple app: "PortOggIO"


> This is a simple demonstration application I am trying to put together. It 
> plays
> the music but it either plays too slow, or sounds very choppy (depends on 
> sound
> card). Not sure why. Compile with -lportaudio -logg -lvorbis -lvorbisfile.
>
> Thanks all
>
> #include <stdio.h>
> #include <stdlib.h>
> #include <strings.h>
>
> #include <portaudio.h>
> #include <vorbis/vorbisfile.h>
>
> #define FRAMES_PER_BUFFER 256
>
> /* Global variables */
> int end_of_file=0; /* when this variable is 1, file has been played 
> completely */
> OggVorbis_File vf; /* Pointer to the Ogg file */
>
> /* Portaudio callback function */
> static int paOggCallback( const void *inputBuffer, void *outputBuffer,
>                            unsigned long framesPerBuffer,
>                            const PaStreamCallbackTimeInfo* timeInfo,
>                            PaStreamCallbackFlags statusFlags,
>                            void *userData )
> {
>    int ret, position;
>    /*char *out = (char*)outputBuffer;*/
>
>    /* To avoid unused variable warning */
>    (void)framesPerBuffer;
>    (void)timeInfo;
>    (void)statusFlags;
>    (void)inputBuffer;
>    (void)userData;
>
>    ret = ov_read(&vf,(char*)outputBuffer,1024,0,2,1,&position);
>
>    switch (ret) {
>      case OV_HOLE:
>        fprintf(stderr, "Found hole in file.\n");
>        break;
>
>      case OV_EBADLINK:
>        fprintf(stderr, "Invalid stream section was supplied or other 
> error.\n");
>        break;
>
>      case OV_EINVAL:
>        fprintf(stderr, "File headers are corrupt.\n");
>        break;
>
>      case 0:
>        fprintf(stdout, "End of file reached.\n");
>        end_of_file = 1;
>    }
>
>    return paContinue;
> }
>
> int main(int argc, char *argv[]) {
>  if (argc != 2) {
>    fprintf(stderr, "Usage: %s <ogg file>\n", argv[0]);
>    exit(EXIT_FAILURE);
>  }
>
>  int endian;
>  int testvar = 1; /* Used to test endianness */
>  vorbis_info *vi;
>
>  PaError err;
>  PaStream *stream;
>  PaStreamParameters outputParameters;
>
>  if (ov_fopen(argv[1], &vf) < 0) {
>    fprintf(stderr, "Input %s does not appear to be an Ogg bitstream.\n", 
> argv[1]);
>    exit(EXIT_FAILURE);
>  }
>
>  vi = ov_info(&vf, -1);
>
>  if (*(char *)&testvar) /* Hack taken from Audacity source code */
>    endian = 0;  /* little endian, most common */
>  else
>    endian = 1;
>
>  fprintf(stdout, "File information: \n");
>  fprintf(stdout, "  File name: %s\n", argv[1]);
>  fprintf(stdout, "  Number of channels: %d\n", vi->channels);
>  fprintf(stdout, "  Sample rate: %ld\n", vi->rate);
>  fprintf(stdout, "  Length (seconds): %.3f\n", ov_time_total(&vf, -1));
>  fprintf(stdout, "  Length (samples): %ld\n", 
> (long)ov_pcm_total(&vf, -1));
>  fprintf(stdout, "  Byte-order: %s\n", endian ? "MSB" : "LSB");
>
>  if (ov_pcm_seek(&vf, 0) != 0) { /* This is because some files do not do 
> this
> automatically */
>    fprintf(stderr, "Error seeking file to position 0.\n");
>  }
>  else
>    fprintf(stdout, "Seeked file to position 0.\n");
>
>  if ((err = Pa_Initialize()) != paNoError) {
>    fprintf(stderr, "Error initialising PortAudio: %s\n", 
> Pa_GetErrorText(err));
>    exit(EXIT_FAILURE);
>  }
>  else
>    fprintf(stdout, "Successfully initialised PortAudio.\n");
>
>  outputParameters.device = Pa_GetDefaultOutputDevice();
>  outputParameters.channelCount = vi->channels;
>  outputParameters.sampleFormat = paInt16;
>  outputParameters.suggestedLatency =
> Pa_GetDeviceInfo(outputParameters.device)->defaultHighOutputLatency;
>  outputParameters.hostApiSpecificStreamInfo = NULL;
>
>  fprintf(stdout, "Device information:\n");
>  fprintf(stdout, "  Name: %s\n", 
> Pa_GetDeviceInfo(outputParameters.device)->name);
>  fprintf(stdout, "  Number of channels: %d\n", 
> outputParameters.channelCount);
>  fprintf(stdout, "  Sample format: paInt16\n");
>  fprintf(stdout, "  Latency: %f\n",
> Pa_GetDeviceInfo(outputParameters.device)->defaultHighOutputLatency);
>
>  err = Pa_OpenStream(&stream,
>                      NULL,
>                      &outputParameters,
>                      vi->rate,
>                      FRAMES_PER_BUFFER,
>                      paClipOff,
>                      paOggCallback,
>                      NULL);
>  if (err != paNoError) {
>    fprintf(stderr, "Error opening stream: %s\n", Pa_GetErrorText(err));
>    exit(EXIT_FAILURE);
>  }
>  else
>    fprintf(stdout, "Successfully opened stream.\n");
>
>  if ((err = Pa_StartStream(stream)) != paNoError) {
>    fprintf(stderr, "Error starting stream: %s\n", Pa_GetErrorText(err));
>    exit(EXIT_FAILURE);
>  }
>  else
>    fprintf(stdout, "Successfully started stream.\n");
>
>  /* wait till end of file is reached */
>  while(!end_of_file)
>  {
>    ;
>  }
>
>  if ((err = Pa_StopStream(stream)) != paNoError) {
>    fprintf(stderr, "Error stopping stream: %s\n", Pa_GetErrorText(err));
>    exit(EXIT_FAILURE);
>  }
>  else
>    fprintf(stdout, "Successfully stopped stream.\n");
>
>  if ((err = Pa_CloseStream(stream)) != paNoError) {
>    fprintf(stderr, "Error closing stream: %s\n", Pa_GetErrorText(err));
>    exit(EXIT_FAILURE);
>  }
>  else
>    fprintf(stdout, "Successfully closed stream.\n");
>
>  if ((err = Pa_Terminate()) != paNoError) {
>    fprintf(stderr, "Error terminating PortAudio: %s\n", 
> Pa_GetErrorText(err));
>    exit(EXIT_FAILURE);
>  }
>  else
>    fprintf(stdout, "Successfully terminated PortAudio.\n");
>
>  ov_clear(&vf);
>
>  exit(EXIT_SUCCESS);
> }
>
> -- 
> Tatsh
> www.tatsh.net
> ddrtist at gmail.com
>
>