#include "visual_script_nodes.h"
#include "global_constants.h"
#include "globals.h"
#include "scene/main/scene_main_loop.h"
#include "os/os.h"
#include "scene/main/node.h"

//////////////////////////////////////////
////////////////FUNCTION//////////////////
//////////////////////////////////////////


bool  VisualScriptFunction::_set(const StringName& p_name, const Variant& p_value) {


	if (p_name=="argument_count") {

		int new_argc=p_value;
		int argc = arguments.size();
		if (argc==new_argc)
			return true;

		arguments.resize(new_argc);

		for(int i=argc;i<new_argc;i++) {
			arguments[i].name="arg"+itos(i+1);
			arguments[i].type=Variant::NIL;
		}
		emit_signal("ports_changed");
		_change_notify();
		return true;
	}
	if (String(p_name).begins_with("argument/")) {
		int idx = String(p_name).get_slice("/",1).to_int()-1;
		ERR_FAIL_INDEX_V(idx,arguments.size(),false);
		String what = String(p_name).get_slice("/",2);
		if (what=="type") {

			Variant::Type new_type = Variant::Type(int(p_value));
			arguments[idx].type=new_type;
			emit_signal("ports_changed");

			return true;
		}

		if (what=="name") {

			arguments[idx].name=p_value;
			emit_signal("ports_changed");
			return true;
		}


	}


	return false;
}

bool  VisualScriptFunction::_get(const StringName& p_name,Variant &r_ret) const {


	if (p_name=="argument_count") {
		r_ret = arguments.size();
		return true;
	}
	if (String(p_name).begins_with("argument/")) {
		int idx = String(p_name).get_slice("/",1).to_int()-1;
		ERR_FAIL_INDEX_V(idx,arguments.size(),false);
		String what = String(p_name).get_slice("/",2);
		if (what=="type") {
			r_ret = arguments[idx].type;
			return true;
		}
		if (what=="name") {
			r_ret = arguments[idx].name;
			return true;
		}



	}

	return false;
}
void  VisualScriptFunction::_get_property_list( List<PropertyInfo> *p_list) const {


	p_list->push_back(PropertyInfo(Variant::INT,"argument_count",PROPERTY_HINT_RANGE,"0,256"));
	String argt="Variant";
	for(int i=1;i<Variant::VARIANT_MAX;i++) {
		argt+=","+Variant::get_type_name(Variant::Type(i));
	}

	for(int i=0;i<arguments.size();i++) {
		p_list->push_back(PropertyInfo(Variant::INT,"argument/"+itos(i+1)+"/type",PROPERTY_HINT_ENUM,argt));
		p_list->push_back(PropertyInfo(Variant::STRING,"argument/"+itos(i+1)+"/name"));
	}
}


int VisualScriptFunction::get_output_sequence_port_count() const {

	return 1;
}

bool VisualScriptFunction::has_input_sequence_port() const{

	return false;
}

int VisualScriptFunction::get_input_value_port_count() const{

	return 0;
}
int VisualScriptFunction::get_output_value_port_count() const{

	return arguments.size();
}

String VisualScriptFunction::get_output_sequence_port_text(int p_port) const {

	return String();
}

PropertyInfo VisualScriptFunction::get_input_value_port_info(int p_idx) const{

	ERR_FAIL_V(PropertyInfo());
	return PropertyInfo();
}
PropertyInfo VisualScriptFunction::get_output_value_port_info(int p_idx) const{

	ERR_FAIL_INDEX_V(p_idx,arguments.size(),PropertyInfo());
	PropertyInfo out;
	out.type=arguments[p_idx].type;
	out.name=arguments[p_idx].name;
	return out;
}

String VisualScriptFunction::get_caption() const {

	return "Function";
}

String VisualScriptFunction::get_text() const {

	return get_name(); //use name as function name I guess
}

void VisualScriptFunction::add_argument(Variant::Type p_type,const String& p_name,int p_index){

	Argument arg;
	arg.name=p_name;
	arg.type=p_type;
	if (p_index>=0)
		arguments.insert(p_index,arg);
	else
		arguments.push_back(arg);

	emit_signal("ports_changed");

}
void VisualScriptFunction::set_argument_type(int p_argidx,Variant::Type p_type){

	ERR_FAIL_INDEX(p_argidx,arguments.size());

	arguments[p_argidx].type=p_type;
	emit_signal("ports_changed");
}
Variant::Type VisualScriptFunction::get_argument_type(int p_argidx) const {

	ERR_FAIL_INDEX_V(p_argidx,arguments.size(),Variant::NIL);
	return arguments[p_argidx].type;

}
void VisualScriptFunction::set_argument_name(int p_argidx,const String& p_name) {

	ERR_FAIL_INDEX(p_argidx,arguments.size());

	arguments[p_argidx].name=p_name;
	emit_signal("ports_changed");

}
String VisualScriptFunction::get_argument_name(int p_argidx) const {

	ERR_FAIL_INDEX_V(p_argidx,arguments.size(),String());
	return arguments[p_argidx].name;

}
void VisualScriptFunction::remove_argument(int p_argidx) {

	ERR_FAIL_INDEX(p_argidx,arguments.size());

	arguments.remove(p_argidx);
	emit_signal("ports_changed");

}

