3 source /usr
/local
/lib
/err
7 Usage: switch-mail-host|switch-host2 [OPTIONS] push|pull HOST
9 Turn off mail receiving on OLD_HOST, run btrbk to move mail to NEW_HOST,
10 turn on mail receiving on NEW_HOST. Assumes we want to move all
11 filesystems unless passing -o.
13 -a Avoid snapshot /a, /q, and similar. If we haven't
14 made any changes in the last hour, there is no
15 need to snapshot anything but /o, and we will
17 -i Disallow incremental backup.
18 -o Only btrbk /o, instead of all filesystems.
19 --force Run even though our local state does not say that MAIL_HOST is
20 us when pushing or HOST when pulling.
21 -h|--help Print help and exit.
23 I used to adjust home network dns so NEW_HOST resolves locally if it is
24 on the local network, but its simpler just not to and just rely
25 on the internet. Email can wait.
27 Note: Uses GNU getopt options parsing style
32 script_name
="${BASH_SOURCE[0]}"
33 script_name
="${script_name##*/}"
35 restore_new_btrbk
=false
36 restore_old_btrbk
=false
38 if $restore_new_btrbk; then
39 e WARNING
: due to failure
, btrbk.timer may need manual restoration
:
40 e
$new_shell systemctl start btrbk.timer
42 if $restore_old_btrbk; then
43 e WARNING
: due to failure
, btrbk.timer may need manual restoration
:
44 e
$old_shell systemctl start btrbk.timer
48 pre
="${SSH_CLIENT:+$HOSTNAME} $script_name:"
49 m
() { printf "$pre %s\n" "$*"; "$@"; }
50 e
() { printf "$pre %s\n" "$*"; }
51 err
() { echo "$pre ERROR: $*" >&2; }
53 if [[ $EUID != 0 ]]; then
54 err
"requires running as root"
59 ##### begin command line parsing ########
65 mp_args
="-m /o,/a,/ar,/q,/qd,/qr"
67 temp
=$
(getopt
-l force
,pull-reexec
,help aioh
"$@") || usage
1
71 -a) snapshot_arg
=resume
;;
72 --force) force
=true
;;
73 -i) incremental_arg
="-i" ;;
74 # internal option for rerunning under newer old_host when doing pull
75 --pull-reexec) pull_reexec
=true
;;
80 *) echo "$0: Internal error! unexpected args: $*" ; exit 1 ;;
86 (( $# == 2 )) || usage
1
88 if [[ ! $HOSTNAME ]]; then
89 err
"\$HOSTNAME is unset"
93 uninstalled-file-die
() {
94 err
"uninstalled file $1. run install-my-scripts or rerun with -f"
105 for f
in ${install_bin_files[@]}; do
106 if ! diff -q /a
/bin
/ds
/$f /usr
/local
/bin
/$f; then
107 uninstalled-file-die
$f
110 if ! diff -q /a
/bin
/errhandle
/err
/usr
/local
/lib
/err
; then
111 uninstalled-file-die err
115 source /a
/bin
/bash_unpublished
/source-state
122 old_hostname
=$HOSTNAME
124 bbk_args
="-t $new_host"
125 new_shell
="ssh -F $HOME/.ssh/confighome root@$new_host"
126 if ! new_hostname
=$
($new_shell hostname
); then
127 echo "$pre: error: failed ssh. retrying failed $new_shell with -v for more info:"
128 $new_shell -v hostname
134 new_hostname
=$HOSTNAME
135 bbk_args
="-s $old_host"
136 old_shell
="ssh -F $HOME/.ssh/confighome root@$old_host"
137 # tests ssh connection. crafted this to not need to do escape chars
138 f
=/a
/bin
/bash_unpublished
/source-state
139 if ! old_info
=($
($old_shell "hostname; sed -n s,.*MAIL_HOST=,,p $f; sed -n s,.*HOST2=,,p $f")); then
140 echo "$pre: error: failed ssh. retrying failed $old_shell with -v for more info:"
141 $old_shell -v hostname
144 old_hostname
=${old_info[0]}
145 MAIL_HOST
=${old_info[1]}
148 if ! $mail_only && ! $pull_reexec ; then
150 m scp
-F $HOME/.ssh
/confighome root@
$old_host:/usr
/local
/bin
/switch-mail-host
$tmpf
151 if ! diff -q $tmpf ${BASH_SOURCE[0]}; then
152 e
"found different version on old_host=$old_hostname, reexecing"
153 install -T $tmpf /usr
/local
/bin
/switch-mail-host
154 m
/usr
/local
/bin
/switch-mail-host
--pull-reexec "${orig_args[@]}"
161 err invalid first argument
168 if [[ $MAIL_HOST != "$HOST2" ]]; then
176 err unexpected
script name
182 elif $host2_only; then
183 mp_args
="-m /a,/ar,/q,/qd,/qr"
188 if [[ $old_hostname != "$HOST2" ]]; then
189 err
"\$old_hostname($old_hostname) != \$HOST2($HOST2). Rerun with --force if you really want this."
192 elif [[ $old_hostname != "$MAIL_HOST" ]]; then
193 err
"\$old_hostname($old_hostname) != \$MAIL_HOST($MAIL_HOST). Rerun with --force if you really want this."
198 if [[ ! $new_host ||
! $old_host ]]; then
199 echo "$0: bad args. see script"
204 ########### end initial processing, begin actually modifying things ##########
206 if $new_shell systemctl is-active btrbk.timer
; then
207 m
$new_shell systemctl stop btrbk.timer
208 restore_new_btrbk
=true
210 if $old_shell systemctl is-active btrbk.timer
; then
211 m
$old_shell systemctl stop btrbk.timer
212 restore_old_btrbk
=true
215 btrbk_test
="systemctl is-active btrbk.service"
219 for shell
in "$new_shell" "$old_shell"; do
221 status
=$
($shell $btrbk_test) ||
:
223 inactive|failed
) : ;;
225 # This covers conditions like "activating", which still return 3 from
226 # systemctl is-active.
228 e
"btrbk active on shell:$shell, status:$status, sleeping 8 seconds"
236 # ensure these are unused before doing anything
237 e
"On $new_host: umounting /m and /o, checking emacs"
241 if pgrep -G iank -u iank -f 'emacs --daemon' &>/dev/null; then
242 bufs="$(sudo -u iank env XDG_RUNTIME_DIR=/run/user/1000 emacsclient --eval "$(cat /a/bin/ds/unsaved-buffers.el)"| sed '/^"nil"$/d;s/^"(/E: /;s/)"$//')"
244 echo "error: on $HOSTNAME, unsaved emacs files: $bufs" >&2
249 if ! $host2_only; then
252 if mountpoint -q /\$dir; then
253 echo On $new_host: umount /\$dir
259 } |
$new_shell bash
-s
261 $old_shell bash
-s <<'EOF'
262 if pgrep -G iank -u iank -f 'emacs --daemon' &>/dev/null; then
263 bufs="$(sudo -u iank env XDG_RUNTIME_DIR=/run/user/1000 emacsclient --eval "$(cat /a/bin/ds/unsaved-buffers.el)"| sed '/^"nil"$/d;s/^"(/E: /;s/)"$//')"
265 echo "error: on $HOSTNAME, unsaved emacs files: $bufs" >&2
271 # previously, I was checking to see if the new mail host
272 # is on my home network, then changing my home dns
273 # to resolve on the local network, so that I didnt
274 # have to send traffic out to the internet or rely
275 # on that. However, that breaks for a laptop that roams.
276 # So, we could have a cronjob that updates that dns,
277 # however, another solution is to just use ipv6,
280 # TODO: enable ipv6 for email. exim config setting disables it.
281 # need to add vpn support. need to add firewall / routing.
282 # I think exim will try ipv6 first, so no need to disable
286 e Running initial btrbk
287 m btrbk-run
-v $bbk_args $incremental_arg $mp_args $snapshot_arg || ret
=$?
289 err
"failed initial btrbk"
293 if ! $mail_only; then
294 m
$old_shell sed -ri "s/HOST2=.*/HOST2=$new_hostname/" /a
/bin
/bash_unpublished
/source-state
295 m
$new_shell sed -ri "s/HOST2=.*/HOST2=$new_hostname/" /a
/bin
/bash_unpublished
/source-state
299 if [[ $old_hostname != "$MAIL_HOST" && $old_hostname != kd
]]; then
300 m
$old_shell systemctl
--now disable btrbk.timer
302 m
$new_shell systemctl
--now enable btrbk.timer
306 m
$old_shell /a
/exe
/primary-setup
$new_hostname || ret
=$?
308 err
"failed \$old_shell primary-setup \$new_hostname. fix and rerun $script_name"
312 # Try to prevent emacs from saving stale data it has in memory to disk. eg: files, recentf list, etc.
313 # But if emacs ignores the signal, let it live.
314 m
$new_shell killall
-q emacs ||
:
317 m btrbk-run
-v --fast $bbk_args $incremental_arg -m /o || ret
=$?
319 bang
="$(printf "$
(tput setaf
5)█$
(tput sgr0
)%.0s
" 1 2 3 4 5 6 7)"
320 e
$bang failed btrbk of
/o. restoring old
host as primary
321 m
$old_shell /a
/exe
/primary-setup localhost
325 # new system is usable at this point
326 printf "$(tput setaf 5 2>/dev/null ||:)█$(tput sgr0 2>/dev/null||:)%.0s" $
(eval echo "{1..${COLUMNS:-60}}")
329 # once I accidentally accepted incoming mail on old host. I used this script to copy over that mail:
331 # die=false; for d in o.leaf.2021-05-29T10:02:08-0400/m/{4e,md,4e2}/{,l/}!(*myarchive)/new; do if $die; then break; fi; find $d -type f -mtime -5 | while read -r f; do dir="${f%new/*}"; dir="btrbk/o.20210530T000011-0400/${dir#*/}"; fname="${f##*/}"; [[ -e $dir/new/$fname || -e $dir/cur/$fname ]] && continue; if ! e cp -a $f /${dir#*/*/}new; then echo failed cp; die=true; break; fi ; done; done
333 # once I accidentally sent mail from non-main mail host. to copy into the main mail host's sent dir, cd into dir of non-mail mail host Sent/cur, then
335 # shopt -s nullglob; find . -type f -mtime -2 | while read -r f; do a=( /m/4e/Sent/cur/${f%,*}* ); if (( ${#a[@]} )); then e exists $a; else m cp -a $f /m/4e/Sent/cur; fi; done
337 m
$new_shell /a
/exe
/primary-setup localhost || ret
=$?
339 err
"failed final primary-setup, just fix and rerun: $new_shell /a/exe/primary-setup localhost"