1 /*****************************************************************************
2 * stream_output.c : stream output module
3 *****************************************************************************
4 * Copyright (C) 2002 VideoLAN
5 * $Id: stream_output.c,v 1.24 2003/04/13 20:00:21 fenrir Exp $
7 * Authors: Christophe Massiot <massiot@via.ecp.fr>
8 * Laurent Aimar <fenrir@via.ecp.fr>
9 * Eric Petit <titer@videolan.org>
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License as published by
13 * the Free Software Foundation; either version 2 of the License, or
14 * (at your option) any later version.
16 * This program is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
21 * You should have received a copy of the GNU General Public License
22 * along with this program; if not, write to the Free Software
23 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
24 *****************************************************************************/
26 /*****************************************************************************
28 *****************************************************************************/
29 #include <stdlib.h> /* free() */
30 #include <stdio.h> /* sprintf() */
31 #include <string.h> /* strerror() */
37 /*****************************************************************************
39 *****************************************************************************/
40 static char *sout_stream_chain_to_str( char * );
55 /* mrl_Parse: parse psz_mrl and fill p_mrl */
56 static int mrl_Parse( mrl_t *p_mrl, char *psz_mrl );
57 /* mrl_Clean: clean p_mrl after a call to mrl_Parse */
58 static void mrl_Clean( mrl_t *p_mrl );
60 #define FREE( p ) if( p ) { free( p ); (p) = NULL; }
62 /*****************************************************************************
63 * sout_NewInstance: creates a new stream output instance
64 *****************************************************************************/
65 sout_instance_t * __sout_NewInstance ( vlc_object_t *p_parent,
68 sout_instance_t *p_sout;
70 /* *** Allocate descriptor *** */
71 p_sout = vlc_object_create( p_parent, VLC_OBJECT_SOUT );
74 msg_Err( p_parent, "out of memory" );
78 /* *** init descriptor *** */
79 p_sout->psz_sout = strdup( psz_dest );
80 p_sout->i_preheader = 0;
83 vlc_mutex_init( p_sout, &p_sout->lock );
84 if( psz_dest && psz_dest[0] == '#' )
86 p_sout->psz_chain = strdup( &psz_dest[1] );
90 p_sout->psz_chain = sout_stream_chain_to_str( psz_dest );
93 p_sout->p_stream = sout_stream_new( p_sout, p_sout->psz_chain );
95 if( p_sout->p_stream == NULL )
97 msg_Err( p_sout, "stream chained failed for `%s'", p_sout->psz_chain );
99 FREE( p_sout->psz_sout );
100 FREE( p_sout->psz_chain );
102 vlc_object_destroy( p_sout );
106 vlc_object_attach( p_sout, p_parent );
110 /*****************************************************************************
111 * sout_DeleteInstance: delete a previously allocated instance
112 *****************************************************************************/
113 void sout_DeleteInstance( sout_instance_t * p_sout )
116 vlc_object_detach( p_sout );
118 /* *** free all string *** */
119 FREE( p_sout->psz_sout );
120 FREE( p_sout->psz_chain );
122 sout_stream_delete( p_sout->p_stream );
123 vlc_mutex_destroy( &p_sout->lock );
125 /* *** free structure *** */
126 vlc_object_destroy( p_sout );
129 /*****************************************************************************
131 *****************************************************************************/
132 sout_packetizer_input_t *__sout_InputNew( vlc_object_t *p_this,
133 sout_format_t *p_fmt )
135 sout_instance_t *p_sout = NULL;
136 sout_packetizer_input_t *p_input;
140 /* search an stream output */
141 for( i_try = 0; i_try < 12; i_try++ )
143 p_sout = vlc_object_find( p_this, VLC_OBJECT_SOUT, FIND_ANYWHERE );
150 msg_Dbg( p_this, "waiting for sout" );
155 msg_Err( p_this, "cannot find any stream ouput" );
159 msg_Dbg( p_sout, "adding a new input" );
161 /* *** create a packetizer input *** */
162 p_input = malloc( sizeof( sout_packetizer_input_t ) );
163 p_input->p_sout = p_sout;
164 p_input->p_fmt = p_fmt;
166 if( p_fmt->i_fourcc == VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
168 vlc_object_release( p_sout );
172 /* *** add it to the stream chain */
173 vlc_mutex_lock( &p_sout->lock );
174 p_input->id = p_sout->p_stream->pf_add( p_sout->p_stream,
176 vlc_mutex_unlock( &p_sout->lock );
178 vlc_object_release( p_sout );
180 if( p_input->id == NULL )
190 int sout_InputDelete( sout_packetizer_input_t *p_input )
192 sout_instance_t *p_sout = p_input->p_sout;
194 msg_Dbg( p_sout, "removing an input" );
196 if( p_input->p_fmt->i_fourcc != VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
198 vlc_mutex_lock( &p_sout->lock );
199 p_sout->p_stream->pf_del( p_sout->p_stream, p_input->id );
200 vlc_mutex_unlock( &p_sout->lock );
205 return( VLC_SUCCESS);
209 int sout_InputSendBuffer( sout_packetizer_input_t *p_input, sout_buffer_t *p_buffer )
211 sout_instance_t *p_sout = p_input->p_sout;
213 if( p_input->p_fmt->i_fourcc == VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
215 sout_BufferDelete( p_input->p_sout, p_buffer );
220 return( p_sout->p_stream->pf_send( p_sout->p_stream, p_input->id, p_buffer ) );
223 /*****************************************************************************
224 * sout_AccessOutNew: allocate a new access out
225 *****************************************************************************/
226 sout_access_out_t *sout_AccessOutNew( sout_instance_t *p_sout,
227 char *psz_access, char *psz_name )
229 sout_access_out_t *p_access;
231 if( !( p_access = vlc_object_create( p_sout,
232 sizeof( sout_access_out_t ) ) ) )
234 msg_Err( p_sout, "out of memory" );
237 p_access->psz_access = strdup( psz_access ? psz_access : "" );
238 p_access->psz_name = strdup( psz_name ? psz_name : "" );
239 p_access->p_sout = p_sout;
240 p_access->p_sys = NULL;
241 p_access->pf_seek = NULL;
242 p_access->pf_write = NULL;
244 p_access->p_module = module_Need( p_access,
246 p_access->psz_access );;
248 if( !p_access->p_module )
250 free( p_access->psz_access );
251 free( p_access->psz_name );
252 vlc_object_destroy( p_access );
258 /*****************************************************************************
259 * sout_AccessDelete: delete an access out
260 *****************************************************************************/
261 void sout_AccessOutDelete( sout_access_out_t *p_access )
263 if( p_access->p_module )
265 module_Unneed( p_access, p_access->p_module );
267 free( p_access->psz_access );
268 free( p_access->psz_name );
270 vlc_object_destroy( p_access );
273 /*****************************************************************************
275 *****************************************************************************/
276 int sout_AccessOutSeek( sout_access_out_t *p_access, off_t i_pos )
278 return( p_access->pf_seek( p_access, i_pos ) );
281 /*****************************************************************************
283 *****************************************************************************/
284 int sout_AccessOutWrite( sout_access_out_t *p_access, sout_buffer_t *p_buffer )
286 return( p_access->pf_write( p_access, p_buffer ) );
290 /*****************************************************************************
291 * MuxNew: allocate a new mux
292 *****************************************************************************/
293 sout_mux_t * sout_MuxNew ( sout_instance_t *p_sout,
295 sout_access_out_t *p_access )
299 p_mux = vlc_object_create( p_sout,
300 sizeof( sout_mux_t ) );
303 msg_Err( p_sout, "out of memory" );
307 p_mux->p_sout = p_sout;
308 p_mux->psz_mux = strdup( psz_mux);
309 p_mux->p_access = p_access;
310 p_mux->i_preheader = 0;
311 p_mux->pf_capacity = NULL;
312 p_mux->pf_addstream = NULL;
313 p_mux->pf_delstream = NULL;
314 p_mux->pf_mux = NULL;
315 p_mux->i_nb_inputs = 0;
316 p_mux->pp_inputs = NULL;
320 p_mux->p_module = module_Need( p_mux,
323 if( p_mux->p_module == NULL )
325 FREE( p_mux->psz_mux );
327 vlc_object_destroy( p_mux );
331 /* *** probe mux capacity *** */
332 if( p_mux->pf_capacity )
335 if( p_mux->pf_capacity( p_mux,
336 SOUT_MUX_CAP_GET_ADD_STREAM_ANY_TIME,
337 NULL, (void*)&b_answer ) != SOUT_MUX_CAP_ERR_OK )
339 b_answer = VLC_FALSE;
343 msg_Dbg( p_sout, "muxer support adding stream at any time" );
344 p_mux->b_add_stream_any_time = VLC_TRUE;
345 p_mux->b_waiting_stream = VLC_FALSE;
349 p_mux->b_add_stream_any_time = VLC_FALSE;
350 p_mux->b_waiting_stream = VLC_TRUE;
355 p_mux->b_add_stream_any_time = VLC_FALSE;
356 p_mux->b_waiting_stream = VLC_TRUE;
358 p_mux->i_add_stream_start = -1;
363 void sout_MuxDelete ( sout_mux_t *p_mux )
365 if( p_mux->p_module )
367 module_Unneed( p_mux, p_mux->p_module );
369 free( p_mux->psz_mux );
371 vlc_object_destroy( p_mux );
374 sout_input_t *sout_MuxAddStream( sout_mux_t *p_mux,
375 sout_format_t *p_fmt )
377 sout_input_t *p_input;
379 if( !p_mux->b_add_stream_any_time && !p_mux->b_waiting_stream)
381 msg_Err( p_mux, "cannot add a new stream (unsuported while muxing for this format)" );
384 if( p_mux->i_add_stream_start < 0 )
386 /* we wait for one second */
387 p_mux->i_add_stream_start = mdate();
390 msg_Dbg( p_mux, "adding a new input" );
392 /* create a new sout input */
393 p_input = malloc( sizeof( sout_input_t ) );
394 p_input->p_sout = p_mux->p_sout;
395 p_input->p_fmt = p_fmt;
396 p_input->p_fifo = sout_FifoCreate( p_mux->p_sout );
397 p_input->p_sys = NULL;
399 TAB_APPEND( p_mux->i_nb_inputs, p_mux->pp_inputs, p_input );
400 if( p_mux->pf_addstream( p_mux, p_input ) < 0 )
402 msg_Err( p_mux, "cannot add this stream" );
403 sout_MuxDeleteStream( p_mux, p_input );
410 void sout_MuxDeleteStream ( sout_mux_t *p_mux,
411 sout_input_t *p_input )
415 TAB_FIND( p_mux->i_nb_inputs, p_mux->pp_inputs, p_input, i_index );
418 if( p_mux->pf_delstream( p_mux, p_input ) < 0 )
420 msg_Err( p_mux, "cannot del this stream from mux" );
423 /* remove the entry */
424 TAB_REMOVE( p_mux->i_nb_inputs, p_mux->pp_inputs, p_input );
426 if( p_mux->i_nb_inputs == 0 )
428 msg_Warn( p_mux, "no more input stream for this mux" );
431 sout_FifoDestroy( p_mux->p_sout, p_input->p_fifo );
436 void sout_MuxSendBuffer ( sout_mux_t *p_mux,
437 sout_input_t *p_input,
438 sout_buffer_t *p_buffer )
440 sout_FifoPut( p_input->p_fifo, p_buffer );
442 if( p_mux->b_waiting_stream )
444 if( p_mux->i_add_stream_start > 0 &&
445 p_mux->i_add_stream_start + (mtime_t)1500000 < mdate() )
447 /* more than 1.5 second, start muxing */
448 p_mux->b_waiting_stream = VLC_FALSE;
455 p_mux->pf_mux( p_mux );
460 sout_fifo_t *sout_FifoCreate( sout_instance_t *p_sout )
464 if( !( p_fifo = malloc( sizeof( sout_fifo_t ) ) ) )
469 vlc_mutex_init( p_sout, &p_fifo->lock );
470 vlc_cond_init ( p_sout, &p_fifo->wait );
472 p_fifo->p_first = NULL;
473 p_fifo->pp_last = &p_fifo->p_first;
478 void sout_FifoFree( sout_instance_t *p_sout, sout_fifo_t *p_fifo )
480 sout_buffer_t *p_buffer;
482 vlc_mutex_lock( &p_fifo->lock );
483 p_buffer = p_fifo->p_first;
486 sout_buffer_t *p_next;
487 p_next = p_buffer->p_next;
488 sout_BufferDelete( p_sout, p_buffer );
491 vlc_mutex_unlock( &p_fifo->lock );
495 void sout_FifoDestroy( sout_instance_t *p_sout, sout_fifo_t *p_fifo )
497 sout_FifoFree( p_sout, p_fifo );
498 vlc_mutex_destroy( &p_fifo->lock );
499 vlc_cond_destroy ( &p_fifo->wait );
504 void sout_FifoPut( sout_fifo_t *p_fifo, sout_buffer_t *p_buffer )
506 vlc_mutex_lock( &p_fifo->lock );
510 *p_fifo->pp_last = p_buffer;
511 p_fifo->pp_last = &p_buffer->p_next;
514 p_buffer = p_buffer->p_next;
518 /* warm there is data in this fifo */
519 vlc_cond_signal( &p_fifo->wait );
520 vlc_mutex_unlock( &p_fifo->lock );
523 sout_buffer_t *sout_FifoGet( sout_fifo_t *p_fifo )
525 sout_buffer_t *p_buffer;
527 vlc_mutex_lock( &p_fifo->lock );
529 if( p_fifo->p_first == NULL )
531 vlc_cond_wait( &p_fifo->wait, &p_fifo->lock );
534 p_buffer = p_fifo->p_first;
536 p_fifo->p_first = p_buffer->p_next;
539 if( p_fifo->p_first == NULL )
541 p_fifo->pp_last = &p_fifo->p_first;
544 vlc_mutex_unlock( &p_fifo->lock );
546 p_buffer->p_next = NULL;
550 sout_buffer_t *sout_FifoShow( sout_fifo_t *p_fifo )
552 sout_buffer_t *p_buffer;
554 vlc_mutex_lock( &p_fifo->lock );
556 if( p_fifo->p_first == NULL )
558 vlc_cond_wait( &p_fifo->wait, &p_fifo->lock );
561 p_buffer = p_fifo->p_first;
563 vlc_mutex_unlock( &p_fifo->lock );
568 sout_buffer_t *sout_BufferNew( sout_instance_t *p_sout, size_t i_size )
570 sout_buffer_t *p_buffer;
574 msg_Dbg( p_sout, "allocating an new buffer, size:%d", (uint32_t)i_size );
577 p_buffer = malloc( sizeof( sout_buffer_t ) );
578 i_preheader = p_sout->i_preheader;
582 p_buffer->p_allocated_buffer = malloc( i_size + i_preheader );
583 p_buffer->p_buffer = p_buffer->p_allocated_buffer + i_preheader;
587 p_buffer->p_allocated_buffer = NULL;
588 p_buffer->p_buffer = NULL;
590 p_buffer->i_allocated_size = i_size + i_preheader;
591 p_buffer->i_buffer_size = i_size;
593 p_buffer->i_size = i_size;
594 p_buffer->i_length = 0;
597 p_buffer->i_bitrate = 0;
598 p_buffer->i_flags = 0x0000;
599 p_buffer->p_next = NULL;
603 int sout_BufferRealloc( sout_instance_t *p_sout, sout_buffer_t *p_buffer, size_t i_size )
609 "realloc buffer old size:%d new size:%d",
610 (uint32_t)p_buffer->i_allocated_size,
614 i_preheader = p_buffer->p_buffer - p_buffer->p_allocated_buffer;
616 if( !( p_buffer->p_allocated_buffer = realloc( p_buffer->p_allocated_buffer, i_size + i_preheader ) ) )
618 msg_Err( p_sout, "realloc failed" );
619 p_buffer->i_allocated_size = 0;
620 p_buffer->i_buffer_size = 0;
621 p_buffer->i_size = 0;
622 p_buffer->p_buffer = NULL;
625 p_buffer->p_buffer = p_buffer->p_allocated_buffer + i_preheader;
627 p_buffer->i_allocated_size = i_size + i_preheader;
628 p_buffer->i_buffer_size = i_size;
633 int sout_BufferReallocFromPreHeader( sout_instance_t *p_sout, sout_buffer_t *p_buffer, size_t i_size )
637 i_preheader = p_buffer->p_buffer - p_buffer->p_allocated_buffer;
639 if( i_preheader < i_size )
644 p_buffer->p_buffer -= i_size;
645 p_buffer->i_size += i_size;
646 p_buffer->i_buffer_size += i_size;
651 int sout_BufferDelete( sout_instance_t *p_sout, sout_buffer_t *p_buffer )
654 msg_Dbg( p_sout, "freeing buffer, size:%d", p_buffer->i_size );
656 if( p_buffer->p_allocated_buffer )
658 free( p_buffer->p_allocated_buffer );
664 sout_buffer_t *sout_BufferDuplicate( sout_instance_t *p_sout,
665 sout_buffer_t *p_buffer )
667 sout_buffer_t *p_dup;
669 p_dup = sout_BufferNew( p_sout, p_buffer->i_size );
671 p_dup->i_bitrate= p_buffer->i_bitrate;
672 p_dup->i_dts = p_buffer->i_dts;
673 p_dup->i_pts = p_buffer->i_pts;
674 p_dup->i_length = p_buffer->i_length;
675 p_dup->i_flags = p_buffer->i_flags;
676 p_sout->p_vlc->pf_memcpy( p_dup->p_buffer, p_buffer->p_buffer, p_buffer->i_size );
681 void sout_BufferChain( sout_buffer_t **pp_chain,
682 sout_buffer_t *p_buffer )
684 if( *pp_chain == NULL )
686 *pp_chain = p_buffer;
688 else if( p_buffer != NULL )
690 sout_buffer_t *p = *pp_chain;
697 p->p_next = p_buffer;
701 static int mrl_Parse( mrl_t *p_mrl, char *psz_mrl )
703 char * psz_dup = strdup( psz_mrl );
704 char * psz_parser = psz_dup;
705 char * psz_access = "";
707 char * psz_name = "";
709 /* *** first parse psz_dest */
710 while( *psz_parser && *psz_parser != ':' )
712 if( *psz_parser == '{' )
714 while( *psz_parser && *psz_parser != '}' )
728 #if defined( WIN32 ) || defined( UNDER_CE )
729 if( psz_parser - psz_dup == 1 )
731 /* msg_Warn( p_sout, "drive letter %c: found in source string",
739 psz_access = psz_way = "";
744 *psz_parser++ = '\0';
746 /* let's skip '//' */
747 if( psz_parser[0] == '/' && psz_parser[1] == '/' )
752 psz_name = psz_parser ;
754 /* Come back to parse the access and mux plug-ins */
755 psz_parser = psz_dup;
762 else if( *psz_parser == '/' )
770 psz_access = psz_parser;
772 while( *psz_parser && *psz_parser != '/' )
774 if( *psz_parser == '{' )
776 while( *psz_parser && *psz_parser != '}' )
791 if( *psz_parser == '/' )
793 *psz_parser++ = '\0';
804 psz_way = psz_parser;
808 p_mrl->psz_access = strdup( psz_access );
809 p_mrl->psz_way = strdup( psz_way );
810 p_mrl->psz_name = strdup( psz_name );
813 return( VLC_SUCCESS );
817 /* mrl_Clean: clean p_mrl after a call to mrl_Parse */
818 static void mrl_Clean( mrl_t *p_mrl )
820 FREE( p_mrl->psz_access );
821 FREE( p_mrl->psz_way );
822 FREE( p_mrl->psz_name );
826 /****************************************************************************
827 ****************************************************************************
831 ****************************************************************************
832 ****************************************************************************/
834 /* create a complete chain */
836 module{option=*:option=*}[:module{option=*:...}]
839 static char *_strndup( char *str, int i_len )
843 p = malloc( i_len + 1 );
844 strncpy( p, str, i_len );
851 * parse module{options=str, option="str "}:
852 * return a pointer on the rest
853 * XXX: psz_chain is modified
855 #define SKIPSPACE( p ) { while( *p && ( *p == ' ' || *p == '\t' ) ) p++; }
856 /* go accross " " and { } */
857 static char *_get_chain_end( char *str )
865 if( *p == '{' || *p == '"' || *p == '\'')
891 else if( *p == '{' && c == '}' )
893 p = _get_chain_end( p );
901 else if( *p == '\0' || *p == ',' || *p == '}' || *p == ' ' || *p == '\t' )
912 char * sout_cfg_parser( char **ppsz_name, sout_cfg_t **pp_cfg, char *psz_chain )
914 sout_cfg_t *p_cfg = NULL;
922 while( *p && *p != '{' && *p != ':' && *p != ' ' && *p != '\t' )
932 *ppsz_name = _strndup( psz_chain, p - psz_chain );
934 //fprintf( stderr, "name=%s - rest=%s\n", *ppsz_name, p );
952 while( *p && *p != '=' && *p != ',' && *p != '}' && *p != ' ' && *p != '\t' )
957 //fprintf( stderr, "name=%s - rest=%s\n", psz_name, p );
960 fprintf( stderr, "invalid options (empty)" );
964 cfg.psz_name = _strndup( psz_name, p - psz_name );
981 end = strchr( p, '"' );
985 // fprintf( stderr, "##%s -- %s\n", p, end );
986 cfg.psz_value = _strndup( p, end - p );
991 cfg.psz_value = strdup( p );
999 while( *p && *p != ',' && *p != '}' && *p != ' ' && *p != '\t' )
1003 cfg.psz_value = _strndup( psz_value, p - psz_value );
1006 end = _get_chain_end( p );
1009 cfg.psz_value = NULL;
1013 if( *p == '\'' || *p =='"' || *p == '{' )
1020 cfg.psz_value = NULL;
1024 cfg.psz_value = _strndup( p, end - p );
1033 cfg.psz_value = NULL;
1039 p_cfg->p_next = malloc( sizeof( sout_cfg_t ) );
1040 memcpy( p_cfg->p_next, &cfg, sizeof( sout_cfg_t ) );
1042 p_cfg = p_cfg->p_next;
1046 p_cfg = malloc( sizeof( sout_cfg_t ) );
1047 memcpy( p_cfg, &cfg, sizeof( sout_cfg_t ) );
1068 return( strdup( p + 1 ) );
1079 * XXX name and p_cfg are used (-> do NOT free them)
1081 sout_stream_t *sout_stream_new( sout_instance_t *p_sout,
1084 sout_stream_t *p_stream;
1086 p_stream = vlc_object_create( p_sout, sizeof( sout_stream_t ) );
1090 msg_Err( p_sout, "out of memory" );
1094 p_stream->p_sout = p_sout;
1095 p_stream->p_sys = NULL;
1097 p_stream->psz_next = sout_cfg_parser( &p_stream->psz_name, &p_stream->p_cfg, psz_chain);
1098 msg_Dbg( p_sout, "stream=`%s'", p_stream->psz_name );
1100 p_stream->p_module =
1101 module_Need( p_stream, "sout stream", p_stream->psz_name );
1103 if( !p_stream->p_module )
1106 vlc_object_destroy( p_stream );
1113 void sout_stream_delete( sout_stream_t *p_stream )
1117 msg_Dbg( p_stream, "destroying chain... (name=%s)", p_stream->psz_name );
1118 module_Unneed( p_stream, p_stream->p_module );
1120 FREE( p_stream->psz_name );
1121 FREE( p_stream->psz_next );
1123 p_cfg = p_stream->p_cfg;
1124 while( p_cfg != NULL )
1128 p_next = p_cfg->p_next;
1130 FREE( p_cfg->psz_name );
1131 FREE( p_cfg->psz_value );
1137 msg_Dbg( p_stream, "destroying chain done" );
1138 vlc_object_destroy( p_stream );
1141 static char *sout_stream_chain_to_str( char *psz_url )
1146 mrl_Parse( &mrl, psz_url );
1148 psz_chain = malloc( 100 + strlen( mrl.psz_way ) + strlen( mrl.psz_access ) + strlen( mrl.psz_name ) );
1150 sprintf( psz_chain, "std{mux=%s,access=%s,url=\"%s\"", mrl.psz_way, mrl.psz_access, mrl.psz_name );
1152 return( psz_chain );