int VisualScriptFunction::get_argument_count() const {

	return arguments.size();
}


VisualScriptNodeInstance* VisualScriptFunction::instance(VScriptInstance* p_instance) {

	return NULL;
}

VisualScriptFunction::VisualScriptFunction() {


}


//////////////////////////////////////////
////////////////OPERATOR//////////////////
//////////////////////////////////////////

int VisualScriptOperator::get_output_sequence_port_count() const {

	return 1;
}

bool VisualScriptOperator::has_input_sequence_port() const{

	return true;
}

int VisualScriptOperator::get_input_value_port_count() const{

	return (op==Variant::OP_BIT_NEGATE || op==Variant::OP_NOT || op==Variant::OP_NEGATE) ? 1 : 2;
}
int VisualScriptOperator::get_output_value_port_count() const{

	return 1;
}

String VisualScriptOperator::get_output_sequence_port_text(int p_port) const {

	return String();
}

PropertyInfo VisualScriptOperator::get_input_value_port_info(int p_idx) const{

	static const Variant::Type port_types[Variant::OP_MAX][2]={
		{Variant::NIL,Variant::NIL}, //OP_EQUAL,
		{Variant::NIL,Variant::NIL}, //OP_NOT_EQUAL,
		{Variant::NIL,Variant::NIL}, //OP_LESS,
		{Variant::NIL,Variant::NIL}, //OP_LESS_EQUAL,
		{Variant::NIL,Variant::NIL}, //OP_GREATER,
		{Variant::NIL,Variant::NIL}, //OP_GREATER_EQUAL,
		//mathematic
		{Variant::NIL,Variant::NIL}, //OP_ADD,
		{Variant::NIL,Variant::NIL}, //OP_SUBSTRACT,
		{Variant::NIL,Variant::NIL}, //OP_MULTIPLY,
		{Variant::NIL,Variant::NIL}, //OP_DIVIDE,
		{Variant::NIL,Variant::NIL}, //OP_NEGATE,
		{Variant::INT,Variant::INT}, //OP_MODULE,
		{Variant::STRING,Variant::STRING}, //OP_STRING_CONCAT,
		//bitwise
		{Variant::INT,Variant::INT}, //OP_SHIFT_LEFT,
		{Variant::INT,Variant::INT}, //OP_SHIFT_RIGHT,
		{Variant::INT,Variant::INT}, //OP_BIT_AND,
		{Variant::INT,Variant::INT}, //OP_BIT_OR,
		{Variant::INT,Variant::INT}, //OP_BIT_XOR,
		{Variant::INT,Variant::INT}, //OP_BIT_NEGATE,
		//logic
		{Variant::BOOL,Variant::BOOL}, //OP_AND,
		{Variant::BOOL,Variant::BOOL}, //OP_OR,
		{Variant::BOOL,Variant::BOOL}, //OP_XOR,
		{Variant::BOOL,Variant::BOOL}, //OP_NOT,
		//containment
		{Variant::NIL,Variant::NIL} //OP_IN,
	};

	ERR_FAIL_INDEX_V(p_idx,Variant::OP_MAX,PropertyInfo());

	PropertyInfo pinfo;
	pinfo.name=p_idx==0?"A":"B";
	pinfo.type=port_types[op][p_idx];
	return pinfo;
}
PropertyInfo VisualScriptOperator::get_output_value_port_info(int p_idx) const{
	static const Variant::Type port_types[Variant::OP_MAX]={
		//comparation
		Variant::BOOL, //OP_EQUAL,
		Variant::BOOL, //OP_NOT_EQUAL,
		Variant::BOOL, //OP_LESS,
		Variant::BOOL, //OP_LESS_EQUAL,
		Variant::BOOL, //OP_GREATER,
		Variant::BOOL, //OP_GREATER_EQUAL,
		//mathematic
		Variant::NIL, //OP_ADD,
		Variant::NIL, //OP_SUBSTRACT,
		Variant::NIL, //OP_MULTIPLY,
		Variant::NIL, //OP_DIVIDE,
		Variant::NIL, //OP_NEGATE,
		Variant::INT, //OP_MODULE,
		Variant::STRING, //OP_STRING_CONCAT,
		//bitwise
		Variant::INT, //OP_SHIFT_LEFT,
		Variant::INT, //OP_SHIFT_RIGHT,
		Variant::INT, //OP_BIT_AND,
		Variant::INT, //OP_BIT_OR,
		Variant::INT, //OP_BIT_XOR,
		Variant::INT, //OP_BIT_NEGATE,
		//logic
		Variant::BOOL, //OP_AND,
		Variant::BOOL, //OP_OR,
		Variant::BOOL, //OP_XOR,
		Variant::BOOL, //OP_NOT,
		//containment
		Variant::BOOL //OP_IN,
	};

	PropertyInfo pinfo;
	pinfo.name="";
	pinfo.type=port_types[op];
	return pinfo;

}

