mirror of
https://github.com/Mauler125/r5sdk.git
synced 2025-02-09 19:15:03 +01:00
SquirrelVM refactor
The game uses 2 types, CSquirrelVM (mostly exposed to the VScript API of the engine) and HSQUIRRELVM (mostly used for internal squirrel functions like sq_pushbool etc..). This refactor properly splits the CSquirrelVM* functions from the HSQUIRRELVM (SQVM*) ones. The functions have also been renamed accordingly and the prototypes have been adjusted to use the correct pointer type.
This commit is contained in:
Kawe Mazidjatari
parent
5adaf48d33
commit
e735683940
@ -52,6 +52,7 @@
|
||||
#include "squirrel/sqinit.h"
|
||||
#include "squirrel/sqapi.h"
|
||||
#include "squirrel/sqvm.h"
|
||||
#include "squirrel/sqscript.h"
|
||||
#include "squirrel/sqstdaux.h"
|
||||
#include "studiorender/studiorendercontext.h"
|
||||
#include "rtech/rtech_game.h"
|
||||
@ -187,6 +188,7 @@ void Systems_Init()
|
||||
|
||||
SQAPI_Attach();
|
||||
SQVM_Attach();
|
||||
SQScript_Attach();
|
||||
SQAUX_Attach();
|
||||
|
||||
RTech_Game_Attach();
|
||||
@ -303,6 +305,7 @@ void Systems_Shutdown()
|
||||
#endif // !CLIENT_DLL
|
||||
SQAPI_Detach();
|
||||
SQVM_Detach();
|
||||
SQScript_Detach();
|
||||
SQAUX_Detach();
|
||||
|
||||
RTech_Game_Detach();
|
||||
|
||||
293
r5dev/squirrel/sqscript.cpp
Normal file
293
r5dev/squirrel/sqscript.cpp
Normal file
@ -0,0 +1,293 @@
|
||||
//=============================================================================//
|
||||
//
|
||||
// Purpose: Script VM
|
||||
//
|
||||
//=============================================================================//
|
||||
#include "core/stdafx.h"
|
||||
#include "tier1/cvar.h"
|
||||
#include "squirrel/sqapi.h"
|
||||
#include "squirrel/sqinit.h"
|
||||
#include "squirrel/sqscript.h"
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: registers and exposes code functions to target context
|
||||
// Input : *sqvm -
|
||||
// *szName -
|
||||
// *szHelpString -
|
||||
// *szRetValType -
|
||||
// *szArgTypes -
|
||||
// *pFunction -
|
||||
//---------------------------------------------------------------------------------
|
||||
SQRESULT Script_RegisterFunction(CSquirrelVM* pSquirrelVM, const SQChar* szName, const SQChar* szHelpString, const SQChar* szRetValType, const SQChar* szArgTypes, void* pFunction)
|
||||
{
|
||||
ScriptFunctionBinding_t* sqFunc = new ScriptFunctionBinding_t();
|
||||
|
||||
sqFunc->m_szScriptName = szName;
|
||||
sqFunc->m_szNativeName = szName;
|
||||
sqFunc->m_szHelpString = szHelpString;
|
||||
sqFunc->m_szRetValType = szRetValType;
|
||||
sqFunc->m_szArgTypes = szArgTypes;
|
||||
sqFunc->m_pFunction = pFunction;
|
||||
|
||||
return v_Script_RegisterFunction(pSquirrelVM, sqFunc, 1);
|
||||
}
|
||||
|
||||
#ifndef CLIENT_DLL
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: registers script functions in SERVER context
|
||||
// Input : *sqvm -
|
||||
//---------------------------------------------------------------------------------
|
||||
void Script_RegisterServerFunctions(CSquirrelVM* pSquirrelVM)
|
||||
{
|
||||
Script_RegisterFunction(pSquirrelVM, "SDKNativeTest", "Native SERVER test function", "void", "", &VSquirrel::SHARED::SDKNativeTest);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetSDKVersion", "Gets the SDK version as a string", "string", "", &VSquirrel::SHARED::GetSDKVersion);
|
||||
|
||||
Script_RegisterFunction(pSquirrelVM, "GetNumHumanPlayers", "Gets the number of human players on the server", "int", "", &VSquirrel::SERVER::GetNumHumanPlayers);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetNumFakeClients", "Gets the number of bot players on the server", "int", "", &VSquirrel::SERVER::GetNumFakeClients);
|
||||
|
||||
Script_RegisterFunction(pSquirrelVM, "GetAvailableMaps", "Gets an array of all available maps", "array<string>", "", &VSquirrel::SHARED::GetAvailableMaps);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetAvailablePlaylists", "Gets an array of all available playlists", "array<string>", "", &VSquirrel::SHARED::GetAvailablePlaylists);
|
||||
|
||||
Script_RegisterFunction(pSquirrelVM, "ShutdownHostGame", "Shuts down the local host game", "void", "", &VSquirrel::SHARED::ShutdownHostGame);
|
||||
}
|
||||
#endif // !CLIENT_DLL
|
||||
|
||||
#ifndef DEDICATED
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: registers script functions in CLIENT context
|
||||
// Input : *sqvm -
|
||||
//---------------------------------------------------------------------------------
|
||||
void Script_RegisterClientFunctions(CSquirrelVM* pSquirrelVM)
|
||||
{
|
||||
Script_RegisterFunction(pSquirrelVM, "SDKNativeTest", "Native CLIENT test function", "void", "", &VSquirrel::SHARED::SDKNativeTest);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetSDKVersion", "Gets the SDK version as a string", "string", "", &VSquirrel::SHARED::GetSDKVersion);
|
||||
|
||||
Script_RegisterFunction(pSquirrelVM, "GetAvailableMaps", "Gets an array of all available maps", "array<string>", "", &VSquirrel::SHARED::GetAvailableMaps);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetAvailablePlaylists", "Gets an array of all available playlists", "array<string>", "", &VSquirrel::SHARED::GetAvailablePlaylists);
|
||||
|
||||
Script_RegisterFunction(pSquirrelVM, "ShutdownHostGame", "Shuts down the local host game", "void", "", &VSquirrel::SHARED::ShutdownHostGame);
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: registers script functions in UI context
|
||||
// Input : *sqvm -
|
||||
//---------------------------------------------------------------------------------
|
||||
void Script_RegisterUIFunctions(CSquirrelVM* pSquirrelVM)
|
||||
{
|
||||
Script_RegisterFunction(pSquirrelVM, "SDKNativeTest", "Native UI test function", "void", "", &VSquirrel::SHARED::SDKNativeTest);
|
||||
|
||||
// Functions for retrieving server browser data
|
||||
Script_RegisterFunction(pSquirrelVM, "GetServerName", "Gets the name of the server at the specified index of the server list", "string", "int", &VSquirrel::UI::GetServerName);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetServerPlaylist", "Gets the playlist of the server at the specified index of the server list", "string", "int", &VSquirrel::UI::GetServerPlaylist);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetServerMap", "Gets the map of the server at the specified index of the server list", "string", "int", &VSquirrel::UI::GetServerMap);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetServerCount", "Gets the number of public servers", "int", "", &VSquirrel::UI::GetServerCount);
|
||||
|
||||
// Misc main menu functions
|
||||
Script_RegisterFunction(pSquirrelVM, "GetSDKVersion", "Gets the SDK version as a string", "string", "", &VSquirrel::SHARED::GetSDKVersion);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetPromoData", "Gets promo data for specified slot type", "string", "int", &VSquirrel::UI::GetPromoData);
|
||||
|
||||
// Functions for connecting to servers
|
||||
Script_RegisterFunction(pSquirrelVM, "CreateServer", "Start server with the specified settings", "void", "string,string,string,int", &VSquirrel::UI::CreateServerFromMenu);
|
||||
Script_RegisterFunction(pSquirrelVM, "SetEncKeyAndConnect", "Set the encryption key to that of the specified server and connects to it", "void", "int", &VSquirrel::UI::SetEncKeyAndConnect);
|
||||
Script_RegisterFunction(pSquirrelVM, "JoinPrivateServerFromMenu", "Joins private server by token", "void", "string", &VSquirrel::UI::JoinPrivateServerFromMenu);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetPrivateServerMessage", "Gets private server join status message", "string", "string", &VSquirrel::UI::GetPrivateServerMessage);
|
||||
Script_RegisterFunction(pSquirrelVM, "ConnectToIPFromMenu", "Joins server by ip address and encryption key", "void", "string,string", &VSquirrel::UI::ConnectToIPFromMenu);
|
||||
|
||||
Script_RegisterFunction(pSquirrelVM, "GetAvailableMaps", "Gets an array of all available maps", "array<string>", "", &VSquirrel::SHARED::GetAvailableMaps);
|
||||
Script_RegisterFunction(pSquirrelVM, "GetAvailablePlaylists", "Gets an array of all available playlists", "array<string>", "", &VSquirrel::SHARED::GetAvailablePlaylists);
|
||||
|
||||
Script_RegisterFunction(pSquirrelVM, "ShutdownHostGame", "Shuts down the local host game", "void", "", &VSquirrel::SHARED::ShutdownHostGame);
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Initialize all CLIENT/UI global structs and register SDK (CLIENT/UI) script functions
|
||||
// Input : *sqvm -
|
||||
// context - (1 = CLIENT 2 = UI)
|
||||
//---------------------------------------------------------------------------------
|
||||
SQRESULT Script_InitializeCLGlobalStructs(CSquirrelVM* pSquirrelVM, SQCONTEXT context)
|
||||
{
|
||||
SQRESULT results = v_Script_InitializeCLGlobalStructs(pSquirrelVM, context);
|
||||
if (context == SQCONTEXT::CLIENT)
|
||||
Script_RegisterClientFunctions(g_pClientVM.GetValue<CSquirrelVM*>());
|
||||
if (context == SQCONTEXT::UI)
|
||||
Script_RegisterUIFunctions(g_pUIVM.GetValue<CSquirrelVM*>());
|
||||
return results;
|
||||
}
|
||||
#endif // !DEDICATED
|
||||
|
||||
#ifndef CLIENT_DLL
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Initialize all SERVER global structs and register SDK (SERVER) script functions
|
||||
// Input : *sqvm -
|
||||
//---------------------------------------------------------------------------------
|
||||
void Script_InitializeSVGlobalStructs(CSquirrelVM* pSquirrelVM)
|
||||
{
|
||||
v_Script_InitializeSVGlobalStructs(pSquirrelVM);
|
||||
Script_RegisterServerFunctions(g_pServerVM.GetValue<CSquirrelVM*>());
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Creates the SERVER Squirrel VM
|
||||
// Output : True on success, false on failure
|
||||
//---------------------------------------------------------------------------------
|
||||
SQBool Script_CreateServerVM()
|
||||
{
|
||||
SQBool results = v_Script_CreateServerVM();
|
||||
if (results)
|
||||
DevMsg(eDLL_T::SERVER, "Created SERVER VM: '%p'\n", g_pServerVM.GetValue<CSquirrelVM*>());
|
||||
else
|
||||
Error(eDLL_T::SERVER, "Failed to create SERVER VM\n");
|
||||
return results;
|
||||
}
|
||||
#endif // !CLIENT_DLL
|
||||
|
||||
#ifndef DEDICATED
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Creates the CLIENT Squirrel VM
|
||||
// Input : *chlclient -
|
||||
// Output : True on success, false on failure
|
||||
//---------------------------------------------------------------------------------
|
||||
SQBool Script_CreateClientVM(CHLClient* hlclient)
|
||||
{
|
||||
SQBool results = v_Script_CreateClientVM(hlclient);
|
||||
if (results)
|
||||
DevMsg(eDLL_T::CLIENT, "Created CLIENT VM: '%p'\n", g_pClientVM.GetValue<CSquirrelVM*>());
|
||||
else
|
||||
Error(eDLL_T::CLIENT, "Failed to create CLIENT VM\n");
|
||||
return results;
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Creates the UI Squirrel VM
|
||||
// Output : True on success, false on failure
|
||||
//---------------------------------------------------------------------------------
|
||||
SQBool Script_CreateUIVM()
|
||||
{
|
||||
SQBool results = v_Script_CreateUIVM();
|
||||
if (results)
|
||||
DevMsg(eDLL_T::UI, "Created UI VM: '%p'\n", g_pUIVM.GetValue<CSquirrelVM*>());
|
||||
else
|
||||
Error(eDLL_T::UI, "Failed to create UI VM\n");
|
||||
return results;
|
||||
}
|
||||
#endif // !DEDICATED
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Returns the script VM pointer by context
|
||||
// Input : context -
|
||||
// Output : SQVM*
|
||||
//---------------------------------------------------------------------------------
|
||||
CSquirrelVM* Script_GetContextObject(SQCONTEXT context)
|
||||
{
|
||||
switch (context)
|
||||
{
|
||||
#ifndef CLIENT_DLL
|
||||
case SQCONTEXT::SERVER:
|
||||
return g_pServerVM.GetValue<CSquirrelVM*>();
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
case SQCONTEXT::CLIENT:
|
||||
return g_pClientVM.GetValue<CSquirrelVM*>();
|
||||
case SQCONTEXT::UI:
|
||||
return g_pUIVM.GetValue<CSquirrelVM*>();
|
||||
#endif // !DEDICATED
|
||||
default:
|
||||
return nullptr;
|
||||
}
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: prints the global include file the compiler loads for loading scripts
|
||||
// Input : *szRsonName -
|
||||
//---------------------------------------------------------------------------------
|
||||
SQInteger Script_LoadRson(const SQChar* szRsonName)
|
||||
{
|
||||
if (sq_showrsonloading->GetBool())
|
||||
{
|
||||
DevMsg(eDLL_T::ENGINE, "\n");
|
||||
DevMsg(eDLL_T::ENGINE, "______________________________________________________________\n");
|
||||
DevMsg(eDLL_T::ENGINE, "] RSON_SQVM --------------------------------------------------\n");
|
||||
DevMsg(eDLL_T::ENGINE, "] PATH: '%s'\n", szRsonName);
|
||||
DevMsg(eDLL_T::ENGINE, "--------------------------------------------------------------\n");
|
||||
DevMsg(eDLL_T::ENGINE, "\n");
|
||||
}
|
||||
return v_Script_LoadRson(szRsonName);
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: prints the scripts the compiler loads from global include to be compiled
|
||||
// Input : *sqvm -
|
||||
// *szScriptPath -
|
||||
// *szScriptName -
|
||||
// nFlag -
|
||||
//---------------------------------------------------------------------------------
|
||||
SQBool Script_LoadScript(HSQUIRRELVM v, const SQChar* szScriptPath, const SQChar* szScriptName, SQInteger nFlag)
|
||||
{
|
||||
if (sq_showscriptloading->GetBool())
|
||||
{
|
||||
DevMsg(eDLL_T::ENGINE, "Loading SQVM Script '%s'\n", szScriptName);
|
||||
}
|
||||
|
||||
///////////////////////////////////////////////////////////////////////////////
|
||||
return v_Script_LoadScript(v, szScriptPath, szScriptName, nFlag);
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Compiles and executes input code on target VM by context
|
||||
// Input : *code -
|
||||
// context -
|
||||
//---------------------------------------------------------------------------------
|
||||
void Script_Execute(const SQChar* code, SQCONTEXT context)
|
||||
{
|
||||
HSQUIRRELVM v = Script_GetContextObject(context)->GetVM();
|
||||
if (!v)
|
||||
{
|
||||
Error(eDLL_T::ENGINE, "Attempted to run %s script while VM isn't initialized\n", SQVM_GetContextName(context));
|
||||
return;
|
||||
}
|
||||
|
||||
SQRESULT compileResult{};
|
||||
SQBufState bufState = SQBufState(code);
|
||||
|
||||
compileResult = sq_compilebuffer(v, &bufState, "console", -1);
|
||||
if (compileResult >= 0)
|
||||
{
|
||||
sq_pushroottable(v);
|
||||
SQRESULT callResult = sq_call(v, 1, false, false);
|
||||
}
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
void SQScript_Attach()
|
||||
{
|
||||
#ifndef DEDICATED
|
||||
DetourAttach((LPVOID*)&v_Script_InitializeCLGlobalStructs, &Script_InitializeCLGlobalStructs);
|
||||
#endif // !DEDICATED
|
||||
#ifndef CLIENT_DLL
|
||||
DetourAttach((LPVOID*)&v_Script_InitializeSVGlobalStructs, &Script_InitializeSVGlobalStructs);
|
||||
DetourAttach((LPVOID*)&v_Script_CreateServerVM, &Script_CreateServerVM);
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
DetourAttach((LPVOID*)&v_Script_CreateClientVM, &Script_CreateClientVM);
|
||||
DetourAttach((LPVOID*)&v_Script_CreateUIVM, &Script_CreateUIVM);
|
||||
#endif // !DEDICATED
|
||||
DetourAttach((LPVOID*)&v_Script_LoadRson, &Script_LoadRson);
|
||||
DetourAttach((LPVOID*)&v_Script_LoadScript, &Script_LoadScript);
|
||||
}
|
||||
//---------------------------------------------------------------------------------
|
||||
void SQScript_Detach()
|
||||
{
|
||||
#ifndef DEDICATED
|
||||
DetourDetach((LPVOID*)&v_Script_InitializeCLGlobalStructs, &Script_InitializeCLGlobalStructs);
|
||||
#endif // !DEDICATED
|
||||
#ifndef CLIENT_DLL
|
||||
DetourDetach((LPVOID*)&v_Script_InitializeSVGlobalStructs, &Script_InitializeSVGlobalStructs);
|
||||
DetourDetach((LPVOID*)&v_Script_CreateServerVM, &Script_CreateServerVM);
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
DetourDetach((LPVOID*)&v_Script_CreateClientVM, &Script_CreateClientVM);
|
||||
DetourDetach((LPVOID*)&v_Script_CreateUIVM, &Script_CreateUIVM);
|
||||
#endif // !DEDICATED
|
||||
DetourDetach((LPVOID*)&v_Script_LoadRson, &Script_LoadRson);
|
||||
DetourDetach((LPVOID*)&v_Script_LoadScript, &Script_LoadScript);
|
||||
}
|
||||
216
r5dev/squirrel/sqscript.h
Normal file
216
r5dev/squirrel/sqscript.h
Normal file
@ -0,0 +1,216 @@
|
||||
#pragma once
|
||||
#include "squirrel/sqtype.h"
|
||||
#include "squirrel/sqvm.h"
|
||||
|
||||
struct ScriptFunctionBinding_t
|
||||
{
|
||||
const SQChar* m_szScriptName; // 00
|
||||
const SQChar* m_szNativeName; // 08
|
||||
const SQChar* m_szHelpString; // 10
|
||||
const SQChar* m_szRetValType; // 18
|
||||
const SQChar* m_szArgTypes; // 20
|
||||
std::int16_t unk28; // 28
|
||||
std::int16_t padding1; // 2A
|
||||
std::int32_t unk2c; // 2C
|
||||
std::int64_t unk30; // 30
|
||||
std::int32_t unk38; // 38
|
||||
std::int32_t padding2; // 3C
|
||||
std::int64_t unk40; // 40
|
||||
std::int64_t unk48; // 48
|
||||
std::int64_t unk50; // 50
|
||||
std::int32_t unk58; // 58
|
||||
std::int32_t padding3; // 5C
|
||||
void* m_pFunction; // 60
|
||||
|
||||
ScriptFunctionBinding_t()
|
||||
{
|
||||
memset(this, '\0', sizeof(ScriptFunctionBinding_t));
|
||||
this->padding2 = 6;
|
||||
}
|
||||
};
|
||||
|
||||
#pragma pack(push, 4)
|
||||
class CSquirrelVM
|
||||
{
|
||||
public:
|
||||
HSQUIRRELVM GetVM() const
|
||||
{
|
||||
return m_sqVM;
|
||||
}
|
||||
|
||||
private:
|
||||
SQChar pad0[0x8];
|
||||
HSQUIRRELVM m_sqVM;
|
||||
SQChar pad1[0x8];
|
||||
SQInteger m_nFlags;
|
||||
SQChar pad2[4];
|
||||
SQChar pad3[16];
|
||||
#if !defined (GAMEDLL_S0) && !defined (GAMEDLL_S1)
|
||||
SQChar pad4[4];
|
||||
#endif
|
||||
SQInteger m_nTick;
|
||||
SQChar pad5[4];
|
||||
SQCONTEXT m_iContext;
|
||||
#if !defined (GAMEDLL_S2) && !defined (GAMEDLL_S3)
|
||||
SQChar pad6[4];
|
||||
#endif
|
||||
void* m_pCompareFunc;
|
||||
};
|
||||
#pragma pack(pop)
|
||||
|
||||
inline CMemory p_Script_RegisterFunction;
|
||||
inline auto v_Script_RegisterFunction = p_Script_RegisterFunction.RCast<SQRESULT(*)(CSquirrelVM* pSquirrelVM, ScriptFunctionBinding_t* sqFunc, SQInteger a1)>();
|
||||
#if !defined (CLIENT_DLL)
|
||||
inline CMemory p_Script_InitializeSVGlobalStructs;
|
||||
inline auto v_Script_InitializeSVGlobalStructs = p_Script_InitializeSVGlobalStructs.RCast<SQRESULT(*)(CSquirrelVM* pSquirrelVM)>();
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
inline CMemory p_Script_InitializeCLGlobalStructs;
|
||||
inline auto v_Script_InitializeCLGlobalStructs = p_Script_InitializeCLGlobalStructs.RCast<SQRESULT(*)(CSquirrelVM* pSquirrelVM, SQCONTEXT context)>();
|
||||
#endif // !DEDICATED
|
||||
#if !defined (CLIENT_DLL) && defined (GAMEDLL_S0) || defined (GAMEDLL_S1)
|
||||
inline CMemory p_Script_CreateServerVM;
|
||||
inline auto v_Script_CreateServerVM = p_Script_CreateServerVM.RCast<SQBool(*)(void)>();
|
||||
#elif !defined (CLIENT_DLL) && defined (GAMEDLL_S3) || defined (GAMEDLL_S2)
|
||||
inline CMemory p_Script_CreateServerVM;
|
||||
inline auto v_Script_CreateServerVM = p_Script_CreateServerVM.RCast<SQBool(*)(void)>();
|
||||
#endif
|
||||
#if !defined (DEDICATED) && defined (GAMEDLL_S0) || defined (GAMEDLL_S1) || defined (GAMEDLL_S2)
|
||||
inline CMemory p_Script_CreateClientVM;
|
||||
inline auto v_Script_CreateClientVM = p_Script_CreateClientVM.RCast<SQBool(*)(CHLClient* pClient)>();
|
||||
#elif !defined (DEDICATED) && defined (GAMEDLL_S3)
|
||||
inline CMemory p_Script_CreateClientVM;
|
||||
inline auto v_Script_CreateClientVM = p_Script_CreateClientVM.RCast<SQBool(*)(CHLClient* pClient)>();
|
||||
#endif
|
||||
#if !defined (DEDICATED)
|
||||
inline CMemory p_Script_CreateUIVM;
|
||||
inline auto v_Script_CreateUIVM = p_Script_CreateUIVM.RCast<SQBool(*)(void)>();
|
||||
#endif // !DEDICATED
|
||||
inline CMemory p_Script_LoadRson;
|
||||
inline auto v_Script_LoadRson = p_Script_LoadRson.RCast<SQInteger(*)(const SQChar* szRsonName)>();
|
||||
|
||||
inline CMemory p_Script_LoadScript;
|
||||
inline auto v_Script_LoadScript = p_Script_LoadScript.RCast<SQBool(*)(HSQUIRRELVM v, const SQChar* szScriptPath, const SQChar* szScriptName, SQInteger nFlag)>();
|
||||
|
||||
#if !defined (CLIENT_DLL)
|
||||
inline CMemory g_pServerVM;
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
inline CMemory g_pClientVM;
|
||||
inline CMemory g_pUIVM;
|
||||
#endif // !DEDICATED
|
||||
|
||||
SQRESULT Script_RegisterFunction(CSquirrelVM* pSquirrelVM, const SQChar* szName, const SQChar* szHelpString, const SQChar* szRetValType, const SQChar* szArgTypes, void* pFunction);
|
||||
void Script_RegisterServerFunctions(CSquirrelVM* pSquirrelVM);
|
||||
void Script_RegisterClientFunctions(CSquirrelVM* pSquirrelVM);
|
||||
void Script_RegisterUIFunctions(CSquirrelVM* pSquirrelVM);
|
||||
|
||||
SQRESULT Script_InitializeCLGlobalStructs(CSquirrelVM*, SQCONTEXT context);
|
||||
void Script_InitializeSVGlobalStructs(CSquirrelVM* pSquirrelVM);
|
||||
|
||||
SQBool Script_CreateServerVM();
|
||||
#ifndef DEDICATED
|
||||
SQBool Script_CreateClientVM(CHLClient* hlclient);
|
||||
#endif // !DEDICATED
|
||||
SQBool Script_CreateUIVM();
|
||||
CSquirrelVM* Script_GetContextObject(SQCONTEXT context);
|
||||
|
||||
SQInteger Script_LoadRson(const SQChar* szRsonName);
|
||||
SQBool Script_LoadScript(HSQUIRRELVM v, const SQChar* szScriptPath, const SQChar* szScriptName, SQInteger nFlag);
|
||||
|
||||
void Script_Execute(const SQChar* code, SQCONTEXT context);
|
||||
|
||||
void SQScript_Attach();
|
||||
void SQScript_Detach();
|
||||
///////////////////////////////////////////////////////////////////////////////
|
||||
class VSquirrelVM : public IDetour
|
||||
{
|
||||
virtual void GetAdr(void) const
|
||||
{
|
||||
spdlog::debug("| FUN: Script_RegisterFunc : {:#18x} |\n", p_Script_RegisterFunction.GetPtr());
|
||||
#ifndef CLIENT_DLL
|
||||
spdlog::debug("| FUN: Script_InitializeSVGlobalStructs : {:#18x} |\n", p_Script_InitializeSVGlobalStructs.GetPtr());
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
spdlog::debug("| FUN: Script_InitializeCLGlobalStructs : {:#18x} |\n", p_Script_InitializeCLGlobalStructs.GetPtr());
|
||||
#endif // !DEDICATED
|
||||
#ifndef CLIENT_DLL
|
||||
spdlog::debug("| FUN: Script_CreateServerVM : {:#18x} |\n", p_Script_CreateServerVM.GetPtr());
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
spdlog::debug("| FUN: Script_CreateClientVM : {:#18x} |\n", p_Script_CreateClientVM.GetPtr());
|
||||
spdlog::debug("| FUN: Script_CreateUIVM : {:#18x} |\n", p_Script_CreateUIVM.GetPtr());
|
||||
#endif // !DEDICATED
|
||||
spdlog::debug("| FUN: Script_LoadRson : {:#18x} |\n", p_Script_LoadRson.GetPtr());
|
||||
spdlog::debug("| FUN: Script_LoadScript : {:#18x} |\n", p_Script_LoadScript.GetPtr());
|
||||
#ifndef CLIENT_DLL
|
||||
spdlog::debug("| VAR: g_pServerVM : {:#18x} |\n", g_pServerVM.GetPtr());
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
spdlog::debug("| VAR: g_pClientVM : {:#18x} |\n", g_pClientVM.GetPtr());
|
||||
spdlog::debug("| VAR: g_pUIVM : {:#18x} |\n", g_pUIVM.GetPtr());
|
||||
#endif // !DEDICATED
|
||||
spdlog::debug("+----------------------------------------------------------------+\n");
|
||||
}
|
||||
virtual void GetFun(void) const
|
||||
{
|
||||
p_Script_RegisterFunction = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x83\xEC\x38\x45\x0F\xB6\xC8"), "xxxxxxxx");
|
||||
#if !defined (CLIENT_DLL)
|
||||
p_Script_InitializeSVGlobalStructs = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x89\x74\x24\x00\x57\x48\x83\xEC\x30\x48\x8B\x3D\x00\x00\x00\x00\x48\x8B\xF1"), "xxxx?xxxxxxxx????xxx");
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
p_Script_InitializeCLGlobalStructs = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x89\x74\x24\x00\x48\x89\x7C\x24\x00\x41\x56\x48\x83\xEC\x30\x48\x63\xC2\x48\x8D\x3D\x00\x00\x00\x00"), "xxxx?xxxx?xxxxxxxxxxxx????");
|
||||
#endif // !DEDICATED
|
||||
#if !defined (CLIENT_DLL) && defined (GAMEDLL_S0) || defined (GAMEDLL_S1)
|
||||
p_SQVM_CreateServerVM = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x40\x53\x48\x83\xEC\x50\x48\x8D\x0D\x00\x00\x00\x00"), "xxxxxxxxx????");
|
||||
#elif !defined (CLIENT_DLL) && defined (GAMEDLL_S3) || defined (GAMEDLL_S2)
|
||||
p_Script_CreateServerVM = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x40\x53\x56\x48\x83\xEC\x48\x48\x8D\x0D\x00\x00\x00\x00"), "xxxxxxxxxx????");
|
||||
#endif
|
||||
#if !defined (DEDICATED) && defined (GAMEDLL_S0) || defined (GAMEDLL_S1) || defined (GAMEDLL_S2)
|
||||
p_SQVM_CreateClientVM = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x83\xEC\x58\x48\x83\x3D\x00\x00\x00\x00\x00\x74\x05"), "xxxxxxx?????xx");
|
||||
#elif !defined (DEDICATED) && defined (GAMEDLL_S3)
|
||||
p_Script_CreateClientVM = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x40\x53\x41\x57\x48\x83\xEC\x68\x48\x83\x3D\x00\x00\x00\x00\x00"), "xxxxxxxxxxx?????");
|
||||
#endif
|
||||
#if !defined (DEDICATED)
|
||||
p_Script_CreateUIVM = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x40\x53\x48\x83\xEC\x20\x48\x8B\x1D\x00\x00\x00\x00\xC6\x05\x00\x00\x00\x00\x00"), "xxxxxxxxx????xx?????");
|
||||
#endif // !DEDICATED
|
||||
p_Script_LoadRson = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x4C\x8B\xDC\x49\x89\x5B\x08\x57\x48\x81\xEC\xA0\x00\x00\x00\x33"), "xxxxxxxxxxxxxxxx");
|
||||
#if defined (GAMEDLL_S0) || defined (GAMEDLL_S1)
|
||||
p_SQVM_LoadScript = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x89\x5C\x24\x10\x48\x89\x74\x24\x18\x48\x89\x7C\x24\x20\x48\x89\x4C\x24\x08\x55\x41\x54\x41\x55\x41\x56\x41\x57\x48\x8D\x6C"), "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx");
|
||||
#elif defined (GAMEDLL_S2) || defined (GAMEDLL_S3)
|
||||
p_Script_LoadScript = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x8B\xC4\x48\x89\x48\x08\x55\x41\x56\x48\x8D\x68"), "xxxxxxxxxxxxx");
|
||||
#endif
|
||||
v_Script_RegisterFunction = p_Script_RegisterFunction.RCast<SQRESULT(*)(CSquirrelVM*, ScriptFunctionBinding_t*, SQInteger)>(); /*48 83 EC 38 45 0F B6 C8*/
|
||||
#if !defined (CLIENT_DLL)
|
||||
v_Script_InitializeSVGlobalStructs = p_Script_InitializeSVGlobalStructs.RCast<SQRESULT(*)(CSquirrelVM*)>(); /*48 89 74 24 ?? 57 48 83 EC 30 48 8B 3D ?? ?? ?? ?? 48 8B F1*/
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
v_Script_InitializeCLGlobalStructs = p_Script_InitializeCLGlobalStructs.RCast<SQRESULT(*)(CSquirrelVM*, SQCONTEXT)>(); /*48 89 74 24 ?? 48 89 7C 24 ?? 41 56 48 83 EC 30 48 63 C2 48 8D 3D ?? ?? ?? ??*/
|
||||
#endif // !DEDICATED
|
||||
#if !defined (CLIENT_DLL)
|
||||
v_Script_CreateServerVM = p_Script_CreateServerVM.RCast<SQBool(*)(void)>(); /*40 53 56 48 83 EC 48 48 8D 0D ?? ?? ?? ??*/
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
v_Script_CreateClientVM = p_Script_CreateClientVM.RCast<SQBool(*)(CHLClient*)>(); /*40 53 41 57 48 83 EC 68 48 83 3D ?? ?? ?? ?? ??*/
|
||||
v_Script_CreateUIVM = p_Script_CreateUIVM.RCast<SQBool(*)(void)>(); /*40 53 48 83 EC 20 48 8B 1D ?? ?? ?? ?? C6 05 ?? ?? ?? ?? ??*/
|
||||
#endif // !DEDICATED
|
||||
v_Script_LoadRson = p_Script_LoadRson.RCast<SQInteger(*)(const SQChar*)>(); /*4C 8B DC 49 89 5B 08 57 48 81 EC A0 00 00 00 33*/
|
||||
v_Script_LoadScript = p_Script_LoadScript.RCast<SQBool(*)(HSQUIRRELVM, const SQChar*, const SQChar*, SQInteger)>(); /*48 8B C4 48 89 48 08 55 41 56 48 8D 68*/
|
||||
}
|
||||
virtual void GetVar(void) const
|
||||
{
|
||||
#if !defined (CLIENT_DLL)
|
||||
g_pServerVM = p_Script_CreateServerVM.FindPatternSelf("48 89 1D", CMemory::Direction::DOWN, 150).ResolveRelativeAddressSelf(0x3, 0x7);
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
g_pClientVM = p_Script_CreateClientVM.FindPatternSelf("48 83 3D", CMemory::Direction::DOWN, 150).ResolveRelativeAddressSelf(0x3, 0x8);
|
||||
g_pUIVM = p_Script_CreateUIVM.FindPatternSelf("48 8B 1D", CMemory::Direction::DOWN, 150).ResolveRelativeAddressSelf(0x3, 0x7);
|
||||
#endif // !DEDICATED
|
||||
}
|
||||
virtual void GetCon(void) const { }
|
||||
virtual void Attach(void) const { }
|
||||
virtual void Detach(void) const { }
|
||||
};
|
||||
///////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
REGISTER(VSquirrelVM);
|
||||
@ -270,205 +270,6 @@ void SQVM_CompileError(HSQUIRRELVM v, const SQChar* pszError, const SQChar* pszF
|
||||
Error(static_cast<eDLL_T>(context), "%s line [%d] column [%d]\n", pszFile, nLine, nColumn);
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: prints the global include file the compiler loads for loading scripts
|
||||
// Input : *szRsonName -
|
||||
//---------------------------------------------------------------------------------
|
||||
SQInteger SQVM_LoadRson(const SQChar* szRsonName)
|
||||
{
|
||||
if (sq_showrsonloading->GetBool())
|
||||
{
|
||||
DevMsg(eDLL_T::ENGINE, "\n");
|
||||
DevMsg(eDLL_T::ENGINE, "______________________________________________________________\n");
|
||||
DevMsg(eDLL_T::ENGINE, "] RSON_SQVM --------------------------------------------------\n");
|
||||
DevMsg(eDLL_T::ENGINE, "] PATH: '%s'\n", szRsonName);
|
||||
DevMsg(eDLL_T::ENGINE, "--------------------------------------------------------------\n");
|
||||
DevMsg(eDLL_T::ENGINE, "\n");
|
||||
}
|
||||
return v_SQVM_LoadRson(szRsonName);
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: prints the scripts the compiler loads from global include to be compiled
|
||||
// Input : *sqvm -
|
||||
// *szScriptPath -
|
||||
// *szScriptName -
|
||||
// nFlag -
|
||||
//---------------------------------------------------------------------------------
|
||||
SQBool SQVM_LoadScript(HSQUIRRELVM v, const SQChar* szScriptPath, const SQChar* szScriptName, SQInteger nFlag)
|
||||
{
|
||||
if (sq_showscriptloading->GetBool())
|
||||
{
|
||||
DevMsg(eDLL_T::ENGINE, "Loading SQVM Script '%s'\n", szScriptName);
|
||||
}
|
||||
|
||||
///////////////////////////////////////////////////////////////////////////////
|
||||
return v_SQVM_LoadScript(v, szScriptPath, szScriptName, nFlag);
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: registers and exposes code functions to target context
|
||||
// Input : *sqvm -
|
||||
// *szName -
|
||||
// *szHelpString -
|
||||
// *szRetValType -
|
||||
// *szArgTypes -
|
||||
// *pFunction -
|
||||
//---------------------------------------------------------------------------------
|
||||
SQRESULT SQVM_RegisterFunction(HSQUIRRELVM v, const SQChar* szName, const SQChar* szHelpString, const SQChar* szRetValType, const SQChar* szArgTypes, void* pFunction)
|
||||
{
|
||||
ScriptFunctionBinding_t* sqFunc = new ScriptFunctionBinding_t();
|
||||
|
||||
sqFunc->m_szScriptName = szName;
|
||||
sqFunc->m_szNativeName = szName;
|
||||
sqFunc->m_szHelpString = szHelpString;
|
||||
sqFunc->m_szRetValType = szRetValType;
|
||||
sqFunc->m_szArgTypes = szArgTypes;
|
||||
sqFunc->m_pFunction = pFunction;
|
||||
|
||||
return v_SQVM_RegisterFunc(v, sqFunc, 1);
|
||||
}
|
||||
|
||||
#ifndef CLIENT_DLL
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: registers script functions in SERVER context
|
||||
// Input : *sqvm -
|
||||
//---------------------------------------------------------------------------------
|
||||
void SQVM_RegisterServerScriptFunctions(HSQUIRRELVM v)
|
||||
{
|
||||
SQVM_RegisterFunction(v, "SDKNativeTest", "Native SERVER test function", "void", "", &VSquirrel::SHARED::SDKNativeTest);
|
||||
SQVM_RegisterFunction(v, "GetSDKVersion", "Gets the SDK version as a string", "string", "", &VSquirrel::SHARED::GetSDKVersion);
|
||||
|
||||
SQVM_RegisterFunction(v, "GetNumHumanPlayers", "Gets the number of human players on the server", "int", "", &VSquirrel::SERVER::GetNumHumanPlayers);
|
||||
SQVM_RegisterFunction(v, "GetNumFakeClients", "Gets the number of bot players on the server", "int", "", &VSquirrel::SERVER::GetNumFakeClients);
|
||||
|
||||
SQVM_RegisterFunction(v, "GetAvailableMaps", "Gets an array of all available maps", "array<string>", "", &VSquirrel::SHARED::GetAvailableMaps);
|
||||
SQVM_RegisterFunction(v, "GetAvailablePlaylists", "Gets an array of all available playlists", "array<string>", "", &VSquirrel::SHARED::GetAvailablePlaylists);
|
||||
|
||||
SQVM_RegisterFunction(v, "ShutdownHostGame", "Shuts down the local host game", "void", "", &VSquirrel::SHARED::ShutdownHostGame);
|
||||
}
|
||||
#endif // !CLIENT_DLL
|
||||
|
||||
#ifndef DEDICATED
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: registers script functions in CLIENT context
|
||||
// Input : *sqvm -
|
||||
//---------------------------------------------------------------------------------
|
||||
void SQVM_RegisterClientScriptFunctions(HSQUIRRELVM v)
|
||||
{
|
||||
SQVM_RegisterFunction(v, "SDKNativeTest", "Native CLIENT test function", "void", "", &VSquirrel::SHARED::SDKNativeTest);
|
||||
SQVM_RegisterFunction(v, "GetSDKVersion", "Gets the SDK version as a string", "string", "", &VSquirrel::SHARED::GetSDKVersion);
|
||||
|
||||
SQVM_RegisterFunction(v, "GetAvailableMaps", "Gets an array of all available maps", "array<string>", "", &VSquirrel::SHARED::GetAvailableMaps);
|
||||
SQVM_RegisterFunction(v, "GetAvailablePlaylists", "Gets an array of all available playlists", "array<string>", "", &VSquirrel::SHARED::GetAvailablePlaylists);
|
||||
|
||||
SQVM_RegisterFunction(v, "ShutdownHostGame", "Shuts down the local host game", "void", "", &VSquirrel::SHARED::ShutdownHostGame);
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: registers script functions in UI context
|
||||
// Input : *sqvm -
|
||||
//---------------------------------------------------------------------------------
|
||||
void SQVM_RegisterUIScriptFunctions(HSQUIRRELVM v)
|
||||
{
|
||||
SQVM_RegisterFunction(v, "SDKNativeTest", "Native UI test function", "void", "", &VSquirrel::SHARED::SDKNativeTest);
|
||||
|
||||
// Functions for retrieving server browser data
|
||||
SQVM_RegisterFunction(v, "GetServerName", "Gets the name of the server at the specified index of the server list", "string", "int", &VSquirrel::UI::GetServerName);
|
||||
SQVM_RegisterFunction(v, "GetServerPlaylist", "Gets the playlist of the server at the specified index of the server list", "string", "int", &VSquirrel::UI::GetServerPlaylist);
|
||||
SQVM_RegisterFunction(v, "GetServerMap", "Gets the map of the server at the specified index of the server list", "string", "int", &VSquirrel::UI::GetServerMap);
|
||||
SQVM_RegisterFunction(v, "GetServerCount", "Gets the number of public servers", "int", "", &VSquirrel::UI::GetServerCount);
|
||||
|
||||
// Misc main menu functions
|
||||
SQVM_RegisterFunction(v, "GetSDKVersion", "Gets the SDK version as a string", "string", "", &VSquirrel::SHARED::GetSDKVersion);
|
||||
SQVM_RegisterFunction(v, "GetPromoData", "Gets promo data for specified slot type", "string", "int", &VSquirrel::UI::GetPromoData);
|
||||
|
||||
// Functions for connecting to servers
|
||||
SQVM_RegisterFunction(v, "CreateServer", "Start server with the specified settings", "void", "string,string,string,int", &VSquirrel::UI::CreateServerFromMenu);
|
||||
SQVM_RegisterFunction(v, "SetEncKeyAndConnect", "Set the encryption key to that of the specified server and connects to it", "void", "int", &VSquirrel::UI::SetEncKeyAndConnect);
|
||||
SQVM_RegisterFunction(v, "JoinPrivateServerFromMenu", "Joins private server by token", "void", "string", &VSquirrel::UI::JoinPrivateServerFromMenu);
|
||||
SQVM_RegisterFunction(v, "GetPrivateServerMessage", "Gets private server join status message", "string", "string", &VSquirrel::UI::GetPrivateServerMessage);
|
||||
SQVM_RegisterFunction(v, "ConnectToIPFromMenu", "Joins server by ip address and encryption key", "void", "string,string", &VSquirrel::UI::ConnectToIPFromMenu);
|
||||
|
||||
SQVM_RegisterFunction(v, "GetAvailableMaps", "Gets an array of all available maps", "array<string>", "", &VSquirrel::SHARED::GetAvailableMaps);
|
||||
SQVM_RegisterFunction(v, "GetAvailablePlaylists", "Gets an array of all available playlists", "array<string>", "", &VSquirrel::SHARED::GetAvailablePlaylists);
|
||||
|
||||
SQVM_RegisterFunction(v, "ShutdownHostGame", "Shuts down the local host game", "void", "", &VSquirrel::SHARED::ShutdownHostGame);
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Initialize all CLIENT/UI global structs and register SDK (CLIENT/UI) script functions
|
||||
// Input : *sqvm -
|
||||
// context - (1 = CLIENT 2 = UI)
|
||||
//---------------------------------------------------------------------------------
|
||||
SQInteger SQVM_InitializeCLGlobalScriptStructs(HSQUIRRELVM v, SQCONTEXT context)
|
||||
{
|
||||
int results = v_SQVM_InitializeCLGlobalScriptStructs(v, context);
|
||||
if (context == SQCONTEXT::CLIENT)
|
||||
SQVM_RegisterClientScriptFunctions(g_pClientVM.GetValue<HSQUIRRELVM>());
|
||||
if (context == SQCONTEXT::UI)
|
||||
SQVM_RegisterUIScriptFunctions(g_pUIVM.GetValue<HSQUIRRELVM>());
|
||||
return results;
|
||||
}
|
||||
#endif // !DEDICATED
|
||||
|
||||
#ifndef CLIENT_DLL
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Initialize all SERVER global structs and register SDK (SERVER) script functions
|
||||
// Input : *sqvm -
|
||||
//---------------------------------------------------------------------------------
|
||||
void SQVM_InitializeSVGlobalScriptStructs(HSQUIRRELVM v)
|
||||
{
|
||||
v_SQVM_InitializeSVGlobalScriptStructs(v);
|
||||
SQVM_RegisterServerScriptFunctions(g_pServerVM.GetValue<HSQUIRRELVM>());
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Creates the SERVER Squirrel VM
|
||||
// Output : True on success, false on failure
|
||||
//---------------------------------------------------------------------------------
|
||||
SQBool SQVM_CreateServerVM()
|
||||
{
|
||||
bool results = v_SQVM_CreateServerVM();
|
||||
if (results)
|
||||
DevMsg(eDLL_T::SERVER, "Created SERVER VM: '%p'\n", g_pServerVM.GetValue<HSQUIRRELVM>());
|
||||
else
|
||||
Error(eDLL_T::SERVER, "Failed to create SERVER VM\n");
|
||||
return results;
|
||||
}
|
||||
#endif // !CLIENT_DLL
|
||||
|
||||
#ifndef DEDICATED
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Creates the CLIENT Squirrel VM
|
||||
// Input : *chlclient -
|
||||
// Output : True on success, false on failure
|
||||
//---------------------------------------------------------------------------------
|
||||
SQBool SQVM_CreateClientVM(CHLClient* hlclient)
|
||||
{
|
||||
bool results = v_SQVM_CreateClientVM(hlclient);
|
||||
if (results)
|
||||
DevMsg(eDLL_T::CLIENT, "Created CLIENT VM: '%p'\n", g_pClientVM.GetValue<HSQUIRRELVM>());
|
||||
else
|
||||
Error(eDLL_T::CLIENT, "Failed to create CLIENT VM\n");
|
||||
return results;
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Creates the UI Squirrel VM
|
||||
// Output : True on success, false on failure
|
||||
//---------------------------------------------------------------------------------
|
||||
SQBool SQVM_CreateUIVM()
|
||||
{
|
||||
bool results = v_SQVM_CreateUIVM();
|
||||
if (results)
|
||||
DevMsg(eDLL_T::UI, "Created UI VM: '%p'\n", g_pUIVM.GetValue<HSQUIRRELVM>());
|
||||
else
|
||||
Error(eDLL_T::UI, "Failed to create UI VM\n");
|
||||
return results;
|
||||
}
|
||||
#endif // !DEDICATED
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Returns the VM name by context
|
||||
// Input : context -
|
||||
@ -506,74 +307,12 @@ const SQCONTEXT SQVM_GetContextIndex(HSQUIRRELVM v)
|
||||
return SQCONTEXT::NONE;
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Returns the VM pointer by context
|
||||
// Input : context -
|
||||
// Output : SQVM*
|
||||
//---------------------------------------------------------------------------------
|
||||
CSquirrelVM* SQVM_GetContextObject(SQCONTEXT context)
|
||||
{
|
||||
switch (context)
|
||||
{
|
||||
#ifndef CLIENT_DLL
|
||||
case SQCONTEXT::SERVER:
|
||||
return g_pServerVM.GetValue<CSquirrelVM*>();
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
case SQCONTEXT::CLIENT:
|
||||
return g_pClientVM.GetValue<CSquirrelVM*>();
|
||||
case SQCONTEXT::UI:
|
||||
return g_pUIVM.GetValue<CSquirrelVM*>();
|
||||
#endif // !DEDICATED
|
||||
default:
|
||||
return nullptr;
|
||||
}
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
// Purpose: Compiles and executes input code on target VM by context
|
||||
// Input : *code -
|
||||
// context -
|
||||
//---------------------------------------------------------------------------------
|
||||
void SQVM_Execute(const SQChar* code, SQCONTEXT context)
|
||||
{
|
||||
HSQUIRRELVM v = SQVM_GetContextObject(context)->GetVM();
|
||||
if (!v)
|
||||
{
|
||||
Error(eDLL_T::ENGINE, "Attempted to run %s script while VM isn't initialized\n", SQVM_GetContextName(context));
|
||||
return;
|
||||
}
|
||||
|
||||
SQRESULT compileResult{};
|
||||
SQBufState bufState = SQBufState(code);
|
||||
|
||||
compileResult = sq_compilebuffer(v, &bufState, "console", -1);
|
||||
if (compileResult >= 0)
|
||||
{
|
||||
sq_pushroottable(v);
|
||||
SQRESULT callResult = sq_call(v, 1, false, false);
|
||||
}
|
||||
}
|
||||
|
||||
//---------------------------------------------------------------------------------
|
||||
void SQVM_Attach()
|
||||
{
|
||||
DetourAttach((LPVOID*)&v_SQVM_PrintFunc, &SQVM_PrintFunc);
|
||||
DetourAttach((LPVOID*)&v_SQVM_WarningFunc, &SQVM_WarningFunc);
|
||||
DetourAttach((LPVOID*)&v_SQVM_CompileError, &SQVM_CompileError);
|
||||
DetourAttach((LPVOID*)&v_SQVM_LoadRson, &SQVM_LoadRson);
|
||||
DetourAttach((LPVOID*)&v_SQVM_LoadScript, &SQVM_LoadScript);
|
||||
#ifndef DEDICATED
|
||||
DetourAttach((LPVOID*)&v_SQVM_InitializeCLGlobalScriptStructs, &SQVM_InitializeCLGlobalScriptStructs);
|
||||
#endif // !DEDICATED
|
||||
#ifndef CLIENT_DLL
|
||||
DetourAttach((LPVOID*)&v_SQVM_InitializeSVGlobalScriptStructs, &SQVM_InitializeSVGlobalScriptStructs);
|
||||
DetourAttach((LPVOID*)&v_SQVM_CreateServerVM, &SQVM_CreateServerVM);
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
DetourAttach((LPVOID*)&v_SQVM_CreateClientVM, &SQVM_CreateClientVM);
|
||||
DetourAttach((LPVOID*)&v_SQVM_CreateUIVM, &SQVM_CreateUIVM);
|
||||
#endif // !DEDICATED
|
||||
}
|
||||
//---------------------------------------------------------------------------------
|
||||
void SQVM_Detach()
|
||||
@ -581,17 +320,4 @@ void SQVM_Detach()
|
||||
DetourDetach((LPVOID*)&v_SQVM_PrintFunc, &SQVM_PrintFunc);
|
||||
DetourDetach((LPVOID*)&v_SQVM_WarningFunc, &SQVM_WarningFunc);
|
||||
DetourDetach((LPVOID*)&v_SQVM_CompileError, &SQVM_CompileError);
|
||||
DetourDetach((LPVOID*)&v_SQVM_LoadRson, &SQVM_LoadRson);
|
||||
DetourDetach((LPVOID*)&v_SQVM_LoadScript, &SQVM_LoadScript);
|
||||
#ifndef DEDICATED
|
||||
DetourDetach((LPVOID*)&v_SQVM_InitializeCLGlobalScriptStructs, &SQVM_InitializeCLGlobalScriptStructs);
|
||||
#endif // !DEDICATED
|
||||
#ifndef CLIENT_DLL
|
||||
DetourDetach((LPVOID*)&v_SQVM_InitializeSVGlobalScriptStructs, &SQVM_InitializeSVGlobalScriptStructs);
|
||||
DetourDetach((LPVOID*)&v_SQVM_CreateServerVM, &SQVM_CreateServerVM);
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
DetourDetach((LPVOID*)&v_SQVM_CreateClientVM, &SQVM_CreateClientVM);
|
||||
DetourDetach((LPVOID*)&v_SQVM_CreateUIVM, &SQVM_CreateUIVM);
|
||||
#endif // !DEDICATED
|
||||
}
|
||||
|
||||
@ -38,46 +38,6 @@ struct SQVM
|
||||
};
|
||||
typedef SQVM* HSQUIRRELVM;
|
||||
|
||||
class CSquirrelVM
|
||||
{
|
||||
public:
|
||||
HSQUIRRELVM GetVM() const
|
||||
{
|
||||
return _vm;
|
||||
}
|
||||
|
||||
private:
|
||||
char pad0[0x8];
|
||||
HSQUIRRELVM _vm;
|
||||
};
|
||||
|
||||
struct ScriptFunctionBinding_t
|
||||
{
|
||||
const SQChar* m_szScriptName; // 00
|
||||
const SQChar* m_szNativeName; // 08
|
||||
const SQChar* m_szHelpString; // 10
|
||||
const SQChar* m_szRetValType; // 18
|
||||
const SQChar* m_szArgTypes; // 20
|
||||
std::int16_t unk28; // 28
|
||||
std::int16_t padding1; // 2A
|
||||
std::int32_t unk2c; // 2C
|
||||
std::int64_t unk30; // 30
|
||||
std::int32_t unk38; // 38
|
||||
std::int32_t padding2; // 3C
|
||||
std::int64_t unk40; // 40
|
||||
std::int64_t unk48; // 48
|
||||
std::int64_t unk50; // 50
|
||||
std::int32_t unk58; // 58
|
||||
std::int32_t padding3; // 5C
|
||||
void* m_pFunction; // 60
|
||||
|
||||
ScriptFunctionBinding_t()
|
||||
{
|
||||
memset(this, '\0', sizeof(ScriptFunctionBinding_t));
|
||||
this->padding2 = 6;
|
||||
}
|
||||
};
|
||||
|
||||
/* ==== SQUIRREL ======================================================================================================================================================== */
|
||||
inline CMemory p_SQVM_PrintFunc;
|
||||
inline auto v_SQVM_PrintFunc = p_SQVM_PrintFunc.RCast<SQRESULT(*)(HSQUIRRELVM v, SQChar* fmt, ...)>();
|
||||
@ -85,90 +45,21 @@ inline auto v_SQVM_PrintFunc = p_SQVM_PrintFunc.RCast<SQRESULT(*)(HSQUIRRELVM v,
|
||||
inline CMemory p_SQVM_WarningFunc;
|
||||
inline auto v_SQVM_WarningFunc = p_SQVM_WarningFunc.RCast<SQRESULT(*)(HSQUIRRELVM v, SQInteger a2, SQInteger a3, SQInteger* nStringSize, SQChar** ppString)>();
|
||||
|
||||
#if defined (GAMEDLL_S0) || defined (GAMEDLL_S1)
|
||||
inline CMemory p_SQVM_GetErrorLine;
|
||||
inline auto v_SQVM_GetErrorLine = p_SQVM_GetErrorLine.RCast<size_t(*)(const SQChar* pszFile, SQInteger nLine, SQChar* pszContextBuf, SQInteger nBufLen)>();
|
||||
|
||||
inline CMemory p_SQVM_LoadScript;
|
||||
inline auto v_SQVM_LoadScript = p_SQVM_LoadScript.RCast<SQBool(*)(HSQUIRRELVM v, const SQChar* szScriptPath, const SQChar* szScriptName, SQInteger nFlag)>();
|
||||
#elif defined (GAMEDLL_S2) || defined (GAMEDLL_S3)
|
||||
inline CMemory p_SQVM_GetErrorLine;
|
||||
inline auto v_SQVM_GetErrorLine = p_SQVM_GetErrorLine.RCast<size_t(*)(const SQChar* pszFile, SQInteger nLine, SQChar* pszContextBuf, SQInteger nBufLen)>();
|
||||
|
||||
inline CMemory p_SQVM_LoadScript;
|
||||
inline auto v_SQVM_LoadScript = p_SQVM_LoadScript.RCast<SQBool(*)(HSQUIRRELVM v, const SQChar* szScriptPath, const SQChar* szScriptName, SQInteger nFlag)>();
|
||||
#endif
|
||||
inline CMemory p_SQVM_LoadRson;
|
||||
inline auto v_SQVM_LoadRson = p_SQVM_LoadRson.RCast<SQInteger(*)(const SQChar* szRsonName)>();
|
||||
|
||||
inline CMemory p_SQVM_WarningCmd;
|
||||
inline auto v_SQVM_WarningCmd = p_SQVM_WarningCmd.RCast<SQRESULT(*)(HSQUIRRELVM v, SQInteger a2)>();
|
||||
|
||||
inline CMemory p_SQVM_RegisterFunc;
|
||||
inline auto v_SQVM_RegisterFunc = p_SQVM_RegisterFunc.RCast<SQRESULT(*)(HSQUIRRELVM v, ScriptFunctionBinding_t* sqFunc, SQInteger a1)>();
|
||||
|
||||
inline CMemory p_SQVM_CompileError;
|
||||
inline auto v_SQVM_CompileError = p_SQVM_CompileError.RCast<void (*)(HSQUIRRELVM v, const SQChar* pszError, const SQChar* pszFile, SQUnsignedInteger nLine, SQInteger nColumn)>();
|
||||
#if !defined (CLIENT_DLL)
|
||||
inline CMemory p_SQVM_InitializeSVGlobalScriptStructs;
|
||||
inline auto v_SQVM_InitializeSVGlobalScriptStructs = p_SQVM_InitializeSVGlobalScriptStructs.RCast<SQRESULT(*)(SQVM* vtable)>();
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
inline CMemory p_SQVM_InitializeCLGlobalScriptStructs;
|
||||
inline auto v_SQVM_InitializeCLGlobalScriptStructs = p_SQVM_InitializeCLGlobalScriptStructs.RCast<SQRESULT(*)(SQVM* vtable, SQCONTEXT context)>();
|
||||
#endif // !DEDICATED
|
||||
#if !defined (CLIENT_DLL) && defined (GAMEDLL_S0) || defined (GAMEDLL_S1)
|
||||
inline CMemory p_SQVM_CreateServerVM;
|
||||
inline auto v_SQVM_CreateServerVM = p_SQVM_CreateServerVM.RCast<SQBool(*)(void)>();
|
||||
#elif !defined (CLIENT_DLL) && defined (GAMEDLL_S3) || defined (GAMEDLL_S2)
|
||||
inline CMemory p_SQVM_CreateServerVM;
|
||||
inline auto v_SQVM_CreateServerVM = p_SQVM_CreateServerVM.RCast<SQBool(*)(void)>();
|
||||
#endif
|
||||
#if !defined (DEDICATED) && defined (GAMEDLL_S0) || defined (GAMEDLL_S1) || defined (GAMEDLL_S2)
|
||||
inline CMemory p_SQVM_CreateClientVM;
|
||||
inline auto v_SQVM_CreateClientVM = p_SQVM_CreateClientVM.RCast<SQBool(*)(CHLClient* pClient)>();
|
||||
#elif !defined (DEDICATED) && defined (GAMEDLL_S3)
|
||||
inline CMemory p_SQVM_CreateClientVM;
|
||||
inline auto v_SQVM_CreateClientVM = p_SQVM_CreateClientVM.RCast<SQBool(*)(CHLClient* pClient)>();
|
||||
#endif
|
||||
#if !defined (DEDICATED)
|
||||
inline CMemory p_SQVM_CreateUIVM;
|
||||
inline auto v_SQVM_CreateUIVM = p_SQVM_CreateUIVM.RCast<SQBool(*)(void)>();
|
||||
#endif // !DEDICATED
|
||||
|
||||
#if !defined (CLIENT_DLL)
|
||||
inline CMemory g_pServerVM;
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
inline CMemory g_pClientVM;
|
||||
inline CMemory g_pUIVM;
|
||||
#endif // !DEDICATED
|
||||
|
||||
SQRESULT SQVM_PrintFunc(HSQUIRRELVM v, SQChar* fmt, ...);
|
||||
SQRESULT SQVM_WarningFunc(HSQUIRRELVM v, SQInteger a2, SQInteger a3, SQInteger* nStringSize, SQChar** ppString);
|
||||
void SQVM_CompileError(HSQUIRRELVM v, const SQChar* pszError, const SQChar* pszFile, SQUnsignedInteger nLine, SQInteger nColumn);
|
||||
|
||||
SQInteger SQVM_LoadRson(const SQChar* szRsonName);
|
||||
SQBool SQVM_LoadScript(HSQUIRRELVM v, const SQChar* szScriptPath, const SQChar* szScriptName, SQInteger nFlag);
|
||||
|
||||
SQRESULT SQVM_RegisterFunction(HSQUIRRELVM v, const SQChar* szName, const SQChar* szHelpString, const SQChar* szRetValType, const SQChar* szArgTypes, void* pFunction);
|
||||
void SQVM_RegisterServerScriptFunctions(HSQUIRRELVM v);
|
||||
void SQVM_RegisterClientScriptFunctions(HSQUIRRELVM v);
|
||||
void SQVM_RegisterUIScriptFunctions(HSQUIRRELVM v);
|
||||
|
||||
SQInteger SQVM_InitializeCLGlobalScriptStructs(HSQUIRRELVM v, SQCONTEXT context);
|
||||
void SQVM_InitializeSVGlobalScriptStructs(HSQUIRRELVM v);
|
||||
|
||||
SQBool SQVM_CreateServerVM();
|
||||
#ifndef DEDICATED
|
||||
SQBool SQVM_CreateClientVM(CHLClient* hlclient);
|
||||
#endif // !DEDICATED
|
||||
SQBool SQVM_CreateUIVM();
|
||||
|
||||
const SQChar* SQVM_GetContextName(SQCONTEXT context);
|
||||
const SQCONTEXT SQVM_GetContextIndex(HSQUIRRELVM v);
|
||||
CSquirrelVM* SQVM_GetContextObject(SQCONTEXT context);
|
||||
void SQVM_Execute(const SQChar* code, SQCONTEXT context);
|
||||
|
||||
void SQVM_Attach();
|
||||
void SQVM_Detach();
|
||||
@ -181,99 +72,29 @@ class HSQVM : public IDetour
|
||||
spdlog::debug("| FUN: SQVM_PrintFunc : {:#18x} |\n", p_SQVM_PrintFunc.GetPtr());
|
||||
spdlog::debug("| FUN: SQVM_WarningFunc : {:#18x} |\n", p_SQVM_WarningFunc.GetPtr());
|
||||
spdlog::debug("| FUN: SQVM_GetErrorLine : {:#18x} |\n", p_SQVM_GetErrorLine.GetPtr());
|
||||
spdlog::debug("| FUN: SQVM_LoadScript : {:#18x} |\n", p_SQVM_LoadScript.GetPtr());
|
||||
spdlog::debug("| FUN: SQVM_LoadRson : {:#18x} |\n", p_SQVM_LoadRson.GetPtr());
|
||||
spdlog::debug("| FUN: SQVM_WarningCmd : {:#18x} |\n", p_SQVM_WarningCmd.GetPtr());
|
||||
spdlog::debug("| FUN: SQVM_RegisterFunc : {:#18x} |\n", p_SQVM_RegisterFunc.GetPtr());
|
||||
spdlog::debug("| FUN: SQVM_CompileError : {:#18x} |\n", p_SQVM_CompileError.GetPtr());
|
||||
#ifndef CLIENT_DLL
|
||||
spdlog::debug("| FUN: SQVM_InitializeSVGlobalScriptStructs : {:#18x} |\n", p_SQVM_InitializeSVGlobalScriptStructs.GetPtr());
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
spdlog::debug("| FUN: SQVM_InitializeCLGlobalScriptStructs : {:#18x} |\n", p_SQVM_InitializeCLGlobalScriptStructs.GetPtr());
|
||||
#endif // !DEDICATED
|
||||
#ifndef CLIENT_DLL
|
||||
spdlog::debug("| FUN: SQVM_CreateServerVM : {:#18x} |\n", p_SQVM_CreateServerVM.GetPtr());
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
spdlog::debug("| FUN: SQVM_CreateClientVM : {:#18x} |\n", p_SQVM_CreateClientVM.GetPtr());
|
||||
spdlog::debug("| FUN: SQVM_CreateUIVM : {:#18x} |\n", p_SQVM_CreateUIVM.GetPtr());
|
||||
#endif // !DEDICATED
|
||||
#ifndef CLIENT_DLL
|
||||
spdlog::debug("| VAR: g_pServerVM : {:#18x} |\n", g_pServerVM.GetPtr());
|
||||
#endif // !CLIENT_DLL
|
||||
#ifndef DEDICATED
|
||||
spdlog::debug("| VAR: g_pClientVM : {:#18x} |\n", g_pClientVM.GetPtr());
|
||||
spdlog::debug("| VAR: g_pUIVM : {:#18x} |\n", g_pUIVM.GetPtr());
|
||||
#endif // !DEDICATED
|
||||
spdlog::debug("+----------------------------------------------------------------+\n");
|
||||
}
|
||||
virtual void GetFun(void) const
|
||||
{
|
||||
p_SQVM_PrintFunc = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x8B\xC4\x48\x89\x50\x10\x4C\x89\x40\x18\x4C\x89\x48\x20\x53\x56\x57\x48\x81\xEC\x30\x08\x00\x00\x48\x8B\xDA\x48\x8D\x70\x18\x48\x8B\xF9\xE8\x00\x00\x00\xFF\x48\x89\x74\x24\x28\x48\x8D\x54\x24\x30\x33"), "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx???xxxxxxxxxxxx");
|
||||
p_SQVM_WarningFunc = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x4C\x89\x4C\x24\x20\x44\x89\x44\x24\x18\x89\x54\x24\x10\x53\x55\x56\x57\x41\x54\x41\x55\x41\x56\x41\x57\x48\x83\xEC\x00\x48\x8B"), "xxxxxxxxxxxxxxxxxxxxxxxxxxxxx?xx");
|
||||
p_SQVM_PrintFunc = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x8B\xC4\x48\x89\x50\x10\x4C\x89\x40\x18\x4C\x89\x48\x20\x53\x56\x57\x48\x81\xEC\x30\x08\x00\x00\x48\x8B\xDA\x48\x8D\x70\x18\x48\x8B\xF9\xE8\x00\x00\x00\xFF\x48\x89\x74\x24\x28\x48\x8D\x54\x24\x30\x33"), "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx???xxxxxxxxxxxx");
|
||||
p_SQVM_WarningFunc = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x4C\x89\x4C\x24\x20\x44\x89\x44\x24\x18\x89\x54\x24\x10\x53\x55\x56\x57\x41\x54\x41\x55\x41\x56\x41\x57\x48\x83\xEC\x00\x48\x8B"), "xxxxxxxxxxxxxxxxxxxxxxxxxxxxx?xx");
|
||||
#if defined (GAMEDLL_S0) || defined (GAMEDLL_S1)
|
||||
p_SQVM_GetErrorLine = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x89\x5C\x24\x00\x48\x89\x74\x24\x00\x48\x89\x7C\x24\x00\x55\x41\x54\x41\x55\x41\x56\x41\x57\x48\x8D\xAC\x24\x00\x00\x00\x00\x48\x81\xEC\x00\x00\x00\x00\x83\x65\x90\xFC"), "xxxx?xxxx?xxxx?xxxxxxxxxxxxx????xxx????xxxx");
|
||||
p_SQVM_LoadScript = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x89\x5C\x24\x10\x48\x89\x74\x24\x18\x48\x89\x7C\x24\x20\x48\x89\x4C\x24\x08\x55\x41\x54\x41\x55\x41\x56\x41\x57\x48\x8D\x6C"), "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx");
|
||||
#elif defined (GAMEDLL_S2) || defined (GAMEDLL_S3)
|
||||
p_SQVM_GetErrorLine = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x8B\xC4\x55\x56\x48\x8D\xA8\x00\x00\x00\x00\x48\x81\xEC\x00\x00\x00\x00\x83\x65\x90\xFC"), "xxxxxxxx????xxx????xxxx");
|
||||
p_SQVM_LoadScript = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x8B\xC4\x48\x89\x48\x08\x55\x41\x56\x48\x8D\x68"), "xxxxxxxxxxxxx");
|
||||
#endif
|
||||
p_SQVM_LoadRson = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x4C\x8B\xDC\x49\x89\x5B\x08\x57\x48\x81\xEC\xA0\x00\x00\x00\x33"), "xxxxxxxxxxxxxxxx");
|
||||
p_SQVM_WarningCmd = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x40\x53\x48\x83\xEC\x30\x33\xDB\x48\x8D\x44\x24\x00\x4C\x8D\x4C\x24\x00"), "xxxxxxxxxxxx?xxxx?");
|
||||
p_SQVM_RegisterFunc = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x83\xEC\x38\x45\x0F\xB6\xC8"), "xxxxxxxx");
|
||||
p_SQVM_CompileError = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x89\x5C\x24\x00\x48\x89\x6C\x24\x00\x48\x89\x74\x24\x00\x48\x89\x7C\x24\x00\x41\x56\x48\x81\xEC\x00\x00\x00\x00\x48\x8B\xD9\x4C\x8B\xF2"), "xxxx?xxxx?xxxx?xxxx?xxxxx????xxxxxx");
|
||||
#if !defined (CLIENT_DLL)
|
||||
p_SQVM_InitializeSVGlobalScriptStructs = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x89\x74\x24\x00\x57\x48\x83\xEC\x30\x48\x8B\x3D\x00\x00\x00\x00\x48\x8B\xF1"), "xxxx?xxxxxxxx????xxx");
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
p_SQVM_InitializeCLGlobalScriptStructs = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x89\x74\x24\x00\x48\x89\x7C\x24\x00\x41\x56\x48\x83\xEC\x30\x48\x63\xC2\x48\x8D\x3D\x00\x00\x00\x00"), "xxxx?xxxx?xxxxxxxxxxxx????");
|
||||
#endif // !DEDICATED
|
||||
#if !defined (CLIENT_DLL) && defined (GAMEDLL_S0) || defined (GAMEDLL_S1)
|
||||
p_SQVM_CreateServerVM = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x40\x53\x48\x83\xEC\x50\x48\x8D\x0D\x00\x00\x00\x00"), "xxxxxxxxx????");
|
||||
#elif !defined (CLIENT_DLL) && defined (GAMEDLL_S3) || defined (GAMEDLL_S2)
|
||||
p_SQVM_CreateServerVM = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x40\x53\x56\x48\x83\xEC\x48\x48\x8D\x0D\x00\x00\x00\x00"), "xxxxxxxxxx????");
|
||||
#endif
|
||||
#if !defined (DEDICATED) && defined (GAMEDLL_S0) || defined (GAMEDLL_S1) || defined (GAMEDLL_S2)
|
||||
p_SQVM_CreateClientVM = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x48\x83\xEC\x58\x48\x83\x3D\x00\x00\x00\x00\x00\x74\x05"), "xxxxxxx?????xx");
|
||||
#elif !defined (DEDICATED) && defined (GAMEDLL_S3)
|
||||
p_SQVM_CreateClientVM = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x40\x53\x41\x57\x48\x83\xEC\x68\x48\x83\x3D\x00\x00\x00\x00\x00"), "xxxxxxxxxxx?????");
|
||||
#endif
|
||||
#if !defined (DEDICATED)
|
||||
p_SQVM_CreateUIVM = g_mGameDll.FindPatternSIMD(reinterpret_cast<rsig_t>("\x40\x53\x48\x83\xEC\x20\x48\x8B\x1D\x00\x00\x00\x00\xC6\x05\x00\x00\x00\x00\x00"), "xxxxxxxxx????xx?????");
|
||||
#endif // !DEDICATED
|
||||
|
||||
v_SQVM_PrintFunc = p_SQVM_PrintFunc.RCast<SQRESULT(*)(HSQUIRRELVM, SQChar*, ...)>(); /*48 8B C4 48 89 50 10 4C 89 40 18 4C 89 48 20 53 56 57 48 81 EC 30 08 00 00 48 8B DA 48 8D 70 18 48 8B F9 E8 ?? ?? ?? FF 48 89 74 24 28 48 8D 54 24 30 33*/
|
||||
v_SQVM_WarningFunc = p_SQVM_WarningFunc.RCast<SQRESULT(*)(HSQUIRRELVM, SQInteger, SQInteger, SQInteger*, SQChar**)>(); /*4C 89 4C 24 20 44 89 44 24 18 89 54 24 10 53 55 56 57 41 54 41 55 41 56 41 57 48 83 EC ?? 48 8B*/
|
||||
v_SQVM_GetErrorLine = p_SQVM_GetErrorLine.RCast<size_t(*)(const SQChar*, SQInteger, SQChar*, SQInteger)>(); /*48 8B C4 55 56 48 8D A8 ?? ?? ?? ?? 48 81 EC ?? ?? ?? ?? 83 65 90 FC*/
|
||||
v_SQVM_LoadScript = p_SQVM_LoadScript.RCast<SQBool(*)(HSQUIRRELVM, const SQChar*, const SQChar*, SQInteger)>(); /*48 8B C4 48 89 48 08 55 41 56 48 8D 68*/
|
||||
v_SQVM_LoadRson = p_SQVM_LoadRson.RCast<SQInteger(*)(const SQChar*)>(); /*4C 8B DC 49 89 5B 08 57 48 81 EC A0 00 00 00 33*/
|
||||
v_SQVM_WarningCmd = p_SQVM_WarningCmd.RCast<SQRESULT(*)(HSQUIRRELVM, SQInteger)>(); /*40 53 48 83 EC 30 33 DB 48 8D 44 24 ?? 4C 8D 4C 24 ??*/
|
||||
v_SQVM_RegisterFunc = p_SQVM_RegisterFunc.RCast<SQRESULT(*)(HSQUIRRELVM, ScriptFunctionBinding_t*, SQInteger)>(); /*48 83 EC 38 45 0F B6 C8*/
|
||||
v_SQVM_CompileError = p_SQVM_CompileError.RCast<void (*)(HSQUIRRELVM, const SQChar*, const SQChar*, SQUnsignedInteger, SQInteger)>(); /*48 89 5C 24 ? 48 89 6C 24 ? 48 89 74 24 ? 48 89 7C 24 ? 41 56 48 81 EC ? ? ? ? 48 8B D9 4C 8B F2*/
|
||||
#if !defined (CLIENT_DLL)
|
||||
v_SQVM_InitializeSVGlobalScriptStructs = p_SQVM_InitializeSVGlobalScriptStructs.RCast<SQRESULT(*)(SQVM*)>(); /*48 89 74 24 ?? 57 48 83 EC 30 48 8B 3D ?? ?? ?? ?? 48 8B F1*/
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
v_SQVM_InitializeCLGlobalScriptStructs = p_SQVM_InitializeCLGlobalScriptStructs.RCast<SQRESULT(*)(SQVM*, SQCONTEXT)>(); /*48 89 74 24 ?? 48 89 7C 24 ?? 41 56 48 83 EC 30 48 63 C2 48 8D 3D ?? ?? ?? ??*/
|
||||
#endif // !DEDICATED
|
||||
#if !defined (CLIENT_DLL)
|
||||
v_SQVM_CreateServerVM = p_SQVM_CreateServerVM.RCast<SQBool(*)(void)>(); /*40 53 56 48 83 EC 48 48 8D 0D ?? ?? ?? ??*/
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
v_SQVM_CreateClientVM = p_SQVM_CreateClientVM.RCast<SQBool(*)(CHLClient*)>(); /*40 53 41 57 48 83 EC 68 48 83 3D ?? ?? ?? ?? ??*/
|
||||
v_SQVM_CreateUIVM = p_SQVM_CreateUIVM.RCast<SQBool(*)(void)>(); /*40 53 48 83 EC 20 48 8B 1D ?? ?? ?? ?? C6 05 ?? ?? ?? ?? ??*/
|
||||
#endif // !DEDICATED
|
||||
}
|
||||
virtual void GetVar(void) const
|
||||
{
|
||||
#if !defined (CLIENT_DLL)
|
||||
g_pServerVM = p_SQVM_CreateServerVM.FindPatternSelf("48 89 1D", CMemory::Direction::DOWN, 150).ResolveRelativeAddressSelf(0x3, 0x7);
|
||||
#endif // !CLIENT_DLL
|
||||
#if !defined (DEDICATED)
|
||||
g_pClientVM = p_SQVM_CreateClientVM.FindPatternSelf("48 83 3D", CMemory::Direction::DOWN, 150).ResolveRelativeAddressSelf(0x3, 0x8);
|
||||
g_pUIVM = p_SQVM_CreateUIVM.FindPatternSelf("48 8B 1D", CMemory::Direction::DOWN, 150).ResolveRelativeAddressSelf(0x3, 0x7);
|
||||
#endif // !DEDICATED
|
||||
}
|
||||
virtual void GetVar(void) const { }
|
||||
virtual void GetCon(void) const { }
|
||||
virtual void Attach(void) const { }
|
||||
virtual void Detach(void) const { }
|
||||
|
||||
@ -82,6 +82,7 @@
|
||||
<ClCompile Include="..\rtech\stryder\stryder.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqapi.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqinit.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqscript.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqstdaux.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqvm.cpp" />
|
||||
<ClCompile Include="..\thirdparty\imgui\src\imgui_utility.cpp" />
|
||||
@ -223,6 +224,7 @@
|
||||
<ClInclude Include="..\rtech\stryder\stryder.h" />
|
||||
<ClInclude Include="..\squirrel\sqapi.h" />
|
||||
<ClInclude Include="..\squirrel\sqinit.h" />
|
||||
<ClInclude Include="..\squirrel\sqscript.h" />
|
||||
<ClInclude Include="..\squirrel\sqstate.h" />
|
||||
<ClInclude Include="..\squirrel\sqstdaux.h" />
|
||||
<ClInclude Include="..\squirrel\sqtype.h" />
|
||||
|
||||
@ -501,6 +501,9 @@
|
||||
<ClCompile Include="..\tier1\strtools.cpp">
|
||||
<Filter>sdk\tier1</Filter>
|
||||
</ClCompile>
|
||||
<ClCompile Include="..\squirrel\sqscript.cpp">
|
||||
<Filter>sdk\squirrel</Filter>
|
||||
</ClCompile>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<ClInclude Include="..\client\cdll_engine_int.h">
|
||||
@ -1502,6 +1505,9 @@
|
||||
<ClInclude Include="..\vpc\kvleaktrace.h">
|
||||
<Filter>sdk\vpc</Filter>
|
||||
</ClInclude>
|
||||
<ClInclude Include="..\squirrel\sqscript.h">
|
||||
<Filter>sdk\squirrel</Filter>
|
||||
</ClInclude>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Image Include="..\shared\resource\lockedserver.png">
|
||||
|
||||
@ -221,6 +221,7 @@
|
||||
<ClInclude Include="..\server\vengineserver_impl.h" />
|
||||
<ClInclude Include="..\squirrel\sqapi.h" />
|
||||
<ClInclude Include="..\squirrel\sqinit.h" />
|
||||
<ClInclude Include="..\squirrel\sqscript.h" />
|
||||
<ClInclude Include="..\squirrel\sqstate.h" />
|
||||
<ClInclude Include="..\squirrel\sqstdaux.h" />
|
||||
<ClInclude Include="..\squirrel\sqtype.h" />
|
||||
@ -499,6 +500,7 @@
|
||||
<ClCompile Include="..\server\vengineserver_impl.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqapi.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqinit.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqscript.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqstdaux.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqvm.cpp" />
|
||||
<ClCompile Include="..\tier0\commandline.cpp" />
|
||||
|
||||
@ -1116,6 +1116,9 @@
|
||||
<ClInclude Include="..\vpc\kvleaktrace.h">
|
||||
<Filter>sdk\vpc</Filter>
|
||||
</ClInclude>
|
||||
<ClInclude Include="..\squirrel\sqscript.h">
|
||||
<Filter>sdk\squirrel</Filter>
|
||||
</ClInclude>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<ClCompile Include="..\common\opcodes.cpp">
|
||||
@ -1367,6 +1370,9 @@
|
||||
<ClCompile Include="..\tier1\strtools.cpp">
|
||||
<Filter>sdk\tier1</Filter>
|
||||
</ClCompile>
|
||||
<ClCompile Include="..\squirrel\sqscript.cpp">
|
||||
<Filter>sdk\squirrel</Filter>
|
||||
</ClCompile>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="..\Dedicated.def" />
|
||||
|
||||
@ -89,6 +89,7 @@
|
||||
<ClCompile Include="..\server\vengineserver_impl.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqapi.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqinit.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqscript.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqstdaux.cpp" />
|
||||
<ClCompile Include="..\squirrel\sqvm.cpp" />
|
||||
<ClCompile Include="..\thirdparty\imgui\src\imgui_utility.cpp" />
|
||||
@ -242,6 +243,7 @@
|
||||
<ClInclude Include="..\server\vengineserver_impl.h" />
|
||||
<ClInclude Include="..\squirrel\sqapi.h" />
|
||||
<ClInclude Include="..\squirrel\sqinit.h" />
|
||||
<ClInclude Include="..\squirrel\sqscript.h" />
|
||||
<ClInclude Include="..\squirrel\sqstate.h" />
|
||||
<ClInclude Include="..\squirrel\sqstdaux.h" />
|
||||
<ClInclude Include="..\squirrel\sqtype.h" />
|
||||
|
||||
@ -531,6 +531,9 @@
|
||||
<ClCompile Include="..\tier1\strtools.cpp">
|
||||
<Filter>sdk\tier1</Filter>
|
||||
</ClCompile>
|
||||
<ClCompile Include="..\squirrel\sqscript.cpp">
|
||||
<Filter>sdk\squirrel</Filter>
|
||||
</ClCompile>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<ClInclude Include="..\client\cdll_engine_int.h">
|
||||
@ -1565,6 +1568,9 @@
|
||||
<ClInclude Include="..\vpc\kvleaktrace.h">
|
||||
<Filter>sdk\vpc</Filter>
|
||||
</ClInclude>
|
||||
<ClInclude Include="..\squirrel\sqscript.h">
|
||||
<Filter>sdk\squirrel</Filter>
|
||||
</ClInclude>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Image Include="..\shared\resource\lockedserver.png">
|
||||
|
||||
@ -18,7 +18,7 @@
|
||||
#include "filesystem/basefilesystem.h"
|
||||
#include "filesystem/filesystem.h"
|
||||
#include "vpklib/packedstore.h"
|
||||
#include "squirrel/sqvm.h"
|
||||
#include "squirrel/sqscript.h"
|
||||
#ifndef DEDICATED
|
||||
#include "gameui/IBrowser.h"
|
||||
#include "gameui/IConsole.h"
|
||||
@ -789,7 +789,7 @@ void SQVM_ServerScript_f(const CCommand& args)
|
||||
{
|
||||
if (args.ArgC() >= 2)
|
||||
{
|
||||
SQVM_Execute(args.ArgS(), SQCONTEXT::SERVER);
|
||||
Script_Execute(args.ArgS(), SQCONTEXT::SERVER);
|
||||
}
|
||||
}
|
||||
|
||||
@ -806,7 +806,7 @@ void SQVM_ClientScript_f(const CCommand& args)
|
||||
{
|
||||
if (args.ArgC() >= 2)
|
||||
{
|
||||
SQVM_Execute(args.ArgS(), SQCONTEXT::CLIENT);
|
||||
Script_Execute(args.ArgS(), SQCONTEXT::CLIENT);
|
||||
}
|
||||
}
|
||||
|
||||
@ -822,7 +822,7 @@ void SQVM_UIScript_f(const CCommand& args)
|
||||
{
|
||||
if (args.ArgC() >= 2)
|
||||
{
|
||||
SQVM_Execute(args.ArgS(), SQCONTEXT::UI);
|
||||
Script_Execute(args.ArgS(), SQCONTEXT::UI);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user