FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 18:59:33 +00:00
Code Issues Releases Wiki Activity

93_DbLog: contrib 5.5.3

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@26829 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2022-12-10 16:41:49 +00:00
parent 98a05dd7aa
commit bfdb1b35ef
1 changed files with 31 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
fhem/contrib/DS_Starter/93_DbLog.pm
View File

@ -17,7 +17,7 @@
#
# Leerzeichen entfernen: sed -i 's/[[:space:]]*$//' 93_DbLog.pm
#
#########################################################################################################################
############################################################################################################################################
package main;
use strict;
@ -2103,7 +2103,7 @@ sub DbLog_execMemCacheAsync {
$memc->{cdataindex} = $data{DbLog}{$name}{cache}{index}; # aktuellen Index an Subprozess übergeben
undef %{$data{DbLog}{$name}{cache}{memcache}}; # sicherheitshalber Memory freigeben: https://perlmaven.com/undef-on-perl-arrays-and-hashes , bzw. https://www.effectiveperlprogramming.com/2018/09/undef-a-scalar-to-release-its-memory/
undef %{$data{DbLog}{$name}{cache}{memcache}}; # sicherheitshalber Memory freigeben: https://perlmaven.com/undef-on-perl-arrays-and-hashes , bzw. https://www.effectiveperlprogramming.com/2018/09/undef-a-scalar-to-release-its-memory/
$error = DbLog_SBP_sendLogData ($hash, 'log_asynch', $memc); # Subprocess Prozessdaten senden, Log-Daten sind in $memc->{cdata} gespeichert
return if($error);
@ -2278,7 +2278,7 @@ sub DbLog_SBP_onRun {
}
if (!defined $store->{dbparams}{dbstorepars}) {
$error = qq{DB params have not yet been passed to the subprocess. Data is stored temporarily, Params are requested ...};
$error = qq{DB connection params havn't yet been passed to the subprocess. Data is stored temporarily.};
Log3 ($name, 3, "DbLog $name - $error");
@ -2288,6 +2288,8 @@ sub DbLog_SBP_onRun {
Log3 ($name, 4, "DbLog $name - stored: $idx -> ".$logstore->{$idx});
}
Log3 ($name, 3, "DbLog $name - DB Connection parameters were requested ...");
$ret = {
name => $name,
msg => $error,
@ -2702,8 +2704,6 @@ sub _DbLog_SBP_onRun_Log {
return;
};
__DbLog_SBP_commitOnly ($name, $dbh, $history);
if($ins_hist == $ceti) {
Log3 ($name, 4, "DbLog $name - $ins_hist of $ceti events inserted into table $history".($usepkh ? " using PK on columns $pkh" : ""));
}
@ -2715,6 +2715,8 @@ sub _DbLog_SBP_onRun_Log {
Log3 ($name, 2, "DbLog $name - WARNING - only ".$ins_hist." of $ceti events inserted into table $history");
}
}
__DbLog_SBP_commitOnly ($name, $dbh, $history);
}
# insert current mit/ohne primary key
@ -7655,10 +7657,16 @@ return;
</li>
<br>
<a id="DbLog-set-stopSubProcess"></a>
<li><b>set &lt;name&gt; stopSubProcess </b> <br><br>
<ul>
A running SubProcess is terminated. <br>
As soon as a new subprocess is required by a Log operation, an automatic reinitialization of a process takes place.
<br><br>
<b>Note</b> <br>
If the sub-process is reinitialized during runtime, the RAM consumption is increased, which is normalized
again after a FHEM restart.
</ul>
</li>
<br>
@ -9235,11 +9243,17 @@ attr SMA_Energymeter DbLogValueFn
</li>
<br>
<a id="DbLog-set-stopSubProcess"></a>
<li><b>set &lt;name&gt; stopSubProcess </b> <br><br>
<ul>
Ein laufender SubProzess wird beendet. <br>
Sobald durch eine Log-Operation ein neuer SubProzess benötigt wird, erfolgt eine automatische Neuinitialisierung
eines Prozesses.
Sobald durch eine Operation ein neuer SubProzess benötigt wird, erfolgt die automatische Neuinitialisierung
eines SubProzesses.
<br><br>
<b>Hinweis</b> <br>
Bei Neuinitialisierung des SubProzesses während der Laufzeit ergibt sich ein erhöhter RAM Verbrauch der sich
nach einem FHEM Neustart wieder normalisiert.
</ul>
</li>
<br>