/* 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 "mm/mm1/maps/map36.h"
#include "mm/mm1/maps/maps.h"
#include "mm/mm1/events.h"
#include "mm/mm1/globals.h"
#include "mm/mm1/sound.h"

namespace MM {
namespace MM1 {
namespace Maps {

static const byte MATCH_ITEMS[7] = {
	GARLIC_ID, WOLFSBANE_ID, BELLADONNA_ID, MEDUSA_HEAD_ID,
	WYVERN_EYE_ID, DRAGONS_TOOTH_ID, RING_OF_OKRIM_ID
};
static const byte MATCH_FLAGS[8] = {
	1, 2, 4, 8, 0x10, 0x20, 0x40, 0x80
};
static const uint16 QUEST_EXPERIENCE[7] = {
	1000, 2000, 3000, 4000, 6000, 8000, 10000
};

void Map36::special() {
	// Scan for special actions on the map cell
	for (uint i = 0; i < 15; ++i) {
		if (g_maps->_mapOffset == _data[51 + i]) {
			// Found a specially handled cell, but it
			// only triggers in designated direction(s)
			if (g_maps->_forwardMask & _data[66 + i]) {			
				(this->*SPECIAL_FN[i])();
			} else {
				checkPartyDead();
			}
			return;
		}
	}

	// All other cells on the map are encounters
	g_maps->clearSpecial();
	g_globals->_encounters.execute();
}

void Map36::special00() {
	g_events->addView("CloakedPrisoner");
}

void Map36::special01() {
	visitedExit();

	send(SoundMessage(
		STRING["maps.map36.exit"],
		[]() {
			g_maps->_mapPos = Common::Point(11, 2);
			g_maps->changeMap(0xa00, 2);
		}
	));
}

void Map36::special02() {
	visitedExit();

	g_maps->_mapPos = Common::Point(12, 2);
	g_maps->changeMap(0xa00, 2);
	send(SoundMessage(STRING["maps.map36.slide"]));
}

void Map36::special03() {
	send(SoundMessage(STRING["maps.map36.message"]));
}

void Map36::special04() {
	if (!g_globals->_party.hasItem(MERCHANTS_PASS_ID)) {
		g_maps->_mapPos.x--;
		updateGame();
		send(SoundMessage(STRING["maps.map36.begone"]));
	}
}

void Map36::special05() {
	updateFlags();
	send("View", DrawGraphicMessage(7 + 65));
	send("Hacker", GameMessage("DISPLAY"));
}

void Map36::special06() {
	visitedExit();

	g_maps->_mapPos = Common::Point(7, 4);
	g_maps->changeMap(0x705, 3);
	send(SoundMessage(STRING["maps.map36.pit"]));
}

void Map36::special07() {
	send(SoundMessage(STRING["maps.map36.vault"]));
	_data[MAP_47] = 7;
	_data[MAP_29] = 30;
	for (int i = 0; i < 3; ++i)
		Sound::sound(SOUND_2);
}

void Map36::special11() {
	g_globals->_treasure.setGems(30);
	special07();
}

void Map36::updateFlags() {
	for (uint i = 0; i < g_globals->_party.size(); ++i) {
		Character &c = g_globals->_party[i];
		int counte = c._equipped.size();
		int count = counte + c._backpack.size();
		for (int itemIdx = 0; itemIdx < count; ++itemIdx) {
			byte itemId = (itemIdx < counte) ?
				c._equipped[itemIdx]._id : c._backpack[itemIdx - counte]._id;

			// Scan list of items to match against
			for (int arrIdx = 0; arrIdx < 7; ++arrIdx) {
				if (itemId == MATCH_ITEMS[arrIdx]) {
					c._flags[6] |= MATCH_FLAGS[arrIdx];
					break;
				}
			}
		}
	}
}

void Map36::acceptQuest() {
	Character &leader = g_globals->_party[0];
	byte flags = leader._flags[9];

	// Find quest that hasn't been done yet
	int questNum;
	for (questNum = 15; flags && questNum < 22; ++questNum, flags >>= 1) {
		if (!(flags & 1))
			break;
	}
	if (questNum == 22) {
		for (uint i = 0; i < g_globals->_party.size(); ++i) {
			Character &c = g_globals->_party[i];
			c._flags[9] = CHARFLAG9_80;
			c._flags[6] = CHARFLAG6_80;
			c._backpack.empty();
		}

		send(SoundMessage(
			STRING["maps.map36.hacker7"],
			[](const Common::KeyState &) {
				g_maps->_mapPos = Common::Point(11, 15);
				g_maps->_currentMap->updateGame();
			}
		));

	} else {
		// Assign the quest to all party characters
		for (uint i = 0; i < g_globals->_party.size(); ++i) {
			Character &c = g_globals->_party[i];
			c._quest = questNum;
		}

		// Draw the scene
		g_maps->_mapPos.y++;
		redrawGame();
	}
}

Common::String Map36::checkQuestComplete() {
	Character &leader = g_globals->_party[0];
	int qIndex = leader._quest - 15;

	if (leader._flags[6] & MATCH_FLAGS[qIndex] & 0x7f) {
		// The quest was complete
		for (uint i = 0; i < g_globals->_party.size(); ++i) {
			Character &c = g_globals->_party[i];
			c._quest = 0;
			c._flags[9] |= MATCH_FLAGS[qIndex];
			c._exp += QUEST_EXPERIENCE[qIndex];
		}

		return Common::String::format(
			STRING["maps.map36.inspectron6"].c_str(),
			QUEST_EXPERIENCE[qIndex]);
	} else {
		// The quest isn't yet complete
		return STRING["maps.map36.hacker5"];
	}
}

void Map36::brewComplete() {
	// Nuke the entire party's backpack contents
	for (uint i = 0; i < g_globals->_party.size(); ++i) {
		Character &c = g_globals->_party[i];
		c._flags[9] = CHARFLAG9_80;
		c._flags[6] = CHARFLAG6_80;

		c._backpack.clear();
	}

	send(SoundMessage(STRING["maps.map36.hacker6"]));
	g_maps->_mapPos = Common::Point(12, 5);
	g_maps->_mapPos.x--;
	redrawGame();
}

} // namespace Maps
} // namespace MM1
} // namespace MM