dvander@555: /**
ds@653: * vim: set ts=4 :
ds@1330: * =============================================================================
dvander@1231: * SourceMod
dvander@1231: * Copyright (C) 2004-2007 AlliedModders LLC. All rights reserved.
ds@1330: * =============================================================================
dvander@555: *
ds@1330: * This program is free software; you can redistribute it and/or modify it under
ds@1330: * the terms of the GNU General Public License, version 3.0, as published by the
ds@1330: * Free Software Foundation.
dvander@1231: *
ds@1330: * This program is distributed in the hope that it will be useful, but WITHOUT
ds@1330: * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
ds@1330: * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
ds@1330: * details.
dvander@1231: *
ds@1330: * You should have received a copy of the GNU General Public License along with
ds@1330: * this program. If not, see .
dvander@1231: *
ds@1330: * As a special exception, AlliedModders LLC gives you permission to link the
ds@1330: * code of this program (as well as its derivative works) to "Half-Life 2," the
ds@1330: * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
ds@1330: * by the Valve Corporation. You must obey the GNU General Public License in
ds@1330: * all respects for all other code used. Additionally, AlliedModders LLC grants
ds@1330: * this exception to all derivative works. AlliedModders LLC defines further
ds@1330: * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
ds@1330: * or .
dvander@555: *
dvander@555: * Version: $Id$
dvander@555: */
dvander@555:
dvander@555: #include "sm_globals.h"
dvander@555: #include "sourcemod.h"
dvander@555: #include "sourcemm_api.h"
dvander@556: #include "server_class.h"
dvander@591: #include "PlayerManager.h"
dvander@592: #include "HalfLife2.h"
faluco@682: #include "GameConfigs.h"
faluco@694: #include "sm_stringutil.h"
faluco@694:
faluco@694: enum PropType
faluco@694: {
faluco@694: Prop_Send = 0,
faluco@694: Prop_Data
faluco@694: };
dvander@555:
dvander@1847: enum PropFieldType
dvander@1847: {
dvander@1847: PropField_Unsupported, /**< The type is unsupported. */
dvander@1847: PropField_Integer, /**< Valid for SendProp and Data fields */
dvander@1847: PropField_Float, /**< Valid for SendProp and Data fields */
dvander@1847: PropField_Entity, /**< Valid for Data fields only (SendProp shows as int) */
dvander@1847: PropField_Vector, /**< Valid for SendProp and Data fields */
dvander@1847: PropField_String, /**< Valid for SendProp and Data fields */
dvander@1847: };
dvander@1847:
dvander@555: inline edict_t *GetEdict(cell_t num)
dvander@555: {
dvander@555: edict_t *pEdict = engine->PEntityOfEntIndex(num);
dvander@555: if (!pEdict || pEdict->IsFree())
dvander@555: {
dvander@555: return NULL;
dvander@555: }
dvander@1471: if (num > 0 && num <= g_Players.GetMaxClients())
dvander@556: {
dvander@556: CPlayer *pPlayer = g_Players.GetPlayerByIndex(num);
dvander@556: if (!pPlayer || !pPlayer->IsConnected())
dvander@556: {
dvander@556: return NULL;
dvander@556: }
dvander@556: }
dvander@555: return pEdict;
dvander@555: }
dvander@555:
dvander@557: inline edict_t *GetEntity(cell_t num, CBaseEntity **pData)
dvander@557: {
dvander@557: edict_t *pEdict = engine->PEntityOfEntIndex(num);
dvander@557: if (!pEdict || pEdict->IsFree())
dvander@557: {
dvander@557: return NULL;
dvander@557: }
dvander@1471: if (num > 0 && num <= g_Players.GetMaxClients())
dvander@557: {
dvander@557: CPlayer *pPlayer = g_Players.GetPlayerByIndex(num);
dvander@557: if (!pPlayer || !pPlayer->IsConnected())
dvander@557: {
dvander@557: return NULL;
dvander@557: }
dvander@557: }
dvander@557: IServerUnknown *pUnk;
dvander@557: if ((pUnk=pEdict->GetUnknown()) == NULL)
dvander@557: {
dvander@557: return NULL;
dvander@557: }
dvander@557: *pData = pUnk->GetBaseEntity();
dvander@557: return pEdict;
dvander@557: }
dvander@557:
faluco@682: class VEmptyClass {};
faluco@682: datamap_t *VGetDataDescMap(CBaseEntity *pThisPtr, int offset)
faluco@682: {
faluco@682: void **this_ptr = *reinterpret_cast(&pThisPtr);
faluco@682: void **vtable = *reinterpret_cast(pThisPtr);
faluco@682: void *vfunc = vtable[offset];
faluco@682:
faluco@682: union
faluco@682: {
faluco@682: datamap_t *(VEmptyClass::*mfpnew)();
faluco@682: #ifndef PLATFORM_POSIX
faluco@682: void *addr;
faluco@682: } u;
faluco@682: u.addr = vfunc;
faluco@682: #else
faluco@682: struct
faluco@682: {
faluco@682: void *addr;
faluco@682: intptr_t adjustor;
faluco@682: } s;
faluco@682: } u;
faluco@682: u.s.addr = vfunc;
faluco@682: u.s.adjustor = 0;
faluco@682: #endif
faluco@682:
faluco@682: return (datamap_t *)(reinterpret_cast(this_ptr)->*u.mfpnew)();
faluco@682: }
faluco@682:
faluco@682: inline datamap_t *CBaseEntity_GetDataDescMap(CBaseEntity *pEntity)
faluco@682: {
faluco@682: int offset;
faluco@682:
faluco@682: if (!g_pGameConf->GetOffset("GetDataDescMap", &offset) || !offset)
faluco@682: {
faluco@682: return NULL;
faluco@682: }
faluco@682:
faluco@682: return VGetDataDescMap(pEntity, offset);
faluco@682: }
faluco@682:
dvander@965: /* :TODO: Move this! */
dvander@965: datamap_t *CHalfLife2::GetDataMap(CBaseEntity *pEntity)
dvander@965: {
dvander@965: return CBaseEntity_GetDataDescMap(pEntity);
dvander@965: }
dvander@965:
dvander@555: static cell_t GetMaxEntities(IPluginContext *pContext, const cell_t *params)
dvander@555: {
dvander@555: return gpGlobals->maxEntities;
dvander@555: }
dvander@555:
dvander@555: static cell_t CreateEdict(IPluginContext *pContext, const cell_t *params)
dvander@555: {
dvander@555: edict_t *pEdict = engine->CreateEdict();
dvander@555:
dvander@555: if (!pEdict)
dvander@555: {
dvander@555: return 0;
dvander@555: }
dvander@555:
dvander@555: return engine->IndexOfEdict(pEdict);
dvander@555: }
dvander@555:
dvander@555: static cell_t RemoveEdict(IPluginContext *pContext, const cell_t *params)
dvander@555: {
dvander@555: edict_t *pEdict = engine->PEntityOfEntIndex(params[1]);
dvander@555:
dvander@555: if (!pEdict)
dvander@555: {
dvander@555: return pContext->ThrowNativeError("Edict %d is not a valid edict", params[1]);
dvander@555: }
dvander@555:
dvander@555: engine->RemoveEdict(pEdict);
dvander@555:
dvander@555: return 1;
dvander@555: }
dvander@555:
dvander@555: static cell_t IsValidEdict(IPluginContext *pContext, const cell_t *params)
dvander@555: {
dvander@556: edict_t *pEdict = GetEdict(params[1]);
dvander@555:
dvander@555: if (!pEdict)
dvander@555: {
dvander@555: return 0;
dvander@555: }
dvander@555:
dvander@555: /* Shouldn't be necessary... not sure though */
dvander@555: return pEdict->IsFree() ? 0 : 1;
dvander@555: }
dvander@555:
dvander@555: static cell_t IsValidEntity(IPluginContext *pContext, const cell_t *params)
dvander@555: {
dvander@556: edict_t *pEdict = GetEdict(params[1]);
dvander@555:
dvander@556: if (!pEdict)
dvander@555: {
dvander@555: return 0;
dvander@555: }
dvander@555:
dvander@555: IServerUnknown *pUnknown = pEdict->GetUnknown();
dvander@555: if (!pUnknown)
dvander@555: {
dvander@555: return 0;
dvander@555: }
dvander@555:
dvander@555: CBaseEntity *pEntity = pUnknown->GetBaseEntity();
dvander@555: return (pEntity != NULL) ? 1 : 0;
dvander@555: }
dvander@555:
dvander@555: static cell_t IsEntNetworkable(IPluginContext *pContext, const cell_t *params)
dvander@555: {
dvander@556: edict_t *pEdict = GetEdict(params[1]);
dvander@555:
dvander@556: if (!pEdict)
dvander@555: {
dvander@555: return 0;
dvander@555: }
dvander@555:
dvander@555: return (pEdict->GetNetworkable() != NULL) ? 1 : 0;
dvander@555: }
dvander@555:
dvander@555: static cell_t GetEntityCount(IPluginContext *pContext, const cell_t *params)
dvander@555: {
dvander@555: return engine->GetEntityCount();
dvander@555: }
dvander@555:
dvander@555: static cell_t GetEdictFlags(IPluginContext *pContext, const cell_t *params)
dvander@555: {
dvander@555: edict_t *pEdict = GetEdict(params[1]);
dvander@555:
dvander@555: if (!pEdict)
dvander@555: {
dvander@555: return pContext->ThrowNativeError("Invalid edict (%d)", params[1]);
dvander@555: }
dvander@555:
dvander@555: return pEdict->m_fStateFlags;
dvander@555: }
dvander@555:
dvander@555: static cell_t SetEdictFlags(IPluginContext *pContext, const cell_t *params)
dvander@555: {
dvander@555: edict_t *pEdict = GetEdict(params[1]);
dvander@555:
dvander@555: if (!pEdict)
dvander@555: {
dvander@555: return pContext->ThrowNativeError("Invalid edict (%d)", params[1]);
dvander@555: }
dvander@555:
dvander@555: pEdict->m_fStateFlags = params[2];
dvander@555:
dvander@555: return 1;
dvander@555: }
dvander@555:
dvander@556: static cell_t GetEdictClassname(IPluginContext *pContext, const cell_t *params)
dvander@556: {
dvander@556: edict_t *pEdict = GetEdict(params[1]);
dvander@556:
dvander@556: if (!pEdict)
dvander@556: {
dvander@556: return pContext->ThrowNativeError("Invalid edict (%d)", params[1]);
dvander@556: }
dvander@556:
dvander@556: const char *cls = pEdict->GetClassName();
dvander@556:
dvander@556: if (!cls || cls[0] == '\0')
dvander@556: {
dvander@556: return 0;
dvander@556: }
dvander@556:
dvander@556: pContext->StringToLocal(params[2], params[3], cls);
dvander@556:
dvander@556: return 1;
dvander@556: }
dvander@556:
dvander@556: static cell_t GetEntityNetClass(IPluginContext *pContext, const cell_t *params)
dvander@556: {
dvander@556: edict_t *pEdict = GetEdict(params[1]);
dvander@556:
dvander@556: if (!pEdict)
dvander@556: {
dvander@556: return pContext->ThrowNativeError("Invalid edict (%d)", params[1]);
dvander@556: }
dvander@556:
dvander@556: IServerNetworkable *pNet = pEdict->GetNetworkable();
dvander@556: if (!pNet)
dvander@556: {
dvander@556: return 0;
dvander@556: }
dvander@556:
dvander@556: ServerClass *pClass = pNet->GetServerClass();
dvander@556:
dvander@556: pContext->StringToLocal(params[2], params[3], pClass->GetName());
dvander@556:
dvander@556: return 1;
dvander@556: }
dvander@556:
dvander@557: static cell_t GetEntData(IPluginContext *pContext, const cell_t *params)
dvander@557: {
dvander@557: CBaseEntity *pEntity;
dvander@557: edict_t *pEdict = GetEntity(params[1], &pEntity);
dvander@557:
dvander@557: if (!pEdict || !pEntity)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@557: }
dvander@557:
dvander@557: int offset = params[2];
dvander@1847: if (offset <= 0 || offset > 32768)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Offset %d is invalid", offset);
dvander@557: }
dvander@557:
dvander@557: switch (params[3])
dvander@557: {
dvander@557: case 4:
dvander@557: return *(int *)((uint8_t *)pEntity + offset);
dvander@557: case 2:
dvander@557: return *(short *)((uint8_t *)pEntity + offset);
dvander@557: case 1:
dvander@557: return *((uint8_t *)pEntity + offset);
dvander@557: default:
dvander@557: return pContext->ThrowNativeError("Integer size %d is invalid", params[3]);
dvander@557: }
dvander@557: }
dvander@557:
dvander@557: static cell_t SetEntData(IPluginContext *pContext, const cell_t *params)
dvander@557: {
dvander@557: CBaseEntity *pEntity;
dvander@557: edict_t *pEdict = GetEntity(params[1], &pEntity);
dvander@557:
dvander@557: if (!pEdict || !pEntity)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@557: }
dvander@557:
dvander@557: int offset = params[2];
dvander@1847: if (offset <= 0 || offset > 32768)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Offset %d is invalid", offset);
dvander@557: }
dvander@557:
dvander@561: if (params[5])
dvander@561: {
dvander@685: g_HL2.SetEdictStateChanged(pEdict, offset);
dvander@561: }
dvander@561:
dvander@557: switch (params[4])
dvander@557: {
dvander@557: case 4:
dvander@557: {
dvander@557: *(int *)((uint8_t *)pEntity + offset) = params[3];
dvander@557: break;
dvander@557: }
dvander@557: case 2:
dvander@557: {
dvander@557: *(short *)((uint8_t *)pEntity + offset) = params[3];
dvander@557: break;
dvander@557: }
dvander@557: case 1:
dvander@557: {
dvander@557: *((uint8_t *)pEntity + offset) = params[3];
dvander@557: break;
dvander@557: }
dvander@557: default:
dvander@557: return pContext->ThrowNativeError("Integer size %d is invalid", params[4]);
dvander@557: }
dvander@557:
dvander@557: return 1;
dvander@557: }
dvander@557:
dvander@557: static cell_t GetEntDataFloat(IPluginContext *pContext, const cell_t *params)
dvander@557: {
dvander@557: CBaseEntity *pEntity;
dvander@557: edict_t *pEdict = GetEntity(params[1], &pEntity);
dvander@557:
dvander@557: if (!pEdict || !pEntity)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@557: }
dvander@557:
dvander@557: int offset = params[2];
dvander@1847: if (offset <= 0 || offset > 32768)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Offset %d is invalid", offset);
dvander@557: }
dvander@557:
dvander@557: float f = *(float *)((uint8_t *)pEntity + offset);
dvander@557:
dvander@557: return sp_ftoc(f);
dvander@557: }
dvander@557:
dvander@557: static cell_t SetEntDataFloat(IPluginContext *pContext, const cell_t *params)
dvander@557: {
dvander@557: CBaseEntity *pEntity;
dvander@557: edict_t *pEdict = GetEntity(params[1], &pEntity);
dvander@557:
dvander@557: if (!pEdict || !pEntity)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@557: }
dvander@557:
dvander@557: int offset = params[2];
dvander@1847: if (offset <= 0 || offset > 32768)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Offset %d is invalid", offset);
dvander@557: }
dvander@557:
dvander@557: *(float *)((uint8_t *)pEntity + offset) = sp_ctof(params[3]);
dvander@557:
dvander@561: if (params[4])
dvander@561: {
dvander@685: g_HL2.SetEdictStateChanged(pEdict, offset);
dvander@561: }
dvander@561:
dvander@557: return 1;
dvander@557: }
dvander@557:
dvander@557: static cell_t GetEntDataVector(IPluginContext *pContext, const cell_t *params)
dvander@557: {
dvander@557: CBaseEntity *pEntity;
dvander@557: edict_t *pEdict = GetEntity(params[1], &pEntity);
dvander@557:
dvander@557: if (!pEdict || !pEntity)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@557: }
dvander@557:
dvander@557: int offset = params[2];
dvander@1847: if (offset <= 0 || offset > 32768)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Offset %d is invalid", offset);
dvander@557: }
dvander@557:
dvander@557: Vector *v = (Vector *)((uint8_t *)pEntity + offset);
dvander@557:
dvander@557: cell_t *vec;
dvander@557: pContext->LocalToPhysAddr(params[3], &vec);
dvander@557:
faluco@597: vec[0] = sp_ftoc(v->x);
faluco@597: vec[1] = sp_ftoc(v->y);
faluco@597: vec[2] = sp_ftoc(v->z);
dvander@557:
dvander@557: return 1;
dvander@557: }
dvander@557:
dvander@557: static cell_t SetEntDataVector(IPluginContext *pContext, const cell_t *params)
dvander@557: {
dvander@557: CBaseEntity *pEntity;
dvander@557: edict_t *pEdict = GetEntity(params[1], &pEntity);
dvander@557:
dvander@557: if (!pEdict || !pEntity)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@557: }
dvander@557:
dvander@557: int offset = params[2];
dvander@1847: if (offset <= 0 || offset > 32768)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Offset %d is invalid", offset);
dvander@557: }
dvander@557:
dvander@557: Vector *v = (Vector *)((uint8_t *)pEntity + offset);
dvander@557:
dvander@557: cell_t *vec;
dvander@557: pContext->LocalToPhysAddr(params[3], &vec);
dvander@557:
faluco@597: v->x = sp_ctof(vec[0]);
faluco@597: v->y = sp_ctof(vec[1]);
faluco@597: v->z = sp_ctof(vec[2]);
dvander@557:
dvander@561: if (params[4])
dvander@561: {
dvander@685: g_HL2.SetEdictStateChanged(pEdict, offset);
dvander@561: }
dvander@561:
dvander@557: return 1;
dvander@557: }
dvander@557:
dvander@1847: /* THIS GUY IS DEPRECATED. */
dvander@557: static cell_t GetEntDataEnt(IPluginContext *pContext, const cell_t *params)
dvander@557: {
dvander@557: CBaseEntity *pEntity;
dvander@557: edict_t *pEdict = GetEntity(params[1], &pEntity);
dvander@557:
dvander@557: if (!pEdict || !pEntity)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@557: }
dvander@557:
dvander@557: int offset = params[2];
dvander@1847: if (offset <= 0 || offset > 32768)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Offset %d is invalid", offset);
dvander@557: }
dvander@557:
dvander@557: CBaseHandle &hndl = *(CBaseHandle *)((uint8_t *)pEntity + offset);
dvander@557:
dvander@557: if (!hndl.IsValid())
dvander@557: {
dvander@557: return 0;
dvander@557: }
dvander@557:
dvander@557: return hndl.GetEntryIndex();
dvander@557: }
dvander@557:
dvander@1847: int CheckBaseHandle(CBaseHandle &hndl)
dvander@1847: {
dvander@1847: if (!hndl.IsValid())
dvander@1847: {
dvander@1847: return -1;
dvander@1847: }
dvander@1847:
dvander@1847: int index = hndl.GetEntryIndex();
dvander@1847:
dvander@1847: edict_t *pStoredEdict;
dvander@1847: CBaseEntity *pStoredEntity;
dvander@1847:
dvander@1847: pStoredEdict = GetEntity(index, &pStoredEntity);
dvander@1847:
dvander@1847: if (pStoredEdict == NULL || pStoredEntity == NULL)
dvander@1847: {
dvander@1847: return -1;
dvander@1847: }
dvander@1847:
dvander@1847: IServerEntity *pSE = pStoredEdict->GetIServerEntity();
dvander@1847:
dvander@1847: if (pSE == NULL)
dvander@1847: {
dvander@1847: return -1;
dvander@1847: }
dvander@1847:
dvander@1847: if (pSE->GetRefEHandle() != hndl)
dvander@1847: {
dvander@1847: return -1;
dvander@1847: }
dvander@1847:
dvander@1847: return index;
dvander@1847: }
dvander@1847:
dvander@1847: static cell_t GetEntDataEnt2(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: CBaseEntity *pEntity;
dvander@1847: edict_t *pEdict = GetEntity(params[1], &pEntity);
dvander@1847:
dvander@1847: if (pEdict == NULL || pEntity == NULL)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@1847: }
dvander@1847:
dvander@1847: int offset = params[2];
dvander@1847: if (offset <= 0 || offset > 32768)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Offset %d is invalid", offset);
dvander@1847: }
dvander@1847:
dvander@1847: CBaseHandle &hndl = *(CBaseHandle *)((uint8_t *)pEntity + offset);
dvander@1847:
dvander@1847: return CheckBaseHandle(hndl);
dvander@1847: }
dvander@1847:
dvander@1847: /* THIS GUY IS DEPRECATED. */
dvander@557: static cell_t SetEntDataEnt(IPluginContext *pContext, const cell_t *params)
dvander@557: {
dvander@557: CBaseEntity *pEntity;
dvander@557: edict_t *pEdict = GetEntity(params[1], &pEntity);
dvander@557:
dvander@557: if (!pEdict || !pEntity)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@557: }
dvander@557:
dvander@557: int offset = params[2];
dvander@1847: if (offset <= 0 || offset > 32768)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Offset %d is invalid", offset);
dvander@557: }
dvander@557:
dvander@557: CBaseHandle &hndl = *(CBaseHandle *)((uint8_t *)pEntity + offset);
dvander@557:
dvander@557: if (params[3] == 0)
dvander@557: {
dvander@557: hndl.Set(NULL);
dvander@557: } else {
dvander@557: edict_t *pEdict = GetEdict(params[3]);
dvander@557: if (!pEdict)
dvander@557: {
dvander@557: return pContext->ThrowNativeError("Entity %d is invalid", params[3]);
dvander@557: }
dvander@557: IServerEntity *pEntOther = pEdict->GetIServerEntity();
dvander@557: hndl.Set(pEntOther);
dvander@557: }
dvander@557:
dvander@561: if (params[4])
dvander@561: {
dvander@685: g_HL2.SetEdictStateChanged(pEdict, offset);
dvander@561: }
dvander@561:
dvander@557: return 1;
dvander@557: }
dvander@557:
dvander@1847: static cell_t SetEntDataEnt2(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: CBaseEntity *pEntity;
dvander@1847: edict_t *pEdict = GetEntity(params[1], &pEntity);
dvander@1847:
dvander@1847: if (!pEdict || !pEntity)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@1847: }
dvander@1847:
dvander@1847: int offset = params[2];
dvander@1847: if (offset <= 0 || offset > 32768)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Offset %d is invalid", offset);
dvander@1847: }
dvander@1847:
dvander@1847: CBaseHandle &hndl = *(CBaseHandle *)((uint8_t *)pEntity + offset);
dvander@1847:
dvander@1847: if (params[3] == -1)
dvander@1847: {
dvander@1847: hndl.Set(NULL);
dvander@1847: }
dvander@1847: else
dvander@1847: {
dvander@1847: edict_t *pEdict = GetEdict(params[3]);
dvander@1847: if (!pEdict)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[3]);
dvander@1847: }
dvander@1847: IServerEntity *pEntOther = pEdict->GetIServerEntity();
dvander@1847: hndl.Set(pEntOther);
dvander@1847: }
dvander@1847:
dvander@1847: if (params[4])
dvander@1847: {
dvander@1847: g_HL2.SetEdictStateChanged(pEdict, offset);
dvander@1847: }
dvander@1847:
dvander@1847: return 1;
dvander@1847: }
dvander@1847:
dvander@558: static cell_t ChangeEdictState(IPluginContext *pContext, const cell_t *params)
dvander@558: {
dvander@558: edict_t *pEdict = GetEdict(params[1]);
dvander@558:
dvander@558: if (!pEdict)
dvander@558: {
dvander@558: return pContext->ThrowNativeError("Edict %d is invalid", params[1]);
dvander@558: }
dvander@558:
dvander@685: g_HL2.SetEdictStateChanged(pEdict, params[2]);
dvander@558:
dvander@558: return 1;
dvander@558: }
dvander@558:
dvander@561: static cell_t FindSendPropOffs(IPluginContext *pContext, const cell_t *params)
dvander@561: {
dvander@561: char *cls, *prop;
dvander@561: pContext->LocalToString(params[1], &cls);
dvander@561: pContext->LocalToString(params[2], &prop);
dvander@561:
dvander@561: SendProp *pSend = g_HL2.FindInSendTable(cls, prop);
dvander@561:
dvander@561: if (!pSend)
dvander@561: {
dvander@561: return -1;
dvander@561: }
dvander@561:
dvander@561: return pSend->GetOffset();
dvander@561: }
dvander@561:
dvander@1847: static cell_t FindSendPropInfo(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: char *cls, *prop;
dvander@1847: sm_sendprop_info_t info;
dvander@1847: cell_t *pType, *pBits, *pLocal;
dvander@1847:
dvander@1847: pContext->LocalToString(params[1], &cls);
dvander@1847: pContext->LocalToString(params[2], &prop);
dvander@1847:
dvander@1847: if (!g_HL2.FindSendPropInfo(cls, prop, &info))
dvander@1847: {
dvander@1847: return -1;
dvander@1847: }
dvander@1847:
dvander@1847: pContext->LocalToPhysAddr(params[3], &pType);
dvander@1847: pContext->LocalToPhysAddr(params[4], &pBits);
dvander@1847: pContext->LocalToPhysAddr(params[5], &pLocal);
dvander@1847:
dvander@1847: switch (info.prop->GetType())
dvander@1847: {
dvander@1847: case DPT_Int:
dvander@1847: {
dvander@1847: *pType = PropField_Integer;
dvander@1847: break;
dvander@1847: }
dvander@1847: case DPT_Float:
dvander@1847: {
dvander@1847: *pType = PropField_Float;
dvander@1847: break;
dvander@1847: }
dvander@1847: case DPT_String:
dvander@1847: {
dvander@1847: *pType = PropField_String;
dvander@1847: break;
dvander@1847: }
dvander@1847: case DPT_Vector:
dvander@1847: {
dvander@1847: *pType = PropField_Vector;
dvander@1847: break;
dvander@1847: }
dvander@1847: default:
dvander@1847: {
dvander@1847: *pType = PropField_Unsupported;
dvander@1847: break;
dvander@1847: }
dvander@1847: }
dvander@1847:
dvander@1847: *pBits = info.prop->m_nBits;
dvander@1847: *pLocal = info.prop->GetOffset();
dvander@1847:
dvander@1847: return info.actual_offset;
dvander@1847: }
dvander@1847:
faluco@682: static cell_t FindDataMapOffs(IPluginContext *pContext, const cell_t *params)
faluco@682: {
faluco@682: CBaseEntity *pEntity;
faluco@682: datamap_t *pMap;
faluco@682: typedescription_t *td;
faluco@682: char *offset;
faluco@682: edict_t *pEdict = GetEntity(params[1], &pEntity);
faluco@682:
faluco@682: if (!pEdict || !pEntity)
faluco@682: {
faluco@682: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
faluco@682: }
faluco@682:
faluco@682: if ((pMap=CBaseEntity_GetDataDescMap(pEntity)) == NULL)
faluco@682: {
faluco@682: return pContext->ThrowNativeError("Unable to retrieve GetDataDescMap offset");
faluco@682: }
faluco@682:
faluco@682: pContext->LocalToString(params[2], &offset);
faluco@682: if ((td=g_HL2.FindInDataMap(pMap, offset)) == NULL)
faluco@682: {
faluco@682: return -1;
faluco@682: }
faluco@682:
dvander@1847: if (params[0] == 4)
dvander@1847: {
dvander@1847: cell_t *pType, *pSize;
dvander@1847:
dvander@1847: pContext->LocalToPhysAddr(params[3], &pType);
dvander@1847: pContext->LocalToPhysAddr(params[4], &pSize);
dvander@1847:
dvander@1847: switch (td->fieldType)
dvander@1847: {
dvander@1847: case FIELD_TICK:
dvander@1847: case FIELD_MODELINDEX:
dvander@1847: case FIELD_MATERIALINDEX:
dvander@1847: case FIELD_INTEGER:
dvander@1847: case FIELD_COLOR32:
dvander@1847: {
dvander@1847: *pType = PropField_Integer;
dvander@1847: *pSize = 32;
dvander@1847: break;
dvander@1847: }
dvander@1847: case FIELD_VECTOR:
dvander@1847: case FIELD_POSITION_VECTOR:
dvander@1847: {
dvander@1847: *pType = PropField_Vector;
dvander@1847: *pSize = 12;
dvander@1847: break;
dvander@1847: }
dvander@1847: case FIELD_SHORT:
dvander@1847: {
dvander@1847: *pType = PropField_Integer;
dvander@1847: *pSize = 16;
dvander@1847: break;
dvander@1847: }
dvander@1847: case FIELD_BOOLEAN:
dvander@1847: {
dvander@1847: *pType = PropField_Integer;
dvander@1847: *pSize = 1;
dvander@1847: break;
dvander@1847: }
dvander@1847: case FIELD_CHARACTER:
dvander@1847: {
dvander@1847: if (td->fieldSize == 1)
dvander@1847: {
dvander@1847: *pType = PropField_Integer;
dvander@1847: *pSize = 8;
dvander@1847: }
dvander@1847: else
dvander@1847: {
dvander@1847: *pType = PropField_String;
dvander@1847: *pSize = 8 * td->fieldSize;
dvander@1847: }
dvander@1847: break;
dvander@1847: }
dvander@1847: case FIELD_FLOAT:
dvander@1847: case FIELD_TIME:
dvander@1847: {
dvander@1847: *pType = PropField_Float;
dvander@1847: *pSize = 32;
dvander@1847: break;
dvander@1847: }
dvander@1847: case FIELD_EHANDLE:
dvander@1847: {
dvander@1847: *pType = PropField_Entity;
dvander@1847: *pSize = 32;
dvander@1847: break;
dvander@1847: }
dvander@1847: default:
dvander@1847: {
dvander@1847: *pType = PropField_Unsupported;
dvander@1847: *pSize = 0;
dvander@1847: }
dvander@1847: }
dvander@1847: }
dvander@1847:
faluco@682: return td->fieldOffset[TD_OFFSET_NORMAL];
faluco@682: }
faluco@682:
faluco@694: static cell_t GetEntDataString(IPluginContext *pContext, const cell_t *params)
faluco@694: {
faluco@694: CBaseEntity *pEntity;
faluco@694: edict_t *pEdict = GetEntity(params[1], &pEntity);
faluco@694:
faluco@694: if (!pEdict || !pEntity)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
faluco@694: }
faluco@694:
faluco@694: int offset = params[2];
faluco@694: if (offset < 0 || offset > 32768)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Offset %d is invalid", offset);
faluco@694: }
faluco@694:
faluco@694: size_t len;
faluco@694: char *src = (char *)((uint8_t *)pEntity + offset);
faluco@694: pContext->StringToLocalUTF8(params[3], params[4], src, &len);
faluco@694:
faluco@694: return len;
faluco@694: }
faluco@694:
faluco@694: static cell_t SetEntDataString(IPluginContext *pContext, const cell_t *params)
faluco@694: {
faluco@694: CBaseEntity *pEntity;
faluco@694: edict_t *pEdict = GetEntity(params[1], &pEntity);
faluco@694:
faluco@694: if (!pEdict || !pEntity)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
faluco@694: }
faluco@694:
faluco@694: int offset = params[2];
faluco@694: if (offset < 0 || offset > 32768)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Offset %d is invalid", offset);
faluco@694: }
faluco@694:
faluco@694: char *src;
faluco@694: char *dest = (char *)((uint8_t *)pEntity + offset);
faluco@694:
faluco@694: pContext->LocalToString(params[3], &src);
faluco@694: size_t len = strncopy(dest, src, params[4]);
faluco@694:
faluco@694: if (params[5])
faluco@694: {
faluco@694: g_HL2.SetEdictStateChanged(pEdict, offset);
faluco@694: }
faluco@694:
faluco@694: return len;
faluco@694: }
faluco@694:
dvander@1847: #define FIND_PROP_DATA(td) \
dvander@1847: datamap_t *pMap; \
dvander@1847: if ((pMap = CBaseEntity_GetDataDescMap(pEntity)) == NULL) \
dvander@1847: { \
dvander@1847: return pContext->ThrowNativeError("Could not retrieve datamap"); \
dvander@1847: } \
dvander@1847: if ((td = g_HL2.FindInDataMap(pMap, prop)) == NULL) \
dvander@1847: { \
dvander@1847: return pContext->ThrowNativeError("Property \"%s\" not found (entity %d/%s)", \
dvander@1847: prop, \
dvander@1847: params[1], \
dvander@1847: class_name); \
dvander@1847: }
dvander@1847:
dvander@1847: #define FIND_PROP_SEND(pProp) \
dvander@1847: IServerNetworkable *pNet = pEdict->GetNetworkable(); \
dvander@1847: if (!pNet) \
dvander@1847: { \
dvander@1847: return pContext->ThrowNativeError("Edict %d is not networkable", params[1]); \
dvander@1847: } \
dvander@1847: if (!g_HL2.FindSendPropInfo(pNet->GetServerClass()->GetName(), prop, pProp)) \
dvander@1847: { \
dvander@1847: return pContext->ThrowNativeError("Property \"%s\" not found (entity %d/%s)", \
dvander@1847: prop, \
dvander@1847: params[1], \
dvander@1847: class_name); \
dvander@1847: }
dvander@1847:
dvander@1847: inline int MatchFieldAsInteger(int field_type)
dvander@1847: {
dvander@1847: switch (field_type)
dvander@1847: {
dvander@1847: case FIELD_TICK:
dvander@1847: case FIELD_MODELINDEX:
dvander@1847: case FIELD_MATERIALINDEX:
dvander@1847: case FIELD_INTEGER:
dvander@1847: case FIELD_COLOR32:
dvander@1847: return 32;
dvander@1847: case FIELD_SHORT:
dvander@1847: return 16;
dvander@1847: case FIELD_CHARACTER:
dvander@1847: return 8;
dvander@1847: case FIELD_BOOLEAN:
dvander@1847: return 1;
dvander@1847: default:
dvander@1847: return 0;
dvander@1847: }
dvander@1847:
dvander@1847: return 0;
dvander@1847: }
dvander@1847:
dvander@1847: static cell_t GetEntProp(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: CBaseEntity *pEntity;
dvander@1847: char *prop;
dvander@1847: int offset;
dvander@1847: const char *class_name;
dvander@1847: edict_t *pEdict;
dvander@1847: int bit_count;
dvander@1847:
dvander@1847: pEdict = GetEntity(params[1], &pEntity);
dvander@1847:
dvander@1847: if (!pEdict || !pEntity)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@1847: }
dvander@1847:
dvander@1847: if ((class_name = pEdict->GetClassName()) == NULL)
dvander@1847: {
dvander@1847: class_name = "";
dvander@1847: }
dvander@1847:
dvander@1847: pContext->LocalToString(params[3], &prop);
dvander@1847:
dvander@1847: switch (params[2])
dvander@1847: {
dvander@1847: case Prop_Data:
dvander@1847: {
dvander@1847: typedescription_t *td;
dvander@1847:
dvander@1847: FIND_PROP_DATA(td);
dvander@1847:
dvander@1847: if ((bit_count = MatchFieldAsInteger(td->fieldType)) == 0)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Data field %s is not an integer (%d)",
dvander@1847: prop,
dvander@1847: td->fieldType);
dvander@1847: }
dvander@1847:
dvander@1847: offset = td->fieldOffset[TD_OFFSET_NORMAL];
dvander@1847: break;
dvander@1847: }
dvander@1847: case Prop_Send:
dvander@1847: {
dvander@1847: sm_sendprop_info_t info;
dvander@1847:
dvander@1847: FIND_PROP_SEND(&info);
dvander@1847:
dvander@1847: if (info.prop->GetType() != DPT_Int)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("SendProp %s is not an integer ([%d,%d] != %d)",
dvander@1847: prop,
dvander@1847: info.prop->GetType(),
dvander@1847: info.prop->m_nBits,
dvander@1847: DPT_Int);
dvander@1847: }
dvander@1847:
dvander@1847: bit_count = info.prop->m_nBits;
dvander@1847: offset = info.actual_offset;
dvander@1847: break;
dvander@1847: }
dvander@1847: default:
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Invalid Property type %d", params[2]);
dvander@1847: }
dvander@1847: }
dvander@1847:
dvander@1847: if (bit_count < 1)
dvander@1847: {
dvander@1847: bit_count = params[4] * 8;
dvander@1847: }
dvander@1847:
dvander@1847: if (bit_count >= 17)
dvander@1847: {
dvander@1847: return *(int32_t *)((uint8_t *)pEntity + offset);
dvander@1847: }
dvander@1847: else if (bit_count >= 9)
dvander@1847: {
dvander@1847: return *(int16_t *)((uint8_t *)pEntity + offset);
dvander@1847: }
dvander@1847: else if (bit_count >= 2)
dvander@1847: {
dvander@1847: return *(int8_t *)((uint8_t *)pEntity + offset);
dvander@1847: }
dvander@1847: else
dvander@1847: {
dvander@1847: return *(bool *)((uint8_t *)pEntity + offset) ? 1 : 0;
dvander@1847: }
dvander@1847:
dvander@1847: return 0;
dvander@1847: }
dvander@1847:
dvander@1847: static cell_t SetEntProp(IPluginContext *pContext, const cell_t *params)
faluco@694: {
faluco@694: CBaseEntity *pEntity;
faluco@694: char *prop;
faluco@694: int offset;
dvander@1847: const char *class_name;
dvander@1847: edict_t *pEdict;
dvander@1847: int bit_count;
dvander@1847:
dvander@1847: pEdict = GetEntity(params[1], &pEntity);
dvander@1847:
dvander@1847: if (!pEdict || !pEntity)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@1847: }
dvander@1847:
dvander@1847: if ((class_name = pEdict->GetClassName()) == NULL)
dvander@1847: {
dvander@1847: class_name = "";
dvander@1847: }
dvander@1847:
dvander@1847: pContext->LocalToString(params[3], &prop);
dvander@1847:
dvander@1847: switch (params[2])
dvander@1847: {
dvander@1847: case Prop_Data:
dvander@1847: {
dvander@1847: typedescription_t *td;
dvander@1847:
dvander@1847: FIND_PROP_DATA(td);
dvander@1847:
dvander@1847: if ((bit_count = MatchFieldAsInteger(td->fieldType)) == 0)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Data field %s is not an integer (%d)",
dvander@1847: prop,
dvander@1847: td->fieldType);
dvander@1847: }
dvander@1847:
dvander@1847: offset = td->fieldOffset[TD_OFFSET_NORMAL];
dvander@1847: break;
dvander@1847: }
dvander@1847: case Prop_Send:
dvander@1847: {
dvander@1847: sm_sendprop_info_t info;
dvander@1847:
dvander@1847: FIND_PROP_SEND(&info);
dvander@1847:
dvander@1847: if (info.prop->GetType() != DPT_Int)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("SendProp %s is not an integer ([%d,%d] != %d)",
dvander@1847: prop,
dvander@1847: info.prop->GetType(),
dvander@1847: info.prop->m_nBits,
dvander@1847: DPT_Int);
dvander@1847: }
dvander@1847:
dvander@1847: bit_count = info.prop->m_nBits;
dvander@1847: offset = info.actual_offset;
dvander@1847: break;
dvander@1847: }
dvander@1847: default:
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Invalid Property type %d", params[2]);
dvander@1847: }
dvander@1847: }
dvander@1847:
dvander@1847: if (bit_count < 1)
dvander@1847: {
dvander@1847: bit_count = params[5] * 8;
dvander@1847: }
dvander@1847:
dvander@1847: if (bit_count >= 17)
dvander@1847: {
dvander@1847: *(int32_t *)((uint8_t *)pEntity + offset) = params[4];
dvander@1847: }
dvander@1847: else if (bit_count >= 9)
dvander@1847: {
dvander@1847: *(int16_t *)((uint8_t *)pEntity + offset) = (int16_t)params[4];
dvander@1847: }
dvander@1847: else if (bit_count >= 2)
dvander@1847: {
dvander@1847: *(int8_t *)((uint8_t *)pEntity + offset) = (int8_t)params[4];
dvander@1847: }
dvander@1847: else
dvander@1847: {
dvander@1847: *(bool *)((uint8_t *)pEntity + offset) = params[4] ? true : false;
dvander@1847: }
dvander@1847:
dvander@1847: return 0;
dvander@1847: }
dvander@1847:
dvander@1847: static cell_t GetEntPropFloat(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: CBaseEntity *pEntity;
dvander@1847: char *prop;
dvander@1847: int offset;
dvander@1847: const char *class_name;
dvander@1847: edict_t *pEdict;
dvander@1847:
dvander@1847: pEdict = GetEntity(params[1], &pEntity);
dvander@1847:
dvander@1847: if (!pEdict || !pEntity)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@1847: }
dvander@1847:
dvander@1847: if ((class_name = pEdict->GetClassName()) == NULL)
dvander@1847: {
dvander@1847: class_name = "";
dvander@1847: }
dvander@1847:
dvander@1847: pContext->LocalToString(params[3], &prop);
dvander@1847:
dvander@1847: switch (params[2])
dvander@1847: {
dvander@1847: case Prop_Data:
dvander@1847: {
dvander@1847: typedescription_t *td;
dvander@1847:
dvander@1847: FIND_PROP_DATA(td);
dvander@1847:
dvander@1847: if (td->fieldType != FIELD_FLOAT
dvander@1847: && td->fieldType != FIELD_TIME)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Data field %s is not a float (%d != [%d,%d])",
dvander@1847: prop,
dvander@1847: td->fieldType,
dvander@1847: FIELD_FLOAT,
dvander@1847: FIELD_TIME);
dvander@1847: }
dvander@1847:
dvander@1847: offset = td->fieldOffset[TD_OFFSET_NORMAL];
dvander@1847: break;
dvander@1847: }
dvander@1847: case Prop_Send:
dvander@1847: {
dvander@1847: sm_sendprop_info_t info;
dvander@1847:
dvander@1847: FIND_PROP_SEND(&info);
dvander@1847:
dvander@1847: if (info.prop->GetType() != DPT_Float)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("SendProp %s is not a float (%d != %d)",
dvander@1847: prop,
dvander@1847: info.prop->GetType(),
dvander@1847: DPT_Float);
dvander@1847: }
dvander@1847:
dvander@1847: offset = info.actual_offset;
dvander@1847: break;
dvander@1847: }
dvander@1847: default:
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Invalid Property type %d", params[2]);
dvander@1847: }
dvander@1847: }
dvander@1847:
dvander@1847: float val = *(float *)((uint8_t *)pEntity + offset);
dvander@1847:
dvander@1847: return sp_ftoc(val);
dvander@1847: }
dvander@1847:
dvander@1847: static cell_t SetEntPropFloat(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: CBaseEntity *pEntity;
dvander@1847: char *prop;
dvander@1847: int offset;
dvander@1847: const char *class_name;
dvander@1847: edict_t *pEdict;
dvander@1847:
dvander@1847: pEdict = GetEntity(params[1], &pEntity);
faluco@694:
faluco@694: if (!pEdict || !pEntity)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
faluco@694: }
faluco@694:
dvander@1847: if ((class_name = pEdict->GetClassName()) == NULL)
dvander@1847: {
dvander@1847: class_name = "";
dvander@1847: }
dvander@1847:
dvander@1847: pContext->LocalToString(params[3], &prop);
dvander@1847:
faluco@694: switch (params[2])
faluco@694: {
faluco@694: case Prop_Data:
faluco@694: {
faluco@694: typedescription_t *td;
dvander@1847:
dvander@1847: FIND_PROP_DATA(td);
dvander@1847:
dvander@1847: if (td->fieldType != FIELD_FLOAT
dvander@1847: && td->fieldType != FIELD_TIME)
faluco@694: {
dvander@1847: return pContext->ThrowNativeError("Data field %s is not a float (%d != [%d,%d])",
dvander@1847: prop,
dvander@1847: td->fieldType,
dvander@1847: FIELD_FLOAT,
dvander@1847: FIELD_TIME);
dvander@1847: }
dvander@1847:
dvander@1847: offset = td->fieldOffset[TD_OFFSET_NORMAL];
dvander@1847: break;
dvander@1847: }
dvander@1847: case Prop_Send:
dvander@1847: {
dvander@1847: sm_sendprop_info_t info;
dvander@1847:
dvander@1847: FIND_PROP_SEND(&info);
dvander@1847:
dvander@1847: if (info.prop->GetType() != DPT_Float)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("SendProp %s is not a float (%d != %d)",
dvander@1847: prop,
dvander@1847: info.prop->GetType(),
dvander@1847: DPT_Float);
faluco@694: }
dvander@1847:
dvander@1847: offset = info.actual_offset;
dvander@1847: break;
dvander@1847: }
dvander@1847: default:
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Invalid Property type %d", params[2]);
dvander@1847: }
dvander@1847: }
dvander@1847:
dvander@1847: *(float *)((uint8_t *)pEntity + offset) = sp_ctof(params[4]);
dvander@1847:
dvander@1847: if (params[2] == Prop_Send)
dvander@1847: {
dvander@1847: g_HL2.SetEdictStateChanged(pEdict, offset);
dvander@1847: }
dvander@1847:
dvander@1847: return 1;
dvander@1847: }
dvander@1847:
dvander@1847: static cell_t GetEntPropEnt(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: CBaseEntity *pEntity;
dvander@1847: char *prop;
dvander@1847: int offset;
dvander@1847: const char *class_name;
dvander@1847: edict_t *pEdict;
dvander@1847:
dvander@1847: pEdict = GetEntity(params[1], &pEntity);
dvander@1847:
dvander@1847: if (!pEdict || !pEntity)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@1847: }
dvander@1847:
dvander@1847: if ((class_name = pEdict->GetClassName()) == NULL)
dvander@1847: {
dvander@1847: class_name = "";
dvander@1847: }
dvander@1847:
dvander@1847: pContext->LocalToString(params[3], &prop);
dvander@1847:
dvander@1847: switch (params[2])
dvander@1847: {
dvander@1847: case Prop_Data:
dvander@1847: {
dvander@1847: typedescription_t *td;
dvander@1847:
dvander@1847: FIND_PROP_DATA(td);
dvander@1847:
dvander@1847: if (td->fieldType != FIELD_EHANDLE)
faluco@694: {
dvander@1847: return pContext->ThrowNativeError("Data field %s is not an entity (%d != %d)",
dvander@1847: prop,
dvander@1847: td->fieldType,
dvander@1847: FIELD_EHANDLE);
faluco@694: }
dvander@1847:
dvander@1847: offset = td->fieldOffset[TD_OFFSET_NORMAL];
dvander@1847: break;
dvander@1847: }
dvander@1847: case Prop_Send:
dvander@1847: {
dvander@1847: sm_sendprop_info_t info;
dvander@1847:
dvander@1847: FIND_PROP_SEND(&info);
dvander@1847:
dvander@1847: if (info.prop->GetType() != DPT_Int)
faluco@694: {
dvander@1847: return pContext->ThrowNativeError("SendProp %s is not an integer (%d != %d)",
dvander@1847: prop,
dvander@1847: info.prop->GetType(),
dvander@1847: DPT_Int);
faluco@694: }
dvander@1847:
dvander@1847: offset = info.actual_offset;
dvander@1847: break;
dvander@1847: }
dvander@1847: default:
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Invalid Property type %d", params[2]);
dvander@1847: }
dvander@1847: }
dvander@1847:
dvander@1847: CBaseHandle &hndl = *(CBaseHandle *)((uint8_t *)pEntity + offset);
dvander@1847:
dvander@1847: return CheckBaseHandle(hndl);
dvander@1847: }
dvander@1847:
dvander@1847: static cell_t SetEntPropEnt(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: CBaseEntity *pEntity;
dvander@1847: char *prop;
dvander@1847: int offset;
dvander@1847: const char *class_name;
dvander@1847: edict_t *pEdict;
dvander@1847:
dvander@1847: pEdict = GetEntity(params[1], &pEntity);
dvander@1847:
dvander@1847: if (!pEdict || !pEntity)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@1847: }
dvander@1847:
dvander@1847: if ((class_name = pEdict->GetClassName()) == NULL)
dvander@1847: {
dvander@1847: class_name = "";
dvander@1847: }
dvander@1847:
dvander@1847: pContext->LocalToString(params[3], &prop);
dvander@1847:
dvander@1847: switch (params[2])
dvander@1847: {
dvander@1847: case Prop_Data:
dvander@1847: {
dvander@1847: typedescription_t *td;
dvander@1847:
dvander@1847: FIND_PROP_DATA(td);
dvander@1847:
dvander@1847: if (td->fieldType != FIELD_EHANDLE)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Data field %s is not an entity (%d != %d)",
dvander@1847: prop,
dvander@1847: td->fieldType,
dvander@1847: FIELD_EHANDLE);
dvander@1847: }
dvander@1847:
faluco@694: offset = td->fieldOffset[TD_OFFSET_NORMAL];
faluco@694: break;
faluco@694: }
faluco@694: case Prop_Send:
faluco@694: {
dvander@1847: sm_sendprop_info_t info;
dvander@1847:
dvander@1847: FIND_PROP_SEND(&info);
dvander@1847:
dvander@1847: if (info.prop->GetType() != DPT_Int)
faluco@694: {
dvander@1847: return pContext->ThrowNativeError("SendProp %s is not an integer (%d != %d)",
dvander@1847: prop,
dvander@1847: info.prop->GetType(),
dvander@1847: DPT_Int);
dvander@1847: }
dvander@1847:
dvander@1847: offset = info.actual_offset;
dvander@1847: break;
dvander@1847: }
dvander@1847: default:
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Invalid Property type %d", params[2]);
dvander@1847: }
dvander@1847: }
dvander@1847:
dvander@1847: CBaseHandle &hndl = *(CBaseHandle *)((uint8_t *)pEntity + offset);
dvander@1847:
dvander@1847: if (params[4] == -1)
dvander@1847: {
dvander@1847: hndl.Set(NULL);
dvander@1847: }
dvander@1847: else
dvander@1847: {
dvander@1847: edict_t *pOther;
dvander@1847: CBaseEntity *pOtherEnt;
dvander@1847:
dvander@1847: if ((pOther = GetEntity(params[4], &pOtherEnt)) == NULL)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Invalid entity %d", params[4]);
dvander@1847: }
dvander@1847:
dvander@1847: hndl.Set(pOther->GetIServerEntity());
dvander@1847: }
dvander@1847:
dvander@1847: if (params[2] == Prop_Send)
dvander@1847: {
dvander@1847: g_HL2.SetEdictStateChanged(pEdict, offset);
dvander@1847: }
dvander@1847:
dvander@1847: return 1;
dvander@1847: }
dvander@1847:
dvander@1847: static cell_t GetEntPropVector(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: CBaseEntity *pEntity;
dvander@1847: char *prop;
dvander@1847: int offset;
dvander@1847: const char *class_name;
dvander@1847: edict_t *pEdict;
dvander@1847:
dvander@1847: pEdict = GetEntity(params[1], &pEntity);
dvander@1847:
dvander@1847: if (!pEdict || !pEntity)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@1847: }
dvander@1847:
dvander@1847: if ((class_name = pEdict->GetClassName()) == NULL)
dvander@1847: {
dvander@1847: class_name = "";
dvander@1847: }
dvander@1847:
dvander@1847: pContext->LocalToString(params[3], &prop);
dvander@1847:
dvander@1847: switch (params[2])
dvander@1847: {
dvander@1847: case Prop_Data:
dvander@1847: {
dvander@1847: typedescription_t *td;
dvander@1847:
dvander@1847: FIND_PROP_DATA(td);
dvander@1847:
dvander@1847: if (td->fieldType != FIELD_VECTOR
dvander@1847: && td->fieldType != FIELD_POSITION_VECTOR)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Data field %s is not a vector (%d != [%d,%d])",
dvander@1847: prop,
dvander@1847: td->fieldType,
dvander@1847: FIELD_VECTOR,
dvander@1847: FIELD_POSITION_VECTOR);
dvander@1847: }
dvander@1847:
dvander@1847: offset = td->fieldOffset[TD_OFFSET_NORMAL];
dvander@1847: break;
dvander@1847: }
dvander@1847: case Prop_Send:
dvander@1847: {
dvander@1847: sm_sendprop_info_t info;
dvander@1847:
dvander@1847: FIND_PROP_SEND(&info);
dvander@1847:
dvander@1847: if (info.prop->GetType() != DPT_Vector)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("SendProp %s is not a vector (%d != %d)",
dvander@1847: prop,
dvander@1847: info.prop->GetType(),
dvander@1847: DPT_Vector);
faluco@694: }
dvander@1847:
dvander@1847: offset = info.actual_offset;
dvander@1847: break;
dvander@1847: }
dvander@1847: default:
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Invalid Property type %d", params[2]);
dvander@1847: }
dvander@1847: }
dvander@1847:
dvander@1847: Vector *v = (Vector *)((uint8_t *)pEntity + offset);
dvander@1847:
dvander@1847: cell_t *vec;
dvander@1847: pContext->LocalToPhysAddr(params[4], &vec);
dvander@1847:
dvander@1847: vec[0] = sp_ftoc(v->x);
dvander@1847: vec[1] = sp_ftoc(v->y);
dvander@1847: vec[2] = sp_ftoc(v->z);
dvander@1847:
dvander@1847: return 1;
dvander@1847: }
dvander@1847:
dvander@1847: static cell_t SetEntPropVector(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: CBaseEntity *pEntity;
dvander@1847: char *prop;
dvander@1847: int offset;
dvander@1847: const char *class_name;
dvander@1847: edict_t *pEdict;
dvander@1847:
dvander@1847: pEdict = GetEntity(params[1], &pEntity);
dvander@1847:
dvander@1847: if (!pEdict || !pEntity)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@1847: }
dvander@1847:
dvander@1847: if ((class_name = pEdict->GetClassName()) == NULL)
dvander@1847: {
dvander@1847: class_name = "";
dvander@1847: }
dvander@1847:
dvander@1847: pContext->LocalToString(params[3], &prop);
dvander@1847:
dvander@1847: switch (params[2])
dvander@1847: {
dvander@1847: case Prop_Data:
dvander@1847: {
dvander@1847: typedescription_t *td;
dvander@1847:
dvander@1847: FIND_PROP_DATA(td);
dvander@1847:
dvander@1847: if (td->fieldType != FIELD_VECTOR
dvander@1847: && td->fieldType != FIELD_POSITION_VECTOR)
faluco@694: {
dvander@1847: return pContext->ThrowNativeError("Data field %s is not a vector (%d != [%d,%d])",
dvander@1847: prop,
dvander@1847: td->fieldType,
dvander@1847: FIELD_VECTOR,
dvander@1847: FIELD_POSITION_VECTOR);
dvander@1847: }
dvander@1847:
dvander@1847: offset = td->fieldOffset[TD_OFFSET_NORMAL];
dvander@1847: break;
dvander@1847: }
dvander@1847: case Prop_Send:
dvander@1847: {
dvander@1847: sm_sendprop_info_t info;
dvander@1847:
dvander@1847: FIND_PROP_SEND(&info);
dvander@1847:
dvander@1847: if (info.prop->GetType() != DPT_Vector)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("SendProp %s is not a vector (%d != %d)",
dvander@1847: prop,
dvander@1847: info.prop->GetType(),
dvander@1847: DPT_Vector);
faluco@694: }
dvander@1847:
dvander@1847: offset = info.actual_offset;
dvander@1847: break;
dvander@1847: }
dvander@1847: default:
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Invalid Property type %d", params[2]);
dvander@1847: }
dvander@1847: }
dvander@1847:
dvander@1847: Vector *v = (Vector *)((uint8_t *)pEntity + offset);
dvander@1847:
dvander@1847: cell_t *vec;
dvander@1847: pContext->LocalToPhysAddr(params[4], &vec);
dvander@1847:
dvander@1847: v->x = sp_ctof(vec[0]);
dvander@1847: v->y = sp_ctof(vec[1]);
dvander@1847: v->z = sp_ctof(vec[2]);
dvander@1847:
dvander@1847: if (params[2] == Prop_Send)
dvander@1847: {
dvander@1847: g_HL2.SetEdictStateChanged(pEdict, offset);
dvander@1847: }
dvander@1847:
dvander@1847: return 1;
dvander@1847: }
dvander@1847:
dvander@1847: static cell_t GetEntPropString(IPluginContext *pContext, const cell_t *params)
dvander@1847: {
dvander@1847: CBaseEntity *pEntity;
dvander@1847: char *prop;
dvander@1847: int offset;
dvander@1847: const char *class_name;
dvander@1847: edict_t *pEdict;
dvander@1847:
dvander@1847: pEdict = GetEntity(params[1], &pEntity);
dvander@1847:
dvander@1847: if (!pEdict || !pEntity)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
dvander@1847: }
dvander@1847:
dvander@1847: if ((class_name = pEdict->GetClassName()) == NULL)
dvander@1847: {
dvander@1847: class_name = "";
dvander@1847: }
dvander@1847:
dvander@1847: pContext->LocalToString(params[3], &prop);
dvander@1847:
dvander@1847: switch (params[2])
dvander@1847: {
dvander@1847: case Prop_Data:
dvander@1847: {
dvander@1847: typedescription_t *td;
dvander@1847:
dvander@1847: FIND_PROP_DATA(td);
dvander@1847:
dvander@1847: if (td->fieldType != FIELD_CHARACTER)
faluco@694: {
dvander@1847: return pContext->ThrowNativeError("Data field %s is not a string (%d != %d)",
dvander@1847: prop,
dvander@1847: td->fieldType,
dvander@1847: FIELD_CHARACTER);
faluco@694: }
dvander@1847:
dvander@1847: offset = td->fieldOffset[TD_OFFSET_NORMAL];
dvander@1847: break;
dvander@1847: }
dvander@1847: case Prop_Send:
dvander@1847: {
dvander@1847: sm_sendprop_info_t info;
dvander@1847:
dvander@1847: FIND_PROP_SEND(&info);
dvander@1847:
dvander@1847: if (info.prop->GetType() != DPT_String)
dvander@1847: {
dvander@1847: return pContext->ThrowNativeError("SendProp %s is not a string (%d != %d)",
dvander@1847: prop,
dvander@1847: info.prop->GetType(),
dvander@1847: DPT_String);
dvander@1847: }
dvander@1847:
dvander@1847: offset = info.actual_offset;
dvander@1847: break;
faluco@694: break;
faluco@694: }
faluco@694: default:
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Invalid Property type %d", params[2]);
faluco@694: }
faluco@694: }
faluco@694:
faluco@694: size_t len;
faluco@694: char *src = (char *)((uint8_t *)pEntity + offset);
faluco@694: pContext->StringToLocalUTF8(params[4], params[5], src, &len);
faluco@694:
faluco@694: return len;
faluco@694: }
faluco@694:
faluco@694: static cell_t SetEntPropString(IPluginContext *pContext, const cell_t *params)
faluco@694: {
faluco@694: CBaseEntity *pEntity;
faluco@694: char *prop;
faluco@694: int offset;
faluco@694: int maxlen;
faluco@694: edict_t *pEdict = GetEntity(params[1], &pEntity);
faluco@694:
faluco@694: if (!pEdict || !pEntity)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Entity %d is invalid", params[1]);
faluco@694: }
faluco@694:
faluco@694: switch (params[2])
faluco@694: {
faluco@694: case Prop_Data:
faluco@694: {
faluco@694: datamap_t *pMap;
faluco@694: typedescription_t *td;
faluco@694: if ((pMap=CBaseEntity_GetDataDescMap(pEntity)) == NULL)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Unable to retrieve GetDataDescMap offset");
faluco@694: }
faluco@694: pContext->LocalToString(params[3], &prop);
faluco@694: if ((td=g_HL2.FindInDataMap(pMap, prop)) == NULL)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Property \"%s\" not found for entity %d", prop, params[1]);
faluco@694: }
faluco@694: if (td->fieldType != FIELD_CHARACTER)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Property \"%s\" is not a valid string", prop);
faluco@694: }
faluco@694: offset = td->fieldOffset[TD_OFFSET_NORMAL];
faluco@694: maxlen = td->fieldSize;
faluco@694: break;
faluco@694: }
faluco@694: case Prop_Send:
faluco@694: {
faluco@694: char *prop;
faluco@694: IServerNetworkable *pNet = pEdict->GetNetworkable();
faluco@694: if (!pNet)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("The edict is not networkable");
faluco@694: }
faluco@694: pContext->LocalToString(params[3], &prop);
faluco@694: SendProp *pSend = g_HL2.FindInSendTable(pNet->GetServerClass()->GetName(), prop);
faluco@694: if (!pSend)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Property \"%s\" not found for entity %d", prop, params[1]);
faluco@694: }
faluco@694: if (pSend->GetType() != DPT_String)
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Property \"%s\" is not a valid string", prop);
faluco@694: }
faluco@694: offset = pSend->GetOffset();
faluco@694: maxlen = DT_MAX_STRING_BUFFERSIZE;
faluco@694: break;
faluco@694: }
faluco@694: default:
faluco@694: {
faluco@694: return pContext->ThrowNativeError("Invalid Property type %d", params[2]);
faluco@694: }
faluco@694: }
faluco@694:
faluco@694: char *src;
faluco@694: char *dest = (char *)((uint8_t *)pEntity + offset);
faluco@694:
faluco@694: pContext->LocalToString(params[4], &src);
faluco@694: size_t len = strncopy(dest, src, maxlen);
faluco@694:
dvander@1847: if (params[2] == Prop_Send)
faluco@694: {
faluco@694: g_HL2.SetEdictStateChanged(pEdict, offset);
faluco@694: }
faluco@694:
faluco@694: return len;
faluco@694: }
faluco@694:
dvander@555: REGISTER_NATIVES(entityNatives)
dvander@555: {
dvander@558: {"ChangeEdictState", ChangeEdictState},
dvander@555: {"CreateEdict", CreateEdict},
dvander@1847: {"FindDataMapOffs", FindDataMapOffs},
dvander@1847: {"FindSendPropInfo", FindSendPropInfo},
dvander@561: {"FindSendPropOffs", FindSendPropOffs},
dvander@556: {"GetEdictClassname", GetEdictClassname},
dvander@555: {"GetEdictFlags", GetEdictFlags},
dvander@557: {"GetEntData", GetEntData},
dvander@1847: {"GetEntDataEnt", GetEntDataEnt}, /** DEPRECATED */
dvander@1847: {"GetEntDataEnt2", GetEntDataEnt2},
dvander@557: {"GetEntDataFloat", GetEntDataFloat},
dvander@1847: {"GetEntDataString", GetEntDataString},
dvander@557: {"GetEntDataVector", GetEntDataVector},
dvander@1847: {"GetEntProp", GetEntProp},
dvander@1847: {"GetEntPropEnt", GetEntPropEnt},
dvander@1847: {"GetEntPropFloat", GetEntPropFloat},
dvander@1847: {"GetEntPropString", GetEntPropString},
dvander@1847: {"GetEntPropVector", GetEntPropVector},
dvander@603: {"GetEntityCount", GetEntityCount},
dvander@556: {"GetEntityNetClass", GetEntityNetClass},
dvander@555: {"GetMaxEntities", GetMaxEntities},
dvander@555: {"IsEntNetworkable", IsEntNetworkable},
dvander@555: {"IsValidEdict", IsValidEdict},
dvander@555: {"IsValidEntity", IsValidEntity},
dvander@555: {"RemoveEdict", RemoveEdict},
dvander@555: {"SetEdictFlags", SetEdictFlags},
dvander@557: {"SetEntData", SetEntData},
dvander@1847: {"SetEntDataEnt", SetEntDataEnt}, /** DEPRECATED */
dvander@1847: {"SetEntDataEnt2", SetEntDataEnt2},
dvander@557: {"SetEntDataFloat", SetEntDataFloat},
dvander@557: {"SetEntDataVector", SetEntDataVector},
faluco@694: {"SetEntDataString", SetEntDataString},
dvander@1847: {"SetEntProp", SetEntProp},
dvander@1847: {"SetEntPropEnt", SetEntPropEnt},
dvander@1847: {"SetEntPropFloat", SetEntPropFloat},
faluco@694: {"SetEntPropString", SetEntPropString},
dvander@1847: {"SetEntPropVector", SetEntPropVector},
faluco@588: {NULL, NULL}
dvander@555: };