/* ScummVM - Graphic Adventure Engine
 *
 * ScummVM is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * 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 3 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, see <http://www.gnu.org/licenses/>.
 *
 */

#include "alcachofa/objects.h"
#include "alcachofa/rooms.h"
#include "alcachofa/scheduler.h"
#include "alcachofa/global-ui.h"
#include "alcachofa/alcachofa.h"

#include "common/system.h"

using namespace Common;
using namespace Math;

namespace Alcachofa {

const char *ObjectBase::typeName() const { return "ObjectBase"; }

ObjectBase::ObjectBase(Room *room, const char *name)
	: _room(room)
	, _name(name)
	, _isEnabled(false) {
	assert(room != nullptr);
}

ObjectBase::ObjectBase(Room *room, ReadStream &stream)
	: _room(room) {
	assert(room != nullptr);
	_name = readVarString(stream);
	_isEnabled = readBool(stream);
}

void ObjectBase::toggle(bool isEnabled) {
	_isEnabled = isEnabled;
}

void ObjectBase::draw() {}

void ObjectBase::drawDebug() {}

void ObjectBase::update() {}

void ObjectBase::loadResources() {}

void ObjectBase::freeResources() {}

void ObjectBase::syncGame(Serializer &serializer) {
	serializer.syncAsByte(_isEnabled);
}

Graphic *ObjectBase::graphic() {
	return nullptr;
}

Shape *ObjectBase::shape() {
	return nullptr;
}

const char *PointObject::typeName() const { return "PointObject"; }

PointObject::PointObject(Room *room, ReadStream &stream)
	: ObjectBase(room, stream) {
	_pos = Shape(stream).firstPoint();
}

const char *GraphicObject::typeName() const { return "GraphicObject"; }

GraphicObject::GraphicObject(Room *room, ReadStream &stream)
	: ObjectBase(room, stream)
	, _graphic(stream)
	, _type((GraphicObjectType)stream.readSint32LE())
	, _posterizeAlpha(100 - stream.readSint32LE()) {
	_graphic.start(true);
}

GraphicObject::GraphicObject(Room *room, const char *name)
	: ObjectBase(room, name)
	, _type(GraphicObjectType::Normal)
	, _posterizeAlpha(0) {}

void GraphicObject::draw() {
	if (!isEnabled() || !_graphic.hasAnimation())
		return;
	const BlendMode blendMode = _type == GraphicObjectType::Effect
		? BlendMode::Additive
		: BlendMode::AdditiveAlpha;
	const bool is3D = room() != &g_engine->world().inventory();
	_graphic.update();
	g_engine->drawQueue().add<AnimationDrawRequest>(_graphic, is3D, blendMode);
}

void GraphicObject::drawDebug() {
	auto *renderer = dynamic_cast<IDebugRenderer *>(&g_engine->renderer());
	if (!isEnabled() || !_graphic.hasAnimation() || !g_engine->console().showGraphics() || renderer == nullptr)
		return;

	const bool is3D = room() != &g_engine->world().inventory();
	Vector2d topLeft(as2D(_graphic.topLeft()));
	float scale = _graphic.scale() * _graphic.depthScale() * kInvBaseScale;
	Vector2d size;
	if (is3D) {
		Vector3d topLeftTmp = as3D(topLeft);
		topLeftTmp.z() = _graphic.scale();
		_graphic.animation().outputRect3D(_graphic.frameI(), scale, topLeftTmp, size);
		topLeft = as2D(topLeftTmp);
	} else
		_graphic.animation().outputRect2D(_graphic.frameI(), scale, topLeft, size);

	Vector2d points[] = {
		topLeft,
		topLeft + Vector2d(size.getX(), 0.0f),
		topLeft + Vector2d(size.getX(), size.getY()),
		topLeft + Vector2d(0.0f, size.getY()),
		topLeft
	};
	renderer->debugPolyline({ points, 5 }, kDebugGreen);
}

void GraphicObject::loadResources() {
	_graphic.loadResources();
}

void GraphicObject::freeResources() {
	_graphic.freeResources();
}

void GraphicObject::syncGame(Serializer &serializer) {
	ObjectBase::syncGame(serializer);
	_graphic.syncGame(serializer);
}

Graphic *GraphicObject::graphic() {
	return &_graphic;
}

struct AnimateTask final : public Task {
	AnimateTask(Process &process, GraphicObject *object)
		: Task(process)
		, _object(object) {
		assert(_object != nullptr);
		_graphic = object->graphic();
		scumm_assert(_graphic != nullptr);
		_duration = _graphic->animation().totalDuration();
	}

