FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00
Code Issues Releases Wiki Activity

allow register names instead of register id for regSet and regGet of system registers

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@3507 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme-1968 2013-07-26 11:57:56 +00:00
parent 3f9a32a781
commit 1cae1d91cf
1 changed files with 14 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
fhem/FHEM/34_SWAP.pm
View File

@ -363,6 +363,16 @@ SWAP_Set($@)
return "\"set $name $cmd\" needs one argument" if( $cnt < 2 && ( $cmd eq 'regGet' ) );
return "\"set $name $cmd\" needs two arguments" if( $cnt < 3 && ( $cmd eq 'regSet' ) );
if( ($cmd eq "regSet" || $cmd eq "regGet") && $arg !~ m/^[\da-f]{2}(\.([\da-f]+))?$/i ) {
foreach my $reg ( sort { $a <=> $b } keys ( %default_registers ) ) {
my $register = $default_registers{$reg};
if( $register->{name} =~ m/^$arg$/i ) {
$arg = sprintf("%02X", $reg);
last;
}
}
}
if( $cmd eq "regSet" ) {
$arg =~ m/^([\da-f]{2})(\.([\da-f]+))?$/i;
return "$arg is not a valid register name for $cmd" if( !defined($1) );
@ -993,11 +1003,13 @@ SWAP_Attr(@)
<b>Set</b>
<ul>
<li>regGet &lt;reg&gt;<br>
request status message from register &lt;reg&gt;.
request status message for register id &lt;reg&gt;.
for system registers the register name can be used instead if the two digit register id in hex.
</li><br>
<li>regSet &lt;reg&gt; &lt;data&gt;<br>
write &lt;data&gt; to register &lt;reg&gt;.
write &lt;data&gt; to register id &lt;reg&gt;.
for system registers the register name can be used instead if the twi digit register id in hex.
</li><br>
<li>regSet &lt;reg&gt;.&lt;ep&gt &lt;data&gt;<br>