Scripting progress + some commands
This commit is contained in:
parent
680bc7fe66
commit
cd6670d75a
9
.gitmodules
vendored
9
.gitmodules
vendored
@ -1,3 +1,12 @@
|
|||||||
[submodule "deps/minhook"]
|
[submodule "deps/minhook"]
|
||||||
path = deps/minhook
|
path = deps/minhook
|
||||||
url = https://github.com/TsudaKageyu/minhook.git
|
url = https://github.com/TsudaKageyu/minhook.git
|
||||||
|
[submodule "deps/lua"]
|
||||||
|
path = deps/lua
|
||||||
|
url = https://github.com/lua/lua.git
|
||||||
|
[submodule "deps/sol2"]
|
||||||
|
path = deps/sol2
|
||||||
|
url = https://github.com/ThePhD/sol2.git
|
||||||
|
[submodule "deps/GSL"]
|
||||||
|
path = deps/GSL
|
||||||
|
url = https://github.com/Microsoft/GSL.git
|
||||||
|
1
deps/GSL
vendored
Submodule
1
deps/GSL
vendored
Submodule
@ -0,0 +1 @@
|
|||||||
|
Subproject commit ef0ffefe525a6219ff245d19a832ce06f3fd3504
|
1
deps/lua
vendored
Submodule
1
deps/lua
vendored
Submodule
@ -0,0 +1 @@
|
|||||||
|
Subproject commit 681297187ec45268e872b26753c441586c12bdd8
|
19
deps/premake/gsl.lua
vendored
Normal file
19
deps/premake/gsl.lua
vendored
Normal file
@ -0,0 +1,19 @@
|
|||||||
|
gsl = {
|
||||||
|
source = path.join(dependencies.basePath, "GSL"),
|
||||||
|
}
|
||||||
|
|
||||||
|
function gsl.import()
|
||||||
|
gsl.includes()
|
||||||
|
end
|
||||||
|
|
||||||
|
function gsl.includes()
|
||||||
|
includedirs {
|
||||||
|
path.join(gsl.source, "include")
|
||||||
|
}
|
||||||
|
end
|
||||||
|
|
||||||
|
function gsl.project()
|
||||||
|
|
||||||
|
end
|
||||||
|
|
||||||
|
table.insert(dependencies, gsl)
|
37
deps/premake/l_u_a.lua
vendored
Normal file
37
deps/premake/l_u_a.lua
vendored
Normal file
@ -0,0 +1,37 @@
|
|||||||
|
-- Scripts or variables named lua fuck with premake ._.
|
||||||
|
l_u_a = {
|
||||||
|
source = path.join(dependencies.basePath, "lua"),
|
||||||
|
}
|
||||||
|
|
||||||
|
function l_u_a.import()
|
||||||
|
links { "lua" }
|
||||||
|
l_u_a.includes()
|
||||||
|
end
|
||||||
|
|
||||||
|
function l_u_a.includes()
|
||||||
|
includedirs {
|
||||||
|
l_u_a.source
|
||||||
|
}
|
||||||
|
|
||||||
|
end
|
||||||
|
|
||||||
|
function l_u_a.project()
|
||||||
|
project "lua"
|
||||||
|
language "C"
|
||||||
|
|
||||||
|
l_u_a.includes()
|
||||||
|
|
||||||
|
files {
|
||||||
|
path.join(l_u_a.source, "*.h"),
|
||||||
|
path.join(l_u_a.source, "*.c"),
|
||||||
|
}
|
||||||
|
|
||||||
|
removefiles {
|
||||||
|
path.join(l_u_a.source, "onelua.c"),
|
||||||
|
}
|
||||||
|
|
||||||
|
warnings "Off"
|
||||||
|
kind "StaticLib"
|
||||||
|
end
|
||||||
|
|
||||||
|
table.insert(dependencies, l_u_a)
|
20
deps/premake/sol2.lua
vendored
Normal file
20
deps/premake/sol2.lua
vendored
Normal file
@ -0,0 +1,20 @@
|
|||||||
|
sol2 = {
|
||||||
|
source = path.join(dependencies.basePath, "sol2"),
|
||||||
|
}
|
||||||
|
|
||||||
|
function sol2.import()
|
||||||
|
sol2.includes()
|
||||||
|
l_u_a.import()
|
||||||
|
end
|
||||||
|
|
||||||
|
function sol2.includes()
|
||||||
|
includedirs {
|
||||||
|
path.join(sol2.source, "include")
|
||||||
|
}
|
||||||
|
end
|
||||||
|
|
||||||
|
function sol2.project()
|
||||||
|
|
||||||
|
end
|
||||||
|
|
||||||
|
table.insert(dependencies, sol2)
|
1
deps/sol2
vendored
Submodule
1
deps/sol2
vendored
Submodule
@ -0,0 +1 @@
|
|||||||
|
Subproject commit f56b3c698c2116f41aad3bf731ba8400e68c498b
|
@ -11,6 +11,8 @@ namespace command
|
|||||||
{
|
{
|
||||||
namespace
|
namespace
|
||||||
{
|
{
|
||||||
|
utils::hook::detour dvar_command_hook;
|
||||||
|
|
||||||
std::unordered_map<std::string, std::function<void(params&)>> handlers;
|
std::unordered_map<std::string, std::function<void(params&)>> handlers;
|
||||||
|
|
||||||
void main_handler()
|
void main_handler()
|
||||||
@ -32,6 +34,43 @@ namespace command
|
|||||||
cb(header);
|
cb(header);
|
||||||
}), &callback, includeOverride);
|
}), &callback, includeOverride);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
game::dvar_t* dvar_command_stub()
|
||||||
|
{
|
||||||
|
const params args;
|
||||||
|
|
||||||
|
if (args.size() <= 0)
|
||||||
|
{
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
const auto dvar = game::Dvar_FindVar(args[0]);
|
||||||
|
|
||||||
|
if (dvar)
|
||||||
|
{
|
||||||
|
if (args.size() == 1)
|
||||||
|
{
|
||||||
|
const auto current = game::Dvar_ValueToString(dvar, nullptr, &dvar->current);
|
||||||
|
const auto reset = game::Dvar_ValueToString(dvar, nullptr, &dvar->reset);
|
||||||
|
|
||||||
|
game_console::print(game_console::con_type_info, "\"%s\" is: \"%s\" default: \"%s\" hash: %i",
|
||||||
|
args[0], current, reset, dvar->name);
|
||||||
|
|
||||||
|
game_console::print(game_console::con_type_info, " %s\n",
|
||||||
|
dvars::dvar_get_domain(dvar->type, dvar->domain).data());
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
char command[0x1000] = { 0 };
|
||||||
|
game::Dvar_GetCombinedString(command, 1);
|
||||||
|
game::Dvar_SetCommand(dvar->name, "", command);
|
||||||
|
}
|
||||||
|
|
||||||
|
return dvar;
|
||||||
|
}
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
params::params()
|
params::params()
|
||||||
@ -105,6 +144,8 @@ namespace command
|
|||||||
|
|
||||||
void init()
|
void init()
|
||||||
{
|
{
|
||||||
|
utils::hook::jump(game::base_address + 0x5A74F0, dvar_command_stub, true);
|
||||||
|
|
||||||
add("listassetpool", [](const params& params)
|
add("listassetpool", [](const params& params)
|
||||||
{
|
{
|
||||||
if (params.size() < 2)
|
if (params.size() < 2)
|
||||||
|
@ -81,6 +81,7 @@ namespace scheduler
|
|||||||
std::thread thread;
|
std::thread thread;
|
||||||
task_pipeline pipelines[pipeline::count];
|
task_pipeline pipelines[pipeline::count];
|
||||||
utils::hook::detour r_end_frame_hook;
|
utils::hook::detour r_end_frame_hook;
|
||||||
|
utils::hook::detour g_run_frame_hook;
|
||||||
|
|
||||||
void execute(const pipeline type)
|
void execute(const pipeline type)
|
||||||
{
|
{
|
||||||
@ -96,7 +97,7 @@ namespace scheduler
|
|||||||
|
|
||||||
void server_frame_stub()
|
void server_frame_stub()
|
||||||
{
|
{
|
||||||
//game::G_Glass_Update();
|
g_run_frame_hook.invoke<void>();
|
||||||
execute(pipeline::server);
|
execute(pipeline::server);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@ -146,6 +147,6 @@ namespace scheduler
|
|||||||
});
|
});
|
||||||
|
|
||||||
r_end_frame_hook.create(game::base_address + 0x76D7B0, scheduler::r_end_frame_stub);
|
r_end_frame_hook.create(game::base_address + 0x76D7B0, scheduler::r_end_frame_stub);
|
||||||
//utils::hook::call(0x1402F8879, scheduler::server_frame_stub);
|
g_run_frame_hook.create(game::base_address + 0x4CB030, scheduler::server_frame_stub);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
94
src/component/scripting.cpp
Normal file
94
src/component/scripting.cpp
Normal file
@ -0,0 +1,94 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
|
||||||
|
#include "game/game.hpp"
|
||||||
|
#include <utils/hook.hpp>
|
||||||
|
|
||||||
|
#include "game/scripting/event.hpp"
|
||||||
|
#include "game/scripting/execution.hpp"
|
||||||
|
#include "game/scripting/lua/engine.hpp"
|
||||||
|
|
||||||
|
#include "scheduler.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
std::unordered_map<int, std::unordered_map<std::string, int>> fields_table;
|
||||||
|
|
||||||
|
namespace
|
||||||
|
{
|
||||||
|
utils::hook::detour vm_notify_hook;
|
||||||
|
|
||||||
|
utils::hook::detour scr_load_level_hook;
|
||||||
|
utils::hook::detour g_shutdown_game_hook;
|
||||||
|
|
||||||
|
utils::hook::detour scr_add_class_field_hook;
|
||||||
|
|
||||||
|
std::string last_event;
|
||||||
|
|
||||||
|
void vm_notify_stub(const unsigned int notify_list_owner_id, const game::scr_string_t string_value,
|
||||||
|
game::VariableValue* top)
|
||||||
|
{
|
||||||
|
const auto* string = game::SL_ConvertToString(string_value);
|
||||||
|
if (string)
|
||||||
|
{
|
||||||
|
event e;
|
||||||
|
e.name = string;
|
||||||
|
e.entity = notify_list_owner_id;
|
||||||
|
|
||||||
|
for (auto* value = top; value->type != game::SCRIPT_END; --value)
|
||||||
|
{
|
||||||
|
e.arguments.emplace_back(*value);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (last_event != e.name)
|
||||||
|
{
|
||||||
|
last_event = e.name;
|
||||||
|
|
||||||
|
//printf("notify: %s\n", e.name.data());
|
||||||
|
}
|
||||||
|
|
||||||
|
lua::engine::notify(e);
|
||||||
|
}
|
||||||
|
|
||||||
|
vm_notify_hook.invoke<void>(notify_list_owner_id, string_value, top);
|
||||||
|
}
|
||||||
|
|
||||||
|
void scr_load_level_stub()
|
||||||
|
{
|
||||||
|
scr_load_level_hook.invoke<void>();
|
||||||
|
lua::engine::start();
|
||||||
|
}
|
||||||
|
|
||||||
|
void g_shutdown_game_stub(const int free_scripts)
|
||||||
|
{
|
||||||
|
lua::engine::stop();
|
||||||
|
return g_shutdown_game_hook.invoke<void>(free_scripts);
|
||||||
|
}
|
||||||
|
|
||||||
|
void scr_add_class_field_stub(unsigned int classnum, game::scr_string_t _name, unsigned int canonicalString, unsigned int offset)
|
||||||
|
{
|
||||||
|
const auto name = game::SL_ConvertToString(_name);
|
||||||
|
|
||||||
|
if (fields_table[classnum].find(name) == fields_table[classnum].end())
|
||||||
|
{
|
||||||
|
fields_table[classnum][name] = offset;
|
||||||
|
}
|
||||||
|
|
||||||
|
scr_add_class_field_hook.invoke<void>(classnum, _name, canonicalString, offset);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void init()
|
||||||
|
{
|
||||||
|
vm_notify_hook.create(game::base_address + 0x5CC450, vm_notify_stub);
|
||||||
|
|
||||||
|
scr_load_level_hook.create(game::base_address + 0x520AB0, scr_load_level_stub);
|
||||||
|
g_shutdown_game_hook.create(game::base_address + 0x4CBAD0, g_shutdown_game_stub);
|
||||||
|
|
||||||
|
scr_add_class_field_hook.create(game::base_address + 0x5C2C30, scr_add_class_field_stub);
|
||||||
|
|
||||||
|
scheduler::loop([]()
|
||||||
|
{
|
||||||
|
lua::engine::run_frame();
|
||||||
|
}, scheduler::pipeline::server);
|
||||||
|
}
|
||||||
|
}
|
8
src/component/scripting.hpp
Normal file
8
src/component/scripting.hpp
Normal file
@ -0,0 +1,8 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
extern std::unordered_map<int, std::unordered_map<std::string, int>> fields_table;
|
||||||
|
|
||||||
|
void init();
|
||||||
|
}
|
@ -35,6 +35,7 @@ void init()
|
|||||||
input::init();
|
input::init();
|
||||||
scheduler::init();
|
scheduler::init();
|
||||||
game_console::init();
|
game_console::init();
|
||||||
|
scripting::init();
|
||||||
}
|
}
|
||||||
|
|
||||||
BOOL APIENTRY DllMain(HMODULE hModule, DWORD ul_reason_for_call, LPVOID lpReserved)
|
BOOL APIENTRY DllMain(HMODULE hModule, DWORD ul_reason_for_call, LPVOID lpReserved)
|
||||||
|
120
src/game/scripting/entity.cpp
Normal file
120
src/game/scripting/entity.cpp
Normal file
@ -0,0 +1,120 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "entity.hpp"
|
||||||
|
#include "script_value.hpp"
|
||||||
|
#include "execution.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
entity::entity()
|
||||||
|
: entity(0)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
entity::entity(const entity& other) : entity(other.entity_id_)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
entity::entity(entity&& other) noexcept
|
||||||
|
{
|
||||||
|
this->entity_id_ = other.entity_id_;
|
||||||
|
other.entity_id_ = 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
entity::entity(const unsigned int entity_id)
|
||||||
|
: entity_id_(entity_id)
|
||||||
|
{
|
||||||
|
this->add();
|
||||||
|
}
|
||||||
|
|
||||||
|
entity::entity(game::scr_entref_t entref)
|
||||||
|
: entity(game::FindEntityId(entref.entnum, entref.classnum))
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
entity::~entity()
|
||||||
|
{
|
||||||
|
this->release();
|
||||||
|
}
|
||||||
|
|
||||||
|
entity& entity::operator=(const entity& other)
|
||||||
|
{
|
||||||
|
if (&other != this)
|
||||||
|
{
|
||||||
|
this->release();
|
||||||
|
this->entity_id_ = other.entity_id_;
|
||||||
|
this->add();
|
||||||
|
}
|
||||||
|
|
||||||
|
return *this;
|
||||||
|
}
|
||||||
|
|
||||||
|
entity& entity::operator=(entity&& other) noexcept
|
||||||
|
{
|
||||||
|
if (&other != this)
|
||||||
|
{
|
||||||
|
this->release();
|
||||||
|
this->entity_id_ = other.entity_id_;
|
||||||
|
other.entity_id_ = 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
return *this;
|
||||||
|
}
|
||||||
|
|
||||||
|
unsigned int entity::get_entity_id() const
|
||||||
|
{
|
||||||
|
return this->entity_id_;
|
||||||
|
}
|
||||||
|
|
||||||
|
game::scr_entref_t entity::get_entity_reference() const
|
||||||
|
{
|
||||||
|
if (!this->entity_id_)
|
||||||
|
{
|
||||||
|
const auto not_null = static_cast<uint16_t>(~0ui16);
|
||||||
|
return game::scr_entref_t{not_null, not_null};
|
||||||
|
}
|
||||||
|
|
||||||
|
return game::Scr_GetEntityIdRef(this->get_entity_id());
|
||||||
|
}
|
||||||
|
|
||||||
|
bool entity::operator==(const entity& other) const noexcept
|
||||||
|
{
|
||||||
|
return this->get_entity_id() == other.get_entity_id();
|
||||||
|
}
|
||||||
|
|
||||||
|
bool entity::operator!=(const entity& other) const noexcept
|
||||||
|
{
|
||||||
|
return !this->operator==(other);
|
||||||
|
}
|
||||||
|
|
||||||
|
void entity::add() const
|
||||||
|
{
|
||||||
|
if (this->entity_id_)
|
||||||
|
{
|
||||||
|
game::AddRefToValue(game::SCRIPT_OBJECT, {static_cast<int>(this->entity_id_)});
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void entity::release() const
|
||||||
|
{
|
||||||
|
if (this->entity_id_)
|
||||||
|
{
|
||||||
|
game::RemoveRefToValue(game::SCRIPT_OBJECT, {static_cast<int>(this->entity_id_)});
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void entity::set(const std::string& field, const script_value& value) const
|
||||||
|
{
|
||||||
|
set_entity_field(*this, field, value);
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
script_value entity::get<script_value>(const std::string& field) const
|
||||||
|
{
|
||||||
|
return get_entity_field(*this, field);
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value entity::call(const std::string& name, const std::vector<script_value>& arguments) const
|
||||||
|
{
|
||||||
|
return call_function(name, *this, arguments);
|
||||||
|
}
|
||||||
|
}
|
50
src/game/scripting/entity.hpp
Normal file
50
src/game/scripting/entity.hpp
Normal file
@ -0,0 +1,50 @@
|
|||||||
|
#pragma once
|
||||||
|
#include "game/game.hpp"
|
||||||
|
#include "script_value.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
class entity final
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
entity();
|
||||||
|
entity(unsigned int entity_id);
|
||||||
|
entity(game::scr_entref_t entref);
|
||||||
|
|
||||||
|
entity(const entity& other);
|
||||||
|
entity(entity&& other) noexcept;
|
||||||
|
|
||||||
|
~entity();
|
||||||
|
|
||||||
|
entity& operator=(const entity& other);
|
||||||
|
entity& operator=(entity&& other) noexcept;
|
||||||
|
|
||||||
|
void set(const std::string& field, const script_value& value) const;
|
||||||
|
|
||||||
|
template <typename T = script_value>
|
||||||
|
T get(const std::string& field) const;
|
||||||
|
|
||||||
|
script_value call(const std::string& name, const std::vector<script_value>& arguments = {}) const;
|
||||||
|
|
||||||
|
unsigned int get_entity_id() const;
|
||||||
|
game::scr_entref_t get_entity_reference() const;
|
||||||
|
|
||||||
|
bool operator ==(const entity& other) const noexcept;
|
||||||
|
bool operator !=(const entity& other) const noexcept;
|
||||||
|
|
||||||
|
private:
|
||||||
|
unsigned int entity_id_;
|
||||||
|
|
||||||
|
void add() const;
|
||||||
|
void release() const;
|
||||||
|
};
|
||||||
|
|
||||||
|
template <>
|
||||||
|
script_value entity::get(const std::string& field) const;
|
||||||
|
|
||||||
|
template <typename T>
|
||||||
|
T entity::get(const std::string& field) const
|
||||||
|
{
|
||||||
|
return this->get<script_value>(field).as<T>();
|
||||||
|
}
|
||||||
|
}
|
13
src/game/scripting/event.hpp
Normal file
13
src/game/scripting/event.hpp
Normal file
@ -0,0 +1,13 @@
|
|||||||
|
#pragma once
|
||||||
|
#include "script_value.hpp"
|
||||||
|
#include "entity.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
struct event
|
||||||
|
{
|
||||||
|
std::string name;
|
||||||
|
entity entity{};
|
||||||
|
std::vector<script_value> arguments;
|
||||||
|
};
|
||||||
|
}
|
196
src/game/scripting/execution.cpp
Normal file
196
src/game/scripting/execution.cpp
Normal file
@ -0,0 +1,196 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "execution.hpp"
|
||||||
|
#include "safe_execution.hpp"
|
||||||
|
#include "stack_isolation.hpp"
|
||||||
|
|
||||||
|
#include "component/scripting.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
namespace
|
||||||
|
{
|
||||||
|
game::VariableValue* allocate_argument()
|
||||||
|
{
|
||||||
|
game::VariableValue* value_ptr = ++game::scr_VmPub->top;
|
||||||
|
++game::scr_VmPub->inparamcount;
|
||||||
|
return value_ptr;
|
||||||
|
}
|
||||||
|
|
||||||
|
void push_value(const script_value& value)
|
||||||
|
{
|
||||||
|
auto* value_ptr = allocate_argument();
|
||||||
|
*value_ptr = value.get_raw();
|
||||||
|
|
||||||
|
game::AddRefToValue(value_ptr->type, value_ptr->u);
|
||||||
|
}
|
||||||
|
|
||||||
|
int get_field_id(const int classnum, const std::string& field)
|
||||||
|
{
|
||||||
|
if (scripting::fields_table[classnum].find(field) != scripting::fields_table[classnum].end())
|
||||||
|
{
|
||||||
|
return scripting::fields_table[classnum][field];
|
||||||
|
}
|
||||||
|
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value get_return_value()
|
||||||
|
{
|
||||||
|
if (game::scr_VmPub->inparamcount == 0)
|
||||||
|
{
|
||||||
|
return {};
|
||||||
|
}
|
||||||
|
|
||||||
|
game::Scr_ClearOutParams();
|
||||||
|
game::scr_VmPub->outparamcount = game::scr_VmPub->inparamcount;
|
||||||
|
game::scr_VmPub->inparamcount = 0;
|
||||||
|
|
||||||
|
return script_value(game::scr_VmPub->top[1 - game::scr_VmPub->outparamcount]);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void notify(const entity& entity, const std::string& event, const std::vector<script_value>& arguments)
|
||||||
|
{
|
||||||
|
stack_isolation _;
|
||||||
|
for (auto i = arguments.rbegin(); i != arguments.rend(); ++i)
|
||||||
|
{
|
||||||
|
push_value(*i);
|
||||||
|
}
|
||||||
|
|
||||||
|
const auto event_id = game::SL_GetString(event.data(), 0);
|
||||||
|
game::Scr_NotifyId(entity.get_entity_id(), event_id, game::scr_VmPub->inparamcount);
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value call_function(const std::string& name, const entity& entity,
|
||||||
|
const std::vector<script_value>& arguments)
|
||||||
|
{
|
||||||
|
const auto entref = entity.get_entity_reference();
|
||||||
|
|
||||||
|
const auto is_method_call = *reinterpret_cast<const int*>(&entref) != -1;
|
||||||
|
const auto function = find_function(name, !is_method_call);
|
||||||
|
if (function == nullptr)
|
||||||
|
{
|
||||||
|
throw std::runtime_error("Unknown "s + (is_method_call ? "method" : "function") + " '" + name + "'");
|
||||||
|
}
|
||||||
|
|
||||||
|
stack_isolation _;
|
||||||
|
|
||||||
|
for (auto i = arguments.rbegin(); i != arguments.rend(); ++i)
|
||||||
|
{
|
||||||
|
push_value(*i);
|
||||||
|
}
|
||||||
|
|
||||||
|
game::scr_VmPub->outparamcount = game::scr_VmPub->inparamcount;
|
||||||
|
game::scr_VmPub->inparamcount = 0;
|
||||||
|
|
||||||
|
if (!safe_execution::call(function, entref))
|
||||||
|
{
|
||||||
|
throw std::runtime_error(
|
||||||
|
"Error executing "s + (is_method_call ? "method" : "function") + " '" + name + "'");
|
||||||
|
}
|
||||||
|
|
||||||
|
return get_return_value();
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value call_function(const std::string& name, const std::vector<script_value>& arguments)
|
||||||
|
{
|
||||||
|
return call_function(name, entity(), arguments);
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
script_value call(const std::string& name, const std::vector<script_value>& arguments)
|
||||||
|
{
|
||||||
|
return call_function(name, arguments);
|
||||||
|
}
|
||||||
|
|
||||||
|
static std::unordered_map<unsigned int, std::unordered_map<std::string, script_value>> custom_fields;
|
||||||
|
|
||||||
|
script_value get_custom_field(const entity& entity, const std::string& field)
|
||||||
|
{
|
||||||
|
auto& fields = custom_fields[entity.get_entity_id()];
|
||||||
|
const auto _field = fields.find(field);
|
||||||
|
if (_field != fields.end())
|
||||||
|
{
|
||||||
|
return _field->second;
|
||||||
|
}
|
||||||
|
return {};
|
||||||
|
}
|
||||||
|
|
||||||
|
void set_custom_field(const entity& entity, const std::string& field, const script_value& value)
|
||||||
|
{
|
||||||
|
const auto id = entity.get_entity_id();
|
||||||
|
|
||||||
|
if (custom_fields[id].find(field) != custom_fields[id].end())
|
||||||
|
{
|
||||||
|
custom_fields[id][field] = value;
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
custom_fields[id].insert(std::make_pair(field, value));
|
||||||
|
}
|
||||||
|
|
||||||
|
void clear_entity_fields(const entity& entity)
|
||||||
|
{
|
||||||
|
const auto id = entity.get_entity_id();
|
||||||
|
|
||||||
|
if (custom_fields.find(id) != custom_fields.end())
|
||||||
|
{
|
||||||
|
custom_fields[id].clear();
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void clear_custom_fields()
|
||||||
|
{
|
||||||
|
custom_fields.clear();
|
||||||
|
}
|
||||||
|
|
||||||
|
void set_entity_field(const entity& entity, const std::string& field, const script_value& value)
|
||||||
|
{
|
||||||
|
const auto entref = entity.get_entity_reference();
|
||||||
|
const int id = get_field_id(entref.classnum, field);
|
||||||
|
|
||||||
|
if (id != -1)
|
||||||
|
{
|
||||||
|
stack_isolation _;
|
||||||
|
push_value(value);
|
||||||
|
|
||||||
|
game::scr_VmPub->outparamcount = game::scr_VmPub->inparamcount;
|
||||||
|
game::scr_VmPub->inparamcount = 0;
|
||||||
|
|
||||||
|
if (!safe_execution::set_entity_field(entref, id))
|
||||||
|
{
|
||||||
|
throw std::runtime_error("Failed to set value for field '" + field + "'");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
set_custom_field(entity, field, value);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value get_entity_field(const entity& entity, const std::string& field)
|
||||||
|
{
|
||||||
|
const auto entref = entity.get_entity_reference();
|
||||||
|
const auto id = get_field_id(entref.classnum, field);
|
||||||
|
|
||||||
|
if (id != -1)
|
||||||
|
{
|
||||||
|
stack_isolation _;
|
||||||
|
|
||||||
|
game::VariableValue value{};
|
||||||
|
if (!safe_execution::get_entity_field(entref, id, &value))
|
||||||
|
{
|
||||||
|
throw std::runtime_error("Failed to get value for field '" + field + "'");
|
||||||
|
}
|
||||||
|
|
||||||
|
const auto __ = gsl::finally([value]()
|
||||||
|
{
|
||||||
|
game::RemoveRefToValue(value.type, value.u);
|
||||||
|
});
|
||||||
|
|
||||||
|
return value;
|
||||||
|
}
|
||||||
|
|
||||||
|
return get_custom_field(entity, field);
|
||||||
|
}
|
||||||
|
}
|
31
src/game/scripting/execution.hpp
Normal file
31
src/game/scripting/execution.hpp
Normal file
@ -0,0 +1,31 @@
|
|||||||
|
#pragma once
|
||||||
|
#include "game/game.hpp"
|
||||||
|
#include "entity.hpp"
|
||||||
|
#include "script_value.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
script_value call_function(const std::string& name, const std::vector<script_value>& arguments);
|
||||||
|
script_value call_function(const std::string& name, const entity& entity,
|
||||||
|
const std::vector<script_value>& arguments);
|
||||||
|
|
||||||
|
template <typename T = script_value>
|
||||||
|
T call(const std::string& name, const std::vector<script_value>& arguments = {});
|
||||||
|
|
||||||
|
template <>
|
||||||
|
script_value call(const std::string& name, const std::vector<script_value>& arguments);
|
||||||
|
|
||||||
|
template <typename T>
|
||||||
|
T call(const std::string& name, const std::vector<script_value>& arguments)
|
||||||
|
{
|
||||||
|
return call<script_value>(name, arguments).as<T>();
|
||||||
|
}
|
||||||
|
|
||||||
|
void clear_entity_fields(const entity& entity);
|
||||||
|
void clear_custom_fields();
|
||||||
|
|
||||||
|
void set_entity_field(const entity& entity, const std::string& field, const script_value& value);
|
||||||
|
script_value get_entity_field(const entity& entity, const std::string& field);
|
||||||
|
|
||||||
|
void notify(const entity& entity, const std::string& event, const std::vector<script_value>& arguments);
|
||||||
|
}
|
1109
src/game/scripting/function_tables.cpp
Normal file
1109
src/game/scripting/function_tables.cpp
Normal file
File diff suppressed because it is too large
Load Diff
81
src/game/scripting/functions.cpp
Normal file
81
src/game/scripting/functions.cpp
Normal file
@ -0,0 +1,81 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "functions.hpp"
|
||||||
|
|
||||||
|
#include <utils/string.hpp>
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
namespace
|
||||||
|
{
|
||||||
|
std::unordered_map<std::string, unsigned> lowercase_map(
|
||||||
|
const std::unordered_map<std::string, unsigned>& old_map)
|
||||||
|
{
|
||||||
|
std::unordered_map<std::string, unsigned> new_map{};
|
||||||
|
for (auto& entry : old_map)
|
||||||
|
{
|
||||||
|
new_map[utils::string::to_lower(entry.first)] = entry.second;
|
||||||
|
}
|
||||||
|
|
||||||
|
return new_map;
|
||||||
|
}
|
||||||
|
|
||||||
|
const std::unordered_map<std::string, unsigned>& get_methods()
|
||||||
|
{
|
||||||
|
static auto methods = lowercase_map(method_map);
|
||||||
|
return methods;
|
||||||
|
}
|
||||||
|
|
||||||
|
const std::unordered_map<std::string, unsigned>& get_functions()
|
||||||
|
{
|
||||||
|
static auto function = lowercase_map(function_map);
|
||||||
|
return function;
|
||||||
|
}
|
||||||
|
|
||||||
|
int find_function_index(const std::string& name, const bool prefer_global)
|
||||||
|
{
|
||||||
|
const auto target = utils::string::to_lower(name);
|
||||||
|
|
||||||
|
const auto& primary_map = prefer_global
|
||||||
|
? get_functions()
|
||||||
|
: get_methods();
|
||||||
|
const auto& secondary_map = !prefer_global
|
||||||
|
? get_functions()
|
||||||
|
: get_methods();
|
||||||
|
|
||||||
|
auto function_entry = primary_map.find(target);
|
||||||
|
if (function_entry != primary_map.end())
|
||||||
|
{
|
||||||
|
return function_entry->second;
|
||||||
|
}
|
||||||
|
|
||||||
|
function_entry = secondary_map.find(target);
|
||||||
|
if (function_entry != secondary_map.end())
|
||||||
|
{
|
||||||
|
return function_entry->second;
|
||||||
|
}
|
||||||
|
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
script_function get_function_by_index(const unsigned index)
|
||||||
|
{
|
||||||
|
static const auto function_table = 0xB153F90;
|
||||||
|
static const auto method_table = 0xB155890;
|
||||||
|
|
||||||
|
if (index < 0x2DF)
|
||||||
|
{
|
||||||
|
return reinterpret_cast<script_function*>(game::base_address + function_table)[index];
|
||||||
|
}
|
||||||
|
|
||||||
|
return reinterpret_cast<script_function*>(game::base_address + method_table)[index];
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
script_function find_function(const std::string& name, const bool prefer_global)
|
||||||
|
{
|
||||||
|
const auto index = find_function_index(name, prefer_global);
|
||||||
|
if (index < 0) return nullptr;
|
||||||
|
|
||||||
|
return get_function_by_index(index);
|
||||||
|
}
|
||||||
|
}
|
12
src/game/scripting/functions.hpp
Normal file
12
src/game/scripting/functions.hpp
Normal file
@ -0,0 +1,12 @@
|
|||||||
|
#pragma once
|
||||||
|
#include "game/game.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
extern std::unordered_map<std::string, unsigned> method_map;
|
||||||
|
extern std::unordered_map<std::string, unsigned> function_map;
|
||||||
|
|
||||||
|
using script_function = void(*)(game::scr_entref_t);
|
||||||
|
|
||||||
|
script_function find_function(const std::string& name, const bool prefer_global);
|
||||||
|
}
|
240
src/game/scripting/lua/context.cpp
Normal file
240
src/game/scripting/lua/context.cpp
Normal file
@ -0,0 +1,240 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "context.hpp"
|
||||||
|
#include "error.hpp"
|
||||||
|
#include "value_conversion.hpp"
|
||||||
|
|
||||||
|
#include "../execution.hpp"
|
||||||
|
#include "../functions.hpp"
|
||||||
|
|
||||||
|
#include "../../../component/command.hpp"
|
||||||
|
|
||||||
|
#include <utils/string.hpp>
|
||||||
|
|
||||||
|
namespace scripting::lua
|
||||||
|
{
|
||||||
|
namespace
|
||||||
|
{
|
||||||
|
void setup_entity_type(sol::state& state, event_handler& handler, scheduler& scheduler)
|
||||||
|
{
|
||||||
|
state["level"] = entity{*game::levelEntityId};
|
||||||
|
|
||||||
|
auto vector_type = state.new_usertype<vector>("vector", sol::constructors<vector(float, float, float)>());
|
||||||
|
vector_type["x"] = sol::property(&vector::get_x, &vector::set_x);
|
||||||
|
vector_type["y"] = sol::property(&vector::get_y, &vector::set_y);
|
||||||
|
vector_type["z"] = sol::property(&vector::get_z, &vector::set_z);
|
||||||
|
|
||||||
|
vector_type["r"] = sol::property(&vector::get_x, &vector::set_x);
|
||||||
|
vector_type["g"] = sol::property(&vector::get_y, &vector::set_y);
|
||||||
|
vector_type["b"] = sol::property(&vector::get_z, &vector::set_z);
|
||||||
|
|
||||||
|
auto entity_type = state.new_usertype<entity>("entity");
|
||||||
|
|
||||||
|
for (const auto& func : method_map)
|
||||||
|
{
|
||||||
|
const auto name = utils::string::to_lower(func.first);
|
||||||
|
entity_type[name.data()] = [name](const entity& entity, const sol::this_state s, sol::variadic_args va)
|
||||||
|
{
|
||||||
|
std::vector<script_value> arguments{};
|
||||||
|
|
||||||
|
for (auto arg : va)
|
||||||
|
{
|
||||||
|
arguments.push_back(convert({s, arg}));
|
||||||
|
}
|
||||||
|
|
||||||
|
return convert(s, entity.call(name, arguments));
|
||||||
|
};
|
||||||
|
}
|
||||||
|
|
||||||
|
entity_type["set"] = [](const entity& entity, const std::string& field,
|
||||||
|
const sol::lua_value& value)
|
||||||
|
{
|
||||||
|
entity.set(field, convert(value));
|
||||||
|
};
|
||||||
|
|
||||||
|
entity_type["get"] = [](const entity& entity, const sol::this_state s, const std::string& field)
|
||||||
|
{
|
||||||
|
return convert(s, entity.get(field));
|
||||||
|
};
|
||||||
|
|
||||||
|
entity_type["notify"] = [](const entity& entity, const sol::this_state s, const std::string& event,
|
||||||
|
sol::variadic_args va)
|
||||||
|
{
|
||||||
|
std::vector<script_value> arguments{};
|
||||||
|
|
||||||
|
for (auto arg : va)
|
||||||
|
{
|
||||||
|
arguments.push_back(convert({s, arg}));
|
||||||
|
}
|
||||||
|
|
||||||
|
notify(entity, event, arguments);
|
||||||
|
};
|
||||||
|
|
||||||
|
entity_type["onnotify"] = [&handler](const entity& entity, const std::string& event,
|
||||||
|
const event_callback& callback)
|
||||||
|
{
|
||||||
|
event_listener listener{};
|
||||||
|
listener.callback = callback;
|
||||||
|
listener.entity = entity;
|
||||||
|
listener.event = event;
|
||||||
|
listener.is_volatile = false;
|
||||||
|
|
||||||
|
return handler.add_event_listener(std::move(listener));
|
||||||
|
};
|
||||||
|
|
||||||
|
entity_type["onnotifyonce"] = [&handler](const entity& entity, const std::string& event,
|
||||||
|
const event_callback& callback)
|
||||||
|
{
|
||||||
|
event_listener listener{};
|
||||||
|
listener.callback = callback;
|
||||||
|
listener.entity = entity;
|
||||||
|
listener.event = event;
|
||||||
|
listener.is_volatile = true;
|
||||||
|
|
||||||
|
return handler.add_event_listener(std::move(listener));
|
||||||
|
};
|
||||||
|
|
||||||
|
entity_type["call"] = [](const entity& entity, const sol::this_state s, const std::string& function,
|
||||||
|
sol::variadic_args va)
|
||||||
|
{
|
||||||
|
std::vector<script_value> arguments{};
|
||||||
|
|
||||||
|
for (auto arg : va)
|
||||||
|
{
|
||||||
|
arguments.push_back(convert({s, arg}));
|
||||||
|
}
|
||||||
|
|
||||||
|
return convert(s, entity.call(function, arguments));
|
||||||
|
};
|
||||||
|
|
||||||
|
entity_type[sol::meta_function::new_index] = [](const entity& entity, const std::string& field,
|
||||||
|
const sol::lua_value& value)
|
||||||
|
{
|
||||||
|
entity.set(field, convert(value));
|
||||||
|
};
|
||||||
|
|
||||||
|
entity_type[sol::meta_function::index] = [](const entity& entity, const sol::this_state s, const std::string& field)
|
||||||
|
{
|
||||||
|
return convert(s, entity.get(field));
|
||||||
|
};
|
||||||
|
|
||||||
|
struct game
|
||||||
|
{
|
||||||
|
};
|
||||||
|
auto game_type = state.new_usertype<game>("game_");
|
||||||
|
state["game"] = game();
|
||||||
|
|
||||||
|
for (const auto& func : function_map)
|
||||||
|
{
|
||||||
|
const auto name = utils::string::to_lower(func.first);
|
||||||
|
game_type[name] = [name](const game&, const sol::this_state s, sol::variadic_args va)
|
||||||
|
{
|
||||||
|
std::vector<script_value> arguments{};
|
||||||
|
|
||||||
|
for (auto arg : va)
|
||||||
|
{
|
||||||
|
arguments.push_back(convert({s, arg}));
|
||||||
|
}
|
||||||
|
|
||||||
|
return convert(s, call(name, arguments));
|
||||||
|
};
|
||||||
|
}
|
||||||
|
|
||||||
|
game_type["call"] = [](const game&, const sol::this_state s, const std::string& function,
|
||||||
|
sol::variadic_args va)
|
||||||
|
{
|
||||||
|
std::vector<script_value> arguments{};
|
||||||
|
|
||||||
|
for (auto arg : va)
|
||||||
|
{
|
||||||
|
arguments.push_back(convert({s, arg}));
|
||||||
|
}
|
||||||
|
|
||||||
|
return convert(s, call(function, arguments));
|
||||||
|
};
|
||||||
|
|
||||||
|
game_type["ontimeout"] = [&scheduler](const game&, const sol::protected_function& callback,
|
||||||
|
const long long milliseconds)
|
||||||
|
{
|
||||||
|
return scheduler.add(callback, milliseconds, true);
|
||||||
|
};
|
||||||
|
|
||||||
|
game_type["oninterval"] = [&scheduler](const game&, const sol::protected_function& callback,
|
||||||
|
const long long milliseconds)
|
||||||
|
{
|
||||||
|
return scheduler.add(callback, milliseconds, false);
|
||||||
|
};
|
||||||
|
|
||||||
|
game_type["executecommand"] = [](const game&, const std::string& command)
|
||||||
|
{
|
||||||
|
command::execute(command, false);
|
||||||
|
};
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
context::context(std::string folder)
|
||||||
|
: folder_(std::move(folder))
|
||||||
|
, scheduler_(state_)
|
||||||
|
, event_handler_(state_)
|
||||||
|
|
||||||
|
{
|
||||||
|
this->state_.open_libraries(sol::lib::base,
|
||||||
|
sol::lib::package,
|
||||||
|
sol::lib::io,
|
||||||
|
sol::lib::string,
|
||||||
|
sol::lib::os,
|
||||||
|
sol::lib::math,
|
||||||
|
sol::lib::table);
|
||||||
|
|
||||||
|
this->state_["include"] = [this](const std::string& file)
|
||||||
|
{
|
||||||
|
this->load_script(file);
|
||||||
|
};
|
||||||
|
|
||||||
|
sol::function old_require = this->state_["require"];
|
||||||
|
auto base_path = utils::string::replace(this->folder_, "/", ".") + ".";
|
||||||
|
this->state_["require"] = [base_path, old_require](const std::string& path)
|
||||||
|
{
|
||||||
|
return old_require(base_path + path);
|
||||||
|
};
|
||||||
|
|
||||||
|
this->state_["scriptdir"] = [this]()
|
||||||
|
{
|
||||||
|
return this->folder_;
|
||||||
|
};
|
||||||
|
|
||||||
|
setup_entity_type(this->state_, this->event_handler_, this->scheduler_);
|
||||||
|
|
||||||
|
printf("Loading script '%s'\n", this->folder_.data());
|
||||||
|
this->load_script("__init__");
|
||||||
|
}
|
||||||
|
|
||||||
|
context::~context()
|
||||||
|
{
|
||||||
|
this->state_.collect_garbage();
|
||||||
|
this->scheduler_.clear();
|
||||||
|
this->event_handler_.clear();
|
||||||
|
this->state_ = {};
|
||||||
|
}
|
||||||
|
|
||||||
|
void context::run_frame()
|
||||||
|
{
|
||||||
|
this->scheduler_.run_frame();
|
||||||
|
this->state_.collect_garbage();
|
||||||
|
}
|
||||||
|
|
||||||
|
void context::notify(const event& e)
|
||||||
|
{
|
||||||
|
this->event_handler_.dispatch(e);
|
||||||
|
}
|
||||||
|
|
||||||
|
void context::load_script(const std::string& script)
|
||||||
|
{
|
||||||
|
if (!this->loaded_scripts_.emplace(script).second)
|
||||||
|
{
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
const auto file = (std::filesystem::path{this->folder_} / (script + ".lua")).generic_string();
|
||||||
|
handle_error(this->state_.safe_script_file(file, &sol::script_pass_on_error));
|
||||||
|
}
|
||||||
|
}
|
39
src/game/scripting/lua/context.hpp
Normal file
39
src/game/scripting/lua/context.hpp
Normal file
@ -0,0 +1,39 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include "../event.hpp"
|
||||||
|
|
||||||
|
#define SOL_ALL_SAFETIES_ON 1
|
||||||
|
#define SOL_PRINT_ERRORS 0
|
||||||
|
#include <sol/sol.hpp>
|
||||||
|
|
||||||
|
#include "scheduler.hpp"
|
||||||
|
#include "event_handler.hpp"
|
||||||
|
|
||||||
|
namespace scripting::lua
|
||||||
|
{
|
||||||
|
class context
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
context(std::string folder);
|
||||||
|
~context();
|
||||||
|
|
||||||
|
context(context&&) noexcept = delete;
|
||||||
|
context& operator=(context&&) noexcept = delete;
|
||||||
|
|
||||||
|
context(const context&) = delete;
|
||||||
|
context& operator=(const context&) = delete;
|
||||||
|
|
||||||
|
void run_frame();
|
||||||
|
void notify(const event& e);
|
||||||
|
|
||||||
|
private:
|
||||||
|
sol::state state_{};
|
||||||
|
std::string folder_;
|
||||||
|
std::unordered_set<std::string> loaded_scripts_;
|
||||||
|
|
||||||
|
scheduler scheduler_;
|
||||||
|
event_handler event_handler_;
|
||||||
|
|
||||||
|
void load_script(const std::string& script);
|
||||||
|
};
|
||||||
|
}
|
67
src/game/scripting/lua/engine.cpp
Normal file
67
src/game/scripting/lua/engine.cpp
Normal file
@ -0,0 +1,67 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "engine.hpp"
|
||||||
|
#include "context.hpp"
|
||||||
|
|
||||||
|
#include "../execution.hpp"
|
||||||
|
|
||||||
|
#include <utils/io.hpp>
|
||||||
|
|
||||||
|
namespace scripting::lua::engine
|
||||||
|
{
|
||||||
|
namespace
|
||||||
|
{
|
||||||
|
auto& get_scripts()
|
||||||
|
{
|
||||||
|
static std::vector<std::unique_ptr<context>> scripts{};
|
||||||
|
return scripts;
|
||||||
|
}
|
||||||
|
|
||||||
|
void load_scripts()
|
||||||
|
{
|
||||||
|
const auto script_dir = "scripts/"s;
|
||||||
|
|
||||||
|
if (!utils::io::directory_exists(script_dir))
|
||||||
|
{
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
const auto scripts = utils::io::list_files(script_dir);
|
||||||
|
|
||||||
|
for (const auto& script : scripts)
|
||||||
|
{
|
||||||
|
if (std::filesystem::is_directory(script) && utils::io::file_exists(script + "/__init__.lua"))
|
||||||
|
{
|
||||||
|
get_scripts().push_back(std::make_unique<context>(script));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void start()
|
||||||
|
{
|
||||||
|
clear_custom_fields();
|
||||||
|
get_scripts().clear();
|
||||||
|
load_scripts();
|
||||||
|
}
|
||||||
|
|
||||||
|
void stop()
|
||||||
|
{
|
||||||
|
get_scripts().clear();
|
||||||
|
}
|
||||||
|
|
||||||
|
void notify(const event& e)
|
||||||
|
{
|
||||||
|
for (auto& script : get_scripts())
|
||||||
|
{
|
||||||
|
script->notify(e);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void run_frame()
|
||||||
|
{
|
||||||
|
for (auto& script : get_scripts())
|
||||||
|
{
|
||||||
|
script->run_frame();
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
11
src/game/scripting/lua/engine.hpp
Normal file
11
src/game/scripting/lua/engine.hpp
Normal file
@ -0,0 +1,11 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include "../event.hpp"
|
||||||
|
|
||||||
|
namespace scripting::lua::engine
|
||||||
|
{
|
||||||
|
void start();
|
||||||
|
void stop();
|
||||||
|
void notify(const event& e);
|
||||||
|
void run_frame();
|
||||||
|
}
|
37
src/game/scripting/lua/error.cpp
Normal file
37
src/game/scripting/lua/error.cpp
Normal file
@ -0,0 +1,37 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "error.hpp"
|
||||||
|
#include "../execution.hpp"
|
||||||
|
|
||||||
|
#include "component/game_console.hpp"
|
||||||
|
|
||||||
|
namespace scripting::lua
|
||||||
|
{
|
||||||
|
namespace
|
||||||
|
{
|
||||||
|
void notify_error()
|
||||||
|
{
|
||||||
|
try
|
||||||
|
{
|
||||||
|
call("iprintln", {"^1Script execution error!"});
|
||||||
|
}
|
||||||
|
catch (...)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void handle_error(const sol::protected_function_result& result)
|
||||||
|
{
|
||||||
|
if (!result.valid())
|
||||||
|
{
|
||||||
|
game_console::print(game_console::con_type_error, "************** Script execution error **************\n");
|
||||||
|
|
||||||
|
const sol::error err = result;
|
||||||
|
game_console::print(game_console::con_type_error, "%s\n", err.what());
|
||||||
|
|
||||||
|
game_console::print(game_console::con_type_error, "****************************************************\n");
|
||||||
|
|
||||||
|
notify_error();
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
8
src/game/scripting/lua/error.hpp
Normal file
8
src/game/scripting/lua/error.hpp
Normal file
@ -0,0 +1,8 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include "context.hpp"
|
||||||
|
|
||||||
|
namespace scripting::lua
|
||||||
|
{
|
||||||
|
void handle_error(const sol::protected_function_result& result);
|
||||||
|
}
|
119
src/game/scripting/lua/event_handler.cpp
Normal file
119
src/game/scripting/lua/event_handler.cpp
Normal file
@ -0,0 +1,119 @@
|
|||||||
|
#include "stdinc.hpp"
|
||||||
|
#include "context.hpp"
|
||||||
|
#include "error.hpp"
|
||||||
|
#include "value_conversion.hpp"
|
||||||
|
|
||||||
|
namespace scripting::lua
|
||||||
|
{
|
||||||
|
event_handler::event_handler(sol::state& state)
|
||||||
|
: state_(state)
|
||||||
|
{
|
||||||
|
auto event_listener_handle_type = state.new_usertype<event_listener_handle>("event_listener_handle");
|
||||||
|
|
||||||
|
event_listener_handle_type["clear"] = [this](const event_listener_handle& handle)
|
||||||
|
{
|
||||||
|
this->remove(handle);
|
||||||
|
};
|
||||||
|
}
|
||||||
|
|
||||||
|
void event_handler::dispatch(const event& event)
|
||||||
|
{
|
||||||
|
std::vector<sol::lua_value> arguments;
|
||||||
|
|
||||||
|
for (const auto& argument : event.arguments)
|
||||||
|
{
|
||||||
|
arguments.emplace_back(convert(this->state_, argument));
|
||||||
|
}
|
||||||
|
|
||||||
|
this->dispatch_to_specific_listeners(event, arguments);
|
||||||
|
}
|
||||||
|
|
||||||
|
void event_handler::dispatch_to_specific_listeners(const event& event,
|
||||||
|
const event_arguments& arguments)
|
||||||
|
{
|
||||||
|
callbacks_.access([&](task_list& tasks)
|
||||||
|
{
|
||||||
|
this->merge_callbacks();
|
||||||
|
|
||||||
|
for (auto i = tasks.begin(); i != tasks.end();)
|
||||||
|
{
|
||||||
|
if (i->event != event.name || i->entity != event.entity)
|
||||||
|
{
|
||||||
|
++i;
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!i->is_deleted)
|
||||||
|
{
|
||||||
|
handle_error(i->callback(sol::as_args(arguments)));
|
||||||
|
}
|
||||||
|
|
||||||
|
if (i->is_volatile || i->is_deleted)
|
||||||
|
{
|
||||||
|
i = tasks.erase(i);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
++i;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
});
|
||||||
|
}
|
||||||
|
|
||||||
|
event_listener_handle event_handler::add_event_listener(event_listener&& listener)
|
||||||
|
{
|
||||||
|
const uint64_t id = ++this->current_listener_id_;
|
||||||
|
listener.id = id;
|
||||||
|
listener.is_deleted = false;
|
||||||
|
|
||||||
|
new_callbacks_.access([&listener](task_list& tasks)
|
||||||
|
{
|
||||||
|
tasks.emplace_back(std::move(listener));
|
||||||
|
});
|
||||||
|
|
||||||
|
return {id};
|
||||||
|
}
|
||||||
|
|
||||||
|
void event_handler::clear()
|
||||||
|
{
|
||||||
|
callbacks_.access([&](task_list& tasks)
|
||||||
|
{
|
||||||
|
new_callbacks_.access([&](task_list& new_tasks)
|
||||||
|
{
|
||||||
|
new_tasks.clear();
|
||||||
|
tasks.clear();
|
||||||
|
});
|
||||||
|
});
|
||||||
|
}
|
||||||
|
|
||||||
|
void event_handler::remove(const event_listener_handle& handle)
|
||||||
|
{
|
||||||
|
auto mask_as_deleted = [&](task_list& tasks)
|
||||||
|
{
|
||||||
|
for (auto& task : tasks)
|
||||||
|
{
|
||||||
|
if (task.id == handle.id)
|
||||||
|
{
|
||||||
|
task.is_deleted = true;
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
};
|
||||||
|
|
||||||
|
callbacks_.access(mask_as_deleted);
|
||||||
|
new_callbacks_.access(mask_as_deleted);
|
||||||
|
}
|
||||||
|
|
||||||
|
void event_handler::merge_callbacks()
|
||||||
|
{
|
||||||
|
callbacks_.access([&](task_list& tasks)
|
||||||
|
{
|
||||||
|
new_callbacks_.access([&](task_list& new_tasks)
|
||||||
|
{
|
||||||
|
tasks.insert(tasks.end(), std::move_iterator<task_list::iterator>(new_tasks.begin()),
|
||||||
|
std::move_iterator<task_list::iterator>(new_tasks.end()));
|
||||||
|
new_tasks = {};
|
||||||
|
});
|
||||||
|
});
|
||||||
|
}
|
||||||
|
}
|
54
src/game/scripting/lua/event_handler.hpp
Normal file
54
src/game/scripting/lua/event_handler.hpp
Normal file
@ -0,0 +1,54 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
namespace scripting::lua
|
||||||
|
{
|
||||||
|
using event_arguments = std::vector<sol::lua_value>;
|
||||||
|
using event_callback = sol::protected_function;
|
||||||
|
|
||||||
|
class event_listener_handle
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
uint64_t id = 0;
|
||||||
|
};
|
||||||
|
|
||||||
|
class event_listener final : public event_listener_handle
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
std::string event = {};
|
||||||
|
entity entity{};
|
||||||
|
event_callback callback = {};
|
||||||
|
bool is_volatile = false;
|
||||||
|
bool is_deleted = false;
|
||||||
|
};
|
||||||
|
|
||||||
|
class event_handler final
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
event_handler(sol::state& state);
|
||||||
|
|
||||||
|
event_handler(event_handler&&) noexcept = delete;
|
||||||
|
event_handler& operator=(event_handler&&) noexcept = delete;
|
||||||
|
|
||||||
|
event_handler(const scheduler&) = delete;
|
||||||
|
event_handler& operator=(const event_handler&) = delete;
|
||||||
|
|
||||||
|
void dispatch(const event& event);
|
||||||
|
|
||||||
|
event_listener_handle add_event_listener(event_listener&& listener);
|
||||||
|
|
||||||
|
void clear();
|
||||||
|
|
||||||
|
private:
|
||||||
|
sol::state& state_;
|
||||||
|
std::atomic_int64_t current_listener_id_ = 0;
|
||||||
|
|
||||||
|
using task_list = std::vector<event_listener>;
|
||||||
|
utils::concurrency::container<task_list> new_callbacks_;
|
||||||
|
utils::concurrency::container<task_list, std::recursive_mutex> callbacks_;
|
||||||
|
|
||||||
|
void dispatch_to_specific_listeners(const event& event, const event_arguments& arguments);
|
||||||
|
|
||||||
|
void remove(const event_listener_handle& handle);
|
||||||
|
void merge_callbacks();
|
||||||
|
};
|
||||||
|
}
|
122
src/game/scripting/lua/scheduler.cpp
Normal file
122
src/game/scripting/lua/scheduler.cpp
Normal file
@ -0,0 +1,122 @@
|
|||||||
|
#include "stdinc.hpp"
|
||||||
|
#include "context.hpp"
|
||||||
|
#include "error.hpp"
|
||||||
|
|
||||||
|
namespace scripting::lua
|
||||||
|
{
|
||||||
|
scheduler::scheduler(sol::state& state)
|
||||||
|
{
|
||||||
|
auto task_handle_type = state.new_usertype<task_handle>("task_handle");
|
||||||
|
|
||||||
|
task_handle_type["clear"] = [this](const task_handle& handle)
|
||||||
|
{
|
||||||
|
this->remove(handle);
|
||||||
|
};
|
||||||
|
}
|
||||||
|
|
||||||
|
void scheduler::run_frame()
|
||||||
|
{
|
||||||
|
callbacks_.access([&](task_list& tasks)
|
||||||
|
{
|
||||||
|
this->merge_callbacks();
|
||||||
|
|
||||||
|
for (auto i = tasks.begin(); i != tasks.end();)
|
||||||
|
{
|
||||||
|
const auto now = std::chrono::high_resolution_clock::now();
|
||||||
|
const auto diff = now - i->last_call;
|
||||||
|
|
||||||
|
if (diff < i->delay)
|
||||||
|
{
|
||||||
|
++i;
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
i->last_call = now;
|
||||||
|
|
||||||
|
if (!i->is_deleted)
|
||||||
|
{
|
||||||
|
handle_error(i->callback());
|
||||||
|
}
|
||||||
|
|
||||||
|
if (i->is_volatile || i->is_deleted)
|
||||||
|
{
|
||||||
|
i = tasks.erase(i);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
++i;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
});
|
||||||
|
}
|
||||||
|
|
||||||
|
void scheduler::clear()
|
||||||
|
{
|
||||||
|
callbacks_.access([&](task_list& tasks)
|
||||||
|
{
|
||||||
|
new_callbacks_.access([&](task_list& new_tasks)
|
||||||
|
{
|
||||||
|
new_tasks.clear();
|
||||||
|
tasks.clear();
|
||||||
|
});
|
||||||
|
});
|
||||||
|
}
|
||||||
|
|
||||||
|
task_handle scheduler::add(const sol::protected_function& callback, const long long milliseconds,
|
||||||
|
const bool is_volatile)
|
||||||
|
{
|
||||||
|
return this->add(callback, std::chrono::milliseconds(milliseconds), is_volatile);
|
||||||
|
}
|
||||||
|
|
||||||
|
task_handle scheduler::add(const sol::protected_function& callback, const std::chrono::milliseconds delay,
|
||||||
|
const bool is_volatile)
|
||||||
|
{
|
||||||
|
const uint64_t id = ++this->current_task_id_;
|
||||||
|
|
||||||
|
task task;
|
||||||
|
task.is_volatile = is_volatile;
|
||||||
|
task.callback = callback;
|
||||||
|
task.delay = delay;
|
||||||
|
task.last_call = std::chrono::steady_clock::now();
|
||||||
|
task.id = id;
|
||||||
|
task.is_deleted = false;
|
||||||
|
|
||||||
|
new_callbacks_.access([&task](task_list& tasks)
|
||||||
|
{
|
||||||
|
tasks.emplace_back(std::move(task));
|
||||||
|
});
|
||||||
|
|
||||||
|
return {id};
|
||||||
|
}
|
||||||
|
|
||||||
|
void scheduler::remove(const task_handle& handle)
|
||||||
|
{
|
||||||
|
auto mask_as_deleted = [&](task_list& tasks)
|
||||||
|
{
|
||||||
|
for (auto& task : tasks)
|
||||||
|
{
|
||||||
|
if (task.id == handle.id)
|
||||||
|
{
|
||||||
|
task.is_deleted = true;
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
};
|
||||||
|
|
||||||
|
callbacks_.access(mask_as_deleted);
|
||||||
|
new_callbacks_.access(mask_as_deleted);
|
||||||
|
}
|
||||||
|
|
||||||
|
void scheduler::merge_callbacks()
|
||||||
|
{
|
||||||
|
callbacks_.access([&](task_list& tasks)
|
||||||
|
{
|
||||||
|
new_callbacks_.access([&](task_list& new_tasks)
|
||||||
|
{
|
||||||
|
tasks.insert(tasks.end(), std::move_iterator<task_list::iterator>(new_tasks.begin()),
|
||||||
|
std::move_iterator<task_list::iterator>(new_tasks.end()));
|
||||||
|
new_tasks = {};
|
||||||
|
});
|
||||||
|
});
|
||||||
|
}
|
||||||
|
}
|
50
src/game/scripting/lua/scheduler.hpp
Normal file
50
src/game/scripting/lua/scheduler.hpp
Normal file
@ -0,0 +1,50 @@
|
|||||||
|
#pragma once
|
||||||
|
#include <utils/concurrency.hpp>
|
||||||
|
|
||||||
|
namespace scripting::lua
|
||||||
|
{
|
||||||
|
class context;
|
||||||
|
|
||||||
|
class task_handle
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
uint64_t id = 0;
|
||||||
|
};
|
||||||
|
|
||||||
|
class task final : public task_handle
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
std::chrono::steady_clock::time_point last_call{};
|
||||||
|
sol::protected_function callback{};
|
||||||
|
std::chrono::milliseconds delay{};
|
||||||
|
bool is_volatile = false;
|
||||||
|
bool is_deleted = false;
|
||||||
|
};
|
||||||
|
|
||||||
|
class scheduler final
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
scheduler(sol::state& state);
|
||||||
|
|
||||||
|
scheduler(scheduler&&) noexcept = delete;
|
||||||
|
scheduler& operator=(scheduler&&) noexcept = delete;
|
||||||
|
|
||||||
|
scheduler(const scheduler&) = delete;
|
||||||
|
scheduler& operator=(const scheduler&) = delete;
|
||||||
|
|
||||||
|
void run_frame();
|
||||||
|
void clear();
|
||||||
|
|
||||||
|
task_handle add(const sol::protected_function& callback, long long milliseconds, bool is_volatile);
|
||||||
|
task_handle add(const sol::protected_function& callback, std::chrono::milliseconds delay, bool is_volatile);
|
||||||
|
|
||||||
|
private:
|
||||||
|
using task_list = std::vector<task>;
|
||||||
|
utils::concurrency::container<task_list> new_callbacks_;
|
||||||
|
utils::concurrency::container<task_list, std::recursive_mutex> callbacks_;
|
||||||
|
std::atomic_int64_t current_task_id_ = 0;
|
||||||
|
|
||||||
|
void remove(const task_handle& handle);
|
||||||
|
void merge_callbacks();
|
||||||
|
};
|
||||||
|
}
|
192
src/game/scripting/lua/value_conversion.cpp
Normal file
192
src/game/scripting/lua/value_conversion.cpp
Normal file
@ -0,0 +1,192 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "value_conversion.hpp"
|
||||||
|
|
||||||
|
namespace scripting::lua
|
||||||
|
{
|
||||||
|
/*namespace
|
||||||
|
{
|
||||||
|
struct array_value
|
||||||
|
{
|
||||||
|
int index;
|
||||||
|
script_value value;
|
||||||
|
};
|
||||||
|
|
||||||
|
sol::lua_value entity_to_array(lua_State* state, unsigned int id)
|
||||||
|
{
|
||||||
|
auto table = sol::table::create(state);
|
||||||
|
auto metatable = sol::table::create(state);
|
||||||
|
|
||||||
|
std::unordered_map<std::string, array_value> values;
|
||||||
|
|
||||||
|
const auto offset = 64000 * (id & 3);
|
||||||
|
|
||||||
|
auto current = game::scr_VarGlob->objectVariableChildren[id].firstChild;
|
||||||
|
auto idx = 1;
|
||||||
|
|
||||||
|
for (auto i = offset + current; current; i = offset + current)
|
||||||
|
{
|
||||||
|
const auto var = game::scr_VarGlob->childVariableValue[i];
|
||||||
|
|
||||||
|
if (var.type == game::SCRIPT_NONE)
|
||||||
|
{
|
||||||
|
current = var.nextSibling;
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
const auto string_value = (game::scr_string_t)((unsigned __int8)var.name_lo + (var.k.keys.name_hi << 8));
|
||||||
|
const auto* str = game::SL_ConvertToString(string_value);
|
||||||
|
|
||||||
|
std::string key = string_value < 0x40000 && str
|
||||||
|
? str
|
||||||
|
: std::to_string(idx++);
|
||||||
|
|
||||||
|
game::VariableValue variable{};
|
||||||
|
variable.type = var.type;
|
||||||
|
variable.u = var.u.u;
|
||||||
|
|
||||||
|
array_value value;
|
||||||
|
value.index = i;
|
||||||
|
value.value = variable;
|
||||||
|
|
||||||
|
values[key] = value;
|
||||||
|
|
||||||
|
current = var.nextSibling;
|
||||||
|
}
|
||||||
|
|
||||||
|
table["getkeys"] = [values]()
|
||||||
|
{
|
||||||
|
std::vector<std::string> _keys;
|
||||||
|
|
||||||
|
for (const auto& entry : values)
|
||||||
|
{
|
||||||
|
_keys.push_back(entry.first);
|
||||||
|
}
|
||||||
|
|
||||||
|
return _keys;
|
||||||
|
};
|
||||||
|
|
||||||
|
metatable[sol::meta_function::new_index] = [values](const sol::table t, const sol::this_state s,
|
||||||
|
const sol::lua_value& key_value, const sol::lua_value& value)
|
||||||
|
{
|
||||||
|
const auto key = key_value.is<int>()
|
||||||
|
? std::to_string(key_value.as<int>())
|
||||||
|
: key_value.as<std::string>();
|
||||||
|
|
||||||
|
if (values.find(key) == values.end())
|
||||||
|
{
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
const auto variable = convert({s, value}).get_raw();
|
||||||
|
const auto i = values.at(key).index;
|
||||||
|
|
||||||
|
game::scr_VarGlob->childVariableValue[i].type = (char)variable.type;
|
||||||
|
game::scr_VarGlob->childVariableValue[i].u.u = variable.u;
|
||||||
|
};
|
||||||
|
|
||||||
|
metatable[sol::meta_function::index] = [values](const sol::table t, const sol::this_state s,
|
||||||
|
const sol::lua_value& key_value)
|
||||||
|
{
|
||||||
|
const auto key = key_value.is<int>()
|
||||||
|
? std::to_string(key_value.as<int>())
|
||||||
|
: key_value.as<std::string>();
|
||||||
|
|
||||||
|
if (values.find(key) == values.end())
|
||||||
|
{
|
||||||
|
return sol::lua_value{};
|
||||||
|
}
|
||||||
|
|
||||||
|
return convert(s, values.at(key).value);
|
||||||
|
};
|
||||||
|
|
||||||
|
metatable[sol::meta_function::length] = [values]()
|
||||||
|
{
|
||||||
|
return values.size();
|
||||||
|
};
|
||||||
|
|
||||||
|
table[sol::metatable_key] = metatable;
|
||||||
|
|
||||||
|
return {state, table};
|
||||||
|
}
|
||||||
|
}*/
|
||||||
|
|
||||||
|
script_value convert(const sol::lua_value& value)
|
||||||
|
{
|
||||||
|
if (value.is<int>())
|
||||||
|
{
|
||||||
|
return {value.as<int>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
if (value.is<unsigned int>())
|
||||||
|
{
|
||||||
|
return {value.as<unsigned int>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
if (value.is<bool>())
|
||||||
|
{
|
||||||
|
return {value.as<bool>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
if (value.is<double>())
|
||||||
|
{
|
||||||
|
return {value.as<double>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
if (value.is<float>())
|
||||||
|
{
|
||||||
|
return {value.as<float>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
if (value.is<std::string>())
|
||||||
|
{
|
||||||
|
return {value.as<std::string>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
if (value.is<entity>())
|
||||||
|
{
|
||||||
|
return {value.as<entity>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
if (value.is<vector>())
|
||||||
|
{
|
||||||
|
return {value.as<vector>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
return {};
|
||||||
|
}
|
||||||
|
|
||||||
|
sol::lua_value convert(lua_State* state, const script_value& value)
|
||||||
|
{
|
||||||
|
if (value.is<int>())
|
||||||
|
{
|
||||||
|
return {state, value.as<int>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
if (value.is<float>())
|
||||||
|
{
|
||||||
|
return {state, value.as<float>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
if (value.is<std::string>())
|
||||||
|
{
|
||||||
|
return {state, value.as<std::string>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
/*if (value.is<std::vector<script_value>>())
|
||||||
|
{
|
||||||
|
return entity_to_array(state, value.get_raw().u.uintValue);
|
||||||
|
}*/
|
||||||
|
|
||||||
|
if (value.is<entity>())
|
||||||
|
{
|
||||||
|
return {state, value.as<entity>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
if (value.is<vector>())
|
||||||
|
{
|
||||||
|
return {state, value.as<vector>()};
|
||||||
|
}
|
||||||
|
|
||||||
|
return {};
|
||||||
|
}
|
||||||
|
}
|
9
src/game/scripting/lua/value_conversion.hpp
Normal file
9
src/game/scripting/lua/value_conversion.hpp
Normal file
@ -0,0 +1,9 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include "context.hpp"
|
||||||
|
|
||||||
|
namespace scripting::lua
|
||||||
|
{
|
||||||
|
script_value convert(const sol::lua_value& value);
|
||||||
|
sol::lua_value convert(lua_State* state, const script_value& value);
|
||||||
|
}
|
72
src/game/scripting/safe_execution.cpp
Normal file
72
src/game/scripting/safe_execution.cpp
Normal file
@ -0,0 +1,72 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "safe_execution.hpp"
|
||||||
|
|
||||||
|
#pragma warning(push)
|
||||||
|
#pragma warning(disable: 4611)
|
||||||
|
|
||||||
|
namespace scripting::safe_execution
|
||||||
|
{
|
||||||
|
namespace
|
||||||
|
{
|
||||||
|
bool execute_with_seh(const script_function function, const game::scr_entref_t& entref)
|
||||||
|
{
|
||||||
|
__try
|
||||||
|
{
|
||||||
|
function(entref);
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
__except (EXCEPTION_EXECUTE_HANDLER)
|
||||||
|
{
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
bool call(const script_function function, const game::scr_entref_t& entref)
|
||||||
|
{
|
||||||
|
*game::g_script_error_level += 1;
|
||||||
|
if (game::_setjmp(&game::g_script_error[*game::g_script_error_level]))
|
||||||
|
{
|
||||||
|
*game::g_script_error_level -= 1;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
const auto result = execute_with_seh(function, entref);
|
||||||
|
*game::g_script_error_level -= 1;
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool set_entity_field(const game::scr_entref_t& entref, const int offset)
|
||||||
|
{
|
||||||
|
*game::g_script_error_level += 1;
|
||||||
|
if (game::_setjmp(&game::g_script_error[*game::g_script_error_level]))
|
||||||
|
{
|
||||||
|
*game::g_script_error_level -= 1;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
game::Scr_SetObjectField(entref.classnum, entref.entnum, offset);
|
||||||
|
|
||||||
|
*game::g_script_error_level -= 1;
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool get_entity_field(const game::scr_entref_t& entref, const int offset, game::VariableValue* value)
|
||||||
|
{
|
||||||
|
*game::g_script_error_level += 1;
|
||||||
|
if (game::_setjmp(&game::g_script_error[*game::g_script_error_level]))
|
||||||
|
{
|
||||||
|
value->type = game::SCRIPT_NONE;
|
||||||
|
value->u.intValue = 0;
|
||||||
|
*game::g_script_error_level -= 1;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
game::GetEntityFieldValue(value, entref.classnum, entref.entnum, offset);
|
||||||
|
|
||||||
|
*game::g_script_error_level -= 1;
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
#pragma warning(pop)
|
10
src/game/scripting/safe_execution.hpp
Normal file
10
src/game/scripting/safe_execution.hpp
Normal file
@ -0,0 +1,10 @@
|
|||||||
|
#pragma once
|
||||||
|
#include "functions.hpp"
|
||||||
|
|
||||||
|
namespace scripting::safe_execution
|
||||||
|
{
|
||||||
|
bool call(script_function function, const game::scr_entref_t& entref);
|
||||||
|
|
||||||
|
bool set_entity_field(const game::scr_entref_t& entref, int offset);
|
||||||
|
bool get_entity_field(const game::scr_entref_t& entref, int offset, game::VariableValue* value);
|
||||||
|
}
|
252
src/game/scripting/script_value.cpp
Normal file
252
src/game/scripting/script_value.cpp
Normal file
@ -0,0 +1,252 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "script_value.hpp"
|
||||||
|
#include "entity.hpp"
|
||||||
|
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
/***************************************************************
|
||||||
|
* Constructors
|
||||||
|
**************************************************************/
|
||||||
|
|
||||||
|
script_value::script_value(const game::VariableValue& value)
|
||||||
|
: value_(value)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value::script_value(const int value)
|
||||||
|
{
|
||||||
|
game::VariableValue variable{};
|
||||||
|
variable.type = game::SCRIPT_INTEGER;
|
||||||
|
variable.u.intValue = value;
|
||||||
|
|
||||||
|
this->value_ = variable;
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value::script_value(const unsigned int value)
|
||||||
|
{
|
||||||
|
game::VariableValue variable{};
|
||||||
|
variable.type = game::SCRIPT_INTEGER;
|
||||||
|
variable.u.uintValue = value;
|
||||||
|
|
||||||
|
this->value_ = variable;
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value::script_value(const bool value)
|
||||||
|
: script_value(static_cast<unsigned>(value))
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value::script_value(const float value)
|
||||||
|
{
|
||||||
|
game::VariableValue variable{};
|
||||||
|
variable.type = game::SCRIPT_FLOAT;
|
||||||
|
variable.u.floatValue = value;
|
||||||
|
|
||||||
|
this->value_ = variable;
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value::script_value(const double value)
|
||||||
|
: script_value(static_cast<float>(value))
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value::script_value(const char* value)
|
||||||
|
{
|
||||||
|
game::VariableValue variable{};
|
||||||
|
variable.type = game::SCRIPT_STRING;
|
||||||
|
variable.u.stringValue = game::SL_GetString(value, 0);
|
||||||
|
|
||||||
|
const auto _ = gsl::finally([&variable]()
|
||||||
|
{
|
||||||
|
game::RemoveRefToValue(variable.type, variable.u);
|
||||||
|
});
|
||||||
|
|
||||||
|
this->value_ = variable;
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value::script_value(const std::string& value)
|
||||||
|
: script_value(value.data())
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value::script_value(const entity& value)
|
||||||
|
{
|
||||||
|
game::VariableValue variable{};
|
||||||
|
variable.type = game::SCRIPT_OBJECT;
|
||||||
|
variable.u.pointerValue = value.get_entity_id();
|
||||||
|
|
||||||
|
this->value_ = variable;
|
||||||
|
}
|
||||||
|
|
||||||
|
script_value::script_value(const vector& value)
|
||||||
|
{
|
||||||
|
game::VariableValue variable{};
|
||||||
|
variable.type = game::SCRIPT_VECTOR;
|
||||||
|
variable.u.vectorValue = game::Scr_AllocVector(value);
|
||||||
|
|
||||||
|
const auto _ = gsl::finally([&variable]()
|
||||||
|
{
|
||||||
|
game::RemoveRefToValue(variable.type, variable.u);
|
||||||
|
});
|
||||||
|
|
||||||
|
this->value_ = variable;
|
||||||
|
}
|
||||||
|
|
||||||
|
/***************************************************************
|
||||||
|
* Integer
|
||||||
|
**************************************************************/
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::is<int>() const
|
||||||
|
{
|
||||||
|
return this->get_raw().type == game::SCRIPT_INTEGER;
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::is<unsigned int>() const
|
||||||
|
{
|
||||||
|
return this->is<int>();
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::is<bool>() const
|
||||||
|
{
|
||||||
|
return this->is<int>();
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
int script_value::get() const
|
||||||
|
{
|
||||||
|
return this->get_raw().u.intValue;
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
unsigned int script_value::get() const
|
||||||
|
{
|
||||||
|
return this->get_raw().u.uintValue;
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::get() const
|
||||||
|
{
|
||||||
|
return this->get_raw().u.uintValue != 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
/***************************************************************
|
||||||
|
* Float
|
||||||
|
**************************************************************/
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::is<float>() const
|
||||||
|
{
|
||||||
|
return this->get_raw().type == game::SCRIPT_FLOAT;
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::is<double>() const
|
||||||
|
{
|
||||||
|
return this->is<float>();
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
float script_value::get() const
|
||||||
|
{
|
||||||
|
return this->get_raw().u.floatValue;
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
double script_value::get() const
|
||||||
|
{
|
||||||
|
return static_cast<double>(this->get_raw().u.floatValue);
|
||||||
|
}
|
||||||
|
|
||||||
|
/***************************************************************
|
||||||
|
* String
|
||||||
|
**************************************************************/
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::is<const char*>() const
|
||||||
|
{
|
||||||
|
return this->get_raw().type == game::SCRIPT_STRING;
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::is<std::string>() const
|
||||||
|
{
|
||||||
|
return this->is<const char*>();
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
const char* script_value::get() const
|
||||||
|
{
|
||||||
|
return game::SL_ConvertToString(static_cast<game::scr_string_t>(this->get_raw().u.stringValue));
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
std::string script_value::get() const
|
||||||
|
{
|
||||||
|
return this->get<const char*>();
|
||||||
|
}
|
||||||
|
|
||||||
|
/***************************************************************
|
||||||
|
* Array
|
||||||
|
**************************************************************/
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::is<std::vector<script_value>>() const
|
||||||
|
{
|
||||||
|
/*if (this->get_raw().type != game::SCRIPT_OBJECT)
|
||||||
|
{
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
const auto id = this->get_raw().u.uintValue;
|
||||||
|
const auto type = game::scr_VarGlob->objectVariableValue[id].w.type;
|
||||||
|
|
||||||
|
return type == game::SCRIPT_ARRAY;*/
|
||||||
|
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
/***************************************************************
|
||||||
|
* Entity
|
||||||
|
**************************************************************/
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::is<entity>() const
|
||||||
|
{
|
||||||
|
return this->get_raw().type == game::SCRIPT_OBJECT;
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
entity script_value::get() const
|
||||||
|
{
|
||||||
|
return entity(this->get_raw().u.pointerValue);
|
||||||
|
}
|
||||||
|
|
||||||
|
/***************************************************************
|
||||||
|
* Vector
|
||||||
|
**************************************************************/
|
||||||
|
|
||||||
|
template <>
|
||||||
|
bool script_value::is<vector>() const
|
||||||
|
{
|
||||||
|
return this->get_raw().type == game::SCRIPT_VECTOR;
|
||||||
|
}
|
||||||
|
|
||||||
|
template <>
|
||||||
|
vector script_value::get() const
|
||||||
|
{
|
||||||
|
return this->get_raw().u.vectorValue;
|
||||||
|
}
|
||||||
|
|
||||||
|
/***************************************************************
|
||||||
|
*
|
||||||
|
**************************************************************/
|
||||||
|
|
||||||
|
const game::VariableValue& script_value::get_raw() const
|
||||||
|
{
|
||||||
|
return this->value_.get();
|
||||||
|
}
|
||||||
|
}
|
52
src/game/scripting/script_value.hpp
Normal file
52
src/game/scripting/script_value.hpp
Normal file
@ -0,0 +1,52 @@
|
|||||||
|
#pragma once
|
||||||
|
#include "game/game.hpp"
|
||||||
|
#include "variable_value.hpp"
|
||||||
|
#include "vector.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
class entity;
|
||||||
|
|
||||||
|
class script_value
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
script_value() = default;
|
||||||
|
script_value(const game::VariableValue& value);
|
||||||
|
|
||||||
|
script_value(int value);
|
||||||
|
script_value(unsigned int value);
|
||||||
|
script_value(bool value);
|
||||||
|
|
||||||
|
script_value(float value);
|
||||||
|
script_value(double value);
|
||||||
|
|
||||||
|
script_value(const char* value);
|
||||||
|
script_value(const std::string& value);
|
||||||
|
|
||||||
|
script_value(const entity& value);
|
||||||
|
|
||||||
|
script_value(const vector& value);
|
||||||
|
|
||||||
|
template <typename T>
|
||||||
|
bool is() const;
|
||||||
|
|
||||||
|
template <typename T>
|
||||||
|
T as() const
|
||||||
|
{
|
||||||
|
if (!this->is<T>())
|
||||||
|
{
|
||||||
|
throw std::runtime_error("Invalid type");
|
||||||
|
}
|
||||||
|
|
||||||
|
return get<T>();
|
||||||
|
}
|
||||||
|
|
||||||
|
const game::VariableValue& get_raw() const;
|
||||||
|
|
||||||
|
private:
|
||||||
|
template <typename T>
|
||||||
|
T get() const;
|
||||||
|
|
||||||
|
variable_value value_{};
|
||||||
|
};
|
||||||
|
}
|
27
src/game/scripting/stack_isolation.cpp
Normal file
27
src/game/scripting/stack_isolation.cpp
Normal file
@ -0,0 +1,27 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "stack_isolation.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
stack_isolation::stack_isolation()
|
||||||
|
{
|
||||||
|
this->in_param_count_ = game::scr_VmPub->inparamcount;
|
||||||
|
this->out_param_count_ = game::scr_VmPub->outparamcount;
|
||||||
|
this->top_ = game::scr_VmPub->top;
|
||||||
|
this->max_stack_ = game::scr_VmPub->maxstack;
|
||||||
|
|
||||||
|
game::scr_VmPub->top = this->stack_;
|
||||||
|
game::scr_VmPub->maxstack = &this->stack_[ARRAYSIZE(this->stack_) - 1];
|
||||||
|
game::scr_VmPub->inparamcount = 0;
|
||||||
|
game::scr_VmPub->outparamcount = 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
stack_isolation::~stack_isolation()
|
||||||
|
{
|
||||||
|
game::Scr_ClearOutParams();
|
||||||
|
game::scr_VmPub->inparamcount = this->in_param_count_;
|
||||||
|
game::scr_VmPub->outparamcount = this->out_param_count_;
|
||||||
|
game::scr_VmPub->top = this->top_;
|
||||||
|
game::scr_VmPub->maxstack = this->max_stack_;
|
||||||
|
}
|
||||||
|
}
|
25
src/game/scripting/stack_isolation.hpp
Normal file
25
src/game/scripting/stack_isolation.hpp
Normal file
@ -0,0 +1,25 @@
|
|||||||
|
#pragma once
|
||||||
|
#include "game/game.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
class stack_isolation final
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
stack_isolation();
|
||||||
|
~stack_isolation();
|
||||||
|
|
||||||
|
stack_isolation(stack_isolation&&) = delete;
|
||||||
|
stack_isolation(const stack_isolation&) = delete;
|
||||||
|
stack_isolation& operator=(stack_isolation&&) = delete;
|
||||||
|
stack_isolation& operator=(const stack_isolation&) = delete;
|
||||||
|
|
||||||
|
private:
|
||||||
|
game::VariableValue stack_[512]{};
|
||||||
|
|
||||||
|
game::VariableValue* max_stack_;
|
||||||
|
game::VariableValue* top_;
|
||||||
|
unsigned int in_param_count_;
|
||||||
|
unsigned int out_param_count_;
|
||||||
|
};
|
||||||
|
}
|
68
src/game/scripting/variable_value.cpp
Normal file
68
src/game/scripting/variable_value.cpp
Normal file
@ -0,0 +1,68 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "variable_value.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
variable_value::variable_value(const game::VariableValue& value)
|
||||||
|
{
|
||||||
|
this->assign(value);
|
||||||
|
}
|
||||||
|
|
||||||
|
variable_value::variable_value(const variable_value& other) noexcept
|
||||||
|
{
|
||||||
|
this->operator=(other);
|
||||||
|
}
|
||||||
|
|
||||||
|
variable_value::variable_value(variable_value&& other) noexcept
|
||||||
|
{
|
||||||
|
this->operator=(std::move(other));
|
||||||
|
}
|
||||||
|
|
||||||
|
variable_value& variable_value::operator=(const variable_value& other) noexcept
|
||||||
|
{
|
||||||
|
if (this != &other)
|
||||||
|
{
|
||||||
|
this->release();
|
||||||
|
this->assign(other.value_);
|
||||||
|
}
|
||||||
|
|
||||||
|
return *this;
|
||||||
|
}
|
||||||
|
|
||||||
|
variable_value& variable_value::operator=(variable_value&& other) noexcept
|
||||||
|
{
|
||||||
|
if (this != &other)
|
||||||
|
{
|
||||||
|
this->release();
|
||||||
|
this->value_ = other.value_;
|
||||||
|
other.value_.type = game::SCRIPT_NONE;
|
||||||
|
}
|
||||||
|
|
||||||
|
return *this;
|
||||||
|
}
|
||||||
|
|
||||||
|
variable_value::~variable_value()
|
||||||
|
{
|
||||||
|
this->release();
|
||||||
|
}
|
||||||
|
|
||||||
|
const game::VariableValue& variable_value::get() const
|
||||||
|
{
|
||||||
|
return this->value_;
|
||||||
|
}
|
||||||
|
|
||||||
|
void variable_value::assign(const game::VariableValue& value)
|
||||||
|
{
|
||||||
|
this->value_ = value;
|
||||||
|
game::AddRefToValue(this->value_.type, this->value_.u);
|
||||||
|
}
|
||||||
|
|
||||||
|
void variable_value::release()
|
||||||
|
{
|
||||||
|
if (this->value_.type != game::SCRIPT_NONE)
|
||||||
|
{
|
||||||
|
game::RemoveRefToValue(this->value_.type, this->value_.u);
|
||||||
|
this->value_.type = game::SCRIPT_NONE;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
27
src/game/scripting/variable_value.hpp
Normal file
27
src/game/scripting/variable_value.hpp
Normal file
@ -0,0 +1,27 @@
|
|||||||
|
#pragma once
|
||||||
|
#include "game/game.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
class variable_value
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
variable_value() = default;
|
||||||
|
variable_value(const game::VariableValue& value);
|
||||||
|
variable_value(const variable_value& other) noexcept;
|
||||||
|
variable_value(variable_value&& other) noexcept;
|
||||||
|
|
||||||
|
variable_value& operator=(const variable_value& other) noexcept;
|
||||||
|
variable_value& operator=(variable_value&& other) noexcept;
|
||||||
|
|
||||||
|
~variable_value();
|
||||||
|
|
||||||
|
const game::VariableValue& get() const;
|
||||||
|
|
||||||
|
private:
|
||||||
|
void assign(const game::VariableValue& value);
|
||||||
|
void release();
|
||||||
|
|
||||||
|
game::VariableValue value_{{0}, game::SCRIPT_NONE};
|
||||||
|
};
|
||||||
|
}
|
85
src/game/scripting/vector.cpp
Normal file
85
src/game/scripting/vector.cpp
Normal file
@ -0,0 +1,85 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "vector.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
vector::vector(const float* value)
|
||||||
|
{
|
||||||
|
for (auto i = 0; i < 3; ++i)
|
||||||
|
{
|
||||||
|
this->value_[i] = value[i];
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
vector::vector(const game::vec3_t& value)
|
||||||
|
: vector(&value[0])
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
vector::vector(const float x, const float y, const float z)
|
||||||
|
{
|
||||||
|
this->value_[0] = x;
|
||||||
|
this->value_[1] = y;
|
||||||
|
this->value_[2] = z;
|
||||||
|
}
|
||||||
|
|
||||||
|
vector::operator game::vec3_t&()
|
||||||
|
{
|
||||||
|
return this->value_;
|
||||||
|
}
|
||||||
|
|
||||||
|
vector::operator const game::vec3_t&() const
|
||||||
|
{
|
||||||
|
return this->value_;
|
||||||
|
}
|
||||||
|
|
||||||
|
game::vec_t& vector::operator[](const size_t i)
|
||||||
|
{
|
||||||
|
if (i >= 3)
|
||||||
|
{
|
||||||
|
throw std::runtime_error("Out of bounds.");
|
||||||
|
}
|
||||||
|
|
||||||
|
return this->value_[i];
|
||||||
|
}
|
||||||
|
|
||||||
|
const game::vec_t& vector::operator[](const size_t i) const
|
||||||
|
{
|
||||||
|
if (i >= 3)
|
||||||
|
{
|
||||||
|
throw std::runtime_error("Out of bounds.");
|
||||||
|
}
|
||||||
|
|
||||||
|
return this->value_[i];
|
||||||
|
}
|
||||||
|
|
||||||
|
float vector::get_x() const
|
||||||
|
{
|
||||||
|
return this->operator[](0);
|
||||||
|
}
|
||||||
|
|
||||||
|
float vector::get_y() const
|
||||||
|
{
|
||||||
|
return this->operator[](1);
|
||||||
|
}
|
||||||
|
|
||||||
|
float vector::get_z() const
|
||||||
|
{
|
||||||
|
return this->operator[](2);
|
||||||
|
}
|
||||||
|
|
||||||
|
void vector::set_x(const float value)
|
||||||
|
{
|
||||||
|
this->operator[](0) = value;
|
||||||
|
}
|
||||||
|
|
||||||
|
void vector::set_y(const float value)
|
||||||
|
{
|
||||||
|
this->operator[](1) = value;
|
||||||
|
}
|
||||||
|
|
||||||
|
void vector::set_z(const float value)
|
||||||
|
{
|
||||||
|
this->operator[](2) = value;
|
||||||
|
}
|
||||||
|
}
|
31
src/game/scripting/vector.hpp
Normal file
31
src/game/scripting/vector.hpp
Normal file
@ -0,0 +1,31 @@
|
|||||||
|
#pragma once
|
||||||
|
#include "game/game.hpp"
|
||||||
|
|
||||||
|
namespace scripting
|
||||||
|
{
|
||||||
|
class vector final
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
vector() = default;
|
||||||
|
vector(const float* value);
|
||||||
|
vector(const game::vec3_t& value);
|
||||||
|
vector(float x, float y, float z);
|
||||||
|
|
||||||
|
operator game::vec3_t&();
|
||||||
|
operator const game::vec3_t&() const;
|
||||||
|
|
||||||
|
game::vec_t& operator[](size_t i);
|
||||||
|
const game::vec_t& operator[](size_t i) const;
|
||||||
|
|
||||||
|
float get_x() const;
|
||||||
|
float get_y() const;
|
||||||
|
float get_z() const;
|
||||||
|
|
||||||
|
void set_x(float value);
|
||||||
|
void set_y(float value);
|
||||||
|
void set_z(float value);
|
||||||
|
|
||||||
|
private:
|
||||||
|
game::vec3_t value_{0};
|
||||||
|
};
|
||||||
|
}
|
@ -9,8 +9,12 @@ namespace game
|
|||||||
|
|
||||||
struct gclient_s
|
struct gclient_s
|
||||||
{
|
{
|
||||||
char __pad0[7684];
|
|
||||||
int flags;
|
};
|
||||||
|
|
||||||
|
struct client_t
|
||||||
|
{
|
||||||
|
char __pad0[13508];
|
||||||
};
|
};
|
||||||
|
|
||||||
struct EntityState
|
struct EntityState
|
||||||
@ -20,8 +24,8 @@ namespace game
|
|||||||
|
|
||||||
struct gentity_s
|
struct gentity_s
|
||||||
{
|
{
|
||||||
EntityState s;
|
char __pad0[760];
|
||||||
};
|
}; // size = 760
|
||||||
|
|
||||||
struct Material
|
struct Material
|
||||||
{
|
{
|
||||||
@ -283,7 +287,7 @@ namespace game
|
|||||||
|
|
||||||
struct dvar_t
|
struct dvar_t
|
||||||
{
|
{
|
||||||
const char* name; //00
|
int name; //00
|
||||||
unsigned int flags; //08
|
unsigned int flags; //08
|
||||||
dvar_type type; //0C
|
dvar_type type; //0C
|
||||||
bool modified; //0D
|
bool modified; //0D
|
||||||
@ -528,4 +532,93 @@ namespace game
|
|||||||
unsigned int nextOverride;
|
unsigned int nextOverride;
|
||||||
unsigned int nextPoolEntry;
|
unsigned int nextPoolEntry;
|
||||||
};
|
};
|
||||||
|
|
||||||
|
enum scr_string_t
|
||||||
|
{
|
||||||
|
scr_string_t_dummy = 0x0,
|
||||||
|
};
|
||||||
|
|
||||||
|
struct scr_entref_t
|
||||||
|
{
|
||||||
|
unsigned short entnum;
|
||||||
|
unsigned short classnum;
|
||||||
|
};
|
||||||
|
|
||||||
|
enum scriptType_e
|
||||||
|
{
|
||||||
|
SCRIPT_NONE = 0,
|
||||||
|
SCRIPT_OBJECT = 1,
|
||||||
|
SCRIPT_STRING = 2,
|
||||||
|
SCRIPT_ISTRING = 3,
|
||||||
|
SCRIPT_VECTOR = 4,
|
||||||
|
SCRIPT_FLOAT = 5,
|
||||||
|
SCRIPT_INTEGER = 6,
|
||||||
|
SCRIPT_END = 8,
|
||||||
|
SCRIPT_ARRAY = 22
|
||||||
|
};
|
||||||
|
|
||||||
|
struct VariableStackBuffer
|
||||||
|
{
|
||||||
|
const char* pos;
|
||||||
|
unsigned __int16 size;
|
||||||
|
unsigned __int16 bufLen;
|
||||||
|
unsigned __int16 localId;
|
||||||
|
char time;
|
||||||
|
char buf[1];
|
||||||
|
};
|
||||||
|
|
||||||
|
union VariableUnion
|
||||||
|
{
|
||||||
|
int intValue;
|
||||||
|
unsigned int uintValue;
|
||||||
|
float floatValue;
|
||||||
|
unsigned int stringValue;
|
||||||
|
const float* vectorValue;
|
||||||
|
const char* codePosValue;
|
||||||
|
unsigned int pointerValue;
|
||||||
|
VariableStackBuffer* stackValue;
|
||||||
|
unsigned int entityOffset;
|
||||||
|
};
|
||||||
|
|
||||||
|
struct VariableValue
|
||||||
|
{
|
||||||
|
VariableUnion u;
|
||||||
|
int type;
|
||||||
|
};
|
||||||
|
|
||||||
|
struct function_stack_t
|
||||||
|
{
|
||||||
|
const char* pos;
|
||||||
|
unsigned int localId;
|
||||||
|
unsigned int localVarCount;
|
||||||
|
VariableValue* top;
|
||||||
|
VariableValue* startTop;
|
||||||
|
};
|
||||||
|
|
||||||
|
struct function_frame_t
|
||||||
|
{
|
||||||
|
function_stack_t fs;
|
||||||
|
int topType;
|
||||||
|
};
|
||||||
|
|
||||||
|
struct scrVmPub_t
|
||||||
|
{
|
||||||
|
unsigned int* localVars;
|
||||||
|
VariableValue* maxstack;
|
||||||
|
int function_count;
|
||||||
|
function_frame_t* function_frame;
|
||||||
|
VariableValue* top;
|
||||||
|
unsigned int inparamcount;
|
||||||
|
unsigned int outparamcount;
|
||||||
|
function_frame_t function_frame_start[32];
|
||||||
|
VariableValue stack[2048];
|
||||||
|
};
|
||||||
|
|
||||||
|
struct scr_classStruct_t
|
||||||
|
{
|
||||||
|
unsigned __int16 id;
|
||||||
|
unsigned __int16 entArrayId;
|
||||||
|
char charId;
|
||||||
|
const char* name;
|
||||||
|
};
|
||||||
}
|
}
|
@ -6,6 +6,9 @@ namespace game
|
|||||||
{
|
{
|
||||||
// Functions
|
// Functions
|
||||||
|
|
||||||
|
WEAK symbol<void(int type, VariableUnion u)> AddRefToValue{0x5C0EB0};
|
||||||
|
WEAK symbol<void(int type, VariableUnion u)> RemoveRefToValue{0x5C29B0};
|
||||||
|
|
||||||
WEAK symbol<void(int localClientNum, const char* text)> Cbuf_AddText{0x59A050};
|
WEAK symbol<void(int localClientNum, const char* text)> Cbuf_AddText{0x59A050};
|
||||||
|
|
||||||
WEAK symbol<void(const char* cmdName, void(), cmd_function_s* allocedCmd)> Cmd_AddCommandInternal{0x59A5F0};
|
WEAK symbol<void(const char* cmdName, void(), cmd_function_s* allocedCmd)> Cmd_AddCommandInternal{0x59A5F0};
|
||||||
@ -21,12 +24,22 @@ namespace game
|
|||||||
Dvar_RegisterBool{0x617BB0};
|
Dvar_RegisterBool{0x617BB0};
|
||||||
WEAK symbol<dvar_t* (int dvarName, const char* a2, float x, float y, float z, float w, float min, float max,
|
WEAK symbol<dvar_t* (int dvarName, const char* a2, float x, float y, float z, float w, float min, float max,
|
||||||
unsigned int flags)> Dvar_RegisterVec4{0x6185F0};
|
unsigned int flags)> Dvar_RegisterVec4{0x6185F0};
|
||||||
WEAK symbol<const char* (dvar_t* dvar, dvar_value value)> Dvar_ValueToString{0x61B8F0};
|
WEAK symbol<const char* (dvar_t* dvar, void* a2, void* value)> Dvar_ValueToString{0x61B8F0};
|
||||||
|
WEAK symbol<void(int hash, const char* name, const char* buffer)> Dvar_SetCommand{0x61A5C0};
|
||||||
|
|
||||||
WEAK symbol<int(const char* fname)> generateHashValue{0x343D20};
|
WEAK symbol<int(const char* fname)> generateHashValue{0x343D20};
|
||||||
|
|
||||||
|
WEAK symbol<unsigned int(int entnum, unsigned int classnum)> FindEntityId{0x5C1C50};
|
||||||
|
WEAK symbol<void(VariableValue* result, unsigned int classnum, int entnum, int offset)> GetEntityFieldValue{0x5C6100};
|
||||||
|
|
||||||
WEAK symbol<Material*(const char* material)> Material_RegisterHandle{0x759BA0};
|
WEAK symbol<Material*(const char* material)> Material_RegisterHandle{0x759BA0};
|
||||||
|
|
||||||
|
WEAK symbol<const float* (const float* v)> Scr_AllocVector{0x5C3220};
|
||||||
|
WEAK symbol<void()> Scr_ClearOutParams{0x5C6E50};
|
||||||
|
WEAK symbol<scr_entref_t(unsigned int entId)> Scr_GetEntityIdRef{0x5C56C0};
|
||||||
|
WEAK symbol<int(unsigned int classnum, int entnum, int offset)> Scr_SetObjectField{0x512190};
|
||||||
|
WEAK symbol<void(unsigned int id, scr_string_t stringValue, unsigned int paramcount)> Scr_NotifyId{0x5C8240};
|
||||||
|
|
||||||
WEAK symbol<void(float x, float y, float width, float height, float s0, float t0, float s1, float t1,
|
WEAK symbol<void(float x, float y, float width, float height, float s0, float t0, float s1, float t1,
|
||||||
float* color, Material* material)> R_AddCmdDrawStretchPic{0x3C9710};
|
float* color, Material* material)> R_AddCmdDrawStretchPic{0x3C9710};
|
||||||
WEAK symbol<void(const char* text, int maxChars, Font_s* font, float x, float y, float xScale, float yScale,
|
WEAK symbol<void(const char* text, int maxChars, Font_s* font, float x, float y, float xScale, float yScale,
|
||||||
@ -38,8 +51,14 @@ namespace game
|
|||||||
|
|
||||||
WEAK symbol<ScreenPlacement* ()> ScrPlace_GetViewPlacement{0x3E16A0};
|
WEAK symbol<ScreenPlacement* ()> ScrPlace_GetViewPlacement{0x3E16A0};
|
||||||
|
|
||||||
|
WEAK symbol<const char*(scr_string_t stringValue)> SL_ConvertToString{0x5BFBB0};
|
||||||
|
WEAK symbol<scr_string_t(const char* str, unsigned int user)> SL_GetString{0x5C0170};
|
||||||
|
|
||||||
WEAK symbol<void()> Sys_ShowConsole{0x633080};
|
WEAK symbol<void()> Sys_ShowConsole{0x633080};
|
||||||
|
|
||||||
|
WEAK symbol<void* (jmp_buf* Buf, int Value)> longjmp{0x89EED0};
|
||||||
|
WEAK symbol<int(jmp_buf* Buf)> _setjmp{0x8EC2E0};
|
||||||
|
|
||||||
// Variables
|
// Variables
|
||||||
|
|
||||||
WEAK symbol<cmd_function_s*> cmd_functions{0xAD17BB8};
|
WEAK symbol<cmd_function_s*> cmd_functions{0xAD17BB8};
|
||||||
@ -55,4 +74,11 @@ namespace game
|
|||||||
|
|
||||||
WEAK symbol<int> dvarCount{0xBFBB310};
|
WEAK symbol<int> dvarCount{0xBFBB310};
|
||||||
WEAK symbol<dvar_t*> sortedDvars{0xBFBB320};
|
WEAK symbol<dvar_t*> sortedDvars{0xBFBB320};
|
||||||
|
|
||||||
|
WEAK symbol<unsigned int> levelEntityId{0xB5E0B30};
|
||||||
|
WEAK symbol<int> g_script_error_level{0xBA9CC24};
|
||||||
|
WEAK symbol<jmp_buf> g_script_error{0xBA9CD40};
|
||||||
|
WEAK symbol<scr_classStruct_t> g_classMap{0xBF95C0};
|
||||||
|
|
||||||
|
WEAK symbol<scrVmPub_t> scr_VmPub{0xBA9EE40};
|
||||||
}
|
}
|
||||||
|
@ -19,8 +19,11 @@
|
|||||||
#include <cstdint>
|
#include <cstdint>
|
||||||
#include <thread>
|
#include <thread>
|
||||||
#include <cstdarg>
|
#include <cstdarg>
|
||||||
|
#include <unordered_set>
|
||||||
|
#include <csetjmp>
|
||||||
|
|
||||||
#include <MinHook.h>
|
#include <MinHook.h>
|
||||||
|
#include <gsl/gsl>
|
||||||
|
|
||||||
using namespace std::literals;
|
using namespace std::literals;
|
||||||
|
|
||||||
@ -28,11 +31,14 @@ using namespace std::literals;
|
|||||||
#include "utils/string.hpp"
|
#include "utils/string.hpp"
|
||||||
#include "utils/hook.hpp"
|
#include "utils/hook.hpp"
|
||||||
#include "utils/string.hpp"
|
#include "utils/string.hpp"
|
||||||
|
#include "utils/io.hpp"
|
||||||
|
|
||||||
#include "game/structs.hpp"
|
#include "game/structs.hpp"
|
||||||
#include "game/game.hpp"
|
#include "game/game.hpp"
|
||||||
|
#include "game/dvars.hpp"
|
||||||
|
|
||||||
#include "component/command.hpp"
|
#include "component/command.hpp"
|
||||||
|
#include "component/scripting.hpp"
|
||||||
#include "component/scheduler.hpp"
|
#include "component/scheduler.hpp"
|
||||||
#include "component/input.hpp"
|
#include "component/input.hpp"
|
||||||
#include "component/game_console.hpp"
|
#include "component/game_console.hpp"
|
||||||
|
115
src/utils/io.cpp
Normal file
115
src/utils/io.cpp
Normal file
@ -0,0 +1,115 @@
|
|||||||
|
#include <stdinc.hpp>
|
||||||
|
#include "io.hpp"
|
||||||
|
#include <fstream>
|
||||||
|
|
||||||
|
namespace utils::io
|
||||||
|
{
|
||||||
|
bool file_exists(const std::string& file)
|
||||||
|
{
|
||||||
|
return std::ifstream(file).good();
|
||||||
|
}
|
||||||
|
|
||||||
|
bool write_file(const std::string& file, const std::string& data, const bool append)
|
||||||
|
{
|
||||||
|
const auto pos = file.find_last_of("/\\");
|
||||||
|
if (pos != std::string::npos)
|
||||||
|
{
|
||||||
|
create_directory(file.substr(0, pos));
|
||||||
|
}
|
||||||
|
|
||||||
|
std::ofstream stream(
|
||||||
|
file, std::ios::binary | std::ofstream::out | (append ? std::ofstream::app : 0));
|
||||||
|
|
||||||
|
if (stream.is_open())
|
||||||
|
{
|
||||||
|
stream.write(data.data(), data.size());
|
||||||
|
stream.close();
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
std::string read_file(const std::string& file)
|
||||||
|
{
|
||||||
|
std::string data;
|
||||||
|
read_file(file, &data);
|
||||||
|
return data;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool read_file(const std::string& file, std::string* data)
|
||||||
|
{
|
||||||
|
if (!data) return false;
|
||||||
|
data->clear();
|
||||||
|
|
||||||
|
if (file_exists(file))
|
||||||
|
{
|
||||||
|
std::ifstream stream(file, std::ios::binary);
|
||||||
|
if (!stream.is_open()) return false;
|
||||||
|
|
||||||
|
stream.seekg(0, std::ios::end);
|
||||||
|
const std::streamsize size = stream.tellg();
|
||||||
|
stream.seekg(0, std::ios::beg);
|
||||||
|
|
||||||
|
if (size > -1)
|
||||||
|
{
|
||||||
|
data->resize(static_cast<uint32_t>(size));
|
||||||
|
stream.read(const_cast<char*>(data->data()), size);
|
||||||
|
stream.close();
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
size_t file_size(const std::string& file)
|
||||||
|
{
|
||||||
|
if (file_exists(file))
|
||||||
|
{
|
||||||
|
std::ifstream stream(file, std::ios::binary);
|
||||||
|
|
||||||
|
if (stream.good())
|
||||||
|
{
|
||||||
|
stream.seekg(0, std::ios::end);
|
||||||
|
return static_cast<size_t>(stream.tellg());
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool create_directory(const std::string& directory)
|
||||||
|
{
|
||||||
|
return std::filesystem::create_directories(directory);
|
||||||
|
}
|
||||||
|
|
||||||
|
bool directory_exists(const std::string& directory)
|
||||||
|
{
|
||||||
|
return std::filesystem::is_directory(directory);
|
||||||
|
}
|
||||||
|
|
||||||
|
bool directory_is_empty(const std::string& directory)
|
||||||
|
{
|
||||||
|
return std::filesystem::is_empty(directory);
|
||||||
|
}
|
||||||
|
|
||||||
|
std::vector<std::string> list_files(const std::string& directory)
|
||||||
|
{
|
||||||
|
std::vector<std::string> files;
|
||||||
|
|
||||||
|
for (auto& file : std::filesystem::directory_iterator(directory))
|
||||||
|
{
|
||||||
|
files.push_back(file.path().generic_string());
|
||||||
|
}
|
||||||
|
|
||||||
|
return files;
|
||||||
|
}
|
||||||
|
|
||||||
|
void copy_folder(const std::filesystem::path& src, const std::filesystem::path& target)
|
||||||
|
{
|
||||||
|
std::filesystem::copy(src, target,
|
||||||
|
std::filesystem::copy_options::overwrite_existing |
|
||||||
|
std::filesystem::copy_options::recursive);
|
||||||
|
}
|
||||||
|
}
|
19
src/utils/io.hpp
Normal file
19
src/utils/io.hpp
Normal file
@ -0,0 +1,19 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include <string>
|
||||||
|
#include <vector>
|
||||||
|
#include <filesystem>
|
||||||
|
|
||||||
|
namespace utils::io
|
||||||
|
{
|
||||||
|
bool file_exists(const std::string& file);
|
||||||
|
bool write_file(const std::string& file, const std::string& data, bool append = false);
|
||||||
|
bool read_file(const std::string& file, std::string* data);
|
||||||
|
std::string read_file(const std::string& file);
|
||||||
|
size_t file_size(const std::string& file);
|
||||||
|
bool create_directory(const std::string& directory);
|
||||||
|
bool directory_exists(const std::string& directory);
|
||||||
|
bool directory_is_empty(const std::string& directory);
|
||||||
|
std::vector<std::string> list_files(const std::string& directory);
|
||||||
|
void copy_folder(const std::filesystem::path& src, const std::filesystem::path& target);
|
||||||
|
}
|
@ -121,4 +121,21 @@ namespace utils::string
|
|||||||
}
|
}
|
||||||
*out = '\0';
|
*out = '\0';
|
||||||
}
|
}
|
||||||
|
|
||||||
|
std::string replace(std::string str, const std::string& from, const std::string& to)
|
||||||
|
{
|
||||||
|
if (from.empty())
|
||||||
|
{
|
||||||
|
return str;
|
||||||
|
}
|
||||||
|
|
||||||
|
size_t start_pos = 0;
|
||||||
|
while ((start_pos = str.find(from, start_pos)) != std::string::npos)
|
||||||
|
{
|
||||||
|
str.replace(start_pos, from.length(), to);
|
||||||
|
start_pos += to.length();
|
||||||
|
}
|
||||||
|
|
||||||
|
return str;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
@ -85,4 +85,6 @@ namespace utils::string
|
|||||||
std::string get_clipboard_data();
|
std::string get_clipboard_data();
|
||||||
|
|
||||||
void strip(const char* in, char* out, int max);
|
void strip(const char* in, char* out, int max);
|
||||||
|
|
||||||
|
std::string replace(std::string str, const std::string& from, const std::string& to);
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user