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" "$@"
23 Usage: ${0##*/} [OPTIONS]
25 -h|--help Print help and exit.
28 Note, at source location, intentionally not executable, run and read
31 Note: Uses util-linux getopt option parsing: spaces between args and
32 options, short options can be combined, options before args.
39 set -E; shopt -s extdebug
44 echo "${BASH_SOURCE[1]}:${BASH_LINENO[0]}:in \`$BASH_COMMAND' returned $err"
46 echo "$0: exiting with code $err"
53 local -i argc_index
=0 frame i start
=${1:-1} max_indent
=8 indent
56 if [[ $
(shopt -p extdebug
) == *-s* ]]; then
60 for ((frame
=0; frame
< ${#FUNCNAME[@]}-1; frame
++)); do
61 argc
=${BASH_ARGC[frame]}
63 ((frame
< start
)) && continue
64 if (( ${#BASH_SOURCE[@]} > 1 )); then
65 source="${BASH_SOURCE[frame+1]}:${BASH_LINENO[frame]}:"
67 indent
=$
((frame-start
+1))
68 indent
=$
((indent
< max_indent ? indent
: max_indent
))
69 printf "%${indent}s↳%sin \`%s" '' "$source" "${FUNCNAME[frame]}"
71 for ((i
=argc_index-1
; i
>= argc_index-argc
; i--
)); do
72 printf " %s" "${BASH_ARGV[i]}"
81 while read -r line
; do
83 grep -xFq "$line" "$file" ||
tee -a "$file"<<<"$line"
99 if ! mountpoint
-q $dir; then
105 while read -r start mpoint end
; do
106 l
="$start $mpoint $end"
107 # kill off any lines that duplicate the mount point.
108 sed --follow-symlinks -ri "\%$l%b;\%^\s*\S+\s+$mpoint\s%d" /etc
/fstab
109 tu
/etc
/fstab
<<<"$l"
114 for m
in ${my_pids[@]}; do
115 if (( p
== m
)); then
116 echo "$0: error: pids to kill includes our pid or a parent. ps output:" >&2
127 if pids
=$
(timeout
4 lsof
-t $dir); then
129 timeout
4 lsof
-w $dir
133 # fuser will find open sockets that lsof won't, for example from gpg-agent.
134 # note: -v shows kernel processes, which then doesn't return true when we want
135 if pids
=$
(timeout
4 fuser
-m $dir 2>/dev
/null
); then
138 fuser
-$sig -mvk $dir
141 if ! $found_pids; then
148 ##### begin command line parsing ########
150 # you can remove this if you do not have options which can have args with spaces or empty.
154 temp
=$
(getopt
-l help,force
,verbose hfv
"$@") || usage
1
158 -f|
--force) force
=true
;;
159 -v|
--verbose) verbose
=true
;;
162 *) echo "$0: unexpected args: $*" >&2 ; usage
1 ;;
167 ##### end command line parsing ########
171 ##### begin setup fstab for subvols we care about ######
172 root_dev
=$
(awk '$2 == "/" {print $1}' /etc
/mtab
)
173 if [[ $root_dev == /dev
/dm-
* ]]; then
174 for d
in /dev
/mapper
/*; do
175 if [[ $
(readlink
-f $d) == "$root_dev" ]]; then
182 if cryptsetup status
$root_dev &>/dev
/null
; then
184 else # if we are in a recovery boot, find the next best crypt device
186 for dev
in $
(dmsetup
ls --target crypt |
awk '{print $1}'); do
188 if awk '{print $1}' /etc
/mtab |
grep -Fx $dev &>/dev
/null
; then
197 $crypt_dev /a btrfs noatime,subvol=a$noauto 0 0
202 # ssh and probably some other things care about parent directory
203 # ownership, and ssh doesn\'t allow any group writable parent
204 # directories, so we are forced to use a directory structure similar
205 # to home directories
206 f
=(/mnt
/root
/btrbk
/q.
*); f
=${f[0]}
209 $crypt_dev /q btrfs noatime,subvol=q,gid=1000$noauto 0 0
210 /q/p /p none bind$noauto 0 0
214 f
=(/mnt
/root
/btrbk
/o.
*); f
=${f[0]}
217 $crypt_dev /o btrfs noatime,subvol=o$noauto 0 0
218 /o/m /m none bind$noauto 0 0
222 if [[ $HOSTNAME == frodo
]]; then
224 $crypt_dev /i btrfs noatime,subvol=i$noauto 0 0
227 ##### end setup fstab for subvols we care about ######
229 # get pids that this program depends on so we dont kill them
233 while [[ ${my_pids[-1]} != 1 && ${my_pids[-1]} != ${my_pids[-2]} && $count -lt $loop_limit ]]; do
235 p
=$
(ps
-p ${my_pids[-1]} -o ppid
=)
236 if [[ $p == 0 ||
! $p ]]; then
243 for vol
in q a o i
; do
245 if ! awk '{print $2}' /etc
/fstab |
grep -xF $d &>/dev
/null
; then
250 ##### begin building up list of bind mounts ######
251 binds
=() # list of bind mounts
252 roots
=($d) # list of bind mounts, plus the original mount
255 for r
in ${roots[@]}; do
256 # eg. when r=/q/p, for lines like
257 # /q/p /p none bind 0 0
259 new_roots
+=($
(sed -rn "s#^$r/\S+\s+(\S+)\s+none\s+bind\s.*#\1#p" /etc
/fstab
))
261 (( ${#new_roots} )) ||
break
262 binds
+=(${new_roots[@]})
263 roots
=( ${new_roots[@]} )
265 ##### end building up list of bind mounts ######
268 # if latest is already mounted, make sure binds are mounted and move on
269 m check-subvol-stale
$d
270 # populated by check-subvol-stale if stale
271 if ! fresh_snap
=$
(cat /nocow
/btrfs-stale
/$vol 2>/dev
/null
); then
273 for b
in ${binds[@]}; do
281 for dir
in $
(echo $d ${binds[*]}\ |
tac -s\
); do
282 if mountpoint
-q $dir; then
283 if m umount
-R $dir; then
286 if ! kill-dir TERM TERM TERM INT INT HUP HUP
; then
287 if $force; then kill-dir KILL
; fi
290 if m umount
-R $dir; then
293 echo "$0: failed to umount $dir"
302 # if we unmounted some but not all, restore them and move on
303 if ! $umount_ret; then
304 for dir
in ${unmounted[@]}; do
310 #### begin dealing with leaf vols ####
311 # todo: decipher /mnt/root, like we do in check-subvol-stale
313 if [[ -e $vol ]]; then
314 leaf
=$vol.leaf.$
(date +%Y-
%m-
%dT
%H
:%M
:%S
%z
)
316 m btrfs property
set -ts $leaf ro true
318 ### begin check if leaf is different, delete it if not ###
319 if [[ -e /a
/opt
/btrfs-snapshots-diff
/btrfs-snapshots-diff.py
]]; then
320 source /a
/bin
/distro-functions
/src
/package-manager-abstractions
321 pi python-jmespath
# dependency
322 parentid
=$
(btrfs sub show
$leaf |
awk '$1 == "Parent" && $2 == "UUID:" {print $3}')
323 bsubs
=(/mnt
/root
/btrbk
/$vol.
*)
325 # go in reverse order as its more likely to be at the end
326 for ((i
=${#bsubs[@]}-1; i
>=0; i--
)); do
327 if [[ $parentid == $
(btrfs sub show
${bsubs[i]} |
awk '$1 == "UUID:" {print $2}') ]]; then
334 # in testing, same subvol is 136 bytes. allow some overhead
335 btrfs send
--no-data -p $bsub $leaf |
head -c 1000 > $tmp ||
[[ $?
== 141 ]]
336 if (( $
(stat
-c%s
$tmp) < 1000)); then
337 # example output for an empty diff:
338 # Found a valid Btrfs stream header, version 1
339 # o.leaf.2019-05-15T14:00:50-0400;snapshot: uuid=ba045ea30737dd449003f1ee40ec12d0, ctrasid=109533, clone_uuid=3c7e3544e486834aa71d89e5b8f30056, clone_ctransid=109533
340 lines
=$
(/a
/opt
/btrfs-snapshots-diff
/btrfs-snapshots-diff.py
-s -f $tmp | \
341 grep -vxF "Found a valid Btrfs stream header, version 1" | \
342 grep -cv "^[^;]*;snapshot: ") ||
:
343 if [[ $lines == 0 ]]; then
344 x btrfs sub del
$leaf
349 ### end check if leaf is different, delete it if not ###
351 ## begin expire leaf vols ##
352 leaf_vols
=($vol.leaf.
*)
354 for leaf
in ${leaf_vols[@]}; do
355 leaf_secs
=$
(date -d ${leaf#$vol.leaf.} +%s
)
356 if (( $
(date +%s
) - 60*60*24*60 > leaf_secs || count
> 200 )); then # 60 days
357 x btrfs sub del
$leaf
361 ## end expire leaf vols ##
363 #### end dealing with leaf vols ####
365 # Note, we make a few assumptions in this script, like
366 # $d was not a different subvol id than $vol, and
367 # things otherwise didn't get mounted very strangely.
368 m btrfs sub snapshot
$fresh_snap $vol
369 for dir
in $d ${binds[@]}; do
372 stale_dir
=/nocow
/btrfs-stale
378 if [[ $HOSTNAME == kdxxxxxxxxx
]]; then
379 # partitioned it with fai partitioner outside of fai,
380 # because it\'s worth it to have 1% space reserved for boot and
381 # swap partitions in case I ever want to boot off those drives.
383 # . /a/bin/fai/fai-wrapper
384 # eval-fai-classfile /a/bin/fai/fai/config/class/51-multi-boot
385 # fai-setclass ROTATIONAL
386 # export LUKS_DIR=/q/root/luks/
387 # # because the partition nums existed already
388 # fai-setclass REPARTITION
389 # /a/bin/fai/fai/config/hooks/partition.DEFAULT
392 ata-TOSHIBA_MD04ACA500_84REK6NTFS9A-part1
393 ata-TOSHIBA_MD04ACA500_84R2K773FS9A-part1
394 ata-TOSHIBA_MD04ACA500_8471K430FS9A-part1
395 ata-TOSHIBA_MD04ACA500_8481K493FS9A-part1
398 for dev
in ${devs[@]}; do
402 /dev/mapper/crypt_dev_$dev /i btrfs noatime,subvol=i,noauto 0 0
403 /dev/mapper/crypt_dev_$dev /mnt/iroot btrfs noatime,subvolid=0,noauto 0 0
406 tu
/etc
/crypttab
<<EOF
407 crypt_dev_$dev /dev/disk/by-id/$dev /q/root/luks/host-kd discard,luks
409 if [[ ! -e /dev
/mapper
/crypt_dev_
$dev ]]; then
410 cryptdisks_start crypt_dev_
$dev
413 # note, could do an else here and have some kind of mount for /i