src/tests/interpol-test.c

   1 /***
   2   This file is part of PulseAudio.
   3
   4   PulseAudio is free software; you can redistribute it and/or modify
   5   it under the terms of the GNU Lesser General Public License as published
   6   by the Free Software Foundation; either version 2.1 of the License,
   7   or (at your option) any later version.
   8
   9   PulseAudio is distributed in the hope that it will be useful, but
  10   WITHOUT ANY WARRANTY; without even the implied warranty of
  11   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  12   General Public License for more details.
  13
  14   You should have received a copy of the GNU Lesser General Public License
  15   along with PulseAudio; if not, write to the Free Software
  16   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  17   USA.
  18 ***/
  19
  20 #ifdef HAVE_CONFIG_H
  21 #include <config.h>
  22 #endif
  23
  24 #include <signal.h>
  25 #include <string.h>
  26 #include <errno.h>
  27 #include <unistd.h>
  28 #include <assert.h>
  29 #include <stdio.h>
  30 #include <stdlib.h>
  31 #include <math.h>
  32
  33 #include <pulse/pulseaudio.h>
  34 #include <pulse/mainloop.h>
  35
  36 #include <pulsecore/thread.h>
  37
  38 #define INTERPOLATE
  39 //#define CORK
  40
  41 static pa_context *context = NULL;
  42 static pa_stream *stream = NULL;
  43 static pa_mainloop_api *mainloop_api = NULL;
  44 static pa_bool_t playback = TRUE;
  45 static pa_usec_t latency = 0;
  46
  47 static void stream_write_cb(pa_stream *p, size_t nbytes, void *userdata) {
  48     /* Just some silence */
  49
  50     for (;;) {
  51         void *data;
  52
  53         pa_assert_se((nbytes = pa_stream_writable_size(p)) != (size_t) -1);
  54
  55         if (nbytes <= 0)
  56             break;
  57
  58         pa_assert_se(pa_stream_begin_write(p, &data, &nbytes) == 0);
  59         pa_memzero(data, nbytes);
  60         pa_assert_se(pa_stream_write(p, data, nbytes, NULL, 0, PA_SEEK_RELATIVE) == 0);
  61     }
  62 }
  63
  64 static void stream_read_cb(pa_stream *p, size_t nbytes, void *userdata) {
  65     /* We don't care about the data, just drop it */
  66
  67     for (;;) {
  68         const void *data;
  69
  70         pa_assert_se((nbytes = pa_stream_readable_size(p)) != (size_t) -1);
  71
  72         if (nbytes <= 0)
  73             break;
  74
  75         pa_assert_se(pa_stream_peek(p, &data, &nbytes) == 0);
  76         pa_assert_se(pa_stream_drop(p) == 0);
  77     }
  78 }
  79
  80 static void stream_latency_cb(pa_stream *p, void *userdata) {
  81 #ifndef INTERPOLATE
  82     pa_operation *o;
  83
  84     o = pa_stream_update_timing_info(p, NULL, NULL);
  85     pa_operation_unref(o);
  86 #endif
  87 }
  88
  89 /* This is called whenever the context status changes */
  90 static void context_state_callback(pa_context *c, void *userdata) {
  91     assert(c);
  92
  93     switch (pa_context_get_state(c)) {
  94         case PA_CONTEXT_CONNECTING:
  95         case PA_CONTEXT_AUTHORIZING:
  96         case PA_CONTEXT_SETTING_NAME:
  97             break;
  98
  99         case PA_CONTEXT_READY: {
 100             pa_stream_flags_t flags = PA_STREAM_AUTO_TIMING_UPDATE;
 101             pa_buffer_attr attr;
 102             static const pa_sample_spec ss = {
 103                 .format = PA_SAMPLE_S16LE,
 104                 .rate = 44100,
 105                 .channels = 2
 106             };
 107
 108             pa_zero(attr);
 109             attr.maxlength = (uint32_t) -1;
 110             attr.tlength = latency > 0 ? (uint32_t) pa_usec_to_bytes(latency, &ss) : (uint32_t) -1;
 111             attr.prebuf = (uint32_t) -1;
 112             attr.minreq = (uint32_t) -1;
 113             attr.fragsize = (uint32_t) -1;
 114
 115 #ifdef INTERPOLATE
 116             flags |= PA_STREAM_INTERPOLATE_TIMING;
 117 #endif
 118
 119             if (latency > 0)
 120                 flags |= PA_STREAM_ADJUST_LATENCY;
 121
 122             fprintf(stderr, "Connection established.\n");
 123
 124             pa_assert_se(stream = pa_stream_new(c, "interpol-test", &ss, NULL));
 125
 126             if (playback) {
 127                 pa_assert_se(pa_stream_connect_playback(stream, NULL, &attr, flags, NULL, NULL) == 0);
 128                 pa_stream_set_write_callback(stream, stream_write_cb, NULL);
 129             } else {
 130                 pa_assert_se(pa_stream_connect_record(stream, NULL, &attr, flags) == 0);
 131                 pa_stream_set_read_callback(stream, stream_read_cb, NULL);
 132             }
 133
 134             pa_stream_set_latency_update_callback(stream, stream_latency_cb, NULL);
 135
 136             break;
 137         }
 138
 139         case PA_CONTEXT_TERMINATED:
 140             break;
 141
 142         case PA_CONTEXT_FAILED:
 143         default:
 144             fprintf(stderr, "Context error: %s\n", pa_strerror(pa_context_errno(c)));
 145             abort();
 146     }
 147 }
 148
 149 int main(int argc, char *argv[]) {
 150     pa_threaded_mainloop* m = NULL;
 151     int k;
 152     struct timeval start, last_info = { 0, 0 };
 153     pa_usec_t old_t = 0, old_rtc = 0;
 154 #ifdef CORK
 155     pa_bool_t corked = FALSE;
 156 #endif
 157
 158     pa_log_set_level(PA_LOG_DEBUG);
 159
 160     playback = argc <= 1 || !pa_streq(argv[1], "-r");
 161
 162     latency =
 163         (argc >= 2 && !pa_streq(argv[1], "-r")) ? atoi(argv[1]) :
 164         (argc >= 3 ? atoi(argv[2]) : 0);
 165
 166     /* Set up a new main loop */
 167     pa_assert_se(m = pa_threaded_mainloop_new());
 168     pa_assert_se(mainloop_api = pa_threaded_mainloop_get_api(m));
 169     pa_assert_se(context = pa_context_new(mainloop_api, argv[0]));
 170
 171     pa_context_set_state_callback(context, context_state_callback, NULL);
 172
 173     pa_assert_se(pa_context_connect(context, NULL, 0, NULL) >= 0);
 174
 175     pa_gettimeofday(&start);
 176
 177     pa_assert_se(pa_threaded_mainloop_start(m) >= 0);
 178
 179 /* #ifdef CORK */
 180     for (k = 0; k < 20000; k++)
 181 /* #else */
 182 /*     for (k = 0; k < 2000; k++) */
 183 /* #endif */
 184     {
 185         pa_bool_t success = FALSE, changed = FALSE;
 186         pa_usec_t t, rtc, d;
 187         struct timeval now, tv;
 188         pa_bool_t playing = FALSE;
 189
 190         pa_threaded_mainloop_lock(m);
 191
 192         if (stream) {
 193             const pa_timing_info *info;
 194
 195             if (pa_stream_get_time(stream, &t) >= 0 &&
 196                 pa_stream_get_latency(stream, &d, NULL) >= 0)
 197                 success = TRUE;
 198
 199             if ((info = pa_stream_get_timing_info(stream))) {
 200                 if (memcmp(&last_info, &info->timestamp, sizeof(struct timeval))) {
 201                     changed = TRUE;
 202                     last_info = info->timestamp;
 203                 }
 204                 if (info->playing)
 205                     playing = TRUE;
 206             }
 207         }
 208
 209         pa_threaded_mainloop_unlock(m);
 210
 211         pa_gettimeofday(&now);
 212
 213         if (success) {
 214 #ifdef CORK
 215             pa_bool_t cork_now;
 216 #endif
 217             rtc = pa_timeval_diff(&now, &start);
 218             printf("%i\t%llu\t%llu\t%llu\t%llu\t%lli\t%u\t%u\t%llu\t%llu\n", k,
 219                    (unsigned long long) rtc,
 220                    (unsigned long long) t,
 221                    (unsigned long long) (rtc-old_rtc),
 222                    (unsigned long long) (t-old_t),
 223                    (signed long long) rtc - (signed long long) t,
 224                    changed,
 225                    playing,
 226                    (unsigned long long) latency,
 227                    (unsigned long long) d);
 228
 229             fflush(stdout);
 230             old_t = t;
 231             old_rtc = rtc;
 232
 233 #ifdef CORK
 234             cork_now = (rtc / (2*PA_USEC_PER_SEC)) % 2 == 1;
 235
 236             if (corked != cork_now) {
 237                 pa_threaded_mainloop_lock(m);
 238                 pa_operation_unref(pa_stream_cork(stream, cork_now, NULL, NULL));
 239                 pa_threaded_mainloop_unlock(m);
 240
 241                 pa_log(cork_now ? "Corking" : "Uncorking");
 242
 243                 corked = cork_now;
 244             }
 245 #endif
 246         }
 247
 248         /* Spin loop, ugly but normal usleep() is just too badly grained */
 249
 250         tv = now;
 251         while (pa_timeval_diff(pa_gettimeofday(&now), &tv) < 1000)
 252             pa_thread_yield();
 253     }
 254
 255     if (m)
 256         pa_threaded_mainloop_stop(m);
 257
 258     if (stream) {
 259         pa_stream_disconnect(stream);
 260         pa_stream_unref(stream);
 261     }
 262
 263     if (context) {
 264         pa_context_disconnect(context);
 265         pa_context_unref(context);
 266     }
 267
 268     if (m)
 269         pa_threaded_mainloop_free(m);
 270
 271     return 0;
 272 }