percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-14 15:33:49 +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

10
t/lib/KeySize.t
View File

@@ -21,7 +21,7 @@ require VersionParser;
my $dp = new DSNParser(opts=>$dsn_opts);
my $sb = new Sandbox(basedir => '/tmp', DSNParser => $dp);
my $dbh = $sb->get_dbh_for('master');
my $dbh = $sb->get_dbh_for('source');
if ( !$dbh ) {
plan skip_all => "Cannot connect to sandbox master";
@@ -38,7 +38,7 @@ my ($size, $chosen_key);
sub key_info {
my ( $file, $db, $tbl, $key, $cols ) = @_;
$sb->load_file('master', $file, $db);
$sb->load_file('source', $file, $db);
my $tbl_name = $q->quote($db, $tbl);
my $struct = $tp->parse( load_file($file) );
return (
@@ -83,7 +83,7 @@ is_deeply(
'Two column int key'
);
$sb->load_file('master', 't/lib/samples/issue_331-parent.sql', 'test');
$sb->load_file('source', 't/lib/samples/issue_331-parent.sql', 'test');
%key = key_info('t/lib/samples/issue_331.sql', 'test', 'issue_331_t2', 'fk_1', ['id']);
($size, $chosen_key) = $ks->get_key_size(%key);
is(
@@ -110,7 +110,7 @@ $dbh->do('DROP TABLE IF EXISTS test.issue_364');
'BASE_KID_ID',
[qw(BASE_KID_ID ID)]
);
$sb->load_file('master', 't/lib/samples/issue_364-data.sql', 'test');
$sb->load_file('source', 't/lib/samples/issue_364-data.sql', 'test');
# This issue had another issue: the key is ALL CAPS, but TableParser
# lowercases all identifies, so KeySize said the key didn't exist.
@@ -214,7 +214,7 @@ is(
# #############################################################################
# https://bugs.launchpad.net/percona-toolkit/+bug/1201443
# #############################################################################
$sb->load_file('master', "t/pt-duplicate-key-checker/samples/fk_chosen_index_bug_1201443.sql");
$sb->load_file('source', "t/pt-duplicate-key-checker/samples/fk_chosen_index_bug_1201443.sql");
($size, $chosen_key) = $ks->get_key_size(
name => 'child_ibfk_2',