1 /*****************************************************************************
3 *****************************************************************************
4 * Copyright (C) 1999-2004 VideoLAN
7 * Author: 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., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
22 *****************************************************************************/
26 #include <vlc/input.h>
28 #include "input_internal.h"
30 /*****************************************************************************
32 * if s is NULL then load a access_demux
33 *****************************************************************************/
34 demux_t *__demux2_New( vlc_object_t *p_obj,
35 char *psz_access, char *psz_demux, char *psz_path,
36 stream_t *s, es_out_t *out )
38 demux_t *p_demux = vlc_object_create( p_obj, VLC_OBJECT_DEMUX );
47 p_demux->psz_access = strdup( psz_access );
48 p_demux->psz_demux = strdup( psz_demux );
49 p_demux->psz_path = strdup( psz_path );
51 /* Take into account "demux" to be able to do :demux=demuxdump */
52 if( *p_demux->psz_demux == '\0' )
54 free( p_demux->psz_demux );
55 p_demux->psz_demux = var_GetString( p_obj, "demux" );
58 msg_Dbg( p_obj, "demux2_New: access='%s' demux='%s' path='%s'",
59 p_demux->psz_access, p_demux->psz_demux, p_demux->psz_path );
64 p_demux->pf_demux = NULL;
65 p_demux->pf_control = NULL;
66 p_demux->p_sys = NULL;
67 p_demux->info.i_update = 0;
68 p_demux->info.i_title = 0;
69 p_demux->info.i_seekpoint = 0;
72 psz_module = p_demux->psz_demux;
74 psz_module = p_demux->psz_access;
76 if( s && *psz_module == '\0' && strrchr( p_demux->psz_path, '.' ) )
78 /* XXX: add only file without any problem here and with strong detection.
79 * - no .mp3, .a52, ... (aac is added as it works only by file ext anyway
80 * - wav can't be added 'cause of a52 and dts in them as raw audio
82 static struct { char *ext; char *demux; } exttodemux[] =
86 { "asf", "asf" }, { "wmv", "asf" }, { "wma", "asf" },
92 { "mkv", "mkv" }, { "mka", "mkv" }, { "mks", "mkv" },
93 { "mp4", "mp4" }, { "m4a", "mp4" }, { "mov", "mp4" }, { "moov", "mp4" },
94 { "mod", "mod" }, { "xm", "mod" },
96 { "ogg", "ogg" }, { "ogm", "ogg" },
102 char *psz_ext = strrchr( p_demux->psz_path, '.' ) + 1;
105 for( i = 0; exttodemux[i].ext != NULL; i++ )
107 if( !strcasecmp( psz_ext, exttodemux[i].ext ) )
109 psz_module = exttodemux[i].demux;
115 /* Before module_Need (for var_Create...) */
116 vlc_object_attach( p_demux, p_obj );
121 module_Need( p_demux, "demux2", psz_module,
122 !strcmp( psz_module, p_demux->psz_demux ) ? VLC_TRUE : VLC_FALSE );
127 module_Need( p_demux, "access_demux", psz_module,
128 !strcmp( psz_module, p_demux->psz_access ) ? VLC_TRUE : VLC_FALSE );
131 if( p_demux->p_module == NULL )
133 vlc_object_detach( p_demux );
134 free( p_demux->psz_path );
135 free( p_demux->psz_demux );
136 free( p_demux->psz_access );
137 vlc_object_destroy( p_demux );
144 /*****************************************************************************
146 *****************************************************************************/
147 void demux2_Delete( demux_t *p_demux )
149 module_Unneed( p_demux, p_demux->p_module );
150 vlc_object_detach( p_demux );
152 free( p_demux->psz_path );
153 free( p_demux->psz_demux );
154 free( p_demux->psz_access );
156 vlc_object_destroy( p_demux );
159 /*****************************************************************************
160 * demux2_vaControlHelper:
161 *****************************************************************************/
162 int demux2_vaControlHelper( stream_t *s,
163 int64_t i_start, int64_t i_end,
164 int i_bitrate, int i_align,
165 int i_query, va_list args )
171 if( i_end < 0 ) i_end = stream_Size( s );
172 if( i_start < 0 ) i_start = 0;
173 if( i_align <= 0 ) i_align = 1;
174 i_tell = stream_Tell( s );
178 case DEMUX_GET_LENGTH:
179 pi64 = (int64_t*)va_arg( args, int64_t * );
180 if( i_bitrate > 0 && i_end > i_start )
182 *pi64 = I64C(8000000) * (i_end - i_start) / i_bitrate;
188 pi64 = (int64_t*)va_arg( args, int64_t * );
189 if( i_bitrate > 0 && i_end > i_start )
191 *pi64 = I64C(8000000) * (i_tell - i_start) / i_bitrate;
196 case DEMUX_GET_POSITION:
197 pf = (double*)va_arg( args, double * );
198 if( i_start < i_end )
200 *pf = (double)( i_tell - i_start ) /
201 (double)( i_end - i_start );
207 case DEMUX_SET_POSITION:
208 f = (double)va_arg( args, double );
209 if( i_start < i_end && f >= 0.0 && f <= 1.0 )
211 int64_t i_block = (f * ( i_end - i_start )) / i_align;
213 if( stream_Seek( s, i_start + i_block * i_align ) )
222 i64 = (int64_t)va_arg( args, int64_t );
223 if( i_bitrate > 0 && i64 >= 0 )
225 int64_t i_block = i64 * i_bitrate / I64C(8000000) / i_align;
226 if( stream_Seek( s, i_start + i_block * i_align ) )
236 case DEMUX_SET_NEXT_DEMUX_TIME:
237 case DEMUX_GET_TITLE_INFO:
238 case DEMUX_SET_GROUP:
242 msg_Err( s, "unknown query in demux_vaControlDefault" );
247 /****************************************************************************
248 * stream_Demux*: create a demuxer for an outpout stream (allow demuxer chain)
249 ****************************************************************************/
266 static int DStreamRead ( stream_t *, void *p_read, int i_read );
267 static int DStreamPeek ( stream_t *, uint8_t **pp_peek, int i_peek );
268 static int DStreamControl( stream_t *, int i_query, va_list );
269 static int DStreamThread ( stream_t * );
272 stream_t *__stream_DemuxNew( vlc_object_t *p_obj, char *psz_demux, es_out_t *out )
274 /* We create a stream reader, and launch a thread */
276 d_stream_sys_t *p_sys;
278 if( psz_demux == NULL || *psz_demux == '\0' )
283 s = vlc_object_create( p_obj, VLC_OBJECT_STREAM );
285 s->pf_read = DStreamRead;
286 s->pf_peek = DStreamPeek;
287 s->pf_control= DStreamControl;
289 s->p_sys = malloc( sizeof( d_stream_sys_t) );
290 p_sys = (d_stream_sys_t*)s->p_sys;
292 vlc_mutex_init( s, &p_sys->lock );
294 p_sys->i_buffer_size = 1000000;
295 p_sys->p_buffer = malloc( p_sys->i_buffer_size );
297 p_sys->psz_name = strdup( psz_demux );
299 p_sys->p_demux = NULL;
301 if( vlc_thread_create( s, "stream out", DStreamThread, VLC_THREAD_PRIORITY_INPUT, VLC_FALSE ) )
303 vlc_mutex_destroy( &p_sys->lock );
304 vlc_object_destroy( s );
312 void stream_DemuxSend( stream_t *s, block_t *p_block )
314 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
316 if( p_block->i_buffer > 0 )
318 vlc_mutex_lock( &p_sys->lock );
319 /* Realloc if needed */
320 if( p_sys->i_buffer + p_block->i_buffer > p_sys->i_buffer_size )
322 if( p_sys->i_buffer_size > 5000000 )
324 vlc_mutex_unlock( &p_sys->lock );
325 msg_Err( s, "stream_DemuxSend: buffer size > 5000000" );
326 block_Release( p_block );
329 /* I know, it's more than needed but that's perfect */
330 p_sys->i_buffer_size += p_block->i_buffer;
331 /* FIXME won't work with PEEK -> segfault */
332 p_sys->p_buffer = realloc( p_sys->p_buffer, p_sys->i_buffer_size );
333 msg_Dbg( s, "stream_DemuxSend: realloc to %d", p_sys->i_buffer_size );
337 memcpy( &p_sys->p_buffer[p_sys->i_buffer], p_block->p_buffer, p_block->i_buffer );
338 p_sys->i_buffer += p_block->i_buffer;
340 vlc_mutex_unlock( &p_sys->lock );
343 block_Release( p_block );
346 void stream_DemuxDelete( stream_t *s )
348 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
352 vlc_mutex_lock( &p_sys->lock );
355 p_sys->p_demux->b_die = VLC_TRUE;
357 vlc_mutex_unlock( &p_sys->lock );
359 vlc_thread_join( s );
363 demux2_Delete( p_sys->p_demux );
365 vlc_mutex_destroy( &p_sys->lock );
366 free( p_sys->psz_name );
367 free( p_sys->p_buffer );
369 vlc_object_destroy( s );
373 static int DStreamRead ( stream_t *s, void *p_read, int i_read )
375 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
378 //msg_Dbg( s, "DStreamRead: wanted %d bytes", i_read );
381 vlc_mutex_lock( &p_sys->lock );
382 //msg_Dbg( s, "DStreamRead: buffer %d", p_sys->i_buffer );
383 if( p_sys->i_buffer >= i_read || s->b_die )
387 vlc_mutex_unlock( &p_sys->lock );
391 //msg_Dbg( s, "DStreamRead: read %d buffer %d", i_read, p_sys->i_buffer );
393 i_copy = __MIN( i_read, p_sys->i_buffer );
398 memcpy( p_read, p_sys->p_buffer, i_copy );
400 p_sys->i_buffer -= i_copy;
401 p_sys->i_pos += i_copy;
403 if( p_sys->i_buffer > 0 )
405 memmove( p_sys->p_buffer, &p_sys->p_buffer[i_copy], p_sys->i_buffer );
409 vlc_mutex_unlock( &p_sys->lock );
413 static int DStreamPeek ( stream_t *s, uint8_t **pp_peek, int i_peek )
415 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
418 //msg_Dbg( s, "DStreamPeek: wanted %d bytes", i_peek );
421 vlc_mutex_lock( &p_sys->lock );
422 //msg_Dbg( s, "DStreamPeek: buffer %d", p_sys->i_buffer );
423 if( p_sys->i_buffer >= i_peek || s->b_die )
427 vlc_mutex_unlock( &p_sys->lock );
430 *pp_peek = p_sys->p_buffer;
431 i_copy = __MIN( i_peek, p_sys->i_buffer );
433 vlc_mutex_unlock( &p_sys->lock );
438 static int DStreamControl( stream_t *s, int i_query, va_list args )
440 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
446 case STREAM_GET_SIZE:
447 p_i64 = (int64_t*) va_arg( args, int64_t * );
451 case STREAM_CAN_SEEK:
452 p_b = (vlc_bool_t*) va_arg( args, vlc_bool_t * );
456 case STREAM_CAN_FASTSEEK:
457 p_b = (vlc_bool_t*) va_arg( args, vlc_bool_t * );
461 case STREAM_GET_POSITION:
462 p_i64 = (int64_t*) va_arg( args, int64_t * );
463 *p_i64 = p_sys->i_pos;
466 case STREAM_SET_POSITION:
468 int64_t i64 = (int64_t)va_arg( args, int64_t );
470 if( i64 < p_sys->i_pos )
472 i_skip = i64 - p_sys->i_pos;
476 int i_read = DStreamRead( s, NULL, i_skip );
487 p_int = (int*) va_arg( args, int * );
492 msg_Err( s, "invalid DStreamControl query=0x%x", i_query );
497 static int DStreamThread ( stream_t *s )
499 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
502 /* Create the demuxer */
504 if( ( p_demux = demux2_New( s, "", p_sys->psz_name, "", s, p_sys->out ) ) == NULL )
509 vlc_mutex_lock( &p_sys->lock );
510 p_sys->p_demux = p_demux;
511 vlc_mutex_unlock( &p_sys->lock );
514 while( !s->b_die && !p_demux->b_die )
516 if( p_demux->pf_demux( p_demux ) <= 0 )
521 p_demux->b_die = VLC_TRUE;