/*
   BobToolz plugin for GtkRadiant
   Copyright (C) 2001 Gordon Biggans

   This library is free software; you can redistribute it and/or
   modify it under the terms of the GNU Lesser General Public
   License as published by the Free Software Foundation; either
   version 2.1 of the License, or (at your option) any later version.

   This library 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
   Lesser General Public License for more details.

   You should have received a copy of the GNU Lesser General Public
   License along with this library; if not, write to the Free Software
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

#include "StdAfx.h"

#include "dialogs/dialogs-gtk.h"

#include "DEntity.h"
#include "DMap.h"

#include "misc.h"
#include "lists.h"
#include "funchandlers.h"

// for ctf texture changer
list<Str> clrList_Blue;
list<Str> clrList_Red;

BOOL clrLst1Loaded = FALSE;
BOOL clrLst2Loaded = FALSE;

// -------------

//========================//
//    Helper Functions    //
//========================//

void LoadLists(){
	char buffer[256];

	if ( !clrLst1Loaded ) {
		clrLst1Loaded = LoadExclusionList( GetFilename( buffer, "plugins/bt/ctf-blue.txt" ), &clrList_Blue );
		LoadExclusionList( GetFilename( buffer, "plugins/bt/blue.txt" ), &clrList_Blue );
	}
	if ( !clrLst2Loaded ) {
		clrLst2Loaded = LoadExclusionList( GetFilename( buffer, "plugins/bt/ctf-red.txt" ), &clrList_Red );
		LoadExclusionList( GetFilename( buffer, "plugins/bt/red.txt" ), &clrList_Red );
	}
}


//========================//
//     Main Functions     //
//========================//

void DoCTFColourChanger(){
	if ( !clrLst1Loaded || !clrLst2Loaded ) {
		DoMessageBox( "CTF texture lists not found, this function will terminate.", "Error", MB_OK );
		return;
	}

	int ret = DoCTFColourChangeBox();
	if ( ret == IDCANCEL ) {
		return;
	}

	int cnt = Min( clrList_Blue.size(), clrList_Red.size() );

	list<Str>::const_iterator Texture_change;
	list<Str>::const_iterator Texture_new;

	float fDummy[2];

	int eCnt = g_FuncTable.m_pfnGetEntityCount();

	DMap world;
	world.LoadAll( TRUE );

	if ( ret == IDYES ) {
		Texture_change =    clrList_Blue.begin();
		Texture_new =       clrList_Red.begin();
	}
	else
	{
		Texture_change =    clrList_Red.begin();
		Texture_new =       clrList_Blue.begin();
	}

	for ( int i = 0; i < cnt; i++ )
	{
		world.ResetTextures( ( *Texture_change ).c_str(), fDummy, fDummy, 0, ( *Texture_new ).c_str(), TRUE );

		Texture_change++;
		Texture_new++;
	}
}

void DoSwapLights(){
/*	DMap world;
    world.LoadAll();

    for(list<DEntity*>::const_iterator loopEnt = world.entityList.begin(); loopEnt != world.entityList.end(); loopEnt++)
    {
        DEntity* e = (*loopEnt);
        DEPair* epLightColour = e->FindEPairByKey("_color");
        if(epLightColour)
        {
            float r, g, b;
            sscanf(epLightColour->value, "%f %f %f", &r, &g, &b);
            sprintf(epLightColour->value, "%f %f %f", b, g, r);
            DMap::RebuildEntity(e);
        }
    }*/

	int cnt = g_FuncTable.m_pfnGetEntityCount();

	for ( int i = 0; i < cnt; i++ )
	{
		void* ent = g_FuncTable.m_pfnGetEntityHandle( i );

		for ( epair_t* epList = *g_FuncTable.m_pfnGetEntityKeyValList( ent ); epList; epList = epList->next )
		{
			if ( !stricmp( "_color", epList->key ) ) {
				float r, g, b;
				sscanf( epList->value, "%f %f %f", &r, &g, &b );
				sprintf( epList->value, "%f %f %f", b, g, r );
			}
		}
	}
}

void DoChangeAngles(){
	int cnt = g_FuncTable.m_pfnGetEntityCount();

	for ( int i = 0; i < cnt; i++ )
	{
		void* ent = g_FuncTable.m_pfnGetEntityHandle( i );

		for ( epair_t* epList = *g_FuncTable.m_pfnGetEntityKeyValList( ent ); epList; epList = epList->next )
		{
			if ( !stricmp( "angle", epList->key ) ) {
				float angle;
				sscanf( epList->value, "%f", &angle );
				angle += 180;
				while ( angle > 360 )
					angle -= 360;

				sprintf( epList->value, "%f", angle );
			}
		}
	}
}

void DoSwapSpawns(){
	int cnt = g_FuncTable.m_pfnGetEntityCount();

	for ( int i = 0; i < cnt; i++ )
	{
		void* ent = g_FuncTable.m_pfnGetEntityHandle( i );

		for ( epair_t* epList = *g_FuncTable.m_pfnGetEntityKeyValList( ent ); epList; epList = epList->next )
		{
			if ( !stricmp( "classname", epList->key ) ) {
				if ( !strcmp( epList->value, "team_CTF_redplayer" ) ) {
					sprintf( epList->value, "team_CTF_blueplayer" );
				}
				else if ( !strcmp( epList->value, "team_CTF_blueplayer" ) ) {
					sprintf( epList->value, "team_CTF_redplayer" );
				}

				if ( !strcmp( epList->value, "team_CTF_redspawn" ) ) {
					sprintf( epList->value, "team_CTF_bluespawn" );
				}
				else if ( !strcmp( epList->value, "team_CTF_bluespawn" ) ) {
					sprintf( epList->value, "team_CTF_redspawn" );
				}

				if ( !strcmp( epList->value, "team_CTF_redflag" ) ) {
					sprintf( epList->value, "team_CTF_blueflag" );
				}
				else if ( !strcmp( epList->value, "team_CTF_blueflag" ) ) {
					sprintf( epList->value, "team_CTF_redflag" )
					;
				}
				if ( !strcmp( epList->value, "team_redobelisk" ) ) {
					sprintf( epList->value, "team_blueobelisk" );
				}
				else if ( !strcmp( epList->value, "team_blueobelisk" ) ) {
					sprintf( epList->value, "team_redobelisk" );
				}
			}
		}
	}
}

/*void test()
   {
    DMap world;
    world.LoadAll();

    for(list<DEntity*>::const_iterator ents = world.entityList.begin(); ents != world.entityList.end(); ents++)
    {
        (*ents)->RemoveFromRadiant();
    }
   }*/