1 files changed, 100 insertions, 0 deletions
diff --git a/src/plugininstance.c b/src/plugininstance.c
new file mode 100644
index 0000000..40de08c
--- /dev/null
+++ b/src/plugininstance.c
@@ -0,0 +1,100 @@
+/* LibSLV2
+ * Copyright (C) 2006 Dave Robillard <drobilla@connect.carleton.ca>
+ *  
+ * This library 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.
+ *
+ * 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.
+ *
+ * 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.,
+ * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <assert.h>
+#include <dlfcn.h>
+#include <slv2/private_types.h>
+#include <slv2/types.h>
+#include <slv2/plugin.h>
+#include <slv2/plugininstance.h>
+#include "util.h"
+
+
+SLV2Instance*
+slv2_plugin_instantiate(const SLV2Plugin*        plugin,
+                        unsigned long            sample_rate,
+                        const LV2_Host_Feature** host_features)
+{
+	struct _Instance* result = NULL;
+	
+	const unsigned char* const lib_path = slv2_plugin_get_library_path(plugin);
+	if (!lib_path)
+		return NULL;
+	
+	void* lib = dlopen((char*)lib_path, RTLD_NOW);
+	if (!lib) {
+		printf("Unable to open library %s\n", lib_path);
+		return NULL;
+	}
+
+	LV2_Descriptor_Function df = dlsym(lib, "lv2_descriptor");
+
+	if (!df) {
+		printf("Could not find symbol 'lv2_descriptor', "
+				"%s is not a LV2 plugin.\n", lib_path);
+		dlclose(lib);
+		return NULL;
+	} else {
+		// Search for plugin by URI
+		
+		const char* const bundle_path = url2path(plugin->bundle_url);
+		
+		for (unsigned long i=0; 1; ++i) {
+			const LV2_Descriptor* ld = df(i);
+
+			if (!ld) {
+				printf("Did not find plugin %s in %s\n",
+						plugin->plugin_uri, plugin->lib_url);
+				dlclose(lib);
+				break; // return NULL
+			} else if (!strcmp(ld->URI, (char*)plugin->plugin_uri)) {
+				//printf("Found %s at index %ld in:\n\t%s\n\n", plugin->plugin_uri, i, lib_path);
+
+				assert(ld->instantiate);
+
+				// Create SLV2Instance to return
+				result = malloc(sizeof(struct _Instance));
+				/*result->plugin = malloc(sizeof(struct _Plugin));
+				memcpy(result->plugin, plugin, sizeof(struct _Plugin));*/
+				result->descriptor = ld;
+				result->lib_handle = lib;
+				result->lv2_handle = ld->instantiate(ld, sample_rate, (char*)bundle_path, host_features);
+				break;
+			}
+		}
+	}
+
+	return result;
+}
+
+
+void
+slv2_instance_free(SLV2Instance* instance)
+{
+	struct _Instance* i = (struct _Instance*)instance;
+	i->descriptor->cleanup(i->lv2_handle);
+	i->descriptor = NULL;
+	dlclose(i->lib_handle);
+	i->lib_handle = NULL;
+	free(i);
+}
+
+