From 3b28d2f5795888afd77e9eff77ff7df0279ab67c Mon Sep 17 00:00:00 2001
From: Katze Miau <miaukatzemiau@priveasy.de>
Date: Mon, 5 Dec 2011 20:30:51 +0000
Subject: add sbin/test_connectivity

`test_connectivity <internet|vpn>` returns true iff. one of several
probe hosts can be reached over the given interface.

diff --git a/files/common/sbin/test_connectivity b/files/common/sbin/test_connectivity
new file mode 100755
index 0000000..b6681f8
--- /dev/null
+++ b/files/common/sbin/test_connectivity
@@ -0,0 +1,27 @@
+#!/bin/sh
+
+TestHosts="4.2.2.4 8.8.8.8"
+PingTrials=2
+
+pingtest () {
+    # TODO: replace with something parallel
+    for i in $(seq 1 $PingTrials); do
+	for h in $2; do
+	    ping -c 1 -w 5 -I $1  $h &>/dev/null
+	    if [ $? -eq 0 ]; then
+		exit 0;	
+	    fi
+	done
+    done
+}
+
+case "$1" in
+    internet)
+	pingtest eth1 $TestHosts
+	;;
+    vpn)
+	pingtest tun0 $TestHosts
+	;;
+esac
+
+exit 1
-- 
cgit v0.10.1