percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-02 02:34:19 +00:00
Code Issues Packages Projects Releases Wiki Activity

PT-2340 - Support MySQL 8.4

Browse Source 
- Removed offensive terminology from library files and their tests
- Removed unused sandbox/prove2junit.pl
- Added option mysql_ssl to DSN and possibility to have DSN of multiple letters
This commit is contained in:
Sveta Smirnova
2024-07-23 22:28:05 +03:00
parent a530c6f84c
commit e2207ea232
49 changed files with 1131 additions and 398 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
sandbox/gtid_on-legacy.sql Normal file
View File

@@ -0,0 +1,8 @@
STOP SLAVE FOR CHANNEL '';
SET GLOBAL master_info_repository = 'TABLE';
SET @@GLOBAL.relay_log_info_repository = 'TABLE';
SET @@GLOBAL.ENFORCE_GTID_CONSISTENCY=ON;
SET @@GLOBAL.GTID_MODE = OFF_PERMISSIVE;
SET @@GLOBAL.GTID_MODE = ON_PERMISSIVE;
SET @@GLOBAL.GTID_MODE = ON;

56
sandbox/prove2junit.pl
View File

@@ -1,56 +0,0 @@
#!/usr/bin/env perl
use strict;
use warnings;
my $file = $ARGV[0];
my $testcase = "";
my $testsuite = "";
my $error_collect = "";
my $open_error = 0;
if (not defined $file) {
die "Need filename as parameter!\n";
}
sub close_error {
if ( $open_error == 1 ) {
print "$error_collect ]]></system-err></testcase>\n";
$error_collect=""; $open_error=0;
}
return;
}
open (my $info, $file) or die "Could not open $file: $!";
print "<testsuites name=\"PT-MySQL\">\n";
while(my $line = <$info>) {
if ($line =~ /^(t\/)(\S+)(\/)(\S+).* (\.*) (skipped:) (.*)$/) {
close_error();
print "<testcase name=\"$4\"><skipped/><system-out>Skip reason:<![CDATA[ $7 ]]></system-out></testcase>\n";
}
elsif ($line =~ /^ok (\d+) - (.*)$/) {
close_error();
print "<testcase name=\"$testcase - test $1\"><system-out>Test description:<![CDATA[ $2 ]]></system-out></testcase>\n";
}
elsif ($line =~ /^not ok (\d+) - (.*)$/) {
close_error();
print "<testcase name=\"$testcase - test $1\"><failure/><system-out>Test description:<![CDATA[ $2 ]]></system-out><system-err><![CDATA[ ";
$open_error=1;
}
elsif ($line =~ /^(t\/)(\S+)(\/)(\S+).* (\.*) $/) {
close_error();
if ( "$2" eq "$testsuite" ) {
$testcase="$4"; $error_collect="";
}
else {
if ( "$testsuite" ne "" ) { print "</testsuite>\n"; }
$testsuite="$2"; $testcase="$4"; $error_collect=""; print "<testsuite name=\"$testsuite\">\n";
}
}
elsif ($line !~ /^ok$/ && $line !~ /^\d+..\d+$/) {
$error_collect=$error_collect . $line;
}
}
print "</testsuite>\n</testsuites>\n";

13
sandbox/replica_channels.sql Normal file
View File

@@ -0,0 +1,13 @@
STOP REPLICA FOR CHANNEL '';
SET @@GLOBAL.ENFORCE_GTID_CONSISTENCY=ON;
SET @@GLOBAL.GTID_MODE = OFF_PERMISSIVE;
SET @@GLOBAL.GTID_MODE = ON_PERMISSIVE;
SET @@GLOBAL.GTID_MODE = ON;
CHANGE REPLICATION SOURCE TO source_host='127.0.0.1', source_port=12345, source_user='msandbox', source_password='msandbox', source_auto_position=1 FOR CHANNEL 'sourcechan1';
CHANGE REPLICATION SOURCE TO source_host='127.0.0.1', source_port=12346, source_user='msandbox', source_password='msandbox', source_auto_position=1 FOR CHANNEL 'sourcechan2';
START REPLICA for channel 'sourcechan1';
START REPLICA for channel 'sourcechan2';

1
sandbox/servers/8.4/my.sandbox.cnf
View File

@@ -3,6 +3,7 @@ user = msandbox
password = msandbox
port = PORT
socket = /tmp/PORT/mysql_sandboxPORT.sock
ssl-mode=PREFERRED
[mysqld]
port = PORT