/**
 * @file dead.cpp
 *
 * Implementation of functions for placing dead monsters.
 */
#include "dead.h"

#include "levels/gendung.h"
#include "lighting.h"
#include "misdat.h"
#include "monster.h"

namespace devilution {

Corpse Corpses[MaxCorpses];
int8_t stonendx;

namespace {
void InitDeadAnimationFromMonster(Corpse &corpse, const CMonster &mon)
{
	const auto &animData = mon.getAnimData(MonsterGraphic::Death);
	memcpy(&corpse.data[0], &animData.celSpritesForDirections[0], sizeof(animData.celSpritesForDirections[0]) * animData.celSpritesForDirections.size());
	corpse.frame = animData.frames - 1;
	corpse.width = animData.width;
}
} // namespace

void InitCorpses()
{
	int8_t mtypes[MaxMonsters] = {};

	int8_t nd = 0;

	for (int i = 0; i < LevelMonsterTypeCount; i++) {
		if (mtypes[LevelMonsterTypes[i].type] != 0)
			continue;

		InitDeadAnimationFromMonster(Corpses[nd], LevelMonsterTypes[i]);
		Corpses[nd].translationPaletteIndex = 0;
		nd++;

		LevelMonsterTypes[i].corpseId = nd;
		mtypes[LevelMonsterTypes[i].type] = nd;
	}

	nd++; // Unused blood spatter

	for (auto &corpse : Corpses[nd].data)
		corpse = MissileSpriteData[MFILE_SHATTER1].GetFirstFrame();

	Corpses[nd].frame = 11;
	Corpses[nd].width = 128;
	Corpses[nd].translationPaletteIndex = 0;
	nd++;

	stonendx = nd;

	for (int i = 0; i < ActiveMonsterCount; i++) {
		auto &monster = Monsters[ActiveMonsters[i]];
		if (monster.uniqType != 0) {
			InitDeadAnimationFromMonster(Corpses[nd], monster.type());
			Corpses[nd].translationPaletteIndex = ActiveMonsters[i] + 1;
			nd++;

			monster.corpseId = nd;
		}
	}

	assert(static_cast<unsigned>(nd) <= MaxCorpses);
}

void AddCorpse(Point tilePosition, int8_t dv, Direction ddir)
{
	dCorpse[tilePosition.x][tilePosition.y] = (dv & 0x1F) + (static_cast<int>(ddir) << 5);
}

void SyncUniqDead()
{
	for (int i = 0; i < ActiveMonsterCount; i++) {
		auto &monster = Monsters[ActiveMonsters[i]];
		if (monster.uniqType == 0)
			continue;
		for (int dx = 0; dx < MAXDUNX; dx++) {
			for (int dy = 0; dy < MAXDUNY; dy++) {
				if ((dCorpse[dx][dy] & 0x1F) == monster.corpseId)
					ChangeLightXY(monster.lightId, { dx, dy });
			}
		}
	}
}

} // namespace devilution