########################################################### # cvm - Menu driven cv - for machines with multiple envs # Install this in /bin as cvm with root ownership and 755 perms # Then use '. cvm' instead of '. cv' # J. David Schronce - 2005 Jul 10 ########################################################### # Changelog ########################################################### # jds - 2007 Jul 18 - added display of productlines for # each environment # jds - 2007 Jul 18 - eliminated any env listed in # /etc/lawson.env that is not actually installed # jds - 2007 Jul 19 - Added code to make sure you are # in an active environment to access 'lstver' ########################################################### typeset -u PRODLIST # Get to an active environment if [ $# -eq 0 ]; then . cv while [ `which lstver | grep -c "no lstver"` -gt 0 ] do . cv done # Hilite header echo " `tput smso`Choose an environment..`tput rmso`" echo " -----------------------" # Get list of environments for laenv in `lstver | sort`; do . cv $laenv if [ -d $LAWDIR/*/Admin ]; then # Build menu list with Productlines prodlist="" for proddir in `ls -d $LAWDIR/*/Admin | grep -v logan | grep -v gen | sed "s/\/Admin//g"` do prodlist="$prodlist `basename $proddir`" done PRODLIST=$prodlist echo "$laenv - $PRODLIST" >> /tmp/cvmmenu.$$ echo "$laenv" >> /tmp/expfile.$$ fi done # Display Menu pr -n -t /tmp/cvmmenu.$$ | more -e rm /tmp/cvmmenu.$$ echo echo "Enter Choice > <\b\b\c" # Read Answer read ans env=`sed -n "$ans p" /tmp/expfile.$$ 2> /dev/null` rm /tmp/expfile.$$ . cv $env else . cv $1 fi ############################# if [ `uname` = "SunOS" ]; then export PS1="`/usr/xpg4/bin/id -un`:$LAWENVNAME:\$PWD > " else export PS1="`id -un`:$LAWENVNAME:\$PWD > " fi ########################################## # Add additional variables to export here ########################################## if [ $TERM = "pt80-e" ]; then export LATERM=univwin fi if [ $TERM = "xterm" ]; then stty erase ^? fi