| line |
true |
false |
branch |
|
7
|
9 |
37 |
EXTRACT_NEW_ARGS(_max_size, _ttl, _lru_skip); |
|
|
4 |
42 |
EXTRACT_NEW_ARGS(_max_size, _ttl, _lru_skip); |
|
|
0 |
46 |
EXTRACT_NEW_ARGS(_max_size, _ttl, _lru_skip); |
|
9
|
0 |
46 |
if (!map) croak("Failed to create HashMap::SA"); |
|
18
|
46 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
46 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
46 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
46 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
25
|
81581 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
81581 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
81581 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
81581 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
26
|
0 |
81581 |
EXTRACT_STR_KEY(key_sv); |
|
29
|
0 |
81581 |
if (!RETVAL) SvREFCNT_dec(value); |
|
36
|
50024 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
50024 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
50024 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
50024 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
37
|
0 |
50024 |
EXTRACT_STR_KEY(key_sv); |
|
39
|
5 |
50019 |
if (!hashmap_sa_get(self, _kstr, (uint32_t)_klen, _khash, _kutf8, &val)) |
|
48
|
80505 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
80505 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
80505 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
80505 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
49
|
0 |
80505 |
EXTRACT_STR_KEY(key_sv); |
|
57
|
1 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
1 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
1 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
1 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
58
|
0 |
1 |
EXTRACT_STR_KEY(key_sv); |
|
60
|
0 |
1 |
if (!hashmap_sa_take(self, _kstr, (uint32_t)_klen, _khash, _kutf8, &val)) XSRETURN_UNDEF; |
|
68
|
5 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
5 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
5 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
5 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
69
|
0 |
5 |
EXTRACT_STR_KEY(key_sv); |
|
77
|
13 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
13 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
13 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
13 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
78
|
0 |
13 |
RETVAL = self->size; |
|
85
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
86
|
0 |
0 |
RETVAL = self->max_size; |
|
93
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
94
|
0 |
0 |
RETVAL = (UV)self->default_ttl; |
|
101
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
102
|
0 |
0 |
RETVAL = (UV)self->lru_skip; |
|
109
|
5 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
5 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
5 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
5 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
110
|
1 |
4 |
uint32_t now = self->expires_at ? (uint32_t)time(NULL) : 0; |
|
111
|
0 |
5 |
EXTEND(SP, self->size); |
|
113
|
304 |
5 |
for (i = 0; i < self->capacity; i++) { |
|
114
|
104 |
200 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
101 |
3 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
1 |
100 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
1 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
1 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
117
|
0 |
100 |
if (HM_UNPACK_UTF8(self->nodes[i].key_len)) SvUTF8_on(sv); |
|
118
|
0 |
100 |
mXPUSHs(sv); |
|
125
|
3 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
3 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
3 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
3 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
126
|
0 |
3 |
uint32_t now = self->expires_at ? (uint32_t)time(NULL) : 0; |
|
127
|
0 |
3 |
EXTEND(SP, self->size); |
|
129
|
272 |
3 |
for (i = 0; i < self->capacity; i++) { |
|
130
|
102 |
170 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
100 |
2 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
100 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
131
|
100 |
0 |
SV* sv = self->nodes[i].value ? SvREFCNT_inc((SV*)self->nodes[i].value) : &PL_sv_undef; |
|
132
|
0 |
100 |
mXPUSHs(sv); |
|
139
|
1 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
1 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
1 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
1 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
140
|
0 |
1 |
uint32_t now = self->expires_at ? (uint32_t)time(NULL) : 0; |
|
141
|
0 |
1 |
EXTEND(SP, self->size * 2); |
|
143
|
16 |
1 |
for (i = 0; i < self->capacity; i++) { |
|
144
|
2 |
14 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
2 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
2 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
147
|
0 |
2 |
if (HM_UNPACK_UTF8(self->nodes[i].key_len)) SvUTF8_on(ksv); |
|
148
|
0 |
2 |
mXPUSHs(ksv); |
|
149
|
2 |
0 |
SV* vsv = self->nodes[i].value ? SvREFCNT_inc((SV*)self->nodes[i].value) : &PL_sv_undef; |
|
150
|
0 |
2 |
mXPUSHs(vsv); |
|
157
|
48 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
48 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
48 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
48 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
158
|
0 |
48 |
uint32_t now = self->expires_at ? (uint32_t)time(NULL) : 0; |
|
159
|
96 |
4 |
while (self->iter_pos < self->capacity) { |
|
161
|
44 |
52 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
44 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
44 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
162
|
0 |
44 |
EXTEND(SP, 2); |
|
166
|
0 |
44 |
if (HM_UNPACK_UTF8(self->nodes[i].key_len)) SvUTF8_on(ksv); |
|
167
|
0 |
44 |
mXPUSHs(ksv); |
|
169
|
0 |
44 |
if (GIMME_V == G_SCALAR) XSRETURN(1); |
|
170
|
44 |
0 |
SV* vsv = self->nodes[i].value ? SvREFCNT_inc((SV*)self->nodes[i].value) : &PL_sv_undef; |
|
171
|
0 |
44 |
mXPUSHs(vsv); |
|
181
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
187
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
188
|
0 |
0 |
uint32_t now = self->expires_at ? (uint32_t)time(NULL) : 0; |
|
190
|
0 |
0 |
EXTEND(SP, (count < self->size ? count : self->size) * 2); |
|
191
|
0 |
0 |
while (self->iter_pos < self->capacity && n < count) { |
|
|
0 |
0 |
while (self->iter_pos < self->capacity && n < count) { |
|
193
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
196
|
0 |
0 |
if (HM_UNPACK_UTF8(self->nodes[i].key_len)) SvUTF8_on(ksv); |
|
197
|
0 |
0 |
mXPUSHs(ksv); |
|
199
|
0 |
0 |
if (self->nodes[i].value) { |
|
200
|
0 |
0 |
mXPUSHs((SV*)self->nodes[i].value); |
|
201
|
0 |
0 |
} else { XPUSHs(&PL_sv_undef); } |
|
203
|
0 |
0 |
if (HM_UNLIKELY(self->lru_prev)) hashmap_sa_lru_unlink(self, (uint32_t)i); |
|
208
|
0 |
0 |
if (self->iter_pos >= self->capacity) self->iter_pos = 0; |
|
209
|
0 |
0 |
if (self->tombstones > self->capacity / 4 || |
|
210
|
0 |
0 |
(self->size > 0 && self->tombstones > self->size)) |
|
|
0 |
0 |
(self->size > 0 && self->tombstones > self->size)) |
|
216
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
217
|
0 |
0 |
uint32_t now = self->expires_at ? (uint32_t)time(NULL) : 0; |
|
218
|
0 |
0 |
if (self->lru_prev) { |
|
219
|
0 |
0 |
while (self->lru_tail != HM_LRU_NONE) { |
|
221
|
0 |
0 |
if (HM_UNLIKELY(self->expires_at && self->expires_at[idx]) && now >= self->expires_at[idx]) { |
|
|
0 |
0 |
if (HM_UNLIKELY(self->expires_at && self->expires_at[idx]) && now >= self->expires_at[idx]) { |
|
|
0 |
0 |
if (HM_UNLIKELY(self->expires_at && self->expires_at[idx]) && now >= self->expires_at[idx]) { |
|
224
|
0 |
0 |
EXTEND(SP, 2); |
|
227
|
0 |
0 |
if (HM_UNPACK_UTF8(self->nodes[idx].key_len)) SvUTF8_on(ksv); |
|
228
|
0 |
0 |
mXPUSHs(ksv); |
|
230
|
0 |
0 |
if (self->nodes[idx].value) { |
|
231
|
0 |
0 |
mXPUSHs((SV*)self->nodes[idx].value); |
|
232
|
0 |
0 |
} else { XPUSHs(&PL_sv_undef); } |
|
236
|
0 |
0 |
if (self->tombstones > self->capacity / 4 || |
|
237
|
0 |
0 |
(self->size > 0 && self->tombstones > self->size)) |
|
|
0 |
0 |
(self->size > 0 && self->tombstones > self->size)) |
|
243
|
0 |
0 |
while (self->iter_pos < self->capacity) { |
|
245
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
246
|
0 |
0 |
EXTEND(SP, 2); |
|
249
|
0 |
0 |
if (HM_UNPACK_UTF8(self->nodes[i].key_len)) SvUTF8_on(ksv); |
|
250
|
0 |
0 |
mXPUSHs(ksv); |
|
252
|
0 |
0 |
if (self->nodes[i].value) { |
|
253
|
0 |
0 |
mXPUSHs((SV*)self->nodes[i].value); |
|
254
|
0 |
0 |
} else { XPUSHs(&PL_sv_undef); } |
|
257
|
0 |
0 |
if (self->tombstones > self->capacity / 4 || |
|
258
|
0 |
0 |
(self->size > 0 && self->tombstones > self->size)) |
|
|
0 |
0 |
(self->size > 0 && self->tombstones > self->size)) |
|
270
|
1 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
1 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
1 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
1 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
271
|
0 |
1 |
uint32_t now = self->expires_at ? (uint32_t)time(NULL) : 0; |
|
272
|
1 |
0 |
if (self->lru_prev) { |
|
273
|
1 |
0 |
while (self->lru_head != HM_LRU_NONE) { |
|
275
|
0 |
1 |
if (HM_UNLIKELY(self->expires_at && self->expires_at[idx]) && now >= self->expires_at[idx]) { |
|
|
0 |
0 |
if (HM_UNLIKELY(self->expires_at && self->expires_at[idx]) && now >= self->expires_at[idx]) { |
|
|
0 |
0 |
if (HM_UNLIKELY(self->expires_at && self->expires_at[idx]) && now >= self->expires_at[idx]) { |
|
278
|
0 |
1 |
EXTEND(SP, 2); |
|
281
|
1 |
0 |
if (HM_UNPACK_UTF8(self->nodes[idx].key_len)) SvUTF8_on(ksv); |
|
282
|
0 |
1 |
mXPUSHs(ksv); |
|
284
|
1 |
0 |
if (self->nodes[idx].value) { |
|
285
|
0 |
1 |
mXPUSHs((SV*)self->nodes[idx].value); |
|
286
|
0 |
0 |
} else { XPUSHs(&PL_sv_undef); } |
|
290
|
1 |
0 |
if (self->tombstones > self->capacity / 4 || |
|
291
|
0 |
1 |
(self->size > 0 && self->tombstones > self->size)) |
|
|
0 |
0 |
(self->size > 0 && self->tombstones > self->size)) |
|
297
|
0 |
0 |
if (self->iter_pos == 0) self->iter_pos = self->capacity; |
|
298
|
0 |
0 |
while (self->iter_pos > 0) { |
|
300
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
301
|
0 |
0 |
EXTEND(SP, 2); |
|
304
|
0 |
0 |
if (HM_UNPACK_UTF8(self->nodes[i].key_len)) SvUTF8_on(ksv); |
|
305
|
0 |
0 |
mXPUSHs(ksv); |
|
307
|
0 |
0 |
if (self->nodes[i].value) { |
|
308
|
0 |
0 |
mXPUSHs((SV*)self->nodes[i].value); |
|
309
|
0 |
0 |
} else { XPUSHs(&PL_sv_undef); } |
|
312
|
0 |
0 |
if (self->tombstones > self->capacity / 4 || |
|
313
|
0 |
0 |
(self->size > 0 && self->tombstones > self->size)) |
|
|
0 |
0 |
(self->size > 0 && self->tombstones > self->size)) |
|
325
|
3 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
3 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
3 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
3 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
331
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
332
|
0 |
0 |
if (!hashmap_sa_reserve(self, (size_t)count)) |
|
338
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
353
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
354
|
0 |
0 |
RETVAL = (UV)self->capacity; |
|
361
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
362
|
0 |
0 |
EXTRACT_STR_KEY(key_sv); |
|
370
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
371
|
0 |
0 |
EXTRACT_STR_KEY(key_sv); |
|
374
|
0 |
0 |
if (!hashmap_sa_swap(self, _kstr, (uint32_t)_klen, _khash, _kutf8, (void*)new_val, &old)) { SvREFCNT_dec(new_val); XSRETURN_UNDEF; } |
|
383
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
385
|
0 |
0 |
if (!clone) croak("Failed to clone"); |
|
386
|
0 |
0 |
{ size_t _i; for (_i = 0; _i < clone->capacity; _i++) { |
|
387
|
0 |
0 |
if (SA_NODE_LIVE(clone->nodes[_i]) && clone->nodes[_i].value) |
|
|
0 |
0 |
if (SA_NODE_LIVE(clone->nodes[_i]) && clone->nodes[_i].value) |
|
|
0 |
0 |
if (SA_NODE_LIVE(clone->nodes[_i]) && clone->nodes[_i].value) |
|
390
|
0 |
0 |
RETVAL = sv_setref_pv(newSV(0), HvNAME(SvSTASH(SvRV(self_sv))), (void*)clone); |
|
|
0 |
0 |
RETVAL = sv_setref_pv(newSV(0), HvNAME(SvSTASH(SvRV(self_sv))), (void*)clone); |
|
|
0 |
0 |
RETVAL = sv_setref_pv(newSV(0), HvNAME(SvSTASH(SvRV(self_sv))), (void*)clone); |
|
|
0 |
0 |
RETVAL = sv_setref_pv(newSV(0), HvNAME(SvSTASH(SvRV(self_sv))), (void*)clone); |
|
|
0 |
0 |
RETVAL = sv_setref_pv(newSV(0), HvNAME(SvSTASH(SvRV(self_sv))), (void*)clone); |
|
|
0 |
0 |
RETVAL = sv_setref_pv(newSV(0), HvNAME(SvSTASH(SvRV(self_sv))), (void*)clone); |
|
397
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
398
|
0 |
0 |
if (!SvROK(href) || SvTYPE(SvRV(href)) != SVt_PVHV) |
|
|
0 |
0 |
if (!SvROK(href) || SvTYPE(SvRV(href)) != SVt_PVHV) |
|
401
|
0 |
0 |
hashmap_sa_reserve(self, (size_t)HvUSEDKEYS(hv)); |
|
404
|
0 |
0 |
while ((he = hv_iternext(hv))) { |
|
405
|
0 |
0 |
STRLEN klen; const char* kstr = HePV(he, klen); |
|
406
|
0 |
0 |
bool kutf8 = HeUTF8(he) ? true : false; |
|
410
|
0 |
0 |
if (!hashmap_sa_put(self, kstr, (uint32_t)klen, khash, kutf8, (void*)val, 0)) SvREFCNT_dec(val); |
|
416
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
417
|
0 |
0 |
if (!SvROK(other_sv) || !SvOBJECT(SvRV(other_sv)) || SvSTASH(SvRV(other_sv)) != stash_sa) |
|
|
0 |
0 |
if (!SvROK(other_sv) || !SvOBJECT(SvRV(other_sv)) || SvSTASH(SvRV(other_sv)) != stash_sa) |
|
|
0 |
0 |
if (!SvROK(other_sv) || !SvOBJECT(SvRV(other_sv)) || SvSTASH(SvRV(other_sv)) != stash_sa) |
|
421
|
0 |
0 |
uint32_t now = other->expires_at ? (uint32_t)time(NULL) : 0; |
|
423
|
0 |
0 |
for (i = 0; i < other->capacity; i++) { |
|
424
|
0 |
0 |
if (SA_NODE_LIVE(other->nodes[i]) && !HM_TTL_SKIP_EXPIRED(other, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(other->nodes[i]) && !HM_TTL_SKIP_EXPIRED(other, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(other->nodes[i]) && !HM_TTL_SKIP_EXPIRED(other, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(other->nodes[i]) && !HM_TTL_SKIP_EXPIRED(other, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(other->nodes[i]) && !HM_TTL_SKIP_EXPIRED(other, i, now)) { |
|
426
|
0 |
0 |
if (!hashmap_sa_put(self, other->nodes[i].key, HM_UNPACK_LEN(other->nodes[i].key_len), other->nodes[i].key_hash, HM_UNPACK_UTF8(other->nodes[i].key_len), (void*)other->nodes[i].value, 0)) SvREFCNT_dec((SV*)other->nodes[i].value); |
|
434
|
1 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
1 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
1 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
1 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
436
|
0 |
1 |
uint32_t now = self->expires_at ? (uint32_t)time(NULL) : 0; |
|
438
|
16 |
1 |
for (i = 0; i < self->capacity; i++) { |
|
439
|
1 |
15 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
1 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
1 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
|
0 |
0 |
if (SA_NODE_LIVE(self->nodes[i]) && !HM_TTL_SKIP_EXPIRED(self, i, now)) { |
|
442
|
1 |
0 |
SV* val = self->nodes[i].value ? SvREFCNT_inc((SV*)self->nodes[i].value) : &PL_sv_undef; |
|
443
|
0 |
1 |
(void)hv_store(hv, self->nodes[i].key, kutf8 ? -(I32)klen : (I32)klen, val, 0); |
|
453
|
1 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
1 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
1 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
1 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
454
|
0 |
1 |
EXTRACT_STR_KEY(key_sv); |
|
457
|
0 |
1 |
if (!RETVAL) SvREFCNT_dec(value); |
|
464
|
4 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
4 |
0 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
4 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
|
0 |
4 |
EXTRACT_MAP(HashMapSA, stash_sa, "Data::HashMap::SA", self_sv); |
|
465
|
0 |
4 |
EXTRACT_STR_KEY(key_sv); |
|
469
|
0 |
4 |
if (idx >= self->capacity) { |
|
473
|
1 |
3 |
if (was_found) SvREFCNT_dec(default_value); |