/*
 * MapRenderer.cpp, part of VCMI engine
 *
 * Authors: listed in file AUTHORS in main folder
 *
 * License: GNU General Public License v2.0 or later
 * Full text of license available in license.txt file, in main folder
 *
 */

#include "StdInc.h"
#include "MapRenderer.h"

#include "IMapRendererContext.h"
#include "mapHandler.h"

#include "../CGameInfo.h"
#include "../gui/CGuiHandler.h"
#include "../render/CAnimation.h"
#include "../render/Canvas.h"
#include "../render/IImage.h"
#include "../render/IRenderHandler.h"
#include "../render/Colors.h"
#include "../render/Graphics.h"

#include "../../CCallback.h"

#include "../../lib/RiverHandler.h"
#include "../../lib/RoadHandler.h"
#include "../../lib/TerrainHandler.h"
#include "../../lib/mapObjects/CGHeroInstance.h"
#include "../../lib/mapObjects/MiscObjects.h"
#include "../../lib/mapObjects/ObjectTemplate.h"
#include "../../lib/mapping/CMapDefines.h"
#include "../../lib/pathfinder/CGPathNode.h"

struct NeighborTilesInfo
{
	//567
	//3 4
	//012
	std::bitset<8> d;

	NeighborTilesInfo(IMapRendererContext & context, const int3 & pos)
	{
		auto checkTile = [&](int dx, int dy)
		{
			return context.isVisible(pos + int3(dx, dy, 0));
		};

		// sides
		d[1] = checkTile(0, +1);
		d[3] = checkTile(-1, 0);
		d[4] = checkTile(+1, 0);
		d[6] = checkTile(0, -1);

		// corners - select visible image if either corner or adjacent sides are visible
		d[0] = d[1] || d[3] || checkTile(-1, +1);
		d[2] = d[1] || d[4] || checkTile(+1, +1);
		d[5] = d[3] || d[6] || checkTile(-1, -1);
		d[7] = d[4] || d[6] || checkTile(+1, -1);
	}

	bool areAllHidden() const
	{
		return d.none();
	}

	int getBitmapID() const
	{
		//NOTE: some images have unused in VCMI pair (same blockmap but a bit different look)
		// 0-1, 2-3, 4-5, 11-13, 12-14
		static const int visBitmaps[256] = {
			-1,  34,   4,   4,  22,  23,   4,   4,  36,  36,  38,  38,  47,  47,  38,  38, //16
			 3,  25,  12,  12,   3,  25,  12,  12,   9,   9,   6,   6,   9,   9,   6,   6, //32
			35,  39,  48,  48,  41,  43,  48,  48,  36,  36,  38,  38,  47,  47,  38,  38, //48
			26,  49,  28,  28,  26,  49,  28,  28,   9,   9,   6,   6,   9,   9,   6,   6, //64
			 0,  45,  29,  29,  24,  33,  29,  29,  37,  37,   7,   7,  50,  50,   7,   7, //80
			13,  27,  44,  44,  13,  27,  44,  44,   8,   8,  10,  10,   8,   8,  10,  10, //96
			 0,  45,  29,  29,  24,  33,  29,  29,  37,  37,   7,   7,  50,  50,   7,   7, //112
			13,  27,  44,  44,  13,  27,  44,  44,   8,   8,  10,  10,   8,   8,  10,  10, //128
			15,  17,  30,  30,  16,  19,  30,  30,  46,  46,  40,  40,  32,  32,  40,  40, //144
			 2,  25,  12,  12,   2,  25,  12,  12,   9,   9,   6,   6,   9,   9,   6,   6, //160
			18,  42,  31,  31,  20,  21,  31,  31,  46,  46,  40,  40,  32,  32,  40,  40, //176
			26,  49,  28,  28,  26,  49,  28,  28,   9,   9,   6,   6,   9,   9,   6,   6, //192
			 0,  45,  29,  29,  24,  33,  29,  29,  37,  37,   7,   7,  50,  50,   7,   7, //208
			13,  27,  44,  44,  13,  27,  44,  44,   8,   8,  10,  10,   8,   8,  10,  10, //224
			 0,  45,  29,  29,  24,  33,  29,  29,  37,  37,   7,   7,  50,  50,   7,   7, //240
			13,  27,  44,  44,  13,  27,  44,  44,   8,   8,  10,  10,   8,   8,  10,  10  //256
		};

		return visBitmaps[d.to_ulong()]; // >=0 -> partial hide, <0 - full hide
	}
};

