/* 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 "tetraedge/game/bonus_menu.h"

#include "common/textconsole.h"
#include "tetraedge/tetraedge.h"
#include "tetraedge/game/application.h"
#include "tetraedge/game/syberia_game.h"
#include "tetraedge/te/te_core.h"
#include "tetraedge/te/te_input_mgr.h"

namespace Tetraedge {

BonusMenu::BonusMenu() : _pageNo(0) {
}

void BonusMenu::enter(const Common::Path &scriptName) {
	bool loaded = load(scriptName);
	if (!loaded)
		error("BonusMenu::enter: failed to load %s", scriptName.toString(Common::Path::kNativeSeparator).c_str());
	Application *app = g_engine->getApplication();
	app->frontLayout().addChild(layoutChecked("menu"));
	SyberiaGame *game = dynamic_cast<SyberiaGame *>(g_engine->getGame());
	assert(game);

	buttonLayoutChecked("quitButton")->onMouseClickValidated().add(this, &BonusMenu::onQuitButton);

	int btnNo = 0;
	while (true) {
		const Common::String btnNoStr = Common::String::format("%d", btnNo);
		TeButtonLayout *btn = buttonLayout(btnNoStr);
		if (!btn)
			break;
		SaveButton *saveBtn = new SaveButton(btn, btnNoStr, this);
		_saveButtons.push_back(saveBtn);

		TeVector3f32 mainWinSz = g_engine->getApplication()->getMainWindow().size();
		if (g_engine->getCore()->fileFlagSystemFlag("definition") == "SD")
			mainWinSz = mainWinSz / 3.0f;
		else
			mainWinSz = mainWinSz / 4.0f;
		mainWinSz.z() = 1.0f;
		saveBtn->setSize(mainWinSz);
		for (Te3DObject2 *child : saveBtn->childList()) {
			child->setSize(mainWinSz);
		}

		if (btn->childCount() <= 4)
			error("expected save button to have >4 children");
		const Common::String artName = btn->child(4)->name();
		btn->setEnable(game->isArtworkUnlocked(artName));

		btnNo++;
	}

	btnNo = 0;
	while( true ) {
		const Common::String btnNoStr = Common::String::format("slot%d", btnNo);
		TeLayout *l = layout(btnNoStr);
		if (!l)
			break;

		if (btnNo < (int)_saveButtons.size()) {
			l->addChild(_saveButtons[btnNo]);
		}
		btnNo = btnNo + 1;
	}

	TeButtonLayout *slideBtn = buttonLayoutChecked("slideButton");
	slideBtn->onButtonChangedToStateDownSignal().add(this, &BonusMenu::onSlideButtonDown);

	TeInputMgr *inputmgr = g_engine->getInputMgr();
	inputmgr->_mouseMoveSignal.add(this, &BonusMenu::onMouseMove);

	_pageNo = 0;

	TeButtonLayout *leftBtn = buttonLayout("leftButton");
	if (leftBtn)
		leftBtn->onMouseClickValidated().add(this, &BonusMenu::onLeftButton);

	TeButtonLayout *rightBtn = buttonLayout("rightButton");
	if (rightBtn)
		rightBtn->onMouseClickValidated().add(this, &BonusMenu::onRightButton);

	// TODO: more stuff here with "text" values
	warning("TODO: Finish BonusMenu::enter(%s)", scriptName.toString(Common::Path::kNativeSeparator).c_str());

	TeButtonLayout *pictureBtn = buttonLayout("fullScreenPictureButton");
	if (pictureBtn) {
		pictureBtn->onMouseClickValidated().add(this, &BonusMenu::onPictureButton);
	}
}

void BonusMenu::enter() {
	error("TODO: implement BonusMenu::enter()");
}

void BonusMenu::leave() {
	for (auto *s : _saveButtons) {
		delete s;
	}
	_saveButtons.clear();
	TeInputMgr *inputmgr = g_engine->getInputMgr();
	inputmgr->_mouseMoveSignal.remove(this, &BonusMenu::onMouseMove);
	TeLuaGUI::unload();
}

bool BonusMenu::onLeftButton() {
	TeCurveAnim2<TeLayout, TeVector3f32> *slideAnim = layoutPositionLinearAnimation("slideAnimation");

	if (!slideAnim->_runTimer.running() && _pageNo != 0) {
		TeLayout *slotsLayout = layout("slots");
		TeVector3f32 slotsPos = slotsLayout->userPosition();
		slideAnim->_startVal = slotsPos;
		slotsPos.x() += value("slideTranslation").toFloat64();
		slideAnim->_endVal = slotsPos;

		slideAnim->_callbackObj = layoutChecked("slots");
		slideAnim->_callbackMethod = &TeLayout::setPosition;
		slideAnim->play();

		_pageNo--;

		buttonLayoutChecked("slideButton")->reset();

		warning("TODO: Finish BonusMenu::onLeftButton");
		// TODO: Set values depending on whether saves exist (lines 95-120)
	}

	return false;
}

bool BonusMenu::onMouseMove(const Common::Point &pt) {
	TeButtonLayout *slideLayout = buttonLayoutChecked("slideButton");
	if (slideLayout->state() == TeButtonLayout::BUTTON_STATE_DOWN) {
		TeCurveAnim2<TeLayout, TeVector3f32> *slideAnim = layoutPositionLinearAnimation("slideAnimation");
		if (!slideAnim->_runTimer.running()) {
			const Common::Point mousePos = g_engine->getInputMgr()->lastMousePos();
			const TeVector3f32 slotsSize = layoutChecked("slots")->size();

			float slideAmount = (mousePos.x - _slideBtnStartMousePos._x) / slotsSize.x();
			if (slideAmount <= -0.1) {
				onRightButton();
				buttonLayoutChecked("slideButton")->setClickPassThrough(false);
			} else if (slideAmount > 0.1){
				onLeftButton();
				buttonLayoutChecked("slideButton")->setClickPassThrough(false);
			}
		}
	}

	return false;
}

bool BonusMenu::onPictureButton() {
	TeButtonLayout *btn = buttonLayoutChecked("menu");
	btn->setVisible(true);

	Application *app = g_engine->getApplication();
	TeSpriteLayout *pictureLayout = spriteLayoutChecked("fullScreenPictureLayout");
	app->frontLayout().removeChild(pictureLayout);
	pictureLayout->setVisible(true);

	return true;
}

bool BonusMenu::onQuitButton() {
	Application *app = g_engine->getApplication();
	assert(app);

	app->captureFade();
	leave();
	app->globalBonusMenu().enter();
	app->fade();
	return true;
}

bool BonusMenu::onRightButton() {
	TeCurveAnim2<TeLayout, TeVector3f32> *slideAnim = layoutPositionLinearAnimation("slideAnimation");

	if (!slideAnim->_runTimer.running() && _pageNo < (int)_saveButtons.size() - 1) {
		TeLayout *slotsLayout = layout("slots");
		TeVector3f32 slotsPos = slotsLayout->userPosition();
		slideAnim->_startVal = slotsPos;
		slotsPos.x() -= value("slideTranslation").toFloat64();
		slideAnim->_endVal = slotsPos;

		slideAnim->_callbackObj = layoutChecked("slots");
		slideAnim->_callbackMethod = &TeLayout::setPosition;
		slideAnim->play();

		_pageNo++;

		buttonLayoutChecked("slideButton")->reset();

		// TODO: Set values depending on whether saves exist (lines 95-120)
		warning("TODO: Finish BonusMenu::onRightButton");
	}
	return false;
}

bool BonusMenu::onSlideButtonDown() {
	TeInputMgr *inputmgr = g_engine->getInputMgr();
	TeVector2s32 mousepos = inputmgr->lastMousePos();
	_slideBtnStartMousePos = mousepos;
	buttonLayoutChecked("slideButton")->setClickPassThrough(true);
	return false;
}

BonusMenu::SaveButton::SaveButton(TeButtonLayout *btn, const Common::String &name, BonusMenu *owner) : _menu(owner) {
	setName(name);
	btn->setEnable(true);
	addChild(btn);
	btn->onMouseClickValidated().add(this, &BonusMenu::SaveButton::onLoadSave);
}

Common::String BonusMenu::SaveButton::path() const {
	return Common::String("Backup/") + name() + ".xml";
}

bool BonusMenu::SaveButton::onLoadSave() {
	_menu->buttonLayoutChecked("menu")->setVisible(false);
	TeSpriteLayout *pic = _menu->spriteLayoutChecked("fullScreenPicture");
	const Common::Path picName(child(0)->child(4)->name());
	pic->load(picName);

	TeSpriteLayout *picLayout = _menu->spriteLayoutChecked("fullScreenPictureLayout");
	g_engine->getApplication()->frontLayout().addChild(picLayout);
	picLayout->setVisible(true);

	return false;
}

} // end namespace Tetraedge