RepoMirrors/mars
1
0
Fork 0
mirror of https://github.com/schoebel/mars synced 2025-01-14 02:50:48 +00:00
Code Issues Packages Projects Releases Wiki Activity

marsadm: cleanup outdated messages

Browse Source
This commit is contained in:
Thomas Schoebel-Theuer 2017-09-17 00:18:00 +02:00
parent e297acde10
commit 978d3de51b
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
userspace/marsadm
View File

@ -2391,6 +2391,12 @@ sub logdelete_res {
lprint " unlink '$leftlink'\n" if $verbose;
unlink($leftlink);
}
foreach my $leftlink (glob("$mars/{,resource-$res/}actual-*/msg-*")) {
my $stamp = get_link_stamp($leftlink);
next unless $stamp + 3600 * 4 < $start_time;
lprint " unlink '$leftlink'\n" if $verbose;
unlink($leftlink);
}
my @paths = glob("$mars/resource-$res/log-*") or ldie "cannot find any logfiles\n";
@paths = sort(@paths);
my ($min_deletable, $max_deletable) = _get_deletable_logfiles(@_);