1 files changed, 78 insertions, 0 deletions
diff --git a/files/common/www/service/cgi-bin/common.sh b/files/common/www/service/cgi-bin/common.sh
new file mode 100644
index 0000000..9a26904
--- /dev/null
+++ b/files/common/www/service/cgi-bin/common.sh
@@ -0,0 +1,78 @@
+exec 2>/tmp/www.log."$(basename $SCRIPT_NAME)"
+set -x
+
+fail() {
+    code=${1:-420}
+    reason=${2:-'Unknown reason'}
+    echo -e "Status: $code\r
+\r
+$reason"
+    exit 1
+}
+
+read_uci() {
+    local val
+    read val
+    if [ "$val" == "uci: Entry not found" ]; then
+	val=''
+    fi
+    read $1 <<EOF
+$val
+EOF
+}
+
+## lazy execution of commands after the web response has been send
+lazy() {
+    pos=$1
+    shift
+    lazy_cmd="$pos $*
+$lazy_cmd"
+}
+
+exec_lazy() {
+    echo "$lazy_cmd" \
+	| grep -v '^$' \
+	| sort \
+	| cut -f2- -d ' ' \
+	| uniq \
+	| while read; do
+	    $REPLY
+	done 1>/dev/null 2>/tmp/www.lazy."$(basename $SCRIPT_NAME)" &
+}
+
+## some tests
+have_internet() {
+    if [ -z "$have_internet_cached_result" ]; then
+	local mode=$(cat /tmp/fsm/inetable || echo boot)
+	if [ "$mode" == drone -o "$mode" == queen -o "$mode" == ghost ]; then
+	    have_internet_cached_result=true
+	else
+	    have_internet_cached_result=false
+	fi
+    fi
+    $have_internet_cached_result
+}
+
+is_wired() {
+    if [ -z "$is_wired_cached_result" ]; then
+	[ -n "$REMOTE_HOST" ]
+	local iface=$(grep ^$REMOTE_HOST </proc/net/arp \
+	    | awk 'BEGIN { FS = " " } ; { print $6 }')
+	if [ "$iface" == br-lan ]; then
+	    is_wired_cached_result=true
+	else
+	    is_wired_cached_result=false
+	fi
+    fi
+    $is_wired_cached_result
+}
+
+check_node_auth() {
+    is_wired || fail 401 'Keine Berechtigung'
+    # TODO: check password (if set)
+}
+
+check_self_auth() {
+    # think about what to check
+    true
+}