<?php
//Version 1.3
$debug=false;                                                            //Debug Infos
//
$ParID=IPS_GetParent($_IPS['SELF']);                                    //ID des Raumes (z.B. Dummy-Modul)
$Name=IPS_GetName($ParID);
$StatusHauptschalter=GetValueBoolean(37330);
//anzulegende Variablen
$ipaddrID = IPS_GetVariableIDByName("IP",$ParID);                       //IP Adresse als String z.B.: "192.168.1.30"
$mideaidID = IPS_GetVariableIDByName("ID",$ParID);                      //ID als String z.B.: 16442675588469
$powerID = IPS_GetVariableIDByName("Power",$ParID);                     //Power als Boolean (True=Ein False=Aus)
$modusID = IPS_GetVariableIDByName("Modus",$ParID);                     //Modus als Integer (auto = 1 cool = 2 dry = 3 heat = 4 fan_only = 5)
$fanID = IPS_GetVariableIDByName("Fan",$ParID);                         //Fan als Integer (Auto = 102 High = 80  Medium = 60 Low = 40 Silent = 20)
$swingID = IPS_GetVariableIDByName("Swing",$ParID);                     //Swing als Integer (0=Off 1=Vertical 2=Horizontal 3=Both)
$tonID = IPS_GetVariableIDByName("Ton",$ParID);                         //Ton als Boolean (True=Ein False=Aus) bei True piept das Raumgerät kurz (spring auf False zurück)
$ecoID = IPS_GetVariableIDByName("Eco",$ParID);                         //Eco als Boolean (True=Ein False=Aus)
$turboID = IPS_GetVariableIDByName("Turbo",$ParID);                     //Turbo als Boolean (True=Ein False=Aus)
$solltempID = IPS_GetVariableIDByName("Solltemperatur",$ParID);         //Solltemperatur als Float z.B.: 19.5
$raumtempID = IPS_GetVariableIDByName("Raumtemperatur",$ParID);         //Raumtemperatur wird aus Midea ausgelesen
$aussentempID = IPS_GetVariableIDByName("Aussentemperatur",$ParID);     //Aussentemperatur wird aus MIDEA ausgelesen
$FensterID= IPS_GetVariableIDByName("FensterID",$ParID);                //FensterID des Raums
$WebFrontID=49982;                                             //Für Push Nachricht
//
//Werte ermitteln
$ipaddr = GetValueString ($ipaddrID);                                   //IP Adresse als String z.B.: "192.168.1.30"
$mideaID = GetValueString ($mideaidID);                                 //ID als String z.B.: 16492675588469
$power = GetValueBoolean ($powerID);                                    //Power als Boolean (True=Ein False=Aus)
$modus = GetValueInteger ($modusID);                                    //Modus als Integer (1=Cool, 2=Dry, 3=Fan, 4=Auto, 5=Heat)
$ton = GetValueBoolean ($tonID);                                        //Ton als Boolean (True=Ein False=Aus) bei True piept das Raumgerät kurz (spring auf False zurück)
$solltemp = GetValueFloat ($solltempID);                                //Solltemperatur als Float z.B.: 19.5
$fan=GetValueInteger($fanID);                                           //Fan als Integer (Auto = 102 High = 80  Medium = 60 Low = 40 Silent = 20)
$swing=GetValueInteger($swingID);                                       //Swing als Integer (0=Off 1=Vertical 2=Horizontal 3=Both)
$eco = GetValueBoolean ($ecoID);                                        //Eco als Boolean (True=Ein False=Aus)
$turbo = GetValueBoolean ($turboID);                                    //Turbo als Boolean (True=Ein False=Aus)
//$raumtemp = GetValueFloat ($raumtempID);                              //Raumtemperatur wird aus Midea ausgelesen
//$aussentemp = GetValueFloat ($aussentempID);                          //Aussentemperatur wird aus Midea ausgelesen
//
if ($StatusHauptschalter!=true) {
    IPS_LogMessage($Name,"Hauptschalter Klimaanlage ist aus (".$_IPS['SELF'].")");
    IPS_SetScriptTimer($_IPS['SELF'],0);
    Goto Ende_Script;
} 
//
$Pfad=IPS_GetKernelDir();
$Filename=$Pfad."\\midea\\midea-msmart\\symcon.py";
if ($debug) echo $Filename."\n";
if (!file_exists ($Filename)) {
	IPS_LogMessage($Name,"$Filename existiert nicht - ENDE (".$_IPS['SELF'].")");
	if ($debug) echo "$Filename existiert nicht\n";
    Goto Ende_Script;
}
//Script nicht innerhalb 10 Sekunden erneut ausführen (falls Trigger auf ausgelesene Variablen)
$ScriptInfo=IPS_GetScript($_IPS['SELF']);
$ExecuteTime=$ScriptInfo['ScriptExecuted'];
$time = microtime(true);
$DiffTime=round($time-$ExecuteTime,0);
if (($DiffTime<10) && ($_IPS['SENDER']!="TimerEvent")) {
    if ($debug) echo "$Name Script nicht innerhalb 10 Sekunden erneut ausführen (falls Trigger auf ausgelesene Variablen)\n";
    Goto Ende_Script;
}
//

