55 |
|
|
56 |
# first, let's check if a instance is alrealy running |
# first, let's check if a instance is alrealy running |
57 |
|
|
58 |
my $str = $master.'@'.$masterhost.':'.$slave.'@'.$slavehost; |
my $str = $master; |
59 |
|
$str .= '@'.$masterhost if (defined($masterhost)); |
60 |
|
$str .= ':'.$slave; |
61 |
|
$str .= '@'.$slavehost if (defined($slavehost)); |
62 |
my $fname = "/tmp/.lock_rserv-$str"; |
my $fname = "/tmp/.lock_rserv-$str"; |
63 |
if (-e $fname) { |
if (-e $fname) { |
64 |
print STDERR "rServ is already running for $str. Remove $fname to override this.\n"; |
print STDERR "rServ is already running for $str. Remove $fname to override this.\n"; |
149 |
print "\n>>>>>>>>>>>>> Sync SyncID\n\n" if ($verbose); |
print "\n>>>>>>>>>>>>> Sync SyncID\n\n" if ($verbose); |
150 |
print "Get last SyncID from Slave DB\n" if ($verbose); |
print "Get last SyncID from Slave DB\n" if ($verbose); |
151 |
my $syncid = GetSyncID($sconn); |
my $syncid = GetSyncID($sconn); |
152 |
if ($syncid > 0) |
if ($syncid && $syncid > 0) |
153 |
{ |
{ |
154 |
print "Last SyncID applied: $syncid\n" if ($verbose); |
print "Last SyncID applied: $syncid\n" if ($verbose); |
155 |
print "Sync SyncID\n" if ($verbose); |
print "Sync SyncID\n" if ($verbose); |