2 * producer_fezzik.c -- a normalising filter
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 "producer_fezzik.h"
29 #include <framework/mlt.h>
31 static mlt_properties dictionary = NULL;
32 static mlt_properties normalisers = NULL;
34 static void track_service( mlt_tractor tractor, void *service, mlt_destructor destructor )
36 mlt_properties properties = mlt_tractor_properties( tractor );
37 int registered = mlt_properties_get_int( properties, "_registered" );
38 char *key = mlt_properties_get( properties, "_registered" );
39 char *real = malloc( strlen( key ) + 2 );
40 sprintf( real, "_%s", key );
41 mlt_properties_set_data( properties, real, service, 0, destructor, NULL );
42 mlt_properties_set_int( properties, "_registered", ++ registered );
46 static mlt_producer create_from( char *file, char *services )
48 mlt_producer producer = NULL;
49 char *temp = strdup( services );
53 char *p = strchr( service, ',' );
56 producer = mlt_factory_producer( service, file );
59 while ( producer == NULL && service != NULL );
64 static mlt_producer create_producer( char *file )
66 mlt_producer result = NULL;
68 // 1st Line - check for service:resource handling
69 if ( strchr( file, ':' ) )
71 char *temp = strdup( file );
73 char *resource = strchr( temp, ':' );
75 result = mlt_factory_producer( service, resource );
79 // 2nd Line preferences
83 char *lookup = strdup( file );
86 // We only need to load the dictionary once
87 if ( dictionary == NULL )
90 sprintf( temp, "%s/fezzik.dict", mlt_factory_prefix( ) );
91 dictionary = mlt_properties_load( temp );
92 mlt_factory_register_for_clean_up( dictionary, ( mlt_destructor )mlt_properties_close );
95 // Convert the lookup string to lower case
102 // Iterate through the dictionary
103 for ( i = 0; result == NULL && i < mlt_properties_count( dictionary ); i ++ )
105 char *name = mlt_properties_get_name( dictionary, i );
106 if ( fnmatch( name, lookup, 0 ) == 0 )
107 result = create_from( file, mlt_properties_get_value( dictionary, i ) );
113 // Finally, try just loading as service
114 if ( result == NULL )
115 result = mlt_factory_producer( file, NULL );
120 static mlt_service create_filter( mlt_tractor tractor, mlt_service last, char *effect, int *created )
122 char *id = strdup( effect );
123 char *arg = strchr( id, ':' );
126 mlt_filter filter = mlt_factory_filter( id, arg );
127 if ( filter != NULL )
129 mlt_filter_connect( filter, last, 0 );
130 track_service( tractor, filter, ( mlt_destructor )mlt_filter_close );
131 last = mlt_filter_service( filter );
138 static mlt_service attach_normalisers( mlt_tractor tractor, mlt_service last )
144 mlt_tokeniser tokeniser = mlt_tokeniser_init( );
146 // We only need to load the normalising properties once
147 if ( normalisers == NULL )
150 sprintf( temp, "%s/fezzik.ini", mlt_factory_prefix( ) );
151 normalisers = mlt_properties_load( temp );
152 mlt_factory_register_for_clean_up( normalisers, ( mlt_destructor )mlt_properties_close );
156 for ( i = 0; i < mlt_properties_count( normalisers ); i ++ )
160 char *value = mlt_properties_get_value( normalisers, i );
161 mlt_tokeniser_parse_new( tokeniser, value, "," );
162 for ( j = 0; !created && j < mlt_tokeniser_count( tokeniser ); j ++ )
163 last = create_filter( tractor, last, mlt_tokeniser_get_string( tokeniser, j ), &created );
166 // Close the tokeniser
167 mlt_tokeniser_close( tokeniser );
172 mlt_producer producer_fezzik_init( char *arg )
174 // Create the producer that the tractor will contain
175 mlt_producer producer = NULL;
178 producer = create_producer( arg );
180 // Build the tractor if we have a producer and it isn't already westley'd :-)
181 if ( producer != NULL && mlt_properties_get( mlt_producer_properties( producer ), "westley" ) == NULL )
183 // Construct the tractor
184 mlt_tractor tractor = mlt_tractor_init( );
187 if ( tractor != NULL )
189 // Extract the tractor properties
190 mlt_properties properties = mlt_tractor_properties( tractor );
192 // Our producer will be the last service
193 mlt_service last = mlt_producer_service( producer );
195 // Set the registered count
196 mlt_properties_set_int( properties, "_registered", 0 );
198 // Register our producer for seeking in the tractor
199 mlt_properties_set_data( properties, "producer", producer, 0, ( mlt_destructor )mlt_producer_close, NULL );
201 // Now attach normalising filters
202 last = attach_normalisers( tractor, last );
204 // Connect the tractor to the last
205 mlt_tractor_connect( tractor, last );
207 // Finally, inherit properties from producer
208 mlt_properties_inherit( properties, mlt_producer_properties( producer ) );
210 // Now make sure we don't lose our inherited identity
211 mlt_properties_set_int( properties, "_mlt_service_hidden", 1 );
213 // This is a temporary hack to ensure that westley doesn't dig too deep
214 // and fezzik doesn't overdo it with throwing rocks...
215 mlt_properties_set( properties, "westley", "was here" );
217 // We need to ensure that all further properties are mirrored in the producer
218 mlt_properties_mirror( properties, mlt_producer_properties( producer ) );
220 // Ensure that the inner producer ignores the in point
221 mlt_properties_set_int( mlt_producer_properties( producer ), "ignore_points", 1 );
223 // Now, we return the producer of the tractor
224 producer = mlt_tractor_producer( tractor );
228 // Return the tractor's producer