New Lua constants (#3022)

Client/mods/deathmatch/logic/lua/CLuaMain.cpp

@@ -27,6 +27,14 @@ SString             CLuaMain::ms_strExpectedUndumpHash;
 #include "luascripts/exports.lua.h"
 #include "luascripts/inspect.lua.h"
 
+#include "luascripts/constants_main.lua.h"
+#include "luascripts/constants_elements.lua.h"
+#include "luascripts/constants_vehicles.lua.h"
+#include "luascripts/constants_weapons.lua.h"
+#include "luascripts/constants_peds.lua.h"
+#include "luascripts/constants_ui.lua.h"
+#include "luascripts/constants_other.lua.h"
+
 CLuaMain::CLuaMain(CLuaManager* pLuaManager, CResource* pResourceOwner, bool bEnableOOP)
 {
     // Initialise everything to be setup in the Start function
@@ -187,6 +195,20 @@ void CLuaMain::LoadEmbeddedScripts()
     LoadScript(EmbeddedLuaCode::exports);
     LoadScript(EmbeddedLuaCode::coroutine_debug);
     LoadScript(EmbeddedLuaCode::inspect);
+
+    LoadScript(EmbeddedLuaCode::constantsMain);
+    LoadScript(EmbeddedLuaCode::constantsElements);
+    LoadScript(EmbeddedLuaCode::constantsVehicles);
+    LoadScript(EmbeddedLuaCode::constantsWeapons);
+    LoadScript(EmbeddedLuaCode::constantsPeds);
+    LoadScript(EmbeddedLuaCode::constantsUI);
+    LoadScript(EmbeddedLuaCode::constantsOther);
+
+    // To make `constants` table read-only
+    LoadScript(R"~LUA~(
+        setmetatable(constants, __readonly_table_meta__)
+        __readonly_table_meta__ = nil
+    )~LUA~");
     DECLARE_PROFILER_SECTION(OnPostLoadScript)
 }
 

Server/mods/deathmatch/logic/lua/CLuaMain.cpp

@@ -61,6 +61,14 @@ extern CNetServer* g_pRealNetServer;
 #include "luascripts/exports.lua.h"
 #include "luascripts/inspect.lua.h"
 
+#include "luascripts/constants_main.lua.h"
+#include "luascripts/constants_elements.lua.h"
+#include "luascripts/constants_vehicles.lua.h"
+#include "luascripts/constants_weapons.lua.h"
+#include "luascripts/constants_peds.lua.h"
+#include "luascripts/constants_ui.lua.h"
+#include "luascripts/constants_other.lua.h"
+
 CLuaMain::CLuaMain(CLuaManager* pLuaManager, CObjectManager* pObjectManager, CPlayerManager* pPlayerManager, CVehicleManager* pVehicleManager,
                    CBlipManager* pBlipManager, CRadarAreaManager* pRadarAreaManager, CMapManager* pMapManager, CResource* pResourceOwner, bool bEnableOOP)
 {
@@ -244,6 +252,20 @@ void CLuaMain::LoadEmbeddedScripts()
     LoadScript(EmbeddedLuaCode::exports);
     LoadScript(EmbeddedLuaCode::coroutine_debug);
     LoadScript(EmbeddedLuaCode::inspect);
+
+    LoadScript(EmbeddedLuaCode::constantsMain);
+    LoadScript(EmbeddedLuaCode::constantsElements);
+    LoadScript(EmbeddedLuaCode::constantsVehicles);
+    LoadScript(EmbeddedLuaCode::constantsWeapons);
+    LoadScript(EmbeddedLuaCode::constantsPeds);
+    LoadScript(EmbeddedLuaCode::constantsUI);
+    LoadScript(EmbeddedLuaCode::constantsOther);
+
+    // To make `constants` table read-only;
+    LoadScript(R"~LUA~(
+        setmetatable(constants, __readonly_table_meta__)
+        __readonly_table_meta__ = nil
+    )~LUA~");
 }
 
 void CLuaMain::RegisterModuleFunctions()

Shared/mods/deathmatch/logic/luascripts/constants_elements.lua.h

@@ -0,0 +1,33 @@
+namespace EmbeddedLuaCode
+{
+    const char* const constantsElements = R"~LUA~(
+--[[
+    SERVER AND CLIENT.
+    Defines a constant variables available for server and client.
+--]]
+
+constants.ElementType = setmetatable({
+    Player = 'player',
+    Ped = 'ped',
+    Water = 'water',
+    Sound = 'sound',
+    Vehicle = 'vehicle',
+    Object = 'object',
+    Pickup = 'pickup',
+    Marker = 'marker',
+    Colshape = 'colshape',
+    Blip = 'blip',
+    RadarArea = 'radararea',
+    Team = 'team',
+    SpawnPoint = 'spawnpoint',
+    Console = 'console',
+    Projectile = 'projectile',
+    Effect = 'effect',
+    Light = 'light',
+    Searchlight = 'searchlight',
+    Shader = 'shader',
+    Texture = 'texture',
+}, __readonly_table_meta__)
+
+    )~LUA~";
+}

Shared/mods/deathmatch/logic/luascripts/constants_main.lua.h

@@ -0,0 +1,37 @@
+namespace EmbeddedLuaCode
+{
+    const char* const constantsMain = R"~LUA~(
+--[[
+    SERVER AND CLIENT.
+    Defines a constant variables available for server and client.
+--]]
+
+__readonly_table_meta__ = {
+    __index = function(tbl, key)
+        local val = rawget(tbl, key)
+        if val then
+            return val
+        end
+        for k,v in pairs(tbl) do
+            if tostring(k):lower() == tostring(key):lower() then
+                return v
+            end
+        end
+    end,
+    __newindex = function(tbl, key)
+        return error('Table is read only!')
+    end,
+    __call = function(tbl, key)
+        if not key then return end
+        for k,v in pairs(tbl) do
+            if tostring(v):lower() == tostring(key):lower() then
+                return k
+            end
+        end
+    end
+}
+
+constants = {}
+
+    )~LUA~";
+}