summaryrefslogtreecommitdiffstats
path: root/acfupdate-model.lua
diff options
context:
space:
mode:
Diffstat (limited to 'acfupdate-model.lua')
-rw-r--r--acfupdate-model.lua44
1 files changed, 44 insertions, 0 deletions
diff --git a/acfupdate-model.lua b/acfupdate-model.lua
new file mode 100644
index 0000000..88c819e
--- /dev/null
+++ b/acfupdate-model.lua
@@ -0,0 +1,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