mirror of
https://github.com/postgres/postgres.git
synced 2025-04-21 12:05:57 +03:00
201a76183e
There is only one constructor now for PostgresNode, with the idiomatic
name 'new'. The method is not exported by the class, and must be called
as "PostgresNode->new('name',[args])". All the TAP tests that use
PostgresNode are modified accordingly. Third party scripts will need
adjusting, which is a fairly mechanical process (I just used a sed
script).
68 lines
2.1 KiB
Perl
68 lines
2.1 KiB
Perl
|
|
# Copyright (c) 2021, PostgreSQL Global Development Group
|
|
|
|
# Test primary/standby scenario where the track_commit_timestamp GUC is
|
|
# repeatedly toggled on and off.
|
|
use strict;
|
|
use warnings;
|
|
|
|
use TestLib;
|
|
use Test::More tests => 4;
|
|
use PostgresNode;
|
|
|
|
my $bkplabel = 'backup';
|
|
my $primary = PostgresNode->new('primary');
|
|
$primary->init(allows_streaming => 1);
|
|
$primary->append_conf(
|
|
'postgresql.conf', qq{
|
|
track_commit_timestamp = on
|
|
max_wal_senders = 5
|
|
});
|
|
$primary->start;
|
|
$primary->backup($bkplabel);
|
|
|
|
my $standby = PostgresNode->new('standby');
|
|
$standby->init_from_backup($primary, $bkplabel, has_streaming => 1);
|
|
$standby->start;
|
|
|
|
for my $i (1 .. 10)
|
|
{
|
|
$primary->safe_psql('postgres', "create table t$i()");
|
|
}
|
|
$primary->append_conf('postgresql.conf', 'track_commit_timestamp = off');
|
|
$primary->restart;
|
|
$primary->safe_psql('postgres', 'checkpoint');
|
|
my $primary_lsn =
|
|
$primary->safe_psql('postgres', 'select pg_current_wal_lsn()');
|
|
$standby->poll_query_until('postgres',
|
|
qq{SELECT '$primary_lsn'::pg_lsn <= pg_last_wal_replay_lsn()})
|
|
or die "standby never caught up";
|
|
|
|
$standby->safe_psql('postgres', 'checkpoint');
|
|
$standby->restart;
|
|
|
|
my ($psql_ret, $standby_ts_stdout, $standby_ts_stderr) = $standby->psql(
|
|
'postgres',
|
|
qq{SELECT ts.* FROM pg_class, pg_xact_commit_timestamp(xmin) AS ts WHERE relname = 't10'}
|
|
);
|
|
is($psql_ret, 3, 'expect error when getting commit timestamp after restart');
|
|
is($standby_ts_stdout, '', "standby does not return a value after restart");
|
|
like(
|
|
$standby_ts_stderr,
|
|
qr/could not get commit timestamp data/,
|
|
'expected err msg after restart');
|
|
|
|
$primary->append_conf('postgresql.conf', 'track_commit_timestamp = on');
|
|
$primary->restart;
|
|
$primary->append_conf('postgresql.conf', 'track_commit_timestamp = off');
|
|
$primary->restart;
|
|
|
|
system_or_bail('pg_ctl', '-D', $standby->data_dir, 'promote');
|
|
|
|
$standby->safe_psql('postgres', "create table t11()");
|
|
my $standby_ts = $standby->safe_psql('postgres',
|
|
qq{SELECT ts.* FROM pg_class, pg_xact_commit_timestamp(xmin) AS ts WHERE relname = 't11'}
|
|
);
|
|
isnt($standby_ts, '',
|
|
"standby gives valid value ($standby_ts) after promotion");
|