2 * repository.c -- provides a map between service and shared objects
3 * Copyright (C) 2003-2004 Ushodaya Enterprises Limited
4 * Author: Charles Yates <charles.yates@pandora.be>
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software Foundation,
18 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
21 #include "mlt_repository.h"
22 #include "mlt_properties.h"
29 struct mlt_repository_s
31 struct mlt_properties_s parent
;
32 mlt_properties object_list
;
35 static char *construct_full_file( char *output
, char *prefix
, char *file
)
37 strcpy( output
, prefix
);
38 if ( prefix
[ strlen( prefix
) - 1 ] != '/' )
39 strcat( output
, "/" );
40 strcat( output
, file
);
44 static char *chomp( char *input
)
46 if ( input
[ strlen( input
) - 1 ] == '\n' )
47 input
[ strlen( input
) - 1 ] = '\0';
51 static mlt_properties
construct_object( char *prefix
, char *id
)
53 mlt_properties output
= calloc( sizeof( struct mlt_properties_s
), 1 );
54 mlt_properties_init( output
, NULL
);
55 mlt_properties_set( output
, "prefix", prefix
);
56 mlt_properties_set( output
, "id", id
);
60 static mlt_properties
construct_service( mlt_properties object
, char *id
)
62 mlt_properties output
= calloc( sizeof( struct mlt_properties_s
), 1 );
63 mlt_properties_init( output
, NULL
);
64 mlt_properties_set_data( output
, "object", object
, 0, NULL
, NULL
);
65 mlt_properties_set( output
, "id", id
);
69 static void *construct_instance( mlt_properties service_properties
, char *symbol
, void *input
)
71 // Extract the service
72 char *service
= mlt_properties_get( service_properties
, "id" );
74 // Get the object properties
75 void *object_properties
= mlt_properties_get_data( service_properties
, "object", NULL
);
77 // Get the dlopen'd object
78 void *object
= mlt_properties_get_data( object_properties
, "dlopen", NULL
);
80 // Get the dlsym'd symbol
81 void *( *symbol_ptr
)( char *, void * ) = mlt_properties_get_data( object_properties
, symbol
, NULL
);
83 // Check that we have object and open if we don't
86 char full_file
[ 512 ];
88 // Get the prefix and id of the shared object
89 char *prefix
= mlt_properties_get( object_properties
, "prefix" );
90 char *file
= mlt_properties_get( object_properties
, "id" );
92 // Construct the full file
93 construct_full_file( full_file
, prefix
, file
);
95 // Open the shared object
96 object
= dlopen( full_file
, RTLD_NOW
| RTLD_GLOBAL
);
98 fprintf( stderr
, "Failed to load plugin: %s\n", dlerror() );
100 // Set it on the properties
101 mlt_properties_set_data( object_properties
, "dlopen", object
, 0, ( void (*)( void * ) )dlclose
, NULL
);
104 // Now check if we have this symbol pointer
105 if ( object
!= NULL
&& symbol_ptr
== NULL
)
108 symbol_ptr
= dlsym( object
, symbol
);
110 // Set it on the properties
111 mlt_properties_set_data( object_properties
, "dlsym", symbol_ptr
, 0, NULL
, NULL
);
114 // Construct the service
115 return symbol_ptr
!= NULL ?
symbol_ptr( service
, input
) : NULL
;
118 void destroy_properties( void *arg
)
120 mlt_properties_close( arg
);
124 mlt_repository
mlt_repository_init( mlt_properties object_list
, char *prefix
, char *data
, char *symbol
)
126 char full_file
[ 512 ];
129 // Construct the repository
130 mlt_repository
this = calloc( sizeof( struct mlt_repository_s
), 1 );
131 mlt_properties_init( &this->parent
, this );
133 // Add the symbol to THIS repository properties.
134 mlt_properties_set( &this->parent
, "_symbol", symbol
);
136 // Asociate the repository to the global object_list
137 this->object_list
= object_list
;
139 // Construct full file
140 construct_full_file( full_file
, prefix
, data
);
143 file
= fopen( full_file
, "r" );
145 // Parse the contents
152 while( fgets( full
, 512, file
) )
156 if ( full
[ 0 ] != '#' && full
[ 0 ] != '\0' && sscanf( full
, "%s %s", service
, object
) == 2 )
158 // Get the object properties first
159 mlt_properties object_properties
= mlt_properties_get_data( object_list
, object
, NULL
);
161 // If their are no properties, create them now
162 if ( object_properties
== NULL
)
164 // Construct the object
165 object_properties
= construct_object( prefix
, object
);
167 // Add it to the object list
168 mlt_properties_set_data( object_list
, object
, object_properties
, 0, destroy_properties
, NULL
);
171 // Now construct a property for the service
172 mlt_properties service_properties
= construct_service( object_properties
, service
);
174 // Add it to the repository
175 mlt_properties_set_data( &this->parent
, service
, service_properties
, 0, destroy_properties
, NULL
);
186 void *mlt_repository_fetch( mlt_repository
this, char *service
, void *input
)
188 // Get the service properties
189 mlt_properties service_properties
= mlt_properties_get_data( &this->parent
, service
, NULL
);
191 // If the service exists
192 if ( service_properties
!= NULL
)
194 // Get the symbol that is used to generate this service
195 char *symbol
= mlt_properties_get( &this->parent
, "_symbol" );
197 // Now get an instance of the service
198 return construct_instance( service_properties
, symbol
, input
);
204 void mlt_repository_close( mlt_repository
this )
206 mlt_properties_close( &this->parent
);