falso
/
cdesktopenv
mirror of https://git.code.sf.net/p/cdesktopenv/code
1
0
Fork 0
Code Issues Releases Wiki Activity
cdesktopenv/cde/admin/IntegTools/dinstall.dt.src

784 lines
19 KiB
Plaintext
Executable File
Raw Blame History

XCOMM!/bin/ksh
XCOMM $XConsortium: dinstall.dt.src /main/6 1996/04/23 11:18:22 drk $
XCOMM ==========================================================================
XCOMM ==========================================================================
XCOMM deinstall.dt
XCOMM
XCOMM Script to deinstall the April 1994 Snapshot Desktop on
XCOMM HP, IBM, Sun, Fujitsu, or Novell Unix systems from a CDROM
XCOMM
XCOMM ==========================================================================
XCOMM ==========================================================================
XCOMM ==========================================================================
XCOMM
XCOMM DtiClearScreen - clears the screen
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM Return -none
XCOMM ==========================================================================
#define HASH #
#define STAR *
DtiClearScreen() {
clear 1>&2
HASH DtiPrint "clear"
}
XCOMM ==========================================================================
XCOMM
XCOMM Log - echo to log
XCOMM
XCOMM Input
XCOMM $1 - data to echo to log
XCOMM Output - none
XCOMM Return -none
XCOMM ==========================================================================
Log()
{
printf "$1" $2 $3 $4 $5 >> $LOG_FILE
}
XCOMM ==========================================================================
XCOMM
XCOMM DtiPrint - echo to stderr and log
XCOMM
XCOMM Input
XCOMM $1 - data to echo to stdout
XCOMM Output - none
XCOMM Return -none
XCOMM ==========================================================================
DtiPrint()
{
printf "$1" $2 $3 $4 $5 $6 $7 $8 $9 >&2
Log "$1" $2 $3 $4 $5 $6 $7 $8 $9
}
XCOMM ==========================================================================
XCOMM
XCOMM DtiShow - echo to stdout
XCOMM
XCOMM Input
XCOMM $1 - data to echo to stdout
XCOMM Output - none
XCOMM Return -none
XCOMM ==========================================================================
DtiShow()
{
printf "$1" $2 $3 $4 $5 $6 $7 $8 $9 >&2
}
XCOMM ==========================================================================
XCOMM
XCOMM DtiReturn - return a string to stdout
XCOMM
XCOMM Input
XCOMM $1 - data to return
XCOMM Output - none
XCOMM Return -none
XCOMM ==========================================================================
DtiReturn()
{
echo "$1"
}
XCOMM ==========================================================================
XCOMM
XCOMM DtiWhoami
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM Return
XCOMM result of system 'whoami' command
XCOMM
XCOMM ==========================================================================
DtiWhoami()
{
$WHOAMI_PATH/whoami
}
XCOMM ==========================================================================
XCOMM
XCOMM Exit - log and exit
XCOMM
XCOMM Input
XCOMM $1 - data to echo to log
XCOMM Output - none
XCOMM Return -none
XCOMM ==========================================================================
Exit()
{
Log "\n==================================================================\n"
Log "* $(date) $($WHOAMI_PATH/whoami)@$(hostname)*"
Log "* $1*"
Log "\n*exit_code = $2*"
Log "\n==================================================================\n"
exit $2
}
XCOMM ==========================================================================
XCOMM
XCOMM GetPlatform
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM Return
XCOMM "hpux"
XCOMM "aix"
XCOMM "sun"
XCOMM "uxp"
XCOMM "usl"
XCOMM "dec"
XCOMM ==========================================================================
GetPlatform()
{
if [ -z "$getPlatform" ]; then
os=`uname -s`
case $os in
*HP-UX*) getPlatform=hp;;
*AIX*) getPlatform=ibm;;
*SunOS*) getPlatform=sun;;
*UNIX_System_V*) getPlatform=uxp;;
*UNIX_SV*) getPlatform=usl;;
*OSF1*) getPlatform=dec;;
esac
fi
DtiReturn $getPlatform
}
XCOMM ==========================================================================
XCOMM
XCOMM ValidOS - Verify OS is valid to deinstall on
XCOMM
XCOMM Input - none
XCOMM Output - Error message if invalid platform, will exit.
XCOMM Return
XCOMM "hpux"
XCOMM "aix"
XCOMM "sun"
XCOMM "uxp"
XCOMM "usl"
XCOMM "dec"
XCOMM ==========================================================================
ValidOS()
{
platform=$(GetPlatform)
case "$platform" in
hp|ibm|sun|uxp|usl|dec)
DtiReturn $platform
;;
*) Exit $INVALID_OS_MSG 1
;;
esac
}
XCOMM ==========================================================================
XCOMM
XCOMM ResolvePathName
XCOMM
XCOMM Input - File Name to be resolved to actual file
XCOMM Output - none
XCOMM Return
XCOMM Actual File Name resolved down to through all links
XCOMM
XCOMM ==========================================================================
ResolvePathName() {
if [ "/" = "$1" ]; then
echo $1$2
elif [ -L $1 ]; then
ResolvePathName `/bin/ls -l $1 | awk '{print $NF}'` $2
else
ResolvePathName `dirname $1` `basename $1`${2+/}$2
fi
}
XCOMM ==========================================================================
XCOMM
XCOMM FileIsLink
XCOMM
XCOMM Input - File Name
XCOMM Output - none
XCOMM Return
XCOMM TRUE, if file is a link
XCOMM FALSE, if file is not a link
XCOMM ==========================================================================
FileIsLink() {
if [[ -L $1 ]] && [[ -a $1 ]]
then
DtiReturn "TRUE"
else
DtiReturn "FALSE"
fi
}
XCOMM ==========================================================================
XCOMM
XCOMM StateObjective - States the objective of the Script to the user
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM
XCOMM ==========================================================================
StateObjective() {
XCOMM Display information to the user, ask if user wishes to continue
while :
do
DtiClearScreen
DtiShow "$HERALD_MSG"
DtiPrint "$OBJECTIVE_MSG"
DtiPrint "$YESNO_MSG"
read response
Log "$RESPONSE_MSG"
Log "$response"
Log "\n"
case $response in
[yY]*) return 0
;;
[nN]*) exit 0
;;
*) continue
esac
done
}
XCOMM ==========================================================================
XCOMM
XCOMM DoFilesetScript - Runs a unconfiguration script in the post_install dirs
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM
XCOMM ==========================================================================
DoFilesetScript()
{
FilesetName=$1
HASH
HASH Check for the lowercase PLATFORM dir. If doesn't exist then
HASH the tree is in uppercase.
HASH
if [ ! -f $TAR_TREE/dt.pkg ];
then
typeset -u ScriptName
fi
if [ "$BUILD_TREE" = "" ]
then
ScriptName=$3
else
ScriptName=$2
fi
test_string=${DATABASE_FILES#*$FilesetName}
if (( ${#DATABASE_FILES} > ${#test_string} ))
then
if [ -x $POST_INSTALL_DIR/$PLATFORM_SCRIPT_DIR/$ScriptName ]
then
DtiPrint "\n\nExecuting $PLATFORM specific $FilesetName unconfigure script...\n"
$POST_INSTALL_DIR/$PLATFORM_SCRIPT_DIR/$ScriptName -d 2>&1 | \
tee -a $LOG_FILE
elif [ -x $POST_INSTALL_DIR/$ScriptName ]
then
DtiPrint "\n\nExecuting $FilesetName unconfigure script...\n"
$POST_INSTALL_DIR/$ScriptName -d 2>&1 | tee -a $LOG_FILE
fi
fi
}
XCOMM ==========================================================================
XCOMM
XCOMM RunUnconfigScripts - Runs relevant unconfiguration scripts, based on
XCOMM fileset installed, calls DoFilesetScript
XCOMM Input - none
XCOMM Output - none
XCOMM
XCOMM ==========================================================================
RunUnconfigScripts()
{
DtiPrint "\n\nRunning unconfigure scripts...\n"
DoFilesetScript CDE-TT configTT tt.cfg
DoFilesetScript CDE-MIN configMin min.cfg
DoFilesetScript CDE-RUN configRun run.cfg
DoFilesetScript CDE-HELP configHelp help.cfg
DoFilesetScript CDE-HELP-PRG configHelpPrg helpprg.cfg
DoFilesetScript CDE-HELP-RUN configHelpRun helprun.cfg
DoFilesetScript CDE-SHLIBS configShlibs shlibs.cfg
DoFilesetScript CDE-AB configAb ab.cfg
DoFilesetScript CDE-DEMOS configDemos demos.cfg
DoFilesetScript CDE-ICONS configIcons icons.cfg
DoFilesetScript CDE-INC configInc inc.cfg
DoFilesetScript CDE-MAN configMan man.cfg
DoFilesetScript CDE-MAN-DEV configManDev mandev.cvg
DoFilesetScript CDE-MSG-CAT configMsgCat msgcat.cfg
DoFilesetScript CDE-PRG configPrg prg.cfg
}
XCOMM ==========================================================================
XCOMM
XCOMM ValidConfiguration - Checks to see if the desktop was installed or
XCOMM partially installed on your system
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM Return - TRUE, if valid configuration
XCOMM FALSE, for no desktop was found on the system
XCOMM
XCOMM ==========================================================================
ValidConfiguration() {
if (( [[ -a $ABSOLUTE_USR_LOCATION ]] || [[ -a $DEFAULT_USR_LOCATION ]] ) &&
( [[ -a $ABSOLUTE_ETC_LOCATION ]] || [[ -a $DEFAULT_ETC_LOCATION ]] ) &&
( [[ -a $ABSOLUTE_VAR_LOCATION ]] || [[ -a $DEFAULT_VAR_LOCATION ]] ))
then
DtiReturn "TRUE"
else
STATUS="FALSE"
for i in $ABSOLUTE_USR_LOCATION $ABSOLUTE_ETC_LOCATION \
$ABSLOUTE_VAR_LOCATION $DEFAULT_USR_LOCATION \
$DEFAULT_ETC_LOCATION $DEFAULT_VAR_LOCATION
do
if [ -a $i ]
then
STATUS="TRUE"
break
fi
done
DtiReturn "$STATUS"
fi
}
XCOMM ==========================================================================
XCOMM
XCOMM DisplayDirs - Determines if directories should be presented
XCOMM to the user to determin if they will be deleted or not.
XCOMM
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM Return - TRUE, if some directories will be deleted
XCOMM FALSE, if NO directories will be deleted
XCOMM
XCOMM ==========================================================================
DisplayDirs() {
if [[ -d $ABSOLUTE_USR_LOCATION ]] && [[ -a $ABSOLUTE_USR_LOCATION ]]
then
DtiReturn "TRUE"
elif [[ -d $ABSOLUTE_ETC_LOCATION ]] && [[ -a $ABSOLUTE_ETC_LOCATION ]]
then
DtiReturn "TRUE"
elif
[[ -d $ABSOLUTE_VAR_LOCATION ]] && [[ -a $ABSOLUTE_VAR_LOCATION ]]
then
DtiReturn "TRUE"
else
DtiReturn "FALSE"
fi
}
XCOMM ==========================================================================
XCOMM
XCOMM DisplayDirs - Determines if links should be presented
XCOMM to the user to determine if they will be deleted or not.
XCOMM
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM Return - TRUE, if some links will be deleted
XCOMM FALSE, if NO links will be deleted
XCOMM
XCOMM ==========================================================================
DisplayLinks() {
if [[ -L $DEFAULT_USR_LOCATION ]] && [[ -a $DEFAULT_USR_LOCATION ]]
then
DtiReturn "TRUE"
elif [[ -L $DEFAULT_ETC_LOCATION ]] && [[ -a $DEFAULT_ETC_LOCATION ]]
then
DtiReturn "TRUE"
elif
[[ -L $DEFAULT_VAR_LOCATION ]] && [[ -a $DEFAULT_VAR_LOCATION ]]
then
DtiReturn "TRUE"
else
DtiReturn "FALSE"
fi
}
XCOMM ==========================================================================
XCOMM
XCOMM ShowDirsToBeDeleted - Shows what dirs and links will be deleted to the user
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM
XCOMM ==========================================================================
ShowDirsToBeDeleted() {
XCOMM Display information to the user, ask if user wishes to continue
while :
do
DtiClearScreen
DtiShow "$HERALD_MSG"
if [ $(DisplayDirs) = "TRUE" ]
then
DtiPrint "$DELETE_DIRS_MSG"
if [ -a $ABSOLUTE_USR_LOCATION ]
then
DtiPrint "$DIR_MSG" "$ABSOLUTE_USR_LOCATION"
fi
if [ -a $ABSOLUTE_ETC_LOCATION ]
then
DtiPrint "$DIR_MSG" "$ABSOLUTE_ETC_LOCATION"
fi
if [ -a $ABSOLUTE_VAR_LOCATION ]
then
DtiPrint "$DIR_MSG" "$ABSOLUTE_VAR_LOCATION"
fi
fi
if [ $(DisplayLinks) = "TRUE" ]
then
DtiPrint "\n\n$DELETE_LINKS_MSG"
if [ $(FileIsLink $DEFAULT_USR_LOCATION) = "TRUE" ]
then
DtiPrint "$LINK_DIR_MSG" "$DEFAULT_USR_LOCATION"
fi
if [ $(FileIsLink $DEFAULT_ETC_LOCATION) = "TRUE" ]
then
DtiPrint "$LINK_DIR_MSG" "$DEFAULT_ETC_LOCATION"
fi
if [ $(FileIsLink $DEFAULT_VAR_LOCATION) = "TRUE" ]
then
DtiPrint "$LINK_DIR_MSG" "$DEFAULT_VAR_LOCATION"
fi
fi
DtiPrint "\n\n$WARNING_MSG"
DtiPrint "\n\n\n$YESNO_MSG"
read response
Log "$RESPONSE_MSG"
Log "$response"
Log "\n"
case $response in
[yY]*) return 0
;;
[nN]*) exit 0
;;
*) continue
esac
done
}
XCOMM ==========================================================================
XCOMM
XCOMM StopDesktop - Stops the desktop if it was running
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM
XCOMM ==========================================================================
StopDesktop() {
if [ -f $ABSOLUTE_VAR_LOCATION/Xpid ]
then
DtiPrint "\n\nStopping Desktop... \n"
kill -TERM `cat $ABSOLUTE_VAR_LOCATION/Xpid` 2> /dev/null
fi
}
XCOMM ==========================================================================
XCOMM
XCOMM RemoveDesktop - Deletes Desktop files from the system
XCOMM
XCOMM Input - none
XCOMM Output - none
XCOMM
XCOMM ==========================================================================
RemoveDesktop () {
DtiPrint "Removing files from Desktop Directories...\n"
rm -rf $ABSOLUTE_USR_LOCATION
rm -rf $ABSOLUTE_ETC_LOCATION
rm -rf $ABSOLUTE_VAR_LOCATION
rm -rf $DEFAULT_USR_LOCATION
rm -rf $DEFAULT_ETC_LOCATION
rm -rf $DEFAULT_VAR_LOCATION
DtiPrint "The Desktop was successfully removed from your system.\n"
}
XCOMM ==========================================================================
XCOMM
XCOMM
XCOMM This is the MAIN of the script
XCOMM
XCOMM
XCOMM ==========================================================================
XCOMM Set up Messages
USAGE_MSG="\
Usage: deinstall.dt [-noprompt]\n"
PERMISSION_MSG="\
You must be ROOT to run this command\n"
RESPONSE_MSG="\n
response is: "
HERALD_MSG="\
The Common Open Systems Environment Desktop\n\
April 1994 Snapshot Deinstallation Procedure\n\n"
OBJECTIVE_MSG="\
This procedure will REMOVE the Desktop from your system.\n\n\n"
YESNO_MSG="\
Do you wish to continue? [y/n] "
DELETE_DIRS_MSG="\
The deinstallation will remove files from the following\n\
directories listed below:\n\n"
DIR_MSG="\
'%s'\n"
DELETE_LINKS_MSG="\
The deinstallation will remove the following symbolic \n\
link(s) listed below:\n\n"
LINK_DIR_MSG="\
'%s'\n"
WARNING_MSG="\
Any customizations made will be LOST!\n"
INVALID_OS_MSG="\
The Desktop does not support this system configuration.\n\
The deinstallation procedure will terminate.\n"
INVALID_CONFIGURATION_MSG="\
The deinstallation procedure could not locate any Desktop files\n\
on your system. The deinstallation will terminate. Please check\n\
that you are running the deinstallation script on a system that\n\
has the Desktop already installed.\n"
XCOMM Set up variables
NO_PROMPT="FALSE"
DEFAULT_USR_LOCATION="/usr/dt"
DEFAULT_ETC_LOCATION="/etc/dt"
DEFAULT_VAR_LOCATION="/var/dt"
ABSOLUTE_USR_LOCATION=$(ResolvePathName $DEFAULT_USR_LOCATION)
ABSOLUTE_ETC_LOCATION=$(ResolvePathName $DEFAULT_ETC_LOCATION)
ABSOLUTE_VAR_LOCATION=$(ResolvePathName $DEFAULT_VAR_LOCATION)
XCOMM Set up the log file
LOG_FILE="/tmp/dinstall.dt.log"
if [ -f $LOG_FILE ]
then
rm -rf $LOG_FILE 2>/dev/null
fi
touch $LOG_FILE 2>/dev/null
chmod 777 $LOG_FILE 2>/dev/null
XCOMM change directories to deinstall.dt location as all
XCOMM installation packages are relative to this
XCOMM
if [ ${0%/STAR} != "dinstall.dt" ]; then
cd ${0%/STAR}
fi
XCOMM set up the TOP directory of where the CD is mounted
TOP=`pwd`
XCOMM set up the path for whoami command
WHOAMI_PATH=/bin
platform=$(GetPlatform)
case "$platform" in
hp) WHOAMI_PATH=/usr/bin
;;
ibm) WHOAMI_PATH=/bin
;;
sun) WHOAMI_PATH=/usr/ucb
;;
uxp) WHOAMI_PATH=/usr/ucb
;;
usl) WHOAMI_PATH=/usr/ucb
;;
dec) WHOAMI_PATH=/usr/bin
;;
esac
DTIDINSTALLDT=dinstall.dt
DTICONFIGDIR=config
dtiPlatform=$(GetPlatform)
DTIPLATFORMDIR=$dtiPlatform
DTIREADME=config/config.$dtiPlatform
if [ ${0##STAR/} != $DTIDINSTALLDT ]; then
HASH
HASH CDROM driver folds filenames to uppercase
HASH
typeset -u DTIDINSTALLDT
typeset -u DTICONFIGDIR
typeset -u DTIPLATFORMDIR
typeset -u DTIREADME
fi
XCOMM Parse the command line
while [ $# -ne 0 ];
do
case $1 in
-noprompt) NO_PROMPT=TRUE
print "NO_PROMPT is set"
shift
;;
*) print "$USAGE_MSG"
DtiPrint $USAGE
exit 1;;
esac
done
XCOMM Verify that we have the Root User
if [ $(DtiWhoami) != "root" ]
then
DtiShow "$PERMISSION_MSG"
Exit "$PERMISSION_MSG" 1
fi
XCOMM Check to see if the Desktop is actually installed on the system
if [ $(ValidConfiguration ) != "TRUE" ]
then
DtiPrint "$INVALID_CONFIGURATION_MSG"
exit 1
fi
XCOMM Determine if the OS is supported
PLATFORM=$(ValidOS)
XCOMM
XCOMM Initially PLATFORM is in lower case.
XCOMM Check if the $PLATFORM directory exists.
XCOMM if doesn't exist translate all to upper case.
XCOMM
if [ -d $PLATFORM ]
then
TAR_TREE=$TOP/$PLATFORM
POST_INSTALL_DIR=$TAR_TREE/config
DATABASE_FILES=$(awk 'BEGIN {FS=":"} /FILESETS: /{print $2}' $TAR_TREE/dt.pkg 2>/dev/null)
else
PLATFORM=`echo "$PLATFORM" | /usr/bin/tr "[a-z]" "[A-Z]"`
TAR_TREE=$TOP/$PLATFORM
POST_INSTALL_DIR=$TAR_TREE/CONFIG
DATABASE_FILES=$(awk 'BEGIN {FS=":"} /FILESETS: /{print $2}' $TAR_TREE/DT.PKG 2>/dev/null)
fi
XCOMM Tell the user what is going to happen
if [ $NO_PROMPT = FALSE ]
then
StateObjective
fi
XCOMM Show the user what directories are going to be deleted
if [ $NO_PROMPT = FALSE ]
then
ShowDirsToBeDeleted
fi
XCOMM Stop the Desktop
StopDesktop
XCOMM Run the Unconfigure Scripts
RunUnconfigScripts
XCOMM Remove the Desktop Files
RemoveDesktop
Reference in New Issue View Git Blame Copy Permalink