chiark / gitweb /
do not include x line in diffs
[chiark-utils.git] / backup / snaprsync
1 #!/bin/bash
2 #
3 # usage: snaprsync <setting>... <positionals>
4 #  <setting> is ---<name>=<value>
5 #  <positionals> are assigned to unused mandatory values in order
6 # mandatory:
7 #   rhost device mountpoint localarea 
8 # optional:
9         localprevious=
10         snapkind=lvm
11         rsharedir=/usr/share/chiark-backup 
12         retcdir=/etc/chiark-backup
13         rvardir=/var/lib/chiark-backup
14         bwlimit=
15
16 set -e
17
18 badusage () { echo >&2 "snaprsync: bad usage: $1"; exit 12; }
19 x () { echo "+ $@"; "$@"; }
20 xspawned () { eval "${1}pid=$!; echo \"+[$!] ($1) &\";"; }
21 xwait () { eval "echo \"+[\$${1}pid] ($1)...\"; wait \$${1}pid;"; }
22
23 while true; do
24         case "$1" in
25         --?*=?*)
26                 name=${1#--}; name=${name%%=*}
27                 value=${1#--*=}
28                 case "$name" in
29                 rhost|device|mountpoint|localarea);;
30                 localprevious|rsharedir|retcdir|rvardir|bwlimit);;
31                 *) badusage "unknown setting $name";;
32                 esac
33                 eval "$name=\$value"
34                 ;;
35         --)     shift; break ;;
36         -*)     badusage "unknown option $1" ;;
37         *)      break ;;
38         esac
39         shift
40 done
41
42 for name in rhost device mountpoint localarea; do
43         eval "value=\$$name"
44         if [ "x$value" != x ]; then continue; fi
45         if [ $# = 0 ]; then badusage "no value for setting $name"; fi
46         eval "$name=$1"
47         shift
48 done
49
50 datefmt='%Y-%m-%d %H:%M:%S Z'
51 rsync="rsync ${bwlimit:+--bwlimit} $bwlimit"
52 export RSYNC_RSH='ssh -o compression=no'
53 sshpfx='PATH=/usr/local/sbin:/usr/local/bin:/sbin:/bin:/usr/sbin:/usr/bin; export PATH; '
54
55 ssh $rhost "$sshpfx date -u '+$rhost $datefmt start'"
56 ssh $rhost "$sshpfx id"
57 ssh $rhost "$sshpfx ls -d $rsharedir"
58 ssh $rhost "$sshpfx ls -d $rvardir"
59
60 test -d $localarea || x mkdir $localarea
61 ournode=`uname -n`
62 rsumsfile=for-$ournode.sums
63 summer='summer -ACDbtqf'
64
65 td=/dev/enoent
66 rc=12
67 trap 'rm -rf $td; exit $rc' 0
68 td=`mktemp -td`
69
70 mkfifo -m 600 $td/sentinel
71 exec 4<>$td/sentinel
72
73 x ssh $rhost "$sshpfx $rsharedir/snap-drop"
74 x ssh $rhost "$sshpfx $retcdir/snap/$snapkind snap $rvardir $device $mountpoint"
75 ssh $rhost <$td/sentinel 4<&- "
76   $sshpfx
77   set -e
78   date -u '+$rhost $datefmt main'
79   exec 3<&0 0</dev/null
80   (set +e; read x <&3; kill 0) &
81   cd $rvardir
82   umask 077
83   exec 3>$rsumsfile
84   cd snap-mount
85   $summer . | sort -t'  ' -k2 >&3
86   test x\"\${PIPESTATUS[*]}\" = 'x0 0'
87   date -u '+$rhost $datefmt sumsdone'
88   cd ..
89 " &
90 xspawned rsum
91 x $rsync -aHSxz --numeric-ids --delete \
92         ${localprevious:+--link-dest} $localprevious \
93         $rhost:$rvardir/snap-mount/. $localarea/.
94 date -u "+ $datefmt rsyncdone"
95
96 exec 3>$localarea,lsums
97 (cd $localarea && \
98  $summer . | sort -t'   ' -k2 >&3 && \
99  test x"${PIPESTATUS[*]}" = 'x0 0') &
100 xspawned lsum
101 exec 3>&-
102
103 xwait rsum
104 exec 4<&-
105 date -u "+ $datefmt sumsdone"
106 x ssh $rhost "$sshpfx $rsharedir/snap-drop"
107
108 if [ "x${localprevious}" != x ]; then
109         cp "$localprevious,rsums" "$localarea,rsums"
110 fi
111 x $rsync -p \
112         $rhost:$rvardir/$rsumsfile \
113         "$localarea,rsums"
114
115 xwait $lsum
116 date -u "+ $datefmt checking"
117
118 set +e
119 diff -u "$localarea,rsums" "$localarea,lsums" >"$localarea,sumsdiff"
120 diffrc=$?
121 set -e
122 test $diffrc = 0 || test $diffrc = 1
123
124 date -u "+ $datefmt checked $diffrc"
125 rc=$diffrc