Signed-off-by: David Woodhouse <dw...@infradead.org>
---
 .../luasrc/model/cbi/admin_network/proto_l2tp.lua  |   57 ++++++++++++++++++++
 protocols/ppp/luasrc/model/network/proto_ppp.lua   |    6 ++-
 2 files changed, 62 insertions(+), 1 deletions(-)
 create mode 100644 protocols/ppp/luasrc/model/cbi/admin_network/proto_l2tp.lua

diff --git a/protocols/ppp/luasrc/model/cbi/admin_network/proto_l2tp.lua 
b/protocols/ppp/luasrc/model/cbi/admin_network/proto_l2tp.lua
new file mode 100644
index 0000000..fc01203
--- /dev/null
+++ b/protocols/ppp/luasrc/model/cbi/admin_network/proto_l2tp.lua
@@ -0,0 +1,57 @@
+--[[
+LuCI - Lua Configuration Interface
+
+Copyright 2011 Jo-Philipp Wich <x...@subsignal.org>
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+       http://www.apache.org/licenses/LICENSE-2.0
+]]--
+
+local map, section, net = ...
+
+local server, username, password
+local buffering, defaultroute, metric, peerdns, dns
+
+
+server = section:taboption("general", Value, "server", translate("L2TP 
Server"))
+server.datatype = "host"
+
+
+username = section:taboption("general", Value, "username", translate("PAP/CHAP 
username"))
+
+
+password = section:taboption("general", Value, "password", translate("PAP/CHAP 
password"))
+password.password = true
+
+
+defaultroute = section:taboption("advanced", Flag, "defaultroute",
+       translate("Use default gateway"),
+       translate("If unchecked, no default route is configured"))
+
+defaultroute.default = defaultroute.enabled
+
+
+metric = section:taboption("advanced", Value, "metric",
+       translate("Use gateway metric"))
+
+metric.placeholder = "0"
+metric.datatype    = "uinteger"
+metric:depends("defaultroute", defaultroute.enabled)
+
+
+peerdns = section:taboption("advanced", Flag, "peerdns",
+       translate("Use DNS servers advertised by peer"),
+       translate("If unchecked, the advertised DNS server addresses are 
ignored"))
+
+peerdns.default = peerdns.enabled
+
+
+dns = section:taboption("advanced", DynamicList, "dns",
+       translate("Use custom DNS servers"))
+
+dns:depends("peerdns", "")
+dns.datatype = "ipaddr"
+dns.cast     = "string"
diff --git a/protocols/ppp/luasrc/model/network/proto_ppp.lua 
b/protocols/ppp/luasrc/model/network/proto_ppp.lua
index 2988385..fb0cd7f 100644
--- a/protocols/ppp/luasrc/model/network/proto_ppp.lua
+++ b/protocols/ppp/luasrc/model/network/proto_ppp.lua
@@ -20,7 +20,7 @@ limitations under the License.
 local netmod = luci.model.network
 
 local _, p
-for _, p in ipairs({"ppp", "pptp", "pppoe", "pppoa", "3g"}) do
+for _, p in ipairs({"ppp", "pptp", "pppoe", "pppoa", "3g", "l2tp"}) do
 
        local proto = netmod:register_protocol(p)
 
@@ -35,6 +35,8 @@ for _, p in ipairs({"ppp", "pptp", "pppoe", "pppoa", "3g"}) do
                        return luci.i18n.translate("PPPoE")
                elseif p == "pppoa" then
                        return luci.i18n.translate("PPPoATM")
+               elseif p == "l2tp" then
+                       return luci.i18n.translate("L2TP")
                end
        end
 
@@ -51,6 +53,8 @@ for _, p in ipairs({"ppp", "pptp", "pppoe", "pppoa", "3g"}) do
                        return "ppp-mod-pppoe"
                elseif p == "pppoa" then
                        return "ppp-mod-pppoa"
+               elseif p == "l2tp" then
+                       return "xl2tpd"
                end
        end
 
-- 
1.7.7.6

-- 
dwmw2-- 
dwmw2

Attachment: smime.p7s
Description: S/MIME cryptographic signature

_______________________________________________
openwrt-devel mailing list
openwrt-devel@lists.openwrt.org
https://lists.openwrt.org/mailman/listinfo/openwrt-devel

Reply via email to