/*************************************************************************/
/*  tile_set.cpp                                                         */
/*************************************************************************/
/*                       This file is part of:                           */
/*                           GODOT ENGINE                                */
/*                    http://www.godotengine.org                         */
/*************************************************************************/
/* Copyright (c) 2007-2015 Juan Linietsky, Ariel Manzur.                 */
/*                                                                       */
/* 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 "tile_set.h"

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

	String n = p_name;
	int slash = n.find("/");
	if (slash==-1)
		return false;
	int id = String::to_int(n.c_str(),slash);

	if (!tile_map.has(id))
		create_tile(id);
	String what = n.substr(slash+1,n.length());

	if (what=="name")
		tile_set_name(id,p_value);
	else if (what=="texture")
		tile_set_texture(id,p_value);
	else if (what=="tex_offset")
		tile_set_texture_offset(id,p_value);
	else if (what=="material")
		tile_set_material(id,p_value);
	else if (what=="shape_offset")
		tile_set_shape_offset(id,p_value);
	else if (what=="region")
		tile_set_region(id,p_value);
	else if (what=="shape")
		tile_set_shape(id,p_value);
	else if (what=="shapes")
		_tile_set_shapes(id,p_value);
	else if (what=="occluder")
		tile_set_light_occluder(id,p_value);
	else if (what=="occluder_offset")
		tile_set_occluder_offset(id,p_value);
	else if (what=="navigation")
		tile_set_navigation_polygon(id,p_value);
	else if (what=="navigation_offset")
		tile_set_navigation_polygon_offset(id,p_value);
	else
		return false;

	return true;

}

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

	String n = p_name;
	int slash = n.find("/");
	if (slash==-1)
		return false;
	int id = String::to_int(n.c_str(),slash);

	ERR_FAIL_COND_V(!tile_map.has(id),false);

	String what = n.substr(slash+1,n.length());

	if (what=="name")
		r_ret=tile_get_name(id);
	else if (what=="texture")
		r_ret=tile_get_texture(id);
	else if (what=="tex_offset")
		r_ret=tile_get_texture_offset(id);
	else if (what=="material")
		r_ret=tile_get_material(id);
	else if (what=="shape_offset")
		r_ret=tile_get_shape_offset(id);
	else if (what=="region")
		r_ret=tile_get_region(id);
	else if (what=="shape")
		r_ret=tile_get_shape(id);
	else if (what=="shapes")
		r_ret=_tile_get_shapes(id);
	else if (what=="occluder")
		r_ret=tile_get_light_occluder(id);
	else if (what=="occluder_offset")
		r_ret=tile_get_occluder_offset(id);
	else if (what=="navigation")
		r_ret=tile_get_navigation_polygon(id);
	else if (what=="navigation_offset")
		r_ret=tile_get_navigation_polygon_offset(id);
	else
		return false;

	return true;

}

void TileSet::_get_property_list( List<PropertyInfo> *p_list) const{

	for(Map<int,Data>::Element *E=tile_map.front();E;E=E->next()) {

		int id = E->key();
		String pre = itos(id)+"/";
		p_list->push_back(PropertyInfo(Variant::STRING,pre+"name"));
		p_list->push_back(PropertyInfo(Variant::OBJECT,pre+"texture",PROPERTY_HINT_RESOURCE_TYPE,"Texture"));
		p_list->push_back(PropertyInfo(Variant::VECTOR2,pre+"tex_offset"));
		p_list->push_back(PropertyInfo(Variant::OBJECT,pre+"material",PROPERTY_HINT_RESOURCE_TYPE,"CanvasItemMaterial"));
		p_list->push_back(PropertyInfo(Variant::RECT2,pre+"region"));
		p_list->push_back(PropertyInfo(Variant::VECTOR2,pre+"occluder_offset"));
		p_list->push_back(PropertyInfo(Variant::OBJECT,pre+"occluder",PROPERTY_HINT_RESOURCE_TYPE,"OccluderPolygon2D"));
		p_list->push_back(PropertyInfo(Variant::VECTOR2,pre+"navigation_offset"));
		p_list->push_back(PropertyInfo(Variant::OBJECT,pre+"navigation",PROPERTY_HINT_RESOURCE_TYPE,"NavigationPolygon"));
		p_list->push_back(PropertyInfo(Variant::VECTOR2,pre+"shape_offset"));
		p_list->push_back(PropertyInfo(Variant::OBJECT,pre+"shape",PROPERTY_HINT_RESOURCE_TYPE,"Shape2D",PROPERTY_USAGE_EDITOR));
		p_list->push_back(PropertyInfo(Variant::ARRAY,pre+"shapes",PROPERTY_HINT_NONE,"",PROPERTY_USAGE_NOEDITOR));
	}
}

void TileSet::create_tile(int p_id) {

	ERR_FAIL_COND( tile_map.has(p_id) );
	tile_map[p_id]=Data();
	_change_notify("");
	emit_changed();

}

void TileSet::tile_set_texture(int p_id,const Ref<Texture> &p_texture) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].texture=p_texture;
	emit_changed();

}

Ref<Texture> TileSet::tile_get_texture(int p_id) const {

	ERR_FAIL_COND_V(!tile_map.has(p_id),Ref<Texture>());
	return tile_map[p_id].texture;

}


void TileSet::tile_set_material(int p_id,const Ref<CanvasItemMaterial> &p_material) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].material=p_material;
	emit_changed();

}

Ref<CanvasItemMaterial> TileSet::tile_get_material(int p_id) const{

	ERR_FAIL_COND_V(!tile_map.has(p_id),Ref<CanvasItemMaterial>());
	return tile_map[p_id].material;
}


void TileSet::tile_set_texture_offset(int p_id,const Vector2 &p_offset) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].offset=p_offset;
	emit_changed();
}

Vector2 TileSet::tile_get_texture_offset(int p_id) const {

	ERR_FAIL_COND_V(!tile_map.has(p_id),Vector2());
	return tile_map[p_id].offset;

}

void TileSet::tile_set_shape_offset(int p_id,const Vector2 &p_offset) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].shape_offset=p_offset;
	emit_changed();
}

Vector2 TileSet::tile_get_shape_offset(int p_id) const {

	ERR_FAIL_COND_V(!tile_map.has(p_id),Vector2());
	return tile_map[p_id].shape_offset;

}

void TileSet::tile_set_region(int p_id,const Rect2 &p_region) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].region=p_region;
	emit_changed();
}

Rect2 TileSet::tile_get_region(int p_id) const {

	ERR_FAIL_COND_V(!tile_map.has(p_id),Rect2());
	return tile_map[p_id].region;

}


void TileSet::tile_set_name(int p_id,const String &p_name) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].name=p_name;
	emit_changed();
}

String TileSet::tile_get_name(int p_id) const {

	ERR_FAIL_COND_V(!tile_map.has(p_id),String());
	return tile_map[p_id].name;

}

void TileSet::tile_set_shape(int p_id,const Ref<Shape2D> &p_shape) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].shapes.resize(1);
	tile_map[p_id].shapes[0]=p_shape;
	emit_changed();

}

Ref<Shape2D> TileSet::tile_get_shape(int p_id) const {

	ERR_FAIL_COND_V(!tile_map.has(p_id),Ref<Shape2D>());
	if (tile_map[p_id].shapes.size()>0)
		return tile_map[p_id].shapes[0];

	return Ref<Shape2D>();

}

void TileSet::tile_set_light_occluder(int p_id,const Ref<OccluderPolygon2D> &p_light_occluder) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].occluder=p_light_occluder;

}

Ref<OccluderPolygon2D> TileSet::tile_get_light_occluder(int p_id) const{

	ERR_FAIL_COND_V(!tile_map.has(p_id),Ref<OccluderPolygon2D>());
	return tile_map[p_id].occluder;

}

void TileSet::tile_set_navigation_polygon_offset(int p_id,const Vector2& p_offset) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].navigation_polygon_offset=p_offset;

}

Vector2 TileSet::tile_get_navigation_polygon_offset(int p_id) const{
	ERR_FAIL_COND_V(!tile_map.has(p_id),Vector2());
	return tile_map[p_id].navigation_polygon_offset;
}

void TileSet::tile_set_navigation_polygon(int p_id,const Ref<NavigationPolygon> &p_navigation_polygon) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].navigation_polygon=p_navigation_polygon;

}

Ref<NavigationPolygon> TileSet::tile_get_navigation_polygon(int p_id) const {

	ERR_FAIL_COND_V(!tile_map.has(p_id),Ref<NavigationPolygon>());
	return tile_map[p_id].navigation_polygon;

}

void TileSet::tile_set_occluder_offset(int p_id,const Vector2& p_offset) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].occluder_offset=p_offset;

}

Vector2 TileSet::tile_get_occluder_offset(int p_id) const{
	ERR_FAIL_COND_V(!tile_map.has(p_id),Vector2());
	return tile_map[p_id].occluder_offset;
}

void TileSet::tile_set_shapes(int p_id,const Vector<Ref<Shape2D> > &p_shapes) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map[p_id].shapes=p_shapes;
	emit_changed();

}

Vector<Ref<Shape2D> > TileSet::tile_get_shapes(int p_id) const {

	ERR_FAIL_COND_V(!tile_map.has(p_id),Vector<Ref<Shape2D> >());
	return tile_map[p_id].shapes;
}

void TileSet::_tile_set_shapes(int p_id,const Array& p_shapes) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	Vector<Ref<Shape2D> > shapes;
	for(int i=0;i<p_shapes.size();i++) {

		Ref<Shape2D> s = p_shapes[i];
		if (s.is_valid())
			shapes.push_back(s);
	}

	tile_set_shapes(p_id,shapes);
}

Array TileSet::_tile_get_shapes(int p_id) const{

	ERR_FAIL_COND_V(!tile_map.has(p_id),Array());
	Array arr;

	Vector<Ref<Shape2D> >shp = tile_map[p_id].shapes;
	for(int i=0;i<shp.size();i++)
		arr.push_back(shp[i]);

	return arr;
}

Array TileSet::_get_tiles_ids() const{
	
	Array arr;

	for (Map<int, Data>::Element *E = tile_map.front(); E; E = E->next()) {
		arr.push_back(E->key());		
	}
	
	return arr;
}

void TileSet::get_tile_list(List<int> *p_tiles) const {

	for(Map<int,Data>::Element *E=tile_map.front();E;E=E->next()) {

		p_tiles->push_back(E->key());
	}

}

bool TileSet::has_tile(int p_id) const {

	return tile_map.has(p_id);
}

void TileSet::remove_tile(int p_id) {

	ERR_FAIL_COND(!tile_map.has(p_id));
	tile_map.erase(p_id);
	_change_notify("");
	emit_changed();
}

int TileSet::get_last_unused_tile_id() const {


	if (tile_map.size())
		return tile_map.back()->key()+1;
	else
		return 0;

}

int TileSet::find_tile_by_name(const String& p_name) const {


	for(Map<int,Data>::Element *E=tile_map.front();E;E=E->next()) {

		if (p_name==E->get().name)
			return E->key();
	}
	return -1;
}

void TileSet::clear() {

	tile_map.clear();
	_change_notify("");
	emit_changed();
}

void TileSet::_bind_methods() {


	ObjectTypeDB::bind_method(_MD("create_tile","id"),&TileSet::create_tile);
	ObjectTypeDB::bind_method(_MD("tile_set_name","id","name"),&TileSet::tile_set_name);
	ObjectTypeDB::bind_method(_MD("tile_get_name","id"),&TileSet::tile_get_name);
	ObjectTypeDB::bind_method(_MD("tile_set_texture","id","texture:Texture"),&TileSet::tile_set_texture);
	ObjectTypeDB::bind_method(_MD("tile_get_texture:Texture","id"),&TileSet::tile_get_texture);
	ObjectTypeDB::bind_method(_MD("tile_set_material","id","material:CanvasItemMaterial"),&TileSet::tile_set_material);
	ObjectTypeDB::bind_method(_MD("tile_get_material:CanvasItemMaterial","id"),&TileSet::tile_get_material);
	ObjectTypeDB::bind_method(_MD("tile_set_texture_offset","id","texture_offset"),&TileSet::tile_set_texture_offset);
	ObjectTypeDB::bind_method(_MD("tile_get_texture_offset","id"),&TileSet::tile_get_texture_offset);
	ObjectTypeDB::bind_method(_MD("tile_set_shape_offset","id","shape_offset"),&TileSet::tile_set_shape_offset);
	ObjectTypeDB::bind_method(_MD("tile_get_shape_offset","id"),&TileSet::tile_get_shape_offset);
	ObjectTypeDB::bind_method(_MD("tile_set_region","id","region"),&TileSet::tile_set_region);
	ObjectTypeDB::bind_method(_MD("tile_get_region","id"),&TileSet::tile_get_region);
	ObjectTypeDB::bind_method(_MD("tile_set_shape","id","shape:Shape2D"),&TileSet::tile_set_shape);
	ObjectTypeDB::bind_method(_MD("tile_get_shape:Shape2D","id"),&TileSet::tile_get_shape);
	ObjectTypeDB::bind_method(_MD("tile_set_shapes","id","shapes"),&TileSet::_tile_set_shapes);
	ObjectTypeDB::bind_method(_MD("tile_get_shapes","id"),&TileSet::_tile_get_shapes);
	ObjectTypeDB::bind_method(_MD("tile_set_navigation_polygon","id","navigation_polygon:NavigationPolygon"),&TileSet::tile_set_navigation_polygon);
	ObjectTypeDB::bind_method(_MD("tile_get_navigation_polygon:NavigationPolygon","id"),&TileSet::tile_get_navigation_polygon);
	ObjectTypeDB::bind_method(_MD("tile_set_navigation_polygon_offset","id","navigation_polygon_offset"),&TileSet::tile_set_navigation_polygon_offset);
	ObjectTypeDB::bind_method(_MD("tile_get_navigation_polygon_offset","id"),&TileSet::tile_get_navigation_polygon_offset);
	ObjectTypeDB::bind_method(_MD("tile_set_light_occluder","id","light_occluder:OccluderPolygon2D"),&TileSet::tile_set_light_occluder);
	ObjectTypeDB::bind_method(_MD("tile_get_light_occluder:OccluderPolygon2D","id"),&TileSet::tile_get_light_occluder);
	ObjectTypeDB::bind_method(_MD("tile_set_occluder_offset","id","occluder_offset"),&TileSet::tile_set_occluder_offset);
	ObjectTypeDB::bind_method(_MD("tile_get_occluder_offset","id"),&TileSet::tile_get_occluder_offset);

	ObjectTypeDB::bind_method(_MD("remove_tile","id"),&TileSet::remove_tile);
	ObjectTypeDB::bind_method(_MD("clear"),&TileSet::clear);
	ObjectTypeDB::bind_method(_MD("get_last_unused_tile_id"),&TileSet::get_last_unused_tile_id);
	ObjectTypeDB::bind_method(_MD("find_tile_by_name","name"),&TileSet::find_tile_by_name);
	ObjectTypeDB::bind_method(_MD("get_tiles_ids", "name"), &TileSet::_get_tiles_ids);

}


TileSet::TileSet() {

}