rearrange zpool args, style
This commit is contained in:
parent
547d01009e
commit
f1be6dc83d
|
@ -10,61 +10,62 @@ VERSION='v1.4.0'
|
|||
|
||||
usage() {
|
||||
local prog=${0##*/}
|
||||
cat <<-EOF
|
||||
usage: $prog [-hnliqRvV] [-p <prefix>] [-s <suffix>] <time> [[dataset1] ...]
|
||||
cat <<EOF
|
||||
usage: $prog [-hnliqRvV] [-p <prefix>] [-s <suffix>] <time> [[dataset1] ...]
|
||||
|
||||
remove snapshots from one or more zpools that match given criteria
|
||||
remove snapshots from one or more zpools that match given criteria
|
||||
|
||||
examples
|
||||
# $prog 1w
|
||||
remove snapshots older than a week across all zpools
|
||||
examples
|
||||
# $prog 1w
|
||||
remove snapshots older than a week across all zpools
|
||||
|
||||
# $prog -vn 1w
|
||||
same as above, but with increased verbosity and without
|
||||
actually deleting any snapshots (dry-run)
|
||||
# $prog -vn 1w
|
||||
same as above, but with increased verbosity and without
|
||||
actually deleting any snapshots (dry-run)
|
||||
|
||||
# $prog 3w tank1 tank2/backup
|
||||
remove snapshots older than 3 weeks on tank1 and tank2/backup.
|
||||
note that this script will recurse through *all* of tank1 and
|
||||
*all* datasets below tank2/backup
|
||||
# $prog 3w tank1 tank2/backup
|
||||
remove snapshots older than 3 weeks on tank1 and tank2/backup.
|
||||
note that this script will recurse through *all* of tank1 and
|
||||
*all* datasets below tank2/backup
|
||||
|
||||
# $prog -p 'autosnap_' 1M zones
|
||||
remove snapshots older than a month on the zones pool that start
|
||||
with the string "autosnap_"
|
||||
# $prog -p 'autosnap_' 1M zones
|
||||
remove snapshots older than a month on the zones pool that start
|
||||
with the string "autosnap_"
|
||||
|
||||
# $prog -s '_frequent' 2M tank
|
||||
remove snapshots older than two months on the tank pool that end
|
||||
with the string "_frequent"
|
||||
# $prog -s '_frequent' 2M tank
|
||||
remove snapshots older than two months on the tank pool that end
|
||||
with the string "_frequent"
|
||||
|
||||
# $prog -i -p 'autosnap_' 1M zones
|
||||
remove snapshots older than a month on the zones pool that do not
|
||||
start with the string "autosnap_"
|
||||
# $prog -i -p 'autosnap_' 1M zones
|
||||
remove snapshots older than a month on the zones pool that do not
|
||||
start with the string "autosnap_"
|
||||
|
||||
timespec
|
||||
the first argument denotes how old a snapshot must be for it to
|
||||
be considered for deletion - possible specifiers are
|
||||
timespec
|
||||
the first argument denotes how old a snapshot must be for it to
|
||||
be considered for deletion - possible specifiers are
|
||||
|
||||
s seconds
|
||||
m minutes
|
||||
h hours
|
||||
d days
|
||||
w weeks
|
||||
M months
|
||||
y years
|
||||
s seconds
|
||||
m minutes
|
||||
h hours
|
||||
d days
|
||||
w weeks
|
||||
M months
|
||||
y years
|
||||
|
||||
options
|
||||
-h print this message and exit
|
||||
-n dry-run, don't actually delete snapshots
|
||||
-l list only mode, just list matching snapshots names
|
||||
without deleting (like dry-run mode with machine-parseable output)
|
||||
-p <prefix> snapshot prefix string to match
|
||||
-s <suffix> snapshot suffix string to match
|
||||
-i invert matching of prefix and suffix
|
||||
-q quiet, do not printout removed snapshots
|
||||
-R recursively delete, pass '-R' directly to 'zfs destroy'
|
||||
-v increase verbosity
|
||||
-V print the version number and exit
|
||||
EOF
|
||||
options
|
||||
-h print this message and exit
|
||||
-n dry-run, don't actually delete snapshots
|
||||
-l list only mode, just list matching snapshots names
|
||||
without deleting (like dry-run mode with machine-parseable
|
||||
output)
|
||||
-p <prefix> snapshot prefix string to match
|
||||
-s <suffix> snapshot suffix string to match
|
||||
-i invert matching of prefix and suffix
|
||||
-q quiet, do not printout removed snapshots
|
||||
-R recursively delete, pass '-R' directly to 'zfs destroy'
|
||||
-v increase verbosity
|
||||
-V print the version number and exit
|
||||
EOF
|
||||
}
|
||||
|
||||
debug() {
|
||||
|
@ -144,6 +145,7 @@ human-time() {
|
|||
echo '0 seconds'
|
||||
}
|
||||
|
||||
# convert bytes to a human-readable string
|
||||
human-size() {
|
||||
local bytes=$1
|
||||
|
||||
|
@ -225,6 +227,7 @@ code=0
|
|||
totalused=0
|
||||
numsnapshots=0
|
||||
humanpools=${pools[*]}
|
||||
humanpools=${humanpools:-<all>}
|
||||
|
||||
if $recursive; then
|
||||
destroyargs+=('-R')
|
||||
|
@ -243,40 +246,50 @@ fi
|
|||
# first pass of the pools (to calculate totals and filter unwanted datasets
|
||||
lines=()
|
||||
while read -r line; do
|
||||
read -r creation snapshot used _ <<< "$line"
|
||||
read -r creation used snapshot _ <<< "$line"
|
||||
|
||||
# ensure optional prefix matches
|
||||
snapname=${snapshot#*@}
|
||||
if $invert; then
|
||||
if [[ -n $prefix && $prefix == "${snapname:0:${#prefix}}" ]]; then
|
||||
debug "skipping $snapshot: does match prefix $prefix"
|
||||
if [[ -n $prefix ]]; then
|
||||
match=false
|
||||
if [[ $prefix == "${snapname:0:${#prefix}}" ]]; then
|
||||
match=true
|
||||
fi
|
||||
|
||||
if $invert && $match; then
|
||||
debug "skipping $snapshot: does match prefix '$prefix'"
|
||||
continue
|
||||
fi
|
||||
else
|
||||
if [[ -n $prefix && $prefix != "${snapname:0:${#prefix}}" ]]; then
|
||||
debug "skipping $snapshot: doesn't match prefix $prefix"
|
||||
|
||||
if ! $invert && ! $match; then
|
||||
debug "skipping $snapshot: doesn't match prefix '$prefix'"
|
||||
continue
|
||||
fi
|
||||
fi
|
||||
|
||||
# ensure optional suffix matches
|
||||
if $invert; then
|
||||
if [[ -n $suffix && $suffix == "${snapname: -${#suffix}}" ]]; then
|
||||
debug "skipping $snapshot: does match suffix $suffix"
|
||||
if [[ -n $suffix ]]; then
|
||||
match=false
|
||||
if [[ $suffix == "${snapname: -${#suffix}}" ]]; then
|
||||
match=true
|
||||
fi
|
||||
|
||||
if $invert && $match; then
|
||||
debug "skipping $snapshot: does match suffix '$suffix'"
|
||||
continue
|
||||
fi
|
||||
else
|
||||
if [[ -n $suffix && $suffix != "${snapname: -${#suffix}}" ]]; then
|
||||
debug "skipping $snapshot: doesn't match suffix $suffix"
|
||||
|
||||
if ! $invert && ! $match; then
|
||||
debug "skipping $snapshot: doesn't match suffix '$suffix'"
|
||||
continue
|
||||
fi
|
||||
fi
|
||||
|
||||
# ensure snapshot is older than the cutoff time
|
||||
delta=$((now - creation))
|
||||
humantime=$(human-time "$delta")
|
||||
ht=$(human-time "$delta")
|
||||
if ((delta <= seconds)); then
|
||||
debug "skipping $snapshot: $humantime old"
|
||||
debug "skipping $snapshot: $ht old"
|
||||
continue
|
||||
fi
|
||||
|
||||
|
@ -289,7 +302,7 @@ while read -r line; do
|
|||
((totalused += used))
|
||||
((numsnapshots++))
|
||||
lines+=("$line")
|
||||
done < <(zfs list -Hpo creation,name,used -t snapshot -r "${pools[@]}")
|
||||
done < <(zfs list -Hpo creation,used,name -t snapshot -r "${pools[@]}")
|
||||
|
||||
# finish if running with `-l`
|
||||
if $listonly; then
|
||||
|
@ -299,24 +312,24 @@ fi
|
|||
|
||||
humantotal=$(human-size "$totalused")
|
||||
|
||||
echo "found $numsnapshots snapshots ($humantotal) on pools: ${humanpools:-<all>}"
|
||||
echo "found $numsnapshots snapshots ($humantotal) on pools: $humanpools"
|
||||
|
||||
# process snapshots found
|
||||
i=0
|
||||
for line in "${lines[@]}"; do
|
||||
read -r creation snapshot used _ <<< "$line"
|
||||
read -r creation used snapshot _ <<< "$line"
|
||||
|
||||
((i++))
|
||||
|
||||
delta=$((now - creation))
|
||||
humantime=$(human-time "$delta")
|
||||
humanused=$(human-size "$used")
|
||||
ht=$(human-time "$delta")
|
||||
hu=$(human-size "$used")
|
||||
|
||||
if $dryrun; then
|
||||
echo -n '[dry-run] '
|
||||
fi
|
||||
|
||||
echo "[$i/$numsnapshots] removing $snapshot: $humantime old ($humanused)"
|
||||
echo "[$i/$numsnapshots] removing $snapshot: $ht old ($hu)"
|
||||
|
||||
if ! $dryrun; then
|
||||
zfs destroy "${destroyargs[@]}" "$snapshot" || code=1
|
||||
|
|
Loading…
Reference in New Issue