X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=src%2Finput%2Fstream.c;h=3a75faee81c67f9dcb2060f3f376e3d2dd051df9;hb=8ab353b1123d829cd0e335a36cc7dffb4ae83a19;hp=e6c26b2497c77719fe7c2d86f3e3dcac76a675d4;hpb=62fb058cf20e03deab925bbcc89bd7524a6c10bc;p=vlc diff --git a/src/input/stream.c b/src/input/stream.c index e6c26b2497..3a75faee81 100644 --- a/src/input/stream.c +++ b/src/input/stream.c @@ -1,7 +1,7 @@ /***************************************************************************** * stream.c ***************************************************************************** - * Copyright (C) 1999-2004 VideoLAN + * Copyright (C) 1999-2004 the VideoLAN team * $Id$ * * Authors: Laurent Aimar @@ -18,573 +18,1715 @@ * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA. + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA. *****************************************************************************/ #include #include #include -#include "ninput.h" +#include "input_internal.h" -/**************************************************************************** - * stream_ReadLine: - ****************************************************************************/ -/** - * Read from the stream untill first newline. - * \param s Stream handle to read from - * \return A null-terminated string. This must be freed, +#undef STREAM_DEBUG + +/* TODO: + * - tune the 2 methods + * - compute cost for seek + * - improve stream mode seeking with closest segments + * - ... */ -/* FIXME don't use stupid MAX_LINE -> do the same than net_ReadLine */ -#define MAX_LINE 1024 -char *stream_ReadLine( stream_t *s ) -{ - uint8_t *p_data; - char *p_line; - int i_data; - int i = 0; - i_data = stream_Peek( s, &p_data, MAX_LINE ); - while( i < i_data && p_data[i] != '\n' && p_data[i] != '\r' ) - { - i++; - } - if( i_data <= 0 ) - { - return NULL; - } - else - { - p_line = malloc( i + 1 ); - if( p_line == NULL ) - { - msg_Err( s, "out of memory" ); - return NULL; - } - i = stream_Read( s, p_line, i + 1 ); - p_line[ i - 1 ] = '\0'; +/* Two methods: + * - using pf_block + * One linked list of data read + * - using pf_read + * More complex scheme using mutliple track to avoid seeking + */ - return p_line; - } -} +/* How many tracks we have, currently only used for stream mode */ +#ifdef OPTIMIZE_MEMORY +# define STREAM_CACHE_TRACK 1 + /* Max size of our cache 128Ko per track */ +# define STREAM_CACHE_SIZE (STREAM_CACHE_TRACK*1024*128) +#else +# define STREAM_CACHE_TRACK 3 + /* Max size of our cache 4Mo per track */ +# define STREAM_CACHE_SIZE (4*STREAM_CACHE_TRACK*1024*1024) +#endif + +/* How many data we try to prebuffer */ +#define STREAM_CACHE_PREBUFFER_SIZE (32767) +/* Maximum time we take to pre-buffer */ +#define STREAM_CACHE_PREBUFFER_LENGTH (100*1000) + +/* Method1: Simple, for pf_block. + * We get blocks and put them in the linked list. + * We release blocks once the total size is bigger than CACHE_BLOCK_SIZE + */ +#define STREAM_DATA_WAIT 40000 /* Time between before a pf_block retry */ + +/* Method2: A bit more complex, for pf_read + * - We use ring buffers, only one if unseekable, all if seekable + * - Upon seek date current ring, then search if one ring match the pos, + * yes: switch to it, seek the access to match the end of the ring + * no: search the ring with i_end the closer to i_pos, + * if close enough, read data and use this ring + * else use the oldest ring, seek and use it. + * + * TODO: - with access non seekable: use all space available for only one ring, but + * we have to support seekable/non-seekable switch on the fly. + * - compute a good value for i_read_size + * - ? + */ +#define STREAM_READ_ATONCE 32767 +#define STREAM_CACHE_TRACK_SIZE (STREAM_CACHE_SIZE/STREAM_CACHE_TRACK) +typedef struct +{ + int64_t i_date; + int64_t i_start; + int64_t i_end; -/* TODO: one day we should create a special module stream - * when we would have a access wrapper, and stream filter - * (like caching, progessive, gunzip, ... ) - */ + uint8_t *p_buffer; + +} stream_track_t; -/* private stream_sys_t for input_Stream* */ typedef struct { - input_thread_t *p_input; -} input_stream_sys_t; + char *psz_path; + int64_t i_size; -/* private pf_* functions declarations */ -static int IStreamRead ( stream_t *, void *p_read, int i_read ); -static int IStreamPeek ( stream_t *, uint8_t **pp_peek, int i_peek ); -static int IStreamControl( stream_t *, int i_query, va_list ); +} access_entry_t; -/**************************************************************************** - * input_StreamNew: create a wrapper for p_input access - ****************************************************************************/ -stream_t *input_StreamNew( input_thread_t *p_input ) +struct stream_sys_t { - stream_t *s = vlc_object_create( p_input, sizeof( stream_t ) ); - input_stream_sys_t *p_sys; - if( s ) + access_t *p_access; + + vlc_bool_t b_block; /* Block method (1) or stream */ + + int64_t i_pos; /* Current reading offset */ + + /* Method 1: pf_block */ + struct { - s->pf_block = NULL; - s->pf_read = IStreamRead; - s->pf_peek = IStreamPeek; - s->pf_control= IStreamControl; + int64_t i_start; /* Offset of block for p_first */ + int i_offset; /* Offset for data in p_current */ + block_t *p_current; /* Current block */ - s->p_sys = malloc( sizeof( input_stream_sys_t ) ); - p_sys = (input_stream_sys_t*)s->p_sys; - p_sys->p_input = p_input; - } - return s; -} + int i_size; /* Total amount of data in the list */ + block_t *p_first; + block_t **pp_last; -/**************************************************************************** - * input_StreamDelete: - ****************************************************************************/ -void input_StreamDelete( stream_t *s ) -{ - free( s->p_sys ); - vlc_object_destroy( s ); -} + } block; + /* Method 2: for pf_read */ + struct + { + int i_offset; /* Buffer offset in the current track */ + int i_tk; /* Current track */ + stream_track_t tk[STREAM_CACHE_TRACK]; -/**************************************************************************** - * IStreamControl: - ****************************************************************************/ -static int IStreamControl( stream_t *s, int i_query, va_list args ) -{ - input_stream_sys_t * p_sys = (input_stream_sys_t*)s->p_sys; - input_thread_t *p_input = p_sys->p_input; + /* Global buffer */ + uint8_t *p_buffer; - vlc_bool_t *p_b; - int64_t *p_i64, i64; - int *p_int; + /* */ + int i_used; /* Used since last read */ + int i_read_size; - switch( i_query ) + } stream; + + /* Peek temporary buffer */ + int i_peek; + uint8_t *p_peek; + + /* Stat for both method */ + struct { - case STREAM_GET_SIZE: - p_i64 = (int64_t*) va_arg( args, int64_t * ); + vlc_bool_t b_fastseek; /* From access */ + + /* Stat about reading data */ + int64_t i_read_count; + int64_t i_bytes; + int64_t i_read_time; + + /* Stat about seek */ + int i_seek_count; + int64_t i_seek_time; + + } stat; + + /* Streams list */ + int i_list; + access_entry_t **list; + int i_list_index; + access_t *p_list_access; + + /* Preparse mode ? */ + vlc_bool_t b_quick; +}; + +/* Method 1: */ +static int AStreamReadBlock( stream_t *s, void *p_read, int i_read ); +static int AStreamPeekBlock( stream_t *s, uint8_t **p_peek, int i_read ); +static int AStreamSeekBlock( stream_t *s, int64_t i_pos ); +static void AStreamPrebufferBlock( stream_t *s ); +static block_t *AReadBlock( stream_t *s, vlc_bool_t *pb_eof ); + +/* Method 2 */ +static int AStreamReadStream( stream_t *s, void *p_read, int i_read ); +static int AStreamPeekStream( stream_t *s, uint8_t **pp_peek, int i_read ); +static int AStreamSeekStream( stream_t *s, int64_t i_pos ); +static void AStreamPrebufferStream( stream_t *s ); +static int AReadStream( stream_t *s, void *p_read, int i_read ); + +/* Common */ +static int AStreamControl( stream_t *s, int i_query, va_list ); +static void AStreamDestroy( stream_t *s ); +static void UStreamDestroy( stream_t *s ); +static int ASeek( stream_t *s, int64_t i_pos ); - vlc_mutex_lock( &p_input->stream.stream_lock ); - *p_i64 = p_input->stream.p_selected_area->i_size; - vlc_mutex_unlock( &p_input->stream.stream_lock ); - return VLC_SUCCESS; - case STREAM_CAN_SEEK: - p_b = (vlc_bool_t*) va_arg( args, vlc_bool_t * ); +/**************************************************************************** + * stream_UrlNew: create a stream from a access + ****************************************************************************/ +stream_t *__stream_UrlNew( vlc_object_t *p_parent, const char *psz_url ) +{ + char *psz_access, *psz_demux, *psz_path, *psz_dup; + access_t *p_access; + stream_t *p_res; - vlc_mutex_lock( &p_input->stream.stream_lock ); - *p_b = p_input->stream.b_seekable; - vlc_mutex_unlock( &p_input->stream.stream_lock ); - return VLC_SUCCESS; + if( !psz_url ) return 0; - case STREAM_CAN_FASTSEEK: - p_b = (vlc_bool_t*) va_arg( args, vlc_bool_t * ); + psz_dup = strdup( psz_url ); + MRLSplit( p_parent, psz_dup, &psz_access, &psz_demux, &psz_path ); - vlc_mutex_lock( &p_input->stream.stream_lock ); - *p_b = p_input->stream.b_seekable && - p_input->stream.i_method == INPUT_METHOD_FILE; - vlc_mutex_unlock( &p_input->stream.stream_lock ); - return VLC_SUCCESS; + /* Now try a real access */ + p_access = access2_New( p_parent, psz_access, psz_demux, psz_path, 0 ); + free( psz_dup ); - case STREAM_GET_POSITION: - p_i64 = (int64_t*) va_arg( args, int64_t * ); + if( p_access == NULL ) + { + msg_Err( p_parent, "no suitable access module for `%s'", psz_url ); + return NULL; + } - vlc_mutex_lock( &p_input->stream.stream_lock ); - *p_i64 = p_input->stream.p_selected_area->i_tell; - vlc_mutex_unlock( &p_input->stream.stream_lock ); - return VLC_SUCCESS; + if( !( p_res = stream_AccessNew( p_access, VLC_TRUE ) ) ) + { + access2_Delete( p_access ); + return NULL; + } - case STREAM_SET_POSITION: - { - int64_t i_skip; - i64 = (int64_t) va_arg( args, int64_t ); + p_res->pf_destroy = UStreamDestroy; + return p_res; +} - vlc_mutex_lock( &p_input->stream.stream_lock ); - if( i64 < 0 || - ( p_input->stream.p_selected_area->i_size > 0 && - p_input->stream.p_selected_area->i_size < i64 ) ) - { - vlc_mutex_unlock( &p_input->stream.stream_lock ); - msg_Warn( s, "seek out of bound" ); - return VLC_EGENERIC; - } +stream_t *stream_AccessNew( access_t *p_access, vlc_bool_t b_quick ) +{ + stream_t *s = vlc_object_create( p_access, VLC_OBJECT_STREAM ); + stream_sys_t *p_sys; + char *psz_list; - i_skip = i64 - p_input->stream.p_selected_area->i_tell; + if( !s ) return NULL; - if( i_skip == 0 ) - { - vlc_mutex_unlock( &p_input->stream.stream_lock ); - return VLC_SUCCESS; - } + /* Attach it now, needed for b_die */ + vlc_object_attach( s, p_access ); - if( i_skip > 0 && i_skip < p_input->p_last_data - - p_input->p_current_data - 1 ) - { - /* We can skip without reading/seeking */ - p_input->p_current_data += i_skip; - p_input->stream.p_selected_area->i_tell = i64; - vlc_mutex_unlock( &p_input->stream.stream_lock ); - return VLC_SUCCESS; - } - vlc_mutex_unlock( &p_input->stream.stream_lock ); + s->pf_block = NULL; + s->pf_read = NULL; /* Set up later */ + s->pf_peek = NULL; + s->pf_control= AStreamControl; + s->pf_destroy = AStreamDestroy; + + s->p_sys = p_sys = malloc( sizeof( stream_sys_t ) ); + + /* UTF16 and UTF32 text file conversion */ + s->i_char_width = 1; + s->b_little_endian = VLC_FALSE; + s->conv = (vlc_iconv_t)(-1); + + /* Common field */ + p_sys->p_access = p_access; + p_sys->b_block = p_access->pf_block ? VLC_TRUE : VLC_FALSE; + p_sys->i_pos = p_access->info.i_pos; + + /* Stats */ + access2_Control( p_access, ACCESS_CAN_FASTSEEK, &p_sys->stat.b_fastseek ); + p_sys->stat.i_bytes = 0; + p_sys->stat.i_read_time = 0; + p_sys->stat.i_read_count = 0; + p_sys->stat.i_seek_count = 0; + p_sys->stat.i_seek_time = 0; + + p_sys->i_list = 0; + p_sys->list = 0; + p_sys->i_list_index = 0; + p_sys->p_list_access = 0; + + p_sys->b_quick = b_quick; + + /* Get the additional list of inputs if any (for concatenation) */ + if( (psz_list = var_CreateGetString( s, "input-list" )) && *psz_list ) + { + access_entry_t *p_entry = malloc( sizeof(access_entry_t) ); + char *psz_name, *psz_parser = psz_name = psz_list; - if( p_input->stream.b_seekable && - ( p_input->stream.i_method == INPUT_METHOD_FILE || - i_skip < 0 || i_skip >= ( p_input->i_mtu > 0 ? - p_input->i_mtu : 4096 ) ) ) - { - input_AccessReinit( p_input ); - p_input->pf_seek( p_input, i64 ); - return VLC_SUCCESS; - } + p_sys->p_list_access = p_access; + p_entry->i_size = p_access->info.i_size; + p_entry->psz_path = strdup( p_access->psz_path ); + TAB_APPEND( p_sys->i_list, p_sys->list, p_entry ); + msg_Dbg( p_access, "adding file `%s', ("I64Fd" bytes)", + p_entry->psz_path, p_access->info.i_size ); + + while( psz_name && *psz_name ) + { + psz_parser = strchr( psz_name, ',' ); + if( psz_parser ) *psz_parser = 0; - if( i_skip > 0 ) + psz_name = strdup( psz_name ); + if( psz_name ) { - data_packet_t *p_data; + access_t *p_tmp = access2_New( p_access, p_access->psz_access, + 0, psz_name, 0 ); - if( i_skip > 1000 ) + if( !p_tmp ) { - msg_Warn( s, "will skip "I64Fd" bytes, slow", i_skip ); + psz_name = psz_parser; + if( psz_name ) psz_name++; + continue; } - while( i_skip > 0 ) - { - int i_read; + msg_Dbg( p_access, "adding file `%s', ("I64Fd" bytes)", + psz_name, p_tmp->info.i_size ); - i_read = input_SplitBuffer( p_input, &p_data, - __MIN( (int)p_input->i_bufsize, i_skip ) ); - if( i_read < 0 ) - { - return VLC_EGENERIC; - } - i_skip -= i_read; + p_entry = malloc( sizeof(access_entry_t) ); + p_entry->i_size = p_tmp->info.i_size; + p_entry->psz_path = psz_name; + TAB_APPEND( p_sys->i_list, p_sys->list, p_entry ); - input_DeletePacket( p_input->p_method_data, p_data ); - if( i_read == 0 && i_skip > 0 ) - { - return VLC_EGENERIC; - } - } + access2_Delete( p_tmp ); } - return VLC_SUCCESS; - } - case STREAM_GET_MTU: - p_int = (int*) va_arg( args, int * ); - *p_int = p_input->i_mtu; - return VLC_SUCCESS; - - default: - msg_Err( s, "invalid stream_vaControl query=0x%x", i_query ); - return VLC_EGENERIC; + psz_name = psz_parser; + if( psz_name ) psz_name++; + } } -} - -/**************************************************************************** - * IStreamRead: - ****************************************************************************/ -static int IStreamRead( stream_t *s, void *p_data, int i_data ) -{ - input_stream_sys_t * p_sys = (input_stream_sys_t*)s->p_sys; - input_thread_t *p_input = p_sys->p_input; - uint8_t *p = (uint8_t*)p_data; + if( psz_list ) free( psz_list ); - int i_read = 0; + /* Peek */ + p_sys->i_peek = 0; + p_sys->p_peek = NULL; - if( p_data == NULL && i_data > 0 ) + if( p_sys->b_block ) { - int64_t i_pos; + s->pf_read = AStreamReadBlock; + s->pf_peek = AStreamPeekBlock; + + /* Init all fields of p_sys->block */ + p_sys->block.i_start = p_sys->i_pos; + p_sys->block.i_offset = 0; + p_sys->block.p_current = NULL; + p_sys->block.i_size = 0; + p_sys->block.p_first = NULL; + p_sys->block.pp_last = &p_sys->block.p_first; - stream_Control( s, STREAM_GET_POSITION, &i_pos ); + /* Do the prebuffering */ + AStreamPrebufferBlock( s ); - i_pos += i_data; - if( stream_Control( s, STREAM_SET_POSITION, i_pos ) ) + if( p_sys->block.i_size <= 0 ) { - return 0; + msg_Err( s, "cannot pre fill buffer" ); + goto error; } - return i_data; } - - while( i_data > 0 && !p_input->b_die ) + else { - ssize_t i_count = p_input->p_last_data - p_input->p_current_data; - - if( i_count <= 0 ) + int i; + + s->pf_read = AStreamReadStream; + s->pf_peek = AStreamPeekStream; + + /* Allocate/Setup our tracks */ + p_sys->stream.i_offset = 0; + p_sys->stream.i_tk = 0; + p_sys->stream.p_buffer = malloc( STREAM_CACHE_SIZE ); + p_sys->stream.i_used = 0; + access2_Control( p_access, ACCESS_GET_MTU, + &p_sys->stream.i_read_size ); + if( p_sys->stream.i_read_size <= 0 ) + p_sys->stream.i_read_size = STREAM_READ_ATONCE; + else if( p_sys->stream.i_read_size <= 256 ) + p_sys->stream.i_read_size = 256; + + for( i = 0; i < STREAM_CACHE_TRACK; i++ ) { - /* Go to the next buffer */ - i_count = input_FillBuffer( p_input ); - - if( i_count < 0 ) return -1; - else if( i_count == 0 ) - { - /* We reached the EOF */ - break; - } + p_sys->stream.tk[i].i_date = 0; + p_sys->stream.tk[i].i_start = p_sys->i_pos; + p_sys->stream.tk[i].i_end = p_sys->i_pos; + p_sys->stream.tk[i].p_buffer= + &p_sys->stream.p_buffer[i * STREAM_CACHE_TRACK_SIZE]; } - i_count = __MIN( i_data, i_count ); - memcpy( p, p_input->p_current_data, i_count ); - p_input->p_current_data += i_count; - p += i_count; - i_data -= i_count; - i_read += i_count; + /* Do the prebuffering */ + AStreamPrebufferStream( s ); - /* Update stream position */ - vlc_mutex_lock( &p_input->stream.stream_lock ); - p_input->stream.p_selected_area->i_tell += i_count; - vlc_mutex_unlock( &p_input->stream.stream_lock ); + if( p_sys->stream.tk[p_sys->stream.i_tk].i_end <= 0 ) + { + msg_Err( s, "cannot pre fill buffer" ); + goto error; + } } - return i_read; -} + return s; -/**************************************************************************** - * IStreamPeek: - ****************************************************************************/ -static int IStreamPeek( stream_t *s, uint8_t **pp_peek, int i_peek ) -{ - input_stream_sys_t * p_sys = (input_stream_sys_t*)s->p_sys; - return input_Peek( p_sys->p_input, pp_peek, i_peek ); +error: + if( p_sys->b_block ) + { + /* Nothing yet */ + } + else + { + free( p_sys->stream.p_buffer ); + } + free( s->p_sys ); + vlc_object_detach( s ); + vlc_object_destroy( s ); + return NULL; } /**************************************************************************** - * stream_Demux*: create a demuxer for an outpout stream (allow demuxer chain) + * AStreamDestroy: ****************************************************************************/ -typedef struct +static void AStreamDestroy( stream_t *s ) { - /* Data buffer */ - vlc_mutex_t lock; - int i_buffer; - int i_buffer_size; - uint8_t *p_buffer; + stream_sys_t *p_sys = s->p_sys; - int64_t i_pos; + vlc_object_detach( s ); - /* Demuxer */ - char *psz_name; - es_out_t *out; - demux_t *p_demux; -} d_stream_sys_t; + if( p_sys->b_block ) block_ChainRelease( p_sys->block.p_first ); + else free( p_sys->stream.p_buffer ); -static int DStreamRead ( stream_t *, void *p_read, int i_read ); -static int DStreamPeek ( stream_t *, uint8_t **pp_peek, int i_peek ); -static int DStreamControl( stream_t *, int i_query, va_list ); -static int DStreamThread ( stream_t * ); + if( p_sys->p_peek ) free( p_sys->p_peek ); + if( p_sys->p_list_access && p_sys->p_list_access != p_sys->p_access ) + access2_Delete( p_sys->p_list_access ); -stream_t *__stream_DemuxNew( vlc_object_t *p_obj, char *psz_demux, es_out_t *out ) -{ - /* We create a stream reader, and launch a thread */ - stream_t *s; - d_stream_sys_t *p_sys; - - if( psz_demux == NULL || *psz_demux == '\0' ) + while( p_sys->i_list-- ) { - return NULL; + free( p_sys->list[p_sys->i_list]->psz_path ); + free( p_sys->list[p_sys->i_list] ); + if( !p_sys->i_list ) free( p_sys->list ); } - s = vlc_object_create( p_obj, sizeof( stream_t ) ); - s->pf_block = NULL; - s->pf_read = DStreamRead; - s->pf_peek = DStreamPeek; - s->pf_control= DStreamControl; - - s->p_sys = malloc( sizeof( d_stream_sys_t) ); - p_sys = (d_stream_sys_t*)s->p_sys; - - vlc_mutex_init( s, &p_sys->lock ); - p_sys->i_buffer = 0; - p_sys->i_buffer_size = 1000000; - p_sys->p_buffer = malloc( p_sys->i_buffer_size ); - p_sys->i_pos = 0; - p_sys->psz_name = strdup( psz_demux ); - p_sys->out = out; - p_sys->p_demux = NULL; - - if( vlc_thread_create( s, "stream out", DStreamThread, VLC_THREAD_PRIORITY_INPUT, VLC_FALSE ) ) - { - vlc_mutex_destroy( &p_sys->lock ); - vlc_object_destroy( s ); - free( p_sys ); - return NULL; - } + free( s->p_sys ); + vlc_object_destroy( s ); +} - return s; +static void UStreamDestroy( stream_t *s ) +{ + access_t *p_access = (access_t*)vlc_object_find( s, VLC_OBJECT_ACCESS, FIND_PARENT ); + AStreamDestroy( s ); + vlc_object_release( p_access ); + access2_Delete( p_access ); } -void stream_DemuxSend( stream_t *s, block_t *p_block ) +/**************************************************************************** + * stream_AccessReset: + ****************************************************************************/ +void stream_AccessReset( stream_t *s ) { - d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys; + stream_sys_t *p_sys = s->p_sys; + + p_sys->i_pos = p_sys->p_access->info.i_pos; - if( p_block->i_buffer > 0 ) + if( p_sys->b_block ) { - vlc_mutex_lock( &p_sys->lock ); - /* Realloc if needed */ - if( p_sys->i_buffer + p_block->i_buffer > p_sys->i_buffer_size ) + block_ChainRelease( p_sys->block.p_first ); + + /* Init all fields of p_sys->block */ + p_sys->block.i_start = p_sys->i_pos; + p_sys->block.i_offset = 0; + p_sys->block.p_current = NULL; + p_sys->block.i_size = 0; + p_sys->block.p_first = NULL; + p_sys->block.pp_last = &p_sys->block.p_first; + + /* Do the prebuffering */ + AStreamPrebufferBlock( s ); + } + else + { + int i; + + /* Setup our tracks */ + p_sys->stream.i_offset = 0; + p_sys->stream.i_tk = 0; + p_sys->stream.i_used = 0; + + for( i = 0; i < STREAM_CACHE_TRACK; i++ ) { - if( p_sys->i_buffer_size > 5000000 ) - { - vlc_mutex_unlock( &p_sys->lock ); - msg_Err( s, "stream_DemuxSend: buffer size > 5000000" ); - block_Release( p_block ); - return; - } - /* I know, it's more than needed but that's perfect */ - p_sys->i_buffer_size += p_block->i_buffer; - /* FIXME won't work with PEEK -> segfault */ - p_sys->p_buffer = realloc( p_sys->p_buffer, p_sys->i_buffer_size ); - msg_Dbg( s, "stream_DemuxSend: realloc to %d", p_sys->i_buffer_size ); + p_sys->stream.tk[i].i_date = 0; + p_sys->stream.tk[i].i_start = p_sys->i_pos; + p_sys->stream.tk[i].i_end = p_sys->i_pos; } - /* copy data */ - memcpy( &p_sys->p_buffer[p_sys->i_buffer], p_block->p_buffer, p_block->i_buffer ); - p_sys->i_buffer += p_block->i_buffer; - - vlc_mutex_unlock( &p_sys->lock ); + /* Do the prebuffering */ + AStreamPrebufferStream( s ); } - - block_Release( p_block ); } -void stream_DemuxDelete( stream_t *s ) +/**************************************************************************** + * stream_AccessUpdate: + ****************************************************************************/ +void stream_AccessUpdate( stream_t *s ) { - d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys; + stream_sys_t *p_sys = s->p_sys; - s->b_die = VLC_TRUE; + p_sys->i_pos = p_sys->p_access->info.i_pos; - vlc_mutex_lock( &p_sys->lock ); - if( p_sys->p_demux ) + if( p_sys->i_list ) { - p_sys->p_demux->b_die = VLC_TRUE; + int i; + for( i = 0; i < p_sys->i_list_index; i++ ) + { + p_sys->i_pos += p_sys->list[i]->i_size; + } } - vlc_mutex_unlock( &p_sys->lock ); +} + +/**************************************************************************** + * AStreamControl: + ****************************************************************************/ +static int AStreamControl( stream_t *s, int i_query, va_list args ) +{ + stream_sys_t *p_sys = s->p_sys; + access_t *p_access = p_sys->p_access; - vlc_thread_join( s ); + vlc_bool_t *p_bool; + int64_t *pi_64, i_64; + int i_int; - if( p_sys->p_demux ) + switch( i_query ) { - demux2_Delete( p_sys->p_demux ); + case STREAM_GET_SIZE: + pi_64 = (int64_t*)va_arg( args, int64_t * ); + if( s->p_sys->i_list ) + { + int i; + *pi_64 = 0; + for( i = 0; i < s->p_sys->i_list; i++ ) + *pi_64 += s->p_sys->list[i]->i_size; + break; + } + *pi_64 = p_access->info.i_size; + break; + + case STREAM_CAN_SEEK: + p_bool = (vlc_bool_t*)va_arg( args, vlc_bool_t * ); + access2_Control( p_access, ACCESS_CAN_SEEK, p_bool ); + break; + + case STREAM_CAN_FASTSEEK: + p_bool = (vlc_bool_t*)va_arg( args, vlc_bool_t * ); + access2_Control( p_access, ACCESS_CAN_FASTSEEK, p_bool ); + break; + + case STREAM_GET_POSITION: + pi_64 = (int64_t*)va_arg( args, int64_t * ); + *pi_64 = p_sys->i_pos; + break; + + case STREAM_SET_POSITION: + i_64 = (int64_t)va_arg( args, int64_t ); + if( p_sys->b_block ) + return AStreamSeekBlock( s, i_64 ); + else + return AStreamSeekStream( s, i_64 ); + + case STREAM_GET_MTU: + return VLC_EGENERIC; + + case STREAM_CONTROL_ACCESS: + i_int = (int) va_arg( args, int ); + if( i_int != ACCESS_SET_PRIVATE_ID_STATE && + i_int != ACCESS_SET_PRIVATE_ID_CA && + i_int != ACCESS_GET_PRIVATE_ID_STATE ) + { + msg_Err( s, "Hey, what are you thinking ?" + "DON'T USE STREAM_CONTROL_ACCESS !!!" ); + return VLC_EGENERIC; + } + return access2_vaControl( p_access, i_int, args ); + + default: + msg_Err( s, "invalid stream_vaControl query=0x%x", i_query ); + return VLC_EGENERIC; } - vlc_mutex_destroy( &p_sys->lock ); - free( p_sys->psz_name ); - free( p_sys->p_buffer ); - free( p_sys ); - vlc_object_destroy( s ); + return VLC_SUCCESS; } -static int DStreamRead ( stream_t *s, void *p_read, int i_read ) + +/**************************************************************************** + * Method 1: + ****************************************************************************/ +static void AStreamPrebufferBlock( stream_t *s ) { - d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys; - int i_copy; + stream_sys_t *p_sys = s->p_sys; + access_t *p_access = p_sys->p_access; + + int64_t i_first = 0; + int64_t i_start; - //msg_Dbg( s, "DStreamRead: wanted %d bytes", i_read ); + msg_Dbg( s, "pre buffering" ); + i_start = mdate(); for( ;; ) { - vlc_mutex_lock( &p_sys->lock ); - //msg_Dbg( s, "DStreamRead: buffer %d", p_sys->i_buffer ); - if( p_sys->i_buffer >= i_read || s->b_die ) + int64_t i_date = mdate(); + vlc_bool_t b_eof; + block_t *b; + + if( s->b_die || p_sys->block.i_size > STREAM_CACHE_PREBUFFER_SIZE || + ( i_first > 0 && i_first + STREAM_CACHE_PREBUFFER_LENGTH < i_date ) ) { + int64_t i_byterate; + + /* Update stat */ + p_sys->stat.i_bytes = p_sys->block.i_size; + p_sys->stat.i_read_time = i_date - i_start; + i_byterate = ( I64C(1000000) * p_sys->stat.i_bytes ) / + (p_sys->stat.i_read_time + 1); + + msg_Dbg( s, "prebuffering done "I64Fd" bytes in "I64Fd"s - " + I64Fd" kbytes/s", + p_sys->stat.i_bytes, + p_sys->stat.i_read_time / I64C(1000000), + i_byterate / 1024 ); break; } - vlc_mutex_unlock( &p_sys->lock ); - msleep( 10000 ); - } - //msg_Dbg( s, "DStreamRead: read %d buffer %d", i_read, p_sys->i_buffer ); - - i_copy = __MIN( i_read, p_sys->i_buffer ); - if( i_copy > 0 ) - { - if( p_read ) + /* Fetch a block */ + if( ( b = AReadBlock( s, &b_eof ) ) == NULL ) { - memcpy( p_read, p_sys->p_buffer, i_copy ); - } - p_sys->i_buffer -= i_copy; - p_sys->i_pos += i_copy; + if( b_eof ) break; - if( p_sys->i_buffer > 0 ) - { - memmove( p_sys->p_buffer, &p_sys->p_buffer[i_copy], p_sys->i_buffer ); + msleep( STREAM_DATA_WAIT ); + continue; } - } - vlc_mutex_unlock( &p_sys->lock ); + while( b ) + { + /* Append the block */ + p_sys->block.i_size += b->i_buffer; + *p_sys->block.pp_last = b; + p_sys->block.pp_last = &b->p_next; - return i_copy; -} -static int DStreamPeek ( stream_t *s, uint8_t **pp_peek, int i_peek ) -{ - d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys; - int i_copy; + p_sys->stat.i_read_count++; + b = b->p_next; + } - //msg_Dbg( s, "DStreamPeek: wanted %d bytes", i_peek ); - for( ;; ) - { - vlc_mutex_lock( &p_sys->lock ); - //msg_Dbg( s, "DStreamPeek: buffer %d", p_sys->i_buffer ); - if( p_sys->i_buffer >= i_peek || s->b_die ) + if( p_access->info.b_prebuffered ) { + /* Access has already prebufferred - update stats and exit */ + p_sys->stat.i_bytes = p_sys->block.i_size; + p_sys->stat.i_read_time = mdate() - i_start; break; } - vlc_mutex_unlock( &p_sys->lock ); - msleep( 10000 ); - } - *pp_peek = p_sys->p_buffer; - i_copy = __MIN( i_peek, p_sys->i_buffer ); - vlc_mutex_unlock( &p_sys->lock ); + if( i_first == 0 ) + { + i_first = mdate(); + msg_Dbg( s, "received first data for our buffer"); + } + + } - return i_copy; + p_sys->block.p_current = p_sys->block.p_first; } -static int DStreamControl( stream_t *s, int i_query, va_list args ) +static int AStreamRefillBlock( stream_t *s ); + +static int AStreamReadBlock( stream_t *s, void *p_read, int i_read ) { - d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys; - int64_t *p_i64; - vlc_bool_t *p_b; - int *p_int; - switch( i_query ) - { - case STREAM_GET_SIZE: - p_i64 = (int64_t*) va_arg( args, int64_t * ); - *p_i64 = 0; - return VLC_SUCCESS; + stream_sys_t *p_sys = s->p_sys; - case STREAM_CAN_SEEK: - p_b = (vlc_bool_t*) va_arg( args, vlc_bool_t * ); - *p_b = VLC_FALSE; - return VLC_SUCCESS; + uint8_t *p_data= (uint8_t*)p_read; + int i_data = 0; - case STREAM_CAN_FASTSEEK: - p_b = (vlc_bool_t*) va_arg( args, vlc_bool_t * ); - *p_b = VLC_FALSE; - return VLC_SUCCESS; + /* It means EOF */ + if( p_sys->block.p_current == NULL ) + return 0; - case STREAM_GET_POSITION: - p_i64 = (int64_t*) va_arg( args, int64_t * ); - *p_i64 = p_sys->i_pos; - return VLC_SUCCESS; + if( p_read == NULL ) + { + /* seek within this stream if possible, else use plain old read and discard */ + stream_sys_t *p_sys = s->p_sys; + access_t *p_access = p_sys->p_access; + vlc_bool_t b_aseek; + access2_Control( p_access, ACCESS_CAN_SEEK, &b_aseek ); + if( b_aseek ) + return AStreamSeekBlock( s, p_sys->i_pos + i_read ) ? 0 : i_read; + } - case STREAM_SET_POSITION: - return VLC_EGENERIC; + while( i_data < i_read ) + { + int i_current = + p_sys->block.p_current->i_buffer - p_sys->block.i_offset; + int i_copy = __MIN( i_current, i_read - i_data); - case STREAM_GET_MTU: - p_int = (int*) va_arg( args, int * ); - *p_int = 0; - return VLC_SUCCESS; + /* Copy data */ + if( p_data ) + { + memcpy( p_data, + &p_sys->block.p_current->p_buffer[p_sys->block.i_offset], + i_copy ); + p_data += i_copy; + } + i_data += i_copy; - default: - msg_Err( s, "invalid DStreamControl query=0x%x", i_query ); - return VLC_EGENERIC; + p_sys->block.i_offset += i_copy; + if( p_sys->block.i_offset >= p_sys->block.p_current->i_buffer ) + { + /* Current block is now empty, switch to next */ + if( p_sys->block.p_current ) + { + p_sys->block.i_offset = 0; + p_sys->block.p_current = p_sys->block.p_current->p_next; + } + /*Get a new block */ + if( AStreamRefillBlock( s ) ) + { + break; + } + } } + + p_sys->i_pos += i_data; + return i_data; } -static int DStreamThread ( stream_t *s ) +static int AStreamPeekBlock( stream_t *s, uint8_t **pp_peek, int i_read ) { - d_stream_sys_t *p_sys = (d_stream_sys_t*)s->p_sys; - char *psz_mrl; - demux_t *p_demux; - - /* Create the demuxer */ + stream_sys_t *p_sys = s->p_sys; + uint8_t *p_data; + int i_data = 0; + block_t *b; + int i_offset; - psz_mrl = malloc( strlen( p_sys->psz_name ) + 3 ); - sprintf( psz_mrl, "/%s:", p_sys->psz_name ); + if( p_sys->block.p_current == NULL ) return 0; /* EOF */ - if( ( p_demux = demux2_New( s, psz_mrl, s, p_sys->out ) ) == NULL ) + /* We can directly give a pointer over our buffer */ + if( i_read <= p_sys->block.p_current->i_buffer - p_sys->block.i_offset ) { - free( psz_mrl ); - return VLC_EGENERIC; + *pp_peek = &p_sys->block.p_current->p_buffer[p_sys->block.i_offset]; + return i_read; } - free( psz_mrl ); - vlc_mutex_lock( &p_sys->lock ); - p_sys->p_demux = p_demux; - vlc_mutex_unlock( &p_sys->lock ); - - /* Main loop */ - while( !s->b_die && !p_demux->b_die ) + /* We need to create a local copy */ + if( p_sys->i_peek < i_read ) { - if( p_demux->pf_demux( p_demux ) <= 0 ) + p_sys->p_peek = realloc( p_sys->p_peek, i_read ); + if( !p_sys->p_peek ) { - break; + p_sys->i_peek = 0; + return 0; } + p_sys->i_peek = i_read; } - p_demux->b_die = VLC_TRUE; - return VLC_SUCCESS; -} + /* Fill enough data */ + while( p_sys->block.i_size - (p_sys->i_pos - p_sys->block.i_start) + < i_read ) + { + block_t **pp_last = p_sys->block.pp_last; + if( AStreamRefillBlock( s ) ) break; + /* Our buffer are probably filled enough, don't try anymore */ + if( pp_last == p_sys->block.pp_last ) break; + } + /* Copy what we have */ + b = p_sys->block.p_current; + i_offset = p_sys->block.i_offset; + p_data = p_sys->p_peek; + while( b && i_data < i_read ) + { + int i_current = b->i_buffer - i_offset; + int i_copy = __MIN( i_current, i_read - i_data ); + + memcpy( p_data, &b->p_buffer[i_offset], i_copy ); + i_data += i_copy; + p_data += i_copy; + i_offset += i_copy; + + if( i_offset >= b->i_buffer ) + { + i_offset = 0; + b = b->p_next; + } + } + + *pp_peek = p_sys->p_peek; + return i_data; +} + +static int AStreamSeekBlock( stream_t *s, int64_t i_pos ) +{ + stream_sys_t *p_sys = s->p_sys; + access_t *p_access = p_sys->p_access; + int64_t i_offset = i_pos - p_sys->block.i_start; + vlc_bool_t b_seek; + + /* We already have thoses data, just update p_current/i_offset */ + if( i_offset >= 0 && i_offset < p_sys->block.i_size ) + { + block_t *b = p_sys->block.p_first; + int i_current = 0; + + while( i_current + b->i_buffer < i_offset ) + { + i_current += b->i_buffer; + b = b->p_next; + } + + p_sys->block.p_current = b; + p_sys->block.i_offset = i_offset - i_current; + + p_sys->i_pos = i_pos; + + return VLC_SUCCESS; + } + + /* We may need to seek or to read data */ + if( i_offset < 0 ) + { + vlc_bool_t b_aseek; + access2_Control( p_access, ACCESS_CAN_SEEK, &b_aseek ); + + if( !b_aseek ) + { + msg_Err( s, "backward seeking impossible (access not seekable)" ); + return VLC_EGENERIC; + } + + b_seek = VLC_TRUE; + } + else + { + vlc_bool_t b_aseek, b_aseekfast; + + access2_Control( p_access, ACCESS_CAN_SEEK, &b_aseek ); + access2_Control( p_access, ACCESS_CAN_FASTSEEK, &b_aseekfast ); + + if( !b_aseek ) + { + b_seek = VLC_FALSE; + msg_Warn( s, I64Fd" bytes need to be skipped " + "(access non seekable)", + i_offset - p_sys->block.i_size ); + } + else + { + int64_t i_skip = i_offset - p_sys->block.i_size; + + /* Avg bytes per packets */ + int i_avg = p_sys->stat.i_bytes / p_sys->stat.i_read_count; + /* TODO compute a seek cost instead of fixed threshold */ + int i_th = b_aseekfast ? 1 : 5; + + if( i_skip <= i_th * i_avg && + i_skip < STREAM_CACHE_SIZE ) + b_seek = VLC_FALSE; + else + b_seek = VLC_TRUE; + + msg_Dbg( s, "b_seek=%d th*avg=%d skip="I64Fd, + b_seek, i_th*i_avg, i_skip ); + } + } + + if( b_seek ) + { + int64_t i_start, i_end; + /* Do the access seek */ + i_start = mdate(); + if( ASeek( s, i_pos ) ) return VLC_EGENERIC; + i_end = mdate(); + + /* Release data */ + block_ChainRelease( p_sys->block.p_first ); + + /* Reinit */ + p_sys->block.i_start = p_sys->i_pos = i_pos; + p_sys->block.i_offset = 0; + p_sys->block.p_current = NULL; + p_sys->block.i_size = 0; + p_sys->block.p_first = NULL; + p_sys->block.pp_last = &p_sys->block.p_first; + + /* Refill a block */ + if( AStreamRefillBlock( s ) ) + { + msg_Err( s, "cannot re fill buffer" ); + return VLC_EGENERIC; + } + /* Update stat */ + p_sys->stat.i_seek_time += i_end - i_start; + p_sys->stat.i_seek_count++; + return VLC_SUCCESS; + } + else + { + /* Read enough data */ + while( p_sys->block.i_start + p_sys->block.i_size < i_pos ) + { + if( AStreamRefillBlock( s ) ) + { + msg_Err( s, "can't read enough data in seek" ); + return VLC_EGENERIC; + } + while( p_sys->block.p_current && + p_sys->i_pos + p_sys->block.p_current->i_buffer < i_pos ) + { + p_sys->i_pos += p_sys->block.p_current->i_buffer; + p_sys->block.p_current = p_sys->block.p_current->p_next; + } + } + + p_sys->block.i_offset = i_pos - p_sys->i_pos; + p_sys->i_pos = i_pos; + + /* TODO read data */ + return VLC_SUCCESS; + } + + return VLC_EGENERIC; +} + +static int AStreamRefillBlock( stream_t *s ) +{ + stream_sys_t *p_sys = s->p_sys; + int64_t i_start, i_stop; + block_t *b; + + /* Release data */ + while( p_sys->block.i_size >= STREAM_CACHE_SIZE && + p_sys->block.p_first != p_sys->block.p_current ) + { + block_t *b = p_sys->block.p_first; + + p_sys->block.i_start += b->i_buffer; + p_sys->block.i_size -= b->i_buffer; + p_sys->block.p_first = b->p_next; + + block_Release( b ); + } + if( p_sys->block.i_size >= STREAM_CACHE_SIZE && + p_sys->block.p_current == p_sys->block.p_first && + p_sys->block.p_current->p_next ) /* At least 2 packets */ + { + /* Enough data, don't read more */ + return VLC_SUCCESS; + } + + /* Now read a new block */ + i_start = mdate(); + for( ;; ) + { + vlc_bool_t b_eof; + + if( s->b_die ) return VLC_EGENERIC; + + + /* Fetch a block */ + if( ( b = AReadBlock( s, &b_eof ) ) ) break; + + if( b_eof ) return VLC_EGENERIC; + + msleep( STREAM_DATA_WAIT ); + } + + while( b ) + { + i_stop = mdate(); + + /* Append the block */ + p_sys->block.i_size += b->i_buffer; + *p_sys->block.pp_last = b; + p_sys->block.pp_last = &b->p_next; + + /* Fix p_current */ + if( p_sys->block.p_current == NULL ) + p_sys->block.p_current = b; + + /* Update stat */ + p_sys->stat.i_bytes += b->i_buffer; + p_sys->stat.i_read_time += i_stop - i_start; + p_sys->stat.i_read_count++; + + b = b->p_next; + i_start = mdate(); + } + return VLC_SUCCESS; +} + + +/**************************************************************************** + * Method 2: + ****************************************************************************/ +static int AStreamRefillStream( stream_t *s ); + +static int AStreamReadStream( stream_t *s, void *p_read, int i_read ) +{ + stream_sys_t *p_sys = s->p_sys; + stream_track_t *tk = &p_sys->stream.tk[p_sys->stream.i_tk]; + + uint8_t *p_data = (uint8_t *)p_read; + int i_data = 0; + + if( tk->i_start >= tk->i_end ) return 0; /* EOF */ + + if( p_read == NULL ) + { + /* seek within this stream if possible, else use plain old read and discard */ + stream_sys_t *p_sys = s->p_sys; + access_t *p_access = p_sys->p_access; + vlc_bool_t b_aseek; + access2_Control( p_access, ACCESS_CAN_SEEK, &b_aseek ); + if( b_aseek ) + return AStreamSeekStream( s, p_sys->i_pos + i_read ) ? 0 : i_read; + } + +#ifdef STREAM_DEBUG + msg_Dbg( s, "AStreamReadStream: %d pos="I64Fd" tk=%d start="I64Fd + " offset=%d end="I64Fd, + i_read, p_sys->i_pos, p_sys->stream.i_tk, + tk->i_start, p_sys->stream.i_offset, tk->i_end ); +#endif + + while( i_data < i_read ) + { + int i_off = (tk->i_start + p_sys->stream.i_offset) % + STREAM_CACHE_TRACK_SIZE; + int i_current = + __MIN( tk->i_end - tk->i_start - p_sys->stream.i_offset, + STREAM_CACHE_TRACK_SIZE - i_off ); + int i_copy = __MIN( i_current, i_read - i_data ); + + if( i_copy <= 0 ) break; /* EOF */ + + /* Copy data */ + /* msg_Dbg( s, "AStreamReadStream: copy %d", i_copy ); */ + if( p_data ) + { + memcpy( p_data, &tk->p_buffer[i_off], i_copy ); + p_data += i_copy; + } + i_data += i_copy; + p_sys->stream.i_offset += i_copy; + + /* Update pos now */ + p_sys->i_pos += i_copy; + + /* */ + p_sys->stream.i_used += i_copy; + if( tk->i_start + p_sys->stream.i_offset >= tk->i_end || + p_sys->stream.i_used >= p_sys->stream.i_read_size ) + { + if( AStreamRefillStream( s ) ) + { + /* EOF */ + if( tk->i_start >= tk->i_end ) break; + } + } + } + + return i_data; +} + +static int AStreamPeekStream( stream_t *s, uint8_t **pp_peek, int i_read ) +{ + stream_sys_t *p_sys = s->p_sys; + stream_track_t *tk = &p_sys->stream.tk[p_sys->stream.i_tk]; + int64_t i_off; + + if( tk->i_start >= tk->i_end ) return 0; /* EOF */ + +#ifdef STREAM_DEBUG + msg_Dbg( s, "AStreamPeekStream: %d pos="I64Fd" tk=%d " + "start="I64Fd" offset=%d end="I64Fd, + i_read, p_sys->i_pos, p_sys->stream.i_tk, + tk->i_start, p_sys->stream.i_offset, tk->i_end ); +#endif + + /* Avoid problem, but that should *never* happen */ + if( i_read > STREAM_CACHE_TRACK_SIZE / 2 ) + i_read = STREAM_CACHE_TRACK_SIZE / 2; + + while( tk->i_end - tk->i_start - p_sys->stream.i_offset < i_read ) + { + if( p_sys->stream.i_used <= 1 ) + { + /* Be sure we will read something */ + p_sys->stream.i_used += i_read - + (tk->i_end - tk->i_start - p_sys->stream.i_offset); + } + if( AStreamRefillStream( s ) ) break; + } + + if( tk->i_end - tk->i_start - p_sys->stream.i_offset < i_read ) + i_read = tk->i_end - tk->i_start - p_sys->stream.i_offset; + + /* Now, direct pointer or a copy ? */ + i_off = (tk->i_start + p_sys->stream.i_offset) % STREAM_CACHE_TRACK_SIZE; + if( i_off + i_read <= STREAM_CACHE_TRACK_SIZE ) + { + *pp_peek = &tk->p_buffer[i_off]; + return i_read; + } + + if( p_sys->i_peek < i_read ) + { + p_sys->p_peek = realloc( p_sys->p_peek, i_read ); + if( !p_sys->p_peek ) + { + p_sys->i_peek = 0; + return 0; + } + p_sys->i_peek = i_read; + } + + memcpy( p_sys->p_peek, &tk->p_buffer[i_off], + STREAM_CACHE_TRACK_SIZE - i_off ); + memcpy( &p_sys->p_peek[STREAM_CACHE_TRACK_SIZE - i_off], + &tk->p_buffer[0], i_read - (STREAM_CACHE_TRACK_SIZE - i_off) ); + + *pp_peek = p_sys->p_peek; + return i_read; +} + +static int AStreamSeekStream( stream_t *s, int64_t i_pos ) +{ + stream_sys_t *p_sys = s->p_sys; + access_t *p_access = p_sys->p_access; + vlc_bool_t b_aseek; + vlc_bool_t b_afastseek; + int i_maxth; + int i_new; + int i; + +#ifdef STREAM_DEBUG + msg_Dbg( s, "AStreamSeekStream: to "I64Fd" pos="I64Fd + " tk=%d start="I64Fd" offset=%d end="I64Fd, + i_pos, p_sys->i_pos, p_sys->stream.i_tk, + p_sys->stream.tk[p_sys->stream.i_tk].i_start, + p_sys->stream.i_offset, + p_sys->stream.tk[p_sys->stream.i_tk].i_end ); +#endif + + + /* Seek in our current track ? */ + if( i_pos >= p_sys->stream.tk[p_sys->stream.i_tk].i_start && + i_pos < p_sys->stream.tk[p_sys->stream.i_tk].i_end ) + { + stream_track_t *tk = &p_sys->stream.tk[p_sys->stream.i_tk]; +#ifdef STREAM_DEBUG + msg_Dbg( s, "AStreamSeekStream: current track" ); +#endif + p_sys->i_pos = i_pos; + p_sys->stream.i_offset = i_pos - tk->i_start; + + /* If there is not enough data left in the track, refill */ + /* \todo How to get a correct value for + * - refilling threshold + * - how much to refill + */ + if( (tk->i_end - tk->i_start ) - p_sys->stream.i_offset < + p_sys->stream.i_read_size ) + { + if( p_sys->stream.i_used < STREAM_READ_ATONCE / 2 ) + { + p_sys->stream.i_used = STREAM_READ_ATONCE / 2 ; + AStreamRefillStream( s ); + } + } + return VLC_SUCCESS; + } + + access2_Control( p_access, ACCESS_CAN_SEEK, &b_aseek ); + if( !b_aseek ) + { + /* We can't do nothing */ + msg_Dbg( s, "AStreamSeekStream: can't seek" ); + return VLC_EGENERIC; + } + + /* Date the current track */ + p_sys->stream.tk[p_sys->stream.i_tk].i_date = mdate(); + + /* Try to reuse already read data */ + for( i = 0; i < STREAM_CACHE_TRACK; i++ ) + { + stream_track_t *tk = &p_sys->stream.tk[i]; + + if( i_pos >= tk->i_start && i_pos <= tk->i_end ) + { +#ifdef STREAM_DEBUG + msg_Dbg( s, "AStreamSeekStream: reusing %d start="I64Fd + " end="I64Fd, i, tk->i_start, tk->i_end ); +#endif + + /* Seek at the end of the buffer */ + if( ASeek( s, tk->i_end ) ) return VLC_EGENERIC; + + /* That's it */ + p_sys->i_pos = i_pos; + p_sys->stream.i_tk = i; + p_sys->stream.i_offset = i_pos - tk->i_start; + + if( p_sys->stream.i_used < 1024 ) + p_sys->stream.i_used = 1024; + + if( AStreamRefillStream( s ) && i_pos == tk->i_end ) + return VLC_EGENERIC; + + return VLC_SUCCESS; + } + } + + access2_Control( p_access, ACCESS_CAN_SEEK, &b_afastseek ); + /* FIXME compute seek cost (instead of static 'stupid' value) */ + i_maxth = __MIN( p_sys->stream.i_read_size, STREAM_READ_ATONCE / 2 ); + if( !b_afastseek ) + i_maxth *= 3; + + /* FIXME TODO */ +#if 0 + /* Search closest segment TODO */ + for( i = 0; i < STREAM_CACHE_TRACK; i++ ) + { + stream_track_t *tk = &p_sys->stream.tk[i]; + + if( i_pos + i_maxth >= tk->i_start ) + { + msg_Dbg( s, "good segment before current pos, TODO" ); + } + if( i_pos - i_maxth <= tk->i_end ) + { + msg_Dbg( s, "good segment after current pos, TODO" ); + } + } +#endif + + /* Nothing good, seek and choose oldest segment */ + if( ASeek( s, i_pos ) ) return VLC_EGENERIC; + p_sys->i_pos = i_pos; + + i_new = 0; + for( i = 1; i < STREAM_CACHE_TRACK; i++ ) + { + if( p_sys->stream.tk[i].i_date < p_sys->stream.tk[i_new].i_date ) + i_new = i; + } + + /* Reset the segment */ + p_sys->stream.i_tk = i_new; + p_sys->stream.i_offset = 0; + p_sys->stream.tk[i_new].i_start = i_pos; + p_sys->stream.tk[i_new].i_end = i_pos; + + /* Read data */ + if( p_sys->stream.i_used < STREAM_READ_ATONCE / 2 ) + p_sys->stream.i_used = STREAM_READ_ATONCE / 2; + + if( AStreamRefillStream( s ) ) + return VLC_EGENERIC; + + return VLC_SUCCESS; +} + +static int AStreamRefillStream( stream_t *s ) +{ + stream_sys_t *p_sys = s->p_sys; + stream_track_t *tk = &p_sys->stream.tk[p_sys->stream.i_tk]; + + /* We read but won't increase i_start after initial start + offset */ + int i_toread = + __MIN( p_sys->stream.i_used, STREAM_CACHE_TRACK_SIZE - + (tk->i_end - tk->i_start - p_sys->stream.i_offset) ); + vlc_bool_t b_read = VLC_FALSE; + int64_t i_start, i_stop; + + if( i_toread <= 0 ) return VLC_EGENERIC; /* EOF */ + +#ifdef STREAM_DEBUG + msg_Dbg( s, "AStreamRefillStream: used=%d toread=%d", + p_sys->stream.i_used, i_toread ); +#endif + + i_start = mdate(); + while( i_toread > 0 ) + { + int i_off = tk->i_end % STREAM_CACHE_TRACK_SIZE; + int i_read; + + if( s->b_die ) + return VLC_EGENERIC; + + i_read = __MIN( i_toread, STREAM_CACHE_TRACK_SIZE - i_off ); + i_read = AReadStream( s, &tk->p_buffer[i_off], i_read ); + + /* msg_Dbg( s, "AStreamRefillStream: read=%d", i_read ); */ + if( i_read < 0 ) + { + msleep( STREAM_DATA_WAIT ); + continue; + } + else if( i_read == 0 ) + { + if( !b_read ) return VLC_EGENERIC; + return VLC_SUCCESS; + } + b_read = VLC_TRUE; + + /* Update end */ + tk->i_end += i_read; + + /* Windows of STREAM_CACHE_TRACK_SIZE */ + if( tk->i_end - tk->i_start > STREAM_CACHE_TRACK_SIZE ) + { + int i_invalid = tk->i_end - tk->i_start - STREAM_CACHE_TRACK_SIZE; + + tk->i_start += i_invalid; + p_sys->stream.i_offset -= i_invalid; + } + + i_toread -= i_read; + p_sys->stream.i_used -= i_read; + + p_sys->stat.i_bytes += i_read; + p_sys->stat.i_read_count++; + } + i_stop = mdate(); + + p_sys->stat.i_read_time += i_stop - i_start; + + return VLC_SUCCESS; +} + +static void AStreamPrebufferStream( stream_t *s ) +{ + stream_sys_t *p_sys = s->p_sys; + access_t *p_access = p_sys->p_access; + + int64_t i_first = 0; + int64_t i_start; + int64_t i_prebuffer = p_sys->b_quick ? STREAM_CACHE_TRACK_SIZE /100 : + ( (p_access->info.i_title > 1 || p_access->info.i_seekpoint > 1) ? + STREAM_CACHE_PREBUFFER_SIZE : STREAM_CACHE_TRACK_SIZE / 3 ); + + msg_Dbg( s, "pre-buffering..." ); + i_start = mdate(); + for( ;; ) + { + stream_track_t *tk = &p_sys->stream.tk[p_sys->stream.i_tk]; + + int64_t i_date = mdate(); + int i_read; + + if( s->b_die || tk->i_end >= i_prebuffer || + (i_first > 0 && i_first + STREAM_CACHE_PREBUFFER_LENGTH < i_date) ) + { + int64_t i_byterate; + + /* Update stat */ + p_sys->stat.i_bytes = tk->i_end - tk->i_start; + p_sys->stat.i_read_time = i_date - i_start; + i_byterate = ( I64C(1000000) * p_sys->stat.i_bytes ) / + (p_sys->stat.i_read_time+1); + + msg_Dbg( s, "pre-buffering done "I64Fd" bytes in "I64Fd"s - " + I64Fd" kbytes/s", + p_sys->stat.i_bytes, + p_sys->stat.i_read_time / I64C(1000000), + i_byterate / 1024 ); + break; + } + + /* */ + i_read = STREAM_CACHE_TRACK_SIZE - tk->i_end; + i_read = __MIN( p_sys->stream.i_read_size, i_read ); + i_read = AReadStream( s, &tk->p_buffer[tk->i_end], i_read ); + if( i_read < 0 ) + { + msleep( STREAM_DATA_WAIT ); + continue; + } + else if( i_read == 0 ) + { + /* EOF */ + break; + } + + if( i_first == 0 ) + { + i_first = mdate(); + msg_Dbg( s, "received first data for our buffer"); + } + + tk->i_end += i_read; + + p_sys->stat.i_read_count++; + } +} + + +/**************************************************************************** + * stream_ReadLine: + ****************************************************************************/ +/** + * Read from the stream untill first newline. + * \param s Stream handle to read from + * \return A pointer to the allocated output string. You need to free this when you are done. + */ +#define STREAM_PROBE_LINE 2048 +#define STREAM_LINE_MAX (2048*100) +char * stream_ReadLine( stream_t *s ) +{ + char *p_line = NULL; + int i_line = 0, i_read = 0; + + while( i_read < STREAM_LINE_MAX ) + { + char *psz_eol; + uint8_t *p_data; + int i_data; + int64_t i_pos; + + /* Probe new data */ + i_data = stream_Peek( s, &p_data, STREAM_PROBE_LINE ); + if( i_data <= 0 ) break; /* No more data */ + + /* BOM detection */ + i_pos = stream_Tell( s ); + if( i_pos == 0 && i_data > 4 ) + { + int i_bom_size = 0; + char *psz_encoding = NULL; + + if( p_data[0] == 0xEF && p_data[1] == 0xBB && p_data[2] == 0xBF ) + { + psz_encoding = strdup( "UTF-8" ); + i_bom_size = 3; + } + else if( p_data[0] == 0x00 && p_data[1] == 0x00 ) + { + if( p_data[2] == 0xFE && p_data[3] == 0xFF ) + { + psz_encoding = strdup( "UTF-32BE" ); + s->i_char_width = 4; + i_bom_size = 4; + } + } + else if( p_data[0] == 0xFF && p_data[1] == 0xFE ) + { + if( p_data[2] == 0x00 && p_data[3] == 0x00 ) + { + psz_encoding = strdup( "UTF-32LE" ); + s->i_char_width = 4; + s->b_little_endian = VLC_TRUE; + i_bom_size = 4; + } + else + { + psz_encoding = strdup( "UTF-16LE" ); + s->b_little_endian = VLC_TRUE; + s->i_char_width = 2; + i_bom_size = 2; + } + } + else if( p_data[0] == 0xFE && p_data[1] == 0xFF ) + { + psz_encoding = strdup( "UTF-16BE" ); + s->i_char_width = 2; + i_bom_size = 2; + } + + /* Seek past the BOM */ + if( i_bom_size ) + { + stream_Seek( s, i_bom_size ); + p_data += i_bom_size; + i_data -= i_bom_size; + } + + /* Open the converter if we need it */ + if( psz_encoding != NULL ) + { + input_thread_t *p_input; + msg_Dbg( s, "%s BOM detected", psz_encoding ); + if( s->i_char_width > 1 ) + { + s->conv = vlc_iconv_open( "UTF-8", psz_encoding ); + if( s->conv == (vlc_iconv_t)-1 ) + { + msg_Err( s, "iconv_open failed" ); + } + var_Create( s->p_parent->p_parent, "subsdec-encoding", VLC_VAR_STRING | VLC_VAR_DOINHERIT ); + var_SetString( s->p_parent->p_parent, "subsdec-encoding", "UTF-8" ); + } + p_input = (input_thread_t *)vlc_object_find( s, VLC_OBJECT_INPUT, FIND_PARENT ); + if( p_input != NULL) + { + var_Create( p_input, "subsdec-encoding", VLC_VAR_STRING | VLC_VAR_DOINHERIT ); + var_SetString( p_input, "subsdec-encoding", "UTF-8" ); + vlc_object_release( p_input ); + } + if( psz_encoding ) free( psz_encoding ); + } + } + + if( i_data % s->i_char_width ) + { + msg_Warn( s, "the read is not i_char_width compatible"); + } + + /* Check if there is an EOL */ + if( ( psz_eol = memchr( p_data, '\n', i_data ) ) ) + { + if( s->b_little_endian == VLC_TRUE && s->i_char_width > 1 ) + { + psz_eol += ( s->i_char_width - 1 ); + } + i_data = (psz_eol - (char *)p_data) + 1; + p_line = realloc( p_line, i_line + i_data + s->i_char_width ); /* add \0 */ + i_data = stream_Read( s, &p_line[i_line], i_data ); + if( i_data <= 0 ) break; /* Hmmm */ + i_line += i_data - s->i_char_width; /* skip \n */; + i_read += i_data; + + /* We have our line */ + break; + } + + /* Read data (+1 for easy \0 append) */ + p_line = realloc( p_line, i_line + STREAM_PROBE_LINE + s->i_char_width ); + i_data = stream_Read( s, &p_line[i_line], STREAM_PROBE_LINE ); + if( i_data <= 0 ) break; /* Hmmm */ + i_line += i_data; + i_read += i_data; + } + + if( i_read > 0 ) + { + int j; + for( j = 0; j < s->i_char_width; j++ ) + { + p_line[i_line + j] = '\0'; + } + i_line += s->i_char_width; /* the added \0 */ + if( s->i_char_width > 1 ) + { + size_t i_in = 0, i_out = 0; + char * p_in = NULL; + char * p_out = NULL; + char * psz_new_line = NULL; + + /* iconv */ + psz_new_line = malloc( i_line ); + + i_in = i_out = (size_t)i_line; + p_in = p_line; + p_out = psz_new_line; + + if( vlc_iconv( s->conv, &p_in, &i_in, &p_out, &i_out ) == (size_t)-1 ) + { + msg_Err( s, "iconv failed" ); + msg_Dbg( s, "original: %d, in %d, out %d", i_line, (int)i_in, (int)i_out ); + } + if( p_line ) free( p_line ); + p_line = psz_new_line; + i_line = (size_t)i_line - i_out; /* does not include \0 */ + } + + /* Remove trailing LF/CR */ + while( i_line > 0 && ( p_line[i_line-2] == '\r' || + p_line[i_line-2] == '\n') ) i_line--; + + /* Make sure the \0 is there */ + p_line[i_line-1] = '\0'; + + return p_line; + } + + /* We failed to read any data, probably EOF */ + if( p_line ) free( p_line ); + if( s->conv != (vlc_iconv_t)(-1) ) vlc_iconv_close( s->conv ); + return NULL; +} + +/**************************************************************************** + * Access reading/seeking wrappers to handle concatenated streams. + ****************************************************************************/ +static int AReadStream( stream_t *s, void *p_read, int i_read ) +{ + stream_sys_t *p_sys = s->p_sys; + access_t *p_access = p_sys->p_access; + int i_read_orig = i_read; + int i_total; + + if( !p_sys->i_list ) + { + i_read = p_access->pf_read( p_access, p_read, i_read ); + stats_UpdateInteger( s->p_parent->p_parent , STATS_READ_BYTES, i_read, + &i_total ); + stats_UpdateFloat( s->p_parent->p_parent , STATS_INPUT_BITRATE, + (float)i_total, NULL ); + stats_UpdateInteger( s->p_parent->p_parent , STATS_READ_PACKETS, 1, + NULL ); + return i_read; + } + + i_read = p_sys->p_list_access->pf_read( p_sys->p_list_access, p_read, + i_read ); + + /* If we reached an EOF then switch to the next stream in the list */ + if( i_read == 0 && p_sys->i_list_index + 1 < p_sys->i_list ) + { + char *psz_name = p_sys->list[++p_sys->i_list_index]->psz_path; + access_t *p_list_access; + + msg_Dbg( s, "opening input `%s'", psz_name ); + + p_list_access = access2_New( s, p_access->psz_access, 0, psz_name, 0 ); + + if( !p_list_access ) return 0; + + if( p_sys->p_list_access != p_access ) + access2_Delete( p_sys->p_list_access ); + + p_sys->p_list_access = p_list_access; + + /* We have to read some data */ + return AReadStream( s, p_read, i_read_orig ); + } + + /* Update read bytes in input */ + stats_UpdateInteger( s->p_parent->p_parent , STATS_READ_BYTES, i_read, + &i_total ); + stats_UpdateFloat( s->p_parent->p_parent , STATS_INPUT_BITRATE, + (float)i_total, NULL ); + stats_UpdateInteger( s->p_parent->p_parent , STATS_READ_PACKETS, 1, NULL ); + return i_read; +} + +static block_t *AReadBlock( stream_t *s, vlc_bool_t *pb_eof ) +{ + stream_sys_t *p_sys = s->p_sys; + access_t *p_access = p_sys->p_access; + block_t *p_block; + vlc_bool_t b_eof; + int i_total; + + if( !p_sys->i_list ) + { + p_block = p_access->pf_block( p_access ); + if( pb_eof ) *pb_eof = p_access->info.b_eof; + if( p_block && p_access->p_libvlc->b_stats ) + { + stats_UpdateInteger( s->p_parent->p_parent, STATS_READ_BYTES, + p_block->i_buffer, &i_total ); + stats_UpdateFloat( s->p_parent->p_parent , STATS_INPUT_BITRATE, + (float)i_total, NULL ); + stats_UpdateInteger( s->p_parent->p_parent , STATS_READ_PACKETS, 1, NULL ); + } + return p_block; + } + + p_block = p_sys->p_list_access->pf_block( p_access ); + b_eof = p_sys->p_list_access->info.b_eof; + if( pb_eof ) *pb_eof = b_eof; + + /* If we reached an EOF then switch to the next stream in the list */ + if( !p_block && b_eof && p_sys->i_list_index + 1 < p_sys->i_list ) + { + char *psz_name = p_sys->list[++p_sys->i_list_index]->psz_path; + access_t *p_list_access; + + msg_Dbg( s, "opening input `%s'", psz_name ); + + p_list_access = access2_New( s, p_access->psz_access, 0, psz_name, 0 ); + + if( !p_list_access ) return 0; + + if( p_sys->p_list_access != p_access ) + access2_Delete( p_sys->p_list_access ); + + p_sys->p_list_access = p_list_access; + + /* We have to read some data */ + return AReadBlock( s, pb_eof ); + } + if( p_block ) + { + stats_UpdateInteger( s->p_parent->p_parent, STATS_READ_BYTES, + p_block->i_buffer, &i_total ); + stats_UpdateFloat( s->p_parent->p_parent , STATS_INPUT_BITRATE, + (float)i_total, NULL ); + stats_UpdateInteger( s->p_parent->p_parent , STATS_READ_PACKETS, + 1 , NULL); + } + + return p_block; +} + +static int ASeek( stream_t *s, int64_t i_pos ) +{ + stream_sys_t *p_sys = s->p_sys; + access_t *p_access = p_sys->p_access; + + /* Check which stream we need to access */ + if( p_sys->i_list ) + { + int i; + char *psz_name; + int64_t i_size = 0; + access_t *p_list_access = 0; + + for( i = 0; i < p_sys->i_list - 1; i++ ) + { + if( i_pos < p_sys->list[i]->i_size + i_size ) break; + i_size += p_sys->list[i]->i_size; + } + psz_name = p_sys->list[i]->psz_path; + + if( i != p_sys->i_list_index ) + msg_Dbg( s, "opening input `%s'", psz_name ); + + if( i != p_sys->i_list_index && i != 0 ) + { + p_list_access = + access2_New( s, p_access->psz_access, 0, psz_name, 0 ); + } + else if( i != p_sys->i_list_index ) + { + p_list_access = p_access; + } + + if( p_list_access ) + { + if( p_sys->p_list_access != p_access ) + access2_Delete( p_sys->p_list_access ); + + p_sys->p_list_access = p_list_access; + } + + p_sys->i_list_index = i; + return p_sys->p_list_access->pf_seek( p_sys->p_list_access, + i_pos - i_size ); + } + + return p_access->pf_seek( p_access, i_pos ); +}