7 #include "protocol-native-spec.h"
11 #include "socket-client.h"
12 #include "pstream-util.h"
16 #define DEFAULT_MAXLENGTH 20480
17 #define DEFAULT_TLENGTH 10240
18 #define DEFAULT_PREBUF 4096
19 #define DEFAULT_MINREQ 1024
21 #define DEFAULT_TIMEOUT (5*60)
22 #define DEFAULT_SERVER "/tmp/polypaudio/native"
26 struct pa_mainloop_api* mainloop;
27 struct pa_socket_client *client;
28 struct pa_pstream *pstream;
29 struct pa_pdispatch *pdispatch;
30 struct pa_dynarray *streams;
31 struct pa_stream *first_stream;
43 void (*connect_complete_callback)(struct pa_context*c, int success, void *userdata);
44 void *connect_complete_userdata;
46 void (*drain_complete_callback)(struct pa_context*c, void *userdata);
47 void *drain_complete_userdata;
49 void (*die_callback)(struct pa_context*c, void *userdata);
52 uint8_t auth_cookie[PA_NATIVE_COOKIE_LENGTH];
56 struct pa_context *context;
57 struct pa_stream *next, *previous;
60 struct pa_buffer_attr buffer_attr;
61 struct pa_sample_spec sample_spec;
62 uint32_t device_index;
65 enum pa_stream_direction direction;
67 enum { STREAM_LOOKING_UP, STREAM_CREATING, STREAM_READY, STREAM_DEAD} state;
68 uint32_t requested_bytes;
70 void (*read_callback)(struct pa_stream *p, const void*data, size_t length, void *userdata);
73 void (*write_callback)(struct pa_stream *p, size_t length, void *userdata);
76 void (*create_complete_callback)(struct pa_stream *s, int success, void *userdata);
77 void *create_complete_userdata;
79 void (*die_callback)(struct pa_stream*c, void *userdata);
83 static void command_request(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata);
85 static const struct pa_pdispatch_command command_table[PA_COMMAND_MAX] = {
86 [PA_COMMAND_ERROR] = { NULL },
87 [PA_COMMAND_REPLY] = { NULL },
88 [PA_COMMAND_CREATE_PLAYBACK_STREAM] = { NULL },
89 [PA_COMMAND_DELETE_PLAYBACK_STREAM] = { NULL },
90 [PA_COMMAND_CREATE_RECORD_STREAM] = { NULL },
91 [PA_COMMAND_DELETE_RECORD_STREAM] = { NULL },
92 [PA_COMMAND_EXIT] = { NULL },
93 [PA_COMMAND_REQUEST] = { command_request },
96 struct pa_context *pa_context_new(struct pa_mainloop_api *mainloop, const char *name) {
98 assert(mainloop && name);
100 c = malloc(sizeof(struct pa_context));
102 c->name = strdup(name);
103 c->mainloop = mainloop;
107 c->streams = pa_dynarray_new();
109 c->first_stream = NULL;
110 c->error = PA_ERROR_OK;
111 c->state = CONTEXT_UNCONNECTED;
114 c->connect_complete_callback = NULL;
115 c->connect_complete_userdata = NULL;
117 c->drain_complete_callback = NULL;
118 c->drain_complete_userdata = NULL;
120 c->die_callback = NULL;
121 c->die_userdata = NULL;
123 pa_check_for_sigpipe();
127 void pa_context_free(struct pa_context *c) {
130 while (c->first_stream)
131 pa_stream_free(c->first_stream);
134 pa_socket_client_free(c->client);
136 pa_pdispatch_free(c->pdispatch);
138 pa_pstream_free(c->pstream);
140 pa_dynarray_free(c->streams, NULL, NULL);
146 static void stream_dead(struct pa_stream *s) {
149 if (s->state == STREAM_DEAD)
152 if (s->state == STREAM_READY) {
153 s->state = STREAM_DEAD;
155 s->die_callback(s, s->die_userdata);
157 s->state = STREAM_DEAD;
160 static void context_dead(struct pa_context *c) {
164 if (c->state == CONTEXT_DEAD)
168 pa_pdispatch_free(c->pdispatch);
172 pa_pstream_free(c->pstream);
176 pa_socket_client_free(c->client);
179 for (s = c->first_stream; s; s = s->next)
182 if (c->state == CONTEXT_READY) {
183 c->state = CONTEXT_DEAD;
185 c->die_callback(c, c->die_userdata);
187 s->state = CONTEXT_DEAD;
190 static void pstream_die_callback(struct pa_pstream *p, void *userdata) {
191 struct pa_context *c = userdata;
196 static void pstream_packet_callback(struct pa_pstream *p, struct pa_packet *packet, void *userdata) {
197 struct pa_context *c = userdata;
198 assert(p && packet && c);
200 if (pa_pdispatch_run(c->pdispatch, packet, c) < 0) {
201 fprintf(stderr, "polyp.c: invalid packet.\n");
206 static void pstream_memblock_callback(struct pa_pstream *p, uint32_t channel, int32_t delta, struct pa_memchunk *chunk, void *userdata) {
207 struct pa_context *c = userdata;
209 assert(p && chunk && c && chunk->memblock && chunk->memblock->data);
211 if (!(s = pa_dynarray_get(c->streams, channel)))
214 if (s->read_callback)
215 s->read_callback(s, chunk->memblock->data + chunk->index, chunk->length, s->read_userdata);
218 static int handle_error(struct pa_context *c, uint32_t command, struct pa_tagstruct *t) {
221 if (command == PA_COMMAND_ERROR) {
222 if (pa_tagstruct_getu32(t, &c->error) < 0) {
223 c->error = PA_ERROR_PROTOCOL;
230 c->error = (command == PA_COMMAND_TIMEOUT) ? PA_ERROR_TIMEOUT : PA_ERROR_INTERNAL;
234 static void setup_complete_callback(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
235 struct pa_context *c = userdata;
236 assert(pd && c && (c->state == CONTEXT_AUTHORIZING || c->state == CONTEXT_SETTING_NAME));
238 if (command != PA_COMMAND_REPLY) {
239 handle_error(c, command, t);
242 if (c->connect_complete_callback)
243 c->connect_complete_callback(c, 0, c->connect_complete_userdata);
248 if (c->state == CONTEXT_AUTHORIZING) {
249 struct pa_tagstruct *t;
250 c->state = CONTEXT_SETTING_NAME;
251 t = pa_tagstruct_new(NULL, 0);
253 pa_tagstruct_putu32(t, PA_COMMAND_SET_NAME);
254 pa_tagstruct_putu32(t, tag = c->ctag++);
255 pa_tagstruct_puts(t, c->name);
256 pa_pstream_send_tagstruct(c->pstream, t);
257 pa_pdispatch_register_reply(c->pdispatch, tag, DEFAULT_TIMEOUT, setup_complete_callback, c);
259 assert(c->state == CONTEXT_SETTING_NAME);
261 c->state = CONTEXT_READY;
263 if (c->connect_complete_callback)
264 c->connect_complete_callback(c, 1, c->connect_complete_userdata);
270 static void on_connection(struct pa_socket_client *client, struct pa_iochannel*io, void *userdata) {
271 struct pa_context *c = userdata;
272 struct pa_tagstruct *t;
274 assert(client && io && c && c->state == CONTEXT_CONNECTING);
276 pa_socket_client_free(client);
280 c->error = PA_ERROR_CONNECTIONREFUSED;
283 if (c->connect_complete_callback)
284 c->connect_complete_callback(c, 0, c->connect_complete_userdata);
289 c->pstream = pa_pstream_new(c->mainloop, io);
291 pa_pstream_set_die_callback(c->pstream, pstream_die_callback, c);
292 pa_pstream_set_recieve_packet_callback(c->pstream, pstream_packet_callback, c);
293 pa_pstream_set_recieve_memblock_callback(c->pstream, pstream_memblock_callback, c);
295 c->pdispatch = pa_pdispatch_new(c->mainloop, command_table, PA_COMMAND_MAX);
296 assert(c->pdispatch);
298 t = pa_tagstruct_new(NULL, 0);
300 pa_tagstruct_putu32(t, PA_COMMAND_AUTH);
301 pa_tagstruct_putu32(t, tag = c->ctag++);
302 pa_tagstruct_put_arbitrary(t, c->auth_cookie, sizeof(c->auth_cookie));
303 pa_pstream_send_tagstruct(c->pstream, t);
304 pa_pdispatch_register_reply(c->pdispatch, tag, DEFAULT_TIMEOUT, setup_complete_callback, c);
305 c->state = CONTEXT_AUTHORIZING;
308 int pa_context_connect(struct pa_context *c, const char *server, void (*complete) (struct pa_context*c, int success, void *userdata), void *userdata) {
309 assert(c && c->state == CONTEXT_UNCONNECTED);
311 if (pa_authkey_load_from_home(PA_NATIVE_COOKIE_FILE, c->auth_cookie, sizeof(c->auth_cookie)) < 0) {
312 c->error = PA_ERROR_AUTHKEY;
317 if (!(c->client = pa_socket_client_new_unix(c->mainloop, server ? server : DEFAULT_SERVER))) {
318 c->error = PA_ERROR_CONNECTIONREFUSED;
322 c->connect_complete_callback = complete;
323 c->connect_complete_userdata = userdata;
325 pa_socket_client_set_callback(c->client, on_connection, c);
326 c->state = CONTEXT_CONNECTING;
331 int pa_context_is_dead(struct pa_context *c) {
333 return c->state == CONTEXT_DEAD;
336 int pa_context_is_ready(struct pa_context *c) {
338 return c->state == CONTEXT_READY;
341 int pa_context_errno(struct pa_context *c) {
346 void pa_context_set_die_callback(struct pa_context *c, void (*cb)(struct pa_context *c, void *userdata), void *userdata) {
348 c->die_callback = cb;
349 c->die_userdata = userdata;
352 static void command_request(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
354 struct pa_context *c = userdata;
355 uint32_t bytes, channel;
356 assert(pd && command == PA_COMMAND_REQUEST && t && c);
358 if (pa_tagstruct_getu32(t, &channel) < 0 ||
359 pa_tagstruct_getu32(t, &bytes) < 0 ||
360 !pa_tagstruct_eof(t)) {
361 c->error = PA_ERROR_PROTOCOL;
366 if (!(s = pa_dynarray_get(c->streams, channel)))
369 if (s->state != STREAM_READY)
372 s->requested_bytes += bytes;
374 if (s->requested_bytes && s->write_callback)
375 s->write_callback(s, s->requested_bytes, s->write_userdata);
378 static void create_playback_callback(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
379 struct pa_stream *s = userdata;
380 assert(pd && s && s->state == STREAM_CREATING);
382 if (command != PA_COMMAND_REPLY) {
383 if (handle_error(s->context, command, t) < 0) {
384 context_dead(s->context);
389 if (s->create_complete_callback)
390 s->create_complete_callback(s, 0, s->create_complete_userdata);
395 if (pa_tagstruct_getu32(t, &s->channel) < 0 ||
396 pa_tagstruct_getu32(t, &s->device_index) < 0 ||
397 !pa_tagstruct_eof(t)) {
398 s->context->error = PA_ERROR_PROTOCOL;
399 context_dead(s->context);
403 s->channel_valid = 1;
404 pa_dynarray_put(s->context->streams, s->channel, s);
406 s->state = STREAM_READY;
407 if (s->create_complete_callback)
408 s->create_complete_callback(s, 1, s->create_complete_userdata);
411 static void create_stream(struct pa_stream *s, uint32_t tdev_index) {
412 struct pa_tagstruct *t;
416 s->state = STREAM_CREATING;
418 t = pa_tagstruct_new(NULL, 0);
421 pa_tagstruct_putu32(t, s->direction == PA_STREAM_PLAYBACK ? PA_COMMAND_CREATE_PLAYBACK_STREAM : PA_COMMAND_CREATE_RECORD_STREAM);
422 pa_tagstruct_putu32(t, tag = s->context->ctag++);
423 pa_tagstruct_puts(t, s->name);
424 pa_tagstruct_put_sample_spec(t, &s->sample_spec);
425 pa_tagstruct_putu32(t, tdev_index);
426 pa_tagstruct_putu32(t, s->buffer_attr.maxlength);
427 pa_tagstruct_putu32(t, s->buffer_attr.tlength);
428 pa_tagstruct_putu32(t, s->buffer_attr.prebuf);
429 pa_tagstruct_putu32(t, s->buffer_attr.minreq);
431 pa_pstream_send_tagstruct(s->context->pstream, t);
432 pa_pdispatch_register_reply(s->context->pdispatch, tag, DEFAULT_TIMEOUT, create_playback_callback, s);
435 static void lookup_device_callback(struct pa_pdispatch *pd, uint32_t command, uint32_t tag, struct pa_tagstruct *t, void *userdata) {
436 struct pa_stream *s = userdata;
438 assert(pd && s && s->state == STREAM_LOOKING_UP);
440 if (command != PA_COMMAND_REPLY) {
441 if (handle_error(s->context, command, t) < 0) {
442 context_dead(s->context);
447 if (s->create_complete_callback)
448 s->create_complete_callback(s, 0, s->create_complete_userdata);
452 if (pa_tagstruct_getu32(t, &tdev) < 0 ||
453 !pa_tagstruct_eof(t)) {
454 s->context->error = PA_ERROR_PROTOCOL;
455 context_dead(s->context);
459 create_stream(s, tdev);
462 static void lookup_device(struct pa_stream *s, const char *tdev) {
463 struct pa_tagstruct *t;
467 s->state = STREAM_LOOKING_UP;
469 t = pa_tagstruct_new(NULL, 0);
472 pa_tagstruct_putu32(t, s->direction == PA_STREAM_PLAYBACK ? PA_COMMAND_LOOKUP_SINK : PA_COMMAND_LOOKUP_SOURCE);
473 pa_tagstruct_putu32(t, tag = s->context->ctag++);
474 pa_tagstruct_puts(t, tdev);
476 pa_pstream_send_tagstruct(s->context->pstream, t);
477 pa_pdispatch_register_reply(s->context->pdispatch, tag, DEFAULT_TIMEOUT, lookup_device_callback, s);
480 struct pa_stream* pa_stream_new(
481 struct pa_context *c,
482 enum pa_stream_direction dir,
485 const struct pa_sample_spec *ss,
486 const struct pa_buffer_attr *attr,
487 void (*complete) (struct pa_stream*s, int success, void *userdata),
492 assert(c && name && ss && c->state == CONTEXT_READY);
494 s = malloc(sizeof(struct pa_stream));
498 s->read_callback = NULL;
499 s->read_userdata = NULL;
500 s->write_callback = NULL;
501 s->write_userdata = NULL;
502 s->die_callback = NULL;
503 s->die_userdata = NULL;
504 s->create_complete_callback = complete;
505 s->create_complete_userdata = NULL;
507 s->name = strdup(name);
508 s->state = STREAM_CREATING;
509 s->requested_bytes = 0;
511 s->channel_valid = 0;
512 s->device_index = (uint32_t) -1;
514 s->sample_spec = *ss;
516 s->buffer_attr = *attr;
518 s->buffer_attr.maxlength = DEFAULT_MAXLENGTH;
519 s->buffer_attr.tlength = DEFAULT_TLENGTH;
520 s->buffer_attr.prebuf = DEFAULT_PREBUF;
521 s->buffer_attr.minreq = DEFAULT_MINREQ;
524 s->next = c->first_stream;
526 s->next->previous = s;
531 lookup_device(s, dev);
533 create_stream(s, (uint32_t) -1);
538 void pa_stream_free(struct pa_stream *s) {
539 assert(s && s->context);
543 if (s->channel_valid && s->context->state == CONTEXT_READY) {
544 struct pa_tagstruct *t = pa_tagstruct_new(NULL, 0);
547 pa_tagstruct_putu32(t, PA_COMMAND_DELETE_PLAYBACK_STREAM);
548 pa_tagstruct_putu32(t, s->context->ctag++);
549 pa_tagstruct_putu32(t, s->channel);
550 pa_pstream_send_tagstruct(s->context->pstream, t);
553 if (s->channel_valid)
554 pa_dynarray_put(s->context->streams, s->channel, NULL);
557 s->next->previous = s->previous;
559 s->previous->next = s->next;
561 s->context->first_stream = s->next;
566 void pa_stream_set_write_callback(struct pa_stream *s, void (*cb)(struct pa_stream *p, size_t length, void *userdata), void *userdata) {
568 s->write_callback = cb;
569 s->write_userdata = userdata;
572 void pa_stream_write(struct pa_stream *s, const void *data, size_t length) {
573 struct pa_memchunk chunk;
574 assert(s && s->context && data && length && s->state == STREAM_READY);
576 chunk.memblock = pa_memblock_new(length);
577 assert(chunk.memblock && chunk.memblock->data);
578 memcpy(chunk.memblock->data, data, length);
580 chunk.length = length;
582 pa_pstream_send_memblock(s->context->pstream, s->channel, 0, &chunk);
583 pa_memblock_unref(chunk.memblock);
585 /*fprintf(stderr, "Sent %u bytes\n", length);*/
587 if (length < s->requested_bytes)
588 s->requested_bytes -= length;
590 s->requested_bytes = 0;
593 size_t pa_stream_writable_size(struct pa_stream *s) {
594 assert(s && s->state == STREAM_READY);
595 return s->requested_bytes;
598 void pa_stream_set_read_callback(struct pa_stream *s, void (*cb)(struct pa_stream *p, const void*data, size_t length, void *userdata), void *userdata) {
600 s->read_callback = cb;
601 s->read_userdata = userdata;
604 int pa_stream_is_dead(struct pa_stream *s) {
605 return s->state == STREAM_DEAD;
608 int pa_stream_is_ready(struct pa_stream*s) {
609 return s->state == STREAM_READY;
612 void pa_stream_set_die_callback(struct pa_stream *s, void (*cb)(struct pa_stream *s, void *userdata), void *userdata) {
614 s->die_callback = cb;
615 s->die_userdata = userdata;
618 int pa_context_is_pending(struct pa_context *c) {
621 if (c->state != CONTEXT_READY)
624 return pa_pstream_is_pending(c->pstream) || pa_pdispatch_is_pending(c->pdispatch);
627 struct pa_context* pa_stream_get_context(struct pa_stream *p) {
632 static void set_dispatch_callbacks(struct pa_context *c);
634 static void pdispatch_drain_callback(struct pa_pdispatch*pd, void *userdata) {
635 set_dispatch_callbacks(userdata);
638 static void pstream_drain_callback(struct pa_pstream *s, void *userdata) {
639 set_dispatch_callbacks(userdata);
642 static void set_dispatch_callbacks(struct pa_context *c) {
643 assert(c && c->state == CONTEXT_READY);
645 pa_pstream_set_drain_callback(c->pstream, NULL, NULL);
646 pa_pdispatch_set_drain_callback(c->pdispatch, NULL, NULL);
648 if (pa_pdispatch_is_pending(c->pdispatch)) {
649 pa_pdispatch_set_drain_callback(c->pdispatch, pdispatch_drain_callback, c);
653 if (pa_pstream_is_pending(c->pstream)) {
654 pa_pstream_set_drain_callback(c->pstream, pstream_drain_callback, c);
658 assert(c->drain_complete_callback);
659 c->drain_complete_callback(c, c->drain_complete_userdata);
662 int pa_context_drain(
663 struct pa_context *c,
664 void (*complete) (struct pa_context*c, void *userdata),
667 assert(c && c->state == CONTEXT_READY);
669 if (complete == NULL) {
670 c->drain_complete_callback = NULL;
671 pa_pstream_set_drain_callback(c->pstream, NULL, NULL);
672 pa_pdispatch_set_drain_callback(c->pdispatch, NULL, NULL);
676 if (!pa_context_is_pending(c))
679 c->drain_complete_callback = complete;
680 c->drain_complete_userdata = userdata;
682 set_dispatch_callbacks(c);