plugins/adminmenu.sp
author David Anderson <danderson@mozilla.com>
Thu Aug 08 09:40:23 2013 -0700 (2013-08-08)
changeset 3976 bc77cfde7c5c
parent 2920 1d5645ab7ae0
permissions -rw-r--r--
Add -Wno-narrowing to support building on GCC-4.7 (no bug, r=me).
dvander@1510
     1
/**
dvander@1510
     2
 * vim: set ts=4 :
dvander@1510
     3
 * =============================================================================
pred@1537
     4
 * SourceMod Admin Menu Plugin
pred@1537
     5
 * Creates the base admin menu, for plugins to add items to.
dvander@1510
     6
 *
ds@1947
     7
 * SourceMod (C)2004-2008 AlliedModders LLC.  All rights reserved.
dvander@1510
     8
 * =============================================================================
dvander@1510
     9
 *
dvander@1510
    10
 * This program is free software; you can redistribute it and/or modify it under
dvander@1510
    11
 * the terms of the GNU General Public License, version 3.0, as published by the
dvander@1510
    12
 * Free Software Foundation.
dvander@1510
    13
 * 
dvander@1510
    14
 * This program is distributed in the hope that it will be useful, but WITHOUT
dvander@1510
    15
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
dvander@1510
    16
 * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
dvander@1510
    17
 * details.
dvander@1510
    18
 *
dvander@1510
    19
 * You should have received a copy of the GNU General Public License along with
dvander@1510
    20
 * this program.  If not, see <http://www.gnu.org/licenses/>.
dvander@1510
    21
 *
dvander@1510
    22
 * As a special exception, AlliedModders LLC gives you permission to link the
dvander@1510
    23
 * code of this program (as well as its derivative works) to "Half-Life 2," the
dvander@1510
    24
 * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
dvander@1510
    25
 * by the Valve Corporation.  You must obey the GNU General Public License in
dvander@1510
    26
 * all respects for all other code used.  Additionally, AlliedModders LLC grants
dvander@1510
    27
 * this exception to all derivative works.  AlliedModders LLC defines further
dvander@1510
    28
 * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
dvander@1510
    29
 * or <http://www.sourcemod.net/license.php>.
dvander@1510
    30
 *
dvander@1510
    31
 * Version: $Id$
dvander@1510
    32
 */
dvander@1510
    33
dvander@1510
    34
#pragma semicolon 1
dvander@1510
    35
dvander@1510
    36
#include <sourcemod>
dvander@1510
    37
#include <topmenus>
dvander@1510
    38
dvander@1510
    39
public Plugin:myinfo = 
dvander@1510
    40
{
dvander@1510
    41
	name = "Admin Menu",
dvander@1510
    42
	author = "AlliedModders LLC",
dvander@1510
    43
	description = "Administration Menu",
dvander@1510
    44
	version = SOURCEMOD_VERSION,
dvander@1510
    45
	url = "http://www.sourcemod.net/"
dvander@1510
    46
};
dvander@1510
    47
dvander@1510
    48
/* Forwards */
dvander@1510
    49
new Handle:hOnAdminMenuReady = INVALID_HANDLE;
dvander@1510
    50
new Handle:hOnAdminMenuCreated = INVALID_HANDLE;
dvander@1510
    51
dvander@1510
    52
/* Menus */
dvander@1510
    53
new Handle:hAdminMenu = INVALID_HANDLE;
dvander@1510
    54
dvander@1510
    55
/* Top menu objects */
dvander@1510
    56
new TopMenuObject:obj_playercmds = INVALID_TOPMENUOBJECT;
dvander@1518
    57
new TopMenuObject:obj_servercmds = INVALID_TOPMENUOBJECT;
dvander@1523
    58
new TopMenuObject:obj_votingcmds = INVALID_TOPMENUOBJECT;
dvander@1510
    59
dvander@1945
    60
#include "adminmenu/dynamicmenu.sp"
dvander@1945
    61
fyrenmoo@2676
    62
