Fixed broken video with direct3d for some drivers.
[vlc/solaris.git] / modules / stream_out / rtp.c
blobd2e32fd1ce7822299df6d855b79390e5e79d194a
1 /*****************************************************************************
2 * rtp.c: rtp stream output module
3 *****************************************************************************
4 * Copyright (C) 2003-2004 the VideoLAN team
5 * Copyright © 2007-2008 Rémi Denis-Courmont
7 * Authors: Laurent Aimar <fenrir@via.ecp.fr>
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22 *****************************************************************************/
24 /*****************************************************************************
25 * Preamble
26 *****************************************************************************/
28 #ifdef HAVE_CONFIG_H
29 # include "config.h"
30 #endif
32 #include <vlc_common.h>
33 #include <vlc_plugin.h>
34 #include <vlc_sout.h>
35 #include <vlc_block.h>
37 #include <vlc_httpd.h>
38 #include <vlc_url.h>
39 #include <vlc_network.h>
40 #include <vlc_fs.h>
41 #include <vlc_strings.h>
42 #include <vlc_rand.h>
43 #ifdef HAVE_SRTP
44 # include <srtp.h>
45 #endif
47 #include "rtp.h"
49 #ifdef HAVE_UNISTD_H
50 # include <sys/types.h>
51 # include <unistd.h>
52 #endif
53 #ifdef HAVE_ARPA_INET_H
54 # include <arpa/inet.h>
55 #endif
56 #ifdef HAVE_LINUX_DCCP_H
57 # include <linux/dccp.h>
58 #endif
59 #ifndef IPPROTO_DCCP
60 # define IPPROTO_DCCP 33
61 #endif
62 #ifndef IPPROTO_UDPLITE
63 # define IPPROTO_UDPLITE 136
64 #endif
66 #include <errno.h>
68 #include <assert.h>
70 /*****************************************************************************
71 * Module descriptor
72 *****************************************************************************/
74 #define DEST_TEXT N_("Destination")
75 #define DEST_LONGTEXT N_( \
76 "This is the output URL that will be used." )
77 #define SDP_TEXT N_("SDP")
78 #define SDP_LONGTEXT N_( \
79 "This allows you to specify how the SDP (Session Descriptor) for this RTP "\
80 "session will be made available. You must use an url: http://location to " \
81 "access the SDP via HTTP, rtsp://location for RTSP access, and sap:// " \
82 "for the SDP to be announced via SAP." )
83 #define SAP_TEXT N_("SAP announcing")
84 #define SAP_LONGTEXT N_("Announce this session with SAP.")
85 #define MUX_TEXT N_("Muxer")
86 #define MUX_LONGTEXT N_( \
87 "This allows you to specify the muxer used for the streaming output. " \
88 "Default is to use no muxer (standard RTP stream)." )
90 #define NAME_TEXT N_("Session name")
91 #define NAME_LONGTEXT N_( \
92 "This is the name of the session that will be announced in the SDP " \
93 "(Session Descriptor)." )
94 #define DESC_TEXT N_("Session description")
95 #define DESC_LONGTEXT N_( \
96 "This allows you to give a short description with details about the stream, " \
97 "that will be announced in the SDP (Session Descriptor)." )
98 #define URL_TEXT N_("Session URL")
99 #define URL_LONGTEXT N_( \
100 "This allows you to give an URL with more details about the stream " \
101 "(often the website of the streaming organization), that will " \
102 "be announced in the SDP (Session Descriptor)." )
103 #define EMAIL_TEXT N_("Session email")
104 #define EMAIL_LONGTEXT N_( \
105 "This allows you to give a contact mail address for the stream, that will " \
106 "be announced in the SDP (Session Descriptor)." )
107 #define PHONE_TEXT N_("Session phone number")
108 #define PHONE_LONGTEXT N_( \
109 "This allows you to give a contact telephone number for the stream, that will " \
110 "be announced in the SDP (Session Descriptor)." )
112 #define PORT_TEXT N_("Port")
113 #define PORT_LONGTEXT N_( \
114 "This allows you to specify the base port for the RTP streaming." )
115 #define PORT_AUDIO_TEXT N_("Audio port")
116 #define PORT_AUDIO_LONGTEXT N_( \
117 "This allows you to specify the default audio port for the RTP streaming." )
118 #define PORT_VIDEO_TEXT N_("Video port")
119 #define PORT_VIDEO_LONGTEXT N_( \
120 "This allows you to specify the default video port for the RTP streaming." )
122 #define TTL_TEXT N_("Hop limit (TTL)")
123 #define TTL_LONGTEXT N_( \
124 "This is the hop limit (also known as \"Time-To-Live\" or TTL) of " \
125 "the multicast packets sent by the stream output (-1 = use operating " \
126 "system built-in default).")
128 #define RTCP_MUX_TEXT N_("RTP/RTCP multiplexing")
129 #define RTCP_MUX_LONGTEXT N_( \
130 "This sends and receives RTCP packet multiplexed over the same port " \
131 "as RTP packets." )
133 #define CACHING_TEXT N_("Caching value (ms)")
134 #define CACHING_LONGTEXT N_( \
135 "Default caching value for outbound RTP streams. This " \
136 "value should be set in milliseconds." )
138 #define PROTO_TEXT N_("Transport protocol")
139 #define PROTO_LONGTEXT N_( \
140 "This selects which transport protocol to use for RTP." )
142 #define SRTP_KEY_TEXT N_("SRTP key (hexadecimal)")
143 #define SRTP_KEY_LONGTEXT N_( \
144 "RTP packets will be integrity-protected and ciphered "\
145 "with this Secure RTP master shared secret key.")
147 #define SRTP_SALT_TEXT N_("SRTP salt (hexadecimal)")
148 #define SRTP_SALT_LONGTEXT N_( \
149 "Secure RTP requires a (non-secret) master salt value.")
151 static const char *const ppsz_protos[] = {
152 "dccp", "sctp", "tcp", "udp", "udplite",
155 static const char *const ppsz_protocols[] = {
156 "DCCP", "SCTP", "TCP", "UDP", "UDP-Lite",
159 #define RFC3016_TEXT N_("MP4A LATM")
160 #define RFC3016_LONGTEXT N_( \
161 "This allows you to stream MPEG4 LATM audio streams (see RFC3016)." )
163 static int Open ( vlc_object_t * );
164 static void Close( vlc_object_t * );
166 #define SOUT_CFG_PREFIX "sout-rtp-"
167 #define MAX_EMPTY_BLOCKS 200
169 vlc_module_begin ()
170 set_shortname( N_("RTP"))
171 set_description( N_("RTP stream output") )
172 set_capability( "sout stream", 0 )
173 add_shortcut( "rtp" )
174 set_category( CAT_SOUT )
175 set_subcategory( SUBCAT_SOUT_STREAM )
177 add_string( SOUT_CFG_PREFIX "dst", "", NULL, DEST_TEXT,
178 DEST_LONGTEXT, true )
179 add_string( SOUT_CFG_PREFIX "sdp", "", NULL, SDP_TEXT,
180 SDP_LONGTEXT, true )
181 add_string( SOUT_CFG_PREFIX "mux", "", NULL, MUX_TEXT,
182 MUX_LONGTEXT, true )
183 add_bool( SOUT_CFG_PREFIX "sap", false, NULL, SAP_TEXT, SAP_LONGTEXT,
184 true )
186 add_string( SOUT_CFG_PREFIX "name", "", NULL, NAME_TEXT,
187 NAME_LONGTEXT, true )
188 add_string( SOUT_CFG_PREFIX "description", "", NULL, DESC_TEXT,
189 DESC_LONGTEXT, true )
190 add_string( SOUT_CFG_PREFIX "url", "", NULL, URL_TEXT,
191 URL_LONGTEXT, true )
192 add_string( SOUT_CFG_PREFIX "email", "", NULL, EMAIL_TEXT,
193 EMAIL_LONGTEXT, true )
194 add_string( SOUT_CFG_PREFIX "phone", "", NULL, PHONE_TEXT,
195 PHONE_LONGTEXT, true )
197 add_string( SOUT_CFG_PREFIX "proto", "udp", NULL, PROTO_TEXT,
198 PROTO_LONGTEXT, false )
199 change_string_list( ppsz_protos, ppsz_protocols, NULL )
200 add_integer( SOUT_CFG_PREFIX "port", 5004, NULL, PORT_TEXT,
201 PORT_LONGTEXT, true )
202 add_integer( SOUT_CFG_PREFIX "port-audio", 0, NULL, PORT_AUDIO_TEXT,
203 PORT_AUDIO_LONGTEXT, true )
204 add_integer( SOUT_CFG_PREFIX "port-video", 0, NULL, PORT_VIDEO_TEXT,
205 PORT_VIDEO_LONGTEXT, true )
207 add_integer( SOUT_CFG_PREFIX "ttl", -1, NULL, TTL_TEXT,
208 TTL_LONGTEXT, true )
209 add_bool( SOUT_CFG_PREFIX "rtcp-mux", false, NULL,
210 RTCP_MUX_TEXT, RTCP_MUX_LONGTEXT, false )
211 add_integer( SOUT_CFG_PREFIX "caching", DEFAULT_PTS_DELAY / 1000, NULL,
212 CACHING_TEXT, CACHING_LONGTEXT, true )
214 #ifdef HAVE_SRTP
215 add_string( SOUT_CFG_PREFIX "key", "", NULL,
216 SRTP_KEY_TEXT, SRTP_KEY_LONGTEXT, false )
217 add_string( SOUT_CFG_PREFIX "salt", "", NULL,
218 SRTP_SALT_TEXT, SRTP_SALT_LONGTEXT, false )
219 #endif
221 add_bool( SOUT_CFG_PREFIX "mp4a-latm", false, NULL, RFC3016_TEXT,
222 RFC3016_LONGTEXT, false )
224 set_callbacks( Open, Close )
225 vlc_module_end ()
227 /*****************************************************************************
228 * Exported prototypes
229 *****************************************************************************/
230 static const char *const ppsz_sout_options[] = {
231 "dst", "name", "port", "port-audio", "port-video", "*sdp", "ttl", "mux",
232 "sap", "description", "url", "email", "phone",
233 "proto", "rtcp-mux", "caching", "key", "salt",
234 "mp4a-latm", NULL
237 static sout_stream_id_t *Add ( sout_stream_t *, es_format_t * );
238 static int Del ( sout_stream_t *, sout_stream_id_t * );
239 static int Send( sout_stream_t *, sout_stream_id_t *,
240 block_t* );
241 static sout_stream_id_t *MuxAdd ( sout_stream_t *, es_format_t * );
242 static int MuxDel ( sout_stream_t *, sout_stream_id_t * );
243 static int MuxSend( sout_stream_t *, sout_stream_id_t *,
244 block_t* );
246 static sout_access_out_t *GrabberCreate( sout_stream_t *p_sout );
247 static void* ThreadSend( void * );
248 static void *rtp_listen_thread( void * );
250 static void SDPHandleUrl( sout_stream_t *, const char * );
252 static int SapSetup( sout_stream_t *p_stream );
253 static int FileSetup( sout_stream_t *p_stream );
254 static int HttpSetup( sout_stream_t *p_stream, const vlc_url_t * );
256 struct sout_stream_sys_t
258 /* SDP */
259 char *psz_sdp;
260 vlc_mutex_t lock_sdp;
262 /* SDP to disk */
263 char *psz_sdp_file;
265 /* SDP via SAP */
266 bool b_export_sap;
267 session_descriptor_t *p_session;
269 /* SDP via HTTP */
270 httpd_host_t *p_httpd_host;
271 httpd_file_t *p_httpd_file;
273 /* RTSP */
274 rtsp_stream_t *rtsp;
276 /* RTSP NPT and timestamp computations */
277 mtime_t i_npt_zero; /* when NPT=0 packet is sent */
278 int64_t i_pts_zero; /* predicts PTS of NPT=0 packet */
279 int64_t i_pts_offset; /* matches actual PTS to prediction */
280 vlc_mutex_t lock_ts;
282 /* */
283 char *psz_destination;
284 uint32_t payload_bitmap;
285 uint16_t i_port;
286 uint16_t i_port_audio;
287 uint16_t i_port_video;
288 uint8_t proto;
289 bool rtcp_mux;
290 int i_ttl:9;
291 bool b_latm;
293 /* in case we do TS/PS over rtp */
294 sout_mux_t *p_mux;
295 sout_access_out_t *p_grab;
296 block_t *packet;
298 /* */
299 vlc_mutex_t lock_es;
300 int i_es;
301 sout_stream_id_t **es;
304 typedef int (*pf_rtp_packetizer_t)( sout_stream_id_t *, block_t * );
306 typedef struct rtp_sink_t
308 int rtp_fd;
309 rtcp_sender_t *rtcp;
310 } rtp_sink_t;
312 struct sout_stream_id_t
314 sout_stream_t *p_stream;
315 /* rtp field */
316 uint16_t i_sequence;
317 uint8_t i_payload_type;
318 bool b_ts_init;
319 uint32_t i_ts_offset;
320 uint8_t ssrc[4];
322 /* for rtsp */
323 uint16_t i_seq_sent_next;
325 /* for sdp */
326 const char *psz_enc;
327 char *psz_fmtp;
328 int i_clock_rate;
329 int i_port;
330 int i_cat;
331 int i_channels;
332 int i_bitrate;
334 /* Packetizer specific fields */
335 int i_mtu;
336 #ifdef HAVE_SRTP
337 srtp_session_t *srtp;
338 #endif
339 pf_rtp_packetizer_t pf_packetize;
341 /* Packets sinks */
342 vlc_thread_t thread;
343 vlc_mutex_t lock_sink;
344 int sinkc;
345 rtp_sink_t *sinkv;
346 rtsp_stream_id_t *rtsp_id;
347 struct {
348 int *fd;
349 vlc_thread_t thread;
350 } listen;
352 block_fifo_t *p_fifo;
353 int64_t i_caching;
356 /*****************************************************************************
357 * Open:
358 *****************************************************************************/
359 static int Open( vlc_object_t *p_this )
361 sout_stream_t *p_stream = (sout_stream_t*)p_this;
362 sout_instance_t *p_sout = p_stream->p_sout;
363 sout_stream_sys_t *p_sys = NULL;
364 config_chain_t *p_cfg = NULL;
365 char *psz;
366 bool b_rtsp = false;
368 config_ChainParse( p_stream, SOUT_CFG_PREFIX,
369 ppsz_sout_options, p_stream->p_cfg );
371 p_sys = malloc( sizeof( sout_stream_sys_t ) );
372 if( p_sys == NULL )
373 return VLC_ENOMEM;
375 p_sys->psz_destination = var_GetNonEmptyString( p_stream, SOUT_CFG_PREFIX "dst" );
377 p_sys->i_port = var_GetInteger( p_stream, SOUT_CFG_PREFIX "port" );
378 p_sys->i_port_audio = var_GetInteger( p_stream, SOUT_CFG_PREFIX "port-audio" );
379 p_sys->i_port_video = var_GetInteger( p_stream, SOUT_CFG_PREFIX "port-video" );
380 p_sys->rtcp_mux = var_GetBool( p_stream, SOUT_CFG_PREFIX "rtcp-mux" );
382 if( p_sys->i_port_audio && p_sys->i_port_video == p_sys->i_port_audio )
384 msg_Err( p_stream, "audio and video RTP port must be distinct" );
385 free( p_sys->psz_destination );
386 free( p_sys );
387 return VLC_EGENERIC;
390 for( p_cfg = p_stream->p_cfg; p_cfg != NULL; p_cfg = p_cfg->p_next )
392 if( !strcmp( p_cfg->psz_name, "sdp" )
393 && ( p_cfg->psz_value != NULL )
394 && !strncasecmp( p_cfg->psz_value, "rtsp:", 5 ) )
396 b_rtsp = true;
397 break;
400 if( !b_rtsp )
402 psz = var_GetNonEmptyString( p_stream, SOUT_CFG_PREFIX "sdp" );
403 if( psz != NULL )
405 if( !strncasecmp( psz, "rtsp:", 5 ) )
406 b_rtsp = true;
407 free( psz );
411 /* Transport protocol */
412 p_sys->proto = IPPROTO_UDP;
413 psz = var_GetNonEmptyString (p_stream, SOUT_CFG_PREFIX"proto");
415 if ((psz == NULL) || !strcasecmp (psz, "udp"))
416 (void)0; /* default */
417 else
418 if (!strcasecmp (psz, "dccp"))
420 p_sys->proto = IPPROTO_DCCP;
421 p_sys->rtcp_mux = true; /* Force RTP/RTCP mux */
423 #if 0
424 else
425 if (!strcasecmp (psz, "sctp"))
427 p_sys->proto = IPPROTO_TCP;
428 p_sys->rtcp_mux = true; /* Force RTP/RTCP mux */
430 #endif
431 #if 0
432 else
433 if (!strcasecmp (psz, "tcp"))
435 p_sys->proto = IPPROTO_TCP;
436 p_sys->rtcp_mux = true; /* Force RTP/RTCP mux */
438 #endif
439 else
440 if (!strcasecmp (psz, "udplite") || !strcasecmp (psz, "udp-lite"))
441 p_sys->proto = IPPROTO_UDPLITE;
442 else
443 msg_Warn (p_this, "unknown or unsupported transport protocol \"%s\"",
444 psz);
445 free (psz);
446 var_Create (p_this, "dccp-service", VLC_VAR_STRING);
448 if( ( p_sys->psz_destination == NULL ) && !b_rtsp )
450 msg_Err( p_stream, "missing destination and not in RTSP mode" );
451 free( p_sys );
452 return VLC_EGENERIC;
455 p_sys->i_ttl = var_GetInteger( p_stream, SOUT_CFG_PREFIX "ttl" );
456 if( p_sys->i_ttl == -1 )
458 /* Normally, we should let the default hop limit up to the core,
459 * but we have to know it to write our RTSP headers properly,
460 * which is why we ask the core. FIXME: broken when neither
461 * sout-rtp-ttl nor ttl are set. */
462 p_sys->i_ttl = var_InheritInteger( p_stream, "ttl" );
465 p_sys->b_latm = var_GetBool( p_stream, SOUT_CFG_PREFIX "mp4a-latm" );
467 /* NPT=0 time will be determined when we packetize the first packet
468 * (of any ES). But we want to be able to report rtptime in RTSP
469 * without waiting. So until then, we use an arbitrary reference
470 * PTS for timestamp computations, and then actual PTS will catch
471 * up using offsets. */
472 p_sys->i_npt_zero = VLC_TS_INVALID;
473 p_sys->i_pts_zero = mdate(); /* arbitrary value, could probably be
474 * random */
475 p_sys->payload_bitmap = 0xFFFFFFFF;
476 p_sys->i_es = 0;
477 p_sys->es = NULL;
478 p_sys->rtsp = NULL;
479 p_sys->psz_sdp = NULL;
481 p_sys->b_export_sap = false;
482 p_sys->p_session = NULL;
483 p_sys->psz_sdp_file = NULL;
485 p_sys->p_httpd_host = NULL;
486 p_sys->p_httpd_file = NULL;
488 p_stream->p_sys = p_sys;
490 vlc_mutex_init( &p_sys->lock_sdp );
491 vlc_mutex_init( &p_sys->lock_ts );
492 vlc_mutex_init( &p_sys->lock_es );
494 psz = var_GetNonEmptyString( p_stream, SOUT_CFG_PREFIX "mux" );
495 if( psz != NULL )
497 sout_stream_id_t *id;
499 /* Check muxer type */
500 if( strncasecmp( psz, "ps", 2 )
501 && strncasecmp( psz, "mpeg1", 5 )
502 && strncasecmp( psz, "ts", 2 ) )
504 msg_Err( p_stream, "unsupported muxer type for RTP (only TS/PS)" );
505 free( psz );
506 vlc_mutex_destroy( &p_sys->lock_sdp );
507 vlc_mutex_destroy( &p_sys->lock_es );
508 free( p_sys->psz_destination );
509 free( p_sys );
510 return VLC_EGENERIC;
513 p_sys->p_grab = GrabberCreate( p_stream );
514 p_sys->p_mux = sout_MuxNew( p_sout, psz, p_sys->p_grab );
515 free( psz );
517 if( p_sys->p_mux == NULL )
519 msg_Err( p_stream, "cannot create muxer" );
520 sout_AccessOutDelete( p_sys->p_grab );
521 vlc_mutex_destroy( &p_sys->lock_sdp );
522 vlc_mutex_destroy( &p_sys->lock_es );
523 free( p_sys->psz_destination );
524 free( p_sys );
525 return VLC_EGENERIC;
528 id = Add( p_stream, NULL );
529 if( id == NULL )
531 sout_MuxDelete( p_sys->p_mux );
532 sout_AccessOutDelete( p_sys->p_grab );
533 vlc_mutex_destroy( &p_sys->lock_sdp );
534 vlc_mutex_destroy( &p_sys->lock_es );
535 free( p_sys->psz_destination );
536 free( p_sys );
537 return VLC_EGENERIC;
540 p_sys->packet = NULL;
542 p_stream->pf_add = MuxAdd;
543 p_stream->pf_del = MuxDel;
544 p_stream->pf_send = MuxSend;
546 else
548 p_sys->p_mux = NULL;
549 p_sys->p_grab = NULL;
551 p_stream->pf_add = Add;
552 p_stream->pf_del = Del;
553 p_stream->pf_send = Send;
556 if( var_GetBool( p_stream, SOUT_CFG_PREFIX"sap" ) )
557 SDPHandleUrl( p_stream, "sap" );
559 psz = var_GetNonEmptyString( p_stream, SOUT_CFG_PREFIX "sdp" );
560 if( psz != NULL )
562 config_chain_t *p_cfg;
564 SDPHandleUrl( p_stream, psz );
566 for( p_cfg = p_stream->p_cfg; p_cfg != NULL; p_cfg = p_cfg->p_next )
568 if( !strcmp( p_cfg->psz_name, "sdp" ) )
570 if( p_cfg->psz_value == NULL || *p_cfg->psz_value == '\0' )
571 continue;
573 /* needed both :sout-rtp-sdp= and rtp{sdp=} can be used */
574 if( !strcmp( p_cfg->psz_value, psz ) )
575 continue;
577 SDPHandleUrl( p_stream, p_cfg->psz_value );
580 free( psz );
583 /* update p_sout->i_out_pace_nocontrol */
584 p_stream->p_sout->i_out_pace_nocontrol++;
586 return VLC_SUCCESS;
589 /*****************************************************************************
590 * Close:
591 *****************************************************************************/
592 static void Close( vlc_object_t * p_this )
594 sout_stream_t *p_stream = (sout_stream_t*)p_this;
595 sout_stream_sys_t *p_sys = p_stream->p_sys;
597 /* update p_sout->i_out_pace_nocontrol */
598 p_stream->p_sout->i_out_pace_nocontrol--;
600 if( p_sys->p_mux )
602 assert( p_sys->i_es == 1 );
604 sout_MuxDelete( p_sys->p_mux );
605 Del( p_stream, p_sys->es[0] );
606 sout_AccessOutDelete( p_sys->p_grab );
608 if( p_sys->packet )
610 block_Release( p_sys->packet );
612 if( p_sys->b_export_sap )
614 p_sys->p_mux = NULL;
615 SapSetup( p_stream );
619 if( p_sys->rtsp != NULL )
620 RtspUnsetup( p_sys->rtsp );
622 vlc_mutex_destroy( &p_sys->lock_sdp );
623 vlc_mutex_destroy( &p_sys->lock_ts );
624 vlc_mutex_destroy( &p_sys->lock_es );
626 if( p_sys->p_httpd_file )
627 httpd_FileDelete( p_sys->p_httpd_file );
629 if( p_sys->p_httpd_host )
630 httpd_HostDelete( p_sys->p_httpd_host );
632 free( p_sys->psz_sdp );
634 if( p_sys->psz_sdp_file != NULL )
636 #ifdef HAVE_UNISTD_H
637 unlink( p_sys->psz_sdp_file );
638 #endif
639 free( p_sys->psz_sdp_file );
641 free( p_sys->psz_destination );
642 free( p_sys );
645 /*****************************************************************************
646 * SDPHandleUrl:
647 *****************************************************************************/
648 static void SDPHandleUrl( sout_stream_t *p_stream, const char *psz_url )
650 sout_stream_sys_t *p_sys = p_stream->p_sys;
651 vlc_url_t url;
653 vlc_UrlParse( &url, psz_url, 0 );
654 if( url.psz_protocol && !strcasecmp( url.psz_protocol, "http" ) )
656 if( p_sys->p_httpd_file )
658 msg_Err( p_stream, "you can use sdp=http:// only once" );
659 goto out;
662 if( HttpSetup( p_stream, &url ) )
664 msg_Err( p_stream, "cannot export SDP as HTTP" );
667 else if( url.psz_protocol && !strcasecmp( url.psz_protocol, "rtsp" ) )
669 if( p_sys->rtsp != NULL )
671 msg_Err( p_stream, "you can use sdp=rtsp:// only once" );
672 goto out;
675 /* FIXME test if destination is multicast or no destination at all */
676 p_sys->rtsp = RtspSetup( p_stream, &url );
677 if( p_sys->rtsp == NULL )
678 msg_Err( p_stream, "cannot export SDP as RTSP" );
679 else
680 if( p_sys->p_mux != NULL )
682 sout_stream_id_t *id = p_sys->es[0];
683 rtsp_stream_id_t *rtsp_id = RtspAddId( p_sys->rtsp, id, GetDWBE( id->ssrc ),
684 p_sys->psz_destination, p_sys->i_ttl,
685 id->i_port, id->i_port + 1 );
686 vlc_mutex_lock( &p_sys->lock_es );
687 id->rtsp_id = rtsp_id;
688 vlc_mutex_unlock( &p_sys->lock_es );
691 else if( ( url.psz_protocol && !strcasecmp( url.psz_protocol, "sap" ) ) ||
692 ( url.psz_host && !strcasecmp( url.psz_host, "sap" ) ) )
694 p_sys->b_export_sap = true;
695 SapSetup( p_stream );
697 else if( url.psz_protocol && !strcasecmp( url.psz_protocol, "file" ) )
699 if( p_sys->psz_sdp_file != NULL )
701 msg_Err( p_stream, "you can use sdp=file:// only once" );
702 goto out;
704 p_sys->psz_sdp_file = make_path( psz_url );
705 if( p_sys->psz_sdp_file == NULL )
706 goto out;
707 FileSetup( p_stream );
709 else
711 msg_Warn( p_stream, "unknown protocol for SDP (%s)",
712 url.psz_protocol );
715 out:
716 vlc_UrlClean( &url );
719 /*****************************************************************************
720 * SDPGenerate
721 *****************************************************************************/
722 /*static*/
723 char *SDPGenerate( sout_stream_t *p_stream, const char *rtsp_url )
725 sout_stream_sys_t *p_sys = p_stream->p_sys;
726 char *psz_sdp = NULL;
727 struct sockaddr_storage dst;
728 socklen_t dstlen;
729 int i;
731 * When we have a fixed destination (typically when we do multicast),
732 * we need to put the actual port numbers in the SDP.
733 * When there is no fixed destination, we only support RTSP unicast
734 * on-demand setup, so we should rather let the clients decide which ports
735 * to use.
736 * When there is both a fixed destination and RTSP unicast, we need to
737 * put port numbers used by the fixed destination, otherwise the SDP would
738 * become totally incorrect for multicast use. It should be noted that
739 * port numbers from SDP with RTSP are only "recommendation" from the
740 * server to the clients (per RFC2326), so only broken clients will fail
741 * to handle this properly. There is no solution but to use two differents
742 * output chain with two different RTSP URLs if you need to handle this
743 * scenario.
745 int inclport;
747 vlc_mutex_lock( &p_sys->lock_es );
748 if( unlikely(p_sys->i_es == 0 || (rtsp_url != NULL && !p_sys->es[0]->rtsp_id)) )
749 goto out; /* hmm... */
751 if( p_sys->psz_destination != NULL )
753 inclport = 1;
755 /* Oh boy, this is really ugly! */
756 dstlen = sizeof( dst );
757 if( p_sys->es[0]->listen.fd != NULL )
758 getsockname( p_sys->es[0]->listen.fd[0],
759 (struct sockaddr *)&dst, &dstlen );
760 else
761 getpeername( p_sys->es[0]->sinkv[0].rtp_fd,
762 (struct sockaddr *)&dst, &dstlen );
764 else
766 inclport = 0;
768 /* Check against URL format rtsp://[<ipv6>]:<port>/<path> */
769 bool ipv6 = rtsp_url != NULL && strlen( rtsp_url ) > 7
770 && rtsp_url[7] == '[';
772 /* Dummy destination address for RTSP */
773 dstlen = ipv6 ? sizeof( struct sockaddr_in6 )
774 : sizeof( struct sockaddr_in );
775 memset (&dst, 0, dstlen);
776 dst.ss_family = ipv6 ? AF_INET6 : AF_INET;
777 #ifdef HAVE_SA_LEN
778 dst.ss_len = dstlen;
779 #endif
782 psz_sdp = vlc_sdp_Start( VLC_OBJECT( p_stream ), SOUT_CFG_PREFIX,
783 NULL, 0, (struct sockaddr *)&dst, dstlen );
784 if( psz_sdp == NULL )
785 goto out;
787 /* TODO: a=source-filter */
788 if( p_sys->rtcp_mux )
789 sdp_AddAttribute( &psz_sdp, "rtcp-mux", NULL );
791 if( rtsp_url != NULL )
792 sdp_AddAttribute ( &psz_sdp, "control", "%s", rtsp_url );
794 const char *proto = "RTP/AVP"; /* protocol */
795 if( rtsp_url == NULL )
797 switch( p_sys->proto )
799 case IPPROTO_UDP:
800 break;
801 case IPPROTO_TCP:
802 proto = "TCP/RTP/AVP";
803 break;
804 case IPPROTO_DCCP:
805 proto = "DCCP/RTP/AVP";
806 break;
807 case IPPROTO_UDPLITE:
808 return psz_sdp;
812 for( i = 0; i < p_sys->i_es; i++ )
814 sout_stream_id_t *id = p_sys->es[i];
815 const char *mime_major; /* major MIME type */
817 switch( id->i_cat )
819 case VIDEO_ES:
820 mime_major = "video";
821 break;
822 case AUDIO_ES:
823 mime_major = "audio";
824 break;
825 case SPU_ES:
826 mime_major = "text";
827 break;
828 default:
829 continue;
832 sdp_AddMedia( &psz_sdp, mime_major, proto, inclport * id->i_port,
833 id->i_payload_type, false, id->i_bitrate,
834 id->psz_enc, id->i_clock_rate, id->i_channels,
835 id->psz_fmtp);
837 /* cf RFC4566 §5.14 */
838 if( inclport && !p_sys->rtcp_mux && (id->i_port & 1) )
839 sdp_AddAttribute ( &psz_sdp, "rtcp", "%u", id->i_port + 1 );
841 if( rtsp_url != NULL )
843 char *track_url = RtspAppendTrackPath( id->rtsp_id, rtsp_url );
844 if( track_url != NULL )
846 sdp_AddAttribute ( &psz_sdp, "control", "%s", track_url );
847 free( track_url );
850 else
852 if( id->listen.fd != NULL )
853 sdp_AddAttribute( &psz_sdp, "setup", "passive" );
854 if( p_sys->proto == IPPROTO_DCCP )
855 sdp_AddAttribute( &psz_sdp, "dccp-service-code",
856 "SC:RTP%c", toupper( mime_major[0] ) );
859 out:
860 vlc_mutex_unlock( &p_sys->lock_es );
861 return psz_sdp;
864 /*****************************************************************************
865 * RTP mux
866 *****************************************************************************/
868 static void sprintf_hexa( char *s, uint8_t *p_data, int i_data )
870 static const char hex[16] = "0123456789abcdef";
871 int i;
873 for( i = 0; i < i_data; i++ )
875 s[2*i+0] = hex[(p_data[i]>>4)&0xf];
876 s[2*i+1] = hex[(p_data[i] )&0xf];
878 s[2*i_data] = '\0';
882 * Shrink the MTU down to a fixed packetization time (for audio).
884 static void
885 rtp_set_ptime (sout_stream_id_t *id, unsigned ptime_ms, size_t bytes)
887 /* Samples per second */
888 size_t spl = (id->i_clock_rate - 1) * ptime_ms / 1000 + 1;
889 bytes *= id->i_channels;
890 spl *= bytes;
892 if (spl < rtp_mtu (id)) /* MTU is big enough for ptime */
893 id->i_mtu = 12 + spl;
894 else /* MTU is too small for ptime, align to a sample boundary */
895 id->i_mtu = 12 + (((id->i_mtu - 12) / bytes) * bytes);
898 uint32_t rtp_compute_ts( const sout_stream_id_t *id, int64_t i_pts )
900 /* NOTE: this plays nice with offsets because the calculations are
901 * linear. */
902 return i_pts * (int64_t)id->i_clock_rate / CLOCK_FREQ;
905 /** Add an ES as a new RTP stream */
906 static sout_stream_id_t *Add( sout_stream_t *p_stream, es_format_t *p_fmt )
908 /* NOTE: As a special case, if we use a non-RTP
909 * mux (TS/PS), then p_fmt is NULL. */
910 sout_stream_sys_t *p_sys = p_stream->p_sys;
911 char *psz_sdp;
913 if (0 == p_sys->payload_bitmap)
915 msg_Err (p_stream, "too many RTP elementary streams");
916 return NULL;
919 /* Choose the port */
920 uint16_t i_port = 0;
921 if( p_fmt == NULL )
923 else
924 if( p_fmt->i_cat == AUDIO_ES && p_sys->i_port_audio > 0 )
925 i_port = p_sys->i_port_audio;
926 else
927 if( p_fmt->i_cat == VIDEO_ES && p_sys->i_port_video > 0 )
928 i_port = p_sys->i_port_video;
930 /* We do not need the ES lock (p_sys->lock_es) here, because this is the
931 * only one thread that can *modify* the ES table. The ES lock protects
932 * the other threads from our modifications (TAB_APPEND, TAB_REMOVE). */
933 for (int i = 0; i_port && (i < p_sys->i_es); i++)
934 if (i_port == p_sys->es[i]->i_port)
935 i_port = 0; /* Port already in use! */
936 for (uint16_t p = p_sys->i_port; i_port == 0; p += 2)
938 if (p == 0)
940 msg_Err (p_stream, "too many RTP elementary streams");
941 return NULL;
943 i_port = p;
944 for (int i = 0; i_port && (i < p_sys->i_es); i++)
945 if (p == p_sys->es[i]->i_port)
946 i_port = 0;
949 sout_stream_id_t *id = malloc( sizeof( *id ) );
950 if( unlikely(id == NULL) )
951 return NULL;
952 id->p_stream = p_stream;
954 /* Look for free dymanic payload type */
955 id->i_payload_type = 96 + clz32 (p_sys->payload_bitmap);
956 assert (id->i_payload_type < 128);
958 vlc_rand_bytes (&id->i_sequence, sizeof (id->i_sequence));
959 vlc_rand_bytes (id->ssrc, sizeof (id->ssrc));
961 id->psz_enc = NULL;
962 id->psz_fmtp = NULL;
963 id->i_clock_rate = 90000; /* most common case for video */
964 id->i_channels = 0;
965 id->i_port = i_port;
966 if( p_fmt != NULL )
968 id->i_cat = p_fmt->i_cat;
969 if( p_fmt->i_cat == AUDIO_ES )
971 id->i_clock_rate = p_fmt->audio.i_rate;
972 id->i_channels = p_fmt->audio.i_channels;
974 id->i_bitrate = p_fmt->i_bitrate/1000; /* Stream bitrate in kbps */
976 else
978 id->i_cat = VIDEO_ES;
979 id->i_bitrate = 0;
982 id->i_mtu = var_InheritInteger( p_stream, "mtu" );
983 if( id->i_mtu <= 12 + 16 )
984 id->i_mtu = 576 - 20 - 8; /* pessimistic */
985 msg_Dbg( p_stream, "maximum RTP packet size: %d bytes", id->i_mtu );
987 id->pf_packetize = NULL;
989 #ifdef HAVE_SRTP
990 id->srtp = NULL;
991 #endif
992 vlc_mutex_init( &id->lock_sink );
993 id->sinkc = 0;
994 id->sinkv = NULL;
995 id->rtsp_id = NULL;
996 id->p_fifo = NULL;
997 id->listen.fd = NULL;
999 id->i_caching =
1000 (int64_t)1000 * var_GetInteger( p_stream, SOUT_CFG_PREFIX "caching");
1002 #ifdef HAVE_SRTP
1003 char *key = var_CreateGetNonEmptyString (p_stream, SOUT_CFG_PREFIX"key");
1004 if (key)
1006 id->srtp = srtp_create (SRTP_ENCR_AES_CM, SRTP_AUTH_HMAC_SHA1, 10,
1007 SRTP_PRF_AES_CM, SRTP_RCC_MODE1);
1008 if (id->srtp == NULL)
1010 free (key);
1011 goto error;
1014 char *salt = var_CreateGetNonEmptyString (p_stream, SOUT_CFG_PREFIX"salt");
1015 errno = srtp_setkeystring (id->srtp, key, salt ? salt : "");
1016 free (salt);
1017 free (key);
1018 if (errno)
1020 msg_Err (p_stream, "bad SRTP key/salt combination (%m)");
1021 goto error;
1023 id->i_sequence = 0; /* FIXME: awful hack for libvlc_srtp */
1025 #endif
1027 id->i_seq_sent_next = id->i_sequence;
1029 if( p_sys->psz_destination != NULL )
1031 int type = SOCK_STREAM;
1033 switch( p_sys->proto )
1035 #ifdef SOCK_DCCP
1036 case IPPROTO_DCCP:
1038 const char *code;
1039 switch (id->i_cat)
1041 case VIDEO_ES: code = "RTPV"; break;
1042 case AUDIO_ES: code = "RTPARTPV"; break;
1043 case SPU_ES: code = "RTPTRTPV"; break;
1044 default: code = "RTPORTPV"; break;
1046 var_SetString (p_stream, "dccp-service", code);
1047 type = SOCK_DCCP;
1048 } /* fall through */
1049 #endif
1050 case IPPROTO_TCP:
1051 id->listen.fd = net_Listen( VLC_OBJECT(p_stream),
1052 p_sys->psz_destination, i_port,
1053 type, p_sys->proto );
1054 if( id->listen.fd == NULL )
1056 msg_Err( p_stream, "passive COMEDIA RTP socket failed" );
1057 goto error;
1059 if( vlc_clone( &id->listen.thread, rtp_listen_thread, id,
1060 VLC_THREAD_PRIORITY_LOW ) )
1062 net_ListenClose( id->listen.fd );
1063 id->listen.fd = NULL;
1064 goto error;
1066 break;
1068 default:
1070 int ttl = (p_sys->i_ttl >= 0) ? p_sys->i_ttl : -1;
1071 int fd = net_ConnectDgram( p_stream, p_sys->psz_destination,
1072 i_port, ttl, p_sys->proto );
1073 if( fd == -1 )
1075 msg_Err( p_stream, "cannot create RTP socket" );
1076 goto error;
1078 /* Ignore any unexpected incoming packet (including RTCP-RR
1079 * packets in case of rtcp-mux) */
1080 setsockopt (fd, SOL_SOCKET, SO_RCVBUF, &(int){ 0 },
1081 sizeof (int));
1082 rtp_add_sink( id, fd, p_sys->rtcp_mux, NULL );
1087 if( p_fmt == NULL )
1089 char *psz = var_GetNonEmptyString( p_stream, SOUT_CFG_PREFIX "mux" );
1091 if( psz == NULL ) /* Uho! */
1093 else
1094 if( strncmp( psz, "ts", 2 ) == 0 )
1096 id->i_payload_type = 33;
1097 id->psz_enc = "MP2T";
1099 else
1101 id->psz_enc = "MP2P";
1103 free( psz );
1105 else
1106 switch( p_fmt->i_codec )
1108 case VLC_CODEC_MULAW:
1109 if( p_fmt->audio.i_channels == 1 && p_fmt->audio.i_rate == 8000 )
1110 id->i_payload_type = 0;
1111 id->psz_enc = "PCMU";
1112 id->pf_packetize = rtp_packetize_split;
1113 rtp_set_ptime (id, 20, 1);
1114 break;
1115 case VLC_CODEC_ALAW:
1116 if( p_fmt->audio.i_channels == 1 && p_fmt->audio.i_rate == 8000 )
1117 id->i_payload_type = 8;
1118 id->psz_enc = "PCMA";
1119 id->pf_packetize = rtp_packetize_split;
1120 rtp_set_ptime (id, 20, 1);
1121 break;
1122 case VLC_CODEC_S16B:
1123 case VLC_CODEC_S16L:
1124 if( p_fmt->audio.i_channels == 1 && p_fmt->audio.i_rate == 44100 )
1126 id->i_payload_type = 11;
1128 else if( p_fmt->audio.i_channels == 2 &&
1129 p_fmt->audio.i_rate == 44100 )
1131 id->i_payload_type = 10;
1133 id->psz_enc = "L16";
1134 if( p_fmt->i_codec == VLC_CODEC_S16B )
1135 id->pf_packetize = rtp_packetize_split;
1136 else
1137 id->pf_packetize = rtp_packetize_swab;
1138 rtp_set_ptime (id, 20, 2);
1139 break;
1140 case VLC_CODEC_U8:
1141 id->psz_enc = "L8";
1142 id->pf_packetize = rtp_packetize_split;
1143 rtp_set_ptime (id, 20, 1);
1144 break;
1145 case VLC_CODEC_MPGA:
1146 id->i_payload_type = 14;
1147 id->psz_enc = "MPA";
1148 id->i_clock_rate = 90000; /* not 44100 */
1149 id->pf_packetize = rtp_packetize_mpa;
1150 break;
1151 case VLC_CODEC_MPGV:
1152 id->i_payload_type = 32;
1153 id->psz_enc = "MPV";
1154 id->pf_packetize = rtp_packetize_mpv;
1155 break;
1156 case VLC_CODEC_ADPCM_G726:
1157 switch( p_fmt->i_bitrate / 1000 )
1159 case 16:
1160 id->psz_enc = "G726-16";
1161 id->pf_packetize = rtp_packetize_g726_16;
1162 break;
1163 case 24:
1164 id->psz_enc = "G726-24";
1165 id->pf_packetize = rtp_packetize_g726_24;
1166 break;
1167 case 32:
1168 id->psz_enc = "G726-32";
1169 id->pf_packetize = rtp_packetize_g726_32;
1170 break;
1171 case 40:
1172 id->psz_enc = "G726-40";
1173 id->pf_packetize = rtp_packetize_g726_40;
1174 break;
1175 default:
1176 msg_Err( p_stream, "cannot add this stream (unsupported "
1177 "G.726 bit rate: %u)", p_fmt->i_bitrate );
1178 goto error;
1180 break;
1181 case VLC_CODEC_A52:
1182 id->psz_enc = "ac3";
1183 id->pf_packetize = rtp_packetize_ac3;
1184 break;
1185 case VLC_CODEC_H263:
1186 id->psz_enc = "H263-1998";
1187 id->pf_packetize = rtp_packetize_h263;
1188 break;
1189 case VLC_CODEC_H264:
1190 id->psz_enc = "H264";
1191 id->pf_packetize = rtp_packetize_h264;
1192 id->psz_fmtp = NULL;
1194 if( p_fmt->i_extra > 0 )
1196 uint8_t *p_buffer = p_fmt->p_extra;
1197 int i_buffer = p_fmt->i_extra;
1198 char *p_64_sps = NULL;
1199 char *p_64_pps = NULL;
1200 char hexa[6+1];
1202 while( i_buffer > 4 )
1204 int i_offset = 0;
1205 int i_size = 0;
1207 while( p_buffer[0] != 0 || p_buffer[1] != 0 ||
1208 p_buffer[2] != 1 )
1210 p_buffer++;
1211 i_buffer--;
1212 if( i_buffer == 0 ) break;
1215 if( i_buffer < 4 || memcmp(p_buffer, "\x00\x00\x01", 3 ) )
1217 msg_Dbg( p_stream, "No startcode found..");
1218 break;
1220 p_buffer += 3;
1221 i_buffer -= 3;
1223 const int i_nal_type = p_buffer[0]&0x1f;
1225 msg_Dbg( p_stream, "we found a startcode for NAL with TYPE:%d", i_nal_type );
1227 i_size = i_buffer;
1228 for( i_offset = 0; i_offset+2 < i_buffer ; i_offset++)
1230 if( !memcmp(p_buffer + i_offset, "\x00\x00\x01", 3 ) )
1232 /* we found another startcode */
1233 while( i_offset > 0 && 0 == p_buffer[ i_offset - 1 ] )
1234 i_offset--;
1235 i_size = i_offset;
1236 break;
1240 if( i_size == 0 )
1242 msg_Dbg( p_stream, "No-info found in nal ");
1243 continue;
1246 if( i_nal_type == 7 )
1248 free( p_64_sps );
1249 p_64_sps = vlc_b64_encode_binary( p_buffer, i_size );
1250 /* XXX: nothing ensures that i_size >= 4 ?? */
1251 sprintf_hexa( hexa, &p_buffer[1], 3 );
1253 else if( i_nal_type == 8 )
1255 free( p_64_pps );
1256 p_64_pps = vlc_b64_encode_binary( p_buffer, i_size );
1258 i_buffer -= i_size;
1259 p_buffer += i_size;
1261 /* */
1262 if( p_64_sps && p_64_pps &&
1263 ( asprintf( &id->psz_fmtp,
1264 "packetization-mode=1;profile-level-id=%s;"
1265 "sprop-parameter-sets=%s,%s;", hexa, p_64_sps,
1266 p_64_pps ) == -1 ) )
1267 id->psz_fmtp = NULL;
1268 free( p_64_sps );
1269 free( p_64_pps );
1271 if( !id->psz_fmtp )
1272 id->psz_fmtp = strdup( "packetization-mode=1" );
1273 break;
1275 case VLC_CODEC_MP4V:
1277 id->psz_enc = "MP4V-ES";
1278 id->pf_packetize = rtp_packetize_split;
1279 if( p_fmt->i_extra > 0 )
1281 char hexa[2*p_fmt->i_extra +1];
1282 sprintf_hexa( hexa, p_fmt->p_extra, p_fmt->i_extra );
1283 if( asprintf( &id->psz_fmtp,
1284 "profile-level-id=3; config=%s;", hexa ) == -1 )
1285 id->psz_fmtp = NULL;
1287 break;
1289 case VLC_CODEC_MP4A:
1291 if(!p_sys->b_latm)
1293 char hexa[2*p_fmt->i_extra +1];
1295 id->psz_enc = "mpeg4-generic";
1296 id->pf_packetize = rtp_packetize_mp4a;
1297 sprintf_hexa( hexa, p_fmt->p_extra, p_fmt->i_extra );
1298 if( asprintf( &id->psz_fmtp,
1299 "streamtype=5; profile-level-id=15; "
1300 "mode=AAC-hbr; config=%s; SizeLength=13; "
1301 "IndexLength=3; IndexDeltaLength=3; Profile=1;",
1302 hexa ) == -1 )
1303 id->psz_fmtp = NULL;
1305 else
1307 char hexa[13];
1308 int i;
1309 unsigned char config[6];
1310 unsigned int aacsrates[15] = {
1311 96000, 88200, 64000, 48000, 44100, 32000, 24000, 22050,
1312 16000, 12000, 11025, 8000, 7350, 0, 0 };
1314 for( i = 0; i < 15; i++ )
1315 if( p_fmt->audio.i_rate == aacsrates[i] )
1316 break;
1318 config[0]=0x40;
1319 config[1]=0;
1320 config[2]=0x20|i;
1321 config[3]=p_fmt->audio.i_channels<<4;
1322 config[4]=0x3f;
1323 config[5]=0xc0;
1325 id->psz_enc = "MP4A-LATM";
1326 id->pf_packetize = rtp_packetize_mp4a_latm;
1327 sprintf_hexa( hexa, config, 6 );
1328 if( asprintf( &id->psz_fmtp, "profile-level-id=15; "
1329 "object=2; cpresent=0; config=%s", hexa ) == -1 )
1330 id->psz_fmtp = NULL;
1332 break;
1334 case VLC_CODEC_AMR_NB:
1335 id->psz_enc = "AMR";
1336 id->psz_fmtp = strdup( "octet-align=1" );
1337 id->pf_packetize = rtp_packetize_amr;
1338 break;
1339 case VLC_CODEC_AMR_WB:
1340 id->psz_enc = "AMR-WB";
1341 id->psz_fmtp = strdup( "octet-align=1" );
1342 id->pf_packetize = rtp_packetize_amr;
1343 break;
1344 case VLC_CODEC_SPEEX:
1345 id->psz_enc = "SPEEX";
1346 id->pf_packetize = rtp_packetize_spx;
1347 break;
1348 case VLC_CODEC_ITU_T140:
1349 id->psz_enc = "t140" ;
1350 id->i_clock_rate = 1000;
1351 id->pf_packetize = rtp_packetize_t140;
1352 break;
1354 default:
1355 msg_Err( p_stream, "cannot add this stream (unsupported "
1356 "codec: %4.4s)", (char*)&p_fmt->i_codec );
1357 goto error;
1359 if (id->i_payload_type >= 96)
1360 /* Mark dynamic payload type in use */
1361 p_sys->payload_bitmap &= ~(1 << (127 - id->i_payload_type));
1363 #if 0 /* No payload formats sets this at the moment */
1364 int cscov = -1;
1365 if( cscov != -1 )
1366 cscov += 8 /* UDP */ + 12 /* RTP */;
1367 if( id->sinkc > 0 )
1368 net_SetCSCov( id->sinkv[0].rtp_fd, cscov, -1 );
1369 #endif
1371 vlc_mutex_lock( &p_sys->lock_ts );
1372 id->b_ts_init = ( p_sys->i_npt_zero != VLC_TS_INVALID );
1373 vlc_mutex_unlock( &p_sys->lock_ts );
1374 if( id->b_ts_init )
1375 id->i_ts_offset = rtp_compute_ts( id, p_sys->i_pts_offset );
1377 if( p_sys->rtsp != NULL )
1378 id->rtsp_id = RtspAddId( p_sys->rtsp, id,
1379 GetDWBE( id->ssrc ),
1380 p_sys->psz_destination,
1381 p_sys->i_ttl, id->i_port, id->i_port + 1 );
1383 id->p_fifo = block_FifoNew();
1384 if( unlikely(id->p_fifo == NULL) )
1385 goto error;
1386 if( vlc_clone( &id->thread, ThreadSend, id, VLC_THREAD_PRIORITY_HIGHEST ) )
1388 block_FifoRelease( id->p_fifo );
1389 id->p_fifo = NULL;
1390 goto error;
1393 /* Update p_sys context */
1394 vlc_mutex_lock( &p_sys->lock_es );
1395 TAB_APPEND( p_sys->i_es, p_sys->es, id );
1396 vlc_mutex_unlock( &p_sys->lock_es );
1398 psz_sdp = SDPGenerate( p_stream, NULL );
1400 vlc_mutex_lock( &p_sys->lock_sdp );
1401 free( p_sys->psz_sdp );
1402 p_sys->psz_sdp = psz_sdp;
1403 vlc_mutex_unlock( &p_sys->lock_sdp );
1405 msg_Dbg( p_stream, "sdp=\n%s", p_sys->psz_sdp );
1407 /* Update SDP (sap/file) */
1408 if( p_sys->b_export_sap ) SapSetup( p_stream );
1409 if( p_sys->psz_sdp_file != NULL ) FileSetup( p_stream );
1411 return id;
1413 error:
1414 Del( p_stream, id );
1415 return NULL;
1418 static int Del( sout_stream_t *p_stream, sout_stream_id_t *id )
1420 sout_stream_sys_t *p_sys = p_stream->p_sys;
1422 vlc_mutex_lock( &p_sys->lock_es );
1423 TAB_REMOVE( p_sys->i_es, p_sys->es, id );
1424 vlc_mutex_unlock( &p_sys->lock_es );
1426 if( likely(id->p_fifo != NULL) )
1428 vlc_cancel( id->thread );
1429 vlc_join( id->thread, NULL );
1430 block_FifoRelease( id->p_fifo );
1433 /* Release dynamic payload type */
1434 if (id->i_payload_type >= 96)
1435 p_sys->payload_bitmap |= 1 << (127 - id->i_payload_type);
1437 free( id->psz_fmtp );
1439 if( id->rtsp_id )
1440 RtspDelId( p_sys->rtsp, id->rtsp_id );
1441 if( id->listen.fd != NULL )
1443 vlc_cancel( id->listen.thread );
1444 vlc_join( id->listen.thread, NULL );
1445 net_ListenClose( id->listen.fd );
1447 /* Delete remaining sinks (incoming connections or explicit
1448 * outgoing dst=) */
1449 while( id->sinkc > 0 )
1450 rtp_del_sink( id, id->sinkv[0].rtp_fd );
1451 #ifdef HAVE_SRTP
1452 if( id->srtp != NULL )
1453 srtp_destroy( id->srtp );
1454 #endif
1456 vlc_mutex_destroy( &id->lock_sink );
1458 /* Update SDP (sap/file) */
1459 if( p_sys->b_export_sap && !p_sys->p_mux ) SapSetup( p_stream );
1460 if( p_sys->psz_sdp_file != NULL ) FileSetup( p_stream );
1462 free( id );
1463 return VLC_SUCCESS;
1466 static int Send( sout_stream_t *p_stream, sout_stream_id_t *id,
1467 block_t *p_buffer )
1469 block_t *p_next;
1471 assert( p_stream->p_sys->p_mux == NULL );
1472 (void)p_stream;
1474 while( p_buffer != NULL )
1476 p_next = p_buffer->p_next;
1477 if( id->pf_packetize( id, p_buffer ) )
1478 break;
1480 block_Release( p_buffer );
1481 p_buffer = p_next;
1483 return VLC_SUCCESS;
1486 /****************************************************************************
1487 * SAP:
1488 ****************************************************************************/
1489 static int SapSetup( sout_stream_t *p_stream )
1491 sout_stream_sys_t *p_sys = p_stream->p_sys;
1492 sout_instance_t *p_sout = p_stream->p_sout;
1494 /* Remove the previous session */
1495 if( p_sys->p_session != NULL)
1497 sout_AnnounceUnRegister( p_sout, p_sys->p_session);
1498 p_sys->p_session = NULL;
1501 if( ( p_sys->i_es > 0 || p_sys->p_mux ) && p_sys->psz_sdp && *p_sys->psz_sdp )
1503 announce_method_t *p_method = sout_SAPMethod();
1504 p_sys->p_session = sout_AnnounceRegisterSDP( p_sout,
1505 p_sys->psz_sdp,
1506 p_sys->psz_destination,
1507 p_method );
1508 sout_MethodRelease( p_method );
1511 return VLC_SUCCESS;
1514 /****************************************************************************
1515 * File:
1516 ****************************************************************************/
1517 static int FileSetup( sout_stream_t *p_stream )
1519 sout_stream_sys_t *p_sys = p_stream->p_sys;
1520 FILE *f;
1522 if( p_sys->psz_sdp == NULL )
1523 return VLC_EGENERIC; /* too early */
1525 if( ( f = vlc_fopen( p_sys->psz_sdp_file, "wt" ) ) == NULL )
1527 msg_Err( p_stream, "cannot open file '%s' (%m)",
1528 p_sys->psz_sdp_file );
1529 return VLC_EGENERIC;
1532 fputs( p_sys->psz_sdp, f );
1533 fclose( f );
1535 return VLC_SUCCESS;
1538 /****************************************************************************
1539 * HTTP:
1540 ****************************************************************************/
1541 static int HttpCallback( httpd_file_sys_t *p_args,
1542 httpd_file_t *, uint8_t *p_request,
1543 uint8_t **pp_data, int *pi_data );
1545 static int HttpSetup( sout_stream_t *p_stream, const vlc_url_t *url)
1547 sout_stream_sys_t *p_sys = p_stream->p_sys;
1549 p_sys->p_httpd_host = httpd_HostNew( VLC_OBJECT(p_stream), url->psz_host,
1550 url->i_port > 0 ? url->i_port : 80 );
1551 if( p_sys->p_httpd_host )
1553 p_sys->p_httpd_file = httpd_FileNew( p_sys->p_httpd_host,
1554 url->psz_path ? url->psz_path : "/",
1555 "application/sdp",
1556 NULL, NULL, NULL,
1557 HttpCallback, (void*)p_sys );
1559 if( p_sys->p_httpd_file == NULL )
1561 return VLC_EGENERIC;
1563 return VLC_SUCCESS;
1566 static int HttpCallback( httpd_file_sys_t *p_args,
1567 httpd_file_t *f, uint8_t *p_request,
1568 uint8_t **pp_data, int *pi_data )
1570 VLC_UNUSED(f); VLC_UNUSED(p_request);
1571 sout_stream_sys_t *p_sys = (sout_stream_sys_t*)p_args;
1573 vlc_mutex_lock( &p_sys->lock_sdp );
1574 if( p_sys->psz_sdp && *p_sys->psz_sdp )
1576 *pi_data = strlen( p_sys->psz_sdp );
1577 *pp_data = malloc( *pi_data );
1578 memcpy( *pp_data, p_sys->psz_sdp, *pi_data );
1580 else
1582 *pp_data = NULL;
1583 *pi_data = 0;
1585 vlc_mutex_unlock( &p_sys->lock_sdp );
1587 return VLC_SUCCESS;
1590 /****************************************************************************
1591 * RTP send
1592 ****************************************************************************/
1593 static void* ThreadSend( void *data )
1595 #ifdef WIN32
1596 # define ECONNREFUSED WSAECONNREFUSED
1597 # define ENOPROTOOPT WSAENOPROTOOPT
1598 # define EHOSTUNREACH WSAEHOSTUNREACH
1599 # define ENETUNREACH WSAENETUNREACH
1600 # define ENETDOWN WSAENETDOWN
1601 # define ENOBUFS WSAENOBUFS
1602 # define EAGAIN WSAEWOULDBLOCK
1603 # define EWOULDBLOCK WSAEWOULDBLOCK
1604 #endif
1605 sout_stream_id_t *id = data;
1606 unsigned i_caching = id->i_caching;
1608 for (;;)
1610 block_t *out = block_FifoGet( id->p_fifo );
1611 block_cleanup_push (out);
1613 #ifdef HAVE_SRTP
1614 if( id->srtp )
1615 { /* FIXME: this is awfully inefficient */
1616 size_t len = out->i_buffer;
1617 out = block_Realloc( out, 0, len + 10 );
1618 out->i_buffer = len;
1620 int canc = vlc_savecancel ();
1621 int val = srtp_send( id->srtp, out->p_buffer, &len, len + 10 );
1622 vlc_restorecancel (canc);
1623 if( val )
1625 errno = val;
1626 msg_Dbg( id->p_stream, "SRTP sending error: %m" );
1627 block_Release( out );
1628 out = NULL;
1630 else
1631 out->i_buffer = len;
1633 if (out)
1634 #endif
1635 mwait (out->i_dts + i_caching);
1636 vlc_cleanup_pop ();
1637 if (out == NULL)
1638 continue;
1640 ssize_t len = out->i_buffer;
1641 int canc = vlc_savecancel ();
1643 vlc_mutex_lock( &id->lock_sink );
1644 unsigned deadc = 0; /* How many dead sockets? */
1645 int deadv[id->sinkc]; /* Dead sockets list */
1647 for( int i = 0; i < id->sinkc; i++ )
1649 #ifdef HAVE_SRTP
1650 if( !id->srtp ) /* FIXME: SRTCP support */
1651 #endif
1652 SendRTCP( id->sinkv[i].rtcp, out );
1654 if( send( id->sinkv[i].rtp_fd, out->p_buffer, len, 0 ) >= 0 )
1655 continue;
1656 switch( net_errno )
1658 /* Soft errors (e.g. ICMP): */
1659 case ECONNREFUSED: /* Port unreachable */
1660 case ENOPROTOOPT:
1661 #ifdef EPROTO
1662 case EPROTO: /* Protocol unreachable */
1663 #endif
1664 case EHOSTUNREACH: /* Host unreachable */
1665 case ENETUNREACH: /* Network unreachable */
1666 case ENETDOWN: /* Entire network down */
1667 send( id->sinkv[i].rtp_fd, out->p_buffer, len, 0 );
1668 /* Transient congestion: */
1669 case ENOMEM: /* out of socket buffers */
1670 case ENOBUFS:
1671 case EAGAIN:
1672 #if (EAGAIN != EWOULDBLOCK)
1673 case EWOULDBLOCK:
1674 #endif
1675 continue;
1678 deadv[deadc++] = id->sinkv[i].rtp_fd;
1680 id->i_seq_sent_next = ntohs(((uint16_t *) out->p_buffer)[1]) + 1;
1681 vlc_mutex_unlock( &id->lock_sink );
1682 block_Release( out );
1684 for( unsigned i = 0; i < deadc; i++ )
1686 msg_Dbg( id->p_stream, "removing socket %d", deadv[i] );
1687 rtp_del_sink( id, deadv[i] );
1689 vlc_restorecancel (canc);
1691 return NULL;
1695 /* This thread dequeues incoming connections (DCCP streaming) */
1696 static void *rtp_listen_thread( void *data )
1698 sout_stream_id_t *id = data;
1700 assert( id->listen.fd != NULL );
1702 for( ;; )
1704 int fd = net_Accept( id->p_stream, id->listen.fd );
1705 if( fd == -1 )
1706 continue;
1707 int canc = vlc_savecancel( );
1708 rtp_add_sink( id, fd, true, NULL );
1709 vlc_restorecancel( canc );
1712 assert( 0 );
1716 int rtp_add_sink( sout_stream_id_t *id, int fd, bool rtcp_mux, uint16_t *seq )
1718 rtp_sink_t sink = { fd, NULL };
1719 sink.rtcp = OpenRTCP( VLC_OBJECT( id->p_stream ), fd, IPPROTO_UDP,
1720 rtcp_mux );
1721 if( sink.rtcp == NULL )
1722 msg_Err( id->p_stream, "RTCP failed!" );
1724 vlc_mutex_lock( &id->lock_sink );
1725 INSERT_ELEM( id->sinkv, id->sinkc, id->sinkc, sink );
1726 if( seq != NULL )
1727 *seq = id->i_seq_sent_next;
1728 vlc_mutex_unlock( &id->lock_sink );
1729 return VLC_SUCCESS;
1732 void rtp_del_sink( sout_stream_id_t *id, int fd )
1734 rtp_sink_t sink = { fd, NULL };
1736 /* NOTE: must be safe to use if fd is not included */
1737 vlc_mutex_lock( &id->lock_sink );
1738 for( int i = 0; i < id->sinkc; i++ )
1740 if (id->sinkv[i].rtp_fd == fd)
1742 sink = id->sinkv[i];
1743 REMOVE_ELEM( id->sinkv, id->sinkc, i );
1744 break;
1747 vlc_mutex_unlock( &id->lock_sink );
1749 CloseRTCP( sink.rtcp );
1750 net_Close( sink.rtp_fd );
1753 uint16_t rtp_get_seq( sout_stream_id_t *id )
1755 /* This will return values for the next packet. */
1756 uint16_t seq;
1758 vlc_mutex_lock( &id->lock_sink );
1759 seq = id->i_seq_sent_next;
1760 vlc_mutex_unlock( &id->lock_sink );
1762 return seq;
1765 /* Return a timestamp corresponding to packets being sent now, and that
1766 * can be passed to rtp_compute_ts() to get rtptime values for each ES. */
1767 int64_t rtp_get_ts( const sout_stream_t *p_stream )
1769 sout_stream_sys_t *p_sys = p_stream->p_sys;
1770 mtime_t i_npt_zero;
1771 vlc_mutex_lock( &p_sys->lock_ts );
1772 i_npt_zero = p_sys->i_npt_zero;
1773 vlc_mutex_unlock( &p_sys->lock_ts );
1775 if( i_npt_zero == VLC_TS_INVALID )
1776 return p_sys->i_pts_zero;
1778 mtime_t now = mdate();
1779 if( now < i_npt_zero )
1780 return p_sys->i_pts_zero;
1782 return p_sys->i_pts_zero + (now - i_npt_zero);
1785 void rtp_packetize_common( sout_stream_id_t *id, block_t *out,
1786 int b_marker, int64_t i_pts )
1788 if( !id->b_ts_init )
1790 sout_stream_sys_t *p_sys = id->p_stream->p_sys;
1791 vlc_mutex_lock( &p_sys->lock_ts );
1792 if( p_sys->i_npt_zero == VLC_TS_INVALID )
1794 /* This is the first packet of any ES. We initialize the
1795 * NPT=0 time reference, and the offset to match the
1796 * arbitrary PTS reference. */
1797 p_sys->i_npt_zero = i_pts + id->i_caching;
1798 p_sys->i_pts_offset = p_sys->i_pts_zero - i_pts;
1800 vlc_mutex_unlock( &p_sys->lock_ts );
1802 /* And in any case this is the first packet of this ES, so we
1803 * initialize the offset for this ES. */
1804 id->i_ts_offset = rtp_compute_ts( id, p_sys->i_pts_offset );
1805 id->b_ts_init = true;
1808 uint32_t i_timestamp = rtp_compute_ts( id, i_pts ) + id->i_ts_offset;
1810 out->p_buffer[0] = 0x80;
1811 out->p_buffer[1] = (b_marker?0x80:0x00)|id->i_payload_type;
1812 out->p_buffer[2] = ( id->i_sequence >> 8)&0xff;
1813 out->p_buffer[3] = ( id->i_sequence )&0xff;
1814 out->p_buffer[4] = ( i_timestamp >> 24 )&0xff;
1815 out->p_buffer[5] = ( i_timestamp >> 16 )&0xff;
1816 out->p_buffer[6] = ( i_timestamp >> 8 )&0xff;
1817 out->p_buffer[7] = ( i_timestamp )&0xff;
1819 memcpy( out->p_buffer + 8, id->ssrc, 4 );
1821 out->i_buffer = 12;
1822 id->i_sequence++;
1825 void rtp_packetize_send( sout_stream_id_t *id, block_t *out )
1827 block_FifoPut( id->p_fifo, out );
1831 * @return configured max RTP payload size (including payload type-specific
1832 * headers, excluding RTP and transport headers)
1834 size_t rtp_mtu (const sout_stream_id_t *id)
1836 return id->i_mtu - 12;
1839 /*****************************************************************************
1840 * Non-RTP mux
1841 *****************************************************************************/
1843 /** Add an ES to a non-RTP muxed stream */
1844 static sout_stream_id_t *MuxAdd( sout_stream_t *p_stream, es_format_t *p_fmt )
1846 sout_input_t *p_input;
1847 sout_mux_t *p_mux = p_stream->p_sys->p_mux;
1848 assert( p_mux != NULL );
1850 p_input = sout_MuxAddStream( p_mux, p_fmt );
1851 if( p_input == NULL )
1853 msg_Err( p_stream, "cannot add this stream to the muxer" );
1854 return NULL;
1857 return (sout_stream_id_t *)p_input;
1861 static int MuxSend( sout_stream_t *p_stream, sout_stream_id_t *id,
1862 block_t *p_buffer )
1864 sout_mux_t *p_mux = p_stream->p_sys->p_mux;
1865 assert( p_mux != NULL );
1867 sout_MuxSendBuffer( p_mux, (sout_input_t *)id, p_buffer );
1868 return VLC_SUCCESS;
1872 /** Remove an ES from a non-RTP muxed stream */
1873 static int MuxDel( sout_stream_t *p_stream, sout_stream_id_t *id )
1875 sout_mux_t *p_mux = p_stream->p_sys->p_mux;
1876 assert( p_mux != NULL );
1878 sout_MuxDeleteStream( p_mux, (sout_input_t *)id );
1879 return VLC_SUCCESS;
1883 static ssize_t AccessOutGrabberWriteBuffer( sout_stream_t *p_stream,
1884 const block_t *p_buffer )
1886 sout_stream_sys_t *p_sys = p_stream->p_sys;
1887 sout_stream_id_t *id = p_sys->es[0];
1889 int64_t i_dts = p_buffer->i_dts;
1891 uint8_t *p_data = p_buffer->p_buffer;
1892 size_t i_data = p_buffer->i_buffer;
1893 size_t i_max = id->i_mtu - 12;
1895 size_t i_packet = ( p_buffer->i_buffer + i_max - 1 ) / i_max;
1897 while( i_data > 0 )
1899 size_t i_size;
1901 /* output complete packet */
1902 if( p_sys->packet &&
1903 p_sys->packet->i_buffer + i_data > i_max )
1905 rtp_packetize_send( id, p_sys->packet );
1906 p_sys->packet = NULL;
1909 if( p_sys->packet == NULL )
1911 /* allocate a new packet */
1912 p_sys->packet = block_New( p_stream, id->i_mtu );
1913 rtp_packetize_common( id, p_sys->packet, 1, i_dts );
1914 p_sys->packet->i_dts = i_dts;
1915 p_sys->packet->i_length = p_buffer->i_length / i_packet;
1916 i_dts += p_sys->packet->i_length;
1919 i_size = __MIN( i_data,
1920 (unsigned)(id->i_mtu - p_sys->packet->i_buffer) );
1922 memcpy( &p_sys->packet->p_buffer[p_sys->packet->i_buffer],
1923 p_data, i_size );
1925 p_sys->packet->i_buffer += i_size;
1926 p_data += i_size;
1927 i_data -= i_size;
1930 return VLC_SUCCESS;
1934 static ssize_t AccessOutGrabberWrite( sout_access_out_t *p_access,
1935 block_t *p_buffer )
1937 sout_stream_t *p_stream = (sout_stream_t*)p_access->p_sys;
1939 while( p_buffer )
1941 block_t *p_next;
1943 AccessOutGrabberWriteBuffer( p_stream, p_buffer );
1945 p_next = p_buffer->p_next;
1946 block_Release( p_buffer );
1947 p_buffer = p_next;
1950 return VLC_SUCCESS;
1954 static sout_access_out_t *GrabberCreate( sout_stream_t *p_stream )
1956 sout_access_out_t *p_grab;
1958 p_grab = vlc_object_create( p_stream->p_sout, sizeof( *p_grab ) );
1959 if( p_grab == NULL )
1960 return NULL;
1962 p_grab->p_module = NULL;
1963 p_grab->psz_access = strdup( "grab" );
1964 p_grab->p_cfg = NULL;
1965 p_grab->psz_path = strdup( "" );
1966 p_grab->p_sys = (sout_access_out_sys_t *)p_stream;
1967 p_grab->pf_seek = NULL;
1968 p_grab->pf_write = AccessOutGrabberWrite;
1969 vlc_object_attach( p_grab, p_stream );
1970 return p_grab;