Symcon_Belevo_Energiemanagement_testing/HauptManager/module.php

<?php

class HauptManager extends IPSModule
{
    public function Create()
    {
        parent::Create();

        // Systemvariablen registrieren
        $this->RegisterPropertyInteger("Peakleistung", 0);
        $this->RegisterPropertyInteger("Ueberschussleistung", 0);
        $this->RegisterPropertyInteger("Netzbezug", 0); // Initialisierung mit 0
        $this->RegisterPropertyString("Verbraucher_Liste", "[]");

        // Timer registrieren
        $this->RegisterTimer("Timer_DistributeEnergy",5000,"IPS_RequestAction(" .$this->InstanceID .', "DistributeEnergy", "");');
    }

    public function ApplyChanges()
    {
        parent::ApplyChanges();
        //Liste aller Verbraucher einlesen
    }

    public function RequestAction($Ident, $Value)
    {
        switch ($Ident) {
            case "DistributeEnergy":
                $this->DistributeEnergy();
                break;
            case "ApplyChanges":
                $this->ApplyChanges();
                break;
            default:
                throw new Exception("Invalid Ident");
        }
    }

    public function DistributeEnergy()
    {
        $Verbraucher_Liste = json_decode($this->ReadPropertyString("Verbraucher_Liste"), true);

        $currentTime = time();
        $Netzbezug = 0;
        $Verbraucher_Liste_Korr = []; 
        IPS_LogMessage("Hauptmanager", print_r($Verbraucher_Liste));

        foreach ($Verbraucher_Liste as $key => $user) {

           $decodedUser = json_decode(GetValue($user["User_Up"]));
            if (isset($decodedUser["Timestamp"]) && (($currentTime - $decodedUser["Timestamp"])) < 30) {
                
                $Verbraucher_Liste_Korr[] = [
                        "User" => $decodedUser, 
                        "Sendback" => $user["User_Down"]

                ];
                
                $Netzbezug += $decodedUser["Netzbezug"];
            }
        }
        IPS_LogMessage("Hauptmanager", print_r($Verbraucher_Liste_Korr));

        IPS_LogMessage("Hauptmanager", $Netzbezug);



        $Peakleistung = $this->ReadPropertyInteger("Peakleistung");
        $Ueberschussleistung = $this->ReadPropertyInteger("Ueberschussleistung");
        $Is_Peak_Shaving = false; 
        // Fallunterscheidung ob auf Solarladen oder Peakshaving gerregelt wird. 
        if ($Netzbezug < ($Peakleistung - $Ueberschussleistung) / 2) {
            $remainingPower = -1 * (-1 * $Ueberschussleistung + $Netzbezug);
            $Is_Peak_Shaving = false;
        } else {
            $remainingPower = $Peakleistung - $Netzbezug;
            $Is_Peak_Shaving = true;
        }

        // Alle Energieverbraucher auslesen und dekodieren

        if (empty($Verbraucher_Liste_Korr)) {
            // Liste ist leer, daher nichts zu tun
            IPS_LogMessage("Manager", "aufgerufen leere liste");

            return;
        }

        $allIdle = true; // Variable zur Überprüfung, ob alle Benutzer Idle = true sind
        $totalAktuelle_Leistung = 0; // Variable zur Summierung der Aktuelle_Leistung Werte

        // Fülle das Array mit allen entsprechenden Werten der Verbraucher ab
        foreach ($Verbraucher_Liste_Korr as $user) {
          
            // Überprüfen, ob alle Benutzer Idle = true sind, wenn einer nicht ist, wird später verworfen...
            if (!$user["User"]["Idle"]) {
                $allIdle = false;
                IPS_LogMessage("Manager", "nciht idle");

            }

            // Addiere die aktuell bereits verwendete Leistung auf, um sie bei der verteilung zu berücksichtigen
            $totalAktuelle_Leistung += $user["User"]["Aktuelle_Leistung"];
        }
        // Berücksichtigung der bereits verteilten Leistungen (nachher kann dafür wieder bei 0 begonnen werden zu verteilen)
        $remainingPower += $totalAktuelle_Leistung;


        // Wenn nicht alle Benutzer Idle = true sind, rufe SetAktuelle_Leistung mit Aktuelle_Leistung Werten auf, (alle Verbraucher behalten die aktuelle Leistung)
        if (!$allIdle) {
            foreach ($filteredVerbraucher as $user) {
                $sendarray = [
                    "peak" => $Is_Peak_Shaving, 
                    "setpower" => $user["User"]["Aktuelle_Leistung"]
                ];
                RequestAction($user["Sendback"], json_encode($sendarray));
                IPS_LogMessage("HauptManager", "aufgerufen nicht alle idle");

            }
            return;
        }

        // Sortiere die Verbruacher nach Priorität entweder der PV_Prio oder der Peak Prio
        usort($filteredVerbraucher["User"], function ($a, $b) use (
            $Is_Peak_Shaving
        ) {
            $primaryKey = $Is_Peak_Shaving ? "Sperre_Prio" : "PV_Prio";
                // Wenn die Prio geleich ist, sortiere danach welcher verbraucher bisher am wenigsten Energie bekommen hat.
            if ($a[$primaryKey] == $b[$primaryKey]) {
                return $a["Bezogene_Energie"] <=> $b["Bezogene_Energie"];
            }
            return $a[$primaryKey] <=> $b[$primaryKey];
        });

        // Primärschlüssel für die Priorität basierend auf dem Parameter auswählen (für sortierung in gruppen anschliessend)
        $priorityKey = $Is_Peak_Shaving ? "Sperre_Prio" : "PV_Prio";

        // Schleife durch alle Prioritäten
        $priorities = array_unique(
            array_column($filteredVerbraucher, $priorityKey)
        );
        $groupedUsers = [];

        foreach ($priorities as $priority) {
            $groupedUsers[$priority] = array_filter(
                $filteredVerbraucher,
                function ($user) use ($priority, $priorityKey) {
                    return $user[$priorityKey] == $priority;
                }
            );
        }
        // Jetzt werden die energien pro gruppe verteilt (Immer alle pro prio in einer gruppe miteinander)
        foreach ($groupedUsers as $priority => $users) {
            // Verbraucher mit gleicher Priorität sammeln
            $samePriorityUsers = isset($groupedUsers[$priority])
                ? $groupedUsers[$priority]
                : [];

            // Wenn keine Verbraucher mit gleicher Priorität vorhanden sind, überspringen
            if (empty($samePriorityUsers)) {
                continue;
            }
            $withZero = [];
            $withoutZero = [];
            // Verbraucher die nicht 0 Annhemen können, bekommen einfach den tiefsten wert
            foreach ($samePriorityUsers as $entry) {
                if (min($entry["PowerSteps"]) <= 0) {
                    $withZero[] = $entry;
                } else {
                    $withoutZero[] = $entry;
                }
            }
            // Verbraucher die nicht 0 annhemen können erhalten nun den minimalwert
            if (!empty($withoutZero)) {
                foreach ($withoutZero as $entry) {
                    $instanceID = $entry["InstanceID"];
                    $minPowerStep = min($entry["PowerSteps"]);

                    IPS_RequestAction($instanceID,"SetAktuelle_Leistung",$minPowerStep);
                    $remainingPower -= $entry["Aktuelle_Leistung"];
                }
            }

            // Nun die verteilen, die 0 erhalten können. 
            $samePriorityUsers = $withZero;
            // Array für die verteilte Energie pro User erstellen
            $userEnergyProv = [];
            $userEnergyProv = array_fill_keys(array_column($samePriorityUsers, "InstanceID"), 0); // Initialisierung für jeden Benutzer auf 0 setzen

            // Alle Schritte der Benutzer in einem Array sammeln
            $allSteps = [];
            foreach ($samePriorityUsers as $user) {
                foreach ($user["PowerSteps"] as $step) {
                    $allSteps[] = [
                        "user" => $user["InstanceID"],
                        "step" => $step,
                    ];
                }
            }

            // Sortiere die Schritte nach Größe
            usort($allSteps, function ($a, $b) {
                return $a["step"] <=> $b["step"];
            });

            // Iteriere durch alle Schritte
            foreach ($allSteps as $entry) {
                $user = $entry["user"];
                $powerstep = $entry["step"];

                // Überprüfe, ob noch genügend verbleibende Energie für den nächsten Schritt vorhanden ist
                if ($remainingPower >= $powerstep - $userEnergyProv[$user]) {
                    // Aktualisiere die verbleibende Energie und die bereitgestellte Energie für den Benutzer
                    $remainingPower -= $powerstep - $userEnergyProv[$user];
                    $userEnergyProv[$user] = $powerstep;
                } 
          
            }

            // Prüfen, dass jeder User mindestens seinen minimalwert an Leistung bekommt
            foreach ($userEnergyProv as $userInstanceID => $leistung) {
                $minimalleitsung = min(
                    array_column(
                        array_filter($allSteps, function ($entry) use (
                             $userInstanceID
                        ) {
                            return $entry["user"] == $userInstanceID;
                        }),
                        "step"
                    )
                );

                // Jedem user den höheren der beiden werte aus minimalwert oder vergebenem zuteilen
                $leistung = max($leistung, $minimalleitsung); 

                // Methode SetAktuelle_Leistung für jeden Verbraucher mit der entsprechenden Energie aufrufen
                if (IPS_InstanceExists($userInstanceID)) {
                    IPS_RequestAction($userInstanceID,"SetAktuelle_Leistung",$leistung);
                    IPS_LogMessage("Manager", "aufgerufen setleistung normal");

                }
            }
        }
        
    }
}
?>