Merge branch '3.0' into PT-63

2025-09-09 07:30:02 +00:00 · 2017-03-30 11:08:12 -03:00
parent cd23d7b163 4ff8e664ae
commit e4f1625d30
31 changed files with 176 additions and 32 deletions
--- a/bin/pt-align
+++ b/bin/pt-align
@@ -680,7 +680,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-archiver
+++ b/bin/pt-archiver
@@ -1409,7 +1409,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-config-diff
+++ b/bin/pt-config-diff
@@ -1407,7 +1407,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-deadlock-logger
+++ b/bin/pt-deadlock-logger
@@ -757,7 +757,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-diskstats
+++ b/bin/pt-diskstats
@@ -753,7 +753,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-duplicate-key-checker
+++ b/bin/pt-duplicate-key-checker
@@ -1744,7 +1744,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-fifo-split
+++ b/bin/pt-fifo-split
@@ -681,7 +681,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-find
+++ b/bin/pt-find
@@ -1173,7 +1173,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-fingerprint
+++ b/bin/pt-fingerprint
@@ -682,7 +682,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-fk-error-logger
+++ b/bin/pt-fk-error-logger
@@ -752,7 +752,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-heartbeat
+++ b/bin/pt-heartbeat
@@ -1518,7 +1518,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-index-usage
+++ b/bin/pt-index-usage
@@ -1334,7 +1334,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-kill
+++ b/bin/pt-kill
@@ -762,7 +762,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-online-schema-change
+++ b/bin/pt-online-schema-change
@@ -770,7 +770,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-query-digest
+++ b/bin/pt-query-digest
@@ -2002,7 +2002,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-show-grants
+++ b/bin/pt-show-grants
@@ -683,7 +683,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-slave-delay
+++ b/bin/pt-slave-delay
@@ -755,7 +755,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-slave-find
+++ b/bin/pt-slave-find
@@ -690,7 +690,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-slave-restart
+++ b/bin/pt-slave-restart
@@ -907,7 +907,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-table-checksum
+++ b/bin/pt-table-checksum
@@ -2431,7 +2431,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-table-sync
+++ b/bin/pt-table-sync
@@ -770,7 +770,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-table-usage
+++ b/bin/pt-table-usage
@@ -1775,7 +1775,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-upgrade
+++ b/bin/pt-upgrade
@@ -1999,7 +1999,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-variable-advisor
+++ b/bin/pt-variable-advisor
@@ -759,7 +759,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size
--- a/bin/pt-visual-explain
+++ b/bin/pt-visual-explain
@@ -1356,7 +1356,11 @@ sub _validate_type {
      if (!$opt->{attributes}->{repeatable}) {
          $opt->{value} = $self->{DSNParser}->parse($val, $prev, $defaults);
      } else {
-          push @{$opt->{value}}, $self->{DSNParser}->parse($val, $prev, $defaults);
+          my $values = [];
+          for my $dsn_string (@$val) {
+              push @$values, $self->{DSNParser}->parse($dsn_string, $prev, $defaults);
+          }
+          $opt->{value} = $values;
      }
   }
   elsif ( $val && $opt->{type} eq 'z' ) {  # type size