FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 18:59:33 +00:00
Code Issues Releases Wiki Activity

added lastCmd reading and $LASTCMD for valueFn

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@5750 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme-1968 2014-05-05 09:26:45 +00:00
parent e8255874d8
commit ffe56e4810
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
fhem/FHEM/33_readingsProxy.pm
View File

@ -111,6 +111,7 @@ readingsProxy_update($$)
my $value_fn = AttrVal( $name, "valueFn", "" );
if( $value_fn =~ m/^{.*}$/ ) {
my $VALUE = $value;
my $LASTCMD = ReadingsVal($name,"lastCmd",undef);
my $value_fn = eval $value_fn;
Log3 $name, 3, $name .": valueFn: ". $@ if($@);
@ -211,15 +212,20 @@ readingsProxy_Set($@)
my $v = join(" ", @a);
my $set_fn = AttrVal( $hash->{NAME}, "setFn", "" );
if( $set_fn =~ m/^{.*}$/ ) {
my $CMD = $a[0];
my $DEVICE = $hash->{DEVICE};
my $READING = $hash->{READING};
my $CMD = $a[0];
my $ARGS = join(" ", @a[1..$#a]);
my $set_fn = eval $set_fn;
Log3 $name, 3, $name .": setFn: ". $@ if($@);
readingsSingleUpdate($hash, "lastCmd", $a[0], 0);
return undef if( !defined($set_fn) );
$v = $set_fn if( $set_fn );
} else {
readingsSingleUpdate($hash, "lastCmd", $a[0], 0);
}
Log3 $name, 4, "$name: set hash->{DEVICE} $v";
@ -328,7 +334,7 @@ readingsProxy_Get($@)
everything else -> use this instead</li>
<li>setFn<br>
perl expresion that will return the set command forwarded to the parent device.
has access to $DEVICE, $READING, $CMD and $ARGS.<br>
has access to $CMD, $DEVICE, $READING and $ARGS.<br>
undef -> do nothing<br>
"" -> pass-through<br>
everything else -> use this instead<br>
@ -337,7 +343,7 @@ readingsProxy_Get($@)
</li>
<li>valueFn<br>
perl expresion that will return the value that sould be used as state.
has access to $DEVICE, $READING, $CMD and $VALUE.<br>
has access to $LASTCMD, $DEVICE, $READING and $VALUE.<br>
undef -> do nothing<br>
"" -> pass-through<br>
everything else -> use this instead<br>