diff options
Diffstat (limited to 'applications/luci-app-radicale/luasrc/controller/radicale.lua')
| -rwxr-xr-x | applications/luci-app-radicale/luasrc/controller/radicale.lua | 210 |
1 files changed, 210 insertions, 0 deletions
diff --git a/applications/luci-app-radicale/luasrc/controller/radicale.lua b/applications/luci-app-radicale/luasrc/controller/radicale.lua new file mode 100755 index 000000000..662c60d5a --- /dev/null +++ b/applications/luci-app-radicale/luasrc/controller/radicale.lua @@ -0,0 +1,210 @@ +-- Copyright 2014 Christian Schoenebeck <christian dot schoenebeck at gmail dot com> +-- Licensed under the Apache License, Version 2.0 + +module("luci.controller.radicale", package.seeall) + +local NX = require("nixio") +local NXFS = require("nixio.fs") +local DISP = require "luci.dispatcher" +local HTTP = require("luci.http") +local I18N = require("luci.i18n") -- not globally avalible here +local UTIL = require("luci.util") +local SYS = require("luci.sys") + +function index() + entry( {"admin", "services", "radicale"}, alias("admin", "services", "radicale", "edit"), _("CalDAV/CardDAV"), 58) + entry( {"admin", "services", "radicale", "edit"}, cbi("radicale") ).leaf = true + entry( {"admin", "services", "radicale", "logview"}, call("_logread") ).leaf = true + entry( {"admin", "services", "radicale", "startstop"}, call("_startstop") ).leaf = true + entry( {"admin", "services", "radicale", "status"}, call("_status") ).leaf = true +end + +-- called by XHR.get from detail_logview.htm +function _logread() + -- read application settings + local uci = UCI.cursor() + local logfile = uci:get("radicale", "radicale", "logfile") or "/var/log/radicale" + uci:unload("radicale") + + local ldata=NXFS.readfile(logfile) + if not ldata or #ldata == 0 then + ldata="_nodata_" + end + HTTP.write(ldata) +end + +-- called by XHR.get from detail_startstop.htm +function _startstop() + local pid = get_pid() + if pid > 0 then + SYS.call("/etc/init.d/radicale stop") + NX.nanosleep(1) -- sleep a second + if NX.kill(pid, 0) then -- still running + NX.kill(pid, 9) -- send SIGKILL + end + pid = 0 + else + SYS.call("/etc/init.d/radicale start") + NX.nanosleep(1) -- sleep a second + pid = get_pid() + if pid > 0 and not NX.kill(pid, 0) then + pid = 0 -- process did not start + end + end + HTTP.write(tostring(pid)) -- HTTP needs string not number +end + +-- called by XHR.poll from detail_startstop.htm +function _status() + local pid = get_pid() + HTTP.write(tostring(pid)) -- HTTP needs string not number +end + +-- Application / Service specific information functions ######################## +function luci_app_name() + return "luci-app-radicale" +end + +function service_name() + return "radicale" +end +function service_required() + return "0.10-1" +end +function service_installed() + local v = ipkg_ver_installed("radicale-py2") + if not v or #v == 0 then v = ipkg_ver_installed("radicale-py3") end + if not v or #v == 0 then v = "0" end + return v +end +function service_ok() + return ipkg_ver_compare(service_installed(),">=",service_required()) +end + +function app_title_main() + return [[</a><a href="javascript:alert(']] + .. I18N.translate("Version Information") + .. [[\n\n]] .. luci_app_name() + .. [[\n\t]] .. I18N.translate("Version") .. [[:\t]] + .. (ipkg_ver_installed(luci_app_name()) == "" + and I18N.translate("NOT installed") + or ipkg_ver_installed(luci_app_name()) ) + .. [[\n\n]] .. service_name() .. [[ ]] .. I18N.translate("required") .. [[:]] + .. [[\n\t]] .. I18N.translate("Version") .. [[:\t]] + .. service_required() .. [[ ]] .. I18N.translate("or higher") + .. [[\n\n]] .. service_name() .. [[ ]] .. I18N.translate("installed") .. [[:]] + .. [[\n\t]] .. I18N.translate("Version") .. [[:\t]] + .. (service_installed() == "0" + and I18N.translate("NOT installed") + or service_installed()) + .. [[\n\n]] + .. [[')">]] + .. I18N.translate("Radicale CalDAV/CardDAV Server") +end +function app_title_back() + return [[</a><a href="]] + .. DISP.build_url("admin", "services", "radicale") + .. [[">]] + .. I18N.translate("Radicale CalDAV/CardDAV Server") +end +function app_description() + return I18N.translate("The Radicale Project is a complete CalDAV (calendar) and CardDAV (contact) server solution.") .. [[<br />]] + .. I18N.translate("Calendars and address books are available for both local and remote access, possibly limited through authentication policies.") .. [[<br />]] + .. I18N.translate("They can be viewed and edited by calendar and contact clients on mobile phones or computers.") +end + +-- other multiused functions ################################################### + +--return pid of running process +function get_pid() + return tonumber(SYS.exec([[ps | grep "[p]ython.*[r]adicale" 2>/dev/null | awk '{print $1}']])) or 0 +end + +-- compare versions using "<=" "<" ">" ">=" "=" "<<" ">>" +function ipkg_ver_compare(ver1, comp, ver2) + if not ver1 or not (#ver1 > 0) + or not ver2 or not (#ver2 > 0) + or not comp or not (#comp > 0) then return nil end + -- correct compare string + if comp == "<>" or comp == "><" or comp == "!=" or comp == "~=" then comp = "~=" + elseif comp == "<=" or comp == "<" or comp == "=<" then comp = "<=" + elseif comp == ">=" or comp == ">" or comp == "=>" then comp = ">=" + elseif comp == "=" or comp == "==" then comp = "==" + elseif comp == "<<" then comp = "<" + elseif comp == ">>" then comp = ">" + else return nil end + + local av1 = UTIL.split(ver1, "[%.%-]", nil, true) + local av2 = UTIL.split(ver2, "[%.%-]", nil, true) + + for i = 1, math.max(table.getn(av1),table.getn(av2)), 1 do + local s1 = av1[i] or "" + local s2 = av2[i] or "" + local n1 = tonumber(s1) + local n2 = tonumber(s2) + + -- one numeric and other empty string then set other to 0 + if n1 and not n2 and (not s2 or #s2 == 0) then n2 = 0 end + if n2 and not n1 and (not s1 or #s1 == 0) then n1 = 0 end + + local nc = (n1 and n2) -- numeric compare + + if nc then + -- first "not equal" found return true + if comp == "~=" and (n1 ~= n2) then return true end + -- first "lower" found return true + if (comp == "<" or comp == "<=") and (n1 < n2) then return true end + -- first "greater" found return true + if (comp == ">" or comp == ">=") and (n1 > n2) then return true end + -- not equal then return false + if (n1 ~= n2) then return false end + else + if comp == "~=" and (s1 ~= s2) then return true end + if (comp == "<" or comp == "<=") and (s1 < s2) then return true end + if (comp == ">" or comp == ">=") and (s1 > s2) then return true end + if (s1 ~= s2) then return false end + end + end + -- all equal then true + return true +end + +-- read version information for given package if installed +function ipkg_ver_installed(pkg) + local version = "" + local control = io.open("/usr/lib/opkg/info/%s.control" % pkg, "r") + if control then + local ln + repeat + ln = control:read("*l") + if ln and ln:match("^Version: ") then + version = ln:gsub("^Version: ", "") + break + end + until not ln + control:close() + end + return version +end + +-- replacement of build-in Flag.parse of cbi.lua +-- modified to mark section as changed if value changes +-- current parse did not do this, but it is done AbstaractValue.parse() +function flag_parse(self, section) + local fexists = self.map:formvalue( + luci.cbi.FEXIST_PREFIX .. self.config .. "." .. section .. "." .. self.option) + + if fexists then + local fvalue = self:formvalue(section) and self.enabled or self.disabled + local cvalue = self:cfgvalue(section) + if fvalue ~= self.default or (not self.optional and not self.rmempty) then + self:write(section, fvalue) + else + self:remove(section) + end + if (fvalue ~= cvalue) then self.section.changed = true end + else + self:remove(section) + self.section.changed = true + end +end |