blob: 88c819e111e09f2d79b65522f8f6adee8d0bddcb (
plain)
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
|
-- acf model for displaying logfiles recusivly
module (..., package.seeall)
require("fs")
-- no initializer in model - use controller.init for that
-- ###############################################################
-- Private functions
local function querycmd ( cmdline )
local cmd = io.popen( cmdline )
local cmd_result = cmd:read("*a") or "unknown"
cmd:close()
return cmd_result
end
-- ###############################################################
-- Public functions
get = function (self)
local svnurl = "svn://svn.alpinelinux.org/acf/"
return querycmd("/usr/bin/svn list -v " .. svnurl )
end
update = function (self)
local svnurl = "svn://svn.alpinelinux.org/acf/"
local updates = {}
local cmdresult = {}
updates.svnurl = svnurl
for list in string.gmatch((querycmd("/usr/bin/svn list " .. svnurl )), "%S+") do
local updateresult = ""
if (list == "core/") then
updateresult = querycmd("/usr/bin/svn up /usr/share/acf/")
elseif ( fs.is_dir("/usr/share/acf/app/" .. list)) then
updateresult = querycmd("/usr/bin/svn up /usr/share/acf/app/" .. list)
elseif (list ~= "sandbox/") then
updateresult = querycmd("/usr/bin/svn co " .. svnurl .. list .."trunk/ /usr/share/acf/app/" .. list)
end
-- Hide projects without updates
if (string.match(updateresult, "^At revision.*")) then updateresult = "" end
table.insert(cmdresult, {name=list, updates=updateresult})
end
updates.cmdresult = cmdresult
return updates
end
|
