# begin ora .kshrc $Revision: 6.113 $ --------------dont delete this line---

ulimit   -c    0

alias last_alias='echo "Aliases are Screwed Up"'

###############################
# Fixed Stuff - For everybody #
###############################
export ORACLE_VERSION=7.1.6
export TNSNAMES=/var/opt/oracle/tnsnames.ora
export THISHOST=`/usr/bin/uname -n`
export DEVELOPMENT_SERVER=thcsv01
export ORACLE_BASE=/ford/$THISHOST/unix/cen/oracle_base
export ORACLE_HOME=/ford/$THISHOST/unix/cen/oracle_base/product/$ORACLE_VERSION
export LD_LIBRARY_PATH=/usr/openwin/lib:$ORACLE_HOME/lib
export MANPATH=/usr/bin/man:/usr/share/man:/usr/openwin/man:/usr/openwin/share/man
export MANPATH=$MANPATH":/usr/man:/ford/$THISHOST/unix/cen/NeWSprint/man"
export OPENWINHOME=/usr/openwin
export NEWSPRINT_HOME=/ford/$THISHOST/unix/cen/NeWSprint
export PS1="`uname -n`$[!]$ "
export TK2DEV=xsun
export TERM=sun
export EDITOR=vi
export REAL_PRINTER=thchplj02_1
export PRINTER=thchplj02_1
export LPDEST=thchplj02_1
export ME=`tty |cut -c6-`
export DFRAG_HOME=/ford/thcsv01/unix/cen/DFrag

#####################################
# Put development unique items here #
#####################################
if [ "$THISHOST" = "$DEVELOPMENT_SERVER" ]
then
	export REAL_PRINTER=thchplj02_1
fi

##########################
# Setup the path strings #
##########################
set path=.					\
	./bin					\
	/usr/bin				\
	/usr/sbin				\
	/usr/ucb				\
	/etc					\
	/usr/etc				\
	/inference/art/emacs 			\
	/ford/$THISHOST/unix/cen/NeWSprint/bin	\
	/usr/openwin/bin 			\
	/usr/ccs/bin 				\
	/ford/thcsv01/unix/cen/DFrag/bin	\
	$ORACLE_HOME/bin

set history=100

######################################################
# Check for Terminal Access  - if yes, setup aliases #
######################################################
tty -s
export answer=$?
if [ $answer = 0 ]
then

###########################################################################
# If its Rob Stubbings from thcws29                                       #
# and set up environment to remote display oracles mail messages at home  #
###########################################################################
rob1=`finger | grep " $ME " | grep thcws29 | wc -l | cut -c1-8`
rob2=`finger | grep " $ME " | grep "19.159.10.43" | wc -l | cut -c1-8`
rob=`expr $rob1 + $rob2`
if [ $rob -ge 1 ]
then
	export DISPLAY=19.159.10.43:0.0
	export PRINTER=$REAL_PRINTER
fi

###########################################################################
# If its Richard Reepe from thcws07 - then set my erase char to CONTROL-H #
# and set up environment to remote display oracles mail messages at home  #
###########################################################################
richard1=`finger | grep " $ME " | grep thcws07 | wc -l | cut -c1-8`
richard2=`finger | grep " $ME " | grep "19.159.10.32" | wc -l | cut -c1-8`
richard=`expr $richard1 + $richard2`
if [ $richard -ge 1 ]
then
	export DISPLAY=19.159.10.32:0.0
	export PRINTER=$REAL_PRINTER
	stty erase 
	set ws="-Ws 585 281"		# Common Window Size Parameters for Oracle Mailtools
	if [ "$THISHOST" = "thcsv01" ] 
	then
		set opt="-Wp 0  4    $ws -WP 5 320 -Wl thcsv01  -WL thcsv01  -Wf 000 000 000 -Wb 255 
255 000"
	fi
	if [ "$THISHOST" = "tc0295" ]   
	then
		set opt="-Wp 10 24   $ws -WP 5 390 -Wl tc0295   -WL tc0295   -Wf 000 000 000 -Wb 100 
255 255"
	fi
	if [ "$THISHOST" = "vacsv01" ]  
	then
		set opt="-Wp 20 44   $ws -WP 5 460 -Wl vacsv01  -WL vacsv01  -Wf 000 000 000 -Wb 000 
