plugins/adminmenu.sp
author Matt Woodrow <pred@alliedmods.net>
Sat Oct 13 05:21:52 2007 +0000 (2007-10-13)
changeset 1537 70adbdbfeed9
parent 1527 ca6db18e2abc
child 1590 47557c457768
permissions -rw-r--r--
Fixed cs specific example in config and updated adminmenu header
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
 *
dvander@1510
     7
 * SourceMod (C)2004-2007 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@1510
    60
public bool:AskPluginLoad(Handle:myself, bool:late, String:error[], err_max)
dvander@1510
    61
{
dvander@1510
    62
	CreateNative("GetAdminTopMenu", __GetAdminTopMenu);
dvander@1510
    63
	CreateNative("AddTargetsToMenu", __AddTargetsToMenu);
dvander@1510
    64
	RegPluginLibrary("adminmenu");
dvander@1510
    65
	return true;
dvander@1510
    66
}
dvander@1510
    67
dvander@1510
    68
public OnPluginStart()
dvander@1510
    69
{
dvander@1510
    70
	LoadTranslations("common.phrases");
dvander@1510
    71
	
dvander@1510
    72
	hOnAdminMenuCreated = CreateGlobalForward("OnAdminMenuCreated", ET_Ignore, Param_Cell);
dvander@1510
    73
	hOnAdminMenuReady = CreateGlobalForward("OnAdminMenuReady", ET_Ignore, Param_Cell);
dvander@1510
    74
dvander@1510
    75
	RegAdminCmd("sm_admin", Command_DisplayMenu, ADMFLAG_GENERIC, "sm_admin");
dvander@1510
    76
}
dvander@1510
    77
dvander@1510
    78
public OnAllPluginsLoaded()
dvander@1510
    79
{
dvander@1510
    80
	hAdminMenu = CreateTopMenu(CategoryHandler);
dvander@1510
    81
	
dvander@1510
    82
	obj_playercmds = AddToTopMenu(hAdminMenu, 
dvander@1510
    83
		"PlayerCommands",
dvander@1510
    84
		TopMenuObject_Category,
dvander@1510
    85
		CategoryHandler,
dvander@1510
    86
		INVALID_TOPMENUOBJECT);
dvander@1518
    87
dvander@1518
    88
	obj_servercmds = AddToTopMenu(hAdminMenu,
dvander@1518
    89
		"ServerCommands",
dvander@1518
    90
		TopMenuObject_Category,
dvander@1518
    91
		CategoryHandler,
dvander@1518
    92
		INVALID_TOPMENUOBJECT);
dvander@1523
    93
dvander@1523
    94
	obj_votingcmds = AddToTopMenu(hAdminMenu,
dvander@1523
    95
		"VotingCommands",
dvander@1523
    96
		TopMenuObject_Category,
dvander@1523
    97
		CategoryHandler,
dvander@1523
    98
		INVALID_TOPMENUOBJECT);
dvander@1510
    99
	
dvander@1510
   100
	Call_StartForward(hOnAdminMenuCreated);
dvander@1510
   101
	Call_PushCell(hAdminMenu);
dvander@1510
   102
	Call_Finish();
dvander@1510
   103
	
dvander@1510
   104
	Call_StartForward(hOnAdminMenuReady);
dvander@1510
   105
	Call_PushCell(hAdminMenu);
dvander@1510
   106
	Call_Finish();
dvander@1510
   107
}
dvander@1510
   108
dvander@1510
   109
public CategoryHandler(Handle:topmenu, 
dvander@1510
   110
						TopMenuAction:action,
dvander@1510
   111
						TopMenuObject:object_id,
dvander@1510
   112
						param,
dvander@1510
   113
						String:buffer[],
dvander@1510
   114
						maxlength)
