1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/extensions/cstrike/natives.cpp Sun Mar 30 07:00:22 2008 +0000
1.3 @@ -0,0 +1,173 @@
1.4 +/**
1.5 + * vim: set ts=4 :
1.6 + * =============================================================================
1.7 + * SourceMod Counter-Strike:Source Extension
1.8 + * Copyright (C) 2004-2008 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 + }
1.63 + else if (isplayer)
1.64 + {
1.65 + return NULL;
1.66 + }
1.67 +
1.68 + IServerUnknown *pUnk;
1.69 + if ((pUnk=pEdict->GetUnknown()) == NULL)
1.70 + {
1.71 + return NULL;
1.72 + }
1.73 +
1.74 + return pUnk->GetBaseEntity();
1.75 +}
1.76 +
1.77 +static cell_t CS_PrintHintText(IPluginContext *pContext, const cell_t *params)
1.78 +{
1.79 + int client = params[1];
1.80 + IGamePlayer *pPlayer = playerhelpers->GetGamePlayer(params[1]);
1.81 +
1.82 + if (!pPlayer)
1.83 + {
1.84 + return pContext->ThrowNativeError("Client index %d is invalid", client);
1.85 + }
1.86 +
1.87 + if (!pPlayer->IsInGame())
1.88 + {
1.89 + return pContext->ThrowNativeError("Client %d is not in game", client);
1.90 + }
1.91 +
1.92 + g_pSM->SetGlobalTarget(client);
1.93 +
1.94 + char buffer[192];
1.95 + g_pSM->FormatString(buffer, sizeof(buffer), pContext, params, 2);
1.96 +
1.97 + /* Check for an error before printing to the client */
1.98 + if (pContext->GetContext()->n_err != SP_ERROR_NONE)
1.99 + {
1.100 + return 0;
1.101 + }
1.102 +
1.103 + bf_write *pBitBuf = usermsgs->StartMessage(g_msgHintText, ¶ms[1], 1, USERMSG_RELIABLE);
1.104 + if (pBitBuf == NULL)
1.105 + {
1.106 + return pContext->ThrowNativeError("Could not send a usermessage");
1.107 + }
1.108 + pBitBuf->WriteByte(1);
1.109 + pBitBuf->WriteString(buffer);
1.110 + usermsgs->EndMessage();
1.111 +
1.112 + return 1;
1.113 +}
1.114 +
1.115 +
1.116 +static cell_t CS_RespawnPlayer(IPluginContext *pContext, const cell_t *params)
1.117 +{
1.118 + static ICallWrapper *pWrapper = NULL;
1.119 + if (!pWrapper)
1.120 + {
1.121 + REGISTER_NATIVE_ADDR("RoundRespawn",
1.122 + pWrapper = g_pBinTools->CreateCall(addr, CallConv_ThisCall, NULL, NULL, 0));
1.123 + }
1.124 +
1.125 + CBaseEntity *pEntity;
1.126 + if (!(pEntity=GetCBaseEntity(params[1], true)))
1.127 + {
1.128 + return pContext->ThrowNativeError("Client index %d is not valid", params[1]);
1.129 + }
1.130 + pWrapper->Execute(&pEntity, NULL);
1.131 +
1.132 + return 1;
1.133 +}
1.134 +
1.135 +static cell_t CS_SwitchTeam(IPluginContext *pContext, const cell_t *params)
1.136 +{
1.137 + static ICallWrapper *pWrapper = NULL;
1.138 + if (!pWrapper)
1.139 + {
1.140 + REGISTER_NATIVE_ADDR("SwitchTeam",
1.141 + PassInfo pass[1]; \
1.142 + pass[0].flags = PASSFLAG_BYVAL; \
1.143 + pass[0].size = sizeof(int); \
1.144 + pass[0].type = PassType_Basic; \
1.145 + pWrapper = g_pBinTools->CreateCall(addr, CallConv_ThisCall, NULL, pass, 1))
1.146 + }
1.147 +
1.148 + CBaseEntity *pEntity;
1.149 + if (!(pEntity=GetCBaseEntity(params[1], true)))
1.150 + {
1.151 + return pContext->ThrowNativeError("Client index %d is not valid", params[1]);
1.152 + }
1.153 +
1.154 + unsigned char vstk[sizeof(CBaseEntity *) + sizeof(int)];
1.155 + unsigned char *vptr = vstk;
1.156 +
1.157 + *(CBaseEntity **)vptr = pEntity;
1.158 + vptr += sizeof(CBaseEntity *);
1.159 + *(int *)vptr = params[2];
1.160 + pWrapper->Execute(vstk, NULL);
1.161 +
1.162 + return 1;
1.163 +}
1.164 +
1.165 +sp_nativeinfo_t g_CSNatives[] =
1.166 +{
1.167 + {"CS_RespawnPlayer", CS_RespawnPlayer},
1.168 + {"CS_SwitchTeam", CS_SwitchTeam},
1.169 + {NULL, NULL}
1.170 +};
1.171 +
1.172 +sp_nativeinfo_t g_CS_PrintHintText[] =
1.173 +{
1.174 + {"PrintHintText", CS_PrintHintText},
1.175 + {NULL, NULL},
1.176 +};
