#!/bin/sh
set -e
umask 077
cd /
[ ! -x /etc/init.d/postgresql ] || {
	umask 022 &&
	/etc/init.d/postgresql stop &&
	umask 077
}
hostname=`hostname`
d=`date -I`
mkdir -p /home/r/root/backup/"$hostname/$d.$$"
find /home/r/root/backup/"$hostname" ! -name '*.gz' -type f -size +0 -links 1 -exec gzip -9 \{\} \;
cd /home/r/root/backup/"$hostname/$d.$$"
>mark
/home/m/michael/src/backup/bin/diskinfo || :
cd /
find `/home/m/michael/src/backup/bin/device__mount_point__type__options | perl -e 'while(<>){chomp;@_=split "\0";print "@_[1]\n"}'` -xdev -depth -print0 |
>/home/r/root/backup/"$hostname/$d.$$"/files0 perl -e '$/="\0";while(<>){chomp;s|//+|/|og;s|^/([^/])|$1|o;s|([^/])/$|$1|o;s|^/$|.|o;print "$_$/"}' || :
