void mlt_tractor_refresh( mlt_tractor self )
{
mlt_multitrack multitrack = mlt_tractor_multitrack( self );
mlt_properties multitrack_props = MLT_MULTITRACK_PROPERTIES( multitrack );
mlt_properties properties = MLT_TRACTOR_PROPERTIES( self );
mlt_events_block( multitrack_props, properties );
mlt_events_block( properties, properties );
mlt_multitrack_refresh( multitrack );
mlt_properties_set_position( properties, "in", 0 );
mlt_properties_set_position( properties, "out", mlt_properties_get_position( multitrack_props, "out" ) );
mlt_events_unblock( properties, properties );
mlt_events_unblock( multitrack_props, properties );
mlt_properties_set_position( properties, "length", mlt_properties_get_position( multitrack_props, "length" ) );
}
int mlt_tractor_remove_track( mlt_tractor self, int index )
{
int error = mlt_multitrack_disconnect( mlt_tractor_multitrack( self ), index );
if ( !error )
{
// Update the track indices of transitions and track filters.
mlt_service service = mlt_service_producer( MLT_TRACTOR_SERVICE( self ) );
while ( service )
{
mlt_service_type type = mlt_service_identify( service );
mlt_properties properties = MLT_SERVICE_PROPERTIES( service );
if ( type == transition_type )
{
mlt_transition transition = MLT_TRANSITION( service );
int a_track = mlt_transition_get_a_track( transition );
int b_track = mlt_transition_get_b_track( transition );
if ( a_track >= index || b_track >= index )
{
a_track = MAX( a_track >= index ? a_track - 1 : a_track, 0 );
b_track = MAX( b_track >= index ? b_track - 1 : b_track, 0 );
mlt_transition_set_tracks( transition, a_track, b_track );
}
}
else if ( type == filter_type )
{
int current_track = mlt_properties_get_int( properties, "track" );
if ( current_track >= index )
mlt_properties_set_int( properties, "track", MAX( current_track - 1, 0 ) );
}
service = mlt_service_producer( service );
}
}
return error;
}
mlt_producer mlt_tractor_get_track( mlt_tractor self, int index )
{
return mlt_multitrack_track( mlt_tractor_multitrack( self ), index );
}
int mlt_tractor_set_track( mlt_tractor self, mlt_producer producer, int index )
{
return mlt_multitrack_connect( mlt_tractor_multitrack( self ), producer, index );
}
int mlt_parser_start( mlt_parser self, mlt_service object )
{
int error = 0;
mlt_service_type type = mlt_service_identify( object );
switch( type )
{
case invalid_type:
error = self->on_invalid( self, object );
break;
case unknown_type:
error = self->on_unknown( self, object );
break;
case producer_type:
if ( mlt_producer_is_cut( ( mlt_producer )object ) )
error = mlt_parser_start( self, ( mlt_service )mlt_producer_cut_parent( ( mlt_producer )object ) );
error = self->on_start_producer( self, ( mlt_producer )object );
if ( error == 0 )
{
int i = 0;
while ( error == 0 && mlt_producer_filter( ( mlt_producer )object, i ) != NULL )
error = mlt_parser_start( self, ( mlt_service )mlt_producer_filter( ( mlt_producer )object, i ++ ) );
}
error = self->on_end_producer( self, ( mlt_producer )object );
break;
case playlist_type:
error = self->on_start_playlist( self, ( mlt_playlist )object );
if ( error == 0 )
{
int i = 0;
while ( error == 0 && i < mlt_playlist_count( ( mlt_playlist )object ) )
mlt_parser_start( self, ( mlt_service )mlt_playlist_get_clip( ( mlt_playlist )object, i ++ ) );
i = 0;
while ( error == 0 && mlt_producer_filter( ( mlt_producer )object, i ) != NULL )
error = mlt_parser_start( self, ( mlt_service )mlt_producer_filter( ( mlt_producer )object, i ++ ) );
}
error = self->on_end_playlist( self, ( mlt_playlist )object );
break;
case tractor_type:
error = self->on_start_tractor( self, ( mlt_tractor )object );
if ( error == 0 )
{
int i = 0;
mlt_service next = mlt_service_producer( object );
mlt_parser_start( self, ( mlt_service )mlt_tractor_multitrack( ( mlt_tractor )object ) );
while ( next != ( mlt_service )mlt_tractor_multitrack( ( mlt_tractor )object ) )
{
mlt_parser_start( self, next );
next = mlt_service_producer( next );
}
while ( error == 0 && mlt_producer_filter( ( mlt_producer )object, i ) != NULL )
error = mlt_parser_start( self, ( mlt_service )mlt_producer_filter( ( mlt_producer )object, i ++ ) );
}
error = self->on_end_tractor( self, ( mlt_tractor )object );
break;
case multitrack_type:
error = self->on_start_multitrack( self, ( mlt_multitrack )object );
if ( error == 0 )
{
int i = 0;
while ( i < mlt_multitrack_count( ( mlt_multitrack )object ) )
{
self->on_start_track( self );
mlt_parser_start( self, ( mlt_service )mlt_multitrack_track( ( mlt_multitrack )object , i ++ ) );
self->on_end_track( self );
}
i = 0;
while ( error == 0 && mlt_producer_filter( ( mlt_producer )object, i ) != NULL )
error = mlt_parser_start( self, ( mlt_service )mlt_producer_filter( ( mlt_producer )object, i ++ ) );
}
error = self->on_end_multitrack( self, ( mlt_multitrack )object );
break;
case filter_type:
error = self->on_start_filter( self, ( mlt_filter )object );
if ( error == 0 )
{
int i = 0;
while ( error == 0 && mlt_producer_filter( ( mlt_producer )object, i ) != NULL )
error = mlt_parser_start( self, ( mlt_service )mlt_producer_filter( ( mlt_producer )object, i ++ ) );
}
error = self->on_end_filter( self, ( mlt_filter )object );
break;
case transition_type:
error = self->on_start_transition( self, ( mlt_transition )object );
if ( error == 0 )
{
int i = 0;
while ( error == 0 && mlt_producer_filter( ( mlt_producer )object, i ) != NULL )
error = mlt_parser_start( self, ( mlt_service )mlt_producer_filter( ( mlt_producer )object, i ++ ) );
}
error = self->on_end_transition( self, ( mlt_transition )object );
break;
case field_type:
break;
case consumer_type:
break;
}
return error;
}
