core/smn_console.cpp
author Kyle Sanderson <kyle.leet@gmail.com>
Wed Jul 31 22:03:59 2013 -0400 (2013-07-31)
changeset 3963 39fc1ce67130
parent 3961 0dc477c29792
child 4060 b4484bd36c22
permissions -rw-r--r--
Fixed crash in SDKHooks when throwing bad ent type error on logical ent (r=psychonic).
dvander@498
     1
/**
ds@653
     2
 * vim: set ts=4 :
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"
ds@696
    33
#include "HalfLife2.h"
dvander@498
    34
#include "sourcemm_api.h"
ds@580
    35
#include "ConVarManager.h"
ds@579
    36
#include "ConCmdManager.h"
dvander@518
    37
#include "sm_stringutil.h"
dvander@591
    38
#include "PlayerManager.h"
dvander@893
    39
#include "ChatTriggers.h"
dvander@1429
    40
#include "AdminCache.h"
ds@936
    41
#include <inetchannel.h>
ds@936
    42
#include <bitbuf.h>
faluco@1643
    43
#include <sm_trie_tpl.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"
ds@936
    49
skamonkey@3855
    50
#if SOURCE_ENGINE == SE_CSGO || SOURCE_ENGINE == SE_DOTA
skamonkey@3743
    51
#include <netmessages.pb.h>
skamonkey@3743
    52
#endif
skamonkey@3743
    53
skamonkey@3373
    54
#if SOURCE_ENGINE >= SE_EYE
ds@2973
    55
#define NETMSG_BITS 6
ds@2973
    56
#else
ds@2973
    57
#define NETMSG_BITS 5
ds@2973
    58
#endif
ds@2973
    59
ds@3099
    60
#if SOURCE_ENGINE >= SE_LEFT4DEAD
ds@2400
    61
#define NET_SETCONVAR	6
ds@2400
    62
#else
ds@936
    63
#define NET_SETCONVAR	5
ds@2400
    64
#endif
dvander@498
    65
ds@714
    66
enum ConVarBounds
ds@714
    67
{
ds@714
    68
	ConVarBound_Upper = 0,
ds@714
    69
	ConVarBound_Lower
ds@714
    70
};
ds@714
    71
dvander@1119
    72
HandleType_t hCmdIterType = 0;
dvander@1795
    73
HandleType_t htConCmdIter = 0;
dvander@1119
    74
dvander@1119
    75
struct GlobCmdIter
dvander@1119
    76
{
dvander@1119
    77
	bool started;
dvander@1119
    78
	List<ConCmdInfo *>::iterator iter;
dvander@1119
    79
};
dvander@1119
    80
dvander@1119
    81
class ConsoleHelpers : 
dvander@1119
    82
	public SMGlobalClass,
dvander@1119
    83
	public IHandleTypeDispatch
dvander@1119
    84
{
dvander@1119
    85
public:
dvander@1119
    86
	virtual void OnSourceModAllInitialized()
dvander@1119
    87
	{
dvander@1119
    88
		HandleAccess access;
dvander@1795
    89
dvander@3872
    90
		handlesys->InitAccessDefaults(NULL, &access);
dvander@1795
    91
dvander@3872
    92
		htConCmdIter = handlesys->CreateType("ConCmdIter", this, 0, NULL, &access, g_pCoreIdent, NULL);
dvander@1795
    93
dvander@1119
    94
		access.access[HandleAccess_Clone] = HANDLE_RESTRICT_OWNER | HANDLE_RESTRICT_IDENTITY;
dvander@1119
    95
dvander@3872
    96
		hCmdIterType = handlesys->CreateType("CmdIter", this, 0, NULL, &access, g_pCoreIdent, NULL);
dvander@1119
    97
	}
dvander@1119
    98
	virtual void OnHandleDestroy(HandleType_t type, void *object)
dvander@1119
    99
	{
dvander@1795
   100
		if (type == hCmdIterType)
dvander@1795
   101
		{
dvander@1795
   102
			GlobCmdIter *iter = (GlobCmdIter *)object;
dvander@1795
   103
			delete iter;
dvander@1795
   104
		}
dvander@1795
   105
		else if (type == htConCmdIter)
dvander@1795
   106
		{
ds@3099
   107
			ConCommandBaseIterator *iter = (ConCommandBaseIterator * )object;
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
		{
ds@3099
   115
			*pSize = sizeof(ConCommandBaseIterator);
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@3081
   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@2973
   190
	buffer.WriteUBitLong(NET_SETCONVAR, NETMSG_BITS);
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
		{
dvander@2961
   201
			if (INetChannel *netchan = static_cast<INetChannel *>(engine->GetPlayerNetInfo(i)))
dvander@2961
   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@3081
   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@3081
   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@3081
   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@3081
   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
ds@3071
   504
static cell_t GetConVarDefault(IPluginContext *pContext, const cell_t *params)
ds@3071
   505
{
ds@3071
   506
	Handle_t hndl = static_cast<Handle_t>(params[1]);
ds@3071
   507
	HandleError err;
ds@3071
   508
	ConVar *pConVar;
ds@3071
   509
ds@3071
   510
	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
ds@3071
   511
		!= HandleError_None)
ds@3071
   512
	{
ds@3071
   513
		return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
ds@3071
   514
	}
ds@3071
   515
ds@3071
   516
	size_t bytes;
ds@3071
   517
	pContext->StringToLocalUTF8(params[2], params[3], pConVar->GetDefault(), &bytes);
ds@3071
   518
ds@3071
   519
	return bytes;
ds@3071
   520
}
ds@3071
   521
dvander@498
   522
static cell_t sm_GetConVarFlags(IPluginContext *pContext, const cell_t *params)
dvander@498
   523
{
dvander@498
   524
	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498
   525
	HandleError err;
ds@576
   526
	ConVar *pConVar;
dvander@498
   527
dvander@1582
   528
	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498
   529
		!= HandleError_None)
dvander@498
   530
	{
ds@581
   531
		return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498
   532
	}
dvander@498
   533
ds@576
   534
	return pConVar->GetFlags();
dvander@498
   535
}
dvander@498
   536
dvander@498
   537
static cell_t sm_SetConVarFlags(IPluginContext *pContext, const cell_t *params)
dvander@498
   538
{
dvander@498
   539
	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498
   540
	HandleError err;
ds@576
   541
	ConVar *pConVar;
dvander@498
   542
dvander@1582
   543
	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498
   544
		!= HandleError_None)
dvander@498
   545
	{
ds@581
   546
		return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498
   547
	}
dvander@498
   548
ds@576
   549
	pConVar->SetFlags(params[2]);
dvander@498
   550
dvander@498
   551
	return 1;
dvander@498
   552
}
dvander@498
   553
ds@714
   554
static cell_t sm_GetConVarBounds(IPluginContext *pContext, const cell_t *params)
dvander@498
   555
{
dvander@498
   556
	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498
   557
	HandleError err;
ds@576
   558
	ConVar *pConVar;
dvander@498
   559
dvander@1582
   560
	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498
   561
		!= HandleError_None)
dvander@498
   562
	{
ds@581
   563
		return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498
   564
	}
dvander@498
   565
dvander@498
   566
	cell_t *addr;
ds@714
   567
	bool hasBound;
ds@714
   568
	float bound;
dvander@498
   569
ds@714
   570
	switch (params[2])
ds@714
   571
	{
ds@714
   572
	case ConVarBound_Upper:
ds@714
   573
		hasBound = pConVar->GetMax(bound);
ds@714
   574
		break;
ds@714
   575
	case ConVarBound_Lower:
ds@714
   576
		hasBound = pConVar->GetMin(bound);
ds@714
   577
		break;
ds@714
   578
	default:
ds@714
   579
		return pContext->ThrowNativeError("Invalid ConVarBounds value %d");
ds@714
   580
	}
ds@714
   581
	
ds@714
   582
	pContext->LocalToPhysAddr(params[3], &addr);
ds@714
   583
	*addr = sp_ftoc(bound);
dvander@498
   584
ds@714
   585
	return hasBound;
dvander@498
   586
}
dvander@498
   587
ds@714
   588
static cell_t sm_SetConVarBounds(IPluginContext *pContext, const cell_t *params)
dvander@498
   589
{
dvander@498
   590
	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498
   591
	HandleError err;
ds@576
   592
	ConVar *pConVar;
dvander@498
   593
dvander@1582
   594
	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498
   595
		!= HandleError_None)
dvander@498
   596
	{
ds@581
   597
		return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498
   598
	}
dvander@498
   599
ds@714
   600
	switch (params[2])
ds@714
   601
	{
ds@714
   602
	case ConVarBound_Upper:
ds@714
   603
		pConVar->SetMax(params[3] ? true : false, sp_ctof(params[4]));
ds@714
   604
		break;
ds@714
   605
	case ConVarBound_Lower:
ds@714
   606
		pConVar->SetMin(params[3] ? true : false, sp_ctof(params[4]));
ds@714
   607
		break;
ds@714
   608
	default:
ds@714
   609
		return pContext->ThrowNativeError("Invalid ConVarBounds value %d");
ds@714
   610
	}
dvander@498
   611
ds@714
   612
	return 1;
dvander@498
   613
}
dvander@498
   614
dvander@498
   615
static cell_t sm_GetConVarName(IPluginContext *pContext, const cell_t *params)
dvander@498
   616
{
dvander@498
   617
	Handle_t hndl = static_cast<Handle_t>(params[1]);
dvander@498
   618
	HandleError err;
ds@576
   619
	ConVar *pConVar;
dvander@498
   620
dvander@1582
   621
	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
dvander@498
   622
		!= HandleError_None)
dvander@498
   623
	{
ds@581
   624
		return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
dvander@498
   625
	}
dvander@498
   626
ds@576
   627
	pContext->StringToLocalUTF8(params[2], params[3], pConVar->GetName(), NULL);
dvander@498
   628
dvander@498
   629
	return 1;
dvander@498
   630
}
dvander@498
   631
ds@696
   632
static bool s_QueryAlreadyWarned = false;
ds@696
   633
ds@696
   634
static cell_t sm_QueryClientConVar(IPluginContext *pContext, const cell_t *params)
ds@696
   635
{
ds@696
   636
	CPlayer *pPlayer;
ds@696
   637
	char *name;
ds@696
   638
	IPluginFunction *pCallback;
ds@696
   639
dvander@1581
   640
	if (!g_ConVarManager.IsQueryingSupported())
ds@696
   641
	{
ds@696
   642
		if (!s_QueryAlreadyWarned)
ds@696
   643
		{
ds@696
   644
			s_QueryAlreadyWarned = true;
ds@696
   645
			return pContext->ThrowNativeError("Game does not support client convar querying (one time warning)");
ds@696
   646
		}
ds@696
   647
ds@696
   648
		return 0;
ds@696
   649
	}
ds@696
   650
ds@696
   651
	pPlayer = g_Players.GetPlayerByIndex(params[1]);
ds@696
   652
ds@696
   653
	if (!pPlayer)
ds@696
   654
	{
ds@994
   655
		return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
ds@696
   656
	}
ds@696
   657
ds@697
   658
	if (!pPlayer->IsConnected())
ds@696
   659
	{
ds@994
   660
		return pContext->ThrowNativeError("Client %d is not connected", params[1]);
ds@697
   661
	}
ds@697
   662
ds@697
   663
	/* Trying a query on a bot results in callback not be fired, so don't bother */
