From 3421bd652c39b253872e43d3b6e43664bd0b66e2 Mon Sep 17 00:00:00 2001
From: jacqueline <me@jacqueline.id.au>
Date: Wed, 28 Aug 2024 15:30:53 +1000
Subject: When clicking a track in the file browser, play it

Includes adding a `playback.is_playable` for working out whether or not
a particular file is able to be played
---
 src/tangara/ui/ui_fsm.cpp | 26 +++++++++++++++++++++-----
 1 file changed, 21 insertions(+), 5 deletions(-)

(limited to 'src/tangara/ui/ui_fsm.cpp')

diff --git a/src/tangara/ui/ui_fsm.cpp b/src/tangara/ui/ui_fsm.cpp
index a20eb0ef..94d1caf8 100644
--- a/src/tangara/ui/ui_fsm.cpp
+++ b/src/tangara/ui/ui_fsm.cpp
@@ -15,6 +15,8 @@
 #include "FreeRTOSConfig.h"
 #include "draw/lv_draw_buf.h"
 #include "drivers/bluetooth.hpp"
+#include "lauxlib.h"
+#include "lua.h"
 #include "lvgl.h"
 
 #include "core/lv_group.h"
@@ -609,11 +611,25 @@ void Lua::entry() {
                          {"discovered_devices", &sBluetoothDiscoveredDevices},
                          {"known_devices", &sBluetoothKnownDevices},
                      });
-    registry.AddPropertyModule("playback", {
-                                               {"playing", &sPlaybackPlaying},
-                                               {"track", &sPlaybackTrack},
-                                               {"position", &sPlaybackPosition},
-                                           });
+    registry.AddPropertyModule(
+        "playback",
+        {
+            {"playing", &sPlaybackPlaying},
+            {"track", &sPlaybackTrack},
+            {"position", &sPlaybackPosition},
+            {"is_playable",
+             [&](lua_State* s) {
+               size_t len;
+               const char* path = luaL_checklstring(s, 1, &len);
+               auto res = sServices->tag_parser().ReadAndParseTags({path, len});
+               if (res) {
+                 lua_pushboolean(s, true);
+               } else {
+                 lua_pushboolean(s, false);
+               }
+               return 1;
+             }},
+        });
     registry.AddPropertyModule(
         "queue",
         {
-- 
cgit v1.2.3