plugins/basebans/ban.sp
author David Anderson <danderson@mozilla.com>
Thu Aug 08 09:41:24 2013 -0700 (2013-08-08)
changeset 3977 fca2b54741ca
parent 3808 b5f4ea4d3736
child 4089 a4e4207da173
permissions -rw-r--r--
Refactor the JIT to use a newer, simpler macro assembler. (bug 5827, r=ann)
ferret99gt@1789
     1
/**
ferret99gt@1789
     2
 * vim: set ts=4 :
ferret99gt@1789
     3
 * =============================================================================
ferret99gt@1789
     4
 * SourceMod Basecommands
ferret99gt@1789
     5
 * Functionality related to banning.
ferret99gt@1789
     6
 *
ds@1947
     7
 * SourceMod (C)2004-2008 AlliedModders LLC.  All rights reserved.
ferret99gt@1789
     8
 * =============================================================================
ferret99gt@1789
     9
 *
ferret99gt@1789
    10
 * This program is free software; you can redistribute it and/or modify it under
ferret99gt@1789
    11
 * the terms of the GNU General Public License, version 3.0, as published by the
ferret99gt@1789
    12
 * Free Software Foundation.
schubertm@2280
    13
 *
ferret99gt@1789
    14
 * This program is distributed in the hope that it will be useful, but WITHOUT
ferret99gt@1789
    15
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
ferret99gt@1789
    16
 * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
ferret99gt@1789
    17
 * details.
ferret99gt@1789
    18
 *
ferret99gt@1789
    19
 * You should have received a copy of the GNU General Public License along with
ferret99gt@1789
    20
 * this program.  If not, see <http://www.gnu.org/licenses/>.
ferret99gt@1789
    21
 *
ferret99gt@1789
    22
 * As a special exception, AlliedModders LLC gives you permission to link the
ferret99gt@1789
    23
 * code of this program (as well as its derivative works) to "Half-Life 2," the
ferret99gt@1789
    24
 * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
ferret99gt@1789
    25
 * by the Valve Corporation.  You must obey the GNU General Public License in
ferret99gt@1789
    26
 * all respects for all other code used.  Additionally, AlliedModders LLC grants
ferret99gt@1789
    27
 * this exception to all derivative works.  AlliedModders LLC defines further
ferret99gt@1789
    28
 * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
ferret99gt@1789
    29
 * or <http://www.sourcemod.net/license.php>.
ferret99gt@1789
    30
 *
ds@1990
    31
 * Version: $Id$
ferret99gt@1789
    32
 */
schubertm@2280
    33
dvander@1672
    34
PrepareBan(client, target, time, const String:reason[])
pred@1536
    35
{
pred@2221
    36
	new originalTarget = GetClientOfUserId(g_BanTargetUserId[client]);
schubertm@2280
    37
pred@2221
    38
	if (originalTarget != target)
pred@2221
    39
	{
schubertm@2280
    40
		if (client == 0)
schubertm@2280
    41
		{
schubertm@2280
    42
			PrintToServer("[SM] %t", "Player no longer available");
schubertm@2280
    43
		}
schubertm@2280
    44
		else
schubertm@2280
    45
		{
schubertm@2280
    46
			PrintToChat(client, "[SM] %t", "Player no longer available");
schubertm@2280
    47
		}
schubertm@2280
    48
schubertm@2280
    49
		return;
pred@2221
    50
	}
schubertm@2280
    51
asherkin@3808
    52
	new String:name[32];
pred@1536
    53
	GetClientName(target, name, sizeof(name));
pred@1536
    54
pred@1536
    55
	if (!time)
pred@1536
    56
	{
pred@1536
    57
		if (reason[0] == '\0')
pred@1536
    58
		{
pred@1536
    59
			ShowActivity(client, "%t", "Permabanned player", name);
pred@1536
    60
		} else {
pred@1536
    61
			ShowActivity(client, "%t", "Permabanned player reason", name, reason);
pred@1536
    62
		}
pred@1536
    63
	} else {
pred@1536
    64
		if (reason[0] == '\0')
pred@1536
    65
		{
pred@1536
    66
			ShowActivity(client, "%t", "Banned player", name, time);
pred@1536
    67
		} else {
pred@1536
    68
			ShowActivity(client, "%t", "Banned player reason", name, time, reason);
pred@1536
    69
		}
pred@1536
    70
	}
pred@1536
    71
pred@1536
    72
	LogAction(client, target, "\"%L\" banned \"%L\" (minutes \"%d\") (reason \"%s\")", client, target, time, reason);
pred@1536
    73
pred@1536
    74
	if (reason[0] == '\0')
pred@1536
    75
	{
dvander@1672
    76
		BanClient(target, time, BANFLAG_AUTO, "Banned", "Banned", "sm_ban", client);
pred@1536
    77
	}
dvander@1672
    78
	else
dvander@1672
    79
	{
dvander@1672
    80
		BanClient(target, time, BANFLAG_AUTO, reason, reason, "sm_ban", client);
dvander@1672
    81
	}
pred@1536
    82
}
pred@1536
    83
