Rework LuCI build system
[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