public APLRes:AskPluginLoad2(Handle:myself, bool:late, String:error[], err_max)
dvander@1510
    63
{
dvander@1510
    64
	CreateNative("GetAdminTopMenu", __GetAdminTopMenu);
dvander@1510
    65
	CreateNative("AddTargetsToMenu", __AddTargetsToMenu);
dvander@1832
    66
	CreateNative("AddTargetsToMenu2", __AddTargetsToMenu2);
dvander@1510
    67
	RegPluginLibrary("adminmenu");
fyrenmoo@2676
    68
	return APLRes_Success;
dvander@1510
    69
}
dvander@1510
    70
dvander@1510
    71
public OnPluginStart()
dvander@1510
    72
{
dvander@1510
    73
	LoadTranslations("common.phrases");
dvander@1625
    74
	LoadTranslations("adminmenu.phrases");
dvander@1510
    75
	
dvander@1510
    76
	hOnAdminMenuCreated = CreateGlobalForward("OnAdminMenuCreated", ET_Ignore, Param_Cell);
dvander@1510
    77
	hOnAdminMenuReady = CreateGlobalForward("OnAdminMenuReady", ET_Ignore, Param_Cell);
dvander@1510
    78
dvander@1630
    79
	RegAdminCmd("sm_admin", Command_DisplayMenu, ADMFLAG_GENERIC, "Displays the admin menu");
dvander@1510
    80
}
dvander@1510
    81
dvander@1590
    82
public OnConfigsExecuted()
dvander@1590
    83
{
dvander@1590
    84
	decl String:path[PLATFORM_MAX_PATH];
dvander@1590
    85
	decl String:error[256];
dvander@1590
    86
	
dvander@1590
    87
	BuildPath(Path_SM, path, sizeof(path), "configs/adminmenu_sorting.txt");
dvander@1590
    88
	
dvander@1590
    89
	if (!LoadTopMenuConfig(hAdminMenu, path, error, sizeof(error)))
dvander@1590
    90
	{
dvander@1590
    91
		LogError("Could not load admin menu config (file \"%s\": %s)", path, error);
dvander@1590
    92
		return;
dvander@1590
    93
	}
dvander@1590
    94
}
dvander@1590
    95
dvander@1945
    96
public OnMapStart()
dvander@1945
    97
{
dvander@1945
    98
	ParseConfigs();
dvander@1945
    99
}
dvander@1945
   100
dvander@1510
   101
public OnAllPluginsLoaded()
dvander@1510
   102
{
dvander@1945
   103
	hAdminMenu = CreateTopMenu(DefaultCategoryHandler);
dvander@1510
   104
	
dvander@1510
   105
	obj_playercmds = AddToTopMenu(hAdminMenu, 
dvander@1510
   106
		"PlayerCommands",
dvander@1510
   107
		TopMenuObject_Category,
dvander@1945
   108
		DefaultCategoryHandler,
dvander@1510
   109
		INVALID_TOPMENUOBJECT);
dvander@1518
   110
dvander@1518
   111
	obj_servercmds = AddToTopMenu(hAdminMenu,
dvander@1518
   112
		"ServerCommands",
dvander@1518
   113
		TopMenuObject_Category,
dvander@1945
   114
		DefaultCategoryHandler,
dvander@1518
   115
		INVALID_TOPMENUOBJECT);
dvander@1523
   116
dvander@1523
   117
	obj_votingcmds = AddToTopMenu(hAdminMenu,
dvander@1523
   118
		"VotingCommands",
dvander@1523
   119
		TopMenuObject_Category,
dvander@1945
   120
		DefaultCategoryHandler,
dvander@1523
   121
		INVALID_TOPMENUOBJECT);
dvander@1945
   122
		
dvander@1945
   123
	BuildDynamicMenu();
dvander@1510
   124
	
dvander@1510
   125
	Call_StartForward(hOnAdminMenuCreated);
dvander@1510
   126
	Call_PushCell(hAdminMenu);
dvander@1510
   127
	Call_Finish();
dvander@1510
   128
	
dvander@1510
   129
	Call_StartForward(hOnAdminMenuReady);
dvander@1510
   130
	Call_PushCell(hAdminMenu);
dvander@1510
   131
	Call_Finish();
dvander@1510
   132
}
dvander@1510
   133
