2 # Copyright (C) 2016 Ian Kelling
4 # Licensed under the Apache License, Version 2.0 (the "License");
5 # you may not use this file except in compliance with the License.
6 # You may obtain a copy of the License at
8 # http://www.apache.org/licenses/LICENSE-2.0
10 # Unless required by applicable law or agreed to in writing, software
11 # distributed under the License is distributed on an "AS IS" BASIS,
12 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 # See the License for the specific language governing permissions and
14 # limitations under the License.
16 script=$
(readlink
-f -- "$BASH_SOURCE")
18 [[ $EUID == 0 ]] ||
exec sudo
-E "$script" "$@"
20 source /usr
/local
/lib
/err
24 Usage: ${0##*/} [OPTIONS]
26 -h|--help Print help and exit.
27 -f|--force Use kill -9 to try fixing unmount errors
28 -v|--verbose Be more verbose
31 Note, at source location, intentionally not executable, run and read
34 Note: Uses util-linux getopt option parsing: spaces between args and
35 options, short options can be combined, options before args.
42 while read -r line
; do
44 grep -xFq "$line" "$file" ||
tee -a "$file"<<<"$line"
65 if ! mountpoint
-q $dir; then
71 while read -r start mpoint end
; do
72 l
="$start $mpoint $end"
73 # kill off any lines that duplicate the mount point.
74 sed --follow-symlinks -ri "\%$l%b;\%^\s*\S+\s+$mpoint\s%d" /etc
/fstab
80 for m
in ${my_pids[@]}; do
82 echo "$0: error: pids to kill includes our pid or a parent. ps output:" >&2
93 if pids
=$
(timeout
4 lsof
-t $dir); then
95 timeout
4 lsof
-w $dir
99 # fuser will find open sockets that lsof won't, for example from gpg-agent.
100 # note: -v shows kernel processes, which then doesn't return true when we want
101 if pids
=$
(timeout
4 fuser
-m $dir 2>/dev
/null
); then
104 fuser
-$sig -mvk $dir
107 if ! $found_pids; then
115 if mountpoint
-q $dir; then
116 if m umount
-R $dir; then
119 if ! kill-dir TERM TERM TERM INT INT HUP HUP TERM TERM TERM INT INT HUP HUP
; then
120 if $force; then kill-dir KILL
; fi
123 if m umount
-R $dir; then
126 echo "$0: failed to umount $dir"
134 # duplicated in check-subvol
138 if [[ $devref == /dev
/dm-
* ]]; then
139 for mapdev
in /dev
/mapper
/*; do
140 if [[ $
(readlink
-f $mapdev) == "$devref" ]]; then
149 ##### begin command line parsing ########
151 # you can remove this if you do not have options which can have args with spaces or empty.
155 temp
=$
(getopt
-l help,force
,verbose hfv
"$@") || usage
1
159 -f|
--force) force
=true
;;
160 -v|
--verbose) verbose
=true
;;
163 *) echo "$0: unexpected args: $*" >&2 ; usage
1 ;;
168 ##### end command line parsing ########
172 ##### begin setup fstab for subvols we care about ######
174 if [[ -e /mnt
/root
/root2-crypttab
]]; then
175 tu
/etc
/crypttab
</mnt
/root
/root2-crypttab
176 while read -r mapper_dev _
; do
177 if [[ ! -e /dev
/mapper
/$mapper_dev ]]; then
178 m cryptdisks_start
$mapper_dev
180 done < <(cat /mnt
/root
/root2-crypttab
)
182 if [[ -e /mnt
/root
/root2-fstab
]]; then
183 tu
/etc
/fstab
</mnt
/root
/root2-fstab
188 root_dev
=$
(awk '$2 == "/" {print $1}' /etc
/mtab
)
191 # root2_dev=$(awk '$2 == "/mnt/root2" {print $1}' /etc/mtab)
192 # mapper-dev root2_dev
193 # # dont bother with the above for crypt2_dev
194 # crypt2_dev=$root2_dev
197 if cryptsetup status
$root_dev &>/dev
/null
; then
199 else # if we are in a recovery boot, find the next best crypt device
201 for dev
in $
(dmsetup
ls --target crypt |
awk '{print $1}'); do
203 if awk '{print $1}' /etc
/mtab |
grep -Fx $dev &>/dev
/null
; then
212 # dont tax the cpus of old laptops
213 if ((`nproc` > 2)); then
214 mopts
+=,compress=zstd
218 $crypt_dev /a btrfs noatime,subvol=a$mopts 0 0
223 # ssh and probably some other things care about parent directory
224 # ownership, and ssh doesn\'t allow any group writable parent
225 # directories, so we are forced to use a directory structure similar
226 # to home directories
227 f
=(/mnt
/root
/btrbk
/q.
*); f
=${f[0]}
230 $crypt_dev /q btrfs noatime,subvol=q,gid=1000$mopts 0 0
231 /q/p /p none bind$mopts 0 0
235 f
=(/mnt
/root
/btrbk
/o.
*); f
=${f[0]}
238 $crypt_dev /o btrfs noatime,subvol=o$mopts 0 0
239 /o/m /m none bind$mopts 0 0
243 if [[ $HOSTNAME == frodo
]]; then
245 $crypt_dev /i btrfs noatime,subvol=i$mopts 0 0
251 ##### end setup fstab for subvols we care about ######
253 ### begin get pids that this program depends on so we dont kill them
257 while [[ ${my_pids[-1]} != 1 && ${my_pids[-1]} != ${my_pids[-2]} && $count -lt $loop_limit ]]; do
259 p
=$
(ps
-p ${my_pids[-1]} -o ppid
=)
260 if [[ $p == 0 ||
! $p ]]; then
265 ### end get pids that this program depends on so we dont kill them
267 for vol
in q a o i
; do
269 if ! awk '{print $2}' /etc
/fstab |
grep -xF $d &>/dev
/null
; then
274 ##### begin building up list of bind mounts ######
275 binds
=() # list of bind mounts
279 for r
in ${roots[@]}; do
280 # eg. when r=/q/p, for lines like
281 # /q/p /p none bind 0 0
283 new_roots
+=($
(sed -rn "s#^$r/\S+\s+(\S+)\s+none\s+(\S+,|)bind[[:space:],].*#\1#p" /etc
/fstab
))
285 (( ${#new_roots} )) ||
break
286 binds
+=(${new_roots[@]})
287 # roots is used to recursively find binds of binds if they exist.
288 roots
=( ${new_roots[@]} )
290 ##### end building up list of bind mounts ######
293 # if latest is already mounted, make sure binds are mounted and move on
294 m check-subvol-stale
$d
295 # populated by check-subvol-stale if stale
296 if ! fresh_snap
=$
(cat /nocow
/btrfs-stale
/$vol 2>/dev
/null
); then
299 for b
in ${binds[@]}; do
300 if mountpoint
-q $b; then
302 if [[ $did != $bid ]]; then
311 ## not using arbtt at the moment
312 # if [[ $vol == q ]]; then
313 # ## allow to fail, user might not be logged in
314 # x sudo -u $(id -nu 1000) XDG_RUNTIME_DIR=/run/user/1000 systemctl --user stop arbtt ||:
318 for dir
in $
(echo $d ${binds[*]}\ |
tac -s\
); do
322 # if we unmounted some but not all, restore them and move on
323 if ! $umount_ret; then
324 for dir
in ${unmounted[@]}; do
330 #### begin dealing with leaf vols ####
332 ### begin getting root_dir
333 ### this is duplicated in check-subvol-stale
335 dev
=$
(sed -rn "s,^\s*([^#]\S*)\s+$d\s.*,\1,p" /etc
/fstab
/etc
/mtab|
head -n1)
337 # note, we need $dev because $d might not be mounted, and we do this loop
338 # because the device in fstab for the rootfs can be different.
339 for devx
in $
(btrfs fil show
$dev|
sed -rn 's#.*path (\S+)$#\1#p'); do
340 if [[ $devx == dm-
* ]]; then
345 root_dir
=$
(sed -rn "s,^\s*$devx\s+(\S+).*\bsubvolid=[05]\b.*,\1,p" /etc
/mtab
/etc
/fstab|
head -n1)
346 if [[ $root_dir ]]; then
351 if [[ ! $root_dir ]]; then
352 echo "$0: error could not find root subvol mount for $dev" >&2
355 ### end getting root_dir
358 if [[ -e $vol ]]; then
359 leaf
=$vol.leaf.$
(date +%Y-
%m-
%dT
%H
:%M
:%S
%z
)
361 m btrfs property
set -ts $leaf ro true
363 ### begin check if leaf is different, delete it if not ###
364 if [[ -e /a
/opt
/btrfs-snapshots-diff
/btrfs-snapshots-diff.py
]]; then
365 source /a
/bin
/distro-functions
/src
/package-manager-abstractions
366 #pi python-jmespath # dependency of btrfs-snapshots-diff
367 # todo: need python3 port of btrfs-snapshots-diff, py2 no exist on nabia
368 parentid
=$
(btrfs sub show
$leaf |
awk '$1 == "Parent" && $2 == "UUID:" {print $3}')
369 bsubs
=(/mnt
/root
/btrbk
/$vol.
*)
371 # go in reverse order as its more likely to be at the end
372 for ((i
=${#bsubs[@]}-1; i
>=0; i--
)); do
373 if [[ $parentid == $
(btrfs sub show
${bsubs[i]} |
awk '$1 == "UUID:" {print $2}') ]]; then
380 # in testing, same subvol is 136 bytes. allow some overhead. 32 happens sometimes under systemd.
382 # EPIPE 32 Broken pipe
383 btrfs send
--no-data -p $bsub $leaf |
head -c 1000 > $tmp ||
[[ $?
== 141 ||
${PIPESTATUS[0]} == 32 ]]
384 if (( $
(stat
-c%s
$tmp) < 1000)); then
385 # example output for an empty diff:
386 # Found a valid Btrfs stream header, version 1
387 # o.leaf.2019-05-15T14:00:50-0400;snapshot: uuid=ba045ea30737dd449003f1ee40ec12d0, ctrasid=109533, clone_uuid=3c7e3544e486834aa71d89e5b8f30056, clone_ctransid=109533
388 lines
=$
(/a
/opt
/btrfs-snapshots-diff
/btrfs-snapshots-diff.py
-s -f $tmp | \
389 grep -vxF "Found a valid Btrfs stream header, version 1" | \
390 grep -cv "^[^;]*;snapshot: ") ||
:
391 if [[ $lines == 0 ]]; then
392 # rotate in case we find a bug, weve got 2 old ones
393 tmpleaf
=($vol.tmpleaf2.
*)
394 if (( ${#tmpleaf[@]} )); then
395 x btrfs sub del
${tmpleaf[@]}
397 tmpleaf
=($vol.tmpleaf1.
*)
398 if (( ${#tmpleaf[@]} )); then
399 x
mv ${tmpleaf[0]} $vol.tmpleaf2.
${tmpleaf[0]#$vol.tmpleaf1.}
401 echo suspected identical
: $bsub $leaf
402 x
mv $leaf $vol.tmpleaf1.
${leaf#$vol.leaf.}
407 ### end check if leaf is different, delete it if not ###
409 ## begin expire leaf vols ##
410 leaf_vols
=($vol.leaf.
*)
411 count
=${#leaf_vols[@]}
412 leaf_limit_time
=$
(( EPOCHSECONDS
- 60*60*24*60 )) # 60 days
413 leaf_new_limit_time
=$
(( EPOCHSECONDS
- 60*60*24 )) # 1 day
414 # this goes backwards from oldest. leaf_new_limit_time is just in case
415 # the order gets screwed up or something.
416 for leaf
in ${leaf_vols[@]}; do
417 leaf_time
=$
(date -d ${leaf#$vol.leaf.} +%s
)
418 if (( leaf_limit_time
> leaf_time ||
( leaf_new_limit_time
> leaf_time
&& count
> 15 ) )); then
419 x btrfs sub del
$leaf
423 ## end expire leaf vols ##
425 #### end dealing with leaf vols ####
427 # Note, we make a few assumptions in this script, like
428 # $d was not a different subvol id than $vol, and
429 # things otherwise didn't get mounted very strangely.
430 m btrfs sub snapshot
$fresh_snap $vol
431 for dir
in $d ${binds[@]}; do
435 ## arbtt disabled for now
436 # if [[ $vol == q ]]; then
437 # # maybe this will fail if X is not running
438 # x sudo -u $(id -nu 1000) XDG_RUNTIME_DIR=/run/user/1000 systemctl --user start arbtt ||:
441 stale_dir
=/nocow
/btrfs-stale
447 for dir
in /mnt
/r
7/amy
/{root
/root
,boot
/boot
}_ubuntubionic
/mnt
/{root
2/root
,boot
2/boot
}_ubuntubionic
; do
450 if [[ ! -d $root_dir ]]; then
451 # this only exists on host kd currently
454 # if latest is already mounted, make sure binds are mounted and move on
455 m check-subvol-stale
-p $dir
456 # populated by check-subvol-stale if stale
457 if ! fresh_snap
=$
(cat /nocow
/btrfs-stale
/$vol 2>/dev
/null
); then
460 if [[ -d $dir ]]; then
461 if ! kill-dir TERM TERM TERM INT INT HUP HUP TERM TERM TERM INT INT HUP HUP
; then
462 if $force; then kill-dir KILL
; fi
466 m btrfs sub snapshot
$fresh_snap $dir
467 rm -f /nocow
/btrfs-stale
/$vol