static const char* op_names[]={
	//comparation
	"Equal", //OP_EQUAL,
	"NotEqual", //OP_NOT_EQUAL,
	"Less", //OP_LESS,
	"LessEqual", //OP_LESS_EQUAL,
	"Greater", //OP_GREATER,
	"GreaterEq", //OP_GREATER_EQUAL,
	//mathematic
	"Add", //OP_ADD,
	"Subtract", //OP_SUBSTRACT,
	"Multiply", //OP_MULTIPLY,
	"Divide", //OP_DIVIDE,
	"Negate", //OP_NEGATE,
	"Remainder", //OP_MODULE,
	"Concat", //OP_STRING_CONCAT,
	//bitwise
	"ShiftLeft", //OP_SHIFT_LEFT,
	"ShiftRight", //OP_SHIFT_RIGHT,
	"BitAnd", //OP_BIT_AND,
	"BitOr", //OP_BIT_OR,
	"BitXor", //OP_BIT_XOR,
	"BitNeg", //OP_BIT_NEGATE,
	//logic
	"And", //OP_AND,
	"Or", //OP_OR,
	"Xor", //OP_XOR,
	"Not", //OP_NOT,
	//containment
	"In", //OP_IN,
};

String VisualScriptOperator::get_caption() const {



	return op_names[op];
}

String VisualScriptOperator::get_text() const {

	static const wchar_t* op_names[]={
		//comparation
		L"A = B", //OP_EQUAL,
		L"A \u2260 B", //OP_NOT_EQUAL,
		L"A < B", //OP_LESS,
		L"A \u2264 B", //OP_LESS_EQUAL,
		L"A > B", //OP_GREATER,
		L"A \u2265 B", //OP_GREATER_EQUAL,
		//mathematic
		L"A + B", //OP_ADD,
		L"A - B", //OP_SUBSTRACT,
		L"A x B", //OP_MULTIPLY,
		L"A \u00F7 B", //OP_DIVIDE,
		L"\u00AC A", //OP_NEGATE,
		L"A mod B", //OP_MODULE,
		L"A .. B", //OP_STRING_CONCAT,
		//bitwise
		L"A << B", //OP_SHIFT_LEFT,
		L"A >> B", //OP_SHIFT_RIGHT,
		L"A & B", //OP_BIT_AND,
		L"A | B", //OP_BIT_OR,
		L"A ^ B", //OP_BIT_XOR,
		L"~A", //OP_BIT_NEGATE,
		//logic
		L"A and B", //OP_AND,
		L"A or B", //OP_OR,
		L"A xor B", //OP_XOR,
		L"not A", //OP_NOT,

	};
	return op_names[op];
}

void VisualScriptOperator::set_operator(Variant::Operator p_op) {

	if (op==p_op)
		return;
	op=p_op;
	emit_signal("ports_changed");

}

Variant::Operator VisualScriptOperator::get_operator() const{

	return op;
}


void VisualScriptOperator::_bind_methods() {

	ObjectTypeDB::bind_method(_MD("set_operator","op"),&VisualScriptOperator::set_operator);
	ObjectTypeDB::bind_method(_MD("get_operator"),&VisualScriptOperator::get_operator);

	String types;
	for(int i=0;i<Variant::OP_MAX;i++) {
		if (i>0)
			types+=",";
		types+=op_names[i];
	}
	ADD_PROPERTY(PropertyInfo(Variant::INT,"operator_value/type",PROPERTY_HINT_ENUM,types),_SCS("set_operator"),_SCS("get_operator"));

}

VisualScriptNodeInstance* VisualScriptOperator::instance(VScriptInstance* p_instance) {

	return NULL;
}

VisualScriptOperator::VisualScriptOperator() {

	op=Variant::OP_ADD;
}



template<Variant::Operator OP>
static Ref<VisualScriptNode> create_op_node(const String& p_name) {

	Ref<VisualScriptOperator> node;
	node.instance();
	node->set_operator(OP);
	return node;
}

