#! /bin/sh
#set -x
#=========================================================================
# Copyright (C) GemTalk Systems 1986-2014.  All Rights Reserved..
#
# Name - runpgsvr.sh
#
# Purpose - start a page server process 
#
# $Id: runpgsvr.sh 34503 2014-10-15 16:05:56Z otisa $
#
#=========================================================================

if [ "a$GEMSTONE" = "a" ]; then
  echo "ERROR: GemStone scripts require a GEMSTONE environment variable."
  echo "       Please set it to the directory where GemStone resides."
  exit 1

# default PATH
if [ "x$PATH" = "x" ]; then PATH=:/bin:/usr/bin:/usr/ucb; export PATH; fi 
					
comid="runpgsvr"

Syntax="Usage: runpgsvr <protocol> <wellknown> <timeout>
OR runpgsvr   <monName> <numPages> <numProcs> <memLock> <spinLockCount>
              <targetFreeFrames> <numFreeFrameServers> <numSharedCounters>
              <shrPcMonPort>  <spcPerms> <spcMemPolicy> <protocol> <wellknown>
              <timeout>
OR   runpgsvr -h|-H|help

      monName             - name of shared page cache monitor to create
      numPages            - number of memory pages for monitor
      numProcs            - number of process slots for monitor
      memLock             - true if monitor's memory should be locked in place
      spinLockCount       - spin count for shared locks
      targetFreeFrames    - set the target free frame limit for the cache
      numFreeFrameServers - number of free frame servers to start
      numSharedCounters   - number of shared counters to create
      shrPcMonPort        - port number to be used by the SPC monitor process
      spcPerms            - permissions for the shared memory segment
      spcMemPolicy        - policy for large memory pages
      protocol            - network protocol for connection, such as \"TCP\"
      wellknown           - bound network address, such as a TCP/IP port number
      timeout             - how long, in seconds, to wait for connection

This Bourne shell script is invoked by a netldi in reponse to a
request of the netldi to provide GemStone database file I/O. By
default, netldi uses the file $GEMSTONE/bin/services.dat to translate the
name runpgsvr to a command that executes this script.  If no such
translation is found, the command \$HOME/runpgsvr is executed by
netldi instead.
"

# give a little help
if [ "x$1" = "x-h" ] || [ "x$1" = "x-H" ] || [ "x$1" = "xhelp" ]; then
  echo "$Syntax"; exit
fi

# error control - do no allow hup
trap '' 1

# pgsvr is required
if [ ! -x "$GEMSTONE/sys/pgsvr" ]; then
  echo "${comid}[Error]:   cannot find file $GEMSTONE/sys/pgsvr"
  exit 1 
fi

# show what we have
echo "runpgsvr[Info]:     Description of arguments:"
# bug 40199 - determine correct location for uname
if [ -f "/bin/uname" ]; then
  UNAME="/bin/uname"
elif [ -f "/usr/bin/uname" ]; then
  UNAME="/usr/bin/uname"
else
# Weird case.  Let's just hope it's in the path...
  UNAME="uname"
fi
hName=`$UNAME -n`

echo "   the hostname is:     $hName"
echo "   GEMSTONE is:         $GEMSTONE"
echo "   pgsvr arguments are: $*"


# The default behaviour is to delete this process's log file if it exits
# normally. If you want to keep this process's log file even on normal exit
# then uncomment the following
# export GEMSTONE_KEEP_LOG=1

# PgsvrTraceMode=1
# export PgsvrTraceMode

# start pgsvr - pgsvr needs GEMSTONE

# By default a pgsvr will raise its number of descriptors to whatever the
# hard limit is. By setting GEMSTONE_MAX_FD to a positive number the
# pgsvr will only raise its descriptors to that number.
# If GEMSTONE_MAX_FD is set to 0 then the pgsvr will not modify its descriptor
# limit
# export GEMSTONE_MAX_FD=?

if [ "$#" = "14"  ]; then
  # obsolete, no longer used
  # start a monitor ignore timeout(arg14)
  exec "$GEMSTONE/sys/pgsvr" "'"$1"'" setlocationstr $2 setnumpages \
  $3 setnumprocs $4 setmemlock $5 setspinlockcount \
  $6 settargetfflimit $7 setnumffservers $8 setnumsharedctrs $9 setmonitorport \
  $10 setspcperms $11 setlargepagepolicy \
  "'"$12"'" setprotocol "'"$13"'" setwks \
  startup attach sloop exit
  # "trace" may be added prior to "sloop" 
else
  # start an ordinary server; ignore timeout(arg3)
  exec "$GEMSTONE/sys/pgsvr" "'"$1"'" setprotocol "'"$2"'" setwks startup sloop exit
  # "trace" may be added prior to "sloop" 
fi
# with the above exec nothing after this is ever executed
