2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-19 06:36:04 +00:00

16_STACKABLE.pm: Fix ReadAnswer for junk data (Forum #57806)

git-svn-id: https://svn.fhem.de/fhem/trunk@13949 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2017-04-09 11:30:04 +00:00
parent ced4a6dbc2
commit 1ea9cce528

View File

@ -128,7 +128,13 @@ STACKABLE_IOReadFn($) # used by synchronuous get
while($buf !~ m/\n/) {
$buf .= DevIo_SimpleRead($me->{IODev}); # may block
}
$buf =~ s/^.//;
my $mName = $me->{NAME};
Log3 $mName, 5, "$mName read: $buf";
my @l = split("\n", $buf);
$buf = join("\n", grep { $_ =~ m/^\*/ } @l)."\n";
$buf =~ s/^\*//gsm;
if(AttrVal($me->{NAME},"binary",0)) {
$buf =~ s/[\r\n]//g;
return pack("H*",$buf);