//////////////////////////////////////////
////////////////VARIABLE//////////////////
//////////////////////////////////////////

int VisualScriptVariable::get_output_sequence_port_count() const {

	return 1;
}

bool VisualScriptVariable::has_input_sequence_port() const{

	return true;
}

int VisualScriptVariable::get_input_value_port_count() const{

	return 1;
}
int VisualScriptVariable::get_output_value_port_count() const{

	return 1;
}

String VisualScriptVariable::get_output_sequence_port_text(int p_port) const {

	return String();
}

PropertyInfo VisualScriptVariable::get_input_value_port_info(int p_idx) const{

	PropertyInfo pinfo;
	pinfo.name="set";
	if (get_visual_script().is_valid() && get_visual_script()->has_variable(variable)) {
		PropertyInfo vinfo = get_visual_script()->get_variable_info(variable);
		pinfo.type=vinfo.type;
		pinfo.hint=vinfo.hint;
		pinfo.hint_string=vinfo.hint_string;
	}
	return pinfo;
}

PropertyInfo VisualScriptVariable::get_output_value_port_info(int p_idx) const{

	PropertyInfo pinfo;
	pinfo.name="get";
	if (get_visual_script().is_valid() && get_visual_script()->has_variable(variable)) {
		PropertyInfo vinfo = get_visual_script()->get_variable_info(variable);
		pinfo.type=vinfo.type;
		pinfo.hint=vinfo.hint;
		pinfo.hint_string=vinfo.hint_string;
	}
	return pinfo;
}


String VisualScriptVariable::get_caption() const {

	return "Variable";
}

String VisualScriptVariable::get_text() const {

	return variable;
}

void VisualScriptVariable::set_variable(StringName p_variable) {

	if (variable==p_variable)
		return;
	variable=p_variable;
	emit_signal("ports_changed");

}

StringName VisualScriptVariable::get_variable() const{

	return variable;
}

void VisualScriptVariable::_validate_property(PropertyInfo& property) const {

	if (property.name=="variable/name" && get_visual_script().is_valid()) {
		Ref<VisualScript> vs = get_visual_script();
		List<StringName> vars;
		vs->get_variable_list(&vars);

		String vhint;
		for (List<StringName>::Element *E=vars.front();E;E=E->next()) {
			if (vhint!=String())
				vhint+=",";

			vhint+=E->get().operator String();
		}

		property.hint=PROPERTY_HINT_ENUM;
		property.hint_string=vhint;
	}
}

void VisualScriptVariable::_bind_methods() {

	ObjectTypeDB::bind_method(_MD("set_variable","name"),&VisualScriptVariable::set_variable);
	ObjectTypeDB::bind_method(_MD("get_variable"),&VisualScriptVariable::get_variable);


	ADD_PROPERTY(PropertyInfo(Variant::STRING,"variable/name"),_SCS("set_variable"),_SCS("get_variable"));

}

VisualScriptNodeInstance* VisualScriptVariable::instance(VScriptInstance* p_instance) {

	return NULL;
}

VisualScriptVariable::VisualScriptVariable() {


}



//////////////////////////////////////////
////////////////CONSTANT//////////////////
//////////////////////////////////////////

int VisualScriptConstant::get_output_sequence_port_count() const {

	return 0;
}

bool VisualScriptConstant::has_input_sequence_port() const{

	return false;
}

int VisualScriptConstant::get_input_value_port_count() const{

	return 0;
}
int VisualScriptConstant::get_output_value_port_count() const{

	return 1;
}

String VisualScriptConstant::get_output_sequence_port_text(int p_port) const {

	return String();
}

PropertyInfo VisualScriptConstant::get_input_value_port_info(int p_idx) const{

	return PropertyInfo();
}

PropertyInfo VisualScriptConstant::get_output_value_port_info(int p_idx) const{

	PropertyInfo pinfo;
	pinfo.name="get";
	pinfo.type=type;
	return pinfo;
}


String VisualScriptConstant::get_caption() const {

	return "Constant";
}

String VisualScriptConstant::get_text() const {

	return String(value);
}

void VisualScriptConstant::set_constant_type(Variant::Type p_type) {

	if (type==p_type)
		return;

	type=p_type;
	emit_signal("ports_changed");
	Variant::CallError ce;
	value=Variant::construct(type,NULL,0,ce);
	_change_notify();

}

Variant::Type VisualScriptConstant::get_constant_type() const{

	return type;
}

void VisualScriptConstant::set_constant_value(Variant p_value){

	if (value==p_value)
		return;

	value=p_value;
	emit_signal("ports_changed");
}
Variant VisualScriptConstant::get_constant_value() const{

	return value;
}

