applications/luci-radvd/luasrc/model/cbi/radvd/prefix.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 - Prefix"),
  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) ~= "prefix" then
  26         luci.http.redirect(m.redirect)
  27         return
  28 end
  29
  30
  31 s = m:section(NamedSection, sid, "interface", translate("Prefix Configuration"))
  32 s.addremove = false
  33
  34 s:tab("general", translate("General"))
  35 s:tab("advanced",  translate("Advanced"))
  36
  37
  38 --
  39 -- General
  40 --
  41
  42 o = s:taboption("general", Flag, "ignore", translate("Enable"))
  43 o.rmempty = false
  44
  45 function o.cfgvalue(...)
  46         local v = Flag.cfgvalue(...)
  47         return v == "1" and "0" or "1"
  48 end
  49
  50 function o.write(self, section, value)
  51         Flag.write(self, section, value == "1" and "0" or "1")
  52 end
  53
  54
  55 o = s:taboption("general", Value, "interface", translate("Interface"),
  56         translate("Specifies the logical interface name this section belongs to"))
  57
  58 o.template = "cbi/network_netlist"
  59 o.nocreate = true
  60 o.optional = false
  61
  62 function o.formvalue(...)
  63         return Value.formvalue(...) or "-"
  64 end
  65
  66 function o.validate(self, value)
  67         if value == "-" then
  68                 return nil, translate("Interface required")
  69         end
  70         return value
  71 end
  72
  73 function o.write(self, section, value)
  74         m.uci:set("radvd", section, "ignore", 0)
  75         m.uci:set("radvd", section, "interface", value)
  76 end
  77
  78
  79 o = s:taboption("general", DynamicList, "prefix", translate("Prefixes"),
  80         translate("Advertised IPv6 prefixes. If empty, the current interface prefix is used"))
  81
  82 o.optional    = true
  83 o.datatype    = "ip6addr"
  84 o.placeholder = translate("default")
  85 function o.cfgvalue(self, section)
  86         local l = { }
  87         local v = m.uci:get_list("radvd", section, "prefix")
  88         for v in utl.imatch(v) do
  89                 l[#l+1] = v
  90         end
  91         return l
  92 end
  93
  94
  95 o = s:taboption("general", Flag, "AdvOnLink", translate("On-link determination"),
  96         translate("Indicates that this prefix can be used for on-link determination (RFC4861)"))
  97
  98 o.rmempty = false
  99 o.default = "1"
 100
 101
 102 o = s:taboption("general", Flag, "AdvAutonomous", translate("Autonomous"),
 103         translate("Indicates that this prefix can be used for autonomous address configuration (RFC4862)"))
 104
 105 o.rmempty = false
 106 o.default = "1"
 107
 108
 109 --
 110 -- Advanced
 111 --
 112
 113 o = s:taboption("advanced", Flag, "AdvRouterAddr", translate("Advertise router address"),
 114         translate("Indicates that the address of interface is sent instead of network prefix, as is required by Mobile IPv6"))
 115
 116
 117 o = s:taboption("advanced", Value, "AdvValidLifetime", translate("Valid lifetime"),
 118         translate("Advertises the length of time in seconds that the prefix is valid for the purpose of on-link determination. Use 0 to specify an infinite lifetime"))
 119
 120 o.datatype = "uinteger"
 121 o.placeholder = 86400
 122
 123 function o.cfgvalue(self, section)
 124         local v = Value.cfgvalue(self, section)
 125         if v == "infinity" then
 126                 return 0
 127         else
 128                 return v
 129         end
 130 end
 131
 132 function o.write(self, section, value)
 133         if value == "0" then
 134                 Value.write(self, section, "infinity")
 135         else
 136                 Value.write(self, section, value)
 137         end
 138 end
 139
 140
 141 o = s:taboption("advanced", Value, "AdvPreferredLifetime", translate("Preferred lifetime"),
 142         translate("Advertises the length of time in seconds that addresses generated from the prefix via stateless address autoconfiguration remain preferred. Use 0 to specify an infinite lifetime"))
 143
 144 o.datatype = "uinteger"
 145 o.placeholder = 14400
 146
 147 function o.cfgvalue(self, section)
 148         local v = Value.cfgvalue(self, section)
 149         if v == "infinity" then
 150                 return 0
 151         else
 152                 return v
 153         end
 154 end
 155
 156 function o.write(self, section, value)
 157         if value == "0" then
 158                 Value.write(self, section, "infinity")
 159         else
 160                 Value.write(self, section, value)
 161         end
 162 end
 163
 164
 165 o = s:taboption("advanced", Value, "Base6to4Interface", translate("6to4 interface"),
 166         translate("Specifies a logical interface name to derive a 6to4 prefix from. The interfaces public IPv4 address is combined with 2002::/3 and the value of the prefix option"))
 167
 168 o.template = "cbi/network_netlist"
 169 o.nocreate = true
 170 o.unspecified = true
 171
 172
 173 return m