#!/bin/csh

# path to mad directory
set madpath="/afs/cern.ch/group/si/slap/share/mad"

# path to mad special binary
set madbin="/afs/cern.ch/group/si/slap/bin"

# path to mad script directory
set madscript="/afs/cern.ch/group/si/slap/scripts/mad_python"

# remove link to command dictionary
if (-f ./dict) rm -f ./dict

set pro = "nil"
if ( "$1" == "-old" ) then
    set ver="old"
    shift
#else if ( "$1" == "-new" ) then
#    set ver="new"
#    shift
else if ( "$1" == "-8" ) then
    set ver="new"
    echo $ver
    shift
else if ( "$1" == "-test" ) then
    set ver="test"
    shift
else if ( "$1" == "-xtest" ) then
    set ver="xtest"
    shift
else if ( "$1" == "-nxtest" ) then
    set ver="nxtest"
    shift
else if ( "$1" == "-clictest" ) then
    set ver="clictest"
    shift
else if ( "$1" == "-pro" ) then
    set ver="pro"
    shift
else if ( "$1" == "-ver" ) then
    set ver="$2"
    shift
    shift
else if ( "$1" == "-x" ) then
    set pro="madxs"
    set ver = "removed"
    shift
else if ( "$1" == "-X" ) then
    set pro="madx"
    set ver = "X"
    shift
else if ( "$1" == "-XP" ) then
    set pro="madxp"
    set ver = "XP"
    shift
else if ( "$1" == "-db" ) then
    set pro="mad.doom"
    set ver = "doom"
    shift
else if ( "$1" == "-newdb" ) then
    set pro="madx.doom"
    set ver = "xdoom"
    shift
else if ( "$1" == "-xdbt" ) then
    set pro="madxddb"
    set ver = "xdtest"
    shift
else
    set pro="madx"
    set ver = "X"
    echo "++++++++++++++++++++ WARNING +++++++++++++++++++"
    echo "    default mad changed from 'MAD8' to 'MAD-X'  "
#    set ver="new"
#    echo "++++++++++++++++ WARNING ++++++++++++++++"
#    echo "    default changed from 'pro' to 'new'  "
endif

echo "Using MAD $ver version"

if ( $ver == "xtest") then
    ln -s /afs/cern.ch/user/h/hansg/public/share/madx.dict ./dict
    nice +10 /afs/cern.ch/user/h/hansg/public/bin/madxd $*
else if ( $ver == "nxtest") then
    ln -s /afs/cern.ch/user/h/hansg/public/share/madx.dict ./dict
    nice +10 /afs/cern.ch/user/h/hansg/public/bin/madxt $1
else if ( $ver == "clictest") then
    ln -s /afs/cern.ch/user/h/hansg/public/share/madx.dict ./dict
    nice +10 /afs/cern.ch/user/h/hansg/public/bin/madxc $1
else if ( $ver == "test") then
    ln -s /afs/cern.ch/user/h/hansg/public/share/mad8.dict ./dict
    nice +10 /afs/cern.ch/user/h/hansg/public/bin/mad3s $1
else if ( $ver == "xdtest") then
    nice +10  /afs/cern.ch/user/h/hansg/public/bin/madxddb $1
else if ( $ver == "doom") then
    nice +10 $madbin/$pro $1
else if ( $ver == "xdoom") then
    nice +10 $madbin/$pro $1
else if ( $ver == "X") then
    nice +10 $madbin/$pro $1
else if ( $ver == "XP") then
    nice +10 $madbin/$pro $1
else

    if ($ver == "removed")  then
      echo "+++++++++++++++++++++++++++++"
      echo "+                           +"
      echo "+   option -x removed       +"
      echo "+   please use mad -8       +"
      echo "+                           +"
      echo "+++++++++++++++++++++++++++++"
    else
# link command dictionary
      ln -s $madpath/$ver/mad8.dict ./dict
      if ( "$*" == "" ) then
	nice +10 $madpath/$ver/mad8
      else
	nice +10 $madpath/$ver/mad8 < $*
      endif
    endif

    # remove command dictionary
     rm -f ./dict

    # remove table file
    if ( -e ./table ) then
	rm -f ./table
    endif
endif

exit 0