[package] add 6to4 - provides full automatic 6to setup with optional configuration in /etc/config/network

git-svn-id: svn://svn.openwrt.org/openwrt/trunk@23996 3c298f89-4303-0410-b956-a3cf2f4a3e73

3 files changed, 263 insertions, 0 deletions

diff --git a/package/6to4/Makefile b/package/6to4/Makefile
new file mode 100644
index 000000000..cf9f74136
--- /dev/null
+++ b/package/6to4/Makefile
@@ -0,0 +1,44 @@
+#
+# Copyright (C) 2010 OpenWrt.org
+#
+# This is free software, licensed under the GNU General Public License v2.
+# See /LICENSE for more information.
+#
+
+include $(TOPDIR)/rules.mk
+
+PKG_NAME:=6to4
+PKG_VERSION:=1
+PKG_RELEASE:=1
+
+include $(INCLUDE_DIR)/package.mk
+
+define Package/6to4
+  SECTION:=ipv6
+  CATEGORY:=IPv6
+  DEPENDS:=+ip +kmod-ipv6 +kmod-sit
+  TITLE:=IPv6-to-IPv4 configuration support
+  MAINTAINER:=Jo-Philipp Wich <xm@subsignal.org>
+  PKGARCH:=all
+endef
+
+define Package/6to4/description
+Provides support for 6to4 tunnels in /etc/config/network.
+Refer to http://wiki.openwrt.org/doc/uci/network for
+configuration details.
+endef
+
+define Build/Compile
+endef
+
+define Build/Configure
+endef
+
+define Package/6to4/install
+	$(INSTALL_DIR) $(1)/lib/network
+	$(INSTALL_DATA) ./files/6to4.sh $(1)/lib/network/6to4.sh
+	$(INSTALL_DIR) $(1)/etc/hotplug.d/iface
+	$(INSTALL_DATA) ./files/6to4.hotplug $(1)/etc/hotplug.d/iface/91-6to4
+endef
+
+$(eval $(call BuildPackage,6to4))
diff --git a/package/6to4/files/6to4.hotplug b/package/6to4/files/6to4.hotplug
new file mode 100644
index 000000000..037abd48f
--- /dev/null
+++ b/package/6to4/files/6to4.hotplug
@@ -0,0 +1,29 @@
+#!/bin/sh
+
+if [ "$ACTION" = ifup ]; then
+	. /etc/functions.sh
+
+	include /lib/network
+	scan_interfaces
+
+	update_tunnel() {
+		local cfg="$1"
+
+		local proto
+		config_get proto "$cfg" proto
+		[ "$proto" = 6to4 ] || return 0
+
+		local wandev
+		config_get wandev "$cfg" wan_device "$(find_6to4_wanif)"
+		[ "$wandev" = "$DEVICE" ] || return 0
+
+		local wanip=$(find_6to4_wanip "$wandev")
+
+		[ -n "$wanip" ] && {
+			uci_set_state network "$cfg" ipaddr "$wanip"
+			( ifup "$cfg" )&
+		}
+	}
+
+	config_foreach update_tunnel interface
+fi
diff --git a/package/6to4/files/6to4.sh b/package/6to4/files/6to4.sh
new file mode 100755
index 000000000..4db924d4e
--- /dev/null
+++ b/package/6to4/files/6to4.sh
@@ -0,0 +1,190 @@
+# 6to4.sh - IPv6-in-IPv4 tunnel backend
+# Copyright (c) 2010 OpenWrt.org
+
+find_6to4_wanif() {
+	local if=$(ip -4 r l e 0.0.0.0/0); if="${if#default* dev }"; if="${if%% *}"
+	[ -n "$if" ] && grep -qs "^ *$if:" /proc/net/dev && echo "$if"
+}
+
+find_6to4_wanip() {
+	local ip=$(ip -4 a s dev "$1"); ip="${ip#*inet }"
+	echo "${ip%%[^0-9.]*}"
+}
+
+find_6to4_prefix() {
+	local ip4="$1"
+	local oIFS="$IFS"; IFS="."; set -- $ip4; IFS="$oIFS"
+
+	printf "2002:%02x%02x:%02x%02x\n" $1 $2 $3 $4
+}
+
+# Hook into scan_interfaces() to synthesize a .device option
+# This is needed for /sbin/ifup to properly dispatch control
+# to setup_interface_6to4() even if no .ifname is set in
+# the configuration.
+scan_6to4() {
+	config_set "$1" device "6to4-$1"
+}
+
+coldplug_interface_6to4() {
+	setup_interface_6to4 "6to4-$1" "$1"
+}
+
+setup_interface_6to4() {
+	local iface="$1"
+	local cfg="$2"
+	local link="6to4-$cfg"
+
+	local local4=$(uci_get network "$cfg" ipaddr)
+
+	local remote4
+	config_get remote4 "$cfg" peeraddr
+
+	local mtu
+	config_get mtu "$cfg" mtu
+
+	local ttl
+	config_get ttl "$cfg" ttl
+
+	local defaultroute
+	config_get_bool defaultroute "$cfg" defaultroute 1
+
+	local wanif=$(find_6to4_wanif)
+	[ -z "$wanif" ] && {
+		logger -t "$link" "Cannot find wan interface - aborting"
+		return
+	}
+
+	local wancfg=$(find_config "$wanif")
+	[ -z "$wancfg" ] && {
+		logger -t "$link" "Cannot find wan network - aborting"
+		return
+	}
+
+	# If local4 is unset, guess local IPv4 address from the
+	# interface used by the default route.
+	[ -z "$local4" ] && {
+		[ -n "$wanif" ] && {
+			local4=$(find_6to4_wanip "$wanif")
+			uci_set_state network "$cfg" wan_device "$wanif"
+		}
+	}
+
+	[ -n "$local4" ] && {
+		logger -t "$link" "Starting ..."
+
+		# creating the tunnel below will trigger a net subsystem event
+		# prevent it from touching or iface by disabling .auto here
+		uci_set_state network "$cfg" ifname $link
+		uci_set_state network "$cfg" auto 0
+
+		# find our local prefix
+		local prefix6=$(find_6to4_prefix "$local4")
+		local local6="$prefix6::1/16"
+
+		logger -t "$link" " * IPv4 address is $local4"
+		logger -t "$link" " * IPv6 address is $local6"
+		ip tunnel add $link mode sit remote any local $local4 ttl ${ttl:-64}
+		ip link set $link up
+		ip link set mtu ${mtu:-1280} dev $link
+		ip addr add $local6 dev $link
+
+		uci_set_state network "$cfg" ipaddr $local4
+		uci_set_state network "$cfg" ip6addr $local6
+
+		[ "$defaultroute" = 1 ] && {
+			logger -t "$link" " * Adding default route"
+			ip -6 route add 2000::/3 via ::192.88.99.1 dev $link metric 1
+			uci_set_state network "$cfg" defaultroute 1
+		}
+
+		# find delegation target
+		local adv_interface
+		config_get adv_interface "$cfg" adv_interface
+
+		local adv_ifname
+		config_get adv_ifname "${adv_interface:-lan}" ifname
+
+		local adv_subnet=$(uci_get network "$cfg" adv_subnet)
+
+		grep -qs "^ *$adv_ifname:" /proc/net/dev && {
+			local subnet6="$prefix6:${adv_subnet:-1}::1/64"
+
+			logger -t "$link" " * Advertising IPv6 subnet $subnet6 on ${adv_interface:-lan} ($adv_ifname)"
+			ip -6 addr add $subnet6 dev $adv_ifname
+			uci_set_state network "$cfg" adv_subnet "$subnet6"
+			uci_set_state network "$cfg" adv_ifname "$adv_ifname"
+
+			[ -f /etc/config/radvd ] && /etc/init.d/radvd enabled && {
+				local sid="6to4_$cfg"
+
+				uci -q batch <<-EOF
+					delete radvd.iface_$sid
+					delete radvd.prefix_$sid
+					set radvd.iface_$sid=interface
+					set radvd.iface_$sid.ignore=0
+					set radvd.iface_$sid.interface=${adv_interface:-lan}
+					set radvd.iface_$sid.IgnoreIfMissing=1
+					set radvd.iface_$sid.AdvSendAdvert=1
+					set radvd.iface_$sid.MaxRtrAdvInterval=30
+					set radvd.prefix_$sid=prefix
+					set radvd.prefix_$sid.ignore=0
+					set radvd.prefix_$sid.interface=${adv_interface:-lan}
+					set radvd.prefix_$sid.prefix=0:0:0:${adv_subnet:-1}::/64
+					set radvd.prefix_$sid.AdvOnLink=1
+					set radvd.prefix_$sid.AdvAutonomous=1
+					set radvd.prefix_$sid.AdvValidLifetime=300
+					set radvd.prefix_$sid.AdvPreferredLifetime=120
+					set radvd.prefix_$sid.Base6to4Interface=$wancfg
+				EOF
+
+				/etc/init.d/radvd restart
+			}
+		}
+
+		logger -t "$link" "... started"
+
+		env -i ACTION="ifup" INTERFACE="$cfg" DEVICE="$link" PROTO=6to4 /sbin/hotplug-call "iface" &
+	} || {
+		echo "Cannot determine local IPv4 address for 6to4 tunnel $cfg - skipping"
+	}
+}
+
+stop_interface_6to4() {
+	local cfg="$1"
+	local link="6to4-$cfg"
+
+	local local6=$(uci_get_state network "$cfg" ip6addr)
+	local defaultroute=$(uci_get_state network "$cfg" defaultroute)
+
+	local adv_subnet=$(uci_get_state network "$cfg" adv_subnet)
+	local adv_ifname=$(uci_get_state network "$cfg" adv_ifname)
+
+	grep -qs "^ *$link:" /proc/net/dev && {
+		logger -t "$link" "Shutting down ..."
+		env -i ACTION="ifdown" INTERFACE="$cfg" DEVICE="$link" PROTO=6to4 /sbin/hotplug-call "iface" &
+
+		[ -n "$adv_subnet" ] && [ -n "$adv_ifname" ] && {
+			local sid="6to4_$cfg"
+
+			uci -q batch <<-EOF
+				delete radvd.iface_$sid
+				delete radvd.prefix_$sid
+			EOF
+
+			/etc/init.d/radvd enabled && /etc/init.d/radvd restart
+
+			ip -6 addr del $adv_subnet dev $adv_ifname
+		}
+
+		[ "$defaultroute" = "1" ] && {
+			ip -6 route del 2000::/3 via ::192.88.99.1 dev $link metric 1
+		}
+
+		ip addr del $local6 dev $link
+		ip link set $link down
+		ip tunnel del $link
+
+		logger -t "$link" "... stopped"
+	}
+}