Rev 13455 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 13455 | Rev 14277 | ||
---|---|---|---|
Line 9... | Line 9... | ||
9 | !endif |
9 | !endif |
10 | !set cnt=0 |
10 | !set cnt=0 |
11 | !for j in $listyear |
11 | !for j in $listyear |
12 | cnt_=!sh cd $wims_home/backup/oldclasses/$j; find . -maxdepth 1 -type f | wc -l | awk '{print $1}' |
12 | cnt_=!sh cd $wims_home/backup/oldclasses/$j; find . -maxdepth 1 -type f | wc -l | awk '{print $1}' |
13 | !if $cnt_ < $limit_class |
13 | !if $cnt_ < $limit_class |
14 | listclass$j=!listfile -t $wims_home/backup/oldclasses/$j/*.tgz |
14 | listclass$j=!listfile -t $wims_home/backup/oldclasses/$j/*.tgz |
15 | listclass$j=!replace internal .tgz by in $(listclass$j) |
15 | listclass$j=!replace internal .tgz by in $(listclass$j) |
16 | listclass$j=!replace internal $wims_home/backup/oldclasses/$j/ by in $(listclass$j) |
16 | listclass$j=!replace internal $wims_home/backup/oldclasses/$j/ by in $(listclass$j) |
17 | listclass$j=!words2items $(listclass$j) |
17 | listclass$j=!words2items $(listclass$j) |
18 | listclass$j=!sort numeric items $(listclass$j) |
18 | listclass$j=!sort numeric items $(listclass$j) |
19 | cnt_=!itemcnt $(listclass$j) |
19 | cnt_=!itemcnt $(listclass$j) |
20 | !else |
20 | !else |
21 | listclass$j=toomuch |
21 | listclass$j=toomuch |
22 | !endif |
22 | !endif |
23 |
|
23 | cnt=$[$cnt_+$cnt] |
24 | !next |
24 | !next |
25 | !else |
25 | !else |
26 | !if $clrestore=$empty |
26 | !if $clrestore=$empty |
27 | error=noclass |
27 | error=noclass |
28 | !reset stepcl test |
28 | !reset stepcl test |
Line 73... | Line 73... | ||
73 | !else |
73 | !else |
74 | !increase stepcl |
74 | !increase stepcl |
75 | !endif |
75 | !endif |
76 | !endif |
76 | !endif |
77 | !endif |
77 | !endif |
78 | - |