ds@697
   664
	if (pPlayer->IsFakeClient())
ds@697
   665
	{
ds@697
   666
		return 0;
ds@696
   667
	}
ds@696
   668
ds@696
   669
	pContext->LocalToString(params[2], &name);
ds@696
   670
	pCallback = pContext->GetFunctionById(params[3]);
ds@696
   671
ds@696
   672
	if (!pCallback)
ds@696
   673
	{
ds@696
   674
		return pContext->ThrowNativeError("Invalid function id (%X)", params[3]);
ds@696
   675
	}
ds@696
   676
ds@696
   677
	return g_ConVarManager.QueryClientConVar(pPlayer->GetEdict(), name, pCallback, params[4]);
ds@696
   678
}
ds@696
   679
dvander@498
   680
static cell_t sm_RegServerCmd(IPluginContext *pContext, const cell_t *params)
dvander@498
   681
{
dvander@498
   682
	char *name,*help;
dvander@498
   683
	IPluginFunction *pFunction;
dvander@498
   684
dvander@498
   685
	pContext->LocalToString(params[1], &name);
dvander@2800
   686
dvander@2800
   687
	if (strcasecmp(name, "sm") == 0)
dvander@2800
   688
	{
dvander@2806
   689
		return pContext->ThrowNativeError("Cannot register \"sm\" command");
dvander@2800
   690
	}
dvander@2800
   691
dvander@498
   692
	pContext->LocalToString(params[3], &help);
dvander@498
   693
	pFunction = pContext->GetFunctionById(params[2]);
dvander@498
   694
dvander@498
   695
	if (!pFunction)
dvander@498
   696
	{
dvander@498
   697
		return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
dvander@498
   698
	}
dvander@498
   699
ds@579
   700
	if (!g_ConCmds.AddServerCommand(pFunction, name, help, params[4]))
ds@579
   701
	{
ds@579
   702
		return pContext->ThrowNativeError("Command \"%s\" could not be created. A convar with the same name already exists.", name);
ds@579
   703
	}
dvander@498
   704
dvander@498
   705
	return 1;
dvander@498
   706
}
dvander@498
   707
dvander@500
   708
static cell_t sm_RegConsoleCmd(IPluginContext *pContext, const cell_t *params)
dvander@500
   709
{
dvander@500
   710
	char *name,*help;
dvander@500
   711
	IPluginFunction *pFunction;
dvander@500
   712
dvander@500
   713
	pContext->LocalToString(params[1], &name);
dvander@2800
   714
dvander@2800
   715
	if (strcasecmp(name, "sm") == 0)
dvander@2800
   716
	{
dvander@2806
   717
		return pContext->ThrowNativeError("Cannot register \"sm\" command");
dvander@2800
   718
	}
dvander@2800
   719
dvander@500
   720
	pContext->LocalToString(params[3], &help);
dvander@500
   721
	pFunction = pContext->GetFunctionById(params[2]);
dvander@500
   722
dvander@500
   723
	if (!pFunction)
dvander@500
   724
	{
dvander@500
   725
		return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
dvander@500
   726
	}
dvander@500
   727
dvander@3872
   728
	IPlugin *pPlugin = scripts->FindPluginByContext(pContext->GetContext());
asherkin@3687
   729
	const char *group = pPlugin->GetFilename();
asherkin@3687
   730
	if (!g_ConCmds.AddAdminCommand(pFunction, name, group, 0, help, params[4]))
ds@579
   731
	{
ds@579
   732
		return pContext->ThrowNativeError("Command \"%s\" could not be created. A convar with the same name already exists.", name);
ds@579
   733
	}
dvander@500
   734
dvander@500
   735
	return 1;
dvander@500
   736
}
dvander@500
   737
dvander@514
   738
