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

Rename pt-table-checksum/replicate.t to basics.t.

Browse Source
This commit is contained in:
Daniel Nichter
2011-10-11 10:39:11 -06:00
parent 937a514b49
commit df7366d302
1 changed files with 9 additions and 57 deletions
Download Patch File Download Diff File Expand all files Collapse all files

66
t/pt-table-checksum/replicate.t → t/pt-table-checksum/basics.t
View File

@@ -31,7 +31,7 @@ elsif ( !@{$master_dbh->selectall_arrayref('show databases like "sakila"')} ) {
plan skip_all => 'sakila database is not loaded';
}
else {
plan tests => 4;
plan tests => 5;
}
my $cnf = '/tmp/12345/my.sandbox.cnf';
@@ -49,35 +49,6 @@ sub reset_repl_db {
$master_dbh->do("use $repl_db");
}
sub set_tx_isolation {
my ( $level ) = @_;
$master_dbh->do("set global transaction isolation level $level");
$master_dbh->disconnect();
$master_dbh = $sb->get_dbh_for('master');
$row = $master_dbh->selectrow_arrayref("show variables like 'tx_isolation'");
$level =~ s/ /-/g;
$level = uc $level;
is(
$row->[1],
$level,
"Tx isolation $level"
);
}
sub set_binlog_format {
my ( $format ) = @_;
$master_dbh->do("set global binlog_format=$format");
$master_dbh->disconnect();
$master_dbh = $sb->get_dbh_for('master');
$row = $master_dbh->selectrow_arrayref("show variables like 'binlog_format'");
$format = uc $format;
is(
$row->[1],
$format,
"Binlog format $format"
);
}
reset_repl_db();
diag(`rm $outfile >/dev/null 2>&1`);
@@ -125,37 +96,18 @@ $row = $master_dbh->selectrow_arrayref("select count(*) from percona.checksums")
is(
$row->[0],
78,
'78 checksums'
'78 checksums on master'
);
# #############################################################################
# Issue 720: mk-table-checksum --replicate should set transaction isolation
# level
# #############################################################################
#SKIP: {
# skip "binlog_format test for MySQL v5.1+", 6
# unless $sandbox_version gt '5.0';
#
# empty_repl_tbl();
# set_binlog_format('row');
# set_tx_isolation('read committed');
#
# $output = output(
# sub { pt_table_checksum::main(@args) },
# stderr => 1,
# );
# like(
# $output,
# qr/test\s+checksum_test\s+0\s+127.0.0.1\s+MyISAM\s+1\s+83dcefb7/,
# "Set session transaction isolation level repeatable read"
# );
#
# set_binlog_format('statement');
# set_tx_isolation('repeatable read');
#}
$row = $slave_dbh->selectrow_arrayref("select count(*) from percona.checksums");
is(
$row->[0],
78,
'78 checksums on slave'
);
# #############################################################################
# Done.
# #############################################################################
#$sb->wipe_clean($master_dbh);
$sb->wipe_clean($master_dbh);
exit;