#!/bin/sh
# preinst script for common-lisp-controller
#
# see: dh_installdeb(1)

set -e

# summary of how this script can be called:
#        * <new-preinst> `install'
#        * <new-preinst> `install' <old-version>
#        * <new-preinst> `upgrade' <old-version>
#        * <old-preinst> `abort-upgrade' <new-version>
#
# for details, see http://www.debian.org/doc/debian-policy/ or
# the debian-policy package


case "$1" in
    install|upgrade)
        update-inetd --remove "^8990@localhost\t.*"
	update-inetd --remove "^8990\t.*"

	getent passwd cl-builder > /dev/null || \
	    adduser --system --home /usr/lib/common-lisp --shell /bin/false --no-create-home \
                --disabled-password --disabled-login --group cl-builder  || true
        
        if [ "$1" = "upgrade" ] ; then
         for compiler in /usr/lib/common-lisp/bin/*.sh ; do
	   if [ -f "$compiler" -a -r "$compiler" ] ; then
	     i=${compiler##*/}
	     i=${i%.sh}
             chown -R cl-builder.cl-builder /usr/lib/common-lisp/${i} 2> /dev/null || true
           fi
         done
        fi
    ;;

    abort-upgrade)
    ;;

    *)
        echo "preinst called with unknown argument \`$1'" >&2
        exit 1
    ;;
esac

# dh_installdeb will replace this with shell code automatically
# generated by other debhelper scripts.

#DEBHELPER#

exit 0