MapTileStorage::MapTileStorage(size_t capacity)
	: animations(capacity)
{
}

void MapTileStorage::load(size_t index, const AnimationPath & filename, EImageBlitMode blitMode)
{
	auto & terrainAnimations = animations[index];

	for(auto & entry : terrainAnimations)
	{
		if (!filename.empty())
			entry = GH.renderHandler().loadAnimation(filename, blitMode);
	}

	if (terrainAnimations[1])
		terrainAnimations[1]->verticalFlip();

	if (terrainAnimations[3])
		terrainAnimations[3]->verticalFlip();

	if (terrainAnimations[2])
		terrainAnimations[2]->horizontalFlip();

	if (terrainAnimations[3])
		terrainAnimations[3]->horizontalFlip();
}

std::shared_ptr<IImage> MapTileStorage::find(size_t fileIndex, size_t rotationIndex, size_t imageIndex, size_t groupIndex)
{
	const auto & animation = animations[fileIndex][rotationIndex];
	if (animation)
		return animation->getImage(imageIndex, groupIndex);
	else
		return nullptr;
}

int MapTileStorage::groupCount(size_t fileIndex, size_t rotationIndex, size_t imageIndex)
{
	const auto & animation = animations[fileIndex][rotationIndex];
	if (animation)
		for(int i = 0;; i++)
			if(animation->size(i) <= imageIndex)
				return i;
	return 1;
}

MapRendererTerrain::MapRendererTerrain()
	: storage(VLC->terrainTypeHandler->objects.size())
{
	logGlobal->debug("Loading map terrains");
	for(const auto & terrain : VLC->terrainTypeHandler->objects)
		storage.load(terrain->getIndex(), AnimationPath::builtin(terrain->tilesFilename.getName() + (terrain->paletteAnimation.size() ? "_Shifted": "")), EImageBlitMode::OPAQUE);
	logGlobal->debug("Done loading map terrains");
}

void MapRendererTerrain::renderTile(IMapRendererContext & context, Canvas & target, const int3 & coordinates)
{
	const TerrainTile & mapTile = context.getMapTile(coordinates);

	int32_t terrainIndex = mapTile.getTerrainID();
	int32_t imageIndex = mapTile.terView;
	int32_t rotationIndex = mapTile.extTileFlags % 4;

	int groupCount = storage.groupCount(terrainIndex, rotationIndex, imageIndex);
	const auto & image = storage.find(terrainIndex, rotationIndex, imageIndex, groupCount > 1 ? context.terrainImageIndex(groupCount) : 0);

	assert(image);
	if (!image)
	{
		logGlobal->error("Failed to find image %d for terrain %s on tile %s", imageIndex, mapTile.getTerrain()->getNameTranslated(), coordinates.toString());
		return;
	}

	target.draw(image, Point(0, 0));
}

uint8_t MapRendererTerrain::checksum(IMapRendererContext & context, const int3 & coordinates)
{
	const TerrainTile & mapTile = context.getMapTile(coordinates);

	if(!mapTile.getTerrain()->paletteAnimation.empty())
		return context.terrainImageIndex(250);
	return 0xff - 1;
}

MapRendererRiver::MapRendererRiver()
	: storage(VLC->riverTypeHandler->objects.size())
{
	logGlobal->debug("Loading map rivers");
	for(const auto & river : VLC->riverTypeHandler->objects)
		storage.load(river->getIndex(), AnimationPath::builtin(river->tilesFilename.getName() + (river->paletteAnimation.size() ? "_Shifted": "")), EImageBlitMode::COLORKEY);
	logGlobal->debug("Done loading map rivers");
}

void MapRendererRiver::renderTile(IMapRendererContext & context, Canvas & target, const int3 & coordinates)
{
	const TerrainTile & mapTile = context.getMapTile(coordinates);

	if(!mapTile.hasRiver())
		return;

	int32_t terrainIndex = mapTile.getRiverID();
	int32_t imageIndex = mapTile.riverDir;
	int32_t rotationIndex = (mapTile.extTileFlags >> 2) % 4;

	int groupCount = storage.groupCount(terrainIndex, rotationIndex, imageIndex);
	const auto & image = storage.find(terrainIndex, rotationIndex, imageIndex, groupCount > 1 ? context.terrainImageIndex(groupCount) : 0);

	target.draw(image, Point(0, 0));
}

