|
DataMuseum.dkPresents historical artifacts from the history of: Regnecentalen RC-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Regnecentalen RC-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T U d
Length: 2526 (0x9de)
Types: TextFile
Notes: UNIX file
Names: »defaults.menu«
└─⟦bee8f15db⟧ Bits:30004169/disk2.imd Uniplex II+ V.6 release 1.0 (dansk)
└─⟦bee8f15db⟧ UNIX Filesystem
└─⟦this⟧ »up/new/usr/UAP/install.cmds/defaults.menu«
: 'defaults.menu - menu to alter BASE installation parameters
L..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..T..R
Usage: export INFORMIXDIR UNIPLEX_NAME UNIPLEX_DIR
defaults.menu pass-file
. pass-file
expects: environment tokens: INFORMIXDIR, UNIPLEX_NAME and UNIPLEX_DIR
User gets menu controlled option to change any and all of these
Also: UNINAME (menu header line)
Returns: Ensures "pass-file" contains users requirement, as a "." invokable
file. General format:
INFORMIXDIR=value
UNIPLEX_NAME=value
UNIPLEX_DIR=value
Exits: undefined
'
: Create minimal pass-file
echo ':' >$1
while echo $EN "
$MSG
$UNINAME
Installation Program - Change BASE Defaults Menu
Options Default
======= =======
1 - Change name of program to invoke UNIPLEX $UNIPLEX_NAME
2 - Change folder in which this program is found $UNIPLEX_DIR
3 - Change folder in which INFORMIX is (to be) installed $INFORMIXDIR
Q - Return to main menu
Enter option: $CEE"
do
: Default to error message, for ease of coding
MSG="Invalid, or blank, selection$BELL"
read ans scrap
case "$ans" in
[Qq] ) : Only update pass-file on quit
echo "
INFORMIXDIR=$INFORMIXDIR
UNIPLEX_NAME=$UNIPLEX_NAME
UNIPLEX_DIR=$UNIPLEX_DIR" > $1
exit
;;
1) echo $EN "Enter new program name: $CEE"
read ans scrap
if test ! -z "$ans"; then
UNIPLEX_NAME="$ans"
MSG=
fi
;;
2) echo $EN "Enter new program folder name: $CEE"
read ans scrap
if test \( ! -z "$ans" \) -a -d "$ans"; then
UNIPLEX_DIR="$ans"
case "$PATH" in
*:$ans:*) MSG= ;;
$ans:*) MSG= ;;
*:$ans ) MSG= ;;
$ans ) MSG= ;;
*) MSG="WARNING: \"$ans\" not on current search PATH"
;;
esac
fi
;;
3) echo $EN "Enter new INFORMIX folder name: $CEE"
read ans scrap
case "$ans" in
*/* | /* ) INFORMIXDIR="$ans" MSG=;;
esac
;;
esac
done