git.sesse.net Git - mlt/blob - src/inigo/inigo.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include <sched.h>
   5
   6 #include <framework/mlt.h>
   7
   8 #include "io.h"
   9
  10 static void transport_action( mlt_producer producer, char *value )
  11 {
  12         mlt_properties properties = MLT_PRODUCER_PROPERTIES( producer );
  13         mlt_multitrack multitrack = mlt_properties_get_data( properties, "multitrack", NULL );
  14         mlt_consumer consumer = mlt_properties_get_data( properties, "transport_consumer", NULL );
  15
  16         mlt_properties_set_int( properties, "stats_off", 0 );
  17
  18         if ( strlen( value ) == 1 )
  19         {
  20                 switch( value[ 0 ] )
  21                 {
  22                         case 'q':
  23                                 mlt_properties_set_int( properties, "done", 1 );
  24                                 break;
  25                         case '0':
  26                                 mlt_producer_set_speed( producer, 1 );
  27                                 mlt_producer_seek( producer, 0 );
  28                                 break;
  29                         case '1':
  30                                 mlt_producer_set_speed( producer, -10 );
  31                                 break;
  32                         case '2':
  33                                 mlt_producer_set_speed( producer, -5 );
  34                                 break;
  35                         case '3':
  36                                 mlt_producer_set_speed( producer, -2 );
  37                                 break;
  38                         case '4':
  39                                 mlt_producer_set_speed( producer, -1 );
  40                                 break;
  41                         case '5':
  42                                 mlt_producer_set_speed( producer, 0 );
  43                                 break;
  44                         case '6':
  45                         case ' ':
  46                                 mlt_producer_set_speed( producer, 1 );
  47                                 break;
  48                         case '7':
  49                                 mlt_producer_set_speed( producer, 2 );
  50                                 break;
  51                         case '8':
  52                                 mlt_producer_set_speed( producer, 5 );
  53                                 break;
  54                         case '9':
  55                                 mlt_producer_set_speed( producer, 10 );
  56                                 break;
  57                         case 'd':
  58                                 if ( multitrack != NULL )
  59                                 {
  60                                         int i = 0;
  61                                         mlt_position last = -1;
  62                                         fprintf( stderr, "\n" );
  63                                         for ( i = 0; 1; i ++ )
  64                                         {
  65                                                 mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_start, i );
  66                                                 if ( time == last )
  67                                                         break;
  68                                                 last = time;
  69                                                 fprintf( stderr, "%d: %d\n", i, (int)time );
  70                                         }
  71                                 }
  72                                 break;
  73
  74                         case 'g':
  75                                 if ( multitrack != NULL )
  76                                 {
  77                                         mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_current, 0 );
  78                                         mlt_producer_seek( producer, time );
  79                                 }
  80                                 break;
  81                         case 'H':
  82                                 if ( producer != NULL )
  83                                 {
  84                                         mlt_position position = mlt_producer_position( producer );
  85                                         mlt_producer_seek( producer, position - ( mlt_producer_get_fps( producer ) * 60 ) );
  86                                 }
  87                                 break;
  88                         case 'h':
  89                                 if ( producer != NULL )
  90                                 {
  91                                         mlt_position position = mlt_producer_position( producer );
  92                                         mlt_producer_set_speed( producer, 0 );
  93                                         mlt_producer_seek( producer, position - 1 );
  94                                 }
  95                                 break;
  96                         case 'j':
  97                                 if ( multitrack != NULL )
  98                                 {
  99                                         mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_current, 1 );
 100                                         mlt_producer_seek( producer, time );
 101                                 }
 102                                 break;
 103                         case 'k':
 104                                 if ( multitrack != NULL )
 105                                 {
 106                                         mlt_position time = mlt_multitrack_clip( multitrack, mlt_whence_relative_current, -1 );
 107                                         mlt_producer_seek( producer, time );
 108                                 }
 109                                 break;
 110                         case 'l':
 111                                 if ( producer != NULL )
 112                                 {
 113                                         mlt_position position = mlt_producer_position( producer );
 114                                         if ( mlt_producer_get_speed( producer ) != 0 )
 115                                                 mlt_producer_set_speed( producer, 0 );
 116                                         else
 117                                                 mlt_producer_seek( producer, position + 1 );
 118                                 }
 119                                 break;
 120                         case 'L':
 121                                 if ( producer != NULL )
 122                                 {
 123                                         mlt_position position = mlt_producer_position( producer );
 124                                         mlt_producer_seek( producer, position + ( mlt_producer_get_fps( producer ) * 60 ) );
 125                                 }
 126                                 break;
 127                 }
 128
 129                 mlt_properties_set_int( MLT_CONSUMER_PROPERTIES( consumer ), "refresh", 1 );
 130         }
 131
 132         mlt_properties_set_int( properties, "stats_off", 0 );
 133 }
 134
 135 static mlt_consumer create_consumer( char *id, mlt_producer producer )
 136 {
 137         char *arg = id != NULL ? strchr( id, ':' ) : NULL;
 138         if ( arg != NULL )
 139                 *arg ++ = '\0';
 140         mlt_consumer consumer = mlt_factory_consumer( id, arg );
 141         if ( consumer != NULL )
 142         {
 143                 mlt_properties properties = MLT_CONSUMER_PROPERTIES( consumer );
 144                 mlt_properties_set_data( properties, "transport_callback", transport_action, 0, NULL, NULL );
 145                 mlt_properties_set_data( properties, "transport_producer", producer, 0, NULL, NULL );
 146                 mlt_properties_set_data( MLT_PRODUCER_PROPERTIES( producer ), "transport_consumer", consumer, 0, NULL, NULL );
 147         }
 148         return consumer;
 149 }
 150
 151 #ifdef __DARWIN__
 152
 153 static void event_handling( mlt_producer producer, mlt_consumer consumer )
 154 {
 155         SDL_Event event;
 156
 157         while ( SDL_PollEvent( &event ) )
 158         {
 159                 switch( event.type )
 160                 {
 161                         case SDL_QUIT:
 162                                 mlt_properties_set_int( MLT_PRODUCER_PROPERTIES( consumer ), "done", 1 );
 163                                 break;
 164
 165                         case SDL_KEYDOWN:
 166                                 if ( event.key.keysym.unicode < 0x80 && event.key.keysym.unicode > 0 )
 167                                 {
 168                                         char keyboard[ 2 ] = { event.key.keysym.unicode, 0 };
 169                                         transport_action( producer, keyboard );
 170                                 }
 171                                 break;
 172                 }
 173         }
 174 }
 175
 176 #endif
 177
 178 static void transport( mlt_producer producer, mlt_consumer consumer )
 179 {
 180         mlt_properties properties = MLT_PRODUCER_PROPERTIES( producer );
 181         int silent = mlt_properties_get_int( MLT_CONSUMER_PROPERTIES( consumer ), "silent" );
 182         struct timespec tm = { 0, 40000 };
 183
 184         if ( mlt_properties_get_int( properties, "done" ) == 0 && !mlt_consumer_is_stopped( consumer ) )
 185         {
 186                 if ( !silent )
 187                 {
 188                         term_init( );
 189
 190                         fprintf( stderr, "+-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+\n" );
 191                         fprintf( stderr, "|1=-10| |2= -5| |3= -2| |4= -1| |5=  0| |6=  1| |7=  2| |8=  5| |9= 10|\n" );
 192                         fprintf( stderr, "+-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+ +-----+\n" );
 193
 194                         fprintf( stderr, "+---------------------------------------------------------------------+\n" );
 195                         fprintf( stderr, "|               H = back 1 minute,  L = forward 1 minute              |\n" );
 196                         fprintf( stderr, "|                 h = previous frame,  l = next frame                 |\n" );
 197                         fprintf( stderr, "|           g = start of clip, j = next clip, k = previous clip       |\n" );
 198                         fprintf( stderr, "|                0 = restart, q = quit, space = play                  |\n" );
 199                         fprintf( stderr, "+---------------------------------------------------------------------+\n" );
 200                 }
 201
 202                 while( mlt_properties_get_int( properties, "done" ) == 0 && !mlt_consumer_is_stopped( consumer ) )
 203                 {
 204                         int value = silent ? -1 : term_read( );
 205
 206                         if ( value != -1 )
 207                         {
 208                                 char string[ 2 ] = { value, 0 };
 209                                 transport_action( producer, string );
 210                         }
 211
 212 #ifdef __DARWIN__
 213                         event_handling( producer, consumer );
 214 #endif
 215
 216                         if ( !silent && mlt_properties_get_int( properties, "stats_off" ) == 0 )
 217                                 fprintf( stderr, "Current Position: %10d\r", (int)mlt_producer_position( producer ) );
 218
 219                         if ( silent )
 220                                 nanosleep( &tm, NULL );
 221                 }
 222
 223                 if ( !silent )
 224                         fprintf( stderr, "\n" );
 225         }
 226 }
 227
 228 int main( int argc, char **argv )
 229 {
 230         int i;
 231         mlt_consumer consumer = NULL;
 232         mlt_producer inigo = NULL;
 233         FILE *store = NULL;
 234         char *name = NULL;
 235         struct sched_param scp;
 236
 237         // Use realtime scheduling if possible
 238         memset( &scp, '\0', sizeof( scp ) );
 239         scp.sched_priority = sched_get_priority_max( SCHED_FIFO ) - 1;
 240 #ifndef __DARWIN__
 241         sched_setscheduler( 0, SCHED_FIFO, &scp );
 242 #endif
 243
 244         // Construct the factory
 245         mlt_factory_init( NULL );
 246
 247         // Check for serialisation switch first
 248         for ( i = 1; i < argc; i ++ )
 249         {
 250                 if ( !strcmp( argv[ i ], "-serialise" ) )
 251                 {
 252                         name = argv[ ++ i ];
 253                         if ( strstr( name, ".inigo" ) )
 254                                 store = fopen( name, "w" );
 255                 }
 256         }
 257
 258         // Get inigo producer
 259         if ( argc > 1 )
 260                 inigo = mlt_factory_producer( "inigo", &argv[ 1 ] );
 261
 262         if ( argc > 1 && inigo != NULL && mlt_producer_get_length( inigo ) > 0 )
 263         {
 264                 // Get inigo's properties
 265                 mlt_properties inigo_props = MLT_PRODUCER_PROPERTIES( inigo );
 266
 267                 // Get the last group
 268                 mlt_properties group = mlt_properties_get_data( inigo_props, "group", 0 );
 269
 270                 // Parse the arguments
 271                 for ( i = 1; i < argc; i ++ )
 272                 {
 273                         if ( !strcmp( argv[ i ], "-consumer" ) )
 274                         {
 275                                 consumer = create_consumer( argv[ ++ i ], inigo );
 276                                 while ( argv[ i + 1 ] != NULL && strstr( argv[ i + 1 ], "=" ) )
 277                                         mlt_properties_parse( group, argv[ ++ i ] );
 278                         }
 279                         else if ( !strcmp( argv[ i ], "-serialise" ) )
 280                         {
 281                                 i ++;
 282                         }
 283                         else
 284                         {
 285                                 if ( store != NULL )
 286                                         fprintf( store, "%s\n", argv[ i ] );
 287
 288                                 i ++;
 289
 290                                 while ( argv[ i ] != NULL && argv[ i ][ 0 ] != '-' )
 291                                 {
 292                                         if ( store != NULL )
 293                                                 fprintf( store, "%s\n", argv[ i ] );
 294                                         i += 1;
 295                                 }
 296
 297                                 i --;
 298                         }
 299                 }
 300
 301                 // If we have no consumer, default to sdl
 302                 if ( store == NULL && consumer == NULL )
 303                         consumer = create_consumer( NULL, inigo );
 304
 305                 if ( consumer != NULL && store == NULL )
 306                 {
 307                         // Apply group settings
 308                         mlt_properties properties = MLT_CONSUMER_PROPERTIES( consumer );
 309                         mlt_properties_inherit( properties, group );
 310
 311                         // Connect consumer to inigo
 312                         mlt_consumer_connect( consumer, MLT_PRODUCER_SERVICE( inigo ) );
 313
 314                         // Start the consumer
 315                         mlt_consumer_start( consumer );
 316
 317                         // Transport functionality
 318                         transport( inigo, consumer );
 319
 320                         // Stop the consumer
 321                         mlt_consumer_stop( consumer );
 322                 }
 323                 else if ( store != NULL )
 324                 {
 325                         fprintf( stderr, "Project saved as %s.\n", name );
 326                         fclose( store );
 327                 }
 328         }
 329         else
 330         {
 331                 fprintf( stderr, "Usage: inigo [ -group [ name=value ]* ]\n"
 332                                                  "             [ -consumer id[:arg] [ name=value ]* ]\n"
 333                                                  "             [ -filter filter[:arg] [ name=value ] * ]\n"
 334                                                  "             [ -attach filter[:arg] [ name=value ] * ]\n"
 335                                                  "             [ -mix length [ -mixer transition ]* ]\n"
 336                                                  "             [ -transition id[:arg] [ name=value ] * ]\n"
 337                                                  "             [ -blank frames ]\n"
 338                                                  "             [ -track ]\n"
 339                                                  "             [ -split relative-frame ]\n"
 340                                                  "             [ -join clips ]\n"
 341                                                  "             [ -repeat times ]\n"
 342                                                  "             [ producer [ name=value ] * ]+\n" );
 343         }
 344
 345         // Close the consumer
 346         if ( consumer != NULL )
 347                 mlt_consumer_close( consumer );
 348
 349         // Close the producer
 350         if ( inigo != NULL )
 351                 mlt_producer_close( inigo );
 352
 353         // Close the factory
 354         mlt_factory_close( );
 355
 356         return 0;
 357 }