Merge lp:~percona-toolkit-dev/percona-toolkit/fix-dupe-key-checker-bug-969669 into lp:percona-toolkit/2.1

[Daniel Nichter]

[Daniel Nichter (daniel-nichter)]

review: Approve

=== modified file 'bin/pt-duplicate-key-checker'
--- bin/pt-duplicate-key-checker	2012-07-13 01:42:54 +0000
+++ bin/pt-duplicate-key-checker	2012-07-19 21:37:33 +0000
@@ -3566,7 +3566,7 @@
          $fks = $tp->get_fks($tbl->{ddl},  {database => $tbl->{db}});
       }
 
-      next TABLE unless %$keys || %$fks;
+      next TABLE unless ($keys && %$keys) || ($fks && %$fks);
 
       if ( $o->got('verbose') ) {
          print_all_keys($keys, $tbl, \%seen_tbl) if $keys;

=== modified file 't/pt-duplicate-key-checker/basics.t'
--- t/pt-duplicate-key-checker/basics.t	2012-06-05 01:46:35 +0000
+++ t/pt-duplicate-key-checker/basics.t	2012-07-19 21:37:33 +0000
@@ -23,7 +23,7 @@
    plan skip_all => 'Cannot connect to sandbox master';
 }
 else {
-   plan tests => 10;
+   plan tests => 13;
 }
 
 my $output;
@@ -108,6 +108,35 @@
 );
 
 # #############################################################################
+# --key-types
+# https://bugs.launchpad.net/percona-toolkit/+bug/969669 
+# #############################################################################
+
+ok(
+   no_diff(
+      sub { pt_duplicate_key_checker::main(@args,
+         qw(-d sakila --key-types k)) },
+      "$sample/key-types-k.txt"),
+   '--key-types k'
+);
+
+ok(
+   no_diff(
+      sub { pt_duplicate_key_checker::main(@args,
+         qw(-d sakila --key-types f)) },
+      "$sample/key-types-f.txt"),
+   '--key-types f'
+);
+
+ok(
+   no_diff(
+      sub { pt_duplicate_key_checker::main(@args,
+         qw(-d sakila --key-types fk)) },
+      "$sample/key-types-fk.txt"),
+   '--key-types fk (explicit)'
+);
+
+# #############################################################################
 # Done.
 # #############################################################################
 $sb->wipe_clean($dbh);

=== added file 't/pt-duplicate-key-checker/samples/key-types-f.txt'
--- t/pt-duplicate-key-checker/samples/key-types-f.txt	1970-01-01 00:00:00 +0000
+++ t/pt-duplicate-key-checker/samples/key-types-f.txt	2012-07-19 21:37:33 +0000
@@ -0,0 +1,5 @@
+# ########################################################################
+# Summary of indexes                                                      
+# ########################################################################
+
+# Total Indexes  22

=== added file 't/pt-duplicate-key-checker/samples/key-types-fk.txt'
--- t/pt-duplicate-key-checker/samples/key-types-fk.txt	1970-01-01 00:00:00 +0000
+++ t/pt-duplicate-key-checker/samples/key-types-fk.txt	2012-07-19 21:37:33 +0000
@@ -0,0 +1,5 @@
+# ########################################################################
+# Summary of indexes                                                      
+# ########################################################################
+
+# Total Indexes  63

=== added file 't/pt-duplicate-key-checker/samples/key-types-k.txt'
--- t/pt-duplicate-key-checker/samples/key-types-k.txt	1970-01-01 00:00:00 +0000
+++ t/pt-duplicate-key-checker/samples/key-types-k.txt	2012-07-19 21:37:33 +0000
@@ -0,0 +1,5 @@
+# ########################################################################
+# Summary of indexes                                                      
+# ########################################################################
+
+# Total Indexes  41