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
|
-- Lua script to perform cache checking for bayes classification (multi-class)
-- This script accepts the following parameters:
-- key1 - cache id
-- key2 - class_id (numeric hash of class name, computed by C side)
-- key3 - configuration table in message pack
local cache_id = KEYS[1]
local class_id = KEYS[2]
local conf = cmsgpack.unpack(KEYS[3])
-- Use class_id directly as cache value
local cache_value = tostring(class_id)
cache_id = string.sub(cache_id, 1, conf.cache_elt_len)
-- Try each prefix that is in Redis (as some other instance might have set it)
for i = 0, conf.cache_max_keys do
local prefix = conf.cache_prefix .. string.rep("X", i)
local have = redis.call('HGET', prefix, cache_id)
if have then
-- Already in cache, but cache_value changes when relearning
redis.call('HSET', prefix, cache_id, cache_value)
return false
end
end
local added = false
local lim = conf.cache_max_elt
for i = 0, conf.cache_max_keys do
if not added then
local prefix = conf.cache_prefix .. string.rep("X", i)
local count = redis.call('HLEN', prefix)
if count < lim then
-- We can add it to this prefix
redis.call('HSET', prefix, cache_id, cache_value)
added = true
end
end
end
if not added then
-- Need to expire some keys
local expired = false
for i = 0, conf.cache_max_keys do
local prefix = conf.cache_prefix .. string.rep("X", i)
local exists = redis.call('EXISTS', prefix)
if exists then
if not expired then
redis.call('DEL', prefix)
redis.call('HSET', prefix, cache_id, cache_value)
-- Do not expire anything else
expired = true
elseif i > 0 then
-- Move key to a shorter prefix, so we will rotate them eventually from lower to upper
local new_prefix = conf.cache_prefix .. string.rep("X", i - 1)
redis.call('RENAME', prefix, new_prefix)
end
end
end
end
return true
|
