fi
fi
fi
fi
if [ -f $bY ];then
jY=""
fi
gP="$HE"
. $dG
. $dI
echo "$HN$kF$IH$hH$gX$II$iD$jX$jY$jZ$kA$kB$GU"
TSBEOF
cat > /var/tmp/tsb/www/cgi-bin/tsb/updateCallings.inc <<'TSBEOF'
. /var/tmp/tsb/etc/tsbdaemon.conf
. $dM
ak(){
af && ae "getpage=../htmltsb/fritzcalls$1.js"
}
an(){
local kH="$1"
echo -n '<? query telcfg:settings/RefreshJournal ?>#<? multiquery telcfg:setting
s/Journal/listwindow(0,'$kH',Type,Date,Number,Port,Duration,Route,RouteType,Name
) `$2;$3;$4;$5;$6;$7;$8;$9#` ?>' > $cR/fritzcalls2M.js
af && ae "getpage=../htmltsb/fritzcalls2M.js"
}
ao(){
if [ ! -f $bZ -a ! -f $cC ];then
date +%s > $bZ
fi
}
ap(){
local eJ="$1"
local kI="$2"
local hV="" eL="" fR=""
if [ -f $cB ];then
if [ "$kI" = M ];then
ao
else
local kJ=40
while [ -f $cB ];do
kJ=$(($kJ-1))
if [ $kJ -lt 0 ];then
rm -f $cB
break
fi
sleep 3
done
fi
else
touch $cB
rm -f $aT/callings_message.error
if [ "$eJ" = 1 ];then
if [ -f $cD ];then
eL="$(cat $cD)"
local kK="${eL#*var callingsAVM=\"}"
if [ -n "$eL" -a "$kK" != "$eL" ];then
eL="${eL%var callingsAVM=\"*}"
kL="${kK%%#*}"
if [ "$kL" != "$kK" ];then
local kM=0
local entries
for kH in 20 60;do
if [ "$kI" = M -a "$kH" -gt 40 ];then
ao
eL=""
break
fi
local kN="$(an $kH)"
kN="${kN#*#}"
rm -f $cA
if [ -z "$kN" ];then
kM=1
else
local eO="$IFS"
export IFS="#"
local kO=0
for fY in $kN;do
if [ "$fY" = "$kL" ];then
kO=1
break
fi
echo -n "$fY#" >> $cA
done
export IFS="$eO"
if [ $kO -eq 1 ];then
kM=1
break
fi
fi
done
if [ $kM -eq 1 ];then
if [ -f $cA ];then
kN="$(cat $cA)"
eL="${eL}var callingsAVM=\"$kN$kK"
else
eL="${eL}var callingsAVM=\"$kK"
fi
elif [ "$kI" != M ];then
hV="$(ak 2N)"
eL=""
fi
else
hV="$(ak 2N)"
eL=""
fi
else
rm -f $aQ/callings.*
ao
hV=""
eL=""
fi
else
hV="$(ak 2N)"
eL=""
fi
else
hV="$(ak 2)"
eL=""
fi
if [ -z "$eL" -a -n "$hV" ];then
eL="${hV#*RESULT:}"
if [ ${#eL} -eq ${#hV} ];then
echo -n "$IJ" > $aT/callings_message.error
rm -f $cD
fR=1
fi
fi
if [ -z "$fR" -a -n "$eL" ];then
echo -n "$eL" > $cD
echo -n "$eL" > $cE
fi
rm -f $cB
fi
}
TSBEOF
cat > /var/tmp/tsb/www/cgi-bin/tsb/user.inc <<'TSBEOF'
test "$sessionActive" = 1 && iT="$IK"
test "$sessionCookie" = 1 && iU="$IK"
test -z "$sessionExpire" && sessionExpire=7200
sessionExpire=$(($sessionExpire/60))
gP="$IL"
. $dG
. $dI
echo -e "$BX$gX$IM$gY$IN$iT$IO$iU$IP$sessionExpire$IQ"
TSBEOF
cat > /var/tmp/tsb/www/cgi-bin/tsb/version.inc <<'TSBEOF'
gP="$IR"
. $dG
. $dI
aq(){
local fX="$1"
eL="$(cat $fX)"
if [ "${eL#VERSIONS:}" = "$eL" ];then
echo "<tr><th>$eL</th></tr>"
else
eL="${eL#VERSIONS:$N}"
eO="$IFS"
export IFS="$N"
for dU in $eL;do
kP="${dU%%#*}"
kQ="${dU#$kP#}"
kQ="${kQ%%#*}"
kG="${dU#$kP#$kQ#}"
echo "$IS$gY$IT$kQ&v=$kP$IU${dN}$IV${qN}$IW${qN}$IX$qN$dN$IY$kP$IZ$kG$FA"
done
export IFS="$eO"
fi
}
dO="$(v "$aK" $bF)"
if [ -z "$dO" ];then
kR="$(aq $bF)"
else
kR="$dO"
fi
echo -e "$BX$gX$JA$kR$JB"
TSBEOF
cat > /var/tmp/tsb/www/cgi-bin/tsb/_frame.inc <<'TSBEOF'
echo -e "$JC$gX$JD$hT$JE"
TSBEOF
for DIR in tsb/* tsb/www/cgi-bin tsb/www/cgi-bin/tsb tsb/www/cgi-bin/tsb/*; do
e "chmod 755 /var/tmp/$DIR"
done
e "chmod -R 444 /var/tmp/tsb/www/htmltsb/*"
local error=""
local weberror="$ok"
testWebPages(){
l "Teste Webseiten:"
local msg="$(wget -qO /var/tmp/wgettestpage.tmp http://127.0.0.1/tsb.htm 2>&1)"
if [ -z "$msg" ]; then
msg="OK"
else
if [ "$weberror" -eq 1 ]; then
weberror=2
fi
ok=0
error="Fehler Download tsb.htm Seite ($msg)"
msg="FEHLER: $msg"
fi
l "LCR Updater: wget http://127.0.0.1/tsb.htm : ($msg)"
local msg="$(wget -qO /var/tmp/wgettestpage.tmp http://127.0.0.1/index.html 2>&1
)"
if [ -z "$msg" ]; then
msg="OK"
else
ok=0
weberror=3
error="$error; Fehler Download AVM index.html Seite ($msg)"
msg="FEHLER: $msg"
fi
l "AVM: wget http://127.0.0.1/index.html : ($msg)"
rm -f "/var/tmp/wgettestpage.tmp"
}
testWebPages
if [ -z "$TSBupdate" ];then
if [ "$weberror" -eq 2 ]; then
local rootName="${rootDir#/usr/www/}"
l "rootName=$rootName"
if [ "$rootName" = "${rootName#*/}" ]; then
# ok=1
error=""
l "Fehler beim Webroot, versuche weitere Brandings ins Webroot einzubinden..."
for name in `ls /usr/www`; do
local dir="/usr/www/$name"
if [ -d "$dir" ]; then
if [ -z "$name" ] || [ "$name" = "all" ] || [ "$name" = "cgi-bin" ] || [ "$name"
= "html" ] || [ "$name" = "$rootName" ]; then
l " - skip $name"
else
e "mount -o bind $basewww $dir"
fi
fi
done
testWebPages
else
l "Fehler: rootName enthõlt Subverzeichnisse!"
fi
fi
if [ "$TSBlocalhost" = "AUTO" ]; then
l "TSBlocalhost=AUTO: Werte ifconfig lan aus"
waitMax=24
while true; do
local ip="$(ifconfig lan | sed -n 's/[[:space:]]*inet addr:\([0-9][0-9\.]*\)[[:s
pace:]]*.*/\1/p')"
if [ -n "$ip" ] || [ $waitMax -le 0 ]; then
break
fi
l "Fehler bei Auswertung von ifconfig ($?), versuche erneut..."
waitMax="$(($waitMax-1))"
sleep 5
done
echo "TSBlocalhost=http://$ip" >> /var/tmp/tsb/etc/user.conf
l "F³ge Konfiguration TSBlocalhost=http://$ip hinzu ($(OK))"
elif [ -n "$TSBlocalhost" ]; then
l "TSBlocalhost=$TSBlocalhost"
echo "TSBlocalhost=\"$TSBlocalhost\"" >> /var/tmp/tsb/etc/tsbdaemon.conf
fi
if [ -n "$TSBsession" ]; then
echo -n "$TSBsession" > /var/tmp/tsb/data/session.conf
fi
fi
l "LCR Updater eingerichtet"
/bin/update_led_off
l "LED OFF ($(OK))"
killall -q -15 tsbdaemon.sh && (sleep 5;killall -q -9 tsbdaemon.sh)
/var/tmp/tsb/tsbdaemon.sh 2>&1 > /dev/null &
l "Starte tsbdaemon ($(OK))"
local dumpInfos=1
if [ -n "$error" ]; then
l "FEHLER bei Installation der Webseitenstruktur"
l "Fehlermeldungen: $error"
l "FERTIG."
elif [ "$ok" = 1 ]; then
l "Installation war erfolgreich. FERTIG."
dumpInfos=0
else
l "Bei der Installation sind Fehler aufgetreten! FERTIG."
fi
if [ -z "$TSBupdate" -a "$dumpInfos" -eq 1 ]; then
l "Informationen, um m÷gliche Fehlerursachen einzugrenzen:"
l "set:"
l "$(set)"
l "Verzeichnisse:"
l "/var"
l "$(ls -l /var)"
for dir in /usr/www /var/tmp/tsb; do
l "BASEDIR: $dir"
for file in `find $dir -type d`; do
l "DIR: $file"
l "$(ls -l $file)"
done
done
fi
EOF_TSBINSTALLER
chmod 755 /var/tmp/tsbinstaller
/var/tmp/tsbinstaller 2>&1 > /dev/null &
#<<TSB: LCR Updater Installer