static cell_t sm_RegAdminCmd(IPluginContext *pContext, const cell_t *params)
dvander@514
   739
{
dvander@514
   740
	char *name,*help;
dvander@514
   741
	const char *group;
dvander@514
   742
	IPluginFunction *pFunction;
dvander@514
   743
	FlagBits flags = params[3];
dvander@514
   744
	int cmdflags = params[6];
dvander@514
   745
dvander@514
   746
	pContext->LocalToString(params[1], &name);
dvander@2800
   747
dvander@2800
   748
	if (strcasecmp(name, "sm") == 0)
dvander@2800
   749
	{
dvander@2806
   750
		return pContext->ThrowNativeError("Cannot register \"sm\" command");
dvander@2800
   751
	}
dvander@2800
   752
dvander@514
   753
	pContext->LocalToString(params[4], &help);
dvander@514
   754
	pContext->LocalToString(params[5], (char **)&group);
dvander@514
   755
	pFunction = pContext->GetFunctionById(params[2]);
dvander@514
   756
dvander@514
   757
	if (group[0] == '\0')
dvander@514
   758
	{
dvander@3872
   759
		IPlugin *pPlugin = scripts->FindPluginByContext(pContext->GetContext());
dvander@514
   760
		group = pPlugin->GetFilename();
dvander@514
   761
	}
dvander@514
   762
dvander@514
   763
	if (!pFunction)
dvander@514
   764
	{
dvander@514
   765
		return pContext->ThrowNativeError("Invalid function id (%X)", params[2]);
dvander@514
   766
	}
dvander@514
   767
ds@579
   768
	if (!g_ConCmds.AddAdminCommand(pFunction, name, group, flags, help, cmdflags))
ds@579
   769
	{
ds@579
   770
		return pContext->ThrowNativeError("Command \"%s\" could not be created. A convar with the same name already exists.", name);
ds@579
   771
	}
dvander@514
   772
dvander@514
   773
	return 1;
dvander@514
   774
}
dvander@514
   775
dvander@517
   776
static cell_t sm_GetCmdArgs(IPluginContext *pContext, const cell_t *params)
dvander@517
   777
{
dvander@1544
   778
	const CCommand *pCmd = g_HL2.PeekCommandStack();
dvander@1544
   779
dvander@1544
   780
	if (!pCmd)
dvander@1544
   781
	{
dvander@1544
   782
		return pContext->ThrowNativeError("No command callback available");
dvander@1544
   783
	}
dvander@1544
   784
dvander@1544
   785
	return pCmd->ArgC() - 1;
dvander@517
   786
}
dvander@517
   787
dvander@517
   788
static cell_t sm_GetCmdArg(IPluginContext *pContext, const cell_t *params)
dvander@517
   789
{
dvander@1544
   790
	const CCommand *pCmd = g_HL2.PeekCommandStack();
dvander@1544
   791
dvander@1544
   792
	if (!pCmd)
dvander@1544
   793
	{
dvander@1544
   794
		return pContext->ThrowNativeError("No command callback available");
dvander@1544
   795
	}
dvander@1544
   796
dvander@1421
   797
	size_t length;
dvander@1544
   798
dvander@1544
   799
	const char *arg = pCmd->Arg(params[1]);
dvander@517
   800
	
dvander@1544
   801
	pContext->StringToLocalUTF8(params[2], params[3], arg ? arg : "", &length);
dvander@517
   802
dvander@1421
   803
	return (cell_t)length;
dvander@517
   804
}
dvander@517
   805
dvander@517
   806
static cell_t sm_GetCmdArgString(IPluginContext *pContext, const cell_t *params)
dvander@517
   807
{
dvander@1544
   808
	const CCommand *pCmd = g_HL2.PeekCommandStack();
dvander@1544
   809
dvander@1544
   810
	if (!pCmd)
dvander@1544
   811
	{
dvander@1544
   812
		return pContext->ThrowNativeError("No command callback available");
dvander@1544
   813
	}
dvander@1544
   814
dvander@1544
   815
	const char *args = pCmd->ArgS();
dvander@1421
   816
	size_t length;
dvander@517
   817
dvander@633
   818
	if (!args)
dvander@633
   819
	{
dvander@633
   820
		args = "";
dvander@633
   821
	}
dvander@633
   822
dvander@1421
   823
	pContext->StringToLocalUTF8(params[1], params[2], args, &length);
dvander@517
   824
dvander@1421
   825
	return (cell_t)length;
dvander@517
   826
}
dvander@517
   827
dvander@518
   828
static cell_t sm_PrintToServer(IPluginContext *pCtx, const cell_t *params)
dvander@518
   829
{
dvander@518
   830
	char buffer[1024];
dvander@518
   831
	char *fmt;
dvander@518
   832
	int arg = 2;
dvander@518
   833
dvander@518
   834
	pCtx->LocalToString(params[1], &fmt);
dvander@518
   835
	size_t res = atcprintf(buffer, sizeof(buffer)-2, fmt, pCtx, params, &arg);
dvander@518
   836
dvander@518
   837
	buffer[res++] = '\n';
dvander@518
   838
	buffer[res] = '\0';
dvander@518
   839
dvander@518
   840
	META_CONPRINT(buffer);
dvander@518
   841
dvander@518
   842
	return 1;
dvander@518
   843
}
dvander@518
   844
dvander@518
   845
static cell_t sm_PrintToConsole(IPluginContext *pCtx, const cell_t *params)
dvander@518
   846
{
dvander@518
   847
	int index = params[1];
dvander@520
   848
	if ((index < 0) || (index > g_Players.GetMaxClients()))
dvander@518
   849
	{
ds@994
   850
		return pCtx->ThrowNativeError("Client index %d is invalid", index);
dvander@518
   851
	}
dvander@518
   852
dvander@520
   853
	CPlayer *pPlayer = NULL;
dvander@520
   854
	if (index != 0)
dvander@518
   855
	{
dvander@520
   856
		pPlayer = g_Players.GetPlayerByIndex(index);
dvander@520
   857
		if (!pPlayer->IsInGame())
dvander@520
   858
		{
dvander@520
   859
			return pCtx->ThrowNativeError("Client %d is not in game", index);
dvander@520
   860
		}
dvander@520
   861
		
dvander@520
   862
		/* Silent fail on bots, engine will crash */
dvander@520
   863
		if (pPlayer->IsFakeClient())
dvander@520
   864
		{
dvander@520
   865
			return 0;
dvander@520
   866
		}
dvander@519
   867
	}
dvander@518
   868
dvander@518
   869
	char buffer[1024];
dvander@518
   870
	char *fmt;
dvander@518
   871
	int arg = 3;
dvander@518
   872
dvander@518
   873
	pCtx->LocalToString(params[2], &fmt);
dvander@518
   874
	size_t res = atcprintf(buffer, sizeof(buffer)-2, fmt, pCtx, params, &arg);
dvander@518
   875
dvander@518
   876
	buffer[res++] = '\n';
dvander@518
   877
	buffer[res] = '\0';
dvander@518
   878
dvander@520
   879
	if (index != 0)
dvander@520
   880
	{
skamonkey@3913
   881
#if SOURCE_ENGINE == SE_DOTA
skamonkey@3913
   882
		engine->ClientPrintf(pPlayer->GetIndex(), buffer);
skamonkey@3913
   883
#else
dvander@520
   884
		engine->ClientPrintf(pPlayer->GetEdict(), buffer);
skamonkey@3913
   885
#endif
dvander@520
   886
	} else {
dvander@520
   887
		META_CONPRINT(buffer);
dvander@520
   888
	}
dvander@518
   889
dvander@518
   890
	return 1;
dvander@518
   891
}
dvander@518
   892
dvander@522
   893
static cell_t sm_ServerCommand(IPluginContext *pContext, const cell_t *params)
dvander@522
   894
{
dvander@2042
   895
	g_SourceMod.SetGlobalTarget(SOURCEMOD_SERVER_LANGUAGE);
dvander@1273
   896
dvander@522
   897
	char buffer[1024];
dvander@522
   898
	size_t len = g_SourceMod.FormatString(buffer, sizeof(buffer)-2, pContext, params, 1);
dvander@522
   899
dvander@2193
   900
	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1273
   901
	{
dvander@1273
   902
		return 0;
dvander@1273
   903
	}
dvander@1011
   904
dvander@522
   905
	/* One byte for null terminator, one for newline */
dvander@522
   906
	buffer[len++] = '\n';
dvander@522
   907
	buffer[len] = '\0';
dvander@522
   908
dvander@522
   909
	engine->ServerCommand(buffer);
dvander@522
   910
dvander@522
   911
	return 1;
dvander@522
   912
}
dvander@522
   913
asherkin@3361
   914
char *g_ServerCommandBuffer = NULL;
asherkin@3361
   915
