micke/cluster_cron
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

working uncomment

Browse source
This commit is contained in:
Mikael Nordin 2017-01-16 14:41:21 +01:00 • committed by GitHub
parent 67de4dc9cb
commit 4e953583a7
1 changed files with 13 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
cluster_cron.pl
View file

@ -154,7 +154,7 @@ sub uncomment {
open(INFILE,"<$infile");
my $content = '';
while(my $line = <INFILE>) {
$line =~ s/^(#\s?)([\d*])/ $2/g;
$line =~ s/^#\s{1,4}([\d\*])/ $1/g;
$content .= $line;
}
@ -216,9 +216,18 @@ sub run {
# If we have an active shared cronfile, we should also have an old shared
# See if I am the one
if (is_active(get_nodes) ){
if(compare($cronfile, $passivesharedcronfile) == 0 and compare($cronfile, $activesharedcronfile) != 0) {
print "There has been a failover, switching to active cronfile\n";
copy($activesharedcronfile, $cronfile);
if(compare($cronfile, $passivesharedcronfile) == 0 ) {
my $is_empty = 1;
open my $fh, '<:encoding(UTF-8)', $activesharedcronfile or die;
while (my $line = <$fh>) {
if ($line !~ m/^#/) {
$is_empty = 0;
}
}
unless($is_empty) {
print "There has been a failover, switching to active cronfile\n";
copy($activesharedcronfile, $cronfile);
}
}
my $tempfile = tmpnam();
my $compare = cron_compare($cronfile, $activesharedcronfile, $oldactivesharedcronfile );