5 #include <framework/mlt.h>
9 static void transport_action( mlt_producer producer, char *value )
11 mlt_properties properties = mlt_producer_properties( producer );
12 mlt_multitrack multitrack = mlt_properties_get_data( properties, "multitrack", NULL );
14 if ( strlen( value ) == 1 )
19 mlt_properties_set_int( properties, "done", 1 );
22 mlt_producer_set_speed( producer, 1 );
23 mlt_producer_seek( producer, 0 );
26 mlt_producer_set_speed( producer, -10 );
29 mlt_producer_set_speed( producer, -5 );
32 mlt_producer_set_speed( producer, -2 );
35 mlt_producer_set_speed( producer, -1 );
38 mlt_producer_set_speed( producer, 0 );
42 mlt_producer_set_speed( producer, 1 );
45 mlt_producer_set_speed( producer, 2 );
48 mlt_producer_set_speed( producer, 5 );
51 mlt_producer_set_speed( producer, 10 );
54 if ( multitrack != NULL )
57 mlt_position last = -1;
58 for ( i = 0; 1; i ++ )
60 mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_start, i );
64 fprintf( stderr, "%d: %lld\n", i, time );
66 fprintf( stderr, "Current Position: %lld\n", mlt_producer_position( producer ) );
71 if ( multitrack != NULL )
73 mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_current, 0 );
74 mlt_producer_seek( producer, time );
78 if ( producer != NULL )
80 mlt_position position = mlt_producer_position( producer );
81 mlt_producer_seek( producer, position - ( mlt_producer_get_fps( producer ) * 60 ) );
85 if ( producer != NULL )
87 mlt_position position = mlt_producer_position( producer );
88 mlt_producer_set_speed( producer, 0 );
89 mlt_producer_seek( producer, position - 1 );
93 if ( multitrack != NULL )
95 mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_current, 1 );
96 mlt_producer_seek( producer, time );
100 if ( multitrack != NULL )
102 mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_current, -1 );
103 mlt_producer_seek( producer, time );
107 if ( producer != NULL )
109 mlt_position position = mlt_producer_position( producer );
110 mlt_producer_set_speed( producer, 0 );
111 mlt_producer_seek( producer, position + 1 );
115 if ( producer != NULL )
117 mlt_position position = mlt_producer_position( producer );
118 mlt_producer_seek( producer, position + ( mlt_producer_get_fps( producer ) * 60 ) );
125 static mlt_consumer create_consumer( char *id, mlt_producer producer )
127 char *arg = strchr( id, ':' );
130 mlt_consumer consumer = mlt_factory_consumer( id, arg );
131 if ( consumer != NULL )
133 mlt_properties properties = mlt_consumer_properties( consumer );
134 mlt_properties_set_data( properties, "transport_callback", transport_action, 0, NULL, NULL );
135 mlt_properties_set_data( properties, "transport_producer", producer, 0, NULL, NULL );
140 static void transport( mlt_producer producer, mlt_consumer consumer )
142 mlt_properties properties = mlt_producer_properties( producer );
146 if ( mlt_properties_get_int( properties, "done" ) == 0 && !mlt_consumer_is_stopped( consumer ) )
148 fprintf( stderr, "+-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+\n" );
149 fprintf( stderr, "|1=-10| |2= -5| |3= -2| |4= -1| |5= 0| |6= 1| |7= 2| |8= 5| |9= 10|\n" );
150 fprintf( stderr, "+-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+\n" );
152 fprintf( stderr, "+---------------------------------------------------------------------+\n" );
153 fprintf( stderr, "| H = back 1 minute, L = forward 1 minute |\n" );
154 fprintf( stderr, "| h = previous frame, l = next frame |\n" );
155 fprintf( stderr, "| g = start of clip, j = next clip, k = previous clip |\n" );
156 fprintf( stderr, "| 0 = restart, q = quit, space = play |\n" );
157 fprintf( stderr, "+---------------------------------------------------------------------+\n" );
160 while( mlt_properties_get_int( properties, "done" ) == 0 && !mlt_consumer_is_stopped( consumer ) )
162 int value = term_read( );
164 transport_action( producer, ( char * )&value );
168 int main( int argc, char **argv )
171 mlt_consumer consumer = NULL;
172 mlt_producer inigo = NULL;
176 // Construct the factory
177 mlt_factory_init( getenv( "MLT_REPOSITORY" ) );
179 // Check for serialisation switch first
180 for ( i = 1; i < argc; i ++ )
182 if ( !strcmp( argv[ i ], "-serialise" ) )
185 if ( strstr( name, ".inigo" ) )
186 store = fopen( name, "w" );
190 // Get inigo producer
192 inigo = mlt_factory_producer( "inigo", &argv[ 1 ] );
194 if ( argc > 1 && inigo != NULL && mlt_producer_get_length( inigo ) > 0 )
196 // Get inigo's properties
197 mlt_properties inigo_props = mlt_producer_properties( inigo );
199 // Get the field service from inigo
200 mlt_field field = mlt_properties_get_data( inigo_props, "field", 0 );
202 // Get the last group
203 mlt_properties group = mlt_properties_get_data( inigo_props, "group", 0 );
205 // Parse the arguments
206 for ( i = 1; i < argc; i ++ )
208 if ( !strcmp( argv[ i ], "-consumer" ) )
210 consumer = create_consumer( argv[ ++ i ], inigo );
211 while ( argv[ i + 1 ] != NULL && strstr( argv[ i + 1 ], "=" ) )
212 mlt_properties_parse( group, argv[ ++ i ] );
214 else if ( !strcmp( argv[ i ], "-serialise" ) )
221 fprintf( store, "%s\n", argv[ i ] );
225 while ( argv[ i ] != NULL && argv[ i ][ 0 ] != '-' )
228 fprintf( store, "%s\n", argv[ i ] );
236 // If we have no consumer, default to sdl
237 if ( store == NULL && consumer == NULL )
238 consumer = create_consumer( "sdl", inigo );
240 if ( consumer != NULL && store == NULL )
242 // Apply group settings
243 mlt_properties properties = mlt_consumer_properties( consumer );
244 mlt_properties_inherit( properties, group );
246 // Connect consumer to tractor
247 mlt_consumer_connect( consumer, mlt_field_service( field ) );
249 // Start the consumer
250 mlt_consumer_start( consumer );
252 // Transport functionality
253 transport( inigo, consumer );
256 mlt_consumer_stop( consumer );
258 else if ( store != NULL )
260 fprintf( stderr, "Project saved as %s.\n", name );
266 fprintf( stderr, "Usage: inigo [ -group [ name=value ]* ]\n"
267 " [ -consumer id[:arg] [ name=value ]* ]\n"
268 " [ -filter id[:arg] [ name=value ] * ]\n"
269 " [ -transition id[:arg] [ name=value ] * ]\n"
270 " [ -blank frames ]\n"
272 " [ producer [ name=value ] * ]+\n" );
275 // Close the consumer
276 if ( consumer != NULL )
277 mlt_consumer_close( consumer );
279 // Close the producer
281 mlt_producer_close( inigo );
284 mlt_factory_close( );