dvander@1945
   134
public DefaultCategoryHandler(Handle:topmenu, 
dvander@1510
   135
						TopMenuAction:action,
dvander@1510
   136
						TopMenuObject:object_id,
dvander@1510
   137
						param,
dvander@1510
   138
						String:buffer[],
dvander@1510
   139
						maxlength)
dvander@1510
   140
{
dvander@1525
   141
	if (action == TopMenuAction_DisplayTitle)
dvander@1510
   142
	{
dvander@1510
   143
		if (object_id == INVALID_TOPMENUOBJECT)
dvander@1510
   144
		{
dvander@1510
   145
			Format(buffer, maxlength, "%T:", "Admin Menu", param);
dvander@1510
   146
		}
dvander@1510
   147
		else if (object_id == obj_playercmds)
dvander@1510
   148
		{
dvander@1510
   149
			Format(buffer, maxlength, "%T:", "Player Commands", param);
dvander@1510
   150
		}
dvander@1518
   151
		else if (object_id == obj_servercmds)
dvander@1518
   152
		{
dvander@1518
   153
			Format(buffer, maxlength, "%T:", "Server Commands", param);
dvander@1518
   154
		}
dvander@1523
   155
		else if (object_id == obj_votingcmds)
dvander@1523
   156
		{
dvander@1523
   157
			Format(buffer, maxlength, "%T:", "Voting Commands", param);
dvander@1523
   158
		}
dvander@1510
   159
	}
dvander@1525
   160
	else if (action == TopMenuAction_DisplayOption)
dvander@1510
   161
	{
dvander@1510
   162
		if (object_id == obj_playercmds)
dvander@1510
   163
		{
dvander@1510
   164
			Format(buffer, maxlength, "%T", "Player Commands", param);
dvander@1510
   165
		}
dvander@1518
   166
		else if (object_id == obj_servercmds)
dvander@1518
   167
		{
dvander@1518
   168
			Format(buffer, maxlength, "%T", "Server Commands", param);
dvander@1518
   169
		}
dvander@1523
   170
		else if (object_id == obj_votingcmds)
dvander@1523
   171
		{
dvander@1523
   172
			Format(buffer, maxlength, "%T", "Voting Commands", param);
dvander@1523
   173
		}
dvander@1510
   174
	}
dvander@1510
   175
}
dvander@1510
   176
dvander@1510
   177
public __GetAdminTopMenu(Handle:plugin, numParams)
dvander@1510
   178
{
dvander@1510
   179
	return _:hAdminMenu;
dvander@1510
   180
}
dvander@1510
   181
dvander@1510
   182
public __AddTargetsToMenu(Handle:plugin, numParams)
dvander@1510
   183
{
dvander@1632
   184
	new bool:alive_only = false;
dvander@1632
   185
	
dvander@1632
   186
	if (numParams >= 4)
dvander@1632
   187
	{
dvander@1632
   188
		alive_only = GetNativeCell(4);
dvander@1632
   189
	}
dvander@1632
   190
	
dvander@1632
   191
	return UTIL_AddTargetsToMenu(GetNativeCell(1), GetNativeCell(2), GetNativeCell(3), alive_only);
dvander@1510
   192
}
dvander@1510
   193
dvander@1832
   194
public __AddTargetsToMenu2(Handle:plugin, numParams)
dvander@1832
   195
{
dvander@1832
   196
	return UTIL_AddTargetsToMenu2(GetNativeCell(1), GetNativeCell(2), GetNativeCell(3));
dvander@1832
   197
}
dvander@1832
   198
dvander@1510
   199
public Action:Command_DisplayMenu(client, args)
dvander@1510
   200
{
dvander@1603
   201
	if (client == 0)
dvander@1603
   202
	{
dvander@1603
   203
		ReplyToCommand(client, "[SM] %t", "Command is in-game only");
dvander@1603
   204
		return Plugin_Handled;
dvander@1603
   205
	}
dvander@1603
   206
	
dvander@1510
   207
	DisplayTopMenu(hAdminMenu, client, TopMenuPosition_Start);
dvander@1510
   208
	
dvander@1510
   209
	return Plugin_Handled;
dvander@1510
   210
}
dvander@1510
   211
