path: swi-prolog_9.2.9+dfsg-1.1/packages/http/examples/linux-init-script
if [ ! -z "$PIDFILE" ]; then DAEMONARGS="$DAEMONARGS --pidfile=$PIDFILE"; fi
pidofserver()
{ if [ -f "$PIDFILE" ]; then
    cat "$PIDFILE"


path: swi-prolog_9.2.9+dfsg-1.1/packages/http/examples/linux-init-script
  ;;
  status)
    PID=$(pidofserver)
    if running "$PID"; then
      echo "SWI-Prolog HTTP server is running (pid $PID)."


path: swi-prolog_9.2.9+dfsg-1.1/packages/http/examples/linux-init-script
  stop)
    MESSAGE="Stopping web server $HTTPID"
    PID=$(pidofserver)
    kill $PID
    if waitserver $PID; then