EQ2EMu/EQ2/source/WorldServer/client.cpp

/*
EQ2Emulator:  Everquest II Server Emulator
Copyright (C) 2007  EQ2EMulator Development Team (http://www.eq2emulator.net)

This file is part of EQ2Emulator.

EQ2Emulator 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.

EQ2Emulator 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 EQ2Emulator.  If not, see <http://www.gnu.org/licenses/>.
*/
#include "../common/debug.h"
#include "../common/Log.h"
#include <iostream>
#include <iomanip>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <zlib.h>
#include <assert.h>
#include <algorithm>
#include "Player.h"
#include "Commands/Commands.h"
#include "ClientPacketFunctions.h"
#include "../common/ConfigReader.h"
#include "Guilds/Guild.h"
#include "Variables.h"
#include "Rules/Rules.h"
#include "Titles.h"
#include "IRC/IRC.h"
#include "Chat/Chat.h"
#include "SpellProcess.h"
#include "Zone/ChestTrap.h"

//#include "Quests.h"

#ifdef WIN32
#include <WinSock2.h>
#include <windows.h>
#define snprintf	_snprintf
#define vsnprintf	_vsnprintf
#define strncasecmp	_strnicmp
#define strcasecmp  _stricmp
#else
#include <sys/socket.h>
#ifdef FREEBSD
#include <sys/types.h>
#endif
#include <netinet/in.h>
#include <arpa/inet.h>
#include <unistd.h>
#endif

#if defined(__GNUC__)
#define _snprintf snprintf
#endif


#include "client.h"
#include "../common/emu_opcodes.h"
#include "../common/packet_dump.h"
#include "WorldDatabase.h"
#include "races.h"
#include "classes.h"
#include "LoginServer.h"
#include "World.h"
#include "../common/EQ2_Common_Structs.h"
#include "net.h"
#include "../common/MiscFunctions.h"
#include "Skills.h"
#include "LuaInterface.h"
#include "Quests.h"
#include "Collections/Collections.h"
#include "Achievements/Achievements.h"
#include "Traits/Traits.h"
#include "Recipes/Recipe.h"
#include "Tradeskills/Tradeskills.h"
#include "AltAdvancement/AltAdvancement.h"
#include "Bots/Bot.h"

extern WorldDatabase database;
extern const char* ZONE_NAME;
extern LoginServer loginserver;
extern sint32 numclients;
extern NetConnection net;
extern Commands commands;
extern ClientList client_list;
extern ZoneList zone_list;
extern ZoneAuth zone_auth;
extern MasterItemList master_item_list;
extern MasterSkillList master_skill_list;
extern MasterSpellList master_spell_list;
extern MasterTraitList master_trait_list;
extern MasterQuestList master_quest_list;
extern MasterFactionList master_faction_list;
extern MasterRecipeList master_recipe_list;
extern volatile bool RunLoops;
extern ConfigReader configReader;
extern LuaInterface* lua_interface;
extern World world;
extern Variables variables;
extern Classes classes;
extern Races races;
extern GuildList guild_list;
extern MasterCollectionList master_collection_list;
extern MasterAchievementList master_achievement_list;
extern RuleManager rule_manager;
extern IRC irc;
extern Chat chat;
extern MasterAAList master_aa_list;
extern MasterAAList master_tree_nodes;
extern ChestTrapList chest_trap_list;

using namespace std;

Client::Client(EQStream* ieqs) : pos_update(125), quest_pos_timer(2000), lua_debug_timer(30000), delayTimer(500), transmuteID(0), temp_placement_timer(10), spawn_removal_timer(250) {
	eqs = ieqs;
	ip = eqs->GetrIP();
	port = ntohs(eqs->GetrPort());
	merchant_transaction = nullptr;
	mail_window.item = nullptr; // don't want this to be set(loose ptr) when using ResetSendMail to provide rest of the defaults
	ResetSendMail(false);
	timestamp_flag = 0;
	current_quest_id = 0;
	last_update_time = 0;
	quest_updates = false;

	//autobootup_timeout = new Timer(10000);
	//autobootup_timeout->Disable();

	CLE_keepalive_timer = new Timer(15000);
	connect = new Timer(1000);
	connect->Disable();
	zoneID = 0;
	account_name[0] = 0;
	character_id = 0;
	account_id = 0;
	pwaitingforbootup = 0;
	current_zone = 0;
	connected_to_zone = false;
	connected = false;
	camp_timer = 0;
	client_zoning = false;
	player_pos_changed = false;
	++numclients;
	if (world.GetServerStatisticValue(STAT_SERVER_MOST_CONNECTIONS) < numclients)
		world.UpdateServerStatistic(STAT_SERVER_MOST_CONNECTIONS, numclients, true);
	remove_from_list = false;
	new_client_login = false;
	UpdateWindowTitle(0);
	num_active_failures = 0;
	player = new Player();
	player->SetClient(this);
	combine_spawn = 0;
	lua_debug = false;
	ready_for_spawns = false;
	ready_for_updates = false;
	lua_debug_timer.Disable();
	transport_spawn = 0;
	MBuyBack.SetName("Client::MBuyBack");
	MPendingQuestAccept.SetName("Client::MPendingQuestAccept");
	MDeletePlayer.SetName("Client::MDeletePlayer");
	MQuestPendingUpdates.SetName("Client::MQuestPendingUpdates");
	search_items = 0;
	version = 0;
	next_conversation_id = 0;
	pending_guild_invite.guild = 0;
	pending_guild_invite.invited_by = 0;
	m_recipeListSent = false;
	m_resurrect.SetName("Client::m_resurrect");
	current_rez.expire_timer = 0;
	current_rez.should_delete = true;
	pending_last_name = 0;
	should_target = false;
	initial_spawns_sent = false;
	MQuestTimers.SetName("Client::quest_timers");
	memset(&incoming_paperdoll, 0, sizeof(incoming_paperdoll));
	on_auto_mount = false;
	should_load_spells = true;
	spawnPlacementMode = ServerSpawnPlacementMode::DEFAULT;
	delayedLogin = false;
	delayedAccountID = 0;
	delayedAccessKey = 0;
	delayTimer.Disable();
	tempPlacementSpawn = nullptr;
	placement_unique_item_id = 0;
	SetHasOwnerOrEditAccess(false);
	temporary_transport_id = 0;
	rejoin_group_id = 0;
	lastRegionRemapTime = 0;
	regionDebugMessaging = false;
	client_reloading_zone = false;
	last_saved_timestamp = 0;
	MQueueStateCmds.SetName("Client::MQueueStateCmds");
	MConversation.SetName("Client::MConversation");
	save_spell_state_timer.Disable();
	save_spell_state_time_bucket = 0;
	player_loading_complete = false;
	MItemDetails.SetName("Client::MItemDetails");
	MSpellDetails.SetName("Client::MSpellDetails");
	hasSentTempPlacementSpawn = false;
	spawn_removal_timer.Start();
	disable_save = false;
}

Client::~Client() {
	RemoveClientFromZone();

	//let the stream factory know were done with this stream
	if (eqs) {
		eqs->Close();
		try {
			eqs->ReleaseFromUse();
		}
		catch (...) {}
	}
	eqs = NULL;

	//safe_delete(autobootup_timeout);

	safe_delete(CLE_keepalive_timer);
	safe_delete(connect);
	--numclients;
	UpdateWindowTitle(0);
}


void Client::RemoveClientFromZone() {
	if (GetTempPlacementSpawn() && GetCurrentZone()) {
		Spawn* tmp = GetTempPlacementSpawn();
		SetTempPlacementSpawn(nullptr);
		GetCurrentZone()->RemoveSpawn(tmp, true, false, true, true, true);
	}

	if(player && player->GetZone())
		player->GetZone()->GetSpellProcess()->RemoveSpellTimersFromSpawn(player, true, false, true, true);

	if (current_zone && player) {
		if (player->GetGroupMemberInfo())
		{
			if ((player->GetActivityStatus() & ACTIVITY_STATUS_LINKDEAD) > 0)
				world.GetGroupManager()->RemoveGroupMember(player->GetGroupMemberInfo()->group_id, player);
			else
				TempRemoveGroup();
		}
		world.GetGroupManager()->ClearPendingInvite(player);
	}
	if (lua_interface)
		lua_interface->RemoveDebugClients(this);

	if (player)
		zone_list.RemoveClientFromMap(player->GetName(), this);

	safe_delete(camp_timer);
	safe_delete(search_items);
	safe_delete(current_rez.expire_timer);
	safe_delete(pending_last_name);
	safe_delete_array(incoming_paperdoll.image_bytes);

	MDeletePlayer.writelock(__FUNCTION__, __LINE__);
	if (player && !player->GetPendingDeletion())
		safe_delete(player);
	MDeletePlayer.releasewritelock(__FUNCTION__, __LINE__);
}


void Client::QueuePacket(EQ2Packet* app, bool attemptedCombine) {
	if (eqs) {
		if (!eqs->CheckActive()) {
			client_list.Remove(this);
			eqs = 0;
		}
	}
	if (app && eqs && version > 0)
		eqs->EQ2QueuePacket(app, attemptedCombine);
	else {
		safe_delete(app);
	}

}

void Client::PopulateSkillMap() {
	EQ2Packet* app = master_skill_list.GetPopulateSkillsPacket(GetVersion());
	if (app)
		QueuePacket(app);
	else {
		LogWrite(WORLD__ERROR, 0, "World", "Unable to send populate skills packet for version: %i!", GetVersion());
		Disconnect(); //the client cant proceed without the skill packet, might as well kick it now
	}

}

void Client::SendLoginInfo() {
	if(GetPlayer()->IsReturningFromLD())
		firstlogin = true;

	if (firstlogin) {
		LogWrite(WORLD__DEBUG, 0, "World", "Increment Server_Accepted_Connection + 1");
		world.UpdateServerStatistic(STAT_SERVER_ACCEPTED_CONNECTION, 1);
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Populate Skill Map...");
		PopulateSkillMap();
		// JA: Check client version and move player to valid zone if current client does not support last saved zone (loading SF client on DoV saved zone) IT CAN HAPPEN!
		LogWrite(MISC__TODO, 1, "TODO", "Check client version at login, move char if invalid zone file");
	}

	LogWrite(CCLIENT__DEBUG, 0, "Client", "Toggle Character Online...");
	database.ToggleCharacterOnline(this, 1);

	int32 count = 0;

	if(!GetPlayer()->IsReturningFromLD())
	{
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Loading Character Skills for player '%s'...", player->GetName());
		count = database.LoadCharacterSkills(GetCharacterID(), player);

		LogWrite(CCLIENT__DEBUG, 0, "Client", "Loading Character Spells for player '%s'...", player->GetName());
		count = database.LoadCharacterSpells(GetCharacterID(), player);
	}
	else
	{
		LogWrite(CCLIENT__INFO, 0, "Client", "Player is returning from linkdead status (Player does not need reload) thus skipping database loading for '%s'...", player->GetName());
	}
	
	// get the latest character starting skills / spells, may have been updated after character creation
	world.SyncCharacterAbilities(this);

	if(!GetPlayer()->IsReturningFromLD())
	{
		count = database.LoadCharacterTitles(GetCharacterID(), player);
		if (count == 0) {
			LogWrite(CCLIENT__DEBUG, 0, "Client", "No character titles found!");
			LogWrite(CCLIENT__DEBUG, 0, "Client", "Initializing starting values - Titles");
			database.UpdateStartingTitles(GetCharacterID(), player->GetAdventureClass(), player->GetRace(), player->GetGender());
		}
	}

	if(!GetPlayer()->IsReturningFromLD())
	{
		count = database.LoadCharacterLanguages(GetCharacterID(), player);
		if (count == 0)
			LogWrite(CCLIENT__DEBUG, 0, "Client", "No character languages loaded!");

		count = database.LoadPlayerRecipeBooks(GetCharacterID(), player);
		if (count == 0)
			LogWrite(CCLIENT__DEBUG, 0, "Client", "No character recipe books found!");
	}

	ClientPacketFunctions::SendLoginAccepted(this);

	ClientPacketFunctions::SendAbilities ( this );

	ClientPacketFunctions::SendCommandNamePacket(this);

	ClientPacketFunctions::SendQuickBarInit(this);

	// we only need to send the MOTD if it is the first time the person is logging in.
	if (firstlogin) {
		ClientPacketFunctions::SendMOTD(this);
		ClientPacketFunctions::SendCharacterMacros(this);
		zone_list.CheckFriendList(this);
	}

	if(!GetPlayer()->IsReturningFromLD())
	{
		database.LoadCharacterItemList(GetAccountID(), GetCharacterID(), player, GetVersion());
		if (firstlogin && player->item_list.GetNumberOfItems() == 0 && player->GetEquipmentList()->GetNumberOfItems() == 0) //re-add starting items if missing
		{
			LogWrite(CCLIENT__WARNING, 0, "Client", "Player has no items - reloading starting items: '%s' (%u)", player->GetName(), GetCharacterID());
			database.UpdateStartingItems(GetCharacterID(), player->GetAdventureClass(), player->GetRace());
			database.LoadCharacterItemList(GetAccountID(), GetCharacterID(), player, GetVersion());
		}
		database.LoadPlayerFactions(this);
		database.LoadCharacterQuests(this);
		database.LoadPlayerMail(this);
	}
	LogWrite(CCLIENT__DEBUG, 0, "Client", "Send Quest Journal...");
	SendQuestJournal(true, 0, false);

	if (version > 546) // right version? possibly not!
		master_aa_list.DisplayAA(this, 0, 3);

	if (version > 283)
		SendCollectionList();
	SendBiography();

	map<int32, Quest*>::iterator itr;
	Quest* quest = 0;
	GetPlayer()->MPlayerQuests.readlock(__FUNCTION__, __LINE__);
	for (itr = player->player_quests.begin(); itr != player->player_quests.end(); itr++) {
		quest = itr->second;
		if (quest->IsTracked()) {
			quest->SetTracked(false);
			QueuePacket(itr->second->QuestJournalReply(version, GetNameCRC(), player));
			quest->SetTracked(true);
			QueuePacket(itr->second->QuestJournalReply(version, GetNameCRC(), player));
		}
	}
	GetPlayer()->MPlayerQuests.releasereadlock(__FUNCTION__, __LINE__);

	//	SendAchievementsList();

	/*Guild* guild = player->GetGuild();
	if (guild) {
		guild->UpdateGuildMemberInfo(GetPlayer());
		if (firstlogin)
			guild->SendGuildMOTD(this);
		guild->SendGuildUpdate(this);
		guild->SendGuildMember(GetPlayer(), firstlogin);
		guild->SendGuildEventList(this);
		guild->SendGuildBankEventList(this);
		guild->SendAllGuildEvents(this);
		guild->SendGuildMemberList(this);
	}*/
	if (version > 283) {
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Loading Faction Updates...");
		EQ2Packet* outapp = player->GetFactions()->FactionUpdate(GetVersion());
		if (outapp) {
			LogWrite(CCLIENT__PACKET, 0, "Client", "Dump/Print Packet in func: %s, line: %i", __FUNCTION__, __LINE__);
			//DumpPacket(outapp);
			QueuePacket(outapp);
		}
	}

	LogWrite(CCLIENT__DEBUG, 0, "Client", "Send Command List...");
	ClientPacketFunctions::SendCommandList(this);

	LogWrite(CCLIENT__DEBUG, 0, "Client", "Send Language Updates...");
	SendLanguagesUpdate(database.GetCharacterCurrentLang(GetCharacterID(), player));

	ClientPacketFunctions::SendInstanceList(this);

	SendZoneInfo();
	/*Spell* spell = 0;
	vector<QuickBarItem*>::iterator itr;
	for(itr = player->GetQuickbar()->begin(); itr != player->GetQuickbar()->end(); itr++){
	if((*itr)->type == 1){
	spell =  master_spell_list.GetSpell((*itr)->id);
	if(spell)
	QueuePacket(spell->serialize(this, false, 0x20));
	}
	}*/
}

void Client::SendPlayerDeathWindow()
{
	LogWrite(CCLIENT__DEBUG, 0, "Client", "SendPlayerDeathWindow");
	vector<RevivePoint*>* results = GetCurrentZone()->GetRevivePoints(this);
	vector<RevivePoint*>::iterator itr;

	if (results && results->size() > 0)
	{
		PacketStruct* packet = configReader.getStruct("WS_DeathWindow", GetVersion());
		if (packet)
		{
			packet->setArrayLengthByName("location_count", results->size());
			RevivePoint* point = 0;
			int32 i = 0;

			for (itr = results->begin(); itr != results->end(); itr++, i++)
			{
				point = *itr;
				if (point)
				{
					packet->setArrayDataByName("location_id", point->id, i);
					//zone_name = database.GetZoneName(point->zone_id);
					string zone_name = database.GetZoneDescription(point->zone_id);
					if (zone_name.length() > 0)
						packet->setArrayDataByName("zone_name", zone_name.c_str(), i);
					packet->setArrayDataByName("location_name", point->location_name.c_str(), i);
					packet->setArrayDataByName("distance", GetPlayer()->GetDistance(point->x, point->y, point->z), i);
				}

				if (point->id == 0xFFFFFFFF)//tmp location
					safe_delete(point);
			}
			// done with the revive points so lets free up the pointer
			safe_delete(results);
#if EQDEBUG >= 3
			LogWrite(CCLIENT__DEBUG, 0, "Client", "WS_DeathWindow Packet:");
			packet->PrintPacket();
#endif
			EQ2Packet* outapp = packet->serialize();
			QueuePacket(outapp);
			safe_delete(packet);
		}
	}

}

void Client::DisplayDeadWindow()
{
	LogWrite(ZONE__DEBUG, 0, "Zone", "DisplayDeadWindow()");

	player->SetHP(0);
	player->SetPower(0);
	GetCurrentZone()->TriggerCharSheetTimer();

	PacketStruct* packet = configReader.getStruct("WS_ServerControlFlags", GetVersion());
	if (packet)
	{
		packet->setDataByName("parameter1", 8);
		packet->setDataByName("value", 1);
		QueuePacket(packet->serialize());
		packet->setDataByName("parameter1", 16);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	packet = configReader.getStruct("WS_ServerUpdateTarget", GetVersion());
	if (packet)
	{
		packet->setDataByName("spawn_id", 0xFFFFFFFF);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	SendPlayerDeathWindow();

}

void Client::HandlePlayerRevive(int32 point_id)
{
	PacketStruct* packet = configReader.getStruct("WS_ServerControlFlags", GetVersion());
	if (packet)
	{
		packet->setDataByName("parameter1", 8);
		QueuePacket(packet->serialize());
		packet->setDataByName("parameter1", 16);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	SimpleMessage(CHANNEL_NARRATIVE, "You regain consciousness!");
	packet = configReader.getStruct("WS_Resurrected", GetVersion());
	if (packet)
	{
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}
	float origX, origY, origZ, origHeading = 0.0f;

	origX = player->GetX();
	origY = player->GetY();
	origZ = player->GetZ();
	origHeading = player->GetHeading();
	ZoneServer* originalZone = GetCurrentZone();
	int32 origGridID = GetPlayer()->appearance.pos.grid_id;

	float x, y, z, heading;
	RevivePoint* revive_point = 0;
	if (point_id != 0xFFFFFFFF)
		revive_point = GetCurrentZone()->GetRevivePoint(point_id);

	string zone_desc;
	const char* location_name = "Unknown";

	//revive at zone safe coords
	if (!revive_point)
	{
		LogWrite(CCLIENT__WARNING, 0, "Client", "No Revive Point! Spawning player at safe coordinates!");
		x = GetCurrentZone()->GetSafeX();
		y = GetCurrentZone()->GetSafeY();
		z = GetCurrentZone()->GetSafeZ();
		heading = GetCurrentZone()->GetSafeHeading();
		zone_desc = GetCurrentZone()->GetZoneDescription();
		location_name = "Zone Safe Point";
		Zone(GetCurrentZone()->GetZoneName(), false);
	}
	else
	{
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Sending player to chosen Revive Point.");
		x = revive_point->x;
		y = revive_point->y;
		z = revive_point->z;
		heading = revive_point->heading;
		zone_desc = database.GetZoneDescription(revive_point->zone_id);
		location_name = revive_point->location_name.c_str();
		Zone(GetCurrentZone()->GetZoneName(), false);
	}

	player->SetResurrecting(true);
	player->SetX(x);
	player->SetY(y);
	player->SetZ(z);
	player->SetHeading(heading);
	player->SetHP(player->GetTotalHP());
	player->SetPower(player->GetTotalPower());

	LogWrite(CCLIENT__DEBUG, 0, "Client", "Attempt Revive @ %s, %.2f, %.2f, %.2f, %.2f, HP: %i, Pow: %i, %s",
		zone_desc.c_str(),
		player->GetX(),
		player->GetY(),
		player->GetZ(),
		player->GetHeading(),
		player->GetHP(),
		player->GetPower(),
		location_name);

	//player->ClearEverything();
	Save();

	if (revive_point && revive_point->zone_id != GetCurrentZone()->GetZoneID() && revive_point->zone_id != 0)
	{
		string zone_name = database.GetZoneName(revive_point->zone_id);
		if (zone_name.length() == 0)
		{
			LogWrite(CCLIENT__WARNING, 0, "Client", "Unable to zone player to revive zone ID '%u', using current zone's safe coords.", revive_point->zone_id);
			x = GetCurrentZone()->GetSafeX();
			y = GetCurrentZone()->GetSafeY();
			z = GetCurrentZone()->GetSafeZ();
			heading = GetCurrentZone()->GetSafeHeading();
			location_name = "Zone Safe Point";
		}
		else
		{
			LogWrite(CCLIENT__DEBUG, 0, "Client", "Sending player to revive zone ID '%u', using current zone's safe coords.", revive_point->zone_id);
			location_name = revive_point->location_name.c_str();
			player->ClearEverything();
			Zone(zone_name.c_str(), false);
		}
	}

	zone_desc = GetCurrentZone()->GetZoneDescription();
	Message(CHANNEL_NARRATIVE, "Reviving in %s at %s.", zone_desc.c_str(), location_name);
	player->SetSpawnType(4);
	if (version > 283) {
		packet = configReader.getStruct("WS_CancelMoveObjectMode", GetVersion());
		if (packet)
		{
			QueuePacket(packet->serialize());
			safe_delete(packet);
		}
	}

	packet = configReader.getStruct("WS_TeleportWithinZone", GetVersion());
	if (packet)
	{
		packet->setDataByName("x", x);
		packet->setDataByName("y", y);
		packet->setDataByName("z", z);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	packet = configReader.getStruct("WS_SetControlGhost", GetVersion());
	if (packet)
	{
		packet->setDataByName("spawn_id", 0xFFFFFFFF);
		packet->setDataByName("speed", 32);
		packet->setDataByName("unknown2", 0);
		//DoF Merge: old value and speed wasn't included
		//packet->setDataByName("unknown2", 255);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	packet = configReader.getStruct("WS_SetPOVGhostCmd", GetVersion());
	if (packet)
	{
		packet->setDataByName("spawn_id", 0xFFFFFFFF);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}
	
	if(rule_manager.GetGlobalRule(R_Combat, EnableSpiritShards)->GetBool())
	{
		NPC* shard = player->InstantiateSpiritShard(origX, origY, origZ, origHeading, origGridID, originalZone);

		if(shard->GetSpawnScript() && strlen(shard->GetSpawnScript()) > 0)
			originalZone->CallSpawnScript(shard, SPAWN_SCRIPT_PRESPAWN);

		originalZone->RemoveSpawn(player, false, true, true, true, true);

		originalZone->AddSpawn(shard);
		
		if(shard->GetSpawnScript() && strlen(shard->GetSpawnScript()) > 0)
			originalZone->CallSpawnScript(shard, SPAWN_SCRIPT_SPAWN);
	}

	m_resurrect.writelock(__FUNCTION__, __LINE__);
	if (current_rez.active)
		current_rez.should_delete = true;
	m_resurrect.releasewritelock(__FUNCTION__, __LINE__);
}

void Client::SendCharInfo() {
	EQ2Packet* app;

	if(IsReloadingZone()){
		SetReloadingZone(false);
	}

	
	player->SetEquippedItemAppearances();

	ClientPacketFunctions::SendCharacterData(this);

	SendCharPOVGhost();

	PacketStruct* packet = configReader.getStruct("WS_SetControlGhost", GetVersion());
	if (packet) {
		packet->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(player));
		packet->setDataByName("size", .56);
		packet->setDataByName("unknown2", 255);
		packet->setDataByName("speed", player->GetSpeed());
		packet->setDataByName("air_speed", player->GetAirSpeed());
		EQ2Packet* app = packet->serialize();
		QueuePacket(app);
		safe_delete(packet);

	}
	if (version <= 283) {
		//le: hack to allow client time to zone in, it gets stuck on Loading UI Resources if we go too fast, need to figure it out.  Probably something it doesnt like with ExamineInfo packets
		Sleep(2000);
	}
	//sending bad spawn packet?

	//SendAchievementsList();
	ClientPacketFunctions::SendCharacterSheet(this);
	ClientPacketFunctions::SendTraitList(this);// moved from below
	ClientPacketFunctions::SendAbilities(this);

	ClientPacketFunctions::SendSkillBook(this);
	if (!IsReloadingZone() && !player->IsResurrecting()) {
		if(GetVersion() > 546) //we will send this later on for 546 and below
			ClientPacketFunctions::SendUpdateSpellBook(this);
	}
	else {
		player->SetResurrecting(false);
	}
	ClientPacketFunctions::SendLoginCommandMessages(this);

	GetCurrentZone()->AddSpawn(player);
	
	//SendCollectionList();
	Guild* guild = player->GetGuild();
	if (guild)
		guild->GuildMemberLogin(this, firstlogin);

	app = player->GetPlayerItemList()->serialize(GetPlayer(), GetVersion());
	if (app) {
		LogWrite(CCLIENT__PACKET, 0, "Client", "Dump/Print Packet in func: %s, line: %i", __FUNCTION__, __LINE__);
		//DumpPacket(app);
		QueuePacket(app);
	}
	app = player->GetEquipmentList()->serialize(GetVersion(), player);
	if (app) {
		QueuePacket(app);
	}

	app = player->GetAppearanceEquipmentList()->serialize(GetVersion(), player);
	if (app) {
		QueuePacket(app);
	}

	vector<Item*>* items = player->GetPlayerItemList()->GetItemsFromBagID(-3); // bank items
	if (items && items->size() > 0) {
		for (int32 i = 0; i < items->size(); i++) {
			EQ2Packet* outapp = items->at(i)->serialize(GetVersion(), false, GetPlayer());

			LogWrite(CCLIENT__PACKET, 0, "Client", "Dump/Print Packet in func: %s, line: %i", __FUNCTION__, __LINE__);
			//DumpPacket(outapp);
			QueuePacket(outapp);
		}
	}

	if (firstlogin && (app = chat.GetWorldChannelList(this)) != NULL)
		QueuePacket(app);

	safe_delete(items);
	items = player->GetPlayerItemList()->GetItemsFromBagID(-4); //shared bank items
	if (items && items->size() > 0) {
		for (int32 i = 0; i < items->size(); i++)
			QueuePacket(items->at(i)->serialize(GetVersion(), false, GetPlayer()));
	}
	safe_delete(items);
	if (version > 283) {
		SendTitleUpdate();
	}

	GetPlayer()->ChangePrimaryWeapon();
	GetPlayer()->ChangeSecondaryWeapon();
	GetPlayer()->ChangeRangedWeapon();
	if(!GetPlayer()->IsReturningFromLD()) {
		database.LoadBuyBacks(this);
	}
	if (version > 546)
		master_aa_list.DisplayAA(this, 0, 0);

	string zone_motd = GetCurrentZone()->GetZoneMOTD();
	if (zone_motd.length() > 0 && zone_motd[0] != ' ') {
		string zone_motd_send = "Zone MOTD: " + zone_motd;
		SimpleMessage(CHANNEL_NARRATIVE, zone_motd_send.c_str());
	}
	const char* zone_script = world.GetZoneScript(GetCurrentZone()->GetZoneID());
	if (zone_script && lua_interface)
		lua_interface->RunZoneScript(zone_script, "player_entry", GetCurrentZone(), GetPlayer());
	this->client_zoning = false;
	if (player->GetHP() < player->GetTotalHP() || player->GetPower() < player->GetTotalPower())
		GetCurrentZone()->AddDamagedSpawn(player);

	if (firstlogin && rule_manager.GetGlobalRule(R_World, IRCGlobalEnabled)->GetBool())
		Message(CHANNEL_BROADCAST, "This server has a global IRC channel, join the world channel %s to use", rule_manager.GetGlobalRule(R_World, IRCChan)->GetString());

	if (firstlogin)
		firstlogin = false;

	player->ClearProcs();
	items = player->GetEquippedItemList();
	if (items && items->size() > 0) {
		for (int32 i = 0; i < items->size(); i++) {
			Item* item = items->at(i);
			if (item && item->GetItemScript() && lua_interface)
				lua_interface->RunItemScript(item->GetItemScript(), "equipped", item, player);
		}
	}

	//Allow this player to change their last name if they meet the level requirement
	if (!player->get_character_flag(CF_ENABLE_CHANGE_LASTNAME) && player->GetLevel() >= rule_manager.GetGlobalRule(R_Player, MinLastNameLevel)->GetInt8())
		player->set_character_flag(CF_ENABLE_CHANGE_LASTNAME);

	safe_delete(items);

	if (!player->Alive())
		DisplayDeadWindow();

	ClientPacketFunctions::SendLocalizedTextMessage(this);

	if (GetCurrentZone()->GetInstanceID())
	{
		PlayerHouse* ph = world.GetPlayerHouseByInstanceID(GetCurrentZone()->GetInstanceID());
		if (ph) {
			//HouseZone* hz = world.GetHouseZone(ph->house_id);
			string name = string(GetPlayer()->GetName());
			if (name.compare(ph->player_name) == 0)
				SetHasOwnerOrEditAccess(true);
		}
	}

	if (version > 546)
		ClientPacketFunctions::SendHousingList(this);
	
	bool groupMentor = false;
	GetPlayer()->group_id = rejoin_group_id;
	if(!world.RejoinGroup(this, rejoin_group_id))
		GetPlayer()->group_id = 0;
	else
	{
		Entity* ent = world.GetGroupManager()->IsPlayerInGroup(rejoin_group_id, GetPlayer()->GetGroupMemberInfo()->mentor_target_char_id);
		if(ent && ent->IsPlayer())
		{
			GetPlayer()->SetMentorStats(ent->GetLevel(), ent->GetID());
			groupMentor = true;
		}
	}

	if(!groupMentor)
		GetPlayer()->SetMentorStats(GetPlayer()->GetLevel(), 0);

	database.LoadCharacterSpellEffects(GetCharacterID(), this, DB_TYPE_MAINTAINEDEFFECTS);
	database.LoadCharacterSpellEffects(GetCharacterID(), this, DB_TYPE_SPELLEFFECTS);

	GetPlayer()->SetSaveSpellEffects(false);
	GetPlayer()->SetCharSheetChanged(true);
	GetPlayer()->SetReturningFromLD(false);
}

void Client::SendZoneSpawns() {
	//Allows us to place spawns almost anywhere
	if (version > 283) {
		uchar blah[] = { 0x00,0x3C,0x1C,0x46,0x00,0x3C,0x1C,0x46,0x00,0x3C,0x1C,0x46 };
		EQ2Packet* app = new EQ2Packet(OP_MoveableObjectPlacementCriteri, blah, sizeof(blah));
		QueuePacket(app);
	}

	ClientPacketFunctions::SendSkillSlotMappings(this);
	ClientPacketFunctions::SendGameWorldTime(this);
	GetCurrentZone()->StartZoneInitialSpawnThread(this);
}

void Client::SendCharPOVGhost() {
	PacketStruct* set_pov = configReader.getStruct("WS_SetPOVGhostCmd", GetVersion());
	if (set_pov) {
		set_pov->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(player));
		EQ2Packet* app_pov = set_pov->serialize();
		QueuePacket(app_pov);
		safe_delete(set_pov);
	}

}

void Client::SendZoneInfo() {
	ZoneServer* zone = GetCurrentZone();
	if (zone) {
		EQ2Packet* packet = zone->GetZoneInfoPacket(this);
		QueuePacket(packet);
		if (version > 283) {
			PacketStruct* fog_packet = configReader.getStruct("WS_FogInit", GetVersion());

			LogWrite(CCLIENT__PACKET, 0, "Client", "Dump/Print Packet in func: %s, line: %i", __FUNCTION__, __LINE__);
#if EQDEBUG >= 9
			fog_packet->PrintPacket();
#endif

			if (fog_packet) {
				database.LoadFogInit(zone->GetZoneFile(), fog_packet);
				QueuePacket(fog_packet->serialize());
				safe_delete(fog_packet);
			}

			zone->SendFlightPathsPackets(this);
		}
	}
	/*
	uchar blah[] ={0x00,0x00,0x00,0x00,0xFF,0xFF,0xFF,0xFF,0x00,0x01,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0xFF,0xFF,0xFF
	,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF
	,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x10,0x49,0x2B,0x62,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0x00};
	EQ2Packet* appA = new EQ2Packet(OP_GuildUpdateMsg, blah, sizeof(blah));
	QueuePacket(appA);

	uchar blahA[] ={0x45,0x00,0x00,0x00,0x06,0x00,0x00,0x00,0x00,0x03,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
	,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,0x00,0x00
	,0x00,0x10,0xE2,0x10,0x6C,0x00,0x00,0x00,0x00};
	EQ2Packet* appB = new EQ2Packet(OP_KeymapDataMsg, blahA, sizeof(blahA));
	QueuePacket(appB);
	*/

	LogWrite(CCLIENT__DEBUG, 0, "Client", "SendFriendList");
	SendFriendList();
	LogWrite(CCLIENT__DEBUG, 0, "Client", "SendIgnoreList");
	SendIgnoreList();
}

void Client::SendDefaultGroupOptions() {
	/*
	0 - loot method
	1 - loot items rarity
	2 - Auto split coin
	4 - default yell method
	6 - group autolock
	7 - solo autolock
	*/
	PacketStruct* default_options = configReader.getStruct("WS_DefaultGroupOptions", GetVersion());
	if (default_options) {
		default_options->setDataByName("loot_method", 1);
		default_options->setDataByName("loot_items_rarity", 1);
		default_options->setDataByName("auto_split_coin", 1);
		default_options->setDataByName("default_yell_method", 1);
		EQ2Packet* app7 = default_options->serialize();
		QueuePacket(app7);
		safe_delete(default_options);
	}
}

bool Client::HandlePacket(EQApplicationPacket* app) {
	bool ret = true;
	//cout << "INCOMING PACKET!!!!!!!: " << app->GetOpcodeName() << endl;
	//DumpPacket(app);
#if EQDEBUG >= 9
	LogWrite(PACKET__DEBUG, 9, "Packet", "[EQDEBUG] Received Packet:");
	DumpPacket(app, true);
#endif

	EmuOpcode opcode = app->GetOpcode();

#if EQDEBUG >= 9
	const char* name = app->GetOpcodeName();
	if (name)
		cout << name;
	else
		cout << "Unknown";
	cout << " Packet: OPCode: 0x" << hex << setw(2) << setfill('0') << app->GetOpcode() << dec << ", size: " << setw(5) << setfill(' ') << app->Size() << endl;
	DumpPacket(app);
#endif

	//if (opcode != OP_UpdatePositionMsg) {
	//	LogWrite(PACKET__DEBUG, 0, "opcode %s received", app->GetOpcodeName());
	//}

	if (!connected_to_zone && opcode != OP_LoginByNumRequestMsg)
	{
		opcode = _maxEmuOpcode; // skip since this is not a valid packet, sent before we allowed the login
	}

	switch (opcode) {
	case _maxEmuOpcode:
		break;
	case OP_LoginByNumRequestMsg: {
		LogWrite(OPCODE__DEBUG, 0, "Opcode", "Opcode 0x%X (%i): OP_LoginByNumRequestMsg", opcode, opcode);

		PacketStruct* request;
		request = configReader.getStruct("LoginByNumRequest", 1);
		if (request && request->LoadPacketData(app->pBuffer, app->size)) {
			// test the original location of Version for clients older than 1212
			version = request->getType_int16_ByName("version");

			if (version == 0 || version >= 1208 || EQOpcodeManager.count(GetOpcodeVersion(version)) == 0) {
				// must be new client data version method, re-fetch the packet
				safe_delete(request);
				request = configReader.getStruct("LoginByNumRequest", 1208);

				if (request && request->LoadPacketData(app->pBuffer, app->size)) {
					// Xinux suggests using an INT16 here. Our first new version = 57000
					version = request->getType_int16_ByName("version");
				}
				else {
					LogWrite(LOGIN__ERROR, 0, "Login", "Nasty Horrible things happening. Tell a dev asap! Version: %i", version);
					break;
				}
			}

			if (EQOpcodeManager.count(GetOpcodeVersion(version)) == 0) {
				LogWrite(WORLD__ERROR, 0, "World", "Incompatible version: %i", version);
				ClientPacketFunctions::SendLoginDenied(this);
				return false;
			}

			int32 account_id = request->getType_int32_ByName("account_id");
			int32 access_code = request->getType_int32_ByName("access_code");

			if (!HandleNewLogin(account_id, access_code))
				return false;
		}
		safe_delete(request);
		break;
	}
	case OP_SysClient: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_SysClient", opcode, opcode);
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Client '%s' (%u) is ready for spawn updates.", GetPlayer()->GetName(), GetPlayer()->GetCharacterID());
		SetReadyForUpdates();
		ProcessStateCommands();
		break;
	}
	case OP_MapRequest: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_MapRequest", opcode, opcode);
		PacketStruct* packet = configReader.getStruct("WS_MapRequest", GetVersion());
		if (packet && app->size > 2 && GetCurrentZone()) {
			packet->LoadPacketData(app->pBuffer, app->size);
			PacketStruct* fog_packet = configReader.getStruct("WS_FogInit", GetVersion());
			if (fog_packet) {
				LogWrite(PACKET__DEBUG, 0, "Packet", "In OP_MapRequest: Fog Packet");
				database.LoadFogInit(packet->getType_EQ2_16BitString_ByName("zone").data, fog_packet);
				fog_packet->setDataByName("unknown1", 1);
				fog_packet->setDataByName("unknown3", 1);

				LogWrite(CCLIENT__PACKET, 0, "Client", "Dump/Print Packet in func: %s, line: %i", __FUNCTION__, __LINE__);
				//fog_packet->PrintPacket();
				QueuePacket(fog_packet->serialize());
				safe_delete(fog_packet);
			}
			safe_delete(packet);
		}
		break;
	}
	case OP_RequestCampMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_RequestCampMsg", opcode, opcode);

		PacketStruct* request = configReader.getStruct("WS_RequestCamp", GetVersion());
		if (request && request->LoadPacketData(app->pBuffer, app->size)) {
			LogWrite(CCLIENT__DEBUG, 0, "CClient", "Client '%s' (%u) is camping...", GetPlayer()->GetName(), GetPlayer()->GetCharacterID());
			LogWrite(CCLIENT__DEBUG, 0, "CClient", "WS_RequestCamp - quit: %i, camp_desktop: %i, camp_char_select: %i, (to) char_name: %s",
				request->getType_int8_ByName("quit"),
				request->getType_int8_ByName("camp_desktop"),
				request->getType_int16_ByName("camp_char_select"),
				(request->getType_EQ2_16BitString_ByName("char_name").data.length() > 0) ? request->getType_EQ2_16BitString_ByName("char_name").data.c_str() : "");

			//DumpPacket(app->pBuffer, app->size);
			//request->PrintPacket();

			if (!camp_timer) {
				int16 camp_time = 20; // default if rule cannot be found
				if (GetAdminStatus() >= 100)
					camp_time = rule_manager.GetGlobalRule(R_World, GMCampTimer)->GetInt16();
				else
					camp_time = rule_manager.GetGlobalRule(R_World, PlayerCampTimer)->GetInt16();

				PacketStruct* response = configReader.getStruct("WS_Camp", GetVersion());
				if (response) {
					bool disconnect = false;
					if (request->getType_int8_ByName("camp_desktop") == 1 && request->getType_int8_ByName("quit") == 1) {
						// Command: /camp desktop
						// Command: /quit
						response->setDataByName("camp_desktop", 1);
						disconnect = true;
					}
					else {
						// Command: /camp 
						response->setDataByName("camp_desktop", request->getType_int8_ByName("camp_desktop"));
						response->setDataByName("camp_char_select", request->getType_int16_ByName("camp_char_select"));
						response->setDataByName("seconds", camp_time);
					}

					camp_timer = new Timer(camp_time * 1000);
					camp_timer->Enable();

					if (request->getType_EQ2_16BitString_ByName("char_name").data.length() > 0) {
						// /camp {char_name}
						response->setDataByName("char_name", request->getType_EQ2_16BitString_ByName("char_name").data.c_str());
					}
					else if (request->getType_int8_ByName("camp_desktop") == 0 && request->getType_int16_ByName("camp_char_select") == 0) {
						// /camp  (go back to char selection screen)
						response->setDataByName("char_name", " ");
						response->setDataByName("camp_char_select", 1);
					}

					LogWrite(CCLIENT__DEBUG, 0, "CClient", "WS_Camp - seconds: %i, camp_desktop: %i, camp_char_select: %i, (to) char_name: %s",
						response->getType_int8_ByName("seconds"),
						response->getType_int8_ByName("camp_desktop"),
						response->getType_int8_ByName("camp_char_select"),
						(response->getType_EQ2_16BitString_ByName("char_name").data.length() > 0) ? response->getType_EQ2_16BitString_ByName("char_name").data.c_str() : "");

					// JA: trying to recognize /camp vs LD (see ZoneServer::ClientProcess())
					if ((player->GetActivityStatus() & ACTIVITY_STATUS_CAMPING) == 0)
						player->SetActivityStatus(player->GetActivityStatus() + ACTIVITY_STATUS_CAMPING);
					//response->PrintPacket();
					QueuePacket(response->serialize());
					safe_delete(response);
					if (disconnect)
						Disconnect();
				}
			}
		}
		safe_delete(request);
		break;
	}
	case OP_StoodMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_StoodMsg", opcode, opcode);
		if (camp_timer)
		{
			// JA: clear camping flag
			if ((player->GetActivityStatus() & ACTIVITY_STATUS_CAMPING) > 0)
				player->SetActivityStatus(player->GetActivityStatus() - ACTIVITY_STATUS_CAMPING);
			safe_delete(camp_timer);
			EQ2Packet* outapp = new EQ2Packet(OP_CampAbortedMsg, 0, 0);
			QueuePacket(outapp);
		}
		player->SetTempVisualState(0);
		break;
	}
	case OP_StandMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_StandMsg", opcode, opcode);
		if (camp_timer)
		{
			// JA: clear camping flag
			if ((player->GetActivityStatus() & ACTIVITY_STATUS_CAMPING) > 0)
				player->SetActivityStatus(player->GetActivityStatus() - ACTIVITY_STATUS_CAMPING);
			safe_delete(camp_timer);
			EQ2Packet* outapp = new EQ2Packet(OP_CampAbortedMsg, 0, 0);
			QueuePacket(outapp);
		}
		player->SetTempVisualState(539);
		break;
	}
	case OP_SitMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_SitMsg", opcode, opcode);
		player->SetTempVisualState(538);
		break;
	}
	case OP_SatMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_SatMsg", opcode, opcode);
		player->SetTempVisualState(540);
		break;
	}
	case OP_QuestJournalOpenMsg:
	case OP_QuestJournalInspectMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_QuestJournalOpenMsg, OP_QuestJournalInspectMsg", opcode, opcode);
		if (app->size < sizeof(int32))
			break;
		int32 quest_id = 0;
		memcpy(&quest_id, app->pBuffer, sizeof(int32));
		Quest* quest = GetActiveQuest(quest_id);
		if (quest)
			QueuePacket(quest->QuestJournalReply(GetVersion(), GetNameCRC(), player));
		else {
			quest = player->GetCompletedQuest(quest_id);
			if (quest)
				QueuePacket(quest->QuestJournalReply(GetVersion(), GetNameCRC(), player, 0, 1, true));
		}
		break;
	}
	case OP_QuestJournalSetVisibleMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_QuestJournalSetVisibleMsg", opcode, opcode);
		PacketStruct* packet = configReader.getStruct("WS_QuestJournalVisible", GetVersion());
		if (packet && packet->LoadPacketData(app->pBuffer, app->size)) {
			int32 quest_id = packet->getType_int32_ByName("quest_id");
			bool hidden = packet->getType_int8_ByName("visible") == 1 ? false : true;
			GetPlayer()->MPlayerQuests.readlock(__FUNCTION__, __LINE__);
			map<int32, Quest*>* player_quests = player->GetPlayerQuests();
			if (player_quests) {
				if (player_quests->count(quest_id) > 0)
					player_quests->at(quest_id)->SetHidden(hidden);
				else
					LogWrite(CCLIENT__ERROR, 0, "Client", "OP_QuestJournalSetVisibleMsg error: Player does not have quest with id of %u", quest_id);
			}
			else
				LogWrite(CCLIENT__ERROR, 0, "Client", "OP_QuestJournalSetVisibleMsg error: Unable to get player(%s) quests", player->GetName());
			GetPlayer()->MPlayerQuests.releasereadlock(__FUNCTION__, __LINE__);

			safe_delete(packet);
		}
		break;
	}
	case OP_MacroUpdateMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_MacroUpdateMsg", opcode, opcode);
		PacketStruct* macro_update = configReader.getStruct("WS_MacroUpdate", GetVersion());
		if (macro_update && macro_update->LoadPacketData(app->pBuffer, app->size)) {
			vector<string>* update = new vector<string>;
			int8 number = macro_update->getType_int8_ByName("number");
			int16 icon = macro_update->getType_int16_ByName("icon");
			string name = macro_update->getType_EQ2_8BitString_ByName("name").data;
			int8 count = macro_update->getType_int8_ByName("macro_count");

			if (GetVersion() <= 283) {
				update->push_back(macro_update->getType_EQ2_8BitString_ByName("command").data);
			}
			else {
				for (int8 i = 0; i < count; i++) {
					char tmp_command[15] = { 0 };
					sprintf(tmp_command, "command_%i", i);
					update->push_back(macro_update->getType_EQ2_16BitString_ByName(tmp_command).data);
				}
			}
			if (name.length() == 0)
				database.UpdateCharacterMacro(GetCharacterID(), number, 0, icon, update);
			else
				database.UpdateCharacterMacro(GetCharacterID(), number, name.c_str(), icon, update);
			safe_delete(update);
			safe_delete(macro_update);
		}
		break;
	}
	case OP_DialogSelectMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_DialogSelectMsg", opcode, opcode);
		PacketStruct* packet = configReader.getStruct("WS_DialogSelect", GetVersion());
		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);
			int32 conversation_id = packet->getType_int32_ByName("conversation_id");
			int32 response_index = packet->getType_int32_ByName("response");
			if (GetCurrentZone()) {
				MConversation.readlock();
				Spawn* spawn = conversation_spawns[conversation_id];
				Item* item = conversation_items[conversation_id];
				MConversation.releasereadlock();
				if (conversation_map.count(conversation_id) > 0 && conversation_map[conversation_id].count(response_index) > 0) {
					if (spawn)
						GetCurrentZone()->CallSpawnScript(spawn, SPAWN_SCRIPT_CONVERSATION, player, conversation_map[conversation_id][response_index].c_str());
					else if (item && lua_interface && item->GetItemScript())
						lua_interface->RunItemScript(item->GetItemScript(), conversation_map[conversation_id][response_index].c_str(), item, player);
					else
						CloseDialog(conversation_id);
				}
				else
					CloseDialog(conversation_id);
			}
			safe_delete(packet);
		}
		break;
	}
	case OP_CancelMoveObjectModeMsg: {
		SetSpawnPlacementMode(Client::ServerSpawnPlacementMode::DEFAULT);
		if (GetTempPlacementSpawn())
		{
			Spawn* tmp = GetTempPlacementSpawn();
			SetTempPlacementSpawn(nullptr);
			SetPlacementUniqueItemID(0);
			GetCurrentZone()->RemoveSpawn(tmp, true, false, true, true, true);
			break; // break out early if we are tied to a temp spawn
		}

		// if we are moving some other object?  other use-cases not covered
		break;
	}
	case OP_PositionMoveableObject: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_PositionMoveableObject", opcode, opcode);
		PacketStruct* place_object = configReader.getStruct("WS_PlaceMoveableObject", GetVersion());
		if (place_object && place_object->LoadPacketData(app->pBuffer, app->size)) {
			Spawn* spawn = 0;

			if (GetTempPlacementSpawn())
				spawn = GetTempPlacementSpawn();
			else
				spawn = GetPlayer()->GetSpawnWithPlayerID(place_object->getType_int32_ByName("spawn_id"));

			if (!spawn) {
				SimpleMessage(CHANNEL_COLOR_YELLOW, "Unable to find spawn.");
				break;
			}
			else if (GetCurrentZone()->GetInstanceType() == PERSONAL_HOUSE_INSTANCE && !HasOwnerOrEditAccess())
			{
				SimpleMessage(CHANNEL_COLOR_RED, "This is not your home!");
				break;
			}

			// handles instantiation logic + adding to zone of a new house object
			PopulateHouseSpawn(place_object);

			float newHeading = place_object->getType_float_ByName("heading") + 180;

			char query[256];

			switch (GetSpawnPlacementMode())
			{
			case ServerSpawnPlacementMode::OPEN_HEADING:
			{
				if (spawn && spawn->IsWidget())
				{
					Widget* widget = (Widget*)spawn;
					widget->SetOpenHeading(newHeading);
					widget->SetIncludeHeading(true);

					spawn->position_changed = true;

					_snprintf(query, 256, "open_heading=%f,include_heading=1", newHeading);
					if (database.UpdateSpawnWidget(widget->GetWidgetID(), query))
						SimpleMessage(CHANNEL_COLOR_YELLOW, "Successfully saved widget open heading information.");
				}
				else
					SimpleMessage(CHANNEL_COLOR_YELLOW, "Spawn is not widget, unable to set close heading information.");
				break;
			}
			case ServerSpawnPlacementMode::CLOSE_HEADING:
			{
				if (spawn && spawn->IsWidget())
				{
					Widget* widget = (Widget*)spawn;
					widget->SetClosedHeading(newHeading);
					widget->SetIncludeHeading(true);

					spawn->position_changed = true;
					_snprintf(query, 256, "closed_heading=%f,include_heading=1", newHeading);
					if (database.UpdateSpawnWidget(widget->GetWidgetID(), query))
						SimpleMessage(CHANNEL_COLOR_YELLOW, "Successfully saved widget close heading information.");

					if (spawn->GetSpawnLocationID())
					{
						Query query;
						query.RunQuery2(Q_INSERT, "update spawn_location_placement set heading = %f where id = %u", newHeading, spawn->GetSpawnLocationID());
					}
				}
				else
					SimpleMessage(CHANNEL_COLOR_YELLOW, "Spawn is not widget, unable to set close heading information.");
				break;
			}
			default:
			{
				spawn->SetX(place_object->getType_float_ByName("x"));
				spawn->SetY(place_object->getType_float_ByName("y"));
				spawn->SetZ(place_object->getType_float_ByName("z"));
				spawn->SetHeading(newHeading);
				spawn->SetSpawnOrigX(spawn->GetX());
				spawn->SetSpawnOrigY(spawn->GetY());
				spawn->SetSpawnOrigZ(spawn->GetZ());
				spawn->SetSpawnOrigHeading(spawn->GetHeading());
				if (spawn->GetSpawnLocationID() > 0 && database.UpdateSpawnLocationSpawns(spawn))
					SimpleMessage(CHANNEL_COLOR_YELLOW, "Successfully saved spawn information.");
				else if (spawn->GetSpawnLocationID() > 0)
					SimpleMessage(CHANNEL_COLOR_YELLOW, "Error saving spawn information, see console window for details.");
			}
			}

			PopulateHouseSpawnFinalize();

			SetSpawnPlacementMode(Client::ServerSpawnPlacementMode::DEFAULT);

			safe_delete(place_object);
		}
		break;
	}
	case OP_CampAbortedMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_CampAbortedMsg", opcode, opcode);
		if (camp_timer)
		{
			// JA: clear camping flag
			if ((player->GetActivityStatus() & ACTIVITY_STATUS_CAMPING) > 0)
				player->SetActivityStatus(player->GetActivityStatus() - ACTIVITY_STATUS_CAMPING);
			safe_delete(camp_timer);
			EQ2Packet* outapp = new EQ2Packet(OP_CampAbortedMsg, 0, 0);
			QueuePacket(outapp);
		}
		break;
	}
	case OP_DoneLoadingUIResourcesMsg: {
		ClientPacketFunctions::SendUpdateSpellBook(this);
		EQ2Packet* app = new EQ2Packet(OP_DoneLoadingUIResourcesMsg, 0, 0);
		QueuePacket(app);
		if(!player_loading_complete)
		{
			const char* zone_script = world.GetZoneScript(GetCurrentZone()->GetZoneID());
			if (zone_script && lua_interface)
				lua_interface->RunZoneScript(zone_script, "player_loadcomplete", GetCurrentZone(), GetPlayer());
			player_loading_complete = true;
		}
		break;
	}
	case OP_DoneLoadingZoneResourcesMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_DoneLoadingZoneResourcesMsg", opcode, opcode);
		SendZoneSpawns();
		break;
	}
	case OP_DefaultGroupOptionsRequestMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_DefaultGroupOptionsRequestMsg", opcode, opcode);
		SendDefaultGroupOptions();
		break;
	}
	case OP_DoneLoadingEntityResourcesMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_DoneLoadingEntityResourcesMsg", opcode, opcode);
		if (!IsReadyForSpawns())
			SetReadyForSpawns(true);
		SendCharInfo();
		pos_update.Start();
		quest_pos_timer.Start();
		break;
	}
	case OP_LootItemsRequestMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_LootItemsRequestMsg", opcode, opcode);
		HandleLoot(app);
		break;
	}
	case OP_WaypointSelectMsg: {
		PacketStruct* packet = configReader.getStruct("WS_WaypointSelect", GetVersion());
		if (packet) {
			if (packet->LoadPacketData(app->pBuffer, app->size)) {
				int32 selection = packet->getType_int32_ByName("selection");
				if (selection > 0) {
					SelectWaypoint(selection);
				}
			}
		}
		break;
	}
	case OP_KnowledgeWindowSlotMappingMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_KnowledgeWindowSlotMappingMsg", opcode, opcode);
		PacketStruct* packet = configReader.getStruct("WS_SpellSlotMapping", GetVersion());
		if (packet) {
			if (packet->LoadPacketData(app->pBuffer, app->size)) {
				int num_updates = packet->getType_int16_ByName("spell_count");
				int32 spell_id = 0;
				int16 slot_id = 0;
				char tmp_spell_id[15];
				char tmp_slot[15];
				for (int i = 0; i < num_updates; i++) {
					memset(tmp_spell_id, 0, 15);
					memset(tmp_slot, 0, 15);
					sprintf(tmp_spell_id, "spell_id_%i", i);
					sprintf(tmp_slot, "slot_id_%i", i);
					spell_id = packet->getType_int32_ByName(tmp_spell_id);
					if (spell_id > 0) {
						slot_id = packet->getType_int16_ByName(tmp_slot);
						SpellBookEntry* spell = player->GetSpellBookSpell(spell_id);
						if (spell && spell->slot != slot_id) {
							spell->slot = slot_id;
							spell->save_needed = true;
						}
					}
				}
			}
			safe_delete(packet);
		}
		//SendKnowledgeWindowSlot();
		break;
	}
	case OP_ReadyToZoneMsg: {
		if (!IsReadyForSpawns())
		{
			LogWrite(WORLD__INFO, 0, "World", "OP_ReadyToZone: Player %s is logging into zone, skipping disconnect.");
		}
		else
		{
			LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_ReadyToZoneMsg", opcode, opcode);
			if (client_zoning)
				LogWrite(WORLD__INFO, 0, "World", "OP_ReadyToZone: Player %s zoning to %s", player->GetName(), GetCurrentZone()->GetZoneName());
			else
				LogWrite(WORLD__ERROR, 0, "World", "OP_ReadyToZone: Player %s attempting to zone without server authorization.", player->GetName());
			Disconnect();
		}
		break;
	}
	case OP_ClientFellMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_ClientFellMsg (ouch!)", opcode, opcode);
		PacketStruct* request = configReader.getStruct("WS_ClientFell", GetVersion());
		if (request && request->LoadPacketData(app->pBuffer, app->size)) {
			float height = request->getType_float_ByName("height");
			/*int32 spawn_id = request->getType_int32_ByName("spawn_id");
			if(GetPlayer()->GetSpawnWithPlayerID(spawn_id) != GetPlayer()){
			cout << "Error: " << GetPlayer()->GetName() << " called ClientFell with an invalid ID of: " << spawn_id << endl;
			break;
			}*/
			float safe_height = 13.0f;
			Skill* skill = GetPlayer()->GetSkillByName("Safe Fall", true);
			GetPlayer()->MStats.lock();
			float deflectionStat = GetPlayer()->stats[ITEM_STAT_SAFE_FALL];
			GetPlayer()->MStats.unlock();
			if (skill)
				safe_height += (skill->current_val + 1 + deflectionStat) / 5;

			if (height > safe_height) {
				int16 damage = (int16)ceil((height - safe_height) * 125);
				if (height >= 80)
					damage = 30000;
				//cout << "Detected fall height:" << height << " damage:" << damage << endl;
				if (damage > 0) {
					GetPlayer()->TakeDamage(damage);
					if (GetPlayer()->GetPlayerStatisticValue(STAT_PLAYER_HIGHEST_FALLING_HIT) < damage)
						GetPlayer()->UpdatePlayerStatistic(STAT_PLAYER_HIGHEST_FALLING_HIT, damage, true);
					if (!GetPlayer()->GetInvulnerable())
						GetPlayer()->SetCharSheetChanged(true);
					GetCurrentZone()->SendDamagePacket(0, GetPlayer(), DAMAGE_PACKET_TYPE_SIMPLE_DAMAGE, GetPlayer()->GetInvulnerable() ? DAMAGE_PACKET_RESULT_INVULNERABLE : DAMAGE_PACKET_RESULT_SUCCESSFUL, DAMAGE_PACKET_DAMAGE_TYPE_FALLING, damage, 0);
					if (GetPlayer()->GetHP() == 0) {
						GetCurrentZone()->KillSpawn(false, GetPlayer(), 0);
					}
				}
			}
			safe_delete(request);
		}
		break;
	}
	case OP_MapFogDataUpdateMsg: {

		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_MapFogDataUpdateMsg", opcode, opcode);
		LogWrite(MISC__TODO, 3, "TODO", "Handle (OP_MapFogDataUpdateMsg), ignoring it for now\n\t(%s, function: %s, line #: %i)", __FILE__, __FUNCTION__, __LINE__);
		break;
	}
	case OP_SelectZoneTeleporterDestinatio: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_SelectZoneTeleporterDestinatio", opcode, opcode);
		ProcessTeleportLocation(app);
		break;
	}
	case OP_SendLatestRequestMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_SendLatestRequestMsg", opcode, opcode);
		uchar blah25[] = { 0x01 };
		EQ2Packet* app25 = new EQ2Packet(OP_ClearDataMsg, blah25, sizeof(blah25));
		QueuePacket(app25);
		break;
	}
	case OP_ShowCreateFromRecipeUIMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_ShowCreateFromRecipeUIMsg", opcode, opcode);
		break;
		/*uchar blah[] ={0x09,0x0e,0x00,0x51,0x75,0x65,0x65,0x6e,0x27,0x73,0x20,0x43,0x6f,0x6c,0x6f,0x6e
		,0x79,0x00,0x00,0x00,0x00,0x40,0x40,0xff,0xff,0xff};
		EQ2Packet* app = new EQ2Packet(OP_EncounterBrokenMsg, blah, sizeof(blah));
		QueuePacket(app);

		uchar blah2[] = {0x00,0x00,0xff,0xff,0xff,0xff};
		app = new EQ2Packet(OP_CreateCharFromCBBRequestMsg, blah2, sizeof(blah2));
		QueuePacket(app);

		uchar blah3[] ={0x09,0x17,0x00,0x5c,0x23,0x46,0x46,0x45,0x34,0x30,0x30,0x20,0x51,0x75,0x65,0x65
		,0x6e,0x27,0x73,0x20,0x43,0x6f,0x6c,0x6f,0x6e,0x79,0x00,0x00,0x00,0x00,0xa0,0x40
		,0xff,0xff,0xff};
		app = new EQ2Packet(OP_CreateCharFromCBBRequestMsg, blah3, sizeof(blah3));
		QueuePacket(app);

		uchar blah4[] ={0x0b,0x00,0x21,0x00,0x00,0x00,0x1d,0x81,0x42,0x17,0x81,0x42,0x17,0x81,0x42,0x17
		,0x81,0x42,0x17,0x81,0x42,0x17,0x81,0x42,0x17,0x81,0x42,0x17,0x81,0x42,0x17,0x81
		,0x42,0x17,0x81,0x42,0x17,0x81,0x42};
		app = new EQ2Packet(OP_UpdateSpellBookMsg, blah4, sizeof(blah4));
		QueuePacket(app);
		uchar blah5[] ={0x00,0x00};
		app = new EQ2Packet(OP_RecipeDetailsMsg, blah5, sizeof(blah5));
		QueuePacket(app);
		break;*/
		//player->GetPlayerInfo()->GetInfo()->cur_power = 100;
		//EQ2Packet* app = player->GetPlayerInfo()->serialize(1);
		//QueuePacket(app);
	}
	case OP_BeginItemCreationMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_BeginItemCreationMsg", opcode, opcode);
		//DumpPacket(app->pBuffer, app->size);
		PacketStruct* packet = configReader.getStruct("WS_BeginItemCreation", GetVersion());
		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);
			int32 item = 0;
			vector<int32> items;
			char tmp_item_id[20];
			item = packet->getType_int32_ByName("primary_component_id");
			if (item > 0)
				items.push_back(item);
			item = 0;
			int8 build_components = packet->getType_int8_ByName("num_build_components");
			for (int8 i = 0; i < build_components; i++) {
				memset(tmp_item_id, 0, 20);
				sprintf(tmp_item_id, "component_id_%i", i);
				item = packet->getType_int32_ByName(tmp_item_id);
				if (item > 0)
					items.push_back(item);

				item = 0;
			}

			item = packet->getType_int32_ByName("fuel_id");
			if (item > 0)
				items.push_back(item);

			GetCurrentZone()->GetTradeskillMgr()->BeginCrafting(this, items);

			safe_delete(packet);
		}
		break;
	}
	case OP_StopItemCreationMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_StopItemCreationMsg", opcode, opcode);
		//DumpPacket(app->pBuffer, app->size);
		GetCurrentZone()->GetTradeskillMgr()->StopCrafting(this);
		break;
	}
	case OP_SignalMsg: {
		PacketStruct* packet = configReader.getStruct("WS_Signal", GetVersion());
		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);
			EQ2_16BitString str = packet->getType_EQ2_16BitString_ByName("signal");
			if (str.size > 0) {
				if (strcmp(str.data.c_str(), "sys_client_avatar_ready") == 0) {
					SetReadyForUpdates();
					GetPlayer()->SendSpawnChanges(true);
				}
				const char* zone_script = world.GetZoneScript(player->GetZone()->GetZoneID());
				if (zone_script && lua_interface)
				{
					lua_interface->RunZoneScript(zone_script, "signal_changed", player->GetZone(), player, 0, str.data.c_str());
				}
			}
		}
		break;
	}
	case OP_EntityVerbsRequestMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_EntityVerbsRequestMsg", opcode, opcode);
		HandleVerbRequest(app);
		break;
	}
	case OP_EntityVerbsVerbMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_EntityVerbsVerbMsg", opcode, opcode);
		PacketStruct* packet = configReader.getStruct("WS_EntityVerbsVerb", GetVersion());
		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);
			int32 spawn_id = packet->getType_int32_ByName("spawn_id");
			player->SetTarget(player->GetSpawnWithPlayerID(spawn_id));
			Spawn* spawn = player->GetTarget();
			if (spawn && !spawn->IsNPC() && !spawn->IsPlayer()) {
				string command = packet->getType_EQ2_16BitString_ByName("command").data;

				if (!HandleHouseEntityCommands(spawn, spawn_id, command))
				{
					if (EntityCommandPrecheck(spawn, command.c_str())) {
						if (spawn->IsGroundSpawn())
							((GroundSpawn*)spawn)->HandleUse(this, command);
						else if (spawn->IsObject())
							((Object*)spawn)->HandleUse(this, command);
						else if (spawn->IsWidget())
							((Widget*)spawn)->HandleUse(this, command);
						else if (spawn->IsSign())
							((Sign*)spawn)->HandleUse(this, command);
					}
				}
			}
			else {
				EQ2_16BitString command = packet->getType_EQ2_16BitString_ByName("command");
				if (command.size > 0) {
					string command_name = command.data;					
					if (command_name.find(" ") < 0xFFFFFFFF) {
						if (GetVersion() <= 546) { //this version uses commands in the form "Buy From Merchant" instead of buy_from_merchant
							string::size_type pos = command_name.find(" ");
							while(pos != string::npos){
								command_name.replace(pos, 1, "_");
								pos = command_name.find(" ");
							}
						}
						else
							command_name = command_name.substr(0, command_name.find(" "));
					}
					int32 handler = commands.GetCommandHandler(command_name.c_str());
					if (handler != 0xFFFFFFFF) {
						if (command.data == command_name) {
							command.data = "";
							command.size = 0;
						}
						else {
							command.data = command.data.substr(command.data.find(" ") + 1);
							command.size = command.data.length();
						}
						commands.Process(handler, &command, this);
					}
					else {
						if (spawn && spawn->IsNPC()) {
							if (EntityCommandPrecheck(spawn, command.data.c_str())) {
								if (!((NPC*)spawn)->HandleUse(this, command.data)) {
									command_name = command.data;
									string::size_type pos = command_name.find(" ");
									while (pos != string::npos) {
										command_name.replace(pos, 1, "_");
										pos = command_name.find(" ");
									}
									if (!((NPC*)spawn)->HandleUse(this, command_name)) { //convert the spaces to underscores and see if that makes a difference
										LogWrite(WORLD__ERROR, 0, "World", "Unhandled command in OP_EntityVerbsVerbMsg: %s", command.data.c_str());
									}
								}
							}
						}
						else
							LogWrite(WORLD__ERROR, 0, "World", "Unknown command in OP_EntityVerbsVerbMsg: %s", command.data.c_str());
					}
				}
			}
			safe_delete(packet);
		}
		break;
	}
	case OP_SkillInfoRequest: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_SkillInfoRequest", opcode, opcode);
		HandleSkillInfoRequest(app);
		break;
	}
	case OP_UpdateTargetMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_UpdateTargetMsg", opcode, opcode);
		int16 index = 0;
		memcpy(&index, app->pBuffer, sizeof(int16));
		if (index == 0xFFFF)
			GetPlayer()->SetTarget(0);
		else {
			Spawn* spawn = GetPlayer()->GetSpawnByIndex(index);
			if(spawn)
				GetPlayer()->SetTarget(spawn);
			else {
		LogWrite(PLAYER__ERROR, 1, "Player", "Player %s tried to target %u index, but that index was not valid.", GetPlayer()->GetName(), index);
			}
		}
		if (GetPlayer()->GetTarget())
			GetCurrentZone()->CallSpawnScript(GetPlayer()->GetTarget(), SPAWN_SCRIPT_TARGETED, GetPlayer());
		//player->SetTarget((int16*)app->pBuffer);
		break;
	}
	case OP_ExamineInfoRequestMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_ExamineInfoRequestMsg", opcode, opcode);
		HandleExamineInfoRequest(app);
		break;
	}
	case OP_QuickbarUpdateMsg:
		//case OP_QuickbarAddMsg:
	{
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_QuickbarUpdateMsg, OP_QuickbarAddMsg", opcode, opcode);
		HandleQuickbarUpdateRequest(app);
		break;
	}
	case OP_PredictionUpdateMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_PredictionUpdateMsg", opcode, opcode);
		if (version <= 546) {
			int8 offset = 9;
			if (app->pBuffer[0] == 0xFF)
				offset += 2;
			if (app->size > offset) {
				if (player->IsCasting()) {
					float distance = 0;
					float x = player->GetX();
					float y = player->GetY();
					float z = player->GetZ();
					player->PrepareIncomingMovementPacket(app->size - offset, app->pBuffer + offset, version);
					distance = player->GetDistance(x, y, z, false);
					if (distance > .5)
						current_zone->Interrupted(player, 0, SPELL_ERROR_INTERRUPTED, false, true);
				}
				else
					player->PrepareIncomingMovementPacket(app->size - offset, app->pBuffer + offset, version);
				player_pos_changed = true;
				//DumpPacket(app);
			}
		}
		else {
			EQ2Packet* app = new EQ2Packet(OP_PredictionUpdateMsg, 0, 0);
			QueuePacket(app);
			LogWrite(CCLIENT__PACKET, 0, "Client", "Dump/Print Packet in func: %s, line: %i", __FUNCTION__, __LINE__);
		}
		break;
	}
	case OP_RemoteCmdMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_RemoteCmdMsg", opcode, opcode);
		if (app->size > 0) {
			EQ2_CommandString remote(app->pBuffer, app->size);

			LogWrite(PACKET__DEBUG, 1, "Packet", "RemoteCmdMsg Packet dump:");
#if EQDEBUG >= 9
			DumpPacket(app);
#endif
			commands.Process(remote.handler, &remote.command, this);
		}
		else //bad client, disconnect
			Disconnect();
		break;
	}
	case OP_CancelSpellCast: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_CancelSpellCast", opcode, opcode);
		current_zone->Interrupted(player, 0, 0, true);
		SimpleMessage(CHANNEL_SPELLS_OTHER, "You stop casting.");
		break;
	}
	case OP_UpdatePositionMsg: {
		LogWrite(OPCODE__DEBUG, 7, "Opcode", "Opcode 0x%X (%i): OP_UpdatePositionMsg", opcode, opcode);
		int8 offset = 13;
		if (app->pBuffer[0] == 0xFF)
			offset += 2;
		if (app->size > offset) {
			if (player->IsCasting()) {
				float distance = 0;
				float x = player->GetX();
				float y = player->GetY();
				float z = player->GetZ();
				player->PrepareIncomingMovementPacket(app->size - offset, app->pBuffer + offset, version);
				distance = player->GetDistance(x, y, z, false);
				if (distance > .5)
					current_zone->Interrupted(player, 0, SPELL_ERROR_INTERRUPTED, false, true);
			}
			else
				player->PrepareIncomingMovementPacket(app->size - offset, app->pBuffer + offset, version);
			player_pos_changed = true;
			LogWrite(CCLIENT__PACKET, 0, "Client", "Dump/Print Packet in func: %s, line: %i", __FUNCTION__, __LINE__);
			//DumpPacket(app);
		}
		break;
	}
	case OP_MailSendMessageMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_MailSendMessageMsg", opcode, opcode);
		HandleSentMail(app);
		break;
	}
	case OP_StopTrackingMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_StopTrackingMsg", opcode, opcode);
		player->GetZone()->RemovePlayerTracking(player, TRACKING_STOP);
		break;
	}
	case OP_BeginTrackingMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_BeginTrackingMsg", opcode, opcode);
		PacketStruct* packet = configReader.getStruct("WS_BeginTracking", GetVersion());
		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);
			int32 spawn_id = packet->getType_int32_ByName("spawn_id");
			Spawn* spawn = player->GetSpawnWithPlayerID(spawn_id);
			if (spawn) {
				AddWaypoint(spawn->GetName(), WAYPOINT_CATEGORY_TRACKING, spawn_id);
				BeginWaypoint(spawn->GetName(), spawn->GetX(), spawn->GetY(), spawn->GetZ());
				player->GetZone()->RemovePlayerTracking(player, TRACKING_CLOSE_WINDOW);
			}
			safe_delete(packet);
		}
		break;
	}
	case OP_BioUpdateMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_BioUpdateMsg", opcode, opcode);
		PacketStruct* packet = configReader.getStruct("WS_BioUpdate", GetVersion());
		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);
			player->SetBiography(packet->getType_EQ2_16BitString_ByName("biography").data);
			safe_delete(packet);
		}
		break;
	}
	case OP_RewardPackMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_RewardPackMsg", opcode, opcode);

		/* This logging is still here because I remember another system using this packet and just want to make sure we can figure out that it's being sent
		   when we come across it (scatman) */
		const char* name = app->GetOpcodeName();
		if (name)
			LogWrite(WORLD__DEBUG, 0, "World", "%s Received OP_RewardPackMsg %04i", name, app->GetRawOpcode());
		else
			LogWrite(WORLD__DEBUG, 0, "World", "Received OP_RewardPackMsg %04i", app->GetRawOpcode());
		//DumpPacket(app);
		PacketStruct* packet = configReader.getStruct("WS_RewardPackMsg", GetVersion());
		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);
			string recruiter_name = packet->getType_EQ2_16BitString_ByName("recruiter_name").data;

			/* Player has contacted a guild recruiter */
			if (recruiter_name.length() > 0) {
				Guild* guild = guild_list.GetGuild(packet->getType_int32_ByName("guild_id"));
				Client* recruiter = zone_list.GetClientByCharName(recruiter_name);
				if (recruiter && guild) {
					Message(CHANNEL_GUILD_EVENT, "Contact request sent to %s of %s.", recruiter->GetPlayer()->GetName(), guild->GetName());
					recruiter->Message(CHANNEL_GUILD_EVENT, "%s [%u %s], [0 Unskilled] (%s) is requesting to speak to YOU about joining the guild.", player->GetName(), player->GetLevel(), classes.GetClassNameCase(player->GetAdventureClass()).c_str(), races.GetRaceNameCase(player->GetRace()));
					recruiter->PlaySound("ui_guild_page");
				}
			}
			/* New picture taken for guild recruiting */
			else {
				//DumpPacket(app->pBuffer, app->size);
				int32 guild_id = 0;
				int16 picture_data_size = 0;
				unsigned char* recruiter_picture_data = 0;
				memcpy(&guild_id, app->pBuffer + 4, sizeof(int32));
				memcpy(&picture_data_size, app->pBuffer + 15, sizeof(int16));
				Guild* guild = guild_list.GetGuild(guild_id);
				if (guild) {
					GuildMember* gm = guild->GetGuildMember(player);
					if (gm) {
						safe_delete_array(gm->recruiter_picture_data);
						recruiter_picture_data = new unsigned char[picture_data_size];
						for (int16 i = 0; i < picture_data_size; i++)
							memcpy(recruiter_picture_data + i, app->pBuffer + 17 + i, 2);
						gm->recruiter_picture_data = recruiter_picture_data;
						gm->recruiter_picture_data_size = picture_data_size;
						guild->SetMemberSaveNeeded(true);
					}
				}
			}
			safe_delete(packet);
		}
		break;
	}
	case OP_PetOptions: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_PetOptions", opcode, opcode);
		Spawn* target = player->GetTarget();
		PacketStruct* packet = configReader.getStruct("WS_PetOptions", GetVersion());
		if (packet && target && (target == player->GetPet() || target == player->GetCharmedPet() || target == player->GetDeityPet() || target == player->GetCosmeticPet())) {
			bool change = false;
			packet->LoadPacketData(app->pBuffer, app->size);

			string name = packet->getType_EQ2_16BitString_ByName("pet_name").data;
			if (strlen(name.c_str()) != 0) {
				target->SetName(name.c_str());
				player->GetInfoStruct()->set_pet_name(name);
				GetCurrentZone()->SendUpdateTitles(target);
				change = true;
			}

			int8 pet_behavior = player->GetInfoStruct()->get_pet_behavior();
			// Check protect self setting and update if needed
			if (packet->getType_int8_ByName("protect_self") == 1) {
				if ((pet_behavior & 2) == 0) {
					player->GetInfoStruct()->set_pet_behavior(pet_behavior + 2);
					change = true;
				}
			}
			else {
				if ((pet_behavior & 2) != 0) {
					player->GetInfoStruct()->set_pet_behavior(pet_behavior - 2);
					change = true;
				}
			}

			// Check protect master setting and update if needed
			if (packet->getType_int8_ByName("protect_master") == 1) {
				if ((pet_behavior & 1) == 0) {
					player->GetInfoStruct()->set_pet_behavior(pet_behavior + 1);
					change = true;
				}
			}
			else {
				if ((pet_behavior & 1) != 0) {
					player->GetInfoStruct()->set_pet_behavior(pet_behavior - 1);
					change = true;
				}
			}

			int8 pet_movement = player->GetInfoStruct()->get_pet_movement();
			// Check stay/follow setting and update if needed
			if (packet->getType_int8_ByName("stay_follow_toggle") == 1) {
				if (pet_movement != 2) {
					player->GetInfoStruct()->set_pet_movement(2);
					change = true;
				}
			}
			else {
				if (pet_movement != 1) {
					player->GetInfoStruct()->set_pet_movement(1);
					change = true;
				}
			}

			// Ranged/Melee settings are not implemented yet

			if (change)
				player->SetCharSheetChanged(true);

			safe_delete(packet);
		}
		break;
	}
	case OP_RecipeBook: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_RecipeBook", opcode, opcode);
		SendRecipeList();
		break;
	}
	case OP_BuyPlayerHouseMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_BuyPlayerHouseMsg", opcode, opcode);
		DumpPacket(app);

		PacketStruct* packet = configReader.getStruct("WS_BuyHouse", GetVersion());
		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);
			HouseZone* hz = world.GetHouseZone(packet->getType_int64_ByName("house_id"));
			if (hz) {
				int8 disable_alignment_req = rule_manager.GetGlobalRule(R_Player, DisableHouseAlignmentRequirement)->GetInt8();
				std::vector<PlayerHouse*> houses = world.GetAllPlayerHouses(GetCharacterID());
				if (houses.size() > 24)
				{
					SimpleMessage(CHANNEL_COLOR_YELLOW, "You already own 25 houses and may not own another.");
					safe_delete(packet);
					break;
				}
				if(disable_alignment_req && hz->alignment > 0 && hz->alignment != GetPlayer()->GetAlignment())
				{
					std::string req = "You must be of ";
					if (hz->alignment == 1)
						req.append("Good");
					else
						req.append("Evil");
					req.append(" alignment to purchase this house");
					SimpleMessage(CHANNEL_COLOR_YELLOW, req.c_str());
					safe_delete(packet);
					break;
				}
				int32 status_req = hz->upkeep_status + hz->cost_status;
				int32 available_status = player->GetInfoStruct()->get_status_points();
				if (status_req <= available_status && 
				((!hz->upkeep_coin && !hz->cost_coin) || 
				( (hz->upkeep_coin || hz->cost_coin) && player->RemoveCoins(hz->cost_coin+hz->upkeep_coin)))
				) // TODO: Need option to take from bank if player does not have enough coin on them
				{
					player->GetInfoStruct()->subtract_status_points(status_req);
					ZoneServer* instance_zone = zone_list.GetByInstanceID(0, hz->zone_id);
					int32 upkeep_due = Timer::GetUnixTimeStamp() + 604800; // 604800 = 7 days
					int64 unique_id = database.AddPlayerHouse(GetPlayer()->GetCharacterID(), hz->id, instance_zone->GetInstanceID(), upkeep_due);
					world.AddPlayerHouse(GetPlayer()->GetCharacterID(), hz->id, unique_id, instance_zone->GetInstanceID(), upkeep_due, 0, 0, GetPlayer()->GetName());
					//ClientPacketFunctions::SendHousingList(this);
					PlayerHouse* ph = world.GetPlayerHouseByUniqueID(unique_id);
					ClientPacketFunctions::SendBaseHouseWindow(this, hz, ph, this->GetPlayer()->GetID());
					PlaySound("coin_cha_ching");
				}
				else
				{
					SimpleMessage(CHANNEL_COLOR_YELLOW, "You do not have enough money to purchase the house.");
					PlaySound("buy_failed");
				}
			}
		}

		safe_delete(packet);
		break;
	}
	case OP_EnterHouseMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_EnterHouseMsg", opcode, opcode);
		DumpPacket(app);
		PacketStruct* packet = configReader.getStruct("WS_EnterHouse", GetVersion());
		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);
			PlayerHouse* ph = world.GetPlayerHouseByUniqueID(packet->getType_int64_ByName("house_id"));
			if (ph) {
				HouseZone* hz = world.GetHouseZone(ph->house_id);
				if (hz) {
					ZoneServer* house = zone_list.GetByInstanceID(ph->instance_id, hz->zone_id);
					if (house) {
						Zone(house, true);
					}
				}
			}
		}

		safe_delete(packet);
		break;
	}
	case OP_PayHouseUpkeepMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_PayHouseUpkeepMsg", opcode, opcode);
		DumpPacket(app);
		PacketStruct* packet = configReader.getStruct("WS_PayUpkeep", GetVersion());

		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);

			int64 houseID = packet->getType_int64_ByName("house_id");
			PlayerHouse* ph = world.GetPlayerHouseByUniqueID(houseID);
			if (ph)
			{
				HouseZone* hz = world.GetHouseZone(ph->house_id);
				if (!hz)
				{
					Message(CHANNEL_COLOR_YELLOW, "HouseZone ID %u does NOT exist!", ph->house_id);
					safe_delete(packet);
					break;
				}

				int32 upkeep_due = Timer::GetUnixTimeStamp() + 604800;
				if (((sint64)ph->upkeep_due - (sint64)Timer::GetUnixTimeStamp()) > 0)
				{
					upkeep_due = ph->upkeep_due + 604800; // 604800 = 7 days

					if (upkeep_due > (Timer::GetUnixTimeStamp() + 7257600)) // 84 days max upkeep to pay https://eq2.zam.com/wiki/Housing_%28EQ2%29#Upkeep
					{
						Message(CHANNEL_COLOR_YELLOW, "You cannot pay more than 3 months of upkeep.");
						PlaySound("buy_failed");
						safe_delete(packet);
						break;
					}
				}
				bool escrowChange = false;
				int64 statusReq = hz->upkeep_status;
				int64 tmpRecoverStatus = 0;
				if(ph->escrow_status && statusReq >= ph->escrow_status )
				{
					escrowChange = true;
					tmpRecoverStatus = ph->escrow_status;
					statusReq -= ph->escrow_status;
					ph->escrow_status = 0;
				}
				else if (ph->escrow_status && statusReq && statusReq <= ph->escrow_status)
				{
					escrowChange = true;
					ph->escrow_status -= statusReq;
					tmpRecoverStatus = statusReq;
					statusReq = 0;
				}

				int64 coinReq = hz->upkeep_coin;
				int64 tmpRecoverCoins = 0;
				if (ph->escrow_coins && coinReq >= ph->escrow_coins) // more required to upkeep than in escrow, subtract what we have left
				{
					escrowChange = true;
					tmpRecoverCoins = ph->escrow_coins;
					coinReq -= ph->escrow_coins;
					ph->escrow_coins = 0;
				}
				else if (ph->escrow_coins && coinReq && coinReq <= ph->escrow_coins)
				{
					escrowChange = true;
					// more than enough in escrow, subtract and make our cost 0!
					ph->escrow_coins -= coinReq;
					tmpRecoverCoins = coinReq;
					coinReq = 0;
				}

				int32 available_status_points = player->GetInfoStruct()->get_status_points();
				if(!statusReq || (statusReq && statusReq <= available_status_points))
				{
					if(coinReq && player->RemoveCoins(coinReq))
						coinReq = 0;
					
					if(!coinReq && statusReq && player->GetInfoStruct()->subtract_status_points(statusReq))
						statusReq = 0;
				}
				
				if (!coinReq && !statusReq) // TODO: Need option to take from bank if player does not have enough coin on them
				{
					database.AddHistory(ph, GetPlayer()->GetName(), "Paid Upkeep", Timer::GetUnixTimeStamp(), hz->upkeep_coin, 0, 0);

					if (escrowChange)
						database.UpdateHouseEscrow(ph->house_id, ph->instance_id, ph->escrow_coins, ph->escrow_status);

					ph->upkeep_due = upkeep_due;
					database.SetHouseUpkeepDue(GetCharacterID(), ph->house_id, ph->instance_id, ph->upkeep_due);
					//ClientPacketFunctions::SendHousingList(this);
					ClientPacketFunctions::SendBaseHouseWindow(this, hz, ph, this->GetPlayer()->GetID());
					PlaySound("coin_cha_ching");
				}
				else
				{
					// recover the escrow we were going to use but could not spend due to lack of funds
					if (tmpRecoverCoins)
						ph->escrow_coins += tmpRecoverCoins;
					if(tmpRecoverStatus)
						ph->escrow_status += tmpRecoverStatus;

					SimpleMessage(CHANNEL_COLOR_YELLOW, "You do not have enough money  or status to pay for upkeep.");
					PlaySound("buy_failed");
				}
			}
			else
				Message(CHANNEL_COLOR_YELLOW, "PlayerHouse ID %u does NOT exist!", houseID);
		}

		safe_delete(packet);
		break;
	}
	case OP_ExitHouseMsg: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_ExitHouseMsg", opcode, opcode);
		int32 instance_id = GetCurrentZone()->GetInstanceID();
		if (instance_id > 0) {
			PlayerHouse* ph = world.GetPlayerHouseByInstanceID(instance_id);
			if (ph) {
				HouseZone* hz = world.GetHouseZone(ph->house_id);
				if (hz) {
					ZoneServer* new_zone = zone_list.Get(hz->exit_zone_id);

					// determine if this is an instanced zone that already exists
					ZoneServer* instance_zone = GetPlayer()->GetGroupMemberInZone(hz->exit_zone_id);
					if (instance_zone || new_zone) {
						GetPlayer()->SetX(hz->exit_x);
						GetPlayer()->SetY(hz->exit_y);
						GetPlayer()->SetZ(hz->exit_z);
						GetPlayer()->SetHeading(hz->exit_heading);
						if (instance_zone)
							Zone(instance_zone->GetInstanceID(), false, true);
						else
							Zone(new_zone, false);
					}
				}
			}
		}
		DumpPacket(app);
		break;
	}
	case OP_QuestJournalWaypointMsg: {
		//DumpPacket(app);
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_QuestJournalWaypointMsg", opcode, opcode);
		PacketStruct* packet = configReader.getStruct("WS_QuestJournalWaypoint", GetVersion());
		if (packet) {
			packet->LoadPacketData(app->pBuffer, app->size);
			int32 quests = packet->getType_int32_ByName("num_quests");

			if (quests > 100) // just picking a number higher than max allowed
			{
				LogWrite(CCLIENT__ERROR, 0, "Client", "num_quests = %u - quantity too high, aborting load.", quests);
				break;
			}

			LogWrite(CCLIENT__DEBUG, 0, "Client", "num_quests = %u", quests);

			for (int32 i = 0; i < quests; i++) {
				int32 id = packet->getType_int32_ByName("quest_id_0", i);
				if (id == 0)
					continue;
				LogWrite(CCLIENT__DEBUG, 5, "Client", "quest_id = %u", id);
				bool tracked = packet->getType_int8_ByName("quest_tracked_0", i) == 1 ? true : false;
				GetPlayer()->MPlayerQuests.writelock(__FUNCTION__, __LINE__);
				if (player->player_quests.count(id) > 0) {
					player->player_quests[id]->SetTracked(tracked);
					player->player_quests[id]->SetSaveNeeded(true);
				}
				GetPlayer()->MPlayerQuests.releasewritelock(__FUNCTION__, __LINE__);
			}

			safe_delete(packet);
		}

		break;
	}
	case OP_PaperdollImage: {
/*		PacketStruct* packet = configReader.getStruct("WS_PaperdollImage", version);
		if (packet && packet->LoadPacketData(app->pBuffer, app->size)) {

			//First check if this is a new image... delete an existing partial image if one exists
			int8 packet_index = packet->getType_int8_ByName("packetIndex");
			if (packet_index == 0) {
				safe_delete_array(incoming_paperdoll.image_bytes);
				incoming_paperdoll.last_received_packet_index = 0;
				incoming_paperdoll.current_size_bytes = 0;
			}
			//return if this packet is not the one we are expecting...
			else if (packet_index != incoming_paperdoll.last_received_packet_index + 1) {
				safe_delete(packet);
				break;
			}

			//Check how many packets we're supposed to be receiving for this/these images
			incoming_paperdoll.image_num_packets = packet->getType_int8_ByName("totalNumPackets");

			//Check the image type, if this is a new type in the same series of packets we have a new image
			int8 img_type = packet->getType_int8_ByName("image_type");
			if (packet_index != 0 && img_type != incoming_paperdoll.image_type) {
				//We have a new image. Save the old data and clear before continuing
				SavePlayerImages();
			}
			incoming_paperdoll.image_type = img_type;

			//Get the size of the image data in this packet
			sint64 image_size = packet->getType_int32_ByName("imageSize");
			if (image_size <= 0 || image_size > 1048576) {
				//If this packet is saying that the array is size <= 0 or > 1 MiB return out... it shouldn't be those sizes ever
				safe_delete(packet);
				break;
			}

			//Create a new array
			int32 new_image_size = image_size;
			uchar* new_image = new uchar[incoming_paperdoll.current_size_bytes + new_image_size];
			if (incoming_paperdoll.image_bytes) {
				memcpy(new_image, incoming_paperdoll.image_bytes, incoming_paperdoll.current_size_bytes);
				safe_delete_array(incoming_paperdoll.image_bytes);
			}

			//variable i should be the index in the packet of the first PNG file byte
			vector<DataStruct*>* d_structs = packet->getStructs();
			vector<DataStruct*>::iterator itr;
			int32 i = 0;
			for (itr = d_structs->begin(); itr != d_structs->end(); itr++) {
				DataStruct* ds = (*itr);
				if (strcmp(ds->GetName(), "pngData_0") != 0)
					i += ds->GetDataSizeInBytes();
				else
					break;
			}

			//Return if this packet is bad and we would read out of bounds
			if (app->size - i < new_image_size) {
				safe_delete(packet);
				safe_delete_array(new_image);
				break;
			}

			uchar* tmp = new_image + incoming_paperdoll.current_size_bytes;
			memcpy(tmp, app->pBuffer + i, new_image_size);

			incoming_paperdoll.current_size_bytes += new_image_size;
			incoming_paperdoll.image_bytes = new_image;

			//Check if this is the last packet we're expecting for this image. Create a final image if so
			if (incoming_paperdoll.image_num_packets == 1 ||
				incoming_paperdoll.last_received_packet_index + 2 == incoming_paperdoll.image_num_packets) {
				SavePlayerImages();
			}

			incoming_paperdoll.last_received_packet_index = packet_index;
		}
		safe_delete(packet);
*/
		break;
	}

	case OP_ReadyForTakeOffMsg:
	{
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_ReadyForTakeOffMsg", opcode, opcode);

		int32 index = GetCurrentZone()->GetFlightPathIndex(GetPendingFlightPath());
		if (GetPendingFlightPath() > 0) {
			if (index != -1) {
				PacketStruct* packet = configReader.getStruct("WS_ClearForTakeOff", GetVersion());
				if (packet) {
					packet->setDataByName("spawn_id", GetPlayer()->GetIDWithPlayerSpawn(GetPlayer()));
					packet->setDataByName("path_id", index);
					packet->setDataByName("speed", GetCurrentZone()->GetFlightPathSpeed(GetPendingFlightPath()));
					QueuePacket(packet->serialize());
					safe_delete(packet);

					on_auto_mount = true;
				}
			}
			else {
				LogWrite(CCLIENT__ERROR, 0, "Client", "OP_ReadyForTakeOffMsg recieved but unable to get an index for path (%u) in zone (%u)", GetPendingFlightPath(), GetCurrentZone()->GetZoneID());
				Message(CHANNEL_ERROR, "Unable to get index for path (%u) in zone (%u)", GetPendingFlightPath(), GetCurrentZone()->GetZoneID());
				EndAutoMount();
			}

			SetPendingFlightPath(0);

		}
		else
			LogWrite(CCLIENT__ERROR, 0, "Client", "OP_ReadyForTakeOffMsg recieved but there is no pending flight path...");

		break;
	}

	case OP_EarlyLandingRequestMsg:
	{
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_EarlyLandingRequestMsg", opcode, opcode);

		EndAutoMount();

		break;
	}

	case OP_SubmitCharCust:
	{
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): OP_SubmitCharCust", opcode, opcode);
		PacketStruct* packet = configReader.getStruct("WS_SubmitCharCust", version);
		if (packet && packet->LoadPacketData(app->pBuffer, app->size)) {
			int8 type = packet->getType_int8_ByName("type");
			if (type == 0) {
				if (player->custNPC) {
					player->custNPCTarget->CustomizeAppearance(packet);
					current_zone->SendSpawnChanges(player->custNPCTarget);
				}
				else {
					player->CustomizeAppearance(packet);
					current_zone->SendSpawnChanges(player);
				}
			}
		}

		if (player->custNPC) {
			memcpy(&player->appearance, &player->SavedApp, sizeof(AppearanceData));
			memcpy(&player->features, &player->SavedFeatures, sizeof(CharFeatures));

			if (player->custNPCTarget->IsBot())
				database.SaveBotAppearance((Bot*)player->custNPCTarget);

			player->custNPC = false;
			player->custNPCTarget = 0;
			player->changed = true;
			player->info_changed = true;
			current_zone->SendSpawnChanges(player, this);
		}

		break;
	}

	default: {
		LogWrite(OPCODE__DEBUG, 1, "Opcode", "Opcode 0x%X (%i): Unknown in %s", opcode, opcode, __FILE__);
		const char* name = app->GetOpcodeName();
		if (name)
			LogWrite(OPCODE__DEBUG, 1, "Opcode", "%s Received %04X (%i)", name, app->GetRawOpcode(), app->GetRawOpcode());
		else
			LogWrite(OPCODE__DEBUG, 1, "Opcode", "Received %04X (%i)", app->GetRawOpcode(), app->GetRawOpcode());

		//DumpPacket(app);

	}
	}
	if (!eqs || !eqs->CheckActive()) {
		return false;
	}

	return ret;
}

bool Client::HandleLootItem(Spawn* entity, Item* item) {
	if (!item) {
		SimpleMessage(CHANNEL_COLOR_YELLOW, "Unable to find item to loot!");
		return false;
	}
	if (player->item_list.HasFreeSlot() || player->item_list.CanStack(item)) {
		if (player->item_list.AssignItemToFreeSlot(item)) {
			int8 type = CHANNEL_LOOT;
			if (entity) {
				Message(type, "You loot %s from the corpse of %s", item->CreateItemLink(GetVersion()).c_str(), entity->GetName());
			}
			else {
				Message(type, "You found a %s.", item->CreateItemLink(GetVersion()).c_str());
			}
			Guild* guild = player->GetGuild();
			if (guild && item->details.tier >= ITEM_TAG_LEGENDARY) {
				char adjective[32];
				int8 type;
				memset(adjective, 0, sizeof(adjective));
				if (item->details.tier >= ITEM_TAG_MYTHICAL) {
					strncpy(adjective, "Mythical", sizeof(adjective) - 1);
					type = GUILD_EVENT_LOOTS_MYTHICAL_ITEM;
				}
				else if (item->details.tier >= ITEM_TAG_FABLED) {
					strncpy(adjective, "Fabled", sizeof(adjective) - 1);
					type = GUILD_EVENT_LOOTS_FABELED_ITEM;
				}
				else {
					strncpy(adjective, "Legendary", sizeof(adjective) - 1);
					type = GUILD_EVENT_LOOTS_LEGENDARY_ITEM;
				}
				guild->AddNewGuildEvent(type, "%s has looted the %s %s", Timer::GetUnixTimeStamp(), true, player->GetName(), adjective, item->CreateItemLink(GetVersion()).c_str());
				guild->SendMessageToGuild(type, "%s has looted the %s %s", player->GetName(), adjective, item->CreateItemLink(GetVersion()).c_str());
			}

			if (item->GetItemScript() && lua_interface)
				lua_interface->RunItemScript(item->GetItemScript(), "obtained", item, player);
			
			CheckPlayerQuestsItemUpdate(item);
			return true;
		}
		else
			SimpleMessage(CHANNEL_COLOR_RED, "Could not find free slot to place item.");
	}
	else
		SimpleMessage(CHANNEL_COLOR_YELLOW, "Unable to loot item: Inventory is FULL.");

	return false;
}

bool Client::HandleLootItem(Spawn* entity, int32 item_id) {
	if (!entity) {
		return false;
	}
	Item* item = entity->LootItem(item_id);
	bool success = false;
	success = HandleLootItem(entity, item);
	if(!success)
		entity->AddLootItem(item);
	
	return success;
}

void Client::HandleLoot(EQApplicationPacket* app) {
	PacketStruct* packet = configReader.getStruct("WS_LootType", GetVersion());
	if (packet) {
		packet->LoadPacketData(app->pBuffer, app->size);
		int32 loot_id = packet->getType_int32_ByName("loot_id");
		bool loot_all = (packet->getType_int8_ByName("loot_all") == 1);
		safe_delete(packet);
		int32 item_id = 0;
		Item* item = 0;
		Spawn* spawn = GetCurrentZone()->GetSpawnByID(loot_id);
		if (player->HasPendingLootItems(loot_id)) {
			Item* master_item = 0;
			if (loot_all) {
				vector<Item*>* items = player->GetPendingLootItems(loot_id);
				if (items) {
					for (int32 i = 0; loot_all && i < items->size(); i++) {
						master_item = items->at(i);
						if (master_item) {
							item = new Item(master_item);
							if (item) {
								loot_all = HandleLootItem(0, item);
								if (loot_all)
									player->RemovePendingLootItem(loot_id, item->details.item_id);
							}
						}
					}
					safe_delete(items);
				}
			}
			else {
				packet = configReader.getStruct("WS_LootItem", GetVersion());
				if (packet) {
					packet->LoadPacketData(app->pBuffer, app->size);
					item_id = packet->getType_int32_ByName("item_id");
					vector<Item*>* items = player->GetPendingLootItems(loot_id);
					if (items) {
						for (int32 i = 0; i < items->size(); i++) {
							master_item = items->at(i);
							if (master_item && master_item->details.item_id == item_id) {
								item = new Item(master_item);
								if (item && HandleLootItem(0, item))
									player->RemovePendingLootItem(loot_id, item->details.item_id);
								break;
							}
						}
						safe_delete(items);
					}
					safe_delete(packet);
				}
			}
			EQ2Packet* outapp = player->SendInventoryUpdate(GetVersion());
			if (outapp)
				QueuePacket(outapp);
			Loot(0, player->GetPendingLootItems(loot_id), spawn);
		}
		else {
			if (spawn && !spawn->Alive() && spawn->IsNPC() && ((NPC*)spawn)->Brain()->CheckLootAllowed(player)) {
				if (loot_all) {
					while (loot_all && ((item_id = spawn->GetLootItemID()) > 0)) {
						loot_all = HandleLootItem(spawn, item_id);
					}
				}
				else {
					packet = configReader.getStruct("WS_LootItem", GetVersion());
					if (packet) {
						packet->LoadPacketData(app->pBuffer, app->size);
						item_id = packet->getType_int32_ByName("item_id");
						HandleLootItem(spawn, item_id);
						safe_delete(packet);
					}
				}
				EQ2Packet* outapp = player->SendInventoryUpdate(GetVersion());
				if (outapp)
					QueuePacket(outapp);
				Loot(spawn);
				if (!spawn->HasLoot()) {
					CloseLoot(loot_id);
					if (spawn->IsNPC())
						GetCurrentZone()->RemoveDeadSpawn(spawn);
				}
			}
			else {
				if (!spawn) {
					LogWrite(WORLD__ERROR, 0, "World", "Unknown id of %u when looting!", loot_id);
					SimpleMessage(CHANNEL_COLOR_YELLOW, "Unable to find spawn to loot!");
				}
				else
					SimpleMessage(CHANNEL_COLOR_YELLOW, "You are not unable to loot that at this time.");
			}
		}
	}

}

void Client::HandleSkillInfoRequest(EQApplicationPacket* app) {
	PacketStruct* request = 0;
	//	cout << "Request: \n";
	//	DumpPacket(app);
	switch (app->pBuffer[0]) {
	case 0: { //items
		request = configReader.getStruct("WS_SkillInfoItemRequest", GetVersion());
		if (request) {
			request->LoadPacketData(app->pBuffer, app->size);
			Item* item = GetPlayer()->GetEquipmentList()->GetItemFromUniqueID(request->getType_int32_ByName("unique_id"));
			if (!item)
				item = GetPlayer()->item_list.GetItemFromUniqueID(request->getType_int32_ByName("unique_id"), true);
			if (item) {
				PacketStruct* response = configReader.getStruct("WS_SkillInfoItemResponse", GetVersion());
				if (response) {
					response->setDataByName("request_type", request->getType_int32_ByName("request_type"));
					response->setDataByName("unique_id", request->getType_int32_ByName("unique_id"));
					response->setSmallStringByName("name", item->name.c_str());
					EQ2Packet* app2 = response->serialize();
					//DumpPacket(app2);
					QueuePacket(app2);
					safe_delete(response);
				}
			}
		}
		break;
	}
	case 2: {//spells
		request = configReader.getStruct("WS_SkillInfoSpellRequest", GetVersion());
		if (request) {
			request->LoadPacketData(app->pBuffer, app->size);
			int32 id = request->getType_int32_ByName("id");
			int8 tier = request->getType_int32_ByName("unique_id"); //on live this is really unique_id, but I'm going to make it tier instead :)
			Spell* spell = master_spell_list.GetSpell(id, tier);
			PacketStruct* response = configReader.getStruct("WS_SkillInfoResponse", GetVersion());
			if (response) {
				response->setDataByName("request_type", 2);
				response->setDataByName("unique_id", tier);
				response->setDataByName("id", id);
				if (spell)
					response->setSmallStringByName("name", spell->GetName());
				else
					response->setSmallStringByName("name", "Unknown Spell");
				EQ2Packet* app2 = response->serialize();
				//				DumpPacket(app2);
				QueuePacket(app2);
				safe_delete(response);
			}
		}
		break;
	}
	default: {
		LogWrite(WORLD__ERROR, 0, "World", "Unknown SkillInfoRequest type of %i", (int)app->pBuffer[0]);
	}
	}
	safe_delete(request);

}

void Client::HandleExamineInfoRequest(EQApplicationPacket* app) {
	PacketStruct* request = 0;
	if (!app || app->size == 0)
		return;
	//LogWrite(CCLIENT__DEBUG, 0, "Client", "Request2:");
	//DumpPacket(app);

	int8 type = app->pBuffer[0];
	//283: item: 0, effect: 1, recipe: 2, spell: 3
	if (version <= 283) {
		if (type == 1)
			type = 4;
		else if (type == 2)
			type = 5;
	}
	if (type == 3) {
		Spell* spell = 0;
		bool trait_display;
		request = configReader.getStruct("WS_ExamineInfoRequest", GetVersion());
		if (!request) {
			return;
		}
		request->LoadPacketData(app->pBuffer, app->size);
		int32 id = request->getType_int32_ByName("id");
		int32 tier = request->getType_int32_ByName("tier");
		int32 trait_tier = request->getType_int32_ByName("unknown_id");
		bool display = true;
		if (version <= 283 && request->getType_int8_ByName("display") == 1) // this is really requesting a partial packet
			display = false;
		else if (version <= 546)
			display = request->getType_int8_ByName("display");
		else if (version > 546)
			display = false; // clients default is false otherwise it pops up a window when hovering over the knowledge book abilities

		//printf("Type: (%i) Tier: (%u) Unknown ID: (%u) Item ID: (%u)\n",type,tier,trait_tier,id);

		if (trait_tier != 0xFFFFFFFF) {
			spell = master_spell_list.GetSpell(id, trait_tier);
			if (!spell) {
				spell = master_spell_list.GetSpell(id, trait_tier + 1);
			}
			trait_display = true;
		}
		else {
			spell = master_spell_list.GetSpell(id, tier);
			trait_display = false;
		}

		// if we can't find it on the master spell list, see if it is a custom spell
		if (!spell)
		{
			lua_interface->FindCustomSpellLock();
			LuaSpell* tmpSpell = lua_interface->FindCustomSpell(id);
			if (tmpSpell)
				spell = tmpSpell->spell;
			lua_interface->FindCustomSpellUnlock();
		}
		
		if (spell && !CountSentSpell(id, tier)) {
			if (!spell->IsCopiedSpell())
				SetSentSpell(spell->GetSpellID(), spell->GetSpellTier());

			EQ2Packet* app = spell->SerializeSpell(this, display, trait_display);
			//DumpPacket(app);
			QueuePacket(app);
		}
	}
	else if (type == 0) {
		request = configReader.getStruct("WS_ExamineInfoItemRequest", GetVersion());
		if (!request) {
			return;
		}
		request->LoadPacketData(app->pBuffer, app->size);

		int32 id = request->getType_int32_ByName("id");

		Item* item = 0;

		// translate from unique id to spawn id for houses
		Spawn* spawn = this->GetCurrentZone()->GetSpawnFromUniqueItemID(id);

		bool wasSpawn = false;
		if (spawn)
		{
			item = master_item_list.GetItem(spawn->GetPickupItemID());
			if (item)
			{
				wasSpawn = true;
				item = new Item(item);
				item->details.unique_id = spawn->GetPickupUniqueItemID();
			}
		}

		if (!item)
			item = GetPlayer()->item_list.GetItemFromUniqueID(id, true);
		if (!item)
			item = GetPlayer()->GetEquipmentList()->GetItemFromUniqueID(id);
		if (!item)
			item = GetPlayer()->GetAppearanceEquipmentList()->GetItemFromUniqueID(id);
		if (!item)
			item = master_item_list.GetItem(id);
		if (item) {// && sent_item_details.count(id) == 0){
			MItemDetails.writelock(__FUNCTION__, __LINE__);
			sent_item_details[id] = true;
			MItemDetails.releasewritelock(__FUNCTION__, __LINE__);
			EQ2Packet* app = item->serialize(GetVersion(), false, GetPlayer());
			//DumpPacket(app);
			QueuePacket(app);
			if (wasSpawn)
				delete item;
		}
		else {
			LogWrite(WORLD__ERROR, 0, "World", "HandleExamineInfoRequest: Unknown Item ID = %u", id);
			DumpPacket(app);
		}
	}
	else if (type == 1) {
		request = configReader.getStruct("WS_ExamineInfoItemRequest", GetVersion());
		if (!request) {
			return;
		}
		request->LoadPacketData(app->pBuffer, app->size);
		int32 id = request->getType_int32_ByName("id");
		int32 unique_id = request->getType_int32_ByName("unique_id");

		Item* item = GetPlayer()->item_list.GetItemFromUniqueID(unique_id, true);
		if (!item)
			item = GetPlayer()->GetEquipmentList()->GetItemFromUniqueID(unique_id);
		if (!item)
			item = GetPlayer()->GetAppearanceEquipmentList()->GetItemFromUniqueID(unique_id);
		if (!item)
			item = master_item_list.GetItem(id);
		if (item) {
			MItemDetails.writelock(__FUNCTION__, __LINE__);
			sent_item_details[id] = true;
			MItemDetails.releasewritelock(__FUNCTION__, __LINE__);
			EQ2Packet* app = item->serialize(GetVersion(), false, GetPlayer());
			//DumpPacket(app);
			QueuePacket(app);
		}
		else {
			LogWrite(WORLD__ERROR, 0, "World", "HandleExamineInfoRequest: Unknown Item ID = %u", id);
			DumpPacket(app);
		}
	}
	else if (type == 2) {
		request = configReader.getStruct("WS_ExamineInfoItemLinkRequest", GetVersion());
		if (!request) {
			return;
		}

		request->LoadPacketData(app->pBuffer, app->size);
		int32 id = request->getType_int32_ByName("item_id");
		//int32 unknown_0 = request->getType_int32_ByName("unknown",0);
		//int32 unknown_1 = request->getType_int32_ByName("unknown",1);
		//int8 unknown2 = request->getType_int8_ByName("unknown2");
		//int32 unique_id = request->getType_int32_ByName("unique_id");
		//int16 unknown5 = request->getType_sint16_ByName("unknown5");
		//printf("Type: (%i) Unknown_0: (%u) Unknown_1: (%u) Unknown2: (%i) Unique ID: (%u) Unknown5: (%i) Item ID: (%u)\n",type,unknown_0,unknown_1,unknown2,unique_id,unknown5,id);
		Item* item = master_item_list.GetItem(id);
		if (item) {
			//only display popup for non merchant links
			EQ2Packet* app = item->serialize(GetVersion(), (request->getType_int8_ByName("show_popup") != 0), GetPlayer(), true, 0, 0, true);
			//DumpPacket(app);
			QueuePacket(app);
		}
		else {
			LogWrite(WORLD__ERROR, 0, "World", "HandleExamineInfoRequest: Unknown Item ID = %u", id);
			DumpPacket(app);
		}
	}
	else if (type == 4) { //spell effect
		request = configReader.getStruct("WS_ExamineSpellEffectRequest", GetVersion());
		if (!request) {
			return;
		}
		request->LoadPacketData(app->pBuffer, app->size);
		int32 id = request->getType_int32_ByName("id");
		int16 display = request->getType_int8_ByName("partial_info");
		SpellEffects* effect = player->GetSpellEffect(id);
		//printf("Type: (%i) Unknown5: (%i) Item ID: (%u)\n",type,unknown5,id);
		if (effect) {
			int8 tier = effect->tier;
			Spell* spell = master_spell_list.GetSpell(id, tier);

			// if we can't find it on the master spell list, see if it is a custom spell
			if (!spell)
			{
				lua_interface->FindCustomSpellLock();
				LuaSpell* tmpSpell = lua_interface->FindCustomSpell(id);
				EQ2Packet* pack = 0;
				if (tmpSpell)
					spell = tmpSpell->spell;
				lua_interface->FindCustomSpellUnlock();
			}

			if (spell && !CountSentSpell(id, tier)) {
				if (!spell->IsCopiedSpell())
					SetSentSpell(spell->GetSpellID(), spell->GetSpellTier());
				int8 type = 0;
				if (version <= 283)
					type = 1;
				EQ2Packet* app = spell->SerializeSpecialSpell(this, false, type, 0x81);
				//DumpPacket(app);
				QueuePacket(app);
			}
		}
	}
	else if (type == 5) { // recipe info
		request = configReader.getStruct("WS_ExamineInfoRequest", GetVersion());
		if (!request)
			return;
		request->LoadPacketData(app->pBuffer, app->size);
		int32 id = request->getType_int32_ByName("unknown_id");
		Recipe* recipe = master_recipe_list.GetRecipe(id);
		if (recipe) {
			EQ2Packet* app = recipe->SerializeRecipe(this, recipe, false, GetItemPacketType(GetVersion()), 0x02);
			//DumpPacket(app);
			QueuePacket(app);
		}

	}
	else if (type == 6) { // AA spell info
		Spell* spell = 0;
		//Spell* spell2 = 0;
		//AltAdvanceData* data = 0;
		request = configReader.getStruct("WS_ExamineInfoRequest", GetVersion());
		if (!request)
			return;
		request->LoadPacketData(app->pBuffer, app->size);
		int32 id = request->getType_int32_ByName("id");
		int32 tier = GetPlayer()->GetSpellTier(id);
		LogWrite(WORLD__INFO, 0, "World", "Examine Info Request->Unique ID: %u Tier: %u ", id, tier);
		//data = master_aa_list.GetAltAdvancement(id);
		//LogWrite(WORLD__INFO, 0, "World", "SOE Spell CRC: %u", data->spell_crc);
		//spell = master_spell_list.GetSpellByCRC(data->spell_crc);
		spell = master_spell_list.GetSpell(id, tier);

		if (!spell)
			spell = master_spell_list.GetSpell(id, 1);

		if (!spell)
		{
			lua_interface->FindCustomSpellLock();
			LuaSpell* tmpSpell = lua_interface->FindCustomSpell(id);
			if (tmpSpell)
				spell = tmpSpell->spell;
			lua_interface->FindCustomSpellUnlock();
		}

		if (!spell)
		{
			LogWrite(WORLD__ERROR, 0, "WORLD", "FAILED Examine Info Request-> Spell ID: %u, tier: %i", id, tier);
			return;
		}

		//if (spell && sent_spell_details.count(spell->GetSpellID()) == 0) {
		if (!spell->IsCopiedSpell())
			SetSentSpell(spell->GetSpellID(), spell->GetSpellTier());
		//	EQ2Packet* app = spell->SerializeAASpell(this,tier, data, false, GetItemPacketType(GetVersion()), 0x04);
		EQ2Packet* app = master_spell_list.GetAASpellPacket(id, tier, this, false, 0x4F);//0x45 change version to match client
		/////////////////////////////////////////GetAASpellPacket(int32 id, int8 tier, Client* client, bool display, int8 packet_type) {
		//DumpPacket(app);
		LogWrite(WORLD__INFO, 0, "WORLD", "Examine Info Request-> Spell ID: %u", spell->GetSpellID());
		QueuePacket(app);
		//}
	}
	else {
		LogWrite(WORLD__ERROR, 0, "World", "Unknown examine request: %i", (int)type);
		DumpPacket(app);
	}
	safe_delete(request);

}

void Client::HandleQuickbarUpdateRequest(EQApplicationPacket* app) {
	PacketStruct* request = configReader.getStruct("WS_QuickBarUpdateRequest", GetVersion());
	if (request) {
		request->LoadPacketData(app->pBuffer, app->size);
		int32 id = request->getType_int32_ByName("id");
		int32 bar = request->getType_int32_ByName("hotbar_number");
		int32 slot = request->getType_int32_ByName("hotkey_slot");
		int32 type = request->getType_int32_ByName("type");
		int8 tier = request->getType_int32_ByName("unique_id");
		EQ2_16BitString text = request->getType_EQ2_16BitString_ByName("text");
		Spell* spell = 0;
		if (type == 0xFFFFFFFF)
			GetPlayer()->RemoveQuickbarItem(bar, slot);
		else {
			if (type == QUICKBAR_NORMAL)
				spell = master_spell_list.GetSpell(id, tier);
			if (spell)
				GetPlayer()->AddQuickbarItem(bar, slot, type, spell->GetSpellIcon(), spell->GetSpellIconBackdrop(), id, tier, 0, text.data.c_str());
			else
				GetPlayer()->AddQuickbarItem(bar, slot, type, 0, 0, id, 0, 0, text.data.c_str());
		}

		safe_delete(request);
	}

}

bool Client::Process(bool zone_process) {
	if (!eqs) {
		return false;
	}
	if ((connected_to_zone && !zone_process) || (!connected_to_zone && zone_process)) {
		return true;
	}

	if (new_client_login) {
		LogWrite(CCLIENT__DEBUG, 0, "Client", "SendLoginInfo to new client...");
		SendLoginInfo();
		new_client_login = false;
	}
	bool ret = true;
	sockaddr_in to;

	memset((char*)&to, 0, sizeof(to));
	to.sin_family = AF_INET;
	to.sin_port = port;
	to.sin_addr.s_addr = ip;

	/************ Get all packets from packet manager out queue and process them ************/
	EQApplicationPacket* app = 0;
	if (eqs && !eqs->CheckActive()) {
		num_active_failures++;

		LogWrite(CCLIENT__DEBUG, 7, "Client", "%s, num_active_failures = %i", __FUNCTION__, num_active_failures);

		if (num_active_failures > 100) {
			return false;
		}
		return true;
	}
	while (ret && eqs && (app = eqs->PopPacket())) {
		ret = HandlePacket(app);

		LogWrite(CCLIENT__DEBUG, 5, "Client", "Func: %s, Line: %i, Opcode: '%s'", __FUNCTION__, __LINE__, app->GetOpcodeName());

		delete app;
	}

	if (GetCurrentZone() && GetCurrentZone()->GetSpawnByID(GetPlayer()->GetID()) && should_load_spells) {
		player->ApplyPassiveSpells();
		//database.LoadCharacterActiveSpells(player);
		player->UnlockAllSpells(true);

		should_load_spells = false;
	}

	if(spawn_removal_timer.Check() && GetPlayer()) {
		GetPlayer()->CheckSpawnRemovalQueue();
	}

	if (delayedLogin && delayTimer.Enabled() && delayTimer.Check())
	{
		if (!HandleNewLogin(delayedAccountID, delayedAccessKey))
			return false;
	}

	if (quest_updates) {
		LogWrite(CCLIENT__DEBUG, 1, "Client", "%s, ProcessQuestUpdates", __FUNCTION__, __LINE__);
		ProcessQuestUpdates();
	}
	if (last_update_time > 0 && last_update_time < (Timer::GetCurrentTime2() - 300)) {
		LogWrite(CCLIENT__DEBUG, 1, "Client", "%s, CheckQuestQueue", __FUNCTION__, __LINE__);
		CheckQuestQueue();
	}

	MSaveSpellStateMutex.lock();
	if(save_spell_state_timer.Check())
	{
		save_spell_state_timer.Disable();
		GetPlayer()->SaveSpellEffects();
	}
	MSaveSpellStateMutex.unlock();

	if (temp_placement_timer.Check()) {
		if(GetTempPlacementSpawn() && GetPlayer()->WasSentSpawn(GetTempPlacementSpawn()->GetID()) && !hasSentTempPlacementSpawn) {
			SendMoveObjectMode(GetTempPlacementSpawn(), 0);
			hasSentTempPlacementSpawn = true;
			temp_placement_timer.Disable();
		}
	}
	if (pos_update.Check())
	{
		ProcessStateCommands();
		
		GetPlayer()->ResetMentorship(); // check if we need to asynchronously reset mentorship

		if(GetPlayer()->GetRegionMap())
			GetPlayer()->GetRegionMap()->TicRegionsNearSpawn(this->GetPlayer(), regionDebugMessaging ? this : nullptr);
		
		if(player_pos_changed && IsReadyForUpdates()) {
			//GetPlayer()->CalculateLocation();
			client_list.CheckPlayersInvisStatus(this);
			GetCurrentZone()->SendPlayerPositionChanges(GetPlayer());
			player_pos_changed = false;
			GetCurrentZone()->CheckTransporters(this);
			
			if(GetPlayer()->GetRegionMap())
			{
				if((lastRegionRemapTime+1000) < Timer::GetCurrentTime2())
				{
					lastRegionRemapTime = Timer::GetCurrentTime2() + 1000;
					GetPlayer()->GetRegionMap()->MapRegionsNearSpawn(this->GetPlayer(), regionDebugMessaging ? this : nullptr);
				}
				else
					GetPlayer()->GetRegionMap()->UpdateRegionsNearSpawn(this->GetPlayer(), regionDebugMessaging ? this : nullptr);
			}
		}
	}
	if (lua_interface && lua_debug && lua_debug_timer.Check())
		lua_interface->UpdateDebugClients(this);
	if (quest_pos_timer.Check())
		CheckPlayerQuestsLocationUpdate();
	if (player->GetSkills()->HasSkillUpdates()) {
		vector<Skill*>* skills = player->GetSkills()->GetSkillUpdates();
		if (skills) {
			Skill* skill = 0;
			vector<Skill*>::iterator itr;
			for (itr = skills->begin(); itr != skills->end(); itr++) {
				skill = *itr;
				SkillChanged(skill, skill->previous_val, skill->current_val);
			}
			EQ2Packet* app = GetPlayer()->skill_list.GetSkillPacket(GetVersion());
			if (app) QueuePacket(app);
			safe_delete(skills);
		}
	}
	m_resurrect.writelock(__FUNCTION__, __LINE__);
	if (current_rez.should_delete || (current_rez.expire_timer && current_rez.expire_timer->Check(false))) {
		safe_delete(current_rez.expire_timer);
		current_rez.expire_timer = 0;
		current_rez.active = false;
		current_rez.caster = 0;
		current_rez.crit = false;
		current_rez.crit_mod = 0;
		current_rez.expire_timer = 0;
		current_rez.heal_name = "";
		current_rez.hp_perc = 0;
		current_rez.mp_perc = 0;
		current_rez.no_calcs = false;
		current_rez.range = 0;
		current_rez.should_delete = false;
		current_rez.spell_name = "";
		current_rez.spell_visual = 0;
		current_rez.subspell = 0;
	}
	m_resurrect.releasewritelock(__FUNCTION__, __LINE__);

	// Quest timers
	Quest* failed_step = 0;
	MQuestTimers.writelock(__FUNCTION__, __LINE__);
	if (quest_timers.size() > 0) {
		vector<int32>::iterator itr;
		GetPlayer()->MPlayerQuests.readlock(__FUNCTION__, __LINE__);
		map<int32, Quest*>* player_quests = player->GetPlayerQuests();
		for (itr = quest_timers.begin(); itr != quest_timers.end(); itr++) {
			if (player_quests->count(*itr) > 0 && player_quests->at(*itr)->GetStepTimer() != 0) {
				Quest* quest = player_quests->at(*itr);
				if (Timer::GetUnixTimeStamp() >= quest->GetStepTimer()) {
					failed_step = quest;
					break;
				}
			}
			else {
				itr = quest_timers.erase(itr);
				break;
			}
		}
		GetPlayer()->MPlayerQuests.releasereadlock(__FUNCTION__, __LINE__);
	}
	MQuestTimers.releasewritelock(__FUNCTION__, __LINE__);

	if (failed_step)
		failed_step->StepFailed(failed_step->GetTimerStep());

	if (player->ControlFlagsChanged())
		player->SendControlFlagUpdates(this);

	if (camp_timer && camp_timer->Check()) {
		ResetSendMail();
		if(getConnection())
			getConnection()->SendDisconnect(false);
		safe_delete(camp_timer);
		ret = false;
	}

	if (!eqs || (eqs && !eqs->CheckActive()))
		ret = false;

	// redundant to client disconnect
	//	if(!ret)
	//		Save();

	return ret;
}

ClientList::ClientList() {
	MClients.SetName("ClientList::MClients");

}

ClientList::~ClientList() {
}

void ClientList::ReloadQuests() {
	list<Client*>::iterator client_iter;
	Client* client = 0;
	MClients.readlock(__FUNCTION__, __LINE__);
	for (client_iter = client_list.begin(); client_iter != client_list.end(); client_iter++) {
		client = *client_iter;
		if (client)
			client->ReloadQuests();
	}
	MClients.releasereadlock(__FUNCTION__, __LINE__);

}

void ClientList::CheckPlayersInvisStatus(Client* owner) {
	if (!owner->GetPlayer() || (!owner->GetPlayer()->IsInvis() && !owner->GetPlayer()->IsStealthed()))
		return;

	list<Client*>::iterator client_iter;
	Client* client = 0;
	MClients.readlock(__FUNCTION__, __LINE__);
	for (client_iter = client_list.begin(); client_iter != client_list.end(); client_iter++) {
		client = *client_iter;
		if (client == owner || client->GetPlayer() == NULL)
			continue;

		if (client->GetPlayer()->CheckChangeInvisHistory((Entity*)owner->GetPlayer()))
			client->GetPlayer()->GetZone()->SendSpawnChanges(owner->GetPlayer(), client, true, true);
	}
	MClients.releasereadlock(__FUNCTION__, __LINE__);

}

void ClientList::RemovePlayerFromInvisHistory(int32 spawnID) {
	list<Client*>::iterator client_iter;
	Client* client = 0;
	MClients.readlock(__FUNCTION__, __LINE__);
	for (client_iter = client_list.begin(); client_iter != client_list.end(); client_iter++) {
		client = *client_iter;
		if (!client->GetPlayer())
			continue;

		client->GetPlayer()->RemoveTargetInvisHistory(spawnID);
	}
	MClients.releasereadlock(__FUNCTION__, __LINE__);
}



int32 ClientList::Count() {
	return client_list.size();
}

void ClientList::Add(Client* client) {
	MClients.writelock(__FUNCTION__, __LINE__);
	client_list.push_back(client);
	MClients.releasewritelock(__FUNCTION__, __LINE__);

}

Client* ClientList::FindByAccountID(int32 account_id) {
	list<Client*>::iterator client_iter;
	Client* client = 0;
	Client* ret = 0;
	MClients.readlock(__FUNCTION__, __LINE__);
	for (client_iter = client_list.begin(); client_list.size() > 0 && client_iter != client_list.end(); client_iter++) {
		client = *client_iter;
		if (client->GetAccountID() == account_id) {
			ret = client;
			break;
		}
	}
	MClients.releasereadlock(__FUNCTION__, __LINE__);

	return ret;
}

Client* ClientList::FindByName(char* charName) {
	list<Client*>::iterator client_iter;
	Client* client = 0;
	Client* ret = 0;
	MClients.readlock(__FUNCTION__, __LINE__);
	for (client_iter = client_list.begin(); client_list.size() > 0 && client_iter != client_list.end(); client_iter++) {
		client = *client_iter;
		if (!client || !client->GetPlayer())
			continue;

		if (!strncmp(client->GetPlayer()->GetName(), charName, strlen(charName))) {
			ret = client;
			break;
		}
	}
	MClients.releasereadlock(__FUNCTION__, __LINE__);

	return ret;
}

Client* ClientList::Get(int32 ip, int16 port) {
	list<Client*>::iterator client_iter;
	Client* client = 0;
	Client* ret = 0;
	MClients.readlock(__FUNCTION__, __LINE__);
	for (client_iter = client_list.begin(); client_list.size() > 0 && client_iter != client_list.end(); client_iter++) {
		client = *client_iter;
		if (client->GetIP() == ip && client->GetPort() == port) {
			ret = client;
			break;
		}
	}
	MClients.releasereadlock(__FUNCTION__, __LINE__);

	return ret;
}

void ClientList::Process() {

	list<Client*>::iterator client_iter;
	list<Client*>::iterator erase_iter;
	Client* client = 0;
	MClients.readlock(__FUNCTION__, __LINE__);
	erase_iter = client_list.end();
	for (client_iter = client_list.begin(); client_iter != client_list.end(); client_iter++) {
		client = *client_iter;
		// have a sanity check because the client list can sometimes obtain null client pointers
		if (!client || client->remove_from_list || (!client->Process())) { // if we should be removing from list, don't process any further
			erase_iter = client_iter;
			break;
		}
	}
	MClients.releasereadlock(__FUNCTION__, __LINE__);
	if (erase_iter != client_list.end()) {
		client = *erase_iter;
		MClients.writelock(__FUNCTION__, __LINE__);
		client_list.erase(erase_iter);
		MClients.releasewritelock(__FUNCTION__, __LINE__);
		if (client && !client->remove_from_list) {
			struct in_addr  in;
			in.s_addr = client->GetIP();
			LogWrite(WORLD__INFO, 0, "World", "Removing client from ip: %s port: %i", inet_ntoa(in), client->GetPort());
			safe_delete(client);
		}
	}

}

void ClientList::RemoveConnection(EQStream* eqs) {
	Client* client;

	if (eqs) {
		list<Client*>::iterator client_iter;
		MClients.readlock(__FUNCTION__, __LINE__);
		for (client_iter = client_list.begin(); client_iter != client_list.end(); client_iter++) {
			client = *client_iter;
			if (client->getConnection() == eqs)
				client->Disconnect(true);
		}
		MClients.releasereadlock(__FUNCTION__, __LINE__);
	}

}

bool ClientList::ContainsStream(EQStream* eqs) {
	if (!eqs) {
		return false;
	}
	list<Client*>::iterator client_iter;
	bool ret = false;
	MClients.readlock(__FUNCTION__, __LINE__);
	for (client_iter = client_list.begin(); client_iter != client_list.end(); client_iter++) {
		if ((*client_iter)->getConnection() && (*client_iter)->getConnection()->GetRemotePort() == eqs->GetRemotePort() && (*client_iter)->getConnection()->GetRemoteIP() == eqs->GetRemoteIP()) {
			ret = true;
			break;
		}
	}
	MClients.releasereadlock(__FUNCTION__, __LINE__);

	return ret;
}

void ClientList::Remove(Client* client, bool remove_data) {
	client->remove_from_list = true;
	if (remove_data) {
		safe_delete(client);
	}

}

void Client::SetCurrentZone(int32 id) {
	if (current_zone) {
		//current_zone->GetCombat()->RemoveHate(player);
		current_zone->RemoveSpawn(player, false, true, true, true, true);
	}
	SetCurrentZone(zone_list.Get(id));

}

void Client::SetCurrentZoneByInstanceID(int32 id, int32 zoneid) {
	if (current_zone) {
		//current_zone->GetCombat()->RemoveHate(player);
		current_zone->RemoveSpawn(player, false, true, true, true, true);
	}
	SetCurrentZone(zone_list.GetByInstanceID(id, zoneid));

}

ZoneServer* Client::GetCurrentZone() {
	return current_zone;
}

int8 Client::GetMessageChannelColor(int8 channel_type) {
	if (GetVersion() >= 973 && GetVersion() <= 1000) {
		if (channel_type == CHANNEL_LOOT)
			return CHANNEL_COLOR_NEW_LOOT;
	}
	else if (GetVersion() >= 973) {
		if (channel_type == CHANNEL_LOOT)
			return CHANNEL_COLOR_NEWEST_LOOT;
	}
	if (GetVersion() <= 283) {
		if (channel_type <=12)
			return channel_type;
		switch (channel_type) {
			case CHANNEL_GROUP_CHAT:
			case CHANNEL_GROUP_SAY:
			case CHANNEL_RAID_SAY:
			case CHANNEL_GUILD_CHAT:
			case CHANNEL_GUILD_SAY:
			case CHANNEL_OFFICER_SAY:
			case CHANNEL_GUILD_MOTD:
				return channel_type - 1;
			case CHANNEL_PRIVATE_CHAT:
			case CHANNEL_NONPLAYER_TELL:
				return channel_type - 5;
			case CHANNEL_PRIVATE_TELL:
			case CHANNEL_TELL_FROM_CS:
				return channel_type - 6;
			case CHANNEL_CHAT_CHANNEL_TEXT:
			case CHANNEL_OUT_OF_CHARACTER:
			case CHANNEL_AUCTION:
			case CHANNEL_CUSTOM_CHANNEL:
			case CHANNEL_CHARACTER_TEXT:
			case CHANNEL_REWARD:
			case CHANNEL_DEATH:
			case CHANNEL_PET_CHAT:
			case CHANNEL_SKILL:
				return channel_type - 7;
			case CHANNEL_SPELLS:
			case CHANNEL_YOU_CAST:
			case CHANNEL_YOU_FAIL:
				return channel_type - 8;
			case CHANNEL_FRIENDLY_CAST:
			case CHANNEL_FRIENDLY_FAIL:
			case CHANNEL_OTHER_CAST:
			case CHANNEL_OTHER_FAIL:
			case CHANNEL_HOSTILE_CAST:
			case CHANNEL_HOSTILE_FAIL:
			case CHANNEL_WORN_OFF:
			case CHANNEL_SPELLS_OTHER:
				return channel_type - 9;
			case CHANNEL_COMBAT:
				return channel_type - 15;
			case CHANNEL_HEROIC_OPPORTUNITY:
			case CHANNEL_NON_MELEE_DAMAGE:
			case CHANNEL_DAMAGE_SHIELD:
				return channel_type - 16;
			case CHANNEL_MELEE_COMBAT:
			case CHANNEL_WARNINGS:
			case CHANNEL_YOU_HIT:
			case CHANNEL_YOU_MISS:
			case CHANNEL_ATTACKER_HITS:
			case CHANNEL_ATTACKER_MISSES:
				return channel_type - 18;
			case CHANNEL_OTHER_HIT:
			case CHANNEL_OTHER_MISSES:
			case CHANNEL_CRITICAL_HIT:
				return channel_type - 22;
			case CHANNEL_OTHER:
			case CHANNEL_MONEY_SPLIT:
			case CHANNEL_LOOT:
				return channel_type - 30;
			case CHANNEL_COMMAND_TEXT:
			case CHANNEL_BROADCAST:
			case CHANNEL_WHO:
			case CHANNEL_COMMANDS:
			case CHANNEL_MERCHANT:
			case CHANNEL_MERCHANT_BUY_SELL:
			case CHANNEL_CONSIDER_MESSAGE:
			case CHANNEL_CON_MINUS_2:
			case CHANNEL_CON_MINUS_1:
			case CHANNEL_CON_0:
			case CHANNEL_CON_1:
			case CHANNEL_CON_2:
				return channel_type - 31;
			default: {
				return CHANNEL_DEFAULT;
			}
		}
	}
	else if (GetVersion() <= 546) {
		if (channel_type < 20)
			return channel_type;
		switch (channel_type) {
			case CHANNEL_GUILD_MOTD:
			case CHANNEL_GUILD_MEMBER_ONLINE:
			case CHANNEL_GUILD_EVENT:
				return channel_type + 1;
			case CHANNEL_PRIVATE_CHAT:
			case CHANNEL_NONPLAYER_TELL:
				return channel_type - 1;
			case CHANNEL_PRIVATE_TELL:
			case CHANNEL_TELL_FROM_CS:
			case CHANNEL_ARENA:
			case CHANNEL_CHAT_CHANNEL_TEXT:
			case CHANNEL_OUT_OF_CHARACTER:
			case CHANNEL_AUCTION:
			case CHANNEL_CUSTOM_CHANNEL:
			case CHANNEL_CHARACTER_TEXT:
			case CHANNEL_REWARD:
			case CHANNEL_DEATH:
			case CHANNEL_PET_CHAT:
			case CHANNEL_SKILL:
			case CHANNEL_FACTION:
			case CHANNEL_SPELLS:
			case CHANNEL_YOU_CAST:
			case CHANNEL_YOU_FAIL:
				return channel_type - 2;			 
			case CHANNEL_FRIENDLY_CAST:
			case CHANNEL_FRIENDLY_FAIL:
			case CHANNEL_OTHER_CAST:
			case CHANNEL_OTHER_FAIL:
			case CHANNEL_HOSTILE_CAST:
			case CHANNEL_HOSTILE_FAIL:
			case CHANNEL_WORN_OFF:
			case CHANNEL_SPELLS_OTHER:
			case CHANNEL_HEAL_SPELLS:
			case CHANNEL_HEALS:
			case CHANNEL_FRIENDLY_HEALS:
			case CHANNEL_OTHER_HEALS:
			case CHANNEL_HOSTILE_HEALS:
				return channel_type - 3;
			case CHANNEL_COMBAT:
			case CHANNEL_GENERAL_COMBAT:
			case CHANNEL_HEROIC_OPPORTUNITY:
			case CHANNEL_NON_MELEE_DAMAGE:
			case CHANNEL_DAMAGE_SHIELD:
			case CHANNEL_WARD:
				return channel_type - 4;
			case CHANNEL_MELEE_COMBAT:
			case CHANNEL_WARNINGS:
			case CHANNEL_YOU_HIT:
			case CHANNEL_YOU_MISS:
			case CHANNEL_ATTACKER_HITS:
			case CHANNEL_ATTACKER_MISSES:
			case CHANNEL_YOUR_PET_HITS:
			case CHANNEL_YOUR_PET_MISSES:
			case CHANNEL_ATTACKER_HITS_PET:
			case CHANNEL_ATTACKER_MISSES_PET:
			case CHANNEL_OTHER_HIT:
			case CHANNEL_OTHER_MISSES:
				return channel_type - 5;
			case CHANNEL_OTHER:
			case CHANNEL_MONEY_SPLIT:
			case CHANNEL_LOOT:
				return channel_type - 14;
			case CHANNEL_COMMAND_TEXT:
			case CHANNEL_BROADCAST:
			case CHANNEL_WHO:
			case CHANNEL_COMMANDS:
			case CHANNEL_MERCHANT:
			case CHANNEL_MERCHANT_BUY_SELL:
			case CHANNEL_CONSIDER_MESSAGE:
			case CHANNEL_CON_MINUS_2:
			case CHANNEL_CON_MINUS_1:
			case CHANNEL_CON_0:
			case CHANNEL_CON_1:
			case CHANNEL_CON_2:
			case CHANNEL_TRADESKILLS:
			case CHANNEL_HARVESTING:
			case CHANNEL_HARVESTING_WARNINGS:
				return channel_type - 15;
			default: {
				return CHANNEL_DEFAULT;
			}
		}
	}
	else {
		switch (channel_type) {
			default: {
				return channel_type;
			}
		}
	}	
	return channel_type;
}

void Client::HandleTellMessage(Client* from, const char* message) {
	if (!from || GetPlayer()->IsIgnored(from->GetPlayer()->GetName()))
		return;
	PacketStruct* packet = configReader.getStruct("WS_HearChat", GetVersion());
	if (packet) {
		packet->setDataByName("from", from->GetPlayer()->GetName());
		packet->setDataByName("to", GetPlayer()->GetName());
		packet->setDataByName("channel", GetMessageChannelColor(CHANNEL_PRIVATE_TELL));
		packet->setDataByName("from_spawn_id", 0xFFFFFFFF);
		packet->setDataByName("to_spawn_id", 0xFFFFFFFF);
		packet->setDataByName("unknown2", 1, 1);
		packet->setDataByName("show_bubble", 1);
		packet->setDataByName("understood", 1);
		packet->setDataByName("time", 2);
		packet->setMediumStringByName("message", message);
		EQ2Packet* outpacket = packet->serialize();
		QueuePacket(outpacket);			
		safe_delete(packet);
	}
}

void Client::SimpleMessage(int8 color, const char* message) {
	PacketStruct* command_packet = configReader.getStruct("WS_DisplayText", GetVersion());
	if (command_packet) {
		command_packet->setDataByName("color", GetMessageChannelColor(color));//convert this to the correct client type (different clients have different chat numbers)
		command_packet->setMediumStringByName("text", message);
		command_packet->setDataByName("unknown02", 0x00ff);
		EQ2Packet* outapp = command_packet->serialize();
		QueuePacket(outapp);
		safe_delete(command_packet);
	}
}

void Client::SendSpellUpdate(Spell* spell, bool add_silently, bool add_to_hotbar) {
	PacketStruct* packet = configReader.getStruct("WS_SpellGainedMsg", GetVersion());
	if (packet) {
		int8 xxx = spell->GetSpellData()->is_aa;
		packet->setDataByName("spell_type", spell->GetSpellData()->type);
		packet->setDataByName("spell_id", spell->GetSpellID());
		packet->setDataByName("unique_id", spell->GetSpellData()->spell_name_crc);
		packet->setDataByName("spell_name", spell->GetName());
		if(add_silently)
			packet->setDataByName("add_silently", 1);
		if(add_to_hotbar)
			packet->setDataByName("add_to_hotbar", 1);
		packet->setDataByName("unknown", xxx);
		packet->setDataByName("display_spell_tier", 1);
		packet->setDataByName("unknown3", 1);
		packet->setDataByName("tier", spell->GetSpellTier());
		packet->setDataByName("icon", spell->GetSpellIcon());
		packet->setDataByName("icon_type", spell->GetSpellIconBackdrop());
		packet->setDataByName("unknown5", 0xFFFFFFFF);
		//packet->PrintPacket();

		EQ2Packet* outapp = packet->serialize();
		//DumpPacket(outapp);
		QueuePacket(outapp);
		safe_delete(packet);
	}

}

void Client::Message(int8 type, const char* message, ...) {
	va_list argptr;
	char buffer[4096];

	va_start(argptr, message);
	vsnprintf(buffer, sizeof(buffer), message, argptr);
	va_end(argptr);	
	SimpleMessage(type, buffer);
}

void Client::Disconnect(bool send_disconnect)
{
	LogWrite(CCLIENT__DEBUG, 0, "CClient", "Client Disconnect...");
	this->Save();
	this->GetPlayer()->WritePlayerStatistics();

	SetConnected(false);

	if (send_disconnect && getConnection())
		getConnection()->SendDisconnect(true);

	eqs = 0;
}

bool Client::Summon(const char* search_name) {
	Spawn* target = 0;
	if (search_name || GetPlayer()->GetTarget()) {
		Client* search_client = 0;
		if (search_name) {
			target = GetCurrentZone()->FindSpawn(GetPlayer(), search_name);
			if (target && target->IsPlayer())
				search_client = GetCurrentZone()->GetClientBySpawn(target);
			if (!target) {
				search_client = zone_list.GetClientByCharName(string(search_name));
				if (search_client)
					target = search_client->GetPlayer();
			}
		}
		else
			target = GetPlayer()->GetTarget();
		if (target && target != GetPlayer()) {
			target->SetX(GetPlayer()->GetX());
			target->SetY(GetPlayer()->GetY());
			target->SetZ(GetPlayer()->GetZ());
			target->SetHeading(GetPlayer()->GetHeading());
			if (!target->IsPlayer()) {
				target->SetSpawnOrigX(target->GetX());
				target->SetSpawnOrigY(target->GetY());
				target->SetSpawnOrigZ(target->GetZ());
				target->SetSpawnOrigHeading(target->GetHeading());
			}
			target->SetLocation(GetPlayer()->GetLocation());
		}
		else if (target)
			Message(CHANNEL_COLOR_RED, "Error: You cannot summon yourself!");
		if (search_client && search_client != this) {
			search_client->Message(CHANNEL_COLOR_YELLOW, "You have been summoned by '%s'!", GetPlayer()->GetName());
			Message(CHANNEL_COLOR_YELLOW, "Summoning '%s'...", search_client->GetPlayer()->GetName());
			if (search_client->GetCurrentZone() != GetCurrentZone())
				search_client->Zone(GetCurrentZone()->GetZoneName(), false);
			else {
				EQ2Packet* app = search_client->GetPlayer()->Move(GetPlayer()->GetX(), GetPlayer()->GetY(), GetPlayer()->GetZ(), search_client->GetVersion());
				if (app)
					search_client->QueuePacket(app);
			}
		}
	}

	if (!target)
		return false;
	else
		return true;
}

std::string Client::IdentifyInstanceLockout(int32 zoneID, bool displayClient) {
	int8 instanceType = database.GetInstanceTypeByZoneID(zoneID);
	if(instanceType < 1)
		return std::string("");
	
	ZoneServer* instance_zone = nullptr;
	InstanceData* data = GetPlayer()->GetCharacterInstances()->FindInstanceByZoneID(zoneID);
		if (data) {
			// If lockout instances check to see if we are locked out
			if (instanceType == SOLO_LOCKOUT_INSTANCE || instanceType == GROUP_LOCKOUT_INSTANCE || instanceType == RAID_LOCKOUT_INSTANCE) {
				int32 time = 0;
				// Check success timer
				if (data->last_success_timestamp > 0) {
					if (Timer::GetUnixTimeStamp() < data->last_success_timestamp + data->success_lockout_time) {
						// Timer has not expired yet can't re enter
						LogWrite(INSTANCE__DEBUG, 0, "Instance", "Success lockout not expired for character %s in zone %u", GetPlayer()->GetName(), zoneID);
						time = (data->last_success_timestamp + data->success_lockout_time) - Timer::GetUnixTimeStamp();
					}
				}

				// Check failure timer
				if (data->last_failure_timestamp > 0) {
					if (Timer::GetUnixTimeStamp() < data->last_failure_timestamp + data->failure_lockout_time) {
						// Timer has not expired yet
						LogWrite(INSTANCE__DEBUG, 0, "Instance", "Failure lockout not expired for character %s in zone %u", GetPlayer()->GetName(), zoneID);
						time = (data->last_failure_timestamp + data->failure_lockout_time) - Timer::GetUnixTimeStamp();
					}
				}

				// Time > 0 then we are locked out, make the message and send it and return true
				if (time > 0) {
					string time_msg = "";
					int16 hour;
					int8 min;
					int8 sec;
					hour = time / 3600;
					time = time % 3600;
					min = time / 60;
					time = time % 60;
					sec = time;

					if (hour > 0) {
						char temp[10];
						snprintf(temp, 9," %i", hour);
						time_msg.append(temp);
						time_msg.append(" hour");
						time_msg.append((hour > 1) ? "s" : "");
					}
					if (min > 0) {
						char temp[5];
						snprintf(temp, 4," %i", min);
						time_msg.append(temp);
						time_msg.append(" minute");
						time_msg.append((min > 1) ? "s" : "");
					}
					// Only add seconds if minutes and hours are 0
					if (hour == 0 && min == 0 && sec > 0) {
						char temp[5];
						snprintf(temp, 4," %i", sec);
						time_msg.append(temp);
						time_msg.append(" second");
						time_msg.append((sec > 1) ? "s" : "");
					}

					if(displayClient)
						Message(CHANNEL_COLOR_YELLOW, "You may not enter again for%s.", time_msg.c_str());
					return time_msg;
				}
			}
		}
	return std::string("");
}

ZoneServer* Client::IdentifyInstance(int32 zoneID) {
	int8 instanceType = database.GetInstanceTypeByZoneID(zoneID);
	if(instanceType < 1)
		return nullptr;

	ZoneServer* instance_zone = nullptr;
	InstanceData* data = GetPlayer()->GetCharacterInstances()->FindInstanceByZoneID(zoneID);
		if (data) {
			std::string lockoutTime = IdentifyInstanceLockout(zoneID);
			// If lockout instances check to see if we are locked out
			if (lockoutTime.length() > 0) {
					return nullptr;
			}

			// Need to update `character_instances` table with new timestamps (for persistent) and instance id's
			instance_zone = zone_list.GetByInstanceID(data->instance_id, zoneID);

			// if we got an instance_zone and the instance_id from the data is 0 or data instance id is not the same as the zone instance id then update values
			if (instance_zone && (data->instance_id == 0 || data->instance_id != instance_zone->GetInstanceID())) {
				if (instanceType == SOLO_PERSIST_INSTANCE || instanceType == GROUP_PERSIST_INSTANCE || instanceType == RAID_PERSIST_INSTANCE) {
					database.UpdateCharacterInstance(GetCharacterID(), string(instance_zone->GetZoneName()), instance_zone->GetInstanceID(), 1, Timer::GetUnixTimeStamp());
					data->last_success_timestamp = Timer::GetUnixTimeStamp();
				}
				else
					database.UpdateCharacterInstance(GetCharacterID(), string(instance_zone->GetZoneName()), instance_zone->GetInstanceID());

				data->instance_id = instance_zone->GetInstanceID();
			}
		}
	return instance_zone;
}

bool Client::TryZoneInstance(int32 zoneID, bool zone_coords_valid) {
	ZoneServer* instance_zone = NULL;
	int8 instanceType = 0;

	// determine if this is a group instanced zone that already exists
	instance_zone = GetPlayer()->GetGroupMemberInZone(zoneID);

	if (instance_zone != NULL)
		Zone(instance_zone->GetInstanceID(), zone_coords_valid);
	else if ((instanceType = database.GetInstanceTypeByZoneID(zoneID)) > 0)
	{
		// best to check if we already have our own instance!
		if((instance_zone = IdentifyInstance(zoneID)) == nullptr)
		{
			switch (instanceType)
			{
			case SOLO_LOCKOUT_INSTANCE:
			case GROUP_LOCKOUT_INSTANCE:
			case RAID_LOCKOUT_INSTANCE:
			{
				instance_zone = zone_list.GetByInstanceID(0, zoneID);
				if (instance_zone) {
					// once lockout instance zone shuts down you can't renenter if you have a lockout or if you don't you get a new zone
					// so delete `instances` entry for the zone when it shuts down.
					int32 db_id = database.AddCharacterInstance(GetPlayer()->GetCharacterID(), instance_zone->GetInstanceID(), string(instance_zone->GetZoneName()), instance_zone->GetInstanceType(), 0, 0, instance_zone->GetDefaultLockoutTime(), instance_zone->GetDefaultReenterTime());

					if (db_id > 0)
						GetPlayer()->GetCharacterInstances()->AddInstance(db_id, instance_zone->GetInstanceID(), 0, 0, instance_zone->GetDefaultLockoutTime(), instance_zone->GetDefaultReenterTime(), zoneID, instance_zone->GetInstanceType(), string(instance_zone->GetZoneName()));
				}
				break;
			}
			case SOLO_PERSIST_INSTANCE:
			case GROUP_PERSIST_INSTANCE:
			case RAID_PERSIST_INSTANCE:
			{
				instance_zone = zone_list.GetByInstanceID(0, zoneID);
				if (instance_zone) {
					int32 db_id = database.AddCharacterInstance(GetPlayer()->GetCharacterID(), instance_zone->GetInstanceID(), string(instance_zone->GetZoneName()), instance_zone->GetInstanceType(), Timer::GetUnixTimeStamp(), 0, instance_zone->GetDefaultLockoutTime(), instance_zone->GetDefaultReenterTime());

					if (db_id > 0)
						GetPlayer()->GetCharacterInstances()->AddInstance(db_id, instance_zone->GetInstanceID(), Timer::GetUnixTimeStamp(), 0, instance_zone->GetDefaultLockoutTime(), instance_zone->GetDefaultReenterTime(), zoneID, instance_zone->GetInstanceType(), string(instance_zone->GetZoneName()));
				}
				break;
			}
			case PUBLIC_INSTANCE:
			case TRADESKILL_INSTANCE:
			{
				// if its public/tradeskill, look for a public already setup
				instance_zone = zone_list.GetByLowestPopulation(zoneID);
				if (instance_zone) {
					// Check the current population against the max population, if greater or equal start a new version
					if (instance_zone->GetClientCount() >= rule_manager.GetGlobalRule(R_Zone, MaxPlayers)->GetInt32())
						instance_zone = zone_list.GetByInstanceID(0, zoneID);
				}
				else
					instance_zone = zone_list.GetByInstanceID(0, zoneID);

				break;
			}

			case PERSONAL_HOUSE_INSTANCE:
			case GUILD_HOUSE_INSTANCE:
			{
				// Because of the way housing works (need to load a specific instance id supplied in a packet) we can't
				// use this function without some rework, so it will all be handled in Client::HandlePacket()
				// with the OP_EnterHouseMsg opcode
				break;
			}

			case QUEST_INSTANCE:
			{
				instance_zone = zone_list.GetByInstanceID(0, zoneID);
				break;
				/*
				ALTER TABLE `zones` CHANGE COLUMN `instance_type` `instance_type` ENUM('NONE','GROUP_LOCKOUT_INSTANCE','GROUP_PERSIST_INSTANCE','RAID_LOCKOUT_INSTANCE','RAID_PERSIST_INSTANCE','SOLO_LOCKOUT_INSTANCE','SOLO_PERSIST_INSTANCE','TRADESKILL_INSTANCE','PUBLIC_INSTANCE','PERSONAL_HOUSE_INSTANCE','GUILD_HOUSE_INSTANCE','QUEST_INSTANCE') NOT NULL DEFAULT 'NONE' COLLATE 'latin1_general_ci' AFTER `start_zone`;
				*/
			}

			default:
			{
				// NONE
			}

			}

		}

		if (instance_zone != NULL)
			Zone(instance_zone, zone_coords_valid);
	}


	if (instance_zone != NULL)
		return true;
	else
		return false;
}

bool Client::GotoSpawn(const char* search_name, bool forceTarget) {
	Spawn* target = 0;
	if (search_name || GetPlayer()->GetTarget()) {
		Client* search_client = 0;
		if (search_name) {
			target = GetCurrentZone()->FindSpawn(GetPlayer(), search_name);
			if (!target) {
				search_client = zone_list.GetClientByCharName(search_name);
				if (search_client)
					target = search_client->GetPlayer();
			}
			if (target)
				GetPlayer()->SetTarget(target);
		}
		else
			target = GetPlayer()->GetTarget();
		if (target && target != GetPlayer()) {
			GetPlayer()->SetX(target->GetX());
			GetPlayer()->SetY(target->GetY());
			GetPlayer()->SetZ(target->GetZ());
			GetPlayer()->SetHeading(target->GetHeading());
			GetPlayer()->SetLocation(target->GetLocation());
			Message(CHANNEL_COLOR_YELLOW, "Warping to '%s'", target->GetName());
		}
		else if (target)
			Message(CHANNEL_COLOR_RED, "Error: You cannot goto yourself!");
		if (search_client && search_client->GetCurrentZone() != GetCurrentZone())
			Zone(search_client->GetCurrentZone()->GetZoneName(), false);
		else if (target) {
			EQ2Packet* app = GetPlayer()->Move(target->GetX(), target->GetY(), target->GetZ(), GetVersion());
			if (app)
				QueuePacket(app);
		}
	}

	if (!target)
		return false;
	else
		return true;
}

bool Client::CheckZoneAccess(const char* zoneName) {

	LogWrite(CCLIENT__DEBUG, 0, "Client", "Zone access check for %s (%u), client: %u", zoneName, database.GetZoneID(zoneName), GetVersion());

	ZoneServer* zone = zone_list.Get(zoneName, false);

	// JA: implemented /zone lock|unlock commands (2012.07.28)
	if (zone && zone->GetZoneLockState())
	{
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Zone currently LOCKED: '%s' (%ul)", zoneName, zone->GetZoneID());
		Message(CHANNEL_COLOR_RED, "This zone is locked, and you don't have the key! (%s).", zoneName);
		return false;
	}

	sint16 zoneMinStatus = 0;
	int16 zoneMinLevel = 0;
	int16 zoneMaxLevel = 0;
	int16 zoneMinVersion = 0;
	if (!zone)
	{
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Grabbing zone requirements for %s", zoneName);
		bool success = database.GetZoneRequirements(zoneName, &zoneMinStatus, &zoneMinLevel, &zoneMaxLevel, &zoneMinVersion);

		if (!success) { // couldn't even find the zone, this shouldn't happen though..
			return true;
		}
	}
	else
	{
		zoneMinStatus = zone->GetMinimumStatus();
		zoneMinLevel = zone->GetMinimumLevel();
		zoneMaxLevel = zone->GetMaximumLevel();
		zoneMinVersion = zone->GetMinimumVersion();
	}

	LogWrite(CCLIENT__DEBUG, 0, "Client", "Access Requirements: status %i, level %i - %i, req >= %i version", zoneMinStatus, zoneMinLevel, zoneMaxLevel, zoneMinVersion);

	// use ZoneLevelOverrideStatus in both min_level and max_level checks
	sint16 ZoneLevelOverrideStatus = rule_manager.GetGlobalRule(R_Zone, MinZoneLevelOverrideStatus)->GetSInt16();

	if ((zoneMinVersion > 0) && (GetVersion() < zoneMinVersion))
	{
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Zone MinVersion of %i challenge...", zoneMinVersion);
		Message(CHANNEL_COLOR_RED, "You do not have the required expansion pack to enter here (%s).", database.GetExpansionIDByVersion(zoneMinVersion).c_str());
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Client denied access to zone '%s' (version req: %i)", zoneName, zoneMinVersion);
		return false;
	}


	if ((zoneMinLevel > 1) && (player->GetLevel() < zoneMinLevel))
	{
		if (ZoneLevelOverrideStatus && ZoneLevelOverrideStatus > GetAdminStatus())
		{
			LogWrite(CCLIENT__DEBUG, 0, "Client", "Player denied access to zone '%s' (level req: %i)", zoneName, player->GetLevel());
			Message(CHANNEL_COLOR_RED, "Your level is too low to enter here (%s)", zoneMinLevel);
			return false;
		}
	}

	if ((zoneMaxLevel > 1) && (player->GetLevel() > zoneMaxLevel))
	{
		if (ZoneLevelOverrideStatus && ZoneLevelOverrideStatus > GetAdminStatus())
		{
			LogWrite(CCLIENT__DEBUG, 0, "Client", "Player denied access to zone '%s' (level req: %i)", zoneName, player->GetLevel());
			Message(CHANNEL_COLOR_RED, "Your level is too high to enter here (%s)", zoneMaxLevel);
			return false;
		}
	}

	if ((zoneMinStatus > 0) && (GetAdminStatus() < zoneMinStatus))
	{
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Zone MinStatus of %i challenge...", zoneMinStatus);

		sint16 ZoneAccessOverrideStatus = rule_manager.GetGlobalRule(R_Zone, MinZoneAccessOverrideStatus)->GetSInt16();
		if (ZoneAccessOverrideStatus && ZoneAccessOverrideStatus > GetAdminStatus())
		{
			LogWrite(CCLIENT__DEBUG, 0, "Client", "Player denied access to zone '%s' (status req: %i)", zoneName, GetAdminStatus());
			Message(CHANNEL_COLOR_RED, "You do not have permission to enter here (%i).", zoneMinStatus);
			return false;
		}
	}
	return true;
}

void Client::Zone(int32 instanceid, bool set_coords, bool byInstanceID, bool is_spell) {
	Zone(zone_list.GetByInstanceID(instanceid), set_coords, is_spell);

}

void Client::Zone(ZoneServer* new_zone, bool set_coords, bool is_spell) {
	if (!new_zone) {
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Zone Request Denied! No 'new_zone' value");
		return;
	}

	client_zoning = true;
	LogWrite(CCLIENT__DEBUG, 0, "Client", "%s: Setting player Resurrecting to 'true'", __FUNCTION__);
	player->SetResurrecting(true);

	LogWrite(CCLIENT__DEBUG, 0, "Client", "%s: Removing player from fighting...", __FUNCTION__);
	//GetCurrentZone()->GetCombat()->RemoveHate(player);
	MSaveSpellStateMutex.lock();
	player->SaveSpellEffects();
	player->SetSaveSpellEffects(true);
	MSaveSpellStateMutex.unlock();
	ResetSendMail();
	// Remove players pet from zone if there is one
	((Entity*)player)->DismissAllPets();

	LogWrite(CCLIENT__DEBUG, 0, "Client", "%s: Removing player from current zone...", __FUNCTION__);
	GetCurrentZone()->RemoveSpawn(player, false, true, true, true, !is_spell);

	LogWrite(CCLIENT__DEBUG, 0, "Client", "%s: Setting zone to '%s'...", __FUNCTION__, new_zone->GetZoneName());
	SetCurrentZone(new_zone);

	if (player->GetGroupMemberInfo())
	{
		LogWrite(CCLIENT__DEBUG, 0, "Client", "%s: Player in group, updating group info...", __FUNCTION__);
		player->UpdateGroupMemberInfo();
		world.GetGroupManager()->SendGroupUpdate(player->GetGroupMemberInfo()->group_id, this);
	}

	// block out the member info for the group
	TempRemoveGroup();

	UpdateTimeStampFlag(ZONE_UPDATE_FLAG);

	if (set_coords)
	{
		LogWrite(CCLIENT__DEBUG, 0, "Client", "%s: Zoning player to coordinates x: %2f, y: %2f, z: %2f, heading: %2f in zone '%s'...",
			__FUNCTION__,
			GetCurrentZone()->GetSafeX(),
			GetCurrentZone()->GetSafeY(),
			GetCurrentZone()->GetSafeZ(),
			GetCurrentZone()->GetSafeHeading(),
			new_zone->GetZoneName()
		);
		player->SetX(GetCurrentZone()->GetSafeX());
		player->SetY(GetCurrentZone()->GetSafeY());
		player->SetZ(GetCurrentZone()->GetSafeZ());
		player->SetHeading(GetCurrentZone()->GetSafeHeading());
	}

	LogWrite(CCLIENT__DEBUG, 0, "Client", "%s: Saving Player info...", __FUNCTION__);
	Save();

	char* new_zone_ip = 0;
	if (IsPrivateAddress(this->GetIP()) && strlen(net.GetInternalWorldAddress()) > 0)
		new_zone_ip = net.GetInternalWorldAddress();
	else
		new_zone_ip = net.GetWorldAddress();
	LogWrite(CCLIENT__DEBUG, 0, "Client", "%s: New Zone IP '%s'...", __FUNCTION__, new_zone_ip);

	int32 key = Timer::GetUnixTimeStamp();
	LogWrite(CCLIENT__DEBUG, 0, "Client", "%s: Sending ZoneChangeMsg...", __FUNCTION__);
	ClientPacketFunctions::SendZoneChange(this, new_zone_ip, net.GetWorldPort(), key);

	LogWrite(CCLIENT__DEBUG, 0, "Client", "%s: Sending to zone_auth.AddAuth...", __FUNCTION__);
	zone_auth.AddAuth(new ZoneAuthRequest(GetAccountID(), player->GetName(), key));
	if (version > 283) {
		PacketStruct* packet = configReader.getStruct("WS_CancelMoveObjectMode", version);
		if (packet)
		{
			QueuePacket(packet->serialize());
			safe_delete(packet);
		}
	}
}

void Client::Zone(const char* new_zone, bool set_coords, bool is_spell)
{
	LogWrite(CCLIENT__DEBUG, 0, "Client", "Zone Request to '%s'", new_zone);
	Zone(zone_list.Get(new_zone), set_coords, is_spell);
}

float Client::DistanceFrom(Client* client) {
	float ret = 0;
	if (client && client != this) {
		ret = pow(player->GetX() - client->player->GetX(), 2) + pow(player->GetY() - client->player->GetY(), 2) + pow(player->GetZ() - client->player->GetZ(), 2);
		ret = sqrt(ret);
	}

	return ret;
}

void Client::DetermineCharacterUpdates() {
	ServerPacket* outpack = new ServerPacket(ServerOP_BasicCharUpdate, sizeof(CharDataUpdate_Struct));
	CharDataUpdate_Struct* cdu = (CharDataUpdate_Struct*)outpack->pBuffer;
	cdu->account_id = GetAccountID();
	cdu->char_id = GetCharacterID();
	int32 timestamp = Timer::GetUnixTimeStamp();
	int8 flag = GetTimeStampFlag();
	if (flag & LEVEL_UPDATE_FLAG)
	{
		cdu->update_field = LEVEL_UPDATE_FLAG;
		cdu->update_data = player->GetLevel();
		loginserver.SendPacket(outpack);
	}
	//if(flag&CLASS_UPDATE_FLAG && player->GetLevel() >= 20)// Perseverance only
	if (flag & CLASS_UPDATE_FLAG)
	{
		cdu->update_field = CLASS_UPDATE_FLAG;
		cdu->update_data = player->GetAdventureClass();
		loginserver.SendPacket(outpack);
	}
	if (flag & GENDER_UPDATE_FLAG)
	{
		cdu->update_field = GENDER_UPDATE_FLAG;
		cdu->update_data = player->GetGender();
		loginserver.SendPacket(outpack);
	}
	if (flag & DELETE_UPDATE_FLAG) {
		LogWrite(MISC__TODO, 1, "TODO", "Delete update req in func: %s, line: %i", __FUNCTION__, __LINE__);
	}

	safe_delete(outpack); // Zone, armor and name use a different structure

	if (flag & RACE_UPDATE_FLAG)
	{
		outpack = new ServerPacket(ServerOP_RaceUpdate, sizeof(RaceUpdate_Struct));
		RaceUpdate_Struct* ru = (RaceUpdate_Struct*)outpack->pBuffer;
		ru->account_id = GetAccountID();
		ru->char_id = GetCharacterID();
		ru->race = player->GetRace();
		ru->model_type = player->GetModelType();
		loginserver.SendPacket(outpack);
		safe_delete(outpack);
	}

	if (flag & ZONE_UPDATE_FLAG) {
		ServerPacket* outpack = new ServerPacket(ServerOP_ZoneUpdate, CHARZONESTRUCT_MAXSIZE);
		memset(outpack->pBuffer, 0, CHARZONESTRUCT_MAXSIZE);
		CharZoneUpdate_Struct* czu = (CharZoneUpdate_Struct*)outpack->pBuffer;
		czu->account_id = GetAccountID();
		czu->char_id = GetCharacterID();
		czu->zone_id = GetCurrentZone()->GetZoneID();
		const char* zone_file = GetCurrentZone()->GetZoneFile();
		czu->zone_length = strlen(zone_file);
		if (czu->zone_length > 64)
			czu->zone_length = 64;
		strncpy(czu->new_zone, zone_file, czu->zone_length);
		loginserver.SendPacket(outpack);
		safe_delete(outpack);
	}
	if (flag & ARMOR_UPDATE_FLAG) {
		LogWrite(MISC__TODO, 1, "TODO", "Armor update req in func: %s, line: %i", __FUNCTION__, __LINE__);
	}
	if (flag & NAME_UPDATE_FLAG) {
		LogWrite(MISC__TODO, 1, "TODO", "Name update req in func: %s, line: %i", __FUNCTION__, __LINE__);
	}

	database.UpdateCharacterTimeStamp(GetAccountID(), GetCharacterID(), timestamp);

}

void Client::Save() {
	if (GetCharacterID() == 0)
		return;

	if (current_zone) {
		DetermineCharacterUpdates();

		UpdateCharacterInstances();

		this->SetLastSavedTimeStamp(Timer::GetCurrentTime2());
		database.Save(this);
		if (GetPlayer()->UpdateQuickbarNeeded()) {
			database.SaveQuickBar(GetCharacterID(), GetPlayer()->GetQuickbar());
			GetPlayer()->ResetQuickbarNeeded();
		}
		database.SaveItems(this);
		database.SaveBuyBacks(this);

		GetPlayer()->SaveHistory();
		GetPlayer()->SaveLUAHistory();
		MSaveSpellStateMutex.lock();
		GetPlayer()->SaveSpellEffects();
		MSaveSpellStateMutex.unlock();
	}

}

void Client::UpdateCharacterInstances() {
	if (GetPlayer() != NULL)
		GetPlayer()->GetCharacterInstances()->ProcessInstanceTimers(GetPlayer());

	/*if ( GetPlayer() != NULL )
	{
	// determine the last timestamp then get a new one, determine the difference in the timestamp
	// to use for applying the update to each instances timer
	int32 lastSaveTS = GetLastSavedTimeStamp();
	int32 newSaveTS = Timer::GetUnixTimeStamp();
	int32 diffTS = newSaveTS - lastSaveTS;

	// update instance timers
	GetPlayer()->GetCharacterInstances().ProcessInstanceTimers(GetPlayer(),diffTS);

	// update with the new timestamp and save the db
	this->SetLastSavedTimeStamp(newSaveTS);
	}*/

}

void Client::HandleVerbRequest(EQApplicationPacket* app) {
	PacketStruct* packet = configReader.getStruct("WS_EntityVerbsRequest", GetVersion());
	if (packet) {
		packet->LoadPacketData(app->pBuffer, app->size);
		int32 spawn_id = packet->getType_int32_ByName("spawn_id");
		PacketStruct* out = configReader.getStruct("WS_EntityVerbsResponse", GetVersion());
		Spawn* spawn = GetPlayer()->GetSpawnWithPlayerID(spawn_id);
		vector<EntityCommand*> commands;
		vector<EntityCommand*> delete_commands;
		if (out && spawn) {
			for (int32 i = 0; i < spawn->primary_command_list.size(); i++)
			{
				// default is a deny list not allow, only allow if on the iterator list and itr second is not false (deny)
				if (!spawn->primary_command_list[i]->default_allow_list)
				{
					map<int32, bool>::iterator itr = spawn->primary_command_list[i]->allow_or_deny.find(GetPlayer()->GetCharacterID());
					if (itr == spawn->primary_command_list[i]->allow_or_deny.end() || !itr->second)
						continue;
				}
				else
				{
					// default is allow list, only deny if added to the list as deny (false itr second)
					map<int32, bool>::iterator itr = spawn->primary_command_list[i]->allow_or_deny.find(GetPlayer()->GetCharacterID());
					if (itr != spawn->primary_command_list[i]->allow_or_deny.end() && !itr->second)
						continue;
				}
				commands.push_back(spawn->primary_command_list[i]);
			}
			for (int32 i = 0; i < spawn->secondary_command_list.size(); i++)
				commands.push_back(spawn->secondary_command_list[i]);
			if (spawn->IsPlayer()) {
				if (player->IsFriend(spawn->GetName()))
					delete_commands.push_back(player->CreateEntityCommand("remove from friends list", 10000, "friend_remove", "", 0, 0));
				else
					delete_commands.push_back(player->CreateEntityCommand("add to friends list", 10000, "friend_add", "", 0, 0));
				if (player->IsIgnored(spawn->GetName()))
					delete_commands.push_back(player->CreateEntityCommand("remove from ignore list", 10000, "ignore_remove", "", 0, 0));
				else
				{
					delete_commands.push_back(player->CreateEntityCommand("add to ignore list", 10000, "ignore_add", "", 0, 0));
					delete_commands.push_back(player->CreateEntityCommand("Trade", 10, "start_trade", "", 0, 0));
				}
				if (((Player*)spawn)->GetGroupMemberInfo()) {
					if (player->IsGroupMember((Player*)spawn) && player->GetGroupMemberInfo()->leader) { //group leader
						delete_commands.push_back(player->CreateEntityCommand("kick from group", 10000, "kickfromgroup", "", 0, 0));
						delete_commands.push_back(player->CreateEntityCommand("make group leader", 10000, "makeleader", "", 0, 0));
					}
					if(spawn->IsPlayer() && !player->GetGroupMemberInfo()->mentor_target_char_id)
						delete_commands.push_back(player->CreateEntityCommand("Mentor", 10000, "mentor", "", 0, 0));
					else if(spawn->IsPlayer() && player->GetGroupMemberInfo()->mentor_target_char_id == ((Player*)spawn)->GetCharacterID())
						delete_commands.push_back(player->CreateEntityCommand("Stop Mentoring", 10000, "unmentor", "", 0, 0));
				}
				else if (!player->GetGroupMemberInfo() || (player->GetGroupMemberInfo()->leader && world.GetGroupManager()->GetGroupSize(player->GetGroupMemberInfo()->group_id) < 6))
					delete_commands.push_back(player->CreateEntityCommand("invite to group", 10000, "invite", "", 0, 0));
				commands.insert(commands.end(), delete_commands.begin(), delete_commands.end());
			}
			out->setDataByName("spawn_id", spawn_id);
			out->setArrayLengthByName("num_verbs", commands.size());

			for (int32 i = 0; i < commands.size(); i++) {
				out->setArrayDataByName("command", commands[i]->command.c_str(), i);
				out->setArrayDataByName("distance", commands[i]->distance, i);
				if (commands[i]->error_text.length() == 0)
					out->setArrayAddToPacketByName("error", false, i);
				else {
					out->setArrayDataByName("display_error", 1, i);
					out->setArrayDataByName("error", commands[i]->error_text.c_str(), i);
				}
				out->setArrayDataByName("display_text", commands[i]->name.c_str(), i);
			}
			EQ2Packet* outapp = out->serialize();
			//DumpPacket(outapp);
			QueuePacket(outapp);
			safe_delete(out);
			for (int32 i = 0; i < delete_commands.size(); i++) {
				safe_delete(delete_commands[i]);
			}
		}
		safe_delete(packet);
	}

}

void Client::SkillChanged(Skill* skill, int16 previous_value, int16 new_value) {
	if (previous_value != new_value) {
		Message(CHANNEL_SKILL, "You get %s at %s (%i/%i).", new_value > previous_value ? "better" : "worse", skill->name.data.c_str(), new_value, skill->max_val);
		char tmp[200] = { 0 };
		sprintf(tmp, "\\#6EFF6EYou get %s at \12\\#C8FFC8%s\\#6EFF6E! (%i/%i)", new_value > previous_value ? "better" : "worse", skill->name.data.c_str(), new_value, skill->max_val);
		SendPopupMessage(6, tmp, new_value > previous_value ? "skill_up" : "skill_down", 2.75f, 0xFF, 0xFF, 0xFF);
	}

}

void Client::SendPopupMessage(int8 unknown, const char* text, const char* type, float size, int8 red, int8 green, int8 blue)
{
	/* JA notes on the unknown:
		2 = ding glimmer
		16 = Achievement Unlocked
		6 no longer does anything
	*/

	PacketStruct* packet = configReader.getStruct("WS_OnScreenMsg", GetVersion());
	if (packet) {
		packet->setDataByName("unknown", unknown);
		packet->setMediumStringByName("text", text);
		if (type && strlen(type) > 0)
			packet->setMediumStringByName("message_type", type);
		packet->setDataByName("size", size);
		packet->setDataByName("red", red);
		packet->setDataByName("green", green);
		packet->setDataByName("blue", blue);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

}

void Client::ChangeLevel(int16 old_level, int16 new_level) {
	if (new_level < 1) {
		SimpleMessage(CHANNEL_COLOR_RED, "You cannot be lower than level 1!");
		return;
	}

	if (player->GetLevel() != new_level) {
		player->SetLevel(new_level);
		if (player->GetGroupMemberInfo()) {
			player->UpdateGroupMemberInfo();
			world.GetGroupManager()->SendGroupUpdate(player->GetGroupMemberInfo()->group_id);
		}
	}

	if (new_level > old_level) {		
		player->UpdatePlayerHistory(HISTORY_TYPE_XP, HISTORY_SUBTYPE_ADVENTURE, new_level, player->GetAdventureClass());
	}

	if (player->GetPet()) {
		NPC* pet = (NPC*)player->GetPet();
		if (pet->GetMaxPetLevel() == 0 || new_level <= pet->GetMaxPetLevel()) {
			pet->SetLevel(new_level);
			PacketStruct* command_packet = configReader.getStruct("WS_CannedEmote", GetVersion());
			if (command_packet) {
				command_packet->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(pet));
				command_packet->setDataByName("anim_type", 1753);
				QueuePacket(command_packet->serialize());
				safe_delete(command_packet);
			}
		}
	}

	PacketStruct* level_update = configReader.getStruct("WS_LevelChanged", GetVersion());
	if (level_update) {
		level_update->setDataByName("old_level", old_level);
		level_update->setDataByName("new_level", new_level);
		QueuePacket(level_update->serialize());
		safe_delete(level_update);
		GetCurrentZone()->StartZoneSpawnsForLevelThread(this);
		GetCurrentZone()->SendCastSpellPacket(322, player, player); //send level up spell effect
		//GetCurrentZone()->SendAllSpawnsForLevelChange(this);
	}

	PacketStruct* command_packet = configReader.getStruct("WS_CannedEmote", GetVersion());
	if (command_packet) {
		command_packet->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(player));
		command_packet->setDataByName("anim_type", 1753);
		QueuePacket(command_packet->serialize());
		safe_delete(command_packet);
	}

	if (!player->get_character_flag(CF_ENABLE_CHANGE_LASTNAME) && new_level >= rule_manager.GetGlobalRule(R_Player, MinLastNameLevel)->GetInt8())
		player->set_character_flag(CF_ENABLE_CHANGE_LASTNAME);

	SendNewSpells(player->GetAdventureClass());
	SendNewSpells(classes.GetBaseClass(player->GetAdventureClass()));
	SendNewSpells(classes.GetSecondaryBaseClass(player->GetAdventureClass()));


	GetPlayer()->ChangePrimaryWeapon();
	GetPlayer()->ChangeSecondaryWeapon();
	GetPlayer()->ChangeRangedWeapon();
	GetPlayer()->GetInfoStruct()->set_level(new_level);
	// GetPlayer()->SetLevel(new_level);

	LogWrite(MISC__TODO, 1, "TODO", "Get new HP/POWER/stat based on default values from DB\n\t(%s, function: %s, line #: %i)", __FILE__, __FUNCTION__, __LINE__);

	GetPlayer()->SetTotalHPBase(new_level * new_level * 2 + 40);
	GetPlayer()->SetTotalPowerBase((sint32)(new_level * new_level * 2.1 + 45));
	GetPlayer()->CalculateBonuses();
	GetPlayer()->SetHP(GetPlayer()->GetTotalHP());
	GetPlayer()->SetPower(GetPlayer()->GetTotalPower());
	InfoStruct* info = player->GetInfoStruct();
	info->set_agi_base(new_level * 2 + 15);
	info->set_intel_base(new_level * 2 + 15);
	info->set_wis_base(new_level * 2 + 15);
	info->set_str_base(new_level * 2 + 15);
	info->set_sta_base(new_level * 2 + 15);
	info->set_cold_base((int16)(new_level * 1.5 + 10));
	info->set_heat_base((int16)(new_level * 1.5 + 10));
	info->set_disease_base((int16)(new_level * 1.5 + 10));
	info->set_mental_base((int16)(new_level * 1.5 + 10));
	info->set_magic_base((int16)(new_level * 1.5 + 10));
	info->set_divine_base((int16)(new_level * 1.5 + 10));
	info->set_poison_base((int16)(new_level * 1.5 + 10));
	GetPlayer()->GetInfoStruct()->set_poison_base((int16)(new_level * 1.5 + 10));
	UpdateTimeStampFlag(LEVEL_UPDATE_FLAG);
	GetPlayer()->SetCharSheetChanged(true);

	Message(CHANNEL_REWARD, "You are now level %i!", new_level);
	LogWrite(WORLD__DEBUG, 0, "World", "Player: %s leveled from %u to %u", GetPlayer()->GetName(), old_level, new_level);
	int16 new_skill_cap = 5 * new_level;
	PlayerSkillList* player_skills = player->GetSkills();

	player_skills->SetSkillCapsByType(SKILL_TYPE_ARMOR, new_skill_cap);
	player_skills->SetSkillCapsByType(SKILL_TYPE_SHIELD, new_skill_cap);
	//SKILL_TYPE_ARMOR/SKILL_TYPE_SHIELD always has the same current / max values
	player_skills->SetSkillValuesByType(SKILL_TYPE_ARMOR, new_skill_cap, false);
	player_skills->SetSkillValuesByType(SKILL_TYPE_SHIELD, new_skill_cap, false);

	player_skills->SetSkillCapsByType(SKILL_TYPE_CLASS, new_skill_cap);
	player_skills->SetSkillCapsByType(SKILL_TYPE_WEAPON, new_skill_cap);
	//SKILL_TYPE_CLASS/SKILL_TYPE_WEAPON always has the same current/max values
	player_skills->SetSkillValuesByType(SKILL_TYPE_CLASS, new_skill_cap, false);
	player_skills->SetSkillValuesByType(SKILL_TYPE_WEAPON, new_skill_cap, false);
	
	player_skills->SetSkillCapsByType(SKILL_TYPE_COMBAT, new_skill_cap);
	player_skills->SetSkillCapsByType(SKILL_TYPE_GENERAL, new_skill_cap);
	player_skills->SetSkillCapsByType(SKILL_TYPE_SPELLCASTING, new_skill_cap);
	player_skills->SetSkillCapsByType(SKILL_TYPE_AVOIDANCE, new_skill_cap);
	
	if (new_level > player->GetTSLevel())
		player_skills->SetSkillCapsByType(SKILL_TYPE_HARVESTING, new_skill_cap);

	//SKILL_ID_DUALWIELD, SKILL_ID_FISTS, SKILL_ID_DESTROYING, and SKILL_ID_MAGIC_AFFINITY always have the current_val equal to max_val
	if (player_skills->HasSkill(SKILL_ID_DUALWIELD))
		player_skills->SetSkill(SKILL_ID_DUALWIELD, new_skill_cap);
	if (player_skills->HasSkill(SKILL_ID_FISTS))
		player_skills->SetSkill(SKILL_ID_FISTS, new_skill_cap);
	if (player_skills->HasSkill(SKILL_ID_DESTROYING))
		player_skills->SetSkill(SKILL_ID_DESTROYING, new_skill_cap);
	if (player_skills->HasSkill(SKILL_ID_MAGIC_AFFINITY))
		player_skills->SetSkill(SKILL_ID_MAGIC_AFFINITY, new_skill_cap);

	Guild* guild = GetPlayer()->GetGuild();
	if (guild) {
		int8 event_type = 0;
		if (new_level < 10)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_1_10;
		else if (new_level == 10)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_10;
		else if (new_level >= 11 && new_level < 20)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_11_20;
		else if (new_level == 20)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_20;
		else if (new_level >= 21 && new_level < 30)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_21_30;
		else if (new_level == 30)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_30;
		else if (new_level >= 31 && new_level < 40)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_31_40;
		else if (new_level == 40)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_40;
		else if (new_level >= 41 && new_level < 50)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_41_50;
		else if (new_level == 50)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_50;
		else if (new_level >= 51 && new_level < 60)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_51_60;
		else if (new_level == 60)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_60;
		else if (new_level >= 61 && new_level < 70)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_61_70;
		else if (new_level == 70)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_70;
		else if (new_level >= 71 && new_level < 80)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_71_80;
		else if (new_level == 80)
			event_type = GUILD_EVENT_GAINS_ADV_LEVEL_80;

		guild->AddNewGuildEvent(event_type, "%s has gained an adventure level and is now a level %u %s.", Timer::GetUnixTimeStamp(), true, GetPlayer()->GetName(), new_level, classes.GetClassNameCase(GetPlayer()->GetAdventureClass()).c_str());
		guild->SendMessageToGuild(event_type, "%s has gained an adventure level and is now a level %u %s.", GetPlayer()->GetName(), new_level, classes.GetClassNameCase(GetPlayer()->GetAdventureClass()).c_str());
		guild->UpdateGuildMemberInfo(GetPlayer());
		guild->SendGuildMember(GetPlayer());
		guild->SendGuildMemberList();
	}

	// Need to send the trait list every time the players level changes
	// Also need to force the char sheet update or else there can be a large delay from when you level
	// to when you are actually able to select traits.
	QueuePacket(GetPlayer()->GetPlayerInfo()->serialize(GetVersion()));
	QueuePacket(master_trait_list.GetTraitListPacket(this));

	if (version > 546)
		master_aa_list.DisplayAA(this, 0, 0);

	if (GetPlayer()->SpawnedBots.size() > 0) {
		map<int32, int32>::iterator itr;
		for (itr = GetPlayer()->SpawnedBots.begin(); itr != GetPlayer()->SpawnedBots.end(); itr++) {
			Spawn* bot = GetCurrentZone()->GetSpawnByID(itr->second);
			if (bot && bot->IsBot())
				((Bot*)bot)->ChangeLevel(old_level, new_level);
		}
	}
}

void Client::ChangeTSLevel(int16 old_level, int16 new_level) {
	if (new_level < 1) {
		SimpleMessage(CHANNEL_COLOR_RED, "You cannot be lower than level 1!");
		return;
	}
	if ((player->GetTSLevel() >= 9 && player->GetTradeskillClass() == 1) || (player->GetTSLevel() >= 19 && (player->GetTradeskillClass() == 1 || player->GetTradeskillClass() == 2 || player->GetTradeskillClass() == 6 || player->GetTradeskillClass() == 10))) {
		SimpleMessage(CHANNEL_COLOR_YELLOW, "You can not gain levels until you select your next class!");
		return;
	}

	if (new_level > old_level)
		player->UpdatePlayerHistory(HISTORY_TYPE_XP, HISTORY_SUBTYPE_TRADESKILL, new_level, player->GetTradeskillClass());

	if (player->GetTSLevel() != new_level) {
		player->SetTSLevel(new_level);
		if (player->GetGroupMemberInfo()) {
			player->UpdateGroupMemberInfo();
			world.GetGroupManager()->SendGroupUpdate(player->GetGroupMemberInfo()->group_id);
		}
	}
	// Only tradeskill skills should increace, and then only those related to your class
	PacketStruct* level_update = configReader.getStruct("WS_LevelChanged", GetVersion());
	if (level_update) {
		level_update->setDataByName("old_level", old_level);
		level_update->setDataByName("new_level", new_level);
		level_update->setDataByName("type", 1);
		QueuePacket(level_update->serialize());
		safe_delete(level_update);
	}
	// Need to make tradeskill versions of the following
	//SendNewSpells(player->GetAdventureClass());
	//SendNewSpells(classes.GetBaseClass(player->GetAdventureClass()));
	//SendNewSpells(classes.GetSecondaryBaseClass(player->GetAdventureClass()));
	PacketStruct* command_packet = configReader.getStruct("WS_CannedEmote", GetVersion());
	if (command_packet) {
		command_packet->setDataByName("spawn_id", GetPlayer()->GetIDWithPlayerSpawn(GetPlayer()));
		command_packet->setDataByName("anim_type", 1753);
		QueuePacket(command_packet->serialize());
		safe_delete(command_packet);
	}
	GetPlayer()->GetInfoStruct()->set_tradeskill_level(new_level);
	GetPlayer()->SetTSLevel(new_level);


	UpdateTimeStampFlag(LEVEL_UPDATE_FLAG);
	GetPlayer()->SetCharSheetChanged(true);
	Message(CHANNEL_NARRATIVE, "Your tradeskill level is now %i!", new_level);
	LogWrite(WORLD__DEBUG, 0, "World", "Player: %s leveled from %u to %u", GetPlayer()->GetName(), old_level, new_level);

	PlayerSkillList* player_skills = player->GetSkills();
	int16 specialize_skill_cap = new_level * 5;
	int16 artisan_skill_cap = std::max<int16>(specialize_skill_cap, 49);
	int16 specialize_10_skill_cap = std::max<int16>(specialize_skill_cap, 99);

	int8 ts_class = player->GetTradeskillClass();
	int8 base_ts_class = classes.GetSecondaryTSBaseClass(ts_class);
	int32 skill_id_1, skill_id_2, skill_id_3;

	switch (base_ts_class) {
	case ARTISAN:
		player_skills->SetSkillCapsByType(SKILL_TYPE_OUTFITTER, artisan_skill_cap);
		player_skills->SetSkillCapsByType(SKILL_TYPE_SCHOLAR, artisan_skill_cap);
		player_skills->SetSkillCapsByType(SKILL_TYPE_CRAFTSMAN, artisan_skill_cap);
		break;
	case OUTFITTER:
		player_skills->SetSkillCapsByType(SKILL_TYPE_SCHOLAR, artisan_skill_cap);
		player_skills->SetSkillCapsByType(SKILL_TYPE_CRAFTSMAN, artisan_skill_cap);

		skill_id_1 = SKILL_ID_TAILORING;
		skill_id_2 = SKILL_ID_METALSHAPING;
		skill_id_3 = SKILL_ID_METALWORKING;

		if (ts_class == TAILOR) {
			player_skills->SetSkillCap(skill_id_1, specialize_skill_cap);
			skill_id_1 = 0;
		}
		else if (ts_class == ARMORER) {
			player_skills->SetSkillCap(skill_id_2, specialize_skill_cap);
			skill_id_2 = 0;
		}
		else if (ts_class == WEAPONSMITH) {
			player_skills->SetSkillCap(skill_id_3, specialize_skill_cap);
			skill_id_3 = 0;
		}

		if (skill_id_1) player_skills->SetSkillCap(skill_id_1, specialize_10_skill_cap);
		if (skill_id_2) player_skills->SetSkillCap(skill_id_2, specialize_10_skill_cap);
		if (skill_id_3) player_skills->SetSkillCap(skill_id_3, specialize_10_skill_cap);
		break;
	case SCHOLAR:
		player_skills->SetSkillCapsByType(SKILL_TYPE_OUTFITTER, artisan_skill_cap);
		player_skills->SetSkillCapsByType(SKILL_TYPE_CRAFTSMAN, artisan_skill_cap);

		skill_id_1 = SKILL_ID_SCRIBING;
		skill_id_2 = SKILL_ID_CHEMISTRY;
		skill_id_3 = SKILL_ID_ARTIFICING;

		if (ts_class == SAGE) {
			player_skills->SetSkillCap(skill_id_1, specialize_skill_cap);
			skill_id_1 = 0;
		}
		else if (ts_class == ALCHEMIST) {
			player_skills->SetSkillCap(skill_id_2, specialize_skill_cap);
			skill_id_2 = 0;
		}
		else if (ts_class == JEWELER) {
			player_skills->SetSkillCap(skill_id_3, specialize_skill_cap);
			skill_id_3 = 0;
		}

		if (skill_id_1) player_skills->SetSkillCap(skill_id_1, specialize_10_skill_cap);
		if (skill_id_2) player_skills->SetSkillCap(skill_id_2, specialize_10_skill_cap);
		if (skill_id_3) player_skills->SetSkillCap(skill_id_3, specialize_10_skill_cap);
		break;
	case CRAFTSMAN:
		player_skills->SetSkillCapsByType(SKILL_TYPE_OUTFITTER, artisan_skill_cap);
		player_skills->SetSkillCapsByType(SKILL_TYPE_SCHOLAR, artisan_skill_cap);

		skill_id_1 = SKILL_ID_ARTISTRY;
		skill_id_2 = SKILL_ID_FLETCHING;
		skill_id_3 = SKILL_ID_SCULPTING;

		if (ts_class == PROVISIONER) {
			player_skills->SetSkillCap(skill_id_1, specialize_skill_cap);
			skill_id_1 = 0;
		}
		else if (ts_class == WOODWORKER) {
			player_skills->SetSkillCap(skill_id_2, specialize_skill_cap);
			skill_id_2 = 0;
		}
		else if (ts_class == CARPENTER) {
			player_skills->SetSkillCap(skill_id_3, specialize_skill_cap);
			skill_id_3 = 0;
		}

		if (skill_id_1) player_skills->SetSkillCap(skill_id_1, specialize_10_skill_cap);
		if (skill_id_2) player_skills->SetSkillCap(skill_id_2, specialize_10_skill_cap);
		if (skill_id_3) player_skills->SetSkillCap(skill_id_3, specialize_10_skill_cap);
		break;
	default:
		break;
	}

	if (new_level > player->GetAdventureClass())
		player_skills->SetSkillCapsByType(SKILL_TYPE_HARVESTING, specialize_skill_cap);

	Guild* guild = GetPlayer()->GetGuild();
	if (guild) {
		int8 event_type = 0;
		if (new_level < 10)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_1_10;
		else if (new_level == 10)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_10;
		else if (new_level >= 11 && new_level < 20)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_11_20;
		else if (new_level == 20)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_20;
		else if (new_level >= 21 && new_level < 30)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_21_30;
		else if (new_level == 30)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_30;
		else if (new_level >= 31 && new_level < 40)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_31_40;
		else if (new_level == 40)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_40;
		else if (new_level >= 41 && new_level < 50)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_41_50;
		else if (new_level == 50)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_50;
		else if (new_level >= 51 && new_level < 60)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_51_60;
		else if (new_level == 60)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_60;
		else if (new_level >= 61 && new_level < 70)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_61_70;
		else if (new_level == 70)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_70;
		else if (new_level >= 71 && new_level < 80)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_71_80;
		else if (new_level == 80)
			event_type = GUILD_EVENT_GAINS_TS_LEVEL_80;
		guild->AddNewGuildEvent(event_type, "%s has gained a tradeskill level and is now a level %u %s.", Timer::GetUnixTimeStamp(), true, GetPlayer()->GetName(), new_level, classes.GetClassNameCase(GetPlayer()->GetTradeskillClass() + 42).c_str());
		guild->SendMessageToGuild(event_type, "%s has gained a tradeskill level and is now a level %u %s.", GetPlayer()->GetName(), new_level, classes.GetClassNameCase(GetPlayer()->GetTradeskillClass() + 42).c_str());
		guild->UpdateGuildMemberInfo(GetPlayer());
		guild->SendGuildMember(GetPlayer());
		guild->SendGuildMemberList();
	}

	// Need to send the trait list every time the players level changes
	// Also need to force the char sheet update or else there can be a large delay from when you level
	// to when you are actually able to select traits.
	QueuePacket(GetPlayer()->GetPlayerInfo()->serialize(GetVersion()));
	QueuePacket(master_trait_list.GetTraitListPacket(this));
}

void Client::SendPendingLoot(int32 total_coins, Spawn* entity) {
	if (entity)
		Loot(total_coins, player->GetPendingLootItems(entity->GetID()), entity);
}

void Client::CloseLoot(int32 spawn_id) {
	if (GetVersion() > 546) {
		PacketStruct* packet = configReader.getStruct("WS_CloseWindow", GetVersion());
		if (packet) {
			packet->setDataByName("window_id", 4);
			EQ2Packet* outapp = packet->serialize();
			if (outapp) {
				//DumpPacket(outapp);
				QueuePacket(outapp);
			}
			safe_delete(packet);
		}
	}
	else if(spawn_id > 0){
		PacketStruct* packet = configReader.getStruct("WS_StoppedLooting", GetVersion());
		if (packet) {
			packet->setDataByName("spawn_id", spawn_id);
			EQ2Packet* outapp = packet->serialize();
			if (outapp)
				QueuePacket(outapp);
			safe_delete(packet);
		}
	}
}

string Client::GetCoinMessage(int32 total_coins) {
	if (total_coins == 0) {
		return " 0 Copper";
	}
	char tmp[64] = { 0 };
	string message = "";
	int32 val = 0;
	if (total_coins >= 1000000) {
		val = total_coins / 1000000;
		total_coins -= 1000000 * val;
		sprintf(tmp, " %u Platinum", val);
		message.append(tmp);
		memset(tmp, 0, 64);
	}
	if (total_coins >= 10000) {
		val = total_coins / 10000;
		total_coins -= 10000 * val;
		sprintf(tmp, " %u Gold", val);
		message.append(tmp);
		memset(tmp, 0, 64);
	}
	if (total_coins >= 100) {
		val = total_coins / 100;
		total_coins -= 100 * val;
		sprintf(tmp, " %u Silver", val);
		message.append(tmp);
		memset(tmp, 0, 64);
	}
	if (total_coins > 0) {
		sprintf(tmp, " %u Copper", (int32)total_coins);
		message.append(tmp);
	}

	return message;
}

void Client::Loot(int32 total_coins, vector<Item*>* items, Spawn* entity) {
	if (!entity) {
		CloseLoot(0);
		return;
	}
	if (total_coins > 0) {
		player->AddCoins(total_coins);
		//PlaySound("coin_cha_ching");
		string message = "";
		if (entity->GetHP() == 0) {
			message = "You loot ";
			entity->SetLootCoins(0);
		}
		else
			message = "You receive ";
		message.append(GetCoinMessage(total_coins));
		if (entity->GetHP() == 0)
			message.append(" from the corpse of ").append(entity->GetName());
		int8 type = CHANNEL_LOOT;

		SimpleMessage(type, message.c_str());
	}
	if (!items || items->size() == 0)
		CloseLoot(entity->GetID());
	PacketStruct* packet = configReader.getStruct("WS_UpdateLoot", GetVersion());
	if (packet) {
		vector<Item*>::iterator itr;
		int32 packet_size = 0;
		EQ2Packet* outapp = 0;
		uchar* data = 0;
		if (GetVersion() >= 284) {
			if (GetVersion() > 546) {
				if (items && items->size() > 0) {
					packet->setDataByName("loot_count", items->size());
					packet->setDataByName("display", 1);
				}
				packet->setDataByName("loot_type", 1);
				if (version >= 1096)
					packet->setDataByName("lotto_timeout", 0x78);
				else
					packet->setDataByName("lotto_timeout", 0x3C);

				packet->setDataByName("loot_id", entity->GetID());
				EQ2Packet* tmpPacket = packet->serialize();
				packet_size += tmpPacket->size;
				if (items && items->size() > 0) {
					data = new uchar[items->size() * 1000 + packet_size];
					memset(data, 0, items->size() * 1000 + packet_size);
				}
				else {
					data = new uchar[packet_size];
					memset(data, 0, packet_size);
				}
				uchar* ptr = data;
				memcpy(ptr, tmpPacket->pBuffer, tmpPacket->size);
				ptr += tmpPacket->size;
				safe_delete(tmpPacket);
				Item* item = 0;
				if (items && items->size() > 0) {
					for (itr = items->begin(); itr != items->end(); itr++) {
						item = *itr;
						memcpy(ptr, &item->details.item_id, sizeof(int32));
						ptr += sizeof(int32);
						packet_size += sizeof(int32);

						tmpPacket = item->serialize(GetVersion(), true, GetPlayer(), false, 1, 0, false, true);

						int8 offset = 0;
						if (GetVersion() >= 1188) {
							offset = 13;
						}
						else if (GetVersion() >= 860) {
							offset = 11;
						}
						else if (GetVersion() <= 546) {
							offset = 19;
						}
						else {
							offset = 10;
						}

						memcpy(ptr, tmpPacket->pBuffer + offset, tmpPacket->size - offset);
						ptr += tmpPacket->size - offset;
						packet_size += tmpPacket->size - offset;

						safe_delete(tmpPacket);
					}
				}
				packet_size -= sizeof(int32);
				memcpy(data, &packet_size, sizeof(int32));
				packet_size += sizeof(int32);
				outapp = new EQ2Packet(OP_ClientCmdMsg, data, packet_size);
			}
			else {
				if (items && items->size() > 0) {
					packet->setArrayLengthByName("loot_count", items->size());
					Item* item = 0;
					if (items && items->size() > 0) {
						int i = 0;
						for (itr = items->begin(); itr != items->end(); itr++) {
							item = *itr;
							packet->setArrayDataByName("loot_id", item->details.item_id, i);
							packet->setItemArrayDataByName("item", item, GetPlayer(), i, 0, 2, true);
							i++;
						}
					}
					packet->setDataByName("display", 1);
				}
				packet->setDataByName("loot_type", 1); // normal
				packet->setDataByName("lotto_timeout", 0x3c); // 60 seconds
				packet->setDataByName("spawn_id", entity->GetID());
				outapp = packet->serialize();
			}
		}
		else {
			if (items && items->size() > 0) {
				packet->setArrayLengthByName("loot_count", items->size());
				for (int i = 0; i < items->size(); i++) {
					Item* item = (*items)[i];
					packet->setArrayDataByName("name", item->name.c_str(), i);
					packet->setArrayDataByName("item_id", item->details.item_id, i);
					packet->setArrayDataByName("count", item->details.count, i);
					packet->setArrayDataByName("icon", item->details.icon, i);
					if (item->generic_info.skill_req1 > 0 && item->generic_info.skill_req1 < 0xFFFFFFFF)
						packet->setArrayDataByName("ability_id", item->generic_info.skill_req1, i);
					else if (item->generic_info.skill_req2 > 0 && item->generic_info.skill_req2 < 0xFFFFFFFF)
						packet->setArrayDataByName("ability_id", item->generic_info.skill_req2, i);
					else
						packet->setArrayDataByName("ability_id", 0xFFFFFFFF, i);
				}
			}
			packet->setDataByName("object_id", entity->GetID());
			packet->setDataByName("unknown3", 1);
			packet->setDataByName("unknown4", 1);
			packet->setDataByName("unknown5", 60);
			outapp = packet->serialize();
		}
		if (outapp) {
			DumpPacket(outapp);
			QueuePacket(outapp);
		}
		safe_delete_array(data);
		safe_delete(packet);
	}

}

void Client::Loot(Spawn* entity, bool attemptDisarm) {
	if (entity->IsNPC() && ((NPC*)entity)->Brain()->CheckLootAllowed(GetPlayer())) {
		int32 total_coins = entity->GetLootCoins();
		entity->LockLoot();
		Loot(total_coins, entity->GetLootItems(), entity);
		entity->UnlockLoot();

		OpenChest(entity, attemptDisarm);
	}
	else
		SimpleMessage(CHANNEL_COLOR_YELLOW, "You are not allowed to loot at this time.");

}

void Client::OpenChest(Spawn* entity, bool attemptDisarm)
{
	if (!entity)
		return;

	int8 chest_difficulty = 0;
	int32 state = 0;
	// Check for the chest and set the action state
	/*4034 = small chest | 5864 = treasure chest | 5865 = ornate treasure chest | 4015 = exquisite chest*/
	string modelName;
	if (entity->GetModelType() == 4034) {
		// small chest, open with copper coins
		// does not include traps, however can be disarmed
		chest_difficulty = 1;
		state = 11899;
		modelName.append("Small Chest");
	}
	else if (entity->GetModelType() == 5864) {
		// treasure chest, open with silver coins
		chest_difficulty = 2;
		state = 11901;
		modelName.append("Treasure Chest");
	}
	else if (entity->GetModelType() == 5865) {
		// ornate chest, open with gold coins
		chest_difficulty = 3;
		state = 11900;
		modelName.append("Ornate Chest");
	}
	else if (entity->GetModelType() == 4015) {
		// exquisite chest, open with gold coins and jewels as well as a glow effect
		chest_difficulty = 5;
		state = 11898;
		modelName.append("Exquisite Chest");
	}
	bool firstChestOpen = false;

	if (chest_difficulty > 0 && !entity->HasTrapTriggered())
	{
		ChestTrap::ChestTrapInfo nextTrap;

		bool ret = chest_trap_list.GetNextTrap(GetCurrentZone()->GetZoneID(), chest_difficulty, &nextTrap);

		Skill* disarmSkill = GetPlayer()->GetSkillByName("Disarm Trap", false);
		firstChestOpen = true;
		entity->SetTrapTriggered(true, state);
		if (ret)
		{
			if (disarmSkill && attemptDisarm)
			{
				if (disarmSkill->CheckDisarmSkill(entity->GetLevel(), chest_difficulty) < 1)
				{
					CastGroupOrSelf(entity && entity->IsEntity() ? (Entity*)entity : 0, nextTrap.spell_id, nextTrap.spell_tier,
						rule_manager.GetGlobalRule(R_Loot, ChestTriggerRadiusGroup)->GetFloat());
					Message(CHANNEL_NARRATIVE, "You trigger the trap on %s!", modelName.c_str());
				}
				else
				{
					Message(CHANNEL_NARRATIVE, "You disarm the trap on %s", modelName.c_str());
				}

				// despite fail/succeed we should always try to increase skill if disarm is available
				GetPlayer()->GetSkillByName("Disarm Trap", true);
			}
			else // no disarm skill, always fail
			{
				CastGroupOrSelf(entity && entity->IsEntity() ? (Entity*)entity : 0, nextTrap.spell_id, nextTrap.spell_tier,
					rule_manager.GetGlobalRule(R_Loot, ChestTriggerRadiusGroup)->GetFloat());
				Message(CHANNEL_NARRATIVE, "You trigger the trap on %s!", modelName.c_str());
			}
		}
	}
	else if (!entity->HasTrapTriggered())
	{
		firstChestOpen = true;
		entity->SetTrapTriggered(true, state);
	}

	// We set the visual state with out updating so those not in range will see it opened when it is finally sent to them,
	// for those in range the SendStateCommand will cause it to animate open.

	// players not currently in radius will have it queued with client->QueueStateCommand when SendSpawn takes place
	if (firstChestOpen)
		GetCurrentZone()->SendStateCommand(entity, state);
}

void Client::CastGroupOrSelf(Entity* source, uint32 spellID, uint32 spellTier, float restrictiveRadius)
{
	Spell* spell = master_spell_list.GetSpell(spellID, spellTier);
	SpellProcess* spellProcess = GetCurrentZone()->GetSpellProcess();
	if (source == NULL)
		source = (Entity*)GetPlayer();
	if (spell)
	{
		GroupMemberInfo* gmi = GetPlayer()->GetGroupMemberInfo();
		if (gmi && gmi->group_id)
		{
			PlayerGroup* group = world.GetGroupManager()->GetGroup(gmi->group_id);
			if (group)
			{
				group->MGroupMembers.readlock(__FUNCTION__, __LINE__);
				deque<GroupMemberInfo*>* members = group->GetMembers();
				for (int8 i = 0; i < members->size(); i++) {
					Entity* member = members->at(i)->member;

					if (!member->Alive() || (member->GetZone() != source->GetZone()))
						continue;
					// if we have a radius provided then check if the group member is outside the radius or not
					if (restrictiveRadius > 0.0f && member->GetDistance(source) > restrictiveRadius)
						continue;

					spellProcess->CastInstant(spell, source, (Entity*)GetPlayer());
				}
				group->MGroupMembers.releasereadlock(__FUNCTION__, __LINE__);
			}
		}
		else
			spellProcess->CastInstant(spell, source, (Entity*)GetPlayer());
	}
}

Spawn* Client::GetBanker() {
	return banker;
}

void Client::SetBanker(Spawn* in_banker) {
	banker = in_banker;

}

void Client::Bank(Spawn* banker, bool cancel) {
	if (banker && banker->primary_command_list.size() > 0 && banker->primary_command_list[0]->command == "bank") {
		if (!cancel)
			SetBanker(banker);
		else
			SetBanker(0);
		PacketStruct* packet = configReader.getStruct("WS_UpdateBank", GetVersion());
		if (packet) {
			packet->setDataByName("spawn_id", GetPlayer()->GetIDWithPlayerSpawn(banker));
			int64 coins = GetPlayer()->GetInfoStruct()->get_bank_coin_copper() + GetPlayer()->GetInfoStruct()->get_bank_coin_silver() * 100 +
				GetPlayer()->GetInfoStruct()->get_bank_coin_gold() * 10000 + (int64)GetPlayer()->GetInfoStruct()->get_bank_coin_plat() * 1000000;
			int32 coins1, coins2;
			coins1 = ((int32*)&coins)[0];
			coins2 = ((int32*)&coins)[1];
			packet->setDataByName("bank_coins", coins1);
			packet->setDataByName("bank_coins2", coins2);
			packet->setDataByName("copper", GetPlayer()->GetInfoStruct()->get_coin_copper());
			packet->setDataByName("silver", GetPlayer()->GetInfoStruct()->get_coin_silver());
			packet->setDataByName("gold", GetPlayer()->GetInfoStruct()->get_coin_gold());
			packet->setDataByName("plat", GetPlayer()->GetInfoStruct()->get_coin_plat());
			if (!cancel)
				packet->setDataByName("display", 1);
			QueuePacket(packet->serialize());
			safe_delete(packet);
		}
	}

}

void Client::BankWithdrawal(int64 amount) {
	bool cheater = false;
	if (GetBanker() && amount > 0) {
		string withdrawal = "";
		char withdrawal_data[512] = { 0 };
		int32 tmp = 0;
		if (amount >= 1000000) {
			tmp = amount / 1000000;
			int32 bank_coins_plat = GetPlayer()->GetBankCoinsPlat();
			if (tmp > bank_coins_plat)
				cheater = true;
			else {
				GetPlayer()->GetInfoStruct()->set_bank_coin_plat(bank_coins_plat - tmp);
				GetPlayer()->GetInfoStruct()->add_coin_plat(tmp);
				amount -= (int64)tmp * 1000000;
				sprintf(withdrawal_data, "%u Platinum ", tmp);
				withdrawal.append(withdrawal_data);
				memset(withdrawal_data, 0, sizeof(withdrawal_data));
			}
		}
		if (!cheater && amount >= 10000) {
			tmp = amount / 10000;
			if (tmp > GetPlayer()->GetBankCoinsGold())
				cheater = true;
			else {
				int32 bank_coins_gold = GetPlayer()->GetInfoStruct()->get_bank_coin_gold();
				bank_coins_gold -= tmp;
				if ((GetPlayer()->GetInfoStruct()->get_coin_gold() + tmp) > 100) {
					GetPlayer()->GetInfoStruct()->set_coin_gold((GetPlayer()->GetInfoStruct()->get_coin_gold() + tmp) - 100);
					GetPlayer()->GetInfoStruct()->add_coin_plat(1);
				}
				else
					GetPlayer()->GetInfoStruct()->add_coin_gold(tmp);
				amount -= tmp * 10000;
				sprintf(withdrawal_data, "%u Gold ", tmp);
				withdrawal.append(withdrawal_data);
				memset(withdrawal_data, 0, sizeof(withdrawal_data));
			}
		}
		if (!cheater && amount >= 100) {
			tmp = amount / 100;
				int32 bank_coins_silver = GetPlayer()->GetBankCoinsSilver();
			if (tmp > bank_coins_silver)
				cheater = true;
			else {
				GetPlayer()->GetInfoStruct()->set_bank_coin_silver(bank_coins_silver - tmp);
				if ((GetPlayer()->GetInfoStruct()->get_coin_silver() + tmp) > 100) {
					GetPlayer()->GetInfoStruct()->set_coin_silver((GetPlayer()->GetInfoStruct()->get_coin_silver() + tmp) - 100);
					GetPlayer()->GetInfoStruct()->add_coin_gold(1);
				}
				else
					GetPlayer()->GetInfoStruct()->add_coin_silver(tmp);
				amount -= tmp * 100;
				sprintf(withdrawal_data, "%u Silver ", tmp);
				withdrawal.append(withdrawal_data);
				memset(withdrawal_data, 0, sizeof(withdrawal_data));
			}
		}
		if (!cheater) {
			if (amount > 0) {
				sprintf(withdrawal_data, "%u Copper ", (int32)amount);
				withdrawal.append(withdrawal_data);
				int32 bank_coin_copper = GetPlayer()->GetInfoStruct()->get_bank_coin_copper();

				GetPlayer()->GetInfoStruct()->set_bank_coin_copper(bank_coin_copper - amount);
				if ((GetPlayer()->GetInfoStruct()->get_coin_copper() + amount) > 100) {
					GetPlayer()->GetInfoStruct()->set_coin_copper((GetPlayer()->GetInfoStruct()->get_coin_copper() + amount) - 100);
					GetPlayer()->GetInfoStruct()->add_coin_silver(1);
				}
				else
					GetPlayer()->GetInfoStruct()->add_coin_copper(amount);
			}
			if (withdrawal.length() > 0) {
				withdrawal.append("withdrawn ");
				sprintf(withdrawal_data, "(%u Plat %u Gold %u Silver %u Copper in the bank now.)", GetPlayer()->GetInfoStruct()->get_bank_coin_plat(),
					GetPlayer()->GetInfoStruct()->get_bank_coin_gold(), GetPlayer()->GetInfoStruct()->get_bank_coin_silver(), GetPlayer()->GetInfoStruct()->get_bank_coin_copper());
				withdrawal.append(withdrawal_data);
				SimpleMessage(CHANNEL_NARRATIVE, withdrawal.c_str());
			}
		}
		else
			Message(CHANNEL_COLOR_RED, "Stop trying to cheat!");
		player->SetCharSheetChanged(true);
		Bank(banker);
	}

}

void Client::BankDeposit(int64 amount) {
	bool cheater = false;
	if (GetBanker() && amount > 0) {
		int32 tmp = 0;
		char deposit_data[512] = { 0 };
		string deposit = "";
		if (amount >= 1000000) {
			tmp = amount / 1000000;
			if (tmp > GetPlayer()->GetCoinsPlat())
				cheater = true;
			else {
				GetPlayer()->GetInfoStruct()->add_bank_coin_plat(tmp);
				GetPlayer()->GetInfoStruct()->set_coin_plat(GetPlayer()->GetInfoStruct()->get_coin_plat() - tmp);
				amount -= (int64)tmp * 1000000;
				sprintf(deposit_data, "%u Platinum ", tmp);
				deposit.append(deposit_data);
				memset(deposit_data, 0, sizeof(deposit_data));
			}
		}
		if (!cheater && amount >= 10000) {
			tmp = amount / 10000;
			if (tmp > GetPlayer()->GetCoinsGold())
				cheater = true;
			else {
				if ((GetPlayer()->GetInfoStruct()->get_bank_coin_gold() + tmp) > 100) {
					GetPlayer()->GetInfoStruct()->set_bank_coin_gold((GetPlayer()->GetInfoStruct()->get_bank_coin_gold() + tmp) - 100);
					GetPlayer()->GetInfoStruct()->add_bank_coin_plat(1);
				}
				else
					GetPlayer()->GetInfoStruct()->add_bank_coin_gold(tmp);
				GetPlayer()->GetInfoStruct()->set_coin_gold(GetPlayer()->GetInfoStruct()->get_coin_gold() - tmp);
				amount -= tmp * 10000;
				sprintf(deposit_data, "%u Gold ", tmp);
				deposit.append(deposit_data);
				memset(deposit_data, 0, sizeof(deposit_data));
			}
		}
		if (!cheater && amount >= 100) {
			tmp = amount / 100;
			if (tmp > GetPlayer()->GetCoinsSilver())
				cheater = true;
			else {
				if ((GetPlayer()->GetInfoStruct()->get_bank_coin_silver() + tmp) > 100) {
					GetPlayer()->GetInfoStruct()->set_bank_coin_silver((GetPlayer()->GetInfoStruct()->get_bank_coin_silver() + tmp) - 100);
					GetPlayer()->GetInfoStruct()->add_bank_coin_gold(1);
				}
				else
					GetPlayer()->GetInfoStruct()->add_bank_coin_silver(tmp);
				GetPlayer()->GetInfoStruct()->set_coin_silver(GetPlayer()->GetInfoStruct()->get_coin_silver() - tmp);
				amount -= tmp * 100;
				sprintf(deposit_data, "%u Silver ", tmp);
				deposit.append(deposit_data);
				memset(deposit_data, 0, sizeof(deposit_data));
			}
		}
		if (!cheater) {
			if (amount > 0) {
				sprintf(deposit_data, "%u Copper ", (int32)amount);
				deposit.append(deposit_data);
				if ((GetPlayer()->GetInfoStruct()->get_bank_coin_copper() + amount) > 100) {
					GetPlayer()->GetInfoStruct()->set_bank_coin_copper((GetPlayer()->GetInfoStruct()->get_bank_coin_copper() + amount) - 100);
					GetPlayer()->GetInfoStruct()->add_bank_coin_silver(1);
				}
				else
					GetPlayer()->GetInfoStruct()->add_bank_coin_copper(amount);
				GetPlayer()->GetInfoStruct()->set_coin_copper(GetPlayer()->GetInfoStruct()->get_coin_copper() - amount);
			}
			if (deposit.length() > 0) {
				deposit.append("deposited ");
				sprintf(deposit_data, "(%u Plat %u Gold %u Silver %u Copper in the bank now.)", GetPlayer()->GetInfoStruct()->get_bank_coin_plat(),
					GetPlayer()->GetInfoStruct()->get_bank_coin_gold(), GetPlayer()->GetInfoStruct()->get_bank_coin_silver(), GetPlayer()->GetInfoStruct()->get_bank_coin_copper());
				deposit.append(deposit_data);
				SimpleMessage(CHANNEL_NARRATIVE, deposit.c_str());
			}
		}
		else
			Message(CHANNEL_COLOR_RED, "Stop trying to cheat!");
		player->SetCharSheetChanged(true);
		Bank(banker);
	}

}

void Client::AddPendingQuestAcceptReward(Quest* quest)
{
	MPendingQuestAccept.lock();
	pending_quest_accept.push_back(quest);
	MPendingQuestAccept.unlock();
}

void Client::AddPendingQuestReward(Quest* quest, bool update) {
	MQuestPendingUpdates.writelock(__FUNCTION__, __LINE__);
	quest_pending_reward.push_back(quest);
	quest_updates = update;
	MQuestPendingUpdates.releasewritelock(__FUNCTION__, __LINE__);

}

void Client::AddPendingQuestUpdate(int32 quest_id, int32 step_id, int32 progress) {
	MQuestPendingUpdates.writelock(__FUNCTION__, __LINE__);
	quest_pending_updates[quest_id][step_id] = progress;
	quest_updates = true;
	MQuestPendingUpdates.releasewritelock(__FUNCTION__, __LINE__);

}

void Client::ProcessQuestUpdates() {
	if (quest_pending_updates.size() > 0) {
		map<int32, map<int32, int32> > tmp_quest_updates;
		MQuestPendingUpdates.writelock(__FUNCTION__, __LINE__);
		tmp_quest_updates.insert(quest_pending_updates.begin(), quest_pending_updates.end());
		quest_pending_updates.clear();
		MQuestPendingUpdates.releasewritelock(__FUNCTION__, __LINE__);
		map<int32, map<int32, int32> >::iterator quest_itr;
		map<int32, int32>::iterator step_itr;
		for (quest_itr = tmp_quest_updates.begin(); quest_itr != tmp_quest_updates.end(); quest_itr++) {
			for (step_itr = quest_itr->second.begin(); step_itr != quest_itr->second.end(); step_itr++) {
				if (step_itr->second == 0xFFFFFFFF) {
					SetStepComplete(quest_itr->first, step_itr->first);
					player->SendQuestRequiredSpawns(quest_itr->first);
				}
				else
					AddStepProgress(quest_itr->first, step_itr->first, step_itr->second);
			}
		}
	}
	if (quest_pending_reward.size() > 0) {
		vector<Quest*>::iterator itr;
		vector<Quest*> tmp_quest_rewards;
		MQuestPendingUpdates.writelock(__FUNCTION__, __LINE__);
		tmp_quest_rewards.insert(tmp_quest_rewards.begin(), quest_pending_reward.begin(), quest_pending_reward.end());
		quest_pending_reward.clear();
		MQuestPendingUpdates.releasewritelock(__FUNCTION__, __LINE__);
		for (itr = tmp_quest_rewards.begin(); itr != tmp_quest_rewards.end(); itr++) {
			GiveQuestReward(*itr);
		}
	}
	quest_updates = false;

}

void Client::CheckQuestQueue() {
	MQuestQueue.writelock();
	last_update_time = 0;
	vector<QueuedQuest*>::iterator itr;
	QueuedQuest* queued_quest = 0;
	for (itr = quest_queue.begin(); itr != quest_queue.end(); itr++) {
		queued_quest = *itr;
		SendQuestUpdateStepImmediately(queued_quest->quest, queued_quest->step, queued_quest->display_quest_helper);
		if(queued_quest->quest && queued_quest->quest->GetTurnedIn()) //update the journal so the old quest isn't the one displayed in the client's quest helper
			SendQuestJournal();
		safe_delete(queued_quest);
	}
	quest_queue.clear();
	MQuestQueue.releasewritelock();

}

void Client::SetStepComplete(int32 quest_id, int32 step) {
	Quest* quest = player->SetStepComplete(quest_id, step);
	if (quest) {
		SendQuestUpdate(quest);
		GetCurrentZone()->SendQuestUpdates(this);
	}

}

void Client::AddStepProgress(int32 quest_id, int32 step, int32 progress) {
	Quest* quest = player->AddStepProgress(quest_id, step, progress);
	if (quest) {
		SendQuestUpdate(quest);
		GetCurrentZone()->SendQuestUpdates(this);
	}
}

void Client::CheckPlayerQuestsKillUpdate(Spawn* spawn) {
	bool hadUpdates = false;
	vector<Quest*>* quest_updates = player->CheckQuestsKillUpdate(spawn);
	if (quest_updates) {
		for (int32 i = 0; i < quest_updates->size(); i++)
		{
			SendQuestUpdate(quest_updates->at(i));
			hadUpdates = true;
		}
	}
	safe_delete(quest_updates);
	vector<Quest*>* quest_failures = player->CheckQuestsFailures();
	if (quest_failures) {
		for (int32 i = 0; i < quest_failures->size(); i++)
		{
			SendQuestFailure(quest_failures->at(i));
			hadUpdates = true;
		}
	}
	safe_delete(quest_failures);

	if (hadUpdates)
		GetCurrentZone()->SendAllSpawnsForVisChange(this);
}

void Client::CheckPlayerQuestsChatUpdate(Spawn* spawn) {
	vector<Quest*>* quest_updates = player->CheckQuestsChatUpdate(spawn);
	if (quest_updates) {
		for (int32 i = 0; i < quest_updates->size(); i++)
			SendQuestUpdate(quest_updates->at(i));
		GetCurrentZone()->SendQuestUpdates(this);
	}
	safe_delete(quest_updates);
}

void Client::CheckPlayerQuestsItemUpdate(Item* item) {
	vector<Quest*>* quest_updates = player->CheckQuestsItemUpdate(item);
	if (quest_updates) {
		for (int32 i = 0; i < quest_updates->size(); i++)
			SendQuestUpdate(quest_updates->at(i));
	}
	safe_delete(quest_updates);
	vector<Quest*>* quest_failures = player->CheckQuestsFailures();
	if (quest_failures) {
		for (int32 i = 0; i < quest_failures->size(); i++)
			SendQuestFailure(quest_failures->at(i));
	}
	safe_delete(quest_failures);
}

void Client::CheckPlayerQuestsLocationUpdate() {
	vector<Quest*>* quest_updates = player->CheckQuestsLocationUpdate();
	if (quest_updates) {
		for (int32 i = 0; i < quest_updates->size(); i++)
			SendQuestUpdate(quest_updates->at(i));
	}
	safe_delete(quest_updates);
}

void Client::CheckPlayerQuestsSpellUpdate(Spell* spell) {
	vector<Quest*>* quest_updates = player->CheckQuestsSpellUpdate(spell);
	if (quest_updates) {
		for (int32 i = 0; i < quest_updates->size(); i++)
			SendQuestUpdate(quest_updates->at(i));
	}
	safe_delete(quest_updates);
	vector<Quest*>* quest_failures = player->CheckQuestsFailures();
	if (quest_failures) {
		for (int32 i = 0; i < quest_failures->size(); i++)
			SendQuestFailure(quest_failures->at(i));
	}
	safe_delete(quest_failures);
}

void Client::AddPendingQuest(Quest* quest, bool forced) {
	if (version <= 283 || forced) { //this client doesn't ask if you want the quest, so auto accept
		player->pending_quests[quest->GetQuestID()] = quest;
		AcceptQuest(quest->GetQuestID());
	}
	else {
		player->pending_quests[quest->GetQuestID()] = quest;
		EQ2Packet* outapp = quest->OfferQuest(GetVersion(), player);
		//DumpPacket(outapp);
		QueuePacket(outapp);
	}
}

Quest* Client::GetActiveQuest(int32 quest_id) {
	Quest* quest = 0;
	GetPlayer()->MPlayerQuests.readlock(__FUNCTION__, __LINE__);
	if (player->player_quests.count(quest_id) > 0) {
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Found %u active quests for char_id: %u", player->player_quests.count(quest_id), player->GetCharacterID());
		quest = player->player_quests[quest_id];
	}
	GetPlayer()->MPlayerQuests.releasereadlock(__FUNCTION__, __LINE__);
	
	return quest;
}

void Client::AcceptQuest(int32 id) {
	Quest* quest = GetPendingQuest(id);
	if (quest) {
		RemovePendingQuest(quest);
		AddPlayerQuest(quest);
		GetCurrentZone()->SendQuestUpdates(this);

		// If character has already completed this quest once update the given date in the database
		if (GetPlayer()->GetCompletedPlayerQuests()->count(id) > 0) {
			Quest* quest2 = GetPlayer()->GetCompletedQuest(id);
			if (quest2)
				quest->SetCompleteCount(quest2->GetCompleteCount());
			database.SaveCharRepeatableQuest(this, id, quest->GetCompleteCount());
		}
	}
}

Quest* Client::GetPendingQuest(int32 id) {
	if (player->pending_quests.count(id) > 0) {
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Found %u pending quests for char_id: %u", player->pending_quests.count(id), player->GetCharacterID());

		return player->pending_quests[id];
	}

	return 0;
}

void Client::RemovePendingQuest(Quest* quest) {
	player->pending_quests.erase(quest->GetQuestID());

}

void Client::SetPlayerQuest(Quest* quest, map<int32, int32>* progress) {
	if (!quest || !progress) {
		return;
	}
	map<int32, int32>::iterator itr;
	QuestStep* step = 0;
	player->SetZone(GetCurrentZone(), GetVersion());
	for (itr = progress->begin(); itr != progress->end(); itr++) {
		step = quest->GetQuestStep(itr->first);
		if (step && itr->second > 0) {
			step->SetStepProgress(itr->second);
			if (lua_interface && step->GetQuestCurrentQuantity() >= step->GetQuestNeededQuantity())
				lua_interface->CallQuestFunction(quest, "Reload", player, step->GetStepID());
		}
	}
	if (lua_interface && step)
		lua_interface->CallQuestFunction(quest, "CurrentStep", player, step->GetStepID());
	else if(!step) {
		LogWrite(QUEST__ERROR, 0, "Client", "Missing step for quest %s (ID %u), cannot CallQuestFunction for CurrentStep", quest->GetName(), quest->GetQuestID());
	}
}

void Client::AddPlayerQuest(Quest* quest, bool call_accepted, bool send_packets) {
	bool lockCleared = false;
	GetPlayer()->MPlayerQuests.writelock(__FUNCTION__, __LINE__);
	if (player->player_quests.count(quest->GetQuestID()) > 0) {
		if (player->player_quests[quest->GetQuestID()]->GetQuestFlags() > 0)
			quest->SetQuestFlags(player->player_quests[quest->GetQuestID()]->GetQuestFlags());
		int32 questID = quest->GetQuestID();
		lockCleared = true;
		GetPlayer()->MPlayerQuests.releasewritelock(__FUNCTION__, __LINE__);
		RemovePlayerQuest(questID, false, false);
	}
	player->player_quests[quest->GetQuestID()] = quest;
	
	if(!lockCleared)
		GetPlayer()->MPlayerQuests.releasewritelock(__FUNCTION__, __LINE__);
	
	quest->SetPlayer(player);
	current_quest_id = quest->GetQuestID();
	if (send_packets && quest->GetQuestGiver() > 0)
		GetCurrentZone()->SendSpawnChangesByDBID(quest->GetQuestGiver(), this, false, true);
	if (lua_interface && call_accepted)
		lua_interface->CallQuestFunction(quest, "Accepted", player);
	if (send_packets) {
		LogWrite(CCLIENT__DEBUG, 0, "Client", "Send Quest Journal...");
		//SendQuestJournal();
		SendQuestJournalUpdate(quest);

		// sent twice to match live
		quest->SetTracked(false);
		QueuePacket(quest->QuestJournalReply(GetVersion(), GetNameCRC(), player));
		quest->SetTracked(true);
		QueuePacket(quest->QuestJournalReply(GetVersion(), GetNameCRC(), player));

		GetCurrentZone()->SendAllSpawnsForVisChange(this);
	}
	//This isn't during a load screen, so update spawns with required quests
	if (call_accepted)
		player->SendQuestRequiredSpawns(quest->GetQuestID());

}

void Client::RemovePlayerQuest(int32 id, bool send_update, bool delete_quest) {
	if (current_quest_id == id)
		current_quest_id = 0;
	GetPlayer()->MPlayerQuests.writelock(__FUNCTION__, __LINE__);
	if (player->player_quests.count(id) > 0) {
		if (delete_quest) {
			player->player_quests[id]->SetDeleted(true);
			database.DeleteCharacterQuest(id, GetCharacterID(), player->GetCompletedPlayerQuests()->count(id) > 0);
		}
		int32 quest_giver = player->player_quests[id]->GetQuestGiver();
		GetPlayer()->MPlayerQuests.releasewritelock(__FUNCTION__, __LINE__);

		if (send_update && quest_giver > 0)
			GetCurrentZone()->SendSpawnChangesByDBID(quest_giver, this, false, true);
		if (send_update) {
			LogWrite(CCLIENT__DEBUG, 0, "Client", "Send Quest Journal...");
			SendQuestJournal(false, 0, true);
		}
		player->RemoveQuest(id, delete_quest);
		if (send_update) {
			LogWrite(CCLIENT__DEBUG, 0, "Client", "Send Quest Journal...");
			SendQuestJournal(false, 0, true);
			GetCurrentZone()->SendAllSpawnsForVisChange(this);
		}
	}
	else {
		// if we don't have any quests to count then release the write lock
		GetPlayer()->MPlayerQuests.releasewritelock(__FUNCTION__, __LINE__);
	}

}

void Client::SendQuestUpdateStepImmediately(Quest* quest, int32 step, bool display_quest_helper) {
	if (quest) {
		QuestStep* quest_step = quest->GetQuestStep(step);
		if (quest_step) {
			QueuePacket(quest->QuestJournalReply(GetVersion(), GetNameCRC(), player, quest_step, 1, false, false, display_quest_helper));
			quest_step->WasUpdated(false);
		}
	}

}

void Client::SendQuestUpdateStep(Quest* quest, int32 step, bool display_quest_helper) {
	QueuedQuest* item = new QueuedQuest;
	item->quest = quest;
	item->step = step;
	item->display_quest_helper = display_quest_helper;
	MQuestQueue.writelock();
	quest_queue.push_back(item);
	last_update_time = Timer::GetCurrentTime2();
	MQuestQueue.releasewritelock();

}

void Client::SendQuestFailure(Quest* quest) {
	vector<QuestStep*>* failures = quest->GetQuestFailures();
	if (failures) {
		QuestStep* step = 0;
		for (int32 i = 0; i < failures->size(); i++) {
			step = failures->at(i);
			QueuePacket(quest->QuestJournalReply(GetVersion(), GetNameCRC(), player, step, 1, false, true));
			LogWrite(CCLIENT__DEBUG, 0, "Client", "Send Quest Journal...");
			SendQuestJournal(false, 0, true);
		}
		failures->clear();
	}

}

void Client::SendQuestUpdate(Quest* quest) {
	vector<QuestStep*>* updates = quest->GetQuestUpdates();
	if (updates) {
		QuestStep* step = 0;
		bool updated = false;
		for (int32 i = 0; i < updates->size(); i++) {
			step = updates->at(i);
			if (lua_interface && step->Complete() && quest->GetCompleteAction(step->GetStepID()))
			{
				lua_interface->CallQuestFunction(quest, quest->GetCompleteAction(step->GetStepID()), player);
				SendQuestUpdateStep(quest, step->GetStepID());
				updated = true;
			}
			if (step->WasUpdated()) {
				// reversing the order of SendQuestJournal and QueuePacket QuestJournalReply causes AoM client to crash!
				SendQuestJournal(false, 0, true);
				if(!updated)
					QueuePacket(quest->QuestJournalReply(GetVersion(), GetNameCRC(), player, step));
				updated = true;
			}
			LogWrite(CCLIENT__DEBUG, 0, "Client", "Send Quest Journal...");

		}
		if (lua_interface && quest->GetCompleted() && quest->GetCompleteAction()) {
			lua_interface->CallQuestFunction(quest, quest->GetCompleteAction(), player);
			SendQuestJournalUpdate(quest, true);
		}
		if (quest->GetCompleted()) {
			if (quest->GetQuestReturnNPC() > 0)
				GetCurrentZone()->SendSpawnChangesByDBID(quest->GetQuestReturnNPC(), this, false, true);
			if (quest->GetCompletedFlag())
				quest->SetCompletedFlag(false);
		}

		updates->clear();
	}

}

void Client::SendQuestJournal(bool all_quests, Client* client, bool updated) {
	if (!client)
		client = this;
	PacketStruct* packet = player->GetQuestJournalPacket(all_quests, GetVersion(), GetNameCRC(), current_quest_id, updated);
	if (packet) {
		EQ2Packet* outapp = packet->serialize();
		//DumpPacket(outapp);
		client->QueuePacket(outapp);
		safe_delete(packet);
	}
}

void Client::SendQuestJournalUpdate(Quest* quest, bool updated) {
	PacketStruct* packet = player->GetQuestJournalPacket(quest, GetVersion(), GetNameCRC(), updated);
	if (packet) {
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}
}

void Client::ReloadQuests() {
	vector<int32> ids = player->GetQuestIDs();
	Quest* quest = 0;
	for (int32 i = 0; i < ids.size(); i++) {
		quest = master_quest_list.GetQuest(ids[i]);
		if (quest)
			AddPlayerQuest(quest, false);
		else
			RemovePlayerQuest(ids[i]);
	}

}

Quest* Client::GetPendingQuestAcceptance(int32 item_id) {
	bool found_quest = false;
	vector<Quest*>::iterator itr;
	vector<Item*>* items = 0;
	Quest* quest = 0;
	MPendingQuestAccept.lock();
	for (itr = pending_quest_accept.begin(); itr != pending_quest_accept.end(); itr++) {
		quest = *itr;

		if(quest->GetQuestTemporaryState())
			items = quest->GetTmpRewardItems();
		else
			items = quest->GetRewardItems();
		if (item_id == 0 && items && items->size() > 0) {
			found_quest = true;
		}
		else {
			items = quest->GetSelectableRewardItems();
			if (items && items->size() > 0) {
				for (int32 i = 0; i < items->size(); i++) {
					if (items->at(i)->details.item_id == item_id) {
						found_quest = true;
						break;
					}
				}
			}
		}
		if (found_quest) {
			pending_quest_accept.erase(itr);
			break;
		}
	}
	MPendingQuestAccept.unlock();

	if (found_quest)
		return quest;
	return 0;
}

void Client::AcceptQuestReward(Quest* quest, int32 item_id) {
	int8 num_slots_needed = 0;
	int16 free_slots = player->item_list.GetNumberOfFreeSlots();
	Item* master_item = 0;
	if (item_id > 0) {
		num_slots_needed++;
		master_item = master_item_list.GetItem(item_id);
	}

	int32 totalItems = 0;

	vector<Item*>* items = 0;
	vector<Item*>* tmpItems = 0;
	
	bool isTempState = quest->GetQuestTemporaryState();
	
	if(isTempState)
	{
		tmpItems = quest->GetTmpRewardItems();
		if (tmpItems && tmpItems->size() > 0)
		{
			num_slots_needed += tmpItems->size();
			totalItems += tmpItems->size();
		}
	}
	else
	{
		items = quest->GetRewardItems();
		if (items && items->size() > 0)
		{
			num_slots_needed += items->size();
			totalItems += items->size();
		}
	}

	if (free_slots >= num_slots_needed || (player->item_list.HasFreeBagSlot() && master_item && master_item->IsBag() && master_item->bag_info->num_slots >= totalItems)) {
		if (master_item)
			AddItem(item_id);
		if (tmpItems && tmpItems->size() > 0) {
			for (int32 i = 0; i < tmpItems->size(); i++)
				AddItem(new Item(tmpItems->at(i)));
		}
		if (items && items->size() > 0) {
			for (int32 i = 0; i < items->size(); i++)
				AddItem(new Item(items->at(i)));
		}
		EQ2Packet* outapp = player->SendInventoryUpdate(GetVersion());
		if (outapp)
			QueuePacket(outapp);
		map<int32, sint32>* reward_factions = quest->GetRewardFactions();
		map<int32, sint32>::iterator itr;
		for (itr = reward_factions->begin(); itr != reward_factions->end(); itr++) {
			int32 faction_id = itr->first;
			sint32 amount = itr->second;
			if (amount > 0)
				player->GetFactions()->IncreaseFaction(faction_id, amount);
			else
				player->GetFactions()->DecreaseFaction(faction_id, (amount * -1));
		}
		
		if(quest->GetQuestTemporaryState())
		{
			int64 total_coins = quest->GetCoinTmpReward();
			if (total_coins > 0)
				AwardCoins(total_coins, std::string("for completing ").append(quest->GetName()));

			player->GetInfoStruct()->add_status_points(quest->GetStatusTmpReward());
			
			quest->SetQuestTemporaryState(false);
		}
		else
			player->GetInfoStruct()->add_status_points(quest->GetStatusPoints());
		
		player->SetCharSheetChanged(true);
	}
	else {
		MPendingQuestAccept.lock();
		pending_quest_accept.push_back(quest);
		MPendingQuestAccept.unlock();
		SimpleMessage(CHANNEL_COLOR_RED, "You do not have enough free slots!  Free some slots and try again.");
		DisplayQuestComplete(quest, quest->GetQuestTemporaryState(), quest->GetQuestTemporaryDescription());
	}

}

void Client::DisplayQuestRewards(Quest* quest, int64 coin, vector<Item*>* rewards, vector<Item*>* selectable_rewards, map<int32, sint32>* factions, const char* header, int32 status_points, const char* text) {
	if (coin == 0 && (!rewards || rewards->size() == 0) && (!selectable_rewards || selectable_rewards->size() == 0) && (!factions || factions->size() == 0) && status_points == 0 && text == 0 && (!quest || (quest->GetCoinsReward() == 0 && quest->GetCoinsRewardMax() == 0))) {
		/*if (quest)
			text = quest->GetName();
		else*/
		return;//nothing to give
	}
	PacketStruct* packet2 = configReader.getStruct("WS_QuestRewardPackMsg", GetVersion());
	if (packet2) {
		int32 source_id = 0;
		if (quest)
			source_id = quest->GetQuestID();
		int64 rewarded_coin = 0;
		if (quest) {
			if (quest->GetCoinsReward() > 0) {
				if (quest->GetCoinsRewardMax() > 0)
					rewarded_coin = MakeRandomInt(quest->GetCoinsReward(), quest->GetCoinsRewardMax());
				else
					rewarded_coin = quest->GetCoinsReward();
			}
			quest->SetGeneratedCoin(rewarded_coin);
		}
		if (rewarded_coin > coin)
			coin = rewarded_coin;
		if (!quest) { //this entire function is either for version <=546 or for quest rewards in middle of quest, so quest should be 0, otherwise quest will handle the rewards
			if (coin > 0) {
				player->AddCoins(coin);
				PlaySound("coin_cha_ching");
			}
		}
		packet2->setSubstructDataByName("reward_data", "unknown1", 255);
		packet2->setSubstructDataByName("reward_data", "reward", header);
		packet2->setSubstructDataByName("reward_data", "max_coin", coin);
		if (player->GetGuild()) {
			if (!quest) { //this entire function is either for version <=546 or for quest rewards in middle of quest, so quest should be 0, otherwise quest will handle the rewards
				player->GetInfoStruct()->add_status_points(status_points);
				player->SetCharSheetChanged(true);
			}
			packet2->setSubstructDataByName("reward_data", "status_points", status_points);
		}
		if(text)
			packet2->setSubstructDataByName("reward_data", "text", text);
		if(rewards){
			packet2->setSubstructArrayLengthByName("reward_data", "num_rewards", rewards->size());
			for (int i = 0; i < rewards->size(); i++) {
				Item* item = rewards->at(i);
				if (item) {
					packet2->setArrayDataByName("reward_id", item->details.item_id, i);
					packet2->setItemArrayDataByName("item", item, player, i, 0, -1);
				}
				if(!quest) //this entire function is either for version <=546 or for quest rewards in middle of quest, so quest should be 0, otherwise quest will handle the rewards
					player->AddPendingItemReward(item); //item reference will be deleted after the player accepts it
			}
		}
		if (selectable_rewards) {
			packet2->setSubstructArrayLengthByName("reward_data", "num_select_rewards", selectable_rewards->size());
			for (int i = 0; i < selectable_rewards->size(); i++) {
				Item* item = selectable_rewards->at(i);
				if (item) {
					packet2->setArrayDataByName("select_reward_id", item->details.item_id, i);
					packet2->setItemArrayDataByName("select_item", item, player, i, 0, -1);
					if (!quest) //this entire function is either for version <=546 or for quest rewards in middle of quest, so quest should be 0, otherwise quest will handle the rewards
						player->AddPendingSelectableItemReward(source_id, item); //item reference will be deleted after the player selects one
				}
			}
		}
		if (factions) {
			map<int32, sint32>::iterator itr;
			map<Faction*, signed int> factions_map;
			for (itr = factions->begin(); itr != factions->end(); itr++) {
				Faction* faction = master_faction_list.GetFaction(itr->first);
				if (faction)
					factions_map[faction] = itr->second;
			}
			packet2->setSubstructArrayLengthByName("reward_data", "num_factions", factions_map.size());
			map<Faction*, signed int>::iterator faction_itr;
			int8 i = 0;
			for (faction_itr = factions_map.begin(); faction_itr != factions_map.end(); faction_itr++) {
				packet2->setArrayDataByName("faction_name", faction_itr->first->name.c_str(), i);
				sint32 amount = faction_itr->second;
				packet2->setArrayDataByName("amount", amount, i);
				if (!quest) { //this entire function is for quest rewards in middle of quest, so quest should be 0, otherwise quest will handle the rewards
					if (amount > 0)
						player->GetFactions()->IncreaseFaction(faction_itr->first->id, amount);
					else
						player->GetFactions()->DecreaseFaction(faction_itr->first->id, (amount * -1));
				}
				i++;
			}
		}
		QueuePacket(packet2->serialize());
		safe_delete(packet2);
	}
}

void Client::DisplayQuestComplete(Quest* quest, bool tempReward, std::string customDescription) {	
	if (!quest)
		return;
	
	quest->SetQuestTemporaryState(tempReward, customDescription);
	
	AddPendingQuestAcceptReward(quest);
	
	if (GetVersion() <= 546) {
		DisplayQuestRewards(quest, 0, quest->GetRewardItems(), quest->GetSelectableRewardItems(), quest->GetRewardFactions(), "Quest Complete!", quest->GetStatusPoints());
		return;
	}
	PacketStruct* packet = configReader.getStruct("WS_QuestComplete", GetVersion());
	if (packet) {
		packet->setDataByName("title", "Quest Reward!");
		packet->setDataByName("name", quest->GetName());
		if(customDescription.size() > 0)
		{
			packet->setDataByName("description", customDescription.c_str());
		}
		else
			packet->setDataByName("description", quest->GetDescription());
		
		packet->setDataByName("level", quest->GetLevel());
		packet->setDataByName("encounter_level", quest->GetEncounterLevel());
		int8 difficulty = 0;
		if ((string)quest->GetType() == "Tradeskill")
			difficulty = player->GetTSArrowColor(quest->GetLevel());
		else
			difficulty = player->GetArrowColor(quest->GetLevel());
		packet->setDataByName("difficulty", difficulty);

		if(tempReward)
		{
			packet->setDataByName("max_coin", quest->GetCoinTmpReward());
			packet->setDataByName("min_coin", quest->GetCoinTmpReward());
			packet->setDataByName("status_points", quest->GetStatusPoints());
		}
		else
		{
			int64 rewarded_coin = 0;
			if (quest->GetCoinsReward() > 0) {
				if (quest->GetCoinsRewardMax() > 0)
					rewarded_coin = MakeRandomInt(quest->GetCoinsReward(), quest->GetCoinsRewardMax());
				else
					rewarded_coin = quest->GetCoinsReward();
			}
			quest->SetGeneratedCoin(rewarded_coin);
			packet->setDataByName("max_coin", rewarded_coin);
			packet->setDataByName("min_coin", rewarded_coin);
			packet->setDataByName("status_points", quest->GetStatusPoints());
		}

		vector<Item*>* items = quest->GetTmpRewardItems();

		if(tempReward)
		{
			if (items) {
				packet->setArrayLengthByName("num_rewards", items->size());
				for (int32 i = 0; i < items->size(); i++) {
					packet->setArrayDataByName("reward_id", items->at(i)->details.item_id, i);
					if (version < 860)
						packet->setItemArrayDataByName("item", items->at(i), player, i, 0, -1);
					else if (version < 1193)
						packet->setItemArrayDataByName("item", items->at(i), player, i);
					else
						packet->setItemArrayDataByName("item", items->at(i), player, i, 0, 2);
				}
			}
		}
		else
		{
			vector<Item*>* items2 = quest->GetSelectableRewardItems();
			vector<Item*>* items = quest->GetRewardItems();
			if (items) {
				packet->setArrayLengthByName("num_rewards", items->size());
				for (int32 i = 0; i < items->size(); i++) {
					packet->setArrayDataByName("reward_id", items->at(i)->details.item_id, i);
					if (version < 860)
						packet->setItemArrayDataByName("item", items->at(i), player, i, 0, -1);
					else if (version < 1193)
						packet->setItemArrayDataByName("item", items->at(i), player, i);
					else
						packet->setItemArrayDataByName("item", items->at(i), player, i, 0, 2);
				}
			}
			if (items2 && items2->size() > 0) {
				packet->setArrayLengthByName("num_select_rewards", items2->size());
				for (int32 i = 0; i < items2->size(); i++) {
					packet->setArrayDataByName("select_reward_id", items2->at(i)->details.item_id, i);
					if (version < 860)
						packet->setItemArrayDataByName("select_item", items2->at(i), player, i, 0, -1);
					else if (version < 1193)
						packet->setItemArrayDataByName("select_item", items2->at(i), player, i);
					else
						packet->setItemArrayDataByName("select_item", items2->at(i), player, i, 0, 2);
				}
			}
			map<int32, sint32>* reward_factions = quest->GetRewardFactions();
			if (reward_factions && reward_factions->size() > 0) {
				packet->setArrayLengthByName("num_factions", reward_factions->size());
				map<int32, sint32>::iterator itr;
				int16 index = 0;
				for (itr = reward_factions->begin(); itr != reward_factions->end(); itr++) {
					int32 faction_id = itr->first;
					sint32 amount = itr->second;
					const char* faction_name = master_faction_list.GetFactionNameByID(faction_id);
					if (faction_name) {
						packet->setArrayDataByName("faction_name", const_cast<char*>(faction_name), index);
						packet->setArrayDataByName("amount", amount, index);
					}
					index++;
				}
			}
		}
		EQ2Packet* outapp = packet->serialize();
		//			DumpPacket(outapp);
		QueuePacket(outapp);
		safe_delete(packet);
	}

}

void Client::DisplayRandomizeFeatures(int32 flags) {
	SimpleMessage(CHANNEL_NARRATIVE, "Showing Active Randomize Features:");
	if (flags > 0) {
		if (flags & RANDOMIZE_GENDER)
			SimpleMessage(CHANNEL_NARRATIVE, "- Gender");
		if (flags & RANDOMIZE_RACE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Race");
		if (flags & RANDOMIZE_MODEL_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Model");
		if (flags & RANDOMIZE_FACIAL_HAIR_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Facial Hair");
		if (flags & RANDOMIZE_HAIR_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Hair");
		if (flags & RANDOMIZE_WING_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Wing");
		if (flags & RANDOMIZE_CHEEK_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Cheek");
		if (flags & RANDOMIZE_CHIN_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Chin");
		if (flags & RANDOMIZE_EAR_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Ear");
		if (flags & RANDOMIZE_EYE_BROW_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Eyebrow");
		if (flags & RANDOMIZE_EYE_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Eye");
		if (flags & RANDOMIZE_LIP_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Lip");
		if (flags & RANDOMIZE_NOSE_TYPE)
			SimpleMessage(CHANNEL_NARRATIVE, "- Nose");
		if (flags & RANDOMIZE_EYE_COLOR)
			SimpleMessage(CHANNEL_NARRATIVE, "- Eye Color");
		if (flags & RANDOMIZE_HAIR_COLOR1)
			SimpleMessage(CHANNEL_NARRATIVE, "- Hair Color1");
		if (flags & RANDOMIZE_HAIR_COLOR2)
			SimpleMessage(CHANNEL_NARRATIVE, "- Hair Color2");
		if (flags & RANDOMIZE_HAIR_HIGHLIGHT)
			SimpleMessage(CHANNEL_NARRATIVE, "- Hair Color Highlights");
		if (flags & RANDOMIZE_HAIR_FACE_COLOR)
			SimpleMessage(CHANNEL_NARRATIVE, "- Facial Hair Color");
		if (flags & RANDOMIZE_HAIR_FACE_HIGHLIGHT_COLOR)
			SimpleMessage(CHANNEL_NARRATIVE, "- Facial Hair Color Highlights");
		if (flags & RANDOMIZE_HAIR_TYPE_COLOR)
			SimpleMessage(CHANNEL_NARRATIVE, "- Hair Type Color");
		if (flags & RANDOMIZE_HAIR_TYPE_HIGHLIGHT_COLOR)
			SimpleMessage(CHANNEL_NARRATIVE, "- Hair Type Highlights");
		if (flags & RANDOMIZE_SKIN_COLOR)
			SimpleMessage(CHANNEL_NARRATIVE, "- Skin Color");
		if (flags & RANDOMIZE_WING_COLOR1)
			SimpleMessage(CHANNEL_NARRATIVE, "- Wing Color1");
		if (flags & RANDOMIZE_WING_COLOR2)
			SimpleMessage(CHANNEL_NARRATIVE, "- Wing Color2");
	}
	else
	{
		SimpleMessage(CHANNEL_NARRATIVE, "- No Randomization Set.");
	}

}

void Client::GiveQuestReward(Quest* quest) {
	current_quest_id = 0;

	if(!quest->GetQuestTemporaryState())
	{
		quest->IncrementCompleteCount();
		player->AddCompletedQuest(quest);
	}
	
	DisplayQuestComplete(quest, quest->GetQuestTemporaryState(), quest->GetQuestTemporaryDescription());
	LogWrite(CCLIENT__DEBUG, 0, "Client", "Send Quest Journal...");
	SendQuestJournal();
	
	if(quest->GetQuestTemporaryState())
		return;
	
	player->RemoveQuest(quest->GetQuestID(), false);
	if (quest->GetExpReward() > 0) {
		int16 level = player->GetLevel();
		int32 xp = quest->GetExpReward();
		if (player->AddXP(xp)) {
			Message(CHANNEL_REWARD, "You gain %u experience!", (int32)xp);
			if (player->GetLevel() != level)
				ChangeLevel(level, player->GetLevel());
			player->SetCharSheetChanged(true);
		}
	}
	if (quest->GetTSExpReward() > 0) {
		int8 ts_level = player->GetTSLevel();
		int32 xp = quest->GetTSExpReward();
		if (player->AddTSXP(xp)) {
			Message(CHANNEL_REWARD, "You gain %u tradeskill experience!", (int32)xp);
			if (player->GetTSLevel() != ts_level)
				ChangeTSLevel(ts_level, player->GetTSLevel());
			player->SetCharSheetChanged(true);
		}
	}
	int64 total_coins = quest->GetGeneratedCoin();
	if (total_coins > 0)
		AwardCoins(total_coins, std::string("for completing ").append(quest->GetName()));
	
	if (quest->GetQuestGiver() > 0)
		GetCurrentZone()->SendSpawnChangesByDBID(quest->GetQuestGiver(), this, false, true);
	
	RemovePlayerQuest(quest->GetQuestID(), true, false);	
}

void Client::DisplayConversation(int32 conversation_id, int32 spawn_id, vector<ConversationOption>* conversations, const char* text, const char* mp3, int32 key1, int32 key2) {
	PacketStruct* packet = configReader.getStruct("WS_DialogOpen", GetVersion());
	if (packet) {
		packet->setDataByName("conversation_id", conversation_id);
		packet->setDataByName("text", text);
		packet->setDataByName("unknown2", 1);
		conversation_map[conversation_id].clear();
		if (conversations) {
			packet->setArrayLengthByName("num_responses", conversations->size());
			for (int32 i = 0; i < conversations->size(); i++) {
				packet->setArrayDataByName("response", conversations->at(i).option.c_str(), i);
				if (conversations->at(i).function.length() > 0)
					conversation_map[conversation_id][i] = conversations->at(i).function;
			}
		}
		packet->setDataByName("spawn_id", spawn_id);
		if (mp3) {
			packet->setDataByName("voice", mp3);
			packet->setDataByName("key1", key1);
			packet->setDataByName("key2", key2);
		}
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

}

void Client::DisplayConversation(Item* item, vector<ConversationOption>* conversations, const char* text, int8 type, const char* mp3, int32 key1, int32 key2) {
	if (!item || !text || !conversations || conversations->size() == 0) {
		return;
	}
	int32 conversation_id = GetConversationID(0, item);
	if (conversation_id == 0) {
		next_conversation_id++;
		conversation_id = next_conversation_id;
	}
	MConversation.writelock();
	conversation_items[conversation_id] = item;
	MConversation.releasewritelock();
	if (type == 4)
		DisplayConversation(conversation_id, player->GetIDWithPlayerSpawn(player), conversations, text, mp3, key1, key2);
	else
		DisplayConversation(conversation_id, 0xFFFFFFFF, conversations, text, mp3, key1, key2);

}

void Client::DisplayConversation(Spawn* src, int8 type, vector<ConversationOption>* conversations, const char* text, const char* mp3, int32 key1, int32 key2) {
	if (!src || !(type == 1 || type == 2 || type == 3) || !text /*|| !conversations || conversations->size() == 0*/) {
		return;
	}
	int32 conversation_id = GetConversationID(src, 0);
	if (conversation_id == 0) {
		next_conversation_id++;
		conversation_id = next_conversation_id;
	}
	MConversation.writelock();
	conversation_spawns[conversation_id] = src;
	MConversation.releasewritelock();

	/* Spawns can start two different types of conversations.
	 * Type 1: The chat type with bubbles.
	 * Type 2: The dialog type with the blue box. */
	if (type == 1)
		DisplayConversation(conversation_id, player->GetIDWithPlayerSpawn(src), conversations, text, mp3, key1, key2);
	else if (type == 2)
		DisplayConversation(conversation_id, 0xFFFFFFFF, conversations, text, mp3, key1, key2);
	else //if (type == 3)
		DisplayConversation(conversation_id, player->GetIDWithPlayerSpawn(player), conversations, text, mp3, key1, key2);

}

void Client::CloseDialog(int32 conversation_id) {
	PacketStruct* packet = configReader.getStruct("WS_ServerDialogClose", GetVersion());
	if (packet) {
		packet->setDataByName("conversation_id", conversation_id);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	MConversation.writelock();
	std::map<int32, Item*>::iterator itr;
	while((itr = conversation_items.find(conversation_id)) != conversation_items.end())
	{
		conversation_items.erase(itr);
	}
	
	std::map<int32, Spawn*>::iterator itr2 = conversation_spawns.find(conversation_id);

	while((itr2 = conversation_spawns.find(conversation_id)) != conversation_spawns.end())
	{
		conversation_spawns.erase(itr2);
	}
	MConversation.releasewritelock();

}

int32 Client::GetConversationID(Spawn* spawn, Item* item) {
	int32 conversation_id = 0;
	MConversation.readlock();
	if (spawn) {
		map<int32, Spawn*>::iterator itr;
		for (itr = conversation_spawns.begin(); itr != conversation_spawns.end(); itr++) {
			if (itr->second == spawn) {
				conversation_id = itr->first;
				break;
			}
		}
	}
	else if (item) {
		map<int32, Item*>::iterator itr;
		for (itr = conversation_items.begin(); itr != conversation_items.end(); itr++) {
			if (itr->second == item) {
				conversation_id = itr->first;
				break;
			}
		}
	}
	MConversation.releasereadlock();

	return conversation_id;
}

Spawn* Client::GetCombineSpawn() {
	return combine_spawn;
}

bool Client::ShouldTarget() {
	return should_target;
}

void Client::TargetSpawn(Spawn* spawn) {
	should_target = false;
	PacketStruct* packet = configReader.getStruct("WS_ServerUpdateTarget", GetVersion());
	if (packet) {
		packet->setDataByName("spawn_id", GetPlayer()->GetIDWithPlayerSpawn(spawn));
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

}

void Client::CombineSpawns(float radius, Spawn* spawn) {
	combine_spawn = spawn;
	spawn->RemoveSpawnFromGroup(true);
	if (!GetCurrentZone()->AddCloseSpawnsToSpawnGroup(combine_spawn, radius))
		SimpleMessage(CHANNEL_COLOR_YELLOW, "One or more spawns are in a spawn group and cannot be combined until they are removed from their group.");
	GetCurrentZone()->RepopSpawns(this, combine_spawn);
	should_target = true;

}

void Client::AddCombineSpawn(Spawn* spawn) {
	if (combine_spawn && combine_spawn != spawn && spawn) {
		combine_spawn->AddSpawnToGroup(spawn);
		spawn->AddSpawnToGroup(combine_spawn);
		GetCurrentZone()->RepopSpawns(this, combine_spawn);
	}
	else if (spawn)
		combine_spawn = spawn;
	should_target = true;

}

void Client::RemoveCombineSpawn(Spawn* spawn) {
	if (combine_spawn && spawn)
		spawn->RemoveSpawnFromGroup();
	if (combine_spawn == spawn)
		combine_spawn->RemoveSpawnFromGroup(true);
	GetCurrentZone()->RepopSpawns(this, combine_spawn);
	if (combine_spawn == spawn)
		combine_spawn = 0;

}

void Client::SaveCombineSpawns(const char* name) {
	if (!combine_spawn) {
		return;
	}
	vector<Spawn*>* spawns = combine_spawn->GetSpawnGroup();
	if (!spawns) {
		return;
	}
	int32 count = spawns->size();
	int32 spawnLocationID = 0;

	if (count == 1)
		SimpleMessage(CHANNEL_COLOR_YELLOW, "Error: You only have a single Spawn in the group!");
	else if ((spawnLocationID = database.SaveCombinedSpawnLocation(GetCurrentZone(), combine_spawn, name)) > 0) {
		Message(CHANNEL_COLOR_YELLOW, "Successfully combined %u spawns into spawn location: %u", count, spawnLocationID);
		// we remove the spawn inside SaveCombinedSpawnLocation
		//GetCurrentZone()->RemoveSpawn(combine_spawn);
	}
	else
		SimpleMessage(CHANNEL_COLOR_YELLOW, "Error saving spawn group, check console for details.");

	safe_delete(spawns);
	combine_spawn = 0;
}

bool Client::AddItem(int32 item_id, int16 quantity) {
	Item* master_item = master_item_list.GetItem(item_id);
	Item* item = 0;
	if (master_item)
		item = new Item(master_item);
	if (item) {
		if (quantity > 0)
			item->details.count = quantity;
		return AddItem(item);
	}
	else
		Message(CHANNEL_COLOR_RED, "Could not find item with id of: %i", item_id);

	return false;
}

bool Client::AddItem(Item* item, bool* item_deleted) {
	if (!item) {
		return false;
	}
	if (item->IsBag()) {
		if (GetVersion() <= 283 && item->details.num_slots > CLASSIC_EQ_MAX_BAG_SLOTS)
			item->details.num_slots = CLASSIC_EQ_MAX_BAG_SLOTS;		
	}
	if (player->AddItem(item)) {
		EQ2Packet* outapp = player->SendInventoryUpdate(GetVersion());
		if (outapp) {
			//DumpPacket(outapp);
			QueuePacket(outapp);
			//resend bag desc with new item name added	
			outapp = player->SendBagUpdate(item->details.unique_id, GetVersion());
			if (outapp) {
				//DumpPacket(outapp);
				QueuePacket(outapp);
			}
			/*EQ2Packet* app = item->serialize(client->GetVersion(), false);
			DumpPacket(app);
			client->QueuePacket(app);
			*/
		}
		CheckPlayerQuestsItemUpdate(item);
		if (item->GetItemScript() && lua_interface)
			lua_interface->RunItemScript(item->GetItemScript(), "obtained", item, player);
	}
	else {
		SimpleMessage(CHANNEL_COLOR_RED, "Could not find free slot to place item.");
		safe_delete(item);

		if(item_deleted)
			*item_deleted = true;

		return false;
	}

	return true;
}

bool Client::AddItemToBank(int32 item_id, int16 quantity) {
	Item* master_item = master_item_list.GetItem(item_id);
	Item* item = 0;
	if (master_item)
		item = new Item(master_item);
	if (item) {
		if (quantity > 0)
			item->details.count = quantity;
		return AddItemToBank(item);
	}
	else
		Message(CHANNEL_COLOR_RED, "Could not find item with id of: %i", item_id);

	return false;
}
bool Client::AddItemToBank(Item* item) {
	if (!item) {
		return false;
	}
	if (player->AddItemToBank(item)) {
		EQ2Packet* outapp = player->SendInventoryUpdate(GetVersion());
		if (outapp) {
			QueuePacket(outapp);
			//resend bag desc with new item name added	
			outapp = player->SendBagUpdate(item->details.inv_slot_id, GetVersion());
			if (outapp)
				QueuePacket(outapp);
			/*EQ2Packet* app = item->serialize(client->GetVersion(), false);
			DumpPacket(app);
			client->QueuePacket(app);
			*/
		}
		CheckPlayerQuestsItemUpdate(item);
		if (item->GetItemScript() && lua_interface)
			lua_interface->RunItemScript(item->GetItemScript(), "obtained", item, player);
	}
	else {
		SimpleMessage(CHANNEL_COLOR_RED, "Could not find free slot to place item.");
		safe_delete(item);
		return false;
	}

	return true;
}
bool Client::RemoveItem(Item* item, int16 quantity, bool force_override_no_delete) {
	EQ2Packet* outapp;
	bool delete_item = false;

	assert(item);

	if (quantity > 0 && !item->IsBag() && item->details.count > quantity) {
		item->details.count -= quantity;
		item->save_needed = true;
	}
	else {
		database.DeleteItem(character_id, item, 0);
		player->GetPlayerItemList()->RemoveItem(item, false);
		delete_item = true;
	}

	if(force_override_no_delete)
		delete_item = false;
	
	if ((outapp = player->SendInventoryUpdate(version))) {
		QueuePacket(outapp);
		if (item->GetItemScript() && lua_interface)
			lua_interface->RunItemScript(item->GetItemScript(), "removed", item, player);
		if (delete_item)
		{
			PurgeItem(item);
			safe_delete(item);
		}
		return true;
	}

	return false;
}

void Client::SetLuaDebugClient(bool val) {
	if (val)
		lua_debug_timer.Start();
	lua_debug = val;
	if (lua_interface && !val) {
		lua_interface->RemoveDebugClients(this);
		lua_debug_timer.Disable();
	}

}

void Client::SetMerchantTransaction(Spawn* spawn) {
	merchant_transaction = spawn;

}

Spawn* Client::GetMerchantTransaction() {
	return merchant_transaction;
}

void Client::SetMailTransaction(Spawn* spawn) {
	ResetSendMail(spawn ? false : true);
	MMailWindowMutex.lock();
	mail_transaction = spawn;
	MMailWindowMutex.unlock();
}

Spawn* Client::GetMailTransaction() {
	return mail_transaction;
}

void Client::PlaySound(const char* name) {
	if (name) {
		PacketStruct* packet = configReader.getStruct("WS_PlaySound", GetVersion());
		if (packet) {
			packet->setMediumStringByName("name", name);
			QueuePacket(packet->serialize());
			safe_delete(packet);
		}
	}

}

float Client::CalculateBuyMultiplier(int32 merchant_id) {
	/*MerchantFactionMultiplier* multiplier = world.GetMerchantMultiplier(merchant_id);
	if(multiplier){
		sint32 faction_val = player->GetFactions()->GetFactionValue(multiplier->faction_id);
		float diff_low = faction_val - multiplier->faction_min;
		if(diff_low < 0)
			diff_low*=-1;
		float total_diff = multiplier->faction_max - multiplier->faction_min;
		if(total_diff < 0)
			total_diff*=-1;
		float buy_multiplier = multiplier->high_buy_multiplier - multiplier->low_buy_multiplier;
		float total1 = (diff_low/total_diff);
		float final_buy_multiplier = total1*buy_multiplier + total1*multiplier->low_buy_multiplier;
		return final_buy_multiplier;
	}*/

	return 1;
}

float Client::CalculateSellMultiplier(int32 merchant_id) {
	/*MerchantFactionMultiplier* multiplier = world.GetMerchantMultiplier(merchant_id);
	if(multiplier){
		sint32 faction_val = player->GetFactions()->GetFactionValue(multiplier->faction_id);
		float diff_low = faction_val - multiplier->faction_min;
		if(diff_low < 0)
			diff_low*=-1;
		float total_diff = multiplier->faction_max - multiplier->faction_min;
		if(total_diff < 0)
			total_diff*=-1;
		float sell_multiplier = multiplier->high_sell_multiplier - multiplier->low_sell_multiplier;
		float total1 = (diff_low/total_diff);
		float final_sell_multiplier = total1*sell_multiplier + total1*multiplier->low_sell_multiplier;
		return final_sell_multiplier;
	}*/

	return 1;
}

void Client::SellItem(int32 item_id, int16 quantity, int32 unique_id) {
	Spawn* spawn = GetMerchantTransaction();
	Guild* guild = GetPlayer()->GetGuild();
	if (spawn && spawn->GetMerchantID() > 0 && (!(spawn->GetMerchantType() & MERCHANT_TYPE_NO_BUY)) && 
		spawn->IsClientInMerchantLevelRange(this)) {
		int32 total_sell_price = 0;
		int32 total_status_sell_price = 0; //for status
		float multiplier = CalculateBuyMultiplier(spawn->GetMerchantID());
		int32 sell_price = 0;
		int32 status_sell_price = 0; //for status
		Item* master_item = master_item_list.GetItem(item_id);
		Item* item = 0;
		if (unique_id == 0)
			item = player->item_list.GetItemFromID(item_id, quantity);
		else
			item = player->item_list.GetItemFromUniqueID(unique_id);

		if (!item)
			item = player->item_list.GetItemFromID(item_id);
		if (item && master_item) {
			if(item->details.item_locked)
			{
				SimpleMessage(CHANNEL_COLOR_RED, "You cannot sell the item in use.");
				return;
			}
			int32 sell_price = (int32)(master_item->sell_price * multiplier);
			if (sell_price > item->sell_price)
				sell_price = item->sell_price;
			if (quantity > item->details.count)
				quantity = item->details.count;
			total_sell_price = sell_price * quantity;

			//------------------------------For Selling Status Items
			status_sell_price = (int32)(master_item->sell_status * multiplier);
			if (status_sell_price > item->sell_status)
				status_sell_price = item->sell_status;
			if (quantity > item->details.count)
				quantity = item->details.count;

			total_status_sell_price = status_sell_price * quantity;

			if(total_status_sell_price > 0 && (!(spawn->GetMerchantType() & MERCHANT_TYPE_CITYMERCHANT)))
				total_status_sell_price = 0;

			player->GetInfoStruct()->add_status_points(total_status_sell_price);

			int32 guildMaxLevel = 5 + item->details.recommended_level; // client hard codes +5 to the level

			if (player->GetGuild() && guild->GetLevel() < guildMaxLevel) {
				guild->UpdateGuildStatus(GetPlayer(), total_status_sell_price / 10);
				guild->SendGuildMemberList();
				guild->AddEXPCurrent((total_status_sell_price / 10), true);
			}
			if (quantity > 1)
			{
				if(total_status_sell_price)
					Message(CHANNEL_MERCHANT_BUY_SELL, "You sell %i %s to %s for %s and %u Status Points.", quantity, master_item->CreateItemLink(GetVersion()).c_str(), spawn->GetName(), GetCoinMessage(total_sell_price).c_str(), status_sell_price);
				else
					Message(CHANNEL_MERCHANT_BUY_SELL, "You sell %i %s to %s for %s.", quantity, master_item->CreateItemLink(GetVersion()).c_str(), spawn->GetName(), GetCoinMessage(total_sell_price).c_str());
			}
			else
			{
				if(total_status_sell_price)
					Message(CHANNEL_MERCHANT_BUY_SELL, "You sell %s to %s for %s and %u Status Points.", master_item->CreateItemLink(GetVersion()).c_str(), spawn->GetName(), GetCoinMessage(total_sell_price).c_str(), status_sell_price);
				else
					Message(CHANNEL_MERCHANT_BUY_SELL, "You sell %s to %s for %s.", master_item->CreateItemLink(GetVersion()).c_str(), spawn->GetName(), GetCoinMessage(total_sell_price).c_str());
			}
			player->AddCoins(total_sell_price);

			if(!item->no_buy_back && (total_status_sell_price == 0 || (total_status_sell_price > 0 && (!(spawn->GetMerchantType() & MERCHANT_TYPE_CITYMERCHANT)))))
				AddBuyBack(unique_id, item_id, quantity, sell_price);

			if (quantity >= item->details.count) {
				database.DeleteItem(GetCharacterID(), item, 0);
				player->item_list.DestroyItem(item->details.index);
			}
			else {
				item->details.count -= quantity;
				item->save_needed = true;
			}
			EQ2Packet* outapp = player->SendInventoryUpdate(GetVersion());
			if (outapp)
				QueuePacket(outapp);
			
			if (!(spawn->GetMerchantType() & MERCHANT_TYPE_NO_BUY_BACK))
				SendBuyBackList();
		}
	}

}

void Client::BuyBack(int32 item_id, int16 quantity) {
	Spawn* spawn = GetMerchantTransaction();
	if (spawn && spawn->GetMerchantID() > 0 && (!(spawn->GetMerchantType() & MERCHANT_TYPE_NO_BUY_BACK)) && 
		spawn->IsClientInMerchantLevelRange(this)) {
		deque<BuyBackItem*>::iterator itr;
		BuyBackItem* buyback = 0;
		BuyBackItem* closest = 0;
		MBuyBack.readlock(__FUNCTION__, __LINE__);
		for (itr = buy_back_items.begin(); itr != buy_back_items.end(); itr++) {
			buyback = *itr;
			if (buyback->unique_id == item_id) {
				closest = buyback;
				quantity = buyback->quantity;
				break;
			}
		}
		MBuyBack.releasereadlock(__FUNCTION__, __LINE__);
		if (closest) {
			Item* item = 0;
			Item* master_item = master_item_list.GetItem(closest->item_id);
			if (master_item) {
				item = new Item(master_item);
				if (closest->quantity >= quantity)
					item->details.count = quantity;
				else
					item->details.count = closest->quantity;
			}
			bool itemDeleted = false;
			bool itemAdded = false;
			sint64 dispFlags = 0;
			if (item && item->GetItemScript() && lua_interface && lua_interface->RunItemScript(item->GetItemScript(), "buyback_display_flags", item, player, &dispFlags) && (dispFlags & DISPLAY_FLAG_NO_BUY))
				SimpleMessage(CHANNEL_NARRATIVE, "You do not meet all the requirements to buy this item.");
			else if (!player->item_list.HasFreeSlot() && !player->item_list.CanStack(item))
				SimpleMessage(CHANNEL_COLOR_RED, "You do not have any slots available for this item.");
			else if (player->RemoveCoins(closest->quantity * closest->price)) {
				bool removed = false;
				if (closest->quantity == quantity) {
					MBuyBack.writelock(__FUNCTION__, __LINE__);
					for (itr = buy_back_items.begin(); itr != buy_back_items.end(); itr++) {
						if (*itr == closest) {
							buy_back_items.erase(itr);
							removed = true;
							break;
						}
					}
					MBuyBack.releasewritelock(__FUNCTION__, __LINE__);
				}
				else {
					closest->quantity -= quantity;
					closest->save_needed = true;
				}
				itemAdded = AddItem(item, &itemDeleted);
				
				if (removed) {
					database.DeleteBuyBack(GetCharacterID(), closest->item_id, closest->quantity, closest->price);
					safe_delete(closest);
				}
				
				if (!(spawn->GetMerchantType() & MERCHANT_TYPE_NO_BUY_BACK))
					SendBuyBackList();
			}
			else
				SimpleMessage(CHANNEL_COLOR_RED, "You cannot afford this item.");

			if(!itemAdded && !itemDeleted)
				safe_delete(item);
		}
	}

}

void Client::BuyItem(int32 item_id, int16 quantity) {
	// Get the merchant we are buying from
	Spawn* spawn = GetMerchantTransaction();
	// Make sure the spawn has a merchant list
	if (spawn && spawn->GetMerchantID() > 0 && spawn->IsClientInMerchantLevelRange(this)) {
		int32 total_buy_price = 0;
		float multiplier = CalculateBuyMultiplier(spawn->GetMerchantID());
		int32 sell_price = 0;
		Item* master_item = master_item_list.GetItem(item_id);
		Item* item = 0;
		int16 total_available = 0;

		vector<MerchantItemInfo>* temp;
		vector<MerchantItemInfo>::iterator itr;
		MerchantItemInfo* ItemInfo = 0;
		temp = world.GetMerchantList(spawn->GetMerchantID());

		for (itr = temp->begin(); itr != temp->end(); itr++) {
			if ((*itr).item_id == item_id) {
				ItemInfo = &(*itr);
				break;
			}
		}

		if (master_item && ItemInfo) {
			if (spawn->GetMerchantType() & MERCHANT_TYPE_LOTTO) {
				quantity = 1;
				total_available = 0xFFFF;
				sell_price = master_item->sell_price;
			}
			else {
				total_available = world.GetMerchantItemQuantity(spawn->GetMerchantID(), item_id);
				sell_price = (int32)(master_item->sell_price * multiplier);
				if (quantity > total_available)
					quantity = total_available;
			}
			sint64 dispFlags = 0;
			if (master_item->GetItemScript() && lua_interface && lua_interface->RunItemScript(master_item->GetItemScript(), "buy_display_flags", master_item, player, &dispFlags) && (dispFlags & DISPLAY_FLAG_NO_BUY))
			{
				SimpleMessage(CHANNEL_NARRATIVE, "You do not meet all the requirements to buy this item.");
				return;
			}
			if(quantity < 1)
			{
				SimpleMessage(CHANNEL_COLOR_RED, "Merchant does not have item for purchase (quantity < 1).");
				return;
			}

			total_buy_price = sell_price * quantity;
			item = new Item(master_item);
			item->details.count = quantity;
			if (!player->item_list.HasFreeSlot() && !player->item_list.CanStack(item)) {
				SimpleMessage(CHANNEL_COLOR_RED, "You do not have any slots available for this item.");
				safe_delete(item);
			}
			else {
				// Price not set in the merchant_inventory table, use the old method
				if (ItemInfo->price_item_id == 0 && ItemInfo->price_item2_id == 0 && ItemInfo->price_status == 0 && ItemInfo->price_stationcash == 0 && ItemInfo->price_coins == 0) {
					if (player->RemoveCoins(total_buy_price)) {
						item->SetMaxSellValue(sell_price);
						if (quantity > 1)
							Message(CHANNEL_MERCHANT_BUY_SELL, "You buy %i %s from %s for%s.", quantity, master_item->CreateItemLink(GetVersion()).c_str(), spawn->GetName(), GetCoinMessage(total_buy_price).c_str());
						else
							Message(CHANNEL_MERCHANT_BUY_SELL, "You buy %s from %s for%s.", master_item->CreateItemLink(GetVersion()).c_str(), spawn->GetName(), GetCoinMessage(total_buy_price).c_str());
						bool itemDeleted = false;
						AddItem(item, &itemDeleted);
						if(!itemDeleted) {
							CheckPlayerQuestsItemUpdate(item);
							if (item && total_available < 0xFF) {
								world.DecreaseMerchantQuantity(spawn->GetMerchantID(), item_id, quantity);
								SendBuyMerchantList();
							}
							
							if (spawn->GetMerchantType() & MERCHANT_TYPE_LOTTO)
								PlayLotto(total_buy_price, item->details.item_id);
						}
					}
					else {
						Message(CHANNEL_COLOR_RED, "You do not have enough coin to purchase %s.", master_item->CreateItemLink(GetVersion()).c_str());
						GetCurrentZone()->SendSpellFailedPacket(this, SPELL_ERROR_NOT_ENOUGH_COIN);
						PlaySound("buy_failed");
					}
				}
				else {
					// Price set in merchant_inventory table

					// Check if the player has enough status, coins and staion cash to buy the item before checking the items
					// TODO: need to add support for station cash
					if (player->GetInfoStruct()->get_status_points() >= (ItemInfo->price_status * quantity) && player->HasCoins(ItemInfo->price_coins * quantity)) {
						// Check items
						int16 item_quantity = 0;
						// Default these to true in case price_item_id or price_item2_id was never set
						bool hasItem1 = true;
						bool hasItem2 = true;
						Item* tempItem1 = 0;
						Item* tempItem2 = 0;
						if (ItemInfo->price_item_id != 0) {
							// Same item for whatever reason lets add the quantities together
							if (ItemInfo->price_item_id == ItemInfo->price_item2_id)
								item_quantity = ItemInfo->price_item_qty + ItemInfo->price_item2_qty;
							else
								item_quantity = ItemInfo->price_item_qty;

							tempItem1 = player->item_list.GetItemFromID(ItemInfo->price_item_id);
							if (tempItem1) {
								if (tempItem1->details.count < item_quantity)
									hasItem1 = false;
							}
							else {
								hasItem1 = false;
							}
						}

						// Check item2, if item_quantity is greater then item1 quantity then item2 is the same item
						// as item1 and we already checked for it so we can skip this check
						if (ItemInfo->price_item2_id != 0 && item_quantity <= ItemInfo->price_item_qty) {
							tempItem2 = player->item_list.GetItemFromID(ItemInfo->price_item2_id);
							if (tempItem2) {
								if (tempItem2->details.count < ItemInfo->price_item2_qty)
									hasItem2 = false;
							}
							else {
								hasItem2 = false;
							}
						}
						// if we have every thing then remove the price and give the item
						if (hasItem1 && hasItem2) {
							player->GetInfoStruct()->set_status_points(player->GetInfoStruct()->get_status_points() - (ItemInfo->price_status * quantity));
							// TODO: station cash

							// The update that would normally be sent after modifing the players inventory is automatically sent in AddItem wich is called later
							// so there is no need to send it more then that one time
							if (tempItem1) {
								if (tempItem1->details.count > item_quantity) {
									tempItem1->details.count -= item_quantity;
									tempItem1->save_needed = true;
								}
								else {
									database.DeleteItem(GetCharacterID(), tempItem1, 0);
									player->item_list.DestroyItem(tempItem1->details.index);
								}
							}
							if (tempItem2) {
								if (tempItem2->details.count > ItemInfo->price_item2_qty) {
									tempItem2->details.count -= ItemInfo->price_item2_qty;
									tempItem2->save_needed = true;
								}
								else {
									database.DeleteItem(GetCharacterID(), tempItem2, 0);
									player->item_list.DestroyItem(tempItem2->details.index);
								}
							}


							// Checked to see if we had enough coins already so don't need to check the return type on RemoveCoins as it will always be true
							player->RemoveCoins(ItemInfo->price_coins * quantity);
							item->SetMaxSellValue(sell_price);
							if (quantity > 1)
								Message(CHANNEL_MERCHANT_BUY_SELL, "You buy %i %s from %s for%s.", quantity, master_item->CreateItemLink(GetVersion()).c_str(), spawn->GetName(), GetCoinMessage(ItemInfo->price_coins * quantity).c_str());
							else
								Message(CHANNEL_MERCHANT_BUY_SELL, "You buy %s from %s for%s.", master_item->CreateItemLink(GetVersion()).c_str(), spawn->GetName(), GetCoinMessage(ItemInfo->price_coins * quantity).c_str());
							bool itemDeleted = false;
							AddItem(item, &itemDeleted);
							if(!itemDeleted) {
								CheckPlayerQuestsItemUpdate(item);
								if (item && total_available < 0xFF) {
									world.DecreaseMerchantQuantity(spawn->GetMerchantID(), item_id, quantity);
									SendBuyMerchantList();
								}
								
								SendSellMerchantList();
								if (spawn->GetMerchantType() & MERCHANT_TYPE_LOTTO)
									PlayLotto(total_buy_price, item->details.item_id);
							}

						}
						else {
							Message(CHANNEL_COLOR_RED, "You do not have enough coin to purchase %s.", master_item->CreateItemLink(GetVersion()).c_str());
							GetCurrentZone()->SendSpellFailedPacket(this, SPELL_ERROR_NOT_ENOUGH_COIN);
							PlaySound("buy_failed");
						}
					}
					else {
						Message(CHANNEL_COLOR_RED, "You do not have enough coin to purchase %s.", master_item->CreateItemLink(GetVersion()).c_str());
						GetCurrentZone()->SendSpellFailedPacket(this, SPELL_ERROR_NOT_ENOUGH_COIN);
						PlaySound("buy_failed");
					}
				}
			}
		}
	}

}

void Client::RepairItem(int32 item_id) {
	Spawn* spawn = GetMerchantTransaction();
	if (spawn) {
		Item* item = player->item_list.GetItemFromID(item_id);
		if (!item)
			item = player->GetEquipmentList()->GetItemFromItemID(item_id);
		if (item) {
			int32 repair_cost = item->CalculateRepairCost();
			if (player->RemoveCoins((int32)repair_cost)) {
				item->generic_info.condition = 100;
				item->save_needed = true;
				QueuePacket(player->GetEquipmentList()->serialize(GetVersion(), player));
				QueuePacket(player->SendInventoryUpdate(GetVersion()));
				QueuePacket(item->serialize(version, false, player));
				Message(CHANNEL_MERCHANT, "You give %s %s to repair your %s.", spawn->GetName(), GetCoinMessage(repair_cost).c_str(), item->CreateItemLink(GetVersion()).c_str());
				PlaySound("coin_cha_ching");
				if (spawn->GetMerchantType() & MERCHANT_TYPE_REPAIR)
					SendRepairList();
			}
			else {
				LogWrite(MISC__TODO, 1, "TODO", " Send pop up that says 'Not enough coin.'\n\t(%s, function: %s, line #: %i)", __FILE__, __FUNCTION__, __LINE__);
				Message(CHANNEL_MERCHANT, "You do not have enough coin to repair %s.", item->CreateItemLink(GetVersion()).c_str());
				PlaySound("buy_failed");
			}
		}
	}

}

void Client::RepairAllItems() {
	Spawn* spawn = GetMerchantTransaction();
	if (spawn) {
		vector<Item*>* repairable_items = GetRepairableItems();
		if (repairable_items && repairable_items->size() > 0) {
			vector<Item*>::iterator itr;
			int64 total_cost = 0;
			for (itr = repairable_items->begin(); itr != repairable_items->end(); itr++)
				total_cost += (*itr)->CalculateRepairCost();
			if (player->RemoveCoins((int32)total_cost)) {
				Message(CHANNEL_MERCHANT, "You give %s to repair all of your items.", GetCoinMessage((int32)total_cost).c_str());
				for (itr = repairable_items->begin(); itr != repairable_items->end(); itr++) {
					Item* item = *itr;
					if (item) {
						item->generic_info.condition = 100;
						item->save_needed = true;
						QueuePacket(item->serialize(version, false, player));
						Message(CHANNEL_COLOR_YELLOW, "Repaired: %s.", item->CreateItemLink(GetVersion()).c_str());
					}
				}
				QueuePacket(player->GetEquipmentList()->serialize(GetVersion(), player));
				QueuePacket(player->SendInventoryUpdate(GetVersion()));
				PlaySound("coin_cha_ching");
				if (spawn->GetMerchantType() & MERCHANT_TYPE_REPAIR)
					SendRepairList();
			}
			else {
				LogWrite(MISC__TODO, 1, "TODO", "Send pop up that says 'Not enough coin.'\n\t(%s, function: %s, line #: %i)", __FILE__, __FUNCTION__, __LINE__);
				SimpleMessage(CHANNEL_MERCHANT, "You do not have enough coin to repair all of your items.");
				PlaySound("buy_failed");
			}
		}
		safe_delete(repairable_items);
	}

}

void Client::SendAchievementsList()
{
	/*map<int32, Achievement *> *achievements = player->GetAchievementList()->GetAchievements();
	map<int32, Achievement *>::iterator itr;
	Achievement *achievement;
	vector<AchievementRequirements *> *requirements = 0;
	vector<AchievementRequirements *>::iterator itr2;
	AchievementRequirements *requirement;
	vector<AchievementRewards *> *rewards = 0;
	vector<AchievementRewards *>::iterator itr3;
	AchievementRewards *reward;
	PacketStruct *packet;
	int16 i = 0;
	int16 j = 0;
	int16 k = 0;

	if (!(packet = configReader.getStruct("WS_CharacterAchievements", version))) {
		return;
	}

	packet->setArrayLengthByName("num_achievements" , achievements->size());
	for (itr = achievements->begin(); itr != achievements->end(); itr++) {
		achievement = itr->second;
		packet->setArrayDataByName("achievement_id", achievement->GetID(), i);
		packet->setArrayDataByName("title", achievement->GetTitle(), i);
		packet->setArrayDataByName("uncompleted_text", achievement->GetUncompletedText(), i);
		packet->setArrayDataByName("completed_text", achievement->GetCompletedText(), i);
		packet->setArrayDataByName("category", achievement->GetCategory(), i);
		packet->setArrayDataByName("expansion", achievement->GetExpansion(), i);
		packet->setArrayDataByName("icon", achievement->GetIcon(), i);
		packet->setArrayDataByName("point_value", achievement->GetPointValue(), i);
		packet->setArrayDataByName("qty_req", achievement->GetQtyReq(), i);
		packet->setArrayDataByName("hide_achievement", achievement->GetHide(), i);
		packet->setArrayDataByName("unknown3", achievement->GetUnknown3a(), i);
		packet->setArrayDataByName("unknown3", achievement->GetUnknown3b(), i);
		requirements = achievement->GetRequirements();
		rewards = achievement->GetRewards();
		j = 0;
		k = 0;
		packet->setSubArrayLengthByName("num_items", requirements->size(), i, j);
		for (itr2 = requirements->begin(); itr2 != requirements->end(); itr2++) {
			requirement = *itr2;
			packet->setSubArrayDataByName("item_name", requirement->name.c_str(), i, j);
			packet->setSubArrayDataByName("item_qty_req", requirement->qty_req, i, j);
			j++;
		}
		packet->setSubArrayLengthByName("num_rewards", achievement->GetRewards()->size(), i, k);
		for (itr3 = rewards->begin(); itr3 != rewards->end(); itr3++) {
			reward = *itr3;
			packet->setSubArrayDataByName("reward_item", reward->reward.c_str(), i, k);
			k++;
		}
		i++;
	}

	//packet->PrintPacket();
	EQ2Packet* data = packet->serialize();
	EQ2Packet* app = new EQ2Packet(OP_ClientCmdMsg, data->pBuffer, data->size);
	safe_delete(packet);
	safe_delete(data);
	//DumpPacket(app);
	QueuePacket(app);*/

	QueuePacket(master_achievement_list.GetAchievementPacket()->Copy());
	SendAchievementUpdate(true);
}

void Client::SendAchievementUpdate(bool first_login) {
	map<int32, AchievementUpdate*>* updates = player->GetAchievementUpdateList()->GetAchievementUpdates();
	map<int32, AchievementUpdate*>::iterator itr;
	AchievementUpdate* update;
	vector<AchievementUpdateItems*>* update_items = 0;
	vector<AchievementUpdateItems*>::iterator itr2;
	AchievementUpdateItems* update_item;

	int16 i = 0;
	int16 j = 0;

	PacketStruct* packet;

	if (!(packet = configReader.getStruct("WS_AchievementUpdate", version))) {
		return;
	}

	packet->setDataByName("unknown1", first_login ? 1 : 0);
	packet->setArrayLengthByName("num_achievements", updates->size());
	for (itr = updates->begin(); itr != updates->end(); itr++) {
		update = itr->second;
		packet->setArrayDataByName("achievement_id", update->GetID(), i);
		packet->setArrayDataByName("completed_date", update->GetCompletedDate(), i);
		update_items = update->GetUpdateItems();
		j = 0;
		packet->setSubArrayLengthByName("num_items", update_items->size(), i);
		for (itr2 = update_items->begin(); itr2 != update_items->end(); itr2++) {
			update_item = *itr2;
			packet->setSubArrayDataByName("item_update", update_item->item_update, i, j);
			j++;
		}
		i++;
	}

	//packet->PrintPacket();
	EQ2Packet* data = packet->serialize();
	EQ2Packet* app = new EQ2Packet(OP_ClientCmdMsg, data->pBuffer, data->size);
	safe_delete(packet);
	safe_delete(data);
	//DumpPacket(app);
	QueuePacket(app);
}

void Client::SendBuyMerchantList(bool sell) {
	Spawn* spawn = GetMerchantTransaction();
	if (spawn && spawn->GetMerchantID() > 0 && spawn->IsClientInMerchantLevelRange(this)) {
		vector<MerchantItemInfo>* items = world.GetMerchantItemList(spawn->GetMerchantID(), spawn->GetMerchantType(), player);
		if (items) {
			PacketStruct* packet = configReader.getStruct("WS_UpdateMerchant", GetVersion());
			if (packet) {
				float multiplier = CalculateBuyMultiplier(spawn->GetMerchantID());
				packet->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(spawn));
				packet->setArrayLengthByName("num_items", items->size());
				vector<MerchantItemInfo>::iterator itr;
				sint8 item_difficulty = 0;
				int32 sell_price = 0;
				int i = 0;
				int tmp_level = 0;
				for (itr = items->begin(); itr != items->end(); itr++, i++) {
					MerchantItemInfo ItemInfo = *itr;
					Item* item = master_item_list.GetItem(ItemInfo.item_id);
					if (!item)
						continue;

					packet->setArrayDataByName("item_name", item->name.c_str(), i);
					packet->setArrayDataByName("item_id", item->details.item_id, i);
					packet->setArrayDataByName("stack_size", item->stack_count, i);
					packet->setArrayDataByName("icon", item->details.icon, i);
					if (item->generic_info.adventure_default_level > 0)
						tmp_level = item->generic_info.adventure_default_level;
					else
						tmp_level = item->generic_info.tradeskill_default_level;
					packet->setArrayDataByName("level", tmp_level, i);
					packet->setArrayDataByName("tier", item->details.tier, i);
					packet->setArrayDataByName("item_id2", item->details.item_id, i);
					item_difficulty = player->GetArrowColor(tmp_level);
					if (item_difficulty != ARROW_COLOR_WHITE && item_difficulty != ARROW_COLOR_RED && item_difficulty != ARROW_COLOR_GRAY)
						item_difficulty = ARROW_COLOR_WHITE;

					sint64 overrideValue = 0;
					if (item->GetItemScript() && lua_interface && lua_interface->RunItemScript(item->GetItemScript(), "item_difficulty", item, player, &overrideValue))
						item_difficulty = (sint8)overrideValue;

					item_difficulty -= 6;
					if (item_difficulty < 0)
						item_difficulty *= -1;
					
					packet->setArrayDataByName("item_difficulty", item_difficulty, i);
					packet->setArrayDataByName("quantity", ItemInfo.quantity, i);
					packet->setArrayDataByName("unknown5", 255, i);
					packet->setArrayDataByName("stack_size2", item->stack_count, i);

					sint64 dispFlags = 0;
					if (item->GetItemScript() && lua_interface && lua_interface->RunItemScript(item->GetItemScript(), "buy_display_flags", item, player, &dispFlags))
						packet->setArrayDataByName("display_flags", (int8)dispFlags, i);
					
					std::string overrideValueStr;
					// classic client isn't properly tracking this field, DoF we don't have it identified yet, but no field to cause any issues (can add later if identified)
					if (GetVersion() >= 546 && item->GetItemScript() && lua_interface && lua_interface->RunItemScriptWithReturnString(item->GetItemScript(), "item_description", item, player, &overrideValueStr))
						packet->setArrayDataByName("description", overrideValueStr.c_str(), i);
					
					// If no price set in the merchant_inventory table then use the old method
					if (ItemInfo.price_item_id == 0 && ItemInfo.price_item2_id == 0 && ItemInfo.price_coins == 0 && ItemInfo.price_status == 0 && ItemInfo.price_stationcash == 0) {
						sell_price = (int32)(item->sell_price * multiplier);
						packet->setArrayDataByName("price", sell_price, i);
					}
					else {
						int8 count = 0;
						if (ItemInfo.price_item_id != 0 && ItemInfo.price_item_qty != 0)
							count++;
						if (ItemInfo.price_item2_id != 0 && ItemInfo.price_item2_qty != 0)
							count++;
						if (count != 0) {
							packet->setSubArrayLengthByName("num_tokens", count, i);
							int8 index = 0;
							Item* token = 0;
							if (ItemInfo.price_item_id != 0) {
								token = master_item_list.GetItem(ItemInfo.price_item_id);
								if (item) {
									packet->setSubArrayDataByName("token_icon", token->details.icon, i, index);
									packet->setSubArrayDataByName("token_qty", ItemInfo.price_item_qty, i, index);
									packet->setSubArrayDataByName("token_id", ItemInfo.price_item_id, i, index);
									packet->setSubArrayDataByName("token_name", token->name.c_str(), i, index);
								}
								token = 0;
								index++;
							}
							if (ItemInfo.price_item2_id != 0) {
								token = master_item_list.GetItem(ItemInfo.price_item2_id);
								if (item) {
									packet->setSubArrayDataByName("token_icon", token->details.icon, i, index);
									packet->setSubArrayDataByName("token_qty", ItemInfo.price_item2_qty, i, index);
									packet->setSubArrayDataByName("token_id", ItemInfo.price_item2_id, i, index);
									packet->setSubArrayDataByName("token_name", token->name.c_str(), i, index);
								}
							}
						}
						packet->setArrayDataByName("price", ItemInfo.price_coins, i);
						packet->setArrayDataByName("status2", ItemInfo.price_status, i);
						packet->setArrayDataByName("station_cash", ItemInfo.price_stationcash, i);
					}
				}
				if (GetVersion() <= 546) {
					//buy is 0 so dont need to set it
					if (sell)
						packet->setDataByName("type", 1);
				}
				else {
					if (sell)
						packet->setDataByName("type", 130);
					else
						packet->setDataByName("type", 2);
				}
				EQ2Packet* outapp = packet->serialize();
				//	DumpPacket(outapp);
				QueuePacket(outapp);
				safe_delete(packet);
			}
			safe_delete(items);
		}
		else {
			// Need to send an empty packet in the event there is no item list, otherwise the
			// last item list sent to the player will show for this merchant
			PacketStruct* packet = configReader.getStruct("WS_UpdateMerchant", GetVersion());
			if (packet) {
				packet->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(spawn));
				if (GetVersion() <= 546) {
					//buy is 0 so dont need to set it
					if (sell)
						packet->setDataByName("type", 1);
				}
				else {
					if (sell)
						packet->setDataByName("type", 130);
					else
						packet->setDataByName("type", 2);
				}
				EQ2Packet* outapp = packet->serialize();
				QueuePacket(outapp);
				safe_delete(packet);
			}
		}
	}

}

void Client::SendSellMerchantList(bool sell) {
	Spawn* spawn = GetMerchantTransaction();
	if (!spawn || (spawn->GetMerchantType() & MERCHANT_TYPE_NO_BUY) || (spawn->GetMerchantType() & MERCHANT_TYPE_LOTTO))
		return;
	
	if (spawn && spawn->GetMerchantID() > 0 && spawn->IsClientInMerchantLevelRange(this)) {
		map<int32, Item*>* items = player->GetItemList();
		if (items) {
			PacketStruct* packet = configReader.getStruct("WS_UpdateMerchant", GetVersion());
			if (packet) {
				vector<Item*> sellable_items;
				map<int32, Item*>::iterator test_itr;
				for (test_itr = items->begin(); test_itr != items->end(); test_itr++) {
					if (test_itr->second && !test_itr->second->CheckFlag(NO_VALUE))
						sellable_items.push_back(test_itr->second);
				}
				packet->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(spawn));
				packet->setArrayLengthByName("num_items", sellable_items.size());
				vector<Item*>::iterator itr;
				Item* item = 0;
				sint8 item_difficulty = 0;
				float multiplier = CalculateSellMultiplier(spawn->GetMerchantID());
				int32 sell_price = 0;
				Item* master_item = 0;
				int i = 0;
				int tmp_level = 0;
				for (itr = sellable_items.begin(); itr != sellable_items.end(); itr++, i++) {
					item = *itr;
					master_item = master_item_list.GetItem(item->details.item_id);
					if (master_item)
						sell_price = (int32)(master_item->sell_price * multiplier);
					else
						sell_price = 0;
					if (sell_price > item->sell_price)
						sell_price = item->sell_price;
					packet->setArrayDataByName("item_name", item->name.c_str(), i);
					string thename = item->name;

					packet->setArrayDataByName("price", sell_price, i);
					packet->setArrayDataByName("status", 0, i);//additive to status 2 maybe for server bonus etc

					int8 dispFlags = 0;

					// only city merchants allow selling for status
					if(item->sell_status > 0 && (spawn->GetMerchantType() & MERCHANT_TYPE_CITYMERCHANT))
					{
						packet->setArrayDataByName("status2", item->sell_status, i); //this one is the main status
						int32 guildMaxLevel = 5 + item->details.recommended_level; // client hard codes +5 to the level
						if (GetPlayer()->GetGuild() && GetPlayer()->GetGuild()->GetLevel() >= guildMaxLevel) {
							dispFlags += DISPLAY_FLAG_NO_GUILD_STATUS;
						}

					}
					if(item->no_buy_back || (item->sell_status > 0 && (spawn->GetMerchantType() & MERCHANT_TYPE_CITYMERCHANT)))
					{
						if(GetVersion() < 1188)
							dispFlags += DISPLAY_FLAG_RED_TEXT; // for older clients it isn't "no buy back", you can either have 1 for red text or 255 for 'not for sale' to be checked
						else
							dispFlags += DISPLAY_FLAG_NO_BUYBACK;
					}

					if(item->no_sale)
						dispFlags += DISPLAY_FLAG_NOT_FOR_SALE;
					
					packet->setArrayDataByName("display_flags", dispFlags, i);
					packet->setArrayDataByName("item_id", item->details.item_id, i);
					packet->setArrayDataByName("unique_item_id", item->details.unique_id, i);
					packet->setArrayDataByName("stack_size", item->details.count, i);
					packet->setArrayDataByName("icon", item->details.icon, i);
					if (item->generic_info.adventure_default_level > 0)
						tmp_level = item->generic_info.adventure_default_level;
					else
						tmp_level = item->generic_info.tradeskill_default_level;
					packet->setArrayDataByName("level", item->details.recommended_level, i);
					packet->setArrayDataByName("tier", item->details.tier, i);
					packet->setArrayDataByName("item_id2", item->details.item_id, i);
					item_difficulty = player->GetArrowColor(tmp_level);
					if (item_difficulty != ARROW_COLOR_WHITE && item_difficulty != ARROW_COLOR_RED && item_difficulty != ARROW_COLOR_GRAY)
						item_difficulty = ARROW_COLOR_WHITE;
					
					sint64 overrideValue = 0;
					if (item->GetItemScript() && lua_interface && lua_interface->RunItemScript(item->GetItemScript(), "item_difficulty", item, player, &overrideValue))
						item_difficulty = (sint8)overrideValue;
					
					item_difficulty -= 6;
					if (item_difficulty < 0)
						item_difficulty *= -1;

					packet->setArrayDataByName("item_difficulty", item_difficulty, i);
					if (item->details.count == 1)
						packet->setArrayDataByName("quantity", 0xFFFF, i);
					else
						packet->setArrayDataByName("quantity", item->details.count, i);
					packet->setArrayDataByName("stack_size2", item->details.count, i);
					if (GetVersion() <= 1096)
						packet->setArrayDataByName("description", item->description.c_str(), i);
				}
				if (GetVersion() <= 546) {
					packet->setDataByName("type", 1);
				}
				else {
					if (sell)
						packet->setDataByName("type", 129);
					else
						packet->setDataByName("type", 1);
				}
				packet->setDataByName("unknown8a", 16256, 6);
				packet->setDataByName("unknown8a", 16256, 10);
				//packet->PrintPacket();
				EQ2Packet* outapp = packet->serialize();
				//DumpPacket(outapp);
				QueuePacket(outapp);
				safe_delete(packet);
			}
			safe_delete(items);
		}
	}

}

void Client::SendBuyBackList(bool sell) {
	if (GetVersion() <= 546) //this wasn't added until LU37 on July 31st 2007, well after the DoF client
		return;
	Spawn* spawn = GetMerchantTransaction();
	if (spawn && spawn->GetMerchantID() > 0 && spawn->IsClientInMerchantLevelRange(this)) {
		deque<BuyBackItem*>::iterator itr;
		int i = 0;
		Item* master_item = 0;
		BuyBackItem* buyback = 0;
		PacketStruct* packet = configReader.getStruct("WS_UpdateMerchant", GetVersion());
		if (packet) {
			packet->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(spawn));
			packet->setArrayLengthByName("num_items", buy_back_items.size());
			sint8 item_difficulty = 0;
			MBuyBack.readlock(__FUNCTION__, __LINE__);
			int tmp_level = 0;
			for (itr = buy_back_items.begin(); itr != buy_back_items.end(); itr++, i++) {
				buyback = *itr;
				master_item = master_item_list.GetItem(buyback->item_id);
				if (master_item) {
					packet->setArrayDataByName("item_name", master_item->name.c_str(), i);
					packet->setArrayDataByName("price", buyback->price, i);
					packet->setArrayDataByName("item_id", master_item->details.item_id, i);
					packet->setArrayDataByName("unique_item_id", buyback->unique_id, i);
					packet->setArrayDataByName("stack_size", buyback->quantity, i);
					packet->setArrayDataByName("icon", master_item->details.icon, i);
					if (master_item->generic_info.adventure_default_level > 0)
						tmp_level = master_item->generic_info.adventure_default_level;
					else
						tmp_level = master_item->generic_info.tradeskill_default_level;
					packet->setArrayDataByName("level", tmp_level, i);
					packet->setArrayDataByName("tier", master_item->details.tier, i);
					packet->setArrayDataByName("item_id2", master_item->details.item_id, i);
					item_difficulty = player->GetArrowColor(tmp_level);
					if (item_difficulty != ARROW_COLOR_WHITE && item_difficulty != ARROW_COLOR_RED && item_difficulty != ARROW_COLOR_GRAY)
						item_difficulty = ARROW_COLOR_WHITE;
					
					sint64 overrideValue = 0;
					if (master_item->GetItemScript() && lua_interface && lua_interface->RunItemScript(master_item->GetItemScript(), "item_difficulty", master_item, player, &overrideValue))
						item_difficulty = (sint8)overrideValue;

					item_difficulty -= 6;
					if (item_difficulty < 0)
						item_difficulty *= -1;
					packet->setArrayDataByName("item_difficulty", item_difficulty, i);

					sint64 dispFlags = 0;
					if (master_item->GetItemScript() && lua_interface && lua_interface->RunItemScript(master_item->GetItemScript(), "buyback_display_flags", master_item, player, &dispFlags))
						packet->setArrayDataByName("display_flags", (int8)dispFlags, i);
					
					if (buyback->quantity == 1)
						packet->setArrayDataByName("quantity", 0xFFFF, i);
					else
						packet->setArrayDataByName("quantity", buyback->quantity, i);
					packet->setArrayDataByName("stack_size2", buyback->quantity, i);
					if (GetVersion() <= 1096)
						packet->setArrayDataByName("description", master_item->description.c_str(), i);
				}
			}
			MBuyBack.releasereadlock(__FUNCTION__, __LINE__);
			if (sell)
				packet->setDataByName("type", 640);
			else
				packet->setDataByName("type", 512);
			EQ2Packet* outapp = packet->serialize();
			//	DumpPacket(outapp);
			QueuePacket(outapp);
			safe_delete(packet);
		}
	}

}

void Client::SendRepairList() {
	Spawn* spawn = GetMerchantTransaction();
	if (spawn) {
		vector<Item*>* repairable_items = GetRepairableItems();
		PacketStruct* packet = configReader.getStruct("WS_UpdateMerchant", GetVersion());
		if (packet) {
			packet->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(spawn));
			packet->setArrayLengthByName("num_items", repairable_items->size());
			Item* item = 0;
			sint8 item_difficulty = 0;
			int32 i = 0;
			vector<Item*>::iterator itr;
			for (itr = repairable_items->begin(); itr != repairable_items->end(); itr++, i++) {
				item = *itr;
				packet->setArrayDataByName("item_name", item->name.c_str(), i);
				packet->setArrayDataByName("price", item->CalculateRepairCost(), i);
				packet->setArrayDataByName("item_id", item->details.item_id, i);
				packet->setArrayDataByName("stack_size", item->details.count, i);
				packet->setArrayDataByName("icon", item->details.icon, i);
				/*if (item->generic_info.adventure_default_level > 0)
					tmp_level = item->generic_info.adventure_default_level;
				else
					tmp_level = item->generic_info.tradeskill_default_level;
				packet->setArrayDataByName("level", tmp_level, i);*/
				packet->setArrayDataByName("level", item->generic_info.adventure_default_level, i);
				packet->setArrayDataByName("tier", item->details.tier, i);
				packet->setArrayDataByName("item_id2", item->details.item_id, i);
				item_difficulty = player->GetArrowColor(item->generic_info.adventure_default_level);
				if (item_difficulty != ARROW_COLOR_WHITE && item_difficulty != ARROW_COLOR_RED && item_difficulty != ARROW_COLOR_GRAY)
					item_difficulty = ARROW_COLOR_WHITE;
				item_difficulty -= 6;
				if (item_difficulty < 0)
					item_difficulty *= -1;
				packet->setArrayDataByName("item_difficulty", item_difficulty, i);
				if (item->details.count == 1)
					packet->setArrayDataByName("quantity", 0xFFFF, i);
				else
					packet->setArrayDataByName("quantity", item->details.count, i);
				packet->setArrayDataByName("stack_size2", item->details.count, i);
				if (GetVersion() <= 1096)
					packet->setArrayDataByName("description", item->description.c_str(), i);
			}
			if (GetVersion() <= 546) {
				packet->setDataByName("type", 16);
			}
			else {
				packet->setDataByName("type", 96);
			}
			EQ2Packet* outapp = packet->serialize();
			QueuePacket(outapp);
			safe_delete(packet);
		}
		safe_delete(repairable_items);
	}

}

void Client::ShowLottoWindow() {
	Spawn* spawn = GetMerchantTransaction();
	if (spawn) {

		int32 item_id = rule_manager.GetGlobalRule(R_World, GamblingTokenItemID)->GetInt32();
		if (!item_id)
		{
			LogWrite(WORLD__ERROR, 0, "World", "No GamblingTokenItemID rule set!");
			SimpleMessage(CHANNEL_COLOR_RED, "The server admin has not setup a lotto item ticket.");

			return;
		}
		else if (item_id == 0)
		{
			LogWrite(WORLD__ERROR, 0, "World", "Error! Invalid GamblingTokenItemID value!");

			return;
		}

		Item* item = master_item_list.GetItem(item_id);
		if (!item) {
			LogWrite(WORLD__ERROR, 0, "World", "The 'GamblingTokenItemID' rule value %u is not a valid item id.", item_id);

			return;
		}

		LogWrite(WORLD__DEBUG, 0, "World", "GamblingTokenItemID = '%s' (%u)", item->name.c_str(), item_id);

		PacketStruct* packet = configReader.getStruct("WS_UpdateMerchant", GetVersion());
		if (packet) {
			packet->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(spawn));
			packet->setArrayLengthByName("num_items", 1);
			packet->setArrayDataByName("item_name", item->name.c_str());
			packet->setArrayDataByName("price", item->sell_price);
			packet->setArrayDataByName("item_id", item->details.item_id);
			packet->setArrayDataByName("stack_size", item->details.count);
			packet->setArrayDataByName("icon", item->details.icon);
			packet->setArrayDataByName("level", item->generic_info.adventure_default_level);
			packet->setArrayDataByName("tier", item->details.tier);
			packet->setArrayDataByName("item_id2", item->details.item_id);
			int8 item_difficulty = player->GetArrowColor(item->generic_info.adventure_default_level);
			if (item_difficulty != ARROW_COLOR_WHITE && item_difficulty != ARROW_COLOR_RED && item_difficulty != ARROW_COLOR_GRAY)
				item_difficulty = ARROW_COLOR_WHITE;
			item_difficulty -= 6;
			if (item_difficulty < 0)
				item_difficulty *= -1;
			packet->setArrayDataByName("item_difficulty", item_difficulty);
			//if(item->details.count == 1)
			packet->setArrayDataByName("quantity", 0xFFFF);
			//else
			//	packet->setArrayDataByName("quantity", item->details.count);
			packet->setArrayDataByName("stack_size2", item->details.count);
			packet->setArrayDataByName("description", item->description.c_str());
			if (GetVersion() <= 546) {
				packet->setDataByName("type", 128);
			}
			else {
				packet->setDataByName("type", 0x00000102);
			}
			QueuePacket(packet->serialize());
			safe_delete(packet);
		}
	}

}

void Client::PlayLotto(int32 price, int32 ticket_item_id) {
	PacketStruct* packet = configReader.getStruct("WS_Lottery", GetVersion());
	if (packet) {
		world.AddLottoPlayer(GetCharacterID(), Timer::GetCurrentTime2() + 4500);
		int32 rolls[6] = { 0 };
		int32 lottery_digits[6] = { 0 };
		int8 num_matches = 0;
		int64 jackpot = 0;
		Item* item = GetPlayer()->item_list.GetItemFromID(ticket_item_id);
		if (!item) {
			return;
		}
		database.DeleteItem(GetCharacterID(), item, 0);
		GetPlayer()->item_list.RemoveItem(item, true);
		QueuePacket(GetPlayer()->SendInventoryUpdate(GetVersion()));
		Variable* winning_numbers = variables.FindVariable("gambling_winning_numbers");
		if (!winning_numbers) {
			winning_numbers = new Variable("gambling_winning_numbers", "231205182236", "Current Gigglegibber Gambling Game winning numbers");
			variables.AddVariable(winning_numbers);
			database.SaveVariable(winning_numbers->GetName(), winning_numbers->GetValue(), winning_numbers->GetComment());
		}
		if (strlen(winning_numbers->GetValue()) != 12) {
			winning_numbers->SetValue("231205182236");
			database.SaveVariable(winning_numbers->GetName(), winning_numbers->GetValue(), winning_numbers->GetComment());
		}
		try {
			for (int32 i = 0; i < 12; i += 2) {
				char num[4];
				strncpy(num, winning_numbers->GetValue() + i, 2);
				lottery_digits[i / 2] = atoi(num);
			}
		}
		catch (...) {
			LogWrite(WORLD__ERROR, 0, "World", "Error parsing 'gambling_winning_numbers' variable");

			return;
		}
		Variable* jackpot_var = variables.FindVariable("gambling_current_jackpot");
		if (!jackpot_var) {
			jackpot_var = new Variable("gambling_current_jackpot", "10000", "Current Gigglegibber Gambling Game Jackpot");
			variables.AddVariable(jackpot_var);
			database.SaveVariable(jackpot_var->GetName(), jackpot_var->GetValue(), jackpot_var->GetComment());
		}
		try {
			jackpot = atoul(jackpot_var->GetValue());
			if (jackpot < 10000)
				jackpot = 10000;
		}
		catch (...) {
			jackpot = 10000;
		}
		char new_jackpot[128] = { 0 };
		sprintf(new_jackpot, "%llu", jackpot + price);
		jackpot_var->SetValue(new_jackpot);
		database.SaveVariable(jackpot_var->GetName(), jackpot_var->GetValue(), jackpot_var->GetComment());
		world.PickRandomLottoDigits(rolls);
		packet->setDataByName("roll_digit1", rolls[0]);
		packet->setDataByName("roll_digit2", rolls[1]);
		packet->setDataByName("roll_digit3", rolls[2]);
		packet->setDataByName("roll_digit4", rolls[3]);
		packet->setDataByName("roll_digit5", rolls[4]);
		packet->setDataByName("roll_digit6", rolls[5]);
		packet->setDataByName("lottery_digit1", lottery_digits[0]);
		packet->setDataByName("lottery_digit2", lottery_digits[1]);
		packet->setDataByName("lottery_digit3", lottery_digits[2]);
		packet->setDataByName("lottery_digit4", lottery_digits[3]);
		packet->setDataByName("lottery_digit5", lottery_digits[4]);
		packet->setDataByName("lottery_digit6", lottery_digits[5]);
		QueuePacket(packet->serialize());
		safe_delete(packet);
		for (int32 i = 0; i < 6; i++) {
			for (int32 j = 0; j < 6; j++) {
				if (rolls[i] == lottery_digits[j]) {
					num_matches++;
					break;
				}
			}
		}
		char new_jackpot_str[16];
		memset(new_jackpot_str, 0, sizeof(new_jackpot_str));
		world.SetLottoPlayerNumMatches(GetCharacterID(), num_matches);
		if (num_matches == 6) {
			world.PickRandomLottoDigits(lottery_digits);
			for (int32 i = 0; i < 12; i += 2)
				sprintf(new_jackpot_str + i, "%02d", lottery_digits[i / 2]);
			winning_numbers->SetValue(new_jackpot_str);
			jackpot_var->SetValue("10000");
			database.SaveVariable(winning_numbers->GetName(), winning_numbers->GetValue(), winning_numbers->GetComment());
			database.SaveVariable(jackpot_var->GetName(), jackpot_var->GetValue(), jackpot_var->GetComment());
		}
	}

}

void Client::SendGuildCreateWindow() {
	if (GetVersion() <= 546) {
		SimpleMessage(0, "Not implemented on this client...yet?");
	}
	else {
		Spawn* spawn = GetPlayer()->GetTarget();
		if (spawn) {
			PacketStruct* packet = configReader.getStruct("WS_UpdateMerchant", GetVersion());
			if (packet) {
				packet->setDataByName("spawn_id", player->GetIDWithPlayerSpawn(spawn));
				packet->setArrayLengthByName("num_items", 0);
				packet->setDataByName("type", 0x00008000);
				QueuePacket(packet->serialize());
				safe_delete(packet);
			}
		}
	}
}

void Client::AddBuyBack(int32 unique_id, int32 item_id, int16 quantity, int32 price, bool save_needed) {
	BuyBackItem* item = new BuyBackItem;
	item->item_id = item_id;
	item->unique_id = unique_id;
	item->price = price;
	item->quantity = quantity;
	item->save_needed = save_needed;
	MBuyBack.writelock(__FUNCTION__, __LINE__);
	buy_back_items.push_back(item);
	if (buy_back_items.size() > 10) {
		safe_delete(buy_back_items.front());
		buy_back_items.pop_front();
	}
	MBuyBack.releasewritelock(__FUNCTION__, __LINE__);

}

deque<BuyBackItem*>* Client::GetBuyBacks() {
	return &buy_back_items;
}

vector<Item*>* Client::GetRepairableItems() {
	vector<Item*>* repairable_items = new vector<Item*>;
	vector<Item*>* equipped_items = player->GetEquipmentList()->GetAllEquippedItems();
	map<int32, Item*>* items = player->GetItemList();
	if (equipped_items && equipped_items->size() > 0) {
		for (int32 i = 0; i < equipped_items->size(); i++) {
			Item* item = equipped_items->at(i);
			if (item && item->generic_info.condition < 100)
				repairable_items->push_back(item);
		}
	}
	if (items && items->size() > 0) {
		map<int32, Item*>::iterator itr;
		for (itr = items->begin(); itr != items->end(); itr++) {
			Item* item = itr->second;
			if (item && item->generic_info.condition < 100)
				repairable_items->push_back(item);
		}
	}
	safe_delete(equipped_items);
	safe_delete(items);

	return repairable_items;
}

void Client::SendMailList() {
	int32 kiosk_id = player->GetIDWithPlayerSpawn(GetMailTransaction());
	if (kiosk_id > 0) {
		PacketStruct* p = configReader.getStruct("WS_GetMailHeader", GetVersion());
		if (p) {
			MutexMap<int32, Mail*>* mail_list = player->GetMail();
			MutexMap<int32, Mail*>::iterator itr = mail_list->begin();
			int32 i = 0;
			p->setDataByName("kiosk_id", kiosk_id);
			p->setArrayLengthByName("num_messages", (int16)mail_list->size());
			while (itr.Next()) {
				Mail* mail = itr->second;
				p->setArrayDataByName("mail_id", mail->mail_id, i);
				p->setArrayDataByName("player_to_id", mail->player_to_id, i);
				p->setArrayDataByName("player_from", mail->player_from.c_str(), i);
				p->setArrayDataByName("subject", mail->subject.c_str(), i);
				p->setArrayDataByName("unknown1", 0x0000, i);
				p->setArrayDataByName("already_read", mail->already_read, i);
				if(mail->expire_time)
					p->setArrayDataByName("mail_deletion", mail->expire_time - mail->time_sent, i);
				else
					p->setArrayDataByName("mail_deletion", 0, i);
				
				p->setArrayDataByName("mail_type", mail->mail_type, i);
				p->setArrayDataByName("mail_expire", 0xFFFFFFFF, i);
				p->setArrayDataByName("unknown1a", 0xFFFFFFFF, i);
				p->setArrayDataByName("coin_copper", mail->coin_copper, i);
				p->setArrayDataByName("coin_silver", mail->coin_silver, i);
				p->setArrayDataByName("coin_gold", mail->coin_gold, i);
				p->setArrayDataByName("coin_plat", mail->coin_plat, i);

				//p->setArrayDataByName("unknown2", 0, i);

				bool successItemAdd = false;
				if(mail->stack || mail->char_item_id)
				{
					Item* item = master_item_list.GetItem(mail->char_item_id);
					if(item)
					{
						item->stack_count = mail->stack > 1 ? mail->stack : 0;
						if (version < 860)
							p->setItemArrayDataByName("item", item, player, i, 0, -1);
						else if (version < 1193)
							p->setItemArrayDataByName("item", item, player, i);
						else
							p->setItemArrayDataByName("item", item, player, i, 0, 2);
						
						successItemAdd = true;
					}
				}

				if(!successItemAdd)
				{
					p->setArrayDataByName("end_tag2", GetItemPacketType(GetVersion()), i);
					p->setArrayDataByName("end_tag3", 0xFF, i);
				}
				i++;
			}

			// GMs send mail for free!
			if (GetAdminStatus() > 0)
			{
				p->setDataByName("postage_cost", 0);
				p->setDataByName("attachment_cost", 0);
			}
			else
			{
				p->setDataByName("postage_cost", 10);
				p->setDataByName("attachment_cost", 50);
			}
			p->setDataByName("unknown3", 0x01F4);
			p->setDataByName("unknown4", 0x01000000);
			EQ2Packet* pack = p->serialize();
			DumpPacket(pack->pBuffer, pack->size);
			QueuePacket(pack);
			safe_delete(p);
		}
	}
	else
		SimpleMessage(CHANNEL_NARRATIVE, "You are currently not in a mail transaction.");

}

void Client::DisplayMailMessage(int32 mail_id) {
	Mail* mail = player->GetMail(mail_id);
	if (mail) {
		int32 kiosk_id = player->GetIDWithPlayerSpawn(GetMailTransaction());
		if (kiosk_id > 0) {
			PacketStruct* update = configReader.getStruct("WS_UpdatePlayerMail", GetVersion());
			if (update) {
				update->setDataByName("action", 0x03);
				update->setDataByName("packettype", GetItemPacketType(GetVersion()));
				update->setDataByName("packetsubtype", 0xFF);
				QueuePacket(update->serialize());
				safe_delete(update);
			}
			PacketStruct* packet = configReader.getStruct("WS_MailGetMessage", GetVersion());
			if (packet) {
				packet->setDataByName("kiosk_id", kiosk_id);
				packet->setDataByName("mail_id", mail->mail_id);
				packet->setDataByName("player_to_id", mail->player_to_id);
				packet->setDataByName("player_from", mail->player_from.c_str());
				packet->setDataByName("subject", mail->subject.c_str());
				packet->setDataByName("mail_body", mail->mail_body.c_str());
				packet->setDataByName("unknown1", 1);
				packet->setDataByName("unknown2", 0);
				packet->setDataByName("lock_report_button", 1);
				packet->setDataByName("unknown3", 0xFFFFFFFF);
				packet->setDataByName("unknown3a", 0xFFFFFFFF);
				packet->setDataByName("coin_copper", mail->coin_copper);
				packet->setDataByName("coin_silver", mail->coin_silver);
				packet->setDataByName("coin_gold", mail->coin_gold);
				packet->setDataByName("coin_plat", mail->coin_plat);
				if(mail->stack || mail->char_item_id)
				{
					Item* item = master_item_list.GetItem(mail->char_item_id);
					item->stack_count = mail->stack > 1 ? mail->stack : 0;
					if (version < 860)
						packet->setItemByName("item", item, player, 0, -1);
					else if (version < 1193)
						packet->setItemByName("item", item, player, 0, 0);
					else
						packet->setItemByName("item", item, player, 0, 2);
				}
				else
				{
					packet->setDataByName("end_tag2", GetItemPacketType(GetVersion()));
					packet->setDataByName("end_tag3", 0xFF);
				}
				mail->already_read = true;
				mail->save_needed = true;
				EQ2Packet* pack = packet->serialize();
				DumpPacket(pack);
				QueuePacket(pack);
				safe_delete(packet);
				// trying to update this causes the window not to open
				//SendMailList();
			}
		}
		else
			SimpleMessage(CHANNEL_NARRATIVE, "You are currently not in a mail transaction.");
	}

}

/* This is called when the client sends a mail message.  This determines whether or not the mail can be sent and must send the reply
   packet back to the client before the mail actually sent. */
void Client::HandleSentMail(EQApplicationPacket* app) {
	PacketStruct* packet = configReader.getStruct("WS_MailSendMessage", GetVersion());
	if (packet) {
		packet->LoadPacketData(app->pBuffer, app->size);
		string player_to = packet->getType_EQ2_16BitString_ByName("player_to").data;
		PacketStruct* reply_packet = configReader.getStruct("WS_MailSendMessageReply", GetVersion());
		vector<int32>* ids = 0;
		MMailWindowMutex.lock();
		if (reply_packet) {
			int8 reply_type = MAIL_SEND_RESULT_UNKNOWN_ERROR;
			if (player_to.length() == 0)
				reply_type = MAIL_SEND_RESULT_EMPTY_TO_LIST;
			else if (player_to.compare(string(GetPlayer()->GetName())) == 0)
				reply_type = MAIL_SEND_RESULT_CANNOT_SEND_TO_SELF;
			else if (GetAdminStatus() == 0 && !player->RemoveCoins(10))
				reply_type = MAIL_SEND_RESULT_NOT_ENOUGH_COIN;
			else {
				if (GetAdminStatus() > 200 && player_to.compare("<all>") == 0) {
					if (mail_window.char_item_id == 0 && (mail_window.coin_copper + mail_window.coin_silver + mail_window.coin_gold + mail_window.coin_plat) == 0)
						ids = database.GetAllPlayerIDs();
					else
						SimpleMessage(CHANNEL_NARRATIVE, "You may not mail gifts to multiple players.");
				}
				else {
					ids = new vector<int32>;
					ids->push_back(database.GetCharacterID(player_to.c_str()));
				}
				if (ids) {
					for (int32 i = 0; i < ids->size(); i++) {
						int32 player_to_id = ids->at(i);
						if (player_to_id > 0) {
							reply_type = MAIL_SEND_RESULT_SUCCESS;
							Mail* mail = new Mail;
							mail->mail_id = 0;
							mail->player_to_id = player_to_id;
							mail->player_from = string(GetPlayer()->GetName());
							mail->subject = packet->getType_EQ2_16BitString_ByName("subject").data;
							mail->mail_body = packet->getType_EQ2_16BitString_ByName("mail_body").data;
							mail->already_read = 0;
							mail->mail_type = MAIL_TYPE_REGULAR;
							mail->coin_copper = mail_window.coin_copper;
							mail->coin_silver = mail_window.coin_silver;
							mail->coin_gold = mail_window.coin_gold;
							mail->coin_plat = mail_window.coin_plat;
							mail->char_item_id = mail_window.char_item_id;
							mail->stack = mail_window.stack;

							// GM's send mail for free!
							if (GetAdminStatus() > 0)
							{
								mail->postage_cost = 0;
								mail->attachment_cost = 0;
							}
							else
							{
								mail->postage_cost = 10;
								mail->attachment_cost = 50;
							}
							mail->time_sent = Timer::GetUnixTimeStamp();
							mail->expire_time = mail->time_sent + 2592000;	//30 days in seconds
							//int16 packettype = packet->getType_int16_ByName("packettype");
							//int8 packetsubtype = packet->getType_int8_ByName("packetsubtype");
							/*int32 postage_cost = packet->getType_int32_ByName("postage_cost");
							int32 attachment_cost = packet->getType_int32_ByName("attachment_cost");
							if (postage_cost > 0 || attachment_cost > 0)
								PlaySoundA("coin_cha_ching");*/
							mail->save_needed = false;
							Client* to_client = zone_list.GetClientByCharID(player_to_id);
							if (to_client) {
								to_client->GetPlayer()->AddMail(mail);
								to_client->SimpleMessage(CHANNEL_NARRATIVE, "You've got mail! :)");
							}
							database.SavePlayerMail(mail);
							ResetSendMail(false, false);
						}
						else
							reply_type = MAIL_SEND_RESULT_UNKNOWN_PLAYER;
					}
				}
			}
			string players_to = "";
			if (ids) {
				for (int32 i = 0; i < ids->size(); i++) {
					if (ids->at(i) != 0)
						players_to.append(database.GetCharacterName(ids->at(i)));
					if (i < (ids->size() - 1))
						players_to.append(", ");
				}
			}
			reply_packet->setDataByName("player_to", players_to.c_str());
			reply_packet->setDataByName("reply_type", reply_type);
			QueuePacket(reply_packet->serialize());
			safe_delete(reply_packet);
			safe_delete(ids);
		}
		safe_delete(packet);
		MMailWindowMutex.unlock();
	}

}

void Client::DeleteMail(int32 mail_id, bool from_database) {

	player->DeleteMail(mail_id, from_database);

}
bool Client::AddMailItem(Item* item)
{
	bool ret = false;
	if (GetMailTransaction()) {
		MMailWindowMutex.lock();
		if(mail_window.char_item_id == 0)
		{
			mail_window.item = item;
			mail_window.char_item_id = item->details.item_id;
			mail_window.stack = item->details.count;
			ret = true;
		PacketStruct* packet = configReader.getStruct("WS_UpdatePlayerMail", GetVersion());
				packet->setDataByName("coin_copper", mail_window.coin_copper);
				packet->setDataByName("coin_silver", mail_window.coin_silver);
				packet->setDataByName("coin_gold", mail_window.coin_gold);
				packet->setDataByName("coin_plat", mail_window.coin_plat);
					if(item)
					{
					packet->setDataByName("stack", mail_window.stack);
					item->stack_count = mail_window.stack;
					if (version < 860)
						packet->setItemByName("item", item, player, 0, -1);
					else if (version < 1193)
						packet->setItemByName("item", item, player, 0, 0);
					else
						packet->setItemByName("item", item, player, 0, 2);
					}
					else
					{
						packet->setDataByName("end_tag2", GetItemPacketType(GetVersion()));
						packet->setDataByName("end_tag3", 0xFF);
					}
				//packet->setDataByName("packettype", GetItemPacketType(version));
				//packet->setDataByName("packetsubtype", 0xFF);
				//packet->setDataByName("unknown2", 0);
				//packet->PrintPacket();
				QueuePacket(packet->serialize());
		}
		MMailWindowMutex.unlock();
	}
	return ret;
}
bool Client::AddMailCoin(int32 copper, int32 silver, int32 gold, int32 plat) {

	bool ret = false;
	if (GetMailTransaction()) {
	MMailWindowMutex.lock();
		PacketStruct* packet = configReader.getStruct("WS_UpdatePlayerMail", GetVersion());
		if (packet) {
			if (copper > 0) {
				if (player->RemoveCoins(copper)) {
					mail_window.coin_copper += copper;
					Message(CHANNEL_NARRATIVE, "You add %u copper to the mail window.", copper);
					ret = true;
				}
			}
			else if (silver > 0) {
				if (player->RemoveCoins(silver * 100)) {
					mail_window.coin_silver += silver;
					Message(CHANNEL_NARRATIVE, "You add %u silver to the mail window.", silver);
					ret = true;
				}
			}
			else if (gold > 0) {
				if (player->RemoveCoins(gold * 10000)) {
					mail_window.coin_gold += gold;
					Message(CHANNEL_NARRATIVE, "You add %u gold to the mail window.", gold);
					ret = true;
				}
			}
			else if (plat > 0) {
				if (player->RemoveCoins(plat * 1000000)) {
					mail_window.coin_plat += plat;
					Message(CHANNEL_NARRATIVE, "You add %u platinum to the mail window.", plat);
					ret = true;
				}
			}
			if (ret) {
				packet->setDataByName("coin_copper", mail_window.coin_copper);
				packet->setDataByName("coin_silver", mail_window.coin_silver);
				packet->setDataByName("coin_gold", mail_window.coin_gold);
				packet->setDataByName("coin_plat", mail_window.coin_plat);
					Item* item = master_item_list.GetItem(mail_window.char_item_id);
					if(item)
					{
					packet->setDataByName("stack", mail_window.stack);
					item->stack_count = mail_window.stack;
					if (version < 860)
						packet->setItemByName("item", item, player, 0, -1);
					else if (version < 1193)
						packet->setItemByName("item", item, player, 0, 0);
					else
						packet->setItemByName("item", item, player, 0, 2);
					}
					else
					{
						packet->setDataByName("end_tag2", GetItemPacketType(GetVersion()));
						packet->setDataByName("end_tag3", 0xFF);
					}
				//packet->PrintPacket();
				QueuePacket(packet->serialize());
			}
			else
				SimpleMessage(CHANNEL_NARRATIVE, "You don't have that much money.");
			safe_delete(packet);
		}
		MMailWindowMutex.unlock();
	}
	else
		SimpleMessage(CHANNEL_NARRATIVE, "You are currently not in a mail transaction.");

	return ret;
}

bool Client::RemoveMailCoin(int32 copper, int32 silver, int32 gold, int32 plat) {
	bool ret = false;
	if (GetMailTransaction()) {
		MMailWindowMutex.lock();
		PacketStruct* packet = configReader.getStruct("WS_UpdatePlayerMail", GetVersion());
		if (packet) {
			if (copper > 0) {
				player->AddCoins(copper);
				mail_window.coin_copper -= copper;
				Message(CHANNEL_NARRATIVE, "You remove %u copper from the mail window.", copper);
				ret = true;
			}
			else if (silver > 0) {
				player->AddCoins(silver * 100);
				mail_window.coin_silver -= silver;
				Message(CHANNEL_NARRATIVE, "You remove %u silver from the mail window.", silver);
				ret = true;
			}
			else if (gold > 0) {
				player->AddCoins(gold * 10000);
				mail_window.coin_gold -= gold;
				Message(CHANNEL_NARRATIVE, "You remove %u gold from the mail window.", gold);
				ret = true;
			}
			else if (plat > 0) {
				player->AddCoins(plat * 1000000);
				mail_window.coin_plat -= plat;
				Message(CHANNEL_NARRATIVE, "You remove %u platinum from the mail window.", plat);
				ret = true;
			}
			if (ret) {
				packet->setDataByName("coin_copper", mail_window.coin_copper);
				packet->setDataByName("coin_silver", mail_window.coin_silver);
				packet->setDataByName("coin_gold", mail_window.coin_gold);
				packet->setDataByName("coin_plat", mail_window.coin_plat);
				packet->setDataByName("stack", 0);
				packet->setDataByName("packettype", 0x2BFE);
				packet->setDataByName("packetsubtype", 0xFF);
				packet->setDataByName("unknown2", 0);
				QueuePacket(packet->serialize());
			}
			safe_delete(packet);
		}
		MMailWindowMutex.unlock();
	}
	else
		SimpleMessage(CHANNEL_NARRATIVE, "You are currently not in a mail transaction.");

	return ret;
}

void Client::TakeMailAttachments(int32 mail_id) {
	if (GetMailTransaction()) {
		Mail* mail = player->GetMail(mail_id);
		if (mail) {
			int64 amount = 0;
			if (mail->coin_copper > 0) {
				amount += mail->coin_copper;
				mail->coin_copper = 0;
			}
			if (mail->coin_silver > 0) {
				amount += mail->coin_silver * 100;
				mail->coin_silver = 0;
			}
			if (mail->coin_gold > 0) {
				amount += mail->coin_gold * 10000;
				mail->coin_gold = 0;
			}
			if (mail->coin_plat > 0) {
				amount += mail->coin_plat * 1000000;
				mail->coin_plat = 0;
			}
			if (mail->char_item_id > 0) {
				AddItem(mail->char_item_id, mail->stack);
				mail->char_item_id = 0;
				mail->stack = 0;
			}
			/*	Can't find the right packet to send to update the player's mail.  This packet below updates the mail the player is sending, not
				the mail the player is getting attachments from.  There is an opcode OP_MailRemoveAttachFromMailMsg with opcode 328 but i can't
				find it in any packet logs.*/
				/*PacketStruct* packet = configReader.getStruct("WS_UpdatePlayerMail", GetVersion());
				if (packet) {
					packet->setDataByName("unknown", 0x03);
					packet->setDataByName("coin_copper", mail->coin_copper);
					packet->setDataByName("coin_silver", mail->coin_silver);
					packet->setDataByName("coin_gold", mail->coin_gold);
					packet->setDataByName("coin_plat", mail->coin_plat);
					packet->setDataByName("stack", 0);
					packet->setDataByName("packettype", 0x2BFE);
					packet->setDataByName("packetsubtype", 0xFF);
					packet->setDataByName("unknown2", 0);
					packet->setDataByName("unknown3", 0x00000001);//0x00000016
					DumpPacket(packet->serialize());
					QueuePacket(packet->serialize());
					safe_delete(packet);
				}*/
			database.SavePlayerMail(mail);
			if (amount > 0)
				player->AddCoins(amount);
			SendMailList();
		}
	}
	else
		SimpleMessage(CHANNEL_NARRATIVE, "You are currently not in a mail transaction.");

}

void Client::ResetSendMail(bool cancel, bool needslock) {
	if(cancel && mail_transaction)
		SimpleMessage(CHANNEL_NARRATIVE, "You cancel sending a letter.");
	if(needslock)
		MMailWindowMutex.lock();
	if(cancel)
		player->AddCoins(mail_window.coin_copper + (mail_window.coin_silver * 100) + (mail_window.coin_gold * 10000) + (mail_window.coin_plat * 1000000));
	if(!cancel)
		mail_transaction = 0;
	mail_window.coin_copper = 0;
	mail_window.coin_silver = 0;
	mail_window.coin_gold = 0;
	mail_window.coin_plat = 0;
	mail_window.char_item_id = 0;
	mail_window.stack = 0;

	if(mail_window.item){
		if(cancel)
			AddItem(mail_window.item);
		else
			safe_delete(mail_window.item);
	}
	mail_window.item = nullptr;
	if(needslock)
		MMailWindowMutex.unlock();
}

bool Client::GateAllowed() {
	ZoneServer* zone = zone_list.Get(player->GetPlayerInfo()->GetBindZoneID());

	LogWrite(MISC__TODO, 1, "TODO", "possibly add a check here to see if a player is allowed to gate from this spot, allow for now\nfile: %s, func: %s, line: %i", __FILE__, __FUNCTION__, __LINE__);

	if (zone)
		return true;
	return false;
}

bool Client::BindAllowed() {

	LogWrite(MISC__TODO, 1, "TODO", "possibly add a check here to see if a player is allowed to bind in this spot, allow anywhere for now\nfile: %s, func: %s, line: %i", __FILE__, __FUNCTION__, __LINE__);

	return true;
}

bool Client::Bind() {
	player->GetPlayerInfo()->SetBindZone(GetCurrentZone()->GetZoneID());
	player->GetPlayerInfo()->SetBindX(player->GetX());
	player->GetPlayerInfo()->SetBindY(player->GetY());
	player->GetPlayerInfo()->SetBindZ(player->GetZ());
	player->GetPlayerInfo()->SetBindHeading(player->GetHeading());

	return true;
}

bool Client::Gate(bool is_spell) {
	if (player->GetPlayerInfo()->GetBindZoneID() == 0)
		return false;

	ZoneServer* zone = zone_list.Get(player->GetPlayerInfo()->GetBindZoneID());
	if (zone) {
		player->SetX(player->GetPlayerInfo()->GetBindZoneX());
		player->SetY(player->GetPlayerInfo()->GetBindZoneY());
		player->SetZ(player->GetPlayerInfo()->GetBindZoneZ());
		player->SetHeading(player->GetPlayerInfo()->GetBindZoneHeading());
		Zone(zone, false, is_spell);

		return true;
	}

	return false;
}

void Client::ProcessTeleport(Spawn* spawn, vector<TransportDestination*>* destinations, int32 transport_id, bool is_spell) {
	if (!destinations || !spawn) {
		return;
	}

	bool has_map = false;
	if (transport_id > 0)
		has_map = GetCurrentZone()->TransportHasMap(transport_id);

	transport_spawn = spawn;
	vector<TransportDestination*> transport_list;
	vector<TransportDestination*>::iterator itr;
	TransportDestination* destination = 0;
	for (itr = destinations->begin(); itr != destinations->end(); itr++) {
		destination = *itr;
		if (has_map || (destination->type == TRANSPORT_TYPE_ZONE && ((destination->destination_zone_id != GetCurrentZone()->GetZoneID()) || GetPlayer()->GetDistance(destination->destination_x, destination->destination_y, destination->destination_z) > 100)))
			transport_list.push_back(destination);
	}
	if (transport_list.size() == 0 && destination) {
		if (destination->destination_zone_id == 0 || destination->destination_zone_id == GetCurrentZone()->GetZoneID()) {

			if (destination->type == TRANSPORT_TYPE_FLIGHT)
				SendFlightAutoMount(destination->flight_path_id, destination->mount_id, destination->mount_red_color, destination->mount_green_color, destination->mount_blue_color);
			else
			{
				EQ2Packet* app = GetPlayer()->Move(destination->destination_x, destination->destination_y, destination->destination_z, GetVersion());
				if (app)
					QueuePacket(app);
			}
		}
		else {
			ZoneServer* new_zone = zone_list.Get(destination->destination_zone_id);

			// determine if this is an instanced zone that already exists
			ZoneServer* instance_zone = GetPlayer()->GetGroupMemberInZone(destination->destination_zone_id);

			if (instance_zone || new_zone) {
				GetPlayer()->SetX(destination->destination_x);
				GetPlayer()->SetY(destination->destination_y);
				GetPlayer()->SetZ(destination->destination_z);
				GetPlayer()->SetHeading(destination->destination_heading);
				if (instance_zone)
					Zone(instance_zone->GetInstanceID(), false, true, is_spell);
				else
					Zone(new_zone, false, is_spell);
			}
		}
		if (destination->message.length() > 0)
			SimpleMessage(CHANNEL_COLOR_YELLOW, destination->message.c_str());
	}
	else if (transport_list.size() > 0) {
		if (!spawn->IsSoundsDisabled())
			PlaySound("mariner_bell");

		PacketStruct* packet = configReader.getStruct("WS_TeleportList", GetVersion());
		if (packet) {
			packet->setDataByName("spawn_id", GetPlayer()->GetIDWithPlayerSpawn(spawn));

			// Put all the destinations the player can go in a new vector
			vector<TransportDestination*> destinations;
			for (int32 i = 0; i < transport_list.size(); i++) {
				destination = transport_list.at(i);

				// Check min level
				if (destination->min_level > 0 && GetPlayer()->GetLevel() < destination->min_level)
					continue;
				// Check max level
				if (destination->max_level > 0 && GetPlayer()->GetLevel() > destination->max_level)
					continue;
				// Check quest complete
				if (destination->req_quest_complete > 0 && GetPlayer()->GetCompletedQuest(destination->req_quest_complete) == 0)
					continue;
				// Check req quest and step
				if (destination->req_quest > 0 && destination->req_quest_step > 0 && GetPlayer()->GetQuestStep(destination->req_quest) != destination->req_quest_step)
					continue;
				// If we have a map and our current location is the same as the detination and player is within 20 units from the transport set the "current" elements but don't addt to the destination list
				if (has_map && (destination->destination_zone_id == GetCurrentZone()->GetZoneID() && GetPlayer()->GetDistance(destination->destination_x, destination->destination_y, destination->destination_z) < 20)) {
					packet->setDataByName("current_zone", destination->display_name.c_str());
					packet->setDataByName("current_map_x", destination->map_x);
					packet->setDataByName("current_map_y", destination->map_y);
				}
				else {
					destinations.push_back(destination);
				}
			}

			// Use the new vector to create the packet
			destination = 0;
			packet->setArrayLengthByName("num_destinations", destinations.size());
			for (int32 i = 0; i < destinations.size(); i++) {
				destination = destinations.at(i);

				packet->setArrayDataByName("unique_id", destination->unique_id, i);
				packet->setArrayDataByName("display_name", destination->display_name.c_str(), i);
				packet->setArrayDataByName("zone_name", destination->display_name.c_str(), i);
				packet->setArrayDataByName("zone_file_name", destination->display_name.c_str(), i);
				packet->setArrayDataByName("cost", destination->cost, i);

				if (has_map) {
					packet->setArrayDataByName("map_x", destination->map_x, i);
					packet->setArrayDataByName("map_y", destination->map_y, i);
				}

			}

			if (has_map)
				packet->setDataByName("map_name", GetCurrentZone()->GetTransportMap(transport_id).c_str());
			EQ2Packet* app = packet->serialize();
			//DumpPacket(app);
			if (destinations.size() > 0)
				QueuePacket(app);
			safe_delete(packet);
		}
	}

}

void Client::ProcessTeleportLocation(EQApplicationPacket* app) {
	PacketStruct* packet = configReader.getStruct("WS_TeleportDestination", GetVersion());
	if (packet) {
		if (packet->LoadPacketData(app->pBuffer, app->size)) {
			Spawn* spawn = GetPlayer()->GetSpawnWithPlayerID(packet->getType_int32_ByName("spawn_id"));
			int32 unique_id = packet->getType_int32_ByName("unique_id");
			string zone_name = packet->getType_EQ2_16BitString_ByName("zone_name").data;
			int32 cost = packet->getType_int32_ByName("cost");
			vector<TransportDestination*> destinations;
			TransportDestination* destination = 0;
			if (this->GetTemporaryTransportID() || (spawn && spawn == transport_spawn && spawn->GetTransporterID()))
				GetCurrentZone()->GetTransporters(&destinations, this, this->GetTemporaryTransportID() ? this->GetTemporaryTransportID() : spawn->GetTransporterID());
			vector<TransportDestination*>::iterator itr;
			for (itr = destinations.begin(); itr != destinations.end(); itr++) {
				if ((*itr)->unique_id == unique_id && (*itr)->display_name == zone_name && (*itr)->cost == cost) {
					destination = *itr;
					break;
				}
			}

			SetTemporaryTransportID(0);

			if (!destination)
				SimpleMessage(CHANNEL_COLOR_RED, "Error processing transport.");
			else {
				if (cost == 0 || player->RemoveCoins(cost)) {
					if (destination->destination_zone_id == 0 || destination->destination_zone_id == GetCurrentZone()->GetZoneID()) {

						if (destination->type == TRANSPORT_TYPE_FLIGHT)
							SendFlightAutoMount(destination->flight_path_id, destination->mount_id, destination->mount_red_color, destination->mount_green_color, destination->mount_blue_color);
						else
						{
							EQ2Packet* outapp = GetPlayer()->Move(destination->destination_x, destination->destination_y, destination->destination_z, GetVersion());
							if (outapp)
								QueuePacket(outapp);
						}
					}
					else {
						GetPlayer()->SetX(destination->destination_x);
						GetPlayer()->SetY(destination->destination_y);
						GetPlayer()->SetZ(destination->destination_z);
						GetPlayer()->SetHeading(destination->destination_heading);

						// Test if where we're going is an Instanced zone
						if (!TryZoneInstance(destination->destination_zone_id, false)) {
							LogWrite(INSTANCE__DEBUG, 0, "Instance", "Attempting to zone normally");
							ZoneServer* new_zone = zone_list.Get(destination->destination_zone_id);
							Zone(new_zone, false);
						}
					}
					if (destination->message.length() > 0)
						SimpleMessage(CHANNEL_COLOR_YELLOW, destination->message.c_str());
				}
				else
					SimpleMessage(CHANNEL_COLOR_RED, "You do not have enough money to use this transport.");
			}
		}
		safe_delete(packet);
	}

}

void Client::SendNewSpells(int8 class_id) {
	if (class_id > 0) {
		vector<Spell*>* spells = master_spell_list.GetSpellListByAdventureClass(class_id, player->GetLevel(), 1);
		vector<Spell*>::iterator itr;
		Spell* spell = 0;
		bool send_updates = false;
		for (itr = spells->begin(); itr != spells->end(); itr++) {
			spell = *itr;
			if (spell && !player->HasSpell(spell->GetSpellID(), spell->GetSpellTier(), true) && spell->GetSpellData()->lua_script.length() > 0) {
				send_updates = true;
				SendSpellUpdate(spell);
				player->AddSpellBookEntry(spell->GetSpellID(), spell->GetSpellTier(), player->GetFreeSpellBookSlot(spell->GetSpellData()->spell_book_type), spell->GetSpellData()->spell_book_type, spell->GetSpellData()->linked_timer, true);
				player->UnlockSpell(spell);
			}
		}
		if (send_updates) {
			EQ2Packet* outapp = player->GetSpellBookUpdatePacket(GetVersion());
			if (outapp)
				QueuePacket(outapp);
		}
		safe_delete(spells);
	}

}

void Client::SetItemSearch(vector<Item*>* items) {
	if (items) {
		safe_delete(search_items);
		search_items = items;
	}

}

vector<Item*>* Client::GetSearchItems() {
	return search_items;
}

void Client::SearchStore(int32 page) {
	if (search_items) {
		PacketStruct* packet = configReader.getStruct("WS_BrokerItems", GetVersion());
		if (packet) {
			int32 x = page * 8;
			if (search_items->size() > 8) {
				if ((search_items->size() - x) > 8)
					packet->setArrayLengthByName("num_items", 8);
				else
					packet->setArrayLengthByName("num_items", search_items->size() - x);
			}
			else
				packet->setArrayLengthByName("num_items", search_items->size());
			if (search_items->size() > 0) {
				packet->setArrayLengthByName("num_sellers", 1);
				packet->setArrayDataByName("seller_seller_id", 1);
				packet->setArrayDataByName("seller_name", "EQ2EmuDevs");
				packet->setDataByName("per_page", 8);
				packet->setDataByName("num_pages", search_items->size() / 8 + 1);
				packet->setDataByName("page", page);
				Item* item = 0;
				int32 limit = search_items->size() > 8 ? 8 : search_items->size();
				for (int32 i = 0; i < limit; i++, x++) {
					if (x >= search_items->size())
						break;
					item = search_items->at(x);
					packet->setArrayDataByName("item_id", item->details.item_id, i);
					packet->setArrayDataByName("item_id2", item->details.item_id, i);
					packet->setArrayDataByName("icon", item->details.icon, i);
					//packet->setArrayDataByName("unknown2b", i, i);
					packet->setArrayDataByName("item_seller_id", 1, i);
					if (item->stack_count == 0)
						packet->setArrayDataByName("quantity", 1, i);
					else
						packet->setArrayDataByName("quantity", item->stack_count, i);
					packet->setArrayDataByName("stack_size", item->stack_count, i);


					std::string tmpStr("");
					tmpStr.append(item->name.c_str());
					tmpStr.append(" (");
					tmpStr.append(std::to_string(item->details.item_id));
					tmpStr.append(")");

					packet->setArrayDataByName("item_name", tmpStr.c_str(), i);
					packet->setArrayDataByName("req_level", item->generic_info.adventure_default_level, i);
					//QueuePacket(item->serialize(GetVersion(), false, GetPlayer()));
				}
			}
			/*EQ2Packet* outapp = packet->serialize();
			DumpPacket(outapp);
			QueuePacket(outapp);*/
			QueuePacket(packet->serialize());
			safe_delete(packet);
		}
	}

}

void Client::SetReadyForUpdates() {
	GetPlayer()->SetFullyLoggedIn(true);

	if (!ready_for_updates)
		database.loadCharacterProperties(this);

	ready_for_updates = true;
}

void Client::SetReadyForSpawns(bool val) {
	ready_for_spawns = val;
	if (GetPlayer()->GetActivityStatus() > 0) {
		GetPlayer()->SetActivityStatus(0);
		if (GetPlayer()->GetGroupMemberInfo()) {
			world.GetGroupManager()->GroupMessage(GetPlayer()->GetGroupMemberInfo()->group_id, "%s has returned from Linkdead.", GetPlayer()->GetName());
		}
	}
	zone_list.CheckFriendZoned(this);

}

void Client::SendChatRelationship(int8 type, const char* name) {
	if (!name) {
		return;
	}
	PacketStruct* packet = configReader.getStruct("WS_ChatRelationship", GetVersion());
	if (packet) {
		packet->setDataByName("account_id", GetAccountID());
		packet->setDataByName("type", type);
		packet->setArrayLengthByName("num_names", 1);
		packet->setArrayDataByName("name", name);
		if (type == 0) {
			Client* client = zone_list.GetClientByCharName(name);
			if (client) {
				packet->setArrayDataByName("location", client->GetCurrentZone()->GetZoneName());
				packet->setArrayDataByName("class_name", classes.GetClassName(client->GetPlayer()->GetAdventureClass()));
			}
		}
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

}

void Client::SendFriendList() {
	PacketStruct* packet = configReader.getStruct("WS_ChatRelationship", GetVersion());
	if (packet) {
		packet->setDataByName("account_id", GetAccountID());
		map<string, int8>::iterator itr;
		map<string, int8>* friends = player->GetFriends();
		if (friends && friends->size() > 0) {
			Client* client = 0;
			vector<string> names;
			for (itr = friends->begin(); itr != friends->end(); itr++) {
				if (itr->second == 2)
					continue;
				names.push_back(itr->first);
			}
			packet->setArrayLengthByName("num_names", names.size());
			for (int32 i = 0; i < names.size(); i++) {
				client = zone_list.GetClientByCharName(names[i]);
				packet->setArrayDataByName("name", names[i].c_str(), i);
				if (client) {
					packet->setArrayDataByName("location", client->GetCurrentZone()->GetZoneName(), i);
					packet->setArrayDataByName("class_name", classes.GetClassName(client->GetPlayer()->GetAdventureClass()), i);
				}
			}
		}
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

}

void Client::SendIgnoreList() {
	PacketStruct* packet = configReader.getStruct("WS_ChatRelationship", GetVersion());
	if (packet) {
		packet->setDataByName("account_id", GetAccountID());
		packet->setDataByName("type", 2);
		map<string, int8>::iterator itr;
		map<string, int8>* ignored = player->GetIgnoredPlayers();
		if (ignored && ignored->size() > 0) {
			vector<string> names;
			for (itr = ignored->begin(); itr != ignored->end(); itr++) {
				if (itr->second == 2)
					continue;
				names.push_back(itr->first);
			}
			packet->setArrayLengthByName("num_names", names.size());
			for (int32 i = 0; i < names.size(); i++)
				packet->setArrayDataByName("name", names[i].c_str(), i);
		}
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

}

void Client::AddWaypoint(string name, int8 type) { 
	waypoint_id++;
	WaypointInfo info;
	info.id = waypoint_id; 
	info.type = type;
	waypoints[name] = info;
}

void Client::SendWaypoints() {
	PacketStruct* packet = configReader.getStruct("WS_WaypointUpdate", GetVersion());
	if (packet) {
		packet->setArrayLengthByName("num_updates", waypoints.size());
		map<string, WaypointInfo>::iterator itr;
		int16 i = 0;
		for (itr = waypoints.begin(); itr != waypoints.end(); itr++) {
			packet->setArrayDataByName("waypoint_name", itr->first.c_str(), i);
			packet->setArrayDataByName("waypoint_category", itr->second.type, i);
			packet->setArrayDataByName("spawn_id", itr->second.id, i);			
			i++;
		}
		packet->setDataByName("unknown", 0xFFFFFFFF);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}
}

void Client::SelectWaypoint(int32 id) {
	string found_name = "";
	map<string, WaypointInfo>::iterator itr;
	for (itr = waypoints.begin(); itr != waypoints.end(); itr++) {
		if (itr->second.id == id) {
			found_name = itr->first;
			break;
		}
	}
	if (found_name.length() > 0) {
		Spawn* spawn = current_zone->FindSpawn(player, found_name.c_str());
		ShowPathToTarget(spawn);
	}
}

void Client::AddWaypoint(const char* waypoint_name, int8 waypoint_category, int32 spawn_id) {
	if (waypoint_name) {
		PacketStruct* packet = configReader.getStruct("WS_WaypointUpdate", GetVersion());
		if (packet) {
			packet->setArrayLengthByName("num_updates", 1);
			packet->setArrayDataByName("waypoint_name", waypoint_name, 0);
			packet->setArrayDataByName("waypoint_category", waypoint_category, 0);
			packet->setArrayDataByName("spawn_id", spawn_id, 0);
			packet->setArrayDataByName("waypoint_category2", waypoint_category, 0);
			packet->setArrayDataByName("spawn_id2", spawn_id, 0);
			packet->setDataByName("unknown", 0xFFFFFFFF); 
			QueuePacket(packet->serialize());
			safe_delete(packet);
		}
	}
}

void Client::ClearWaypoint() {
	PacketStruct* packet = configReader.getStruct("WS_GlowPath", GetVersion());
	if (packet) {
		QueuePacket(packet->serialize());
		safe_delete(packet);		
	}
}

bool Client::ShowPathToTarget(float x, float y, float z, float y_offset) {
	if (current_zone->pathing) {
		if (GetPlayer()->GetMap()) {
			if (x < GetPlayer()->GetMap()->GetMinX() || x > GetPlayer()->GetMap()->GetMaxX())
				return false;
			if (z < GetPlayer()->GetMap()->GetMinZ() || z > GetPlayer()->GetMap()->GetMaxZ())
				return false;
			auto loc = glm::vec3(x, z, y);
			float new_z = GetPlayer()->GetMap()->FindBestZ(loc, nullptr);
			if (new_z != BEST_Z_INVALID) //this is actually y
				y = new_z;
		}
		bool partial = false;
		bool stuck = false;
		PathfinderOptions opts;
		opts.smooth_path = true;
		opts.step_size = 100.0f;//RuleR(Pathing, NavmeshStepSize);
		opts.offset = y_offset + 1.0f;
		opts.flags = PathingNotDisabled ^ PathingZoneLine;
		PacketStruct* packet = configReader.getStruct("WS_GlowPath", GetVersion());
		if (packet) {
			auto path = current_zone->pathing->FindPath(glm::vec3(player->GetX(), player->GetZ(), player->GetY()), glm::vec3(x, z, y), partial, stuck, opts);
			packet->setArrayLengthByName("num_points", path.size());
			int i = 0;
			for (auto& node : path)
			{
				packet->setArrayDataByName("x", node.pos.x, i);
				packet->setArrayDataByName("y", node.pos.z, i);
				packet->setArrayDataByName("z", node.pos.y, i);
				packet->setDataByName("waypoint_x", x);
				packet->setDataByName("waypoint_y", y);
				packet->setDataByName("waypoint_z", z);
				i++;
			}
			if (i > 0)
				QueuePacket(packet->serialize());
			safe_delete(packet);
			return (i > 0);
		}
	}
	return false;
}

bool Client::ShowPathToTarget(Spawn* spawn) {
	if (spawn) {
		return ShowPathToTarget(spawn->GetX(), spawn->GetY(), spawn->GetZ(), spawn->GetYOffset());	
	}
	return false;
}

void Client::BeginWaypoint(const char* waypoint_name, float x, float y, float z) {
	if (waypoint_name) {
		PacketStruct* packet = configReader.getStruct("WS_GlowPath", GetVersion());
		if (packet) {
			packet->setArrayLengthByName("num_points", 1);
			packet->setArrayDataByName("x", x, 0);
			packet->setArrayDataByName("y", y, 0);
			packet->setArrayDataByName("z", z, 0);
			packet->setDataByName("waypoint_x", x);
			packet->setDataByName("waypoint_y", y);
			packet->setDataByName("waypoint_z", z);
			packet->setDataByName("waypoint_name", waypoint_name);
			packet->setDataByName("unknown", 0);
			QueuePacket(packet->serialize());
			safe_delete(packet);
		}
	}

}

void Client::InspectPlayer(Player* player_to_inspect) {
	if (player_to_inspect) {
		PacketStruct* packet = configReader.getStruct("WS_InspectPlayer", GetVersion());
		if (packet) {
			packet->setDataByName("unknown", 0);
			packet->setSmallStringByName("name", player_to_inspect->GetName());
			packet->setDataByName("race", player_to_inspect->GetRace());
			packet->setDataByName("gender", player_to_inspect->GetGender());
			packet->setDataByName("adventure_level", player_to_inspect->GetLevel());

			LogWrite(MISC__TODO, 1, "TODO", "Put mentored level here (adventure_level_effective)\nfile: %s, func: %s, line: %i", __FILE__, __FUNCTION__, __LINE__);

			packet->setDataByName("adventure_level_effective", player_to_inspect->GetLevel());
			packet->setDataByName("adventure_class", player_to_inspect->GetAdventureClass());
			packet->setDataByName("tradeskill_level", player_to_inspect->GetTSLevel());
			packet->setDataByName("tradeskill_class", player_to_inspect->GetTradeskillClass());
			packet->setDataByName("health", player_to_inspect->GetHP());
			packet->setDataByName("health_max", player_to_inspect->GetTotalHP());
			packet->setDataByName("health_base", player_to_inspect->GetTotalHPBase());
			packet->setDataByName("power", player_to_inspect->GetPower());
			packet->setDataByName("power_max", player_to_inspect->GetTotalPower());
			packet->setDataByName("power_base", player_to_inspect->GetTotalPowerBase());
			packet->setDataByName("mitigation", 0);
			packet->setDataByName("unknown1", 0);
			packet->setDataByName("avoidance", player_to_inspect->GetInfoStruct()->get_cur_avoidance());
			packet->setDataByName("unknown2", 0);
			packet->setDataByName("mitigation_percentage", 0);
			packet->setDataByName("strength", player_to_inspect->GetStr());
			packet->setDataByName("strength_base", player_to_inspect->GetStrBase());
			packet->setDataByName("stamina", player_to_inspect->GetSta());
			packet->setDataByName("stamina_base", player_to_inspect->GetStaBase());
			packet->setDataByName("agility", player_to_inspect->GetAgi());
			packet->setDataByName("agility_base", player_to_inspect->GetAgiBase());
			packet->setDataByName("wisdom", player_to_inspect->GetWis());
			packet->setDataByName("wisdom_base", player_to_inspect->GetWisBase());
			packet->setDataByName("intelligence", player_to_inspect->GetInt());
			packet->setDataByName("intelligence_base", player_to_inspect->GetIntBase());
			packet->setDataByName("unknown4", 0);
			packet->setDataByName("unknown5", 0);
			packet->setDataByName("unknown6", 0);
			packet->setDataByName("unknown7", 0);
			packet->setDataByName("unknown8", 0);
			packet->setDataByName("unknown9", 0);
			packet->setDataByName("unknown10", 0);
			packet->setDataByName("unknown11", 0);
			packet->setDataByName("unknown12", 0);
			packet->setDataByName("heat_resist", player_to_inspect->GetHeatResistance());
			packet->setDataByName("heat_resist_base", player_to_inspect->GetHeatResistanceBase());
			packet->setDataByName("heat_resist_percentage", 0);
			packet->setDataByName("cold_resist", player_to_inspect->GetColdResistance());
			packet->setDataByName("cold_resist_base", player_to_inspect->GetColdResistanceBase());
			packet->setDataByName("cold_resist_percentage", 0);
			packet->setDataByName("magic_resist", player_to_inspect->GetMagicResistance());
			packet->setDataByName("magic_resist_base", player_to_inspect->GetMagicResistanceBase());
			packet->setDataByName("magic_resist_percentage", 0);
			packet->setDataByName("mental_resist", player_to_inspect->GetMentalResistance());
			packet->setDataByName("mental_resist_base", player_to_inspect->GetMentalResistanceBase());
			packet->setDataByName("mental_resist_percentage", 0);
			packet->setDataByName("divine_resist", player_to_inspect->GetDivineResistance());
			packet->setDataByName("divine_resist_base", player_to_inspect->GetDivineResistanceBase());
			packet->setDataByName("divine_resist_percentage", 0);
			packet->setDataByName("disease_resist", player_to_inspect->GetDiseaseResistance());
			packet->setDataByName("disease_resist_base", player_to_inspect->GetDiseaseResistanceBase());
			packet->setDataByName("disease_resist_percentage", 0);
			packet->setDataByName("poison_resist", player_to_inspect->GetPoisonResistance());
			packet->setDataByName("poison_resist_base", player_to_inspect->GetPoisonResistanceBase());
			packet->setDataByName("poison_resist_percentage", 0);
			packet->setArrayLengthByName("num_chars", 0x01FF);
			string biography = player_to_inspect->GetBiography();
			for (size_t i = 0; i < biography.length(); i++)
				packet->setArrayDataByName("biography_char", biography[i], i);

			LogWrite(MISC__TODO, 0, "TODO", "Why is inspect player weapons commented out? in func: %s, line: %i", __FUNCTION__, __LINE__);
			/*Item* pw = player_to_inspect->GetEquipmentList()->GetItem(0);
			if (pw)
				packet->setItemByName("primary", pw, player_to_inspect, 0);
			Item* sw = player_to_inspect->GetEquipmentList()->GetItem(1);
			if (sw)
				packet->setItemByName("secondary", sw, player_to_inspect, 0);*/
				//DumpPacket(packet->serialize());
			QueuePacket(packet->serialize());
			safe_delete(packet);
		}
	}

}

void Client::SetPendingGuildInvite(Guild* guild, Player* invited_by) {
	pending_guild_invite.guild = guild;
	pending_guild_invite.invited_by = invited_by;
}

void Client::ShowClaimWindow() {
	PacketStruct* packet = configReader.getStruct("WS_PromoFlagsDetails", GetVersion());
	if (packet) {
		map<int32, Item*>* items = &master_item_list.items;
		map<int32, Item*>::iterator itr;
		int32 i = 0;
		if (items->size() > 10)
			packet->setArrayLengthByName("num_claim_items", 10);
		else
			packet->setArrayLengthByName("num_claim_items", items->size());
		for (itr = items->begin(); itr != items->end(); itr++) {
			if (i == 10)
				break;
			Item* item = itr->second;
			packet->setArrayDataByName("id", i, i);
			packet->setArrayDataByName("not_yet_claimed", 1, i);
			packet->setArrayDataByName("num_remaining", 5, i);
			packet->setArrayDataByName("one_per_character", 1, i);
			packet->setArrayDataByName("claimed_on_this_char", 0, i);
			packet->setArrayDataByName("item_name", item->name.c_str(), i);
			packet->setArrayDataByName("text", "If you ever see this text, let Scatman know, thanks! :)", i);
			packet->setArrayDataByName("category", "Scott's Shit", i);
			packet->setArrayDataByName("icon", item->details.icon, i);
			packet->setArrayDataByName("item_id", item->details.item_id, i);
			i++;
		}
		packet->setDataByName("unknown3", 1);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

}

void Client::ShowGuildSearchWindow() {
	PacketStruct* packet = configReader.getStruct("WS_GuildRecruiting", GetVersion());
	if (packet) {
		MutexMap<int32, Guild*>* guilds = guild_list.GetGuilds();
		MutexMap<int32, Guild*>::iterator itr = guilds->begin();
		packet->setArrayLengthByName("num_guilds", guilds->size());
		int32 i = 0;
		while (itr.Next()) {
			Guild* guild = itr.second;
			packet->setArrayDataByName("guild_id", guild->GetID(), i);
			packet->setArrayDataByName("guild_name", guild->GetName(), i);
			packet->setArrayDataByName("recruiting_short_description", guild->GetRecruitingShortDesc().c_str(), i);
			packet->setArrayDataByName("descriptive_tag1", guild->GetRecruitingDescTag(0), i);
			packet->setArrayDataByName("descriptive_tag2", guild->GetRecruitingDescTag(1), i);
			packet->setArrayDataByName("descriptive_tag3", guild->GetRecruitingDescTag(2), i);
			packet->setArrayDataByName("descriptive_tag4", guild->GetRecruitingDescTag(3), i);
			packet->setArrayDataByName("playstyle", guild->GetRecruitingPlayStyle(), i);
			packet->setArrayDataByName("looking_for", guild->GetRecruitingLookingForPacketValue(), i); //tradeskillers, fighters, new
			packet->setArrayDataByName("unknown7", 0x02, i);
			packet->setArrayDataByName("min_level", guild->GetRecruitingMinLevel(), i);
			i++;
		}
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

}

void Client::ShowDressingRoom(Item* item, sint32 crc) {
	PacketStruct* packet;
	vector<int8>* slot_data;
	vector<int8>::iterator itr;
	int32 slots = 0;

	assert(item);

	if (!(packet = configReader.getStruct("WS_DressingRoom", GetVersion()))) {
		return;
	}

	slot_data = &item->slot_data;
	for (itr = slot_data->begin(); itr != slot_data->end(); itr++) {
		if (version >= 1188)
			slots = *itr;
		else
			slots += (int8)pow(2.0, *itr);
	}

	packet->setDataByName("slot", slots);
	packet->setDataByName("appearance_id", item->generic_info.appearance_id);
	if (slots == 2) {
		packet->setDataByName("rgb", item->generic_info.appearance_red, 2);
		packet->setDataByName("rgb", item->generic_info.appearance_blue, 0);
	}
	else {
		packet->setDataByName("rgb", item->generic_info.appearance_red, 0);
		packet->setDataByName("rgb", item->generic_info.appearance_blue, 2);
	}
	packet->setDataByName("rgb", item->generic_info.appearance_green, 1);
	if (slots == 4) {
		packet->setDataByName("highlight_rgb", item->generic_info.appearance_highlight_red, 2);
		packet->setDataByName("highlight_rgb", item->generic_info.appearance_highlight_green, 1);
		packet->setDataByName("highlight_rgb", item->generic_info.appearance_highlight_blue, 0);
	}
	else if (slots == 7) {
		packet->setDataByName("highlight_rgb", item->generic_info.appearance_highlight_red, 1);
		packet->setDataByName("highlight_rgb", item->generic_info.appearance_highlight_green, 0);
		packet->setDataByName("highlight_rgb", item->generic_info.appearance_highlight_blue, 2);
	}
	else {
		packet->setDataByName("highlight_rgb", item->generic_info.appearance_highlight_red, 0);
		packet->setDataByName("highlight_rgb", item->generic_info.appearance_highlight_green, 1);
		packet->setDataByName("highlight_rgb", item->generic_info.appearance_highlight_blue, 2);
	}
	packet->setDataByName("icon", item->details.icon);
	packet->setDataByName("item_id", item->details.item_id);
	packet->setDataByName("item_crc", crc);
	packet->setDataByName("unknown2", 0xFFFFFFFF);
	packet->setDataByName("unknown4", 0xFFFFFFFF);
	packet->setDataByName("unknown5", 0xFF, 9);
	packet->setDataByName("unknown5", 0xFF, 10);
	QueuePacket(packet->serialize());
	safe_delete(packet);

}

void Client::SendCollectionList() {
	map<int32, Collection*>* collections = player->GetCollectionList()->GetCollections();
	map<int32, Collection*>::iterator itr;
	vector<struct CollectionItem*>* collection_items;
	Collection* collection;
	struct CollectionItem* collection_item;
	PacketStruct* packet = 0;
	int16 i = 0, j;

	if (!(packet = configReader.getStruct("WS_CollectionUpdate", version)))
		return;

	packet->setArrayLengthByName("num_collections", collections->size());
	for (itr = collections->begin(); itr != collections->end(); itr++) {
		collection = itr->second;
		collection_items = collection->GetCollectionItems();

		packet->setArrayDataByName("unknown", 1, i);
		packet->setArrayDataByName("collection_name", collection->GetName(), i);
		packet->setArrayDataByName("collection_category", collection->GetCategory(), i);
		packet->setArrayDataByName("completed", collection->GetCompleted(), i);
		packet->setArrayDataByName("collection_id", collection->GetID(), i);
		packet->setArrayDataByName("level", collection->GetLevel(), i);
		packet->setArrayDataByName("ready_to_turn_in", collection->GetIsReadyToTurnIn(), i);
		packet->setSubArrayLengthByName("num_items", collection_items->size(), i);

		for (j = 0; j < collection_items->size(); j++) {
			collection_item = collection_items->at(j);
			Item* item = master_item_list.GetItem(collection_item->item);
			if (item) {
				packet->setSubArrayDataByName("item_icon", item->details.icon, i, j);
				if (version < 955)
					packet->setSubArrayDataByName("item_name", item->name.c_str(), i, j);
				else
					packet->setSubArrayDataByName("item_id", item->details.item_id, i, j);
			}
			packet->setSubArrayDataByName("item_flag", collection_item->found, i, j);
		}
		i++;
	}

	packet->setDataByName("new_collection_flag", 1);

	QueuePacket(packet->serialize());
	safe_delete(packet);

}

bool Client::SendCollectionsForItem(Item* item) {
	map<int32, Collection*> collections_to_send;
	map<int32, Collection*>* collections;
	map<int32, Collection*>::iterator itr;
	vector<struct CollectionItem*>* collection_items;
	Collection* collection;
	struct CollectionItem* collection_item;
	PacketStruct* packet;
	int16 i;

	assert(item);

	/* get any collections required by this item that the player already has */
	collections = player->GetCollectionList()->GetCollections();
	for (itr = collections->begin(); itr != collections->end(); itr++) {
		collection = itr->second;
		if (!collection->GetCompleted() && !collection->GetIsReadyToTurnIn() && collection->NeedsItem(item)) {
			LogWrite(COLLECTION__DEBUG, 0, "Collect", "Adding collection from player list %u\n", collection->GetID());
			collections_to_send[collection->GetID()] = collection;
		}
	}

	/* get any collections required by this item that the player does not have and send it to the client */
	collections = master_collection_list.GetCollections();
	for (itr = collections->begin(); itr != collections->end(); itr++) {
		collection = itr->second;
		if (collection->NeedsItem(item) && !player->GetCollectionList()->GetCollection(collection->GetID())) {
			if (!(packet = configReader.getStruct("WS_CollectionUpdate", version))) {
				return false;
			}

			packet->setArrayLengthByName("num_collections", 1);
			packet->setArrayDataByName("unknown", 1, 0);
			packet->setArrayDataByName("collection_name", collection->GetName(), 0);
			packet->setArrayDataByName("collection_category", collection->GetCategory(), 0);
			packet->setArrayDataByName("completed", 0, 0);
			packet->setArrayDataByName("collection_id", collection->GetID(), 0);
			packet->setArrayDataByName("level", collection->GetLevel(), 0);
			packet->setArrayDataByName("ready_to_turn_in", 0, 0);
			packet->setArrayDataByName("unknown3", 0x28, 0);

			collection_items = collection->GetCollectionItems();
			packet->setSubArrayLengthByName("num_items", collection_items->size(), 0);
			for (i = 0; i < collection_items->size(); i++) {
				collection_item = collection_items->at(i);
				Item* item2 = master_item_list.GetItem(collection_item->item);
				if (item2) {
					packet->setSubArrayDataByName("item_icon", item2->details.icon, 0, i);
					if (version < 955)
						packet->setSubArrayDataByName("item_name", item2->name.c_str(), 0, i);
					else
						packet->setSubArrayDataByName("item_id", item2->details.item_id, 0, i);
					packet->setSubArrayDataByName("item_flag", collection_item->found, 0, i);
				}
			}
			packet->setDataByName("new_collection_flag", 0);

			QueuePacket(packet->serialize());
			safe_delete(packet);

			LogWrite(COLLECTION__DEBUG, 0, "Collect", "Adding collection from master list %u\n", collection->GetID());
			collections_to_send[collection->GetID()] = collection;
		}
	}

	/* send the client a list of collections that should be filtered for this item */
	if (collections_to_send.size() > 0) {
		if (!(packet = configReader.getStruct("WS_CollectionFilter", version))) {
			return false;
		}

		i = 0;
		packet->setArrayLengthByName("num_filters", collections_to_send.size());
		for (itr = collections_to_send.begin(); itr != collections_to_send.end(); itr++) {
			collection = itr->second;

			packet->setArrayDataByName("collection_id", collection->GetID(), i);
			packet->setArrayDataByName("collection_item_num", collection->GetCollectionItemByItemID(item->details.item_id)->index, i);
			i++;
		}

		packet->setDataByName("item_icon", item->details.icon);
		packet->setDataByName("item_name", item->name.c_str());
		packet->setDataByName("item_id", item->details.item_id);
		packet->setDataByName("unknown3", player->GetCollectionList()->Size());

		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	return collections_to_send.size() > 0;
}

void Client::HandleCollectionAddItem(int32 collection_id, Item* item) {
	Collection* collection;
	struct CollectionItem* collection_item;
	PacketStruct* packet;
	char tmp[200] = { 0 };

	assert(item);

	/* first try to get the collection from the player's collection list. if it's not found, get it from the master list */
	if ((collection = player->GetCollectionList()->GetCollection(collection_id))) {

		/* get the item struct that represents the item for this collection */
		if (!(collection_item = collection->GetCollectionItemByItemID(item->details.item_id))) {
			SendCollectionList();
			LogWrite(COLLECTION__ERROR, 0, "Collect", "Error in Client::HandleCollectionAddItem. Could not find item '%s' required by collection '%s'", item->name.c_str(), collection->GetName());
			return;
		}

		/* sanity check */
		if (collection_item->found) {
			SendCollectionList();
			LogWrite(COLLECTION__ERROR, 0, "Collect", "Error in Client::HandleCollectionAddItem. Player '%s' has already found item '%s' for collection '%s'", player->GetName(), item->name.c_str(), collection->GetName());
			return;
		}
	}
	else if ((collection = master_collection_list.GetCollection(collection_id))) {
		collection = new Collection(collection);

		/* get the item struct that represents the item for this collection */
		if (!(collection_item = collection->GetCollectionItemByItemID(item->details.item_id))) {
			SendCollectionList();
			LogWrite(COLLECTION__ERROR, 0, "Collect", "Error in Client::HandleCollectionAddItem. Could not find item '%s' required by collection '%s'", item->name.c_str(), collection->GetName());
			safe_delete(collection);
			return;
		}

		/* add the new collection to the player's collection list */
		if (!player->GetCollectionList()->AddCollection(collection)) {
			SendCollectionList();
			LogWrite(COLLECTION__ERROR, 0, "Collect", "Error in Client::HandleCollectionAddItem. Player '%s' already has collection '%s'", player->GetName(), collection->GetName());
			safe_delete(collection);
			return;
		}
	}
	else {
		LogWrite(COLLECTION__ERROR, 0, "Collect", "Error in Client::HandleCollectionAddItem. Could not find collection with id %u", collection_id);
		return;
	}

	collection_item->found = 1;
	collection->SetSaveNeeded(true);

	if (!(packet = configReader.getStruct("WS_CollectionItem", version))) {
		SendCollectionList();
		LogWrite(COLLECTION__ERROR, 0, "Collect", "Error in Client::HandleCollectionAddItem. Could not find struct 'WS_CollectionItem'");
		return;
	}

	packet->setDataByName("collection_id", collection_id);
	packet->setDataByName("collection_item_num", collection_item->index);
	packet->setDataByName("add", 1);
	QueuePacket(packet->serialize());
	Item* item2 = master_item_list.GetItem(collection_item->item);
	if (item2) {
		Message(CHANNEL_COLOR_YELLOW, "You added: %s to %s", item2->name.c_str(), collection->GetName());
		sprintf(tmp, "You added: %s to %s", item2->name.c_str(), collection->GetName());
		SendPopupMessage(5, tmp, "quest_item", 3.5, 0x64, 0xFF, 0xFF);
	}
	safe_delete(packet);

	RemoveItem(item, 1);
	SendCollectionList();

}

void Client::DisplayCollectionComplete(Collection* collection) {
	vector<struct CollectionRewardItem*>* reward_items;
	vector<struct CollectionRewardItem*>* selectable_reward_items;
	struct CollectionRewardItem* reward_item;
	PacketStruct* packet;
	int32 i;

	assert(collection);

	if (!(packet = configReader.getStruct("WS_QuestComplete", version))) {
		return;
	}

	reward_items = collection->GetRewardItems();
	selectable_reward_items = collection->GetSelectableRewardItems();

	packet->setDataByName("title", "Quest Reward!");
	packet->setDataByName("name", collection->GetName());
	packet->setDataByName("description", collection->GetCategory());
	packet->setDataByName("level", collection->GetLevel());
	packet->setDataByName("max_coin", collection->GetRewardCoin());
	packet->setDataByName("min_coin", collection->GetRewardCoin());
	//packet->setDataByName("status_points", quest->GetStatusPoints());
	packet->setArrayLengthByName("num_rewards", reward_items->size());
	for (i = 0; i < reward_items->size(); i++) {
		reward_item = reward_items->at(i);
		if(!reward_item->item)
		{
			LogWrite(DATABASE__ERROR, 0, "Database", "DisplayCollectionComplete Collection %s (%u) num_rewards has missing item in slot %u", collection->GetName(), collection->GetID(), i);
			Message(CHANNEL_COLOR_RED, "DisplayCollectionComplete Collection %s (%u) num_rewards has missing item in slot %u", collection->GetName(), collection->GetID(), i);
			continue;
		}

		packet->setArrayDataByName("reward_id", reward_item->item->details.item_id, i);
		if (version < 860)
			packet->setItemArrayDataByName("item", reward_item->item, player, i, 0, -1);
		else if (version < 1193)
			packet->setItemArrayDataByName("item", reward_item->item, player, i);
		else
			packet->setItemArrayDataByName("item", reward_item->item, player, i, 0, 2);
	}
	packet->setArrayLengthByName("num_select_rewards", selectable_reward_items->size());
	for (i = 0; i < selectable_reward_items->size(); i++) {
		reward_item = selectable_reward_items->at(i);
		if(!reward_item->item)
		{
			LogWrite(DATABASE__ERROR, 0, "Database", "DisplayCollectionComplete Collection %s (%u) num_select_rewards has missing item in slot %u", collection->GetName(), collection->GetID(), i);
			Message(CHANNEL_COLOR_RED, "DisplayCollectionComplete Collection %s (%u) num_select_rewards has missing item in slot %u", collection->GetName(), collection->GetID(), i);
			continue;
		}

		packet->setArrayDataByName("select_reward_id", reward_item->item->details.item_id, i);
		if (version < 860)
			packet->setItemArrayDataByName("select_item", reward_item->item, player, i, 0, -1);
		else if (version < 1193)
			packet->setItemArrayDataByName("select_item", reward_item->item, player, i);
		else
			packet->setItemArrayDataByName("select_item", reward_item->item, player, i, 0, 2);
	}

	QueuePacket(packet->serialize());
	safe_delete(packet);

}

void Client::HandInCollections() {
	map<int32, Collection*>* collections;
	map<int32, Collection*>::iterator itr;
	Collection* collection;

	/* only show 1 collection reward dialog at a time */
	if (player->GetPendingCollectionReward()) {
		return;
	}

	collections = player->GetCollectionList()->GetCollections();

	/* we only want to display 1 collection reward dialog at a time. so once we find one to display, send it and return. once the player accepts the reward
	for this collection, this function gets called again and the process repeats until there are no more collections to hand in */
	for (itr = collections->begin(); itr != collections->end(); itr++) {
		collection = itr->second;
		if (collection->GetIsReadyToTurnIn()) {
			player->SetPendingCollectionReward(collection);
			DisplayCollectionComplete(collection);

			return;
		}
	}

}

void Client::AcceptCollectionRewards(Collection* collection, int32 selectable_item_id) {
	vector<struct CollectionRewardItem*>* reward_items;
	vector<struct CollectionRewardItem*>::iterator itr;
	struct CollectionRewardItem* reward_item;
	int16 num_slots_needed;
	int16 num_slots;

	assert(collection);

	reward_items = collection->GetRewardItems();
	num_slots_needed = (int16)reward_items->size();
	if (selectable_item_id > 0)
		num_slots_needed++;

	num_slots = player->GetPlayerItemList()->GetNumberOfFreeSlots();
	if (num_slots < num_slots_needed) {
		SimpleMessage(CHANNEL_COLOR_RED, "You do not have enough free slots. Free up some slots and try again");
		HandInCollections();

		return;
	}

	/* add manditory items */
	for (itr = reward_items->begin(); itr != reward_items->end(); itr++) {
		reward_item = *itr;
		AddItem(reward_item->item->details.item_id, reward_item->quantity);
	}

	/* find and add the selectable item if there's one */
	if (selectable_item_id > 0) {
		reward_items = collection->GetSelectableRewardItems();
		for (itr = reward_items->begin(); itr != reward_items->end(); itr++) {
			reward_item = *itr;
			if (reward_item->item->details.item_id == selectable_item_id) {
				AddItem(reward_item->item->details.item_id, reward_item->quantity);
				break;
			}
		}
	}

	if (collection->GetRewardXP() > 0) {
		player->AddXP((int32)collection->GetRewardXP());
		SimpleMessage(CHANNEL_COLOR_YELLOW, "You gain experience!");
	}
	if (collection->GetRewardCoin() > 0) {
		player->AddCoins(collection->GetRewardCoin());
		Message(CHANNEL_COLOR_YELLOW, "You receive %s", GetCoinMessage(collection->GetRewardCoin()).c_str());
	}

	collection->SetCompleted(true);
	//update achievements for completeing collection here
	collection->SetSaveNeeded(true);
	SendCollectionList();

	/* reset the pending collection reward and check for my collections that the player needs to hand in */
	player->SetPendingCollectionReward(0);
	HandInCollections();

}

void Client::SendRecipeList() {
	PacketStruct* packet = 0;
	if (GetRecipeListSent()) {
		return;
	}

	if (!(packet = configReader.getStruct("WS_RecipeList", version))) {
		return;
	}
	map<int32, Recipe*>* recipes = player->GetRecipeList()->GetRecipes();
	map<int32, Recipe*>::iterator itr;
	Recipe* recipe;
	int16 i = 0;

	packet->setArrayLengthByName("num_recipes", recipes->size());
	for (itr = recipes->begin(); itr != recipes->end(); itr++) {
		recipe = itr->second;
		packet->setArrayDataByName("id", recipe->GetID(), i);
		packet->setArrayDataByName("tier", recipe->GetTier(), i);
		packet->setArrayDataByName("level", recipe->GetLevel(), i);
		packet->setArrayDataByName("icon", recipe->GetIcon(), i);
		packet->setArrayDataByName("classes", recipe->GetClasses(), i);
		packet->setArrayDataByName("skill", recipe->GetSkill(), i);
		packet->setArrayDataByName("technique", recipe->GetTechnique(), i);
		packet->setArrayDataByName("knowledge", recipe->GetKnowledge(), i);
		packet->setArrayDataByName("unknown2", recipe->GetUnknown2(), i);
		packet->setArrayDataByName("recipe_name", recipe->GetName(), i);
		packet->setArrayDataByName("recipe_book", recipe->GetBook(), i);
		packet->setArrayDataByName("unknown3", recipe->GetUnknown3(), i);
		i++;
	}
	//packet->PrintPacket();
	//DumpPacket(packet->serialize());
	QueuePacket(packet->serialize());
	safe_delete(packet);

	SetRecipeListSent(true);
}

void Client::ShowRecipeBook() {
	PacketStruct* packet = 0;
	Spawn* target = 0;
	if (!(target = player->GetTarget())) {
		SimpleMessage(CHANNEL_COLOR_YELLOW, "You do not have a tradeskill device targeted");
		return;
	}
	if (!target->IsObject()) {
		return;
	}

	if (!(packet = configReader.getStruct("WS_ShowRecipeBook", version))) {
		return;
	}

	packet->setDataByName("device", target->GetName());
	packet->setDataByName("unknown1", 1);

	if (((Object*)target)->GetDeviceID() > 0) {
		int32 deviceID = (int32)pow(2.0, (double)((Object*)target)->GetDeviceID());
		//LogWrite(TRADESKILL__ERROR, 0, "Tradeskills", "GetDeviceID() = %u, deviceID = %u", ((Object*)target)->GetDeviceID(), deviceID);
		packet->setDataByName("unknown2", 8);
		packet->setDataByName("unknown3", deviceID);
	}

	//packet->PrintPacket();
	QueuePacket(packet->serialize());
	safe_delete(packet);
}

void Client::SendTitleUpdate() {
	// must call release read lock before leaving function on GetPlayerTitles
	vector<Title*>* titles = player->GetPlayerTitles()->GetAllTitles();
	vector<Title*>::iterator itr;
	Title* title;
	sint32 i = 0;
	sint32 prefix_index = database.GetCharPrefixIndex(GetCharacterID(), player);
	sint32 suffix_index = database.GetCharSuffixIndex(GetCharacterID(), player);
	PacketStruct* packet = configReader.getStruct("WS_TitleUpdate", GetVersion());
	if (packet) {
		packet->setArrayLengthByName("num_titles", titles->size());
		for (itr = titles->begin(); itr != titles->end(); itr++) {
			title = *itr;
			packet->setArrayDataByName("title", title->GetName(), i);
			packet->setArrayDataByName("prefix", title->GetPrefix(), i);
			i++;
		}
		packet->setDataByName("current_prefix", prefix_index);
		packet->setDataByName("current_suffix", suffix_index);

		LogWrite(CCLIENT__PACKET, 0, "Client", "Dump/Print Packet in func: %s, line: %i", __FUNCTION__, __LINE__);
#if EQDEBUG >= 9
		packet->PrintPacket();
#endif

		QueuePacket(packet->serialize());
		safe_delete(packet);
		SendUpdateTitles(prefix_index, suffix_index);
	}
	player->GetPlayerTitles()->ReleaseReadLock();
}

void Client::SendUpdateTitles(sint32 prefix, sint32 suffix) {
	Title* suffix_title = 0;
	Title* prefix_title = 0;
	if (suffix != -1) {
		suffix_title = player->GetPlayerTitles()->GetTitle(suffix);
		if(suffix_title)
			strcpy(player->appearance.suffix_title, suffix_title->GetName());
	}
	else
		memset(player->appearance.suffix_title, 0, strlen(player->appearance.suffix_title));
	if (prefix != -1) {
		prefix_title = player->GetPlayerTitles()->GetTitle(prefix);
		if(prefix_title)
			strcpy(player->appearance.prefix_title, prefix_title->GetName());
	}
	else
		memset(player->appearance.prefix_title, 0, strlen(player->appearance.prefix_title));

	current_zone->SendUpdateTitles(this, suffix_title, prefix_title);
}

void Client::SendLanguagesUpdate(int32 id) {
	list<Language*>* languages = player->GetPlayerLanguages()->GetAllLanguages();
	list<Language*>::iterator itr;
	Language* language;
	int32 i = 0;
	PacketStruct* packet = configReader.getStruct("WS_Languages", GetVersion());
	if (packet) {
		packet->setArrayLengthByName("num_languages", languages->size());
		for (itr = languages->begin(); itr != languages->end(); itr++) {
			language = *itr;
			packet->setArrayDataByName("language_id", language->GetID(), i);
			i++;
		}
		packet->setDataByName("current_language", id);

		LogWrite(CCLIENT__PACKET, 0, "Client", "Dump/Print Packet in func: %s, line: %i", __FUNCTION__, __LINE__);
#if EQDEBUG >= 9
		packet->PrintPacket();
#endif
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}
}

void Client::SendPetOptionsWindow(const char* pet_name, int8 type) {
	PacketStruct* packet = configReader.getStruct("WS_PetOptions", GetVersion());
	if (packet) {
		if (pet_name)
			packet->setDataByName("pet_name", pet_name);
		if (player->GetInfoStruct()->get_pet_behavior() & 1)
			packet->setDataByName("protect_master", 1);
		if (player->GetInfoStruct()->get_pet_behavior() & 2)
			packet->setDataByName("protect_self", 1);
		if (player->GetInfoStruct()->get_pet_movement() == 2)
			packet->setDataByName("stay_follow_toggle", 1);

		packet->setDataByName("pet_type", type);

		QueuePacket(packet->serialize());
	}

	safe_delete(packet);
}

bool Client::IsCrafting() {
	return current_zone->GetTradeskillMgr()->IsClientCrafting(this);
}

void Client::SendBiography() {
	PacketStruct* packet = configReader.getStruct("WS_BioUpdate", GetVersion());
	if (packet) {
		char biography[512];
		if(player->GetInfoStruct()->get_biography().size() < 1)
		{
			safe_delete(packet);
			return;
		}
		else
		{
			int16 size = player->GetInfoStruct()->get_biography().size();
			if(size>511)
				size = 511;
			
			strncpy(biography, player->GetInfoStruct()->get_biography().c_str(), player->GetInfoStruct()->get_biography().size());
			biography[player->GetInfoStruct()->get_biography().size()] = '\0';
		}
		packet->setDataByName("biography", biography);

		QueuePacket(packet->serialize());
	}

	safe_delete(packet);
}

PendingResurrection* Client::GetCurrentRez() {
	return &current_rez;
}

Mutex* Client::GetResurrectMutex() {
	return &m_resurrect;
}

void Client::SendResurrectionWindow() {
	Spawn* caster = current_rez.caster;
	if (!caster || !player)
		return;

	PacketStruct* packet = configReader.getStruct("WS_ChoiceWindow", GetVersion());
	if (!packet)
		return;

	char* tmp = new char[512];
	sprintf(tmp, "%s would like to cast '%s' on you. Do you accept?", caster->GetName(), current_rez.spell_name.c_str());

	packet->setMediumStringByName("text", tmp);
	packet->setMediumStringByName("accept_text", "Yes");
	packet->setMediumStringByName("cancel_text", "No");

	sprintf(tmp, "accept_resurrection %u", player->GetID());
	packet->setMediumStringByName("accept_command", tmp);

	sprintf(tmp, "decline_resurrection %u", player->GetID());
	packet->setMediumStringByName("cancel_command", tmp);
	packet->setDataByName("time", current_rez.expire_timer->GetRemainingTime() / 1000);
	QueuePacket(packet->serialize());
	safe_delete(packet);
	safe_delete_array(tmp);
}

void Client::AcceptResurrection() {
	Spawn* caster = current_rez.caster;
	if (!player || !caster)
		return;

	if (player->Alive())
		return;

	if ((caster->GetZone() != player->GetZone()) || (current_rez.range > 0 && player->GetDistance(caster) > current_rez.range)) {
		SimpleMessage(CHANNEL_COLOR_YELLOW, "The caster must be nearby to complete the spell.");
		SendResurrectionWindow();
		return;
	}

	player->GetZone()->ResurrectSpawn(player, this);
	current_rez.should_delete = true;
}

void Client::SetPendingLastName(string last_name) {
	pending_last_name = new string;
	pending_last_name->assign(last_name);
}

string* Client::GetPendingLastName() {
	return pending_last_name;
}

void Client::RemovePendingLastName() {
	safe_delete(pending_last_name);
}

void Client::SendLastNameConfirmation() {
	if (!pending_last_name)
		return;

	PacketStruct* packet = configReader.getStruct("WS_ChoiceWindow", GetVersion());
	if (packet) {
		char* text = new char[128];
		sprintf(text, "Are you sure you want your last name to be \"%s\"?", pending_last_name->c_str());
		packet->setDataByName("text", text);
		packet->setDataByName("accept_text", "Yes");
		packet->setDataByName("accept_command", "confirmedlastname");
		packet->setDataByName("cancel_text", "No");
		packet->setDataByName("max_length", 50);
		packet->setDataByName("unknown4", 1);
		packet->setDataByName("unknown5", 1);
		QueuePacket(packet->serialize());
		safe_delete(packet);
		safe_delete_array(text);
	}
}

void Client::AddQuestTimer(int32 quest_id) {
	MQuestTimers.writelock(__FUNCTION__, __LINE__);
	quest_timers.push_back(quest_id);
	MQuestTimers.releasewritelock(__FUNCTION__, __LINE__);
}

void Client::RemoveQuestTimer(int32 quest_id) {
	MQuestTimers.writelock(__FUNCTION__, __LINE__);
	vector<int32>::iterator itr;
	for (itr = quest_timers.begin(); itr != quest_timers.end(); itr++) {
		if ((*itr) == quest_id) {
			quest_timers.erase(itr);
			break;
		}
	}
	MQuestTimers.releasewritelock(__FUNCTION__, __LINE__);
}

void Client::SavePlayerImages() {
	LogWrite(CCLIENT__DEBUG, 0, "Client", "Saving %s image for player %s (%u)", (incoming_paperdoll.image_type == PAPERDOLL_TYPE_FULL ? "paperdoll" : "headshot"), GetPlayer()->GetName(), GetCharacterID());

	// Save the paperdoll image if the server allows it
	if (incoming_paperdoll.image_type == PAPERDOLL_TYPE_FULL && rule_manager.GetGlobalRule(R_World, SavePaperdollImage)->GetBool())
		database.SaveCharacterPicture(GetCharacterID(), incoming_paperdoll.image_type, incoming_paperdoll.image_bytes, incoming_paperdoll.current_size_bytes);

	if (incoming_paperdoll.image_type == PAPERDOLL_TYPE_HEAD) {
		// Save the head shot if the server allows it
		if (rule_manager.GetGlobalRule(R_World, SaveHeadshotImage)->GetBool())
			database.SaveCharacterPicture(GetCharacterID(), incoming_paperdoll.image_type, incoming_paperdoll.image_bytes, incoming_paperdoll.current_size_bytes);

		// Send the head shot to the login server
		if (rule_manager.GetGlobalRule(R_World, SendPaperdollImagesToLogin)->GetBool()) {
			int32 size = incoming_paperdoll.current_size_bytes + CHARPICSTRUCT_MINSIZE;
			ServerPacket* packet = new ServerPacket(ServerOP_CharacterPicture, size);
			memset(packet->pBuffer, 0, size);

			CharPictureUpdate_Struct* pic = (CharPictureUpdate_Struct*)packet->pBuffer;
			pic->account_id = GetAccountID();
			pic->char_id = GetCharacterID();
			pic->pic_size = (int16)incoming_paperdoll.current_size_bytes;
			memcpy(pic->pic, incoming_paperdoll.image_bytes, incoming_paperdoll.current_size_bytes);

			loginserver.SendPacket(packet);
			safe_delete(packet);
		}
	}
	safe_delete_array(incoming_paperdoll.image_bytes);
	incoming_paperdoll.current_size_bytes = 0;
}

void Client::EndAutoMount() {
	PacketStruct* packet = configReader.getStruct("WS_ServerControlFlags", GetVersion());
	if (packet) {
		packet->setDataByName("parameter1", 128);
		packet->setDataByName("parameter2", 64);
		packet->setDataByName("value", 1);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	packet = configReader.getStruct("WS_ServerControlFlags", GetVersion());
	if (packet) {
		packet->setDataByName("parameter3", 4);
		packet->setDataByName("parameter5", 2);
		packet->setDataByName("value", 0);
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	packet = configReader.getStruct("WS_ClearForLanding", GetVersion());
	if (packet) {
		packet->setDataByName("spawn_id", GetPlayer()->GetIDWithPlayerSpawn(GetPlayer()));
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	on_auto_mount = false;

	player->SetMount(((Player*)player)->GetTempMount());
	EQ2_Color mount_color = player->GetTempMountColor();
	EQ2_Color saddle_color = player->GetTempMountSaddleColor();
	player->SetMountColor(&mount_color);
	player->SetMountSaddleColor(&saddle_color);
	player->SetTempMount(0);
}

bool Client::EntityCommandPrecheck(Spawn* spawn, const char* command) {
	const char* spawn_script = spawn->GetSpawnScript();
	bool should_use_spawn = true;
	if (spawn_script) {
		lua_State* state = lua_interface->GetSpawnScript(spawn_script);
		if (state) {
			Mutex* state_mutex = lua_interface->GetSpawnScriptMutex(spawn_script);
			if (state_mutex)
				state_mutex->writelock(__FUNCTION__, __LINE__);
			lua_getglobal(state, "can_use_command");
			if (lua_isfunction(state, -1)) {
				lua_interface->SetSpawnValue(state, spawn);
				lua_interface->SetSpawnValue(state, GetPlayer());
				lua_interface->SetStringValue(state, command ? command : "");
				if (lua_pcall(state, 3, 1, 0) == 0) {
					should_use_spawn = lua_interface->GetBooleanValue(state, 1);
				}
			}
			lua_interface->ResetFunctionStack(state);
			if (state_mutex)
				state_mutex->releasewritelock(__FUNCTION__, __LINE__);
		}
	}
	return should_use_spawn;
}

bool Client::IsCurrentTransmuteID(int32 req_id) {
	return req_id == transmuteID;
}

void Client::SetTransmuteID(int32 trans_id) {
	transmuteID = trans_id;
}

int32 Client::GetTransmuteID() {
	return transmuteID;
}

bool Client::HandleNewLogin(int32 account_id, int32 access_code)
{
	printf("HandleNewLogin: AcctID: %i AccessCode: %i\n", account_id, access_code);
	ZoneAuthRequest* zar = zone_auth.GetAuth(account_id, access_code);

	if (zar)
	{
		int32 charID = database.GetCharacterID(zar->GetCharacterName());
		if (database.IsActiveQuery(charID))
		{
			delayedLogin = true;
			delayedAccountID = account_id;
			delayedAccessKey = access_code;
			delayTimer.Start(500);
			LogWrite(ZONE__INFO, 0, "ZoneAuth", "Attempt to Login must be delayed, async character save in progress! ... Access Key: %u, Character Name: %s, Account ID: %u, Client Data Version: %u", zar->GetAccessKey(), zar->GetCharacterName(), zar->GetAccountID(), version);
			return true;
		}

		delayedLogin = false;
		delayTimer.Disable();

		firstlogin = zar->isFirstLogin();
		LogWrite(ZONE__INFO, 0, "ZoneAuth", "Access Key: %u, Character Name: %s, Account ID: %u, Client Data Version: %u", zar->GetAccessKey(), zar->GetCharacterName(), zar->GetAccountID(), version);
		if (database.loadCharacter(zar->GetCharacterName(), zar->GetAccountID(), this)) {
			GetPlayer()->CalculateOfflineDebtRecovery(GetLastSavedTimeStamp());
			GetPlayer()->vis_changed = false;
			GetPlayer()->info_changed = false;

			bool pvp_allowed = rule_manager.GetGlobalRule(R_PVP, AllowPVP)->GetBool();
			if (pvp_allowed)
				this->GetPlayer()->SetAttackable(1);
			MDeletePlayer.writelock(__FUNCTION__, __LINE__);
			Client* client = zone_list.GetClientByCharName(player->GetName());
			if (client) {
				if (client->getConnection())
					client->getConnection()->SendDisconnect(true);
				if (client->GetCurrentZone() && !client->IsZoning()) {
					//swap players, allowing the client to resume his LD'd player (ONLY if same version of the client)
					if (client->GetVersion() == version) {
						client->DisableSave();
						client->ReplaceGroupClient(this);
						Player* current_player = GetPlayer();
						SetPlayer(client->GetPlayer());
						GetPlayer()->SetClient(this);
						GetPlayer()->SetReturningFromLD(true);
						SetCurrentZone(GetPlayer()->GetZone());
						GetPlayer()->GetZone()->UpdateClientSpawnMap(GetPlayer(), this);
						client->SetPlayer(current_player);
						GetPlayer()->GetZone()->UpdateClientSpawnMap(current_player, client);
						GetPlayer()->ResetSavedSpawns();
					}
					ZoneServer* tmpZone = client->GetCurrentZone();
					tmpZone->RemoveClientImmediately(client);
				}
			}
			MDeletePlayer.releasewritelock(__FUNCTION__, __LINE__);
			if (!GetCurrentZone()) {
				LogWrite(ZONE__ERROR, 0, "Zone", "Error loading zone for character: %s", player->GetName());
				ClientPacketFunctions::SendLoginDenied(this);
			}
			else if (EQOpcodeManager.count(GetOpcodeVersion(version)) > 0 && getConnection()) {
				getConnection()->SetClientVersion(version);
				GetCurrentZone()->SetSpawnStructs(this);
				connected_to_zone = true;
				client_list.Remove(this); //remove from master client list
				GetCurrentZone()->AddClient(this); //add to zones client list
				zone_list.AddClientToMap(player->GetName(), this);
				// this initiates additional DB loading and client offloading within the Zone the player resides, need the client already added in zone and to the map above.
				new_client_login = true;

				const char* zone_script = world.GetZoneScript(GetCurrentZone()->GetZoneID());
				if (zone_script && lua_interface)
					lua_interface->RunZoneScript(zone_script, "new_client", GetCurrentZone(), GetPlayer());
			}
			else {
				LogWrite(WORLD__ERROR, 0, "World", "Incompatible version: %i", version);
				ClientPacketFunctions::SendLoginDenied(this);
				return false;
			}
		}
		else {
			LogWrite(WORLD__ERROR, 0, "World", "Could not load character '%s' with account id of: %u", zar->GetCharacterName(), zar->GetAccountID());
			ClientPacketFunctions::SendLoginDenied(this);
		}
		zone_auth.RemoveAuth(zar);
	}
	else
	{
		LogWrite(WORLD__ERROR, 0, "World", "Invalid ZoneAuthRequest, disconnecting client.");
		Disconnect();
	}

	return true;
}


void Client::SendSpawnChanges(set<Spawn*>& spawns) {
	if (!IsReadyForUpdates())
		return;

	map<int32, SpawnData> info_changes;
	map<int32, SpawnData> pos_changes;
	map<int32, SpawnData> vis_changes;

	map<int32, SpawnData> empty_changes;

	int32 info_size = 0;
	int32 pos_size = 0;
	int32 vis_size = 0;

	int count = 0;

	for (const auto& spawn : spawns) {
		int16 index = GetPlayer()->GetIndexForSpawn(spawn);
		if (index == 0 || !GetPlayer()->WasSentSpawn(spawn->GetID()))
			continue;

		if (spawn->vis_changed)
		{
			auto vis_change = spawn->spawn_vis_changes_ex(GetPlayer(), GetVersion());
			if (vis_change) {
				SpawnData data;
				data.spawn = spawn;
				data.data = vis_change;
				data.size = spawn->vis_packet_size;
				map<int32, SpawnData> tmp_vis_changes;
				tmp_vis_changes[index] = data;

				map<int32, SpawnData> tmp_info_changes;
				map<int32, SpawnData> tmp_pos_changes;
				int32 tmp_info_size = 0;
				int32 tmp_pos_size = 0;
				if (spawn->info_changed) {
					auto info_change = spawn->spawn_info_changes_ex(GetPlayer(), GetVersion());

					if (info_change) {
						SpawnData data;
						data.spawn = spawn;
						data.data = info_change;
						data.size = spawn->info_packet_size;
						tmp_info_size = data.size;
						tmp_info_changes[index] = data;
					}
				}

				if (spawn->position_changed) {
					auto pos_change = spawn->spawn_pos_changes_ex(GetPlayer(), GetVersion());

					if (pos_change) {
						SpawnData data;
						data.spawn = spawn;
						data.data = pos_change;
						data.size = spawn->pos_packet_size;
						tmp_pos_size = data.size;
						tmp_pos_changes[index] = data;
					}
				}

				MakeSpawnChangePacket(tmp_info_changes, tmp_pos_changes, tmp_vis_changes, tmp_info_size, tmp_pos_size, data.size);
				
				for (auto& kv : tmp_info_changes) {
					safe_delete_array(kv.second.data);
				}

				for (auto& kv : tmp_pos_changes) {
					safe_delete_array(kv.second.data);
				}

				for (auto& kv : tmp_vis_changes) {
					safe_delete_array(kv.second.data);
				}
				continue;
			}
		}

		if (spawn->info_changed) {
			auto info_change = spawn->spawn_info_changes_ex(GetPlayer(), GetVersion());

			if (info_change) {
				SpawnData data;
				data.spawn = spawn;
				data.data = info_change;
				data.size = spawn->info_packet_size;
				info_size += spawn->info_packet_size;

				info_changes[index] = data;
			}
			count++;
		}

		if (spawn->position_changed) {
			auto pos_change = spawn->spawn_pos_changes_ex(GetPlayer(), GetVersion());

			if (pos_change) {
				SpawnData data;
				data.spawn = spawn;
				data.data = pos_change;
				data.size = spawn->pos_packet_size;
				pos_size += spawn->pos_packet_size;

				pos_changes[index] = data;
			}
			count++;
		}

		if (spawn->vis_changed) {
			auto vis_change = spawn->spawn_vis_changes_ex(GetPlayer(), GetVersion());

			if (vis_change) {
				SpawnData data;
				data.spawn = spawn;
				data.data = vis_change;
				data.size = spawn->vis_packet_size;
				vis_size += spawn->vis_packet_size;

				vis_changes[index] = data;
			}
			count++;
		}

	}

	if (info_size == 0 && pos_size == 0 && vis_size == 0) {
		return;
	}

	MakeSpawnChangePacket(info_changes, pos_changes, vis_changes, info_size, pos_size, vis_size);

	for (auto& kv : info_changes) {
		safe_delete_array(kv.second.data);
	}

	for (auto& kv : pos_changes) {
		safe_delete_array(kv.second.data);
	}

	for (auto& kv : vis_changes) {
		safe_delete_array(kv.second.data);
	}
}

void Client::MakeSpawnChangePacket(map<int32, SpawnData> info_changes, map<int32, SpawnData> pos_changes, map<int32, SpawnData> vis_changes, int32 info_size, int32 pos_size, int32 vis_size)
{
	static const int8 oversized = 255;
	int16 opcode_val = EQOpcodeManager[GetOpcodeVersion(version)]->EmuToEQ(OP_EqUpdateGhostCmd);
	int32 size = info_size + pos_size + vis_size + 8;
	if (version > 283) //version 283 and below uses an overload for size, not always 4 bytes
		size += 3;
	size += CheckOverLoadSize(info_size);
	size += CheckOverLoadSize(pos_size);
	size += CheckOverLoadSize(vis_size);
	if (version <= 283 && size >= 255) {//1 byte to 3 for overloaded val
		size += 2;
	}
	uchar* tmp = new uchar[size];
	uchar* ptr = tmp;

	memset(tmp, 0, size);
	if (version <= 283) {
		if (size >= 255) {
			size -= 3;
			memcpy(ptr, &oversized, sizeof(int8));
			ptr += sizeof(int8);
			memcpy(ptr, &size, sizeof(int16));
			ptr += sizeof(int16);
			size += 3;
		}
		else {
			size -= 1;
			memcpy(ptr, &size, sizeof(int8));
			ptr += sizeof(int8);
			size += 1;
		}
	}
	else {
		size -= 4;
		memcpy(ptr, &size, sizeof(int32));
		ptr += sizeof(int32);
		size += 4;
	}
	memcpy(ptr, &oversized, sizeof(int8));
	ptr += sizeof(int8);

	memcpy(ptr, &opcode_val, sizeof(int16));
	ptr += sizeof(int16);

	int32 current_time = Timer::GetCurrentTime2();
	memcpy(ptr, &current_time, sizeof(int32));
	ptr += sizeof(int32);

	ptr += DoOverLoad(info_size, ptr);

	for (const auto& kv : info_changes) {
		auto info = kv.second;
		memcpy(ptr, info.data, info.size);
		ptr += info.size;
	}

	ptr += DoOverLoad(pos_size, ptr);

	for (const auto& kv : pos_changes) {
		auto pos = kv.second;
		memcpy(ptr, pos.data, pos.size);
		ptr += pos.size;
	}

	ptr += DoOverLoad(vis_size, ptr);

	for (const auto& kv : vis_changes) {
		auto vis = kv.second;
		memcpy(ptr, vis.data, vis.size);
		ptr += vis.size;
	}

	EQ2Packet* packet = new EQ2Packet(OP_ClientCmdMsg, tmp, size);

	if (packet) {
		/*char blah[64];
		snprintf(blah, 64, "Sending %i", current_time);
		SimpleMessage(4, blah);*/
		QueuePacket(packet);
	}

	delete[] tmp;
}

void Client::SendHailCommand(Spawn* spawn)
{
	// hardcoded 'hail' entity commands
	switch (spawn->secondary_command_list_id)
	{
		case 9:
		case 1262:
		case 1265:
		case 1267:
		{
			EQ2_16BitString* command = new EQ2_16BitString();
			command->data = "";
			command->size = 0;
			commands.Process(COMMAND_HAIL, command, this, spawn);
			safe_delete(command);
			break;
		}
	}
}

void Client::SendDefaultCommand(Spawn* spawn, const char* command, float distance)
{
	if (GetPlayer()->WasSentSpawn(spawn->GetID())) {
		PacketStruct* packet = configReader.getStruct("WS_SetDefaultCommand", GetVersion());
		if (packet) {
			packet->setDataByName("spawn_id", GetPlayer()->GetIDWithPlayerSpawn(spawn));
			packet->setMediumStringByName("command_name", command);
			packet->setDataByName("distance", distance);
			QueuePacket(packet->serialize());
			safe_delete(packet);
		}
	}
}

bool Client::HandleHouseEntityCommands(Spawn* spawn, int32 spawnid, string command)
{
	if (GetCurrentZone()->GetInstanceType() != PERSONAL_HOUSE_INSTANCE)
		return false;

	if (command == "house_spawn_examine")
	{
		uint32 itemID = spawn->GetPickupItemID();
		if (itemID)
		{

			Item* item = master_item_list.GetItem(itemID);
			if (item)
			{
				EQ2Packet* app = item->serialize(GetVersion(), true, GetPlayer());
				//DumpPacket(app);
				QueuePacket(app);
			}

		}
		return true;
	}

	return false;
}

bool Client::PopulateHouseSpawn(PacketStruct* place_object)
{
	if (GetTempPlacementSpawn())
	{
		Spawn* tmp = GetTempPlacementSpawn();

		int32 spawn_group_id = database.GetNextSpawnLocation();
		tmp->SetSpawnLocationID(spawn_group_id);

		float newHeading = place_object->getType_float_ByName("heading") + 180;

		int32 spawnDBID = 0;
		if (GetCurrentZone()->house_object_database_lookup.count(tmp->GetModelType()) > 0)
		{
			spawnDBID = GetCurrentZone()->house_object_database_lookup.Get(tmp->GetModelType());
			tmp->SetDatabaseID(spawnDBID);
		}
		else
		{
			spawnDBID = database.FindHouseInstanceSpawn(tmp);
			if (spawnDBID)
			{
				GetCurrentZone()->house_object_database_lookup.Put(tmp->GetModelType(), spawnDBID);
				tmp->SetDatabaseID(spawnDBID);
			}
		}

		tmp->SetX(place_object->getType_float_ByName("x"));
		tmp->SetY(place_object->getType_float_ByName("y"));
		tmp->SetZ(place_object->getType_float_ByName("z"));
		tmp->SetHeading(newHeading);
		tmp->SetSpawnOrigX(tmp->GetX());
		tmp->SetSpawnOrigY(tmp->GetY());
		tmp->SetSpawnOrigZ(tmp->GetZ());
		tmp->SetSpawnOrigHeading(tmp->GetHeading());
		
		database.SaveSpawnInfo(tmp);
		database.SaveSpawnEntry(tmp, "houseplacement", 100, 0, 0, 0);

		if (!spawnDBID)
		{
			GetCurrentZone()->house_object_database_lookup.Put(tmp->GetModelType(), tmp->GetDatabaseID());
			GetCurrentZone()->AddObject(tmp->GetDatabaseID(), (Object*)tmp);
		}

		return true;
	}

	return false;
}

bool Client::PopulateHouseSpawnFinalize()
{
	if (GetTempPlacementSpawn())
	{
		Spawn* tmp = GetTempPlacementSpawn();
		GetCurrentZone()->AddSpawn(tmp);
		GetCurrentZone()->SendSpawnChanges(tmp, this);
		SetTempPlacementSpawn(nullptr);
		int32 uniqueID = GetPlacementUniqueItemID();
		Item* uniqueItem = GetPlayer()->item_list.GetItemFromUniqueID(uniqueID);
		tmp->SetPickupItemID(uniqueItem->details.item_id);
		tmp->SetPickupUniqueItemID(uniqueID);

		if (uniqueItem)
		{
			if (GetCurrentZone()->GetInstanceType() == PERSONAL_HOUSE_INSTANCE)
			{
				Query query;
				query.RunQuery2(Q_INSERT, "insert into spawn_instance_data set spawn_id = %u, spawn_location_id = %u, pickup_item_id = %u, pickup_unique_item_id = %u", tmp->GetDatabaseID(), tmp->GetSpawnLocationID(), tmp->GetPickupItemID(), uniqueID);
			}

			database.DeleteItem(GetCharacterID(), uniqueItem, 0);
			GetPlayer()->item_list.RemoveItem(uniqueItem, true);
			QueuePacket(GetPlayer()->SendInventoryUpdate(GetVersion()));
			SetPlacementUniqueItemID(0);
		}
		return true;
	}

	return false;
}

void Client::SendMoveObjectMode(Spawn* spawn, uint8 placementMode, float unknown2_3)
{
	PacketStruct* packet = configReader.getStruct("WS_MoveObjectMode", GetVersion());
	packet->setDataByName("placement_mode", placementMode);
	packet->setDataByName("spawn_id", GetPlayer()->GetIDWithPlayerSpawn(spawn));
	packet->setDataByName("model_type", spawn->GetModelType());
	packet->setDataByName("unknown", 1); //size
	packet->setDataByName("unknown2", 1); //size 2
	packet->setDataByName("unknown2", .5, 1); //size 3
	packet->setDataByName("unknown2", 3, 2);
	packet->setDataByName("unknown2", unknown2_3, 3);
	packet->setDataByName("max_distance", 500);
	packet->setDataByName("CoEunknown", 0xFFFFFFFF);
	QueuePacket(packet->serialize());
	safe_delete(packet);
}

void Client::SendFlightAutoMount(int32 path_id, int16 mount_id, int8 mount_red_color, int8 mount_green_color, int8 mount_blue_color)
{
	SetPendingFlightPath(path_id);

	((Player*)player)->SetTempMount(((Entity*)player)->GetMount());
	((Player*)player)->SetTempMountColor(((Entity*)player)->GetMountColor());
	((Player*)player)->SetTempMountSaddleColor(((Entity*)player)->GetMountSaddleColor());

	PacketStruct* packet = configReader.getStruct("WS_ReadyForTakeOff", GetVersion());
	if (packet) {
		QueuePacket(packet->serialize());
		safe_delete(packet);
	}

	if (mount_id)
		((Entity*)GetPlayer())->SetMount(mount_id, mount_red_color, mount_green_color, mount_blue_color);
}

void Client::SendShowBook(Spawn* sender, string title, int8 num_pages, ...)
{
	if (!sender)
	{
		LogWrite(CCLIENT__ERROR, 0, "Client", "SendShowBook missing sender for Player %s, book title %s", GetPlayer()->GetName(), title);
		return;
	}

	PacketStruct* packet = configReader.getStruct("WS_EqShowBook", GetVersion());
	if (!packet) {
		LogWrite(CCLIENT__ERROR, 0, "Client", "WS_EqShowBook missing for version %u", GetVersion());
		return;
	}
	packet->setDataByName("spawn_id", GetPlayer()->GetIDWithPlayerSpawn(sender));
	packet->setDataByName("book_title", title.c_str());
	packet->setDataByName("book_type", "simple");
	packet->setDataByName("unknown2", 1);

	if (GetVersion() > 546)
		packet->setDataByName("unknown5", 1, 4);

	packet->setArrayLengthByName("num_pages", num_pages);

	va_list args;
	va_start(args, num_pages);
	std::string endString("");
	for (int8 p = 0; p < num_pages; p++)
	{
		std::string page = va_arg(args, string);
		switch (GetVersion())
		{
			// release client
			case 283:
			{
				endString.append(page);
				break;
			}
			// DoF trial
			case 546:
			{
				if (p == 0)
					packet->setDataByName("cover_page", page.c_str());
				else
					packet->setArrayDataByName("page_text", page.c_str(), p - 1);
				break;
			}
			// all other clients
			default:
			{
				packet->setArrayDataByName("page_text", page.c_str(), p);
				break;
			}
		}
	}

	if (GetVersion() == 283)
	{
		packet->setDataByName("page_text", endString.c_str());
	}

	va_end(args);

	QueuePacket(packet->serialize());
	safe_delete(packet);
}

void Client::SendShowBook(Spawn* sender, string title, vector<Item::BookPage*> pages)
{
	if (!sender)
	{
		LogWrite(CCLIENT__ERROR, 0, "Client", "SendShowBook missing sender for Player %s, book title %s", GetPlayer()->GetName(), title);
		return;
	}

	PacketStruct* packet = configReader.getStruct("WS_EqShowBook", GetVersion());
	if (!packet) {
		LogWrite(CCLIENT__ERROR, 0, "Client", "WS_EqShowBook missing for version %u", GetVersion());
		return;
	}
	packet->setDataByName("spawn_id", GetPlayer()->GetIDWithPlayerSpawn(sender));
	packet->setDataByName("book_title", title.c_str());
	packet->setDataByName("book_type", "simple");
	packet->setDataByName("unknown2", 1);

	if (GetVersion() > 546)
		packet->setDataByName("unknown5", 1, 4);

	packet->setArrayLengthByName("num_pages", pages.size());

	std::string endString("");
	for (int8 p = 0; p < pages.size(); p++)
	{
		Item::BookPage* page = pages[p];
		std::string pageText = string(page->page_text.data);
		switch (GetVersion())
		{
			// release client
		case 283:
		{
			endString.append(pageText);
			break;
		}
		// DoF trial
		case 546:
		{
			if (p == 0)
				packet->setDataByName("cover_page", pageText.c_str());
			else
				packet->setArrayDataByName("page_text", pageText.c_str(), p - 1);
			break;
		}
		// all other clients
		default:
		{
			int8 valign = int8(page->valign);
			int8 halign = int8(page->halign);
			packet->setArrayDataByName("page_text", pageText.c_str(), p);
			packet->setArrayDataByName("page_text_valign", valign, p);
			packet->setArrayDataByName("page_text_halign", halign, p);
			break;
		}
		}
	}

	if (GetVersion() == 283)
	{
		packet->setDataByName("page_text", endString.c_str());
	}

	QueuePacket(packet->serialize());
	safe_delete(packet);
}

void Client::ReplaceGroupClient(Client* new_client)
{
	if (this->GetPlayer()->GetGroupMemberInfo())
	{
		world.GetGroupManager()->GroupLock(__FUNCTION__, __LINE__);
		PlayerGroup* group = world.GetGroupManager()->GetGroup(this->GetPlayer()->GetGroupMemberInfo()->group_id);
		if(group)
		{
			group->MGroupMembers.writelock();
			rejoin_group_id = this->GetPlayer()->GetGroupMemberInfo()->group_id;
			this->GetPlayer()->GetGroupMemberInfo()->client = new_client;
			this->GetPlayer()->GetGroupMemberInfo()->member = GetPlayer();
			group->MGroupMembers.releasewritelock();
		}
		else
		{
			this->GetPlayer()->GetGroupMemberInfo()->client = 0;
			this->GetPlayer()->GetGroupMemberInfo()->member = 0;
			this->GetPlayer()->SetGroupMemberInfo(0);
		}

		world.GetGroupManager()->ReleaseGroupLock(__FUNCTION__, __LINE__);
	}
}

void Client::TempRemoveGroup()
{
	if (this->GetPlayer()->GetGroupMemberInfo())
	{
		world.GetGroupManager()->GroupLock(__FUNCTION__, __LINE__);
		PlayerGroup* group = world.GetGroupManager()->GetGroup(this->GetPlayer()->GetGroupMemberInfo()->group_id);
		if(group)
		{
			group->MGroupMembers.writelock();
			rejoin_group_id = this->GetPlayer()->GetGroupMemberInfo()->group_id;
			this->GetPlayer()->GetGroupMemberInfo()->client = 0;
			this->GetPlayer()->GetGroupMemberInfo()->member = 0;
			this->GetPlayer()->SetGroupMemberInfo(0);
			group->MGroupMembers.releasewritelock();
			group->RemoveClientReference(this);
		}
		else
		{
			this->GetPlayer()->GetGroupMemberInfo()->client = 0;
			this->GetPlayer()->GetGroupMemberInfo()->member = 0;
			this->GetPlayer()->SetGroupMemberInfo(0);
		}

		world.GetGroupManager()->ReleaseGroupLock(__FUNCTION__, __LINE__);
	}
}

void Client::CreateMail(int32 charID, std::string fromName, std::string subjectName, std::string mailBody, 
int8 mailType, int32 copper, int32 silver, int32 gold, int32 platinum, int32 item_id, int16 stack_size, int32 time_sent, int32 expire_time)
{
	Mail mail;
	memset(&mail,0,sizeof(Mail));
	mail.player_to_id = charID;
	mail.player_from = fromName;
	mail.subject = subjectName;
	mail.mail_body = mailBody;

	mail.mail_type = mailType;

	mail.coin_copper = copper;
	mail.coin_silver = silver;
	mail.coin_gold = gold;
	mail.coin_plat = platinum;

	mail.char_item_id = item_id;
	mail.stack = stack_size;

	mail.time_sent = time_sent;
	mail.expire_time = expire_time;

	database.SavePlayerMail(&mail);	
}

void Client::CreateAndUpdateMail(std::string fromName, std::string subjectName, std::string mailBody, 
int8 mailType, int32 copper, int32 silver, int32 gold, int32 platinum, int32 item_id, int16 stack_size, int32 time_sent, int32 expire_time)
{
	Mail* mail = new Mail();
	mail->player_to_id = GetCharacterID();
	mail->player_from = fromName;
	mail->subject = subjectName;
	mail->mail_body = mailBody;

	mail->mail_type = mailType;

	mail->coin_copper = copper;
	mail->coin_silver = silver;
	mail->coin_gold = gold;
	mail->coin_plat = platinum;

	mail->char_item_id = item_id;
	mail->stack = stack_size;

	mail->time_sent = time_sent;
	mail->expire_time = expire_time;

	mail->postage_cost = 0;
	mail->save_needed = 1;
	mail->already_read = 0;
	database.SavePlayerMail(mail);
	GetPlayer()->AddMail(mail);
}

void Client::SendEquipOrInvUpdateBySlot(int8 slot)
{
	if(slot < NUM_SLOTS)
	{
		EQ2Packet* app = GetPlayer()->GetEquipmentList()->serialize(GetVersion(), GetPlayer());
		if (app)
			QueuePacket(app);
	}
	else
	{
		EQ2Packet* outapp = GetPlayer()->SendInventoryUpdate(GetVersion());
			if (outapp)
				QueuePacket(outapp);
	}
}

void Client::QueueStateCommand(int32 spawn_player_id, int32 state)
{
	if(spawn_player_id < 1)
		return;

	MQueueStateCmds.writelock();
	queued_state_commands.insert(make_pair(spawn_player_id, state));
	MQueueStateCmds.releasewritelock();
}

void Client::ProcessStateCommands()
{
	if(!IsReadyForUpdates())
		return;

	MQueueStateCmds.writelock();
	map<int32, int32>::iterator itr = queued_state_commands.begin();
	for(; itr != queued_state_commands.end(); itr++)
		ClientPacketFunctions::SendStateCommand(this, itr->first, itr->second);

	queued_state_commands.clear();
	MQueueStateCmds.releasewritelock();
}

void Client::PurgeItem(Item* item)
{
	MConversation.writelock();
	map<int32, Item*>::iterator itr;
	for(itr = conversation_items.begin(); itr != conversation_items.end(); itr++)
	{
		if ( itr->second == item )
		{
			conversation_items.erase(itr);
			break;
		}
	}
	MConversation.releasewritelock();
}

void Client::ConsumeFoodDrink(Item* item, int32 slot)
{
	if(GetPlayer()->StopSaveSpellEffects())
		return;

		if(item) {
			LogWrite(MISC__INFO, 1, "Command", "ItemID: %u, ItemName: %s ItemCount: %i ", item->details.item_id, item->name.c_str(), item->details.count);
			if(item->GetItemScript() && lua_interface){
				lua_interface->RunItemScript(item->GetItemScript(), "cast", item, GetPlayer());
				if (slot == 22)
					Message(CHANNEL_NARRATIVE, "You eat a %s.", item->name.c_str());
				else
					Message(CHANNEL_NARRATIVE, "You drink a %s.", item->name.c_str());
			}

		if (item->details.count > 1) {
			item->details.count -= 1;
			item->save_needed = true;
		}
		else {
			GetPlayer()->GetEquipmentList()->RemoveItem(slot, true);
			database.DeleteItem(GetPlayer()->GetCharacterID(), item, "EQUIPPED");
		}
		GetPlayer()->SetCharSheetChanged(true);
		QueuePacket(player->GetEquipmentList()->serialize(GetVersion(), player));
	}
}

void Client::AwardCoins(int64 total_coins, std::string reason)
{
		if (total_coins > 0) {
		player->AddCoins(total_coins);
		PlaySound("coin_cha_ching");
		char tmp[64] = { 0 };
		string message = "You receive ";
		int32 val = 0;
		if (total_coins >= 1000000) {
			val = total_coins / 1000000;
			total_coins -= 1000000 * val;
			sprintf(tmp, "%u Platinum ", val);
			message.append(tmp);
			memset(tmp, 0, 64);
		}
		if (total_coins >= 10000) {
			val = total_coins / 10000;
			total_coins -= 10000 * val;
			sprintf(tmp, "%u Gold ", val);
			message.append(tmp);
			memset(tmp, 0, 64);
		}
		if (total_coins >= 100) {
			val = total_coins / 100;
			total_coins -= 100 * val;
			sprintf(tmp, "%u Silver ", val);
			message.append(tmp);
			memset(tmp, 0, 64);
		}
		if (total_coins > 0) {
			sprintf(tmp, "%u Copper ", (int32)total_coins);
			message.append(tmp);
		}
		message.append(reason);
		int8 type = CHANNEL_LOOT;
		SimpleMessage(type, message.c_str());
		}
}

void Client::TriggerSpellSave()
{
	int32 interval = rule_manager.GetGlobalRule(R_Spells, PlayerSpellSaveStateWaitInterval)->GetInt32();
	// default to not have some bogus value in the rule
	if(interval < 1)
		interval = 100;
	
	MSaveSpellStateMutex.lock();
	if(!save_spell_state_timer.Enabled())
	{
		save_spell_state_time_bucket = 0;
		save_spell_state_timer.Start(interval, true);
	}
	else
	{
		int32 elapsed_time = save_spell_state_timer.GetElapsedTime();
		save_spell_state_time_bucket += elapsed_time;

		int32 save_wait_cap = rule_manager.GetGlobalRule(R_Spells, PlayerSpellSaveStateCap)->GetInt32();
		
		// default to not have some bogus value in the rule
		if(save_wait_cap < interval)
			save_wait_cap = interval+1;
		
		if(save_spell_state_time_bucket >= save_wait_cap)
		{
			// save immediately and disable timer
			GetPlayer()->SaveSpellEffects();
			save_spell_state_timer.Disable();
		}
	}
	MSaveSpellStateMutex.unlock();
}

void Client::UpdateSentSpellList() {
	MSpellDetails.readlock(__FUNCTION__, __LINE__);
	std::map<int32, int32>::iterator itr;
	for(itr = sent_spell_details.begin(); itr != sent_spell_details.end(); itr++) {
		Spell* spell = master_spell_list.GetSpell(itr->first, itr->second);
		EQ2Packet* app = spell->SerializeSpell(this, false, false);
		QueuePacket(app);
	}
	MSpellDetails.releasereadlock(__FUNCTION__, __LINE__);
}

void Client::SetTempPlacementSpawn(Spawn* tmp) { 
	tempPlacementSpawn = tmp;
	hasSentTempPlacementSpawn = false;
	if(tempPlacementSpawn)
		temp_placement_timer.Start();
	else
		temp_placement_timer.Disable();
}