/*
* melt.c -- MLT command line utility
- * Copyright (C) 2002-2010 Ushodaya Enterprises Limited
+ * Copyright (C) 2002-2011 Ushodaya Enterprises Limited
* Authors: Charles Yates <charles.yates@pandora.be>
* Dan Dennedy <dan@dennedy.org>
*
#include <framework/mlt.h>
-#ifdef __DARWIN__
+#if defined(__DARWIN__) || defined(WIN32)
#include <SDL.h>
#endif
return consumer;
}
-#ifdef __DARWIN__
+static void load_consumer( mlt_consumer *consumer, mlt_profile profile, int argc, char **argv )
+{
+ int i;
+ for ( i = 1; i < argc; i ++ )
+ {
+ if ( !strcmp( argv[ i ], "-consumer" ) )
+ {
+ if ( *consumer )
+ mlt_consumer_close( *consumer );
+ *consumer = create_consumer( profile, argv[ ++ i ] );
+ if ( *consumer )
+ {
+ mlt_properties properties = MLT_CONSUMER_PROPERTIES( *consumer );
+ while ( argv[ i + 1 ] != NULL && strstr( argv[ i + 1 ], "=" ) )
+ mlt_properties_parse( properties, argv[ ++ i ] );
+ }
+ }
+ }
+}
+
+#if defined(__DARWIN__) || defined(WIN32)
static void event_handling( mlt_producer producer, mlt_consumer consumer )
{
transport_action( producer, string );
}
-#ifdef __DARWIN__
+#if defined(__DARWIN__) || defined(WIN32)
event_handling( producer, consumer );
#endif
}
else
{
- fprintf( stderr, "Current Position: %10d\r", (int)mlt_producer_position( producer ) );
+ fprintf( stderr, "Current Position: %10d\r", (int)mlt_consumer_position( consumer ) );
}
}
}
}
+static void show_usage( char *program_name )
+{
+ fprintf( stderr,
+"Usage: %s [options] [producer [name=value]* ]+\n"
+"Options:\n"
+" -attach filter[:arg] [name=value]* Attach a filter to the output\n"
+" -attach-cut filter[:arg] [name=value]* Attach a filter to a cut\n"
+" -attach-track filter[:arg] [name=value]* Attach a filter to a track\n"
+" -attach-clip filter[:arg] [name=value]* Attach a filter to a producer\n"
+" -audio-track | -hide-video Add an audio-only track\n"
+" -blank frames Add blank silence to a track\n"
+" -consumer id[:arg] [name=value]* Set the consumer (sink)\n"
+" -debug Set the logging level to debug\n"
+" -filter filter[:arg] [name=value]* Add a filter to the current track\n"
+" -group [name=value]* Apply properties repeatedly\n"
+" -help Show this message\n"
+" -join clips Join multiple clips into one cut\n"
+" -mix length Add a mix between the last two cuts\n"
+" -mixer transition Add a transition to the mix\n"
+" -null-track | -hide-track Add a hidden track\n"
+" -profile name Set the processing settings\n"
+" -progress Display progress along with position\n"
+" -remove Remove the most recent cut\n"
+" -repeat times Repeat the last cut\n"
+" -query List all of the registered services\n"
+" -query \"consumers\" | \"consumer\"=id List consumers or show info about one\n"
+" -query \"filters\" | \"filter\"=id List filters or show info about one\n"
+" -query \"producers\" | \"producer\"=id List producers or show info about one\n"
+" -query \"transitions\" | \"transition\"=id List transitions, show info about one\n"
+" -query \"profiles\" | \"profile\"=id List profiles, show info about one\n"
+" -query \"formats\" List audio/video formats\n"
+" -query \"audio_codecs\" List audio codecs\n"
+" -query \"video_codecs\" List video codecs\n"
+" -serialise [filename] Write the commands to a text file\n"
+" -silent Do not display position/transport\n"
+" -split relative-frame Split the last cut into two cuts\n"
+" -swap Rearrange the last two cuts\n"
+" -track Add a track\n"
+" -transition id[:arg] [name=value]* Add a transition\n"
+" -verbose Set the logging level to verbose\n"
+" -version Show the version and copyright\n"
+" -video-track | -hide-audio Add a video-only track\n"
+"For more help: <http://www.mltframework.org/>\n",
+ basename( program_name ) );
+}
+
static void guess_profile( mlt_producer melt, mlt_profile profile )
{
mlt_frame fr = NULL;
if ( ! mlt_service_get_frame( MLT_PRODUCER_SERVICE(melt), &fr, 0 ) && fr )
{
+ mlt_properties_set_double( MLT_FRAME_PROPERTIES( fr ), "consumer_aspect_ratio", mlt_profile_sar( profile ) );
if ( ! mlt_frame_get_image( fr, &buffer, &fmt, &w, &h, 0 ) )
{
// Some source properties are not exposed until after the first get_image call.
mlt_frame_close( fr );
mlt_service_get_frame( MLT_PRODUCER_SERVICE(melt), &fr, 0 );
p = MLT_FRAME_PROPERTIES( fr );
- if ( mlt_properties_get_int( p, "meta.media.width" ) )
+// mlt_properties_dump(p, stderr);
+ if ( mlt_properties_get_int( p, "meta.media.frame_rate_den" ) && mlt_properties_get_int( p, "meta.media.sample_aspect_den" ) )
{
profile->width = mlt_properties_get_int( p, "meta.media.width" );
profile->height = mlt_properties_get_int( p, "meta.media.height" );
profile->progressive = mlt_properties_get_int( p, "meta.media.progressive" );
profile->frame_rate_num = mlt_properties_get_int( p, "meta.media.frame_rate_num" );
profile->frame_rate_den = mlt_properties_get_int( p, "meta.media.frame_rate_den" );
+ // AVCHD is mis-reported as double frame rate.
+ if ( profile->progressive == 0 && (
+ profile->frame_rate_num / profile->frame_rate_den == 50 ||
+ profile->frame_rate_num / profile->frame_rate_den == 59 ) )
+ profile->frame_rate_num /= 2;
profile->sample_aspect_num = mlt_properties_get_int( p, "meta.media.sample_aspect_num" );
profile->sample_aspect_den = mlt_properties_get_int( p, "meta.media.sample_aspect_den" );
+ profile->colorspace = mlt_properties_get_int( p, "meta.media.colorspace" );
profile->display_aspect_num = (int) ( (double) profile->sample_aspect_num * profile->width / profile->sample_aspect_den + 0.5 );
profile->display_aspect_den = profile->height;
+ free( profile->description );
+ profile->description = strdup( "automatic" );
+ profile->is_explicit = 0;
}
}
}
fprintf( stderr, "...\n" );
}
+static void query_profiles()
+{
+ mlt_properties profiles = mlt_profile_list();
+ fprintf( stderr, "---\nprofiles:\n" );
+ if ( profiles )
+ {
+ int j;
+ for ( j = 0; j < mlt_properties_count( profiles ); j++ )
+ fprintf( stderr, " - %s\n", mlt_properties_get_name( profiles, j ) );
+ }
+ fprintf( stderr, "...\n" );
+ mlt_properties_close( profiles );
+}
+
+static void query_profile( const char *id )
+{
+ mlt_properties profiles = mlt_profile_list();
+ mlt_properties profile = mlt_properties_get_data( profiles, id, NULL );
+ if ( profile )
+ {
+ char *s = mlt_properties_serialise_yaml( profile );
+ fprintf( stderr, "%s", s );
+ free( s );
+ }
+ else
+ {
+ fprintf( stderr, "# No metadata for profile \"%s\"\n", id );
+ }
+ mlt_properties_close( profiles );
+}
+
+static void query_formats( )
+{
+ mlt_consumer consumer = mlt_factory_consumer( NULL, "avformat", NULL );
+ if ( consumer )
+ {
+ mlt_properties_set( MLT_CONSUMER_PROPERTIES(consumer), "f", "list" );
+ mlt_consumer_start( consumer );
+ mlt_consumer_close( consumer );
+ }
+ else
+ {
+ fprintf( stderr, "# No formats - failed to load avformat consumer\n" );
+ }
+}
+
+static void query_acodecs( )
+{
+ mlt_consumer consumer = mlt_factory_consumer( NULL, "avformat", NULL );
+ if ( consumer )
+ {
+ mlt_properties_set( MLT_CONSUMER_PROPERTIES(consumer), "acodec", "list" );
+ mlt_consumer_start( consumer );
+ mlt_consumer_close( consumer );
+ }
+ else
+ {
+ fprintf( stderr, "# No audio codecs - failed to load avformat consumer\n" );
+ }
+}
+
+static void query_vcodecs( )
+{
+ mlt_consumer consumer = mlt_factory_consumer( NULL, "avformat", NULL );
+ if ( consumer )
+ {
+ mlt_properties_set( MLT_CONSUMER_PROPERTIES(consumer), "vcodec", "list" );
+ mlt_consumer_start( consumer );
+ mlt_consumer_close( consumer );
+ }
+ else
+ {
+ fprintf( stderr, "# No video codecs - failed to load avformat consumer\n" );
+ }
+}
+
+static void on_fatal_error( mlt_properties owner, mlt_consumer consumer )
+{
+ mlt_consumer_stop( consumer );
+ exit( EXIT_FAILURE );
+}
+
int main( int argc, char **argv )
{
int i;
FILE *store = NULL;
char *name = NULL;
mlt_profile profile = NULL;
- mlt_profile backup_profile = NULL;
int is_progress = 0;
int is_silent = 0;
- int is_profile_explicit = 0;
+ mlt_profile backup_profile;
// Construct the factory
mlt_repository repo = mlt_factory_init( NULL );
+#ifdef WIN32
+ is_silent = 1;
+#endif
+
for ( i = 1; i < argc; i ++ )
{
// Check for serialisation switch
query_services( repo, producer_type );
else if ( !strcmp( pname, "transitions" ) || !strcmp( pname, "transition" ) )
query_services( repo, transition_type );
-
+ else if ( !strcmp( pname, "profiles" ) || !strcmp( pname, "profile" ) )
+ query_profiles();
+ else if ( !strncmp( pname, "format", 6 ) )
+ query_formats();
+ else if ( !strncmp( pname, "acodec", 6 ) || !strcmp( pname, "audio_codecs" ) )
+ query_acodecs();
+ else if ( !strncmp( pname, "vcodec", 6 ) || !strcmp( pname, "video_codecs" ) )
+ query_vcodecs();
+
else if ( !strncmp( pname, "consumer=", 9 ) )
query_metadata( repo, consumer_type, "consumer", strchr( pname, '=' ) + 1 );
else if ( !strncmp( pname, "filter=", 7 ) )
query_metadata( repo, producer_type, "producer", strchr( pname, '=' ) + 1 );
else if ( !strncmp( pname, "transition=", 11 ) )
query_metadata( repo, transition_type, "transition", strchr( pname, '=' ) + 1 );
+ else if ( !strncmp( pname, "profile=", 8 ) )
+ query_profile( strchr( pname, '=' ) + 1 );
else
goto query_all;
}
else if ( !strcmp( argv[ i ], "-version" ) || !strcmp( argv[ i ], "--version" ) )
{
fprintf( stderr, "MLT %s " VERSION "\n"
- "Copyright (C) 2002-2010 Ushodaya Enterprises Limited\n"
+ "Copyright (C) 2002-2011 Ushodaya Enterprises Limited\n"
"<http://www.mltframework.org/>\n"
"This is free software; see the source for copying conditions. There is NO\n"
"warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n",
}
// Create profile if not set explicitly
+ if ( getenv( "MLT_PROFILE" ) )
+ profile = mlt_profile_init( NULL );
if ( profile == NULL )
profile = mlt_profile_init( NULL );
else
- is_profile_explicit = 1;
+ profile->is_explicit = 1;
// Look for the consumer option to load profile settings from consumer properties
- for ( i = 1; i < argc; i ++ )
- {
- if ( !strcmp( argv[ i ], "-consumer" ) )
- {
- consumer = create_consumer( profile, argv[ ++ i ] );
- if ( consumer )
- {
- mlt_properties properties = MLT_CONSUMER_PROPERTIES( consumer );
- while ( argv[ i + 1 ] != NULL && strstr( argv[ i + 1 ], "=" ) )
- mlt_properties_parse( properties, argv[ ++ i ] );
- }
- }
- }
-
- // Make backup of profile for determining if we need to use 'consumer' producer.
- backup_profile = mlt_profile_init( NULL );
- memcpy( backup_profile, profile, sizeof( struct mlt_profile_s ) );
- backup_profile->description = strdup( "" );
+ backup_profile = mlt_profile_clone( profile );
+ load_consumer( &consumer, profile, argc, argv );
+
+ // If the consumer changed the profile, then it is explicit.
+ if ( backup_profile && !profile->is_explicit && (
+ profile->width != backup_profile->width ||
+ profile->height != backup_profile->height ||
+ profile->sample_aspect_num != backup_profile->sample_aspect_num ||
+ profile->sample_aspect_den != backup_profile->sample_aspect_den ||
+ profile->frame_rate_den != backup_profile->frame_rate_den ||
+ profile->frame_rate_num != backup_profile->frame_rate_num ||
+ profile->colorspace != backup_profile->colorspace ) )
+ profile->is_explicit = 1;
+ mlt_profile_close( backup_profile );
// Get melt producer
if ( argc > 1 )
if ( melt )
{
- // If the producer changed the profile then do not try to guess it.
- if ( profile->width != backup_profile->width ||
- profile->height != backup_profile->height ||
- profile->sample_aspect_num != backup_profile->sample_aspect_num ||
- profile->sample_aspect_den != backup_profile->sample_aspect_den )
- {
- if ( is_profile_explicit )
- {
- // We need to use the 'consumer' producer.
- mlt_producer_close( melt );
- mlt_profile_close( profile );
- profile = backup_profile;
- backup_profile = NULL;
- if ( profile->description )
- free( profile->description );
- // This is a hack to signal create_producer() in producer_melt.c.
- profile->description = strdup( "consumer:" );
- melt = mlt_factory_producer( profile, "melt", &argv[ 1 ] );
- }
- }
- else if ( ! is_profile_explicit )
+ // Generate an automatic profile if needed.
+ if ( ! profile->is_explicit )
{
guess_profile( melt, profile );
+ mlt_producer_close( melt );
+ melt = mlt_factory_producer( profile, "melt", &argv[ 1 ] );
}
-
- // Reload the consumer with the fully qualified profile
- for ( i = 1; i < argc; i ++ )
- {
- if ( !strcmp( argv[ i ], "-consumer" ) )
- {
- if ( consumer )
- mlt_consumer_close( consumer );
- consumer = create_consumer( profile, argv[ ++ i ] );
- if ( consumer )
- {
- mlt_properties properties = MLT_CONSUMER_PROPERTIES( consumer );
- while ( argv[ i + 1 ] != NULL && strstr( argv[ i + 1 ], "=" ) )
- mlt_properties_parse( properties, argv[ ++ i ] );
- }
- }
- }
+
+ // Reload the consumer with the fully qualified profile.
+ // The producer or guess_profile could have changed the profile.
+ load_consumer( &consumer, profile, argc, argv );
// If we have no consumer, default to sdl
if ( store == NULL && consumer == NULL )
mlt_consumer_connect( consumer, MLT_PRODUCER_SERVICE( melt ) );
// Start the consumer
- mlt_consumer_start( consumer );
-
- // Transport functionality
- transport( melt, consumer );
-
- // Stop the consumer
- mlt_consumer_stop( consumer );
+ mlt_events_listen( properties, consumer, "consumer-fatal-error", ( mlt_listener )on_fatal_error );
+ if ( mlt_consumer_start( consumer ) == 0 )
+ {
+ // Transport functionality
+ transport( melt, consumer );
+
+ // Stop the consumer
+ mlt_consumer_stop( consumer );
+ }
}
else if ( store != NULL && store != stdout && name != NULL )
{
}
else
{
- fprintf( stderr,
-"Usage: %s [options] [producer [name=value]* ]+\n"
-"Options:\n"
-" -attach filter[:arg] [name=value]* Attach a filter to the output\n"
-" -attach-cut filter[:arg] [name=value]* Attach a filter to a cut\n"
-" -attach-track filter[:arg] [name=value]* Attach a filter to a track\n"
-" -attach-clip filter[:arg] [name=value]* Attach a filter to a producer\n"
-" -audio-track | -hide-video Add an audio-only track\n"
-" -blank frames Add blank silence to a track\n"
-" -consumer id[:arg] [name=value]* Set the consumer (sink)\n"
-" -debug Set the logging level to debug\n"
-" -filter filter[:arg] [name=value]* Add a filter to the current track\n"
-" -group [name=value]* Apply properties repeatedly\n"
-" -help Show this message\n"
-" -join clips Join multiple clips into one cut\n"
-" -mix length Add a mix between the last two cuts\n"
-" -mixer transition Add a transition to the mix\n"
-" -null-track | -hide-track Add a hidden track\n"
-" -profile name Set the processing settings\n"
-" -progress Display progress along with position\n"
-" -remove Remove the most recent cut\n"
-" -repeat times Repeat the last cut\n"
-" -query List all of the registered services\n"
-" -query \"consumers\" | \"consumer\"=id List consumers or show info about one\n"
-" -query \"filters\" | \"filter\"=id List filters or show info about one\n"
-" -query \"producers\" | \"producer\"=id List producers or show info about one\n"
-" -query \"transitions\" | \"transition\"=id List transitions, show info about one\n"
-" -serialise [filename] Write the commands to a text file\n"
-" -silent Do not display position/transport\n"
-" -split relative-frame Split the last cut into two cuts\n"
-" -swap Rearrange the last two cuts\n"
-" -track Add a track\n"
-" -transition id[:arg] [name=value]* Add a transition\n"
-" -verbose Set the logging level to verbose\n"
-" -version Show the version and copyright\n"
-" -video-track | -hide-audio Add a video-only track\n"
-"For more help: <http://www.mltframework.org/>\n",
- basename( argv[0] ) );
+ show_usage( argv[0] );
}
// Close the producer
// Close the factory
mlt_profile_close( profile );
- mlt_profile_close( backup_profile );
exit_factory: