From 36cb6ab2b401dd34172fdb6c9a76dfec5ce8e5e7 Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Mon, 4 Sep 2023 09:52:58 +0000 Subject: [PATCH] TcpServerUtils.pm: Log "ssl accept attempt failed" with level 5 (Forum #134820) git-svn-id: https://svn.fhem.de/fhem/trunk@27931 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/TcpServerUtils.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/fhem/FHEM/TcpServerUtils.pm b/fhem/FHEM/TcpServerUtils.pm index b2c35dc90..bf33c3b50 100644 --- a/fhem/FHEM/TcpServerUtils.pm +++ b/fhem/FHEM/TcpServerUtils.pm @@ -331,10 +331,10 @@ TcpServer_Accept($$) && $err ne "Socket is not connected") { $err = "" if(!$err); $err .= " ".($SSL_ERROR ? $SSL_ERROR : IO::Socket::SSL::errstr()); - my $errLevel = ($err =~ m/error:14094416:SSL/ ? 5 : 1); # 61511 + my $errLevel = ($err =~ m/error:14094416:SSL/ || # 61511 + $err =~ m/ssl accept attempt failed/i ? 5 : 1); #134820 Log3 $name, $errLevel, "$type SSL/HTTPS error: $err (peer: $caddr)" - if($err !~ m/error:00000000:lib.0.:func.0.:reason.0./ && #56364 - $err !~ m/sslv3 alert certificate unknown/); #134820 + if($err !~ m/error:00000000:lib.0.:func.0.:reason.0./); #56364 close($clientinfo[0]); return undef; }