From ce46b5c8de6f164222c5f884a3007b1c70e2d25e Mon Sep 17 00:00:00 2001 From: Ground0 Date: Thu, 30 Mar 2023 15:40:27 +0200 Subject: [PATCH] Log Bugfix .... --- lweb.pbi | 17 +++++++++++------ 1 file changed, 11 insertions(+), 6 deletions(-) diff --git a/lweb.pbi b/lweb.pbi index 65a1e9c..263e4f2 100644 --- a/lweb.pbi +++ b/lweb.pbi @@ -312,10 +312,12 @@ Module lhs_web counter + 1 configuration\hosts()\log\AccesslogUUID = lhs_log_ext::Create("Accesslog "+configuration\hosts()\description) configuration\hosts()\log\ErrorlogUUID = lhs_log_ext::Create("Errorlog "+configuration\hosts()\description) + lhs_log_ext::SetLogFile(configuration\hosts()\log\AccesslogUUID, configuration\hosts()\log\AccesslogFile) + lhs_log_ext::SetLogFile(configuration\hosts()\log\ErrorlogUUID, configuration\hosts()\log\ErrorlogFile) lhs_log_ext::Init(configuration\hosts()\log\AccesslogUUID) lhs_log_ext::Init(configuration\hosts()\log\ErrorlogUUID) - ldl::Register(lhs_log_ext::@Out(), configuration\hosts()\log\AccesslogUUID) - ldl::Register(lhs_log_ext::@Out(), configuration\hosts()\log\ErrorlogUUID) + ldl::Register(lhs_log_ext::@Out(), configuration\hosts()\log\AccesslogUUID, 0,configuration\hosts()\log\AccesslogUUID ,ldl::#AdvancedLog) + ldl::Register(lhs_log_ext::@Out(), configuration\hosts()\log\ErrorlogUUID, 0,configuration\hosts()\log\ErrorlogUUID ,ldl::#AdvancedLog) ldl::Logging("Accesslog UUID:"+configuration\hosts()\log\AccesslogUUID) ldl::Logging("Errorlog UUID:"+configuration\hosts()\log\ErrorlogUUID) @@ -654,13 +656,16 @@ Module lhs_web ldl::Logging("JSONString:"+ JSONStringToMap) thread_type = "" - If configuration\log\AccesslogUUID <> "" + If AccessLog <> "" If m_clients(Str(thread_cli_id))\client_type = #client_HTTPS - ldl::Logging(lsocket::GetSocketIP(tls::GetSocket(thread_cli_id)) + " " + Header(#http_head_method) + " " + Header(#http_head_request), AccessLog) + ldl::Logging("Connect:"+lsocket::GetSocketIP(tls::GetSocket(thread_cli_id)) + " " + Header(#http_head_method) + " " + Header(#http_head_request), AccessLog) + ldl::Logging("Connect:"+lsocket::GetSocketIP(tls::GetSocket(thread_cli_id)) + " " + Header(#http_head_method) + " " + Header(#http_head_request)) Else - ldl::Logging(lsocket::GetSocketIP(thread_cli_id) + " " + Header(#http_head_method) + " " + Header(#http_head_request), AccessLog) + ldl::Logging("Connect:"+lsocket::GetSocketIP(thread_cli_id) + " " + Header(#http_head_method) + " " + Header(#http_head_request), AccessLog) + ldl::Logging("Connect:"+lsocket::GetSocketIP(thread_cli_id) + " " + Header(#http_head_method) + " " + Header(#http_head_request)) EndIf - + Else + ldl::Logging("Empty accesslog:["+AccessLog+"]") EndIf Select Header(#http_head_method)