createTodeImage

#! /bin/bash
#=========================================================================
# Copyright (c) 2014, 2015 GemTalk Systems, LLC <dhenrich@gemtalksystems.com>.
#=========================================================================

echo "================="
echo "   GsDevKit script: $(basename $0) $*"
echo "================="

usage() {
  cat <<HELP
USAGE: $(basename $0) [-h] [-f] [-p <postfix]

Create the tODE client image. Used for running pharo-based scripts
and for running the tODE client UI.

If the tODE client image already exists, the installation is skipped
unless the -f option is specified.

OPTIONS
  -h 
     display help
  -f
     Force tODE client installation, whether or not the image
     already exists.
  -p <postfix>
     Append <postfix> to end of image name. Useful for creating
     multiple tode client images.

EXAMPLES
  $(basename $0) -h
  $(basename $0) -p _0
  $(basename $0) -f
  $(basename $0)

HELP
}

set -e # exit on error
if [ "${GS_HOME}x" = "x" ] ; then
  echo "the GS_HOME environment variable needs to be defined"
  exit 1
fi

postFix=""
force=""
while getopts ":fhp:" OPT ; do
  case "$OPT" in
    h) usage; exit 0;;
    f) force="true";;
    p) postFix="${OPTARG}";;
    ?) postFix="";;          # handle optional -p argument "
    *) usage; exit 1;;
  esac
done
shift $(($OPTIND - 1))

if [ ! -e "$GS_HOME/pharo/pharo" ]; then
  $GS_HOME/bin/installPharo
fi

pharo=$GS_HOME/pharo
message="create"
if [ -e $pharo/todeClient${postFix}.image ] ; then
  if [ "${force}x" = "x" ] ; then
    echo "todeClient already created, use -f to force update"
    exit 0
  else
    message="update"
  fi
fi


todeLoadPath=$GS_HOME/tode/sys/default/pharo/todeLoad.st
if [ -e $GS_HOME/tode/sys/local/pharo/todeLoad.st ] ; then
  todeLoadPath=$GS_HOME/tode/sys/local/pharo/todeLoad.st
fi

echo "${message} todeClient${postFix} image using $todeLoadPath"

if [ "${force}" = "true" ] ; then
  $pharo/pharo $pharo/todeClient${postFix}.image save todeClientTmp
else
  $pharo/pharo $pharo/Pharo.image save todeClientTmp
fi

$pharo/pharo $pharo/todeClientTmp.image st --quit --save $todeLoadPath

$pharo/pharo $pharo/todeClientTmp.image save todeClient${postFix}
rm -f $pharo/todeClientTmp.*

echo
echo "...finished $(basename $0)"