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