blob: 4c79fd7cdd7f5eadfc53cb58cef55b35a3f5cc1a (
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
|
#pragma once
#ifdef __cplusplus
extern "C" {
#endif // __cplusplus
#include "lua.h"
#ifdef __cplusplus
}
#endif // __cplusplus
#include "threading.h"
#include "uniquekey.h"
#include <optional>
#include <mutex>
// forwards
class Linda;
enum class LookupMode;
class Universe;
using KeeperState = Unique<lua_State*>;
struct Keeper
{
std::mutex m_mutex;
KeeperState L{ nullptr };
// int count;
};
struct Keepers
{
int gc_threshold{ 0 };
int nb_keepers{ 0 };
Keeper keeper_array[1];
};
// crc64/we of string "NIL_SENTINEL" generated at http://www.nitrxgen.net/hashgen/
static constexpr UniqueKey NIL_SENTINEL{ 0x7EAAFA003A1D11A1ull, "linda.null" };
void init_keepers(Universe* U, lua_State* L);
void close_keepers(Universe* U);
void keeper_toggle_nil_sentinels(lua_State* L, int val_i_, LookupMode const mode_);
[[nodiscard]] int keeper_push_linda_storage(Linda& linda_, DestState L);
using keeper_api_t = lua_CFunction;
#define KEEPER_API(_op) keepercall_##_op
#define PUSH_KEEPER_FUNC lua_pushcfunction
// lua_Cfunctions to run inside a keeper state
[[nodiscard]] int keepercall_clear(lua_State* L);
[[nodiscard]] int keepercall_send(lua_State* L);
[[nodiscard]] int keepercall_receive(lua_State* L);
[[nodiscard]] int keepercall_receive_batched(lua_State* L);
[[nodiscard]] int keepercall_limit(lua_State* L);
[[nodiscard]] int keepercall_get(lua_State* L);
[[nodiscard]] int keepercall_set(lua_State* L);
[[nodiscard]] int keepercall_count(lua_State* L);
using KeeperCallResult = Unique<std::optional<int>>;
[[nodiscard]] KeeperCallResult keeper_call(Universe* U, KeeperState K, keeper_api_t _func, lua_State* L, void* linda, int starting_index);
|