cell_t g_ServerCommandBufferLength;
asherkin@3361
   916
asherkin@3361
   917
bool g_ShouldCatchSpew = false;
asherkin@3361
   918
skamonkey@3961
   919
#if SOURCE_ENGINE < SE_NUCLEARDAWN
asherkin@3361
   920
SpewOutputFunc_t g_OriginalSpewOutputFunc = NULL;
asherkin@3361
   921
asherkin@3361
   922
SpewRetval_t SourcemodSpewOutputFunc(SpewType_t spewType, tchar const *pMsg)
asherkin@3361
   923
{
asherkin@3361
   924
	if (g_ServerCommandBuffer)
asherkin@3361
   925
	{
asherkin@3361
   926
		V_strcat(g_ServerCommandBuffer, pMsg, g_ServerCommandBufferLength);
asherkin@3361
   927
	}
asherkin@3361
   928
asherkin@3361
   929
	if (g_OriginalSpewOutputFunc)
asherkin@3361
   930
	{
asherkin@3361
   931
		return g_OriginalSpewOutputFunc(spewType, pMsg);
asherkin@3361
   932
	} else {
asherkin@3361
   933
		return SPEW_CONTINUE;
asherkin@3361
   934
	}
asherkin@3361
   935
}
asherkin@3361
   936
#else
asherkin@3361
   937
class CSourcemodLoggingListener: public ILoggingListener
asherkin@3361
   938
{
asherkin@3361
   939
public:
asherkin@3361
   940
	void Log(const LoggingContext_t *pContext, const tchar *pMessage)
asherkin@3361
   941
	{
asherkin@3361
   942
		if (g_ServerCommandBuffer)
asherkin@3361
   943
		{
asherkin@3361
   944
			V_strcat(g_ServerCommandBuffer, pMessage, g_ServerCommandBufferLength);
asherkin@3361
   945
		}
asherkin@3361
   946
	}
asherkin@3361
   947
} g_SourcemodLoggingListener;
asherkin@3361
   948
#endif
asherkin@3361
   949
asherkin@3361
   950
CON_COMMAND(sm_conhook_start, "")
asherkin@3361
   951
{
asherkin@3361
   952
	if (!g_ShouldCatchSpew)
asherkin@3361
   953
	{
asherkin@3361
   954
		Warning("You shouldn't run this command!\n");
asherkin@3361
   955
		return;
asherkin@3361
   956
	}
asherkin@3361
   957
skamonkey@3961
   958
#if SOURCE_ENGINE < SE_NUCLEARDAWN
asherkin@3361
   959
	g_OriginalSpewOutputFunc = GetSpewOutputFunc();
asherkin@3361
   960
	SpewOutputFunc(SourcemodSpewOutputFunc);
asherkin@3361
   961
#else
asherkin@3361
   962
#if SOURCE_ENGINE < SE_ALIENSWARM
asherkin@3361
   963
	LoggingSystem_PushLoggingState(false);
asherkin@3361
   964
#else
asherkin@3361
   965
	LoggingSystem_PushLoggingState(false, false);
asherkin@3361
   966
#endif
asherkin@3361
   967
	LoggingSystem_RegisterLoggingListener(&g_SourcemodLoggingListener);
asherkin@3361
   968
#endif
asherkin@3361
   969
}
asherkin@3361
   970
asherkin@3361
   971
CON_COMMAND(sm_conhook_stop, "")
asherkin@3361
   972
{
asherkin@3361
   973
	if (!g_ShouldCatchSpew)
asherkin@3361
   974
	{
asherkin@3361
   975
		Warning("You shouldn't run this command!\n");
asherkin@3361
   976
		return;
asherkin@3361
   977
	}
asherkin@3361
   978
skamonkey@3961
   979
#if SOURCE_ENGINE < SE_NUCLEARDAWN
asherkin@3361
   980
	SpewOutputFunc(g_OriginalSpewOutputFunc);
asherkin@3361
   981
#else
asherkin@3361
   982
	LoggingSystem_PopLoggingState(false);
asherkin@3361
   983
#endif
asherkin@3361
   984
asherkin@3361
   985
	g_ShouldCatchSpew = false;
asherkin@3361
   986
}
asherkin@3361
   987
asherkin@3361
   988
static cell_t sm_ServerCommandEx(IPluginContext *pContext, const cell_t *params)
asherkin@3361
   989
{
asherkin@3361
   990
	g_SourceMod.SetGlobalTarget(SOURCEMOD_SERVER_LANGUAGE);
asherkin@3361
   991
asherkin@3361
   992
	char buffer[1024];
asherkin@3361
   993
	size_t len = g_SourceMod.FormatString(buffer, sizeof(buffer)-2, pContext, params, 3);
asherkin@3361
   994
asherkin@3361
   995
	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
asherkin@3361
   996
	{
asherkin@3361
   997
		return 0;
asherkin@3361
   998
	}
asherkin@3361
   999
asherkin@3361
  1000
	/* One byte for null terminator, one for newline */
asherkin@3361
  1001
	buffer[len++] = '\n';
asherkin@3361
  1002
	buffer[len] = '\0';
asherkin@3361
  1003
asherkin@3361
  1004
	pContext->LocalToString(params[1], &g_ServerCommandBuffer);
asherkin@3361
  1005
	g_ServerCommandBufferLength = params[2];
asherkin@3416
  1006
	
asherkin@3416
  1007
	if (g_ServerCommandBufferLength > 0)
asherkin@3416
  1008
	{
asherkin@3416
  1009
		g_ServerCommandBuffer[0] = '\0';
asherkin@3416
  1010
	}
asherkin@3361
  1011
asherkin@3361
  1012
	engine->ServerExecute();
asherkin@3361
  1013
asherkin@3361
  1014
	g_ShouldCatchSpew = true;
asherkin@3361
  1015
	engine->ServerCommand("sm_conhook_start\n");
asherkin@3361
  1016
	engine->ServerCommand(buffer);
asherkin@3361
  1017
	engine->ServerCommand("sm_conhook_stop\n");
asherkin@3361
  1018
asherkin@3361
  1019
	engine->ServerExecute();
asherkin@3361
  1020
asherkin@3416
  1021
	if (g_ServerCommandBufferLength > 0)
asherkin@3416
  1022
	{
asherkin@3416
  1023
		g_ServerCommandBuffer[g_ServerCommandBufferLength-1] = '\0';
asherkin@3416
  1024
	}
asherkin@3361
  1025
asherkin@3361
  1026
	g_ServerCommandBuffer = NULL;
asherkin@3361
  1027
	g_ServerCommandBufferLength = 0;
asherkin@3361
  1028
asherkin@3361
  1029
	return 1;
asherkin@3361
  1030
}
asherkin@3361
  1031
dvander@522
  1032
static cell_t sm_InsertServerCommand(IPluginContext *pContext, const cell_t *params)
dvander@522
  1033
{
dvander@2042
  1034
	g_SourceMod.SetGlobalTarget(SOURCEMOD_SERVER_LANGUAGE);
dvander@1273
  1035
dvander@522
  1036
	char buffer[1024];
dvander@522
  1037
	size_t len = g_SourceMod.FormatString(buffer, sizeof(buffer)-2, pContext, params, 1);
dvander@522
  1038
dvander@2193
  1039
	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1273
  1040
	{
dvander@1273
  1041
		return 0;
dvander@1273
  1042
	}
dvander@1011
  1043
dvander@522
  1044
	/* One byte for null terminator, one for newline */
dvander@522
  1045
	buffer[len++] = '\n';
dvander@522
  1046
	buffer[len] = '\0';
dvander@522
  1047
faluco@1541
  1048
	InsertServerCommand(buffer);
dvander@522
  1049
dvander@522
  1050
	return 1;
dvander@522
  1051
}
dvander@522
  1052
dvander@522
  1053
