Hallo,
seit der o.g. FW kann ich per Türklingel von FHEM auf dem Raspi keinen Rundruf mehr an der FB auslösen. Mit dem heutigen Update auf 28433 hat sich nichts geändert.
Daraufhin habe ich downgegradet auf die 28067 und siehe da: Es funzt wieder.
Hat jemand hierzu eine Idee oder ist die Türklingel bei einer Raspi-Installation damit ein Fall mit X - wahr wohl nix?
(Ich wusste nicht, ob dieses Thema nun in die Raspi oder FB-Ecke gehört)
Gruß
Reimer Flügel
Nachtrag: Es scheint wohl das gleiche Problem wie in der Mail vom13.6. zu sein (fehlendes netcat). Wie aber ist der Lösungsvorschlag von Rudolf Koenig auf dem Raspi umzusetzen?
In der fhem.cfg steht folgender Aufruf:
define KlingelNotify notify Klingel:on {FBCallr(2,9,15,"192.168.178.1","password")}
und in der 99_myUtils:
sub
FBCallr($$$$$)
{
use Net::Telnet;
my $name = "FBCallr";
my ($Fon,$CallNr,$Duration,$Port,$Password)= @_;
my $telnet = new Net::Telnet ( Timeout=>10, Errmode=>'die');
Log GetLogLevel($name,4), "$name: Connecting to FritzBox:$Port...";
$telnet->open($Port);
$telnet->waitfor('/password: $/i');
$telnet->print($Password);
$telnet->waitfor('/# $/i');
Log GetLogLevel($name,4), "$name: Dialing to FritzBox: from:$Fon to:$CallNr...";
$telnet->print('echo "ATP'.$Fon.'2 ATD**'.$CallNr.'" | nc 127.0.0.1 1011');
my $output = $telnet->waitfor('/# $/i'); print $output;
Log GetLogLevel($name,4), "$name: Dialing:$Duration seconds...";
sleep($Duration);
Log GetLogLevel($name,4), "$name: HangOn to FritzBox...";
$telnet->print('echo "ATH0" | nc 127.0.0.1 1011');
my $output = $telnet->waitfor('/# $/i'); print $output;
Log GetLogLevel($name,4), "$name: Disconnecting...";
$telnet->print('exit');
return;
}
Z.Bsp. auf dem FB ein kleines Perl Programm schreiben, und diesen statt nc aufrufen. Nachteil: es ist einiges an Bastelei notwendig, bis es fehlfrei laeuft, und benoetigt zum Start etwa 2-5 Sekunden, also langsamer als nc.
Alternativ besorgt man sich nc aus einem aelteren Firmware, dann muss man im FBCallr nur noch den Pfad anpassen.