DataMuseum.dk

top - download

    Length: 2986 (0xbaa)
    Types: TextFile
    Notes: @(#)Form.make 13.2 (RC International) 91/10/11
    Names: »Form.make«

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦bbf173f5c⟧ »0004« 
        └─⟦this⟧ »./usr/sadm/sysadm/menu/files/make/Form.make« 

TextFile

# Ident: @(#)Form.make	13.2 (RC International) 91/10/11
lifetime=longterm
form="Make a filesystem"
help=`set -l OBJ_DIR=$OAMBASE/menu/files/make`OPEN TEXT $INTFBASE/Text.itemhelp $LININFO
close=`/bin/rm dumpfs.wrk`
`set -l FRQ=7;
 set -l EXTENT="-p8 -s8";
 set -l TYPE="-V";
 set -l VOLNAME="";
 set -l cmd="";
`
done=`
      set -l VOLNAME=/dev/lv"$volume";
      set -l FRQ=$F2;
      set -l PRIMEXT="$F3";
      set -l SECEXT="$F4";
      regex -v "$F5" systemV -V BSD -B '.*' '' | set -l TYPE;
      `OPEN FORM $OAMBASE/menu/files/make/Form.make_now
begrow=any
begcol=any

# Table field - F1
name=Volume Name:
lininfo=Form.make:F1
nrow=1
ncol=2

frow=1
fcol=30
rows=1
columns=39

value="$VOLNAME"
rmenu= { ` message -p "working"; $OAMBASE/add-ons/sysadm/backup_service/dump/get_logical_volumes; message -p "" ` }

fieldmsg="Enter the name of the logical volume you want to make to a filesystem"
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 a name"
invalidmsg="the volume must exist"

# Table field - F2
name=Backup Frequency:
lininfo=Form.make:F2
nrow=2
ncol=2

frow=2
fcol=45
rows=1
columns=3

value="$FRQ"
fieldmsg="Enter the number of days between backups"
valid=` [ $F2 -gt 0 -o $F2 -le 366 ] `
choicemsg="Enter an integer from (1,2,3,..,366)"
invalidmsg="The number of days must be positive and not greater than 366"

# Table field - F3
name=Primary Extent Size (in KB):
lininfo=Form.make:F3
nrow=3
ncol=2

frow=3
fcol=45
rows=1
columns=4

value=8
fieldmsg="Enter the primary extent size in KB (in powers of 2)"
rmenu= { 1 2 4 8 16 32 64 128 256 512 1024 2048 4096 8192 }
menuonly
choicemsg="Enter an integer from the list)"
invalidmsg="The primary extent size must be a powers of 2 and not greater than 8192"

# Table field - F4
name=Secondary Extent size (in KB):
lininfo=Form.make:F4
nrow=4
ncol=2

frow=4
fcol=45
rows=1
columns=4

value=8
fieldmsg="Enter the secondary extent size in KB (in powers of 2)"
rmenu= { 1 2 4 8 16 32 64 128 256 512 1024 2048 4096 8192 }
menuonly
choicemsg="Enter an integer from the list)"
invalidmsg="The secondary extent size must be a power of 2 and not greater than 8192"

# Table field - F5
name=File system type:
lininfo=Form.make:F5
nrow=5
ncol=2

frow=5
fcol=45
rows=1
columns=7

value=systemV
fieldmsg="Enter the filesystem type either systemV or BSB"
rmenu= { systemV BSD }
menuonly
invalidmsg="Only systemV or BSD are valid"

# Table field - F6
name="---------------------------------------------------------------------"
inactive=true
nrow=6
ncol=1

frow=6
fcol=1
rows=1
columns=1

# Table field - F7
name="press SAVE if you want to execute 'make filesystem'"
inactive=true
nrow=7
ncol=2

frow=7
fcol=1
rows=1
columns=1