/*==LICENSE==*

CyanWorlds.com Engine - MMOG client, server and tools
Copyright (C) 2011  Cyan Worlds, Inc.

This program 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.

This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.

You can contact Cyan Worlds, Inc. by email legal@cyan.com
 or by snail mail at:
      Cyan Worlds, Inc.
      14617 N Newport Hwy
      Mead, WA   99021

*==LICENSE==*/
#include "plNetClientMgr.h"
#include "plNetLinkingMgr.h"

#include "pnSceneObject/plSceneObject.h"

#include "plPipeline/plPlates.h"
#include "plPipeline/plDebugText.h"
#include "plNetTransport/plNetTransportMember.h"
#include "plAvatar/plArmatureMod.h"
#include "plScene/plRelevanceMgr.h"

//
// Code which displays stuff on the screen
//

//
// show lists of members, listenList, and talkList
//
void plNetClientMgr::IShowLists()
{
	plNetLinkingMgr * lm = plNetLinkingMgr::GetInstance();
	plDebugText		&txt = plDebugText::Instance();

	int y,x,i;
	const int yOff=10, xOff=300, startY=70, startX=10;
	char str[256];

	// My player info
	x=startX;
	y=startY;
	plSceneObject *player = plSceneObject::ConvertNoRef(GetLocalPlayer());
	hsPoint3 pos = (player ? player->GetLocalToWorld() * hsPoint3(0, 0, 0) : hsPoint3(0, 0, 0));
	sprintf(str, "%s%s PlyrName=%s PlyrID=%d AcctID=%d P2P=%d Join#=%d Peers=%d %.1f,%.1f,%.1f",
		GetFlagsBit(kSendingVoice) ? "V" : " ",
		GetFlagsBit(kSendingActions) ? "A" : " ",
		GetPlayerName(), GetPlayerID(), 0, 
		IsPeerToPeer(), GetJoinOrder(), 0,
		pos.fX, pos.fY, pos.fZ);
	txt.DrawString(x,y,str,255,255,255,255);
	SetFlagsBit(kSendingVoice, 0);
	SetFlagsBit(kSendingActions, 0);

	y+=yOff;
	sprintf(str, "   Server=%s ILIAS=%d", "foo",
		IsLoadingInitialAgeState());
	txt.DrawString(x,y,str,255,255,255,255);
	
	// MEMBERS
	y+=yOff;
	int baseY=y;
	txt.DrawString(x,y,"   Members",255,255,255,255,plDebugText::kStyleBold);
	y+=yOff;
	plNetTransportMember** members=nil;
	fTransport.GetMemberListDistSorted(members);
	for(i=0;i<fTransport.GetNumMembers();i++)
	{
		plNetTransportMember* mbr=members[i];
		hsAssert(mbr, "ShowLists: nil member?");
		if (mbr->IsServer())
			continue;
		player = (mbr->GetAvatarKey() ? plSceneObject::ConvertNoRef(mbr->GetAvatarKey()->ObjectIsLoaded()) : nil);
		sprintf(str, "%s%s %s p2p=%d dist=%.1f",
			mbr->GetTransportFlags() & plNetTransportMember::kSendingVoice ? "V" : " ",
			mbr->GetTransportFlags() & plNetTransportMember::kSendingActions ? "A" : " ",
			mbr->AsStdString().c_str(),
			mbr->IsPeerToPeer(),
			mbr->GetDistSq() != hsScalarMax ? hsSquareRoot(mbr->GetDistSq()) :-1.f);
		txt.DrawString(x,y,str);
		y+=yOff;
		mbr->SetTransportFlags(mbr->GetTransportFlags() & 
			~(plNetTransportMember::kSendingVoice|plNetTransportMember::kSendingActions));
	}

	delete [] members;
	
	// LISTENLIST
	x+=xOff;
	y=baseY;
	txt.DrawString(x,y,"ListenList",255,255,255,255,plDebugText::kStyleBold);
	y+=yOff;
	for(i=0;i<GetListenList()->GetNumMembers();i++)
	{
		sprintf(str, "name=%s", GetListenList()->GetMember(i)->AsStdString().c_str());
		txt.DrawString(x,y,str);
		y+=yOff;
	}

	// TALKLIST
	x+=xOff;
	y=baseY;
	txt.DrawString(x,y,"TalkList",255,255,255,255,plDebugText::kStyleBold);
	y+=yOff;
	for(i=0;i<GetTalkList()->GetNumMembers();i++)
	{
		sprintf(str, "name=%s", GetTalkList()->GetMember(i)->AsStdString().c_str());
		txt.DrawString(x,y,str);
		y+=yOff;
	}
}


