applications/luci-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 o = s2:option(DummyValue, "prefix", translate("Prefix"))
 136 o.width = "60%"
 137 function o.cfgvalue(self, section)
 138         local v = m.uci:get_list("radvd", section, "prefix")
 139         local l = { }
 140
 141         if not v 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                                 local lla = luci.ip.IPv6("fe80::/10")
 148                                 for _, adr in ipairs(ifc:ip6addrs()) do
 149                                         if not lla:contains(adr) then
 150                                                 v = adr:string()
 151                                                 break
 152                                         end
 153                                 end
 154                         end
 155                 end
 156         end
 157
 158         for v in ut.imatch(v) do
 159                 v = luci.ip.IPv6(v)
 160                 if v then
 161                         l[#l+1] = v:string()
 162                 end
 163         end
 164
 165         if #l == 0 then
 166                 l[1] = "?"
 167         end
 168
 169         return table.concat(l, ", ")
 170 end
 171
 172 o = s2:option(DummyValue, "AdvAutonomous", translate("Autonomous"))
 173 function o.cfgvalue(...)
 174         local v = Value.cfgvalue(...)
 175         return v == "1" and translate("yes") or translate("no")
 176 end
 177
 178 o = s2:option(DummyValue, "AdvOnLink", translate("On-link"))
 179 function o.cfgvalue(...)
 180         local v = Value.cfgvalue(...)
 181         return v == "1" and translate("yes") or translate("no")
 182 end
 183
 184 o = s2:option(DummyValue, "AdvValidLifetime", translate("Validity time"))
 185 function o.cfgvalue(...)
 186         local v = Value.cfgvalue(...) or "86400"
 187         return translate(v)
 188 end
 189
 190
 191 --
 192 -- Routes
 193 --
 194
 195 s3 = m:section(TypedSection, "route", translate("Routes"))
 196 s3.template = "cbi/tblsection"
 197 s3.extedit  = luci.dispatcher.build_url("admin/network/radvd/route/%s")
 198 s3.addremove = true
 199 s3.anonymous = true
 200
 201 function s3.create(...)
 202         local id = TypedSection.create(...)
 203         luci.http.redirect(s3.extedit % id)
 204 end
 205
 206
 207 o = s3:option(Flag, "ignore", translate("Enable"))
 208 o.rmempty = false
 209 o.width   = "30px"
 210 function o.cfgvalue(...)
 211         local v = Flag.cfgvalue(...)
 212         return v == "1" and "0" or "1"
 213 end
 214 function o.write(self, section, value)
 215         Flag.write(self, section, value == "1" and "0" or "1")
 216 end
 217
 218 o = s3:option(DummyValue, "interface", translate("Interface"))
 219 o.template = "cbi/network_netinfo"
 220 o.width    = "10%"
 221
 222 o = s3:option(DummyValue, "prefix", translate("Prefix"))
 223 o.width = "60%"
 224 function o.cfgvalue(self, section)
 225         local v = m.uci:get_list("radvd", section, "prefix")
 226         local l = { }
 227         if v then
 228                 for v in ut.imatch(v) do
 229                         v = luci.ip.IPv6(v)
 230                         if v then
 231                                 l[#l+1] = v:string()
 232                         end
 233                 end
 234         end
 235
 236         if #l == 0 then
 237                 l[1] = "?"
 238         end
 239
 240         return table.concat(l, ", ")
 241 end
 242
 243 o = s3:option(DummyValue, "AdvRouteLifetime", translate("Lifetime"))
 244 function o.cfgvalue(self, section)
 245         local v = Value.cfgvalue(self, section) or "1800"
 246         return translate(v)
 247 end
 248
 249 o = s3:option(DummyValue, "AdvRoutePreference", translate("Preference"))
 250 function o.cfgvalue(self, section)
 251         local v = Value.cfgvalue(self, section) or "medium"
 252         return translate(v)
 253 end
 254
 255
 256 --
 257 -- RDNSS
 258 --
 259
 260 s4 = m:section(TypedSection, "rdnss", translate("RDNSS"))
 261 s4.template = "cbi/tblsection"
 262 s4.extedit  = luci.dispatcher.build_url("admin/network/radvd/rdnss/%s")
 263 s4.addremove = true
 264 s4.anonymous = true
 265
 266 function s4.create(...)
 267         local id = TypedSection.create(...)
 268         luci.http.redirect(s4.extedit % id)
 269 end
 270
 271
 272 o = s4:option(Flag, "ignore", translate("Enable"))
 273 o.rmempty = false
 274 o.width   = "30px"
 275 function o.cfgvalue(...)
 276         local v = Flag.cfgvalue(...)
 277         return v == "1" and "0" or "1"
 278 end
 279 function o.write(self, section, value)
 280         Flag.write(self, section, value == "1" and "0" or "1")
 281 end
 282
 283 o = s4:option(DummyValue, "interface", translate("Interface"))
 284 o.template = "cbi/network_netinfo"
 285 o.width    = "10%"
 286
 287 o = s4:option(DummyValue, "addr", translate("Address"))
 288 o.width = "60%"
 289 function o.cfgvalue(self, section)
 290         local v = m.uci:get_list("radvd", section, "addr")
 291         local l = { }
 292         if not v then
 293                 local net = nm:get_network(m.uci:get("radvd", section, "interface"))
 294                 if net then
 295                         local ifc = nm:get_interface(net:ifname())
 296                         if ifc then
 297                                 local adr
 298                                 local lla = luci.ip.IPv6("fe80::/10")
 299                                 for _, adr in ipairs(ifc:ip6addrs()) do
 300                                         if not lla:contains(adr) then
 301                                                 v = adr:network(128):string()
 302                                                 break
 303                                         end
 304                                 end
 305                         end
 306                 end
 307         end
 308
 309         for v in ut.imatch(v) do
 310                 v = luci.ip.IPv6(v)
 311                 if v then
 312                         l[#l+1] = v:network(128):string()
 313                 end
 314         end
 315
 316         if #l == 0 then
 317                 l[1] = "?"
 318         end
 319
 320         return table.concat(l, ", ")
 321 end
 322
 323 o = s4:option(DummyValue, "AdvRDNSSLifetime", translate("Lifetime"))
 324 function o.cfgvalue(self, section)
 325         local v = Value.cfgvalue(self, section) or "1200"
 326         return translate(v)
 327 end
 328
 329
 330 --
 331 -- DNSSL
 332 --
 333
 334 s5 = m:section(TypedSection, "dnssl", translate("DNSSL"))
 335 s5.template = "cbi/tblsection"
 336 s5.extedit  = luci.dispatcher.build_url("admin/network/radvd/dnssl/%s")
 337 s5.addremove = true
 338 s5.anonymous = true
 339
 340 function s5.create(...)
 341         local id = TypedSection.create(...)
 342         luci.http.redirect(s5.extedit % id)
 343 end
 344
 345
 346 o = s5:option(Flag, "ignore", translate("Enable"))
 347 o.rmempty = false
 348 o.width   = "30px"
 349 function o.cfgvalue(...)
 350         local v = Flag.cfgvalue(...)
 351         return v == "1" and "0" or "1"
 352 end
 353 function o.write(self, section, value)
 354         Flag.write(self, section, value == "1" and "0" or "1")
 355 end
 356
 357 o = s5:option(DummyValue, "interface", translate("Interface"))
 358 o.template = "cbi/network_netinfo"
 359 o.width    = "10%"
 360
 361 o = s5:option(DummyValue, "suffix", translate("Suffix"))
 362 o.width = "60%"
 363 function o.cfgvalue(self, section)
 364         local v = m.uci:get_list("radvd", section, "suffix")
 365         local l = { }
 366
 367         for v in ut.imatch(v) do
 368                 l[#l+1] = v
 369         end
 370
 371         if #l == 0 then
 372                 l[1] = "?"
 373         end
 374
 375         return table.concat(l, ", ")
 376 end
 377
 378 o = s5:option(DummyValue, "AdvDNSSLLifetime", translate("Lifetime"))
 379 function o.cfgvalue(self, section)
 380         local v = Value.cfgvalue(self, section) or "1200"
 381         return translate(v)
 382 end
 383
 384
 385 return m