void VisualScriptConstant::_validate_property(PropertyInfo& property) const {


	if (property.name=="constant/value") {
		property.type=type;
		if (type==Variant::NIL)
			property.usage=0; //do not save if nil
	}
}

void VisualScriptConstant::_bind_methods() {

	ObjectTypeDB::bind_method(_MD("set_constant_type","type"),&VisualScriptConstant::set_constant_type);
	ObjectTypeDB::bind_method(_MD("get_constant_type"),&VisualScriptConstant::get_constant_type);

	ObjectTypeDB::bind_method(_MD("set_constant_value","value"),&VisualScriptConstant::set_constant_value);
	ObjectTypeDB::bind_method(_MD("get_constant_value"),&VisualScriptConstant::get_constant_value);

	String argt="Null";
	for(int i=1;i<Variant::VARIANT_MAX;i++) {
		argt+=","+Variant::get_type_name(Variant::Type(i));
	}


	ADD_PROPERTY(PropertyInfo(Variant::INT,"constant/type",PROPERTY_HINT_ENUM,argt),_SCS("set_constant_type"),_SCS("get_constant_type"));
	ADD_PROPERTY(PropertyInfo(Variant::NIL,"constant/value"),_SCS("set_constant_value"),_SCS("get_constant_value"));

}

VisualScriptNodeInstance* VisualScriptConstant::instance(VScriptInstance* p_instance) {

	return NULL;
}

VisualScriptConstant::VisualScriptConstant() {

	type=Variant::NIL;

}



//////////////////////////////////////////
////////////////INDEX////////////////////
//////////////////////////////////////////

int VisualScriptIndexGet::get_output_sequence_port_count() const {

	return 1;
}

bool VisualScriptIndexGet::has_input_sequence_port() const{

	return true;
}

int VisualScriptIndexGet::get_input_value_port_count() const{

	return 2;
}
int VisualScriptIndexGet::get_output_value_port_count() const{

	return 1;
}

String VisualScriptIndexGet::get_output_sequence_port_text(int p_port) const {

	return String();
}

PropertyInfo VisualScriptIndexGet::get_input_value_port_info(int p_idx) const{

	if (p_idx==0) {
		return PropertyInfo(Variant::NIL,"base");
	} else {
		return PropertyInfo(Variant::NIL,"index");

	}
}

PropertyInfo VisualScriptIndexGet::get_output_value_port_info(int p_idx) const{

	return PropertyInfo();
}


String VisualScriptIndexGet::get_caption() const {

	return "IndexGet";
}

String VisualScriptIndexGet::get_text() const {

	return String("get");
}


VisualScriptNodeInstance* VisualScriptIndexGet::instance(VScriptInstance* p_instance) {

	return NULL;
}

VisualScriptIndexGet::VisualScriptIndexGet() {



}

//////////////////////////////////////////
////////////////INDEXSET//////////////////
//////////////////////////////////////////

int VisualScriptIndexSet::get_output_sequence_port_count() const {

	return 1;
}

bool VisualScriptIndexSet::has_input_sequence_port() const{

	return true;
}

int VisualScriptIndexSet::get_input_value_port_count() const{

	return 3;
}
int VisualScriptIndexSet::get_output_value_port_count() const{

	return 0;
}

String VisualScriptIndexSet::get_output_sequence_port_text(int p_port) const {

	return String();
}

PropertyInfo VisualScriptIndexSet::get_input_value_port_info(int p_idx) const{

	if (p_idx==0) {
		return PropertyInfo(Variant::NIL,"base");
	} else if (p_idx==1){
		return PropertyInfo(Variant::NIL,"index");

	} else {
		return PropertyInfo(Variant::NIL,"value");

	}
}

PropertyInfo VisualScriptIndexSet::get_output_value_port_info(int p_idx) const{

	return PropertyInfo();
}


String VisualScriptIndexSet::get_caption() const {

	return "IndexSet";
}

String VisualScriptIndexSet::get_text() const {

	return String("set");
}


VisualScriptNodeInstance* VisualScriptIndexSet::instance(VScriptInstance* p_instance) {

	return NULL;
}

VisualScriptIndexSet::VisualScriptIndexSet() {



}


//////////////////////////////////////////
////////////////GLOBALCONSTANT///////////
//////////////////////////////////////////

int VisualScriptGlobalConstant::get_output_sequence_port_count() const {

	return 0;
}

bool VisualScriptGlobalConstant::has_input_sequence_port() const{

	return false;
}

int VisualScriptGlobalConstant::get_input_value_port_count() const{

	return 0;
}
int VisualScriptGlobalConstant::get_output_value_port_count() const{

	return 1;
}

String VisualScriptGlobalConstant::get_output_sequence_port_text(int p_port) const {

	return String();
}