	AnimateTask(Process &process, Serializer &s)
		: Task(process) {
		AnimateTask::syncGame(s);
	}

	TaskReturn run() override {
		TASK_BEGIN;
		_object->toggle(true);
		_graphic->start(false);
		TASK_WAIT(1, delay(_duration));
		_object->toggle(false); //-V779
		TASK_END;
	}

	void debugPrint() override {
		g_engine->getDebugger()->debugPrintf("Animate \"%s\" for %ums", _object->name().c_str(), _duration);
	}

	void syncGame(Serializer &s) override {
		Task::syncGame(s);
		s.syncAsUint32LE(_duration);
		syncObjectAsString(s, _object);
		_graphic = _object->graphic();
		scumm_assert(_graphic != nullptr);

	}

	const char *taskName() const override;

private:
	GraphicObject *_object = nullptr;
	Graphic *_graphic = nullptr;
	uint32 _duration = 0;
};
DECLARE_TASK(AnimateTask)

Task *GraphicObject::animate(Process &process) {
	return new AnimateTask(process, this);
}

const char *SpecialEffectObject::typeName() const { return "SpecialEffectObject"; }

SpecialEffectObject::SpecialEffectObject(Room *room, ReadStream &stream)
	: GraphicObject(room, stream) {
	_topLeft = Shape(stream).firstPoint();
	_bottomRight = Shape(stream).firstPoint();
	_texShift.setX(stream.readSint32LE());
	_texShift.setY(stream.readSint32LE());
	_texShift *= kShiftSpeed;
}

void SpecialEffectObject::draw() {
	if (!isEnabled() || !g_engine->config().highQuality())
		return;
	const auto texOffset = g_engine->getMillis() * 0.001f * _texShift;
	const BlendMode blendMode = _type == GraphicObjectType::Effect
		? BlendMode::Additive
		: BlendMode::AdditiveAlpha;
	Point topLeft = _topLeft, bottomRight = _bottomRight;
	if (topLeft.x == bottomRight.x || topLeft.y == bottomRight.y) {
		topLeft = _graphic.topLeft();
		bottomRight = topLeft + _graphic.animation().imageSize(0);
	}

	_graphic.update();
	g_engine->drawQueue().add<SpecialEffectDrawRequest>(_graphic, topLeft, bottomRight, texOffset, blendMode);
}

const char *ShapeObject::typeName() const { return "ShapeObject"; }

ShapeObject::ShapeObject(Room *room, ReadStream &stream)
	: ObjectBase(room, stream)
	, _shape(stream)
	, _cursorType((CursorType)stream.readSint32LE()) {}

void ShapeObject::update() {
	if (isEnabled())
		updateSelection();
	else {
		_isNewlySelected = false;
		_wasSelected = false;
	}
}

void ShapeObject::syncGame(Serializer &serializer) {
	ObjectBase::syncGame(serializer);
	serializer.syncAsSByte(_order);
	_isNewlySelected = false;
	_wasSelected = false;
}

Shape *ShapeObject::shape() {
	return &_shape;
}

CursorType ShapeObject::cursorType() const {
	return _cursorType;
}

void ShapeObject::onHoverStart() {
	onHoverUpdate();
}

void ShapeObject::onHoverEnd() {}

void ShapeObject::onHoverUpdate() {
	g_engine->drawQueue().add<TextDrawRequest>(
		g_engine->globalUI().generalFont(),
		g_engine->world().getLocalizedName(name()),
		g_engine->input().mousePos2D() - Point(0, 35),
		-1, true, kWhite, -kForegroundOrderCount);
}

void ShapeObject::onClick() {
	onHoverUpdate();
}

void ShapeObject::markSelected() {
	_isNewlySelected = true;
}

void ShapeObject::updateSelection() {
	if (_isNewlySelected) {
		_isNewlySelected = false;
		if (_wasSelected) {
			if (g_engine->input().wasAnyMouseReleased() && g_engine->player().selectedObject() == this)
				onClick();
			else
				onHoverUpdate();
		} else {
			_wasSelected = true;
			onHoverStart();
		}
	} else if (_wasSelected) {
		_wasSelected = false;
		onHoverEnd();
	}
}

const char *PhysicalObject::typeName() const { return "PhysicalObject"; }

PhysicalObject::PhysicalObject(Room *room, ReadStream &stream)
	: ShapeObject(room, stream) {
	_order = stream.readSByte();
}

}