/*****************************************************************************
* mvar.c : Variables handling for the HTTP Interface
*****************************************************************************
- * Copyright (C) 2001-2005 the VideoLAN team
- * $Id: http.c 12225 2005-08-18 10:01:30Z massiot $
+ * Copyright (C) 2001-2007 the VideoLAN team
+ * $Id$
*
* Authors: Gildas Bazin <gbazin@netcourrier.com>
* Laurent Aimar <fenrir@via.ecp.fr>
*
* 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.
*****************************************************************************/
+#ifdef HAVE_CONFIG_H
+# include "config.h"
+#endif
#include "http.h"
+#include <limits.h>
+
+#include <assert.h>
/* Utility function for scandir */
-static int Filter( const struct dirent *foo )
+static int Filter( const char *foo )
{
- return VLC_TRUE;
+ return strcmp( foo, "." );
};
-static int InsensitiveAlphasort( const struct dirent **foo1,
- const struct dirent **foo2 )
+static int InsensitiveAlphasort( const char **foo1,
+ const char **foo2 )
{
- return strcasecmp( (*foo1)->d_name, (*foo2)->d_name );
+ return strcasecmp( *foo1, *foo2 );
};
mvar_t *mvar_GetVar( mvar_t *s, const char *name )
{
- int i;
- char base[512], *field, *p;
- int i_index;
-
/* format: name[index].field */
+ const char *field = strchr( name, '.' );
+ char base[1 + (field ? (size_t)(field - name) : strlen( name ))];
+ char *p;
+ int i_index, i;
- field = strchr( name, '.' );
- if( field )
- {
- int i = field - name;
- strncpy( base, name, i );
- base[i] = '\0';
+ strlcpy( base, name, sizeof (base) );
+ if( field != NULL )
field++;
- }
- else
- {
- strcpy( base, name );
- }
- if( ( p = strchr( base, '[' ) ) )
+ if( ( p = strchr( base, '[' ) ) != NULL )
{
- *p++ = '\0';
- sscanf( p, "%d]", &i_index );
- if( i_index < 0 )
- {
+ char *end;
+ unsigned long l = strtoul( p, &end, 0 );
+
+ if( ( l > INT_MAX ) || strcmp( "]", end ) )
return NULL;
- }
+
+ *p++ = '\0';
+ i_index = (int)l;
}
else
{
}
void mvar_PushNewVar( mvar_t *vars, const char *name,
- const char *value )
+ const char *value )
{
mvar_t *f = mvar_New( name, value );
mvar_PushVar( vars, f );
}
void mvar_AppendNewVar( mvar_t *vars, const char *name,
- const char *value )
+ const char *value )
{
mvar_t *f = mvar_New( name, value );
mvar_AppendVar( vars, f );
********************************************************************/
mvar_t *mvar_PlaylistSetNew( intf_thread_t *p_intf, char *name,
- playlist_t *p_pl )
+ playlist_t *p_pl )
{
- playlist_view_t *p_view;
mvar_t *s = mvar_New( name, "set" );
-
-
- vlc_mutex_lock( &p_pl->object_lock );
-
- p_view = playlist_ViewFind( p_pl, VIEW_CATEGORY ); /* FIXME */
-
- if( p_view != NULL )
- E_(PlaylistListNode)( p_intf, p_pl, p_view->p_root, name, s, 0 );
-
- vlc_mutex_unlock( &p_pl->object_lock );
-
+ vlc_object_lock( p_pl );
+ PlaylistListNode( p_intf, p_pl, p_pl->p_root_category , name, s, 0 );
+ vlc_object_unlock( p_pl );
return s;
}
-mvar_t *mvar_InfoSetNew( intf_thread_t *p_intf, char *name,
- input_thread_t *p_input )
+mvar_t *mvar_InfoSetNew( char *name, input_thread_t *p_input )
{
mvar_t *s = mvar_New( name, "set" );
int i, j;
- if( p_input == NULL )
+ if( p_input == NULL || p_input->p == NULL /* workarround assert in input_GetItem */ )
{
return s;
}
- vlc_mutex_lock( &p_input->input.p_item->lock );
- for ( i = 0; i < p_input->input.p_item->i_categories; i++ )
+ vlc_mutex_lock( &input_GetItem(p_input)->lock );
+ for ( i = 0; i < input_GetItem(p_input)->i_categories; i++ )
{
- info_category_t *p_category = p_input->input.p_item->pp_categories[i];
- char *psz;
+ info_category_t *p_category = input_GetItem(p_input)->pp_categories[i];
mvar_t *cat = mvar_New( name, "set" );
mvar_t *iset = mvar_New( "info", "set" );
- psz = E_(FromUTF8)( p_intf, p_category->psz_name );
- mvar_AppendNewVar( cat, "name", psz );
- free( psz );
+ mvar_AppendNewVar( cat, "name", p_category->psz_name );
mvar_AppendVar( cat, iset );
for ( j = 0; j < p_category->i_infos; j++ )
{
info_t *p_info = p_category->pp_infos[j];
mvar_t *info = mvar_New( "info", "" );
- char *psz_name = E_(FromUTF8)( p_intf, p_info->psz_name );
- char *psz_value = E_(FromUTF8)( p_intf, p_info->psz_value );
-
- msg_Dbg( p_input, "adding info name=%s value=%s",
- psz_name, psz_value );
- mvar_AppendNewVar( info, "name", psz_name );
- mvar_AppendNewVar( info, "value", psz_value );
- free( psz_name );
- free( psz_value );
+
+ /* msg_Dbg( p_input, "adding info name=%s value=%s",
+ psz_name, psz_value ); */
+ mvar_AppendNewVar( info, "name", p_info->psz_name );
+ mvar_AppendNewVar( info, "value", p_info->psz_value );
mvar_AppendVar( iset, info );
}
mvar_AppendVar( s, cat );
}
- vlc_mutex_unlock( &p_input->input.p_item->lock );
+ vlc_mutex_unlock( &input_GetItem(p_input)->lock );
+
+ return s;
+}
+
+mvar_t *mvar_ObjectSetNew( intf_thread_t *p_intf, char *psz_name,
+ const char *psz_capability )
+{
+ mvar_t *s = mvar_New( psz_name, "set" );
+ int i;
+
+ vlc_list_t *p_list = vlc_list_find( p_intf, VLC_OBJECT_MODULE,
+ FIND_ANYWHERE );
+
+ for( i = 0; i < p_list->i_count; i++ )
+ {
+ module_t *p_parser = (module_t *)p_list->p_values[i].p_object;
+ if( module_IsCapable( p_parser, psz_capability ) )
+ {
+ mvar_t *sd = mvar_New( "sd", module_GetObjName( p_parser ) );
+ mvar_AppendNewVar( sd, "name",
+ module_GetName( p_parser, true ) );
+ mvar_AppendVar( s, sd );
+ }
+ }
+
+ vlc_list_release( p_list );
return s;
}
mvar_t *mvar_InputVarSetNew( intf_thread_t *p_intf, char *name,
- input_thread_t *p_input,
- const char *psz_variable )
+ input_thread_t *p_input,
+ const char *psz_variable )
{
intf_sys_t *p_sys = p_intf->p_sys;
mvar_t *s = mvar_New( name, "set" );
{
case VLC_VAR_STRING:
itm = mvar_New( name, "set" );
- psz = E_(FromUTF8)( p_intf, text_list.p_list->p_values[i].psz_string );
+ /* FIXME: Memory leak here?? (remove strdup?) */
+ psz = strdup( text_list.p_list->p_values[i].psz_string );
mvar_AppendNewVar( itm, "name", psz );
- psz = E_(FromUTF8)( p_intf, val_list.p_list->p_values[i].psz_string );
- mvar_AppendNewVar( itm, "id", psz );
- free( psz );
+ mvar_AppendNewVar( itm, "id", val_list.p_list->p_values[i].psz_string );
snprintf( psz_int, sizeof(psz_int), "%d",
( !strcmp( val.psz_string,
val_list.p_list->p_values[i].psz_string )
case VLC_VAR_INTEGER:
itm = mvar_New( name, "set" );
- psz = E_(FromUTF8)( p_intf, text_list.p_list->p_values[i].psz_string );
+ psz = strdup( text_list.p_list->p_values[i].psz_string );
mvar_AppendNewVar( itm, "name", psz );
snprintf( psz_int, sizeof(psz_int), "%d",
val_list.p_list->p_values[i].i_int );
#endif
mvar_t *mvar_FileSetNew( intf_thread_t *p_intf, char *name,
- char *psz_dir )
+ char *psz_dir )
{
mvar_t *s = mvar_New( name, "set" );
- char tmp[MAX_DIR_SIZE], dir[MAX_DIR_SIZE], *p, *src;
-#ifdef HAVE_SYS_STAT_H
- struct stat stat_info;
-#endif
- struct dirent **pp_dir_content;
+ char **ppsz_dir_content;
int i_dir_content, i;
- char sep;
+ psz_dir = RealPath( psz_dir );
- /* convert all / to native separator */
#if defined( WIN32 )
- while( (p = strchr( psz_dir, '/' )) )
+ if( psz_dir[0] != '\0' && (psz_dir[0] != '\\' || psz_dir[1] != '\0') )
{
- *p = '\\';
+ free( psz_dir );
+ return s;
}
- sep = '\\';
-#else
- sep = '/';
#endif
- /* remove trailling separator */
- while( strlen( psz_dir ) > 1 &&
-#if defined( WIN32 )
- !( strlen(psz_dir)==3 && psz_dir[1]==':' && psz_dir[2]==sep ) &&
-#endif
- psz_dir[strlen( psz_dir ) -1 ] == sep )
- {
- psz_dir[strlen( psz_dir ) -1 ] ='\0';
- }
- /* remove double separator */
- for( p = src = psz_dir; *src != '\0'; src++, p++ )
- {
- if( src[0] == sep && src[1] == sep )
- {
- src++;
- }
- *p = *src;
- }
- *p = '\0';
-
- if( *psz_dir == '\0' )
+ /* parse psz_src dir */
+ if( ( i_dir_content = utf8_scandir( psz_dir, &ppsz_dir_content, Filter,
+ InsensitiveAlphasort ) ) == -1 )
{
+ if( errno != ENOENT && errno != ENOTDIR )
+ msg_Warn( p_intf, "error while scanning dir %s (%m)", psz_dir );
+ free( psz_dir );
return s;
}
- if( psz_dir[0] == '~' && psz_dir[1] == '/' )
+ for( i = 0; i < i_dir_content; i++ )
{
- /* This is incomplete : we should also support the ~cmassiot/ syntax. */
- snprintf( dir, sizeof(dir), "%s/%s", p_intf->p_vlc->psz_homedir,
- psz_dir + 2 );
- psz_dir = dir;
- }
+#ifdef HAVE_SYS_STAT_H
+ struct stat stat_info;
+#endif
+ char *psz_name = ppsz_dir_content[i], *psz_ext, *psz_dummy;
+ char psz_tmp[strlen( psz_dir ) + 1 + strlen( psz_name ) + 1];
+ mvar_t *f;
- /* first fix all .. dir */
- p = src = psz_dir;
- while( *src )
- {
- if( src[0] == '.' && src[1] == '.' )
+#if defined( WIN32 )
+ if( psz_dir[0] == '\0' || (psz_dir[0] == '\\' && psz_dir[1] == '\0') )
{
- src += 2;
- if( p <= &psz_dir[1] )
+ strcpy( psz_tmp, psz_name );
+ }
+ else
+#endif
+ {
+ sprintf( psz_tmp, "%s"DIR_SEP"%s", psz_dir, psz_name );
+
+#ifdef HAVE_SYS_STAT_H
+ if( utf8_stat( psz_tmp, &stat_info ) == -1 )
{
+ free( psz_name );
continue;
}
+#endif
+ }
+ f = mvar_New( name, "set" );
- p -= 2;
+ /* put lower-case file extension in 'ext' */
+ psz_ext = strrchr( psz_name, '.' );
+ psz_ext = strdup( psz_ext != NULL ? psz_ext + 1 : "" );
+ for( psz_dummy = psz_ext; *psz_dummy != '\0'; psz_dummy++ )
+ *psz_dummy = tolower( *psz_dummy );
- while( p > &psz_dir[1] && *p != sep )
- {
- p--;
- }
+ mvar_AppendNewVar( f, "ext", psz_ext );
+ free( psz_ext );
+
+#if defined( WIN32 )
+ if( psz_dir[0] == '\0' || (psz_dir[0] == '\\' && psz_dir[1] == '\0') )
+ {
+ char psz_tmp[3];
+ sprintf( psz_tmp, "%c:", psz_name[0] );
+ mvar_AppendNewVar( f, "name", psz_name );
+ mvar_AppendNewVar( f, "basename", psz_tmp );
+ mvar_AppendNewVar( f, "type", "directory" );
+ mvar_AppendNewVar( f, "size", "unknown" );
+ mvar_AppendNewVar( f, "date", "unknown" );
}
- else if( *src == sep )
+ else
+#endif
{
- if( p > psz_dir && p[-1] == sep )
+ char psz_buf[26];
+ char psz_tmp[strlen( psz_dir ) + 1 + strlen( psz_name ) + 1];
+
+ sprintf( psz_tmp, "%s"DIR_SEP"%s", psz_dir, psz_name );
+ mvar_AppendNewVar( f, "name", psz_tmp );
+ mvar_AppendNewVar( f, "basename", psz_name );
+
+#ifdef HAVE_SYS_STAT_H
+ if( S_ISDIR( stat_info.st_mode ) )
{
- src++;
+ mvar_AppendNewVar( f, "type", "directory" );
}
- else
+ else if( S_ISREG( stat_info.st_mode ) )
{
- *p++ = *src++;
+ mvar_AppendNewVar( f, "type", "file" );
}
- }
- else
- {
- do
+ else
{
- *p++ = *src++;
- } while( *src && *src != sep );
- }
- }
- *p = '\0';
+ mvar_AppendNewVar( f, "type", "unknown" );
+ }
-#ifdef HAVE_SYS_STAT_H
- if( stat( psz_dir, &stat_info ) == -1 || !S_ISDIR( stat_info.st_mode ) )
- {
- return s;
- }
-#endif
+ snprintf( psz_buf, sizeof( psz_buf ), "%"PRId64,
+ (int64_t)stat_info.st_size );
+ mvar_AppendNewVar( f, "size", psz_buf );
- /* parse psz_src dir */
- if( ( i_dir_content = scandir( psz_dir, &pp_dir_content, Filter,
- InsensitiveAlphasort ) ) == -1 )
- {
- msg_Warn( p_intf, "scandir error on %s (%s)", psz_dir,
- strerror(errno) );
- return s;
- }
+ /* FIXME memory leak FIXME */
+# ifdef HAVE_CTIME_R
+ ctime_r( &stat_info.st_mtime, psz_buf );
+ mvar_AppendNewVar( f, "date", psz_buf );
+# else
+ mvar_AppendNewVar( f, "date", ctime( &stat_info.st_mtime ) );
+# endif
- /* remove trailing / or \ */
- for( p = &psz_dir[strlen( psz_dir) - 1];
- p >= psz_dir && ( *p =='/' || *p =='\\' ); p-- )
- {
- *p = '\0';
- }
-
- for( i = 0; i < i_dir_content; i++ )
- {
- struct dirent *p_dir_content = pp_dir_content[i];
- mvar_t *f;
- const char *psz_ext;
- char *psz_name, *psz_tmp;
-
- if( !strcmp( p_dir_content->d_name, "." ) )
- {
- continue;
+#else
+ mvar_AppendNewVar( f, "type", "unknown" );
+ mvar_AppendNewVar( f, "size", "unknown" );
+ mvar_AppendNewVar( f, "date", "unknown" );
+#endif
}
- snprintf( tmp, sizeof(tmp), "%s/%s", psz_dir, p_dir_content->d_name );
+ mvar_AppendVar( s, f );
-#ifdef HAVE_SYS_STAT_H
- if( stat( tmp, &stat_info ) == -1 )
- {
- continue;
- }
-#endif
- f = mvar_New( name, "set" );
+ free( psz_name );
+ }
- psz_tmp = vlc_fix_readdir_charset( p_intf, p_dir_content->d_name );
- psz_name = E_(FromUTF8)( p_intf, psz_tmp );
- free( psz_tmp );
- snprintf( tmp, sizeof(tmp), "%s/%s", psz_dir, psz_name );
- mvar_AppendNewVar( f, "name", tmp );
- mvar_AppendNewVar( f, "basename", psz_name );
+ free( psz_dir );
+ free( ppsz_dir_content );
+ return s;
+}
- /* put file extension in 'ext' */
- psz_ext = strrchr( psz_name, '.' );
- mvar_AppendNewVar( f, "ext", psz_ext != NULL ? psz_ext + 1 : "" );
+static void mvar_VlmSetNewLoop( char *name, vlm_t *vlm, mvar_t *s,
+ vlm_message_t *el, bool b_name )
+{
+ /* Over name */
+ mvar_t *set;
+ int k;
- free( psz_name );
+ /* Add a node with name and info */
+ set = mvar_New( name, "set" );
+ if( b_name == true )
+ {
+ mvar_AppendNewVar( set, "name", el->psz_name );
+ }
-#ifdef HAVE_SYS_STAT_H
- if( S_ISDIR( stat_info.st_mode ) )
- {
- mvar_AppendNewVar( f, "type", "directory" );
- }
- else if( S_ISREG( stat_info.st_mode ) )
+ for( k = 0; k < el->i_child; k++ )
+ {
+ vlm_message_t *ch = el->child[k];
+ if( ch->i_child > 0 )
{
- mvar_AppendNewVar( f, "type", "file" );
+ mvar_VlmSetNewLoop( ch->psz_name, vlm, set, ch, false );
}
else
{
- mvar_AppendNewVar( f, "type", "unknown" );
+ if( ch->psz_value )
+ {
+ mvar_AppendNewVar( set, ch->psz_name, ch->psz_value );
+ }
+ else
+ {
+ mvar_AppendNewVar( set, el->psz_name, ch->psz_name );
+ }
}
-
- sprintf( tmp, I64Fd, (int64_t)stat_info.st_size );
- mvar_AppendNewVar( f, "size", tmp );
-
- /* FIXME memory leak FIXME */
-#ifdef HAVE_CTIME_R
- ctime_r( &stat_info.st_mtime, tmp );
- mvar_AppendNewVar( f, "date", tmp );
-#else
- mvar_AppendNewVar( f, "date", ctime( &stat_info.st_mtime ) );
-#endif
-
-#else
- mvar_AppendNewVar( f, "type", "unknown" );
- mvar_AppendNewVar( f, "size", "unknown" );
- mvar_AppendNewVar( f, "date", "unknown" );
-#endif
- mvar_AppendVar( s, f );
}
- return s;
+ mvar_AppendVar( s, set );
}
mvar_t *mvar_VlmSetNew( char *name, vlm_t *vlm )
{
mvar_t *s = mvar_New( name, "set" );
+#ifdef ENABLE_VLM
vlm_message_t *msg;
int i;
if( vlm == NULL ) return s;
if( vlm_ExecuteCommand( vlm, "show", &msg ) )
- {
return s;
- }
for( i = 0; i < msg->i_child; i++ )
{
/* Over name */
vlm_message_t *el = ch->child[j];
vlm_message_t *inf, *desc;
- mvar_t *set;
- char psz[500];
- int k;
+ char psz[6 + strlen(el->psz_name)];
sprintf( psz, "show %s", el->psz_name );
if( vlm_ExecuteCommand( vlm, psz, &inf ) )
continue;
desc = inf->child[0];
- /* Add a node with name and info */
- set = mvar_New( name, "set" );
- mvar_AppendNewVar( set, "name", el->psz_name );
-
- for( k = 0; k < desc->i_child; k++ )
- {
- vlm_message_t *ch = desc->child[k];
- if( ch->i_child > 0 )
- {
- int c;
- mvar_t *n = mvar_New( ch->psz_name, "set" );
+ mvar_VlmSetNewLoop( el->psz_name, vlm, s, desc, true );
- for( c = 0; c < ch->i_child; c++ )
- {
- if( ch->child[c]->psz_value )
- {
- mvar_AppendNewVar( n, ch->child[c]->psz_name, ch->child[c]->psz_value );
- }
- else
- {
- mvar_t *in = mvar_New( ch->psz_name, ch->child[c]->psz_name );
- mvar_AppendVar( n, in );
- }
- }
- mvar_AppendVar( set, n );
- }
- else
- {
- mvar_AppendNewVar( set, ch->psz_name, ch->psz_value );
- }
- }
vlm_MessageDelete( inf );
-
- mvar_AppendVar( s, set );
}
}
vlm_MessageDelete( msg );
-
+#endif /* ENABLE_VLM */
return s;
}