|
|
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: 3023 (0xbcf)
Types: TextFile
Notes: @(#)Form.periodic 13.4 (RC International) 91/12/03
Names: »Form.periodic«
└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
└─⟦bbf173f5c⟧ »0004«
└─⟦this⟧ »./usr/sadm/sysadm/add-ons/sysadm/backup_service/schedule/periodic_time/add/Form.periodic«
# Ident: @(#)Form.periodic 13.4 (RC International) 91/12/03
form="Set periodic date(s) for backup"
`set -l done_performed="no"`
close=`
if [ $done_performed = "yes" ];
then
set -l job="$CRONDATE $atp";
/bin/rm cron_job;
/usr/bin/crontab -l > cron_job;
echo $job >> cron_job;
/usr/bin/crontab cron_job;
/bin/rm cron_job;
fi;
`
help=OPEN TEXT $INTFBASE/Text.itemhelp per:add:$LININFO
done=`
set -l CRONDATE=$F1\ $F2\ $F3\ $F4\ $F5;
set -l done_performed="yes";
`close
begrow=any
begcol=any
framemsg="Enter SAVE to set the backup job in the queue for periodic performed jobs"
# Table field - F1
name=Minute:
lininfo=F1
nrow=1
ncol=2
frow=1
fcol=20
rows=1
columns=40
value=00
choicemsg="Enter minutes for backup time"
#valid=` [ $F1 = "*" -o ( $F1 -ge 0 -a $F1 -le 59 ) ] `
valid=` echo $F1 | awk '{ if ( NF > 1 || ( $1 < 0 || $1 > 59 ) ) { print "false" } else { print "true" } } ' `
invalidmsg="Minutes must be between 0 and 59 "
# Table field - F2
name=Hour:
lininfo=F2
nrow=2
ncol=2
frow=2
fcol=20
rows=1
columns=40
value=20
rmenu=OPEN FORM $DUMP_DIR/schedule/periodic_time/add/Form.read_list hour 0 23
choicemsg="Enter the hour for backup time"
invalidmsg="Hour must be between 0 and 23"
valid=`echo $F2 | awk '{ if ( NF == 1 ) { print $0 } else { print 300 } } ' |
awk -F, '{ for (i=1;i<=NF;i++) printf"%s\n",$i}' |
awk -F- 'BEGIN {res="true"} { for (i=1;i<=NF;i++) if ( ( $i <0 || $i>23 ) && $i != "*" ) res="false"} ; END { print res }' - `
# Table field - F3
name=Month:
lininfo=F3
nrow=3
ncol=2
frow=3
fcol=20
rows=1
columns=40
value=*
rmenu=OPEN FORM $DUMP_DIR/schedule/periodic_time/add/Form.read_list month 1 12
choicemsg="Enter the month for backup time"
valid=`echo $F3 | awk '{ if ( NF == 1 ) { print $0 } else { print 300 } } ' |
awk -F, '{ for (i=1;i<=NF;i++) printf"%s\n",$i}' |
awk -F- 'BEGIN {res="true"} { for (i=1;i<=NF;i++) if ( ( $i <1 || $i>12 ) && $i != "*" ) res="false"} ; END { print res }' - `
# Table field - F4
name=Date:
lininfo=F4
nrow=4
ncol=2
frow=4
fcol=20
rows=1
columns=40
value=*
rmenu=OPEN FORM $DUMP_DIR/schedule/periodic_time/add/Form.read_list date 1 31
choicemsg="Enter the date for backup time"
valid=`echo $F4 | awk '{ if ( NF == 1 ) { print $0 } else { print 300 } } ' |
awk -F, '{ for (i=1;i<=NF;i++) printf"%s\n",$i}' |
awk -F- 'BEGIN {res="true"} { for (i=1;i<=NF;i++) if ( ( $i <1 || $i>31) && $i != "*" ) res="false"} ; END { print res }' - `
# Table field - F5
name=Day of the week:
lininfo=F5
nrow=5
ncol=2
frow=5
fcol=20
rows=1
columns=40
value=*
rmenu=OPEN FORM $DUMP_DIR/schedule/periodic_time/add/Form.read_list weekday 0 6
choicemsg="Enter the weekday for backup time, 0-6 where 0=sunday"
valid=`echo $F5 | awk '{ if ( NF == 1 ) { print $0 } else { print 300 } } ' |
awk -F, '{ for (i=1;i<=NF;i++) printf"%s\n",$i}' |
awk -F- 'BEGIN {res="true"} { for (i=1;i<=NF;i++) if ( ( $i <0 || $i>6) && $i != "*" ) res="false"} ; END { print res }' - `