Add LuaState.are_libraries_opened

Author: gilzoide

CHANGELOG.md

@@ -12,6 +12,7 @@
   When running in the Godot editor, it returns the globalized version of `res://` path.
   Otherwise, it returns the base directory of the executable.
 - Advanced project settings for setting the `LuaScriptLanguage` state's `package_path` and `package_cpath` properties
+- `LuaState.are_libraries_opened` method for checking if a subset of libraries were already opened
 
 ### Changed
 - The GDExtension is now marked as reloadable

src/LuaState.cpp

@@ -131,6 +131,13 @@ void LuaState::open_libraries(BitField<Library> libraries) {
 			lua_state.require(module_names::local_paths, &luaopen_godot_local_paths, false);
 		}
 	}
+
+	lua_state.registry().set("_GDEXTENSION_OPEN_LIBS", lua_state.registry().get_or("_GDEXTENSION_OPEN_LIBS", 0) | libraries);
+}
+
+bool LuaState::are_libraries_opened(BitField<Library> libraries) const {
+	int64_t currently_opened_libs = lua_state.registry().get_or("_GDEXTENSION_OPEN_LIBS", 0L);
+	return (currently_opened_libs & libraries) == libraries;
 }
 
 Ref<LuaTable> LuaState::create_table(const Dictionary& initial_values) {
@@ -247,15 +254,13 @@ void LuaState::_bind_methods() {
 	BIND_BITFIELD_FLAG(LUA_JIT);
 	BIND_BITFIELD_FLAG(LUA_UTF8);
 	BIND_BITFIELD_FLAG(LUA_ALL_LIBS);
-
 	BIND_BITFIELD_FLAG(GODOT_VARIANT);
 	BIND_BITFIELD_FLAG(GODOT_UTILITY_FUNCTIONS);
 	BIND_BITFIELD_FLAG(GODOT_SINGLETONS);
 	BIND_BITFIELD_FLAG(GODOT_CLASSES);
 	BIND_BITFIELD_FLAG(GODOT_ENUMS);
 	BIND_BITFIELD_FLAG(GODOT_LOCAL_PATHS);
 	BIND_BITFIELD_FLAG(GODOT_ALL_LIBS);
-	
 	BIND_BITFIELD_FLAG(ALL_LIBS);
 
 	// LoadMode enum
@@ -265,6 +270,7 @@ void LuaState::_bind_methods() {
 
 	// Methods
 	ClassDB::bind_method(D_METHOD("open_libraries", "libraries"), &LuaState::open_libraries, DEFVAL(BitField<Library>(ALL_LIBS)));
+	ClassDB::bind_method(D_METHOD("are_libraries_opened", "libraries"), &LuaState::are_libraries_opened);
 	ClassDB::bind_method(D_METHOD("create_table", "initial_values"), &LuaState::create_table, DEFVAL(Dictionary()));
 	ClassDB::bind_method(D_METHOD("load_buffer", "chunk", "chunkname", "mode", "env"), &LuaState::load_buffer, DEFVAL(""), DEFVAL(LOAD_MODE_ANY), DEFVAL(nullptr));
 	ClassDB::bind_method(D_METHOD("load_string", "chunk", "chunkname", "env"), &LuaState::load_string, DEFVAL(""), DEFVAL(nullptr));

src/LuaState.hpp

@@ -101,6 +101,7 @@ class LuaState : public RefCounted {
 	sol::state_view get_lua_state() const;
 
 	void open_libraries(BitField<Library> libraries = ALL_LIBS);
+	bool are_libraries_opened(BitField<Library> libraries) const;
 
 	Ref<LuaTable> create_table(const Dictionary& initial_values = {});
 	Variant load_buffer(const PackedByteArray& chunk, const String& chunkname = "", LoadMode mode = LOAD_MODE_ANY, LuaTable *env = nullptr);

test/gdscript_tests/libraries_opened.gd

@@ -0,0 +1,12 @@
+extends RefCounted
+
+
+func test_libraries_opened() -> bool:
+	var lua_state = LuaState.new()
+	assert(not lua_state.are_libraries_opened(LuaState.LUA_BASE))
+	lua_state.open_libraries(LuaState.LUA_BASE | LuaState.LUA_PACKAGE)
+	assert(lua_state.are_libraries_opened(LuaState.LUA_BASE))
+	assert(lua_state.are_libraries_opened(LuaState.LUA_PACKAGE))
+	assert(lua_state.are_libraries_opened(LuaState.LUA_BASE | LuaState.LUA_PACKAGE))
+	assert(not lua_state.are_libraries_opened(LuaState.LUA_ALL_LIBS))
+	return true

test/gdscript_tests/libraries_opened.gd.uid

@@ -0,0 +1 @@
+uid://u714sanh5wtq