mirror of
https://github.com/Interlisp/maiko.git
synced 2026-01-13 23:27:12 +00:00
Remove 'release' support from makeright. (#265)
This is the old way that releases were built and isn't relevant today. It made a variety of assumptions about how things were linked and allowed for the user to re-link an executable, but that isn't something we need to do any longer. This doesn't yet remove the checksum, ldechecksum, and related scripts.
This commit is contained in:
Bruce Mitchener
GitHub
parent
95b482d5d5
commit
bf15105d3c
@ -1,758 +0,0 @@
|
||||
#! /bin/sh
|
||||
# ============================================================================
|
||||
# Changes:
|
||||
# ============================================================================
|
||||
# SYNOPSYS:
|
||||
# install-medley
|
||||
#
|
||||
# Utility used for installation and upgrading of the medley system.
|
||||
# The utility will infer as much as possible about the host and network,
|
||||
# but will prompt for answers when needed.
|
||||
#
|
||||
# ============================================================================
|
||||
|
||||
# What is the application to be installed
|
||||
APPLICATION="Medley 2.0"
|
||||
|
||||
SHAREDIR=/usr/share/lde
|
||||
LOCALDIR=/usr/local/lde
|
||||
INSTALLDIR=$LOCALDIR
|
||||
|
||||
TAPEDEV=/dev/rst0
|
||||
|
||||
#************************************************************
|
||||
#********* Changes below this point should normally *********
|
||||
#********* not be required *********
|
||||
#************************************************************
|
||||
|
||||
# What we normally recommend to install (marked with 'x')
|
||||
# COLORP and X11P versions are deduced if possible
|
||||
SYSOUTP=x
|
||||
MONOP=x
|
||||
DISPLAYFONTP=x
|
||||
LIBRARYP=x
|
||||
|
||||
# All sizes in MB
|
||||
SYSOUTSIZE=5.1
|
||||
MONOSIZE=0.5
|
||||
COLORSIZE=0.5
|
||||
X11SIZE=0.6
|
||||
XNSSIZE=0.1
|
||||
LIBRARYSIZE=3
|
||||
DISPLAYFONTSIZE=5.5
|
||||
INTERPRESSFONTSIZE=1.5
|
||||
CHECKSUMSIZE=0.1
|
||||
OBJECTSIZE=0.6
|
||||
|
||||
# All the files for each group
|
||||
SYSOUTFILES="./lispsysouts"
|
||||
CHECKSUMFILES="./checksumdir"
|
||||
LIBRARYFILES="./lisplibrary ./clos"
|
||||
DISPLAYFONTFILES="./fonts/display"
|
||||
INTERPRESSFONTFILES="./fonts/interpress ./fonts/press"
|
||||
|
||||
LOCALHOST=`/bin/hostname`
|
||||
scriptName=`/bin/basename $0`
|
||||
|
||||
# Send out a message when interrupted
|
||||
trap 'echo "
|
||||
Aborted..."; exit' 2
|
||||
|
||||
#-----------------------------------------------------------
|
||||
#----------------------- PROCEDURES ------------------------
|
||||
|
||||
exitScript () {
|
||||
echo "$scriptName: $1"
|
||||
exit
|
||||
} # exitScript
|
||||
|
||||
|
||||
ask(){
|
||||
# Ask a question=$1 and use default=$2 if no answer is given. If arg $3
|
||||
# is specified, it will be considered the opposite of $2. Return 0 if
|
||||
# default is used, 1 otherwise. 'answer' can be used as a global variable
|
||||
|
||||
echo -n "$1 ${2:+[$2]}: "
|
||||
answer=`/bin/line`
|
||||
if [ $# -gt 2 ]
|
||||
then until [ "$answer" = "" -o "$answer" = "$2" -o "$answer" = "$3" ];
|
||||
do echo "Please type '$2' or '$3'."
|
||||
echo -n "$1 $2: "
|
||||
answer=`/bin/line`
|
||||
done
|
||||
fi
|
||||
|
||||
# Note the "-" in the argument below. test will not behave well with some
|
||||
# of the shell escape characters otherwise.
|
||||
[ "-${answer:=$2}" = "-$2" ]
|
||||
} # ask
|
||||
|
||||
|
||||
menuInstructions () {
|
||||
echo "<--------------------> Menu Instructions <-------------------->
|
||||
- Only options marked with an 'x' will be installed. They are
|
||||
initally based on inferred information, recommendations and answers
|
||||
to questions.
|
||||
- To select additional options, at the prompt enter at least as
|
||||
many characters as needed to make the selection unique, e.g.,
|
||||
'XN' for XNS. To select all options, enter 'All'.
|
||||
- To deselect an option already marked with an 'x', at the prompt
|
||||
enter at least as many characters as needed to make the
|
||||
selection unique. To deselect all options, enter 'None'.
|
||||
"
|
||||
ask "Continue?" "y"
|
||||
|
||||
} # menuInstructions
|
||||
|
||||
|
||||
welcome() {
|
||||
|
||||
/usr/ucb/clear
|
||||
echo "
|
||||
<----------> Welcome to the $APPLICATION Installation Utility <---------->
|
||||
|
||||
Utility is used to install or upgrade a $APPLICATION system. It will try to infer
|
||||
as much information as possible about your system, but you will be prompted
|
||||
for specific information when it is not able to infer it automatically.
|
||||
|
||||
Recommended options are initially filled in, but you can change them at
|
||||
any time using the Installation Options Menu.
|
||||
"
|
||||
menuInstructions
|
||||
|
||||
} # welcome
|
||||
|
||||
|
||||
scriptMessage () {
|
||||
MESSAGE="************************** $1 ***************************
|
||||
$2
|
||||
************************************************************"
|
||||
} # scriptMessage
|
||||
|
||||
|
||||
setOSType () {
|
||||
# Pass it OS versions and it will set the OSVERSION variable
|
||||
|
||||
while [ $# != 0 ]
|
||||
do case "$1" in
|
||||
3|3.[245]) OS3P=x ;;
|
||||
4|4.0|4.0.*) OS4P=x ;;
|
||||
4.1|4.1.*) OS41P=x ;;
|
||||
*) echo " Should not happen: OStype $1 invalid" ;;
|
||||
esac
|
||||
shift
|
||||
done
|
||||
OSVERSION="${OS3P:+3} ${OS4P:+4} ${OS41P:+4.1}"
|
||||
} # setOSType
|
||||
|
||||
|
||||
askOSVersion(){
|
||||
# Prompt user for the correct OS-version
|
||||
|
||||
MESSAGE="$1"
|
||||
|
||||
unset menuloop1
|
||||
while [ ${menuloop1:-notdone} = notdone ]
|
||||
do /usr/ucb/clear
|
||||
echo "
|
||||
<---------------> OS Options Menu <--------------->
|
||||
|
||||
${OS3P:--} 3.X - SunOS 3.2 3.4 3.5
|
||||
${OS4P:--} 4.0 - SunOS 4.0 4.0.X
|
||||
${OS41P:--} 4.1 - SunOS 4.1 4.1.X
|
||||
|
||||
All - Mark all options
|
||||
None - Unmark all options
|
||||
Continue installation
|
||||
${MESSAGE:+
|
||||
$MESSAGE}"
|
||||
unset MESSAGE
|
||||
ask "Select" "Continue"
|
||||
case "$answer" in
|
||||
3|3.[X245])
|
||||
if [ "$OS3P" != "x" ]
|
||||
then OS3P=x
|
||||
else unset OS3P
|
||||
fi ;;
|
||||
4.0|4.0.*)
|
||||
if [ "$OS4P" != "x" ]
|
||||
then OS4P=x
|
||||
else unset OS4P
|
||||
fi ;;
|
||||
4.1|4.1.*)
|
||||
if [ "$OS41P" != "x" ]
|
||||
then OS41P=x
|
||||
else unset OS41P
|
||||
fi ;;
|
||||
[aA]*) OS3P=x ; OS4P=x ; OS41P=x ;;
|
||||
[nN]*) unset OS3P OS4P OS41P ;;
|
||||
[cC]*|"") menuloop1=done ;;
|
||||
*) MESSAGE="Invalid reply: $answer" ;;
|
||||
esac
|
||||
done
|
||||
OSVERSION="${OS3P:+3} ${OS4P:+4} ${OS41P:+4.1}"
|
||||
} # askOSVersion
|
||||
|
||||
|
||||
checkInstallPoint () {
|
||||
# Uses INSTALLDIR to determine if it is possible to make an
|
||||
# installation. INSTDIRERRP is just used to return result of operation and
|
||||
# to signal an error message. EXISTSP is used to avoid repetitive messages.
|
||||
|
||||
unset INSTDIRERRP
|
||||
if [ -f "$INSTALLDIR" ]
|
||||
then scriptMessage "ERROR" "A file with the same name already exists: $INSTALLDIR
|
||||
Select the 'Directory' command and make a change."
|
||||
INSTDIRERRP=x
|
||||
elif [ -d "$INSTALLDIR" -a ! -w "$INSTALLDIR" ]
|
||||
then scriptMessage "ERROR" "Write permission denied for directory: $INSTALLDIR
|
||||
Select the 'Directory' command and make a change."
|
||||
INSTDIRERRP=x
|
||||
elif [ ! -d "$INSTALLDIR" ]
|
||||
then /bin/mkdir -p $INSTALLDIR 1>/dev/null 2>/dev/null
|
||||
if [ $? = 0 ]
|
||||
then EXISTSP=x
|
||||
else scriptMessage "ERROR" "Could not create: $INSTALLDIR - Permission denied
|
||||
Select the 'Directory' command and make a change."
|
||||
INSTDIRERRP=x
|
||||
fi
|
||||
elif [ -d "$INSTALLDIR" -a ${EXISTSP:--} = - ]
|
||||
then scriptMessage "WARNING" "Directory already exists: $INSTALLDIR
|
||||
If this is the location of a previous $APPLICATION installation,
|
||||
\"$scriptName\" may overwrite some of the old files."
|
||||
EXISTSP=x
|
||||
fi
|
||||
|
||||
[ ${INSTDIRERRP:--} = - ]
|
||||
} # checkInstallPoint
|
||||
|
||||
|
||||
mountTape () {
|
||||
unset TAPEMOUNTEDP
|
||||
while [ ${TAPEMOUNTEDP:--} = - ]
|
||||
do if [ "$1" = "$LOCALHOST" ]
|
||||
then mt -f $TAPEDEV status 2>&1 | /bin/egrep -s "no sense"
|
||||
else /usr/ucb/rsh "$1" mt -f $TAPEDEV status 2>&1 | /bin/egrep -s "no sense"
|
||||
fi
|
||||
|
||||
if [ $? != 0 ]
|
||||
then echo "ERROR. Tape not mounted or mounted improperly."
|
||||
ask "Please insert installation tape in the tape drive. Done?" "y"
|
||||
else TAPEMOUNTEDP=x
|
||||
fi
|
||||
done
|
||||
} # mountTape
|
||||
|
||||
|
||||
checkTape () {
|
||||
|
||||
if [ "$1" = "$LOCALHOST" ]
|
||||
then echo -n "Looking for a local tape drive on $1 ..."
|
||||
mt -f $TAPEDEV status 2>&1 | /bin/egrep -s "no sense|not ready|no tape loaded"
|
||||
if [ $? = 0 ]
|
||||
then echo " Found"
|
||||
TAPEHOST="$LOCALHOST"
|
||||
else echo " Not found"
|
||||
echo "'$LOCALHOST' does not seem to have a tape drive."
|
||||
fi
|
||||
else /usr/etc/ping "$1" 10 1>/dev/null 2>/dev/null
|
||||
if [ $? = 0 ]
|
||||
then echo -n "Looking for a remote tape drive on $1 ..."
|
||||
/usr/ucb/rsh "$1" mt -f $TAPEDEV status 2>&1 | /bin/egrep -s "no sense|not ready|no tape loaded"
|
||||
if [ $? = 0 ]
|
||||
then echo " Found"
|
||||
TAPEHOST="$1"
|
||||
else echo " Not Found"
|
||||
echo "'$1' does not seem to have a tape drive."
|
||||
fi
|
||||
else echo "Could not connect to '$1' or host unknown."
|
||||
fi
|
||||
fi
|
||||
|
||||
} # checkTape
|
||||
|
||||
|
||||
inferConfiguration () {
|
||||
# Infers as much as possible the type of configuration on the host
|
||||
# or network. Will ask when not able to determine something.
|
||||
|
||||
# Try to infer Os type
|
||||
if [ -f /etc/motd ]
|
||||
then OSVERSION=`sed -e '1s/.*Release \(...\).*/\1/' -e '1q' < /etc/motd`
|
||||
setOSType $OSVERSION
|
||||
else askOSVersion "Please specify the SunOS version you are running."
|
||||
fi
|
||||
|
||||
# Is it necessary to install 'ldemulti'
|
||||
/bin/egrep -s "cgthree0|cgsix0" /var/adm/messages
|
||||
if [ $? = 0 ]
|
||||
then COLORP=x
|
||||
fi
|
||||
|
||||
# Is X-windows installed on this host
|
||||
if [ -d /usr/bin/X11 -o -d /usr/local/X11 ]
|
||||
then X11P=x
|
||||
fi
|
||||
|
||||
|
||||
checkTape $LOCALHOST
|
||||
|
||||
while [ ${TAPEHOSTP:--} = - ]
|
||||
do
|
||||
if [ ${TAPEHOST:--} = - ]
|
||||
then
|
||||
# Host is networked
|
||||
ask "Name of a host with a tape drive"
|
||||
checkTape "$answer"
|
||||
fi
|
||||
|
||||
if [ "${TAPEHOST:+-}" = - ]
|
||||
then if ask "Insert installation tape in tape drive of $TAPEHOST. Ready?" "y"
|
||||
then TAPEHOSTP=x
|
||||
mountTape "$TAPEHOST"
|
||||
else unset TAPEHOST
|
||||
fi
|
||||
fi
|
||||
done
|
||||
|
||||
} # inferConfiguration
|
||||
|
||||
|
||||
emulatorSpace () {
|
||||
# Figure out according to selections what the real space requirements
|
||||
# are for the emulator. Sets the variables RMONOSIZE, RCOLORSIZE, RX11SIZE
|
||||
# for later usage
|
||||
|
||||
RMONOSIZE=0
|
||||
RCOLORSIZE=0
|
||||
RX11SIZE=0
|
||||
|
||||
if [ ${MONOP:--} != - ]
|
||||
then for x in $OSVERSION
|
||||
do RMONOSIZE=`echo $MONOSIZE ${OBJECTP:+"+ $OBJECTSIZE"} + $RMONOSIZE | /bin/bc`
|
||||
done
|
||||
fi
|
||||
|
||||
if [ ${COLORP:--} != - ]
|
||||
then for x in $OSVERSION
|
||||
do RCOLORSIZE=`echo $COLORSIZE ${OBJECTP:+"+ $OBJECTSIZE"} + $RCOLORSIZE | /bin/bc`
|
||||
done
|
||||
fi
|
||||
|
||||
if [ ${X11P:--} != - ]
|
||||
then for x in $OSVERSION
|
||||
do RX11SIZE=`echo $X11SIZE ${OBJECTP:+"+ $OBJECTSIZE"} + $RX11SIZE | /bin/bc`
|
||||
done
|
||||
fi
|
||||
} # emulatorSpace
|
||||
|
||||
|
||||
showInstallMenu () {
|
||||
# Will do different calculations depending on $1. If no argument is
|
||||
# given, it will only redisplay the Installation Options Menu.
|
||||
|
||||
if [ $# -ge 1 ]
|
||||
then if [ "$1" = available -o $# -gt 1 ]
|
||||
then if checkInstallPoint
|
||||
then calculateSpace available
|
||||
fi
|
||||
fi
|
||||
|
||||
if [ "$1" = required -o $# -gt 1 ]
|
||||
then calculateSpace required
|
||||
fi
|
||||
|
||||
if [ "${EXISTSP:+-}" = - ]
|
||||
then sufficientSpaceP
|
||||
fi
|
||||
fi
|
||||
|
||||
/usr/ucb/clear
|
||||
|
||||
echo "
|
||||
<---------------> Installation Options Menu <-------------->
|
||||
------------------------ Emulators -------------------------
|
||||
For one or several OS versions (At least one of monochrome,
|
||||
color, or X11-version is required for new installations).
|
||||
|
||||
${MONOP:--} Monochrome ${MONOP:+- $RMONOSIZE MByte}
|
||||
${COLORP:--} Color ${COLORP:+- $RCOLORSIZE MByte}
|
||||
${X11P:--} X11-version ${X11P:+- $RX11SIZE MByte}
|
||||
${XNSP:--} XNS ${XNSP:+- $XNSSIZE MByte }- allows handling of the XNS protocol.
|
||||
${OBJECTP:--} Object files - allows linking of Medley to other software.
|
||||
OS version - Change versions. Selected: $OSVERSION
|
||||
-------------------------- Fonts ---------------------------
|
||||
${DISPLAYFONTP:--} Display ${DISPLAYFONTP:+- $DISPLAYFONTSIZE MByte }(recommended)
|
||||
${INTERPRESSFONTP:--} Interpress ${INTERPRESSFONTP:+- $INTERPRESSFONTSIZE MByte}
|
||||
------------ Sysout, Library & Checksum files -------------
|
||||
${SYSOUTP:--} Sysout ${SYSOUTP:+- $SYSOUTSIZE MByte} (required for new installations).
|
||||
${LIBRARYP:--} Library modules ${LIBRARYP:+- $LIBRARYSIZE MByte }(recommended)
|
||||
${CHECKSUMP:--} Checksum files ${CHECKSUMP:+- $CHECKSUMSIZE MByte}
|
||||
------------------------- Commands -------------------------
|
||||
Directory - Change the installation directory.
|
||||
-- Current: $INSTALLDIR
|
||||
-- Disk-space(KByte) Available:${AVAILABLESPACE:----} Needed:$DISKSPACE
|
||||
!<Unix command> - Execute a Unix command.
|
||||
? or Help - Show menu instructions.
|
||||
Redraw - Redisplay this menu.
|
||||
All - Mark all options.
|
||||
None - Unmark all options.
|
||||
Continue installation.
|
||||
Quit installation.
|
||||
${MESSAGE}"
|
||||
} # showInstallMenu
|
||||
|
||||
|
||||
getInstallOptions() {
|
||||
# General menu for selecting what to install
|
||||
|
||||
showInstallMenu required available
|
||||
|
||||
menuloop3=notdone
|
||||
while [ "$menuloop3" = notdone ]
|
||||
do if [ "${INSTDIRERRP:+-}" = - ]
|
||||
then ask "Select" "Directory"
|
||||
unset INSTDIRERRP
|
||||
else ask "Select" "Continue"
|
||||
fi
|
||||
unset MESSAGE
|
||||
|
||||
case "$answer" in
|
||||
[sS]*) if [ "$SYSOUTP" != "x" ]
|
||||
then SYSOUTP=x
|
||||
else unset SYSOUTP
|
||||
fi
|
||||
showInstallMenu required ;;
|
||||
[mM]*) if [ "$MONOP" != "x" ]
|
||||
then MONOP=x
|
||||
else unset MONOP
|
||||
fi
|
||||
showInstallMenu required ;;
|
||||
[cC][oO][lL]*)
|
||||
if [ "$COLORP" != "x" ]
|
||||
then COLORP=x
|
||||
else unset COLORP
|
||||
fi
|
||||
showInstallMenu required ;;
|
||||
[xX][1]*)
|
||||
if [ "$X11P" != "x" ]
|
||||
then X11P=x
|
||||
else unset X11P
|
||||
fi
|
||||
showInstallMenu required ;;
|
||||
[xX][nN]*)
|
||||
if [ "$XNSP" != "x" ]
|
||||
then XNSP=x
|
||||
else unset XNSP
|
||||
fi
|
||||
showInstallMenu required ;;
|
||||
[oO][bB]*)
|
||||
if [ "$OBJECTP" != "x" ]
|
||||
then OBJECTP=x
|
||||
else unset OBJECTP
|
||||
fi
|
||||
showInstallMenu required ;;
|
||||
[oO][sS]*)
|
||||
askOSVersion "Please specify changes you wish to make."
|
||||
showInstallMenu required ;;
|
||||
[dD][iI][sS]*)
|
||||
if [ "$DISPLAYFONTP" != "x" ]
|
||||
then DISPLAYFONTP=x
|
||||
else unset DISPLAYFONTP
|
||||
fi
|
||||
showInstallMenu required ;;
|
||||
[iI]*) if [ "$INTERPRESSFONTP" != "x" ]
|
||||
then INTERPRESSFONTP=x
|
||||
else unset INTERPRESSFONTP
|
||||
fi
|
||||
showInstallMenu required ;;
|
||||
[lL]*) if [ "$LIBRARYP" != "x" ]
|
||||
then LIBRARYP=x
|
||||
else unset LIBRARYP
|
||||
fi
|
||||
showInstallMenu required ;;
|
||||
[cC][hH]*)
|
||||
if [ "$CHECKSUMP" != "x" ]
|
||||
then CHECKSUMP=x
|
||||
else unset CHECKSUMP
|
||||
fi
|
||||
showInstallMenu required ;;
|
||||
[dD][iI][rR]*)
|
||||
ask "Where do you want to install $APPLICATION?" "$INSTALLDIR"
|
||||
INSTALLDIR="$answer"
|
||||
unset EXISTSP
|
||||
showInstallMenu available ;;
|
||||
!?*) eval `echo "$answer" | /bin/sed -e s/\\!//` ;;
|
||||
\?|[hH]*) menuInstructions ; showInstallMenu ;;
|
||||
[rR]*) showInstallMenu ;;
|
||||
[aa]*) SYSOUTP=x ; MONOP=x ; COLORP=x ; X11P=x ; XNSP=x
|
||||
OBJECTP=x ; DISPLAYFONTP=x ; INTERPRESSFONTP=x
|
||||
LIBRARYP=x ; CHECKSUMP=x ; showInstallMenu required ;;
|
||||
[nN]*) unset SYSOUTP MONOP COLORP X11P XNSP OBJECTP DISPLAYFONTP INTERPRESSFONTP LIBRARYP CHECKSUMP
|
||||
showInstallMenu required ;;
|
||||
[cC][oO][nN]*|"")
|
||||
if [ ${SYSOUTP:--} = - -a ${MONOP:--} = - -a \
|
||||
${COLORP:--} = - -a ${X11P:--} = - -a \
|
||||
${DISPLAYFONTP:--} = - -a ${INTERPRESSFONTP:--} -a \
|
||||
${LIBRARYP:--} = - -a ${CHECKSUMP:--} = - -a \
|
||||
${OBJECTP:--} = - -a ${XNSP:--} = - ]
|
||||
then scriptMessage "ERROR" "It doesn't make sense not installing anything.
|
||||
Please select an option to install"
|
||||
elif [ \( ${MONOP:--} != - -o ${COLORP:--} != - -o \
|
||||
${X11P:--} != - \) -a ${OS3P:--} = - -a \
|
||||
${OS4P:--} = - -a ${OS41P:--} = - ]
|
||||
then scriptMessage "ERROR" "You have to select a SunOS version in order to install an emulator."
|
||||
elif checkInstallPoint
|
||||
then if sufficientSpaceP
|
||||
then menuloop3=done
|
||||
fi
|
||||
fi
|
||||
echo "$MESSAGE" ;;
|
||||
[qQ]*) exitScript "Aborted ..." ;;
|
||||
*) echo "Invalid reply: $answer" ;;
|
||||
esac
|
||||
done
|
||||
|
||||
} # getInstallOptions
|
||||
|
||||
|
||||
calculateSpace(){
|
||||
# Calculate either available space for chosen installation point or required
|
||||
# space for selected options. $1 is used to determine what to calculate.
|
||||
|
||||
if [ "$1" = required ]
|
||||
then emulatorSpace
|
||||
|
||||
REQUIREDSPACE=`echo ${SYSOUTP:+"$SYSOUTSIZE +"} \
|
||||
${LIBRARYP:+"$LIBRARYSIZE +"} \
|
||||
${DISPLAYFONTP:+"$DISPLAYFONTSIZE +"} \
|
||||
${INTERPRESSFONTP:+"$INTERPRESSFONTSIZE +"} \
|
||||
${CHECKSUMP:+"$CHECKSUMSIZE +"} \
|
||||
${XNSP:+"$XNSSIZE +"} \
|
||||
"$RMONOSIZE + $RCOLORSIZE + $RX11SIZE" | /bin/bc`
|
||||
|
||||
DISKSPACE=`echo $REQUIREDSPACE "*" 1024 | /bin/bc`
|
||||
else DF=`/bin/df $INSTALLDIR 2>/dev/null| egrep -v Filesystem`
|
||||
|
||||
if [ "$DF" != "" ]
|
||||
then FILESYSTEM=`echo $DF | /bin/awk '{print $6}'`
|
||||
AVAILABLESPACE=`echo $DF | /bin/awk '{print $4}'`
|
||||
else unset AVAILABLESPACE
|
||||
fi
|
||||
fi
|
||||
}
|
||||
|
||||
|
||||
sufficientSpaceP () {
|
||||
# Check if there is enough space in FILESYSTEM to make install
|
||||
|
||||
unset MISSINGSPACE
|
||||
if [ "$DISKSPACE" -ge "$AVAILABLESPACE" ]
|
||||
then MISSINGSPACE=`echo $DISKSPACE - $AVAILABLESPACE | /bin/bc`
|
||||
scriptMessage "ERROR" "There is not enough disk-space in file system: $FILESYSTEM
|
||||
Additional space needed: ($MISSINGSPACE Kbytes)
|
||||
To complete installation, select the 'Directory' command and
|
||||
make a change, or deselect some of the selected options."
|
||||
|
||||
INSTDIRERRP=x
|
||||
fi
|
||||
|
||||
[ "$DISKSPACE" -lt "$AVAILABLESPACE" ]
|
||||
}
|
||||
|
||||
|
||||
tapeCommand() {
|
||||
# Tape commands are $1 = 'rewind' and 'fsf 1' and
|
||||
# $2 is the message to print out if given.
|
||||
|
||||
if [ $# -gt 1 ]
|
||||
then echo -n "$2"
|
||||
fi
|
||||
|
||||
if [ "$TAPEHOST" = `/bin/hostname` ]
|
||||
then /bin/mt -f /dev/nrst0 $1 # local tape drive
|
||||
else /usr/ucb/rsh -n "$TAPEHOST" /bin/mt -f /dev/nrst0 $1 # remote host
|
||||
fi
|
||||
|
||||
if [ $? = 0 -a $# -gt 1 ]
|
||||
then echo " Done"
|
||||
fi
|
||||
|
||||
}
|
||||
|
||||
collectEmulatorFiles () {
|
||||
EMULATORFILES="$EMULATORFILES $*"
|
||||
}
|
||||
|
||||
|
||||
extract() {
|
||||
# Extract from tape
|
||||
|
||||
# Print message
|
||||
echo -n "Extracting: $1 ..."
|
||||
shift
|
||||
|
||||
if [ "$TAPEHOST" = `/bin/hostname` ]
|
||||
then /bin/dd if=/dev/nrst0 bs=256b 2>/dev/null | /bin/tar xBipfb - 256 $*
|
||||
else /usr/ucb/rsh -n "$TAPEHOST" /bin/dd if=/dev/nrst0 bs=256b 2>/dev/null | /bin/tar xBipfb - 256 $*
|
||||
fi
|
||||
|
||||
if [ $? != 0 ]
|
||||
then echo " Not extracted !"
|
||||
else echo " Done"
|
||||
fi
|
||||
}
|
||||
|
||||
|
||||
extractFilesP () {
|
||||
# Returns true if either of the file arguments passed are to be
|
||||
# extracted. It is used to avoid unnecessary skips and searches on the tape.
|
||||
|
||||
unset EXTRACTP
|
||||
while [ ${EXTRACTP:--} = - -a $# != 0 ]
|
||||
do case "$1" in
|
||||
File3) EXTRACTP=${MONOP:-${COLORP:-${X11P:-${XNSP:-${OBJECTP:--}}}}} ;;
|
||||
File4) EXTRACTP=${LIBRARYP:--} ;;
|
||||
File5) EXTRACTP=${SYSOUTP:-${CHECKSUMP:--}} ;;
|
||||
File6) EXTRACTP=${DISPLAYFONTP:-${INTERPRESSFONTP:--}} ;;
|
||||
*)
|
||||
exitScript "Help! Should not happen: extractFilesP $1 " ;;
|
||||
esac
|
||||
shift
|
||||
done
|
||||
[ ${EXTRACTP:--} != - ]
|
||||
}
|
||||
|
||||
|
||||
performInstall () {
|
||||
# The actual tar of the tape. There are 5 files on the tape.
|
||||
# File 1 Contains this script 'install-medley' (Skip past it)
|
||||
# File 2 Contains the 'medley' script (always extracted)
|
||||
# File 3 Contains the emulator files for the supported OS-versions
|
||||
# (executables, objectfiles and makefile)
|
||||
# File 4 Contains Lisp Library files
|
||||
# File 5 Contains Lisp Sysouts and checksumfiles
|
||||
# File 6 Contains Font files (Display and Interpress)
|
||||
|
||||
cd $INSTALLDIR
|
||||
|
||||
tapeCommand rewind "Positioning media ..."
|
||||
tapeCommand 'fsf 1'
|
||||
|
||||
extract "medley startup script" ./medley
|
||||
|
||||
if extractFilesP File3
|
||||
then EMULATORFILES=""
|
||||
|
||||
for OS in $OSVERSION
|
||||
do collectEmulatorFiles ${MONOP:+"./install.sunos$OS/ldesingle ${OBJECTP:+./install.sunos$OS/ldesingle.o}"} ${COLORP:+"./install.sunos$OS/ldemulti ${OBJECTP:+./install.sunos$OS/ldemulti.o}"} ${X11P:+"./install.sunos$OS/ldex ${OBJECTP:+./install.sunos$OS/ldex.o}"} ${XNSP:+"./install.sunos$OS/ldeether ${OBJECTP:+./install.sunos$OS/ldeether.c}"} ${OBJECTP:+"./install.sunos$OS/makefile ./install.sunos$OS/usersubrs.c"}
|
||||
|
||||
if [ "${MONOP:+-}" = - -o "${COLORP:+-}" = - -o "${MULTI:+-}" = - ]
|
||||
then EMULATORFILES="./install.sunos$OS/lde $EMULATORFILES"
|
||||
fi
|
||||
done
|
||||
|
||||
extract "emulator files for OS versions: $OSVERSION" $EMULATORFILES
|
||||
|
||||
elif extractFilesP File4 File5 File6
|
||||
then tapeCommand 'fsf 1' "Skipping: emulator files ..."
|
||||
fi
|
||||
|
||||
if extractFilesP File4
|
||||
then extract "library files" ${LIBRARYP:+$LIBRARYFILES}
|
||||
elif extractFilesP File5 File6
|
||||
then tapeCommand 'fsf 1' "Skipping: library files ..."
|
||||
fi
|
||||
|
||||
if extractFilesP File5
|
||||
then extract "${SYSOUTP:+sysout }${CHECKSUMP:+checksum }files" ${SYSOUTP:+$SYSOUTFILES} ${CHECKSUMP:+$CHECKSUMFILES}
|
||||
elif extractFilesP File6
|
||||
then tapeCommand 'fsf 1' "Skipping: ${SYSOUTP:+sysout }${CHECKSUMP:+checksum }files ..."
|
||||
fi
|
||||
|
||||
if extractFilesP File6
|
||||
then extract "${DISPLAYFONTP:+display }${INTERPRESSFONTP:+interpress }font-files" ${DISPLAYFONTP:+$DISPLAYFONTFILES} ${INTERPRESSFONTP:+$INTERPRESSFONTFILES}
|
||||
fi
|
||||
|
||||
tapeCommand rewind "Done extracting files. Rewinding media ..."
|
||||
|
||||
}
|
||||
|
||||
|
||||
updateFile() {
|
||||
# Will create a copy of file $1 into $1.orig
|
||||
# Will then replace $* with $2 from file $1.orig into file $1
|
||||
FILE=$1
|
||||
CHANGES="$*"
|
||||
TO=$2
|
||||
|
||||
if [ ! -f "$FILEDIR/$FILE.orig" ]
|
||||
then /bin/cp $FILE $FILE.orig
|
||||
fi
|
||||
echo -n "Updating: $FILE ... "
|
||||
for CHANGE in CHANGES
|
||||
do
|
||||
/bin/sed -e 1,'$'s/$CHANGE/$TO/ <$FILE.orig >$FILE
|
||||
done
|
||||
if [ $? = 0 ]
|
||||
then echo -n "Done - "
|
||||
else echo "An error occured while trying to update: $FILE"
|
||||
fi
|
||||
echo "Original in: $FILE.orig ..."
|
||||
}
|
||||
|
||||
|
||||
updateFiles(){
|
||||
# Will update 'site-init' and 'medley' by replacing all ocassions of
|
||||
# $SHAREDIR or $LOCALDIR to $INSTALLDIR
|
||||
|
||||
if ask "Do you wish to update the files 'site-init' and 'medley'
|
||||
with respect to the installation directory: $INSTALLDIR" "y" "n"
|
||||
then CHANGEDIR1=`echo $SHAREDIR | /bin/sed -e 's/\//\\\\\//g'`
|
||||
CHANGEDIR2=`echo $LOCALDIR | /bin/sed -e 's/\//\\\\\//g'`
|
||||
NEWDIR=`echo $INSTALLDIR | /bin/sed -e 's/\//\\\\\//g'`
|
||||
|
||||
|
||||
FILEDIR="$INSTALLDIR/`/bin/basename $LIBRARYFILES`"
|
||||
if [ ${LIBRARYP:--} != - -a -d "$FILEDIR" ]
|
||||
then cd "$FILEDIR"
|
||||
if [ -f "$FILEDIR/site-init" ]
|
||||
then
|
||||
updateFile site-init "$NEWDIR" "$CHANGEDIR1" "$CHANGEDIR2"
|
||||
elif [ -f "$FILEDIR/site-init.lisp" ]
|
||||
then
|
||||
cp site-init.lisp site-init
|
||||
updateFile site-init "$NEWDIR" "$CHANGEDIR1" "$CHANGEDIR2"
|
||||
else echo "Could not find: $FILEDIR/site-init"
|
||||
fi
|
||||
else echo "$FILEDIR/site-init not installed."
|
||||
fi
|
||||
if [ -f "$INSTALLDIR/medley" ]
|
||||
then cd "$INSTALLDIR"
|
||||
|
||||
updateFile medley "$NEWDIR" "$CHANGEDIR1" "$CHANGEDIR2"
|
||||
else echo "Could not find: $INSTALLDIR/medley"
|
||||
fi
|
||||
fi
|
||||
}
|
||||
|
||||
|
||||
#------------------------------------------------------------
|
||||
# ********** Main procedure starts here. **********
|
||||
#------------------------------------------------------------
|
||||
|
||||
welcome
|
||||
|
||||
inferConfiguration
|
||||
|
||||
unset answer
|
||||
while [ ${answer:--} != y ]
|
||||
do getInstallOptions
|
||||
ask "Ready to make installation in: $INSTALLDIR" "y" "n"
|
||||
done
|
||||
|
||||
performInstall
|
||||
|
||||
updateFiles
|
||||
|
||||
exitScript "Installation of $APPLICATION completed."
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -f68881 -lX11 -lpixrect -lc -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,37 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -f68881 -lX11 -lpixrect -lc -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o, ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -f68881 -lX11 -lpixrect -lc -lm -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -DOS4 -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o, ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -lX11 -lpixrect -lc -lm -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -DOS4 -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o, ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -lX11 -lpixrect -lc -lm -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -DOS4 -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o, ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -lX11 -lpixrect -lc -lm -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -DOS4 -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o, ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -f68881 -lX11 -lpixrect -lc -lm -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -DOS4 -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,37 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -DOS4 -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o, ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -f68881 -lX11 -lpixrect -lc -lm -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -DOS4 -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o, ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -lX11 -lpixrect -lc -lm -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -DOS4 -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o, ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -lX11 -lpixrect -lc -lm -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -DOS4 -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -1,39 +0,0 @@
|
||||
##########################################################################
|
||||
# This is the user installation makefile, it does not make the "source"
|
||||
# files in this directory, i.e. it uses the objectfiles :
|
||||
# ldesingle.o, ldemulti.o, ldex.o
|
||||
##########################################################################
|
||||
|
||||
default : ldesingle ldemulti ldex ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'ldesingle' or 'ldemulti',
|
||||
#### so don't 'strip'.
|
||||
|
||||
ldesingle : ldesingle.o usersubrs.o
|
||||
cc ldesingle.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldesingle
|
||||
|
||||
ldemulti : ldemulti.o usersubrs.o
|
||||
cc ldemulti.o usersubrs.o -lsuntool -lsunwindow -lpixrect -lc -lm -o ldemulti
|
||||
|
||||
ldex : ldex.o usersubrs.o
|
||||
cc ldex.o usersubrs.o -lX11 -lpixrect -lc -lm -o ldex
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -DOS4 -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f ldesingle ldemulti ldex ldeether runlisp usersubrs.o
|
||||
|
||||
|
||||
@ -7,8 +7,6 @@ INCDIR = ../inc/
|
||||
INCLUDEDIR = ../include/
|
||||
LIBDIR = ../lib
|
||||
BINDIR = ./
|
||||
RELDIR = ../RELEASE/
|
||||
MAIN = _main
|
||||
RANLIB = ranlib
|
||||
AR = ar rcv
|
||||
|
||||
|
||||
@ -40,8 +40,6 @@ OEXT = .o
|
||||
OPTFLAGS = -g3 -O
|
||||
DISPOPTFLAGS = -g3 -O
|
||||
|
||||
MAIN = main
|
||||
|
||||
# Set any debugging options in DEBUGFLAGS. E.g., to enable stack
|
||||
# checking, use -DSTACKCHECK; to enable the fn-call-time stack
|
||||
# check, use -DFNSTKCHECK.
|
||||
|
||||
@ -30,8 +30,6 @@ OEXT = .o
|
||||
OPTFLAGS = -O2 -g
|
||||
DISPOPTFLAGS = -O2 -g
|
||||
|
||||
MAIN = main
|
||||
|
||||
# Set any debugging options in DEBUGFLAGS. E.g., to enable stack
|
||||
# checking, use -DSTACKCHECK; to enable the fn-call-time stack
|
||||
# check, use -DFNSTKCHECK.
|
||||
|
||||
@ -30,8 +30,6 @@ OEXT = .o
|
||||
OPTFLAGS = -O2 -g3
|
||||
DISPOPTFLAGS = -O2 -g3
|
||||
|
||||
MAIN = main
|
||||
|
||||
# Set any debugging options in DEBUGFLAGS. E.g., to enable stack
|
||||
# checking, use -DSTACKCHECK; to enable the fn-call-time stack
|
||||
# check, use -DFNSTKCHECK.
|
||||
|
||||
@ -37,8 +37,6 @@ OEXT = .o
|
||||
OPTFLAGS = -O2 -g3
|
||||
DISPOPTFLAGS = -O2 -g3
|
||||
|
||||
MAIN = main
|
||||
|
||||
# Set any debugging options in DEBUGFLAGS. E.g., to enable stack
|
||||
# checking, use -DSTACKCHECK; to enable the fn-call-time stack
|
||||
# check, use -DFNSTKCHECK.
|
||||
|
||||
@ -30,8 +30,6 @@ OEXT = .o
|
||||
OPTFLAGS = -O2 -g
|
||||
DISPOPTFLAGS = -O2 -g
|
||||
|
||||
MAIN = main
|
||||
|
||||
# Set any debugging options in DEBUGFLAGS. E.g., to enable stack
|
||||
# checking, use -DSTACKCHECK; to enable the fn-call-time stack
|
||||
# check, use -DFNSTKCHECK.
|
||||
|
||||
@ -34,12 +34,6 @@
|
||||
# 4. follow the instructions on {eris}<lispcore>sunloadup>howto-loadup-sunlisp.txt
|
||||
|
||||
|
||||
# '90/04/23 osamu: $INSDIR is defined in makeright
|
||||
#
|
||||
#INSDIR = $(RELDIR)install.$(RELEASENAME)/
|
||||
CHKDIR = $(RELDIR)checksumdir/
|
||||
SCRPTDIR = $(RELDIR)scripts/
|
||||
|
||||
# OSARCHDIR is the os/architecture dir, where executables all go.
|
||||
OSARCHDIR = ../$(OSARCHNAME)/
|
||||
|
||||
@ -861,91 +855,6 @@ $(OBJECTDIR)lpy.tab.o : $(SRCDIR)lpy.tab.c $(REQUIRED-INCS) $(INCDIR)lpdefs.h $
|
||||
$(INCDIR)lpdefs.h $(INCDIR)lpglobl.h $(INCDIR)lpproto.h
|
||||
$(CC) $(RFLAGS) $(SRCDIR)lpy.tab.c -o $(OBJECTDIR)lpy.tab$(OEXT)
|
||||
|
||||
################################################################################
|
||||
# Installation targets - copyprotect is ON here
|
||||
# library, sysouts, fonts on release directories not handled here.
|
||||
# userfiles are separate target explicitly (can make w/o building lde)
|
||||
################################################################################
|
||||
|
||||
prerelease :
|
||||
mkdir $(RELDIR)
|
||||
mkdir $(INSDIR)
|
||||
mkdir $(CHKDIR)
|
||||
mkdir $(SCRPTDIR)
|
||||
|
||||
|
||||
release : $(INSDIR)$(LDENAME).o userfiles $(INSDIR)$(LDENAME) \
|
||||
$(INSDIR)ldeether $(INSDIR)lde csumfiles scriptfiles
|
||||
|
||||
userfiles : $(INSDIR)usrsubr.c $(INSDIR)makefile $(INSDIR)ldeether.c
|
||||
|
||||
$(INSDIR)lde: $(SRCDIR)ldeboot.c $(SRCDIR)unixfork.c $(INCDIR)unixfork.h
|
||||
$(CC) $(CFLAGS) -I$(INCDIR) $(SRCDIR)ldeboot.c $(SRCDIR)unixfork.c \
|
||||
$(LDELDFLAGS) -o $(INSDIR)lde
|
||||
|
||||
$(OBJECTDIR)$(LDENAME).a : $(LIBFILES) $(OSARCHDIR)mkvdate
|
||||
/bin/rm -f $(VFILE).c
|
||||
$(OSARCHDIR)mkvdate > $(VFILE).c
|
||||
$(CC) -c $(VFILE).c -o $(VFILE).o
|
||||
rm -f $(LDENAME).a
|
||||
$(AR) $(OBJECTDIR)$(LDENAME).a $(LIBFILES) $(VFILE).o
|
||||
$(RANLIB) $(OBJECTDIR)$(LDENAME).a
|
||||
rm -f $(VFILE).o
|
||||
|
||||
$(INSDIR)$(LDENAME).o : $(OBJECTDIR)$(LDENAME).a
|
||||
ld -o $(INSDIR)$(LDENAME).o -r -u $(MAIN) $(OBJECTDIR)$(LDENAME).a
|
||||
|
||||
$(INSDIR)$(LDENAME) : $(INSDIR)$(LDENAME).o $(INSDIR)usrsubr.o
|
||||
$(CC) $(INSDIR)$(LDENAME).o $(INSDIR)usrsubr.o $(FPFLAGS) $(LDFLAGS)\
|
||||
-o $(INSDIR)$(LDENAME)
|
||||
rm -f $(INSDIR)usrsubr.o
|
||||
|
||||
## ldeether from release - can't tar off with root permission.
|
||||
|
||||
$(INSDIR)ldeether : $(INSDIR)ldeether.c $(DLPIFILES) $(REQUIRED-INCS)
|
||||
$(CC) $(CFLAGS) $(INSDIR)ldeether.c $(DLPIFILES) $(LDEETHERLDFLAGS) -o $(INSDIR)ldeether
|
||||
- suid $(INSDIR)ldeether"
|
||||
|
||||
$(INSDIR)makefile : $(BINDIR)usermakefile-$(OSARCHNAME)
|
||||
rm -f $(INSDIR)makefile
|
||||
ln -s $(BINDIR)usermakefile-$(OSARCHNAME) $(INSDIR)makefile
|
||||
|
||||
$(INSDIR)usrsubr.c : $(SRCDIR)usrsubr.c
|
||||
rm -f $(INSDIR)usrsubr.c
|
||||
ln -s $(SRCDIR)usrsubr.c $(INSDIR)usrsubr.c
|
||||
|
||||
$(INSDIR)ldeether.c : $(SRCDIR)ldeether.c
|
||||
rm -f $(INSDIR)ldeether.c
|
||||
ln -s $(SRCDIR)ldeether.c $(INSDIR)ldeether.c
|
||||
|
||||
csumfiles : $(CHKDIR)checksum $(CHKDIR)ldechecksum $(CHKDIR)README
|
||||
|
||||
$(CHKDIR)README : $(BINDIR)checksum-readme
|
||||
rm -f $(CHKDIR)README
|
||||
ln -s $(BINDIR)checksum-readme $(CHKDIR)README
|
||||
|
||||
$(CHKDIR)checksum : $(BINDIR)checksum
|
||||
rm -f $(CHKDIR)checksum
|
||||
cp -p $(BINDIR)checksum $(CHKDIR)checksum
|
||||
chmod 755 $(CHKDIR)checksum
|
||||
|
||||
$(CHKDIR)ldechecksum : $(BINDIR)ldechecksum
|
||||
rm -f $(CHKDIR)ldechecksum
|
||||
cp -p $(BINDIR)ldechecksum $(CHKDIR)ldechecksum
|
||||
chmod 755 $(CHKDIR)ldechecksum
|
||||
|
||||
scriptfiles : $(SCRPTDIR)install-medley $(SCRPTDIR)medley
|
||||
|
||||
$(SCRPTDIR)install-medley : $(BINDIR)install-medley
|
||||
rm -f $(SCRPTDIR)install-medley
|
||||
cp -p $(BINDIR)install-medley $(SCRPTDIR)install-medley
|
||||
chmod 755 $(SCRPTDIR)install-medley
|
||||
|
||||
$(SCRPTDIR)medley : $(BINDIR)medley
|
||||
rm -f $(SCRPTDIR)medley
|
||||
cp -p $(BINDIR)medley $(SCRPTDIR)medley
|
||||
chmod 755 $(SCRPTDIR)medley
|
||||
|
||||
################################################################################
|
||||
# Miscellaneous targets
|
||||
# .c.s. should always have -O
|
||||
|
||||
@ -25,7 +25,6 @@
|
||||
# makeright multi ; make lde for cg3,cg6
|
||||
# makeright x ; make lde for X-windows
|
||||
# makeright color ; make lde with color support in it.
|
||||
# makeright multi release ; make release version of lde for cg3,cg6
|
||||
# makeright init ; make lde for loading INIT.DLINIT b/w only
|
||||
#
|
||||
# makeright multi requires directory "maiko/${osversion}.${architecture}-multi"
|
||||
@ -40,7 +39,6 @@
|
||||
#
|
||||
# Hide X shared libraries from link libraries search path.
|
||||
LD_LIBRARY_PATH=/usr/local/lib
|
||||
RELDIR="../RELEASE/"
|
||||
|
||||
export PATH=".:$PATH"
|
||||
|
||||
@ -48,24 +46,7 @@ if test "$1" = ""
|
||||
then
|
||||
display="single"
|
||||
else
|
||||
if test "$1" = "release"
|
||||
then
|
||||
case "$2" in
|
||||
single) display = single
|
||||
;;
|
||||
multi) display = multi
|
||||
;;
|
||||
x) display=x
|
||||
;;
|
||||
*) makeright single release
|
||||
makeright multi release
|
||||
makeright x release
|
||||
exit
|
||||
;;
|
||||
esac
|
||||
else
|
||||
display="$1"
|
||||
fi
|
||||
display="$1"
|
||||
fi
|
||||
|
||||
if test $# -gt 0
|
||||
@ -95,23 +76,6 @@ case "$display" in
|
||||
;;
|
||||
esac
|
||||
echo making with display $display releasename $releasename ldename $ldename
|
||||
releaseflg=0
|
||||
|
||||
if test "$1" = "release"
|
||||
then
|
||||
releaseflg=1
|
||||
if test "$display" != single
|
||||
then
|
||||
if test ! -e usermakefile-${releasename}
|
||||
then
|
||||
ln usermakefile-${osversion}.${architecture} usermakefile-${releasename}
|
||||
fi
|
||||
fi
|
||||
else
|
||||
releaseflg=0
|
||||
fi
|
||||
|
||||
installdir=${RELDIR}install.${osversion}.${architecture}/
|
||||
|
||||
#if($display == single ) then
|
||||
# releasename = ${osversion}.${architecture}
|
||||
@ -134,7 +98,7 @@ echo start making lde for ${releasename}.
|
||||
# then finally do the make, including the right stuff
|
||||
# With makefile-tail merged, this should only take ONE make command....
|
||||
|
||||
make RELEASENAME=${releasename} INSDIR=${installdir} LDENAME=${ldename} \
|
||||
make RELEASENAME=${releasename} LDENAME=${ldename} \
|
||||
OSARCHNAME=${osversion}.${architecture} \
|
||||
-f makefile-header -f makefile-${releasename} \
|
||||
-f makefile-tail $*
|
||||
|
||||
@ -1,203 +0,0 @@
|
||||
#! /bin/sh
|
||||
# ============================================================================
|
||||
# Changes:
|
||||
# ============================================================================
|
||||
# SYNOPSYS:
|
||||
# medley [[emulator] sysout]
|
||||
#
|
||||
# If no arguments are passed to the utility, it will try to find
|
||||
# an emulator and sysout based on DEFAULTDIR. When arguments are
|
||||
# given, it will try to be "smart" when finding files.
|
||||
#
|
||||
# It also will try to find a file containing the Medley software key.
|
||||
# If it doesn't find one, it will prompt for a valid key.
|
||||
#
|
||||
# ============================================================================
|
||||
|
||||
#---------- Change if necessary ----------
|
||||
DEFAULTEMULATOR=lde
|
||||
DEFAULTSYSOUT=LISP.SYSOUT
|
||||
DEFAULTDIR=REPLACEME # Normally updated by installation script
|
||||
|
||||
#************************************************************
|
||||
#********* Changes below this point should normally *********
|
||||
#********* not be required *********
|
||||
#************************************************************
|
||||
|
||||
APPLICATION="Medley 2.0"
|
||||
SCRIPTNAME=`/bin/basename $0`
|
||||
HOSTNAME=`/usr/ucb/hostname`
|
||||
|
||||
KEYFILENAME=".medleyKey.$HOSTNAME"
|
||||
|
||||
exitScript(){
|
||||
echo "$1"
|
||||
exit
|
||||
}
|
||||
|
||||
smartPath() {
|
||||
FILE=`/bin/basename $1`
|
||||
if [ -f "$1" ]
|
||||
then FILEPATH=$1
|
||||
elif [ "$FILE" = "$1" ]
|
||||
then if [ -f "$2/$1" ]
|
||||
then FILEPATH="$2/$1"
|
||||
elif [ -f "$HOME/$1" ]
|
||||
then FILEPATH="$HOME/$1"
|
||||
elif [ -f "$HOME/medley/$1" ]
|
||||
then FILEPATH="$HOME/medley/$1"
|
||||
else exitScript "$3 file not found: $1"
|
||||
fi
|
||||
else exitScript "$3 file not found: $1"
|
||||
fi
|
||||
}
|
||||
|
||||
parseCommand() {
|
||||
case $# in
|
||||
[012]) getOSVersion
|
||||
# Now set the machine type
|
||||
EMULATORDIR=install.sunos${OSVERSION}
|
||||
PATH=$PATH:$DEFAULTDIR/$EMULATORDIR:.
|
||||
cd $DEFAULTDIR/$EMULATORDIR
|
||||
export PATH
|
||||
case $# in
|
||||
0) EMULATOR=$DEFAULTEMULATOR ;;
|
||||
1) EMULATOR=$DEFAULTEMULATOR
|
||||
smartPath $1 $DEFAULTDIR/lispsysouts Sysout
|
||||
SYSOUT=$FILEPATH ;;
|
||||
2) EMULATOR=$1
|
||||
smartPath $2 $DEFAULTDIR/lispsysouts Sysout
|
||||
SYSOUT=$FILEPATH ;;
|
||||
esac ;;
|
||||
*) echo "Usage: $SCRIPTNAME [[emulator] sysout]"
|
||||
exit ;;
|
||||
esac
|
||||
}
|
||||
|
||||
setOSVersion(){
|
||||
unset validOSVersionP
|
||||
case "$1" in
|
||||
3|3.[X245]) OSVERSION=3 ;;
|
||||
4.0|4.0.*) OSVERSION=4 ;;
|
||||
4.1|4.1.*) OSVERSION=4.1 ;;
|
||||
5.*) OSVERSION=5 ;;
|
||||
*) MESSAGE="Invalid reply: $answer"
|
||||
validOSVersionP=notTrue ;;
|
||||
esac
|
||||
[ ${validOSVersionP:-true} = true ]
|
||||
}
|
||||
|
||||
askOSVersion(){
|
||||
MESSAGE="$1"
|
||||
while [ ${menuloop:-notdone} = notdone ]
|
||||
do /usr/ucb/clear
|
||||
|
||||
echo "
|
||||
<---------------> OS Options Menu <--------------->
|
||||
3.X - SunOS 3.2 3.4 3.5
|
||||
4.0 - SunOS 4.0 4.0.X
|
||||
4.1 - SunOS 4.1 4.1.X
|
||||
5.0 - SunOS 5.0 and up.
|
||||
${MESSAGE:+
|
||||
$MESSAGE}"
|
||||
unset MESSAGE
|
||||
echo -n "Select : "
|
||||
answer=`/usr/bin/line`
|
||||
if setOSVersion $answer
|
||||
then menuloop=done
|
||||
fi
|
||||
done
|
||||
}
|
||||
|
||||
getOSVersion() {
|
||||
if [ -f /etc/motd ]
|
||||
then if setOSVersion `/usr/ucb/sed -e '1s/.*SunOS \(...\).*/\1/' -e '1q' < /etc/motd`
|
||||
then echo -n ""
|
||||
else echo "$MESSAGE"
|
||||
fi
|
||||
else askOSVersion "Please specify the SunOS version you are running."
|
||||
fi
|
||||
}
|
||||
|
||||
validKeyP() {
|
||||
unset keyTooLongP
|
||||
VALID=`echo $* | /bin/awk '/[^0-9a-fA-F ]/'`
|
||||
for group in $*
|
||||
do LENGTH=`echo $group | /bin/awk '{print length}'`
|
||||
if [ "$LENGTH" -gt 8 ]
|
||||
then keyTooLongP=true
|
||||
fi
|
||||
done
|
||||
[ $# = 3 -a "$VALID" = "" -a ${keyTooLongP:-notTrue} = notTrue ]
|
||||
}
|
||||
|
||||
saveKey() {
|
||||
echo "Saving key '$KEY' into file '$KEYFILENAME' ..."
|
||||
echo -n "Trying $DEFAULTDIR/$KEYFILENAME ..."
|
||||
if [ -w "$DEFAULTDIR" ]
|
||||
then echo "$KEY" > "$DEFAULTDIR/$KEYFILENAME"
|
||||
else echo " Write protected ! "
|
||||
echo -n "Trying $HOME/$KEYFILENAME instead ..."
|
||||
echo "$KEY" > "$HOME/$KEYFILENAME"
|
||||
fi
|
||||
if [ $? = 0 ]
|
||||
then echo " Done"
|
||||
else echo " Some error occured \! "
|
||||
fi
|
||||
}
|
||||
|
||||
keyDefinedP() {
|
||||
if [ -f "$DEFAULTDIR/$KEYFILENAME" ]
|
||||
then if [ -r "$DEFAULTDIR/$KEYFILENAME" ]
|
||||
then KEYFILE="$DEFAULTDIR/$KEYFILENAME"
|
||||
else echo "ERROR! Cannot read file: $DEFAULTDIR/$KEYFILE"
|
||||
fi
|
||||
elif [ -f "$HOME/$KEYFILENAME" ]
|
||||
then KEYFILE="$HOME/$KEYFILENAME"
|
||||
else echo "
|
||||
To start $APPLICATION, a host access key is required.
|
||||
Call Venue at (1-800-228-5325) for one,
|
||||
|
||||
and be prepared to give them your workstations host ID#
|
||||
"
|
||||
fi
|
||||
[ ${KEYFILE:-notSpecified} != notSpecified ]
|
||||
}
|
||||
|
||||
promptForKey () {
|
||||
while [ ${VALIDKEYP:-notValid} = notValid ]
|
||||
do echo "Your workstations host ID# is: `hostid`"
|
||||
echo -n "Type in the key or [^C] to abort: "
|
||||
KEY=`/usr/bin/line`
|
||||
|
||||
if validKeyP $KEY
|
||||
then VALIDKEYP=x
|
||||
else echo "Sorry, invalid key: $KEY"
|
||||
fi
|
||||
done
|
||||
}
|
||||
|
||||
|
||||
#************************************************************
|
||||
#********** Main piece of code **********
|
||||
#************************************************************
|
||||
|
||||
trap 'echo "
|
||||
$SCRIPTNAME: Aborted ..."; exit' 2
|
||||
|
||||
parseCommand $*
|
||||
|
||||
if keyDefinedP
|
||||
then KEY=`/usr/bin/cat $KEYFILE`
|
||||
else promptForKey
|
||||
saveKey
|
||||
fi
|
||||
|
||||
|
||||
# Well, I think we might be ready to give it a try
|
||||
echo "Starting up $APPLICATION ..."
|
||||
/bin/sleep 2
|
||||
$EMULATOR $SYSOUT -k "$KEY"
|
||||
|
||||
|
||||
|
||||
@ -1,30 +0,0 @@
|
||||
################################################################################
|
||||
## This is the user installation makefile, it does not make the "source"
|
||||
## files in this directory (i.e. this makefile, lde.o).
|
||||
################################################################################
|
||||
|
||||
default : lde ldeether
|
||||
|
||||
#### The native translator needs the symbol table in 'lde', so don't 'strip'.
|
||||
|
||||
lde : lde.o usersubrs.o
|
||||
cc lde.o usersubrs.o -f68881 -lsuntool -lsunwindow -lpixrect -lc -o lde
|
||||
|
||||
ldeether : ldeether.c
|
||||
cc ldeether.c -o ldeether
|
||||
@echo ""
|
||||
@echo "The 'ldeether' executable must be made setuid root to allow"
|
||||
@echo "PUP/XNS Ethernet access. Feel free to examine the source"
|
||||
@echo "of 'ldeether' before doing this."
|
||||
|
||||
|
||||
#### user ops is placeholder for user subrs. needs work.
|
||||
|
||||
usersubrs.o : usersubrs.c
|
||||
cc -c -O usersubrs.c
|
||||
|
||||
#### gets rid of user-created files.
|
||||
|
||||
cleanup :
|
||||
rm -f lde ldeether runlisp usersubrs.o
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user