applications/luci-radvd: sync with OpenWrt trunk changes
[project/luci.git] / applications / luci-radvd / luasrc / model / cbi / radvd / rdnss.lua
1 --[[
2 LuCI - Lua Configuration Interface
3
4 Copyright 2010 Jo-Philipp Wich <xm@subsignal.org>
5
6 Licensed under the Apache License, Version 2.0 (the "License");
7 you may not use this file except in compliance with the License.
8 You may obtain a copy of the License at
9
10         http://www.apache.org/licenses/LICENSE-2.0
11
12 $Id$
13 ]]--
14
15 local sid = arg[1]
16 local utl = require "luci.util"
17
18 m = Map("radvd", translatef("Radvd - RDNSS"),
19         translate("Radvd is a router advertisement daemon for IPv6. " ..
20                 "It listens to router solicitations and sends router advertisements " ..
21                 "as described in RFC 4861."))
22
23 m.redirect = luci.dispatcher.build_url("admin/network/radvd")
24
25 if m.uci:get("radvd", sid) ~= "rdnss" then
26         luci.http.redirect(m.redirect)
27         return
28 end
29
30
31 s = m:section(NamedSection, sid, "interface", translate("RDNSS Configuration"))
32 s.addremove = false
33
34
35 --
36 -- General
37 --
38
39 o = s:option(Flag, "ignore", translate("Enable"))
40 o.rmempty = false
41
42 function o.cfgvalue(...)
43         local v = Flag.cfgvalue(...)
44         return v == "1" and "0" or "1"
45 end
46
47 function o.write(self, section, value)
48         Flag.write(self, section, value == "1" and "0" or "1")
49 end
50
51
52 o = s:option(Value, "interface", translate("Interface"),
53         translate("Specifies the logical interface name this section belongs to"))
54
55 o.template = "cbi/network_netlist"
56 o.nocreate = true
57 o.optional = false
58
59 function o.formvalue(...)
60         return Value.formvalue(...) or "-"
61 end
62
63 function o.validate(self, value)
64         if value == "-" then
65                 return nil, translate("Interface required")
66         end
67         return value
68 end
69
70 function o.write(self, section, value)
71         m.uci:set("radvd", section, "ignore", 0)
72         m.uci:set("radvd", section, "interface", value)
73 end
74
75
76 o = s:option(DynamicList, "addr", translate("Addresses"),
77         translate("Advertised IPv6 RDNSS. If empty, the current IPv6 address of the interface is used"))
78
79 o.optional    = false
80 o.rmempty     = true
81 o.datatype    = "ip6addr"
82 o.placeholder = translate("default")
83 function o.cfgvalue(self, section)
84         local l = { }
85         local v = m.uci:get_list("radvd", section, "prefix")
86         for v in utl.imatch(v) do
87                 l[#l+1] = v
88         end
89         return l
90 end
91
92
93 o = s:option(Value, "AdvRDNSSLifetime", translate("Lifetime"),
94         translate("Specifies the maximum duration how long the RDNSS entries are used for name resolution. Use 0 to specify an infinite lifetime"))
95
96 o.datatype = "uinteger"
97 o.placeholder = 1200
98
99 function o.cfgvalue(self, section)
100         local v = Value.cfgvalue(self, section)
101         if v == "infinity" then
102                 return 0
103         else
104                 return v
105         end
106 end
107
108 function o.write(self, section, value)
109         if value == "0" then
110                 Value.write(self, section, "infinity")
111         else
112                 Value.write(self, section, value)
113         end
114 end
115
116
117 return m