static cell_t sm_ServerExecute(IPluginContext *pContext, const cell_t *params)
dvander@522
  1054
{
dvander@522
  1055
	engine->ServerExecute();
dvander@522
  1056
dvander@522
  1057
	return 1;
dvander@522
  1058
}
dvander@522
  1059
dvander@532
  1060
static cell_t sm_ClientCommand(IPluginContext *pContext, const cell_t *params)
dvander@532
  1061
{
dvander@532
  1062
	CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
dvander@532
  1063
dvander@532
  1064
	if (!pPlayer)
dvander@532
  1065
	{
ds@994
  1066
		return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
dvander@532
  1067
	}
dvander@532
  1068
dvander@532
  1069
	if (!pPlayer->IsConnected())
dvander@532
  1070
	{
ds@994
  1071
		return pContext->ThrowNativeError("Client %d is not connected", params[1]);
dvander@532
  1072
	}
dvander@532
  1073
dvander@1011
  1074
	g_SourceMod.SetGlobalTarget(params[1]);
dvander@1011
  1075
dvander@532
  1076
	char buffer[256];
ds@873
  1077
	g_SourceMod.FormatString(buffer, sizeof(buffer), pContext, params, 2);
dvander@532
  1078
dvander@2193
  1079
	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1273
  1080
	{
dvander@1273
  1081
		return 0;
dvander@1273
  1082
	}
dvander@1273
  1083
skamonkey@3913
  1084
	engine->ClientCommand(
skamonkey@3913
  1085
#if SOURCE_ENGINE == SE_DOTA
skamonkey@3913
  1086
		pPlayer->GetIndex(),
skamonkey@3913
  1087
#else
skamonkey@3913
  1088
		pPlayer->GetEdict(),
skamonkey@3913
  1089
#endif
skamonkey@3913
  1090
		"%s", buffer);
dvander@532
  1091
dvander@532
  1092
	return 1;
dvander@532
  1093
}
dvander@532
  1094
dvander@893
  1095
static cell_t FakeClientCommand(IPluginContext *pContext, const cell_t *params)
dvander@893
  1096
{
dvander@893
  1097
	CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
dvander@893
  1098
dvander@893
  1099
	if (!pPlayer)
dvander@893
  1100
	{
ds@994
  1101
		return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
dvander@893
  1102
	}
dvander@893
  1103
dvander@893
  1104
	if (!pPlayer->IsConnected())
dvander@893
  1105
	{
ds@994
  1106
		return pContext->ThrowNativeError("Client %d is not connected", params[1]);
dvander@893
  1107
	}
dvander@893
  1108
dvander@893
  1109
	char buffer[256];
dvander@893
  1110
	g_SourceMod.FormatString(buffer, sizeof(buffer), pContext, params, 2);
dvander@893
  1111
dvander@2193
  1112
	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1273
  1113
	{
dvander@1273
  1114
		return 0;
dvander@1273
  1115
	}
dvander@1273
  1116
skamonkey@3854
  1117
#if SOURCE_ENGINE == SE_DOTA
skamonkey@3913
  1118
	engine->ClientCommand(pPlayer->GetIndex(), "%s", buffer);
skamonkey@3854
  1119
#else
dvander@893
  1120
	serverpluginhelpers->ClientCommand(pPlayer->GetEdict(), buffer);
skamonkey@3854
  1121
#endif
dvander@1337
  1122
dvander@1337
  1123
	return 1;
dvander@1337
  1124
}
dvander@1337
  1125
dvander@1337
  1126
static cell_t FakeClientCommandEx(IPluginContext *pContext, const cell_t *params)
dvander@1337
  1127
{
dvander@1337
  1128
	CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
dvander@1337
  1129
dvander@1337
  1130
	if (!pPlayer)
dvander@1337
  1131
	{
dvander@1337
  1132
		return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
dvander@1337
  1133
	}
dvander@1337
  1134
dvander@1337
  1135
	if (!pPlayer->IsConnected())
dvander@1337
  1136
	{
dvander@1337
  1137
		return pContext->ThrowNativeError("Client %d is not connected", params[1]);
dvander@1337
  1138
	}
dvander@1337
  1139
dvander@1337
  1140
	char buffer[256];
dvander@1337
  1141
	g_SourceMod.FormatString(buffer, sizeof(buffer), pContext, params, 2);
dvander@1337
  1142
dvander@2193
  1143
	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1337
  1144
	{
dvander@1337
  1145
		return 0;
dvander@1337
  1146
	}
dvander@1337
  1147
skamonkey@3913
  1148
	g_HL2.AddToFakeCliCmdQueue(params[1], GetPlayerUserId(pPlayer->GetEdict()), buffer);
dvander@893
  1149
dvander@893
  1150
	return 1;
dvander@893
  1151
}
dvander@893
  1152
dvander@893
  1153
static cell_t ReplyToCommand(IPluginContext *pContext, const cell_t *params)
dvander@893
  1154
{
dvander@1011
  1155
	g_SourceMod.SetGlobalTarget(params[1]);
dvander@1011
  1156
dvander@893
  1157
	/* Build the format string */
dvander@893
  1158
	char buffer[1024];
dvander@893
  1159
	size_t len = g_SourceMod.FormatString(buffer, sizeof(buffer)-2, pContext, params, 2);
dvander@893
  1160
dvander@2193
  1161
	if (pContext->GetLastNativeError() != SP_ERROR_NONE)
dvander@1273
  1162
	{
dvander@1273
  1163
		return 0;
dvander@1273
  1164
	}
dvander@1273
  1165
dvander@893
  1166
	/* If we're printing to the server, shortcut out */
dvander@893
  1167
	if (params[1] == 0)
dvander@893
  1168
	{
dvander@893
  1169
		/* Print */
dvander@893
  1170
		buffer[len++] = '\n';
dvander@893
  1171
		buffer[len] = '\0';
dvander@893
  1172
		META_CONPRINT(buffer);
dvander@893
  1173
		return 1;
dvander@893
  1174
	}
dvander@893
  1175
dvander@893
  1176
	CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
dvander@893
  1177
dvander@893
  1178
	if (!pPlayer)
dvander@893
  1179
	{
dvander@893
  1180
		return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
dvander@893
  1181
	}
dvander@893
  1182
dvander@893
  1183
	if (!pPlayer->IsConnected())
dvander@893
  1184
	{
dvander@893
  1185
		return pContext->ThrowNativeError("Client %d is not connected", params[1]);
dvander@893
  1186
	}
dvander@893
  1187
dvander@910
  1188
	g_SourceMod.SetGlobalTarget(params[1]);
dvander@910
  1189
dvander@893
  1190
	unsigned int replyto = g_ChatTriggers.GetReplyTo();
dvander@893
  1191
	if (replyto == SM_REPLY_CONSOLE)
dvander@893
  1192
	{
dvander@893
  1193
		buffer[len++] = '\n';
dvander@893
  1194
		buffer[len] = '\0';
skamonkey@3913
  1195
#if SOURCE_ENGINE == SE_DOTA
skamonkey@3913
  1196
		engine->ClientPrintf(pPlayer->GetIndex(), buffer);
skamonkey@3913
  1197
#else
dvander@893
  1198
		engine->ClientPrintf(pPlayer->GetEdict(), buffer);
skamonkey@3913
  1199
#endif
dvander@893
  1200
	} else if (replyto == SM_REPLY_CHAT) {
dvander@893
  1201
		if (len >= 191)
dvander@893
  1202
		{
dvander@893
  1203
			len = 191;
dvander@893
  1204
		}
dvander@893
  1205
		buffer[len] = '\0';
dvander@893
  1206
		g_HL2.TextMsg(params[1], HUD_PRINTTALK, buffer);
dvander@893
  1207
	}
dvander@893
  1208
dvander@893
  1209
	return 1;
dvander@893
  1210
}
dvander@893
  1211
dvander@923
  1212
static cell_t GetCmdReplyTarget(IPluginContext *pContext, const cell_t *params)
dvander@923
  1213
{
dvander@923
  1214
	return g_ChatTriggers.GetReplyTo();
dvander@923
  1215
}
dvander@923
  1216
