database/postgres
database/postgres
1
0
Fork 0
mirror of https://github.com/postgres/postgres.git synced 2025-04-25 21:42:33 +03:00
Code

pg_basebackup: Add tests for -R option

Browse Source 
Reviewed-by: Michael Paquier <michael.paquier@gmail.com>
This commit is contained in:
Peter Eisentraut 2015-06-30 21:15:05 -04:00
parent 5d0e8bc9e0
commit 36dc30aa7e
2 changed files with 16 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/bin/pg_basebackup/t/010_pg_basebackup.pl
View File

@ -2,7 +2,7 @@ use strict;
use warnings; use warnings;
use Cwd; use Cwd;
use TestLib; use TestLib;
use Test::More tests => 35; use Test::More tests => 39;
program_help_ok('pg_basebackup'); program_help_ok('pg_basebackup');
program_version_ok('pg_basebackup'); program_version_ok('pg_basebackup');
@ -138,3 +138,10 @@ psql 'postgres',
command_ok([ 'pg_basebackup', '-D', "$tempdir/tarbackup_l3", '-Ft' ], command_ok([ 'pg_basebackup', '-D', "$tempdir/tarbackup_l3", '-Ft' ],
'pg_basebackup tar with long symlink target'); 'pg_basebackup tar with long symlink target');
psql 'postgres', "DROP TABLESPACE tblspc3;"; psql 'postgres', "DROP TABLESPACE tblspc3;";
command_ok([ 'pg_basebackup', '-D', "$tempdir/backupR", '-R' ],
'pg_basebackup -R runs');
ok(-f "$tempdir/backupR/recovery.conf", 'recovery.conf was created');
my $recovery_conf = slurp_file "$tempdir/backupR/recovery.conf";
like($recovery_conf, qr/^standby_mode = 'on'$/m, 'recovery.conf sets standby_mode');
like($recovery_conf, qr/^primary_conninfo = '.*port=$ENV{PGPORT}.*'$/m, 'recovery.conf sets primary_conninfo');

8
src/test/perl/TestLib.pm
View File

@ -11,6 +11,7 @@ our @EXPORT = qw(
start_test_server start_test_server
restart_test_server restart_test_server
psql psql
slurp_file
system_or_bail system_or_bail
system_log system_log
run_log run_log
@ -175,6 +176,13 @@ sub psql
run [ 'psql', '-X', '-q', '-d', $dbname, '-f', '-' ], '<', \$sql or die; run [ 'psql', '-X', '-q', '-d', $dbname, '-f', '-' ], '<', \$sql or die;
} }
sub slurp_file
{
local $/;
local @ARGV = @_;
<>
}
sub system_or_bail sub system_or_bail
{ {
if (system_log(@_) != 0) if (system_log(@_) != 0)