source: roaraudio/roard/driver_portaudio.c @ 5276:0eb24ca6810e

//driver_portaudio.c:

/*
 *      Copyright (C) Philipp 'ph3-der-loewe' Schafft - 2008-2011
 *      Copyright (C) Hans-Kristian 'maister' Arntzen - 2010-2011
 *
 *  This file is part of roard a part of RoarAudio,
 *  a cross-platform sound system for both, home and professional use.
 *  See README for details.
 *
 *  This file is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License version 3
 *  as published by the Free Software Foundation.
 *
 *  RoarAudio is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this software; see the file COPYING.  If not, write to
 *  the Free Software Foundation, 51 Franklin Street, Fifth Floor,
 *  Boston, MA 02110-1301, USA.
 *
 */

#include "roard.h"

#ifdef _DRIVER_PORTAUDIO_CAN_OPERATE

int driver_portaudio_open(struct roar_vio_calls * inst, char * device, struct roar_audio_info * info, int fh, struct roar_stream_server * sstream) {
 struct driver_portaudio * self;
 PaSampleFormat fmt;
#ifdef ROAR_HAVE_LIBPABLIO
 long flags = PABLIO_WRITE;
#elif defined(ROAR_HAVE_PA19_VERSION_19)
 PaStreamParameters params;
 const PaDeviceInfo * dev_info = NULL;
#endif
 PaError err;
 int autoconfig = 0;

 if ( fh != -1 )
  return -1;

 if ( sstream != NULL ) {
  autoconfig = streams_get_flag(ROAR_STREAM(sstream)->id, ROAR_FLAG_AUTOCONF);
 }

 switch (info->bits) {
  case 8:
    switch (info->codec) {
     case ROAR_CODEC_PCM_S_LE:
     case ROAR_CODEC_PCM_S_BE:
     case ROAR_CODEC_PCM_S_PDP:
       fmt = paInt8;
      break;
     case ROAR_CODEC_PCM_U_LE:
     case ROAR_CODEC_PCM_U_BE:
     case ROAR_CODEC_PCM_U_PDP:
       fmt = paUInt8;
      break;
     default:
       if ( autoconfig ) {
        info->codec = ROAR_CODEC_DEFAULT;
        fmt = paInt8;
       } else {
        return -1;
       }
      break;
    }
   break;
  case 16:
    if ( info->codec != ROAR_CODEC_DEFAULT ) {
     if ( autoconfig ) {
      info->codec = ROAR_CODEC_DEFAULT;
     } else {
      return -1;
     }
    }
    fmt = paInt16;
   break;
#ifdef paPackedInt24
  case 24:
    if ( info->codec != ROAR_CODEC_DEFAULT ) {
     if ( autoconfig ) {
      info->codec = ROAR_CODEC_DEFAULT;
     } else {
      return -1;
     }
    }
    fmt = paPackedInt24;
   break;
#endif
  case 32:
    if ( info->codec != ROAR_CODEC_DEFAULT ) {
     if ( autoconfig ) {
      info->codec = ROAR_CODEC_DEFAULT;
     } else {
      return -1;
     }
    }
    fmt = paInt32;
   break;
  default:
    if ( autoconfig ) {
     info->codec = ROAR_CODEC_DEFAULT;
     info->bits  = 16;
     fmt = paInt16;
    } else {
     return -1;
    }
   break;
 }

 if ( (self = roar_mm_malloc(sizeof(struct driver_portaudio))) == NULL )
  return -1;

 memset(self, 0, sizeof(struct driver_portaudio));

 memset(inst, 0, sizeof(struct roar_vio_calls));

 inst->inst  = self;
 inst->close = driver_portaudio_close;
 inst->write = driver_portaudio_write;
 inst->ctl   = driver_dummy_ctl;

 Pa_Initialize();

#ifdef ROAR_HAVE_LIBPABLIO
 switch (info->channels) {
  case 1: flags |= PABLIO_MONO;   break;
  case 2: flags |= PABLIO_STEREO; break;
  default:
    if ( autoconfig ) {
     info->channels = 2;
     flags |= PABLIO_STEREO;
    } else {
     roar_mm_free(self);
     Pa_Terminate();
     return -1;
    }
 }

 err = OpenAudioStream(&(self->ostream), info->rate, fmt, flags);

 if ( err != paNoError && autoconfig ) {
  if ( (flags & PABLIO_MONO) == PABLIO_MONO ) {
   flags -= PABLIO_MONO;
   flags |= PABLIO_STEREO;
   info->channels = 2;
  }
  fmt         = paInt16;
  info->codec = ROAR_CODEC_DEFAULT;
  info->bits  = 16;

  err = OpenAudioStream(&(self->ostream), info->rate, fmt, flags);
 }

 if ( err != paNoError ) {
  roar_mm_free(self);
  Pa_Terminate();
  return -1;
 }

 return 0;
#elif defined(ROAR_HAVE_PA19_VERSION_19)
 err                              = paNoError;

 params.device                    = Pa_GetDefaultOutputDevice();
 params.channelCount              = info->channels;
 params.sampleFormat              = fmt;

 if ( params.device != paNoDevice )
  dev_info = Pa_GetDeviceInfo(params.device);

 if ( dev_info != NULL ) {
  params.suggestedLatency = dev_info->defaultLowOutputLatency;
 } else {
  err = paNoDevice;
 }

 params.hostApiSpecificStreamInfo = NULL;

 // TODO: FIXME: use libroar for this.
 self->framesize = info->bits * info->channels / 8;

 // Sets up blocking I/O stream.
 if ( err == paNoError ) {
  err = Pa_OpenStream(&(self->stream),
                      NULL,
                      &params,
                      info->rate,
                      128 /*FIXME:frames*/,
                      paClipOff,
                      NULL,
                      NULL
                     );
 }

 if ( err != paNoError && err != paNoDevice && autoconfig ) {
  params.sampleFormat = paInt16;
  params.channelCount = 2;
  info->codec         = ROAR_CODEC_DEFAULT;
  info->bits          = 16;
  info->channels      = 2;

  err = Pa_OpenStream(&(self->stream),
                      NULL,
                      &params,
                      info->rate,
                      128 /*FIXME:frames*/,
                      paClipOff,
                      NULL,
                      NULL
                     );
 }

 if ( err != paNoError ) {
  ROAR_ERR("driver_portaudio_open(*): Could not open PortAudio device: \"%s\".", Pa_GetErrorText(err));
  roar_mm_free(self);
  return -1;
 }

 err = Pa_StartStream(self->stream);

 if ( err != paNoError ) {
  ROAR_ERR("driver_portaudio_open(*): Could not start stream: \"%s\".", Pa_GetErrorText(err));
  roar_mm_free(self);
  return -1;
 }

 return 0;
#else
 return -1;
#endif
}

