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

marsadm: fix _fake_versionlink() after /mars/ full

This commit is contained in:
Thomas Schoebel-Theuer 2014-01-27 15:17:22 +01:00
parent 63171f66ae
commit b3a1d7ffa2
1 changed files with 12 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
userspace/marsadm
View File

@ -829,31 +829,21 @@ sub _get_ip {
sub _fake_versionlink {
my ($basedir, $log_nr, $primary) = @_;
my $new_version = sprintf("$basedir/version-%09d-$host", $log_nr);
my $pri_version = sprintf("$basedir/version-%09d-$primary", $log_nr);
if ($primary eq $host) {
ldie "Cannot fake my own version link '$new_version'\n";
}
my $pri_link = get_link($pri_version);
if (!$pri_link) { # try any one else
lwarn "cannot read symlink '$pri_version' -- trying a neighbor link instead\n";
my $try_version = sprintf("$basedir/version-%09d-*", $log_nr);
my @test = glob($try_version);
my $test_version = shift @test;
if ($test_version) {
lwarn "trying substitute symlink '$test_version'\n";
my $test_link = get_link($test_version);
if ($test_link) {
$pri_link = $test_link;
lwarn "got value '$pri_link', hopefully this is right\n" if $pri_link;
}
for (my $rounds = 2; $rounds > 0; $rounds--) {
my $new_version = sprintf("$basedir/version-%09d-$host", $log_nr);
my $pri_version = sprintf("$basedir/version-%09d-$primary", $log_nr);
if ($primary eq $host) {
ldie "Cannot fake my own version link '$new_version'\n";
}
my $pri_link = get_link($pri_version, 1);
if (!$pri_link) {
lwarn "cannot read symlink '$pri_version' -- cannot create faked versionlink '$pri_version'\n";
$log_nr++;
next;
}
}
if ($pri_link) {
lprint "creating new version symlink '$new_version' -> '$pri_link'\n";
set_link($pri_link, $new_version);
} else {
lwarn "cannot read symlink '$pri_version' -- cannot create faked versionlink '$pri_version'\n";
last;
}
}