* http.c: HTTP access plug-in
*****************************************************************************
* Copyright (C) 2001, 2002 VideoLAN
- * $Id: http.c,v 1.12 2002/11/28 15:18:27 sigmunau Exp $
+ * $Id: http.c,v 1.35 2003/05/15 22:27:36 massiot Exp $
*
* Authors: Christophe Massiot <massiot@via.ecp.fr>
*
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
- *
+ *
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# include <fcntl.h>
#endif
+#ifdef HAVE_SYS_TIME_H
+# include <sys/time.h>
+#endif
+
#ifdef HAVE_UNISTD_H
# include <unistd.h>
-#elif defined( _MSC_VER ) && defined( _WIN32 ) && !defined( UNDER_CE )
-# include <io.h>
#endif
#if defined( UNDER_CE )
# include <sys/socket.h>
#endif
+#include "vlc_playlist.h"
#include "network.h"
/*****************************************************************************
static int Open ( vlc_object_t * );
static void Close ( vlc_object_t * );
-static int SetProgram ( input_thread_t *, pgrm_descriptor_t * );
static void Seek ( input_thread_t *, off_t );
static ssize_t Read ( input_thread_t *, byte_t *, size_t );
/*****************************************************************************
* Module descriptor
*****************************************************************************/
-#define PROXY_TEXT N_("Use an http proxy")
+#define PROXY_TEXT N_("Specify an HTTP proxy")
#define PROXY_LONGTEXT N_( \
- "The htpp proxy must be in the form http://myproxy.mydomain:myport" )
+ "Specify an HTTP proxy to use. It must be in the form " \
+ "http://myproxy.mydomain:myport. If none is specified, the HTTP_PROXY " \
+ "environment variable will be tried." )
+
+#define CACHING_TEXT N_("Caching value in ms")
+#define CACHING_LONGTEXT N_( \
+ "Allows you to modify the default caching value for http streams. This " \
+ "value should be set in miliseconds units." )
+
vlc_module_begin();
- add_category_hint( N_("http"), NULL );
- add_string( "http-proxy", NULL, NULL, PROXY_TEXT, PROXY_LONGTEXT );
- set_description( _("HTTP access module") );
+ add_category_hint( N_("http"), NULL, VLC_FALSE );
+ add_string( "http-proxy", NULL, NULL, PROXY_TEXT, PROXY_LONGTEXT, VLC_FALSE );
+ add_integer( "http-caching", 4 * DEFAULT_PTS_DELAY / 1000, NULL, CACHING_TEXT, CACHING_LONGTEXT, VLC_TRUE );
+ set_description( _("HTTP input") );
set_capability( "access", 0 );
add_shortcut( "http" );
add_shortcut( "http4" );
* _input_socket_t: private access plug-in data, modified to add private
* fields
*****************************************************************************/
+#define MAX_ANSWER_SIZE 1024
+#define MAX_QUERY_SIZE 1024
+
typedef struct _input_socket_s
{
input_socket_t _socket;
char * psz_network;
network_socket_t socket_desc;
- char psz_buffer[256];
+ char psz_buffer[MAX_QUERY_SIZE];
char * psz_name;
} _input_socket_t;
-#define MAX_LINE 1024
-
/*****************************************************************************
* HTTPConnect: connect to the server and seek to i_tell
*****************************************************************************/
static int HTTPConnect( input_thread_t * p_input, off_t i_tell )
{
- _input_socket_t * p_access_data;
- module_t * p_network;
- char psz_buffer[256];
- byte_t * psz_parser;
- int i_pos, i_returncode, i, i_size;
- char * psz_return_alpha;
- char *psz_protocol;
- char psz_line[MAX_LINE];
- char *psz_header_name, *psz_header_value;
+ char psz_buffer[MAX_QUERY_SIZE];
+ _input_socket_t * p_access_data;
+ module_t * p_network;
+ char * psz_parser, * psz_value, * psz_answer;
+ int i_code, i_ret, i, i_size;
+
+ enum { HTTP_PROTOCOL, ICY_PROTOCOL } i_protocol;
/* Find an appropriate network module */
p_access_data = (_input_socket_t *)p_input->p_access_data;
# define HTTP_USERAGENT "User-Agent: " COPYRIGHT_MESSAGE "\r\n"
# define HTTP_END "\r\n"
-
+
+ /* Build the query string */
if ( p_input->stream.b_seekable )
{
- snprintf( psz_buffer, sizeof(psz_buffer),
+ snprintf( psz_buffer, MAX_QUERY_SIZE,
"%s"
"Range: bytes="I64Fd"-\r\n"
HTTP_USERAGENT HTTP_END,
}
else
{
- snprintf( psz_buffer, sizeof(psz_buffer),
+ snprintf( psz_buffer, MAX_QUERY_SIZE,
"%s"
HTTP_USERAGENT HTTP_END,
p_access_data->psz_buffer );
}
- psz_buffer[sizeof(psz_buffer) - 1] = '\0';
+ psz_buffer[MAX_QUERY_SIZE - 1] = '\0';
- /* Send GET ... */
- if( send( p_access_data->_socket.i_handle, psz_buffer,
- strlen( psz_buffer ), 0 ) == (-1) )
+ /* Send GET query */
+ i_ret = send( p_access_data->_socket.i_handle,
+ psz_buffer, strlen( psz_buffer ), 0 );
+ if( i_ret == -1 )
{
#ifdef HAVE_ERRNO_H
msg_Err( p_input, "cannot send request (%s)", strerror(errno) );
return VLC_EGENERIC;
}
- /* Prepare the input thread for reading. */
+ /* Prepare the input thread for reading. */
p_input->i_bufsize = INPUT_DEFAULT_BUFSIZE;
/* FIXME: we shouldn't have to do that ! It's UGLY but mandatory because
}
}
- /* Parse HTTP header. */
+ /* Get the HTTP returncode */
+ i_size = input_Peek( p_input, (byte_t**)&psz_parser, MAX_ANSWER_SIZE );
- /* get the returncode */
- if( (i_size = input_Peek( p_input, &psz_parser, MAX_LINE )) <= 0 )
+ if( i_size <= 0 )
{
msg_Err( p_input, "not enough data" );
Close( VLC_OBJECT(p_input) );
return VLC_EGENERIC;
}
- if( ( ( i_size >= sizeof("HTTP/1.") + 1 ) &&
+
+ /* Guess the protocol */
+ if( ( ( (size_t)i_size >= strlen("HTTP/1.x") ) &&
!strncmp( psz_parser, "HTTP/1.", strlen("HTTP/1.") ) ) )
{
- psz_protocol = "HTTP";
+ i_protocol = HTTP_PROTOCOL;
+
+ psz_parser += strlen("HTTP/1.x");
+ i_size -= strlen("HTTP/1.x");
}
- else if( ( i_size >= sizeof("ICY") &&
- !strncmp( psz_parser, "ICY", sizeof("ICY") - 1 ) ) )
+ else if( ( (size_t)i_size >= strlen("ICY") &&
+ !strncmp( psz_parser, "ICY", strlen("ICY") ) ) )
{
- psz_protocol = "ICY";
+ i_protocol = ICY_PROTOCOL;
if( !p_input->psz_demux || !*p_input->psz_demux )
{
- msg_Info( p_input, "ICY server --> mp3 demuxer selected" );
+ msg_Info( p_input, "ICY server found, mp3 demuxer selected" );
p_input->psz_demux = "mp3"; // FIXME strdup ?
}
+
+ psz_parser += strlen("ICY");
+ i_size -= strlen("ICY");
}
else
{
- msg_Err( p_input, "invalid http reply" );
+ msg_Err( p_input, "invalid HTTP reply '%s'", psz_parser );
return VLC_EGENERIC;
}
- msg_Dbg( p_input, "detected %s server", psz_protocol );
-
- if( !strncmp( psz_protocol, "ICY", sizeof("ICY") - 1 ) )
- { // ICY server
- psz_parser += (sizeof("ICY") - 1);
- i_size -= (sizeof("ICY") - 1);
- }
- else
- { // HTTP/1.0 or HTTP/1.1
- psz_parser += sizeof("HTTP/1.") + 1;
- i_size -= sizeof("HTTP/1.") + 1;
- }
- i_returncode = atoi( (char*)psz_parser );
- msg_Dbg( p_input, "%s server replied: %i", psz_protocol, i_returncode );
+ /* Check the HTTP return code */
+ i_code = atoi( (char*)psz_parser );
+ msg_Dbg( p_input, "%s server replied: %i",
+ i_protocol == HTTP_PROTOCOL ? "HTTP" : "ICY", i_code );
psz_parser += 4;
i_size -= 4;
+
+ /* Find the end of the line */
for ( i = 0; (i < i_size -1) && ((psz_parser[i] != '\r') ||
(psz_parser[i+1] != '\n')); i++ )
{
;
}
- /* check we actually parsed something */
- if ( (i == i_size - 1) && (psz_parser[i+1] != '\n') )
+
+ /* Check we actually parsed something */
+ if ( i+1 == i_size && psz_parser[i+1] != '\n' )
{
msg_Err( p_input, "stream not compliant with HTTP/1.x" );
return VLC_EGENERIC;
}
- psz_return_alpha = malloc( i + 1 );
- memcpy( psz_return_alpha, psz_parser, i );
- psz_return_alpha[i] = '\0';
- p_input->p_current_data = &psz_parser[i + 2];
-
- if ( i_returncode >= 400 ) /* something is wrong */
+ /* Store the line we just parsed and skip it */
+ psz_answer = strndup( psz_parser, i );
+ if( !psz_answer )
{
- msg_Err( p_input, "%i %s", i_returncode, psz_return_alpha );
- return VLC_EGENERIC;
+ return VLC_ENOMEM;
}
-
+
+ p_input->p_current_data = psz_parser + i + 2;
+
+ /* Parse remaining headers */
for ( ; ; )
{
- if( ( i_size = input_Peek( p_input, &psz_parser, MAX_LINE ) ) <= 0 )
+ char psz_line[MAX_ANSWER_SIZE];
+
+ i_size = input_Peek( p_input, (byte_t**)&psz_parser, MAX_ANSWER_SIZE );
+
+ if( i_size <= 0 )
{
msg_Err( p_input, "not enough data" );
Close( VLC_OBJECT(p_input) );
+ free( psz_answer );
return VLC_EGENERIC;
}
-
- i_pos = 0;
- while( i_size && psz_parser[i_pos] != '\r'
- && psz_parser[i_pos + 1] != '\n' )
+
+ /* Copy one line to psz_line */
+ i = 0;
+ while( i_size && psz_parser[i] != '\r'
+ && psz_parser[i + 1] != '\n' )
{
- psz_line[i_pos] = psz_parser[i_pos];
- i_pos++;
+ psz_line[i] = psz_parser[i];
+ i++;
i_size--;
}
- p_input->p_current_data = &psz_parser[i_pos + 2];
- if (!i_pos)
+ p_input->p_current_data = psz_parser + i + 2;
+ if( !i )
{
- break; /* end of header*/
+ break; /* End of headers */
}
- psz_line[i_pos] = '\0';
+ psz_line[i] = '\0';
psz_parser = strchr( psz_line, ':' );
if ( !psz_parser )
{
msg_Err( p_input, "malformed header line: %s", psz_line );
+ free( psz_answer );
return VLC_EGENERIC;
}
- *psz_parser = '\0';
+ psz_parser[0] = '\0';
psz_parser++;
- psz_header_name = psz_line;
while ( *psz_parser == ' ' || *psz_parser == '\t' )
{
psz_parser++;
}
- psz_header_value = psz_parser;
- msg_Dbg( p_input, "found header \"%s: %s\"",
- psz_header_name, psz_header_value );
-
- if( !strcasecmp( psz_header_name, "Content-Length" ) )
+ psz_value = psz_parser;
+
+ if( !strcasecmp( psz_line, "Content-Length" ) )
{
- vlc_mutex_lock( &p_input->stream.stream_lock );
+ off_t i_size = 0;
#ifdef HAVE_ATOLL
- p_input->stream.p_selected_area->i_size = atoll( (char*)psz_header_value )
- + i_tell;
+ i_size = i_tell + atoll( psz_value );
#else
- /* FIXME : this won't work for 64-bit lengths */
- p_input->stream.p_selected_area->i_size = atoi( (char*)psz_header_value )
- + i_tell;
+ int sign = 1;
+
+ if( *psz_value == '-' ) sign = -1;
+ while( *psz_value >= '0' && *psz_value <= '9' )
+ {
+ i_size = i_size * 10 + *psz_value++ - '0';
+ }
+ i_size = i_tell + ( i_size * sign );
#endif
- msg_Dbg( p_input, "stream size is %d", p_input->stream.p_selected_area->i_size );
+ msg_Dbg( p_input, "stream size is "I64Fd, i_size );
+
+ vlc_mutex_lock( &p_input->stream.stream_lock );
+ p_input->stream.p_selected_area->i_size = i_size;
vlc_mutex_unlock( &p_input->stream.stream_lock );
}
-/* parse other headers here */
+ /* Redirection support */
+ else if( ( i_code == 301 || i_code == 302 ||
+ i_code == 303 || i_code == 307 )
+ && !strcasecmp( psz_line, "location" ) )
+ {
+ playlist_t * p_playlist = (playlist_t *) vlc_object_find(
+ p_input, VLC_OBJECT_PLAYLIST, FIND_PARENT );
+ if( !p_playlist )
+ {
+ msg_Err( p_input, "redirection failed: can't find playlist" );
+ free( psz_answer );
+ return VLC_EGENERIC;
+ }
+ msg_Dbg( p_input, "%i %s: redirected to %s",
+ i_code, psz_answer, psz_value );
+ p_playlist->pp_items[p_playlist->i_index]->b_autodeletion
+ = VLC_TRUE;
+ playlist_Add( p_playlist, psz_value,
+ PLAYLIST_INSERT | PLAYLIST_GO,
+ p_playlist->i_index + 1 );
+ vlc_object_release( p_playlist );
+ }
+
+ /* TODO: parse other headers here */
}
-
+
+ /* Something went wrong */
+ if ( i_code >= 400 )
+ {
+ msg_Err( p_input, "%i %s", i_code, psz_answer );
+ p_input->p_current_data = psz_parser + i_size;
+ free( psz_answer );
+ return VLC_EGENERIC;
+ }
+
+ free( psz_answer );
+
+ /* Set final stream properties */
vlc_mutex_lock( &p_input->stream.stream_lock );
- if( !strcmp( psz_protocol, "ICY") )
+ if( i_protocol == ICY_PROTOCOL )
{
- p_input->stream.b_seekable = 0;
+ p_input->stream.b_seekable = VLC_FALSE;
}
else
{
- p_input->stream.b_seekable = 1;
+ p_input->stream.b_seekable = VLC_TRUE;
}
if( p_input->stream.p_selected_area->i_size )
{
- p_input->stream.p_selected_area->i_tell = i_tell
- + (p_input->p_last_data - p_input->p_current_data);
+ p_input->stream.p_selected_area->i_tell = i_tell;
}
else
{
- p_input->stream.b_seekable = 0;
+ p_input->stream.b_seekable = VLC_FALSE;
}
- p_input->stream.b_changed = 1;
+ p_input->stream.b_changed = VLC_TRUE;
vlc_mutex_unlock( &p_input->stream.stream_lock );
return VLC_SUCCESS;
{
msg_Err( p_input, "out of memory" );
free(psz_name);
- return( -1 );
+ return VLC_ENOMEM;
}
p_access_data->psz_name = psz_name;
while( *psz_parser && *psz_parser != ':' && *psz_parser != '/' )
{
+ if( *psz_parser == '[' )
+ {
+ /* IPv6 address */
+ while( *psz_parser && *psz_parser != ']' )
+ {
+ psz_parser++;
+ }
+ }
psz_parser++;
}
msg_Err( p_input, "cannot parse server port near %s", psz_parser );
free( p_input->p_access_data );
free( psz_name );
- return( -1 );
+ return VLC_EGENERIC;
}
}
msg_Err( p_input, "no server given" );
free( p_input->p_access_data );
free( psz_name );
- return( -1 );
+ return VLC_EGENERIC;
}
/* Check proxy config variable */
- if( (psz_proxy_orig = config_GetPsz( p_input, "http-proxy" )) == NULL )
+ psz_proxy_orig = config_GetPsz( p_input, "http-proxy" );
+ if( psz_proxy_orig == NULL )
+ {
/* Check proxy environment variable */
- if( (psz_proxy_orig = getenv( "http_proxy" )) != NULL )
+ psz_proxy_orig = getenv( "http_proxy" );
+ if( psz_proxy_orig != NULL )
+ {
psz_proxy_orig = strdup( psz_proxy_orig );
+ }
+ }
psz_proxy = psz_proxy_orig;
if( psz_proxy != NULL && *psz_proxy )
{
/* http://myproxy.mydomain:myport/ */
int i_proxy_port = 0;
-
+
/* Skip the protocol name */
while( *psz_proxy && *psz_proxy != ':' )
{
psz_proxy++;
}
-
+
/* Skip the "://" part */
while( *psz_proxy && (*psz_proxy == ':' || *psz_proxy == '/') )
{
psz_proxy++;
}
-
+
/* Found a proxy name */
if( *psz_proxy )
{
char *psz_port = psz_proxy;
-
+
/* Skip the hostname part */
while( *psz_port && *psz_port != ':' && *psz_port != '/' )
{
psz_port++;
}
-
+
/* Found a port name */
if( *psz_port )
{
char * psz_junk;
-
+
/* Replace ':' with '\0' */
*psz_port = '\0';
psz_port++;
-
+
psz_junk = psz_port;
while( *psz_junk && *psz_junk != '/' )
{
psz_junk++;
}
-
+
if( *psz_junk )
{
*psz_junk = '\0';
}
-
+
if( *psz_port != '\0' )
{
i_proxy_port = atoi( psz_port );
psz_proxy = strdup( psz_proxy );
- msg_Dbg( p_input, "using http proxy server=%s port=%d",
+ msg_Dbg( p_input, "using HTTP proxy server=%s port=%d",
psz_proxy, i_proxy_port );
}
else
{
- msg_Err( p_input, "http proxy %s is invalid!", psz_proxy_orig );
+ msg_Err( p_input, "HTTP proxy %s is invalid!", psz_proxy_orig );
free( p_input->p_access_data );
free( psz_name );
if( psz_proxy_orig ) free( psz_proxy_orig );
- return( -1 );
+ return VLC_EGENERIC;
}
if( psz_proxy_orig ) free( psz_proxy_orig );
p_access_data->socket_desc.i_server_port = i_proxy_port;
p_access_data->socket_desc.i_type = NETWORK_TCP;
- snprintf( p_access_data->psz_buffer, sizeof(p_access_data->psz_buffer),
- "GET http://%s:%d/%s\r\n HTTP/1.0\r\n",
+ snprintf( p_access_data->psz_buffer, MAX_QUERY_SIZE,
+ "GET http://%s:%d/%s HTTP/1.0\r\n",
psz_server_addr, i_server_port, psz_path );
}
else
p_access_data->socket_desc.psz_server_addr = psz_server_addr;
p_access_data->socket_desc.i_server_port = i_server_port;
- snprintf( p_access_data->psz_buffer, sizeof(p_access_data->psz_buffer),
+ snprintf( p_access_data->psz_buffer, MAX_QUERY_SIZE,
"GET /%s HTTP/1.1\r\nHost: %s\r\n",
psz_path, psz_server_addr );
}
- p_access_data->psz_buffer[sizeof(p_access_data->psz_buffer) - 1] = '\0';
+ p_access_data->psz_buffer[MAX_QUERY_SIZE - 1] = '\0';
msg_Dbg( p_input, "opening server=%s port=%d path=%s",
psz_server_addr, i_server_port, psz_path );
p_input->pf_read = Read;
- p_input->pf_set_program = SetProgram;
+ p_input->pf_set_program = input_SetProgram;
p_input->pf_set_area = NULL;
p_input->pf_seek = Seek;
vlc_mutex_lock( &p_input->stream.stream_lock );
- p_input->stream.b_pace_control = 1;
- p_input->stream.b_seekable = 1;
+ p_input->stream.b_pace_control = VLC_TRUE;
+ p_input->stream.b_seekable = VLC_TRUE;
p_input->stream.p_selected_area->i_tell = 0;
p_input->stream.p_selected_area->i_size = 0;
p_input->stream.i_method = INPUT_METHOD_NETWORK;
vlc_mutex_unlock( &p_input->stream.stream_lock );
p_input->i_mtu = 0;
-
+
if( HTTPConnect( p_input, 0 ) )
{
/* Request failed, try again with HTTP/1.0 */
return VLC_EGENERIC;
}
- p_input->stream.b_seekable = 0;
+ p_input->stream.b_seekable = VLC_FALSE;
psz_pos[7] = '0';
if( HTTPConnect( p_input, 0 ) )
{
}
}
+ /* Update default_pts to a suitable value for http access */
+ p_input->i_pts_delay = config_GetInt( p_input, "http-caching" ) * 1000;
+
return VLC_SUCCESS;
}
{
input_thread_t * p_input = (input_thread_t *)p_this;
int i_handle = ((network_socket_t *)p_input->p_access_data)->i_handle;
- _input_socket_t * p_access_data =
+ _input_socket_t * p_access_data =
(_input_socket_t *)p_input->p_access_data;
free( p_access_data->psz_name );
free( p_access_data );
}
-/*****************************************************************************
- * SetProgram: do nothing
- *****************************************************************************/
-static int SetProgram( input_thread_t * p_input,
- pgrm_descriptor_t * p_program )
-{
- return( 0 );
-}
-
/*****************************************************************************
* Seek: close and re-open a connection at the right place
*****************************************************************************/
}
/*****************************************************************************
- * Read: read on a file descriptor, checking b_die periodically
+ * Read: Read up to i_len bytes from the http connection and place in
+ * p_buffer. Return the actual number of bytes read
*****************************************************************************/
static ssize_t Read( input_thread_t * p_input, byte_t * p_buffer, size_t i_len )
{
input_socket_t * p_access_data = (input_socket_t *)p_input->p_access_data;
struct timeval timeout;
fd_set fds;
+ ssize_t i_recv;
int i_ret;
/* Initialize file descriptor set */
timeout.tv_usec = 500000;
/* Find if some data is available */
- i_ret = select( p_access_data->i_handle + 1, &fds,
- NULL, NULL, &timeout );
-
+ while( (i_ret = select( p_access_data->i_handle + 1, &fds,
+ NULL, NULL, &timeout )) == 0
#ifdef HAVE_ERRNO_H
- if( i_ret == -1 && errno != EINTR )
+ || (i_ret < 0 && errno == EINTR)
+#endif
+ )
{
- msg_Err( p_input, "network select error (%s)", strerror(errno) );
+ FD_ZERO( &fds );
+ FD_SET( p_access_data->i_handle, &fds );
+ timeout.tv_sec = 0;
+ timeout.tv_usec = 500000;
+
+ if( p_input->b_die || p_input->b_error )
+ {
+ return 0;
+ }
}
-#else
- if( i_ret == -1 )
+
+ if( i_ret < 0 )
{
msg_Err( p_input, "network select error" );
+ return -1;
}
-#endif
- else if( i_ret > 0 )
- {
- ssize_t i_recv = recv( p_access_data->i_handle, p_buffer, i_len, 0 );
- if( i_recv > 0 )
- {
- vlc_mutex_lock( &p_input->stream.stream_lock );
- p_input->stream.p_selected_area->i_tell += i_recv;
- vlc_mutex_unlock( &p_input->stream.stream_lock );
- }
+ i_recv = recv( p_access_data->i_handle, p_buffer, i_len, 0 );
- if( i_recv < 0 )
- {
+ if( i_recv < 0 )
+ {
#ifdef HAVE_ERRNO_H
- msg_Err( p_input, "recv failed (%s)", strerror(errno) );
+ msg_Err( p_input, "recv failed (%s)", strerror(errno) );
#else
- msg_Err( p_input, "recv failed" );
+ msg_Err( p_input, "recv failed" );
#endif
- }
-
- return i_recv;
}
- return 0;
+ return i_recv;
}