Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-01 20:20:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

00_FHZ.pm: get without queue (Forum #125844)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@25605 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2022-02-01 10:37:50 +00:00
parent 3835f8027f
commit ba867a66a9
1 changed files with 18 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
FHEM/00_FHZ.pm
View File

@ -269,7 +269,7 @@ FHZ_Get($@)
Log3 $name, 2, "FHZ get $v"; Log3 $name, 2, "FHZ get $v";
FHZ_ReadAnswer($hash, "Flush", 0); FHZ_ReadAnswer($hash, "Flush", 0);
FHZ_Write($hash, $fn, $arg) if(!IsDummy($hash->{NAME})); FHZ_DirectWrite($hash, $fn, $arg) if(!IsDummy($hash->{NAME}));
my $msg = FHZ_ReadAnswer($hash, $a[1], 1.0); my $msg = FHZ_ReadAnswer($hash, $a[1], 1.0);
Log3 $name, 5, "GET Got: $msg" if(defined($msg)); Log3 $name, 5, "GET Got: $msg" if(defined($msg));
@ -589,6 +589,23 @@ FHZ_XmitLimitCheck($$)
$hash->{NR_CMD_LAST_H} = int(@b); $hash->{NR_CMD_LAST_H} = int(@b);
} }
#####################################
# Skip the QUEUE
sub
FHZ_DirectWrite($$$)
{
my ($hash,$fn,$msg) = @_;
if(!$hash || !defined($hash->{PortObj})) {
Log3 $hash, 5, "FHZ device $hash->{NAME} is not active, cannot send";
return;
}
my $bstring = FHZ_CompleteMsg($fn, $msg);
Log3 $hash, 5, "Sending " . unpack('H*', $bstring);
$hash->{PortObj}->write($bstring) if($hash->{PortObj});
}
##################################### #####################################
sub sub
FHZ_Write($$$) FHZ_Write($$$)