PropertyInfo VisualScriptGlobalConstant::get_input_value_port_info(int p_idx) const{

	return PropertyInfo();
}

PropertyInfo VisualScriptGlobalConstant::get_output_value_port_info(int p_idx) const{

	return PropertyInfo(Variant::INT,"value");
}


String VisualScriptGlobalConstant::get_caption() const {

	return "GlobalConst";
}

String VisualScriptGlobalConstant::get_text() const {

	return GlobalConstants::get_global_constant_name(index);
}

void VisualScriptGlobalConstant::set_global_constant(int p_which) {

	index=p_which;
	_change_notify();
	emit_signal("ports_changed");
}

int VisualScriptGlobalConstant::get_global_constant() {
	return index;
}



VisualScriptNodeInstance* VisualScriptGlobalConstant::instance(VScriptInstance* p_instance) {

	return NULL;
}

void VisualScriptGlobalConstant::_bind_methods() {

	ObjectTypeDB::bind_method(_MD("set_global_constant","index"),&VisualScriptGlobalConstant::set_global_constant);
	ObjectTypeDB::bind_method(_MD("get_global_constant"),&VisualScriptGlobalConstant::get_global_constant);

	String cc;

	for(int i=0;i<GlobalConstants::get_global_constant_count();i++) {

		if (i>0)
			cc+=",";
		cc+=GlobalConstants::get_global_constant_name(i);
	}
	ADD_PROPERTY(PropertyInfo(Variant::INT,"constant",PROPERTY_HINT_ENUM,cc),_SCS("set_global_constant"),_SCS("get_global_constant"));
}

VisualScriptGlobalConstant::VisualScriptGlobalConstant() {

	index=0;
}



//////////////////////////////////////////
////////////////MATHCONSTANT///////////
//////////////////////////////////////////


const char* VisualScriptMathConstant::const_name[MATH_CONSTANT_MAX]={
	"One",
	"PI",
	"PIx2",
	"PI/2",
	"E",
	"Sqrt2",
};
int VisualScriptMathConstant::get_output_sequence_port_count() const {

	return 0;
}

bool VisualScriptMathConstant::has_input_sequence_port() const{

	return false;
}

int VisualScriptMathConstant::get_input_value_port_count() const{

	return 0;
}
int VisualScriptMathConstant::get_output_value_port_count() const{

	return 1;
}

String VisualScriptMathConstant::get_output_sequence_port_text(int p_port) const {

	return String();
}

PropertyInfo VisualScriptMathConstant::get_input_value_port_info(int p_idx) const{

	return PropertyInfo();
}

PropertyInfo VisualScriptMathConstant::get_output_value_port_info(int p_idx) const{

	return PropertyInfo(Variant::INT,"value");
}


String VisualScriptMathConstant::get_caption() const {

	return "MathConst";
}

String VisualScriptMathConstant::get_text() const {

	return const_name[constant];
}

void VisualScriptMathConstant::set_math_constant(MathConstant p_which) {

	constant=p_which;
	_change_notify();
	emit_signal("ports_changed");
}

VisualScriptMathConstant::MathConstant VisualScriptMathConstant::get_math_constant() {
	return constant;
}



VisualScriptNodeInstance* VisualScriptMathConstant::instance(VScriptInstance* p_instance) {

	return NULL;
}

void VisualScriptMathConstant::_bind_methods() {

	ObjectTypeDB::bind_method(_MD("set_math_constant","which"),&VisualScriptMathConstant::set_math_constant);
	ObjectTypeDB::bind_method(_MD("get_math_constant"),&VisualScriptMathConstant::get_math_constant);

	String cc;

	for(int i=0;i<MATH_CONSTANT_MAX;i++) {

		if (i>0)
			cc+=",";
		cc+=const_name[i];
	}
	ADD_PROPERTY(PropertyInfo(Variant::INT,"constant",PROPERTY_HINT_ENUM,cc),_SCS("set_math_constant"),_SCS("get_math_constant"));
}

VisualScriptMathConstant::VisualScriptMathConstant() {

	constant=MATH_CONSTANT_ONE;
}



//////////////////////////////////////////
////////////////GLOBALSINGLETON///////////
//////////////////////////////////////////

int VisualScriptSingleton::get_output_sequence_port_count() const {

	return 0;
}

bool VisualScriptSingleton::has_input_sequence_port() const{

	return false;
}

int VisualScriptSingleton::get_input_value_port_count() const{

	return 0;
}
int VisualScriptSingleton::get_output_value_port_count() const{

	return 1;
}

String VisualScriptSingleton::get_output_sequence_port_text(int p_port) const {

	return String();
}

PropertyInfo VisualScriptSingleton::get_input_value_port_info(int p_idx) const{

	return PropertyInfo();
}

