/* ScriptData
SDName: NPC ARENA 1V1
SD%Complete: 100
SDComment: By Evrial
SDCategory: NPC
EndScriptData */

#include "WorldPacket.h"
#include "WorldSession.h"
#include "ObjectMgr.h"
#include "ArenaTeam.h"
#include "ScriptPCH.h"
#include "BattlegroundMgr.h"
#include <cstring>

bool GossipHello_npc_arena_1v1(Player* pPlayer, Creature* pCreature)
{
	pPlayer->ADD_GOSSIP_ITEM(9, "Create 1v1 Team", GOSSIP_SENDER_MAIN, 1000);
	pPlayer->ADD_GOSSIP_ITEM(9, "Delete 1v1 Team", GOSSIP_SENDER_MAIN, 2000);
	pPlayer->ADD_GOSSIP_ITEM(9, "Join 1v1 Battle", GOSSIP_SENDER_MAIN, 3000);

	pPlayer->SEND_GOSSIP_MENU(pPlayer->GetGossipTextId(pCreature), pCreature->GetGUID());
	return true;
}

void SendDefaultMenu_npc_arena_1v1(Player* player, Creature* creature, uint32 action)
{
	// Not allowed if in combat.
	if (player->IsInCombat())
	{
		player->CLOSE_GOSSIP_MENU();
		creature->MonsterWhisper("You are in combat.", player->GetGUID());
		return;
	}

	if (!sWorld.getConfig(CONFIG_ARENA_SINGLE))
	{
		player->CLOSE_GOSSIP_MENU();
		creature->MonsterWhisper("Arena 1v1 not allowed server administrator.", player->GetGUID());
		return;
	}

	/*if (player->GetInt32Value(PLAYER_FIELD_MOD_HEALING_DONE_POS) > sWorld.getConfig(CONFIG_ARENA_SINGLE_MAX_BH))
	{
	player->CLOSE_GOSSIP_MENU();
	creature->MonsterWhisper("You are HEALER! Change your equipment!", player->GetGUID());
	return;
	}*/

	if (sWorld.getConfig(CONFIG_ARENA_SINGLE_NOHEAL_SPELLS))
		if (player->HasSpell(31842) ||
			player->HasSpell(5420) ||
			player->HasSpell(33891) ||
			player->HasSpell(34123) ||
			player->HasSpell(33886) ||
			player->HasSpell(33887) ||
			player->HasSpell(33888) ||
			player->HasSpell(33889) ||
			player->HasSpell(33890) ||
			player->HasSpell(32593) ||
			player->HasSpell(32594) ||
			player->HasSpell(16190) ||
			player->HasSpell(20711) ||
			player->HasSpell(15354) ||
			player->HasSpell(15355) ||
			player->HasSpell(15356)
			)
		{
			player->CLOSE_GOSSIP_MENU();
			creature->MonsterWhisper("You are HEALER! Change your tallents!", player->GetGUID());
			return;
		}

	std::string teamname = player->GetName();
	uint32 type = 5;
	switch (action)
	{
	case 1000:
	{
		uint32 oldatid = player->GetArenaTeamId(2);
		ArenaTeam* oldat = sObjectMgr.GetArenaTeamById(oldatid);
		if (oldat)
		{
			player->CLOSE_GOSSIP_MENU();
			creature->MonsterWhisper("You have a 1v1 team.", player->GetGUID());
			return;
		}
		if (sObjectMgr.GetArenaTeamByName(teamname))
		{
			player->CLOSE_GOSSIP_MENU();
			creature->MonsterWhisper("Arena Team with YOUR name is EXIST. You can create team in Arena Organizer. Create 5v5 team. No petition sings needed!", player->GetGUID());
			return;
		}

		ArenaTeam* at = new ArenaTeam;
		if (!at->Create(player->GetGUID(), type, teamname))
		{
			sLog.outError("Npc_arena_1v1: arena team create failed.");
			delete at;
			return;
		}

		uint32 icon, iconcolor, border, bordercolor, backgroud;
		icon = 69;
		iconcolor = 4294705169;
		border = 4;
		bordercolor = 4294903296;
		backgroud = 4278190080;

		at->SetEmblem(backgroud, icon, iconcolor, border, bordercolor);

		// register team and add captain
		sObjectMgr.AddArenaTeam(at);
		sLog.outDebug("Npc_arena_1v1: arena team added to objmrg");

		player->CLOSE_GOSSIP_MENU();
		creature->MonsterWhisper("Your Arena 1v1 team is created.", player->GetGUID());
	}
	break;
	case 2000:
	{
		uint32 atid = player->GetArenaTeamId(2);
		ArenaTeam* at = sObjectMgr.GetArenaTeamById(atid);
		if (!atid || !at)
		{
			player->CLOSE_GOSSIP_MENU();
			creature->MonsterWhisper("You have not arena 1v1 team.", player->GetGUID());
			return;
		}
		player->CLOSE_GOSSIP_MENU();
		at->DelMember(player->GetGUID());
		at->Disband(player->GetSession());
		creature->MonsterWhisper("Your Arena 1v1 team is deleted.", player->GetGUID());
	}
	break;
	case 3000:
	{
		uint32 atid = player->GetArenaTeamId(2);
		ArenaTeam* at = sObjectMgr.GetArenaTeamById(atid);
		if (!atid || !at)
		{
			player->CLOSE_GOSSIP_MENU();
			creature->MonsterWhisper("You have not arena 1v1 team.", player->GetGUID());
			return;
		}
		uint8 arenaslot = 2;
		uint8 asGroup = 0;
		uint8 isRated = 1;

		uint8 arenatype = ARENA_TYPE_5v5;
		uint32 arenaRating = 0;

		Battleground* bg = NULL;
		if (!(bg = sBattlegroundMgr.GetBattlegroundTemplate(BATTLEGROUND_AA)))
		{
			player->CLOSE_GOSSIP_MENU();
			sLog.outError("Npc_arena_1v1: template bg (all arenas) not found");
			return;
		}
		bg = sBattlegroundMgr.GetBattlegroundTemplate(BATTLEGROUND_AA);
		uint8 bgTypeId = bg->GetTypeID();
		uint32 bgQueueTypeId = sBattlegroundMgr.BGQueueTypeId(bgTypeId, arenatype);

		if (player->GetBattlegroundQueueIndex(bgQueueTypeId) < PLAYER_MAX_BATTLEGROUND_QUEUES)
			return;
		if (!player->HasFreeBattlegroundQueueId())
			return;

		arenaRating = at->GetRating();

		uint32 queueSlot = player->AddBattlegroundQueueId(bgQueueTypeId);
		player->SetBattlegroundEntryPoint(player->GetMapId(), player->GetPositionX(), player->GetPositionY(), player->GetPositionZ(), player->GetOrientation());

		WorldPacket data;
		sBattlegroundMgr.BuildBattlegroundStatusPacket(&data, bg, player->GetTeam(), queueSlot, STATUS_WAIT_QUEUE, 0, 0, arenatype, isRated);
		player->GetSession()->SendPacket(&data);
		sBattlegroundMgr.BuildGroupJoinedBattlegroundPacket(&data, bgTypeId);
		player->GetSession()->SendPacket(&data);
		GroupQueueInfo * ginfo = sBattlegroundMgr.m_BattlegroundQueues[bgQueueTypeId].AddGroup(player, bgTypeId, arenatype, isRated, arenaRating);
		sBattlegroundMgr.m_BattlegroundQueues[bgQueueTypeId].AddPlayer(player, ginfo);
		sLog.outDebug("Npc_arena_1v1: player joined queue for arena as group bg queue type %u bg type %u: GUID %u, NAME %s", bgQueueTypeId, bgTypeId, player->GetGUIDLow(), player->GetName());

		sLog.outDebug("Npc_arena_1v1: arena join end");
		sBattlegroundMgr.m_BattlegroundQueues[bgQueueTypeId].Update(bgTypeId, player->GetBattlegroundQueueIdFromLevel(), arenatype, isRated, arenaRating);

		player->CLOSE_GOSSIP_MENU();
		creature->MonsterWhisper("Your Arena 1v1 team is in queue now.", player->GetGUID());
	}
	break;
	}
}

bool GossipSelect_npc_arena_1v1(Player* pPlayer, Creature* pCreature, uint32 uiSender, uint32 uiAction)
{
	// Show menu
	if (uiSender == GOSSIP_SENDER_MAIN)
		SendDefaultMenu_npc_arena_1v1(pPlayer, pCreature, uiAction);
	return true;
}

void AddSC_npc_arena_1v1()
{
	Script *newscript;
	newscript = new Script;
	newscript->Name = "npc_arena_1v1";
	newscript->pGossipHello = &GossipHello_npc_arena_1v1;
	newscript->pGossipSelect = &GossipSelect_npc_arena_1v1;
	newscript->RegisterSelf();
}