freebsd-ports/www/apache13-fp/files/apache.sh.tmpl
1998-11-10 01:56:01 +00:00

48 lines
693 B
Bash

#!/bin/sh
#
#
# Create New FrontPage suidkey
#
new_key() {
skdir=PREFIX/frontpage/currentversion/apache-fp
PERL=PERL5
#NOTE: We need Perl 5, to generate a new key
if [ -x ${PERL} ]
then
${PERL} -e '@a=(split(//, "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789!@#$%^&*-=_+")); print((map {$a[rand(scalar @a)]} (1..128)), "\n");' > $skdir/suidkey
fi
}
#
# Main
#
case "$1" in
start)
if [ -x PREFIX/sbin/apachectl ]
then
new_key
PREFIX/sbin/apachectl start && echo -n ' httpd'
fi
;;
stop)
if [ -r /var/run/httpd.pid ]
then
PREFIX/sbin/apachectl stop && echo -n ' httpd'
fi
;;
*)
echo "usage: $0 {start|stop}" 1>&2
exit 64
;;
esac