-#include <framework/mlt.h>
#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
-int main( int argc, char **argv )
+#include <framework/mlt.h>
+
+#include "io.h"
+
+mlt_producer create_producer( char *file )
+{
+ mlt_producer result = NULL;
+
+ // 1st Line preferences
+ 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 );
+
+ // 2nd Line fallbacks
+ if ( result == NULL && strstr( file, ".dv" ) )
+ result = mlt_factory_producer( "libdv", file );
+ else if ( result == NULL && strstr( file, ".dif" ) )
+ result = mlt_factory_producer( "libdv", file );
+
+ return result;
+}
+
+void transport_action( mlt_producer producer, char *value )
+{
+ mlt_properties properties = mlt_producer_properties( producer );
+
+ switch( value[ 0 ] )
+ {
+ case 'q':
+ mlt_properties_set_int( properties, "done", 1 );
+ break;
+ case '0':
+ mlt_producer_set_speed( producer, 1 );
+ mlt_producer_seek( producer, 0 );
+ break;
+ case '1':
+ mlt_producer_set_speed( producer, -5 );
+ break;
+ case '2':
+ mlt_producer_set_speed( producer, -2.5 );
+ break;
+ case '3':
+ mlt_producer_set_speed( producer, -1 );
+ break;
+ case '4':
+ mlt_producer_set_speed( producer, -0.5 );
+ break;
+ case '5':
+ mlt_producer_set_speed( producer, 0 );
+ break;
+ case '6':
+ mlt_producer_set_speed( producer, 0.5 );
+ break;
+ case '7':
+ mlt_producer_set_speed( producer, 1 );
+ break;
+ case '8':
+ mlt_producer_set_speed( producer, 2.5 );
+ break;
+ case '9':
+ mlt_producer_set_speed( producer, 5 );
+ break;
+ }
+}
+
+mlt_consumer create_consumer( char *id, mlt_producer producer )
+{
+ char *arg = strchr( id, ':' );
+ if ( arg != NULL )
+ *arg ++ = '\0';
+ mlt_consumer consumer = mlt_factory_consumer( id, arg );
+ if ( consumer != NULL )
+ {
+ mlt_properties properties = mlt_consumer_properties( consumer );
+ mlt_properties_set_data( properties, "transport_callback", transport_action, 0, NULL, NULL );
+ mlt_properties_set_data( properties, "transport_producer", producer, 0, NULL, NULL );
+ }
+ return consumer;
+}
+
+void track_service( mlt_field field, void *service, mlt_destructor destructor )
{
- char temp[ 132 ];
- char *file1 = NULL;
- char *file2 = NULL;
-
- mlt_factory_init( "../modules" );
-
- if ( argc >= 2 )
- file1 = argv[ 1 ];
- if ( argc >= 3 )
- file2 = argv[ 2 ];
-
- // Start the consumer...
- mlt_consumer sdl_out = mlt_factory_consumer( "sdl", NULL );
-
- fprintf( stderr, "Press return to continue\n" );
- fgets( temp, 132, stdin );
-
- // Create the producer(s)
- mlt_producer dv1 = mlt_factory_producer( "libdv", file1 );
- mlt_producer dv2 = mlt_factory_producer( "libdv", file2 );
- //mlt_producer dv1 = producer_ppm_init( NULL );
- //mlt_producer dv2 = producer_ppm_init( NULL );
-
- // Connect a producer to our sdl consumer
- mlt_consumer_connect( sdl_out, mlt_producer_service( dv1 ) );
-
- fprintf( stderr, "Press return to continue\n" );
- fgets( temp, 132, stdin );
-
- // Register producers(s) with a multitrack object
- mlt_multitrack multitrack = mlt_multitrack_init( );
- mlt_multitrack_connect( multitrack, dv1, 0 );
- mlt_multitrack_connect( multitrack, dv2, 1 );
-
- // Create a filter and associate it to track 0
- mlt_filter filter = mlt_factory_filter( "deinterlace", NULL );
- mlt_filter_connect( filter, mlt_multitrack_service( multitrack ), 0 );
- mlt_filter_set_in_and_out( filter, 0, 5 );
-
- // Create another
- mlt_filter greyscale = mlt_factory_filter( "greyscale", NULL );
- mlt_filter_connect( greyscale, mlt_filter_service( filter ), 0 );
- mlt_filter_set_in_and_out( greyscale, 0, 10 );
-
- // Buy a tractor and connect it to the filter
- mlt_tractor tractor = mlt_tractor_init( );
- mlt_tractor_connect( tractor, mlt_filter_service( greyscale ) );
-
- // Connect the tractor to the consumer
- mlt_consumer_connect( sdl_out, mlt_tractor_service( tractor ) );
-
- // Do stuff until we're told otherwise...
- fprintf( stderr, "Press return to continue\n" );
- fgets( temp, 132, stdin );
-
- // Close everything...
- //mlt_consumer_close( sdl_out );
- //mlt_tractor_close( tractor );
- //mlt_filter_close( filter );
- //mlt_filter_close( greyscale );
- //mlt_multitrack_close( multitrack );
- //mlt_producer_close( dv1 );
- //mlt_producer_close( dv2 );
+ mlt_properties properties = mlt_field_properties( field );
+ int registered = mlt_properties_get_int( properties, "registered" );
+ char *key = mlt_properties_get( properties, "registered" );
+ mlt_properties_set_data( properties, key, service, 0, destructor, NULL );
+ mlt_properties_set_int( properties, "registered", ++ registered );
+}
+mlt_filter create_filter( mlt_field field, char *id, int track )
+{
+ char *arg = strchr( id, ':' );
+ if ( arg != NULL )
+ *arg ++ = '\0';
+ mlt_filter filter = mlt_factory_filter( id, arg );
+ if ( filter != NULL )
+ {
+ mlt_field_plant_filter( field, filter, track );
+ track_service( field, filter, ( mlt_destructor )mlt_filter_close );
+ }
+ return filter;
+}
+
+void set_properties( mlt_service service, char *namevalue )
+{
+ mlt_properties properties = mlt_service_properties( service );
+ mlt_properties_parse( properties, namevalue );
+}
+
+void transport( mlt_producer producer )
+{
+ mlt_properties properties = mlt_producer_properties( producer );
+
+ term_init( );
+ fprintf( stderr, "Press 'q' to continue\n" );
+ while( mlt_properties_get_int( properties, "done" ) == 0 )
+ {
+ int value = term_read( );
+ if ( value != -1 )
+ transport_action( producer, ( char * )&value );
+ }
+}
+
+int main( int argc, char **argv )
+{
+ int i;
+ mlt_service service = NULL;
+ mlt_consumer consumer = NULL;
+ mlt_multitrack multitrack = NULL;
+ mlt_producer producer = NULL;
+ mlt_playlist playlist = NULL;
+ mlt_field field = NULL;
+
+ // Construct the factory
+ mlt_factory_init( getenv( "MLT_REPOSITORY" ) );
+
+ // Set up containers
+ playlist = mlt_playlist_init( );
+
+ // Construct the field
+ field = mlt_field_init( );
+
+ // We need to track the number of registered filters
+ mlt_properties properties = mlt_field_properties( field );
+ mlt_properties_set_int( properties, "registered", 0 );
+
+ // Get the multitrack from the field
+ multitrack = mlt_field_multitrack( field );
+
+ // Parse the arguments
+ for ( i = 1; i < argc; i ++ )
+ {
+ if ( !strcmp( argv[ i ], "-consumer" ) )
+ {
+ consumer = create_consumer( argv[ ++ i ], mlt_multitrack_producer( multitrack ) );
+ if ( consumer != NULL )
+ service = mlt_consumer_service( consumer );
+ }
+ else if ( !strcmp( argv[ i ], "-filter" ) )
+ {
+ mlt_filter filter = create_filter( field, argv[ ++ i ], 0 );
+ if ( filter != NULL )
+ service = mlt_filter_service( filter );
+ }
+ else if ( !strstr( argv[ i ], "=" ) )
+ {
+ if ( producer != NULL )
+ mlt_playlist_append( playlist, producer );
+ producer = create_producer( argv[ i ] );
+ if ( producer != NULL )
+ service = mlt_producer_service( producer );
+ }
+ else
+ {
+ set_properties( service, argv[ i ] );
+ }
+ }
+
+ // If we have no consumer, default to sdl
+ if ( consumer == NULL )
+ consumer = create_consumer( "sdl", mlt_multitrack_producer( multitrack ) );
+
+ // Connect producer to playlist
+ if ( producer != NULL )
+ mlt_playlist_append( playlist, producer );
+
+ // Connect multitrack to producer
+ mlt_multitrack_connect( multitrack, mlt_playlist_producer( playlist ), 0 );
+
+ // Connect consumer to tractor
+ mlt_consumer_connect( consumer, mlt_field_service( field ) );
+
+ // Transport functionality
+ transport( mlt_multitrack_producer( multitrack ) );
+
+ // Close the services
+ mlt_consumer_close( consumer );
+ mlt_field_close( field );
+ mlt_producer_close( producer );
+
+ // Close the factory
mlt_factory_close( );
return 0;