added iszfsbusy check to pruning routine
This commit is contained in:
parent
763e63e5c2
commit
97382ed9d8
4
sanoid
4
sanoid
|
@ -201,8 +201,12 @@ sub prune_snapshots {
|
||||||
writelock('sanoid_pruning');
|
writelock('sanoid_pruning');
|
||||||
foreach my $snap( @prunesnaps ){
|
foreach my $snap( @prunesnaps ){
|
||||||
print "pruning $snap ... \n";
|
print "pruning $snap ... \n";
|
||||||
|
if (iszfsbusy($path)) {
|
||||||
|
print "INFO: deferring pruning of $snap - $path is currently in zfs send or receive.\n";
|
||||||
|
} else {
|
||||||
system($zfs, "destroy","-Rr",$snap) == 0 or die "could not remove $snap : $?";
|
system($zfs, "destroy","-Rr",$snap) == 0 or die "could not remove $snap : $?";
|
||||||
}
|
}
|
||||||
|
}
|
||||||
removelock('sanoid_pruning');
|
removelock('sanoid_pruning');
|
||||||
$forcecacheupdate = 1;
|
$forcecacheupdate = 1;
|
||||||
%snaps = getsnaps(%config,$cacheTTL,$forcecacheupdate);
|
%snaps = getsnaps(%config,$cacheTTL,$forcecacheupdate);
|
||||||
|
|
Loading…
Reference in New Issue