code.delx.au - pulseaudio/blob - src/utils/padsp.c

   1 /* $Id$ */
   2
   3 /***
   4   This file is part of PulseAudio.
   5
   6   PulseAudio is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU Lesser General Public License as published
   8   by the Free Software Foundation; either version 2 of the License,
   9   or (at your option) any later version.
  10
  11   PulseAudio is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public License
  17   along with PulseAudio; if not, write to the Free Software
  18   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  19   USA.
  20 ***/
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include <config.h>
  24 #endif
  25
  26 #ifdef _FILE_OFFSET_BITS
  27 #undef _FILE_OFFSET_BITS
  28 #endif
  29
  30 #ifndef _LARGEFILE64_SOURCE
  31 #define _LARGEFILE64_SOURCE 1
  32 #endif
  33
  34 #include <sys/soundcard.h>
  35 #include <sys/ioctl.h>
  36 #include <pthread.h>
  37 #include <unistd.h>
  38 #include <sys/socket.h>
  39 #include <sys/stat.h>
  40 #include <dlfcn.h>
  41 #include <errno.h>
  42 #include <fcntl.h>
  43 #include <string.h>
  44 #include <stdarg.h>
  45 #include <stdio.h>
  46 #include <signal.h>
  47
  48 #ifdef __linux__
  49 #include <linux/sockios.h>
  50 #endif
  51
  52 #include <pulse/pulseaudio.h>
  53 #include <pulsecore/llist.h>
  54 #include <pulsecore/gccmacro.h>
  55
  56 /* On some systems SIOCINQ isn't defined, but FIONREAD is just an alias */
  57 #if !defined(SIOCINQ) && defined(FIONREAD)
  58 # define SIOCINQ FIONREAD
  59 #endif
  60
  61 typedef enum {
  62     FD_INFO_MIXER,
  63     FD_INFO_STREAM,
  64 } fd_info_type_t;
  65
  66 typedef struct fd_info fd_info;
  67
  68 struct fd_info {
  69     pthread_mutex_t mutex;
  70     int ref;
  71     int unusable;
  72
  73     fd_info_type_t type;
  74     int app_fd, thread_fd;
  75
  76     pa_sample_spec sample_spec;
  77     size_t fragment_size;
  78     unsigned n_fragments;
  79
  80     pa_threaded_mainloop *mainloop;
  81     pa_context *context;
  82     pa_stream *play_stream;
  83     pa_stream *rec_stream;
  84
  85     pa_io_event *io_event;
  86     pa_io_event_flags_t io_flags;
  87
  88     void *buf;
  89     size_t rec_offset;
  90
  91     int operation_success;
  92
  93     pa_cvolume sink_volume, source_volume;
  94     uint32_t sink_index, source_index;
  95     int volume_modify_count;
  96
  97     int optr_n_blocks;
  98
  99     PA_LLIST_FIELDS(fd_info);
 100 };
 101
 102 static int dsp_drain(fd_info *i);
 103 static void fd_info_remove_from_list(fd_info *i);
 104
 105 static pthread_mutex_t fd_infos_mutex = PTHREAD_MUTEX_INITIALIZER;
 106 static pthread_mutex_t func_mutex = PTHREAD_MUTEX_INITIALIZER;
 107
 108 static PA_LLIST_HEAD(fd_info, fd_infos) = NULL;
 109
 110 static int (*_ioctl)(int, int, void*) = NULL;
 111 static int (*_close)(int) = NULL;
 112 static int (*_open)(const char *, int, mode_t) = NULL;
 113 static FILE* (*_fopen)(const char *path, const char *mode) = NULL;
 114 #ifdef HAVE_OPEN64
 115 static int (*_open64)(const char *, int, mode_t) = NULL;
 116 static FILE* (*_fopen64)(const char *path, const char *mode) = NULL;
 117 #endif
 118 static int (*_fclose)(FILE *f) = NULL;
 119 static int (*_access)(const char *, int) = NULL;
 120
 121 /* dlsym() violates ISO C, so confide the breakage into this function to
 122  * avoid warnings. */
 123 typedef void (*fnptr)(void);
 124 static inline fnptr dlsym_fn(void *handle, const char *symbol) {
 125     return (fnptr) (long) dlsym(handle, symbol);
 126 }
 127
 128 #define LOAD_IOCTL_FUNC() \
 129 do { \
 130     pthread_mutex_lock(&func_mutex); \
 131     if (!_ioctl)  \
 132         _ioctl = (int (*)(int, int, void*)) dlsym_fn(RTLD_NEXT, "ioctl"); \
 133     pthread_mutex_unlock(&func_mutex); \
 134 } while(0)
 135
 136 #define LOAD_OPEN_FUNC() \
 137 do { \
 138     pthread_mutex_lock(&func_mutex); \
 139     if (!_open) \
 140         _open = (int (*)(const char *, int, mode_t)) dlsym_fn(RTLD_NEXT, "open"); \
 141     pthread_mutex_unlock(&func_mutex); \
 142 } while(0)
 143
 144 #define LOAD_OPEN64_FUNC() \
 145 do { \
 146     pthread_mutex_lock(&func_mutex); \
 147     if (!_open64) \
 148         _open64 = (int (*)(const char *, int, mode_t)) dlsym_fn(RTLD_NEXT, "open64"); \
 149     pthread_mutex_unlock(&func_mutex); \
 150 } while(0)
 151
 152 #define LOAD_CLOSE_FUNC() \
 153 do { \
 154     pthread_mutex_lock(&func_mutex); \
 155     if (!_close) \
 156         _close = (int (*)(int)) dlsym_fn(RTLD_NEXT, "close"); \
 157     pthread_mutex_unlock(&func_mutex); \
 158 } while(0)
 159
 160 #define LOAD_ACCESS_FUNC() \
 161 do { \
 162     pthread_mutex_lock(&func_mutex); \
 163     if (!_access) \
 164         _access = (int (*)(const char*, int)) dlsym_fn(RTLD_NEXT, "access"); \
 165     pthread_mutex_unlock(&func_mutex); \
 166 } while(0)
 167
 168 #define LOAD_FOPEN_FUNC() \
 169 do { \
 170     pthread_mutex_lock(&func_mutex); \
 171     if (!_fopen) \
 172         _fopen = (FILE* (*)(const char *, const char*)) dlsym_fn(RTLD_NEXT, "fopen"); \
 173     pthread_mutex_unlock(&func_mutex); \
 174 } while(0)
 175
 176 #define LOAD_FOPEN64_FUNC() \
 177 do { \
 178     pthread_mutex_lock(&func_mutex); \
 179     if (!_fopen64) \
 180         _fopen64 = (FILE* (*)(const char *, const char*)) dlsym_fn(RTLD_NEXT, "fopen64"); \
 181     pthread_mutex_unlock(&func_mutex); \
 182 } while(0)
 183
 184 #define LOAD_FCLOSE_FUNC() \
 185 do { \
 186     pthread_mutex_lock(&func_mutex); \
 187     if (!_fclose) \
 188         _fclose = (int (*)(FILE *)) dlsym_fn(RTLD_NEXT, "fclose"); \
 189     pthread_mutex_unlock(&func_mutex); \
 190 } while(0)
 191
 192 #define CONTEXT_CHECK_DEAD_GOTO(i, label) do { \
 193 if (!(i)->context || pa_context_get_state((i)->context) != PA_CONTEXT_READY) { \
 194     debug(DEBUG_LEVEL_NORMAL, __FILE__": Not connected: %s\n", (i)->context ? pa_strerror(pa_context_errno((i)->context)) : "NULL"); \
 195     goto label; \
 196 } \
 197 } while(0);
 198
 199 #define PLAYBACK_STREAM_CHECK_DEAD_GOTO(i, label) do { \
 200 if (!(i)->context || pa_context_get_state((i)->context) != PA_CONTEXT_READY || \
 201     !(i)->play_stream || pa_stream_get_state((i)->play_stream) != PA_STREAM_READY) { \
 202     debug(DEBUG_LEVEL_NORMAL, __FILE__": Not connected: %s\n", (i)->context ? pa_strerror(pa_context_errno((i)->context)) : "NULL"); \
 203     goto label; \
 204 } \
 205 } while(0);
 206
 207 #define RECORD_STREAM_CHECK_DEAD_GOTO(i, label) do { \
 208 if (!(i)->context || pa_context_get_state((i)->context) != PA_CONTEXT_READY || \
 209     !(i)->rec_stream || pa_stream_get_state((i)->rec_stream) != PA_STREAM_READY) { \
 210     debug(DEBUG_LEVEL_NORMAL, __FILE__": Not connected: %s\n", (i)->context ? pa_strerror(pa_context_errno((i)->context)) : "NULL"); \
 211     goto label; \
 212 } \
 213 } while(0);
 214
 215 static void debug(int level, const char *format, ...) PA_GCC_PRINTF_ATTR(2,3);
 216
 217 #define DEBUG_LEVEL_ALWAYS              0
 218 #define DEBUG_LEVEL_NORMAL              1
 219 #define DEBUG_LEVEL_VERBOSE             2
 220
 221 static void debug(int level, const char *format, ...) {
 222     va_list ap;
 223     const char *dlevel_s;
 224     int dlevel;
 225
 226     dlevel_s = getenv("PADSP_DEBUG");
 227     if (!dlevel_s)
 228         return;
 229
 230     dlevel = atoi(dlevel_s);
 231
 232     if (dlevel < level)
 233         return;
 234
 235     va_start(ap, format);
 236     vfprintf(stderr, format, ap);
 237     va_end(ap);
 238 }
 239
 240 static int padsp_disabled(void) {
 241     static int *sym;
 242     static int sym_resolved = 0;
 243
 244     /* If the current process has a symbol __padsp_disabled__ we use
 245      * it to detect whether we should enable our stuff or not. A
 246      * program needs to be compiled with -rdynamic for this to work!
 247      * The symbol must be an int containing a three bit bitmask: bit 1
 248      * -> disable /dev/dsp emulation, bit 2 -> disable /dev/sndstat
 249      * emulation, bit 3 -> disable /dev/mixer emulation. Hence a value
 250      * of 7 disables padsp entirely. */
 251
 252     pthread_mutex_lock(&func_mutex);
 253     if (!sym_resolved) {
 254         sym = (int*) dlsym(RTLD_DEFAULT, "__padsp_disabled__");
 255         sym_resolved = 1;
 256
 257     }
 258     pthread_mutex_unlock(&func_mutex);
 259
 260     if (!sym)
 261         return 0;
 262
 263     return *sym;
 264 }
 265
 266 static int dsp_cloak_enable(void) {
 267     if (padsp_disabled() & 1)
 268         return 0;
 269
 270     if (getenv("PADSP_NO_DSP"))
 271         return 0;
 272
 273     return 1;
 274 }
 275
 276 static int sndstat_cloak_enable(void) {
 277     if (padsp_disabled() & 2)
 278         return 0;
 279
 280     if (getenv("PADSP_NO_SNDSTAT"))
 281         return 0;
 282
 283     return 1;
 284 }
 285
 286 static int mixer_cloak_enable(void) {
 287     if (padsp_disabled() & 4)
 288         return 0;
 289
 290     if (getenv("PADSP_NO_MIXER"))
 291         return 0;
 292
 293     return 1;
 294 }
 295 static pthread_key_t recursion_key;
 296
 297 static void recursion_key_alloc(void) {
 298     pthread_key_create(&recursion_key, NULL);
 299 }
 300
 301 static int function_enter(void) {
 302     /* Avoid recursive calls */
 303     static pthread_once_t recursion_key_once = PTHREAD_ONCE_INIT;
 304     pthread_once(&recursion_key_once, recursion_key_alloc);
 305
 306     if (pthread_getspecific(recursion_key))
 307         return 0;
 308
 309     pthread_setspecific(recursion_key, (void*) 1);
 310     return 1;
 311 }
 312
 313 static void function_exit(void) {
 314     pthread_setspecific(recursion_key, NULL);
 315 }
 316
 317 static void fd_info_free(fd_info *i) {
 318     assert(i);
 319
 320     debug(DEBUG_LEVEL_NORMAL, __FILE__": freeing fd info (fd=%i)\n", i->app_fd);
 321
 322     dsp_drain(i);
 323
 324     if (i->mainloop)
 325         pa_threaded_mainloop_stop(i->mainloop);
 326
 327     if (i->play_stream) {
 328         pa_stream_disconnect(i->play_stream);
 329         pa_stream_unref(i->play_stream);
 330     }
 331
 332     if (i->rec_stream) {
 333         pa_stream_disconnect(i->rec_stream);
 334         pa_stream_unref(i->rec_stream);
 335     }
 336
 337     if (i->context) {
 338         pa_context_disconnect(i->context);
 339         pa_context_unref(i->context);
 340     }
 341
 342     if (i->mainloop)
 343         pa_threaded_mainloop_free(i->mainloop);
 344
 345     if (i->app_fd >= 0) {
 346         LOAD_CLOSE_FUNC();
 347         _close(i->app_fd);
 348     }
 349
 350     if (i->thread_fd >= 0) {
 351         LOAD_CLOSE_FUNC();
 352         _close(i->thread_fd);
 353     }
 354
 355     free(i->buf);
 356
 357     pthread_mutex_destroy(&i->mutex);
 358     free(i);
 359 }
 360
 361 static fd_info *fd_info_ref(fd_info *i) {
 362     assert(i);
 363
 364     pthread_mutex_lock(&i->mutex);
 365     assert(i->ref >= 1);
 366     i->ref++;
 367
 368     debug(DEBUG_LEVEL_VERBOSE, __FILE__": ref++, now %i\n", i->ref);
 369     pthread_mutex_unlock(&i->mutex);
 370
 371     return i;
 372 }
 373
 374 static void fd_info_unref(fd_info *i) {
 375     int r;
 376     pthread_mutex_lock(&i->mutex);
 377     assert(i->ref >= 1);
 378     r = --i->ref;
 379         debug(DEBUG_LEVEL_VERBOSE, __FILE__": ref--, now %i\n", i->ref);
 380     pthread_mutex_unlock(&i->mutex);
 381
 382     if (r <= 0)
 383         fd_info_free(i);
 384 }
 385
 386 static void context_state_cb(pa_context *c, void *userdata) {
 387     fd_info *i = userdata;
 388     assert(c);
 389
 390     switch (pa_context_get_state(c)) {
 391         case PA_CONTEXT_READY:
 392         case PA_CONTEXT_TERMINATED:
 393         case PA_CONTEXT_FAILED:
 394             pa_threaded_mainloop_signal(i->mainloop, 0);
 395             break;
 396
 397         case PA_CONTEXT_UNCONNECTED:
 398         case PA_CONTEXT_CONNECTING:
 399         case PA_CONTEXT_AUTHORIZING:
 400         case PA_CONTEXT_SETTING_NAME:
 401             break;
 402     }
 403 }
 404
 405 static void reset_params(fd_info *i) {
 406     assert(i);
 407
 408     i->sample_spec.format = PA_SAMPLE_U8;
 409     i->sample_spec.channels = 1;
 410     i->sample_spec.rate = 8000;
 411     i->fragment_size = 0;
 412     i->n_fragments = 0;
 413 }
 414
 415 static const char *client_name(char *buf, size_t n) {
 416     char p[PATH_MAX];
 417     const char *e;
 418
 419     if ((e = getenv("PADSP_CLIENT_NAME")))
 420         return e;
 421
 422     if (pa_get_binary_name(p, sizeof(p)))
 423         snprintf(buf, n, "OSS Emulation[%s]", p);
 424     else
 425         snprintf(buf, n, "OSS");
 426
 427     return buf;
 428 }
 429
 430 static const char *stream_name(void) {
 431     const char *e;
 432
 433     if ((e = getenv("PADSP_STREAM_NAME")))
 434         return e;
 435
 436     return "Audio Stream";
 437 }
 438
 439 static void atfork_prepare(void) {
 440     fd_info *i;
 441
 442     debug(DEBUG_LEVEL_NORMAL, __FILE__": atfork_prepare() enter\n");
 443
 444     function_enter();
 445
 446     pthread_mutex_lock(&fd_infos_mutex);
 447
 448     for (i = fd_infos; i; i = i->next) {
 449         pthread_mutex_lock(&i->mutex);
 450         pa_threaded_mainloop_lock(i->mainloop);
 451     }
 452
 453     pthread_mutex_lock(&func_mutex);
 454
 455
 456     debug(DEBUG_LEVEL_NORMAL, __FILE__": atfork_prepare() exit\n");
 457 }
 458
 459 static void atfork_parent(void) {
 460     fd_info *i;
 461
 462     debug(DEBUG_LEVEL_NORMAL, __FILE__": atfork_parent() enter\n");
 463
 464     pthread_mutex_unlock(&func_mutex);
 465
 466     for (i = fd_infos; i; i = i->next) {
 467         pa_threaded_mainloop_unlock(i->mainloop);
 468         pthread_mutex_unlock(&i->mutex);
 469     }
 470
 471     pthread_mutex_unlock(&fd_infos_mutex);
 472
 473     function_exit();
 474
 475     debug(DEBUG_LEVEL_NORMAL, __FILE__": atfork_parent() exit\n");
 476 }
 477
 478 static void atfork_child(void) {
 479     fd_info *i;
 480
 481     debug(DEBUG_LEVEL_NORMAL, __FILE__": atfork_child() enter\n");
 482
 483     /* We do only the bare minimum to get all fds closed */
 484     pthread_mutex_init(&func_mutex, NULL);
 485     pthread_mutex_init(&fd_infos_mutex, NULL);
 486
 487     for (i = fd_infos; i; i = i->next) {
 488         pthread_mutex_init(&i->mutex, NULL);
 489
 490         if (i->context) {
 491             pa_context_disconnect(i->context);
 492             pa_context_unref(i->context);
 493             i->context = NULL;
 494         }
 495
 496         if (i->play_stream) {
 497             pa_stream_unref(i->play_stream);
 498             i->play_stream = NULL;
 499         }
 500
 501         if (i->rec_stream) {
 502             pa_stream_unref(i->rec_stream);
 503             i->rec_stream = NULL;
 504         }
 505
 506         if (i->app_fd >= 0) {
 507             close(i->app_fd);
 508             i->app_fd = -1;
 509         }
 510
 511         if (i->thread_fd >= 0) {
 512             close(i->thread_fd);
 513             i->thread_fd = -1;
 514         }
 515
 516         i->unusable = 1;
 517     }
 518
 519     function_exit();
 520
 521     debug(DEBUG_LEVEL_NORMAL, __FILE__": atfork_child() exit\n");
 522 }
 523
 524 static void install_atfork(void) {
 525     pthread_atfork(atfork_prepare, atfork_parent, atfork_child);
 526 }
 527
 528 static void stream_success_cb(pa_stream *s, int success, void *userdata) {
 529     fd_info *i = userdata;
 530
 531     assert(s);
 532     assert(i);
 533
 534     i->operation_success = success;
 535     pa_threaded_mainloop_signal(i->mainloop, 0);
 536 }
 537
 538 static void context_success_cb(pa_context *c, int success, void *userdata) {
 539     fd_info *i = userdata;
 540
 541     assert(c);
 542     assert(i);
 543
 544     i->operation_success = success;
 545     pa_threaded_mainloop_signal(i->mainloop, 0);
 546 }
 547
 548 static fd_info* fd_info_new(fd_info_type_t type, int *_errno) {
 549     fd_info *i;
 550     int sfds[2] = { -1, -1 };
 551     char name[64];
 552     static pthread_once_t install_atfork_once = PTHREAD_ONCE_INIT;
 553
 554     debug(DEBUG_LEVEL_NORMAL, __FILE__": fd_info_new()\n");
 555
 556     signal(SIGPIPE, SIG_IGN); /* Yes, ugly as hell */
 557
 558     pthread_once(&install_atfork_once, install_atfork);
 559
 560     if (!(i = malloc(sizeof(fd_info)))) {
 561         *_errno = ENOMEM;
 562         goto fail;
 563     }
 564
 565     i->app_fd = i->thread_fd = -1;
 566     i->type = type;
 567
 568     i->mainloop = NULL;
 569     i->context = NULL;
 570     i->play_stream = NULL;
 571     i->rec_stream = NULL;
 572     i->io_event = NULL;
 573     i->io_flags = 0;
 574     pthread_mutex_init(&i->mutex, NULL);
 575     i->ref = 1;
 576     i->buf = NULL;
 577     i->rec_offset = 0;
 578     i->unusable = 0;
 579     pa_cvolume_reset(&i->sink_volume, 2);
 580     pa_cvolume_reset(&i->source_volume, 2);
 581     i->volume_modify_count = 0;
 582     i->sink_index = (uint32_t) -1;
 583     i->source_index = (uint32_t) -1;
 584     i->optr_n_blocks = 0;
 585     PA_LLIST_INIT(fd_info, i);
 586
 587     reset_params(i);
 588
 589     if (socketpair(AF_UNIX, SOCK_STREAM, 0, sfds) < 0) {
 590         *_errno = errno;
 591         debug(DEBUG_LEVEL_NORMAL, __FILE__": socket() failed: %s\n", strerror(errno));
 592         goto fail;
 593     }
 594
 595     i->app_fd = sfds[0];
 596     i->thread_fd = sfds[1];
 597
 598     if (!(i->mainloop = pa_threaded_mainloop_new())) {
 599         *_errno = EIO;
 600         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_threaded_mainloop_new() failed\n");
 601         goto fail;
 602     }
 603
 604     if (!(i->context = pa_context_new(pa_threaded_mainloop_get_api(i->mainloop), client_name(name, sizeof(name))))) {
 605         *_errno = EIO;
 606         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_context_new() failed\n");
 607         goto fail;
 608     }
 609
 610     pa_context_set_state_callback(i->context, context_state_cb, i);
 611
 612     if (pa_context_connect(i->context, NULL, 0, NULL) < 0) {
 613         *_errno = ECONNREFUSED;
 614         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_context_connect() failed: %s\n", pa_strerror(pa_context_errno(i->context)));
 615         goto fail;
 616     }
 617
 618     pa_threaded_mainloop_lock(i->mainloop);
 619
 620     if (pa_threaded_mainloop_start(i->mainloop) < 0) {
 621         *_errno = EIO;
 622         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_threaded_mainloop_start() failed\n");
 623         goto unlock_and_fail;
 624     }
 625
 626     /* Wait until the context is ready */
 627     pa_threaded_mainloop_wait(i->mainloop);
 628
 629     if (pa_context_get_state(i->context) != PA_CONTEXT_READY) {
 630         *_errno = ECONNREFUSED;
 631         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_context_connect() failed: %s\n", pa_strerror(pa_context_errno(i->context)));
 632         goto unlock_and_fail;
 633     }
 634
 635     pa_threaded_mainloop_unlock(i->mainloop);
 636     return i;
 637
 638 unlock_and_fail:
 639
 640     pa_threaded_mainloop_unlock(i->mainloop);
 641
 642 fail:
 643
 644     if (i)
 645         fd_info_unref(i);
 646
 647     return NULL;
 648 }
 649
 650 static void fd_info_add_to_list(fd_info *i) {
 651     assert(i);
 652
 653     pthread_mutex_lock(&fd_infos_mutex);
 654     PA_LLIST_PREPEND(fd_info, fd_infos, i);
 655     pthread_mutex_unlock(&fd_infos_mutex);
 656
 657     fd_info_ref(i);
 658 }
 659
 660 static void fd_info_remove_from_list(fd_info *i) {
 661     assert(i);
 662
 663     pthread_mutex_lock(&fd_infos_mutex);
 664     PA_LLIST_REMOVE(fd_info, fd_infos, i);
 665     pthread_mutex_unlock(&fd_infos_mutex);
 666
 667     fd_info_unref(i);
 668 }
 669
 670 static fd_info* fd_info_find(int fd) {
 671     fd_info *i;
 672
 673     pthread_mutex_lock(&fd_infos_mutex);
 674
 675     for (i = fd_infos; i; i = i->next)
 676         if (i->app_fd == fd && !i->unusable) {
 677             fd_info_ref(i);
 678             break;
 679         }
 680
 681     pthread_mutex_unlock(&fd_infos_mutex);
 682
 683     return i;
 684 }
 685
 686 static void fix_metrics(fd_info *i) {
 687     size_t fs;
 688     char t[PA_SAMPLE_SPEC_SNPRINT_MAX];
 689
 690     fs = pa_frame_size(&i->sample_spec);
 691
 692     /* Don't fix things more than necessary */
 693     if ((i->fragment_size % fs) == 0 &&
 694         i->n_fragments >= 2 &&
 695         i->fragment_size > 0)
 696         return;
 697
 698     i->fragment_size = (i->fragment_size/fs)*fs;
 699
 700     /* Number of fragments set? */
 701     if (i->n_fragments < 2) {
 702         if (i->fragment_size > 0) {
 703             i->n_fragments = pa_bytes_per_second(&i->sample_spec) / 2 / i->fragment_size;
 704             if (i->n_fragments < 2)
 705                 i->n_fragments = 2;
 706         } else
 707             i->n_fragments = 12;
 708     }
 709
 710     /* Fragment size set? */
 711     if (i->fragment_size <= 0) {
 712         i->fragment_size = pa_bytes_per_second(&i->sample_spec) / 2 / i->n_fragments;
 713         if (i->fragment_size < 1024)
 714             i->fragment_size = 1024;
 715     }
 716
 717     debug(DEBUG_LEVEL_NORMAL, __FILE__": sample spec: %s\n", pa_sample_spec_snprint(t, sizeof(t), &i->sample_spec));
 718     debug(DEBUG_LEVEL_NORMAL, __FILE__": fixated metrics to %i fragments, %li bytes each.\n", i->n_fragments, (long)i->fragment_size);
 719 }
 720
 721 static void stream_request_cb(pa_stream *s, size_t length, void *userdata) {
 722     fd_info *i = userdata;
 723     assert(s);
 724
 725     if (i->io_event) {
 726         pa_mainloop_api *api;
 727         size_t n;
 728
 729         api = pa_threaded_mainloop_get_api(i->mainloop);
 730
 731         if (s == i->play_stream) {
 732             n = pa_stream_writable_size(i->play_stream);
 733             if (n == (size_t)-1) {
 734                 debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_writable_size(): %s\n",
 735                     pa_strerror(pa_context_errno(i->context)));
 736             }
 737
 738             if (n >= i->fragment_size)
 739                 i->io_flags |= PA_IO_EVENT_INPUT;
 740             else
 741                 i->io_flags &= ~PA_IO_EVENT_INPUT;
 742         }
 743
 744         if (s == i->rec_stream) {
 745             n = pa_stream_readable_size(i->rec_stream);
 746             if (n == (size_t)-1) {
 747                 debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_readable_size(): %s\n",
 748                     pa_strerror(pa_context_errno(i->context)));
 749             }
 750
 751             if (n >= i->fragment_size)
 752                 i->io_flags |= PA_IO_EVENT_OUTPUT;
 753             else
 754                 i->io_flags &= ~PA_IO_EVENT_OUTPUT;
 755         }
 756
 757         api->io_enable(i->io_event, i->io_flags);
 758     }
 759 }
 760
 761 static void stream_latency_update_cb(pa_stream *s, void *userdata) {
 762     fd_info *i = userdata;
 763     assert(s);
 764
 765     pa_threaded_mainloop_signal(i->mainloop, 0);
 766 }
 767
 768 static void fd_info_shutdown(fd_info *i) {
 769     assert(i);
 770
 771     if (i->io_event) {
 772         pa_mainloop_api *api;
 773         api = pa_threaded_mainloop_get_api(i->mainloop);
 774         api->io_free(i->io_event);
 775         i->io_event = NULL;
 776         i->io_flags = 0;
 777     }
 778
 779     if (i->thread_fd >= 0) {
 780         close(i->thread_fd);
 781         i->thread_fd = -1;
 782     }
 783 }
 784
 785 static int fd_info_copy_data(fd_info *i, int force) {
 786     size_t n;
 787
 788     if (!i->play_stream && !i->rec_stream)
 789         return -1;
 790
 791     if ((i->play_stream) && (pa_stream_get_state(i->play_stream) == PA_STREAM_READY)) {
 792         n = pa_stream_writable_size(i->play_stream);
 793
 794         if (n == (size_t)-1) {
 795             debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_writable_size(): %s\n",
 796                 pa_strerror(pa_context_errno(i->context)));
 797             return -1;
 798         }
 799
 800         while (n >= i->fragment_size || force) {
 801             ssize_t r;
 802
 803             if (!i->buf) {
 804                 if (!(i->buf = malloc(i->fragment_size))) {
 805                     debug(DEBUG_LEVEL_NORMAL, __FILE__": malloc() failed.\n");
 806                     return -1;
 807                 }
 808             }
 809
 810             if ((r = read(i->thread_fd, i->buf, i->fragment_size)) <= 0) {
 811
 812                 if (errno == EAGAIN)
 813                     break;
 814
 815                 debug(DEBUG_LEVEL_NORMAL, __FILE__": read(): %s\n", r == 0 ? "EOF" : strerror(errno));
 816                 return -1;
 817             }
 818
 819             if (pa_stream_write(i->play_stream, i->buf, r, free, 0, PA_SEEK_RELATIVE) < 0) {
 820                 debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_write(): %s\n", pa_strerror(pa_context_errno(i->context)));
 821                 return -1;
 822             }
 823
 824             i->buf = NULL;
 825
 826             assert(n >= (size_t) r);
 827             n -= r;
 828         }
 829
 830         if (n >= i->fragment_size)
 831             i->io_flags |= PA_IO_EVENT_INPUT;
 832         else
 833             i->io_flags &= ~PA_IO_EVENT_INPUT;
 834     }
 835
 836     if ((i->rec_stream) && (pa_stream_get_state(i->rec_stream) == PA_STREAM_READY)) {
 837         n = pa_stream_readable_size(i->rec_stream);
 838
 839         if (n == (size_t)-1) {
 840             debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_readable_size(): %s\n",
 841                 pa_strerror(pa_context_errno(i->context)));
 842             return -1;
 843         }
 844
 845         while (n >= i->fragment_size || force) {
 846             ssize_t r;
 847             const void *data;
 848             const char *buf;
 849             size_t len;
 850
 851             if (pa_stream_peek(i->rec_stream, &data, &len) < 0) {
 852                 debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_peek(): %s\n", pa_strerror(pa_context_errno(i->context)));
 853                 return -1;
 854             }
 855
 856             if (!data)
 857                 break;
 858
 859             buf = (const char*)data + i->rec_offset;
 860
 861             if ((r = write(i->thread_fd, buf, len - i->rec_offset)) <= 0) {
 862
 863                 if (errno == EAGAIN)
 864                     break;
 865
 866                 debug(DEBUG_LEVEL_NORMAL, __FILE__": write(): %s\n", strerror(errno));
 867                 return -1;
 868             }
 869
 870             assert((size_t)r <= len - i->rec_offset);
 871             i->rec_offset += r;
 872
 873             if (i->rec_offset == len) {
 874                 if (pa_stream_drop(i->rec_stream) < 0) {
 875                     debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_drop(): %s\n", pa_strerror(pa_context_errno(i->context)));
 876                     return -1;
 877                 }
 878                 i->rec_offset = 0;
 879             }
 880
 881             assert(n >= (size_t) r);
 882             n -= r;
 883         }
 884
 885         if (n >= i->fragment_size)
 886             i->io_flags |= PA_IO_EVENT_OUTPUT;
 887         else
 888             i->io_flags &= ~PA_IO_EVENT_OUTPUT;
 889     }
 890
 891     if (i->io_event) {
 892         pa_mainloop_api *api;
 893
 894         api = pa_threaded_mainloop_get_api(i->mainloop);
 895         api->io_enable(i->io_event, i->io_flags);
 896     }
 897
 898     return 0;
 899 }
 900
 901 static void stream_state_cb(pa_stream *s, void * userdata) {
 902     fd_info *i = userdata;
 903     assert(s);
 904
 905     switch (pa_stream_get_state(s)) {
 906
 907         case PA_STREAM_READY:
 908             debug(DEBUG_LEVEL_NORMAL, __FILE__": stream established.\n");
 909             break;
 910
 911         case PA_STREAM_FAILED:
 912             debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_connect_playback() failed: %s\n", pa_strerror(pa_context_errno(i->context)));
 913             fd_info_shutdown(i);
 914             break;
 915
 916         case PA_STREAM_TERMINATED:
 917         case PA_STREAM_UNCONNECTED:
 918         case PA_STREAM_CREATING:
 919             break;
 920     }
 921 }
 922
 923 static int create_playback_stream(fd_info *i) {
 924     pa_buffer_attr attr;
 925     int n;
 926
 927     assert(i);
 928
 929     fix_metrics(i);
 930
 931     if (!(i->play_stream = pa_stream_new(i->context, stream_name(), &i->sample_spec, NULL))) {
 932         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_new() failed: %s\n", pa_strerror(pa_context_errno(i->context)));
 933         goto fail;
 934     }
 935
 936     pa_stream_set_state_callback(i->play_stream, stream_state_cb, i);
 937     pa_stream_set_write_callback(i->play_stream, stream_request_cb, i);
 938     pa_stream_set_latency_update_callback(i->play_stream, stream_latency_update_cb, i);
 939
 940     memset(&attr, 0, sizeof(attr));
 941     attr.maxlength = i->fragment_size * (i->n_fragments+1);
 942     attr.tlength = i->fragment_size * i->n_fragments;
 943     attr.prebuf = i->fragment_size;
 944     attr.minreq = i->fragment_size;
 945
 946     if (pa_stream_connect_playback(i->play_stream, NULL, &attr, PA_STREAM_INTERPOLATE_TIMING|PA_STREAM_AUTO_TIMING_UPDATE, NULL, NULL) < 0) {
 947         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_connect_playback() failed: %s\n", pa_strerror(pa_context_errno(i->context)));
 948         goto fail;
 949     }
 950
 951     n = i->fragment_size;
 952     setsockopt(i->app_fd, SOL_SOCKET, SO_SNDBUF, &n, sizeof(n));
 953     n = i->fragment_size;
 954     setsockopt(i->thread_fd, SOL_SOCKET, SO_RCVBUF, &n, sizeof(n));
 955
 956     return 0;
 957
 958 fail:
 959     return -1;
 960 }
 961
 962 static int create_record_stream(fd_info *i) {
 963     pa_buffer_attr attr;
 964     int n;
 965
 966     assert(i);
 967
 968     fix_metrics(i);
 969
 970     if (!(i->rec_stream = pa_stream_new(i->context, stream_name(), &i->sample_spec, NULL))) {
 971         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_new() failed: %s\n", pa_strerror(pa_context_errno(i->context)));
 972         goto fail;
 973     }
 974
 975     pa_stream_set_state_callback(i->rec_stream, stream_state_cb, i);
 976     pa_stream_set_read_callback(i->rec_stream, stream_request_cb, i);
 977     pa_stream_set_latency_update_callback(i->rec_stream, stream_latency_update_cb, i);
 978
 979     memset(&attr, 0, sizeof(attr));
 980     attr.maxlength = i->fragment_size * (i->n_fragments+1);
 981     attr.fragsize = i->fragment_size;
 982
 983     if (pa_stream_connect_record(i->rec_stream, NULL, &attr, PA_STREAM_INTERPOLATE_TIMING|PA_STREAM_AUTO_TIMING_UPDATE) < 0) {
 984         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_connect_playback() failed: %s\n", pa_strerror(pa_context_errno(i->context)));
 985         goto fail;
 986     }
 987
 988     n = i->fragment_size;
 989     setsockopt(i->app_fd, SOL_SOCKET, SO_RCVBUF, &n, sizeof(n));
 990     n = i->fragment_size;
 991     setsockopt(i->thread_fd, SOL_SOCKET, SO_SNDBUF, &n, sizeof(n));
 992
 993     return 0;
 994
 995 fail:
 996     return -1;
 997 }
 998
 999 static void free_streams(fd_info *i) {
1000     assert(i);
1001
1002     if (i->play_stream) {
1003         pa_stream_disconnect(i->play_stream);
1004         pa_stream_unref(i->play_stream);
1005         i->play_stream = NULL;
1006         i->io_flags |= PA_IO_EVENT_INPUT;
1007     }
1008
1009     if (i->rec_stream) {
1010         pa_stream_disconnect(i->rec_stream);
1011         pa_stream_unref(i->rec_stream);
1012         i->rec_stream = NULL;
1013         i->io_flags |= PA_IO_EVENT_OUTPUT;
1014     }
1015
1016     if (i->io_event) {
1017         pa_mainloop_api *api;
1018
1019         api = pa_threaded_mainloop_get_api(i->mainloop);
1020         api->io_enable(i->io_event, i->io_flags);
1021     }
1022 }
1023
1024 static void io_event_cb(pa_mainloop_api *api, pa_io_event *e, int fd, pa_io_event_flags_t flags, void *userdata) {
1025     fd_info *i = userdata;
1026
1027     pa_threaded_mainloop_signal(i->mainloop, 0);
1028
1029     if (flags & PA_IO_EVENT_INPUT) {
1030
1031         if (!i->play_stream) {
1032             if (create_playback_stream(i) < 0)
1033                 goto fail;
1034         } else {
1035             if (fd_info_copy_data(i, 0) < 0)
1036                 goto fail;
1037         }
1038
1039     } else if (flags & PA_IO_EVENT_OUTPUT) {
1040
1041         if (!i->rec_stream) {
1042             if (create_record_stream(i) < 0)
1043                 goto fail;
1044         } else {
1045             if (fd_info_copy_data(i, 0) < 0)
1046                 goto fail;
1047         }
1048
1049     } else if (flags & (PA_IO_EVENT_HANGUP|PA_IO_EVENT_ERROR))
1050         goto fail;
1051
1052     return;
1053
1054 fail:
1055     /* We can't do anything better than removing the event source */
1056     fd_info_shutdown(i);
1057 }
1058
1059 static int dsp_open(int flags, int *_errno) {
1060     fd_info *i;
1061     pa_mainloop_api *api;
1062     int ret;
1063     int f;
1064
1065     debug(DEBUG_LEVEL_NORMAL, __FILE__": dsp_open()\n");
1066
1067     if (!(i = fd_info_new(FD_INFO_STREAM, _errno)))
1068         return -1;
1069
1070     if ((flags & O_NONBLOCK) == O_NONBLOCK) {
1071         if ((f = fcntl(i->app_fd, F_GETFL)) >= 0)
1072             fcntl(i->app_fd, F_SETFL, f|O_NONBLOCK);
1073     }
1074     if ((f = fcntl(i->thread_fd, F_GETFL)) >= 0)
1075         fcntl(i->thread_fd, F_SETFL, f|O_NONBLOCK);
1076
1077     fcntl(i->app_fd, F_SETFD, FD_CLOEXEC);
1078     fcntl(i->thread_fd, F_SETFD, FD_CLOEXEC);
1079
1080     pa_threaded_mainloop_lock(i->mainloop);
1081     api = pa_threaded_mainloop_get_api(i->mainloop);
1082
1083     switch (flags & O_ACCMODE) {
1084     case O_RDONLY:
1085         i->io_flags = PA_IO_EVENT_OUTPUT;
1086         shutdown(i->thread_fd, SHUT_RD);
1087         shutdown(i->app_fd, SHUT_WR);
1088         break;
1089     case O_WRONLY:
1090         i->io_flags = PA_IO_EVENT_INPUT;
1091         shutdown(i->thread_fd, SHUT_WR);
1092         shutdown(i->app_fd, SHUT_RD);
1093         break;
1094     case O_RDWR:
1095         i->io_flags = PA_IO_EVENT_INPUT | PA_IO_EVENT_OUTPUT;
1096         break;
1097     default:
1098         return -1;
1099     }
1100
1101     if (!(i->io_event = api->io_new(api, i->thread_fd, i->io_flags, io_event_cb, i)))
1102         goto fail;
1103
1104     pa_threaded_mainloop_unlock(i->mainloop);
1105
1106     debug(DEBUG_LEVEL_NORMAL, __FILE__": dsp_open() succeeded, fd=%i\n", i->app_fd);
1107
1108     fd_info_add_to_list(i);
1109     ret = i->app_fd;
1110     fd_info_unref(i);
1111
1112     return ret;
1113
1114 fail:
1115     pa_threaded_mainloop_unlock(i->mainloop);
1116
1117     if (i)
1118         fd_info_unref(i);
1119
1120     *_errno = EIO;
1121
1122     debug(DEBUG_LEVEL_NORMAL, __FILE__": dsp_open() failed\n");
1123
1124     return -1;
1125 }
1126
1127 static void sink_info_cb(pa_context *context, const pa_sink_info *si, int eol, void *userdata) {
1128     fd_info *i = userdata;
1129
1130     if (!si && eol < 0) {
1131         i->operation_success = 0;
1132         pa_threaded_mainloop_signal(i->mainloop, 0);
1133         return;
1134     }
1135
1136     if (eol)
1137         return;
1138
1139     if (!pa_cvolume_equal(&i->sink_volume, &si->volume))
1140         i->volume_modify_count++;
1141
1142     i->sink_volume = si->volume;
1143     i->sink_index = si->index;
1144
1145     i->operation_success = 1;
1146     pa_threaded_mainloop_signal(i->mainloop, 0);
1147 }
1148
1149 static void source_info_cb(pa_context *context, const pa_source_info *si, int eol, void *userdata) {
1150     fd_info *i = userdata;
1151
1152     if (!si && eol < 0) {
1153         i->operation_success = 0;
1154         pa_threaded_mainloop_signal(i->mainloop, 0);
1155         return;
1156     }
1157
1158     if (eol)
1159         return;
1160
1161     if (!pa_cvolume_equal(&i->source_volume, &si->volume))
1162         i->volume_modify_count++;
1163
1164     i->source_volume = si->volume;
1165     i->source_index = si->index;
1166
1167     i->operation_success = 1;
1168     pa_threaded_mainloop_signal(i->mainloop, 0);
1169 }
1170
1171 static void subscribe_cb(pa_context *context, pa_subscription_event_type_t t, uint32_t idx, void *userdata) {
1172     fd_info *i = userdata;
1173     pa_operation *o = NULL;
1174
1175     if (i->sink_index != idx)
1176         return;
1177
1178     if ((t & PA_SUBSCRIPTION_EVENT_TYPE_MASK) != PA_SUBSCRIPTION_EVENT_CHANGE)
1179         return;
1180
1181     if (!(o = pa_context_get_sink_info_by_index(i->context, i->sink_index, sink_info_cb, i))) {
1182         debug(DEBUG_LEVEL_NORMAL, __FILE__": Failed to get sink info: %s", pa_strerror(pa_context_errno(i->context)));
1183         return;
1184     }
1185
1186     pa_operation_unref(o);
1187 }
1188
1189 static int mixer_open(int flags, int *_errno) {
1190     fd_info *i;
1191     pa_operation *o = NULL;
1192     int ret;
1193
1194     debug(DEBUG_LEVEL_NORMAL, __FILE__": mixer_open()\n");
1195
1196     if (!(i = fd_info_new(FD_INFO_MIXER, _errno)))
1197         return -1;
1198
1199     pa_threaded_mainloop_lock(i->mainloop);
1200
1201     pa_context_set_subscribe_callback(i->context, subscribe_cb, i);
1202
1203     if (!(o = pa_context_subscribe(i->context, PA_SUBSCRIPTION_MASK_SINK | PA_SUBSCRIPTION_MASK_SOURCE, context_success_cb, i))) {
1204         debug(DEBUG_LEVEL_NORMAL, __FILE__": Failed to subscribe to events: %s", pa_strerror(pa_context_errno(i->context)));
1205         *_errno = EIO;
1206         goto fail;
1207     }
1208
1209     i->operation_success = 0;
1210     while (pa_operation_get_state(o) != PA_OPERATION_DONE) {
1211         pa_threaded_mainloop_wait(i->mainloop);
1212         CONTEXT_CHECK_DEAD_GOTO(i, fail);
1213     }
1214
1215     pa_operation_unref(o);
1216     o = NULL;
1217
1218     if (!i->operation_success) {
1219         debug(DEBUG_LEVEL_NORMAL, __FILE__":Failed to subscribe to events: %s", pa_strerror(pa_context_errno(i->context)));
1220         *_errno = EIO;
1221         goto fail;
1222     }
1223
1224     /* Get sink info */
1225
1226     if (!(o = pa_context_get_sink_info_by_name(i->context, NULL, sink_info_cb, i))) {
1227         debug(DEBUG_LEVEL_NORMAL, __FILE__": Failed to get sink info: %s", pa_strerror(pa_context_errno(i->context)));
1228         *_errno = EIO;
1229         goto fail;
1230     }
1231
1232     i->operation_success = 0;
1233     while (pa_operation_get_state(o) != PA_OPERATION_DONE) {
1234         pa_threaded_mainloop_wait(i->mainloop);
1235         CONTEXT_CHECK_DEAD_GOTO(i, fail);
1236     }
1237
1238     pa_operation_unref(o);
1239     o = NULL;
1240
1241     if (!i->operation_success) {
1242         debug(DEBUG_LEVEL_NORMAL, __FILE__": Failed to get sink info: %s", pa_strerror(pa_context_errno(i->context)));
1243         *_errno = EIO;
1244         goto fail;
1245     }
1246
1247     /* Get source info */
1248
1249     if (!(o = pa_context_get_source_info_by_name(i->context, NULL, source_info_cb, i))) {
1250         debug(DEBUG_LEVEL_NORMAL, __FILE__": Failed to get source info: %s", pa_strerror(pa_context_errno(i->context)));
1251         *_errno = EIO;
1252         goto fail;
1253     }
1254
1255     i->operation_success = 0;
1256     while (pa_operation_get_state(o) != PA_OPERATION_DONE) {
1257         pa_threaded_mainloop_wait(i->mainloop);
1258         CONTEXT_CHECK_DEAD_GOTO(i, fail);
1259     }
1260
1261     pa_operation_unref(o);
1262     o = NULL;
1263
1264     if (!i->operation_success) {
1265         debug(DEBUG_LEVEL_NORMAL, __FILE__": Failed to get source info: %s", pa_strerror(pa_context_errno(i->context)));
1266         *_errno = EIO;
1267         goto fail;
1268     }
1269
1270     pa_threaded_mainloop_unlock(i->mainloop);
1271
1272     debug(DEBUG_LEVEL_NORMAL, __FILE__": mixer_open() succeeded, fd=%i\n", i->app_fd);
1273
1274     fd_info_add_to_list(i);
1275     ret = i->app_fd;
1276     fd_info_unref(i);
1277
1278     return ret;
1279
1280 fail:
1281     if (o)
1282         pa_operation_unref(o);
1283
1284     pa_threaded_mainloop_unlock(i->mainloop);
1285
1286     if (i)
1287         fd_info_unref(i);
1288
1289     *_errno = EIO;
1290
1291     debug(DEBUG_LEVEL_NORMAL, __FILE__": mixer_open() failed\n");
1292
1293     return -1;
1294 }
1295
1296 static int sndstat_open(int flags, int *_errno) {
1297     static const char sndstat[] =
1298         "Sound Driver:3.8.1a-980706 (PulseAudio Virtual OSS)\n"
1299         "Kernel: POSIX\n"
1300         "Config options: 0\n"
1301         "\n"
1302         "Installed drivers:\n"
1303         "Type 255: PulseAudio Virtual OSS\n"
1304         "\n"
1305         "Card config:\n"
1306         "PulseAudio Virtual OSS\n"
1307         "\n"
1308         "Audio devices:\n"
1309         "0: PulseAudio Virtual OSS\n"
1310         "\n"
1311         "Synth devices: NOT ENABLED IN CONFIG\n"
1312         "\n"
1313         "Midi devices:\n"
1314         "\n"
1315         "Timers:\n"
1316         "\n"
1317         "Mixers:\n"
1318         "0: PulseAudio Virtual OSS\n";
1319
1320     char fn[] = "/tmp/padsp-sndstat-XXXXXX";
1321     mode_t u;
1322     int fd = -1;
1323     int e;
1324
1325     debug(DEBUG_LEVEL_NORMAL, __FILE__": sndstat_open()\n");
1326
1327     if (flags != O_RDONLY
1328 #ifdef O_LARGEFILE
1329         && flags != (O_RDONLY|O_LARGEFILE)
1330 #endif
1331        ) {
1332         *_errno = EACCES;
1333         debug(DEBUG_LEVEL_NORMAL, __FILE__": bad access!\n");
1334         goto fail;
1335     }
1336
1337     u = umask(0077);
1338     fd = mkstemp(fn);
1339     e = errno;
1340     umask(u);
1341
1342     if (fd < 0) {
1343         *_errno = e;
1344         debug(DEBUG_LEVEL_NORMAL, __FILE__": mkstemp() failed: %s\n", strerror(errno));
1345         goto fail;
1346     }
1347
1348     unlink(fn);
1349
1350     if (write(fd, sndstat, sizeof(sndstat) -1) != sizeof(sndstat)-1) {
1351         *_errno = errno;
1352         debug(DEBUG_LEVEL_NORMAL, __FILE__": write() failed: %s\n", strerror(errno));
1353         goto fail;
1354     }
1355
1356     if (lseek(fd, SEEK_SET, 0) < 0) {
1357         *_errno = errno;
1358         debug(DEBUG_LEVEL_NORMAL, __FILE__": lseek() failed: %s\n", strerror(errno));
1359         goto fail;
1360     }
1361
1362     return fd;
1363
1364 fail:
1365     if (fd >= 0)
1366         close(fd);
1367     return -1;
1368 }
1369
1370 int open(const char *filename, int flags, ...) {
1371     va_list args;
1372     mode_t mode = 0;
1373     int r, _errno = 0;
1374
1375     debug(DEBUG_LEVEL_VERBOSE, __FILE__": open(%s)\n", filename);
1376
1377     va_start(args, flags);
1378     if (flags & O_CREAT) {
1379       if (sizeof(mode_t) < sizeof(int))
1380         mode = va_arg(args, int);
1381       else
1382         mode = va_arg(args, mode_t);
1383     }
1384     va_end(args);
1385
1386     if (!function_enter()) {
1387         LOAD_OPEN_FUNC();
1388         return _open(filename, flags, mode);
1389     }
1390
1391     if (dsp_cloak_enable() && (strcmp(filename, "/dev/dsp") == 0 || strcmp(filename, "/dev/adsp") == 0)) {
1392         r = dsp_open(flags, &_errno);
1393     } else if (mixer_cloak_enable() && strcmp(filename, "/dev/mixer") == 0) {
1394         r = mixer_open(flags, &_errno);
1395     } else if (sndstat_cloak_enable() && strcmp(filename, "/dev/sndstat") == 0) {
1396         r = sndstat_open(flags, &_errno);
1397     } else {
1398         function_exit();
1399         LOAD_OPEN_FUNC();
1400         return _open(filename, flags, mode);
1401     }
1402
1403     function_exit();
1404
1405     if (_errno)
1406         errno = _errno;
1407
1408     return r;
1409 }
1410
1411 static int mixer_ioctl(fd_info *i, unsigned long request, void*argp, int *_errno) {
1412     int ret = -1;
1413
1414     switch (request) {
1415         case SOUND_MIXER_READ_DEVMASK :
1416             debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_READ_DEVMASK\n");
1417
1418             *(int*) argp = SOUND_MASK_PCM | SOUND_MASK_IGAIN;
1419             break;
1420
1421         case SOUND_MIXER_READ_RECMASK :
1422             debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_READ_RECMASK\n");
1423
1424             *(int*) argp = SOUND_MASK_IGAIN;
1425             break;
1426
1427         case SOUND_MIXER_READ_STEREODEVS:
1428             debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_READ_STEREODEVS\n");
1429
1430             pa_threaded_mainloop_lock(i->mainloop);
1431             *(int*) argp = 0;
1432             if (i->sink_volume.channels > 1)
1433                 *(int*) argp |= SOUND_MASK_PCM;
1434             if (i->source_volume.channels > 1)
1435                 *(int*) argp |= SOUND_MASK_IGAIN;
1436             pa_threaded_mainloop_unlock(i->mainloop);
1437
1438             break;
1439
1440         case SOUND_MIXER_READ_RECSRC:
1441             debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_READ_RECSRC\n");
1442
1443             *(int*) argp = SOUND_MASK_IGAIN;
1444             break;
1445
1446         case SOUND_MIXER_WRITE_RECSRC:
1447             debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_WRITE_RECSRC\n");
1448             break;
1449
1450         case SOUND_MIXER_READ_CAPS:
1451             debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_READ_CAPS\n");
1452
1453             *(int*) argp = 0;
1454             break;
1455
1456         case SOUND_MIXER_READ_PCM:
1457         case SOUND_MIXER_READ_IGAIN: {
1458             pa_cvolume *v;
1459
1460             if (request == SOUND_MIXER_READ_PCM)
1461                 debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_READ_PCM\n");
1462             else
1463                 debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_READ_IGAIN\n");
1464
1465             pa_threaded_mainloop_lock(i->mainloop);
1466
1467             if (request == SOUND_MIXER_READ_PCM)
1468                 v = &i->sink_volume;
1469             else
1470                 v = &i->source_volume;
1471
1472             *(int*) argp =
1473                 ((v->values[0]*100/PA_VOLUME_NORM)) |
1474                 ((v->values[v->channels > 1 ? 1 : 0]*100/PA_VOLUME_NORM)  << 8);
1475
1476             pa_threaded_mainloop_unlock(i->mainloop);
1477
1478             break;
1479         }
1480
1481         case SOUND_MIXER_WRITE_PCM:
1482         case SOUND_MIXER_WRITE_IGAIN: {
1483             pa_cvolume v, *pv;
1484
1485             if (request == SOUND_MIXER_READ_PCM)
1486                 debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_WRITE_PCM\n");
1487             else
1488                 debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_WRITE_IGAIN\n");
1489
1490             pa_threaded_mainloop_lock(i->mainloop);
1491
1492             if (request == SOUND_MIXER_READ_PCM) {
1493                 v = i->sink_volume;
1494                 pv = &i->sink_volume;
1495             } else {
1496                 v = i->source_volume;
1497                 pv = &i->source_volume;
1498             }
1499
1500             pv->values[0] = ((*(int*) argp & 0xFF)*PA_VOLUME_NORM)/100;
1501             pv->values[1] = ((*(int*) argp >> 8)*PA_VOLUME_NORM)/100;
1502
1503             if (!pa_cvolume_equal(pv, &v)) {
1504                 pa_operation *o;
1505
1506                 if (request == SOUND_MIXER_READ_PCM)
1507                     o = pa_context_set_sink_volume_by_index(i->context, i->sink_index, pv, context_success_cb, i);
1508                 else
1509                     o = pa_context_set_source_volume_by_index(i->context, i->source_index, pv, context_success_cb, i);
1510
1511                 if (!o)
1512                     debug(DEBUG_LEVEL_NORMAL, __FILE__":Failed set volume: %s", pa_strerror(pa_context_errno(i->context)));
1513                 else {
1514
1515                     i->operation_success = 0;
1516                     while (pa_operation_get_state(o) != PA_OPERATION_DONE) {
1517                         CONTEXT_CHECK_DEAD_GOTO(i, exit_loop);
1518
1519                         pa_threaded_mainloop_wait(i->mainloop);
1520                     }
1521                 exit_loop:
1522
1523                     if (!i->operation_success)
1524                         debug(DEBUG_LEVEL_NORMAL, __FILE__": Failed to set volume: %s\n", pa_strerror(pa_context_errno(i->context)));
1525
1526                     pa_operation_unref(o);
1527                 }
1528
1529                 /* We don't wait for completion here */
1530                 i->volume_modify_count++;
1531             }
1532
1533             pa_threaded_mainloop_unlock(i->mainloop);
1534
1535             break;
1536         }
1537
1538         case SOUND_MIXER_INFO: {
1539             mixer_info *mi = argp;
1540
1541             debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_MIXER_INFO\n");
1542
1543             memset(mi, 0, sizeof(mixer_info));
1544             strncpy(mi->id, "PULSEAUDIO", sizeof(mi->id));
1545             strncpy(mi->name, "PulseAudio Virtual OSS", sizeof(mi->name));
1546             pa_threaded_mainloop_lock(i->mainloop);
1547             mi->modify_counter = i->volume_modify_count;
1548             pa_threaded_mainloop_unlock(i->mainloop);
1549             break;
1550         }
1551
1552         default:
1553             debug(DEBUG_LEVEL_NORMAL, __FILE__": unknown ioctl 0x%08lx\n", request);
1554
1555             *_errno = EINVAL;
1556             goto fail;
1557     }
1558
1559     ret = 0;
1560
1561 fail:
1562
1563     return ret;
1564 }
1565
1566 static int map_format(int *fmt, pa_sample_spec *ss) {
1567
1568     switch (*fmt) {
1569         case AFMT_MU_LAW:
1570             ss->format = PA_SAMPLE_ULAW;
1571             break;
1572
1573         case AFMT_A_LAW:
1574             ss->format = PA_SAMPLE_ALAW;
1575             break;
1576
1577         case AFMT_S8:
1578             *fmt = AFMT_U8;
1579             /* fall through */
1580         case AFMT_U8:
1581             ss->format = PA_SAMPLE_U8;
1582             break;
1583
1584         case AFMT_U16_BE:
1585             *fmt = AFMT_S16_BE;
1586             /* fall through */
1587         case AFMT_S16_BE:
1588             ss->format = PA_SAMPLE_S16BE;
1589             break;
1590
1591         case AFMT_U16_LE:
1592             *fmt = AFMT_S16_LE;
1593             /* fall through */
1594         case AFMT_S16_LE:
1595             ss->format = PA_SAMPLE_S16LE;
1596             break;
1597
1598         default:
1599             ss->format = PA_SAMPLE_S16NE;
1600             *fmt = AFMT_S16_NE;
1601             break;
1602     }
1603
1604     return 0;
1605 }
1606
1607 static int map_format_back(pa_sample_format_t format) {
1608     switch (format) {
1609         case PA_SAMPLE_S16LE: return AFMT_S16_LE;
1610         case PA_SAMPLE_S16BE: return AFMT_S16_BE;
1611         case PA_SAMPLE_ULAW: return AFMT_MU_LAW;
1612         case PA_SAMPLE_ALAW: return AFMT_A_LAW;
1613         case PA_SAMPLE_U8: return AFMT_U8;
1614         default:
1615             abort();
1616     }
1617 }
1618
1619 static int dsp_flush_fd(int fd) {
1620 #ifdef SIOCINQ
1621     int l;
1622
1623     if (ioctl(fd, SIOCINQ, &l) < 0) {
1624         debug(DEBUG_LEVEL_NORMAL, __FILE__": SIOCINQ: %s\n", strerror(errno));
1625         return -1;
1626     }
1627
1628     while (l > 0) {
1629         char buf[1024];
1630         size_t k;
1631
1632         k = (size_t) l > sizeof(buf) ? sizeof(buf) : (size_t) l;
1633         if (read(fd, buf, k) < 0)
1634             debug(DEBUG_LEVEL_NORMAL, __FILE__": read(): %s\n", strerror(errno));
1635         l -= k;
1636     }
1637
1638     return 0;
1639 #else
1640 # warning "Your platform does not support SIOCINQ, something might not work as intended."
1641     return 0;
1642 #endif
1643 }
1644
1645 static int dsp_flush_socket(fd_info *i) {
1646     int res = 0;
1647
1648     if ((i->thread_fd < 0) && (i->app_fd < 0))
1649         return -1;
1650
1651     if (i->thread_fd >= 0)
1652         res = dsp_flush_fd(i->thread_fd);
1653
1654     if (res < 0)
1655         return res;
1656
1657     if (i->app_fd >= 0)
1658         res = dsp_flush_fd(i->app_fd);
1659
1660     if (res < 0)
1661         return res;
1662
1663     return 0;
1664 }
1665
1666 static int dsp_empty_socket(fd_info *i) {
1667 #ifdef SIOCINQ
1668     int ret = -1;
1669
1670     /* Empty the socket */
1671     for (;;) {
1672         int l;
1673
1674         if (i->thread_fd < 0)
1675             break;
1676
1677         if (ioctl(i->thread_fd, SIOCINQ, &l) < 0) {
1678             debug(DEBUG_LEVEL_NORMAL, __FILE__": SIOCINQ: %s\n", strerror(errno));
1679             break;
1680         }
1681
1682         if (!l) {
1683             ret = 0;
1684             break;
1685         }
1686
1687         pa_threaded_mainloop_wait(i->mainloop);
1688     }
1689
1690     return ret;
1691 #else
1692 # warning "Your platform does not support SIOCINQ, something might not work as intended."
1693     return 0;
1694 #endif
1695 }
1696
1697 static int dsp_drain(fd_info *i) {
1698     pa_operation *o = NULL;
1699     int r = -1;
1700
1701     if (!i->mainloop)
1702         return 0;
1703
1704     debug(DEBUG_LEVEL_NORMAL, __FILE__": Draining.\n");
1705
1706     pa_threaded_mainloop_lock(i->mainloop);
1707
1708     if (dsp_empty_socket(i) < 0)
1709         goto fail;
1710
1711     if (!i->play_stream)
1712         goto fail;
1713
1714     debug(DEBUG_LEVEL_NORMAL, __FILE__": Really draining.\n");
1715
1716     if (!(o = pa_stream_drain(i->play_stream, stream_success_cb, i))) {
1717         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_drain(): %s\n", pa_strerror(pa_context_errno(i->context)));
1718         goto fail;
1719     }
1720
1721     i->operation_success = 0;
1722     while (pa_operation_get_state(o) != PA_OPERATION_DONE) {
1723         PLAYBACK_STREAM_CHECK_DEAD_GOTO(i, fail);
1724
1725         pa_threaded_mainloop_wait(i->mainloop);
1726     }
1727
1728     if (!i->operation_success) {
1729         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_drain() 2: %s\n", pa_strerror(pa_context_errno(i->context)));
1730         goto fail;
1731     }
1732
1733     r = 0;
1734
1735 fail:
1736
1737     if (o)
1738         pa_operation_unref(o);
1739
1740     pa_threaded_mainloop_unlock(i->mainloop);
1741
1742     return 0;
1743 }
1744
1745 static int dsp_trigger(fd_info *i) {
1746     pa_operation *o = NULL;
1747     int r = -1;
1748
1749     if (!i->play_stream)
1750         return 0;
1751
1752     pa_threaded_mainloop_lock(i->mainloop);
1753
1754     if (dsp_empty_socket(i) < 0)
1755         goto fail;
1756
1757     debug(DEBUG_LEVEL_NORMAL, __FILE__": Triggering.\n");
1758
1759     if (!(o = pa_stream_trigger(i->play_stream, stream_success_cb, i))) {
1760         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_trigger(): %s\n", pa_strerror(pa_context_errno(i->context)));
1761         goto fail;
1762     }
1763
1764     i->operation_success = 0;
1765     while (!pa_operation_get_state(o) != PA_OPERATION_DONE) {
1766         PLAYBACK_STREAM_CHECK_DEAD_GOTO(i, fail);
1767
1768         pa_threaded_mainloop_wait(i->mainloop);
1769     }
1770
1771     if (!i->operation_success) {
1772         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_trigger(): %s\n", pa_strerror(pa_context_errno(i->context)));
1773         goto fail;
1774     }
1775
1776     r = 0;
1777
1778 fail:
1779
1780     if (o)
1781         pa_operation_unref(o);
1782
1783     pa_threaded_mainloop_unlock(i->mainloop);
1784
1785     return 0;
1786 }
1787
1788 static int dsp_ioctl(fd_info *i, unsigned long request, void*argp, int *_errno) {
1789     int ret = -1;
1790
1791     switch (request) {
1792         case SNDCTL_DSP_SETFMT: {
1793             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_SETFMT: %i\n", *(int*) argp);
1794
1795             pa_threaded_mainloop_lock(i->mainloop);
1796
1797             if (*(int*) argp == AFMT_QUERY)
1798                 *(int*) argp = map_format_back(i->sample_spec.format);
1799             else {
1800                 map_format((int*) argp, &i->sample_spec);
1801                 free_streams(i);
1802             }
1803
1804             pa_threaded_mainloop_unlock(i->mainloop);
1805             break;
1806         }
1807
1808         case SNDCTL_DSP_SPEED: {
1809             pa_sample_spec ss;
1810             int valid;
1811             char t[256];
1812
1813             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_SPEED: %i\n", *(int*) argp);
1814
1815             pa_threaded_mainloop_lock(i->mainloop);
1816
1817             ss = i->sample_spec;
1818             ss.rate = *(int*) argp;
1819
1820             if ((valid = pa_sample_spec_valid(&ss))) {
1821                 i->sample_spec = ss;
1822                 free_streams(i);
1823             }
1824
1825             debug(DEBUG_LEVEL_NORMAL, __FILE__": ss: %s\n", pa_sample_spec_snprint(t, sizeof(t), &i->sample_spec));
1826
1827             pa_threaded_mainloop_unlock(i->mainloop);
1828
1829             if (!valid) {
1830                 *_errno = EINVAL;
1831                 goto fail;
1832             }
1833
1834             break;
1835         }
1836
1837         case SNDCTL_DSP_STEREO:
1838             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_STEREO: %i\n", *(int*) argp);
1839
1840             pa_threaded_mainloop_lock(i->mainloop);
1841
1842             i->sample_spec.channels = *(int*) argp ? 2 : 1;
1843             free_streams(i);
1844
1845             pa_threaded_mainloop_unlock(i->mainloop);
1846             return 0;
1847
1848         case SNDCTL_DSP_CHANNELS: {
1849             pa_sample_spec ss;
1850             int valid;
1851
1852             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_CHANNELS: %i\n", *(int*) argp);
1853
1854             pa_threaded_mainloop_lock(i->mainloop);
1855
1856             ss = i->sample_spec;
1857             ss.channels = *(int*) argp;
1858
1859             if ((valid = pa_sample_spec_valid(&ss))) {
1860                 i->sample_spec = ss;
1861                 free_streams(i);
1862             }
1863
1864             pa_threaded_mainloop_unlock(i->mainloop);
1865
1866             if (!valid) {
1867                 *_errno = EINVAL;
1868                 goto fail;
1869             }
1870
1871             break;
1872         }
1873
1874         case SNDCTL_DSP_GETBLKSIZE:
1875             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_GETBLKSIZE\n");
1876
1877             pa_threaded_mainloop_lock(i->mainloop);
1878
1879             fix_metrics(i);
1880             *(int*) argp = i->fragment_size;
1881
1882             pa_threaded_mainloop_unlock(i->mainloop);
1883
1884             break;
1885
1886         case SNDCTL_DSP_SETFRAGMENT:
1887             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_SETFRAGMENT: 0x%08x\n", *(int*) argp);
1888
1889             pa_threaded_mainloop_lock(i->mainloop);
1890
1891             i->fragment_size = 1 << ((*(int*) argp) & 31);
1892             i->n_fragments = (*(int*) argp) >> 16;
1893
1894             /* 0x7FFF means that we can set whatever we like */
1895             if (i->n_fragments == 0x7FFF)
1896                 i->n_fragments = 12;
1897
1898             free_streams(i);
1899
1900             pa_threaded_mainloop_unlock(i->mainloop);
1901
1902             break;
1903
1904         case SNDCTL_DSP_GETCAPS:
1905             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_CAPS\n");
1906
1907             *(int*)  argp = DSP_CAP_DUPLEX
1908 #ifdef DSP_CAP_MULTI
1909               | DSP_CAP_MULTI
1910 #endif
1911               ;
1912             break;
1913
1914         case SNDCTL_DSP_GETODELAY: {
1915             int l;
1916
1917             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_GETODELAY\n");
1918
1919             pa_threaded_mainloop_lock(i->mainloop);
1920
1921             *(int*) argp = 0;
1922
1923             for (;;) {
1924                 pa_usec_t usec;
1925
1926                 PLAYBACK_STREAM_CHECK_DEAD_GOTO(i, exit_loop);
1927
1928                 if (pa_stream_get_latency(i->play_stream, &usec, NULL) >= 0) {
1929                     *(int*) argp = pa_usec_to_bytes(usec, &i->sample_spec);
1930                     break;
1931                 }
1932
1933                 if (pa_context_errno(i->context) != PA_ERR_NODATA) {
1934                     debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_get_latency(): %s\n", pa_strerror(pa_context_errno(i->context)));
1935                     break;
1936                 }
1937
1938                 pa_threaded_mainloop_wait(i->mainloop);
1939             }
1940
1941         exit_loop:
1942
1943 #ifdef SIOCINQ
1944             if (ioctl(i->thread_fd, SIOCINQ, &l) < 0)
1945                 debug(DEBUG_LEVEL_NORMAL, __FILE__": SIOCINQ failed: %s\n", strerror(errno));
1946             else
1947                 *(int*) argp += l;
1948 #else
1949 # warning "Your platform does not support SIOCINQ, something might not work as intended."
1950 #endif
1951
1952             pa_threaded_mainloop_unlock(i->mainloop);
1953
1954             debug(DEBUG_LEVEL_NORMAL, __FILE__": ODELAY: %i\n", *(int*) argp);
1955
1956             break;
1957         }
1958
1959         case SNDCTL_DSP_RESET: {
1960             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_RESET\n");
1961
1962             pa_threaded_mainloop_lock(i->mainloop);
1963
1964             free_streams(i);
1965             dsp_flush_socket(i);
1966
1967             i->optr_n_blocks = 0;
1968
1969             pa_threaded_mainloop_unlock(i->mainloop);
1970             break;
1971         }
1972
1973         case SNDCTL_DSP_GETFMTS: {
1974             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_GETFMTS\n");
1975
1976             *(int*) argp = AFMT_MU_LAW|AFMT_A_LAW|AFMT_U8|AFMT_S16_LE|AFMT_S16_BE;
1977             break;
1978         }
1979
1980         case SNDCTL_DSP_POST:
1981             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_POST\n");
1982
1983             if (dsp_trigger(i) < 0)
1984                 *_errno = EIO;
1985             break;
1986
1987         case SNDCTL_DSP_SYNC:
1988             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_SYNC\n");
1989
1990             if (dsp_drain(i) < 0)
1991                 *_errno = EIO;
1992
1993             break;
1994
1995         case SNDCTL_DSP_GETOSPACE:
1996         case SNDCTL_DSP_GETISPACE: {
1997             audio_buf_info *bi = (audio_buf_info*) argp;
1998             int l = 0;
1999             size_t k = 0;
2000
2001             if (request == SNDCTL_DSP_GETOSPACE)
2002                 debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_GETOSPACE\n");
2003             else
2004                 debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_GETISPACE\n");
2005
2006             pa_threaded_mainloop_lock(i->mainloop);
2007
2008             fix_metrics(i);
2009
2010             if (request == SNDCTL_DSP_GETOSPACE) {
2011                 if (i->play_stream) {
2012                     if ((k = pa_stream_writable_size(i->play_stream)) == (size_t) -1)
2013                         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_writable_size(): %s\n", pa_strerror(pa_context_errno(i->context)));
2014                 } else
2015                     k = i->fragment_size * i->n_fragments;
2016
2017 #ifdef SIOCINQ
2018                 if (ioctl(i->thread_fd, SIOCINQ, &l) < 0) {
2019                     debug(DEBUG_LEVEL_NORMAL, __FILE__": SIOCINQ failed: %s\n", strerror(errno));
2020                     l = 0;
2021                 }
2022 #else
2023 # warning "Your platform does not dsp_flush_fd, something might not work as intended."
2024 #endif
2025
2026                 bi->bytes = k > (size_t) l ? k - l : 0;
2027             } else {
2028                 if (i->rec_stream) {
2029                     if ((k = pa_stream_readable_size(i->rec_stream)) == (size_t) -1)
2030                         debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_readable_size(): %s\n", pa_strerror(pa_context_errno(i->context)));
2031                 } else
2032                     k = 0;
2033
2034 #ifdef SIOCINQ
2035                 if (ioctl(i->app_fd, SIOCINQ, &l) < 0) {
2036                     debug(DEBUG_LEVEL_NORMAL, __FILE__": SIOCINQ failed: %s\n", strerror(errno));
2037                     l = 0;
2038                 }
2039 #else
2040 # warning "Your platform does not dsp_flush_fd, something might not work as intended."
2041 #endif
2042                 bi->bytes = k + l;
2043             }
2044
2045             bi->fragsize = i->fragment_size;
2046             bi->fragstotal = i->n_fragments;
2047             bi->fragments = bi->bytes / bi->fragsize;
2048
2049             pa_threaded_mainloop_unlock(i->mainloop);
2050
2051             debug(DEBUG_LEVEL_NORMAL, __FILE__": fragsize=%i, fragstotal=%i, bytes=%i, fragments=%i\n", bi->fragsize, bi->fragstotal, bi->bytes, bi->fragments);
2052
2053             break;
2054         }
2055
2056         case SOUND_PCM_READ_RATE:
2057             debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_PCM_READ_RATE\n");
2058
2059             pa_threaded_mainloop_lock(i->mainloop);
2060             *(int*) argp = i->sample_spec.rate;
2061             pa_threaded_mainloop_unlock(i->mainloop);
2062             break;
2063
2064         case SOUND_PCM_READ_CHANNELS:
2065             debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_PCM_READ_CHANNELS\n");
2066
2067             pa_threaded_mainloop_lock(i->mainloop);
2068             *(int*) argp = i->sample_spec.channels;
2069             pa_threaded_mainloop_unlock(i->mainloop);
2070             break;
2071
2072         case SOUND_PCM_READ_BITS:
2073             debug(DEBUG_LEVEL_NORMAL, __FILE__": SOUND_PCM_READ_BITS\n");
2074
2075             pa_threaded_mainloop_lock(i->mainloop);
2076             *(int*) argp = pa_sample_size(&i->sample_spec)*8;
2077             pa_threaded_mainloop_unlock(i->mainloop);
2078             break;
2079
2080         case SNDCTL_DSP_GETOPTR: {
2081             count_info *info;
2082
2083             debug(DEBUG_LEVEL_NORMAL, __FILE__": SNDCTL_DSP_GETOPTR\n");
2084
2085             info = (count_info*) argp;
2086             memset(info, 0, sizeof(*info));
2087
2088             pa_threaded_mainloop_lock(i->mainloop);
2089
2090             for (;;) {
2091                 pa_usec_t usec;
2092
2093                 PLAYBACK_STREAM_CHECK_DEAD_GOTO(i, exit_loop);
2094
2095                 if (pa_stream_get_time(i->play_stream, &usec) >= 0) {
2096                     size_t k = pa_usec_to_bytes(usec, &i->sample_spec);
2097                     int m;
2098
2099                     info->bytes = (int) k;
2100                     m = k / i->fragment_size;
2101                     info->blocks = m - i->optr_n_blocks;
2102                     i->optr_n_blocks = m;
2103
2104                     break;
2105                 }
2106
2107                 if (pa_context_errno(i->context) != PA_ERR_NODATA) {
2108                     debug(DEBUG_LEVEL_NORMAL, __FILE__": pa_stream_get_latency(): %s\n", pa_strerror(pa_context_errno(i->context)));
2109                     break;
2110                 }
2111
2112                 pa_threaded_mainloop_wait(i->mainloop);
2113             }
2114
2115             pa_threaded_mainloop_unlock(i->mainloop);
2116
2117             debug(DEBUG_LEVEL_NORMAL, __FILE__": GETOPTR bytes=%i, blocks=%i, ptr=%i\n", info->bytes, info->blocks, info->ptr);
2118
2119             break;
2120         }
2121
2122         case SNDCTL_DSP_GETIPTR:
2123             debug(DEBUG_LEVEL_NORMAL, __FILE__": invalid ioctl SNDCTL_DSP_GETIPTR\n");
2124             goto inval;
2125
2126         default:
2127             debug(DEBUG_LEVEL_NORMAL, __FILE__": unknown ioctl 0x%08lx\n", request);
2128
2129 inval:
2130             *_errno = EINVAL;
2131             goto fail;
2132     }
2133
2134     ret = 0;
2135
2136 fail:
2137
2138     return ret;
2139 }
2140
2141 int ioctl(int fd, unsigned long request, ...) {
2142     fd_info *i;
2143     va_list args;
2144     void *argp;
2145     int r, _errno = 0;
2146
2147     debug(DEBUG_LEVEL_VERBOSE, __FILE__": ioctl()\n");
2148
2149     va_start(args, request);
2150     argp = va_arg(args, void *);
2151     va_end(args);
2152
2153     if (!function_enter()) {
2154         LOAD_IOCTL_FUNC();
2155         return _ioctl(fd, request, argp);
2156     }
2157
2158     if (!(i = fd_info_find(fd))) {
2159         function_exit();
2160         LOAD_IOCTL_FUNC();
2161         return _ioctl(fd, request, argp);
2162     }
2163
2164     if (i->type == FD_INFO_MIXER)
2165         r = mixer_ioctl(i, request, argp, &_errno);
2166     else
2167         r = dsp_ioctl(i, request, argp, &_errno);
2168
2169     fd_info_unref(i);
2170
2171     if (_errno)
2172         errno = _errno;
2173
2174     function_exit();
2175
2176     return r;
2177 }
2178
2179 int close(int fd) {
2180     fd_info *i;
2181
2182     debug(DEBUG_LEVEL_VERBOSE, __FILE__": close()\n");
2183
2184     if (!function_enter()) {
2185         LOAD_CLOSE_FUNC();
2186         return _close(fd);
2187     }
2188
2189     if (!(i = fd_info_find(fd))) {
2190         function_exit();
2191         LOAD_CLOSE_FUNC();
2192         return _close(fd);
2193     }
2194
2195     fd_info_remove_from_list(i);
2196     fd_info_unref(i);
2197
2198     function_exit();
2199
2200     return 0;
2201 }
2202
2203 int access(const char *pathname, int mode) {
2204
2205     if (!pathname) {
2206         /* Firefox needs this. See #27 */
2207         errno = EFAULT;
2208         return -1;
2209     }
2210
2211     debug(DEBUG_LEVEL_VERBOSE, __FILE__": access(%s)\n", pathname);
2212
2213     if (strcmp(pathname, "/dev/dsp") != 0 &&
2214         strcmp(pathname, "/dev/adsp") != 0 &&
2215         strcmp(pathname, "/dev/sndstat") != 0 &&
2216         strcmp(pathname, "/dev/mixer") != 0) {
2217         LOAD_ACCESS_FUNC();
2218         return _access(pathname, mode);
2219     }
2220
2221     if (mode & (W_OK | X_OK)) {
2222         debug(DEBUG_LEVEL_NORMAL, __FILE__": access(%s, %x) = EACCESS\n", pathname, mode);
2223         errno = EACCES;
2224         return -1;
2225     }
2226
2227     debug(DEBUG_LEVEL_NORMAL, __FILE__": access(%s, %x) = OK\n", pathname, mode);
2228
2229     return 0;
2230 }
2231
2232 #ifdef HAVE_OPEN64
2233
2234 int open64(const char *filename, int flags, ...) {
2235     va_list args;
2236     mode_t mode = 0;
2237
2238     debug(DEBUG_LEVEL_VERBOSE, __FILE__": open64(%s)\n", filename);
2239
2240     va_start(args, flags);
2241     if (flags & O_CREAT)
2242         mode = va_arg(args, mode_t);
2243     va_end(args);
2244
2245     if (strcmp(filename, "/dev/dsp") != 0 &&
2246         strcmp(filename, "/dev/adsp") != 0 &&
2247         strcmp(filename, "/dev/sndstat") != 0 &&
2248         strcmp(filename, "/dev/mixer") != 0) {
2249         LOAD_OPEN64_FUNC();
2250         return _open64(filename, flags, mode);
2251     }
2252
2253     return open(filename, flags, mode);
2254 }
2255
2256 #endif
2257
2258 FILE* fopen(const char *filename, const char *mode) {
2259     FILE *f = NULL;
2260     int fd;
2261     mode_t m;
2262
2263     debug(DEBUG_LEVEL_VERBOSE, __FILE__": fopen(%s)\n", filename);
2264
2265     if (strcmp(filename, "/dev/dsp") != 0 &&
2266         strcmp(filename, "/dev/adsp") != 0 &&
2267         strcmp(filename, "/dev/sndstat") != 0 &&
2268         strcmp(filename, "/dev/mixer") != 0) {
2269         LOAD_FOPEN_FUNC();
2270         return _fopen(filename, mode);
2271     }
2272
2273     switch (mode[0]) {
2274     case 'r':
2275         m = O_RDONLY;
2276         break;
2277     case 'w':
2278     case 'a':
2279         m = O_WRONLY;
2280         break;
2281     default:
2282         errno = EINVAL;
2283         return NULL;
2284     }
2285
2286     if ((((mode[1] == 'b') || (mode[1] == 't')) && (mode[2] == '+')) || (mode[1] == '+'))
2287         m = O_RDWR;
2288
2289     if ((fd = open(filename, m)) < 0)
2290         return NULL;
2291
2292     if (!(f = fdopen(fd, mode))) {
2293         close(fd);
2294         return NULL;
2295     }
2296
2297     return f;
2298 }
2299
2300 #ifdef HAVE_OPEN64
2301
2302 FILE *fopen64(const char *filename, const char *mode) {
2303
2304     debug(DEBUG_LEVEL_VERBOSE, __FILE__": fopen64(%s)\n", filename);
2305
2306     if (strcmp(filename, "/dev/dsp") != 0 &&
2307         strcmp(filename, "/dev/adsp") != 0 &&
2308         strcmp(filename, "/dev/sndstat") != 0 &&
2309         strcmp(filename, "/dev/mixer") != 0) {
2310         LOAD_FOPEN64_FUNC();
2311         return _fopen64(filename, mode);
2312     }
2313
2314     return fopen(filename, mode);
2315 }
2316
2317 #endif
2318
2319 int fclose(FILE *f) {
2320     fd_info *i;
2321
2322     debug(DEBUG_LEVEL_VERBOSE, __FILE__": fclose()\n");
2323
2324     if (!function_enter()) {
2325         LOAD_FCLOSE_FUNC();
2326         return _fclose(f);
2327     }
2328
2329     if (!(i = fd_info_find(fileno(f)))) {
2330         function_exit();
2331         LOAD_FCLOSE_FUNC();
2332         return _fclose(f);
2333     }
2334
2335     fd_info_remove_from_list(i);
2336
2337     /* Dirty trick to avoid that the fd is not freed twice, once by us
2338      * and once by the real fclose() */
2339     i->app_fd = -1;
2340
2341     fd_info_unref(i);
2342
2343     function_exit();
2344
2345     LOAD_FCLOSE_FUNC();
2346     return _fclose(f);
2347 }