DataMuseum.dk

top - download

    Length: 2446 (0x98e)
    Types: TextFile
    Notes: @(#)Form.sec 13.1 (RC International) 91/07/25
    Names: »Form.sec«

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦97ad7467e⟧ »0005« 
        └─⟦this⟧ »./home/vmsys/OBJECTS/Form.sec« 

TextFile

#	@(#)Form.sec	13.1 (RC International) 91/07/25

#ident	"@(#)face:OBJECTS/Form.sec	1.4"

form="Security on `pathconv -t -v $ARG1` for $LOGNAME"

help=OPEN TEXT OBJECTS/Text.h "$TITLE" T.hsec"$ITEM"

framemsg="Press CHOICES to select, then press SAVE when you complete the form."

done=`indicator -w;setmod $ARG1 $F2 $F3 $F4 $F5 $F6 $F7 $F8 $F9 $F10 && chown "$F1" "$ARG1" >/dev/null`

name=Owner
nrow=1
ncol=1
rows=1
columns=8
frow=1
fcol=32
rmenu={ `regex '^([^:]*)$0:.*$' '$m0' < /etc/passwd` }
lininfo=`set -l TITLE="Owner" -l ITEM=1`
menuonly=true
value=const `ls -ld $ARG1 | regex '^.{15}([^ ]*)$0' '$m0'`

name=Owner Read Permissions
nrow=3
ncol=1
rows=1
columns=3
frow=3
fcol=32
rmenu={ yes no }
lininfo=`set -l TITLE="Owner Read Permissions" -l ITEM=2`
menuonly=true
value=const `getmod $ARG1 400`

name=Owner Write Permissions
nrow=4
ncol=1
rows=1
columns=3
frow=4
fcol=32
rmenu={ yes no }
lininfo=`set -l TITLE="Owner Write Permissions" -l ITEM=3`
menuonly=true
value=const `getmod $ARG1 200`

name=Owner Run/Search Permissions
nrow=5
ncol=1
rows=1
columns=3
frow=5
fcol=32
rmenu={ yes no }
lininfo=`set -l TITLE="Owner Run or Search Permissions" -l ITEM=4`
menuonly=true
value=const `getmod $ARG1 100`

name=Group Read Permissions
rmenu={ yes no }
lininfo=`set -l TITLE="Group Read Permissions" -l ITEM=5`
menuonly=true
nrow=7
ncol=1
rows=1
columns=3
frow=7
fcol=32
value=const `getmod $ARG1 040`

name=Group Write Permissions
rmenu={ yes no }
lininfo=`set -l TITLE="Group Write Permissions" -l ITEM=6`
menuonly=true
nrow=8
ncol=1
rows=1
columns=3
frow=8
fcol=32
value=const `getmod $ARG1 020`

name=Group Run/Search Permissions
rmenu={ yes no }
lininfo=`set -l TITLE="Group Run or Search Permissions" -l ITEM=7`
menuonly=true
nrow=9
ncol=1
rows=1
columns=3
frow=9
fcol=32
value=const `getmod $ARG1 010`

name=All Read Permissions
rmenu={ yes no }
lininfo=`set -l TITLE="All Read Permissions" -l ITEM=8`
menuonly=true
nrow=11
ncol=1
rows=1
columns=3
frow=11
fcol=32
value=const `getmod $ARG1 004`

name=All Write Permissions
rmenu={ yes no }
lininfo=`set -l TITLE="All Write Permissions" -l ITEM=9`
menuonly=true
nrow=12
ncol=1
rows=1
columns=3
frow=12
fcol=32
value=const `getmod $ARG1 002`

name=All Run/Search Permissions
rmenu={ yes no }
lininfo=`set -l TITLE="All Run or Search Permissions" -l ITEM=10`
menuonly=true
nrow=13
ncol=1
rows=1
columns=3
frow=13
fcol=32
value=const `getmod $ARG1 001`

name=RESET
button=8
action=reset