/*
 * UNPUBLISHED -- Rights  reserved  under  the  copyright  laws  of the
 * United States.  Use  of a copyright notice is precautionary only and
 * does not imply publication or disclosure.
 *
 * THIS DOCUMENTATION CONTAINS CONFIDENTIAL AND PROPRIETARY INFORMATION
 * OF    BLIZZARD   ENTERTAINMENT.    ANY   DUPLICATION,  MODIFICATION,
 * DISTRIBUTION, OR DISCLOSURE IS STRICTLY PROHIBITED WITHOUT THE PRIOR
 * EXPRESS WRITTEN PERMISSION OF BLIZZARD ENTERTAINMENT.
 */

#include "../types.h"

void *pSquareCel;
char dMonsDbg[17][112][112];
char dFlagDbg[17][112][112];

//----- (004086F4) --------------------------------------------------------
void __cdecl LoadDebugGFX()
{
	if ( visiondebug )
		pSquareCel = LoadFileInMem("Data\\Square.CEL", 0);
}
// 525720: using guessed type int visiondebug;

//----- (0040870F) --------------------------------------------------------
void __cdecl FreeDebugGFX()
{
	void *v0; // ecx

	v0 = pSquareCel;
	pSquareCel = 0;
	mem_free_dbg(v0);
}

//----- (00408721) --------------------------------------------------------
void __cdecl CheckDungeonClear()
{
	int i;
	int j;

	for(i = 0; i < 112; i++)
	{
		for(j = 0; j < 112; j++)
		{
			if ( dMonster[i][j] )
				TermMsg("Monsters not cleared");
			if ( dPlayer[i][j] )
				TermMsg("Players not cleared");

			dMonsDbg[currlevel][i][j] = dFlags[i][j] & 2;
			dFlagDbg[currlevel][i][j] = dFlags[i][j] & 8;
		}
	}
}

#ifdef _DEBUG
void __cdecl GiveGoldCheat()
{
	int i; // esi
	int ni; // ebp

	for(i = 0; i < 40; i++)
	{
		if ( !plr[myplr].InvGrid[i] )
		{
			ni = plr[myplr]._pNumInv++;
			SetPlrHandItem(&plr[myplr].InvList[ni], IDI_GOLD);
			GetPlrHandSeed(&plr[myplr].InvList[ni]);
			plr[myplr].InvList[ni]._ivalue = 5000;
			plr[myplr].InvList[ni]._iCurs = 6;
			plr[myplr]._pGold += 5000;
			plr[myplr].InvGrid[i] = plr[myplr]._pNumInv;
		}
	}
}

void __cdecl StoresCheat()
{
	int i; // eax

	numpremium = 0;

	for(i = 0; i < 6; i++)
		premiumitem[i]._itype = -1;

	SpawnPremium(30);

	for(i = 0; i < 20; i++)
		witchitem[i]._itype = -1;

	SpawnWitch(30);
}

void __cdecl TakeGoldCheat()
{
	int i; // esi
	char ig; // cl

	for(i = 0; i < 40; i++)
	{
		ig = plr[myplr].InvGrid[i];
		if ( ig > 0 && plr[myplr].InvList[ig - 1]._itype == ITYPE_GOLD )
			RemoveInvItem(myplr, ig - 1);
	}

	for(i = 0; i < 8; i++)
	{
		if ( plr[myplr].SpdList[i]._itype == ITYPE_GOLD )
			plr[myplr].SpdList[i]._itype = -1;
	}

	plr[myplr]._pGold = 0;
}

void __cdecl MaxSpellsCheat()
{
	int i; // ebp

	for(i = 1; i < 37; i++)
	{
		if ( spelldata[i].sBookLvl != -1 )
		{
			*(_QWORD *)plr[myplr]._pMemSpells |= 1 << (i - 1);
			plr[myplr]._pSplLvl[i] = 10;
		}
	}
}

