1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
-- source include/not_embedded.inc
--echo #
--echo # Bug#13541194 : MTR TEST TO RUN EMBEDDED SERVER CLIENT TESTS IN MYSQL_CLIENT_TEST.C.
--echo #
# Stop the server
let $restart_file= $MYSQLTEST_VARDIR/tmp/mysqld.1.expect;
--exec echo "wait" > $restart_file
--shutdown_server 10
--source include/wait_until_disconnected.inc
--echo stopped the current server
perl;
my $cli_string = $ENV{'MYSQL_CLIENT_TEST'};
my $filestring = 'file';
$cli_string =~ s/mysql_client_test/mysql_client_test_embedded/;
if ($cli_string =~ /(.+?)\s/) {
$filestring = $1;
}
my $emb_cli = 0;
if (-e $filestring){
open (ISLINK, ">" . $ENV{'MYSQL_TMP_DIR'} . "/embedded_cli");
$emb_cli = 1;
print ISLINK "let \$emb_client = $cli_string;\n";
print ISLINK "let \$emb_cli_exists = $emb_cli;\n";
close ISLINK;
}
else {
open (ISLINK, ">" . $ENV{'MYSQL_TMP_DIR'} . "/embedded_cli");
print ISLINK "let \$emb_client = $cli_string;\n";
close ISLINK;
}
EOF
--source $MYSQL_TMP_DIR/embedded_cli
--remove_file $MYSQL_TMP_DIR/embedded_cli
if (! $emb_cli_exists){
--skip Test only works with embedded server
}
--exec $emb_client --silent >> $MYSQLTEST_VARDIR/log/mysql_embedded_client_test.out.log 2>&1
--echo # 7. Restart the server and cleanup
#-----------------------------------------
--enable_reconnect
--exec echo "restart" > $restart_file
--source include/wait_until_connected_again.inc
|
