care-ef-lua 0.2.0

Lua effector for the care tool
Documentation 
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

local posixfs = {}

local arg = arg
_G.arg = nil

function posixfs.exists(path)
  return posixfs.osexists(posixfs.ospath(path))
end
function posixfs.query(path, shadowpath)
  posixfs.copy(posixfs.ospath(path), shadowpath)
end
function posixfs.apply(path, shadowpath)
  posixfs.osapply(posixfs.ospath(path), shadowpath)
end

function posixfs.ospath(path)
  return '/' .. path
end

function posixfs.osexists(ospath)
  local fh, err = io.open(ospath, 'r')
  if fh then
    fh:close()
  end
  return not not fh
end

function posixfs.copy(p1, p2)
  -- TODO: use rsync if possible
  assert(os.execute("cp '" .. p1 .. "' '" .. p2 .. "'"))
end

function posixfs.osapply(ospath, shadowpath)
  if posixfs.osexists(shadowpath) then
    posixfs.mkdirp(ospath)
    posixfs.copy(shadowpath, ospath)
  else
    assert(os.remove(ospath))
    -- TODO: remove parent directories if empty
  end
end

function posixfs.mkdirp(ospath)
  local parent = ospath:gsub('/[^/]*$', '')
  os.execute("mkdir -p '" .. parent .. "'")
end

return posixfs