mirror/mariadb
1
0
Fork 0
mirror of https://github.com/MariaDB/server.git synced 2025-01-18 21:12:26 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Magnus Svensson 2008-09-15 16:27:12 +02:00
parent 7e0869b9f1
commit 4174c68595
1 changed files with 14 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
mysql-test/lib/My/Platform.pm
View file

@ -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