D2NetHandlers.cpp

#include "D2NetHandlers.h"
#include "Script.h"
#include "ScreenHook.h"
#include "Unit.h"
#include "Helpers.h"
#include "Core.h"
#include "Constants.h"
#include "Events.h"
#include "ScriptEngine.h"
#include "Console.h"
#include "D2BS.h"
#include "MPQStats.h"

using namespace std;

Variables Vars;

DWORD ReassignPlayerHandler(BYTE* pPacket, DWORD dwSize)
{
	if(*(LPDWORD)&pPacket[2] == D2CLIENT_GetPlayerUnit()->dwUnitId)
		pPacket[10] = NULL;

	return TRUE;
}

DWORD HPMPUpdateHandler(BYTE* pPacket, DWORD dwSize)
{
	WORD Life = *(WORD*)&pPacket[1];
	WORD Mana = *(WORD*)&pPacket[3];

	if((Life & 0x8000) == 0x8000)
	{
		Life ^= 0x8000;
	}
	if((Mana & 0x8000) == 0x8000)
	{
		Mana ^= 0x8000;
	}
	if((Mana & 0x4000) == 0x4000)
	{
		Mana ^= 0x4000;
	}
	Mana *= 2;

	static WORD SaveLife = 0;
	if(SaveLife != Life)
	{
		SaveLife = Life;
		LifeEvent(Life);
	}

	static WORD SaveMana = 0;
	if(SaveMana != Mana)
	{
		SaveMana = Mana;
		ManaEvent(Mana);
	}

	return TRUE;
}

DWORD ChatEventHandler(BYTE* pPacket, DWORD dwSize)
{
	char* pName = (char*)pPacket+10;
	char* pMessage = (char*)pPacket + strlen(pName) + 11;

	if(Vars.bDontCatchNextMsg)
		Vars.bDontCatchNextMsg = FALSE;
	
	return !(ChatEvent(pName, pMessage));
		
}

DWORD NPCTransactionHandler(BYTE* pPacket, DWORD dwSize)
{
	char code[5] = "";
	BYTE mode = pPacket[0x02]; // [BYTE Result - 0x00 =  Purchased || 0x01 = Sold || 0x0c = Insuffecient Gold]
	DWORD gid = *(DWORD *)(pPacket+0x07);

	ItemActionEvent(gid, code, (100 + mode), false);

	return TRUE;
}

DWORD EventMessagesHandler(BYTE* pPacket, DWORD dwSize)
{
	// packet breakdown: http://www.edgeofnowhere.cc/viewtopic.php?t=392307
	BYTE mode = pPacket[1];
	DWORD param1 = *(DWORD*)(pPacket+3);
	BYTE param2 = pPacket[7];
	char name1[16] = "", name2[28] = "";
	strcpy_s(name1, 16, (char*)pPacket+8);
	strcpy_s(name2, 16, (char*)pPacket+24);

	char* tables[3] = {"", "monstats", "objects"};
	char* columns[3] = {"", "NameStr", "Name"};

	switch(mode)
	{
		case 0x06: // name1 slain by name2
			/*BYTE Param2 = Unit Type of Slayer (0x00 = Player, 0x01 = NPC)
			  if Type = NPC, DWORD Param1 = Monster Id Code from MPQ (points to string for %Name2)*/
			if(param2 == UNIT_MONSTER || param2 == UNIT_OBJECT)
			{
				WORD localeId;
				FillBaseStat(tables[param2], param1, columns[param2], &localeId, sizeof(WORD));
				wchar_t* str = D2LANG_GetLocaleText(localeId);
				char* str2 = UnicodeToAnsi(str);
				strcpy_s(name2, 28, str2);
				delete[] str2;
			}
			break;
		case 0x07: // player relation
			{
				for(RosterUnit* player = *p_D2CLIENT_PlayerUnitList; player != NULL; player = player->pNext)
					if(player->dwUnitId == param1)
						strcpy_s(name1, 16, player->szName);
				switch(param2)
				{
					case 0x03: // hostile
						if(Vars.bQuitOnHostile)
							D2CLIENT_ExitGame();
						break;
				}
			}
			break;
		case 0x0a: // name1 has items in his box
			if(name1[0] == 0)
				strcpy_s(name1, 16, "You");
			break;
	}
	GameActionEvent(mode, param1, param2, name1, name2);

	return TRUE;
}

DWORD ItemActionHandler(BYTE* pPacket, DWORD dwSize)
{
	// TODO: fix this code later by changing the way it's parsed
	INT64 icode   = 0;
	char code[5]  = "";
	BYTE mode     = pPacket[1];
	DWORD gid     = *(DWORD*)&pPacket[4];
	BYTE dest     = ((pPacket[13] & 0x1C) >> 2);

	switch(dest)
	{
		case 0: 
		case 2:
			icode = *(INT64 *)(pPacket+15)>>0x04;
			break;
		case 3:
		case 4:
		case 6:
			if(!((mode == 0 || mode == 2) && dest == 3))
			{
				if(mode != 0xF && mode != 1 && mode != 12)
					icode = *(INT64 *)(pPacket+17) >> 0x1C;
				else
					icode = *(INT64 *)(pPacket+15) >> 0x04;
			} 
			else  
				icode = *(INT64 *)(pPacket+17) >> 0x05;
			break;
		default:
			break;
	}

	// Converting and Cleaning
	memcpy(code, &icode, 4);
	if(code[3] == ' ') code[3] = '\0';

	/*if(strcmp(code, "gld") == 0)
		GoldDropEvent(gid, mode);
	else*/
		ItemActionEvent(gid, code, mode, (pPacket[0] == 0x9d));	

	return TRUE;
}

DWORD DelayedStateHandler(BYTE* pPacket, DWORD dwSize)
{
	if(pPacket[6] == AFFECT_JUST_PORTALED)
		return FALSE;

	return TRUE;
}