polyp/protocol-native.c

   1 /* $Id$ */
   2
   3 /***
   4   This file is part of polypaudio.
   5
   6   polypaudio is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU 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   polypaudio 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 General Public License
  17   along with polypaudio; 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 #include <string.h>
  27 #include <stdio.h>
  28 #include <assert.h>
  29 #include <stdlib.h>
  30
  31 #include "protocol-native.h"
  32 #include "native-common.h"
  33 #include "packet.h"
  34 #include "client.h"
  35 #include "source-output.h"
  36 #include "sink-input.h"
  37 #include "pstream.h"
  38 #include "tagstruct.h"
  39 #include "pdispatch.h"
  40 #include "pstream-util.h"
  41 #include "authkey.h"
  42 #include "namereg.h"
  43 #include "scache.h"
  44 #include "xmalloc.h"
  45 #include "util.h"
  46 #include "subscribe.h"
  47 #include "log.h"
  48 #include "autoload.h"
  49
  50 struct connection;
  51 struct pa_protocol_native;
  52
  53 struct record_stream {
  54     struct connection *connection;
  55     uint32_t index;
  56     struct pa_source_output *source_output;
  57     struct pa_memblockq *memblockq;
  58     size_t fragment_size;
  59 };
  60
  61 struct playback_stream {
  62     int type;
  63     struct connection *connection;
  64     uint32_t index;
  65     struct pa_sink_input *sink_input;
  66     struct pa_memblockq *memblockq;
  67     size_t requested_bytes;
  68     int drain_request;
  69     uint32_t drain_tag;
  70 };
  71
  72 struct upload_stream {
  73     int type;
  74     struct connection *connection;
  75     uint32_t index;
  76     struct pa_memchunk memchunk;
  77     size_t length;
  78     char *name;
  79     struct pa_sample_spec sample_spec;
  80 };
  81
  82 struct output_stream {
  83     int type;
  84 };
  85
  86 enum {
  87     UPLOAD_STREAM,
  88     PLAYBACK_STREAM
  89 };
  90
  91 struct connection {
  92     int authorized;
  93     struct pa_protocol_native *protocol;
  94     struct pa_client *client;
  95     struct pa_pstream *pstream;
  96     struct pa_pdispatch *pdispatch;
  97     struct pa_idxset *record_streams, *output_streams;
  98     uint32_t rrobin_index;
  99     struct pa_subscription *subscription;
 100 };
 101
 102 struct pa_protocol_native {
 103     struct pa_module *module;
 104     int public;
 105     struct pa_core *core;
 106     struct pa_socket_server *server;
 107     struct pa_idxset *connections;
 108     uint8_t auth_cookie[PA_NATIVE_COOKIE_LENGTH];
 109 };
 110
 111 static int sink_input_peek_cb(struct pa_sink_input *i, struct pa_memchunk *chunk);
 112 static void sink_input_drop_cb(struct pa_sink_input *i, const struct pa_memchunk *chunk, size_t length);
 113 static void sink_input_kill_cb(struct pa_sink_input *i);
 114 static pa_usec_t sink_input_get_latency_cb(struct pa_sink_input *i);
 115
 116 static void request_bytes(struct playback_stream*s);
 117
 118 static void source_output_kill_cb(struct pa_source_output *o);
 119 static void source_output_push_cb(struct pa_source_output *o, const struct pa_memchunk *chunk);
 120 static pa_usec_t source_output_get_latency_cb(struct pa_source_output *o);
 121
 122 static void command_exit(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 123 static void command_create_playback_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 124 static void command_drain_playback_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 125 static void command_create_record_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 126 static void command_delete_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 127 static void command_auth(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 128 static void command_set_client_name(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 129 static void command_lookup(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 130 static void command_stat(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 131 static void command_get_playback_latency(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 132 static void command_get_record_latency(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 133 static void command_create_upload_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 134 static void command_finish_upload_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 135 static void command_play_sample(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 136 static void command_remove_sample(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 137 static void command_get_info(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 138 static void command_get_info_list(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 139 static void command_get_server_info(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 140 static void command_subscribe(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 141 static void command_set_volume(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 142 static void command_cork_playback_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 143 static void command_flush_or_trigger_playback_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 144 static void command_set_default_sink_or_source(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 145 static void command_set_stream_name(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 146 static void command_kill(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 147 static void command_load_module(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 148 static void command_unload_module(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 149 static void command_add_autoload(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 150 static void command_remove_autoload(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 151 static void command_get_autoload_info(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 152 static void command_get_autoload_info_list(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 153 static void command_cork_record_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 154 static void command_flush_record_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
 155
 156 static const struct pa_pdispatch_command command_table[PA_COMMAND_MAX] = {
 157     [PA_COMMAND_ERROR] = { NULL },
 158     [PA_COMMAND_TIMEOUT] = { NULL },
 159     [PA_COMMAND_REPLY] = { NULL },
 160     [PA_COMMAND_CREATE_PLAYBACK_STREAM] = { command_create_playback_stream },
 161     [PA_COMMAND_DELETE_PLAYBACK_STREAM] = { command_delete_stream },
 162     [PA_COMMAND_DRAIN_PLAYBACK_STREAM] = { command_drain_playback_stream },
 163     [PA_COMMAND_CREATE_RECORD_STREAM] = { command_create_record_stream },
 164     [PA_COMMAND_DELETE_RECORD_STREAM] = { command_delete_stream },
 165     [PA_COMMAND_AUTH] = { command_auth },
 166     [PA_COMMAND_REQUEST] = { NULL },
 167     [PA_COMMAND_EXIT] = { command_exit },
 168     [PA_COMMAND_SET_CLIENT_NAME] = { command_set_client_name },
 169     [PA_COMMAND_LOOKUP_SINK] = { command_lookup },
 170     [PA_COMMAND_LOOKUP_SOURCE] = { command_lookup },
 171     [PA_COMMAND_STAT] = { command_stat },
 172     [PA_COMMAND_GET_PLAYBACK_LATENCY] = { command_get_playback_latency },
 173     [PA_COMMAND_GET_RECORD_LATENCY] = { command_get_record_latency },
 174     [PA_COMMAND_CREATE_UPLOAD_STREAM] = { command_create_upload_stream },
 175     [PA_COMMAND_DELETE_UPLOAD_STREAM] = { command_delete_stream },
 176     [PA_COMMAND_FINISH_UPLOAD_STREAM] = { command_finish_upload_stream },
 177     [PA_COMMAND_PLAY_SAMPLE] = { command_play_sample },
 178     [PA_COMMAND_REMOVE_SAMPLE] = { command_remove_sample },
 179     [PA_COMMAND_GET_SINK_INFO] = { command_get_info },
 180     [PA_COMMAND_GET_SOURCE_INFO] = { command_get_info },
 181     [PA_COMMAND_GET_CLIENT_INFO] = { command_get_info },
 182     [PA_COMMAND_GET_MODULE_INFO] = { command_get_info },
 183     [PA_COMMAND_GET_SINK_INPUT_INFO] = { command_get_info },
 184     [PA_COMMAND_GET_SOURCE_OUTPUT_INFO] = { command_get_info },
 185     [PA_COMMAND_GET_SAMPLE_INFO] = { command_get_info },
 186     [PA_COMMAND_GET_SINK_INFO_LIST] = { command_get_info_list },
 187     [PA_COMMAND_GET_SOURCE_INFO_LIST] = { command_get_info_list },
 188     [PA_COMMAND_GET_MODULE_INFO_LIST] = { command_get_info_list },
 189     [PA_COMMAND_GET_CLIENT_INFO_LIST] = { command_get_info_list },
 190     [PA_COMMAND_GET_SINK_INPUT_INFO_LIST] = { command_get_info_list },
 191     [PA_COMMAND_GET_SOURCE_OUTPUT_INFO_LIST] = { command_get_info_list },
 192     [PA_COMMAND_GET_SAMPLE_INFO_LIST] = { command_get_info_list },
 193     [PA_COMMAND_GET_SERVER_INFO] = { command_get_server_info },
 194     [PA_COMMAND_SUBSCRIBE] = { command_subscribe },
 195
 196     [PA_COMMAND_SET_SINK_VOLUME] = { command_set_volume },
 197     [PA_COMMAND_SET_SINK_INPUT_VOLUME] = { command_set_volume },
 198
 199     [PA_COMMAND_CORK_PLAYBACK_STREAM] = { command_cork_playback_stream },
 200     [PA_COMMAND_FLUSH_PLAYBACK_STREAM] = { command_flush_or_trigger_playback_stream },
 201     [PA_COMMAND_TRIGGER_PLAYBACK_STREAM] = { command_flush_or_trigger_playback_stream },
 202     [PA_COMMAND_PREBUF_PLAYBACK_STREAM] = { command_flush_or_trigger_playback_stream },
 203
 204     [PA_COMMAND_CORK_RECORD_STREAM] = { command_cork_record_stream },
 205     [PA_COMMAND_FLUSH_RECORD_STREAM] = { command_flush_record_stream },
 206
 207     [PA_COMMAND_SET_DEFAULT_SINK] = { command_set_default_sink_or_source },
 208     [PA_COMMAND_SET_DEFAULT_SOURCE] = { command_set_default_sink_or_source },
 209     [PA_COMMAND_SET_PLAYBACK_STREAM_NAME] = { command_set_stream_name },
 210     [PA_COMMAND_SET_RECORD_STREAM_NAME] = { command_set_stream_name },
 211     [PA_COMMAND_KILL_CLIENT] = { command_kill },
 212     [PA_COMMAND_KILL_SINK_INPUT] = { command_kill },
 213     [PA_COMMAND_KILL_SOURCE_OUTPUT] = { command_kill },
 214     [PA_COMMAND_LOAD_MODULE] = { command_load_module },
 215     [PA_COMMAND_UNLOAD_MODULE] = { command_unload_module },
 216     [PA_COMMAND_GET_AUTOLOAD_INFO] = { command_get_autoload_info },
 217     [PA_COMMAND_GET_AUTOLOAD_INFO_LIST] = { command_get_autoload_info_list },
 218     [PA_COMMAND_ADD_AUTOLOAD] = { command_add_autoload },
 219     [PA_COMMAND_REMOVE_AUTOLOAD] = { command_remove_autoload },
 220
 221 };
 222
 223 /* structure management */
 224
 225 static struct upload_stream* upload_stream_new(struct connection *c, const struct pa_sample_spec *ss, const char *name, size_t length) {
 226     struct upload_stream *s;
 227     assert(c && ss && name && length);
 228
 229     s = pa_xmalloc(sizeof(struct upload_stream));
 230     s->type = UPLOAD_STREAM;
 231     s->connection = c;
 232     s->sample_spec = *ss;
 233     s->name = pa_xstrdup(name);
 234
 235     s->memchunk.memblock = NULL;
 236     s->memchunk.index = 0;
 237     s->memchunk.length = 0;
 238
 239     s->length = length;
 240
 241     pa_idxset_put(c->output_streams, s, &s->index);
 242     return s;
 243 }
 244
 245 static void upload_stream_free(struct upload_stream *o) {
 246     assert(o && o->connection);
 247
 248     pa_idxset_remove_by_data(o->connection->output_streams, o, NULL);
 249
 250     pa_xfree(o->name);
 251
 252     if (o->memchunk.memblock)
 253         pa_memblock_unref(o->memchunk.memblock);
 254
 255     pa_xfree(o);
 256 }
 257
 258 static struct record_stream* record_stream_new(struct connection *c, struct pa_source *source, const struct pa_sample_spec *ss, const char *name, size_t maxlength, size_t fragment_size) {
 259     struct record_stream *s;
 260     struct pa_source_output *source_output;
 261     size_t base;
 262     assert(c && source && ss && name && maxlength);
 263
 264     if (!(source_output = pa_source_output_new(source, name, ss, -1)))
 265         return NULL;
 266
 267     s = pa_xmalloc(sizeof(struct record_stream));
 268     s->connection = c;
 269     s->source_output = source_output;
 270     s->source_output->push = source_output_push_cb;
 271     s->source_output->kill = source_output_kill_cb;
 272     s->source_output->get_latency = source_output_get_latency_cb;
 273     s->source_output->userdata = s;
 274     s->source_output->owner = c->protocol->module;
 275     s->source_output->client = c->client;
 276
 277     s->memblockq = pa_memblockq_new(maxlength, 0, base = pa_frame_size(ss), 0, 0, c->protocol->core->memblock_stat);
 278     assert(s->memblockq);
 279
 280     s->fragment_size = (fragment_size/base)*base;
 281     if (!s->fragment_size)
 282         s->fragment_size = base;
 283
 284     pa_idxset_put(c->record_streams, s, &s->index);
 285     return s;
 286 }
 287
 288 static void record_stream_free(struct record_stream* r) {
 289     assert(r && r->connection);
 290
 291     pa_idxset_remove_by_data(r->connection->record_streams, r, NULL);
 292     pa_source_output_disconnect(r->source_output);
 293     pa_source_output_unref(r->source_output);
 294     pa_memblockq_free(r->memblockq);
 295     pa_xfree(r);
 296 }
 297
 298 static struct playback_stream* playback_stream_new(struct connection *c, struct pa_sink *sink, const struct pa_sample_spec *ss, const char *name,
 299                                                    size_t maxlength,
 300                                                    size_t tlength,
 301                                                    size_t prebuf,
 302                                                    size_t minreq,
 303                                                    pa_volume_t volume) {
 304     struct playback_stream *s;
 305     struct pa_sink_input *sink_input;
 306     assert(c && sink && ss && name && maxlength);
 307
 308     if (!(sink_input = pa_sink_input_new(sink, name, ss, 0, -1)))
 309         return NULL;
 310
 311     s = pa_xmalloc(sizeof(struct playback_stream));
 312     s->type = PLAYBACK_STREAM;
 313     s->connection = c;
 314     s->sink_input = sink_input;
 315
 316     s->sink_input->peek = sink_input_peek_cb;
 317     s->sink_input->drop = sink_input_drop_cb;
 318     s->sink_input->kill = sink_input_kill_cb;
 319     s->sink_input->get_latency = sink_input_get_latency_cb;
 320     s->sink_input->userdata = s;
 321     s->sink_input->owner = c->protocol->module;
 322     s->sink_input->client = c->client;
 323
 324     s->memblockq = pa_memblockq_new(maxlength, tlength, pa_frame_size(ss), prebuf, minreq, c->protocol->core->memblock_stat);
 325     assert(s->memblockq);
 326
 327     s->requested_bytes = 0;
 328     s->drain_request = 0;
 329
 330     s->sink_input->volume = volume;
 331
 332     pa_idxset_put(c->output_streams, s, &s->index);
 333     return s;
 334 }
 335
 336 static void playback_stream_free(struct playback_stream* p) {
 337     assert(p && p->connection);
 338
 339     if (p->drain_request)
 340         pa_pstream_send_error(p->connection->pstream, p->drain_tag, PA_ERROR_NOENTITY);
 341
 342     pa_idxset_remove_by_data(p->connection->output_streams, p, NULL);
 343     pa_sink_input_disconnect(p->sink_input);
 344     pa_sink_input_unref(p->sink_input);
 345     pa_memblockq_free(p->memblockq);
 346     pa_xfree(p);
 347 }
 348
 349 static void connection_free(struct connection *c) {
 350     struct record_stream *r;
 351     struct output_stream *o;
 352     assert(c && c->protocol);
 353
 354     pa_idxset_remove_by_data(c->protocol->connections, c, NULL);
 355     while ((r = pa_idxset_first(c->record_streams, NULL)))
 356         record_stream_free(r);
 357     pa_idxset_free(c->record_streams, NULL, NULL);
 358
 359     while ((o = pa_idxset_first(c->output_streams, NULL)))
 360         if (o->type == PLAYBACK_STREAM)
 361             playback_stream_free((struct playback_stream*) o);
 362         else
 363             upload_stream_free((struct upload_stream*) o);
 364     pa_idxset_free(c->output_streams, NULL, NULL);
 365
 366     pa_pdispatch_unref(c->pdispatch);
 367     pa_pstream_close(c->pstream);
 368     pa_pstream_unref(c->pstream);
 369     pa_client_free(c->client);
 370
 371     if (c->subscription)
 372         pa_subscription_free(c->subscription);
 373
 374     pa_xfree(c);
 375 }
 376
 377 static void request_bytes(struct playback_stream *s) {
 378     struct pa_tagstruct *t;
 379     size_t l;
 380     assert(s);
 381
 382     if (!(l = pa_memblockq_missing(s->memblockq)))
 383         return;
 384
 385     if (l <= s->requested_bytes)
 386         return;
 387
 388     l -= s->requested_bytes;
 389
 390     if (l < pa_memblockq_get_minreq(s->memblockq))
 391         return;
 392
 393     s->requested_bytes += l;
 394
 395     t = pa_tagstruct_new(NULL, 0);
 396     assert(t);
 397     pa_tagstruct_putu32(t, PA_COMMAND_REQUEST);
 398     pa_tagstruct_putu32(t, (uint32_t) -1); /* tag */
 399     pa_tagstruct_putu32(t, s->index);
 400     pa_tagstruct_putu32(t, l);
 401     pa_pstream_send_tagstruct(s->connection->pstream, t);
 402
 403 /*     pa_log(__FILE__": Requesting %u bytes\n", l); */
 404 }
 405
 406 static void send_memblock(struct connection *c) {
 407     uint32_t start;
 408     struct record_stream *r;
 409
 410     start = PA_IDXSET_INVALID;
 411     for (;;) {
 412         struct pa_memchunk chunk;
 413
 414         if (!(r = pa_idxset_rrobin(c->record_streams, &c->rrobin_index)))
 415             return;
 416
 417         if (start == PA_IDXSET_INVALID)
 418             start = c->rrobin_index;
 419         else if (start == c->rrobin_index)
 420             return;
 421
 422         if (pa_memblockq_peek(r->memblockq,  &chunk) >= 0) {
 423             struct pa_memchunk schunk = chunk;
 424
 425             if (schunk.length > r->fragment_size)
 426                 schunk.length = r->fragment_size;
 427
 428             pa_pstream_send_memblock(c->pstream, r->index, 0, &schunk);
 429             pa_memblockq_drop(r->memblockq, &chunk, schunk.length);
 430             pa_memblock_unref(schunk.memblock);
 431
 432             return;
 433         }
 434     }
 435 }
 436
 437 static void send_playback_stream_killed(struct playback_stream *p) {
 438     struct pa_tagstruct *t;
 439     assert(p);
 440
 441     t = pa_tagstruct_new(NULL, 0);
 442     assert(t);
 443     pa_tagstruct_putu32(t, PA_COMMAND_PLAYBACK_STREAM_KILLED);
 444     pa_tagstruct_putu32(t, (uint32_t) -1); /* tag */
 445     pa_tagstruct_putu32(t, p->index);
 446     pa_pstream_send_tagstruct(p->connection->pstream, t);
 447 }
 448
 449 static void send_record_stream_killed(struct record_stream *r) {
 450     struct pa_tagstruct *t;
 451     assert(r);
 452
 453     t = pa_tagstruct_new(NULL, 0);
 454     assert(t);
 455     pa_tagstruct_putu32(t, PA_COMMAND_RECORD_STREAM_KILLED);
 456     pa_tagstruct_putu32(t, (uint32_t) -1); /* tag */
 457     pa_tagstruct_putu32(t, r->index);
 458     pa_pstream_send_tagstruct(r->connection->pstream, t);
 459 }
 460
 461 /*** sinkinput callbacks ***/
 462
 463 static int sink_input_peek_cb(struct pa_sink_input *i, struct pa_memchunk *chunk) {
 464     struct playback_stream *s;
 465     assert(i && i->userdata && chunk);
 466     s = i->userdata;
 467
 468     if (pa_memblockq_peek(s->memblockq, chunk) < 0)
 469         return -1;
 470
 471     return 0;
 472 }
 473
 474 static void sink_input_drop_cb(struct pa_sink_input *i, const struct pa_memchunk *chunk, size_t length) {
 475     struct playback_stream *s;
 476     assert(i && i->userdata && length);
 477     s = i->userdata;
 478
 479     pa_memblockq_drop(s->memblockq, chunk, length);
 480     request_bytes(s);
 481
 482     if (s->drain_request && !pa_memblockq_is_readable(s->memblockq)) {
 483         pa_pstream_send_simple_ack(s->connection->pstream, s->drain_tag);
 484         s->drain_request = 0;
 485     }
 486
 487 /*     pa_log(__FILE__": after_drop: %u\n", pa_memblockq_get_length(s->memblockq)); */
 488 }
 489
 490 static void sink_input_kill_cb(struct pa_sink_input *i) {
 491     assert(i && i->userdata);
 492     send_playback_stream_killed((struct playback_stream *) i->userdata);
 493     playback_stream_free((struct playback_stream *) i->userdata);
 494 }
 495
 496 static pa_usec_t sink_input_get_latency_cb(struct pa_sink_input *i) {
 497     struct playback_stream *s;
 498     assert(i && i->userdata);
 499     s = i->userdata;
 500
 501     /*pa_log(__FILE__": get_latency: %u\n", pa_memblockq_get_length(s->memblockq));*/
 502
 503     return pa_bytes_to_usec(pa_memblockq_get_length(s->memblockq), &s->sink_input->sample_spec);
 504 }
 505
 506 /*** source_output callbacks ***/
 507
 508 static void source_output_push_cb(struct pa_source_output *o, const struct pa_memchunk *chunk) {
 509     struct record_stream *s;
 510     assert(o && o->userdata && chunk);
 511     s = o->userdata;
 512
 513     pa_memblockq_push_align(s->memblockq, chunk, 0);
 514     if (!pa_pstream_is_pending(s->connection->pstream))
 515         send_memblock(s->connection);
 516 }
 517
 518 static void source_output_kill_cb(struct pa_source_output *o) {
 519     assert(o && o->userdata);
 520     send_record_stream_killed((struct record_stream *) o->userdata);
 521     record_stream_free((struct record_stream *) o->userdata);
 522 }
 523
 524 static pa_usec_t source_output_get_latency_cb(struct pa_source_output *o) {
 525     struct record_stream *s;
 526     assert(o && o->userdata);
 527     s = o->userdata;
 528
 529     /*pa_log(__FILE__": get_latency: %u\n", pa_memblockq_get_length(s->memblockq));*/
 530
 531     return pa_bytes_to_usec(pa_memblockq_get_length(s->memblockq), &o->sample_spec);
 532 }
 533
 534 /*** pdispatch callbacks ***/
 535
 536 static void protocol_error(struct connection *c) {
 537     pa_log(__FILE__": protocol error, kicking client\n");
 538     connection_free(c);
 539 }
 540
 541 static void command_create_playback_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 542     struct connection *c = userdata;
 543     struct playback_stream *s;
 544     size_t maxlength, tlength, prebuf, minreq;
 545     uint32_t sink_index;
 546     const char *name, *sink_name;
 547     struct pa_sample_spec ss;
 548     struct pa_tagstruct *reply;
 549     struct pa_sink *sink;
 550     pa_volume_t volume;
 551     int corked;
 552     assert(c && t && c->protocol && c->protocol->core);
 553
 554     if (pa_tagstruct_gets(t, &name) < 0 || !name ||
 555         pa_tagstruct_get_sample_spec(t, &ss) < 0 ||
 556         pa_tagstruct_getu32(t, &sink_index) < 0 ||
 557         pa_tagstruct_gets(t, &sink_name) < 0 ||
 558         pa_tagstruct_getu32(t, &maxlength) < 0 ||
 559         pa_tagstruct_get_boolean(t, &corked) < 0 ||
 560         pa_tagstruct_getu32(t, &tlength) < 0 ||
 561         pa_tagstruct_getu32(t, &prebuf) < 0 ||
 562         pa_tagstruct_getu32(t, &minreq) < 0 ||
 563         pa_tagstruct_getu32(t, &volume) < 0 ||
 564         !pa_tagstruct_eof(t)) {
 565         protocol_error(c);
 566         return;
 567     }
 568
 569
 570     if (!c->authorized) {
 571         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 572         return;
 573     }
 574
 575     if (sink_index != (uint32_t) -1)
 576         sink = pa_idxset_get_by_index(c->protocol->core->sinks, sink_index);
 577     else
 578         sink = pa_namereg_get(c->protocol->core, sink_name, PA_NAMEREG_SINK, 1);
 579
 580     if (!sink) {
 581         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
 582         return;
 583     }
 584
 585     if (!(s = playback_stream_new(c, sink, &ss, name, maxlength, tlength, prebuf, minreq, volume))) {
 586         pa_pstream_send_error(c->pstream, tag, PA_ERROR_INVALID);
 587         return;
 588     }
 589
 590     pa_sink_input_cork(s->sink_input, corked);
 591
 592     reply = pa_tagstruct_new(NULL, 0);
 593     assert(reply);
 594     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
 595     pa_tagstruct_putu32(reply, tag);
 596     pa_tagstruct_putu32(reply, s->index);
 597     assert(s->sink_input);
 598     pa_tagstruct_putu32(reply, s->sink_input->index);
 599     pa_tagstruct_putu32(reply, s->requested_bytes = pa_memblockq_missing(s->memblockq));
 600     pa_pstream_send_tagstruct(c->pstream, reply);
 601     request_bytes(s);
 602 }
 603
 604 static void command_delete_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 605     struct connection *c = userdata;
 606     uint32_t channel;
 607     assert(c && t);
 608
 609     if (pa_tagstruct_getu32(t, &channel) < 0 ||
 610         !pa_tagstruct_eof(t)) {
 611         protocol_error(c);
 612         return;
 613     }
 614
 615     if (!c->authorized) {
 616         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 617         return;
 618     }
 619
 620     if (command == PA_COMMAND_DELETE_PLAYBACK_STREAM) {
 621         struct playback_stream *s;
 622         if (!(s = pa_idxset_get_by_index(c->output_streams, channel)) || (s->type != PLAYBACK_STREAM)) {
 623             pa_pstream_send_error(c->pstream, tag, PA_ERROR_EXIST);
 624             return;
 625         }
 626
 627         playback_stream_free(s);
 628     } else if (command == PA_COMMAND_DELETE_RECORD_STREAM) {
 629         struct record_stream *s;
 630         if (!(s = pa_idxset_get_by_index(c->record_streams, channel))) {
 631             pa_pstream_send_error(c->pstream, tag, PA_ERROR_EXIST);
 632             return;
 633         }
 634
 635         record_stream_free(s);
 636     } else {
 637         struct upload_stream *s;
 638         assert(command == PA_COMMAND_DELETE_UPLOAD_STREAM);
 639         if (!(s = pa_idxset_get_by_index(c->output_streams, channel)) || (s->type != UPLOAD_STREAM)) {
 640             pa_pstream_send_error(c->pstream, tag, PA_ERROR_EXIST);
 641             return;
 642         }
 643
 644         upload_stream_free(s);
 645     }
 646
 647     pa_pstream_send_simple_ack(c->pstream, tag);
 648 }
 649
 650 static void command_create_record_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 651     struct connection *c = userdata;
 652     struct record_stream *s;
 653     size_t maxlength, fragment_size;
 654     uint32_t source_index;
 655     const char *name, *source_name;
 656     struct pa_sample_spec ss;
 657     struct pa_tagstruct *reply;
 658     struct pa_source *source;
 659     int corked;
 660     assert(c && t && c->protocol && c->protocol->core);
 661
 662     if (pa_tagstruct_gets(t, &name) < 0 || !name ||
 663         pa_tagstruct_get_sample_spec(t, &ss) < 0 ||
 664         pa_tagstruct_getu32(t, &source_index) < 0 ||
 665         pa_tagstruct_gets(t, &source_name) < 0 ||
 666         pa_tagstruct_getu32(t, &maxlength) < 0 ||
 667         pa_tagstruct_get_boolean(t, &corked) < 0 ||
 668         pa_tagstruct_getu32(t, &fragment_size) < 0 ||
 669         !pa_tagstruct_eof(t)) {
 670         protocol_error(c);
 671         return;
 672     }
 673
 674     if (!c->authorized) {
 675         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 676         return;
 677     }
 678
 679     if (source_index != (uint32_t) -1)
 680         source = pa_idxset_get_by_index(c->protocol->core->sources, source_index);
 681     else
 682         source = pa_namereg_get(c->protocol->core, source_name, PA_NAMEREG_SOURCE, 1);
 683
 684     if (!source) {
 685         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
 686         return;
 687     }
 688
 689     if (!(s = record_stream_new(c, source, &ss, name, maxlength, fragment_size))) {
 690         pa_pstream_send_error(c->pstream, tag, PA_ERROR_INVALID);
 691         return;
 692     }
 693
 694     pa_source_output_cork(s->source_output, corked);
 695
 696     reply = pa_tagstruct_new(NULL, 0);
 697     assert(reply);
 698     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
 699     pa_tagstruct_putu32(reply, tag);
 700     pa_tagstruct_putu32(reply, s->index);
 701     assert(s->source_output);
 702     pa_tagstruct_putu32(reply, s->source_output->index);
 703     pa_pstream_send_tagstruct(c->pstream, reply);
 704 }
 705
 706 static void command_exit(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 707     struct connection *c = userdata;
 708     assert(c && t);
 709
 710     if (!pa_tagstruct_eof(t)) {
 711         protocol_error(c);
 712         return;
 713     }
 714
 715     if (!c->authorized) {
 716         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 717         return;
 718     }
 719
 720     assert(c->protocol && c->protocol->core && c->protocol->core->mainloop);
 721     c->protocol->core->mainloop->quit(c->protocol->core->mainloop, 0);
 722     pa_pstream_send_simple_ack(c->pstream, tag); /* nonsense */
 723     return;
 724 }
 725
 726 static void command_auth(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 727     struct connection *c = userdata;
 728     const void*cookie;
 729     assert(c && t);
 730
 731     if (pa_tagstruct_get_arbitrary(t, &cookie, PA_NATIVE_COOKIE_LENGTH) < 0 ||
 732         !pa_tagstruct_eof(t)) {
 733         protocol_error(c);
 734         return;
 735     }
 736
 737     if (!c->authorized) {
 738         if (memcmp(c->protocol->auth_cookie, cookie, PA_NATIVE_COOKIE_LENGTH) != 0) {
 739             pa_log(__FILE__": Denied access to client with invalid authorization key.\n");
 740             pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 741             return;
 742         }
 743
 744         c->authorized = 1;
 745     }
 746
 747     pa_pstream_send_simple_ack(c->pstream, tag);
 748     return;
 749 }
 750
 751 static void command_set_client_name(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 752     struct connection *c = userdata;
 753     const char *name;
 754     assert(c && t);
 755
 756     if (pa_tagstruct_gets(t, &name) < 0 || !name ||
 757         !pa_tagstruct_eof(t)) {
 758         protocol_error(c);
 759         return;
 760     }
 761
 762     pa_client_set_name(c->client, name);
 763     pa_pstream_send_simple_ack(c->pstream, tag);
 764     return;
 765 }
 766
 767 static void command_lookup(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 768     struct connection *c = userdata;
 769     const char *name;
 770     uint32_t index = PA_IDXSET_INVALID;
 771     assert(c && t);
 772
 773     if (pa_tagstruct_gets(t, &name) < 0 || !name ||
 774         !pa_tagstruct_eof(t)) {
 775         protocol_error(c);
 776         return;
 777     }
 778
 779     if (!c->authorized) {
 780         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 781         return;
 782     }
 783
 784     if (command == PA_COMMAND_LOOKUP_SINK) {
 785         struct pa_sink *sink;
 786         if ((sink = pa_namereg_get(c->protocol->core, name, PA_NAMEREG_SINK, 1)))
 787             index = sink->index;
 788     } else {
 789         struct pa_source *source;
 790         assert(command == PA_COMMAND_LOOKUP_SOURCE);
 791         if ((source = pa_namereg_get(c->protocol->core, name, PA_NAMEREG_SOURCE, 1)))
 792             index = source->index;
 793     }
 794
 795     if (index == PA_IDXSET_INVALID)
 796         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
 797     else {
 798         struct pa_tagstruct *reply;
 799         reply = pa_tagstruct_new(NULL, 0);
 800         assert(reply);
 801         pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
 802         pa_tagstruct_putu32(reply, tag);
 803         pa_tagstruct_putu32(reply, index);
 804         pa_pstream_send_tagstruct(c->pstream, reply);
 805     }
 806 }
 807
 808 static void command_drain_playback_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 809     struct connection *c = userdata;
 810     uint32_t index;
 811     struct playback_stream *s;
 812     assert(c && t);
 813
 814     if (pa_tagstruct_getu32(t, &index) < 0 ||
 815         !pa_tagstruct_eof(t)) {
 816         protocol_error(c);
 817         return;
 818     }
 819
 820     if (!c->authorized) {
 821         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 822         return;
 823     }
 824
 825     if (!(s = pa_idxset_get_by_index(c->output_streams, index)) || s->type != PLAYBACK_STREAM) {
 826         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
 827         return;
 828     }
 829
 830     s->drain_request = 0;
 831
 832     pa_memblockq_prebuf_disable(s->memblockq);
 833
 834     if (!pa_memblockq_is_readable(s->memblockq)) {
 835 /*         pa_log("immediate drain: %u\n", pa_memblockq_get_length(s->memblockq)); */
 836         pa_pstream_send_simple_ack(c->pstream, tag);
 837     } else {
 838 /*         pa_log("slow drain triggered\n"); */
 839         s->drain_request = 1;
 840         s->drain_tag = tag;
 841
 842         pa_sink_notify(s->sink_input->sink);
 843     }
 844 }
 845
 846 static void command_stat(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 847     struct connection *c = userdata;
 848     struct pa_tagstruct *reply;
 849     assert(c && t);
 850
 851     if (!pa_tagstruct_eof(t)) {
 852         protocol_error(c);
 853         return;
 854     }
 855
 856     if (!c->authorized) {
 857         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 858         return;
 859     }
 860
 861     reply = pa_tagstruct_new(NULL, 0);
 862     assert(reply);
 863     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
 864     pa_tagstruct_putu32(reply, tag);
 865     pa_tagstruct_putu32(reply, c->protocol->core->memblock_stat->total);
 866     pa_tagstruct_putu32(reply, c->protocol->core->memblock_stat->total_size);
 867     pa_tagstruct_putu32(reply, c->protocol->core->memblock_stat->allocated);
 868     pa_tagstruct_putu32(reply, c->protocol->core->memblock_stat->allocated_size);
 869     pa_tagstruct_putu32(reply, pa_scache_total_size(c->protocol->core));
 870     pa_pstream_send_tagstruct(c->pstream, reply);
 871 }
 872
 873 static void command_get_playback_latency(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 874     struct connection *c = userdata;
 875     struct pa_tagstruct *reply;
 876     struct playback_stream *s;
 877     struct timeval tv, now;
 878     uint64_t counter;
 879     uint32_t index;
 880     assert(c && t);
 881
 882     if (pa_tagstruct_getu32(t, &index) < 0 ||
 883         pa_tagstruct_get_timeval(t, &tv) < 0 ||
 884         pa_tagstruct_getu64(t, &counter) < 0 ||
 885         !pa_tagstruct_eof(t)) {
 886         protocol_error(c);
 887         return;
 888     }
 889
 890     if (!c->authorized) {
 891         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 892         return;
 893     }
 894
 895     if (!(s = pa_idxset_get_by_index(c->output_streams, index)) || s->type != PLAYBACK_STREAM) {
 896         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
 897         return;
 898     }
 899
 900     reply = pa_tagstruct_new(NULL, 0);
 901     assert(reply);
 902     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
 903     pa_tagstruct_putu32(reply, tag);
 904     pa_tagstruct_put_usec(reply, pa_sink_input_get_latency(s->sink_input));
 905     pa_tagstruct_put_usec(reply, pa_sink_get_latency(s->sink_input->sink));
 906     pa_tagstruct_put_usec(reply, 0);
 907     pa_tagstruct_put_boolean(reply, pa_memblockq_is_readable(s->memblockq));
 908     pa_tagstruct_putu32(reply, pa_memblockq_get_length(s->memblockq));
 909     pa_tagstruct_put_timeval(reply, &tv);
 910     gettimeofday(&now, NULL);
 911     pa_tagstruct_put_timeval(reply, &now);
 912     pa_tagstruct_putu64(reply, counter);
 913     pa_pstream_send_tagstruct(c->pstream, reply);
 914 }
 915
 916 static void command_get_record_latency(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 917     struct connection *c = userdata;
 918     struct pa_tagstruct *reply;
 919     struct record_stream *s;
 920     struct timeval tv, now;
 921     uint64_t counter;
 922     uint32_t index;
 923     assert(c && t);
 924
 925     if (pa_tagstruct_getu32(t, &index) < 0 ||
 926         pa_tagstruct_get_timeval(t, &tv) < 0 ||
 927         pa_tagstruct_getu64(t, &counter) < 0 ||
 928         !pa_tagstruct_eof(t)) {
 929         protocol_error(c);
 930         return;
 931     }
 932
 933     if (!c->authorized) {
 934         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 935         return;
 936     }
 937
 938     if (!(s = pa_idxset_get_by_index(c->record_streams, index))) {
 939         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
 940         return;
 941     }
 942
 943     reply = pa_tagstruct_new(NULL, 0);
 944     assert(reply);
 945     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
 946     pa_tagstruct_putu32(reply, tag);
 947     pa_tagstruct_put_usec(reply, pa_source_output_get_latency(s->source_output));
 948     pa_tagstruct_put_usec(reply, s->source_output->source->monitor_of ? pa_sink_get_latency(s->source_output->source->monitor_of) : 0);
 949     pa_tagstruct_put_usec(reply, pa_source_get_latency(s->source_output->source));
 950     pa_tagstruct_put_boolean(reply, 0);
 951     pa_tagstruct_putu32(reply, pa_memblockq_get_length(s->memblockq));
 952     pa_tagstruct_put_timeval(reply, &tv);
 953     gettimeofday(&now, NULL);
 954     pa_tagstruct_put_timeval(reply, &now);
 955     pa_tagstruct_putu64(reply, counter);
 956     pa_pstream_send_tagstruct(c->pstream, reply);
 957 }
 958
 959
 960 static void command_create_upload_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
 961     struct connection *c = userdata;
 962     struct upload_stream *s;
 963     size_t length;
 964     const char *name;
 965     struct pa_sample_spec ss;
 966     struct pa_tagstruct *reply;
 967     assert(c && t && c->protocol && c->protocol->core);
 968
 969     if (pa_tagstruct_gets(t, &name) < 0 || !name ||
 970         pa_tagstruct_get_sample_spec(t, &ss) < 0 ||
 971         pa_tagstruct_getu32(t, &length) < 0 ||
 972         !pa_tagstruct_eof(t)) {
 973         protocol_error(c);
 974         return;
 975     }
 976
 977     if (!c->authorized) {
 978         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
 979         return;
 980     }
 981
 982     if ((length % pa_frame_size(&ss)) != 0 || length <= 0 || !*name) {
 983         pa_pstream_send_error(c->pstream, tag, PA_ERROR_INVALID);
 984         return;
 985     }
 986
 987     if (!(s = upload_stream_new(c, &ss, name, length))) {
 988         pa_pstream_send_error(c->pstream, tag, PA_ERROR_INVALID);
 989         return;
 990     }
 991
 992     reply = pa_tagstruct_new(NULL, 0);
 993     assert(reply);
 994     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
 995     pa_tagstruct_putu32(reply, tag);
 996     pa_tagstruct_putu32(reply, s->index);
 997     pa_tagstruct_putu32(reply, length);
 998     pa_pstream_send_tagstruct(c->pstream, reply);
 999 }
