mirror/mariadb
1
0
Fork 0
mirror of https://github.com/MariaDB/server.git synced 2025-01-15 19:42:28 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix tcp disconnect and perl

Browse source
This commit is contained in:
Oleksandr Byelkin 2019-05-19 20:48:39 +02:00
parent 04fa127bc9
commit 7f8187bc43
2 changed files with 11 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
mysql-test/main/connect.result
View file

@ -421,6 +421,10 @@ Aborted_connects 0
Aborted_connects_preauth 0
SET GLOBAL log_warnings=2;
NOT FOUND /This connection closed normally without authentication/ in mysqld.1.err
# let tcp to detect disconnect
select sleep(1);
sleep(1)
0
SHOW GLOBAL STATUS LIKE 'Aborted_connects%';
Variable_name Value
Aborted_connects 1

11
mysql-test/main/connect.test
View file

@ -471,11 +471,14 @@ SET GLOBAL log_warnings=2;
--perl
use Socket;
use autodie;
socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname("tcp"));
connect(SOCK, pack_sockaddr_in($ENV{MASTER_MYPORT}, inet_aton("localhost")));
socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname("tcp"))
or die "Can't create a tcp socket!\n";
connect(SOCK, pack_sockaddr_in($ENV{MASTER_MYPORT}, inet_aton("localhost")))
or die "Can't connect to port $ENV{MASTER_MYPORT}!\n";
exit(0);
EOF
--echo # let tcp to detect disconnect
select sleep(1);
SHOW GLOBAL STATUS LIKE 'Aborted_connects%';
@ -490,7 +493,7 @@ use Socket;
socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname("tcp"))
or die "Can't create a tcp socket!\n";
connect(SOCK, pack_sockaddr_in($ENV{MASTER_MYPORT}, inet_aton("localhost")))
or die "Can't connect to port $ENV{MASTER_MYPORT}!\n";;
or die "Can't connect to port $ENV{MASTER_MYPORT}!\n";
sleep 3;
exit(0);
EOF