Bugfix for SOMFY module: add it as client to CUL module and add match pattern.

This way, the IODev is set automatically when a new SOMFY device is defined.


git-svn-id: https://svn.fhem.de/fhem/trunk@6526 2b470e98-0d58-463d-a4d8-8e2adae1ed80

fhem/CHANGED

@@ -1,5 +1,6 @@
 # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
 # Do not insert empty lines here, update check depends on it.
+  - bugfix: SOMFY: add module to CUL client list, to set IODev automatically
   - feature: sequence: triggerPartial Attribute added
   - feature: 36_JeeLink: changed flash command to use fhem firmware
                          directory (by HCS)

fhem/FHEM/00_CUL.pm

@@ -45,7 +45,7 @@ my @ampllist = (24, 27, 30, 33, 36, 38, 40, 42); # rAmpl(dB)
 
 my $clientsSlowRF    = ":FS20:FHT.*:KS300:USF1000:BS:HMS: ".
                        ":CUL_EM:CUL_WS:CUL_FHTTK:CUL_HOERMANN: ".
-                       ":ESA2000:CUL_IR:CUL_TX:Revolt:IT:UNIRoll: ".
+                       ":ESA2000:CUL_IR:CUL_TX:Revolt:IT:UNIRoll:SOMFY ".
                        ":STACKABLE_CC:CUL_RFR:";
 my $clientsHomeMatic = ":CUL_HM:HMS:CUL_IR:STACKABLE_CC:";
 my $clientsMAX       = ":CUL_MAX:HMS:CUL_IR:STACKABLE_CC:";
@@ -70,6 +70,7 @@ my %matchListSlowRF = (
     "G:IT"        => "^i......\$",
     "H:STACKABLE_CC"=>"^\\*",
     "I:UNIRoll"   => "^[0-9A-F]{5}(B|D|E)",
+    "J:SOMFY"     => "^Y[r|t|s]:?[A-F0-9]+",
 );
 my %matchListHomeMatic = (
     "1:CUL_HM" => "^A....................",
@@ -858,6 +859,8 @@ CUL_Parse($$$$@)
     $dmsg = lc($dmsg);
   } elsif($fn eq "i" && $len >= 7) {              # IT
     $dmsg = lc($dmsg);
+  } elsif($fn eq "Y" && $len >= 3) {               # SOMFY RTS
+    ;
   } elsif($fn eq "S" && $len >= 33) {              # CUL_ESA / ESA2000 / Native
     ;
   } elsif($fn eq "E" && $len >= 11) {              # CUL_EM / Native