Commit 4174c685 authored by Magnus Svensson's avatar Magnus Svensson

WL#4189 Wrap the check for socket path length in eval

parent 7e0869b9
......@@ -102,14 +102,22 @@ sub check_socket_path_length {
require IO::Socket::UNIX;
my $sock = new IO::Socket::UNIX
my $sock;
eval {
$sock= new IO::Socket::UNIX
(
Local => $path,
Listen => 1,
);
};
if ($@)
{
print $@, '\n';
return 2;
}
if (!defined $sock){
# Could not create a UNIX domain socket
return 0; # Ok, will not be used by mysqld either
return 3;
}
if ($path ne $sock->hostpath()){
# Path was truncated
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment