#! /bin/csh -f # # report which beamline we are running on # # set test = `echo "123asdf" | awk '{print $1+0}'` if("$test" == "0") alias awk nawk if(! $?beamline && $?REMOTE_HOST) then set temp = `echo $REMOTE_HOST | awk '{print substr($1,3)+0}'` if("$temp" =~ [458][0-9][0-9]) setenv beamline "$temp" if("$temp" =~ 12[0-9][0-9]) setenv beamline "$temp" endif if(! $?beamline) then # default to beamline this computer belongs to set temp = `hostname | awk '{print substr($1,index($1,"bl")+2)+0}'` if("$temp" =~ [458][0-9][0-9]) setenv beamline "$temp" if("$temp" =~ 12[0-9][0-9]) setenv beamline "$temp" endif if(! $?beamline && $?REMOTEHOST) then set temp = `echo $REMOTEHOST | awk '{print substr($1,3)+0}'` if("$temp" =~ [458][0-9][0-9]) setenv beamline "$temp" if("$temp" =~ 12[0-9][0-9]) setenv beamline "$temp" endif if(! $?beamline && $?SSH_CLIENT) then set temp = `echo $SSH_CLIENT | awk '{print $1}'` set temp = `host $temp | awk '{print substr($NF,index($NF,"bl")+2)+0}'` if("$temp" =~ [458][0-9][0-9]) setenv beamline "$temp" if("$temp" =~ 12[0-9][0-9]) setenv beamline "$temp" endif if(! $?beamline && -r /etc/resolv.conf) then set opts = `awk '{for(i=2;i<=NF;++i) print $i}' /etc/resolv.conf | awk '/^bl[0-9]/'` foreach opt ( $opts ) set temp = `echo $opt | awk '{print substr($NF,index($NF,"bl")+2)+0}'` if("$temp" =~ [458][0-9][0-9]) setenv beamline "$temp" if("$temp" =~ 12[0-9][0-9]) setenv beamline "$temp" if($?beamline) break end endif if(! $?beamline) then echo "unable to determine beamline to control! " exit 9 endif echo "$beamline"