Merge Ingen::Shared namespace into Ingen namespace and core libingen library.

git-svn-id: http://svn.drobilla.net/lad/trunk/ingen@4579 a436a847-0d15-0410-975c-d299462d15a1

1 files changed, 114 insertions, 0 deletions

diff --git a/src/runtime_paths.cpp b/src/runtime_paths.cpp
new file mode 100644
index 00000000..352afa42
--- /dev/null
+++ b/src/runtime_paths.cpp
@@ -0,0 +1,114 @@
+/*
+  This file is part of Ingen.
+  Copyright 2007-2012 David Robillard <http://drobilla.net/>
+
+  Ingen is free software: you can redistribute it and/or modify it under the
+  terms of the GNU Affero General Public License as published by the Free
+  Software Foundation, either version 3 of the License, or any later version.
+
+  Ingen 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 Affero General Public License for details.
+
+  You should have received a copy of the GNU Affero General Public License
+  along with Ingen.  If not, see <http://www.gnu.org/licenses/>.
+*/
+
+#include <string>
+
+#include <limits.h>
+#include <stdlib.h>
+
+#include <dlfcn.h>
+
+#include <glibmm/module.h>
+#include <glibmm/miscutils.h>
+
+#include "raul/log.hpp"
+
+#include "ingen/runtime_paths.hpp"
+
+#include "ingen_config.h"
+
+using namespace std;
+
+namespace Ingen {
+
+static std::string bundle_path;
+
+/** Must be called once at startup, and passed a pointer to a function
+ * that lives in the 'top level' of the bundle (e.g. the executable).
+ * Passing a function defined in a module etc. will not work!
+ */
+void
+set_bundle_path_from_code(void* function)
+{
+	Dl_info dli;
+	dladdr(function, &dli);
+
+#ifdef BUNDLE
+	char bin_loc[PATH_MAX];
+	realpath(dli.dli_fname, bin_loc);
+#else
+	const char* bin_loc = dli.dli_fname;
+#endif
+
+	Raul::info(Raul::fmt("Binary location: %1%\n") % bin_loc);
+
+	string bundle = bin_loc;
+	bundle = bundle.substr(0, bundle.find_last_of(G_DIR_SEPARATOR));
+	bundle_path = bundle;
+}
+
+void
+set_bundle_path(const char* path)
+{
+	bundle_path = path;
+}
+
+/** Return the absolute path of a file in an Ingen LV2 bundle
+ */
+std::string
+bundle_file_path(const std::string& name)
+{
+	return Glib::build_filename(bundle_path, name);
+}
+
+/** Return the absolute path of a 'resource' file.
+ */
+std::string
+data_file_path(const std::string& name)
+{
+#ifdef BUNDLE
+	return Glib::build_filename(bundle_path, Glib::build_path(INGEN_DATA_DIR, name));
+#else
+	return Glib::build_filename(INGEN_DATA_DIR, name);
+#endif
+}
+
+/** Return the absolute path of a module (dynamically loaded shared library).
+ */
+std::string
+module_path(const std::string& name, std::string dir)
+{
+	std::string ret;
+	if (dir == "") {
+#ifdef BUNDLE
+		dir = Glib::build_path(bundle_path, INGEN_MODULE_DIR);
+#else
+		dir = INGEN_MODULE_DIR;
+#endif
+	}
+
+	ret = Glib::Module::build_path(dir, string("ingen_") + name);
+
+#ifdef __APPLE__
+	// MacPorts glib doesnt seem to do portable path building correctly...
+	if (ret.substr(ret.length() - 3) == ".so")
+		ret = ret.substr(0, ret.length() - 2).append("dylib");
+#endif
+	return ret;
+}
+
+} // namespace Ingen
+