From 267c90e28718f09a1e88d448901403520b9427d6 Mon Sep 17 00:00:00 2001
From: Jonathan Jenne <j.jenne@digitaldata.works>
Date: Thu, 14 May 2020 13:12:46 +0200
Subject: [PATCH] Logging: Keep debug file open to prevent massive slowdown
 when writing many log messages

---
 Modules.Logging/LogConfig.vb | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/Modules.Logging/LogConfig.vb b/Modules.Logging/LogConfig.vb
index 66e92604..11831477 100644
--- a/Modules.Logging/LogConfig.vb
+++ b/Modules.Logging/LogConfig.vb
@@ -56,7 +56,13 @@ Imports NLog.Targets
 ''' </remarks>
 Public Class LogConfig
 #Region "Private Properties"
+    Private Const OPEN_FILE_CACHE_TIMEOUT As Integer = 5
+    Private Const OPEN_FILE_FLUSH_TIMEOUT As Integer = 5
+    Private Const AUTO_FLUSH As Boolean = True
+
     Private Const KEEP_FILES_OPEN As Boolean = False
+    Private Const KEEP_FILES_OPEN_DEBUG As Boolean = True
+
     ' MAX_ARCHIVES_FILES works like this (in version 4.5.8):
     ' 0 = keep ALL archives files
     ' 1 = only keep latest logfile and NO archive files
@@ -427,7 +433,10 @@ Public Class LogConfig
             .Layout = LOG_FORMAT_DEBUG,
             .MaxArchiveFiles = MAX_ARCHIVE_FILES_DEBUG_DETAIL,
             .ArchiveEvery = ARCHIVE_EVERY,
-            .KeepFileOpen = KEEP_FILES_OPEN
+            .KeepFileOpen = KEEP_FILES_OPEN_DEBUG,
+            .OpenFileCacheTimeout = OPEN_FILE_CACHE_TIMEOUT,
+            .AutoFlush = AUTO_FLUSH,
+            .OpenFileFlushTimeout = OPEN_FILE_FLUSH_TIMEOUT
         }
 
         Return debugLog