int     driver_portaudio_close        (struct roar_vio_calls * vio) {
 struct driver_portaudio * self = vio->inst;

 // TODO: cleanup common code.

#ifdef ROAR_HAVE_LIBPABLIO
 CloseAudioStream(self->ostream);

 Pa_Terminate();

 roar_mm_free(self);

 return 0;
#elif defined(ROAR_HAVE_PA19_VERSION_19)
 if ( (self != NULL) && (self->stream != NULL) ) {
  Pa_StopStream(self->stream);
  Pa_CloseStream(self->stream);
 }

 roar_mm_free(self);

 Pa_Terminate();

 return 0;
#else
 return -1;
#endif
}

ssize_t driver_portaudio_write        (struct roar_vio_calls * vio, void *buf, size_t count) {
 struct driver_portaudio * self = vio->inst;
#ifdef ROAR_HAVE_PA19_VERSION_19
 size_t write_frames = count / self->framesize;
 PaError err;
#endif

 ROAR_DBG("driver_portaudio_write(vio=%p, buf=%p, count=%llu) = ?", vio, buf, (long long unsigned int)count);

#ifdef ROAR_HAVE_LIBPABLIO
 count /= self->ostream->bytesPerFrame; // TODO: FIXME: do not access private members
 ROAR_DBG("driver_portaudio_write(vio=%p, buf=%p, count=%llu) = ? // PABLIO mode", vio, buf, (long long unsigned int)count);
 return WriteAudioStream(self->ostream, buf, count) * self->ostream->bytesPerFrame;
#elif defined(ROAR_HAVE_PA19_VERSION_19)

 ROAR_DBG("driver_portaudio_write(vio=%p, buf=%p, size=%llu) = ?", vio, buf, (long long unsigned int)size);

 // I'm not 100% sure if you could write arbitrary number of frames to Pa_WriteStream(), but it seems to be backend dependent.
 err = Pa_WriteStream(self->stream, buf, write_frames);

 if ( err < 0 && err != paOutputUnderflowed )
  return -1;

 // PA always seems to write requested size, or it will error out.
 return count;
#else
 return -1;
#endif
}

#endif

//ll