Alc/portaudio.c

   1 /**
   2  * OpenAL cross platform audio library
   3  * Copyright (C) 1999-2007 by authors.
   4  * This library is free software; you can redistribute it and/or
   5  *  modify it under the terms of the GNU Library General Public
   6  *  License as published by the Free Software Foundation; either
   7  *  version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  *  Library General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Library General Public
  15  *  License along with this library; if not, write to the
  16  *  Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  *  Boston, MA  02111-1307, USA.
  18  * Or go to http://www.gnu.org/copyleft/lgpl.html
  19  */
  20
  21 #include "config.h"
  22
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26 #include "alMain.h"
  27 #include "AL/al.h"
  28 #include "AL/alc.h"
  29 #ifdef HAVE_DLFCN_H
  30 #include <dlfcn.h>
  31 #endif
  32
  33 #include <portaudio.h>
  34
  35 static void *pa_handle;
  36 #define MAKE_FUNC(x) static typeof(x) * p##x
  37 MAKE_FUNC(Pa_Initialize);
  38 MAKE_FUNC(Pa_Terminate);
  39 MAKE_FUNC(Pa_GetErrorText);
  40 MAKE_FUNC(Pa_StartStream);
  41 MAKE_FUNC(Pa_StopStream);
  42 MAKE_FUNC(Pa_OpenStream);
  43 MAKE_FUNC(Pa_CloseStream);
  44 MAKE_FUNC(Pa_GetDefaultOutputDevice);
  45 MAKE_FUNC(Pa_GetStreamInfo);
  46 #undef MAKE_FUNC
  47
  48
  49 static const ALCchar pa_device[] = "PortAudio Software";
  50 static const ALCchar pa_capture[] = "PortAudio Capture";
  51 static volatile ALuint load_count;
  52
  53
  54 void *pa_load(void)
  55 {
  56     if(load_count == 0)
  57     {
  58         PaError err;
  59
  60 #ifdef _WIN32
  61         pa_handle = LoadLibrary("portaudio.dll");
  62 #define LOAD_FUNC(x) do { \
  63     p##x = (typeof(p##x))GetProcAddress(pa_handle, #x); \
  64     if(!(p##x)) { \
  65         AL_PRINT("Could not load %s from portaudio.dll\n", #x); \
  66         FreeLibrary(pa_handle); \
  67         pa_handle = NULL; \
  68         return NULL; \
  69     } \
  70 } while(0)
  71
  72 #elif defined(HAVE_DLFCN_H)
  73
  74     const char *str;
  75 #if defined(__APPLE__) && defined(__MACH__)
  76 # define PALIB "libportaudio.2.dylib"
  77 #else
  78 # define PALIB "libportaudio.so.2"
  79 #endif
  80         pa_handle = dlopen(PALIB, RTLD_NOW);
  81         dlerror();
  82
  83 #define LOAD_FUNC(f) do { \
  84     p##f = (typeof(f)*)dlsym(pa_handle, #f); \
  85     if((str=dlerror()) != NULL) \
  86     { \
  87         dlclose(pa_handle); \
  88         pa_handle = NULL; \
  89         AL_PRINT("Could not load %s from "PALIB": %s\n", #f, str); \
  90         return NULL; \
  91     } \
  92 } while(0)
  93
  94 #else
  95         pa_handle = (void*)0xDEADBEEF;
  96 #define LOAD_FUNC(f) p##f = f
  97 #endif
  98
  99         if(!pa_handle)
 100             return NULL;
 101
 102 LOAD_FUNC(Pa_Initialize);
 103 LOAD_FUNC(Pa_Terminate);
 104 LOAD_FUNC(Pa_GetErrorText);
 105 LOAD_FUNC(Pa_StartStream);
 106 LOAD_FUNC(Pa_StopStream);
 107 LOAD_FUNC(Pa_OpenStream);
 108 LOAD_FUNC(Pa_CloseStream);
 109 LOAD_FUNC(Pa_GetDefaultOutputDevice);
 110 LOAD_FUNC(Pa_GetStreamInfo);
 111
 112 #undef LOAD_FUNC
 113
 114         if((err=pPa_Initialize()) != paNoError)
 115         {
 116             AL_PRINT("Pa_Initialize() returned an error: %s\n", pPa_GetErrorText(err));
 117 #ifdef _WIN32
 118             FreeLibrary(pa_handle);
 119 #elif defined(HAVE_DLFCN_H)
 120             dlclose(pa_handle);
 121 #endif
 122             pa_handle = NULL;
 123             return NULL;
 124         }
 125     }
 126     ++load_count;
 127
 128     return pa_handle;
 129 }
 130
 131 void pa_unload(void)
 132 {
 133     if(load_count == 0 || --load_count > 0)
 134         return;
 135
 136     pPa_Terminate();
 137 #ifdef _WIN32
 138     FreeLibrary(pa_handle);
 139 #elif defined(HAVE_DLFCN_H)
 140     dlclose(pa_handle);
 141 #endif
 142     pa_handle = NULL;
 143 }
 144
 145
 146 typedef struct {
 147     PaStream *stream;
 148     ALuint update_size;
 149
 150     RingBuffer *ring;
 151 } pa_data;
 152
 153
 154 static int pa_callback(const void *inputBuffer, void *outputBuffer,
 155                        unsigned long framesPerBuffer, const PaStreamCallbackTimeInfo *timeInfo,
 156                        const PaStreamCallbackFlags statusFlags, void *userData)
 157 {
 158     ALCdevice *device = (ALCdevice*)userData;
 159
 160     (void)inputBuffer;
 161     (void)timeInfo;
 162     (void)statusFlags;
 163
 164     aluMixData(device, outputBuffer, framesPerBuffer);
 165     return 0;
 166 }
 167
 168 static int pa_capture_cb(const void *inputBuffer, void *outputBuffer,
 169                          unsigned long framesPerBuffer, const PaStreamCallbackTimeInfo *timeInfo,
 170                          const PaStreamCallbackFlags statusFlags, void *userData)
 171 {
 172     ALCdevice *device = (ALCdevice*)userData;
 173     pa_data *data = (pa_data*)device->ExtraData;
 174
 175     (void)outputBuffer;
 176     (void)timeInfo;
 177     (void)statusFlags;
 178
 179     WriteRingBuffer(data->ring, inputBuffer, framesPerBuffer);
 180     return 0;
 181 }
 182
 183
 184 static ALCboolean pa_open_playback(ALCdevice *device, const ALCchar *deviceName)
 185 {
 186     const PaStreamInfo *streamInfo;
 187     PaStreamParameters outParams;
 188     pa_data *data;
 189     PaError err;
 190
 191     if(!deviceName)
 192         deviceName = pa_device;
 193     else if(strcmp(deviceName, pa_device) != 0)
 194         return ALC_FALSE;
 195
 196     if(!pa_load())
 197         return ALC_FALSE;
 198
 199     data = (pa_data*)calloc(1, sizeof(pa_data));
 200     data->update_size = device->UpdateSize;
 201
 202     device->ExtraData = data;
 203
 204     outParams.device = GetConfigValueInt("port", "device", -1);
 205     if(outParams.device < 0)
 206         outParams.device = pPa_GetDefaultOutputDevice();
 207     outParams.suggestedLatency = (device->UpdateSize*device->NumUpdates) /
 208                                  (float)device->Frequency;
 209     outParams.hostApiSpecificStreamInfo = NULL;
 210
 211     switch(aluBytesFromFormat(device->Format))
 212     {
 213         case 1:
 214             outParams.sampleFormat = paUInt8;
 215             break;
 216         case 2:
 217             outParams.sampleFormat = paInt16;
 218             break;
 219         case 4:
 220             outParams.sampleFormat = paFloat32;
 221             break;
 222         default:
 223             AL_PRINT("Unknown format: 0x%x\n", device->Format);
 224             device->ExtraData = NULL;
 225             free(data);
 226             pa_unload();
 227             return ALC_FALSE;
 228     }
 229     outParams.channelCount = aluChannelsFromFormat(device->Format);
 230
 231     SetDefaultChannelOrder(device);
 232
 233     err = pPa_OpenStream(&data->stream, NULL, &outParams, device->Frequency,
 234                          device->UpdateSize, paNoFlag, pa_callback, device);
 235     if(err != paNoError)
 236     {
 237         AL_PRINT("Pa_OpenStream() returned an error: %s\n", pPa_GetErrorText(err));
 238         device->ExtraData = NULL;
 239         free(data);
 240         pa_unload();
 241         return ALC_FALSE;
 242     }
 243     streamInfo = pPa_GetStreamInfo(data->stream);
 244
 245     device->szDeviceName = strdup(deviceName);
 246     device->Frequency = streamInfo->sampleRate;
 247
 248     return ALC_TRUE;
 249 }
 250
 251 static void pa_close_playback(ALCdevice *device)
 252 {
 253     pa_data *data = (pa_data*)device->ExtraData;
 254     PaError err;
 255
 256     err = pPa_CloseStream(data->stream);
 257     if(err != paNoError)
 258         AL_PRINT("Error closing stream: %s\n", pPa_GetErrorText(err));
 259
 260     free(data);
 261     device->ExtraData = NULL;
 262
 263     pa_unload();
 264 }
 265
 266 static ALCboolean pa_reset_playback(ALCdevice *device)
 267 {
 268     pa_data *data = (pa_data*)device->ExtraData;
 269     const PaStreamInfo *streamInfo;
 270     PaError err;
 271
 272     streamInfo = pPa_GetStreamInfo(data->stream);
 273     device->Frequency = streamInfo->sampleRate;
 274     device->UpdateSize = data->update_size;
 275
 276     err = pPa_StartStream(data->stream);
 277     if(err != paNoError)
 278     {
 279         AL_PRINT("Pa_StartStream() returned an error: %s\n", pPa_GetErrorText(err));
 280         return ALC_FALSE;
 281     }
 282
 283     return ALC_TRUE;
 284 }
 285
 286 static void pa_stop_playback(ALCdevice *device)
 287 {
 288     pa_data *data = (pa_data*)device->ExtraData;
 289     PaError err;
 290
 291     err = pPa_StopStream(data->stream);
 292     if(err != paNoError)
 293         AL_PRINT("Error stopping stream: %s\n", pPa_GetErrorText(err));
 294 }
 295
 296
 297 static ALCboolean pa_open_capture(ALCdevice *device, const ALCchar *deviceName)
 298 {
 299     PaStreamParameters inParams;
 300     ALuint frame_size;
 301     pa_data *data;
 302     PaError err;
 303
 304     if(!deviceName)
 305         deviceName = pa_capture;
 306     else if(strcmp(deviceName, pa_capture) != 0)
 307         return ALC_FALSE;
 308
 309     if(!pa_load())
 310         return ALC_FALSE;
 311
 312     data = (pa_data*)calloc(1, sizeof(pa_data));
 313     if(data == NULL)
 314     {
 315         alcSetError(device, ALC_OUT_OF_MEMORY);
 316         return ALC_FALSE;
 317     }
 318
 319     frame_size = aluChannelsFromFormat(device->Format) *
 320                  aluBytesFromFormat(device->Format);
 321     data->ring = CreateRingBuffer(frame_size, device->UpdateSize*device->NumUpdates);
 322     if(data->ring == NULL)
 323     {
 324         alcSetError(device, ALC_OUT_OF_MEMORY);
 325         goto error;
 326     }
 327
 328     inParams.device = GetConfigValueInt("port", "capture", -1);
 329     if(inParams.device < 0)
 330         inParams.device = pPa_GetDefaultOutputDevice();
 331     inParams.suggestedLatency = 0.0f;
 332     inParams.hostApiSpecificStreamInfo = NULL;
 333
 334     switch(aluBytesFromFormat(device->Format))
 335     {
 336         case 1:
 337             inParams.sampleFormat = paUInt8;
 338             break;
 339         case 2:
 340             inParams.sampleFormat = paInt16;
 341             break;
 342         case 4:
 343             inParams.sampleFormat = paFloat32;
 344             break;
 345         default:
 346             AL_PRINT("Unknown format: 0x%x\n", device->Format);
 347             goto error;
 348     }
 349     inParams.channelCount = aluChannelsFromFormat(device->Format);
 350
 351     err = pPa_OpenStream(&data->stream, &inParams, NULL, device->Frequency,
 352                          paFramesPerBufferUnspecified, paNoFlag, pa_capture_cb, device);
 353     if(err != paNoError)
 354     {
 355         AL_PRINT("Pa_OpenStream() returned an error: %s\n", pPa_GetErrorText(err));
 356         goto error;
 357     }
 358
 359     device->szDeviceName = strdup(deviceName);
 360
 361     device->ExtraData = data;
 362     return ALC_TRUE;
 363
 364 error:
 365     DestroyRingBuffer(data->ring);
 366     free(data);
 367     pa_unload();
 368     return ALC_FALSE;
 369 }
 370
 371 static void pa_close_capture(ALCdevice *device)
 372 {
 373     pa_data *data = (pa_data*)device->ExtraData;
 374     PaError err;
 375
 376     err = pPa_CloseStream(data->stream);
 377     if(err != paNoError)
 378         AL_PRINT("Error closing stream: %s\n", pPa_GetErrorText(err));
 379
 380     free(data);
 381     device->ExtraData = NULL;
 382
 383     pa_unload();
 384 }
 385
 386 static void pa_start_capture(ALCdevice *device)
 387 {
 388     pa_data *data = device->ExtraData;
 389     PaError err;
 390
 391     err = pPa_StartStream(data->stream);
 392     if(err != paNoError)
 393         AL_PRINT("Error starting stream: %s\n", pPa_GetErrorText(err));
 394 }
 395
 396 static void pa_stop_capture(ALCdevice *device)
 397 {
 398     pa_data *data = (pa_data*)device->ExtraData;
 399     PaError err;
 400
 401     err = pPa_StopStream(data->stream);
 402     if(err != paNoError)
 403         AL_PRINT("Error stopping stream: %s\n", pPa_GetErrorText(err));
 404 }
 405
 406 static void pa_capture_samples(ALCdevice *device, ALCvoid *buffer, ALCuint samples)
 407 {
 408     pa_data *data = device->ExtraData;
 409     if(samples <= (ALCuint)RingBufferSize(data->ring))
 410         ReadRingBuffer(data->ring, buffer, samples);
 411     else
 412         alcSetError(device, ALC_INVALID_VALUE);
 413 }
 414
 415 static ALCuint pa_available_samples(ALCdevice *device)
 416 {
 417     pa_data *data = device->ExtraData;
 418     return RingBufferSize(data->ring);
 419 }
 420
 421
 422 static const BackendFuncs pa_funcs = {
 423     pa_open_playback,
 424     pa_close_playback,
 425     pa_reset_playback,
 426     pa_stop_playback,
 427     pa_open_capture,
 428     pa_close_capture,
 429     pa_start_capture,
 430     pa_stop_capture,
 431     pa_capture_samples,
 432     pa_available_samples
 433 };
 434
 435 void alc_pa_init(BackendFuncs *func_list)
 436 {
 437     *func_list = pa_funcs;
 438 }
 439
 440 void alc_pa_deinit(void)
 441 {
 442 }
 443
 444 void alc_pa_probe(int type)
 445 {
 446     if(!pa_load()) return;
 447
 448     if(type == DEVICE_PROBE)
 449         AppendDeviceList(pa_device);
 450     else if(type == ALL_DEVICE_PROBE)
 451         AppendAllDeviceList(pa_device);
 452     else if(type == CAPTURE_DEVICE_PROBE)
 453         AppendCaptureDeviceList(pa_capture);
 454
 455     pa_unload();
 456 }