sourcemod-central: core/smn_console.cpp@f5016767bfdf (annotated)

dvander@498	1	/**
ds@653	2	* vim: set ts=4 :
ds@1330	3	* =============================================================================
dvander@1231	4	* SourceMod
ds@1947	5	* Copyright (C) 2004-2008 AlliedModders LLC. All rights reserved.
ds@1330	6	* =============================================================================
dvander@562	7	*
ds@1330	8	* This program is free software; you can redistribute it and/or modify it under
ds@1330	9	* the terms of the GNU General Public License, version 3.0, as published by the
ds@1330	10	* Free Software Foundation.
dvander@1231	11	*
ds@1330	12	* This program is distributed in the hope that it will be useful, but WITHOUT
ds@1330	13	* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
ds@1330	14	* FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
ds@1330	15	* details.
dvander@1231	16	*
ds@1330	17	* You should have received a copy of the GNU General Public License along with
ds@1330	18	* this program. If not, see <http://www.gnu.org/licenses/>.
dvander@1231	19	*
ds@1330	20	* As a special exception, AlliedModders LLC gives you permission to link the
ds@1330	21	* code of this program (as well as its derivative works) to "Half-Life 2," the
ds@1330	22	* "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
ds@1330	23	* by the Valve Corporation. You must obey the GNU General Public License in
ds@1330	24	* all respects for all other code used. Additionally, AlliedModders LLC grants
ds@1330	25	* this exception to all derivative works. AlliedModders LLC defines further
ds@1330	26	* exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
ds@1330	27	* or <http://www.sourcemod.net/license.php>.
dvander@562	28	*
dvander@562	29	* Version: $Id$
dvander@562	30	*/
dvander@498	31
dvander@498	32	#include "sm_globals.h"
ds@696	33	#include "HalfLife2.h"
dvander@498	34	#include "sourcemm_api.h"
dvander@498	35	#include "HandleSys.h"
ds@580	36	#include "ConVarManager.h"
ds@579	37	#include "ConCmdManager.h"
dvander@514	38	#include "PluginSys.h"
dvander@518	39	#include "sm_stringutil.h"
dvander@591	40	#include "PlayerManager.h"
dvander@893	41	#include "ChatTriggers.h"
dvander@1429	42	#include "AdminCache.h"
ds@936	43	#include <inetchannel.h>
ds@936	44	#include <bitbuf.h>
faluco@1643	45	#include <sm_trie_tpl.h>
dvander@2806	46	#include "Logger.h"
dvander@2806	47	#include "ConsoleDetours.h"
ds@936	48
fyrenmoo@2847	49	#if (SOURCE_ENGINE == SE_LEFT4DEAD) \|\| (SOURCE_ENGINE == SE_LEFT4DEAD2)
ds@2400	50	#define NET_SETCONVAR 6
ds@2400	51	#else
ds@936	52	#define NET_SETCONVAR 5
ds@2400	53	#endif
dvander@498	54
ds@714	55	enum ConVarBounds
ds@714	56	{
ds@714	57	ConVarBound_Upper = 0,
ds@714	58	ConVarBound_Lower
ds@714	59	};
ds@714	60
dvander@1119	61	HandleType_t hCmdIterType = 0;
dvander@1795	62	HandleType_t htConCmdIter = 0;
dvander@1119	63
dvander@1119	64	struct GlobCmdIter
dvander@1119	65	{
dvander@1119	66	bool started;
dvander@1119	67	List<ConCmdInfo *>::iterator iter;
dvander@1119	68	};
dvander@1119	69
dvander@1795	70	struct ConCmdIter
dvander@1795	71	{
fyrenmoo@2847	72	#if (SOURCE_ENGINE == SE_LEFT4DEAD) \|\| (SOURCE_ENGINE == SE_LEFT4DEAD2)
ds@2400	73	ICvarIteratorInternal *pLast;
ds@2400	74	#else
dvander@1795	75	const ConCommandBase *pLast;
ds@2400	76	#endif
dvander@1795	77	};
dvander@1795	78
dvander@1119	79	class ConsoleHelpers :
dvander@1119	80	public SMGlobalClass,
dvander@1119	81	public IHandleTypeDispatch
dvander@1119	82	{
dvander@1119	83	public:
dvander@1119	84	virtual void OnSourceModAllInitialized()
dvander@1119	85	{
dvander@1119	86	HandleAccess access;
dvander@1795	87
dvander@1119	88	g_HandleSys.InitAccessDefaults(NULL, &access);
dvander@1795	89
dvander@1795	90	htConCmdIter = g_HandleSys.CreateType("ConCmdIter", this, 0, NULL, &access, g_pCoreIdent, NULL);
dvander@1795	91
dvander@1119	92	access.access[HandleAccess_Clone] = HANDLE_RESTRICT_OWNER \| HANDLE_RESTRICT_IDENTITY;
dvander@1119	93
dvander@1795	94	hCmdIterType = g_HandleSys.CreateType("CmdIter", this, 0, NULL, &access, g_pCoreIdent, NULL);
dvander@1119	95	}
dvander@1119	96	virtual void OnHandleDestroy(HandleType_t type, void *object)
dvander@1119	97	{
dvander@1795	98	if (type == hCmdIterType)
dvander@1795	99	{
dvander@1795	100	GlobCmdIter iter = (GlobCmdIter )object;
dvander@1795	101	delete iter;
dvander@1795	102	}
dvander@1795	103	else if (type == htConCmdIter)
dvander@1795	104	{
dvander@1795	105	ConCmdIter iter = (ConCmdIter )object;
fyrenmoo@2847	106	#if (SOURCE_ENGINE == SE_LEFT4DEAD) \|\| (SOURCE_ENGINE == SE_LEFT4DEAD2)
ds@2439	107	// ICvarIteratorInternal has no virtual destructor
ds@2439	108	g_pMemAlloc->Free(iter->pLast);
ds@2439	109	#endif
dvander@1795	110	delete iter;
dvander@1795	111	}
dvander@1795	112	}
dvander@1795	113	virtual bool GetHandleApproxSize(HandleType_t type, void object, unsigned int pSize)
dvander@1795	114	{
dvander@1795	115	if (type == htConCmdIter)
dvander@1795	116	{
dvander@1795	117	*pSize = sizeof(ConCmdIter);
dvander@1795	118	return true;
dvander@1795	119	}
dvander@1795	120	else if (type == hCmdIterType)
dvander@1795	121	{
dvander@1795	122	*pSize = sizeof(GlobCmdIter);
dvander@1795	123	return true;
dvander@1795	124	}
dvander@1795	125	return false;
dvander@1119	126	}
dvander@1119	127	} s_ConsoleHelpers;
dvander@1119	128
faluco@1643	129	class CommandFlagsHelper : public IConCommandTracker
faluco@1643	130	{
faluco@1643	131	public:
faluco@1643	132	void OnUnlinkConCommandBase(ConCommandBase pBase, const char name, bool is_read_safe)
faluco@1643	133	{
faluco@1643	134	m_CmdFlags.remove(name);
faluco@1643	135	}
faluco@1643	136	bool GetFlags(const char name, int flags)
faluco@1643	137	{
faluco@1643	138	ConCommandBase **ppCmd;
faluco@1643	139	ConCommandBase *pCmd;
faluco@1643	140	if ((ppCmd=m_CmdFlags.retrieve(name)))
faluco@1643	141	{
faluco@1643	142	TrackConCommandBase((*ppCmd), this);
faluco@1643	143	flags = (ppCmd)->GetFlags();
faluco@1643	144	return true;
faluco@1643	145	}
ds@2400	146	else if ((pCmd=FindCommandBase(name)))
faluco@1643	147	{
faluco@1643	148	m_CmdFlags.insert(name, pCmd);
faluco@1643	149	TrackConCommandBase(pCmd, this);
faluco@1643	150	*flags = pCmd->GetFlags();
faluco@1643	151	return true;
faluco@1643	152	}
faluco@1643	153	else
faluco@1643	154	{
faluco@1643	155	return false;
faluco@1643	156	}
faluco@1643	157	}
faluco@1643	158	bool SetFlags(const char *name, int flags)
faluco@1643	159	{
faluco@1643	160	ConCommandBase **ppCmd;
faluco@1643	161	ConCommandBase *pCmd;
faluco@1643	162	if ((ppCmd=m_CmdFlags.retrieve(name)))
faluco@1643	163	{
faluco@1643	164	(*ppCmd)->SetFlags(flags);
faluco@1643	165	TrackConCommandBase((*ppCmd), this);
faluco@1643	166	return true;
faluco@1643	167	}
ds@2400	168	else if ((pCmd=FindCommandBase(name)))
faluco@1643	169	{
faluco@1643	170	m_CmdFlags.insert(name, pCmd);
faluco@1643	171	pCmd->SetFlags(flags);
faluco@1643	172	TrackConCommandBase(pCmd, this);
faluco@1643	173	return true;
faluco@1643	174	}
faluco@1643	175	else
faluco@1643	176	{
faluco@1643	177	return false;
faluco@1643	178	}
faluco@1643	179	}
faluco@1643	180	private:
faluco@1643	181	KTrie<ConCommandBase *> m_CmdFlags;
faluco@1643	182	} s_CommandFlagsHelper;
faluco@1643	183
ds@2400	184	#if SOURCE_ENGINE >= SE_ORANGEBOX
ds@936	185	static void ReplicateConVar(ConVar *pConVar)
ds@936	186	{
ds@936	187	int maxClients = g_Players.GetMaxClients();
ds@936	188
ds@936	189	char data[256];
ds@936	190	bf_write buffer(data, sizeof(data));
ds@936	191
ds@936	192	buffer.WriteUBitLong(NET_SETCONVAR, 5);
ds@936	193	buffer.WriteByte(1);
ds@936	194	buffer.WriteString(pConVar->GetName());
ds@936	195	buffer.WriteString(pConVar->GetString());
ds@936	196
ds@936	197	for (int i = 1; i <= maxClients; i++)
ds@936	198	{
ds@936	199	CPlayer *pPlayer = g_Players.GetPlayerByIndex(i);
ds@936	200
ds@936	201	if (pPlayer && pPlayer->IsInGame() && !pPlayer->IsFakeClient())
ds@936	202	{
ds@936	203	INetChannel netchan = static_cast<INetChannel >(engine->GetPlayerNetInfo(i));
ds@936	204	netchan->SendData(buffer);
ds@936	205	}
ds@936	206	}
ds@936	207	}
ds@936	208
ds@936	209	static void NotifyConVar(ConVar *pConVar)
ds@936	210	{
ds@936	211	IGameEvent *pEvent = gameevents->CreateEvent("server_cvar");
ds@936	212	pEvent->SetString("cvarname", pConVar->GetName());
faluco@1541	213	if (IsFlagSet(pConVar, FCVAR_PROTECTED))
ds@936	214	{
ds@936	215	pEvent->SetString("cvarvalue", "*PROTECTED*");
dvander@1582	216	}
dvander@1582	217	else
dvander@1582	218	{
ds@936	219	pEvent->SetString("cvarvalue", pConVar->GetString());
ds@936	220	}
ds@936	221
ds@936	222	gameevents->FireEvent(pEvent);
ds@936	223	}
ds@2397	224	#endif
ds@936	225
dvander@498	226	static cell_t sm_CreateConVar(IPluginContext pContext, const cell_t params)
dvander@498	227	{
dvander@498	228	char name, defaultVal, *helpText;
dvander@498	229
dvander@498	230	pContext->LocalToString(params[1], &name);
dvander@498	231
dvander@498	232	// While the engine seems to accept a blank convar name, it causes a crash upon server quit
dvander@498	233	if (name == NULL \|\| strcmp(name, "") == 0)
dvander@498	234	{
ds@582	235	return pContext->ThrowNativeError("Convar with blank name is not permitted");
dvander@498	236	}
dvander@498	237
dvander@498	238	pContext->LocalToString(params[2], &defaultVal);
dvander@498	239	pContext->LocalToString(params[3], &helpText);
dvander@498	240
dvander@498	241	bool hasMin = params[5] ? true : false;
dvander@498	242	bool hasMax = params[7] ? true : false;
dvander@498	243	float min = sp_ctof(params[6]);
dvander@498	244	float max = sp_ctof(params[8]);
dvander@498	245
ds@582	246	Handle_t hndl = g_ConVarManager.CreateConVar(pContext, name, defaultVal, helpText, params[4], hasMin, min, hasMax, max);
ds@582	247
ds@582	248	if (hndl == BAD_HANDLE)
ds@582	249	{
dvander@1582	250	return pContext->ThrowNativeError("Convar \"%s\" was not created. A console command with the same might already exist.", name);
ds@582	251	}
ds@582	252
ds@582	253	return hndl;
dvander@498	254	}
dvander@498	255
dvander@498	256	static cell_t sm_FindConVar(IPluginContext pContext, const cell_t params)
dvander@498	257	{
dvander@498	258	char *name;
dvander@498	259
dvander@498	260	pContext->LocalToString(params[1], &name);
dvander@498	261
dvander@498	262	return g_ConVarManager.FindConVar(name);
dvander@498	263	}
dvander@498	264
dvander@498	265	static cell_t sm_HookConVarChange(IPluginContext pContext, const cell_t params)
dvander@498	266	{
dvander@498	267	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	268	HandleError err;
ds@576	269	ConVar *pConVar;
dvander@498	270
dvander@1582	271	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	272	!= HandleError_None)
dvander@498	273	{
ds@581	274	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	275	}
dvander@498	276
ds@582	277	IPluginFunction *pFunction = pContext->GetFunctionById(params[2]);
ds@582	278
ds@582	279	if (!pFunction)
ds@582	280	{
ds@582	281	return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
ds@582	282	}
ds@582	283
ds@582	284	g_ConVarManager.HookConVarChange(pConVar, pFunction);
dvander@498	285
dvander@498	286	return 1;
dvander@498	287	}
dvander@498	288
dvander@498	289	static cell_t sm_UnhookConVarChange(IPluginContext pContext, const cell_t params)
dvander@498	290	{
dvander@498	291	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	292	HandleError err;
ds@576	293	ConVar *pConVar;
dvander@498	294
dvander@1582	295	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	296	!= HandleError_None)
dvander@498	297	{
ds@581	298	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	299	}
dvander@498	300
ds@582	301	IPluginFunction *pFunction = pContext->GetFunctionById(params[2]);
ds@582	302
ds@582	303	if (!pFunction)
ds@582	304	{
ds@582	305	return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
ds@582	306	}
ds@582	307
ds@582	308	g_ConVarManager.UnhookConVarChange(pConVar, pFunction);
dvander@498	309
dvander@498	310	return 1;
dvander@498	311	}
dvander@498	312
dvander@498	313	static cell_t sm_GetConVarBool(IPluginContext pContext, const cell_t params)
dvander@498	314	{
dvander@498	315	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	316	HandleError err;
ds@576	317	ConVar *pConVar;
dvander@498	318
dvander@1582	319	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	320	!= HandleError_None)
dvander@498	321	{
ds@581	322	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	323	}
dvander@498	324
ds@576	325	return pConVar->GetBool();
dvander@498	326	}
dvander@498	327
dvander@498	328	static cell_t sm_GetConVarInt(IPluginContext pContext, const cell_t params)
dvander@498	329	{
dvander@498	330	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	331	HandleError err;
ds@576	332	ConVar *pConVar;
dvander@498	333
dvander@1582	334	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	335	!= HandleError_None)
dvander@498	336	{
ds@581	337	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	338	}
dvander@498	339
ds@576	340	return pConVar->GetInt();
dvander@498	341	}
dvander@498	342
dvander@498	343	/* This handles both SetConVarBool() and SetConVarInt() */
dvander@498	344	static cell_t sm_SetConVarNum(IPluginContext pContext, const cell_t params)
dvander@498	345	{
dvander@498	346	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	347	HandleError err;
ds@576	348	ConVar *pConVar;
dvander@498	349
dvander@1582	350	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	351	!= HandleError_None)
dvander@498	352	{
ds@581	353	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	354	}
dvander@498	355
ds@576	356	pConVar->SetValue(params[2]);
dvander@498	357
ds@2400	358	#if SOURCE_ENGINE >= SE_ORANGEBOX
ds@936	359	/* Should we replicate it? */
faluco@1541	360	if (params[3] && IsFlagSet(pConVar, FCVAR_REPLICATED))
ds@936	361	{
ds@936	362	ReplicateConVar(pConVar);
ds@936	363	}
ds@936	364
ds@936	365	/* Should we notify clients? */
faluco@1541	366	if (params[4] && IsFlagSet(pConVar, FCVAR_NOTIFY))
ds@936	367	{
ds@936	368	NotifyConVar(pConVar);
ds@936	369	}
ds@2396	370	#endif
ds@936	371
dvander@498	372	return 1;
dvander@498	373	}
dvander@498	374
dvander@498	375	static cell_t sm_GetConVarFloat(IPluginContext pContext, const cell_t params)
dvander@498	376	{
dvander@498	377	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	378	HandleError err;
ds@576	379	ConVar *pConVar;
dvander@498	380
dvander@1582	381	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	382	!= HandleError_None)
dvander@498	383	{
ds@581	384	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	385	}
dvander@498	386
ds@576	387	float value = pConVar->GetFloat();
dvander@498	388
dvander@498	389	return sp_ftoc(value);
dvander@498	390	}
dvander@498	391
dvander@498	392	static cell_t sm_SetConVarFloat(IPluginContext pContext, const cell_t params)
dvander@498	393	{
dvander@498	394	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	395	HandleError err;
ds@576	396	ConVar *pConVar;
dvander@498	397
dvander@1582	398	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	399	!= HandleError_None)
dvander@498	400	{
ds@581	401	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	402	}
dvander@498	403
dvander@498	404	float value = sp_ctof(params[2]);
ds@576	405	pConVar->SetValue(value);
dvander@498	406
ds@2400	407	#if SOURCE_ENGINE >= SE_ORANGEBOX
ds@936	408	/* Should we replicate it? */
faluco@1541	409	if (params[3] && IsFlagSet(pConVar, FCVAR_REPLICATED))
ds@936	410	{
ds@936	411	ReplicateConVar(pConVar);
ds@936	412	}
ds@936	413
ds@936	414	/* Should we notify clients? */
faluco@1541	415	if (params[4] && IsFlagSet(pConVar, FCVAR_NOTIFY))
ds@936	416	{
ds@936	417	NotifyConVar(pConVar);
ds@936	418	}
ds@2396	419	#endif
ds@936	420
dvander@498	421	return 1;
dvander@498	422	}
dvander@498	423
dvander@498	424	static cell_t sm_GetConVarString(IPluginContext pContext, const cell_t params)
dvander@498	425	{
dvander@498	426	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	427	HandleError err;
ds@576	428	ConVar *pConVar;
dvander@498	429
dvander@1582	430	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	431	!= HandleError_None)
dvander@498	432	{
ds@581	433	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	434	}
dvander@498	435
ds@576	436	pContext->StringToLocalUTF8(params[2], params[3], pConVar->GetString(), NULL);
dvander@498	437
dvander@498	438	return 1;
dvander@498	439	}
dvander@498	440
dvander@498	441	static cell_t sm_SetConVarString(IPluginContext pContext, const cell_t params)
dvander@498	442	{
dvander@498	443	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	444	HandleError err;
ds@576	445	ConVar *pConVar;
dvander@498	446
dvander@1582	447	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	448	!= HandleError_None)
dvander@498	449	{
ds@581	450	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	451	}
dvander@498	452
dvander@498	453	char *value;
dvander@498	454	pContext->LocalToString(params[2], &value);
dvander@498	455
ds@576	456	pConVar->SetValue(value);
dvander@498	457
ds@2400	458	#if SOURCE_ENGINE >= SE_ORANGEBOX
ds@936	459	/* Should we replicate it? */
faluco@1541	460	if (params[3] && IsFlagSet(pConVar, FCVAR_REPLICATED))
ds@936	461	{
ds@936	462	ReplicateConVar(pConVar);
ds@936	463	}
ds@936	464
ds@936	465	/* Should we notify clients? */
faluco@1541	466	if (params[4] && IsFlagSet(pConVar, FCVAR_NOTIFY))
ds@936	467	{
ds@936	468	NotifyConVar(pConVar);
ds@936	469	}
ds@2396	470	#endif
ds@936	471
dvander@498	472	return 1;
dvander@498	473	}
dvander@498	474
ds@1301	475	static cell_t sm_ResetConVar(IPluginContext pContext, const cell_t params)
ds@1301	476	{
ds@1301	477	Handle_t hndl = static_cast<Handle_t>(params[1]);
ds@1301	478	HandleError err;
ds@1301	479	ConVar *pConVar;
ds@1301	480
dvander@1582	481	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
ds@1301	482	!= HandleError_None)
ds@1301	483	{
ds@1301	484	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
ds@1301	485	}
ds@1301	486
ds@1301	487	pConVar->Revert();
ds@1301	488
ds@2400	489	#if SOURCE_ENGINE >= SE_ORANGEBOX
ds@1301	490	/* Should we replicate it? */
ds@2396	491	if (params[3] && IsFlagSet(pConVar, FCVAR_REPLICATED))
ds@1301	492	{
ds@1301	493	ReplicateConVar(pConVar);
ds@1301	494	}
ds@1301	495
ds@1301	496	/* Should we notify clients? */
ds@2396	497	if (params[4] && IsFlagSet(pConVar, FCVAR_NOTIFY))
ds@1301	498	{
ds@1301	499	NotifyConVar(pConVar);
ds@1301	500	}
ds@2396	501	#endif
ds@1301	502
ds@1301	503	return 1;
ds@1301	504	}
ds@1301	505
dvander@498	506	static cell_t sm_GetConVarFlags(IPluginContext pContext, const cell_t params)
dvander@498	507	{
dvander@498	508	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	509	HandleError err;
ds@576	510	ConVar *pConVar;
dvander@498	511
dvander@1582	512	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	513	!= HandleError_None)
dvander@498	514	{
ds@581	515	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	516	}
dvander@498	517
ds@576	518	return pConVar->GetFlags();
dvander@498	519	}
dvander@498	520
dvander@498	521	static cell_t sm_SetConVarFlags(IPluginContext pContext, const cell_t params)
dvander@498	522	{
dvander@498	523	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	524	HandleError err;
ds@576	525	ConVar *pConVar;
dvander@498	526
dvander@1582	527	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	528	!= HandleError_None)
dvander@498	529	{
ds@581	530	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	531	}
dvander@498	532
ds@576	533	pConVar->SetFlags(params[2]);
dvander@498	534
dvander@498	535	return 1;
dvander@498	536	}
dvander@498	537
ds@714	538	static cell_t sm_GetConVarBounds(IPluginContext pContext, const cell_t params)
dvander@498	539	{
dvander@498	540	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	541	HandleError err;
ds@576	542	ConVar *pConVar;
dvander@498	543
dvander@1582	544	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	545	!= HandleError_None)
dvander@498	546	{
ds@581	547	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	548	}
dvander@498	549
dvander@498	550	cell_t *addr;
ds@714	551	bool hasBound;
ds@714	552	float bound;
dvander@498	553
ds@714	554	switch (params[2])
ds@714	555	{
ds@714	556	case ConVarBound_Upper:
ds@714	557	hasBound = pConVar->GetMax(bound);
ds@714	558	break;
ds@714	559	case ConVarBound_Lower:
ds@714	560	hasBound = pConVar->GetMin(bound);
ds@714	561	break;
ds@714	562	default:
ds@714	563	return pContext->ThrowNativeError("Invalid ConVarBounds value %d");
ds@714	564	}
ds@714	565
ds@714	566	pContext->LocalToPhysAddr(params[3], &addr);
ds@714	567	*addr = sp_ftoc(bound);
dvander@498	568
ds@714	569	return hasBound;
dvander@498	570	}
dvander@498	571
ds@714	572	static cell_t sm_SetConVarBounds(IPluginContext pContext, const cell_t params)
dvander@498	573	{
dvander@498	574	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	575	HandleError err;
ds@576	576	ConVar *pConVar;
dvander@498	577
dvander@1582	578	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	579	!= HandleError_None)
dvander@498	580	{
ds@581	581	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	582	}
dvander@498	583
ds@714	584	switch (params[2])
ds@714	585	{
ds@714	586	case ConVarBound_Upper:
ds@714	587	pConVar->SetMax(params[3] ? true : false, sp_ctof(params[4]));
ds@714	588	break;
ds@714	589	case ConVarBound_Lower:
ds@714	590	pConVar->SetMin(params[3] ? true : false, sp_ctof(params[4]));
ds@714	591	break;
ds@714	592	default:
ds@714	593	return pContext->ThrowNativeError("Invalid ConVarBounds value %d");
ds@714	594	}
dvander@498	595
ds@714	596	return 1;
dvander@498	597	}
dvander@498	598
dvander@498	599	static cell_t sm_GetConVarName(IPluginContext pContext, const cell_t params)
dvander@498	600	{
dvander@498	601	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498	602	HandleError err;
ds@576	603	ConVar *pConVar;
dvander@498	604
dvander@1582	605	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498	606	!= HandleError_None)
dvander@498	607	{
ds@581	608	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498	609	}
dvander@498	610
ds@576	611	pContext->StringToLocalUTF8(params[2], params[3], pConVar->GetName(), NULL);
dvander@498	612
dvander@498	613	return 1;
dvander@498	614	}
dvander@498	615
ds@696	616	static bool s_QueryAlreadyWarned = false;
ds@696	617
ds@696	618	static cell_t sm_QueryClientConVar(IPluginContext pContext, const cell_t params)
ds@696	619	{
ds@696	620	CPlayer *pPlayer;
ds@696	621	char *name;
ds@696	622	IPluginFunction *pCallback;
ds@696	623
dvander@1581	624	if (!g_ConVarManager.IsQueryingSupported())
ds@696	625	{
ds@696	626	if (!s_QueryAlreadyWarned)
ds@696	627	{
ds@696	628	s_QueryAlreadyWarned = true;
ds@696	629	return pContext->ThrowNativeError("Game does not support client convar querying (one time warning)");
ds@696	630	}
ds@696	631
ds@696	632	return 0;
ds@696	633	}
ds@696	634
ds@696	635	pPlayer = g_Players.GetPlayerByIndex(params[1]);
ds@696	636
ds@696	637	if (!pPlayer)
ds@696	638	{
ds@994	639	return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
ds@696	640	}
ds@696	641
ds@697	642	if (!pPlayer->IsConnected())
ds@696	643	{
ds@994	644	return pContext->ThrowNativeError("Client %d is not connected", params[1]);
ds@697	645	}
ds@697	646
ds@697	647	/* Trying a query on a bot results in callback not be fired, so don't bother */
ds@697	648	if (pPlayer->IsFakeClient())
ds@697	649	{
ds@697	650	return 0;
ds@696	651	}
ds@696	652
ds@696	653	pContext->LocalToString(params[2], &name);
ds@696	654	pCallback = pContext->GetFunctionById(params[3]);
ds@696	655
ds@696	656	if (!pCallback)
ds@696	657	{
ds@696	658	return pContext->ThrowNativeError("Invalid function id (%X)", params[3]);
ds@696	659	}
ds@696	660
ds@696	661	return g_ConVarManager.QueryClientConVar(pPlayer->GetEdict(), name, pCallback, params[4]);
ds@696	662	}
ds@696	663
dvander@498	664	static cell_t sm_RegServerCmd(IPluginContext pContext, const cell_t params)
dvander@498	665	{
dvander@498	666	char name,help;
dvander@498	667	IPluginFunction *pFunction;
dvander@498	668
dvander@498	669	pContext->LocalToString(params[1], &name);
dvander@2800	670
dvander@2800	671	if (strcasecmp(name, "sm") == 0)
dvander@2800	672	{
dvander@2806	673	return pContext->ThrowNativeError("Cannot register \"sm\" command");
dvander@2800	674	}
dvander@2800	675
dvander@498	676	pContext->LocalToString(params[3], &help);
dvander@498	677	pFunction = pContext->GetFunctionById(params[2]);
dvander@498	678
dvander@498	679	if (!pFunction)
dvander@498	680	{
dvander@498	681	return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
dvander@498	682	}
dvander@498	683
ds@579	684	if (!g_ConCmds.AddServerCommand(pFunction, name, help, params[4]))
ds@579	685	{
ds@579	686	return pContext->ThrowNativeError("Command \"%s\" could not be created. A convar with the same name already exists.", name);
ds@579	687	}
dvander@498	688
dvander@498	689	return 1;
dvander@498	690	}
dvander@498	691
dvander@500	692	static cell_t sm_RegConsoleCmd(IPluginContext pContext, const cell_t params)
dvander@500	693	{
dvander@500	694	char name,help;
dvander@500	695	IPluginFunction *pFunction;
dvander@500	696
dvander@500	697	pContext->LocalToString(params[1], &name);
dvander@2800	698
dvander@2800	699	if (strcasecmp(name, "sm") == 0)
dvander@2800	700	{
dvander@2806	701	return pContext->ThrowNativeError("Cannot register \"sm\" command");
dvander@2800	702	}
dvander@2800	703
dvander@500	704	pContext->LocalToString(params[3], &help);
dvander@500	705	pFunction = pContext->GetFunctionById(params[2]);
dvander@500	706
dvander@500	707	if (!pFunction)
dvander@500	708	{
dvander@500	709	return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
dvander@500	710	}
dvander@500	711
ds@579	712	if (!g_ConCmds.AddConsoleCommand(pFunction, name, help, params[4]))
ds@579	713	{
ds@579	714	return pContext->ThrowNativeError("Command \"%s\" could not be created. A convar with the same name already exists.", name);
ds@579	715	}
dvander@500	716
dvander@500	717	return 1;
dvander@500	718	}
dvander@500	719
dvander@514	720	static cell_t sm_RegAdminCmd(IPluginContext pContext, const cell_t params)
dvander@514	721	{
dvander@514	722	char name,help;
dvander@514	723	const char *group;
dvander@514	724	IPluginFunction *pFunction;
dvander@514	725	FlagBits flags = params[3];
dvander@514	726	int cmdflags = params[6];
dvander@514	727
dvander@514	728	pContext->LocalToString(params[1], &name);
dvander@2800	729
dvander@2800	730	if (strcasecmp(name, "sm") == 0)
dvander@2800	731	{
dvander@2806	732	return pContext->ThrowNativeError("Cannot register \"sm\" command");
dvander@2800	733	}
dvander@2800	734
dvander@514	735	pContext->LocalToString(params[4], &help);
dvander@514	736	pContext->LocalToString(params[5], (char **)&group);
dvander@514	737	pFunction = pContext->GetFunctionById(params[2]);
dvander@514	738
dvander@514	739	if (group[0] == '\0')
dvander@514	740	{
dvander@514	741	CPlugin *pPlugin = g_PluginSys.GetPluginByCtx(pContext->GetContext());
dvander@514	742	group = pPlugin->GetFilename();
dvander@514	743	}
dvander@514	744
dvander@514	745	if (!pFunction)
dvander@514	746	{
dvander@514	747	return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
dvander@514	748	}
dvander@514	749
ds@579	750	if (!g_ConCmds.AddAdminCommand(pFunction, name, group, flags, help, cmdflags))
ds@579	751	{
ds@579	752	return pContext->ThrowNativeError("Command \"%s\" could not be created. A convar with the same name already exists.", name);
ds@579	753	}
dvander@514	754
dvander@514	755	return 1;
dvander@514	756	}
dvander@514	757
dvander@517	758	static cell_t sm_GetCmdArgs(IPluginContext pContext, const cell_t params)
dvander@517	759	{
dvander@1544	760	const CCommand *pCmd = g_HL2.PeekCommandStack();
dvander@1544	761
dvander@1544	762	if (!pCmd)
dvander@1544	763	{
dvander@1544	764	return pContext->ThrowNativeError("No command callback available");
dvander@1544	765	}
dvander@1544	766
dvander@1544	767	return pCmd->ArgC() - 1;
dvander@517	768	}
dvander@517	769
dvander@517	770	static cell_t sm_GetCmdArg(IPluginContext pContext, const cell_t params)
dvander@517	771	{
dvander@1544	772	const CCommand *pCmd = g_HL2.PeekCommandStack();
dvander@1544	773
dvander@1544	774	if (!pCmd)
dvander@1544	775	{
dvander@1544	776	return pContext->ThrowNativeError("No command callback available");
dvander@1544	777	}
dvander@1544	778
dvander@1421	779	size_t length;
dvander@1544	780
dvander@1544	781	const char *arg = pCmd->Arg(params[1]);
dvander@517	782
dvander@1544	783	pContext->StringToLocalUTF8(params[2], params[3], arg ? arg : "", &length);
dvander@517	784
dvander@1421	785	return (cell_t)length;
dvander@517	786	}
dvander@517	787
dvander@517	788	static cell_t sm_GetCmdArgString(IPluginContext pContext, const cell_t params)
dvander@517	789	{
dvander@1544	790	const CCommand *pCmd = g_HL2.PeekCommandStack();
dvander@1544	791
dvander@1544	792	if (!pCmd)
dvander@1544	793	{
dvander@1544	794	return pContext->ThrowNativeError("No command callback available");
dvander@1544	795	}
dvander@1544	796
dvander@1544	797	const char *args = pCmd->ArgS();
dvander@1421	798	size_t length;
dvander@517	799
dvander@633	800	if (!args)
dvander@633	801	{
dvander@633	802	args = "";
dvander@633	803	}
dvander@633	804
dvander@1421	805	pContext->StringToLocalUTF8(params[1], params[2], args, &length);
dvander@517	806
dvander@1421	807	return (cell_t)length;
dvander@517	808	}
dvander@517	809
dvander@518	810	static cell_t sm_PrintToServer(IPluginContext pCtx, const cell_t params)
dvander@518	811	{
dvander@518	812	char buffer[1024];
dvander@518	813	char *fmt;
dvander@518	814	int arg = 2;
dvander@518	815
dvander@518	816	pCtx->LocalToString(params[1], &fmt);
dvander@518	817	size_t res = atcprintf(buffer, sizeof(buffer)-2, fmt, pCtx, params, &arg);
dvander@518	818
dvander@518	819	buffer[res++] = '\n';
dvander@518	820	buffer[res] = '\0';
dvander@518	821
dvander@518	822	META_CONPRINT(buffer);
dvander@518	823
dvander@518	824	return 1;
dvander@518	825	}
dvander@518	826
dvander@518	827	static cell_t sm_PrintToConsole(IPluginContext pCtx, const cell_t params)
dvander@518	828	{
dvander@518	829	int index = params[1];
dvander@520	830	if ((index < 0) \|\| (index > g_Players.GetMaxClients()))
dvander@518	831	{
ds@994	832	return pCtx->ThrowNativeError("Client index %d is invalid", index);
dvander@518	833	}
dvander@518	834
dvander@520	835	CPlayer *pPlayer = NULL;
dvander@520	836	if (index != 0)
dvander@518	837	{
dvander@520	838	pPlayer = g_Players.GetPlayerByIndex(index);
dvander@520	839	if (!pPlayer->IsInGame())
dvander@520	840	{
dvander@520	841	return pCtx->ThrowNativeError("Client %d is not in game", index);
dvander@520	842	}
dvander@520	843
dvander@520	844	/* Silent fail on bots, engine will crash */
dvander@520	845	if (pPlayer->IsFakeClient())
dvander@520	846	{
dvander@520	847	return 0;
dvander@520	848	}
dvander@519	849	}
dvander@518	850
dvander@518	851	char buffer[1024];
dvander@518	852	char *fmt;
dvander@518	853	int arg = 3;
dvander@518	854
dvander@518	855	pCtx->LocalToString(params[2], &fmt);
dvander@518	856	size_t res = atcprintf(buffer, sizeof(buffer)-2, fmt, pCtx, params, &arg);
dvander@518	857
dvander@518	858	buffer[res++] = '\n';
dvander@518	859	buffer[res] = '\0';
dvander@518	860
dvander@520	861	if (index != 0)
dvander@520	862	{
dvander@520	863	engine->ClientPrintf(pPlayer->GetEdict(), buffer);
dvander@520	864	} else {
dvander@520	865	META_CONPRINT(buffer);
dvander@520	866	}
dvander@518	867
dvander@518	868	return 1;
dvander@518	869	}
dvander@518	870
dvander@522	871	static cell_t sm_ServerCommand(IPluginContext pContext, const cell_t params)
dvander@522	872	{
dvander@2042	873	g_SourceMod.SetGlobalTarget(SOURCEMOD_SERVER_LANGUAGE);
dvander@1273	874
dvander@522	875	char buffer[1024];
dvander@522	876	size_t len = g_SourceMod.FormatString(buffer, sizeof(buffer)-2, pContext, params, 1);
dvander@522	877
dvander@2193	878	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1273	879	{
dvander@1273	880	return 0;
dvander@1273	881	}
dvander@1011	882
dvander@522	883	/* One byte for null terminator, one for newline */
dvander@522	884	buffer[len++] = '\n';
dvander@522	885	buffer[len] = '\0';
dvander@522	886
dvander@522	887	engine->ServerCommand(buffer);
dvander@522	888
dvander@522	889	return 1;
dvander@522	890	}
dvander@522	891
dvander@522	892	static cell_t sm_InsertServerCommand(IPluginContext pContext, const cell_t params)
dvander@522	893	{
dvander@2042	894	g_SourceMod.SetGlobalTarget(SOURCEMOD_SERVER_LANGUAGE);
dvander@1273	895
dvander@522	896	char buffer[1024];
dvander@522	897	size_t len = g_SourceMod.FormatString(buffer, sizeof(buffer)-2, pContext, params, 1);
dvander@522	898
dvander@2193	899	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1273	900	{
dvander@1273	901	return 0;
dvander@1273	902	}
dvander@1011	903
dvander@522	904	/* One byte for null terminator, one for newline */
dvander@522	905	buffer[len++] = '\n';
dvander@522	906	buffer[len] = '\0';
dvander@522	907
faluco@1541	908	InsertServerCommand(buffer);
dvander@522	909
dvander@522	910	return 1;
dvander@522	911	}
dvander@522	912
dvander@522	913	static cell_t sm_ServerExecute(IPluginContext pContext, const cell_t params)
dvander@522	914	{
dvander@522	915	engine->ServerExecute();
dvander@522	916
dvander@522	917	return 1;
dvander@522	918	}
dvander@522	919
dvander@532	920	static cell_t sm_ClientCommand(IPluginContext pContext, const cell_t params)
dvander@532	921	{
dvander@532	922	CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
dvander@532	923
dvander@532	924	if (!pPlayer)
dvander@532	925	{
ds@994	926	return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
dvander@532	927	}
dvander@532	928
dvander@532	929	if (!pPlayer->IsConnected())
dvander@532	930	{
ds@994	931	return pContext->ThrowNativeError("Client %d is not connected", params[1]);
dvander@532	932	}
dvander@532	933
dvander@1011	934	g_SourceMod.SetGlobalTarget(params[1]);
dvander@1011	935
dvander@532	936	char buffer[256];
ds@873	937	g_SourceMod.FormatString(buffer, sizeof(buffer), pContext, params, 2);
dvander@532	938
dvander@2193	939	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1273	940	{
dvander@1273	941	return 0;
dvander@1273	942	}
dvander@1273	943
dvander@532	944	engine->ClientCommand(pPlayer->GetEdict(), "%s", buffer);
dvander@532	945
dvander@532	946	return 1;
dvander@532	947	}
dvander@532	948
dvander@893	949	static cell_t FakeClientCommand(IPluginContext pContext, const cell_t params)
dvander@893	950	{
dvander@893	951	CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
dvander@893	952
dvander@893	953	if (!pPlayer)
dvander@893	954	{
ds@994	955	return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
dvander@893	956	}
dvander@893	957
dvander@893	958	if (!pPlayer->IsConnected())
dvander@893	959	{
ds@994	960	return pContext->ThrowNativeError("Client %d is not connected", params[1]);
dvander@893	961	}
dvander@893	962
dvander@893	963	char buffer[256];
dvander@893	964	g_SourceMod.FormatString(buffer, sizeof(buffer), pContext, params, 2);
dvander@893	965
dvander@2193	966	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1273	967	{
dvander@1273	968	return 0;
dvander@1273	969	}
dvander@1273	970
dvander@893	971	serverpluginhelpers->ClientCommand(pPlayer->GetEdict(), buffer);
dvander@1337	972
dvander@1337	973	return 1;
dvander@1337	974	}
dvander@1337	975
dvander@1337	976	static cell_t FakeClientCommandEx(IPluginContext pContext, const cell_t params)
dvander@1337	977	{
dvander@1337	978	CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
dvander@1337	979
dvander@1337	980	if (!pPlayer)
dvander@1337	981	{
dvander@1337	982	return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
dvander@1337	983	}
dvander@1337	984
dvander@1337	985	if (!pPlayer->IsConnected())
dvander@1337	986	{
dvander@1337	987	return pContext->ThrowNativeError("Client %d is not connected", params[1]);
dvander@1337	988	}
dvander@1337	989
dvander@1337	990	char buffer[256];
dvander@1337	991	g_SourceMod.FormatString(buffer, sizeof(buffer), pContext, params, 2);
dvander@1337	992
dvander@2193	993	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1337	994	{
dvander@1337	995	return 0;
dvander@1337	996	}
dvander@1337	997
dvander@1338	998	g_HL2.AddToFakeCliCmdQueue(params[1], engine->GetPlayerUserId(pPlayer->GetEdict()), buffer);
dvander@893	999
dvander@893	1000	return 1;
dvander@893	1001	}
dvander@893	1002
dvander@893	1003	static cell_t ReplyToCommand(IPluginContext pContext, const cell_t params)
dvander@893	1004	{
dvander@1011	1005	g_SourceMod.SetGlobalTarget(params[1]);
dvander@1011	1006
dvander@893	1007	/* Build the format string */
dvander@893	1008	char buffer[1024];
dvander@893	1009	size_t len = g_SourceMod.FormatString(buffer, sizeof(buffer)-2, pContext, params, 2);
dvander@893	1010
dvander@2193	1011	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1273	1012	{
dvander@1273	1013	return 0;
dvander@1273	1014	}
dvander@1273	1015
dvander@893	1016	/* If we're printing to the server, shortcut out */
dvander@893	1017	if (params[1] == 0)
dvander@893	1018	{
dvander@893	1019	/* Print */
dvander@893	1020	buffer[len++] = '\n';
dvander@893	1021	buffer[len] = '\0';
dvander@893	1022	META_CONPRINT(buffer);
dvander@893	1023	return 1;
dvander@893	1024	}
dvander@893	1025
dvander@893	1026	CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
dvander@893	1027
dvander@893	1028	if (!pPlayer)
dvander@893	1029	{
dvander@893	1030	return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
dvander@893	1031	}
dvander@893	1032
dvander@893	1033	if (!pPlayer->IsConnected())
dvander@893	1034	{
dvander@893	1035	return pContext->ThrowNativeError("Client %d is not connected", params[1]);
dvander@893	1036	}
dvander@893	1037
dvander@910	1038	g_SourceMod.SetGlobalTarget(params[1]);
dvander@910	1039
dvander@893	1040	unsigned int replyto = g_ChatTriggers.GetReplyTo();
dvander@893	1041	if (replyto == SM_REPLY_CONSOLE)
dvander@893	1042	{
dvander@893	1043	buffer[len++] = '\n';
dvander@893	1044	buffer[len] = '\0';
dvander@893	1045	engine->ClientPrintf(pPlayer->GetEdict(), buffer);
dvander@893	1046	} else if (replyto == SM_REPLY_CHAT) {
dvander@893	1047	if (len >= 191)
dvander@893	1048	{
dvander@893	1049	len = 191;
dvander@893	1050	}
dvander@893	1051	buffer[len] = '\0';
dvander@893	1052	g_HL2.TextMsg(params[1], HUD_PRINTTALK, buffer);
dvander@893	1053	}
dvander@893	1054
dvander@893	1055	return 1;
dvander@893	1056	}
dvander@893	1057
dvander@923	1058	static cell_t GetCmdReplyTarget(IPluginContext pContext, const cell_t params)
dvander@923	1059	{
dvander@923	1060	return g_ChatTriggers.GetReplyTo();
dvander@923	1061	}
dvander@923	1062
dvander@1071	1063	static cell_t SetCmdReplyTarget(IPluginContext pContext, const cell_t params)
dvander@1071	1064	{
dvander@1071	1065	return g_ChatTriggers.SetReplyTo(params[1]);
dvander@1071	1066	}
dvander@1071	1067
dvander@1119	1068	static cell_t GetCommandIterator(IPluginContext pContext, const cell_t params)
dvander@1119	1069	{
dvander@1119	1070	GlobCmdIter *iter = new GlobCmdIter;
dvander@1119	1071	iter->started = false;
dvander@1119	1072
dvander@1119	1073	Handle_t hndl = g_HandleSys.CreateHandle(hCmdIterType, iter, pContext->GetIdentity(), g_pCoreIdent, NULL);
dvander@1119	1074	if (hndl == BAD_HANDLE)
dvander@1119	1075	{
dvander@1119	1076	delete iter;
dvander@1119	1077	}
dvander@1119	1078
dvander@1119	1079	return hndl;
dvander@1119	1080	}
dvander@1119	1081
dvander@1119	1082	static cell_t ReadCommandIterator(IPluginContext pContext, const cell_t params)
dvander@1119	1083	{
dvander@1119	1084	GlobCmdIter *iter;
dvander@1119	1085	HandleError err;
dvander@1119	1086	HandleSecurity sec(pContext->GetIdentity(), g_pCoreIdent);
dvander@1119	1087
dvander@1119	1088	if ((err = g_HandleSys.ReadHandle(params[1], hCmdIterType, &sec, (void **)&iter))
dvander@1119	1089	!= HandleError_None)
dvander@1119	1090	{
dvander@1119	1091	return pContext->ThrowNativeError("Invalid GlobCmdIter Handle %x", params[1]);
dvander@1119	1092	}
dvander@1119	1093
dvander@1119	1094	const List<ConCmdInfo *> &cmds = g_ConCmds.GetCommandList();
dvander@1119	1095
dvander@1119	1096	if (!iter->started)
dvander@1119	1097	{
dvander@1119	1098	iter->iter = cmds.begin();
dvander@1119	1099	iter->started = true;
dvander@1119	1100	}
dvander@1119	1101
dvander@1119	1102	while (iter->iter != cmds.end()
dvander@1119	1103	&& !(*(iter->iter))->sourceMod)
dvander@1119	1104	{
dvander@1119	1105	iter->iter++;
dvander@1119	1106	}
dvander@1119	1107
dvander@1119	1108	if (iter->iter == cmds.end())
dvander@1119	1109	{
dvander@1119	1110	return 0;
dvander@1119	1111	}
dvander@1119	1112
dvander@1119	1113	ConCmdInfo pInfo = ((iter->iter));
dvander@1119	1114
dvander@1119	1115	pContext->StringToLocalUTF8(params[2], params[3], pInfo->pCmd->GetName(), NULL);
dvander@1119	1116	pContext->StringToLocalUTF8(params[5], params[6], pInfo->pCmd->GetHelpText(), NULL);
dvander@1119	1117
dvander@1119	1118	cell_t *addr;
dvander@1119	1119	pContext->LocalToPhysAddr(params[4], &addr);
dvander@1119	1120	*addr = pInfo->admin.eflags;
dvander@1119	1121
dvander@1119	1122	iter->iter++;
dvander@1119	1123
dvander@1119	1124	return 1;
dvander@1119	1125	}
dvander@1119	1126
dvander@1119	1127	static cell_t CheckCommandAccess(IPluginContext pContext, const cell_t params)
dvander@1119	1128	{
dvander@1119	1129	if (params[1] == 0)
dvander@1119	1130	{
dvander@1119	1131	return 1;
dvander@1119	1132	}
dvander@1119	1133
dvander@1119	1134	char *cmd;
dvander@1119	1135	pContext->LocalToString(params[2], &cmd);
dvander@1119	1136
dvander@1429	1137	/* Auto-detect a command if we can */
dvander@1399	1138	FlagBits bits = params[3];
dvander@1429	1139	bool found_command = false;
dvander@1429	1140	if (params[0] < 4 \|\| !params[4])
dvander@1399	1141	{
dvander@1429	1142	found_command = g_ConCmds.LookForCommandAdminFlags(cmd, &bits);
dvander@1429	1143	}
dvander@1429	1144
dvander@1429	1145	if (!found_command)
dvander@1429	1146	{
dvander@1429	1147	g_Admins.GetCommandOverride(cmd, Override_Command, &bits);
dvander@1399	1148	}
dvander@1399	1149
dvander@1399	1150	return g_ConCmds.CheckCommandAccess(params[1], cmd, bits) ? 1 : 0;
dvander@1119	1151	}
dvander@1119	1152
dvander@1469	1153	static cell_t IsChatTrigger(IPluginContext pContext, const cell_t params)
dvander@1469	1154	{
dvander@1469	1155	return g_ChatTriggers.IsChatTrigger() ? 1 : 0;
dvander@1469	1156	}
dvander@1469	1157
faluco@1643	1158	static cell_t SetCommandFlags(IPluginContext pContext, const cell_t params)
faluco@1643	1159	{
faluco@1643	1160	char *name;
faluco@1643	1161	pContext->LocalToString(params[1], &name);
faluco@1643	1162
faluco@1643	1163	return (s_CommandFlagsHelper.SetFlags(name, params[2])) ? 1 : 0;
faluco@1643	1164	}
faluco@1643	1165
faluco@1643	1166	static cell_t GetCommandFlags(IPluginContext pContext, const cell_t params)
faluco@1643	1167	{
faluco@1643	1168	char *name;
faluco@1643	1169	int flags;
faluco@1643	1170	pContext->LocalToString(params[1], &name);
faluco@1643	1171
faluco@1643	1172	return (s_CommandFlagsHelper.GetFlags(name, &flags)) ? flags : -1;
faluco@1643	1173	}
faluco@1643	1174
dvander@1795	1175	static cell_t FindFirstConCommand(IPluginContext pContext, const cell_t params)
dvander@1795	1176	{
dvander@1795	1177	Handle_t hndl;
dvander@1795	1178	ConCmdIter *pIter;
dvander@1795	1179	cell_t pIsCmd, pFlags;
dvander@1795	1180	const ConCommandBase *pConCmd;
faluco@1893	1181	const char *desc;
dvander@1795	1182
dvander@1795	1183	pContext->LocalToPhysAddr(params[3], &pIsCmd);
dvander@1795	1184	pContext->LocalToPhysAddr(params[4], &pFlags);
dvander@1795	1185
fyrenmoo@2847	1186	#if (SOURCE_ENGINE == SE_LEFT4DEAD) \|\| (SOURCE_ENGINE == SE_LEFT4DEAD2)
ds@2400	1187	ICvarIteratorInternal *cvarIter = icvar->FactoryInternalIterator();
ds@2400	1188	cvarIter->SetFirst();
ds@2400	1189	if (!cvarIter->IsValid())
ds@2400	1190	{
ds@2400	1191	return BAD_HANDLE;
ds@2400	1192	}
ds@2400	1193	pConCmd = cvarIter->Get();
ds@2400	1194	#else
dvander@1795	1195	pConCmd = icvar->GetCommands();
dvander@1795	1196	if (pConCmd == NULL)
dvander@1795	1197	{
dvander@1795	1198	return BAD_HANDLE;
dvander@1795	1199	}
ds@2400	1200	#endif
dvander@1795	1201
dvander@1795	1202	pContext->StringToLocalUTF8(params[1], params[2], pConCmd->GetName(), NULL);
dvander@1795	1203	*pIsCmd = pConCmd->IsCommand() ? 1 : 0;
dvander@1795	1204	*pFlags = pConCmd->GetFlags();
dvander@1795	1205
faluco@1893	1206	if (params[6])
faluco@1893	1207	{
faluco@1893	1208	desc = pConCmd->GetHelpText();
faluco@1893	1209	pContext->StringToLocalUTF8(params[5], params[6], (desc && desc[0]) ? desc : "", NULL);
faluco@1893	1210	}
faluco@1893	1211
dvander@1795	1212	pIter = new ConCmdIter;
fyrenmoo@2847	1213	#if (SOURCE_ENGINE == SE_LEFT4DEAD) \|\| (SOURCE_ENGINE == SE_LEFT4DEAD2)
ds@2400	1214	pIter->pLast = cvarIter;
ds@2400	1215	#else
dvander@1795	1216	pIter->pLast = pConCmd;
ds@2400	1217	#endif
dvander@1795	1218
dvander@1795	1219	if ((hndl = g_HandleSys.CreateHandle(htConCmdIter, pIter, pContext->GetIdentity(), g_pCoreIdent, NULL))
dvander@1795	1220	== BAD_HANDLE)
dvander@1795	1221	{
dvander@1795	1222	delete pIter;
dvander@1795	1223	return BAD_HANDLE;
dvander@1795	1224	}
dvander@1795	1225
dvander@1795	1226	return hndl;
dvander@1795	1227	}
dvander@1795	1228
dvander@1795	1229	static cell_t FindNextConCommand(IPluginContext pContext, const cell_t params)
dvander@1795	1230	{
dvander@1795	1231	HandleError err;
dvander@1795	1232	ConCmdIter *pIter;
dvander@1795	1233	cell_t pIsCmd, pFlags;
faluco@1893	1234	const char *desc;
ds@2400	1235	const ConCommandBase *pConCmd;
dvander@1795	1236	HandleSecurity sec(pContext->GetIdentity(), g_pCoreIdent);
dvander@1795	1237
dvander@1795	1238	if ((err = g_HandleSys.ReadHandle(params[1], htConCmdIter, &sec, (void **)&pIter)) != HandleError_None)
dvander@1795	1239	{
dvander@1795	1240	return pContext->ThrowNativeError("Invalid Handle %x (error %d)", params[1], err);
dvander@1795	1241	}
dvander@1795	1242
dvander@1795	1243	if (pIter->pLast == NULL)
dvander@1795	1244	{
dvander@1795	1245	return 0;
dvander@1795	1246	}
dvander@1795	1247
fyrenmoo@2847	1248	#if (SOURCE_ENGINE == SE_LEFT4DEAD) \|\| (SOURCE_ENGINE == SE_LEFT4DEAD2)
ds@2400	1249	ICvarIteratorInternal *cvarIter = pIter->pLast;
ds@2400	1250	cvarIter->Next();
ds@2400	1251	if (!cvarIter->IsValid())
dvander@1795	1252	{
dvander@1795	1253	return 0;
dvander@1795	1254	}
ds@2400	1255	pConCmd = cvarIter->Get();
ds@2400	1256	#else
ds@2400	1257	pConCmd = pIter->pLast->GetNext();
ds@2400	1258	if (pConCmd == NULL)
ds@2400	1259	{
ds@2400	1260	return 0;
ds@2400	1261	}
ds@2400	1262	pIter->pLast = pConCmd;
ds@2400	1263	#endif
dvander@1795	1264
dvander@1795	1265	pContext->LocalToPhysAddr(params[4], &pIsCmd);
dvander@1795	1266	pContext->LocalToPhysAddr(params[5], &pFlags);
dvander@1795	1267
ds@2400	1268	pContext->StringToLocalUTF8(params[2], params[3], pConCmd->GetName(), NULL);
ds@2400	1269	*pIsCmd = pConCmd->IsCommand() ? 1 : 0;
ds@2400	1270	*pFlags = pConCmd->GetFlags();
dvander@1795	1271
faluco@1893	1272	if (params[7])
faluco@1893	1273	{
ds@2400	1274	desc = pConCmd->GetHelpText();
faluco@1893	1275	pContext->StringToLocalUTF8(params[6], params[7], (desc && desc[0]) ? desc : "", NULL);
faluco@1893	1276	}
faluco@1893	1277
dvander@1795	1278	return 1;
dvander@1795	1279	}
dvander@1795	1280
pred@1852	1281	static cell_t SendConVarValue(IPluginContext pContext, const cell_t params)
pred@1852	1282	{
pred@1852	1283	Handle_t hndl = static_cast<Handle_t>(params[2]);
pred@1852	1284	HandleError err;
pred@1852	1285	ConVar *pConVar;
pred@1852	1286
pred@1852	1287	char *value;
pred@1852	1288	pContext->LocalToString(params[3], &value);
pred@1852	1289
pred@1852	1290	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
pred@1852	1291	!= HandleError_None)
pred@1852	1292	{
pred@1852	1293	return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
pred@1852	1294	}
pred@1852	1295
pred@1852	1296	char data[256];
pred@1852	1297	bf_write buffer(data, sizeof(data));
pred@1852	1298
pred@1852	1299	buffer.WriteUBitLong(NET_SETCONVAR, 5);
pred@1852	1300	buffer.WriteByte(1);
pred@1852	1301	buffer.WriteString(pConVar->GetName());
pred@1852	1302	buffer.WriteString(value);
pred@1852	1303
pred@1852	1304	CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
pred@1852	1305
pred@1852	1306	if (!pPlayer)
pred@1852	1307	{
pred@1852	1308	return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
pred@1852	1309	}
pred@1852	1310
pred@1852	1311	if (!pPlayer->IsConnected())
pred@1852	1312	{
pred@1852	1313	return pContext->ThrowNativeError("Client %d is not connected", params[1]);
pred@1852	1314	}
pred@1852	1315
pred@1852	1316	if (pPlayer->IsFakeClient())
pred@1852	1317	{
pred@1852	1318	return pContext->ThrowNativeError("Client %d is fake and cannot be targeted", params[1]);
pred@1852	1319	}
pred@1852	1320
pred@1852	1321	INetChannel netchan = static_cast<INetChannel >(engine->GetPlayerNetInfo(params[1]));
pred@1852	1322	netchan->SendData(buffer);
pred@1852	1323
pred@1852	1324	return 1;
pred@1852	1325	}
pred@1852	1326
pred@2648	1327	static cell_t AddServerTag(IPluginContext pContext, const cell_t params)
pred@2648	1328	{
dvander@2684	1329	return 0;
pred@2648	1330	}
pred@2648	1331
pred@2648	1332	static cell_t RemoveServerTag(IPluginContext pContext, const cell_t params)
pred@2648	1333	{
pred@2648	1334	return 0;
pred@2648	1335	}
pred@2648	1336
dvander@2806	1337	static cell_t AddCommandListener(IPluginContext pContext, const cell_t params)
dvander@2806	1338	{
dvander@2806	1339	char *name;
dvander@2806	1340	IPluginFunction *pFunction;
dvander@2806	1341
dvander@2806	1342	pContext->LocalToString(params[2], &name);
dvander@2806	1343
dvander@2806	1344	if (strcasecmp(name, "sm") == 0)
dvander@2806	1345	{
dvander@2806	1346	g_Logger.LogError("Request to register \"sm\" command denied.");
dvander@2806	1347	return 0;
dvander@2806	1348	}
dvander@2806	1349
dvander@2806	1350	pFunction = pContext->GetFunctionById(params[1]);
dvander@2806	1351
dvander@2806	1352	if (!pFunction)
dvander@2806	1353	return pContext->ThrowNativeError("Invalid function id (%X)", params[1]);
dvander@2806	1354
dvander@2806	1355	if (!g_ConsoleDetours.AddListener(pFunction, name[0] == '\0' ? NULL : name))
dvander@2806	1356	return pContext->ThrowNativeError("This game does not support command listeners");
dvander@2806	1357
dvander@2806	1358	return 1;
dvander@2806	1359	}
dvander@2806	1360
dvander@2806	1361	static cell_t RemoveCommandListener(IPluginContext pContext, const cell_t params)
dvander@2806	1362	{
dvander@2806	1363	char *name;
dvander@2806	1364	IPluginFunction *pFunction;
dvander@2806	1365
dvander@2806	1366	pContext->LocalToString(params[2], &name);
dvander@2806	1367	pFunction = pContext->GetFunctionById(params[1]);
dvander@2806	1368	if (!pFunction)
dvander@2806	1369	return pContext->ThrowNativeError("Invalid function id (%X)", params[1]);
dvander@2806	1370
dvander@2806	1371	if (!g_ConsoleDetours.RemoveListener(pFunction, name[0] == '\0' ? NULL : name))
dvander@2806	1372	return pContext->ThrowNativeError("No matching callback was registered");
dvander@2806	1373
dvander@2806	1374	return 1;
dvander@2806	1375	}
dvander@2806	1376
dvander@518	1377	REGISTER_NATIVES(consoleNatives)
dvander@498	1378	{
dvander@498	1379	{"CreateConVar", sm_CreateConVar},
dvander@498	1380	{"FindConVar", sm_FindConVar},
dvander@498	1381	{"HookConVarChange", sm_HookConVarChange},
dvander@498	1382	{"UnhookConVarChange", sm_UnhookConVarChange},
dvander@498	1383	{"GetConVarBool", sm_GetConVarBool},
dvander@498	1384	{"SetConVarBool", sm_SetConVarNum},
dvander@498	1385	{"GetConVarInt", sm_GetConVarInt},
dvander@498	1386	{"SetConVarInt", sm_SetConVarNum},
dvander@498	1387	{"GetConVarFloat", sm_GetConVarFloat},
dvander@498	1388	{"SetConVarFloat", sm_SetConVarFloat},
dvander@498	1389	{"GetConVarString", sm_GetConVarString},
dvander@498	1390	{"SetConVarString", sm_SetConVarString},
dvander@498	1391	{"GetConVarFlags", sm_GetConVarFlags},
dvander@498	1392	{"SetConVarFlags", sm_SetConVarFlags},
ds@1301	1393	{"ResetConVar", sm_ResetConVar},
dvander@498	1394	{"GetConVarName", sm_GetConVarName},
ds@714	1395	{"GetConVarBounds", sm_GetConVarBounds},
ds@714	1396	{"SetConVarBounds", sm_SetConVarBounds},
ds@696	1397	{"QueryClientConVar", sm_QueryClientConVar},
dvander@498	1398	{"RegServerCmd", sm_RegServerCmd},
dvander@500	1399	{"RegConsoleCmd", sm_RegConsoleCmd},
dvander@517	1400	{"GetCmdArgString", sm_GetCmdArgString},
dvander@517	1401	{"GetCmdArgs", sm_GetCmdArgs},
dvander@517	1402	{"GetCmdArg", sm_GetCmdArg},
dvander@518	1403	{"PrintToServer", sm_PrintToServer},
dvander@518	1404	{"PrintToConsole", sm_PrintToConsole},
dvander@520	1405	{"RegAdminCmd", sm_RegAdminCmd},
dvander@522	1406	{"ServerCommand", sm_ServerCommand},
dvander@522	1407	{"InsertServerCommand", sm_InsertServerCommand},
dvander@522	1408	{"ServerExecute", sm_ServerExecute},
dvander@532	1409	{"ClientCommand", sm_ClientCommand},
dvander@893	1410	{"FakeClientCommand", FakeClientCommand},
dvander@893	1411	{"ReplyToCommand", ReplyToCommand},
dvander@923	1412	{"GetCmdReplySource", GetCmdReplyTarget},
dvander@1077	1413	{"SetCmdReplySource", SetCmdReplyTarget},
dvander@1119	1414	{"GetCommandIterator", GetCommandIterator},
dvander@1119	1415	{"ReadCommandIterator", ReadCommandIterator},
dvander@1119	1416	{"CheckCommandAccess", CheckCommandAccess},
dvander@1338	1417	{"FakeClientCommandEx", FakeClientCommandEx},
dvander@1469	1418	{"IsChatTrigger", IsChatTrigger},
faluco@1643	1419	{"SetCommandFlags", SetCommandFlags},
faluco@1643	1420	{"GetCommandFlags", GetCommandFlags},
dvander@1795	1421	{"FindFirstConCommand", FindFirstConCommand},
dvander@1795	1422	{"FindNextConCommand", FindNextConCommand},
pred@1852	1423	{"SendConVarValue", SendConVarValue},
pred@2648	1424	{"AddServerTag", AddServerTag},
pred@2648	1425	{"RemoveServerTag", RemoveServerTag},
dvander@2806	1426	{"AddCommandListener", AddCommandListener},
dvander@2806	1427	{"RemoveCommandListener", RemoveCommandListener},
dvander@498	1428	{NULL, NULL}
dvander@498	1429	};

author	Nicholas Hastings <skamonkey@gmail.com>
	Thu Mar 11 17:43:46 2010 -0500 (2010-03-11)
changeset 2937	f5016767bfdf
parent 2847	1daf209d9dd2
child 2961	c3bb13e8760b
permissions	-rw-r--r--