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
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
|
// Copyright Vespa.ai. Licensed under the terms of the Apache 2.0 license. See LICENSE in the project root.
#include "stash.h"
#include <algorithm>
namespace vespalib {
namespace stash {
namespace {
Chunk *free_chunks(Chunk *chunk, Chunk *until = nullptr) {
while (chunk != until) {
void *mem = chunk;
chunk = chunk->next;
free(mem);
}
return until;
}
Chunk *keep_one(Chunk *chunk) {
if (chunk != nullptr) {
Chunk *next = chunk->next;
while (next != nullptr) {
void *mem = chunk;
chunk = next;
next = chunk->next;
free(mem);
}
chunk->clear();
return chunk;
}
return nullptr;
}
Cleanup *run_cleanup(Cleanup *cleanup, Cleanup *until = nullptr) {
while (cleanup != until) {
Cleanup *tmp = cleanup;
cleanup = tmp->next;
tmp->cleanup();
}
return until;
}
} // namespace vespalib::stash::<unnamed>
} // namespace vespalib::stash
char *
Stash::do_alloc(size_t size)
{
if (is_small(size)) {
void *chunk_mem = malloc(_chunk_size);
_chunks = new (chunk_mem) stash::Chunk(_chunks);
return _chunks->alloc(size, _chunk_size);
} else {
size_t allocate = sizeof(stash::DeleteMemory) + size;
char *mem = static_cast<char*>(malloc(allocate));
_cleanup = new (mem) stash::DeleteMemory(allocate, _cleanup);
return (mem + sizeof(stash::DeleteMemory));
}
}
Stash::Stash(size_t chunk_size) noexcept
: _chunks(nullptr),
_cleanup(nullptr),
_chunk_size(std::max(size_t(128), chunk_size))
{
}
Stash::Stash(Stash &&rhs) noexcept
: _chunks(rhs._chunks),
_cleanup(rhs._cleanup),
_chunk_size(rhs._chunk_size)
{
rhs._chunks = nullptr;
rhs._cleanup = nullptr;
}
Stash &
Stash::operator=(Stash &&rhs) noexcept
{
stash::run_cleanup(_cleanup);
stash::free_chunks(_chunks);
_chunks = rhs._chunks;
_cleanup = rhs._cleanup;
_chunk_size = rhs._chunk_size;
rhs._chunks = nullptr;
rhs._cleanup = nullptr;
return *this;
}
Stash::~Stash()
{
stash::run_cleanup(_cleanup);
stash::free_chunks(_chunks);
}
void
Stash::clear()
{
_cleanup = stash::run_cleanup(_cleanup);
_chunks = stash::keep_one(_chunks);
}
void
Stash::revert(const Mark &mark)
{
_cleanup = stash::run_cleanup(_cleanup, mark._cleanup);
_chunks = stash::free_chunks(_chunks, mark._chunk);
if (_chunks != nullptr) {
_chunks->used = mark._used;
}
}
size_t
Stash::count_used() const
{
size_t used = 0;
for (stash::Chunk *chunk = _chunks; chunk != nullptr; chunk = chunk->next) {
used += chunk->used;
}
return used;
}
MemoryUsage
Stash::get_memory_usage() const
{
size_t allocated = 0;
size_t used = 0;
for (stash::Chunk *chunk = _chunks; chunk != nullptr; chunk = chunk->next) {
allocated += _chunk_size;
used += chunk->used;
}
for (auto cleanup = _cleanup; cleanup; cleanup = cleanup->next) {
auto extra = cleanup->allocated();
allocated += extra;
used += extra;
}
return {allocated, used, 0, 0};
}
} // namespace vespalib
|