pred@1536
    84
DisplayBanTargetMenu(client)
pred@1536
    85
{
pred@1536
    86
	new Handle:menu = CreateMenu(MenuHandler_BanPlayerList);
schubertm@2280
    87
pred@1536
    88
	decl String:title[100];
dvander@1592
    89
	Format(title, sizeof(title), "%T:", "Ban player", client);
pred@1536
    90
	SetMenuTitle(menu, title);
pred@1536
    91
	SetMenuExitBackButton(menu, true);
schubertm@2280
    92
dvander@1832
    93
	AddTargetsToMenu2(menu, client, COMMAND_FILTER_NO_BOTS|COMMAND_FILTER_CONNECTED);
schubertm@2280
    94
pred@1536
    95
	DisplayMenu(menu, client, MENU_TIME_FOREVER);
pred@1536
    96
}
pred@1536
    97
pred@1536
    98
DisplayBanTimeMenu(client)
pred@1536
    99
{
pred@1536
   100
	new Handle:menu = CreateMenu(MenuHandler_BanTimeList);
schubertm@2280
   101
pred@1536
   102
	decl String:title[100];
fyrenmoo@2640
   103
	Format(title, sizeof(title), "%T: %N", "Ban player", client, g_BanTarget[client]);
pred@1536
   104
	SetMenuTitle(menu, title);
pred@1536
   105
	SetMenuExitBackButton(menu, true);
schubertm@2280
   106
pred@1536
   107
	AddMenuItem(menu, "0", "Permanent");
pred@1536
   108
	AddMenuItem(menu, "10", "10 Minutes");
pred@1536
   109
	AddMenuItem(menu, "30", "30 Minutes");
pred@1536
   110
	AddMenuItem(menu, "60", "1 Hour");
pred@1536
   111
	AddMenuItem(menu, "240", "4 Hours");
pred@1536
   112
	AddMenuItem(menu, "1440", "1 Day");
pred@1536
   113
	AddMenuItem(menu, "10080", "1 Week");
schubertm@2280
   114
pred@1536
   115
	DisplayMenu(menu, client, MENU_TIME_FOREVER);
pred@1536
   116
}
pred@1536
   117
pred@1536
   118
