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

marsadm: safeguard deletion of last logfile

This commit is contained in:
Thomas Schoebel-Theuer 2020-11-06 08:06:57 +01:00
parent e9e5c1a1da
commit f871eb9514
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
userspace/marsadm
View File

@ -5125,9 +5125,12 @@ sub logdelete_res {
}
my $nr = 0;
my $first = shift(@paths);
for (;;) {
my $first = shift(@paths);
last unless $first;
my $next = shift(@paths);
# never delete the very last logfile
last unless $next;
$nr = $first;
$nr =~ s/^.*log-([0-9]+)-.+$/$1/;
next unless $nr < $max_deletable;
@ -5135,6 +5138,7 @@ sub logdelete_res {
lprint "chosen '$first' for deletion\n" if $verbose;
_create_delete($first);
$first = $next;
}
# Determine whether a parallel join-resource is ongoing
my $transient_join = 0;