#define ID_SIZE 128
+// This maintains counters for adding ids to elements
+struct serialise_context_s
+{
+ int producer_count;
+ int multitrack_count;
+ int playlist_count;
+ int tractor_count;
+ int filter_count;
+ int transition_count;
+ int pass;
+ mlt_properties producer_map;
+ mlt_properties hide_map;
+};
+typedef struct serialise_context_s* serialise_context;
+
/** Forward references to static functions.
*/
static int consumer_start( mlt_consumer parent );
+static int consumer_is_stopped( mlt_consumer this );
+static void serialise_service( serialise_context context, mlt_service service, xmlNode *node );
/** This is what will be called by the factory - anything can be passed in
via the argument, but keep it simple.
// If no malloc'd and consumer init ok
if ( this != NULL && mlt_consumer_init( this, NULL ) == 0 )
{
- // We have stuff to clean up, so override the close method
- //parent->close = consumer_close;
-
// Allow thread to be started/stopped
this->start = consumer_start;
+ this->is_stopped = consumer_is_stopped;
mlt_properties_set( mlt_consumer_properties( this ), "resource", arg );
return NULL;
}
-
-// This maintains counters for adding ids to elements
-struct serialise_context_s
-{
- int producer_count;
- int multitrack_count;
- int playlist_count;
- int tractor_count;
- int filter_count;
- int transition_count;
- int pass;
- mlt_properties producer_map;
-};
-typedef struct serialise_context_s* serialise_context;
-
-
static inline void serialise_properties( mlt_properties properties, xmlNode *node )
{
int i;
if ( name != NULL &&
name[ 0 ] != '_' &&
mlt_properties_get_value( properties, i ) != NULL &&
- strcmp( name, "westley" ) != 0 )
+ strcmp( name, "westley" ) != 0 &&
+ strcmp( name, "in" ) != 0 &&
+ strcmp( name, "out" ) != 0 )
{
-#if 0
- p = xmlNewChild( node, NULL, "prop", NULL );
-#else
- p = node;
-#endif
- xmlNewProp( p, mlt_properties_get_name( properties, i ), mlt_properties_get_value( properties, i ) );
+ p = xmlNewChild( node, NULL, "property", NULL );
+ xmlNewProp( p, "name", mlt_properties_get_name( properties, i ) );
+ xmlNodeSetContent( p, mlt_properties_get_value( properties, i ) );
}
}
}
-static void serialise_service( serialise_context context, mlt_service service, xmlNode *node )
+static void serialise_producer( serialise_context context, mlt_service service, xmlNode *node )
+{
+ xmlNode *child = node;
+ char id[ ID_SIZE + 1 ];
+ char key[ 11 ];
+ mlt_properties properties = mlt_service_properties( service );
+
+ id[ ID_SIZE ] = '\0';
+ key[ 10 ] = '\0';
+
+ if ( context->pass == 0 )
+ {
+ child = xmlNewChild( node, NULL, "producer", NULL );
+
+ // Set the id
+ if ( mlt_properties_get( properties, "id" ) == NULL )
+ {
+ snprintf( id, ID_SIZE, "producer%d", context->producer_count++ );
+ xmlNewProp( child, "id", id );
+ }
+ else
+ strncpy( id, mlt_properties_get( properties, "id" ), ID_SIZE );
+ serialise_properties( properties, child );
+
+ // Add producer to the map
+ snprintf( key, 10, "%p", service );
+ mlt_properties_set( context->producer_map, key, id );
+ mlt_properties_set_int( context->hide_map, key, mlt_properties_get_int( properties, "hide" ) );
+ }
+ else
+ {
+ snprintf( key, 10, "%p", service );
+ xmlNewProp( node, "producer", mlt_properties_get( context->producer_map, key ) );
+ }
+}
+
+static void serialise_multitrack( serialise_context context, mlt_service service, xmlNode *node )
+{
+ int i;
+ xmlNode *child = node;
+ char id[ ID_SIZE + 1 ];
+ char key[ 11 ];
+ mlt_properties properties = mlt_service_properties( service );
+
+ id[ ID_SIZE ] = '\0';
+ key[ 10 ] = '\0';
+
+ if ( context->pass == 0 )
+ {
+ // Iterate over the tracks to collect the producers
+ for ( i = 0; i < mlt_multitrack_count( MLT_MULTITRACK( service ) ); i++ )
+ serialise_service( context, MLT_SERVICE( mlt_multitrack_track( MLT_MULTITRACK( service ), i ) ), node );
+ }
+ else
+ {
+ // Create the multitrack node
+ child = xmlNewChild( node, NULL, "multitrack", NULL );
+
+ // Set the id
+ if ( mlt_properties_get( properties, "id" ) == NULL )
+ {
+ snprintf( id, ID_SIZE, "multitrack%d", context->multitrack_count++ );
+ xmlNewProp( child, "id", id );
+ }
+
+ // Serialise the tracks
+ for ( i = 0; i < mlt_multitrack_count( MLT_MULTITRACK( service ) ); i++ )
+ {
+ xmlNode *track = xmlNewChild( child, NULL, "track", NULL );
+ int hide = 0;
+
+ snprintf( key, 10, "%p", MLT_SERVICE( mlt_multitrack_track( MLT_MULTITRACK( service ), i ) ) );
+ xmlNewProp( track, "producer", mlt_properties_get( context->producer_map, key ) );
+
+ hide = mlt_properties_get_int( context->hide_map, key );
+ if ( hide )
+ xmlNewProp( track, "hide", hide == 1 ? "video" : ( hide == 2 ? "audio" : "both" ) );
+ }
+ }
+}
+
+static void serialise_playlist( serialise_context context, mlt_service service, xmlNode *node )
{
int i;
xmlNode *child = node;
char id[ ID_SIZE + 1 ];
char key[ 11 ];
+ mlt_playlist_clip_info info;
+ mlt_properties properties = mlt_service_properties( service );
+
id[ ID_SIZE ] = '\0';
key[ 10 ] = '\0';
+
+ if ( context->pass == 0 )
+ {
+ // Iterate over the playlist entries to collect the producers
+ for ( i = 0; i < mlt_playlist_count( MLT_PLAYLIST( service ) ); i++ )
+ {
+ if ( ! mlt_playlist_get_clip_info( MLT_PLAYLIST( service ), &info, i ) )
+ {
+ if ( info.producer != NULL )
+ {
+ char *service_s = mlt_properties_get( mlt_producer_properties( info.producer ), "mlt_service" );
+ char *resource_s = mlt_properties_get( mlt_producer_properties( info.producer ), "resource" );
+ if ( service_s != NULL && strcmp( service_s, "blank" ) != 0 )
+ serialise_service( context, MLT_SERVICE( info.producer ), node );
+ else if ( resource_s != NULL && !strcmp( resource_s, "<playlist>" ) )
+ serialise_playlist( context, MLT_SERVICE( info.producer ), node );
+ }
+ }
+ }
+
+ child = xmlNewChild( node, NULL, "playlist", NULL );
+
+ // Set the id
+ if ( mlt_properties_get( properties, "id" ) == NULL )
+ {
+ snprintf( id, ID_SIZE, "playlist%d", context->playlist_count++ );
+ xmlNewProp( child, "id", id );
+ }
+ else
+ strncpy( id, mlt_properties_get( properties, "id" ), ID_SIZE );
+
+ // Add producer to the map
+ snprintf( key, 10, "%p", service );
+ mlt_properties_set( context->producer_map, key, id );
+ mlt_properties_set_int( context->hide_map, key, mlt_properties_get_int( properties, "hide" ) );
+
+ // Iterate over the playlist entries
+ for ( i = 0; i < mlt_playlist_count( MLT_PLAYLIST( service ) ); i++ )
+ {
+ if ( ! mlt_playlist_get_clip_info( MLT_PLAYLIST( service ), &info, i ) )
+ {
+ char *service_s = mlt_properties_get( mlt_producer_properties( info.producer ), "mlt_service" );
+ if ( service_s != NULL && strcmp( service_s, "blank" ) == 0 )
+ {
+ char length[ 20 ];
+ length[ 19 ] = '\0';
+ xmlNode *entry = xmlNewChild( child, NULL, "blank", NULL );
+ snprintf( length, 19, "%d", info.frame_count );
+ xmlNewProp( entry, "length", length );
+ }
+ else
+ {
+ char temp[ 20 ];
+ xmlNode *entry = xmlNewChild( child, NULL, "entry", NULL );
+ snprintf( key, 10, "%p", MLT_SERVICE( info.producer ) );
+ xmlNewProp( entry, "producer", mlt_properties_get( context->producer_map, key ) );
+ sprintf( temp, "%d", info.frame_in );
+ xmlNewProp( entry, "in", temp );
+ sprintf( temp, "%d", info.frame_out );
+ xmlNewProp( entry, "out", temp );
+ }
+ }
+ }
+ }
+ else if ( strcmp( (const char*) node->name, "tractor" ) != 0 )
+ {
+ snprintf( key, 10, "%p", service );
+ xmlNewProp( node, "producer", mlt_properties_get( context->producer_map, key ) );
+ }
+}
+
+static void serialise_tractor( serialise_context context, mlt_service service, xmlNode *node )
+{
+ xmlNode *child = node;
+ char id[ ID_SIZE + 1 ];
+ mlt_properties properties = mlt_service_properties( service );
+ id[ ID_SIZE ] = '\0';
+
+ if ( context->pass == 0 )
+ {
+ // Recurse on connected producer
+ serialise_service( context, mlt_service_producer( service ), node );
+ }
+ else
+ {
+ child = xmlNewChild( node, NULL, "tractor", NULL );
+
+ // Set the id
+ if ( mlt_properties_get( properties, "id" ) == NULL )
+ {
+ snprintf( id, ID_SIZE, "tractor%d", context->tractor_count++ );
+ xmlNewProp( child, "id", id );
+ }
+
+ xmlNewProp( child, "in", mlt_properties_get( properties, "in" ) );
+ xmlNewProp( child, "out", mlt_properties_get( properties, "out" ) );
+
+ // Recurse on connected producer
+ serialise_service( context, mlt_service_producer( service ), child );
+ }
+}
+
+static void serialise_filter( serialise_context context, mlt_service service, xmlNode *node )
+{
+ xmlNode *child = node;
+ char id[ ID_SIZE + 1 ];
+ mlt_properties properties = mlt_service_properties( service );
+
+ id[ ID_SIZE ] = '\0';
+
+ // Recurse on connected producer
+ serialise_service( context, mlt_service_producer( service ), node );
+
+ if ( context->pass == 1 )
+ {
+ child = xmlNewChild( node, NULL, "filter", NULL );
+
+ // Set the id
+ if ( mlt_properties_get( properties, "id" ) == NULL )
+ {
+ snprintf( id, ID_SIZE, "filter%d", context->filter_count++ );
+ xmlNewProp( child, "id", id );
+ xmlNewProp( child, "in", mlt_properties_get( properties, "in" ) );
+ xmlNewProp( child, "out", mlt_properties_get( properties, "out" ) );
+ }
+
+ serialise_properties( properties, child );
+ }
+}
+
+static void serialise_transition( serialise_context context, mlt_service service, xmlNode *node )
+{
+ xmlNode *child = node;
+ char id[ ID_SIZE + 1 ];
+ mlt_properties properties = mlt_service_properties( service );
+
+ id[ ID_SIZE ] = '\0';
+
+ // Recurse on connected producer
+ serialise_service( context, MLT_SERVICE( MLT_TRANSITION( service )->producer ), node );
+
+ if ( context->pass == 1 )
+ {
+ child = xmlNewChild( node, NULL, "transition", NULL );
+
+ // Set the id
+ if ( mlt_properties_get( properties, "id" ) == NULL )
+ {
+ snprintf( id, ID_SIZE, "transition%d", context->transition_count++ );
+ xmlNewProp( child, "id", id );
+ xmlNewProp( child, "in", mlt_properties_get( properties, "in" ) );
+ xmlNewProp( child, "out", mlt_properties_get( properties, "out" ) );
+ }
+
+ serialise_properties( properties, child );
+ }
+}
+
+static void serialise_service( serialise_context context, mlt_service service, xmlNode *node )
+{
// Iterate over consumer/producer connections
while ( service != NULL )
{
// Tell about the producer
if ( strcmp( mlt_type, "producer" ) == 0 )
{
- if ( context->pass == 0 )
- {
- child = xmlNewChild( node, NULL, "producer", NULL );
-
- // Set the id
- if ( mlt_properties_get( properties, "id" ) == NULL )
- {
- snprintf( id, ID_SIZE, "producer%d", context->producer_count++ );
- xmlNewProp( child, "id", id );
- }
- else
- strncpy( id, mlt_properties_get( properties, "id" ), ID_SIZE );
- serialise_properties( properties, child );
-
- // Add producer to the map
- snprintf( key, 10, "%p", service );
- mlt_properties_set( context->producer_map, key, id );
- }
- else
- {
- snprintf( key, 10, "%p", service );
- xmlNewProp( node, "producer", mlt_properties_get( context->producer_map, key ) );
- }
+ serialise_producer( context, service, node );
if ( mlt_properties_get( properties, "westley" ) != NULL )
break;
}
// Tell about the framework container producers
else if ( strcmp( mlt_type, "mlt_producer" ) == 0 )
{
+ char *resource = mlt_properties_get( properties, "resource" );
+
// Recurse on multitrack's tracks
- if ( strcmp( mlt_properties_get( properties, "resource" ), "<multitrack>" ) == 0 )
+ if ( strcmp( resource, "<multitrack>" ) == 0 )
{
- if ( context->pass == 0 )
- {
- // Iterate over the tracks
- for ( i = 0; i < mlt_multitrack_count( MLT_MULTITRACK( service ) ); i++ )
- {
- serialise_service( context, MLT_SERVICE( mlt_multitrack_track( MLT_MULTITRACK( service ), i ) ), node );
- }
- }
- else
- {
- // Iterate over the tracks to collect the producers
- for ( i = 0; i < mlt_multitrack_count( MLT_MULTITRACK( service ) ); i++ )
- {
- serialise_service( context, MLT_SERVICE( mlt_multitrack_track( MLT_MULTITRACK( service ), i ) ), node );
- }
-
- child = xmlNewChild( node, NULL, "multitrack", NULL );
-
- // Set the id
- if ( mlt_properties_get( properties, "id" ) == NULL )
- {
- snprintf( id, ID_SIZE, "multitrack%d", context->multitrack_count++ );
- xmlNewProp( child, "id", id );
- }
-
- // Iterate over the tracks
- for ( i = 0; i < mlt_multitrack_count( MLT_MULTITRACK( service ) ); i++ )
- {
- xmlNode *track = xmlNewChild( child, NULL, "track", NULL );
- snprintf( key, 10, "%p", MLT_SERVICE( mlt_multitrack_track( MLT_MULTITRACK( service ), i ) ) );
- xmlNewProp( track, "producer", mlt_properties_get( context->producer_map, key ) );
- }
- }
+ serialise_multitrack( context, service, node );
break;
}
// Recurse on playlist's clips
- else if ( strcmp(
mlt_properties_get( properties, "resource" ), "<playlist>" ) == 0 )
+ else if ( strcmp(
resource, "<playlist>" ) == 0 )
{
- mlt_playlist_clip_info info;
-
- if ( context->pass == 0 )
- {
- // Iterate over the playlist entries to collect the producers
- for ( i = 0; i < mlt_playlist_count( MLT_PLAYLIST( service ) ); i++ )
- {
- if ( ! mlt_playlist_get_clip_info( MLT_PLAYLIST( service ), &info, i ) )
- {
- if ( strcmp( mlt_properties_get( mlt_producer_properties( info.producer ), "mlt_service" ), "blank" ) != 0 )
- {
- serialise_service( context, MLT_SERVICE( info.producer ), node );
- }
- }
- }
-
- child = xmlNewChild( node, NULL, "playlist", NULL );
-
- // Set the id
- if ( mlt_properties_get( properties, "id" ) == NULL )
- {
- snprintf( id, ID_SIZE, "playlist%d", context->playlist_count++ );
- xmlNewProp( child, "id", id );
- }
- else
- strncpy( id, mlt_properties_get( properties, "id" ), ID_SIZE );
-
- xmlNewProp( child, "in", mlt_properties_get( properties, "in" ) );
- xmlNewProp( child, "out", mlt_properties_get( properties, "out" ) );
-
- // Add producer to the map
- snprintf( key, 10, "%p", service );
- mlt_properties_set( context->producer_map, key, id );
-
- // Iterate over the playlist entries
- for ( i = 0; i < mlt_playlist_count( MLT_PLAYLIST( service ) ); i++ )
- {
- if ( ! mlt_playlist_get_clip_info( MLT_PLAYLIST( service ), &info, i ) )
- {
- if ( strcmp( mlt_properties_get( mlt_producer_properties( info.producer ), "mlt_service" ), "blank" ) == 0 )
- {
- char length[ 20 ];
- length[ 19 ] = '\0';
- xmlNode *entry = xmlNewChild( child, NULL, "blank", NULL );
- snprintf( length, 19, "%lld", info.frame_count );
- xmlNewProp( entry, "length", length );
- }
- else
- {
- xmlNode *entry = xmlNewChild( child, NULL, "entry", NULL );
- snprintf( key, 10, "%p", MLT_SERVICE( info.producer ) );
- xmlNewProp( entry, "producer", mlt_properties_get( context->producer_map, key ) );
- }
- }
- }
- }
- else if ( strcmp( (const char*) node->name, "tractor" ) != 0 )
- {
- snprintf( key, 10, "%p", service );
- xmlNewProp( node, "producer", mlt_properties_get( context->producer_map, key ) );
- }
+ serialise_playlist( context, service, node );
}
// Recurse on tractor's producer
- else if ( strcmp( mlt_properties_get( properties, "resource" ), "<tractor>" ) == 0 )
+ else if ( strcmp( resource, "<tractor>" ) == 0 )
{
- if ( context->pass == 0 )
- {
- // Recurse on connected producer
- serialise_service( context, mlt_service_get_producer( service ), node );
- }
- else
- {
- child = xmlNewChild( node, NULL, "tractor", NULL );
-
- // Set the id
- if ( mlt_properties_get( properties, "id" ) == NULL )
- {
- snprintf( id, ID_SIZE, "tractor%d", context->tractor_count++ );
- xmlNewProp( child, "id", id );
- }
-
- xmlNewProp( child, "in", mlt_properties_get( properties, "in" ) );
- xmlNewProp( child, "out", mlt_properties_get( properties, "out" ) );
-
- // Recurse on connected producer
- serialise_service( context, mlt_service_get_producer( service ), child );
- }
+ serialise_tractor( context, service, node );
break;
}
}
// Tell about a filter
else if ( strcmp( mlt_type, "filter" ) == 0 )
{
- // Recurse on connected producer
- serialise_service( context, MLT_SERVICE( MLT_FILTER( service )->producer ), node );
-
- if ( context->pass == 1 )
- {
- child = xmlNewChild( node, NULL, "filter", NULL );
-
- // Set the id
- if ( mlt_properties_get( properties, "id" ) == NULL )
- {
- snprintf( id, ID_SIZE, "filter%d", context->filter_count++ );
- xmlNewProp( child, "id", id );
- }
-
- serialise_properties( properties, child );
- }
+ serialise_filter( context, service, node );
break;
}
// Tell about a transition
else if ( strcmp( mlt_type, "transition" ) == 0 )
{
- // Recurse on connected producer
- serialise_service( context, MLT_SERVICE( MLT_TRANSITION( service )->producer ), node );
-
- if ( context->pass == 1 )
- {
- child = xmlNewChild( node, NULL, "transition", NULL );
-
- // Set the id
- if ( mlt_properties_get( properties, "id" ) == NULL )
- {
- snprintf( id, ID_SIZE, "transition%d", context->transition_count++ );
- xmlNewProp( child, "id", id );
- }
-
- serialise_properties( properties, child );
- }
+ serialise_transition( context, service, node );
break;
}
// Get the next connected service
- service = mlt_service_get_producer( service );
+ service = mlt_service_producer( service );
}
}
-static int consumer_start( mlt_consumer this )
+xmlDocPtr westley_make_doc( mlt_service service )
{
- mlt_service inigo = NULL;
- xmlDoc *doc = xmlNewDoc( "1.0" );
- xmlNode *root = xmlNewNode( NULL, "westley" );
+ xmlDocPtr doc = xmlNewDoc( "1.0" );
+ xmlNodePtr root = xmlNewNode( NULL, "westley" );
+ struct serialise_context_s *context = calloc( 1, sizeof( struct serialise_context_s ) );
+
xmlDocSetRootElement( doc, root );
+
+ // Construct the context maps
+ context->producer_map = mlt_properties_new();
+ context->hide_map = mlt_properties_new();
+
+ // Ensure producer is a framework producer
+ mlt_properties_set( mlt_service_properties( service ), "mlt_type", "mlt_producer" );
+
+ // In pass one, we serialise the end producers and playlists,
+ // adding them to a map keyed by address.
+ serialise_service( context, service, root );
+
+ // In pass two, we serialise the tractor and reference the
+ // producers and playlists
+ context->pass++;
+ serialise_service( context, service, root );
+
+ // Cleanup resource
+ mlt_properties_close( context->producer_map );
+ mlt_properties_close( context->hide_map );
+ free( context );
+
+ return doc;
+}
+
+
+static int consumer_start( mlt_consumer this )
+{
+ xmlDocPtr doc = NULL;
// Get the producer service
- mlt_service service = mlt_service_get_producer( mlt_consumer_service( this ) );
+ mlt_service service = mlt_service_producer( mlt_consumer_service( this ) );
if ( service != NULL )
{
- struct serialise_context_s *context = calloc( 1, sizeof( struct serialise_context_s ) );
- context->producer_map = mlt_properties_new();
-
- // Remember inigo
- if ( mlt_properties_get( mlt_service_properties( service ), "mlt_service" ) != NULL &&
- strcmp( mlt_properties_get( mlt_service_properties( service ), "mlt_service" ), "inigo" ) == 0 )
- inigo = service;
-
- // Ensure producer is a framework producer
- mlt_properties_set( mlt_service_properties( service ), "mlt_type", "mlt_producer" );
-
- // In pass one, we serialise the end producers and playlists,
- // adding them to a map keyed by address.
- serialise_service( context, service, root );
-
- // In pass two, we serialise the tractor and reference the
- // producers and playlists
- context->pass++;
- serialise_service( context, service, root );
-
- mlt_properties_close( context->producer_map );
- free( context );
+ doc = westley_make_doc( service );
if ( mlt_properties_get( mlt_consumer_properties( this ), "resource" ) == NULL )
xmlDocFormatDump( stdout, doc, 1 );
else
xmlSaveFormatFile( mlt_properties_get( mlt_consumer_properties( this ), "resource" ), doc, 1 );
+
+ xmlFreeDoc( doc );
}
-
- xmlFreeDoc( doc );
+
mlt_consumer_stop( this );
- // Tell inigo, enough already!
- if ( inigo != NULL )
- mlt_properties_set_int( mlt_service_properties( inigo ), "done", 1 );
-
return 0;
}
+static int consumer_is_stopped( mlt_consumer this )
+{
+ return 1;
+}
projects / mlt / blobdiff