DisplayBanReasonMenu(client)
pred@1536
   119
{
pred@1536
   120
	new Handle:menu = CreateMenu(MenuHandler_BanReasonList);
schubertm@2280
   121
pred@1536
   122
	decl String:title[100];
fyrenmoo@2640
   123
	Format(title, sizeof(title), "%T: %N", "Ban reason", client, g_BanTarget[client]);
pred@1536
   124
	SetMenuTitle(menu, title);
pred@1536
   125
	SetMenuExitBackButton(menu, true);
schubertm@2280
   126
dvander@1592
   127
	/* :TODO: we should either remove this or make it configurable */
schubertm@2280
   128
pred@1536
   129
	AddMenuItem(menu, "Abusive", "Abusive");
pred@1536
   130
	AddMenuItem(menu, "Racism", "Racism");
pred@1536
   131
	AddMenuItem(menu, "General cheating/exploits", "General cheating/exploits");
pred@1536
   132
	AddMenuItem(menu, "Wallhack", "Wallhack");
pred@1536
   133
	AddMenuItem(menu, "Aimbot", "Aimbot");
pred@1536
   134
	AddMenuItem(menu, "Speedhacking", "Speedhacking");
pred@1536
   135
	AddMenuItem(menu, "Mic spamming", "Mic spamming");
skamonkey@3450
   136
	AddMenuItem(menu, "Admin disrespect", "Admin disrespect");
pred@1536
   137
	AddMenuItem(menu, "Camping", "Camping");
pred@1536
   138
	AddMenuItem(menu, "Team killing", "Team killing");
pred@1536
   139
	AddMenuItem(menu, "Unacceptable Spray", "Unacceptable Spray");
pred@1536
   140
	AddMenuItem(menu, "Breaking Server Rules", "Breaking Server Rules");
pred@1536
   141
	AddMenuItem(menu, "Other", "Other");
schubertm@2280
   142
pred@1536
   143
	DisplayMenu(menu, client, MENU_TIME_FOREVER);
pred@1536
   144
}
pred@1536
   145
schubertm@2280
   146
public AdminMenu_Ban(Handle:topmenu,
pred@1536
   147
							  TopMenuAction:action,
pred@1536
   148
							  TopMenuObject:object_id,
pred@1536
   149
							  param,
pred@1536
   150
							  String:buffer[],
pred@1536
   151
							  maxlength)
pred@1536
   152
{
pred@1536
   153
	if (action == TopMenuAction_DisplayOption)
pred@1536
   154
	{
dvander@1592
   155
		Format(buffer, maxlength, "%T", "Ban player", param);
pred@1536
   156
	}
pred@1536
   157
	else if (action == TopMenuAction_SelectOption)
pred@1536
   158
	{
pred@1536
   159
		DisplayBanTargetMenu(param);
pred@1536
   160
	}
pred@1536
   161
}
pred@1536
   162
pred@1536
   163
public MenuHandler_BanReasonList(Handle:menu, MenuAction:action, param1, param2)
pred@1536
   164
{
pred@1536
   165
	if (action == MenuAction_End)
pred@1536
   166
	{
pred@1536
   167
		CloseHandle(menu);
pred@1536
   168
	}
pred@1536
   169
	else if (action == MenuAction_Cancel)
pred@1536
   170
	{
pred@1536
   171
		if (param2 == MenuCancel_ExitBack && hTopMenu != INVALID_HANDLE)
pred@1536
   172
		{
pred@1536
   173
			DisplayTopMenu(hTopMenu, param1, TopMenuPosition_LastCategory);
pred@1536
   174
		}
pred@1536
   175
	}
pred@1536
   176
	else if (action == MenuAction_Select)
pred@1536
   177
	{
pred@1536
   178
		decl String:info[64];
schubertm@2280
   179
pred@1536
   180
		GetMenuItem(menu, param2, info, sizeof(info));
schubertm@2280
   181
dvander@1672
   182
		PrepareBan(param1, g_BanTarget[param1], g_BanTime[param1], info);
pred@1536
   183
	}
pred@1536
   184
}
pred@1536
   185
pred@1536
   186
public MenuHandler_BanPlayerList(Handle:menu, MenuAction:action, param1, param2)
pred@1536
   187
{
pred@1536
   188
	if (action == MenuAction_End)
pred@1536
   189
	{
pred@1536
   190
		CloseHandle(menu);
pred@1536
   191
	}
pred@1536
   192
	else if (action == MenuAction_Cancel)
pred@1536
   193
	{
pred@1536
   194
		if (param2 == MenuCancel_ExitBack && hTopMenu != INVALID_HANDLE)
pred@1536
   195
		{
pred@1536
   196
			DisplayTopMenu(hTopMenu, param1, TopMenuPosition_LastCategory);
pred@1536
   197
		}
pred@1536
   198
	}
pred@1536
   199
	else if (action == MenuAction_Select)
pred@1536
   200
	{
pred@1536
   201
		decl String:info[32], String:name[32];
pred@1536
   202
		new userid, target;
schubertm@2280
   203
pred@1536
   204
		GetMenuItem(menu, param2, info, sizeof(info), _, name, sizeof(name));
pred@1536
   205
		userid = StringToInt(info);
pred@1536
   206
pred@1536
   207
		if ((target = GetClientOfUserId(userid)) == 0)
pred@1536
   208
		{
pred@1536
   209
			PrintToChat(param1, "[SM] %t", "Player no longer available");
pred@1536
   210
		}
pred@1536
   211
		else if (!CanUserTarget(param1, target))
pred@1536
   212
		{
pred@1536
   213
			PrintToChat(param1, "[SM] %t", "Unable to target");
pred@1536
   214
		}
pred@1536
   215
		else
pred@1536
   216
		{
pred@1536
   217
			g_BanTarget[param1] = target;
pred@2221
   218
			g_BanTargetUserId[param1] = userid;
pred@1536
   219
			DisplayBanTimeMenu(param1);
pred@1536
   220
		}
pred@1536
   221
	}
pred@1536
   222
}
pred@1536
   223
