X-Git-Url: http://research.m1stereo.tv/gitweb?a=blobdiff_plain;f=src%2Fframework%2Fmlt_repository.c;h=b271a85e25ccbe8d87e281c651fa4a4fd5f7b719;hb=a3b7c7245a4ec492e5eecc76548f4a97bb648709;hp=dcb2c25797678c4424acc28b46fb001c5370aaab;hpb=7491fc66ebd7a58b05e549265783920e4b24b8ca;p=melted diff --git a/src/framework/mlt_repository.c b/src/framework/mlt_repository.c index dcb2c25..b271a85 100644 --- a/src/framework/mlt_repository.c +++ b/src/framework/mlt_repository.c @@ -3,19 +3,19 @@ * Copyright (C) 2003-2004 Ushodaya Enterprises Limited * Author: Charles Yates * - * This program is free software; you can redistribute it and/or modify - * 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 library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2.1 of the License, or (at your option) any later version. * - * This program is distributed in the hope that it will be useful, + * This library 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 - * GNU General Public License for more details. + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. * - * 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-1307, USA. + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #include "mlt_repository.h" @@ -28,181 +28,205 @@ struct mlt_repository_s { - struct mlt_properties_s parent; - mlt_properties object_list; + struct mlt_properties_s parent; // a list of object files + mlt_properties consumers; // lists of entry points + mlt_properties filters; + mlt_properties producers; + mlt_properties transitions; }; -static char *construct_full_file( char *output, char *prefix, char *file ) -{ - strcpy( output, prefix ); - if ( prefix[ strlen( prefix ) - 1 ] != '/' ) - strcat( output, "/" ); - strcat( output, file ); - return output; -} +/** Construct a new repository +*/ -static char *chomp( char *input ) +mlt_repository mlt_repository_init( const char *directory ) { - if ( input[ strlen( input ) - 1 ] == '\n' ) - input[ strlen( input ) - 1 ] = '\0'; - return input; -} + // Safety check + if ( directory == NULL || strcmp( directory, "" ) == 0 ) + return NULL; + + // Construct the repository + mlt_repository this = calloc( sizeof( struct mlt_repository_s ), 1 ); + mlt_properties_init( &this->parent, this ); + this->consumers = mlt_properties_new(); + this->filters = mlt_properties_new(); + this->producers = mlt_properties_new(); + this->transitions = mlt_properties_new(); + + // Get the directory list + mlt_properties dir = mlt_properties_new(); + int count = mlt_properties_dir_list( dir, directory, NULL, 0 ); + int i; + + // Iterate over files + for ( i = 0; i < count; i++ ) + { + int flags = RTLD_NOW; + const char *object_name = mlt_properties_get_value( dir, i); -static mlt_properties construct_object( char *prefix, char *id ) -{ - mlt_properties output = calloc( sizeof( struct mlt_properties_s ), 1 ); - mlt_properties_init( output, NULL ); - mlt_properties_set( output, "prefix", prefix ); - mlt_properties_set( output, "id", id ); - return output; -} + // Very temporary hack to allow the quicktime plugins to work + // TODO: extend repository to allow this to be used on a case by case basis + if ( strstr( object_name, "libmltkino" ) ) + flags |= RTLD_GLOBAL; -static mlt_properties construct_service( mlt_properties object, char *id ) -{ - mlt_properties output = calloc( sizeof( struct mlt_properties_s ), 1 ); - mlt_properties_init( output, NULL ); - mlt_properties_set_data( output, "object", object, 0, NULL, NULL ); - mlt_properties_set( output, "id", id ); - return output; + // Open the shared object + void *object = dlopen( object_name, flags ); + if ( object != NULL ) + { + // Get the registration function + int ( *symbol_ptr )( mlt_repository ) = dlsym( object, "mlt_register" ); + + // Call the registration function + if ( symbol_ptr != NULL ) + { + symbol_ptr( this ); + + // Register the object file for closure + mlt_properties_set_data( &this->parent, object_name, object, 0, ( mlt_destructor )dlclose, NULL ); + } + else + { + dlclose( object ); + } + } + } + + return this; } -static void *construct_instance( mlt_properties service_properties, char *symbol, void *input ) +static mlt_properties new_service( void *symbol ) { - // Extract the service - char *service = mlt_properties_get( service_properties, "id" ); - - // Get the object properties - void *object_properties = mlt_properties_get_data( service_properties, "object", NULL ); - - // Get the dlopen'd object - void *object = mlt_properties_get_data( object_properties, "dlopen", NULL ); + mlt_properties properties = mlt_properties_new(); + mlt_properties_set_data( properties, "symbol", symbol, 0, NULL, NULL ); + return properties; +} - // Get the dlsym'd symbol - void *( *symbol_ptr )( char *, void * ) = mlt_properties_get_data( object_properties, symbol, NULL ); +/** Register a service with the repository + Typically, this is invoked by a module within its mlt_register(). +*/ - // Check that we have object and open if we don't - if ( object == NULL ) +void mlt_repository_register( mlt_repository this, mlt_service_type service_type, const char *service, void *symbol ) +{ + // Add the entry point to the corresponding service list + switch ( service_type ) { - char full_file[ 512 ]; - - // Get the prefix and id of the shared object - char *prefix = mlt_properties_get( object_properties, "prefix" ); - char *file = mlt_properties_get( object_properties, "id" ); - - // Construct the full file - construct_full_file( full_file, prefix, file ); - - // Open the shared object - object = dlopen( full_file, RTLD_NOW | RTLD_GLOBAL ); - - // Set it on the properties - mlt_properties_set_data( object_properties, "dlopen", object, 0, ( void (*)( void * ) )dlclose, NULL ); + case consumer_type: + mlt_properties_set_data( this->consumers, service, new_service( symbol ), 0, ( mlt_destructor )mlt_properties_close, NULL ); + break; + case filter_type: + mlt_properties_set_data( this->filters, service, new_service( symbol ), 0, ( mlt_destructor )mlt_properties_close, NULL ); + break; + case producer_type: + mlt_properties_set_data( this->producers, service, new_service( symbol ), 0, ( mlt_destructor )mlt_properties_close, NULL ); + break; + case transition_type: + mlt_properties_set_data( this->transitions, service, new_service( symbol ), 0, ( mlt_destructor )mlt_properties_close, NULL ); + break; + default: + break; } +} - // Now check if we have this symbol pointer - if ( object != NULL && symbol_ptr == NULL ) - { - // Construct it now - symbol_ptr = dlsym( object, symbol ); +static mlt_properties get_service_properties( mlt_repository this, mlt_service_type type, const char *service ) +{ + mlt_properties service_properties = NULL; - // Set it on the properties - mlt_properties_set_data( object_properties, "dlsym", symbol_ptr, 0, NULL, NULL ); + // Get the entry point from the corresponding service list + switch ( type ) + { + case consumer_type: + service_properties = mlt_properties_get_data( this->consumers, service, NULL ); + break; + case filter_type: + service_properties = mlt_properties_get_data( this->filters, service, NULL ); + break; + case producer_type: + service_properties = mlt_properties_get_data( this->producers, service, NULL ); + break; + case transition_type: + service_properties = mlt_properties_get_data( this->transitions, service, NULL ); + break; + default: + break; } - - // Construct the service - return symbol_ptr != NULL ? symbol_ptr( service, input ) : NULL; + return service_properties; } -void destroy_properties( void *arg ) -{ - mlt_properties_close( arg ); - free( arg ); -} +/** Construct a new instance of a service +*/ -mlt_repository mlt_repository_init( mlt_properties object_list, char *prefix, char *data, char *symbol ) +void *mlt_repository_create( mlt_repository this, mlt_profile profile, mlt_service_type type, const char *service, void *input ) { - char full_file[ 512 ]; - FILE *file; - - // Construct the repository - mlt_repository this = calloc( sizeof( struct mlt_repository_s ), 1 ); - mlt_properties_init( &this->parent, this ); - - // Add the symbol to THIS repository properties. - mlt_properties_set( &this->parent, "_symbol", symbol ); - - // Asociate the repository to the global object_list - this->object_list = object_list; - - // Construct full file - construct_full_file( full_file, prefix, data ); - - // Open the file - file = fopen( full_file, "r" ); - - // Parse the contents - if ( file != NULL ) + mlt_properties properties = get_service_properties( this, type, service ); + if ( properties != NULL ) { - char full[ 512 ]; - char service[ 256 ]; - char object[ 256 ]; - - while( fgets( full, 512, file ) ) - { - chomp( full ); - - if ( full[ 0 ] != '#' && full[ 0 ] != '\0' && sscanf( full, "%s %s", service, object ) == 2 ) - { - // Get the object properties first - mlt_properties object_properties = mlt_properties_get_data( object_list, object, NULL ); + void *( *symbol_ptr )( mlt_profile, mlt_service_type, const char *, void * ) = + mlt_properties_get_data( properties, "symbol", NULL ); + + // Construct the service + return ( symbol_ptr != NULL ) ? symbol_ptr( profile, type, service, input ) : NULL; + } + return NULL; +} - // If their are no properties, create them now - if ( object_properties == NULL ) - { - // Construct the object - object_properties = construct_object( prefix, object ); +/** Destroy a repository +*/ - // Add it to the object list - mlt_properties_set_data( object_list, object, object_properties, 0, destroy_properties, NULL ); - } +void mlt_repository_close( mlt_repository this ) +{ + mlt_properties_close( this->consumers ); + mlt_properties_close( this->filters ); + mlt_properties_close( this->producers ); + mlt_properties_close( this->transitions ); + mlt_properties_close( &this->parent ); + free( this ); +} - // Now construct a property for the service - mlt_properties service_properties = construct_service( object_properties, service ); +/** Get the list of registered consumers +*/ - // Add it to the repository - mlt_properties_set_data( &this->parent, service, service_properties, 0, destroy_properties, NULL ); - } - } +mlt_properties mlt_repository_consumers( mlt_repository self ) +{ + return self->consumers; +} - // Close the file - fclose( file ); - } +/** Get the list of registered filters +*/ - return this; +mlt_properties mlt_repository_filters( mlt_repository self ) +{ + return self->filters; } -void *mlt_repository_fetch( mlt_repository this, char *service, void *input ) -{ - // Get the service properties - mlt_properties service_properties = mlt_properties_get_data( &this->parent, service, NULL ); +/** Get the list of registered producers +*/ - // If the service exists - if ( service_properties != NULL ) - { - // Get the symbol that is used to generate this service - char *symbol = mlt_properties_get( &this->parent, "_symbol" ); +mlt_properties mlt_repository_producers( mlt_repository self ) +{ + return self->producers; +} - // Now get an instance of the service - return construct_instance( service_properties, symbol, input ); - } +/** Get the list of registered transitions +*/ - return NULL; +mlt_properties mlt_repository_transitions( mlt_repository self ) +{ + return self->transitions; } -void mlt_repository_close( mlt_repository this ) +/** 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 ) { - mlt_properties_close( &this->parent ); - free( this ); + 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 ); } +/** Get the metadata about a service +*/ +mlt_properties mlt_repository_metadata( mlt_repository self, mlt_service_type type, const char *service ) +{ + mlt_properties properties = get_service_properties( self, type, service ); + return mlt_properties_get_data( properties, "metadata", NULL ); +}