PropertyInfo VisualScriptSingleton::get_output_value_port_info(int p_idx) const{

	return PropertyInfo(Variant::OBJECT,"instance");
}


String VisualScriptSingleton::get_caption() const {

	return "Singleton";
}

String VisualScriptSingleton::get_text() const {

	return singleton;
}

void VisualScriptSingleton::set_singleton(const String& p_string) {

	singleton=p_string;

	_change_notify();
	emit_signal("ports_changed");
}

String VisualScriptSingleton::get_singleton() {
	return singleton;
}



VisualScriptNodeInstance* VisualScriptSingleton::instance(VScriptInstance* p_instance) {

	return NULL;
}

void VisualScriptSingleton::_bind_methods() {

	ObjectTypeDB::bind_method(_MD("set_singleton","name"),&VisualScriptSingleton::set_singleton);
	ObjectTypeDB::bind_method(_MD("get_singleton"),&VisualScriptSingleton::get_singleton);

	String cc;

	List<Globals::Singleton> singletons;

	Globals::get_singleton()->get_singletons(&singletons);

	for (List<Globals::Singleton>::Element *E=singletons.front();E;E=E->next()) {
		if (E->get().name=="VS" || E->get().name=="PS" || E->get().name=="PS2D" || E->get().name=="AS" || E->get().name=="TS" || E->get().name=="SS" || E->get().name=="SS2D")
			continue; //skip these, too simple named

		if (cc!=String())
			cc+=",";
		cc+=E->get().name;
	}

	ADD_PROPERTY(PropertyInfo(Variant::STRING,"constant",PROPERTY_HINT_ENUM,cc),_SCS("set_singleton"),_SCS("get_singleton"));
}

VisualScriptSingleton::VisualScriptSingleton() {

	singleton=String();
}



//////////////////////////////////////////
////////////////GETNODE///////////
//////////////////////////////////////////

int VisualScriptSceneNode::get_output_sequence_port_count() const {

	return 0;
}

bool VisualScriptSceneNode::has_input_sequence_port() const{

	return false;
}

int VisualScriptSceneNode::get_input_value_port_count() const{

	return 0;
}
int VisualScriptSceneNode::get_output_value_port_count() const{

	return 1;
}

String VisualScriptSceneNode::get_output_sequence_port_text(int p_port) const {

	return String();
}

PropertyInfo VisualScriptSceneNode::get_input_value_port_info(int p_idx) const{

	return PropertyInfo();
}

PropertyInfo VisualScriptSceneNode::get_output_value_port_info(int p_idx) const{

	return PropertyInfo(Variant::OBJECT,"node");
}


String VisualScriptSceneNode::get_caption() const {

	return "SceneNode";
}

String VisualScriptSceneNode::get_text() const {

	return path.simplified();
}

void VisualScriptSceneNode::set_node_path(const NodePath& p_path) {

	path=p_path;
	_change_notify();
	emit_signal("ports_changed");
}

NodePath VisualScriptSceneNode::get_node_path() {
	return path;
}



VisualScriptNodeInstance* VisualScriptSceneNode::instance(VScriptInstance* p_instance) {

	return NULL;
}

#ifdef TOOLS_ENABLED

static Node* _find_script_node(Node* p_edited_scene,Node* p_current_node,const Ref<Script> &script) {

	if (p_edited_scene!=p_current_node && p_current_node->get_owner()!=p_edited_scene)
		return NULL;

	Ref<Script> scr = p_current_node->get_script();

	if (scr.is_valid() && scr==script)
		return p_current_node;

	for(int i=0;i<p_current_node->get_child_count();i++) {
		Node *n = _find_script_node(p_edited_scene,p_current_node->get_child(i),script);
		if (n)
			return n;
	}

	return NULL;
}

#endif

void VisualScriptSceneNode::_validate_property(PropertyInfo& property) const {

#ifdef TOOLS_ENABLED
	if (property.name=="node_path") {

		Ref<Script> script = get_visual_script();
		if (!script.is_valid())
			return;

		MainLoop * main_loop = OS::get_singleton()->get_main_loop();
		if (!main_loop)
			return;

		SceneTree *scene_tree = main_loop->cast_to<SceneTree>();

		if (!scene_tree)
			return;

		Node *edited_scene = scene_tree->get_edited_scene_root();

		if (!edited_scene)
			return;

		Node* script_node = _find_script_node(edited_scene,edited_scene,script);

		if (!script_node)
			return;

		property.hint_string=script_node->get_path();
	}
#endif
}

