1 -- Copyright 2014 Christian Schoenebeck <christian dot schoenebeck at gmail dot com>
2 -- Licensed under the Apache License, Version 2.0
4 module("luci.controller.radicale", package.seeall)
6 local NX = require("nixio")
7 local NXFS = require("nixio.fs")
8 local DISP = require "luci.dispatcher"
9 local HTTP = require("luci.http")
10 local I18N = require("luci.i18n") -- not globally avalible here
11 local UTIL = require("luci.util")
12 local SYS = require("luci.sys")
15 entry( {"admin", "services", "radicale"}, alias("admin", "services", "radicale", "edit"), _("CalDAV/CardDAV"), 58)
16 entry( {"admin", "services", "radicale", "edit"}, cbi("radicale") ).leaf = true
17 entry( {"admin", "services", "radicale", "logview"}, call("_logread") ).leaf = true
18 entry( {"admin", "services", "radicale", "startstop"}, post("_startstop") ).leaf = true
19 entry( {"admin", "services", "radicale", "status"}, call("_status") ).leaf = true
22 -- called by XHR.get from detail_logview.htm
24 -- read application settings
25 local uci = UCI.cursor()
26 local logfile = uci:get("radicale", "radicale", "logfile") or "/var/log/radicale"
27 uci:unload("radicale")
29 local ldata=NXFS.readfile(logfile)
30 if not ldata or #ldata == 0 then
36 -- called by XHR.get from detail_startstop.htm
40 SYS.call("/etc/init.d/radicale stop")
41 NX.nanosleep(1) -- sleep a second
42 if NX.kill(pid, 0) then -- still running
43 NX.kill(pid, 9) -- send SIGKILL
47 SYS.call("/etc/init.d/radicale start")
48 NX.nanosleep(1) -- sleep a second
50 if pid > 0 and not NX.kill(pid, 0) then
51 pid = 0 -- process did not start
54 HTTP.write(tostring(pid)) -- HTTP needs string not number
57 -- called by XHR.poll from detail_startstop.htm
60 HTTP.write(tostring(pid)) -- HTTP needs string not number
63 -- Application / Service specific information functions ########################
64 function luci_app_name()
65 return "luci-app-radicale"
68 function service_name()
71 function service_required()
74 function service_installed()
75 local v = ipkg_ver_installed("radicale-py2")
76 if not v or #v == 0 then v = ipkg_ver_installed("radicale-py3") end
77 if not v or #v == 0 then v = "0" end
81 return ipkg_ver_compare(service_installed(),">=",service_required())
84 function app_title_main()
85 return [[</a><a href="javascript:alert(']]
86 .. I18N.translate("Version Information")
87 .. [[\n\n]] .. luci_app_name()
88 .. [[\n\t]] .. I18N.translate("Version") .. [[:\t]]
89 .. (ipkg_ver_installed(luci_app_name()) == ""
90 and I18N.translate("NOT installed")
91 or ipkg_ver_installed(luci_app_name()) )
92 .. [[\n\n]] .. service_name() .. [[ ]] .. I18N.translate("required") .. [[:]]
93 .. [[\n\t]] .. I18N.translate("Version") .. [[:\t]]
94 .. service_required() .. [[ ]] .. I18N.translate("or higher")
95 .. [[\n\n]] .. service_name() .. [[ ]] .. I18N.translate("installed") .. [[:]]
96 .. [[\n\t]] .. I18N.translate("Version") .. [[:\t]]
97 .. (service_installed() == "0"
98 and I18N.translate("NOT installed")
99 or service_installed())
102 .. I18N.translate("Radicale CalDAV/CardDAV Server")
104 function app_title_back()
105 return [[</a><a href="]]
106 .. DISP.build_url("admin", "services", "radicale")
108 .. I18N.translate("Radicale CalDAV/CardDAV Server")
110 function app_description()
111 return I18N.translate("The Radicale Project is a complete CalDAV (calendar) and CardDAV (contact) server solution.") .. [[<br />]]
112 .. I18N.translate("Calendars and address books are available for both local and remote access, possibly limited through authentication policies.") .. [[<br />]]
113 .. I18N.translate("They can be viewed and edited by calendar and contact clients on mobile phones or computers.")
116 -- other multiused functions ###################################################
118 --return pid of running process
120 return tonumber(SYS.exec([[ps | grep "[p]ython.*[r]adicale" 2>/dev/null | awk '{print $1}']])) or 0
123 -- compare versions using "<=" "<" ">" ">=" "=" "<<" ">>"
124 function ipkg_ver_compare(ver1, comp, ver2)
125 if not ver1 or not ver2
126 or not comp or not (#comp > 0) then return nil end
127 -- correct compare string
128 if comp == "<>" or comp == "><" or comp == "!=" or comp == "~=" then comp = "~="
129 elseif comp == "<=" or comp == "<" or comp == "=<" then comp = "<="
130 elseif comp == ">=" or comp == ">" or comp == "=>" then comp = ">="
131 elseif comp == "=" or comp == "==" then comp = "=="
132 elseif comp == "<<" then comp = "<"
133 elseif comp == ">>" then comp = ">"
136 local av1 = UTIL.split(ver1, "[%.%-]", nil, true)
137 local av2 = UTIL.split(ver2, "[%.%-]", nil, true)
139 for i = 1, math.max(table.getn(av1),table.getn(av2)), 1 do
140 local s1 = av1[i] or ""
141 local s2 = av2[i] or ""
143 -- first "not equal" found return true
144 if comp == "~=" and (s1 ~= s2) then return true end
145 -- first "lower" found return true
146 if (comp == "<" or comp == "<=") and (s1 < s2) then return true end
147 -- first "greater" found return true
148 if (comp == ">" or comp == ">=") and (s1 > s2) then return true end
149 -- not equal then return false
150 if (s1 ~= s2) then return false end
153 -- all equal and not compare greater or lower then true
154 return not (comp == "<" or comp == ">")
157 -- read version information for given package if installed
158 function ipkg_ver_installed(pkg)
160 local control = io.open("/usr/lib/opkg/info/%s.control" % pkg, "r")
164 ln = control:read("*l")
165 if ln and ln:match("^Version: ") then
166 version = ln:gsub("^Version: ", "")
175 -- replacement of build-in Flag.parse of cbi.lua
176 -- modified to mark section as changed if value changes
177 -- current parse did not do this, but it is done AbstaractValue.parse()
178 function flag_parse(self, section)
179 local fexists = self.map:formvalue(
180 luci.cbi.FEXIST_PREFIX .. self.config .. "." .. section .. "." .. self.option)
183 local fvalue = self:formvalue(section) and self.enabled or self.disabled
184 local cvalue = self:cfgvalue(section)
185 if fvalue ~= self.default or (not self.optional and not self.rmempty) then
186 self:write(section, fvalue)
190 if (fvalue ~= cvalue) then self.section.changed = true end
193 self.section.changed = true