From 81e8683ca5f4653223d3b3099a4b6f10b4217138 Mon Sep 17 00:00:00 2001
From: Dan Dennedy <dan@dennedy.org>
Date: Tue, 16 Aug 2011 22:46:20 -0700
Subject: [PATCH] Add no_meta property to xml consumer.

Applications that use the consumer for its project file might want to
reduce xml bloat by setting this.
---
 src/modules/xml/consumer_xml.c   | 31 +++++++++++++++++++------------
 src/modules/xml/consumer_xml.yml | 12 +++++++++++-
 2 files changed, 30 insertions(+), 13 deletions(-)

diff --git a/src/modules/xml/consumer_xml.c b/src/modules/xml/consumer_xml.c
index 60ceaef0..a9404dc1 100644
--- a/src/modules/xml/consumer_xml.c
+++ b/src/modules/xml/consumer_xml.c
@@ -46,6 +46,7 @@ struct serialise_context_s
 	mlt_properties hide_map;
 	char *root;
 	char *store;
+	int no_meta;
 };
 typedef struct serialise_context_s* serialise_context;
 
@@ -189,14 +190,15 @@ static void serialise_properties( serialise_context context, mlt_properties prop
 		if ( name != NULL &&
 			 name[ 0 ] != '_' &&
 			 mlt_properties_get_value( properties, i ) != NULL &&
-			 strcmp( name, "mlt" ) != 0 &&
-			 strcmp( name, "in" ) != 0 &&
-			 strcmp( name, "out" ) != 0 && 
-			 strcmp( name, "id" ) != 0 && 
-			 strcmp( name, "title" ) != 0 && 
-			 strcmp( name, "root" ) != 0 && 
-			 strcmp( name, "width" ) != 0 &&
-			 strcmp( name, "height" ) != 0 )
+			 ( !context->no_meta || strncmp( name, "meta.", 5 ) ) &&
+			 strcmp( name, "mlt" ) &&
+			 strcmp( name, "in" ) &&
+			 strcmp( name, "out" ) &&
+			 strcmp( name, "id" ) &&
+			 strcmp( name, "title" ) &&
+			 strcmp( name, "root" ) &&
+			 strcmp( name, "width" ) &&
+			 strcmp( name, "height" ) )
 		{
 			char *value = mlt_properties_get_value( properties, i );
 			int rootlen = strlen( context->root );
@@ -345,7 +347,8 @@ static void serialise_multitrack( serialise_context context, mlt_service service
 				xmlNewProp( track, _x("in"), _x(mlt_properties_get( properties, "in" )) );
 				xmlNewProp( track, _x("out"), _x(mlt_properties_get( properties, "out" )) );
 				serialise_store_properties( context, MLT_PRODUCER_PROPERTIES( producer ), track, context->store );
-				serialise_store_properties( context, MLT_PRODUCER_PROPERTIES( producer ), track, "meta." );
+				if ( !context->no_meta )
+					serialise_store_properties( context, MLT_PRODUCER_PROPERTIES( producer ), track, "meta." );
 				serialise_service_filters( context, MLT_PRODUCER_SERVICE( producer ), track );
 			}
 			
@@ -398,7 +401,8 @@ static void serialise_playlist( serialise_context context, mlt_service service,
 
 		// Store application specific properties
 		serialise_store_properties( context, properties, child, context->store );
-		serialise_store_properties( context, properties, child, "meta." );
+		if ( !context->no_meta )
+			serialise_store_properties( context, properties, child, "meta." );
 
 		// Add producer to the map
 		mlt_properties_set_int( context->hide_map, id, mlt_properties_get_int( properties, "hide" ) );
@@ -436,7 +440,8 @@ static void serialise_playlist( serialise_context context, mlt_service service,
 					if ( mlt_producer_is_cut( info.cut ) )
 					{
 						serialise_store_properties( context, MLT_PRODUCER_PROPERTIES( info.cut ), entry, context->store );
-						serialise_store_properties( context, MLT_PRODUCER_PROPERTIES( info.cut ), entry, "meta." );
+						if ( !context->no_meta )
+							serialise_store_properties( context, MLT_PRODUCER_PROPERTIES( info.cut ), entry, "meta." );
 						serialise_service_filters( context, MLT_PRODUCER_SERVICE( info.cut ), entry );
 					}
 				}
@@ -482,7 +487,8 @@ static void serialise_tractor( serialise_context context, mlt_service service, x
 
 		// Store application specific properties
 		serialise_store_properties( context, MLT_SERVICE_PROPERTIES( service ), child, context->store );
-		serialise_store_properties( context, MLT_SERVICE_PROPERTIES( service ), child, "meta." );
+		if ( !context->no_meta )
+			serialise_store_properties( context, MLT_SERVICE_PROPERTIES( service ), child, "meta." );
 
 		// Recurse on connected producer
 		serialise_service( context, mlt_service_producer( service ), child );
@@ -659,6 +665,7 @@ xmlDocPtr xml_make_doc( mlt_consumer consumer, mlt_service service )
 
 	// Assign the additional 'storage' pattern for properties
 	context->store = mlt_properties_get( MLT_CONSUMER_PROPERTIES( consumer ), "store" );
+	context->no_meta = mlt_properties_get_int( MLT_CONSUMER_PROPERTIES( consumer ), "no_meta" );
 
 	// Assign a title property
 	if ( mlt_properties_get( properties, "title" ) != NULL )
diff --git a/src/modules/xml/consumer_xml.yml b/src/modules/xml/consumer_xml.yml
index 736973f3..efe10c21 100644
--- a/src/modules/xml/consumer_xml.yml
+++ b/src/modules/xml/consumer_xml.yml
@@ -52,7 +52,17 @@ parameters:
   - identifier: root
     title: Base path
     type: string
-    description:
+    description: >
       If a file name in the XML is relative, but not relative to the current
       XML file's directory, then you can set the directory to which it is
       relative here.
+
+  - identifier: no_meta
+    title: Exclude meta properties
+    type: integer
+    description: >
+      Set this to disable the output of properties with the prefix "meta."
+    minimum: 0
+    maximum: 1
+    default: 0
+    widget: checkbox
-- 
2.39.2