/*************************************************************************/
/*  polygon_base.cpp                                                     */
/*************************************************************************/
/*                         This file is part of:                         */
/*                          PANDEMONIUM ENGINE                           */
/*             https://github.com/Relintai/pandemonium_engine            */
/*************************************************************************/
/* Copyright (c) 2022-present Péter Magyar.                              */
/* Copyright (c) 2014-2022 Godot Engine contributors (cf. AUTHORS.md).   */
/* Copyright (c) 2007-2022 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 "polygon_base.h"

#include "core/math/geometry.h"

void PolygonBase::clear() {
	points.resize(0);
	_polygon_changed();
}

void PolygonBase::add_point(const float x, const float y, const bool closed) {
	Vector2 p = Vector2(x, y);
	int points_count = points.size();

	if (points_count < 3) {
		points.append(p);
		_polygon_changed();
		return;
	}

	Vector2 segs[2];
	segs[0] = points[0];
	segs[1] = points[points_count - 1];

	float min_length = (p - Geometry::get_closest_point_to_segment_2d(p, segs)).length();
	int insert_point = 0;

	for (int i = 0; i < points_count - 1; ++i) {
		segs[0] = points[i];
		segs[1] = points[i + 1];

		float length = (p - Geometry::get_closest_point_to_segment_2d(p, segs)).length();

		if (length < min_length) {
			min_length = length;
			insert_point = i + 1;
		}
	}

	if (!closed && insert_point == 0 && (points[0] - p).length() > (points[points_count - 1] - p).length()) {
		insert_point = points_count;
	}

	points.insert(insert_point, p);
	_polygon_changed();
}

bool PolygonBase::remove_point(const int index) {
	int s = points.size();

	if (s < 4 || index < 0 || index >= s) {
		return false;
	} else {
		points.remove(index);
		_polygon_changed();
	}

	return true;
}

int PolygonBase::get_point_count() {
	return points.size();
}

Vector2 PolygonBase::get_point(const int i) {
	return points[i];
}

void PolygonBase::set_point(const int i, const Vector2 &v) {
	points[i] = v;
	_polygon_changed();
}

PoolVector2Array PolygonBase::get_points() {
	return points;
}

void PolygonBase::set_points(const PoolVector2Array &v) {
	points = v;
	_polygon_changed();
}

void PolygonBase::polygon_changed() {
	_polygon_changed();
}

void PolygonBase::_polygon_changed() {
	emit_changed();
}

String PolygonBase::_to_string() {
	String rv;

	PoolVector2Array ps = get_points();

	for (int i = 0; i < ps.size(); ++i) {
		Vector2 p = ps[i];

		rv += "(" + String::num(p.x) + "," + String::num(p.y) + ")" + ",";
	}

	return rv;
}

PolygonBase::PolygonBase() {
	points.push_back(Vector2(0.2, 0.2));
	points.push_back(Vector2(0.7, 0.4));
	points.push_back(Vector2(0.4, 0.7));
}

PolygonBase::~PolygonBase() {
}

void PolygonBase::_bind_methods() {
	ClassDB::bind_method(D_METHOD("get_points"), &PolygonBase::get_points);
	ClassDB::bind_method(D_METHOD("set_points", "value"), &PolygonBase::set_points);
	ADD_PROPERTY(PropertyInfo(Variant::POOL_VECTOR2_ARRAY, "points"), "set_points", "get_points");

	ClassDB::bind_method(D_METHOD("clear"), &PolygonBase::clear);
	ClassDB::bind_method(D_METHOD("add_point", "x", "y", "closed"), &PolygonBase::add_point, true);
	ClassDB::bind_method(D_METHOD("remove_point", "index"), &PolygonBase::remove_point);
	ClassDB::bind_method(D_METHOD("get_point_count"), &PolygonBase::get_point_count);

	ClassDB::bind_method(D_METHOD("get_point", "i"), &PolygonBase::get_point);
	ClassDB::bind_method(D_METHOD("set_point", "i", "v"), &PolygonBase::set_point);

	BIND_VMETHOD(MethodInfo("_polygon_changed"));
	ClassDB::bind_method(D_METHOD("polygon_changed"), &PolygonBase::polygon_changed);
	ClassDB::bind_method(D_METHOD("_polygon_changed"), &PolygonBase::_polygon_changed);

	ClassDB::bind_method(D_METHOD("_to_string"), &PolygonBase::_to_string);
}