database/postgres
1
0
Fork 0
mirror of https://github.com/postgres/postgres.git synced 2025-07-30 11:03:19 +03:00
Code Activity

Back out rserv changes that would allow limit of replicated tables ---

Browse Source 
not ready yet.
This commit is contained in:
Bruce Momjian
2003-06-25 21:37:53 +00:00
parent 111d8e522b
commit ec67d2a3fe
2 changed files with 5 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
contrib/rserv/Replicate.in
View File

@ -32,7 +32,6 @@ if (defined($opt_help) || (scalar(@ARGV) < 2)) {
my $master = $ARGV[0] || "master";
my $slave = $ARGV[1] || "slave";
my $tables = $#ARGV < 2 ? undef : { map {($_, undef)} @ARGV[2..$#ARGV] };
my $server = 0;
my $minfo = "dbname=$master";
@ -57,7 +56,7 @@ SyncSync($mconn, $sconn);
my $outf = new IO::File;
open $outf, ">$snapshot";
print "\n>>>>>>>>>>>>> Prepare Snapshot\n\n" if ($verbose);
$res = PrepareSnapshot($mconn, $outf, $server, $tables);
$res = PrepareSnapshot($mconn, $outf, $server);
close $outf;
die "\n>>>>>>>>>>>>> ERROR\n" if $res < 0;
if ($res == 0)
@ -69,7 +68,7 @@ if ($res == 0)
my $inpf = new IO::File;
open $inpf, "<$snapshot";
print "\n>>>>>>>>>>>>> Apply Snapshot\n\n" if ($verbose);
$res = ApplySnapshot($sconn, $inpf, $tables);
$res = ApplySnapshot($sconn, $inpf);
close $inpf;
die "\n>>>>>>>>>>>>> ERROR\n" if $res < 0;