FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-25 09:55:38 +00:00
Code Issues Releases Wiki Activity

93_DbLog: contrib 5.5.3

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@26832 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2022-12-10 20:38:00 +00:00
parent 1e3bb94a23
commit e045180d32
1 changed files with 30 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -587,7 +587,7 @@ sub DbLog_Attr {
}
}
if ($aName eq "SQLiteCacheSize" || $aName eq "SQLiteJournalMode") {
if ($aName =~ /SQLite/xs) {
if ($init_done == 1) {
DbLog_SBP_sendDbDisconnect ($hash, 1); # DB Verbindung und Verbindungsdaten im SubProzess löschen
InternalTimer(gettimeofday()+2.0, 'DbLog_SBP_sendConnectionData', $hash, 0); # neue Verbindungsdaten an SubProzess senden
@ -2565,9 +2565,12 @@ sub _DbLog_SBP_onRun_Log {
my $ret;
my $retjson;
if($tl) { # Tracelevel setzen
if ($tl) { # Tracelevel setzen
$dbh->{TraceLevel} = "$tl|$tf";
}
else {
$dbh->{TraceLevel} = '0';
}
my $ac = $dbh->{AutoCommit} ? "ON" : "OFF";
my $tm = $useta ? "ON" : "OFF";
@ -2669,10 +2672,17 @@ sub _DbLog_SBP_onRun_Log {
$error = __DbLog_SBP_beginTransaction ($name, $dbh, $useta);
eval { $sth_ih = $dbh->prepare($sqlins);
$sth_ih->{TraceLevel} = "$tl|$tf" if($tl); # Tracelevel setzen
$ins_hist = $sth_ih->execute();
$ins_hist = 0 if($ins_hist eq "0E0");
eval { $sth_ih = $dbh->prepare($sqlins);
if ($tl) { # Tracelevel setzen
$sth_ih->{TraceLevel} = "$tl|$tf";
}
else {
$sth_ih->{TraceLevel} = '0';
}
$ins_hist = $sth_ih->execute();
$ins_hist = 0 if($ins_hist eq "0E0");
1;
}
or do { $error = $@;
@ -2748,10 +2758,14 @@ sub _DbLog_SBP_onRun_Log {
}
);
if($tl) { # Tracelevel setzen
if ($tl) { # Tracelevel setzen
$sth_uc->{TraceLevel} = "$tl|$tf";
$sth_ic->{TraceLevel} = "$tl|$tf";
}
else {
$sth_uc->{TraceLevel} = '0';
$sth_ic->{TraceLevel} = '0';
}
$sth_uc->bind_param_array (1, [@timestamp]);
$sth_uc->bind_param_array (2, [@type]);
@ -2865,9 +2879,12 @@ sub _DbLog_SBP_onRun_Log {
return;
}
if($tl) { # Tracelevel setzen
if ($tl) { # Tracelevel setzen
$sth_ih->{TraceLevel} = "$tl|$tf";
}
else {
$sth_ih->{TraceLevel} = '0';
}
$sth_ih->bind_param_array (1, [@timestamp]);
$sth_ih->bind_param_array (2, [@device]);
@ -2995,10 +3012,14 @@ sub _DbLog_SBP_onRun_Log {
}
);
if($tl) { # Tracelevel setzen
if ($tl) { # Tracelevel setzen
$sth_uc->{TraceLevel} = "$tl|$tf";
$sth_ic->{TraceLevel} = "$tl|$tf";
}
else {
$sth_uc->{TraceLevel} = '0';
$sth_ic->{TraceLevel} = '0';
}
$sth_uc->bind_param_array (1, [@timestamp]);
$sth_uc->bind_param_array (2, [@type]);