uint8_t MapRendererRiver::checksum(IMapRendererContext & context, const int3 & coordinates)
{
	const TerrainTile & mapTile = context.getMapTile(coordinates);

	if(!mapTile.getRiver()->paletteAnimation.empty())
		return context.terrainImageIndex(250);
	return 0xff-1;
}

MapRendererRoad::MapRendererRoad()
	: storage(VLC->roadTypeHandler->objects.size())
{
	logGlobal->debug("Loading map roads");
	for(const auto & road : VLC->roadTypeHandler->objects)
		storage.load(road->getIndex(), road->tilesFilename, EImageBlitMode::COLORKEY);
	logGlobal->debug("Done loading map roads");
}

void MapRendererRoad::renderTile(IMapRendererContext & context, Canvas & target, const int3 & coordinates)
{
	const int3 coordinatesAbove = coordinates - int3(0, 1, 0);

	if(context.isInMap(coordinatesAbove))
	{
		const TerrainTile & mapTileAbove = context.getMapTile(coordinatesAbove);
		if(mapTileAbove.hasRoad())
		{
			int32_t terrainIndex = mapTileAbove.getRoadID();
			int32_t imageIndex = mapTileAbove.roadDir;
			int32_t rotationIndex = (mapTileAbove.extTileFlags >> 4) % 4;

			const auto & image = storage.find(terrainIndex, rotationIndex, imageIndex);
			target.draw(image, Point(0, 0), Rect(0, 16, 32, 16));
		}
	}

	const TerrainTile & mapTile = context.getMapTile(coordinates);
	if(mapTile.hasRoad())
	{
		int32_t terrainIndex = mapTile.getRoadID();
		int32_t imageIndex = mapTile.roadDir;
		int32_t rotationIndex = (mapTile.extTileFlags >> 4) % 4;

		const auto & image = storage.find(terrainIndex, rotationIndex, imageIndex);
		target.draw(image, Point(0, 16), Rect(0, 0, 32, 16));
	}
}

uint8_t MapRendererRoad::checksum(IMapRendererContext & context, const int3 & coordinates)
{
	return 0;
}

MapRendererBorder::MapRendererBorder()
{
	animation = GH.renderHandler().loadAnimation(AnimationPath::builtin("EDG"), EImageBlitMode::OPAQUE);
}

size_t MapRendererBorder::getIndexForTile(IMapRendererContext & context, const int3 & tile)
{
	assert(!context.isInMap(tile));

	int3 size = context.getMapSize();

	if(tile.x < -1 || tile.x > size.x || tile.y < -1 || tile.y > size.y)
		return std::abs(tile.x) % 4 + 4 * (std::abs(tile.y) % 4);

	if(tile.x == -1 && tile.y == -1)
		return 16;

	if(tile.x == size.x && tile.y == -1)
		return 17;

	if(tile.x == size.x && tile.y == size.y)
		return 18;

	if(tile.x == -1 && tile.y == size.y)
		return 19;

	if(tile.y == -1)
		return 20 + (tile.x % 4);

	if(tile.x == size.x)
		return 24 + (tile.y % 4);

	if(tile.y == size.y)
		return 28 + (tile.x % 4);

	if(tile.x == -1)
		return 32 + (tile.y % 4);

	//else - visible area, no renderable border
	assert(0);
	return 0;
}

void MapRendererBorder::renderTile(IMapRendererContext & context, Canvas & target, const int3 & coordinates)
{
	if (context.showBorder())
	{
		const auto & image = animation->getImage(getIndexForTile(context, coordinates));
		target.draw(image, Point(0, 0));
	}
	else
	{
		target.drawColor(Rect(0,0,32,32), Colors::BLACK);
	}
}

uint8_t MapRendererBorder::checksum(IMapRendererContext & context, const int3 & coordinates)
{
	return 0;
}

