eq3 firmware check funkioniert nicht mehr

[Frank_Huber]

Ich habe den bestehenden Code angepasst und jetzt funktioniert dies mit dem neuen Link:

Bitte mal testen, wenn es keine Probleme gibt könnte das als Template eingepflegt werden.

Danke dafür.
Sehe ich das richtig dass hierfür jetzt kein Code in der myUtils mehr notwendig ist.

[yersinia]

Sehe ich das richtig dass hierfür jetzt kein Code in der myUtils mehr notwendig ist.

Korrekt.

[Pfriemler]

erst ein "error => no or wrong data from eq3-server!", nach einem reread:

Code Auswählen Erweitern


hm_fw_check

last homematic-fw-check => 2020-01-31 12:51:03

| device                         | model                   | cur_fw | new_fw |
------------------------------------------------------------------------------
| HKThermostat1                  | HM-CC-RT-DN             |    1.4 |  1.5.3 |
| HKThermostat2                  | HM-CC-RT-DN             |    1.4 |  1.5.3 |
| HKThermostat3                  | HM-CC-RT-DN             |    1.4 |  1.5.3 |
| HM_2DBDB9                      | HM-LC-BL1PBU-FM         |    2.3 | 2.11.1 |
| HM_Universalschalter1          | HM-LC-SW1-PL-DN-R1      |    2.5 |  2.6.0 |
| KBadThermostat                 | HM-TC-IT-WM-W-EU        |    1.3 |  1.4.2 |
| Treppenlichtdimmer             | HM-LC-DIM1T-DR          |    1.0 |  1.1.0 |

Grandios! die alte Routine hatte schon ewig nichts mehr gefunden (ist inwzischen auch klar warum). Gleich rückstandsfrei entsorgt.

[MadMax-FHEM]

Danke Pfriemler für den Tipp.

Ich habe den bestehenden Code angepasst und jetzt funktioniert dies mit dem neuen Link:

Code Auswählen Erweitern