dvander@1071
  1217
static cell_t SetCmdReplyTarget(IPluginContext *pContext, const cell_t *params)
dvander@1071
  1218
{
dvander@1071
  1219
	return g_ChatTriggers.SetReplyTo(params[1]);
dvander@1071
  1220
}
dvander@1071
  1221
dvander@1119
  1222
static cell_t GetCommandIterator(IPluginContext *pContext, const cell_t *params)
dvander@1119
  1223
{
dvander@1119
  1224
	GlobCmdIter *iter = new GlobCmdIter;
dvander@1119
  1225
	iter->started = false;
dvander@1119
  1226
dvander@3872
  1227
	Handle_t hndl = handlesys->CreateHandle(hCmdIterType, iter, pContext->GetIdentity(), g_pCoreIdent, NULL);
dvander@1119
  1228
	if (hndl == BAD_HANDLE)
dvander@1119
  1229
	{
dvander@1119
  1230
		delete iter;
dvander@1119
  1231
	}
dvander@1119
  1232
dvander@1119
  1233
	return hndl;
dvander@1119
  1234
}
dvander@1119
  1235
dvander@1119
  1236
static cell_t ReadCommandIterator(IPluginContext *pContext, const cell_t *params)
dvander@1119
  1237
{
dvander@1119
  1238
	GlobCmdIter *iter;
dvander@1119
  1239
	HandleError err;
dvander@1119
  1240
	HandleSecurity sec(pContext->GetIdentity(), g_pCoreIdent);
dvander@1119
  1241
dvander@3872
  1242
	if ((err = handlesys->ReadHandle(params[1], hCmdIterType, &sec, (void **)&iter))
dvander@1119
  1243
		!= HandleError_None)
dvander@1119
  1244
	{
dvander@1119
  1245
		return pContext->ThrowNativeError("Invalid GlobCmdIter Handle %x", params[1]);
dvander@1119
  1246
	}
dvander@1119
  1247
dvander@1119
  1248
	const List<ConCmdInfo *> &cmds = g_ConCmds.GetCommandList();
dvander@1119
  1249
dvander@1119
  1250
	if (!iter->started)
dvander@1119
  1251
	{
dvander@1119
  1252
		iter->iter = cmds.begin();
dvander@1119
  1253
		iter->started = true;
dvander@1119
  1254
	}
dvander@1119
  1255
dvander@1119
  1256
	while (iter->iter != cmds.end()
dvander@1119
  1257
			&& !(*(iter->iter))->sourceMod)
dvander@1119
  1258
	{
dvander@1119
  1259
		iter->iter++;
dvander@1119
  1260
	}
dvander@1119
  1261
dvander@1119
  1262
	if (iter->iter == cmds.end())
dvander@1119
  1263
	{
dvander@1119
  1264
		return 0;
dvander@1119
  1265
	}
dvander@1119
  1266
dvander@1119
  1267
	ConCmdInfo *pInfo = (*(iter->iter));
dvander@1119
  1268
dvander@1119
  1269
	pContext->StringToLocalUTF8(params[2], params[3], pInfo->pCmd->GetName(), NULL);
dvander@1119
  1270
	pContext->StringToLocalUTF8(params[5], params[6], pInfo->pCmd->GetHelpText(), NULL);
dvander@1119
  1271
	
dvander@1119
  1272
	cell_t *addr;
dvander@1119
  1273
	pContext->LocalToPhysAddr(params[4], &addr);
dvander@1119
  1274
	*addr = pInfo->admin.eflags;
dvander@1119
  1275
dvander@1119
  1276
	iter->iter++;
dvander@1119
  1277
dvander@1119
  1278
	return 1;
dvander@1119
  1279
}
dvander@1119
  1280
dvander@1119
  1281
static cell_t CheckCommandAccess(IPluginContext *pContext, const cell_t *params)
dvander@1119
  1282
{
dvander@1119
  1283
	if (params[1] == 0)
dvander@1119
  1284
	{
dvander@1119
  1285
		return 1;
dvander@1119
  1286
	}
dvander@1119
  1287
dvander@1119
  1288
	char *cmd;
dvander@1119
  1289
	pContext->LocalToString(params[2], &cmd);
dvander@1119
  1290
skamonkey@3389
  1291
	/* Match up with an admin command if possible */
dvander@1399
  1292
	FlagBits bits = params[3];
dvander@1429
  1293
	bool found_command = false;
dvander@1429
  1294
	if (params[0] < 4 || !params[4])
dvander@1399
  1295
	{
dvander@1429
  1296
		found_command = g_ConCmds.LookForCommandAdminFlags(cmd, &bits);
dvander@1429
  1297
	}
dvander@1429
  1298
	
dvander@1429
  1299
	if (!found_command)
dvander@1429
  1300
	{
dvander@1429
  1301
		g_Admins.GetCommandOverride(cmd, Override_Command, &bits);
dvander@1399
  1302
	}
dvander@1399
  1303
skamonkey@3389
  1304
	return g_ConCmds.CheckClientCommandAccess(params[1], cmd, bits) ? 1 : 0;
skamonkey@3389
  1305
}
skamonkey@3389
  1306
skamonkey@3389
  1307
static cell_t CheckAccess(IPluginContext *pContext, const cell_t *params)
skamonkey@3389
  1308
{
skamonkey@3389
  1309
	char *cmd;
skamonkey@3389
  1310
	pContext->LocalToString(params[2], &cmd);
skamonkey@3389
  1311
skamonkey@3389
  1312
	/* Match up with an admin command if possible */
skamonkey@3389
  1313
	FlagBits bits = params[3];
skamonkey@3389
  1314
	bool found_command = false;
skamonkey@3389
  1315
	if (params[0] < 4 || !params[4])
skamonkey@3389
  1316
	{
skamonkey@3389
  1317
		found_command = g_ConCmds.LookForCommandAdminFlags(cmd, &bits);
skamonkey@3389
  1318
	}
skamonkey@3389
  1319
	
skamonkey@3389
  1320
	if (!found_command)
skamonkey@3389
  1321
	{
skamonkey@3389
  1322
		g_Admins.GetCommandOverride(cmd, Override_Command, &bits);
skamonkey@3389
  1323
	}
skamonkey@3389
  1324
skamonkey@3389
  1325
	return g_ConCmds.CheckAdminCommandAccess(params[1], cmd, bits) ? 1 : 0;
dvander@1119
  1326
}
dvander@1119
  1327
dvander@1469
  1328
static cell_t IsChatTrigger(IPluginContext *pContext, const cell_t *params)
dvander@1469
  1329
{
dvander@1469
  1330
	return g_ChatTriggers.IsChatTrigger() ? 1 : 0;
dvander@1469
  1331
}
dvander@1469
  1332
faluco@1643
  1333
static cell_t SetCommandFlags(IPluginContext *pContext, const cell_t *params)
faluco@1643
  1334
{
faluco@1643
  1335
	char *name;
faluco@1643
  1336
	pContext->LocalToString(params[1], &name);
faluco@1643
  1337
faluco@1643
  1338
	return (s_CommandFlagsHelper.SetFlags(name, params[2])) ? 1 : 0;
faluco@1643
  1339
}
faluco@1643
  1340
faluco@1643
  1341
static cell_t GetCommandFlags(IPluginContext *pContext, const cell_t *params)
faluco@1643
  1342
{
faluco@1643
  1343
	char *name;
faluco@1643
  1344
	int flags;
faluco@1643
  1345
	pContext->LocalToString(params[1], &name);
faluco@1643
  1346
faluco@1643
  1347
	return (s_CommandFlagsHelper.GetFlags(name, &flags)) ? flags : -1;
faluco@1643
  1348
}
faluco@1643
  1349
dvander@1795
  1350