pred@1536
   224
public MenuHandler_BanTimeList(Handle:menu, MenuAction:action, param1, param2)
pred@1536
   225
{
pred@1536
   226
	if (action == MenuAction_End)
pred@1536
   227
	{
pred@1536
   228
		CloseHandle(menu);
pred@1536
   229
	}
pred@1536
   230
	else if (action == MenuAction_Cancel)
pred@1536
   231
	{
pred@1536
   232
		if (param2 == MenuCancel_ExitBack && hTopMenu != INVALID_HANDLE)
pred@1536
   233
		{
pred@1536
   234
			DisplayTopMenu(hTopMenu, param1, TopMenuPosition_LastCategory);
pred@1536
   235
		}
pred@1536
   236
	}
pred@1536
   237
	else if (action == MenuAction_Select)
pred@1536
   238
	{
pred@1536
   239
		decl String:info[32];
schubertm@2280
   240
pred@1536
   241
		GetMenuItem(menu, param2, info, sizeof(info));
pred@1536
   242
		g_BanTime[param1] = StringToInt(info);
schubertm@2280
   243
pred@1536
   244
		DisplayBanReasonMenu(param1);
pred@1536
   245
	}
pred@1536
   246
}
pred@1536
   247
pred@1536
   248
pred@1536
   249
public Action:Command_Ban(client, args)
pred@1536
   250
{
pred@1536
   251
	if (args < 2)
pred@1536
   252
	{
pred@1536
   253
		ReplyToCommand(client, "[SM] Usage: sm_ban <#userid|name> <minutes|0> [reason]");
pred@1536
   254
		return Plugin_Handled;
pred@1536
   255
	}
schubertm@2280
   256
dvander@1672
   257
	decl len, next_len;
dvander@1672
   258
	decl String:Arguments[256];
dvander@1672
   259
	GetCmdArgString(Arguments, sizeof(Arguments));
pred@1536
   260
schubertm@2280
   261
	decl String:arg[65];
dvander@1672
   262
	len = BreakString(Arguments, arg, sizeof(arg));
pred@1536
   263
pred@1536
   264
	new target = FindTarget(client, arg, true);
pred@1536
   265
	if (target == -1)
pred@1536
   266
	{
pred@1536
   267
		return Plugin_Handled;
pred@1536
   268
	}
pred@1536
   269
pred@1536
   270
	decl String:s_time[12];
dvander@1672
   271
	if ((next_len = BreakString(Arguments[len], s_time, sizeof(s_time))) != -1)
dvander@1672
   272
	{
dvander@1672
   273
		len += next_len;
dvander@1672
   274
	}
dvander@1672
   275
	else
dvander@1672
   276
	{
dvander@1672
   277
		len = 0;
dvander@1672
   278
		Arguments[0] = '\0';
dvander@1672
   279
	}
pred@1536
   280
pred@1536
   281
	new time = StringToInt(s_time);
pred@1536
   282
schubertm@2280
   283
	g_BanTargetUserId[client] = GetClientUserId(target);
schubertm@2280
   284
dvander@1672
   285
	PrepareBan(client, target, time, Arguments[len]);
pred@1536
   286
pred@1536
   287
	return Plugin_Handled;
dvander@1672
   288
}