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