dvander@1510
   115
{
dvander@1527
   116
	PrintToServer("CategoryHandler(%x, %d, %x)", topmenu, action, object_id);
dvander@1525
   117
	if (action == TopMenuAction_DisplayTitle)
dvander@1510
   118
	{
dvander@1510
   119
		if (object_id == INVALID_TOPMENUOBJECT)
dvander@1510
   120
		{
dvander@1510
   121
			Format(buffer, maxlength, "%T:", "Admin Menu", param);
dvander@1510
   122
		}
dvander@1510
   123
		else if (object_id == obj_playercmds)
dvander@1510
   124
		{
dvander@1510
   125
			Format(buffer, maxlength, "%T:", "Player Commands", param);
dvander@1510
   126
		}
dvander@1518
   127
		else if (object_id == obj_servercmds)
dvander@1518
   128
		{
dvander@1518
   129
			Format(buffer, maxlength, "%T:", "Server Commands", param);
dvander@1518
   130
		}
dvander@1523
   131
		else if (object_id == obj_votingcmds)
dvander@1523
   132
		{
dvander@1523
   133
			Format(buffer, maxlength, "%T:", "Voting Commands", param);
dvander@1523
   134
		}
dvander@1510
   135
	}
dvander@1525
   136
	else if (action == TopMenuAction_DisplayOption)
dvander@1510
   137
	{
dvander@1510
   138
		if (object_id == obj_playercmds)
dvander@1510
   139
		{
dvander@1510
   140
			Format(buffer, maxlength, "%T", "Player Commands", param);
dvander@1510
   141
		}
dvander@1518
   142
		else if (object_id == obj_servercmds)
dvander@1518
   143
		{
dvander@1518
   144
			Format(buffer, maxlength, "%T", "Server Commands", param);
dvander@1518
   145
		}
dvander@1523
   146
		else if (object_id == obj_votingcmds)
dvander@1523
   147
		{
dvander@1523
   148
			Format(buffer, maxlength, "%T", "Voting Commands", param);
dvander@1523
   149
		}
dvander@1510
   150
	}
dvander@1510
   151
}
dvander@1510
   152
dvander@1510
   153
public __GetAdminTopMenu(Handle:plugin, numParams)
dvander@1510
   154
{
dvander@1510
   155
	return _:hAdminMenu;
dvander@1510
   156
}
dvander@1510
   157
dvander@1510
   158
public __AddTargetsToMenu(Handle:plugin, numParams)
dvander@1510
   159
{
dvander@1510
   160
	return UTIL_AddTargetsToMenu(GetNativeCell(1), GetNativeCell(2), GetNativeCell(3));
dvander@1510
   161
}
dvander@1510
   162
dvander@1510
   163
public Action:Command_DisplayMenu(client, args)
dvander@1510
   164
{
dvander@1510
   165
	DisplayTopMenu(hAdminMenu, client, TopMenuPosition_Start);
dvander@1510
   166
	
dvander@1510
   167
	return Plugin_Handled;
dvander@1510
   168
}
dvander@1510
   169
dvander@1510
   170
stock UTIL_AddTargetsToMenu(Handle:menu, source_client, bool:in_game_only)
dvander@1510
   171
{
dvander@1510
   172
	new max_clients = GetMaxClients();
dvander@1510
   173
	decl String:user_id[12];
dvander@1510
   174
	decl String:name[MAX_NAME_LENGTH];
dvander@1510
   175
	decl String:display[MAX_NAME_LENGTH+12];
dvander@1510
   176
	
dvander@1510
   177
	new num_clients;
dvander@1510
   178
	
dvander@1510
   179
	for (new i = 1; i <= max_clients; i++)
dvander@1510
   180
	{
dvander@1510
   181
		if (!IsClientConnected(i) || IsClientInKickQueue(i))
dvander@1510
   182
		{
dvander@1510
   183
			continue;
dvander@1510
   184
		}
dvander@1510
   185
		
dvander@1510
   186
		if (in_game_only && !IsClientInGame(i))
dvander@1510
   187
		{
dvander@1510
   188
			continue;
dvander@1510
   189
		}
dvander@1510
   190
		
dvander@1510
   191
		if (source_client && !CanUserTarget(source_client, i))
dvander@1510
   192
		{
dvander@1510
   193
			continue;
dvander@1510
   194
		}
dvander@1510
   195
		
dvander@1510
   196
		IntToString(GetClientUserId(i), user_id, sizeof(user_id));
dvander@1510
   197
		GetClientName(i, name, sizeof(name));
dvander@1510
   198
		Format(display, sizeof(display), "%s (%s)", name, user_id);
dvander@1510
   199
		AddMenuItem(menu, user_id, display);
dvander@1510
   200
		num_clients++;
dvander@1510
   201
	}
dvander@1510
   202
	
dvander@1510
   203
	return num_clients;
dvander@1510
   204
}
dvander@1518
   205