From 6ae2018e81e7e81e4906e62dc6224ad34298d9c2 Mon Sep 17 00:00:00 2001
From: David Robillard <d@drobilla.net>
Date: Sat, 14 Nov 2009 20:44:40 +0000
Subject: Object extension. Port resize extension. Sensible extension(s)
 implementation design for Ingen. Replace string port extension support in
 Ingen with Object port extension. Implement port resize extension in Ingen.
 Some test plugins for this stuff.

git-svn-id: http://svn.drobilla.net/lad/trunk/ingen@2260 a436a847-0d15-0410-975c-d299462d15a1
---
 src/shared/LV2Object.cpp | 96 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 96 insertions(+)
 create mode 100644 src/shared/LV2Object.cpp

(limited to 'src/shared/LV2Object.cpp')

diff --git a/src/shared/LV2Object.cpp b/src/shared/LV2Object.cpp
new file mode 100644
index 00000000..3442c004
--- /dev/null
+++ b/src/shared/LV2Object.cpp
@@ -0,0 +1,96 @@
+/* This file is part of Ingen.
+ * Copyright (C) 2009 Dave Robillard <http://drobilla.net>
+ *
+ * Ingen 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.
+ *
+ * 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 General Public License for 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 <iostream>
+#include "raul/Atom.hpp"
+#include "module/World.hpp"
+#include "uri-map.lv2/uri-map.h"
+#include "object.lv2/object.h"
+#include "LV2Features.hpp"
+#include "LV2Object.hpp"
+#include "LV2URIMap.hpp"
+
+using namespace std;
+
+namespace Ingen {
+namespace Shared {
+namespace LV2Object {
+
+
+bool
+to_atom(World* world, LV2_Object* object, Raul::Atom& atom)
+{
+	SharedPtr<LV2URIMap> map = PtrCast<LV2URIMap>(world->lv2_features->feature(LV2_URI_MAP_URI));
+
+	if (object->type == map->object_class_string) {
+		atom = Raul::Atom((char*)(object + 1));
+		return true;
+	} else if (object->type == map->object_class_int32) {
+		atom = Raul::Atom((int32_t*)(object + 1));
+		return true;
+	} else if (object->type == map->object_class_float32) {
+		atom = Raul::Atom((float*)(object + 1));
+		return true;
+	}
+	return false;
+}
+
+
+/** Convert an atom to an LV2 object, if possible.
+ * object->size should be the capacity of the object (not including header)
+ */
+bool
+from_atom(World* world, const Raul::Atom& atom, LV2_Object* object)
+{
+	SharedPtr<LV2URIMap> map = PtrCast<LV2URIMap>(world->lv2_features->feature(LV2_URI_MAP_URI));
+
+	char* str;
+	switch (atom.type()) {
+	case Raul::Atom::FLOAT:
+		object->type = map->object_class_float32;
+		object->size = sizeof(float);
+		*(float*)(object + 1) = atom.get_float();
+		break;
+	case Raul::Atom::INT:
+		object->type = map->object_class_int32;
+		object->size = sizeof(int32_t);
+		*(int32_t*)(object + 1) = atom.get_int32();
+		break;
+	case Raul::Atom::STRING:
+		object->type = map->object_class_string;
+		object->size = std::min(object->size, (uint32_t)strlen(atom.get_string()) + 1);
+		str = ((char*)(object + 1));
+		str[object->size - 1] = '\0';
+		strncpy(str, atom.get_string(), object->size);
+		break;
+	case Raul::Atom::BLOB:
+		object->type = map->object_class_string;
+		*(uint32_t*)(object + 1) = map->uri_to_id(NULL, atom.get_blob_type());
+		memcpy(((char*)(object + 1) + sizeof(uint32_t)), atom.get_blob(),
+				std::min(atom.data_size(), (size_t)object->size));
+	default:
+		cerr << "Unsupported value type for toggle control" << endl;
+		return false;
+	}
+	return true;
+}
+
+
+} // namespace LV2Object
+
+} // namespace Shared
+} // namespace Ingen
-- 
cgit v1.2.1