From a1988622da1e4b09df5b994d07ab3d6ee999f0d5 Mon Sep 17 00:00:00 2001
From: Yves Fischer <yvesf-git@xapek.org>
Date: Mon, 6 May 2013 13:53:03 +0200
Subject: sensor: internet latency

---
 datasources/internet_latency.sh | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100755 datasources/internet_latency.sh

diff --git a/datasources/internet_latency.sh b/datasources/internet_latency.sh
new file mode 100755
index 0000000..7743bca
--- /dev/null
+++ b/datasources/internet_latency.sh
@@ -0,0 +1,20 @@
+#!/bin/sh
+
+. "`dirname \"$0\"`"/datastore-functions.sh
+
+HTTP_SERVER=78.47.115.125
+
+start=`date +%N`
+
+if printf "HEAD / HTTP/1.1\r\n\r\n" | nc -w 1 $HTTP_SERVER 80 >/dev/null; then
+    end=`date +%N`
+    dur=`expr $end - $start`
+    if [ $dur -lt 0 ]; then
+        dur=`expr $dur + 999999999`
+    fi
+    put_value_sensor_now "`hostname`.internet.latency_ns" "$dur"
+else
+    put_value_sensor_now "`hostname`.internet.latency_ns" "-1"
+fi
+
+exit 0
-- 
cgit v1.2.1