#!/bin/sh
#
# A script to start PVM-daemon(s) + PVM-window
#
# Usage: pvminit [hostfile]
#
#--------------------------------------------------------------------------
# Author: Sami Saarinen
#         Center for Scientific Computing (CSC)
#         P.O.Box 405, Tietotie 6
#         FIN-02101 Espoo, Finland
#       >>e-mail: Sami.Saarinen@csc.fi
#
# Date:   25-OCT-1993
#--------------------------------------------------------------------------

pvmclean dont_print || exit 1

delete=0

: ${PVM_ROOT_DIR:=/appl/compiler/pvm3}     # *** Site specific ***

if [ $# = 0 -o "$1" = "/dev/null" ] ; then
  PVMHOSTFILE="/tmp/hostfile.$$"
  echo "* ep=`pwd`:pvm/%:$HOME/pvm/%:/" > $PVMHOSTFILE
  echo "`hostname`" >> $PVMHOSTFILE
  delete=1
else
  PVMHOSTFILE="$1"
fi

: ${PVM_EXPORT:=" "}
if [ "${DISPLAY}" != "" ] ; then
  PVM_EXPORT="${PVM_EXPORT} DISPLAY"
fi
export PVM_EXPORT

echo "Starting PVM-daemons ..."

#echo "pvminit% Using the following hostfile '${PVMHOSTFILE}' :"
#cat $PVMHOSTFILE

#
# Start pvmd3 via monitor which blocks until ALL pvmd's are up.
# Display config. Strip away all lines beginning with 'pvm'.
#

PVM_ROOT=$PVM_ROOT_DIR
export PVM_ROOT
echo "conf" | pvm $PVMHOSTFILE | grep -v '^pvm'
RC=$?

if [ "$delete" = 1 ] ; then
  /bin/rm -f $PVMHOSTFILE
fi

exit $RC
