[Openautomation-svn] SF.net SVN: openautomation:[1136] wiregate/plugin/generic/Logikprozessor.pl

[<dpe...@us...>]

Revision: 1136
          http://openautomation.svn.sourceforge.net/openautomation/?rev=1136&view=rev
Author:   dpesch01
Date:     2012-11-13 08:41:32 +0000 (Tue, 13 Nov 2012)
Log Message:
-----------
Fix: verhindert Aufruf von knx_write() mit leerer GA

- trat auf bei Regeln ohne: transmit-Eintrag
- der Fix verhindert Logfile-Spam mit "WARN - None or unsupported DPT:  sent to  value 0" von knx_write()

Modified Paths:
--------------
    wiregate/plugin/generic/Logikprozessor.pl

Modified: wiregate/plugin/generic/Logikprozessor.pl
===================================================================
--- wiregate/plugin/generic/Logikprozessor.pl	2012-11-13 07:14:04 UTC (rev 1135)
+++ wiregate/plugin/generic/Logikprozessor.pl	2012-11-13 08:41:32 UTC (rev 1136)
@@ -187,7 +187,7 @@
 
 	# Berechnung und Senden beim Startup des Logikprozessors
 	my $result=execute_logic($t, undef, undef);	
-	if(defined $result)
+	if(defined $result && defined $logic{$t}{transmit} && length($logic{$t}{transmit}))
 	{
 	    my $ga=groupaddress $logic{$t}{transmit};
 	    knx_write($ga, $result); # DPT aus eibga.conf		    
@@ -329,7 +329,7 @@
 	}
 	else
 	{
-	    if(defined $result)
+	    if(defined $result && defined $transmit && length($transmit))
 	    {
 		knx_write($transmit, $result);
 		$retval.="$msg{src} $ga:$in -> \$logic{$t}{receive}(Logik) -> $transmit:$result gesendet " if $debug;

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.