a43e8d9548b27efa2e04ffbeeedb6522087c6c26
[project/luci.git] / applications / luci-app-radvd / luasrc / model / cbi / radvd.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 m = Map("radvd", translate("Radvd"),
16         translate("Radvd is a router advertisement daemon for IPv6. " ..
17                 "It listens to router solicitations and sends router advertisements " ..
18                 "as described in RFC 4861."))
19
20 local nm = require "luci.model.network".init(m.uci)
21 local ut = require "luci.util"
22
23
24 --
25 -- Interfaces
26 --
27
28 s = m:section(TypedSection, "interface", translate("Interfaces"))
29 s.template = "cbi/tblsection"
30 s.extedit  = luci.dispatcher.build_url("admin/network/radvd/interface/%s")
31 s.anonymous = true
32 s.addremove = true
33
34 function s.create(...)
35         local id = TypedSection.create(...)
36         luci.http.redirect(s.extedit % id)
37 end
38
39 function s.remove(self, section)
40         if m.uci:get("radvd", section) == "interface" then
41                 local iface = m.uci:get("radvd", section, "interface")
42                 if iface then
43                         m.uci:delete_all("radvd", "prefix",
44                                 function(s) return s.interface == iface end)
45
46                         m.uci:delete_all("radvd", "route",
47                                 function(s) return s.interface == iface end)
48
49                         m.uci:delete_all("radvd", "rdnss",
50                                 function(s) return s.interface == iface end)
51                 end
52         end
53
54         return TypedSection.remove(self, section)
55 end
56
57 o = s:option(Flag, "ignore", translate("Enable"))
58 o.rmempty = false
59 o.width   = "30px"
60 function o.cfgvalue(...)
61         local v = Flag.cfgvalue(...)
62         return v == "1" and "0" or "1"
63 end
64 function o.write(self, section, value)
65         Flag.write(self, section, value == "1" and "0" or "1")
66 end
67
68 o = s:option(DummyValue, "interface", translate("Interface"))
69 o.template = "cbi/network_netinfo"
70 o.width    = "10%"
71
72 o = s:option(DummyValue, "UnicastOnly", translate("Multicast"))
73 function o.cfgvalue(self, section)
74         local v  = Value.cfgvalue(self, section)
75         local v2 = m.uci:get("radvd", section, "client")
76         return (v == "1" or (v2 and #v2 > 0)) and translate("no") or translate("yes")
77 end
78
79 o = s:option(DummyValue, "AdvSendAdvert", translate("Advertising"))
80 function o.cfgvalue(...)
81         local v = Value.cfgvalue(...)
82         return v == "1" and translate("yes") or translate("no")
83 end
84
85 o = s:option(DummyValue, "MaxRtrAdvInterval", translate("Max. interval"))
86 function o.cfgvalue(...)
87         local v = Value.cfgvalue(...) or "600"
88         return v .. "s"
89 end
90
91 o = s:option(DummyValue, "AdvHomeAgentFlag", translate("Mobile IPv6"))
92 function o.cfgvalue(...)
93         local v = Value.cfgvalue(...)
94         return v == "1" and translate("yes") or translate("no")
95 end
96
97 o = s:option(DummyValue, "AdvDefaultPreference", translate("Preference"))
98 function o.cfgvalue(...)
99         local v = Value.cfgvalue(...) or "medium"
100         return translate(v)
101 end
102
103
104 --
105 -- Prefixes
106 --
107
108 s2 = m:section(TypedSection, "prefix", translate("Prefixes"))
109 s2.template = "cbi/tblsection"
110 s2.extedit  = luci.dispatcher.build_url("admin/network/radvd/prefix/%s")
111 s2.addremove = true
112 s2.anonymous = true
113
114 function s2.create(...)
115         local id = TypedSection.create(...)
116         luci.http.redirect(s2.extedit % id)
117 end
118
119
120 o = s2:option(Flag, "ignore", translate("Enable"))
121 o.rmempty = false
122 o.width   = "30px"
123 function o.cfgvalue(...)
124         local v = Flag.cfgvalue(...)
125         return v == "1" and "0" or "1"
126 end
127 function o.write(self, section, value)
128         Flag.write(self, section, value == "1" and "0" or "1")
129 end
130
131 o = s2:option(DummyValue, "interface", translate("Interface"))
132 o.template = "cbi/network_netinfo"
133 o.width    = "10%"
134
135 pfx = s2:option(DummyValue, "prefix", translate("Prefix"))
136 pfx.width = "60%"
137 function pfx.cfgvalue(self, section)
138         local v = m.uci:get_list("radvd", section, self.option)
139         local l = { }
140
141         if not v or #v == 0 or (#v == 1 and #v[1] == 0) then
142                 local net = nm:get_network(m.uci:get("radvd", section, "interface"))
143                 if net then
144                         local ifc = nm:get_interface(net:ifname())
145                         if ifc then
146                                 local adr
147                                 for _, adr in ipairs(ifc:ip6addrs()) do
148                                         if not adr:is6linklocal() then
149                                                 v = adr:string()
150                                                 break
151                                         end
152                                 end
153                         end
154                 end
155         end
156
157         for v in ut.imatch(v) do
158                 v = luci.ip.IPv6(v)
159                 if v then
160                         l[#l+1] = v:string()
161                 end
162         end
163
164         if #l == 0 then
165                 l[1] = "?"
166         end
167
168         return table.concat(l, ", ")
169 end
170
171 o = s2:option(DummyValue, "AdvAutonomous", translate("Autonomous"))
172 function o.cfgvalue(...)
173         local v = Value.cfgvalue(...)
174         return v == "1" and translate("yes") or translate("no")
175 end
176
177 o = s2:option(DummyValue, "AdvOnLink", translate("On-link"))
178 function o.cfgvalue(...)
179         local v = Value.cfgvalue(...)
180         return v == "1" and translate("yes") or translate("no")
181 end
182
183 o = s2:option(DummyValue, "AdvValidLifetime", translate("Validity time"))
184 function o.cfgvalue(...)
185         local v = Value.cfgvalue(...) or "86400"
186         return translate(v)
187 end
188
189
190 --
191 -- Routes
192 --
193
194 s3 = m:section(TypedSection, "route", translate("Routes"))
195 s3.template = "cbi/tblsection"
196 s3.extedit  = luci.dispatcher.build_url("admin/network/radvd/route/%s")
197 s3.addremove = true
198 s3.anonymous = true
199
200 function s3.create(...)
201         local id = TypedSection.create(...)
202         luci.http.redirect(s3.extedit % id)
203 end
204
205
206 o = s3:option(Flag, "ignore", translate("Enable"))
207 o.rmempty = false
208 o.width   = "30px"
209 function o.cfgvalue(...)
210         local v = Flag.cfgvalue(...)
211         return v == "1" and "0" or "1"
212 end
213 function o.write(self, section, value)
214         Flag.write(self, section, value == "1" and "0" or "1")
215 end
216
217 o = s3:option(DummyValue, "interface", translate("Interface"))
218 o.template = "cbi/network_netinfo"
219 o.width    = "10%"
220
221 o = s3:option(DummyValue, "prefix", translate("Prefix"))
222 o.width = "60%"
223 o.cfgvalue = pfx.cfgvalue
224
225 o = s3:option(DummyValue, "AdvRouteLifetime", translate("Lifetime"))
226 function o.cfgvalue(self, section)
227         local v = Value.cfgvalue(self, section) or "1800"
228         return translate(v)
229 end
230
231 o = s3:option(DummyValue, "AdvRoutePreference", translate("Preference"))
232 function o.cfgvalue(self, section)
233         local v = Value.cfgvalue(self, section) or "medium"
234         return translate(v)
235 end
236
237
238 --
239 -- RDNSS
240 --
241
242 s4 = m:section(TypedSection, "rdnss", translate("RDNSS"))
243 s4.template = "cbi/tblsection"
244 s4.extedit  = luci.dispatcher.build_url("admin/network/radvd/rdnss/%s")
245 s4.addremove = true
246 s4.anonymous = true
247
248 function s4.create(...)
249         local id = TypedSection.create(...)
250         luci.http.redirect(s4.extedit % id)
251 end
252
253
254 o = s4:option(Flag, "ignore", translate("Enable"))
255 o.rmempty = false
256 o.width   = "30px"
257 function o.cfgvalue(...)
258         local v = Flag.cfgvalue(...)
259         return v == "1" and "0" or "1"
260 end
261 function o.write(self, section, value)
262         Flag.write(self, section, value == "1" and "0" or "1")
263 end
264
265 o = s4:option(DummyValue, "interface", translate("Interface"))
266 o.template = "cbi/network_netinfo"
267 o.width    = "10%"
268
269 o = s4:option(DummyValue, "addr", translate("Address"))
270 o.width = "60%"
271 o.cfgvalue = pfx.cfgvalue
272
273 o = s4:option(DummyValue, "AdvRDNSSLifetime", translate("Lifetime"))
274 function o.cfgvalue(self, section)
275         local v = Value.cfgvalue(self, section) or "1200"
276         return translate(v)
277 end
278
279
280 --
281 -- DNSSL
282 --
283
284 s5 = m:section(TypedSection, "dnssl", translate("DNSSL"))
285 s5.template = "cbi/tblsection"
286 s5.extedit  = luci.dispatcher.build_url("admin/network/radvd/dnssl/%s")
287 s5.addremove = true
288 s5.anonymous = true
289
290 function s5.create(...)
291         local id = TypedSection.create(...)
292         luci.http.redirect(s5.extedit % id)
293 end
294
295
296 o = s5:option(Flag, "ignore", translate("Enable"))
297 o.rmempty = false
298 o.width   = "30px"
299 function o.cfgvalue(...)
300         local v = Flag.cfgvalue(...)
301         return v == "1" and "0" or "1"
302 end
303 function o.write(self, section, value)
304         Flag.write(self, section, value == "1" and "0" or "1")
305 end
306
307 o = s5:option(DummyValue, "interface", translate("Interface"))
308 o.template = "cbi/network_netinfo"
309 o.width    = "10%"
310
311 o = s5:option(DummyValue, "suffix", translate("Suffix"))
312 o.width = "60%"
313 function o.cfgvalue(self, section)
314         local v = m.uci:get_list("radvd", section, "suffix")
315         local l = { }
316
317         for v in ut.imatch(v) do
318                 l[#l+1] = v
319         end
320
321         if #l == 0 then
322                 l[1] = "?"
323         end
324
325         return table.concat(l, ", ")
326 end
327
328 o = s5:option(DummyValue, "AdvDNSSLLifetime", translate("Lifetime"))
329 function o.cfgvalue(self, section)
330         local v = Value.cfgvalue(self, section) or "1200"
331         return translate(v)
332 end
333
334
335 return m