-/*
- * mlt_field.c -- A field for planting multiple transitions and filters
- * Copyright (C) 2003-2004 Ushodaya Enterprises Limited
- * Author: Charles Yates <charles.yates@pandora.be>
+/**
+ * \file mlt_field.c
+ * \brief a field for planting multiple transitions and filters
+ * \see mlt_field_s
*
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
+ * Copyright (C) 2003-2009 Ushodaya Enterprises Limited
+ * \author Charles Yates <charles.yates@pandora.be>
*
- * This program is distributed in the hope that it will be useful,
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
*
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software Foundation,
- * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
#include "mlt_field.h"
#include <stdlib.h>
#include <string.h>
-/** Private structures.
-*/
+/** \brief Field class
+ *
+ * The field is a convenience class that works with the tractor and multitrack classes to manage track filters and transitions.
+ */
struct mlt_field_s
{
- // This is the producer we're connected to
+ /// This is the producer we're connected to
mlt_service producer;
- // Multitrack
+ /// Multitrack
mlt_multitrack multitrack;
- // Tractor
+ /// Tractor
mlt_tractor tractor;
};
-/** Constructor.
-
- We construct a multitrack and a tractor here.
-*/
+/** Construct a field, mulitrack, and tractor.
+ *
+ * \public \memberof mlt_field_s
+ * \return a new field
+ */
mlt_field mlt_field_init( )
{
this->tractor = mlt_tractor_init( );
// The first plant will be connected to the mulitrack
- this->producer = mlt_multitrack_service( this->multitrack );
+ this->producer = MLT_MULTITRACK_SERVICE( this->multitrack );
+
+ // Connect the tractor to the multitrack
+ mlt_tractor_connect( this->tractor, this->producer );
+ }
+
+ // Return this
+ return this;
+}
+
+/** Construct a field and initialize with supplied multitrack and tractor.
+ *
+ * \public \memberof mlt_field_s
+ * \param multitrack a multitrack
+ * \param tractor a tractor
+ * \return a new field
+ */
+
+mlt_field mlt_field_new( mlt_multitrack multitrack, mlt_tractor tractor )
+{
+ // Initialise the field
+ mlt_field this = calloc( sizeof( struct mlt_field_s ), 1 );
+
+ // Initialise it
+ if ( this != NULL )
+ {
+ // Construct a multitrack
+ this->multitrack = multitrack;
+
+ // Construct a tractor
+ this->tractor = tractor;
+
+ // The first plant will be connected to the mulitrack
+ this->producer = MLT_MULTITRACK_SERVICE( this->multitrack );
// Connect the tractor to the multitrack
mlt_tractor_connect( this->tractor, this->producer );
}
/** Get the service associated to this field.
-*/
+ *
+ * \public \memberof mlt_field_s
+ * \param this a field
+ * \return the tractor as a service
+ */
mlt_service mlt_field_service( mlt_field this )
{
- return mlt_tractor_service( this->tractor );
+ return MLT_TRACTOR_SERVICE( this->tractor );
}
-/** Get the multi track.
-*/
+/** Get the multitrack.
+ *
+ * \public \memberof mlt_field_s
+ * \param this a field
+ * \return the multitrack
+ */
mlt_multitrack mlt_field_multitrack( mlt_field this )
{
- return this->multitrack;
+ return this != NULL ? this->multitrack : NULL;
+}
+
+/** Get the tractor.
+ *
+ * \public \memberof mlt_field_s
+ * \param this a field
+ * \return the tractor
+ */
+
+mlt_tractor mlt_field_tractor( mlt_field this )
+{
+ return this != NULL ? this->tractor : NULL;
}
/** Get the properties associated to this field.
-*/
+ *
+ * \public \memberof mlt_field_s
+ * \param this a field
+ * \return a properties list
+ */
mlt_properties mlt_field_properties( mlt_field this )
{
- return mlt_service_properties( mlt_field_service( this ) );
+ return MLT_SERVICE_PROPERTIES( mlt_field_service( this ) );
}
/** Plant a filter.
-*/
+ *
+ * \public \memberof mlt_field_s
+ * \param this a field
+ * \param that a filter
+ * \param track the track index
+ * \return true if there was an error
+ */
int mlt_field_plant_filter( mlt_field this, mlt_filter that, int track )
{
if ( result == 0 )
{
// This is now the new producer
- this->producer = mlt_filter_service( that );
+ this->producer = MLT_FILTER_SERVICE( that );
// Reconnect tractor to new producer
mlt_tractor_connect( this->tractor, this->producer );
+
+ // Fire an event
+ mlt_events_fire( mlt_field_properties( this ), "service-changed", NULL );
}
return result;
}
/** Plant a transition.
-*/
+ *
+ * \public \memberof mlt_field_s
+ * \param this a field
+ * \param that a transition
+ * \param a_track input A's track index
+ * \param b_track input B's track index
+ * \return true if there was an error
+ */
int mlt_field_plant_transition( mlt_field this, mlt_transition that, int a_track, int b_track )
{
if ( result == 0 )
{
// This is now the new producer
- this->producer = mlt_transition_service( that );
+ this->producer = MLT_TRANSITION_SERVICE( that );
// Reconnect tractor to new producer
mlt_tractor_connect( this->tractor, this->producer );
+
+ // Fire an event
+ mlt_events_fire( mlt_field_properties( this ), "service-changed", NULL );
}
return 0;
}
/** Close the field.
-*/
+ *
+ * \public \memberof mlt_field_s
+ * \param this a field
+ */
void mlt_field_close( mlt_field this )
{
- mlt_tractor_close( this->tractor );
- mlt_multitrack_close( this->multitrack );
- free( this );
+ if ( this != NULL && mlt_properties_dec_ref( mlt_field_properties( this ) ) <= 0 )
+ {
+ //mlt_tractor_close( this->tractor );
+ //mlt_multitrack_close( this->multitrack );
+ free( this );
+ }
}
+/** Remove a filter or transition from the field.
+ *
+ * \public \memberof mlt_field_s
+ * \param self a field
+ * \param service the filter or transition to remove
+ */
+
+void mlt_field_disconnect_service( mlt_field self, mlt_service service )
+{
+ mlt_service p = mlt_service_producer( service );
+ mlt_service c = mlt_service_consumer( service);
+ int i;
+ switch ( mlt_service_identify(c) )
+ {
+ case filter_type:
+ i = mlt_filter_get_track( MLT_FILTER(c) );
+ mlt_service_connect_producer( c, p, i );
+ break;
+ case transition_type:
+ i = mlt_transition_get_a_track ( MLT_TRANSITION(c) );
+ mlt_service_connect_producer( c, p, i );
+ MLT_TRANSITION(c)->producer = p;
+ break;
+ case tractor_type:
+ self->producer = p;
+ mlt_tractor_connect( MLT_TRACTOR(c), p );
+ default:
+ break;
+ }
+ mlt_events_fire( mlt_field_properties( self ), "service-changed", NULL );
+}