Alc/pulseaudio.c

   1 /**
   2  * OpenAL cross platform audio library
   3  * Copyright (C) 2009 by Konstantinos Natsakis <konstantinos.natsakis@gmail.com>
   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 "alMain.h"
  24 #ifdef HAVE_DLFCN_H
  25 #include <dlfcn.h>
  26 #endif
  27
  28 #include <pulse/pulseaudio.h>
  29
  30 #if PA_API_VERSION == 11
  31 #define PA_STREAM_ADJUST_LATENCY 0x2000U
  32 static __inline int PA_STREAM_IS_GOOD(pa_stream_state_t x)
  33 {
  34     return (x == PA_STREAM_CREATING || x == PA_STREAM_READY);
  35 }
  36 static __inline int PA_CONTEXT_IS_GOOD(pa_context_state_t x)
  37 {
  38     return (x == PA_CONTEXT_CONNECTING || x == PA_CONTEXT_AUTHORIZING ||
  39             x == PA_CONTEXT_SETTING_NAME || x == PA_CONTEXT_READY);
  40 }
  41 #define PA_STREAM_IS_GOOD PA_STREAM_IS_GOOD
  42 #define PA_CONTEXT_IS_GOOD PA_CONTEXT_IS_GOOD
  43 #elif PA_API_VERSION != 12
  44 #error Invalid PulseAudio API version
  45 #endif
  46
  47 #ifndef PA_CHECK_VERSION
  48 #define PA_CHECK_VERSION(major,minor,micro)                             \
  49     ((PA_MAJOR > (major)) ||                                            \
  50      (PA_MAJOR == (major) && PA_MINOR > (minor)) ||                     \
  51      (PA_MAJOR == (major) && PA_MINOR == (minor) && PA_MICRO >= (micro)))
  52 #endif
  53
  54 static void *pa_handle;
  55 #define MAKE_FUNC(x) static typeof(x) * p##x
  56 MAKE_FUNC(pa_context_unref);
  57 MAKE_FUNC(pa_sample_spec_valid);
  58 MAKE_FUNC(pa_stream_drop);
  59 MAKE_FUNC(pa_strerror);
  60 MAKE_FUNC(pa_context_get_state);
  61 MAKE_FUNC(pa_stream_get_state);
  62 MAKE_FUNC(pa_threaded_mainloop_signal);
  63 MAKE_FUNC(pa_stream_peek);
  64 MAKE_FUNC(pa_threaded_mainloop_wait);
  65 MAKE_FUNC(pa_threaded_mainloop_unlock);
  66 MAKE_FUNC(pa_threaded_mainloop_in_thread);
  67 MAKE_FUNC(pa_context_new);
  68 MAKE_FUNC(pa_threaded_mainloop_stop);
  69 MAKE_FUNC(pa_context_disconnect);
  70 MAKE_FUNC(pa_threaded_mainloop_start);
  71 MAKE_FUNC(pa_threaded_mainloop_get_api);
  72 MAKE_FUNC(pa_context_set_state_callback);
  73 MAKE_FUNC(pa_stream_write);
  74 MAKE_FUNC(pa_xfree);
  75 MAKE_FUNC(pa_stream_connect_record);
  76 MAKE_FUNC(pa_stream_connect_playback);
  77 MAKE_FUNC(pa_stream_readable_size);
  78 MAKE_FUNC(pa_stream_cork);
  79 MAKE_FUNC(pa_stream_is_suspended);
  80 MAKE_FUNC(pa_stream_get_device_name);
  81 MAKE_FUNC(pa_path_get_filename);
  82 MAKE_FUNC(pa_get_binary_name);
  83 MAKE_FUNC(pa_threaded_mainloop_free);
  84 MAKE_FUNC(pa_context_errno);
  85 MAKE_FUNC(pa_xmalloc);
  86 MAKE_FUNC(pa_stream_unref);
  87 MAKE_FUNC(pa_threaded_mainloop_accept);
  88 MAKE_FUNC(pa_stream_set_write_callback);
  89 MAKE_FUNC(pa_threaded_mainloop_new);
  90 MAKE_FUNC(pa_context_connect);
  91 MAKE_FUNC(pa_stream_set_buffer_attr);
  92 MAKE_FUNC(pa_stream_get_buffer_attr);
  93 MAKE_FUNC(pa_stream_get_sample_spec);
  94 MAKE_FUNC(pa_stream_set_read_callback);
  95 MAKE_FUNC(pa_stream_set_state_callback);
  96 MAKE_FUNC(pa_stream_set_moved_callback);
  97 MAKE_FUNC(pa_stream_new);
  98 MAKE_FUNC(pa_stream_disconnect);
  99 MAKE_FUNC(pa_threaded_mainloop_lock);
 100 MAKE_FUNC(pa_channel_map_init_auto);
 101 MAKE_FUNC(pa_channel_map_parse);
 102 MAKE_FUNC(pa_channel_map_snprint);
 103 MAKE_FUNC(pa_channel_map_equal);
 104 MAKE_FUNC(pa_context_get_server_info);
 105 MAKE_FUNC(pa_context_get_sink_info_by_name);
 106 MAKE_FUNC(pa_context_get_sink_info_list);
 107 MAKE_FUNC(pa_context_get_source_info_list);
 108 MAKE_FUNC(pa_operation_get_state);
 109 MAKE_FUNC(pa_operation_unref);
 110 #if PA_CHECK_VERSION(0,9,15)
 111 MAKE_FUNC(pa_channel_map_superset);
 112 MAKE_FUNC(pa_stream_set_buffer_attr_callback);
 113 #endif
 114 #if PA_CHECK_VERSION(0,9,16)
 115 MAKE_FUNC(pa_stream_begin_write);
 116 #endif
 117 #undef MAKE_FUNC
 118
 119 #ifndef PATH_MAX
 120 #define PATH_MAX 4096
 121 #endif
 122
 123 typedef struct {
 124     char *device_name;
 125
 126     ALCuint samples;
 127     ALCuint frame_size;
 128
 129     RingBuffer *ring;
 130
 131     pa_buffer_attr attr;
 132     pa_sample_spec spec;
 133
 134     pa_threaded_mainloop *loop;
 135
 136     pa_stream *stream;
 137     pa_context *context;
 138 } pulse_data;
 139
 140 typedef struct {
 141     char *name;
 142     char *device_name;
 143 } DevMap;
 144
 145
 146 static const ALCchar pulse_device[] = "PulseAudio Default";
 147 static DevMap *allDevNameMap;
 148 static ALuint numDevNames;
 149 static DevMap *allCaptureDevNameMap;
 150 static ALuint numCaptureDevNames;
 151 static pa_context_flags_t pulse_ctx_flags;
 152
 153
 154 void *pulse_load(void) //{{{
 155 {
 156     if(!pa_handle)
 157     {
 158 #ifdef _WIN32
 159         pa_handle = LoadLibrary("libpulse-0.dll");
 160 #define LOAD_FUNC(x) do { \
 161     p##x = (typeof(p##x))GetProcAddress(pa_handle, #x); \
 162     if(!(p##x)) { \
 163         AL_PRINT("Could not load %s from libpulse-0.dll\n", #x); \
 164         FreeLibrary(pa_handle); \
 165         pa_handle = NULL; \
 166         return NULL; \
 167     } \
 168 } while(0)
 169 #define LOAD_OPTIONAL_FUNC(x) do { \
 170     p##x = (typeof(p##x))GetProcAddress(pa_handle, #x); \
 171 } while(0)
 172
 173 #elif defined (HAVE_DLFCN_H)
 174
 175         const char *err;
 176 #if defined(__APPLE__) && defined(__MACH__)
 177         pa_handle = dlopen("libpulse.0.dylib", RTLD_NOW);
 178 #else
 179         pa_handle = dlopen("libpulse.so.0", RTLD_NOW);
 180 #endif
 181         dlerror();
 182
 183 #define LOAD_FUNC(x) do { \
 184     p##x = dlsym(pa_handle, #x); \
 185     if((err=dlerror()) != NULL) { \
 186         AL_PRINT("Could not load %s from libpulse: %s\n", #x, err); \
 187         dlclose(pa_handle); \
 188         pa_handle = NULL; \
 189         return NULL; \
 190     } \
 191 } while(0)
 192 #define LOAD_OPTIONAL_FUNC(x) do { \
 193     p##x = dlsym(pa_handle, #x); \
 194     if((err=dlerror()) != NULL) { \
 195         p##x = NULL; \
 196     } \
 197 } while(0)
 198
 199 #else
 200
 201         pa_handle = (void*)0xDEADBEEF;
 202 #define LOAD_FUNC(x) p##x = (x)
 203 #define LOAD_OPTIONAL_FUNC(x) p##x = (x)
 204
 205 #endif
 206         if(!pa_handle)
 207             return NULL;
 208
 209 LOAD_FUNC(pa_context_unref);
 210 LOAD_FUNC(pa_sample_spec_valid);
 211 LOAD_FUNC(pa_stream_drop);
 212 LOAD_FUNC(pa_strerror);
 213 LOAD_FUNC(pa_context_get_state);
 214 LOAD_FUNC(pa_stream_get_state);
 215 LOAD_FUNC(pa_threaded_mainloop_signal);
 216 LOAD_FUNC(pa_stream_peek);
 217 LOAD_FUNC(pa_threaded_mainloop_wait);
 218 LOAD_FUNC(pa_threaded_mainloop_unlock);
 219 LOAD_FUNC(pa_threaded_mainloop_in_thread);
 220 LOAD_FUNC(pa_context_new);
 221 LOAD_FUNC(pa_threaded_mainloop_stop);
 222 LOAD_FUNC(pa_context_disconnect);
 223 LOAD_FUNC(pa_threaded_mainloop_start);
 224 LOAD_FUNC(pa_threaded_mainloop_get_api);
 225 LOAD_FUNC(pa_context_set_state_callback);
 226 LOAD_FUNC(pa_stream_write);
 227 LOAD_FUNC(pa_xfree);
 228 LOAD_FUNC(pa_stream_connect_record);
 229 LOAD_FUNC(pa_stream_connect_playback);
 230 LOAD_FUNC(pa_stream_readable_size);
 231 LOAD_FUNC(pa_stream_cork);
 232 LOAD_FUNC(pa_stream_is_suspended);
 233 LOAD_FUNC(pa_stream_get_device_name);
 234 LOAD_FUNC(pa_path_get_filename);
 235 LOAD_FUNC(pa_get_binary_name);
 236 LOAD_FUNC(pa_threaded_mainloop_free);
 237 LOAD_FUNC(pa_context_errno);
 238 LOAD_FUNC(pa_xmalloc);
 239 LOAD_FUNC(pa_stream_unref);
 240 LOAD_FUNC(pa_threaded_mainloop_accept);
 241 LOAD_FUNC(pa_stream_set_write_callback);
 242 LOAD_FUNC(pa_threaded_mainloop_new);
 243 LOAD_FUNC(pa_context_connect);
 244 LOAD_FUNC(pa_stream_set_buffer_attr);
 245 LOAD_FUNC(pa_stream_get_buffer_attr);
 246 LOAD_FUNC(pa_stream_get_sample_spec);
 247 LOAD_FUNC(pa_stream_set_read_callback);
 248 LOAD_FUNC(pa_stream_set_state_callback);
 249 LOAD_FUNC(pa_stream_set_moved_callback);
 250 LOAD_FUNC(pa_stream_new);
 251 LOAD_FUNC(pa_stream_disconnect);
 252 LOAD_FUNC(pa_threaded_mainloop_lock);
 253 LOAD_FUNC(pa_channel_map_init_auto);
 254 LOAD_FUNC(pa_channel_map_parse);
 255 LOAD_FUNC(pa_channel_map_snprint);
 256 LOAD_FUNC(pa_channel_map_equal);
 257 LOAD_FUNC(pa_context_get_server_info);
 258 LOAD_FUNC(pa_context_get_sink_info_by_name);
 259 LOAD_FUNC(pa_context_get_sink_info_list);
 260 LOAD_FUNC(pa_context_get_source_info_list);
 261 LOAD_FUNC(pa_operation_get_state);
 262 LOAD_FUNC(pa_operation_unref);
 263 #if PA_CHECK_VERSION(0,9,15)
 264 LOAD_OPTIONAL_FUNC(pa_channel_map_superset);
 265 LOAD_OPTIONAL_FUNC(pa_stream_set_buffer_attr_callback);
 266 #endif
 267 #if PA_CHECK_VERSION(0,9,16)
 268 LOAD_OPTIONAL_FUNC(pa_stream_begin_write);
 269 #endif
 270
 271 #undef LOAD_OPTIONAL_FUNC
 272 #undef LOAD_FUNC
 273     }
 274     return pa_handle;
 275 } //}}}
 276
 277 // PulseAudio Event Callbacks //{{{
 278 static void context_state_callback(pa_context *context, void *pdata) //{{{
 279 {
 280     pa_threaded_mainloop *loop = pdata;
 281     pa_context_state_t state;
 282
 283     state = ppa_context_get_state(context);
 284     if(state == PA_CONTEXT_READY || !PA_CONTEXT_IS_GOOD(state))
 285         ppa_threaded_mainloop_signal(loop, 0);
 286 }//}}}
 287
 288 static void stream_state_callback(pa_stream *stream, void *pdata) //{{{
 289 {
 290     pa_threaded_mainloop *loop = pdata;
 291     pa_stream_state_t state;
 292
 293     state = ppa_stream_get_state(stream);
 294     if(state == PA_STREAM_READY || !PA_STREAM_IS_GOOD(state))
 295         ppa_threaded_mainloop_signal(loop, 0);
 296 }//}}}
 297
 298 static void stream_buffer_attr_callback(pa_stream *stream, void *pdata) //{{{
 299 {
 300     ALCdevice *Device = pdata;
 301     pulse_data *data = Device->ExtraData;
 302
 303     SuspendContext(NULL);
 304
 305     data->attr = *(ppa_stream_get_buffer_attr(stream));
 306     Device->UpdateSize = 20 * Device->Frequency / 1000;
 307     Device->NumUpdates = data->attr.tlength/data->frame_size / Device->UpdateSize;
 308     if(Device->NumUpdates == 0)
 309         Device->NumUpdates = 1;
 310
 311     ProcessContext(NULL);
 312 }//}}}
 313
 314 static void stream_device_callback(pa_stream *stream, void *pdata) //{{{
 315 {
 316     ALCdevice *Device = pdata;
 317     pulse_data *data = Device->ExtraData;
 318
 319     free(data->device_name);
 320     data->device_name = strdup(ppa_stream_get_device_name(stream));
 321 }//}}}
 322
 323 static void context_state_callback2(pa_context *context, void *pdata) //{{{
 324 {
 325     ALCdevice *Device = pdata;
 326     pulse_data *data = Device->ExtraData;
 327
 328     if(ppa_context_get_state(context) == PA_CONTEXT_FAILED)
 329     {
 330         AL_PRINT("Received context failure!\n");
 331         aluHandleDisconnect(Device);
 332     }
 333     ppa_threaded_mainloop_signal(data->loop, 0);
 334 }//}}}
 335
 336 static void stream_state_callback2(pa_stream *stream, void *pdata) //{{{
 337 {
 338     ALCdevice *Device = pdata;
 339     pulse_data *data = Device->ExtraData;
 340
 341     if(ppa_stream_get_state(stream) == PA_STREAM_FAILED)
 342     {
 343         AL_PRINT("Received stream failure!\n");
 344         aluHandleDisconnect(Device);
 345     }
 346     ppa_threaded_mainloop_signal(data->loop, 0);
 347 }//}}}
 348
 349 static void stream_success_callback(pa_stream *stream, int success, void *pdata) //{{{
 350 {
 351     ALCdevice *Device = pdata;
 352     pulse_data *data = Device->ExtraData;
 353     (void)stream;
 354     (void)success;
 355
 356     ppa_threaded_mainloop_signal(data->loop, 0);
 357 }//}}}
 358
 359 static void sink_info_callback(pa_context *context, const pa_sink_info *info, int eol, void *pdata) //{{{
 360 {
 361     ALCdevice *device = pdata;
 362     pulse_data *data = device->ExtraData;
 363     char chanmap_str[256] = "";
 364     const struct {
 365         const char *str;
 366         ALenum format;
 367     } chanmaps[] = {
 368         { "front-left,front-right,front-center,lfe,rear-left,rear-right,side-left,side-right",
 369           AL_FORMAT_71CHN32 },
 370         { "front-left,front-right,front-center,lfe,rear-center,side-left,side-right",
 371           AL_FORMAT_61CHN32 },
 372         { "front-left,front-right,front-center,lfe,rear-left,rear-right",
 373           AL_FORMAT_51CHN32 },
 374         { "front-left,front-right,rear-left,rear-right", AL_FORMAT_QUAD32 },
 375         { "front-left,front-right", AL_FORMAT_STEREO_FLOAT32 },
 376         { "mono", AL_FORMAT_MONO_FLOAT32 },
 377         { NULL, 0 }
 378     };
 379     int i;
 380     (void)context;
 381
 382     if(eol)
 383     {
 384         ppa_threaded_mainloop_signal(data->loop, 0);
 385         return;
 386     }
 387
 388     for(i = 0;chanmaps[i].str;i++)
 389     {
 390         pa_channel_map map;
 391         if(!ppa_channel_map_parse(&map, chanmaps[i].str))
 392             continue;
 393
 394         if(ppa_channel_map_equal(&info->channel_map, &map)
 395 #if PA_CHECK_VERSION(0,9,15)
 396            || (ppa_channel_map_superset &&
 397                ppa_channel_map_superset(&info->channel_map, &map))
 398 #endif
 399             )
 400         {
 401             device->Format = chanmaps[i].format;
 402             return;
 403         }
 404     }
 405
 406     ppa_channel_map_snprint(chanmap_str, sizeof(chanmap_str), &info->channel_map);
 407     AL_PRINT("Failed to find format for channel map:\n    %s\n", chanmap_str);
 408 }//}}}
 409
 410 static void sink_device_callback(pa_context *context, const pa_sink_info *info, int eol, void *pdata) //{{{
 411 {
 412     pa_threaded_mainloop *loop = pdata;
 413     void *temp;
 414
 415     (void)context;
 416
 417     if(eol)
 418     {
 419         ppa_threaded_mainloop_signal(loop, 0);
 420         return;
 421     }
 422
 423     temp = realloc(allDevNameMap, (numDevNames+1) * sizeof(*allDevNameMap));
 424     if(temp)
 425     {
 426         char str[1024];
 427         snprintf(str, sizeof(str), "%s via PulseAudio", info->description);
 428
 429         allDevNameMap = temp;
 430         allDevNameMap[numDevNames].name = strdup(str);
 431         allDevNameMap[numDevNames].device_name = strdup(info->name);
 432         numDevNames++;
 433     }
 434 }//}}}
 435
 436 static void source_device_callback(pa_context *context, const pa_source_info *info, int eol, void *pdata) //{{{
 437 {
 438     pa_threaded_mainloop *loop = pdata;
 439     void *temp;
 440
 441     (void)context;
 442
 443     if(eol)
 444     {
 445         ppa_threaded_mainloop_signal(loop, 0);
 446         return;
 447     }
 448
 449     temp = realloc(allCaptureDevNameMap, (numCaptureDevNames+1) * sizeof(*allCaptureDevNameMap));
 450     if(temp)
 451     {
 452         char str[256];
 453         snprintf(str, sizeof(str), "%s via PulseAudio", info->description);
 454
 455         allCaptureDevNameMap = temp;
 456         allCaptureDevNameMap[numCaptureDevNames].name = strdup(str);
 457         allCaptureDevNameMap[numCaptureDevNames].device_name = strdup(info->name);
 458         numCaptureDevNames++;
 459     }
 460 }//}}}
 461 //}}}
 462
 463 // PulseAudio I/O Callbacks //{{{
 464 static void stream_write_callback(pa_stream *stream, size_t len, void *pdata) //{{{
 465 {
 466     ALCdevice *Device = pdata;
 467     pulse_data *data = Device->ExtraData;
 468
 469     while(len > 0)
 470     {
 471         size_t newlen = len;
 472         void *buf;
 473         pa_free_cb_t free_func = NULL;
 474
 475 #if PA_CHECK_VERSION(0,9,16)
 476         if(!ppa_stream_begin_write ||
 477            ppa_stream_begin_write(stream, &buf, &newlen) < 0)
 478 #endif
 479         {
 480             buf = ppa_xmalloc(newlen);
 481             free_func = ppa_xfree;
 482         }
 483
 484         aluMixData(Device, buf, newlen/data->frame_size);
 485         ppa_stream_write(stream, buf, newlen, free_func, 0, PA_SEEK_RELATIVE);
 486         len -= newlen;
 487     }
 488 } //}}}
 489 //}}}
 490
 491 static pa_context *connect_context(pa_threaded_mainloop *loop)
 492 {
 493     const char *name = "OpenAL Soft";
 494     char path_name[PATH_MAX];
 495     pa_context_state_t state;
 496     pa_context *context;
 497     int err;
 498
 499     if(ppa_get_binary_name(path_name, sizeof(path_name)))
 500         name = ppa_path_get_filename(path_name);
 501
 502     context = ppa_context_new(ppa_threaded_mainloop_get_api(loop), name);
 503     if(!context)
 504     {
 505         AL_PRINT("pa_context_new() failed\n");
 506         return NULL;
 507     }
 508
 509     ppa_context_set_state_callback(context, context_state_callback, loop);
 510
 511     if((err=ppa_context_connect(context, NULL, pulse_ctx_flags, NULL)) >= 0)
 512     {
 513         while((state=ppa_context_get_state(context)) != PA_CONTEXT_READY)
 514         {
 515             if(!PA_CONTEXT_IS_GOOD(state))
 516             {
 517                 err = ppa_context_errno(context);
 518                 break;
 519             }
 520
 521             ppa_threaded_mainloop_wait(loop);
 522         }
 523     }
 524     ppa_context_set_state_callback(context, NULL, NULL);
 525
 526     if(err < 0)
 527     {
 528         AL_PRINT("Context did not connect: %s\n", ppa_strerror(err));
 529         ppa_context_unref(context);
 530         return NULL;
 531     }
 532
 533     return context;
 534 }
 535
 536 static pa_stream *connect_playback_stream(ALCdevice *device,
 537     pa_stream_flags_t flags, pa_buffer_attr *attr, pa_sample_spec *spec,
 538     pa_channel_map *chanmap)
 539 {
 540     pulse_data *data = device->ExtraData;
 541     pa_stream_state_t state;
 542     pa_stream *stream;
 543
 544     stream = ppa_stream_new(data->context, "Playback Stream", spec, chanmap);
 545     if(!stream)
 546     {
 547         AL_PRINT("pa_stream_new() failed: %s\n",
 548                  ppa_strerror(ppa_context_errno(data->context)));
 549         return NULL;
 550     }
 551
 552     ppa_stream_set_state_callback(stream, stream_state_callback, data->loop);
 553
 554     if(ppa_stream_connect_playback(stream, data->device_name, attr, flags, NULL, NULL) < 0)
 555     {
 556         AL_PRINT("Stream did not connect: %s\n",
 557                  ppa_strerror(ppa_context_errno(data->context)));
 558         ppa_stream_unref(stream);
 559         return NULL;
 560     }
 561
 562     while((state=ppa_stream_get_state(stream)) != PA_STREAM_READY)
 563     {
 564         if(!PA_STREAM_IS_GOOD(state))
 565         {
 566             AL_PRINT("Stream did not get ready: %s\n",
 567                      ppa_strerror(ppa_context_errno(data->context)));
 568             ppa_stream_unref(stream);
 569             return NULL;
 570         }
 571
 572         ppa_threaded_mainloop_wait(data->loop);
 573     }
 574     ppa_stream_set_state_callback(stream, NULL, NULL);
 575
 576     return stream;
 577 }
 578
 579 static void probe_devices(ALboolean capture)
 580 {
 581     pa_threaded_mainloop *loop;
 582
 583     if(capture == AL_FALSE)
 584     {
 585         allDevNameMap = malloc(sizeof(DevMap) * 1);
 586         allDevNameMap[0].name = strdup("PulseAudio Default");
 587         allDevNameMap[0].device_name = NULL;
 588         numDevNames = 1;
 589     }
 590     else
 591     {
 592         allCaptureDevNameMap = malloc(sizeof(DevMap) * 1);
 593         allCaptureDevNameMap[0].name = strdup("PulseAudio Default");
 594         allCaptureDevNameMap[0].device_name = NULL;
 595         numCaptureDevNames = 1;
 596     }
 597
 598     if((loop=ppa_threaded_mainloop_new()) &&
 599        ppa_threaded_mainloop_start(loop) >= 0)
 600     {
 601         pa_context *context;
 602
 603         ppa_threaded_mainloop_lock(loop);
 604         context = connect_context(loop);
 605         if(context)
 606         {
 607             pa_operation *o;
 608
 609             if(capture == AL_FALSE)
 610                 o = ppa_context_get_sink_info_list(context, sink_device_callback, loop);
 611             else
 612                 o = ppa_context_get_source_info_list(context, source_device_callback, loop);
 613             while(ppa_operation_get_state(o) == PA_OPERATION_RUNNING)
 614                 ppa_threaded_mainloop_wait(loop);
 615             ppa_operation_unref(o);
 616
 617             ppa_context_disconnect(context);
 618             ppa_context_unref(context);
 619         }
 620         ppa_threaded_mainloop_unlock(loop);
 621         ppa_threaded_mainloop_stop(loop);
 622     }
 623     if(loop)
 624         ppa_threaded_mainloop_free(loop);
 625 }
 626
 627
 628 static ALCboolean pulse_open(ALCdevice *device, const ALCchar *device_name) //{{{
 629 {
 630     pulse_data *data = ppa_xmalloc(sizeof(pulse_data));
 631     memset(data, 0, sizeof(*data));
 632
 633     if(!(data->loop = ppa_threaded_mainloop_new()))
 634     {
 635         AL_PRINT("pa_threaded_mainloop_new() failed!\n");
 636         goto out;
 637     }
 638     if(ppa_threaded_mainloop_start(data->loop) < 0)
 639     {
 640         AL_PRINT("pa_threaded_mainloop_start() failed\n");
 641         goto out;
 642     }
 643
 644     ppa_threaded_mainloop_lock(data->loop);
 645     device->ExtraData = data;
 646
 647     data->context = connect_context(data->loop);
 648     if(!data->context)
 649     {
 650         ppa_threaded_mainloop_unlock(data->loop);
 651         goto out;
 652     }
 653     ppa_context_set_state_callback(data->context, context_state_callback2, device);
 654
 655     device->szDeviceName = strdup(device_name);
 656
 657     ppa_threaded_mainloop_unlock(data->loop);
 658     return ALC_TRUE;
 659
 660 out:
 661     if(data->loop)
 662     {
 663         ppa_threaded_mainloop_stop(data->loop);
 664         ppa_threaded_mainloop_free(data->loop);
 665     }
 666
 667     device->ExtraData = NULL;
 668     ppa_xfree(data);
 669     return ALC_FALSE;
 670 } //}}}
 671
 672 static void pulse_close(ALCdevice *device) //{{{
 673 {
 674     pulse_data *data = device->ExtraData;
 675
 676     ppa_threaded_mainloop_lock(data->loop);
 677
 678     if(data->stream)
 679     {
 680         ppa_stream_disconnect(data->stream);
 681         ppa_stream_unref(data->stream);
 682     }
 683
 684     ppa_context_disconnect(data->context);
 685     ppa_context_unref(data->context);
 686
 687     ppa_threaded_mainloop_unlock(data->loop);
 688
 689     ppa_threaded_mainloop_stop(data->loop);
 690     ppa_threaded_mainloop_free(data->loop);
 691
 692     DestroyRingBuffer(data->ring);
 693     free(data->device_name);
 694
 695     device->ExtraData = NULL;
 696     ppa_xfree(data);
 697 } //}}}
 698 //}}}
 699
 700 // OpenAL {{{
 701 static ALCboolean pulse_open_playback(ALCdevice *device, const ALCchar *device_name) //{{{
 702 {
 703     char *pulse_name = NULL;
 704     pa_sample_spec spec;
 705     pulse_data *data;
 706     ALuint len;
 707
 708     if(!pulse_load())
 709         return ALC_FALSE;
 710
 711     if(!device_name)
 712         device_name = pulse_device;
 713     else if(strcmp(device_name, pulse_device) != 0)
 714     {
 715         ALuint i;
 716
 717         if(!allDevNameMap)
 718             probe_devices(AL_FALSE);
 719
 720         for(i = 0;i < numDevNames;i++)
 721         {
 722             if(strcmp(device_name, allDevNameMap[i].name) == 0)
 723             {
 724                 pulse_name = allDevNameMap[i].device_name;
 725                 break;
 726             }
 727         }
 728         if(i == numDevNames)
 729             return ALC_FALSE;
 730     }
 731
 732     if(pulse_open(device, device_name) == ALC_FALSE)
 733         return ALC_FALSE;
 734
 735     data = device->ExtraData;
 736
 737     ppa_threaded_mainloop_lock(data->loop);
 738
 739     spec.format = PA_SAMPLE_S16NE;
 740     spec.rate = 44100;
 741     spec.channels = 2;
 742
 743     data->device_name = pulse_name;
 744     pa_stream *stream = connect_playback_stream(device, 0, NULL, &spec, NULL);
 745     if(!stream)
 746     {
 747         ppa_threaded_mainloop_unlock(data->loop);
 748         goto fail;
 749     }
 750
 751     if(ppa_stream_is_suspended(stream))
 752     {
 753         ppa_stream_disconnect(stream);
 754         ppa_stream_unref(stream);
 755         ppa_threaded_mainloop_unlock(data->loop);
 756         goto fail;
 757     }
 758     data->device_name = strdup(ppa_stream_get_device_name(stream));
 759
 760     ppa_stream_disconnect(stream);
 761     ppa_stream_unref(stream);
 762
 763     ppa_threaded_mainloop_unlock(data->loop);
 764
 765     len = GetConfigValueInt("pulse", "buffer-length", 2048);
 766     if(len != 0)
 767     {
 768         device->UpdateSize = len;
 769         device->NumUpdates = 1;
 770     }
 771     return ALC_TRUE;
 772
 773 fail:
 774     pulse_close(device);
 775     return ALC_FALSE;
 776 } //}}}
 777
 778 static void pulse_close_playback(ALCdevice *device) //{{{
 779 {
 780     pulse_close(device);
 781 } //}}}
 782
 783 static ALCboolean pulse_reset_playback(ALCdevice *device) //{{{
 784 {
 785     pulse_data *data = device->ExtraData;
 786     pa_stream_flags_t flags = 0;
 787     pa_channel_map chanmap;
 788
 789     ppa_threaded_mainloop_lock(data->loop);
 790
 791     if(!ConfigValueExists(NULL, "format"))
 792     {
 793         pa_operation *o;
 794         o = ppa_context_get_sink_info_by_name(data->context, data->device_name, sink_info_callback, device);
 795         while(ppa_operation_get_state(o) == PA_OPERATION_RUNNING)
 796             ppa_threaded_mainloop_wait(data->loop);
 797         ppa_operation_unref(o);
 798     }
 799     if(!ConfigValueExists(NULL, "frequency"))
 800         flags |= PA_STREAM_FIX_RATE;
 801
 802     data->frame_size = aluFrameSizeFromFormat(device->Format);
 803     data->attr.minreq = -1;
 804     data->attr.prebuf = -1;
 805     data->attr.fragsize = -1;
 806     data->attr.tlength = device->UpdateSize * device->NumUpdates *
 807                          data->frame_size;
 808     data->attr.maxlength = data->attr.tlength;
 809
 810     switch(aluBytesFromFormat(device->Format))
 811     {
 812         case 1:
 813             data->spec.format = PA_SAMPLE_U8;
 814             break;
 815         case 2:
 816             data->spec.format = PA_SAMPLE_S16NE;
 817             break;
 818         case 4:
 819             data->spec.format = PA_SAMPLE_FLOAT32NE;
 820             break;
 821         default:
 822             AL_PRINT("Unknown format: 0x%x\n", device->Format);
 823             ppa_threaded_mainloop_unlock(data->loop);
 824             return ALC_FALSE;
 825     }
 826     data->spec.rate = device->Frequency;
 827     data->spec.channels = aluChannelsFromFormat(device->Format);
 828
 829     if(ppa_sample_spec_valid(&data->spec) == 0)
 830     {
 831         AL_PRINT("Invalid sample format\n");
 832         ppa_threaded_mainloop_unlock(data->loop);
 833         return ALC_FALSE;
 834     }
 835
 836     if(!ppa_channel_map_init_auto(&chanmap, data->spec.channels, PA_CHANNEL_MAP_WAVEEX))
 837     {
 838         AL_PRINT("Couldn't build map for channel count (%d)!\n", data->spec.channels);
 839         ppa_threaded_mainloop_unlock(data->loop);
 840         return ALC_FALSE;
 841     }
 842     SetDefaultWFXChannelOrder(device);
 843
 844     data->stream = connect_playback_stream(device, flags, &data->attr, &data->spec, &chanmap);
 845     if(!data->stream)
 846     {
 847         ppa_threaded_mainloop_unlock(data->loop);
 848         return ALC_FALSE;
 849     }
 850
 851     ppa_stream_set_state_callback(data->stream, stream_state_callback2, device);
 852
 853     data->spec = *(ppa_stream_get_sample_spec(data->stream));
 854     if(device->Frequency != data->spec.rate)
 855     {
 856         pa_operation *o;
 857
 858         /* Server updated our playback rate, so modify the buffer attribs
 859          * accordingly. */
 860         data->attr.tlength = (ALuint64)(data->attr.tlength/data->frame_size) *
 861                              data->spec.rate / device->Frequency * data->frame_size;
 862         data->attr.maxlength = data->attr.tlength;
 863
 864         o = ppa_stream_set_buffer_attr(data->stream, &data->attr,
 865                                        stream_success_callback, device);
 866         while(ppa_operation_get_state(o) == PA_OPERATION_RUNNING)
 867             ppa_threaded_mainloop_wait(data->loop);
 868         ppa_operation_unref(o);
 869
 870         device->Frequency = data->spec.rate;
 871     }
 872
 873     stream_buffer_attr_callback(data->stream, device);
 874 #if PA_CHECK_VERSION(0,9,15)
 875     if(ppa_stream_set_buffer_attr_callback)
 876         ppa_stream_set_buffer_attr_callback(data->stream, stream_buffer_attr_callback, device);
 877 #endif
 878     ppa_stream_set_moved_callback(data->stream, stream_device_callback, device);
 879
 880     stream_write_callback(data->stream, data->attr.tlength, device);
 881     ppa_stream_set_write_callback(data->stream, stream_write_callback, device);
 882
 883     ppa_threaded_mainloop_unlock(data->loop);
 884     return ALC_TRUE;
 885 } //}}}
 886
 887 static void pulse_stop_playback(ALCdevice *device) //{{{
 888 {
 889     pulse_data *data = device->ExtraData;
 890
 891     if(!data->stream)
 892         return;
 893
 894     ppa_threaded_mainloop_lock(data->loop);
 895
 896 #if PA_CHECK_VERSION(0,9,15)
 897     if(ppa_stream_set_buffer_attr_callback)
 898         ppa_stream_set_buffer_attr_callback(data->stream, NULL, NULL);
 899 #endif
 900     ppa_stream_set_moved_callback(data->stream, NULL, NULL);
 901     ppa_stream_set_write_callback(data->stream, NULL, NULL);
 902     ppa_stream_disconnect(data->stream);
 903     ppa_stream_unref(data->stream);
 904     data->stream = NULL;
 905
 906     ppa_threaded_mainloop_unlock(data->loop);
 907 } //}}}
 908
 909
 910 static ALCboolean pulse_open_capture(ALCdevice *device, const ALCchar *device_name) //{{{
 911 {
 912     char *pulse_name = NULL;
 913     pulse_data *data;
 914     pa_stream_flags_t flags = 0;
 915     pa_stream_state_t state;
 916     pa_channel_map chanmap;
 917
 918     if(!pulse_load())
 919         return ALC_FALSE;
 920
 921     if(!allCaptureDevNameMap)
 922         probe_devices(AL_TRUE);
 923
 924     if(!device_name)
 925         device_name = allCaptureDevNameMap[0].name;
 926     else
 927     {
 928         ALuint i;
 929
 930         for(i = 0;i < numCaptureDevNames;i++)
 931         {
 932             if(strcmp(device_name, allCaptureDevNameMap[i].name) == 0)
 933             {
 934                 pulse_name = allCaptureDevNameMap[i].device_name;
 935                 break;
 936             }
 937         }
 938         if(i == numCaptureDevNames)
 939             return ALC_FALSE;
 940     }
 941
 942     if(pulse_open(device, device_name) == ALC_FALSE)
 943         return ALC_FALSE;
 944
 945     data = device->ExtraData;
 946     ppa_threaded_mainloop_lock(data->loop);
 947
 948     data->samples = device->UpdateSize * device->NumUpdates;
 949     data->frame_size = aluFrameSizeFromFormat(device->Format);
 950
 951     if(!(data->ring = CreateRingBuffer(data->frame_size, data->samples)))
 952     {
 953         ppa_threaded_mainloop_unlock(data->loop);
 954         goto fail;
 955     }
 956
 957     data->attr.minreq = -1;
 958     data->attr.prebuf = -1;
 959     data->attr.maxlength = data->frame_size * data->samples;
 960     data->attr.tlength = -1;
 961     data->attr.fragsize = min(data->frame_size * data->samples,
 962                               10 * device->Frequency / 1000);
 963
 964     data->spec.rate = device->Frequency;
 965     data->spec.channels = aluChannelsFromFormat(device->Format);
 966
 967     switch(aluBytesFromFormat(device->Format))
 968     {
 969         case 1:
 970             data->spec.format = PA_SAMPLE_U8;
 971             break;
 972         case 2:
 973             data->spec.format = PA_SAMPLE_S16NE;
 974             break;
 975         case 4:
 976             data->spec.format = PA_SAMPLE_FLOAT32NE;
 977             break;
 978         default:
 979             AL_PRINT("Unknown format: 0x%x\n", device->Format);
 980             ppa_threaded_mainloop_unlock(data->loop);
 981             goto fail;
 982     }
 983
 984     if(ppa_sample_spec_valid(&data->spec) == 0)
 985     {
 986         AL_PRINT("Invalid sample format\n");
 987         ppa_threaded_mainloop_unlock(data->loop);
 988         goto fail;
 989     }
 990
 991     if(!ppa_channel_map_init_auto(&chanmap, data->spec.channels, PA_CHANNEL_MAP_WAVEEX))
 992     {
 993         AL_PRINT("Couldn't build map for channel count (%d)!\n", data->spec.channels);
 994         ppa_threaded_mainloop_unlock(data->loop);
 995         goto fail;
 996     }
 997
 998     data->stream = ppa_stream_new(data->context, "Capture Stream", &data->spec, &chanmap);
 999     if(!data->stream)
1000     {
1001         AL_PRINT("pa_stream_new() failed: %s\n",
1002                  ppa_strerror(ppa_context_errno(data->context)));
1003
1004         ppa_threaded_mainloop_unlock(data->loop);
1005         goto fail;
1006     }
1007
1008     ppa_stream_set_state_callback(data->stream, stream_state_callback, data->loop);
1009
1010     flags |= PA_STREAM_START_CORKED|PA_STREAM_ADJUST_LATENCY;
1011     if(ppa_stream_connect_record(data->stream, pulse_name, &data->attr, flags) < 0)
1012     {
1013         AL_PRINT("Stream did not connect: %s\n",
1014                  ppa_strerror(ppa_context_errno(data->context)));
1015
1016         ppa_stream_unref(data->stream);
1017         data->stream = NULL;
1018
1019         ppa_threaded_mainloop_unlock(data->loop);
1020         goto fail;
1021     }
1022
1023     while((state=ppa_stream_get_state(data->stream)) != PA_STREAM_READY)
1024     {
1025         if(!PA_STREAM_IS_GOOD(state))
1026         {
1027             AL_PRINT("Stream did not get ready: %s\n",
1028                      ppa_strerror(ppa_context_errno(data->context)));
1029
1030             ppa_stream_unref(data->stream);
1031             data->stream = NULL;
1032
1033             ppa_threaded_mainloop_unlock(data->loop);
1034             goto fail;
1035         }
1036
1037         ppa_threaded_mainloop_wait(data->loop);
1038     }
1039     ppa_stream_set_state_callback(data->stream, stream_state_callback2, device);
1040
1041     ppa_threaded_mainloop_unlock(data->loop);
1042     return ALC_TRUE;
1043
1044 fail:
1045     pulse_close(device);
1046     return ALC_FALSE;
1047 } //}}}
1048
1049 static void pulse_close_capture(ALCdevice *device) //{{{
1050 {
1051     pulse_close(device);
1052 } //}}}
1053
1054 static void pulse_start_capture(ALCdevice *device) //{{{
1055 {
1056     pulse_data *data = device->ExtraData;
1057     pa_operation *o;
1058
1059     ppa_threaded_mainloop_lock(data->loop);
1060     o = ppa_stream_cork(data->stream, 0, stream_success_callback, device);
1061     while(ppa_operation_get_state(o) == PA_OPERATION_RUNNING)
1062         ppa_threaded_mainloop_wait(data->loop);
1063     ppa_operation_unref(o);
1064     ppa_threaded_mainloop_unlock(data->loop);
1065 } //}}}
1066
1067 static void pulse_stop_capture(ALCdevice *device) //{{{
1068 {
1069     pulse_data *data = device->ExtraData;
1070     pa_operation *o;
1071
1072     ppa_threaded_mainloop_lock(data->loop);
1073     o = ppa_stream_cork(data->stream, 1, stream_success_callback, device);
1074     while(ppa_operation_get_state(o) == PA_OPERATION_RUNNING)
1075         ppa_threaded_mainloop_wait(data->loop);
1076     ppa_operation_unref(o);
1077     ppa_threaded_mainloop_unlock(data->loop);
1078 } //}}}
1079
1080 static ALCuint pulse_available_samples(ALCdevice *device) //{{{
1081 {
1082     pulse_data *data = device->ExtraData;
1083     size_t samples;
1084
1085     ppa_threaded_mainloop_lock(data->loop);
1086     /* Capture is done in fragment-sized chunks, so we loop until we get all
1087      * that's available */
1088     samples = (device->Connected ? ppa_stream_readable_size(data->stream) : 0);
1089     while(samples > 0)
1090     {
1091         const void *buf;
1092         size_t length;
1093
1094         if(ppa_stream_peek(data->stream, &buf, &length) < 0)
1095         {
1096             AL_PRINT("pa_stream_peek() failed: %s\n",
1097                      ppa_strerror(ppa_context_errno(data->context)));
1098             break;
1099         }
1100
1101         WriteRingBuffer(data->ring, buf, length/data->frame_size);
1102         samples -= length;
1103
1104         ppa_stream_drop(data->stream);
1105     }
1106     ppa_threaded_mainloop_unlock(data->loop);
1107
1108     return RingBufferSize(data->ring);
1109 } //}}}
1110
1111 static void pulse_capture_samples(ALCdevice *device, ALCvoid *buffer, ALCuint samples) //{{{
1112 {
1113     pulse_data *data = device->ExtraData;
1114
1115     if(pulse_available_samples(device) >= samples)
1116         ReadRingBuffer(data->ring, buffer, samples);
1117     else
1118         alcSetError(device, ALC_INVALID_VALUE);
1119 } //}}}
1120
1121 BackendFuncs pulse_funcs = { //{{{
1122     pulse_open_playback,
1123     pulse_close_playback,
1124     pulse_reset_playback,
1125     pulse_stop_playback,
1126     pulse_open_capture,
1127     pulse_close_capture,
1128     pulse_start_capture,
1129     pulse_stop_capture,
1130     pulse_capture_samples,
1131     pulse_available_samples
1132 }; //}}}
1133
1134 void alc_pulse_init(BackendFuncs *func_list) //{{{
1135 {
1136     *func_list = pulse_funcs;
1137
1138     pulse_ctx_flags = 0;
1139     if(!GetConfigValueBool("pulse", "spawn-server", 0))
1140         pulse_ctx_flags |= PA_CONTEXT_NOAUTOSPAWN;
1141 } //}}}
1142
1143 void alc_pulse_deinit(void) //{{{
1144 {
1145     ALuint i;
1146
1147     for(i = 0;i < numDevNames;++i)
1148     {
1149         free(allDevNameMap[i].name);
1150         free(allDevNameMap[i].device_name);
1151     }
1152     free(allDevNameMap);
1153     allDevNameMap = NULL;
1154     numDevNames = 0;
1155
1156     for(i = 0;i < numCaptureDevNames;++i)
1157     {
1158         free(allCaptureDevNameMap[i].name);
1159         free(allCaptureDevNameMap[i].device_name);
1160     }
1161     free(allCaptureDevNameMap);
1162     allCaptureDevNameMap = NULL;
1163     numCaptureDevNames = 0;
1164
1165     if(pa_handle)
1166     {
1167 #ifdef _WIN32
1168         FreeLibrary(pa_handle);
1169 #elif defined (HAVE_DLFCN_H)
1170         dlclose(pa_handle);
1171 #endif
1172         pa_handle = NULL;
1173     }
1174 } //}}}
1175
1176 void alc_pulse_probe(int type) //{{{
1177 {
1178     if(!pulse_load()) return;
1179
1180     if(type == DEVICE_PROBE)
1181         AppendDeviceList(pulse_device);
1182     else if(type == ALL_DEVICE_PROBE)
1183     {
1184         ALuint i;
1185
1186         for(i = 0;i < numDevNames;++i)
1187         {
1188             free(allDevNameMap[i].name);
1189             free(allDevNameMap[i].device_name);
1190         }
1191         free(allDevNameMap);
1192         allDevNameMap = NULL;
1193         numDevNames = 0;
1194
1195         probe_devices(AL_FALSE);
1196
1197         for(i = 0;i < numDevNames;i++)
1198             AppendAllDeviceList(allDevNameMap[i].name);
1199     }
1200     else if(type == CAPTURE_DEVICE_PROBE)
1201     {
1202         ALuint i;
1203
1204         for(i = 0;i < numCaptureDevNames;++i)
1205         {
1206             free(allCaptureDevNameMap[i].name);
1207             free(allCaptureDevNameMap[i].device_name);
1208         }
1209         free(allCaptureDevNameMap);
1210         allCaptureDevNameMap = NULL;
1211         numCaptureDevNames = 0;
1212
1213         probe_devices(AL_TRUE);
1214
1215         for(i = 0;i < numCaptureDevNames;i++)
1216             AppendCaptureDeviceList(allCaptureDevNameMap[i].name);
1217     }
1218 } //}}}
1219 //}}}