setenv htype `uname -s`
setenv REMHOST `hostname`
setenv SITE `who am i | cut -d"(" -f2 | cut -d")" -f1 | cut -d"." -f2 `
if ("$SITE" == "lsg") setenv REMHOST `who am i | cut -d"(" -f2 | cut -d")" -f1 | cut -d"." -f1 | cut -d":" -f1`.lsg.crc.com:0
if ("$SITE" == "orl") setenv REMHOST `who am i | cut -d"(" -f2 | cut -d")" -f1 | cut -d"." -f1 | cut -d":" -f1`.orl.crc.com:0
if ("$SITE" == "hqs") setenv REMHOST `who am i | cut -d"(" -f2 | cut -d")" -f1 | cut -d"." -f1 | cut -d":" -f1`.hqs.crc.com:0
if ("$SITE" == "cis") setenv REMHOST `who am i | cut -d"(" -f2 | cut -d")" -f1 | cut -d"." -f1 | cut -d":" -f1`.cis.crc.com:0
if ("$SITE" == "crc") setenv REMHOST `who am i | cut -d"(" -f2 | cut -d")" -f1 | cut -d"." -f1 | cut -d":" -f1`.crc.com:0
if ("$SITE" == "sanitarium") setenv REMHOST `who am i | cut -d"(" -f2 | cut -d")" -f1 | cut -d"." -f1 | cut -d":" -f1`.sanitarium.net:0
if ("$SITE" == "0") setenv REMHOST ":0"
if ("$SITE" == `who am i | cut -d"(" -f2 | cut -d")" -f1`) setenv REMHOST `echo $SITE`:0

# if coming from an IP address
setenv NUM `echo $SITE | cut -c 1`
if ("$NUM" == "1") setenv REMHOST `who am i | cut -d "(" -f2 | cut -d ")" -f1 | cut -d":" -f1`:0
if ("$NUM" == "2") setenv REMHOST `who am i | cut -d "(" -f2 | cut -d ")" -f1 | cut -d":" -f1`:0
if ("$NUM" == "3") setenv REMHOST `who am i | cut -d "(" -f2 | cut -d ")" -f1 | cut -d":" -f1`:0
if ("$NUM" == "4") setenv REMHOST `who am i | cut -d "(" -f2 | cut -d ")" -f1 | cut -d":" -f1`:0
if ("$NUM" == "5") setenv REMHOST `who am i | cut -d "(" -f2 | cut -d ")" -f1 | cut -d":" -f1`:0
if ("$NUM" == "6") setenv REMHOST `who am i | cut -d "(" -f2 | cut -d ")" -f1 | cut -d":" -f1`:0
if ("$NUM" == "7") setenv REMHOST `who am i | cut -d "(" -f2 | cut -d ")" -f1 | cut -d":" -f1`:0
if ("$NUM" == "8") setenv REMHOST `who am i | cut -d "(" -f2 | cut -d ")" -f1 | cut -d":" -f1`:0
if ("$NUM" == "9") setenv REMHOST `who am i | cut -d "(" -f2 | cut -d ")" -f1 | cut -d":" -f1`:0



setenv DISPLAY `echo $REMHOST`