RepoMirrors
/
mars
mirror of https://github.com/schoebel/mars
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

marsadm: tolerate missing version symlinks upon fake

This commit is contained in:
Thomas Schoebel-Theuer 2012-09-12 10:01:34 +02:00 committed by Thomas Schoebel-Theuer
parent c124e9d290
commit 6f77dcc562
1 changed files with 9 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
userspace/marsadm
View File

@ -330,7 +330,6 @@ sub _fake_versionlink {
$prev =~ s/^log-([0-9]+)-.*$/$1/;
$prev--;
if($prev > 0) {
print "creating faked version symlink...\n";
my $prevversion = sprintf("$basedir/version-%09d-$primary", $prev);
my $prevlink = readlink($prevversion);
if (!$prevlink) { # try any one else
@ -338,10 +337,15 @@ sub _fake_versionlink {
my @test = glob($prevversion);
$prevlink = shift @test;
}
die "cannot read symlink '$prevversion'\n" unless $prevlink;
my $myversion = sprintf("$basedir/version-%09d-$host", $prev);
symlink($prevlink, "$myversion.tmp") or die "cannot create faked version symlink '$myversion'\n";
system("mv $myversion.tmp $myversion");
if ($prevlink) {
print "creating faked version symlink...\n";
my $myversion = sprintf("$basedir/version-%09d-$host", $prev);
system("rm -f $myversion.tmp");
symlink($prevlink, "$myversion.tmp") or die "cannot create faked version symlink '$myversion'\n";
system("mv $myversion.tmp $myversion");
} else {
warn "cannot read symlink '$prevversion' -- cannot create fake\n";
}
}
}