#! /bin/sh

cd $(dirname "$0")

GREP='/bin/egrep'
SCREEN='/usr/bin/screen'
SED='/bin/sed -E'
PERL='/usr/bin/env perl'

if [ -z "$1" ]
then
    HOSTNAME="$1"
else
    HOSTNAME=`/bin/hostname`
fi

# Kill old liblersorf screen sessions
$SCREEN -ls | $GREP '[0-9]+\.lerdorf_[a-zA-Z0-9_-]+' |
while read LINE
do
    SNAME=`echo $LINE | $SED "s/^[^0-9]*([0-9]+\.[^ \t]+).*$/\1/"`
    $SCREEN -S "$SNAME" -X kill
done

case $HOSTNAME in

    cpp)
	$SCREEN -S lerdorf_process_ldap_sync_ssh_keys_forge -d -m bash -c "while true; do $PERL process/ldap/sync_ssh_keys_forge.pl; done"
	;;

    hamano)
	$SCREEN -S lerdorf_process_ldap_sync_ssh_keys_git -d -m bash -c "while true; do $PERL process/ldap/sync_ssh_keys_git.pl; done"
	;;

    moore)
	$SCREEN -S lerdorf_process_ldap_check_ssh_key -d -m bash -c "while true; do $PERL process/ldap/check_ssh_key.pl; done"
	$SCREEN -S lerdorf_process_ldap_sync_ssh_keys -d -m bash -c "while true; do $PERL process/ldap/sync_ssh_keys.pl; done"
	$SCREEN -S lerdorf_process_ldap_update_group -d -m bash -c "while true; do $PERL process/ldap/update_group.pl; done"
	$SCREEN -S lerdorf_process_ldap_update_user -d -m bash -c "while true; do $PERL process/ldap/update_user.pl; done"

	$SCREEN -S lerdorf_process_files_intradata_get -d -m bash -c "while true; do $PERL process/files/intradata_get.pl; done"
	;;

    noyce)
	$SCREEN -S lerdorf_process_files_intradata_get -d -m bash -c "while true; do $PERL process/files/intradata_get.pl; done"
	;;

    *)
	echo "No process to launch for $HOSTNAME" >&2
	exit 1
	;;
esac