static cell_t FindFirstConCommand(IPluginContext *pContext, const cell_t *params)
dvander@1795
  1351
{
dvander@1795
  1352
	Handle_t hndl;
ds@3099
  1353
	ConCommandBaseIterator *pIter;
dvander@1795
  1354
	cell_t *pIsCmd, *pFlags;
dvander@1795
  1355
	const ConCommandBase *pConCmd;
faluco@1893
  1356
	const char *desc;
dvander@1795
  1357
dvander@1795
  1358
	pContext->LocalToPhysAddr(params[3], &pIsCmd);
dvander@1795
  1359
	pContext->LocalToPhysAddr(params[4], &pFlags);
dvander@1795
  1360
ds@3099
  1361
	pIter = new ConCommandBaseIterator();
ds@3099
  1362
ds@3099
  1363
	if (!pIter->IsValid())
ds@2400
  1364
	{
ds@3099
  1365
		delete pIter;
ds@2400
  1366
		return BAD_HANDLE;
ds@2400
  1367
	}
ds@3099
  1368
ds@3099
  1369
	pConCmd = pIter->Get();
dvander@1795
  1370
dvander@1795
  1371
	pContext->StringToLocalUTF8(params[1], params[2], pConCmd->GetName(), NULL);
dvander@1795
  1372
	*pIsCmd = pConCmd->IsCommand() ? 1 : 0;
dvander@1795
  1373
	*pFlags = pConCmd->GetFlags();
dvander@1795
  1374
faluco@1893
  1375
	if (params[6])
faluco@1893
  1376
	{
faluco@1893
  1377
		desc = pConCmd->GetHelpText();
faluco@1893
  1378
		pContext->StringToLocalUTF8(params[5], params[6], (desc && desc[0]) ? desc : "", NULL);
faluco@1893
  1379
	}
faluco@1893
  1380
dvander@3872
  1381
	if ((hndl = handlesys->CreateHandle(htConCmdIter, pIter, pContext->GetIdentity(), g_pCoreIdent, NULL))
dvander@1795
  1382
		== BAD_HANDLE)
dvander@1795
  1383
	{
dvander@1795
  1384
		delete pIter;
dvander@1795
  1385
		return BAD_HANDLE;
dvander@1795
  1386
	}
dvander@1795
  1387
dvander@1795
  1388
	return hndl;
dvander@1795
  1389
}
dvander@1795
  1390
dvander@1795
  1391
static cell_t FindNextConCommand(IPluginContext *pContext, const cell_t *params)
dvander@1795
  1392
{
dvander@1795
  1393
	HandleError err;
ds@3099
  1394
	ConCommandBaseIterator *pIter;
dvander@1795
  1395
	cell_t *pIsCmd, *pFlags;
faluco@1893
  1396
	const char *desc;
ds@2400
  1397
	const ConCommandBase *pConCmd;
dvander@1795
  1398
	HandleSecurity sec(pContext->GetIdentity(), g_pCoreIdent);
dvander@1795
  1399
dvander@3872
  1400
	if ((err = handlesys->ReadHandle(params[1], htConCmdIter, &sec, (void **)&pIter)) != HandleError_None)
dvander@1795
  1401
	{
dvander@1795
  1402
		return pContext->ThrowNativeError("Invalid Handle %x (error %d)", params[1], err);
dvander@1795
  1403
	}
dvander@1795
  1404
ds@3099
  1405
	if (!pIter->IsValid())
dvander@1795
  1406
	{
dvander@1795
  1407
		return 0;
dvander@1795
  1408
	}
dvander@1795
  1409
ds@3099
  1410
	pIter->Next();
ds@3099
  1411
	if (!pIter->IsValid())
dvander@1795
  1412
	{
dvander@1795
  1413
		return 0;
dvander@1795
  1414
	}
ds@3099
  1415
	pConCmd = pIter->Get();
dvander@1795
  1416
dvander@1795
  1417
	pContext->LocalToPhysAddr(params[4], &pIsCmd);
dvander@1795
  1418
	pContext->LocalToPhysAddr(params[5], &pFlags);
dvander@1795
  1419
ds@2400
  1420
	pContext->StringToLocalUTF8(params[2], params[3], pConCmd->GetName(), NULL);
ds@2400
  1421
	*pIsCmd = pConCmd->IsCommand() ? 1 : 0;
ds@2400
  1422
	*pFlags = pConCmd->GetFlags();
dvander@1795
  1423
faluco@1893
  1424
	if (params[7])
faluco@1893
  1425
	{
ds@2400
  1426
		desc = pConCmd->GetHelpText();
faluco@1893
  1427
		pContext->StringToLocalUTF8(params[6], params[7], (desc && desc[0]) ? desc : "", NULL);
faluco@1893
  1428
	}
faluco@1893
  1429
dvander@1795
  1430
	return 1;
dvander@1795
  1431
}
dvander@1795
  1432
pred@1852
  1433
static cell_t SendConVarValue(IPluginContext *pContext, const cell_t *params)
pred@1852
  1434
{
pred@1852
  1435
	Handle_t hndl = static_cast<Handle_t>(params[2]);
pred@1852
  1436
	HandleError err;
pred@1852
  1437
	ConVar *pConVar;
pred@1852
  1438
pred@1852
  1439
	char *value;
pred@1852
  1440
	pContext->LocalToString(params[3], &value);
pred@1852
  1441
pred@1852
  1442
	if ((err=g_ConVarManager.ReadConVarHandle(hndl, &pConVar))
pred@1852
  1443
		!= HandleError_None)
pred@1852
  1444
	{
pred@1852
  1445
		return pContext->ThrowNativeError("Invalid convar handle %x (error %d)", hndl, err);
pred@1852
  1446
	}
pred@1852
  1447
pred@1852
  1448
	char data[256];
pred@1852
  1449
	bf_write buffer(data, sizeof(data));
pred@1852
  1450
skamonkey@3855
  1451
#if SOURCE_ENGINE == SE_CSGO || SOURCE_ENGINE == SE_DOTA
skamonkey@3743
  1452
	CNETMsg_SetConVar msg;
skamonkey@3743
  1453
	CMsg_CVars_CVar *cvar = msg.mutable_convars()->add_cvars();
skamonkey@3743
  1454
skamonkey@3743
  1455
	cvar->set_name(pConVar->GetName());
skamonkey@3743
  1456
	cvar->set_value(value);
skamonkey@3846
  1457
skamonkey@3846
  1458
	int msgsize = msg.ByteSize();
skamonkey@3743
  1459
   
skamonkey@3743
  1460
	buffer.WriteVarInt32(net_SetConVar);
skamonkey@3846
  1461
	buffer.WriteVarInt32(msgsize);
skamonkey@3743
  1462
	msg.SerializeWithCachedSizesToArray( (uint8 *)( buffer.GetBasePointer() + buffer.GetNumBytesWritten() ) );
skamonkey@3846
  1463
	buffer.SeekToBit( ( buffer.GetNumBytesWritten() + msgsize ) * 8 );
skamonkey@3743
  1464
#else
ds@2973
  1465
	buffer.WriteUBitLong(NET_SETCONVAR, NETMSG_BITS);
pred@1852
  1466
	buffer.WriteByte(1);
pred@1852
  1467
	buffer.WriteString(pConVar->GetName());
pred@1852
  1468
	buffer.WriteString(value);
skamonkey@3743
  1469
#endif
pred@1852
  1470
pred@1852
  1471
	CPlayer *pPlayer = g_Players.GetPlayerByIndex(params[1]);
pred@1852
  1472
pred@1852
  1473
	if (!pPlayer)
pred@1852
  1474
	{
pred@1852
  1475
		return pContext->ThrowNativeError("Client index %d is invalid", params[1]);
pred@1852
  1476
	}
pred@1852
  1477
pred@1852
  1478
	if (!pPlayer->IsConnected())
pred@1852
  1479
	{
pred@1852
  1480
		return pContext->ThrowNativeError("Client %d is not connected", params[1]);
pred@1852
  1481
	}
pred@1852
  1482
pred@1852
  1483
	if (pPlayer->IsFakeClient())
pred@1852
  1484
	{
pred@1852
  1485
		return pContext->ThrowNativeError("Client %d is fake and cannot be targeted", params[1]);
pred@1852
  1486
	}
pred@1852
  1487
pred@1852
  1488
	INetChannel *netchan = static_cast<INetChannel *>(engine->GetPlayerNetInfo(params[1]));
dvander@2961
  1489
	if (netchan == NULL)
dvander@2961
  1490
	{
dvander@2961
  1491
		return 0;
dvander@2961
  1492
	}
dvander@2961
  1493
pred@1852
  1494
	netchan->SendData(buffer);
pred@1852
  1495
pred@1852
  1496
	return 1;
pred@1852
  1497
}
pred@1852
  1498
