Skip to content

Commit

Permalink
Fix check_archive_ready for version 10 and above
Browse files Browse the repository at this point in the history
This fixes issue #150.
  • Loading branch information
mbanck-ntap committed Oct 4, 2023
1 parent 89249c3 commit 264458c
Showing 1 changed file with 11 additions and 2 deletions.
13 changes: 11 additions & 2 deletions check_postgres.pl
Original file line number Diff line number Diff line change
Expand Up @@ -9423,8 +9423,17 @@ sub check_wal_files {

## Figure out where the pg_xlog directory is
$SQL = qq{SELECT count(*) AS count FROM $lsfunc($lsargs) WHERE $lsfunc ~ E'^[0-9A-F]{24}$extrabit\$'}; ## no critic (RequireInterpolationOfMetachars)
my $SQL10 = $opt{lsfunc} ? $SQL :
qq{SELECT count(*) AS count FROM pg_ls_waldir() WHERE name ~ E'^[0-9A-F]{24}$extrabit\$'}; ## no critic (RequireInterpolationOfMetachars)
my $SQL10 = "";

if ($extrabit) {
# check_archive_ready
$SQL10 = $opt{lsfunc} ? $SQL :
qq{SELECT count(*) AS count FROM pg_ls_archive_statusdir() WHERE name ~ E'^[0-9A-F]{24}$extrabit\$'}; ## no critic (RequireInterpolationOfMetachars)
} else {
# check_wal_files
$SQL10 = $opt{lsfunc} ? $SQL :
qq{SELECT count(*) AS count FROM pg_ls_waldir() WHERE name ~ E'^[0-9A-F]{24}\$'}; ## no critic (RequireInterpolationOfMetachars)
}

my $info = run_command($SQL, {regex => qr[\d], version => [">9.6 $SQL10"] });

Expand Down

0 comments on commit 264458c

Please sign in to comment.