percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2026-05-18 01:00:28 +08:00
Code Issues Packages Projects Releases Wiki Activity

Make pqd exit 1 on invalid --resume line.

Browse Source
This commit is contained in:
Daniel Nichter
2013-06-15 10:33:11 -07:00
parent c337d1ee44
commit 12c3bb307f
1 changed files with 7 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
bin/pt-query-digest
+7 -2
View File
@@ -12662,6 +12662,7 @@ my $aux_dbh; # For --aux-dsn (--since/--until "MySQL expression")
my $resume_file;
my $resume = {};
my $offset;
my $exit_status = 0;
(my $tool = __PACKAGE__) =~ tr/_/-/;
@@ -12671,6 +12672,7 @@ sub main {
$oktorun = 1;
$resume = {};
$offset = undef;
$exit_status = 0;
# ##########################################################################
# Get configuration information.
@@ -12985,7 +12987,10 @@ sub main {
|| !looks_like_number($value)
|| $value < 0 )
{
die "Invalid line in --resume $resume_file: $line\n";
$exit_status = 1;
warn "Invalid line in --resume $resume_file: $line\n";
$oktorun = 0;
return;
}
$resume->{$key} = $value;
} split("\n", $resume_offset);
@@ -13903,7 +13908,7 @@ sub main {
grep { $_ }
($qv_dbh, $qh_dbh, $ps_dbh, $ep_dbh, $aux_dbh);
return 0;
return $exit_status;
} # End main()
# ############################################################################