MapRendererFow::MapRendererFow()
{
	fogOfWarFullHide = GH.renderHandler().loadAnimation(AnimationPath::builtin("TSHRC"), EImageBlitMode::OPAQUE);
	fogOfWarPartialHide = GH.renderHandler().loadAnimation(AnimationPath::builtin("TSHRE"), EImageBlitMode::SIMPLE);

	static const std::vector<int> rotations = {22, 15, 2, 13, 12, 16, 28, 17, 20, 19, 7, 24, 26, 25, 30, 32, 27};

	size_t size = fogOfWarPartialHide->size(0); //group size after next rotation

	for(const int rotation : rotations)
	{
		fogOfWarPartialHide->duplicateImage(0, rotation, 0);
		fogOfWarPartialHide->verticalFlip(size, 0);
		size++;
	}
}

void MapRendererFow::renderTile(IMapRendererContext & context, Canvas & target, const int3 & coordinates)
{
	assert(!context.isVisible(coordinates));

	const NeighborTilesInfo neighborInfo(context, coordinates);

	int retBitmapID = neighborInfo.getBitmapID(); // >=0 -> partial hide, <0 - full hide
	if(retBitmapID < 0)
	{
		// generate a number that is predefined for each tile,
		// but appears random to break visible pattern in large areas of fow
		// current approach (use primes as magic numbers for formula) looks to be suitable
		size_t pseudorandomNumber = ((coordinates.x * 997) ^ (coordinates.y * 1009)) / 101;
		size_t imageIndex = pseudorandomNumber % fogOfWarFullHide->size();

		if (context.showSpellRange(coordinates))
			target.drawColor(Rect(0,0,32,32), Colors::BLACK);
		else
			target.draw(fogOfWarFullHide->getImage(imageIndex), Point(0, 0));
	}
	else
	{
		target.draw(fogOfWarPartialHide->getImage(retBitmapID), Point(0, 0));
	}
}

uint8_t MapRendererFow::checksum(IMapRendererContext & context, const int3 & coordinates)
{
	if (context.showSpellRange(coordinates))
		return 0xff - 2;

	const NeighborTilesInfo neighborInfo(context, coordinates);
	int retBitmapID = neighborInfo.getBitmapID();
	if(retBitmapID < 0)
		return 0xff - 1;
	return retBitmapID;
}

std::shared_ptr<CAnimation> MapRendererObjects::getBaseAnimation(const CGObjectInstance* obj)
{
	const auto & info = obj->appearance;

	//the only(?) invisible object
	if(info->id == Obj::EVENT)
		return std::shared_ptr<CAnimation>();

	if(info->animationFile.empty())
	{
		logGlobal->warn("Def name for obj (%d,%d) is empty!", info->id, info->subid);
		return std::shared_ptr<CAnimation>();
	}

	bool generateMovementGroups = (info->id == Obj::BOAT) || (info->id == Obj::HERO);
	bool enableOverlay = obj->ID != Obj::BOAT && obj->ID != Obj::HERO && obj->getOwner() != PlayerColor::UNFLAGGABLE;

	// Boat appearance files only contain single, unanimated image
	// proper boat animations are actually in different file
	if (info->id == Obj::BOAT)
		if(auto boat = dynamic_cast<const CGBoat*>(obj); boat && !boat->actualAnimation.empty())
			return getAnimation(boat->actualAnimation, generateMovementGroups, enableOverlay);

	return getAnimation(info->animationFile, generateMovementGroups, enableOverlay);
}

std::shared_ptr<CAnimation> MapRendererObjects::getAnimation(const AnimationPath & filename, bool generateMovementGroups, bool enableOverlay)
{
	auto it = animations.find(filename);

	if(it != animations.end())
		return it->second;

	auto ret = GH.renderHandler().loadAnimation(filename, enableOverlay ? EImageBlitMode::WITH_SHADOW_AND_OVERLAY : EImageBlitMode::WITH_SHADOW);
	animations[filename] = ret;

	if(generateMovementGroups)
	{
		ret->createFlippedGroup(1, 13);
		ret->createFlippedGroup(2, 14);
		ret->createFlippedGroup(3, 15);

		ret->createFlippedGroup(6, 10);
		ret->createFlippedGroup(7, 11);
		ret->createFlippedGroup(8, 12);
	}
	return ret;
}

