Cleanup license declarations and remove dv1394d references.
[melted] / src / modules / fezzik / producer_fezzik.c
index 3f0445b..0d46168 100644 (file)
@@ -3,19 +3,19 @@
  * Copyright (C) 2003-2004 Ushodaya Enterprises Limited
  * Author: Charles Yates <charles.yates@pandora.be>
  *
- * 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 "producer_fezzik.h"
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
+#include <ctype.h>
+#include <fnmatch.h>
 
 #include <framework/mlt.h>
 
-static void track_service( mlt_tractor tractor, void *service, mlt_destructor destructor )
+static mlt_properties dictionary = NULL;
+static mlt_properties normalisers = NULL;
+
+static mlt_producer create_from( char *file, char *services )
 {
-       mlt_properties properties = mlt_tractor_properties( tractor );
-       int registered = mlt_properties_get_int( properties, "_registered" );
-       char *key = mlt_properties_get( properties, "_registered" );
-       char *real = malloc( strlen( key ) + 2 );
-       sprintf( real, "_%s", key );
-       mlt_properties_set_data( properties, real, service, 0, destructor, NULL );
-       mlt_properties_set_int( properties, "_registered", ++ registered );
-       free( real );
+       mlt_producer producer = NULL;
+       char *temp = strdup( services );
+       char *service = temp;
+       do
+       {
+               char *p = strchr( service, ',' );
+               if ( p != NULL )
+                       *p ++ = '\0';
+               producer = mlt_factory_producer( service, file );
+               service = p;
+       }
+       while ( producer == NULL && service != NULL );
+       free( temp );
+       return producer;
 }
 
 static mlt_producer create_producer( char *file )
 {
        mlt_producer result = NULL;
 
-       // 1st Line preferences
-       if ( strstr( file, ".inigo" ) )
-               result = mlt_factory_producer( "inigo_file", file );
-       else if ( strstr( file, ".mpg" ) )
-               result = mlt_factory_producer( "mcmpeg", file );
-       else if ( strstr( file, ".mpeg" ) )
-               result = mlt_factory_producer( "mcmpeg", file );
-       else if ( strstr( file, ".dv" ) )
-               result = mlt_factory_producer( "mcdv", file );
-       else if ( strstr( file, ".dif" ) )
-               result = mlt_factory_producer( "mcdv", file );
-       else if ( strstr( file, ".jpg" ) )
-               result = mlt_factory_producer( "pixbuf", file );
-       else if ( strstr( file, ".JPG" ) )
-               result = mlt_factory_producer( "pixbuf", file );
-       else if ( strstr( file, ".jpeg" ) )
-               result = mlt_factory_producer( "pixbuf", file );
-       else if ( strstr( file, ".png" ) )
-               result = mlt_factory_producer( "pixbuf", file );
-       else if ( strstr( file, ".svg" ) )
-               result = mlt_factory_producer( "pixbuf", file );
-       else if ( strstr( file, ".txt" ) )
-               result = mlt_factory_producer( "pango", file );
-       else if ( strstr( file, ".westley" ) )
-               result = mlt_factory_producer( "westley", file );
-       else if ( strstr( file, ".ogg" ) )
-               result = mlt_factory_producer( "vorbis", file );
-
-       // 2nd Line fallbacks
-       if ( result == NULL )
+       // 1st Line - check for service:resource handling
+       if ( strchr( file, ':' ) )
        {
-               if ( strstr( file, ".dv" ) )
-                       result = mlt_factory_producer( "libdv", file );
-               else if ( strstr( file, ".dif" ) )
-                       result = mlt_factory_producer( "libdv", file );
+               char *temp = strdup( file );
+               char *service = temp;
+               char *resource = strchr( temp, ':' );
+               *resource ++ = '\0';
+               result = mlt_factory_producer( service, resource );
+               free( temp );
        }
 
-       // 3rd line fallbacks 
+       // 2nd Line preferences
        if ( result == NULL )
-               result = mlt_factory_producer( "avformat", file );
+       {
+               int i = 0;
+               char *lookup = strdup( file );
+               char *p = lookup;
+
+               // We only need to load the dictionary once
+               if ( dictionary == NULL )
+               {
+                       char temp[ 1024 ];
+                       sprintf( temp, "%s/fezzik.dict", mlt_factory_prefix( ) );
+                       dictionary = mlt_properties_load( temp );
+                       mlt_factory_register_for_clean_up( dictionary, ( mlt_destructor )mlt_properties_close );
+               }
 
-       // 4th - allow explicit construction
+               // Convert the lookup string to lower case
+               while ( *p )
+               {
+                       *p = tolower( *p );
+                       p ++;
+               }
+
+               // Iterate through the dictionary
+               for ( i = 0; result == NULL && i < mlt_properties_count( dictionary ); i ++ )
+               {
+                       char *name = mlt_properties_get_name( dictionary, i );
+                       if ( fnmatch( name, lookup, 0 ) == 0 )
+                               result = create_from( file, mlt_properties_get_value( dictionary, i ) );
+               }
+
+               free( lookup );
+       }
+
+       // Finally, try just loading as service
        if ( result == NULL )
                result = mlt_factory_producer( file, NULL );
 
        return result;
 }
 
