ferret99gt@1789: /**
ferret99gt@1789:  * vim: set ts=4 :
ferret99gt@1789:  * =============================================================================
ferret99gt@1789:  * SourceMod Basecommands
ferret99gt@1789:  * Functionality related to banning.
ferret99gt@1789:  *
ds@1947:  * SourceMod (C)2004-2008 AlliedModders LLC.  All rights reserved.
ferret99gt@1789:  * =============================================================================
ferret99gt@1789:  *
ferret99gt@1789:  * This program is free software; you can redistribute it and/or modify it under
ferret99gt@1789:  * the terms of the GNU General Public License, version 3.0, as published by the
ferret99gt@1789:  * Free Software Foundation.
schubertm@2280:  *
ferret99gt@1789:  * This program is distributed in the hope that it will be useful, but WITHOUT
ferret99gt@1789:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
ferret99gt@1789:  * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
ferret99gt@1789:  * details.
ferret99gt@1789:  *
ferret99gt@1789:  * You should have received a copy of the GNU General Public License along with
ferret99gt@1789:  * this program.  If not, see <http://www.gnu.org/licenses/>.
ferret99gt@1789:  *
ferret99gt@1789:  * As a special exception, AlliedModders LLC gives you permission to link the
ferret99gt@1789:  * code of this program (as well as its derivative works) to "Half-Life 2," the
ferret99gt@1789:  * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
ferret99gt@1789:  * by the Valve Corporation.  You must obey the GNU General Public License in
ferret99gt@1789:  * all respects for all other code used.  Additionally, AlliedModders LLC grants
ferret99gt@1789:  * this exception to all derivative works.  AlliedModders LLC defines further
ferret99gt@1789:  * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
ferret99gt@1789:  * or <http://www.sourcemod.net/license.php>.
ferret99gt@1789:  *
ds@1990:  * Version: $Id$
ferret99gt@1789:  */
schubertm@2280: 
dvander@1672: PrepareBan(client, target, time, const String:reason[])
pred@1536: {
pred@2221: 	new originalTarget = GetClientOfUserId(g_BanTargetUserId[client]);
schubertm@2280: 
pred@2221: 	if (originalTarget != target)
pred@2221: 	{
schubertm@2280: 		if (client == 0)
schubertm@2280: 		{
schubertm@2280: 			PrintToServer("[SM] %t", "Player no longer available");
schubertm@2280: 		}
schubertm@2280: 		else
schubertm@2280: 		{
schubertm@2280: 			PrintToChat(client, "[SM] %t", "Player no longer available");
schubertm@2280: 		}
schubertm@2280: 
schubertm@2280: 		return;
pred@2221: 	}
schubertm@2280: 
pred@1536: 	decl String:authid[64], String:name[32];
pred@1536: 	GetClientAuthString(target, authid, sizeof(authid));
pred@1536: 	GetClientName(target, name, sizeof(name));
pred@1536: 
pred@1536: 	if (!time)
pred@1536: 	{
pred@1536: 		if (reason[0] == '\0')
pred@1536: 		{
pred@1536: 			ShowActivity(client, "%t", "Permabanned player", name);
pred@1536: 		} else {
pred@1536: 			ShowActivity(client, "%t", "Permabanned player reason", name, reason);
pred@1536: 		}
pred@1536: 	} else {
pred@1536: 		if (reason[0] == '\0')
pred@1536: 		{
pred@1536: 			ShowActivity(client, "%t", "Banned player", name, time);
pred@1536: 		} else {
pred@1536: 			ShowActivity(client, "%t", "Banned player reason", name, time, reason);
pred@1536: 		}
pred@1536: 	}
pred@1536: 
pred@1536: 	LogAction(client, target, "\"%L\" banned \"%L\" (minutes \"%d\") (reason \"%s\")", client, target, time, reason);
pred@1536: 
pred@1536: 	if (reason[0] == '\0')
pred@1536: 	{
dvander@1672: 		BanClient(target, time, BANFLAG_AUTO, "Banned", "Banned", "sm_ban", client);
pred@1536: 	}
dvander@1672: 	else
dvander@1672: 	{
dvander@1672: 		BanClient(target, time, BANFLAG_AUTO, reason, reason, "sm_ban", client);
dvander@1672: 	}
pred@1536: }
pred@1536: 
pred@1536: DisplayBanTargetMenu(client)
pred@1536: {
pred@1536: 	new Handle:menu = CreateMenu(MenuHandler_BanPlayerList);
schubertm@2280: 
pred@1536: 	decl String:title[100];
dvander@1592: 	Format(title, sizeof(title), "%T:", "Ban player", client);
pred@1536: 	SetMenuTitle(menu, title);
pred@1536: 	SetMenuExitBackButton(menu, true);
schubertm@2280: 
dvander@1832: 	AddTargetsToMenu2(menu, client, COMMAND_FILTER_NO_BOTS|COMMAND_FILTER_CONNECTED);
schubertm@2280: 
pred@1536: 	DisplayMenu(menu, client, MENU_TIME_FOREVER);
pred@1536: }
pred@1536: 
pred@1536: DisplayBanTimeMenu(client)
pred@1536: {
pred@1536: 	new Handle:menu = CreateMenu(MenuHandler_BanTimeList);
schubertm@2280: 
pred@1536: 	decl String:title[100];
fyrenmoo@2640: 	Format(title, sizeof(title), "%T: %N", "Ban player", client, g_BanTarget[client]);
pred@1536: 	SetMenuTitle(menu, title);
pred@1536: 	SetMenuExitBackButton(menu, true);
schubertm@2280: 
pred@1536: 	AddMenuItem(menu, "0", "Permanent");
pred@1536: 	AddMenuItem(menu, "10", "10 Minutes");
pred@1536: 	AddMenuItem(menu, "30", "30 Minutes");
pred@1536: 	AddMenuItem(menu, "60", "1 Hour");
pred@1536: 	AddMenuItem(menu, "240", "4 Hours");
pred@1536: 	AddMenuItem(menu, "1440", "1 Day");
pred@1536: 	AddMenuItem(menu, "10080", "1 Week");
schubertm@2280: 
pred@1536: 	DisplayMenu(menu, client, MENU_TIME_FOREVER);
pred@1536: }
pred@1536: 
pred@1536: DisplayBanReasonMenu(client)
pred@1536: {
pred@1536: 	new Handle:menu = CreateMenu(MenuHandler_BanReasonList);
schubertm@2280: 
pred@1536: 	decl String:title[100];
fyrenmoo@2640: 	Format(title, sizeof(title), "%T: %N", "Ban reason", client, g_BanTarget[client]);
pred@1536: 	SetMenuTitle(menu, title);
pred@1536: 	SetMenuExitBackButton(menu, true);
schubertm@2280: 
dvander@1592: 	/* :TODO: we should either remove this or make it configurable */
schubertm@2280: 
pred@1536: 	AddMenuItem(menu, "Abusive", "Abusive");
pred@1536: 	AddMenuItem(menu, "Racism", "Racism");
pred@1536: 	AddMenuItem(menu, "General cheating/exploits", "General cheating/exploits");
pred@1536: 	AddMenuItem(menu, "Wallhack", "Wallhack");
pred@1536: 	AddMenuItem(menu, "Aimbot", "Aimbot");
pred@1536: 	AddMenuItem(menu, "Speedhacking", "Speedhacking");
pred@1536: 	AddMenuItem(menu, "Mic spamming", "Mic spamming");
pred@1536: 	AddMenuItem(menu, "Admin disrepect", "Admin disrepect");
pred@1536: 	AddMenuItem(menu, "Camping", "Camping");
pred@1536: 	AddMenuItem(menu, "Team killing", "Team killing");
pred@1536: 	AddMenuItem(menu, "Unacceptable Spray", "Unacceptable Spray");
pred@1536: 	AddMenuItem(menu, "Breaking Server Rules", "Breaking Server Rules");
pred@1536: 	AddMenuItem(menu, "Other", "Other");
schubertm@2280: 
pred@1536: 	DisplayMenu(menu, client, MENU_TIME_FOREVER);
pred@1536: }
pred@1536: 
schubertm@2280: public AdminMenu_Ban(Handle:topmenu,
pred@1536: 							  TopMenuAction:action,
pred@1536: 							  TopMenuObject:object_id,
pred@1536: 							  param,
pred@1536: 							  String:buffer[],
pred@1536: 							  maxlength)
pred@1536: {
pred@1536: 	if (action == TopMenuAction_DisplayOption)
pred@1536: 	{
dvander@1592: 		Format(buffer, maxlength, "%T", "Ban player", param);
pred@1536: 	}
pred@1536: 	else if (action == TopMenuAction_SelectOption)
pred@1536: 	{
pred@1536: 		DisplayBanTargetMenu(param);
pred@1536: 	}
pred@1536: }
pred@1536: 
pred@1536: public MenuHandler_BanReasonList(Handle:menu, MenuAction:action, param1, param2)
pred@1536: {
pred@1536: 	if (action == MenuAction_End)
pred@1536: 	{
pred@1536: 		CloseHandle(menu);
pred@1536: 	}
pred@1536: 	else if (action == MenuAction_Cancel)
pred@1536: 	{
pred@1536: 		if (param2 == MenuCancel_ExitBack && hTopMenu != INVALID_HANDLE)
pred@1536: 		{
pred@1536: 			DisplayTopMenu(hTopMenu, param1, TopMenuPosition_LastCategory);
pred@1536: 		}
pred@1536: 	}
pred@1536: 	else if (action == MenuAction_Select)
pred@1536: 	{
pred@1536: 		decl String:info[64];
schubertm@2280: 
pred@1536: 		GetMenuItem(menu, param2, info, sizeof(info));
schubertm@2280: 
dvander@1672: 		PrepareBan(param1, g_BanTarget[param1], g_BanTime[param1], info);
pred@1536: 	}
pred@1536: }
pred@1536: 
pred@1536: public MenuHandler_BanPlayerList(Handle:menu, MenuAction:action, param1, param2)
pred@1536: {
pred@1536: 	if (action == MenuAction_End)
pred@1536: 	{
pred@1536: 		CloseHandle(menu);
pred@1536: 	}
pred@1536: 	else if (action == MenuAction_Cancel)
pred@1536: 	{
pred@1536: 		if (param2 == MenuCancel_ExitBack && hTopMenu != INVALID_HANDLE)
pred@1536: 		{
pred@1536: 			DisplayTopMenu(hTopMenu, param1, TopMenuPosition_LastCategory);
pred@1536: 		}
pred@1536: 	}
pred@1536: 	else if (action == MenuAction_Select)
pred@1536: 	{
pred@1536: 		decl String:info[32], String:name[32];
pred@1536: 		new userid, target;
schubertm@2280: 
pred@1536: 		GetMenuItem(menu, param2, info, sizeof(info), _, name, sizeof(name));
pred@1536: 		userid = StringToInt(info);
pred@1536: 
pred@1536: 		if ((target = GetClientOfUserId(userid)) == 0)
pred@1536: 		{
pred@1536: 			PrintToChat(param1, "[SM] %t", "Player no longer available");
pred@1536: 		}
pred@1536: 		else if (!CanUserTarget(param1, target))
pred@1536: 		{
pred@1536: 			PrintToChat(param1, "[SM] %t", "Unable to target");
pred@1536: 		}
pred@1536: 		else
pred@1536: 		{
pred@1536: 			g_BanTarget[param1] = target;
pred@2221: 			g_BanTargetUserId[param1] = userid;
pred@1536: 			DisplayBanTimeMenu(param1);
pred@1536: 		}
pred@1536: 	}
pred@1536: }
pred@1536: 
pred@1536: public MenuHandler_BanTimeList(Handle:menu, MenuAction:action, param1, param2)
pred@1536: {
pred@1536: 	if (action == MenuAction_End)
pred@1536: 	{
pred@1536: 		CloseHandle(menu);
pred@1536: 	}
pred@1536: 	else if (action == MenuAction_Cancel)
pred@1536: 	{
pred@1536: 		if (param2 == MenuCancel_ExitBack && hTopMenu != INVALID_HANDLE)
pred@1536: 		{
pred@1536: 			DisplayTopMenu(hTopMenu, param1, TopMenuPosition_LastCategory);
pred@1536: 		}
pred@1536: 	}
pred@1536: 	else if (action == MenuAction_Select)
pred@1536: 	{
pred@1536: 		decl String:info[32];
schubertm@2280: 
pred@1536: 		GetMenuItem(menu, param2, info, sizeof(info));
pred@1536: 		g_BanTime[param1] = StringToInt(info);
schubertm@2280: 
pred@1536: 		DisplayBanReasonMenu(param1);
pred@1536: 	}
pred@1536: }
pred@1536: 
pred@1536: 
pred@1536: public Action:Command_Ban(client, args)
pred@1536: {
pred@1536: 	if (args < 2)
pred@1536: 	{
pred@1536: 		ReplyToCommand(client, "[SM] Usage: sm_ban <#userid|name> <minutes|0> [reason]");
pred@1536: 		return Plugin_Handled;
pred@1536: 	}
schubertm@2280: 
dvander@1672: 	decl len, next_len;
dvander@1672: 	decl String:Arguments[256];
dvander@1672: 	GetCmdArgString(Arguments, sizeof(Arguments));
pred@1536: 
schubertm@2280: 	decl String:arg[65];
dvander@1672: 	len = BreakString(Arguments, arg, sizeof(arg));
pred@1536: 
pred@1536: 	new target = FindTarget(client, arg, true);
pred@1536: 	if (target == -1)
pred@1536: 	{
pred@1536: 		return Plugin_Handled;
pred@1536: 	}
pred@1536: 
pred@1536: 	decl String:s_time[12];
dvander@1672: 	if ((next_len = BreakString(Arguments[len], s_time, sizeof(s_time))) != -1)
dvander@1672: 	{
dvander@1672: 		len += next_len;
dvander@1672: 	}
dvander@1672: 	else
dvander@1672: 	{
dvander@1672: 		len = 0;
dvander@1672: 		Arguments[0] = '\0';
dvander@1672: 	}
pred@1536: 
pred@1536: 	new time = StringToInt(s_time);
pred@1536: 
schubertm@2280: 	g_BanTargetUserId[client] = GetClientUserId(target);
schubertm@2280: 
dvander@1672: 	PrepareBan(client, target, time, Arguments[len]);
pred@1536: 
pred@1536: 	return Plugin_Handled;
dvander@1672: }