/*****************************************************************************
* stream_output.c : stream output module
*****************************************************************************
- * Copyright (C) 2002 VideoLAN
- * $Id: stream_output.c,v 1.11 2003/01/14 04:34:13 fenrir Exp $
+ * Copyright (C) 2002-2004 the VideoLAN team
+ * $Id$
*
* Authors: Christophe Massiot <massiot@via.ecp.fr>
* Laurent Aimar <fenrir@via.ecp.fr>
- * Erioc Petit <titer@videolan.org>
+ * Eric Petit <titer@videolan.org>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
#include <string.h> /* strerror() */
#include <vlc/vlc.h>
-
#include <vlc/sout.h>
+
+#include "vlc_meta.h"
+
#undef DEBUG_BUFFER
/*****************************************************************************
* Local prototypes
*****************************************************************************/
-static int InitInstance ( sout_instance_t * );
+static void sout_CfgDestroy( sout_cfg_t * );
+
+#define sout_stream_url_to_chain( p, s ) \
+ _sout_stream_url_to_chain( VLC_OBJECT(p), s )
+static char *_sout_stream_url_to_chain( vlc_object_t *, char * );
+
+/*
+ * Generic MRL parser
+ *
+ */
+
+typedef struct
+{
+ char *psz_access;
+ char *psz_way;
+ char *psz_name;
+} mrl_t;
+
+/* mrl_Parse: parse psz_mrl and fill p_mrl */
+static int mrl_Parse( mrl_t *p_mrl, char *psz_mrl );
+/* mrl_Clean: clean p_mrl after a call to mrl_Parse */
+static void mrl_Clean( mrl_t *p_mrl );
+
+#define FREE( p ) if( p ) { free( p ); (p) = NULL; }
/*****************************************************************************
* sout_NewInstance: creates a new stream output instance
*****************************************************************************/
-sout_instance_t * __sout_NewInstance ( vlc_object_t *p_parent,
- char * psz_dest )
+sout_instance_t *__sout_NewInstance( vlc_object_t *p_parent, char * psz_dest )
{
- sout_instance_t * p_sout;
+ sout_instance_t *p_sout;
+ vlc_value_t keep;
- /* Allocate descriptor */
+ if( var_Get( p_parent, "sout-keep", &keep ) < 0 )
+ {
+ msg_Warn( p_parent, "cannot get sout-keep value" );
+ keep.b_bool = VLC_FALSE;
+ }
+ if( keep.b_bool )
+ {
+ if( ( p_sout = vlc_object_find( p_parent, VLC_OBJECT_SOUT,
+ FIND_ANYWHERE ) ) != NULL )
+ {
+ if( !strcmp( p_sout->psz_sout, psz_dest ) )
+ {
+ msg_Dbg( p_parent, "sout keep : reusing sout" );
+ msg_Dbg( p_parent, "sout keep : you probably want to use "
+ "gather stream_out" );
+ vlc_object_detach( p_sout );
+ vlc_object_attach( p_sout, p_parent );
+ vlc_object_release( p_sout );
+ return p_sout;
+ }
+ else
+ {
+ msg_Dbg( p_parent, "sout keep : destroying unusable sout" );
+ vlc_object_release( p_sout );
+ sout_DeleteInstance( p_sout );
+ }
+ }
+ }
+ else if( !keep.b_bool )
+ {
+ while( ( p_sout = vlc_object_find( p_parent, VLC_OBJECT_SOUT,
+ FIND_PARENT ) ) != NULL )
+ {
+ msg_Dbg( p_parent, "sout keep : destroying old sout" );
+ vlc_object_release( p_sout );
+ sout_DeleteInstance( p_sout );
+ }
+ }
+
+ /* *** Allocate descriptor *** */
p_sout = vlc_object_create( p_parent, VLC_OBJECT_SOUT );
if( p_sout == NULL )
{
return NULL;
}
- p_sout->psz_dest = strdup( psz_dest );
+ /* *** init descriptor *** */
+ p_sout->psz_sout = strdup( psz_dest );
+ p_sout->p_meta = NULL;
+ p_sout->i_out_pace_nocontrol = 0;
+ p_sout->p_sys = NULL;
- if ( InitInstance( p_sout ) == -1 )
+ vlc_mutex_init( p_sout, &p_sout->lock );
+ if( psz_dest && psz_dest[0] == '#' )
{
- vlc_object_destroy( p_sout );
- return NULL;
+ p_sout->psz_chain = strdup( &psz_dest[1] );
+ }
+ else
+ {
+ p_sout->psz_chain = sout_stream_url_to_chain( p_sout, psz_dest );
+ msg_Dbg( p_sout, "using sout chain=`%s'", p_sout->psz_chain );
}
+ p_sout->p_stream = NULL;
+ /* attach it for inherit */
vlc_object_attach( p_sout, p_parent );
+ p_sout->p_stream = sout_StreamNew( p_sout, p_sout->psz_chain );
+
+ if( p_sout->p_stream == NULL )
+ {
+ msg_Err( p_sout, "stream chained failed for `%s'", p_sout->psz_chain );
+
+ FREE( p_sout->psz_sout );
+ FREE( p_sout->psz_chain );
+
+ vlc_object_detach( p_sout );
+ vlc_object_destroy( p_sout );
+ return NULL;
+ }
+
return p_sout;
}
-
/*****************************************************************************
- * InitInstance: opens appropriate modules
+ * sout_DeleteInstance: delete a previously allocated instance
*****************************************************************************/
-static int InitInstance( sout_instance_t * p_sout )
+void sout_DeleteInstance( sout_instance_t * p_sout )
{
- /* Parse dest string. Syntax : [[<access>][/<mux>]:][<dest>] */
- /* This code is identical to input.c:InitThread. FIXME : factorize it ? */
- char * psz_parser = p_sout->psz_dest;
-
- p_sout->psz_access = "";
- p_sout->psz_mux = "";
- p_sout->psz_name = "";
- p_sout->p_access = NULL;
- p_sout->p_mux = NULL;
- p_sout->i_access_preheader = 0;
- p_sout->i_mux_preheader = 0;
- p_sout->i_nb_inputs = 0;
- p_sout->pp_inputs = NULL;
- vlc_mutex_init( p_sout, &p_sout->lock );
+ /* Unlink object */
+ vlc_object_detach( p_sout );
- /* Skip the plug-in names */
- while( *psz_parser && *psz_parser != ':' )
- {
- psz_parser++;
- }
-#if defined( WIN32 ) || defined( UNDER_CE )
- if( psz_parser - p_sout->psz_dest == 1 )
- {
- msg_Warn( p_sout, "drive letter %c: found in source string",
- *p_sout->psz_dest ) ;
- psz_parser = "";
- }
-#endif
+ /* remove the stream out chain */
+ sout_StreamDelete( p_sout->p_stream );
- if( !*psz_parser )
+ /* *** free all string *** */
+ FREE( p_sout->psz_sout );
+ FREE( p_sout->psz_chain );
+
+ /* delete meta */
+ if( p_sout->p_meta )
{
- p_sout->psz_access = p_sout->psz_mux = "";
- p_sout->psz_name = p_sout->psz_dest;
+ vlc_meta_Delete( p_sout->p_meta );
}
- else
- {
- *psz_parser++ = '\0';
- /* let's skip '//' */
- if( psz_parser[0] == '/' && psz_parser[1] == '/' )
- {
- psz_parser += 2 ;
- }
+ vlc_mutex_destroy( &p_sout->lock );
- p_sout->psz_name = psz_parser ;
+ /* *** free structure *** */
+ vlc_object_destroy( p_sout );
+}
- /* Come back to parse the access and mux plug-ins */
- psz_parser = p_sout->psz_dest;
+/*****************************************************************************
+ * Packetizer/Input
+ *****************************************************************************/
+sout_packetizer_input_t *sout_InputNew( sout_instance_t *p_sout,
+ es_format_t *p_fmt )
+{
+ sout_packetizer_input_t *p_input;
- if( !*psz_parser )
- {
- /* No access */
- p_sout->psz_access = "";
- }
- else if( *psz_parser == '/' )
- {
- /* No access */
- p_sout->psz_access = "";
- psz_parser++;
- }
- else
- {
- p_sout->psz_access = psz_parser;
+ msg_Dbg( p_sout, "adding a new input" );
- while( *psz_parser && *psz_parser != '/' )
- {
- psz_parser++;
- }
+ /* *** create a packetizer input *** */
+ p_input = malloc( sizeof( sout_packetizer_input_t ) );
+ p_input->p_sout = p_sout;
+ p_input->p_fmt = p_fmt;
- if( *psz_parser == '/' )
- {
- *psz_parser++ = '\0';
- }
- }
+ if( p_fmt->i_codec == VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
+ {
+ vlc_object_release( p_sout );
+ return p_input;
+ }
- if( !*psz_parser )
- {
- /* No mux */
- p_sout->psz_mux = "";
- }
- else
- {
- p_sout->psz_mux = psz_parser;
- }
+ /* *** add it to the stream chain */
+ vlc_mutex_lock( &p_sout->lock );
+ p_input->id = p_sout->p_stream->pf_add( p_sout->p_stream, p_fmt );
+ vlc_mutex_unlock( &p_sout->lock );
+
+ if( p_input->id == NULL )
+ {
+ free( p_input );
+ return NULL;
}
- msg_Dbg( p_sout, "access `%s', mux `%s', name `%s'",
- p_sout->psz_access, p_sout->psz_mux, p_sout->psz_name );
+ return( p_input );
+}
+/*****************************************************************************
+ *
+ *****************************************************************************/
+int sout_InputDelete( sout_packetizer_input_t *p_input )
+{
+ sout_instance_t *p_sout = p_input->p_sout;
- /* Find and open appropriate access module */
- p_sout->p_access =
- module_Need( p_sout, "sout access", p_sout->psz_access );
+ msg_Dbg( p_sout, "removing an input" );
- if( p_sout->p_access == NULL )
+ if( p_input->p_fmt->i_codec != VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
{
- msg_Err( p_sout, "no suitable sout access module for `%s/%s://%s'",
- p_sout->psz_access, p_sout->psz_mux, p_sout->psz_name );
- return -1;
+ vlc_mutex_lock( &p_sout->lock );
+ p_sout->p_stream->pf_del( p_sout->p_stream, p_input->id );
+ vlc_mutex_unlock( &p_sout->lock );
}
- /* Find and open appropriate mux module */
- p_sout->p_mux =
- module_Need( p_sout, "sout mux", p_sout->psz_mux );
+ free( p_input );
- if( p_sout->p_mux == NULL )
+ return( VLC_SUCCESS);
+}
+
+/*****************************************************************************
+ *
+ *****************************************************************************/
+int sout_InputSendBuffer( sout_packetizer_input_t *p_input,
+ block_t *p_buffer )
+{
+ sout_instance_t *p_sout = p_input->p_sout;
+ int i_ret;
+
+ if( p_input->p_fmt->i_codec == VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
{
- msg_Err( p_sout, "no suitable mux module for `%s/%s://%s'",
- p_sout->psz_access, p_sout->psz_mux, p_sout->psz_name );
- module_Unneed( p_sout, p_sout->p_access );
- return -1;
+ block_Release( p_buffer );
+ return VLC_SUCCESS;
+ }
+ if( p_buffer->i_dts <= 0 )
+ {
+ msg_Warn( p_sout, "trying to send non-dated packet to stream output!");
+ block_Release( p_buffer );
+ return VLC_SUCCESS;
}
- p_sout->i_nb_inputs = 0;
- p_sout->pp_inputs = NULL;
+ vlc_mutex_lock( &p_sout->lock );
+ i_ret = p_sout->p_stream->pf_send( p_sout->p_stream,
+ p_input->id, p_buffer );
+ vlc_mutex_unlock( &p_sout->lock );
- return 0;
+ return i_ret;
}
-
/*****************************************************************************
- * sout_DeleteInstance: delete a previously allocated instance
+ * sout_AccessOutNew: allocate a new access out
*****************************************************************************/
-void sout_DeleteInstance( sout_instance_t * p_sout )
+sout_access_out_t *sout_AccessOutNew( sout_instance_t *p_sout,
+ char *psz_access, char *psz_name )
{
- /* Unlink object */
- vlc_object_detach( p_sout );
- if( p_sout->p_mux )
+ sout_access_out_t *p_access;
+ char *psz_next;
+
+ if( !( p_access = vlc_object_create( p_sout,
+ sizeof( sout_access_out_t ) ) ) )
{
- module_Unneed( p_sout, p_sout->p_mux );
+ msg_Err( p_sout, "out of memory" );
+ return NULL;
}
- if( p_sout->p_access )
+
+ psz_next = sout_CfgCreate( &p_access->psz_access, &p_access->p_cfg,
+ psz_access );
+ if( psz_next )
{
- module_Unneed( p_sout, p_sout->p_access );
+ free( psz_next );
+ }
+ p_access->psz_name = strdup( psz_name ? psz_name : "" );
+ p_access->p_sout = p_sout;
+ p_access->p_sys = NULL;
+ p_access->pf_seek = NULL;
+ p_access->pf_read = NULL;
+ p_access->pf_write = NULL;
+ p_access->p_module = NULL;
+ vlc_object_attach( p_access, p_sout );
+
+ p_access->p_module =
+ module_Need( p_access, "sout access", p_access->psz_access, VLC_TRUE );
+
+ if( !p_access->p_module )
+ {
+ free( p_access->psz_access );
+ free( p_access->psz_name );
+ vlc_object_detach( p_access );
+ vlc_object_destroy( p_access );
+ return( NULL );
}
- vlc_mutex_destroy( &p_sout->lock );
+ return p_access;
+}
+/*****************************************************************************
+ * sout_AccessDelete: delete an access out
+ *****************************************************************************/
+void sout_AccessOutDelete( sout_access_out_t *p_access )
+{
+ vlc_object_detach( p_access );
+ if( p_access->p_module )
+ {
+ module_Unneed( p_access, p_access->p_module );
+ }
+ free( p_access->psz_access );
- /* Free structure */
- vlc_object_destroy( p_sout );
+ sout_CfgDestroy( p_access->p_cfg );
+
+ free( p_access->psz_name );
+
+ vlc_object_destroy( p_access );
}
+/*****************************************************************************
+ * sout_AccessSeek:
+ *****************************************************************************/
+int sout_AccessOutSeek( sout_access_out_t *p_access, off_t i_pos )
+{
+ return p_access->pf_seek( p_access, i_pos );
+}
/*****************************************************************************
- *
+ * sout_AccessRead:
+ *****************************************************************************/
+int sout_AccessOutRead( sout_access_out_t *p_access, block_t *p_buffer )
+{
+ return( p_access->pf_read ?
+ p_access->pf_read( p_access, p_buffer ) : VLC_EGENERIC );
+}
+
+/*****************************************************************************
+ * sout_AccessWrite:
*****************************************************************************/
-sout_input_t *__sout_InputNew( vlc_object_t *p_this,
- sout_packet_format_t *p_format )
+int sout_AccessOutWrite( sout_access_out_t *p_access, block_t *p_buffer )
{
- sout_instance_t *p_sout = NULL;
- sout_input_t *p_input;
- int i_try;
+ return p_access->pf_write( p_access, p_buffer );
+}
- /* search an stream output */
- for( i_try = 0; i_try < 200; i_try++ )
+/*****************************************************************************
+ * sout_MuxNew: create a new mux
+ *****************************************************************************/
+sout_mux_t * sout_MuxNew( sout_instance_t *p_sout, char *psz_mux,
+ sout_access_out_t *p_access )
+{
+ sout_mux_t *p_mux;
+ char *psz_next;
+
+ p_mux = vlc_object_create( p_sout, sizeof( sout_mux_t ) );
+ if( p_mux == NULL )
{
- p_sout = vlc_object_find( p_this, VLC_OBJECT_SOUT, FIND_ANYWHERE );
- if( !p_sout )
+ msg_Err( p_sout, "out of memory" );
+ return NULL;
+ }
+
+ p_mux->p_sout = p_sout;
+ psz_next = sout_CfgCreate( &p_mux->psz_mux, &p_mux->p_cfg, psz_mux );
+ if( psz_next ) free( psz_next );
+
+ p_mux->p_access = p_access;
+ p_mux->pf_control = NULL;
+ p_mux->pf_addstream = NULL;
+ p_mux->pf_delstream = NULL;
+ p_mux->pf_mux = NULL;
+ p_mux->i_nb_inputs = 0;
+ p_mux->pp_inputs = NULL;
+
+ p_mux->p_sys = NULL;
+ p_mux->p_module = NULL;
+
+ p_mux->b_add_stream_any_time = VLC_FALSE;
+ p_mux->b_waiting_stream = VLC_TRUE;
+ p_mux->i_add_stream_start = -1;
+
+ vlc_object_attach( p_mux, p_sout );
+
+ p_mux->p_module =
+ module_Need( p_mux, "sout mux", p_mux->psz_mux, VLC_TRUE );
+
+ if( p_mux->p_module == NULL )
+ {
+ FREE( p_mux->psz_mux );
+
+ vlc_object_detach( p_mux );
+ vlc_object_destroy( p_mux );
+ return NULL;
+ }
+
+ /* *** probe mux capacity *** */
+ if( p_mux->pf_control )
+ {
+ int b_answer = VLC_FALSE;
+
+ if( sout_MuxControl( p_mux, MUX_CAN_ADD_STREAM_WHILE_MUXING,
+ &b_answer ) )
{
- msleep( 100*1000 );
- msg_Dbg( p_this, "waiting for sout" );
+ b_answer = VLC_FALSE;
}
- else
+
+ if( b_answer )
{
- break;
+ msg_Dbg( p_sout, "muxer support adding stream at any time" );
+ p_mux->b_add_stream_any_time = VLC_TRUE;
+ p_mux->b_waiting_stream = VLC_FALSE;
+
+ /* If we control the output pace then it's better to wait before
+ * starting muxing (generates better streams/files). */
+ if( !p_sout->i_out_pace_nocontrol )
+ {
+ b_answer = VLC_TRUE;
+ }
+ else if( sout_MuxControl( p_mux, MUX_GET_ADD_STREAM_WAIT,
+ &b_answer ) )
+ {
+ b_answer = VLC_FALSE;
+ }
+
+ if( b_answer )
+ {
+ msg_Dbg( p_sout, "muxer prefers waiting for all ES before "
+ "starting muxing" );
+ p_mux->b_waiting_stream = VLC_TRUE;
+ }
}
}
- if( !p_sout )
+ return p_mux;
+}
+
+/*****************************************************************************
+ * sout_MuxDelete:
+ *****************************************************************************/
+void sout_MuxDelete( sout_mux_t *p_mux )
+{
+ vlc_object_detach( p_mux );
+ if( p_mux->p_module )
{
- msg_Err( p_this, "cannot find any stream ouput" );
- return( NULL );
+ module_Unneed( p_mux, p_mux->p_module );
}
+ free( p_mux->psz_mux );
- msg_Dbg( p_sout, "adding a new input" );
+ sout_CfgDestroy( p_mux->p_cfg );
+
+ vlc_object_destroy( p_mux );
+}
+
+/*****************************************************************************
+ * sout_MuxAddStream:
+ *****************************************************************************/
+sout_input_t *sout_MuxAddStream( sout_mux_t *p_mux, es_format_t *p_fmt )
+{
+ sout_input_t *p_input;
+
+ if( !p_mux->b_add_stream_any_time && !p_mux->b_waiting_stream )
+ {
+ msg_Err( p_mux, "cannot add a new stream (unsupported while muxing "
+ "for this format)" );
+ return NULL;
+ }
+
+ msg_Dbg( p_mux, "adding a new input" );
/* create a new sout input */
p_input = malloc( sizeof( sout_input_t ) );
+ p_input->p_sout = p_mux->p_sout;
+ p_input->p_fmt = p_fmt;
+ p_input->p_fifo = block_FifoNew( p_mux->p_sout );
+ p_input->p_sys = NULL;
- p_input->p_sout = p_sout;
- vlc_mutex_init( p_sout, &p_input->lock );
- memcpy( &p_input->input_format,
- p_format,
- sizeof( sout_packet_format_t ) );
- p_input->p_fifo = sout_FifoCreate( p_sout );
- p_input->p_mux_data = NULL;
+ TAB_APPEND( p_mux->i_nb_inputs, p_mux->pp_inputs, p_input );
+ if( p_mux->pf_addstream( p_mux, p_input ) < 0 )
+ {
+ msg_Err( p_mux, "cannot add this stream" );
+ TAB_REMOVE( p_mux->i_nb_inputs, p_mux->pp_inputs, p_input );
+ block_FifoRelease( p_input->p_fifo );
+ free( p_input );
+ return NULL;
+ }
- if( p_input->input_format.i_fourcc != VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
+ return p_input;
+}
+
+/*****************************************************************************
+ * sout_MuxDeleteStream:
+ *****************************************************************************/
+void sout_MuxDeleteStream( sout_mux_t *p_mux, sout_input_t *p_input )
+{
+ int i_index;
+
+ if( p_mux->b_waiting_stream && p_input->p_fifo->i_depth > 0 )
{
- /* add this new one to p_sout */
- vlc_mutex_lock( &p_sout->lock );
- if( p_sout->i_nb_inputs == 0 )
- {
- p_sout->pp_inputs = malloc( sizeof( sout_input_t * ) );
- }
- else
- {
- p_sout->pp_inputs = realloc( p_sout->pp_inputs,
- sizeof( sout_input_t * ) *
- ( p_sout->i_nb_inputs + 1 ) );
- }
- p_sout->pp_inputs[p_sout->i_nb_inputs] = p_input;
- p_sout->i_nb_inputs++;
+ /* We stop waiting, and call the muxer for taking care of the data
+ * before we remove this es */
+ p_mux->b_waiting_stream = VLC_FALSE;
+ p_mux->pf_mux( p_mux );
+ }
- if( p_sout->pf_mux_addstream( p_sout, p_input ) < 0 )
+ TAB_FIND( p_mux->i_nb_inputs, p_mux->pp_inputs, p_input, i_index );
+ if( i_index >= 0 )
+ {
+ if( p_mux->pf_delstream( p_mux, p_input ) < 0 )
{
- msg_Err( p_sout, "cannot add this stream" );
+ msg_Err( p_mux, "cannot del this stream from mux" );
+ }
- vlc_mutex_unlock( &p_sout->lock );
- sout_InputDelete( p_input );
- vlc_mutex_lock( &p_sout->lock );
+ /* remove the entry */
+ TAB_REMOVE( p_mux->i_nb_inputs, p_mux->pp_inputs, p_input );
- p_input = NULL;
+ if( p_mux->i_nb_inputs == 0 )
+ {
+ msg_Warn( p_mux, "no more input stream for this mux" );
}
- vlc_mutex_unlock( &p_sout->lock );
- }
- vlc_object_release( p_sout );
-
- return( p_input );
+ block_FifoRelease( p_input->p_fifo );
+ free( p_input );
+ }
}
-
-int sout_InputDelete( sout_input_t *p_input )
+/*****************************************************************************
+ * sout_MuxSendBuffer:
+ *****************************************************************************/
+void sout_MuxSendBuffer( sout_mux_t *p_mux, sout_input_t *p_input,
+ block_t *p_buffer )
{
- sout_instance_t *p_sout = p_input->p_sout;
- int i_input;
+ block_FifoPut( p_input->p_fifo, p_buffer );
+ if( p_mux->p_sout->i_out_pace_nocontrol )
+ {
+ mtime_t current_date = mdate();
+ if ( current_date > p_buffer->i_dts )
+ msg_Warn( p_mux, "late buffer for mux input ("I64Fd")",
+ current_date - p_buffer->i_dts );
+ }
- msg_Dbg( p_sout, "removing an input" );
+ if( p_mux->b_waiting_stream )
+ {
+ if( p_mux->i_add_stream_start < 0 )
+ {
+ p_mux->i_add_stream_start = p_buffer->i_dts;
+ }
- vlc_mutex_lock( &p_sout->lock );
+ if( p_mux->i_add_stream_start >= 0 &&
+ p_mux->i_add_stream_start + I64C(1500000) < p_buffer->i_dts )
+ {
+ /* Wait until we have more than 1.5 seconds worth of data
+ * before start muxing */
+ p_mux->b_waiting_stream = VLC_FALSE;
+ }
+ else
+ {
+ return;
+ }
+ }
+ p_mux->pf_mux( p_mux );
+}
- sout_FifoDestroy( p_sout, p_input->p_fifo );
- vlc_mutex_destroy( &p_input->lock );
+/*****************************************************************************
+ *
+ *****************************************************************************/
+static int mrl_Parse( mrl_t *p_mrl, char *psz_mrl )
+{
+ char * psz_dup = strdup( psz_mrl );
+ char * psz_parser = psz_dup;
+ char * psz_access = "";
+ char * psz_way = "";
+ char * psz_name = "";
- for( i_input = 0; i_input < p_sout->i_nb_inputs; i_input++ )
+ /* *** first parse psz_dest */
+ while( *psz_parser && *psz_parser != ':' )
{
- if( p_sout->pp_inputs[i_input] == p_input )
+ if( *psz_parser == '{' )
+ {
+ while( *psz_parser && *psz_parser != '}' )
+ {
+ psz_parser++;
+ }
+ if( *psz_parser )
+ {
+ psz_parser++;
+ }
+ }
+ else
{
- break;
+ psz_parser++;
}
}
- if( i_input < p_sout->i_nb_inputs )
+#if defined( WIN32 ) || defined( UNDER_CE )
+ if( psz_parser - psz_dup == 1 )
+ {
+ /* msg_Warn( p_sout, "drive letter %c: found in source string",
+ *psz_dup ) ; */
+ psz_parser = "";
+ }
+#endif
+
+ if( !*psz_parser )
+ {
+ psz_access = psz_way = "";
+ psz_name = psz_dup;
+ }
+ else
{
- if( p_sout->pf_mux_delstream( p_sout, p_input ) < 0 )
+ *psz_parser++ = '\0';
+
+ /* let's skip '//' */
+ if( psz_parser[0] == '/' && psz_parser[1] == '/' )
{
- msg_Err( p_sout, "cannot del this stream from mux" );
+ psz_parser += 2 ;
}
- /* remove the entry */
- if( p_sout->i_nb_inputs > 1 )
+ psz_name = psz_parser ;
+
+ /* Come back to parse the access and mux plug-ins */
+ psz_parser = psz_dup;
+
+ if( !*psz_parser )
{
- memmove( &p_sout->pp_inputs[i_input],
- &p_sout->pp_inputs[i_input+1],
- (p_sout->i_nb_inputs - i_input - 1) * sizeof( sout_input_t*) );
+ /* No access */
+ psz_access = "";
+ }
+ else if( *psz_parser == '/' )
+ {
+ /* No access */
+ psz_access = "";
+ psz_parser++;
}
else
{
- free( p_sout->pp_inputs );
+ psz_access = psz_parser;
+
+ while( *psz_parser && *psz_parser != '/' )
+ {
+ if( *psz_parser == '{' )
+ {
+ while( *psz_parser && *psz_parser != '}' )
+ {
+ psz_parser++;
+ }
+ if( *psz_parser )
+ {
+ psz_parser++;
+ }
+ }
+ else
+ {
+ psz_parser++;
+ }
+ }
+
+ if( *psz_parser == '/' )
+ {
+ *psz_parser++ = '\0';
+ }
}
- p_sout->i_nb_inputs--;
- if( p_sout->i_nb_inputs == 0 )
+ if( !*psz_parser )
{
- msg_Warn( p_sout, "no more input stream" );
+ /* No mux */
+ psz_way = "";
+ }
+ else
+ {
+ psz_way = psz_parser;
}
- }
- else if( p_input->input_format.i_fourcc != VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
- {
- msg_Err( p_sout, "cannot find the input to be deleted" );
}
- free( p_input );
+ p_mrl->psz_access = strdup( psz_access );
+ p_mrl->psz_way = strdup( psz_way );
+ p_mrl->psz_name = strdup( psz_name );
+
+ free( psz_dup );
+ return( VLC_SUCCESS );
+}
- vlc_mutex_unlock( &p_sout->lock );
- return( 0 );
+/* mrl_Clean: clean p_mrl after a call to mrl_Parse */
+static void mrl_Clean( mrl_t *p_mrl )
+{
+ FREE( p_mrl->psz_access );
+ FREE( p_mrl->psz_way );
+ FREE( p_mrl->psz_name );
}
-int sout_InputSendBuffer( sout_input_t *p_input, sout_buffer_t *p_buffer )
+/****************************************************************************
+ ****************************************************************************
+ **
+ **
+ **
+ ****************************************************************************
+ ****************************************************************************/
+
+/* create a complete chain */
+/* chain format:
+ module{option=*:option=*}[:module{option=*:...}]
+ */
+
+/*
+ * parse module{options=str, option="str "}:
+ * return a pointer on the rest
+ * XXX: psz_chain is modified
+ */
+#define SKIPSPACE( p ) { while( *p && ( *p == ' ' || *p == '\t' ) ) p++; }
+#define SKIPTRAILINGSPACE( p, e ) \
+ { while( e > p && ( *(e-1) == ' ' || *(e-1) == '\t' ) ) e--; }
+
+/* go accross " " and { } */
+static char *_get_chain_end( char *str )
{
-/* msg_Dbg( p_input->p_sout,
- "send buffer, size:%d", p_buffer->i_size ); */
+ char c, *p = str;
+
+ SKIPSPACE( p );
- if( p_input->input_format.i_fourcc != VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
+ for( ;; )
{
- sout_FifoPut( p_input->p_fifo, p_buffer );
+ if( !*p || *p == ',' || *p == '}' ) return p;
- vlc_mutex_lock( &p_input->p_sout->lock );
- p_input->p_sout->pf_mux( p_input->p_sout );
- vlc_mutex_unlock( &p_input->p_sout->lock );
+ if( *p != '{' && *p != '"' && *p != '\'' )
+ {
+ p++;
+ continue;
+ }
- }
- else
- {
- sout_BufferDelete( p_input->p_sout, p_buffer );
- }
+ if( *p == '{' ) c = '}';
+ else c = *p;
+ p++;
+
+ for( ;; )
+ {
+ if( !*p ) return p;
- return( 0 );
+ if( *p == c ) return ++p;
+ else if( *p == '{' && c == '}' ) p = _get_chain_end( p );
+ else p++;
+ }
+ }
}
-sout_fifo_t *sout_FifoCreate( sout_instance_t *p_sout )
+char *sout_CfgCreate( char **ppsz_name, sout_cfg_t **pp_cfg, char *psz_chain )
{
- sout_fifo_t *p_fifo;
+ sout_cfg_t *p_cfg = NULL;
+ char *p = psz_chain;
- if( !( p_fifo = malloc( sizeof( sout_fifo_t ) ) ) )
- {
- return( NULL );
- }
+ *ppsz_name = NULL;
+ *pp_cfg = NULL;
- vlc_mutex_init( p_sout, &p_fifo->lock );
- vlc_cond_init ( p_sout, &p_fifo->wait );
- p_fifo->i_depth = 0;
- p_fifo->p_first = NULL;
- p_fifo->pp_last = &p_fifo->p_first;
+ if( !p ) return NULL;
- return( p_fifo );
-}
+ SKIPSPACE( p );
-void sout_FifoFree( sout_instance_t *p_sout, sout_fifo_t *p_fifo )
-{
- sout_buffer_t *p_buffer;
+ while( *p && *p != '{' && *p != ':' && *p != ' ' && *p != '\t' ) p++;
+
+ if( p == psz_chain ) return NULL;
+
+ *ppsz_name = strndup( psz_chain, p - psz_chain );
+
+ SKIPSPACE( p );
- vlc_mutex_lock( &p_fifo->lock );
- p_buffer = p_fifo->p_first;
- while( p_buffer )
+ if( *p == '{' )
{
- sout_buffer_t *p_next;
- p_next = p_buffer->p_next;
- sout_BufferDelete( p_sout, p_buffer );
- p_buffer = p_next;
- }
- vlc_mutex_unlock( &p_fifo->lock );
+ char *psz_name;
- return;
-}
-void sout_FifoDestroy( sout_instance_t *p_sout, sout_fifo_t *p_fifo )
-{
- sout_FifoFree( p_sout, p_fifo );
- vlc_mutex_destroy( &p_fifo->lock );
- vlc_cond_destroy ( &p_fifo->wait );
+ p++;
- free( p_fifo );
-}
+ for( ;; )
+ {
+ sout_cfg_t cfg;
-void sout_FifoPut( sout_fifo_t *p_fifo, sout_buffer_t *p_buffer )
-{
- vlc_mutex_lock( &p_fifo->lock );
+ SKIPSPACE( p );
- do
- {
- *p_fifo->pp_last = p_buffer;
- p_fifo->pp_last = &p_buffer->p_next;
- p_fifo->i_depth++;
+ psz_name = p;
- p_buffer = p_buffer->p_next;
+ while( *p && *p != '=' && *p != ',' && *p != '{' && *p != '}' &&
+ *p != ' ' && *p != '\t' ) p++;
- } while( p_buffer );
+ /* fprintf( stderr, "name=%s - rest=%s\n", psz_name, p ); */
+ if( p == psz_name )
+ {
+ fprintf( stderr, "invalid options (empty)" );
+ break;
+ }
- /* warm there is data in this fifo */
- vlc_cond_signal( &p_fifo->wait );
- vlc_mutex_unlock( &p_fifo->lock );
-}
+ cfg.psz_name = strndup( psz_name, p - psz_name );
-sout_buffer_t *sout_FifoGet( sout_fifo_t *p_fifo )
-{
- sout_buffer_t *p_buffer;
+ SKIPSPACE( p );
- vlc_mutex_lock( &p_fifo->lock );
+ if( *p == '=' || *p == '{' )
+ {
+ char *end;
+ vlc_bool_t b_keep_brackets = (*p == '{');
+
+ if( *p == '=' ) p++;
+
+ end = _get_chain_end( p );
+ if( end <= p )
+ {
+ cfg.psz_value = NULL;
+ }
+ else
+ {
+ /* Skip heading and trailing spaces.
+ * This ain't necessary but will avoid simple
+ * user mistakes. */
+ SKIPSPACE( p );
+ }
+
+ if( end <= p )
+ {
+ cfg.psz_value = NULL;
+ }
+ else
+ {
+ if( *p == '\'' || *p == '"' ||
+ ( !b_keep_brackets && *p == '{' ) )
+ {
+ p++;
+
+ if( *(end-1) != '\'' && *(end-1) == '"' )
+ SKIPTRAILINGSPACE( p, end );
+
+ if( end - 1 <= p ) cfg.psz_value = NULL;
+ else cfg.psz_value = strndup( p, end -1 - p );
+ }
+ else
+ {
+ SKIPTRAILINGSPACE( p, end );
+ if( end <= p ) cfg.psz_value = NULL;
+ else cfg.psz_value = strndup( p, end - p );
+ }
+ }
+
+ p = end;
+ SKIPSPACE( p );
+ }
+ else
+ {
+ cfg.psz_value = NULL;
+ }
- if( p_fifo->p_first == NULL )
- {
- vlc_cond_wait( &p_fifo->wait, &p_fifo->lock );
- }
+ cfg.p_next = NULL;
+ if( p_cfg )
+ {
+ p_cfg->p_next = malloc( sizeof( sout_cfg_t ) );
+ memcpy( p_cfg->p_next, &cfg, sizeof( sout_cfg_t ) );
- p_buffer = p_fifo->p_first;
+ p_cfg = p_cfg->p_next;
+ }
+ else
+ {
+ p_cfg = malloc( sizeof( sout_cfg_t ) );
+ memcpy( p_cfg, &cfg, sizeof( sout_cfg_t ) );
- p_fifo->p_first = p_buffer->p_next;
- p_fifo->i_depth--;
+ *pp_cfg = p_cfg;
+ }
- if( p_fifo->p_first == NULL )
- {
- p_fifo->pp_last = &p_fifo->p_first;
+ if( *p == ',' ) p++;
+
+ if( *p == '}' )
+ {
+ p++;
+ break;
+ }
+ }
}
- vlc_mutex_unlock( &p_fifo->lock );
+ if( *p == ':' ) return( strdup( p + 1 ) );
- p_buffer->p_next = NULL;
- return( p_buffer );
+ return NULL;
}
-sout_buffer_t *sout_FifoShow( sout_fifo_t *p_fifo )
+static void sout_CfgDestroy( sout_cfg_t *p_cfg )
{
- sout_buffer_t *p_buffer;
-
- vlc_mutex_lock( &p_fifo->lock );
-
- if( p_fifo->p_first == NULL )
+ while( p_cfg != NULL )
{
- vlc_cond_wait( &p_fifo->wait, &p_fifo->lock );
- }
+ sout_cfg_t *p_next;
- p_buffer = p_fifo->p_first;
+ p_next = p_cfg->p_next;
- vlc_mutex_unlock( &p_fifo->lock );
+ FREE( p_cfg->psz_name );
+ FREE( p_cfg->psz_value );
+ free( p_cfg );
- return( p_buffer );
+ p_cfg = p_next;
+ }
}
-sout_buffer_t *sout_BufferNew( sout_instance_t *p_sout, size_t i_size )
+void __sout_CfgParse( vlc_object_t *p_this, char *psz_prefix,
+ const char **ppsz_options, sout_cfg_t *cfg )
{
- sout_buffer_t *p_buffer;
- size_t i_prehader;
+ char *psz_name;
+ int i_type;
+ int i;
-#ifdef DEBUG_BUFFER
- msg_Dbg( p_sout, "allocating an new buffer, size:%d", (uint32_t)i_size );
-#endif
+ /* First, var_Create all variables */
+ for( i = 0; ppsz_options[i] != NULL; i++ )
+ {
+ asprintf( &psz_name, "%s%s", psz_prefix,
+ *ppsz_options[i] == '*' ? &ppsz_options[i][1] : ppsz_options[i] );
- p_buffer = malloc( sizeof( sout_buffer_t ) );
- i_prehader = p_sout->i_access_preheader + p_sout->i_mux_preheader;
+ i_type = config_GetType( p_this, psz_name );
- if( i_size > 0 )
- {
- p_buffer->p_allocated_buffer = malloc( i_size + i_prehader );
- p_buffer->p_buffer = p_buffer->p_allocated_buffer + i_prehader;
+ var_Create( p_this, psz_name, i_type | VLC_VAR_DOINHERIT );
+ free( psz_name );
}
- else
+
+ /* Now parse options and set value */
+ if( psz_prefix == NULL ) psz_prefix = "";
+
+ while( cfg )
{
- p_buffer->p_allocated_buffer = NULL;
- p_buffer->p_buffer = NULL;
- }
- p_buffer->i_allocated_size = i_size + i_prehader;
- p_buffer->i_buffer_size = i_size;
+ vlc_value_t val;
+ vlc_bool_t b_yes = VLC_TRUE;
+ vlc_bool_t b_once = VLC_FALSE;
- p_buffer->i_size = i_size;
- p_buffer->i_length = 0;
- p_buffer->i_dts = 0;
- p_buffer->i_pts = 0;
- p_buffer->i_bitrate = 0;
- p_buffer->p_next = NULL;
+ if( cfg->psz_name == NULL || *cfg->psz_name == '\0' )
+ {
+ cfg = cfg->p_next;
+ continue;
+ }
+ for( i = 0; ppsz_options[i] != NULL; i++ )
+ {
+ if( !strcmp( ppsz_options[i], cfg->psz_name ) )
+ {
+ break;
+ }
+ if( ( !strncmp( cfg->psz_name, "no-", 3 ) &&
+ !strcmp( ppsz_options[i], cfg->psz_name + 3 ) ) ||
+ ( !strncmp( cfg->psz_name, "no", 2 ) &&
+ !strcmp( ppsz_options[i], cfg->psz_name + 2 ) ) )
+ {
+ b_yes = VLC_FALSE;
+ break;
+ }
- return( p_buffer );
-}
-int sout_BufferRealloc( sout_instance_t *p_sout, sout_buffer_t *p_buffer, size_t i_size )
-{
- size_t i_prehader;
+ if( *ppsz_options[i] == '*' &&
+ !strcmp( &ppsz_options[i][1], cfg->psz_name ) )
+ {
+ b_once = VLC_TRUE;
+ break;
+ }
-#ifdef DEBUG_BUFFER
- msg_Dbg( p_sout,
- "realloc buffer old size:%d new size:%d",
- (uint32_t)p_buffer->i_allocated_size,
- (uint32_t)i_size );
-#endif
+ }
+ if( ppsz_options[i] == NULL )
+ {
+ msg_Warn( p_this, "option %s is unknown", cfg->psz_name );
+ cfg = cfg->p_next;
+ continue;
+ }
- i_prehader = p_buffer->p_buffer - p_buffer->p_allocated_buffer;
+ /* create name */
+ asprintf( &psz_name, "%s%s", psz_prefix, b_once ? &ppsz_options[i][1] : ppsz_options[i] );
- if( !( p_buffer->p_allocated_buffer = realloc( p_buffer->p_allocated_buffer, i_size + i_prehader ) ) )
- {
- msg_Err( p_sout, "realloc failed" );
- p_buffer->i_allocated_size = 0;
- p_buffer->i_buffer_size = 0;
- p_buffer->i_size = 0;
- p_buffer->p_buffer = NULL;
- return( -1 );
- }
- p_buffer->p_buffer = p_buffer->p_allocated_buffer + i_prehader;
+ /* get the type of the variable */
+ i_type = config_GetType( p_this, psz_name );
+ if( !i_type )
+ {
+ msg_Warn( p_this, "unknown option %s (value=%s)",
+ cfg->psz_name, cfg->psz_value );
+ goto next;
+ }
+ if( i_type != VLC_VAR_BOOL && cfg->psz_value == NULL )
+ {
+ msg_Warn( p_this, "missing value for option %s", cfg->psz_name );
+ goto next;
+ }
+ if( i_type != VLC_VAR_STRING && b_once )
+ {
+ msg_Warn( p_this, "*option_name need to be a string option" );
+ goto next;
+ }
+
+ switch( i_type )
+ {
+ case VLC_VAR_BOOL:
+ val.b_bool = b_yes;
+ break;
+ case VLC_VAR_INTEGER:
+ val.i_int = strtol( cfg->psz_value ? cfg->psz_value : "0",
+ NULL, 0 );
+ break;
+ case VLC_VAR_FLOAT:
+ val.f_float = atof( cfg->psz_value ? cfg->psz_value : "0" );
+ break;
+ case VLC_VAR_STRING:
+ case VLC_VAR_MODULE:
+ val.psz_string = cfg->psz_value;
+ break;
+ default:
+ msg_Warn( p_this, "unhandled config var type" );
+ memset( &val, 0, sizeof( vlc_value_t ) );
+ break;
+ }
+ if( b_once )
+ {
+ vlc_value_t val2;
- p_buffer->i_allocated_size = i_size + i_prehader;
- p_buffer->i_buffer_size = i_size;
+ var_Get( p_this, psz_name, &val2 );
+ if( *val2.psz_string )
+ {
+ free( val2.psz_string );
+ msg_Dbg( p_this, "ignoring option %s (not first occurrence)", psz_name );
+ goto next;
+ }
+ free( val2.psz_string );
+ }
+ var_Set( p_this, psz_name, val );
+ msg_Dbg( p_this, "set sout option: %s to %s", psz_name, cfg->psz_value );
- return( 0 );
+ next:
+ free( psz_name );
+ cfg = cfg->p_next;
+ }
}
-int sout_BufferReallocFromPreHeader( sout_instance_t *p_sout, sout_buffer_t *p_buffer, size_t i_size )
+
+/*
+ * XXX name and p_cfg are used (-> do NOT free them)
+ */
+sout_stream_t *sout_StreamNew( sout_instance_t *p_sout, char *psz_chain )
{
- size_t i_preheader;
+ sout_stream_t *p_stream;
- i_preheader = p_buffer->p_buffer - p_buffer->p_allocated_buffer;
+ if( !psz_chain )
+ {
+ msg_Err( p_sout, "invalid chain" );
+ return NULL;
+ }
- if( i_preheader < i_size )
+ p_stream = vlc_object_create( p_sout, sizeof( sout_stream_t ) );
+
+ if( !p_stream )
{
- return( -1 );
+ msg_Err( p_sout, "out of memory" );
+ return NULL;
}
- p_buffer->p_buffer -= i_size;
- p_buffer->i_size += i_size;
- p_buffer->i_buffer_size += i_size;
+ p_stream->p_sout = p_sout;
+ p_stream->p_sys = NULL;
- return( 0 );
-}
+ p_stream->psz_next =
+ sout_CfgCreate( &p_stream->psz_name, &p_stream->p_cfg, psz_chain);
-int sout_BufferDelete( sout_instance_t *p_sout, sout_buffer_t *p_buffer )
-{
-#ifdef DEBUG_BUFFER
- msg_Dbg( p_sout, "freeing buffer, size:%d", p_buffer->i_size );
-#endif
- if( p_buffer->p_allocated_buffer )
+ msg_Dbg( p_sout, "stream=`%s'", p_stream->psz_name );
+
+ vlc_object_attach( p_stream, p_sout );
+
+ p_stream->p_module =
+ module_Need( p_stream, "sout stream", p_stream->psz_name, VLC_TRUE );
+
+ if( !p_stream->p_module )
{
- free( p_buffer->p_allocated_buffer );
+ sout_StreamDelete( p_stream );
+ return NULL;
}
- free( p_buffer );
- return( 0 );
+
+ return p_stream;
}
-sout_buffer_t *sout_BufferDuplicate( sout_instance_t *p_sout,
- sout_buffer_t *p_buffer )
+void sout_StreamDelete( sout_stream_t *p_stream )
{
- sout_buffer_t *p_dup;
+ msg_Dbg( p_stream, "destroying chain... (name=%s)", p_stream->psz_name );
- p_dup = sout_BufferNew( p_sout, p_buffer->i_size );
+ vlc_object_detach( p_stream );
+ if( p_stream->p_module ) module_Unneed( p_stream, p_stream->p_module );
- p_dup->i_bitrate= p_buffer->i_bitrate;
- p_dup->i_dts = p_buffer->i_dts;
- p_dup->i_pts = p_buffer->i_pts;
- p_dup->i_length = p_buffer->i_length;
- memcpy( p_dup->p_buffer, p_buffer->p_buffer, p_buffer->i_size );
+ FREE( p_stream->psz_name );
+ FREE( p_stream->psz_next );
- return( p_dup );
+ sout_CfgDestroy( p_stream->p_cfg );
+
+ msg_Dbg( p_stream, "destroying chain done" );
+ vlc_object_destroy( p_stream );
}
-void sout_BufferChain( sout_buffer_t **pp_chain,
- sout_buffer_t *p_buffer )
+static char *_sout_stream_url_to_chain( vlc_object_t *p_this, char *psz_url )
{
- if( *pp_chain == NULL )
+ mrl_t mrl;
+ char *psz_chain, *p;
+
+ mrl_Parse( &mrl, psz_url );
+ p = psz_chain = malloc( 500 + strlen( mrl.psz_way ) +
+ strlen( mrl.psz_access ) +
+ strlen( mrl.psz_name ) );
+
+
+ if( config_GetInt( p_this, "sout-display" ) )
{
- *pp_chain = p_buffer;
+ p += sprintf( p, "duplicate{dst=display,dst=std{mux=\"%s\","
+ "access=\"%s\",url=\"%s\"}}",
+ mrl.psz_way, mrl.psz_access, mrl.psz_name );
}
else
{
- sout_buffer_t *p = *pp_chain;
-
- while( p->p_next )
- {
- p = p->p_next;
- }
-
- p->p_next = p_buffer;
+ p += sprintf( p, "std{mux=\"%s\",access=\"%s\",url=\"%s\"}",
+ mrl.psz_way, mrl.psz_access, mrl.psz_name );
}
+
+ mrl_Clean( &mrl );
+ return( psz_chain );
}