Hallo,
Fehler kommt doch wieder.
" Error HMXML_setTCMode() Device is not of Type HM-CC-TC"
Meine Wandtermometer haben den Typ HM-TC-IT-WM-W-EU.
In der „HMXML.inc.php“ steht zwar Erweitert
Gruß
Oliver
Hi Oliver,
leider kann ich Dir nicht wirklich helfen. Ich habe basierend auf den Heizungs-Scripten meine eigene Implementierung umgesetzt.
Die ist kurz vor Vollendung und wird gerade von mir und @Marc getestet.
Obwohl ich nur HmIP-WTH-2, HmIP-eTRV, HmIP-eTRV und HM-CC-TV+HM-CC-VD besitze, habe ich die Abfrage für HM-TC-IT-WM-W-EU mit aufgenommen 
Kann sie aber selber nicht testen.
Schau Dir mal mein Post oben #542 an, wenn es das ist was Du haben möchtest dann kann ich Dir mein Script auch mal zum testen schicken.
ALLES AUF EIGENE GEFAHR!
Gruß Heiko
Die hm tc it wm w eu funktionieren völlig normal und das schon seit Jahren. Ich würde mal die Config checken.
Gesendet von iPhone XS mit Tapatalk
Hallo Heiko,
würde ich gerne testen.
Gruß
Oliver
Hi Oliver,
die Beta ist gerade raus an Marc. Schick mir doch eine PN mit ner Mailadresse - hier gehen keine Anhänge.
Wenn alles funktioniert und die Doku fertig ist poste ich es auch hier ins Forum.
Gruß Heiko
Hallo zusammen,
über Weihnachten hatte ich versucht die vorhandenen Scripte bei mir zu installieren, aber irgendwie wollte das alles nicht so wie ich und überhaupt …
Habe dann damit rumgespielt und gemerkt das es auch funktioniert mit den neuen WHT-2 und eTRV-2 Geräten und so fing das dann an …
Michael (@Nall-chan) wird sicher mit den Augen rollen, aber es ist wieder ein einzelnes Script geworden, wo die Variablen unterhalb des Scriptes liegen 
Ich habe versucht soviel wie nötig zu dokumentieren. Danke auch an @Marc der mir auf dem letzten Meter geholfen hat beim Testen und entsprechendes Feedback gegeben hat.
Trotzdem der HINWEIS - NUTZUNG AUF EIGENE GEFAHR!!
<?
################################################################################
# Scriptbezeichnung: HomeMatic.TempSchedule.ips.php
# Version: 1.1.20190222
# Author: Heiko Wilknitz (@Pitti)
# Basierend auf Zapp (2011) for the IPS Community
# Erweitert von Swifty (Heizungs_Scripte v 0.1 - 15.02.2014)
#
# Auslese, Modifizieren und Speichern von Temperatur-Wochenplan
# von HomeMatic(IP)-Themostaten.
#
# !!! KEINE ÜBERNAHME VON GARANTIEN - NUTZUNG AUF EIGENE GEFAHR !!!
#
# ------------------------------ Installation ----------------------------------
#
# Dieses Skript richtet automatisch alle nötigen Objekte bei manueller
# Ausführung ein. Eine weitere manuelle Ausführung setzt alle benötigten Objekte
# wieder auf den Ausgangszustand.
#
# - Neues Skript erstellen
# - Diesen PHP-Code hineinkopieren
# - Abschnitt 'Konfiguration' den eigenen Gegebenheiten anpassen
# - Skript Abspeichern
# - Skript Ausführen
# - Visualisierung per Link auf entstandene Variablen erstellen
#
# ------------------------------ Visualisierung --------------------------------
#
# Kann natürlich jeder machen wie er möchte, hier ein schematischer Vorschlag
# wie man vorgehen könnte:
#
# Zweischpaltiges Splitpane Layout (Vertikal 50:50)
#
# LINKE SEITE RECHTE SEITE
# 1. Link auf "Zimmer" Dummy Modul "Profil editieren"
# 2. Link auf "Wochenprogramm" 1. Link auf "Tag"
# 3. Link auf "Profil" 2. Link auf "Zeitabschnitt"
# 4. Link auf "Wochenprofil" 3. Link auf "Zeit"
# 5. Link auf "Tagesprofil" 4. Link auf "Temperatur"
# 5. Link auf "Abschnitt"
# Dummy Modul "Tagesprofil kopieren"
# 1. Link auf "Tagesauswahl"
# 2.Link auf "Kopieren"
# Dummy Modul "Wochenprofil übertragen"
# 1. Link auf "Zimmerauswahl"
# 2. Link auf "Programmauswahl"
# 1. Link auf "Übertragen"
#
# ------------------------------ Changelog -------------------------------------
#
# 02.01.2019 - Initalversion (v1.0)
# 22.02.2019 - Bugfixes, mehr Doku(Hinweise) und Speichern ermöglicht (v1.1)
#
# ------------------------------ Konfiguration ---------------------------------
#
# RPC clients
$client = array();
#
# Service IP (CCUx)
$ip = 'xxx.xxx.xxx.xxx';
#
# Nach dem Übertragen eines Profils an die Geräte wird eine Meldung ausgegeben.
# Soll dafür WFC_SendNotification verwendet werden dann bitte die notwendige
# WebFront-ID hinterlegen, ansonsten erfolgt eine nicht ganz so schöne
# Echo-Ausgabe, welche leider die Überschrift "Fehler" hat :(
$wfc = 0;
#
# BidCos Service Port (true = vorhanden & aktiv)
$service = array(
array('ID' => 0, 'TYPE' =>'RF', 'PORT' =>2001, 'ACTIVE' => true), // HM
array('ID' => 1, 'TYPE' =>'IP', 'PORT' =>2010, 'ACTIVE' => true), // HM IP
array('ID' => 2, 'TYPE' =>'WD', 'PORT' =>2000, 'ACTIVE' => false) // Wired
);
#
# Räume (siehe nachfolgende Elementbelegung)
# (0) Logische Id (einfach von 0 durchnummerieren, oder eigene Logik verwenden)
# (1) Name des Raumes
# (2) Icon (sollte leer bleiben)
# (3) Farbe (RGB-Wert, default -1)
# (4) Wandthermostat-ID (oder auch direkt ein Heizkörperthermostat möglich)
# (5) 1.Heizkörperthermostat-ID [mit Wandtherostat gekoppelt] - optional
# (6) 2.Heizkörperthermostat-ID [mit Wandtherostat gekoppelt] - optional
# (+) x.Heizkörperthermostat-ID [mit Wandtherostat gekoppelt] - optional
#
# HINWEIS IDs:
# HmIP-WTH-2 - Kanal:1 - HEATING_CLIMATECONTROL_TRANSCEIVER
# HmIP-eTRV - Kanal:1 - HEATING_CLIMATECONTROL_TRANSCEIVER
# HmIP-eTRV-2 - Kanal:1 - HEATING_CLIMATECONTROL_TRANSCEIVER
# HM-CC-TC - Kanal:2 - CLIMATECONTROL_REGULATOR
# HM-TC-IT-WM-W-EU - Kanal 2 - THERMALCONTROL_TRANSMIT (ungetestet!!!)
#
$room = array (
array(12, '1 - KG: Hoppyraum', '', -1, 50660 /*[Systeme\Homematic\Thermostat\000A98A9A4E0C6 (HmIP-WTH-2)\000A98A9A4E0C6:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/, 26857 /*[Systeme\Homematic\Stellantrieb\000A18A994402D (HmIP-eTRV-2)\000A18A994402D:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/),
array(21, '2 - EG: Küche', '', -1, 21113 /*[Systeme\Homematic\Thermostat\000A98A9A4E0BE (HmIP-WTH-2)\000A98A9A4E0BE:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/, 23635 /*[Systeme\Homematic\Stellantrieb\000A18A9943FD9 (HmIP-eTRV-2)\000A18A9943FD9:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/, 11542 /*[Systeme\Homematic\Stellantrieb\000A18A994405C (HmIP-eTRV-2)\000A18A994405C:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/),
array(22, '2 - EG: Wohnen', '', -1, 23498 /*[Systeme\Homematic\Thermostat\000A98A9A4E10D (HmIP-WTH-2)\000A98A9A4E10D:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/, 58916 /*[Systeme\Homematic\Stellantrieb\000A18A9944035 (HmIP-eTRV-2)\000A18A9944035:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/),
array(31, '3 - OG: Bad', '', -1, 56832 /*[Systeme\Homematic\Thermostat\000A98A9A4E0F5 (HmIP-WTH-2)\000A98A9A4E0F5:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/, 33650 /*[Systeme\Homematic\Stellantrieb\000A18A9944068 (HmIP-eTRV-2)\000A18A9944068:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/),
array(32, '3 - OG: Luise', '', -1, 20199 /*[Systeme\Homematic\Thermostat\000A98A9A4E110 (HmIP-WTH-2)\000A98A9A4E110:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/, 11234 /*[Systeme\Homematic\Stellantrieb\000A18A9944066 (HmIP-eTRV-2)\000A18A9944066:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/),
array(33, '3 - OG: Pia', '', -1, 55797 /*[Systeme\Homematic\Thermostat\000A98A9A4E096 (HmIP-WTH-2)\000A98A9A4E096:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/, 56530 /*[Systeme\Homematic\Stellantrieb\000A18A9943FDB (HmIP-eTRV-2)\000A18A9943FDB:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/),
array(34, '3 - OG: Schlafen', '', -1, 30734 /*[Systeme\Homematic\Thermostat\000A98A9A4E0F7 (HmIP-WTH-2)\000A98A9A4E0F7:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/, 43879 /*[Systeme\Homematic\Stellantrieb\000393C98D1395 (HmIP-eTRV)\000393C98D1395:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/, 52032 /*[Systeme\Homematic\Stellantrieb\000393C98D1380 (HmIP-eTRV)\000393C98D1380:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/),
array(41, '4 - DG: Studio', '', -1, 20652 /*[Systeme\Homematic\Thermostat\000A9709A0D78D (HmIP-WTH-2)\000A9709A0D78D:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/, 52057 /*[Systeme\Homematic\Stellantrieb\000393C98D1313 (HmIP-eTRV)\000393C98D1313:1 - HEATING_CLIMATECONTROL_TRANSCEIVER]*/),
array(42, '4 - DG: Bad', '', -1, 40693 /*[Systeme\Homematic\Thermostat\JEQ0194704 (HM-CC-TC)\JEQ0194704:2 - CLIMATECONTROL_REGULATOR]*/)
);
#
$program = array (
array(1, 'Arbeitswoche', '', 255), // oder Normal
array(2, 'Zuhause', '', 255), // oder Frei
array(3, 'Aus', '', 255) // oder Abwesend
);
# Auslesen/Speichern Profil
$readwrite = array(
array(0, 'Auslesen', '', 32768),
array(1, 'Speichern', '', 16711680)
);
# Kopieren Profil
$copy = array(
array(0, ">", "", -1),
array(1, "Kopieren", "", 0x008000),
);
# Übertragen Profil
$move = array(
array(0, ">", "", -1),
array(1, "Übertragen", "", 0x008000),
);
#
$day = array(
array(0, 'Mo', '', -1),
array(1, 'Di', '', -1),
array(2, 'Mi', '', -1),
array(3, 'Do', '', -1),
array(4, 'Fr', '', -1),
array(5, 'Sa', '', -1),
array(6, 'So', '', -1)
);
#
$time = array(
array(1, '-1 h', '', 65280),
array(2, '-10 min', '', 65280),
array(3, '+10 min', '', 16744448),
array(4, '+1 h', '', 16744448)
);
#
$temperature = array(
array(1, '-1 °C', '', 3368703),
array(2, '-0,5 °C', '', 3368703),
array(3, '+0,5 °C', '', 16711680),
array(4, '+1 °C', '', 16711680)
);
#
$slot = array(
array(1, 'Löschen', '', 16764057),
array(2, 'Anfügen', '', 13434828)
);
#
$weekday = array("MONDAY","TUESDAY","WEDNESDAY","THURSDAY","FRIDAY","SATURDAY","SUNDAY");
#
################################################################################
# HINWEIS: Ich arbeite mit einer alten Version der Xml-RPC API Datei,
# welche ich extra patchen musste damit alles funktioniert.
# Wer das nicht möchte kann auch die Version 4.3.0 installieren!
# DANN die nachfolgende Zeile durch ...
# require "phpxmlrpc-4.3.0/lib/xmlrpc.inc"; oder so ersetzen!!!
require "__xmlrpc.inc.php" ;
################################################################################
//Init XMLRPC clients
Init();
// wichtig, da sonst am Tag der Zeitumstellung WZ/SZ Konflikte auftreten.
date_default_timezone_set('UTC');
// INSTALLATION
if ($_IPS['SENDER']=='Execute') {
$pos = 0;
// Zimmer
$vpn = "HM.Heating.Room";
$vid = CreateVariableByName($_IPS['SELF'], "Zimmer", 1);
CreateProfileInteger($vpn, 'HouseRemote', '', '', 0, 0, 0, 0, $room);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
// Wochenprogramm
$vpn = "HM.Heating.Program";
$vid = CreateVariableByName($_IPS['SELF'], "Wochenprogramm", 1);
CreateProfileInteger($vpn, 'Temperature', '', '', 0, 0, 0, 0, $program);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
SetValue($vid, 1);
// Auslese/Speichern Button
$vpn = "HM.Heating.ReadWrite";
$vid = CreateVariableByName($_IPS['SELF'], "Profil", 1);
CreateProfileInteger($vpn, 'Script', '', '', 0, 0, 0, 0, $readwrite);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
SetValue($vid, 0);
// Wochen(Temperatur)profil
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprofil', 3);
IPS_SetIcon($vid, "Calendar");
IPS_SetVariableCustomProfile($vid, '~HTMLBox');
IPS_SetPosition($vid, $pos++);
// Tages(Temperatur)profil
$vid = CreateVariableByName($_IPS['SELF'], 'Tagesprofil', 3);
IPS_SetIcon($vid, "Clock");
IPS_SetVariableCustomProfile($vid, '~HTMLBox');
IPS_SetPosition($vid, $pos++);
// Tagesauswahl
$vpn = "HM.Heating.Day";
$vid = CreateVariableByName($_IPS['SELF'], "Tag", 1);
CreateProfileInteger($vpn, 'Calendar', '', '', 0, 0, 0, 0, $day);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
// Zeitabschnitt auswählen
$vpn = "HM.Heating.Slot";
$vid = CreateVariableByName($_IPS['SELF'], "Zeitabschnitt", 1);
CreateProfileInteger($vpn, 'Database', '', '. Zeitabschnitt', 1, 3, 1, 0);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
// Zeit editieren
$vpn = "HM.Heating.Time";
$vid = CreateVariableByName($_IPS['SELF'], "Zeit", 1);
CreateProfileInteger($vpn, 'Clock', '', '', 0, 0, 0, 0, $time);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
// Temperatur editieren
$vpn = "HM.Heating.Temperature";
$vid = CreateVariableByName($_IPS['SELF'], "Temperatur", 1);
CreateProfileInteger($vpn, 'Temperature', '', '', 0, 0, 0, 0, $temperature);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
// Abschnitt editieren
$vpn = "HM.Heating.Edit";
$vid = CreateVariableByName($_IPS['SELF'], "Abschnitt", 1);
CreateProfileInteger($vpn, 'Edit', '', '', 0, 0, 0, 0, $slot);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
// Tagesauswahl kopieren
$vpn = "HM.Heating.Day";
$vid = CreateVariableByName($_IPS['SELF'], "Tagesauswahl", 1);
CreateProfileInteger($vpn, 'Calendar', '', '', 0, 0, 0, 0, $day);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
// Kopieren
$vpn = "HM.Heating.Copy";
$vid = CreateVariableByName($_IPS['SELF'], "Kopieren", 1);
CreateProfileInteger($vpn, 'Script', '', '', 0, 0, 0, 0, $copy);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
SetValue($vid, 0);
// Zimmerauswahl
$vpn = "HM.Heating.Room";
$vid = CreateVariableByName($_IPS['SELF'], "Zimmerauswahl", 1);
CreateProfileInteger($vpn, 'HouseRemote', '', '', 0, 0, 0, 0, $room);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
// Programmauswahl
$vpn = "HM.Heating.Program";
$vid = CreateVariableByName($_IPS['SELF'], "Programmauswahl", 1);
CreateProfileInteger($vpn, 'Temperature', '', '', 0, 0, 0, 0, $program);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
SetValue($vid, 1);
// Übertragen
$vpn = "HM.Heating.Move";
$vid = CreateVariableByName($_IPS['SELF'], "Übertragen", 1);
CreateProfileInteger($vpn, 'Script', '', '', 0, 0, 0, 0, $move);
IPS_SetVariableCustomProfile($vid, $vpn);
IPS_SetVariableCustomAction($vid, $_IPS['SELF']);
IPS_SetPosition($vid, $pos++);
SetValue($vid, 0);
// Profile Cache
$vid = CreateVariableByName($_IPS['SELF'], "Profiles", 3);
IPS_SetHidden($vid, true);
IPS_SetPosition($vid, -1);
// Types Cache
$vid = CreateVariableByName($_IPS['SELF'], "Types", 3);
IPS_SetHidden($vid, true);
IPS_SetPosition($vid, -1);
}
// AKTION VIA WEBFRONT
else if($_IPS['SENDER'] == "WebFront") {
// Aktion
$name = IPS_GetName($_IPS['VARIABLE']);
// ZIMMER -------------------------------------------------------------------
if($name == 'Zimmer') {
// Welcher Raum?
$rn = $_IPS['VALUE'];
// Welches Wochenprogramm?
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprogramm', 1);
$wp = GetValue($vid);
// Welcher Tag?
$vid = CreateVariableByName($_IPS['SELF'], "Tag", 1);
$wd = GetValue($vid);
// Rendern
RenderProfile($rn, $wp, $wd);
}
// WOCHENPROGRANN -----------------------------------------------------------
if($name == 'Wochenprogramm') {
// Welches Zimmer?
$vid = CreateVariableByName($_IPS['SELF'], "Zimmer", 1);
$rn = GetValue($vid);
// Welches Wochenprogramm?
$wp = $_IPS['VALUE'];
// Welcher Tag?
$vid = CreateVariableByName($_IPS['SELF'], "Tag", 1);
$wd = GetValue($vid);
// Rendern
RenderProfile($rn, $wp, $wd);
}
// AUSLESEN/SPEICHERN -------------------------------------------------------
if( $name == 'Profil') {
// Welches Zimmer?
$vid = CreateVariableByName($_IPS['SELF'], "Zimmer", 1);
$rn = GetValue($vid);
// Welches Wochenprogramm?
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprogramm', 1);
$wp = GetValue($vid);
// Welcher Tag?
$vid = CreateVariableByName($_IPS['SELF'], "Tag", 1);
$wd = GetValue($vid);
// AUSLESEN
if($_IPS['VALUE'] == 0) {
// Temperatur Profil vom Gerät auslesen
foreach($room as $value) {
if($value[0] == $rn) {
$profile = ReadTempProfile($value[4], false);
SetWeeklyProfile($rn, $profile);
break;
}
}
// Rendern
RenderProfile($rn, $wp, $wd);
}
// SPEICHERN
if($_IPS['VALUE'] ==1) {
// Wochenprofil ermitteln
$profile = GetWeeklyProfile($rn, $wp);
// Teste Integrität der Tagesprofile
$check = CheckWeeklyProfile($profile);
if($check == "OK") {
foreach($room as $value) {
if($value[0] == $rn) {
// Profil zum Gerät übertragen
$count = count($value);
for($d = 4; $d < $count; $d++) {
//echo $value[$d].PHP_EOL;
$check = WriteTempProfile($value[$d], $profile, $wp);
// IPS_Sleep(2000);
}
}
}
if ($check == true) {
$check ="Speichern Erfolgreich";
}
}
// Erolgsmeldung?!
if($wfc != 0) {
WFC_SendNotification($wfc, 'HM Heizungsplan', $check, 'Information', 5);
}
else {
echo $check;
}
}
$_IPS['VALUE'] = 0;
}
// TAG ----------------------------------------------------------------------
if( $name == 'Tag') {
// Welches Zimmer?
$vid = CreateVariableByName($_IPS['SELF'], "Zimmer", 1);
$rn = GetValue($vid);
// Welches Wochenprogramm?
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprogramm', 1);
$wp = GetValue($vid);
// Welcher Tag?
$wd = $_IPS['VALUE'];
// Rendern
RenderProfile($rn, $wp, $wd);
}
// ZEITABSCHNITT ------------------------------------------------------------
if( $name == 'Zeitabschnitt') {
// Welches Zimmer?
$vid = CreateVariableByName($_IPS['SELF'], "Zimmer", 1);
$rn = GetValue($vid);
// Welches Wochenprogramm?
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprogramm', 1);
$wp = GetValue($vid);
// Welcher Tag?
$vid = CreateVariableByName($_IPS['SELF'], "Tag", 1);
$wd = GetValue($vid);
// Profil extrahieren
$profile = GetWeeklyProfile($rn, $wp);
$profile = GetDailyProfile($profile, $wd);
// Welcher Zeitabschnitt?
$ts = $_IPS['VALUE'];
// Render Tagesprofil
$vid = CreateVariableByName($_IPS['SELF'], 'Tagesprofil', 3);
SetValue($vid, RenderDailyProfile($profile, $ts));
}
// ZEIT EDITIEREN -----------------------------------------------------------
if($name == 'Zeit') {
// Welches Zimmer?
$vid = CreateVariableByName($_IPS['SELF'], "Zimmer", 1);
$rn = GetValue($vid);
// Welches Wochenprogramm?
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprogramm', 1);
$wp = GetValue($vid);
// Welcher Tag?
$vid = CreateVariableByName($_IPS['SELF'], "Tag", 1);
$wd = GetValue($vid);
// Welcher Zeitabschnitt?
$vid = CreateVariableByName($_IPS['SELF'], "Zeitabschnitt", 1);
$ts = GetValue($vid);
// Wochenprofil ermitteln
$profile = GetWeeklyProfile($rn, $wp);
// Tagesprofil ermitteln
$profile = GetDailyProfile($profile, $wd);
// Aktion nur für die ersten Zeitabschnitte
if($ts < count($profile['EndTimes'])) {
// Verhindert dass die Zeit des letzten Slots geändert wird (immer 24:00)
if($ts == 1) {
$start = "00:00";
}
else {
$start = $profile['EndTimes'][$ts-2];
}
$end = $profile['EndTimes'][$ts-1];
$next = $profile['EndTimes'][$ts];
// Welche Aktion?
switch($_IPS['VALUE']) {
case 1: // -1h
if((strtotime($end)-(60*60))> strtotime($start)) {
$end = date("H:i", (strtotime($end)-(60*60)));
}
$profile['EndTimes'][$ts-1] = $end;
break;
case 2: // -10min
if((strtotime($end)-(10*60))> strtotime($start)) {
$end = date("H:i", (strtotime($end)-(10*60)));
}
$profile['EndTimes'][$ts-1] = $end;
break;
case 3: // +10min
if((strtotime($end)+(10*60))< strtotime($next)) {
$end = date("H:i", (strtotime($end)+(10*60)));
}
$profile['EndTimes'][$ts-1] = $end;
break;
case 4: // +1h
if((strtotime($end)+(60*60))< strtotime($next)) {
$end = date("H:i", (strtotime($end)+(60*60)));
}
$profile['EndTimes'][$ts-1] = $end;
break;
}
// Schreiben
SetDailyProfile($rn, $wp, $wd, $profile);
// Rendern
RenderProfile($rn, $wp, $wd, $ts);
}
// Keine Auswahl
$_IPS['VALUE'] = 0;
}
// TEMPERATUR EDITIEREN -----------------------------------------------------
if($name == 'Temperatur') {
// Welches Zimmer?
$vid = CreateVariableByName($_IPS['SELF'], "Zimmer", 1);
$rn = GetValue($vid);
// Welches Wochenprogramm?
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprogramm', 1);
$wp = GetValue($vid);
// Welcher Tag?
$vid = CreateVariableByName($_IPS['SELF'], "Tag", 1);
$wd = GetValue($vid);
// Welcher Zeitabschnitt?
$vid = CreateVariableByName($_IPS['SELF'], "Zeitabschnitt", 1);
$ts = GetValue($vid);
// Wochenprofil ermitteln
$profile = GetWeeklyProfile($rn, $wp);
// Tagesprofil ermitteln
$profile = GetDailyProfile($profile, $wd);
// Welche Temperatur?
$temperatur = $profile['Values'][$ts-1];
// Welche Aktion?
switch($_IPS['VALUE']) {
case 1: // -1°C
if(($temperatur-1) >= 4.99) {
$temperatur = $temperatur-1;
$profile['Values'][$ts-1] = $temperatur;
}
break;
case 2: // -0.5°C
if(($temperatur-0.5) > 4.9) {
$temperatur = $temperatur-0.5;
$profile['Values'][$ts-1] = $temperatur;
}
break;
case 3: // +0.5°C
if(($temperatur+0.5) < 30.1) {
$temperatur = $temperatur+0.5;
$profile['Values'][$ts-1] = $temperatur;
}
break;
case 4: // +1°C
if(($temperatur+1) <= 30.01) {
$temperatur = $temperatur+1;
$profile['Values'][$ts-1] = $temperatur;
}
break;
}
// Schreiben
SetDailyProfile($rn, $wp, $wd, $profile);
// Rendern
RenderProfile($rn, $wp, $wd, $ts);
// Keine Auswahl
$_IPS['VALUE'] = 0;
}
// ABSCHNITT EDITIEREN ------------------------------------------------------
if( $name == 'Abschnitt') {
// Welches Zimmer?
$vid = CreateVariableByName($_IPS['SELF'], "Zimmer", 1);
$rn = GetValue($vid);
// Welches Wochenprogramm?
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprogramm', 1);
$wp = GetValue($vid);
// Welcher Tag?
$vid = CreateVariableByName($_IPS['SELF'], "Tag", 1);
$wd = GetValue($vid);
// Welcher Zeitabschnitt?
$vid = CreateVariableByName($_IPS['SELF'], "Zeitabschnitt", 1);
$ts = GetValue($vid);
// Wochenprofil ermitteln
$profile = GetWeeklyProfile($rn, $wp);
// Tagesprofil ermitteln
$profile = GetDailyProfile($profile, $wd);
// Wieviel Zeitabschnitte?
$count = count($profile['EndTimes']);
// Welche Aktion?
switch($_IPS['VALUE']) {
case 1: // Löschen
// letzter TimeSlot darf nicht gelöscht werden
if ($count >1) {
array_splice($profile['EndTimes'], $ts-1, 1);
array_splice($profile['Values'], $ts-1, 1);
// letzten TimeSlot Ende immer 24:00
$profile['EndTimes'][$count-2]="24:00";
}
break;
case 2: // Anfügen
// max 13 TimeSlots zulässig (manche können auch 24, aber das sollte reichen)
If ($count <13)
{
array_splice($profile['EndTimes'], $count, 0, "24:00");
array_splice($profile['Values'], $count, 0, "17");
// minimaler TimeSlot ist 10 min
$profile['EndTimes'][$count-1]="23:50";
}
break;
}
// Wurde was geändert?
if($count <> count($profile['EndTimes'])) {
SetDailyProfile($rn, $wp, $wd, $profile);
// Rendern
RenderProfile($rn, $wp, $wd);
}
// Keine Auswahl
$_IPS['VALUE'] = 0;
}
// TAGESPROFIL KOPIEREN -----------------------------------------------------
if( $name == 'Kopieren') {
if($_IPS['VALUE'] ==1) {
// Welchem Zimmer?
$vid = CreateVariableByName($_IPS['SELF'], "Zimmer", 1);
$rn = GetValue($vid);
// Welches Wochenprogramm?
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprogramm', 1);
$wp = GetValue($vid);
// Von welcher Tag?
$vid = CreateVariableByName($_IPS['SELF'], "Tag", 1);
$wd = GetValue($vid);
// Nach Welchen Tag?
$vid = CreateVariableByName($_IPS['SELF'], "Tagesauswahl", 1);
$ta = GetValue($vid);
if($wd == $ta) {
echo ('Bitte anderen Tag auswählen!');
}
else {
// Wochenprofil ermitteln
$profile = GetWeeklyProfile($rn, $wp);
// Tagesprofil von
$profile = GetDailyProfile($profile, $wd);
// kopieren nach
SetDailyProfile($rn, $wp, $ta, $profile);
// Rendern
RenderProfile($rn, $wp, $wd);
}
}
$_IPS['VALUE'] = 0;
}
// WOCHENPROFIL ÜBERTRAGEN --------------------------------------------------
if( $name == 'Übertragen') {
if($_IPS['VALUE'] ==1) {
// Welchem Zimmer?
$vid = CreateVariableByName($_IPS['SELF'], "Zimmer", 1);
$rn = GetValue($vid);
// Welches Wochenprogramm?
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprogramm', 1);
$wp = GetValue($vid);
// Nach welchen Zimmer?
$vid = CreateVariableByName($_IPS['SELF'], "Zimmerauswahl", 1);
$za = GetValue($vid);
// Nach welchen Program?
$vid = CreateVariableByName($_IPS['SELF'], "Programmauswahl", 1);
$pa = GetValue($vid);
if(($rn == $za) and ($wp == $pa)) {
echo ('Auf sich selber zu übertragen macht keinen Sinn!');
}
else {
// Wochenprofil holen
$profile = GetWeeklyProfile($rn, $wp);
// Übertragen
SetWeeklyProfile($za, $profile, $pa);
}
}
$_IPS['VALUE'] = 0;
}
// DATENÜBERNAHME ------------------------------------------------------
SetValue($_IPS['VARIABLE'], $_IPS['VALUE']);
}
# ------------------------------ Funktionen ------------------------------------
// Erzeugt pro aktiven Interface ein Client.
function Init() {
global $ip, $service, $client;
# Return Code
$ret = true;
# Check all Services
foreach($service as $s) {
if($s['ACTIVE'] == true) {
if (!isset($client[$s['TYPE']]) || $client[$s['TYPE']] !== false) {
$client[$s['TYPE']] = new xmlrpc_client("http://".$ip.":".$s['PORT']);
if ($client[$s['TYPE']] !== false) {
$ret &= true;
}
else {
$ret = false;
}
}
}
}
// client existieren schon
return false;
}
// Liefert alle Geräte der aktierten Interfaces
function DevicesList()
{
global $service, $client;
// listDevices
$request = new xmlrpcmsg('listDevices');
// merge all together
$devices = array();
foreach($service as $s) {
if($s['ACTIVE'] == true) {
$ret = Send($request, $s['TYPE']);
foreach($ret as $device) {
$device['INTERFACE'] = $s['ID'];
$devices[] = $device;
}
//$devices = array_merge($devices, Send($request, $s['TYPE']));
}
}
return $devices;
}
// Ermittelt den Typ des HM Gerätes (HM terminology)
function DeviceType($device) {
// Cache auslesen
$cid = CreateVariableByName($_IPS['SELF'], "Types", 3);
$types = unserialize(GetValue($cid));
// HM Adresse vom Device
$address = explode(":", IPS_GetProperty($device, 'Address'));
$serial = $address[0];
$channel = $address[1];
// schon mal gelesen
if(!is_array($types) || array_key_exists($serial, $types) == false) {
$type = false;
$list = DevicesList();
foreach($list as $dev) {
if (strpos($dev['ADDRESS'], $serial) !== false) {
$type = $dev['TYPE'].':'.$dev['INTERFACE'];
$types[$serial] = $type;
SetValue($cid, serialize($types));
break; // We stop at the first one we find
}
}
}
else
{
$type=$types[$serial];
}
return $type;
}
// Liest das Temperaturprofil von einem Thermostat für den übergebenen Tag.
// $device: IPS Instance ID
// $day: Name des Tages in English (not case-sensitive) oder false für alle Tage
// $weekprofil: nur für HM-TC-IT-WM-W-EU & HmIP-WTH-2;
// gültige Werte 1,2,3; bei -1 werden alle Profile (1-3) zurückgegeben
function ReadTempProfile($device, $day = false, $weekprofil =-1) {
global $service, $weekday;
// HM Adresse vom Device
$address = explode(":", IPS_GetProperty($device, 'Address'));
$serial = $address[0];
$channel = $address[1];
$days = $weekday;
$temp = array();
if ($day != false) {
if(!in_array($day, $weekday)) die("Error: Unknown Day parameter in function ReadTempProfile!");
$days = array($day);
}
// Was für ein HM Gerätetyp & Interface
$dt = explode(":", DeviceType($device));
$type = $dt[0];
$if = $dt[1];
// Konvert Interface
foreach($service as $s) {
if($s['ID'] == $if) {
$if = $s['TYPE'];
break;
}
}
// HM-CC-TC Profil auslesen (hat nur eins)
if($type == "HM-CC-TC") {
$params = ReadParamSet($if, $serial, $channel);
foreach($days as $day) {
$thisEndTimes = array();
$thisValues = array();
$timePrevious = "00:00";
for($index = 1; $index <= 24; $index++) {
$keyTemp = "TEMPERATUR_".strtoupper($day)."_".$index;
$keyTO = "TIMEOUT_".strtoupper($day)."_".$index;
$thisTemp = $params[$keyTemp];
$thisTO = $params[$keyTO];
$thisTime = date('H:i', mktime(0, $thisTO)); // $timePassed + TO
if($thisTO >= 1440) $thisTime = "24:00";
$timePrevious = $thisTime;
array_push($thisEndTimes, $thisTime);
array_push($thisValues, $thisTemp);
if($thisTO >= 1440) break;
}
$temp["P1"][$day]['EndTimes'] = $thisEndTimes;
$temp["P1"][$day]['Values'] = $thisValues;
}
return $temp;
}
// HM-CC-RT-DN Profil auslesen (hat nur eins)
if($type == "HM-CC-RT-DN") {
$params = ReadParamSet($if, $serial, $channel);
foreach($days as $day) {
$thisEndTimes = array();
$thisValues = array();
$timePrevious = "00:00";
for($index = 1; $index <= 13; $index++) {
$keyTemp = "TEMPERATURE_".strtoupper($day)."_".$index;
$keyTO = "ENDTIME_".strtoupper($day)."_".$index;
$thisTemp = $params[$keyTemp];
$thisTO = $params[$keyTO];
$thisTime = date('H:i', mktime(0, $thisTO)); // $timePassed + TO
if($thisTO >= 1440) $thisTime = "24:00";
$timePrevious = $thisTime;
array_push($thisEndTimes, $thisTime);
array_push($thisValues, $thisTemp);
if($thisTO >= 1440) break;
}
$temp["P1"][$day]['EndTimes'] = $thisEndTimes;
$temp["P1"][$day]['Values'] = $thisValues;
}
return $temp;
}
// HM-TC-IT-WM-W-EU Profil auslesen (1-3)
if($type == "HM-TC-IT-WM-W-EU") {
$params = ReadParamSet($if, $serial, $channel);
// 3 Profile
for ($p=1; $p<=3; $p++) {
foreach($days as $day) {
$thisEndTimes = array();
$thisValues = array();
$timePrevious = "00:00";
for($index = 1; $index <= 13; $index++) {
$keyTemp = "P". $p ."_TEMPERATURE_".strtoupper($day)."_".$index;
$keyTO = "P". $p ."_ENDTIME_".strtoupper($day)."_".$index;
//* notwendig da Firmeware beim LAN-Adapter abweicht und beim Profil 1 dort das Präfix "P1_" fehlt.
if(array_key_exists($keyTemp, $params)) {
$thisTemp = $params[$keyTemp];
$thisTO = $params[$keyTO];
}
else {
$keyTemp = "TEMPERATURE_".strtoupper($day)."_".$index;
$keyTO = "ENDTIME_".strtoupper($day)."_".$index;
$thisTemp = $params[$keyTemp];
$thisTO = $params[$keyTO];
}
$thisTime = date('H:i', mktime(0, $thisTO)); // $timePassed + TO
if ($thisTO >= 1440) $thisTime = "24:00";
$timePrevious = $thisTime;
array_push($thisEndTimes, $thisTime);
array_push($thisValues, $thisTemp);
if($thisTO >= 1440) break;
}
$temp["P".$p][$day]['EndTimes'] = $thisEndTimes;
$temp["P".$p][$day]['Values'] = $thisValues;
}
}
if($weekprofil > 0 and $weekprofil <= 3) {
return $temp["P".$weekprofil];
}
else {
return $temp;
}
}
// HmIP-WTH-2 || HMIP-eTRV || HmIP-eTRV-2 Profil auslesen (1-3 von 6)
if($type == "HmIP-WTH-2" or $type =="HmIP-eTRV-2" or $type == "HMIP-eTRV") {
$params = ReadParamSet($if, $serial, $channel);
// 3 Profile
for ($p=1; $p<=3; $p++) {
foreach($days as $day) {
$thisEndTimes = array();
$thisValues = array();
$timePrevious = "00:00";
for($index = 1; $index <= 13; $index++) {
$keyTemp = "P". $p ."_TEMPERATURE_".strtoupper($day)."_".$index;
$keyTO = "P". $p ."_ENDTIME_".strtoupper($day)."_".$index;
$thisTemp = $params[$keyTemp];
$thisTO = $params[$keyTO];
$thisTime = date('H:i', mktime(0, $thisTO)); // $timePassed + TO
if ($thisTO >= 1440) $thisTime = "24:00";
$timePrevious = $thisTime;
array_push($thisEndTimes, $thisTime);
array_push($thisValues, $thisTemp);
if($thisTO >= 1440) break;
}
$temp["P".$p][$day]['EndTimes'] = $thisEndTimes;
$temp["P".$p][$day]['Values'] = $thisValues;
}
}
if($weekprofil > 0 and $weekprofil <= 3) {
return $temp["P".$weekprofil];
}
else {
return $temp;
}
}
echo $type;
if($type != "HM-CC-RT-DN" and $type != "HM-CC-TC" and $type != "HM-TC-IT-WM-W-EU" and $type != "HmIP-WTH-2" and $type != "HMIP-eTRV" and $type != "HmIP-eTRV-2") {
die("Error: ReadTempProfile() Device $device is not of Type HM-CC-TC,HM-CC-RT-DN, HM-TC-IT-WM-W-EU, HmIP-WTH-2, HMIP-eTRV or HmIP-eTRV-2!");
}
}
// Schreibt das Temperaturprofil in ein Thermostat/Stellantrieb.
// $device: IPS Instance ID
// $profile: Temperaturprofil wie von ReadTempProfile() geliefert
// $weekprofil: nur für HM-TC-IT-WM-W-EU & HmIP-WTH-2;
// gültige Werte 1,2,3; bei -1 werden alle Profile (1-3) zurückgegeben
function WriteTempProfile(int $device, array $profile, int $weekprofile=0) {
global $service, $weekday;
// HM Adresse vom Device
$address = explode(":", IPS_GetProperty($device, 'Address'));
$serial = $address[0];
$channel = $address[1];
// Was für ein HM Gerätetyp & Interface
$dt = explode(":", DeviceType($device));
$type = $dt[0];
$if = $dt[1];
// Konvert Interface
foreach($service as $s) {if($s['ID'] == $if) {$if = $s['TYPE'];break;}}
// HM-CC-TC Profil schreiben (hat nur eins)
if($type == "HM-CC-TC") {
$params = new xmlrpcval();
foreach($profile as $day => $values) {
$timePrevious = "00:00";
for($index=1; $index <= count($values['EndTimes']); $index++) {
$key = "TEMPERATUR_".strtoupper($day)."_".$index;
$temp = array($key => new xmlrpcval($values['Values'][$index-1], "double"));
$params->addStruct($temp);
$key = "TIMEOUT_".strtoupper($day)."_".$index;
if ($values['EndTimes'][$index-1] > $timePrevious) {
// Convert end time to Timeout
$thisDayStart = mktime(0, 0);
$timeEndArray = explode(":", $values['EndTimes'][$index-1]);
if ($timeEndArray[1] % 10) die("Error: Invalid End Time (must be 10mn increments) for $day at index $index in WriteTempProfile()!");
$timeEndts = mktime($timeEndArray[0], $timeEndArray[1]);
$timeout = (($timeEndts - $thisDayStart)/60); // TODO, works ?
$paramTime = array($key => new xmlrpcval("$timeout", "int")); // i4
$params->addStruct($paramTime);
}
else {
die("Error: Invalid End Time for $day at index $index in WriteTempProfile()!");
}
$timePrevious = $values['EndTimes'][$index-1];
}
}
$request = new xmlrpcmsg("putParamset",
array(new xmlrpcval("$serial:2", "string"),
new xmlrpcval("MASTER", "string"), $params));
$result = Send($request, $if);
return true;
}
// HM-CC-RT-DN Profil schreiben (hat nur eins)
if($type == "HM-CC-RT-DN") {
$params = new xmlrpcval();
foreach ($profile as $day => $values) {
$timePrevious = "00:00";
for($index=1; $index <= count($values['EndTimes']); $index++) {
$key = "TEMPERATURE_".strtoupper($day)."_".$index;
$temp = array($key => new xmlrpcval($values['Values'][$index-1], "double"));
$params->addStruct($temp);
$key = "ENDTIME_".strtoupper($day)."_".$index;
if ($index>13) break; // HM-CC-RT-DN hat nur 13 Tages - Timeslots
if ($values['EndTimes'][$index-1] > $timePrevious) {
// Convert end time to Timeout
$thisDayStart = mktime(0, 0);
$timeEndArray = explode(":", $values['EndTimes'][$index-1]);
if ($timeEndArray[1] % 10) die("Error: Invalid End Time (must be 10mn increments) for $day at index $index in WriteTempProfile()!");
$timeEndts = mktime($timeEndArray[0], $timeEndArray[1]);
$timeout = (($timeEndts - $thisDayStart)/60); // TODO, works ?
$paramTime = array($key => new xmlrpcval("$timeout", "int")); // i4
$params->addStruct($paramTime);
}
else {
die("Error: Invalid End Time for $day at index $index in WriteTempProfile()!");
}
$timePrevious = $values['EndTimes'][$index-1];
}
}
$request = new xmlrpcmsg("putParamset",
array(new xmlrpcval("$serial", "string"), // no channel NOT TESTED????
new xmlrpcval("MASTER", "string"), $params));
$result = Send($request, $if);
return true;
}
// HM-TC-IT-WM-W-EU Profil schreiben (1-3)
if ($type == "HM-TC-IT-WM-W-EU") {
$prefix="P".$weekprofile."_";
$params = new xmlrpcval();
foreach ($rofile as $day => $values) {
$timePrevious = "00:00";
for ($index=1; $index <= count($values['EndTimes']); $index++) {
$key = $prefix ."TEMPERATURE_".strtoupper($day)."_".$index;
$temp = array($key => new xmlrpcval($values['Values'][$index-1], "double"));
$params->addStruct($temp);
$key = $prefix ."ENDTIME_".strtoupper($day)."_".$index;
if ($index>13) break; // HM-TC-IT-WM-W-EU hat nur 13 Tages - Timeslots
if ($values['EndTimes'][$index-1] > $timePrevious) {
// Convert end time to Timeout
$thisDayStart = mktime(0, 0);
$timeEndArray = explode(":", $values['EndTimes'][$index-1]);
if ($timeEndArray[1] % 5) die("Error: Invalid End Time (must be 10mn increments) for $day at index $index in WriteTempProfile()!");
$timeEndts = mktime($timeEndArray[0], $timeEndArray[1]);
$timeout = (($timeEndts - $thisDayStart)/60); // TODO, works ?
$paramTime = array($key => new xmlrpcval("$timeout", "int")); // i4
$params->addStruct($paramTime);
}
else {
die("Error: Invalid End Time for $day at index $index in WriteTempProfile()!");
}
$timePrevious = $values['EndTimes'][$index-1];
}
}
$request = new xmlrpcmsg("putParamset",
array(new xmlrpcval("$serial", "string"), // no channel NOT TESTED????
new xmlrpcval("MASTER", "string"), $params));
$result = Send($request, $if);
return true;
}
// HmIP-WTH-2 || HMIP-eTRV || HmIP-eTRV-2 Profil schreiben (1-3 von 6)
if($type == "HmIP-WTH-2" or $type =="HmIP-eTRV-2" or $type == "HMIP-eTRV") {
$prefix="P".$weekprofile."_";
$params = new xmlrpcval();
foreach ($profile as $day => $values) {
$timePrevious = "00:00";
for ($index=1; $index <= count($values['EndTimes']); $index++) {
$key = $prefix ."TEMPERATURE_".strtoupper($day)."_".$index;
$temp = array($key => new xmlrpcval($values['Values'][$index-1], "double"));
$params->addStruct($temp);
$key = $prefix ."ENDTIME_".strtoupper($day)."_".$index;
if ($index>13) break; // nur 13 Tages - Timeslots
if ($values['EndTimes'][$index-1] > $timePrevious) {
// Convert end time to Timeout
$thisDayStart = mktime(0, 0);
$timeEndArray = explode(":", $values['EndTimes'][$index-1]);
if ($timeEndArray[1] % 5) die("Error: Invalid End Time (must be 10mn increments) for $day at index $index in HMXML_setTempProfile()<br>
");
$timeEndts = mktime($timeEndArray[0], $timeEndArray[1]);
$timeout = (($timeEndts - $thisDayStart)/60); // TODO, works ?
$paramTime = array($key => new xmlrpcval("$timeout", "int")); // i4
$params->addStruct($paramTime);
}
else {
die("Error: Invalid End Time for $day at index $index in WriteTempProfile()!");
}
$timePrevious = $values['EndTimes'][$index-1];
}
}
$request = new xmlrpcmsg("putParamset",
array(new xmlrpcval("$serial:$channel", "string"),
new xmlrpcval("MASTER", "string"), $params));
//var_dump($params);
$result = Send($request, $if);
return true;
}
if($type != "HM-CC-RT-DN" and $type != "HM-CC-TC" and $type != "HM-TC-IT-WM-W-EU" and $type != "HmIP-WTH-2" and $type != "HMIP-eTRV" and $type != "HmIP-eTRV-2") {
die("Error: WriteTempProfile() Device $device is not of Type HM-CC-TC,HM-CC-RT-DN, HM-TC-IT-WM-W-EU, HmIP-WTH-2, HMIP-eTRV or HmIP-eTRV-2!");
}
}
// Liest die Parameter von einem Gerät aus.
// $if: HM Inteface
// $adress: HM adress
// $channel: HM device chanvel
// $param: Ein spezifischer Parameter wird ausgelesen (siehe HomeMatic Specficiation),sonst alle
function ReadParamSet($if, $address, $channel, $param = false) {
// Build request
$request = new xmlrpcmsg("getParamset",
array(new xmlrpcval("$address:$channel", "string"), new xmlrpcval("MASTER", "string")));
$messages = Send($request, $if);
//var_dump($messages);
if ($param !== false) return $messages[$param];
return $messages;
}
// Creates XMLRPC Client Instance and sends request
function Send($request, $type)
{
global $client;
// If the client does not exist, initialise it here
if (isset($client[$type]) && $client[$type] !== false) {
$response = $client[$type]->send($request);
if ( $response->errno == 0 ) {
$messages = php_xmlrpc_decode($response->value());
}
else {
die("Error: Send() Request to $type Service failed -> $response->errstr!
");
}
}
return $messages;
}
// Erzeugt eine Variable unterhalb {id} mit dem Namen {name} vom Typ [type}
// Existiert die Variable schon wird diese zurückgeliefert.
// Types: 0 = Boolean, 1 = Integer, 2 = Float, 3 = String
function CreateVariableByName($id, $name, $type) {
$vid = @IPS_GetVariableIDByName($name, $id);
if($vid===false) {
$vid = IPS_CreateVariable($type);
IPS_SetParent($vid, $id);
IPS_SetName($vid, $name);
}
return $vid;
}
// Erzeugt ein Variablenprofil vom Typ {type} mit Name n{name}
function CreateProfile($name, $type) {
if(!IPS_VariableProfileExists($name)) {
IPS_CreateVariableProfile($name, $type);
}
else {
$profile = IPS_GetVariableProfile($name);
if($profile['ProfileType'] != $type)
throw new Exception("Variable profile type does not match for profile ".$name);
}
}
// Erzeugt ein Integer-Variablenprofil
function CreateProfileInteger($name, $icon, $prefix, $suffix, $minvalue, $maxvalue, $step, $digits, $asso = NULL) {
CreateProfile($name, 1);
IPS_SetVariableProfileIcon($name, $icon);
IPS_SetVariableProfileText($name, $prefix, $suffix);
IPS_SetVariableProfileDigits($name, $digits);
if(($asso !== NULL) && (sizeof($asso) !== 0)){
$minvalue = 0;
$maxvalue = 0;
}
IPS_SetVariableProfileValues($name, $minvalue, $maxvalue, $step);
if(($asso !== NULL) && (sizeof($asso) !== 0)){
foreach($asso as $ass) {
IPS_SetVariableProfileAssociation($name, $ass[0], $ass[1], $ass[2], $ass[3]);
}
}
}
// Extrahiert für den übergebenen Raum und Wochenprofil das entsprechende
// Temperaturprofil soweit es schon man ausgelesen und gecached wurde.
function GetWeeklyProfile(int $rn, int $wp) {
// Rückgabefeld
$profil = array();
// Cache auslesen
$cid = CreateVariableByName($_IPS['SELF'], "Profiles", 3);
$profiles = unserialize(GetValue($cid));
// unseres dabei?
if(isset($profiles[$rn])) {
if(isset($profiles[$rn]["P".$wp])) {
// "HM-TC-IT-WM-W-EU" oder "HmIP-WTH-2"
$profil = $profiles[$rn]["P".$wp];
}
else {
// Quickhack :( "HM-CC-TC" oder "HM-CC-RT-DN"
$profil = $profiles[$rn]["P1"];
}
}
return $profil;
}
// Speichert für den übergebenen Raum die Wochenprofil(e).
function SetWeeklyProfile(int $rn, array $profile, int $wp =-1) {
// Cache auslesen
$cid = CreateVariableByName($_IPS['SELF'], "Profiles", 3);
$profiles = unserialize(GetValue($cid));
if($wp > 0 and $wp <= 3) {
$profiles[$rn]["P".$wp] = $profile;
}
else {
$profiles[$rn] = $profile;
}
// Cache updaten
SetValue($cid, serialize($profiles));
}
// Extrahiert für den übergebenen Tag das Tagesprofil
function GetDailyProfile(array $week, int $day) {
global $weekday;
// Rückgabefeld
$profil = array();
// unseres dabei?
if(isset($week[$weekday[$day]])) {
$profil = $week[$weekday[$day]];
}
return $profil;
}
// Speichert für den übergebenen Raum die Wochenprofil(e).
function SetDailyProfile(int $rn, int $wp, int $day, array $dp) {
global $weekday;
// Cache auslesen
$cid = CreateVariableByName($_IPS['SELF'], "Profiles", 3);
$profiles = unserialize(GetValue($cid));
// Tagesprofil austauschen
if(isset($profiles[$rn]["P".$wp])) {
// "HM-TC-IT-WM-W-EU" oder "HmIP-WTH-2"
$profiles[$rn]["P".$wp][$weekday[$day]] = $dp;
}
else {
// "HM-CC-TC" oder "HM-CC-RT-DN"
$profiles[$rn][$weekday[$day]] = $dp;
}
// Cache updaten
SetValue($cid, serialize($profiles));
}
// Prüfen ob Profil konsistent ist
function CheckWeeklyProfile($profile) {
global $weekday;
// Ergebniss
$ret = "OK";
foreach($weekday as $key => $day) {
$time1='00:00';
foreach($profile[$weekday[$key]]['EndTimes'] as $ts => $time2) {
// Speicherslots des HM WT in min
if(strtotime($time2) <= strtotime($time1)) {
$slot = $ts+1;
$ret="Fehler im Tagesprofil $weekday[$key] (Slot: $slot Start: $time1 - Ende: $time2 )";
break;
}
$time1 = $time2;
}
}
return $ret;
}
// Zeitabschnitt Auswahl im Webfront Anzeige auf Anzahl
// der belegten Slots im HM WT beschränken
function SetTimeSlotProfile($profile, $hl=99) {
// Profilename
$vpn = "HM.Heating.Slot";
// Anzahl Slots
$count = 0;
if(!empty($profile)) {
$count = count($profile['EndTimes']);
}
// Auswahl anpassen?!
$vid = CreateVariableByName($_IPS['SELF'], "Zeitabschnitt", 1);
if($count > 0) {
IPS_SetVariableProfileValues ($vpn, 1, $count, 1);
if($hl <= $count) {
SetValue($vid, $hl);
return $hl;
}
else {
SetValue($vid, 1);
return 1;
}
}
else {
IPS_SetVariableProfileValues ($vpn, 1, 1, 1);
SetValue($vid, 0);
}
return 99;
}
// Erzeugt vom übergebenen Wochen-Temperaturprofil das entsprechende HTML
function RenderWeeklyProfile(array $profile, $hl = 99) {
global $day, $weekday;
// Temeraturen => 15, 16, 17, 18, 19, 20, 21, 22
if(!empty($profile)) {
foreach ($weekday as $k => $d) {
$time1='00:00';
foreach ($profile[$weekday[$k]]['EndTimes'] as $time2) {
// Speicherslots des HM WT in min
$times[$d][]=(strtotime("01.01.2001 ". $time2)-strtotime("01.01.2001 ". $time1))/60;
$time1=$time2;
}
foreach ($profile[$weekday[$k]]['Values'] as $v) {
if($v <= 15) $temp[$d][] = 't15'; // sehr kalt
elseif ($v <= 16) $temp[$d][] = 't16'; // kalt
elseif ($v <= 17) $temp[$d][] = 't17'; // Kühl
elseif ($v <= 18) $temp[$d][] = 't18'; // normal
elseif ($v <= 19) $temp[$d][] = 't19'; // warm
elseif ($v <= 20) $temp[$d][] = 't20'; // sehr warm
elseif ($v <= 21) $temp[$d][] = 't21'; // heiß
else $temp[$d][] = 't22'; // sehr heiß
}
}
}
else {
// kein Profil kein Highlight!
$hl = 99;
}
// styles definieren
$style = '';
$style = $style.'<style type="text/css">';
$style = $style.'table.tp {border-collapse: collapse; font-size: 11px; width: 100%; border-right: 1px solid rgba(255, 255, 255, 0.2);}';
$style = $style.'td.fst {vertical-align: middle; text-align: center; width: 4%; padding: 2px; border-left: 1px solid rgba(255, 255, 255, 0.2); border-right: 1px solid rgba(255, 255, 255, 0.2); border-top: 1px solid rgba(255, 255, 255, 0.1); }';
$style = $style.'td.mid {vertical-align: middle; text-align: center; width: 4%; padding: 2px; border-right: 1px solid rgba(255, 255, 255, 0.2); border-top: 1px solid rgba(255, 255, 255, 0.1); }';
$style = $style.'td.lst {vertical-align: middle; text-align: center; width: 4%; padding: 2px; border-right: 1px solid rgba(255, 255, 255, 0.2); border-top: 1px solid rgba(255, 255, 255, 0.1); }';
$style = $style.'tr:last-child {border-bottom: 1px solid rgba(255, 255, 255, 0.2); }';
$style = $style.'.th { color: rgb(255, 255, 255); background-color: rgba(255, 255, 255,0.25); font-weight:bold; background-image: linear-gradient(top,rgba(0,0,0,0) 0,rgba(0,0,0,0.3) 28%,rgba(0,0,0,0.3) 100%); background-image: -o-linear-gradient(top,rgba(0,0,0,0) 0,rgba(0,0,0,0.3) 28%,rgba(0,0,0,0.3) 100%); background-image: -moz-linear-gradient(top,rgba(0,0,0,0) 0,rgba(0,0,0,0.3) 28%,rgba(0,0,0,0.3) 100%); background-image: -webkit-linear-gradient(top,rgba(0,0,0,0) 0,rgba(0,0,0,0.3) 28%,rgba(0,0,0,0.3) 100%); background-image: -ms-linear-gradient(top,rgba(0,0,0,0) 0,rgba(0,0,0,0.3) 28%,rgba(0,0,0,0.3) 100%); }';
$style = $style.'.hl {background-color: black; opacity: 0.5;}';
$style = $style.'.t15 {background-color: #6600CC; opacity: 0.9;}'; // lila (sehr kalt) <= 15
$style = $style.'.t16 {background-color: #0000FF; opacity: 0.9;}'; // dunkelblau (kalt) = 16
$style = $style.'.t17 {background-color: #0080FF; opacity: 0.9;}'; // hellblau (kühl) = 17
$style = $style.'.t18 {background-color: #00FFFF; opacity: 0.9;}'; // türkis (normal) 18
$style = $style.'.t19 {background-color: #00FF00; opacity: 0.9;}'; // grün (warm) =19
$style = $style.'.t20 {background-color: #FFFF00; opacity: 0.9;}'; // gelb (sehr warm) = 20
$style = $style.'.t21 {background-color: #FF8000; opacity: 0.9;}'; // orange (heiß) = 21
$style = $style.'.t22 {background-color: #FF0000; opacity: 0.9;}'; // rot (sehr heiß) >= 22
$style = $style.'</style>';
// HTML Table erzeugen
$html = $style;
$html = $html.'<table class="tp">';
$html = $html.'<tr>';
for($i=0; $i <= 24; $i++) {
if($i == 0) {
$html = $html.'<td class=""></td>';
}
elseif ($i == 24) {
$html = $html.'<td class="lst th" colspan="12">'.sprintf("%02d", $i).'</td>';
}
else {
$html = $html.'<td class="mid th" colspan="12">'.sprintf("%02d", $i).'</td>';
}
}
$html = $html.'</tr>';
foreach ($weekday as $k => $d) {
// wurde Wochentag mit übergeben (0=Mo, 1=Di ... 99=kein Wochentag vorgegeben)
if($hl <> $k) {
$html = $html.'<tr><td class="fst th">'. $day[$k][1] .'</td>';
}
else {
$html = $html.'<tr class="hl"><td class="fst th">'. $day[$k][1] .'</td>';
}
if(isset($times)) {
foreach ($times[$d] as $key => $time) {
$html = $html.'<td colspan="'.($time/5).'" class="'.$temp[$d][$key].'"> </td>';
}
}
else {
for($i=0; $i < 24; $i++) {
$html = $html.'<td colspan="12"> </td>';
}
}
$html = $html.'</tr>';
}
$html = $html.'</table>';
$html = $html.'<div style="height:8px;"><nbsp /></div>';
// Index Tabelle (Temperatur-Spektrum)
$html = $html.'<table style="border: 0px; font-size:11px; text-shadow:1px 1px #000000; width:100%; text-align: center">';
$html = $html.'<tr>';
$html = $html.'<td class="t15" style="width:12%"><= 15°C</td>';
$html = $html.'<td class="t16" style="width:13%"><= 16°C</td>';
$html = $html.'<td class="t17" style="width:12%"><= 17°C</td>';
$html = $html.'<td class="t18" style="width:13%"><= 18°C</td>';
$html = $html.'<td class="t19" style="width:12%"><= 19°C</td>';
$html = $html.'<td class="t20" style="width:13%"><= 20°C</td>';
$html = $html.'<td class="t21" style="width:12%"><= 21°C</td>';
$html = $html.'<td class="t22" style="width:13%">>= 22°C</td>';
$html = $html.'</tr></table>';
// Rückgabe
return $html;
}
// Erzeugt vom übergebenen Tages-Temperaturprofil das entsprechende HTML
function RenderDailyProfile(array $profile, int $hl=99) {
// styles definieren
$html = "";
$html = $html.'<table class="tp">';
$html = $html.'<tr><td class=""></td><td class="mid th">Startzeit</td><td class="mid th">Endzeit</td><td class="lst th">Temperatur</td></tr>';
// rendern
if(!empty($profile)) {
$start="00:00";
foreach($profile['EndTimes'] as $key => $end) {
$temp = number_format($profile['Values'][$key], 1,",",".");
if($key <> $hl-1) {
$html = $html.'<tr><td class="fst th">'.($key+1) .'. Zeitabschnitt</td><td class="mid">'.$start.'</td><td class="mid">'.$end.'</td><td class="lst">'.$temp.' °C</td></tr>';
}
else {
$html = $html.'<tr class ="hl"><td class="fst th">'.($key+1). '. Zeitabschnitt</td><td class="mid">'.$start.'</td><td class="mid">'.$end.'</td><td class="lst">'.$temp.' °C</td></tr>';
}
$start=$end;
}
}
else {
// kein Profil vorhanden!
$html = $html.'<tr><td class="fst th">-<td class="mid">-</td><td class="mid">-</td><td class="lst">-</td></tr>';
}
$html = $html.'</table>';
// Rückgabe
return $html;
}
// Update HTML
function RenderProfile(int $rn, int $wp, int $wd, int $ts = 99) {
// Profil extrahieren
$profile = GetWeeklyProfile($rn, $wp);
// Rendern Wochenprofil
$vid = CreateVariableByName($_IPS['SELF'], 'Wochenprofil', 3);
SetValue($vid, RenderWeeklyProfile($profile, $wd));
// Profil extrahieren
$profile = GetDailyProfile($profile, $wd);
$ts = SetTimeSlotProfile($profile, $ts);
// Render Tagesprofil
$vid = CreateVariableByName($_IPS['SELF'], 'Tagesprofil', 3);
SetValue($vid, RenderDailyProfile($profile, $ts));
}
################################################################################
?>
Viel Erfolg
Heiko
Hallo Heiko,
danke für dein Script!!! Es funktioniert auch mit dem HmIP-BWTH. 
Viele Grüße
Peter
Hi Peter, wunderbar - musstest Du den Typ noch im Script eintragen?
Gruß Pitti
Hi Pitti,
ich hab das Script ja schon lange zur Zufriedenheit laufen…
Eine Sache ist mir gestern beim Aufräumen aufgefallen…
In Deinen Arrays hast Du hinten einen int-Wert… Wozu soll der sein?
bspw.
$time = array(
array(1, ‚-1 h‘, ‚‘, 65280),
array(2, ‚-10 min‘, ‚‘, 65280),
array(3, ‚+10 min‘, ‚‘, 16744448),
array(4, ‚+1 h‘, ‚‘, 16744448)
);
Hab gestern viele alte Variablen gelöscht und da kam dann öfter mal die Warnung dass es noch Referenzen darauf gibt… und das waren dann immer zufällige Treffer aus diesen Arrays…
Das Array dient der Erzeugung von Profilen(Assoziazionen) mit entsprechenden Farbwerten (die INT-Werte!!!)
VG Heiko
Ach so… dann geht symcon jetzt davon aus, dass es Objekt-ID´s sind…
Ok… dann kann man die Warnungen beim löschen ja ignorieren…
Ach, jetzt verstehe ich auch was du mit Warnungen meintest, ja!
In meinen neusten Scripten verwende ich nur noch Hex-Werte für sowas, da passt es dann besser [emoji41]
Gesendet von iPhone mit Tapatalk
Vielen Dank für die Zusammenfassung der Scripte @Pitti 
Nachdem ich alles gemäß Deiner Anweisungen im Script eingerichtet habe, kann ich leider bei meinen Thermostaten (HM-CC-RT-DN & HM-TC-IT-WM-W-EU) die dort hinterlegten Zeitpläne nicht auslesen. Beim Klick auf die Schaltfläche Auslesen in der Weboberfläche erscheinen wiederholt PHP Notice Meldungen (siehe Screenshot).
Ich habe bereits nach der Ursache gesucht aber komme leider nicht weiter. Vermutlich wird die Variable $params durch ReadParamSet nicht befüllt. In der CCU steht der XML-RPC-API-Zugriff auf Vollzugriff. Auch steht die IP-Adresse des Symcon-Systems auf der Liste der eingeschränkten Adressen.
Die CCU ist bei mir ein RaspberryMatic Version 3.43.15.20190223. IP-Symcon 5.0 läuft unter Ubuntu 18.04.2 LTS. Bei der xmlrpc.inc.php habe ich die erwähnte Version phpxmlrpc-4.3.0 heruntergeladen und im Script eingebunden.
Hat evtl. jemand eine Idee warum das nicht klappt?
Hallo!
Ich habe die HmIP-eTRV-B
Welche ID muß man da eintragen?
oder wird HmIP-eTRV-B nicht unterstüzt?
Mfg
Maxx
Bin gerade nicht am Rechner, aber wenn Du das Script nutzt müsste eine Fehlermeldung kommen das der Typ XYZ (Wahrscheinlich HmIP-eTRV-B) nicht unterstützt wird.
Diese Typbeszeichnung müsstest Du im Script beim Gerätetypcheck (if … then) hinzufügen!
Gruß Heiko
Gesendet von iPad mit Tapatalk
Ich komme leider nicht weiter 
Hier mal der Inhalt der $request-Variable aus der Funktion ReadParamSet:
xmlrpcmsg Object
(
[payload] => <?xml version="1.0"?>
<methodCall>
<methodName>getParamset</methodName>
<params>
<param>
<value><string>MEQ0806235:2</string></value>
</param>
<param>
<value><string>MASTER</string></value>
</param>
</params>
</methodCall>
[methodname] => getParamset
[params] => Array
(
[0] => xmlrpcval Object
(
[me] => Array
(
[string] => MEQ0806235:2
)
[mytype] => 1
[_php_class] =>
)
[1] => xmlrpcval Object
(
[me] => Array
(
[string] => MASTER
)
[mytype] => 1
[_php_class] =>
)
)
[debug] => 0
[content_type] => text/xml
[httpResponse:protected] => Array
(
[raw_data] => HTTP/1.0 200 OK
Content-Type: text/xml; charset=iso-8859-1
Content-Length: 149
Content-Security-Policy: default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
X-Content-Security-Policy: default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
X-WebKit-CSP: default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
X-Frame-Options: SAMEORIGIN
X-Content-Type-Options: nosniff
X-XSS-Protection: 1; mode=block
X-Robots-Tag: none
X-Download-Options: noopen
X-Permitted-Cross-Domain-Policies: none
Referrer-Policy: no-referrer
Connection: close
Date: Thu, 09 May 2019 17:32:12 GMT
<?xml version="1.0" encoding="iso-8859-1"?>
<methodResponse><params><param>
<value><struct></struct></value>
</param></params></methodResponse>
[headers] => Array
(
[content-type] => text/xml; charset=iso-8859-1
[content-length] => 149
[content-security-policy] => default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
[x-content-security-policy] => default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
[x-webkit-csp] => default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
[x-frame-options] => SAMEORIGIN
[x-content-type-options] => nosniff
[x-xss-protection] => 1; mode=block
[x-robots-tag] => none
[x-download-options] => noopen
[x-permitted-cross-domain-policies] => none
[referrer-policy] => no-referrer
[connection] => close
[date] => Thu, 09 May 2019 17:32:12 GMT
)
[cookies] => Array
(
)
)
)
Und hier die Antwort ($response) aus der Funktion send:
PhpXmlRpc\Response Object
(
[val] => PhpXmlRpc\Value Object
(
[me] => Array
(
[struct] => Array
(
)
)
[mytype] => 3
[_php_class] =>
)
[valtyp] => xmlrpcvals
[errno] => 0
[errstr] =>
[payload] =>
[hdrs] => Array
(
[content-type] => text/xml; charset=iso-8859-1
[content-length] => 149
[content-security-policy] => default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
[x-content-security-policy] => default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
[x-webkit-csp] => default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
[x-frame-options] => SAMEORIGIN
[x-content-type-options] => nosniff
[x-xss-protection] => 1; mode=block
[x-robots-tag] => none
[x-download-options] => noopen
[x-permitted-cross-domain-policies] => none
[referrer-policy] => no-referrer
[connection] => close
[date] => Thu, 09 May 2019 17:32:12 GMT
)
[_cookies] => Array
(
)
[content_type] => text/xml
[raw_data] => HTTP/1.0 200 OK
Content-Type: text/xml; charset=iso-8859-1
Content-Length: 149
Content-Security-Policy: default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
X-Content-Security-Policy: default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
X-WebKit-CSP: default-src 'self';frame-ancestors 'self';script-src 'unsafe-inline' 'unsafe-eval' 'self' *.homematic.com https://gitcdn.xyz ;style-src 'unsafe-inline' 'self';img-src 'self' data: ;connect-src 'self' http://*:8088
X-Frame-Options: SAMEORIGIN
X-Content-Type-Options: nosniff
X-XSS-Protection: 1; mode=block
X-Robots-Tag: none
X-Download-Options: noopen
X-Permitted-Cross-Domain-Policies: none
Referrer-Policy: no-referrer
Connection: close
Date: Thu, 09 May 2019 17:32:12 GMT
<?xml version="1.0" encoding="iso-8859-1"?>
<methodResponse><params><param>
<value><struct></struct></value>
</param></params></methodResponse>
)
Hallo Heiko,
erstmal vielen Dank für das Skript, ich versuche gerade das bei einem Freund zu installieren.
Wenn jetzt im Webfront auf auslesen geklickt wird, kommt die Fehlermeldung in einem schwarzen Kasten oben rechts.
Error: Send () Request to RF Service Failed
Didn´t Receice 200 OK from Remote Server (http1/1.0 401 unauthorized)
Kannst du mir eventuell sagen was das zu bedeuten hat und wo der Fehler liegt?
Wäre super wenn mir jemand helfen könnte.
Danke und Grüße
Stephan
Hallo Stephan,
sieht nach gesperrten Port aus (Firewall)!?
Führ doch mal folgendes Skript aus und gib mal das Ergebnis preis! (IP eintragen nicht vergessen)
<?php
################################################################################
# Script: System.Ports.ips.php
# Version: 2.0
# Author: Heiko Wilknitz
#
# Zum überprüfen ob der entsprechende TCP-Port erreichbar ist oder geblockt wird
# Für einen UDP Check muss ein udp// vor die IP-Adresse gesetzt werden.
#
################################################################################
// IP CCUx
$ip = "xxx.xxx.x.x";
// Homematic. Für den Lanadapter muss nur Port 2001 und 5544 erreichbar sein
// 2000 - für Wired
// 2001 - für Funk
// 2010 - für IP
// 5544 - für Ereignise
// 8181 - für Scripte
// 42000 - SSL Wired
// 42001 - SSL Funk
// 42010 - SSL IP
// 48181 - SSL Scripte
$port = array(2000, 2001,2010, 5544, 8181);
for($i=0; $i<count($port); $i++) {
// IP Adresse anpassen
$socket = @fsockopen($ip, $port[$i], $errno, $errstr);
if(!$socket) {
echo "Port: ".$port[$i]." ist NICHT erreichbar!
";
}
else {
echo "Port: ".$port[$i]." ist erreichbar.
";
}
}
?>
Gruß Heiko
Hallo Heiko,
danke für die schnelle Antwort.
Die IP Adresse ist geändert, bekomme aber folgende Fehlermeldung:
Parse error: syntax error, unexpected 'for' (T_FOR) in /var/lib/symcon/scripts/43929.ips.php on line 28
Woran liegt das? Danke!