|
|
DataMuseum.dkPresents historical artifacts from the history of: RC9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - downloadIndex: @ F T
Length: 5231 (0x146f)
Types: TextFile
Notes: @(#)Form.params 13.3 (RC International) 91/11/28
Names: »Form.params«
└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
└─⟦bbf173f5c⟧ »0004«
└─⟦this⟧ »./usr/sadm/sysadm/add-ons/sysadm/backup_service/dump/cipher_params/Form.params«
# Ident: @(#)Form.params 13.3 (RC International) 91/11/28
form="Supplementary parameters (CIPHER)"
help=OPEN TEXT $INTFBASE/Text.itemhelp cipher:$LININFO
lifetime=longterm
`set -l cmd=""`
`regex -v "$NOTIFY" n yes '.*' no | set -l notify;
regex -v "$REWIND" r yes '.*' no | set -l rewind;
regex -v "$UPDATE" u yes '.*' no | set -l update;
regex -v "$VERIFY" v yes '.*' no | set -l verify;
regex -v "$AUTOLOAD" l yes '.*' no | set -l autoload`
`regex -v "$DEN" 6250 F4 '.*' F2 | set -l den`
done=`set -l DEVNODE=$F1;
regex -v "$F2" yes n '.*' '' | set -l NOTIFY;
regex -v "$F3" yes r '.*' '' | set -l REWIND ;
regex -v "$F4" yes u '.*' '' | set -l UPDATE ;
regex -v "$F5" yes v '.*' '' | set -l VERIFY ;
regex -v "$F6" yes l '.*' '' | set -l AUTOLOAD;
set -l MGB=$F7;
set -l TYPE="c";
regex -v "$F8" F2 1600 F4 6250 | set -l DEN;
`close
begrow=any
begcol=any
# Table field - F1
name=Tape device node:
lininfo=F1
nrow=1
ncol=2
frow=1
fcol=28
rows=1
columns=25
value=$DEVNODE
rmenu=OPEN MENU $DUMP_DIR/dump/Menu.mt
fieldmsg="Select the device node for the wanted tape"
choicemsg="Select the device node from the menu"
invalidmsg="Only tape device nodes are valid"
valid=`shell " file $F1 " | regex magnetic true '.*' false`
# Table field - F2
name=Operator notify:
lininfo=F2
nrow=2
ncol=2
frow=2
fcol=28
rows=1
columns=3
value=$notify
rmenu= { yes no }
menuonly
`regex -v "$NOTIFY" n "Enter 'no' for no operator notify." '.*' "Enter 'yes' for operator notify." | set -l fms2`
#`set -l fms2="Enter 'yes' for operator notify."`
fieldmsg=$fms2
valid=`
if [ $F2 = "yes" ] ;
then
set -l fms2="Enter 'no' for no operator notify.";
echo true;
elif [ $F2 = "no" ];
then
set -l fms2="Enter 'yes' for operator notify.";
echo true;
else
echo false;
fi;
`
invalidmsg"$F2 is not valid"
# Table field - F3
name=Rewind tape:
lininfo=F3
nrow=3
ncol=2
frow=3
fcol=28
rows=1
columns=3
value="$rewind"
rmenu= { yes no }
menuonly
`regex -v $REWIND" r "Enter 'no' for no rewind when the backup is complete." '.*' "Enter 'yes' to rewind the tape when the backup is complete." | set -l fms3`
fieldmsg=$fms3
valid=`
if [ $F3 = "yes" ] ;
then
set -l fms3="Enter 'no' for no rewind when the backup is complete.";
echo true;
elif [ $F3 = "no" ];
then
set -l fms3="Enter 'yes' to rewind the tape when the backup is complete.";
echo true;
else
echo false;
fi;
`
invalidmsg"$F3 is not valid"
# Table field - F4
name=Save date and level:
lininfo=F4
nrow=4
ncol=2
frow=4
fcol=28
rows=1
columns=3
value=$update
rmenu= { yes no }
menuonly
`regex -v "$UPDATE" u "Enter 'no' for no save of the Level and the Date." '.*' "Enter 'yes' to save the Level and the Date." | set -l fms4`
fieldmsg=$fms4
valid=`
if [ $F4 = "yes" ] ;
then
set -l fms4="Enter 'no' for no save of the Level and the Date.";
echo true;
elif [ $F4 = "no" ];
then
set -l fms4="Enter 'yes' to save the Level and the Date.";
echo true;
else
echo false;
fi;
`
invalidmsg"$F4 is not valid"
# Table field - F5
name=Verify tape after backup:
lininfo=F5
nrow=5
ncol=2
frow=5
fcol=28
rows=1
columns=3
value=$verify
rmenu= { yes no }
menuonly
`regex -v "$VERIFY" v "Enter 'no' for no verify when the backup is complete." '.*' "Enter 'yes' to verify the tape when the backup is complete." | set -l fms5`
fieldmsg=$fms5
valid=`
if [ $F5 = "yes" ] ;
then
set -l fms5="Enter 'no' for no verify when the backup is complete.";
echo true;
elif [ $F5 = "no" ];
then
set -l fms5="Enter 'yes' to verify the tape when the backup is complete.";
echo true;
else
echo false;
fi;
`
invalidmsg"$F5 is not valid"
# Table field - F6
name=Auto load:
lininfo=F6
nrow=6
ncol=2
frow=6
fcol=28
rows=1
columns=3
value=$autoload
rmenu= { yes no }
menuonly
`regex -v "$AUTOLOAD" l "Enter 'no' if you want to wait for operator intervention to load the next tape." '.*' "Enter 'yes' if you want automatical load of next tape." | set -l fms6`
fieldmsg=$fms6
valid=`
if [ $F6 = "yes" ] ;
then
set -l fms6="Enter 'no' if you want to wait for operator intervention to load the next tape.";
echo true;
elif [ $F6 = "no" ];
then
set -l fms6="Enter 'yes' if you want automatical load of next tape.";
echo true;
else
echo false;
fi;
`
invalidmsg"$F6 is not valid"
# Table field - F7
name=Number of Megabyte:
lininfo=F7
nrow=7
ncol=2
frow=7
fcol=28
rows=1
columns=5
value=$MGB
rmenu= {}
fieldmsg="Enter the number of megabytes as an positiv integer"
choicemsg="Enter an positiv integer"
valid=`[ "$F7" -ge 1 ]`
invalidmsg="$F7 is not positiv"
# Table field - F8
name=Tape density:
lininfo=F8
nrow=8
ncol=2
frow=8
fcol=28
rows=1
columns=4
value=$den
rmenu= { F2 F4 }
menuonly
fieldmsg="Enter the tape density as F2 or F4"
choicemsg="Enter F2 or F4"
invalidmsg="The tape density must be F2 or F4"