mlt_filter filter_mirror_init( mlt_profile profile, mlt_service_type type, const char *id, char *arg )
{
// Construct a new filter
mlt_filter filter = mlt_filter_new( );
// If we have a filter, initialise it
if ( filter != NULL )
{
// Get the properties
mlt_properties properties = MLT_FILTER_PROPERTIES( filter );
// Set the default mirror type
mlt_properties_set_or_default( properties, "mirror", arg, "horizontal" );
// Assign the process method
filter->process = filter_process;
}
// Return the filter
return filter;
}
mlt_repository mlt_factory_init( const char *directory )
{
// Load the system locales
setlocale( LC_ALL, "" );
if ( ! global_properties )
global_properties = mlt_properties_new( );
// Allow property refresh on a subsequent initialisation
if ( global_properties )
{
mlt_properties_set_or_default( global_properties, "MLT_NORMALISATION", getenv( "MLT_NORMALISATION" ), "PAL" );
mlt_properties_set_or_default( global_properties, "MLT_PRODUCER", getenv( "MLT_PRODUCER" ), "loader" );
mlt_properties_set_or_default( global_properties, "MLT_CONSUMER", getenv( "MLT_CONSUMER" ), "sdl" );
mlt_properties_set( global_properties, "MLT_TEST_CARD", getenv( "MLT_TEST_CARD" ) );
mlt_properties_set_or_default( global_properties, "MLT_PROFILE", getenv( "MLT_PROFILE" ), "dv_pal" );
mlt_properties_set_or_default( global_properties, "MLT_DATA", getenv( "MLT_DATA" ), PREFIX_DATA );
#if defined(WIN32)
char path[1024];
DWORD size = sizeof( path );
GetModuleFileName( NULL, path, size );
#elif defined(__DARWIN__) && defined(RELOCATABLE)
char path[1024];
uint32_t size = sizeof( path );
_NSGetExecutablePath( path, &size );
#endif
#if defined(WIN32) || (defined(__DARWIN__) && defined(RELOCATABLE))
char *path2 = strdup( path );
char *appdir = dirname( path2 );
mlt_properties_set( global_properties, "MLT_APPDIR", appdir );
free( path2 );
#endif
}
// Only initialise once
if ( mlt_directory == NULL )
{
#if !defined(WIN32) && !(defined(__DARWIN__) && defined(RELOCATABLE))
// Allow user overrides
if ( directory == NULL || !strcmp( directory, "" ) )
directory = getenv( "MLT_REPOSITORY" );
#endif
// If no directory is specified, default to install directory
if ( directory == NULL )
directory = PREFIX_LIB;
// Store the prefix for later retrieval
#if defined(WIN32) || (defined(__DARWIN__) && defined(RELOCATABLE))
char *exedir = mlt_environment( "MLT_APPDIR" );
size_t size = strlen( exedir );
if ( global_properties && !getenv( "MLT_DATA" ) )
{
mlt_directory = calloc( 1, size + strlen( PREFIX_DATA ) + 1 );
strcpy( mlt_directory, exedir );
strcat( mlt_directory, PREFIX_DATA );
mlt_properties_set( global_properties, "MLT_DATA", mlt_directory );
free( mlt_directory );
}
mlt_directory = calloc( 1, size + strlen( directory ) + 1 );
strcpy( mlt_directory, exedir );
strcat( mlt_directory, directory );
#else
mlt_directory = strdup( directory );
#endif
// Initialise the pool
mlt_pool_init( );
// Create and set up the events object
event_object = mlt_properties_new( );
mlt_events_init( event_object );
mlt_events_register( event_object, "producer-create-request", ( mlt_transmitter )mlt_factory_create_request );
mlt_events_register( event_object, "producer-create-done", ( mlt_transmitter )mlt_factory_create_done );
mlt_events_register( event_object, "filter-create-request", ( mlt_transmitter )mlt_factory_create_request );
mlt_events_register( event_object, "filter-create-done", ( mlt_transmitter )mlt_factory_create_done );
mlt_events_register( event_object, "transition-create-request", ( mlt_transmitter )mlt_factory_create_request );
mlt_events_register( event_object, "transition-create-done", ( mlt_transmitter )mlt_factory_create_done );
mlt_events_register( event_object, "consumer-create-request", ( mlt_transmitter )mlt_factory_create_request );
mlt_events_register( event_object, "consumer-create-done", ( mlt_transmitter )mlt_factory_create_done );
// Create the repository of services
repository = mlt_repository_init( mlt_directory );
// Force a clean up when app closes
atexit( mlt_factory_close );
}
if ( global_properties )
{
char *path = getenv( "MLT_PRESETS_PATH" );
if ( path )
{
mlt_properties_set( global_properties, "MLT_PRESETS_PATH", path );
}
else
{
path = malloc( strlen( mlt_environment( "MLT_DATA" ) ) + strlen( PRESETS_DIR ) + 1 );
strcpy( path, mlt_environment( "MLT_DATA" ) );
strcat( path, PRESETS_DIR );
mlt_properties_set( global_properties, "MLT_PRESETS_PATH", path );
free( path );
}
}
return repository;
}
