#!/bin/sh
#==================================================#
# fileName : .wrapper
#==================================================#
# 1).get Abc <installed_dir>
#==================================================#

PATH="/bin:$PATH"

  __dir=`dirname $0`
  if [ "$__dir" = "." ]; then
    __dir=`cd $__dir/.. ; /bin/pwd`
  else
    __dir=`dirname $__dir`
  fi

  SYS_INST_DIR=$__dir;
  SPS_FONT_PATH="$SYS_INST_DIR/font";
  # XFont - SPS0117984
  SPS_XFONT_PATH="$SYS_INST_DIR/XFont";

#==================================================#
# 2).parsing user's command and special setting
#==================================================#
   __cmdname=`basename $0`;
   
  SYS_PROG_NAME=$__cmdname;
 
  # Auto Source user envirnoment from .bbc
  __auto_source=${ABC_BBC_AUTO_SOURCE:=None}
  if [ "$__auto_source" = "1" ]; then
    if [ -f $HOME/.bbc ]; then
       . $HOME/.bbc;
    fi
    if [ -f .bbc ]; then
       . .bbc;
    fi
  fi

  # For valgrind
  invoke_valgrind=0

  case " $* " in
     *\ -valgrind\ *)
        invoke_valgrind=1
     ;;
  esac

   ## SPS0149212
   LANG="C";
   export LANG;
   LC_ALL="C";
   export LC_ALL;

   ### SPS0115997
   #__lang=${LANG};
   #if [ "$__lang" = "ja_JP.UTF-8" ]; then
   #     LANG="ja";
   #     export LANG;
   #fi

   #__lc_all=${LC_ALL};
   #if [ "$__lc_all" = "ja_JP.UTF-8" ]; then
   #     LC_ALL="ja";
   #     export LC_ALL;
   #fi  

