Support for touch/key events in LUA widgets

2022-06-11 15:38:08 +02:00
parent 93797a3e14
commit a3424d5bc0
21 changed files with 965 additions and 753 deletions
@@ -0,0 +1,131 @@
+/*
+ * Copyright (C) EdgeTX
+ *
+ * Based on code named
+ *   opentx - https://github.com/opentx/opentx
+ *   th9x - http://code.google.com/p/th9x
+ *   er9x - http://code.google.com/p/er9x
+ *   gruvin9x - http://code.google.com/p/gruvin9x
+ *
+ * License GPLv2: http://www.gnu.org/licenses/gpl-2.0.html
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License version 2 as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ */
+
+#include "lua_event.h"
+#include "opentx_helpers.h"
+#include "timers_driver.h"
+#include "keys.h"
+
+extern "C" {
+  #include "lua.h"
+};
+
+#define EVT_TOUCH_SWIPE_LOCK     4
+#define EVT_TOUCH_SWIPE_SPEED   60
+#define EVT_TOUCH_SWIPE_TIMEOUT 50
+
+static tmr10ms_t _swipeTimeOut = 0;
+
+static LuaEventData _lua_event_buffer[EVENT_BUFFER_SIZE];
+
+LuaEventData::LuaEventData()
+{
+  memclear(this, sizeof(LuaEventData));
+}
+
+void luaPushEvent(event_t evt)
+{
+  for (int i = 0; i < EVENT_BUFFER_SIZE; i++) {
+    if (_lua_event_buffer[i].event == 0) {
+      _lua_event_buffer[i].event = evt;
+      return;
+    }
+  }
+}
+
+void luaNextEvent(LuaEventData* evt)
+{
+  if (!evt) return;
+  *evt = _lua_event_buffer[0];
+
+  if (evt->event != 0) {
+    size_t len = sizeof(_lua_event_buffer) - sizeof(LuaEventData);
+    memmove(_lua_event_buffer, _lua_event_buffer + 1, len);
+    memclear(_lua_event_buffer + (EVENT_BUFFER_SIZE - 1),
+             sizeof(EVENT_BUFFER_SIZE));
+  }
+}
+
+void luaEmptyEventBuffer()
+{
+  memclear(_lua_event_buffer, sizeof(_lua_event_buffer));
+}
+
+// Look for a slot in the event buffer that is either unused (zero) or matches event
+LuaEventData* luaGetEventSlot(event_t event)
+{
+  for (int i = 0; i < EVENT_BUFFER_SIZE; i++) {
+    if (_lua_event_buffer[i].event == event || _lua_event_buffer[i].event == 0)
+      return &_lua_event_buffer[i];
+  }
+
+  return nullptr;
+}
+
+static void l_pushtableint(lua_State* ls, const char * key, int value)
+{
+  lua_pushstring(ls, key);
+  lua_pushinteger(ls, value);
+  lua_settable(ls, -3);
+}
+
+static void l_pushtablebool(lua_State* ls, const char * key, bool value)
+{
+  lua_pushstring(ls, key);
+  lua_pushboolean(ls, value);
+  lua_settable(ls, -3);
+}
+
+void luaPushTouchEventTable(lua_State* ls, LuaEventData* evt)
+{
+  lua_newtable(ls);
+  l_pushtableint(ls, "x", evt->touchX);
+  l_pushtableint(ls, "y", evt->touchY);
+  l_pushtableint(ls, "tapCount", evt->tapCount);
+
+  if (evt->event == EVT_TOUCH_SLIDE) {
+    l_pushtableint(ls, "startX", evt->startX);
+    l_pushtableint(ls, "startY", evt->startY);
+    l_pushtableint(ls, "slideX", evt->slideX);
+    l_pushtableint(ls, "slideY", evt->slideY);
+
+    // Do we have a swipe? Only one at a time!
+    if (get_tmr10ms() > _swipeTimeOut) {
+      coord_t absX = (evt->slideX < 0) ? -(evt->slideX) : evt->slideX;
+      coord_t absY = (evt->slideY < 0) ? -(evt->slideY) : evt->slideY;
+      bool swiped = false;
+
+      if (absX > EVT_TOUCH_SWIPE_LOCK * absY) {
+        if ((swiped = (evt->slideX > EVT_TOUCH_SWIPE_SPEED)))
+          l_pushtablebool(ls, "swipeRight", true);
+        else if ((swiped = (evt->slideX < -EVT_TOUCH_SWIPE_SPEED)))
+          l_pushtablebool(ls, "swipeLeft", true);
+      } else if (absY > EVT_TOUCH_SWIPE_LOCK * absX) {
+        if ((swiped = (evt->slideY > EVT_TOUCH_SWIPE_SPEED)))
+          l_pushtablebool(ls, "swipeDown", true);
+        else if ((swiped = (evt->slideY < -EVT_TOUCH_SWIPE_SPEED)))
+          l_pushtablebool(ls, "swipeUp", true);
+      }
+
+      if (swiped) _swipeTimeOut = get_tmr10ms() + EVT_TOUCH_SWIPE_TIMEOUT;
+    }
+  }
+}