blob: ad0f1c49955eeaf0cb2ef43665dd766e32c06e05 (
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
|
#pragma once
#include <AK/Assertions.h>
#include <AK/Types.h>
#include <unistd.h>
#define memory_barrier() asm volatile ("" ::: "memory")
static inline dword CAS(volatile dword* mem, dword newval, dword oldval)
{
dword ret;
asm volatile(
"cmpxchgl %2, %1"
:"=a"(ret), "+m"(*mem)
:"r"(newval), "0"(oldval)
:"cc", "memory");
return ret;
}
class GLock {
public:
GLock() { }
~GLock() { }
void lock();
void unlock();
private:
volatile dword m_lock { 0 };
dword m_level { 0 };
int m_holder { -1 };
};
class GLocker {
public:
[[gnu::always_inline]] inline explicit GLocker(GLock& l) : m_lock(l) { lock(); }
[[gnu::always_inline]] inline ~GLocker() { unlock(); }
[[gnu::always_inline]] inline void unlock() { m_lock.unlock(); }
[[gnu::always_inline]] inline void lock() { m_lock.lock(); }
private:
GLock& m_lock;
};
[[gnu::always_inline]] inline void GLock::lock()
{
for (;;) {
if (CAS(&m_lock, 1, 0) == 0) {
if (m_holder == -1 || m_holder == gettid()) {
m_holder = gettid();
++m_level;
memory_barrier();
m_lock = 0;
return;
}
m_lock = 0;
}
donate(m_holder);
}
}
inline void GLock::unlock()
{
for (;;) {
if (CAS(&m_lock, 1, 0) == 0) {
ASSERT(m_holder == gettid());
ASSERT(m_level);
--m_level;
if (m_level) {
memory_barrier();
m_lock = 0;
return;
}
m_holder = -1;
memory_barrier();
m_lock = 0;
return;
}
donate(m_holder);
}
}
#define LOCKER(lock) GLocker locker(lock)
template<typename T>
class GLockable {
public:
GLockable() { }
GLockable(T&& resource) : m_resource(move(resource)) { }
GLock& lock() { return m_lock; }
T& resource() { return m_resource; }
T lock_and_copy()
{
LOCKER(m_lock);
return m_resource;
}
private:
T m_resource;
GLock m_lock;
};
|