//
// show lists of members, listenList, and talkList
//
void plNetClientMgr::IShowRooms()
{
	plDebugText		&txt = plDebugText::Instance();

	int y,x;
	const int yOff=10, xOff=300, startY=70, startX=10;
	char str[256];

	// OWNEDLIST
	x=startX;
	y=startY;
	txt.DrawString(x,y,"RoomsOwned",255,255,255,255,plDebugText::kStyleBold);
	y+=yOff;
	std::set<plNetClientGroups::OwnedGroup>::iterator it=GetNetGroups()->fGroups.begin();
	for(;it != GetNetGroups()->fGroups.end(); it++)
	{
		if ((*it).fOwnIt)
		{
			sprintf(str, "%s", (*it).fGroup.GetDesc());
			txt.DrawString(x,y,str);
			y+=yOff;
		}
	}

	// NOTOWNEDLIST
	x+=xOff;
	y=startY;
	txt.DrawString(x,y,"RoomsNotOwned",255,255,255,255,plDebugText::kStyleBold);
	y+=yOff;
	it=GetNetGroups()->fGroups.begin();
	for(;it != GetNetGroups()->fGroups.end(); it++)
	{
		if (!(*it).fOwnIt)
		{
			sprintf(str, "%s", (*it).fGroup.GetDesc());
			txt.DrawString(x,y,str);
			y+=yOff;
		}
	}
}

UInt32 IPrintRelRegion(const hsBitVector& region, int x, int y, const hsBitVector* cmpRegion)
{
	char buf[256];
	int maxBits = 255;

	UInt32 num = plRelevanceMgr::Instance()->GetNumRegions();
	if (num > maxBits)
		num = maxBits;

	bool orTrue = false;

	int i;
	for (i = 0; i < num; i++)
	{
		buf[i] = (region.IsBitSet(i) ? '1' : '0');
		if (cmpRegion && cmpRegion->IsBitSet(i) && region.IsBitSet(i))
			orTrue = true;
	}
	buf[i] = '\0';

	plDebugText& txt = plDebugText::Instance()	;
	if (orTrue)
		txt.DrawString(x, y, buf, 0, 255, 0);
	else
		txt.DrawString(x, y, buf);

	return txt.CalcStringWidth(buf);
}

void plNetClientMgr::IShowRelevanceRegions()
{
	plDebugText& txt = plDebugText::Instance();

	const int yOff = 12, xOff = 20, startY=70, startX=10;
	int x = startX, y = startY;

	const char* title = "Name / In / Care";
	txt.DrawString(x, y - yOff, title, 255, 255, 255, 255, plDebugText::kStyleBold);

	plNetTransportMember** members = nil;
	fTransport.GetMemberListDistSorted(members);

	//
	// Print out the player names in the first column
	//
	UInt32 maxPlayerName = 0;

	txt.DrawString(x, y, GetPlayerName());
	maxPlayerName = hsMaximum(maxPlayerName, txt.CalcStringWidth(GetPlayerName()));
	y += yOff;

	int i;
	for (i = 0; i < fTransport.GetNumMembers(); i++)
	{
		plNetTransportMember* mbr = members[i];
		hsAssert(mbr, "ShowLists: nil member?");
		if (mbr->IsServer())
			continue;

		const char* name = mbr->GetPlayerName();
		txt.DrawString(x, y, name);
		maxPlayerName = hsMaximum(maxPlayerName, txt.CalcStringWidth(name));
		y += yOff;
	}

	x = startX + maxPlayerName + xOff;
	y = startY;

	//
	// Print out the regions
	//
	const hsBitVector* ourCare = nil;
	const hsBitVector* ourIn = nil;

	plSceneObject* player = plSceneObject::ConvertNoRef(GetLocalPlayer());
	if (player)
	{
		const plArmatureMod *avMod = plArmatureMod::ConvertNoRef(player->GetModifierByType(plArmatureMod::Index()));
		if (avMod)
		{
			ourIn = &avMod->GetRelRegionImIn();
			UInt32 width = IPrintRelRegion(*ourIn, x, y, nil);

			ourCare = &avMod->GetRelRegionCareAbout();
			IPrintRelRegion(*ourCare, x + width + xOff, y, nil);

			y += yOff;
		}
	}

	for (i = 0; i < fTransport.GetNumMembers(); i++)
	{
		plNetTransportMember* mbr = members[i];
		if (mbr->IsServer())
			continue;

		player = (mbr->GetAvatarKey() ? plSceneObject::ConvertNoRef(mbr->GetAvatarKey()->ObjectIsLoaded()) : nil);
		if (player)
		{
			const plArmatureMod* avMod = plArmatureMod::ConvertNoRef(player->GetModifierByType(plArmatureMod::Index()));
			if (avMod)
			{
				const hsBitVector& in = avMod->GetRelRegionImIn();
				UInt32 width = IPrintRelRegion(in, x, y, ourCare);

				const hsBitVector& care = avMod->GetRelRegionCareAbout();
				IPrintRelRegion(care, x + width + xOff, y, ourIn);

				y += yOff;
			}
		}
	}

	delete [] members;	
}