#==================================================#
# 3).get platform
#==================================================#
   ##
   ## SPSqa53294 Abc run 32-bit executable binary
   ## If no 64-bits install path, will run 32-bits path as default.
   __exec_arch=${ABC_EXECUTABLE_ARCH};
   __machine=`uname -s -r`;
   case "$__machine" in
    "SunOS 5.10"*)
        __machine_set=`/bin/isainfo -kv|awk '{print $1}'`
        __machine_type=`uname -p`
        if [ "$__machine_type" = "i386" ]; then  
                __NAME="SOLAMD64";
        elif [ "$__machine_type" = "x86_64" ]; then
                __NAME="SOLAMD64";
        elif [ "$__exec_arch" = "32" ]; then
                __NAME="SOLARIS2";
        elif [ "$__exec_arch" = "64" ]; then
                __NAME="SOL7";
        elif [ "$__machine_set" = "64-bit" ] \
            && [ -r $SYS_INST_DIR/platform/SOL7/bin ]; then
                __NAME="SOL7";
        else
                __NAME="SOLARIS2";
        fi
            ;;
    "SunOS 5.9"*)
        __machine_set=`/bin/isainfo -kv|awk '{print $1}'`
        if [ "$__exec_arch" = "32" ]; then
                __NAME="SOLARIS2";
        elif [ "$__exec_arch" = "64" ]; then
                __NAME="SOL7";
        elif [ "$__machine_set" = "64-bit" ] \
            && [ -r $SYS_INST_DIR/platform/SOL7/bin ]; then
                __NAME="SOL7";
        else
                __NAME="SOLARIS2";
        fi
            ;;
    "SunOS 5.8"*)
        __machine_set=`/bin/isainfo -kv|awk '{print $1}'`
        if [ "$__exec_arch" = "32" ]; then
                __NAME="SOLARIS2";
        elif [ "$__exec_arch" = "64" ]; then
                __NAME="SOL7";
        elif [ "$__machine_set" = "64-bit" ] \
            && [ -r $SYS_INST_DIR/platform/SOL7/bin ]; then
                     __NAME="SOL7";
        else
                __NAME="SOLARIS2";
        fi
            ;;
    "SunOS 5.7"*)
        __machine_set=`/bin/isainfo -kv|awk '{print $1}'`
        if [ "$__exec_arch" = "32" ]; then
                __NAME="SOLARIS2";
        elif [ "$__exec_arch" = "64" ]; then
                __NAME="SOL7";
        elif [ "$__machine_set" = "64-bit" ] \
            && [ -r $SYS_INST_DIR/platform/SOL7/bin ]; then
                symbol=`/usr/ccs/bin/nm /usr/lib/sparcv9/libCrun.so.1 | grep _ex_register64`;
                sym=`echo $symbol|awk '{print $5}'`
                if [ "$sym" = "|GLOB" ]; then
                     __NAME="SOL7";
                else
                     echo "*ERROR* -- OS compatibility problem"
                     echo "     The version of Solaris 7 you are running contains a problem in ..."
                     exit 1
                fi
        else
               __NAME="SOLARIS2";
        fi
            ;;
    "SunOS 5"*)
        if [ "$__exec_arch" = "32" ]; then
                __NAME="SOLARIS2";
        elif [ "$__exec_arch" = "64" ]; then
                __NAME="SOL7";
        else
                     __NAME="SOLARIS2";
        fi
            ;;
    "Linux"*)
         __machine_set=`uname -m`  
         if [ "$__exec_arch" = "32" ]; then
                __NAME="LINUX";
         elif [ "$__exec_arch" = "64" -a "$__machine_set" = ia64 ] \
            && [ -r $SYS_INST_DIR/platform/LINUXIA64/bin ]; then
               __NAME="LINUXIA64";
         elif [ "$__exec_arch" = "64" -a "$__machine_set" = x86_64 ] \
            && [ -r $SYS_INST_DIR/platform/LINUX64/bin ]; then
               __NAME="LINUXAMD64";
         elif [ "$__machine_set" = ia64 ] \
            && [ -r $SYS_INST_DIR/platform/LINUXIA64/bin ]; then
               __NAME="LINUXIA64";
         elif [ "$__machine_set" = x86_64 ] \
            && [ -r $SYS_INST_DIR/platform/LINUX64/bin ]; then
               __NAME="LINUXAMD64";
         else
               __NAME="LINUX";
         fi
            ;;
    "FreeBSD"*)
     __NAME="LINUX";
            ;;
    "HP-UX B.10"*)
        if [ "$__exec_arch" = "32" ]; then
                __NAME="HPPA";
        elif [ "$__exec_arch" = "64" ]; then
                __NAME="HP11";
        else
                     __NAME="HPPA";
        fi
            ;;
    "HP-UX B.11"*)
        if [ "$__exec_arch" = "32" ]; then
                __NAME="HPPA";
        elif [ "$__exec_arch" = "64" ]; then
                __NAME="HP11";
        elif [ -r $SYS_INST_DIR/platform/HP11/bin ] \
             && [ -x /bin/getconf ] \
             && [ "`/bin/getconf KERNEL_BITS 2>&1`" = "64" ]; then
                __NAME="HP11";
        else
                     __NAME="HPPA";
        fi
            ;;
     "AIX 1"*)
        __system_version=`uname -v`
        if [ "$__system_version" = "5" ]; then
                if [ "$__exec_arch" = "32" ]; then
                        __NAME="IBM51";
                elif [ "$__exec_arch" = "64" ]; then
                        __NAME="IBM51";
      #                  LDR_CNTRL="MAXDATA=0x200000000";
      #                  export LDR_CNTRL;
                elif [ -r $SYS_INST_DIR/platform/IBM51/bin ] \
                     && [ -x /usr/sbin/prtconf ] \
                     && [ "`/usr/sbin/prtconf -c`" = "CPU Type: 64-bit" ]; then
                        __NAME="IBM51";
      #                  LDR_CNTRL="MAXDATA=0x200000000";
      #                  export LDR_CNTRL;
                else
                       # SPSqa78465 - Check if IBM43 is supported
                        __NAME="IBM51";
                fi
        else
                echo "IBM43 is not supported"
                exit 1
        fi
            ;;
     "AIX 2"*)
        __system_version=`uname -v`
        if [ "$__system_version" = "5" ]; then
                if [ "$__exec_arch" = "32" ]; then
                        __NAME="IBM51";
                elif [ "$__exec_arch" = "64" ]; then
                        __NAME="IBM51";
      #                  LDR_CNTRL="MAXDATA=0x200000000";
      #                  export LDR_CNTRL;
                elif [ -r $SYS_INST_DIR/platform/IBM51/bin ] \
                     && [ -x /usr/sbin/prtconf ] \
                     && [ "`/usr/sbin/prtconf -c`" = "CPU Type: 64-bit" ]; then
                        __NAME="IBM51";
      #                  LDR_CNTRL="MAXDATA=0x200000000";
      #                  export LDR_CNTRL;
                else
                       # SPSqa78465 - Check if IBM43 is supported
                        __NAME="IBM51";
                fi
        else
                echo "IBM43 is not supported"
                exit 1
        fi
            ;;
     "AIX 3"*)
        __system_version=`uname -v`
        if [ "$__system_version" = "5" ]; then
                if [ "$__exec_arch" = "32" ]; then
                        __NAME="IBM51";
                elif [ "$__exec_arch" = "64" ]; then
                        __NAME="IBM64";
      #                  LDR_CNTRL="MAXDATA=0x200000000";
      #                  export LDR_CNTRL;
                elif [ -r $SYS_INST_DIR/platform/IBM64/bin ] \
                     && [ -x /usr/sbin/prtconf ] \
                     && [ "`/usr/sbin/prtconf -c`" = "CPU Type: 64-bit" ]; then
                        __NAME="IBM64";
      #                  LDR_CNTRL="MAXDATA=0x200000000";
      #                  export LDR_CNTRL;
                else
                       # SPSqa78465 - Check if IBM43 is supported
                        __NAME="IBM51";
                fi
        else
                echo "IBM43 is not supported"
                exit 1
        fi
            ;;
    *)
     __NAME="UNKNOW";
   ;;
   esac

