1 /*****************************************************************************
2 * stream_output.c : stream output module
3 *****************************************************************************
4 * Copyright (C) 2002 VideoLAN
5 * $Id: stream_output.c,v 1.14 2003/02/24 12:34:29 fenrir Exp $
7 * Authors: Christophe Massiot <massiot@via.ecp.fr>
8 * Laurent Aimar <fenrir@via.ecp.fr>
9 * Erioc 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 int InitInstance ( sout_instance_t * );
42 struct sout_instance_sys_t
44 /* if muxer doesn't support adding stream at any time then we first wait
45 * for stream then we refuse all stream and start muxing */
46 vlc_bool_t b_add_stream_any_time;
47 vlc_bool_t b_waiting_stream;
49 /* we wait one second after first stream added */
50 mtime_t i_add_stream_start;
54 /*****************************************************************************
55 * sout_NewInstance: creates a new stream output instance
56 *****************************************************************************/
57 sout_instance_t * __sout_NewInstance ( vlc_object_t *p_parent,
60 sout_instance_t * p_sout;
62 /* Allocate descriptor */
63 p_sout = vlc_object_create( p_parent, VLC_OBJECT_SOUT );
66 msg_Err( p_parent, "out of memory" );
70 p_sout->psz_dest = strdup( psz_dest );
72 if ( InitInstance( p_sout ) == -1 )
74 vlc_object_destroy( p_sout );
78 vlc_object_attach( p_sout, p_parent );
83 /*****************************************************************************
84 * InitInstance: opens appropriate modules
85 *****************************************************************************/
86 static int InitInstance( sout_instance_t * p_sout )
88 /* Parse dest string. Syntax : [[<access>][/<mux>]:][<dest>] */
89 /* This code is identical to input.c:InitThread. FIXME : factorize it ? */
90 char * psz_parser = p_sout->psz_dest;
92 p_sout->psz_access = "";
94 p_sout->psz_name = "";
95 p_sout->p_access = NULL;
97 p_sout->i_mux_preheader = 0;
98 p_sout->i_nb_inputs = 0;
99 p_sout->pp_inputs = NULL;
100 vlc_mutex_init( p_sout, &p_sout->lock );
101 p_sout->p_sys = malloc( sizeof( sout_instance_sys_t ) );
102 /* fixed after opening muxer */
103 p_sout->p_sys->b_add_stream_any_time = VLC_FALSE;
104 p_sout->p_sys->b_waiting_stream = VLC_TRUE;
105 p_sout->p_sys->i_add_stream_start = -1;
107 /* Skip the plug-in names */
108 while( *psz_parser && *psz_parser != ':' )
112 #if defined( WIN32 ) || defined( UNDER_CE )
113 if( psz_parser - p_sout->psz_dest == 1 )
115 msg_Warn( p_sout, "drive letter %c: found in source string",
116 *p_sout->psz_dest ) ;
123 p_sout->psz_access = p_sout->psz_mux = "";
124 p_sout->psz_name = p_sout->psz_dest;
128 *psz_parser++ = '\0';
130 /* let's skip '//' */
131 if( psz_parser[0] == '/' && psz_parser[1] == '/' )
136 p_sout->psz_name = psz_parser ;
138 /* Come back to parse the access and mux plug-ins */
139 psz_parser = p_sout->psz_dest;
144 p_sout->psz_access = "";
146 else if( *psz_parser == '/' )
149 p_sout->psz_access = "";
154 p_sout->psz_access = psz_parser;
156 while( *psz_parser && *psz_parser != '/' )
161 if( *psz_parser == '/' )
163 *psz_parser++ = '\0';
170 p_sout->psz_mux = "";
174 p_sout->psz_mux = psz_parser;
178 msg_Dbg( p_sout, "access `%s', mux `%s', name `%s'",
179 p_sout->psz_access, p_sout->psz_mux, p_sout->psz_name );
182 /* Find and open appropriate access module */
184 sout_AccessOutNew( p_sout, p_sout->psz_access, p_sout->psz_name );
185 if( p_sout->p_access == NULL )
187 msg_Err( p_sout, "no suitable sout access module for `%s/%s://%s'",
188 p_sout->psz_access, p_sout->psz_mux, p_sout->psz_name );
193 /* Find and open appropriate mux module */
195 module_Need( p_sout, "sout mux", p_sout->psz_mux );
197 if( p_sout->p_mux == NULL )
199 msg_Err( p_sout, "no suitable mux module for `%s/%s://%s'",
200 p_sout->psz_access, p_sout->psz_mux, p_sout->psz_name );
202 sout_AccessOutDelete( p_sout->p_access );
205 if( p_sout->pf_mux_capacity )
208 if( p_sout->pf_mux_capacity( p_sout,
209 SOUT_MUX_CAP_GET_ADD_STREAM_ANY_TIME,
210 NULL, (void*)&b_answer ) != SOUT_MUX_CAP_ERR_OK )
212 b_answer = VLC_FALSE;
216 msg_Dbg( p_sout, "muxer support adding stream at any time" );
217 p_sout->p_sys->b_add_stream_any_time = VLC_TRUE;
218 p_sout->p_sys->b_waiting_stream = VLC_FALSE;
222 p_sout->p_sys->b_add_stream_any_time = VLC_FALSE;
223 p_sout->p_sys->b_waiting_stream = VLC_TRUE;
226 p_sout->i_nb_inputs = 0;
227 p_sout->pp_inputs = NULL;
233 /*****************************************************************************
234 * sout_DeleteInstance: delete a previously allocated instance
235 *****************************************************************************/
236 void sout_DeleteInstance( sout_instance_t * p_sout )
239 vlc_object_detach( p_sout );
242 module_Unneed( p_sout, p_sout->p_mux );
244 if( p_sout->p_access )
246 sout_AccessOutDelete( p_sout->p_access );
249 vlc_mutex_destroy( &p_sout->lock );
252 vlc_object_destroy( p_sout );
255 /*****************************************************************************
256 * sout_AccessOutNew: allocate a new access out
257 *****************************************************************************/
258 sout_access_out_t *sout_AccessOutNew( sout_instance_t *p_sout,
259 char *psz_access, char *psz_name )
261 sout_access_out_t *p_access;
263 if( !( p_access = vlc_object_create( p_sout,
264 sizeof( sout_access_out_t ) ) ) )
266 msg_Err( p_sout, "out of memory" );
269 p_access->psz_access = strdup( psz_access ? psz_access : "" );
270 p_access->psz_name = strdup( psz_name ? psz_name : "" );
271 p_access->p_sout = p_sout;
272 p_access->p_sys = NULL;
273 p_access->pf_seek = NULL;
274 p_access->pf_write = NULL;
276 p_access->p_module = module_Need( p_access,
278 p_access->psz_access );;
280 if( !p_access->p_module )
282 vlc_object_destroy( p_access );
288 /*****************************************************************************
289 * sout_AccessDelete: delete an access out
290 *****************************************************************************/
291 void sout_AccessOutDelete( sout_access_out_t *p_access )
293 if( p_access->p_module )
295 module_Unneed( p_access, p_access->p_module );
297 free( p_access->psz_access );
298 free( p_access->psz_name );
300 vlc_object_destroy( p_access );
303 /*****************************************************************************
305 *****************************************************************************/
306 int sout_AccessOutSeek( sout_access_out_t *p_access, off_t i_pos )
308 return( p_access->pf_seek( p_access, i_pos ) );
311 /*****************************************************************************
313 *****************************************************************************/
314 int sout_AccessOutWrite( sout_access_out_t *p_access, sout_buffer_t *p_buffer )
316 return( p_access->pf_write( p_access, p_buffer ) );
321 /*****************************************************************************
323 *****************************************************************************/
324 sout_input_t *__sout_InputNew( vlc_object_t *p_this,
325 sout_packet_format_t *p_format )
327 sout_instance_t *p_sout = NULL;
328 sout_input_t *p_input;
331 /* search an stream output */
332 for( i_try = 0; i_try < 12; i_try++ )
334 p_sout = vlc_object_find( p_this, VLC_OBJECT_SOUT, FIND_ANYWHERE );
338 msg_Dbg( p_this, "waiting for sout" );
348 msg_Err( p_this, "cannot find any stream ouput" );
351 if( !p_sout->p_sys->b_add_stream_any_time && !p_sout->p_sys->b_waiting_stream)
353 msg_Err( p_sout, "cannot add a new stream (unsuported while muxing for this format)" );
357 msg_Dbg( p_sout, "adding a new input" );
358 if( p_sout->p_sys->i_add_stream_start < 0 )
360 /* we wait for one second */
361 p_sout->p_sys->i_add_stream_start = mdate();
364 /* create a new sout input */
365 p_input = malloc( sizeof( sout_input_t ) );
367 p_input->p_sout = p_sout;
368 vlc_mutex_init( p_sout, &p_input->lock );
369 memcpy( &p_input->input_format,
371 sizeof( sout_packet_format_t ) );
372 p_input->p_fifo = sout_FifoCreate( p_sout );
373 p_input->p_mux_data = NULL;
375 if( p_input->input_format.i_fourcc != VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
377 /* add this new one to p_sout */
378 vlc_mutex_lock( &p_sout->lock );
379 if( p_sout->i_nb_inputs == 0 )
381 p_sout->pp_inputs = malloc( sizeof( sout_input_t * ) );
385 p_sout->pp_inputs = realloc( p_sout->pp_inputs,
386 sizeof( sout_input_t * ) *
387 ( p_sout->i_nb_inputs + 1 ) );
389 p_sout->pp_inputs[p_sout->i_nb_inputs] = p_input;
390 p_sout->i_nb_inputs++;
392 if( p_sout->pf_mux_addstream( p_sout, p_input ) < 0 )
394 msg_Err( p_sout, "cannot add this stream" );
396 vlc_mutex_unlock( &p_sout->lock );
397 sout_InputDelete( p_input );
398 vlc_mutex_lock( &p_sout->lock );
402 vlc_mutex_unlock( &p_sout->lock );
405 vlc_object_release( p_sout );
411 int sout_InputDelete( sout_input_t *p_input )
413 sout_instance_t *p_sout = p_input->p_sout;
417 msg_Dbg( p_sout, "removing an input" );
419 vlc_mutex_lock( &p_sout->lock );
421 sout_FifoDestroy( p_sout, p_input->p_fifo );
422 vlc_mutex_destroy( &p_input->lock );
424 for( i_input = 0; i_input < p_sout->i_nb_inputs; i_input++ )
426 if( p_sout->pp_inputs[i_input] == p_input )
431 if( i_input < p_sout->i_nb_inputs )
433 if( p_sout->pf_mux_delstream( p_sout, p_input ) < 0 )
435 msg_Err( p_sout, "cannot del this stream from mux" );
438 /* remove the entry */
439 if( p_sout->i_nb_inputs > 1 )
441 memmove( &p_sout->pp_inputs[i_input],
442 &p_sout->pp_inputs[i_input+1],
443 (p_sout->i_nb_inputs - i_input - 1) * sizeof( sout_input_t*) );
447 free( p_sout->pp_inputs );
449 p_sout->i_nb_inputs--;
451 if( p_sout->i_nb_inputs == 0 )
453 msg_Warn( p_sout, "no more input stream" );
456 else if( p_input->input_format.i_fourcc != VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
458 msg_Err( p_sout, "cannot find the input to be deleted" );
463 vlc_mutex_unlock( &p_sout->lock );
469 int sout_InputSendBuffer( sout_input_t *p_input, sout_buffer_t *p_buffer )
471 sout_instance_sys_t *p_sys = p_input->p_sout->p_sys;
472 /* msg_Dbg( p_input->p_sout,
473 "send buffer, size:%d", p_buffer->i_size ); */
475 if( p_input->input_format.i_fourcc != VLC_FOURCC( 'n', 'u', 'l', 'l' ) )
477 sout_FifoPut( p_input->p_fifo, p_buffer );
479 if( p_sys->b_waiting_stream )
481 if( p_sys->i_add_stream_start > 0 &&
482 p_sys->i_add_stream_start + (mtime_t)1000000 < mdate() )
484 /* more than 1 second, start muxing */
485 p_sys->b_waiting_stream = VLC_FALSE;
492 vlc_mutex_lock( &p_input->p_sout->lock );
493 p_input->p_sout->pf_mux( p_input->p_sout );
494 vlc_mutex_unlock( &p_input->p_sout->lock );
498 sout_BufferDelete( p_input->p_sout, p_buffer );
504 sout_fifo_t *sout_FifoCreate( sout_instance_t *p_sout )
508 if( !( p_fifo = malloc( sizeof( sout_fifo_t ) ) ) )
513 vlc_mutex_init( p_sout, &p_fifo->lock );
514 vlc_cond_init ( p_sout, &p_fifo->wait );
516 p_fifo->p_first = NULL;
517 p_fifo->pp_last = &p_fifo->p_first;
522 void sout_FifoFree( sout_instance_t *p_sout, sout_fifo_t *p_fifo )
524 sout_buffer_t *p_buffer;
526 vlc_mutex_lock( &p_fifo->lock );
527 p_buffer = p_fifo->p_first;
530 sout_buffer_t *p_next;
531 p_next = p_buffer->p_next;
532 sout_BufferDelete( p_sout, p_buffer );
535 vlc_mutex_unlock( &p_fifo->lock );
539 void sout_FifoDestroy( sout_instance_t *p_sout, sout_fifo_t *p_fifo )
541 sout_FifoFree( p_sout, p_fifo );
542 vlc_mutex_destroy( &p_fifo->lock );
543 vlc_cond_destroy ( &p_fifo->wait );
548 void sout_FifoPut( sout_fifo_t *p_fifo, sout_buffer_t *p_buffer )
550 vlc_mutex_lock( &p_fifo->lock );
554 *p_fifo->pp_last = p_buffer;
555 p_fifo->pp_last = &p_buffer->p_next;
558 p_buffer = p_buffer->p_next;
562 /* warm there is data in this fifo */
563 vlc_cond_signal( &p_fifo->wait );
564 vlc_mutex_unlock( &p_fifo->lock );
567 sout_buffer_t *sout_FifoGet( sout_fifo_t *p_fifo )
569 sout_buffer_t *p_buffer;
571 vlc_mutex_lock( &p_fifo->lock );
573 if( p_fifo->p_first == NULL )
575 vlc_cond_wait( &p_fifo->wait, &p_fifo->lock );
578 p_buffer = p_fifo->p_first;
580 p_fifo->p_first = p_buffer->p_next;
583 if( p_fifo->p_first == NULL )
585 p_fifo->pp_last = &p_fifo->p_first;
588 vlc_mutex_unlock( &p_fifo->lock );
590 p_buffer->p_next = NULL;
594 sout_buffer_t *sout_FifoShow( sout_fifo_t *p_fifo )
596 sout_buffer_t *p_buffer;
598 vlc_mutex_lock( &p_fifo->lock );
600 if( p_fifo->p_first == NULL )
602 vlc_cond_wait( &p_fifo->wait, &p_fifo->lock );
605 p_buffer = p_fifo->p_first;
607 vlc_mutex_unlock( &p_fifo->lock );
612 sout_buffer_t *sout_BufferNew( sout_instance_t *p_sout, size_t i_size )
614 sout_buffer_t *p_buffer;
618 msg_Dbg( p_sout, "allocating an new buffer, size:%d", (uint32_t)i_size );
621 p_buffer = malloc( sizeof( sout_buffer_t ) );
622 i_prehader = p_sout->i_mux_preheader;
626 p_buffer->p_allocated_buffer = malloc( i_size + i_prehader );
627 p_buffer->p_buffer = p_buffer->p_allocated_buffer + i_prehader;
631 p_buffer->p_allocated_buffer = NULL;
632 p_buffer->p_buffer = NULL;
634 p_buffer->i_allocated_size = i_size + i_prehader;
635 p_buffer->i_buffer_size = i_size;
637 p_buffer->i_size = i_size;
638 p_buffer->i_length = 0;
641 p_buffer->i_bitrate = 0;
642 p_buffer->p_next = NULL;
646 int sout_BufferRealloc( sout_instance_t *p_sout, sout_buffer_t *p_buffer, size_t i_size )
652 "realloc buffer old size:%d new size:%d",
653 (uint32_t)p_buffer->i_allocated_size,
657 i_prehader = p_buffer->p_buffer - p_buffer->p_allocated_buffer;
659 if( !( p_buffer->p_allocated_buffer = realloc( p_buffer->p_allocated_buffer, i_size + i_prehader ) ) )
661 msg_Err( p_sout, "realloc failed" );
662 p_buffer->i_allocated_size = 0;
663 p_buffer->i_buffer_size = 0;
664 p_buffer->i_size = 0;
665 p_buffer->p_buffer = NULL;
668 p_buffer->p_buffer = p_buffer->p_allocated_buffer + i_prehader;
670 p_buffer->i_allocated_size = i_size + i_prehader;
671 p_buffer->i_buffer_size = i_size;
676 int sout_BufferReallocFromPreHeader( sout_instance_t *p_sout, sout_buffer_t *p_buffer, size_t i_size )
680 i_preheader = p_buffer->p_buffer - p_buffer->p_allocated_buffer;
682 if( i_preheader < i_size )
687 p_buffer->p_buffer -= i_size;
688 p_buffer->i_size += i_size;
689 p_buffer->i_buffer_size += i_size;
694 int sout_BufferDelete( sout_instance_t *p_sout, sout_buffer_t *p_buffer )
697 msg_Dbg( p_sout, "freeing buffer, size:%d", p_buffer->i_size );
699 if( p_buffer->p_allocated_buffer )
701 free( p_buffer->p_allocated_buffer );
707 sout_buffer_t *sout_BufferDuplicate( sout_instance_t *p_sout,
708 sout_buffer_t *p_buffer )
710 sout_buffer_t *p_dup;
712 p_dup = sout_BufferNew( p_sout, p_buffer->i_size );
714 p_dup->i_bitrate= p_buffer->i_bitrate;
715 p_dup->i_dts = p_buffer->i_dts;
716 p_dup->i_pts = p_buffer->i_pts;
717 p_dup->i_length = p_buffer->i_length;
718 p_sout->p_vlc->pf_memcpy( p_dup->p_buffer, p_buffer->p_buffer, p_buffer->i_size );
723 void sout_BufferChain( sout_buffer_t **pp_chain,
724 sout_buffer_t *p_buffer )
726 if( *pp_chain == NULL )
728 *pp_chain = p_buffer;
732 sout_buffer_t *p = *pp_chain;
739 p->p_next = p_buffer;