void __fastcall PrintDebugPlayer(bool bNextPlayer)
{
	char dstr[128]; // [esp+Ch] [ebp-80h]

	if ( bNextPlayer )
		dbgplr = ((_BYTE)dbgplr + 1) & 3;

	sprintf(dstr, "Plr %i : Active = %i", dbgplr, plr[dbgplr].plractive);
	NetSendCmdString(1 << myplr, dstr);

	if ( plr[dbgplr].plractive )
	{
		sprintf(dstr, "  Plr %i is %s", dbgplr, plr[dbgplr]._pName);
		NetSendCmdString(1 << myplr, dstr);
		sprintf(dstr, "  Lvl = %i : Change = %i", plr[dbgplr].plrlevel, plr[dbgplr]._pLvlChanging);
		NetSendCmdString(1 << myplr, dstr);
		sprintf(dstr, "  x = %i, y = %i : tx = %i, ty = %i", plr[dbgplr].WorldX, plr[dbgplr].WorldY, plr[dbgplr]._ptargx, plr[dbgplr]._ptargy);
		NetSendCmdString(1 << myplr, dstr);
		sprintf(dstr, "  mode = %i : daction = %i : walk[0] = %i", plr[dbgplr]._pmode, plr[dbgplr].destAction, plr[dbgplr].walkpath[0]);
		NetSendCmdString(1 << myplr, dstr);
		sprintf(dstr, "  inv = %i : hp = %i", plr[dbgplr]._pInvincible, plr[dbgplr]._pHitPoints);
		NetSendCmdString(1 << myplr, dstr);
	}
}

void __cdecl PrintDebugQuest()
{
	char dstr[128]; // [esp+0h] [ebp-80h]

	sprintf(dstr, "Quest %i :  Active = %i, Var1 = %i", dbgqst, quests[dbgqst]._qactive, quests[dbgqst]._qvar1);
	NetSendCmdString(1 << myplr, dstr);
	if ( ++dbgqst == 16 )
		dbgqst = 0;
}

void __fastcall PrintDebugMonster(int m)
{
	bool bActive; // ecx
	int i; // eax
	char dstr[128]; // [esp+Ch] [ebp-80h]

	sprintf(dstr, "Monster %i = %s", m, monster[m].mName);
	NetSendCmdString(1 << myplr, dstr);
	sprintf(dstr, "X = %i, Y = %i", monster[m]._mx, monster[m]._my);
	NetSendCmdString(1 << myplr, dstr);
	sprintf(dstr, "Enemy = %i, HP = %i", monster[m]._menemy, monster[m]._mhitpoints);
	NetSendCmdString(1 << myplr, dstr);
	sprintf(dstr, "Mode = %i, Var1 = %i", monster[m]._mmode, monster[m]._mVar1);
	NetSendCmdString(1 << myplr, dstr);

	bActive = 0;

	for(i = 0; i < nummonsters; i++)
	{
		if ( monstactive[i] == m )
			bActive = 1;
	}

	sprintf(dstr, "Active List = %i, Squelch = %i", bActive, monster[m]._msquelch);
	NetSendCmdString(1 << myplr, dstr);
}

void __cdecl GetDebugMonster()
{
	int v0; // ecx
	int v1; // eax

	v0 = pcursmonst;
	if ( pcursmonst == -1 )
	{
		v1 = dMonster[cursmx][cursmy];
		if ( v1 )
		{
			v0 = v1 - 1;
			if ( v1 <= 0 )
				v0 = -1 - v1;
		}
		else
		{
			v0 = dbgmon;
		}
	}
	PrintDebugMonster(v0);
}

void __cdecl NextDebugMonster()
{
	char dstr[128]; // [esp+0h] [ebp-80h]

	if ( dbgmon++ == 200 )
		dbgmon = 0;

	sprintf(dstr, "Current debug monster = %i", dbgmon);
	NetSendCmdString(1 << myplr, dstr);
}
#endif