Add response port (not yet used).

Move message handling to separate function.

2 files changed, 60 insertions, 40 deletions

diff --git a/plugins/eg-sampler.lv2/sampler.c b/plugins/eg-sampler.lv2/sampler.c
index a69a4a3..a0b0224 100644
--- a/plugins/eg-sampler.lv2/sampler.c
+++ b/plugins/eg-sampler.lv2/sampler.c
@@ -250,6 +250,49 @@ cleanup(LV2_Handle instance)
 	free(instance);
 }
 
+static bool
+handle_message(Sampler*               plugin,
+               const LV2_Atom_Object* obj)
+{
+	if (obj->type != plugin->uris.msg_Set) {
+		fprintf(stderr, "Ignoring unknown message type %d\n", obj->type);
+		return false;
+	}
+
+	/* Get body of message */
+	const LV2_Atom_Object* body = NULL;
+	LV2_Atom_Object_Query q1[] = {
+		{ plugin->uris.msg_body, (const LV2_Atom**)&body },
+		LV2_OBJECT_QUERY_END
+	};
+	lv2_object_get(obj, q1);
+
+	if (!body) {  // TODO: check type
+		fprintf(stderr, "Malformed set message with no body.\n");
+		return;
+	}
+
+	/* Get filename from body */
+	const LV2_Atom* filename = NULL;
+	LV2_Atom_Object_Query q2[] = {
+		{ plugin->uris.eg_filename, &filename },
+		LV2_OBJECT_QUERY_END
+	};
+	lv2_object_get((LV2_Atom_Object*)body, q2);
+
+	if (!filename) {
+		fprintf(stderr, "Ignored set message with no filename\n");
+		return;
+	}
+
+	char* str = (char*)LV2_ATOM_BODY(filename);
+	fprintf(stderr, "Request to load %s\n", str);
+	memcpy(plugin->pending_samp->filepath, str, filename->size);
+	zix_sem_post(&plugin->signal);
+
+	return true;
+}
+               
 static void
 run(LV2_Handle instance,
     uint32_t   sample_count)
@@ -271,39 +314,7 @@ run(LV2_Handle instance,
 			}
 		} else if (ev->body.type == plugin->uris.atom_Resource
 		           || ev->body.type == plugin->uris.atom_Blank) {
-			const LV2_Atom_Object* obj = (LV2_Atom_Object*)&ev->body;
-			if (obj->type == plugin->uris.msg_Set) {
-				const LV2_Atom_Object* body = NULL;
-				LV2_Atom_Object_Query q1[] = {
-					{ plugin->uris.msg_body, (const LV2_Atom**)&body },
-					LV2_OBJECT_QUERY_END
-				};
-				lv2_object_get(obj, q1);
-
-				if (!body) {  // TODO: check type
-					fprintf(stderr, "Malformed set message with no body.\n");
-					continue;
-				}
-						
-				const LV2_Atom* filename = NULL;
-				LV2_Atom_Object_Query q2[] = {
-					{ plugin->uris.eg_filename, &filename },
-					LV2_OBJECT_QUERY_END
-				};
-				lv2_object_get((LV2_Atom_Object*)body, q2);
-
-				if (!filename) {
-					fprintf(stderr, "Ignored set message with no filename\n");
-					continue;
-				}
-
-				char* str = (char*)LV2_ATOM_BODY(filename);
-				fprintf(stderr, "Request to load %s\n", str);
-				memcpy(plugin->pending_samp->filepath, str, filename->size);
-				zix_sem_post(&plugin->signal);
-			} else {
-				fprintf(stderr, "Unknown message type %d\n", obj->id);
-			}
+			handle_message(plugin, (LV2_Atom_Object*)&ev->body);
 		} else {
 			fprintf(stderr, "Unknown event type %d\n", ev->body.type);
 		}
diff --git a/plugins/eg-sampler.lv2/sampler.ttl b/plugins/eg-sampler.lv2/sampler.ttl
index 7f317aa..cf36415 100644
--- a/plugins/eg-sampler.lv2/sampler.ttl
+++ b/plugins/eg-sampler.lv2/sampler.ttl
@@ -15,11 +15,11 @@
 # ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 # OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 
-@prefix atom:  <http://lv2plug.in/ns/ext/atom#> .
-@prefix doap:  <http://usefulinc.com/ns/doap#> .
-@prefix foaf:  <http://xmlns.com/foaf/0.1/> .
-@prefix lv2:   <http://lv2plug.in/ns/lv2core#> .
-@prefix ui:    <http://lv2plug.in/ns/extensions/ui#> .
+@prefix atom: <http://lv2plug.in/ns/ext/atom#> .
+@prefix doap: <http://usefulinc.com/ns/doap#> .
+@prefix foaf: <http://xmlns.com/foaf/0.1/> .
+@prefix lv2:  <http://lv2plug.in/ns/lv2core#> .
+@prefix ui:   <http://lv2plug.in/ns/extensions/ui#> .
 
 <http://lv2plug.in/plugins/eg-sampler>
 	a lv2:Plugin ;
@@ -33,14 +33,23 @@
 		a lv2:InputPort ,
 			atom:MessagePort ;
 		atom:bufferType atom:Sequence ;
-		atom:supports <http://lv2plug.in/ns/ext/midi#MidiEvent> ;
+		atom:supports <http://lv2plug.in/ns/ext/midi#MidiEvent> ,
+			<http://lv2plug.in/ns/ext/message#Message> ;
 		lv2:index 0 ;
 		lv2:symbol "control" ;
 		lv2:name "Control"
 	] , [
+		a lv2:OutputPort ,
+			atom:MessagePort ;
+		atom:bufferType atom:Sequence ;
+		atom:supports <http://lv2plug.in/ns/ext/message#Message> ;
+		lv2:index 1 ;
+		lv2:symbol "response" ;
+		lv2:name "Response"
+	] , [
 		a lv2:AudioPort ,
 			lv2:OutputPort ;
-		lv2:index 1 ;
+		lv2:index 2 ;
 		lv2:symbol "out" ;
 		lv2:name "Out"
 	] .