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

⟦8b3670206⟧ TextFile

    Length: 3023 (0xbcf)
    Types: TextFile
    Notes: @(#)Form.periodic 13.4 (RC International) 91/12/03
    Names: »Form.periodic«

Derivation

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

TextFile

# 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 }' - `