3 This file is part of PulseAudio.
5 Copyright 2006 Lennart Poettering
7 PulseAudio is free software; you can redistribute it and/or modify
8 it under the terms of the GNU Lesser General Public License as published
9 by the Free Software Foundation; either version 2 of the License,
10 or (at your option) any later version.
12 PulseAudio is distributed in the hope that it will be useful, but
13 WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 General Public License for more details.
17 You should have received a copy of the GNU Lesser General Public License
18 along with PulseAudio; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
28 #include <sys/socket.h>
29 #include <netinet/in.h>
30 #include <arpa/inet.h>
35 #include <pulse/timeval.h>
36 #include <pulse/xmalloc.h>
38 #include <pulsecore/core-error.h>
39 #include <pulsecore/module.h>
40 #include <pulsecore/llist.h>
41 #include <pulsecore/sink.h>
42 #include <pulsecore/sink-input.h>
43 #include <pulsecore/memblockq.h>
44 #include <pulsecore/log.h>
45 #include <pulsecore/core-util.h>
46 #include <pulsecore/modargs.h>
47 #include <pulsecore/namereg.h>
48 #include <pulsecore/sample-util.h>
49 #include <pulsecore/macro.h>
50 #include <pulsecore/atomic.h>
51 #include <pulsecore/rtclock.h>
52 #include <pulsecore/atomic.h>
54 #include "module-rtp-recv-symdef.h"
60 PA_MODULE_AUTHOR("Lennart Poettering")
61 PA_MODULE_DESCRIPTION("Recieve data from a network via RTP/SAP/SDP")
62 PA_MODULE_VERSION(PACKAGE_VERSION
)
64 "sink=<name of the sink> "
65 "sap_address=<multicast address to listen on> "
69 #define DEFAULT_SAP_ADDRESS "224.0.0.56"
70 #define MEMBLOCKQ_MAXLENGTH (1024*170)
71 #define MAX_SESSIONS 16
72 #define DEATH_TIMEOUT 20
74 static const char* const valid_modargs
[] = {
81 struct userdata
*userdata
;
82 PA_LLIST_FIELDS(struct session
);
84 pa_sink_input
*sink_input
;
85 pa_memblockq
*memblockq
;
87 pa_bool_t first_packet
;
91 struct pa_sdp_info sdp_info
;
93 pa_rtp_context rtp_context
;
95 pa_rtpoll_item
*rtpoll_item
;
97 pa_atomic_t timestamp
;
103 pa_sap_context sap_context
;
104 pa_io_event
* sap_event
;
106 pa_time_event
*check_death_event
;
110 PA_LLIST_HEAD(struct session
, sessions
);
111 pa_hashmap
*by_origin
;
115 static void session_free(struct session
*s
);
117 /* Called from I/O thread context */
118 static int sink_input_process_msg(pa_msgobject
*o
, int code
, void *data
, int64_t offset
, pa_memchunk
*chunk
) {
119 struct session
*s
= PA_SINK_INPUT(o
)->userdata
;
122 case PA_SINK_INPUT_MESSAGE_GET_LATENCY
:
123 *((pa_usec_t
*) data
) = pa_bytes_to_usec(pa_memblockq_get_length(s
->memblockq
), &s
->sink_input
->sample_spec
);
125 /* Fall through, the default handler will add in the extra
126 * latency added by the resampler */
130 return pa_sink_input_process_msg(o
, code
, data
, offset
, chunk
);
133 /* Called from I/O thread context */
134 static int sink_input_peek(pa_sink_input
*i
, size_t length
, pa_memchunk
*chunk
) {
136 pa_sink_input_assert_ref(i
);
137 pa_assert_se(s
= i
->userdata
);
139 return pa_memblockq_peek(s
->memblockq
, chunk
);
142 /* Called from I/O thread context */
143 static void sink_input_drop(pa_sink_input
*i
, size_t length
) {
145 pa_sink_input_assert_ref(i
);
146 pa_assert_se(s
= i
->userdata
);
148 pa_memblockq_drop(s
->memblockq
, length
);
151 /* Called from main context */
152 static void sink_input_kill(pa_sink_input
* i
) {
154 pa_sink_input_assert_ref(i
);
155 pa_assert_se(s
= i
->userdata
);
160 /* Called from I/O thread context */
161 static int rtpoll_work_cb(pa_rtpoll_item
*i
) {
168 pa_assert_se(s
= pa_rtpoll_item_get_userdata(i
));
170 p
= pa_rtpoll_item_get_pollfd(i
, NULL
);
172 if (p
->revents
& (POLLERR
|POLLNVAL
|POLLHUP
|POLLOUT
)) {
173 pa_log("poll() signalled bad revents.");
177 if ((p
->revents
& POLLIN
) == 0)
182 if (pa_rtp_recv(&s
->rtp_context
, &chunk
, s
->userdata
->module
->core
->mempool
) < 0)
185 if (s
->sdp_info
.payload
!= s
->rtp_context
.payload
) {
186 pa_memblock_unref(chunk
.memblock
);
190 if (!s
->first_packet
) {
191 s
->first_packet
= TRUE
;
193 s
->ssrc
= s
->rtp_context
.ssrc
;
194 s
->offset
= s
->rtp_context
.timestamp
;
196 if (s
->ssrc
== s
->userdata
->module
->core
->cookie
)
197 pa_log_warn("Detected RTP packet loop!");
199 if (s
->ssrc
!= s
->rtp_context
.ssrc
) {
200 pa_memblock_unref(chunk
.memblock
);
205 /* Check wheter there was a timestamp overflow */
206 k
= (int64_t) s
->rtp_context
.timestamp
- (int64_t) s
->offset
;
207 j
= (int64_t) 0x100000000LL
- (int64_t) s
->offset
+ (int64_t) s
->rtp_context
.timestamp
;
209 if ((k
< 0 ? -k
: k
) < (j
< 0 ? -j
: j
))
214 pa_memblockq_seek(s
->memblockq
, delta
* s
->rtp_context
.frame_size
, PA_SEEK_RELATIVE
);
216 if (pa_memblockq_push(s
->memblockq
, &chunk
) < 0) {
217 /* queue overflow, let's flush it and try again */
218 pa_memblockq_flush(s
->memblockq
);
219 pa_memblockq_push(s
->memblockq
, &chunk
);
222 /* The next timestamp we expect */
223 s
->offset
= s
->rtp_context
.timestamp
+ (chunk
.length
/ s
->rtp_context
.frame_size
);
225 pa_memblock_unref(chunk
.memblock
);
227 pa_rtclock_get(&now
);
228 pa_atomic_store(&s
->timestamp
, now
.tv_sec
);
233 /* Called from I/O thread context */
234 static void sink_input_attach(pa_sink_input
*i
) {
238 pa_sink_input_assert_ref(i
);
239 pa_assert_se(s
= i
->userdata
);
241 pa_assert(!s
->rtpoll_item
);
242 s
->rtpoll_item
= pa_rtpoll_item_new(i
->sink
->rtpoll
, PA_RTPOLL_LATE
, 1);
244 p
= pa_rtpoll_item_get_pollfd(s
->rtpoll_item
, NULL
);
245 p
->fd
= s
->rtp_context
.fd
;
249 pa_rtpoll_item_set_work_callback(s
->rtpoll_item
, rtpoll_work_cb
);
250 pa_rtpoll_item_set_userdata(s
->rtpoll_item
, s
);
253 /* Called from I/O thread context */
254 static void sink_input_detach(pa_sink_input
*i
) {
256 pa_sink_input_assert_ref(i
);
257 pa_assert_se(s
= i
->userdata
);
259 pa_assert(s
->rtpoll_item
);
260 pa_rtpoll_item_free(s
->rtpoll_item
);
261 s
->rtpoll_item
= NULL
;
264 static int mcast_socket(const struct sockaddr
* sa
, socklen_t salen
) {
265 int af
, fd
= -1, r
, one
;
268 pa_assert(salen
> 0);
271 if ((fd
= socket(af
, SOCK_DGRAM
, 0)) < 0) {
272 pa_log("Failed to create socket: %s", pa_cstrerror(errno
));
277 if (setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, &one
, sizeof(one
)) < 0) {
278 pa_log("SO_REUSEADDR failed: %s", pa_cstrerror(errno
));
284 memset(&mr4
, 0, sizeof(mr4
));
285 mr4
.imr_multiaddr
= ((const struct sockaddr_in
*) sa
)->sin_addr
;
286 r
= setsockopt(fd
, IPPROTO_IP
, IP_ADD_MEMBERSHIP
, &mr4
, sizeof(mr4
));
288 struct ipv6_mreq mr6
;
289 memset(&mr6
, 0, sizeof(mr6
));
290 mr6
.ipv6mr_multiaddr
= ((const struct sockaddr_in6
*) sa
)->sin6_addr
;
291 r
= setsockopt(fd
, IPPROTO_IPV6
, IPV6_JOIN_GROUP
, &mr6
, sizeof(mr6
));
295 pa_log_info("Joining mcast group failed: %s", pa_cstrerror(errno
));
299 if (bind(fd
, sa
, salen
) < 0) {
300 pa_log("bind() failed: %s", pa_cstrerror(errno
));
313 static struct session
*session_new(struct userdata
*u
, const pa_sdp_info
*sdp_info
) {
314 struct session
*s
= NULL
;
318 pa_memblock
*silence
;
319 pa_sink_input_new_data data
;
325 if (u
->n_sessions
>= MAX_SESSIONS
) {
326 pa_log("Session limit reached.");
330 if (!(sink
= pa_namereg_get(u
->module
->core
, u
->sink_name
, PA_NAMEREG_SINK
, 1))) {
331 pa_log("Sink does not exist.");
335 s
= pa_xnew0(struct session
, 1);
337 s
->first_packet
= FALSE
;
338 s
->sdp_info
= *sdp_info
;
339 s
->rtpoll_item
= NULL
;
341 pa_rtclock_get(&now
);
342 pa_atomic_store(&s
->timestamp
, now
.tv_sec
);
344 if ((fd
= mcast_socket((const struct sockaddr
*) &sdp_info
->sa
, sdp_info
->salen
)) < 0)
347 c
= pa_sprintf_malloc("RTP Stream%s%s%s",
348 sdp_info
->session_name
? " (" : "",
349 sdp_info
->session_name
? sdp_info
->session_name
: "",
350 sdp_info
->session_name
? ")" : "");
352 pa_sink_input_new_data_init(&data
);
354 data
.driver
= __FILE__
;
356 data
.module
= u
->module
;
357 pa_sink_input_new_data_set_sample_spec(&data
, &sdp_info
->sample_spec
);
359 s
->sink_input
= pa_sink_input_new(u
->module
->core
, &data
, 0);
362 if (!s
->sink_input
) {
363 pa_log("Failed to create sink input.");
367 s
->sink_input
->userdata
= s
;
369 s
->sink_input
->parent
.process_msg
= sink_input_process_msg
;
370 s
->sink_input
->peek
= sink_input_peek
;
371 s
->sink_input
->drop
= sink_input_drop
;
372 s
->sink_input
->kill
= sink_input_kill
;
373 s
->sink_input
->attach
= sink_input_attach
;
374 s
->sink_input
->detach
= sink_input_detach
;
376 silence
= pa_silence_memblock_new(
377 s
->userdata
->module
->core
->mempool
,
378 &s
->sink_input
->sample_spec
,
379 pa_frame_align(pa_bytes_per_second(&s
->sink_input
->sample_spec
)/128, &s
->sink_input
->sample_spec
));
381 s
->memblockq
= pa_memblockq_new(
385 pa_frame_size(&s
->sink_input
->sample_spec
),
386 pa_bytes_per_second(&s
->sink_input
->sample_spec
)/10+1,
390 pa_memblock_unref(silence
);
392 pa_rtp_context_init_recv(&s
->rtp_context
, fd
, pa_frame_size(&s
->sdp_info
.sample_spec
));
394 pa_hashmap_put(s
->userdata
->by_origin
, s
->sdp_info
.origin
, s
);
396 PA_LLIST_PREPEND(struct session
, s
->userdata
->sessions
, s
);
398 pa_sink_input_put(s
->sink_input
);
400 pa_log_info("New session '%s'", s
->sdp_info
.session_name
);
413 static void session_free(struct session
*s
) {
416 pa_log_info("Freeing session '%s'", s
->sdp_info
.session_name
);
418 pa_sink_input_unlink(s
->sink_input
);
419 pa_sink_input_unref(s
->sink_input
);
421 PA_LLIST_REMOVE(struct session
, s
->userdata
->sessions
, s
);
422 pa_assert(s
->userdata
->n_sessions
>= 1);
423 s
->userdata
->n_sessions
--;
424 pa_hashmap_remove(s
->userdata
->by_origin
, s
->sdp_info
.origin
);
426 pa_memblockq_free(s
->memblockq
);
427 pa_sdp_info_destroy(&s
->sdp_info
);
428 pa_rtp_context_destroy(&s
->rtp_context
);
433 static void sap_event_cb(pa_mainloop_api
*m
, pa_io_event
*e
, int fd
, pa_io_event_flags_t flags
, void *userdata
) {
434 struct userdata
*u
= userdata
;
442 pa_assert(fd
== u
->sap_context
.fd
);
443 pa_assert(flags
== PA_IO_EVENT_INPUT
);
445 if (pa_sap_recv(&u
->sap_context
, &goodbye
) < 0)
448 if (!pa_sdp_parse(u
->sap_context
.sdp_data
, &info
, goodbye
))
453 if ((s
= pa_hashmap_get(u
->by_origin
, info
.origin
)))
456 pa_sdp_info_destroy(&info
);
459 if (!(s
= pa_hashmap_get(u
->by_origin
, info
.origin
))) {
460 if (!(s
= session_new(u
, &info
)))
461 pa_sdp_info_destroy(&info
);
465 pa_rtclock_get(&now
);
466 pa_atomic_store(&s
->timestamp
, now
.tv_sec
);
468 pa_sdp_info_destroy(&info
);
473 static void check_death_event_cb(pa_mainloop_api
*m
, pa_time_event
*t
, const struct timeval
*ptv
, void *userdata
) {
474 struct session
*s
, *n
;
475 struct userdata
*u
= userdata
;
484 pa_rtclock_get(&now
);
486 pa_log_debug("Checking for dead streams ...");
488 for (s
= u
->sessions
; s
; s
= n
) {
492 k
= pa_atomic_load(&s
->timestamp
);
494 if (k
+ DEATH_TIMEOUT
< now
.tv_sec
)
499 pa_gettimeofday(&tv
);
500 pa_timeval_add(&tv
, DEATH_TIMEOUT
*PA_USEC_PER_SEC
);
501 m
->time_restart(t
, &tv
);
504 int pa__init(pa_module
*m
) {
506 pa_modargs
*ma
= NULL
;
507 struct sockaddr_in sa4
;
508 struct sockaddr_in6 sa6
;
511 const char *sap_address
;
517 if (!(ma
= pa_modargs_new(m
->argument
, valid_modargs
))) {
518 pa_log("failed to parse module arguments");
522 sap_address
= pa_modargs_get_value(ma
, "sap_address", DEFAULT_SAP_ADDRESS
);
524 if (inet_pton(AF_INET6
, sap_address
, &sa6
.sin6_addr
) > 0) {
525 sa6
.sin6_family
= AF_INET6
;
526 sa6
.sin6_port
= htons(SAP_PORT
);
527 sa
= (struct sockaddr
*) &sa6
;
529 } else if (inet_pton(AF_INET
, sap_address
, &sa4
.sin_addr
) > 0) {
530 sa4
.sin_family
= AF_INET
;
531 sa4
.sin_port
= htons(SAP_PORT
);
532 sa
= (struct sockaddr
*) &sa4
;
535 pa_log("Invalid SAP address '%s'", sap_address
);
539 if ((fd
= mcast_socket(sa
, salen
)) < 0)
542 u
= pa_xnew(struct userdata
, 1);
545 u
->sink_name
= pa_xstrdup(pa_modargs_get_value(ma
, "sink", NULL
));
547 u
->sap_event
= m
->core
->mainloop
->io_new(m
->core
->mainloop
, fd
, PA_IO_EVENT_INPUT
, sap_event_cb
, u
);
548 pa_sap_context_init_recv(&u
->sap_context
, fd
);
550 PA_LLIST_HEAD_INIT(struct session
, u
->sessions
);
552 u
->by_origin
= pa_hashmap_new(pa_idxset_string_hash_func
, pa_idxset_string_compare_func
);
554 pa_gettimeofday(&tv
);
555 pa_timeval_add(&tv
, DEATH_TIMEOUT
* PA_USEC_PER_SEC
);
556 u
->check_death_event
= m
->core
->mainloop
->time_new(m
->core
->mainloop
, &tv
, check_death_event_cb
, u
);
572 void pa__done(pa_module
*m
) {
578 if (!(u
= m
->userdata
))
582 m
->core
->mainloop
->io_free(u
->sap_event
);
584 if (u
->check_death_event
)
585 m
->core
->mainloop
->time_free(u
->check_death_event
);
587 pa_sap_context_destroy(&u
->sap_context
);
590 while ((s
= pa_hashmap_get_first(u
->by_origin
)))
593 pa_hashmap_free(u
->by_origin
, NULL
, NULL
);
596 pa_xfree(u
->sink_name
);