From 05bdc4aba358c7aec1ad1423dea5d86e96abca74 Mon Sep 17 00:00:00 2001
From: Demo User <jack@beagleboard.1.localnet.cc>
Date: Tue, 23 Apr 2013 19:36:55 +0000
Subject: datastore functions: no -i ; +internet_speed.sh

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

(limited to 'datasources/internet_speed.sh')

diff --git a/datasources/internet_speed.sh b/datasources/internet_speed.sh
new file mode 100755
index 0000000..2b0b85b
--- /dev/null
+++ b/datasources/internet_speed.sh
@@ -0,0 +1,30 @@
+#!/bin/sh
+
+. "`dirname \"$0\"`"/datastore-functions.sh
+
+if ! curl --version >/dev/null; then
+	echo "missing curl" >&2
+	exit 1
+fi
+
+measure_speed() {
+	curl --write-out "%{speed_download}" \
+		--silent \
+		--max-time 60 \
+		--output /dev/null \
+		"http://speedtest.qsc.de/500kB.qsc" \
+	| cut -f 1 -d ','
+	return $?
+}
+
+speed=`measure_speed`
+if [ $? = 0 ]; then
+	put_value_sensor_now \
+		"`hostname`.internet.speed" \
+		"$speed"
+else
+	put_value_sensor_now \
+		"`hostname`.internet.speed" \
+		"0"
+fi
+exit $?
-- 
cgit v1.2.1