Skip to content
Snippets Groups Projects
Commit ef77393b authored by luedeke's avatar luedeke
Browse files

copy from /work

modified $COLUMNS to ${COLUMNS:-120} to supress error by cron job
parent b5455990
No related branches found
No related tags found
No related merge requests found
......@@ -5,30 +5,67 @@
#Parameters:
function help() {
echo "usage: bootinfo [options] [pattern]"
echo "usage: $(basename $0) [options] [pattern]"
echo " Find boot information about %pattern% in database"
echo "options are:"
echo " -h, -?, --help : print this help and quit"
echo " -v, --version : print cvs version info and quit"
echo " -d : print BOOTDATE"
echo " -t : print BOOTTIME"
echo " -b : print BOOTPC"
echo " -S : print SLSBASE"
echo " -E : print EPICS version"
echo " -V : print vxWorks version"
echo " -i : print IP_ADDR"
echo " -A : print ARCH"
echo " -a : print a lot (= -dtbSEViA)"
echo " --noheader : don't print table header"
echo " -- : treat next word as pattern, even if starting with -"
exit 0
}
function version() {
echo 'Author: D. Zimoch'
echo '$Date: 2004/08/02 09:05:46 $'
echo '$Date: 2005/10/25 10:00:52 $'
echo '$Source: /cvs/G/DRV/misc/App/scripts/bootinfo,v $'
exit 0
}
HSEL="SYSTEM AS IOC"
DEFAULTSEL=",BOOTDATE,BOOTTIME,BOOTPC,SLSBASE,
EPICSVER AS EPICS,VXWORKSVER AS VXWORKS,IPADDR AS IP_ADDR,
SUBSTR(VXWORKS,INSTR(VXWORKS,'/',-1,2)+1,
INSTR(VXWORKS,'/',-1,1)-INSTR(VXWORKS,'/',-1,2)-1) AS ARCH"
while true
do
case "$1" in
--noheader) OPTS="SET HEADING OFF;" ;;
-*h* | -*\?* | --help) help ;;
-*v* | --version) version ;;
--) shift; break ;;
-*) echo "Unknown option $1. Try: --help"
exit 1 ;;
-*) OPTION=$1
while true
do
OPTION=${OPTION:1}
case "$OPTION" in
d*) SEL="$SEL,BOOTDATE" ;;
t*) SEL="$SEL,BOOTTIME" ;;
b*) SEL="$SEL,BOOTPC" ;;
E*) SEL="$SEL,EPICSVER AS EPICS" ;;
V*) SEL="$SEL,VXWORKSVER AS VXWORKS";;
i*) SEL="$SEL,IPADDR AS IP_ADDR" ;;
e*) SEL="$SEL,ETHADDR AS ETH_ADDR" ;;
S*) SEL="$SEL,SLSBASE" ;;
A*) SEL="$SEL,SUBSTR(VXWORKS,INSTR(VXWORKS,'/',-1,2)+1,
INSTR(VXWORKS,'/',-1,1)-INSTR(VXWORKS,'/',-1,2)-1) AS ARCH" ;;
f*) SEL="$SEL,VXWORKS AS FILENAME" ;;
a*) OPTION=-dtbSEViA${OPTION:1} ;;
"") break ;;
*) echo "Unknown option -${OPTION:0:1}. Try: --help"
exit 1 ;;
esac
done ;;
*) break ;;
esac
shift
......@@ -41,10 +78,13 @@ else
export LD_LIBRARY_PATH=$ORACLE_HOME/lib:$LD_LIBRARY_PATH
fi
eval $(resize 2>/dev/null)
$ORACLE_HOME/bin/sqlplus -s ssrm_public/pub01@psip0 << EOF
SET PAGESIZE 10000;
SET LINESIZE 1000;
SET LINESIZE ${COLUMNS:-120};
SET FEEDBACK OFF;
$OPTS
COLUMN IOC FORMAT A17;
COLUMN SLSBASE FORMAT A7;
......@@ -52,16 +92,7 @@ COLUMN EPICS FORMAT A7;
COLUMN VXWORKS FORMAT A7;
COLUMN ARCH FORMAT A15;
SELECT SYSTEM AS IOC,
BOOTDATE,
BOOTTIME,
BOOTPC,
SLSBASE,
EPICSVER AS EPICS,
VXWORKSVER AS VXWORKS,
IPADDR,
SUBSTR(VXWORKS,INSTR(VXWORKS,'/',-1,2)+1,
INSTR(VXWORKS,'/',-1,1)-INSTR(VXWORKS,'/',-1,2)-1) AS ARCH
SELECT ${HSEL} ${SEL:-$DEFAULTSEL}
FROM SSRM.IOC_LASTBOOTED
WHERE SYSTEM LIKE '%$1%' OR
BOOTPC LIKE '%$1%' OR
......@@ -76,7 +107,7 @@ ORDER BY 1;
EXIT
EOF
# $Name: $
# $Id: bootinfo,v 1.11 2004/08/02 09:05:46 zimoch Exp $
# $Id: bootinfo,v 1.12 2005/10/25 10:00:52 luedeke Exp $
# $Source: /cvs/G/DRV/misc/App/scripts/bootinfo,v $
# $Revision: 1.11 $
# $Revision: 1.12 $
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment