#!/bin/sh

PATH=$PATH:/usr/bin/X11:/usr/openwin/bin:/usr/X/bin:/usr/dt/bin
export PATH

PWD=`pwd`
OS=`uname -s`
TCLTKDIR=

for ARG do
        case "$ARG" in
        "-nogui")
                DISPLAY=
                ;;
        *)
                echo "setup [-help] [-nogui]"
                echo ""
                echo "-help   this message"
                echo "-nogui  do not use GUI front end (no graphical browser)"
                exit 1
                ;;
        esac
done    

        case "$OS" in
        "AIX")
                TCLTKDIR=aix
                ;;
        "HP-UX")
                TCLTKDIR=hpux
                ;;
        "IRIX")
                TCLTKDIR=irix
                echo "IRIX not supported"
                exit 2
                ;;
        "Linux")
                MACH=`uname -m`
                case "$MACH" in
                        x86*)
                                TCLTKDIR=linux-intel;;
                        i*86)
                                TCLTKDIR=linux-intel;;
                        alpha)
                                TCLTKDIR=linux-alpha;;
                        *)
                                echo "Unknown machine type $MACH"
                                exit 3
                                ;;
                esac
                ;;
        "SCO_SV")
                TCLTKDIR=osr5
                ;;
        "SunOS")
                PLAT=`uname -p`
                case "$PLAT" in
                        sparc)
                                TCLTKDIR=solaris-sparc
                                ;;
                        i?86)
                                TCLTKDIR=solaris-intel
                                ;;
                        *)
                                echo "Unknown platform"
                                exit 3
                                ;;
                esac
                ;;
        "UNIX_SV")
                TCLTKDIR=uw
                ;;
        "UnixWare")
                TCLTKDIR=uw
                ;;
        "OSF1")
                TCLTKDIR=tru64
                echo "Tru64 not supported"
                exit 2
                ;;
        *)
                echo "Unable to determine running OS type."
                exit 3
                ;;
        esac   
case "$TCLTKDIR" in
"aix")
        LIBPATH=./tcl-tk/$TCLTKDIR/lib:$LIBPATH
        export LIBPATH
        ;;
"hpux")
        SHLIB_PATH=./tcl-tk/$TCLTKDIR/lib:$SHLIB_PATH
        export SHLIB_PATH
        ;;
*)
        LD_LIBRARY_PATH=./tcl-tk/$TCLTKDIR/lib:$LD_LIBRARY_PATH
        export LD_LIBRARY_PATH
        ;;
esac
DIR=`dirname $0`
if [ x$DIR != "x" ]; then
        cd $DIR
fi
if [ -z "$DISPLAY" ]; then
        if [ -f no_x.tcl ]; then
                ./tcl-tk/$TCLTKDIR/bin/tclsh8.3 no_x.tcl
        else
                echo "DISPLAY must be set to a valid display running X"
                echo "View INSTALL and README.txt for more information"
        fi
else 
         echo "Using TCL/TK on " $DISPLAY
        ./tcl-tk/$TCLTKDIR/bin/wish8.3 frontend/specific/specmain.tcl $TCLTKDIR 
fi