1000
1001 static void command_finish_upload_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1002     struct connection *c = userdata;
1003     uint32_t channel;
1004     struct upload_stream *s;
1005     uint32_t index;
1006     assert(c && t);
1007
1008     if (pa_tagstruct_getu32(t, &channel) < 0 ||
1009         !pa_tagstruct_eof(t)) {
1010         protocol_error(c);
1011         return;
1012     }
1013
1014     if (!c->authorized) {
1015         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1016         return;
1017     }
1018
1019     if (!(s = pa_idxset_get_by_index(c->output_streams, channel)) || (s->type != UPLOAD_STREAM)) {
1020         pa_pstream_send_error(c->pstream, tag, PA_ERROR_EXIST);
1021         return;
1022     }
1023
1024     pa_scache_add_item(c->protocol->core, s->name, &s->sample_spec, &s->memchunk, &index);
1025     pa_pstream_send_simple_ack(c->pstream, tag);
1026     upload_stream_free(s);
1027 }
1028
1029 static void command_play_sample(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1030     struct connection *c = userdata;
1031     uint32_t sink_index, volume;
1032     struct pa_sink *sink;
1033     const char *name, *sink_name;
1034     assert(c && t);
1035
1036     if (pa_tagstruct_getu32(t, &sink_index) < 0 ||
1037         pa_tagstruct_gets(t, &sink_name) < 0 ||
1038         pa_tagstruct_getu32(t, &volume) < 0 ||
1039         pa_tagstruct_gets(t, &name) < 0 || !name ||
1040         !pa_tagstruct_eof(t)) {
1041         protocol_error(c);
1042         return;
1043     }
1044
1045     if (!c->authorized) {
1046         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1047         return;
1048     }
1049
1050     if (sink_index != (uint32_t) -1)
1051         sink = pa_idxset_get_by_index(c->protocol->core->sinks, sink_index);
1052     else
1053         sink = pa_namereg_get(c->protocol->core, sink_name, PA_NAMEREG_SINK, 1);
1054
1055     if (!sink) {
1056         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1057         return;
1058     }
1059
1060     if (pa_scache_play_item(c->protocol->core, name, sink, volume) < 0) {
1061         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1062         return;
1063     }
1064
1065     pa_pstream_send_simple_ack(c->pstream, tag);
1066 }
1067
1068 static void command_remove_sample(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1069     struct connection *c = userdata;
1070     const char *name;
1071     assert(c && t);
1072
1073     if (pa_tagstruct_gets(t, &name) < 0 || !name ||
1074         !pa_tagstruct_eof(t)) {
1075         protocol_error(c);
1076         return;
1077     }
1078
1079     if (!c->authorized) {
1080         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1081         return;
1082     }
1083
1084     if (pa_scache_remove_item(c->protocol->core, name) < 0) {
1085         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1086         return;
1087     }
1088
1089     pa_pstream_send_simple_ack(c->pstream, tag);
1090 }
1091
1092 static void sink_fill_tagstruct(struct pa_tagstruct *t, struct pa_sink *sink) {
1093     assert(t && sink);
1094     pa_tagstruct_putu32(t, sink->index);
1095     pa_tagstruct_puts(t, sink->name);
1096     pa_tagstruct_puts(t, sink->description);
1097     pa_tagstruct_put_sample_spec(t, &sink->sample_spec);
1098     pa_tagstruct_putu32(t, sink->owner ? sink->owner->index : (uint32_t) -1);
1099     pa_tagstruct_putu32(t, sink->volume);
1100     pa_tagstruct_putu32(t, sink->monitor_source->index);
1101     pa_tagstruct_puts(t, sink->monitor_source->name);
1102     pa_tagstruct_put_usec(t, pa_sink_get_latency(sink));
1103 }
1104
1105 static void source_fill_tagstruct(struct pa_tagstruct *t, struct pa_source *source) {
1106     assert(t && source);
1107     pa_tagstruct_putu32(t, source->index);
1108     pa_tagstruct_puts(t, source->name);
1109     pa_tagstruct_puts(t, source->description);
1110     pa_tagstruct_put_sample_spec(t, &source->sample_spec);
1111     pa_tagstruct_putu32(t, source->owner ? source->owner->index : (uint32_t) -1);
1112     pa_tagstruct_putu32(t, source->monitor_of ? source->monitor_of->index : (uint32_t) -1);
1113     pa_tagstruct_puts(t, source->monitor_of ? source->monitor_of->name : NULL);
1114     pa_tagstruct_put_usec(t, pa_source_get_latency(source));
1115 }
1116
1117 static void client_fill_tagstruct(struct pa_tagstruct *t, struct pa_client *client) {
1118     assert(t && client);
1119     pa_tagstruct_putu32(t, client->index);
1120     pa_tagstruct_puts(t, client->name);
1121     pa_tagstruct_puts(t, client->protocol_name);
1122     pa_tagstruct_putu32(t, client->owner ? client->owner->index : (uint32_t) -1);
1123 }
1124
1125 static void module_fill_tagstruct(struct pa_tagstruct *t, struct pa_module *module) {
1126     assert(t && module);
1127     pa_tagstruct_putu32(t, module->index);
1128     pa_tagstruct_puts(t, module->name);
1129     pa_tagstruct_puts(t, module->argument);
1130     pa_tagstruct_putu32(t, module->n_used);
1131     pa_tagstruct_put_boolean(t, module->auto_unload);
1132 }
1133
1134 static void sink_input_fill_tagstruct(struct pa_tagstruct *t, struct pa_sink_input *s) {
1135     assert(t && s);
1136     pa_tagstruct_putu32(t, s->index);
1137     pa_tagstruct_puts(t, s->name);
1138     pa_tagstruct_putu32(t, s->owner ? s->owner->index : (uint32_t) -1);
1139     pa_tagstruct_putu32(t, s->client ? s->client->index : (uint32_t) -1);
1140     pa_tagstruct_putu32(t, s->sink->index);
1141     pa_tagstruct_put_sample_spec(t, &s->sample_spec);
1142     pa_tagstruct_putu32(t, s->volume);
1143     pa_tagstruct_put_usec(t, pa_sink_input_get_latency(s));
1144     pa_tagstruct_put_usec(t, pa_sink_get_latency(s->sink));
1145 }
1146
1147 static void source_output_fill_tagstruct(struct pa_tagstruct *t, struct pa_source_output *s) {
1148     assert(t && s);
1149     pa_tagstruct_putu32(t, s->index);
1150     pa_tagstruct_puts(t, s->name);
1151     pa_tagstruct_putu32(t, s->owner ? s->owner->index : (uint32_t) -1);
1152     pa_tagstruct_putu32(t, s->client ? s->client->index : (uint32_t) -1);
1153     pa_tagstruct_putu32(t, s->source->index);
1154     pa_tagstruct_put_sample_spec(t, &s->sample_spec);
1155     pa_tagstruct_put_usec(t, pa_source_output_get_latency(s));
1156     pa_tagstruct_put_usec(t, pa_source_get_latency(s->source));
1157 }
1158
1159 static void scache_fill_tagstruct(struct pa_tagstruct *t, struct pa_scache_entry *e) {
1160     assert(t && e);
1161     pa_tagstruct_putu32(t, e->index);
1162     pa_tagstruct_puts(t, e->name);
1163     pa_tagstruct_putu32(t, e->volume);
1164     pa_tagstruct_put_usec(t, pa_bytes_to_usec(e->memchunk.length, &e->sample_spec));
1165     pa_tagstruct_put_sample_spec(t, &e->sample_spec);
1166     pa_tagstruct_putu32(t, e->memchunk.length);
1167     pa_tagstruct_put_boolean(t, e->lazy);
1168     pa_tagstruct_puts(t, e->filename);
1169 }
1170
1171 static void command_get_info(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1172     struct connection *c = userdata;
1173     uint32_t index;
1174     struct pa_sink *sink = NULL;
1175     struct pa_source *source = NULL;
1176     struct pa_client *client = NULL;
1177     struct pa_module *module = NULL;
1178     struct pa_sink_input *si = NULL;
1179     struct pa_source_output *so = NULL;
1180     struct pa_scache_entry *sce = NULL;
1181     const char *name;
1182     struct pa_tagstruct *reply;
1183     assert(c && t);
1184
1185
1186     if (pa_tagstruct_getu32(t, &index) < 0 ||
1187         (command != PA_COMMAND_GET_CLIENT_INFO &&
1188          command != PA_COMMAND_GET_MODULE_INFO &&
1189          command != PA_COMMAND_GET_SINK_INPUT_INFO &&
1190          command != PA_COMMAND_GET_SOURCE_OUTPUT_INFO &&
1191          pa_tagstruct_gets(t, &name) < 0) ||
1192         !pa_tagstruct_eof(t)) {
1193         protocol_error(c);
1194         return;
1195     }
1196
1197     if (!c->authorized) {
1198         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1199         return;
1200     }
1201
1202     if (command == PA_COMMAND_GET_SINK_INFO) {
1203         if (index != (uint32_t) -1)
1204             sink = pa_idxset_get_by_index(c->protocol->core->sinks, index);
1205         else
1206             sink = pa_namereg_get(c->protocol->core, name, PA_NAMEREG_SINK, 1);
1207     } else if (command == PA_COMMAND_GET_SOURCE_INFO) {
1208         if (index != (uint32_t) -1)
1209             source = pa_idxset_get_by_index(c->protocol->core->sources, index);
1210         else
1211             source = pa_namereg_get(c->protocol->core, name, PA_NAMEREG_SOURCE, 1);
1212     } else if (command == PA_COMMAND_GET_CLIENT_INFO)
1213         client = pa_idxset_get_by_index(c->protocol->core->clients, index);
1214     else if (command == PA_COMMAND_GET_MODULE_INFO)
1215         module = pa_idxset_get_by_index(c->protocol->core->modules, index);
1216     else if (command == PA_COMMAND_GET_SINK_INPUT_INFO)
1217         si = pa_idxset_get_by_index(c->protocol->core->sink_inputs, index);
1218     else if (command == PA_COMMAND_GET_SOURCE_OUTPUT_INFO)
1219         so = pa_idxset_get_by_index(c->protocol->core->source_outputs, index);
1220     else {
1221         assert(command == PA_COMMAND_GET_SAMPLE_INFO);
1222         if (index != (uint32_t) -1)
1223             sce = pa_idxset_get_by_index(c->protocol->core->scache, index);
1224         else
1225             sce = pa_namereg_get(c->protocol->core, name, PA_NAMEREG_SAMPLE, 0);
1226     }
1227
1228     if (!sink && !source && !client && !module && !si && !so && !sce) {
1229         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1230         return;
1231     }
1232
1233     reply = pa_tagstruct_new(NULL, 0);
1234     assert(reply);
1235     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
1236     pa_tagstruct_putu32(reply, tag);
1237     if (sink)
1238         sink_fill_tagstruct(reply, sink);
1239     else if (source)
1240         source_fill_tagstruct(reply, source);
1241     else if (client)
1242         client_fill_tagstruct(reply, client);
1243     else if (module)
1244         module_fill_tagstruct(reply, module);
1245     else if (si)
1246         sink_input_fill_tagstruct(reply, si);
1247     else if (so)
1248         source_output_fill_tagstruct(reply, so);
1249     else
1250         scache_fill_tagstruct(reply, sce);
1251     pa_pstream_send_tagstruct(c->pstream, reply);
1252 }
1253
1254 static void command_get_info_list(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1255     struct connection *c = userdata;
1256     struct pa_idxset *i;
1257     uint32_t index;
1258     void *p;
1259     struct pa_tagstruct *reply;
1260     assert(c && t);
1261
1262     if (!pa_tagstruct_eof(t)) {
1263         protocol_error(c);
1264         return;
1265     }
1266
1267     if (!c->authorized) {
1268         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1269         return;
1270     }
1271
1272     reply = pa_tagstruct_new(NULL, 0);
1273     assert(reply);
1274     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
1275     pa_tagstruct_putu32(reply, tag);
1276
1277     if (command == PA_COMMAND_GET_SINK_INFO_LIST)
1278         i = c->protocol->core->sinks;
1279     else if (command == PA_COMMAND_GET_SOURCE_INFO_LIST)
1280         i = c->protocol->core->sources;
1281     else if (command == PA_COMMAND_GET_CLIENT_INFO_LIST)
1282         i = c->protocol->core->clients;
1283     else if (command == PA_COMMAND_GET_MODULE_INFO_LIST)
1284         i = c->protocol->core->modules;
1285     else if (command == PA_COMMAND_GET_SINK_INPUT_INFO_LIST)
1286         i = c->protocol->core->sink_inputs;
1287     else if (command == PA_COMMAND_GET_SOURCE_OUTPUT_INFO_LIST)
1288         i = c->protocol->core->source_outputs;
1289     else {
1290         assert(command == PA_COMMAND_GET_SAMPLE_INFO_LIST);
1291         i = c->protocol->core->scache;
1292     }
1293
1294     if (i) {
1295         for (p = pa_idxset_first(i, &index); p; p = pa_idxset_next(i, &index)) {
1296             if (command == PA_COMMAND_GET_SINK_INFO_LIST)
1297                 sink_fill_tagstruct(reply, p);
1298             else if (command == PA_COMMAND_GET_SOURCE_INFO_LIST)
1299                 source_fill_tagstruct(reply, p);
1300             else if (command == PA_COMMAND_GET_CLIENT_INFO_LIST)
1301                 client_fill_tagstruct(reply, p);
1302             else if (command == PA_COMMAND_GET_MODULE_INFO_LIST)
1303                 module_fill_tagstruct(reply, p);
1304             else if (command == PA_COMMAND_GET_SINK_INPUT_INFO_LIST)
1305                 sink_input_fill_tagstruct(reply, p);
1306             else if (command == PA_COMMAND_GET_SOURCE_OUTPUT_INFO_LIST)
1307                 source_output_fill_tagstruct(reply, p);
1308             else {
1309                 assert(command == PA_COMMAND_GET_SAMPLE_INFO_LIST);
1310                 scache_fill_tagstruct(reply, p);
1311             }
1312         }
1313     }
1314
1315     pa_pstream_send_tagstruct(c->pstream, reply);
1316 }
1317
1318 static void command_get_server_info(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1319     struct connection *c = userdata;
1320     struct pa_tagstruct *reply;
1321     char txt[256];
1322     const char *n;
1323     assert(c && t);
1324
1325     if (!pa_tagstruct_eof(t)) {
1326         protocol_error(c);
1327         return;
1328     }
1329
1330     if (!c->authorized) {
1331         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1332         return;
1333     }
1334
1335     reply = pa_tagstruct_new(NULL, 0);
1336     assert(reply);
1337     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
1338     pa_tagstruct_putu32(reply, tag);
1339     pa_tagstruct_puts(reply, PACKAGE_NAME);
1340     pa_tagstruct_puts(reply, PACKAGE_VERSION);
1341     pa_tagstruct_puts(reply, pa_get_user_name(txt, sizeof(txt)));
1342     pa_tagstruct_puts(reply, pa_get_host_name(txt, sizeof(txt)));
1343     pa_tagstruct_put_sample_spec(reply, &c->protocol->core->default_sample_spec);
1344
1345     n = pa_namereg_get_default_sink_name(c->protocol->core);
1346     pa_tagstruct_puts(reply, n);
1347     n = pa_namereg_get_default_source_name(c->protocol->core);
1348     pa_tagstruct_puts(reply, n);
1349     pa_pstream_send_tagstruct(c->pstream, reply);
1350 }
1351
1352 static void subscription_cb(struct pa_core *core, enum pa_subscription_event_type e, uint32_t index, void *userdata) {
1353     struct pa_tagstruct *t;
1354     struct connection *c = userdata;
1355     assert(c && core);
1356
1357     t = pa_tagstruct_new(NULL, 0);
1358     assert(t);
1359     pa_tagstruct_putu32(t, PA_COMMAND_SUBSCRIBE_EVENT);
1360     pa_tagstruct_putu32(t, (uint32_t) -1);
1361     pa_tagstruct_putu32(t, e);
1362     pa_tagstruct_putu32(t, index);
1363     pa_pstream_send_tagstruct(c->pstream, t);
1364 }
1365
1366 static void command_subscribe(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1367     struct connection *c = userdata;
1368     enum pa_subscription_mask m;
1369     assert(c && t);
1370
1371     if (pa_tagstruct_getu32(t, &m) < 0 ||
1372         !pa_tagstruct_eof(t)) {
1373         protocol_error(c);
1374         return;
1375     }
1376
1377     if (!c->authorized) {
1378         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1379         return;
1380     }
1381
1382     if (c->subscription)
1383         pa_subscription_free(c->subscription);
1384
1385     if (m != 0) {
1386         c->subscription = pa_subscription_new(c->protocol->core, m, subscription_cb, c);
1387         assert(c->subscription);
1388     } else
1389         c->subscription = NULL;
1390
1391     pa_pstream_send_simple_ack(c->pstream, tag);
1392 }
1393
1394 static void command_set_volume(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1395     struct connection *c = userdata;
1396     uint32_t index, volume;
1397     struct pa_sink *sink = NULL;
1398     struct pa_sink_input *si = NULL;
1399     const char *name = NULL;
1400     assert(c && t);
1401
1402     if (pa_tagstruct_getu32(t, &index) < 0 ||
1403         (command == PA_COMMAND_SET_SINK_VOLUME && pa_tagstruct_gets(t, &name) < 0) ||
1404         pa_tagstruct_getu32(t, &volume) ||
1405         !pa_tagstruct_eof(t)) {
1406         protocol_error(c);
1407         return;
1408     }
1409
1410     if (!c->authorized) {
1411         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1412         return;
1413     }
1414
1415     if (command == PA_COMMAND_SET_SINK_VOLUME) {
1416         if (index != (uint32_t) -1)
1417             sink = pa_idxset_get_by_index(c->protocol->core->sinks, index);
1418         else
1419             sink = pa_namereg_get(c->protocol->core, name, PA_NAMEREG_SINK, 1);
1420     }  else {
1421         assert(command == PA_COMMAND_SET_SINK_INPUT_VOLUME);
1422         si = pa_idxset_get_by_index(c->protocol->core->sink_inputs, index);
1423     }
1424
1425     if (!si && !sink) {
1426         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1427         return;
1428     }
1429
1430     if (sink)
1431         pa_sink_set_volume(sink, volume);
1432     else if (si)
1433         pa_sink_input_set_volume(si, volume);
1434
1435     pa_pstream_send_simple_ack(c->pstream, tag);
1436 }
1437
1438 static void command_cork_playback_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1439     struct connection *c = userdata;
1440     uint32_t index;
1441     int b;
1442     struct playback_stream *s;
1443     assert(c && t);
1444
1445     if (pa_tagstruct_getu32(t, &index) < 0 ||
1446         pa_tagstruct_get_boolean(t, &b) < 0 ||
1447         !pa_tagstruct_eof(t)) {
1448         protocol_error(c);
1449         return;
1450     }
1451
1452     if (!c->authorized) {
1453         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1454         return;
1455     }
1456
1457     if (!(s = pa_idxset_get_by_index(c->output_streams, index)) || s->type != PLAYBACK_STREAM) {
1458         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1459         return;
1460     }
1461
1462     pa_sink_input_cork(s->sink_input, b);
1463     pa_pstream_send_simple_ack(c->pstream, tag);
1464 }
1465
1466 static void command_flush_or_trigger_playback_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1467     struct connection *c = userdata;
1468     uint32_t index;
1469     struct playback_stream *s;
1470     assert(c && t);
1471
1472     if (pa_tagstruct_getu32(t, &index) < 0 ||
1473         !pa_tagstruct_eof(t)) {
1474         protocol_error(c);
1475         return;
1476     }
1477
1478     if (!c->authorized) {
1479         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1480         return;
1481     }
1482
1483     if (!(s = pa_idxset_get_by_index(c->output_streams, index)) || s->type != PLAYBACK_STREAM) {
1484         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1485         return;
1486     }
1487
1488     if (command == PA_COMMAND_PREBUF_PLAYBACK_STREAM)
1489         pa_memblockq_prebuf_reenable(s->memblockq);
1490     else if (command == PA_COMMAND_TRIGGER_PLAYBACK_STREAM)
1491         pa_memblockq_prebuf_disable(s->memblockq);
1492     else {
1493         assert(command == PA_COMMAND_FLUSH_PLAYBACK_STREAM);
1494         pa_memblockq_flush(s->memblockq);
1495         /*pa_log(__FILE__": flush: %u\n", pa_memblockq_get_length(s->memblockq));*/
1496     }
1497
1498     pa_sink_notify(s->sink_input->sink);
1499     pa_pstream_send_simple_ack(c->pstream, tag);
1500     request_bytes(s);
1501 }
1502
1503 static void command_cork_record_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1504     struct connection *c = userdata;
1505     uint32_t index;
1506     struct record_stream *s;
1507     int b;
1508     assert(c && t);
1509
1510     if (pa_tagstruct_getu32(t, &index) < 0 ||
1511         pa_tagstruct_get_boolean(t, &b) < 0 ||
1512         !pa_tagstruct_eof(t)) {
1513         protocol_error(c);
1514         return;
1515     }
1516
1517     if (!c->authorized) {
1518         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1519         return;
1520     }
1521
1522     if (!(s = pa_idxset_get_by_index(c->record_streams, index))) {
1523         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1524         return;
1525     }
1526
1527     pa_source_output_cork(s->source_output, b);
1528     pa_pstream_send_simple_ack(c->pstream, tag);
1529 }
1530
1531 static void command_flush_record_stream(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1532     struct connection *c = userdata;
1533     uint32_t index;
1534     struct record_stream *s;
1535     assert(c && t);
1536
1537     if (pa_tagstruct_getu32(t, &index) < 0 ||
1538         !pa_tagstruct_eof(t)) {
1539         protocol_error(c);
1540         return;
1541     }
1542
1543     if (!c->authorized) {
1544         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1545         return;
1546     }
1547
1548     if (!(s = pa_idxset_get_by_index(c->record_streams, index))) {
1549         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1550         return;
1551     }
1552
1553     pa_memblockq_flush(s->memblockq);
1554     pa_pstream_send_simple_ack(c->pstream, tag);
1555 }
1556
1557 static void command_set_default_sink_or_source(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1558     struct connection *c = userdata;
1559     uint32_t index;
1560     const char *s;
1561     assert(c && t);
1562
1563     if (pa_tagstruct_getu32(t, &index) < 0 ||
1564         pa_tagstruct_gets(t, &s) < 0 || !s ||
1565         !pa_tagstruct_eof(t)) {
1566         protocol_error(c);
1567         return;
1568     }
1569
1570     if (!c->authorized) {
1571         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1572         return;
1573     }
1574
1575     pa_namereg_set_default(c->protocol->core, s, command == PA_COMMAND_SET_DEFAULT_SOURCE ? PA_NAMEREG_SOURCE : PA_NAMEREG_SINK);
1576     pa_pstream_send_simple_ack(c->pstream, tag);
1577 }
1578
1579 static void command_set_stream_name(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1580     struct connection *c = userdata;
1581     uint32_t index;
1582     const char *name;
1583     assert(c && t);
1584
1585     if (pa_tagstruct_getu32(t, &index) < 0 ||
1586         pa_tagstruct_gets(t, &name) < 0 || !name ||
1587         !pa_tagstruct_eof(t)) {
1588         protocol_error(c);
1589         return;
1590     }
1591
1592     if (!c->authorized) {
1593         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1594         return;
1595     }
1596
1597     if (command == PA_COMMAND_SET_PLAYBACK_STREAM_NAME) {
1598         struct playback_stream *s;
1599
1600         if (!(s = pa_idxset_get_by_index(c->output_streams, index)) || s->type != PLAYBACK_STREAM) {
1601             pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1602             return;
1603         }
1604
1605         pa_sink_input_set_name(s->sink_input, name);
1606
1607     } else {
1608         struct record_stream *s;
1609
1610         if (!(s = pa_idxset_get_by_index(c->record_streams, index))) {
1611             pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1612             return;
1613         }
1614
1615         pa_source_output_set_name(s->source_output, name);
1616     }
1617
1618     pa_pstream_send_simple_ack(c->pstream, tag);
1619 }
1620
1621 static void command_kill(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1622     struct connection *c = userdata;
1623     uint32_t index;
1624     assert(c && t);
1625
1626     if (pa_tagstruct_getu32(t, &index) < 0 ||
1627         !pa_tagstruct_eof(t)) {
1628         protocol_error(c);
1629         return;
1630     }
1631
1632     if (!c->authorized) {
1633         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1634         return;
1635     }
1636
1637     if (command == PA_COMMAND_KILL_CLIENT) {
1638         struct pa_client *client;
1639
1640         if (!(client = pa_idxset_get_by_index(c->protocol->core->clients, index))) {
1641             pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1642             return;
1643         }
1644
1645         pa_client_kill(client);
1646     } else if (command == PA_COMMAND_KILL_SINK_INPUT) {
1647         struct pa_sink_input *s;
1648
1649         if (!(s = pa_idxset_get_by_index(c->protocol->core->sink_inputs, index))) {
1650             pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1651             return;
1652         }
1653
1654         pa_sink_input_kill(s);
1655     } else {
1656         struct pa_source_output *s;
1657
1658         assert(command == PA_COMMAND_KILL_SOURCE_OUTPUT);
1659
1660         if (!(s = pa_idxset_get_by_index(c->protocol->core->source_outputs, index))) {
1661             pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1662             return;
1663         }
1664
1665         pa_source_output_kill(s);
1666     }
1667
1668     pa_pstream_send_simple_ack(c->pstream, tag);
1669 }
1670
1671 static void command_load_module(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1672     struct connection *c = userdata;
1673     struct pa_module *m;
1674     const char *name, *argument;
1675     struct pa_tagstruct *reply;
1676     assert(c && t);
1677
1678     if (pa_tagstruct_gets(t, &name) < 0 || !name ||
1679         pa_tagstruct_gets(t, &argument) < 0 ||
1680         !pa_tagstruct_eof(t)) {
1681         protocol_error(c);
1682         return;
1683     }
1684
1685     if (!c->authorized) {
1686         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1687         return;
1688     }
1689
1690     if (!(m = pa_module_load(c->protocol->core, name, argument))) {
1691         pa_pstream_send_error(c->pstream, tag, PA_ERROR_INITFAILED);
1692         return;
1693     }
1694
1695     reply = pa_tagstruct_new(NULL, 0);
1696     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
1697     pa_tagstruct_putu32(reply, tag);
1698     pa_tagstruct_putu32(reply, m->index);
1699     pa_pstream_send_tagstruct(c->pstream, reply);
1700 }
1701
1702 static void command_unload_module(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1703     struct connection *c = userdata;
1704     uint32_t index;
1705     struct pa_module *m;
1706     assert(c && t);
1707
1708     if (pa_tagstruct_getu32(t, &index) < 0 ||
1709         !pa_tagstruct_eof(t)) {
1710         protocol_error(c);
1711         return;
1712     }
1713
1714     if (!c->authorized) {
1715         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1716         return;
1717     }
1718
1719     if (!(m = pa_idxset_get_by_index(c->protocol->core->modules, index))) {
1720         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1721         return;
1722     }
1723
1724     pa_module_unload_request(m);
1725     pa_pstream_send_simple_ack(c->pstream, tag);
1726 }
1727
1728 static void command_add_autoload(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1729     struct connection *c = userdata;
1730     const char *name, *module, *argument;
1731     uint32_t type;
1732     assert(c && t);
1733
1734     if (pa_tagstruct_gets(t, &name) < 0 || !name ||
1735         pa_tagstruct_getu32(t, &type) < 0 || type > 1 ||
1736         pa_tagstruct_gets(t, &module) < 0 || !module ||
1737         pa_tagstruct_gets(t, &argument) < 0 ||
1738         !pa_tagstruct_eof(t)) {
1739         protocol_error(c);
1740         return;
1741     }
1742
1743     if (!c->authorized) {
1744         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1745         return;
1746     }
1747
1748     if (pa_autoload_add(c->protocol->core, name, type == 0 ? PA_NAMEREG_SINK : PA_NAMEREG_SOURCE, module, argument) < 0) {
1749         pa_pstream_send_error(c->pstream, tag, PA_ERROR_EXIST);
1750         return;
1751     }
1752
1753     pa_pstream_send_simple_ack(c->pstream, tag);
1754 }
1755
1756 static void command_remove_autoload(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1757     struct connection *c = userdata;
1758     const char *name;
1759     uint32_t type;
1760     assert(c && t);
1761
1762     if (pa_tagstruct_gets(t, &name) < 0 || !name ||
1763         pa_tagstruct_getu32(t, &type) < 0 || type > 1 ||
1764         !pa_tagstruct_eof(t)) {
1765         protocol_error(c);
1766         return;
1767     }
1768
1769     if (!c->authorized) {
1770         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1771         return;
1772     }
1773
1774     if (pa_autoload_remove(c->protocol->core, name, type == 0 ? PA_NAMEREG_SINK : PA_NAMEREG_SOURCE) < 0) {
1775         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1776         return;
1777     }
1778
1779     pa_pstream_send_simple_ack(c->pstream, tag);
1780 }
1781
1782 static void autoload_fill_tagstruct(struct pa_tagstruct *t, struct pa_autoload_entry *e) {
1783     assert(t && e);
1784     pa_tagstruct_puts(t, e->name);
1785     pa_tagstruct_putu32(t, e->type == PA_NAMEREG_SINK ? 0 : 1);
1786     pa_tagstruct_puts(t, e->module);
1787     pa_tagstruct_puts(t, e->argument);
1788 }
1789
1790 static void command_get_autoload_info(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1791     struct connection *c = userdata;
1792     struct pa_autoload_entry *a = NULL;
1793     uint32_t type;
1794     const char *name;
1795     struct pa_tagstruct *reply;
1796     assert(c && t);
1797
1798     if (pa_tagstruct_gets(t, &name) < 0 || name ||
1799         pa_tagstruct_getu32(t, &type) < 0 || type > 1 ||
1800         !pa_tagstruct_eof(t)) {
1801         protocol_error(c);
1802         return;
1803     }
1804
1805     if (!c->authorized) {
1806         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1807         return;
1808     }
1809
1810     if (!c->protocol->core->autoload_hashmap || !(a = pa_hashmap_get(c->protocol->core->autoload_hashmap, name)) || (a->type == PA_NAMEREG_SINK && type != 0) || (a->type == PA_NAMEREG_SOURCE && type != 1)) {
1811         pa_pstream_send_error(c->pstream, tag, PA_ERROR_NOENTITY);
1812         return;
1813     }
1814
1815     reply = pa_tagstruct_new(NULL, 0);
1816     assert(reply);
1817     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
1818     pa_tagstruct_putu32(reply, tag);
1819     autoload_fill_tagstruct(reply, a);
1820     pa_pstream_send_tagstruct(c->pstream, reply);
1821 }
1822
1823 static void command_get_autoload_info_list(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
1824     struct connection *c = userdata;
1825     struct pa_tagstruct *reply;
1826     assert(c && t);
1827
1828     if (!pa_tagstruct_eof(t)) {
1829         protocol_error(c);
1830         return;
1831     }
1832
1833     if (!c->authorized) {
1834         pa_pstream_send_error(c->pstream, tag, PA_ERROR_ACCESS);
1835         return;
1836     }
1837
1838     reply = pa_tagstruct_new(NULL, 0);
1839     pa_tagstruct_putu32(reply, PA_COMMAND_REPLY);
1840     pa_tagstruct_putu32(reply, tag);
1841
1842     if (c->protocol->core->autoload_hashmap) {
1843         struct pa_autoload_entry *a;
1844         void *state = NULL;
1845
1846         while ((a = pa_hashmap_iterate(c->protocol->core->autoload_hashmap, &state)))
1847             autoload_fill_tagstruct(reply, a);
1848     }
1849
1850     pa_pstream_send_tagstruct(c->pstream, reply);
1851 }
1852
1853 /*** pstream callbacks ***/
1854
1855 static void pstream_packet_callback(struct pa_pstream *p, struct pa_packet *packet, void *userdata) {
1856     struct connection *c = userdata;
1857     assert(p && packet && packet->data && c);
1858
1859     if (pa_pdispatch_run(c->pdispatch, packet, c) < 0) {
1860         pa_log(__FILE__": invalid packet.\n");
1861         connection_free(c);
1862     }
1863 }
1864
1865 static void pstream_memblock_callback(struct pa_pstream *p, uint32_t channel, uint32_t delta, const struct pa_memchunk *chunk, void *userdata) {
1866     struct connection *c = userdata;
1867     struct output_stream *stream;
1868     assert(p && chunk && userdata);
1869
1870     if (!(stream = pa_idxset_get_by_index(c->output_streams, channel))) {
1871         pa_log(__FILE__": client sent block for invalid stream.\n");
1872         connection_free(c);
1873         return;
1874     }
1875
1876     if (stream->type == PLAYBACK_STREAM) {
1877         struct playback_stream *p = (struct playback_stream*) stream;
1878         if (chunk->length >= p->requested_bytes)
1879             p->requested_bytes = 0;
1880         else
1881             p->requested_bytes -= chunk->length;
1882
1883         pa_memblockq_push_align(p->memblockq, chunk, delta);
1884         assert(p->sink_input);
1885 /*         pa_log(__FILE__": after_recv: %u\n", pa_memblockq_get_length(p->memblockq)); */
1886
1887         pa_sink_notify(p->sink_input->sink);
1888 /*          pa_log(__FILE__": Recieved %u bytes.\n", chunk->length);  */
1889
1890     } else {
1891         struct upload_stream *u = (struct upload_stream*) stream;
1892         size_t l;
1893         assert(u->type == UPLOAD_STREAM);
1894
1895         if (!u->memchunk.memblock) {
1896             if (u->length == chunk->length) {
1897                 u->memchunk = *chunk;
1898                 pa_memblock_ref(u->memchunk.memblock);
1899                 u->length = 0;
1900             } else {
1901                 u->memchunk.memblock = pa_memblock_new(u->length, c->protocol->core->memblock_stat);
1902                 u->memchunk.index = u->memchunk.length = 0;
1903             }
1904         }
1905
1906         assert(u->memchunk.memblock);
1907
1908         l = u->length;
1909         if (l > chunk->length)
1910             l = chunk->length;
1911
1912         if (l > 0) {
1913             memcpy((uint8_t*) u->memchunk.memblock->data + u->memchunk.index + u->memchunk.length,
1914                    (uint8_t*) chunk->memblock->data+chunk->index, l);
1915             u->memchunk.length += l;
1916             u->length -= l;
1917         }
1918     }
1919 }
1920
1921 static void pstream_die_callback(struct pa_pstream *p, void *userdata) {
1922     struct connection *c = userdata;
1923     assert(p && c);
1924     connection_free(c);
1925
1926 /*    pa_log(__FILE__": connection died.\n");*/
1927 }
1928
1929
1930 static void pstream_drain_callback(struct pa_pstream *p, void *userdata) {
1931     struct connection *c = userdata;
1932     assert(p && c);
1933
1934     send_memblock(c);
1935 }
1936
1937 /*** client callbacks ***/
1938
1939 static void client_kill_cb(struct pa_client *c) {
1940     assert(c && c->userdata);
1941     connection_free(c->userdata);
1942 }
1943
1944 /*** socket server callbacks ***/
1945
1946 static void on_connection(struct pa_socket_server*s, struct pa_iochannel *io, void *userdata) {
1947     struct pa_protocol_native *p = userdata;
1948     struct connection *c;
1949     assert(io && p);
1950
1951     c = pa_xmalloc(sizeof(struct connection));
1952
1953     c->authorized =!! p->public;
1954     c->protocol = p;
1955     assert(p->core);
1956     c->client = pa_client_new(p->core, "NATIVE", "Client");
1957     assert(c->client);
1958     c->client->kill = client_kill_cb;
1959     c->client->userdata = c;
1960     c->client->owner = p->module;
1961
1962     c->pstream = pa_pstream_new(p->core->mainloop, io, p->core->memblock_stat);
1963     assert(c->pstream);
1964
1965     pa_pstream_set_recieve_packet_callback(c->pstream, pstream_packet_callback, c);
1966     pa_pstream_set_recieve_memblock_callback(c->pstream, pstream_memblock_callback, c);
1967     pa_pstream_set_die_callback(c->pstream, pstream_die_callback, c);
1968     pa_pstream_set_drain_callback(c->pstream, pstream_drain_callback, c);
1969
1970     c->pdispatch = pa_pdispatch_new(p->core->mainloop, command_table, PA_COMMAND_MAX);
1971     assert(c->pdispatch);
1972
1973     c->record_streams = pa_idxset_new(NULL, NULL);
1974     c->output_streams = pa_idxset_new(NULL, NULL);
1975     assert(c->record_streams && c->output_streams);
1976
1977     c->rrobin_index = PA_IDXSET_INVALID;
1978     c->subscription = NULL;
1979
1980     pa_idxset_put(p->connections, c, NULL);
1981 }
1982
1983 /*** module entry points ***/
1984
1985 static struct pa_protocol_native* protocol_new_internal(struct pa_core *c, struct pa_module *m, struct pa_modargs *ma) {
1986     struct pa_protocol_native *p;
1987     int public = 0;
1988     assert(c && ma);
1989
1990     if (pa_modargs_get_value_boolean(ma, "public", &public) < 0) {
1991         pa_log(__FILE__": public= expects a boolean argument.\n");
1992         return NULL;
1993     }
1994
1995     p = pa_xmalloc(sizeof(struct pa_protocol_native));
1996
1997     if (pa_authkey_load_from_home(pa_modargs_get_value(ma, "cookie", PA_NATIVE_COOKIE_FILE), p->auth_cookie, sizeof(p->auth_cookie)) < 0) {
1998         pa_xfree(p);
1999         return NULL;
2000     }
2001
2002     p->module = m;
2003     p->public = public;
2004     p->server = NULL;
2005     p->core = c;
2006     p->connections = pa_idxset_new(NULL, NULL);
2007     assert(p->connections);
2008
2009     return p;
2010 }
2011
2012 struct pa_protocol_native* pa_protocol_native_new(struct pa_core *core, struct pa_socket_server *server, struct pa_module *m, struct pa_modargs *ma) {
2013     struct pa_protocol_native *p;
2014
2015     if (!(p = protocol_new_internal(core, m, ma)))
2016         return NULL;
2017
2018     p->server = server;
2019     pa_socket_server_set_callback(p->server, on_connection, p);
2020
2021     return p;
2022 }
2023
2024 void pa_protocol_native_free(struct pa_protocol_native *p) {
2025     struct connection *c;
2026     assert(p);
2027
2028     while ((c = pa_idxset_first(p->connections, NULL)))
2029         connection_free(c);
2030     pa_idxset_free(p->connections, NULL, NULL);
2031
2032     if (p->server)
2033         pa_socket_server_unref(p->server);
2034
2035     pa_xfree(p);
2036 }
2037
2038 struct pa_protocol_native* pa_protocol_native_new_iochannel(struct pa_core*core, struct pa_iochannel *io, struct pa_module *m, struct pa_modargs *ma) {
2039     struct pa_protocol_native *p;
2040
2041     if (!(p = protocol_new_internal(core, m, ma)))
2042         return NULL;
2043
2044     on_connection(NULL, io, p);
2045
2046     return p;
2047 }