/* 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 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.
 *
 */

#include "neverhood/module1700.h"

namespace Neverhood {

Module1700::Module1700(NeverhoodEngine *vm, Module *parentModule, int which)
	: Module(vm, parentModule), _soundResource(vm) {
	
	// TODO Music18hList_add(0x04212331);
	// TODO Sound1ChList_addSoundResources(0x04212331, dword_4AE930, true);
	// TODO Sound1ChList_setSoundValuesMulti(dword_4AE930, 1, 50, 600, 5, 150);
	// TODO Sound1ChList_sub_407C70(0x04212331, 0x41861371, 0x43A2507F, 0);

	if (which < 0) {
		createScene(_vm->gameState().sceneNum, -1);
	} else if (which == 0) {
		createScene(0, -1);
	} else if (which == 1) {
		createScene(4, 1);
	} else {
		createScene(4, 3);
	}

}

Module1700::~Module1700() {
	// TODO Sound1ChList_sub_407A50(0x04212331);
}

void Module1700::createScene(int sceneNum, int which) {
	debug("Module1700::createScene(%d, %d)", sceneNum, which);
	_vm->gameState().sceneNum = sceneNum;
	switch (_vm->gameState().sceneNum) {
	case 0:
		// TODO Sound1ChList_setSoundValuesMulti(dword_4AE930, 0, 0, 0, 0, 0);
		createSmackerScene(0x3028A005, true, true, false);
		break;
	case 1:
		createNavigationScene(0x004AE8B8, which);
		break;
	case 2:
		createNavigationScene(0x004AE8E8, which);
		break;
	case 3:
		// TODO Sound1ChList_setSoundValuesMulti(dword_4AE930, 0, 0, 0, 0, 0);
		createSmackerScene(0x01190041, true, true, false);
		break;
	case 4:
		// TODO Sound1ChList_setSoundValuesMulti(dword_4AE930, 0, 0, 0, 0, 0);
		// TODO Music18hList_play(0x31114225, 0, 2, 1);
		_childObject = new Scene1705(_vm, this, which);
		break;
	}
	SetUpdateHandler(&Module1700::updateScene);
	_childObject->handleUpdate();
}

void Module1700::updateScene() {
	if (!updateChild()) {
		switch (_vm->gameState().sceneNum) {
		case 0:
			// TODO Sound1ChList_setSoundValuesMulti(dword_4AE930, 1, 0, 0, 0);
			createScene(1, 0);
			break;
		case 1:
			if (_moduleResult == 0) {
				createScene(2, 0);
			} else if (_moduleResult == 1) {
				createScene(1, 1);
			}
			break;
		case 2:
			if (_moduleResult == 0) {
				createScene(3, -1);
			} else if (_moduleResult == 1) {
				createScene(1, 1);
			} else if (_moduleResult == 2) {
				if (!_soundResource.isPlaying()) {
					// TODO _soundResource.setVolume(60);
					_soundResource.play(0x58B45E58);
				}
				createScene(2, 2);
			}
			break;
		case 3:
			createScene(4, 0);
			break;
		case 4:
			leaveModule(1);
			break;
		}
	}
}
		
// Scene1705

static const uint32 kScene1705FileHashes[] = {
	0x910EA801,
	0x920EA801,
	0x940EA801,
	0x980EA801,
	0x800EA801,
	0xB00EA801,
	0xD00EA801,
	0x100EA801,
	0x900EA800,
	0xD10EA801,
	0x110EA801,
	0x910EA800
};

Class602::Class602(NeverhoodEngine *vm, uint32 fileHash, int index)
	: StaticSprite(vm, fileHash, 100) {
	
	_x = _spriteResource.getPosition().x + index * 30;
	_y = _spriteResource.getPosition().y + 160;
	StaticSprite::update();
}

Class606::Class606(NeverhoodEngine *vm, Scene *parentScene, int index, int surfacePriority, int16 x, int16 y, uint32 fileHash)
	: StaticSprite(vm, fileHash, surfacePriority, x - 24, y - 4), _parentScene(parentScene), _index(index) {

	if (!getSubVar(0x02038314, _index) && !getSubVar(0x02720344, _index)) {
		SetMessageHandler(&Class606::handleMessage);
	} else {
		setVisible(false);
		SetMessageHandler(NULL);
	}
	_deltaRect = _drawRect;
	_deltaRect.x -= 4;
	_deltaRect.y -= 8;
	_deltaRect.width += 8;
	_deltaRect.height += 16;
	Sprite::processDelta();
}

uint32 Class606::handleMessage(int messageNum, const MessageParam &param, Entity *sender) {
	uint32 messageResult = Sprite::handleMessage(messageNum, param, sender);
	switch (messageNum) {
	case 0x1011:
		sendMessage(_parentScene, 0x4826, 0);
		messageResult = 1;
		break;
	case 0x4806:
		setSubVar(0x02038314, _index, 1);
		setVisible(false);
		SetMessageHandler(NULL);
		break;		
	}
	return messageResult;
}

Scene1705::Scene1705(NeverhoodEngine *vm, Module *parentModule, int which)
	: Scene(vm, parentModule, true), _paletteArea(1) {

	Sprite *tempSprite;
	
	setGlobalVar(0xE7498218, 1);
	// TODO _vm->initVarsScene1705();

	SetMessageHandler(&Scene1705::handleMessage);
	SetUpdateHandler(&Scene1705::update);

	setHitRects(0x004B69D8);

	_surfaceFlag = true;

	setBackground(0x03118226);

	setPalette(0x03118226);
	_palette->addBasePalette(0x91D3A391, 0, 64, 0);
	_palette->copyBasePalette(0, 256, 0);
	addEntity(_palette);

	insertMouse433(0x18222039);

	insertSprite<Class602>(kScene1705FileHashes[getSubVar(0x0A4C0A9A, 0)], 0);
	insertSprite<Class602>(kScene1705FileHashes[getSubVar(0x0A4C0A9A, 1)], 1);
	insertSprite<Class602>(kScene1705FileHashes[getSubVar(0x0A4C0A9A, 2)], 2);

	_sprite = insertStaticSprite(0x31313A22, 1100);

	_class606 = insertSprite<Class606>(this, 15, 1100, 238, 439, 0x02363852);
	_vm->_collisionMan->addSprite(_class606);

	which = 4;

	if (which < 0) {
		insertKlayman<KmScene1705>(231, 434);
		setMessageList(0x004B69E8);
		sendMessage(this, 0x2000, 0);
		_klayman->setClipRect(0, 0, _sprite->getDrawRect().x2(), 480);
	} else if (which == 1) {
		insertKlayman<KmScene1705>(431, 434);
		sendMessage(_klayman, 0x2000, 1);
		setMessageList(0x004B6A08, false);
		sendMessage(this, 0x2000, 1);
		_klayman->setClipRect(0, 0, _sprite->getDrawRect().x2(), 480);
	} else if (which == 2) {
		insertKlayman<KmScene1705>(431, 434);
		sendMessage(_klayman, 0x2000, 1);
		setMessageList(0x004B6AA0, false);
		sendMessage(this, 0x2000, 1);
		_klayman->setClipRect(0, 0, _sprite->getDrawRect().x2(), 480);
	} else if (which == 3) {
		insertKlayman<KmScene1705>(431, 434);
		sendMessage(_klayman, 0x2000, 1);
		setMessageList(0x004B6A18, false);
		sendMessage(this, 0x2000, 1);
		_klayman->setClipRect(0, 0, _sprite->getDrawRect().x2(), 480);
	} else {
		insertKlayman<KmScene1705>(231, 74);
		sendMessage(_klayman, 0x2000, 0);
		setMessageList(0x004B69F0);
		sendMessage(this, 0x2000, 0);
		tempSprite = insertStaticSprite(0x30303822, 1100);
		_klayman->setClipRect(0, tempSprite->getDrawRect().y, _sprite->getDrawRect().x2(), 480);
	}

}

void Scene1705::update() {
	Scene::update();
	if (_klayman->getX() < 224 && _paletteArea != 0) {
		_palette->addBasePalette(0xF2210C15, 0, 64, 0);
		_palette->startFadeToPalette(12);
		_paletteArea = 0;
	} else if (_klayman->getX() >= 224 && _paletteArea == 0) {
		_palette->addBasePalette(0x91D3A391, 0, 64, 0);
		_palette->startFadeToPalette(12);
		_paletteArea = 1;
	}
}

uint32 Scene1705::handleMessage(int messageNum, const MessageParam &param, Entity *sender) {
	Scene::handleMessage(messageNum, param, sender);
	switch (messageNum) {
	case 0x2000:
		if (param.asInteger()) {
			setRectList(0x004B6B40);
			_klayman->setKlaymanTable3();
		} else {
			setRectList(0x004B6B30);
			_klayman->setKlaymanTable1();
		}
		break;
	case 0x4826:
		if (sender == _class606 && _klayman->getX() <= 318) {
			sendEntityMessage(_klayman, 0x1014, sender);
			setMessageList(0x004B6AC0);
		}
		break;		
	}
	return 0;
}

} // End of namespace Neverhood