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:
241 msg_Err( s, "unknown query in demux_vaControlDefault" );
246 /****************************************************************************
247 * stream_Demux*: create a demuxer for an outpout stream (allow demuxer chain)
248 ****************************************************************************/
265 static int DStreamRead ( stream_t *, void *p_read, int i_read );
266 static int DStreamPeek ( stream_t *, uint8_t **pp_peek, int i_peek );
267 static int DStreamControl( stream_t *, int i_query, va_list );
268 static int DStreamThread ( stream_t * );
271 stream_t *__stream_DemuxNew( vlc_object_t *p_obj, char *psz_demux, es_out_t *out )
273 /* We create a stream reader, and launch a thread */
275 d_stream_sys_t *p_sys;
277 if( psz_demux == NULL || *psz_demux == '\0' )
282 s = vlc_object_create( p_obj, VLC_OBJECT_STREAM );
284 s->pf_read = DStreamRead;
285 s->pf_peek = DStreamPeek;
286 s->pf_control= DStreamControl;
288 s->p_sys = malloc( sizeof( d_stream_sys_t) );
289 p_sys = (d_stream_sys_t*)s->p_sys;
291 vlc_mutex_init( s, &p_sys->lock );
293 p_sys->i_buffer_size = 1000000;
294 p_sys->p_buffer = malloc( p_sys->i_buffer_size );
296 p_sys->psz_name = strdup( psz_demux );
298 p_sys->p_demux = NULL;
300 if( vlc_thread_create( s, "stream out", DStreamThread, VLC_THREAD_PRIORITY_INPUT, VLC_FALSE ) )
302 vlc_mutex_destroy( &p_sys->lock );
303 vlc_object_destroy( s );
311 void stream_DemuxSend( stream_t *s, block_t *p_block )
313 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
315 if( p_block->i_buffer > 0 )
317 vlc_mutex_lock( &p_sys->lock );
318 /* Realloc if needed */
319 if( p_sys->i_buffer + p_block->i_buffer > p_sys->i_buffer_size )
321 if( p_sys->i_buffer_size > 5000000 )
323 vlc_mutex_unlock( &p_sys->lock );
324 msg_Err( s, "stream_DemuxSend: buffer size > 5000000" );
325 block_Release( p_block );
328 /* I know, it's more than needed but that's perfect */
329 p_sys->i_buffer_size += p_block->i_buffer;
330 /* FIXME won't work with PEEK -> segfault */
331 p_sys->p_buffer = realloc( p_sys->p_buffer, p_sys->i_buffer_size );
332 msg_Dbg( s, "stream_DemuxSend: realloc to %d", p_sys->i_buffer_size );
336 memcpy( &p_sys->p_buffer[p_sys->i_buffer], p_block->p_buffer, p_block->i_buffer );
337 p_sys->i_buffer += p_block->i_buffer;
339 vlc_mutex_unlock( &p_sys->lock );
342 block_Release( p_block );
345 void stream_DemuxDelete( stream_t *s )
347 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
351 vlc_mutex_lock( &p_sys->lock );
354 p_sys->p_demux->b_die = VLC_TRUE;
356 vlc_mutex_unlock( &p_sys->lock );
358 vlc_thread_join( s );
362 demux2_Delete( p_sys->p_demux );
364 vlc_mutex_destroy( &p_sys->lock );
365 free( p_sys->psz_name );
366 free( p_sys->p_buffer );
368 vlc_object_destroy( s );
372 static int DStreamRead ( stream_t *s, void *p_read, int i_read )
374 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
377 //msg_Dbg( s, "DStreamRead: wanted %d bytes", i_read );
380 vlc_mutex_lock( &p_sys->lock );
381 //msg_Dbg( s, "DStreamRead: buffer %d", p_sys->i_buffer );
382 if( p_sys->i_buffer >= i_read || s->b_die )
386 vlc_mutex_unlock( &p_sys->lock );
390 //msg_Dbg( s, "DStreamRead: read %d buffer %d", i_read, p_sys->i_buffer );
392 i_copy = __MIN( i_read, p_sys->i_buffer );
397 memcpy( p_read, p_sys->p_buffer, i_copy );
399 p_sys->i_buffer -= i_copy;
400 p_sys->i_pos += i_copy;
402 if( p_sys->i_buffer > 0 )
404 memmove( p_sys->p_buffer, &p_sys->p_buffer[i_copy], p_sys->i_buffer );
408 vlc_mutex_unlock( &p_sys->lock );
412 static int DStreamPeek ( stream_t *s, uint8_t **pp_peek, int i_peek )
414 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
417 //msg_Dbg( s, "DStreamPeek: wanted %d bytes", i_peek );
420 vlc_mutex_lock( &p_sys->lock );
421 //msg_Dbg( s, "DStreamPeek: buffer %d", p_sys->i_buffer );
422 if( p_sys->i_buffer >= i_peek || s->b_die )
426 vlc_mutex_unlock( &p_sys->lock );
429 *pp_peek = p_sys->p_buffer;
430 i_copy = __MIN( i_peek, p_sys->i_buffer );
432 vlc_mutex_unlock( &p_sys->lock );
437 static int DStreamControl( stream_t *s, int i_query, va_list args )
439 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
445 case STREAM_GET_SIZE:
446 p_i64 = (int64_t*) va_arg( args, int64_t * );
450 case STREAM_CAN_SEEK:
451 p_b = (vlc_bool_t*) va_arg( args, vlc_bool_t * );
455 case STREAM_CAN_FASTSEEK:
456 p_b = (vlc_bool_t*) va_arg( args, vlc_bool_t * );
460 case STREAM_GET_POSITION:
461 p_i64 = (int64_t*) va_arg( args, int64_t * );
462 *p_i64 = p_sys->i_pos;
465 case STREAM_SET_POSITION:
467 int64_t i64 = (int64_t)va_arg( args, int64_t );
469 if( i64 < p_sys->i_pos )
471 i_skip = i64 - p_sys->i_pos;
475 int i_read = DStreamRead( s, NULL, i_skip );
486 p_int = (int*) va_arg( args, int * );
491 msg_Err( s, "invalid DStreamControl query=0x%x", i_query );
496 static int DStreamThread ( stream_t *s )
498 d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys;
501 /* Create the demuxer */
503 if( ( p_demux = demux2_New( s, "", p_sys->psz_name, "", s, p_sys->out ) ) == NULL )
508 vlc_mutex_lock( &p_sys->lock );
509 p_sys->p_demux = p_demux;
510 vlc_mutex_unlock( &p_sys->lock );
513 while( !s->b_die && !p_demux->b_die )
515 if( p_demux->pf_demux( p_demux ) <= 0 )
520 p_demux->b_die = VLC_TRUE;