std::shared_ptr<CAnimation> MapRendererObjects::getFlagAnimation(const CGObjectInstance* obj)
{
	//TODO: relocate to config file?
	static const std::vector<std::string> heroFlags = {
		"AF00", "AF01", "AF02", "AF03", "AF04", "AF05", "AF06", "AF07"
	};

	if(obj->ID == Obj::HERO)
	{
		assert(dynamic_cast<const CGHeroInstance *>(obj) != nullptr);
		assert(obj->tempOwner.isValidPlayer());
		return getAnimation(AnimationPath::builtin(heroFlags[obj->tempOwner.getNum()]), true, false);
	}

	if(obj->ID == Obj::BOAT)
	{
		const auto * boat = dynamic_cast<const CGBoat *>(obj);
		if(boat && boat->hero && !boat->flagAnimations[boat->hero->tempOwner.getNum()].empty())
			return getAnimation(boat->flagAnimations[boat->hero->tempOwner.getNum()], true, false);
	}

	return nullptr;
}

std::shared_ptr<CAnimation> MapRendererObjects::getOverlayAnimation(const CGObjectInstance * obj)
{
	if(obj->ID == Obj::BOAT)
	{
		// Boats have additional animation with waves around boat
		const auto * boat = dynamic_cast<const CGBoat *>(obj);
		if(boat && boat->hero && !boat->overlayAnimation.empty())
			return getAnimation(boat->overlayAnimation, true, false);
	}
	return nullptr;
}

std::shared_ptr<IImage> MapRendererObjects::getImage(IMapRendererContext & context, const CGObjectInstance * obj, const std::shared_ptr<CAnimation>& animation) const
{
	if(!animation)
		return nullptr;

	size_t groupIndex = context.objectGroupIndex(obj->id);

	if(animation->size(groupIndex) == 0)
		return nullptr;

	size_t frameIndex = context.objectImageIndex(obj->id, animation->size(groupIndex));

	return animation->getImage(frameIndex, groupIndex);
}

void MapRendererObjects::renderImage(IMapRendererContext & context, Canvas & target, const int3 & coordinates, const CGObjectInstance * object, const std::shared_ptr<IImage>& image)
{
	if(!image)
		return;

	auto transparency = static_cast<uint8_t>(std::round(255 * context.objectTransparency(object->id, coordinates)));

	if (transparency == 0)
		return;

	image->setAlpha(transparency);
	if (object->ID != Obj::HERO) // heroes use separate image with flag instead of player-colored palette
	{
		if (object->getOwner().isValidPlayer())
			image->setOverlayColor(graphics->playerColors[object->getOwner().getNum()]);

		if (object->getOwner() == PlayerColor::NEUTRAL)
			image->setOverlayColor(graphics->neutralColor);
	}

	Point offsetPixels = context.objectImageOffset(object->id, coordinates);

	if ( offsetPixels.x < image->dimensions().x && offsetPixels.y < image->dimensions().y)
	{
		Point imagePos = image->dimensions() - offsetPixels - Point(32, 32);
		target.draw(image, Point(0, 0), Rect(imagePos, Point(32,32)));
	}
}

void MapRendererObjects::renderObject(IMapRendererContext & context, Canvas & target, const int3 & coordinates, const CGObjectInstance * instance)
{
	renderImage(context, target, coordinates, instance, getImage(context, instance, getBaseAnimation(instance)));
	renderImage(context, target, coordinates, instance, getImage(context, instance, getFlagAnimation(instance)));
	renderImage(context, target, coordinates, instance, getImage(context, instance, getOverlayAnimation(instance)));
}

void MapRendererObjects::renderTile(IMapRendererContext & context, Canvas & target, const int3 & coordinates)
{
	for(const auto & objectID : context.getObjects(coordinates))
	{
		const auto * objectInstance = context.getObject(objectID);

		assert(objectInstance);
		if(!objectInstance)
		{
			logGlobal->error("Stray map object that isn't fading");
			continue;
		}

		renderObject(context, target, coordinates, objectInstance);
	}
}

