LUA based Timer implementation

grid_common/grid_lua.c

@@ -253,6 +253,7 @@ void grid_lua_start_vm(struct grid_lua_model* lua) {
   grid_lua_dostring(lua, GRID_LUA_FNC_G_ELEMENTNAME_source);
   grid_lua_dostring(lua, GRID_LUA_FNC_G_MAPSAT_source);
   grid_lua_dostring(lua, GRID_LUA_FNC_G_SIGN_source);
+  grid_lua_dostring(lua, GRID_LUA_FNC_G_TIMER_source);
   grid_lua_dostring(lua, GRID_LUA_FNC_G_SEGCALC_source);
   // grid_lua_dostring(lua, GRID_LUA_FNC_G_TOML_source);
   grid_lua_dostring(lua, "midi_fifo = {}");

grid_common/grid_ui.c

@@ -1525,3 +1525,28 @@ void grid_port_process_ui_UNSAFE(struct grid_ui_model* ui) {
 
   grid_ui_busy_semaphore_release(ui);
 }
+
+void grid_port_process_timer_UNSAFE(struct grid_ui_model* ui) {
+  grid_ui_busy_semaphore_lock(ui);
+
+  grid_lua_clear_stdo(&grid_lua_state);
+
+  grid_lua_dostring(&grid_lua_state, "check_timers()");
+
+  char* stdo = grid_lua_get_output_string(&grid_lua_state);
+
+  if (strlen(stdo) > 0) {
+
+    struct grid_msg_packet response;
+    grid_msg_packet_init(&grid_msg_state, &response, GRID_PARAMETER_GLOBAL_POSITION, GRID_PARAMETER_GLOBAL_POSITION);
+
+    response.body_length += sprintf(response.body, "%s", stdo);
+
+    grid_msg_packet_close(&grid_msg_state, &response);
+    grid_transport_send_msg_packet_to_all(&grid_transport_state, &response);
+
+    grid_lua_clear_stdo(&grid_lua_state);
+  }
+
+  grid_ui_busy_semaphore_release(ui);
+}

grid_common/grid_ui.h

@@ -221,4 +221,6 @@ void grid_port_process_ui_local_UNSAFE(struct grid_ui_model* ui);
 
 void grid_port_process_ui_UNSAFE(struct grid_ui_model* ui);
 
+void grid_port_process_timer_UNSAFE(struct grid_ui_model* ui);
+
 #endif /* GRID_UI_H */

grid_common/lua_src/lua_source_collection.h

@@ -1,6 +1,9 @@
 #ifndef LUA_SOURCE_COLLECTION_H_INCLUDED
 #define LUA_SOURCE_COLLECTION_H_INCLUDED
 
+#include "timer.h"
+#define GRID_LUA_FNC_G_TIMER_source grid_lua_src_timer_lua
+
 #include "lookup.h"
 #define GRID_LUA_FNC_G_LOOKUP_source grid_lua_src_lookup_lua
 #define GRID_LUA_FNC_G_LOOKUP_short "glut"

grid_common/lua_src/timer.lua

@@ -0,0 +1,34 @@
+-- Updated infinite loop for the `setTimeout` example
+local timers = {}
+local timersNextId = 0
+
+function set_timeout(callback, delay)
+    local timerId = timersNextId
+    timersNextId = timersNextId + 1
+    local targetTime = os.clock() + delay
+    timers[timerId] = {id = timerId, time = targetTime, interval = delay, callback = callback}
+    return timerId
+end
+
+function clear_timeout(timerId)
+    if timers[timerId] then
+        timers[timerId] = nil
+    end
+end
+
+function check_timers()
+    local now = os.clock()
+    for timerId, timer in pairs(timers) do
+        if now >= timer.time then
+            --print("Servicing timer"..timerId.." now")
+            local retrigger = timer.callback(timer)
+            if retrigger == true then
+              --print("Retriggering timer"..timerId.." now")
+              timers[timerId].time = timers[timerId].time + timers[timerId].interval
+            else
+              --print("Deleting timer"..timerId.." now")
+              timers[timerId] = nil
+            end
+        end
+    end
+end

grid_esp/components/grid_esp32_port/grid_esp32_port.c

@@ -250,8 +250,9 @@ void grid_utask_process_ui(struct grid_utask_timer* timer) {
   }
 
   if (grid_ui_event_count_istriggered(&grid_ui_state) > 0) {
-
     grid_port_process_ui_UNSAFE(&grid_ui_state);
+  } else {
+    grid_port_process_timer_UNSAFE(&grid_ui_state);
   }
 }
 

grid_esp/sdkconfig

@@ -2058,6 +2058,14 @@ CONFIG_WIFI_PROV_STA_ALL_CHANNEL_SCAN=y
 # TinyUSB Stack
 #
 CONFIG_TINYUSB_DEBUG_LEVEL=1
+CONFIG_TINYUSB_RHPORT_FS=y
+
+#
+# TinyUSB DCD
+#
+# CONFIG_TINYUSB_MODE_SLAVE is not set
+CONFIG_TINYUSB_MODE_DMA=y
+# end of TinyUSB DCD
 
 #
 # TinyUSB task configuration

grid_make/main.c

@@ -183,8 +183,9 @@ void grid_utask_process_ui(struct grid_utask_timer* timer) {
   }
 
   if (grid_ui_event_count_istriggered(&grid_ui_state) > 0) {
-
     grid_port_process_ui_UNSAFE(&grid_ui_state);
+  } else {
+    grid_port_process_timer_UNSAFE(&grid_ui_state);
   }
 }