dh/Symcon_Belevo_Energiemanagement_testing
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source
This commit is contained in:
belevo\mh
2025-05-26 10:03:12 +02:00
parent 819f5f9587
commit 5de506ad16
1 changed files with 66 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

91
Symcon_Publish_to_Shelly_MQTT/module.php
View File

@@ -6,28 +6,40 @@ class Symcon_Publish_to_Shelly_MQTT extends IPSModule
{
parent::Create();
// MQTT-Verbindungsparameter
// MQTT-Verbindungsparameter als Properties
$this->RegisterPropertyString("broker_address", "");
$this->RegisterPropertyInteger("broker_port", 1883);
$this->RegisterPropertyString("username", "");
$this->RegisterPropertyString("password", "");
$this->RegisterPropertyString("Topic", "");
$this->RegisterPropertyInteger("mqtt_instance_id", 0); // ID der MQTT-Instanz als Konfig-Feld
// Nachricht-Payload-Parameter
// Nachricht-Payload-Parameter als Properties
$this->RegisterPropertyInteger("msg_id", 100);
$this->RegisterPropertyString("src", "user1");
$this->RegisterPropertyString("method", "Switch.Set");
$this->RegisterPropertyInteger("switch_bool", 0); // Variable-ID einer Bool-Variable
$this->RegisterPropertyInteger("switch_bool", 0); // ID der Bool-Variable
}
public function ApplyChanges()
{
parent::ApplyChanges();
// Hier ggf. weitere Aktionen bei Änderungen, z.B. RegisterTimer o.Ä.
}
/**
* Wird aufgerufen, wenn eine Aktion auf ein Ident (z.B. Variable) ausgeführt wird
*
* @param string $Ident
* @param mixed $Value
* @throws Exception
*/
public function RequestAction($Ident, $Value)
{
IPS_LogMessage("ShellySwitchSender", "⚙️ RequestAction: $Ident = $Value");
$msg = "RequestAction aufgerufen: Ident = $Ident, Value = " . var_export($Value, true);
echo $msg . "\n";
IPS_LogMessage("ShellySwitchSender", $msg);
switch ($Ident) {
case "GetAction":
$this->GetAction();
@@ -37,34 +49,56 @@ class Symcon_Publish_to_Shelly_MQTT extends IPSModule
}
}
private function GetAction()
/**
* Führt die eigentliche Aktion aus: Liest Werte, baut Payload, sendet MQTT Nachricht
*/
public function GetAction()
{
IPS_LogMessage("ShellySwitchSender", " Starte GetAction()...");
$msg = "Starte GetAction()...";
echo $msg . "\n";
IPS_LogMessage("ShellySwitchSender", $msg);
// Eigenschaften lesen
// MQTT Broker-Daten aus Properties
$broker = $this->ReadPropertyString("broker_address");
$port = $this->ReadPropertyInteger("broker_port");
$user = $this->ReadPropertyString("username");
$pass = $this->ReadPropertyString("password");
$topic = $this->ReadPropertyString("Topic");
$mqttInstanceID = $this->ReadPropertyInteger("mqtt_instance_id");
// Payload-Parameter aus Properties
$msg_id = $this->ReadPropertyInteger("msg_id");
$src = $this->ReadPropertyString("src");
$method = $this->ReadPropertyString("method");
$boolVarID = $this->ReadPropertyInteger("switch_bool");
// Prüfe ob Bool-Variable existiert
if (!IPS_VariableExists($boolVarID)) {
IPS_LogMessage("ShellySwitchSender", " Fehler: Bool-Variable mit ID $boolVarID existiert nicht.");
$err = "FEHLER: Bool-Variable mit ID $boolVarID existiert nicht.";
echo $err . "\n";
IPS_LogMessage("ShellySwitchSender", $err);
return;
}
// Bool-Wert aus Variable lesen
$onValue = GetValueBoolean($boolVarID);
IPS_LogMessage("ShellySwitchSender", " MQTT-Ziel: $broker:$port");
IPS_LogMessage("ShellySwitchSender", " topic: $topic, src: $src, method: $method, msg_id: $msg_id");
IPS_LogMessage("ShellySwitchSender", " Bool-Wert: " . ($onValue ? "true" : "false") . " (aus Variable $boolVarID)");
// Log-Ausgaben der Konfiguration
echo "MQTT Broker: $broker:$port\n";
echo "Topic: $topic\n";
echo "Source: $src\n";
echo "Method: $method\n";
echo "Message ID: $msg_id\n";
echo "Bool-Variable ID: $boolVarID = " . ($onValue ? "true" : "false") . "\n";
// JSON-Payload erstellen
IPS_LogMessage("ShellySwitchSender", "MQTT Broker: $broker:$port");
IPS_LogMessage("ShellySwitchSender", "Topic: $topic");
IPS_LogMessage("ShellySwitchSender", "Source: $src");
IPS_LogMessage("ShellySwitchSender", "Method: $method");
IPS_LogMessage("ShellySwitchSender", "Message ID: $msg_id");
IPS_LogMessage("ShellySwitchSender", "Bool-Variable ID: $boolVarID = " . ($onValue ? "true" : "false"));
// JSON-Payload erzeugen
$payload = [
"id" => 0,
"src" => $src,
@@ -76,26 +110,33 @@ class Symcon_Publish_to_Shelly_MQTT extends IPSModule
];
$json = json_encode($payload);
IPS_LogMessage("ShellySwitchSender", "📦 MQTT Payload: $json");
echo "MQTT Payload: $json\n";
IPS_LogMessage("ShellySwitchSender", "MQTT Payload: $json");
// Sende an MQTTClient
$clientID = @IPS_GetInstanceIDByName("MQTTClient", 0);
if ($clientID && IPS_InstanceExists($clientID)) {
$moduleID = IPS_GetInstance($clientID)['ModuleInfo']['ModuleID'];
IPS_LogMessage("ShellySwitchSender", "MQTTClient gefunden (ID: $clientID, ModuleID: $moduleID)");
// MQTTClient-Instanz prüfen und Nachricht senden
if ($mqttInstanceID > 0 && IPS_InstanceExists($mqttInstanceID)) {
$instanceInfo = IPS_GetInstance($mqttInstanceID);
$moduleID = $instanceInfo['ModuleInfo']['ModuleID'];
echo "MQTT Instanz gefunden: ID $mqttInstanceID, ModuleID $moduleID\n";
IPS_LogMessage("ShellySwitchSender", "MQTT Instanz gefunden: ID $mqttInstanceID, ModuleID $moduleID");
// Unterstützte Module
// Prüfe ob Instanz ein MQTTClient ist
if (
$moduleID == "{C03937E3-5F86-EACA-B4A2-39A24ACF945A}" || // alter MQTTClient
$moduleID == "{C8792760-65CF-4C53-B5C7-A30FCC84FEFE}" // offizieller Symcon MQTTClient
$moduleID == "{C03937E3-5F86-EACA-B4A2-39A24ACF945A}" || // Alter MQTTClient
$moduleID == "{C8792760-65CF-4C53-B5C7-A30FCC84FEFE}" // Offizieller MQTTClient
) {
MQTTClient_Publish($clientID, $topic, $json, 0, false);
IPS_LogMessage("ShellySwitchSender", " Nachricht an Topic '$topic' gesendet.");
MQTTClient_Publish($mqttInstanceID, $topic, $json, 0, false);
echo "Nachricht an Topic '$topic' gesendet.\n";
IPS_LogMessage("ShellySwitchSender", "Nachricht an Topic '$topic' gesendet.");
} else {
IPS_LogMessage("ShellySwitchSender", " Fehler: 'MQTTClient' Instanz ist kein gültiges MQTT-Modul.");
$err = "FEHLER: MQTT Instanz ist kein gültiges MQTT-Modul.";
echo $err . "\n";
IPS_LogMessage("ShellySwitchSender", $err);
}
} else {
IPS_LogMessage("ShellySwitchSender", " Fehler: MQTTClient nicht gefunden. Bitte sicherstellen, dass eine Instanz mit Namen 'MQTTClient' existiert.");
$err = "FEHLER: MQTT Instanz nicht gefunden oder ungültig (ID: $mqttInstanceID).";
echo $err . "\n";
IPS_LogMessage("ShellySwitchSender", $err);
}
}
}