luci/applications/luci-olsr/luasrc/model/cbi/olsr/olsrdplugins.lua

--[[
LuCI - Lua Configuration Interface

Copyright 2008 Steven Barth <steven@midlink.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.fs")
require("luci.ip")

mp = Map("olsrd", "OLSR - Plugins")

p = mp:section(TypedSection, "LoadPlugin")
p.addremove = true
p.dynamic = true
p.anonymous = true

ign = p:option(Flag, "ignore")
ign.enabled  = "1"
ign.disabled = "0"
ign.optional = true

lib = p:option(ListValue, "library", translate("library"))
lib:value("")
for k, v in pairs(luci.fs.dir("/usr/lib")) do
	if v:sub(1, 6) == "olsrd_" then
		lib:value(v)
	end
end

local function Range(x,y)
	local t = {}
	for i = x, y do t[#t+1] = i end
	return t
end

local function Cidr2IpMask(val)
	if val then
		for i = 1, #val do
			local cidr = luci.ip.IPv4(val[i]) or luci.ip.IPv6(val[i])
			if cidr then
				val[i] = cidr:network():string() .. " " .. cidr:mask():string()
			end
		end
		return val
	end
end

local function IpMask2Cidr(val)
	if val then
		for i = 1, #val do
			local ip, mask = val[i]:gmatch("([^%s+])%s+([^%s+])")()
			local cidr
			if ip and mask and ip:match(":") then
				cidr = luci.ip.IPv6(ip, mask)
			elseif ip and mask then
				cidr = luci.ip.IPv4(ip, mask)
			end

			if cidr then
				val[i] = cidr:string()
			end
		end
		return val
	end
end


local knownPlParams = {
	["olsrd_bmf.so.1.5.3"] = {
		{ Value, 		"BmfInterface",			"bmf0" },
		{ Value, 		"BmfInterfaceIp",		"10.10.10.234/24" },
		{ Flag,  		"DoLocalBroadcast",		"no" },
		{ Flag,  		"CapturePacketsOnOlsrInterfaces", "yes" },
		{ ListValue, 	"BmfMechanism",			{ "UnicastPromiscuous", "Broadcast" } },
		{ Value, 		"BroadcastRetransmitCount",	"2" },
		{ Value, 		"FanOutLimit",			"4" },
		{ DynamicList,	"NonOlsrIf",			"eth1" }
	},

	["olsrd_dyn_gw.so.0.4"] = {
		{ Value,		"Interval",				"40" },
		{ DynamicList,  "Ping",					"141.1.1.1" },
		{ DynamicList,	"HNA",					"192.168.80.0/24", IpMask2Cidr, Cidr2IpMask }
	},

	["olsrd_httpinfo.so.0.1"] = {
		{ Value,		"port",					"80" },
		{ DynamicList,	"Host",					"163.24.87.3" },
		{ DynamicList,	"Net",					"0.0.0.0/0", IpMask2Cidr, Cidr2IpMask }
	},

	["olsrd_nameservice.so.0.2"] = {
		{ DynamicList,	"name",					"my-name.mesh" },
		{ DynamicList,	"hosts",				"1.2.3.4 name-for-other-interface.mesh" },
		{ Value,		"suffix",				".olsr" },
		{ Value,		"hosts_file",			"/path/to/hosts_file" },
		{ Value,		"add_hosts",			"/path/to/file" },
		{ Value,		"dns_server",			"141.1.1.1" },
		{ Value,		"resolv_file",			"/path/to/resolv.conf" },
		{ Value,		"interval",				"120" },
		{ Value,		"timeout",				"240" },
		{ Value,		"lat",					"12.123" },
		{ Value,		"lon",					"12.123" },
		{ Value,		"latlon_file",			"/var/run/latlon.js" },
		{ Value,		"latlon_infile",		"/var/run/gps.txt" },
		{ Value,		"sighup_pid_file",		"/var/run/dnsmasq.pid" },
		{ Value,		"name_change_script",	"/usr/local/bin/announce_new_hosts.sh" },
		{ Value,		"services_change_script",	"/usr/local/bin/announce_new_services.sh" }
	},

	["olsrd_quagga.so.0.2.2"] = {
		{ StaticList,	"redistribute",			{
			"system", "kernel", "connect", "static", "rip", "ripng", "ospf",
			"ospf6", "isis", "bgp", "hsls"
		} },
		{ ListValue,	"ExportRoutes",			{ "only", "both" } },
		{ Flag,			"LocalPref",			"true" },
		{ Value,		"Distance",				Range(0,255) }
	},

	["olsrd_secure.so.0.5"] = {
		{ Value,		"Keyfile",				"/etc/private-olsr.key" }
	},

	["olsrd_txtinfo.so.0.1"] = {
		{ Value,		"accept",				"10.247.200.4" }
	}
}


-- build plugin options with dependencies
for plugin, options in pairs(knownPlParams) do
	for _, option in ipairs(options) do
		local otype, name, default, uci2cbi, cbi2uci = unpack(option)
		local values

		if type(default) == "table" then
			values  = default
			default = default[1]
		end

		if otype == Flag then
			local bool = p:option( Flag, name )
			if default == "yes" or default == "no" then
				bool.enabled  = "yes"
				bool.disabled = "no"
			elseif default == "on" or default == "off" then
				bool.enabled  = "on"
				bool.disabled = "off"
			elseif default == "1" or default == "0" then
				bool.enabled  = "1"
				bool.disabled = "0"
			else
				bool.enabled  = "true"
				bool.disabled = "false"
			end
			bool.default = default
			bool:depends({ library = plugin })
		else
			local field = p:option( otype, name )
			if values then
				for _, value in ipairs(values) do
					field:value( value )
				end
			end
			if type(uci2cbi) == "function" then
				function field.cfgvalue(self, section)
					return uci2cbi(otype.cfgvalue(self, section))
				end
			end
			if type(cbi2uci) == "function" then
				function field.formvalue(self, section)
					return cbi2uci(otype.formvalue(self, section))
				end
			end
			if otype == DynamicList then
				field:value( default )
			end
			field.default = default
			field:depends({ library = plugin })
		end
	end
end

return mp