//Solltemp auf 0.5 runden und formatieren
$solltemp=(round($solltemp*2,0)/2);
if ($debug) echo "$Name Solltemp=$solltemp\n";
$solltemp=str_replace(",",".", $solltemp);
//Boolean formatieren
$power=$power ? 'True' : 'False';
$ton=$ton ? 'True' : 'False';
$eco=$eco ? 'True' : 'False';
$turbo=$turbo ? 'True' : 'False';
//
//
$Timer=30;                                              //Zeit für Scripttimer
if ($_IPS['SENDER']!="TimerEvent") {                    //wenn zyklisch über TimerEvent aufgerufen nur Werte von Midea holen
    if (IPS_GetScriptTimer($_IPS['SELF'])!=0) {
        if ($debug) echo "ScriptTimer zum Auslesen der Werte noch aktiv - sende keine neuen Befehle\n";
        Goto Ende_Script;
    } 
    $IPSMaster=true;
    if ($debug) echo "Aufruf nicht über TimerEvent sondern von ".$_IPS['SENDER']." sende Befehle an Midea - lese keine Werte\n";
    if($_IPS['SENDER'] == "Variable")   {
        $Var_AufrufID=$_IPS['VARIABLE'];
        $NameSender=IPS_GetName($Var_AufrufID);
        if ($Var_AufrufID==$powerID) {
            //zuerst Fenster überprüfen und ggf. Fehler an Webfront kein Einschalten
            $Fenster=GetValueBoolean(GetValueInteger($FensterID));
            if ($Fenster==true) {
                if ($debug) echo "$Name Fenster geöffnet - NICHT einschalten\n";
                IPS_LogMessage($Name,"Fenster geöffnet - NICHT einschalten (".$_IPS['SELF'].")");
                echo "Fenster geöffnet kein Einschalten möglich über echo";
                //WFC_PushNotification($WebFrontID,$Name, 'Fenster geöffnet keine Einschalten möglich', '', 0);
                WFC_SendPopup($WebFrontID,$Name, 'Fenster geöffnet kein Einschalten möglich');
                SetValueBoolean($powerID,false);
                IPS_SetScriptTimer($_IPS['SELF'],$Timer);               //start nach $Timer Sekunden Script um Werte auszulesen (Übernahme der neuen Werte dauert je nach Wert länge)
                Goto Ende_Script;
            }             
        }
    }
    else $NameSender=$_IPS['SENDER'];
    IPS_LogMessage($Name,"Aufruf nicht über TimerEvent sondern von $NameSender sende Befehle an Midea - lese keine Werte (".$_IPS['SELF'].")");
    IPS_SetScriptTimer($_IPS['SELF'],$Timer);               //start nach $Timer Sekunden Script um Werte auszulesen (Übernahme der neuen Werte dauert je nach Wert länger)
}
else {
    $IPSMaster=false;
    if ($debug) echo "Aufruf über TimerEvent oder Scriptimer sende KEINE Befehle an Midea - lese Werte aus\n";
    IPS_SetScriptTimer($_IPS['SELF'],0);               //start nach 10 Sekunden Script um Werte auszulesen
}
$IPSMaster=$IPSMaster ? 'True' : 'False';
//
iF($fan>99) $fan=102;   //Patch für AutoWert so möglich 20-er Schritte in IPS-Profil
$Befehl="$Filename $ipaddr $mideaID $power $modus $ton $solltemp $fan $swing $eco $turbo $IPSMaster";       //Befehlsstring zur Übergabe der Werte an Python-Script
if ($debug) echo $Befehl."\n";
//
exec($Befehl, $output);  
if ($debug) print_r($output);
IPS_LogMessage($Name,"String an Midea: IPSMaster=$IPSMaster (entscheidet ob Befehl) Power=$power Modus=$modus Ton=$ton Solltemp=$solltemp Fan=$fan Swing=$swing Eco=$eco Turbo=$turbo (".$_IPS['SELF'].")");
//
if ($IPSMaster=='False') {                      //Werte nur auslesen wenn nichts von IPS gesandt
    //Output parsen
    $outputS=implode(";",$output);
    //echo $outputS."\n";
    //
    $pos=strrpos ($outputS,'ipaddr');
    $werte=substr($outputS,$pos,334);
    //echo $werte."\n";
    //
    $raumtemp_m=floatval(substr(strstr($werte, 'indoor_temperature'),21,4));
    if ($raumtemp_m==0) {                                                   //manchmal werden Temperaturen als 0 gemeldet
        if ($debug) echo "Raumtemp ungültig=$raumtemp_m - vermutlich alle Werte ungültig - ignoriere alle - vermutlich auch Befehle erfolglos\n";                 //ignoriere dann auch ALLE anderen Werte
        IPS_LogMessage($Name,"Da Raumtemp=$raumtemp_m - vermutlich alle Werte ungültig - ignoriere alle  - vermutlich auch Befehle erfolglos(".$_IPS['SELF'].")");
        IPS_SetScriptTimer($_IPS['SELF'],20);       //erneutes Auslesen
    }
    else {
        IPS_LogMessage($Name,"Lese Werte aus Midea in IPS ein - nur Änderungen (".$_IPS['SELF'].")");
        if ($raumtemp_m!=0) aenderung ($raumtempID,$raumtemp_m);
        if ($debug) echo "Raumtemp=$raumtemp_m\t";
        $aussentemp_m=floatval(substr(strstr($werte, 'outdoor_temperature'),22,4));
        if ($aussentemp_m!=0) aenderung ($aussentempID,$aussentemp_m);
        if ($debug) echo "Aussentemp=$aussentemp_m\n";    
        //echo "$werte\n";
        $power_m=substr(strstr($werte, 'power_state'),14,5);
        if ($debug) echo "Power=$power_m\t";
        if ($power_m=='False') {
            aenderung ($powerID,false);
        }
        else aenderung ($powerID,true);
        //
        $ton_m=substr(strstr($werte, 'prompt_tone'),14,5);
        //if ($debug) echo "Ton=$ton_m\t";
        if ($ton_m=='False') {
            aenderung ($tonID,false);
        }
        else aenderung ($tonID,true);
        //
        if ($power_m!='False') {                    //kein Auslesen+Ändern der Solltemp in IPS da bei PowerAus StandardWert (z.B. 17)
            $solltemp_m=floatval(substr(strstr($werte, 'target_temperature'),21,4));
            if ($debug) echo "Solltemp=$solltemp_m\t";
            aenderung ($solltempID,$solltemp_m);
        }
        else if ($debug) echo "Solltemp nicht ausgelesen da Gerät aus\n";
        //
        $modus_m=intval(substr(strstr($werte, 'operational_mode'),19,1));     //auto = 1 cool = 2 dry = 3 heat = 4 fan_only = 5
        //if ($debug) echo  "Modus=$modus_m\t";
        if ($modus_m<1 || $modus_m>5) {                                                   
            if ($debug) echo "Modus ungültig=$modus_m\n";                 
        }
        else {
            aenderung ($modusID,$modus_m);
            if ($debug) echo "Modus=$modus_m\t";   
        }
        //
        //
        $fan_m=intval(substr(strstr($werte, 'fan_speed'),12,3));     //Auto = 102 High = 80  Medium = 60 Low = 40 Silent = 20
        //if ($debug) echo  "Fan=$fan_m\t";
        if ($fan_m<1 || $fan_m>102) {                                                   
            if ($debug) echo "Fan ungültig=$fan_m\n";                 
        }
        else {
            iF($fan_m>100) $fan_m=100;   //Patch für AutoWert so möglich 20-er Schritte in IPS-Profil
            aenderung ($fanID,$fan_m);
            if ($debug) echo "Fan=$fan_m\t";   
        }
        //
        //
        $swing_m=intval(substr(strstr($werte, 'swing_mode'),13,1));     //0=Off 1=Vertical 2=Horizontal 3=Both
        //if ($debug) echo  "Swing=$swing_m\t";
        if ($swing_m<0 || $swing_m>3) {                                                   
            if ($debug) echo "Swing ungültig=$swing_m\n";                 
        }
        else {
            aenderung ($swingID,$swing_m);
            if ($debug) echo "Swing=$swing_m\t";   
        }

        //
        $eco_m=substr(strstr($werte, 'eco_mode'),11,5);
        if ($debug) echo "Eco=$eco_m\t";
        if ($eco_m=='False') {
            aenderung ($ecoID,false);
        }
        else aenderung ($ecoID,true);
        //
        //
        $turbo_m=substr(strstr($werte, 'turbo_mode'),13,5);
        if ($debug) echo "Turbo=$turbo_m\t";
        if ($turbo_m=='False') {
            aenderung ($turboID,false);
        }
        else aenderung ($turbo_m,true);
        //
    }
}
elseif ($debug) echo "Keine Panik - Werte werden aus Midea per ScriptTimer in $Timer Sekunden geholt - siehe IPS Meldungsfenster\n"; 
//
//
function aenderung ($id,$value) {
    global $debug,$Name;
    $oldvalue=GetValue($id);
    if ($oldvalue!=$value) {
        $VarName=IPS_GetName($id);
        if (is_bool($value)===true) {
            $value=$value ? 'true' : 'false';
        }
        if (is_int($value)===true) {
            $value=1*$value;
        }        
        IPS_LogMessage($Name,"Wert für $VarName in Klimagerät anders als in IPS - aktualisiere IPS mit $value  (".$_IPS['SELF'].")");
        if ($debug) echo "\nWert für $VarName in Klimagerät anders als in IPS - aktualisiere IPS mit $value\n";
        SetValue($id,$value);
    }
}

Ende_Script:
?>