Anrufumleitung Fritzbox

#!/bin/bash


#################
# Konfiguration #
fbox="fritz.box"
USER="xxxxx"
PASSWD="xxxxx"
#################


if [ "$fbox" = "" ]; then
echo Bitte Fritzbox Adresse im Script eintragen
exit 1
fi


RED='\033[0;31m'
GREEN='\033[0;32m'
CYAN='\033[0;36m'
YELLOW='\033[0;33m'
NC='\033[0m'
CURL=$(which curl)
MD5SUM=$(which md5sum)
ICONV=$(which iconv)
AWK=$(which awk)


# Die SmartHome-Seite der Fritzbox
CURLCMD="$CURL -s $fbox/webservices/homeautoswitch.lua"


# Funktion zum Ermitteln der SID / Anmeldung bei der Fritzbox
get_sid() {


challenge=$(curl -s http://$fbox/login_sid.lua |  grep -o "<Challenge>[a-z0-9]\{8\}" | cut -d'>' -f 2)
hash=$(echo -n "$challenge-$PASSWD" |sed -e 's,.,&\n,g' | tr '\n' '\0' | md5sum | grep -o "[0-9a-z]\{32\}")
SID=$(curl -s "http://$fbox/login_sid.lua" -d "response=$challenge-$hash" -d 'username='${USER} \
| grep -o "<SID>[a-z0-9]\{16\}" |  cut -d'>' -f 2)
echo SID: $SID
}


# Funktion zum Ermitteln von Werten
get_value() {
RESULT=""
if [ "$2" = "" ]; then
RESULT=$($CURLCMD"?sid=$SID&switchcmd=$1")
else
RESULT=$($CURLCMD"?sid=$SID&ain=$2&switchcmd=$1")
fi
}


get_sid # SID holen
if [ "$SID" = "0000000000000000" ]; then
echo -e  "${RED}Anmeldung fehlgeschlagen ${NC}"
exit 1
fi
if [ "$SID" = "" ]; then
echo -e  "${RED}Anmeldung fehlgeschlagen ${NC}"
exit 1
fi


echo -e  "${GREEN}Anmeldung erfolgreich ${NC}"
echo


# Liste der Schalter ermitteln
get_value getswitchlist
COUNTER=0
IFS=', ' read -r -a array <<< "$RESULT"


# Werte der Schalter holen
for AIN in "${array[@]}"
do
let COUNTER=COUNTER+1
echo -e  "${YELLOW}Actor #$COUNTER ${NC}"
switchpresent=0
get_value getswitchname $AIN
echo -e  "${CYAN}Name: $RESULT ${NC}"
get_value getswitchpresent $AIN
echo AIN: $AIN
echo Connected: $RESULT
if [ "$RESULT" = "1" ]; then
# bei aktiven Schaltern
# Parameter verarbeiten, etwa: 1 on
if [ "$1" = "$COUNTER" ]; then
if [ "$2" = "on" ]; then
get_value setswitchon $AIN
echo "set #$COUNTER on"
fi
if [ "$2" = "off" ]; then
get_value setswitchoff $AIN
echo "set #$COUNTER off"
fi
if [ "$2" = "toggle" ]; then
get_value setswitchtoggle $AIN
echo "set #$COUNTER toggle"
fi
fi


# Alle Werte ermitteln/ausgeben (langsamer)
if [ "$VIEW" = "full" ]; then
get_value getswitchstate $AIN
echo State: $RESULT
get_value getswitchpower $AIN
switchpower=`awk "BEGIN {printf \"%.2f\n\", $RESULT/1000}"`
echo Power: $switchpower W
get_value getswitchenergy $AIN
echo Energy: $RESULT Wh
get_value gettemperature $AIN
temperature=`awk "BEGIN {printf \"%.1f\n\", $RESULT/10}"`
echo Temperature: $temperature °C
echo
fi
fi


done
exit 0