postgres.git / summary / log / commit / refs

commit    9778a191a4c0d814f34160a6a2e595cc842d5abe
Author:   Robert Haas <rhaas@postgresql.org>
Date:     Wed Jun 09 16:30:49 2021 +0000
First released in: 10.18, 11.13, 12.8, 13.4

    Allow PostgresNode.pm's backup method to accept backup_options.
    
    Partial back-port of commit 081876d75ea15c3bd2ee5ba64a794fd8ea46d794.
    A test case for a pending bug fix needs this capability, but the code
    on 9.6 is significantly different, so I'm only back-patching this
    change as far as v10. We'll have to work around the problem another
    way in v9.6.
    
    Discussion: http://postgr.es/m/CAFiTN-tcivNvL0Rg6rD7_CErNfE75H7+gh9WbMxjbgsattja1Q@mail.gmail.com


 src/test/perl/PostgresNode.pm | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/src/test/perl/PostgresNode.pm b/src/test/perl/PostgresNode.pm
index 453a1ac16da..eab49071e15 100644
--- a/src/test/perl/PostgresNode.pm
+++ b/src/test/perl/PostgresNode.pm
@@ -504,8 +504,11 @@ sub append_conf
 =item $node->backup(backup_name)
 
 Create a hot backup with B<pg_basebackup> in subdirectory B<backup_name> of
-B<< $node->backup_dir >>, including the WAL. WAL files
-fetched at the end of the backup, not streamed.
+B<< $node->backup_dir >>, including the WAL.
+
+By default, WAL files are fetched at the end of the backup, not streamed.
+You can adjust that and other things by passing an array of additional
+B<pg_basebackup> command line options in the keyword parameter backup_options.
 
 You'll have to configure a suitable B<max_wal_senders> on the
 target server since it isn't done by default.
@@ -514,7 +517,7 @@ target server since it isn't done by default.
 
 sub backup
 {
-	my ($self, $backup_name) = @_;
+	my ($self, $backup_name, %params) = @_;
 	my $backup_path = $self->backup_dir . '/' . $backup_name;
 	my $name        = $self->name;
 
@@ -522,7 +525,8 @@ sub backup
 	TestLib::system_or_bail(
 		'pg_basebackup', '-D', $backup_path, '-h',
 		$self->host,     '-p', $self->port,  '--checkpoint',
-		'fast',          '--no-sync');
+		'fast',          '--no-sync',
+		@{ $params{backup_options} });
 	print "# Backup finished\n";
 }
 


[parent: 16a7ed765d6f]