mirrors/postgres
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Rename undocumented utility SyncSyncID to MasterSync.

Browse Source 
Document MasterSync.
Fix up a couple of print statements to respect $verbose and $debug.
This commit is contained in:
Thomas G. Lockhart 2000-12-21 15:26:04 +00:00
parent e6e9e18e9e
commit e59e805d83
5 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
contrib/rserv/GetSyncID.in
View File

@ -34,7 +34,7 @@ $sinfo = "$sinfo host=$opt_host" if (defined($opt_host));
$sinfo = "$sinfo user=$opt_user" if (defined($opt_user));
$sinfo = "$sinfo password=$opt_password" if (defined($opt_password));
if ($verbose) { print "Connecting to '$sinfo'\n" };
print("Connecting to '$sinfo'\n") if ($debug || $verbose);
my $conn = Pg::connectdb($sinfo);
$res = GetSyncID($conn);

5
contrib/rserv/Makefile
View File

@ -13,8 +13,9 @@ OBJS = $(NAME).o
DOCS = README.$(NAME)
SQLS = master.sql slave.sql
TCLS = RservTest
PERLS = MasterInit SlaveInit MasterAddTable SlaveAddTable Replicate CleanLog
PERLS += PrepareSnapshot ApplySnapshot GetSyncID SyncSyncID
PERLS = MasterInit MasterAddTable Replicate MasterSync CleanLog
PERLS += SlaveInit SlaveAddTable GetSyncID
PERLS += PrepareSnapshot ApplySnapshot
LIBS = RServ.pm
SCRIPTS = InitRservTest
MODS = $(OBJS:.o=$(DLSUFFIX))

2
contrib/rserv/SyncSyncID.in → contrib/rserv/MasterSync.in
View File

@ -1,5 +1,5 @@
# -*- perl -*-
# SyncSyncID
# MasterSync
# Vadim Mikheev, (c) 2000, PostgreSQL Inc.
eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'

7
contrib/rserv/README.rserv
View File

@ -48,7 +48,12 @@ Replicate masterdb slavedb
GetSyncID [--noverbose] slavedb
returns the last syncid the specified slave has seen. May be used
in conjunction with CleanLog using the --noverbose option.
in conjunction with SyncSyncID and CleanLog using the --noverbose
option.
MasterSync masterdb syncid
registers a syncid with the specified master database. Used to
propagate replication success back to the master database.
CleanLog masterdb syncid
removes obsolete entries in the master database replication log

2
contrib/rserv/SlaveInit.in
View File

@ -38,7 +38,7 @@ sub RollbackAndQuit {
exit (-1);
}
print "Connecting to $sinfo\n";
print("Connecting to $sinfo\n") if ($debug || $verbose);
my $conn = Pg::connectdb($sinfo);
if ($conn->status != PGRES_CONNECTION_OK) {
print STDERR "Failed opening $sinfo\n";