X-Git-Url: http://research.m1stereo.tv/gitweb?a=blobdiff_plain;f=src%2Fframework%2Fmlt_repository.c;h=064452326c990e1c37434f11d8401a74434191a7;hb=467f981c523481500c5df1a12c4cf6f586c11ace;hp=b271a85e25ccbe8d87e281c651fa4a4fd5f7b719;hpb=a3b7c7245a4ec492e5eecc76548f4a97bb648709;p=melted diff --git a/src/framework/mlt_repository.c b/src/framework/mlt_repository.c index b271a85..0644523 100644 --- a/src/framework/mlt_repository.c +++ b/src/framework/mlt_repository.c @@ -2,6 +2,7 @@ * repository.c -- provides a map between service and shared objects * Copyright (C) 2003-2004 Ushodaya Enterprises Limited * Author: Charles Yates + * Contributor: Dan Dennedy * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public @@ -20,6 +21,7 @@ #include "mlt_repository.h" #include "mlt_properties.h" +#include "mlt_tokeniser.h" #include #include @@ -73,7 +75,7 @@ mlt_repository mlt_repository_init( const char *directory ) if ( object != NULL ) { // Get the registration function - int ( *symbol_ptr )( mlt_repository ) = dlsym( object, "mlt_register" ); + mlt_repository_callback symbol_ptr = dlsym( object, "mlt_register" ); // Call the registration function if ( symbol_ptr != NULL ) @@ -88,6 +90,10 @@ mlt_repository mlt_repository_init( const char *directory ) dlclose( object ); } } + else if ( strstr( object_name, "libmlt" ) ) + { + fprintf( stderr, "%s, %s: failed to dlopen %s\n", __FILE__, __FUNCTION__, object_name ); + } } return this; @@ -104,7 +110,7 @@ static mlt_properties new_service( void *symbol ) Typically, this is invoked by a module within its mlt_register(). */ -void mlt_repository_register( mlt_repository this, mlt_service_type service_type, const char *service, void *symbol ) +void mlt_repository_register( mlt_repository this, mlt_service_type service_type, const char *service, mlt_register_callback symbol ) { // Add the entry point to the corresponding service list switch ( service_type ) @@ -159,8 +165,7 @@ void *mlt_repository_create( mlt_repository this, mlt_profile profile, mlt_servi mlt_properties properties = get_service_properties( this, type, service ); if ( properties != NULL ) { - void *( *symbol_ptr )( mlt_profile, mlt_service_type, const char *, void * ) = - mlt_properties_get_data( properties, "symbol", NULL ); + mlt_register_callback symbol_ptr = mlt_properties_get_data( properties, "symbol", NULL ); // Construct the service return ( symbol_ptr != NULL ) ? symbol_ptr( profile, type, service, input ) : NULL; @@ -216,17 +221,110 @@ mlt_properties mlt_repository_transitions( mlt_repository self ) /** Register the metadata for a service IMPORTANT: mlt_repository will take responsibility for deallocating the metadata properties that you supply! */ -void mlt_repository_register_metadata( mlt_repository self, mlt_service_type type, const char *service, mlt_properties metadata ) +void mlt_repository_register_metadata( mlt_repository self, mlt_service_type type, const char *service, mlt_metadata_callback callback, void *callback_data ) { mlt_properties service_properties = get_service_properties( self, type, service ); - mlt_properties_set_data( service_properties, "metadata", metadata, 0, ( mlt_destructor )mlt_properties_close, NULL ); + mlt_properties_set_data( service_properties, "metadata_cb", callback, 0, NULL, NULL ); + mlt_properties_set_data( service_properties, "metadata_cb_data", callback_data, 0, NULL, NULL ); } /** Get the metadata about a service + Returns NULL if service or its metadata are unavailable. */ mlt_properties mlt_repository_metadata( mlt_repository self, mlt_service_type type, const char *service ) { + mlt_properties metadata = NULL; mlt_properties properties = get_service_properties( self, type, service ); - return mlt_properties_get_data( properties, "metadata", NULL ); + + // If this is a valid service + if ( properties ) + { + // Lookup cached metadata + metadata = mlt_properties_get_data( properties, "metadata", NULL ); + if ( ! metadata ) + { + // Not cached, so get the registered metadata callback function + mlt_metadata_callback callback = mlt_properties_get_data( properties, "metadata_cb", NULL ); + + // If a metadata callback function is registered + if ( callback ) + { + // Fetch the callback data arg + void *data = mlt_properties_get_data( properties, "metadata_cb_data", NULL ); + + // Fetch the metadata through the callback + metadata = callback( type, service, data ); + + // Cache the metadata + if ( metadata ) + // Include dellocation and serialisation + mlt_properties_set_data( properties, "metadata", metadata, 0, ( mlt_destructor )mlt_properties_close, ( mlt_serialiser )mlt_properties_serialise_yaml ); + } + } + } + return metadata; +} + +static char *getenv_locale() +{ + char *s = getenv( "LANGUAGE" ); + if ( s && s[0] ) + return s; + s = getenv( "LC_ALL" ); + if ( s && s[0] ) + return s; + s = getenv( "LC_MESSAGES" ); + if ( s && s[0] ) + return s; + s = getenv( "LANG" ); + if ( s && s[0] ) + return s; + return NULL; +} + +/** Return a list of user-preferred language codes taken from environment variables. +*/ + +mlt_properties mlt_repository_languages( mlt_repository self ) +{ + mlt_properties languages = mlt_properties_get_data( &self->parent, "languages", NULL ); + if ( languages ) + return languages; + + languages = mlt_properties_new(); + char *locale = getenv_locale(); + if ( locale ) + { + locale = strdup( locale ); + mlt_tokeniser tokeniser = mlt_tokeniser_init(); + int count = mlt_tokeniser_parse_new( tokeniser, locale, ":" ); + if ( count ) + { + int i; + for ( i = 0; i < count; i++ ) + { + char *locale = mlt_tokeniser_get_string( tokeniser, i ); + if ( strcmp( locale, "C" ) == 0 || strcmp( locale, "POSIX" ) == 0 ) + locale = "en"; + else if ( strlen( locale ) > 2 ) + locale[2] = 0; + char string[21]; + snprintf( string, sizeof(string), "%d", i ); + mlt_properties_set( languages, string, locale ); + } + } + else + { + mlt_properties_set( languages, "0", "en" ); + } + free( locale ); + mlt_tokeniser_close( tokeniser ); + } + else + { + mlt_properties_set( languages, "0", "en" ); + } + mlt_properties_set_data( &self->parent, "languages", languages, 0, ( mlt_destructor )mlt_properties_close, NULL ); + return languages; }