add debug for manual drive routine, change detect manual drive

This commit is contained in:
Marko Oldenburg 2019-05-07 11:30:55 +02:00
parent 9a09d86214
commit 6f8175ca88

View File

@ -2046,9 +2046,28 @@ sub EventProcessingShutters($@) {
if ( $events =~ m#.*:\s(\d+)# ) {
$shutters->setShuttersDev($shuttersDev);
$ascDev->setPosReading;
ASC_Debug( 'EventProcessingShutters: '
. $shutters->getShuttersDev
. ' - Event vom Rolllo erkannt. Es wird nun eine etwaige manuelle Fahrt ausgewertet.'
. ' Int von gettimeofday: ' . int( gettimeofday() )
. ' Last Position Timestamp: '
. $shutters->getLastPosTimestamp
. ' Drive Up Max Duration: '
. $shutters->getDriveUpMaxDuration
. ' Last Position: '
. $shutters->getLastPos
. ' aktuelle Position: '
. $shutters->getStatus
);
if ( ( int( gettimeofday() ) - $shutters->getLastPosTimestamp ) >
$shutters->getDriveUpMaxDuration
and $shutters->getLastPos != $shutters->getStatus )
and ( int( gettimeofday() ) - $shutters->getLastManPosTimestamp ) >
$shutters->getDriveUpMaxDuration
)
{
$shutters->setLastDrive('manual');
$shutters->setLastDriveReading;