230 255"
	fi
	if [ "$THISHOST" = "dtsws070" ] 
	then
		set opt="-Wp 30 64   $ws -WP 5 530 -Wl dtsws070 -WL dtsws070 -Wf 000 000 000 -Wb 000 
180 255"
	fi
	if [ "$THISHOST" = "thcsv03" ] 
	then
		set opt="-Wp 40 84   $ws -WP 5 600 -Wl thcsv03  -WL thcsv03  -Wf 255 255 255 -Wb 000 
120 255"
	fi
	if [ "$THISHOST" = "ngcsv01" ] 
	then
		set opt="-Wp 50 104  $ws -WP 5 670 -Wl ngcsv01  -WL ngcsv01  -Wf 255 255 255 -Wb 000 
000 210"
	fi
	if [ "$THISHOST" = "cpd700" ]  
	then
		set opt="-Wp 60 124  $ws -WP 5 740 -Wl cpd700   -WL cpd700   -Wf 255 255 255 -Wb 000 
000 130"
	fi

fi

###########################################################################
# If its Claire Harris from thcws10 - then set my erase char to CONTROL-H #
# and set up environment to remote display oracles mail messages at home  #
###########################################################################
claire1=`finger | grep " $ME " | grep thcws10 | wc -l | cut -c1-8`
claire2=`finger | grep " $ME " | grep "19.159.10.34" | wc -l | cut -c1-8`
claire=`expr $claire1 + $claire2`
if [ $claire -ge 1 ]
then
	export DISPLAY=19.159.10.34:0.0
	export PRINTER=$REAL_PRINTER
	stty erase 
	set ws="-Ws 585 281"		# Common Window Size Parameters for Oracle Mailtools
	if [ "$THISHOST" = "thcsv01" ] 
	then
		set opt="-Wp 0  4    $ws -WP 5 320 -Wl thcsv01  -WL thcsv01  -Wf 000 000 000 -Wb 255 
255 000"
	fi
	if [ "$THISHOST" = "tc0295" ]   
	then
		set opt="-Wp 10 24   $ws -WP 5 390 -Wl tc0295   -WL tc0295   -Wf 000 000 000 -Wb 100 
255 255"
	fi
	if [ "$THISHOST" = "vacsv01" ]  
	then
		set opt="-Wp 20 44   $ws -WP 5 460 -Wl vacsv01  -WL vacsv01  -Wf 000 000 000 -Wb 000 
230 255"
	fi
	if [ "$THISHOST" = "dtsws070" ] 
	then
		set opt="-Wp 30 64   $ws -WP 5 530 -Wl dtsws070 -WL dtsws070 -Wf 000 000 000 -Wb 000 
180 255"
	fi
	if [ "$THISHOST" = "thcsv03" ] 
	then
		set opt="-Wp 40 84   $ws -WP 5 600 -Wl thcsv03  -WL thcsv03  -Wf 255 255 255 -Wb 000 
120 255"
	fi
	if [ "$THISHOST" = "ngcsv01" ] 
	then
		set opt="-Wp 50 104  $ws -WP 5 670 -Wl ngcsv01  -WL ngcsv01  -Wf 255 255 255 -Wb 000 
000 210"
	fi
	if [ "$THISHOST" = "cpd700" ]  
	then
		set opt="-Wp 60 124  $ws -WP 5 740 -Wl cpd700   -WL cpd700   -Wf 255 255 255 -Wb 000 
000 130"
	fi

fi

###########################################################################
# If its Andrew Clark from cpd125 or cew054                               #
# and set up environment to remote display                                #
###########################################################################
drew1=`finger | grep " $ME " | grep cpd125 | wc -l | cut -c1-8`
drew2=`finger | grep " $ME " | grep "19.70.34.66" | wc -l | cut -c1-8`
drew=`expr $drew1 + $drew2`
if [ $drew -ge 1 ]
then
	export DISPLAY=cpd125.pd9.ford.com:0.0
	export PRINTER=pr0953
	stty erase 
fi

##############################
# now some alias definitions #
##############################
. $HOME/.profile
cat > /tmp/db_nawk_prog <<-EOF
BEGIN   { FS = "\t*" }
	{ print "alias ", \$1 "=" \$2 }
EOF
/bin/nawk -f /tmp/db_nawk_prog $HOME/.generic_aliases > $HOME/.ksh_aliases
. $HOME/.ksh_aliases
rm -f /tmp/db_nawk_prog

fi
################################
# End of Terminal Access Setup #
################################