4 # it is dangerous to remove the "-e" above; please don't do that.
8 # run this script as root, on deleuze
11 exec >& /var
/log
/backup-to-megacz.com-log
13 PATH
=$PATH:/bin
:/usr
/bin
:/sbin
:/usr
/sbin
21 KEYFILE
=/etc
/backup-encryption-key
22 BACKUPDIR
=/afs
/megacz.com
/private
/hcoop-backup
/
25 find * -prune -ctime +2 -exec rm -rf {} \
; || true
27 SUBDIR
=`date +%Y.%m.%d`
37 echo building package lists...
38 dpkg-query
-W -f='${Package}\n' > packages
39 (cd /; find / /usr
/ /usr
/local
/ /var
/ -xdev) |
sort |
uniq > allfiles
40 dpkg-query
-W -f='${Package}\n' |
xargs dpkg
-L |
sort |
uniq > debfiles
41 dpkg-query
-W -f='${Conffiles}\n' |
grep / | cut
-b2- |
sed 's_ .*__' |
sort |
uniq > conffiles
43 diff allfiles debfiles |
grep '^<' | cut
-b 3- | \
44 grep -v ^
/var
/cache | \
46 grep -v ^
/var
/lib
/dpkg | \
47 grep -v ^
/var
/backups | \
48 grep -v ^
/var
/lib
/changetrack | \
49 grep -v ^
/var
/local
/lib
/spamd | \
51 grep -v ^
/var
/lock | \
52 grep -v ^
/var
/lib
/ucf | \
60 grep -v '^/usr/.*\.pyc' | \
61 grep -v '^/usr/.*\.elc' | \
62 grep -v '^/usr/bin/perldoc\.stub$' | \
63 grep -v '^/usr/bin/.*\.notslocate$' | \
64 grep -v '^/usr/lib/courier/.*\.rand$' | \
65 grep -v '^/usr/lib/gconv/gconv-modules\.cache$' | \
66 grep -v '^/usr/lib/graphviz/config$' | \
67 grep -v '^/usr/lib/locale/locale-archive$' | \
68 grep -v '^/usr/share/info/dir$' | \
69 grep -v '^/usr/share/info/dir\.old$' | \
70 grep -v '^/usr/share/emacs21/site-lisp/' | \
71 grep -v '^/usr/share/emacs22/site-lisp/' | \
72 grep -v '^/usr/share/vim/addons/doc/tags$' | \
75 cat conffiles
>> backupfiles
79 grep -v ^
/usr
/local | \
80 grep -v ^
/var
/spool | \
82 grep -v ^
/usr
/lib
/python2.4
/ | \
83 grep -v ^
/var
/lib
/python-support | \
84 grep -v ^
/usr
/share
/man | \
85 grep -v ^
/usr
/share
/perl
5/IkiWiki
/Plugin | \
88 grep -v ^
/vmlinuz.old | \
89 grep -v '^/sbin/[a-z\-]*\.modutils$' | \
90 grep -v ^
/opt
/dell
/srvadmin
/ | \
96 grep -v ^
/lib
/modules
/ | \
97 grep -v ^
/var
/domtool
/ | \
98 grep -v ^
/var
/lib
/mysql
/ | \
99 grep -v ^
/var
/lib
/postgres
/ | \
100 grep -v ^
/var
/lib
/postgresql
/ | \
101 xargs -I{} -d\\n
-- bash
-c "test -L '{}' || echo '{}'" | \
104 tar clpf
- --ignore-failed-read --no-recursion -C / -T backupfiles | \
106 ccrypt
-k $KEYFILE -e | \
107 catsync hcoop.backup.
tar$COMPRESS_EXT.aescrypt
110 # Acquire lock before messing with spamd
112 LOCK
=/var
/local
/lib
/spamd
/.lock
113 while test -f $LOCK; do
115 COUNT
=$
(expr $COUNT + 1)
116 if test $COUNT -eq 10; then
117 # Enough waiting. Kill the process.
119 test -n "$P" && kill $P ||
:
126 tar clpf
- --ignore-failed-read -C / /var
/local
/lib
/spamd | \
128 ccrypt
-k $KEYFILE -e | \
129 catsync ..
/common.spamd.
tar$COMPRESS_EXT.aescrypt.new
132 test -s ..
/common.spamd.
tar$COMPRESS_EXT.aescrypt.new
&& \
133 mv ..
/common.spamd.
tar$COMPRESS_EXT.aescrypt.new \
134 ..
/common.spamd.
tar$COMPRESS_EXT.aescrypt
136 vos listvol deleuze | \
140 grep -v "\.backup .*$" | \
141 grep -v "\.readonly .*$" | \
148 grep -v not-backed-up | \
149 xargs -I{} -d\\n
-- \
151 "vos dump -id {} -localauth -clone | $COMPRESS_PROG | ccrypt -k $KEYFILE -e | catsync {}.dump$COMPRESS_EXT.aescrypt"
153 echo backing up databases
154 tar -C /var
/backups
/databases
/ -cf - . | \
156 ccrypt
-k $KEYFILE -e \
157 | catsync databases.
tar$COMPRESS_EXT.aescrypt
159 grep '[a-z/]' complain
&& \
160 mail -a 'From: Adam Megacz <megacz@hcoop.net>' \
161 -s "automated message: annoying files found on deleuze (please do something about them)" admins@hcoop.net \