dvander@1832
   212
stock UTIL_AddTargetsToMenu2(Handle:menu, source_client, flags)
dvander@1510
   213
{
dvander@1510
   214
	decl String:user_id[12];
dvander@1510
   215
	decl String:name[MAX_NAME_LENGTH];
dvander@1510
   216
	decl String:display[MAX_NAME_LENGTH+12];
dvander@1510
   217
	
dvander@1510
   218
	new num_clients;
dvander@1510
   219
	
skamonkey@2920
   220
	for (new i = 1; i <= MaxClients; i++)
dvander@1510
   221
	{
dvander@1510
   222
		if (!IsClientConnected(i) || IsClientInKickQueue(i))
dvander@1510
   223
		{
dvander@1510
   224
			continue;
dvander@1510
   225
		}
dvander@1510
   226
		
dvander@1832
   227
		if (((flags & COMMAND_FILTER_NO_BOTS) == COMMAND_FILTER_NO_BOTS)
dvander@1832
   228
			&& IsFakeClient(i))
dvander@1832
   229
		{
dvander@1832
   230
			continue;
dvander@1832
   231
		}
dvander@1832
   232
		
dvander@1832
   233
		if (((flags & COMMAND_FILTER_CONNECTED) != COMMAND_FILTER_CONNECTED)
dvander@1832
   234
			&& !IsClientInGame(i))
dvander@1510
   235
		{
dvander@1510
   236
			continue;
dvander@1510
   237
		}
dvander@1510
   238
		
dvander@1832
   239
		if (((flags & COMMAND_FILTER_ALIVE) == COMMAND_FILTER_ALIVE) 
dvander@1832
   240
			&& !IsPlayerAlive(i))
pred@1626
   241
		{
pred@1626
   242
			continue;
pred@1626
   243
		}
pred@1626
   244
		
dvander@1832
   245
		if (((flags & COMMAND_FILTER_DEAD) == COMMAND_FILTER_DEAD)
dvander@1832
   246
			&& IsPlayerAlive(i))
dvander@1832
   247
		{
dvander@1832
   248
			continue;
dvander@1832
   249
		}
dvander@1832
   250
		
dvander@1832
   251
		if ((source_client && ((flags & COMMAND_FILTER_NO_IMMUNITY) != COMMAND_FILTER_NO_IMMUNITY))
dvander@1832
   252
			&& !CanUserTarget(source_client, i))
dvander@1510
   253
		{
dvander@1510
   254
			continue;
dvander@1510
   255
		}
dvander@1510
   256
		
dvander@1510
   257
		IntToString(GetClientUserId(i), user_id, sizeof(user_id));
dvander@1510
   258
		GetClientName(i, name, sizeof(name));
dvander@1510
   259
		Format(display, sizeof(display), "%s (%s)", name, user_id);
dvander@1510
   260
		AddMenuItem(menu, user_id, display);
dvander@1510
   261
		num_clients++;
dvander@1510
   262
	}
dvander@1510
   263
	
dvander@1510
   264
	return num_clients;
dvander@1510
   265
}
dvander@1518
   266
dvander@1832
   267
stock UTIL_AddTargetsToMenu(Handle:menu, source_client, bool:in_game_only, bool:alive_only)
dvander@1832
   268
{
dvander@1832
   269
	new flags = 0;
dvander@1832
   270
	
dvander@1832
   271
	if (!in_game_only)
dvander@1832
   272
	{
dvander@1832
   273
		flags |= COMMAND_FILTER_CONNECTED;
dvander@1832
   274
	}
dvander@1832
   275
	
dvander@1832
   276
	if (alive_only)
dvander@1832
   277
	{
dvander@1832
   278
		flags |= COMMAND_FILTER_ALIVE;
dvander@1832
   279
	}
dvander@1832
   280
	
dvander@1832
   281
	return UTIL_AddTargetsToMenu2(menu, source_client, flags);
dvander@1832
   282
}
dvander@1832
   283