void VisualScriptSceneNode::_bind_methods() {

	ObjectTypeDB::bind_method(_MD("set_node_path","path"),&VisualScriptSceneNode::set_node_path);
	ObjectTypeDB::bind_method(_MD("get_node_path"),&VisualScriptSceneNode::get_node_path);

	ADD_PROPERTY(PropertyInfo(Variant::NODE_PATH,"node_path",PROPERTY_HINT_NODE_PATH_TO_EDITED_NODE),_SCS("set_node_path"),_SCS("get_node_path"));
}

VisualScriptSceneNode::VisualScriptSceneNode() {

	path=String(".");
}


void register_visual_script_nodes() {

	VisualScriptLanguage::singleton->add_register_func("data/variable",create_node_generic<VisualScriptVariable>);
	VisualScriptLanguage::singleton->add_register_func("data/constant",create_node_generic<VisualScriptConstant>);
	VisualScriptLanguage::singleton->add_register_func("data/global_constant",create_node_generic<VisualScriptGlobalConstant>);
	VisualScriptLanguage::singleton->add_register_func("data/math_constant",create_node_generic<VisualScriptMathConstant>);
	VisualScriptLanguage::singleton->add_register_func("data/singleton",create_node_generic<VisualScriptSingleton>);
	VisualScriptLanguage::singleton->add_register_func("data/scene_node",create_node_generic<VisualScriptSceneNode>);


	VisualScriptLanguage::singleton->add_register_func("index/get",create_node_generic<VisualScriptIndexGet>);
	VisualScriptLanguage::singleton->add_register_func("index/set",create_node_generic<VisualScriptIndexSet>);


	VisualScriptLanguage::singleton->add_register_func("operators/compare/equal",create_op_node<Variant::OP_EQUAL>);
	VisualScriptLanguage::singleton->add_register_func("operators/compare/not_equal",create_op_node<Variant::OP_NOT_EQUAL>);
	VisualScriptLanguage::singleton->add_register_func("operators/compare/less",create_op_node<Variant::OP_LESS>);
	VisualScriptLanguage::singleton->add_register_func("operators/compare/less_equal",create_op_node<Variant::OP_LESS_EQUAL>);
	VisualScriptLanguage::singleton->add_register_func("operators/compare/greater",create_op_node<Variant::OP_GREATER>);
	VisualScriptLanguage::singleton->add_register_func("operators/compare/greater_equal",create_op_node<Variant::OP_GREATER_EQUAL>);
	//mathematic
	VisualScriptLanguage::singleton->add_register_func("operators/math/add",create_op_node<Variant::OP_ADD>);
	VisualScriptLanguage::singleton->add_register_func("operators/math/subtract",create_op_node<Variant::OP_SUBSTRACT>);
	VisualScriptLanguage::singleton->add_register_func("operators/math/multiply",create_op_node<Variant::OP_MULTIPLY>);
	VisualScriptLanguage::singleton->add_register_func("operators/math/divide",create_op_node<Variant::OP_DIVIDE>);
	VisualScriptLanguage::singleton->add_register_func("operators/math/negate",create_op_node<Variant::OP_NEGATE>);
	VisualScriptLanguage::singleton->add_register_func("operators/math/remainder",create_op_node<Variant::OP_MODULE>);
	VisualScriptLanguage::singleton->add_register_func("operators/math/string_concat",create_op_node<Variant::OP_STRING_CONCAT>);
	//bitwise
	VisualScriptLanguage::singleton->add_register_func("operators/bitwise/shift_left",create_op_node<Variant::OP_SHIFT_LEFT>);
	VisualScriptLanguage::singleton->add_register_func("operators/bitwise/shift_right",create_op_node<Variant::OP_SHIFT_RIGHT>);
	VisualScriptLanguage::singleton->add_register_func("operators/bitwise/bit_and",create_op_node<Variant::OP_BIT_AND>);
	VisualScriptLanguage::singleton->add_register_func("operators/bitwise/bit_or",create_op_node<Variant::OP_BIT_OR>);
	VisualScriptLanguage::singleton->add_register_func("operators/bitwise/bit_xor",create_op_node<Variant::OP_BIT_XOR>);
	VisualScriptLanguage::singleton->add_register_func("operators/bitwise/bit_negate",create_op_node<Variant::OP_BIT_NEGATE>);
	//logic
	VisualScriptLanguage::singleton->add_register_func("operators/logic/and",create_op_node<Variant::OP_AND>);
	VisualScriptLanguage::singleton->add_register_func("operators/logic/or",create_op_node<Variant::OP_OR>);
	VisualScriptLanguage::singleton->add_register_func("operators/logic/xor",create_op_node<Variant::OP_XOR>);
	VisualScriptLanguage::singleton->add_register_func("operators/logic/not",create_op_node<Variant::OP_NOT>);
	VisualScriptLanguage::singleton->add_register_func("operators/logic/in",create_op_node<Variant::OP_IN>);

}