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

⟦dd0a2808f⟧ TextFile

    Length: 934 (0x3a6)
    Types: TextFile
    Notes: @(#)Form.history 13.3 (RC International) 91/11/29
    Names: »Form.history«

Derivation

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

TextFile

# Ident: @(#)Form.history	13.3 (RC International) 91/11/29
lifetime=longterm
`set -l DUMP_DIR="$OAMBASE/add-ons/sysadm/backup_service"`
`$DUMP_DIR/history/get_logical_volumes | set -l v_list`
form="Backup history        "
help=OPEN TEXT $INTFBASE/Text.itemhelp $LININFO
`set -l cmd="close"`
done=`if [ $F1 = "all" ];
      then
        set -l cmd="run sh -c \"/usr/tx/dumpinfo | more\"";
      else
        set -l cmd="run sh -c \"/usr/tx/dumpinfo $F1 \"";
      fi;
      `$!cmd

begrow=any
begcol=any

# Table field - F1
name=History:
lininfo=F1
fieldmsg=Press SAVE to display the dump history.
nrow=1
ncol=2

frow=1
fcol=11
rows=1
columns=32

value=all
rmenu= OPEN MENU $DUMP_DIR/history/Menu.history
choicemsg="Select a volume"
invalidmsg="The volume must exist"
#valid=`regex -v "$F1" 'all' TRUE '$v_list' TRUE (.*) FALSE`
valid=` file /dev/lv"$F1" | awk 'BEGIN {r="FALSE"} /all/ || /logical volume/{r="TRUE"}; END{print r}' - `