Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-04 22:19:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

70_ESCVP21net: fix for GetAll in StatusCheckCmd

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@25653 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
hapege 2022-02-07 21:03:22 +00:00
parent 90c72f7988
commit 66a05910be
1 changed files with 15 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
fhem/FHEM/70_ESCVP21net.pm
View File

@ -24,6 +24,8 @@
# 1.01.07 multiple checkStatusCmds, added GetStatus to set list # 1.01.07 multiple checkStatusCmds, added GetStatus to set list
# set PWR to statusOfflineMsg if init fails # set PWR to statusOfflineMsg if init fails
# force PWR check after CONNECTED from Dev_Io, some clean-up # force PWR check after CONNECTED from Dev_Io, some clean-up
# 1.01.08 small fix to handle GetAll as statusChckCmd
# editorial corrections in pod text
# #
# #
################################################################################ ################################################################################
@ -905,7 +907,7 @@ sub ESCVP21net_setValue($){
my ($string) = @_; my ($string) = @_;
my ( $name, $cmd, $val ) = split( "\\|", $string ); my ( $name, $cmd, $val ) = split( "\\|", $string );
my $result = "none"; my $result = "none";
my $returnval = ""; my $returnval = "$name|$cmd|error";
my @resultarr; my @resultarr;
my $data = ""; my $data = "";
my $datakey = "none"; my $datakey = "none";
@ -1097,6 +1099,11 @@ sub ESCVP21net_setValueDone {
my $rv; my $rv;
my $getcmds = ""; my $getcmds = "";
if (!$resultstring){
#delete($hash->{helper}{RUNNING_PID});
return;
}
my @resultarr = split(':', $resultstring); my @resultarr = split(':', $resultstring);
# just get name from first result, count is 0 # just get name from first result, count is 0
@ -1366,8 +1373,11 @@ sub ESCVP21net_checkStatus ($){
my $checkInterval = AttrVal( $name, "statusCheckInterval", "300" ); my $checkInterval = AttrVal( $name, "statusCheckInterval", "300" );
# changed for multiple statusCheckCmds # changed for multiple statusCheckCmds
#my $checkcmd = AttrVal( $name, "statusCheckCmd", "PWR" ); # if checkcmd is GetAll, just take it - otherwise set it to GetStatus
my $checkcmd = "GetStatus"; my $checkcmd = AttrVal( $name, "statusCheckCmd", "PWR" );
if ($checkcmd ne "GetAll"){
$checkcmd = "GetStatus";
}
my $next; my $next;
@ -1576,6 +1586,7 @@ sub ESCVP21net_restoreJson {
<br>This is a little bit special - it does not send just one command to the projector, but will select <b>every</b> command defined which has a <b>get</b> option, send it to the projector and update the corresponding reading. If a command gives no result or an error, this will be suppressed, the old value is silently kept. <br>This is a little bit special - it does not send just one command to the projector, but will select <b>every</b> command defined which has a <b>get</b> option, send it to the projector and update the corresponding reading. If a command gives no result or an error, this will be suppressed, the old value is silently kept.
<br>The status of GetAll is shown in the <b>GetAll</b> reading. It will either show the read commands, or inform if an error was received. <br>The status of GetAll is shown in the <b>GetAll</b> reading. It will either show the read commands, or inform if an error was received.
</li> </li>
<br>
<li>GetStatus <li>GetStatus
<br>Also special - also does not send just one command to the projector, but will select <b>every</b> command you defined in attr "statusCheckCmd" which has a <b>get</b> option, send it to the projector and update the corresponding reading. If a command gives no result or an error, this will be suppressed, the old value is silently kept. <br>Also special - also does not send just one command to the projector, but will select <b>every</b> command you defined in attr "statusCheckCmd" which has a <b>get</b> option, send it to the projector and update the corresponding reading. If a command gives no result or an error, this will be suppressed, the old value is silently kept.
<br>The status of GetStatus is shown in the <b>GetStatus</b> reading. It will either show the read commands, or inform if an error was received. <br>The status of GetStatus is shown in the <b>GetStatus</b> reading. It will either show the read commands, or inform if an error was received.