X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=modules%2Faccess%2Fmms%2Fmmsh.c;h=b89565ccfd6f8033a47f189ec6a2e18c6a6f8487;hb=2e847d8484163b50d8fe98350f3dc96ac8a1a43f;hp=0ba3bc25f65011cd02c4bd46c2fa185cd91a7518;hpb=4cf2f458036f18bcbf883d650f9e1af88a0c724d;p=vlc diff --git a/modules/access/mms/mmsh.c b/modules/access/mms/mmsh.c index 0ba3bc25f6..b89565ccfd 100644 --- a/modules/access/mms/mmsh.c +++ b/modules/access/mms/mmsh.c @@ -1,7 +1,7 @@ /***************************************************************************** * mmsh.c: ***************************************************************************** - * Copyright (C) 2001, 2002 VideoLAN + * Copyright (C) 2001, 2002 the VideoLAN team * $Id$ * * Authors: Laurent Aimar @@ -18,20 +18,24 @@ * * 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. *****************************************************************************/ /***************************************************************************** * Preamble *****************************************************************************/ -#include -#include -#include +#ifdef HAVE_CONFIG_H +# include "config.h" +#endif -#include "vlc_playlist.h" +#include +#include +#include +#include -#include "network.h" +#include +#include #include "asf.h" #include "buffer.h" @@ -39,121 +43,571 @@ #include "mmsh.h" /* TODO: - * - http_proxy * - authentication */ /***************************************************************************** * Local prototypes *****************************************************************************/ -int E_(MMSHOpen) ( input_thread_t * ); -void E_(MMSHClose) ( input_thread_t * ); +int MMSHOpen ( access_t * ); +void MMSHClose ( access_t * ); -static ssize_t Read( input_thread_t *, byte_t *, size_t ); -static ssize_t ReadRedirect( input_thread_t *, byte_t *, size_t ); -static void Seek( input_thread_t *, off_t ); +static block_t *Block( access_t *p_access ); +static ssize_t ReadRedirect( access_t *, uint8_t *, size_t ); +static int Seek( access_t *, uint64_t ); +static int Control( access_t *, int, va_list ); -static int Start( input_thread_t *, off_t ); -static void Stop( input_thread_t * ); -static int GetPacket( input_thread_t *, chunk_t * ); +static int Describe( access_t *, char **ppsz_location ); +static int Start( access_t *, uint64_t ); +static void Stop( access_t * ); + +static int GetPacket( access_t *, chunk_t * ); +static void GetHeader( access_t *p_access ); + +static int Restart( access_t * ); +static int Reset( access_t * ); + +//#define MMSH_USER_AGENT "NSPlayer/4.1.0.3856" +#define MMSH_USER_AGENT "NSPlayer/7.10.0.3059" /**************************************************************************** * Open: connect to ftp server and ask for file ****************************************************************************/ -int E_( MMSHOpen ) ( input_thread_t *p_input ) +int MMSHOpen( access_t *p_access ) { access_sys_t *p_sys; - - char *psz; char *psz_location = NULL; - int i_code; + char *psz_proxy; - vlc_value_t val; + STANDARD_BLOCK_ACCESS_INIT - /* init p_sys */ - p_input->p_access_data = p_sys = malloc( sizeof( access_sys_t ) ); - p_sys->i_proto = MMS_PROTO_HTTP; + p_sys->i_proto= MMS_PROTO_HTTP; + p_sys->fd = -1; - p_sys->fd = -1; - p_sys->i_request_context = 1; - p_sys->b_broadcast = VLC_TRUE; - p_sys->p_packet = NULL; - p_sys->i_packet_sequence = 0; - p_sys->i_packet_used = 0; - p_sys->i_packet_length = 0; - p_sys->i_pos = 0; - p_sys->i_request_context = 1; - E_( GenerateGuid )( &p_sys->guid ); + /* Handle proxy */ + p_sys->b_proxy = false; + memset( &p_sys->proxy, 0, sizeof(p_sys->proxy) ); + + /* Check proxy */ + /* TODO reuse instead http-proxy from http access ? */ + psz_proxy = var_CreateGetNonEmptyString( p_access, "mmsh-proxy" ); + if( !psz_proxy ) + { + char *psz_http_proxy = var_InheritString( p_access, "http-proxy" ); + if( psz_http_proxy ) + { + psz_proxy = psz_http_proxy; + var_SetString( p_access, "mmsh-proxy", psz_proxy ); + } + } + + if( psz_proxy ) + { + p_sys->b_proxy = true; + vlc_UrlParse( &p_sys->proxy, psz_proxy, 0 ); + free( psz_proxy ); + } +#ifdef HAVE_GETENV + else + { + const char *http_proxy = getenv( "http_proxy" ); + if( http_proxy ) + { + p_sys->b_proxy = true; + vlc_UrlParse( &p_sys->proxy, http_proxy, 0 ); + } + } +#endif + + if( p_sys->b_proxy ) + { + if( ( p_sys->proxy.psz_host == NULL ) || + ( *p_sys->proxy.psz_host == '\0' ) ) + { + msg_Warn( p_access, "invalid proxy host" ); + vlc_UrlClean( &p_sys->proxy ); + free( p_sys ); + return VLC_EGENERIC; + } + + if( p_sys->proxy.i_port <= 0 ) + p_sys->proxy.i_port = 80; + msg_Dbg( p_access, "Using http proxy %s:%d", + p_sys->proxy.psz_host, p_sys->proxy.i_port ); + } /* open a tcp connection */ - vlc_UrlParse( &p_sys->url, p_input->psz_name, 0 ); - if( p_sys->url.psz_host == NULL && *p_sys->url.psz_host == '\0' ) + vlc_UrlParse( &p_sys->url, p_access->psz_path, 0 ); + if( ( p_sys->url.psz_host == NULL ) || + ( *p_sys->url.psz_host == '\0' ) ) { - msg_Err( p_input, "invalid host" ); + msg_Err( p_access, "invalid host" ); goto error; } if( p_sys->url.i_port <= 0 ) - { p_sys->url.i_port = 80; + + if( Describe( p_access, &psz_location ) ) + goto error; + + /* Handle redirection */ + if( psz_location && *psz_location ) + { + msg_Dbg( p_access, "redirection to %s", psz_location ); + + input_thread_t * p_input = access_GetParentInput( p_access ); + input_item_t * p_new_loc; + + if( !p_input ) + { + free( psz_location ); + goto error; + } + /** \bug we do not autodelete here */ + p_new_loc = input_item_New( p_access, psz_location, psz_location ); + input_item_AddSubItem( input_GetItem( p_input ), p_new_loc ); + vlc_gc_decref( p_new_loc ); + vlc_object_release( p_input ); + + free( psz_location ); + + p_access->pf_block = NULL; + p_access->pf_read = ReadRedirect; + return VLC_SUCCESS; } + free( psz_location ); - if( ( p_sys->fd = net_OpenTCP( p_input, p_sys->url.psz_host, - p_sys->url.i_port ) ) < 0 ) + /* Start playing */ + if( Start( p_access, 0 ) ) { - msg_Err( p_input, "cannot connect to%s:%d", p_sys->url.psz_host, p_sys->url.i_port ); + msg_Err( p_access, "cannot start stream" ); + free( p_sys->p_header ); goto error; } - /* send first request */ - net_Printf( VLC_OBJECT(p_input), p_sys->fd, - "GET %s HTTP/1.0\r\n" + if( !p_sys->b_broadcast ) + { + p_access->info.i_size = p_sys->asfh.i_file_size; + } + + return VLC_SUCCESS; + +error: + vlc_UrlClean( &p_sys->proxy ); + vlc_UrlClean( &p_sys->url ); + free( p_sys ); + return VLC_EGENERIC; +} + +/***************************************************************************** + * Close: free unused data structures + *****************************************************************************/ +void MMSHClose ( access_t *p_access ) +{ + access_sys_t *p_sys = p_access->p_sys; + + Stop( p_access ); + + free( p_sys->p_header ); + + vlc_UrlClean( &p_sys->proxy ); + vlc_UrlClean( &p_sys->url ); + free( p_sys ); +} + +/***************************************************************************** + * Control: + *****************************************************************************/ +static int Control( access_t *p_access, int i_query, va_list args ) +{ + access_sys_t *p_sys = p_access->p_sys; + bool *pb_bool; + bool b_bool; + int64_t *pi_64; + int i_int; + + switch( i_query ) + { + /* */ + case ACCESS_CAN_SEEK: + pb_bool = (bool*)va_arg( args, bool* ); + *pb_bool = !p_sys->b_broadcast; + break; + + case ACCESS_CAN_FASTSEEK: + pb_bool = (bool*)va_arg( args, bool* ); + *pb_bool = false; + break; + + case ACCESS_CAN_PAUSE: + case ACCESS_CAN_CONTROL_PACE: + pb_bool = (bool*)va_arg( args, bool* ); + *pb_bool = true; + break; + + /* */ + case ACCESS_GET_PTS_DELAY: + pi_64 = (int64_t*)va_arg( args, int64_t * ); + *pi_64 = (int64_t)var_GetInteger( p_access, "mms-caching" ) * INT64_C(1000); + break; + + case ACCESS_GET_PRIVATE_ID_STATE: + i_int = (int)va_arg( args, int ); + pb_bool = (bool *)va_arg( args, bool * ); + + if( (i_int < 0) || (i_int > 127) ) + return VLC_EGENERIC; + *pb_bool = p_sys->asfh.stream[i_int].i_selected ? true : false; + break; + + /* */ + case ACCESS_SET_PAUSE_STATE: + b_bool = (bool)va_arg( args, int ); + if( b_bool ) + Stop( p_access ); + else + Seek( p_access, p_access->info.i_pos ); + break; + + case ACCESS_GET_TITLE_INFO: + case ACCESS_SET_TITLE: + case ACCESS_SET_SEEKPOINT: + case ACCESS_SET_PRIVATE_ID_STATE: + case ACCESS_GET_CONTENT_TYPE: + return VLC_EGENERIC; + + default: + msg_Warn( p_access, "unimplemented query in control" ); + return VLC_EGENERIC; + + } + return VLC_SUCCESS; +} + +/***************************************************************************** + * Seek: try to go at the right place + *****************************************************************************/ +static int Seek( access_t *p_access, uint64_t i_pos ) +{ + access_sys_t *p_sys = p_access->p_sys; + chunk_t ck; + uint64_t i_offset; + uint64_t i_packet; + + msg_Dbg( p_access, "seeking to %"PRId64, i_pos ); + + i_packet = ( i_pos - p_sys->i_header ) / p_sys->asfh.i_min_data_packet_size; + i_offset = ( i_pos - p_sys->i_header ) % p_sys->asfh.i_min_data_packet_size; + + Stop( p_access ); + Start( p_access, i_packet * p_sys->asfh.i_min_data_packet_size ); + + while( vlc_object_alive (p_access) ) + { + if( GetPacket( p_access, &ck ) ) + break; + + /* skip headers */ + if( ck.i_type != 0x4824 ) + break; + + msg_Warn( p_access, "skipping header" ); + } + + p_access->info.i_pos = i_pos; + p_access->info.b_eof = false; + p_sys->i_packet_used += i_offset; + + return VLC_SUCCESS; +} + +/***************************************************************************** + * ReadRedirect: + *****************************************************************************/ +static ssize_t ReadRedirect( access_t *p_access, uint8_t *p, size_t i_len ) +{ + VLC_UNUSED(p_access); VLC_UNUSED(p); VLC_UNUSED(i_len); + return 0; +} + +/***************************************************************************** + * Block: + *****************************************************************************/ +static block_t *Block( access_t *p_access ) +{ + access_sys_t *p_sys = p_access->p_sys; + const unsigned i_packet_min = p_sys->asfh.i_min_data_packet_size; + + if( p_access->info.i_pos < p_sys->i_start + p_sys->i_header ) + { + const size_t i_offset = p_access->info.i_pos - p_sys->i_start; + const size_t i_copy = p_sys->i_header - i_offset; + + block_t *p_block = block_New( p_access, i_copy ); + if( !p_block ) + return NULL; + + memcpy( p_block->p_buffer, &p_sys->p_header[i_offset], i_copy ); + p_access->info.i_pos += i_copy; + return p_block; + } + else if( p_sys->i_packet_length > 0 && + p_sys->i_packet_used < __MAX( p_sys->i_packet_length, i_packet_min ) ) + { + size_t i_copy = 0; + size_t i_padding = 0; + + if( p_sys->i_packet_used < p_sys->i_packet_length ) + i_copy = p_sys->i_packet_length - p_sys->i_packet_used; + if( __MAX( p_sys->i_packet_used, p_sys->i_packet_length ) < i_packet_min ) + i_padding = i_packet_min - __MAX( p_sys->i_packet_used, p_sys->i_packet_length ); + + block_t *p_block = block_New( p_access, i_copy + i_padding ); + if( !p_block ) + return NULL; + + if( i_copy > 0 ) + memcpy( &p_block->p_buffer[0], &p_sys->p_packet[p_sys->i_packet_used], i_copy ); + if( i_padding > 0 ) + memset( &p_block->p_buffer[i_copy], 0, i_padding ); + + p_sys->i_packet_used += i_copy + i_padding; + p_access->info.i_pos += i_copy + i_padding; + return p_block; + + } + + chunk_t ck; + if( GetPacket( p_access, &ck ) ) + { + int i_ret = -1; + if( p_sys->b_broadcast ) + { + if( (ck.i_type == 0x4524) && (ck.i_sequence != 0) ) + i_ret = Restart( p_access ); + else if( ck.i_type == 0x4324 ) + i_ret = Reset( p_access ); + } + if( i_ret ) + { + p_access->info.b_eof = true; + return 0; + } + } + if( ck.i_type != 0x4424 ) + { + p_sys->i_packet_used = 0; + p_sys->i_packet_length = 0; + } + + return NULL; +} + +/* */ +static int Restart( access_t *p_access ) +{ + access_sys_t *p_sys = p_access->p_sys; + char *psz_location = NULL; + + msg_Dbg( p_access, "Restart the stream" ); + p_sys->i_start = p_access->info.i_pos; + + /* */ + msg_Dbg( p_access, "stoping the stream" ); + Stop( p_access ); + + /* */ + msg_Dbg( p_access, "describe the stream" ); + if( Describe( p_access, &psz_location ) ) + { + msg_Err( p_access, "describe failed" ); + return VLC_EGENERIC; + } + free( psz_location ); + + /* */ + if( Start( p_access, 0 ) ) + { + msg_Err( p_access, "Start failed" ); + return VLC_EGENERIC; + } + return VLC_SUCCESS; +} +static int Reset( access_t *p_access ) +{ + access_sys_t *p_sys = p_access->p_sys; + asf_header_t old_asfh = p_sys->asfh; + int i; + + msg_Dbg( p_access, "Reset the stream" ); + p_sys->i_start = p_access->info.i_pos; + + /* */ + p_sys->i_packet_sequence = 0; + p_sys->i_packet_used = 0; + p_sys->i_packet_length = 0; + p_sys->p_packet = NULL; + + /* Get the next header FIXME memory loss ? */ + GetHeader( p_access ); + if( p_sys->i_header <= 0 ) + return VLC_EGENERIC; + + asf_HeaderParse ( &p_sys->asfh, + p_sys->p_header, p_sys->i_header ); + msg_Dbg( p_access, "packet count=%"PRId64" packet size=%d", + p_sys->asfh.i_data_packets_count, + p_sys->asfh.i_min_data_packet_size ); + + asf_StreamSelect( &p_sys->asfh, + var_CreateGetInteger( p_access, "mms-maxbitrate" ), + var_CreateGetBool( p_access, "mms-all" ), + var_CreateGetInteger( p_access, "audio" ), + var_CreateGetInteger( p_access, "video" ) ); + + /* Check we have comptible asfh */ + for( i = 1; i < 128; i++ ) + { + asf_stream_t *p_old = &old_asfh.stream[i]; + asf_stream_t *p_new = &p_sys->asfh.stream[i]; + + if( p_old->i_cat != p_new->i_cat || p_old->i_selected != p_new->i_selected ) + break; + } + if( i < 128 ) + { + msg_Warn( p_access, "incompatible asf header, restart" ); + return Restart( p_access ); + } + + /* */ + p_sys->i_packet_used = 0; + p_sys->i_packet_length = 0; + return VLC_SUCCESS; +} + +static int OpenConnection( access_t *p_access ) +{ + access_sys_t *p_sys = p_access->p_sys; + vlc_url_t srv = p_sys->b_proxy ? p_sys->proxy : p_sys->url; + + if( ( p_sys->fd = net_ConnectTCP( p_access, + srv.psz_host, srv.i_port ) ) < 0 ) + { + msg_Err( p_access, "cannot connect to %s:%d", + srv.psz_host, srv.i_port ); + return VLC_EGENERIC; + } + + if( p_sys->b_proxy ) + { + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, + "GET http://%s:%d%s HTTP/1.0\r\n", + p_sys->url.psz_host, p_sys->url.i_port, + ( (p_sys->url.psz_path == NULL) || + (*p_sys->url.psz_path == '\0') ) ? + "/" : p_sys->url.psz_path ); + + /* Proxy Authentication */ + if( p_sys->proxy.psz_username && *p_sys->proxy.psz_username ) + { + char *buf; + char *b64; + + if( asprintf( &buf, "%s:%s", p_sys->proxy.psz_username, + p_sys->proxy.psz_password ? p_sys->proxy.psz_password : "" ) == -1 ) + return VLC_ENOMEM; + + b64 = vlc_b64_encode( buf ); + free( buf ); + + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, + "Proxy-Authorization: Basic %s\r\n", b64 ); + free( b64 ); + } + } + else + { + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, + "GET %s HTTP/1.0\r\n" + "Host: %s:%d\r\n", + ( (p_sys->url.psz_path == NULL) || + (*p_sys->url.psz_path == '\0') ) ? + "/" : p_sys->url.psz_path, + p_sys->url.psz_host, p_sys->url.i_port ); + } + return VLC_SUCCESS; +} + +/***************************************************************************** + * Describe: + *****************************************************************************/ +static int Describe( access_t *p_access, char **ppsz_location ) +{ + access_sys_t *p_sys = p_access->p_sys; + char *psz_location = NULL; + char *psz; + int i_code; + + /* Reinit context */ + p_sys->b_broadcast = true; + p_sys->i_request_context = 1; + p_sys->i_packet_sequence = 0; + p_sys->i_packet_used = 0; + p_sys->i_packet_length = 0; + p_sys->p_packet = NULL; + + GenerateGuid ( &p_sys->guid ); + + if( OpenConnection( p_access ) ) + return VLC_EGENERIC; + + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, "Accept: */*\r\n" - "User-Agent: NSPlayer/4.1.0.3856\r\n" - "Host: %s:%d\r\n" + "User-Agent: "MMSH_USER_AGENT"\r\n" "Pragma: no-cache,rate=1.000000,stream-time=0,stream-offset=0:0,request-context=%d,max-duration=0\r\n" "Pragma: xClientGUID={"GUID_FMT"}\r\n" "Connection: Close\r\n", - ( p_sys->url.psz_path == NULL || *p_sys->url.psz_path == '\0' ) ? "/" : p_sys->url.psz_path, - p_sys->url.psz_host, p_sys->url.i_port, p_sys->i_request_context++, GUID_PRINT( p_sys->guid ) ); - if( net_Printf( VLC_OBJECT(p_input), p_sys->fd, "\r\n" ) < 0 ) + if( net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, "\r\n" ) < 0 ) { - msg_Err( p_input, "failed to send request" ); + msg_Err( p_access, "failed to send request" ); goto error; } /* Receive the http header */ - if( ( psz = net_Gets( VLC_OBJECT(p_input), p_sys->fd ) ) == NULL ) + if( ( psz = net_Gets( p_access, p_sys->fd, NULL ) ) == NULL ) { - msg_Err( p_input, "failed to read answer" ); + msg_Err( p_access, "failed to read answer" ); goto error; } + if( strncmp( psz, "HTTP/1.", 7 ) ) { - msg_Err( p_input, "invalid HTTP reply '%s'", psz ); + msg_Err( p_access, "invalid HTTP reply '%s'", psz ); free( psz ); goto error; } i_code = atoi( &psz[9] ); if( i_code >= 400 ) { - msg_Err( p_input, "error: %s", psz ); + msg_Err( p_access, "error: %s", psz ); free( psz ); goto error; } - msg_Dbg( p_input, "HTTP reply '%s'", psz ); + msg_Dbg( p_access, "HTTP reply '%s'", psz ); free( psz ); for( ;; ) { - char *psz = net_Gets( p_input, p_sys->fd ); + char *psz = net_Gets( p_access, p_sys->fd, NULL ); char *p; if( psz == NULL ) { - msg_Err( p_input, "failed to read answer" ); + msg_Err( p_access, "failed to read answer" ); goto error; } @@ -165,7 +619,7 @@ int E_( MMSHOpen ) ( input_thread_t *p_input ) if( ( p = strchr( psz, ':' ) ) == NULL ) { - msg_Err( p_input, "malformed header line: %s", psz ); + msg_Err( p_access, "malformed header line: %s", psz ); free( psz ); goto error; } @@ -176,22 +630,23 @@ int E_( MMSHOpen ) ( input_thread_t *p_input ) * asx FIXME */ if( !strcasecmp( psz, "Pragma" ) ) { - if( !strncasecmp( p, "features", 8 ) ) + if( strstr( p, "features" ) ) { + /* FIXME, it is a bit badly done here ..... */ if( strstr( p, "broadcast" ) ) { - msg_Dbg( p_input, "stream type = broadcast" ); - p_sys->b_broadcast = VLC_TRUE; + msg_Dbg( p_access, "stream type = broadcast" ); + p_sys->b_broadcast = true; } else if( strstr( p, "seekable" ) ) { - msg_Dbg( p_input, "stream type = seekable" ); - p_sys->b_broadcast = VLC_FALSE; + msg_Dbg( p_access, "stream type = seekable" ); + p_sys->b_broadcast = false; } else { - msg_Warn( p_input, "unknow stream types (%s)", p ); - p_sys->b_broadcast = VLC_FALSE; + msg_Warn( p_access, "unknow stream types (%s)", p ); + p_sys->b_broadcast = false; } } } @@ -204,307 +659,133 @@ int E_( MMSHOpen ) ( input_thread_t *p_input ) } /* Handle the redirection */ - if( ( i_code == 301 || i_code == 302 || - i_code == 303 || i_code == 307 ) && + if( ( (i_code == 301) || (i_code == 302) || + (i_code == 303) || (i_code == 307) ) && psz_location && *psz_location ) { - playlist_t * p_playlist; - - msg_Dbg( p_input, "redirection to %s", psz_location ); + msg_Dbg( p_access, "redirection to %s", psz_location ); net_Close( p_sys->fd ); p_sys->fd = -1; - p_playlist = vlc_object_find( p_input, VLC_OBJECT_PLAYLIST, FIND_PARENT ); - if( !p_playlist ) - { - msg_Err( p_input, "redirection failed: can't find playlist" ); - goto error; - } - p_playlist->pp_items[p_playlist->i_index]->b_autodeletion = VLC_TRUE; - playlist_Add( p_playlist, psz_location, psz_location, - PLAYLIST_INSERT | PLAYLIST_GO, - p_playlist->i_index + 1 ); - vlc_object_release( p_playlist ); - - p_input->pf_read = ReadRedirect; - p_input->pf_seek = NULL; - p_input->pf_set_program = input_SetProgram; - p_input->pf_set_area = NULL; - - /* *** finished to set some variable *** */ - vlc_mutex_lock( &p_input->stream.stream_lock ); - p_input->stream.b_pace_control = 0; - p_input->stream.p_selected_area->i_size = 0; - p_input->stream.b_seekable = 0; - p_input->stream.p_selected_area->i_tell = 0; - p_input->stream.i_method = INPUT_METHOD_NETWORK; - vlc_mutex_unlock( &p_input->stream.stream_lock ); - + *ppsz_location = psz_location; return VLC_SUCCESS; } + free( psz_location ); /* Read the asf header */ - p_sys->i_header = 0; - p_sys->p_header = NULL; - for( ;; ) - { - chunk_t ck; - if( GetPacket( p_input, &ck ) || - ck.i_type != 0x4824 ) - { - break; - } - - if( ck.i_data > 0 ) - { - p_sys->i_header += ck.i_data; - p_sys->p_header = realloc( p_sys->p_header, p_sys->i_header ); - memcpy( &p_sys->p_header[p_sys->i_header - ck.i_data], - ck.p_data, ck.i_data ); - } - } - msg_Dbg( p_input, "complete header size=%d", p_sys->i_header ); + GetHeader( p_access ); if( p_sys->i_header <= 0 ) { - msg_Err( p_input, "header size == 0" ); + msg_Err( p_access, "header size == 0" ); goto error; } /* close this connection */ - net_Close( p_sys->fd ); p_sys->fd = -1; + net_Close( p_sys->fd ); + p_sys->fd = -1; /* *** parse header and get stream and their id *** */ /* get all streams properties, * * TODO : stream bitrates properties(optional) * and bitrate mutual exclusion(optional) */ - E_( asf_HeaderParse )( &p_sys->asfh, - p_sys->p_header, p_sys->i_header ); - msg_Dbg( p_input, "packet count=%lld packet size=%d", + asf_HeaderParse ( &p_sys->asfh, + p_sys->p_header, p_sys->i_header ); + msg_Dbg( p_access, "packet count=%"PRId64" packet size=%d", p_sys->asfh.i_data_packets_count, p_sys->asfh.i_min_data_packet_size ); - E_( asf_StreamSelect)( &p_sys->asfh, - config_GetInt( p_input, "mms-maxbitrate" ), - config_GetInt( p_input, "mms-all" ), - config_GetInt( p_input, "audio" ), - config_GetInt( p_input, "video" ) ); - - if( Start( p_input, 0 ) ) - { - msg_Err( p_input, "cannot start stream" ); + if( p_sys->asfh.i_min_data_packet_size <= 0 ) goto error; - } - - /* *** set exported functions *** */ - p_input->pf_read = Read; - p_input->pf_seek = Seek; - p_input->pf_set_program = input_SetProgram; - p_input->pf_set_area = NULL; - - p_input->p_private = NULL; - p_input->i_mtu = 3 * p_sys->asfh.i_min_data_packet_size; - - /* *** finished to set some variable *** */ - vlc_mutex_lock( &p_input->stream.stream_lock ); - p_input->stream.b_pace_control = 0; - if( p_sys->b_broadcast ) - { - p_input->stream.p_selected_area->i_size = 0; - p_input->stream.b_seekable = 0; - } - else - { - p_input->stream.p_selected_area->i_size = p_sys->asfh.i_file_size; - p_input->stream.b_seekable = 1; - } - p_input->stream.p_selected_area->i_tell = 0; - p_input->stream.i_method = INPUT_METHOD_NETWORK; - vlc_mutex_unlock( &p_input->stream.stream_lock ); - - /* Update default_pts to a suitable value for mms access */ - var_Get( p_input, "mms-caching", &val ); - p_input->i_pts_delay = val.i_int * 1000; + asf_StreamSelect( &p_sys->asfh, + var_CreateGetInteger( p_access, "mms-maxbitrate" ), + var_CreateGetBool( p_access, "mms-all" ), + var_CreateGetInteger( p_access, "audio" ), + var_CreateGetInteger( p_access, "video" ) ); return VLC_SUCCESS; error: - vlc_UrlClean( &p_sys->url ); if( p_sys->fd > 0 ) { net_Close( p_sys->fd ); + p_sys->fd = -1; } - free( p_sys ); return VLC_EGENERIC; } -/***************************************************************************** - * Close: free unused data structures - *****************************************************************************/ -void E_( MMSHClose )( input_thread_t *p_input ) +static void GetHeader( access_t *p_access ) { - access_sys_t *p_sys = p_input->p_access_data; - - msg_Dbg( p_input, "stopping stream" ); - - Stop( p_input ); - - free( p_sys ); -} - -/***************************************************************************** - * Seek: try to go at the right place - *****************************************************************************/ -static void Seek( input_thread_t * p_input, off_t i_pos ) -{ - access_sys_t *p_sys = p_input->p_access_data; - chunk_t ck; - off_t i_offset; - off_t i_packet; - - i_packet = ( i_pos - p_sys->i_header ) / p_sys->asfh.i_min_data_packet_size; - i_offset = ( i_pos - p_sys->i_header ) % p_sys->asfh.i_min_data_packet_size; - - msg_Dbg( p_input, "seeking to "I64Fd, i_pos ); - - vlc_mutex_lock( &p_input->stream.stream_lock ); - - Stop( p_input ); - Start( p_input, i_packet * p_sys->asfh.i_min_data_packet_size ); + access_sys_t *p_sys = p_access->p_sys; + /* Read the asf header */ + p_sys->i_header = 0; + free( p_sys->p_header ); + p_sys->p_header = NULL; for( ;; ) { - if( GetPacket( p_input, &ck ) ) - { + chunk_t ck; + if( GetPacket( p_access, &ck ) || ck.i_type != 0x4824 ) break; - } - /* skip headers */ - if( ck.i_type != 0x4824 ) + if( ck.i_data > 0 ) { - break; + p_sys->i_header += ck.i_data; + p_sys->p_header = xrealloc( p_sys->p_header, p_sys->i_header ); + memcpy( &p_sys->p_header[p_sys->i_header - ck.i_data], + ck.p_data, ck.i_data ); } - msg_Warn( p_input, "skipping header" ); } - - p_sys->i_pos = i_pos; - p_sys->i_packet_used += i_offset; - - p_input->stream.p_selected_area->i_tell = i_pos; - vlc_mutex_unlock( &p_input->stream.stream_lock ); + msg_Dbg( p_access, "complete header size=%d", p_sys->i_header ); } -/***************************************************************************** - * Read: - *****************************************************************************/ -static ssize_t ReadRedirect( input_thread_t *p_input, byte_t *p, size_t i ) -{ - return 0; -} /***************************************************************************** - * Read: - *****************************************************************************/ -static ssize_t Read ( input_thread_t * p_input, byte_t * p_buffer, - size_t i_len ) -{ - access_sys_t *p_sys = p_input->p_access_data; - size_t i_copy; - size_t i_data = 0; - - while( i_data < i_len ) - { - if( p_sys->i_packet_used < p_sys->i_packet_length ) - { - i_copy = __MIN( p_sys->i_packet_length - p_sys->i_packet_used, - i_len - i_data ); - - memcpy( &p_buffer[i_data], - &p_sys->p_packet[p_sys->i_packet_used], - i_copy ); - - i_data += i_copy; - p_sys->i_packet_used += i_copy; - } - else if( p_sys->i_pos + i_data > p_sys->i_header && - (int)p_sys->i_packet_used < p_sys->asfh.i_min_data_packet_size ) - { - i_copy = __MIN( p_sys->asfh.i_min_data_packet_size - p_sys->i_packet_used, - i_len - i_data ); - - memset( &p_buffer[i_data], 0, i_copy ); - - i_data += i_copy; - p_sys->i_packet_used += i_copy; - } - else - { - chunk_t ck; - if( GetPacket( p_input, &ck ) ) - { - return -1; - } - } - } - - p_sys->i_pos += i_data; - - return( i_data ); -} - -/***************************************************************************** - * - *****************************************************************************/ -static int Start( input_thread_t *p_input, off_t i_pos ) + * Start stream + ****************************************************************************/ +static int Start( access_t *p_access, uint64_t i_pos ) { - access_sys_t *p_sys = p_input->p_access_data; + access_sys_t *p_sys = p_access->p_sys; int i_streams = 0; + int i_streams_selected = 0; int i; - char *psz; + char *psz = NULL; - msg_Dbg( p_input, "starting stream" ); - - if( ( p_sys->fd = net_OpenTCP( p_input, p_sys->url.psz_host, - p_sys->url.i_port ) ) < 0 ) - { - /* should not occur */ - msg_Err( p_input, "cannot connect to the server" ); - return VLC_EGENERIC; - } + msg_Dbg( p_access, "starting stream" ); for( i = 1; i < 128; i++ ) { + if( p_sys->asfh.stream[i].i_cat == ASF_STREAM_UNKNOWN ) + continue; + i_streams++; if( p_sys->asfh.stream[i].i_selected ) - { - i_streams++; - } + i_streams_selected++; } - - if( i_streams <= 0 ) + if( i_streams_selected <= 0 ) { - msg_Err( p_input, "no stream selected" ); + msg_Err( p_access, "no stream selected" ); return VLC_EGENERIC; } - net_Printf( VLC_OBJECT(p_input), p_sys->fd, - "GET %s HTTP/1.0\r\n" + + if( OpenConnection( p_access ) ) + return VLC_EGENERIC; + + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, "Accept: */*\r\n" - "User-Agent: NSPlayer/4.1.0.3856\r\n" - "Host: %s:%d\r\n", - ( p_sys->url.psz_path == NULL || *p_sys->url.psz_path == '\0' ) ? "/" : p_sys->url.psz_path, - p_sys->url.psz_host, p_sys->url.i_port ); + "User-Agent: "MMSH_USER_AGENT"\r\n" ); if( p_sys->b_broadcast ) { - net_Printf( VLC_OBJECT(p_input), p_sys->fd, + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, "Pragma: no-cache,rate=1.000000,request-context=%d\r\n", p_sys->i_request_context++ ); } else { - net_Printf( VLC_OBJECT(p_input), p_sys->fd, + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, "Pragma: no-cache,rate=1.000000,stream-time=0,stream-offset=%u:%u,request-context=%d,max-duration=0\r\n", (uint32_t)((i_pos >> 32)&0xffffffff), (uint32_t)(i_pos&0xffffffff), p_sys->i_request_context++ ); } - net_Printf( VLC_OBJECT(p_input), p_sys->fd, + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, "Pragma: xPlayStrm=1\r\n" "Pragma: xClientGUID={"GUID_FMT"}\r\n" "Pragma: stream-switch-count=%d\r\n" @@ -521,41 +802,43 @@ static int Start( input_thread_t *p_input, off_t i_pos ) { i_select = 0; } - - net_Printf( VLC_OBJECT(p_input), p_sys->fd, + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, "ffff:%d:%d ", i, i_select ); } } - net_Printf( VLC_OBJECT(p_input), p_sys->fd, "\r\n" ); - net_Printf( VLC_OBJECT(p_input), p_sys->fd, "Connection: Close\r\n" ); + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, "\r\n" ); + net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, + "Connection: Close\r\n" ); - if( net_Printf( VLC_OBJECT(p_input), p_sys->fd, "\r\n" ) < 0 ) + if( net_Printf( VLC_OBJECT(p_access), p_sys->fd, NULL, "\r\n" ) < 0 ) { - msg_Err( p_input, "failed to send request" ); + msg_Err( p_access, "failed to send request" ); return VLC_EGENERIC; } - if( ( psz = net_Gets( VLC_OBJECT(p_input), p_sys->fd ) ) == NULL ) + psz = net_Gets( p_access, p_sys->fd, NULL ); + if( psz == NULL ) { - msg_Err( p_input, "cannot read data" ); + msg_Err( p_access, "cannot read data 0" ); return VLC_EGENERIC; } + if( atoi( &psz[9] ) >= 400 ) { - msg_Err( p_input, "error: %s", psz ); + msg_Err( p_access, "error: %s", psz ); free( psz ); return VLC_EGENERIC; } - msg_Dbg( p_input, "HTTP reply '%s'", psz ); + msg_Dbg( p_access, "HTTP reply '%s'", psz ); free( psz ); /* FIXME check HTTP code */ for( ;; ) { - char *psz = net_Gets( p_input, p_sys->fd ); + char *psz = net_Gets( p_access, p_sys->fd, NULL ); if( psz == NULL ) { - msg_Err( p_input, "cannot read data" ); + msg_Err( p_access, "cannot read data 1" ); return VLC_EGENERIC; } if( *psz == '\0' ) @@ -563,68 +846,121 @@ static int Start( input_thread_t *p_input, off_t i_pos ) free( psz ); break; } - msg_Dbg( p_input, "%s", psz ); + msg_Dbg( p_access, "%s", psz ); free( psz ); } + p_sys->i_packet_used = 0; + p_sys->i_packet_length = 0; + return VLC_SUCCESS; } /***************************************************************************** - * + * closing stream *****************************************************************************/ -static void Stop( input_thread_t *p_input ) +static void Stop( access_t *p_access ) { - access_sys_t *p_sys = p_input->p_access_data; + access_sys_t *p_sys = p_access->p_sys; - msg_Dbg( p_input, "closing stream" ); - net_Close( p_sys->fd ); p_sys->fd = -1; + msg_Dbg( p_access, "closing stream" ); + if( p_sys->fd > 0 ) + { + net_Close( p_sys->fd ); + p_sys->fd = -1; + } } /***************************************************************************** - * + * get packet *****************************************************************************/ -static int GetPacket( input_thread_t * p_input, chunk_t *p_ck ) +static int GetPacket( access_t * p_access, chunk_t *p_ck ) { - access_sys_t *p_sys = p_input->p_access_data; + access_sys_t *p_sys = p_access->p_sys; + int restsize; + + /* chunk_t */ + memset( p_ck, 0, sizeof( chunk_t ) ); /* Read the chunk header */ - if( net_Read( p_input, p_sys->fd, p_sys->buffer, 12, VLC_TRUE ) < 12 ) + /* Some headers are short, like 0x4324. Reading 12 bytes will cause us + * to lose synchronization with the stream. Just read to the length + * (4 bytes), decode and then read up to 8 additional bytes to get the + * entire header. + */ + if( net_Read( p_access, p_sys->fd, NULL, p_sys->buffer, 4, true ) < 4 ) { - /* msg_Err( p_input, "cannot read data" ); */ - return VLC_EGENERIC; + msg_Err( p_access, "cannot read data 2" ); + return VLC_EGENERIC; } - p_ck->i_type = GetWLE( p_sys->buffer); - p_ck->i_size = GetWLE( p_sys->buffer + 2); + p_ck->i_type = GetWLE( p_sys->buffer); + p_ck->i_size = GetWLE( p_sys->buffer + 2); + + restsize = p_ck->i_size; + if( restsize > 8 ) + restsize = 8; + + if( net_Read( p_access, p_sys->fd, NULL, p_sys->buffer + 4, restsize, true ) < restsize ) + { + msg_Err( p_access, "cannot read data 3" ); + return VLC_EGENERIC; + } p_ck->i_sequence = GetDWLE( p_sys->buffer + 4); p_ck->i_unknown = GetWLE( p_sys->buffer + 8); - p_ck->i_size2 = GetWLE( p_sys->buffer + 10); + + /* Set i_size2 to 8 if this header was short, since a real value won't be + * present in the buffer. Using 8 avoid reading additional data for the + * packet. + */ + if( restsize < 8 ) + p_ck->i_size2 = 8; + else + p_ck->i_size2 = GetWLE( p_sys->buffer + 10); + p_ck->p_data = p_sys->buffer + 12; p_ck->i_data = p_ck->i_size2 - 8; if( p_ck->i_type == 0x4524 ) // Transfer complete { - msg_Warn( p_input, "EOF" ); + if( p_ck->i_sequence == 0 ) + { + msg_Warn( p_access, "EOF" ); + return VLC_EGENERIC; + } + else + { + msg_Warn( p_access, "next stream following" ); + return VLC_EGENERIC; + } + } + else if( p_ck->i_type == 0x4324 ) + { + /* 0x4324 is CHUNK_TYPE_RESET: a new stream will follow with a sequence of 0 */ + msg_Warn( p_access, "next stream following (reset) seq=%d", p_ck->i_sequence ); return VLC_EGENERIC; } - else if( p_ck->i_type != 0x4824 && p_ck->i_type != 0x4424 ) + else if( (p_ck->i_type != 0x4824) && (p_ck->i_type != 0x4424) ) { - msg_Err( p_input, "invalid chunk FATAL" ); + msg_Err( p_access, "invalid chunk FATAL (0x%x)", p_ck->i_type ); return VLC_EGENERIC; } - if( net_Read( p_input, p_sys->fd, &p_sys->buffer[12], p_ck->i_data, VLC_TRUE ) < p_ck->i_data ) + if( (p_ck->i_data > 0) && + (net_Read( p_access, p_sys->fd, NULL, &p_sys->buffer[12], + p_ck->i_data, true ) < p_ck->i_data) ) { - msg_Err( p_input, "cannot read data" ); + msg_Err( p_access, "cannot read data 4" ); return VLC_EGENERIC; } - if( p_sys->i_packet_sequence != 0 && - p_ck->i_sequence != p_sys->i_packet_sequence ) +#if 0 + if( (p_sys->i_packet_sequence != 0) && + (p_ck->i_sequence != p_sys->i_packet_sequence) ) { - msg_Warn( p_input, "packet lost ?" ); + msg_Warn( p_access, "packet lost ? (%d != %d)", p_ck->i_sequence, p_sys->i_packet_sequence ); } +#endif p_sys->i_packet_sequence = p_ck->i_sequence + 1; p_sys->i_packet_used = 0;