From f1fd7f6fa47f0b86a7097a32e03129102ae0611a Mon Sep 17 00:00:00 2001
From: Paul Davis <paul@linuxaudiosystems.com>
Date: Mon, 17 Jan 2011 17:53:34 +0000
Subject: some new source

git-svn-id: svn://localhost/ardour2/branches/3.0@8523 d708f5d6-7413-0410-9779-e7cbd77b26cf
---
 libs/ardour/panner_manager.cc | 163 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 163 insertions(+)
 create mode 100644 libs/ardour/panner_manager.cc

(limited to 'libs/ardour/panner_manager.cc')

diff --git a/libs/ardour/panner_manager.cc b/libs/ardour/panner_manager.cc
new file mode 100644
index 0000000000..ce7caf15fb
--- /dev/null
+++ b/libs/ardour/panner_manager.cc
@@ -0,0 +1,163 @@
+#include <glibmm/pattern.h>
+
+#include "pbd/error.h"
+#include "pbd/compose.h"
+#include "pbd/file_utils.h"
+
+#include "ardour/panner_manager.h"
+#include "ardour/panner_search_path.h"
+
+using namespace std;
+using namespace ARDOUR;
+using namespace PBD;
+
+PannerManager* PannerManager::_instance = 0;
+
+PannerManager::PannerManager ()
+{
+}
+
+PannerManager::~PannerManager ()
+{
+        for (list<PannerInfo*>::iterator p = panner_info.begin(); p != panner_info.end(); ++p) {
+                delete *p;
+        }
+}
+
+PannerManager&
+PannerManager::instance ()
+{
+        if (_instance == 0) {
+                _instance = new PannerManager ();
+        }
+
+        return *_instance;
+}
+
+void
+PannerManager::discover_panners ()
+{
+	vector<sys::path> panner_modules;
+
+	Glib::PatternSpec so_extension_pattern("*.so");
+	Glib::PatternSpec dylib_extension_pattern("*.dylib");
+
+	find_matching_files_in_search_path (panner_search_path (),
+			so_extension_pattern, panner_modules);
+
+	find_matching_files_in_search_path (panner_search_path (),
+			dylib_extension_pattern, panner_modules);
+
+	info << string_compose (_("looking for panners in %1"), panner_search_path().to_string()) << endmsg;
+
+	for (vector<sys::path>::iterator i = panner_modules.begin(); i != panner_modules.end(); ++i) {
+		panner_discover ((*i).to_string());
+	}
+}
+int
+PannerManager::panner_discover (string path)
+{
+        PannerInfo* pinfo;
+
+	if ((pinfo = get_descriptor (path)) != 0) {
+                panner_info.push_back (pinfo);
+                info << string_compose(_("Panner discovered: \"%1\""), pinfo->descriptor.name) << endmsg;
+        }
+
+	return 0;
+}
+
+PannerInfo*
+PannerManager::get_descriptor (string path)
+{
+	void *module;
+        PannerInfo* info = 0;
+	PanPluginDescriptor *descriptor = 0;
+	PanPluginDescriptor* (*dfunc)(void);
+	const char *errstr;
+
+	if ((module = dlopen (path.c_str(), RTLD_NOW)) == 0) {
+		error << string_compose(_("PannerManager: cannot load module \"%1\" (%2)"), path, dlerror()) << endmsg;
+		return 0;
+	}
+
+	dfunc = (PanPluginDescriptor* (*)(void)) dlsym (module, "panner_descriptor");
+
+	if ((errstr = dlerror()) != 0) {
+		error << string_compose(_("PannerManager: module \"%1\" has no descriptor function."), path) << endmsg;
+		error << errstr << endmsg;
+		dlclose (module);
+		return 0;
+	}
+
+	descriptor = dfunc();
+	if (descriptor) {
+                info = new PannerInfo (*descriptor, module);
+	} else {
+		dlclose (module);
+	}
+
+	return info;
+}
+
+PannerInfo*
+PannerManager::select_panner (ChanCount in, ChanCount out)
+{
+        PanPluginDescriptor* d;
+        int32_t nin = in.n_audio();
+        int32_t nout = out.n_audio();
+        
+        cerr << "Need match for in = " << nin << " out = " << nout << endl;
+
+        /* look for exact match first */
+
+        for (list<PannerInfo*>::iterator p = panner_info.begin(); p != panner_info.end(); ++p) {
+                d = &(*p)->descriptor;
+
+                cerr << "\t1. Check panner with in=" << d->in << " out=" << d->out << endl;
+
+                if (d->in == nin && d->out == nout) {
+                        return *p;
+                }
+        }
+
+        /* no exact match, look for good fit on inputs and variable on outputs */
+
+        for (list<PannerInfo*>::iterator p = panner_info.begin(); p != panner_info.end(); ++p) {
+                d = &(*p)->descriptor;
+         
+                cerr << "\t2. Check panner with in=" << d->in << " out=" << d->out << endl;
+
+                if (d->in == nin && d->out == -1) {
+                        return *p;
+                }
+        }
+
+        /* no exact match, look for good fit on outputs and variable on inputs */
+
+        for (list<PannerInfo*>::iterator p = panner_info.begin(); p != panner_info.end(); ++p) {
+                d = &(*p)->descriptor;
+         
+                cerr << "\t3. Check panner with in=" << d->in << " out=" << d->out << endl;
+
+                if (d->in == -1 && d->out == nout) {
+                        return *p;
+                }
+        }
+
+        /* no exact match, look for variable fit on inputs and outputs */
+
+        for (list<PannerInfo*>::iterator p = panner_info.begin(); p != panner_info.end(); ++p) {
+                d = &(*p)->descriptor;
+         
+                cerr << "\t4. Check panner with in=" << d->in << " out=" << d->out << endl;
+
+                if (d->in == -1 && d->out == -1) {
+                        return *p;
+                }
+        }
+
+        warning << string_compose (_("no panner discovered for in/out = %1/%2"), nin, nout) << endmsg;
+
+        return 0;
+}
-- 
cgit v1.2.3