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
|
--[[
Copyright (c) 2012-2013 Kaarle Ritvanen
See LICENSE file for license details
--]]
module(..., package.seeall)
local pth = require('acf.path')
local util = require('acf.persistence.util')
require 'posix'
require 'stringy'
backend = require('acf.object').class()
-- TODO cache expiration
function backend:init() self.cache = {} end
function backend:get(path, tpe)
local name = pth.join('/', unpack(path))
if not self.cache[name] then
local t = posix.stat(name, 'type')
if not t then return end
if t == 'regular' then
self.cache[name] = util.read_file(name)
elseif t == 'link' then
-- TODO handle relative symlinks
local target = posix.readlink(name)
assert(target)
if not tpe then return target end
assert(stringy.startswith(tpe, 'reference/files/'))
local scope = string.sub(tpe, 16, -1)..'/'
local slen = string.len(scope)
assert(string.sub(target, 1, slen) == scope)
return string.sub(target, slen + 1, -1)
elseif t == 'directory' then
local res = {}
for _, fname in ipairs(posix.dir(name)) do
if not ({['.']=true, ['..']=true})[fname] then
table.insert(res, pth.name(fname))
end
end
return res
else error('Unsupported file type: '..name) end
end
return self.cache[name]
end
function backend:set(mods)
for _, mod in pairs(mods) do
local path, tpe, value = unpack(mod)
local name = pth.join('/', unpack(path))
if not tpe then
print('DEL', name)
local t = posix.stat(name, 'type')
if t == 'directory' then
assert(posix.rmdir(name))
elseif t then assert(os.remove(name)) end
self.cache[name] = nil
elseif tpe == 'table' then
assert(posix.mkdir(name))
elseif stringy.startswith(tpe, 'reference/files/') then
-- TODO use relative symlink
os.remove(name)
assert(
posix.link(
pth.to_absolute(value, string.sub(tpe, 16, -1)), name, true
)
)
else
local file = util.open_file(name, 'w')
file:write(tostring(value))
file:close()
self.cache[name] = value
end
end
end
|
