#!/bin/bash


# yum install --enablerepo=rpmforge perl-File-HomeDir perl-Linux-Inotify2
yum install --enablerepo=epel perl-File-HomeDir perl-Linux-Inotify2 perl-String-ShellQuote \
            perl-Data-Dump perl-File-Copy-Recursive perl-Path-Find
# cpan File::HomeDir Linux::Inotify2 
cpanm -v Alarm::Concurrent Path::Find


cd ~/work/perl/
svn co http://localhost:8321/svn/Awale/this2that/trunk App-This2that
cd App-This2that
perl Makefile.PL 
make all test && sudo make install

####
mkdir /home/dw/etc/root-this2that.d
cd /home/dw/etc/root-this2that.d
for dir in ~/warehouse/DW-QUEUE/new/dw?? ; do 
    queue=$(basename $dir)
    cat <<YAML >$queue.yml
from: /temp/DW-PRE-QUEUE/$queue
to: /home/dw/warehouse/DW-QUEUE/$queue
user: dw
YAML
done

mkdir -p /temp/DW-PRE-QUEUE
chown lp:lp -R /temp/DW-PRE-QUEUE
semanage fcontext -a -t cupsd_tmp_t "/tmp/DW-PRE-QUEUE(/.*)?"
restorecon -Rv /temp/DW-PRE-QUEUE


####
cat <<'SH' >/usr/local/bin/this2that
#!/bin/bash
eval "$(perl -Mlocal::lib=/home/lamb/perl5lib)"
exec /home/lamb/perl5lib/bin/this2that "$@"
SH
chmod +x /usr/local/bin/this2that


####
mkdir -p /var/daemontools/supervised/this2that/log/env
cd /var/daemontools/supervised/this2that
echo 1073741824 > log/env/MAXFILESIZE 
cat <<'SH' >log/run
#!/bin/bash

exec /var/daemontools/supervised/prog-log this2that
SH
chmod +x log/run

cat <<'SH' >run
#!/bin/bash

echo $(date) this2that
exec /usr/local/bin/this2that --cfg_dir=/home/dw/etc/root-this2that.d --daemontools 2>&1
SH
chmod +x run


cd /var/daemontools/service/
ln -s ../supervised/this2that/
































