percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-13 14:39:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

missing plugin.t and all_hooks.pm for pt-table-checksum --plugin functionality

Browse Source
This commit is contained in:
Kenny Gryp
2014-03-25 17:00:42 +01:00
parent d84c3b26b5
commit 4ecae6b50f
2 changed files with 143 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

45
t/pt-table-checksum/samples/plugins/all_hooks.pm Normal file
View File

@@ -0,0 +1,45 @@
package pt_table_checksum_plugin;
use strict;
use warnings FATAL => 'all';
use English qw(-no_match_vars);
use constant PTDEBUG => $ENV{PTDEBUG} || 0;
sub new {
my ($class, %args) = @_;
my $self = { %args };
return bless $self, $class;
}
sub init {
my ($self, %args) = @_;
print "PLUGIN init\n";
}
sub before_replicate_check {
my ($self, %args) = @_;
print "PLUGIN before_replicate_check\n";
}
sub after_replicate_check {
my ($self, %args) = @_;
print "PLUGIN after_replicate_check\n";
}
sub override_slavelag_check {
my ($self, %args) = @_;
print "PLUGIN override_slavelag_check\n";
return sub { return 0; };
}
sub before_checksum_table {
my ($self, %args) = @_;
print "PLUGIN before_checksum_table\n";
}
sub after_checksum_table {
my ($self, %args) = @_;
print "PLUGIN after_checksum_table\n";
}
1;