protocols/luci-proto-ppp/luasrc/model/cbi/admin_network/proto_pppoa.lua

   1 --[[
   2 LuCI - Lua Configuration Interface
   3
   4 Copyright 2011 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
  13 local map, section, net = ...
  14
  15 local encaps, atmdev, vci, vpi, username, password
  16 local ipv6, defaultroute, metric, peerdns, dns,
  17       keepalive_failure, keepalive_interval, demand, mtu
  18
  19
  20 encaps = section:taboption("general", ListValue, "encaps", translate("PPPoA Encapsulation"))
  21 encaps:value("vc", "VC-Mux")
  22 encaps:value("llc", "LLC")
  23
  24
  25 atmdev = section:taboption("general", Value, "atmdev", translate("ATM device number"))
  26 atmdev.default  = "0"
  27 atmdev.datatype = "uinteger"
  28
  29
  30 vci = section:taboption("general", Value, "vci", translate("ATM Virtual Channel Identifier (VCI)"))
  31 vci.default  = "35"
  32 vci.datatype = "uinteger"
  33
  34
  35 vpi = section:taboption("general", Value, "vpi", translate("ATM Virtual Path Identifier (VPI)"))
  36 vpi.default  = "8"
  37 vpi.datatype = "uinteger"
  38
  39
  40 username = section:taboption("general", Value, "username", translate("PAP/CHAP username"))
  41
  42
  43 password = section:taboption("general", Value, "password", translate("PAP/CHAP password"))
  44 password.password = true
  45
  46
  47 if luci.model.network:has_ipv6() then
  48
  49         ipv6 = section:taboption("advanced", Flag, "ipv6",
  50                 translate("Enable IPv6 negotiation on the PPP link"))
  51
  52         ipv6.default = ipv6.disabled
  53
  54 end
  55
  56
  57 defaultroute = section:taboption("advanced", Flag, "defaultroute",
  58         translate("Use default gateway"),
  59         translate("If unchecked, no default route is configured"))
  60
  61 defaultroute.default = defaultroute.enabled
  62
  63
  64 metric = section:taboption("advanced", Value, "metric",
  65         translate("Use gateway metric"))
  66
  67 metric.placeholder = "0"
  68 metric.datatype    = "uinteger"
  69 metric:depends("defaultroute", defaultroute.enabled)
  70
  71
  72 peerdns = section:taboption("advanced", Flag, "peerdns",
  73         translate("Use DNS servers advertised by peer"),
  74         translate("If unchecked, the advertised DNS server addresses are ignored"))
  75
  76 peerdns.default = peerdns.enabled
  77
  78
  79 dns = section:taboption("advanced", DynamicList, "dns",
  80         translate("Use custom DNS servers"))
  81
  82 dns:depends("peerdns", "")
  83 dns.datatype = "ipaddr"
  84 dns.cast     = "string"
  85
  86
  87 keepalive_failure = section:taboption("advanced", Value, "_keepalive_failure",
  88         translate("LCP echo failure threshold"),
  89         translate("Presume peer to be dead after given amount of LCP echo failures, use 0 to ignore failures"))
  90
  91 function keepalive_failure.cfgvalue(self, section)
  92         local v = m:get(section, "keepalive")
  93         if v and #v > 0 then
  94                 return tonumber(v:match("^(%d+)[ ,]+%d+") or v)
  95         end
  96 end
  97
  98 function keepalive_failure.write() end
  99 function keepalive_failure.remove() end
 100
 101 keepalive_failure.placeholder = "0"
 102 keepalive_failure.datatype    = "uinteger"
 103
 104
 105 keepalive_interval = section:taboption("advanced", Value, "_keepalive_interval",
 106         translate("LCP echo interval"),
 107         translate("Send LCP echo requests at the given interval in seconds, only effective in conjunction with failure threshold"))
 108
 109 function keepalive_interval.cfgvalue(self, section)
 110         local v = m:get(section, "keepalive")
 111         if v and #v > 0 then
 112                 return tonumber(v:match("^%d+[ ,]+(%d+)"))
 113         end
 114 end
 115
 116 function keepalive_interval.write(self, section, value)
 117         local f = tonumber(keepalive_failure:formvalue(section)) or 0
 118         local i = tonumber(value) or 5
 119         if i < 1 then i = 1 end
 120         if f > 0 then
 121                 m:set(section, "keepalive", "%d %d" %{ f, i })
 122         else
 123                 m:del(section, "keepalive")
 124         end
 125 end
 126
 127 keepalive_interval.remove      = keepalive_interval.write
 128 keepalive_interval.placeholder = "5"
 129 keepalive_interval.datatype    = "min(1)"
 130
 131
 132 demand = section:taboption("advanced", Value, "demand",
 133         translate("Inactivity timeout"),
 134         translate("Close inactive connection after the given amount of seconds, use 0 to persist connection"))
 135
 136 demand.placeholder = "0"
 137 demand.datatype    = "uinteger"
 138
 139
 140 mtu = section:taboption("advanced", Value, "mtu", translate("Override MTU"))
 141 mtu.placeholder = "1500"
 142 mtu.datatype    = "max(9200)"