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
|
local error = error;
local setmetatable = setmetatable;
local config = require "core.configmanager";
local datamanager = require "util.datamanager";
local multitable = require "util.multitable";
local modulemanager = require "core.modulemanager";
local hosts = hosts;
local log = require "util.logger".init("storagemanager");
local olddm = {}; -- maintain old datamanager, for backwards compatibility
for k,v in pairs(datamanager) do olddm[k] = v; end
local driver_cache = multitable.new();
local store_cache = multitable.new();
module("storagemanager")
local default_driver_mt = {};
default_driver_mt.__index = default_driver_mt;
function default_driver_mt:open(store)
return setmetatable({ host = self.host, store = self.store }, default_driver_mt);
end
function default_driver_mt:get(user) return olddm.load(user, self.host, self.store); end
function default_driver_mt:set(user, data) return olddm.store(user, self.host, self.store, data); end
local function load_driver_for_host(host)
if driver_cache:get(host) then return driver_cache:get(host); end
local host_session = hosts[host];
if not host_session then error("No such host"); end
local driver_plugin = config.get(host, "core", "datastore");
if not driver_plugin then return setmetatable({ host = host }, default_driver_mt); end
local provider;
local function handler(event) provider = event.item; end
host_session.events.add_handler("item-added/data-driver", handler);
local success, err = modulemanager.load(host, driver_plugin);
host_session.events.remove_handler("item-added/data-driver", handler);
if not success then error(err); end
if not provider then error("Module didn't add a provider"); end
driver_cache:set(host, provider);
log("debug", "Data driver '%s' loaded for host '%s'", driver_plugin, host);
return provider;
end
function open(host, store, typ)
local ret = store_cache:get(host, store);
if not ret then
local driver = load_driver_for_host(host);
ret = driver:open(store, typ);
if not ret then ret = setmetatable({ host = host, store = store }, default_driver_mt); end -- default to default driver
store_cache:set(host, store, ret);
end
return ret;
end
function datamanager.load(username, host, datastore)
return open(host, datastore):get(username);
end
function datamanager.store(username, host, datastore, data)
return open(host, datastore):set(username, data);
end
return _M;
|