1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/extensions/cstrike/natives.cpp	Wed Sep 19 14:58:02 2007 +0000
     1.3 @@ -0,0 +1,126 @@
     1.4 +/**
     1.5 + * vim: set ts=4 :
     1.6 + * =============================================================================
     1.7 + * SourceMod Counter-Strike:Source Extension
     1.8 + * Copyright (C) 2004-2007 AlliedModders LLC.  All rights reserved.
     1.9 + * =============================================================================
    1.10 + *
    1.11 + * This program is free software; you can redistribute it and/or modify it under
    1.12 + * the terms of the GNU General Public License, version 3.0, as published by the
    1.13 + * Free Software Foundation.
    1.14 + * 
    1.15 + * This program is distributed in the hope that it will be useful, but WITHOUT
    1.16 + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
    1.17 + * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
    1.18 + * details.
    1.19 + *
    1.20 + * You should have received a copy of the GNU General Public License along with
    1.21 + * this program.  If not, see <http://www.gnu.org/licenses/>.
    1.22 + *
    1.23 + * As a special exception, AlliedModders LLC gives you permission to link the
    1.24 + * code of this program (as well as its derivative works) to "Half-Life 2," the
    1.25 + * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
    1.26 + * by the Valve Corporation.  You must obey the GNU General Public License in
    1.27 + * all respects for all other code used.  Additionally, AlliedModders LLC grants
    1.28 + * this exception to all derivative works.  AlliedModders LLC defines further
    1.29 + * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
    1.30 + * or <http://www.sourcemod.net/license.php>.
    1.31 + *
    1.32 + * Version: $Id$
    1.33 + */
    1.34 +
    1.35 +#include "extension.h"
    1.36 +#include "RegNatives.h"
    1.37 +
    1.38 +#define REGISTER_NATIVE_ADDR(name, code) \
    1.39 +	void *addr; \
    1.40 +	if (!g_pGameConf->GetMemSig(name, &addr)) \
    1.41 +	{ \
    1.42 +		return pContext->ThrowNativeError("Failed to locate function"); \
    1.43 +	} \
    1.44 +	code; \
    1.45 +	g_RegNatives.Register(pWrapper);
    1.46 +
    1.47 +inline CBaseEntity *GetCBaseEntity(int num, bool isplayer)
    1.48 +{
    1.49 +	edict_t *pEdict = engine->PEntityOfEntIndex(num);
    1.50 +	if (!pEdict || pEdict->IsFree())
    1.51 +	{
    1.52 +		return NULL;
    1.53 +	}
    1.54 +
    1.55 +	if (num > 0 && num < playerhelpers->GetMaxClients())
    1.56 +	{
    1.57 +		IGamePlayer *pPlayer = playerhelpers->GetGamePlayer(pEdict);
    1.58 +		if (!pPlayer || !pPlayer->IsConnected())
    1.59 +		{
    1.60 +			return NULL;
    1.61 +		}
    1.62 +	} else if (isplayer) {
    1.63 +		return NULL;
    1.64 +	}
    1.65 +
    1.66 +	IServerUnknown *pUnk;
    1.67 +	if ((pUnk=pEdict->GetUnknown()) == NULL)
    1.68 +	{
    1.69 +		return NULL;
    1.70 +	}
    1.71 +
    1.72 +	return pUnk->GetBaseEntity();
    1.73 +}
    1.74 +
    1.75 +static cell_t CS_RespawnPlayer(IPluginContext *pContext, const cell_t *params)
    1.76 +{
    1.77 +	static ICallWrapper *pWrapper = NULL;
    1.78 +	if (!pWrapper)
    1.79 +	{
    1.80 +		REGISTER_NATIVE_ADDR("RoundRespawn", 
    1.81 +			pWrapper = g_pBinTools->CreateCall(addr, CallConv_ThisCall, NULL, NULL, 0));
    1.82 +	}
    1.83 +
    1.84 +	CBaseEntity *pEntity;
    1.85 +	if (!(pEntity=GetCBaseEntity(params[1], true)))
    1.86 +	{
    1.87 +		return pContext->ThrowNativeError("Client index %d is not valid", params[1]);
    1.88 +	}
    1.89 +	pWrapper->Execute(&pEntity, NULL);
    1.90 +
    1.91 +	return 1;
    1.92 +}
    1.93 +
    1.94 +static cell_t CS_SwitchTeam(IPluginContext *pContext, const cell_t *params)
    1.95 +{
    1.96 +	static ICallWrapper *pWrapper = NULL;
    1.97 +	if (!pWrapper)
    1.98 +	{
    1.99 +		REGISTER_NATIVE_ADDR("SwitchTeam", 
   1.100 +			PassInfo pass[1]; \
   1.101 +			pass[0].flags = PASSFLAG_BYVAL; \
   1.102 +			pass[0].size = sizeof(int); \
   1.103 +			pass[0].type = PassType_Basic; \
   1.104 +			pWrapper = g_pBinTools->CreateCall(addr, CallConv_ThisCall, NULL, pass, 1))
   1.105 +	}
   1.106 +
   1.107 +	CBaseEntity *pEntity;
   1.108 +	if (!(pEntity=GetCBaseEntity(params[1], true)))
   1.109 +	{
   1.110 +		return pContext->ThrowNativeError("Client index %d is not valid", params[1]);
   1.111 +	}
   1.112 +
   1.113 +	unsigned char vstk[sizeof(CBaseEntity *) + sizeof(int)];
   1.114 +	unsigned char *vptr = vstk;
   1.115 +
   1.116 +	*(CBaseEntity **)vptr = pEntity;
   1.117 +	vptr += sizeof(CBaseEntity *);
   1.118 +	*(int *)vptr = params[2];
   1.119 +	pWrapper->Execute(vstk, NULL);
   1.120 +
   1.121 +	return 1;
   1.122 +}
   1.123 +
   1.124 +sp_nativeinfo_t g_CSNatives[] = 
   1.125 +{
   1.126 +	{"CS_RespawnPlayer",			CS_RespawnPlayer}, 
   1.127 +	{"CS_SwitchTeam",				CS_SwitchTeam}, 
   1.128 +	{NULL,							NULL}
   1.129 +};