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