diff options
author | Jo-Philipp Wich <jow@openwrt.org> | 2014-12-03 15:17:05 +0100 |
---|---|---|
committer | Jo-Philipp Wich <jow@openwrt.org> | 2015-01-08 16:26:20 +0100 |
commit | 1bb4822dca6113f73e3bc89e2acf15935e6f8e92 (patch) | |
tree | 35e16f100466e4e00657199b38bb3d87d52bf73f /applications/luci-app-olsr/luasrc/model/cbi/olsr/olsrd6.lua | |
parent | 9edd0e46c3f880727738ce8ca6ff1c8b85f99ef4 (diff) |
Rework LuCI build system
* Rename subdirectories to their repective OpenWrt package names
* Make each LuCI module its own standalone package
* Deploy a shared luci.mk which is used by each module Makefile
Signed-off-by: Jo-Philipp Wich <jow@openwrt.org>
Diffstat (limited to 'applications/luci-app-olsr/luasrc/model/cbi/olsr/olsrd6.lua')
-rw-r--r-- | applications/luci-app-olsr/luasrc/model/cbi/olsr/olsrd6.lua | 401 |
1 files changed, 401 insertions, 0 deletions
diff --git a/applications/luci-app-olsr/luasrc/model/cbi/olsr/olsrd6.lua b/applications/luci-app-olsr/luasrc/model/cbi/olsr/olsrd6.lua new file mode 100644 index 000000000..2b8d60cd1 --- /dev/null +++ b/applications/luci-app-olsr/luasrc/model/cbi/olsr/olsrd6.lua @@ -0,0 +1,401 @@ +--[[ +LuCI - Lua Configuration Interface + +Copyright 2008 Steven Barth <steven@midlink.org> +Copyright 2010 Jo-Philipp Wich <xm@subsignal.org> + +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$ +]]-- + +require("luci.tools.webadmin") +local fs = require "nixio.fs" +local util = require "luci.util" +local ip = require "luci.ip" + +local has_ipip = fs.glob("/etc/modules.d/[0-9]*-ipip")() + +m = Map("olsrd6", translate("OLSR Daemon"), + translate("The OLSR daemon is an implementation of the Optimized Link State Routing protocol. ".. + "As such it allows mesh routing for any network equipment. ".. + "It runs on any wifi card that supports ad-hoc mode and of course on any ethernet device. ".. + "Visit <a href='http://www.olsr.org'>olsrd.org</a> for help and documentation.")) + +function m.on_parse() + local has_defaults = false + + m.uci:foreach("olsrd6", "InterfaceDefaults", + function(s) + has_defaults = true + return false + end) + + if not has_defaults then + m.uci:section("olsrd6", "InterfaceDefaults") + end +end + +function write_float(self, section, value) + local n = tonumber(value) + if n ~= nil then + return Value.write(self, section, "%.1f" % n) + end +end + +s = m:section(TypedSection, "olsrd6", translate("General settings")) +s.anonymous = true + +s:tab("general", translate("General Settings")) +s:tab("lquality", translate("Link Quality Settings")) +s:tab("smartgw", translate("SmartGW"), not has_ipip and translate("Warning: kmod-ipip is not installed. Without kmod-ipip SmartGateway will not work, please install it.")) +s:tab("advanced", translate("Advanced Settings")) + +poll = s:taboption("advanced", Value, "Pollrate", translate("Pollrate"), + translate("Polling rate for OLSR sockets in seconds. Default is 0.05.")) +poll.optional = true +poll.datatype = "ufloat" +poll.placeholder = "0.05" + +nicc = s:taboption("advanced", Value, "NicChgsPollInt", translate("Nic changes poll interval"), + translate("Interval to poll network interfaces for configuration changes (in seconds). Default is \"2.5\".")) +nicc.optional = true +nicc.datatype = "ufloat" +nicc.placeholder = "2.5" + +tos = s:taboption("advanced", Value, "TosValue", translate("TOS value"), + translate("Type of service value for the IP header of control traffic. Default is \"16\".")) +tos.optional = true +tos.datatype = "uinteger" +tos.placeholder = "16" + +fib = s:taboption("general", ListValue, "FIBMetric", translate("FIB metric"), + translate ("FIBMetric controls the metric value of the host-routes OLSRd sets. ".. + "\"flat\" means that the metric value is always 2. This is the preferred value ".. + "because it helps the linux kernel routing to clean up older routes. ".. + "\"correct\" uses the hopcount as the metric value. ".. + "\"approx\" use the hopcount as the metric value too, but does only update the hopcount if the nexthop changes too. ".. + "Default is \"flat\".")) +fib:value("flat") +fib:value("correct") +fib:value("approx") + +lql = s:taboption("lquality", ListValue, "LinkQualityLevel", translate("LQ level"), + translate("Link quality level switch between hopcount and cost-based (mostly ETX) routing.<br />".. + "<b>0</b> = do not use link quality<br />".. + "<b>2</b> = use link quality for MPR selection and routing<br />".. + "Default is \"2\"")) +lql:value("2") +lql:value("0") + +lqage = s:taboption("lquality", Value, "LinkQualityAging", translate("LQ aging"), + translate("Link quality aging factor (only for lq level 2). Tuning parameter for etx_float and etx_fpm, smaller values ".. + "mean slower changes of ETX value. (allowed values are between 0.01 and 1.0)")) +lqage.optional = true +lqage:depends("LinkQualityLevel", "2") + +lqa = s:taboption("lquality", ListValue, "LinkQualityAlgorithm", translate("LQ algorithm"), + translate("Link quality algorithm (only for lq level 2).<br />".. + "<b>etx_float</b>: floating point ETX with exponential aging<br />".. + "<b>etx_fpm</b> : same as etx_float, but with integer arithmetic<br />".. + "<b>etx_ff</b> : ETX freifunk, an etx variant which use all OLSR traffic (instead of only hellos) for ETX calculation<br />".. + "<b>etx_ffeth</b>: incompatible variant of etx_ff that allows ethernet links with ETX 0.1.<br />".. + "Defaults to \"etx_ff\"")) +lqa.optional = true +lqa:value("etx_ff") +lqa:value("etx_fpm") +lqa:value("etx_float") +lqa:value("etx_ffeth") +lqa:depends("LinkQualityLevel", "2") +lqa.optional = true + +lqfish = s:taboption("lquality", Flag, "LinkQualityFishEye", translate("LQ fisheye"), + translate("Fisheye mechanism for TCs (checked means on). Default is \"on\"")) +lqfish.default = "1" +lqfish.optional = true + +hyst = s:taboption("lquality", Flag, "UseHysteresis", translate("Use hysteresis"), + translate("Hysteresis for link sensing (only for hopcount metric). Hysteresis adds more robustness to the link sensing ".. + "but delays neighbor registration. Defaults is \"yes\"")) +hyst.default = "yes" +hyst.enabled = "yes" +hyst.disabled = "no" +hyst:depends("LinkQualityLevel", "0") +hyst.optional = true +hyst.rmempty = true + +port = s:taboption("general", Value, "OlsrPort", translate("Port"), + translate("The port OLSR uses. This should usually stay at the IANA assigned port 698. It can have a value between 1 and 65535.")) +port.optional = true +port.default = "698" +port.rmempty = true + +mainip = s:taboption("general", Value, "MainIp", translate("Main IP"), + translate("Sets the main IP (originator ip) of the router. This IP will NEVER change during the uptime of olsrd. ".. + "Default is ::, which triggers usage of the IP of the first interface.")) +mainip.optional = true +mainip.rmempty = true +mainip.datatype = "ipaddr" +mainip.placeholder = "::" + +sgw = s:taboption("smartgw", Flag, "SmartGateway", translate("Enable"), translate("Enable SmartGateway. If it is disabled, then " .. + "all other SmartGateway parameters are ignored. Default is \"no\".")) +sgw.default="no" +sgw.enabled="yes" +sgw.disabled="no" +sgw.rmempty = true + +sgwnat = s:taboption("smartgw", Flag, "SmartGatewayAllowNAT", translate("Allow gateways with NAT"), translate("Allow the selection of an outgoing ipv4 gateway with NAT")) +sgwnat:depends("SmartGateway", "yes") +sgwnat.default="yes" +sgwnat.enabled="yes" +sgwnat.disabled="no" +sgwnat.optional = true +sgwnat.rmempty = true + +sgwuplink = s:taboption("smartgw", ListValue, "SmartGatewayUplink", translate("Announce uplink"), translate("Which kind of uplink is exported to the other mesh nodes. " .. + "An uplink is detected by looking for a local HNA6 ::ffff:0:0/96 or 2000::/3. Default setting is \"both\".")) +sgwuplink:value("none") +sgwuplink:value("ipv4") +sgwuplink:value("ipv6") +sgwuplink:value("both") +sgwuplink:depends("SmartGateway", "yes") +sgwuplink.default="both" +sgwuplink.optional = true +sgwuplink.rmempty = true + +sgwulnat = s:taboption("smartgw", Flag, "SmartGatewayUplinkNAT", translate("Uplink uses NAT"), translate("If this Node uses NAT for connections to the internet. " .. + "Default is \"yes\".")) +sgwulnat:depends("SmartGatewayUplink", "ipv4") +sgwulnat:depends("SmartGatewayUplink", "both") +sgwulnat.default="yes" +sgwulnat.enabled="yes" +sgwulnat.disabled="no" +sgwnat.optional = true +sgwnat.rmempty = true + +sgwspeed = s:taboption("smartgw", Value, "SmartGatewaySpeed", translate("Speed of the uplink"), translate("Specifies the speed of ".. + "the uplink in kilobits/s. First parameter is upstream, second parameter is downstream. Default is \"128 1024\".")) +sgwspeed:depends("SmartGatewayUplink", "ipv4") +sgwspeed:depends("SmartGatewayUplink", "ipv6") +sgwspeed:depends("SmartGatewayUplink", "both") +sgwspeed.optional = true +sgwspeed.rmempty = true + +sgwprefix = s:taboption("smartgw", Value, "SmartGatewayPrefix", translate("IPv6-Prefix of the uplink"), translate("This can be used " .. + "to signal the external IPv6 prefix of the uplink to the clients. This might allow a client to change it's local IPv6 address to " .. + "use the IPv6 gateway without any kind of address translation. The maximum prefix length is 64 bits. " .. + "Default is \"::/0\" (no prefix).")) +sgwprefix:depends("SmartGatewayUplink", "ipv6") +sgwprefix:depends("SmartGatewayUplink", "both") +sgwprefix.optional = true +sgwprefix.rmempty = true + +willingness = s:taboption("advanced", ListValue, "Willingness", translate("Willingness"), + translate("The fixed willingness to use. If not set willingness will be calculated dynamically based on battery/power status. Default is \"3\".")) +for i=0,7 do + willingness:value(i) +end +willingness.optional = true +willingness.default = "3" + +natthr = s:taboption("advanced", Value, "NatThreshold", translate("NAT threshold"), + translate("If the route to the current gateway is to be changed, the ETX value of this gateway is ".. + "multiplied with this value before it is compared to the new one. ".. + "The parameter can be a value between 0.1 and 1.0, but should be close to 1.0 if changed.<br />".. + "<b>WARNING:</b> This parameter should not be used together with the etx_ffeth metric!<br />".. + "Defaults to \"1.0\".")) +for i=1,0.1,-0.1 do + natthr:value(i) +end +natthr:depends("LinkQualityAlgorithm", "etx_ff") +natthr:depends("LinkQualityAlgorithm", "etx_float") +natthr:depends("LinkQualityAlgorithm", "etx_fpm") +natthr.default = "1.0" +natthr.optional = true +natthr.write = write_float + + +i = m:section(TypedSection, "InterfaceDefaults", translate("Interfaces Defaults")) +i.anonymous = true +i.addremove = false + +i:tab("general", translate("General Settings")) +i:tab("addrs", translate("IP Addresses")) +i:tab("timing", translate("Timing and Validity")) + +mode = i:taboption("general", ListValue, "Mode", translate("Mode"), + translate("Interface Mode is used to prevent unnecessary packet forwarding on switched ethernet interfaces. ".. + "valid Modes are \"mesh\" and \"ether\". Default is \"mesh\".")) +mode:value("mesh") +mode:value("ether") +mode.optional = true +mode.rmempty = true + + +weight = i:taboption("general", Value, "Weight", translate("Weight"), + translate("When multiple links exist between hosts the weight of interface is used to determine the link to use. ".. + "Normally the weight is automatically calculated by olsrd based on the characteristics of the interface, ".. + "but here you can specify a fixed value. Olsrd will choose links with the lowest value.<br />".. + "<b>Note:</b> Interface weight is used only when LinkQualityLevel is set to 0. ".. + "For any other value of LinkQualityLevel, the interface ETX value is used instead.")) +weight.optional = true +weight.datatype = "uinteger" +weight.placeholder = "0" + +lqmult = i:taboption("general", DynamicList, "LinkQualityMult", translate("LinkQuality Multiplicator"), + translate("Multiply routes with the factor given here. Allowed values are between 0.01 and 1.0. ".. + "It is only used when LQ-Level is greater than 0. Examples:<br />".. + "reduce LQ to fd91:662e:3c58::1 by half: fd91:662e:3c58::1 0.5<br />".. + "reduce LQ to all nodes on this interface by 20%: default 0.8")) +lqmult.optional = true +lqmult.rmempty = true +lqmult.cast = "table" +lqmult.placeholder = "default 1.0" + +function lqmult.validate(self, value) + for _, v in pairs(value) do + if v ~= "" then + local val = util.split(v, " ") + local host = val[1] + local mult = val[2] + if not host or not mult then + return nil, translate("LQMult requires two values (IP address or 'default' and multiplicator) seperated by space.") + end + if not (host == "default" or ip.IPv6(host)) then + return nil, translate("Can only be a valid IPv6 address or 'default'") + end + if not tonumber(mult) or tonumber(mult) > 1 or tonumber(mult) < 0.01 then + return nil, translate("Invalid Value for LQMult-Value. Must be between 0.01 and 1.0.") + end + if not mult:match("[0-1]%.[0-9]+") then + return nil, translate("Invalid Value for LQMult-Value. You must use a decimal number between 0.01 and 1.0 here.") + end + end + end + return value +end + +ip6m = i:taboption("addrs", Value, "IPv6Multicast", translate("IPv6 multicast"), + translate("IPv6 multicast address. Default is \"FF02::6D\", the manet-router linklocal multicast.")) +ip6m.optional = true +ip6m.datatype = "ip6addr" +ip6m.placeholder = "FF02::6D" + +ip6s = i:taboption("addrs", Value, "IPv6Src", translate("IPv6 source"), + translate("IPv6 src prefix. OLSRd will choose one of the interface IPs which matches the prefix of this parameter. ".. + "Default is \"0::/0\", which triggers the usage of a not-linklocal interface IP.")) +ip6s.optional = true +ip6s.datatype = "ip6addr" +ip6s.placeholder = "0::/0" + + +hi = i:taboption("timing", Value, "HelloInterval", translate("Hello interval")) +hi.optional = true +hi.datatype = "ufloat" +hi.placeholder = "5.0" +hi.write = write_float + +hv = i:taboption("timing", Value, "HelloValidityTime", translate("Hello validity time")) +hv.optional = true +hv.datatype = "ufloat" +hv.placeholder = "40.0" +hv.write = write_float + +ti = i:taboption("timing", Value, "TcInterval", translate("TC interval")) +ti.optional = true +ti.datatype = "ufloat" +ti.placeholder = "2.0" +ti.write = write_float + +tv = i:taboption("timing", Value, "TcValidityTime", translate("TC validity time")) +tv.optional = true +tv.datatype = "ufloat" +tv.placeholder = "256.0" +tv.write = write_float + +mi = i:taboption("timing", Value, "MidInterval", translate("MID interval")) +mi.optional = true +mi.datatype = "ufloat" +mi.placeholder = "18.0" +mi.write = write_float + +mv = i:taboption("timing", Value, "MidValidityTime", translate("MID validity time")) +mv.optional = true +mv.datatype = "ufloat" +mv.placeholder = "324.0" +mv.write = write_float + +ai = i:taboption("timing", Value, "HnaInterval", translate("HNA interval")) +ai.optional = true +ai.datatype = "ufloat" +ai.placeholder = "18.0" +ai.write = write_float + +av = i:taboption("timing", Value, "HnaValidityTime", translate("HNA validity time")) +av.optional = true +av.datatype = "ufloat" +av.placeholder = "108.0" +av.write = write_float + + +ifs = m:section(TypedSection, "Interface", translate("Interfaces")) +ifs.addremove = true +ifs.anonymous = true +ifs.extedit = luci.dispatcher.build_url("admin/services/olsrd6/iface/%s") +ifs.template = "cbi/tblsection" + +function ifs.create(...) + local sid = TypedSection.create(...) + luci.http.redirect(ifs.extedit % sid) +end + +ign = ifs:option(Flag, "ignore", translate("Enable")) +ign.enabled = "0" +ign.disabled = "1" +ign.rmempty = false +function ign.cfgvalue(self, section) + return Flag.cfgvalue(self, section) or "0" +end + +network = ifs:option(DummyValue, "interface", translate("Network")) +network.template = "cbi/network_netinfo" + +mode = ifs:option(DummyValue, "Mode", translate("Mode")) +function mode.cfgvalue(...) + return Value.cfgvalue(...) or m.uci:get_first("olsrd6", "InterfaceDefaults", "Mode", "mesh") +end + +hello = ifs:option(DummyValue, "_hello", translate("Hello")) +function hello.cfgvalue(self, section) + local i = tonumber(m.uci:get("olsrd6", section, "HelloInterval")) or tonumber(m.uci:get_first("olsrd6", "InterfaceDefaults", "HelloInterval", 5)) + local v = tonumber(m.uci:get("olsrd6", section, "HelloValidityTime")) or tonumber(m.uci:get_first("olsrd6", "InterfaceDefaults", "HelloValidityTime", 40)) + return "%.01fs / %.01fs" %{ i, v } +end + +tc = ifs:option(DummyValue, "_tc", translate("TC")) +function tc.cfgvalue(self, section) + local i = tonumber(m.uci:get("olsrd6", section, "TcInterval")) or tonumber(m.uci:get_first("olsrd6", "InterfaceDefaults", "TcInterval", 2)) + local v = tonumber(m.uci:get("olsrd6", section, "TcValidityTime")) or tonumber(m.uci:get_first("olsrd6", "InterfaceDefaults", "TcValidityTime", 256)) + return "%.01fs / %.01fs" %{ i, v } +end + +mid = ifs:option(DummyValue, "_mid", translate("MID")) +function mid.cfgvalue(self, section) + local i = tonumber(m.uci:get("olsrd6", section, "MidInterval")) or tonumber(m.uci:get_first("olsrd6", "InterfaceDefaults", "MidInterval", 18)) + local v = tonumber(m.uci:get("olsrd6", section, "MidValidityTime")) or tonumber(m.uci:get_first("olsrd6", "InterfaceDefaults", "MidValidityTime", 324)) + return "%.01fs / %.01fs" %{ i, v } +end + +hna = ifs:option(DummyValue, "_hna", translate("HNA")) +function hna.cfgvalue(self, section) + local i = tonumber(m.uci:get("olsrd6", section, "HnaInterval")) or tonumber(m.uci:get_first("olsrd6", "InterfaceDefaults", "HnaInterval", 18)) + local v = tonumber(m.uci:get("olsrd6", section, "HnaValidityTime")) or tonumber(m.uci:get_first("olsrd6", "InterfaceDefaults", "HnaValidityTime", 108)) + return "%.01fs / %.01fs" %{ i, v } +end + +return m |