4 This file is part of polypaudio.
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.
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.
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
30 #include <sys/types.h>
31 #include <sys/socket.h>
38 #include "polyplib-internal.h"
39 #include "polyplib-context.h"
40 #include "native-common.h"
41 #include "pdispatch.h"
44 #include "socket-client.h"
45 #include "pstream-util.h"
50 #include "client-conf.h"
52 #define DEFAULT_SERVER "/tmp/polypaudio/native"
54 static const struct pa_pdispatch_command command_table
[PA_COMMAND_MAX
] = {
55 [PA_COMMAND_REQUEST
] = { pa_command_request
},
56 [PA_COMMAND_PLAYBACK_STREAM_KILLED
] = { pa_command_stream_killed
},
57 [PA_COMMAND_RECORD_STREAM_KILLED
] = { pa_command_stream_killed
},
58 [PA_COMMAND_SUBSCRIBE_EVENT
] = { pa_command_subscribe_event
},
61 struct pa_context
*pa_context_new(struct pa_mainloop_api
*mainloop
, const char *name
) {
63 assert(mainloop
&& name
);
65 c
= pa_xmalloc(sizeof(struct pa_context
));
67 c
->name
= pa_xstrdup(name
);
68 c
->mainloop
= mainloop
;
72 c
->playback_streams
= pa_dynarray_new();
73 c
->record_streams
= pa_dynarray_new();
74 assert(c
->playback_streams
&& c
->record_streams
);
76 PA_LLIST_HEAD_INIT(struct pa_stream
, c
->streams
);
77 PA_LLIST_HEAD_INIT(struct pa_operation
, c
->operations
);
79 c
->error
= PA_ERROR_OK
;
80 c
->state
= PA_CONTEXT_UNCONNECTED
;
83 c
->state_callback
= NULL
;
84 c
->state_userdata
= NULL
;
86 c
->subscribe_callback
= NULL
;
87 c
->subscribe_userdata
= NULL
;
89 c
->memblock_stat
= pa_memblock_stat_new();
92 pa_check_signal_is_blocked(SIGPIPE
);
94 c
->conf
= pa_client_conf_new();
95 pa_client_conf_load(c
->conf
, NULL
);
96 pa_client_conf_env(c
->conf
);
101 static void context_free(struct pa_context
*c
) {
104 while (c
->operations
)
105 pa_operation_cancel(c
->operations
);
108 pa_stream_set_state(c
->streams
, PA_STREAM_TERMINATED
);
111 pa_socket_client_unref(c
->client
);
113 pa_pdispatch_unref(c
->pdispatch
);
115 pa_pstream_close(c
->pstream
);
116 pa_pstream_unref(c
->pstream
);
119 if (c
->record_streams
)
120 pa_dynarray_free(c
->record_streams
, NULL
, NULL
);
121 if (c
->playback_streams
)
122 pa_dynarray_free(c
->playback_streams
, NULL
, NULL
);
124 pa_memblock_stat_unref(c
->memblock_stat
);
127 pa_client_conf_free(c
->conf
);
133 struct pa_context
* pa_context_ref(struct pa_context
*c
) {
134 assert(c
&& c
->ref
>= 1);
139 void pa_context_unref(struct pa_context
*c
) {
140 assert(c
&& c
->ref
>= 1);
142 if ((--(c
->ref
)) == 0)
146 void pa_context_set_state(struct pa_context
*c
, enum pa_context_state st
) {
154 if (st
== PA_CONTEXT_FAILED
|| st
== PA_CONTEXT_TERMINATED
) {
157 s
= c
->streams
? pa_stream_ref(c
->streams
) : NULL
;
159 struct pa_stream
*n
= s
->next
? pa_stream_ref(s
->next
) : NULL
;
160 pa_stream_set_state(s
, st
== PA_CONTEXT_FAILED
? PA_STREAM_FAILED
: PA_STREAM_TERMINATED
);
166 pa_pdispatch_unref(c
->pdispatch
);
170 pa_pstream_close(c
->pstream
);
171 pa_pstream_unref(c
->pstream
);
176 pa_socket_client_unref(c
->client
);
181 if (c
->state_callback
)
182 c
->state_callback(c
, c
->state_userdata
);
187 void pa_context_fail(struct pa_context
*c
, int error
) {
190 pa_context_set_state(c
, PA_CONTEXT_FAILED
);
193 static void pstream_die_callback(struct pa_pstream
*p
, void *userdata
) {
194 struct pa_context
*c
= userdata
;
196 pa_context_fail(c
, PA_ERROR_CONNECTIONTERMINATED
);
199 static void pstream_packet_callback(struct pa_pstream
*p
, struct pa_packet
*packet
, void *userdata
) {
200 struct pa_context
*c
= userdata
;
201 assert(p
&& packet
&& c
);
205 if (pa_pdispatch_run(c
->pdispatch
, packet
, c
) < 0) {
206 pa_log(__FILE__
": invalid packet.\n");
207 pa_context_fail(c
, PA_ERROR_PROTOCOL
);
213 static void pstream_memblock_callback(struct pa_pstream
*p
, uint32_t channel
, uint32_t delta
, const struct pa_memchunk
*chunk
, void *userdata
) {
214 struct pa_context
*c
= userdata
;
216 assert(p
&& chunk
&& c
&& chunk
->memblock
&& chunk
->memblock
->data
);
220 if ((s
= pa_dynarray_get(c
->record_streams
, channel
))) {
221 if (s
->read_callback
) {
222 s
->read_callback(s
, (uint8_t*) chunk
->memblock
->data
+ chunk
->index
, chunk
->length
, s
->read_userdata
);
223 s
->counter
+= chunk
->length
;
230 int pa_context_handle_error(struct pa_context
*c
, uint32_t command
, struct pa_tagstruct
*t
) {
233 if (command
== PA_COMMAND_ERROR
) {
234 if (pa_tagstruct_getu32(t
, &c
->error
) < 0) {
235 pa_context_fail(c
, PA_ERROR_PROTOCOL
);
239 } else if (command
== PA_COMMAND_TIMEOUT
)
240 c
->error
= PA_ERROR_TIMEOUT
;
242 pa_context_fail(c
, PA_ERROR_PROTOCOL
);
249 static void setup_complete_callback(struct pa_pdispatch
*pd
, uint32_t command
, uint32_t tag
, struct pa_tagstruct
*t
, void *userdata
) {
250 struct pa_context
*c
= userdata
;
251 assert(pd
&& c
&& (c
->state
== PA_CONTEXT_AUTHORIZING
|| c
->state
== PA_CONTEXT_SETTING_NAME
));
255 if (command
!= PA_COMMAND_REPLY
) {
257 if (pa_context_handle_error(c
, command
, t
) < 0)
258 pa_context_fail(c
, PA_ERROR_PROTOCOL
);
260 pa_context_fail(c
, c
->error
);
265 case PA_CONTEXT_AUTHORIZING
: {
266 struct pa_tagstruct
*t
;
267 t
= pa_tagstruct_new(NULL
, 0);
269 pa_tagstruct_putu32(t
, PA_COMMAND_SET_CLIENT_NAME
);
270 pa_tagstruct_putu32(t
, tag
= c
->ctag
++);
271 pa_tagstruct_puts(t
, c
->name
);
272 pa_pstream_send_tagstruct(c
->pstream
, t
);
273 pa_pdispatch_register_reply(c
->pdispatch
, tag
, DEFAULT_TIMEOUT
, setup_complete_callback
, c
);
275 pa_context_set_state(c
, PA_CONTEXT_SETTING_NAME
);
279 case PA_CONTEXT_SETTING_NAME
:
280 pa_context_set_state(c
, PA_CONTEXT_READY
);
291 static void setup_context(struct pa_context
*c
, struct pa_iochannel
*io
) {
292 struct pa_tagstruct
*t
;
299 c
->pstream
= pa_pstream_new(c
->mainloop
, io
, c
->memblock_stat
);
302 pa_pstream_set_die_callback(c
->pstream
, pstream_die_callback
, c
);
303 pa_pstream_set_recieve_packet_callback(c
->pstream
, pstream_packet_callback
, c
);
304 pa_pstream_set_recieve_memblock_callback(c
->pstream
, pstream_memblock_callback
, c
);
306 assert(!c
->pdispatch
);
307 c
->pdispatch
= pa_pdispatch_new(c
->mainloop
, command_table
, PA_COMMAND_MAX
);
308 assert(c
->pdispatch
);
310 if (pa_authkey_load_from_home(PA_NATIVE_COOKIE_FILE
, c
->auth_cookie
, sizeof(c
->auth_cookie
)) < 0) {
311 pa_context_fail(c
, PA_ERROR_AUTHKEY
);
315 t
= pa_tagstruct_new(NULL
, 0);
317 pa_tagstruct_putu32(t
, PA_COMMAND_AUTH
);
318 pa_tagstruct_putu32(t
, tag
= c
->ctag
++);
319 pa_tagstruct_put_arbitrary(t
, c
->auth_cookie
, sizeof(c
->auth_cookie
));
320 pa_pstream_send_tagstruct(c
->pstream
, t
);
321 pa_pdispatch_register_reply(c
->pdispatch
, tag
, DEFAULT_TIMEOUT
, setup_complete_callback
, c
);
323 pa_context_set_state(c
, PA_CONTEXT_AUTHORIZING
);
330 static void on_connection(struct pa_socket_client
*client
, struct pa_iochannel
*io
, void *userdata
) {
331 struct pa_context
*c
= userdata
;
332 assert(client
&& c
&& c
->state
== PA_CONTEXT_CONNECTING
);
336 pa_socket_client_unref(client
);
340 pa_context_fail(c
, PA_ERROR_CONNECTIONREFUSED
);
344 setup_context(c
, io
);
350 static struct sockaddr
*resolve_server(const char *server
, size_t *len
) {
352 struct addrinfo hints
, *result
= NULL
;
353 char *port
, host
[256];
354 assert(server
&& len
);
356 snprintf(host
, sizeof(host
), "%s", server
);
357 host
[strcspn(host
, ":")] = 0;
359 if ((port
= strrchr(server
, ':')))
365 memset(&hints
, 0, sizeof(hints
));
366 hints
.ai_family
= PF_UNSPEC
;
367 hints
.ai_socktype
= SOCK_STREAM
;
368 hints
.ai_protocol
= 0;
370 if (getaddrinfo(host
, port
, &hints
, &result
) != 0)
374 sa
= pa_xmalloc(*len
= result
->ai_addrlen
);
375 memcpy(sa
, result
->ai_addr
, *len
);
377 freeaddrinfo(result
);
382 static int default_server_is_running(void) {
385 if (DEFAULT_SERVER
[0] != '/')
388 if (stat(DEFAULT_SERVER
, &st
) < 0)
393 static int context_connect_spawn(struct pa_context
*c
, const struct pa_spawn_api
*api
) {
396 int fds
[2] = { -1, -1} ;
397 struct pa_iochannel
*io
;
401 if (socketpair(AF_UNIX
, SOCK_STREAM
, 0, fds
) < 0) {
402 pa_log(__FILE__
": socketpair() failed: %s\n", strerror(errno
));
403 pa_context_fail(c
, PA_ERROR_INTERNAL
);
407 if (api
&& api
->prefork
)
410 if ((pid
= fork()) < 0) {
411 pa_log(__FILE__
": fork() failed: %s\n", strerror(errno
));
412 pa_context_fail(c
, PA_ERROR_INTERNAL
);
414 if (api
&& api
->postfork
)
422 const char *state
= NULL
;
424 char *argv
[MAX_ARGS
+1];
429 if (api
&& api
->atfork
)
436 argv
[n
++] = c
->conf
->daemon_binary
;
437 argv
[n
++] = "--daemonize=yes";
439 snprintf(t
, sizeof(t
), "-Lmodule-native-protocol-fd fd=%i", fds
[1]);
440 argv
[n
++] = strdup(t
);
442 while (n
< MAX_ARGS
) {
445 if (!(a
= pa_split_spaces(c
->conf
->extra_arguments
, &state
)))
453 execv(argv
[0], argv
);
459 r
= waitpid(pid
, &status
, 0);
461 if (api
&& api
->postfork
)
465 pa_log(__FILE__
": waitpid() failed: %s\n", strerror(errno
));
466 pa_context_fail(c
, PA_ERROR_INTERNAL
);
468 } else if (!WIFEXITED(status
) || WEXITSTATUS(status
) != 0) {
469 pa_context_fail(c
, PA_ERROR_CONNECTIONREFUSED
);
477 io
= pa_iochannel_new(c
->mainloop
, fds
[0], fds
[0]);
478 setup_context(c
, io
);
495 int pa_context_connect(struct pa_context
*c
, const char *server
, int spawn
, const struct pa_spawn_api
*api
) {
497 assert(c
&& c
->ref
>= 1 && c
->state
== PA_CONTEXT_UNCONNECTED
);
500 server
= c
->conf
->default_server
;
502 if (!server
&& spawn
&& c
->conf
->autospawn
&& !default_server_is_running())
503 return context_connect_spawn(c
, api
);
506 server
= DEFAULT_SERVER
;
512 if (*server
== '/') {
513 if (!(c
->client
= pa_socket_client_new_unix(c
->mainloop
, server
))) {
514 pa_context_fail(c
, PA_ERROR_CONNECTIONREFUSED
);
523 if (!(sa
= resolve_server(server
, &sa_len
))) {
524 pa_context_fail(c
, PA_ERROR_INVALIDSERVER
);
528 c
->client
= pa_socket_client_new_sockaddr(c
->mainloop
, sa
, sa_len
);
532 pa_context_fail(c
, PA_ERROR_CONNECTIONREFUSED
);
539 pa_socket_client_set_callback(c
->client
, on_connection
, c
);
540 pa_context_set_state(c
, PA_CONTEXT_CONNECTING
);
550 void pa_context_disconnect(struct pa_context
*c
) {
552 pa_context_set_state(c
, PA_CONTEXT_TERMINATED
);
555 enum pa_context_state
pa_context_get_state(struct pa_context
*c
) {
556 assert(c
&& c
->ref
>= 1);
560 int pa_context_errno(struct pa_context
*c
) {
561 assert(c
&& c
->ref
>= 1);
565 void pa_context_set_state_callback(struct pa_context
*c
, void (*cb
)(struct pa_context
*c
, void *userdata
), void *userdata
) {
566 assert(c
&& c
->ref
>= 1);
567 c
->state_callback
= cb
;
568 c
->state_userdata
= userdata
;
571 int pa_context_is_pending(struct pa_context
*c
) {
572 assert(c
&& c
->ref
>= 1);
574 /* pa_log("pstream: %i\n", pa_pstream_is_pending(c->pstream)); */
575 /* pa_log("pdispatch: %i\n", pa_pdispatch_is_pending(c->pdispatch)); */
577 return (c
->pstream
&& pa_pstream_is_pending(c
->pstream
)) || (c
->pdispatch
&& pa_pdispatch_is_pending(c
->pdispatch
)) || c
->client
;
580 static void set_dispatch_callbacks(struct pa_operation
*o
);
582 static void pdispatch_drain_callback(struct pa_pdispatch
*pd
, void *userdata
) {
583 set_dispatch_callbacks(userdata
);
586 static void pstream_drain_callback(struct pa_pstream
*s
, void *userdata
) {
587 set_dispatch_callbacks(userdata
);
590 static void set_dispatch_callbacks(struct pa_operation
*o
) {
592 assert(o
&& o
->context
&& o
->context
->ref
>= 1 && o
->ref
>= 1 && o
->context
->state
== PA_CONTEXT_READY
);
594 pa_pstream_set_drain_callback(o
->context
->pstream
, NULL
, NULL
);
595 pa_pdispatch_set_drain_callback(o
->context
->pdispatch
, NULL
, NULL
);
597 if (pa_pdispatch_is_pending(o
->context
->pdispatch
)) {
598 pa_pdispatch_set_drain_callback(o
->context
->pdispatch
, pdispatch_drain_callback
, o
);
602 if (pa_pstream_is_pending(o
->context
->pstream
)) {
603 pa_pstream_set_drain_callback(o
->context
->pstream
, pstream_drain_callback
, o
);
611 void (*cb
)(struct pa_context
*c
, void *userdata
);
612 cb
= (void (*)(struct pa_context
*, void*)) o
->callback
;
613 cb(o
->context
, o
->userdata
);
616 pa_operation_done(o
);
619 pa_operation_unref(o
);
622 struct pa_operation
* pa_context_drain(struct pa_context
*c
, void (*cb
) (struct pa_context
*c
, void *userdata
), void *userdata
) {
623 struct pa_operation
*o
;
624 assert(c
&& c
->ref
>= 1);
626 if (c
->state
!= PA_CONTEXT_READY
)
629 if (!pa_context_is_pending(c
))
632 o
= pa_operation_new(c
, NULL
);
635 o
->userdata
= userdata
;
637 set_dispatch_callbacks(pa_operation_ref(o
));
642 void pa_context_exit_daemon(struct pa_context
*c
) {
643 struct pa_tagstruct
*t
;
644 assert(c
&& c
->ref
>= 1);
646 t
= pa_tagstruct_new(NULL
, 0);
648 pa_tagstruct_putu32(t
, PA_COMMAND_EXIT
);
649 pa_tagstruct_putu32(t
, c
->ctag
++);
650 pa_pstream_send_tagstruct(c
->pstream
, t
);
653 void pa_context_simple_ack_callback(struct pa_pdispatch
*pd
, uint32_t command
, uint32_t tag
, struct pa_tagstruct
*t
, void *userdata
) {
654 struct pa_operation
*o
= userdata
;
656 assert(pd
&& o
&& o
->context
&& o
->ref
>= 1);
658 if (command
!= PA_COMMAND_REPLY
) {
659 if (pa_context_handle_error(o
->context
, command
, t
) < 0)
663 } else if (!pa_tagstruct_eof(t
)) {
664 pa_context_fail(o
->context
, PA_ERROR_PROTOCOL
);
669 void (*cb
)(struct pa_context
*c
, int success
, void *userdata
) = o
->callback
;
670 cb(o
->context
, success
, o
->userdata
);
674 pa_operation_done(o
);
675 pa_operation_unref(o
);
678 struct pa_operation
* pa_context_send_simple_command(struct pa_context
*c
, uint32_t command
, void (*internal_callback
)(struct pa_pdispatch
*pd
, uint32_t command
, uint32_t tag
, struct pa_tagstruct
*t
, void *userdata
), void (*cb
)(), void *userdata
) {
679 struct pa_tagstruct
*t
;
680 struct pa_operation
*o
;
684 o
= pa_operation_new(c
, NULL
);
686 o
->userdata
= userdata
;
688 t
= pa_tagstruct_new(NULL
, 0);
689 pa_tagstruct_putu32(t
, command
);
690 pa_tagstruct_putu32(t
, tag
= c
->ctag
++);
691 pa_pstream_send_tagstruct(c
->pstream
, t
);
692 pa_pdispatch_register_reply(c
->pdispatch
, tag
, DEFAULT_TIMEOUT
, internal_callback
, o
);
694 return pa_operation_ref(o
);
697 const char* pa_get_library_version(void) {
698 return PACKAGE_VERSION
;
701 struct pa_operation
* pa_context_set_default_sink(struct pa_context
*c
, const char *name
, void(*cb
)(struct pa_context
*c
, int success
, void *userdata
), void *userdata
) {
702 struct pa_tagstruct
*t
;
703 struct pa_operation
*o
;
707 o
= pa_operation_new(c
, NULL
);
709 o
->userdata
= userdata
;
711 t
= pa_tagstruct_new(NULL
, 0);
712 pa_tagstruct_putu32(t
, PA_COMMAND_SET_DEFAULT_SINK
);
713 pa_tagstruct_putu32(t
, tag
= c
->ctag
++);
714 pa_tagstruct_puts(t
, name
);
715 pa_pstream_send_tagstruct(c
->pstream
, t
);
716 pa_pdispatch_register_reply(c
->pdispatch
, tag
, DEFAULT_TIMEOUT
, pa_context_simple_ack_callback
, o
);
718 return pa_operation_ref(o
);
721 struct pa_operation
* pa_context_set_default_source(struct pa_context
*c
, const char *name
, void(*cb
)(struct pa_context
*c
, int success
, void *userdata
), void *userdata
) {
722 struct pa_tagstruct
*t
;
723 struct pa_operation
*o
;
727 o
= pa_operation_new(c
, NULL
);
729 o
->userdata
= userdata
;
731 t
= pa_tagstruct_new(NULL
, 0);
732 pa_tagstruct_putu32(t
, PA_COMMAND_SET_DEFAULT_SOURCE
);
733 pa_tagstruct_putu32(t
, tag
= c
->ctag
++);
734 pa_tagstruct_puts(t
, name
);
735 pa_pstream_send_tagstruct(c
->pstream
, t
);
736 pa_pdispatch_register_reply(c
->pdispatch
, tag
, DEFAULT_TIMEOUT
, pa_context_simple_ack_callback
, o
);
738 return pa_operation_ref(o
);
741 int pa_context_is_local(struct pa_context
*c
) {
746 struct pa_operation
* pa_context_set_name(struct pa_context
*c
, const char *name
, void(*cb
)(struct pa_context
*c
, int success
, void *userdata
), void *userdata
) {
747 struct pa_tagstruct
*t
;
748 struct pa_operation
*o
;
750 assert(c
&& name
&& cb
);
752 o
= pa_operation_new(c
, NULL
);
754 o
->userdata
= userdata
;
756 t
= pa_tagstruct_new(NULL
, 0);
757 pa_tagstruct_putu32(t
, PA_COMMAND_SET_CLIENT_NAME
);
758 pa_tagstruct_putu32(t
, tag
= c
->ctag
++);
759 pa_tagstruct_puts(t
, name
);
760 pa_pstream_send_tagstruct(c
->pstream
, t
);
761 pa_pdispatch_register_reply(c
->pdispatch
, tag
, DEFAULT_TIMEOUT
, pa_context_simple_ack_callback
, o
);
763 return pa_operation_ref(o
);