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         str = NULL;
  96         pa_handle = (void*)0xDEADBEEF;
  97 #define LOAD_FUNC(f) p##f = f
  98 #endif
  99
 100         if(!pa_handle)
 101             return NULL;
 102
 103 LOAD_FUNC(Pa_Initialize);
 104 LOAD_FUNC(Pa_Terminate);
 105 LOAD_FUNC(Pa_GetErrorText);
 106 LOAD_FUNC(Pa_StartStream);
 107 LOAD_FUNC(Pa_StopStream);
 108 LOAD_FUNC(Pa_OpenStream);
 109 LOAD_FUNC(Pa_CloseStream);
 110 LOAD_FUNC(Pa_GetDefaultOutputDevice);
 111 LOAD_FUNC(Pa_GetStreamInfo);
 112
 113 #undef LOAD_FUNC
 114
 115         if((err=pPa_Initialize()) != paNoError)
 116         {
 117             AL_PRINT("Pa_Initialize() returned an error: %s\n", pPa_GetErrorText(err));
 118 #ifdef _WIN32
 119             FreeLibrary(pa_handle);
 120 #elif defined(HAVE_DLFCN_H)
 121             dlclose(pa_handle);
 122 #endif
 123             pa_handle = NULL;
 124             return NULL;
 125         }
 126     }
 127     ++load_count;
 128
 129     return pa_handle;
 130 }
 131
 132 void pa_unload(void)
 133 {
 134     if(load_count == 0 || --load_count > 0)
 135         return;
 136
 137     pPa_Terminate();
 138 #ifdef _WIN32
 139     FreeLibrary(pa_handle);
 140 #elif defined(HAVE_DLFCN_H)
 141     dlclose(pa_handle);
 142 #endif
 143     pa_handle = NULL;
 144 }
 145
 146
 147 typedef struct {
 148     PaStream *stream;
 149     ALuint update_size;
 150
 151     RingBuffer *ring;
 152 } pa_data;
 153
 154
 155 static int pa_callback(const void *inputBuffer, void *outputBuffer,
 156                        unsigned long framesPerBuffer, const PaStreamCallbackTimeInfo *timeInfo,
 157                        const PaStreamCallbackFlags statusFlags, void *userData)
 158 {
 159     ALCdevice *device = (ALCdevice*)userData;
 160
 161     (void)inputBuffer;
 162     (void)timeInfo;
 163     (void)statusFlags;
 164
 165     aluMixData(device, outputBuffer, framesPerBuffer);
 166     return 0;
 167 }
 168
 169 static int pa_capture_cb(const void *inputBuffer, void *outputBuffer,
 170                          unsigned long framesPerBuffer, const PaStreamCallbackTimeInfo *timeInfo,
 171                          const PaStreamCallbackFlags statusFlags, void *userData)
 172 {
 173     ALCdevice *device = (ALCdevice*)userData;
 174     pa_data *data = (pa_data*)device->ExtraData;
 175
 176     (void)outputBuffer;
 177     (void)timeInfo;
 178     (void)statusFlags;
 179
 180     WriteRingBuffer(data->ring, inputBuffer, framesPerBuffer);
 181     return 0;
 182 }
 183
 184
 185 static ALCboolean pa_open_playback(ALCdevice *device, const ALCchar *deviceName)
 186 {
 187     const PaStreamInfo *streamInfo;
 188     PaStreamParameters outParams;
 189     pa_data *data;
 190     PaError err;
 191
 192     if(!deviceName)
 193         deviceName = pa_device;
 194     else if(strcmp(deviceName, pa_device) != 0)
 195         return ALC_FALSE;
 196
 197     if(!pa_load())
 198         return ALC_FALSE;
 199
 200     data = (pa_data*)calloc(1, sizeof(pa_data));
 201     data->update_size = device->UpdateSize;
 202
 203     device->ExtraData = data;
 204
 205     outParams.device = GetConfigValueInt("port", "device", -1);
 206     if(outParams.device < 0)
 207         outParams.device = pPa_GetDefaultOutputDevice();
 208     outParams.suggestedLatency = (device->UpdateSize*device->NumUpdates) /
 209                                  (float)device->Frequency;
 210     outParams.hostApiSpecificStreamInfo = NULL;
 211
 212     switch(aluBytesFromFormat(device->Format))
 213     {
 214         case 1:
 215             outParams.sampleFormat = paUInt8;
 216             break;
 217         case 2:
 218             outParams.sampleFormat = paInt16;
 219             break;
 220         case 4:
 221             outParams.sampleFormat = paFloat32;
 222             break;
 223         default:
 224             AL_PRINT("Unknown format: 0x%x\n", device->Format);
 225             device->ExtraData = NULL;
 226             free(data);
 227             pa_unload();
 228             return ALC_FALSE;
 229     }
 230     outParams.channelCount = aluChannelsFromFormat(device->Format);
 231
 232     SetDefaultChannelOrder(device);
 233
 234     err = pPa_OpenStream(&data->stream, NULL, &outParams, device->Frequency,
 235                          device->UpdateSize, paNoFlag, pa_callback, device);
 236     if(err != paNoError)
 237     {
 238         AL_PRINT("Pa_OpenStream() returned an error: %s\n", pPa_GetErrorText(err));
 239         device->ExtraData = NULL;
 240         free(data);
 241         pa_unload();
 242         return ALC_FALSE;
 243     }
 244     streamInfo = pPa_GetStreamInfo(data->stream);
 245
 246     device->szDeviceName = strdup(deviceName);
 247     device->Frequency = streamInfo->sampleRate;
 248
 249     return ALC_TRUE;
 250 }
 251
 252 static void pa_close_playback(ALCdevice *device)
 253 {
 254     pa_data *data = (pa_data*)device->ExtraData;
 255     PaError err;
 256
 257     err = pPa_CloseStream(data->stream);
 258     if(err != paNoError)
 259         AL_PRINT("Error closing stream: %s\n", pPa_GetErrorText(err));
 260
 261     free(data);
 262     device->ExtraData = NULL;
 263
 264     pa_unload();
 265 }
 266
 267 static ALCboolean pa_reset_playback(ALCdevice *device)
 268 {
 269     pa_data *data = (pa_data*)device->ExtraData;
 270     const PaStreamInfo *streamInfo;
 271     PaError err;
 272
 273     streamInfo = pPa_GetStreamInfo(data->stream);
 274     device->Frequency = streamInfo->sampleRate;
 275     device->UpdateSize = data->update_size;
 276
 277     err = pPa_StartStream(data->stream);
 278     if(err != paNoError)
 279     {
 280         AL_PRINT("Pa_StartStream() returned an error: %s\n", pPa_GetErrorText(err));
 281         return ALC_FALSE;
 282     }
 283
 284     return ALC_TRUE;
 285 }
 286
 287 static void pa_stop_playback(ALCdevice *device)
 288 {
 289     pa_data *data = (pa_data*)device->ExtraData;
 290     PaError err;
 291
 292     err = pPa_StopStream(data->stream);
 293     if(err != paNoError)
 294         AL_PRINT("Error stopping stream: %s\n", pPa_GetErrorText(err));
 295 }
 296
 297
 298 static ALCboolean pa_open_capture(ALCdevice *device, const ALCchar *deviceName)
 299 {
 300     PaStreamParameters inParams;
 301     ALuint frame_size;
 302     pa_data *data;
 303     PaError err;
 304
 305     if(!deviceName)
 306         deviceName = pa_capture;
 307     else if(strcmp(deviceName, pa_capture) != 0)
 308         return ALC_FALSE;
 309
 310     if(!pa_load())
 311         return ALC_FALSE;
 312
 313     data = (pa_data*)calloc(1, sizeof(pa_data));
 314     if(data == NULL)
 315     {
 316         alcSetError(device, ALC_OUT_OF_MEMORY);
 317         return ALC_FALSE;
 318     }
 319
 320     frame_size = aluChannelsFromFormat(device->Format) *
 321                  aluBytesFromFormat(device->Format);
 322     data->ring = CreateRingBuffer(frame_size, device->UpdateSize*device->NumUpdates);
 323     if(data->ring == NULL)
 324     {
 325         alcSetError(device, ALC_OUT_OF_MEMORY);
 326         goto error;
 327     }
 328
 329     inParams.device = GetConfigValueInt("port", "capture", -1);
 330     if(inParams.device < 0)
 331         inParams.device = pPa_GetDefaultOutputDevice();
 332     inParams.suggestedLatency = 0.0f;
 333     inParams.hostApiSpecificStreamInfo = NULL;
 334
 335     switch(aluBytesFromFormat(device->Format))
 336     {
 337         case 1:
 338             inParams.sampleFormat = paUInt8;
 339             break;
 340         case 2:
 341             inParams.sampleFormat = paInt16;
 342             break;
 343         case 4:
 344             inParams.sampleFormat = paFloat32;
 345             break;
 346         default:
 347             AL_PRINT("Unknown format: 0x%x\n", device->Format);
 348             goto error;
 349     }
 350     inParams.channelCount = aluChannelsFromFormat(device->Format);
 351
 352     err = pPa_OpenStream(&data->stream, &inParams, NULL, device->Frequency,
 353                          paFramesPerBufferUnspecified, paNoFlag, pa_capture_cb, device);
 354     if(err != paNoError)
 355     {
 356         AL_PRINT("Pa_OpenStream() returned an error: %s\n", pPa_GetErrorText(err));
 357         goto error;
 358     }
 359
 360     device->szDeviceName = strdup(deviceName);
 361
 362     device->ExtraData = data;
 363     return ALC_TRUE;
 364
 365 error:
 366     DestroyRingBuffer(data->ring);
 367     free(data);
 368     pa_unload();
 369     return ALC_FALSE;
 370 }
 371
 372 static void pa_close_capture(ALCdevice *device)
 373 {
 374     pa_data *data = (pa_data*)device->ExtraData;
 375     PaError err;
 376
 377     err = pPa_CloseStream(data->stream);
 378     if(err != paNoError)
 379         AL_PRINT("Error closing stream: %s\n", pPa_GetErrorText(err));
 380
 381     free(data);
 382     device->ExtraData = NULL;
 383
 384     pa_unload();
 385 }
 386
 387 static void pa_start_capture(ALCdevice *device)
 388 {
 389     pa_data *data = device->ExtraData;
 390     PaError err;
 391
 392     err = pPa_StartStream(data->stream);
 393     if(err != paNoError)
 394         AL_PRINT("Error starting stream: %s\n", pPa_GetErrorText(err));
 395 }
 396
 397 static void pa_stop_capture(ALCdevice *device)
 398 {
 399     pa_data *data = (pa_data*)device->ExtraData;
 400     PaError err;
 401
 402     err = pPa_StopStream(data->stream);
 403     if(err != paNoError)
 404         AL_PRINT("Error stopping stream: %s\n", pPa_GetErrorText(err));
 405 }
 406
 407 static void pa_capture_samples(ALCdevice *device, ALCvoid *buffer, ALCuint samples)
 408 {
 409     pa_data *data = device->ExtraData;
 410     if(samples <= (ALCuint)RingBufferSize(data->ring))
 411         ReadRingBuffer(data->ring, buffer, samples);
 412     else
 413         alcSetError(device, ALC_INVALID_VALUE);
 414 }
 415
 416 static ALCuint pa_available_samples(ALCdevice *device)
 417 {
 418     pa_data *data = device->ExtraData;
 419     return RingBufferSize(data->ring);
 420 }
 421
 422
 423 static const BackendFuncs pa_funcs = {
 424     pa_open_playback,
 425     pa_close_playback,
 426     pa_reset_playback,
 427     pa_stop_playback,
 428     pa_open_capture,
 429     pa_close_capture,
 430     pa_start_capture,
 431     pa_stop_capture,
 432     pa_capture_samples,
 433     pa_available_samples
 434 };
 435
 436 void alc_pa_init(BackendFuncs *func_list)
 437 {
 438     *func_list = pa_funcs;
 439 }
 440
 441 void alc_pa_deinit(void)
 442 {
 443 }
 444
 445 void alc_pa_probe(int type)
 446 {
 447     if(!pa_load()) return;
 448
 449     if(type == DEVICE_PROBE)
 450         AppendDeviceList(pa_device);
 451     else if(type == ALL_DEVICE_PROBE)
 452         AppendAllDeviceList(pa_device);
 453     else if(type == CAPTURE_DEVICE_PROBE)
 454         AppendCaptureDeviceList(pa_capture);
 455
 456     pa_unload();
 457 }