uint8_t MapRendererObjects::checksum(IMapRendererContext & context, const int3 & coordinates)
{
	for(const auto & objectID : context.getObjects(coordinates))
	{
		const auto * objectInstance = context.getObject(objectID);

		assert(objectInstance);
		if(!objectInstance)
		{
			logGlobal->error("Stray map object that isn't fading");
			continue;
		}

		size_t groupIndex = context.objectGroupIndex(objectInstance->id);
		Point offsetPixels = context.objectImageOffset(objectInstance->id, coordinates);

		auto base = getBaseAnimation(objectInstance);
		auto flag = getFlagAnimation(objectInstance);

		if (base && base->size(groupIndex) > 1)
		{
			auto imageIndex = context.objectImageIndex(objectID, base->size(groupIndex));
			auto image = base->getImage(imageIndex, groupIndex);
			if ( offsetPixels.x < image->dimensions().x && offsetPixels.y < image->dimensions().y)
				return context.objectImageIndex(objectID, 250);
		}

		if (flag && flag->size(groupIndex) > 1)
		{
			auto imageIndex = context.objectImageIndex(objectID, flag->size(groupIndex));
			auto image = flag->getImage(imageIndex, groupIndex);
			if ( offsetPixels.x < image->dimensions().x && offsetPixels.y < image->dimensions().y)
				return context.objectImageIndex(objectID, 250);
		}
	}
	return 0xff-1;
}

MapRendererOverlay::MapRendererOverlay()
	: imageGrid(GH.renderHandler().loadImage(ImagePath::builtin("debug/grid"), EImageBlitMode::COLORKEY))
	, imageBlocked(GH.renderHandler().loadImage(ImagePath::builtin("debug/blocked"), EImageBlitMode::COLORKEY))
	, imageVisitable(GH.renderHandler().loadImage(ImagePath::builtin("debug/visitable"), EImageBlitMode::COLORKEY))
	, imageSpellRange(GH.renderHandler().loadImage(ImagePath::builtin("debug/spellRange"), EImageBlitMode::COLORKEY))
{

}

void MapRendererOverlay::renderTile(IMapRendererContext & context, Canvas & target, const int3 & coordinates)
{
	if(context.showGrid())
		target.draw(imageGrid, Point(0,0));

	if(context.showVisitable() || context.showBlocked())
	{
		bool blocking = false;
		bool visitable = false;

		for(const auto & objectID : context.getObjects(coordinates))
		{
			const auto * object = context.getObject(objectID);

			if(context.objectTransparency(objectID, coordinates) > 0 && !context.isActiveHero(object))
			{
				visitable |= object->visitableAt(coordinates);
				blocking |= object->blockingAt(coordinates);
			}
		}

		if (context.showBlocked() && blocking)
			target.draw(imageBlocked, Point(0,0));
		if (context.showVisitable() && visitable)
			target.draw(imageVisitable, Point(0,0));
	}

	if (context.showSpellRange(coordinates))
		target.draw(imageSpellRange, Point(0,0));
}

uint8_t MapRendererOverlay::checksum(IMapRendererContext & context, const int3 & coordinates)
{
	uint8_t result = 0;

	if (context.showVisitable())
		result += 1;

	if (context.showBlocked())
		result += 2;

	if (context.showGrid())
		result += 4;

	if (context.showSpellRange(coordinates))
		result += 8;

	return result;
}

MapRendererPath::MapRendererPath()
	: pathNodes(GH.renderHandler().loadAnimation(AnimationPath::builtin("ADAG"), EImageBlitMode::SIMPLE))
{
}

size_t MapRendererPath::selectImageReachability(bool reachableToday, size_t imageIndex)
{
	const static size_t unreachableTodayOffset = 25;

	if(!reachableToday)
		return unreachableTodayOffset + imageIndex;

	return imageIndex;
}

size_t MapRendererPath::selectImageCross(bool reachableToday, const int3 & curr)
{
	return selectImageReachability(reachableToday, 0);
}

size_t MapRendererPath::selectImageArrow(bool reachableToday, const int3 & curr, const int3 & prev, const int3 & next)
{
	// Vector directions
	//  0   1   2
	//      |
	//  3 - 4 - 5
	//      |
	//  6   7   8
	//For example:
	//  |
	//  +->
	// is (directionToArrowIndex[7][5])
	//
	const static size_t directionToArrowIndex[9][9] = {
		{16, 17, 18, 7,  0, 19, 6,  5,  12},
		{8,  9,  18, 7,  0, 19, 6,  13, 20},
		{8,  1,  10, 7,  0, 19, 14, 21, 20},
		{24, 17, 18, 15, 0, 11, 6,  5,  4 },
		{0,  0,  0,  0,  0, 0,  0,  0,  0 },
		{8,  1,  2,  15, 0, 11, 22, 21, 20},
		{24, 17, 10, 23, 0, 3,  14, 5,  4 },
		{24, 9,  2,  23, 0, 3,  22, 13, 4 },
		{16, 1,  2,  23, 0, 3,  22, 21, 12}
	};

	size_t enterDirection = (curr.x - next.x + 1) + 3 * (curr.y - next.y + 1);
	size_t leaveDirection = (prev.x - curr.x + 1) + 3 * (prev.y - curr.y + 1);
	size_t imageIndex = directionToArrowIndex[enterDirection][leaveDirection];

	return selectImageReachability(reachableToday, imageIndex);
}

