From f4ff698b7b510fc24ccd4d44ccfe0fcbcce417a5 Mon Sep 17 00:00:00 2001
From: Mika Havela <mika.havela@gmail.com>
Date: Tue, 15 Apr 2008 14:52:31 +0000
Subject: Creating acf-chrony. status/expert/logfile functionallity should
 work.

git-svn-id: svn://svn.alpinelinux.org/acf/chrony/trunk@992 ab2d0c66-481e-0410-8bed-d214d4d58bed
---
 chrony-model.lua | 163 +++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 163 insertions(+)
 create mode 100644 chrony-model.lua

(limited to 'chrony-model.lua')

diff --git a/chrony-model.lua b/chrony-model.lua
new file mode 100644
index 0000000..7ed494f
--- /dev/null
+++ b/chrony-model.lua
@@ -0,0 +1,163 @@
+module(..., package.seeall)
+
+-- Load libraries
+require("fs")
+require("procps")
+require("getopts")
+require("format")
+require("posix")
+require("daemoncontrol")
+require("validator")
+require("socket")
+require("processinfo")
+
+-- Set variables
+local configfile = "/etc/chrony/chrony.conf"
+local processname = "chrony"
+local packagename = "chrony"
+local baseurl = "/etc/chrony"
+local descr = {
+}
+
+-- ################################################################################
+-- LOCAL FUNCTIONS
+
+local function process_status_text(procname)
+	local t = procps.pidof(procname)
+	if (t) and (#t > 0) then
+		return "Enabled"
+	else
+		return "Disabled"
+	end
+end
+
+-- ################################################################################
+-- PUBLIC FUNCTIONS
+
+function startstop_service ( self, action )
+	local cmd = action.value
+	local cmdresult,cmdmessage,cmderror,cmdaction = daemoncontrol.daemoncontrol(processname, cmd)
+	action.descr=cmdmessage
+	action.errtxt=cmderror
+	return cmdresult,action
+end
+
+function getstatus()
+	local status = {}
+
+	local value, errtxt = processinfo.package_version(packagename)
+	status.version = cfe({ name = "version",
+		label="Program version",
+		value=value,
+		errtxt=errtxt,
+		 })
+
+	status.status = cfe({ name="status",
+		label="Program status",
+		value=process_status_text(processname),
+		})
+
+	local autostart_sequense, autostart_errtxt = processinfo.process_botsequence(processname)
+	status.autostart = cfe({ name="autostart",
+		label="Autostart sequence",
+		value=autostart_sequense,
+		errtxt=autostart_errtxt,
+		})
+
+	return status
+end
+
+function get_logfile ()
+	local file = {}
+	local cmdtxt = "cat /var/log/messages | grep " .. processname
+	local cmd, error = io.popen(cmdtxt ,r)
+	local cmdoutput = cmd:read("*a")
+	cmd:close()
+
+	file["filename"] = cfe({ 
+		name="filename",
+		label="File name",
+		value=cmdtxt,
+		})
+
+	file["filecontent"] = cfe({ 
+		type="longtext",
+		name="filecontent",
+		label="File content",
+		value=cmdoutput,
+		})
+
+	return file
+end
+
+function getconfig()
+	local config = {}
+	return config
+end
+
+function get_filedetails(self,num)
+	local path
+	if (num == "2") then 
+		path = configfile2
+	else
+		path = configfile
+	end
+	local file = {}
+	local filedetails = {}
+	local config = {}
+	local filenameerrtxt
+	if (path) and (fs.is_file(path)) then
+		filedetails = fs.stat(path)
+		config = getconfig(path)
+	else
+		config = {}
+		config.filename = {}
+		config["filename"]["errtxt"]="Config file '".. path .. "' is missing!"
+	end
+
+	file["filename" .. (num or "")] = cfe({ 
+		name="filename" .. (num or ""),
+		label="File name",
+		value=path,
+		errtxt=filenameerrtxt
+		})
+	file["filesize" .. (num or "")] = cfe({ 
+		name="filesize" .. (num or ""),
+		label="File size",
+		value=filedetails.size or 0,
+		})
+	file["mtime" .. (num or "")] = cfe({ 
+		name="mtime" .. (num or ""),
+		label="File date",
+		value=filedetails.mtime or "---",
+		})
+	file["filecontent" .. (num or "")] = cfe({ 
+		type="longtext",
+		name="filecontent" .. (num or ""),
+		label="File content",
+		value=fs.read_file(path),
+		})
+
+	-- Sum all errors into one cfe
+	local sumerrors = ""
+	for k,v in pairs(config) do
+		if (config[k]) and (config[k]["errtxt"]) and (config[k]["errtxt"] ~= "") then	
+			sumerrors = sumerrors .. config[k]["errtxt"] .. "\n"
+		end
+	end
+	if (sumerrors ~= "") then
+		file["sumerrors" .. (num or "")] = cfe ({ 
+			name="sumerrors" .. (num or ""),
+			label = "Configuration errors",
+			errtxt = string.match(sumerrors, "(.-)\n$"),
+			})
+	end
+
+	return file
+end
+function update_filecontent (self, modifications)
+	local path = configfile
+	local file_result,err = fs.write_file(path, format.dostounix(modifications))
+	return file_result
+end
+
-- 
cgit v1.2.3