defmod hm_fw_check HTTPMOD https://update.homematic.com/firmware/api/firmware/search/DEVICE 86400
attr hm_fw_check userattr reading01AutoNumLen reading01Name reading01RegOpt reading01Regex reading02AutoNumLen reading02Name reading02RegOpt reading02Regex readingMaxAge readingMaxAgeReplacementMode:text,reading,internal,expression,delete showNewFWOnly:yes,no
attr hm_fw_check enableControlSet 1
attr hm_fw_check icon hm_ccu
attr hm_fw_check reading01AutoNumLen 2
attr hm_fw_check reading01Name hmfw-type
attr hm_fw_check reading01RegOpt g
attr hm_fw_check reading01Regex (?i)"type":"((?:\w+[-]*){1,})
attr hm_fw_check reading02AutoNumLen 2
attr hm_fw_check reading02Name hmfw-version
attr hm_fw_check reading02RegOpt g
attr hm_fw_check reading02Regex (?si)"version":"(\d+[.]\d+[.]\d+)
attr hm_fw_check readingMaxAge 10
attr hm_fw_check readingMaxAgeReplacementMode delete
attr hm_fw_check room fw-checks
attr hm_fw_check showError 1
attr hm_fw_check showMatched 1
attr hm_fw_check showNewFWOnly yes
attr hm_fw_check stateFormat {   my $ret ="";;;;\
    my $lastCheck = ReadingsTimestamp($name,"MATCHED_READINGS","???");;;;\
    $ret .= '<div style="text-align:left">';;;;\
    $ret .= 'last <a title="eq3-downloads" href="http://www.eq-3.de/service/downloads.html">homematic</a>-fw-check => '.$lastCheck;;;;\
    $ret .= '<br><br><pre>';;;;\
    $ret .= "| device                         | model                   | cur_fw | new_fw |<br>";;;;\
    $ret .= "------------------------------------------------------------------------------<br>";;;;\
    my $check = ReadingsVal($name,"newFwForDevices","error => no or wrong data from eq3-server!");;;;\
    if($check eq "no fw-updates needed!") {\
      $ret .= '| <b style="color:green">';;;;\
      $ret .= sprintf("%-74s",$check);;;;\
      $ret .= '</b> |';;;;\
    } elsif($check eq "error => no or wrong data from eq3-server!") {\
      $ret .= '| <b style="color:red">';;;;\
      $ret .= sprintf("%-74s",$check);;;;\
      $ret .= '</b> |';;;;\
    } else {\
      my @devices = split(',',$check);;;;\
      foreach my $devStr (@devices) {\
        my ($dev,$md,$idx,$ofw,$nfw) = $devStr =~ m/([^\s]+)\s[(]([^\s]+)\s[(](\d+)[)]\sofw_([\d\.]+)\s=>\snfw_([\d\.]+)/;;;;\
        my $fw_link = "https://ccu3-update.homematic.com/firmware/download?cmd=download&serial=0&product=".$md;;;;\
        $ret .= '| <a href="/fhem?detail='.$dev.'" target="_blank"><b>';;;;\
        $ret .= sprintf("%-30s",$dev);;;;\
        $ret .= '</b></a> | ';;;;\
        $ret .= '<b'.(($md eq "?")?' title="missing attribute model => set device in teach mode to receive missing data" style="color:yellow;;"':' style="color:lightgray;;"').'>';;;;\
        $ret .= sprintf("%-23s",$md);;;;\
        $ret .= '</b> | ';;;;\
        $ret .= '<b'.(($ofw eq "0.0")?' title="missing attribute firmware => set device in teach mode to receive missing data" style="color:yellow"':' style="color:lightgray;;"').'>';;;;\
        $ret .= sprintf("%6s",$ofw);;;;\
        $ret .= '</b> | ';;;;\
        $ret .= '<a title="download firmware file" href="'.$fw_link.'" target="_blank"><b style="color:red;;">';;;;\
        $ret .= sprintf("%6s",$nfw);;;;\
        $ret .= '</b></a> | ';;;;\
        $ret .= "<br />";;;;\
      }\
    }\
    $ret .= '</pre></div>';;;;\
  return $ret;;;;\
}
attr hm_fw_check userReadings newFwForDevices:MATCHED_READINGS.* {\
  my $ret = "";;;;\
  my $newfwonly = AttrVal($name,"showNewFWOnly","yes");;;;\
  if (ReadingsVal($name,"UNMATCHED_READINGS","?") eq "") {\
    my @eq3FwList = map { \
sprintf(ReadingsVal($name,"hmfw-type-".$_,"?").":".ReadingsVal($name,"hmfw-version-".$_,"?").":".$_);;;;\
} ReadingsVal($name,"MATCHED_READINGS","?")=~ m/hmfw-version-(\d\d)/g;;;;\
\
foreach my $dev (devspec2array("TYPE=CUL_HM:FILTER=DEF=......:FILTER=subType!=(virtual|)")) {\
      my $md = AttrVal($dev,"model","?");;;;\
      my $v = AttrVal($dev,"firmware","0.0");;;;\
      my ($h,$l) = split('\.',$v);;;;\
      foreach my $newFW (grep m/^${md}:/i,@eq3FwList) {\
my ($fwmd, $fwv, $idx) = $newFW =~ m/([^:]+):(\d+[.]\d+[.]\d+):(\d+)$/;;;;\
my ($fwh, $fwl) = split('\.',$fwv);;;;\
if(($newfwonly eq "no") || (($fwh > $h) || (($fwh == $h) && ($fwl > $l)))) {\
          $ret .= "," if($ret ne "");;;;\
  $ret .= $dev." (".$md." (".$idx.") ofw_".$v." => nfw_".$fwv.")";;;;\
        }\
      }\
    }\
  } else {\
    $ret = "error => no or wrong data from eq3-server!";;;;\
  }\
  return ($ret eq "")?"no fw-updates needed!":$ret;;;;\
}
attr hm_fw_check webCmd reread
Ich habe ein userAttr showNewFWOnly eingepflegt, default ist yes. Setzt man dies auf no werden immer alle gefundenen firmware-versionen angezeigt - ansonsten -im default- werden nur neue Versionen angezeigt, wenn es auch welche gibt.
Ein Datum oder Changelog lassen sich so nicht extrahieren - die Daten liegen nicht vor.

Bitte mal testen, wenn es keine Probleme gibt könnte das als Template eingepflegt werden.

EDIT 2020-02-03: Beta-User hat es in die httpmod.templates übernommen

Der Code als rawDefinition funktioniert!!

DANKE!!

EDIT 2020-02-03: Beta-User hat es in die httpmod.templates übernommen

Allerdings habe ich vorher mal mit den Templates "rumgespielt", da wollte keines...

Bei einem kam ein Fehler (V2 / auch nach mehrfachem reread) und bei dem anderen kam: no Updates...

Oder ist es kein httpmod-Template!?
Dann weiß ich nicht wo wie suchen/einrichten...

Gruß, Joachim

[yersinia]

Bei einem kam ein Fehler (V2 / auch nach mehrfachem reread) und bei dem anderen kam: no Updates...
Oder ist es kein httpmod-Template!?

Ja, raw funktioniert es, das httpmod.template funktionierte allerdings nicht; dies ist aber seit gestern gefixt und seit heute morgen im Update.
Der Code ist ansonsten identisch.

[MadMax-FHEM]

Ja, raw funktioniert es, das httpmod.template funktionierte allerdings nicht; dies ist aber seit gestern gefixt und seit heute morgen im Update.
Der Code ist ansonsten identisch.

Mist, habe gestern extra ein update gemacht

Tja, dann halt nochmal...

Danke, Joachim

[Burny4600]

Danke Pfriemler für den Tipp.

Ich habe den bestehenden Code angepasst und jetzt funktioniert dies mit dem neuen Link:

Code Auswählen Erweitern

defmod hm_fw_check HTTPMOD https://update.homematic.com/firmware/api/firmware/search/DEVICE 86400
attr hm_fw_check userattr reading01AutoNumLen reading01Name reading01RegOpt reading01Regex reading02AutoNumLen reading02Name reading02RegOpt reading02Regex readingMaxAge readingMaxAgeReplacementMode:text,reading,internal,expression,delete showNewFWOnly:yes,no
attr hm_fw_check enableControlSet 1
attr hm_fw_check icon hm_ccu
attr hm_fw_check reading01AutoNumLen 2
attr hm_fw_check reading01Name hmfw-type
attr hm_fw_check reading01RegOpt g
attr hm_fw_check reading01Regex (?i)"type":"((?:\w+[-]*){1,})
attr hm_fw_check reading02AutoNumLen 2
attr hm_fw_check reading02Name hmfw-version
attr hm_fw_check reading02RegOpt g
attr hm_fw_check reading02Regex (?si)"version":"(\d+[.]\d+[.]\d+)
attr hm_fw_check readingMaxAge 10
attr hm_fw_check readingMaxAgeReplacementMode delete
attr hm_fw_check room fw-checks
attr hm_fw_check showError 1
attr hm_fw_check showMatched 1
attr hm_fw_check showNewFWOnly yes
attr hm_fw_check stateFormat {   my $ret ="";;;;\
    my $lastCheck = ReadingsTimestamp($name,"MATCHED_READINGS","???");;;;\
    $ret .= '<div style="text-align:left">';;;;\
    $ret .= 'last <a title="eq3-downloads" href="http://www.eq-3.de/service/downloads.html">homematic</a>-fw-check => '.$lastCheck;;;;\
    $ret .= '<br><br><pre>';;;;\
    $ret .= "| device                         | model                   | cur_fw | new_fw |<br>";;;;\
    $ret .= "------------------------------------------------------------------------------<br>";;;;\
    my $check = ReadingsVal($name,"newFwForDevices","error => no or wrong data from eq3-server!");;;;\
    if($check eq "no fw-updates needed!") {\
      $ret .= '| <b style="color:green">';;;;\
      $ret .= sprintf("%-74s",$check);;;;\
      $ret .= '</b> |';;;;\
    } elsif($check eq "error => no or wrong data from eq3-server!") {\
      $ret .= '| <b style="color:red">';;;;\
      $ret .= sprintf("%-74s",$check);;;;\
      $ret .= '</b> |';;;;\
    } else {\
      my @devices = split(',',$check);;;;\
      foreach my $devStr (@devices) {\
        my ($dev,$md,$idx,$ofw,$nfw) = $devStr =~ m/([^\s]+)\s[(]([^\s]+)\s[(](\d+)[)]\sofw_([\d\.]+)\s=>\snfw_([\d\.]+)/;;;;\
        my $fw_link = "https://ccu3-update.homematic.com/firmware/download?cmd=download&serial=0&product=".$md;;;;\
        $ret .= '| <a href="/fhem?detail='.$dev.'" target="_blank"><b>';;;;\
        $ret .= sprintf("%-30s",$dev);;;;\
        $ret .= '</b></a> | ';;;;\
        $ret .= '<b'.(($md eq "?")?' title="missing attribute model => set device in teach mode to receive missing data" style="color:yellow;;"':' style="color:lightgray;;"').'>';;;;\
        $ret .= sprintf("%-23s",$md);;;;\
        $ret .= '</b> | ';;;;\
        $ret .= '<b'.(($ofw eq "0.0")?' title="missing attribute firmware => set device in teach mode to receive missing data" style="color:yellow"':' style="color:lightgray;;"').'>';;;;\
        $ret .= sprintf("%6s",$ofw);;;;\
        $ret .= '</b> | ';;;;\
        $ret .= '<a title="download firmware file" href="'.$fw_link.'" target="_blank"><b style="color:red;;">';;;;\
        $ret .= sprintf("%6s",$nfw);;;;\
        $ret .= '</b></a> | ';;;;\
        $ret .= "<br />";;;;\
      }\
    }\
    $ret .= '</pre></div>';;;;\
  return $ret;;;;\
}
attr hm_fw_check userReadings newFwForDevices:MATCHED_READINGS.* {\
  my $ret = "";;;;\
  my $newfwonly = AttrVal($name,"showNewFWOnly","yes");;;;\
  if (ReadingsVal($name,"UNMATCHED_READINGS","?") eq "") {\
    my @eq3FwList = map { \
sprintf(ReadingsVal($name,"hmfw-type-".$_,"?").":".ReadingsVal($name,"hmfw-version-".$_,"?").":".$_);;;;\
} ReadingsVal($name,"MATCHED_READINGS","?")=~ m/hmfw-version-(\d\d)/g;;;;\
\
foreach my $dev (devspec2array("TYPE=CUL_HM:FILTER=DEF=......:FILTER=subType!=(virtual|)")) {\
      my $md = AttrVal($dev,"model","?");;;;\
      my $v = AttrVal($dev,"firmware","0.0");;;;\
      my ($h,$l) = split('\.',$v);;;;\
      foreach my $newFW (grep m/^${md}:/i,@eq3FwList) {\
my ($fwmd, $fwv, $idx) = $newFW =~ m/([^:]+):(\d+[.]\d+[.]\d+):(\d+)$/;;;;\
my ($fwh, $fwl) = split('\.',$fwv);;;;\
if(($newfwonly eq "no") || (($fwh > $h) || (($fwh == $h) && ($fwl > $l)))) {\
          $ret .= "," if($ret ne "");;;;\
  $ret .= $dev." (".$md." (".$idx.") ofw_".$v." => nfw_".$fwv.")";;;;\
        }\
      }\
    }\
  } else {\
    $ret = "error => no or wrong data from eq3-server!";;;;\
  }\
  return ($ret eq "")?"no fw-updates needed!":$ret;;;;\
}
attr hm_fw_check webCmd reread
Ich habe ein userAttr showNewFWOnly eingepflegt, default ist yes. Setzt man dies auf no werden immer alle gefundenen firmware-versionen angezeigt - ansonsten -im default- werden nur neue Versionen angezeigt, wenn es auch welche gibt.
Ein Datum oder Changelog lassen sich so nicht extrahieren - die Daten liegen nicht vor.

Bitte mal testen, wenn es keine Probleme gibt könnte das als Template eingepflegt werden.

EDIT 2020-02-03: Beta-User hat es in die httpmod.templates übernommen

Da muß noch etwas korrigiert werden.
Wenn ich das Attribut showNewFWOnly yes definiere, dürften eigentlich nur die angezeigt werden für die ein neues Update vorhanden ist.
Ich vermute das der Bezug auf den Vergleichswert zwischen alter und neuer Firmware nicht passt.
Geräte Firmware ist zweistelllig. Abgerufene eQ3 Firmware ist aber dreistellig.

[Beta-User]

STATE wird erst aktualisiert, wenn es Änderungen der Readings gibt => reread nach Änderung des Attributs ausführen. Bei mir scheint das zu passen...

[Burny4600]

Ich habe es nochmals ausgeführt. Änderung nach dem dritten reread.
Jetzt passt es wieder!?

[yersinia]

Wenn ich das Attribut showNewFWOnly yes definiere, dürften eigentlich nur die angezeigt werden für die ein neues Update vorhanden ist.
Ich vermute das der Bezug auf den Vergleichswert zwischen alter und neuer Firmware nicht passt.
Geräte Firmware ist zweistelllig. Abgerufene eQ3 Firmware ist aber dreistellig.

Die HM devices liefern nur zweistelligen (a.b) Firmware code, die eq3 Webseite aber dreistelligen (a.b.c). Es ist dadurch natürlich unscharf. Das Attribut showNewFWOnly no gibt einem die Möglichkeit, alle gefundenen firmware-Versionen zu den eigenen HM-Devices anzuzeigen, auch wenn nach Vergleichoperation keine neue Version vorhanden wäre.

Das Reread und Aktualisierung des STATES kann schon etwas dauern.

[Burny4600]

@yersinia

Das Reread und Aktualisierung des STATES kann schon etwas dauern.

Beim erstenmal dauert es sehr lange. Vieles muß erst eingelesen werden. Bei darauffolgenden Rereads geht es schneller.
Ich war da ein wenig zu schnell.

Was mir auffällt ist das es viele Geräte gibt die bei mir überhaupt nicht angezeigt werden.
Heißt das, dass nur Geräte angezeigt werden die auch eine Firmware Online angeboten bekommen?

[yersinia]

Was mir auffällt ist das es viele Geräte gibt die bei mir überhaupt nicht angezeigt werden.
Heißt das, dass nur Geräte angezeigt werden die auch eine Firmware Online angeboten bekommen?

Jaein.
eq3 liefert für sehr viele HM Devices die fw Version (siehe auch Post #148), die Versionsprüfung beschränkt sich aber nur auf solche HM-Devices, die deinem FHEM bekannt sind. Dieses List entspricht dem Scope vom fw-check:

Code Auswählen Erweitern

list TYPE=CUL_HM:FILTER=DEF=......:FILTER=subType!=(virtual|)
Hat dein FHEM kein Device aus der Quelle, gibt es keinen Eintrag.
Sollte es ein Device in FHEM geben, dass nicht in der Quelle gelistet ist, gibt es keinen Eintrag.
Sollte die Versionsnummer gleich sein, gibt es keinen Eintrag (außer showNewFWOnly ist auf no gesetzt).

[Burny4600]

Danke für die Infos.

[mar3d@RPi3]

Klasse, das funktioniert wieder, DANKE!
Ich wollte mir nun ein DOIF basteln, mit dem die FW-Datei nach ./Download heruntergeladen wird aber wenn ich die FW-Datei aus dem Link mit FHEM herunterladen möchte, bekomme ich immer "Bad Request" obwohl es im Browser funktioniert.
Hat jemand bitte einen Tip für mich?

[Otto123]

Ja, zeig mal Dein DOIF