-static mlt_service create_filter( mlt_tractor tractor, mlt_service last, char *effect )
+static void create_filter( mlt_producer producer, char *effect, int *created )
 {
        char *id = strdup( effect );
        char *arg = strchr( id, ':' );
@@ -99,69 +114,66 @@ static mlt_service create_filter( mlt_tractor tractor, mlt_service last, char *e
        mlt_filter filter = mlt_factory_filter( id, arg );
        if ( filter != NULL )
        {
-               mlt_filter_connect( filter, last, 0 );
-               track_service( tractor, filter, ( mlt_destructor )mlt_filter_close );
-               last = mlt_filter_service( filter );
+               mlt_properties_set_int( MLT_FILTER_PROPERTIES( filter ), "_fezzik", 1 );
+               mlt_producer_attach( producer, filter );
+               mlt_filter_close( filter );
+               *created = 1;
        }
        free( id );
-       return last;
 }
 
-mlt_producer producer_fezzik_init( char *arg )
+static void attach_normalisers( mlt_producer producer )
 {
-       // Create the producer that the tractor will contain
-       mlt_producer producer = NULL;
-       if ( arg != NULL )
-               producer = create_producer( arg );
-
-       // Build the tractor if we have a producer and it isn't already westley'd :-)
-       if ( producer != NULL && mlt_properties_get( mlt_producer_properties( producer ), "westley" ) == NULL )
-       {
-               // Construct the tractor
-               mlt_tractor tractor = mlt_tractor_init( );
-
-               // Sanity check
-               if ( tractor != NULL )
-               {
-                       // Extract the tractor properties
-                       mlt_properties properties = mlt_tractor_properties( tractor );
-
-                       // Our producer will be the last service
-                       mlt_service last = mlt_producer_service( producer );
+       // Loop variable
+       int i;
 
-                       // Set the registered count
-                       mlt_properties_set_int( properties, "_registered", 0 );
+       // Tokeniser
+       mlt_tokeniser tokeniser = mlt_tokeniser_init( );
 
-                       // Register our producer for seeking in the tractor
-                       mlt_properties_set_data( properties, "producer", producer, 0, ( mlt_destructor )mlt_producer_close, NULL );
+       // We only need to load the normalising properties once
+       if ( normalisers == NULL )
+       {
+               char temp[ 1024 ];
+               sprintf( temp, "%s/fezzik.ini", mlt_factory_prefix( ) );
+               normalisers = mlt_properties_load( temp );
+               mlt_factory_register_for_clean_up( normalisers, ( mlt_destructor )mlt_properties_close );
+       }
 
-                       // Now attach normalising filters
-                       last = create_filter( tractor, last, "deinterlace" );
-                       last = create_filter( tractor, last, "rescale" );
-                       last = create_filter( tractor, last, "resize" );
-                       last = create_filter( tractor, last, "resample" );
+       // Apply normalisers
+       for ( i = 0; i < mlt_properties_count( normalisers ); i ++ )
+       {
+               int j = 0;
+               int created = 0;
+               char *value = mlt_properties_get_value( normalisers, i );
+               mlt_tokeniser_parse_new( tokeniser, value, "," );
+               for ( j = 0; !created && j < mlt_tokeniser_count( tokeniser ); j ++ )
+                       create_filter( producer, mlt_tokeniser_get_string( tokeniser, j ), &created );
+       }
 
-                       // Connect the tractor to the last
-                       mlt_tractor_connect( tractor, last );
+       // Close the tokeniser
+       mlt_tokeniser_close( tokeniser );
+}
 
-                       // Finally, inherit properties from producer
-                       mlt_properties_inherit( properties, mlt_producer_properties( producer ) );
+mlt_producer producer_fezzik_init( char *arg )
+{
+       // Create the producer 
+       mlt_producer producer = NULL;
+       mlt_properties properties = NULL;
 
-                       // Now make sure we don't lose our inherited identity
-                       mlt_properties_set_int( properties, "_mlt_service_hidden", 1 );
+       if ( arg != NULL )
+               producer = create_producer( arg );
 
-                       // This is a temporary hack to ensure that westley doesn't dig too deep
-                       // and fezzik doesn't overdo it with throwing rocks...
-                       mlt_properties_set( properties, "westley", "was here" );
+       if ( producer != NULL )
+               properties = MLT_PRODUCER_PROPERTIES( producer );
 
-                       // We need to ensure that all further properties are mirrored in the producer
-                       mlt_properties_mirror( properties, mlt_producer_properties( producer ) );
+       // Attach filters if we have a producer and it isn't already westley'd :-)
+       if ( producer != NULL && mlt_properties_get( properties, "westley" ) == NULL && mlt_properties_get( properties, "_westley" ) == NULL )
+               attach_normalisers( producer );
 
-                       // Now, we return the producer of the tractor
-                       producer = mlt_tractor_producer( tractor );
-               }
-       }
+       // Now make sure we don't lose our identity
+       if ( properties != NULL )
+               mlt_properties_set_int( properties, "_mlt_service_hidden", 1 );
 
-       // Return the tractor's producer
+       // Return the producer
        return producer;
 }