Merge pull request #8502 from karroffel/multiscript

re-added MultiScript

modules/gdscript/gd_script.cpp

@@ -1696,9 +1696,9 @@ void GDScriptLanguage::reload_tool_script(const Ref<Script> &p_script, bool p_so
 //same thing for placeholders
 #ifdef TOOLS_ENABLED
 
-			while (E->get()->placeholders.size()) {
+			for (Set<PlaceHolderScriptInstance *>::Element *P = E->get()->placeholders.front(); P; P = P->next()) {
 
-				Object *obj = E->get()->placeholders.front()->get()->get_owner();
+				Object *obj = P->get()->get_owner();
 				//save instance info
 				List<Pair<StringName, Variant> > state;
 				if (obj->get_script_instance()) {

modules/multiscript/SCsub

@@ -0,0 +1,7 @@
+#!/usr/bin/env python
+
+Import('env')
+
+env.add_source_files(env.modules_sources, "*.cpp")
+
+Export('env')

modules/multiscript/config.py

@@ -0,0 +1,8 @@
+
+
+def can_build(platform):
+    return True
+
+
+def configure(env):
+    pass

modules/multiscript/multiscript.cpp

@@ -0,0 +1,750 @@
+/*************************************************************************/
+/*  multiscript.cpp                                                      */
+/*************************************************************************/
+/*                       This file is part of:                           */
+/*                           GODOT ENGINE                                */
+/*                    http://www.godotengine.org                         */
+/*************************************************************************/
+/* Copyright (c) 2007-2017 Juan Linietsky, Ariel Manzur.                 */
+/* Copyright (c) 2014-2017 Godot Engine contributors (cf. AUTHORS.md)    */
+/*                                                                       */
+/* Permission is hereby granted, free of charge, to any person obtaining */
+/* a copy of this software and associated documentation files (the       */
+/* "Software"), to deal in the Software without restriction, including   */
+/* without limitation the rights to use, copy, modify, merge, publish,   */
+/* distribute, sublicense, and/or sell copies of the Software, and to    */
+/* permit persons to whom the Software is furnished to do so, subject to */
+/* the following conditions:                                             */
+/*                                                                       */
+/* The above copyright notice and this permission notice shall be        */
+/* included in all copies or substantial portions of the Software.       */
+/*                                                                       */
+/* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,       */
+/* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF    */
+/* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.*/
+/* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY  */
+/* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,  */
+/* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE     */
+/* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.                */
+/*************************************************************************/
+#include "multiscript.h"
+
+bool MultiScriptInstance::set(const StringName &p_name, const Variant &p_value) {
+
+	ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	for (int i = 0; i < sc; i++) {
+
+		if (!sarr[i])
+			continue;
+
+		bool found = sarr[i]->set(p_name, p_value);
+		if (found)
+			return true;
+	}
+
+	if (String(p_name).begins_with("script_")) {
+		bool valid;
+		owner->set(p_name, p_value, &valid);
+		return valid;
+	}
+	return false;
+}
+
+bool MultiScriptInstance::get(const StringName &p_name, Variant &r_ret) const {
+
+	ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	for (int i = 0; i < sc; i++) {
+
+		if (!sarr[i])
+			continue;
+
+		bool found = sarr[i]->get(p_name, r_ret);
+		if (found)
+			return true;
+	}
+	if (String(p_name).begins_with("script_")) {
+		bool valid;
+		r_ret = owner->get(p_name, &valid);
+		return valid;
+	}
+	return false;
+}
+void MultiScriptInstance::get_property_list(List<PropertyInfo> *p_properties) const {
+
+	ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	Set<String> existing;
+
+	for (int i = 0; i < sc; i++) {
+
+		if (!sarr[i])
+			continue;
+
+		List<PropertyInfo> pl;
+		sarr[i]->get_property_list(&pl);
+
+		for (List<PropertyInfo>::Element *E = pl.front(); E; E = E->next()) {
+
+			if (existing.has(E->get().name))
+				continue;
+
+			p_properties->push_back(E->get());
+			existing.insert(E->get().name);
+		}
+	}
+
+	p_properties->push_back(PropertyInfo(Variant::NIL, "Scripts", PROPERTY_HINT_NONE, String(), PROPERTY_USAGE_CATEGORY));
+
+	for (int i = 0; i < owner->scripts.size(); i++) {
+
+		p_properties->push_back(PropertyInfo(Variant::OBJECT, "script_" + String::chr('a' + i), PROPERTY_HINT_RESOURCE_TYPE, "Script", PROPERTY_USAGE_EDITOR));
+	}
+
+	if (owner->scripts.size() < 25) {
+
+		p_properties->push_back(PropertyInfo(Variant::OBJECT, "script_" + String::chr('a' + (owner->scripts.size())), PROPERTY_HINT_RESOURCE_TYPE, "Script", PROPERTY_USAGE_EDITOR));
+	}
+}
+
+void MultiScriptInstance::get_method_list(List<MethodInfo> *p_list) const {
+
+	ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	Set<StringName> existing;
+
+	for (int i = 0; i < sc; i++) {
+
+		if (!sarr[i])
+			continue;
+
+		List<MethodInfo> ml;
+		sarr[i]->get_method_list(&ml);
+
+		for (List<MethodInfo>::Element *E = ml.front(); E; E = E->next()) {
+
+			if (existing.has(E->get().name))
+				continue;
+
+			p_list->push_back(E->get());
+			existing.insert(E->get().name);
+		}
+	}
+}
+bool MultiScriptInstance::has_method(const StringName &p_method) const {
+
+	ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	for (int i = 0; i < sc; i++) {
+
+		if (!sarr[i])
+			continue;
+
+		if (sarr[i]->has_method(p_method))
+			return true;
+	}
+
+	return false;
+}
+
+Variant MultiScriptInstance::call(const StringName &p_method, const Variant **p_args, int p_argcount, Variant::CallError &r_error) {
+
+	ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	for (int i = 0; i < sc; i++) {
+
+		if (!sarr[i])
+			continue;
+
+		Variant r = sarr[i]->call(p_method, p_args, p_argcount, r_error);
+		if (r_error.error == Variant::CallError::CALL_OK)
+			return r;
+		else if (r_error.error != Variant::CallError::CALL_ERROR_INVALID_METHOD)
+			return r;
+	}
+
+	r_error.error = Variant::CallError::CALL_ERROR_INVALID_METHOD;
+	return Variant();
+}
+
+void MultiScriptInstance::call_multilevel(const StringName &p_method, const Variant **p_args, int p_argcount) {
+
+	ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	for (int i = 0; i < sc; i++) {
+
+		if (!sarr[i])
+			continue;
+
+		sarr[i]->call_multilevel(p_method, p_args, p_argcount);
+	}
+}
+void MultiScriptInstance::notification(int p_notification) {
+
+	// ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	for (int i = 0; i < sc; i++) {
+
+		ScriptInstance *instance = instances[i];
+
+		if (!instance)
+			continue;
+
+		instance->notification(p_notification);
+	}
+}
+
+Ref<Script> MultiScriptInstance::get_script() const {
+
+	return owner;
+}
+
+ScriptLanguage *MultiScriptInstance::get_language() {
+
+	return MultiScriptLanguage::get_singleton();
+}
+
+MultiScriptInstance::~MultiScriptInstance() {
+
+	owner->remove_instance(object);
+}
+
+Variant::Type MultiScriptInstance::get_property_type(const StringName &p_name, bool *r_is_valid) const {
+	bool valid = false;
+	Variant::Type type;
+
+	ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	for (int i = 0; i < sc; i++) {
+
+		if (!sarr[i])
+			continue;
+
+		type = sarr[i]->get_property_type(p_name, &valid);
+		if (valid) {
+			*r_is_valid = valid;
+			return type;
+		}
+	}
+	*r_is_valid = false;
+	return Variant::NIL;
+}
+
+ScriptInstance::RPCMode MultiScriptInstance::get_rpc_mode(const StringName &p_method) const {
+	ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	for (int i = 0; i < sc; i++) {
+
+		if (!sarr[i])
+			continue;
+		if (sarr[i]->has_method(p_method))
+			return sarr[i]->get_rpc_mode(p_method);
+	}
+	return RPC_MODE_DISABLED;
+}
+
+ScriptInstance::RPCMode MultiScriptInstance::get_rset_mode(const StringName &p_variable) const {
+	ScriptInstance **sarr = instances.ptr();
+	int sc = instances.size();
+
+	for (int i = 0; i < sc; i++) {
+
+		if (!sarr[i])
+			continue;
+
+		List<PropertyInfo> properties;
+		sarr[i]->get_property_list(&properties);
+
+		for (List<PropertyInfo>::Element *P = properties.front(); P; P = P->next()) {
+			if (P->get().name == p_variable) {
+				return sarr[i]->get_rset_mode(p_variable);
+			}
+		}
+	}
+	return RPC_MODE_DISABLED;
+}
+
+///////////////////
+
+bool MultiScript::is_tool() const {
+
+	for (int i = 0; i < scripts.size(); i++) {
+
+		if (scripts[i]->is_tool())
+			return true;
+	}
+
+	return false;
+}
+
+bool MultiScript::_set(const StringName &p_name, const Variant &p_value) {
+
+	_THREAD_SAFE_METHOD_
+
+	String s = String(p_name);
+	if (s.begins_with("script_")) {
+
+		int idx = s[7];
+		if (idx == 0)
+			return false;
+		idx -= 'a';
+
+		ERR_FAIL_COND_V(idx < 0, false);
+
+		Ref<Script> s = p_value;
+
+		if (idx < scripts.size()) {
+
+			if (s.is_null())
+				remove_script(idx);
+			else
+				set_script(idx, s);
+		} else if (idx == scripts.size()) {
+			if (s.is_null())
+				return false;
+			add_script(s);
+		} else
+			return false;
+
+		return true;
+	}
+
+	return false;
+}
+
+bool MultiScript::_get(const StringName &p_name, Variant &r_ret) const {
+
+	_THREAD_SAFE_METHOD_
+
+	String s = String(p_name);
+	if (s.begins_with("script_")) {
+
+		int idx = s[7];
+		if (idx == 0)
+			return false;
+		idx -= 'a';
+
+		ERR_FAIL_COND_V(idx < 0, false);
+
+		if (idx < scripts.size()) {
+
+			r_ret = get_script(idx);
+			return true;
+		} else if (idx == scripts.size()) {
+			r_ret = Ref<Script>();
+			return true;
+		}
+	}
+
+	return false;
+}
+void MultiScript::_get_property_list(List<PropertyInfo> *p_list) const {
+
+	_THREAD_SAFE_METHOD_
+
+	for (int i = 0; i < scripts.size(); i++) {
+
+		p_list->push_back(PropertyInfo(Variant::OBJECT, "script_" + String::chr('a' + i), PROPERTY_HINT_RESOURCE_TYPE, "Script"));
+	}
+
+	if (scripts.size() < 25) {
+
+		p_list->push_back(PropertyInfo(Variant::OBJECT, "script_" + String::chr('a' + (scripts.size())), PROPERTY_HINT_RESOURCE_TYPE, "Script"));
+	}
+}
+
+void MultiScript::set_script(int p_idx, const Ref<Script> &p_script) {
+
+	_THREAD_SAFE_METHOD_
+
+	ERR_FAIL_INDEX(p_idx, scripts.size());
+	ERR_FAIL_COND(p_script.is_null());
+
+	scripts[p_idx] = p_script;
+	Ref<Script> s = p_script;
+
+	for (Map<Object *, MultiScriptInstance *>::Element *E = instances.front(); E; E = E->next()) {
+
+		MultiScriptInstance *msi = E->get();
+		ScriptInstance *si = msi->instances[p_idx];
+		if (si) {
+			msi->instances[p_idx] = NULL;
+			memdelete(si);
+		}
+
+		if (p_script->can_instance())
+			msi->instances[p_idx] = s->instance_create(msi->object);
+	}
+}
+
+Ref<Script> MultiScript::get_script(int p_idx) const {
+
+	_THREAD_SAFE_METHOD_
+
+	ERR_FAIL_INDEX_V(p_idx, scripts.size(), Ref<Script>());
+
+	return scripts[p_idx];
+}
+void MultiScript::add_script(const Ref<Script> &p_script) {
+
+	_THREAD_SAFE_METHOD_
+	ERR_FAIL_COND(p_script.is_null());
+	Multi *script_owner = memnew(Multi);
+	script_instances.push_back(script_owner);
+	scripts.push_back(p_script);
+	Ref<Script> s = p_script;
+
+	for (Map<Object *, MultiScriptInstance *>::Element *E = instances.front(); E; E = E->next()) {
+
+		MultiScriptInstance *msi = E->get();
+
+		if (p_script->can_instance()) {
+			script_owner->real_owner = msi->object;
+			msi->instances.push_back(s->instance_create(script_owner));
+		} else {
+			msi->instances.push_back(NULL);
+		}
+
+		msi->object->_change_notify();
+	}
+
+	_change_notify();
+}
+
+void MultiScript::remove_script(int p_idx) {
+
+	_THREAD_SAFE_METHOD_
+
+	ERR_FAIL_INDEX(p_idx, scripts.size());
+
+	scripts.remove(p_idx);
+	script_instances.remove(p_idx);
+
+	for (Map<Object *, MultiScriptInstance *>::Element *E = instances.front(); E; E = E->next()) {
+
+		MultiScriptInstance *msi = E->get();
+		ScriptInstance *si = msi->instances[p_idx];
+		msi->instances.remove(p_idx);
+		if (si) {
+			memdelete(si);
+		}
+
+		msi->object->_change_notify();
+	}
+}
+
+void MultiScript::remove_instance(Object *p_object) {
+
+	_THREAD_SAFE_METHOD_
+	instances.erase(p_object);
+}
+
+bool MultiScript::can_instance() const {
+
+	return true;
+}
+
+StringName MultiScript::get_instance_base_type() const {
+
+	return StringName();
+}
+ScriptInstance *MultiScript::instance_create(Object *p_this) {
+
+	_THREAD_SAFE_METHOD_
+	MultiScriptInstance *msi = memnew(MultiScriptInstance);
+	msi->object = p_this;
+	msi->owner = this;
+
+	for (int i = 0; i < scripts.size(); i++) {
+
+		ScriptInstance *si;
+
+		if (scripts[i]->can_instance()) {
+			script_instances[i]->real_owner = p_this;
+			si = scripts[i]->instance_create(script_instances[i]);
+		} else {
+			si = NULL;
+		}
+
+		msi->instances.push_back(si);
+	}
+
+	instances[p_this] = msi;
+	p_this->_change_notify();
+	return msi;
+}
+bool MultiScript::instance_has(const Object *p_this) const {
+
+	_THREAD_SAFE_METHOD_
+	return instances.has((Object *)p_this);
+}
+
+bool MultiScript::has_source_code() const {
+
+	return false;
+}
+String MultiScript::get_source_code() const {
+
+	return "";
+}
+void MultiScript::set_source_code(const String &p_code) {
+}
+Error MultiScript::reload(bool p_keep_state) {
+
+	for (int i = 0; i < scripts.size(); i++)
+		scripts[i]->reload(p_keep_state);
+
+	return OK;
+}
+
+String MultiScript::get_node_type() const {
+
+	return "";
+}
+
+void MultiScript::_bind_methods() {
+}
+
+ScriptLanguage *MultiScript::get_language() const {
+
+	return MultiScriptLanguage::get_singleton();
+}
+
+///////////////
+
+MultiScript::MultiScript() {
+}
+
+MultiScript::~MultiScript() {
+	for (int i = 0; i < script_instances.size(); i++) {
+		memdelete(script_instances[i]);
+	}
+
+	script_instances.resize(0);
+}
+
+Ref<Script> MultiScript::get_base_script() const {
+	Ref<MultiScript> base_script;
+	return base_script;
+}
+
+bool MultiScript::has_method(const StringName &p_method) const {
+	for (int i = 0; i < scripts.size(); i++) {
+		if (scripts[i]->has_method(p_method)) {
+			return true;
+		}
+	}
+	return false;
+}
+
+MethodInfo MultiScript::get_method_info(const StringName &p_method) const {
+	for (int i = 0; i < scripts.size(); i++) {
+		if (scripts[i]->has_method(p_method)) {
+			return scripts[i]->get_method_info(p_method);
+		}
+	}
+	return MethodInfo();
+}
+
+bool MultiScript::has_script_signal(const StringName &p_signal) const {
+	for (int i = 0; i < scripts.size(); i++) {
+		if (scripts[i]->has_script_signal(p_signal)) {
+			return true;
+		}
+	}
+	return false;
+}
+
+void MultiScript::get_script_signal_list(List<MethodInfo> *r_signals) const {
+	for (int i = 0; i < scripts.size(); i++) {
+		scripts[i]->get_script_signal_list(r_signals);
+	}
+}
+
+bool MultiScript::get_property_default_value(const StringName &p_property, Variant &r_value) const {
+	for (int i = 0; i < scripts.size(); i++) {
+
+		if (scripts[i]->get_property_default_value(p_property, r_value)) {
+			return true;
+		}
+	}
+	return false;
+}
+
+void MultiScript::get_script_method_list(List<MethodInfo> *p_list) const {
+	for (int i = 0; i < scripts.size(); i++) {
+		scripts[i]->get_script_method_list(p_list);
+	}
+}
+
+void MultiScript::get_script_property_list(List<PropertyInfo> *p_list) const {
+	for (int i = 0; i < scripts.size(); i++) {
+		scripts[i]->get_script_property_list(p_list);
+	}
+}
+
+void MultiScript::update_exports() {
+	for (int i = 0; i < scripts.size(); i++) {
+		scripts[i]->update_exports();
+	}
+}
+
+MultiScriptLanguage *MultiScriptLanguage::singleton = NULL;
+
+MultiScriptLanguage *MultiScriptLanguage::get_singleton() {
+	return singleton;
+}
+
+String MultiScriptLanguage::get_name() const {
+	return "MultiScript";
+}
+
+void MultiScriptLanguage::init() {}
+
+String MultiScriptLanguage::get_type() const {
+	return "MultiScript";
+}
+
+String MultiScriptLanguage::get_extension() const {
+	return "";
+}
+
+Error MultiScriptLanguage::execute_file(const String &p_path) {
+	return OK;
+}
+
+void MultiScriptLanguage::finish() {}
+
+void MultiScriptLanguage::get_reserved_words(List<String> *p_words) const {}
+
+void MultiScriptLanguage::get_comment_delimiters(List<String> *p_delimiters) const {}
+
+void MultiScriptLanguage::get_string_delimiters(List<String> *p_delimiters) const {}
+
+Ref<Script> MultiScriptLanguage::get_template(const String &p_class_name, const String &p_base_class_name) const {
+	MultiScript *s = memnew(MultiScript);
+	s->base_class_name = p_base_class_name;
+	return Ref<MultiScript>(s);
+}
+
+bool MultiScriptLanguage::validate(const String &p_script, int &r_line_error, int &r_col_error, String &r_test_error, const String &p_path, List<String> *r_fn) const {
+	return true;
+}
+
+Script *MultiScriptLanguage::create_script() const {
+	return memnew(MultiScript);
+}
+
+bool MultiScriptLanguage::has_named_classes() const {
+	return false;
+}
+
+int MultiScriptLanguage::find_function(const String &p_function, const String &p_code) const {
+	return -1;
+}
+
+String MultiScriptLanguage::make_function(const String &p_class, const String &p_name, const PoolStringArray &p_args) const {
+	return "";
+}
+
+String MultiScriptLanguage::debug_get_error() const {
+	return "";
+}
+
+int MultiScriptLanguage::debug_get_stack_level_count() const {
+	return 0;
+}
+
+int MultiScriptLanguage::debug_get_stack_level_line(int p_level) const {
+	return 0;
+}
+
+String MultiScriptLanguage::debug_get_stack_level_function(int p_level) const {
+	return "";
+}
+
+String MultiScriptLanguage::debug_get_stack_level_source(int p_level) const {
+	return "";
+}
+
+void MultiScriptLanguage::debug_get_stack_level_locals(int p_level, List<String> *p_locals, List<Variant> *p_values, int p_max_subitems, int p_max_depth) {}
+
+void MultiScriptLanguage::debug_get_stack_level_members(int p_level, List<String> *p_members, List<Variant> *p_values, int p_max_subitems, int p_max_depth) {}
+
+void MultiScriptLanguage::debug_get_globals(List<String> *p_locals, List<Variant> *p_values, int p_max_subitems, int p_max_depth) {}
+
+String MultiScriptLanguage::debug_parse_stack_level_expression(int p_level, const String &p_expression, int p_max_subitems, int p_max_depth) {
+	return "";
+}
+
+void MultiScriptLanguage::get_recognized_extensions(List<String> *p_extensions) const {}
+
+void MultiScriptLanguage::get_public_functions(List<MethodInfo> *p_functions) const {}
+
+MultiScriptLanguage::MultiScriptLanguage() {
+	singleton = this;
+}
+
+MultiScriptLanguage::~MultiScriptLanguage() {}
+
+void MultiScriptLanguage::auto_indent_code(String &p_code, int p_from_line, int p_to_line) const {
+}
+
+void MultiScriptLanguage::add_global_constant(const StringName &p_variable, const Variant &p_value) {
+}
+
+void MultiScriptLanguage::reload_all_scripts() {
+}
+
+void MultiScriptLanguage::reload_tool_script(const Ref<Script> &p_script, bool p_soft_reload) {
+}
+
+void MultiScriptLanguage::get_public_constants(List<Pair<String, Variant> > *p_constants) const {
+}
+
+void MultiScriptLanguage::profiling_start() {
+}
+
+void MultiScriptLanguage::profiling_stop() {
+}
+
+int MultiScriptLanguage::profiling_get_accumulated_data(ScriptLanguage::ProfilingInfo *p_info_arr, int p_info_max) {
+	return 0;
+}
+
+int MultiScriptLanguage::profiling_get_frame_data(ScriptLanguage::ProfilingInfo *p_info_arr, int p_info_max) {
+	return 0;
+}
+
+void Multi::_bind_methods() {
+	// ClassDB::bind_method("call", &Multi::call);
+	// ClassDB::bind_method("call_multilevel", &Multi::call_multilevel);
+	// ClassDB::bind_method("call_multilevel_reversed", &Multi::call_multilevel_reversed);
+}
+
+Variant Multi::call(const StringName &p_method, const Variant **p_args, int p_argcount, Variant::CallError &r_error) {
+	if (real_owner)
+		return real_owner->call(p_method, p_args, p_argcount, r_error);
+	return Variant();
+}
+
+void Multi::call_multilevel(const StringName &p_method, const Variant **p_args, int p_argcount) {
+	if (real_owner)
+		real_owner->call_multilevel(p_method, p_args, p_argcount);
+}
+
+void Multi::call_multilevel_reversed(const StringName &p_method, const Variant **p_args, int p_argcount) {
+	if (real_owner)
+		real_owner->call_multilevel_reversed(p_method, p_args, p_argcount);
+}

modules/multiscript/multiscript.h

@@ -0,0 +1,200 @@
+/*************************************************************************/
+/*  multiscript.h                                                        */
+/*************************************************************************/
+/*                       This file is part of:                           */
+/*                           GODOT ENGINE                                */
+/*                    http://www.godotengine.org                         */
+/*************************************************************************/
+/* Copyright (c) 2007-2017 Juan Linietsky, Ariel Manzur.                 */
+/* Copyright (c) 2014-2017 Godot Engine contributors (cf. AUTHORS.md)    */
+/*                                                                       */
+/* Permission is hereby granted, free of charge, to any person obtaining */
+/* a copy of this software and associated documentation files (the       */
+/* "Software"), to deal in the Software without restriction, including   */
+/* without limitation the rights to use, copy, modify, merge, publish,   */
+/* distribute, sublicense, and/or sell copies of the Software, and to    */
+/* permit persons to whom the Software is furnished to do so, subject to */
+/* the following conditions:                                             */
+/*                                                                       */
+/* The above copyright notice and this permission notice shall be        */
+/* included in all copies or substantial portions of the Software.       */
+/*                                                                       */
+/* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,       */
+/* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF    */
+/* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.*/
+/* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY  */
+/* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,  */
+/* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE     */
+/* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.                */
+/*************************************************************************/
+#ifndef MULTISCRIPT_H
+#define MULTISCRIPT_H
+
+#include "os/thread_safe.h"
+#include "script_language.h"
+
+class MultiScript;
+
+class Multi : public Object {
+	GDCLASS(Multi, Object)
+
+	friend class MultiScript;
+
+	Object *real_owner;
+
+public:
+	static void _bind_methods();
+
+	virtual Variant call(const StringName &p_method, const Variant **p_args, int p_argcount, Variant::CallError &r_error);
+	virtual void call_multilevel(const StringName &p_method, const Variant **p_args, int p_argcount);
+	virtual void call_multilevel_reversed(const StringName &p_method, const Variant **p_args, int p_argcount);
+};
+
+class MultiScriptInstance : public ScriptInstance {
+	friend class MultiScript;
+	mutable Vector<ScriptInstance *> instances;
+	Object *object;
+	mutable MultiScript *owner;
+
+public:
+	virtual bool set(const StringName &p_name, const Variant &p_value);
+	virtual bool get(const StringName &p_name, Variant &r_ret) const;
+	virtual void get_property_list(List<PropertyInfo> *p_properties) const;
+
+	virtual void get_method_list(List<MethodInfo> *p_list) const;
+	virtual bool has_method(const StringName &p_method) const;
+	virtual Variant call(const StringName &p_method, const Variant **p_args, int p_argcount, Variant::CallError &r_error);
+	virtual void call_multilevel(const StringName &p_method, const Variant **p_args, int p_argcount);
+	virtual void notification(int p_notification);
+
+	virtual Ref<Script> get_script() const;
+
+	virtual ScriptLanguage *get_language();
+	virtual ~MultiScriptInstance();
+
+	// ScriptInstance interface
+public:
+	Variant::Type get_property_type(const StringName &p_name, bool *r_is_valid) const;
+	RPCMode get_rpc_mode(const StringName &p_method) const;
+	RPCMode get_rset_mode(const StringName &p_variable) const;
+};
+
+class MultiScript : public Script {
+
+	_THREAD_SAFE_CLASS_
+	friend class MultiScriptInstance;
+	friend class MultiScriptLanguage;
+	GDCLASS(MultiScript, Script)
+
+	StringName base_class_name;
+
+	Vector<Ref<Script> > scripts;
+	Vector<Multi *> script_instances;
+
+	Map<Object *, MultiScriptInstance *> instances;
+
+protected:
+	bool _set(const StringName &p_name, const Variant &p_value);
+	bool _get(const StringName &p_name, Variant &r_ret) const;
+	void _get_property_list(List<PropertyInfo> *p_list) const;
+
+	static void _bind_methods();
+
+public:
+	void remove_instance(Object *p_object);
+	virtual bool can_instance() const;
+
+	virtual StringName get_instance_base_type() const;
+	virtual ScriptInstance *instance_create(Object *p_this);
+	virtual bool instance_has(const Object *p_this) const;
+
+	virtual bool has_source_code() const;
+	virtual String get_source_code() const;
+	virtual void set_source_code(const String &p_code);
+	virtual Error reload(bool p_keep_state = false);
+
+	virtual bool is_tool() const;
+
+	virtual String get_node_type() const;
+
+	void set_script(int p_idx, const Ref<Script> &p_script);
+	Ref<Script> get_script(int p_idx) const;
+	void remove_script(int p_idx);
+	void add_script(const Ref<Script> &p_script);
+
+	virtual ScriptLanguage *get_language() const;
+
+	MultiScript();
+	~MultiScript();
+
+	virtual Ref<Script> get_base_script() const;
+	virtual bool has_method(const StringName &p_method) const;
+	virtual MethodInfo get_method_info(const StringName &p_method) const;
+	virtual bool has_script_signal(const StringName &p_signal) const;
+	virtual void get_script_signal_list(List<MethodInfo> *r_signals) const;
+	virtual bool get_property_default_value(const StringName &p_property, Variant &r_value) const;
+	virtual void get_script_method_list(List<MethodInfo> *p_list) const;
+	virtual void get_script_property_list(List<PropertyInfo> *p_list) const;
+	virtual void update_exports();
+};
+
+class MultiScriptLanguage : public ScriptLanguage {
+
+	static MultiScriptLanguage *singleton;
+
+public:
+	static _FORCE_INLINE_ MultiScriptLanguage *get_singleton();
+	virtual String get_name() const;
+
+	/* LANGUAGE FUNCTIONS */
+	virtual void init();
+	virtual String get_type() const;
+	virtual String get_extension() const;
+	virtual Error execute_file(const String &p_path);
+	virtual void finish();
+
+	/* EDITOR FUNCTIONS */
+	virtual void get_reserved_words(List<String> *p_words) const;
+	virtual void get_comment_delimiters(List<String> *p_delimiters) const;
+	virtual void get_string_delimiters(List<String> *p_delimiters) const;
+	virtual Ref<Script> get_template(const String &p_class_name, const String &p_base_class_name) const;
+	virtual bool validate(const String &p_script, int &r_line_error, int &r_col_error, String &r_test_error, const String &p_path = "", List<String> *r_fn = NULL) const;
+	virtual Script *create_script() const;
+	virtual bool has_named_classes() const;
+	virtual int find_function(const String &p_function, const String &p_code) const;
+	virtual String make_function(const String &p_class, const String &p_name, const PoolStringArray &p_args) const;
+
+	/* DEBUGGER FUNCTIONS */
+
+	virtual String debug_get_error() const;
+	virtual int debug_get_stack_level_count() const;
+	virtual int debug_get_stack_level_line(int p_level) const;
+	virtual String debug_get_stack_level_function(int p_level) const;
+	virtual String debug_get_stack_level_source(int p_level) const;
+	virtual void debug_get_stack_level_locals(int p_level, List<String> *p_locals, List<Variant> *p_values, int p_max_subitems = -1, int p_max_depth = -1);
+	virtual void debug_get_stack_level_members(int p_level, List<String> *p_members, List<Variant> *p_values, int p_max_subitems = -1, int p_max_depth = -1);
+	virtual void debug_get_globals(List<String> *p_locals, List<Variant> *p_values, int p_max_subitems = -1, int p_max_depth = -1);
+	virtual String debug_parse_stack_level_expression(int p_level, const String &p_expression, int p_max_subitems = -1, int p_max_depth = -1);
+
+	/* LOADER FUNCTIONS */
+
+	virtual void get_recognized_extensions(List<String> *p_extensions) const;
+	virtual void get_public_functions(List<MethodInfo> *p_functions) const;
+
+	MultiScriptLanguage();
+	virtual ~MultiScriptLanguage();
+
+	// ScriptLanguage interface
+public:
+	void auto_indent_code(String &p_code, int p_from_line, int p_to_line) const;
+	void add_global_constant(const StringName &p_variable, const Variant &p_value);
+	void reload_all_scripts();
+	void reload_tool_script(const Ref<Script> &p_script, bool p_soft_reload);
+	void get_public_constants(List<Pair<String, Variant> > *p_constants) const;
+	void profiling_start();
+	void profiling_stop();
+	int profiling_get_accumulated_data(ProfilingInfo *p_info_arr, int p_info_max);
+	int profiling_get_frame_data(ProfilingInfo *p_info_arr, int p_info_max);
+};
+
+#endif // MULTISCRIPT_H

modules/multiscript/register_types.cpp

@@ -0,0 +1,51 @@
+/*************************************************************************/
+/*  register_types.cpp                                                   */
+/*************************************************************************/
+/*                       This file is part of:                           */
+/*                           GODOT ENGINE                                */
+/*                    http://www.godotengine.org                         */
+/*************************************************************************/
+/* Copyright (c) 2007-2017 Juan Linietsky, Ariel Manzur.                 */
+/* Copyright (c) 2014-2017 Godot Engine contributors (cf. AUTHORS.md)    */
+/*                                                                       */
+/* Permission is hereby granted, free of charge, to any person obtaining */
+/* a copy of this software and associated documentation files (the       */
+/* "Software"), to deal in the Software without restriction, including   */
+/* without limitation the rights to use, copy, modify, merge, publish,   */
+/* distribute, sublicense, and/or sell copies of the Software, and to    */
+/* permit persons to whom the Software is furnished to do so, subject to */
+/* the following conditions:                                             */
+/*                                                                       */
+/* The above copyright notice and this permission notice shall be        */
+/* included in all copies or substantial portions of the Software.       */
+/*                                                                       */
+/* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,       */
+/* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF    */
+/* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.*/
+/* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY  */
+/* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,  */
+/* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE     */
+/* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.                */
+/*************************************************************************/
+#include "register_types.h"
+
+#include "multiscript.h"
+
+#include "core/script_language.h"
+
+static MultiScriptLanguage *script_multi_script = NULL;
+
+void register_multiscript_types() {
+	script_multi_script = memnew(MultiScriptLanguage);
+	ScriptServer::register_language(script_multi_script);
+	ClassDB::register_class<MultiScript>();
+
+	// ClassDB::register_class<Multi>();
+}
+
+void unregister_multiscript_types() {
+	if (script_multi_script) {
+		ScriptServer::unregister_language(script_multi_script);
+		memdelete(script_multi_script);
+	}
+}

modules/multiscript/register_types.h

@@ -0,0 +1,31 @@
+/*************************************************************************/
+/*  register_types.h                                                     */
+/*************************************************************************/
+/*                       This file is part of:                           */
+/*                           GODOT ENGINE                                */
+/*                    http://www.godotengine.org                         */
+/*************************************************************************/
+/* Copyright (c) 2007-2017 Juan Linietsky, Ariel Manzur.                 */
+/* Copyright (c) 2014-2017 Godot Engine contributors (cf. AUTHORS.md)    */
+/*                                                                       */
+/* Permission is hereby granted, free of charge, to any person obtaining */
+/* a copy of this software and associated documentation files (the       */
+/* "Software"), to deal in the Software without restriction, including   */
+/* without limitation the rights to use, copy, modify, merge, publish,   */
+/* distribute, sublicense, and/or sell copies of the Software, and to    */
+/* permit persons to whom the Software is furnished to do so, subject to */
+/* the following conditions:                                             */
+/*                                                                       */
+/* The above copyright notice and this permission notice shall be        */
+/* included in all copies or substantial portions of the Software.       */
+/*                                                                       */
+/* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,       */
+/* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF    */
+/* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.*/
+/* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY  */
+/* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,  */
+/* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE     */
+/* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.                */
+/*************************************************************************/
+void register_multiscript_types();
+void unregister_multiscript_types();