void MapRendererPath::renderTile(IMapRendererContext & context, Canvas & target, const int3 & coordinates)
{
	size_t imageID = selectImage(context, coordinates);

	if (imageID < pathNodes->size())
		target.draw(pathNodes->getImage(imageID), Point(0,0));
}

size_t MapRendererPath::selectImage(IMapRendererContext & context, const int3 & coordinates)
{
	const auto & functor = [&](const CGPathNode & node)
	{
		return node.coord == coordinates;
	};

	const auto * path = context.currentPath();
	if(!path)
		return std::numeric_limits<size_t>::max();

	const auto & iter = boost::range::find_if(path->nodes, functor);

	if(iter == path->nodes.end())
		return std::numeric_limits<size_t>::max();

	bool reachableToday = iter->turns == 0;
	if(iter == path->nodes.begin())
		return selectImageCross(reachableToday, iter->coord);

	auto next = iter + 1;
	auto prev = iter - 1;

	// start of path - current hero location
	if(next == path->nodes.end())
		return std::numeric_limits<size_t>::max();

	bool pathContinuous = iter->coord.areNeighbours(next->coord) && iter->coord.areNeighbours(prev->coord);
	bool embarking = iter->action == EPathNodeAction::EMBARK || iter->action == EPathNodeAction::DISEMBARK;

	if(pathContinuous && !embarking)
		return selectImageArrow(reachableToday, iter->coord, prev->coord, next->coord);

	return selectImageCross(reachableToday, iter->coord);
}

uint8_t MapRendererPath::checksum(IMapRendererContext & context, const int3 & coordinates)
{
	return selectImage(context, coordinates) & 0xff;
}

MapRenderer::TileChecksum MapRenderer::getTileChecksum(IMapRendererContext & context, const int3 & coordinates)
{
	// computes basic checksum to determine whether tile needs an update
	// if any component gives different value, tile will be updated
	TileChecksum result;
	boost::range::fill(result, std::numeric_limits<uint8_t>::max());

	if(!context.isInMap(coordinates))
	{
		result[0] = rendererBorder.checksum(context, coordinates);
		return result;
	}

	const NeighborTilesInfo neighborInfo(context, coordinates);

	if(!context.isVisible(coordinates) && neighborInfo.areAllHidden())
	{
		result[7] = rendererFow.checksum(context, coordinates);
	}
	else
	{
		result[1] = rendererTerrain.checksum(context, coordinates);
		if (context.showRivers())
			result[2] = rendererRiver.checksum(context, coordinates);
		if (context.showRoads())
			result[3] = rendererRoad.checksum(context, coordinates);
		result[4] = rendererObjects.checksum(context, coordinates);
		result[5] = rendererPath.checksum(context, coordinates);
		result[6] = rendererOverlay.checksum(context, coordinates);

		if(!context.isVisible(coordinates))
			result[7] = rendererFow.checksum(context, coordinates);
	}
	return result;
}

void MapRenderer::renderTile(IMapRendererContext & context, Canvas & target, const int3 & coordinates)
{
	if(!context.isInMap(coordinates))
	{
		rendererBorder.renderTile(context, target, coordinates);
		return;
	}

	const NeighborTilesInfo neighborInfo(context, coordinates);

	if(!context.isVisible(coordinates) && neighborInfo.areAllHidden())
	{
		rendererFow.renderTile(context, target, coordinates);
	}
	else
	{
		rendererTerrain.renderTile(context, target, coordinates);

		if (context.showRivers())
			rendererRiver.renderTile(context, target, coordinates);

		if (context.showRoads())
			rendererRoad.renderTile(context, target, coordinates);

		rendererObjects.renderTile(context, target, coordinates);
		rendererPath.renderTile(context, target, coordinates);
		rendererOverlay.renderTile(context, target, coordinates);

		if(!context.isVisible(coordinates))
			rendererFow.renderTile(context, target, coordinates);
	}
}