Added functionallity to show what version of Alpine we are running on.

git-svn-id: svn://svn.alpinelinux.org/acf/alpine-baselayout/trunk@425 ab2d0c66-481e-0410-8bed-d214d4d58bed

2 files changed, 41 insertions, 0 deletions

diff --git a/alpineversion-controller.lua b/alpineversion-controller.lua
new file mode 100644
index 0000000..228f306
--- /dev/null
+++ b/alpineversion-controller.lua
@@ -0,0 +1,27 @@
+-- the alpineversion controller
+
+module (..., package.seeall)
+
+-- Cause an http redirect to our "read" action
+-- We use the self.conf table because it already has prefix,controller,etc
+-- The redir code is defined in the application error handler (acf-controller)
+local list_redir = function (self)
+	self.conf.action = "read"
+	self.conf.type = "redir"
+	error (self.conf)
+end
+
+mvc={}
+mvc.on_load = function(self, parent)
+	if (self.worker[self.conf.action] == nil ) or ( self.conf.action == "init" ) then
+		self.worker[self.conf.action] = list_redir(self)
+	end
+	
+	--logit ("hostname.mvc.on_load activated")
+
+end
+
+read = function (self )
+	return self.model:get()
+end
+
diff --git a/alpineversion-model.lua b/alpineversion-model.lua
new file mode 100644
index 0000000..830cf59
--- /dev/null
+++ b/alpineversion-model.lua
@@ -0,0 +1,14 @@
+-- alpineversion model methods
+module (..., package.seeall)
+
+-- no initializer in model - use controller.init for that
+
+
+get = function (self)
+	require("fs")
+	local liboutput = fs.read_file("/etc/alpine-release")
+	if (liboutput == nil) or (liboutput == "") then
+		liboutput = "Unknown version"
+	end
+	return liboutput
+end