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

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