347 lines
13 KiB
PHP
347 lines
13 KiB
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 = [];
|
|
|
|
foreach ($Verbraucher_Liste as $user) {
|
|
|
|
$decodedUser = json_decode(GetValue($user["User_Up"]), true);
|
|
|
|
|
|
if (isset($decodedUser["Timestamp"]) && (($currentTime - $decodedUser["Timestamp"])) < 30) {
|
|
|
|
foreach ($decodedUser["Users"] as $subuser) {
|
|
$subuser['Writeback'] = $user["User_Down"];
|
|
|
|
$Verbraucher_Liste_Korr[0]["User"][] = $subuser;
|
|
|
|
}
|
|
$Netzbezug += $decodedUser["Netzbezug"];
|
|
}
|
|
|
|
}
|
|
|
|
|
|
LogMessage("HauptManager netzbezug" $Netzbezug. , 10206);
|
|
|
|
|
|
|
|
$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;
|
|
}
|
|
$resultArray = [];
|
|
// Alle Energieverbraucher auslesen und dekodieren
|
|
|
|
if (empty($Verbraucher_Liste_Korr[0]["User"])) {
|
|
// 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[0]["User"] as $user) {
|
|
|
|
// Überprüfen, ob alle Benutzer Idle = true sind, wenn einer nicht ist, wird später verworfen...
|
|
if (!$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["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) {
|
|
// Schritt 1: Benutzer nach Writeback-Wert aufteilen
|
|
$writebackArrays = [];
|
|
foreach ($Verbraucher_Liste_Korr[0]["User"] as $user) {
|
|
$writeback = $user['Writeback'];
|
|
IPS_LogMessage("Manager", $writeback);
|
|
|
|
if (!isset($writebackArrays[$writeback])) {
|
|
$writebackArrays[$writeback] = [];
|
|
}
|
|
$writebackArrays[$writeback][] = $user;
|
|
}
|
|
|
|
// Schritt 2: Foreach-Schleife pro Writeback-Array
|
|
foreach ($writebackArrays as $writeback => $users) {
|
|
$resultArray = [
|
|
'timestamp' => time(),
|
|
'Is_Peak_Shaving' => $Is_Peak_Shaving,
|
|
'User' => []
|
|
];
|
|
|
|
foreach ($users as $user) {
|
|
$resultArray['User'][] = [
|
|
'InstanceID' => $user['InstanceID'],
|
|
'Set_Leistung' => $user['Aktuelle_Leistung']
|
|
];
|
|
}
|
|
|
|
// Schritt 3: Array in String konvertieren
|
|
$resultString = json_encode($resultArray);
|
|
|
|
// Schritt 4: RequestAction aufrufen
|
|
RequestAction($writeback, $resultString);
|
|
}
|
|
return;
|
|
}
|
|
|
|
// Sortiere die Verbruacher nach Priorität entweder der PV_Prio oder der Peak Prio
|
|
usort($Verbraucher_Liste_Korr[0]["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($Verbraucher_Liste_Korr[0]["User"], $priorityKey)
|
|
);
|
|
$groupedUsers = [];
|
|
|
|
foreach ($priorities as $priority) {
|
|
$groupedUsers[$priority] = array_filter(
|
|
$Verbraucher_Liste_Korr[0]["User"],
|
|
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) {
|
|
$resultArray[] = [
|
|
'user' => $user['InstanceID'],
|
|
'Writeback' => $user['Writeback'],
|
|
'Set_Leistung' => min($entry["PowerSteps"])
|
|
];
|
|
$remainingPower -= $entry["Aktuelle_Leistung"];
|
|
}
|
|
}
|
|
|
|
// Nun die verteilen, die 0 erhalten können.
|
|
$samePriorityUsers = $withZero;
|
|
// Array für die verteilte Energie pro User erstellen
|
|
$userEnergyProv = [];
|
|
|
|
foreach ($samePriorityUsers as $user) {
|
|
$userEnergyProv[$user['InstanceID']] = [
|
|
'user' => $user['InstanceID'],
|
|
'Writeback' => $user['Writeback'],
|
|
'Set_Leistung' => 0
|
|
];
|
|
}
|
|
|
|
// Alle Schritte der Benutzer in einem Array sammeln
|
|
$allSteps = [];
|
|
foreach ($samePriorityUsers as $user) {
|
|
foreach ($user["PowerSteps"] as $step) {
|
|
$allSteps[] = [
|
|
"user" => $user["InstanceID"],
|
|
"Writeback" => $user["Writeback"],
|
|
"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"];
|
|
$manager = $entry["Writeback"];
|
|
$powerstep = $entry["step"];
|
|
|
|
|
|
$aktleistung = array_filter($userEnergyProv, function($entry2) use ($user, $manager) {
|
|
|
|
|
|
return $entry2["user"] == $user && $entry2["Writeback"] == $manager;
|
|
});
|
|
|
|
foreach($aktleistung as $entry){
|
|
$aktleistung = $entry;
|
|
}
|
|
|
|
// Überprüfe, ob noch genügend verbleibende Energie für den nächsten Schritt vorhanden ist
|
|
if ($remainingPower >= $powerstep - $aktleistung['Set_Leistung']) {
|
|
// Aktualisiere die verbleibende Energie und die bereitgestellte Energie für den Benutzer
|
|
$remainingPower -= $powerstep - $aktleistung['Set_Leistung'];
|
|
|
|
array_walk($userEnergyProv, function(&$entry3) use ($user, $manager, $powerstep) {
|
|
if ($entry3["user"] == $user && $entry3["Writeback"] == $manager) {
|
|
$entry3["Set_Leistung"] = $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
|
|
|
|
$resultArray[] = $userEnergyProv[$userInstanceID]; //[
|
|
// 'InstanceID' => $user['InstanceID'],
|
|
// 'Writeback' => $user['Writeback'],
|
|
// 'Set_Leistung' => $leistung
|
|
// ];
|
|
|
|
}
|
|
|
|
|
|
|
|
}
|
|
|
|
//IPS_LogMessage("Manager", print_r($resultArray));
|
|
|
|
$writebackArrays = [];
|
|
foreach ($resultArray as $user) {
|
|
$writeback = $user['Writeback'];
|
|
|
|
if (!isset($writebackArrays[$writeback])) {
|
|
$writebackArrays[$writeback] = [];
|
|
}
|
|
$writebackArrays[$writeback][] = $user;
|
|
}
|
|
|
|
// Schritt 2: Foreach-Schleife pro Writeback-Array
|
|
foreach ($writebackArrays as $writeback => $users) {
|
|
$resultArray = [
|
|
'timestamp' => time(),
|
|
'Is_Peak_Shaving' => $Is_Peak_Shaving,
|
|
'User' => []
|
|
];
|
|
|
|
foreach ($users as $user) {
|
|
$resultArray['User'][] = [
|
|
'InstanceID' => $user['user'],
|
|
'Set_Leistung' => $user['Set_Leistung']
|
|
];
|
|
}
|
|
|
|
// Schritt 3: Array in String konvertieren
|
|
$resultString = json_encode($resultArray);
|
|
|
|
// Schritt 4: RequestAction aufrufen
|
|
RequestAction($writeback, $resultString);
|
|
}
|
|
|
|
|
|
|
|
}
|
|
}
|
|
?>
|