summaryrefslogtreecommitdiff
path: root/src/tangara/lua/property.hpp
blob: d45821bd26e88057835dc8c087112bb5fe13ffe8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
/*
 * Copyright 2023 jacqueline <me@jacqueline.id.au>
 *
 * SPDX-License-Identifier: GPL-3.0-only
 */

#pragma once

#include <stdint.h>
#include <memory>
#include <string>

#include "audio/audio_events.hpp"
#include "drivers/bluetooth_types.hpp"
#include "lua.hpp"
#include "lvgl.h"
#include "system_fsm/service_locator.hpp"

namespace lua {

// FIXME: We should use some kind of interface for this instead.
using LuaValue = std::variant<std::monostate,
                              int,
                              bool,
                              std::string,
                              audio::TrackInfo,
                              drivers::bluetooth::MacAndName,
                              std::vector<drivers::bluetooth::MacAndName>>;

using LuaFunction = std::function<int(lua_State*)>;

class Property {
 public:
  Property() : Property(std::monostate{}) {}
  Property(const LuaValue&);
  Property(const LuaValue&, std::function<bool(const LuaValue&)> filter);

  auto get() -> const LuaValue& { return *value_; }

  /*
   * Assigns a new value to this property, bypassing the filter fn. All
   * bindings will be marked as dirty, and if active, will be reapplied.
   */
  auto setDirect(const LuaValue&) -> void;
  /*
   * Invokes the filter fn, and if successful, assigns the new value to this
   * property. All bindings will be marked as dirty, and if active, will be
   * reapplied.
   */
  auto set(const LuaValue&) -> bool;

  /* Returns whether or not this Property can be written from Lua. */
  auto isTwoWay() -> bool { return cb_.has_value(); }

  auto pushValue(lua_State& s) -> int;
  auto popValue(lua_State& s) -> bool;

  /* Reapplies all active, dirty bindings associated with this Property. */
  auto reapplyAll() -> void;

  auto addLuaBinding(lua_State*, int ref) -> void;
  auto applySingle(lua_State*, int ref, bool mark_dirty) -> bool;

 private:
  std::unique_ptr<LuaValue> value_;
  std::optional<std::function<bool(const LuaValue&)>> cb_;
  std::pmr::vector<std::pair<lua_State*, int>> bindings_;
};

/*
 * Container for a Lua function that should be invoked whenever a Property's
 * value changes, as well as some extra accounting metadata.
 */
struct Binding {
  /* Checks the value at idx is a Binding, returning a pointer to it if so. */
  static auto get(lua_State*, int idx) -> Binding*;
  /*
   * If the value at idx is a dirty, active Binding, applies the current value
   * from its Property. Returns false if the binding was active and dirty, but
   * invoking the Lua callback failed.
   */
  static auto apply(lua_State*, int idx) -> bool;

  Property* property;
  bool active;
  bool dirty;
};

static_assert(std::is_trivially_destructible<Binding>());
static_assert(std::is_trivially_copy_assignable<Binding>());

class PropertyBindings {
 public:
  PropertyBindings();

  auto install(lua_State*) -> void;

  auto Register(lua_State*, Property*) -> void;
  auto Register(lua_State*, LuaFunction) -> void;

  auto GetFunction(size_t i) -> const LuaFunction&;

 private:
  std::pmr::vector<LuaFunction> functions_;
};

}  // namespace lua