#  echo "platform=$__NAME";
#==================================================#
# 4).make new command  
#==================================================#
   case "$__cmdname" in
    "nCompare")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc -nCompare";
    ;;
    "ncmp")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc -nCompare";
    ;;
    "nCompareg")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc -nCompare -gui";
    ;;
    "Siloti")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc";
    ;;
    "siloti")    
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc";
    ;;
    "Verdi")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc";
    ;;
    "verdi")    
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc";              
    ;;
    "VerdiJP")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc -encode eucjp";
    ;;
    "Verdi_dl")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc_dl -encode eucjp";
    ;;
    "nWave")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc -nWave";
    ;;
    "turboWave")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc -nWave";
    ;;
    "Debussy")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc -deb";
    ;;
    "debussy")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/Abc -deb";
    ;;
    "fast")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/vfast";
    ;;
    "vcd2fsdb")
    newname="$SYS_INST_DIR/platform/$__NAME/bin/vfast";
    ;;
    "novas_plat")
    echo $__NAME
    exit 0
    ;;
    *)
    newname="$SYS_INST_DIR/platform/$__NAME/bin/$__cmdname";
    ;;
   esac
   export SYS_INST_DIR; export SYS_PROG_NAME;
   export SPS_FONT_PATH;
   export SPS_XFONT_PATH;
   export BBC_HOME;
   export BBC_PATH;
#==================================================#
# 5).setup on-line-help path:
#==================================================#
   ABCHLPPATH="$SYS_INST_DIR/doc";
   export ABCHLPPATH;
   XNLSPATH="$SYS_INST_DIR/etc/access/nls";
   export XNLSPATH;
#==================================================#
# 6).exec Abc product
#==================================================#
   if [ ${invoke_valgrind} = 1 ] ; then
      VALGRIND_LIB="$SYS_INST_DIR/platform/$__NAME/bin/valgrind_lib";
      export VALGRIND_LIB;
      # SPSqa81719
      PURIFY_POOL_CCC=1;
      PURIFY_POOL_CCC_SILENCE=1;
      export PURIFY_POOL_CCC;
      export PURIFY_POOL_CCC_SILENCE;
      for tmp_var in $@;
      do
         if [ "$tmp_var" != "-valgrind" ]; then
            argv="$argv $tmp_var"
         fi
      done
      exec $SYS_INST_DIR/platform/$__NAME/bin/valgrind \
           --suppressions=$SYS_INST_DIR/platform/$__NAME/bin/valgrind_lib/sps.supp \
           --workaround-gcc296-bugs=yes --leak-check=no $newname $argv
   else
      exec $newname "$@"
   fi
#==================================================#
# 7).exit ABC
#==================================================#
   exit 0