3 * =============================================================================
5 * Copyright (C) 2004-2008 AlliedModders LLC. All rights reserved.
6 * =============================================================================
8 * This program is free software; you can redistribute it and/or modify it under
9 * the terms of the GNU General Public License, version 3.0, as published by the
10 * Free Software Foundation.
12 * This program is distributed in the hope that it will be useful, but WITHOUT
13 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
14 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
17 * You should have received a copy of the GNU General Public License along with
18 * this program. If not, see <http://www.gnu.org/licenses/>.
20 * As a special exception, AlliedModders LLC gives you permission to link the
21 * code of this program (as well as its derivative works) to "Half-Life 2," the
22 * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
23 * by the Valve Corporation. You must obey the GNU General Public License in
24 * all respects for all other code used. Additionally, AlliedModders LLC grants
25 * this exception to all derivative works. AlliedModders LLC defines further
26 * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
27 * or <http://www.sourcemod.net/license.php>.
32 #include "sm_globals.h"
33 #include "HalfLife2.h"
34 #include "sourcemm_api.h"
35 #include "HandleSys.h"
36 #include "ConVarManager.h"
37 #include "ConCmdManager.h"
38 #include "PluginSys.h"
39 #include "sm_stringutil.h"
40 #include "PlayerManager.h"
41 #include "ChatTriggers.h"
42 #include "AdminCache.h"
43 #include <inetchannel.h>
45 #include <sm_trie_tpl.h>
47 #if SOURCE_ENGINE == SE_LEFT4DEAD
48 #define NET_SETCONVAR 6
50 #define NET_SETCONVAR 5
55 ConVarBound_Upper = 0,
59 HandleType_t hCmdIterType = 0;
60 HandleType_t htConCmdIter = 0;
65 List<ConCmdInfo *>::iterator iter;
70 #if SOURCE_ENGINE == SE_LEFT4DEAD
71 ICvarIteratorInternal *pLast;
73 const ConCommandBase *pLast;
77 class ConsoleHelpers :
79 public IHandleTypeDispatch
82 virtual void OnSourceModAllInitialized()
86 g_HandleSys.InitAccessDefaults(NULL, &access);
88 htConCmdIter = g_HandleSys.CreateType("ConCmdIter", this, 0, NULL, &access, g_pCoreIdent, NULL);
90 access.access[HandleAccess_Clone] = HANDLE_RESTRICT_OWNER | HANDLE_RESTRICT_IDENTITY;
92 hCmdIterType = g_HandleSys.CreateType("CmdIter", this, 0, NULL, &access, g_pCoreIdent, NULL);
94 virtual void OnHandleDestroy(HandleType_t type, void *object)
96 if (type == hCmdIterType)
98 GlobCmdIter *iter = (GlobCmdIter *)object;
101 else if (type == htConCmdIter)
103 ConCmdIter *iter = (ConCmdIter * )object;
104 #if SOURCE_ENGINE == SE_LEFT4DEAD
105 // ICvarIteratorInternal has no virtual destructor
106 g_pMemAlloc->Free(iter->pLast);
111 virtual bool GetHandleApproxSize(HandleType_t type, void *object, unsigned int *pSize)
113 if (type == htConCmdIter)
115 *pSize = sizeof(ConCmdIter);
118 else if (type == hCmdIterType)
120 *pSize = sizeof(GlobCmdIter);
127 class CommandFlagsHelper : public IConCommandTracker
130 void OnUnlinkConCommandBase(ConCommandBase *pBase, const char *name, bool is_read_safe)
132 m_CmdFlags.remove(name);
134 bool GetFlags(const char *name, int *flags)
136 ConCommandBase **ppCmd;
137 ConCommandBase *pCmd;
138 if ((ppCmd=m_CmdFlags.retrieve(name)))
140 TrackConCommandBase((*ppCmd), this);
141 *flags = (*ppCmd)->GetFlags();
144 else if ((pCmd=FindCommandBase(name)))
146 m_CmdFlags.insert(name, pCmd);
147 TrackConCommandBase(pCmd, this);
148 *flags = pCmd->GetFlags();
156 bool SetFlags(const char *name, int flags)
158 ConCommandBase **ppCmd;
159 ConCommandBase *pCmd;
160 if ((ppCmd=m_CmdFlags.retrieve(name)))
162 (*ppCmd)->SetFlags(flags);
163 TrackConCommandBase((*ppCmd), this);
166 else if ((pCmd=FindCommandBase(name)))
168 m_CmdFlags.insert(name, pCmd);
169 pCmd->SetFlags(flags);
170 TrackConCommandBase(pCmd, this);
179 KTrie<ConCommandBase *> m_CmdFlags;
180 } s_CommandFlagsHelper;
182 #if SOURCE_ENGINE >= SE_ORANGEBOX
183 static void ReplicateConVar(ConVar *pConVar)
185 int maxClients = g_Players.GetMaxClients();
188 bf_write buffer(data, sizeof(data));
190 buffer.WriteUBitLong(NET_SETCONVAR, 5);
192 buffer.WriteString(pConVar->GetName());
193 buffer.WriteString(pConVar->GetString());
195 for (int i = 1; i <= maxClients; i++)
197 CPlayer *pPlayer = g_Players.GetPlayerByIndex(i);
199 if (pPlayer && pPlayer->IsInGame() && !pPlayer->IsFakeClient())
201 INetChannel *netchan = static_cast<INetChannel *>(engine->GetPlayerNetInfo(i));
202 netchan->SendData(buffer);
207 static void NotifyConVar(ConVar *pConVar)
209 IGameEvent *pEvent = gameevents->CreateEvent("server_cvar");
210 pEvent->SetString("cvarname", pConVar->GetName());
211 if (IsFlagSet(pConVar, FCVAR_PROTECTED))
213 pEvent->SetString("cvarvalue", "***PROTECTED***");
217 pEvent->SetString("cvarvalue", pConVar->GetString());
220 gameevents->FireEvent(pEvent);
224 static cell_t sm_CreateConVar(IPluginContext *pContext, const cell_t *params)
226 char *name, *defaultVal, *helpText;
228 pContext->LocalToString(params[1], &name);
230 // While the engine seems to accept a blank convar name, it causes a crash upon server quit
231 if (name == NULL || strcmp(name, "") == 0)
233 return pContext->ThrowNativeError("Convar with blank name is not permitted");
236 pContext->LocalToString(params[2], &defaultVal);
237 pContext->LocalToString(params[3], &helpText);
239 bool hasMin = params[5] ? true : false;
240 bool hasMax = params[7] ? true : false;
241 float min = sp_ctof(params[6]);
242 float max = sp_ctof(params[8]);
244 Handle_t hndl = g_ConVarManager.CreateConVar(pContext, name, defaultVal, helpText, params[4], hasMin, min, hasMax, max);
246 if (hndl == BAD_HANDLE)
248 return pContext->ThrowNativeError("Convar \"%s\" was not created. A console command with the same might already exist.", name);
254 static cell_t sm_FindConVar(IPluginContext *pContext, const cell_t *params)
258 pContext->LocalToString(params[1], &name);
260 return g_ConVarManager.FindConVar(name);
263 static cell_t sm_HookConVarChange(IPluginContext *pContext, const cell_t *params)
265 Handle_t hndl = static_cast<Handle_t>(params[1]);
269 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
272 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
275 IPluginFunction *pFunction = pContext->GetFunctionById(params[2]);
279 return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
282 g_ConVarManager.HookConVarChange(pConVar, pFunction);
287 static cell_t sm_UnhookConVarChange(IPluginContext *pContext, const cell_t *params)
289 Handle_t hndl = static_cast<Handle_t>(params[1]);
293 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
296 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
299 IPluginFunction *pFunction = pContext->GetFunctionById(params[2]);
303 return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
306 g_ConVarManager.UnhookConVarChange(pConVar, pFunction);
311 static cell_t sm_GetConVarBool(IPluginContext *pContext, const cell_t *params)
313 Handle_t hndl = static_cast<Handle_t>(params[1]);
317 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
320 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
323 return pConVar->GetBool();
326 static cell_t sm_GetConVarInt(IPluginContext *pContext, const cell_t *params)
328 Handle_t hndl = static_cast<Handle_t>(params[1]);
332 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
335 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
338 return pConVar->GetInt();
341 /* This handles both SetConVarBool() and SetConVarInt() */
342 static cell_t sm_SetConVarNum(IPluginContext *pContext, const cell_t *params)
344 Handle_t hndl = static_cast<Handle_t>(params[1]);
348 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
351 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
354 pConVar->SetValue(params[2]);
356 #if SOURCE_ENGINE >= SE_ORANGEBOX
357 /* Should we replicate it? */
358 if (params[3] && IsFlagSet(pConVar, FCVAR_REPLICATED))
360 ReplicateConVar(pConVar);
363 /* Should we notify clients? */
364 if (params[4] && IsFlagSet(pConVar, FCVAR_NOTIFY))
366 NotifyConVar(pConVar);
373 static cell_t sm_GetConVarFloat(IPluginContext *pContext, const cell_t *params)
375 Handle_t hndl = static_cast<Handle_t>(params[1]);
379 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
382 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
385 float value = pConVar->GetFloat();
387 return sp_ftoc(value);
390 static cell_t sm_SetConVarFloat(IPluginContext *pContext, const cell_t *params)
392 Handle_t hndl = static_cast<Handle_t>(params[1]);
396 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
399 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
402 float value = sp_ctof(params[2]);
403 pConVar->SetValue(value);
405 #if SOURCE_ENGINE >= SE_ORANGEBOX
406 /* Should we replicate it? */
407 if (params[3] && IsFlagSet(pConVar, FCVAR_REPLICATED))
409 ReplicateConVar(pConVar);
412 /* Should we notify clients? */
413 if (params[4] && IsFlagSet(pConVar, FCVAR_NOTIFY))
415 NotifyConVar(pConVar);
422 static cell_t sm_GetConVarString(IPluginContext *pContext, const cell_t *params)
424 Handle_t hndl = static_cast<Handle_t>(params[1]);
428 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
431 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
434 pContext->StringToLocalUTF8(params[2], params[3], pConVar->GetString(), NULL);
439 static cell_t sm_SetConVarString(IPluginContext *pContext, const cell_t *params)
441 Handle_t hndl = static_cast<Handle_t>(params[1]);
445 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
448 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
452 pContext->LocalToString(params[2], &value);
454 pConVar->SetValue(value);
456 #if SOURCE_ENGINE >= SE_ORANGEBOX
457 /* Should we replicate it? */
458 if (params[3] && IsFlagSet(pConVar, FCVAR_REPLICATED))
460 ReplicateConVar(pConVar);
463 /* Should we notify clients? */
464 if (params[4] && IsFlagSet(pConVar, FCVAR_NOTIFY))
466 NotifyConVar(pConVar);
473 static cell_t sm_ResetConVar(IPluginContext *pContext, const cell_t *params)
475 Handle_t hndl = static_cast<Handle_t>(params[1]);
479 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
482 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
487 #if SOURCE_ENGINE >= SE_ORANGEBOX
488 /* Should we replicate it? */
489 if (params[3] && IsFlagSet(pConVar, FCVAR_REPLICATED))
491 ReplicateConVar(pConVar);
494 /* Should we notify clients? */
495 if (params[4] && IsFlagSet(pConVar, FCVAR_NOTIFY))
497 NotifyConVar(pConVar);
504 static cell_t sm_GetConVarFlags(IPluginContext *pContext, const cell_t *params)
506 Handle_t hndl = static_cast<Handle_t>(params[1]);
510 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
513 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
516 return pConVar->GetFlags();
519 static cell_t sm_SetConVarFlags(IPluginContext *pContext, const cell_t *params)
521 Handle_t hndl = static_cast<Handle_t>(params[1]);
525 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
528 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
531 pConVar->SetFlags(params[2]);
536 static cell_t sm_GetConVarBounds(IPluginContext *pContext, const cell_t *params)
538 Handle_t hndl = static_cast<Handle_t>(params[1]);
542 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
545 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
554 case ConVarBound_Upper:
555 hasBound = pConVar->GetMax(bound);
557 case ConVarBound_Lower:
558 hasBound = pConVar->GetMin(bound);
561 return pContext->ThrowNativeError("Invalid ConVarBounds value %d");
564 pContext->LocalToPhysAddr(params[3], &addr);
565 *addr = sp_ftoc(bound);
570 static cell_t sm_SetConVarBounds(IPluginContext *pContext, const cell_t *params)
572 Handle_t hndl = static_cast<Handle_t>(params[1]);
576 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
579 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
584 case ConVarBound_Upper:
585 pConVar->SetMax(params[3] ? true : false, sp_ctof(params[4]));
587 case ConVarBound_Lower:
588 pConVar->SetMin(params[3] ? true : false, sp_ctof(params[4]));
591 return pContext->ThrowNativeError("Invalid ConVarBounds value %d");
597 static cell_t sm_GetConVarName(IPluginContext *pContext, const cell_t *params)
599 Handle_t hndl = static_cast<Handle_t>(params[1]);
603 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
606 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
609 pContext->StringToLocalUTF8(params[2], params[3], pConVar->GetName(), NULL);
614 static bool s_QueryAlreadyWarned = false;
616 static cell_t sm_QueryClientConVar(IPluginContext *pContext, const cell_t *params)
620 IPluginFunction *pCallback;
622 if (!g_ConVarManager.IsQueryingSupported())
624 if (!s_QueryAlreadyWarned)
626 s_QueryAlreadyWarned = true;
627 return pContext->ThrowNativeError("Game does not support client convar querying (one time warning)");
633 pPlayer = g_Players.GetPlayerByIndex(params[1]);
637 return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
640 if (!pPlayer->IsConnected())
642 return pContext->ThrowNativeError("Client %d is not connected", params[1]);
645 /* Trying a query on a bot results in callback not be fired, so don't bother */
646 if (pPlayer->IsFakeClient())
651 pContext->LocalToString(params[2], &name);
652 pCallback = pContext->GetFunctionById(params[3]);
656 return pContext->ThrowNativeError("Invalid function id (%X)", params[3]);
659 return g_ConVarManager.QueryClientConVar(pPlayer->GetEdict(), name, pCallback, params[4]);
662 static cell_t sm_RegServerCmd(IPluginContext *pContext, const cell_t *params)
665 IPluginFunction *pFunction;
667 pContext->LocalToString(params[1], &name);
668 pContext->LocalToString(params[3], &help);
669 pFunction = pContext->GetFunctionById(params[2]);
673 return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
676 if (!g_ConCmds.AddServerCommand(pFunction, name, help, params[4]))
678 return pContext->ThrowNativeError("Command \"%s\" could not be created. A convar with the same name already exists.", name);
684 static cell_t sm_RegConsoleCmd(IPluginContext *pContext, const cell_t *params)
687 IPluginFunction *pFunction;
689 pContext->LocalToString(params[1], &name);
690 pContext->LocalToString(params[3], &help);
691 pFunction = pContext->GetFunctionById(params[2]);
695 return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
698 if (!g_ConCmds.AddConsoleCommand(pFunction, name, help, params[4]))
700 return pContext->ThrowNativeError("Command \"%s\" could not be created. A convar with the same name already exists.", name);
706 static cell_t sm_RegAdminCmd(IPluginContext *pContext, const cell_t *params)
710 IPluginFunction *pFunction;
711 FlagBits flags = params[3];
712 int cmdflags = params[6];
714 pContext->LocalToString(params[1], &name);
715 pContext->LocalToString(params[4], &help);
716 pContext->LocalToString(params[5], (char **)&group);
717 pFunction = pContext->GetFunctionById(params[2]);
719 if (group[0] == '\0')
721 CPlugin *pPlugin = g_PluginSys.GetPluginByCtx(pContext->GetContext());
722 group = pPlugin->GetFilename();
727 return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
730 if (!g_ConCmds.AddAdminCommand(pFunction, name, group, flags, help, cmdflags))
732 return pContext->ThrowNativeError("Command \"%s\" could not be created. A convar with the same name already exists.", name);
738 static cell_t sm_GetCmdArgs(IPluginContext *pContext, const cell_t *params)
740 const CCommand *pCmd = g_HL2.PeekCommandStack();
744 return pContext->ThrowNativeError("No command callback available");
747 return pCmd->ArgC() - 1;
750 static cell_t sm_GetCmdArg(IPluginContext *pContext, const cell_t *params)
752 const CCommand *pCmd = g_HL2.PeekCommandStack();
756 return pContext->ThrowNativeError("No command callback available");
761 const char *arg = pCmd->Arg(params[1]);
763 pContext->StringToLocalUTF8(params[2], params[3], arg ? arg : "", &length);
765 return (cell_t)length;
768 static cell_t sm_GetCmdArgString(IPluginContext *pContext, const cell_t *params)
770 const CCommand *pCmd = g_HL2.PeekCommandStack();
774 return pContext->ThrowNativeError("No command callback available");
777 const char *args = pCmd->ArgS();
785 pContext->StringToLocalUTF8(params[1], params[2], args, &length);
787 return (cell_t)length;
790 static cell_t sm_PrintToServer(IPluginContext *pCtx, const cell_t *params)
796 pCtx->LocalToString(params[1], &fmt);
797 size_t res = atcprintf(buffer, sizeof(buffer)-2, fmt, pCtx, params, &arg);
799 buffer[res++] = '\n';
802 META_CONPRINT(buffer);
807 static cell_t sm_PrintToConsole(IPluginContext *pCtx, const cell_t *params)
809 int index = params[1];
810 if ((index < 0) || (index > g_Players.GetMaxClients()))
812 return pCtx->ThrowNativeError("Client index %d is invalid", index);
815 CPlayer *pPlayer = NULL;
818 pPlayer = g_Players.GetPlayerByIndex(index);
819 if (!pPlayer->IsInGame())
821 return pCtx->ThrowNativeError("Client %d is not in game", index);
824 /* Silent fail on bots, engine will crash */
825 if (pPlayer->IsFakeClient())
835 pCtx->LocalToString(params[2], &fmt);
836 size_t res = atcprintf(buffer, sizeof(buffer)-2, fmt, pCtx, params, &arg);
838 buffer[res++] = '\n';
843 engine->ClientPrintf(pPlayer->GetEdict(), buffer);
845 META_CONPRINT(buffer);
851 static cell_t sm_ServerCommand(IPluginContext *pContext, const cell_t *params)
853 g_SourceMod.SetGlobalTarget(SOURCEMOD_SERVER_LANGUAGE);
856 size_t len = g_SourceMod.FormatString(buffer, sizeof(buffer)-2, pContext, params, 1);
858 if (pContext->GetLastNativeError() != SP_ERROR_NONE)
863 /* One byte for null terminator, one for newline */
864 buffer[len++] = '\n';
867 engine->ServerCommand(buffer);
872 static cell_t sm_InsertServerCommand(IPluginContext *pContext, const cell_t *params)
874 g_SourceMod.SetGlobalTarget(SOURCEMOD_SERVER_LANGUAGE);
877 size_t len = g_SourceMod.FormatString(buffer, sizeof(buffer)-2, pContext, params, 1);
879 if (pContext->GetLastNativeError() != SP_ERROR_NONE)
884 /* One byte for null terminator, one for newline */
885 buffer[len++] = '\n';
888 InsertServerCommand(buffer);
893 static cell_t sm_ServerExecute(IPluginContext *pContext, const cell_t *params)
895 engine->ServerExecute();
900 static cell_t sm_ClientCommand(IPluginContext *pContext, const cell_t *params)
902 CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
906 return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
909 if (!pPlayer->IsConnected())
911 return pContext->ThrowNativeError("Client %d is not connected", params[1]);
914 g_SourceMod.SetGlobalTarget(params[1]);
917 g_SourceMod.FormatString(buffer, sizeof(buffer), pContext, params, 2);
919 if (pContext->GetLastNativeError() != SP_ERROR_NONE)
924 engine->ClientCommand(pPlayer->GetEdict(), "%s", buffer);
929 static cell_t FakeClientCommand(IPluginContext *pContext, const cell_t *params)
931 CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
935 return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
938 if (!pPlayer->IsConnected())
940 return pContext->ThrowNativeError("Client %d is not connected", params[1]);
944 g_SourceMod.FormatString(buffer, sizeof(buffer), pContext, params, 2);
946 if (pContext->GetLastNativeError() != SP_ERROR_NONE)
951 serverpluginhelpers->ClientCommand(pPlayer->GetEdict(), buffer);
956 static cell_t FakeClientCommandEx(IPluginContext *pContext, const cell_t *params)
958 CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
962 return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
965 if (!pPlayer->IsConnected())
967 return pContext->ThrowNativeError("Client %d is not connected", params[1]);
971 g_SourceMod.FormatString(buffer, sizeof(buffer), pContext, params, 2);
973 if (pContext->GetLastNativeError() != SP_ERROR_NONE)
978 g_HL2.AddToFakeCliCmdQueue(params[1], engine->GetPlayerUserId(pPlayer->GetEdict()), buffer);
983 static cell_t ReplyToCommand(IPluginContext *pContext, const cell_t *params)
985 g_SourceMod.SetGlobalTarget(params[1]);
987 /* Build the format string */
989 size_t len = g_SourceMod.FormatString(buffer, sizeof(buffer)-2, pContext, params, 2);
991 if (pContext->GetLastNativeError() != SP_ERROR_NONE)
996 /* If we're printing to the server, shortcut out */
1000 buffer[len++] = '\n';
1002 META_CONPRINT(buffer);
1006 CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
1010 return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
1013 if (!pPlayer->IsConnected())
1015 return pContext->ThrowNativeError("Client %d is not connected", params[1]);
1018 g_SourceMod.SetGlobalTarget(params[1]);
1020 unsigned int replyto = g_ChatTriggers.GetReplyTo();
1021 if (replyto == SM_REPLY_CONSOLE)
1023 buffer[len++] = '\n';
1025 engine->ClientPrintf(pPlayer->GetEdict(), buffer);
1026 } else if (replyto == SM_REPLY_CHAT) {
1032 g_HL2.TextMsg(params[1], HUD_PRINTTALK, buffer);
1038 static cell_t GetCmdReplyTarget(IPluginContext *pContext, const cell_t *params)
1040 return g_ChatTriggers.GetReplyTo();
1043 static cell_t SetCmdReplyTarget(IPluginContext *pContext, const cell_t *params)
1045 return g_ChatTriggers.SetReplyTo(params[1]);
1048 static cell_t GetCommandIterator(IPluginContext *pContext, const cell_t *params)
1050 GlobCmdIter *iter = new GlobCmdIter;
1051 iter->started = false;
1053 Handle_t hndl = g_HandleSys.CreateHandle(hCmdIterType, iter, pContext->GetIdentity(), g_pCoreIdent, NULL);
1054 if (hndl == BAD_HANDLE)
1062 static cell_t ReadCommandIterator(IPluginContext *pContext, const cell_t *params)
1066 HandleSecurity sec(pContext->GetIdentity(), g_pCoreIdent);
1068 if ((err = g_HandleSys.ReadHandle(params[1], hCmdIterType, &sec, (void **)&iter))
1069 != HandleError_None)
1071 return pContext->ThrowNativeError("Invalid GlobCmdIter Handle %x", params[1]);
1074 const List<ConCmdInfo *> &cmds = g_ConCmds.GetCommandList();
1078 iter->iter = cmds.begin();
1079 iter->started = true;
1082 while (iter->iter != cmds.end()
1083 && !(*(iter->iter))->sourceMod)
1088 if (iter->iter == cmds.end())
1093 ConCmdInfo *pInfo = (*(iter->iter));
1095 pContext->StringToLocalUTF8(params[2], params[3], pInfo->pCmd->GetName(), NULL);
1096 pContext->StringToLocalUTF8(params[5], params[6], pInfo->pCmd->GetHelpText(), NULL);
1099 pContext->LocalToPhysAddr(params[4], &addr);
1100 *addr = pInfo->admin.eflags;
1107 static cell_t CheckCommandAccess(IPluginContext *pContext, const cell_t *params)
1115 pContext->LocalToString(params[2], &cmd);
1117 /* Auto-detect a command if we can */
1118 FlagBits bits = params[3];
1119 bool found_command = false;
1120 if (params[0] < 4 || !params[4])
1122 found_command = g_ConCmds.LookForCommandAdminFlags(cmd, &bits);
1127 g_Admins.GetCommandOverride(cmd, Override_Command, &bits);
1130 return g_ConCmds.CheckCommandAccess(params[1], cmd, bits) ? 1 : 0;
1133 static cell_t IsChatTrigger(IPluginContext *pContext, const cell_t *params)
1135 return g_ChatTriggers.IsChatTrigger() ? 1 : 0;
1138 static cell_t SetCommandFlags(IPluginContext *pContext, const cell_t *params)
1141 pContext->LocalToString(params[1], &name);
1143 return (s_CommandFlagsHelper.SetFlags(name, params[2])) ? 1 : 0;
1146 static cell_t GetCommandFlags(IPluginContext *pContext, const cell_t *params)
1150 pContext->LocalToString(params[1], &name);
1152 return (s_CommandFlagsHelper.GetFlags(name, &flags)) ? flags : -1;
1155 static cell_t FindFirstConCommand(IPluginContext *pContext, const cell_t *params)
1159 cell_t *pIsCmd, *pFlags;
1160 const ConCommandBase *pConCmd;
1163 pContext->LocalToPhysAddr(params[3], &pIsCmd);
1164 pContext->LocalToPhysAddr(params[4], &pFlags);
1166 #if SOURCE_ENGINE == SE_LEFT4DEAD
1167 ICvarIteratorInternal *cvarIter = icvar->FactoryInternalIterator();
1168 cvarIter->SetFirst();
1169 if (!cvarIter->IsValid())
1173 pConCmd = cvarIter->Get();
1175 pConCmd = icvar->GetCommands();
1176 if (pConCmd == NULL)
1182 pContext->StringToLocalUTF8(params[1], params[2], pConCmd->GetName(), NULL);
1183 *pIsCmd = pConCmd->IsCommand() ? 1 : 0;
1184 *pFlags = pConCmd->GetFlags();
1188 desc = pConCmd->GetHelpText();
1189 pContext->StringToLocalUTF8(params[5], params[6], (desc && desc[0]) ? desc : "", NULL);
1192 pIter = new ConCmdIter;
1193 #if SOURCE_ENGINE == SE_LEFT4DEAD
1194 pIter->pLast = cvarIter;
1196 pIter->pLast = pConCmd;
1199 if ((hndl = g_HandleSys.CreateHandle(htConCmdIter, pIter, pContext->GetIdentity(), g_pCoreIdent, NULL))
1209 static cell_t FindNextConCommand(IPluginContext *pContext, const cell_t *params)
1213 cell_t *pIsCmd, *pFlags;
1215 const ConCommandBase *pConCmd;
1216 HandleSecurity sec(pContext->GetIdentity(), g_pCoreIdent);
1218 if ((err = g_HandleSys.ReadHandle(params[1], htConCmdIter, &sec, (void **)&pIter)) != HandleError_None)
1220 return pContext->ThrowNativeError("Invalid Handle %x (error %d)", params[1], err);
1223 if (pIter->pLast == NULL)
1228 #if SOURCE_ENGINE == SE_LEFT4DEAD
1229 ICvarIteratorInternal *cvarIter = pIter->pLast;
1231 if (!cvarIter->IsValid())
1235 pConCmd = cvarIter->Get();
1237 pConCmd = pIter->pLast->GetNext();
1238 if (pConCmd == NULL)
1242 pIter->pLast = pConCmd;
1245 pContext->LocalToPhysAddr(params[4], &pIsCmd);
1246 pContext->LocalToPhysAddr(params[5], &pFlags);
1248 pContext->StringToLocalUTF8(params[2], params[3], pConCmd->GetName(), NULL);
1249 *pIsCmd = pConCmd->IsCommand() ? 1 : 0;
1250 *pFlags = pConCmd->GetFlags();
1254 desc = pConCmd->GetHelpText();
1255 pContext->StringToLocalUTF8(params[6], params[7], (desc && desc[0]) ? desc : "", NULL);
1261 static cell_t SendConVarValue(IPluginContext *pContext, const cell_t *params)
1263 Handle_t hndl = static_cast<Handle_t>(params[2]);
1268 pContext->LocalToString(params[3], &value);
1270 if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
1271 != HandleError_None)
1273 return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
1277 bf_write buffer(data, sizeof(data));
1279 buffer.WriteUBitLong(NET_SETCONVAR, 5);
1280 buffer.WriteByte(1);
1281 buffer.WriteString(pConVar->GetName());
1282 buffer.WriteString(value);
1284 CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
1288 return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
1291 if (!pPlayer->IsConnected())
1293 return pContext->ThrowNativeError("Client %d is not connected", params[1]);
1296 if (pPlayer->IsFakeClient())
1298 return pContext->ThrowNativeError("Client %d is fake and cannot be targeted", params[1]);
1301 INetChannel *netchan = static_cast<INetChannel *>(engine->GetPlayerNetInfo(params[1]));
1302 netchan->SendData(buffer);
1307 static cell_t AddServerTag(IPluginContext *pContext, const cell_t *params)
1312 static cell_t RemoveServerTag(IPluginContext *pContext, const cell_t *params)
1317 REGISTER_NATIVES(consoleNatives)
1319 {"CreateConVar", sm_CreateConVar},
1320 {"FindConVar", sm_FindConVar},
1321 {"HookConVarChange", sm_HookConVarChange},
1322 {"UnhookConVarChange", sm_UnhookConVarChange},
1323 {"GetConVarBool", sm_GetConVarBool},
1324 {"SetConVarBool", sm_SetConVarNum},
1325 {"GetConVarInt", sm_GetConVarInt},
1326 {"SetConVarInt", sm_SetConVarNum},
1327 {"GetConVarFloat", sm_GetConVarFloat},
1328 {"SetConVarFloat", sm_SetConVarFloat},
1329 {"GetConVarString", sm_GetConVarString},
1330 {"SetConVarString", sm_SetConVarString},
1331 {"GetConVarFlags", sm_GetConVarFlags},
1332 {"SetConVarFlags", sm_SetConVarFlags},
1333 {"ResetConVar", sm_ResetConVar},
1334 {"GetConVarName", sm_GetConVarName},
1335 {"GetConVarBounds", sm_GetConVarBounds},
1336 {"SetConVarBounds", sm_SetConVarBounds},
1337 {"QueryClientConVar", sm_QueryClientConVar},
1338 {"RegServerCmd", sm_RegServerCmd},
1339 {"RegConsoleCmd", sm_RegConsoleCmd},
1340 {"GetCmdArgString", sm_GetCmdArgString},
1341 {"GetCmdArgs", sm_GetCmdArgs},
1342 {"GetCmdArg", sm_GetCmdArg},
1343 {"PrintToServer", sm_PrintToServer},
1344 {"PrintToConsole", sm_PrintToConsole},
1345 {"RegAdminCmd", sm_RegAdminCmd},
1346 {"ServerCommand", sm_ServerCommand},
1347 {"InsertServerCommand", sm_InsertServerCommand},
1348 {"ServerExecute", sm_ServerExecute},
1349 {"ClientCommand", sm_ClientCommand},
1350 {"FakeClientCommand", FakeClientCommand},
1351 {"ReplyToCommand", ReplyToCommand},
1352 {"GetCmdReplySource", GetCmdReplyTarget},
1353 {"SetCmdReplySource", SetCmdReplyTarget},
1354 {"GetCommandIterator", GetCommandIterator},
1355 {"ReadCommandIterator", ReadCommandIterator},
1356 {"CheckCommandAccess", CheckCommandAccess},
1357 {"FakeClientCommandEx", FakeClientCommandEx},
1358 {"IsChatTrigger", IsChatTrigger},
1359 {"SetCommandFlags", SetCommandFlags},
1360 {"GetCommandFlags", GetCommandFlags},
1361 {"FindFirstConCommand", FindFirstConCommand},
1362 {"FindNextConCommand", FindNextConCommand},
1363 {"SendConVarValue", SendConVarValue},
1364 {"AddServerTag", AddServerTag},
1365 {"RemoveServerTag", RemoveServerTag},