pred@2648
  1499
static cell_t AddServerTag(IPluginContext *pContext, const cell_t *params)
pred@2648
  1500
{
dvander@2684
  1501
	return 0;
pred@2648
  1502
}
pred@2648
  1503
pred@2648
  1504
static cell_t RemoveServerTag(IPluginContext *pContext, const cell_t *params)
pred@2648
  1505
{
pred@2648
  1506
	return 0;
pred@2648
  1507
}
pred@2648
  1508
dvander@2806
  1509
static cell_t AddCommandListener(IPluginContext *pContext, const cell_t *params)
dvander@2806
  1510
{
dvander@2806
  1511
	char *name;
dvander@2806
  1512
	IPluginFunction *pFunction;
dvander@2806
  1513
dvander@2806
  1514
	pContext->LocalToString(params[2], &name);
dvander@2806
  1515
dvander@2806
  1516
	if (strcasecmp(name, "sm") == 0)
dvander@2806
  1517
	{
dvander@2806
  1518
		g_Logger.LogError("Request to register \"sm\" command denied.");
dvander@2806
  1519
		return 0;
dvander@2806
  1520
	}
dvander@2806
  1521
dvander@2806
  1522
	pFunction = pContext->GetFunctionById(params[1]);
dvander@2806
  1523
dvander@2806
  1524
	if (!pFunction)
dvander@2806
  1525
		return pContext->ThrowNativeError("Invalid function id (%X)", params[1]);
dvander@2806
  1526
dvander@2806
  1527
	if (!g_ConsoleDetours.AddListener(pFunction, name[0] == '\0' ? NULL : name))
dvander@2806
  1528
		return pContext->ThrowNativeError("This game does not support command listeners");
dvander@2806
  1529
dvander@2806
  1530
	return 1;
dvander@2806
  1531
}
dvander@2806
  1532
dvander@2806
  1533
static cell_t RemoveCommandListener(IPluginContext *pContext, const cell_t *params)
dvander@2806
  1534
{
dvander@2806
  1535
	char *name;
dvander@2806
  1536
	IPluginFunction *pFunction;
dvander@2806
  1537
dvander@2806
  1538
	pContext->LocalToString(params[2], &name);
dvander@2806
  1539
	pFunction = pContext->GetFunctionById(params[1]);
dvander@2806
  1540
	if (!pFunction)
dvander@2806
  1541
		return pContext->ThrowNativeError("Invalid function id (%X)", params[1]);
dvander@2806
  1542
dvander@2806
  1543
	if (!g_ConsoleDetours.RemoveListener(pFunction, name[0] == '\0' ? NULL : name))
dvander@2806
  1544
		return pContext->ThrowNativeError("No matching callback was registered");
dvander@2806
  1545
	
dvander@2806
  1546
	return 1;
dvander@2806
  1547
}
dvander@2806
  1548
dvander@518
  1549
REGISTER_NATIVES(consoleNatives)
dvander@498
  1550
{
dvander@498
  1551
	{"CreateConVar",		sm_CreateConVar},
dvander@498
  1552
	{"FindConVar",			sm_FindConVar},
dvander@498
  1553
	{"HookConVarChange",	sm_HookConVarChange},
dvander@498
  1554
	{"UnhookConVarChange",	sm_UnhookConVarChange},
dvander@498
  1555
	{"GetConVarBool",		sm_GetConVarBool},
dvander@498
  1556
	{"SetConVarBool",		sm_SetConVarNum},
dvander@498
  1557
	{"GetConVarInt",		sm_GetConVarInt},
dvander@498
  1558
	{"SetConVarInt",		sm_SetConVarNum},
dvander@498
  1559
	{"GetConVarFloat",		sm_GetConVarFloat},
dvander@498
  1560
	{"SetConVarFloat",		sm_SetConVarFloat},
dvander@498
  1561
	{"GetConVarString",		sm_GetConVarString},
dvander@498
  1562
	{"SetConVarString",		sm_SetConVarString},
dvander@498
  1563
	{"GetConVarFlags",		sm_GetConVarFlags},
dvander@498
  1564
	{"SetConVarFlags",		sm_SetConVarFlags},
ds@1301
  1565
	{"ResetConVar",			sm_ResetConVar},
dvander@498
  1566
	{"GetConVarName",		sm_GetConVarName},
ds@714
  1567
	{"GetConVarBounds",		sm_GetConVarBounds},
ds@714
  1568
	{"SetConVarBounds",		sm_SetConVarBounds},
ds@696
  1569
	{"QueryClientConVar",	sm_QueryClientConVar},
ds@3071
  1570
	{"GetConVarDefault",	GetConVarDefault},
dvander@498
  1571
	{"RegServerCmd",		sm_RegServerCmd},
dvander@500
  1572
	{"RegConsoleCmd",		sm_RegConsoleCmd},
dvander@517
  1573
	{"GetCmdArgString",		sm_GetCmdArgString},
dvander@517
  1574
	{"GetCmdArgs",			sm_GetCmdArgs},
dvander@517
  1575
	{"GetCmdArg",			sm_GetCmdArg},
dvander@518
  1576
	{"PrintToServer",		sm_PrintToServer},
dvander@518
  1577
	{"PrintToConsole",		sm_PrintToConsole},
dvander@520
  1578
	{"RegAdminCmd",			sm_RegAdminCmd},
dvander@522
  1579
	{"ServerCommand",		sm_ServerCommand},
asherkin@3361
  1580
	{"ServerCommandEx",		sm_ServerCommandEx},
dvander@522
  1581
	{"InsertServerCommand",	sm_InsertServerCommand},
dvander@522
  1582
	{"ServerExecute",		sm_ServerExecute},
dvander@532
  1583
	{"ClientCommand",		sm_ClientCommand},
dvander@893
  1584
	{"FakeClientCommand",	FakeClientCommand},
dvander@893
  1585
	{"ReplyToCommand",		ReplyToCommand},
dvander@923
  1586
	{"GetCmdReplySource",	GetCmdReplyTarget},
dvander@1077
  1587
	{"SetCmdReplySource",	SetCmdReplyTarget},
dvander@1119
  1588
	{"GetCommandIterator",	GetCommandIterator},
dvander@1119
  1589
	{"ReadCommandIterator",	ReadCommandIterator},
dvander@1119
  1590
	{"CheckCommandAccess",	CheckCommandAccess},
skamonkey@3389
  1591
	{"CheckAccess",			CheckAccess},
dvander@1338
  1592
	{"FakeClientCommandEx",	FakeClientCommandEx},
dvander@1469
  1593
	{"IsChatTrigger",		IsChatTrigger},
faluco@1643
  1594
	{"SetCommandFlags",		SetCommandFlags},
faluco@1643
  1595
	{"GetCommandFlags",		GetCommandFlags},
dvander@1795
  1596
	{"FindFirstConCommand",	FindFirstConCommand},
dvander@1795
  1597
	{"FindNextConCommand",	FindNextConCommand},
pred@1852
  1598
	{"SendConVarValue",		SendConVarValue},
pred@2648
  1599
	{"AddServerTag",		AddServerTag},
pred@2648
  1600
	{"RemoveServerTag",		RemoveServerTag},
dvander@2806
  1601
	{"AddCommandListener",	AddCommandListener},
dvander@2806
  1602
	{"RemoveCommandListener", RemoveCommandListener},
dvander@498
  1603
	{NULL,					NULL}
dvander@498
  1604
};