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

author	David Anderson <dvander@alliedmods.net>
	Wed Sep 16 22:37:20 2009 -0700 (2009-09-16)
changeset 2800	74c32429908e
parent 2684	a802f5cebe28
child 2806	686c283b08fc
permissions	-rw-r--r--