+++ /dev/null
---[[
-LuCI - Lua Configuration Interface
-
-Copyright 2014 Christian Schoenebeck <christian dot schoenebeck at gmail dot com>
-
-Licensed under the Apache License, Version 2.0 (the "License");
-you may not use this file except in compliance with the License.
-You may obtain a copy of the License at
-
- http://www.apache.org/licenses/LICENSE-2.0
-
-$Id$
-]]--
-
-local NXFS = require "nixio.fs"
-local CTRL = require "luci.controller.ddns" -- this application's controller
-local DISP = require "luci.dispatcher"
-local HTTP = require "luci.http"
-local SYS = require "luci.sys"
-local DDNS = require "luci.tools.ddns" -- ddns multiused functions
-
--- show hints ?
-show_hints = not (DDNS.check_ipv6() -- IPv6 support
- and DDNS.check_ssl() -- HTTPS support
- and DDNS.check_proxy() -- Proxy support
- and DDNS.check_bind_host() -- DNS TCP support
- )
-need_update = CTRL.update_needed() -- correct ddns-scripts version
-
--- html constants
-font_red = [[<font color="red">]]
-font_off = [[</font>]]
-bold_on = [[<strong>]]
-bold_off = [[</strong>]]
-
--- cbi-map definition -- #######################################################
-m = Map("ddns")
-
--- first need to close <a> from cbi map template our <a> closed by template
---m.title = [[</a><a href="javascript:alert(']] .. CTRL.show_versions() ..[[')">]] ..
--- translate("Dynamic DNS")
-m.title = [[</a><a href="#" onclick="onclick_maptitle();">]] ..
- translate("Dynamic DNS")
-
-m.description = translate("Dynamic DNS allows that your router can be reached with " ..
- "a fixed hostname while having a dynamically changing " ..
- "IP address.")
-
-m.on_after_commit = function(self)
- if self.changed then -- changes ?
- if SYS.init.enabled("ddns") then -- ddns service enabled, restart all
- os.execute("/etc/init.d/ddns restart")
- else -- ddns service disabled, send SIGHUP to running
- os.execute("killall -1 dynamic_dns_updater.sh")
- end
- end
-end
-
--- SimpleSection definiton -- ##################################################
--- with all the JavaScripts we need for "a good Show"
-a = m:section( SimpleSection )
-a.template = "ddns/overview_status"
-
--- SimpleSection definition -- #################################################
--- show Hints to optimize installation and script usage
--- only show if service not enabled
--- or no IPv6 support
--- or not GNU Wget and not cURL (for https support)
--- or not GNU Wget but cURL without proxy support
--- or not BIND's host
--- or ddns-scripts package need update
-if show_hints or need_update or not SYS.init.enabled("ddns") then
- s = m:section( SimpleSection, translate("Hints") )
-
- -- ddns_scripts needs to be updated for full functionality
- if need_update then
- local dv = s:option(DummyValue, "_update_needed")
- dv.titleref = DISP.build_url("admin", "system", "packages")
- dv.rawhtml = true
- dv.title = font_red .. bold_on ..
- translate("Software update required") .. bold_off .. font_off
- dv.value = translate("The currently installed 'ddns-scripts' package did not support all available settings.") ..
- "<br />" ..
- translate("Please update to the current version!")
- end
-
- -- DDNS Service disabled
- if not SYS.init.enabled("ddns") then
- local dv = s:option(DummyValue, "_not_enabled")
- dv.titleref = DISP.build_url("admin", "system", "startup")
- dv.rawhtml = true
- dv.title = bold_on ..
- translate("DDNS Autostart disabled") .. bold_off
- dv.value = translate("Currently DDNS updates are not started at boot or on interface events." .. "<br />" ..
- "You can start/stop each configuration here. It will run until next reboot.")
- end
-
- -- Show more hints on a separate page
- if show_hints then
- local dv = s:option(DummyValue, "_separate")
- dv.titleref = DISP.build_url("admin", "services", "ddns", "hints")
- dv.rawhtml = true
- dv.title = bold_on ..
- translate("Show more") .. bold_off
- dv.value = translate("Follow this link" .. "<br />" ..
- "You will find more hints to optimize your system to run DDNS scripts with all options")
- end
-end
-
--- TableSection definition -- ##################################################
-ts = m:section( TypedSection, "service",
- translate("Overview"),
- translate("Below is a list of configured DDNS configurations and their current state." .. "<br />" ..
- "If you want to send updates for IPv4 and IPv6 you need to define two separate Configurations " ..
- "i.e. 'myddns_ipv4' and 'myddns_ipv6'") )
-ts.sectionhead = translate("Configuration")
-ts.template = "cbi/tblsection"
-ts.addremove = true
-ts.extedit = DISP.build_url("admin", "services", "ddns", "detail", "%s")
-function ts.create(self, name)
- AbstractSection.create(self, name)
- HTTP.redirect( self.extedit:format(name) )
-end
-
--- Domain and registered IP -- #################################################
-dom = ts:option(DummyValue, "_domainIP",
- translate("Hostname/Domain") .. "<br />" .. translate("Registered IP") )
-dom.template = "ddns/overview_doubleline"
-function dom.set_one(self, section)
- local domain = self.map:get(section, "domain") or ""
- if domain ~= "" then
- return domain
- else
- return [[<em>]] .. translate("config error") .. [[</em>]]
- end
-end
-function dom.set_two(self, section)
- local domain = self.map:get(section, "domain") or ""
- if domain == "" then return "" end
- local dnsserver = self.map:get(section, "dnsserver") or ""
- local use_ipv6 = tonumber(self.map:get(section, "use_ipv6") or 0)
- local force_ipversion = tonumber(self.map:get(section, "force_ipversion") or 0)
- local force_dnstcp = tonumber(self.map:get(section, "force_dnstcp") or 0)
- local command = [[/usr/lib/ddns/dynamic_dns_lucihelper.sh]]
- if not NXFS.access(command, "rwx", "rx", "rx") then
- NXFS.chmod(command, 755)
- end
- command = command .. [[ get_registered_ip ]] .. domain .. [[ ]] .. use_ipv6 ..
- [[ ]] .. force_ipversion .. [[ ]] .. force_dnstcp .. [[ ]] .. dnsserver
- local ip = SYS.exec(command)
- if ip == "" then ip = translate("no data") end
- return ip
-end
-
--- enabled
-ena = ts:option( Flag, "enabled",
- translate("Enabled"))
-ena.template = "ddns/overview_enabled"
-ena.rmempty = false
-function ena.parse(self, section)
- DDNS.flag_parse(self, section)
-end
-
--- show PID and next update
-upd = ts:option( DummyValue, "_update",
- translate("Last Update") .. "<br />" .. translate("Next Update"))
-upd.template = "ddns/overview_doubleline"
-function upd.set_one(self, section) -- fill Last Update
- -- get/validate last update
- local uptime = SYS.uptime()
- local lasttime = DDNS.get_lastupd(section)
- if lasttime > uptime then -- /var might not be linked to /tmp and cleared on reboot
- lasttime = 0
- end
-
- -- no last update happen
- if lasttime == 0 then
- return translate("never")
-
- -- we read last update
- else
- -- calc last update
- -- os.epoch - sys.uptime + lastupdate(uptime)
- local epoch = os.time() - uptime + lasttime
- -- use linux date to convert epoch
- return DDNS.epoch2date(epoch)
- end
-end
-function upd.set_two(self, section) -- fill Next Update
- -- get enabled state
- local enabled = tonumber(self.map:get(section, "enabled") or 0)
- local datenext = translate("unknown error") -- formatted date of next update
-
- -- get force seconds
- local force_interval = tonumber(self.map:get(section, "force_interval") or 72)
- local force_unit = self.map:get(section, "force_unit") or "hours"
- local force_seconds = DDNS.calc_seconds(force_interval, force_unit)
-
- -- get last update and get/validate PID
- local uptime = SYS.uptime()
- local lasttime = DDNS.get_lastupd(section)
- if lasttime > uptime then -- /var might not be linked to /tmp and cleared on reboot
- lasttime = 0
- end
- local pid = DDNS.get_pid(section)
-
- -- calc next update
- if lasttime > 0 then
- local epoch = os.time() - uptime + lasttime + force_seconds
- -- use linux date to convert epoch
- datelast = DDNS.epoch2date(epoch)
- end
-
- -- process running but update needs to happen
- if pid > 0 and ( lasttime + force_seconds - uptime ) < 0 then
- datenext = translate("Verify")
-
- -- run once
- elseif force_seconds == 0 then
- datenext = translate("Run once")
-
- -- no process running and NOT enabled
- elseif pid == 0 and enabled == 0 then
- datenext = translate("Disabled")
-
- -- no process running and NOT
- elseif pid == 0 and enabled ~= 0 then
- datenext = translate("Stopped")
- end
-
- return datenext
-end
-
--- start/stop button
-btn = ts:option( Button, "_startstop",
- translate("Process ID") .. "<br />" .. translate("Start / Stop") )
-btn.template = "ddns/overview_startstop"
-function btn.cfgvalue(self, section)
- local pid = DDNS.get_pid(section)
- if pid > 0 then
- btn.inputtitle = "PID: " .. pid
- btn.inputstyle = "reset"
- btn.disabled = false
- elseif (self.map:get(section, "enabled") or "0") ~= "0" then
- btn.inputtitle = translate("Start")
- btn.inputstyle = "apply"
- btn.disabled = false
- else
- btn.inputtitle = "----------"
- btn.inputstyle = "button"
- btn.disabled = true
- end
- return true
-end
-
-return m
projects / project / luci.git / blobdiff