void plNetClientMgr::IShowAvatars()
{
	plDebugText		&txt = plDebugText::Instance();
	txt.SetFont( "Courier New", 6 );

	int y,x,i;
	const int yOff=10, xOff=285, startY=100, startX=10;
	char str[256];

	// Me
	x=startX;
	y=startY-yOff*3;
	plSceneObject *player = plSceneObject::ConvertNoRef(GetLocalPlayer());
	hsPoint3 pos = (player ? player->GetLocalToWorld() * hsPoint3(0, 0, 0) : hsPoint3(0, 0, 0));
	hsVector3 ori = (player ? player->GetLocalToWorld() * hsVector3(0, -1, 0) : hsVector3(0, 0, 0));
	sprintf(str, "%s: pos(%.2f, %.2f, %.2f) ori(%.2f, %.2f, %.2f)",
			GetPlayerName(), pos.fX, pos.fY, pos.fZ, ori.fX, ori.fY, ori.fZ);
	txt.DrawString(x,y,str,255,255,255,255);
	

	if (player)
	{
		const plArmatureMod *avMod = plArmatureMod::ConvertNoRef(player->GetModifierByType(plArmatureMod::Index()));
		if (avMod)
		{
			plArmatureMod* pNonConstArm = const_cast<plArmatureMod*>(avMod);
			plSceneObject* pObj = pNonConstArm->GetFollowerParticleSystemSO();
			if (pObj)
			{
				y+=yOff;
				y+=yOff;
				hsPoint3 pos = (pObj ? pObj->GetLocalToWorld() * hsPoint3(0, 0, 0) : hsPoint3(0, 0, 0));
				hsVector3 ori = (pObj ? pObj->GetLocalToWorld() * hsVector3(0, -1, 0) : hsVector3(0, 0, 0));
				sprintf(str, "%s: pos(%.2f, %.2f, %.2f) ori(%.2f, %.2f, %.2f)",
						pObj->GetKeyName(), pos.fX, pos.fY, pos.fZ, ori.fX, ori.fY, ori.fZ);
				txt.DrawString(x,y,str,255,255,255,255);
			}
		}
	}


	// Others
	y=startY;
	x=startX;
	
	plNetTransportMember** members=nil;
	fTransport.GetMemberListDistSorted(members);
	for(i=0;i<fTransport.GetNumMembers();i++)
	{
		plNetTransportMember* mbr=members[i];
		hsAssert(mbr, "ShowLists: nil member?");
		if (mbr->IsServer())
			continue;

		player = (mbr->GetAvatarKey() ? plSceneObject::ConvertNoRef(mbr->GetAvatarKey()->ObjectIsLoaded()) : nil);
		pos = (player ? player->GetLocalToWorld() * hsPoint3(0, 0, 0) : hsPoint3(0, 0, 0));
		ori = (player ? player->GetLocalToWorld() * hsVector3(0, -1, 0) : hsVector3(0, 0, 0));

		sprintf(str, "%s: pos(%.2f, %.2f, %.2f) ori(%.2f, %.2f, %.2f)",
				mbr->AsStdString().c_str(), pos.fX, pos.fY, pos.fZ, ori.fX, ori.fY, ori.fZ);
		txt.DrawString(x,y,str);
		y+=yOff;
	
		if (player)
		{
			const plArmatureMod *avMod = plArmatureMod::ConvertNoRef(player->GetModifierByType(plArmatureMod::Index()));
			if (avMod)
			{
				plArmatureMod* pNonConstArm = const_cast<plArmatureMod*>(avMod);
				plSceneObject* pObj = pNonConstArm->GetFollowerParticleSystemSO();
				if (pObj)
				{
				y+=yOff;
				y+=yOff;
				hsPoint3 pos = (pObj ? pObj->GetLocalToWorld() * hsPoint3(0, 0, 0) : hsPoint3(0, 0, 0));
				hsVector3 ori = (pObj ? pObj->GetLocalToWorld() * hsVector3(0, -1, 0) : hsVector3(0, 0, 0));
				sprintf(str, "%s: pos(%.2f, %.2f, %.2f) ori(%.2f, %.2f, %.2f)",
						pObj->GetKeyName(), pos.fX, pos.fY, pos.fZ, ori.fX, ori.fY, ori.fZ);
				txt.DrawString(x,y,str,255,255,255,255);
				}
			}
		}

	}

	delete [] members;
	
	txt.SetFont( "Courier New", 8 );
}