mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-04-07 19:04:20 +00:00
feature : get refreshUserAttr implementiert
git-svn-id: https://svn.fhem.de/fhem/trunk@18520 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
46809c998a
commit
527c361696
@ -30,7 +30,13 @@
|
||||
#
|
||||
# CHANGE LOG
|
||||
#
|
||||
# 30.0ß1.2019 1.1.4
|
||||
# 07.02.2019 1.1.5
|
||||
# feature : get refreshUserAttr implementiert
|
||||
# (erstellt notwendige user-attr Attribute an den Geraeten neu,
|
||||
# nuetzlich nach dem Hinzufügen neuer Geraete bei angegebenen
|
||||
# devspec)
|
||||
#
|
||||
# 30.01.2019 1.1.4
|
||||
# change : Umstellung der Zeichentrenner bei 'Parse' von ':' auf '\0'
|
||||
# wg. Problemen mit ':' in Topics (MQTT2*)
|
||||
# https://forum.fhem.de/index.php?topic=96608
|
||||
@ -305,7 +311,7 @@ use warnings;
|
||||
|
||||
#my $DEBUG = 1;
|
||||
my $cvsid = '$Id$';
|
||||
my $VERSION = "version 1.1.4 by hexenmeister\n$cvsid";
|
||||
my $VERSION = "version 1.1.5 by hexenmeister\n$cvsid";
|
||||
|
||||
my %sets = (
|
||||
);
|
||||
@ -313,7 +319,8 @@ my %sets = (
|
||||
my %gets = (
|
||||
"version" => "noArg",
|
||||
"devlist" => "",
|
||||
"devinfo" => ""
|
||||
"devinfo" => "",
|
||||
"refreshUserAttr" => "noArg"
|
||||
#"report"=>"noArg",
|
||||
);
|
||||
|
||||
@ -583,6 +590,15 @@ sub Undefine() {
|
||||
removeOldUserAttr($hash);
|
||||
}
|
||||
|
||||
# erstellt / loescht die notwendigen userattr-Werte (die Bridge-Steuerattribute an den Geraeten laut devspec)
|
||||
sub refreshUserAttr($) {
|
||||
my ($hash) = @_;
|
||||
my $oldprefix = $hash->{+HS_PROP_NAME_PREFIX};
|
||||
my $olddevspec = $hash->{+HS_PROP_NAME_DEVSPEC};
|
||||
my $newdevspec = initUserAttr($hash);
|
||||
removeOldUserAttr($hash,$oldprefix,$olddevspec,$newdevspec) if (defined ($olddevspec));
|
||||
}
|
||||
|
||||
# liefert TYPE des IODev, wenn definiert (MQTT; MQTT2,..)
|
||||
sub retrieveIODev($) {
|
||||
my ($hash) = @_;
|
||||
@ -1867,6 +1883,10 @@ sub Get($$$@) {
|
||||
return $res;
|
||||
#last;
|
||||
};
|
||||
$command eq "refreshUserAttr" and do {
|
||||
refreshUserAttr($hash);
|
||||
}
|
||||
|
||||
# $command eq "YYY" and do {
|
||||
# #
|
||||
# last;
|
||||
|
Loading…
x
Reference in New Issue
Block a user