forked from epics_driver_modules/require
modified create link: It goes first on the bootpc and then reads/creates a link, adapted also for psi-xfel, prepared for hipa (and proscan)
This commit is contained in:
krempaska
+316
-49
@@ -1,10 +1,174 @@
|
||||
#!/bin/sh
|
||||
if [ "$1" = "-v" ];then echo "\$Header: /cvs/G/DRV/misc/App/scripts/bootlink,v 1.5 2008/05/13 08:32:21 zimoch Exp $";exit;fi
|
||||
###############################################################################
|
||||
# $Author: krempaska $
|
||||
# $Date: 2009/01/13 16:34:07 $
|
||||
# $Id: bootlink,v 1.6 2009/01/13 16:34:07 krempaska Exp $
|
||||
# $Name: $
|
||||
# $Source: /cvs/G/DRV/misc/App/scripts/bootlink,v $
|
||||
# $Revision: 1.6 $
|
||||
###############################################################################
|
||||
# File name:
|
||||
# Description: creates a new link to the IOC booting directory
|
||||
# This script works only if yoa are located:
|
||||
# - on the boot pc or
|
||||
# - on a machine of the bootpc subnet or
|
||||
# - on office subnet and want to change boot link on machine.
|
||||
# Notes:
|
||||
# 1. This script does not jump between different facilities networks!
|
||||
# 2. If more IOCs are specified in the command line, they have to boot from
|
||||
# unique bootpc and the symbolic link of the specified targetbase will
|
||||
# be done for all this IOCs.
|
||||
###############################################################################
|
||||
#Note: this variables have to be don on bpc, (gw)
|
||||
#export INSTBASE=/psi-xfel/devl
|
||||
#export INSTBASELIST="/psi-xfel/devl /psi-xfel/work /psi-xfel/prod"
|
||||
|
||||
#---------------------------
|
||||
# This is supposed to be called only if running on a bootpc
|
||||
# It creates a new symbolic link of /ioc/$ioc to the boot directory
|
||||
#---------------------------
|
||||
function do_slink () {
|
||||
#echo "do_slink() params $*"
|
||||
targetbase=$1
|
||||
shift
|
||||
for ioc in $*
|
||||
do
|
||||
|
||||
if [ "-" = "$targetbase" ]
|
||||
then
|
||||
old=$(readlink /ioc/$ioc)
|
||||
echo "Link on $bootpc for $ioc is \"$old\""
|
||||
continue
|
||||
fi
|
||||
|
||||
echo "Changing symbolic link for /ioc/$ioc...";
|
||||
old=$(readlink /ioc/$ioc)
|
||||
new="$targetbase/iocBoot/ioc/$ioc"
|
||||
echo "Current link is to: $old"
|
||||
echo "Requested link is to: $new"
|
||||
if [ "$old" = "$new" ]
|
||||
then
|
||||
echo "No operation will be done, it already points to \"$old\"."
|
||||
continue
|
||||
fi
|
||||
if [ -d "$new" ]
|
||||
then
|
||||
rm -f /ioc/$ioc
|
||||
ln -s $new /ioc/$ioc
|
||||
chk=$(readlink /ioc/$ioc)
|
||||
if [ "$chk" = "$new" ]
|
||||
then
|
||||
echo "Changed on $bootpc";
|
||||
echo "from $old";
|
||||
echo "to $new"
|
||||
else
|
||||
echo "ERROR: change on $bootpc from \"$old\" to \"$new\" failed"
|
||||
echo "link points now to \"$chk\". Check permissions:"
|
||||
ls -l /ioc/$ioc
|
||||
fi
|
||||
else
|
||||
echo "Target directory \"$tdir\" does not exist"
|
||||
fi
|
||||
done
|
||||
return
|
||||
}
|
||||
|
||||
#---------------------------
|
||||
# Sets the ssh gateway name based on the bootpc value
|
||||
#---------------------------
|
||||
function get_gw () {
|
||||
case "$bootpc" in
|
||||
"slsbpc") #SLS machine
|
||||
ssh_gw="slsbridge"
|
||||
;;
|
||||
"x01dc-bpc")
|
||||
ssh_gw="x01dc-gw"
|
||||
;;
|
||||
"x02da-bpc")
|
||||
ssh_gw="x02da-gw"
|
||||
;;
|
||||
"x03ma-bpc")
|
||||
ssh_gw="x03ma-gw"
|
||||
;;
|
||||
"x04db-bpc")
|
||||
ssh_gw="x04db-gw"
|
||||
;;
|
||||
"x04sa-bpc")
|
||||
ssh_gw="x04sa-gw"
|
||||
;;
|
||||
"x05da-bpc")
|
||||
ssh_gw="x05da-gw"
|
||||
;;
|
||||
"x05la-bpc")
|
||||
ssh_gw="x05la-gw"
|
||||
;;
|
||||
"x06da-bpc")
|
||||
ssh_gw="x06da-gw"
|
||||
;;
|
||||
"x06sa-bpc")
|
||||
ssh_gw="x06sa-gw"
|
||||
;;
|
||||
"x07da-bpc")
|
||||
ssh_gw="x07da-gw"
|
||||
;;
|
||||
"x07db-bpc")
|
||||
ssh_gw="x07db-gw"
|
||||
;;
|
||||
"x07ma-bpc")
|
||||
ssh_gw="x07ma-gw"
|
||||
;;
|
||||
"x09la-bpc")
|
||||
ssh_gw="x09la-gw"
|
||||
;;
|
||||
"x10da-bpc")
|
||||
ssh_gw="x10da-gw"
|
||||
;;
|
||||
"x10sa-bpc")
|
||||
ssh_gw="x10sa-gw"
|
||||
;;
|
||||
"x11la-bpc")
|
||||
ssh_gw="x11la-gw"
|
||||
;;
|
||||
"x12sa-bpc")
|
||||
ssh_gw="x12sa-gw"
|
||||
;;
|
||||
"fin-cbpce"|"fin-cbpc01e")
|
||||
ssh_gw="fin-cgwe"
|
||||
;;
|
||||
"hipa-bpc01")
|
||||
ssh_gw="hipa-gw01"
|
||||
;;
|
||||
*)
|
||||
ssh_gw=""
|
||||
;;
|
||||
esac
|
||||
}
|
||||
|
||||
if [ "$1" = "-v" ];then echo "\$Header: /cvs/G/DRV/misc/App/scripts/bootlink,v 1.6 2009/01/13 16:34:07 krempaska Exp $";exit;fi
|
||||
|
||||
#calling from the script $1=action: do_slink, $2=target, $3=bootpc, $4=ioc1, $5=ioc2,...
|
||||
if [ $# > 3 ] && [ "$1" = "do_slink" ]
|
||||
then
|
||||
#echo "calling $0 with parameters: $@"
|
||||
#check if you are on the bootpc
|
||||
val=$(echo $(nslookup $(hostname) ));
|
||||
hname=$(echo $val|awk '{print $6}')
|
||||
#cut the domain part of the hname
|
||||
hname=$(echo $hname|awk 'BEGIN {FS="."} {print $1}')
|
||||
bootpc=$2
|
||||
if [ "$hname" != "$bootpc" ];then echo "I am not on the $bootpc but on $hname";exit;fi
|
||||
shift
|
||||
shift
|
||||
do_slink $@;
|
||||
exit;
|
||||
fi
|
||||
|
||||
if [ $# -lt 2 ] || [ "$1" = "-?" ]
|
||||
then
|
||||
echo "using: $0 (<newbase>|-) <IOC> [<IOC2> [...]]"
|
||||
echo "change boot path for list of IOCs"
|
||||
echo "if <newbase> = \"-\" it shows the current links"
|
||||
echo "Usage: $0 (<newbase>|-) <IOC> [<IOC2> [...]]"
|
||||
echo "Description: Change boot path for list of IOCs."
|
||||
echo "If <newbase> = \"-\" it shows the current links."
|
||||
echo "Example: $0 /work X07DA-VME-OP1"
|
||||
exit
|
||||
fi
|
||||
if [ -z "$ORACLE_HOME" ] ; then
|
||||
@@ -13,64 +177,167 @@ if [ -z "$ORACLE_HOME" ] ; then
|
||||
fi
|
||||
|
||||
targetbase=$1
|
||||
#chkslsbase.sh checks if the bootdirectory specified in the $1 argument is valid
|
||||
#it has to be one of $SLSBASELIST or $INSTBASELIST
|
||||
#to do: rename chkslsbase.sh, define $INSTBASE also in the SLS environment
|
||||
if [ "$(chkslsbase.sh $targetbase)" = "" ] && [ "$targetbase" != "-" ]
|
||||
then
|
||||
echo -ne "first argument (\"$targetbase\") has to be one out of\n$SLSBASELIST\n"
|
||||
echo -ne "first argument (\"$targetbase\") has to be one out of\n$SLSBASELIST\t$INSTBASELIST\n"
|
||||
exit
|
||||
fi
|
||||
shift
|
||||
for ioc in $*
|
||||
do
|
||||
list=$(echo $(
|
||||
|
||||
#for the list of all IOCs specified in the command line arguments get bootpc
|
||||
#if it's not the same it exits
|
||||
#get bootpc for the first IOC
|
||||
bootpc=$(echo $(
|
||||
sqlplus -s gfa_public/pub01@GFAPRD << EOF
|
||||
SET HEADING OFF;
|
||||
SELECT BOOTPC,SLSBASE FROM HOSTS.IOC_LASTBOOTED WHERE SYSTEM = '$ioc';
|
||||
SELECT DESTINATION FROM HOSTS.RELATIONS WHERE REL_TYPE_ID=3 AND HOST_NAME='$1';
|
||||
EXIT
|
||||
EOF
|
||||
))
|
||||
if [ "$list" = "no rows selected" ]
|
||||
if [ "$bootpc" = "no rows selected" ]
|
||||
then
|
||||
echo "No bootpc for the $ioc found in the HOSTS database."
|
||||
exit
|
||||
fi
|
||||
bootpcprev=$bootpc
|
||||
|
||||
for ioc in $*
|
||||
do
|
||||
#get bootpc from HOSTS
|
||||
bootpcprev=$bootpc
|
||||
bootpc=$(echo $(
|
||||
sqlplus -s gfa_public/pub01@GFAPRD << EOF
|
||||
SET HEADING OFF;
|
||||
SELECT DESTINATION FROM HOSTS.RELATIONS WHERE REL_TYPE_ID=3 AND HOST_NAME='$ioc';
|
||||
EXIT
|
||||
EOF
|
||||
))
|
||||
if [ "$bootpc" = "no rows selected" ]
|
||||
then
|
||||
echo "IOC $ioc not in bootinfo DB"
|
||||
echo "No bootpc for the $ioc found in the HOSTS database."
|
||||
exit
|
||||
fi
|
||||
bootpc=$(echo $list|awk '{print $1}' );
|
||||
|
||||
slsbase=$(echo $list|awk '{print $2}');
|
||||
|
||||
#echo "BootPC=$bootpc"
|
||||
if [ "$slsbase" = "$targetbase" ]
|
||||
# if some bpc differs stop
|
||||
if [ "$bootpcprev" != "$bootpc" ]
|
||||
then
|
||||
echo "according to bootinfo, IOC $ioc already has SLSBASE=$slsbase"
|
||||
echo "continue anyway"
|
||||
fi
|
||||
old=$(ssh $bootpc readlink /ioc/$ioc)
|
||||
if [ "-" = "$targetbase" ]
|
||||
then
|
||||
old=$(ssh $bootpc readlink /ioc/$ioc)
|
||||
echo "link on $bootpc for $ioc is \"$old\""
|
||||
continue
|
||||
fi
|
||||
new="$targetbase/iocBoot/ioc/$ioc"
|
||||
if [ "$old" = "$new" ]
|
||||
then
|
||||
echo "no operation: on $bootpc \"/ioc/$ioc\" already points to \"$old\""
|
||||
continue
|
||||
fi
|
||||
if [ -d "$new" ]
|
||||
then
|
||||
ssh $bootpc rm -f /ioc/$ioc
|
||||
ssh $bootpc ln -s $new /ioc/$ioc
|
||||
rep=$(ssh $bootpc readlink /ioc/$ioc)
|
||||
if [ "$rep" = "$new" ]
|
||||
then
|
||||
echo "changed on $bootpc from \"$old\" to \"$new\""
|
||||
else
|
||||
echo "ERROR: change on $bootpc from \"$old\" to \"$new\" failed"
|
||||
echo "link points now to \"$req\". Check permissions:"
|
||||
ssh $bootpc ls -l /ioc/$ioc
|
||||
fi
|
||||
else
|
||||
echo "target dir \"$tdir\" does not exist"
|
||||
continue
|
||||
echo "BootPC $bootpc for the IOC $ioc differs from other $bootpcprev!"
|
||||
exit
|
||||
fi
|
||||
done
|
||||
|
||||
#get instbase from last booted table
|
||||
slsbase=$(echo $(
|
||||
sqlplus -s gfa_public/pub01@GFAPRD << EOF
|
||||
SET HEADING OFF;
|
||||
SELECT SLSBASE FROM HOSTS.IOC_LASTBOOTED WHERE SYSTEM = '$ioc';
|
||||
EXIT
|
||||
EOF
|
||||
))
|
||||
if [ "$list" = "no rows selected" ]
|
||||
then
|
||||
echo "IOC $ioc not in bootinfo DB"
|
||||
exit
|
||||
fi
|
||||
slsbase=$(echo $list|awk '{print $2}');
|
||||
|
||||
#I need to go to the bootpc and do the sym. link operations directly there
|
||||
#1.get the subnet location of the currently used host
|
||||
#2.do the link depending on the location of your host and bootpc
|
||||
#2.a) if you are on the same subnet as your currently used host
|
||||
# and if you are on the bootpc, do the link (call function do_slink()),
|
||||
# otherwise do ssh to the bootpc and do the link
|
||||
# b) if you are on the other subnet (office), get the ssh gateway name
|
||||
# (by using naming convention), do ssh to the gw, ssh bootpc and do the link
|
||||
#Note: If you are on a facility subnet, i.e.SLSMACHINE, you cannot jump to FELOBLA!
|
||||
# So if you are on x07da-cons-1, the call "bootlink /work X09LA-VME-ES1" wan't work!
|
||||
|
||||
#get the bootpc IP -> from the HOSTS database
|
||||
bootpcIP=$(echo $(
|
||||
sqlplus -s gfa_public/pub01@GFAPRD << EOF
|
||||
SET HEADING OFF;
|
||||
SELECT IP FROM HOSTS.INTERFACES HI, HOSTS.IP_ADDRESSES HIP WHERE HI.INTERF_ID=HIP.INTERF_ID AND HI.HOST_NAME = '$bootpc';
|
||||
EXIT
|
||||
EOF
|
||||
))
|
||||
if [ "$slsbase" = "$targetbase" ]
|
||||
then
|
||||
echo "According to bootinfo, IOC $ioc has booted already from $slsbase"
|
||||
echo "continue anyway..."
|
||||
fi
|
||||
|
||||
#get the currently used host IP -> nslookup
|
||||
val=$(echo $(nslookup $(hostname) ));
|
||||
hname=$(echo $val|awk '{print $6}')
|
||||
currhostIP=$(echo $val|awk '{print $8}')
|
||||
|
||||
#on which subnet am I?
|
||||
NET=$(echo $currhostIP | awk 'BEGIN { FS = "." } ; { print $1"."$2"."$3"." }')
|
||||
case "$NET" in
|
||||
172.20.*.*)
|
||||
#SLS machine subnet
|
||||
echo "You are on the SLS machine subnet $NET";
|
||||
if [ "$bootpcIP" = "$currhostIP" ]
|
||||
then
|
||||
do_slink $targetbase $*
|
||||
else
|
||||
ssh $bootpc bootlink do_slink $bootpc $targetbase $*
|
||||
fi
|
||||
;;
|
||||
129.129.[01][0-9].*|129.129.12[0-2].*|129.129.[01][01][0-9].*)
|
||||
echo "You are on one of beamlines subnets $NET.";
|
||||
if [ "$bootpcIP" = "$currhostIP" ]
|
||||
then
|
||||
do_slink $targetbase $*
|
||||
else
|
||||
ssh $bootpc /devl/sls/bin/bootlink do_slink $bootpc $targetbase $*
|
||||
fi
|
||||
;;
|
||||
172.21.70.*)
|
||||
echo "You are on FELOBLA subnet $NET";
|
||||
if [ "$bootpcIP" = "$currhostIP" ]
|
||||
then
|
||||
do_slink $targetbase $ioc
|
||||
else
|
||||
#ssh $bootpc /psi-xfel/devl/bin/bootlink do_slink $targetbase $ioc $bootpc
|
||||
ssh $bootpc /psi-xfel/devl/bin/bootlink do_slink $bootpc $targetbase $*
|
||||
fi
|
||||
;;
|
||||
129.129.151.*)
|
||||
echo "You are on HIPA subnet $NET";
|
||||
if [ "$bootpcIP" = "$currhostIP" ]
|
||||
then
|
||||
do_slink $targetbase $*
|
||||
fi
|
||||
echo "on work!";
|
||||
;;
|
||||
129.129.153.*)
|
||||
echo "You are on PROSCAN subnet $NET";
|
||||
echo "on work!";
|
||||
;;
|
||||
*)
|
||||
echo "You are on OFFICE subnet $NET and you need to go to $bootpc";
|
||||
#get on which gw we have to go
|
||||
#ssh gateway name is defined according naming convention for each facility
|
||||
get_gw
|
||||
echo "Loging to $ssh_gw..."
|
||||
if [ "$CLIENT" = "sls" ]
|
||||
then
|
||||
SCRPATH="$INSTBASE/sls/bin"
|
||||
else
|
||||
SCRPATH="$INSTBASE/bin"
|
||||
fi
|
||||
ssh -t $ssh_gw ssh $bootpc $SCRPATH/bootlink do_slink $bootpc $targetbase $*
|
||||
;;
|
||||
esac
|
||||
exit
|
||||
###############################################################################
|
||||
#
|
||||
# $Log: bootlink,v $
|
||||
# Revision 1.6 2009/01/13 16:34:07 krempaska
|
||||
# modified create link: It goes first on the bootpc and then reads/creates a link, adapted also for psi-xfel, prepared for hipa (and proscan)
|
||||
#
|
||||
#
|
||||
##############################################################################
|
||||
|
||||
Reference in New Issue
Block a user