falso
/
cdesktopenv
mirror of https://git.code.sf.net/p/cdesktopenv/code
1
0
Fork 0
Code Issues Releases Wiki Activity
cdesktopenv/cde/programs/dtinfo/dtinfogen/install/Librarian

771 lines
17 KiB
Bash
Executable File
Raw Blame History

#!/bin/sh
set -h
###############################################################################
#
# Set up shell traps
#
###############################################################################
USERPATH=$PATH
PATH=/bin:/usr/bin:/usr/sbin
RETCODE=0
trap '\
RETCODE=${RETCODE:-$?} ;\
/bin/rm -rf $BogusInfoLibDir ;\
/bin/rm -f $SRCLIBPATH/$MMDBMAP.1.$$ ;\
/bin/rm -f $SRCLIBPATH/$MMDBMAP.2.$$ ;\
exit $RETCODE \
' 0 1 2 3 4 5 6 7 8 10 12 15
###############################################################################
ECHOCMD="echo"
ECHOSUF='\\c'
if [ -n "`eval $ECHOCMD $ECHOSUF`" ]; then
ECHOCMD="echo -n"
ECHOSUF=""
fi
echo_f() {
eval $ECHOCMD "$1$ECHOSUF"
}
###############################################################################
confirm_f() {
YorN=
echo ""
echo_f "\ \ \ \ Is \[$1] correct? \[ynq\]\ "
read YorN
if [ "$YorN" = "q" -o "$YorN" = "Q" ] ; then
exit 0
fi
if [ -z "$YorN" -o "$YorN" = "y" -o "$YorN" = "Y" ] ; then
return 1
else
return 0
fi
}
###############################################################################
read_f() {
ANSWER=
read ANSWER
if [ "$ANSWER" = "q" -o "$ANSWER" = "Q" ] ; then
exit 0
fi
}
###############################################################################
DisplayMenu() {
clear
echo "
1) List bookcases in a library
2) Copy a bookcase from another library
3) Rename a bookcase
4) Rearrange bookcases in a library
5) Remove a bookcase
6) Exit
"
echo_f "Please enter your choice \[1-6\]\ "
}
###############################################################################
### Listing of all bookcases available in $1
ListCatalog () {
# list all the bookcases available in the infolib parameter
echo "
The bookcases available in [$1] are:
"
awk 'BEGIN { FS="\t" }
{ if (NR > 1) printf (" %d) %s\t[%s]\n", NR-1, $1, $2 ) }' \
< $1/$MMDBMAP
}
###############################################################################
MoveCatalog () {
# list all the bookcases available in the infolib parameter
echo "
The order of the bookcase(s) without [$BOOKCASENAME1] is:
"
awk 'BEGIN { FS="\t" }
{ if (NR > 1) printf (" %d) %s\t[%s]\n", NR-1, $1, $2 ) }' \
< $1
}
###############################################################################
ValidateInfolibPath () {
INFOLIB=$1
if [ -z "$INFOLIB" -o ! -d $INFOLIB ] ; then
echo "(ERROR) $INFOLIB is not a valid information library" >&2
INFOLIB=""
return
fi
cd $INFOLIB
INFOLIB=`pwd`
cd $CURDIR
}
###############################################################################
ListLibrary() {
SRCLIBPATH=
while [ -z "$SRCLIBPATH" ] ; do
echo "
Enter the path for the library to view.
This can be a relative or absolute path, or to exit, type 'q'."
echo_f "\ \ \ \ --\>\ "
read_f
ValidateInfolibPath $ANSWER
SRCLIBPATH=$INFOLIB
done
### prompt for name of bookcase that is going to be installed ###
LIBDESC=`awk 'BEGIN { FS="\t" }
{ if (NR == 1) print ($1) }' \
< $SRCLIBPATH/$MMDBMAP`
echo ""
echo " Description: [$LIBDESC]"
ListCatalog $SRCLIBPATH
if [ $? -ne 0 ] ; then
exit 1
fi
echo ""
echo_f "\ \ \ \ Hit any key to continue or type 'q' to quit\ "
read_f
}
###############################################################################
CopyBookcase() {
### prompt for infolib and bookcase ###
SRCLIBPATH=
while [ -z "$SRCLIBPATH" ] ; do
echo "
Enter the path for the library from which you want to copy a bookcase.
This can be a relative or absolute path, or to exit, type 'q'."
echo_f "\ \ \ \ --\>\ "
read_f
SRCLIBPATH=$ANSWER
ValidateInfolibPath $SRCLIBPATH
SRCLIBPATH=$INFOLIB
done
BOOKCASENAME=
while [ -z "$BOOKCASENAME" ] ; do
### prompt for name of bookcase that is going to be installed ###
ListCatalog $SRCLIBPATH
if [ $? -ne 0 ] ; then
exit 1
fi
SRCBOOKCASELIST=`awk '{ if (NR > 1) print $1 }' < $SRCLIBPATH/$MMDBMAP `
NUMPOS=`awk 'END { print NR-1 }' < $SRCLIBPATH/$MMDBMAP `
if [ $? -ne 0 ] ; then
echo "(ERROR) Cannot display bookcase #" >&2
exit 1
fi
echo ""
echo_f "\ \ \ \ Enter the number of the bookcase to copy \[1-$NUMPOS\]\ "
read_f
POSITION=$ANSWER
if [ -z "$POSITION" ] ; then
continue
fi
if [ "$POSITION" -lt 1 -o "$POSITION" -gt "$NUMPOS" ]; then
echo "(ERROR) Invalid choice [$POSITION], please try again"
sleep 2
continue
fi
### Confirm the selection with the user
BOOKCASENAME=`awk '{
if ( NR == position+1 ) { print $1 }
}' position=$POSITION < $SRCLIBPATH/$MMDBMAP`
confirm_f "$BOOKCASENAME"
if [ $? -eq 0 ] ; then
BOOKCASENAME=""
fi
done
DESTLIBPATH=
while [ -z "$DESTLIBPATH" ] ; do
echo "
Enter the path for the destination library.
This can be a relative or absolute path, or to exit, type 'q'."
echo_f "\ \ \ \ --\>\ "
read_f
DESTLIBPATH=$ANSWER
ValidateInfolibPath $DESTLIBPATH
DESTLIBPATH=$INFOLIB
### Check if BookCaseName already exists ###
TSTSTRING=
TSTSTRING=`awk '{
if ( $1 == bcname ) { print $1 }
}' bcname=$BOOKCASENAME < $DESTLIBPATH/$MMDBMAP`
if [ -n "$TSTSTRING" ] ; then
echo "\ \ \ \ $BOOKCASENAME already exists in $DESTLIBPATH"
echo_f "\ \ \ \ Do you want to override it? \[ynq\]\ "
read_f
RESPONSE=$ANSWER
OVERRIDE=
if [ "$RESPONSE" = "y" ] ; then
OVERRIDE=-i
DeInstallBase $BOOKCASENAME $DESTLIBPATH
if [ $? -ne 0 ] ; then
echo "(ERROR) Unable to remove $BOOKCASENAME from $DESTLIBPATH"
exit 1
fi
elif [ "$RESPONSE" = "n" ]; then
break
fi
fi
done
### Prompt for parameter verification ###
echo "
You specified this information.
Copy [$BOOKCASENAME] from: $SRCLIBPATH
to : $DESTLIBPATH
"
echo_f "\ \ \ \ Is this correct? [ynq]\ "
read_f
echo ""
RESPONSE=$ANSWER
if [ "$RESPONSE" = "n" ]; then
return
fi
### Grab the bookcase entry line
BCENTRY=`awk '{
if ( NR > 1 && $1 == bookcasename ) { print $0 }
}' bookcasename=$BOOKCASENAME $SRCLIBPATH/$MMDBMAP`
if [ -z "$BCENTRY" ]; then
echo "(ERROR) $BOOKCASENAME does not exist in $SRCLIBPATH"
exit 1
fi
if [ ! -d $BogusInfoLibDir ]; then
mkdir -p $BogusInfoLibDir
else
echo "(ERROR) $BogusInfoLibDir already exists, cannot proceed" >&2
exit 1
fi
cd $BogusInfoLibDir
MMDB_PATH=$BogusInfoLibDir
### set up the bogus link to fool MMDB into believing that
### it is an info-lib
DESTBCLIST=`awk '{ if (NR > 1) print $1 }' < $DESTLIBPATH/$MMDBMAP `
for CurBookCase in $DESTBCLIST; do
ln -s $DESTLIBPATH/$CurBookCase $CurBookCase
done
if [ $? -ne 0 ]; then
echo "(ERROR) Failed to link bookcases from $DESTLIBPATH" >&2
exit 1
fi
### Link the new bookcase to be installed ###
ln -s $SRCLIBPATH/$BOOKCASENAME $BOOKCASENAME
cp $DESTLIBPATH/$MMDBMAP $MMDBMAP
### Update the new $MMDBMAP file with the new entry
echo "$BCENTRY" >> $MMDBMAP
### actually perform the validation ###
echo " Validating bookcases...please wait"
### Generate the BookCaseList ###
BookCaseList=`awk '{if (NR > 1) print $1 }' < $MMDBMAP`
for CurBookCase in $BookCaseList; do
if [ "$BOOKCASENAME" != "$CurBookCase" ]; then
echo " ...Validating $BOOKCASENAME against $CurBookCase"
valBase $BOOKCASENAME $CurBookCase
fi
if [ $? -ne 0 ]; then
echo "(ERROR) No copying is performed because of errors found in validation" >&2
rm -rf $BogusInfoLibDir
sleep 2
return
fi
done
echo " Validation complete."
### clean up the bogus infolib directory ###
cd $CURDIR
rm -r $BogusInfoLibDir
echo "
Copying bookcase... please wait
"
cd $DESTLIBPATH
(cd $SRCLIBPATH ; tar cf - $BOOKCASENAME) | tar xpf -
if [ $? -ne 0 ]; then
echo "(ERROR) Copying failed" >&2
exit 1
fi
echo "$BCENTRY" >> $MMDBMAP
echo " Bookcase copied."
echo ""
echo_f "\ \ \ \ Hit any key to continue or type 'q' to quit\ "
read_f
}
###############################################################################
RenameBookcase() {
### prompt for bookcase to be renamed ###
SRCLIBPATH=
while [ -z "$SRCLIBPATH" ] ; do
echo "
Enter the path for the library to modify.
This can be a relative or absolute path, or to exit, type 'q'."
echo_f "\ \ \ \ --\>\ "
read_f
ValidateInfolibPath $ANSWER
SRCLIBPATH=$INFOLIB
done
BOOKCASENAME=
while [ -z "$BOOKCASENAME" ] ; do
### prompt for name of bookcase that is going to be installed ###
ListCatalog $SRCLIBPATH
if [ $? -ne 0 ] ; then
exit 1
fi
SRCBOOKCASELIST=`awk '{ if (NR > 1) print $1 }' < $SRCLIBPATH/$MMDBMAP `
NUMPOS=`awk 'END { print NR-1 }' < $SRCLIBPATH/$MMDBMAP `
if [ $? -ne 0 ] ; then
echo "(ERROR) Cannot display bookcase #" >&2
exit 1
fi
echo ""
echo_f "\ \ \ \ Enter the number of the bookcase to rename \[1-$NUMPOS\]\ "
read_f
POSITION=$ANSWER
if [ -z "$POSITION" ] ; then
continue
fi
if [ "$POSITION" -lt 1 -o "$POSITION" -gt "$NUMPOS" ]; then
echo "(ERROR) Invalid choice [$POSITION], please try again"
sleep 2
continue
fi
### Confirm the selection with the user
BOOKCASENAME=`awk '{
if ( NR == position+1 ) { print $1 }
}' position=$POSITION < $SRCLIBPATH/$MMDBMAP`
confirm_f "$BOOKCASENAME"
if [ $? -eq 0 ] ; then
BOOKCASENAME=""
fi
done
BookCaseTitle=""
while [ -z "$BookCaseTitle" ] ; do
echo "
Enter the new description for $BOOKCASENAME, or type 'q' to quit."
echo_f "\ \ \ \ --\>\ "
read_f
BookCaseTitle=$ANSWER
### Confirm the title with the user ###
confirm_f "$BookCaseTitle"
if [ $? -eq 0 ] ; then
BOOKCASENAME=""
continue
fi
ChangeCaseTitle $SRCLIBPATH $BOOKCASENAME "$BookCaseTitle"
if [ $? -ne 0 ]; then
exit 1
fi
done
echo " Bookcase renamed."
echo ""
echo_f "\ \ \ \ Hit any key to continue or type 'q' to quit\ "
read_f
}
###############################################################################
RearrangeBookcase() {
### prompt for source information library ###
SRCLIBPATH=
while [ -z "$SRCLIBPATH" ] ; do
echo "
Enter the path for the library to modify.
This can be a relative or absolute path, or to exit, type 'q'."
echo_f "\ \ \ \ --\>\ "
read_f
ValidateInfolibPath $ANSWER
SRCLIBPATH=$INFOLIB
done
BOOKCASENAME1=
while [ -z "$BOOKCASENAME1" ] ; do
SRCBOOKCASELIST=`awk '{ if (NR > 1) print $1 }' < $SRCLIBPATH/$MMDBMAP `
NUMPOS=`awk 'END { print NR-1 }' < $SRCLIBPATH/$MMDBMAP `
if [ $NUMPOS -lt 2 ] ; then
echo " No bookcases to rearrange only $NUMPOS available."
sleep 2
return
fi
### prompt for name of bookcase that is going to be moved ###
ListCatalog $SRCLIBPATH
if [ $? -ne 0 ] ; then
exit 1
fi
echo ""
echo_f "\ \ \ \ Enter the number of the bookcase to move \[1-$NUMPOS\]\ "
read_f
POSITION=$ANSWER
if [ -z "$POSITION" ] ; then
continue
fi
if [ "$POSITION" -lt 1 -o "$POSITION" -gt "$NUMPOS" ]; then
echo "(ERROR) Invalid choice [$POSITION], please try again"
sleep 2
continue
fi
### Confirm the selection with the user
BOOKCASENAME1=`awk '{
if ( NR == position+1 ) { print $1 }
}' position=$POSITION < $SRCLIBPATH/$MMDBMAP`
confirm_f "$BOOKCASENAME1"
if [ $? -eq 0 ] ; then
BOOKCASENAME1=""
fi
done
### Grab the entry line for the bookcase
BCENTRY=`awk '{
if ( NR > 1 && $1 == bookcasename ) { print $0 }
}' bookcasename=$BOOKCASENAME1 $SRCLIBPATH/$MMDBMAP`
if [ -z "$BCENTRY" ]; then
echo "(ERROR) $BOOKCASENAME1 does not exist in $SRCLIBPATH"
exit 1
fi
### Prepare $MMDBMAP for rearrangement ###
awk '{
if ( NR == 1 || $1 != BookCaseName ) { print $0 }
}' BookCaseName=$BOOKCASENAME1 \
< $SRCLIBPATH/$MMDBMAP > $SRCLIBPATH/$MMDBMAP.1.$$
POSITION=
while [ -z "$POSITION" ] ; do
MoveCatalog $SRCLIBPATH/$MMDBMAP.1.$$
echo "
Enter the number corresponding to the position you want [$BOOKCASENAME1]
to occupy. If another bookcase already occupies the position you
choose, the bookcase you are moving takes its place, and the original
bookcase moves one place down in the list."
echo_f "\ \ \ \ Default is $NUMPOS, or type 'q' to quit. \[1-$NUMPOS\]\ "
read_f
POSITION=$ANSWER
if [ -z "$POSITION" ] ; then
POSITION=$NUMPOS
fi
if [ $POSITION -lt 1 -o $POSITION -gt $NUMPOS ]; then
echo "(ERROR) Invalid choice [$POSITION], try again"
continue
fi
### Prompt for parameter verification ###
echo "
You specified this order for the bookcases :
"
if [ "$POSITION" != "$NUMPOS" ]; then
awk ' {
if ( NR != POSITION+1 ) { print $0 }
if ( NR == POSITION+1 ) { print BookCaseEntry; print $0 }
}' POSITION="$POSITION" BookCaseEntry="$BCENTRY" < \
$SRCLIBPATH/$MMDBMAP.1.$$ > $SRCLIBPATH/$MMDBMAP.2.$$
else
cp $SRCLIBPATH/$MMDBMAP.1.$$ $SRCLIBPATH/$MMDBMAP.2.$$
echo "$BCENTRY" >> $SRCLIBPATH/$MMDBMAP.2.$$
fi
awk 'BEGIN { FS="\t" }
{ if (NR > 1) {printf(" %d) %s\t[%s]\n", NR-1, $1, $2); }}
' < $SRCLIBPATH/$MMDBMAP.2.$$
echo ""
echo_f "\ \ \ \ Is this correct? \[ynq\]\ "
read_f
Response=$ANSWER
if [ "$Response" = "n" ]; then
POSITION=
continue
fi
## move the file with new order to $MMDBMAP ###
mv $SRCLIBPATH/$MMDBMAP.2.$$ $SRCLIBPATH/$MMDBMAP
rm -f $SRCLIBPATH/$MMDBMAP.1.$$
done
echo " Bookcase rearranged."
echo ""
echo_f "\ \ \ \ Hit any key to continue or type 'q' to quit\ "
read_f
}
###############################################################################
RemoveBookcase() {
### prompt for bookcase to be removed ###
SRCLIBPATH=
while [ -z "$SRCLIBPATH" ] ; do
echo "
Enter the path for the library to modify.
This can be a relative or absolute path, or to exit, type 'q'."
echo_f "\ \ \ \ --\>\ "
read_f
ValidateInfolibPath $ANSWER
SRCLIBPATH=$INFOLIB
done
BOOKCASENAME=
while [ -z "$BOOKCASENAME" ] ; do
### prompt for name of bookcase that is going to be installed ###
ListCatalog $SRCLIBPATH
if [ $? -ne 0 ] ; then
exit 1
fi
SRCBOOKCASELIST=`awk '{ if (NR > 1) print $1 }' < $SRCLIBPATH/$MMDBMAP `
NUMPOS=`awk 'END { print NR-1 }' < $SRCLIBPATH/$MMDBMAP `
if [ $? -ne 0 ] ; then
echo "(ERROR) Cannot display bookcase #" >&2
exit 1
fi
echo ""
echo_f "\ \ \ \ Enter the number of the bookcase to remove \[1-$NUMPOS\]\ "
read_f
POSITION=$ANSWER
if [ -z "$POSITION" ] ; then
continue
fi
if [ "$POSITION" -lt 1 -o "$POSITION" -gt "$NUMPOS" ]; then
echo "(ERROR) Invalid choice [$POSITION], please try again"
sleep 2
continue
fi
### Confirm the selection with the user
BOOKCASENAME=`awk '{
if ( NR == position+1 ) { print $1 }
}' position=$POSITION < $SRCLIBPATH/$MMDBMAP`
confirm_f "$BOOKCASENAME"
if [ $? -eq 0 ] ; then
BOOKCASENAME=""
fi
done
### Actually perform the de-installation ###
echo " Removing $BOOKCASENAME...please wait"
DeInstallBase $BOOKCASENAME $SRCLIBPATH
if [ $? -ne 0 ]; then
echo "(ERROR) Bookcase is not removed because of errors found in De-Installation utility" >&2
exit 1
fi
echo " Bookcase removed."
echo ""
echo_f "\ \ \ \ Hit any key to continue or type 'q' to quit\ "
read_f
}
###############################################################################
CURDIR=`pwd`
if [ -z "$OLIASDDKBIN" ]; then
NewDir=`dirname $0`
cd $NewDir
OLIASDDKBIN=`pwd`
cd $CURDIR
fi
export MMDB_PATH PATH TMPDIR
TMPDIR=${TMPDIR:-/usr/tmp}
PATH=/bin:/usr/bin:/usr/sbin:${OLIASDDKBIN}
MMDBMAP=bookcase.map
### set up bogus info-lib directory for validation
BogusInfoLibDir=$TMPDIR/infolib$$
###############################################################################
## Get the task option ###
CHOICE=
while [ -z "$CHOICE" ] ; do
DisplayMenu
read CHOICE
case "$CHOICE" in
1)
ListLibrary
;;
2)
CopyBookcase
;;
3)
RenameBookcase
;;
4)
RearrangeBookcase
;;
5)
RemoveBookcase
;;
q|Q|6)
exit 0
;;
*)
echo "
*** Invalid choice, please try again ***
" >&2
sleep 2
;;
esac
cd $CURDIR
CHOICE=
done
Reference in New Issue View Git Blame Copy Permalink