DataMuseum.dk

Presents historical artifacts from the history of:

RC9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: @ F T

⟦915a1b0df⟧ TextFile

    Length: 1901 (0x76d)
    Types: TextFile
    Notes: @(#)Form.dump 13.5 (RC International) 91/11/29
    Names: »Form.dump«

Derivation

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦bbf173f5c⟧ »0004« 
        └─⟦this⟧ »./usr/sadm/sysadm/add-ons/sysadm/backup_service/dump/Form.dump« 

TextFile

# Ident: @(#)Form.dump	13.5 (RC International) 91/11/29
lifetime=longterm
close=`/bin/rm dumpfs.wrk`
form="Set Volume, Level and Tape type"
lininfo="Backup"
help=OPEN TEXT $INTFBASE/Text.itemhelp $LININFO
`set -l cmd=""`
done=`
      set -l VOLNAME=$F1;
      set -l LEVEL=$F2;
      set -l TAPE_TYPE=$F3;
      if [ $TAPE_TYPE != 1 ];
      then
        set -l TYPE="c";
      fi;
      `close

begrow=any
begcol=any

# Table field - F1
name=Volume:
lininfo=F1
nrow=1
ncol=2

frow=1
fcol=30
rows=1
columns=25

value=$VOLNAME
rmenu= { ` message -p "working"; $DUMP_DIR/dump/get_logical_volumes; message -p "" ` }

fieldmsg="Enter the name of the volume you want to backup"
scroll=TRUE
valid=`echo "$F1" | awk '{ if ( substr($0,1,7) == "/dev/lv" ) print substr($0,8,32); else { if ( substr($0,1,2) == "lv" ) print substr($0,3,32); else { if ( substr($0,1,1) == "/" ) print substr($0,2,32); else print $0 } } }' - | set -l volume ; 
rm dumpfs.wrk ; /etc/dumpfs /dev/lv"$volume" > dumpfs.wrk ; [ -s dumpfs.wrk  ] `

choicemsg="Enter the volume you want to backup"
invalidmsg="the volume must exist an be online"

# Table field - F2
name=Level:
lininfo=F2
nrow=2
ncol=2

frow=2
fcol=30
rows=1
columns=1

value=$LEVEL
rmenu=vary OPEN MENU $DUMP_DIR/dump/Menu.level "$F1"
fieldmsg="Select the level in (0..9), level 0 is the entire file system"
choicemsg="Enter the level, level 0 is the entire file system"
invalidmsg="Use the choice key to enter a legal level"
valid=` [ $F2 -ge 0 -o $F2 -le 9 ] `


# Table field - F3
name=Type of the backup tape:

lininfo=F3
nrow=3
ncol=2

frow=3
fcol=30
rows=1
columns=1

value=$TAPE_TYPE
rmenu=OPEN MENU $DUMP_DIR/dump/Menu.tapetype
fieldmsg="Enter an integer from the set (1,2,3,4) and press ENTER to set the tape type."
choicemsg="Enter the tapetype from the menu."
invalidmsg="Use the choice key to enter a legal tape type."
valid=`[ "$F3" -ge 1 -a "$F3" -le 4 ]`