// Cyphesis Online RPG Server and AI Engine
// Copyright (C) 2006 Alistair Riddoch
//
// This program 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.
// 
// This program 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 more 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 Street, Fifth Floor, Boston, MA 02110-1301 USA


#ifdef NDEBUG
#undef NDEBUG
#endif
#ifndef DEBUG
#define DEBUG
#endif

#include "../allOperations.h"
#include "../TestBase.h"

#include "rules/simulation/LocatedEntity.h"
#include "common/Property_impl.h"
#include "rules/PhysicalProperties_impl.h"
#include <Atlas/Objects/Anonymous.h>

#include <cassert>

using Atlas::Message::MapType;
using Atlas::Message::ListType;
using Atlas::Objects::smart_dynamic_cast;
using Atlas::Objects::Entity::Anonymous;
using Atlas::Objects::Entity::RootEntity;
using Atlas::Objects::Operation::Update;


template
class PositionProperty<LocatedEntity>;
template
class OrientationProperty<LocatedEntity>;

class testThing : public LocatedEntity {
public:
	testThing(RouterId id) :
			LocatedEntity(id) {}

	using LocatedEntity::updateProperties;
};

static const std::string testName("bob");
static const std::string testNewName("fred");

struct TestThing : LocatedEntity {
	TestThing(RouterId id)
			: LocatedEntity(id) {
	}

	void test_updateProperties(const Operation& op, OpVector& res) {
		updateProperties(op, res);
	}
};

class ThingupdatePropertiestest : public Cyphesis::TestBase {
protected:
	Ref<TestThing> m_thing;
	Property<std::string, LocatedEntity>* m_name;

public:
	ThingupdatePropertiestest();

	void setup();

	void teardown();

	void test_update();
};


ThingupdatePropertiestest::ThingupdatePropertiestest() {
	ADD_TEST(ThingupdatePropertiestest::test_update);
}

void ThingupdatePropertiestest::setup() {
	m_name = new Property<std::string, LocatedEntity>(prop_flag_unsent);
	m_name->data() = testName;

	m_thing = new TestThing(1);
	m_thing->flags().addFlags(entity_perceptive);
	m_thing->setProperty("name", std::unique_ptr<PropertyBase>(m_name));
}

void ThingupdatePropertiestest::teardown() {
	m_thing = nullptr;
}

void ThingupdatePropertiestest::test_update() {
	ASSERT_EQUAL(m_name->flags().m_flags & prop_flag_unsent, prop_flag_unsent);

	Update u;
	OpVector res;

	m_thing->test_updateProperties(u, res);

	// The flag marking the property has been cleared
	ASSERT_EQUAL(m_name->flags().m_flags & prop_flag_unsent, 0u);

	// The update operation should not have actually changed the name
	// at all
	ASSERT_EQUAL(m_name->data(), testName);

	// The result should be a Sight op
	ASSERT_EQUAL(res.size(), 1u);

	const Operation& result = res.front();

	ASSERT_EQUAL(result->getClassNo(), Atlas::Objects::Operation::SIGHT_NO);

	// The result argument should be a Set op
	ASSERT_EQUAL(result->getArgs().size(), 1u);

	const Operation& result_inner = smart_dynamic_cast<Operation>(result->getArgs().front());

	ASSERT_TRUE(result_inner.isValid());

	ASSERT_EQUAL(result_inner->getClassNo(), Atlas::Objects::Operation::SET_NO);
	ASSERT_EQUAL(result_inner->getArgs().size(), 1u);

	auto set_arg = smart_dynamic_cast<RootEntity>(result_inner->getArgs().front());

	// Make sure the name on the sight set argument has been set to the
	// name of the entity, not the name in the Update op.
	ASSERT_TRUE(!set_arg->isDefaultName());
	ASSERT_EQUAL(set_arg->getName(), testName);
}

int main() {
	ThingupdatePropertiestest t;

	return t.run();
}

// stubs

#include "rules/simulation/Domain.h"

#include "rules/simulation/BaseWorld.h"
#include "common/log.h"
#include "rules/Location_impl.h"



void LocatedEntity::makeContainer() {
	if (m_contains == 0) {
		m_contains.reset(new LocatedEntitySet);
	}
}


void LocatedEntity::changeContainer(const Ref<LocatedEntity>& new_loc) {
	assert(m_parent != nullptr);
	assert(m_parent->m_contains != nullptr);
	m_parent->m_contains->erase(this);
	if (m_parent->m_contains->empty()) {
		m_parent->onUpdated();
	}
	new_loc->makeContainer();
	bool was_empty = new_loc->m_contains->empty();
	new_loc->m_contains->insert(this);
	if (was_empty) {
		new_loc->onUpdated();
	}
	assert(m_parent->checkRef() > 0);
	auto oldLoc = m_parent;
	m_parent = new_loc.get();
	assert(m_parent->checkRef() > 0);

	onContainered(oldLoc);
}

void addToEntity(const Point3D& p, std::vector<double>& vd) {
	vd.resize(3);
	vd[0] = p[0];
	vd[1] = p[1];
	vd[2] = p[2];
}



template<typename FloatT>
int fromStdVector(Point3D& p, const std::vector<FloatT>& vf) {
	if (vf.size() != 3) {
		return -1;
	}
	p[0] = vf[0];
	p[1] = vf[1];
	p[2] = vf[2];
	p.setValid();
	return 0;
}

template<typename FloatT>
int fromStdVector(Vector3D& v, const std::vector<FloatT>& vf) {
	if (vf.size() != 3) {
		return -1;
	}
	v[0] = vf[0];
	v[1] = vf[1];
	v[2] = vf[2];
	v.setValid();
	return 0;
}

template int fromStdVector<double>(Point3D& p, const std::vector<double>& vf);

template int fromStdVector<double>(Vector3D& v, const std::vector<double>& vf);


WFMath::CoordType squareDistance(const Point3D& u, const Point3D& v) {
	return 1.0;
}
