X-Git-Url: http://research.m1stereo.tv/gitweb?a=blobdiff_plain;f=src%2Fmodules%2Fwestley%2Fconsumer_westley.c;h=0b15204c7fd1fee51e7a67a7e0dec13619a5351c;hb=8de8411c3af4b5746e9040a67e928364be9ac058;hp=ceba61b0853e6f0da35e51ad947698342965b093;hpb=1fd5d30c5326f73a3889e3bf4f377f96e551a6d1;p=melted diff --git a/src/modules/westley/consumer_westley.c b/src/modules/westley/consumer_westley.c index ceba61b..0b15204 100644 --- a/src/modules/westley/consumer_westley.c +++ b/src/modules/westley/consumer_westley.c @@ -26,10 +26,29 @@ #include #include +#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. @@ -43,11 +62,9 @@ mlt_consumer consumer_westley_init( char *arg ) // 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 ); @@ -62,20 +79,6 @@ mlt_consumer consumer_westley_init( char *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; -}; -typedef struct serialise_context_s* serialise_context; - - static inline void serialise_properties( mlt_properties properties, xmlNode *node ) { int i; @@ -84,25 +87,268 @@ static inline void serialise_properties( mlt_properties properties, xmlNode *nod // Enumerate the properties for ( i = 0; i < mlt_properties_count( properties ); i++ ) { - if ( mlt_properties_get_value( properties, i ) != NULL ) + char *name = mlt_properties_get_name( properties, i ); + if ( name != NULL && + name[ 0 ] != '_' && + mlt_properties_get_value( properties, i ) != NULL && + 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[ 31 ]; - id[ 30 ] = '\0'; + 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" ); + if ( service_s != NULL && strcmp( service_s, "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 ); + + // 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 + { + 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 ) ); + xmlNewProp( entry, "in", mlt_properties_get( mlt_producer_properties( info.producer ), "in" ) ); + xmlNewProp( entry, "out", mlt_properties_get( mlt_producer_properties( info.producer ), "out" ) ); + } + } + } + } + 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_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 ); + } +} + +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( 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 ); + 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 ) { @@ -112,95 +358,33 @@ static void serialise_service( serialise_context context, mlt_service service, x // Tell about the producer if ( strcmp( mlt_type, "producer" ) == 0 ) { - child = xmlNewChild( node, NULL, "producer", NULL ); - - // Set the id - if ( mlt_properties_get( properties, "id" ) == NULL ) - { - snprintf( id, 30, "producer%d", context->producer_count++ ); - xmlNewProp( child, "id", id ); - } - - serialise_properties( properties, child ); + 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" ), "" ) == 0 ) + if ( strcmp( resource, "" ) == 0 ) { - child = xmlNewChild( node, NULL, "multitrack", NULL ); - - // Set the id - if ( mlt_properties_get( properties, "id" ) == NULL ) - { - snprintf( id, 30, "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 ); - serialise_service( context, MLT_SERVICE( mlt_multitrack_track( MLT_MULTITRACK( service ), i ) ), track ); - } + serialise_multitrack( context, service, node ); break; } // Recurse on playlist's clips - else if ( strcmp( mlt_properties_get( properties, "resource" ), "" ) == 0 ) + else if ( strcmp( resource, "" ) == 0 ) { - mlt_playlist_clip_info info; - child = xmlNewChild( node, NULL, "playlist", NULL ); - - // Set the id - if ( mlt_properties_get( properties, "id" ) == NULL ) - { - snprintf( id, 30, "playlist%d", context->playlist_count++ ); - xmlNewProp( child, "id", id ); - } - - xmlNewProp( child, "in", mlt_properties_get( properties, "in" ) ); - xmlNewProp( child, "out", mlt_properties_get( properties, "out" ) ); - - // 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 ); - serialise_service( context, MLT_SERVICE( info.producer ), entry ); - } - } - } + serialise_playlist( context, service, node ); } // Recurse on tractor's producer - else if ( strcmp( mlt_properties_get( properties, "resource" ), "" ) == 0 ) + else if ( strcmp( resource, "" ) == 0 ) { - child = xmlNewChild( node, NULL, "tractor", NULL ); - - // Set the id - if ( mlt_properties_get( properties, "id" ) == NULL ) - { - snprintf( id, 30, "tractor%d", context->tractor_count++ ); - xmlNewProp( child, "id", id ); - } - - // Recurse on connected producer - serialise_service( context, mlt_service_get_producer( service ), child ); - + serialise_tractor( context, service, node ); break; } } @@ -208,40 +392,14 @@ static void serialise_service( serialise_context context, mlt_service service, x // 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 ); - - child = xmlNewChild( node, NULL, "filter", NULL ); - - // Set the id - if ( mlt_properties_get( properties, "id" ) == NULL ) - { - snprintf( id, 30, "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 ); - - child = xmlNewChild( node, NULL, "transition", NULL ); - - // Set the id - if ( mlt_properties_get( properties, "id" ) == NULL ) - { - snprintf( id, 30, "transition%d", context->transition_count++ ); - xmlNewProp( child, "id", id ); - } - - serialise_properties( properties, child ); - + serialise_transition( context, service, node ); break; } @@ -250,43 +408,69 @@ static void serialise_service( serialise_context context, mlt_service service, x } } +xmlDocPtr westley_make_doc( mlt_service service ) +{ + 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 ) { mlt_service inigo = NULL; - xmlDoc *doc = xmlNewDoc( "1.0" ); - xmlNode *root = xmlNewNode( NULL, "westley" ); - xmlDocSetRootElement( doc, root ); + xmlDocPtr doc = NULL; // Get the producer service mlt_service service = mlt_service_get_producer( mlt_consumer_service( this ) ); if ( service != NULL ) { - struct serialise_context_s context; - memset( &context, 0, sizeof( struct serialise_context_s ) ); - // 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" ); - - serialise_service( &context, service, root ); - + doc = westley_make_doc( service ); + if ( mlt_properties_get( mlt_consumer_properties( this ), "resource" ) == NULL ) - xmlDocFormatDump( stderr, doc, 1 ); + 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; +}