/**

  * vim: set ts=4 :

  * =============================================================================

  * SourceMod Basic Info Triggers Plugin

  * Implements basic information chat triggers like ff and timeleft.

  *

  * SourceMod (C)2004-2008 AlliedModders LLC.  All rights reserved.

  * =============================================================================

  *

  * This program is free software; you can redistribute it and/or modify it under

  * the terms of the GNU General Public License, version 3.0, as published by the

  * Free Software Foundation.

  * 

  * 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/>.

  *

  * As a special exception, AlliedModders LLC gives you permission to link the

  * code of this program (as well as its derivative works) to "Half-Life 2," the

  * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software

  * by the Valve Corporation.  You must obey the GNU General Public License in

  * all respects for all other code used.  Additionally, AlliedModders LLC grants

  * this exception to all derivative works.  AlliedModders LLC defines further

  * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),

  * or <http://www.sourcemod.net/license.php>.

  *

  * Version: $Id$

  */

 #pragma semicolon 1

 #include <sourcemod>

 #undef REQUIRE_PLUGIN

 #include <mapchooser>

 #define REQUIRE_PLUGIN

 public Plugin:myinfo = 

 {

 	name = "Basic Info Triggers",

 	author = "AlliedModders LLC",

 	description = "Adds ff, timeleft, thetime, and others.",

 	version = SOURCEMOD_VERSION,

 	url = "http://www.sourcemod.net/"

 };

 new Handle:g_Cvar_TriggerShow = INVALID_HANDLE;

 new Handle:g_Cvar_TimeleftInterval = INVALID_HANDLE;

 new Handle:g_Cvar_FriendlyFire = INVALID_HANDLE;

 new Handle:g_Timer_TimeShow = INVALID_HANDLE;

 new Handle:g_Cvar_WinLimit = INVALID_HANDLE;

 new Handle:g_Cvar_FragLimit = INVALID_HANDLE;

 new Handle:g_Cvar_MaxRounds = INVALID_HANDLE;

 #define TIMELEFT_ALL_ALWAYS		0		/* Print to all players */

 #define TIMELEFT_ALL_MAYBE		1		/* Print to all players if sm_trigger_show allows */

 #define TIMELEFT_ONE			2		/* Print to a single player */

 new bool:mapchooser;

 new g_TotalRounds;

 public OnPluginStart()

 {

 	LoadTranslations("common.phrases");

 	LoadTranslations("basetriggers.phrases");

 	g_Cvar_TriggerShow = CreateConVar("sm_trigger_show", "1", "Display triggers message to all players? (0 off, 1 on, def. 1)", 0, true, 0.0, true, 1.0);	

 	g_Cvar_TimeleftInterval = CreateConVar("sm_timeleft_interval", "0.0", "Display timeleft every x seconds. Default 0.", 0, true, 0.0, true, 1800.0);

 	g_Cvar_FriendlyFire = FindConVar("mp_friendlyfire");

 	AddCommandListener(Command_Say, "say");

 	AddCommandListener(Command_Say, "say2");

 	AddCommandListener(Command_Say, "say_team");

 	RegConsoleCmd("timeleft", Command_Timeleft);

 	RegConsoleCmd("nextmap", Command_Nextmap);

 	RegConsoleCmd("motd", Command_Motd);

 	HookConVarChange(g_Cvar_TimeleftInterval, ConVarChange_TimeleftInterval);

 	decl String:folder[64];   	 

    	GetGameFolderName(folder, sizeof(folder));

    	if (strcmp(folder, "insurgency") == 0)

    	{

    		HookEvent("game_newmap", Event_GameStart);

    	}

    	else

    	{

    		HookEvent("game_start", Event_GameStart);

    	}

 	HookEvent("round_end", Event_RoundEnd);

 	HookEventEx("teamplay_win_panel", Event_TeamPlayWinPanel);

 	HookEventEx("teamplay_restart_round", Event_TFRestartRound);

 	HookEventEx("arena_win_panel", Event_TeamPlayWinPanel);

 	g_Cvar_WinLimit = FindConVar("mp_winlimit");

 	g_Cvar_FragLimit = FindConVar("mp_fraglimit");

 	g_Cvar_MaxRounds = FindConVar("mp_maxrounds");

 	mapchooser = LibraryExists("mapchooser");

 }

 public OnMapStart()

 {

 	g_TotalRounds = 0;	

 }

 /* Round count tracking */

 public Event_TFRestartRound(Handle:event, const String:name[], bool:dontBroadcast)

 {

 	/* Game got restarted - reset our round count tracking */

 	g_TotalRounds = 0;	

 }

 public Event_GameStart(Handle:event, const String:name[], bool:dontBroadcast)

 {

 	/* Game got restarted - reset our round count tracking */

 	g_TotalRounds = 0;	

 }

 public Event_TeamPlayWinPanel(Handle:event, const String:name[], bool:dontBroadcast)

 {

 	if(GetEventInt(event, "round_complete") == 1 || StrEqual(name, "arena_win_panel"))

 	{

 		g_TotalRounds++;

 	}

 }

 /* You ask, why don't you just use team_score event? And I answer... Because CSS doesn't. */

 public Event_RoundEnd(Handle:event, const String:name[], bool:dontBroadcast)

 {

 	g_TotalRounds++;

 }

 public OnLibraryRemoved(const String:name[])

 {

 	if (StrEqual(name, "mapchooser"))

 	{

 		mapchooser = false;

 	}

 }

 public OnLibraryAdded(const String:name[])

 {

 	if (StrEqual(name, "mapchooser"))

 	{

 		mapchooser = true;

 	}

 }

 public ConVarChange_TimeleftInterval(Handle:convar, const String:oldValue[], const String:newValue[])

 {

 	new Float:newval = StringToFloat(newValue);

 	if (newval < 1.0)

 	{

 		if (g_Timer_TimeShow != INVALID_HANDLE)

 		{

 			KillTimer(g_Timer_TimeShow);		

 		}

 		return;

 	}

 	if (g_Timer_TimeShow != INVALID_HANDLE)

 	{

 		KillTimer(g_Timer_TimeShow);

 		g_Timer_TimeShow = CreateTimer(newval, Timer_DisplayTimeleft, _, TIMER_REPEAT);

 	}

 	else

 		g_Timer_TimeShow = CreateTimer(newval, Timer_DisplayTimeleft, _, TIMER_REPEAT);

 }

 public Action:Timer_DisplayTimeleft(Handle:timer)

 {

 	ShowTimeLeft(0, TIMELEFT_ALL_ALWAYS);	

 }

 public Action:Command_Timeleft(client, args)

 {

 	ShowTimeLeft(client, TIMELEFT_ONE);

 	return Plugin_Handled;

 }

 public Action:Command_Nextmap(client, args)

 {

 	decl String:map[64];

 	GetNextMap(map, sizeof(map));

 	if (mapchooser && EndOfMapVoteEnabled() && !HasEndOfMapVoteFinished())

 	{

 		ReplyToCommand(client, "[SM] %t", "Pending Vote");			

 	}

 	else

 	{

 		ReplyToCommand(client, "[SM] %t", "Next Map", map);

 	}

 	return Plugin_Handled;

 }

 public Action:Command_Motd(client, args)

 {

 	if (client == 0)

 	{

 		ReplyToCommand(client, "[SM] %t", "Command is in-game only");

 		return Plugin_Handled;

 	}

 	ShowMOTDPanel(client, "Message Of The Day", "motd", MOTDPANEL_TYPE_INDEX);

 	return Plugin_Handled;

 }

 public Action:Command_Say(client, const String:command[], argc)

 {

 	decl String:text[192];

 	new startidx = 0;

 	if (GetCmdArgString(text, sizeof(text)) < 1)

 	{

 		return Plugin_Continue;

 	}

 	if (text[strlen(text)-1] == '"')

 	{

 		text[strlen(text)-1] = '\0';

 		startidx = 1;

 	}

 	if (strcmp(command, "say2", false) == 0)

 		startidx += 4;

 	if (strcmp(text[startidx], "timeleft", false) == 0)

 	{

 		ShowTimeLeft(client, TIMELEFT_ALL_MAYBE);

 	}

 	else if (strcmp(text[startidx], "thetime", false) == 0)

 	{

 		decl String:ctime[64];

 		FormatTime(ctime, 64, NULL_STRING);

 		if(GetConVarInt(g_Cvar_TriggerShow))

 		{

 			PrintToChatAll("[SM] %t", "Thetime", ctime);

 		}

 		else

 		{

 			PrintToChat(client,"[SM] %t", "Thetime", ctime);

 		}

 	}

 	else if (strcmp(text[startidx], "ff", false) == 0 || strcmp(text[startidx], "/ff", false) == 0)

 	{

 		if (g_Cvar_FriendlyFire != INVALID_HANDLE)

 		{

 			decl String:message[64];

 			if (GetConVarBool(g_Cvar_FriendlyFire))

 			{

 				Format(message, sizeof(message), "%T", "Friendly Fire On", client);

 			}

 			else

 			{

 				Format(message, sizeof(message), "%T", "Friendly Fire Off", client);

 			}

 			if(GetConVarInt(g_Cvar_TriggerShow))

 			{

 				PrintToChatAll("[SM] %s", message);

 			}

 			else

 			{

 				PrintToChat(client,"[SM] %s", message);		

 			}

 		}

 	}

 	else if (strcmp(text[startidx], "currentmap", false) == 0)

 	{

 		decl String:map[64];

 		GetCurrentMap(map, sizeof(map));

 		if(GetConVarInt(g_Cvar_TriggerShow))

 		{

 			PrintToChatAll("[SM] %t", "Current Map", map);

 		}

 		else

 		{

 			PrintToChat(client,"[SM] %t", "Current Map", map);

 		}

 	}

 	else if (strcmp(text[startidx], "nextmap", false) == 0)

 	{

 		decl String:map[32];

 		GetNextMap(map, sizeof(map));

 		if(GetConVarInt(g_Cvar_TriggerShow))

 		{

 			if (mapchooser && EndOfMapVoteEnabled() && !HasEndOfMapVoteFinished())

 			{

 				PrintToChatAll("[SM] %t", "Pending Vote");			

 			}

 			else

 			{

 				PrintToChatAll("[SM] %t", "Next Map", map);

 			}

 		}

 		else

 		{

 			if (mapchooser && EndOfMapVoteEnabled() && !HasEndOfMapVoteFinished())

 			{

 				PrintToChat(client, "[SM] %t", "Pending Vote");			

 			}

 			else

 			{

 				PrintToChat(client, "[SM] %t", "Next Map", map);

 			}

 		}

 	}

 	else if (strcmp(text[startidx], "motd", false) == 0)

 	{

 		ShowMOTDPanel(client, "Message Of The Day", "motd", MOTDPANEL_TYPE_INDEX);

 	}

 	return Plugin_Continue;

 }

 ShowTimeLeft(client, who)

 {

 	new bool:lastround = false;

 	new bool:written = false;

 	new bool:notimelimit = false;

 	decl String:finalOutput[1024];

 	finalOutput[0] = 0;

 	if (who == TIMELEFT_ALL_ALWAYS

 		|| (who == TIMELEFT_ALL_MAYBE && GetConVarInt(g_Cvar_TriggerShow)))

 	{

 		client = 0;	

 	}

 	new timeleft;

 	if (GetMapTimeLeft(timeleft))

 	{

 		new mins, secs;

 		new timelimit;

 		if (timeleft > 0)

 		{

 			mins = timeleft / 60;

 			secs = timeleft % 60;

 			written = true;

 			FormatEx(finalOutput, sizeof(finalOutput), "%T %d:%02d", "Timeleft", client, mins, secs);

 		}

 		else if (GetMapTimeLimit(timelimit) && timelimit == 0)

 		{

 			notimelimit = true;

 		}

 		else

 		{

 			/* 0 timeleft so this must be the last round */

 			lastround=true;

 		}

 	}

 	if (!lastround)

 	{

 		if (g_Cvar_WinLimit != INVALID_HANDLE)

 		{

 			new winlimit = GetConVarInt(g_Cvar_WinLimit);

 			if (winlimit > 0)

 			{

 				if (written)

 				{

 					new len = strlen(finalOutput);

 					if (len < sizeof(finalOutput))

 					{

 						if (winlimit > 1)

 						{

 							FormatEx(finalOutput[len], sizeof(finalOutput)-len, "%T", "WinLimitAppendPlural" ,client, winlimit);

 						}

 						else

 						{

 							FormatEx(finalOutput[len], sizeof(finalOutput)-len, "%T", "WinLimitAppend" ,client);

 						}

 					}

 				}

 				else

 				{

 					if (winlimit > 1)

 					{

 						FormatEx(finalOutput, sizeof(finalOutput), "%T", "WinLimitPlural", client, winlimit);

 					}

 					else

 					{

 						FormatEx(finalOutput, sizeof(finalOutput), "%T", "WinLimit", client);

 					}

 					written = true;

 				}

 			}

 		}

 		if (g_Cvar_FragLimit != INVALID_HANDLE)

 		{

 			new fraglimit = GetConVarInt(g_Cvar_FragLimit);

 			if (fraglimit > 0)

 			{

 				if (written)

 				{

 					new len = strlen(finalOutput);

 					if (len < sizeof(finalOutput))

 					{

 						if (fraglimit > 1)

 						{

 							FormatEx(finalOutput[len], sizeof(finalOutput)-len, "%T", "FragLimitAppendPlural", client, fraglimit);

 						}

 						else

 						{

 							FormatEx(finalOutput[len], sizeof(finalOutput)-len, "%T", "FragLimitAppend", client);

 						}

 					}	

 				}

 				else

 				{

 					if (fraglimit > 1)

 					{

 						FormatEx(finalOutput, sizeof(finalOutput), "%T", "FragLimitPlural", client, fraglimit);

 					}

 					else

 					{

 						FormatEx(finalOutput, sizeof(finalOutput), "%T", "FragLimit", client);

 					}

 					written = true;

 				}			

 			}

 		}

 		if (g_Cvar_MaxRounds != INVALID_HANDLE)

 		{

 			new maxrounds = GetConVarInt(g_Cvar_MaxRounds);

 			if (maxrounds > 0)

 			{

 				new remaining = maxrounds - g_TotalRounds;

 				if (written)

 				{

 					new len = strlen(finalOutput);

 					if (len < sizeof(finalOutput))

 					{

 						if (remaining > 1)

 						{

 							FormatEx(finalOutput[len], sizeof(finalOutput)-len, "%T", "MaxRoundsAppendPlural", client, remaining);

 						}

 						else

 						{

 							FormatEx(finalOutput[len], sizeof(finalOutput)-len, "%T", "MaxRoundsAppend", client);

 						}

 					}

 				}

 				else

 				{

 					if (remaining > 1)

 					{

 						FormatEx(finalOutput, sizeof(finalOutput), "%T", "MaxRoundsPlural", client, remaining);

 					}

 					else

 					{

 						FormatEx(finalOutput, sizeof(finalOutput), "%T", "MaxRounds", client);

 					}

 					written = true;

 				}			

 			}		

 		}

 	}

 	if (lastround)

 	{

 		FormatEx(finalOutput, sizeof(finalOutput), "%T", "LastRound", client);

 	}

 	else if (notimelimit && !written)

 	{

 		FormatEx(finalOutput, sizeof(finalOutput), "%T", "NoTimelimit", client);

 	}

 	if (who == TIMELEFT_ALL_ALWAYS

 		|| (who == TIMELEFT_ALL_MAYBE && GetConVarInt(g_Cvar_TriggerShow)))

 	{

 		PrintToChatAll("[SM] %s", finalOutput);

 	}

 	else if (client != 0)

 	{

 		PrintToChat(client, "[SM] %s", finalOutput);

 	}

 	if (client == 0)

 	{

 		PrintToServer("[SM] %s", finalOutput);

 	}

 }