Merge branch 'main' into seek-support

1 files changed, 53 insertions, 21 deletions

diff --git a/src/lua/bridge.cpp b/src/lua/bridge.cpp
index a680a521..a26f74bb 100644
--- a/src/lua/bridge.cpp
+++ b/src/lua/bridge.cpp
@@ -22,6 +22,9 @@
 #include "lua_version.hpp"
 #include "lvgl.h"
 
+#include "font/lv_font_loader.h"
+#include "luavgl.h"
+
 #include "event_queue.hpp"
 #include "property.hpp"
 #include "service_locator.hpp"
@@ -32,34 +35,62 @@ int luaopen_linenoise(lua_State* L);
 int luaopen_term_core(lua_State* L);
 }
 
+LV_FONT_DECLARE(font_fusion_12);
+LV_FONT_DECLARE(font_fusion_10);
+
 namespace lua {
 
 [[maybe_unused]] static constexpr char kTag[] = "lua_bridge";
 
 static constexpr char kBridgeKey[] = "bridge";
 
+static auto make_font_cb(const char* name, int size, int weight)
+    -> const lv_font_t* {
+  if (std::string{"fusion"} == name) {
+    if (size == 12) {
+      return &font_fusion_12;
+    }
+    if (size == 10) {
+      return &font_fusion_10;
+    }
+  }
+  return NULL;
+}
+
+static auto delete_font_cb(lv_font_t* font) -> void {}
+
 auto Bridge::Get(lua_State* state) -> Bridge* {
   lua_pushstring(state, kBridgeKey);
   lua_gettable(state, LUA_REGISTRYINDEX);
   return reinterpret_cast<Bridge*>(lua_touserdata(state, -1));
 }
 
-Bridge::Bridge(system_fsm::ServiceLocator& services, lua_State& s)
-    : services_(services), state_(s), bindings_(s) {
-  lua_pushstring(&s, kBridgeKey);
-  lua_pushlightuserdata(&s, this);
-  lua_settable(&s, LUA_REGISTRYINDEX);
+Bridge::Bridge(system_fsm::ServiceLocator& services) : services_(services) {}
+
+auto Bridge::installBaseModules(lua_State* L) -> void {
+  lua_pushstring(L, kBridgeKey);
+  lua_pushlightuserdata(L, this);
+  lua_settable(L, LUA_REGISTRYINDEX);
+
+  bindings_.install(L);
 
-  luaL_requiref(&s, "linenoise", luaopen_linenoise, true);
-  lua_pop(&s, 1);
+  luaL_requiref(L, "linenoise", luaopen_linenoise, true);
+  lua_pop(L, 1);
 
-  luaL_requiref(&s, "term.core", luaopen_term_core, true);
-  lua_pop(&s, 1);
+  luaL_requiref(L, "term.core", luaopen_term_core, true);
+  lua_pop(L, 1);
+
+  RegisterControlsModule(L);
+  RegisterDatabaseModule(L);
+  RegisterQueueModule(L);
+  RegisterVersionModule(L);
+}
 
-  RegisterControlsModule(&s);
-  RegisterDatabaseModule(&s);
-  RegisterQueueModule(&s);
-  RegisterVersionModule(&s);
+auto Bridge::installLvgl(lua_State* L) -> void {
+  luavgl_set_pcall(L, CallProtected);
+  luavgl_set_font_extension(L, make_font_cb, delete_font_cb);
+  luaL_requiref(L, "lvgl", luaopen_lvgl, true);
+  lua_pop(L, 1);
 }
 
 static auto new_property_module(lua_State* state) -> int {
@@ -76,32 +107,33 @@ static auto new_property_module(lua_State* state) -> int {
 template <class... Ts>
 inline constexpr bool always_false_v = false;
 
-auto Bridge::AddPropertyModule(
+auto Bridge::installPropertyModule(
+    lua_State* L,
     const std::string& name,
-    std::vector<std::pair<std::string, std::variant<LuaFunction, Property*>>>
+    std::vector<std::pair<std::string, std::variant<LuaFunction, Property*>>>&
         props) -> void {
   // Create the module (or retrieve it if one with this name already exists)
-  luaL_requiref(&state_, name.c_str(), new_property_module, true);
+  luaL_requiref(L, name.c_str(), new_property_module, true);
 
   for (const auto& prop : props) {
-    lua_pushstring(&state_, prop.first.c_str());
+    lua_pushstring(L, prop.first.c_str());
     std::visit(
         [&](auto&& arg) {
           using T = std::decay_t<decltype(arg)>;
           if constexpr (std::is_same_v<T, LuaFunction>) {
-            bindings_.Register(&state_, arg);
+            bindings_.Register(L, arg);
           } else if constexpr (std::is_same_v<T, Property*>) {
-            bindings_.Register(&state_, arg);
+            bindings_.Register(L, arg);
           } else {
             static_assert(always_false_v<T>, "missing case");
           }
         },
         prop.second);
 
-    lua_settable(&state_, -3);  // metatable.propname = property
+    lua_settable(L, -3);  // metatable.propname = property
   }
 
-  lua_pop(&state_, 1);  // pop the module off the stack
+  lua_pop(L, 1);  // pop the module off the stack
 }
 
 }  // namespace lua