FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 06:39:11 +00:00
Code Issues Releases Wiki Activity

48_BlinkCamera: Corrected handling of prefered network attribute

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@22511 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
viegener 2020-08-01 11:18:11 +00:00
parent c811015142
commit b893b86c3d
2 changed files with 30 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
fhem/CHANGED
View File

@ -1,5 +1,6 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
# Do not insert empty lines here, update check depends on it.
- bugfix: 48_BlinkCamera: Corrected handling of prefered network attribute
- change: 70_SolarEdgeAPI: allow smaller intervals for API queries
- change: 66_EseraOneWire: switching to recommended firmware version 12029
- feature: 60_Watches: attr timeAsReading -> write displayed time to reading

38
fhem/FHEM/48_BlinkCamera.pm
View File

@ -55,9 +55,14 @@
# FIX: cam type not send for old homescreen
# FIX: remove also FUUID keyvalue on delete
# FIX: FUUID in undef corrected
# New default 1 for homescreenv3 - old apis deactivated
# Disclaimer for API changes
# Corrected handling of prefered network attribute
#
#
#
#
#
##############################################################################
@ -1360,6 +1365,8 @@ sub BlinkCamera_ParseHomescreen($$$)
my $firstnetwork = undef;
my $netlist = "";
my $prefnet = AttrVal($hash->{NAME},'network',undef);
$readUpdates->{networkName} = "";
$readUpdates->{networkArmed} = "";
@ -1372,33 +1379,38 @@ sub BlinkCamera_ParseHomescreen($$$)
# $ob = 1 if ( ( defined( $anet->{onboarded} ) ) && ( $anet->{onboarded}) );
my $ns = $netid.":".$anet->{name};
# Log3 $name, 4, "BlinkCamera_Callback $name: onboarded :".$anet->{onboarded}.":" ;
if ( $ob ) {
# Log3 $name, 4, "BlinkCamera_Callback $name: found onboarded network ".$netkey ;
# check with prefered network
if ( defined( $prefnet ) ) {
# only check against pref net if this is set to avoid using first network
if ( $netid eq $prefnet) {
$firstnetwork = $netid;
$readUpdates->{networkName} = $anet->{name} if ( defined( $anet->{name} ) );
$readUpdates->{networkArmed} = ($anet->{armed}?"true":"false") if ( defined( $anet->{armed} ) );
}
} elsif ( ! defined( $firstnetwork ) ) {
$firstnetwork = $netid;
$readUpdates->{networkName} = $anet->{name} if ( defined( $anet->{name} ) );
$readUpdates->{networkArmed} = ($anet->{armed}?"true":"false") if ( defined( $anet->{armed} ) );
}
# $ob currently always 0 - check with onboarded networks - currently only influencing sequence
if ( $ob ) {
$ns .= "\n" if ( length( $netlist) > 0 );
$netlist = $ns.$netlist;
} else {
if ( length( $netlist) == 0 ) {
$firstnetwork = $netid;
$readUpdates->{networkName} = $anet->{name} if ( defined( $anet->{name} ) );
$readUpdates->{networkArmed} = ($anet->{armed}?"true":"false") if ( defined( $anet->{armed} ) );
} else {
$netlist .= "\n";
}
$netlist .= "\n" if ( length( $netlist) > 0 );
$netlist .= $ns;
}
}
}
$readUpdates->{networks} = $netlist;
my $network = $firstnetwork;
if ( ! defined( $network ) ) {
Log3 $name, 2, "BlinkCamera_ParseHomescreen $name: Network ID not found - please set attribute ";
Log3 $name, 2, "BlinkCamera_ParseHomescreen $name: Network ID not found - please set attribute to existing network";
} else {
Log3 $name, 4, "BlinkCamera_ParseHomescreen $name: network ".$network ;
}
@ -1435,6 +1447,8 @@ sub BlinkCamera_ParseHomescreen($$$)
return $ret if ( ( ! defined( $camList ) ) && ( ! defined( $owlList ) ) );
Log3 $name, 4, "BlinkCamera_Callback $name: handle cams" ;
my $cameraGets = "";
my $cameras = "";