mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-05-04 22:19:38 +00:00
1901729367
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@23942 2b470e98-0d58-463d-a4d8-8e2adae1ed80
81 lines
2.4 KiB
Perl
81 lines
2.4 KiB
Perl
##############################################
|
|
# test master slave end to end
|
|
##############################################
|
|
|
|
package main;
|
|
|
|
use strict;
|
|
use warnings;
|
|
use Test::More;
|
|
use Time::HiRes qw( gettimeofday tv_interval); # return time as float, not just full seconds
|
|
use FHEM::HTTPMOD::Utils qw(:all);
|
|
use FHEM::Modbus::TestUtils qw(:all);
|
|
|
|
fhem 'attr global mseclog 1';
|
|
NextStep();
|
|
|
|
sub testStep1 { # preparation of slave content, enable devices
|
|
is(FhemTestUtils_gotLog('attribute'), 0, "no unknown attributes"); # logs during init are not collected.
|
|
LogStep "enable Master and set value at Slave";
|
|
fhem ('attr Master disable 0');
|
|
fhem ('setreading Slave TempWasserEin 12');
|
|
fhem ('setreading Slave Test1 1'); # h100 (*4 -> 4)
|
|
fhem ('setreading Slave Test2 2.123'); # h101
|
|
fhem ('setreading Slave Test3 abcdefg'); # h103
|
|
fhem ('setreading Slave Test4 40'); # h120
|
|
readingsSingleUpdate($defs{'Slave'}, 'Test5', pack('H*', 'e4f6fc'), 0); # h130
|
|
|
|
fhem ('setreading Slave c0 1');
|
|
fhem ('setreading Slave c5 1');
|
|
fhem ('setreading Slave c17 1');
|
|
return 0.1;
|
|
}
|
|
|
|
sub testStep2 {
|
|
LogStep "Start Scan h";
|
|
fhem ('attr Master verbose 3');
|
|
fhem ('attr Slave verbose 3');
|
|
fhem ('attr Master scanDelay 0.1');
|
|
fhem ('set Master scanModbusObjects h100-105');
|
|
return 1;
|
|
}
|
|
|
|
sub testStep3 {
|
|
is(FhemTestUtils_gotEvent('scan-h00100: .*s>=4'), 1, "got h100 correctly");
|
|
is(FhemTestUtils_gotEvent('scan-h00101: .*hex=4007'), 1, "got h101 correctly");
|
|
is(FhemTestUtils_gotEvent('scan-h00103: .*hex=6162'), 1, "got h103 correctly");
|
|
CheckAndReset();
|
|
return 1;
|
|
}
|
|
|
|
sub testStep5 {
|
|
fhem ('set Master scanModbusObjects h100-105 2');
|
|
return 1;
|
|
}
|
|
|
|
sub testStep6 {
|
|
is(FhemTestUtils_gotEvent('scan-h00100: .*s>=4'), 1, "got h100 len 2 correctly");
|
|
is(FhemTestUtils_gotEvent('scan-h00101: .*f>=2.12'), 1, "got h101 len 2 correctly");
|
|
is(FhemTestUtils_gotEvent('scan-h00103: .*string=abcd'), 1, "got h103 len 2 correctly");
|
|
CheckAndReset();
|
|
return 1;
|
|
}
|
|
|
|
sub testStep7 {
|
|
fhem ('attr Master verbose 4');
|
|
fhem ('attr Slave verbose 5');
|
|
fhem ('attr Master dev-timing-timeout 0.3');
|
|
fhem ('set Master scanModbusId 1-8 h100');
|
|
return 6;
|
|
}
|
|
|
|
|
|
sub testStep10 {
|
|
#fhem 'list Master';
|
|
is(FhemTestUtils_gotEvent('scanId-5-Response-h100: .*s>=4'), 1, "got h100 scanid response");
|
|
return 1;
|
|
}
|
|
|
|
|
|
1;
|