From: Jo-Philipp Wich Date: Sun, 30 Nov 2008 06:00:52 +0000 (+0000) Subject: luci/applications: add experimental SIIT setup assistant X-Git-Tag: 0.9.0~935 X-Git-Url: https://git.archive.openwrt.org/?p=project%2Fluci.git;a=commitdiff_plain;h=59fbc851613d0b86aabff91cd457a1e53d17a3e8 luci/applications: add experimental SIIT setup assistant --- diff --git a/applications/luci-siitwizard/Makefile b/applications/luci-siitwizard/Makefile new file mode 100644 index 000000000..81a96f6a8 --- /dev/null +++ b/applications/luci-siitwizard/Makefile @@ -0,0 +1,2 @@ +include ../../build/config.mk +include ../../build/module.mk \ No newline at end of file diff --git a/applications/luci-siitwizard/luasrc/controller/siitwizard.lua b/applications/luci-siitwizard/luasrc/controller/siitwizard.lua new file mode 100644 index 000000000..dabbcaf43 --- /dev/null +++ b/applications/luci-siitwizard/luasrc/controller/siitwizard.lua @@ -0,0 +1,21 @@ +--[[ +LuCI - Lua Configuration Interface + +Copyright 2008 Steven Barth +Copyright 2008 Jo-Philipp Wich + +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 + +$Id$ + +]]-- + +module "luci.controller.siitwizard" + +function index() + entry({"admin", "freifunk", "siitwizard"}, form("siitwizard"), "SIIT 4over6 assistent", 50) +end diff --git a/applications/luci-siitwizard/luasrc/model/cbi/siitwizard.lua b/applications/luci-siitwizard/luasrc/model/cbi/siitwizard.lua new file mode 100644 index 000000000..7274f98e3 --- /dev/null +++ b/applications/luci-siitwizard/luasrc/model/cbi/siitwizard.lua @@ -0,0 +1,179 @@ +--[[ +LuCI - Lua Configuration Interface + +Copyright 2008 Steven Barth +Copyright 2008 Jo-Philipp Wich + +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 + +$Id$ + +]]-- + +local uci = require "luci.model.uci".cursor() +local tools = require "luci.tools.ffwizard" +local util = require "luci.util" + +local io = require "io" + + +-------------------- View -------------------- +f = SimpleForm("siitwizward", "4over6-Assistent", + "Dieser Assistent unterstüzt bei der Einrichtung von IPv4-over-IPv6 Translation.") + +mode = f:field(ListValue, "mode", "Betriebsmodus") +mode:value("gateway", "Gateway") +mode:value("client", "Client") + +dev = f:field(ListValue, "device", "WLAN-Gerät") +uci:foreach("network", "interface", + function(section) + if section[".name"] ~= "siit0" then + dev:value(section[".name"]) + end + end) + + +-------------------- Control -------------------- +LL_PREFIX = luci.ip.IPv6("fe80::/16") + +-- +-- find link-local address +-- +function find_ll(dev) + for _, r in ipairs(luci.sys.net.routes6()) do + if r.device == dev and LL_PREFIX:contains(r.dest) then + return r.dest:sub(LL_PREFIX) + end + end + return luci.ip.IPv6("::") +end + + + +function f.handle(self, state, data) + if state == FORM_VALID then + luci.http.redirect(luci.dispatcher.build_url("admin", "uci", "changes")) + return false + elseif state == FORM_INVALID then + self.errmessage = "Ungültige Eingabe: Bitte die Formularfelder auf Fehler prüfen." + end + return true +end + +function mode.write(self, section, value) + + -- + -- Determine defaults + -- + local ula_prefix = uci:get("siit", "defaults", "ula_prefix") or "fd00::" + local ula_global = uci:get("siit", "defaults", "ula_global") or "00ca:ffee:babe::" -- = Freifunk + local ula_subnet = uci:get("siit", "defaults", "ula_subnet") or "0000:0000:0000:4223::" -- = Berlin + local siit_prefix = uci:get("siit", "defaults", "siit_prefix") or "::ffff:ffff:0000:0000" + local siit_route = luci.ip.IPv6(siit_prefix .. "/96") + + -- Find wifi interface + local device = dev:formvalue(section) + + -- + -- Generate ULA + -- + local ula = luci.ip.IPv6("::") + + for _, prefix in ipairs({ ula_prefix, ula_global, ula_subnet }) do + ula = ula:add(luci.ip.IPv6(prefix)) + end + + ula = ula:add(find_ll(uci:get("network", device, "ifname") or device)) + + + -- + -- Gateway mode + -- + -- * wan port is dhcp, lan port is 172.23.1.1/24 + -- * siit0 gets a dummy address: 169.254.42.42 + -- * wl0 gets an ipv6 address, in this case the fdca:ffee:babe::1:1/64 + -- * we do a ::ffff:ffff:0/96 route into siit0, so everything from 6mesh goes into translation. + -- * an HNA6 of ::ffff:ffff:0:0/96 announces the mapped 0.0.0.0/0 ipv4 space. + -- * MTU on WAN, LAN down to 1400, ipv6 headers are slighly larger. + + if value == "gateway" then + + uci:set("network", "wan", "mtu", 1400) + + + -- + -- Client mode + -- + -- * 172.23.2.1/24 on its lan, fdca:ffee:babe::1:2 on wl0 and the usual dummy address on siit0. + -- * we do a ::ffff:ffff:172.13.2.0/120 to siit0, because in this case, only traffic directed to clients needs to go into translation. + -- * same route as HNA6 announcement to catch the traffic out of the mesh. + -- * Also, MTU on LAN reduced to 1400. + + else + local lan_ip = luci.ip.IPv4( + uci:get("network", "lan", "ipaddr"), + uci:get("network", "lan", "netmask") + ) + + siit_route = luci.ip.IPv6( + siit_prefix .. "/" .. (96 + lan_ip:prefix()) + ):add(lan_ip[2]) + + end + + -- siit0 interface + uci:delete_all("network", "interface", + function(s) return ( s.ifname == "siit0" ) end) + + uci:section("network", "interface", "siit0", { + ifname = "siit0", + proto = "static", + ipaddr = "169.254.42.42", + netmask = "255.255.255.0" + }) + + -- siit0 route + uci:delete_all("network", "route6", + function(s) return siit_route:contains(luci.ip.IPv6(s.target)) end) + + uci:section("network", "route6", nil, { + interface = device, + target = siit_route:string() + }) + + -- interface + uci:set("network", device, "ip6addr", ula:string()) + uci:set("network", "lan", "mtu", 1400) + + uci:set("olsrd", "general", "IpVersion", 6) + uci:foreach("olsrd", "Interface", + function(s) + if s.interface == device then + uci:set("olsrd", s[".name"], "Ip6AddrType", "global") + end + uci:delete("olsrd", s[".name"], "Ip4Boradcast") + end) + + -- hna6 + uci:delete_all("olsrd", "Hna6", + function(s) + if s.netaddr and s.prefix then + return siit_route:contains(luci.ip.IPv6(s.netaddr.."/"..s.prefix)) + end + end) + + uci:section("olsrd", "Hna6", nil, { + netaddr = siit_route:host():string(), + prefix = siit_route:prefix() + }) + + uci:save("network") + uci:save("olsrd") +end + +return f diff --git a/applications/luci-siitwizard/root/etc/config/siit b/applications/luci-siitwizard/root/etc/config/siit new file mode 100644 index 000000000..affea803d --- /dev/null +++ b/applications/luci-siitwizard/root/etc/config/siit @@ -0,0 +1,5 @@ +config siit defaults + option ula_prefix "fd00::" + option ula_global "00ca:ffee:babe::" + option ula_subnet "0000:0000:0000:4223::" + option siit_prefix "::ffff:ffff:0000:0000" diff --git a/contrib/package/luci/Makefile b/contrib/package/luci/Makefile index e3a437603..07bc33903 100644 --- a/contrib/package/luci/Makefile +++ b/contrib/package/luci/Makefile @@ -345,6 +345,16 @@ define Package/luci-app-ffwizard-leipzig/install endef +define Package/luci-app-siitwizard + $(call Package/luci/fftemplate) + TITLE:=SIIT IPv4-over-IPv6 configuration wizard +endef + +define Package/luci-app-siitwizard/install + $(call Package/luci/install/template,$(1),applications/luci-siitwizard) +endef + + define Package/luci-app-firewall $(call Package/luci/webtemplate) DEPENDS+=+luci-admin-core @@ -759,6 +769,9 @@ endif ifneq ($(CONFIG_PACKAGE_luci-app-ffwizard-leipzig),) PKG_SELECTED_MODULES+=applications/luci-ffwizard-leipzig endif +ifneq ($(CONFIG_PACKAGE_luci-app-siitwizard),) + PKG_SELECTED_MODULES+=applications/luci-siitwizard +endif ifneq ($(CONFIG_PACKAGE_luci-app-firewall),) PKG_SELECTED_MODULES+=applications/luci-fw endif @@ -895,6 +908,7 @@ $(eval $(call BuildPackage,luci-mod-freifunk)) $(eval $(call BuildPackage,luci-freifunk-community)) $(eval $(call BuildPackage,luci-app-ffwizard-leipzig)) +$(eval $(call BuildPackage,luci-app-siitwizard)) $(eval $(call BuildPackage,luci-app-firewall)) $(eval $(call BuildPackage,luci-app-olsr)) $(eval $(call BuildPackage,luci-app-qos))